chiark - git - mdw - profile/blob - dot/bash-profile

   1 ### -*-bash-*-
   2 ###
   3 ### Bash startup things
   4
   5 ## The `.bashrc' hook will run us if it thinks we haven't been run before.
   6 ## We should therefore let it know.
   7 export __mdw_profile=done
   8
   9 ###--------------------------------------------------------------------------
  10 ### Utility functions.
  11
  12 ## __mdw_addto VAR DIR PATH ...
  13 ##
  14 ## VAR is the name of a PATH-like environment variable (i.e., one which
  15 ## contains a sequence of pathnames separated by colons).  DIR is either `l'
  16 ## or `r'.  The PATHs are pathnames.  Those PATHs which correspond to
  17 ## existing directories but which aren't currently named in the variable are
  18 ## added to the left or right (depending on DIR) of VAR.  The relative order
  19 ## of PATHs added in the same invokation is the same as the order they
  20 ## appeared in PATHs: the DIR argument only affects which end of the VAR they
  21 ## get added to.
  22 __mdw_addto () {
  23   local var=$1 val dir=$2 new="" change=nil
  24   eval "val=\$$var"
  25   shift 2
  26   for i in "$@"; do
  27     case "$new:" in *:$i:*) continue;; esac
  28     [ -d $i ] || continue
  29     case "X$val" in
  30       X) val=$i change=t continue ;;
  31       X$i) continue ;;
  32       X*:$i:*) val=`echo $val | sed -e "s=:$i:=:="` ;;
  33       X$i:*) val=${val#$i:} ;;
  34       X*:$i) val=${val%:$i} ;;
  35     esac
  36     new=$new:$i change=t
  37   done
  38   case $dir in
  39     l) val=${new#:}:$val ;;
  40     r) val=$val$new ;;
  41   esac
  42   case $change in t) export $var="$val" ;; esac
  43 }
  44
  45 ## __mdw_programp NAME
  46 ##
  47 ## Does NAME exist as an executable program?
  48 __mdw_programp () { type -t >/dev/null "$1"; }
  49
  50 ###--------------------------------------------------------------------------
  51 ### Other preliminaries.
  52
  53 ## Work out my home directory.
  54 ##
  55 ## This horrible trick resolves symbolic links.  It enables resolving links,
  56 ## changes directory and displays the name of the directory in a subshell to
  57 ## avoid changing the current state.
  58 HOME=`(set -P; cd $HOME; pwd)`
  59 [ -n "$SCHROOT_SESSION_ID" ] || cd $HOME
  60
  61 ## CDE's session structure is demented and doesn't leave us with a proper
  62 ## logout hook, so synthesize one here.
  63 [ -n "$DT" ] && trap "source $HOME/.bash_logout" EXIT
  64
  65 ###--------------------------------------------------------------------------
  66 ### Set some basic paths.
  67
  68 ## The main path.
  69 __mdw_addto PATH l \
  70   $HOME/bin \
  71   {/usr{/local,}{,/X11R6},}{/bin,/sbin,/games} \
  72   /opt/nfast{,/gcc}{/bin,/sbin} \
  73   $HOME/src/ncipher/scripts
  74
  75 ## If we have Plan 9 from User Space, then add that in.
  76 if [ -d /usr/local/plan9 ]; then
  77   export PLAN9=/usr/local/plan9
  78   __mdw_addto PATH r \
  79     $PLAN9/bin
  80 fi
  81
  82 ## Search for `info' documents.
  83 __mdw_addto INFOPATH r \
  84         $HOME/info \
  85         /usr/info /usr/share/info \
  86         /usr/local/info /usr/local/share/info \
  87         /usr/local/share/info/its
  88
  89 ## Script libraries.
  90 __mdw_addto PERLLIB r $HOME/lib/perl
  91 __mdw_addto PYTHONPATH r $HOME/lib/python
  92
  93 ###--------------------------------------------------------------------------
  94 ### Various other kinds of configuration.
  95
  96 __mdw_setconf () {
  97   if val=$(mdw-conf 2>/dev/null "$2"); then
  98     eval "export $1=\$val"
  99   fi
 100 }
 101
 102 ## Establish a temporary directory.
 103 [ "$TMPDIR" ] || eval `tmpdir -b`
 104 export TMP=$TMPDIR
 105
 106 ## Sensible umask if users have their own groups.
 107 umask 002
 108
 109 ## Mail and general identification.
 110 __mdw_setconf MAIL mailbox
 111 export NAME="Mark Wooding"
 112 __mdw_setconf EMAIL email
 113 export QMAILINJECT=c
 114
 115 ## Some programs want to know the hostname.
 116 [ -z "$HOST" ] && export HOST=`hostname`
 117
 118 ## Text editor configuration.
 119 export MDW_EDITOR=ed
 120 emacs_startup_args="--no-site-file --mdw-fast-startup -nw"
 121 for ed in \
 122         "emacs23 $emacs_startup_args" \
 123         "emacs24 $emacs_startup_args" \
 124         "emacs22 $emacs_startup_args" \
 125         "emacs21 $emacs_startup_args" \
 126         zile mg \
 127         "emacs -nw" \
 128         vi pico nano ae; do
 129   name=`echo $ed | sed 's/ .*$//'`
 130   if __mdw_programp "$name"; then
 131     MDW_EDITOR=$ed
 132     break
 133   fi
 134 done
 135 export EDITOR=mdw-editor VISUAL=mdw-editor
 136
 137 ## Determine the locale settings.  Really don't set LC_COLLATE because it
 138 ## messes with the order of files in `ls' listings and similar.
 139 if [ "$DISPLAY" != "" ]; then
 140   LANG=`mdw-conf x-ctype POSIX`
 141 else
 142   : ${LANG=${LC_CTYPE-${LC_ALL-`mdw-conf console-ctype POSIX`}}}
 143   case "$TERM,`tty`" in
 144     linux,/dev/tty*)
 145       if { vt-is-UTF8 ||
 146            kbd_mode | grep UTF-8; } >/dev/null 2>&1; then
 147         ctype=.utf8
 148       else
 149         ctype=
 150       fi
 151       LANG=${LANG%.*}$ctype
 152       ;;
 153   esac
 154 fi
 155 unset LC_ALL
 156 export LC_COLLATE=POSIX LANG
 157
 158 ## Pager configuration.
 159 export MDW_PAGER=`type -p less` PAGER=mdw-pager METAMAIL_PAGER=mdw-pager
 160 export LESS="-iqgRh1j.3FSX"
 161 export LESSOPEN="|lesspipe.sh %s"
 162 case "${LC_CTYPE-$LANG}" in
 163   *utf8 | *utf-8 | *UTF8 | *UTF-8) LESSCHARSET=utf-8 ;;
 164   *) LESSCHARSET=latin1 ;;
 165 esac
 166 export LESSCHARSET
 167 __mdw_programp global && export LESSGLOBALTAGS=global
 168
 169 ## HTTP and FTP proxies.
 170 http=`mdw-conf http-proxy none`
 171 case "${http_proxy-none},$http" in
 172   *,none) ;;
 173   none,*) export http_proxy=http://$http/ ;;
 174 esac
 175 ftp=`mdw-conf ftp-proxy none`
 176 case "${ftp_proxy-none},$ftp,${http_proxy-none}" in
 177   *,none,none) ;;
 178   none,none,*) export ftp_proxy=$http_proxy ;;
 179   none,*,*) export ftp_proxy=http://$ftp/ ;;
 180 esac
 181
 182 ## Ncurses programs should use the Unicode box-drawing characters because the
 183 ## alternative character set stuff isn't supported well.
 184 export NCURSES_NO_UTF8_ACS=1
 185
 186 ## Shut up Perl's readline machinery.
 187 export PERL_READLINE_NOWARN=yes
 188
 189 ## If we have `distcc' then tell `ccache' to use it.
 190 __mdw_programp distcc && export CCACHE_PREFIX=distcc
 191
 192 ## Choose a sensible web browser.  If we have a display, try to pick a
 193 ## graphical one.
 194 browsers="elinks w3m lynx"
 195 case "${DISPLAY+t}" in
 196   t) browsers="mdw-iceweasel mdw-chrome iceweasel firefox $browsers" ;;
 197 esac
 198 for i in $browsers; do
 199   if __mdw_programp $i; then
 200     export BROWSER=$i
 201     break
 202   fi
 203 done
 204 unset browsers
 205
 206 ## Acquiring root privileges.  This is mainly the job of `bashrc', but we
 207 ## cache the mechanism here.
 208 __mdw_setconf __MDW_ROOTLY rootly
 209 export BECOME="--preserve-environment"
 210
 211 ## It's useful to see the little sigils in `ls'.
 212 [ -z "$LS_OPTIONS" ] && export LS_OPTIONS="-F"
 213
 214 ## Settings for BBC BASIC listing.
 215 export BASCAT="-l +n"
 216
 217 ## Version control hacking.
 218 export CVS_RSH=ssh
 219 __mdw_setconf CVSROOT cvs-root
 220 __mdw_setconf SVNROOT svn-root
 221 export P4CONFIG=.p4
 222
 223 ## News server.
 224 __mdw_setconf NNTPSERVER nntp-server
 225
 226 ## Help X programs find their resources.
 227 export XUSERFILESEARCHPATH="$HOME/.Xapps/%N:/usr/lib/X11/%T/%N%S"
 228
 229 ## Make OpenOffice.org do its thing properly.
 230 export OOO_FORCE_DESKTOP=gnome
 231
 232 ## Hack Qt-ish things to be unstoatly.
 233 export QT_STYLE_OVERRIDE=gtk2
 234
 235 ## Configure `ps'.
 236 export PS_PERSONALITY=gnu
 237
 238 ## Disable core dumps.
 239 ulimit -S -c 0
 240
 241 ###--------------------------------------------------------------------------
 242 ### Authentication and SSH hacking.
 243
 244 ## Start an authentication agent.  This is unnecessarily fiddly.  If there's
 245 ## a Gnome keyring server then we should use that; unfortunately, it may not
 246 ## yet have had a chance to populate the environment with its settings, so we
 247 ## go off and fetch them.
 248 if { { [ "$GNOME_KEYRING_CONTROL" ] &&
 249        [ -s "$GNOME_KEYRING_CONTROL" ]; } ||
 250      { [ "$DBUS_SESSION_BUS_ADDRESS" ] &&
 251        __mdw_programp gnome-keyring-daemon; }; } &&
 252    stuff=$(gnome-keyring-daemon -s -c gpg 2>/dev/null)
 253 then
 254   eval "$stuff"
 255   export SSH_AUTH_SOCK GPG_AGENT_INFO
 256 fi
 257
 258 ## If we still don't have an agent then start one with a stable name.
 259 eval `start-ssh-agent -b`
 260
 261 ## Decide whether this session should be considered `secure'.  A session is
 262 ## secure if it's on a secure TTY, but there are lots of ways of finding out
 263 ## which TTYs are secure.
 264 if [ -z "$__mdw_bashrc" ] && [ "$__mdw_force_secure_session" = "yes" ] ||
 265    ( tty="`tty`" devtty="(/dev/)?${tty#/dev/}"
 266      { { { [ -e /etc/securetty ] && sectty=/etc/securetty; } ||
 267          { [ -e /etc/securettys ] && sectty=/etc/securettys; }; } &&
 268        egrep "$devtty" $sectty >/dev/null; } ||
 269      { [ -e /etc/default/login ] &&
 270        egrep "^CONSOLE=$devtty" /etc/default/login >/dev/null; } ||
 271      case "${tty#/dev/}" in
 272        console|systty|tty[0-9]) true ;;
 273        *) false ;;
 274      esac )
 275 then
 276   export __mdw_sechost="`hostname`"
 277 fi
 278
 279 ## Start a passphrase pixie if there is one and it's not already running.
 280 if pixie --version >/dev/null 2>&1; then
 281   mkdir -p $HOME/.catacomb
 282   pixie=${CATACOMB_PIXIE-$HOME/.catacomb/pixie}
 283   if [ -S "$pixie" ] && pixie -C help >/dev/null 2>/dev/null; then
 284     :
 285   else
 286     pixie -d 2>>$HOME/.catacomb/pixie.log
 287     __mdw_started_pixie=yes
 288   fi
 289 fi
 290
 291 ###--------------------------------------------------------------------------
 292 ### Finishing touches.
 293
 294 ## If there's a local hook then run it.
 295 [ -f "$HOME/.profile-local" ] && . "$HOME/.profile-local"
 296
 297 ## If we haven't run the `.bashrc' yet, and this shell is interactive, then
 298 ## run it now.
 299 [ -z "$__mdw_bashrc" ] && [ -t 0 ] && \
 300   [ -r $HOME/.bashrc ] && . $HOME/.bashrc
 301
 302 ###----- That's all, folks --------------------------------------------------