2 * Copyright (c) 1980, 1987, 1991, 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 * 4. Neither the name of the University nor the names of its contributors
14 * may be used to endorse or promote products derived from this software
15 * without specific prior written permission.
17 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31 static const char copyright[] =
32 "@(#) Copyright (c) 1980, 1987, 1991, 1993\n\
33 The Regents of the University of California. All rights reserved.\n";
38 static char sccsid[] = "@(#)wc.c 8.1 (Berkeley) 6/6/93";
42 #include <sys/cdefs.h>
43 __FBSDID("$FreeBSD$");
45 #include <sys/param.h>
62 static uintmax_t tlinect, twordct, tcharct, tlongline;
63 static int doline, doword, dochar, domulti, dolongline;
64 static volatile sig_atomic_t siginfo;
65 static xo_handle_t *stderr_handle;
67 static void show_cnt(const char *file, uintmax_t linect, uintmax_t wordct,
68 uintmax_t charct, uintmax_t llct);
69 static int cnt(const char *);
70 static void usage(void);
73 siginfo_handler(int sig __unused)
83 signal(SIGINFO, SIG_DFL);
88 main(int argc, char *argv[])
90 int ch, errors, total;
92 (void) setlocale(LC_CTYPE, "");
94 argc = xo_parse_args(argc, argv);
98 while ((ch = getopt(argc, argv, "clmwL")) != -1)
124 (void)signal(SIGINFO, siginfo_handler);
126 /* Wc's flags are on by default. */
127 if (doline + doword + dochar + domulti + dolongline == 0)
128 doline = doword = dochar = 1;
130 stderr_handle = xo_create_to_file(stderr, XO_STYLE_TEXT, 0);
131 xo_open_container("wc");
132 xo_open_list("file");
137 xo_open_instance("file");
138 if (cnt((char *)NULL) != 0)
140 xo_close_instance("file");
143 xo_open_instance("file");
146 xo_close_instance("file");
151 xo_close_list("file");
154 xo_open_container("total");
155 show_cnt("total", tlinect, twordct, tcharct, tlongline);
156 xo_close_container("total");
159 xo_close_container("wc");
161 exit(errors == 0 ? 0 : 1);
165 show_cnt(const char *file, uintmax_t linect, uintmax_t wordct,
166 uintmax_t charct, uintmax_t llct)
178 xo_emit_h(xop, " {:lines/%7ju/%ju}", linect);
180 xo_emit_h(xop, " {:words/%7ju/%ju}", wordct);
181 if (dochar || domulti)
182 xo_emit_h(xop, " {:characters/%7ju/%ju}", charct);
184 xo_emit_h(xop, " {:long-lines/%7ju/%ju}", llct);
186 xo_emit_h(xop, " {:filename/%s}\n", file);
188 xo_emit_h(xop, "\n");
192 cnt(const char *file)
195 uintmax_t linect, wordct, charct, llct, tmpll;
200 u_char buf[MAXBSIZE];
204 linect = wordct = charct = llct = tmpll = 0;
208 if ((fd = open(file, O_RDONLY, 0)) < 0) {
209 xo_warn("%s: open", file);
212 if (doword || (domulti && MB_CUR_MAX != 1))
215 * Line counting is split out because it's a lot faster to get
216 * lines than to get words, since the word count requires some
220 while ((len = read(fd, buf, MAXBSIZE))) {
222 xo_warn("%s: read", file);
227 show_cnt(file, linect, wordct, charct,
231 for (p = buf; len--; ++p)
245 if (llct > tlongline)
248 show_cnt(file, linect, wordct, charct, llct);
253 * If all we need is the number of characters and it's a
254 * regular file, just stat the puppy.
256 if (dochar || domulti) {
257 if (fstat(fd, &sb)) {
258 xo_warn("%s: fstat", file);
262 if (S_ISREG(sb.st_mode)) {
265 show_cnt(file, linect, wordct, charct, llct);
273 /* Do it the hard way... */
276 memset(&mbs, 0, sizeof(mbs));
277 while ((len = read(fd, buf, MAXBSIZE)) != 0) {
279 xo_warn("%s: read", file != NULL ? file : "stdin");
286 show_cnt(file, linect, wordct, charct, llct);
287 if (!domulti || MB_CUR_MAX == 1) {
289 wch = (unsigned char)*p;
290 } else if ((clen = mbrtowc(&wch, p, len, &mbs)) ==
295 file != NULL ? file : "stdin");
298 memset(&mbs, 0, sizeof(mbs));
300 wch = (unsigned char)*p;
301 } else if (clen == (size_t)-2)
325 if (domulti && MB_CUR_MAX > 1)
326 if (mbrtowc(NULL, NULL, 0, &mbs) == (size_t)-1 && !warned)
327 xo_warn("%s", file != NULL ? file : "stdin");
332 if (dochar || domulti)
335 if (llct > tlongline)
338 show_cnt(file, linect, wordct, charct, llct);
346 xo_error("usage: wc [-Lclmw] [file ...]\n");