Nils Andresen

Finalbuilder-Hook in Mercurial

2011-06-08T23:53:00.000-07:00

In der Firma in der ich arbeite wird viel Finalbuilder verwendet. Das Tool ist zwar ganz nett, hat aber Probleme zu bemerken dass eine bereits geöffnete Datei verändert wurde. Das führt zu den merkwürdigsten Problemen wenn die Finalbuilder-Dateien unter Versionskontrolle stehen (Schnell ein update machen, aber Finalbuilder ist noch geöffnet. Das update funktioniert problemlos, nur sind keine Änderungen im Finalbuilder „angekommen“)

Damit mir das nicht mehr passiert habe ich mir mal einen kleinen hook für mercurial zusammen gezimmert.

Einfach das folgende Skript irgendwo auf der Platte parken:

#!/usr/bin/python
# -*- coding: utf-8 -*-
import os

def preupdate(ui, repo, **kwargs):
 basepath = repo.origroot
 rev = kwargs['parent1']
 node = repo.changelog.lookup(rev)
 _,_,_,files,_,_ = repo.changelog.read(node)
 for file in files:
  if os.path.splitext(file)[1] != '.fbz6':
   continue
  fb_file = os.path.join(basepath, file)
  fb_lockfile = os.path.splitext(fb_file)[0] + '.fb6lck'
  if os.path.exists(fb_lockfile):
   ui.write('Fehler: Die Finalbuilder-Datei\n%s\nsoll geändert werden, ist aber noch gelockt.\nSchließen sie Finalbuilder um das Update durchzuführen.\n' % fb_file)
   ui.write('(Hinweis: Wenn sie (wirklich...) keinen Finalbuilder mehr geöffnet haben,\nsollten sie die lock-datei löschen.\n diese findet sich unter:\n%s)\n' % fb_lockfile)
   return True
 
 return False

Diesen hook dann noch in mercurial einbauen, indem die globale mercurial.ini (bei mir: c:\users\nils\mercurial.ini) mit einem editor geöffnet wird und folgende Zeilen ergänzen:

[hooks]
preupdate.finalbuilder = python:C:\wo\das\skript\liegt.py:preupdate

Mehr info's über mercurial-hooks gib es im mercurial Buch, Kap. 10.

Hinweis: Zur Ausführung dieses hooks muss kein python extra installiert werden, der hook wird einfach „direkt“ in mercurial ausgeführt. Mehr dazu gibt es im mercurial Buch.

Pfadleiste in Nautilus 3 - oder wo ist mein „überliegendes Verzeichnis“-Knopf geblieben…

2011-05-29T02:21:00.000-07:00

Ich habe gestern auf gnome 3 umgestellt, daher ist meine aktuelle Version von Nautilus die v. 3.0.1.1
Nun fehlt in dieser der Knopf für „überliegendes Verzeichnis“. Klar - der „Zurück“-Knopf führt in wohl 80% der Fälle zum überliegenden Verzeichnis... Ich vermisse ihn aber trotzdem.
Eine kleine Suche hat mich auf die Antwort gebracht: Der „überliegendes Verzeichnis“-Knopf ist nicht mehr notwendig, die Verzeichnis-Anzeige ist ja in der „Pfadleiste“ - und da kann man ja einfach das überliegende Verzeichnis anklicken... Achso? Nicht bei mir...
Bei mir ist keine Pfadleiste, sondern ein Text-Feld....

Es hat etwas länger gedauert bis ich heraus gefunden hatte, dass Nautilus die Pfadleiste ja schon lange hatte, nur halt nicht bei mir - und nach reichlich nachdenken bin ich mir ganz sicher — die Pfadleiste hatte ich mal abgeschaltet. Aber wie nun wieder zurück bekommen?
Die Lösung liegt in der always-use-location-entry Einstellung von Nautilus.
Also den dconf-editor geöffnet und navigieren nach org/gnome/nautilus/preferences:

Nachdem ich die Einstellung zurück gesetzt habe erscheint auch die Pfadleiste:

Super. Das Textfeld, dass ich vorher hatte kann jetzt übrigens temporär aktiviert werden über Strg+L oder „Gehe zu“>„Ort”

Leere VS2010 Solution in Nautilus

2011-04-22T01:24:00.000-07:00

Ich habe schon einmal geschrieben, wie man eine neue VS2008 Solution mit dem Explorer anlegen kann.
Das selbe ist natürlich auch für gnomes Nautilus möglch.
Einfach eine der Vorlagen (2008 oder 2010) ablegen im Template-Verzeichnis ablegen und mit "nautilus -q" Nautilus neu starten.

Das Template-Verzeichnis von Nautilus ist unter dem Namen XDG_TEMPLATES_DIR abgelegt in der Datei user-dirs.dirs des config-verzeichnisses. Dieses sollte in XDG_CONFIG_HOME stehen, standard ist ~./config.
Also im Lieblings-Editor (vim für mich...) die user-dirs.dir bearbeiten :

vim ${XDG_CONFIG_HOME:-~/.config}/user-dirs.dirs

und entweder herausfinden was der Wert der variablen ist, oder einen guten setzen. Meiner ist:

XDG_TEMPLATES_DIR="$HOME/.XdgTemplates"

Also Kurzfassung:

XDG_TEMPLATES_DIR finden
Vorlage (2008 oder 2010) im XDG_TEMPLATES_DIR ablegen
Nautilus neustarten (nautilus -q)

