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