busybox/coreutils/uniq.c

126 lines
3.1 KiB
C
Raw Normal View History

/* vi: set sw=4 ts=4: */
/*
2003-03-19 14:43:01 +05:30
* uniq implementation for busybox
*
2003-03-19 14:43:01 +05:30
* Copyright (C) 2003 Manuel Novoa III <mjn3@codepoet.org>
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*
*/
2003-03-19 14:43:01 +05:30
/* BB_AUDIT SUSv3 compliant */
/* http://www.opengroup.org/onlinepubs/007904975/utilities/uniq.html */
#include <stdio.h>
#include <stdlib.h>
2003-03-19 14:43:01 +05:30
#include <string.h>
#include <ctype.h>
#include <unistd.h>
#include "busybox.h"
2003-03-19 14:43:01 +05:30
#include "libcoreutils/coreutils.h"
static const char uniq_opts[] = "f:s:cdu\0\7\3\5\1\2\4";
static FILE *xgetoptfile_sort_uniq_s(char **argv, const char *mode)
{
const char *n;
if ((n = *argv) != NULL) {
if ((*n != '-') || n[1]) {
return bb_xfopen(n, mode);
}
}
return (*mode == 'r') ? stdin : stdout;
}
int uniq_main(int argc, char **argv)
{
2003-03-19 14:43:01 +05:30
FILE *in, *out;
/* Note: Ignore the warning about dups and e0 being used uninitialized.
* They will be initialized on the fist pass of the loop (since s0 is NULL). */
#warning The dups and e0 warnings are OK, ignore them
2003-03-19 14:43:01 +05:30
unsigned long dups, skip_fields, skip_chars, i;
const char *s0, *e0, *s1, *e1, *input_filename;
2003-03-19 14:43:01 +05:30
int opt;
int uniq_flags = 6; /* -u */
2003-03-19 14:43:01 +05:30
skip_fields = skip_chars = 0;
while ((opt = getopt(argc, argv, uniq_opts)) > 0) {
if (opt == 'f') {
skip_fields = bb_xgetularg10(optarg);
} else if (opt == 's') {
skip_chars = bb_xgetularg10(optarg);
} else if ((s0 = strchr(uniq_opts, opt)) != NULL) {
uniq_flags &= s0[4];
uniq_flags |= s0[7];
} else {
bb_show_usage();
}
}
2003-03-19 14:43:01 +05:30
input_filename = *(argv += optind);
in = xgetoptfile_sort_uniq_s(argv, "r");
if (*argv) {
++argv;
}
out = xgetoptfile_sort_uniq_s(argv, "w");
if (*argv && argv[1]) {
bb_show_usage();
}
2003-03-19 14:43:01 +05:30
s0 = NULL;
2000-01-07 05:19:21 +05:30
2003-03-19 14:43:01 +05:30
/* gnu uniq ignores newlines */
while ((s1 = bb_get_chomped_line_from_file(in)) != NULL) {
e1 = s1;
2003-03-19 14:43:01 +05:30
for (i=skip_fields ; i ; i--) {
e1 = bb_skip_whitespace(e1);
while (*e1 && !isspace(*e1)) {
++e1;
}
2003-03-19 14:43:01 +05:30
}
for (i = skip_chars ; *e1 && i ; i--) {
++e1;
}
if (s0) {
if (strcmp(e0, e1) == 0) {
2003-03-19 14:43:01 +05:30
++dups; /* Note: Testing for overflow seems excessive. */
continue;
}
DO_LAST:
if ((dups && (uniq_flags & 2)) || (!dups && (uniq_flags & 4))) {
bb_fprintf(out, "\0%7d\t" + (uniq_flags & 1), dups + 1);
bb_fprintf(out, "%s\n", s0);
2003-03-19 14:43:01 +05:30
}
free((void *)s0);
}
s0 = s1;
e0 = e1;
dups = 0;
2003-03-19 14:43:01 +05:30
}
if (s0) {
e1 = NULL;
goto DO_LAST;
}
2000-01-07 05:19:21 +05:30
2003-03-19 14:43:01 +05:30
bb_xferror(in, input_filename);
bb_fflush_stdout_and_exit(EXIT_SUCCESS);
}