coreutils/wc.c

   1 /* vi: set sw=4 ts=4: */
   2 /*
   3  * Mini wc implementation for busybox
   4  *
   5  * Copyright (C) 2000  Edward Betts <edward@debian.org>
   6  *
   7  * This program is free software; you can redistribute it and/or modify
   8  * it under the terms of the GNU General Public License as published by
   9  * the Free Software Foundation; either version 2 of the License, or
  10  * (at your option) any later version.
  11  *
  12  * This program is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  15  * General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU General Public License
  18  * along with this program; if not, write to the Free Software
  19  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
  20  *
  21  */
  22
  23 #include "busybox.h"
  24 #include <stdio.h>
  25 #include <getopt.h>
  26 #include <stdlib.h>
  27
  28 static int total_lines, total_words, total_chars, max_length;
  29 static int print_lines, print_words, print_chars, print_length;
  30
  31 void print_counts(int lines, int words, int chars, int length,
  32                                   const char *name)
  33 {
  34         char const *space = "";
  35
  36         if (print_lines) {
  37                 printf("%7d", lines);
  38                 space = " ";
  39         }
  40         if (print_words) {
  41                 printf("%s%7d", space, words);
  42                 space = " ";
  43         }
  44         if (print_chars) {
  45                 printf("%s%7d", space, chars);
  46                 space = " ";
  47         }
  48         if (print_length)
  49                 printf("%s%7d", space, length);
  50         if (*name)
  51                 printf(" %s", name);
  52         putchar('\n');
  53 }
  54
  55 static void wc_file(FILE * file, const char *name)
  56 {
  57         int lines, words, chars, length;
  58         int in_word = 0, linepos = 0;
  59         int c;
  60
  61         lines = words = chars = length = 0;
  62         while ((c = getc(file)) != EOF) {
  63                 chars++;
  64                 switch (c) {
  65                 case '\n':
  66                         lines++;
  67                 case '\r':
  68                 case '\f':
  69                         if (linepos > length)
  70                                 length = linepos;
  71                         linepos = 0;
  72                         goto word_separator;
  73                 case '\t':
  74                         linepos += 8 - (linepos % 8);
  75                         goto word_separator;
  76                 case ' ':
  77                         linepos++;
  78                 case '\v':
  79                   word_separator:
  80                         if (in_word) {
  81                                 in_word = 0;
  82                                 words++;
  83                         }
  84                         break;
  85                 default:
  86                         linepos++;
  87                         in_word = 1;
  88                         break;
  89                 }
  90         }
  91         if (linepos > length)
  92                 length = linepos;
  93         if (in_word)
  94                 words++;
  95         print_counts(lines, words, chars, length, name);
  96         total_lines += lines;
  97         total_words += words;
  98         total_chars += chars;
  99         if (length > max_length)
 100                 max_length = length;
 101         fclose(file);
 102         fflush(stdout);
 103 }
 104
 105 int wc_main(int argc, char **argv)
 106 {
 107         FILE *file;
 108         unsigned int num_files_counted = 0;
 109         int opt, status = EXIT_SUCCESS;
 110
 111         total_lines = total_words = total_chars = max_length = 0;
 112         print_lines = print_words = print_chars = print_length = 0;
 113
 114         while ((opt = getopt(argc, argv, "clLw")) > 0) {
 115                         switch (opt) {
 116                         case 'c':
 117                                 print_chars = 1;
 118                                 break;
 119                         case 'l':
 120                                 print_lines = 1;
 121                                 break;
 122                         case 'L':
 123                                 print_length = 1;
 124                                 break;
 125                         case 'w':
 126                                 print_words = 1;
 127                                 break;
 128                         default:
 129                                 usage(wc_usage);
 130                         }
 131         }
 132
 133         if (!print_lines && !print_words && !print_chars && !print_length)
 134                 print_lines = print_words = print_chars = 1;
 135
 136         if (argv[optind] == NULL || strcmp(argv[optind], "-") == 0) {
 137                 wc_file(stdin, "");
 138                 return EXIT_SUCCESS;
 139         } else {
 140                 while (optind < argc) {
 141                         if ((file = wfopen(argv[optind], "r")) != NULL)
 142                                 wc_file(file, argv[optind]);
 143                         else
 144                                 status = EXIT_FAILURE;
 145                         num_files_counted++;
 146                         optind++;
 147                 }
 148         }
 149
 150         if (num_files_counted > 1)
 151                 print_counts(total_lines, total_words, total_chars,
 152                                          max_length, "total");
 153
 154         return status;
 155 }