vim probleme mit delete unter rxvt?

2011-04-22T01:11:00.000-07:00

In meinem letzten post hatte ich dargestellt, wie man einen netten terminal-emulator (rxvt) unter cygwin zum laufen bringt. Soweit so gut.
Jetzt machte aber plötzlich mein vim probleme: Del funktionierte manchmal nicht und die Pfeiltasten verhielten sich auch komisch..
Die Antwort war wie immer recht einfach: Ich hatte die .vimrc vergessen.

cp /usr/share/vim/vim73/vimrc_example.vim ~/.vimrc

Behebt das Problem. Super-Einfache lösung.
(Nur vorsicht, wenn man schon eine .vimrc hat...)

EDIT:
Natürlich ist es nicht „die magische .vimrc“, die das Problem behebt, sondern die folgende Zeile innerhalb dieser:

set backspace=indent,eol,start

Besserer Terminal-Emulator für cygwin

2011-04-22T00:48:00.000-07:00

Seit kurzem befasse ich mich (mal wieder) mit cygwin. Eine gute Idee habe ich heute im Netz gefunden: Den bestehenden emulator gegen rxvt ersetzen.
Dafür muss natürlich rxvt in der cygwin-umgebung installiert sein.
Folgende bat-Datei sollte dann zum starten erstellt werden:

@echo off
C:
chdir C:\cygwin\bin
start rxvt -sr -sl 10000 -fg white -bg black -fn "Lucida Console-10" -tn cygwin -e /bin/bash --login -i

Super.

Word-Dokumente zusammenfassen

2011-03-23T07:39:00.000-07:00

Mein aktuelles Problem: Mehrere Word-Dokumente sollten in einem neuem Dokument zusammengefasst werden.

Zwei mögliche Lösungen bieten sich an:
1. Neues Word-Dokument erstellen, Einfügen, Objekt, „Text aus Datei”
2. Ein Makro erstellen, dass alle Dateien in einem bestimmten Ordner öffnet und in eine neue Datei einfügt (ohne Beachtung einer eventuell gewünschten Reihenfolge).

Da mir Variante 2 besser gefällt (*grins*) folgt der verwendete code:

Sub ConcatenateAllWordFiles()
 Dim mypath
 mypath = BrowseFolder("Verzeichnis Wählen")
 
 Set fso = CreateObject("Scripting.FileSystemObject")
 Set Folder = fso.GetFolder(mypath)
 Set allFiles = Folder.Files
 Set newDoc = Documents.Add

 For Each file In allFiles
    If Right(file, 5) = ".docx" Then

        Documents.Open FileName:=file.Path
        current = ActiveDocument.Name
        Selection.WholeStory
        Selection.Copy
        Documents(current).Close
        newDoc.Activate
        Selection.Paste
        Selection.EndKey Unit:=wdLine
    End If
 Next
End Sub

Function BrowseFolder(Title As String, _
        Optional InitialFolder As String = vbNullString, _
        Optional InitialView As Office.MsoFileDialogView = _
            msoFileDialogViewList) As String
    Dim V As Variant
    Dim InitFolder As String
    With Application.FileDialog(msoFileDialogFolderPicker)
        .Title = Title
        .InitialView = InitialView
        If Len(InitialFolder) > 0 Then
            If Dir(InitialFolder, vbDirectory) <> vbNullString Then
                InitFolder = InitialFolder
                If Right(InitFolder, 1) <> "\" Then
                    InitFolder = InitFolder & "\"
                End If
                .InitialFileName = InitFolder
            End If
        End If
        .Show
        On Error Resume Next
        Err.Clear
        V = .SelectedItems(1)
        If Err.Number <> 0 Then
            V = vbNullString
        End If
    End With
    BrowseFolder = CStr(V)
End Function

Das ist natürlich nicht alles meine alleinige Idee, die Grobe Vorlage war dies.
Wie BrowseFolder-Funktion habe ich komplett „gefunden”...

Nautilus-Erweiterung mit Python

2010-07-24T09:28:00.000-07:00

Heute gab es bei mir ja schon eine Explorer-Erweiterung mit Python. Das gleiche benötige ich auch am heimischen Rechner - nur unter Nautilus:

#!/usr/bin/python
# -*- coding: utf-8 -*-

import urllib
import easygui
import logging
import nautilus
import os

CCDFOLDERS =  [
 'source',
 'bin',
 'build',
 'lib',
 'resource',
 ]

class CcdDirStructureExtension(nautilus.MenuProvider):

 def __init__(self):
  pass
 
 
 def _alertError(self, message):
  easygui.msgbox(message, title='Alert', ok_button='Mist!')
 
 
 def _create_ccd_structure(self, foldername):
  ok = easygui.ynbox(msg=u'wirklich eine CCD-Struktur ersellen in\n' + foldername,
   title=u'Erstellen bestägen', choices=('Ja, bitte', 'Nein, danke'))
  if ok == 0:
   return

  if  not os.path.isdir(foldername):
   self._alertError(foldername + u'\nist kein Verzeichnis. Abgebrochen.')
   return

  try:
   for ccd in CCDFOLDERS:
    dir = os.path.join(foldername, ccd)
    os.mkdir(dir)
  except Exception, e:
   self._alertError(e)
   raise
 
 
 def menu_activate(self, menu, file):
  """Called when the user selects the menu."""
  filename = urllib.unquote(file.get_uri()[7:])
  self._create_ccd_structure(filename)


 def get_file_items(self, window, files):
  """Called when the user selects a file in Nautilus."""  
  if len(files) != 1:
   return
   
  file = files[0]
  if not file.is_directory() or file.get_uri_scheme() != 'file':
   return

  return self._get_MenuItemForFile(file)
  

 def get_background_items(self, window, file):
  """Called when the user clicks the background of a Nautilus-Window"""
  if not file.is_directory() or file.get_uri_scheme() != 'file':
   return
  return self._get_MenuItemForFile(file)


 def _get_MenuItemForFile(self, file):
  item = nautilus.MenuItem("NautilusPython::ccd-dir::create",
   "CCD-Struktur", 
   "erstellt eine CCD-Verzeichnisstruktur in %s" % file.get_name())
  item.connect("activate", self.menu_activate, file)
  return item,


