check for most before assigning aliases dchange and uchange
[grml-etc-core.git] / etc / zsh / zshrc
index 7cf2087..a9fe3ce 100644 (file)
@@ -3,7 +3,7 @@
 # Authors:       grml-team (grml.org), (c) Michael Prokop <mika@grml.org>
 # Bug-Reports:   see http://grml.org/bugs/
 # License:       This file is licensed under the GPL v2.
-# Latest change: Fre Jän 05 19:35:27 CET 2007 [mika]
+# Latest change: Sam Mär 17 20:12:26 CET 2007 [mika]
 ################################################################################
 # This file is sourced only for interactive shells. It
 # should contain commands to set up aliases, functions,
@@ -58,6 +58,7 @@
   isutfenv() {
     case "$LANG $CHARSET $LANGUAGE" in
       *utf*) return 0 ;;
+      *UTF*) return 0 ;;
       *)     return 1 ;;
     esac
   }
@@ -79,6 +80,8 @@
 # {{{ set some variables
   export EDITOR=${EDITOR:-vim}
   export MAIL=${MAIL:-/var/mail/$USER}
+  # if we don't set $SHELL then aterm, rxvt,.. will use /bin/sh or /bin/bash :-/
+  export SHELL='/bin/zsh'
   [[ -f ~/.terminfo/m/mostlike ]] && MYLESS='LESS=C TERMINFO=~/.terminfo TERM=mostlike less' || MYLESS='less'
   [[ -x /usr/bin/dircolors ]] && eval `dircolors -b`
 
@@ -136,6 +139,24 @@ fi
   bindkey '\e[8~' end-of-line             # end
 #fi
 
+# insert unicode character
+# usage example: 'ctrl-x i' 00A7 'ctrl-x i' will give you an §
+# See for example http://unicode.org/charts/ for unicode characters code
+  autoload insert-unicode-char
+  zle -N insert-unicode-char
+  bindkey '^Xi' insert-unicode-char
+
+# just type 'cd ...' to get 'cd ../..'
+#  rationalise-dot() {
+#  if [[ $LBUFFER = *.. ]]; then
+#    LBUFFER+=/..
+#  else
+#    LBUFFER+=.
+#  fi
+#  }
+#  zle -N rationalise-dot
+#  bindkey . rationalise-dot
+
 #  bindkey '\eq' push-line-or-edit
 # }}}
 
@@ -153,18 +174,18 @@ fi
    '...' '../..'
    '....' '../../..'
    'BG' '& exit'
-   'C' '|wc -l'
+   'C' '| wc -l'
    'G' '|& grep --color=auto'
-   'H' '|head'
+   'H' '| head'
    'Hl' ' --help |& less -r'
-   'L' '|less'
+   'L' '| less'
    'LL' '|& less -r'
-   'M' '|most'
+   'M' '| most'
    'N' '&>/dev/null'
    'R' '| tr A-z N-za-m'
    'SL' '| sort | less'
    'S' '| sort -u'
-   'T' '|tail'
+   'T' '| tail'
    'V' '|& vim -'
    'hide' "echo -en '\033]50;nil2\007'"
    'tiny' 'echo -en "\033]50;-misc-fixed-medium-r-normal-*-*-80-*-*-c-*-iso8859-15\007"'
@@ -234,9 +255,7 @@ fi
   autoload history-search-end
 
   # we don't want to quote/espace URLs on our own...
-  # avoid 'url-quote-magic: function definition file not found' on some older boxes
-  if [ -f "/usr/share/zsh/$ZSH_VERSION/functions/Zle/url-quote-magic" ] && \
-     autoload -U url-quote-magic && zle -N self-insert url-quote-magic ; then
+  if autoload -U url-quote-magic ; then
      zle -N self-insert url-quote-magic
   else
      print 'Notice: no url-quote-magic available :('
@@ -321,8 +340,7 @@ fi
 # }}}
 
 # {{{ set some important options
-  # umask 022
-  umask 002
+  (( EUID != 0 )) && umask 002 || umask 022
 
 # history:
   setopt append_history       # append history list to the history file (important for multiple parallel zsh sessions!)
@@ -393,7 +411,7 @@ fi
 
 # {{{ display battery status on right side of prompt via running 'BATTERY=1 zsh'
   if [ -n "$BATTERY" ] ; then
-     if [ -x =acpi ] ; then
+     if [ -x $(which acpi) ] ; then
         PERCENT="${(C)${(s| |)$(acpi 2>/dev/null)}[4]}"
         [ -z "$PERCENT" ] && PERCENT='acpi not present'
         if [ "${PERCENT%%%}" -lt 20 ] ; then
@@ -404,7 +422,7 @@ fi
 # }}}
 
 # {{{ set prompt
