4.3BSD-Tahoe/usr/src/new/rn/init.c
/* $Header: init.c,v 4.3.1.4 86/09/05 14:24:02 lwall Exp $
*
* $Log: init.c,v $
* Revision 4.3.1.4 86/09/05 14:24:02 lwall
* Removed net.announce dependency.
*
* Revision 4.3.1.3 85/07/23 18:08:36 lwall
* Fixed up NOLINEBUF option to work.
*
* Revision 4.3.1.2 85/05/21 14:22:46 lwall
* Sped up "rn -c" by avoiding unnecessary initialization.
*
* Revision 4.3.1.1 85/05/10 11:33:39 lwall
* Branch for patches.
*
* Revision 4.3 85/05/01 16:16:13 lwall
* Baseline for release with 4.3bsd.
*
*/
#include "EXTERN.h"
#include "common.h"
#include "util.h"
#include "final.h"
#include "term.h"
#include "last.h"
#include "rn.h"
#include "rcstuff.h"
#include "ngdata.h"
#include "only.h"
#include "intrp.h"
#include "addng.h"
#include "sw.h"
#include "art.h"
#include "artsrch.h"
#include "artio.h"
#include "backpage.h"
#include "bits.h"
#include "cheat.h"
#include "head.h"
#include "help.h"
#include "kfile.h"
#include "ngsrch.h"
#include "ngstuff.h"
#include "rcln.h"
#include "respond.h"
#include "ng.h"
#include "INTERN.h"
#include "init.h"
bool
initialize(argc,argv)
int argc;
char *argv[];
{
char *tcbuf;
register bool foundany = FALSE;
long time();
#ifdef NOLINEBUF
static char std_out_buf[BUFSIZ]; /* must be static or malloced */
setbuf(stdout, std_out_buf);
#endif
tcbuf = safemalloc(1024); /* make temp buffer for termcap and */
/* other initialization stuff */
/* init terminal */
term_init(); /* must precede sw_init() so that */
/* ospeed is set for baud-rate */
/* switches. Actually terminal */
/* mode setting is in term_set() */
/* we have to know rnlib to look up global switches in %X/INIT */
lib = savestr(filexp(LIB));
rnlib = savestr(filexp(RNLIB));
/* decode switches */
sw_init(argc,argv,&tcbuf); /* must not do % interps! */
/* (but may mung environment) */
/* init signals, status flags */
final_init();
/* start up file expansion and the % interpreter */
intrp_init(tcbuf);
/* now make sure we have a current working directory */
if (!checkflag)
cwd_check();
/* now that we know where to save things, cd to news directory */
if (chdir(spool)) {
printf(nocd,spool) FLUSH;
finalize(1);
}
/* if we aren't just checking, turn off echo */
if (!checkflag)
term_set(tcbuf);
/* get info on last rn run, if any */
if (!checkflag)
last_init(tcbuf);
free(tcbuf); /* recover 1024 bytes */
/* make sure we are the sole possessors of .newsrc */
if (!checkflag)
lock_check();
/* check for news news */
if (!checkflag)
newsnews_check();
/* open active file, etc. */
ngdata_init();
/* now read in the .newsrc file */
foundany = rcstuff_init();
/* it looks like we will actually read something, so init everything */
addng_init();
art_init();
artio_init();
artsrch_init();
backpage_init();
bits_init();
cheat_init();
/* final_init(); already done */
head_init();
help_init();
/* intrp_init(); already done */
kfile_init();
/* last_init(); already done */
ng_init();
/* ngdata_init(); already done */
ngsrch_init();
ngstuff_init();
only_init();
rcln_init();
/* rcstuff_init(); already done */
respond_init();
rn_init();
search_init();
/* sw_init(); already done */
/* term_init(); already done */
util_init();
#ifdef FINDNEWNG
fstat(actfp->_file,&filestat); /* did active file grow? */
if (filestat.st_size != lastactsiz) {
long actsiz = filestat.st_size; /* remember new size */
NG_NUM oldnext = nextrcline; /* remember # lines in newsrc */
#ifdef FASTNEW
bool munged = writesoft || !lastactsiz;
/* bad soft ptrs -> edited active */
#else
bool munged = TRUE; /* just assume .newsrc munged */
#endif
#ifdef VERBOSE
IF(verbose)
fputs("\nChecking active list for new newsgroups...\n",stdout)
FLUSH;
ELSE
#endif
#ifdef TERSE
fputs("\nNew newsgroups:\n",stdout) FLUSH;
#endif
#ifdef FASTNEW
if (!munged) { /* maybe just do tail of file? */
fseek(actfp,lastactsiz-1,0);
fgets(buf,LBUFLEN,actfp);
munged = (*buf != '\n');
if (!munged)
munged = newlist(munged,FALSE);
}
#endif
if (munged) { /* must we scan entire file? */
fseek(actfp,0L,0); /* rewind active file */
newlist(munged,FALSE); /* sure hope they use hashing... */
}
lastactsiz = actsiz; /* remember for .rnlast */
if (nextrcline != oldnext) { /* did we add any new groups? */
foundany = TRUE; /* let main() know */
starthere = 0; /* and start ng scan from the top */
}
}
#endif
time(&lasttime); /* remember when we inited-- */
/* ends up back in .rnlast */
writelast(); /* in fact, put it there now */
#ifdef FINDNEWNG
# ifdef ONLY
if (maxngtodo) /* patterns on command line? */
foundany |= scanactive();
# endif
#endif
return foundany;
}
/* make sure there is no rn out there already */
void
lock_check()
{
lockname = savestr(filexp(LOCKNAME));
if (!checkflag) {
tmpfp = fopen(lockname,"r");
if (tmpfp != Nullfp) {
int processnum;
fgets(buf,LBUFLEN,tmpfp);
fclose(tmpfp);
processnum = atoi(buf);
#ifdef VERBOSE
IF(verbose)
printf("You seem to have left an rn running, process %d.\n",
processnum) FLUSH;
ELSE
#endif
#ifdef TERSE
printf("Rn left running, #%d.\n", processnum) FLUSH;
#endif
if (kill(processnum, SIGEMT)) {
/* does process not exist? */
/* (rn ignores SIGEMT) */
sleep(2);
#ifdef VERBOSE
IF(verbose)
fputs("\n\
That process does not seem to exist anymore. The count of read articles\n\
may be incorrect in the last newsgroup accessed by that other (defunct)\n\
process.\n\n",stdout) FLUSH;
ELSE
#endif
#ifdef TERSE
fputs("\nProcess crashed.\n",stdout) FLUSH;
#endif
if (*lastngname) {
#ifdef VERBOSE
IF(verbose)
printf("(The last newsgroup accessed was %s.)\n\n",
lastngname) FLUSH;
ELSE
#endif
#ifdef TERSE
printf("(In %s.)\n\n",lastngname) FLUSH;
#endif
}
get_anything();
putchar('\n') FLUSH;
}
else {
#ifdef VERBOSE
IF(verbose)
fputs("\n\
You may not have two copies of rn running simultaneously. Goodbye.\n\
",stdout) FLUSH;
ELSE
#endif
#ifdef TERSE
fputs("\nCan't start another.\n",stdout) FLUSH;
#endif
finalize(0);
}
}
tmpfp = fopen(lockname,"w");
if (tmpfp == Nullfp) {
printf(cantcreate,lockname) FLUSH;
sig_catcher(0);
}
fprintf(tmpfp,"%d\n",getpid());
fclose(tmpfp);
}
}
void
newsnews_check()
{
char *newsnewsname = filexp(NEWSNEWSNAME);
if ((tmpfp = fopen(newsnewsname,"r")) != Nullfp) {
fstat(tmpfp->_file,&filestat);
if (filestat.st_mtime > lasttime) {
while (fgets(buf,sizeof(buf),tmpfp) != Nullch)
fputs(buf,stdout) FLUSH;
get_anything();
putchar('\n') FLUSH;
}
fclose(tmpfp);
}
}