chiarks, on mariner

[ian-dotfiles.git] / dot / configs / chiarks

diff --git a/dot/configs/chiarks b/dot/configs/chiarks
new file mode 100755 (executable)
index 0000000..14df3d6
--- /dev/null
+++ b/dot/configs/chiarks
@@ -0,0 +1,24 @@
+#!/bin/sh
+
+eval `cd $HOME && .configs/configure`
+
+# ssh -L 6667:chiark:6667 -L 3128:chiark:3128 ijackson@chiark.greenend.org.uk sleep 604800 </dev/null &
+
+case "$1" in
+-q)    exit 0;;
+'')    ;;
+*)     echo >&2 'usage: .../chiarks [-q]'; exit 1;;
+esac
+
+for x in 3 2 1
+do
+       sz=80x55
+       y=$(( 35*$x+100+$pixels_y ))
+       xb=$(( (($pixels_x-503)*(3-$x))/2 ))
+       xterm-CT "chiark ssh #$x" -geometry $sz+$xb+$y \
+               -e ssh tunnel.chiark.greenend.org.uk -l ijackson &
+       echo -n :
+#      xterm-CT "chiark ssh ian #$x" -geometry $sz+$(( $pixels_x + $xb ))+$y \
+#              -e ssh tunnel.chiark.greenend.org.uk -l ian &
+#      echo -n :
+done