-  if [ -f "/usr/share/zsh/$ZSH_VERSION/functions/Prompts/promptinit" ] && autoload promptinit && promptinit 2>/dev/null ; then
+  if autoload promptinit && promptinit 2>/dev/null ; then
      promptinit # people should be able to use their favourite prompt
   else
      print 'Notice: no promptinit available :('
@@ -551,6 +569,9 @@ ${BLUE}%n${NO_COLOUR}@%m %40<...<%B%~%b%<< %# "
      alias l='ls -lF'
   fi
 
+  alias mdstat='cat /proc/mdstat'
+  alias ...='cd ../../'
+
   alias cp='nocorrect cp'         # no spelling correction on cp
   alias mkdir='nocorrect mkdir'   # no spelling correction on mkdir
   alias mv='nocorrect mv'         # no spelling correction on mv
@@ -559,12 +580,40 @@ ${BLUE}%n${NO_COLOUR}@%m %40<...<%B%~%b%<< %# "
   alias rd='rmdir'
   alias md='mkdir'
 
-  alias swspeak="setopt singlelinezle ; unsetopt prompt_cr ; export PS1='%m%# ' ; speechd-up" # set up software synth.
+  # see http://www.cl.cam.ac.uk/~mgk25/unicode.html#term for details
+  alias term2iso="echo 'Setting terminal to iso mode' ; echo -e '\e%@'"
+  alias term2utf="echo 'Setting terminal to utf-8 mode'; echo -e '\e%G'"
+
+  alias utf2iso='if isutfenv ; then
+   for ENV in `env | grep UTF` ; do
+       eval export "$(echo $ENV | sed 's/UTF-8/iso885915/')"
+   done
+   fi'
+  alias iso2utf='if isutfenv ; then
+   for ENV in `env | grep '\.iso'` ; do
+       eval export "$(echo $ENV | sed 's/iso.*/UTF-8/')"
+   done
+   fi'
+
+# set up software synthesizer via speakup
+  alias swspeak='
+    aumix -w 90 -v 90 -p 90 -m 90
+    if ! [ -r /dev/softsynth ] ; then
+       flite -o play -t "Sorry, software synthesizer not available. Did you boot with swspeak bootoption?"
+       return 1
+    else
+       setopt singlelinezle
+       unsetopt prompt_cr
+       export PS1="%m%# "
+       nice -n -20 speechd-up
+       flite -o play -t "Finished setting up software synthesizer"
+    fi
+  '
 
   # I like clean prompt, so provide simple way to get that
   alias 0 &>/dev/null || functions 0 &>/dev/null || alias 0='return 0'
 
-# truecrypt; use e.g. via 'truec /dev/ice' /mnt/ice' or 'truec -i'
+# truecrypt; use e.g. via 'truec /dev/ice /mnt/ice' or 'truec -i'
   if [ -x /usr/sbin/truecrypt ] ; then
      if isutfenv ; then
         alias truec='truecrypt --mount-options "rw,sync,dirsync,users,uid=1000,gid=users,umask=077,utf8" '
@@ -629,8 +678,10 @@ Enjoy your grml system with the zsh!$reset_color"
     alias acp='apt-cache policy'
     alias adg="$SUDO apt-get dist-upgrade"
     alias agi="$SUDO apt-get install"
+    alias ati="$SUDO aptitude install"
     alias ag="$SUDO apt-get upgrade"
     alias au="$SUDO apt-get update"
+    alias up="$SUDO aptitude update ; $SUDO aptitude upgrade"
     alias dbp='dpkg-buildpackage'
     alias ge='grep-excuses'
 
@@ -664,8 +715,8 @@ Enjoy your grml system with the zsh!$reset_color"
   fi
 
 # if cdrecord is a symlink (to wodim) or isn't present at all warn:
-  if [ -L /usr/bin/cdrecord -o ! -x =cdrecord ] ; then
-     if [ -x =wodim ] ; then
+  if [ -L /usr/bin/cdrecord -o ! -x $(which cdrecord) ] ; then
+     if [ -x $(which wodim) ] ; then
         alias cdrecord="echo 'cdrecord is not provided under its original name by Debian anymore.
 See #377109 in the BTS of Debian for more details.
 
