Commit | Line | Data |
---|---|---|
ca7933c9 | 1 | ### -*-bash-*- |
59c9c0e4 MW |
2 | ### |
3 | ### Bash startup things | |
f617db13 | 4 | |
8523d789 MW |
5 | ## The `.bashrc' hook will run us if it thinks we haven't been run before. |
6 | ## We should therefore let it know. | |
f617db13 MW |
7 | export __mdw_profile=done |
8 | ||
59c9c0e4 MW |
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. | |
f617db13 | 22 | __mdw_addto () { |
85d3810b | 23 | local var=$1 val dir=$2 new="" change=nil |
f617db13 MW |
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 | |
59c9c0e4 MW |
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} ;; | |
f617db13 | 35 | esac |
85d3810b | 36 | new=$new:$i change=t |
f617db13 MW |
37 | done |
38 | case $dir in | |
59c9c0e4 MW |
39 | l) val=${new#:}:$val ;; |
40 | r) val=$val$new ;; | |
f617db13 | 41 | esac |
584e04e1 | 42 | case $change in t) export $var="$val" ;; esac |
f617db13 MW |
43 | } |
44 | ||
59c9c0e4 MW |
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)` | |
3afe7de5 | 59 | [ -n "$SCHROOT_SESSION_ID" ] || cd $HOME |
59c9c0e4 | 60 | |
59c9c0e4 MW |
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. | |
f617db13 | 67 | |
59c9c0e4 | 68 | ## The main path. |
f617db13 | 69 | __mdw_addto PATH l \ |
f141fe0f | 70 | $HOME/bin \ |
d0cefd73 | 71 | {/usr{/local,}{,/X11R6},}{/bin,/sbin,/games} \ |
b187640a | 72 | /opt/nfast{,/gcc}{/bin,/sbin} \ |
f617db13 | 73 | $HOME/src/ncipher/scripts |
59c9c0e4 MW |
74 | |
75 | ## If we have Plan 9 from User Space, then add that in. | |
f141fe0f MW |
76 | if [ -d /usr/local/plan9 ]; then |
77 | export PLAN9=/usr/local/plan9 | |
78 | __mdw_addto PATH r \ | |
79 | $PLAN9/bin | |
80 | fi | |
f617db13 | 81 | |
59c9c0e4 MW |
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 | |
2041672d | 88 | |
59c9c0e4 MW |
89 | ## Script libraries. |
90 | __mdw_addto PERLLIB r $HOME/lib/perl | |
91 | __mdw_addto PYTHONPATH r $HOME/lib/python | |
f617db13 | 92 | |
59c9c0e4 MW |
93 | ###-------------------------------------------------------------------------- |
94 | ### Various other kinds of configuration. | |
f617db13 | 95 | |
902334eb MW |
96 | __mdw_setconf () { |
97 | if val=$(mdw-conf 2>/dev/null "$2"); then | |
98 | eval "export $1=\$val" | |
99 | fi | |
100 | } | |
101 | ||
7738df0b MW |
102 | ## Establish a temporary directory. |
103 | [ "$TMPDIR" ] || eval `tmpdir -b` | |
104 | export TMP=$TMPDIR | |
105 | ||
59c9c0e4 MW |
106 | ## Sensible umask if users have their own groups. |
107 | umask 002 | |
f617db13 | 108 | |
59c9c0e4 | 109 | ## Mail and general identification. |
902334eb | 110 | __mdw_setconf MAIL mailbox |
f617db13 | 111 | export NAME="Mark Wooding" |
902334eb | 112 | __mdw_setconf EMAIL email |
f617db13 MW |
113 | export QMAILINJECT=c |
114 | ||
59c9c0e4 MW |
115 | ## Some programs want to know the hostname. |
116 | [ -z "$HOST" ] && export HOST=`hostname` | |
f374674c | 117 | |
59c9c0e4 | 118 | ## Text editor configuration. |
e04c4857 | 119 | export MDW_EDITOR=ed |
f3f622e3 MW |
120 | emacs_startup_args="--no-site-file --mdw-fast-startup -nw" |
121 | for ed in \ | |
f7876fa9 MW |
122 | "emacs23 $emacs_startup_args" \ |
123 | "emacs24 $emacs_startup_args" \ | |
f3f622e3 MW |
124 | "emacs22 $emacs_startup_args" \ |
125 | "emacs21 $emacs_startup_args" \ | |
b0d8acbe | 126 | zile mg \ |
f3f622e3 MW |
127 | "emacs -nw" \ |
128 | vi pico nano ae; do | |
97b82392 | 129 | name=`echo $ed | sed 's/ .*$//'` |
2041672d | 130 | if __mdw_programp "$name"; then |
e04c4857 | 131 | MDW_EDITOR=$ed |
97b82392 MW |
132 | break |
133 | fi | |
134 | done | |
e04c4857 | 135 | export EDITOR=mdw-editor VISUAL=mdw-editor |
97b82392 | 136 | |
59c9c0e4 MW |
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. | |
703b345d | 139 | if [ "$DISPLAY" != "" ]; then |
902334eb | 140 | LANG=`mdw-conf x-ctype POSIX` |
bc30f5c4 | 141 | else |
902334eb | 142 | : ${LANG=${LC_CTYPE-${LC_ALL-`mdw-conf console-ctype POSIX`}}} |
c537b3bf MW |
143 | case "$TERM,`tty`" in |
144 | linux,/dev/tty*) | |
4abf3071 MW |
145 | if { vt-is-UTF8 || |
146 | kbd_mode | grep UTF-8; } >/dev/null 2>&1; then | |
703b345d MW |
147 | ctype=.utf8 |
148 | else | |
149 | ctype= | |
150 | fi | |
151 | LANG=${LANG%.*}$ctype | |
152 | ;; | |
153 | esac | |
bc30f5c4 | 154 | fi |
703b345d MW |
155 | unset LC_ALL |
156 | export LC_COLLATE=POSIX LANG | |
bc5bd6eb | 157 | |
59c9c0e4 | 158 | ## Pager configuration. |
b20bfd83 | 159 | export MDW_PAGER=`type -p less` PAGER=mdw-pager METAMAIL_PAGER=mdw-pager |
c363cf92 | 160 | export LESS="-iqgRh1j.3FSX" |
f617db13 | 161 | export LESSOPEN="|lesspipe.sh %s" |
e1375853 | 162 | case "${LC_CTYPE-$LANG}" in |
c66a7e44 | 163 | *utf8 | *utf-8 | *UTF8 | *UTF-8) LESSCHARSET=utf-8 ;; |
6121c48e MW |
164 | *) LESSCHARSET=latin1 ;; |
165 | esac | |
166 | export LESSCHARSET | |
d03de69c | 167 | __mdw_programp global && export LESSGLOBALTAGS=global |
93ba996d | 168 | |
59c9c0e4 | 169 | ## HTTP and FTP proxies. |
93ba996d MW |
170 | http=`mdw-conf http-proxy none` |
171 | case "${http_proxy-none},$http" in | |
172 | *,none) ;; | |
4b1d5c25 | 173 | none,*) export http_proxy=http://$http/ ;; |
93ba996d MW |
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 ;; | |
4b1d5c25 | 179 | none,*,*) export ftp_proxy=http://$ftp/ ;; |
93ba996d | 180 | esac |
f617db13 | 181 | |
59c9c0e4 MW |
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 | ||
69186ec2 MW |
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 | |
e2bc0218 | 196 | t) browsers="mdw-iceweasel mdw-chrome iceweasel firefox $browsers" ;; |
69186ec2 MW |
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 | ||
59c9c0e4 MW |
206 | ## Acquiring root privileges. This is mainly the job of `bashrc', but we |
207 | ## cache the mechanism here. | |
902334eb | 208 | __mdw_setconf __MDW_ROOTLY rootly |
59c9c0e4 MW |
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 | |
902334eb MW |
219 | __mdw_setconf CVSROOT cvs-root |
220 | __mdw_setconf SVNROOT svn-root | |
59c9c0e4 MW |
221 | export P4CONFIG=.p4 |
222 | ||
223 | ## News server. | |
902334eb | 224 | __mdw_setconf NNTPSERVER nntp-server |
59c9c0e4 MW |
225 | |
226 | ## Help X programs find their resources. | |
f617db13 MW |
227 | export XUSERFILESEARCHPATH="$HOME/.Xapps/%N:/usr/lib/X11/%T/%N%S" |
228 | ||
59c9c0e4 | 229 | ## Make OpenOffice.org do its thing properly. |
a5abc1d2 MW |
230 | export OOO_FORCE_DESKTOP=gnome |
231 | ||
59c9c0e4 | 232 | ## Configure `ps'. |
f617db13 MW |
233 | export PS_PERSONALITY=gnu |
234 | ||
59c9c0e4 | 235 | ## Disable core dumps. |
f617db13 MW |
236 | ulimit -S -c 0 |
237 | ||
59c9c0e4 MW |
238 | ###-------------------------------------------------------------------------- |
239 | ### Authentication and SSH hacking. | |
f617db13 | 240 | |
59c9c0e4 MW |
241 | ## Start an authentication agent. This is unnecessarily fiddly. If there's |
242 | ## a Gnome keyring server then we should use that; unfortunately, it may not | |
243 | ## yet have had a chance to populate the environment with its settings, so we | |
244 | ## go off and fetch them. | |
f589321e MW |
245 | if { { [ "$GNOME_KEYRING_CONTROL" ] && |
246 | [ -s "$GNOME_KEYRING_CONTROL" ]; } || | |
247 | { [ "$DBUS_SESSION_BUS_ADDRESS" ] && | |
e6f25b82 MW |
248 | __mdw_programp gnome-keyring-daemon; }; } && |
249 | stuff=$(gnome-keyring-daemon -s -c ssh,gpg 2>/dev/null) | |
b8e1fad6 MW |
250 | then |
251 | eval "$stuff" | |
e6f25b82 | 252 | export SSH_AUTH_SOCK GPG_AGENT_INFO |
1ee51934 MW |
253 | fi |
254 | ||
59c9c0e4 | 255 | ## If we still don't have an agent then start one with a stable name. |
f617db13 MW |
256 | eval `start-ssh-agent -b` |
257 | ||
59c9c0e4 MW |
258 | ## Decide whether this session should be considered `secure'. A session is |
259 | ## secure if it's on a secure TTY, but there are lots of ways of finding out | |
260 | ## which TTYs are secure. | |
f617db13 MW |
261 | if [ -z "$__mdw_bashrc" ] && [ "$__mdw_force_secure_session" = "yes" ] || |
262 | ( tty="`tty`" devtty="(/dev/)?${tty#/dev/}" | |
263 | { { { [ -e /etc/securetty ] && sectty=/etc/securetty; } || | |
852cd5fb | 264 | { [ -e /etc/securettys ] && sectty=/etc/securettys; }; } && |
f617db13 MW |
265 | egrep "$devtty" $sectty >/dev/null; } || |
266 | { [ -e /etc/default/login ] && | |
267 | egrep "^CONSOLE=$devtty" /etc/default/login >/dev/null; } || | |
268 | case "${tty#/dev/}" in | |
269 | console|systty|tty[0-9]) true ;; | |
270 | *) false ;; | |
271 | esac ) | |
272 | then | |
273 | export __mdw_sechost="`hostname`" | |
274 | fi | |
275 | ||
59c9c0e4 | 276 | ## Start a passphrase pixie if there is one and it's not already running. |
f617db13 | 277 | if pixie --version >/dev/null 2>&1; then |
365662c8 | 278 | mkdir -p $HOME/.catacomb |
f617db13 MW |
279 | pixie=${CATACOMB_PIXIE-$HOME/.catacomb/pixie} |
280 | if [ -S "$pixie" ] && pixie -C help >/dev/null 2>/dev/null; then | |
281 | : | |
282 | else | |
283 | pixie -d 2>>$HOME/.catacomb/pixie.log | |
284 | __mdw_started_pixie=yes | |
285 | fi | |
286 | fi | |
287 | ||
59c9c0e4 MW |
288 | ###-------------------------------------------------------------------------- |
289 | ### Finishing touches. | |
290 | ||
291 | ## If there's a local hook then run it. | |
68aea1d9 MW |
292 | [ -f "$HOME/.profile-local" ] && . "$HOME/.profile-local" |
293 | ||
59c9c0e4 MW |
294 | ## If we haven't run the `.bashrc' yet, and this shell is interactive, then |
295 | ## run it now. | |
f617db13 MW |
296 | [ -z "$__mdw_bashrc" ] && [ -t 0 ] && \ |
297 | [ -r $HOME/.bashrc ] && . $HOME/.bashrc | |
59c9c0e4 MW |
298 | |
299 | ###----- That's all, folks -------------------------------------------------- |