|
0
|
1 /* popaka.c - generate POP entries for MMDF-II alias file */
|
|
|
2 #ifndef lint
|
|
|
3 static char ident[] = "@(#)$Id$";
|
|
|
4 #endif /* lint */
|
|
|
5
|
|
|
6 #include <stdio.h>
|
|
|
7 #include "../zotnet/bboards.h"
|
|
|
8
|
|
|
9 static process();
|
|
|
10 /* */
|
|
|
11
|
|
|
12 /* ARGSUSED */
|
|
|
13
|
|
|
14 main (argc, argv)
|
|
|
15 int argc;
|
|
|
16 char **argv;
|
|
|
17 {
|
|
|
18 struct bboard *bb;
|
|
|
19
|
|
|
20 if (!setbbinfo (POPUID, POPDB, 1)) {
|
|
|
21 fprintf (stderr, "setbbinfo(%s, %s, 1) failed -- %s\n",
|
|
|
22 POPUID, POPDB, getbberr ());
|
|
|
23 exit (1);
|
|
|
24 }
|
|
|
25
|
|
|
26 (void) setbbent (SB_STAY);
|
|
|
27 while (bb = getbbent ())
|
|
|
28 process (bb);
|
|
|
29 (void) endbbent ();
|
|
|
30
|
|
|
31 exit (0);
|
|
|
32 }
|
|
|
33
|
|
|
34 /* */
|
|
|
35
|
|
|
36 static process (bb)
|
|
|
37 struct bboard *bb;
|
|
|
38 {
|
|
|
39 printf ("%s: %s@pop\n", bb -> bb_name, bb -> bb_name);
|
|
|
40 }
|
