hush/coreutils/uniq.c

104 lines
2.0 KiB
C
Raw Normal View History

/* vi: set sw=4 ts=4: */
/*
2003-03-19 09:13:01 +00:00
* uniq implementation for busybox
*
* Copyright (C) 2005 Manuel Novoa III <mjn3@codepoet.org>
*
* Licensed under the GPL v2 or later, see the file LICENSE in this tarball.
*/
2003-03-19 09:13:01 +00:00
/* BB_AUDIT SUSv3 compliant */
/* http://www.opengroup.org/onlinepubs/007904975/utilities/uniq.html */
#include "libbb.h"
static const char uniq_opts[] ALIGN1 = "cdu" "f:s:" "cdu\0\1\2\4";
static FILE *xgetoptfile_uniq_s(char **argv, int read0write2)
{
const char *n;
2007-03-31 10:19:11 +00:00
n = *argv;
if (n != NULL) {
if ((*n != '-') || n[1]) {
return xfopen(n, "r\0w" + read0write2);
}
}
return (read0write2) ? stdout : stdin;
}
int uniq_main(int argc, char **argv);
int uniq_main(int argc, char **argv)
{
2003-03-19 09:13:01 +00:00
FILE *in, *out;
2007-03-31 10:19:11 +00:00
unsigned long dups, skip_fields, skip_chars, i;
const char *s0, *e0, *s1, *e1, *input_filename;
2007-03-31 10:19:11 +00:00
unsigned opt;
2007-03-31 10:19:11 +00:00
enum {
OPT_c = 0x1,
OPT_d = 0x2,
OPT_u = 0x4,
OPT_f = 0x8,
OPT_s = 0x10,
};
2003-03-19 09:13:01 +00:00
2007-03-31 10:19:11 +00:00
skip_fields = skip_chars = 0;
opt = getopt32(argv, "cduf:s:", &s0, &s1);
2007-03-31 10:19:11 +00:00
if (opt & OPT_f)
skip_fields = xatoul(s0);
if (opt & OPT_s)
skip_chars = xatoul(s1);
argv += optind;
2007-03-31 10:19:11 +00:00
input_filename = *argv;
2003-03-19 09:13:01 +00:00
in = xgetoptfile_uniq_s(argv, 0);
if (*argv) {
++argv;
}
out = xgetoptfile_uniq_s(argv, 2);
if (*argv && argv[1]) {
bb_show_usage();
}
2003-03-19 09:13:01 +00:00
s1 = e1 = NULL; /* prime the pump */
do {
s0 = s1;
e0 = e1;
dups = 0;
2000-01-06 23:49:21 +00:00
/* gnu uniq ignores newlines */
while ((s1 = xmalloc_getline(in)) != NULL) {
e1 = s1;
2006-10-26 23:21:47 +00:00
for (i = skip_fields; i; i--) {
e1 = skip_whitespace(e1);
e1 = skip_non_whitespace(e1);
}
2006-10-26 23:21:47 +00:00
for (i = skip_chars; *e1 && i; i--) {
++e1;
}
if (!s0 || strcmp(e0, e1)) {
break;
}
++dups; /* Note: Testing for overflow seems excessive. */
2003-03-19 09:13:01 +00:00
}
if (s0) {
2007-03-31 10:19:11 +00:00
if (!(opt & (OPT_d << !!dups))) { /* (if dups, opt & OPT_e) */
fprintf(out, "\0%d " + (opt & 1), dups + 1);
2006-10-26 23:21:47 +00:00
fprintf(out, "%s\n", s0);
2003-03-19 09:13:01 +00:00
}
free((void *)s0);
}
} while (s1);
2000-01-06 23:49:21 +00:00
2006-10-26 23:21:47 +00:00
die_if_ferror(in, input_filename);
2003-03-19 09:13:01 +00:00
2006-10-26 23:21:47 +00:00
fflush_stdout_and_exit(EXIT_SUCCESS);
}