![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to uustat.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Research Unix] / researchv10no / cmd / uucp|
Return to uustat.c CVS log | Up to [Research Unix] / researchv10no / cmd / uucp |
1.1 ! root 1: /* @(#)uustat.c 1.14 ! 2: */ ! 3: #include "uucp.h" ! 4: VERSION(@(#)uustat.c 1.14) ! 5: ! 6: #ifdef V7 ! 7: #define O_RDONLY 0 ! 8: #endif ! 9: ! 10: #define USAGE1 "[-a] [-q] or [-m] or [-kJOB] or [-rJOB] or [-p]" ! 11: #define USAGE2 "[-sSYSTEM] [-uUSER]" ! 12: ! 13: #define STST_MAX 132 ! 14: struct m { ! 15: char mach[15]; /* machine name */ ! 16: char locked; ! 17: int ccount, xcount; ! 18: int count, type; ! 19: long retrytime; ! 20: time_t lasttime; ! 21: short c_age; /* age of oldest C. file */ ! 22: short x_age; /* age of oldest X. file */ ! 23: char stst[STST_MAX]; ! 24: } M[UUSTAT_TBL+2]; ! 25: ! 26: extern long atol(); ! 27: extern void qsort(); /* qsort(3) and comparison test */ ! 28: int sortcnt = -1; ! 29: extern int machcmp(); ! 30: extern int _age(); /* find the age of a file */ ! 31: ! 32: extern char Jobid[]; /* jobid for status or kill option */ ! 33: short Kill; /* == 1 if -k specified */ ! 34: short Rejuvenate; /* == 1 for -r specified */ ! 35: short Uopt; /* == 1 if -u option specified */ ! 36: short Sysopt; /* == 1 if -s option specified */ ! 37: short Summary; /* == 1 if -q or -m is specified */ ! 38: short Queue; /* == 1 if -q option set - queue summary */ ! 39: short Machines; /* == 1 if -m option set - machines summary */ ! 40: short Psopt; /* == 1 if -p option set - output "ps" of LCK pids */ ! 41: ! 42: main(argc, argv, envp) ! 43: char *argv[]; ! 44: char **envp; ! 45: { ! 46: struct m *m, *machine(); ! 47: DIR *spooldir, *subdir; ! 48: char *str, *strrchr(); ! 49: char f[256], subf[256]; ! 50: char *c, lckdir[BUFSIZ]; ! 51: char buf[BUFSIZ]; ! 52: char chkname[MAXFULLNAME]; ! 53: char *vec[7]; ! 54: int i, chkid; ! 55: ! 56: ! 57: User[0] = '\0'; ! 58: Rmtname[0] = '\0'; ! 59: Jobid[0] = '\0'; ! 60: Psopt=Machines=Summary=Queue=Kill=Rejuvenate=Uopt=Sysopt=0; ! 61: (void) strcpy(Progname, "uustat"); ! 62: Uid = getuid(); ! 63: Euid = geteuid(); ! 64: guinfo(Uid, Loginuser); ! 65: uucpname(Myname); ! 66: while ((i = getopt(argc, argv, "ak:mpr:qs:u:x:")) != EOF) { ! 67: switch(i){ ! 68: case 'a': ! 69: Sysopt = 1; ! 70: break; ! 71: case 'k': ! 72: (void) strncpy(Jobid, optarg, NAMESIZE); ! 73: Jobid[NAMESIZE] = '\0'; ! 74: Kill = 1; ! 75: break; ! 76: case 'm': ! 77: Machines = Summary = 1; ! 78: break; ! 79: case 'p': ! 80: Psopt = 1; ! 81: break; ! 82: case 'r': ! 83: (void) strncpy(Jobid, optarg, NAMESIZE); ! 84: Jobid[NAMESIZE] = '\0'; ! 85: Rejuvenate = 1; ! 86: break; ! 87: case 'q': ! 88: Queue = Summary = 1; ! 89: break; ! 90: case 's': ! 91: (void) strncpy(Rmtname, optarg, MAXBASENAME); ! 92: Rmtname[MAXBASENAME] = '\0'; ! 93: #if NOTDEF ! 94: if (versys(Rmtname, 0)) { ! 95: fprintf(stderr, "Invalid system\n"); ! 96: exit(1); ! 97: } ! 98: #endif ! 99: Sysopt = 1; ! 100: break; ! 101: case 'u': ! 102: (void) strncpy(User, optarg, 8); ! 103: User[8] = '\0'; ! 104: if(gninfo(User, &chkid, chkname)) { ! 105: fprintf(stderr, "Invalid user\n"); ! 106: exit(1); ! 107: } ! 108: Uopt = 1; ! 109: break; ! 110: case 'x': ! 111: Debug = atoi(optarg); ! 112: if (Debug <= 0) ! 113: Debug = 1; ! 114: break; ! 115: default: ! 116: (void) fprintf(stderr, "\tusage: %s %s\n", ! 117: Progname, USAGE1); ! 118: (void) fprintf(stderr, "or\n\tusage: %s %s\n", ! 119: Progname, USAGE2); ! 120: exit(1); ! 121: } ! 122: } ! 123: ! 124: if (argc != optind) { ! 125: (void) fprintf(stderr, "\tusage: %s %s\n", Progname, USAGE1); ! 126: (void) fprintf(stderr, "or\n\tusage: %s %s\n", ! 127: Progname, USAGE2); ! 128: exit(1); ! 129: } ! 130: ! 131: DEBUG(9, "Progname (%s): STARTED\n", Progname); ! 132: DEBUG(9, "User=%s, ", User); ! 133: DEBUG(9, "Loginuser=%s, ", Loginuser); ! 134: DEBUG(9, "Jobid=%s, ", Jobid); ! 135: DEBUG(9, "Rmtname=%s\n", Rmtname); ! 136: ! 137: if ((Psopt + Machines + Queue + Kill + Rejuvenate + (Uopt|Sysopt)) >1) { ! 138: /* only -u and -s can be used together */ ! 139: printf("\tusage: %s %s\n", Progname, USAGE1); ! 140: printf("or\n\tusage: %s %s\n", Progname, USAGE2); ! 141: exit(1); ! 142: } ! 143: if ( !(Kill | Rejuvenate | Uopt | Sysopt | Queue | Machines) ) { ! 144: (void) strcpy(User, Loginuser); ! 145: Uopt = 1; ! 146: } ! 147: ! 148: if (Psopt) { ! 149: /* do "ps -flp" or pids in LCK files */ ! 150: lckpid(); ! 151: /* lckpid will not return */ ! 152: } ! 153: ! 154: if (Summary) { ! 155: /* Gather data for Summary option report */ ! 156: if (chdir(STATDIR) || (spooldir = opendir(STATDIR)) == NULL) ! 157: exit(101); /* good old code 101 */ ! 158: while (gnamef(spooldir, f) == TRUE) { ! 159: if (freopen(f, "r", stdin) == NULL) ! 160: continue; ! 161: m = machine(f); ! 162: if (fgets(buf, sizeof(buf), stdin) == NULL) ! 163: continue; ! 164: if ((str = strchr(buf, '\n')) != NULL) ! 165: *str = 0; ! 166: if (getargs(buf, vec, 5) < 5) ! 167: continue; ! 168: m->type = atoi(vec[0]); ! 169: m->count = atoi(vec[1]); ! 170: m->lasttime = atol(vec[2]); ! 171: m->retrytime = atol(vec[3]); ! 172: (void) strncpy(m->stst, vec[4], STST_MAX); ! 173: str = strrchr(m->stst, ' '); ! 174: (void) machine(++str); /* longer name? */ ! 175: *str = '\0'; ! 176: ! 177: } ! 178: closedir(spooldir); ! 179: } ! 180: ! 181: ! 182: if (Summary) { ! 183: /* search for LCK machines */ ! 184: ! 185: (void) strcpy(lckdir, LOCKPRE); ! 186: *strrchr(lckdir, '/') = '\0'; ! 187: /* open lock directory */ ! 188: if (chdir(lckdir) != 0 || (subdir = opendir(lckdir)) == NULL) ! 189: exit(101); /* good old code 101 */ ! 190: ! 191: while (gnamef(subdir, f) == TRUE) { ! 192: if (EQUALSN("LCK..", f, 5)) { ! 193: if (!EQUALSN(f + 5, "cul", 3) ! 194: && !EQUALSN(f + 5, "tty", 3) ! 195: && !EQUALSN(f + 5, "dtsw", 4) ! 196: && !EQUALSN(f + 5, "vadic", 5) ! 197: && !EQUALSN(f + 5, "micom", 5)) ! 198: machine(f + 5)->locked++; ! 199: } ! 200: } ! 201: } ! 202: ! 203: if (chdir(SPOOL) != 0 || (spooldir = opendir(SPOOL)) == NULL) ! 204: exit(101); /* good old code 101 */ ! 205: while (gnamef(spooldir, f) == TRUE) { ! 206: if (EQUALSN("LCK..", f, 5)) ! 207: continue; ! 208: ! 209: if (*Rmtname && !EQUALSN(Rmtname, f, SYSNSIZE)) ! 210: continue; ! 211: ! 212: if ( (Kill || Rejuvenate) ! 213: && (!EQUALSN(f, Jobid, strlen(Jobid)-5)) ) ! 214: continue; ! 215: ! 216: if (DIRECTORY(f) && (subdir = opendir(f))) { ! 217: m = machine(f); ! 218: while (gnamef(subdir, subf) == TRUE) ! 219: if (subf[1] == '.') { ! 220: if (subf[0] == CMDPRE) { ! 221: m->ccount++; ! 222: if (Kill || Rejuvenate) ! 223: kprocessC(f, subf); ! 224: else if (Uopt | Sysopt) ! 225: uprocessC(f, subf); ! 226: else /* get the age of the C. file */ ! 227: if ( (i = _age(f, subf))>m->c_age) ! 228: m->c_age = i; ! 229: } ! 230: ! 231: else if (subf[0] == XQTPRE) { ! 232: m->xcount++; ! 233: if ( (i = _age(f, subf)) > m->x_age) ! 234: m->x_age = i; ! 235: } ! 236: ! 237: } ! 238: closedir(subdir); ! 239: } ! 240: } ! 241: /* for Kill or Rejuvenate - will not get here unless it failed */ ! 242: if (Kill || Rejuvenate) { ! 243: printf("Can't find Job %s; Not %s\n", Jobid, ! 244: Kill ? "killed" : "rejuvenated"); ! 245: exit(1); ! 246: } ! 247: ! 248: /* Make sure the overflow entry is null since it may be incorrect */ ! 249: M[UUSTAT_TBL].mach[0] = NULLCHAR; ! 250: if (Summary) { ! 251: for((sortcnt = 0, m = &M[0]);*(m->mach) != NULL;(sortcnt++,m++)) ! 252: ; ! 253: qsort((char *)M, (unsigned int)sortcnt, sizeof(struct m), machcmp); ! 254: for (m = M; m->mach[0] != NULLCHAR; m++) ! 255: printit(m); ! 256: } ! 257: exit(0); ! 258: } ! 259: ! 260: ! 261: /* ! 262: * uprocessC - get information about C. file ! 263: * ! 264: */ ! 265: ! 266: uprocessC(dir, file) ! 267: char *file, *dir; ! 268: { ! 269: struct stat s; ! 270: register struct tm *tp; ! 271: char fullname[MAXFULLNAME], buf[BUFSIZ], user[9]; ! 272: char xfullname[MAXFULLNAME]; ! 273: char file1[BUFSIZ], file2[BUFSIZ], file3[BUFSIZ], type[2], opt[256]; ! 274: FILE *fp, *xfp; ! 275: short first = 1; ! 276: extern long fsize(); ! 277: ! 278: DEBUG(9, "uprocessC(%s, ", dir); ! 279: DEBUG(9, "%s);\n", file); ! 280: ! 281: if (Jobid[0] != '\0' && (!EQUALS(Jobid, &file[2])) ) { ! 282: /* kill job - not this one */ ! 283: return; ! 284: } ! 285: ! 286: (void) sprintf(fullname, "%s/%s", dir, file); ! 287: if (stat(fullname, &s) != 0) { ! 288: /* error - can't stat */ ! 289: DEBUG(4, "Can't stat file (%s),", fullname); ! 290: DEBUG(4, " errno (%d) -- skip it!\n", errno); ! 291: } ! 292: ! 293: fp = fopen(fullname, "r"); ! 294: if (fp == NULL) { ! 295: DEBUG(4, "Can't open file (%s), ", fullname); ! 296: DEBUG(4, "errno=%d -- skip it!\n", errno); ! 297: return; ! 298: } ! 299: tp = localtime(&s.st_mtime); ! 300: ! 301: if (s.st_size == 0 && User[0] == '\0') { /* dummy D. for polling */ ! 302: printf("%-12s %2.2d/%2.2d-%2.2d:%2.2d:%2.2d (POLL)\n", ! 303: &file[2], tp->tm_mon + 1, tp->tm_mday, tp->tm_hour, ! 304: tp->tm_min, tp->tm_sec); ! 305: } ! 306: else while (fgets(buf, BUFSIZ, fp) != NULL) { ! 307: if (sscanf(buf,"%s%s%s%s%s%s", type, file1, file2, ! 308: user, opt, file3) <5) { ! 309: DEBUG(4, "short line (%s)\n", buf); ! 310: continue; ! 311: } ! 312: DEBUG(9, "type (%s), ", type); ! 313: DEBUG(9, "file1 (%s)", file1); ! 314: DEBUG(9, "file2 (%s)", file2); ! 315: DEBUG(9, "file3 (%s)", file3); ! 316: DEBUG(9, "user (%s)", user); ! 317: ! 318: if (User[0] != '\0' && (!EQUALS(User, user)) ) ! 319: continue; ! 320: ! 321: /* ! 322: if ( (*file2 != 'X') ! 323: && (*file1 != '/' && *file1 != '~') ! 324: && (*file2 != '/' && *file2!= '~') ) ! 325: continue; ! 326: */ ! 327: ! 328: if (first) ! 329: printf("%-12s %2.2d/%2.2d-%2.2d:%2.2d ", ! 330: &file[2], tp->tm_mon + 1, tp->tm_mday, tp->tm_hour, ! 331: tp->tm_min); ! 332: else ! 333: printf("%-12s %2.2d/%2.2d-%2.2d:%2.2d ", ! 334: "", tp->tm_mon + 1, tp->tm_mday, tp->tm_hour, ! 335: tp->tm_min); ! 336: first = 0; ! 337: ! 338: printf("%s %s ", type, dir); ! 339: if (*type == 'R') ! 340: printf("%s %s\n", user, file1); ! 341: else if (file2[0] != 'X') ! 342: printf("%s %ld %s\n", user, fsize(dir, file3, file1), file1); ! 343: else if (*type == 'S' && file2[0] == 'X') { ! 344: (void) sprintf(xfullname, "%s/%s", dir, file1); ! 345: xfp = fopen(xfullname, "r"); ! 346: if (xfp == NULL) { /* program error */ ! 347: DEBUG(4, "Can't read %s, ", xfullname); ! 348: DEBUG(4, "errno=%d -- skip it!\n", errno); ! 349: printf("%s %s %s ", type, dir, user); ! 350: printf("????\n"); ! 351: } ! 352: else { ! 353: char command[BUFSIZ], uline_u[BUFSIZ], uline_m[BUFSIZ]; ! 354: char retaddr[BUFSIZ], *username; ! 355: ! 356: *retaddr = *uline_u = *uline_m = '\0'; ! 357: while (fgets(buf, BUFSIZ, xfp) != NULL) { ! 358: switch(buf[0]) { ! 359: case 'C': ! 360: strcpy(command, buf + 2); ! 361: break; ! 362: case 'U': ! 363: sscanf(buf + 2, "%s%s", uline_u, uline_m); ! 364: break; ! 365: case 'R': ! 366: sscanf(buf+2, "%s", retaddr); ! 367: break; ! 368: } ! 369: } ! 370: username = user; ! 371: if (*uline_u != '\0') ! 372: username = uline_u; ! 373: if (*retaddr != '\0') ! 374: username = retaddr; ! 375: if (!EQUALS(uline_m, Myname)) ! 376: printf("%s!", uline_m); ! 377: printf("%s %s", username, command); ! 378: } ! 379: if (xfp != NULL) ! 380: fclose(xfp); ! 381: } ! 382: } ! 383: ! 384: fclose(fp); ! 385: return; ! 386: } ! 387: ! 388: ! 389: /* ! 390: * kprocessC - process kill or rejuvenate job ! 391: */ ! 392: ! 393: kprocessC(dir, file) ! 394: char *file, *dir; ! 395: { ! 396: struct stat s; ! 397: register struct tm *tp; ! 398: extern struct tm *localtime(); ! 399: extern int errno; ! 400: char fullname[MAXFULLNAME], buf[BUFSIZ], user[9]; ! 401: char rfullname[MAXFULLNAME]; ! 402: char file1[BUFSIZ], file2[BUFSIZ], file3[BUFSIZ], type[2], opt[256]; ! 403: FILE *fp, *xfp; ! 404: time_t times[2]; ! 405: short ret; ! 406: short first = 1; ! 407: ! 408: DEBUG(9, "kprocessC(%s, ", dir); ! 409: DEBUG(9, "%s);\n", file); ! 410: ! 411: if ((!EQUALS(Jobid, &file[2])) ) { ! 412: /* kill job - not this one */ ! 413: return; ! 414: } ! 415: ! 416: (void) sprintf(fullname, "%s/%s", dir, file); ! 417: if (stat(fullname, &s) != 0) { ! 418: /* error - can't stat */ ! 419: fprintf(stderr, "Can't stat:%s, errno (%d)--can't %s it!\n", ! 420: fullname, errno, Kill ? "kill" : "rejuvenate"); ! 421: exit(1); ! 422: } ! 423: ! 424: fp = fopen(fullname, "r"); ! 425: if (fp == NULL) { ! 426: fprintf(stderr, "Can't read:%s, errno (%d)--can't %s it!\n", ! 427: fullname, errno, Kill ? "kill" : "rejuvenate"); ! 428: exit(1); ! 429: } ! 430: ! 431: times[0] = times[1] = time((time_t *)NULL); ! 432: ! 433: while (fgets(buf, BUFSIZ, fp) != NULL) { ! 434: if (sscanf(buf,"%s%s%s%s%s%s", type, file1, file2, ! 435: user, opt, file3) <6) { ! 436: fprintf(stderr, "Bad format:%s, errno (%d)--can't %s it!\n", ! 437: fullname, errno, Kill ? "kill" : "rejuvenate"); ! 438: exit(1); ! 439: } ! 440: DEBUG(9, "type (%s) ", type); ! 441: DEBUG(9, "file1 (%s) ", file1); ! 442: DEBUG(9, "file2 (%s) ", file2); ! 443: DEBUG(9, "file3 (%s) ", file3); ! 444: DEBUG(9, "user (%s)\n", user); ! 445: ! 446: ! 447: if (first) { ! 448: if (Uid != 0 ! 449: && !PREFIX(Loginuser, user) ! 450: && !PREFIX(user, Loginuser) ) { ! 451: /* not allowed - not owner or root */ ! 452: fprintf(stderr, ! 453: "Not owner or root - can't %s job %s\n", ! 454: Kill ? "kill" : "rejuvenate", Jobid); ! 455: exit(1); ! 456: } ! 457: first = 0; ! 458: } ! 459: ! 460: /* remove D. file */ ! 461: (void) sprintf(rfullname, "%s/%s", dir, file3); ! 462: DEBUG(4, "Remove %s\n", rfullname); ! 463: if (Kill) ! 464: ret = unlink(rfullname); ! 465: else /* Rejuvenate */ ! 466: ret = utime(rfullname, times); ! 467: /* ! 468: * who cares if we can't? ! 469: * the C. is the file that matters, ! 470: * and the D. is sometimes a dummy ! 471: * we should check specifically but i'm lazy ! 472: */ ! 473: #if NOTDEF ! 474: if (ret != 0 && errno != ENOENT) { ! 475: /* program error?? */ ! 476: fprintf(stderr, "Error: Can't %s, File (%s), errno (%d)\n", ! 477: Kill ? "kill" : "rejuvenate", rfullname, errno); ! 478: exit(1); ! 479: } ! 480: #endif ! 481: } ! 482: ! 483: DEBUG(4, "Remove %s\n", fullname); ! 484: if (Kill) ! 485: ret = unlink(fullname); ! 486: else /* Rejuvenate */ ! 487: ret = utime(fullname, times); ! 488: ! 489: if (ret != 0) { ! 490: /* program error?? */ ! 491: fprintf(stderr, "Error: Can't %s, File ( %s), errno (%d)\n", ! 492: Kill ? "kill" : "rejuvenate", fullname, errno); ! 493: exit(1); ! 494: } ! 495: fclose(fp); ! 496: printf("Job: %s successfully %s\n", Jobid, ! 497: Kill ? "killed" : "rejuvenated"); ! 498: exit(0); ! 499: } ! 500: ! 501: /* ! 502: * fsize - return the size of f1 or f2 (if f1 does not exist) ! 503: * f1 is the local name ! 504: * ! 505: */ ! 506: ! 507: long ! 508: fsize(dir, f1, f2) ! 509: char *dir, *f1, *f2; ! 510: { ! 511: struct stat s; ! 512: char fullname[BUFSIZ]; ! 513: ! 514: (void) sprintf(fullname, "%s/%s", dir, f1); ! 515: if (stat(fullname, &s) == 0) { ! 516: return(s.st_size); ! 517: } ! 518: if (stat(f2, &s) == 0) { ! 519: return(s.st_size); ! 520: } ! 521: ! 522: return(-99999); ! 523: } ! 524: ! 525: cleanup(){} ! 526: void logent(){} /* to load ulockf.c */ ! 527: void systat(){} /* to load utility.c */ ! 528: ! 529: struct m * ! 530: machine(name) ! 531: char *name; ! 532: { ! 533: struct m *m; ! 534: int namelen; ! 535: ! 536: DEBUG(9, "machine(%s), ", name); ! 537: namelen = strlen(name); ! 538: for (m = M; m->mach[0] != NULLCHAR; m++) ! 539: /* match on overlap? */ ! 540: if (EQUALSN(name, m->mach, SYSNSIZE)) { ! 541: /* use longest name */ ! 542: if (namelen > strlen(m->mach)) ! 543: (void) strcpy(m->mach, name); ! 544: return(m); ! 545: } ! 546: ! 547: /* ! 548: * The table is set up with 2 extra entries ! 549: * When we go over by one, output error to errors log ! 550: * When more than one over, just reuse the previous entry ! 551: */ ! 552: DEBUG(9, "m-M=%d\n", m-M); ! 553: if (m-M >= UUSTAT_TBL) { ! 554: if (m-M == UUSTAT_TBL) { ! 555: errent("MACHINE TABLE FULL", "", UUSTAT_TBL, ! 556: sccsid, __FILE__, __LINE__); ! 557: (void) fprintf(stderr, ! 558: "WARNING: Table Overflow--output not complete\n"); ! 559: } ! 560: else ! 561: /* use the last entry - overwrite it */ ! 562: m = &M[UUSTAT_TBL]; ! 563: } ! 564: ! 565: (void) strcpy(m->mach, name); ! 566: m->c_age= m->x_age= m->lasttime= m->locked= m->ccount= m->xcount= 0; ! 567: m->stst[0] = '\0'; ! 568: return(m); ! 569: } ! 570: ! 571: printit(m) ! 572: struct m *m; ! 573: { ! 574: register struct tm *tp; ! 575: time_t t; ! 576: int min; ! 577: extern struct tm *localtime(); ! 578: ! 579: if (m->ccount == 0 ! 580: && m->xcount == 0 ! 581: /*&& m->stst[0] == '\0'*/ ! 582: && m->locked == 0 ! 583: && Queue ! 584: && m->type == 0) ! 585: return; ! 586: printf("%-10s", m->mach); ! 587: if (m->ccount) ! 588: printf("%3dC", m->ccount); ! 589: else ! 590: printf(" "); ! 591: if (m->c_age) ! 592: printf("(%d)", m->c_age); ! 593: else ! 594: printf(" "); ! 595: if (m->xcount) ! 596: printf("%4dX", m->xcount); ! 597: else ! 598: printf(" "); ! 599: if (m->x_age) ! 600: printf("(%d) ", m->x_age); ! 601: else ! 602: printf(" "); ! 603: ! 604: if (m->lasttime) { ! 605: tp = localtime(&m->lasttime); ! 606: printf("%2.2d/%2.2d-%2.2d:%2.2d ", ! 607: tp->tm_mon + 1, tp->tm_mday, tp->tm_hour, ! 608: tp->tm_min); ! 609: } ! 610: /* if (m->locked && m->type != SS_INPROGRESS) */ ! 611: if (m->locked) ! 612: printf("Locked "); ! 613: if (m->stst[0] != '\0') { ! 614: printf("%s", m->stst); ! 615: switch (m->type) { ! 616: case SS_SEQBAD: ! 617: case SS_LOGIN_FAILED: ! 618: case SS_DIAL_FAILED: ! 619: case SS_BAD_LOG_MCH: ! 620: case SS_BADSYSTEM: ! 621: case SS_CANT_ACCESS_DEVICE: ! 622: case SS_DEVICE_FAILED: ! 623: case SS_WRONG_MCH: ! 624: case SS_RLOCKED: ! 625: case SS_RUNKNOWN: ! 626: case SS_RLOGIN: ! 627: case SS_UNKNOWN_RESPONSE: ! 628: case SS_STARTUP: ! 629: case SS_CHAT_FAILED: ! 630: case SS_CONVERSATION: ! 631: (void) time(&t); ! 632: t = m->retrytime - (t - m->lasttime); ! 633: if (t > 0) { ! 634: min = (t + 59) / 60; ! 635: printf("Retry: %d:%2.2d", min/60, min%60); ! 636: } ! 637: if (m->count > 1) ! 638: printf(" Count: %d", m->count); ! 639: } ! 640: } ! 641: putchar('\n'); ! 642: } ! 643: ! 644: #define MAXLOCKS 100 /* Maximum number of lock files this will handle */ ! 645: ! 646: lckpid() ! 647: { ! 648: register i; ! 649: long pid, ret, fd; ! 650: #ifdef ASCIILOCKS ! 651: char alpid[SIZEOFPID+2]; /* +2 for '\n' and null */ ! 652: #endif ! 653: long list[MAXLOCKS]; ! 654: char buf[BUFSIZ], f[MAXBASENAME]; ! 655: char *c, lckdir[BUFSIZ]; ! 656: DIR *dir; ! 657: ! 658: DEBUG(9, "lckpid() - entered\n", ""); ! 659: for (i=0; i<MAXLOCKS; i++) ! 660: list[i] = -1; ! 661: (void) strcpy(lckdir, LOCKPRE); ! 662: *strrchr(lckdir, '/') = '\0'; ! 663: DEBUG(9, "lockdir (%s)\n", lckdir); ! 664: ! 665: /* open lock directory */ ! 666: if (chdir(lckdir) != 0 || (dir = opendir(lckdir)) == NULL) ! 667: exit(101); /* good old code 101 */ ! 668: while (gnamef(dir, f) == TRUE) { ! 669: /* find all lock files */ ! 670: DEBUG(9, "f (%s)\n", f); ! 671: if (EQUALSN("LCK.", f, 4)) { ! 672: /* read LCK file */ ! 673: fd = open(f, O_RDONLY); ! 674: printf("%s: ", f); ! 675: #ifdef ASCIILOCKS ! 676: ret = read(fd, alpid, SIZEOFPID+2); /* +2 for '\n' and null */ ! 677: pid = atoi(alpid); ! 678: #else ! 679: ret = read(fd, &pid, sizeof (int)); ! 680: #endif ! 681: (void) close(fd); ! 682: if (ret != -1) { ! 683: printf("%d\n", pid); ! 684: for(i=0; i<MAXLOCKS; i++) { ! 685: if (list[i] == pid) ! 686: break; ! 687: if (list[i] == -1) { ! 688: list[i] = pid; ! 689: break; ! 690: } ! 691: } ! 692: } ! 693: else ! 694: printf("????\n"); ! 695: } ! 696: } ! 697: fflush(stdout); ! 698: *buf = NULLCHAR; ! 699: for (i=0; i<MAXLOCKS; i++) { ! 700: if( list[i] == -1) ! 701: break; ! 702: (void) sprintf(&buf[strlen(buf)], "%d ", list[i]); ! 703: } ! 704: ! 705: if (i > 0) ! 706: #ifdef V7 ! 707: execlp(UUPS, "uustat-ps", buf, 0); ! 708: #else ! 709: execl("/bin/ps", "ps", "-flp", buf, 0); ! 710: #endif ! 711: exit(0); ! 712: } ! 713: ! 714: int machcmp(a,b) ! 715: char *a,*b; ! 716: { ! 717: return(strcmp(((struct m *) a)->mach,((struct m *) b)->mach)); ! 718: } ! 719: ! 720: static long _sec_per_day = 86400L; ! 721: ! 722: /* ! 723: * _age - find the age of "file" in days ! 724: * return: ! 725: * age of file ! 726: * 0 - if stat fails ! 727: */ ! 728: ! 729: int ! 730: _age(dir, file) ! 731: char * file; /* the file name */ ! 732: char * dir; /* system spool directory */ ! 733: { ! 734: char fullname[MAXFULLNAME]; ! 735: static time_t ptime = 0; ! 736: time_t time(); ! 737: struct stat stbuf; ! 738: ! 739: if (!ptime) ! 740: (void) time(&ptime); ! 741: (void) sprintf(fullname, "%s/%s", dir, file); ! 742: if (stat(fullname, &stbuf) != -1) { ! 743: return ((int)((ptime - stbuf.st_mtime)/_sec_per_day)); ! 744: } ! 745: else ! 746: return(0); ! 747: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.