X-Git-Url: http://git.grml.org/?a=blobdiff_plain;f=etc%2Fzsh%2Fzshrc;h=0afb4d218cebf75bd9319507d239181af158275e;hb=270ae2f9adf848f4a4244ed460deb3c6b74ab16a;hp=3e0257077230fcc8391c404df836a70dfddf0bce;hpb=f1005a112b5cb847d70593235f65f3901a23f48c;p=grml-etc-core.git diff --git a/etc/zsh/zshrc b/etc/zsh/zshrc index 3e02570..0afb4d2 100644 --- a/etc/zsh/zshrc +++ b/etc/zsh/zshrc @@ -2243,52 +2243,6 @@ uiae() { 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 @@ -2318,61 +2272,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,7 +2319,6 @@ 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 ### @@ -2550,160 +2448,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 @@ -2726,10 +2482,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,46 +2517,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() { @@ -2821,37 +2533,6 @@ sshot() { 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,85 +2553,12 @@ 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 # translations (field separator should be " : "). A typical wordlist looks @@ -2977,42 +2585,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 @@ -3207,17 +2779,6 @@ show-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' - -} - # TODO: So, this is the third incarnation of this function!? #f5# Reload given functions refunc() { @@ -3383,50 +2944,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