home *** CD-ROM | disk | FTP | other *** search
/ CP/M / CPM_CDROM.iso / lambda / soundpot / p / ut-c.lbr / WC.CZ / WC.C
Encoding:
C/C++ Source or Header  |  1993-10-25  |  1.0 KB  |  44 lines
  1. /*  wc.c -- UTOOL. Count lines, words and characters in 
  2.      standard input.  Can handle Wordstar doc files. 
  3.  
  4.      author: David H. Wolen
  5.      last change: 9/9/82
  6.  
  7.      usage: wc <infile
  8.  
  9.      input:   STDIN
  10.      output:  STDOUT
  11.   
  12.      linkage: a:clink wc -f dio -ca
  13. */
  14.  
  15. #include "a:bdscio.h"
  16. #define  STDOUT  1
  17.  
  18. main(argc,argv)
  19. int  argc;
  20. char *argv;
  21. {
  22.      int  c, inword;
  23.      unsigned  nl, nw, nc;
  24.  
  25.      dioinit(&argc,argv);
  26.      nl=nw=nc=0;
  27.      inword=FALSE;
  28.  
  29.      while( (c=getchar()) != EOF)
  30.           {c &= 0177;    /* WS doc hi bit */
  31.           nc++;
  32.           if(c=='\n')  nl++;
  33.           if(c==' ' || c=='\n' || c=='\t')
  34.                inword=FALSE;
  35.           else if (!inword)
  36.                {inword=TRUE;
  37.                nw++;
  38.                }
  39.           }
  40.  
  41.      fprintf(STDOUT,"lines=%u words=%u chars=%u\n",nl,nw,nc);
  42.      dioflush();
  43. }
  44.