2 * Copyright (c) 1988, 1990, 1993
3 * The Regents of the University of California. All rights reserved.
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
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.
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
33 * Modified Sun Mar 12 10:34:34 1995, faith@cs.unc.edu, for Linux
37 * This program is not related to David Wall, whose Stanford Ph.D. thesis
38 * is entitled "Mechanisms for Broadcast and Selective Broadcast".
40 * 1999-02-22 Arkadiusz MiĆkiewicz <misiek@pld.ORG.PL>
41 * - added Native Language Support
45 #include <sys/param.h>
66 #include "pathnames.h"
67 #include "carefulputc.h"
69 #include "fileutils.h"
70 #include "closestream.h"
73 #define WRITE_TIME_OUT 300 /* in seconds */
75 /* Function prototypes */
76 static char *makemsg(char *fname
, char **mvec
, int mvecsz
,
77 size_t *mbufsize
, int print_banner
);
79 static void __attribute__((__noreturn__
)) usage(FILE *out
)
81 fputs(USAGE_HEADER
, out
);
83 _(" %s [options] [<file> | <message>]\n"), program_invocation_short_name
);
84 fputs(USAGE_OPTIONS
, out
);
85 fputs(_(" -n, --nobanner do not print banner, works only for root\n"), out
);
86 fputs(_(" -t, --timeout <timeout> write timeout in seconds\n"), out
);
87 fputs(USAGE_SEPARATOR
, out
);
88 fputs(USAGE_HELP
, out
);
89 fputs(USAGE_VERSION
, out
);
90 fprintf(out
, USAGE_MAN_TAIL("wall(1)"));
92 exit(out
== stderr
? EXIT_FAILURE
: EXIT_SUCCESS
);
95 int main(int argc
, char **argv
)
101 char line
[sizeof(utmpptr
->ut_line
) + 1];
102 int print_banner
= TRUE
;
103 char *mbuf
, *fname
= NULL
;
105 unsigned timeout
= WRITE_TIME_OUT
;
109 static const struct option longopts
[] = {
110 { "nobanner", no_argument
, 0, 'n' },
111 { "timeout", required_argument
, 0, 't' },
112 { "version", no_argument
, 0, 'V' },
113 { "help", no_argument
, 0, 'h' },
117 setlocale(LC_ALL
, "");
118 bindtextdomain(PACKAGE
, LOCALEDIR
);
120 atexit(close_stdout
);
122 while ((ch
= getopt_long(argc
, argv
, "nt:Vh", longopts
, NULL
)) != -1) {
126 print_banner
= FALSE
;
128 warnx(_("--nobanner is available only for root"));
131 timeout
= strtou32_or_err(optarg
, _("invalid timeout argument"));
133 errx(EXIT_FAILURE
, _("invalid timeout argument: %s"), optarg
);
136 printf(UTIL_LINUX_VERSION
);
147 if (argc
== 1 && access(argv
[0], F_OK
) == 0)
149 else if (argc
>= 1) {
154 mbuf
= makemsg(fname
, mvec
, mvecsz
, &mbufsize
, print_banner
);
157 iov
.iov_len
= mbufsize
;
158 while((utmpptr
= getutent())) {
159 if (!utmpptr
->ut_user
[0])
162 if (utmpptr
->ut_type
!= USER_PROCESS
)
165 /* Joey Hess reports that use-sessreg in /etc/X11/wdm/
166 produces ut_line entries like :0, and a write
168 if (utmpptr
->ut_line
[0] == ':')
171 xstrncpy(line
, utmpptr
->ut_line
, sizeof(utmpptr
->ut_line
));
172 if ((p
= ttymsg(&iov
, 1, line
, timeout
)) != NULL
)
180 static char *makemsg(char *fname
, char **mvec
, int mvecsz
,
181 size_t *mbufsize
, int print_banner
)
183 register int ch
, cnt
;
186 char *p
, *lbuf
, *tmpname
, *mbuf
;
189 line_max
= sysconf(_SC_LINE_MAX
);
193 lbuf
= xmalloc(line_max
);
195 if ((fp
= xfmkstemp(&tmpname
, NULL
)) == NULL
)
196 err(EXIT_FAILURE
, _("can't open temporary file"));
200 if (print_banner
== TRUE
) {
201 char *hostname
= xgethostname();
202 char *whom
, *where
, *date
;
206 if (!(whom
= getlogin()) || !*whom
)
207 whom
= (pw
= getpwuid(getuid())) ? pw
->pw_name
: "???";
210 warn(_("cannot get passwd uid"));
212 where
= ttyname(STDOUT_FILENO
);
215 warn(_("cannot get tty name"));
216 } else if (strncmp(where
, "/dev/", 5) == 0)
220 date
= xstrdup(ctime(&now
));
221 date
[strlen(date
) - 1] = '\0';
224 * all this stuff is to blank out a square for the message;
225 * we wrap message lines at column 79, not 80, because some
226 * terminals wrap after 79, some do not, and we can't tell.
227 * Which means that we may leave a non-blank character
228 * in column 80, but that can't be helped.
230 /* snprintf is not always available, but the sprintf's here
231 will not overflow as long as %d takes at most 100 chars */
232 fprintf(fp
, "\r%*s\r\n", TERM_WIDTH
, " ");
233 sprintf(lbuf
, _("Broadcast message from %s@%s (%s) (%s):"),
234 whom
, hostname
, where
, date
);
235 fprintf(fp
, "%-*.*s\007\007\r\n", TERM_WIDTH
, TERM_WIDTH
, lbuf
);
239 fprintf(fp
, "%*s\r\n", TERM_WIDTH
, " ");
243 * Read message from argv[]
247 for (i
= 0; i
< mvecsz
; i
++) {
257 * read message from <file>
261 * When we are not root, but suid or sgid, refuse to read files
262 * (e.g. device files) that the user may not have access to.
263 * After all, our invoker can easily do "wall < file"
264 * instead of "wall file".
266 uid_t uid
= getuid();
267 if (uid
&& (uid
!= geteuid() || getgid() != getegid()))
268 errx(EXIT_FAILURE
, _("will not read %s - use stdin."),
271 if (!freopen(fname
, "r", stdin
))
272 err(EXIT_FAILURE
, _("cannot open %s"), fname
);
277 * Read message from stdin.
279 while (fgets(lbuf
, line_max
, stdin
)) {
280 for (cnt
= 0, p
= lbuf
; (ch
= *p
) != '\0'; ++p
, ++cnt
) {
281 if (cnt
== TERM_WIDTH
|| ch
== '\n') {
282 for (; cnt
< TERM_WIDTH
; ++cnt
)
289 cnt
+= (7 - (cnt
% 8));
291 fputc_careful(ch
, fp
, '^');
295 fprintf(fp
, "%*s\r\n", TERM_WIDTH
, " ");
300 if (fstat(fileno(fp
), &sbuf
))
301 err(EXIT_FAILURE
, _("stat failed"));
303 *mbufsize
= (size_t) sbuf
.st_size
;
304 mbuf
= xmalloc(*mbufsize
);
306 if (fread(mbuf
, 1, *mbufsize
, fp
) != *mbufsize
)
307 err(EXIT_FAILURE
, _("fread failed"));
309 if (close_stream(fp
) != 0)
310 errx(EXIT_FAILURE
, _("write error"));