# /* * Mail -- a mail program * * Version 7 * * Local routines that are installation dependent. */ #include "rcv.h" /* * Locate the user's mailbox file (ie, the place where new, unread * mail is queued). In Version 7, it is in /usr/spool/mail/name. */ findmail() { register char *cp; cp = copy("/usr/spool/mail/", mailname); copy(myname, cp); } /* * Get rid of the queued mail. */ demail() { remove(mailname); } /* * Discover user login name. */ username(uid, namebuf) char namebuf[]; { return(getname(uid, namebuf)); }