|
|
1.1 ! root 1: #!/bin/sh -p ! 2: PATH=/bin:/usr/bin:/usr/lib/upas ! 3: sender=$1;shift ! 4: system=$1;shift ! 5: relay= ! 6: ! 7: case $system in ! 8: *.wisc.edu) ! 9: relay=wi/wisc/cs/pokey ! 10: ;; ! 11: *.uiuc.edu) ! 12: relay=il/uiuc/cs/gateway ! 13: ;; ! 14: *.berkeley.edu) ! 15: relay=ca/ucb/cs/ucbarpa ! 16: ;; ! 17: *) ! 18: exit 1 ! 19: ;; ! 20: esac ! 21: ! 22: # first try quick ! 23: cat > /tmp/ur$$ ! 24: ! 25: smtp -H research.att.com -a dk!$relay!smtp $sender $system $* < /tmp/ur$$ && rm -f /tmp/ur$$ && exit 0 ! 26: ! 27: # get gateway system ! 28: gateway=`cat /usr/lib/upas/gateway` ! 29: case $gateway in ! 30: "") gateway=research ;; ! 31: esac ! 32: ! 33: # give it to the gateway ! 34: temp= ! 35: for i in $*; do temp="$temp $system!$i"; done ! 36: uux - -a "$sender" "$gateway!rmail" "($temp)" </tmp/ur$$ ! 37: rv=$? ! 38: rm -f /tmp/ur$$ ! 39: exit $rv
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.