if __name__ == '__main__':
 print 'This is a Nautilus extenion. Copy it to ${HOME}/.nautilus/python-extensions/ and restart Nautilus. Have fun.'

Der Code gehört bei Installierten Nautilus-Python-Bindings nach ${HOME}/.nautilus/python‑extensions/ und sollte ausführbar sein (chmod 755).
Die Dialoge werden von EasyGui erstellt, irgendwie gab es Probleme gtk-Dialoge zu erzeugen...

Explorer-Erweiterung (shell extension) mit Python

2010-07-24T03:25:00.000-07:00

Die Problemstellung: Eine Verzeichnisstruktur soll automatisch erstellt werden, und zwar über einen Eintrag im Context-Menü des Explorers.
Die ganze Vorgeschichte ist hier.
Nun die Lösung in Python. Das ganze ist recht übersichtlich:

# -*- coding: utf-8 -*-

#   Erstellt einen Eintrag im Context-Menü des Explorers: CCD-Verzeichnis erstellen
#   bei Click wird im gewählten Verzeichnis eine CCD-Verzeichnisstrukur
#   (bin, build, lib, source, resources) erstellt.

import os.path
import pythoncom
from win32com.shell import shell, shellcon
import win32gui
import win32con

IContextMenu_Methods = ["QueryContextMenu", "InvokeCommand", "GetCommandString"]
IShellExtInit_Methods = ["Initialize"]

#   HKCR Key   Affected object types
#      *    All files
#AllFileSystemObjects  All regular files and file folders
#     Folder   All folders, virtual and filesystem
#     Directory   File folders
#Directory\Background  Directory-Background (Folder is open, one clicks on the white background...)
#      Drive   Root folders of all system drives
#    Network   Entire network
#   NetShare   All network shares

TYPES = [
 'Directory\\Background',
 'Directory',
 ]
SUBKEY = 'CCD-Verzeichnis'

CCDFOLDERS = [
 'source',
 'bin',
 'build',
 'lib',
 'resource',
 ]

def alertError(hwnd, exc):
 win32gui.MessageBox(hwnd, str(exc), str(exc.__class__), win32con.MB_OK)


class ShellExtension:
 _reg_progid_ = "CCD.Verzeichnisersteller.ShellExtension.ContextMenu"
 _reg_desc_ = "CCD-Verzeichnis Shell Extension (context menu)"
 _reg_clsid_ = "{5C664DC4-5ADA-4385-9DEB-EDB51320A668}"

 _com_interfaces_ = [shell.IID_IShellExtInit, shell.IID_IContextMenu]
 _public_methods_ = IContextMenu_Methods + IShellExtInit_Methods

 def Initialize(self, folder, dataobj, hkey):
  self.dataobj = dataobj

 def QueryContextMenu(self, hMenu, indexMenu, idCmdFirst, idCmdLast, uFlags):
  try:
   msg = 'CCD-Verzeichnis ersellen'

   idCmd = idCmdFirst
   items = []
   if (uFlags &amp; 0x000F) == shellcon.CMF_NORMAL:
    items.append(msg)
   elif uFlags &amp; shellcon.CMF_VERBSONLY:
    items.append(msg)
   elif uFlags &amp; shellcon.CMF_EXPLORE:
    items.append(msg)
   else:
    pass
    
   win32gui.InsertMenu(hMenu, indexMenu,
        win32con.MF_SEPARATOR|win32con.MF_BYPOSITION,
        0, None)
   indexMenu += 1
   for item in items:
    win32gui.InsertMenu(hMenu, indexMenu,
         win32con.MF_STRING|win32con.MF_BYPOSITION,
         idCmd, item)
    indexMenu += 1
    idCmd += 1

   win32gui.InsertMenu(hMenu, indexMenu,
        win32con.MF_SEPARATOR|win32con.MF_BYPOSITION,
        0, None)
   indexMenu += 1
   return idCmd-idCmdFirst

  except Exception, e:
   alertError(None, e)
   raise


 def InvokeCommand(self, ci):
  mask, hwnd, verb, params, dir, nShow, hotkey, hicon = ci
  
  try:
   if self.dataobj is None:
    #background-click
    fname = dir
   else:
    #get Files from dragObject
    files = self.getDragFiles()
    if not files:
     return
    fname = files[0]

   self.CreateCCDFolderStructure(hwnd, fname)
  except Exception, e:
   alertError(hwnd, e)
   raise
  return


 def GetCommandString(self, cmd, typ):
  return "Erstellt eine CCD-Verzeichnisstruktur"


 def getDragFiles(self):
  # Format the DataObject using a formatec, then get DragQueryFile from it...
  format_etc = win32con.CF_HDROP, None, 1, -1, pythoncom.TYMED_HGLOBAL
  sm = self.dataobj.GetData(format_etc)
  num_files = shell.DragQueryFile(sm.data_handle, -1)
  files = [shell.DragQueryFile(sm.data_handle, i) for i in range(num_files)]
  return files
  
  
 def CreateCCDFolderStructure(self, hwnd, folder):
  ok = win32gui.MessageBox(hwnd, u'wirklich eine CCD-Struktur ersellen in\n' + folder,
   u'Erstellen bestägen', 
   win32con.MB_YESNO|win32con.MB_ICONQUESTION|win32con.MB_TASKMODAL|win32con.MB_SETFOREGROUND)
  if ok != win32con.IDYES:
   return
  
  if not os.path.isdir(folder):
   alertError(hwnd, folder + u'\nist kein Verzeichnis. Abgebrochen.')
  
  try:
   for ccd in CCDFOLDERS:
    dir = os.path.join(folder, ccd)
    os.mkdir(dir)
  except Exception, e:
   alertError(hwnd, e)
   raise
  return 

