|
|
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.