Annotation of src/usr.bin/from/from.c, Revision 1.20
1.20 ! millert 1: /* $OpenBSD: from.c,v 1.19 2015/06/03 02:35:50 millert 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.20 ! millert 77: file = mail_spool(file, *argv);
! 78: if ((fp = fopen(file, "r")) == NULL) {
! 79: if (!fflag && errno == ENOENT)
! 80: exit(EXIT_SUCCESS);
! 81: err(1, "%s", file);
! 82: }
1.18 millert 83: for (newline = 1; (linelen = getline(&line, &linesize, fp)) != -1;) {
84: if (*line == '\n') {
85: newline = 1;
86: continue;
87: }
88: if (newline && !strncmp(line, "From ", 5) &&
89: (!sender || match(line + 5, sender)))
90: printf("%s", line);
91: newline = 0;
92: }
93: free(line);
94: exit(EXIT_SUCCESS);
95: }
96:
1.20 ! millert 97: char *
! 98: mail_spool(char *file, const char *user)
1.18 millert 99: {
100: struct passwd *pwd;
101:
1.1 deraadt 102: /*
103: * We find the mailbox by:
104: * 1 -f flag
1.18 millert 105: * 2 _PATH_MAILDIR/user (from argv)
1.1 deraadt 106: * 2 MAIL environment variable
1.18 millert 107: * 3 _PATH_MAILDIR/user (from environment or passwd db)
1.1 deraadt 108: */
1.18 millert 109: if (file == NULL) {
110: if (user == NULL) {
111: if ((file = getenv("MAIL")) == NULL) {
112: if ((user = getenv("LOGNAME")) == NULL &&
113: (user = getenv("USER")) == NULL) {
114: if (!(pwd = getpwuid(getuid())))
115: errx(1, "no password file "
116: "entry for you");
117: user = pwd->pw_name;
118: }
1.1 deraadt 119: }
1.18 millert 120: }
121: if (file == NULL) {
1.20 ! millert 122: if (asprintf(&file, "%s/%s", _PATH_MAILDIR, user) == -1)
1.18 millert 123: err(1, NULL);
1.1 deraadt 124: }
125: }
1.20 ! millert 126: return(file);
1.1 deraadt 127: }
128:
1.7 deraadt 129: int
1.10 deraadt 130: match(char *line, char *sender)
1.1 deraadt 131: {
1.8 mpech 132: char ch, pch, first, *p, *t;
1.1 deraadt 133:
134: for (first = *sender++;;) {
1.15 deraadt 135: if (isspace((unsigned char)(ch = *line)))
1.1 deraadt 136: return(0);
137: ++line;
1.15 deraadt 138: if (isupper((unsigned char)ch))
139: ch = tolower((unsigned char)ch);
1.1 deraadt 140: if (ch != first)
141: continue;
142: for (p = sender, t = line;;) {
143: if (!(pch = *p++))
144: return(1);
1.15 deraadt 145: if (isupper((unsigned char)(ch = *t++)))
146: ch = tolower((unsigned char)ch);
1.1 deraadt 147: if (ch != pch)
148: break;
149: }
150: }
151: /* NOTREACHED */
152: }