home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
rtsi.com
/
2014.01.www.rtsi.com.tar
/
www.rtsi.com
/
OS9
/
OSK
/
TELECOM
/
UUCPBB21
/
uucpbb21.lzh
/
UUCPBB21
/
subscribe.c
< prev
next >
Wrap
Text File
|
1994-09-25
|
4KB
|
143 lines
/* subscribe.c This program lets a user subscribe to one or more newgroups.
Copyright (C) 1990, 1993 Rick Adams and Bob Billson
This file is part of the OS-9 UUCP package, UUCPbb.
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2 of the License, or
(at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
The author of UUCPbb, Bob Billson, can be contacted at:
bob@kc2wz.bubble.org or uunet!kc2wz!bob or by snail mail:
21 Bates Way, Westfield, NJ 07090
*/
#define MAIN
#include "uucp.h"
char line[512];
main (argc, argv)
int argc;
char *argv[];
{
register int i;
char *p;
if (argc < 2
|| (argc >= 2 && (argv[1][0] == '-' && argv[1][1] == '?')))
{
usage();
}
if ((homedir = getenv ("HOME")) != NULL)
homedir = strdup (homedir);
else
fatal ("can't get HOME environment");
p = line;
#ifdef _OSK
sprintf (p, "%s", homedir);
#else
sprintf (p, "%s/%s", homedir, uudir);
#endif
if (chdir (p) == -1)
{
#ifdef _OSK
sprintf (p, "can't change to %s", homedir);
#else
sprintf (p, "can't change to %s/%s", homedir, uudir);
#endif
fatal (p);
}
for (i = 1; i < argc; i++)
subscribe (argv[i]);
exit (0);
}
int subscribe (newsgroup)
char *newsgroup;
{
register char *p;
FILE *infile, *outfile;
char group[512], flag, articles[512], newnewsrc[15];
char *newsrc = _NEWSRC;
p = line;
sprintf (newnewsrc, "new.%s", newsrc);
if ((infile = fopen (newsrc, "r")) == NULL)
{
sprintf (p, "can't open %s file", newsrc);
fatal (p);
}
if ((outfile = fopen (newnewsrc, "w")) == NULL)
{
sprintf (p, "can't create %s", newnewsrc);
fatal (p);
}
while (fgets (p, sizeof (line), infile) != NULL)
{
*articles = '\0';
sscanf (p, "%[^!:]%c %[^\n]\n", group, &flag, articles);
if ((strcmp (newsgroup, "all") == 0)
|| (strcmp (newsgroup, group) == 0))
{
if (flag == ':')
printf ("Newsgroup %s is already subscribed.\n", group);
else
{
printf ("Newsgroup %s is now subscribed.\n", group);
flag = ':';
}
}
fprintf (outfile, "%s%c %s\n", group, flag, articles);
}
fclose (infile);
fclose (outfile);
filemove (newnewsrc, newsrc);
}
int fatal (msg)
char *msg;
{
fprintf (stderr, "subscribe: %s...error %d\n", msg, errno);
exit (0);
}
int usage()
{
fputs ("subscribe: subscribe to Usenet newsgroups\n\n", stderr);
fputs ("usage: subscribe <newsgroup> [newsgroup...]\n", stderr);
fputs (" if <newsgroup> is 'all', all newsgroups are subscribed to\n\n", stderr);
fprintf (stderr, "v%s (%s) This is free software released under the GNU General Public\n",
version, VERDATE);
fputs ("License. Please send suggestions/bug reports to: bob@kc2wz.bubble.org\n", stderr);
exit (0);
}