/etc/zsh/zshrc: update swspeak alias
[grml-etc-core.git] / etc / zsh / zshrc
1 # Filename:      zshrc
2 # Purpose:       config file for zsh (z shell)
3 # Authors:       grml-team (grml.org), (c) Michael Prokop <mika@grml.org>
4 # Bug-Reports:   see http://grml.org/bugs/
5 # License:       This file is licensed under the GPL v2.
6 # Latest change: Mit Mär 14 15:48:34 CET 2007 [mika]
7 ################################################################################
8 # This file is sourced only for interactive shells. It
9 # should contain commands to set up aliases, functions,
10 # options, key bindings, etc.
11 #
12 # Global Order: zshenv, zprofile, zshrc, zlogin
13 ################################################################################
14
15 # zsh profiling {{{
16 # just execute 'ZSH_PROFILE_RC=1 zsh' and run 'zprof' to get the details
17   if [[ -n $ZSH_PROFILE_RC ]] ; then
18      zmodload zsh/zprof
19   fi
20 # }}}
21
22 # {{{ check for version/system
23 # check for versions (compatibility reasons)
24   if autoload is-at-least && is-at-least 2>/dev/null ; then
25      is4() { is-at-least 4 }
26      is42() { is-at-least 4.2 }
27   else
28     is4(){
29       [[ $ZSH_VERSION == 4.* ]] && return 0
30       return 1
31     }
32     is42(){
33       [[ $ZSH_VERSION == 4.<2->* ]] && return 0
34       return 1
35     }
36   fi
37
38 # grml specific stuff
39   isgrml(){
40     [ -f /etc/grml_version ] && return 0
41     return 1
42   }
43
44   isgrmlcd(){
45     [ -f /etc/grml_cd ] && return 0
46     return 1
47   }
48
49   if isgrml ; then
50     isgrmlsmall() {
51     [[ ${${${(f)"$(</etc/grml_version)"}%% *}##*-} == 'small' ]] && return 0 ; return 1
52   }
53   else
54     isgrmlsmall() { return 1 }
55   fi
56
57   # are we running within an utf environment?
58   isutfenv() {
59     case "$LANG $CHARSET $LANGUAGE" in
60       *utf*) return 0 ;;
61       *UTF*) return 0 ;;
62       *)     return 1 ;;
63     esac
64   }
65
66 # check for user, if not running as root set $SUDO to sudo
67  (( EUID != 0 )) && SUDO='sudo' || SUDO=''
68
69 # change directory to home on first invocation of zsh
70 # important for rungetty -> autologin
71 # Thanks go to Bart Schaefer!
72   isgrml && checkhome() {
73   if [[ -z "$ALREADY_DID_CD_HOME" ]]; then
74      export ALREADY_DID_CD_HOME=$HOME
75      cd
76   fi
77   }
78 # }}}
79
80 # {{{ set some variables
81   export EDITOR=${EDITOR:-vim}
82   export MAIL=${MAIL:-/var/mail/$USER}
83   # if we don't set $SHELL then aterm, rxvt,.. will use /bin/sh or /bin/bash :-/
84   export SHELL='/bin/zsh'
85   [[ -f ~/.terminfo/m/mostlike ]] && MYLESS='LESS=C TERMINFO=~/.terminfo TERM=mostlike less' || MYLESS='less'
86   [[ -x /usr/bin/dircolors ]] && eval `dircolors -b`
87
88 # Search path for the cd comman
89 #  cdpath=(.. ~)
90
91 # Support our own site-functions
92   [ -d /etc/zsh/site-functions ] && FPATH=/etc/zsh/site-functions:$FPATH
93
94 # automatically remove duplicates from these arrays
95   typeset -U path cdpath fpath manpath
96 # }}}
97
98 # {{{ keybindings
99  if [[ "$TERM" != emacs ]]; then
100   [[ -z "$terminfo[kdch1]" ]] || bindkey -M emacs "$terminfo[kdch1]" delete-char
101   [[ -z "$terminfo[khome]" ]] || bindkey -M emacs "$terminfo[khome]" beginning-of-line
102   [[ -z "$terminfo[kend]"  ]] || bindkey -M emacs "$terminfo[kend]"  end-of-line
103   [[ -z "$terminfo[kdch1]" ]] || bindkey -M vicmd "$terminfo[kdch1]" vi-delete-char
104   [[ -z "$terminfo[khome]" ]] || bindkey -M vicmd "$terminfo[khome]" vi-beginning-of-line
105   [[ -z "$terminfo[kend]"  ]] || bindkey -M vicmd "$terminfo[kend]"  vi-end-of-line
106   [[ -z "$terminfo[cuu1]"  ]] || bindkey -M viins "$terminfo[cuu1]"  vi-up-line-or-history
107   [[ -z "$terminfo[cuf1]"  ]] || bindkey -M viins "$terminfo[cuf1]"  vi-forward-char
108   [[ -z "$terminfo[kcuu1]" ]] || bindkey -M viins "$terminfo[kcuu1]" vi-up-line-or-history
109   [[ -z "$terminfo[kcud1]" ]] || bindkey -M viins "$terminfo[kcud1]" vi-down-line-or-history
110   [[ -z "$terminfo[kcuf1]" ]] || bindkey -M viins "$terminfo[kcuf1]" vi-forward-char
111   [[ -z "$terminfo[kcub1]" ]] || bindkey -M viins "$terminfo[kcub1]" vi-backward-char
112   # ncurses stuff:
113   [[ "$terminfo[kcuu1]" == "\eO"* ]] && bindkey -M viins "${terminfo[kcuu1]/O/[}" vi-up-line-or-history
114   [[ "$terminfo[kcud1]" == "\eO"* ]] && bindkey -M viins "${terminfo[kcud1]/O/[}" vi-down-line-or-history
115   [[ "$terminfo[kcuf1]" == "\eO"* ]] && bindkey -M viins "${terminfo[kcuf1]/O/[}" vi-forward-char
116   [[ "$terminfo[kcub1]" == "\eO"* ]] && bindkey -M viins "${terminfo[kcub1]/O/[}" vi-backward-char
117   [[ "$terminfo[khome]" == "\eO"* ]] && bindkey -M viins "${terminfo[khome]/O/[}" beginning-of-line
118   [[ "$terminfo[kend]"  == "\eO"* ]] && bindkey -M viins "${terminfo[kend]/O/[}"  end-of-line
119   [[ "$terminfo[khome]" == "\eO"* ]] && bindkey -M emacs "${terminfo[khome]/O/[}" beginning-of-line
120   [[ "$terminfo[kend]"  == "\eO"* ]] && bindkey -M emacs "${terminfo[kend]/O/[}"  end-of-line
121 fi
122
123 ## keybindings (run 'bindkeys' for details, more details via man zshzle)
124 # use emacs style per default:
125   bindkey -e
126 # use vi style:
127 # bindkey -v
128
129 #if [[ "$TERM" == screen ]]; then
130   bindkey '\e[1~' beginning-of-line       # home
131   bindkey '\e[4~' end-of-line             # end
132   bindkey "^[[A"  up-line-or-search       # cursor up
133   bindkey "^[[B"  down-line-or-search     # <ESC>-
134   bindkey '^x'    history-beginning-search-backward # alternative ways of searching the shell history
135 # bindkey -s '^L' "|less\n"             # ctrl-L pipes to less
136 # bindkey -s '^B' " &\n"                # ctrl-B runs it in the background
137 # if terminal type is set to 'rxvt':
138   bindkey '\e[7~' beginning-of-line       # home
139   bindkey '\e[8~' end-of-line             # end
140 #fi
141
142 # insert unicode character
143 # usage example: 'ctrl-x i' 00A7 'ctrl-x i' will give you an §
144 # See for example http://unicode.org/charts/ for unicode characters code
145   autoload insert-unicode-char
146   zle -N insert-unicode-char
147   bindkey '^Xi' insert-unicode-char
148
149 # just type 'cd ...' to get 'cd ../..'
150 #  rationalise-dot() {
151 #  if [[ $LBUFFER = *.. ]]; then
152 #    LBUFFER+=/..
153 #  else
154 #    LBUFFER+=.
155 #  fi
156 #  }
157 #  zle -N rationalise-dot
158 #  bindkey . rationalise-dot
159
160 #  bindkey '\eq' push-line-or-edit
161 # }}}
162
163 # power completion - abbreviation expansion {{{
164 # power completion / abbreviation expansion / buffer expansion
165 # see http://zshwiki.org/home/examples/zleiab for details
166 # less risky than the global aliases but powerful as well
167 # just type the abbreviation key and afterwards ',.' to expand it
168   declare -A abk
169   setopt extendedglob
170   setopt interactivecomments
171   abk=(
172    # key  # value
173    'C'    '| wc -l'
174    '...' '../..'
175    '....' '../../..'
176    'BG' '& exit'
177    'C' '| wc -l'
178    'G' '|& grep --color=auto'
179    'H' '| head'
180    'Hl' ' --help |& less -r'
181    'L' '| less'
182    'LL' '|& less -r'
183    'M' '| most'
184    'N' '&>/dev/null'
185    'R' '| tr A-z N-za-m'
186    'SL' '| sort | less'
187    'S' '| sort -u'
188    'T' '| tail'
189    'V' '|& vim -'
190    'hide' "echo -en '\033]50;nil2\007'"
191    'tiny' 'echo -en "\033]50;-misc-fixed-medium-r-normal-*-*-80-*-*-c-*-iso8859-15\007"'
192    'small' 'echo -en "\033]50;6x10\007"'
193    'medium' 'echo -en "\033]50;-misc-fixed-medium-r-normal--13-120-75-75-c-80-iso8859-15\007"'
194    'default' 'echo -e "\033]50;-misc-fixed-medium-r-normal-*-*-140-*-*-c-*-iso8859-15\007"'
195    'large' 'echo -en "\033]50;-misc-fixed-medium-r-normal-*-*-150-*-*-c-*-iso8859-15\007"'
196    'huge' 'echo -en "\033]50;-misc-fixed-medium-r-normal-*-*-210-*-*-c-*-iso8859-15\007"'
197    'smartfont' 'echo -en "\033]50;-artwiz-smoothansi-*-*-*-*-*-*-*-*-*-*-*-*\007"'
198    'semifont' 'echo -en "\033]50;-misc-fixed-medium-r-semicondensed-*-*-120-*-*-*-*-iso8859-15\007"'
199    'da' 'du -sch'
200    'j' 'jobs -l'
201    'u' 'translate -i'
202    'co' "./configure && make && sudo make install"
203    'CH' "./configure --help"
204    'conkeror' 'firefox -chrome chrome://conkeror/content'
205    'dir' 'ls -lSrah'
206    'lad' $'ls -d .*(/)\n# only show dot-directories'
207    'lsa' $'ls -a .*(.)\n# only show dot-files'
208    'lss' $'ls -l *(s,S,t)\n# only files with setgid/setuid/sticky flag'
209    'lsl' $'ls -l *(@[1,10])\n# only symlinks'
210    'lsx' $'ls -l *(*[1,10])\n# only executables'
211    'lsw' $'ls -ld *(R,W,X.^ND/)\n# world-{readable,writable,executable} files'
212    'lsbig' $'ls -flh *(.OL[1,10])\n# display the biggest files'
213    'lsd' $'ls -d *(/)\n# only show directories'
214    'lse' $'ls -d *(/^F)\n# only show empty directories'
215    'lsnew' $'ls -rl *(D.om[1,10])\n# display the newest files'
216    'lsold' $'ls -rtlh *(D.om[-11,-1])\n # display the oldest files'
217    'lssmall' $'ls -Srl *(.oL[1,10])\n# display the smallest files'
218    'rw-' 'chmod 600'
219    '600' 'chmod u+rw-x,g-rwx,o-rwx'
220    'rwx' 'chmod u+rwx'
221    '700' 'chmod u+rwx,g-rwx,o-rwx'
222    'r--' 'chmod u+r-wx,g-rwx,o-rwx'
223    '644' $'chmod u+rw-x,g+r-wx,o+r-wx\n # 4=r,2=w,1=x'
224    '755' 'chmod u+rwx,g+r-w+x,o+r-w+x'
225    'md' 'mkdir -p '
226    'cmplayer' 'mplayer -vo -fs -zoom fbdev'
227    'fbmplayer' 'mplayer -vo -fs -zoom fbdev'
228    'fblinks' 'links2 -driver fb'
229    'insecssh' 'ssh -o "StrictHostKeyChecking=no" -o "UserKnownHostsFile=/dev/null"'
230    'fori' 'for i ({..}) { }'
231    'cx' 'chmod +x'
232    'e'  'print -l'
233    'se' 'setopt interactivecomments'
234    'va' 'valac --vapidir=../vapi/ --pkg=gtk+-2.0 gtktest.vala'
235    'fb2' '=mplayer -vo fbdev -fs -zoom 1>/dev/null -xy 2'
236    'fb3' '=mplayer -vo fbdev -fs  -zoom 1>/dev/null -xy 3'
237    'ci' 'centericq'
238    'D'  'export DISPLAY=:0.0'
239    'mp' 'mplayer -vo xv -fs -zoom'
240   )
241
242   globalias () {
243         local MATCH
244         matched_chars='[.-|_a-zA-Z0-9]#'
245         LBUFFER=${LBUFFER%%(#m)[.-|_a-zA-Z0-9]#}
246         LBUFFER+=${abk[$MATCH]:-$MATCH}
247   }
248
249   zle -N globalias
250   bindkey ",." globalias
251 # }}}
252
253 # {{{ autoloading
254   autoload -U zmv    # who needs mmv or rename?
255   autoload history-search-end
256
257   # we don't want to quote/espace URLs on our own...
258   if autoload -U url-quote-magic ; then
259      zle -N self-insert url-quote-magic
260   else
261      print 'Notice: no url-quote-magic available :('
262   fi
263
264   alias run-help >&/dev/null && unalias run-help
265   autoload run-help # use via 'esc-h'
266
267 # completion system
268   if autoload -U compinit && compinit 2>/dev/null ; then
269      compinit 2>/dev/null || print 'Notice: no compinit available :('
270    else
271      print 'Notice: no compinit available :('
272      function zstyle { }
273      function compdef { }
274   fi
275
276   is4 && autoload -U zed                  # use ZLE editor to edit a file or function
277
278   is4 && for mod in complist deltochar mathfunc ; do
279              zmodload -i zsh/${mod} 2>/dev/null || print "Notice: no ${mod} available :("
280          done
281
282 # autoload zsh modules when they are referenced
283   is4 && for opt mod in a  stat    \
284                         a  zpty    \
285                         ap zprof   \
286                         ap mapfile ; do
287              zmodload -${opt} zsh/${mod} ${mod}
288          done ; unset opt mod
289
290   is4 && autoload -U insert-files && \
291   zle -N insert-files && \
292   bindkey "^Xf" insert-files # C-x-f
293
294   bindkey ' '   magic-space    # also do history expansion on space
295   bindkey '\ei' menu-complete  # menu completion via esc-i
296
297 # press esc-e for editing command line in $EDITOR or $VISUAL
298   is4 && autoload -U edit-command-line && \
299   zle -N edit-command-line && \
300   bindkey '\ee' edit-command-line
301
302 # menu selection: pick item but stay in the menu (press esc-return)
303   is4 && bindkey -M menuselect '\e^M' accept-and-menu-complete
304
305 # press "ctrl-e d" to insert the actual date in the form yyyy-mm-dd
306   _bkdate() { BUFFER="$BUFFER$(date '+%F')"; CURSOR=$#BUFFER; }
307   bindkey '\C-ed' _bkdate
308   zle -N _bkdate
309
310 # press esc-m for inserting last typed word again (thanks to caphuso!)
311   insert-last-typed-word() { zle insert-last-word -- 0 -1 }; \
312   zle -N insert-last-typed-word; bindkey "\em" insert-last-typed-word
313
314 # set command prediction from history, see 'man 1 zshcontrib'
315 #  is4 && autoload -U predict-on && \
316 #  zle -N predict-on         && \
317 #  zle -N predict-off        && \
318 #  bindkey "^X^Z" predict-on && \
319 #  bindkey "^Z" predict-off
320
321 # put job into foreground via ctrl-z:
322   bindkey -s '^z' "fg\n"
323
324 # press ctrl-q to quote line:
325 #  mquote () {
326 #        zle beginning-of-line
327 #        zle forward-word
328 #        # RBUFFER="'$RBUFFER'"
329 #        RBUFFER=${(q)RBUFFER}
330 #        zle end-of-line
331 #  }
332 #  zle -N mquote && bindkey '^q' mquote
333
334 # run command line as user root via sudo:
335   _sudo-command-line() {
336     [[ $BUFFER != sudo\ * ]] && LBUFFER="sudo $LBUFFER"
337   }
338   zle -N sudo-command-line _sudo-command-line
339   bindkey "^Os" sudo-command-line
340 # }}}
341
342 # {{{ set some important options
343   (( EUID != 0 )) && umask 002 || umask 022
344
345 # history:
346   setopt append_history       # append history list to the history file (important for multiple parallel zsh sessions!)
347   is4 && setopt SHARE_HISTORY # import new commands from the history file also in other zsh-session
348   setopt extended_history     # save each command's beginning timestamp and the duration to the history file
349   is4 && setopt histignorealldups # If  a  new  command  line being added to the history
350                               # list duplicates an older one, the older command is removed from the list
351   setopt histignorespace      # remove command lines from the history list when
352                               # the first character on the line is a space
353 #  setopt histallowclobber    # add `|' to output redirections in the history
354 #  setopt NO_clobber          # warning if file exists ('cat /dev/null > ~/.zshrc')
355   setopt auto_cd              # if a command is issued that can't be executed as a normal command,
356                               # and the command is the name of a directory, perform the cd command to that directory
357   setopt extended_glob        # in order to use #, ~ and ^ for filename generation
358                               # grep word *~(*.gz|*.bz|*.bz2|*.zip|*.Z) ->
359                               # -> searches for word not in compressed files
360                               # don't forget to quote '^', '~' and '#'!
361   setopt notify               # report the status of backgrounds jobs immediately
362   setopt hash_list_all        # Whenever a command completion is attempted, make sure \
363                               # the entire command path is hashed first.
364   setopt completeinword       # not just at the end
365 # setopt nocheckjobs          # don't warn me about bg processes when exiting
366   setopt nohup                # and don't kill them, either
367 # setopt printexitvalue       # alert me if something failed
368 # setopt dvorak               # with spelling correction, assume dvorak kb
369   setopt auto_pushd           # make cd push the old directory onto the directory stack.
370   setopt nonomatch            # try to avoid the 'zsh: no matches found...'
371   setopt nobeep               # avoid "beep"ing
372
373   MAILCHECK=30       # mailchecks
374   REPORTTIME=5       # report about cpu-/system-/user-time of command if running longer than 5 secondes
375   watch=(notme root) # watch for everyone but me and root
376
377 # define word separators (for stuff like backward-word, forward-word, backward-kill-word,..)
378 #  WORDCHARS='*?_-.[]~=/&;!#$%^(){}<>' # the default
379 #  WORDCHARS=.
380 #  WORDCHARS='*?_[]~=&;!#$%^(){}'
381 #  WORDCHARS='${WORDCHARS:s@/@}'
382
383 # only slash should be considered as a word separator:
384   slash-backward-kill-word() {
385     local WORDCHARS="${WORDCHARS:s@/@}"
386     # zle backward-word
387     zle backward-kill-word
388   }
389   zle -N slash-backward-kill-word
390   bindkey '\ev' slash-backward-kill-word # press esc-v to delete a word until its last '/' (not the same as ctrl-w!)
391 # }}}
392
393 # {{{ history
394   export ZSHDIR=$HOME/.zsh
395   HISTFILE=$HOME/.zsh_history
396   isgrmlcd && HISTSIZE=500  || HISTSIZE=5000
397   isgrmlcd && SAVEHIST=1000 || SAVEHIST=10000 # useful for setopt append_history
398 # }}}
399
400 # dirstack handling {{{
401   DIRSTACKSIZE=20
402   if [[ -f ~/.zdirs ]] && [[ ${#dirstack[*]} -eq 0 ]]; then
403      dirstack=( ${(uf)"$(< ~/.zdirs)"} )
404      # "cd -" won't work after login by just setting $OLDPWD, so
405      cd $dirstack[0] && cd $OLDPWD
406   fi
407   chpwd() {
408     builtin dirs -pl >! ~/.zdirs
409   }
410 # }}}
411
412 # {{{ display battery status on right side of prompt via running 'BATTERY=1 zsh'
413   if [ -n "$BATTERY" ] ; then
414      if [ -x $(which acpi) ] ; then
415         PERCENT="${(C)${(s| |)$(acpi 2>/dev/null)}[4]}"
416         [ -z "$PERCENT" ] && PERCENT='acpi not present'
417         if [ "${PERCENT%%%}" -lt 20 ] ; then
418            PERCENT="warning: ${PERCENT}%"
419         fi
420      fi
421   fi
422 # }}}
423
424 # {{{ set prompt
425   if autoload promptinit && promptinit 2>/dev/null ; then
426      promptinit # people should be able to use their favourite prompt
427   else
428      print 'Notice: no promptinit available :('
429   fi
430
431 # precmd() => a function which is executed just before each prompt
432 # use 'NOPRECMD=1' to disable the precmd + preexec commands
433
434   # precmd () { setopt promptsubst; [[ -o interactive ]] && jobs -l;
435
436   is4 && [[ -z $NOPRECMD ]] && precmd () {
437       [[ -n $NOPRECMD ]] && return 0
438       # just use DONTSETRPROMPT=1 to be able to overwrite RPROMPT
439       if [[ -z ${DONTSETRPROMPT} ]] ; then
440         if [ -n "$BATTERY" ] ; then
441           # RPROMPT="%(?..:()% ${PERCENT}${SCREENTITLE}"
442           RPROMPT="${PERCENT}${SCREENTITLE}"
443         else
444           # RPROMPT="%(?..:()% ${SCREENTITLE}"
445           RPROMPT="${SCREENTITLE}"
446         fi
447       fi
448       # adjust title of xterm
449       # see http://www.faqs.org/docs/Linux-mini/Xterm-Title.html
450       case $TERM in (xterm*|rxvt)
451         print -Pn "\e]0;%n@%m: %~\a"
452         ;;
453       esac
454   }
455
456 # chpwd () => a function which is executed whenever the directory is changed
457
458 # preexec() => a function running before every command
459   is4 && [[ -z $NOPRECMD ]] && preexec () {
460       [[ -n $NOPRECMD ]] && return 0
461   # set hostname if not running on host with name 'grml'
462       local HOSTNAME=$(hostname)
463       if [[ "$HOSTNAME" != grml ]] ; then
464          NAME="@$HOSTNAME"
465       fi
466   # get the name of the program currently running and hostname of local machine
467   # set screen window title if running in a screen
468       if [[ "$TERM" == screen* ]]; then
469           # local CMD=${1[(wr)^(*=*|sudo|ssh|-*)]}       # dont't use hostname
470           local CMD="${1[(wr)^(*=*|sudo|ssh|-*)]}$NAME" # use hostname
471           echo -ne "\ek$CMD\e\\"
472       fi
473   # set the screen title to "zsh" when sitting at the command prompt:
474       if [[ "$TERM" == screen* ]]; then
475            SCREENTITLE=$'%{\ekzsh\e\\%}'
476       else
477            SCREENTITLE=''
478       fi
479   # adjust title of xterm
480       case $TERM in (xterm*|rxvt)
481         print -Pn "\e]0;%n@%m: $1\a"
482         ;;
483       esac
484   }
485
486 # set colors
487   if autoload colors && colors 2>/dev/null ; then
488      BLUE="%{${fg[blue]}%}"
489      RED="%{${fg_bold[red]}%}"
490      GREEN="%{${fg[green]}%}"
491      CYAN="%{${fg[cyan]}%}"
492      WHITE="%{${fg[white]}%}"
493      NO_COLOUR="%{${reset_color}%}"
494   else
495      BLUE="%{\e[1;34m%}"
496      RED="%{\e[1;31m%}"
497      GREEN="%{\e[1;32m%}"
498      CYAN="%{\e[1;36m%}"
499      WHITE="%{\e[1;37m%}"
500      NO_COLOUR="%{\e[0m%}"
501   fi
502
503   EXITCODE="%(?..%?%1v )"
504   PS2='`%_> '       # secondary prompt, printed when the shell needs more information to complete a command.
505   PS3='?# '         # selection prompt used within a select loop.
506   PS4='+%N:%i:%_> ' # the execution trace prompt (setopt xtrace). default: '+%N:%i>'
507
508   # set variable debian_chroot if running in a chroot with /etc/debian_chroot
509   if [ -z "$debian_chroot" ] && [ -r /etc/debian_chroot ]; then
510     debian_chroot=$(cat /etc/debian_chroot)
511   fi
512
513   # don't use colors on dumb terminals (like emacs):
514   if [[ "$TERM" == dumb ]] ; then
515     PROMPT="${EXITCODE}${debian_chroot:+($debian_chroot)}%n@%m %40<...<%B%~%b%<< %# "
516   else
517     # only if $GRMLPROMPT is set (e.g. via 'GRMLPROMPT=1 zsh') use the extended prompt
518     # set variable identifying the chroot you work in (used in the prompt below)
519     if [[ -n "$GRMLPROMPT" ]]; then
520       PROMPT="${RED}${EXITCODE}${CYAN}[%j running job(s)] ${GREEN}{history#%!} ${RED}%(3L.+.) ${BLUE}%* %D
521 ${BLUE}%n${NO_COLOUR}@%m %40<...<%B%~%b%<< %# "
522     else
523       if (( EUID != 0 )); then
524         PROMPT="${RED}${EXITCODE}${WHITE}${debian_chroot:+($debian_chroot)}${BLUE}%n${NO_COLOUR}@%m %40<...<%B%~%b%<< %# " # primary prompt string
525       else
526         PROMPT="${BLUE}${EXITCODE}${WHITE}${debian_chroot:+($debian_chroot)}${RED}%n${NO_COLOUR}@%m %40<...<%B%~%b%<< %# " # primary prompt string
527       fi
528     fi
529   fi
530
531   # if we are inside a grml-chroot set a specific prompt theme
532   if [ -n "$GRML_CHROOT" ] ; then
533      PROMPT="%{$fg[red]%}(CHROOT) %{$fg_bold[red]%}%n%{$fg_no_bold[white]%}@%m %40<...<%B%~%b%<< %\# "
534   fi
535 # }}}
536
537 # {{{ 'hash' some often used directories
538   hash -d deb=/var/cache/apt/archives
539   hash -d doc=/usr/share/doc
540   hash -d linux=/lib/modules/$(command uname -r)/build/
541   hash -d log=/var/log
542   hash -d slog=/var/log/syslog
543   hash -d src=/usr/src
544   hash -d templ=/usr/share/doc/grml-templates
545   hash -d tt=/usr/share/doc/texttools-doc
546   hash -d www=/var/www
547 # }}}
548
549 # {{{ some aliases
550   if [ $UID = 0 ] ; then
551      [ -r /etc/grml/screenrc ] && alias screen='/usr/bin/screen -c /etc/grml/screenrc'
552   elif [ -r $HOME/.screenrc ] ; then
553      alias screen="/usr/bin/screen -c $HOME/.screenrc"
554   else
555      [ -r /etc/grml/screenrc_grml ] && alias screen='/usr/bin/screen -c /etc/grml/screenrc_grml'
556   fi
557
558   if ls --help 2>/dev/null |grep -- --color= >/dev/null && [ "$TERM" != dumb ] ; then
559      alias ls='ls -b -CF --color=auto' # do we have GNU ls with color-support?
560      alias la='ls -la --color=auto'
561      alias ll='ls -l --color=auto'
562      alias lh='ls -hAl --color=auto'
563      alias l='ls -lF --color=auto'
564   else
565      alias ls='ls -b -CF'
566      alias la='ls -la'
567      alias ll='ls -l'
568      alias lh='ls -hAl'
569      alias l='ls -lF'
570   fi
571
572   alias cp='nocorrect cp'         # no spelling correction on cp
573   alias mkdir='nocorrect mkdir'   # no spelling correction on mkdir
574   alias mv='nocorrect mv'         # no spelling correction on mv
575   alias rm='nocorrect rm'         # no spelling correction on rm
576
577   alias rd='rmdir'
578   alias md='mkdir'
579
580 # set up software synthesizer via speakup
581   alias swspeak='
582     aumix -w 90 -v 90 -p 90 -m 90
583     if ! [ -r /dev/softsynth ] ; then
584        flite -o play -t "Sorry, software synthesizer not available. Did you boot with swspeak bootoption?"
585        return 1
586     else
587        setopt singlelinezle
588        unsetopt prompt_cr
589        export PS1="%m%# "
590        nice -n -20 speechd-up
591        flite -o play -t "Finished setting up software synthesizer"
592     fi
593   '
594
595   # I like clean prompt, so provide simple way to get that
596   alias 0 &>/dev/null || functions 0 &>/dev/null || alias 0='return 0'
597
598 # truecrypt; use e.g. via 'truec /dev/ice /mnt/ice' or 'truec -i'
599   if [ -x /usr/sbin/truecrypt ] ; then
600      if isutfenv ; then
601         alias truec='truecrypt --mount-options "rw,sync,dirsync,users,uid=1000,gid=users,umask=077,utf8" '
602      else
603         alias truec='truecrypt --mount-options "rw,sync,dirsync,users,uid=1000,gid=users,umask=077" '
604      fi
605   fi
606
607   zsh-help(){print "$bg[white]$fg[black]
608 zsh-help - hints for use of zsh on grml
609 =======================================$reset_color
610
611 Main configuration of zsh happens in /etc/zsh/zshrc (global)
612 and /etc/skel/.zshrc which is copied to \$HOME/.zshrc once.
613 The files are part of the package grml-etc-core, if you want to
614 use them on a non-grml-system just get the tar.gz from
615 http://deb.grml.org/ or get the files from the mercurial
616 repository:
617
618   http://hg.grml.org/grml-etc-core/raw-file/tip/etc/skel/.zshrc
619   http://hg.grml.org/grml-etc-core/raw-file/tip/etc/zsh/zshrc
620
621 If you want to stay in sync with zsh configuration of grml
622 run 'ln -sf /etc/skel/.zshrc \$HOME/.zshrc' and configure
623 your own stuff in \$HOME/.zshrc.local. System wide configuration
624 without touching configuration files of grml can take place
625 in /etc/zsh/zshrc.local.
626
627 If you want to use the configuration of user grml also when
628 running as user root just run 'zshskel' which will source
629 the file /etc/skel/.zshrc.
630
631 For information regarding zsh start at http://grml.org/zsh/
632
633 Take a look at grml's zsh refcard:
634 % xpdf =(zcat /usr/share/doc/grml-docs/zsh/grml-zsh-refcard.pdf.gz)
635
636 Check out the main zsh refcard:
637 % $BROWSER http://www.bash2zsh.com/zsh_refcard/refcard.pdf
638
639 And of course visit the zsh-lovers:
640 % man zsh-lovers
641
642 You can adjust some options through environment variables when
643 invoking zsh without having to edit configuration files.
644 Basically meant for bash users who are not used to the power of
645 the zsh yet. :)
646
647   \"NOCOR=1    zsh\" => deactivate automatic correction
648   \"NOMENU=1   zsh\" => do not use menu completion (note: use strg-d for completion instead!)
649   \"NOPRECMD=1 zsh\" => disable the precmd + preexec commands (set GNU screen title)
650   \"BATTERY=1  zsh\" => activate battery status (via acpi) on right side of prompt
651 $bg[white]$fg[black]
652 Please report wishes + bugs to the grml-team: http://grml.org/bugs/
653 Enjoy your grml system with the zsh!$reset_color"
654 }
655
656 # debian stuff
657   if [ -r /etc/debian_version ] ; then
658     alias acs='apt-cache search'
659     alias acsh='apt-cache show'
660     alias acp='apt-cache policy'
661     alias adg="$SUDO apt-get dist-upgrade"
662     alias agi="$SUDO apt-get install"
663     alias ag="$SUDO apt-get upgrade"
664     alias au="$SUDO apt-get update"
665     alias dbp='dpkg-buildpackage'
666     alias ge='grep-excuses'
667
668     # debian upgrade
669     upgrade () {
670       if [ -z "$1" ] ; then
671           $SUDO apt-get update
672           $SUDO apt-get -u upgrade
673       else
674           ssh $1 $SUDO apt-get update
675           # ask before the upgrade
676           local dummy
677           ssh $1 $SUDO apt-get --no-act upgrade
678           echo -n 'Process the upgrade?'
679           read -q dummy
680           if [[ $dummy == "y" ]] ; then
681               ssh $1 $SUDO apt-get -u upgrade --yes
682           fi
683       fi
684     }
685
686     isgrmlcd && alias su="sudo su"          # change to user root
687     alias tlog="tail -f /var/log/syslog"    # take a look at the syslog
688     alias zshskel="source /etc/skel/.zshrc" # source skeleton zshrc
689   fi
690
691 # sort installed Debian-packages by size
692   if [ -x /usr/bin/grep-status ] ; then
693      alias debs-by-size='grep-status -FStatus -sInstalled-Size,Package \
694                 -n "install ok installed" | paste -sd "  \n" | sort -rn'
695   fi
696
697 # if cdrecord is a symlink (to wodim) or isn't present at all warn:
698   if [ -L /usr/bin/cdrecord -o ! -x $(which cdrecord) ] ; then
699      if [ -x $(which wodim) ] ; then
700         alias cdrecord="echo 'cdrecord is not provided under its original name by Debian anymore.
701 See #377109 in the BTS of Debian for more details.
702
703 Please use the wodim binary instead' ; return 1"
704      fi
705   fi
706
707 # I hate lacking backward compability, so provide an alternative therefore
708   if ! [ -x /usr/sbin/apache2-ssl-certificate ] ; then
709    function apache2-ssl-certificate(){
710
711      print 'Debian does not ship apache2-ssl-certificate anymore (see #398520). :('
712      print 'You might want to take a look at Debian the package ssl-cert as well.'
713      print 'To generate a certificate for use with apache2 follow the instructions:'
714
715      echo '
716
717 export RANDFILE=/dev/random
718 mkdir /etc/apache2/ssl/
719 openssl req $@ -new -x509 -days 365 -nodes -out /etc/apache2/ssl/apache.pem -keyout /etc/apache2/ssl/apache.pem
720 chmod 600 /etc/apache2/ssl/apache.pem
721
722 Run "grml-tips ssl-certificate" if you need further instructions.
723 '
724    }
725   fi
726 # }}}
727
728 # {{{ Use hard limits, except for a smaller stack and no core dumps
729   unlimit
730   limit stack 8192
731   isgrmlcd && limit core 0 # important for a live-cd-system
732   limit -s
733 # }}}
734
735 # {{{ completion stuff
736
737 # Where to look for autoloaded function definitions
738   if [ -d /etc/zsh/completion.d ] ; then
739     local comp=/etc/zsh/completion.d
740     for func in $comp/*(N-.:t); . ${comp}/${func}
741   fi
742
743 # called later (via is4 && grmlcomp)
744 # notice: use 'zstyle' for getting current settings
745 #         press ^Xh (control-x h) for getting tags in context; ^X? (control-x ?) to run complete_debug with trace output
746 grmlcomp() {
747 ## completion system
748   zstyle ':completion:*:approximate:'    max-errors 'reply=( $((($#PREFIX+$#SUFFIX)/3 )) numeric )' # allow one error for every three characters typed in approximate completer
749   zstyle ':completion:*:complete:-command-::commands' ignored-patterns '*\~' # don't complete backup files as executables
750   zstyle ':completion:*:correct:*'       insert-unambiguous true             # start menu completion only if it could find no unambiguous initial string
751   zstyle ':completion:*:corrections'     format $'%{\e[0;31m%}%d (errors: %e)%{\e[0m%}' #
752   zstyle ':completion:*:correct:*'       original true                       #
753   zstyle ':completion:*:default'         list-colors ${(s.:.)LS_COLORS}      # activate color-completion(!)
754   zstyle ':completion:*:descriptions'    format $'%{\e[0;31m%}completing %B%d%b%{\e[0m%}'  # format on completion
755   zstyle ':completion:*:*:cd:*:directory-stack' menu yes select              # complete 'cd -<tab>' with menu
756   zstyle ':completion:*:expand:*'        tag-order all-expansions            # insert all expansions for expand completer
757   zstyle ':completion:*:history-words'   list false                          #
758   zstyle ':completion:*:history-words'   menu yes                            # activate menu
759   zstyle ':completion:*:history-words'   remove-all-dups yes                 # ignore duplicate entries
760   zstyle ':completion:*:history-words'   stop yes                            #
761   zstyle ':completion:*'                 matcher-list 'm:{a-z}={A-Z}'        # match uppercase from lowercase
762   zstyle ':completion:*:matches'         group 'yes'                         # separate matches into groups
763   zstyle ':completion:*'                 group-name ''
764   if [[ -z "$NOMENU" ]] ; then
765     zstyle ':completion:*'               menu select=5                       # if there are more than 5 options allow selecting from a menu
766   else
767     setopt no_auto_menu # don't use any menus at all
768   fi
769   zstyle ':completion:*:messages'        format '%d'                         #
770   zstyle ':completion:*:options'         auto-description '%d'               #
771   zstyle ':completion:*:options'         description 'yes'                   # describe options in full
772   zstyle ':completion:*:processes'       command 'ps -au$USER'               # on processes completion complete all user processes
773   zstyle ':completion:*:*:-subscript-:*' tag-order indexes parameters        # offer indexes before parameters in subscripts
774   zstyle ':completion:*'                 verbose true                        # provide verbose completion information
775   zstyle ':completion:*:warnings'        format $'%{\e[0;31m%}No matches for:%{\e[0m%} %d' # set format for warnings
776   zstyle ':completion:*:*:zcompile:*'    ignored-patterns '(*~|*.zwc)'       # define files to ignore for zcompile
777   zstyle ':completion:correct:'          prompt 'correct to: %e'             #
778   zstyle ':completion::(^approximate*):*:functions' ignored-patterns '_*'    # Ignore completion functions for commands you don't have:
779
780 # complete manual by their section
781   zstyle ':completion:*:manuals'    separate-sections true
782   zstyle ':completion:*:manuals.*'  insert-sections   true
783   zstyle ':completion:*:man:*'      menu yes select
784
785 ## correction
786 # run rehash on completion so new installed program are found automatically:
787   _force_rehash() {
788       (( CURRENT == 1 )) && rehash
789          return 1 # Because we didn't really complete anything
790     }
791 # some people don't like the automatic correction - so run 'NOCOR=1 zsh' to deactivate it
792   if [[ -n "$NOCOR" ]] ; then
793     zstyle ':completion:*' completer _oldlist _expand _force_rehash _complete
794     setopt nocorrect # do not try to correct the spelling if possible
795   else
796 #    zstyle ':completion:*' completer _oldlist _expand _force_rehash _complete _correct _approximate
797     setopt correct  # try to correct the spelling if possible
798     zstyle -e ':completion:*' completer '
799         if [[ $_last_try != "$HISTNO$BUFFER$CURSOR" ]]; then
800           _last_try="$HISTNO$BUFFER$CURSOR"
801           reply=(_complete _match _prefix)
802         else
803           if [[ $words[1] = (rm|mv) ]]; then
804             reply=(_complete)
805           else
806             reply=(_oldlist _expand _force_rehash _complete _correct _approximate)
807           fi
808         fi'
809   fi
810 # zstyle ':completion:*' completer _complete _correct _approximate
811 # zstyle ':completion:*' expand prefix suffix
812
813 # automatic rehash? Credits go to Frank Terbeck
814 # function my_accept () {
815 #   local buf
816 #   [[ -z ${BUFFER} ]] && zle accept-line && return
817 #   buf=( ${(z)BUFFER}  )
818 #   [[ -z ${commands[${buf[1]}]} ]] && rehash
819 #   zle accept-line
820 # }
821 # zle -N my_accept
822 # bindkey "^M" my_accept
823
824 # command for process lists, the local web server details and host completion
825   zstyle ':completion:*:urls' local 'www' '/var/www/' 'public_html'
826
827 # caching
828   [ -d $ZSHDIR/cache ] && zstyle ':completion:*' use-cache yes && \
829                           zstyle ':completion::complete:*' cache-path $ZSHDIR/cache/
830
831 # host completion /* add brackets as vim can't parse zsh's complex cmdlines 8-) {{{ */
832   if is42 ; then
833     [ -r ~/.ssh/known_hosts ] && _ssh_hosts=(${${${${(f)"$(<$HOME/.ssh/known_hosts)"}:#[\|]*}%%\ *}%%,*}) || _ssh_hosts=()
834     [ -r /etc/hosts ] && : ${(A)_etc_hosts:=${(s: :)${(ps:\t:)${${(f)~~"$(</etc/hosts)"}%%\#*}##[:blank:]#[^[:blank:]]#}}} || _etc_hosts=()
835   else
836     _ssh_hosts=()
837     _etc_hosts=()
838   fi
839   hosts=(
840       `hostname`
841       "$_ssh_hosts[@]"
842       "$_etc_hosts[@]"
843       grml.org
844       localhost
845   )
846   zstyle ':completion:*:hosts' hosts $hosts
847 #  zstyle '*' hosts $hosts
848
849 # specify your logins:
850 # my_accounts=(
851 #  {grml,grml1}@foo.invalid
852 #  grml-devel@bar.invalid
853 # )
854 # other_accounts=(
855 #  {fred,root}@foo.invalid
856 #  vera@bar.invalid
857 # )
858 # zstyle ':completion:*:my-accounts' users-hosts $my_accounts
859 # zstyle ':completion:*:other-accounts' users-hosts $other_accounts
860
861 # specify specific port/service settings:
862 #  telnet_users_hosts_ports=(
863 #    user1@host1:
864 #    user2@host2:
865 #    @mail-server:{smtp,pop3}
866 #    @news-server:nntp
867 #    @proxy-server:8000
868 #  )
869 # zstyle ':completion:*:*:telnet:*' users-hosts-ports $telnet_users_hosts_ports
870
871 # use generic completion system for programs not yet defined:
872   compdef _gnu_generic tail head feh cp mv df stow uname ipacsum fetchipac
873
874 # see upgrade function in this file
875   compdef _hosts upgrade
876 }
877 # }}}
878
879 # {{{ grmlstuff
880 grmlstuff() {
881 # people should use 'grml-x'!
882   function startx() {
883     if [ -e /etc/X11/xorg.conf ] ; then
884        [ -x /usr/bin/startx ] && /usr/bin/startx || /usr/X11R6/bin/startx
885     else
886       echo "Please use the script \"grml-x\" for starting the X Window System
887 because there does not exist /etc/X11/xorg.conf yet.
888 If you want to use startx anyway please call \"/usr/bin/startx\"."
889       return -1
890     fi
891   }
892
893   function xinit() {
894     if [ -e /etc/X11/xorg.conf ] ; then
895        [ -x /usr/bin/xinit ] && /usr/bin/xinit || /usr/X11R6/bin/xinit
896     else
897       echo "Please use the script \"grml-x\" for starting the X Window System.
898 because there does not exist /etc/X11/xorg.conf yet.
899 If you want to use xinit anyway please call \"/usr/bin/xinit\"."
900       return -1
901     fi
902   }
903
904   if [ -x /usr/sbin/915resolution ] ; then
905      alias 855resolution='echo -e "Please use 915resolution as resolution modify tool for Intel graphic chipset."; return -1'
906   fi
907
908   alias grml-version='cat /etc/grml_version'
909
910   if [ -x /usr/sbin/rebuildfstab ] ; then
911      alias grml-rebuildfstab='rebuildfstab -v -r -config'
912   fi
913 }
914 # }}}
915
916 # {{{ now run the functions
917   isgrml && checkhome
918   is4    && isgrml    && grmlstuff
919   is4    && grmlcomp
920 # }}}
921
922 # {{{ keephack
923   [ -r /etc/zsh/keephack ] && is4 && source /etc/zsh/keephack
924 # }}}
925
926 # {{{ wonderful idea of using "e" glob qualifier by Peter Stephenson
927 # You use it as follows:
928 # $ NTREF=/reference/file
929 # $ ls -l *(e:nt:)
930 # This lists all the files in the current directory newer than the reference file.
931 # You can also specify the reference file inline; note quotes:
932 # $ ls -l *(e:'nt ~/.zshenv':)
933   is4 && nt() {
934     if [[ -n $1 ]]; then
935       local NTREF=${~1}
936     fi
937     [[ $REPLY -nt $NTREF ]]
938   }
939 # }}}
940
941 # shell functions {{{
942   setenv()  { typeset -x "${1}${1:+=}${(@)argv[2,$#]}" }  # csh compatibility
943   freload() { while (( $# )); do; unfunction $1; autoload -U $1; shift; done }
944   reload () {
945    if [[ "$#*" -eq 0 ]]; then
946       [ -r ~/.zshrc ] && . ~/.zshrc
947    else
948       local fn
949       for fn in "$@"; do
950           unfunction $fn
951           autoload -U $fn
952       done
953    fi
954   }
955   compdef _functions reload freload
956
957   # fast manual access
958   if type -p qma &>/dev/null ; then
959      manzsh()  { qma zshall "$1" }
960      compdef _man qma
961   else
962      manzsh()  { /usr/bin/man zshall |  vim -c "se ft=man| se hlsearch" +/"$1" - ; }
963      # manzsh()  { /usr/bin/man zshall |  most +/"$1" ; }
964      # manzsh()  { man zshall | $MYLESS -p $1 ; }
965   fi
966
967 # use "dchange <package-name>" to view Debian's changelog of the package:
968   dchange() {
969     if [ -r /usr/share/doc/${1}/changelog.Debian.gz ] ; then
970        most /usr/share/doc/${1}/changelog.Debian.gz
971     else
972        if [ -r /usr/share/doc/${1}/changelog.gz ] ; then
973           most /usr/share/doc/${1}/changelog.gz
974        else
975           echo "No changelog for package $1 found, sorry."
976           return 1
977        fi
978     fi
979   }
980   _dchange() { _files -W /usr/share/doc -/ }
981   compdef _dchange dchange
982
983 # use "uchange <package-name>" to view upstream's changelog of the package:
984   uchange() {
985     if [ -r /usr/share/doc/${1}/changelog.gz ] ; then
986        most /usr/share/doc/${1}/changelog.gz
987     else
988        echo "No changelog for package $1 found, sorry."
989        return 1
990     fi
991   }
992   _uchange() { _files -W /usr/share/doc -/ }
993   compdef _uchange uchange
994
995 # zsh profiling
996   profile () {
997       ZSH_PROFILE_RC=1 $SHELL "$@"
998   }
999
1000 # edit alias via zle:
1001   edalias() {
1002     [ -z "$1" ] && { echo "Usage: edalias <alias_to_edit>" ; return 1 } || vared aliases'[$1]' ;
1003   }
1004   compdef _aliases edalias
1005
1006 # edit function via zle:
1007   edfunc() {
1008     [ -z "$1" ] && { echo "Usage: edfun <function_to_edit>" ; return 1 } || zed -f "$1" ;
1009   }
1010   compdef _functions edfunc
1011
1012 # use it e.g. via 'Restart apache2'
1013  if [ -d /etc/init.d ] ; then
1014   for i in Start Restart Stop Force-Reload Reload ; do
1015     eval "$i() { $SUDO /etc/init.d/\$1 ${i:l} \$2 ; }"
1016   done
1017   # now the completion for this:
1018   compctl -g "$(echo /etc/init.d/*(:t))" Start Restart Stop Force-Reload Reload
1019  fi
1020
1021 # provide useful information on globbing
1022   H-Glob() {
1023   echo -e "
1024       /      directories
1025       .      plain files
1026       @      symbolic links
1027       =      sockets
1028       p      named pipes (FIFOs)
1029       *      executable plain files (0100)
1030       %      device files (character or block special)
1031       %b     block special files
1032       %c     character special files
1033       r      owner-readable files (0400)
1034       w      owner-writable files (0200)
1035       x      owner-executable files (0100)
1036       A      group-readable files (0040)
1037       I      group-writable files (0020)
1038       E      group-executable files (0010)
1039       R      world-readable files (0004)
1040       W      world-writable files (0002)
1041       X      world-executable files (0001)
1042       s      setuid files (04000)
1043       S      setgid files (02000)
1044       t      files with the sticky bit (01000)
1045
1046    print *(m-1)          # Files modified up to a day ago
1047    print *(a1)           # Files accessed a day ago
1048    print *(@)            # Just symlinks
1049    print *(Lk+50)        # Files bigger than 50 kilobytes
1050    print *(Lk-50)        # Files smaller than 50 kilobytes
1051    print **/*.c          # All *.c files recursively starting in \$PWD
1052    print **/*.c~file.c   # Same as above, but excluding 'file.c'
1053    print (foo|bar).*     # Files starting with 'foo' or 'bar'
1054    print *~*.*           # All Files that do not contain a dot
1055    chmod 644 *(.^x)      # make all plain non-executable files publically readable
1056    print -l *(.c|.h)     # Lists *.c and *.h
1057    print **/*(g:users:)  # Recursively match all files that are owned by group 'users'
1058    echo /proc/*/cwd(:h:t:s/self//) # Analogous to >ps ax | awk '{print $1}'<"
1059   }
1060   alias help-zshglob=H-Glob
1061
1062   type -p qma &>/dev/null && alias ?='qma zshall'
1063
1064   # grep for running process, like: 'any vim'
1065   any() {
1066   if [ -z "$1" ] ; then
1067      echo "any - grep for process(es) by keyword" >&2
1068      echo "Usage: any <keyword>" >&2 ; return 1
1069   else
1070      local STRING=$1
1071      local LENGTH=$(expr length $STRING)
1072      local FIRSCHAR=$(echo $(expr substr $STRING 1 1))
1073      local REST=$(echo $(expr substr $STRING 2 $LENGTH))
1074      ps xauwww| grep "[$FIRSCHAR]$REST"
1075   fi
1076   }
1077
1078   # After resuming from suspend, system is paging heavilly, leading to very bad interactivity.
1079   # taken from $LINUX-KERNELSOURCE/Documentation/power/swsusp.txt
1080   [ -r /proc/1/maps ] && deswap() {
1081      print 'Reading /proc/[0-9]*/maps and sending output to /dev/null, this might take a while.'
1082      cat $(sed -ne 's:.* /:/:p' /proc/[0-9]*/maps | sort -u | grep -v '^/dev/')  > /dev/null
1083      print 'Finished, running "swapoff -a; swapon -a" may also be useful.'
1084   }
1085
1086   # print hex value of a number
1087   hex() {
1088     [ -n "$1" ] && printf "%x\n" $1 || { print 'Usage: hex <number-to-convert>' ; return 1 }
1089   }
1090
1091   # calculate (or eval at all ;-)) with perl => p[erl-]eval
1092   # hint: also take a look at zcalc -> 'autoload zcalc' -> 'man zshmodules | less -p MATHFUNC'
1093   peval() {
1094     [ -n "$1" ] && CALC="$*" || print "Usage: calc [expression]"
1095     perl -e "print eval($CALC),\"\n\";"
1096   }
1097   functions peval &>/dev/null && alias calc=peval
1098
1099   # Switching shell safely and efficiently? http://www.zsh.org/mla/workers/2001/msg02410.html
1100   # bash() {
1101   #  NO_SWITCH="yes" command bash "$@"
1102   # }
1103   # restart () {
1104   #  exec $SHELL $SHELL_ARGS "$@"
1105   # }
1106
1107 # }}}
1108
1109 # log out? set timeout in seconds {{{
1110 # TMOUT=1800
1111 # do not log out in some specific terminals:
1112 #  if [[ "${TERM}" == ([Exa]term*|rxvt|dtterm|screen*) ]]; then
1113 #    unset TMOUT
1114 #  fi
1115 # }}}
1116
1117 # {{{ make sure our environment is clean regarding colors
1118   for color in BLUE RED GREEN CYAN WHITE ; unset $color
1119 # }}}
1120
1121 # source another config file if present {{{
1122   if [ -r /etc/zsh/zshrc.local ]; then
1123    source /etc/zsh/zshrc.local
1124   fi
1125 # }}}
1126
1127 # "persistent history" {{{
1128 # just write important commands you always need to ~/.important_commands
1129   if [ -r ~/.important_commands ] ; then
1130      fc -R ~/.important_commands
1131   fi
1132 # }}}
1133
1134 ## END OF FILE #################################################################
1135 # vim:foldmethod=marker expandtab