![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to readr.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [CSRG BSD Unix] / 43BSD / contrib / news / src|
Return to readr.c CVS log | Up to [CSRG BSD Unix] / 43BSD / contrib / news / src |
1.1 ! root 1: /* ! 2: * This software is Copyright (c) 1986 by Rick Adams. ! 3: * ! 4: * Permission is hereby granted to copy, reproduce, redistribute or ! 5: * otherwise use this software as long as: there is no monetary ! 6: * profit gained specifically from the use or reproduction or this ! 7: * software, it is not sold, rented, traded or otherwise marketed, and ! 8: * this copyright notice is included prominently in any copy ! 9: * made. ! 10: * ! 11: * The author make no claims as to the fitness or correctness of ! 12: * this software for any use whatsoever, and it is provided as is. ! 13: * Any use of this software is at the user's own risk. ! 14: * ! 15: * readr - /bin/mail and msgs interface and associated functions. ! 16: */ ! 17: ! 18: #ifdef SCCSID ! 19: static char *SccsId = "@(#)readr.c 2.55 1/17/86"; ! 20: #endif /* SCCSID */ ! 21: ! 22: #include "rparams.h" ! 23: #if defined(BSD4_2) || defined(BSD4_1C) ! 24: #include <sys/dir.h> ! 25: #else ! 26: #include "ndir.h" ! 27: #endif /* !BSD4_2 && !BSD4_1C */ ! 28: #include <setjmp.h> ! 29: #include <errno.h> ! 30: ! 31: extern int errno; ! 32: ! 33: char *Progname = "readnews"; /* used by xerror to identify failing program */ ! 34: ! 35: static char lbuf[BUFLEN*2]; ! 36: long atol(); ! 37: ! 38: #define saveart oobit = bit;strcpy(ofilename1, filename);strcpy(ogroupdir, groupdir);hptr = h;h = hold;hold = hptr;ongsize = pngsize ! 39: #define NLINES(h, fp) (h->numlines[0] ? h->intnumlines : (h->intnumlines=linecnt(fp),sprintf(h->numlines, "%d", h->intnumlines), h->intnumlines)) ! 40: ! 41: char *tft = "/tmp/folXXXXXX"; ! 42: ! 43: /* ! 44: * These were made static for u370 with its buggy cc. ! 45: * I judged it better to have one copy with no ifdefs than ! 46: * to conditionally compile them as automatic variables ! 47: * in readr (which they originally were). Performance ! 48: * considerations might warrant moving some of the simple ! 49: * things into register variables, but I don't know what ! 50: * breaks the u370 cc. ! 51: */ ! 52: static char goodone[BUFLEN]; /* last decent article */ ! 53: static char ogroupdir[BUFLEN]; /* last groupdir */ ! 54: static char address[PATHLEN]; /* for reply copy */ ! 55: static char edcmdbuf[128]; ! 56: static int rfq = 0; /* for last article */ ! 57: static long ongsize; /* Previous ngsize */ ! 58: static long pngsize; /* Printing ngsize */ ! 59: static char *bptr; /* temp pointer. */ ! 60: static struct srec srec; /* srec for sys file entries */ ! 61: static char *tfilename; /* temporary file name */ ! 62: static char ofilename1[BUFLEN]; /* previous file name */ ! 63: static struct hbuf hbuf1, hbuf2, /* for minusing */ ! 64: *h = &hbuf1, /* current header */ ! 65: *hold = &hbuf2, /* previous header */ ! 66: *hptr; /* temporary */ ! 67: static char *ptr1, *ptr2, *ptr3; /* for reply manipulation */ ! 68: static int abs = FALSE; /* TRUE if we asked absolutely */ ! 69: static char tf[100]; ! 70: static long oobit; /* last bit, really */ ! 71: static int dgest = 0; ! 72: static FILE *ofp; /* Current output file to terminal*/ ! 73: static FILE *fp; /* current article to be printed*/ ! 74: static int holdup; /* 1 iff should stop before hdr */ ! 75: static int ignorenews; /* 1 iff readnews -p > /dev/null*/ ! 76: static time_t timelastsaved; /* time newsrc last written out */ ! 77: static jmp_buf sigjmpbuf; /* for signal processing */ ! 78: static int canlongjmp; /* TRUE if setjmp on sigjmp valid */ ! 79: ! 80: int catchcont(); ! 81: readr() ! 82: { ! 83: register char *m = getenv("MORE"); ! 84: register char *m2, cc; ! 85: ! 86: /* ! 87: * Turn of more's 'l' option, so \f kludge will work. ! 88: * This is really revolting! ! 89: */ ! 90: if (m2 = m) { ! 91: while (cc = *m++) ! 92: if (cc != 'l') ! 93: *m2++ = cc; ! 94: *m2 = '\0'; ! 95: } ! 96: ! 97: #ifdef DEBUG ! 98: fprintf(stderr, "readr()\n"); ! 99: #endif ! 100: if (aflag) { ! 101: if (*datebuf) { ! 102: if ((atime = cgtdate(datebuf)) == -1) ! 103: xerror("Cannot parse date string"); ! 104: } else ! 105: atime = 0; ! 106: } ! 107: ! 108: if (pflag && ignoring()) ! 109: ignorenews = TRUE; ! 110: ! 111: if (xflag) ! 112: uflag = 0; ! 113: if (uflag) ! 114: (void) time(&timelastsaved); ! 115: ! 116: ofp = stdout; ! 117: if (cflag && coptbuf[0] != '\0') { ! 118: (void) umask(022); ! 119: (void) mktemp(outfile); /* get "unique" file name */ ! 120: (void) close(creat(outfile,0666)); ! 121: ofp = xfopen(outfile, "w"); ! 122: (void) umask(N_UMASK); ! 123: cflag = FALSE; ! 124: pflag = TRUE; ! 125: } ! 126: ! 127: /* loop reading articles. */ ! 128: fp = NULL; ! 129: obit = -1; ! 130: nextng(); ! 131: for ( ;; ) { ! 132: if (getnextart(FALSE)) ! 133: break; ! 134: #ifdef DEBUG ! 135: fprintf(stderr,"after getnextart, fp %x, pos %ld, bit %ld, group '%s', filename '%s'\n", ! 136: fp, ftell(fp), bit, groupdir, filename); ! 137: #endif ! 138: (void) strcpy(goodone, filename); ! 139: if (pflag || lflag || eflag) { ! 140: /* This code should be gotten rid of */ ! 141: if (SigTrap) { ! 142: qfflush(ofp); ! 143: fprintf(ofp, "\n"); ! 144: cdump(ofp); ! 145: xxit(0); /* kludge! drop when qfflush works */ ! 146: return; ! 147: } ! 148: clear(bit); ! 149: nextbit(); ! 150: FCLOSE(fp); ! 151: continue; ! 152: } ! 153: for ( ;; ) { ! 154: char *pp; ! 155: int nlines; ! 156: int (*ointr)(); ! 157: #ifdef SIGCONT ! 158: int (*ocont)(); ! 159: #endif ! 160: (void) setjmp(sigjmpbuf); ! 161: canlongjmp = TRUE; ! 162: ! 163: SigTrap = FALSE; ! 164: if (!cflag) { ! 165: if (rfq) ! 166: (void) sprintf(bfr, "Last article. [qfr] "); ! 167: else { ! 168: nlines = NLINES(h, fp); ! 169: if (nlines <= 0) { ! 170: (void) sprintf(bfr, "(0 lines) Next? [nqfr] "); ! 171: FCLOSE(fp); ! 172: } else { ! 173: (void) sprintf(bfr, "(%d lines) More? [ynq] ", nlines); ! 174: } ! 175: } ! 176: } else ! 177: (void) sprintf(bfr, "? "); ! 178: fprintf(ofp, "%s", bfr); ! 179: (void) fflush(ofp); ! 180: bptr = lbuf; ! 181: ointr = signal(SIGINT, catchcont); ! 182: #ifdef SIGCONT ! 183: ocont = signal(SIGCONT, catchcont); ! 184: #endif ! 185: pp = fgets(bptr, BUFLEN, stdin); ! 186: canlongjmp = FALSE; ! 187: (void) signal(SIGINT, ointr); ! 188: #ifdef SIGCONT ! 189: (void) signal(SIGCONT, ocont); ! 190: #endif ! 191: if (pp != NULL) ! 192: break; ! 193: if (!SigTrap) ! 194: return; ! 195: #ifdef SIGCONT ! 196: if (SigTrap != SIGCONT) ! 197: #endif ! 198: fprintf(ofp, "\n"); ! 199: } ! 200: (void) nstrip(bptr); ! 201: while (*bptr == ' ' || *bptr == '\t') ! 202: bptr++; ! 203: if (command()) ! 204: break; ! 205: } ! 206: ! 207: if (!pflag && !news) { ! 208: if (!checkngs(header.nbuf, actfp)) ! 209: fprintf(stderr, "No news.\n"); ! 210: } ! 211: cout(ofp); ! 212: } ! 213: ! 214: #define EOL() if (*bptr != '\0') { fprintf(ofp, "? for commands.\n"); return FALSE; } ! 215: /* ! 216: * Process one command, which has already been typed in. ! 217: */ ! 218: command() ! 219: { ! 220: char *findhist(); ! 221: long i; ! 222: ! 223: switch (*bptr++) { ! 224: ! 225: /* No. Go on to next article. */ ! 226: case 'n': ! 227: EOL(); ! 228: readmode = NEXT; ! 229: if (!cflag) ! 230: FCLOSE(fp); ! 231: fprintf(ofp, "\n"); ! 232: clear(bit); ! 233: saveart; ! 234: nextbit(); ! 235: break; ! 236: ! 237: /* Undigestify the article. */ ! 238: case 'd': ! 239: dgest = 1; ! 240: /* fall through */ ! 241: ! 242: /* yes: print this article, go on. */ ! 243: case 'y': ! 244: EOL(); ! 245: /* fall through. */ ! 246: ! 247: /* The user hit return. Default is 'y' unless rfq, then it's 'q'. */ ! 248: case '\0': ! 249: if (!bptr[-1] && rfq) ! 250: return TRUE; ! 251: readmode = NEXT; ! 252: showtail(fp); ! 253: clear(bit); ! 254: saveart; ! 255: nextbit(); ! 256: break; ! 257: ! 258: /* ! 259: * Unsubscribe to the newsgroup and go on to next group ! 260: */ ! 261: case 'u': ! 262: fprintf(ofp, "To unsubscribe, use 'U'\n"); ! 263: break; ! 264: ! 265: case 'U': ! 266: fprintf(ofp, "Unsubscribing to newsgroup: %s\n", groupdir); ! 267: obit = -1; ! 268: FCLOSE(fp); ! 269: if (cflag) ! 270: clear(bit); ! 271: else ! 272: putc('\n', ofp); ! 273: rfq = 0; ! 274: zapng = TRUE; ! 275: saveart; ! 276: if (nextng()) { ! 277: if (actdirect == BACKWARD) ! 278: fprintf(ofp, "Can't back up.\n"); ! 279: else ! 280: return TRUE; ! 281: } ! 282: break; ! 283: ! 284: /* Print the current version of news */ ! 285: case 'v': ! 286: fprintf(ofp, "News version: %s\n", news_version); ! 287: break; ! 288: ! 289: /* reprint the article */ ! 290: case 'p': ! 291: EOL(); ! 292: if (!cflag) ! 293: goto minus; ! 294: readmode = NEXT; ! 295: if (!cflag) { ! 296: FCLOSE(fp); ! 297: bit = last; ! 298: putc('\n', ofp); ! 299: } ! 300: obit = -1; ! 301: break; ! 302: ! 303: /* decrypt joke */ ! 304: case 'D': ! 305: caesar_command(); ! 306: readmode = NEXT; ! 307: clear(bit); ! 308: saveart; ! 309: nextbit(); ! 310: break; ! 311: ! 312: /* write out the article someplace */ ! 313: case 's': ! 314: case 'w': ! 315: { ! 316: char *grn = groupdir; ! 317: tfilename = filename; ! 318: if (*bptr == '-') { ! 319: bptr++; ! 320: grn = ogroupdir; ! 321: if (*ofilename1) ! 322: tfilename = ofilename1; ! 323: } ! 324: if (*bptr != '\0' && *bptr != ' ') { ! 325: fprintf(ofp, "Bad file name.\n"); ! 326: break; ! 327: } ! 328: while (*bptr == ' ') ! 329: bptr++; ! 330: if (*bptr != '|' && *bptr != '/') { ! 331: char hetyped[BUFLEN]; ! 332: char *boxptr; ! 333: struct stat stbf; ! 334: (void) strcpy(hetyped, bptr); ! 335: if (hetyped[0] == '~' && hetyped[1] == '/') { ! 336: strcpy(hetyped, bptr+2); ! 337: strcpy(bptr, userhome); ! 338: } else if (boxptr = getenv("NEWSBOX")) { ! 339: if (index(boxptr, '%')) { ! 340: sprintf(bptr, boxptr, grn); ! 341: if (stat(bptr, &stbf) < 0) { ! 342: if (mkdir(bptr, 0777) < 0) { ! 343: fprintf(ofp, "Cannot create directory %s", bptr); ! 344: break; ! 345: } ! 346: } else if ((stbf.st_mode & S_IFMT) != S_IFDIR) { ! 347: fprintf(ofp, "%s is not a directory", bptr); ! 348: break; ! 349: } ! 350: } else ! 351: strcpy(bptr, boxptr); ! 352: } else ! 353: (void) strcpy(bptr, "."); ! 354: (void) strcat(bptr, "/"); ! 355: if (hetyped[0] != '\0') ! 356: (void) strcat(bptr, hetyped); ! 357: else ! 358: (void) strcat(bptr, "Articles"); ! 359: } ! 360: fwait(fsubr(save, tfilename, bptr)); ! 361: } ! 362: break; ! 363: ! 364: /* back up */ ! 365: case '-': ! 366: minus: ! 367: rfq = 0; ! 368: abs = TRUE; ! 369: if (!*ofilename1) { ! 370: fprintf(ofp, "Can't back up.\n"); ! 371: break; ! 372: } ! 373: if (cflag) ! 374: clear(bit); ! 375: else { ! 376: FCLOSE(fp); ! 377: putc('\n', ofp); ! 378: } ! 379: hptr = h; ! 380: h = hold; ! 381: hold = hptr; ! 382: (void) strcpy(bfr, filename); ! 383: (void) strcpy(filename, ofilename1); ! 384: (void) strcpy(ofilename1, bfr); ! 385: obit = bit; ! 386: if (strcmp(groupdir, ogroupdir)) { ! 387: (void) strcpy(bfr, groupdir); ! 388: selectng(ogroupdir, TRUE, FALSE); ! 389: (void) strcpy(groupdir, ogroupdir); ! 390: (void) strcpy(ogroupdir, bfr); ! 391: ngrp = 1; ! 392: back(); ! 393: } ! 394: bit = oobit; ! 395: oobit = obit; ! 396: obit = -1; ! 397: (void) getnextart(TRUE); ! 398: return FALSE; ! 399: ! 400: /* skip forwards */ ! 401: case '+': ! 402: caseplus: ! 403: if (*bptr == '\0') ! 404: (void) strcat(bptr, "1"); ! 405: rfq = 0; ! 406: if (cflag) ! 407: clear(bit); ! 408: saveart; ! 409: last = bit; ! 410: for (i = 0; i < atol(bptr); i++) { ! 411: nextbit(); ! 412: if ((bit > pngsize) || (rflag && bit < 1)) ! 413: break; ! 414: } ! 415: if (!cflag) { ! 416: putc('\n', ofp); ! 417: FCLOSE(fp); ! 418: } ! 419: obit = -1; ! 420: break; ! 421: ! 422: /* exit - time updated to that of most recently read article */ ! 423: case 'q': ! 424: EOL(); ! 425: return TRUE; ! 426: ! 427: /* exit - no time update. */ ! 428: case 'x': ! 429: EOL(); ! 430: xxit(0); ! 431: ! 432: /* cancel the article. */ ! 433: case 'c': ! 434: (void) cancel_command(); ! 435: break; ! 436: ! 437: /* escape to shell */ ! 438: case '!': ! 439: fwait(fsubr(ushell, bptr, (char *)NULL)); ! 440: fprintf(ofp, "\n"); ! 441: hdr(); ! 442: break; ! 443: ! 444: /* mail reply */ ! 445: case 'r': ! 446: (void) reply_command(); ! 447: break; ! 448: ! 449: /* send to some system */ ! 450: case 'X': ! 451: xmit_command(); ! 452: break; ! 453: /* mark the rest of the articles in this group as read */ ! 454: case 'K': ! 455: saveart; ! 456: while (bit <= pngsize && bit >= minartno) { ! 457: clear(bit); ! 458: nextbit(); ! 459: } ! 460: FCLOSE(fp); ! 461: break; ! 462: ! 463: /* next newsgroup */ ! 464: case 'P': ! 465: *bptr = '-'; ! 466: case 'N': ! 467: FCLOSE(fp); ! 468: if (next_ng_command()) ! 469: return TRUE; ! 470: break; ! 471: ! 472: case 'b': /* back up 1 article */ ! 473: i = bit - 1; ! 474: goto tryartnum; ! 475: case '0': /* specific no. */ ! 476: case '1': ! 477: case '2': ! 478: case '3': ! 479: case '4': ! 480: case '5': ! 481: case '6': ! 482: case '7': ! 483: case '8': ! 484: case '9': ! 485: (void) sscanf(--bptr, "%ld", &i); ! 486: if (i == 0) { ! 487: fprintf(ofp, "Bad article no.\n"); ! 488: break; ! 489: } ! 490: if (i > pngsize) { ! 491: fprintf(ofp, "Not that many articles.\n"); ! 492: break; ! 493: } ! 494: tryartnum: ! 495: readmode = SPEC; ! 496: abs = TRUE; ! 497: bit = i; ! 498: obit = -1; ! 499: if (!cflag) { ! 500: putc('\n', ofp); ! 501: FCLOSE(fp); ! 502: } ! 503: rfq = 0; ! 504: break; ! 505: ! 506: /* specific message ID. */ ! 507: case '<': ! 508: ptr1 = findhist(--bptr); ! 509: if (ptr1 == NULL) { ! 510: fprintf(ofp, "No such article: %s.\n", bptr); ! 511: break; ! 512: } ! 513: ptr2 = index(ptr1, '\t'); ! 514: ptr3 = index(++ptr2, '\t'); ! 515: ptr2 = index(++ptr3, ' '); ! 516: if (ptr2) ! 517: *ptr2 = '\0'; ! 518: ptr2 = index(ptr3, '/'); ! 519: if (!ptr2) { ! 520: *ptr3 = '\0'; ! 521: if (strcmp(++ptr3, "cancelled") == 0) { ! 522: fprintf(ofp, "Article %s has been cancelled.\n", ! 523: bptr); ! 524: break; ! 525: } ! 526: fprintf(ofp, "Article %s (dated %s) has expired.\n", ! 527: bptr, index(ptr1, '\t')+1); ! 528: break; ! 529: } ! 530: *ptr2++ = '\0'; ! 531: abs = TRUE; ! 532: if (cflag) ! 533: clear(bit); ! 534: else { ! 535: FCLOSE(fp); ! 536: putc('\n', ofp); ! 537: } ! 538: saveart; ! 539: (void) strcpy(ogroupdir, ptr3); ! 540: if (strcmp(groupdir, ogroupdir)) { ! 541: (void) strcpy(bfr, groupdir); ! 542: selectng(ogroupdir, TRUE, PERHAPS); ! 543: (void) strcpy(groupdir, ogroupdir); ! 544: (void) strcpy(ogroupdir, bfr); ! 545: ngrp = 1; ! 546: back(); ! 547: } ! 548: (void) sscanf(ptr2, "%ld", &bit); ! 549: oobit = obit; ! 550: obit = -1; ! 551: i = bit; ! 552: (void) getnextart(TRUE); ! 553: if (bit != i || strcmp(groupdir, ptr3) != 0) { ! 554: (void) fprintf(ofp, "Can't read %s/%ld.\n", ptr3, i); ! 555: goto minus; ! 556: } ! 557: rfq = 0; ! 558: break; ! 559: ! 560: /* follow-up article */ ! 561: case 'f': ! 562: if (strcmp(h->followto, "poster") == 0) { ! 563: (void) reply_command(); ! 564: break; ! 565: } ! 566: ! 567: if (*bptr == '-') ! 568: tfilename = ofilename1; ! 569: else ! 570: tfilename = filename; ! 571: (void) sprintf(bfr,"%s/%s %s", BIN, "postnews", tfilename); ! 572: (void) system(bfr); ! 573: break; ! 574: ! 575: /* erase - pretend we haven't seen this article. */ ! 576: case 'e': ! 577: if (rfq || *bptr == '-') { ! 578: if (strcmp(groupdir, ogroupdir)) { ! 579: i = bit; ! 580: (void) strcpy(bfr, groupdir); ! 581: selectng(ogroupdir, FALSE, PERHAPS); ! 582: set(oobit); ! 583: fprintf(ofp,"Holding article %ld newsgroup %s\n", oobit, ogroupdir), ! 584: (void) strcpy(groupdir, ogroupdir); ! 585: selectng(bfr, FALSE, FALSE); ! 586: bit = i; ! 587: } else { ! 588: fprintf(ofp,"Holding article %ld\n", oobit); ! 589: set(oobit); ! 590: } ! 591: } else { ! 592: fprintf(ofp,"Holding article %ld\n", bit); ! 593: set(bit); ! 594: goto caseplus; /* skip this article for now */ ! 595: } ! 596: break; ! 597: ! 598: case 'H': ! 599: case 'h': ! 600: if (!hflag) ! 601: dash(8, ofp); ! 602: if (*bptr == '-') { ! 603: if (oobit > 0) ! 604: fprintf(ofp, "Article %ld:\n", oobit); ! 605: hprint(hold, ofp, 1 + (bptr[-1]=='H')); ! 606: } else { ! 607: fprintf(ofp, "Article %ld of %ld: %s\n", ! 608: rfq ? oobit : bit, pngsize, h->ident); ! 609: hprint(h, ofp, 1 + (bptr[-1]=='H')); ! 610: } ! 611: if (!hflag) ! 612: dash(8, ofp); ! 613: break; ! 614: ! 615: case '#': ! 616: fprintf(ofp, "Article %ld of %ld: newsgroup %s\n", ! 617: rfq ? oobit : bit, pngsize, rfq ? ogroupdir : groupdir); ! 618: break; ! 619: ! 620: /* error */ ! 621: case '?': ! 622: help(ofp); ! 623: break; ! 624: default: ! 625: fprintf(ofp, "? for commands.\n"); ! 626: break; ! 627: } ! 628: ! 629: return FALSE; ! 630: } ! 631: ! 632: cancel_command() ! 633: { ! 634: int notauthor; ! 635: tfilename = filename; ! 636: hptr = h; ! 637: if (*bptr == '-') { ! 638: if (*ofilename1) { ! 639: tfilename = ofilename1; ! 640: hptr = hold; ! 641: } ! 642: bptr++; ! 643: } ! 644: EOL(); ! 645: readmode = SPEC; ! 646: (void) strcpy(rcbuf, hptr->path); ! 647: ptr1 = index(rcbuf, ' '); ! 648: if (ptr1) ! 649: *ptr1 = 0; ! 650: notauthor = strcmp(username, rcbuf); ! 651: if (uid != ROOTID && uid && notauthor) { ! 652: fprintf(ofp, "Can't cancel what you didn't write.\n"); ! 653: return FALSE; ! 654: } ! 655: if (!cancel(ofp, hptr, notauthor) && hptr == h) { ! 656: clear(bit); ! 657: saveart; ! 658: nextbit(); ! 659: obit = -1; ! 660: if (!cflag) ! 661: putc('\n', ofp); ! 662: FCLOSE(fp); ! 663: } ! 664: return TRUE; ! 665: } ! 666: ! 667: reply_command() ! 668: { ! 669: register char *pathptr; ! 670: int edit = 1; ! 671: char *ed, *fbp; ! 672: int idlen; ! 673: FILE *tfp; ! 674: char *replyname(); ! 675: char subj[BUFLEN]; ! 676: char folbuf[BUFLEN]; ! 677: struct stat statb; ! 678: long creatm; ! 679: ! 680: hptr = h; ! 681: while (*bptr && index("d-", *bptr)) { ! 682: switch (*bptr) { ! 683: /* Followup the previous article. */ ! 684: case '-': ! 685: hptr = hold; ! 686: break; ! 687: ! 688: /* Don't edit the headers */ ! 689: case 'd': ! 690: edit = 0; ! 691: break; ! 692: } ! 693: bptr++; ! 694: } ! 695: EOL(); ! 696: ptr1 = index(MAILPARSER, ' '); ! 697: if (ptr1) ! 698: *ptr1 = '\0'; ! 699: if (edit && access(MAILPARSER, 1)) { ! 700: #ifdef IHCC ! 701: fprintf(stderr, "Can't edit headers, 'recmail' missing.\n"); ! 702: #else ! 703: fprintf(stderr, "Can't edit headers without %s\n", MAILPARSER); ! 704: #endif ! 705: edit = 0; ! 706: } ! 707: if (ptr1) ! 708: *ptr1 = ' '; ! 709: ! 710: *rcbuf = '\0'; ! 711: pathptr = replyname(hptr);; ! 712: for (ptr1 = address, ptr2 = pathptr; *ptr2; ptr1++, ptr2++) { ! 713: if (index("\"\\$", *ptr2)) ! 714: *ptr1++ = '\\'; ! 715: *ptr1 = *ptr2; ! 716: } ! 717: *ptr1 = '\0'; ! 718: ! 719: folbuf[0] = '\0'; /* References */ ! 720: if (hptr->followid[0]) { ! 721: fbp = hptr->followid; ! 722: idlen = strlen(hptr->ident); ! 723: ! 724: /* ! 725: * If the references line is too long, truncate it. ! 726: * The "3" is for the comma, the space, and the '\0' at ! 727: * the end of the string. ! 728: */ ! 729: while (fbp && strlen(fbp) + idlen > BUFLEN - 3) ! 730: fbp = index(fbp + 1, '<'); ! 731: if (fbp != NULL) { ! 732: (void) strcpy(folbuf, fbp); ! 733: (void) strcat(folbuf, ", "); ! 734: } ! 735: } ! 736: (void) strcat(folbuf, hptr->ident); ! 737: ! 738: (void) strcpy(subj, hptr->title); /* Subject */ ! 739: while (isspace(*bptr)) ! 740: bptr++; ! 741: if (*bptr != '\0') ! 742: (void) strcpy(subj, bptr); ! 743: if (!prefix(subj, "Re:")){ ! 744: (void) strcpy(bfr, subj); ! 745: (void) sprintf(subj, "Re: %s", bfr); ! 746: } ! 747: if (!edit) { ! 748: fprintf(ofp, "To: %s\n", pathptr); ! 749: ed = index(MAILER, '%'); ! 750: if (ed && ed[1] == 's') ! 751: fprintf(ofp, "Subject: %s\n", subj); ! 752: (void) fflush(ofp); ! 753: } ! 754: ! 755: /* Put the user in the editor to create the body of the followup. */ ! 756: if (edit) { ! 757: int oumask; ! 758: ! 759: (void) strcpy(tf, tft); ! 760: (void) mktemp(tf); ! 761: ! 762: ed = getenv("EDITOR"); ! 763: if (ed == NULL) ! 764: ed = DFTEDITOR; ! 765: ! 766: oumask = umask(077); ! 767: if ((tfp = fopen(tf, "w")) == NULL) { ! 768: perror(tf); ! 769: creatm = 0L; ! 770: } else { ! 771: fprintf(tfp, "To: %s\n", pathptr); ! 772: fprintf(tfp, "Subject: %s\n", subj); ! 773: #ifdef INTERNET ! 774: fprintf(tfp, "News-Path: %s\n", hptr->path); ! 775: #endif /* INTERNET */ ! 776: fprintf(tfp, "References: %s\n\n", folbuf); ! 777: fstat(fileno(tfp), &statb); ! 778: creatm = statb.st_mtime; ! 779: (void) fclose(tfp); ! 780: } ! 781: (void) umask(oumask); ! 782: ! 783: (void) sprintf(edcmdbuf, "%s %s", ed, tf); ! 784: (void) system(edcmdbuf); ! 785: (void) strcpy(rcbuf, MAILPARSER); ! 786: (void) strcat(rcbuf, " -t"); ! 787: (void) strcat(rcbuf, " < "); ! 788: (void) strcat(rcbuf, tf); ! 789: if (access(tf, 4) || stat(tf, &statb)) { ! 790: fprintf(stderr, "Reply not sent: no input file.\n"); ! 791: return FALSE; ! 792: } ! 793: if (statb.st_mtime == creatm) { ! 794: fprintf(stderr, "Reply not sent: cancelled.\n"); ! 795: (void) unlink(tf); ! 796: return FALSE; ! 797: } ! 798: fprintf(ofp,"Sending reply.\n"); ! 799: (void) fflush(stdout); ! 800: if (fork() == 0) { ! 801: (void) system(rcbuf); ! 802: (void) unlink(tf); ! 803: _exit(0); ! 804: } ! 805: } else { ! 806: (void) sprintf(rcbuf, MAILER, hptr->title); ! 807: (void) sprintf(bfr, "%s %s", rcbuf, address); ! 808: (void) system(bfr); ! 809: } ! 810: hdr(); ! 811: return TRUE; ! 812: } ! 813: ! 814: xmit_command() ! 815: { ! 816: tfilename = filename; ! 817: if (*bptr == '-') { ! 818: if (*ofilename1) ! 819: tfilename = ofilename1; ! 820: bptr++; ! 821: } ! 822: if (*bptr != '\0' && *bptr != ' ') { ! 823: fprintf(ofp, "Bad system name.\n"); ! 824: return; ! 825: } ! 826: while (*bptr == ' ') ! 827: bptr++; ! 828: if (*bptr == '\0') { ! 829: fprintf(ofp, "Missing system name.\n"); ! 830: return; ! 831: } ! 832: if (s_find(&srec, bptr) == NULL) { ! 833: fprintf(ofp, "%s not in SYSFILE\n", bptr); ! 834: return; ! 835: } ! 836: (void) transmit(&srec, tfilename); ! 837: } ! 838: ! 839: next_ng_command() ! 840: { ! 841: obit = -1; ! 842: if (!*bptr || *bptr == '-') { ! 843: if (cflag) ! 844: clear(bit); ! 845: else ! 846: putc('\n', ofp); ! 847: if (*bptr) ! 848: actdirect = BACKWARD; ! 849: rfq = 0; ! 850: saveart; ! 851: if (nextng()) { ! 852: if (actdirect == BACKWARD) ! 853: fprintf(ofp, "Can't back up.\n"); ! 854: else ! 855: return TRUE; ! 856: } ! 857: return FALSE; ! 858: } ! 859: while (isspace(*bptr)) ! 860: bptr++; ! 861: if (!validng(bptr)) { ! 862: fprintf(ofp, "No such group.\n"); ! 863: return FALSE; ! 864: } ! 865: if (cflag) ! 866: clear(bit); ! 867: else ! 868: putc('\n', ofp); ! 869: readmode = SPEC; ! 870: rfq = 0; ! 871: saveart; ! 872: back(); ! 873: selectng(bptr, TRUE, TRUE); ! 874: return FALSE; ! 875: } ! 876: ! 877: caesar_command() ! 878: { ! 879: char temp[BUFLEN]; ! 880: FILE *pfp, *popen(); ! 881: ! 882: fprintf(stderr, "Caesar decoding:\n"); ! 883: (void) sprintf(temp, "%s/%s", LIB, "caesar"); ! 884: if (*bptr) { ! 885: (void) strcat(temp, " "); ! 886: (void) strcat(temp, bptr); ! 887: } ! 888: if (NLINES(h, fp) > LNCNT && *PAGER) { ! 889: (void) strcat(temp, " | "); ! 890: (void) strcat(temp, PAGER); ! 891: } ! 892: pfp = popen(temp, "w"); ! 893: tprint(fp, pfp, FALSE); ! 894: FCLOSE(fp); ! 895: (void) pclose(pfp); ! 896: } ! 897: ! 898: /* ! 899: * Show the user the tail, if any, of the message on file ! 900: * descriptor fd, and close fd. The digester is considered, ! 901: * and the pager is used if appropriate. ! 902: */ ! 903: showtail(fd) ! 904: FILE *fd; ! 905: { ! 906: if (fd == NULL) ! 907: return; ! 908: ! 909: if (dgest) { ! 910: digest(fd, ofp, h); ! 911: } else if (!lflag && !pflag && !eflag) { ! 912: pprint(fd); ! 913: } ! 914: (void) fclose(fd); ! 915: } ! 916: ! 917: /* ! 918: * Print out the rest of the article through the pager. ! 919: */ ! 920: pprint(fd) ! 921: FILE *fd; ! 922: { ! 923: #ifdef PAGE ! 924: /* Filter the tail of long messages through PAGER. */ ! 925: if (NLINES(h, fd) > LNCNT && *PAGER) { ! 926: if (!index(PAGER, FMETA)) { ! 927: FILE *pfp, *popen(); ! 928: ! 929: pfp = popen(PAGER, "w"); ! 930: if (pfp == NULL) ! 931: pfp = ofp; ! 932: /* ! 933: * What follows is an attempt to prevent the ! 934: * next message from scrolling part of this ! 935: * message off the top of the screen before ! 936: * the poor luser can read it. ! 937: */ ! 938: tprint(fd, pfp, FALSE); ! 939: putc('\f', pfp); ! 940: putc('\n', pfp); ! 941: putc(' ', pfp); ! 942: (void) pclose(pfp); ! 943: } ! 944: else ! 945: pout(ofp); ! 946: holdup = TRUE; ! 947: } ! 948: else ! 949: #endif ! 950: tprint(fd, ofp, FALSE); ! 951: } ! 952: ! 953: /* ! 954: * Find the next article we want to consider, if we're done with ! 955: * the last one, and show the header. ! 956: */ ! 957: getnextart(minus) ! 958: int minus; ! 959: { ! 960: int noaccess; ! 961: register DIR *dirp; ! 962: register struct direct *dir; ! 963: long nextnum, tnum; ! 964: ! 965: noaccess = 0; ! 966: ! 967: if (minus) ! 968: goto nextart2; /* Kludge for "-" command. */ ! 969: ! 970: if (bit == obit) /* Return if still on same article as last time */ ! 971: return 0; ! 972: ! 973: SigTrap = FALSE; ! 974: ! 975: nextart: ! 976: #ifdef DEBUG ! 977: fprintf(stderr,"nextart:\n"); ! 978: #endif /* DEBUG */ ! 979: dgest = 0; ! 980: ! 981: if (bit < minartno && !rflag) ! 982: bit = minartno; ! 983: ! 984: /* If done with this newsgroup, find the next one. */ ! 985: while (ngsize <= 0 || (!rflag && ((long) bit > ngsize)) || (rflag && bit < minartno)) { ! 986: if (nextng()) { ! 987: if (actdirect == BACKWARD) { ! 988: fprintf(ofp, "Can't back up.\n"); ! 989: actdirect = FORWARD; ! 990: continue; ! 991: } else ! 992: if (rfq++ || pflag || cflag) ! 993: return 1; ! 994: break; ! 995: } ! 996: if (rflag) ! 997: bit = ngsize + 1; ! 998: else ! 999: bit = minartno - 1; ! 1000: if (uflag && !xflag) { ! 1001: time_t now; ! 1002: (void) time(&now); ! 1003: if (now - timelastsaved > 5*60 /* 5 minutes */) { ! 1004: if (!xflag) ! 1005: fprintf(stderr,"[Saving .newsrc]\n"); ! 1006: writeoutrc(); ! 1007: timelastsaved = now; ! 1008: } ! 1009: } ! 1010: noaccess = 0; ! 1011: } ! 1012: ! 1013: nextart2: ! 1014: #ifdef DEBUG ! 1015: fprintf(stderr, "article: %s/%ld\n", groupdir, bit); ! 1016: #endif ! 1017: if (rcreadok) ! 1018: rcreadok = 2; /* have seen >= 1 article */ ! 1019: (void) sprintf(filename, "%s/%ld", dirname(groupdir), bit); ! 1020: if (rfq && goodone[0]) ! 1021: strcpy(filename, goodone); ! 1022: if (SigTrap) { ! 1023: if (SigTrap == SIGHUP) ! 1024: return 1; ! 1025: if (!rcreadok) ! 1026: xxit(0); ! 1027: fprintf(ofp, "Abort (n)? "); ! 1028: (void) fflush(ofp); ! 1029: (void) gets(bfr); ! 1030: if (*bfr == 'y' || *bfr == 'Y') ! 1031: xxit(0); ! 1032: SigTrap = FALSE; ! 1033: } ! 1034: #ifdef DEBUG ! 1035: fprintf(stderr, "filename = '%s'\n", filename); ! 1036: #endif ! 1037: /* Decide if we want to show this article. */ ! 1038: if (bit <= 0 || (fp = fopen(filename, "r")) == NULL) { ! 1039: /* don't show the header if the article was specifically ! 1040: * requested and it isn't there ! 1041: */ ! 1042: if (lbuf[0] == '<') { ! 1043: lbuf[0] = '\0'; ! 1044: bit = -1; ! 1045: return 1; ! 1046: } ! 1047: /* since there can be holes in legal article numbers, */ ! 1048: /* we wait till we hit 5 consecutive bad articles */ ! 1049: /* before we haul off and scan the directory */ ! 1050: if (++noaccess < 5) ! 1051: goto badart; ! 1052: noaccess = 0; ! 1053: dirp = opendir(dirname(groupdir)); ! 1054: if (dirp == NULL) { ! 1055: if (errno != EACCES) ! 1056: fprintf(stderr,"Can't open %s\n", dirname(groupdir)); ! 1057: goto badart; ! 1058: } ! 1059: nextnum = rflag ? minartno - 1 : ngsize + 1; ! 1060: while ((dir = readdir(dirp)) != NULL) { ! 1061: tnum = atol(dir->d_name); ! 1062: if (tnum <= 0) ! 1063: continue; ! 1064: if (rflag ? (tnum > nextnum && tnum < bit) ! 1065: : (tnum < nextnum && tnum > bit)) ! 1066: nextnum = tnum; ! 1067: } ! 1068: closedir(dirp); ! 1069: if (rflag ? (nextnum >= bit) : (nextnum <= bit)) ! 1070: goto badart; ! 1071: #ifdef DEBUG ! 1072: fprintf(stderr,"nextnum = %ld\n",nextnum); ! 1073: #endif /* DEBUG */ ! 1074: do { ! 1075: clear(bit); ! 1076: nextbit(); ! 1077: } while (rflag ? (nextnum < bit) : (nextnum > bit)); ! 1078: obit = -1; ! 1079: abs = FALSE; ! 1080: goto nextart; ! 1081: } else ! 1082: noaccess = 0; ! 1083: ! 1084: if (ignorenews || hread(h, fp, TRUE) == NULL ! 1085: || (!rfq && !aselect(h, abs))) { ! 1086: if (ignorenews) ! 1087: news = TRUE; ! 1088: badart: ! 1089: #ifdef DEBUG ! 1090: fprintf(stderr, "Bad article '%s'\n", filename); ! 1091: #endif ! 1092: FCLOSE(fp); ! 1093: clear(bit); ! 1094: obit = -1; ! 1095: nextbit(); ! 1096: abs = FALSE; ! 1097: goto nextart; ! 1098: } ! 1099: abs = FALSE; ! 1100: actdirect = FORWARD; ! 1101: news = TRUE; ! 1102: hdr(); ! 1103: if (pflag) ! 1104: tprint(fp, ofp, FALSE); ! 1105: else if (cflag && !lflag && !eflag) { ! 1106: (void) fflush(ofp); ! 1107: pprint(fp); ! 1108: } ! 1109: if (cflag || lflag || eflag || pflag) { ! 1110: SigTrap = FALSE; ! 1111: FCLOSE(fp); ! 1112: } ! 1113: obit = bit; ! 1114: return 0; ! 1115: } ! 1116: ! 1117: /* ! 1118: * Print out whatever the appropriate header is ! 1119: */ ! 1120: hdr() ! 1121: { ! 1122: char *briefdate(); ! 1123: ! 1124: if (rfq) ! 1125: return; ! 1126: ! 1127: if (lflag || eflag) { ! 1128: hprint(h, ofp, 0); ! 1129: return; ! 1130: } ! 1131: ! 1132: /* Print out a header */ ! 1133: if (ngrp) { ! 1134: pngsize = ngsize; ! 1135: ngrp--; ! 1136: nghprint(groupdir); ! 1137: } ! 1138: if (!hflag) ! 1139: fprintf(ofp, "Article %ld of %ld, %s.\n", ! 1140: bit, pngsize, briefdate(h->subdate)); ! 1141: hprint(h, ofp, pflag ? 1 : 0); ! 1142: } ! 1143: ! 1144: nghprint(title) ! 1145: char *title; ! 1146: { ! 1147: char *tstr = "Newsgroup "; ! 1148: int l = strlen(title) + strlen(tstr); ! 1149: ! 1150: fprintf(ofp, "\n"); ! 1151: if (!hflag) { ! 1152: dash(l, ofp); ! 1153: fprintf(ofp, "%s%s\n", tstr, title); ! 1154: dash(l, ofp); ! 1155: } else { ! 1156: fprintf(ofp, "%s%s, ", tstr, title); ! 1157: if (bit == pngsize) ! 1158: fprintf(ofp, "%ld\n", pngsize); ! 1159: else ! 1160: fprintf(ofp, "%ld-%ld\n", bit, pngsize); ! 1161: } ! 1162: fprintf(ofp, "\n"); ! 1163: } ! 1164: ! 1165: /* ! 1166: * Routine to catch a continue signal. ! 1167: */ ! 1168: catchcont(sig) ! 1169: int sig; ! 1170: { ! 1171: (void) signal(sig, catchcont); ! 1172: SigTrap = sig; ! 1173: (void) fflush(ofp); ! 1174: #ifdef SIGCONT ! 1175: if (fp && sig == SIGCONT) ! 1176: hdr(); ! 1177: if (sig != SIGCONT) ! 1178: #endif /* SIGCONT */ ! 1179: putc('\n', ofp); ! 1180: if (canlongjmp) ! 1181: longjmp(sigjmpbuf,1); ! 1182: } ! 1183: ! 1184: xxit(status) ! 1185: int status; ! 1186: { ! 1187: (void) unlink(infile); ! 1188: (void) unlink(outfile); ! 1189: #ifdef SORTACTIVE ! 1190: if (strncmp(ACTIVE,"/tmp/", 5) == 0) ! 1191: (void) unlink(ACTIVE); ! 1192: #endif /* SORTACTIVE */ ! 1193: exit(status); ! 1194: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.