Return to lcasep.c CVS log

Up to [MW Coherent from dump] / coherent / a / tmp / smail / utils

Annotation of coherent/a/tmp/smail/utils/lcasep.c, revision 1.1.1.1

1.1       root        1: /*
                      2: ** convert the host name on a pathalias line to lower case
                      3: */
                      4: 
                      5: #ifndef lint
                      6: static char    *sccsid="@(#)lcasep.c   2.5 (smail) 9/15/87";
                      7: #endif
                      8: 
                      9: #include <stdio.h>
                     10: #include <ctype.h>
                     11: 
                     12: # define lower(c)              ( isupper(c) ? c-'A'+'a' : c )
                     13: 
                     14: void exit(), perror();
                     15: 
                     16: main(argc, argv)
                     17: int argc;
                     18: char *argv[];
                     19: {
                     20:        FILE *ifp, *ofp;
                     21:        char buf[BUFSIZ];
                     22:        register char *p;
                     23:        int c;
                     24: 
                     25:        extern int optind;
                     26:        extern char *optarg;
                     27: 
                     28:        ifp = stdin;
                     29:        ofp = stdout;
                     30: 
                     31:        while((c = getopt(argc, argv, "f:o:")) != EOF) {
                     32:                switch(c) {
                     33:                case 'f':
                     34:                        if((ifp = fopen(optarg, "r")) == NULL) {
                     35:                                (void) fprintf(stderr, "%s: can't open %s: ",
                     36:                                        argv[0], optarg);
                     37:                                perror("");
                     38:                                exit(1);
                     39:                        }
                     40:                        break;
                     41:                case 'o':
                     42:                        if((ofp = fopen(optarg, "w")) == NULL) {
                     43:                                (void) fprintf(stderr, "%s: can't open %s: ",
                     44:                                        argv[0], optarg);
                     45:                                perror("");
                     46:                                exit(1);
                     47:                        }
                     48:                        break;
                     49:                default:
                     50:                        (void) fprintf(stderr,
                     51:                                "usage: %s [-f file] [-o outfile]\n", argv[0]);
                     52:                        exit(1);
                     53:                        /* NOTREACHED */
                     54:                        break;
                     55:                }
                     56:        }
                     57: 
                     58:        while(fgets(buf, sizeof(buf), ifp) != NULL) {
                     59:                for(p = buf; *p != '\t' && *p != '\0' ; p++) {
                     60:                        (void) fputc(lower(*p), ofp);
                     61:                }
                     62:                (void) fputs(p, ofp);
                     63:        }
                     64:        return(0);
                     65: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.