Return to uutouch.c CVS log

Up to [MW Coherent from dump] / coherent / a / usr / bob / uusrc / src

Annotation of coherent/a/usr/bob/uusrc/src/uutouch.c, revision 1.1

1.1     ! root        1: /*
        !             2:  *  uutouch.c
        !             3:  *
        !             4:  *  Force a command file to the given site which will trigger the need
        !             5:  *  for a call the next "uucico -sany".
        !             6:  */
        !             7: 
        !             8: #include <stdio.h>
        !             9: #include "dcp.h"
        !            10: 
        !            11: extern int optopt, optind;
        !            12: char   ctlfil[BUFSIZ];
        !            13: 
        !            14: main(argc, argv)
        !            15: int argc;
        !            16: char *argv[];
        !            17: {
        !            18:        int ch, fd, error=0;
        !            19:        char *arg;
        !            20: 
        !            21:        while ( (ch=getopt(argc, argv, "vV")) != EOF ) {
        !            22:                switch (ch) {
        !            23:                case 'v':
        !            24:                case 'V':
        !            25:                        fatal("uutouch: Version %s", VERSION);
        !            26:                default:
        !            27:                        fatal("Improper option usage: %c", optopt);
        !            28:                }
        !            29:        }
        !            30:        for (;optind<argc; optind++) {
        !            31:                arg = argv[optind];
        !            32:                if ( !knowhost(arg) ) {
        !            33:                        nonfatal("Host \"%s\" unknown", arg);
        !            34:                        error++;
        !            35:                } else {
        !            36:                        sprintf(ctlfil, "%s/%s", SPOOLDIR, arg);
        !            37:                        if ( !ckdir(ctlfil) ) {
        !            38:                                nonfatal("Unable to create directory: %s",
        !            39:                                                                ctlfil);
        !            40:                                error++;
        !            41:                                continue;
        !            42:                        }
        !            43:                        sprintf(ctlfil, "%s/%s/C.%.*s0", SPOOLDIR, arg,
        !            44:                                                        SITESIG, arg);
        !            45:                        if ( (fd=creat(ctlfil, 0600)) < 0 ) {
        !            46:                                nonfatal("Unable to create file: %s", ctlfil);
        !            47:                                error++;
        !            48:                        } else
        !            49:                                close(fd);
        !            50:                }
        !            51:        }
        !            52:        exit(error);
        !            53: }
        !            54: 

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