Commit | Line | Data |
---|---|---|
02072412 | 1 | /* |
dfb3bab4 | 2 | * Copyright (c) 1988, 1990 Regents of the University of California. |
6bfd2df7 KB |
3 | * All rights reserved. |
4 | * | |
43e86899 | 5 | * %sccs.include.redist.c% |
02072412 DF |
6 | */ |
7 | ||
8 | #ifndef lint | |
9 | char copyright[] = | |
6bfd2df7 | 10 | "@(#) Copyright (c) 1988 Regents of the University of California.\n\ |
02072412 | 11 | All rights reserved.\n"; |
6bfd2df7 | 12 | #endif /* not lint */ |
02072412 DF |
13 | |
14 | #ifndef lint | |
d904b666 | 15 | static char sccsid[] = "@(#)wall.c 5.16 (Berkeley) %G%"; |
6bfd2df7 | 16 | #endif /* not lint */ |
02072412 | 17 | |
1addde1c | 18 | /* |
1addde1c BJ |
19 | * This program is not related to David Wall, whose Stanford Ph.D. thesis |
20 | * is entitled "Mechanisms for Broadcast and Selective Broadcast". | |
21 | */ | |
22 | ||
6bfd2df7 | 23 | #include <sys/param.h> |
734f8abe | 24 | #include <sys/stat.h> |
679e4bf6 KB |
25 | #include <sys/time.h> |
26 | #include <sys/uio.h> | |
6bfd2df7 KB |
27 | #include <utmp.h> |
28 | #include <pwd.h> | |
6bfd2df7 | 29 | #include <stdio.h> |
60255162 | 30 | #include <stdlib.h> |
fb688dce | 31 | #include <paths.h> |
3071a7ff | 32 | |
6bfd2df7 | 33 | #define IGNOREUSER "sleeper" |
1addde1c | 34 | |
dfb3bab4 | 35 | int nobanner; |
3b1f309f MT |
36 | int mbufsize; |
37 | char *mbuf; | |
3071a7ff | 38 | |
6bfd2df7 | 39 | /* ARGSUSED */ |
1addde1c | 40 | main(argc, argv) |
6bfd2df7 KB |
41 | int argc; |
42 | char **argv; | |
1addde1c | 43 | { |
dfb3bab4 MK |
44 | extern int optind; |
45 | int ch; | |
679e4bf6 | 46 | struct iovec iov; |
6bfd2df7 KB |
47 | struct utmp utmp; |
48 | FILE *fp; | |
679e4bf6 | 49 | char *p, *ttymsg(); |
6bfd2df7 | 50 | |
dfb3bab4 MK |
51 | while ((ch = getopt(argc, argv, "n")) != EOF) |
52 | switch (ch) { | |
53 | case 'n': | |
54 | /* undoc option for shutdown: suppress banner */ | |
55 | if (geteuid() == 0) | |
56 | nobanner = 1; | |
57 | break; | |
58 | case '?': | |
59 | default: | |
60 | usage: | |
61 | (void)fprintf(stderr, "usage: wall [file]\n"); | |
62 | exit(1); | |
63 | } | |
64 | argc -= optind; | |
65 | argv += optind; | |
66 | if (argc > 1) | |
67 | goto usage; | |
679e4bf6 | 68 | |
dfb3bab4 | 69 | makemsg(*argv); |
6bfd2df7 | 70 | |
3b1f309f | 71 | if (!(fp = fopen(_PATH_UTMP, "r"))) { |
679e4bf6 | 72 | (void)fprintf(stderr, "wall: cannot read %s.\n", _PATH_UTMP); |
6bfd2df7 | 73 | exit(1); |
df3e00cc | 74 | } |
679e4bf6 KB |
75 | iov.iov_base = mbuf; |
76 | iov.iov_len = mbufsize; | |
6bfd2df7 | 77 | /* NOSTRICT */ |
679e4bf6 KB |
78 | while (fread((char *)&utmp, sizeof(utmp), 1, fp) == 1) { |
79 | if (!utmp.ut_name[0] || | |
80 | !strncmp(utmp.ut_name, IGNOREUSER, sizeof(utmp.ut_name))) | |
81 | continue; | |
64a60a45 | 82 | if (p = ttymsg(&iov, 1, utmp.ut_line, 60*5)) |
679e4bf6 KB |
83 | (void)fprintf(stderr, "wall: %s\n", p); |
84 | } | |
1addde1c BJ |
85 | exit(0); |
86 | } | |
87 | ||
679e4bf6 KB |
88 | makemsg(fname) |
89 | char *fname; | |
1addde1c | 90 | { |
6bfd2df7 KB |
91 | register int ch, cnt; |
92 | struct tm *lt; | |
60255162 | 93 | struct passwd *pw; |
6bfd2df7 KB |
94 | struct stat sbuf; |
95 | time_t now, time(); | |
96 | FILE *fp; | |
97 | int fd; | |
98 | char *p, *whom, hostname[MAXHOSTNAMELEN], lbuf[100], tmpname[15]; | |
60255162 | 99 | char *getlogin(), *strcpy(), *ttyname(); |
1addde1c | 100 | |
3b1f309f | 101 | (void)strcpy(tmpname, _PATH_TMP); |
fb688dce | 102 | (void)strcat(tmpname, "/wall.XXXXXX"); |
6bfd2df7 | 103 | if (!(fd = mkstemp(tmpname)) || !(fp = fdopen(fd, "r+"))) { |
679e4bf6 | 104 | (void)fprintf(stderr, "wall: can't open temporary file.\n"); |
6bfd2df7 KB |
105 | exit(1); |
106 | } | |
107 | (void)unlink(tmpname); | |
108 | ||
dfb3bab4 MK |
109 | if (!nobanner) { |
110 | if (!(whom = getlogin())) | |
111 | whom = (pw = getpwuid(getuid())) ? pw->pw_name : "???"; | |
112 | (void)gethostname(hostname, sizeof(hostname)); | |
113 | (void)time(&now); | |
114 | lt = localtime(&now); | |
115 | ||
116 | /* | |
117 | * all this stuff is to blank out a square for the message; | |
118 | * we wrap message lines at column 79, not 80, because some | |
119 | * terminals wrap after 79, some do not, and we can't tell. | |
120 | * Which means that we may leave a non-blank character | |
121 | * in column 80, but that can't be helped. | |
122 | */ | |
123 | (void)fprintf(fp, "\r%79s\r\n", " "); | |
124 | (void)sprintf(lbuf, "Broadcast Message from %s@%s", | |
125 | whom, hostname); | |
126 | (void)fprintf(fp, "%-79.79s\007\007\r\n", lbuf); | |
127 | (void)sprintf(lbuf, " (%s) at %d:%02d ...", ttyname(2), | |
128 | lt->tm_hour, lt->tm_min); | |
129 | (void)fprintf(fp, "%-79.79s\r\n", lbuf); | |
130 | } | |
679e4bf6 | 131 | (void)fprintf(fp, "%79s\r\n", " "); |
3071a7ff | 132 | |
d904b666 | 133 | if (fname && !(freopen(fname, "r", stdin))) { |
679e4bf6 | 134 | (void)fprintf(stderr, "wall: can't read %s.\n", fname); |
6bfd2df7 KB |
135 | exit(1); |
136 | } | |
137 | while (fgets(lbuf, sizeof(lbuf), stdin)) | |
3b1f309f MT |
138 | for (cnt = 0, p = lbuf; ch = *p; ++p, ++cnt) { |
139 | if (cnt == 79 || ch == '\n') { | |
679e4bf6 KB |
140 | for (; cnt < 79; ++cnt) |
141 | putc(' ', fp); | |
6bfd2df7 KB |
142 | putc('\r', fp); |
143 | putc('\n', fp); | |
3b1f309f | 144 | cnt = 0; |
6bfd2df7 KB |
145 | } else |
146 | putc(ch, fp); | |
3b1f309f | 147 | } |
679e4bf6 | 148 | (void)fprintf(fp, "%79s\r\n", " "); |
6bfd2df7 KB |
149 | rewind(fp); |
150 | ||
151 | if (fstat(fd, &sbuf)) { | |
679e4bf6 | 152 | (void)fprintf(stderr, "wall: can't stat temporary file.\n"); |
6bfd2df7 | 153 | exit(1); |
3071a7ff | 154 | } |
6bfd2df7 KB |
155 | mbufsize = sbuf.st_size; |
156 | if (!(mbuf = malloc((u_int)mbufsize))) { | |
679e4bf6 | 157 | (void)fprintf(stderr, "wall: out of memory.\n"); |
6bfd2df7 | 158 | exit(1); |
3071a7ff | 159 | } |
e41c016c | 160 | if (fread(mbuf, sizeof(*mbuf), mbufsize, fp) != mbufsize) { |
679e4bf6 | 161 | (void)fprintf(stderr, "wall: can't read temporary file.\n"); |
e41c016c KB |
162 | exit(1); |
163 | } | |
6bfd2df7 KB |
164 | (void)close(fd); |
165 | } |