-# 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/
# License: This file is licensed under the GPL v2.
-# Latest change: Sam Dez 22 19:17:27 CET 2007 [mika]
################################################################################
# This file is sourced only for interactive shells. It
# should contain commands to set up aliases, functions,
################################################################################
# zsh-refcard-tag documentation: {{{
-# You may notice strange looking comments in the zshrc (and ~/.zshrc as
-# well). These are there for a purpose. grml's zsh-refcard can now be
+# You may notice strange looking comments in this file.
+# These are there for a purpose. grml's zsh-refcard can now be
# automatically generated from the contents of the actual configuration
-# files. However, we need a little extra information on which comments
+# file. However, we need a little extra information on which comments
# and what lines of code to take into account (and for what purpose).
#
# Here is what they mean:
# zsh profiling {{{
# just execute 'ZSH_PROFILE_RC=1 zsh' and run 'zprof' to get the details
-if [[ -n $ZSH_PROFILE_RC ]] ; then
+if [[ $ZSH_PROFILE_RC -gt 0 ]] ; then
zmodload zsh/zprof
fi
# }}}
+# load .zshrc.pre to give the user the chance to overwrite the defaults
+[[ -r ${HOME}/.zshrc.pre ]] && source ${HOME}/.zshrc.pre
+
+# {{{ check for version/system
+# check for versions (compatibility reasons)
+is4(){
+ [[ $ZSH_VERSION == <4->* ]] && return 0
+ return 1
+}
+
+is41(){
+ [[ $ZSH_VERSION == 4.<1->* || $ZSH_VERSION == <5->* ]] && return 0
+ return 1
+}
+
+is42(){
+ [[ $ZSH_VERSION == 4.<2->* || $ZSH_VERSION == <5->* ]] && return 0
+ return 1
+}
+
+is425(){
+ [[ $ZSH_VERSION == 4.2.<5->* || $ZSH_VERSION == 4.<3->* || $ZSH_VERSION == <5->* ]] && return 0
+ return 1
+}
+
+is43(){
+ [[ $ZSH_VERSION == 4.<3->* || $ZSH_VERSION == <5->* ]] && return 0
+ return 1
+}
+
+#f1# Checks whether or not you're running grml
+isgrml(){
+ [[ -f /etc/grml_version ]] && return 0
+ return 1
+}
+
+#f1# Checks whether or not you're running a grml cd
+isgrmlcd(){
+ [[ -f /etc/grml_cd ]] && return 0
+ return 1
+}
+
+if isgrml ; then
+#f1# Checks whether or not you're running grml-small
+ isgrmlsmall() {
+ [[ ${${${(f)"$(</etc/grml_version)"}%% *}##*-} == 'small' ]] && return 0 ; return 1
+ }
+else
+ 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
+ *utf*) return 0 ;;
+ *UTF*) return 0 ;;
+ *) return 1 ;;
+ esac
+}
+
+# check for user, if not running as root set $SUDO to sudo
+(( EUID != 0 )) && SUDO='sudo' || SUDO=''
+
+# change directory to home on first invocation of zsh
+# important for rungetty -> autologin
+# Thanks go to Bart Schaefer!
+isgrml && checkhome() {
+ if [[ -z "$ALREADY_DID_CD_HOME" ]] ; then
+ export ALREADY_DID_CD_HOME=$HOME
+ cd
+ fi
+}
+
+# check for zsh v3.1.7+
+
+if ! [[ ${ZSH_VERSION} == 3.1.<7->* \
+ || ${ZSH_VERSION} == 3.<2->.<->* \
+ || ${ZSH_VERSION} == <4->.<->* ]] ; then
+
+ printf '-!-\n'
+ printf '-!- In this configuration we try to make use of features, that only\n'
+ printf '-!- require version 3.1.7 of the shell; That way this setup can be\n'
+ printf '-!- used with a wide range of zsh versions, while using fairly\n'
+ printf '-!- advanced features in all supported versions.\n'
+ printf '-!-\n'
+ printf '-!- However, you are running zsh version %s.\n' "$ZSH_VERSION"
+ printf '-!-\n'
+ printf '-!- While this *may* work, it might as well fail.\n'
+ printf '-!- Please consider updating to at least version 3.1.7 of zsh.\n'
+ printf '-!-\n'
+ printf '-!- DO NOT EXPECT THIS TO WORK FLAWLESSLY!\n'
+ printf '-!- If it does today, you'\''ve been lucky.\n'
+ printf '-!-\n'
+ printf '-!- Ye been warned!\n'
+ printf '-!-\n'
+
+ 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}
+BATTERY=${BATTERY:-0}
+GRMLSMALL_SPECIFIC=${GRMLSMALL_SPECIFIC:-1}
+GRML_ALWAYS_LOAD_ALL=${GRML_ALWAYS_LOAD_ALL:-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
return 0
}
+# a "print -l ${(u)foo}"-workaround for pre-4.2.0 shells
+# usage: uprint foo
+# Where foo is the *name* of the parameter you want printed.
+# Note that foo is no typo; $foo would be wrong here!
+if ! is42 ; then
+ uprint () {
+ local -a u
+ local w
+ local parameter=${1}
+
+ if [[ -z ${parameter} ]] ; then
+ printf 'usage: uprint <parameter>\n'
+ return 1
+ fi
+
+ for w in ${(P)parameter} ; do
+ [[ -z ${(M)u:#${w}} ]] && u=( ${u} ${w} )
+ done
+
+ builtin print -l ${u}
+ }
+fi
+
# Check if we can read given files and source those we can.
xsource() {
if (( ${#argv} < 1 )) ; then
# setup files. This should be called at the end of .zshrc.
xunfunction() {
local -a funcs
- funcs=(check_com salias xcat xsource xunfunction)
+ funcs=(salias xcat xsource xunfunction zrcautoload)
for func in $funcs ; do
[[ -n ${functions[$func]} ]] \
done
return 0
}
+
#}}}
# locale setup {{{
if [[ -z "$LANG" ]] ; then
- xsource "/etc/default/locale"
+ xsource "/etc/default/locale"
fi
export LANG=${LANG:-en_US.iso885915}
unset xof
# }}}
-# {{{ check for version/system
-# check for versions (compatibility reasons)
-if autoload is-at-least && is-at-least 2>/dev/null ; then
- is4() { is-at-least 4 }
- is41() { is-at-least 4.1 }
- is42() { is-at-least 4.2 }
-else
- is4(){
- [[ $ZSH_VERSION == 4.* ]] && return 0
- return 1
- }
- is42(){
- [[ $ZSH_VERSION == 4.<2->* ]] && return 0
- return 1
- }
-fi
-
-#f1# Checks whether or not you're running grml
-isgrml(){
- [[ -f /etc/grml_version ]] && return 0
- return 1
-}
-
-#f1# Checks whether or not you're running a grml cd
-isgrmlcd(){
- [[ -f /etc/grml_cd ]] && return 0
- return 1
-}
-
-if isgrml ; then
-#f1# Checks whether or not you're running grml-small
- isgrmlsmall() {
- [[ ${${${(f)"$(</etc/grml_version)"}%% *}##*-} == 'small' ]] && return 0 ; return 1
- }
-else
- isgrmlsmall() { return 1 }
-fi
-
-#f1# are we running within an utf environment?
-isutfenv() {
- case "$LANG $CHARSET $LANGUAGE" in
- *utf*) return 0 ;;
- *UTF*) return 0 ;;
- *) return 1 ;;
- esac
-}
-
-# check for user, if not running as root set $SUDO to sudo
-(( EUID != 0 )) && SUDO='sudo' || SUDO=''
-
-# change directory to home on first invocation of zsh
-# important for rungetty -> autologin
-# Thanks go to Bart Schaefer!
-isgrml && checkhome() {
- if [[ -z "$ALREADY_DID_CD_HOME" ]] ; then
- export ALREADY_DID_CD_HOME=$HOME
- cd
- fi
-}
-# }}}
-
# {{{ set some variables
-#v#
if check_com -c vim ; then
+#v#
export EDITOR=${EDITOR:-vim}
else
export EDITOR=${EDITOR:-vi}
fi
+
#v#
+export PAGER=${PAGER:-less}
+#v#
export MAIL=${MAIL:-/var/mail/$USER}
# if we don't set $SHELL then aterm, rxvt,.. will use /bin/sh or /bin/bash :-/
# color setup for ls:
check_com -c dircolors && eval $(dircolors -b)
-
-# set width of man pages to 80 for more convenient reading
-# (( ${+MANWIDTH} )) || export 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
if [[ -n "$BROKEN_COMPLETION_DIR" ]] ; then
print 'Warning: not setting completion directories because broken files have been found.' >&2
else
- [[ -d /etc/zsh/completion.d ]] && fpath+=( /etc/zsh/completion.d )
+ [[ -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/[^_]*[^~] ; do
- autoload -U ${func:t}
+ for func in /etc/zsh/functions.d/[^_]*[^~](N.) ; do
+ zrcautoload -U ${func:t}
done
fi
fi
bindkey '\e[4~' end-of-line # end
bindkey '\e[A' up-line-or-search # cursor up
bindkey '\e[B' down-line-or-search # <ESC>-
-bindkey '^x' history-beginning-search-backward # alternative ways of searching the shell history
+
+bindkey '^xp' history-beginning-search-backward
+bindkey '^xP' history-beginning-search-forward
# bindkey -s '^L' "|less\n" # ctrl-L pipes to less
# bindkey -s '^B' " &\n" # ctrl-B runs it in the background
# if terminal type is set to 'rxvt':
# 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
+zrcautoload insert-unicode-char
zle -N insert-unicode-char
#k# Insert Unicode character
bindkey '^Xi' insert-unicode-char
# bindkey . rationalise-dot
# bindkey '\eq' push-line-or-edit
+
+## toggle the ,. abbreviation feature on/off
+# NOABBREVIATION: default abbreviation-state
+# 0 - enabled (default)
+# 1 - disabled
+NOABBREVIATION=${NOABBREVIATION:-0}
+
+grml_toggle_abbrev() {
+ if (( ${NOABBREVIATION} > 0 )) ; then
+ NOABBREVIATION=0
+ else
+ NOABBREVIATION=1
+ fi
+}
+
+zle -N grml_toggle_abbrev
+bindkey '^xA' grml_toggle_abbrev
+
+# }}}
+
+# a generic accept-line wrapper {{{
+
+# This widget can prevent unwanted autocorrections from command-name
+# to _command-name, rehash automatically on enter and call any number
+# of builtin and user-defined widgets in different contexts.
+#
+# For a broader description, see:
+# <http://bewatermyfriend.org/posts/2007/12-26.11-50-38-tooltime.html>
+#
+# The code is imported from the file 'zsh/functions/accept-line' from
+# <http://ft.bewatermyfriend.org/comp/zsh/zsh-dotfiles.tar.bz2>, which
+# distributed under the same terms as zsh itself.
+
+# A newly added command will may not be found or will cause false
+# correction attempts, if you got auto-correction set. By setting the
+# following style, we force accept-line() to rehash, if it cannot
+# find the first word on the command line in the $command[] hash.
+zstyle ':acceptline:*' rehash true
+
+function Accept-Line() {
+ setopt localoptions noksharrays
+ local -a subs
+ local -xi aldone
+ local sub
+
+ zstyle -a ":acceptline:${alcontext}" actions subs
+
+ (( ${#subs} < 1 )) && return 0
+
+ (( aldone = 0 ))
+ for sub in ${subs} ; do
+ [[ ${sub} == 'accept-line' ]] && sub='.accept-line'
+ zle ${sub}
+
+ (( aldone > 0 )) && break
+ done
+}
+
+function Accept-Line-getdefault() {
+ local default_action
+
+ zstyle -s ":acceptline:${alcontext}" default_action default_action
+ case ${default_action} in
+ ((accept-line|))
+ printf ".accept-line"
+ ;;
+ (*)
+ printf ${default_action}
+ ;;
+ esac
+}
+
+function accept-line() {
+ setopt localoptions noksharrays
+ local -a cmdline
+ local -x alcontext
+ local buf com fname format msg default_action
+
+ alcontext='default'
+ buf="${BUFFER}"
+ cmdline=(${(z)BUFFER})
+ com="${cmdline[1]}"
+ fname="_${com}"
+
+ zstyle -t ":acceptline:${alcontext}" rehash \
+ && [[ -z ${commands[$com]} ]] \
+ && rehash
+
+ if [[ -n ${reswords[(r)$com]} ]] \
+ || [[ -n ${aliases[$com]} ]] \
+ || [[ -n ${functions[$com]} ]] \
+ || [[ -n ${builtins[$com]} ]] \
+ || [[ -n ${commands[$com]} ]] ; then
+
+ # there is something sensible to execute, just do it.
+ alcontext='normal'
+ zle Accept-Line
+
+ default_action=$(Accept-Line-getdefault)
+ zstyle -T ":acceptline:${alcontext}" call_default \
+ && zle ${default_action}
+ return
+ fi
+
+ if [[ -o correct ]] \
+ || [[ -o correctall ]] \
+ && [[ -n ${functions[$fname]} ]] ; then
+
+ # nothing there to execute but there is a function called
+ # _command_name; a completion widget. Makes no sense to
+ # call it on the commandline, but the correct{,all} options
+ # will ask for it nevertheless, so warn the user.
+ if [[ ${LASTWIDGET} == 'accept-line' ]] ; then
+ # Okay, we warned the user before, he called us again,
+ # so have it his way.
+ alcontext='force'
+ zle Accept-Line
+
+ default_action=$(Accept-Line-getdefault)
+ zstyle -T ":acceptline:${alcontext}" call_default \
+ && zle ${default_action}
+ return
+ fi
+
+ # prepare warning message for the user, configurable via zstyle.
+ zstyle -s ":acceptline:${alcontext}" compwarnfmt msg
+
+ if [[ -z ${msg} ]] ; then
+ msg="%c will not execute and completion %f exists."
+ fi
+
+ zformat -f msg "${msg}" "c:${com}" "f:${fname}"
+
+ zle -M -- "${msg}"
+ return
+ elif [[ -n ${buf//[$' \t\n']##/} ]] ; then
+ # If we are here, the commandline contains something that is not
+ # executable, which is neither subject to _command_name correction
+ # and is not empty. might be a variable assignment
+ alcontext='misc'
+ zle Accept-Line
+
+ default_action=$(Accept-Line-getdefault)
+ zstyle -T ":acceptline:${alcontext}" call_default \
+ && zle ${default_action}
+ return
+ fi
+
+ # If we got this far, the commandline only contains whitespace, or is empty.
+ alcontext='empty'
+ zle Accept-Line
+
+ default_action=$(Accept-Line-getdefault)
+ zstyle -T ":acceptline:${alcontext}" call_default \
+ && zle ${default_action}
+}
+
+zle -N accept-line
+zle -N Accept-Line
+
# }}}
# power completion - abbreviation expansion {{{
globalias() {
local MATCH
+
+ if (( NOABBREVIATION > 0 )) ; then
+ LBUFFER="${LBUFFER},."
+ return 0
+ fi
+
matched_chars='[.-|_a-zA-Z0-9]#'
LBUFFER=${LBUFFER%%(#m)[.-|_a-zA-Z0-9]#}
LBUFFER+=${abk[$MATCH]:-$MATCH}
# }}}
# {{{ autoloading
-autoload -U zmv # who needs mmv or rename?
-autoload history-search-end
+zrcautoload zmv # who needs mmv or rename?
+zrcautoload history-search-end
# we don't want to quote/espace URLs on our own...
# if autoload -U url-quote-magic ; then
#m# k ESC-h Call \kbd{run-help} for the 1st word on the command line
alias run-help >&/dev/null && unalias run-help
-autoload run-help # use via 'esc-h'
+zrcautoload run-help # use via 'esc-h'
# completion system
-if autoload -U compinit && compinit 2>/dev/null ; then
+if zrcautoload compinit && compinit 2>/dev/null ; then
compinit 2>/dev/null || print 'Notice: no compinit available :('
else
print 'Notice: no compinit available :('
function compdef { }
fi
-is4 && autoload -U zed # use ZLE editor to edit a file or function
+is4 && zrcautoload zed # use ZLE editor to edit a file or function
is4 && \
for mod in complist deltochar mathfunc ; do
tmpargs=(
a stat
a zpty
- ap zprof
ap mapfile
)
unset tmpargs
fi
-if is4 && autoload -U insert-files && zle -N insert-files ; then
+if is4 && zrcautoload insert-files && zle -N insert-files ; then
#k# Insert files
bindkey "^Xf" insert-files # C-x-f
fi
bindkey '\ei' menu-complete # menu completion via esc-i
# press esc-e for editing command line in $EDITOR or $VISUAL
-if is4 && autoload -U edit-command-line && zle -N edit-command-line ; then
+if is4 && zrcautoload edit-command-line && zle -N edit-command-line ; then
#k# Edit the current line in \kbd{\$EDITOR}
bindkey '\ee' edit-command-line
fi
#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 && autoload -U 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
# grep word *~(*.gz|*.bz|*.bz2|*.zip|*.Z) ->
# -> searches for word not in compressed files
# don't forget to quote '^', '~' and '#'!
+setopt longlistjobs # display PID when suspending processes as well
setopt notify # report the status of backgrounds jobs immediately
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
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@/@}"
# dirstack handling {{{
-DIRSTACKSIZE=20
-if [[ -f ~/.zdirs ]] && [[ ${#dirstack[*]} -eq 0 ]] ; then
- dirstack=( ${(f)"$(< ~/.zdirs)"} )
+DIRSTACKSIZE=${DIRSTACKSIZE:-20}
+DIRSTACKFILE=${DIRSTACKFILE:-${HOME}/.zdirs}
+
+if [[ -f ${DIRSTACKFILE} ]] && [[ ${#dirstack[*]} -eq 0 ]] ; then
+ dirstack=( ${(f)"$(< $DIRSTACKFILE)"} )
# "cd -" won't work after login by just setting $OLDPWD, so
[[ -d $dirstack[0] ]] && cd $dirstack[0] && cd $OLDPWD
fi
chpwd() {
- builtin dirs -pl >! ~/.zdirs
+ if is42 ; then
+ builtin print -l ${(u)dirstack} >! ${DIRSTACKFILE}
+ else
+ uprint dirstack >! ${DIRSTACKFILE}
+ fi
}
# }}}
# {{{ display battery status on right side of prompt via running 'BATTERY=1 zsh'
-if [[ -n "$BATTERY" ]] ; then
- if check_com -c acpi ; then
- PERCENT="${(C)${(s| |)$(acpi 2>/dev/null)}[4]}"
- [[ -z "$PERCENT" ]] && PERCENT='acpi not present'
+if [[ $BATTERY -gt 0 ]] ; then
+ if ! check_com -c acpi ; then
+ BATTERY=0
+ fi
+fi
- if [[ "${PERCENT%%%}" -lt 20 ]] ; then
- PERCENT="warning: ${PERCENT}%"
+battery() {
+if [[ $BATTERY -gt 0 ]] ; then
+ PERCENT="${${"$(acpi 2>/dev/null)"}/(#b)[[:space:]]##Battery <->: [^0-9]##, (<->)%*/${match[1]}}"
+ if [[ -z "$PERCENT" ]] ; then
+ PERCENT='acpi not present'
+ else
+ if [[ "$PERCENT" -lt 20 ]] ; then
+ PERCENT="warning: ${PERCENT}%%"
+ else
+ PERCENT="${PERCENT}%%"
fi
fi
fi
+}
# }}}
-# display version control information on right side of prompt if $VCS is set {{{
-# based on Mike Hommey's http://web.glandium.org/blog/?p=170
-__vcs_dir() {
- local vcs base_dir sub_dir ref
+# set colors for use in prompts {{{
+if zrcautoload colors && colors 2>/dev/null ; then
+ BLUE="%{${fg[blue]}%}"
+ RED="%{${fg_bold[red]}%}"
+ GREEN="%{${fg[green]}%}"
+ CYAN="%{${fg[cyan]}%}"
+ MAGENTA="%{${fg[magenta]}%}"
+ YELLOW="%{${fg[yellow]}%}"
+ WHITE="%{${fg[white]}%}"
+ NO_COLOUR="%{${reset_color}%}"
+else
+ BLUE=$'%{\e[1;34m%}'
+ RED=$'%{\e[1;31m%}'
+ GREEN=$'%{\e[1;32m%}'
+ CYAN=$'%{\e[1;36m%}'
+ WHITE=$'%{\e[1;37m%}'
+ MAGENTA=$'%{\e[1;35m%}'
+ YELLOW=$'%{\e[1;33m%}'
+ NO_COLOUR=$'%{\e[0m%}'
+fi
- sub_dir() {
- local sub_dir
- sub_dir=$(readlink -f "${PWD}")
- sub_dir=${sub_dir#$1}
- echo ${sub_dir#/}
- }
+# }}}
- git_dir() {
- base_dir=$(git-rev-parse --show-cdup 2>/dev/null) || return 1
- base_dir=$(readlink -f "$base_dir/..")
- sub_dir=$(git-rev-parse --show-prefix)
- sub_dir=${sub_dir%/}
- ref=$(git-symbolic-ref -q HEAD || git-name-rev --name-only HEAD 2>/dev/null)
- ref=${ref#refs/heads/}
- vcs="git"
- }
+# gather version control information for inclusion in a prompt {{{
- svn_dir() {
- [[ -d ".svn" ]] || return 1
- base_dir="."
- while [[ -d "$base_dir/../.svn" ]]; do base_dir="$base_dir/.."; done
- base_dir=$(readlink -f "$base_dir")
- sub_dir=$(sub_dir "${base_dir}")
- ref=$(svn info "$base_dir" | awk '/^URL/ { sub(".*/","",$0); r=$0 } /^Revision/ { sub("[^0-9]*","",$0); print r":"$0 }')
- vcs="svn"
- }
+if ! is41 ; then
+ # Be quiet about version problems in grml's zshrc as the user cannot disable
+ # loading vcs_info() as it is *in* the zshrc - as you can see. :-)
+ # Just unset most probable variables and disable vcs_info altogether.
+ local -i i
+ for i in {0..9} ; do
+ unset VCS_INFO_message_${i}_
+ done
+ zstyle ':vcs_info:*' enable false
+fi
- svk_dir() {
- [[ -f ~/.svk/config ]] || return 1
- base_dir=$(awk '/: *$/ { sub(/^ */,"",$0); sub(/: *$/,"",$0); if (match("'${PWD}'", $0"(/|$)")) { print $0; d=1; } } /depotpath/ && d == 1 { sub(".*/","",$0); r=$0 } /revision/ && d == 1 { print r ":" $2; exit 1 }' ~/.svk/config) && return 1
- ref=${base_dir##*
- }
- base_dir=${base_dir%%
- *}
- sub_dir=$(sub_dir "${base_dir}")
- vcs="svk"
- }
+# The following code is imported from the file 'zsh/functions/vcs_info'
+# from <http://ft.bewatermyfriend.org/comp/zsh/zsh-dotfiles.tar.bz2>,
+# which distributed under the same terms as zsh itself.
- hg_dir() {
- base_dir="."
- while [[ ! -d "$base_dir/.hg" ]]; do
- base_dir="$base_dir/.."
- [[ $(readlink -f "${base_dir}") = "/" ]] && return 1
- done
- base_dir=$(readlink -f "$base_dir")
- sub_dir=$(sub_dir "${base_dir}")
- ref=$(< "${base_dir}/.hg/branch")
- vcs="hg"
- }
+# we will only be using one variable, so let the code know now.
+zstyle ':vcs_info:*' max-exports 1
- hg_dir ||
- git_dir ||
- svn_dir ||
- svk_dir # ||
- # base_dir="$PWD"
- # echo "${vcs:+($vcs)}${base_dir/$HOME/~}${vcs:+[$ref]${sub_dir}}"
- echo "${vcs:+($vcs)}${base_dir}${vcs:+[$ref]${sub_dir}}"
+# vcs_info() documentation:
+#{{{
+# REQUIREMENTS:
+#{{{
+# This functionality requires zsh version >= 4.1.*.
+#}}}
+#
+# LOADING:
+#{{{
+# To load vcs_info(), copy this file to your $fpath[] and do:
+# % autoload -Uz vcs_info && vcs_info
+#
+# To work, vcs_info() needs 'setopt prompt_subst' in your setup.
+#}}}
+#
+# QUICKSTART:
+#{{{
+# To get vcs_info() working quickly (including colors), you can do the
+# following (assuming, you loaded vcs_info() properly - see above):
+#
+# % RED=$'%{\e[31m%}'
+# % GR=$'%{\e[32m%}'
+# % MA=$'%{\e[35m%}'
+# % YE=$'%{\e[33m%}'
+# % NC=$'%{\e[0m%}'
+#
+# % zstyle ':vcs_info:*' actionformats \
+# "${MA}(${NC}%s${MA})${YE}-${MA}[${GR}%b${YE}|${RED}%a${MA}]${NC} "
+#
+# % zstyle ':vcs_info:*' formats \
+# "${MA}(${NC}%s${MA})${Y}-${MA}[${GR}%b${MA}]${NC}%} "
+#
+# % zstyle ':vcs_info:(sv[nk]|bzr):*' branchformat "%b${RED}:${YE}%r"
+#
+# % precmd () { vcs_info }
+# % PS1='${MA}[${GR}%n${MA}] ${MA}(${RED}%!${MA}) ${YE}%3~ ${VCS_INFO_message_0_}${NC}%# '
+#
+# Obviously, the las two lines are there for demonstration: You need to
+# call vcs_info() from your precmd() function (see 'SPECIAL FUNCTIONS' in
+# 'man zshmisc'). Once that is done you need a *single* quoted
+# '${VCS_INFO_message_0_}' in your prompt.
+#
+# Now call the 'vcs_info_printsys' utility from the command line:
+#
+# % vcs_info_printsys
+# # list of supported version control backends:
+# # disabled systems are prefixed by a hash sign (#)
+# git
+# hg
+# bzr
+# darcs
+# svk
+# mtn
+# svn
+# cvs
+# cdv
+# tla
+# # flavours (cannot be used in the disable style; they
+# # are disabled with their master [git-svn -> git]):
+# git-p4
+# git-svn
+#
+# Ten version control backends as you can see. You may not want all
+# of these. Because there is no point in running the code to detect
+# systems you do not use. ever. So, there is a way to disable some
+# backends altogether:
+#
+# % zstyle ':vcs_info:*' disable bzr cdv darcs mtn svk tla
+#
+# If you rerun 'vcs_info_printsys' now, you will see the backends listed
+# in the 'disable' style marked as diabled by a hash sign. That means the
+# detection of these systems is skipped *completely*. No wasted time there.
+#
+# For more control, read the reference below.
+#}}}
+#
+# CONFIGURATION:
+#{{{
+# The vcs_info() feature can be configured via zstyle.
+#
+# First, the context in which we are working:
+# :vcs_info:<vcs-string>:<user-context>
+#
+# ...where <vcs-string> is one of:
+# - git, git-svn, git-p4, hg, darcs, bzr, cdv, mtn, svn, cvs, svk or tla.
+#
+# ...and <user-context> is a freely configurable string, assignable by the
+# user as the first argument to vcs_info() (see its description below).
+#
+# There is are three special values for <vcs-string>: The first is named
+# 'init', that is in effect as long as there was no decision what vcs
+# backend to use. The second is 'preinit; it is used *before* vcs_info()
+# is run, when initializing the data exporting variables. The third
+# special value is 'formats' and is used by the 'vcs_info_lastmsg' for
+# looking up its styles.
+#
+# There are two pre-defined values for <user-context>:
+# default - the one used if none is specified
+# command - used by vcs_info_lastmsg to lookup its styles.
+#
+# You may *not* use 'print_systems_' as a user-context string, because it
+# is used internally.
+#
+# You can of course use ':vcs_info:*' to match all VCSs in all
+# user-contexts at once.
+#
+# Another special context is 'formats', which is used by the
+# vcs_info_lastmsg() utility function (see below).
+#
+#
+# This is a description of all styles, that are looked up:
+# formats - A list of formats, used when actionformats is not
+# used (which is most of the time).
+# actionformats - A list of formats, used if a there is a special
+# action going on in your current repository;
+# (like an interactive rebase or a merge conflict)
+# branchformat - Some backends replace %b in the formats and
+# actionformats styles above, not only by a branch
+# name but also by a revision number. This style
+# let's you modify how that string should look like.
+# nvcsformats - These "formats" are exported, when we didn't detect
+# a version control system for the current directory.
+# This is useful, if you want vcs_info() to completely
+# take over the generation of your prompt.
+# You would do something like
+# PS1='${VCS_INFO_message_0_}'
+# to accomplish that.
+# max-exports - Defines the maximum number if VCS_INFO_message_*_
+# variables vcs_info() will export.
+# enable - Checked in the 'init' context. If set to false,
+# vcs_info() will do nothing.
+# 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
+# is to use the not-that-simple code, which is
+# potentially a lot slower but might be more
+# accurate in all possible cases.
+# use-prompt-escapes - determines if we assume that the assembled
+# string from vcs_info() includes prompt escapes.
+# (Used by vcs_info_lastmsg().
+#
+# The use-simple style is only available for the bzr backend.
+#
+# The default values for these in all contexts are:
+# formats " (%s)-[%b|%a]-"
+# actionformats " (%s)-[%b]-"
+# branchformat "%b:%r" (for bzr, svn and svk)
+# nvcsformats ""
+# max-exports 2
+# enable true
+# disable (empty list)
+# disable-patterns (empty list)
+# use-simple false
+# use-prompt-escapes true
+#
+#
+# In normal formats and actionformats, the following replacements
+# are done:
+# %s - The vcs in use (git, hg, svn etc.)
+# %b - Information about the current branch.
+# %a - An identifier, that describes the action.
+# Only makes sense in actionformats.
+# %R - base directory of the repository.
+# %r - repository name
+# If %R is '/foo/bar/repoXY', %r is 'repoXY'.
+# %S - subdirectory within a repository. if $PWD is
+# '/foo/bar/reposXY/beer/tasty', %S is 'beer/tasty'.
+#
+#
+# In branchformat these replacements are done:
+# %b - the branch name
+# %r - the current revision number
+#
+# Not all vcs backends have to support all replacements.
+# nvcsformat does not perform *any* replacements. It is just a string.
+#}}}
+#
+# ODDITIES:
+#{{{
+# If you want to use the %b (bold off) prompt expansion in 'formats', which
+# expands %b itself, use %%b. That will cause the vcs_info() expansion to
+# replace %%b with %b. So zsh's prompt expansion mechanism can handle it.
+# Similarly, to hand down %b from branchformat, use %%%%b. Sorry for this
+# inconvenience, but it cannot be easily avoided. Luckily we do not clash
+# with a lot of prompt expansions and this only needs to be done for those.
+# See 'man zshmisc' for details about EXPANSION OF PROMPT SEQUENCES.
+#}}}
+#
+# FUNCTION DESCRIPTIONS (public API):
+#{{{
+# vcs_info()
+# The main function, that runs all backends and assembles
+# all data into ${VCS_INFO_message_*_}. This is the function
+# you want to call from precmd() if you want to include
+# up-to-date information in your prompt (see VARIABLE
+# DESCRIPTION below).
+#
+# vcs_info_printsys()
+# Prints a list of all supported version control systems.
+# Useful to find out possible contexts (and which of them are enabled)
+# or values for the 'disable' style.
+#
+# vcs_info_lastmsg()
+# Outputs the last ${VCS_INFO_message_*_} value. Takes into account
+# the value of the use-prompt-escapes style in ':vcs_info:formats'.
+# It also only prints max-exports values.
+#
+# All functions named VCS_INFO_* are for internal use only.
+#}}}
+#
+# VARIABLE DESCRIPTION:
+#{{{
+# ${VCS_INFO_message_N_} (Note the trailing underscore)
+# Where 'N' is an integer, eg: VCS_INFO_message_0_
+# These variables are the storage for the informational message the
+# last vcs_info() call has assembled. These are strongly connected
+# to the formats, actionformats and nvcsformats styles described
+# above. Those styles are lists. the first member of that list gets
+# expanded into ${VCS_INFO_message_0_}, the second into
+# ${VCS_INFO_message_1_} and the Nth into ${VCS_INFO_message_N-1_}.
+# These parameters are exported into the environment.
+# (See the max-exports style above.)
+#}}}
+#
+# EXAMPLES:
+#{{{
+# Don't use vcs_info at all (even though it's in your prompt):
+# % zstyle ':vcs_info:*' enable false
+#
+# Disable the backends for bzr and svk:
+# % zstyle ':vcs_info:*' disable bzr svk
+#
+# Provide a special formats for git:
+# % zstyle ':vcs_info:git:*' formats ' GIT, BABY! [%b]'
+# % zstyle ':vcs_info:git:*' actionformats ' GIT ACTION! [%b|%a]'
+#
+# Use the quicker bzr backend (if you do, please report if it does
+# the-right-thing[tm] - thanks):
+# % zstyle ':vcs_info:bzr:*' use-simple true
+#
+# Display the revision number in yellow for bzr and svn:
+# % zstyle ':vcs_info:(svn|bzr):*' branchformat '%b%{'${fg[yellow]}'%}:%r'
+#
+# If you want colors, make sure you enclose the color codes in %{...%},
+# if you want to use the string provided by vcs_info() in prompts.
+#
+# Here is how to print the vcs infomation as a command:
+# % alias vcsi='vcs_info command; vcs_info_lastmsg'
+#
+# This way, you can even define different formats for output via
+# vcs_info_lastmsg() in the ':vcs_info:command:*' namespace.
+#}}}
+#}}}
+# utilities
+VCS_INFO_adjust () { #{{{
+ [[ -n ${vcs_comm[overwrite_name]} ]] && vcs=${vcs_comm[overwrite_name]}
+ return 0
+}
+# }}}
+VCS_INFO_check_com () { #{{{
+ (( ${+commands[$1]} )) && [[ -x ${commands[$1]} ]] && return 0
+ return 1
+}
+# }}}
+VCS_INFO_formats () { # {{{
+ setopt localoptions noksharrays
+ local action=$1 branch=$2 base=$3
+ local msg
+ local -i i
+
+ if [[ -n ${action} ]] ; then
+ zstyle -a ":vcs_info:${vcs}:${usercontext}" actionformats msgs
+ (( ${#msgs} < 1 )) && msgs[1]=' (%s)-[%b|%a]-'
+ else
+ zstyle -a ":vcs_info:${vcs}:${usercontext}" formats msgs
+ (( ${#msgs} < 1 )) && msgs[1]=' (%s)-[%b]-'
+ fi
+
+ (( ${#msgs} > maxexports )) && msgs[${maxexports},-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})"
+ 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}
+ printf 'Defaulting to 2.\n'
+ maxexports=2
+ fi
+}
+# }}}
+VCS_INFO_nvcsformats () { #{{{
+ setopt localoptions noksharrays
+ local c v
+
+ if [[ $1 == 'preinit' ]] ; then
+ c=default
+ v=preinit
+ fi
+ zstyle -a ":vcs_info:${v:-$vcs}:${c:-$usercontext}" nvcsformats msgs
+ (( ${#msgs} > maxexports )) && msgs[${maxexports},-1]=()
+}
+# }}}
+VCS_INFO_realpath () { #{{{
+ # a portable 'readlink -f'
+ # forcing a subshell, to ensure chpwd() is not removed
+ # from the calling shell (if VCS_INFO_realpath() is called
+ # manually).
+ (
+ (( ${+functions[chpwd]} )) && unfunction chpwd
+ setopt chaselinks
+ cd $1 2>/dev/null && pwd
+ )
+}
+# }}}
+VCS_INFO_reposub () { #{{{
+ setopt localoptions extendedglob
+ local base=${1%%/##}
+
+ [[ ${PWD} == ${base}/* ]] || {
+ printf '.'
+ return 1
+ }
+ printf '%s' ${PWD#$base/}
+ return 0
+}
+# }}}
+VCS_INFO_set () { #{{{
+ setopt localoptions noksharrays
+ local -i i j
+
+ if [[ $1 == '--clear' ]] ; then
+ for i in {0..9} ; do
+ unset VCS_INFO_message_${i}_
+ done
+ fi
+ if [[ $1 == '--nvcs' ]] ; then
+ [[ $2 == 'preinit' ]] && (( maxexports == 0 )) && (( maxexports = 1 ))
+ for i in {0..$((maxexports - 1))} ; do
+ typeset -gx VCS_INFO_message_${i}_=
+ done
+ VCS_INFO_nvcsformats $2
+ fi
+
+ (( ${#msgs} - 1 < 0 )) && return 0
+ for i in {0..$(( ${#msgs} - 1 ))} ; do
+ (( j = i + 1 ))
+ typeset -gx VCS_INFO_message_${i}_=${msgs[$j]}
+ done
+ return 0
+}
+# }}}
+# information gathering
+VCS_INFO_bzr_get_data () { # {{{
+ setopt localoptions noksharrays
+ local bzrbase bzrbr
+ local -a bzrinfo
+
+ if zstyle -t ":vcs_info:${vcs}:${usercontext}" "use-simple" ; then
+ bzrbase=${vcs_comm[basedir]}
+ bzrinfo[2]=${bzrbase:t}
+ if [[ -f ${bzrbase}/.bzr/branch/last-revision ]] ; then
+ bzrinfo[1]=$(< ${bzrbase}/.bzr/branch/last-revision)
+ bzrinfo[1]=${${bzrinfo[1]}%% *}
+ fi
+ else
+ bzrbase=${${(M)${(f)"$( bzr info )"}:# ##branch\ root:*}/*: ##/}
+ bzrinfo=( ${${${(M)${(f)"$( bzr version-info )"}:#(#s)(revno|branch-nick)*}/*: /}/*\//} )
+ bzrbase="$(VCS_INFO_realpath ${bzrbase})"
+ fi
+
+ zstyle -s ":vcs_info:${vcs}:${usercontext}" branchformat bzrbr || bzrbr="%b:%r"
+ zformat -f bzrbr "${bzrbr}" "b:${bzrinfo[2]}" "r:${bzrinfo[1]}"
+ VCS_INFO_formats '' "${bzrbr}" "${bzrbase}"
+ return 0
+}
+# }}}
+VCS_INFO_cdv_get_data () { # {{{
+ local cdvbase
+
+ cdvbase=${vcs_comm[basedir]}
+ VCS_INFO_formats '' "${cdvbase:t}" "${cdvbase}"
+ return 0
+}
+# }}}
+VCS_INFO_cvs_get_data () { # {{{
+ local cvsbranch cvsbase basename
+
+ cvsbase="."
+ while [[ -d "${cvsbase}/../CVS" ]]; do
+ cvsbase="${cvsbase}/.."
+ done
+ cvsbase="$(VCS_INFO_realpath ${cvsbase})"
+ cvsbranch=$(< ./CVS/Repository)
+ basename=${cvsbase:t}
+ cvsbranch=${cvsbranch##${basename}/}
+ [[ -z ${cvsbranch} ]] && cvsbranch=${basename}
+ VCS_INFO_formats '' "${cvsbranch}" "${cvsbase}"
+ return 0
+}
+# }}}
+VCS_INFO_darcs_get_data () { # {{{
+ local darcsbase
+
+ darcsbase=${vcs_comm[basedir]}
+ VCS_INFO_formats '' "${darcsbase:t}" "${darcsbase}"
+ return 0
+}
+# }}}
+VCS_INFO_git_getaction () { #{{{
+ local gitaction='' gitdir=$1
+ local tmp
+
+ for tmp in "${gitdir}/rebase-apply" \
+ "${gitdir}/rebase" \
+ "${gitdir}/../.dotest" ; do
+ if [[ -d ${tmp} ]] ; then
+ if [[ -f "${tmp}/rebasing" ]] ; then
+ gitaction="rebase"
+ elif [[ -f "${tmp}/applying" ]] ; then
+ gitaction="am"
+ else
+ gitaction="am/rebase"
+ fi
+ printf '%s' ${gitaction}
+ return 0
+ fi
+ done
+
+ for tmp in "${gitdir}/rebase-merge/interactive" \
+ "${gitdir}/.dotest-merge/interactive" ; do
+ if [[ -f "${tmp}" ]] ; then
+ printf '%s' "rebase-i"
+ return 0
+ fi
+ done
+
+ for tmp in "${gitdir}/rebase-merge" \
+ "${gitdir}/.dotest-merge" ; do
+ if [[ -d "${tmp}" ]] ; then
+ printf '%s' "rebase-m"
+ return 0
+ fi
+ done
+
+ if [[ -f "${gitdir}/MERGE_HEAD" ]] ; then
+ printf '%s' "merge"
+ return 0
+ fi
+
+ if [[ -f "${gitdir}/BISECT_LOG" ]] ; then
+ printf '%s' "bisect"
+ return 0
+ fi
+ return 1
+}
+# }}}
+VCS_INFO_git_getbranch () { #{{{
+ local gitbranch gitdir=$1
+ local gitsymref='git symbolic-ref HEAD'
+
+ if [[ -d "${gitdir}/rebase-apply" ]] \
+ || [[ -d "${gitdir}/rebase" ]] \
+ || [[ -d "${gitdir}/../.dotest" ]] \
+ || [[ -f "${gitdir}/MERGE_HEAD" ]] ; then
+ gitbranch="$(${(z)gitsymref} 2> /dev/null)"
+ [[ -z ${gitbranch} ]] && [[ -r ${gitdir}/rebase-apply/head-name ]] \
+ && gitbranch="$(< ${gitdir}/rebase-apply/head-name)"
+
+ elif [[ -f "${gitdir}/rebase-merge/interactive" ]] \
+ || [[ -d "${gitdir}/rebase-merge" ]] ; then
+ gitbranch="$(< ${gitdir}/rebase-merge/head-name)"
+
+ elif [[ -f "${gitdir}/.dotest-merge/interactive" ]] \
+ || [[ -d "${gitdir}/.dotest-merge" ]] ; then
+ gitbranch="$(< ${gitdir}/.dotest-merge/head-name)"
+
+ else
+ gitbranch="$(${(z)gitsymref} 2> /dev/null)"
+
+ if [[ $? -ne 0 ]] ; then
+ gitbranch="$(git describe --exact-match HEAD 2>/dev/null)"
+
+ if [[ $? -ne 0 ]] ; then
+ gitbranch="${${"$(< $gitdir/HEAD)"}[1,7]}..."
+ fi
+ fi
+ fi
+
+ printf '%s' "${gitbranch##refs/heads/}"
+ return 0
+}
+# }}}
+VCS_INFO_git_get_data () { # {{{
+ setopt localoptions extendedglob
+ local gitdir gitbase gitbranch gitaction
+
+ gitdir=${vcs_comm[gitdir]}
+ gitbranch="$(VCS_INFO_git_getbranch ${gitdir})"
+
+ if [[ -z ${gitdir} ]] || [[ -z ${gitbranch} ]] ; then
+ return 1
+ fi
+
+ VCS_INFO_adjust
+ gitaction="$(VCS_INFO_git_getaction ${gitdir})"
+ gitbase=${PWD%/${$( git rev-parse --show-prefix )%/##}}
+ VCS_INFO_formats "${gitaction}" "${gitbranch}" "${gitbase}"
+ return 0
+}
+# }}}
+VCS_INFO_hg_get_data () { # {{{
+ local hgbranch hgbase
+
+ hgbase=${vcs_comm[basedir]}
+ hgbranch=$(< ${hgbase}/.hg/branch)
+ VCS_INFO_formats '' "${hgbranch}" "${hgbase}"
+ return 0
+}
+# }}}
+VCS_INFO_mtn_get_data () { # {{{
+ local mtnbranch mtnbase
+
+ mtnbase=${vcs_comm[basedir]}
+ mtnbranch=${${(M)${(f)"$( mtn status )"}:#(#s)Current branch:*}/*: /}
+ VCS_INFO_formats '' "${mtnbranch}" "${mtnbase}"
+ return 0
+}
+# }}}
+VCS_INFO_svk_get_data () { # {{{
+ local svkbranch svkbase
+
+ svkbase=${vcs_comm[basedir]}
+ zstyle -s ":vcs_info:${vcs}:${usercontext}" branchformat svkbranch || svkbranch="%b:%r"
+ zformat -f svkbranch "${svkbranch}" "b:${vcs_comm[branch]}" "r:${vcs_comm[revision]}"
+ VCS_INFO_formats '' "${svkbranch}" "${svkbase}"
+ return 0
+}
+# }}}
+VCS_INFO_svn_get_data () { # {{{
+ setopt localoptions noksharrays
+ local svnbase svnbranch
+ local -a svninfo
+
+ svnbase="."
+ while [[ -d "${svnbase}/../.svn" ]]; do
+ svnbase="${svnbase}/.."
+ done
+ svnbase="$(VCS_INFO_realpath ${svnbase})"
+ svninfo=( ${${${(M)${(f)"$( svn info )"}:#(#s)(URL|Revision)*}/*: /}/*\//} )
+
+ zstyle -s ":vcs_info:${vcs}:${usercontext}" branchformat svnbranch || svnbranch="%b:%r"
+ zformat -f svnbranch "${svnbranch}" "b:${svninfo[1]}" "r:${svninfo[2]}"
+ VCS_INFO_formats '' "${svnbranch}" "${svnbase}"
+ return 0
+}
+# }}}
+VCS_INFO_tla_get_data () { # {{{
+ local tlabase tlabranch
+
+ tlabase="$(VCS_INFO_realpath ${vcs_comm[basedir]})"
+ # tree-id gives us something like 'foo@example.com/demo--1.0--patch-4', so:
+ tlabranch=${${"$( tla tree-id )"}/*\//}
+ VCS_INFO_formats '' "${tlabranch}" "${tlabase}"
+ return 0
+}
+# }}}
+# detection
+VCS_INFO_detect_by_dir() { #{{{
+ local dirname=$1
+ local basedir="." realbasedir
+
+ realbasedir="$(VCS_INFO_realpath ${basedir})"
+ while [[ ${realbasedir} != '/' ]]; do
+ if [[ -n ${vcs_comm[detect_need_file]} ]] ; then
+ [[ -d ${basedir}/${dirname} ]] && \
+ [[ -f ${basedir}/${dirname}/${vcs_comm[detect_need_file]} ]] && \
+ break
+ else
+ [[ -d ${basedir}/${dirname} ]] && break
+ fi
+
+ basedir=${basedir}/..
+ realbasedir="$(VCS_INFO_realpath ${basedir})"
+ done
+
+ [[ ${realbasedir} == "/" ]] && return 1
+ vcs_comm[basedir]=${realbasedir}
+ return 0
+}
+# }}}
+VCS_INFO_bzr_detect() { #{{{
+ VCS_INFO_check_com bzr || return 1
+ vcs_comm[detect_need_file]=branch/format
+ VCS_INFO_detect_by_dir '.bzr'
+ return $?
+}
+# }}}
+VCS_INFO_cdv_detect() { #{{{
+ VCS_INFO_check_com cdv || return 1
+ vcs_comm[detect_need_file]=format
+ VCS_INFO_detect_by_dir '.cdv'
+ return $?
+}
+# }}}
+VCS_INFO_cvs_detect() { #{{{
+ VCS_INFO_check_com svn || return 1
+ [[ -d "./CVS" ]] && [[ -r "./CVS/Repository" ]] && return 0
+ return 1
+}
+# }}}
+VCS_INFO_darcs_detect() { #{{{
+ VCS_INFO_check_com darcs || return 1
+ vcs_comm[detect_need_file]=format
+ VCS_INFO_detect_by_dir '_darcs'
+ return $?
+}
+# }}}
+VCS_INFO_git_detect() { #{{{
+ if VCS_INFO_check_com git && git rev-parse --is-inside-work-tree &> /dev/null ; then
+ vcs_comm[gitdir]="$(git rev-parse --git-dir 2> /dev/null)" || return 1
+ if [[ -d ${vcs_comm[gitdir]}/svn ]] ; then vcs_comm[overwrite_name]='git-svn'
+ elif [[ -d ${vcs_comm[gitdir]}/refs/remotes/p4 ]] ; then vcs_comm[overwrite_name]='git-p4' ; fi
+ return 0
+ fi
+ return 1
+}
+# }}}
+VCS_INFO_hg_detect() { #{{{
+ VCS_INFO_check_com hg || return 1
+ vcs_comm[detect_need_file]=branch
+ VCS_INFO_detect_by_dir '.hg'
+ return $?
+}
+# }}}
+VCS_INFO_mtn_detect() { #{{{
+ VCS_INFO_check_com mtn || return 1
+ vcs_comm[detect_need_file]=revision
+ VCS_INFO_detect_by_dir '_MTN'
+ return $?
+}
+# }}}
+VCS_INFO_svk_detect() { #{{{
+ setopt localoptions noksharrays extendedglob
+ local -a info
+ local -i fhash
+ fhash=0
+
+ VCS_INFO_check_com svk || return 1
+ [[ -f ~/.svk/config ]] || return 1
+
+ # This detection function is a bit different from the others.
+ # We need to read svk's config file to detect a svk repository
+ # in the first place. Therefore, we'll just proceed and read
+ # the other information, too. This is more then any of the
+ # other detections do but this takes only one file open for
+ # svk at most. VCS_INFO_svk_get_data() get simpler, too. :-)
+ while IFS= read -r line ; do
+ if [[ -n ${vcs_comm[basedir]} ]] ; then
+ line=${line## ##}
+ [[ ${line} == depotpath:* ]] && vcs_comm[branch]=${line##*/}
+ [[ ${line} == revision:* ]] && vcs_comm[revision]=${line##*[[:space:]]##}
+ [[ -n ${vcs_comm[branch]} ]] && [[ -n ${vcs_comm[revision]} ]] && break
+ continue
+ fi
+ (( fhash > 0 )) && [[ ${line} == ' '[^[:space:]]*:* ]] && break
+ [[ ${line} == ' hash:'* ]] && fhash=1 && continue
+ (( fhash == 0 )) && continue
+ [[ ${PWD}/ == ${${line## ##}%:*}/* ]] && vcs_comm[basedir]=${${line## ##}%:*}
+ done < ~/.svk/config
+
+ [[ -n ${vcs_comm[basedir]} ]] && \
+ [[ -n ${vcs_comm[branch]} ]] && \
+ [[ -n ${vcs_comm[revision]} ]] && return 0
+ return 1
+}
+# }}}
+VCS_INFO_svn_detect() { #{{{
+ VCS_INFO_check_com svn || return 1
+ [[ -d ".svn" ]] && return 0
+ return 1
+}
+# }}}
+VCS_INFO_tla_detect() { #{{{
+ VCS_INFO_check_com tla || return 1
+ vcs_comm[basedir]="$(tla tree-root 2> /dev/null)" && return 0
+ return 1
+}
+# }}}
+# public API
+vcs_info_printsys () { # {{{
+ vcs_info print_systems_
+}
+# }}}
+vcs_info_lastmsg () { # {{{
+ local -i i
+
+ VCS_INFO_maxexports
+ for i in {0..$((maxexports - 1))} ; do
+ printf '$VCS_INFO_message_%d_: "' $i
+ if zstyle -T ':vcs_info:formats:command' use-prompt-escapes ; then
+ print -nP ${(P)${:-VCS_INFO_message_${i}_}}
+ else
+ print -n ${(P)${:-VCS_INFO_message_${i}_}}
+ fi
+ printf '"\n'
+ done
+}
+# }}}
+vcs_info () { # {{{
+ local pat
+ local -i found
+ local -a VCSs disabled dps
+ local -x vcs usercontext
+ local -ax msgs
+ local -Ax vcs_comm
+
+ vcs="init"
+ VCSs=(git hg bzr darcs svk mtn svn cvs cdv tla)
+ case $1 in
+ (print_systems_)
+ zstyle -a ":vcs_info:${vcs}:${usercontext}" "disable" disabled
+ print -l '# list of supported version control backends:' \
+ '# disabled systems are prefixed by a hash sign (#)'
+ for vcs in ${VCSs} ; do
+ [[ -n ${(M)disabled:#${vcs}} ]] && printf '#'
+ printf '%s\n' ${vcs}
+ done
+ print -l '# flavours (cannot be used in the disable style; they' \
+ '# are disabled with their master [git-svn -> git]):' \
+ git-{p4,svn}
+ return 0
+ ;;
+ ('')
+ [[ -z ${usercontext} ]] && usercontext=default
+ ;;
+ (*) [[ -z ${usercontext} ]] && usercontext=$1
+ ;;
+ esac
+
+ zstyle -T ":vcs_info:${vcs}:${usercontext}" "enable" || {
+ [[ -n ${VCS_INFO_message_0_} ]] && VCS_INFO_set --clear
+ 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 ))
+ for vcs in ${VCSs} ; do
+ [[ -n ${(M)disabled:#${vcs}} ]] && continue
+ vcs_comm=()
+ VCS_INFO_${vcs}_detect && (( found = 1 )) && break
+ done
+
+ (( found == 0 )) && {
+ VCS_INFO_set --nvcs
+ return 0
+ }
+
+ VCS_INFO_${vcs}_get_data || {
+ VCS_INFO_set --nvcs
+ return 1
+ }
+
+ VCS_INFO_set
+ return 0
}
+
+VCS_INFO_set --nvcs preinit
+# }}}
+
+# change vcs_info formats for the grml prompt
+if [[ "$TERM" == dumb ]] ; then
+ zstyle ':vcs_info:*' actionformats "(%s%)-[%b|%a] "
+ zstyle ':vcs_info:*' formats "(%s%)-[%b] "
+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:(sv[nk]|bzr):*' branchformat "%b${RED}:${YELLOW}%r"
+fi
+
# }}}
# {{{ set prompt
-if autoload promptinit && promptinit 2>/dev/null ; then
+if zrcautoload promptinit && promptinit 2>/dev/null ; then
promptinit # people should be able to use their favourite prompt
else
print 'Notice: no promptinit available :('
fi
-
-# precmd() => a function which is executed just before each prompt
-# use 'NOPRECMD=1' to disable the precmd + preexec commands
-
-# precmd () { setopt promptsubst; [[ -o interactive ]] && jobs -l;
+setopt prompt_subst
# make sure to use right prompt only when not running a command
is41 && setopt transient_rprompt
-is4 && [[ -z $NOPRECMD ]] && precmd () {
- [[ -n $NOPRECMD ]] && return 0
+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* ]] && echo -n $'\ekzsh\e\\'
+ [[ $TERM == screen* ]] && print -nP "\ekzsh\e\\"
# return 0
fi
# just use DONTSETRPROMPT=1 to be able to overwrite RPROMPT
- if [[ -z $DONTSETRPROMPT ]] ; then
- if [[ -n $BATTERY ]] ; then
+ if [[ $DONTSETRPROMPT -eq 0 ]] ; then
+ if [[ $BATTERY -gt 0 ]] ; then
+ # update BATTERY information
+ battery
RPROMPT="%(?..:()% ${PERCENT}${SCREENTITLE}"
# RPROMPT="${PERCENT}${SCREENTITLE}"
- elif [[ -n $VCS ]] ; then
- RPROMPT="%(?..:()% $(__vcs_dir)${SCREENTITLE}"
else
RPROMPT="%(?..:()% ${SCREENTITLE}"
# RPROMPT="${SCREENTITLE}"
esac
}
-# chpwd () => a function which is executed whenever the directory is changed
-
# preexec() => a function running before every command
-is4 && [[ -z $NOPRECMD ]] && \
+is4 && [[ $NOPRECMD -eq 0 ]] && \
preexec () {
- [[ -n $NOPRECMD ]] && return 0
+ [[ $NOPRECMD -gt 0 ]] && return 0
# set hostname if not running on host with name 'grml'
- if [[ "$HOSTNAME" != $(hostname) ]] ; then
+ if [[ -n "$HOSTNAME" ]] && [[ "$HOSTNAME" != $(hostname) ]] ; then
NAME="@$HOSTNAME"
fi
# get the name of the program currently running and hostname of local machine
esac
}
-# set colors
-if autoload colors && colors 2>/dev/null ; then
- BLUE="%{${fg[blue]}%}"
- RED="%{${fg_bold[red]}%}"
- GREEN="%{${fg[green]}%}"
- CYAN="%{${fg[cyan]}%}"
- WHITE="%{${fg[white]}%}"
- NO_COLOUR="%{${reset_color}%}"
-else
- BLUE=$'%{\e[1;34m%}'
- RED=$'%{\e[1;31m%}'
- GREEN=$'%{\e[1;32m%}'
- CYAN=$'%{\e[1;36m%}'
- WHITE=$'%{\e[1;37m%}'
- NO_COLOUR=$'%{\e[0m%}'
-fi
-
EXITCODE="%(?..%?%1v )"
-PS2='`%_> ' # secondary prompt, printed when the shell needs more information to complete a command.
+PS2='\`%_> ' # secondary prompt, printed when the shell needs more information to complete a command.
PS3='?# ' # selection prompt used within a select loop.
PS4='+%N:%i:%_> ' # the execution trace prompt (setopt xtrace). default: '+%N:%i>'
# don't use colors on dumb terminals (like emacs):
if [[ "$TERM" == dumb ]] ; then
- PROMPT="${EXITCODE}${debian_chroot:+($debian_chroot)}%n@%m %40<...<%B%~%b%<< %# "
+ PROMPT="${EXITCODE}${debian_chroot:+($debian_chroot)}%n@%m %40<...<%B%~%b%<< "'${VCS_INFO_message_0_}'"%# "
else
# only if $GRMLPROMPT is set (e.g. via 'GRMLPROMPT=1 zsh') use the extended prompt
# set variable identifying the chroot you work in (used in the prompt below)
- if [[ -n $GRMLPROMPT ]] ; then
+ if [[ $GRMLPROMPT -gt 0 ]] ; then
PROMPT="${RED}${EXITCODE}${CYAN}[%j running job(s)] ${GREEN}{history#%!} ${RED}%(3L.+.) ${BLUE}%* %D
${BLUE}%n${NO_COLOUR}@%m %40<...<%B%~%b%<< %# "
else
+ # This assembles the primary prompt string
if (( EUID != 0 )); then
- PROMPT="${RED}${EXITCODE}${WHITE}${debian_chroot:+($debian_chroot)}${BLUE}%n${NO_COLOUR}@%m %40<...<%B%~%b%<< %# " # primary prompt string
+ PROMPT="${RED}${EXITCODE}${WHITE}${debian_chroot:+($debian_chroot)}${BLUE}%n${NO_COLOUR}@%m %40<...<%B%~%b%<< "'${VCS_INFO_message_0_}'"%# "
else
- PROMPT="${BLUE}${EXITCODE}${WHITE}${debian_chroot:+($debian_chroot)}${RED}%n${NO_COLOUR}@%m %40<...<%B%~%b%<< %# " # primary prompt string
+ PROMPT="${BLUE}${EXITCODE}${WHITE}${debian_chroot:+($debian_chroot)}${RED}%n${NO_COLOUR}@%m %40<...<%B%~%b%<< "'${VCS_INFO_message_0_}'"%# "
fi
fi
fi
# }}}
# {{{ 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?
# set up software synthesizer via speakup
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
- sleep 2
- flite -o play -t "Finished setting up software synthesizer"
- fi
+ if [ -x /usr/sbin/swspeak-setup ] ; then
+ setopt singlelinezle
+ unsetopt prompt_cr
+ export PS1="%m%# "
+ /usr/sbin/swspeak-setup $@
+ else # old version:
+ 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
+ sleep 2
+ flite -o play -t "Finished setting up software synthesizer"
+ fi
+ fi
}
# I like clean prompt, so provide simple way to get that
=======================================$reset_color"
print '
-Main configuration of zsh happens in /etc/zsh/zshrc (global)
-and /etc/skel/.zshrc which is copied to $HOME/.zshrc once.
-The files are part of the package grml-etc-core, if you want to
+Main configuration of zsh happens in /etc/zsh/zshrc.
+That file is part of the package grml-etc-core, if you want to
use them on a non-grml-system just get the tar.gz from
-http://deb.grml.org/ or get the files from the mercurial
-repository:
+http://deb.grml.org/ or (preferably) get it from the git repository:
+
+ http://git.grml.org/f/grml-etc-core/etc/zsh/zshrc
+
+This version of grml'\''s zsh setup does not use skel/.zshrc anymore.
+The file is still there, but it is empty for backwards compatibility.
- http://hg.grml.org/grml-etc-core/raw-file/tip/etc/skel/.zshrc
- http://hg.grml.org/grml-etc-core/raw-file/tip/etc/zsh/zshrc
+For your own changes use these two files:
+ $HOME/.zshrc.pre
+ $HOME/.zshrc.local
-If you want to stay in sync with zsh configuration of grml
-run '\''ln -sf /etc/skel/.zshrc $HOME/.zshrc'\'' and configure
-your own stuff in $HOME/.zshrc.local. System wide configuration
-without touching configuration files of grml can take place
-in /etc/zsh/zshrc.local.
+The former is sourced very early in our zshrc, the latter is sourced
+very lately.
-If you want to use the configuration of user grml also when
-running as user root just run '\''zshskel'\'' which will source
-the file /etc/skel/.zshrc.
+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/
the zsh yet. :)
"NOCOR=1 zsh" => deactivate automatic correction
- "NOMENU=1 zsh" => do not use menu completion (note: use strg-d for completion instead!)
+ "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)
- "BATTERY=1 zsh" => activate battery status (via acpi) on right side of prompt'
+ "BATTERY=1 zsh" => activate battery status (via acpi) on right side of prompt
+
+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
+add them to ~/.zshrc.pre to ensure they are set when sourcing grml'\''s
+zshrc.'
print "
$bg[white]$fg[black]
fi
}
- isgrmlcd && alias su="sudo -s" # get a root shell
+ # get a root shell as normal user in live-cd mode:
+ if isgrmlcd && [[ $UID -ne 0 ]] ; then
+ alias su="sudo su"
+ 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
#a1# Take a look at the syslog: \kbd{tail -f /var/log/syslog}
alias tlog="tail -f /var/log/syslog" # follow the syslog
- #a1# (Re)-source \kbd{/etc/skel/.zshrc}
- alias zshskel="source /etc/skel/.zshrc" # source skeleton zshrc
fi
# sort installed Debian-packages by size
# {{{ Use hard limits, except for a smaller stack and no core dumps
unlimit
-limit stack 8192
+is425 && limit stack 8192
isgrmlcd && limit core 0 # important for a live-cd-system
limit -s
# }}}
# {{{ 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:*:matches' group 'yes'
zstyle ':completion:*' group-name ''
- if [[ -z "$NOMENU" ]] ; then
+ if [[ "$NOMENU" -eq 0 ]] ; then
# if there are more than 5 options allow selecting from a menu
zstyle ':completion:*' menu select=5
else
# Ignore completion functions for commands you don't have:
zstyle ':completion::(^approximate*):*:functions' ignored-patterns '_*'
+ # Provide more processes in completion of programs like killall:
+ zstyle ':completion:*:processes-names' command 'ps c -u ${USER} -o command | uniq'
+
# complete manual by their section
zstyle ':completion:*:manuals' separate-sections true
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
## correction
# some people don't like the automatic correction - so run 'NOCOR=1 zsh' to deactivate it
- if [[ -n "$NOCOR" ]] ; then
+ if [[ "$NOCOR" -gt 0 ]] ; then
zstyle ':completion:*' completer _oldlist _expand _force_rehash _complete _files _ignored
setopt nocorrect
else
fi'
fi
- # zstyle ':completion:*' completer _complete _correct _approximate
- # zstyle ':completion:*' expand prefix suffix
-
- # automatic rehash? Credits go to Frank Terbeck
- # TODO: keep this at all? And if so, move it, it has nothing to do with completion
- # my_accept() {
- # local buf
- # [[ -z ${BUFFER} ]] && zle accept-line && return
- # buf=( ${(z)BUFFER} )
- # [[ -z ${commands[${buf[1]}]} ]] && rehash
- # zle accept-line
- # }
- # zle -N my_accept
- # bindkey "^M" my_accept
-
# 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
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 most ; then
+if check_com -c $PAGER ; then
#f1# View Debian's changelog of a given package
dchange() {
if [[ -r /usr/share/doc/${1}/changelog.Debian.gz ]] ; then
- most /usr/share/doc/${1}/changelog.Debian.gz
+ $PAGER /usr/share/doc/${1}/changelog.Debian.gz
elif [[ -r /usr/share/doc/${1}/changelog.gz ]] ; then
- most /usr/share/doc/${1}/changelog.gz
+ $PAGER /usr/share/doc/${1}/changelog.gz
else
if check_com -c aptitude ; then
echo "No changelog for package $1 found, using aptitude to retrieve it."
#f1# View Debian's NEWS of a given package
dnews() {
if [[ -r /usr/share/doc/${1}/NEWS.Debian.gz ]] ; then
- most /usr/share/doc/${1}/NEWS.Debian.gz
+ $PAGER /usr/share/doc/${1}/NEWS.Debian.gz
else
if [[ -r /usr/share/doc/${1}/NEWS.gz ]] ; then
- most /usr/share/doc/${1}/NEWS.gz
+ $PAGER /usr/share/doc/${1}/NEWS.gz
else
echo "No NEWS file for package $1 found, sorry."
return 1
#f1# View upstream's changelog of a given package
uchange() {
if [[ -r /usr/share/doc/${1}/changelog.gz ]] ; then
- most /usr/share/doc/${1}/changelog.gz
+ $PAGER /usr/share/doc/${1}/changelog.gz
else
echo "No changelog for package $1 found, sorry."
return 1
#m# f6 Stop() \kbd{/etc/init.d/\em{process}}\quad\kbd{stop}
#m# f6 Reload() \kbd{/etc/init.d/\em{process}}\quad\kbd{reload}
#m# f6 Force-Reload() \kbd{/etc/init.d/\em{process}}\quad\kbd{force-reload}
-if [[ -d /etc/init.d ]] ; then
+if [[ -d /etc/init.d || -d /etc/service ]] ; then
+ __start_stop() {
+ local action_="${1:l}" # e.g Start/Stop/Restart
+ local service_="$2"
+ local param_="$3"
+
+ local service_target_="$(readlink /etc/init.d/$service_)"
+ if [[ $service_target_ == "/usr/bin/sv" ]]; then
+ # runit
+ case "${action_}" in
+ start) if [[ ! -e /etc/service/$service_ ]]; then
+ $SUDO ln -s "/etc/sv/$service_" "/etc/service/"
+ else
+ $SUDO "/etc/init.d/$service_" "${action_}" "$param_"
+ fi ;;
+ # there is no reload in runits sysv emulation
+ reload) $SUDO "/etc/init.d/$service_" "force-reload" "$param_" ;;
+ *) $SUDO "/etc/init.d/$service_" "${action_}" "$param_" ;;
+ esac
+ else
+ # sysvinit
+ $SUDO "/etc/init.d/$service_" "${action_}" "$param_"
+ fi
+ }
+
for i in Start Restart Stop Force-Reload Reload ; do
- eval "$i() { $SUDO /etc/init.d/\$1 ${i:l} \$2 ; }"
+ eval "$i() { __start_stop $i \"\$1\" \"\$2\" ; }"
done
fi
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() {
+#{{{
+ LANG=C perl -e '
+
+sub usage {
+ print "usage: zg -[anr] <pattern>\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 = <FH>) {
+ 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 $?
+}
-# 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 WHITE ; unset $color
+for color in BLUE RED GREEN CYAN YELLOW MAGENTA WHITE ; unset $color
# }}}
# source another config file if present {{{
fi
# }}}
+#:grep:marker:for:mika: :-)
+### non-root (EUID != 0) code below
+###
+
+(( GRML_ALWAYS_LOAD_ALL == 0 )) && (( $EUID == 0 )) && return 0
+
+# variables {{{
+
+# set terminal property (used e.g. by msgid-chooser)
+export COLORTERM="yes"
+
+# set default browser
+if [[ -z "$BROWSER" ]] ; then
+ if [[ -n "$DISPLAY" ]] ; then
+ #v# If X11 is running
+ check_com -c firefox && export BROWSER=firefox
+ else
+ #v# If no X11 is running
+ check_com -c w3m && export BROWSER=w3m
+ fi
+fi
+
+#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"
+
+# http://conkeror.mozdev.org/
+# TODO: I think this should be removed, as conkeror is not a simple extension anymore
+#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}
+ alias tdi='tla what-changed --diffs | less'
+ #a2# Execute \kbd{tla-buildpackage}
+ alias tbp='tla-buildpackage'
+ #a2# Execute \kbd{tla archive-mirror}
+ alias tmi='tla archive-mirror'
+ #a2# Execute \kbd{tla commit}
+ alias tco='tla commit'
+ #a2# Execute \kbd{tla star-merge}
+ alias tme='tla star-merge'
+fi
+
+# listing stuff
+#a2# Execute \kbd{ls -lSrah}
+alias dir="ls -lSrah"
+#a2# Only show dot-directories
+alias lad='ls -d .*(/)' # only show dot-directories
+#a2# Only show dot-files
+alias lsa='ls -a .*(.)' # only show dot-files
+#a2# Only files with setgid/setuid/sticky flag
+alias lss='ls -l *(s,S,t)' # only files with setgid/setuid/sticky flag
+#a2# Only show 1st ten symlinks
+alias lsl='ls -l *(@[1,10])' # only symlinks
+#a2# Display only executables
+alias lsx='ls -l *(*[1,10])' # only executables
+#a2# Display world-{readable,writable,executable} files
+alias lsw='ls -ld *(R,W,X.^ND/)' # world-{readable,writable,executable} files
+#a2# Display the ten biggest files
+alias lsbig="ls -flh *(.OL[1,10])" # display the biggest files
+#a2# Only show directories
+alias lsd='ls -d *(/)' # only show directories
+#a2# Only show empty directories
+alias lse='ls -d *(/^F)' # only show empty directories
+#a2# Display the ten newest files
+alias lsnew="ls -rl *(D.om[1,10])" # display the newest files
+#a2# Display the ten oldest files
+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 -o}
+alias md='mkdir -p'
+
+check_com -c ipython && alias ips='ipython -p sh'
+
+# 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"'
+
+# simple webserver
+check_com -c python && alias http="python -m SimpleHTTPServer"
+
+# 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
+ salias check_dpkg_running="dpkg_running"
+fi
+
+# 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
+ isutfenv && [[ -n "$LANG" ]] && \
+ alias mrxvt="LANG=${LANG/(#b)(*)[.@]*/$match[1].iso885915} luit mrxvt"
+ fi
+
+ if check_com -c aterm ; then
+ isutfenv && [[ -n "$LANG" ]] && \
+ alias aterm="LANG=${LANG/(#b)(*)[.@]*/$match[1].iso885915} luit aterm"
+ fi
+
+ if check_com -c centericq ; then
+ isutfenv && [[ -n "$LANG" ]] && \
+ alias centericq="LANG=${LANG/(#b)(*)[.@]*/$match[1].iso885915} luit centericq"
+ fi
+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() {
+ setopt localoptions 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() { bts show --mbox $1 } # provide bugnummer as "$1"
+#f4# Search DMOZ
+dmoz() { ${=BROWSER} http://search.dmoz.org/cgi-bin/search\?search=${1// /_} }
+#f4# Search German Wiktionary
+dwicti() { ${=BROWSER} http://de.wiktionary.org/wiki/${(C)1// /_} }
+#f4# Search English Wiktionary
+ewicti() { ${=BROWSER} http://en.wiktionary.org/wiki/${(C)1// /_} }
+#f4# Search Google Groups
+ggogle() { ${=BROWSER} "http://groups.google.com/groups?q=$*" }
+#f4# Search Google
+google() { ${=BROWSER} "http://www.google.com/search?&num=100&q=$*" }
+#f4# Search Google Groups for MsgID
+mggogle() { ${=BROWSER} "http://groups.google.com/groups?selm=$*" }
+#f4# Search Netcraft
+netcraft(){ ${=BROWSER} "http://toolbar.netcraft.com/site_report?url=$1" }
+#f4# Use German Wikipedia's full text search
+swiki() { ${=BROWSER} http://de.wikipedia.org/wiki/Spezial:Search/${(C)1} }
+#f4# search \kbd{dict.leo.org}
+oleo() { ${=BROWSER} "http://dict.leo.org/?search=$*" }
+#f4# Search German Wikipedia
+wikide() { ${=BROWSER} http://de.wikipedia.org/wiki/"${(C)*}" }
+#f4# Search English Wikipedia
+wikien() { ${=BROWSER} http://en.wikipedia.org/wiki/"${(C)*}" }
+#f4# Search official debs
+wodeb() { ${=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]\" $*" } # exact search at google
+
+# misc
+#f5# Backup \kbd{file {\rm to} file\_timestamp}
+bk() { cp -b ${1} ${1}_`date --iso-8601=m` }
+#f5# Copied diff
+cdiff() { diff -crd "$*" | egrep -v "^Only in |^Binary files " }
+#f5# cd to directoy and list files
+cl() { cd $1 && ls -a } # cd && ls
+#f5# Cvs add
+cvsa() { cvs add $* && cvs com -m 'initial checkin' $* }
+#f5# Cvs diff
+cvsd() { cvs diff -N $* |& $PAGER }
+#f5# Cvs log
+cvsl() { cvs log $* |& $PAGER }
+#f5# Cvs update
+cvsq() { cvs -nq update }
+#f5# Rcs2log
+cvsr() { rcs2log $* | $PAGER }
+#f5# Cvs status
+cvss() { cvs status -v $* }
+#f5# Disassemble source files using gcc and as
+disassemble(){ gcc -pipe -S -o - -O -g $* | as -aldh -o /dev/null }
+#f5# Firefox remote control - open given URL
+fir() { firefox -a firefox -remote "openURL($1)" }
+#f5# Create Directoy and \kbd{cd} to it
+mcd() { mkdir -p "$@"; cd "$@" } # mkdir && cd
+#f5# Unified diff to timestamped outputfile
+mdiff() { diff -udrP "$1" "$2" > diff.`date "+%Y-%m-%d"`."$1" }
+#f5# Memory overview
+memusage(){ ps aux | awk '{if (NR > 1) print $5; if (NR > 2) print "+"} END { print "p" }' | dc }
+#f5# Show contents of tar file
+shtar() { gunzip -c $1 | tar -tf - -- | $PAGER }
+#f5# Show contents of tgz file
+shtgz() { tar -ztf $1 | $PAGER }
+#f5# Show contents of zip file
+shzip() { unzip -l $1 | $PAGER }
+#f5# Greps signature from file
+sig() { agrep -d '^-- $' "$*" ~/.Signature }
+#f5# Unified diff
+udiff() { diff -urd $* | egrep -v "^Only in |^Binary files " }
+#f5# (Mis)use \kbd{vim} as \kbd{less}
+viless() { vim --cmd 'let no_plugin_maps = 1' -c "so \$VIMRUNTIME/macros/less.vim" "${@:--}" }
+
+# download video from youtube
+ytdl() {
+ if ! [[ -n "$2" ]] ; then
+ print "Usage: ydtl http://youtube.com/watch?v=.... outputfile.flv">&2
+ return 1
+ else
+ wget -O${2} "http://youtube.com/get_video?"${${${"$(wget -o/dev/null -O- "${1}" | grep -e watch_fullscreen)"}##*watch_fullscreen\?}%%\&fs=*}
+ fi
+}
+
+# Function Usage: uopen $URL/$file
+#f5# Download a file and display it locally
+uopen() {
+ 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() { 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() {
+ 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() {
+ zmodload -i zsh/pcre
+ pcre_compile $1 && \
+ pcre_match $2 && echo "regex matches" || echo "regex does not match"
+}
+
+#f5# List files which have been modified within the last {\it n} days
+new() { print -l *(m-$1) }
+
+#f5# Grep in history
+greph() { 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'
+
+# one blank line between each line
+if [[ -r ~/.terminfo/m/mostlike ]] ; then
+ #f5# Watch manpages in a stretched style
+ man2() { PAGER='dash -c "sed G | /usr/bin/less"' TERM=mostlike /usr/bin/man "$@" ; }
+fi
+
+# d():Copyright 2005 Nikolai Weibull <nikolai@bitwi.se>
+# note: option AUTO_PUSHD has to be set
+#f5# Jump between directories
+d() {
+ emulate -L zsh
+ autoload -U colors
+ local color=$fg_bold[blue]
+ integer i=0
+ dirs -p | while read dir; do
+ local num="${$(printf "%-4d " $i)/ /.}"
+ printf " %s $color%s$reset_color\n" $num $dir
+ (( i++ ))
+ done
+ integer dir=-1
+ read -r 'dir?Jump to directory: ' || return
+ (( dir == -1 )) && return
+ if (( dir < 0 || dir >= i )); then
+ echo d: no such directory stack entry: $dir
+ return 1
+ fi
+ cd ~$dir
+}
+
+# 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 <function>" >&2
+ fi
+}
+
+#f5# Clean up directory - remove well known tempfiles
+purge() {
+ FILES=(*~(N) .*~(N) \#*\#(N) *.o(N) a.out(N) *.core(N) *.cmo(N) *.cmi(N) .*.swp(N))
+ NBFILES=${#FILES}
+ if [[ $NBFILES > 0 ]] ; then
+ print $FILES
+ local ans
+ echo -n "Remove these files? [y/n] "
+ read -q ans
+ if [[ $ans == "y" ]] ; then
+ rm ${FILES}
+ echo ">> $PWD purged, $NBFILES files removed"
+ else
+ echo "Ok. .. than not.."
+ fi
+ fi
+}
+
+# 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
+# like at follows:
+# | english-word : german-transmission
+# It's also only possible to translate english to german but not reciprocal.
+# Use the following oneliner to turn back the sort order:
+# $ awk -F ':' '{ print $2" : "$1" "$3 }' \
+# /usr/local/lib/words/en-de.ISO-8859-1.vok > ~/.translate/de-en.ISO-8859-1.vok
+#f5# Translates a word
+trans() {
+ case "$1" in
+ -[dD]*)
+ translate -l de-en $2
+ ;;
+ -[eE]*)
+ translate -l en-de $2
+ ;;
+ *)
+ echo "Usage: $0 { -D | -E }"
+ echo " -D == German to English"
+ echo " -E == English to German"
+ esac
+}
+
+#f5# List all occurrences of programm in current PATH
+plap() {
+ 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() { vim -u NONE -n -c ':syntax on' -c ':so $VIMRUNTIME/syntax/2html.vim' -c ':wqa' $1 &>/dev/null }
+
+# Usage: simple-extract <file>
+#f5# Smart archive extractor
+simple-extract () {
+ if [[ -f $1 ]] ; then
+ case $1 in
+ *.tar.bz2) bzip2 -v -d $1 ;;
+ *.tar.gz) tar -xvzf $1 ;;
+ *.rar) unrar $1 ;;
+ *.deb) ar -x $1 ;;
+ *.bz2) bzip2 -d $1 ;;
+ *.lzh) lha x $1 ;;
+ *.gz) gunzip -d $1 ;;
+ *.tar) tar -xvf $1 ;;
+ *.tgz) gunzip -d $1 ;;
+ *.tbz2) tar -jxvf $1 ;;
+ *.zip) unzip $1 ;;
+ *.Z) uncompress $1 ;;
+ *) echo "'$1' Error. Please go away" ;;
+ esac
+ else
+ echo "'$1' is not a valid file"
+ fi
+}
+
+# Usage: smartcompress <file> (<type>)
+#f5# Smart archive creator
+smartcompress() {
+ 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 <archive>
+#f5# List an archive's content
+show-archive() {
+ 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 <http://www.vim.org/tips/tip.php?tip_id=167>
+#f5# Use \kbd{vim} as your manpage reader
+vman() { 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() {
+ local files
+ files=(./(#i)*(read*me|lue*m(in|)ut)*(ND))
+ 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
+}
+
+# suidfind() { ls -latg $path | grep '^...s' }
+#f5# Find all files in \$PATH with setuid bit set
+suidfind() { ls -latg $path/*(sN) }
+
+# See above but this is /better/ ... anywise ..
+findsuid() {
+ print 'Output will be written to ~/suid_* ...'
+ $SUDO find / -type f \( -perm -4000 -o -perm -2000 \) -ls > ~/suid_suidfiles.`date "+%Y-%m-%d"`.out 2>&1
+ $SUDO find / -type d \( -perm -4000 -o -perm -2000 \) -ls > ~/suid_suiddirs.`date "+%Y-%m-%d"`.out 2>&1
+ $SUDO find / -type f \( -perm -2 -o -perm -20 \) -ls > ~/suid_writefiles.`date "+%Y-%m-%d"`.out 2>&1
+ $SUDO find / -type d \( -perm -2 -o -perm -20 \) -ls > ~/suid_writedirs.`date "+%Y-%m-%d"`.out 2>&1
+ print 'Finished'
+}
+
+#f5# Reload given functions
+refunc() {
+ for func in $argv ; do
+ unfunction $func
+ autoload $func
+ done
+}
+
+# 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() {
+ 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 cars"
+ 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()
+ 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() {
+ 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 "
+<html>
+ <head>
+ <title>Images</title>
+ </head>
+ <body>" > index.html
+ for f in *.(gif|jpeg|jpg|png) ; do
+ convert -size 100x200 "$f" -resize 100x200 thumb-"$f"
+ echo " <a href=\"$f\"><img src=\"thumb-$f\"></a>" >> index.html
+ done
+ echo "
+ </body>
+</html>" >> index.html
+}
+
+#f5# Set all ulimit parameters to \kbd{unlimited}
+allulimit() {
+ ulimit -c unlimited
+ ulimit -d unlimited
+ ulimit -f unlimited
+ ulimit -l unlimited
+ ulimit -n unlimited
+ ulimit -s unlimited
+ ulimit -t unlimited
+}
+
+# ogg2mp3 with bitrate of 192
+ogg2mp3_192() {
+ oggdec -o - ${1} | lame -b 192 - ${1:r}.mp3
+}
+
+#f5# RFC 2396 URL encoding in Z-Shell
+urlencode() {
+ setopt localoptions extendedglob
+ input=( ${(s::)1} )
+ print ${(j::)input/(#b)([^A-Za-z0-9_.!~*\'\(\)-])/%${(l:2::0:)$(([##16]#match))}}
+}
+
+#f5# Install x-lite (VoIP software)
+getxlite() {
+ setopt local_options
+ setopt errreturn
+ [[ -d ~/tmp ]] || mkdir ~/tmp
+ cd ~/tmp
+
+ echo "Downloading http://www.counterpath.com/download/X-Lite_Install.tar.gz and storing it in ~/tmp:"
+ if wget http://www.counterpath.com/download/X-Lite_Install.tar.gz ; then
+ unp X-Lite_Install.tar.gz && echo done || echo failed
+ else
+ echo "Error while downloading." ; return 1
+ fi
+
+ if [[ -x xten-xlite/xtensoftphone ]] ; then
+ echo "Execute xten-xlite/xtensoftphone to start xlite."
+ fi
+}
+
+#f5# Install skype
+getskype() {
+ setopt local_options
+ setopt errreturn
+ echo "Downloading debian package of skype."
+ echo "Notice: If you want to use a more recent skype version run 'getskypebeta'."
+ wget http://www.skype.com/go/getskype-linux-deb
+ $SUDO dpkg -i skype*.deb && echo "skype installed."
+}
+
+#f5# Install beta-version of skype
+getskypebeta() {
+ setopt local_options
+ setopt errreturn
+ echo "Downloading debian package of skype (beta version)."
+ wget http://www.skype.com/go/getskype-linux-beta-deb
+ $SUDO dpkg -i skype-beta*.deb && echo "skype installed."
+}
+
+#f5# Install gizmo (VoIP software)
+getgizmo() {
+ setopt local_options
+ setopt errreturn
+ echo "libgtk2.0-0, gconf2, libstdc++6, libasound2 and zlib1g have to be available. Installing."
+ $SUDO apt-get update
+ $SUDO apt-get install libgtk2.0-0 gconf2 libstdc++6 libasound2 zlib1g
+ wget "$(lynx --dump http://gizmo5.com/pc/download/linux/ | awk '/libstdc\+\+6.*\.deb/ {print $2}')"
+ $SUDO dpkg -i gizmo-project*.deb && echo "gizmo installed."
+}
+
+#f5# Get and run AIR (Automated Image and Restore)
+getair() {
+ setopt local_options
+ setopt errreturn
+ [[ -w . ]] || { echo 'Error: you do not have write permissions in this directory. Exiting.' ; return 1 }
+ local VER='1.2.8'
+ wget http://puzzle.dl.sourceforge.net/sourceforge/air-imager/air-$VER.tar.gz
+ tar zxf air-$VER.tar.gz
+ cd air-$VER
+ INTERACTIVE=no $SUDO ./install-air-1.2.8
+ [[ -x /usr/local/bin/air ]] && [[ -n "$DISPLAY" ]] && $SUDO air
+}
+
+#f5# Get specific git commitdiff
+git-get-diff() {
+ if [[ -z $GITTREE ]] ; then
+ GITTREE='linux/kernel/git/torvalds/linux-2.6.git'
+ fi
+ if ! [[ -z $1 ]] ; then
+ ${=BROWSER} "http://kernel.org/git/?p=$GITTREE;a=commitdiff;h=$1"
+ else
+ echo "Usage: git-get-diff <commit>"
+ fi
+}
+
+#f5# Get specific git commit
+git-get-commit() {
+ if [[ -z $GITTREE ]] ; then
+ GITTREE='linux/kernel/git/torvalds/linux-2.6.git'
+ fi
+ if ! [[ -z $1 ]] ; then
+ ${=BROWSER} "http://kernel.org/git/?p=$GITTREE;a=commit;h=$1"
+ else
+ echo "Usage: git-get-commit <commit>"
+ fi
+}
+
+#f5# Get specific git diff
+git-get-plaindiff () {
+ if [[ -z $GITTREE ]] ; then
+ GITTREE='linux/kernel/git/torvalds/linux-2.6.git'
+ fi
+ if [[ -z $1 ]] ; then
+ echo 'Usage: git-get-plaindiff '
+ else
+ echo -n "Downloading $1.diff ... "
+ # avoid "generating ..." stuff from kernel.org server:
+ wget --quiet "http://kernel.org/git/?p=$GITTREE;a=commitdiff_plain;h=$1" -O /dev/null
+ wget --quiet "http://kernel.org/git/?p=$GITTREE;a=commitdiff_plain;h=$1" -O $1.diff \
+ && echo done || echo failed
+ fi
+}
+
+
+# http://strcat.de/blog/index.php?/archives/335-Software-sauber-deinstallieren...html
+#f5# Log 'make install' output
+mmake() {
+ [[ ! -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() {
+ 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
+}
+
+# open file in vim and jump to line
+# http://www.downgra.de/archives/2007/05/08/T19_21_11/
+j2v() {
+ local -a params
+ params=(${*//(#m):[0-9]*:/\\n+${MATCH//:/}}) # replace ':23:' to '\n+23'
+ params=(${(s|\n|)${(j|\n|)params}}) # join array using '\n', then split on all '\n'
+ vim ${params}
+}
+
+# get_ic() - queries imap servers for capabilities; real simple. no imaps
+ic_get() {
+ 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 <imap-server> [port]"
+ fi
+}
+
+# creates a Maildir/ with its {new,cur,tmp} subdirs
+mkmaildir() {
+ local root subdir
+ root=${MAILDIR_ROOT:-${HOME}/Mail}
+ if [[ -z ${1} ]] ; then print "Usage:\n $0 <dirname>" ; return 1 ; fi
+ subdir=${1}
+ mkdir -p ${root}/${subdir}/{cur,new,tmp}
+}
+
+#f5# Change the xterm title from within GNU-screen
+xtrename() {
+ 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 [-f] "title for xterm"\n'
+ printf ' renames the title of xterm from _within_ 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\\"
+ return 0
+}
+
+# hl() highlighted less
+# http://ft.bewatermyfriend.org/comp/data/zsh/zfunct.html
+if check_com -c highlight ; then
+ function hl() {
+ local theme lang
+ theme=${HL_THEME:-""}
+ case ${1} in
+ (-l|--list)
+ ( printf 'available languages (syntax parameter):\n\n' ;
+ highlight --list-langs ; ) | less -SMr
+ ;;
+ (-t|--themes)
+ ( printf 'available themes (style parameter):\n\n' ;
+ highlight --list-themes ; ) | less -SMr
+ ;;
+ (-h|--help)
+ printf 'usage: hl <syntax[:theme]> <file>\n'
+ printf ' available options: --list (-l), --themes (-t), --help (-h)\n\n'
+ printf ' Example: hl c main.c\n'
+ ;;
+ (*)
+ if [[ -z ${2} ]] || (( ${#argv} > 2 )) ; then
+ printf 'usage: hl <syntax[:theme]> <file>\n'
+ printf ' available options: --list (-l), --themes (-t), --help (-h)\n'
+ (( ${#argv} > 2 )) && printf ' Too many arguments.\n'
+ return 1
+ fi
+ lang=${1%:*}
+ [[ ${1} == *:* ]] && [[ -n ${1#*:} ]] && theme=${1#*:}
+ if [[ -n ${theme} ]] ; then
+ highlight --xterm256 --syntax ${lang} --style ${theme} ${2} | less -SMr
+ else
+ highlight --ansi --syntax ${lang} ${2} | less -SMr
+ fi
+ ;;
+ esac
+ return 0
+ }
+ # ... and a proper completion for hl()
+ # needs 'highlight' as well, so it fits fine in here.
+ function _hl_genarg() {
+ local expl
+ if [[ -prefix 1 *: ]] ; then
+ local themes
+ themes=(${${${(f)"$(LC_ALL=C highlight --list-themes)"}/ #/}:#*(Installed|Use name)*})
+ compset -P 1 '*:'
+ _wanted -C list themes expl theme compadd ${themes}
+ else
+ local langs
+ langs=(${${${(f)"$(LC_ALL=C highlight --list-langs)"}/ #/}:#*(Installed|Use name)*})
+ _wanted -C list languages expl languages compadd -S ':' -q ${langs}
+ fi
+ }
+ function _hl_complete() {
+ _arguments -s '1: :_hl_genarg' '2:files:_path_files'
+ }
+ 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'
+}
+
+#f2# Print a specific line of file(s).
+linenr () {
+# {{{
+ if [ $# -lt 2 ] ; then
+ print "Usage: linenr <number>[,<number>] <file>" ; return 1
+ elif [ $# -eq 2 ] ; then
+ local number=$1
+ local file=$2
+ command ed -s $file <<< "${number}n"
+ else
+ local number=$1
+ shift
+ for file in "$@" ; do
+ if [ ! -d $file ] ; then
+ echo "${file}:"
+ command ed -s $file <<< "${number}n" 2> /dev/null
+ else
+ continue
+ fi
+ done | less
+ fi
+# }}}
+}
+
+#f2# Find history events by search pattern and list them by date.
+whatwhen() {
+# {{{
+ local usage help ident format_l format_s first_char remain first last
+ usage='USAGE: whatwhen [options] <searchstring> <search range>'
+ help='Use' \`'whatwhen -h'\'' for further explanations.'
+ ident=${(l,${#${:-Usage: }},, ,)}
+ format_l="${ident}%s\t\t\t%s\n"
+ format_s="${format_l//(\\t)##/\\t}"
+ # Make the first char of the word to search for case
+ # insensitive; e.g. [aA]
+ first_char=[${(L)1[1]}${(U)1[1]}]
+ remain=${1[2,-1]}
+ # Default search range is `-100'.
+ first=${2:-\-100}
+ # Optional, just used for `<first> <last>' given.
+ last=$3
+ case $1 in
+ ("")
+ printf '%s\n\n' 'ERROR: No search string specified. Aborting.'
+ printf '%s\n%s\n\n' ${usage} ${help} && return 1
+ ;;
+ (-h)
+ printf '%s\n\n' ${usage}
+ print 'OPTIONS:'
+ printf $format_l '-h' 'show help text'
+ print '\f'
+ print 'SEARCH RANGE:'
+ printf $format_l "'0'" 'the whole history,'
+ printf $format_l '-<n>' 'offset to the current history number; (default: -100)'
+ printf $format_s '<[-]first> [<last>]' 'just searching within a give range'
+ printf '\n%s\n' 'EXAMPLES:'
+ printf ${format_l/(\\t)/} 'whatwhen grml' '# Range is set to -100 by default.'
+ printf $format_l 'whatwhen zsh -250'
+ printf $format_l 'whatwhen foo 1 99'
+ ;;
+ (\?)
+ printf '%s\n%s\n\n' ${usage} ${help} && return 1
+ ;;
+ (*)
+ # -l list results on stout rather than invoking $EDITOR.
+ # -i Print dates as in YYYY-MM-DD.
+ # -m Search for a - quoted - pattern within the history.
+ fc -li -m "*${first_char}${remain}*" $first $last
+ ;;
+ esac
+# }}}
+}
+
+# change fluxbox keys from 'Alt-#' to 'Alt-F#' and vice versa
+fluxkey-change() {
+ [[ -n "$FLUXKEYS" ]] || local FLUXKEYS="$HOME/.fluxbox/keys"
+ if ! [[ -r "$FLUXKEYS" ]] ; then
+ echo "Sorry, \$FLUXKEYS file $FLUXKEYS could not be read - nothing to be done."
+ return 1
+ else
+ if grep -q 'Mod1 F[0-9] :Workspace [0-9]' $FLUXKEYS ; then
+ echo -n 'Switching to Alt-# mode in ~/.fluxbox/keys: '
+ sed -i -e 's|^\(Mod[0-9]\+[: space :]\+\)F\([0-9]\+[: space :]\+:Workspace.*\)|\1\2|' $FLUXKEYS && echo done || echo failed
+ elif grep -q 'Mod1 [0-9] :Workspace [0-9]' $FLUXKEYS ; then
+ echo -n 'Switching to Alt-F# mode in ~/.fluxbox/keys: '
+ sed -i -e 's|^\(Mod[0-9]\+[: space :]\+\)\([0-9]\+[: space :]\+:Workspace.*\)|\1F\2|' $FLUXKEYS && echo done || echo failed
+ else
+ echo 'Sorry, do not know what to do.'
+ return 1
+ fi
+ fi
+}
+
+# retrieve weather information on the console
+# Usage example: 'weather LOWG'
+weather() {
+ [[ -n "$1" ]] || {
+ print 'Usage: weather <station_id>' >&2
+ print 'List of stations: http://en.wikipedia.org/wiki/List_of_airports_by_ICAO_code'>&2
+ return 1
+ }
+
+ local PLACE="${1:u}"
+ local FILE="$HOME/.weather/$PLACE"
+ local LOG="$HOME/.weather/log"
+
+ [[ -d $HOME/.weather ]] || {
+ print -n "Creating $HOME/.weather: "
+ mkdir $HOME/.weather
+ print 'done'
+ }
+
+ print "Retrieving information for ${PLACE}:"
+ print
+ wget -T 10 --no-verbose --output-file=$LOG --output-document=$FILE --timestamping http://weather.noaa.gov/pub/data/observations/metar/decoded/$PLACE.TXT
+
+ if [[ $? -eq 0 ]] ; then
+ if [[ -n "$VERBOSE" ]] ; then
+ cat $FILE
+ else
+ DATE=$(grep 'UTC' $FILE | sed 's#.* /##')
+ TEMPERATURE=$(awk '/Temperature/ { print $4" degree Celcius / " $2" degree Fahrenheit" }' $FILE| tr -d '(')
+ echo "date: $DATE"
+ echo "temp: $TEMPERATURE"
+ fi
+ else
+ print "There was an error retrieving the weather information for $PLACE" >&2
+ cat $LOG
+ return 1
+ fi
+}
+# }}}
+
+# mercurial related stuff {{{
+if check_com -c hg ; then
+ # gnu like diff for mercurial
+ # http://www.selenic.com/mercurial/wiki/index.cgi/TipsAndTricks
+ #f5# GNU like diff for mercurial
+ hgdi() {
+ for i in $(hg status -marn "$@") ; diff -ubwd <(hg cat "$i") "$i"
+ }
+
+ # build debian package
+ #a2# Alias for \kbd{hg-buildpackage}
+ alias hbp='hg-buildpackage'
+
+ # execute commands on the versioned patch-queue from the current repos
+ alias mq='hg -R $(readlink -f $(hg root)/.hg/patches)'
+
+ # diffstat for specific version of a mercurial repository
+ # hgstat => display diffstat between last revision and tip
+ # hgstat 1234 => display diffstat between revision 1234 and tip
+ #f5# Diffstat for specific version of a mercurial repos
+ hgstat() {
+ [[ -n "$1" ]] && hg diff -r $1 -r tip | diffstat || hg export tip | diffstat
+ }
+
+ #f5# Get current mercurial tip via hg itself
+ gethgclone() {
+ setopt local_options
+ setopt errreturn
+ if [[ -f mercurial-tree/.hg ]] ; then
+ cd mercurial-tree
+ echo "Running hg pull for retreiving latest version..."
+ hg pull
+ echo "Finished update. Building mercurial"
+ make local
+ echo "Setting \$PATH to $PWD:\$PATH..."
+ export PATH="$PWD:$PATH"
+ else
+ echo "Downloading mercurial via hg"
+ hg clone http://selenic.com/repo/hg mercurial-tree
+ cd mercurial-tree
+ echo "Building mercurial"
+ make local
+ echo "Setting \$PATH to $PWD:\$PATH..."
+ export PATH="$PWD:$PATH"
+ echo "make sure you set it permanent via ~/.zshrc if you plan to use it permanently."
+ # echo "Setting \$PYTHONPATH to PYTHONPATH=\${HOME}/lib/python,"
+ # export PYTHONPATH=${HOME}/lib/python
+ fi
+ }
+
+fi # end of check whether we have the 'hg'-executable
+
+# get current mercurial snapshot
+#f5# Get current mercurial snapshot
+gethgsnap() {
+ setopt local_options
+ setopt errreturn
+ if [[ -f mercurial-snapshot.tar.gz ]] ; then
+ echo "mercurial-snapshot.tar.gz exists already, skipping download."
+ else
+ echo "Downloading mercurial snapshot"
+ wget http://www.selenic.com/mercurial/mercurial-snapshot.tar.gz
+ fi
+ echo "Unpacking mercurial-snapshot.tar.gz"
+ tar zxf mercurial-snapshot.tar.gz
+ cd mercurial-snapshot/
+ echo "Installing required build-dependencies"
+ $SUDO apt-get update
+ $SUDO apt-get install python2.4-dev
+ echo "Building mercurial"
+ make local
+ echo "Setting \$PATH to $PWD:\$PATH..."
+ export PATH="$PWD:$PATH"
+ echo "make sure you set it permanent via ~/.zshrc if you plan to use it permanently."
+}
+# }}}
+
+# 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 </dev/null`
+# fi
+#fi
+
+# enable jackd:
+# /usr/bin/jackd -dalsa -dhw:0 -r48000 -p1024 -n2
+# now play audio file:
+# alsaplayer -o jack foobar.mp3
+
+# send files via netcat
+# on sending side:
+# send() {j=$*; tar cpz ${j/%${!#}/}|nc -w 1 ${!#} 51330;}
+# send dir* $HOST
+# alias receive='nc -vlp 51330 | tar xzvp'
+
+# debian stuff:
+# dh_make -e foo@localhost -f $1
+# dpkg-buildpackage -rfakeroot
+# lintian *.deb
+# dpkg-scanpackages ./ /dev/null | gzip > 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
+# in grml-small by default.
+# If you do not want these adjustments (for whatever reason), set
+# $GRMLSMALL_SPECIFIC to 0 in your .zshrc.pre file (which this configuration
+# sources if it is there).
+
+if (( GRMLSMALL_SPECIFIC > 0 )) && isgrmlsmall ; then
+
+ unset abk[V]
+ unalias 'V' &> /dev/null
+ unfunction vman &> /dev/null
+ unfunction vimpm &> /dev/null
+ unfunction vimhelp &> /dev/null
+ unfunction viless &> /dev/null
+ unfunction 2html &> /dev/null
+
+ # manpages are not in grmlsmall
+ unfunction manzsh &> /dev/null
+ unalias man2 &> /dev/null
+ unalias man &> /dev/null
+ unfunction man2 &> /dev/null
+
+fi
+
+#}}}
+
+# finally source a local zshrc {{{
+
+# this allows us to stay in sync with grml's zshrc and put own
+# modifications in ~/.zshrc.local
+
+xsource "${HOME}/.zshrc.local"
+
+# }}}
+
## genrefcard.pl settings {{{
+
+### 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
-## }}}
-# add variable to be able to check whether the file has been read {{{
-ZSHRC_GLOBAL_HAS_BEEN_READ=1
-# }}}
+## }}}
## END OF FILE #################################################################
# vim:filetype=zsh foldmethod=marker autoindent expandtab shiftwidth=4
projects / grml-etc-core.git / blobdiff