2.9BSD - /usr/src/ucb/Mail/v7.local.c

   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: static char *SccsId = "@(#)v7.local.c	2.2 7/28/82";
  14: 
  15: /*
  16:  * Locate the user's mailbox file (ie, the place where new, unread
  17:  * mail is queued).  In Version 7, it is in /usr/spool/mail/name.
  18:  */
  19: 
  20: findmail()
  21: {
  22:     register char *cp;
  23: 
  24:     cp = copy("/usr/spool/mail/", mailname);
  25:     copy(myname, cp);
  26:     if (isdir(mailname)) {
  27:         stradd(mailname, '/');
  28:         strcat(mailname, myname);
  29:     }
  30: }
  31: 
  32: /*
  33:  * Get rid of the queued mail.
  34:  */
  35: 
  36: demail()
  37: {
  38: 
  39:     if (value("keep") != NOSTR)
  40:         close(creat(mailname, 0666));
  41:     else {
  42:         if (remove(mailname) < 0)
  43:             close(creat(mailname, 0666));
  44:     }
  45: }
  46: 
  47: /*
  48:  * Discover user login name.
  49:  */
  50: 
  51: username(uid, namebuf)
  52:     char namebuf[];
  53: {
  54:     register char *np;
  55: 
  56:     if (uid == getuid() && (np = getenv("USER")) != NOSTR) {
  57:         strncpy(namebuf, np, PATHSIZE);
  58:         return(0);
  59:     }
  60:     return(getname(uid, namebuf));
  61: }

Defined functions

Defined variables