2 * Copyright (c) 1989, 1993
3 * The Regents of the University of California. All rights reserved.
5 * This code is derived from software contributed to Berkeley by
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
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.
16 * 4. Neither the name of the University nor the names of its contributors
17 * may be used to endorse or promote products derived from this software
18 * without specific prior written permission.
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
34 static const char copyright[] =
35 "@(#) Copyright (c) 1989, 1993\n\
36 The Regents of the University of California. All rights reserved.\n";
41 static char sccsid[] = "@(#)uniq.c 8.3 (Berkeley) 5/4/95";
43 static const char rcsid[] =
47 #include <sys/capsicum.h>
66 static int cflag, dflag, uflag, iflag;
67 static int numchars, numfields, repeats;
69 static const struct option long_opts[] =
71 {"count", no_argument, NULL, 'c'},
72 {"repeated", no_argument, NULL, 'd'},
73 {"skip-fields", required_argument, NULL, 'f'},
74 {"ignore-case", no_argument, NULL, 'i'},
75 {"skip-chars", required_argument, NULL, 's'},
76 {"unique", no_argument, NULL, 'u'},
77 {NULL, no_argument, NULL, 0}
80 static FILE *file(const char *, const char *);
81 static wchar_t *convert(const char *);
82 static int inlcmp(const char *, const char *);
83 static void show(FILE *, const char *);
84 static wchar_t *skip(wchar_t *);
85 static void obsolete(char *[]);
86 static void usage(void);
93 * Cache NLS data before entering capability mode.
94 * XXXPJD: There should be strerror_init() and strsignal_init() in libc.
96 (void)catopen("libc", NL_CAT_LOCALE);
100 main (int argc, char *argv[])
102 wchar_t *tprev, *tthis;
105 size_t prevbuflen, thisbuflen, b1;
106 char *prevline, *thisline, *p;
110 (void) setlocale(LC_ALL, "");
113 while ((ch = getopt_long(argc, argv, "+cdif:s:u", long_opts,
126 numfields = strtol(optarg, &p, 10);
127 if (numfields < 0 || *p)
128 errx(1, "illegal field skip value: %s", optarg);
131 numchars = strtol(optarg, &p, 10);
132 if (numchars < 0 || *p)
133 errx(1, "illegal character skip value: %s", optarg);
152 if (argc > 0 && strcmp(argv[0], "-") != 0)
153 ifp = file(ifn = argv[0], "r");
154 cap_rights_init(&rights, CAP_FSTAT, CAP_READ);
155 if (cap_rights_limit(fileno(ifp), &rights) < 0 && errno != ENOSYS)
156 err(1, "unable to limit rights for %s", ifn);
157 cap_rights_init(&rights, CAP_FSTAT, CAP_WRITE);
159 ofp = file(argv[1], "w");
161 cap_rights_set(&rights, CAP_IOCTL);
162 if (cap_rights_limit(fileno(ofp), &rights) < 0 && errno != ENOSYS) {
163 err(1, "unable to limit rights for %s",
164 argc > 1 ? argv[1] : "stdout");
166 if (cap_rights_is_set(&rights, CAP_IOCTL)) {
169 cmd = TIOCGETA; /* required by isatty(3) in printf(3) */
171 if (cap_ioctls_limit(fileno(ofp), &cmd, 1) < 0 &&
173 err(1, "unable to limit ioctls for %s",
174 argc > 1 ? argv[1] : "stdout");
179 if (cap_enter() < 0 && errno != ENOSYS)
180 err(1, "unable to enter capability mode");
182 prevbuflen = thisbuflen = 0;
183 prevline = thisline = NULL;
185 if (getline(&prevline, &prevbuflen, ifp) < 0) {
190 tprev = convert(prevline);
193 while (getline(&thisline, &thisbuflen, ifp) >= 0) {
196 tthis = convert(thisline);
198 if (tthis == NULL && tprev == NULL)
199 comp = inlcmp(thisline, prevline);
200 else if (tthis == NULL || tprev == NULL)
203 comp = wcscoll(tthis, tprev);
206 /* If different, print; set previous to new value. */
211 prevbuflen = thisbuflen;
229 convert(const char *str)
232 wchar_t *buf, *ret, *p;
234 if ((n = mbstowcs(NULL, str, 0)) == (size_t)-1)
236 if (SIZE_MAX / sizeof(*buf) < n + 1)
237 errx(1, "conversion buffer length overflow");
238 if ((buf = malloc((n + 1) * sizeof(*buf))) == NULL)
240 if (mbstowcs(buf, str, n + 1) != n)
241 errx(1, "internal mbstowcs() error");
242 /* The last line may not end with \n. */
243 if (n > 0 && buf[n - 1] == L'\n')
246 /* If requested get the chosen fields + character offsets. */
247 if (numfields || numchars) {
248 if ((ret = wcsdup(skip(buf))) == NULL)
255 for (p = ret; *p != L'\0'; p++)
263 inlcmp(const char *s1, const char *s2)
270 c1 = (unsigned char)*s1;
271 c2 = (unsigned char)*(s2 - 1);
272 /* The last line may not end with \n. */
282 * Output a line depending on the flags and number of repetitions
286 show(FILE *ofp, const char *str)
289 if ((dflag && repeats == 0) || (uflag && repeats > 0))
292 (void)fprintf(ofp, "%4d %s", repeats + 1, str);
294 (void)fprintf(ofp, "%s", str);
302 for (nfields = 0; *str != L'\0' && nfields++ != numfields; ) {
303 while (iswblank(*str))
305 while (*str != L'\0' && !iswblank(*str))
308 for (nchars = numchars; nchars-- && *str != L'\0'; ++str)
314 file(const char *name, const char *mode)
318 if ((fp = fopen(name, mode)) == NULL)
324 obsolete(char *argv[])
327 char *ap, *p, *start;
329 while ((ap = *++argv)) {
330 /* Return if "--" or not an option of any form. */
334 } else if (ap[1] == '-')
336 if (!isdigit((unsigned char)ap[1]))
339 * Digit signifies an old-style option. Malloc space for dash,
340 * new option and argument.
343 if ((start = p = malloc(len + 3)) == NULL)
346 *p++ = ap[0] == '+' ? 's' : 'f';
347 (void)strcpy(p, ap + 1);
355 (void)fprintf(stderr,
356 "usage: uniq [-c] [-d | -u] [-i] [-f fields] [-s chars] [input [output]]\n");