Annotation of src/usr.bin/from/from.c, Revision 1.23
1.23 ! mmcc 1: /* $OpenBSD: from.c,v 1.22 2015/10/09 01:37:07 deraadt Exp $ */
1.1 deraadt 2: /* $NetBSD: from.c,v 1.6 1995/09/01 01:39:10 jtc Exp $ */
3:
4: /*
5: * Copyright (c) 1980, 1988, 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.
1.9 millert 16: * 3. Neither the name of the University nor the names of its contributors
1.1 deraadt 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: #include <sys/types.h>
34: #include <ctype.h>
35: #include <pwd.h>
36: #include <stdio.h>
37: #include <stdlib.h>
38: #include <unistd.h>
39: #include <paths.h>
1.7 deraadt 40: #include <string.h>
1.4 mickey 41: #include <err.h>
1.20 millert 42: #include <errno.h>
1.1 deraadt 43:
1.7 deraadt 44: int match(char *, char *);
1.20 millert 45: char *mail_spool(char *file, const char *user);
1.7 deraadt 46:
47: int
1.10 deraadt 48: main(int argc, char *argv[])
1.1 deraadt 49: {
1.20 millert 50: int ch, newline, fflag = 0;
1.18 millert 51: char *file, *line, *sender, *p;
52: size_t linesize = 0;
53: ssize_t linelen;
54: FILE *fp;
1.1 deraadt 55:
1.18 millert 56: file = line = sender = NULL;
57: while ((ch = getopt(argc, argv, "f:s:")) != -1) {
1.16 okan 58: switch(ch) {
1.1 deraadt 59: case 'f':
1.20 millert 60: fflag = 1;
1.1 deraadt 61: file = optarg;
62: break;
63: case 's':
64: sender = optarg;
65: for (p = sender; *p; ++p)
1.15 deraadt 66: if (isupper((unsigned char)*p))
67: *p = tolower((unsigned char)*p);
1.1 deraadt 68: break;
69: default:
1.13 jmc 70: fprintf(stderr,
71: "usage: from [-f file] [-s sender] [user]\n");
1.18 millert 72: exit(EXIT_FAILURE);
1.1 deraadt 73: }
1.18 millert 74: }
1.1 deraadt 75: argv += optind;
76:
1.22 deraadt 77: if (pledge("stdio rpath getpw", NULL) == -1)
78: err(1, "pledge");
1.23 ! mmcc 79:
1.20 millert 80: file = mail_spool(file, *argv);
81: if ((fp = fopen(file, "r")) == NULL) {
82: if (!fflag && errno == ENOENT)
83: exit(EXIT_SUCCESS);
84: err(1, "%s", file);
85: }
1.22 deraadt 86: if (pledge("stdio", NULL) == -1)
87: err(1, "pledge");
1.18 millert 88: for (newline = 1; (linelen = getline(&line, &linesize, fp)) != -1;) {
89: if (*line == '\n') {
90: newline = 1;
91: continue;
92: }
93: if (newline && !strncmp(line, "From ", 5) &&
94: (!sender || match(line + 5, sender)))
95: printf("%s", line);
96: newline = 0;
97: }
98: free(line);
99: exit(EXIT_SUCCESS);
100: }
101:
1.20 millert 102: char *
103: mail_spool(char *file, const char *user)
1.18 millert 104: {
105: struct passwd *pwd;
106:
1.1 deraadt 107: /*
108: * We find the mailbox by:
109: * 1 -f flag
1.18 millert 110: * 2 _PATH_MAILDIR/user (from argv)
1.1 deraadt 111: * 2 MAIL environment variable
1.18 millert 112: * 3 _PATH_MAILDIR/user (from environment or passwd db)
1.1 deraadt 113: */
1.18 millert 114: if (file == NULL) {
115: if (user == NULL) {
116: if ((file = getenv("MAIL")) == NULL) {
117: if ((user = getenv("LOGNAME")) == NULL &&
118: (user = getenv("USER")) == NULL) {
119: if (!(pwd = getpwuid(getuid())))
120: errx(1, "no password file "
121: "entry for you");
122: user = pwd->pw_name;
123: }
1.1 deraadt 124: }
1.18 millert 125: }
126: if (file == NULL) {
1.20 millert 127: if (asprintf(&file, "%s/%s", _PATH_MAILDIR, user) == -1)
1.18 millert 128: err(1, NULL);
1.1 deraadt 129: }
130: }
1.20 millert 131: return(file);
1.1 deraadt 132: }
133:
1.7 deraadt 134: int
1.10 deraadt 135: match(char *line, char *sender)
1.1 deraadt 136: {
1.8 mpech 137: char ch, pch, first, *p, *t;
1.1 deraadt 138:
139: for (first = *sender++;;) {
1.15 deraadt 140: if (isspace((unsigned char)(ch = *line)))
1.1 deraadt 141: return(0);
142: ++line;
1.15 deraadt 143: if (isupper((unsigned char)ch))
144: ch = tolower((unsigned char)ch);
1.1 deraadt 145: if (ch != first)
146: continue;
147: for (p = sender, t = line;;) {
148: if (!(pch = *p++))
149: return(1);
1.15 deraadt 150: if (isupper((unsigned char)(ch = *t++)))
151: ch = tolower((unsigned char)ch);
1.1 deraadt 152: if (ch != pch)
153: break;
154: }
155: }
156: /* NOTREACHED */
157: }