* Local routines that are installation dependent.
static char *SccsId
= "@(#)v7.local.c 1.3 %G%";
* 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.
cp
= copy("/usr/spool/mail/", mailname
);
strcat(mailname
, myname
);
* Get rid of the queued mail.
if (value("keep") != NOSTR
)
close(creat(mailname
, 0666));
* Discover user login name.
if (uid
== getuid() && (np
= getenv("USER")) != NOSTR
) {
strncpy(namebuf
, np
, PATHSIZE
);
return(getname(uid
, namebuf
));