b864606487e000d6ed201eb622e704e217c4768a
[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: Mon Feb 11 18:00:55 CET 2008 [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-refcard-tag documentation: {{{
16 #   You may notice strange looking comments in the zshrc (and ~/.zshrc as
17 #   well). These are there for a purpose. grml's zsh-refcard can now be
18 #   automatically generated from the contents of the actual configuration
19 #   files. However, we need a little extra information on which comments
20 #   and what lines of code to take into account (and for what purpose).
21 #
22 # Here is what they mean:
23 #
24 # List of tags (comment types) used:
25 #   #a#     Next line contains an important alias, that should
26 #           be included in the grml-zsh-refcard.
27 #           (placement tag: @@INSERT-aliases@@)
28 #   #f#     Next line contains the beginning of an important function.
29 #           (placement tag: @@INSERT-functions@@)
30 #   #v#     Next line contains an important variable.
31 #           (placement tag: @@INSERT-variables@@)
32 #   #k#     Next line contains an important keybinding.
33 #           (placement tag: @@INSERT-keybindings@@)
34 #   #d#     Hashed directories list generation:
35 #               start   denotes the start of a list of 'hash -d'
36 #                       definitions.
37 #               end     denotes its end.
38 #           (placement tag: @@INSERT-hasheddirs@@)
39 #   #A#     Abbreviation expansion list generation:
40 #               start   denotes the beginning of abbreviations.
41 #               end     denotes their end.
42 #           Lines within this section that end in '#d .*' provide
43 #           extra documentation to be included in the refcard.
44 #           (placement tag: @@INSERT-abbrev@@)
45 #   #m#     This tag allows you to manually generate refcard entries
46 #           for code lines that are hard/impossible to parse.
47 #               Example:
48 #                   #m# k ESC-h Call the run-help function
49 #               That would add a refcard entry in the keybindings table
50 #               for 'ESC-h' with the given comment.
51 #           So the syntax is: #m# <section> <argument> <comment>
52 #   #o#     This tag lets you insert entries to the 'other' hash.
53 #           Generally, this should not be used. It is there for
54 #           things that cannot be done easily in another way.
55 #           (placement tag: @@INSERT-other-foobar@@)
56 #
57 #   All of these tags (except for m and o) take two arguments, the first
58 #   within the tag, the other after the tag:
59 #
60 #   #<tag><section># <comment>
61 #
62 #   Where <section> is really just a number, which are defined by the
63 #   @secmap array on top of 'genrefcard.pl'. The reason for numbers
64 #   instead of names is, that for the reader, the tag should not differ
65 #   much from a regular comment. For zsh, it is a regular comment indeed.
66 #   The numbers have got the following meanings:
67 #         0 -> "default"
68 #         1 -> "system"
69 #         2 -> "user"
70 #         3 -> "debian"
71 #         4 -> "search"
72 #         5 -> "shortcuts"
73 #         6 -> "services"
74 #
75 #   So, the following will add an entry to the 'functions' table in the
76 #   'system' section, with a (hopefully) descriptive comment:
77 #       #f1# Edit an alias via zle
78 #       edalias() {
79 #
80 #   It will then show up in the @@INSERT-aliases-system@@ replacement tag
81 #   that can be found in 'grml-zsh-refcard.tex.in'.
82 #   If the section number is omitted, the 'default' section is assumed.
83 #   Furthermore, in 'grml-zsh-refcard.tex.in' @@INSERT-aliases@@ is
84 #   exactly the same as @@INSERT-aliases-default@@. If you want a list of
85 #   *all* aliases, for example, use @@INSERT-aliases-all@@.
86 #}}}
87
88 # zsh profiling {{{
89 # just execute 'ZSH_PROFILE_RC=1 zsh' and run 'zprof' to get the details
90 if [[ -n $ZSH_PROFILE_RC ]] ; then
91     zmodload zsh/zprof
92 fi
93 # }}}
94
95 # utility functions {{{
96 # this function checks if a command exists and returns either true
97 # or false. This avoids using 'which' and 'whence', which will
98 # avoid problems with aliases for which on certain weird systems. :-)
99 check_com() {
100     local -i comonly
101
102     if [[ ${1} == '-c' ]] ; then
103         (( comonly = 1 ))
104         shift
105     else
106         (( comonly = 0 ))
107     fi
108
109     if (( ${#argv} != 1 )) ; then
110         printf 'usage: check_com [-c] <command>\n' >&2
111         return 1
112     fi
113
114     if (( comonly > 0 )) ; then
115         [[ -n ${commands[$1]}  ]] && return 0
116         return 1
117     fi
118
119     if   [[ -n ${commands[$1]}    ]] \
120       || [[ -n ${functions[$1]}   ]] \
121       || [[ -n ${aliases[$1]}     ]] \
122       || [[ -n ${reswords[(r)$1]} ]] ; then
123
124         return 0
125     fi
126
127     return 1
128 }
129
130 # creates an alias and precedes the command with
131 # sudo if $EUID is not zero.
132 salias() {
133     local only=0 ; local multi=0
134     while [[ ${1} == -* ]] ; do
135         case ${1} in
136             (-o) only=1 ;;
137             (-a) multi=1 ;;
138             (--) shift ; break ;;
139             (-h)
140                 printf 'usage: salias [-h|-o|-a] <alias-expression>\n'
141                 printf '  -h      shows this help text.\n'
142                 printf '  -a      replace '\'' ; '\'' sequences with '\'' ; sudo '\''.\n'
143                 printf '          be careful using this option.\n'
144                 printf '  -o      only sets an alias if a preceding sudo would be needed.\n'
145                 return 0
146                 ;;
147             (*) printf "unkown option: '%s'\n" "${1}" ; return 1 ;;
148         esac
149         shift
150     done
151
152     if (( ${#argv} > 1 )) ; then
153         printf 'Too many arguments %s\n' "${#argv}"
154         return 1
155     fi
156
157     key="${1%%\=*}" ;  val="${1#*\=}"
158     if (( EUID == 0 )) && (( only == 0 )); then
159         alias -- "${key}=${val}"
160     elif (( EUID > 0 )) ; then
161         (( multi > 0 )) && val="${val// ; / ; sudo }"
162         alias -- "${key}=sudo ${val}"
163     fi
164
165     return 0
166 }
167
168 # Check if we can read given files and source those we can.
169 xsource() {
170     if (( ${#argv} < 1 )) ; then
171         printf 'usage: xsource FILE(s)...\n' >&2
172         return 1
173     fi
174
175     while (( ${#argv} > 0 )) ; do
176         [[ -r ${1} ]] && source ${1}
177         shift
178     done
179     return 0
180 }
181
182 # Check if we can read a given file and 'cat(1)' it.
183 xcat() {
184     if (( ${#argv} != 1 )) ; then
185         printf 'usage: xcat FILE\n' >&2
186         return 1
187     fi
188
189     [[ -r ${1} ]] && cat ${1}
190     return 0
191 }
192
193 # Remove these functions again, they are of use only in these
194 # setup files. This should be called at the end of .zshrc.
195 xunfunction() {
196     local -a funcs
197     funcs=(salias xcat xsource xunfunction zrcautoload)
198
199     for func in $funcs ; do
200         [[ -n ${functions[$func]} ]] \
201             && unfunction $func
202     done
203     return 0
204 }
205
206 # autoload wrapper - use this one instead of autoload directly
207 function zrcautoload() {
208     setopt local_options extended_glob
209     local fdir ffile
210     local -i ffound
211
212     ffile=${1}
213     (( found = 0 ))
214     for fdir in ${fpath} ; do
215         [[ -e ${fdir}/${ffile} ]] && (( ffound = 1 ))
216     done
217
218     (( ffound == 0 )) && return 1
219     if [[ $ZSH_VERSION == 3.1.<6-> || $ZSH_VERSION == <4->* ]] ; then
220         autoload -U ${ffile} || return 1
221     else
222         autoload ${ffile} || return 1
223     fi
224     return 0
225 }
226
227 #}}}
228
229 # locale setup {{{
230 if [[ -z "$LANG" ]] ; then
231     xsource "/etc/default/locale"
232 fi
233
234 export LANG=${LANG:-en_US.iso885915}
235 for var in LC_ALL LC_MESSAGES ; do
236     [[ -n ${(P)var} ]] && export $var
237 done
238
239 xsource "/etc/sysconfig/keyboard"
240
241 TZ=$(xcat /etc/timezone)
242 # }}}
243
244 # check for potentially old files in 'completion.d' {{{
245 setopt extendedglob
246 xof=(/etc/zsh/completion.d/*~/etc/zsh/completion.d/_*(N))
247 if (( ${#xof} > 0 )) ; then
248     printf '\n -!- INFORMATION\n\n'
249     printf ' -!- %s file(s) not starting with an underscore (_) found in\n' ${#xof}
250     printf ' -!- /etc/zsh/completion.d/.\n\n'
251     printf ' -!- While this has been the case in old versions of grml-etc-core,\n'
252     printf ' -!- recent versions of the grml-zsh-setup have all these files rewritten\n'
253     printf ' -!- and renamed. Furthermore, the grml-zsh-setup will *only* add files\n'
254     printf ' -!- named _* to that directory.\n\n'
255     printf ' -!- If you added functions to completion.d yourself, please consider\n'
256     printf ' -!- moving them to /etc/zsh/functions.d/. Files in that directory, not\n'
257     printf ' -!- starting with an underscore are marked for automatic loading\n'
258     printf ' -!- by default (so that is quite convenient).\n\n'
259     printf ' -!- If there are files *not* starting with an underscore from an older\n'
260     printf ' -!- grml-etc-core in completion.d, you may safely remove them.\n\n'
261     printf ' -!- Delete the files for example via running:\n\n'
262     printf "      rm ${xof}\n\n"
263     printf ' -!- Note, that this message will *not* go away, unless you yourself\n'
264     printf ' -!- resolve the situation manually.\n\n'
265     BROKEN_COMPLETION_DIR=1
266 fi
267 unset xof
268 # }}}
269
270 # {{{ check for version/system
271 # check for versions (compatibility reasons)
272 is4(){
273     [[ $ZSH_VERSION == <4->* ]] && return 0
274     return 1
275 }
276
277 is41(){
278     [[ $ZSH_VERSION == 4.<1->* || $ZSH_VERSION == <5->* ]] && return 0
279     return 1
280 }
281
282 is42(){
283     [[ $ZSH_VERSION == 4.<2->* || $ZSH_VERSION == <5->* ]] && return 0
284     return 1
285 }
286
287 is43(){
288     [[ $ZSH_VERSION == 4.<3->* || $ZSH_VERSION == <5->* ]] && return 0
289     return 1
290 }
291
292 # Use is-at-least, if you need to check more precisely.
293 # Note that this test will *always* fail, if the is-at-least
294 # function could not be marked for autoloading.
295 zrcautoload is-at-least || is-at-least() { return 1 }
296
297 #f1# Checks whether or not you're running grml
298 isgrml(){
299     [[ -f /etc/grml_version ]] && return 0
300     return 1
301 }
302
303 #f1# Checks whether or not you're running a grml cd
304 isgrmlcd(){
305     [[ -f /etc/grml_cd ]] && return 0
306     return 1
307 }
308
309 if isgrml ; then
310 #f1# Checks whether or not you're running grml-small
311     isgrmlsmall() {
312         [[ ${${${(f)"$(</etc/grml_version)"}%% *}##*-} == 'small' ]] && return 0 ; return 1
313     }
314 else
315     isgrmlsmall() { return 1 }
316 fi
317
318 #f1# are we running within an utf environment?
319 isutfenv() {
320     case "$LANG $CHARSET $LANGUAGE" in
321         *utf*) return 0 ;;
322         *UTF*) return 0 ;;
323         *)     return 1 ;;
324     esac
325 }
326
327 # check for user, if not running as root set $SUDO to sudo
328 (( EUID != 0 )) && SUDO='sudo' || SUDO=''
329
330 # change directory to home on first invocation of zsh
331 # important for rungetty -> autologin
332 # Thanks go to Bart Schaefer!
333 isgrml && checkhome() {
334     if [[ -z "$ALREADY_DID_CD_HOME" ]] ; then
335         export ALREADY_DID_CD_HOME=$HOME
336         cd
337     fi
338 }
339
340 # check for zsh v3.1.7+
341
342 if ! [[ ${ZSH_VERSION} == 3.1.<7->*      \
343      || ${ZSH_VERSION} == 3.<2->.<->*    \
344      || ${ZSH_VERSION} == <4->.<->*   ]] ; then
345
346     printf '-!-\n'
347     printf '-!- In this configuration we try to make use of features, that only\n'
348     printf '-!- require version 3.1.7 of the shell; That way this setup can be\n'
349     printf '-!- used with a wide range of zsh versions, while using fairly\n'
350     printf '-!- advanced features in all supported versions.\n'
351     printf '-!-\n'
352     printf '-!- However, you are running zsh version %s.\n' "$ZSH_VERSION"
353     printf '-!-\n'
354     printf '-!- While this *may* work, it might as well fail.\n'
355     printf '-!- Please consider updating to at least version 3.1.7 of zsh.\n'
356     printf '-!-\n'
357     printf '-!- DO NOT EXPECT THIS TO WORK FLAWLESSLY!\n'
358     printf '-!- If it does today, you'\''ve been lucky.\n'
359     printf '-!-\n'
360     printf '-!- Ye been warned!\n'
361     printf '-!-\n'
362
363     function zstyle() { : }
364 fi
365
366 # }}}
367
368 # {{{ set some variables
369 if check_com -c vim ; then
370 #v#
371     export EDITOR=${EDITOR:-vim}
372 else
373     export EDITOR=${EDITOR:-vi}
374 fi
375
376 #v#
377 export PAGER=${PAGER:-less}
378
379 #v#
380 export MAIL=${MAIL:-/var/mail/$USER}
381
382 # if we don't set $SHELL then aterm, rxvt,.. will use /bin/sh or /bin/bash :-/
383 export SHELL='/bin/zsh'
384
385 # color setup for ls:
386 check_com -c dircolors && eval $(dircolors -b)
387
388 # set width of man pages to 80 for more convenient reading
389 # export MANWIDTH=${MANWIDTH:-80}
390
391 # Search path for the cd command
392 #  cdpath=(.. ~)
393
394 # completion functions go to /etc/zsh/completion.d
395 # function files may be put into /etc/zsh/functions.d, from where they
396 # will be automatically autoloaded.
397 if [[ -n "$BROKEN_COMPLETION_DIR" ]] ; then
398     print 'Warning: not setting completion directories because broken files have been found.' >&2
399 else
400     [[ -d /etc/zsh/completion.d ]] && fpath=( $fpath /etc/zsh/completion.d )
401     if [[ -d /etc/zsh/functions.d ]] ; then
402         fpath+=( /etc/zsh/functions.d )
403         for func in /etc/zsh/functions.d/[^_]*[^~] ; do
404             zrcautoload -U ${func:t}
405         done
406     fi
407 fi
408
409 # automatically remove duplicates from these arrays
410 typeset -U path cdpath fpath manpath
411 # }}}
412
413 # {{{ keybindings
414 if [[ "$TERM" != emacs ]] ; then
415     [[ -z "$terminfo[kdch1]" ]] || bindkey -M emacs "$terminfo[kdch1]" delete-char
416     [[ -z "$terminfo[khome]" ]] || bindkey -M emacs "$terminfo[khome]" beginning-of-line
417     [[ -z "$terminfo[kend]"  ]] || bindkey -M emacs "$terminfo[kend]"  end-of-line
418     [[ -z "$terminfo[kdch1]" ]] || bindkey -M vicmd "$terminfo[kdch1]" vi-delete-char
419     [[ -z "$terminfo[khome]" ]] || bindkey -M vicmd "$terminfo[khome]" vi-beginning-of-line
420     [[ -z "$terminfo[kend]"  ]] || bindkey -M vicmd "$terminfo[kend]"  vi-end-of-line
421     [[ -z "$terminfo[cuu1]"  ]] || bindkey -M viins "$terminfo[cuu1]"  vi-up-line-or-history
422     [[ -z "$terminfo[cuf1]"  ]] || bindkey -M viins "$terminfo[cuf1]"  vi-forward-char
423     [[ -z "$terminfo[kcuu1]" ]] || bindkey -M viins "$terminfo[kcuu1]" vi-up-line-or-history
424     [[ -z "$terminfo[kcud1]" ]] || bindkey -M viins "$terminfo[kcud1]" vi-down-line-or-history
425     [[ -z "$terminfo[kcuf1]" ]] || bindkey -M viins "$terminfo[kcuf1]" vi-forward-char
426     [[ -z "$terminfo[kcub1]" ]] || bindkey -M viins "$terminfo[kcub1]" vi-backward-char
427     # ncurses stuff:
428     [[ "$terminfo[kcuu1]" == $'\eO'* ]] && bindkey -M viins "${terminfo[kcuu1]/O/[}" vi-up-line-or-history
429     [[ "$terminfo[kcud1]" == $'\eO'* ]] && bindkey -M viins "${terminfo[kcud1]/O/[}" vi-down-line-or-history
430     [[ "$terminfo[kcuf1]" == $'\eO'* ]] && bindkey -M viins "${terminfo[kcuf1]/O/[}" vi-forward-char
431     [[ "$terminfo[kcub1]" == $'\eO'* ]] && bindkey -M viins "${terminfo[kcub1]/O/[}" vi-backward-char
432     [[ "$terminfo[khome]" == $'\eO'* ]] && bindkey -M viins "${terminfo[khome]/O/[}" beginning-of-line
433     [[ "$terminfo[kend]"  == $'\eO'* ]] && bindkey -M viins "${terminfo[kend]/O/[}"  end-of-line
434     [[ "$terminfo[khome]" == $'\eO'* ]] && bindkey -M emacs "${terminfo[khome]/O/[}" beginning-of-line
435     [[ "$terminfo[kend]"  == $'\eO'* ]] && bindkey -M emacs "${terminfo[kend]/O/[}"  end-of-line
436 fi
437
438 ## keybindings (run 'bindkeys' for details, more details via man zshzle)
439 # use emacs style per default:
440 bindkey -e
441 # use vi style:
442 # bindkey -v
443
444 #if [[ "$TERM" == screen ]] ; then
445 bindkey '\e[1~' beginning-of-line       # home
446 bindkey '\e[4~' end-of-line             # end
447 bindkey '\e[A'  up-line-or-search       # cursor up
448 bindkey '\e[B'  down-line-or-search     # <ESC>-
449
450 bindkey '^xp'   history-beginning-search-backward
451 bindkey '^xP'   history-beginning-search-forward
452 # bindkey -s '^L' "|less\n"             # ctrl-L pipes to less
453 # bindkey -s '^B' " &\n"                # ctrl-B runs it in the background
454 # if terminal type is set to 'rxvt':
455 bindkey '\e[7~' beginning-of-line       # home
456 bindkey '\e[8~' end-of-line             # end
457 #fi
458
459 # insert unicode character
460 # usage example: 'ctrl-x i' 00A7 'ctrl-x i' will give you an Â§
461 # See for example http://unicode.org/charts/ for unicode characters code
462 zrcautoload insert-unicode-char
463 zle -N insert-unicode-char
464 #k# Insert Unicode character
465 bindkey '^Xi' insert-unicode-char
466
467 # just type 'cd ...' to get 'cd ../..'
468 #  rationalise-dot() {
469 #  if [[ $LBUFFER == *.. ]] ; then
470 #    LBUFFER+=/..
471 #  else
472 #    LBUFFER+=.
473 #  fi
474 #  }
475 #  zle -N rationalise-dot
476 #  bindkey . rationalise-dot
477
478 #  bindkey '\eq' push-line-or-edit
479 # }}}
480
481 # a generic accept-line wrapper {{{
482
483 # This widget can prevent unwanted autocorrections from command-name
484 # to _command-name, rehash automatically on enter and call any number
485 # of builtin and user-defined widgets in different contexts.
486 #
487 # For a broader description, see:
488 # <http://bewatermyfriend.org/posts/2007/12-26.11-50-38-tooltime.html>
489 #
490 # The code is imported from the file 'zsh/functions/accept-line' from
491 # <http://ft.bewatermyfriend.org/comp/zsh/zsh-dotfiles.tar.bz2>, which
492 # distributed under the same terms as zsh itself.
493
494 # A newly added command will may not be found or will cause false
495 # correction attempts, if you got auto-correction set. By setting the
496 # following style, we force accept-line() to rehash, if it cannot
497 # find the first word on the command line in the $command[] hash.
498 zstyle ':acceptline:*' rehash true
499
500 function Accept-Line() {
501     setopt localoptions noksharrays
502     local -a subs
503     local -xi aldone
504     local sub
505
506     zstyle -a ":acceptline:${alcontext}" actions subs
507
508     (( ${#subs} < 1 )) && return 0
509
510     (( aldone = 0 ))
511     for sub in ${subs} ; do
512         [[ ${sub} == 'accept-line' ]] && sub='.accept-line'
513         zle ${sub}
514
515         (( aldone > 0 )) && break
516     done
517 }
518
519 function Accept-Line-getdefault() {
520     local default_action
521
522     zstyle -s ":acceptline:${alcontext}" default_action default_action
523     case ${default_action} in
524         ((accept-line|))
525             printf ".accept-line"
526             ;;
527         (*)
528             printf ${default_action}
529             ;;
530     esac
531 }
532
533 function accept-line() {
534     setopt localoptions noksharrays
535     local -a cmdline
536     local -x alcontext
537     local buf com fname format msg default_action
538
539     alcontext='default'
540     buf="${BUFFER}"
541     cmdline=(${(z)BUFFER})
542     com="${cmdline[1]}"
543     fname="_${com}"
544
545     zstyle -t ":acceptline:${alcontext}" rehash \
546         && [[ -z ${commands[$com]} ]]           \
547         && rehash
548
549     if    [[ -n ${reswords[(r)$com]} ]] \
550        || [[ -n ${aliases[$com]}     ]] \
551        || [[ -n ${functions[$com]}   ]] \
552        || [[ -n ${builtins[$com]}    ]] \
553        || [[ -n ${commands[$com]}    ]] ; then
554
555         # there is something sensible to execute, just do it.
556         alcontext='normal'
557         zle Accept-Line
558
559         default_action=$(Accept-Line-getdefault)
560         zstyle -T ":acceptline:${alcontext}" call_default \
561             && zle ${default_action}
562         return
563     fi
564
565     if    [[ -o correct              ]] \
566        || [[ -o correctall           ]] \
567        && [[ -n ${functions[$fname]} ]] ; then
568
569         # nothing there to execute but there is a function called
570         # _command_name; a completion widget. Makes no sense to
571         # call it on the commandline, but the correct{,all} options
572         # will ask for it nevertheless, so warn the user.
573         if [[ ${LASTWIDGET} == 'accept-line' ]] ; then
574             # Okay, we warned the user before, he called us again,
575             # so have it his way.
576             alcontext='force'
577             zle Accept-Line
578
579             default_action=$(Accept-Line-getdefault)
580             zstyle -T ":acceptline:${alcontext}" call_default \
581                 && zle ${default_action}
582             return
583         fi
584
585         # prepare warning message for the user, configurable via zstyle.
586         zstyle -s ":acceptline:${alcontext}" compwarnfmt msg
587
588         if [[ -z ${msg} ]] ; then
589             msg="%c will not execute and completion %f exists."
590         fi
591
592         zformat -f msg "${msg}" "c:${com}" "f:${fname}"
593
594         zle -M -- "${msg}"
595         return
596     elif [[ -n ${buf//[$' \t\n']##/} ]] ; then
597         # If we are here, the commandline contains something that is not
598         # executable, which is neither subject to _command_name correction
599         # and is not empty. might be a variable assignment
600         alcontext='misc'
601         zle Accept-Line
602
603         default_action=$(Accept-Line-getdefault)
604         zstyle -T ":acceptline:${alcontext}" call_default \
605             && zle ${default_action}
606         return
607     fi
608
609     # If we got this far, the commandline only contains whitespace, or is empty.
610     alcontext='empty'
611     zle Accept-Line
612
613     default_action=$(Accept-Line-getdefault)
614     zstyle -T ":acceptline:${alcontext}" call_default \
615         && zle ${default_action}
616 }
617
618 zle -N accept-line
619 zle -N Accept-Line
620
621 # }}}
622
623 # power completion - abbreviation expansion {{{
624 # power completion / abbreviation expansion / buffer expansion
625 # see http://zshwiki.org/home/examples/zleiab for details
626 # less risky than the global aliases but powerful as well
627 # just type the abbreviation key and afterwards ',.' to expand it
628 declare -A abk
629 setopt extendedglob
630 setopt interactivecomments
631 abk=(
632 # key  # value                (#d additional doc string)
633 #A# start
634     '...' '../..'
635     '....' '../../..'
636     'BG' '& exit'
637     'C' '| wc -l'
638     'G' '|& grep --color=auto'
639     'H' '| head'
640     'Hl' ' --help |& less -r'      #d (Display help in pager)
641     'L' '| less'
642     'LL' '|& less -r'
643     'M' '| most'
644     'N' '&>/dev/null'              #d (No Output)
645     'R' '| tr A-z N-za-m'          #d (ROT13)
646     'SL' '| sort | less'
647     'S' '| sort -u'
648     'T' '| tail'
649     'V' '|& vim -'
650 #A# end
651     'hide' "echo -en '\033]50;nil2\007'"
652     'tiny' 'echo -en "\033]50;-misc-fixed-medium-r-normal-*-*-80-*-*-c-*-iso8859-15\007"'
653     'small' 'echo -en "\033]50;6x10\007"'
654     'medium' 'echo -en "\033]50;-misc-fixed-medium-r-normal--13-120-75-75-c-80-iso8859-15\007"'
655     'default' 'echo -e "\033]50;-misc-fixed-medium-r-normal-*-*-140-*-*-c-*-iso8859-15\007"'
656     'large' 'echo -en "\033]50;-misc-fixed-medium-r-normal-*-*-150-*-*-c-*-iso8859-15\007"'
657     'huge' 'echo -en "\033]50;-misc-fixed-medium-r-normal-*-*-210-*-*-c-*-iso8859-15\007"'
658     'smartfont' 'echo -en "\033]50;-artwiz-smoothansi-*-*-*-*-*-*-*-*-*-*-*-*\007"'
659     'semifont' 'echo -en "\033]50;-misc-fixed-medium-r-semicondensed-*-*-120-*-*-*-*-iso8859-15\007"'
660     'da' 'du -sch'
661     'j' 'jobs -l'
662     'u' 'translate -i'
663     'co' "./configure && make && sudo make install"
664     'CH' "./configure --help"
665     'conkeror' 'firefox -chrome chrome://conkeror/content'
666     'dir' 'ls -lSrah'
667     'lad' $'ls -d .*(/)\n# only show dot-directories'
668     'lsa' $'ls -a .*(.)\n# only show dot-files'
669     'lss' $'ls -l *(s,S,t)\n# only files with setgid/setuid/sticky flag'
670     'lsl' $'ls -l *(@[1,10])\n# only symlinks'
671     'lsx' $'ls -l *(*[1,10])\n# only executables'
672     'lsw' $'ls -ld *(R,W,X.^ND/)\n# world-{readable,writable,executable} files'
673     'lsbig' $'ls -flh *(.OL[1,10])\n# display the biggest files'
674     'lsd' $'ls -d *(/)\n# only show directories'
675     'lse' $'ls -d *(/^F)\n# only show empty directories'
676     'lsnew' $'ls -rl *(D.om[1,10])\n# display the newest files'
677     'lsold' $'ls -rtlh *(D.om[-11,-1])\n # display the oldest files'
678     'lssmall' $'ls -Srl *(.oL[1,10])\n# display the smallest files'
679     'rw-' 'chmod 600'
680     '600' 'chmod u+rw-x,g-rwx,o-rwx'
681     'rwx' 'chmod u+rwx'
682     '700' 'chmod u+rwx,g-rwx,o-rwx'
683     'r--' 'chmod u+r-wx,g-rwx,o-rwx'
684     '644' $'chmod u+rw-x,g+r-wx,o+r-wx\n # 4=r,2=w,1=x'
685     '755' 'chmod u+rwx,g+r-w+x,o+r-w+x'
686     'md' 'mkdir -p '
687     'cmplayer' 'mplayer -vo -fs -zoom fbdev'
688     'fbmplayer' 'mplayer -vo -fs -zoom fbdev'
689     'fblinks' 'links2 -driver fb'
690     'insecssh' 'ssh -o "StrictHostKeyChecking=no" -o "UserKnownHostsFile=/dev/null"'
691     'insecscp' 'scp -o "StrictHostKeyChecking=no" -o "UserKnownHostsFile=/dev/null"'
692     'fori' 'for i ({..}) { }'
693     'cx' 'chmod +x'
694     'e'  'print -l'
695     'se' 'setopt interactivecomments'
696     'va' 'valac --vapidir=../vapi/ --pkg=gtk+-2.0 gtktest.vala'
697     'fb2' '=mplayer -vo fbdev -fs -zoom 1>/dev/null -xy 2'
698     'fb3' '=mplayer -vo fbdev -fs  -zoom 1>/dev/null -xy 3'
699     'ci' 'centericq'
700     'D'  'export DISPLAY=:0.0'
701     'mp' 'mplayer -vo xv -fs -zoom'
702 )
703
704 globalias() {
705     local MATCH
706     matched_chars='[.-|_a-zA-Z0-9]#'
707     LBUFFER=${LBUFFER%%(#m)[.-|_a-zA-Z0-9]#}
708     LBUFFER+=${abk[$MATCH]:-$MATCH}
709 }
710
711 zle -N globalias
712 bindkey ",." globalias
713 # }}}
714
715 # {{{ autoloading
716 zrcautoload zmv    # who needs mmv or rename?
717 zrcautoload history-search-end
718
719 # we don't want to quote/espace URLs on our own...
720 # if autoload -U url-quote-magic ; then
721 #    zle -N self-insert url-quote-magic
722 #    zstyle ':url-quote-magic:*' url-metas '*?[]^()~#{}='
723 # else
724 #    print 'Notice: no url-quote-magic available :('
725 # fi
726 alias url-quote='autoload -U url-quote-magic ; zle -N self-insert url-quote-magic'
727
728 #m# k ESC-h Call \kbd{run-help} for the 1st word on the command line
729 alias run-help >&/dev/null && unalias run-help
730 zrcautoload run-help # use via 'esc-h'
731
732 # completion system
733 if zrcautoload compinit && compinit 2>/dev/null ; then
734     compinit 2>/dev/null || print 'Notice: no compinit available :('
735 else
736     print 'Notice: no compinit available :('
737     function zstyle { }
738     function compdef { }
739 fi
740
741 is4 && zrcautoload zed # use ZLE editor to edit a file or function
742
743 is4 && \
744 for mod in complist deltochar mathfunc ; do
745     zmodload -i zsh/${mod} 2>/dev/null || print "Notice: no ${mod} available :("
746 done
747
748 # autoload zsh modules when they are referenced
749 if is4 ; then
750     tmpargs=(
751         a   stat
752         a   zpty
753         ap  zprof
754         ap  mapfile
755     )
756
757     while (( ${#tmpargs} > 0 )) ; do
758         zmodload -${tmpargs[1]} zsh/${tmpargs[2]} ${tmpargs[2]}
759         shift 2 tmpargs
760     done
761     unset tmpargs
762 fi
763
764 if is4 && zrcautoload insert-files && zle -N insert-files ; then
765     #k# Insert files
766     bindkey "^Xf" insert-files # C-x-f
767 fi
768
769 bindkey ' '   magic-space    # also do history expansion on space
770 #k# Trigger menu-complete
771 bindkey '\ei' menu-complete  # menu completion via esc-i
772
773 # press esc-e for editing command line in $EDITOR or $VISUAL
774 if is4 && zrcautoload edit-command-line && zle -N edit-command-line ; then
775     #k# Edit the current line in \kbd{\$EDITOR}
776     bindkey '\ee' edit-command-line
777 fi
778
779 if is4 && [[ -n ${(k)modules[zsh/complist]} ]] ; then
780     #k# menu selection: pick item but stay in the menu
781     bindkey -M menuselect '\e^M' accept-and-menu-complete
782
783     # use the vi navigation keys (hjkl) besides cursor keys in menu completion
784     #bindkey -M menuselect 'h' vi-backward-char        # left
785     #bindkey -M menuselect 'k' vi-up-line-or-history   # up
786     #bindkey -M menuselect 'l' vi-forward-char         # right
787     #bindkey -M menuselect 'j' vi-down-line-or-history # bottom
788
789     # accept a completion and try to complete again by using menu
790     # completion; very useful with completing directories
791     # by using 'undo' one's got a simple file browser
792     bindkey -M menuselect '^o' accept-and-infer-next-history
793 fi
794
795 # press "ctrl-e d" to insert the actual date in the form yyyy-mm-dd
796 _bkdate() { BUFFER="$BUFFER$(date '+%F')"; CURSOR=$#BUFFER; }
797 zle -N _bkdate
798
799 #k# Insert a timestamp on the command line (yyyy-mm-dd)
800 bindkey '^Ed' _bkdate
801
802 # press esc-m for inserting last typed word again (thanks to caphuso!)
803 insert-last-typed-word() { zle insert-last-word -- 0 -1 };
804 zle -N insert-last-typed-word;
805
806 #k# Insert last typed word
807 bindkey "\em" insert-last-typed-word
808
809 # set command prediction from history, see 'man 1 zshcontrib'
810 #  is4 && zrcautoload predict-on && \
811 #  zle -N predict-on         && \
812 #  zle -N predict-off        && \
813 #  bindkey "^X^Z" predict-on && \
814 #  bindkey "^Z" predict-off
815
816 #k# Shortcut for \kbd{fg<enter>}
817 bindkey -s '^z' "fg\n"
818
819 # press ctrl-q to quote line:
820 #  mquote () {
821 #        zle beginning-of-line
822 #        zle forward-word
823 #        # RBUFFER="'$RBUFFER'"
824 #        RBUFFER=${(q)RBUFFER}
825 #        zle end-of-line
826 #  }
827 #  zle -N mquote && bindkey '^q' mquote
828
829 # run command line as user root via sudo:
830 sudo-command-line() {
831     [[ -z $BUFFER ]] && zle up-history
832     [[ $BUFFER != sudo\ * ]] && BUFFER="sudo $BUFFER"
833 }
834 zle -N sudo-command-line
835
836 #k# Put the current command line into a \kbd{sudo} call
837 bindkey "^Os" sudo-command-line
838
839 ### jump behind the first word on the cmdline.
840 ### useful to add options.
841 function jump_after_first_word() {
842     local words
843     words=(${(z)BUFFER})
844
845     if (( ${#words} <= 1 )) ; then
846         CURSOR=${#BUFFER}
847     else
848         CURSOR=${#${words[1]}}
849     fi
850 }
851 zle -N jump_after_first_word
852
853 bindkey '^x1' jump_after_first_word
854
855 # }}}
856
857 # {{{ set some important options
858 # Please update these tags, if you change the umask settings below.
859 #o# r_umask     002
860 #o# r_umaskstr  rwxrwxr-x
861 #o# umask       022
862 #o# umaskstr    rwxr-xr-x
863 (( EUID != 0 )) && umask 002 || umask 022
864
865 # history:
866 setopt append_history       # append history list to the history file (important for multiple parallel zsh sessions!)
867 is4 && setopt SHARE_HISTORY # import new commands from the history file also in other zsh-session
868 setopt extended_history     # save each command's beginning timestamp and the duration to the history file
869 is4 && setopt histignorealldups # If  a  new  command  line being added to the history
870                             # list duplicates an older one, the older command is removed from the list
871 setopt histignorespace      # remove command lines from the history list when
872                             # the first character on the line is a space
873 #  setopt histallowclobber    # add `|' to output redirections in the history
874 #  setopt NO_clobber          # warning if file exists ('cat /dev/null > ~/.zshrc')
875 setopt auto_cd              # if a command is issued that can't be executed as a normal command,
876                             # and the command is the name of a directory, perform the cd command to that directory
877 setopt extended_glob        # in order to use #, ~ and ^ for filename generation
878                             # grep word *~(*.gz|*.bz|*.bz2|*.zip|*.Z) ->
879                             # -> searches for word not in compressed files
880                             # don't forget to quote '^', '~' and '#'!
881 setopt longlistjobs         # display PID when suspending processes as well
882 setopt notify               # report the status of backgrounds jobs immediately
883 setopt hash_list_all        # Whenever a command completion is attempted, make sure \
884                             # the entire command path is hashed first.
885 setopt completeinword       # not just at the end
886 # setopt nocheckjobs          # don't warn me about bg processes when exiting
887 setopt nohup                # and don't kill them, either
888 # setopt printexitvalue       # alert me if something failed
889 # setopt dvorak               # with spelling correction, assume dvorak kb
890 setopt auto_pushd           # make cd push the old directory onto the directory stack.
891 setopt nonomatch            # try to avoid the 'zsh: no matches found...'
892 setopt nobeep               # avoid "beep"ing
893 setopt pushd_ignore_dups    # don't push the same dir twice.
894
895 MAILCHECK=30       # mailchecks
896 REPORTTIME=5       # report about cpu-/system-/user-time of command if running longer than 5 seconds
897 watch=(notme root) # watch for everyone but me and root
898
899 # define word separators (for stuff like backward-word, forward-word, backward-kill-word,..)
900 #  WORDCHARS='*?_-.[]~=/&;!#$%^(){}<>' # the default
901 #  WORDCHARS=.
902 #  WORDCHARS='*?_[]~=&;!#$%^(){}'
903 #  WORDCHARS='${WORDCHARS:s@/@}'
904
905 # only slash should be considered as a word separator:
906 slash-backward-kill-word() {
907     local WORDCHARS="${WORDCHARS:s@/@}"
908     # zle backward-word
909     zle backward-kill-word
910 }
911 zle -N slash-backward-kill-word
912
913 #k# Kill everything in a word up to its last \kbd{/}
914 bindkey '\ev' slash-backward-kill-word
915
916 # }}}
917
918 # {{{ history
919
920 ZSHDIR=$HOME/.zsh
921
922 #v#
923 HISTFILE=$HOME/.zsh_history
924 isgrmlcd && HISTSIZE=500  || HISTSIZE=5000
925 isgrmlcd && SAVEHIST=1000 || SAVEHIST=10000 # useful for setopt append_history
926
927 # }}}
928
929 # dirstack handling {{{
930
931 DIRSTACKSIZE=20
932 if [[ -f ~/.zdirs ]] && [[ ${#dirstack[*]} -eq 0 ]] ; then
933     dirstack=( ${(f)"$(< ~/.zdirs)"} )
934     # "cd -" won't work after login by just setting $OLDPWD, so
935     [[ -d $dirstack[0] ]] && cd $dirstack[0] && cd $OLDPWD
936 fi
937
938 chpwd() {
939     builtin print -l ${(u)dirstack} >! ~/.zdirs
940 }
941
942 # }}}
943
944 # {{{ display battery status on right side of prompt via running 'BATTERY=1 zsh'
945 if [[ -n "$BATTERY" ]] ; then
946     if check_com -c acpi ; then
947         PERCENT="${(C)${(s| |)$(acpi 2>/dev/null)}[4]}"
948         [[ -z "$PERCENT" ]] && PERCENT='acpi not present'
949
950         if [[ "${PERCENT%%%}" -lt 20 ]] ; then
951             PERCENT="warning: ${PERCENT}%"
952         fi
953     fi
954 fi
955 # }}}
956
957 # display version control information on right side of prompt if $VCS is set {{{
958 # based on Mike Hommey's http://web.glandium.org/blog/?p=170
959 __vcs_dir() {
960     local vcs base_dir sub_dir ref
961
962     sub_dir() {
963       local sub_dir
964       sub_dir=$(readlink -f "${PWD}")
965       sub_dir=${sub_dir#$1}
966       echo ${sub_dir#/}
967     }
968
969     git_dir() {
970       base_dir=$(git-rev-parse --show-cdup 2>/dev/null) || return 1
971       base_dir=$(readlink -f "$base_dir/..")
972       sub_dir=$(git-rev-parse --show-prefix)
973       sub_dir=${sub_dir%/}
974       ref=$(git-symbolic-ref -q HEAD || git-name-rev --name-only HEAD 2>/dev/null)
975       ref=${ref#refs/heads/}
976       vcs="git"
977     }
978
979     svn_dir() {
980       [[ -d ".svn" ]] || return 1
981       base_dir="."
982       while [[ -d "$base_dir/../.svn" ]]; do base_dir="$base_dir/.."; done
983       base_dir=$(readlink -f "$base_dir")
984       sub_dir=$(sub_dir "${base_dir}")
985       ref=$(svn info "$base_dir" | awk '/^URL/ { sub(".*/","",$0); r=$0 } /^Revision/ { sub("[^0-9]*","",$0); print r":"$0 }')
986       vcs="svn"
987     }
988
989     svk_dir() {
990         [[ -f ~/.svk/config ]] || return 1
991         base_dir=$(awk '/: *$/ { sub(/^ */,"",$0); sub(/: *$/,"",$0); if (match("'${PWD}'", $0"(/|$)")) { print $0; d=1; } } /depotpath/ && d == 1 { sub(".*/","",$0); r=$0 } /revision/ && d == 1 { print r ":" $2; exit 1 }' ~/.svk/config) && return 1
992         ref=${base_dir##*
993   }
994         base_dir=${base_dir%%
995   *}
996         sub_dir=$(sub_dir "${base_dir}")
997         vcs="svk"
998     }
999
1000     hg_dir() {
1001         base_dir="."
1002         while [[ ! -d "$base_dir/.hg" ]]; do
1003             base_dir="$base_dir/.."
1004             [[ $(readlink -f "${base_dir}") = "/" ]] && return 1
1005         done
1006         base_dir=$(readlink -f "$base_dir")
1007         sub_dir=$(sub_dir "${base_dir}")
1008         ref=$(< "${base_dir}/.hg/branch")
1009         vcs="hg"
1010     }
1011
1012     hg_dir  ||
1013     git_dir ||
1014     svn_dir ||
1015     svk_dir # ||
1016   #  base_dir="$PWD"
1017   #  echo "${vcs:+($vcs)}${base_dir/$HOME/~}${vcs:+[$ref]${sub_dir}}"
1018     echo "${vcs:+($vcs)}${base_dir}${vcs:+[$ref]${sub_dir}}"
1019 }
1020 # }}}
1021
1022 # {{{ set prompt
1023 if zrcautoload promptinit && promptinit 2>/dev/null ; then
1024     promptinit # people should be able to use their favourite prompt
1025 else
1026     print 'Notice: no promptinit available :('
1027 fi
1028
1029
1030 # precmd() => a function which is executed just before each prompt
1031 # use 'NOPRECMD=1' to disable the precmd + preexec commands
1032
1033 # precmd () { setopt promptsubst; [[ -o interactive ]] && jobs -l;
1034
1035 # make sure to use right prompt only when not running a command
1036 is41 && setopt transient_rprompt
1037
1038 is4 && [[ -z $NOPRECMD ]] && precmd () {
1039     [[ -n $NOPRECMD ]] && return 0
1040     # allow manual overwriting of RPROMPT
1041     if [[ -n $RPROMPT ]] ; then
1042         [[ $TERM == screen* ]] && echo -n $'\ekzsh\e\\'
1043         # return 0
1044     fi
1045     # just use DONTSETRPROMPT=1 to be able to overwrite RPROMPT
1046     if [[ -z $DONTSETRPROMPT ]] ; then
1047         if [[ -n $BATTERY ]] ; then
1048             RPROMPT="%(?..:()% ${PERCENT}${SCREENTITLE}"
1049             # RPROMPT="${PERCENT}${SCREENTITLE}"
1050         elif [[ -n $VCS ]] ; then
1051             RPROMPT="%(?..:()% $(__vcs_dir)${SCREENTITLE}"
1052         else
1053             RPROMPT="%(?..:()% ${SCREENTITLE}"
1054             # RPROMPT="${SCREENTITLE}"
1055         fi
1056     fi
1057     # adjust title of xterm
1058     # see http://www.faqs.org/docs/Linux-mini/Xterm-Title.html
1059     case $TERM in
1060         (xterm*|rxvt)
1061             print -Pn "\e]0;%n@%m: %~\a"
1062             ;;
1063     esac
1064 }
1065
1066 # chpwd () => a function which is executed whenever the directory is changed
1067
1068 # preexec() => a function running before every command
1069 is4 && [[ -z $NOPRECMD ]] && \
1070 preexec () {
1071     [[ -n $NOPRECMD ]] && return 0
1072 # set hostname if not running on host with name 'grml'
1073     if [[ -n "$HOSTNAME" ]] && [[ "$HOSTNAME" != $(hostname) ]] ; then
1074        NAME="@$HOSTNAME"
1075     fi
1076 # get the name of the program currently running and hostname of local machine
1077 # set screen window title if running in a screen
1078     if [[ "$TERM" == screen* ]] ; then
1079         # local CMD=${1[(wr)^(*=*|sudo|ssh|-*)]}       # don't use hostname
1080         local CMD="${1[(wr)^(*=*|sudo|ssh|-*)]}$NAME" # use hostname
1081         echo -ne "\ek$CMD\e\\"
1082     fi
1083 # set the screen title to "zsh" when sitting at the command prompt:
1084     if [[ "$TERM" == screen* ]] ; then
1085         SCREENTITLE=$'%{\ekzsh\e\\%}'
1086     else
1087         SCREENTITLE=''
1088     fi
1089 # adjust title of xterm
1090     case $TERM in
1091         (xterm*|rxvt)
1092             print -Pn "\e]0;%n@%m: $1\a"
1093             ;;
1094     esac
1095 }
1096
1097 # set colors
1098 if zrcautoload colors && colors 2>/dev/null ; then
1099     BLUE="%{${fg[blue]}%}"
1100     RED="%{${fg_bold[red]}%}"
1101     GREEN="%{${fg[green]}%}"
1102     CYAN="%{${fg[cyan]}%}"
1103     WHITE="%{${fg[white]}%}"
1104     NO_COLOUR="%{${reset_color}%}"
1105 else
1106     BLUE=$'%{\e[1;34m%}'
1107     RED=$'%{\e[1;31m%}'
1108     GREEN=$'%{\e[1;32m%}'
1109     CYAN=$'%{\e[1;36m%}'
1110     WHITE=$'%{\e[1;37m%}'
1111     NO_COLOUR=$'%{\e[0m%}'
1112 fi
1113
1114 EXITCODE="%(?..%?%1v )"
1115 PS2='`%_> '       # secondary prompt, printed when the shell needs more information to complete a command.
1116 PS3='?# '         # selection prompt used within a select loop.
1117 PS4='+%N:%i:%_> ' # the execution trace prompt (setopt xtrace). default: '+%N:%i>'
1118
1119 # set variable debian_chroot if running in a chroot with /etc/debian_chroot
1120 if [[ -z "$debian_chroot" ]] && [[ -r /etc/debian_chroot ]] ; then
1121     debian_chroot=$(cat /etc/debian_chroot)
1122 fi
1123
1124 # don't use colors on dumb terminals (like emacs):
1125 if [[ "$TERM" == dumb ]] ; then
1126     PROMPT="${EXITCODE}${debian_chroot:+($debian_chroot)}%n@%m %40<...<%B%~%b%<< %# "
1127 else
1128     # only if $GRMLPROMPT is set (e.g. via 'GRMLPROMPT=1 zsh') use the extended prompt
1129     # set variable identifying the chroot you work in (used in the prompt below)
1130     if [[ -n $GRMLPROMPT ]] ; then
1131         PROMPT="${RED}${EXITCODE}${CYAN}[%j running job(s)] ${GREEN}{history#%!} ${RED}%(3L.+.) ${BLUE}%* %D
1132 ${BLUE}%n${NO_COLOUR}@%m %40<...<%B%~%b%<< %# "
1133     else
1134         if (( EUID != 0 )); then
1135             PROMPT="${RED}${EXITCODE}${WHITE}${debian_chroot:+($debian_chroot)}${BLUE}%n${NO_COLOUR}@%m %40<...<%B%~%b%<< %# " # primary prompt string
1136         else
1137             PROMPT="${BLUE}${EXITCODE}${WHITE}${debian_chroot:+($debian_chroot)}${RED}%n${NO_COLOUR}@%m %40<...<%B%~%b%<< %# " # primary prompt string
1138         fi
1139     fi
1140 fi
1141
1142 # if we are inside a grml-chroot set a specific prompt theme
1143 if [[ -n "$GRML_CHROOT" ]] ; then
1144     PROMPT="%{$fg[red]%}(CHROOT) %{$fg_bold[red]%}%n%{$fg_no_bold[white]%}@%m %40<...<%B%~%b%<< %\# "
1145 fi
1146 # }}}
1147
1148 # {{{ 'hash' some often used directories
1149 #d# start
1150 hash -d deb=/var/cache/apt/archives
1151 hash -d doc=/usr/share/doc
1152 hash -d linux=/lib/modules/$(command uname -r)/build/
1153 hash -d log=/var/log
1154 hash -d slog=/var/log/syslog
1155 hash -d src=/usr/src
1156 hash -d templ=/usr/share/doc/grml-templates
1157 hash -d tt=/usr/share/doc/texttools-doc
1158 hash -d www=/var/www
1159 #d# end
1160 # }}}
1161
1162 # {{{ some aliases
1163 if [[ $UID -eq 0 ]] ; then
1164     [[ -r /etc/grml/screenrc ]] && alias screen='/usr/bin/screen -c /etc/grml/screenrc'
1165 elif [[ -r $HOME/.screenrc ]] ; then
1166     alias screen="/usr/bin/screen -c $HOME/.screenrc"
1167 else
1168     [[ -r /etc/grml/screenrc_grml ]] && alias screen='/usr/bin/screen -c /etc/grml/screenrc_grml'
1169 fi
1170
1171 # do we have GNU ls with color-support?
1172 if ls --help 2>/dev/null | grep -- --color= >/dev/null && [[ "$TERM" != dumb ]] ; then
1173     #a1# execute \kbd{@a@}:\quad ls with colors
1174     alias ls='ls -b -CF --color=auto'
1175     #a1# execute \kbd{@a@}:\quad list all files, with colors
1176     alias la='ls -la --color=auto'
1177     #a1# long colored list, without dotfiles (@a@)
1178     alias ll='ls -l --color=auto'
1179     #a1# long colored list, human readable sizes (@a@)
1180     alias lh='ls -hAl --color=auto'
1181     #a1# List files, append qualifier to filenames \\&\quad(\kbd{/} for directories, \kbd{@} for symlinks ...)
1182     alias l='ls -lF --color=auto'
1183 else
1184     alias ls='ls -b -CF'
1185     alias la='ls -la'
1186     alias ll='ls -l'
1187     alias lh='ls -hAl'
1188     alias l='ls -lF'
1189 fi
1190
1191 alias mdstat='cat /proc/mdstat'
1192 alias ...='cd ../../'
1193
1194 # generate alias named "$KERNELVERSION-reboot" so you can use boot with kexec:
1195 if [[ -x /sbin/kexec ]] && [[ -r /proc/cmdline ]] ; then
1196     alias "$(uname -r)-reboot"="kexec -l --initrd=/boot/initrd.img-"$(uname -r)" --command-line=\"$(cat /proc/cmdline)\" /boot/vmlinuz-"$(uname -r)""
1197 fi
1198
1199 alias cp='nocorrect cp'         # no spelling correction on cp
1200 alias mkdir='nocorrect mkdir'   # no spelling correction on mkdir
1201 alias mv='nocorrect mv'         # no spelling correction on mv
1202 alias rm='nocorrect rm'         # no spelling correction on rm
1203
1204 #a1# Execute \kbd{rmdir}
1205 alias rd='rmdir'
1206 #a1# Execute \kbd{rmdir}
1207 alias md='mkdir'
1208
1209 # see http://www.cl.cam.ac.uk/~mgk25/unicode.html#term for details
1210 alias term2iso="echo 'Setting terminal to iso mode' ; print -n '\e%@'"
1211 alias term2utf="echo 'Setting terminal to utf-8 mode'; print -n '\e%G'"
1212
1213 # make sure it is not assigned yet
1214 [[ $(whence -w utf2iso &>/dev/null) == 'utf2iso: alias' ]] && unalias utf2iso
1215
1216 utf2iso() {
1217     if isutfenv ; then
1218         for ENV in $(env | command grep -i '.utf') ; do
1219             eval export "$(echo $ENV | sed 's/UTF-8/iso885915/ ; s/utf8/iso885915/')"
1220         done
1221     fi
1222 }
1223
1224 # make sure it is not assigned yet
1225 [[ $(whence -w iso2utf &>/dev/null) == 'iso2utf: alias' ]] && unalias iso2utf
1226 iso2utf() {
1227     if ! isutfenv ; then
1228         for ENV in $(env | command grep -i '\.iso') ; do
1229             eval export "$(echo $ENV | sed 's/iso.*/UTF-8/ ; s/ISO.*/UTF-8/')"
1230         done
1231     fi
1232 }
1233
1234 # set up software synthesizer via speakup
1235 swspeak() {
1236     aumix -w 90 -v 90 -p 90 -m 90
1237     if ! [[ -r /dev/softsynth ]] ; then
1238         flite -o play -t "Sorry, software synthesizer not available. Did you boot with swspeak bootoption?"
1239         return 1
1240     else
1241         setopt singlelinezle
1242         unsetopt prompt_cr
1243         export PS1="%m%# "
1244         nice -n -20 speechd-up
1245         sleep 2
1246         flite -o play -t "Finished setting up software synthesizer"
1247     fi
1248 }
1249
1250 # I like clean prompt, so provide simple way to get that
1251 check_com 0 || alias 0='return 0'
1252
1253 # for really lazy people like mika:
1254 check_com S &>/dev/null || alias S='screen'
1255 check_com s &>/dev/null || alias s='ssh'
1256
1257 # get top 10 shell commands:
1258 alias top10='print -l ? ${(o)history%% *} | uniq -c | sort -nr | head -n 10'
1259
1260 # truecrypt; use e.g. via 'truec /dev/ice /mnt/ice' or 'truec -i'
1261 if check_com -c truecrypt ; then
1262     if isutfenv ; then
1263         alias truec='truecrypt --mount-options "rw,sync,dirsync,users,uid=1000,gid=users,umask=077,utf8" '
1264     else
1265         alias truec='truecrypt --mount-options "rw,sync,dirsync,users,uid=1000,gid=users,umask=077" '
1266     fi
1267 fi
1268
1269 #f1# Hints for the use of zsh on grml
1270 zsh-help() {
1271     print "$bg[white]$fg[black]
1272 zsh-help - hints for use of zsh on grml
1273 =======================================$reset_color"
1274
1275     print '
1276 Main configuration of zsh happens in /etc/zsh/zshrc (global)
1277 and /etc/skel/.zshrc which is copied to $HOME/.zshrc once.
1278 The files are part of the package grml-etc-core, if you want to
1279 use them on a non-grml-system just get the tar.gz from
1280 http://deb.grml.org/ or get the files from the mercurial
1281 repository:
1282
1283   http://hg.grml.org/grml-etc-core/raw-file/tip/etc/skel/.zshrc
1284   http://hg.grml.org/grml-etc-core/raw-file/tip/etc/zsh/zshrc
1285
1286 If you want to stay in sync with zsh configuration of grml
1287 run '\''ln -sf /etc/skel/.zshrc $HOME/.zshrc'\'' and configure
1288 your own stuff in $HOME/.zshrc.local. System wide configuration
1289 without touching configuration files of grml can take place
1290 in /etc/zsh/zshrc.local.
1291
1292 If you want to use the configuration of user grml also when
1293 running as user root just run '\''zshskel'\'' which will source
1294 the file /etc/skel/.zshrc.
1295
1296 For information regarding zsh start at http://grml.org/zsh/
1297
1298 Take a look at grml'\''s zsh refcard:
1299 % xpdf =(zcat /usr/share/doc/grml-docs/zsh/grml-zsh-refcard.pdf.gz)
1300
1301 Check out the main zsh refcard:
1302 % '$BROWSER' http://www.bash2zsh.com/zsh_refcard/refcard.pdf
1303
1304 And of course visit the zsh-lovers:
1305 % man zsh-lovers
1306
1307 You can adjust some options through environment variables when
1308 invoking zsh without having to edit configuration files.
1309 Basically meant for bash users who are not used to the power of
1310 the zsh yet. :)
1311
1312   "NOCOR=1    zsh" => deactivate automatic correction
1313   "NOMENU=1   zsh" => do not use menu completion (note: use strg-d for completion instead!)
1314   "NOPRECMD=1 zsh" => disable the precmd + preexec commands (set GNU screen title)
1315   "BATTERY=1  zsh" => activate battery status (via acpi) on right side of prompt'
1316
1317     print "
1318 $bg[white]$fg[black]
1319 Please report wishes + bugs to the grml-team: http://grml.org/bugs/
1320 Enjoy your grml system with the zsh!$reset_color"
1321 }
1322
1323 # debian stuff
1324 if [[ -r /etc/debian_version ]] ; then
1325     #a3# Execute \kbd{apt-cache search}
1326     alias acs='apt-cache search'
1327     #a3# Execute \kbd{apt-cache show}
1328     alias acsh='apt-cache show'
1329     #a3# Execute \kbd{apt-cache policy}
1330     alias acp='apt-cache policy'
1331     #a3# Execute \kbd{apt-get dist-upgrade}
1332     salias adg="apt-get dist-upgrade"
1333     #a3# Execute \kbd{apt-get install}
1334     salias agi="apt-get install"
1335     #a3# Execute \kbd{aptitude install}
1336     salias ati="aptitude install"
1337     #a3# Execute \kbd{apt-get upgrade}
1338     salias ag="apt-get upgrade"
1339     #a3# Execute \kbd{apt-get update}
1340     salias au="apt-get update"
1341     #a3# Execute \kbd{aptitude update ; aptitude safe-upgrade}
1342     salias -a up="aptitude update ; aptitude safe-upgrade"
1343     #a3# Execute \kbd{dpkg-buildpackage}
1344     alias dbp='dpkg-buildpackage'
1345     #a3# Execute \kbd{grep-excuses}
1346     alias ge='grep-excuses'
1347
1348     # debian upgrade
1349     #f3# Execute \kbd{apt-get update \&\& }\\&\quad \kbd{apt-get dist-upgrade}
1350     upgrade() {
1351         if [[ -z "$1" ]] ; then
1352             $SUDO apt-get update
1353             $SUDO apt-get -u upgrade
1354         else
1355             ssh $1 $SUDO apt-get update
1356             # ask before the upgrade
1357             local dummy
1358             ssh $1 $SUDO apt-get --no-act upgrade
1359             echo -n 'Process the upgrade?'
1360             read -q dummy
1361             if [[ $dummy == "y" ]] ; then
1362                 ssh $1 $SUDO apt-get -u upgrade --yes
1363             fi
1364         fi
1365     }
1366
1367     # get a root shell as normal user in live-cd mode:
1368     if isgrmlcd && [[ $UID -ne 0 ]] ; then
1369        alias su="sudo su"
1370      fi
1371
1372     #a1# Take a look at the syslog: \kbd{\$PAGER /var/log/syslog}
1373     alias llog="$PAGER /var/log/syslog"     # take a look at the syslog
1374     #a1# Take a look at the syslog: \kbd{tail -f /var/log/syslog}
1375     alias tlog="tail -f /var/log/syslog"    # follow the syslog
1376     #a1# (Re)-source \kbd{/etc/skel/.zshrc}
1377     alias zshskel="source /etc/skel/.zshrc" # source skeleton zshrc
1378 fi
1379
1380 # sort installed Debian-packages by size
1381 if check_com -c grep-status ; then
1382     #a3# List installed Debian-packages sorted by size
1383     alias debs-by-size='grep-status -FStatus -sInstalled-Size,Package -n "install ok installed" | paste -sd "  \n" | sort -rn'
1384 fi
1385
1386 # if cdrecord is a symlink (to wodim) or isn't present at all warn:
1387 if [[ -L /usr/bin/cdrecord ]] || ! check_com -c cdrecord ; then
1388     if check_com -c wodim ; then
1389         alias cdrecord="echo 'cdrecord is not provided under its original name by Debian anymore.
1390 See #377109 in the BTS of Debian for more details.
1391
1392 Please use the wodim binary instead' ; return 1"
1393     fi
1394 fi
1395
1396 # get_tw_cli has been renamed into get_3ware
1397 if check_com -c get_3ware ; then
1398     get_tw_cli() {
1399         echo 'Warning: get_tw_cli has been renamed into get_3ware. Invoking get_3ware for you.'>&2
1400         get_3ware
1401     }
1402 fi
1403
1404 # I hate lacking backward compatibility, so provide an alternative therefore
1405 if ! check_com -c apache2-ssl-certificate ; then
1406
1407     apache2-ssl-certificate() {
1408
1409     print 'Debian does not ship apache2-ssl-certificate anymore (see #398520). :('
1410     print 'You might want to take a look at Debian the package ssl-cert as well.'
1411     print 'To generate a certificate for use with apache2 follow the instructions:'
1412
1413     echo '
1414
1415 export RANDFILE=/dev/random
1416 mkdir /etc/apache2/ssl/
1417 openssl req $@ -new -x509 -days 365 -nodes -out /etc/apache2/ssl/apache.pem -keyout /etc/apache2/ssl/apache.pem
1418 chmod 600 /etc/apache2/ssl/apache.pem
1419
1420 Run "grml-tips ssl-certificate" if you need further instructions.
1421 '
1422     }
1423 fi
1424 # }}}
1425
1426 # {{{ Use hard limits, except for a smaller stack and no core dumps
1427 unlimit
1428 is4 && limit stack 8192
1429 isgrmlcd && limit core 0 # important for a live-cd-system
1430 limit -s
1431 # }}}
1432
1433 # {{{ completion system
1434
1435 # called later (via is4 && grmlcomp)
1436 # notice: use 'zstyle' for getting current settings
1437 #         press ^Xh (control-x h) for getting tags in context; ^X? (control-x ?) to run complete_debug with trace output
1438 grmlcomp() {
1439     # TODO: This could use some additional information
1440
1441     # allow one error for every three characters typed in approximate completer
1442     zstyle ':completion:*:approximate:'    max-errors 'reply=( $((($#PREFIX+$#SUFFIX)/3 )) numeric )'
1443
1444     # don't complete backup files as executables
1445     zstyle ':completion:*:complete:-command-::commands' ignored-patterns '(aptitude-*|*\~)'
1446
1447     # start menu completion only if it could find no unambiguous initial string
1448     zstyle ':completion:*:correct:*'       insert-unambiguous true
1449     zstyle ':completion:*:corrections'     format $'%{\e[0;31m%}%d (errors: %e)%{\e[0m%}'
1450     zstyle ':completion:*:correct:*'       original true
1451
1452     # activate color-completion
1453     zstyle ':completion:*:default'         list-colors ${(s.:.)LS_COLORS}
1454
1455     # format on completion
1456     zstyle ':completion:*:descriptions'    format $'%{\e[0;31m%}completing %B%d%b%{\e[0m%}'
1457
1458     # complete 'cd -<tab>' with menu
1459     zstyle ':completion:*:*:cd:*:directory-stack' menu yes select
1460
1461     # insert all expansions for expand completer
1462     zstyle ':completion:*:expand:*'        tag-order all-expansions
1463     zstyle ':completion:*:history-words'   list false
1464
1465     # activate menu
1466     zstyle ':completion:*:history-words'   menu yes
1467
1468     # ignore duplicate entries
1469     zstyle ':completion:*:history-words'   remove-all-dups yes
1470     zstyle ':completion:*:history-words'   stop yes
1471
1472     # match uppercase from lowercase
1473     zstyle ':completion:*'                 matcher-list 'm:{a-z}={A-Z}'
1474
1475     # separate matches into groups
1476     zstyle ':completion:*:matches'         group 'yes'
1477     zstyle ':completion:*'                 group-name ''
1478
1479     if [[ -z "$NOMENU" ]] ; then
1480         # if there are more than 5 options allow selecting from a menu
1481         zstyle ':completion:*'               menu select=5
1482     else
1483         # don't use any menus at all
1484         setopt no_auto_menu
1485     fi
1486
1487     zstyle ':completion:*:messages'        format '%d'
1488     zstyle ':completion:*:options'         auto-description '%d'
1489
1490     # describe options in full
1491     zstyle ':completion:*:options'         description 'yes'
1492
1493     # on processes completion complete all user processes
1494     zstyle ':completion:*:processes'       command 'ps -au$USER'
1495
1496     # offer indexes before parameters in subscripts
1497     zstyle ':completion:*:*:-subscript-:*' tag-order indexes parameters
1498
1499     # provide verbose completion information
1500     zstyle ':completion:*'                 verbose true
1501
1502     # recent (as of Dec 2007) zsh versions are able to provide descriptions
1503     # for commands (read: 1st word in the line) that it will list for the user
1504     # to choose from. The following disables that, because it's not exactly fast.
1505     zstyle ':completion:*:-command-:*:'    verbose false
1506
1507     # set format for warnings
1508     zstyle ':completion:*:warnings'        format $'%{\e[0;31m%}No matches for:%{\e[0m%} %d'
1509
1510     # define files to ignore for zcompile
1511     zstyle ':completion:*:*:zcompile:*'    ignored-patterns '(*~|*.zwc)'
1512     zstyle ':completion:correct:'          prompt 'correct to: %e'
1513
1514     # Ignore completion functions for commands you don't have:
1515     zstyle ':completion::(^approximate*):*:functions' ignored-patterns '_*'
1516
1517     # complete manual by their section
1518     zstyle ':completion:*:manuals'    separate-sections true
1519     zstyle ':completion:*:manuals.*'  insert-sections   true
1520     zstyle ':completion:*:man:*'      menu yes select
1521
1522     # run rehash on completion so new installed program are found automatically:
1523     _force_rehash() {
1524         (( CURRENT == 1 )) && rehash
1525         return 1
1526     }
1527
1528     ## correction
1529     # some people don't like the automatic correction - so run 'NOCOR=1 zsh' to deactivate it
1530     if [[ -n "$NOCOR" ]] ; then
1531         zstyle ':completion:*' completer _oldlist _expand _force_rehash _complete _files _ignored
1532         setopt nocorrect
1533     else
1534         # try to be smart about when to use what completer...
1535         setopt correct
1536         zstyle -e ':completion:*' completer '
1537             if [[ $_last_try != "$HISTNO$BUFFER$CURSOR" ]] ; then
1538                 _last_try="$HISTNO$BUFFER$CURSOR"
1539                 reply=(_complete _match _ignored _prefix _files)
1540             else
1541                 if [[ $words[1] == (rm|mv) ]] ; then
1542                     reply=(_complete _files)
1543                 else
1544                     reply=(_oldlist _expand _force_rehash _complete _ignored _correct _approximate _files)
1545                 fi
1546             fi'
1547     fi
1548
1549     # zstyle ':completion:*' completer _complete _correct _approximate
1550     # zstyle ':completion:*' expand prefix suffix
1551
1552     # command for process lists, the local web server details and host completion
1553     zstyle ':completion:*:urls' local 'www' '/var/www/' 'public_html'
1554
1555     # caching
1556     [[ -d $ZSHDIR/cache ]] && zstyle ':completion:*' use-cache yes && \
1557                             zstyle ':completion::complete:*' cache-path $ZSHDIR/cache/
1558
1559     # host completion /* add brackets as vim can't parse zsh's complex cmdlines 8-) {{{ */
1560     if is42 ; then
1561         [[ -r ~/.ssh/known_hosts ]] && _ssh_hosts=(${${${${(f)"$(<$HOME/.ssh/known_hosts)"}:#[\|]*}%%\ *}%%,*}) || _ssh_hosts=()
1562         [[ -r /etc/hosts ]] && : ${(A)_etc_hosts:=${(s: :)${(ps:\t:)${${(f)~~"$(</etc/hosts)"}%%\#*}##[:blank:]#[^[:blank:]]#}}} || _etc_hosts=()
1563     else
1564         _ssh_hosts=()
1565         _etc_hosts=()
1566     fi
1567     hosts=(
1568         $(hostname)
1569         "$_ssh_hosts[@]"
1570         "$_etc_hosts[@]"
1571         grml.org
1572         localhost
1573     )
1574     zstyle ':completion:*:hosts' hosts $hosts
1575     #  zstyle '*' hosts $hosts
1576
1577     # specify your logins:
1578     # my_accounts=(
1579     #  {grml,grml1}@foo.invalid
1580     #  grml-devel@bar.invalid
1581     # )
1582     # other_accounts=(
1583     #  {fred,root}@foo.invalid
1584     #  vera@bar.invalid
1585     # )
1586     # zstyle ':completion:*:my-accounts' users-hosts $my_accounts
1587     # zstyle ':completion:*:other-accounts' users-hosts $other_accounts
1588
1589     # specify specific port/service settings:
1590     #  telnet_users_hosts_ports=(
1591     #    user1@host1:
1592     #    user2@host2:
1593     #    @mail-server:{smtp,pop3}
1594     #    @news-server:nntp
1595     #    @proxy-server:8000
1596     #  )
1597     # zstyle ':completion:*:*:telnet:*' users-hosts-ports $telnet_users_hosts_ports
1598
1599     # use generic completion system for programs not yet defined; (_gnu_generic works
1600     # with commands that provide a --help option with "standard" gnu-like output.)
1601     compdef _gnu_generic tail head feh cp mv df stow uname ipacsum fetchipac
1602
1603     # see upgrade function in this file
1604     compdef _hosts upgrade
1605 }
1606 # }}}
1607
1608 # {{{ grmlstuff
1609 grmlstuff() {
1610 # people should use 'grml-x'!
1611     startx() {
1612         if [[ -e /etc/X11/xorg.conf ]] ; then
1613             [[ -x /usr/bin/startx ]] && /usr/bin/startx "$@" || /usr/X11R6/bin/startx "$@"
1614         else
1615             echo "Please use the script \"grml-x\" for starting the X Window System
1616 because there does not exist /etc/X11/xorg.conf yet.
1617 If you want to use startx anyway please call \"/usr/bin/startx\"."
1618             return -1
1619         fi
1620     }
1621
1622     xinit() {
1623         if [[ -e /etc/X11/xorg.conf ]] ; then
1624             [[ -x /usr/bin/xinit ]] && /usr/bin/xinit || /usr/X11R6/bin/xinit
1625         else
1626             echo "Please use the script \"grml-x\" for starting the X Window System.
1627 because there does not exist /etc/X11/xorg.conf yet.
1628 If you want to use xinit anyway please call \"/usr/bin/xinit\"."
1629             return -1
1630         fi
1631     }
1632
1633     if check_com -c 915resolution ; then
1634         alias 855resolution='echo -e "Please use 915resolution as resolution modify tool for Intel graphic chipset."; return -1'
1635     fi
1636
1637     #a1# Output version of running grml
1638     alias grml-version='cat /etc/grml_version'
1639
1640     if check_com -c rebuildfstab ; then
1641         #a1# Rebuild /etc/fstab
1642         alias grml-rebuildfstab='rebuildfstab -v -r -config'
1643     fi
1644
1645     if check_com -c grml-debootstrap ; then
1646         alias debian2hd='print "Installing debian to harddisk is possible via using grml-debootstrap." ; return 1'
1647     fi
1648 }
1649 # }}}
1650
1651 # {{{ now run the functions
1652 isgrml && checkhome
1653 is4    && isgrml    && grmlstuff
1654 is4    && grmlcomp
1655 # }}}
1656
1657 # {{{ keephack
1658 is4 && xsource "/etc/zsh/keephack"
1659 # }}}
1660
1661 # {{{ wonderful idea of using "e" glob qualifier by Peter Stephenson
1662 # You use it as follows:
1663 # $ NTREF=/reference/file
1664 # $ ls -l *(e:nt:)
1665 # This lists all the files in the current directory newer than the reference file.
1666 # You can also specify the reference file inline; note quotes:
1667 # $ ls -l *(e:'nt ~/.zshenv':)
1668 is4 && nt() {
1669     if [[ -n $1 ]] ; then
1670         local NTREF=${~1}
1671     fi
1672     [[ $REPLY -nt $NTREF ]]
1673 }
1674 # }}}
1675
1676 # shell functions {{{
1677
1678 #f1# Provide csh compatibility
1679 setenv()  { typeset -x "${1}${1:+=}${(@)argv[2,$#]}" }  # csh compatibility
1680
1681 #f1# Reload an autoloadable function
1682 freload() { while (( $# )); do; unfunction $1; autoload -U $1; shift; done }
1683
1684 #f1# Reload zsh setup
1685 reload() {
1686     if [[ "$#*" -eq 0 ]] ; then
1687         [[ -r ~/.zshrc ]] && . ~/.zshrc
1688     else
1689         local fn
1690         for fn in "$@"; do
1691             unfunction $fn
1692             autoload -U $fn
1693         done
1694     fi
1695 }
1696 compdef _functions reload freload
1697
1698 #f1# List symlinks in detail (more detailed version of 'readlink -f' and 'whence -s')
1699 sll() {
1700     [[ -z "$1" ]] && printf 'Usage: %s <file(s)>\n' "$0" && return 1
1701     for i in "$@" ; do
1702         file=$i
1703         while [[ -h "$file" ]] ; do
1704             ls -l $file
1705             file=$(readlink "$file")
1706         done
1707     done
1708 }
1709
1710 # fast manual access
1711 if check_com qma ; then
1712     #f1# View the zsh manual
1713     manzsh()  { qma zshall "$1" }
1714     compdef _man qma
1715 else
1716     manzsh()  { /usr/bin/man zshall |  vim -c "se ft=man| se hlsearch" +/"$1" - ; }
1717     # manzsh()  { /usr/bin/man zshall |  most +/"$1" ; }
1718     # [[ -f ~/.terminfo/m/mostlike ]] && MYLESS='LESS=C TERMINFO=~/.terminfo TERM=mostlike less' || MYLESS='less'
1719     # manzsh()  { man zshall | $MYLESS -p $1 ; }
1720 fi
1721
1722 if check_com -c $PAGER ; then
1723     #f1# View Debian's changelog of a given package
1724     dchange() {
1725         if [[ -r /usr/share/doc/${1}/changelog.Debian.gz ]] ; then
1726             $PAGER /usr/share/doc/${1}/changelog.Debian.gz
1727         elif [[ -r /usr/share/doc/${1}/changelog.gz ]] ; then
1728             $PAGER /usr/share/doc/${1}/changelog.gz
1729         else
1730             if check_com -c aptitude ; then
1731                 echo "No changelog for package $1 found, using aptitude to retrieve it."
1732                 if isgrml ; then
1733                     aptitude -t unstable changelog ${1}
1734                 else
1735                     aptitude changelog ${1}
1736                 fi
1737             else
1738                 echo "No changelog for package $1 found, sorry."
1739                 return 1
1740             fi
1741         fi
1742     }
1743     _dchange() { _files -W /usr/share/doc -/ }
1744     compdef _dchange dchange
1745
1746     #f1# View Debian's NEWS of a given package
1747     dnews() {
1748         if [[ -r /usr/share/doc/${1}/NEWS.Debian.gz ]] ; then
1749             $PAGER /usr/share/doc/${1}/NEWS.Debian.gz
1750         else
1751             if [[ -r /usr/share/doc/${1}/NEWS.gz ]] ; then
1752                 $PAGER /usr/share/doc/${1}/NEWS.gz
1753             else
1754                 echo "No NEWS file for package $1 found, sorry."
1755                 return 1
1756             fi
1757         fi
1758     }
1759     _dnews() { _files -W /usr/share/doc -/ }
1760     compdef _dnews dnews
1761
1762     #f1# View upstream's changelog of a given package
1763     uchange() {
1764         if [[ -r /usr/share/doc/${1}/changelog.gz ]] ; then
1765             $PAGER /usr/share/doc/${1}/changelog.gz
1766         else
1767             echo "No changelog for package $1 found, sorry."
1768             return 1
1769         fi
1770     }
1771     _uchange() { _files -W /usr/share/doc -/ }
1772     compdef _uchange uchange
1773 fi
1774
1775 # zsh profiling
1776 profile() {
1777     ZSH_PROFILE_RC=1 $SHELL "$@"
1778 }
1779
1780 #f1# Edit an alias via zle
1781 edalias() {
1782     [[ -z "$1" ]] && { echo "Usage: edalias <alias_to_edit>" ; return 1 } || vared aliases'[$1]' ;
1783 }
1784 compdef _aliases edalias
1785
1786 #f1# Edit a function via zle
1787 edfunc() {
1788     [[ -z "$1" ]] && { echo "Usage: edfun <function_to_edit>" ; return 1 } || zed -f "$1" ;
1789 }
1790 compdef _functions edfunc
1791
1792 # use it e.g. via 'Restart apache2'
1793 #m# f6 Start() \kbd{/etc/init.d/\em{process}}\quad\kbd{start}
1794 #m# f6 Restart() \kbd{/etc/init.d/\em{process}}\quad\kbd{restart}
1795 #m# f6 Stop() \kbd{/etc/init.d/\em{process}}\quad\kbd{stop}
1796 #m# f6 Reload() \kbd{/etc/init.d/\em{process}}\quad\kbd{reload}
1797 #m# f6 Force-Reload() \kbd{/etc/init.d/\em{process}}\quad\kbd{force-reload}
1798 if [[ -d /etc/init.d ]] ; then
1799     for i in Start Restart Stop Force-Reload Reload ; do
1800         eval "$i() { $SUDO /etc/init.d/\$1 ${i:l} \$2 ; }"
1801     done
1802 fi
1803
1804 #f1# Provides useful information on globbing
1805 H-Glob() {
1806     echo -e "
1807     /      directories
1808     .      plain files
1809     @      symbolic links
1810     =      sockets
1811     p      named pipes (FIFOs)
1812     *      executable plain files (0100)
1813     %      device files (character or block special)
1814     %b     block special files
1815     %c     character special files
1816     r      owner-readable files (0400)
1817     w      owner-writable files (0200)
1818     x      owner-executable files (0100)
1819     A      group-readable files (0040)
1820     I      group-writable files (0020)
1821     E      group-executable files (0010)
1822     R      world-readable files (0004)
1823     W      world-writable files (0002)
1824     X      world-executable files (0001)
1825     s      setuid files (04000)
1826     S      setgid files (02000)
1827     t      files with the sticky bit (01000)
1828
1829   print *(m-1)          # Files modified up to a day ago
1830   print *(a1)           # Files accessed a day ago
1831   print *(@)            # Just symlinks
1832   print *(Lk+50)        # Files bigger than 50 kilobytes
1833   print *(Lk-50)        # Files smaller than 50 kilobytes
1834   print **/*.c          # All *.c files recursively starting in \$PWD
1835   print **/*.c~file.c   # Same as above, but excluding 'file.c'
1836   print (foo|bar).*     # Files starting with 'foo' or 'bar'
1837   print *~*.*           # All Files that do not contain a dot
1838   chmod 644 *(.^x)      # make all plain non-executable files publically readable
1839   print -l *(.c|.h)     # Lists *.c and *.h
1840   print **/*(g:users:)  # Recursively match all files that are owned by group 'users'
1841   echo /proc/*/cwd(:h:t:s/self//) # Analogous to >ps ax | awk '{print $1}'<"
1842 }
1843 alias help-zshglob=H-Glob
1844
1845 check_com -c qma && alias ?='qma zshall'
1846
1847 # grep for running process, like: 'any vim'
1848 any() {
1849     if [[ -z "$1" ]] ; then
1850         echo "any - grep for process(es) by keyword" >&2
1851         echo "Usage: any <keyword>" >&2 ; return 1
1852     else
1853         local STRING=$1
1854         local LENGTH=$(expr length $STRING)
1855         local FIRSCHAR=$(echo $(expr substr $STRING 1 1))
1856         local REST=$(echo $(expr substr $STRING 2 $LENGTH))
1857         ps xauwww| grep "[$FIRSCHAR]$REST"
1858     fi
1859 }
1860
1861 # After resuming from suspend, system is paging heavily, leading to very bad interactivity.
1862 # taken from $LINUX-KERNELSOURCE/Documentation/power/swsusp.txt
1863 [[ -r /proc/1/maps ]] && \
1864 deswap() {
1865     print 'Reading /proc/[0-9]*/maps and sending output to /dev/null, this might take a while.'
1866     cat $(sed -ne 's:.* /:/:p' /proc/[0-9]*/maps | sort -u | grep -v '^/dev/')  > /dev/null
1867     print 'Finished, running "swapoff -a; swapon -a" may also be useful.'
1868 }
1869
1870 # print hex value of a number
1871 hex() {
1872     [[ -n "$1" ]] && printf "%x\n" $1 || { print 'Usage: hex <number-to-convert>' ; return 1 }
1873 }
1874
1875 # calculate (or eval at all ;-)) with perl => p[erl-]eval
1876 # hint: also take a look at zcalc -> 'autoload zcalc' -> 'man zshmodules | less -p MATHFUNC'
1877 peval() {
1878     [[ -n "$1" ]] && CALC="$*" || print "Usage: calc [expression]"
1879     perl -e "print eval($CALC),\"\n\";"
1880 }
1881 functions peval &>/dev/null && alias calc=peval
1882
1883 # brltty seems to have problems with utf8 environment and/or font Uni3-Terminus16 under
1884 # certain circumstances, so work around it, no matter which environment we have
1885 brltty() {
1886     if [[ -z "$DISPLAY" ]] ; then
1887         consolechars -f /usr/share/consolefonts/default8x16.psf.gz
1888         command brltty "$@"
1889     else
1890         command brltty "$@"
1891     fi
1892 }
1893
1894 # just press 'asdf' keys to toggle between dvorak and us keyboard layout
1895 aoeu() {
1896     echo -n 'Switching to us keyboard layout: '
1897     [[ -z "$DISPLAY" ]] && $SUDO loadkeys us &>/dev/null || setxkbmap us &>/dev/null
1898     echo 'Done'
1899 }
1900 asdf() {
1901     echo -n 'Switching to dvorak keyboard layout: '
1902     [[ -z "$DISPLAY" ]] && $SUDO loadkeys dvorak &>/dev/null || setxkbmap dvorak &>/dev/null
1903     echo 'Done'
1904 }
1905 # just press 'asdf' key to toggle from neon layout to us keyboard layout
1906 uiae() {
1907     echo -n 'Switching to us keyboard layout: '
1908     setxkbmap us && echo 'Done' || echo 'Failed'
1909 }
1910
1911 # set up an ipv6 tunnel
1912 ipv6-tunnel() {
1913     case $1 in
1914         start)
1915             if ifconfig sit1 2>/dev/null | grep -q 'inet6 addr: 2002:.*:1::1' ; then
1916                 print 'ipv6 tunnel already set up, nothing to be done.'
1917                 print 'execute: "ifconfig sit1 down ; ifconfig sit0 down" to remove ipv6-tunnel.' ; return 1
1918             else
1919                 [[ -n "$PUBLIC_IP" ]] || \
1920                     local PUBLIC_IP=$(ifconfig $(route -n | awk '/^0\.0\.0\.0/{print $8; exit}') | \
1921                                       awk '/inet addr:/ {print $2}' | tr -d 'addr:')
1922
1923                 [[ -n "$PUBLIC_IP" ]] || { print 'No $PUBLIC_IP set and could not determine default one.' ; return 1 }
1924                 local IPV6ADDR=$(printf "2002:%02x%02x:%02x%02x:1::1" $(print ${PUBLIC_IP//./ }))
1925                 print -n "Setting up ipv6 tunnel $IPV6ADDR via ${PUBLIC_IP}: "
1926                 ifconfig sit0 tunnel ::192.88.99.1 up
1927                 ifconfig sit1 add "$IPV6ADDR" && print done || print failed
1928             fi
1929             ;;
1930         status)
1931             if ifconfig sit1 2>/dev/null | grep -q 'inet6 addr: 2002:.*:1::1' ; then
1932                 print 'ipv6 tunnel available' ; return 0
1933             else
1934                 print 'ipv6 tunnel not available' ; return 1
1935             fi
1936             ;;
1937         stop)
1938             if ifconfig sit1 2>/dev/null | grep -q 'inet6 addr: 2002:.*:1::1' ; then
1939                 print -n 'Stopping ipv6 tunnel (sit0 + sit1): '
1940                 ifconfig sit1 down ; ifconfig sit0 down && print done || print failed
1941             else
1942                 print 'No ipv6 tunnel found, nothing to be done.' ; return 1
1943             fi
1944             ;;
1945         *)
1946             print "Usage: ipv6-tunnel [start|stop|status]">&2 ; return 1
1947             ;;
1948     esac
1949 }
1950
1951 # run dhclient for wireless device
1952 iwclient() {
1953     salias dhclient "$(wavemon -d | awk '/device/{print $2}')"
1954 }
1955
1956 # spawn a minimally set up ksh - useful if you want to umount /usr/.
1957 minimal-shell() {
1958     exec env -i ENV="/etc/minimal-shellrc" HOME="$HOME" TERM="$TERM" ksh
1959 }
1960
1961 # make a backup of a file
1962 bk() {
1963     cp -a "$1" "${1}_$(date --iso-8601=seconds)"
1964 }
1965
1966 # Switching shell safely and efficiently? http://www.zsh.org/mla/workers/2001/msg02410.html
1967 # bash() {
1968 #  NO_SWITCH="yes" command bash "$@"
1969 # }
1970 # restart () {
1971 #  exec $SHELL $SHELL_ARGS "$@"
1972 # }
1973
1974 # }}}
1975
1976 # log out? set timeout in seconds {{{
1977 # TMOUT=1800
1978 # do not log out in some specific terminals:
1979 #  if [[ "${TERM}" == ([Exa]term*|rxvt|dtterm|screen*) ]] ; then
1980 #    unset TMOUT
1981 #  fi
1982 # }}}
1983
1984 # {{{ make sure our environment is clean regarding colors
1985 for color in BLUE RED GREEN CYAN WHITE ; unset $color
1986 # }}}
1987
1988 # source another config file if present {{{
1989 xsource "/etc/zsh/zshrc.local"
1990 # }}}
1991
1992 # "persistent history" {{{
1993 # just write important commands you always need to ~/.important_commands
1994 if [[ -r ~/.important_commands ]] ; then
1995     fc -R ~/.important_commands
1996 fi
1997 # }}}
1998
1999 ## genrefcard.pl settings {{{
2000 ### example: split functions-search 8,16,24,32
2001 #@# split functions-search 8
2002 ## }}}
2003
2004 # add variable to be able to check whether the file has been read {{{
2005 ZSHRC_GLOBAL_HAS_BEEN_READ=1
2006 # }}}
2007
2008 ## END OF FILE #################################################################
2009 # vim:filetype=zsh foldmethod=marker autoindent expandtab shiftwidth=4