![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to readnews.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [CSRG BSD Unix] / 43BSDTahoe / new / news / src|
Return to readnews.c CVS log | Up to [CSRG BSD Unix] / 43BSDTahoe / new / news / src |
1.1 root 1: /*
2: * readnews - read news articles.
3: */
4:
5: #ifdef SCCSID
6: static char *SccsId = "@(#)readnews.c 2.33 10/15/87";
7: #endif /* SCCSID */
8:
9: #include "rparams.h"
10:
11: /*
12: * readnews - article reading program
13: */
14:
15: #ifndef SYSBUF
16: char SYSBUF[BUFSIZ]; /* to buffer std out */
17: #endif
18:
19: #define OPTION 0 /* pick up an option string */
20: #define STRING 1 /* pick up a string of arguments */
21:
22: struct timeb Now;
23:
24: int onsig(), cleanup();
25:
26: /*
27: * Authors:
28: * Matt Glickman ucbvax!glickman
29: * Mark Horton cbosg!mark
30: * Stephen Daniels duke!swd
31: * Tom Truscott duke!trt
32: */
33:
34: main(argc, argv)
35: int argc;
36: register char **argv;
37: {
38: register char *ptr; /* pointer to rest of buffer */
39: char *user = NULL, *home = NULL;
40: int optflag = FALSE, space = FALSE;
41: struct utsname ubuf;
42: char *myrc;
43:
44: /* set up defaults and initialize. */
45: pathinit();
46: mode = UNKNOWN;
47: header.title[0] = header.nbuf[0] = '\0';
48: coptbuf[0] = datebuf[0] = '\0';
49: uname(&ubuf);
50: strcpy(FROMSYSNAME, ubuf.nodename);
51:
52: savmask = umask(N_UMASK); /* set up mask */
53: uid = getuid();
54: gid = getgid();
55: duid = geteuid();
56: dgid = getegid();
57: (void) ftime(&Now);
58: /* give reasonable error message if SPOOL directory
59: * is unaccessable... usually means system administrator
60: * has "turned off" news reading...
61: */
62: #ifdef SERVER
63: if (open_server() < 0)
64: #else /* !SERVER */
65: if (access(SPOOL, 05))
66: #endif /* !SERVER */
67: {
68: fputs("News articles are not available at this time\n",stderr);
69: xxit(1);
70: }
71: #ifndef SHELL
72: if ((SHELL = getenv("SHELL")) == NULL)
73: SHELL = "/bin/sh";
74: #endif
75: /*
76: * IHCC forces the use of 'getuser()' to prevent forgery of articles
77: * by just changing $LOGNAME
78: * Note that this shouldn't matter in readnews, since inews
79: * does all the actual posting of news.
80: */
81: #ifndef IHCC
82: if ((user = getenv("USER")) == NULL)
83: user = getenv("LOGNAME");
84: if ((home = getenv("HOME")) == NULL)
85: home = getenv("LOGDIR");
86: #endif /* ! IHCC */
87: if (user == NULL || home == NULL)
88: getuser();
89: else {
90: username = AllocCpy(user);
91: (void) strcpy(header.path, username);
92: userhome = AllocCpy(home);
93: }
94:
95: if (!(MAILER = getenv("MAILER")))
96: MAILER = "mail"; /* was /bin/mail */
97:
98: #ifdef PAGE
99: if (myrc = getenv("PAGER"))
100: PAGER = AllocCpy(myrc);
101: else {
102: # ifdef IHCC
103: (void) sprintf(bfr, "%s/bin/%s", logdir(HOME), PAGE);
104: PAGER = AllocCpy(bfr);
105: # else /* !IHCC */
106: PAGER = PAGE;
107: # endif /* !IHCC */
108: }
109: #endif /* PAGE */
110:
111: if (ptr = getenv("NEWSOPTS"))
112: (void) strcpy(rcbuf, ptr);
113: else
114: *rcbuf = '\0';
115: if (*rcbuf) {
116: (void) strcat(rcbuf, " \1");
117: ptr = rcbuf;
118: while (*++ptr)
119: if (isspace(*ptr))
120: *ptr = '\0';
121: for (ptr = rcbuf; ; ptr++) {
122: if (!*ptr)
123: continue;
124: if (*ptr == '\1')
125: break;
126: if (++line > LINES)
127: xerror("Too many options.");
128: if ((rcline[line] = malloc((unsigned)(strlen(ptr) + 1))) == NULL)
129: xerror("Not enough memory.");
130: argvrc[line] = rcline[line];
131: (void) strcpy(rcline[line], ptr);
132: while (*ptr)
133: ptr++;
134: }
135: }
136: myrc = getenv("NEWSRC");
137: if (myrc == NULL) {
138: myrc = NEWSRC;
139: (void) sprintf(newsrc, "%s/%s", userhome, myrc);
140: } else {
141: (void) strcpy(newsrc, myrc);
142: }
143: if (access(newsrc, 0))
144: newrc(newsrc);
145: if ((rcfp = fopen(newsrc, "r")) != NULL) {
146: rcreadok = FALSE;
147: while (fgets(rcbuf, LBUFLEN, rcfp) != NULL) {
148: if (!(space = isspace(*rcbuf)))
149: optflag = FALSE;
150: if (!STRNCMP(rcbuf, "options ", 8))
151: optflag = TRUE;
152: if (optflag) {
153: (void) strcat(rcbuf, "\1");
154: if (space)
155: ptr = rcbuf - 1;
156: else
157: ptr = &rcbuf[7];
158: while (*++ptr)
159: if (isspace(*ptr))
160: *ptr = '\0';
161: if (space)
162: ptr = rcbuf;
163: else
164: ptr = &rcbuf[8];
165: for (; ; ptr++) {
166: if (!*ptr)
167: continue;
168: if (*ptr == '\1')
169: break;
170: if (++line > LINES)
171: xerror("Too many options.");
172: if ((rcline[line] = malloc((unsigned)(strlen(ptr) + 1))) == NULL)
173: xerror("Not enough memory.");
174: argvrc[line] = rcline[line];
175: (void) strcpy(rcline[line], ptr);
176: while (*ptr)
177: ptr++;
178: }
179: }
180: }
181: (void) fclose(rcfp);
182: rcreadok = TRUE;
183: }
184: if (line != -1) {
185: #ifdef DEBUG
186: register int i;
187: for (i = 0; i <= line; i++)
188: fprintf(stderr, "options: %s\n", rcline[i]);
189: #endif
190: process(line + 2, argvrc);
191: do {
192: #ifdef DEBUG
193: fprintf(stderr, "Freeing %d\n", line);
194: #endif
195: free(rcline[line]);
196: } while (line--);
197: }
198:
199: argv++;
200: (void) strcat(header.nbuf, ADMSUB);
201: process(argc, argv);
202: if (!nflag)
203: (void) sprintf(header.nbuf, "%s,%s", ADMSUB, DFLTSUB);
204: else {
205: char *p = rindex(header.nbuf, ',');
206: if (p && p[1] == '\0') /* strip of trailing NGDELIM */
207: *p ='\0';
208: }
209: lcase(header.nbuf);
210: makehimask(header.nbuf, "junk");
211: makehimask(header.nbuf, "control");
212: makehimask(header.nbuf, "test");
213:
214: setbuf(stdout, SYSBUF);
215: SigTrap = FALSE; /* true if a signal has been caught */
216: if (!pflag && !lflag && !eflag) {
217: (void) signal(SIGQUIT, SIG_IGN);
218: (void) signal(SIGHUP, cleanup);
219: (void) signal(SIGINT, onsig);
220: (void) signal(SIGPIPE, onsig);
221: } else {
222: if (signal(SIGQUIT, SIG_IGN) != SIG_IGN)
223: (void) signal(SIGQUIT, cleanup);
224: if (signal(SIGHUP, SIG_IGN) != SIG_IGN)
225: (void) signal(SIGHUP, cleanup);
226: if (signal(SIGINT, SIG_IGN) != SIG_IGN)
227: (void) signal(SIGINT, cleanup);
228: }
229:
230: /*
231: * ALL of the command line has now been processed. (!)
232: */
233:
234: if (!*header.nbuf)
235: strcpy(header.nbuf, DFLTSUB);
236: if (sflag) {
237: printf("Subscription list: %s\n", header.nbuf);
238: xxit(0);
239: }
240: if (xflag)
241: line = -1;
242: rcfp = xfopen(newsrc, "r");
243: while (fgets(rcbuf, LBUFLEN, rcfp) != NULL) {
244: if (!nstrip(rcbuf))
245: xerror(".newsrc line too long");
246: if (++line >= LINES)
247: xerror("Too many .newsrc lines");
248: if ((rcline[line] = malloc((unsigned)(strlen(rcbuf) + 1))) == NULL)
249: xerror("Not enough memory");
250: (void) strcpy(rcline[line], rcbuf);
251: }
252: fclose(rcfp);
253:
254: if (SigTrap) {
255: if (SigTrap == SIGHUP || !rcreadok)
256: xxit(0);
257: fprintf(stdout, "Abort (n)? ");
258: (void) fflush(stdout);
259: if (gets(bfr) == NULL || *bfr == 'y' || *bfr == 'Y')
260: xxit(0);
261: SigTrap = FALSE;
262: }
263: #ifdef SERVER
264: if ((actfp = open_active()) == NULL)
265: xerror("Cannot open active newsgroups file");
266: strcpy(ACTIVE, active_name());
267: (void) fclose(actfp);
268: actfp = NULL;
269: #endif /* !SERVER */
270: sortactive();
271: actfp = xfopen(ACTIVE, "r");
272: #ifdef DEBUG
273: fprintf(stderr, "header.nbuf = %s\n", header.nbuf);
274: #endif /* DEBUG */
275: if (Kflag)
276: news++;
277: else {
278: switch (mode) {
279: case UNKNOWN:
280: readr();
281: break;
282: #ifdef TMAIL
283: case MAIL:
284: Mail();
285: break;
286: #endif /* TMAIL */
287: }
288: }
289:
290: cleanup(0);
291: /*NOTREACHED*/
292: }
293:
294: cleanup(signo)
295: {
296: extern short ospeed;
297:
298: (void) signal(SIGHUP, SIG_IGN);
299: (void) fflush(stdout);
300: if (news && !xflag && !lflag && !tflag) {
301: if (*groupdir && mode != MAIL)
302: updaterc();
303: writeoutrc();
304: }
305: /*
306: * stop vnews from clearing the screen if we're
307: * killed by a hangup
308: */
309: if (signo == SIGHUP)
310: ospeed = 0;
311: xxit(0);
312: }
313:
314: /*
315: * Write out the .newsrc file. It's already been cleaned up by sortactive()
316: * Take care that data is all written, and flushed, before we destroy the
317: * old copy.
318: */
319: writeoutrc()
320: {
321: FILE *wrcfp;
322: char aline[BUFLEN];
323: register int i;
324:
325: /* NEVER write it out if xflag */
326: if (xflag || !rcreadok)
327: return;
328:
329: (void) strcpy(aline, newsrc);
330: (void) strcat(aline, ".new");
331:
332: #ifdef VMS
333: (void) vmsdelete(aline);
334: #endif
335: wrcfp = xfopen(aline, "w");
336:
337: for (i = 0; i <= line; i++) {
338: if (rcline[i] != NULL)
339: if (fprintf(wrcfp, "%s\n", rcline[i]) < 0)
340: goto fouled;
341: }
342: if (fclose(wrcfp) < 0)
343: goto fouled;
344:
345: #ifdef VMS
346: (void) vmsdelete(newsrc);
347: #endif
348: if (rename(aline, newsrc) < 0)
349: xerror("Cannot rename %s to %s", aline, newsrc);
350: return;
351:
352: fouled:
353: xerror("Error writing new .newsrc file - no changes made\n");
354: return;
355: }
356:
357: /*
358: * Forbid newsgroup ng, unless he asked for it in nbuf.
359: */
360: makehimask(nbuf, ng)
361: char *nbuf, *ng;
362: {
363: if (!findex(nbuf, ng))
364: (void) sprintf(rindex(nbuf, '\0'), ",!%s", ng);
365: }
366:
367: /*
368: * Return true if the string searchfor is in string, but not if preceded by !.
369: */
370: findex(string, searchfor)
371: char *string, *searchfor;
372: {
373: register char first;
374: register char *p;
375:
376: first = *searchfor;
377: for (p=index(string, first); p; p = index(p+1, first)) {
378: if (((p==string) || (p[-1]!='!')) && STRNCMP(p, searchfor, strlen(searchfor)) == 0)
379: return TRUE;
380: }
381: return FALSE;
382: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.