def DllRegisterServer():
 import _winreg
 for typ in TYPES:
  key = _winreg.CreateKey(_winreg.HKEY_CLASSES_ROOT, "%s\\shellex" % typ)
  subkey = _winreg.CreateKey(key, "ContextMenuHandlers")
  subkey2 = _winreg.CreateKey(subkey, SUBKEY)
  _winreg.SetValueEx(subkey2, None, 0, _winreg.REG_SZ, ShellExtension._reg_clsid_)
 print ShellExtension._reg_desc_, "registration complete."


def DllUnregisterServer():
 import _winreg
 for typ in TYPES:
  try:
   key = _winreg.DeleteKey(_winreg.HKEY_CLASSES_ROOT, "%s\\shellex\\ContextMenuHandlers\\%s" % (typ, SUBKEY))
  except WindowsError, details:
   import errno
   if details.errno != errno.ENOENT:
    raise
 print ShellExtension._reg_desc_, "unregistration complete."

 
def main(argv):
 from win32com.server import register
 register.UseCommandLine(ShellExtension,
       finalize_register = DllRegisterServer,
       finalize_unregister = DllUnregisterServer)

if __name__=='__main__':
 import sys
 main(sys.argv)

Für die Verwendung muss Python installiert sein (Empfehlung: 2.6) und passend zu der Python-Version PyWin32 (Empfehlung: 214.win32-py2.6)

Die Python-Datei in ein „kluges“ Verzeichnis legen (z.B. %ProgramFiles%\ccd‑verzeichnis\) und in der registry registrieren per doppelklick, oder über die Eingabeaufforderung mit ccd-verzeichnis.py --register. Wenn das ganze wieder entfernt werden soll, so geht dies nur über die Eingabeaufforderung mit ccd-verzeichnis.py --unregister.

Viel Spass.

Edits:
- Das ganze gibt's natürlich auch als Nautilus-Erweiterung...
- Vorlage für den Code war eine Beispiel-Anwendung des PyWin32-Projektes

CCD-Projekt Verzeichnisstruktur automatisiert erstellen

2010-07-24T03:07:00.000-07:00

Im „Clean Code Developer Camp“ bekam ich die Empfehlung, dass die Verzeichnisstruktur in einem Projekt (Entwicklungsverzeichnisse, keine Abrechnungen, Verträge oder so...) einheitlich sein sollte. Die Empfehlung war unter dem Toplevel die Folgenden Unterverzeichnisse:

bin - Alles, was erstellt wird (start.exe, ergänzung.dll, …) landet hier.
build - Hier findet sich das Buildskript um das Projekt komplett zu bauen
lib - 3rd-Party-Tools finden sich hier.
resources - Hier findet sich alles, was sonst noch benötigt wird um das fertige Projekt laufen zu lassen
source - Die Sourcen...

Da ich das Problem habe mir das nicht immer merken zu können und außerdem eine manuelle Anlage dieser Struktur immer Zeit kostet habe ich mir gedacht ich schreibe einfach mal eine Erweiterung für den Explorer, mit der Funktion diese Struktur in einem Verzeichnis zu erstellen.

Für den durchschnittlichen nicht-c-Programmierer ist das aber alles andere als einfach habe ich herausfinden müssen.
Meine Erste Idee war c#, mit P/Invoke... Das hat bisher nicht funktioniert wenn ich das zum Laufen bekomme, werde ich darüber berichten.
Der aktuelle Ansatz ist Python, mit PyWin32. Das scheint recht simpel.

Dateinamen bereinigen

2010-07-22T00:16:00.000-07:00

Meine Problemstellung gerade: Diverse Dateien in diversen Unterverzeichnissen haben "komische" Dateinamen und lassen sich unter Windows nicht entpacken...

Mein quick-Fix: Dateinamen bereinigen (natürlich unter Linux...) und alle nicht Standard Zeichen ersetzen.
In diesem Fall war es für mich ausreichend Buchstaben, Zahlen und den Punkt zu lassen, der Rest wurde durch Unterstriche ersetzt

Dafür verwendete ich folgendes Skript:

