X-Git-Url: https://git.distorted.org.uk/~mdw/profile/blobdiff_plain/9a3fa88e036c5cf72051a9f289d3b4f28f38c5f6..9aea0679b29d401624f2f184f378faab8feb30ea:/bashrc

diff --git a/bashrc b/bashrc
index 6fb97f4..755dffa 100644
--- a/bashrc
+++ b/bashrc
@@ -1,5 +1,4 @@
-#
-# $Id: .bashrc,v 1.6 1996/12/08 20:33:42 mdw Exp $
+# -*- mode: sh; coding: utf-8 -*-
 #
 # Bash session things
 #
@@ -20,7 +19,7 @@ if [ -t 0 ]; then
     PS2="> "
     PS4="+ "
   else
-    
+
     case "$TERM" in
       linux*|screen*|xterm*|vt100*)
 	bold='\[\]' unbold='\[\]' nl='\[
\]' ;;
@@ -29,10 +28,11 @@ if [ -t 0 ]; then
     esac
 
     if (( EUID == 0 )); then
-      left="«" right="»"
+      left=`echo « | iconv -f utf8 -t //translit`
+      right=`echo » | iconv -f utf8 -t //translit`
     else
       case $USER in
-        mdw|mwooding)
+	mdw|mwooding)
 	  u="" left="[" right="]"
 	  ;;
 	*)
@@ -42,7 +42,7 @@ if [ -t 0 ]; then
       if [ "$__mdw_tty" = "`tty`" ]; then
 	left="<" right=">"
       else
-        export __mdw_tty="`tty`"
+	export __mdw_tty="`tty`"
       fi
     fi
 
@@ -85,7 +85,7 @@ shopt -u shift_verbose
 shopt -s sourcepath
 
 # --- Set the CDPATH ---
-# 
+#
 # CDPATH=~/src:/usr/src:/usr/lib:/usr/share
 # dots=..
 # i=6
@@ -122,13 +122,16 @@ alias ssync="rsync -e ssh"
 alias rootly=$__MDW_ROOTLY
 alias r=rootly
 alias re="rootly $EDITOR"
-alias pstree="pstree -Ghl"
+alias pstree="pstree -hl"
 alias cdtmp='cd ${TMPDIR-/tmp}'
 alias pushtmp='pushd ${TMPDIR-/tmp}'
 alias e="$EDITOR"
 alias svn="svnwrap svn"
 alias @="ssh"
 
+[ -r /etc/bash_completion ] && . /etc/bash_completion
+[ -r $HOME/.bash_completion ] && . $HOME/.bash_completion
+
 # --- Make `xt' start an xterm, maybe logging into a remote host ---
 
 xt () {
@@ -174,6 +177,104 @@ core () {
   esac
 }
 
+# --- Turning on and off path hacks ---
+
+path-add () {
+  local pathvar export dir val
+  case $# in
+    1) pathvar=PATH dir=$1 export="export PATH";;
+    2) pathvar=$1 dir=$2 export=:;;
+    *) echo >&2 "Usage: $0 [VAR] DIR";;
+  esac
+  eval "val=\$$pathvar"
+  case ":$val:" in
+    *:"$dir":*) ;;
+    *) val=$dir:$val ;;
+  esac
+  eval "$pathvar=\$val"
+  $export
+}
+
+path-remove () {
+  local pathvar export dir val
+  case $# in
+    1) pathvar=PATH dir=$1 export="export PATH";;
+    2) pathvar=$1 dir=$2 export=:;;
+    *) echo >&2 "Usage: $0 [VAR] DIR";;
+  esac
+  eval "val=\$$pathvar"
+  case ":$val:" in
+    :"$dir":) val= ;;
+    :"$dir":*) val=${val#$dir:} ;;
+    *:"$dir":) val=${val%:$dir} ;;
+    *:"$dir":*) val=${val/:$dir:/:} ;;
+  esac
+  eval "$pathvar=\$val"
+  $export
+}
+
+pathhack () {
+  if [ $# -eq 0 ]; then
+    local IFS=:
+    for e in $PATH; do
+      case "$e" in
+	"$HOME/bin/hacks/"*)
+	  echo ${e#$HOME/bin/hacks/}
+	  ;;
+      esac
+    done
+    return
+  fi
+  local force=nil
+  local path=$PATH
+  while [ $# -gt 0 ]; do
+    arg=$1
+    case "$arg" in
+      -f | --force)
+	force=t
+	shift
+	continue
+	;;
+      --)
+	shift
+	break
+	;;
+      [-+]*)
+	;;
+      *)
+	break
+	;;
+    esac
+    hack=${arg#[+-]}
+    dir=$HOME/bin/hacks/$hack
+    [ -d "$dir" ] || {
+      echo "$0: path hack $hack not found"
+      return 1
+    }
+    case "$arg,$force,:$PATH:" in
+      -*,*,*:"$dir":*)
+	path-remove path "$dir"
+	;;
+      +*,t,*:"$dir":*)
+	path-remove path "$dir"
+	path-add path "$dir"
+	;;
+      +*,nil,*:"$dir":*)
+	;;
+      +*,*)
+	path-add path "$dir"
+	;;
+    esac
+    shift
+  done
+  if [ $# -eq 0 ]; then
+    PATH=$path
+    export PATH
+  else
+    PATH=$path "$@"
+  fi
+}
+
 # --- Fix `man' under Slowaris ---
 
 case "$MACHTYPE" in
@@ -199,4 +300,6 @@ if (( UID == 0 )); then
   set -o noclobber
 fi
 
+[ -f "$HOME/.bashrc-local" ] && . "$HOME/.bashrc-local"
+
 fi