|
|
1.1 ! root 1: # ! 2: ! 3: /* ! 4: * Mail -- a mail program ! 5: * ! 6: * Version 7 ! 7: * ! 8: * Local routines that are installation dependent. ! 9: */ ! 10: ! 11: #include "rcv.h" ! 12: ! 13: /* ! 14: * Locate the user's mailbox file (ie, the place where new, unread ! 15: * mail is queued). In Version 7, it is in /usr/spool/mail/name. ! 16: */ ! 17: ! 18: findmail() ! 19: { ! 20: register char *cp; ! 21: ! 22: cp = copy("/usr/spool/mail/", mailname); ! 23: copy(myname, cp); ! 24: } ! 25: ! 26: /* ! 27: * Get rid of the queued mail. ! 28: */ ! 29: ! 30: demail() ! 31: { ! 32: ! 33: remove(mailname); ! 34: } ! 35: ! 36: /* ! 37: * Discover user login name. ! 38: */ ! 39: ! 40: username(uid, namebuf) ! 41: char namebuf[]; ! 42: { ! 43: ! 44: return(getname(uid, namebuf)); ! 45: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.