|
|
1.1 ! root 1: # NOTICE-NOT TO BE DISCLOSED OUTSIDE BELL SYS EXCEPT UNDER WRITTEN AGRMT ! 2: trap 'rm -f /tmp/$$*; trap 0; exit' 0 1 2 3 15 ! 3: uuname > /tmp/$$uu & ! 4: pflag= ! 5: for i in $* ! 6: do case $i in ! 7: -p) pflag=p; continue;; ! 8: -ver) echo $0 version 2.1;exit;; ! 9: -flags) echo $0 \[-p\] \[-flags\] \[-ver\];exit;; ! 10: -*) echo unknown wwbmail flag $i;exit;; ! 11: *) echo wwbmail takes no flags;shift;continue;; ! 12: esac ! 13: done ! 14: echo 'Do you want instructions? (y or n)' ! 15: read ans ! 16: if test \( $ans = 'y' -o $ans = 'Y' -o $ans = 'Y' -o $ans = 'yes' -o $ans = 'Yes' \) ! 17: then echo ' ! 18: Procedure for Sending Mail to WWB ! 19: ! 20: 1. Note: At the end of these instructions, your terminal will return a "0". ! 21: This means you are in the editor. ! 22: ! 23: Begin your message with an "a" on a line by itself. ! 24: Comment 1: This puts you in append mode. ! 25: Comment 2: If you decide not to send your message after typing "a", ! 26: hit "break" or "delete" and type "q" to quit the editor. ! 27: (You may have to hit "q" twice) ! 28: ! 29: 2. Type your message. ! 30: ! 31: 3. Type a dot (.) on a line by itself, immediately after the message. ! 32: Comment: You may use any of the text editing capabilities of the ! 33: editor, such as substituting or deleting lines. ! 34: ! 35: 4. End your edited message with the command sequence "w" and "q", ! 36: each on a separate line. ! 37: Terminal Response: You will see a character count after you type "w". ! 38: ! 39: Use of the option -p (wwbmail -p) will enable you to bypass attempts to send ! 40: electronic mail and process only a pre-addressed, paper copy of your message.' ! 41: fi ! 42: > /tmp/$$wwbmail ! 43: ed /tmp/$$wwbmail ! 44: if test ! -s /tmp/$$wwbmail ! 45: then echo 'no message sent' ! 46: exit 1 ! 47: fi ! 48: if test $pflag ! 49: then cat > wwbmailtmp << ! ! 50: ! 51: ! 52: ! 53: *********************** ! 54: * Mary L. Fox * ! 55: * 1M-214 * ! 56: * Bell Laboratories * ! 57: * 6 Corporate Place * ! 58: * Piscataway, NJ * ! 59: *********************** ! 60: ! 61: ! 62: ! 63: ! ! 64: cat /tmp/$$wwbmail >> wwbmailtmp ! 65: echo 'A copy of your message is stored in the file "wwbmailtmp". ! 66: Cat that file, circle the address shown at the top of ! 67: the paper copy, and mail it. After you have catted ! 68: "wwbmailtmp", remove it from your directory.' ! 69: exit 1 ! 70: fi ! 71: wait ! 72: if (test "`grep mhuxh /tmp/$$uu`") ! 73: then mail mhuxh!mlf < /tmp/$$wwbmail ! 74: echo 'Your message has been sent to mhuxh!mlf.' ! 75: elif (test "`grep mhuxm /tmp/$$uu`") ! 76: then mail mhuxm!mhuxh!mlf < /tmp/$$wwbmail ! 77: echo 'Your message has been sent to mhuxm!mhuxh!mlf' ! 78: elif (test "`grep mhtsa /tmp/$$uu`") ! 79: then mail mhtsa!mhuxh!mlf < /tmp/$$wwbmail ! 80: echo 'Your message has been sent to mhtsa!mhuxh!mlf' ! 81: else cat > wwbmailtmp << ! ! 82: ! 83: ! 84: ! 85: *********************** ! 86: * Mary L. Fox * ! 87: * 1M-214 * ! 88: * Bell Laboratories * ! 89: * 6 Corporate Place * ! 90: * Piscataway, NJ * ! 91: *********************** ! 92: ! 93: ! 94: ! 95: ! ! 96: cat /tmp/$$wwbmail >> wwbmailtmp ! 97: echo 'I do not recognize an electronic mail link between our systems. ! 98: A copy of your message is stored in the file "wwbmailtmp". ! 99: Cat that file, circle the address shown at the top, and put ! 100: it in the regular mail. After you have catted "wwbmailtmp", ! 101: remove the file from your directory.' ! 102: fi
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.