|
1772
|
1 /* postnews.c This is main program for sending Usenet news.
|
|
|
2 Copyright (C) 1990, 1993 Rick Adams and Bob Billson
|
|
|
3
|
|
|
4 This file is part of the OS-9 UUCP package, UUCPbb.
|
|
|
5
|
|
|
6 This program is free software; you can redistribute it and/or modify
|
|
|
7 it under the terms of the GNU General Public License as published by
|
|
|
8 the Free Software Foundation; either version 2 of the License, or
|
|
|
9 (at your option) any later version.
|
|
|
10
|
|
|
11 This program is distributed in the hope that it will be useful,
|
|
|
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
|
14 GNU General Public License for more details.
|
|
|
15
|
|
|
16 You should have received a copy of the GNU General Public License
|
|
|
17 along with this program; if not, write to the Free Software
|
|
|
18 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
|
|
|
19
|
|
|
20 The author of UUCPbb, Bob Billson, can be contacted at:
|
|
|
21 bob@kc2wz.bubble.org or uunet!kc2wz!bob or by snail mail:
|
|
|
22 21 Bates Way, Westfield, NJ 07090
|
|
|
23 */
|
|
|
24
|
|
|
25 /* Options:
|
|
|
26
|
|
|
27 -f <file>
|
|
|
28 -n <newsgroup>
|
|
|
29 -S <system>
|
|
|
30 -s <subject>
|
|
|
31 -i <reference-ID>
|
|
|
32 -a <reference-article>
|
|
|
33 -t (force /t2 "dumb" windowing codes)
|
|
|
34 -x <debug_level>
|
|
|
35 */
|
|
|
36
|
|
|
37 #define MAIN
|
|
|
38
|
|
|
39 #include "uucp.h"
|
|
|
40 #include <time.h>
|
|
|
41 #ifndef _OSK
|
|
|
42 #include <utime.h>
|
|
|
43 #endif
|
|
|
44 #include <signal.h>
|
|
|
45 #ifndef _OSK
|
|
|
46 #include <os9.h>
|
|
|
47 #endif
|
|
|
48
|
|
|
49 extern QQ unsigned myuid;
|
|
|
50 extern QQ char sepsym, quotechar;
|
|
|
51 extern QQ char *nodename, *sitename, *name, *newshost, *organization;
|
|
|
52 extern char user[], temp[];
|
|
|
53
|
|
|
54 #ifndef TERMCAP
|
|
|
55 QQ flag t2flag = FALSE;
|
|
|
56 #endif
|
|
|
57 QQ FILE *log;
|
|
|
58 #ifndef _OSK
|
|
|
59 QQ flag usedotilde;
|
|
|
60 static char *dotilde = "dotilde";
|
|
|
61 #endif
|
|
|
62 QQ char *got_escape = "<ESC> hit...exiting";
|
|
|
63 QQ int debuglvl = 0;
|
|
|
64 static char value[100];
|
|
|
65 char sysname[20], artfile[100], newsgroup[1024], subject[128];
|
|
|
66 char reference[256],article[100], distrib[50], localgroup[256];
|
|
|
67 char tempfile[100]; /* moved from postgroup() so interrupt() */
|
|
|
68 /* can clean up -- REB */
|
|
|
69
|
|
2106
|
70 int main(argc, argv)
|
|
1772
|
71 int argc;
|
|
|
72 char *argv[];
|
|
|
73 {
|
|
|
74 int option, interrupt();
|
|
|
75 register char *p;
|
|
|
76 #ifndef _OSK
|
|
|
77 struct registers regs;
|
|
|
78 #endif
|
|
|
79 *sysname = *artfile = *newsgroup = *subject = *localgroup = '\0';
|
|
|
80 *reference = *article = *tempfile = '\0';
|
|
|
81 homedir = NULL;
|
|
|
82 opterr = TRUE;
|
|
|
83 log = stderr; /* use stderr rather than uulog file --REB */
|
|
|
84
|
|
|
85 #ifndef _OSK
|
|
|
86 pflinit(); /* tell linker longs will be printed --REB */
|
|
|
87 #endif
|
|
|
88
|
|
|
89 /* handle keyboard interrupts */
|
|
|
90 intercept (interrupt);
|
|
|
91
|
|
|
92 #ifdef TERMCAP
|
|
|
93 init_term_cap();
|
|
|
94 #endif
|
|
|
95
|
|
|
96 while ((option = getopt (argc, argv, "f:n:s:S:i:a:tx:")) != EOF)
|
|
|
97 switch (option)
|
|
|
98 {
|
|
|
99 case 'f':
|
|
|
100 strcpy (artfile, optarg);
|
|
|
101 break;
|
|
|
102
|
|
|
103 case 'n':
|
|
|
104 strcat (strcat (newsgroup, optarg), " ");
|
|
|
105 break;
|
|
|
106
|
|
|
107 case 's':
|
|
|
108 strcpy (subject, optarg);
|
|
|
109 break;
|
|
|
110
|
|
|
111 case 'S':
|
|
|
112 strcpy (sysname, optarg);
|
|
|
113 break;
|
|
|
114
|
|
|
115 case 'i':
|
|
|
116 strcpy (reference, optarg);
|
|
|
117 break;
|
|
|
118
|
|
|
119 case 'a':
|
|
|
120 strcpy (article, optarg);
|
|
|
121 break;
|
|
|
122
|
|
|
123 case 't':
|
|
|
124 #ifndef TERMCAP
|
|
|
125 t2flag = TRUE;
|
|
|
126 break;
|
|
|
127 #endif
|
|
|
128 case 'x':
|
|
|
129 debuglvl = atoi (optarg);
|
|
|
130 break;
|
|
|
131
|
|
|
132 case '?':
|
|
|
133 usage();
|
|
|
134 break;
|
|
|
135
|
|
|
136 default:
|
|
|
137 strcat (strcat (newsgroup, optarg), " ");
|
|
|
138 break;
|
|
|
139 }
|
|
|
140
|
|
|
141 /* elminated last blank in newsgroup list -- REB */
|
|
|
142 newsgroup[strlen (newsgroup) - 1] = '\0';
|
|
|
143
|
|
|
144 if (getparam() == FALSE)
|
|
|
145 interrupt (0);
|
|
|
146
|
|
|
147 userparam();
|
|
|
148
|
|
|
149 if ((newsdir = getdirs ("newsdir")) == NULL)
|
|
|
150 badparam ("newsdir");
|
|
|
151
|
|
|
152 if ((spooldir = getdirs ("spooldir")) == NULL)
|
|
|
153 badparam ("spooldir");
|
|
|
154
|
|
|
155 #ifndef _OSK
|
|
|
156 if (nmlink (dotilde, 0, 0) == -1)
|
|
|
157 if (nmload (dotilde, 0, 0) == -1)
|
|
|
158 fatal ("can't load dotilde");
|
|
|
159
|
|
|
160 usedotilde = TRUE;
|
|
|
161 #endif
|
|
|
162
|
|
|
163 #ifndef TERMCAP
|
|
|
164 if (!t2flag)
|
|
|
165 t2flag = t2test();
|
|
|
166 #endif
|
|
|
167 /* figure out path to article being replied to, if any */
|
|
|
168 if (*article != '\0')
|
|
|
169 {
|
|
|
170 sprintf (temp, "%s/%s/%s", newsdir, newsgroup, article);
|
|
|
171
|
|
|
172 while ((p = strchr (temp, '.')) != NULL)
|
|
|
173 *p = '/';
|
|
|
174
|
|
|
175 strcpy (article, temp);
|
|
|
176 }
|
|
|
177
|
|
|
178 /* use default newsfeed host is -S wasn't on command line -- REB */
|
|
|
179 if (*sysname == '\0')
|
|
|
180 if (*newshost != '\0')
|
|
|
181 strcpy (sysname, newshost);
|
|
|
182 else
|
|
|
183 getsys (sysname);
|
|
|
184
|
|
|
185 /* get user name */
|
|
|
186 if (*user == '\0')
|
|
|
187 fatal ("user not in password file");
|
|
|
188
|
|
|
189 /* post article to newsgroup */
|
|
|
190 postgroup (sysname);
|
|
|
191 interrupt (0);
|
|
|
192 }
|
|
|
193
|
|
|
194
|
|
|
195
|
|
|
196 /* postgroup --queue article for remote news delivery */
|
|
|
197
|
|
|
198 int postgroup (system)
|
|
|
199 char *system;
|
|
|
200 {
|
|
|
201 static char line[128], filename[50];
|
|
|
202 static char cname[15], xname[14], dname[14], jname[14];
|
|
|
203 char seq[5];
|
|
|
204 FILE *file, *qfile, *sigfile;
|
|
|
205 char *p;
|
|
|
206 long nseq;
|
|
|
207 int result;
|
|
|
208 flag localonly;
|
|
|
209
|
|
|
210 /* open prepared article, if any */
|
|
|
211 if (*artfile != '\0')
|
|
|
212 if ((file = fopen (artfile, "r")) == NULL)
|
|
|
213 fatal ("can't open article file");
|
|
|
214
|
|
|
215 /* Become super user so we can go to proper spool file */
|
|
|
216 asetuid (0);
|
|
|
217 sprintf (temp, "%s/%s", spooldir, system);
|
|
|
218
|
|
|
219 if (chdir (temp) == -1)
|
|
|
220 {
|
|
|
221 char tmp[100];
|
|
|
222
|
|
|
223 sprintf (tmp, "can't change to spool directory: %s\n", temp);
|
|
|
224 fatal (tmp);
|
|
|
225 }
|
|
|
226 asetuid (myuid);
|
|
|
227
|
|
|
228 /* Get unique message ID number. Moved here to speed things up a bit.
|
|
|
229 When we return our user ID will be restored. --REB */
|
|
|
230
|
|
|
231 nseq = getseq (NEWSEQ);
|
|
|
232
|
|
|
233 /* figure out all the spool file names */
|
|
|
234 strcpy (seq, genseq() );
|
|
|
235
|
|
|
236 /* D.sysnameXXXX filename (article data file) */
|
|
|
237 sprintf (dname, "D.%.7s%s", nodename, seq);
|
|
|
238
|
|
|
239 /* D.sysnameXXXX file (job file) */
|
|
|
240 sprintf (jname, "D.%.7s%s", system, seq);
|
|
|
241
|
|
|
242 /* C.sysnameCXXXX (control file) */
|
|
|
243 sprintf (cname, "C.%.7sC%s", system, seq);
|
|
|
244
|
|
|
245 /* X.sysnameXXXX (execute file) */
|
|
|
246 sprintf (xname, "X.%.7s%s", system, seq);
|
|
|
247
|
|
|
248 /* open article data file */
|
|
|
249 maketemp (tempfile, '1', FALSE);
|
|
|
250
|
|
|
251 /* change id so we can open a file -- BAS */
|
|
|
252 cls();
|
|
|
253 asetuid (0);
|
|
|
254
|
|
|
255 if ((qfile = fopen (tempfile, "w")) == NULL)
|
|
|
256 fatal ("can't open article data file");
|
|
|
257
|
|
|
258 fixperms (qfile);
|
|
|
259 asetuid (myuid);
|
|
|
260
|
|
|
261 /* Path: ccentral!rickadams */
|
|
|
262 fprintf (qfile, "Path: %s!%s\n", nodename, user);
|
|
|
263
|
|
|
264 /* From: rickadams@ccentral.UUCP (The OTHER Rick Adams) */
|
|
|
265 sprintf (line, "From: %s%c%s%s%s%s\n",
|
|
|
266 sepsym != '!' ? user : sitename,
|
|
|
267 sepsym,
|
|
|
268 sepsym != '!' ? sitename : user,
|
|
|
269 *name != '\0' ? " (" : "",
|
|
|
270 *name != '\0' ? name : "",
|
|
|
271 *name != '\0' ? ")" : "");
|
|
|
272
|
|
|
273 fputs (line, stdout);
|
|
|
274 fputs (line, qfile);
|
|
|
275
|
|
|
276 /* Newsgroups: ca.test */
|
|
|
277 if (*newsgroup == '\0')
|
|
|
278 {
|
|
|
279 sprintf (filename, "%s/active", UUCPSYS);
|
|
|
280 getvalue (qfile, "Newsgroups", filename);
|
|
|
281 strcpy (newsgroup, value);
|
|
|
282 }
|
|
|
283 else
|
|
|
284 {
|
|
|
285 sprintf (line, "Newsgroups: %s\n", newsgroup);
|
|
|
286 fputs (line, stdout);
|
|
|
287 fputs (line, qfile);
|
|
|
288 }
|
|
|
289
|
|
|
290 /* Subject: test */
|
|
|
291 if (*subject == '\0')
|
|
|
292 getfield (qfile, "Subject", TRUE);
|
|
|
293 else
|
|
|
294 {
|
|
|
295 sprintf (line, "Subject: %s\n", subject);
|
|
|
296 fputs (line, stdout);
|
|
|
297 fputs (line, qfile);
|
|
|
298 }
|
|
|
299
|
|
|
300 /* Keywords: test */
|
|
|
301 getfield (qfile, "Keywords", FALSE);
|
|
|
302
|
|
|
303 /* Message-ID: <1@ccentral.UUCP> Changed -- REB */
|
|
|
304 sprintf (line, "Message-ID: <%ld@%s>\n", nseq, sitename);
|
|
|
305 fputs (line, stdout);
|
|
|
306 fputs (line, qfile);
|
|
|
307
|
|
|
308 /* Date: Tue, 12 Feb 91 10:57:45 -0800 Changed -- REB */
|
|
|
309 strcat (strcpy (line, "Date: "), date822());
|
|
|
310 puts (line);
|
|
|
311 fprintf (qfile, "%s\n", line);
|
|
|
312
|
|
|
313 /* Reply-To: user@sitename Some news articles seem to have this */
|
|
|
314 /* I don't know if it is done completely right. -- BAS */
|
|
|
315
|
|
|
316 sprintf (line, "Reply-To: %s%c%s\n",
|
|
|
317 sepsym != '!' ? user : sitename,
|
|
|
318 sepsym,
|
|
|
319 sepsym != '!' ? sitename : user);
|
|
|
320
|
|
|
321 fputs (line, stdout);
|
|
|
322 fputs (line, qfile);
|
|
|
323
|
|
|
324 /* References: <1234@sitename.UUCP> Changed -- REB */
|
|
|
325 if (*reference != '\0')
|
|
|
326 {
|
|
|
327 sprintf (line, "References: %s\n", reference);
|
|
|
328 fputs (line, stdout);
|
|
|
329 fputs (line, qfile);
|
|
|
330 }
|
|
|
331
|
|
|
332 /* Distribution: ca */
|
|
|
333 if (!localcheck())
|
|
|
334 {
|
|
|
335 sprintf (filename, "%s/distributions", UUCPSYS);
|
|
|
336 getvalue (qfile, "Distribution", filename);
|
|
|
337 strcpy (distrib, value);
|
|
|
338 }
|
|
|
339 else
|
|
|
340 {
|
|
|
341 /* local article */
|
|
|
342 sprintf (line, "Distribution: local\n");
|
|
|
343 fputs (line, stdout);
|
|
|
344 fputs (line, qfile);
|
|
|
345 strcpy (distrib, "local");
|
|
|
346 }
|
|
|
347
|
|
|
348 /* local distribution only? */
|
|
|
349 localonly = (strcmp (distrib, "local") == 0) ? TRUE : FALSE;
|
|
|
350
|
|
|
351 /* Summary: This is a test message. */
|
|
|
352 getfield (qfile, "Summary", FALSE);
|
|
|
353
|
|
|
354 /* Organization: Color Central Software */
|
|
|
355 if (*organization != '\0')
|
|
|
356 {
|
|
|
357 sprintf (line, "Organization: %s\n", organization);
|
|
|
358 fputs (line, stdout);
|
|
|
359 fputs (line, qfile);
|
|
|
360 }
|
|
|
361
|
|
|
362 /* body of message */
|
|
|
363 putchar ('\n');
|
|
|
364 putc ('\n', qfile);
|
|
|
365
|
|
|
366 if (*artfile != '\0')
|
|
|
367 {
|
|
|
368 while (fgets (line, sizeof (line), file) != NULL)
|
|
|
369 {
|
|
|
370 if ((p = strchr (line, '\n')) != NULL)
|
|
|
371 *p = '\0';
|
|
|
372
|
|
|
373 fprintf (qfile, "%s\n", line);
|
|
|
374 printf ("%s\n", line);
|
|
|
375 }
|
|
|
376 fclose (file);
|
|
|
377 }
|
|
|
378 else
|
|
|
379 for (;;)
|
|
|
380 {
|
|
|
381 /* end of input? */
|
|
|
382 if (fgets (line, sizeof (line), stdin) == NULL)
|
|
|
383 break;
|
|
|
384
|
|
|
385 if (*line == '.' && *(line + 1) == '\n')
|
|
|
386 {
|
|
|
387 CurUp();
|
|
|
388 fputs (" \b", stdout);
|
|
|
389 fflush (stdout);
|
|
|
390 break;
|
|
|
391 }
|
|
|
392 else
|
|
|
393 {
|
|
|
394 if (*line == '~')
|
|
|
395 {
|
|
|
396 int tilde;
|
|
|
397
|
|
|
398 fclose (qfile);
|
|
|
399 line[strlen (line) - 1] = '\0';
|
|
|
400
|
|
|
401 sprintf (temp,
|
|
|
402 "dotilde \"%s\" %d %d %c %s %s %s",
|
|
|
403 #ifndef TERMCAP
|
|
|
404 line, t2flag, myuid, quotechar, tempfile,
|
|
|
405 #else
|
|
|
406 line, 0, myuid, quotechar, tempfile,
|
|
|
407 #endif
|
|
|
408 homedir, article);
|
|
|
409
|
|
|
410 asetuid (0);
|
|
|
411 tilde = docmd_na (temp);
|
|
|
412
|
|
|
413 if (tilde == SIGINT || tilde == SIGQUIT
|
|
|
414 || tilde == ABORT)
|
|
|
415 {
|
|
|
416 interrupt (0);
|
|
|
417 }
|
|
|
418
|
|
|
419 if ((qfile = fopen (tempfile, "a")) == NULL)
|
|
|
420 fatal ("can't reopen article file");
|
|
|
421
|
|
|
422 fixperms (qfile);
|
|
|
423 asetuid (myuid);
|
|
|
424 }
|
|
|
425 else
|
|
|
426 fprintf (qfile, "%s", line);
|
|
|
427 }
|
|
|
428 }
|
|
|
429
|
|
|
430 /* append signature file */
|
|
|
431 #ifdef _OSK
|
|
|
432 sprintf (line, "%s/.signature", homedir);
|
|
|
433 #else
|
|
|
434 sprintf (line, "%s/%s/signature", homedir, uudir);
|
|
|
435 #endif
|
|
|
436
|
|
|
437 if ((sigfile = fopen (line, "r")) != NULL)
|
|
|
438 {
|
|
|
439 fprintf (qfile, "-- \n");
|
|
|
440 puts ("--");
|
|
|
441
|
|
|
442 while (fgets (line, sizeof (line), sigfile) != NULL)
|
|
|
443 {
|
|
|
444 if ((p = strchr (line, '\n')) != NULL)
|
|
|
445 *p = '\0';
|
|
|
446
|
|
|
447 fprintf (qfile, "%s\n", line);
|
|
|
448 printf ("%s\n", line);
|
|
|
449 }
|
|
|
450 fclose (sigfile);
|
|
|
451 }
|
|
|
452
|
|
|
453 /* close article file */
|
|
|
454 fclose (qfile);
|
|
|
455
|
|
|
456 /* transfer article file to queued data file and replace CRs with LFs */
|
|
|
457 asetuid (0);
|
|
|
458 filemovl (tempfile, dname);
|
|
|
459 *tempfile = '\0';
|
|
|
460 fputs ("\n\nposting your article...locally...", stdout);
|
|
|
461 fflush (stdout);
|
|
|
462
|
|
|
463 /* post article locally */
|
|
|
464 sprintf (line, "rnews -x%d -n%s %s", debuglvl, newsgroup, dname);
|
|
|
465
|
|
|
466 if ((result = docmd_na (line)) != 0)
|
|
|
467 {
|
|
|
468 unlink (dname);
|
|
|
469 interrupt (result);
|
|
|
470 }
|
|
|
471
|
|
|
472 /* local article only? */
|
|
|
473 if (localonly)
|
|
|
474 {
|
|
|
475 asetuid (0); /* so we can delete the file -- BAS */
|
|
|
476 unlink (dname);
|
|
|
477 asetuid (myuid);
|
|
|
478 cls();
|
|
|
479 return (0);
|
|
|
480 }
|
|
|
481
|
|
|
482 fputs ("and to the net...", stdout);
|
|
|
483 fflush (stdout);
|
|
|
484
|
|
|
485 /* write job file */
|
|
|
486 asetuid (0);
|
|
|
487
|
|
|
488 if ((qfile = fopen (jname, "w")) == NULL)
|
|
|
489 fatal ("can't create job file");
|
|
|
490
|
|
|
491 fixperms (qfile);
|
|
|
492 chown (jname, myuid);
|
|
|
493
|
|
|
494 fprintf (qfile, "U %s %s\x0a", user, nodename);
|
|
|
495 fprintf (qfile, "F %s\x0a", dname);
|
|
|
496 fprintf (qfile, "I %s\x0a", dname);
|
|
|
497 fputs ("C rnews \x0a", qfile);
|
|
|
498 fclose( qfile);
|
|
|
499
|
|
|
500 /* write control file */
|
|
|
501 if ((qfile = fopen (cname, "w")) == NULL)
|
|
|
502 fatal ("can't create control file");
|
|
|
503
|
|
|
504 fixperms (qfile);
|
|
|
505 chown (cname, myuid);
|
|
|
506
|
|
|
507 fprintf (qfile, "S %s %s %s - %s 0666 %s\n",
|
|
|
508 dname, dname, user, dname, user);
|
|
|
509
|
|
|
510 fprintf (qfile, "S %s %s %s - %s 0666 %s\n",
|
|
|
511 jname, xname, user, jname, user);
|
|
|
512
|
|
|
513 fclose (qfile);
|
|
|
514 asetuid (myuid);
|
|
|
515 cls();
|
|
|
516 return (0);
|
|
|
517 }
|
|
|
518
|
|
|
519
|
|
|
520
|
|
|
521 int getvalue (file, prompt, filename)
|
|
|
522 FILE *file;
|
|
|
523 char *prompt, *filename;
|
|
|
524 {
|
|
|
525 char line[100];
|
|
|
526 flag status;
|
|
|
527 FILE *file2;
|
|
|
528 char *p;
|
|
|
529
|
|
|
530 do
|
|
|
531 {
|
|
|
532 /* get value */
|
|
|
533 do
|
|
|
534 {
|
|
|
535 printf ("%s: ", prompt);
|
|
|
536
|
|
|
537 if (mfgets (value, sizeof (value), stdin) == NULL)
|
|
|
538 {
|
|
|
539 errno = 0;
|
|
|
540 fatal (got_escape);
|
|
|
541 }
|
|
|
542
|
|
|
543 if (*value == '\0')
|
|
|
544 printf ("\nThe \"%s\" field is required.\n\n", prompt);
|
|
|
545 }
|
|
|
546 while (*value == '\0');
|
|
|
547
|
|
|
548 status = findent (value, filename, line, sizeof(line));
|
|
|
549
|
|
|
550 if (!status)
|
|
|
551 {
|
|
|
552 /* dump out valid values */
|
|
|
553 printf ("\nInvalid -- valid values for \"%s\" are:\n", prompt);
|
|
|
554
|
|
|
555 if ((file2 = fopen (filename, "r")) != NULL)
|
|
|
556 {
|
|
|
557 while (mfgets (line, sizeof (line), file2) != NULL)
|
|
|
558 {
|
|
|
559 if ((p = strchr (line, ' ')) != NULL)
|
|
|
560 *p = '\0';
|
|
|
561
|
|
|
562 printf (" %s\n", line);
|
|
|
563 }
|
|
|
564 fclose (file);
|
|
|
565 }
|
|
|
566 putchar ('\n');
|
|
|
567 }
|
|
|
568 }
|
|
|
569 while (!status);
|
|
|
570
|
|
|
571 fprintf (file, "%s: %s\n", prompt, value);
|
|
|
572 }
|
|
|
573
|
|
|
574
|
|
|
575
|
|
|
576 int getfield (file, prompt, needthis)
|
|
|
577 FILE *file;
|
|
|
578 char *prompt;
|
|
|
579 flag needthis; /* field required? */
|
|
|
580 {
|
|
|
581 register char *p;
|
|
|
582
|
|
|
583 p = value;
|
|
|
584 do
|
|
|
585 {
|
|
|
586 printf ("%s: ", prompt);
|
|
|
587
|
|
|
588 if (mfgets (p, sizeof (value), stdin) == NULL)
|
|
|
589 {
|
|
|
590 errno = 0;
|
|
|
591 fatal (got_escape);
|
|
|
592 }
|
|
|
593
|
|
|
594 if (needthis && *p == '\0')
|
|
|
595 printf ("\nThe \"%s\" field is required.\n\n", prompt);
|
|
|
596
|
|
|
597 }
|
|
|
598 while (needthis && *p == '\0');
|
|
|
599
|
|
|
600 fprintf (file, "%s: %s\n", prompt, p);
|
|
|
601 return (strlen (p));
|
|
|
602 }
|
|
|
603
|
|
|
604
|
|
|
605
|
|
|
606 /* check to see if this is a local newsgroup */
|
|
|
607
|
|
|
608 int localcheck()
|
|
|
609 {
|
|
|
610 /* newsgroup begins with "nodename."? */
|
|
|
611 strcat (strcpy (temp, nodename), ".");
|
|
|
612
|
|
|
613 if (strncmp (newsgroup, temp, strlen (temp)) == 0)
|
|
|
614 return (TRUE);
|
|
|
615
|
|
|
616 /* newsgroup begins with "local." or "general."? */
|
|
|
617 if (strncmp (newsgroup, "local.", 6) == 0)
|
|
|
618 return (TRUE);
|
|
|
619 else if (strncmp (newsgroup, "general.", 8) == 0)
|
|
|
620 return (TRUE);
|
|
|
621 else
|
|
|
622 return (FALSE);
|
|
|
623 }
|
|
|
624
|
|
|
625
|
|
|
626
|
|
|
627 int fatal (msg)
|
|
|
628 char *msg;
|
|
|
629 {
|
|
|
630 fprintf (stderr, "\npostnews: %s", msg);
|
|
|
631
|
|
|
632 if (errno != 0)
|
|
|
633 fprintf (stderr, "...error %d", errno);
|
|
|
634
|
|
|
635 putc ('\n', stderr);
|
|
|
636 interrupt (0);
|
|
|
637 }
|
|
|
638
|
|
|
639
|
|
|
640
|
|
|
641 int badparam (msg)
|
|
|
642 char *msg;
|
|
|
643 {
|
|
|
644 fprintf (stderr, "postnews: %s not in Parameters\n", msg);
|
|
|
645 interrupt (0);
|
|
|
646 }
|
|
|
647
|
|
|
648
|
|
|
649
|
|
|
650 /* deal with interruptions */
|
|
|
651
|
|
|
652 int interrupt (sig)
|
|
|
653 int sig;
|
|
|
654 {
|
|
|
655 if (*tempfile != '\0')
|
|
|
656 unlink (tempfile);
|
|
|
657 #ifndef _OSK
|
|
|
658 if (usedotilde)
|
|
|
659 munload (dotilde, 0);
|
|
|
660 #endif
|
|
|
661 exit (sig);
|
|
|
662 }
|
|
|
663
|
|
|
664
|
|
|
665
|
|
|
666 int usage()
|
|
|
667 {
|
|
|
668 char *stredetab();
|
|
|
669 register char **ptr;
|
|
|
670 static char *help[] = {
|
|
|
671 "postnews\t post news to Usenet",
|
|
|
672 " ",
|
|
|
673 "Usage: postnews [options]",
|
|
|
674 "\t Options:",
|
|
|
675 "\t\t-f <file>",
|
|
|
676 "\t\t-n <newsgroup>",
|
|
|
677 "\t\t-S <system>",
|
|
|
678 "\t\t-s <subject>",
|
|
|
679 "\t\t-i <reference-ID>",
|
|
|
680 "\t\t-a <reference-article>",
|
|
|
681 #ifndef TERMCAP
|
|
|
682 "\t\t-t (force /t2 \"dumb\" windowing codes)",
|
|
|
683 #endif
|
|
|
684 NULL
|
|
|
685 };
|
|
|
686
|
|
|
687 putc ('\n', stderr);
|
|
|
688 for (ptr = help; *ptr != NULL; ++ptr)
|
|
|
689 fprintf (stderr, "%s\n", strdetab (strcpy (temp, *ptr), 6));
|
|
|
690
|
|
|
691 fprintf (stderr, "\nv%s (%s) This is free software released under the GNU General Public\n",
|
|
|
692 version, VERDATE);
|
|
|
693 fputs ("License. Please send suggestions/bug reports to: bob@kc2wz.bubble.org\n", stderr);
|
|
|
694 exit (0);
|
|
|
695 }
|
