Return to uupoll.c CVS log

Up to [CSRG BSD Unix] / 42BSD / usr.bin / uucp

Annotation of 42BSD/usr.bin/uucp/uupoll.c, revision 1.1.1.1

1.1       root        1: #ifndef lint
                      2: static char sccsid[] = "@(#)uupoll.c   5.1 (Berkeley) 7/2/83";
                      3: #endif
                      4: 
                      5: /*
                      6:  * Poll named system(s).
                      7:  *
                      8:  * The poll occurs even if recent attempts have failed,
                      9:  * but not if L.sys prohibits the call (e.g. wrong time of day).
                     10:  *
                     11:  * AUTHOR
                     12:  *     Tom Truscott (rti!trt)
                     13:  */
                     14: 
                     15: #include "uucp.h"
                     16: 
                     17: main(argc, argv)
                     18: register int argc;
                     19: register char **argv;
                     20: {
                     21:        if (argc < 2) {
                     22:                fprintf(stderr, "usage: uupoll system ...\n");
                     23:                cleanup(1);
                     24:        }
                     25: 
                     26:        chdir(Spool);
                     27:        strcpy(Progname, "uupoll");
                     28:        uucpname(Myname);
                     29: 
                     30:        for (--argc, ++argv; argc > 0; --argc, ++argv) {
                     31:                if (strcmp(argv[0], Myname) == SAME) {
                     32:                        fprintf(stderr, "This *is* %s!\n", Myname);
                     33:                        continue;
                     34:                }
                     35: 
                     36:                if (versys(argv[0])) {
                     37:                        fprintf(stderr, "%s: unknown system.\n", argv[0]);
                     38:                        continue;
                     39:                }
                     40:                /* Remove any STST file that might stop the poll */
                     41:                rmstat(argv[0]);
                     42:                /* Attempt the call */
                     43:                xuucico(argv[0]);
                     44:        }
                     45:        cleanup(0);
                     46: }
                     47: 
                     48: cleanup(code)
                     49: int code;
                     50: {
                     51:        exit(code);
                     52: }

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