-# Filename: zshrc
+# Filename: /etc/zsh/zshrc
# Purpose: config file for zsh (z shell)
# Authors: grml-team (grml.org), (c) Michael Prokop <mika@grml.org>
# Bug-Reports: see http://grml.org/bugs/
# Global Order: zshenv, zprofile, zshrc, zlogin
################################################################################
+# Contributing:
+# If you want to help to improve grml's zsh setup, clone the grml-etc-core
+# repository from git.grml.org:
+# git clone git://git.grml.org/grml-etc-core.git
+#
+# Make your changes, commit them; use 'git format-patch' to create a series
+# of patches and send those to the following address via 'git send-email':
+# grml-etc-core@grml.org
+#
+# Doing so makes sure the right people get your patches for review and
+# possibly inclusion.
+
# zsh-refcard-tag documentation: {{{
# You may notice strange looking comments in this file.
# These are there for a purpose. grml's zsh-refcard can now be
fi
# }}}
-# setting some default values {{{
-
# load .zshrc.pre to give the user the chance to overwrite the defaults
[[ -r ${HOME}/.zshrc.pre ]] && source ${HOME}/.zshrc.pre
-NOCOR=${NOCOR:-0}
-NOMENU=${NOMENU:-0}
-NOPRECMD=${NOPRECMD:-0}
-BATTERY=${BATTERY:-0}
-GRMLSMALL_SPECIFIC=${GRMLSMALL_SPECIFIC:-1}
-GRML_ALWAYS_LOAD_ALL=${GRML_ALWAYS_LOAD_ALL:-0}
-# }}}
-
# {{{ check for version/system
# check for versions (compatibility reasons)
is4(){
return 1
}
+is433(){
+ [[ $ZSH_VERSION == 4.3.<3->* || $ZSH_VERSION == <5->* ]] && return 0
+ return 1
+}
+
#f1# Checks whether or not you're running grml
isgrml(){
[[ -f /etc/grml_version ]] && return 0
isgrmlsmall() { return 1 }
fi
+isdarwin(){
+ [[ $OSTYPE == darwin* ]] && return 0
+ return 1
+}
+
#f1# are we running within an utf environment?
isutfenv() {
case "$LANG $CHARSET $LANGUAGE" in
function zstyle() { : }
fi
+# autoload wrapper - use this one instead of autoload directly
+# We need to define this function as early as this, because autoloading
+# 'is-at-least()' needs it.
+function zrcautoload() {
+ setopt local_options extended_glob
+ local fdir ffile
+ local -i ffound
+
+ ffile=${1}
+ (( found = 0 ))
+ for fdir in ${fpath} ; do
+ [[ -e ${fdir}/${ffile} ]] && (( ffound = 1 ))
+ done
+
+ (( ffound == 0 )) && return 1
+ if [[ $ZSH_VERSION == 3.1.<6-> || $ZSH_VERSION == <4->* ]] ; then
+ autoload -U ${ffile} || return 1
+ else
+ autoload ${ffile} || return 1
+ fi
+ return 0
+}
+
+# Load is-at-least() for more precise version checks
+# Note that this test will *always* fail, if the is-at-least
+# function could not be marked for autoloading.
+zrcautoload is-at-least || is-at-least() { return 1 }
+
+# }}}
+
+# setting some default values {{{
+
+NOCOR=${NOCOR:-0}
+NOMENU=${NOMENU:-0}
+NOPRECMD=${NOPRECMD:-0}
+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}
+
+if isgrmlcd ; then
+ GRML_WARN_SKEL=${GRML_WARN_SKEL:-0}
+else
+ GRML_WARN_SKEL=${GRML_WARN_SKEL:-1}
+fi
+
+if (( GRML_WARN_SKEL != 0 )) ; then
+
+function grml_warn_skel_main() {
+ printf '
+Dear user,
+
+You updated grml'\''s zshrc which brings a major change.
+The configuration is kept only in one file, being the global zshrc.
+In the past, the configuration was split in two files, with the
+second file being the .zshrc file from /etc/skel.
+
+If you have a .zshrc file in your home directory that originally
+came from the skel directory, please remove it. This is also the case
+if you followed earlier instructions from the grml-zsh-refcard or
+from <http://grml.org/console/> on non-grml systems.
+
+Please see the current grml-zsh-refcard (available at
+<http://grml.org/zsh/>) for updated installation information. In short,
+you don'\''t want a .zshrc.global file. Install the global zshrc to
+~/.zshrc and be done.
+
+If you need changes to the configuration, use ~/.zshrc.pre and
+~/.zshrc.local.
+
+'
+}
+
+function grml_warn_skel_remove() {
+ printf 'To remove this warning execute '\''grml_do_not_warn_skel'\''.\n\n'
+}
+
+function grml_do_not_warn_skel() {
+ printf '# Do not warn about old skel dot-files anymore\n' >>! ~/.zshrc.pre
+ printf 'GRML_WARN_SKEL=0\n' >>! ~/.zshrc.pre
+}
+
+# let's try to guess how the user uses us.
+if is-at-least 4.3.7 ; then
+ # funcsourcetrace requires at least version 4.3.7 of zsh.
+ GRML_SRC_FILE="${${funcsourcetrace[1]}%:*}"
+
+ grml_warn_skel_main
+ case ${GRML_SRC_FILE} in
+ (${HOME}/.zshrc.global)
+ grml_warn_skel_remove
+ printf '\nIt looks like you copied the grml zshrc to '\''~/.zshrc.global'\''.\n'
+ printf 'Nowadays you just copy the global zshrc to '\''~/.zshrc'\'' to use\n'
+ printf 'it on a non-grml-system.\n'
+ ;;
+ (${HOME}/.zshrc)
+ printf '\nIt looks like you copied the grml zshrc to '\''~/.zshrc'\''.\n'
+ printf 'We'\''ll disable this warning automatically for later sessions.\n'
+ grml_do_not_warn_skel
+ ;;
+ (*)
+ grml_do_not_warn_skel
+ ;;
+ esac
+else
+ grml_warn_skel_main
+ grml_warn_skel_remove
+fi
+
+unfunction grml_warn_skel_remove grml_warn_skel_main
+
+fi # GRML_WARN_SKEL
+
# }}}
# utility functions {{{
# this function checks if a command exists and returns either true
# or false. This avoids using 'which' and 'whence', which will
# avoid problems with aliases for which on certain weird systems. :-)
+# Usage: check_com [-c|-g] word
+# -c only checks for external commands
+# -g does the usual tests and also checks for global aliases
check_com() {
- local -i comonly
+ local -i comonly gatoo
if [[ ${1} == '-c' ]] ; then
(( comonly = 1 ))
shift
+ elif [[ ${1} == '-g' ]] ; then
+ (( gatoo = 1 ))
else
(( comonly = 0 ))
+ (( gatoo = 0 ))
fi
if (( ${#argv} != 1 )) ; then
return 0
fi
+ if (( gatoo > 0 )) && [[ -n ${galiases[$1]} ]] ; then
+ return 0
+ fi
+
return 1
}
return 0
}
-# autoload wrapper - use this one instead of autoload directly
-function zrcautoload() {
- setopt local_options extended_glob
- local fdir ffile
- local -i ffound
-
- ffile=${1}
- (( found = 0 ))
- for fdir in ${fpath} ; do
- [[ -e ${fdir}/${ffile} ]] && (( ffound = 1 ))
- done
-
- (( ffound == 0 )) && return 1
- if [[ $ZSH_VERSION == 3.1.<6-> || $ZSH_VERSION == <4->* ]] ; then
- autoload -U ${ffile} || return 1
- else
- autoload ${ffile} || return 1
- fi
+# this allows us to stay in sync with grml's zshrc and put own
+# modifications in ~/.zshrc.local
+zrclocal() {
+ xsource "/etc/zsh/zshrc.local"
+ xsource "${HOME}/.zshrc.local"
return 0
}
#}}}
-# Load is-at-least() for more precise version checks {{{
-
-# Note that this test will *always* fail, if the is-at-least
-# function could not be marked for autoloading.
-zrcautoload is-at-least || is-at-least() { return 1 }
-
-# }}}
-
# locale setup {{{
-if [[ -z "$LANG" ]] ; then
- xsource "/etc/default/locale"
+if (( ZSH_NO_DEFAULT_LOCALE == 0 )); then
+ xsource "/etc/default/locale"
fi
-export LANG=${LANG:-en_US.iso885915}
-for var in LC_ALL LC_MESSAGES ; do
+for var in LANG LC_ALL LC_MESSAGES ; do
[[ -n ${(P)var} ]] && export $var
done
# color setup for ls:
check_com -c dircolors && eval $(dircolors -b)
-
-# set width of man pages to 80 for more convenient reading
-# export MANWIDTH=${MANWIDTH:-80}
-
-# Search path for the cd command
-# cdpath=(.. ~)
+# color setup for ls on OS X:
+isdarwin && export CLICOLOR=1
+
+# do MacPorts setup on darwin
+if isdarwin && [[ -d /opt/local ]]; then
+ # Note: PATH gets set in /etc/zprofile on Darwin, so this can't go into
+ # zshenv.
+ PATH="/opt/local/bin:/opt/local/sbin:$PATH"
+ MANPATH="/opt/local/share/man:$MANPATH"
+fi
+# do Fink setup on darwin
+isdarwin && xsource /sw/bin/init.sh
# completion functions go to /etc/zsh/completion.d
# function files may be put into /etc/zsh/functions.d, from where they
else
[[ -d /etc/zsh/completion.d ]] && fpath=( $fpath /etc/zsh/completion.d )
if [[ -d /etc/zsh/functions.d ]] ; then
- fpath+=( /etc/zsh/functions.d )
- for func in /etc/zsh/functions.d/[^_]*[^~](N.) ; do
- zrcautoload -U ${func:t}
+ fdir='/etc/zsh/functions.d'
+ fpath=( ${fdir} ${fdir}/**/*(/N) ${fpath} )
+ for func in ${fdir}/**/[^_]*[^~](N.) ; do
+ zrcautoload ${func:t}
done
+ unset fdir
fi
fi
+# support colors in less
+export LESS_TERMCAP_mb=$'\E[01;31m'
+export LESS_TERMCAP_md=$'\E[01;31m'
+export LESS_TERMCAP_me=$'\E[0m'
+export LESS_TERMCAP_se=$'\E[0m'
+export LESS_TERMCAP_so=$'\E[01;44;33m'
+export LESS_TERMCAP_ue=$'\E[0m'
+export LESS_TERMCAP_us=$'\E[01;32m'
+
+MAILCHECK=30 # mailchecks
+REPORTTIME=5 # report about cpu-/system-/user-time of command if running longer than 5 seconds
+watch=(notme root) # watch for everyone but me and root
+
# automatically remove duplicates from these arrays
typeset -U path cdpath fpath manpath
# }}}
zle -N grml_toggle_abbrev
bindkey '^xA' grml_toggle_abbrev
+# add a command line to the shells history without executing it
+commit-to-history() {
+ print -s ${(z)BUFFER}
+ zle send-break
+}
+zle -N commit-to-history
+bindkey "^x^h" commit-to-history
+
+# only slash should be considered as a word separator:
+slash-backward-kill-word() {
+ local WORDCHARS="${WORDCHARS:s@/@}"
+ # zle backward-word
+ zle backward-kill-word
+}
+zle -N slash-backward-kill-word
+
+#k# Kill everything in a word up to its last \kbd{/}
+bindkey '\ev' slash-backward-kill-word
+
# }}}
# a generic accept-line wrapper {{{
setopt extendedglob
setopt interactivecomments
abk=(
-# key # value (#d additional doc string)
+# key # value (#d additional doc string)
#A# start
- '...' '../..'
+ '...' '../..'
'....' '../../..'
- 'BG' '& exit'
- 'C' '| wc -l'
- 'G' '|& grep --color=auto'
- 'H' '| head'
- 'Hl' ' --help |& less -r' #d (Display help in pager)
- 'L' '| less'
- 'LL' '|& less -r'
- 'M' '| most'
- 'N' '&>/dev/null' #d (No Output)
- 'R' '| tr A-z N-za-m' #d (ROT13)
- 'SL' '| sort | less'
- 'S' '| sort -u'
- 'T' '| tail'
- 'V' '|& vim -'
+ 'BG' '& exit'
+ 'C' '| wc -l'
+ 'G' '|& grep --color=auto '
+ 'H' '| head'
+ 'Hl' ' --help |& less -r' #d (Display help in pager)
+ 'L' '| less'
+ 'LL' '|& less -r'
+ 'M' '| most'
+ 'N' '&>/dev/null' #d (No Output)
+ 'R' '| tr A-z N-za-m' #d (ROT13)
+ 'SL' '| sort | less'
+ 'S' '| sort -u'
+ 'T' '| tail'
+ 'V' '|& vim -'
#A# end
- 'hide' "echo -en '\033]50;nil2\007'"
- 'tiny' 'echo -en "\033]50;-misc-fixed-medium-r-normal-*-*-80-*-*-c-*-iso8859-15\007"'
- 'small' 'echo -en "\033]50;6x10\007"'
- 'medium' 'echo -en "\033]50;-misc-fixed-medium-r-normal--13-120-75-75-c-80-iso8859-15\007"'
- 'default' 'echo -e "\033]50;-misc-fixed-medium-r-normal-*-*-140-*-*-c-*-iso8859-15\007"'
- 'large' 'echo -en "\033]50;-misc-fixed-medium-r-normal-*-*-150-*-*-c-*-iso8859-15\007"'
- 'huge' 'echo -en "\033]50;-misc-fixed-medium-r-normal-*-*-210-*-*-c-*-iso8859-15\007"'
- 'smartfont' 'echo -en "\033]50;-artwiz-smoothansi-*-*-*-*-*-*-*-*-*-*-*-*\007"'
- 'semifont' 'echo -en "\033]50;-misc-fixed-medium-r-semicondensed-*-*-120-*-*-*-*-iso8859-15\007"'
- 'da' 'du -sch'
- 'j' 'jobs -l'
- 'u' 'translate -i'
- 'co' "./configure && make && sudo make install"
- 'CH' "./configure --help"
- 'conkeror' 'firefox -chrome chrome://conkeror/content'
- 'dir' 'ls -lSrah'
- 'lad' $'ls -d .*(/)\n# only show dot-directories'
- 'lsa' $'ls -a .*(.)\n# only show dot-files'
- 'lss' $'ls -l *(s,S,t)\n# only files with setgid/setuid/sticky flag'
- 'lsl' $'ls -l *(@[1,10])\n# only symlinks'
- 'lsx' $'ls -l *(*[1,10])\n# only executables'
- 'lsw' $'ls -ld *(R,W,X.^ND/)\n# world-{readable,writable,executable} files'
- 'lsbig' $'ls -flh *(.OL[1,10])\n# display the biggest files'
- 'lsd' $'ls -d *(/)\n# only show directories'
- 'lse' $'ls -d *(/^F)\n# only show empty directories'
- 'lsnew' $'ls -rl *(D.om[1,10])\n# display the newest files'
- 'lsold' $'ls -rtlh *(D.om[-11,-1])\n # display the oldest files'
- 'lssmall' $'ls -Srl *(.oL[1,10])\n# display the smallest files'
- 'rw-' 'chmod 600'
- '600' 'chmod u+rw-x,g-rwx,o-rwx'
- 'rwx' 'chmod u+rwx'
- '700' 'chmod u+rwx,g-rwx,o-rwx'
- 'r--' 'chmod u+r-wx,g-rwx,o-rwx'
- '644' $'chmod u+rw-x,g+r-wx,o+r-wx\n # 4=r,2=w,1=x'
- '755' 'chmod u+rwx,g+r-w+x,o+r-w+x'
- 'md' 'mkdir -p '
- 'cmplayer' 'mplayer -vo -fs -zoom fbdev'
- 'fbmplayer' 'mplayer -vo -fs -zoom fbdev'
- 'fblinks' 'links2 -driver fb'
- 'insecssh' 'ssh -o "StrictHostKeyChecking=no" -o "UserKnownHostsFile=/dev/null"'
- 'insecscp' 'scp -o "StrictHostKeyChecking=no" -o "UserKnownHostsFile=/dev/null"'
- 'fori' 'for i ({..}) { }'
- 'cx' 'chmod +x'
- 'e' 'print -l'
- 'se' 'setopt interactivecomments'
- 'va' 'valac --vapidir=../vapi/ --pkg=gtk+-2.0 gtktest.vala'
- 'fb2' '=mplayer -vo fbdev -fs -zoom 1>/dev/null -xy 2'
- 'fb3' '=mplayer -vo fbdev -fs -zoom 1>/dev/null -xy 3'
- 'ci' 'centericq'
- 'D' 'export DISPLAY=:0.0'
- 'mp' 'mplayer -vo xv -fs -zoom'
+ 'co' './configure && make && sudo make install'
)
globalias() {
zrcautoload run-help # use via 'esc-h'
# completion system
-if zrcautoload compinit && compinit 2>/dev/null ; then
- compinit 2>/dev/null || print 'Notice: no compinit available :('
+if zrcautoload compinit ; then
+ compinit || print 'Notice: no compinit available :('
else
print 'Notice: no compinit available :('
function zstyle { }
#k# menu selection: pick item but stay in the menu
bindkey -M menuselect '\e^M' accept-and-menu-complete
- # use the vi navigation keys (hjkl) besides cursor keys in menu completion
- #bindkey -M menuselect 'h' vi-backward-char # left
- #bindkey -M menuselect 'k' vi-up-line-or-history # up
- #bindkey -M menuselect 'l' vi-forward-char # right
- #bindkey -M menuselect 'j' vi-down-line-or-history # bottom
-
# accept a completion and try to complete again by using menu
# completion; very useful with completing directories
# by using 'undo' one's got a simple file browser
#k# Insert last typed word
bindkey "\em" insert-last-typed-word
-# set command prediction from history, see 'man 1 zshcontrib'
-# is4 && zrcautoload predict-on && \
-# zle -N predict-on && \
-# zle -N predict-off && \
-# bindkey "^X^Z" predict-on && \
-# bindkey "^Z" predict-off
-
#k# Shortcut for \kbd{fg<enter>}
bindkey -s '^z' "fg\n"
-# press ctrl-q to quote line:
-# mquote () {
-# zle beginning-of-line
-# zle forward-word
-# # RBUFFER="'$RBUFFER'"
-# RBUFFER=${(q)RBUFFER}
-# zle end-of-line
-# }
-# zle -N mquote && bindkey '^q' mquote
-
# run command line as user root via sudo:
sudo-command-line() {
[[ -z $BUFFER ]] && zle up-history
# list duplicates an older one, the older command is removed from the list
setopt histignorespace # remove command lines from the history list when
# the first character on the line is a space
-# setopt histallowclobber # add `|' to output redirections in the history
-# setopt NO_clobber # warning if file exists ('cat /dev/null > ~/.zshrc')
setopt auto_cd # if a command is issued that can't be executed as a normal command,
# and the command is the name of a directory, perform the cd command to that directory
setopt extended_glob # in order to use #, ~ and ^ for filename generation
setopt hash_list_all # Whenever a command completion is attempted, make sure \
# the entire command path is hashed first.
setopt completeinword # not just at the end
-# setopt nocheckjobs # don't warn me about bg processes when exiting
setopt nohup # and don't kill them, either
-# setopt printexitvalue # alert me if something failed
-# setopt dvorak # with spelling correction, assume dvorak kb
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.
-
-MAILCHECK=30 # mailchecks
-REPORTTIME=5 # report about cpu-/system-/user-time of command if running longer than 5 seconds
-watch=(notme root) # watch for everyone but me and root
-
-# define word separators (for stuff like backward-word, forward-word, backward-kill-word,..)
-# WORDCHARS='*?_-.[]~=/&;!#$%^(){}<>' # the default
-# WORDCHARS=.
-# WORDCHARS='*?_[]~=&;!#$%^(){}'
-# WORDCHARS='${WORDCHARS:s@/@}'
-
-# only slash should be considered as a word separator:
-slash-backward-kill-word() {
- local WORDCHARS="${WORDCHARS:s@/@}"
- # zle backward-word
- zle backward-kill-word
-}
-zle -N slash-backward-kill-word
-
-#k# Kill everything in a word up to its last \kbd{/}
-bindkey '\ev' slash-backward-kill-word
+setopt noglobdots # * shouldn't match dotfiles. ever.
# }}}
# }}}
+# directory based profiles {{{
+
+if is433 ; then
+
+CHPWD_PROFILE='default'
+function chpwd_profiles() {
+ # Say you want certain settings to be active in certain directories.
+ # This is what you want.
+ #
+ # zstyle ':chpwd:profiles:/usr/src/grml(|/|/*)' profile grml
+ # zstyle ':chpwd:profiles:/usr/src/debian(|/|/*)' profile debian
+ #
+ # When that's done and you enter a directory that matches the pattern
+ # in the third part of the context, a function called chpwd_profile_grml,
+ # for example, is called (if it exists).
+ #
+ # If no pattern matches (read: no profile is detected) the profile is
+ # set to 'default', which means chpwd_profile_default is attempted to
+ # be called.
+ #
+ # A word about the context (the ':chpwd:profiles:*' stuff in the zstyle
+ # command) which is used: The third part in the context is matched against
+ # ${PWD}. That's why using a pattern such as /foo/bar(|/|/*) makes sense.
+ # Because that way the profile is detected for all these values of ${PWD}:
+ # /foo/bar
+ # /foo/bar/
+ # /foo/bar/baz
+ # So, if you want to make double damn sure a profile works in /foo/bar
+ # and everywhere deeper in that tree, just use (|/|/*) and be happy.
+ #
+ # The name of the detected profile will be available in a variable called
+ # 'profile' in your functions. You don't need to do anything, it'll just
+ # be there.
+ #
+ # Then there is the parameter $CHPWD_PROFILE is set to the profile, that
+ # was is currently active. That way you can avoid running code for a
+ # profile that is already active, by running code such as the following
+ # at the start of your function:
+ #
+ # function chpwd_profile_grml() {
+ # [[ ${profile} == ${CHPWD_PROFILE} ]] && return 1
+ # ...
+ # }
+ #
+ # The initial value for $CHPWD_PROFILE is 'default'.
+ #
+ # Version requirement:
+ # This feature requires zsh 4.3.3 or newer.
+ # If you use this feature and need to know whether it is active in your
+ # current shell, there are several ways to do that. Here are two simple
+ # ways:
+ #
+ # a) If knowing if the profiles feature is active when zsh starts is
+ # good enough for you, you can put the following snippet into your
+ # .zshrc.local:
+ #
+ # (( ${+functions[chpwd_profiles]} )) && print "directory profiles active"
+ #
+ # b) If that is not good enough, and you would prefer to be notified
+ # whenever a profile changes, you can solve that by making sure you
+ # start *every* profile function you create like this:
+ #
+ # function chpwd_profile_myprofilename() {
+ # [[ ${profile} == ${CHPWD_PROFILE} ]] && return 1
+ # print "chpwd(): Switching to profile: $profile"
+ # ...
+ # }
+ #
+ # That makes sure you only get notified if a profile is *changed*,
+ # not everytime you change directory, which would probably piss
+ # you off fairly quickly. :-)
+ #
+ # There you go. Now have fun with that.
+ local -x profile
+
+ zstyle -s ":chpwd:profiles:${PWD}" profile profile || profile='default'
+ if (( ${+functions[chpwd_profile_$profile]} )) ; then
+ chpwd_profile_${profile}
+ fi
+
+ CHPWD_PROFILE="${profile}"
+ return 0
+}
+chpwd_functions=( ${chpwd_functions} chpwd_profiles )
+
+fi # is433
+
+# }}}
+
# {{{ display battery status on right side of prompt via running 'BATTERY=1 zsh'
if [[ $BATTERY -gt 0 ]] ; then
if ! check_com -c acpi ; then
battery() {
if [[ $BATTERY -gt 0 ]] ; then
- PERCENT="${${"$(acpi 2>/dev/null)"}/(#b)[[:space:]]##Battery <->: [^0-9]##, (<->)%*/${match[1]}}"
+ PERCENT="${${"$(acpi 2>/dev/null)"}/(#b)[[:space:]]#Battery <->: [^0-9]##, (<->)%*/${match[1]}}"
if [[ -z "$PERCENT" ]] ; then
PERCENT='acpi not present'
else
# from <http://ft.bewatermyfriend.org/comp/zsh/zsh-dotfiles.tar.bz2>,
# which distributed under the same terms as zsh itself.
-# we will only be using one variable, so let the code know now.
-zstyle ':vcs_info:*' max-exports 1
+# we will be using two variables, so let the code know now.
+zstyle ':vcs_info:*' max-exports 2
# vcs_info() documentation:
#{{{
# disable - Provide a list of systems, you don't want
# the vcs_info() to check for repositories
# (checked in the 'init' context, too).
+# disable-patterns - A list of patterns that are checked against $PWD.
+# If the pattern matches, vcs_info will be disabled.
+# Say, ~/.zsh is a directory under version control,
+# in which you do not want vcs_info to be active, do:
+# zstyle ':vcs_info:*' disable-patterns "$HOME/.zsh+(|/*)"
# use-simple - If there are two different ways of gathering
# information, you can select the simpler one
# by setting this style to true; the default
# max-exports 2
# enable true
# disable (empty list)
+# disable-patterns (empty list)
# use-simple false
# use-prompt-escapes true
#
(( ${#msgs} < 1 )) && msgs[1]=' (%s)-[%b]-'
fi
- (( ${#msgs} > maxexports )) && msgs[${maxexports},-1]=()
+ (( ${#msgs} > maxexports )) && msgs[$(( maxexports + 1 )),-1]=()
for i in {1..${#msgs}} ; do
- zformat -f msg ${msgs[$i]} a:${action} b:${branch} s:${vcs} r:${base:t} R:${base} S:"$(VCS_INFO_reposub ${base})"
+ zformat -f msg ${msgs[$i]} \
+ a:${action} \
+ b:${branch} \
+ r:${base:t} \
+ s:${vcs} \
+ R:${base} \
+ S:"$(VCS_INFO_reposub ${base})"
msgs[$i]=${msg}
done
return 0
}
# }}}
VCS_INFO_maxexports () { #{{{
- local -ix maxexports
-
zstyle -s ":vcs_info:${vcs}:${usercontext}" "max-exports" maxexports || maxexports=2
if [[ ${maxexports} != <-> ]] || (( maxexports < 1 )); then
printf 'vcs_info(): expecting numeric arg >= 1 for max-exports (got %s).\n' ${maxexports}
}
# }}}
VCS_INFO_hg_get_data () { # {{{
- local hgbranch hgbase
+ local hgbranch hgbase file
hgbase=${vcs_comm[basedir]}
- hgbranch=$(< ${hgbase}/.hg/branch)
+
+ file="${hgbase}/.hg/branch"
+ if [[ -r ${file} ]] ; then
+ hgbranch=$(< ${file})
+ else
+ hgbranch='default'
+ fi
+
VCS_INFO_formats '' "${hgbranch}" "${hgbase}"
return 0
}
while [[ ${realbasedir} != '/' ]]; do
if [[ -n ${vcs_comm[detect_need_file]} ]] ; then
[[ -d ${basedir}/${dirname} ]] && \
- [[ -f ${basedir}/${dirname}/${vcs_comm[detect_need_file]} ]] && \
+ [[ -e ${basedir}/${dirname}/${vcs_comm[detect_need_file]} ]] && \
break
else
[[ -d ${basedir}/${dirname} ]] && break
# }}}
VCS_INFO_hg_detect() { #{{{
VCS_INFO_check_com hg || return 1
- vcs_comm[detect_need_file]=branch
+ vcs_comm[detect_need_file]=store
VCS_INFO_detect_by_dir '.hg'
return $?
}
}
# }}}
vcs_info () { # {{{
+ local pat
local -i found
- local -a VCSs disabled
+ local -a VCSs disabled dps
local -x vcs usercontext
+ local -ix maxexports
local -ax msgs
local -Ax vcs_comm
return 0
}
zstyle -a ":vcs_info:${vcs}:${usercontext}" "disable" disabled
+
+ zstyle -a ":vcs_info:${vcs}:${usercontext}" "disable-patterns" dps
+ for pat in ${dps} ; do
+ if [[ ${PWD} == ${~pat} ]] ; then
+ [[ -n ${vcs_info_msg_0_} ]] && VCS_INFO_set --clear
+ return 0
+ fi
+ done
+
VCS_INFO_maxexports
(( found = 0 ))
VCS_INFO_set --nvcs preinit
# }}}
-# change vcs_info formats for the grml prompt
+# Change vcs_info formats for the grml prompt. The 2nd format sets up
+# $vcs_info_msg_1_ to contain "zsh: repo-name" used to set our screen title.
+# TODO: The included vcs_info() version still uses $VCS_INFO_message_N_.
+# That needs to be the use of $VCS_INFO_message_N_ needs to be changed
+# to $vcs_info_msg_N_ as soon as we use the included version.
if [[ "$TERM" == dumb ]] ; then
- zstyle ':vcs_info:*' actionformats "(%s%)-[%b|%a] "
- zstyle ':vcs_info:*' formats "(%s%)-[%b] "
+ zstyle ':vcs_info:*' actionformats "(%s%)-[%b|%a] " "zsh: %r"
+ zstyle ':vcs_info:*' formats "(%s%)-[%b] " "zsh: %r"
else
# these are the same, just with a lot of colours:
- zstyle ':vcs_info:*' actionformats "${MAGENTA}(${NO_COLOUR}%s${MAGENTA})${YELLOW}-${MAGENTA}[${GREEN}%b${YELLOW}|${RED}%a${MAGENTA}]${NO_COLOUR} "
- zstyle ':vcs_info:*' formats "${MAGENTA}(${NO_COLOUR}%s${MAGENTA})${YELLOW}-${MAGENTA}[${GREEN}%b${MAGENTA}]${NO_COLOUR}%} "
+ zstyle ':vcs_info:*' actionformats "${MAGENTA}(${NO_COLOUR}%s${MAGENTA})${YELLOW}-${MAGENTA}[${GREEN}%b${YELLOW}|${RED}%a${MAGENTA}]${NO_COLOUR} " \
+ "zsh: %r"
+ zstyle ':vcs_info:*' formats "${MAGENTA}(${NO_COLOUR}%s${MAGENTA})${YELLOW}-${MAGENTA}[${GREEN}%b${MAGENTA}]${NO_COLOUR}%} " \
+ "zsh: %r"
zstyle ':vcs_info:(sv[nk]|bzr):*' branchformat "%b${RED}:${YELLOW}%r"
fi
# }}}
+# command not found handling {{{
+
+(( ${COMMAND_NOT_FOUND} == 1 )) &&
+function command_not_found_handler() {
+ setopt localoptions no_sh_wordsplit
+ if [[ -x ${GRML_ZSH_CNF_HANDLER} ]] ; then
+ ${GRML_ZSH_CNF_HANDLER} $1
+ fi
+ return 1
+}
+
+# }}}
+
# {{{ set prompt
if zrcautoload promptinit && promptinit 2>/dev/null ; then
promptinit # people should be able to use their favourite prompt
# make sure to use right prompt only when not running a command
is41 && setopt transient_rprompt
+# TODO: revise all these NO* variables and especially their documentation
+# in zsh-help() below.
is4 && [[ $NOPRECMD -eq 0 ]] && precmd () {
[[ $NOPRECMD -gt 0 ]] && return 0
# update VCS information
vcs_info
- # allow manual overwriting of RPROMPT
- if [[ -n $RPROMPT ]] ; then
- [[ $TERM == screen* ]] && print -nP "\ekzsh\e\\"
- # return 0
+ if [[ $TERM == screen* ]] ; then
+ if [[ -n ${VCS_INFO_message_1_} ]] ; then
+ print -nP "\ek${VCS_INFO_message_1_}\e\\"
+ else
+ print -nP "\ekzsh\e\\"
+ fi
fi
# just use DONTSETRPROMPT=1 to be able to overwrite RPROMPT
if [[ $DONTSETRPROMPT -eq 0 ]] ; then
if [[ $BATTERY -gt 0 ]] ; then
- # update BATTERY information
+ # update battery (dropped into $PERCENT) information
battery
- RPROMPT="%(?..:()% ${PERCENT}${SCREENTITLE}"
- # RPROMPT="${PERCENT}${SCREENTITLE}"
+ RPROMPT="%(?..:() ${PERCENT}"
else
- RPROMPT="%(?..:()% ${SCREENTITLE}"
- # RPROMPT="${SCREENTITLE}"
+ RPROMPT="%(?..:() "
fi
fi
# adjust title of xterm
# see http://www.faqs.org/docs/Linux-mini/Xterm-Title.html
+ [[ ${NOTITLE} -gt 0 ]] && return 0
case $TERM in
- (xterm*|rxvt)
+ (xterm*|rxvt*)
print -Pn "\e]0;%n@%m: %~\a"
;;
esac
local CMD="${1[(wr)^(*=*|sudo|ssh|-*)]}$NAME" # use hostname
echo -ne "\ek$CMD\e\\"
fi
-# set the screen title to "zsh" when sitting at the command prompt:
- if [[ "$TERM" == screen* ]] ; then
- SCREENTITLE=$'%{\ekzsh\e\\%}'
- else
- SCREENTITLE=''
- fi
# adjust title of xterm
+ [[ ${NOTITLE} -gt 0 ]] && return 0
case $TERM in
- (xterm*|rxvt)
+ (xterm*|rxvt*)
print -Pn "\e]0;%n@%m: $1\a"
;;
esac
# }}}
# {{{ some aliases
-if [[ $UID -eq 0 ]] ; then
- [[ -r /etc/grml/screenrc ]] && alias screen='/usr/bin/screen -c /etc/grml/screenrc'
-elif [[ -r $HOME/.screenrc ]] ; then
- alias screen="/usr/bin/screen -c $HOME/.screenrc"
-else
- [[ -r /etc/grml/screenrc_grml ]] && alias screen='/usr/bin/screen -c /etc/grml/screenrc_grml'
+if check_com -c screen ; then
+ if [[ $UID -eq 0 ]] ; then
+ [[ -r /etc/grml/screenrc ]] && alias screen="${commands[screen]} -c /etc/grml/screenrc"
+ elif [[ -r $HOME/.screenrc ]] ; then
+ alias screen="${commands[screen]} -c $HOME/.screenrc"
+ else
+ [[ -r /etc/grml/screenrc_grml ]] && alias screen="${commands[screen]} -c /etc/grml/screenrc_grml"
+ fi
fi
# do we have GNU ls with color-support?
alias term2utf="echo 'Setting terminal to utf-8 mode'; print -n '\e%G'"
# make sure it is not assigned yet
-[[ $(whence -w utf2iso &>/dev/null) == 'utf2iso: alias' ]] && unalias utf2iso
-
+[[ -n ${aliases[utf2iso]} ]] && unalias utf2iso
utf2iso() {
if isutfenv ; then
for ENV in $(env | command grep -i '.utf') ; do
}
# make sure it is not assigned yet
-[[ $(whence -w iso2utf &>/dev/null) == 'iso2utf: alias' ]] && unalias iso2utf
+[[ -n ${aliases[iso2utf]} ]] && unalias iso2utf
iso2utf() {
if ! isutfenv ; then
for ENV in $(env | command grep -i '\.iso') ; do
"NOCOR=1 zsh" => deactivate automatic correction
"NOMENU=1 zsh" => do not use auto menu completion (note: use ctrl-d for completion instead!)
"NOPRECMD=1 zsh" => disable the precmd + preexec commands (set GNU screen title)
+ "NOTITLE=1 zsh" => disable setting the title of xterms without disabling
+ preexec() and precmd() completely
"BATTERY=1 zsh" => activate battery status (via acpi) on right side of prompt
+ "COMMAND_NOT_FOUND=1 zsh"
+ => Enable a handler if an external command was not found
+ The command called in the handler can be altered by setting
+ the GRML_ZSH_CNF_HANDLER variable, the default is:
+ "/usr/share/command-not-found/command-not-found"
A value greater than 0 is enables a feature; a value equal to zero
disables it. If you like one or the other of these settings, you can
fi
#a1# Take a look at the syslog: \kbd{\$PAGER /var/log/syslog}
- alias llog="$PAGER /var/log/syslog" # take a look at the syslog
+ salias llog="$PAGER /var/log/syslog" # take a look at the syslog
#a1# Take a look at the syslog: \kbd{tail -f /var/log/syslog}
- alias tlog="tail -f /var/log/syslog" # follow the syslog
+ salias tlog="tail -f /var/log/syslog" # follow the syslog
fi
# sort installed Debian-packages by size
# {{{ completion system
# called later (via is4 && grmlcomp)
-# notice: use 'zstyle' for getting current settings
+# note: use 'zstyle' for getting current settings
# press ^Xh (control-x h) for getting tags in context; ^X? (control-x ?) to run complete_debug with trace output
grmlcomp() {
# TODO: This could use some additional information
zstyle ':completion:*:manuals.*' insert-sections true
zstyle ':completion:*:man:*' menu yes select
+ # provide .. as a completion
+ zstyle ':completion:*' special-dirs ..
+
# run rehash on completion so new installed program are found automatically:
_force_rehash() {
(( CURRENT == 1 )) && rehash
fi'
fi
- # zstyle ':completion:*' completer _complete _correct _approximate
- # zstyle ':completion:*' expand prefix suffix
-
- # complete shell aliases
- # zstyle ':completion:*' completer _expand_alias _complete _approximate
-
# command for process lists, the local web server details and host completion
zstyle ':completion:*:urls' local 'www' '/var/www/' 'public_html'
localhost
)
zstyle ':completion:*:hosts' hosts $hosts
+ # TODO: so, why is this here?
# zstyle '*' hosts $hosts
- # specify your logins:
- # my_accounts=(
- # {grml,grml1}@foo.invalid
- # grml-devel@bar.invalid
- # )
- # other_accounts=(
- # {fred,root}@foo.invalid
- # vera@bar.invalid
- # )
- # zstyle ':completion:*:my-accounts' users-hosts $my_accounts
- # zstyle ':completion:*:other-accounts' users-hosts $other_accounts
-
- # specify specific port/service settings:
- # telnet_users_hosts_ports=(
- # user1@host1:
- # user2@host2:
- # @mail-server:{smtp,pop3}
- # @news-server:nntp
- # @proxy-server:8000
- # )
- # zstyle ':completion:*:*:telnet:*' users-hosts-ports $telnet_users_hosts_ports
-
# use generic completion system for programs not yet defined; (_gnu_generic works
# with commands that provide a --help option with "standard" gnu-like output.)
- compdef _gnu_generic tail head feh cp mv df stow uname ipacsum fetchipac
+ for compcom in cp deborphan df feh fetchipac head hnb ipacsum mv \
+ pal stow tail uname ; do
+ [[ -z ${_comps[$compcom]} ]] && compdef _gnu_generic ${compcom}
+ done; unset compcom
# see upgrade function in this file
compdef _hosts upgrade
compdef _man qma
else
manzsh() { /usr/bin/man zshall | vim -c "se ft=man| se hlsearch" +/"$1" - ; }
- # manzsh() { /usr/bin/man zshall | most +/"$1" ; }
- # [[ -f ~/.terminfo/m/mostlike ]] && MYLESS='LESS=C TERMINFO=~/.terminfo TERM=mostlike less' || MYLESS='less'
- # manzsh() { man zshall | $MYLESS -p $1 ; }
fi
if check_com -c $PAGER ; then
exec env -i ENV="/etc/minimal-shellrc" HOME="$HOME" TERM="$TERM" ksh
}
+# a wrapper for vim, that deals with title setting
+# VIM_OPTIONS
+# set this array to a set of options to vim you always want
+# to have set when calling vim (in .zshrc.local), like:
+# VIM_OPTIONS=( -p )
+# This will cause vim to send every file given on the
+# commandline to be send to it's own tab (needs vim7).
+vim() {
+ VIM_PLEASE_SET_TITLE='yes' command vim ${VIM_OPTIONS} "$@"
+}
+
# make a backup of a file
bk() {
cp -a "$1" "${1}_$(date --iso-8601=seconds)"
}
-# Switching shell safely and efficiently? http://www.zsh.org/mla/workers/2001/msg02410.html
-# bash() {
-# NO_SWITCH="yes" command bash "$@"
-# }
-# restart () {
-# exec $SHELL $SHELL_ARGS "$@"
-# }
-
#f1# grep for patterns in grml's zsh setup
zg() {
#{{{
# }}}
-# log out? set timeout in seconds {{{
-# TMOUT=1800
-# do not log out in some specific terminals:
-# if [[ "${TERM}" == ([Exa]term*|rxvt|dtterm|screen*) ]] ; then
-# unset TMOUT
-# fi
-# }}}
-
# {{{ make sure our environment is clean regarding colors
for color in BLUE RED GREEN CYAN YELLOW MAGENTA WHITE ; unset $color
# }}}
-# source another config file if present {{{
-xsource "/etc/zsh/zshrc.local"
-xsource "${HOME}/.zshenv"
-# }}}
-
# "persistent history" {{{
# just write important commands you always need to ~/.important_commands
if [[ -r ~/.important_commands ]] ; then
fi
# }}}
-## genrefcard.pl settings {{{
-### example: split functions-search 8,16,24,32
-#@# split functions-search 8
-## }}}
-
#:grep:marker:for:mika: :-)
### non-root (EUID != 0) code below
###
-(( GRML_ALWAYS_LOAD_ALL == 0 )) && (( $EUID == 0 )) && return 0
+if (( GRML_ALWAYS_LOAD_ALL == 0 )) && (( $EUID == 0 )) ; then
+ zrclocal
+ return 0
+fi
-# autoloading stuff {{{
-# associate types and extensions (be aware with perl scripts and anwanted behaviour!)
-# check_com zsh-mime-setup || { autoload zsh-mime-setup && zsh-mime-setup }
-# alias -s pl='perl -S'
-# }}}
# variables {{{
[[ -f /usr/share/classpath/glibj.zip ]] && export JIKESPATH=/usr/share/classpath/glibj.zip
# }}}
-# set options {{{
-
-# Allow comments even in interactive shells i. e.
-# $ uname # This command prints system informations
-# zsh: bad pattern: #
-# $ setopt interactivecomments
-# $ uname # This command prints system informations
-# Linux
-# setopt interactivecomments
-
-# ctrl-s will no longer freeze the terminal.
-# stty erase "^?"
-
-# }}}
-
-# {{{ global aliases
-# These do not have to be at the beginning of the command line.
-# Avoid typing cd ../../ for going two dirs down and so on
-# Usage, e.g.: "$ cd ...' or just '$ ...' with 'setopt auto_cd'
-# Notice: deactivated by 061112 by default, we use another approach
-# known as "power completion / abbreviation expansion"
-# alias -g '...'='../..'
-# alias -g '....'='../../..'
-# alias -g BG='& exit'
-# alias -g C='|wc -l'
-# alias -g G='|grep'
-# alias -g H='|head'
-# alias -g Hl=' --help |& less -r'
-# alias -g K='|keep'
-# alias -g L='|less'
-# alias -g LL='|& less -r'
-# alias -g M='|most'
-# alias -g N='&>/dev/null'
-# alias -g R='| tr A-z N-za-m'
-# alias -g SL='| sort | less'
-# alias -g S='| sort'
-# alias -g T='|tail'
-# alias -g V='| vim -'
-# }}}
-
# aliases {{{
# Xterm resizing-fu.
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"'
-# if [[ "$TERM" == "xterm" ]] && [[ "$LINES" -ge 50 ]] && [[ "$COLUMNS" -ge 100 ]] && [[ -z "$SSH_CONNECTION" ]] ; then
-# large
-# fi
# general
#a2# Execute \kbd{du -sch}
alias da='du -sch'
#a2# Execute \kbd{jobs -l}
alias j='jobs -l'
-# alias u='translate -i' # translate
# compile stuff
#a2# Execute \kbd{./configure}
#a2# Execute \kbd{./configure --help}
alias CH="./configure --help"
-# http://conkeror.mozdev.org/
-#a2# Run a keyboard driven firefox
-alias conkeror='firefox -chrome chrome://conkeror/content'
-
# arch/tla stuff
if check_com -c tla ; then
#a2# Execute \kbd{tla what-changed --diffs | less}
#a2# Execute \kbd{links2 -driver fb}
alias fblinks='links2 -driver fb'
-# ignore ~/.ssh/known_hosts entries
-# alias insecssh='ssh -o "StrictHostKeyChecking=no" -o "UserKnownHostsFile=/dev/null" -o "PreferredAuthentications=keyboard-interactive"'
#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"'
# Use 'g' instead of 'git':
check_com g || alias g='git'
-# use colors when browsing man pages, but only if not using LESS_TERMCAP_* from /etc/zsh/zshenv:
-if [[ -z "$LESS_TERMCAP_md" ]] ; then
- [[ -d ~/.terminfo/ ]] && alias man='TERMINFO=~/.terminfo/ LESS=C TERM=mostlike PAGER=less man'
-fi
-
# check whether Debian's package management (dpkg) is running
if check_com salias ; then
#a2# Check whether a dpkg instance is currently running
#a2# Execute \kbd{grep -i -{}-color=auto}
alias GREP='grep -i --color=auto'
-# one blank line between each line
-if [[ -r ~/.terminfo/m/mostlike ]] ; then
-# alias man2='MANPAGER="sed -e G |less" TERMINFO=~/.terminfo TERM=mostlike /usr/bin/man'
- #f5# Watch manpages in a stretched style
- man2() { PAGER='dash -c "sed G | /usr/bin/less"' TERM=mostlike /usr/bin/man "$@" ; }
-fi
+#f5# Watch manpages in a stretched style
+man2() { PAGER='dash -c "sed G | /usr/bin/less"' command man "$@" ; }
# d():Copyright 2005 Nikolai Weibull <nikolai@bitwi.se>
-# notice: option AUTO_PUSHD has to be set
+# note: option AUTO_PUSHD has to be set
#f5# Jump between directories
d() {
emulate -L zsh
esac
}
-# Some quick Perl-hacks aka /useful/ oneliner
-# bew() { perl -le 'print unpack "B*","'$1'"' }
-# web() { perl -le 'print pack "B*","'$1'"' }
-# hew() { perl -le 'print unpack "H*","'$1'"' }
-# weh() { perl -le 'print pack "H*","'$1'"' }
-# pversion() { perl -M$1 -le "print $1->VERSION" } # i. e."pversion LWP -> 5.79"
-# getlinks () { perl -ne 'while ( m/"((www|ftp|http):\/\/.*?)"/gc ) { print $1, "\n"; }' $* }
-# gethrefs () { perl -ne 'while ( m/href="([^"]*)"/gc ) { print $1, "\n"; }' $* }
-# getanames () { perl -ne 'while ( m/a name="([^"]*)"/gc ) { print $1, "\n"; }' $* }
-# getforms () { perl -ne 'while ( m:(\</?(input|form|select|option).*?\>):gic ) { print $1, "\n"; }' $* }
-# getstrings () { perl -ne 'while ( m/"(.*?)"/gc ) { print $1, "\n"; }' $*}
-# getanchors () { perl -ne 'while ( m/«([^«»\n]+)»/gc ) { print $1, "\n"; }' $* }
-# showINC () { perl -e 'for (@INC) { printf "%d %s\n", $i++, $_ }' }
-# vimpm () { vim `perldoc -l $1 | sed -e 's/pod$/pm/'` }
-# vimhelp () { vim -c "help $1" -c on -c "au! VimEnter *" }
-
#f5# List all occurrences of programm in current PATH
plap() {
if [[ $# = 0 ]] ; then
print ""
print "Date..: "$(date "+%Y-%m-%d %H:%M:%S")""
print "Shell.: Zsh $ZSH_VERSION (PID = $$, $SHLVL nests)"
- print "Term..: $TTY ($TERM), $BAUD bauds, $COLUMNS x $LINES cars"
+ print "Term..: $TTY ($TERM), ${BAUD:+$BAUD bauds, }$COLUMNS x $LINES cars"
print "Login.: $LOGNAME (UID = $EUID) on $HOST"
print "System: $(cat /etc/[A-Za-z]*[_-][rv]e[lr]*)"
print "Uptime:$(uptime)"
mkdir -p ${root}/${subdir}/{cur,new,tmp}
}
-# xtrename() rename xterm from within GNU-screen
+#f5# Change the xterm title from within GNU-screen
xtrename() {
- if [[ -z ${DISPLAY} ]] ; then
- printf 'xtrename only makes sense in X11.\n'
- return 1
+ if [[ ${1} != "-f" ]] ; then
+ if [[ -z ${DISPLAY} ]] ; then
+ printf 'xtrename only makes sense in X11.\n'
+ return 1
+ fi
+ else
+ shift
fi
if [[ -z ${1} ]] ; then
- printf 'usage: xtrename() "title for xterm"\n'
+ printf 'usage: xtrename [-f] "title for xterm"\n'
printf ' renames the title of xterm from _within_ screen.\n'
- printf ' Also works without screen.\n'
+ printf ' also works without screen.\n'
+ printf ' will not work if DISPLAY is unset, use -f to override.\n'
return 0
fi
print -n "\eP\e]0;${1}\C-G\e\\"
compdef _hl_complete hl
fi
-# create small urls via tinyurl.com using wget, grep and sed
-zurl() {
- [[ -z ${1} ]] && print "please give an url to shrink." && return 1
- local url=${1}
- local tiny="http://tinyurl.com/create.php?url="
- #print "${tiny}${url}" ; return
- wget -O- \
- -o/dev/null \
- "${tiny}${url}" \
- | grep -Eio 'value="(http://tinyurl.com/.*)"' \
- | sed 's/value=//;s/"//g'
+# Create small urls via http://tinyurl.com using wget(1).
+function zurl() {
+ [[ -z ${1} ]] && { print "USAGE: zurl <URL>" ; return 1 }
+
+ local PN url tiny grabber search result preview
+ PN=${0}
+ url=${1}
+# Check existence of given URL with the help of ping(1).
+# N.B. ping(1) only works without an eventual given protocol.
+ ping -c 1 ${${url#(ftp|http)://}%%/*} >& /dev/null || \
+ read -q "?Given host ${${url#http://*/}%/*} is not reachable by pinging. Proceed anyway? [y|n] "
+
+ if (( $? == 0 )) ; then
+# Prepend 'http://' to given URL where necessary for later output.
+ [[ ${url} != http(s|)://* ]] && url='http://'${url}
+ tiny='http://tinyurl.com/create.php?url='
+ if check_com -c wget ; then
+ grabber='wget -O- -o/dev/null'
+ else
+ print "wget is not available, but mandatory for ${PN}. Aborting."
+ fi
+# Looking for i.e.`copy('http://tinyurl.com/7efkze')' in TinyURL's HTML code.
+ search='copy\(?http://tinyurl.com/[[:alnum:]]##*'
+ result=${(M)${${${(f)"$(${=grabber} ${tiny}${url})"}[(fr)${search}*]}//[()\';]/}%%http:*}
+# TinyURL provides the rather new feature preview for more confidence. <http://tinyurl.com/preview.php>
+ preview='http://preview.'${result#http://}
+
+ printf '%s\n\n' "${PN} - Shrinking long URLs via webservice TinyURL <http://tinyurl.com>."
+ printf '%s\t%s\n\n' 'Given URL:' ${url}
+ printf '%s\t%s\n\t\t%s\n' 'TinyURL:' ${result} ${preview}
+ else
+ return 1
+ fi
}
#f2# Print a specific line of file(s).
# }}}
# 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
#}}}
-# finally source a local zshrc {{{
+zrclocal
-# this allows us to stay in sync with grml's zshrc and put own
-# modifications in ~/.zshrc.local
+## genrefcard.pl settings {{{
-xsource "${HOME}/.zshrc.local"
+### doc strings for external functions from files
+#m# f5 grml-wallpaper() Sets a wallpaper (try completion for possible values)
-# }}}
+### example: split functions-search 8,16,24,32
+#@# split functions-search 8
-### doc strings for external functions from files {{{
-#m# f5 grml-wallpaper() Sets a wallpaper (try completion for possible values)
-#}}}
+## }}}
## END OF FILE #################################################################
# vim:filetype=zsh foldmethod=marker autoindent expandtab shiftwidth=4