hush/coreutils/wc.c
2001-12-20 21:11:59 +00:00

179 lines
3.7 KiB
C

/* vi: set sw=4 ts=4: */
/*
* Mini wc implementation for busybox
*
* Copyright (C) 2000 Edward Betts <edward@debian.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
*
*/
#include <stdio.h>
#include <getopt.h>
#include <string.h>
#include <stdlib.h>
#include "busybox.h"
enum print_e {
print_lines = 1,
print_words = 2,
print_chars = 4,
print_length = 8
};
static unsigned int total_lines = 0;
static unsigned int total_words = 0;
static unsigned int total_chars = 0;
static unsigned int max_length = 0;
static char print_type = 0;
static void print_counts(const unsigned int lines, const unsigned int words,
const unsigned int chars, const unsigned int length, const char *name)
{
int output = 0;
if (print_type & print_lines) {
printf("%7d", lines);
output++;
}
if (print_type & print_words) {
if (output++)
putchar(' ');
printf("%7d", words);
}
if (print_type & print_chars) {
if (output++)
putchar(' ');
printf("%7d", chars);
}
if (print_type & print_length) {
if (output++)
putchar(' ');
printf("%7d", length);
}
if (*name) {
printf(" %s", name);
}
putchar('\n');
}
static void wc_file(FILE * file, const char *name)
{
unsigned int lines = 0;
unsigned int words = 0;
unsigned int chars = 0;
unsigned int length = 0;
unsigned int linepos = 0;
char in_word = 0;
int c;
while ((c = getc(file)) != EOF) {
chars++;
switch (c) {
case '\n':
lines++;
case '\r':
case '\f':
if (linepos > length)
length = linepos;
linepos = 0;
goto word_separator;
case '\t':
linepos += 8 - (linepos % 8);
goto word_separator;
case ' ':
linepos++;
case '\v':
word_separator:
if (in_word) {
in_word = 0;
words++;
}
break;
default:
linepos++;
in_word = 1;
break;
}
}
if (linepos > length) {
length = linepos;
}
if (in_word) {
words++;
}
print_counts(lines, words, chars, length, name);
total_lines += lines;
total_words += words;
total_chars += chars;
if (length > max_length) {
max_length = length;
}
}
int wc_main(int argc, char **argv)
{
int opt;
while ((opt = getopt(argc, argv, "clLw")) > 0) {
switch (opt) {
case 'c':
print_type |= print_chars;
break;
case 'l':
print_type |= print_lines;
break;
case 'L':
print_type |= print_length;
break;
case 'w':
print_type |= print_words;
break;
default:
show_usage();
}
}
if (print_type == 0) {
print_type = print_lines | print_words | print_chars;
}
if (argv[optind] == NULL || strcmp(argv[optind], "-") == 0) {
wc_file(stdin, "");
} else {
unsigned short num_files_counted = 0;
while (optind < argc) {
if (print_type == print_chars) {
struct stat statbuf;
stat(argv[optind], &statbuf);
print_counts(0, 0, statbuf.st_size, 0, argv[optind]);
total_chars += statbuf.st_size;
} else {
FILE *file;
file = xfopen(argv[optind], "r");
wc_file(file, argv[optind]);
fclose(file);
}
optind++;
num_files_counted++;
}
if (num_files_counted > 1) {
print_counts(total_lines, total_words, total_chars, max_length, "total");
}
}
return(EXIT_SUCCESS);
}