Commit | Line | Data |
---|---|---|
43101bb9 KS |
1 | # |
2 | ||
3 | #include "local.h" | |
4 | #include <sys/types.h> | |
5 | #include <signal.h> | |
6 | #include <stdio.h> | |
7 | ||
8 | #undef isalpha | |
9 | #undef isdigit | |
10 | ||
11 | /* | |
b4281148 | 12 | * Sccs Id = "@(#)def.h 1.4 %G%"; |
43101bb9 KS |
13 | */ |
14 | ||
15 | /* | |
16 | * Mail -- a mail program | |
17 | * | |
18 | * Commands are: | |
19 | * t <message list> print out these messages | |
20 | * r <message list> reply to messages | |
21 | * m <user list> mail to users (analogous to send) | |
22 | * e <message list> edit messages | |
23 | * c [directory] chdir to dir or home if none | |
24 | * x exit quickly | |
25 | * w <message list> file save messages in file | |
26 | * q quit, save remaining stuff in mbox | |
27 | * d <message list> delete messages | |
28 | * u <message list> undelete messages | |
29 | * h print message headers | |
30 | * | |
31 | * Author: Kurt Shoens (UCB) March 25, 1978 | |
32 | */ | |
33 | ||
34 | ||
35 | #define ESCAPE '~' /* Default escape for sending */ | |
36 | #define NMLSIZE 20 /* max names in a message list */ | |
37 | #define PATHSIZE 35 /* Size of pathnames throughout */ | |
38 | #define NAMESIZE 20 /* Max size of user name */ | |
39 | #define HSHSIZE 19 /* Hash size for aliases and vars */ | |
40 | #define HDRFIELDS 3 /* Number of header fields */ | |
41 | #define LINESIZE 512 /* max readable line width */ | |
42 | #define SCREEN 18 /* screen size in lines (effective) */ | |
43 | #define STRINGSIZE ((unsigned) 128)/* Dynamic allocation units */ | |
44 | #define MAXARGC 20 /* Maximum list of raw strings */ | |
45 | #define NOSTR ((char *) 0) /* Null string pointer */ | |
46 | #define MAXEXP 25 /* Maximum expansion of aliases */ | |
47 | #define equal(a, b) (strcmp(a,b)==0)/* A nice function to string compare */ | |
48 | ||
49 | struct message { | |
50 | short m_flag; /* flags, see below */ | |
51 | short m_block; /* block number of this message */ | |
52 | short m_offset; /* offset in block of message */ | |
53 | unsigned m_size; /* Bytes in the message */ | |
54 | short m_lines; /* Lines in the message */ | |
55 | }; | |
56 | ||
57 | /* | |
58 | * flag bits. | |
59 | */ | |
60 | ||
61 | #define MUSED 1 /* entry is used, but this bit isn't */ | |
62 | #define MDELETED 2 /* entry has been deleted */ | |
63 | #define MSAVED 4 /* entry has been saved */ | |
64 | #define MTOUCH 8 /* entry has been noticed */ | |
65 | #define MPRESERVE 16 /* keep entry in sys mailbox */ | |
66 | #define MMARK 32 /* message is marked! */ | |
67 | #define MODIFY 64 /* message has been modified */ | |
898c10fc KS |
68 | #define MNEW 128 /* message has never been seen */ |
69 | #define MREAD 256 /* message has been read sometime. */ | |
70 | #define MSTATUS 512 /* message status has changed */ | |
43101bb9 KS |
71 | |
72 | /* | |
73 | * Format of the command description table. | |
74 | * The actual table is declared and initialized | |
75 | * in lex.c | |
76 | */ | |
77 | ||
78 | struct cmd { | |
79 | char *c_name; /* Name of command */ | |
80 | int (*c_func)(); /* Implementor of the command */ | |
81 | short c_argtype; /* Type of arglist (see below) */ | |
82 | short c_msgflag; /* Required flags of messages */ | |
83 | short c_msgmask; /* Relevant flags of messages */ | |
84 | }; | |
85 | ||
86 | /* Yechh, can't initialize unions */ | |
87 | ||
88 | #define c_minargs c_msgflag /* Minimum argcount for RAWLIST */ | |
89 | #define c_maxargs c_msgmask /* Max argcount for RAWLIST */ | |
90 | ||
91 | /* | |
92 | * Argument types. | |
93 | */ | |
94 | ||
95 | #define MSGLIST 0 /* Message list type */ | |
96 | #define STRLIST 1 /* A pure string */ | |
97 | #define RAWLIST 2 /* Shell string list */ | |
98 | #define NOLIST 3 /* Just plain 0 */ | |
99 | #define NDMLIST 4 /* Message list, no defaults */ | |
100 | ||
101 | #define P 040 /* Autoprint dot after command */ | |
102 | #define I 0100 /* Interactive command bit */ | |
103 | #define M 0200 /* Illegal from send mode bit */ | |
6fff2fd5 | 104 | #define W 0400 /* Illegal when read only bit */ |
43101bb9 KS |
105 | |
106 | /* | |
107 | * Oft-used mask values | |
108 | */ | |
109 | ||
110 | #define MMNORM (MDELETED|MSAVED)/* Look at both save and delete bits */ | |
111 | #define MMNDEL MDELETED /* Look only at deleted bit */ | |
112 | ||
113 | /* | |
114 | * Structure used to return a break down of a head | |
115 | * line (hats off to Bill Joy!) | |
116 | */ | |
117 | ||
118 | struct headline { | |
119 | char *l_from; /* The name of the sender */ | |
120 | char *l_tty; /* His tty string (if any) */ | |
121 | char *l_date; /* The entire date string */ | |
122 | }; | |
123 | ||
124 | #define GTO 1 /* Grab To: line */ | |
125 | #define GSUBJECT 2 /* Likewise, Subject: line */ | |
126 | #define GCC 4 /* And the Cc: line */ | |
127 | #define GBCC 8 /* And also the Bcc: line */ | |
128 | #define GMASK (GTO|GSUBJECT|GCC|GBCC) | |
129 | /* Mask of places from whence */ | |
130 | ||
131 | #define GNL 16 /* Print blank line after */ | |
132 | #define GDEL 32 /* Entity removed from list */ | |
133 | #define GCOMMA 64 /* detract puts in commas */ | |
134 | ||
135 | /* | |
136 | * Structure used to pass about the current | |
137 | * state of the user-typed message header. | |
138 | */ | |
139 | ||
140 | struct header { | |
141 | char *h_to; /* Dynamic "To:" string */ | |
142 | char *h_subject; /* Subject string */ | |
143 | char *h_cc; /* Carbon copies string */ | |
144 | char *h_bcc; /* Blind carbon copies */ | |
145 | int h_seq; /* Sequence for optimization */ | |
146 | }; | |
147 | ||
148 | /* | |
149 | * Structure of namelist nodes used in processing | |
150 | * the recipients of mail and aliases and all that | |
151 | * kind of stuff. | |
152 | */ | |
153 | ||
154 | struct name { | |
155 | struct name *n_flink; /* Forward link in list. */ | |
156 | struct name *n_blink; /* Backward list link */ | |
157 | short n_type; /* From which list it came */ | |
158 | char *n_name; /* This fella's name */ | |
159 | }; | |
160 | ||
161 | /* | |
162 | * Structure of a variable node. All variables are | |
163 | * kept on a singly-linked list of these, rooted by | |
164 | * "variables" | |
165 | */ | |
166 | ||
167 | struct var { | |
168 | struct var *v_link; /* Forward link to next variable */ | |
169 | char *v_name; /* The variable's name */ | |
170 | char *v_value; /* And it's current value */ | |
171 | }; | |
172 | ||
173 | struct group { | |
174 | struct group *ge_link; /* Next person in this group */ | |
175 | char *ge_name; /* This person's user name */ | |
176 | }; | |
177 | ||
178 | struct grouphead { | |
179 | struct grouphead *g_link; /* Next grouphead in list */ | |
180 | char *g_name; /* Name of this group */ | |
181 | struct group *g_list; /* Users in group. */ | |
182 | }; | |
183 | ||
184 | #define NIL ((struct name *) 0) /* The nil pointer for namelists */ | |
185 | #define NONE ((struct cmd *) 0) /* The nil pointer to command tab */ | |
186 | #define NOVAR ((struct var *) 0) /* The nil pointer to variables */ | |
187 | #define NOGRP ((struct grouphead *) 0)/* The nil grouphead pointer */ | |
188 | #define NOGE ((struct group *) 0) /* The nil group pointer */ | |
189 | ||
190 | /* | |
191 | * Token values returned by the scanner used for argument lists. | |
192 | * Also, sizes of scanner-related things. | |
193 | */ | |
194 | ||
195 | #define TEOL 0 /* End of the command line */ | |
196 | #define TNUMBER 1 /* A message number */ | |
197 | #define TDASH 2 /* A simple dash */ | |
198 | #define TSTRING 3 /* A string (possibly containing -) */ | |
199 | #define TDOT 4 /* A "." */ | |
200 | #define TUP 5 /* An "^" */ | |
201 | #define TDOLLAR 6 /* A "$" */ | |
202 | #define TSTAR 7 /* A "*" */ | |
203 | #define TOPEN 8 /* An '(' */ | |
204 | #define TCLOSE 9 /* A ')' */ | |
205 | #define TPLUS 10 /* A '+' */ | |
206 | ||
207 | #define REGDEP 2 /* Maximum regret depth. */ | |
2d5b401e | 208 | #define STRINGLEN 64 /* Maximum length of string token */ |
43101bb9 KS |
209 | |
210 | /* | |
211 | * Kludges to handle the change from setexit / reset to setjmp / longjmp | |
212 | */ | |
213 | ||
214 | #define setexit() setjmp(srbuf) | |
215 | #define reset(x) longjmp(srbuf, x) | |
216 | ||
217 | /* | |
218 | * VM/UNIX has a vfork system call which is faster than forking. If we | |
219 | * don't have it, fork(2) will do . . . | |
220 | */ | |
221 | ||
222 | #ifndef VMUNIX | |
223 | #define vfork() fork() | |
224 | #endif | |
225 | ||
226 | /* | |
227 | * Forward declarations of routine types to keep lint and cc happy. | |
228 | */ | |
229 | ||
230 | FILE *Fdopen(); | |
231 | FILE *collect(); | |
232 | FILE *infix(); | |
233 | FILE *mesedit(); | |
234 | FILE *mespipe(); | |
235 | FILE *setinput(); | |
236 | char **unpack(); | |
237 | char *addto(); | |
238 | char *arpafix(); | |
239 | char *calloc(); | |
240 | char *copy(); | |
241 | char *copyin(); | |
242 | char *detract(); | |
243 | char *expand(); | |
244 | char *gets(); | |
245 | char *hfield(); | |
246 | char *index(); | |
247 | char *nameof(); | |
248 | char *nextword(); | |
249 | char *getenv(); | |
6fff2fd5 | 250 | char *getfilename(); |
43101bb9 KS |
251 | char *hcontents(); |
252 | char *netmap(); | |
253 | char *netname(); | |
254 | char *readtty(); | |
255 | char *rename(); | |
256 | char *revarpa(); | |
257 | char *rindex(); | |
258 | char *rpair(); | |
259 | char *salloc(); | |
260 | char *savestr(); | |
261 | char *savestr(); | |
262 | char *snarf(); | |
263 | char *value(); | |
264 | char *vcopy(); | |
265 | char *yankword(); | |
266 | off_t fsize(); | |
267 | struct cmd *lex(); | |
268 | struct grouphead *findgroup(); | |
269 | struct name *cat(); | |
270 | struct name *delname(); | |
271 | struct name *elide(); | |
272 | struct name *extract(); | |
273 | struct name *gexpand(); | |
274 | struct name *map(); | |
275 | struct name *outof(); | |
276 | struct name *put(); | |
277 | struct name *usermap(); | |
278 | struct name *verify(); | |
279 | struct var *lookup(); | |
280 | unsigned int msize(); |