X-Git-Url: http://git.grml.org/?a=blobdiff_plain;f=etc%2Fzsh%2Fzshrc;h=dad3104769d00fe4a0d2515fce98bdab9eb00b6c;hb=a3d8018d5f6547c85a366db053d2ef22ac40e433;hp=2169cc111adac1fa5f398577dd8fb931706c4829;hpb=e1491794ce35da3eb1b7a3731f1e1b9a5e93a9a0;p=grml-etc-core.git diff --git a/etc/zsh/zshrc b/etc/zsh/zshrc index 2169cc1..dad3104 100644 --- a/etc/zsh/zshrc +++ b/etc/zsh/zshrc @@ -272,7 +272,6 @@ setopt hash_list_all # Whenever a command completion is attempted, make s setopt completeinword # not just at the end setopt nohup # and don't kill them, either setopt auto_pushd # make cd push the old directory onto the directory stack. -setopt nonomatch # try to avoid the 'zsh: no matches found...' setopt nobeep # avoid "beep"ing setopt pushd_ignore_dups # don't push the same dir twice. setopt noglobdots # * shouldn't match dotfiles. ever. @@ -288,7 +287,6 @@ COMMAND_NOT_FOUND=${COMMAND_NOT_FOUND:-0} GRML_ZSH_CNF_HANDLER=${GRML_ZSH_CNF_HANDLER:-/usr/share/command-not-found/command-not-found} BATTERY=${BATTERY:-0} GRMLSMALL_SPECIFIC=${GRMLSMALL_SPECIFIC:-1} -GRML_ALWAYS_LOAD_ALL=${GRML_ALWAYS_LOAD_ALL:-0} ZSH_NO_DEFAULT_LOCALE=${ZSH_NO_DEFAULT_LOCALE:-0} # utility functions @@ -860,7 +858,7 @@ abk=( 'co' './configure && make && sudo make install' ) -globalias() { +zleiab() { emulate -L zsh setopt extendedglob local MATCH @@ -875,8 +873,8 @@ globalias() { LBUFFER+=${abk[$MATCH]:-$MATCH} } -zle -N globalias -bindkey ",." globalias +zle -N zleiab +bindkey ",." zleiab # autoloading zrcautoload zmv # who needs mmv or rename? @@ -1428,16 +1426,6 @@ if [[ -x /sbin/kexec ]] && [[ -r /proc/cmdline ]] ; then alias "$(uname -r)-reboot"="kexec -l --initrd=/boot/initrd.img-"$(uname -r)" --command-line=\"$(cat /proc/cmdline)\" /boot/vmlinuz-"$(uname -r)"" fi -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 -alias rm='nocorrect rm' # no spelling correction on rm - -#a1# Execute \kbd{rmdir} -alias rd='rmdir' -#a1# Execute \kbd{mkdir} -alias md='mkdir' - # see http://www.cl.cam.ac.uk/~mgk25/unicode.html#term for details alias term2iso="echo 'Setting terminal to iso mode' ; print -n '\e%@'" alias term2utf="echo 'Setting terminal to utf-8 mode'; print -n '\e%G'" @@ -1462,31 +1450,12 @@ iso2utf() { fi } -# I like clean prompt, so provide simple way to get that -check_com 0 || alias 0='return 0' - -# for really lazy people like mika: -check_com S &>/dev/null || alias S='screen' -check_com s &>/dev/null || alias s='ssh' - # especially for roadwarriors using GNU screen and ssh: if ! check_com asc &>/dev/null ; then asc() { autossh -t "$@" 'screen -RdU' } compdef asc=ssh fi -# get top 10 shell commands: -alias top10='print -l ${(o)history%% *} | uniq -c | sort -nr | head -n 10' - -# truecrypt; use e.g. via 'truec /dev/ice /mnt/ice' or 'truec -i' -if check_com -c truecrypt ; then - if isutfenv ; then - alias truec='truecrypt --mount-options "rw,sync,dirsync,users,uid=1000,gid=users,umask=077,utf8" ' - else - alias truec='truecrypt --mount-options "rw,sync,dirsync,users,uid=1000,gid=users,umask=077" ' - fi -fi - #f1# Hints for the use of zsh on grml zsh-help() { print "$bg[white]$fg[black] @@ -1514,10 +1483,6 @@ very lately. System wide configuration without touching configuration files of grml can take place in /etc/zsh/zshrc.local. -Normally, the root user (EUID == 0) does not get the whole grml setup. -If you want to force the whole setup for that user, too, set -GRML_ALWAYS_LOAD_ALL=1 in .zshrc.pre in root'\''s home directory. - For information regarding zsh start at http://grml.org/zsh/ Take a look at grml'\''s zsh refcard: @@ -1582,26 +1547,6 @@ if [[ -r /etc/debian_version ]] ; then #a3# Execute \kbd{grep-excuses} alias ge='grep-excuses' - # debian upgrade - #f3# Execute \kbd{apt-get update \&\& }\\&\quad \kbd{apt-get dist-upgrade} - upgrade() { - emulate -L zsh - if [[ -z $1 ]] ; then - $SUDO apt-get update - $SUDO apt-get -u upgrade - else - ssh $1 $SUDO apt-get update - # ask before the upgrade - local dummy - ssh $1 $SUDO apt-get --no-act upgrade - echo -n 'Process the upgrade?' - read -q dummy - if [[ $dummy == "y" ]] ; then - ssh $1 $SUDO apt-get -u upgrade --yes - fi - fi - } - # get a root shell as normal user in live-cd mode: if isgrmlcd && [[ $UID -ne 0 ]] ; then alias su="sudo su" @@ -1634,35 +1579,6 @@ EOMESS fi fi -# get_tw_cli has been renamed into get_3ware -if check_com -c get_3ware ; then - get_tw_cli() { - echo 'Warning: get_tw_cli has been renamed into get_3ware. Invoking get_3ware for you.'>&2 - get_3ware - } -fi - -# I hate lacking backward compatibility, so provide an alternative therefore -if ! check_com -c apache2-ssl-certificate ; then - - apache2-ssl-certificate() { - - print 'Debian does not ship apache2-ssl-certificate anymore (see #398520). :(' - print 'You might want to take a look at Debian the package ssl-cert as well.' - print 'To generate a certificate for use with apache2 follow the instructions:' - - echo ' - -export RANDFILE=/dev/random -mkdir /etc/apache2/ssl/ -openssl req $@ -new -x509 -days 365 -nodes -out /etc/apache2/ssl/apache.pem -keyout /etc/apache2/ssl/apache.pem -chmod 600 /etc/apache2/ssl/apache.pem - -Run "grml-tips ssl-certificate" if you need further instructions. -' - } -fi - # Use hard limits, except for a smaller stack and no core dumps unlimit is425 && limit stack 8192 @@ -1879,9 +1795,6 @@ is4 && nt() { # shell functions -#f1# Provide csh compatibility -setenv() { typeset -x "${1}${1:+=}${(@)argv[2,$#]}" } # csh compatibility - #f1# Reload an autoloadable function freload() { while (( $# )); do; unfunction $1; autoload -U $1; shift; done } compdef _functions freload @@ -1897,15 +1810,6 @@ sll() { done } -# fast manual access -if check_com qma ; then - #f1# View the zsh manual - manzsh() { qma zshall "$1" } - compdef _man qma -else - manzsh() { /usr/bin/man zshall | vim -c "se ft=man| se hlsearch" +/"$1" - ; } -fi - # TODO: Is it supported to use pager settings like this? # PAGER='less -Mr' - If so, the use of $PAGER here needs fixing # with respect to wordsplitting. (ie. ${=PAGER}) @@ -2188,8 +2092,6 @@ help-zle() #k# display help for keybindings and ZLE (cycle pages with consecutive use) zle -N help-zle && bindkey '^Xz' help-zle -check_com -c qma && alias ?='qma zshall' - # grep for running process, like: 'any vim' any() { emulate -L zsh @@ -2212,96 +2114,6 @@ deswap() { print 'Finished, running "swapoff -a; swapon -a" may also be useful.' } -# print hex value of a number -hex() { - emulate -L zsh - [[ -n "$1" ]] && printf "%x\n" $1 || { print 'Usage: hex ' ; 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 - -# just press 'asdf' keys to toggle between dvorak and us keyboard layout -aoeu() { - echo -n 'Switching to us keyboard layout: ' - [[ -z "$DISPLAY" ]] && $SUDO loadkeys us &>/dev/null || setxkbmap us &>/dev/null - echo 'Done' -} -asdf() { - echo -n 'Switching to dvorak keyboard layout: ' - [[ -z "$DISPLAY" ]] && $SUDO loadkeys dvorak &>/dev/null || setxkbmap dvorak &>/dev/null - echo 'Done' -} -# just press 'asdf' key to toggle from neon layout to us keyboard layout -uiae() { - echo -n 'Switching to us keyboard layout: ' - setxkbmap us && echo 'Done' || echo 'Failed' -} - -# set up an ipv6 tunnel -ipv6-tunnel() { - emulate -L zsh - case $1 in - start) - if ifconfig sit1 2>/dev/null | grep -q 'inet6 addr: 2002:.*:1::1' ; then - print 'ipv6 tunnel already set up, nothing to be done.' - print 'execute: "ifconfig sit1 down ; ifconfig sit0 down" to remove ipv6-tunnel.' ; return 1 - else - [[ -n "$PUBLIC_IP" ]] || \ - local PUBLIC_IP=$(ifconfig $(route -n | awk '/^0\.0\.0\.0/{print $8; exit}') | \ - awk '/inet addr:/ {print $2}' | tr -d 'addr:') - - [[ -n "$PUBLIC_IP" ]] || { print 'No $PUBLIC_IP set and could not determine default one.' ; return 1 } - local IPV6ADDR=$(printf "2002:%02x%02x:%02x%02x:1::1" $(print ${PUBLIC_IP//./ })) - print -n "Setting up ipv6 tunnel $IPV6ADDR via ${PUBLIC_IP}: " - ifconfig sit0 tunnel ::192.88.99.1 up - ifconfig sit1 add "$IPV6ADDR" && print done || print failed - fi - ;; - status) - if ifconfig sit1 2>/dev/null | grep -q 'inet6 addr: 2002:.*:1::1' ; then - print 'ipv6 tunnel available' ; return 0 - else - print 'ipv6 tunnel not available' ; return 1 - fi - ;; - stop) - if ifconfig sit1 2>/dev/null | grep -q 'inet6 addr: 2002:.*:1::1' ; then - print -n 'Stopping ipv6 tunnel (sit0 + sit1): ' - ifconfig sit1 down ; ifconfig sit0 down && print done || print failed - else - print 'No ipv6 tunnel found, nothing to be done.' ; return 1 - fi - ;; - *) - print "Usage: ipv6-tunnel [start|stop|status]">&2 ; return 1 - ;; - esac -} - -# run dhclient for wireless device -iwclient() { - sudo dhclient "$(wavemon -d | awk '/device/{print $3}')" -} - -# spawn a minimally set up mksh - useful if you want to umount /usr/. -minimal-shell() { - emulate -L zsh - local shell="/bin/mksh" - - if [[ ! -x ${shell} ]]; then - printf '`%s'\'' not available, giving up.\n' ${shell} >&2 - return 1 - fi - - exec env -i ENV="/etc/minimal-shellrc" HOME="$HOME" TERM="$TERM" ${shell} -} - # a wrapper for vim, that deals with title setting # VIM_OPTIONS # set this array to a set of options to vim you always want @@ -2318,61 +2130,6 @@ bk() { cp -a "$1" "${1}_$(date --iso-8601=seconds)" } -#f1# grep for patterns in grml's zsh setup -zg() { - LANG=C perl -e ' - -sub usage { - print "usage: zg -[anr] \n"; - print " Search for patterns in grml'\''s zshrc.\n"; - print " zg takes no or exactly one option plus a non empty pattern.\n\n"; - print " options:\n"; - print " -- no options (use if your pattern starts in with a dash.\n"; - print " -a search for the pattern in all code regions\n"; - print " -n search for the pattern in non-root code only\n"; - print " -r search in code for everyone (also root) only\n\n"; - print " The default is -a for non-root users and -r for root.\n\n"; - print " If you installed the zshrc to a non-default locations (ie *NOT*\n"; - print " in /etc/zsh/zshrc) do: export GRML_ZSHRC=\$HOME/.zshrc\n"; - print " ...in case you copied the file to that location.\n\n"; - exit 1; -} - -if ($ENV{GRML_ZSHRC} ne "") { - $RC = $ENV{GRML_ZSHRC}; -} else { - $RC = "/etc/zsh/zshrc"; -} - -usage if ($#ARGV < 0 || $#ARGV > 1); -if ($> == 0) { $mode = "allonly"; } -else { $mode = "all"; } - -$opt = $ARGV[0]; -if ($opt eq "--") { shift; } -elsif ($opt eq "-a") { $mode = "all"; shift; } -elsif ($opt eq "-n") { $mode = "nonroot"; shift; } -elsif ($opt eq "-r" ) { $mode = "allonly"; shift; } -elsif ($opt =~ m/^-/ || $#ARGV > 0) { usage(); } - -$pattern = $ARGV[0]; -usage() if ($pattern eq ""); - -open FH, "<$RC" or die "zg: Could not open $RC: $!\n"; -while ($line = ) { - chomp $line; - if ($line =~ m/^#:grep:marker:for:mika:/) { $markerfound = 1; next; } - next if ($mode eq "nonroot" && markerfound == 0); - break if ($mode eq "allonly" && markerfound == 1); - print $line, "\n" if ($line =~ /$pattern/); -} -close FH; -exit 0; - - ' -- "$@" - return $? -} - ssl_hashes=( sha512 sha256 sha1 md5 ) for sh in ${ssl_hashes}; do @@ -2420,54 +2177,19 @@ fi # load the lookup subsystem if it's available on the system zrcautoload lookupinit && lookupinit -#:grep:marker:for:mika: :-) -### non-root (EUID != 0) code below -### - -if (( GRML_ALWAYS_LOAD_ALL == 0 )) && (( $EUID == 0 )) ; then - zrclocal - return 0 -fi - # variables # set terminal property (used e.g. by msgid-chooser) export COLORTERM="yes" -#m# v QTDIR \kbd{/usr/share/qt[34]}\quad [for non-root only] -[[ -d /usr/share/qt3 ]] && export QTDIR=/usr/share/qt3 -[[ -d /usr/share/qt4 ]] && export QTDIR=/usr/share/qt4 - -# support running 'jikes *.java && jamvm HelloWorld' OOTB: -#v# [for non-root only] -[[ -f /usr/share/classpath/glibj.zip ]] && export JIKESPATH=/usr/share/classpath/glibj.zip - # aliases -# Xterm resizing-fu. -# Based on http://svn.kitenet.net/trunk/home-full/.zshrc?rev=11710&view=log (by Joey Hess) -alias hide='echo -en "\033]50;nil2\007"' -alias tiny='echo -en "\033]50;-misc-fixed-medium-r-normal-*-*-80-*-*-c-*-iso8859-15\007"' -alias small='echo -en "\033]50;6x10\007"' -alias medium='echo -en "\033]50;-misc-fixed-medium-r-normal--13-120-75-75-c-80-iso8859-15\007"' -alias default='echo -e "\033]50;-misc-fixed-medium-r-normal-*-*-140-*-*-c-*-iso8859-15\007"' -alias large='echo -en "\033]50;-misc-fixed-medium-r-normal-*-*-150-*-*-c-*-iso8859-15\007"' -alias huge='echo -en "\033]50;-misc-fixed-medium-r-normal-*-*-210-*-*-c-*-iso8859-15\007"' -alias smartfont='echo -en "\033]50;-artwiz-smoothansi-*-*-*-*-*-*-*-*-*-*-*-*\007"' -alias semifont='echo -en "\033]50;-misc-fixed-medium-r-semicondensed-*-*-120-*-*-*-*-iso8859-15\007"' - # general #a2# Execute \kbd{du -sch} alias da='du -sch' #a2# Execute \kbd{jobs -l} alias j='jobs -l' -# compile stuff -#a2# Execute \kbd{./configure} -alias CO="./configure" -#a2# Execute \kbd{./configure --help} -alias CH="./configure --help" - # listing stuff #a2# Execute \kbd{ls -lSrah} alias dir="ls -lSrah" @@ -2496,30 +2218,10 @@ alias lsold="ls -rtlh *(D.Om[1,10])" # display the oldest files #a2# Display the ten smallest files alias lssmall="ls -Srl *(.oL[1,10])" # display the smallest files -# chmod -#a2# Execute \kbd{chmod 600} -alias rw-='chmod 600' -#a2# Execute \kbd{chmod 700} -alias rwx='chmod 700' -#m# a2 r-{}- Execute \kbd{chmod 644} -alias r--='chmod 644' -#a2# Execute \kbd{chmod 755} -alias r-x='chmod 755' - # some useful aliases -#a2# Execute \kbd{mkdir -p} -alias md='mkdir -p' #a2# Remove current empty directory. Execute \kbd{cd ..; rmdir $OLDCWD} alias rmcdir='cd ..; rmdir $OLDPWD || cd $OLDPWD' -# console stuff -#a2# Execute \kbd{mplayer -vo fbdev} -alias cmplayer='mplayer -vo fbdev' -#a2# Execute \kbd{mplayer -vo fbdev -fs -zoom} -alias fbmplayer='mplayer -vo fbdev -fs -zoom' -#a2# Execute \kbd{links2 -driver fb} -alias fblinks='links2 -driver fb' - #a2# ssh with StrictHostKeyChecking=no \\&\quad and UserKnownHostsFile unset alias insecssh='ssh -o "StrictHostKeyChecking=no" -o "UserKnownHostsFile=/dev/null"' alias insecscp='scp -o "StrictHostKeyChecking=no" -o "UserKnownHostsFile=/dev/null"' @@ -2527,9 +2229,6 @@ alias insecscp='scp -o "StrictHostKeyChecking=no" -o "UserKnownHostsFile=/dev/nu # simple webserver check_com -c python && alias http="python -m SimpleHTTPServer" -# Use 'g' instead of 'git': -check_com g || alias g='git' - # work around non utf8 capable software in utf environment via $LANG and luit if check_com isutfenv && check_com luit ; then if check_com -c mrxvt ; then @@ -2550,160 +2249,18 @@ fi # useful functions -# searching -#f4# Search for newspostings from authors -agoogle() { ${=BROWSER} "http://groups.google.com/groups?as_uauthors=$*" ; } -#f4# Search Debian Bug Tracking System -debbug() { - emulate -L zsh - setopt extendedglob - if [[ $# -eq 1 ]]; then - case "$1" in - ([0-9]##) - ${=BROWSER} "http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=$1" - ;; - (*@*) - ${=BROWSER} "http://bugs.debian.org/cgi-bin/pkgreport.cgi?submitter=$1" - ;; - (*) - ${=BROWSER} "http://bugs.debian.org/$*" - ;; - esac - else - print "$0 needs one argument" - return 1 - fi -} -#f4# Search Debian Bug Tracking System in mbox format -debbugm() { - emulate -L zsh - bts show --mbox $1 -} -#f4# Search DMOZ -dmoz() { - emulate -L zsh - ${=BROWSER} http://search.dmoz.org/cgi-bin/search\?search=${1// /_} -} -#f4# Search German Wiktionary -dwicti() { - emulate -L zsh - ${=BROWSER} http://de.wiktionary.org/wiki/${(C)1// /_} -} -#f4# Search English Wiktionary -ewicti() { - emulate -L zsh - ${=BROWSER} http://en.wiktionary.org/wiki/${(C)1// /_} -} -#f4# Search Google Groups -ggogle() { - emulate -L zsh - ${=BROWSER} "http://groups.google.com/groups?q=$*" -} -#f4# Search Google -google() { - emulate -L zsh - ${=BROWSER} "http://www.google.com/search?&num=100&q=$*" -} -#f4# Search Google Groups for MsgID -mggogle() { - emulate -L zsh - ${=BROWSER} "http://groups.google.com/groups?selm=$*" -} -#f4# Search Netcraft -netcraft(){ - emulate -L zsh - ${=BROWSER} "http://toolbar.netcraft.com/site_report?url=$1" -} -#f4# Use German Wikipedia's full text search -swiki() { - emulate -L zsh - ${=BROWSER} http://de.wikipedia.org/wiki/Spezial:Search/${(C)1} -} -#f4# search \kbd{dict.leo.org} -oleo() { - emulate -L zsh - ${=BROWSER} "http://dict.leo.org/?search=$*" -} -#f4# Search German Wikipedia -wikide() { - emulate -L zsh - ${=BROWSER} http://de.wikipedia.org/wiki/"${(C)*}" -} -#f4# Search English Wikipedia -wikien() { - emulate -L zsh - ${=BROWSER} http://en.wikipedia.org/wiki/"${(C)*}" -} -#f4# Search official debs -wodeb() { - emulate -L zsh - ${=BROWSER} "http://packages.debian.org/search?keywords=$1&searchon=contents&suite=${2:=unstable}§ion=all" -} - -#m# f4 gex() Exact search via Google -check_com google && gex () { - google "\"[ $1]\" $*" -} - -# misc #f5# Backup \kbd{file {\rm to} file\_timestamp} bk() { emulate -L zsh cp -b $1 $1_`date --iso-8601=m` } -#f5# Copied diff -cdiff() { - emulate -L zsh - diff -crd "$@" | egrep -v "^Only in |^Binary files " -} + #f5# cd to directoy and list files cl() { emulate -L zsh cd $1 && ls -a } -#f5# Cvs add -cvsa() { - emulate -L zsh - cvs add $* && cvs com -m 'initial checkin' $* -} -#f5# Cvs diff -cvsd() { - emulate -L zsh - cvs diff -N $* |& $PAGER -} -#f5# Cvs log -cvsl() { - emulate -L zsh - cvs log $* |& $PAGER -} -#f5# Cvs update -cvsq() { - emulate -L zsh - cvs -nq update -} -#f5# Rcs2log -cvsr() { - emulate -L zsh - rcs2log $* | $PAGER -} -#f5# Cvs status -cvss() { - emulate -L zsh - cvs status -v $* -} -#f5# Disassemble source files using gcc and as -disassemble(){ - emulate -L zsh - gcc -pipe -S -o - -O -g $* | as -aldh -o /dev/null -} -#f5# Firefox remote control - open given URL -fir() { - if [ -e /etc/debian_version ]; then - firefox -a iceweasel -remote "openURL($1)" || firefox ${1}& - else - firefox -a firefox -remote "openURL($1)" || firefox ${1}& - fi -} + # smart cd function, allows switching to /etc when running 'cd /etc/fstab' cd() { if (( ${#argv} == 1 )) && [[ -f ${1} ]]; then @@ -2716,9 +2273,10 @@ cd() { } #f5# Create Directoy and \kbd{cd} to it -mcd() { +mkcd() { mkdir -p "$@" && cd "$@" } + #f5# Create temporary directory and \kbd{cd} to it cdt() { local t @@ -2726,10 +2284,6 @@ cdt() { echo "$t" builtin cd "$t" } -#f5# Unified diff to timestamped outputfile -mdiff() { - diff -udrP "$1" "$2" > diff.`date "+%Y-%m-%d"`."$1" -} #f5# Create directory under cursor or the selected area # Press ctrl-xM to create the directory under the cursor or the selected area. @@ -2765,93 +2319,6 @@ inplaceMkDirs() { #k# mkdir -p from string under cursor or marked area zle -N inplaceMkDirs && bindkey '^XM' inplaceMkDirs -#f5# Memory overview -memusage() { - ps aux | awk '{if (NR > 1) print $5; if (NR > 2) print "+"} END { print "p" }' | dc -} -#f5# Show contents of gzipped tar file -shtar() { - emulate -L zsh - gunzip -c $1 | tar -tf - -- | $PAGER -} -#f5# Show contents of zip file -shzip() { - emulate -L zsh - unzip -l $1 | $PAGER -} -#f5# Unified diff -udiff() { - emulate -L zsh - diff -urd $* | egrep -v "^Only in |^Binary files " -} -#f5# (Mis)use \kbd{vim} as \kbd{less} -viless() { - emulate -L zsh - vim --cmd 'let no_plugin_maps = 1' -c "so \$VIMRUNTIME/macros/less.vim" "${@:--}" -} - -# Function Usage: uopen $URL/$file -#f5# Download a file and display it locally -uopen() { - emulate -L zsh - if ! [[ -n "$1" ]] ; then - print "Usage: uopen \$URL/\$file">&2 - return 1 - else - FILE=$1 - MIME=$(curl --head $FILE | grep Content-Type | cut -d ' ' -f 2 | cut -d\; -f 1) - MIME=${MIME%$'\r'} - curl $FILE | see ${MIME}:- - fi -} - -# Function Usage: doc packagename -#f5# \kbd{cd} to /usr/share/doc/\textit{package} -doc() { - emulate -L zsh - cd /usr/share/doc/$1 && ls -} -_doc() { _files -W /usr/share/doc -/ } -check_com compdef && compdef _doc doc - -#f5# Make screenshot -sshot() { - [[ ! -d ~/shots ]] && mkdir ~/shots - #cd ~/shots ; sleep 5 ; import -window root -depth 8 -quality 80 `date "+%Y-%m-%d--%H:%M:%S"`.png - cd ~/shots ; sleep 5; import -window root shot_`date --iso-8601=m`.jpg -} - -# list images only -limg() { - local -a images - images=( *.{jpg,gif,png}(.N) ) - - if [[ $#images -eq 0 ]] ; then - print "No image files found" - else - ls "$images[@]" - fi -} - -#f5# Create PDF file from source code -makereadable() { - emulate -L zsh - output=$1 - shift - a2ps --medium A4dj -E -o $output $* - ps2pdf $output -} - -# zsh with perl-regex - use it e.g. via: -# regcheck '\s\d\.\d{3}\.\d{3} Euro' ' 1.000.000 Euro' -#f5# Checks whether a regex matches or not.\\&\quad Example: \kbd{regcheck '.\{3\} EUR' '500 EUR'} -regcheck() { - emulate -L zsh - zmodload -i zsh/pcre - pcre_compile $1 && \ - pcre_match $2 && echo "regex matches" || echo "regex does not match" -} - #f5# List files which have been accessed within the last {\it n} days, {\it n} defaults to 1 accessed() { emulate -L zsh @@ -2872,84 +2339,9 @@ modified() { # modified() was named new() in earlier versions, add an alias for backwards compatibility check_com new || alias new=modified -#f5# Grep in history -greph() { - emulate -L zsh - history 0 | grep $1 -} # use colors when GNU grep with color-support #a2# Execute \kbd{grep -{}-color=auto} (grep --help 2>/dev/null |grep -- --color) >/dev/null && alias grep='grep --color=auto' -#a2# Execute \kbd{grep -i -{}-color=auto} -alias GREP='grep -i --color=auto' - -#f5# Watch manpages in a stretched style -man2() { PAGER='dash -c "sed G | /usr/bin/less"' command man "$@" ; } - -# usage example: 'lcheck strcpy' -#f5# Find out which libs define a symbol -lcheck() { - if [[ -n "$1" ]] ; then - nm -go /usr/lib/lib*.a 2>/dev/null | grep ":[[:xdigit:]]\{8\} . .*$1" - else - echo "Usage: lcheck " >&2 - fi -} - -#f5# Clean up directory - remove well known tempfiles -purge() { - emulate -L zsh - setopt HIST_SUBST_PATTERN - local -a TEXTEMPFILES GHCTEMPFILES PYTEMPFILES FILES - TEXTEMPFILES=(*.tex(N:s/%tex/'(log|toc|aux|nav|snm|out|tex.backup|bbl|blg|bib.backup|vrb|lof|lot|hd|idx)(N)'/)) - GHCTEMPFILES=(*.(hs|lhs)(N:r:s/%/'.(hi|hc|(p|u|s)_(o|hi))(N)'/)) - PYTEMPFILES=(*.py(N:s/%py/'(pyc|pyo)(N)'/)) - LONELY_MOOD_FILES=((*.mood)(.NDe:'local -a AF;AF=( ${${REPLY#.}%mood}(mp3|flac|ogg|asf|wmv|aac)(N) ); [[ -z "$AF" ]]':)) - ZSH_COMPILED=(*.zwc(.NDe:'[[ -f ${REPLY%.zwc} && ${REPLY%.zwc} -nt ${REPLY} ]]':)) - FILES=(*~(.N) \#*\#(.N) *.o(.N) a.out(.N) (*.|)core(.N) *.cmo(.N) *.cmi(.N) .*.swp(.N) *.(orig|rej)(.DN) *.dpkg-(old|dist|new)(DN) ._(cfg|mrg)[0-9][0-9][0-9][0-9]_*(N) ${~TEXTEMPFILES} ${~GHCTEMPFILES} ${~PYTEMPFILES} ${LONELY_MOOD_FILES} ${ZSH_COMPILED} ) - local NBFILES=${#FILES} - local CURDIRSUDO="" - [[ ! -w ./ ]] && CURDIRSUDO=$SUDO - if [[ $NBFILES > 0 ]] ; then - print -l $FILES - local ans - echo -n "Remove these files? [y/n] " - read -q ans; echo - if [[ $ans == "y" ]] ; then - $CURDIRSUDO rm ${FILES} - echo ">> $PWD purged, $NBFILES files removed" - else - echo "Ok. .. then not.." - fi - fi -} - -#f5# show labels and uuids of disk devices -if is439 && [[ -d /dev/disk/by-id/ ]]; then - lsdisk() { - emulate -L zsh - setopt extendedglob - local -a -U disks - local -A mountinfo - disks=( /dev/disk/by-id/*(@:A) ) - [[ -r /proc/mounts ]] && for cline ( "${(f)$(}/${dev:t}/size(N) ) \ - print -f " Size: %.3f GiB (%d Byte)\n" $(($(<$sysdevsize)/(2.0*1024.0*1024.0))) $(($(<$sysdevsize)*512)) - - print -f " Id: %s\n" /dev/disk/by-id/*(@e/'[[ ${REPLY:A} == $dev ]]'/N:t) - done - } -fi - -#f5# run command or function in a list of directories -rundirs() { - local d CMD STARTDIR=$PWD - CMD=$1; shift - ( for d ($@) {cd -q $d && { print cd $d; ${(z)CMD} ; cd -q $STARTDIR }} ) -} # Translate DE<=>EN # 'translate' looks up fot a word in a file with language-to-language @@ -2977,42 +2369,6 @@ trans() { esac } -#f5# List all occurrences of programm in current PATH -plap() { - emulate -L zsh - if [[ $# = 0 ]] ; then - echo "Usage: $0 program" - echo "Example: $0 zsh" - echo "Lists all occurrences of program in the current PATH." - else - ls -l ${^path}/*$1*(*N) - fi -} - -# Found in the mailinglistarchive from Zsh (IIRC ~1996) -#f5# Select items for specific command(s) from history -selhist() { - emulate -L zsh - local TAB=$'\t'; - (( $# < 1 )) && { - echo "Usage: $0 command" - return 1 - }; - cmd=(${(f)"$(grep -w $1 $HISTFILE | sort | uniq | pr -tn)"}) - print -l $cmd | less -F - echo -n "enter number of desired command [1 - $(( ${#cmd[@]} - 1 ))]: " - local answer - read answer - print -z "${cmd[$answer]#*$TAB}" -} - -# Use vim to convert plaintext to HTML -#f5# Transform files to html with highlighting -2html() { - emulate -L zsh - vim -u NONE -n -c ':syntax on' -c ':so $VIMRUNTIME/syntax/2html.vim' -c ':wqa' $1 &>/dev/null -} - # Usage: simple-extract # Using option -d deletes the original archive file. #f5# Smart archive extractor @@ -3167,226 +2523,6 @@ _simple_extract() compdef _simple_extract simple-extract alias se=simple-extract -# Usage: smartcompress () -#f5# Smart archive creator -smartcompress() { - emulate -L zsh - if [[ -n $2 ]] ; then - case $2 in - tgz | tar.gz) tar -zcvf$1.$2 $1 ;; - tbz2 | tar.bz2) tar -jcvf$1.$2 $1 ;; - tar.Z) tar -Zcvf$1.$2 $1 ;; - tar) tar -cvf$1.$2 $1 ;; - gz | gzip) gzip $1 ;; - bz2 | bzip2) bzip2 $1 ;; - *) - echo "Error: $2 is not a valid compression type" - ;; - esac - else - smartcompress $1 tar.gz - fi -} - -# Usage: show-archive -#f5# List an archive's content -show-archive() { - emulate -L zsh - if [[ -f $1 ]] ; then - case $1 in - *.tar.gz) gunzip -c $1 | tar -tf - -- ;; - *.tar) tar -tf $1 ;; - *.tgz) tar -ztf $1 ;; - *.zip) unzip -l $1 ;; - *.bz2) bzless $1 ;; - *.deb) dpkg-deb --fsys-tarfile $1 | tar -tf - -- ;; - *) echo "'$1' Error. Please go away" ;; - esac - else - echo "'$1' is not a valid archive" - fi -} - -# It's shameless stolen from -#f5# Use \kbd{vim} as your manpage reader -vman() { - emulate -L zsh - if (( ${#argv} == 0 )); then - printf 'usage: vman \n' - return 1 - fi - man "$@" | col -b | view -c 'set ft=man nomod nolist' - -} - -# function readme() { $PAGER -- (#ia3)readme* } -#f5# View all README-like files in current directory in pager -readme() { - emulate -L zsh - setopt extendedglob - local files - files=(./(#i)*(read*me|lue*m(in|)ut|lies*mich)*(NDr^/=p%)) - if (($#files)) ; then - $PAGER $files - else - print 'No README files.' - fi -} - -# function ansi-colors() -#f5# Display ANSI colors -ansi-colors() { - typeset esc="\033[" line1 line2 - echo " _ _ _40 _ _ _41_ _ _ _42 _ _ 43_ _ _ 44_ _ _45 _ _ _ 46_ _ _ 47_ _ _ 49_ _" - for fore in 30 31 32 33 34 35 36 37; do - line1="$fore " - line2=" " - for back in 40 41 42 43 44 45 46 47 49; do - line1="${line1}${esc}${back};${fore}m Normal ${esc}0m" - line2="${line2}${esc}${back};${fore};1m Bold ${esc}0m" - done - echo -e "$line1\n$line2" - done -} - -#f5# Find all files in \$PATH with setuid bit set -suidfind() { ls -latg $path | grep '^...s' } - -# TODO: So, this is the third incarnation of this function!? -#f5# Reload given functions -refunc() { - for func in $argv ; do - unfunction $func - autoload $func - done -} -compdef _functions refunc - -# a small check to see which DIR is located on which server/partition. -# stolen and modified from Sven's zshrc.forall -#f5# Report diskusage of a directory -dirspace() { - emulate -L zsh - if [[ -n "$1" ]] ; then - for dir in "$@" ; do - if [[ -d "$dir" ]] ; then - ( cd $dir; echo "-<$dir>"; du -shx .; echo); - else - echo "warning: $dir does not exist" >&2 - fi - done - else - for dir in $path; do - if [[ -d "$dir" ]] ; then - ( cd $dir; echo "-<$dir>"; du -shx .; echo); - else - echo "warning: $dir does not exist" >&2 - fi - done - fi -} - -# % slow_print `cat /etc/passwd` -#f5# Slowly print out parameters -slow_print() { - for argument in "$@" ; do - for ((i = 1; i <= ${#1} ;i++)) ; do - print -n "${argument[i]}" - sleep 0.08 - done - print -n " " - done - print "" -} - -#f5# Show some status info -status() { - print - print "Date..: "$(date "+%Y-%m-%d %H:%M:%S") - print "Shell.: Zsh $ZSH_VERSION (PID = $$, $SHLVL nests)" - print "Term..: $TTY ($TERM), ${BAUD:+$BAUD bauds, }$COLUMNS x $LINES chars" - print "Login.: $LOGNAME (UID = $EUID) on $HOST" - print "System: $(cat /etc/[A-Za-z]*[_-][rv]e[lr]*)" - print "Uptime:$(uptime)" - print -} - -# Rip an audio CD -#f5# Rip an audio CD -audiorip() { - mkdir -p ~/ripps - cd ~/ripps - cdrdao read-cd --device $DEVICE --driver generic-mmc audiocd.toc - cdrdao read-cddb --device $DEVICE --driver generic-mmc audiocd.toc - echo " * Would you like to burn the cd now? (yes/no)" - read input - if [[ "$input" = "yes" ]] ; then - echo " ! Burning Audio CD" - audioburn - echo " * done." - else - echo " ! Invalid response." - fi -} - -# and burn it -#f5# Burn an audio CD (in combination with audiorip) -audioburn() { - cd ~/ripps - cdrdao write --device $DEVICE --driver generic-mmc audiocd.toc - echo " * Should I remove the temporary files? (yes/no)" - read input - if [[ "$input" = "yes" ]] ; then - echo " ! Removing Temporary Files." - cd ~ - rm -rf ~/ripps - echo " * done." - else - echo " ! Invalid response." - fi -} - -#f5# Make an audio CD from all mp3 files -mkaudiocd() { - # TODO: do the renaming more zshish, possibly with zmv() - emulate -L zsh - cd ~/ripps - for i in *.[Mm][Pp]3; do mv "$i" `echo $i | tr '[A-Z]' '[a-z]'`; done - for i in *.mp3; do mv "$i" `echo $i | tr ' ' '_'`; done - for i in *.mp3; do mpg123 -w `basename $i .mp3`.wav $i; done - normalize -m *.wav - for i in *.wav; do sox $i.wav -r 44100 $i.wav resample; done -} - -#f5# Create an ISO image. You are prompted for\\&\quad volume name, filename and directory -mkiso() { - emulate -L zsh - echo " * Volume name " - read volume - echo " * ISO Name (ie. tmp.iso)" - read iso - echo " * Directory or File" - read files - mkisofs -o ~/$iso -A $volume -allow-multidot -J -R -iso-level 3 -V $volume -R $files -} - -#f5# Simple thumbnails generator -genthumbs() { - rm -rf thumb-* index.html - echo " - - - Images - - " > index.html - for f in *.(gif|jpeg|jpg|png) ; do - convert -size 100x200 "$f" -resize 100x200 thumb-"$f" - echo " " >> index.html - done - echo " - -" >> index.html -} - #f5# Set all ulimit parameters to \kbd{unlimited} allulimit() { ulimit -c unlimited @@ -3398,74 +2534,6 @@ allulimit() { ulimit -t unlimited } -#f5# RFC 2396 URL encoding in Z-Shell -urlencode() { - emulate -L zsh - setopt extendedglob - input=( ${(s::)1} ) - print ${(j::)input/(#b)([^A-Za-z0-9_.!~*\'\(\)-])/%${(l:2::0:)$(([##16]#match))}} -} - -# http://strcat.de/blog/index.php?/archives/335-Software-sauber-deinstallieren...html -#f5# Log 'make install' output -mmake() { - emulate -L zsh - [[ ! -d ~/.errorlogs ]] && mkdir ~/.errorlogs - make -n install > ~/.errorlogs/${PWD##*/}-makelog -} - -#f5# Indent source code -smart-indent() { - indent -npro -kr -i8 -ts8 -sob -l80 -ss -ncs "$@" -} - -# highlight important stuff in diff output, usage example: hg diff | hidiff -#m# a2 hidiff \kbd{histring} oneliner for diffs -check_com -c histring && \ - alias hidiff="histring -fE '^Comparing files .*|^diff .*' | histring -c yellow -fE '^\-.*' | histring -c green -fE '^\+.*'" - -# rename pictures based on information found in exif headers -#f5# Rename pictures based on information found in exif headers -exirename() { - emulate -L zsh - if [[ $# -lt 1 ]] ; then - echo 'Usage: jpgrename $FILES' >& 2 - return 1 - else - echo -n 'Checking for jhead with version newer than 1.9: ' - jhead_version=`jhead -h | grep 'used by most Digital Cameras. v.*' | awk '{print $6}' | tr -d v` - if [[ $jhead_version > '1.9' ]]; then - echo 'success - now running jhead.' - jhead -n%Y-%m-%d_%Hh%M_%f $* - else - echo 'failed - exiting.' - fi - fi -} - -# get_ic() - queries imap servers for capabilities; real simple. no imaps -ic_get() { - emulate -L zsh - local port - if [[ ! -z $1 ]] ; then - port=${2:-143} - print "querying imap server on $1:${port}...\n"; - print "a1 capability\na2 logout\n" | nc $1 ${port} - else - print "usage:\n $0 [port]" - fi -} - -# creates a Maildir/ with its {new,cur,tmp} subdirs -mkmaildir() { - emulate -L zsh - local root subdir - root=${MAILDIR_ROOT:-${HOME}/Mail} - if [[ -z ${1} ]] ; then print "Usage:\n $0 " ; return 1 ; fi - subdir=${1} - mkdir -p ${root}/${subdir}/{cur,new,tmp} -} - #f5# Change the xterm title from within GNU-screen xtrename() { emulate -L zsh @@ -3605,50 +2673,6 @@ if check_com -c hg ; then fi # end of check whether we have the 'hg'-executable -# some useful commands often hard to remember - let's grep for them -# actually use our zg() function now. :) - -# Work around ion/xterm resize bug. -#if [[ "$SHLVL" -eq 1 ]]; then -# if check_com -c resize ; then -# eval `resize Packages.gz -# dpkg-scansources . | gzip > Sources.gz -# grep-dctrl --field Maintainer $* /var/lib/apt/lists/* - -# other stuff: -# convert -geometry 200x200 -interlace LINE -verbose -# ldapsearch -x -b "OU=Bedienstete,O=tug" -h ldap.tugraz.at sn=$1 -# ps -ao user,pcpu,start,command -# gpg --keyserver blackhole.pca.dfn.de --recv-keys -# xterm -bg black -fg yellow -fn -misc-fixed-medium-r-normal--14-140-75-75-c-90-iso8859-15 -ah -# nc -vz $1 1-1024 # portscan via netcat -# wget --mirror --no-parent --convert-links -# pal -d `date +%d` -# autoload -U tetris; zle -N tetris; bindkey '...' ; echo "press ... for playing tennis" -# -# modify console cursor -# see http://www.tldp.org/HOWTO/Framebuffer-HOWTO-5.html -# print $'\e[?96;0;64c' - # grml-small cleanups # The following is used to remove zsh-config-items that do not work