1 /* $OpenBSD: v7.local.c,v 1.18 2018/09/16 02:38:57 millert Exp $ */
2 /* $NetBSD: v7.local.c,v 1.8 1997/05/13 06:15:58 mikel Exp $ */
3
4 /*
5 * Copyright (c) 1980, 1993
6 * The Regents of the University of California. All rights reserved.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
16 * 3. Neither the name of the University nor the names of its contributors
17 * may be used to endorse or promote products derived from this software
18 * without specific prior written permission.
19 *
20 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
21 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
24 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30 * SUCH DAMAGE.
31 */
32
33 /*
34 * Mail -- a mail program
35 *
36 * Version 7
37 *
38 * Local routines that are installation dependent.
39 */
40
41 #include "rcv.h"
42 #include <stdlib.h>
43 #include <fcntl.h>
44 #include <pwd.h>
45 #include "extern.h"
46
47 /*
48 * Locate the user's mailbox file (ie, the place where new, unread
49 * mail is queued).
50 */
51 void
findmail(const char * user,char * buf,int buflen)52 findmail(const char *user, char *buf, int buflen)
53 {
54 char *mbox;
55 struct stat sb;
56
57 /* Ignore $MAIL if it is not owned by the invoking user */
58 if ((mbox = getenv("MAIL")) && stat(mbox, &sb) == 0 &&
59 sb.st_uid != getuid() && sb.st_uid != geteuid())
60 mbox = NULL;
61
62 if (mbox)
63 (void)strlcpy(buf, mbox, buflen);
64 else
65 (void)snprintf(buf, buflen, "%s/%s", _PATH_MAILDIR, user);
66 }
67
68 /*
69 * Get rid of the queued mail.
70 */
71 void
demail(void)72 demail(void)
73 {
74 int fd;
75
76 if (value("keep") != NULL || rm(mailname) < 0) {
77 fd = open(mailname, O_CREAT | O_TRUNC | O_WRONLY, 0600);
78 if (fd != -1)
79 close(fd);
80 }
81 }
82
83 /*
84 * Discover user login name.
85 */
86 const char *
username(void)87 username(void)
88 {
89 const char *np;
90 uid_t uid;
91
92 if ((np = getenv("USER")) != NULL)
93 return(np);
94 if ((np = getenv("LOGNAME")) != NULL)
95 return(np);
96 if ((np = user_from_uid(uid = getuid(), 1)) != NULL)
97 return(np);
98 if ((np = getlogin()) != NULL)
99 return(np);
100 printf("Cannot associate a name with uid %u\n", uid);
101 return(NULL);
102 }
103