| 1 | #! /bin/bash |
| 2 | |
| 3 | set -e |
| 4 | |
| 5 | ###-------------------------------------------------------------------------- |
| 6 | ### Basic setup. |
| 7 | |
| 8 | umask 002 |
| 9 | |
| 10 | sub= |
| 11 | mkdir -p $HOME$sub |
| 12 | |
| 13 | : ${REPO=http://ftp.distorted.org.uk/ftp/pub/mdw/profile} |
| 14 | |
| 15 | export PATH=/usr/local/bin:$HOME$sub/bin:/usr/bin:/usr/ccs/bin:/bin |
| 16 | |
| 17 | ###-------------------------------------------------------------------------- |
| 18 | ### Sort out command line. |
| 19 | |
| 20 | xstuff= false= |
| 21 | while [ $# -gt 0 ]; do |
| 22 | case "$1" in |
| 23 | -x) xstuff=t;; |
| 24 | -n) false=false;; |
| 25 | --) shift; break;; |
| 26 | -*) echo >&2 "$0: bad option"; exit 1;; |
| 27 | *) break;; |
| 28 | esac |
| 29 | shift |
| 30 | done |
| 31 | |
| 32 | ###-------------------------------------------------------------------------- |
| 33 | ### Environment autoconfiguration. |
| 34 | |
| 35 | ## Find out where I am |
| 36 | here=$(pwd) |
| 37 | |
| 38 | ## Suss out how to print things |
| 39 | out=$(echo -n "foo"; echo "bar") |
| 40 | if [ "$out" = "foobar" ]; then |
| 41 | echon="echo -n" |
| 42 | echoc="" |
| 43 | else |
| 44 | echon="echo" |
| 45 | echoc='\c' |
| 46 | fi |
| 47 | |
| 48 | ## Find out how to fetch things over the net |
| 49 | $echon "Finding URL fetcher:$echoc" |
| 50 | if curl >/dev/null 2>&1 --version || [ $? -eq 2 ]; then |
| 51 | GETURL="curl -fs -o" |
| 52 | echo " curl." |
| 53 | elif wget >/dev/null 2>&1 --version; then |
| 54 | GETURL="wget -q -O" |
| 55 | echo " wget." |
| 56 | else |
| 57 | echo " failed!" |
| 58 | echo >&2 "$0: failed to find URL fetcher" |
| 59 | exit 1 |
| 60 | fi |
| 61 | |
| 62 | ###-------------------------------------------------------------------------- |
| 63 | ### Create the necessary directories. |
| 64 | |
| 65 | echo "Creating directories..." |
| 66 | for i in bin lib/emacs src; do |
| 67 | $echon " $i:$echoc" |
| 68 | if [ -d $HOME$sub/$i ]; then |
| 69 | echo " already exists." |
| 70 | else |
| 71 | mkdir -p $HOME$sub/$i |
| 72 | echo " done." |
| 73 | fi |
| 74 | done |
| 75 | echo " all done." |
| 76 | |
| 77 | ###-------------------------------------------------------------------------- |
| 78 | ### Install some more complicated programs. |
| 79 | |
| 80 | echo "Installing packages..." |
| 81 | systems=" |
| 82 | mlib:crc-mktab |
| 83 | checkpath:tmpdir |
| 84 | " |
| 85 | [ "$xstuff" ] && systems="$systems |
| 86 | xtoys:xatom |
| 87 | " |
| 88 | for system in $systems; do |
| 89 | set -- $(echo $system | tr : ' ') |
| 90 | sys=$1 prog=$2 |
| 91 | $echon " $sys:$echoc" |
| 92 | if $false $prog >/dev/null 2>&1 --version; then |
| 93 | echo " already installed." |
| 94 | else |
| 95 | ( set -e |
| 96 | $echon " downloading$echoc" |
| 97 | cd $HOME$sub/src |
| 98 | rm -rf $sys.tar.gz $sys-$ver |
| 99 | $GETURL $sys.tar.gz $REPO/$sys.tar.gz |
| 100 | $echon " unpacking$echoc" |
| 101 | dir=$(gzip -cd $sys.tar.gz | tar tf - | head -1) |
| 102 | gzip -cd $sys.tar.gz | tar xf - |
| 103 | $echon " configuring$echoc" |
| 104 | cd $dir |
| 105 | mkdir build |
| 106 | cd build |
| 107 | ../configure --prefix=$HOME$sub >>buildlog 2>&1 |
| 108 | $echon " building$echoc" |
| 109 | make >>buildlog 2>&1 |
| 110 | $echon " installing$echoc" |
| 111 | make install >>buildlog 2>&1 |
| 112 | echo " done." |
| 113 | ) |
| 114 | fi |
| 115 | done |
| 116 | echo " all done." |
| 117 | |
| 118 | ###-------------------------------------------------------------------------- |
| 119 | ### Install global configuration. |
| 120 | |
| 121 | echo -n "Installing dotfile configuration:" |
| 122 | if [ -f $HOME$sub/.mdw.conf ]; then |
| 123 | echo " already installed." |
| 124 | else |
| 125 | cp mdw.conf $HOME$sub/.mdw.conf |
| 126 | echo " done." |
| 127 | fi |
| 128 | |
| 129 | ## Symlink the various dotfiles into place |
| 130 | dotfiles=" |
| 131 | bash_profile bash_logout bashrc inputrc bash_completion |
| 132 | emacs emacs-calc vm gnus.el |
| 133 | vimrc mg |
| 134 | mailrc signature |
| 135 | cgrc tigrc |
| 136 | gdbinit |
| 137 | guile |
| 138 | toprc |
| 139 | aspell.conf |
| 140 | lisp-init.lisp:.cmucl-init.lisp |
| 141 | lisp-init.lisp:.sbclrc |
| 142 | lisp-init.lisp:.clisprc.lisp |
| 143 | lisp-init.lisp:.eclrc |
| 144 | swank.lisp |
| 145 | dircolors colordiffrc screenrc cvsrc indent.pro" |
| 146 | [ "$xstuff" ] && dotfiles="$dotfiles |
| 147 | xinitrc xsession Xdefaults vncrc vncsession |
| 148 | fonts.conf |
| 149 | putty-defaults:.putty/sessions/Default%20Settings |
| 150 | eterm-theme.cfg:.Eterm/themes/Eterm/theme.cfg |
| 151 | e-keybindings.cfg:.enlightenment/keybindings.cfg |
| 152 | evnc-keybindings.cfg:.enlightenment-vnc/keybindings.cfg |
| 153 | e16-bindings:.e16/bindings.cfg |
| 154 | jue-peek.jpg:.enlightenment/backgrounds/jue-peek.jpg |
| 155 | jue-peek.jpg:.e16/backgrounds/jue-peek.jpg" |
| 156 | echo "Installing dotfiles..." |
| 157 | for d in $dotfiles; do |
| 158 | target=.$d |
| 159 | case $d in |
| 160 | *:*) target=${d#*:} d=${d%%:*};; |
| 161 | esac |
| 162 | ft=$HOME$sub/$target |
| 163 | dir=${ft%/*} |
| 164 | mkdir -p $dir |
| 165 | ln -s $here/$d $ft.new |
| 166 | mv $ft.new $ft |
| 167 | echo " $target" |
| 168 | done |
| 169 | echo " all done." |
| 170 | |
| 171 | ###-------------------------------------------------------------------------- |
| 172 | ### Process the Git configuration. |
| 173 | |
| 174 | echo -n "Installing Git configuration:" |
| 175 | sed " |
| 176 | 1i\ |
| 177 | ### generated by $here/setup; do not edit!\ |
| 178 | |
| 179 | /@releasekey@/ s::$(./mdw-conf release-key 481334C2):g |
| 180 | /@gitignore@/ s::$(./mdw-conf gitignore $here/gitignore):g |
| 181 | " gitconfig >$HOME/.gitconfig.new |
| 182 | mv $HOME/.gitconfig.new $HOME/.gitconfig |
| 183 | echo " done." |
| 184 | |
| 185 | ###-------------------------------------------------------------------------- |
| 186 | ### Install useful scripts included in this package. |
| 187 | |
| 188 | scripts=" |
| 189 | mdw-editor |
| 190 | mdw-conf |
| 191 | mdw-build |
| 192 | movemail-hack |
| 193 | emerge-hack |
| 194 | lesspipe.sh |
| 195 | start-ssh-agent |
| 196 | svnwrap |
| 197 | hyperspec" |
| 198 | [ "$xstuff" ] && scripts="$scripts |
| 199 | xinitcmd |
| 200 | xshutdown" |
| 201 | echo "Installing scripts..." |
| 202 | mkdir -p $HOME$sub/bin |
| 203 | for s in $scripts; do |
| 204 | ft=$HOME$sub/bin/$s |
| 205 | ln -s $here/$s $ft.new |
| 206 | mv $ft.new $ft |
| 207 | echo " $s" |
| 208 | done |
| 209 | echo " all done." |
| 210 | |
| 211 | ###-------------------------------------------------------------------------- |
| 212 | ### Set up the Emacs config. |
| 213 | |
| 214 | $echon "Finding a suitable emacs:$echoc" |
| 215 | emacs=no |
| 216 | for i in emacs22 emacs21 emacs; do |
| 217 | if type -p >/dev/null $i; then |
| 218 | emacs=$i |
| 219 | break |
| 220 | fi |
| 221 | done |
| 222 | if [ $emacs = no ]; then |
| 223 | echo " failed." |
| 224 | emacs=: |
| 225 | else |
| 226 | echo " $emacs." |
| 227 | fi |
| 228 | |
| 229 | echo "Installing Emacs packages..." |
| 230 | emacspkg=" |
| 231 | make-regexp |
| 232 | ew-hols |
| 233 | mdw-gnus-patch |
| 234 | git git-blame vc-git stgit |
| 235 | quilt" |
| 236 | for elib in $emacspkg; do |
| 237 | $echon " $elib:$echoc" |
| 238 | if $false $emacs >/dev/null 2>&1 --no-site-file --batch --eval ' |
| 239 | (progn |
| 240 | (setq load-path (nconc load-path (list "~/lib/emacs"))) |
| 241 | (kill-emacs (condition-case nil |
| 242 | (progn (load-library "'"$elib"'") 0) |
| 243 | (error 1))))'; then |
| 244 | echo " already installed." |
| 245 | else |
| 246 | if [ -f $elib.el ]; then |
| 247 | cp $elib.el $HOME$sub/lib/emacs/$elib.el |
| 248 | else |
| 249 | $echon " downloading$echoc" |
| 250 | $GETURL $HOME$sub/lib/emacs/$elib.el $REPO/$elib.el |
| 251 | fi |
| 252 | $echon " compiling$echoc" |
| 253 | (cd $HOME$sub/lib/emacs; |
| 254 | $emacs >/dev/null 2>&1 --no-site-file --batch \ |
| 255 | --eval '(byte-compile-file "'"$elib.el"'")') |
| 256 | echo " done." |
| 257 | fi |
| 258 | done |
| 259 | echo " all done." |
| 260 | |
| 261 | $echon "Setting up Emacs configuration:$echoc" |
| 262 | $echon " linking$echoc" |
| 263 | for link in dot-emacs.el:dot-emacs.el emacs-Makefile:Makefile; do |
| 264 | set -- $(echo $link | tr : ' ') |
| 265 | from=$1 to=$2 |
| 266 | ln -s $here/$from $HOME$sub/lib/emacs/$to.new |
| 267 | mv $HOME$sub/lib/emacs/$to.new $HOME$sub/lib/emacs/$to |
| 268 | done |
| 269 | $echon " compiling$echoc" |
| 270 | make >/dev/null 2>&1 -C $HOME$sub/lib/emacs EMACS=$emacs |
| 271 | echo " done." |
| 272 | |
| 273 | ###----- That's all, folks -------------------------------------------------- |