![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to wwbmail.sh CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Research Unix] / researchv8dc / cmd / wwb|
Return to wwbmail.sh CVS log | Up to [Research Unix] / researchv8dc / cmd / wwb |
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.