]>
Commit | Line | Data |
---|---|---|
6dbe3af9 | 1 | /* |
726f69e2 KZ |
2 | * Copyright (c) 1988, 1990, 1993 |
3 | * The Regents of the University of California. All rights reserved. | |
6dbe3af9 KZ |
4 | * |
5 | * Redistribution and use in source and binary forms, with or without | |
6 | * modification, are permitted provided that the following conditions | |
7 | * are met: | |
8 | * 1. Redistributions of source code must retain the above copyright | |
9 | * notice, this list of conditions and the following disclaimer. | |
10 | * 2. Redistributions in binary form must reproduce the above copyright | |
11 | * notice, this list of conditions and the following disclaimer in the | |
12 | * documentation and/or other materials provided with the distribution. | |
13 | * 3. All advertising materials mentioning features or use of this software | |
14 | * must display the following acknowledgement: | |
15 | * This product includes software developed by the University of | |
16 | * California, Berkeley and its contributors. | |
17 | * 4. Neither the name of the University nor the names of its contributors | |
18 | * may be used to endorse or promote products derived from this software | |
19 | * without specific prior written permission. | |
20 | * | |
21 | * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND | |
22 | * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | |
23 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE | |
24 | * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE | |
25 | * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL | |
26 | * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS | |
27 | * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) | |
28 | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT | |
29 | * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY | |
30 | * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF | |
31 | * SUCH DAMAGE. | |
32 | * | |
726f69e2 | 33 | * Modified Sun Mar 12 10:34:34 1995, faith@cs.unc.edu, for Linux |
6dbe3af9 KZ |
34 | */ |
35 | ||
6dbe3af9 KZ |
36 | /* |
37 | * This program is not related to David Wall, whose Stanford Ph.D. thesis | |
38 | * is entitled "Mechanisms for Broadcast and Selective Broadcast". | |
7eda085c | 39 | * |
b50945d4 | 40 | * 1999-02-22 Arkadiusz Miśkiewicz <misiek@pld.ORG.PL> |
7eda085c KZ |
41 | * - added Native Language Support |
42 | * | |
6dbe3af9 KZ |
43 | */ |
44 | ||
45 | #include <sys/param.h> | |
46 | #include <sys/stat.h> | |
47 | #include <sys/time.h> | |
48 | #include <sys/uio.h> | |
726f69e2 | 49 | |
aa00c136 | 50 | #include <errno.h> |
726f69e2 | 51 | #include <paths.h> |
7eda085c | 52 | #include <ctype.h> |
6dbe3af9 KZ |
53 | #include <pwd.h> |
54 | #include <stdio.h> | |
55 | #include <stdlib.h> | |
726f69e2 | 56 | #include <string.h> |
c07ebfa1 | 57 | #include <time.h> |
726f69e2 | 58 | #include <unistd.h> |
b4b919fe | 59 | #include <utmpx.h> |
76cc41b7 | 60 | #include <getopt.h> |
01544c52 JP |
61 | #include <sys/types.h> |
62 | #include <grp.h> | |
66ee8158 | 63 | |
87fcd95a TK |
64 | #if defined(USE_SYSTEMD) && HAVE_DECL_SD_SESSION_GET_USERNAME == 1 |
65 | # include <systemd/sd-login.h> | |
66 | # include <systemd/sd-daemon.h> | |
67 | #endif | |
68 | ||
7eda085c | 69 | #include "nls.h" |
4b5156cb | 70 | #include "xalloc.h" |
8abcf290 | 71 | #include "strutils.h" |
66ee8158 | 72 | #include "ttymsg.h" |
726f69e2 | 73 | #include "pathnames.h" |
66ee8158 | 74 | #include "carefulputc.h" |
eb76ca98 | 75 | #include "c.h" |
76b680b1 | 76 | #include "cctype.h" |
a000bbb6 | 77 | #include "fileutils.h" |
cdd2a8c3 | 78 | #include "closestream.h" |
3160589d | 79 | #include "timeutils.h" |
11109352 | 80 | #include "pwdutils.h" |
726f69e2 | 81 | |
42e296b5 SK |
82 | #define TERM_WIDTH 79 |
83 | #define WRITE_TIME_OUT 300 /* in seconds */ | |
6dbe3af9 | 84 | |
98e2d4de | 85 | /* Function prototypes */ |
cdd3cc7f KZ |
86 | static char *makemsg(char *fname, char **mvec, int mvecsz, |
87 | size_t *mbufsize, int print_banner); | |
6dbe3af9 | 88 | |
86be6a32 | 89 | static void __attribute__((__noreturn__)) usage(void) |
dfdf2081 | 90 | { |
86be6a32 | 91 | FILE *out = stdout; |
bbeae1ce | 92 | fputs(USAGE_HEADER, out); |
a290362b | 93 | fprintf(out, |
bbeae1ce | 94 | _(" %s [options] [<file> | <message>]\n"), program_invocation_short_name); |
451dbcfa BS |
95 | |
96 | fputs(USAGE_SEPARATOR, out); | |
97 | fputs(_("Write a message to all users.\n"), out); | |
98 | ||
bbeae1ce | 99 | fputs(USAGE_OPTIONS, out); |
01544c52 | 100 | fputs(_(" -g, --group <group> only send message to group\n"), out); |
bbeae1ce SK |
101 | fputs(_(" -n, --nobanner do not print banner, works only for root\n"), out); |
102 | fputs(_(" -t, --timeout <timeout> write timeout in seconds\n"), out); | |
103 | fputs(USAGE_SEPARATOR, out); | |
bad4c729 MY |
104 | fprintf(out, USAGE_HELP_OPTIONS(25)); |
105 | fprintf(out, USAGE_MAN_TAIL("wall(1)")); | |
76cc41b7 | 106 | |
86be6a32 | 107 | exit(EXIT_SUCCESS); |
dfdf2081 DB |
108 | } |
109 | ||
01544c52 JP |
110 | struct group_workspace { |
111 | gid_t requested_group; | |
112 | int ngroups; | |
098a75a1 KZ |
113 | |
114 | /* getgrouplist() on OSX takes int* not gid_t* */ | |
115 | #ifdef __APPLE__ | |
116 | int *groups; | |
117 | #else | |
01544c52 | 118 | gid_t *groups; |
098a75a1 | 119 | #endif |
01544c52 JP |
120 | }; |
121 | ||
123eb9ef | 122 | static gid_t get_group_gid(const char *group) |
01544c52 JP |
123 | { |
124 | struct group *gr; | |
e0383e3e | 125 | gid_t gid; |
01544c52 | 126 | |
123eb9ef | 127 | if ((gr = getgrnam(group))) |
01544c52 | 128 | return gr->gr_gid; |
e0383e3e | 129 | |
123eb9ef | 130 | gid = strtou32_or_err(group, _("invalid group argument")); |
e0383e3e | 131 | if (!getgrgid(gid)) |
123eb9ef | 132 | errx(EXIT_FAILURE, _("%s: unknown gid"), group); |
e0383e3e KZ |
133 | |
134 | return gid; | |
01544c52 JP |
135 | } |
136 | ||
123eb9ef | 137 | static struct group_workspace *init_group_workspace(const char *group) |
01544c52 JP |
138 | { |
139 | struct group_workspace *buf = xmalloc(sizeof(struct group_workspace)); | |
140 | ||
123eb9ef | 141 | buf->requested_group = get_group_gid(group); |
01544c52 | 142 | buf->ngroups = sysconf(_SC_NGROUPS_MAX) + 1; /* room for the primary gid */ |
07f0f0f5 | 143 | buf->groups = xcalloc(buf->ngroups, sizeof(*buf->groups)); |
01544c52 JP |
144 | |
145 | return buf; | |
146 | } | |
147 | ||
148 | static void free_group_workspace(struct group_workspace *buf) | |
149 | { | |
150 | if (!buf) | |
151 | return; | |
152 | ||
153 | free(buf->groups); | |
154 | free(buf); | |
155 | } | |
156 | ||
157 | static int is_gr_member(const char *login, const struct group_workspace *buf) | |
158 | { | |
159 | struct passwd *pw; | |
160 | int ngroups = buf->ngroups; | |
161 | int rc; | |
162 | ||
163 | pw = getpwnam(login); | |
b4cb2b48 KZ |
164 | if (!pw) |
165 | return 0; | |
166 | ||
01544c52 JP |
167 | if (buf->requested_group == pw->pw_gid) |
168 | return 1; | |
169 | ||
170 | rc = getgrouplist(login, pw->pw_gid, buf->groups, &ngroups); | |
171 | if (rc < 0) { | |
172 | /* buffer too small, not sure how this can happen, since | |
173 | we used sysconf to get the size... */ | |
174 | errx(EXIT_FAILURE, | |
175 | _("getgrouplist found more groups than sysconf allows")); | |
176 | } | |
177 | ||
178 | for (; ngroups >= 0; --ngroups) { | |
098a75a1 | 179 | if (buf->requested_group == (gid_t) buf->groups[ngroups]) |
01544c52 JP |
180 | return 1; |
181 | } | |
182 | ||
183 | return 0; | |
184 | } | |
185 | ||
d81c3055 KZ |
186 | int main(int argc, char **argv) |
187 | { | |
6dbe3af9 KZ |
188 | int ch; |
189 | struct iovec iov; | |
b4b919fe | 190 | struct utmpx *utmpptr; |
66ee8158 | 191 | char *p; |
7eda085c | 192 | char line[sizeof(utmpptr->ut_line) + 1]; |
98e2d4de | 193 | int print_banner = TRUE; |
01544c52 | 194 | struct group_workspace *group_buf = NULL; |
cdd3cc7f | 195 | char *mbuf, *fname = NULL; |
98e2d4de | 196 | size_t mbufsize; |
b43d3a3a | 197 | unsigned timeout = WRITE_TIME_OUT; |
cdd3cc7f KZ |
198 | char **mvec = NULL; |
199 | int mvecsz = 0; | |
7eda085c | 200 | |
76cc41b7 | 201 | static const struct option longopts[] = { |
87918040 SK |
202 | { "nobanner", no_argument, NULL, 'n' }, |
203 | { "timeout", required_argument, NULL, 't' }, | |
204 | { "group", required_argument, NULL, 'g' }, | |
205 | { "version", no_argument, NULL, 'V' }, | |
206 | { "help", no_argument, NULL, 'h' }, | |
207 | { NULL, 0, NULL, 0 } | |
76cc41b7 SK |
208 | }; |
209 | ||
3acc206d SK |
210 | setlocale(LC_ALL, ""); |
211 | bindtextdomain(PACKAGE, LOCALEDIR); | |
212 | textdomain(PACKAGE); | |
2c308875 | 213 | close_stdout_atexit(); |
3acc206d | 214 | |
01544c52 | 215 | while ((ch = getopt_long(argc, argv, "nt:g:Vh", longopts, NULL)) != -1) { |
6dbe3af9 KZ |
216 | switch (ch) { |
217 | case 'n': | |
6dbe3af9 | 218 | if (geteuid() == 0) |
98e2d4de | 219 | print_banner = FALSE; |
76cc41b7 SK |
220 | else |
221 | warnx(_("--nobanner is available only for root")); | |
6dbe3af9 | 222 | break; |
cae7485e | 223 | case 't': |
b43d3a3a | 224 | timeout = strtou32_or_err(optarg, _("invalid timeout argument")); |
cae7485e SK |
225 | if (timeout < 1) |
226 | errx(EXIT_FAILURE, _("invalid timeout argument: %s"), optarg); | |
227 | break; | |
01544c52 JP |
228 | case 'g': |
229 | group_buf = init_group_workspace(optarg); | |
230 | break; | |
2c308875 | 231 | |
76cc41b7 | 232 | case 'V': |
2c308875 | 233 | print_version(EXIT_SUCCESS); |
76cc41b7 | 234 | case 'h': |
86be6a32 | 235 | usage(); |
6dbe3af9 | 236 | default: |
677ec86c | 237 | errtryhelp(EXIT_FAILURE); |
6dbe3af9 | 238 | } |
00f41c7d | 239 | } |
6dbe3af9 KZ |
240 | argc -= optind; |
241 | argv += optind; | |
6dbe3af9 | 242 | |
cdd3cc7f KZ |
243 | if (argc == 1 && access(argv[0], F_OK) == 0) |
244 | fname = argv[0]; | |
245 | else if (argc >= 1) { | |
246 | mvec = argv; | |
247 | mvecsz = argc; | |
248 | } | |
249 | ||
250 | mbuf = makemsg(fname, mvec, mvecsz, &mbufsize, print_banner); | |
7eda085c | 251 | |
6dbe3af9 KZ |
252 | iov.iov_base = mbuf; |
253 | iov.iov_len = mbufsize; | |
71abc103 | 254 | |
87fcd95a TK |
255 | #if defined(USE_SYSTEMD) && HAVE_DECL_SD_SESSION_GET_USERNAME == 1 |
256 | if (sd_booted() > 0) { | |
257 | char **sessions_list; | |
258 | int sessions; | |
259 | ||
260 | sessions = sd_get_sessions(&sessions_list); | |
261 | if (sessions < 0) | |
262 | errx(EXIT_FAILURE, _("error getting sessions: %s"), | |
71abc103 | 263 | strerror(-sessions)); |
87fcd95a TK |
264 | |
265 | for (int i = 0; i < sessions; i++) { | |
266 | char *name, *tty; | |
267 | int r; | |
268 | ||
269 | if ((r = sd_session_get_username(sessions_list[i], &name)) < 0) | |
270 | errx(EXIT_FAILURE, _("get user name failed: %s"), strerror (-r)); | |
271 | ||
272 | if (!(group_buf && !is_gr_member(name, group_buf))) { | |
273 | if (sd_session_get_tty(sessions_list[i], &tty) >= 0) { | |
274 | if ((p = ttymsg(&iov, 1, tty, timeout)) != NULL) | |
275 | warnx("%s", p); | |
276 | ||
277 | free(tty); | |
278 | } | |
279 | } | |
280 | free(name); | |
281 | free(sessions_list[i]); | |
282 | } | |
283 | free(sessions_list); | |
71abc103 | 284 | } else |
87fcd95a | 285 | #endif |
71abc103 KZ |
286 | { |
287 | while ((utmpptr = getutxent())) { | |
288 | if (!utmpptr->ut_user[0]) | |
289 | continue; | |
7eda085c | 290 | #ifdef USER_PROCESS |
71abc103 KZ |
291 | if (utmpptr->ut_type != USER_PROCESS) |
292 | continue; | |
6dbe3af9 | 293 | #endif |
71abc103 KZ |
294 | /* Joey Hess reports that use-sessreg in /etc/X11/wdm/ produces |
295 | * ut_line entries like :0, and a write to /dev/:0 fails. | |
296 | * | |
297 | * It also seems that some login manager may produce empty ut_line. | |
298 | */ | |
299 | if (!*utmpptr->ut_line || *utmpptr->ut_line == ':') | |
300 | continue; | |
301 | ||
302 | if (group_buf && !is_gr_member(utmpptr->ut_user, group_buf)) | |
303 | continue; | |
304 | ||
305 | mem2strcpy(line, utmpptr->ut_line, sizeof(utmpptr->ut_line), sizeof(line)); | |
306 | if ((p = ttymsg(&iov, 1, line, timeout)) != NULL) | |
307 | warnx("%s", p); | |
308 | } | |
309 | endutxent(); | |
87fcd95a | 310 | } |
71abc103 | 311 | |
98e2d4de | 312 | free(mbuf); |
01544c52 | 313 | free_group_workspace(group_buf); |
d0acbd38 | 314 | exit(EXIT_SUCCESS); |
6dbe3af9 KZ |
315 | } |
316 | ||
d81c3055 KZ |
317 | static char *makemsg(char *fname, char **mvec, int mvecsz, |
318 | size_t *mbufsize, int print_banner) | |
6dbe3af9 | 319 | { |
aa13246a | 320 | char *lbuf, *retbuf; |
27ee6446 | 321 | FILE * fs = open_memstream(&retbuf, mbufsize); |
aa13246a | 322 | size_t lbuflen = 512; |
323 | lbuf = xmalloc(lbuflen); | |
d0acbd38 | 324 | |
98e2d4de | 325 | if (print_banner == TRUE) { |
2281e1ed | 326 | char *hostname = xgethostname(); |
3160589d | 327 | char *whom, *where, date[CTIME_BUFSIZ]; |
d81c3055 KZ |
328 | time_t now; |
329 | ||
11109352 | 330 | whom = xgetlogin(); |
98e2d4de | 331 | if (!whom) { |
11109352 | 332 | whom = "<someone>"; |
98e2d4de SK |
333 | warn(_("cannot get passwd uid")); |
334 | } | |
335 | where = ttyname(STDOUT_FILENO); | |
336 | if (!where) { | |
2b6fc908 | 337 | where = "somewhere"; |
d81c3055 KZ |
338 | } else if (strncmp(where, "/dev/", 5) == 0) |
339 | where += 5; | |
340 | ||
00f41c7d | 341 | time(&now); |
3160589d | 342 | ctime_r(&now, date); |
d81c3055 | 343 | date[strlen(date) - 1] = '\0'; |
6dbe3af9 KZ |
344 | |
345 | /* | |
346 | * all this stuff is to blank out a square for the message; | |
347 | * we wrap message lines at column 79, not 80, because some | |
348 | * terminals wrap after 79, some do not, and we can't tell. | |
349 | * Which means that we may leave a non-blank character | |
350 | * in column 80, but that can't be helped. | |
351 | */ | |
2b6fc908 KZ |
352 | /* snprintf is not always available, but the sprintf's here |
353 | will not overflow as long as %d takes at most 100 chars */ | |
27ee6446 | 354 | fprintf(fs, "\r%*s\r\n", TERM_WIDTH, " "); |
890e1035 | 355 | |
aa13246a | 356 | snprintf(lbuf, lbuflen, |
890e1035 KZ |
357 | _("Broadcast message from %s@%s (%s) (%s):"), |
358 | whom, hostname, where, date); | |
27ee6446 | 359 | fprintf(fs, "%-*.*s\007\007\r\n", TERM_WIDTH, TERM_WIDTH, lbuf); |
d81c3055 | 360 | free(hostname); |
6dbe3af9 | 361 | } |
27ee6446 | 362 | fprintf(fs, "%*s\r\n", TERM_WIDTH, " "); |
6dbe3af9 | 363 | |
cdd3cc7f KZ |
364 | if (mvec) { |
365 | /* | |
366 | * Read message from argv[] | |
367 | */ | |
368 | int i; | |
369 | ||
370 | for (i = 0; i < mvecsz; i++) { | |
27ee6446 | 371 | fputs(mvec[i], fs); |
cdd3cc7f | 372 | if (i < mvecsz - 1) |
27ee6446 | 373 | fputc(' ', fs); |
cdd3cc7f | 374 | } |
27ee6446 | 375 | fputs("\r\n", fs); |
cdd3cc7f | 376 | } else { |
66ee8158 | 377 | /* |
cdd3cc7f | 378 | * read message from <file> |
66ee8158 | 379 | */ |
cdd3cc7f KZ |
380 | if (fname) { |
381 | /* | |
382 | * When we are not root, but suid or sgid, refuse to read files | |
383 | * (e.g. device files) that the user may not have access to. | |
384 | * After all, our invoker can easily do "wall < file" | |
385 | * instead of "wall file". | |
386 | */ | |
387 | uid_t uid = getuid(); | |
388 | if (uid && (uid != geteuid() || getgid() != getegid())) | |
389 | errx(EXIT_FAILURE, _("will not read %s - use stdin."), | |
390 | fname); | |
d0acbd38 | 391 | |
cdd3cc7f KZ |
392 | if (!freopen(fname, "r", stdin)) |
393 | err(EXIT_FAILURE, _("cannot open %s"), fname); | |
394 | ||
395 | } | |
66ee8158 | 396 | |
cdd3cc7f KZ |
397 | /* |
398 | * Read message from stdin. | |
399 | */ | |
aa13246a | 400 | while (getline(&lbuf, &lbuflen, stdin) >= 0) |
401 | fputs_careful(lbuf, fs, '^', true, TERM_WIDTH); | |
66ee8158 | 402 | } |
27ee6446 | 403 | fprintf(fs, "%*s\r\n", TERM_WIDTH, " "); |
98e2d4de SK |
404 | |
405 | free(lbuf); | |
d0acbd38 | 406 | |
27ee6446 | 407 | fclose(fs); |
408 | return retbuf; | |
6dbe3af9 | 409 | } |