find -depth -name "* *" | while read file; do
   filePath="$(dirname "${file}")"
   oldFileName="$(basename "${file}")"
   newFileName=${oldFileName//[^a-zA-Z0-9\.]/_}
   mv "${filePath}"/"${oldFileName}" "${filePath}"/"${newFileName}"
done

Das ganze hat nur noch ein kleines Problem: Es funktioniert nicht für Dateinamen mit Leerzeichen am Ende des Dateinamens - hier muss das Skript verbessert werden, oder manuell nachgearbeitet.

bash Autovervollständigung die Zweite

2010-07-17T11:07:00.000-07:00

Gestern habe ich über die Autovervollständigung der bash geschrieben. Heute möchte ich kurz beschreiben wie ich das Verhalten verbessert habe.
Die noch fehlenden Funktionen waren:

Die Autovervollständigung von Verzeichnisnamen
Die Autovervollständigung von csv-Dateien in anderen Verzeichnissen als dem aktuellen.

Das Skript habe ich nun folgendermaßen abgeändert:

_csv2qif_possible_csvFiles()
{
   local curWord csvs optfiles
   curWord=${1}
   optfiles=""
   csvs=$( compgen -f -X "!*.csv" -- "${curWord}" )
   for file in ${csvs}; do
      if [ ! -f ${file/\.csv/.qif} ]; then
         optfiles="${optfiles} ${file}"
      fi
   done
   echo $optfiles
}

_csv2qif()
{
   local cur opts
   cur="${COMP_WORDS[COMP_CWORD]}"
   opts=$(_csv2qif_possible_csvFiles ${cur})

   COMPREPLY=( $(compgen -W "${opts}" -- ${cur}) )
   return 0
}

complete -o plusdirs -F _csv2qif csv2qif.py

In Zeile 25 wird die Funktion Nr. 2 (Autovervollständigung von Verzeichnisnamen) realisiert. Durch den Parameter -o plusdirs wird die Liste der Autovervollständigung um die möglichen Verzeichnisse erweitert.

In Zeile 6 wird die Funktion Nr. 1 (andere Verzeichnisse als das aktuelle) realisiert. Die bash „hat da schon etwas vorbereitet“: compgen -f -X "!*.csv" -- "${curWord}" Stellt eine Liste für die Autovervollständigung zusammen. Und zwar werden hier für den Parameter ${curWord} alle passenden Dateien (-f) mit der Endung .csv (-X "!*.csv") Aufgelistet. Dabei wird schon bedacht, dass der Parameter auf ein anderes Verzeichnis zeigen könnte...

Finde ich super.
Dieses Mal habe ich meine Inspiration in der bash-Referenz gefunden, unter Programmable-Completion.

bash Autovervollständigung

2010-07-16T09:52:00.000-07:00

Für ein bestimmtes Konto exportiere ich die Umsatzdaten aus dem Web-Frontend meiner Bank. Diese (merkwürdige) csv-Datei wandle ich dann in qif um, da GnuCash kein csv importiert (den verwendeten Konverter findet man im Archiv der GnuCash-De liste).
Da ich die cvs-Dateien und die qif-Dateien nebeneinander archiviere habe ich manchmal beim konvertieren das Problem, das ich nicht mehr so genau weiß, was es nun zu konvertieren gilt (bzw. welche csv-Dateien noch nicht konvertiert sind)....

Abhilfe habe ich mir von der programmierbaren Eingabe-Vervollständigung der Bash versprochen. Meine Idee: Für die Eingabe-Vervollständigung sollten nur csv-Dateien in Betracht kommen und hier auch nur diese, für die noch keine Datei mit Endung qif besteht. Gedacht, getippt:

_csv2qif_possible_csvFiles()
{
 local csvs optfiles
 optfiles=""
 csvs=$(find . -maxdepth 1 -iname "*.csv" | sed "s/\.\///g")
 for file in ${csvs}; do
  if [ ! -f ${file/\.csv/.qif} ]; then
   optfiles="${optfiles} ${file}"
  fi
 done
 echo $optfiles
}

_csv2qif()
{
 local cur opts
 cur="${COMP_WORDS[COMP_CWORD]}"
 opts=$(_csv2qif_possible_csvFiles)

 COMPREPLY=( $(compgen -W "${opts}" -- ${cur}) )
 return 0
}

complete -F _csv2qif csv2qif.py

Diese Datei beim Starten der Bash mit einlesen oder bei gentoo einfach in /etc/.bash_completion.d/ oder ${HOME}/.bash_completion.d/ kopieren und schon klappt's auch mit der Eingabe-Vervollständigung.
Geholfen hat mir übrigens die Debian-Einführung zu bash completion.

Screenshots finde ich bei Kommandozeilen-Tools immer nicht so toll, hier ist Trotzdem einer:

Als mögliche Verbesserung bleibt noch die Suche der csv-Dateien nicht nur auf das aktuelle Verzeichnis zu beschränken, sondern einen eingegebenen pfad (z.B.: ../csv/2010/Q3/) mit zu beachten, aber das hebe ich mir wohl mal für einen „Urlaub“ auf...

Edit: Eine verbesserte Version findet sich in: bash Autovervollstandigung die Zweite.

Webspace-Backup...

2010-07-06T12:02:00.000-07:00

Mir ist heute aufgefallen, dass die Sicherung meines webspace nicht so war wie ich es mir gewünscht hätte...

Das Problem war das löschen der nicht mehr benötigten Dateien. (Dinge, die nicht mehr auf dem Server sind brauche ich auch nicht in der Sicherung...)
Bisher hatte ich "wget --mirror ..." auf einem cron-job, nur leider schaufelt wget immer nur Daten dazu, löscht aber keine alten Daten.

Nach etwas Suchen habe ich das Backup nun auf lftp umgestellt. Dazu habe ich auch gleich eine Mail-Benachrichtigung im Fehlerfall realisiert.

Folgendes Skript läuft nun täglich:

#!/bin/bash
pushd $(dirname $0) > /dev/null

lftp -c "set ftp:list-options -a;
open -u user,pass ftp://server.dom.de;
lcd backup-dir;
mirror \
       --use-cache \
       --delete \
       --allow-chown \
       --allow-suid \
       --no-umask \
       --parallel=2 \
       --exclude .listing \
       --exclude .configs \
       --exclude atd \
       --log=../mirror.log" \
 2> error.log \
 > /dev/null

if [ "$?" -ne 0 ]; then
   cat > last.mail.eml <<EOF
Subject: BACKUP nils-andresen.de FEHLGESCHLAGEN !!!
X-Priority: 1
Importance: High

 ---- ERROR-LOG: ----
EOF
   cat error.log >> last.mail.eml
   cat >> last.mail.eml <<EOF

 ---- MIROR-LOG: ----
EOF
   cat mirror.log >> last.mail.eml
   /usr/sbin/sendmail -i nils < last.mail.eml
fi

popd > /dev/null

Die Mail wird nur „intern“ (an den Benutzer nils) versendet, für mich ist das aber ausreichend...

Auflistung aller Tabellen ohne PrimaryKey

2010-06-24T03:41:00.000-07:00

Für MS-Sql-Server:

select table_name 
from INFORMATION_SCHEMA.TABLES 
where 
 TABLE_NAME not in 
  (
   select distinct table_name 
   from INFORMATION_SCHEMA.TABLE_CONSTRAINTS 
   where CONSTRAINT_TYPE = 'PRIMARY KEY '
  )
 and TABLE_TYPE = 'BASE TABLE'

Kommentare eines Word-Dokumentes als Liste erstellen

2010-04-30T01:24:00.000-07:00

Mein aktuelles Problem: In einem recht großen Word-Dokument möchte ich alle Kommentarte überarbeiten.
Die aufkommende Fragestellung: Kann ich alle Kommentare eines Word-Dokumentes als Liste erstellen?

Eine kurze suche brachte mich zu http://word.tips.net/Pages/T001046_Printing_Comments.html. Das Ergebnis ist schon ganz brauchbar:

Sub KommentarlisteInNeuemDokument()
'
' KommentarlisteInNeuemDokument Makro
' Erstellt eine Liste aller Kommentare des aktuellen Dokumentes in ein neues Dokument.
'
    Dim oThisDoc As Document
    Dim oThatDoc As Document
    Dim c As Comment
    Dim sTemp As String
    Dim iPage As Integer

    Set oThisDoc = ActiveDocument
    Set oThatDoc = Documents.Add

    Application.ScreenUpdating = False
    For Each c In oThisDoc.Comments
        'Find page number of comment
        oThisDoc.Select
        c.Reference.Select
        iPage = Selection.Information(wdActiveEndAdjustedPageNumber)

        'Put info in new document
        oThatDoc.Select
        Selection.EndKey Unit:=wdStory
        sTemp = "Seite: " &amp; iPage
        Selection.TypeText Text:=sTemp
        Selection.TypeParagraph
        sTemp = "[" &amp; c.Initial &amp; c.Index &amp; "] " &amp; c.Range
        Selection.TypeText Text:=sTemp
        Selection.TypeParagraph
    Next
    Application.ScreenUpdating = True
End Sub

Vielleicht finde ich demnächst die Zeit das ganze etwas schöner zu gestalten.

Nachträglich OnDelete: Cascade im EF-Modell ?

2010-03-31T01:26:00.000-07:00

Ich hatte gerade auf einer bestehenden DB-Relation die "on update: Cascade" gesetzt, und daraufhin mein EF-Modell ge-updated.
Ein Blick in das edmx zeigte auch den erwarteten Eintrag im SSDL:

<Association Name="FK_Foo_Bar">
  <End Role="Bar" Type="FooBarModel.Store.Bar" Multiplicity="1">
 <OnDelete Action="Cascade" />
  </End>
  <End Role="Foo" Type="FooBarModel.Store.Foo" Multiplicity="*" />
  <ReferentialConstraint>
 <Principal Role="Bar">
   <PropertyRef Name="ID" />
 </Principal>
 <Dependent Role="Foo">
   <PropertyRef Name="BarId" />
 </Dependent>
  </ReferentialConstraint>
</Association>

Leider stellte sich die Gewünschte Funktionalität nicht ein: "A relationship is being added or deleted from an AssociationSet 'FK_foo_bar'. With cardinality constraints, a corresponding 'bar' must also be added or deleted."
Nach reichlich Ärger und ein wenig googeln war der Fehler schnell gefunden: das CSDL wird nicht automatisch mit angepasst.

Nachdem also im CSDL-Teil der edmx folgendes manuell ergänzt wurde:

<Association Name="FK_Foo_Bar">
  <End Role="Bar" Type="FooBarModel.Bar" Multiplicity="1">
 <OnDelete Action="Cascade" />
  </End>
  <End Role="Foo" Type="FooBarModel.Foo" Multiplicity="*" />
</Association>

Funktioniert auch das Löschen mit onDelete:cscade
Bleibt nur zu hoffen, dass sich die update-Funktionen des Designers im EF4 deutlich verbessert...

Geekfaktor…

2010-03-22T01:52:00.000-07:00

Bei Julie Lerman habe ich gerade gelesen, dass man seinen Geekfaktor messen lassen kann – das musste ich natürlich ausprobieren:

68% Geek

Neo-Layout und Geschwindigkeit zum Zweiten.

2010-03-11T01:45:00.000-08:00

Über das neo-Layout hatte ich ja bereits berichtet.
Ich bin mit meiner Geschwindigkeit immer noch nicht viel weiter...
26 Wörter

Aber dafür mit meiner Tastatur:

Problematisch ist an dem Ganzen, dass ich beim Arbeiten nicht "einfach" auf neo umstellen kann. (Man stelle sich einen Mitarbeiter vor, der nichts ahnend an meinen Rechner geht und etwas tippen will...)

Somit arbeite ich die meiste Zeit des Tages mit QWERTZ, bei längeren Texten schalte ich "heimlich" auf neo um (NeoVars sei Dank)...

NUnit im STA - Modus

2009-11-09T01:31:00.000-08:00

Neulich hatte ich die Anforderung, dass ein Programm Daten der Zwischenablage nutzen und modifizieren sollte. Ich habe (natürlich) angefangen einen Test zu schreiben. Leider war dies mit dem Unit-Test-Tool meiner Wahl (NUnit) nicht möglich. Der Fehler:

System.Threading.ThreadStateException: Der aktuelle Thread muss in den STA-Modus (Singlethreadapartment) gesetzt werden, bevor OLE-Aufrufe durchgeführt werden können.

Der Fehler tritt im Übrigen auch auf, wenn man versucht UserControls zu testen und sollte für WPF und WinForms gleich sein.
Die Lösung des Problems: NUnit-Tests im Single-Threaded Apartment (STA) statt in der Vorgabe (Multithreaded Apartment (MTA)) laufen lassen. Das Vorgehen: Man erstellt eine einfache app.config mit folgendem Inhalt:

<?xml version="1.0" encoding="utf-8"?>
<configuration>
    <configSections>
        <sectionGroup name="NUnit">
            <section name="TestRunner" type="System.Configuration.NameValueSectionHandler"/>
        </sectionGroup>
    </configSections>
    <NUnit>
        <TestRunner>
            <!-- Valid values are STA,MTA. Others ignored. -->
            <add key="ApartmentState" value="STA" />
            <!-- See ThreadPriority enum for other valid values -->
            <add key="ThreadPriority" value="Normal" />
        </TestRunner>
    </NUnit>
</configuration>

Damit läuft NUnit im STA, und die es kann auf die Zwischenablage zugegriffen werden.
Die Lösung habe ich von hier.

ReportPropertyChanged vs. OnPropertyChanged in Entities

2009-11-03T23:51:00.000-08:00

Gerade etwas länger mit folgender Fehlermeldung gerungen: System.ArgumentException: Die Eigenschaft 'Foo' weist keine gültige Entitätszuordnung für das Entitätsobjekt auf. Weitere Informationen finden Sie in der Dokumentation zu Entity Framework.
Der Fehler trat immer auf, wenn ich Foo einen wert zuweisen wollte.

Ursache des Fehlers war, das ich meinem eigenen Post über Zusammengesetzte Properties nicht gefolgt war, sondern statt dessen auf diversen Settern noch ReportPropertyChanged("Foo") programmiert hatte.
ReportPropertyChanged ist abernicht das gleiche wie OnPropertyChanged. ReportPropertyChanged scheint noch mehr zu tun und funktioniert daher nur auf Properties aus Enities mit Entitätszuordnung.
Nachdem ich den Fehler gefunden hatte machte die Fehlermeldung auf einmal auch viel mehr sinn.
Die Lösung des Problems war also einfach nicht ReportPropertyChanged zu benutzen, sondern OnPropertyChanged.
(Und bei dieser gelegenheit noch einmal mein Vorgehen in diesem Fall zu überdenken, und mich etwas mehr an meine eigenen Posts halten.)

BeforeSaveEvent in EntityFramework

2009-10-25T02:48:00.000-07:00

Neulich habe ich nach so etwas wie BeforeSave gesucht für meine Entities. Folgendes war meine Lösung (In einer partial class):

public partial class MyEntities
{
    partial void OnContextCreated()
    {
        this.SavingChanges += HandleSavingChanges;
    }

    private static void HandleSavingChanges(object sender, EventArgs e)
    {
        MyEntities context = (MyEntities) sender;
        //code....
    }
}

In meiner partial-Klasse kann ich keinen Konstruktor erstellen. (Jedenfalls keinen, der schon an anderer Stelle definiert wurde...) Daher verwende ich OnContextCreated. Dies ist eine Methode, die vom erzeugten Code ausgeführt wird. Hier hänge ich einfach einen Eventhandler an SavingChanges.

"Zusammengesetzte" Properties in EntityFramework

2009-10-02T08:30:00.000-07:00

Ich habe für EF-Objekte gerne mal "eigene" Properties in partial classes. Diese sind dann immer vonmindestens einer, gerne auch mehreren Properties der Entity abhängig.
Damit dann auch die richtigen PropertyChanged & -Changing Events erzeugt werden habe ich gerade folgendes gefunden: Alle Properties der EF-entities implementieren eine partial OnFooChanging bzw. OnFooChanged Methode, an die man sich in der partial class einfach "anhängen" kann. Etwa so:

public string MyTitle
{
   get
   {
      return this.Title;
   }
   set
   {
      this.Title = value;
   }
}

partial void OnTitleChanging(string unused)
{
   OnPropertyChanging("MyTitle");
}

partial void OnTitleChanged()
{
   OnPropertyChanged("MyTitle");
}

BTW: "Navigierbare Properties" (damit meine ich Properties in EF-Objekten, die auf andere EF-Objekte verweisen) lösen keinen PropertiyChanged Events aus. Hier findet sich ein kleiner Workaround dazu.

ValidationErrors in xaml Controls

2009-09-30T08:56:00.000-07:00

Validation auf xaml-controls findet man "überall" im Netz.. z.B. kann man das so machen:

<Binding Path="Person" 
         Mode="TwoWay">
 <Binding.ValidationRules>
  <ui:PersonValidationRule />
 </Binding.ValidationRules>
</Binding>

Nun habe ich aber keine möglichkeit auf einem Window sowas zu machen wie Window.ChildsHaveErrors(). Aus dieser Lage hilft das Folgende:

<Window [blah...]
  Validation.Error="ValidationError">

<Binding Path="Person" 
         Mode="TwoWay"
   NotifyOnValidationError="True">
    <Binding.ValidationRules>
        <ui:PersonValidationRule />
    </Binding.ValidationRules>
</Binding>

und im Code-Behind:

private int errorsInForm;
private void ValidationError(object sender, ValidationErrorEventArgs e)
{
   switch (e.Action)
   {
      case ValidationErrorEventAction.Added:
         this.errorsInForm++;
         break;
      case ValidationErrorEventAction.Removed:
         this.errorsInForm--;
         break;
   }
}
private bool WindowHasErrors
{
   get
   {
      return this.errorsInForm>0;
   }
}

Auf der Window-Deklaration im xaml den Validation.Error-Event setzten (Validation.Error ist übrigens eine "attached dependency property", sollte also auf fast allen Elementen funktionieren...)
Auf der Binding-Deklaration NotifyOnValidationError auf true setzen, damit wird der Fehler aus dem eigentlichen Element auf dem dieser entsteht hinaus "gebubbelt" (z.B. bis zum Window...)
Im Code-Behind, im ValidationError-EventHandler werden einfach die entstandenen Fehler gezählt (ValidationErrorEventAction.Removed ist ein "ehemaliger Fehler"...)
In WindowHasError wird dann nur noch geprüft, ob die aktuelle Zahl der Fehler größer ist als 0.

Meinungen dazu ?

VS2008 benötigt CLR-Typen von MS SQL 2008

2009-09-30T08:27:00.001-07:00

Ich habe leztens alles deinstalliert, das "*SQL*2008*" im Namen hatte, und meinen SQL-Server 2005 DeveloperED wieder installiert.
Ein paar Tage später musste ich feststellen, dass DB-Verbindungen mit meinem VS2008 nicht mehr möglich waren.Der Fehler war: "Could not load file or assembly: Microsoft.SqlServer.Management.Sdk.Sfc in Visual Studio 2008 Server Explorer"

Lange Rede, kurzer Sinn: VS2008 benötigt für die DB-Verbindungen:

Microsoft SQL Server 2008 Management Objects (SMO) und
Microsoft SQL Server System CLR Types

Beides gibts zum Download bei Microsoft.
Nachdem ich mir die Finger wund gesucht hatte um der Lösung auf die Schliche zu kommen habe ich auch diesen Post gefunden, der das gleiche Problem beschreibt.

Verschiedene Implementationen des selben Interfaces mit Unity "injecten"

2009-09-30T08:27:00.000-07:00

PersonRepository und VorgangRepository sind zwei Implementationen eines Interfaces: IRepoistory
Um nun meinen DBAdapter, der (natürlich IDBAdapter implementiert und) beide IRepositories als parameter (natürlich in der richtigen Reihenfolge...) benötigt (Ob das eine tolle Idee war sei mal dahin gestellt.) instanziieren zu können, habe ich folgendes gemacht:

IUnityContainer container = UnityContainerProvider.UnityContainer;
container.RegisterType<IDbAdapter, DbAdapter>();
container.RegisterType<IRepository, PersonRepository>("Person");
container.RegisterType<IRepository, VorgangRepository>("Vorgang");
container.Configure<InjectedMembers>().ConfigureInjectionFor<DbAdapter>(
 new InjectionConstructor(
  new ResolvedParameter<IRepository>("Person"),
  new ResolvedParameter<IRepository>("Vorgang")
  ));

Configure() - Ich will die Member der Injection steuern...
ConfigureInjectionFor() - auf den DBAdapter instanzen
new InjectionConstructor() - der Konstruktor soll gesteuert werden
new ResolvedParameter("Person") - IRepository soll mit dem Key "Person" aufgelöst werden.

Etwas störend finde ich die Notwendigkeit dies über zwei Strings zu steuern, also wenn jemand eine bessere Idee hat.. Immer her damit.

Edit: Etwas besser ist natürlich das IRepository noch zwei mal abzuleiten (wenn dies möglich ist...) einmal als
IPersonenRepository und einmal als IVorgangsRepository.