@@ -797,7 +848,7 @@ grmlcomp() {
   [ -d $ZSHDIR/cache ] && zstyle ':completion:*' use-cache yes && \
                           zstyle ':completion::complete:*' cache-path $ZSHDIR/cache/
 
-# host completion
+# host completion /* add brackets as vim can't parse zsh's complex cmdlines 8-) {{{ */
   if is42 ; then
     [ -r ~/.ssh/known_hosts ] && _ssh_hosts=(${${${${(f)"$(<$HOME/.ssh/known_hosts)"}:#[\|]*}%%\ *}%%,*}) || _ssh_hosts=()
     [ -r /etc/hosts ] && : ${(A)_etc_hosts:=${(s: :)${(ps:\t:)${${(f)~~"$(</etc/hosts)"}%%\#*}##[:blank:]#[^[:blank:]]#}}} || _etc_hosts=()
@@ -926,39 +977,42 @@ If you want to use xinit anyway please call \"/usr/bin/xinit\"."
   # fast manual access
   if type -p qma &>/dev/null ; then
      manzsh()  { qma zshall "$1" }
+     compdef _man qma
   else
      manzsh()  { /usr/bin/man zshall |  vim -c "se ft=man| se hlsearch" +/"$1" - ; }
      # manzsh()  { /usr/bin/man zshall |  most +/"$1" ; }
      # manzsh()  { man zshall | $MYLESS -p $1 ; }
   fi
 
-# use "dchange <package-name>" to view Debian's changelog of the package:
-  dchange() {
-    if [ -r /usr/share/doc/${1}/changelog.Debian.gz ] ; then
-       most /usr/share/doc/${1}/changelog.Debian.gz
-    else
-       if [ -r /usr/share/doc/${1}/changelog.gz ] ; then
-          most /usr/share/doc/${1}/changelog.gz
-       else
-          echo "No changelog for package $1 found, sorry."
-          return 1
-       fi
-    fi
-  }
-  _dchange() { _files -W /usr/share/doc -/ }
-  compdef _dchange dchange
-
-# use "uchange <package-name>" to view upstream's changelog of the package:
-  uchange() {
-    if [ -r /usr/share/doc/${1}/changelog.gz ] ; then
-       most /usr/share/doc/${1}/changelog.gz
-    else
-       echo "No changelog for package $1 found, sorry."
-       return 1
-    fi
-  }
-  _uchange() { _files -W /usr/share/doc -/ }
-  compdef _uchange uchange
+  if [ -x /usr/bin/most ] ; then
+  # use "dchange <package-name>" to view Debian's changelog of the package:
+    dchange() {
+      if [ -r /usr/share/doc/${1}/changelog.Debian.gz ] ; then
+         most /usr/share/doc/${1}/changelog.Debian.gz
+      else
+         if [ -r /usr/share/doc/${1}/changelog.gz ] ; then
+            most /usr/share/doc/${1}/changelog.gz
+         else
+            echo "No changelog for package $1 found, sorry."
+            return 1
+         fi
+      fi
+    }
+    _dchange() { _files -W /usr/share/doc -/ }
+    compdef _dchange dchange
+  
+  # use "uchange <package-name>" to view upstream's changelog of the package:
+    uchange() {
+      if [ -r /usr/share/doc/${1}/changelog.gz ] ; then
+         most /usr/share/doc/${1}/changelog.gz
+      else
+         echo "No changelog for package $1 found, sorry."
+         return 1
+      fi
+    }
+    _uchange() { _files -W /usr/share/doc -/ }
+    compdef _uchange uchange
+  fi
 
 # zsh profiling
   profile () {
@@ -1043,6 +1097,27 @@ If you want to use xinit anyway please call \"/usr/bin/xinit\"."
   fi
   }
 
+  # After resuming from suspend, system is paging heavilly, leading to very bad interactivity.
+  # taken from $LINUX-KERNELSOURCE/Documentation/power/swsusp.txt
+  [ -r /proc/1/maps ] && deswap() {
+     print 'Reading /proc/[0-9]*/maps and sending output to /dev/null, this might take a while.'
+     cat $(sed -ne 's:.* /:/:p' /proc/[0-9]*/maps | sort -u | grep -v '^/dev/')  > /dev/null
+     print 'Finished, running "swapoff -a; swapon -a" may also be useful.'
+  }
+
+  # print hex value of a number
+  hex() {
+    [ -n "$1" ] && printf "%x\n" $1 || { print 'Usage: hex <number-to-convert>' ; return 1 }
+  }
+
+  # calculate (or eval at all ;-)) with perl => p[erl-]eval
+  # hint: also take a look at zcalc -> 'autoload zcalc' -> 'man zshmodules | less -p MATHFUNC'
+  peval() {
+    [ -n "$1" ] && CALC="$*" || print "Usage: calc [expression]"
+    perl -e "print eval($CALC),\"\n\";"
+  }
+  functions peval &>/dev/null && alias calc=peval
+
   # Switching shell safely and efficiently? http://www.zsh.org/mla/workers/2001/msg02410.html
   # bash() {
   #  NO_SWITCH="yes" command bash "$@"