v23i073: Complete reposting of TRN at patchlevel 1, Part14/14
Rich Salz
rsalz at bbn.com
Sat Jan 5 08:06:09 AEST 1991
Submitted-by: Wayne Davison <0004475895 at mcimail.com>
Posting-number: Volume 23, Issue 73
Archive-name: trn/part14
#! /bin/sh
# This is a shell archive. Remove anything before this line, then feed it
# into a shell via "sh file" or similar. To overwrite existing files,
# type "sh file -c".
# The tool that generated this appeared in the comp.sources.unix newsgroup;
# send mail to comp-sources-unix at uunet.uu.net if you want that tool.
# Contents: EXTERN.h INTERN.h addng.h art.h artio.h artsrch.h
# artstate.h backpage.h cheat.h final.h help.h init.h intrp.h last.c
# last.h makedir.SH mt.check.SH mthreads.h newsnews.SH ng.h ngdata.h
# ngsrch.h ngstuff.h norm.saver.SH rcln.h rcstuff.h respond.h rn.h
# rthreads.h search.h sw.h util.h uudecode.h
# Wrapped by rsalz at litchi.bbn.com on Thu Dec 27 11:34:14 1990
PATH=/bin:/usr/bin:/usr/ucb ; export PATH
echo If this archive is complete, you will see the following message:
echo ' "shar: End of archive 14 (of 14)."'
if test -f 'EXTERN.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'EXTERN.h'\"
else
echo shar: Extracting \"'EXTERN.h'\" \(245 characters\)
sed "s/^X//" >'EXTERN.h' <<'END_OF_FILE'
X/* $Header: EXTERN.h,v 4.3 85/05/01 11:58:01 lwall Exp $
X *
X * $Log: EXTERN.h,v $
X * Revision 4.3 85/05/01 11:58:01 lwall
X * Baseline for release with 4.3bsd.
X *
X */
X
X#undef EXT
X#define EXT extern
X
X#undef INIT
X#define INIT(x)
X
X#undef DOINIT
END_OF_FILE
if test 245 -ne `wc -c <'EXTERN.h'`; then
echo shar: \"'EXTERN.h'\" unpacked with wrong size!
fi
# end of 'EXTERN.h'
fi
if test -f 'INTERN.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'INTERN.h'\"
else
echo shar: Extracting \"'INTERN.h'\" \(243 characters\)
sed "s/^X//" >'INTERN.h' <<'END_OF_FILE'
X/* $Header: INTERN.h,v 4.3 85/05/01 11:33:16 lwall Exp $
X *
X * $Log: INTERN.h,v $
X * Revision 4.3 85/05/01 11:33:16 lwall
X * Baseline for release with 4.3bsd.
X *
X */
X
X#undef EXT
X#define EXT
X
X#undef INIT
X#define INIT(x) = x
X
X#define DOINIT
END_OF_FILE
if test 243 -ne `wc -c <'INTERN.h'`; then
echo shar: \"'INTERN.h'\" unpacked with wrong size!
fi
# end of 'INTERN.h'
fi
if test -f 'addng.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'addng.h'\"
else
echo shar: Extracting \"'addng.h'\" \(275 characters\)
sed "s/^X//" >'addng.h' <<'END_OF_FILE'
X/* $Header: addng.h,v 4.3 85/05/01 11:34:48 lwall Exp $
X *
X * $Log: addng.h,v $
X * Revision 4.3 85/05/01 11:34:48 lwall
X * Baseline for release with 4.3bsd.
X *
X */
X
Xvoid addng_init();
X#ifdef FINDNEWNG
X bool newlist();
X long birthof();
X bool scanactive();
X#endif
END_OF_FILE
if test 275 -ne `wc -c <'addng.h'`; then
echo shar: \"'addng.h'\" unpacked with wrong size!
fi
# end of 'addng.h'
fi
if test -f 'art.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'art.h'\"
else
echo shar: Extracting \"'art.h'\" \(347 characters\)
sed "s/^X//" >'art.h' <<'END_OF_FILE'
X/* $Header: art.h,v 4.3 85/05/01 11:35:29 lwall Exp $
X *
X * $Log: art.h,v $
X * Revision 4.3 85/05/01 11:35:29 lwall
X * Baseline for release with 4.3bsd.
X *
X */
X
X/* do_article() return values */
X
X#define DA_NORM 0
X#define DA_RAISE 1
X#define DA_CLEAN 2
X#define DA_TOEND 3
X
Xvoid art_init();
Xint do_article();
Xint page_switch();
Xbool innermore();
END_OF_FILE
if test 347 -ne `wc -c <'art.h'`; then
echo shar: \"'art.h'\" unpacked with wrong size!
fi
# end of 'art.h'
fi
if test -f 'artio.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'artio.h'\"
else
echo shar: Extracting \"'artio.h'\" \(1319 characters\)
sed "s/^X//" >'artio.h' <<'END_OF_FILE'
X/* $Header: artio.h,v 4.3.3.1 90/07/21 20:12:10 davison Trn $
X *
X * $Log: artio.h,v $
X * Revision 4.3.3.1 90/07/21 20:12:10 davison
X * Initial Trn Release
X *
X * Revision 4.3.2.2 89/11/27 01:27:53 sob
X * Altered NNTP code per ideas suggested by Bela Lubkin
X * <filbo at gorn.santa-cruz.ca.us>
X *
X * Revision 4.3.2.1 89/11/26 22:41:24 sob
X * Added RRN support
X *
X * Revision 4.3 85/05/01 11:35:43 lwall
X * Baseline for release with 4.3bsd.
X *
X */
X
XEXT ART_POS artpos INIT(0); /* byte position in article file */
X
XEXT ART_LINE artline INIT(0); /* current line number in article file */
XEXT FILE *artfp INIT(Nullfp); /* current article file pointer */
XEXT ART_NUM openart INIT(0); /* what is the currently open article number? */
X#ifdef LINKART
X EXT char *linkartname INIT(nullstr);/* real name of article for Eunice */
X#endif
X#ifdef SERVER
XEXT ART_PART openpart INIT(0); /* how much of that article do we have? */
XFILE *nntpopen(); /* get an article unless already retrieved */
X
Xvoid nntpclose();
X/* MUST be in increasing order of completeness! */
X#define GET_STATUS 1 /* test for existence only */
X#define GET_HEADER 2 /* if only header items are desired */
X#define GET_ARTICLE 3 /* retreive full article */
X#endif
X
Xvoid artio_init();
XFILE *artopen(); /* open an article unless already opened */
END_OF_FILE
if test 1319 -ne `wc -c <'artio.h'`; then
echo shar: \"'artio.h'\" unpacked with wrong size!
fi
# end of 'artio.h'
fi
if test -f 'artsrch.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'artsrch.h'\"
else
echo shar: Extracting \"'artsrch.h'\" \(963 characters\)
sed "s/^X//" >'artsrch.h' <<'END_OF_FILE'
X/* $Header: artsrch.h,v 4.3 85/05/01 11:35:55 lwall Exp $
X *
X * $Log: artsrch.h,v $
X * Revision 4.3 85/05/01 11:35:55 lwall
X * Baseline for release with 4.3bsd.
X *
X */
X
X#ifndef NBRA
X#include "search.h"
X#endif
X
X#ifdef ARTSEARCH
X
X#define SRCH_ABORT 0
X#define SRCH_INTR 1
X#define SRCH_FOUND 2
X#define SRCH_NOTFOUND 3
X#define SRCH_DONE 4
X#define SRCH_SUBJDONE 5
X#define SRCH_ERROR 6
X#endif
X
XEXT char *lastpat INIT(nullstr); /* last search pattern */
X#ifdef ARTSEARCH
X EXT COMPEX sub_compex; /* last compiled subject search */
X EXT COMPEX art_compex; /* last compiled normal search */
X# ifdef CONDSUB
X EXT COMPEX *bra_compex INIT(&art_compex);
X /* current compex with brackets */
X# endif
X EXT char art_howmuch; /* search just the subjects */
X EXT bool art_doread; /* search read articles? */
X#endif
X
Xvoid artsrch_init();
X#ifdef ARTSEARCH
X int art_search();
X bool wanted(); /* return TRUE if current article matches pattern */
X#endif
END_OF_FILE
if test 963 -ne `wc -c <'artsrch.h'`; then
echo shar: \"'artsrch.h'\" unpacked with wrong size!
fi
# end of 'artsrch.h'
fi
if test -f 'artstate.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'artstate.h'\"
else
echo shar: Extracting \"'artstate.h'\" \(1097 characters\)
sed "s/^X//" >'artstate.h' <<'END_OF_FILE'
X/* $Header: artstate.h,v 4.3.1.2 85/05/13 09:30:30 lwall Exp $
X *
X * $Log: artstate.h,v $
X * Revision 4.3.1.2 85/05/13 09:30:30 lwall
X * Added CUSTOMLINES option.
X *
X * Revision 4.3.1.1 85/05/10 11:31:32 lwall
X * Branch for patches.
X *
X * Revision 4.3 85/05/01 11:35:59 lwall
X * Baseline for release with 4.3bsd.
X *
X */
X
XEXT bool reread INIT(FALSE); /* consider current art temporarily */
X /* unread? */
XEXT bool do_fseek INIT(FALSE); /* should we back up in article file? */
X
XEXT bool oldsubject INIT(FALSE); /* not 1st art in subject thread */
XEXT ART_LINE topline INIT(-1); /* top line of current screen */
XEXT bool do_hiding INIT(TRUE); /* hide header lines with -h? */
X#ifdef ROTATION
XEXT bool rotate INIT(FALSE); /* has rotation been requested? */
X#endif
XEXT char *prompt; /* pointer to current prompt */
X
XEXT char *firstline INIT(Nullch); /* special first line? */
X#ifdef CUSTOMLINES
XEXT char *hideline INIT(Nullch); /* custom line hiding? */
XEXT char *pagestop INIT(Nullch); /* custom page terminator? */
XEXT COMPEX hide_compex;
XEXT COMPEX page_compex;
X#endif
END_OF_FILE
if test 1097 -ne `wc -c <'artstate.h'`; then
echo shar: \"'artstate.h'\" unpacked with wrong size!
fi
# end of 'artstate.h'
fi
if test -f 'backpage.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'backpage.h'\"
else
echo shar: Extracting \"'backpage.h'\" \(512 characters\)
sed "s/^X//" >'backpage.h' <<'END_OF_FILE'
X/* $Header: backpage.h,v 4.3 85/05/01 11:36:11 lwall Exp $
X *
X * $Log: backpage.h,v $
X * Revision 4.3 85/05/01 11:36:11 lwall
X * Baseline for release with 4.3bsd.
X *
X */
X
X/* things for doing the 'back page' command */
X
XEXT int varyfd INIT(0); /* virtual array file for storing */
X /* file offsets */
XEXT ART_POS varybuf[VARYSIZE]; /* current window onto virtual array */
X
XEXT long oldoffset INIT(-1); /* offset to block currently in window */
X
Xvoid backpage_init();
XART_POS vrdary();
Xvoid vwtary();
END_OF_FILE
if test 512 -ne `wc -c <'backpage.h'`; then
echo shar: \"'backpage.h'\" unpacked with wrong size!
fi
# end of 'backpage.h'
fi
if test -f 'cheat.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'cheat.h'\"
else
echo shar: Extracting \"'cheat.h'\" \(449 characters\)
sed "s/^X//" >'cheat.h' <<'END_OF_FILE'
X/* $Header: cheat.h,v 4.3 85/05/01 11:36:58 lwall Exp $
X *
X * $Log: cheat.h,v $
X * Revision 4.3 85/05/01 11:36:58 lwall
X * Baseline for release with 4.3bsd.
X *
X */
X
X#ifdef ARTSEARCH
XEXT ART_NUM srchahead INIT(0); /* are we in subject scan mode? */
X /* (if so, contains art # found or -1) */
X#endif
X
X#ifdef PENDING
X# ifdef CACHESUBJ
X EXT ART_NUM subj_to_get;
X# endif
X#endif
X
Xvoid cheat_init();
Xvoid look_ahead();
Xvoid collect_subjects();
END_OF_FILE
if test 449 -ne `wc -c <'cheat.h'`; then
echo shar: \"'cheat.h'\" unpacked with wrong size!
fi
# end of 'cheat.h'
fi
if test -f 'final.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'final.h'\"
else
echo shar: Extracting \"'final.h'\" \(904 characters\)
sed "s/^X//" >'final.h' <<'END_OF_FILE'
X/* $Header: final.h,v 4.3.3.1 90/06/20 22:37:04 davison Trn $
X *
X * $Log: final.h,v $
X * Revision 4.3.3.1 90/06/20 22:37:04 davison
X * Initial Trn Release
X *
X * Revision 4.3 85/05/01 11:38:17 lwall
X * Baseline for release with 4.3bsd.
X *
X */
X
X/* cleanup status for fast exits */
X
XEXT bool panic INIT(FALSE); /* we got hung up or something-- */
X /* so leave tty alone */
XEXT bool rc_changed INIT(FALSE); /* need we rewrite .newsrc? */
XEXT bool doing_ng INIT(FALSE); /* do we need to reconstitute */
X /* current rc line? */
X
XEXT char int_count INIT(0); /* how many interrupts we've had */
X
XEXT bool clear_on_stop INIT(FALSE); /* set when handling the stop signal */
X /* would leave the screen a mess */
X
X/* signal catching routines */
X
Xint int_catcher();
Xint sig_catcher();
X#ifdef SIGTSTP
X int stop_catcher();
X int cont_catcher();
X#endif
X
Xvoid final_init();
Xvoid finalize();
END_OF_FILE
if test 904 -ne `wc -c <'final.h'`; then
echo shar: \"'final.h'\" unpacked with wrong size!
fi
# end of 'final.h'
fi
if test -f 'help.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'help.h'\"
else
echo shar: Extracting \"'help.h'\" \(406 characters\)
sed "s/^X//" >'help.h' <<'END_OF_FILE'
X/* $Header: help.h,v 4.3.3.1 90/06/20 22:37:34 davison Trn $
X *
X * $Log: help.h,v $
X * Revision 4.3.3.1 90/06/20 22:37:34 davison
X * Initial Trn Release
X *
X * Revision 4.3 85/05/01 11:39:19 lwall
X * Baseline for release with 4.3bsd.
X *
X */
X
Xvoid help_init();
Xint help_ng();
Xint help_art();
Xint help_page();
X#ifdef ESCSUBS
X int help_subs();
X#endif
X#ifdef USETHREADS
X int help_select();
X#endif
END_OF_FILE
if test 406 -ne `wc -c <'help.h'`; then
echo shar: \"'help.h'\" unpacked with wrong size!
fi
# end of 'help.h'
fi
if test -f 'init.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'init.h'\"
else
echo shar: Extracting \"'init.h'\" \(285 characters\)
sed "s/^X//" >'init.h' <<'END_OF_FILE'
X/* $Header: init.h,v 4.3 85/05/01 11:40:46 lwall Exp $
X *
X * $Log: init.h,v $
X * Revision 4.3 85/05/01 11:40:46 lwall
X * Baseline for release with 4.3bsd.
X *
X */
X
XEXT char *lockname INIT(nullstr);
X
Xbool initialize();
Xvoid lock_check();
Xvoid newsnews_check();
Xvoid version_check();
END_OF_FILE
if test 285 -ne `wc -c <'init.h'`; then
echo shar: \"'init.h'\" unpacked with wrong size!
fi
# end of 'init.h'
fi
if test -f 'intrp.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'intrp.h'\"
else
echo shar: Extracting \"'intrp.h'\" \(881 characters\)
sed "s/^X//" >'intrp.h' <<'END_OF_FILE'
X/* $Header: intrp.h,v 4.3.3.1 90/06/20 22:38:00 davison Trn $
X *
X * $Log: intrp.h,v $
X * Revision 4.3.3.1 90/06/20 22:38:00 davison
X * Initial Trn Release
X *
X * Revision 4.3 85/05/01 11:41:48 lwall
X * Baseline for release with 4.3bsd.
X *
X */
X
XEXT char *lib INIT(Nullch); /* news library */
XEXT char *rnlib INIT(Nullch); /* private news program library */
XEXT char *origdir INIT(Nullch); /* cwd when rn invoked */
XEXT char *homedir INIT(Nullch); /* login directory */
XEXT char *dotdir INIT(Nullch); /* where . files go */
XEXT char *logname INIT(Nullch); /* login id */
XEXT char *sitename INIT(Nullch); /* host name */
XEXT int perform_cnt;
X
X#ifdef NEWSADMIN
X EXT char newsadmin[] INIT(NEWSADMIN);/* news administrator */
X EXT int newsuid INIT(0);
X#endif
X
Xvoid intrp_init();
Xchar *filexp();
Xchar *dointerp();
Xvoid interp();
Xvoid refscpy();
Xchar *getrealname();
END_OF_FILE
if test 881 -ne `wc -c <'intrp.h'`; then
echo shar: \"'intrp.h'\" unpacked with wrong size!
fi
# end of 'intrp.h'
fi
if test -f 'last.c' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'last.c'\"
else
echo shar: Extracting \"'last.c'\" \(1316 characters\)
sed "s/^X//" >'last.c' <<'END_OF_FILE'
X/* $Header: last.c,v 4.3.2.1 89/12/20 23:23:07 sob Exp $
X *
X * $Log: last.c,v $
X * Revision 4.3.2.1 89/12/20 23:23:07 sob
X * .rnlast sometimes is a null file. This gives bogus information when
X * restarting rn following an abnormal termination. This bug was reported
X * by weening at gang-of-four.stanford.edu
X *
X * Revision 4.3 85/05/01 11:42:16 lwall
X * Baseline for release with 4.3bsd.
X *
X */
X
X#include "EXTERN.h"
X#include "common.h"
X#include "rn.h"
X#include "util.h"
X#include "intrp.h"
X#include "INTERN.h"
X#include "last.h"
X
Xchar *lastname = Nullch; /* path name of .rnlast file */
X
Xvoid
Xlast_init(tcbuf)
Xchar *tcbuf;
X{
X lastname = savestr(filexp(LASTNAME));
X if ((tmpfp = fopen(lastname,"r")) != Nullfp &&
X fgets(tcbuf,1024,tmpfp) != Nullch) {
X tcbuf[strlen(tcbuf)-1] = '\0';
X lastngname = savestr(tcbuf);
X fgets(tcbuf,1024,tmpfp);
X lasttime = atol(tcbuf);
X fgets(tcbuf,1024,tmpfp);
X lastactsiz = atol(tcbuf);
X fclose(tmpfp);
X }
X else {
X lastngname = nullstr;
X lasttime = 0;
X lastactsiz = 0;
X }
X}
X
X/* put out certain values for next run of rn */
X
Xvoid
Xwritelast()
X{
X if ((tmpfp = fopen(lastname,"w")) != Nullfp) {
X fprintf(tmpfp,"%s\n%ld\n%ld\n",
X (ngname==Nullch?nullstr:ngname),(long)lasttime,(long)lastactsiz);
X fclose(tmpfp);
X }
X else
X printf(cantcreate,lastname) FLUSH;
X}
END_OF_FILE
if test 1316 -ne `wc -c <'last.c'`; then
echo shar: \"'last.c'\" unpacked with wrong size!
fi
# end of 'last.c'
fi
if test -f 'last.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'last.h'\"
else
echo shar: Extracting \"'last.h'\" \(427 characters\)
sed "s/^X//" >'last.h' <<'END_OF_FILE'
X/* $Header: last.h,v 4.3 85/05/01 11:42:22 lwall Exp $
X *
X * $Log: last.h,v $
X * Revision 4.3 85/05/01 11:42:22 lwall
X * Baseline for release with 4.3bsd.
X *
X */
X
XEXT char *lastngname INIT(Nullch); /* last newsgroup read, from .rnlast file */
XEXT long lasttime INIT(0); /* time last rn was started up */
XEXT long lastactsiz INIT(0); /* size of active file when rn last started up */
X
Xvoid last_init();
Xvoid writelast();
END_OF_FILE
if test 427 -ne `wc -c <'last.h'`; then
echo shar: \"'last.h'\" unpacked with wrong size!
fi
# end of 'last.h'
fi
if test -f 'makedir.SH' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'makedir.SH'\"
else
echo shar: Extracting \"'makedir.SH'\" \(1089 characters\)
sed "s/^X//" >'makedir.SH' <<'END_OF_FILE'
Xcase $CONFIG in
X '') . ./config.sh ;;
Xesac
Xecho "Extracting makedir (with variable substitutions)"
X$spitshell >makedir <<!GROK!THIS!
X$startsh
X# $Header: makedir.SH,v 4.3 85/05/01 11:42:31 lwall Exp $
X#
X# $Log: makedir.SH,v $
X# Revision 4.3 85/05/01 11:42:31 lwall
X# Baseline for release with 4.3bsd.
X#
X
Xexport PATH || (echo "OOPS, this isn't sh. Desperation time. I will feed myself to sh."; sh \$0; kill \$\$)
X
Xcase \$# in
X 0)
X $echo "makedir pathname filenameflag"
X exit 1
X ;;
Xesac
X
X: guarantee one slash before 1st component
Xcase \$1 in
X /*) ;;
X *) set ./\$1 \$2 ;;
Xesac
X
X: strip last component if it is to be a filename
Xcase X\$2 in
X X1) set \`$echo \$1 | $sed 's:\(.*\)/[^/]*\$:\1:'\` ;;
X *) set \$1 ;;
Xesac
X
X: return reasonable status if nothing to be created
Xif $test -d "\$1" ; then
X exit 0
Xfi
X
Xlist=''
Xwhile true ; do
X case \$1 in
X */*)
X list="\$1 \$list"
X set \`echo \$1 | $sed 's:\(.*\)/:\1 :'\`
X ;;
X *)
X break
X ;;
X esac
Xdone
X
Xset \$list
X
Xfor dir do
X $mkdir \$dir >/dev/null 2>&1
Xdone
X!GROK!THIS!
X$eunicefix makedir
Xchmod 755 makedir
END_OF_FILE
if test 1089 -ne `wc -c <'makedir.SH'`; then
echo shar: \"'makedir.SH'\" unpacked with wrong size!
fi
chmod +x 'makedir.SH'
# end of 'makedir.SH'
fi
if test -f 'mt.check.SH' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'mt.check.SH'\"
else
echo shar: Extracting \"'mt.check.SH'\" \(1276 characters\)
sed "s/^X//" >'mt.check.SH' <<'END_OF_FILE'
Xcase $CONFIG in
X '') . ./config.sh ;;
Xesac
Xecho "Extracting mt.check (with variable substitutions)"
X$spitshell >mt.check <<!GROK!THIS!
X$startsh
X# $Header: mt.check.SH,v 4.3.3.2 90/08/20 16:42:10 davison Trn $
X#
X# $Log: mt.check.SH,v $
X# Revision 4.3.3.2 90/08/20 16:42:10 davison
X# Changed email address.
X#
X# Revision 4.3.3.1 90/06/20 23:00:07 davison
X# Initial Trn Release
X#
X# mt.check - daily maintenance for mt.log
X#
X# Check mt.log for earth-shattering errors, and mail them to \$gurus if found.
X# Then move the mt.log file into a week-long history chain.
X#
X# Usage: mt.check
X#
X
Xgurus="$newsadmin"
Xtmp="/tmp/mt.c\$\$"
X
XPATH=/bin:/usr/bin
Xexport PATH
X
Xumask 002
X
Xtrap "rm -f \$tmp ; exit 0" 0 1 2 15
X
Xcd $rnlib
X
X$egrep " \\*\\*\$" mt.log >\$tmp
X
Xif test -s \$tmp ; then
X (cat <<EOT
XTo: \$gurus
XSubject: mthreads error!
X
XThe following errors were reported in mt.log. Please report this fact
Xto Wayne Davison (davison at dri.com or ...!uunet!drivax!davison) for his
Xattention. The affected newsgroups can't be updated until this bug is
Xfixed, or the offending articles are expired.
X
XEOT
X cat \$tmp) | mail \$gurus
Xfi
X
Xmv mt.log.6 mt.log.7
Xmv mt.log.5 mt.log.6
Xmv mt.log.4 mt.log.5
Xmv mt.log.3 mt.log.4
Xmv mt.log.2 mt.log.3
Xmv mt.log mt.log.2
Xtouch mt.log
X
Xexit 0
END_OF_FILE
if test 1276 -ne `wc -c <'mt.check.SH'`; then
echo shar: \"'mt.check.SH'\" unpacked with wrong size!
fi
chmod +x 'mt.check.SH'
# end of 'mt.check.SH'
fi
if test -f 'mthreads.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'mthreads.h'\"
else
echo shar: Extracting \"'mthreads.h'\" \(1279 characters\)
sed "s/^X//" >'mthreads.h' <<'END_OF_FILE'
X/* $Header: mthreads.h,v 4.3.3.2 90/08/20 16:44:29 davison Trn $
X**
X** $Log: mthreads.h,v $
X** Revision 4.3.3.2 90/08/20 16:44:29 davison
X** New entries for new command-line interface.
X**
X** Revision 4.3.3.1 90/06/20 22:55:27 davison
X** Initial Trn Release
X**
X*/
X
X#ifdef lint
X#include "mt-lint.h"
X#endif
X#include "threads.h"
X
XEXT TOTAL total;
X
XEXT int processed_groups;
XEXT int added_articles, added_count;
XEXT int expired_articles, expired_count;
XEXT bool extra_expire INIT(FALSE);
XEXT bool caught_interrupt INIT(FALSE);
X
XEXT char *strings INIT(0);
XEXT WORD *subject_cnts INIT(0);
XEXT WORD *author_cnts INIT(0);
XEXT WORD *ids INIT(0);
X
XEXT SUBJECT **subject_array;
XEXT ROOT **root_array;
XEXT AUTHOR **author_array;
XEXT ARTICLE **article_array;
X
XEXT PACKED_ROOT p_root;
XEXT PACKED_ARTICLE p_article;
X
XEXT ROOT *root_root;
XEXT AUTHOR *author_root;
X
X#ifndef DOINIT
XEXT DOMAIN unk_domain;
X#else
XDOMAIN unk_domain = {
X ".unknown.", NULL, NULL
X};
X#endif
X
Xint ngmatch(), onepatmatch();
X
Xvoid log_entry(), log_error();
X
Xvoid mybytemap();
Xint read_data(), write_data();
Xvoid dont_read_data(), process_data();
X
Xvoid process_articles();
X
Xchar *thread_name(), *file_exp(), *savestr();
X
X#ifndef lint
Xchar *safemalloc();
Xvoid free(), Free();
X#endif
X
X#define Nullart Null(ARTICLE*)
END_OF_FILE
if test 1279 -ne `wc -c <'mthreads.h'`; then
echo shar: \"'mthreads.h'\" unpacked with wrong size!
fi
# end of 'mthreads.h'
fi
if test -f 'newsnews.SH' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'newsnews.SH'\"
else
echo shar: Extracting \"'newsnews.SH'\" \(1295 characters\)
sed "s/^X//" >'newsnews.SH' <<'END_OF_FILE'
Xcase $CONFIG in
X '') . ./config.sh ;;
Xesac
Xecho "Extracting newsnews (with variable substitutions)"
Xcat >newsnews <<!GROK!THIS!
X *** NEWS NEWS ***
X
XWelcome to trn. There are more options to trn than you want to think about,
Xso we won't list them here. If you want to find out about them, read the
Xtrn manual page. There are some important things to remember, though:
X
X * Trn is an extention to rn. Where possible, the command syntax is the same.
X * To access all the new features, specify the options -x and -X. These
X options MAY be on by default, but it won't hurt to be redundant.
X * At ANY prompt in trn, you may type 'h' for help. There are many different
X help menus, depending on where you are. Typing <esc>h in the
X middle of a multi-character command will list escape substitutions.
X * Typing a space to any prompt means to do the normal thing. You could
X spend all day reading news and never hit anything but the space bar.
X
XThis particular message comes from $rnlib/newsnews. You will only
Xsee it once. Your news administrator should feel free to substitute his or
Xher own message whenever something new happens to trn, and then the file
Xwill again be displayed, just once for each person.
X
XWayne Davison davison at dri.com
X!GROK!THIS!
X$eunicefix newsnews
END_OF_FILE
if test 1295 -ne `wc -c <'newsnews.SH'`; then
echo shar: \"'newsnews.SH'\" unpacked with wrong size!
fi
chmod +x 'newsnews.SH'
# end of 'newsnews.SH'
fi
if test -f 'ng.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'ng.h'\"
else
echo shar: Extracting \"'ng.h'\" \(940 characters\)
sed "s/^X//" >'ng.h' <<'END_OF_FILE'
X/* $Header: ng.h,v 4.3 85/05/01 11:44:29 lwall Exp $
X *
X * $Log: ng.h,v $
X * Revision 4.3 85/05/01 11:44:29 lwall
X * Baseline for release with 4.3bsd.
X *
X */
X
XEXT ART_NUM art INIT(0); /* current or prospective article # */
X
XEXT int checkcount INIT(0); /* how many articles have we read */
X /* in the current newsgroup since */
X /* the last checkpoint? */
XEXT int docheckwhen INIT(20); /* how often to do checkpoint */
X
X#ifdef MAILCALL
XEXT int mailcount INIT(0); /* check for mail when 0 mod 10 */
X#endif
XEXT char *mailcall INIT(nullstr);
X
XEXT bool forcelast INIT(FALSE); /* ought we show "End of newsgroup"? */
XEXT bool forcegrow INIT(FALSE); /* do we want to recalculate size */
X /* of newsgroup, e.g. after posting? */
X
X#define NG_ERROR -1
X#define NG_NORM 0
X#define NG_ASK 1
X#define NG_MINUS 2
X
Xvoid ng_init();
Xint do_newsgroup();
Xint art_switch();
X#ifdef MAILCALL
X void setmail();
X#endif
Xvoid setdfltcmd();
END_OF_FILE
if test 940 -ne `wc -c <'ng.h'`; then
echo shar: \"'ng.h'\" unpacked with wrong size!
fi
# end of 'ng.h'
fi
if test -f 'ngdata.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'ngdata.h'\"
else
echo shar: Extracting \"'ngdata.h'\" \(962 characters\)
sed "s/^X//" >'ngdata.h' <<'END_OF_FILE'
X/* $Header: ngdata.h,v 4.3.3.1 90/06/20 22:38:50 davison Trn $
X *
X * $Log: ngdata.h,v $
X * Revision 4.3.3.1 90/06/20 22:38:50 davison
X * Initial Trn Release
X *
X * Revision 4.3.2.1 89/11/06 00:41:21 sob
X * Added RRN support from NNTP 1.5
X *
X * Revision 4.3 85/05/01 11:44:48 lwall
X * added to local RCS
X *
X * Revision 4.3 85/05/01 11:44:48 lwall
X * Baseline for release with 4.3bsd.
X *
X */
X
XEXT FILE *actfp INIT(Nullfp); /* the active file */
XEXT bool writesoft INIT(FALSE); /* rewrite the soft pointer file? */
XEXT int softtries INIT(0), softmisses INIT(0);
X
X#ifdef SERVER
X EXT char active_name[256];
X#endif
X
X#ifdef CACHEFIRST
X EXT ART_NUM abs1st[MAXRCLINE]; /* 1st real article in newsgroup */
X#else
X# ifdef MININACT
X EXT ART_NUM abs1st INIT(0);
X# endif
X#endif
X
XEXT char *moderated;
X#ifdef USETHREADS
XEXT bool ThreadedGroup;
X#endif
X
Xvoid ngdata_init();
XART_NUM getngsize();
XACT_POS findact();
XART_NUM getabsfirst();
XART_NUM getngmin();
END_OF_FILE
if test 962 -ne `wc -c <'ngdata.h'`; then
echo shar: \"'ngdata.h'\" unpacked with wrong size!
fi
# end of 'ngdata.h'
fi
if test -f 'ngsrch.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'ngsrch.h'\"
else
echo shar: Extracting \"'ngsrch.h'\" \(474 characters\)
sed "s/^X//" >'ngsrch.h' <<'END_OF_FILE'
X/* $Header: ngsrch.h,v 4.3 85/05/01 11:44:56 lwall Exp $
X *
X * $Log: ngsrch.h,v $
X * Revision 4.3 85/05/01 11:44:56 lwall
X * Baseline for release with 4.3bsd.
X *
X */
X
X#ifdef NGSEARCH
X#define NGS_ABORT 0
X#define NGS_FOUND 1
X#define NGS_INTR 2
X#define NGS_NOTFOUND 3
X
XEXT bool ng_doread INIT(FALSE); /* search read newsgroups? */
X#endif
X
Xvoid ngsrch_init();
X#ifdef NGSEARCH
X int ng_search();
X bool ng_wanted();
X#endif
X#ifdef NGSORONLY
X char *ng_comp();
X#endif
END_OF_FILE
if test 474 -ne `wc -c <'ngsrch.h'`; then
echo shar: \"'ngsrch.h'\" unpacked with wrong size!
fi
# end of 'ngsrch.h'
fi
if test -f 'ngstuff.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'ngstuff.h'\"
else
echo shar: Extracting \"'ngstuff.h'\" \(484 characters\)
sed "s/^X//" >'ngstuff.h' <<'END_OF_FILE'
X/* $Header: ngstuff.h,v 4.3.3.1 90/06/20 22:39:07 davison Trn $
X *
X * $Log: ngstuff.h,v $
X * Revision 4.3.3.1 90/06/20 22:39:07 davison
X * Initial Trn Release
X *
X * Revision 4.3 85/05/01 11:45:12 lwall
X * Baseline for release with 4.3bsd.
X *
X */
X
X#define NN_NORM 0
X#define NN_INP 1
X#define NN_REREAD 2
X#define NN_ASK 3
X
XEXT bool one_command INIT(FALSE); /* no ':' processing in perform() */
X
Xvoid ngstuff_init();
Xint escapade();
Xint switcheroo();
Xint numnum();
Xint perform();
END_OF_FILE
if test 484 -ne `wc -c <'ngstuff.h'`; then
echo shar: \"'ngstuff.h'\" unpacked with wrong size!
fi
# end of 'ngstuff.h'
fi
if test -f 'norm.saver.SH' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'norm.saver.SH'\"
else
echo shar: Extracting \"'norm.saver.SH'\" \(1051 characters\)
sed "s/^X//" >'norm.saver.SH' <<'END_OF_FILE'
Xcase $CONFIG in
X '') . ./config.sh ;;
Xesac
Xecho "Extracting norm.saver (with variable substitutions)"
X$spitshell >norm.saver <<!GROK!THIS!
X$startsh
X# $Header: norm.saver.SH,v 4.3.2.1 89/11/28 00:08:01 sob Locked $
X#
X# $Log: norm.saver.SH,v $
X# Revision 4.3.2.1 89/11/28 00:08:01 sob
X# Branch for RN/RRN combo.
X#
X# Revision 4.3.1.2 85/05/20 15:56:24 lwall
X# Turned $5 into \$5.
X#
X# Revision 4.3.1.1 85/05/10 11:36:52 lwall
X# Branch for patches.
X#
X# Revision 4.3 85/05/01 11:45:16 lwall
X# Baseline for release with 4.3bsd.
X#
X#
X# Arguments:
X# 1 Full name of article (%A)
X# 2 Public news spool directory (%P)
X# 3 Directory of current newsgroup (%c)
X# 4 Article number (%a)
X# 5 Where in article to start (%B)
X# 6 Newsgroup name (%C)
X# 7 Save destination (%b)
X#
Xexport PATH || (echo "OOPS, this isn't sh. Desperation time. I will feed myself to sh."; sh \$0; kill \$\$)
X
X( case "\$5" in
X 0) $echo "Article \$4 of \$6:" ;;
X esac
X $tail +\$5c \$1
X $echo ""
X $echo "" ) >> \$7
X!GROK!THIS!
X$eunicefix norm.saver
Xchmod 755 norm.saver
END_OF_FILE
if test 1051 -ne `wc -c <'norm.saver.SH'`; then
echo shar: \"'norm.saver.SH'\" unpacked with wrong size!
fi
chmod +x 'norm.saver.SH'
# end of 'norm.saver.SH'
fi
if test -f 'rcln.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'rcln.h'\"
else
echo shar: Extracting \"'rcln.h'\" \(514 characters\)
sed "s/^X//" >'rcln.h' <<'END_OF_FILE'
X/* $Header: rcln.h,v 4.3.3.1 90/08/20 16:47:22 davison Trn $
X *
X * $Log: rcln.h,v $
X * Revision 4.3.3.1 90/08/20 16:47:22 davison
X * Removed ngmax array.
X *
X * Revision 4.3 85/05/01 11:45:52 lwall
X * Baseline for release with 4.3bsd.
X *
X */
X
X#if defined(DEBUGGING) && !defined(USETHREADS)
XEXT ART_NUM ngmax[MAXRCLINE];
X#endif
X
Xvoid rcln_init();
X#ifdef CATCHUP
X void catch_up();
X#endif
Xint addartnum();
X#ifdef MCHASE
X void subartnum();
X#endif
Xvoid prange();
Xvoid set_toread();
Xvoid checkexpired();
END_OF_FILE
if test 514 -ne `wc -c <'rcln.h'`; then
echo shar: \"'rcln.h'\" unpacked with wrong size!
fi
# end of 'rcln.h'
fi
if test -f 'rcstuff.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'rcstuff.h'\"
else
echo shar: Extracting \"'rcstuff.h'\" \(1293 characters\)
sed "s/^X//" >'rcstuff.h' <<'END_OF_FILE'
X/* $Header: rcstuff.h,v 4.3 85/05/01 11:46:49 lwall Exp $
X *
X * $Log: rcstuff.h,v $
X * Revision 4.3 85/05/01 11:46:49 lwall
X * Baseline for release with 4.3bsd.
X *
X */
X
XEXT char *rcline[MAXRCLINE];/* pointers to lines of .newsrc */
XEXT ART_UNREAD toread[MAXRCLINE];
X /* number of articles to be read in newsgroup */
X /* <0 => invalid or unsubscribed newsgroup */
X#define TR_ONE ((ART_UNREAD) 1)
X#define TR_NONE ((ART_UNREAD) 0)
X#define TR_UNSUB ((ART_UNREAD) -1)
X /* keep this one as -1, some tests use >= TR_UNSUB */
X#define TR_BOGUS ((ART_UNREAD) -2)
X#define TR_JUNK ((ART_UNREAD) -3)
X
XEXT char rcchar[MAXRCLINE]; /* holds the character : or ! while spot is \0 */
XEXT char rcnums[MAXRCLINE]; /* offset from rcline to numbers on line */
XEXT ACT_POS softptr[MAXRCLINE];
X /* likely ptr to active file entry for newsgroup */
XEXT bool paranoid INIT(FALSE); /* did we detect some inconsistency in .newsrc? */
X
Xbool rcstuff_init();
Xbool get_ng(); /* return TRUE if newsgroup can be found or added */
XNG_NUM add_newsgroup();
X#ifdef RELOCATE
X NG_NUM relocate_newsgroup(); /* move newsgroup around */
X#endif
Xvoid list_newsgroups();
XNG_NUM find_ng(); /* return index of newsgroup */
Xvoid cleanup_rc();
Xvoid sethash();
Xint hash();
Xvoid newsrc_check();
Xvoid write_rc();
Xvoid get_old_rc();
END_OF_FILE
if test 1293 -ne `wc -c <'rcstuff.h'`; then
echo shar: \"'rcstuff.h'\" unpacked with wrong size!
fi
# end of 'rcstuff.h'
fi
if test -f 'respond.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'respond.h'\"
else
echo shar: Extracting \"'respond.h'\" \(594 characters\)
sed "s/^X//" >'respond.h' <<'END_OF_FILE'
X/* $Header: respond.h,v 4.3.3.1 90/06/20 22:39:54 davison Trn $
X *
X * $Log: respond.h,v $
X * Revision 4.3.3.1 90/06/20 22:39:54 davison
X * Initial Trn Release
X *
X * Revision 4.3 85/05/01 11:47:50 lwall
X * Baseline for release with 4.3bsd.
X *
X */
X
XEXT char *savedest INIT(Nullch); /* value of %b */
XEXT char *extractprog INIT(Nullch); /* value of %e */
XEXT ART_POS savefrom INIT(0); /* value of %B */
XEXT char *headname INIT(Nullch);
X
X#define SAVE_ABORT 0
X#define SAVE_DONE 1
X
Xvoid respond_init();
Xint save_article();
Xint cancel_article();
Xvoid reply();
Xvoid followup();
Xvoid invoke();
END_OF_FILE
if test 594 -ne `wc -c <'respond.h'`; then
echo shar: \"'respond.h'\" unpacked with wrong size!
fi
# end of 'respond.h'
fi
if test -f 'rn.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'rn.h'\"
else
echo shar: Extracting \"'rn.h'\" \(813 characters\)
sed "s/^X//" >'rn.h' <<'END_OF_FILE'
X/* $Header: rn.h,v 4.3 85/05/01 11:48:19 lwall Exp $
X *
X * $Log: rn.h,v $
X * Revision 4.3 85/05/01 11:48:19 lwall
X * Baseline for release with 4.3bsd.
X *
X */
X
XEXT char *ngname INIT(Nullch); /* name of current newsgroup */
XEXT int ngnlen INIT(0); /* current malloced size of ngname */
XEXT char *ngdir INIT(Nullch); /* same thing in directory name form */
XEXT int ngdlen INIT(0); /* current malloced size of ngdir */
X
XEXT NG_NUM ng INIT(0); /* current newsgroup index into rcline and toread */
XEXT NG_NUM current_ng INIT(0); /* stable current newsgroup so we can ditz with ng */
XEXT NG_NUM starthere INIT(0); /* set to the first newsgroup with unread news on startup */
XEXT char *spool INIT(Nullch); /* public news spool directory */
X
Xvoid rn_init();
Xvoid main();
Xvoid set_ngname();
Xchar *getngdir();
END_OF_FILE
if test 813 -ne `wc -c <'rn.h'`; then
echo shar: \"'rn.h'\" unpacked with wrong size!
fi
# end of 'rn.h'
fi
if test -f 'rthreads.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'rthreads.h'\"
else
echo shar: Extracting \"'rthreads.h'\" \(1290 characters\)
sed "s/^X//" >'rthreads.h' <<'END_OF_FILE'
X/* $Header: rthreads.h,v 4.3.3.1 90/06/20 22:56:01 davison Trn $
X**
X** $Log: rthreads.h,v $
X** Revision 4.3.3.1 90/06/20 22:56:01 davison
X** Initial Trn Release
X**
X*/
X
X#include "threads.h"
X
XEXT TOTAL total;
X
XEXT PACKED_ROOT *p_roots INIT(0);
XEXT WORD *root_subjects INIT(0);
XEXT WORD *author_cnts INIT(0);
XEXT WORD *subject_cnts INIT(0);
XEXT char **author_ptrs INIT(0);
XEXT char **subject_ptrs INIT(0);
XEXT PACKED_ARTICLE *p_articles INIT(0);
XEXT WORD *root_article_cnts INIT(0);
XEXT char *selected_roots INIT(0);
XEXT ART_NUM *saved_selections INIT(0);
XEXT bool unread_selector INIT(0);
X
XEXT PACKED_ARTICLE *p_art INIT(0);
XEXT PACKED_ARTICLE *curr_p_art INIT(0);
XEXT PACKED_ARTICLE *recent_p_art INIT(0);
X
XEXT int selected_root_cnt INIT(0);
XEXT ART_NUM selected_count INIT(0);
XEXT int unthreaded INIT(0);
XEXT int select_page;
XEXT bool scan_all_roots;
X
XEXT bool word_same, long_same;
XEXT BMAP my_bmap, mt_bmap;
X
Xvoid thread_init(), mybytemap();
Xchar *thread_name(), *safemalloc();
Xint use_data();
Xvoid unuse_data();
Xvoid find_article(), init_tree(), entire_tree();
Xint tree_puts(), finish_tree();
Xvoid first_art(), follow_thread(), next_root(), prev_root();
Xchar select_thread();
Xint count_roots(), count_one_root();
XPACKED_ARTICLE *upper_limit();
X
X#define Nullart Null(PACKED_ARTICLE*)
END_OF_FILE
if test 1290 -ne `wc -c <'rthreads.h'`; then
echo shar: \"'rthreads.h'\" unpacked with wrong size!
fi
# end of 'rthreads.h'
fi
if test -f 'search.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'search.h'\"
else
echo shar: Extracting \"'search.h'\" \(1052 characters\)
sed "s/^X//" >'search.h' <<'END_OF_FILE'
X/* $Header: search.h,v 4.3 85/05/01 11:50:46 lwall Exp $
X *
X * $Log: search.h,v $
X * Revision 4.3 85/05/01 11:50:46 lwall
X * Baseline for release with 4.3bsd.
X *
X */
X
X#ifndef NBRA
X#define NBRA 10 /* the maximum number of meta-brackets in an
X RE -- \( \) */
X#define NALTS 10 /* the maximum number of \|'s */
X
Xtypedef struct {
X char *expbuf; /* The compiled search string */
X int eblen; /* Length of above buffer */
X char *alternatives[NALTS]; /* The list of \| seperated alternatives */
X char *braslist[NBRA]; /* RE meta-bracket start list */
X char *braelist[NBRA]; /* RE meta-bracket end list */
X char *brastr; /* saved match string after execute() */
X char nbra; /* The number of meta-brackets int the most
X recenlty compiled RE */
X bool do_folding; /* fold upper and lower case? */
X} COMPEX;
X
Xvoid search_init();
Xvoid init_compex();
Xvoid free_compex();
Xchar *getbracket();
Xvoid case_fold();
Xchar *compile();
Xvoid grow_eb();
Xchar *execute();
Xbool advance();
Xbool backref();
Xbool cclass();
X#endif
END_OF_FILE
if test 1052 -ne `wc -c <'search.h'`; then
echo shar: \"'search.h'\" unpacked with wrong size!
fi
# end of 'search.h'
fi
if test -f 'sw.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'sw.h'\"
else
echo shar: Extracting \"'sw.h'\" \(330 characters\)
sed "s/^X//" >'sw.h' <<'END_OF_FILE'
X/* $Header: sw.h,v 4.3 85/05/01 11:51:07 lwall Exp $
X *
X * $Log: sw.h,v $
X * Revision 4.3 85/05/01 11:51:07 lwall
X * Baseline for release with 4.3bsd.
X *
X */
X
X#ifdef INNERSEARCH
XEXT int gline INIT(0);
X#endif
X
Xvoid sw_init();
Xvoid sw_file();
Xvoid sw_list();
Xvoid decode_switch();
Xvoid pr_switches();
Xvoid cwd_check();
END_OF_FILE
if test 330 -ne `wc -c <'sw.h'`; then
echo shar: \"'sw.h'\" unpacked with wrong size!
fi
# end of 'sw.h'
fi
if test -f 'util.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'util.h'\"
else
echo shar: Extracting \"'util.h'\" \(842 characters\)
sed "s/^X//" >'util.h' <<'END_OF_FILE'
X/* $Header: util.h,v 4.3 85/05/01 11:51:58 lwall Exp $
X *
X * $Log: util.h,v $
X * Revision 4.3 85/05/01 11:51:58 lwall
X * Baseline for release with 4.3bsd.
X *
X */
X
XEXT bool waiting INIT(FALSE); /* are we waiting for subprocess (in doshell)? */
XEXT int len_last_line_got INIT(0);
X /* strlen of some_buf after */
X /* some_buf = get_a_line(bufptr,buffersize,fp) */
X
X/* is the string for makedir a directory name or a filename? */
X
X#define MD_DIR 0
X#define MD_FILE 1
X
Xvoid util_init();
Xint doshell();
Xchar *safemalloc();
Xchar *saferealloc();
Xchar *safecpy();
Xchar *safecat();
Xchar *cpytill();
Xchar *instr();
X#ifdef SETUIDGID
X int eaccess();
X#endif
Xchar *getwd();
Xvoid cat();
Xvoid prexit();
Xchar *get_a_line();
Xchar *savestr();
Xint makedir();
Xvoid setenv();
Xint envix();
Xvoid notincl();
Xchar *getval();
Xvoid growstr();
Xvoid setdef();
END_OF_FILE
if test 842 -ne `wc -c <'util.h'`; then
echo shar: \"'util.h'\" unpacked with wrong size!
fi
# end of 'util.h'
fi
if test -f 'uudecode.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'uudecode.h'\"
else
echo shar: Extracting \"'uudecode.h'\" \(233 characters\)
sed "s/^X//" >'uudecode.h' <<'END_OF_FILE'
X/* $Header: uudecode.h,v 4.3.3.1 90/06/20 22:49:08 davison Trn $
X**
X** $Log: uudecode.h,v $
X** Revision 4.3.3.1 90/06/20 22:49:08 davison
X** Initial Trn Release
X**
X*/
X
XEXT FILE *uu_out INIT(NULL);
XEXT char uu_fname[MAXFILENAME];
END_OF_FILE
if test 233 -ne `wc -c <'uudecode.h'`; then
echo shar: \"'uudecode.h'\" unpacked with wrong size!
fi
# end of 'uudecode.h'
fi
echo shar: End of archive 14 \(of 14\).
cp /dev/null ark14isdone
MISSING=""
for I in 1 2 3 4 5 6 7 8 9 10 11 12 13 14 ; do
if test ! -f ark${I}isdone ; then
MISSING="${MISSING} ${I}"
fi
done
if test "${MISSING}" = "" ; then
echo You have unpacked all 14 archives.
rm -f ark[1-9]isdone ark[1-9][0-9]isdone
else
echo You still must unpack the following archives:
echo " " ${MISSING}
fi
exit 0
exit 0 # Just in case...
--
Please send comp.sources.unix-related mail to rsalz at uunet.uu.net.
Use a domain-based address or give alternate paths, or you may lose out.
More information about the Comp.sources.unix
mailing list