BSD 4_2 development

Work on file usr/src/new/new/rcs/src/rcs/snoop.c

Synthesized-from: CSRG/cd1/4.2

diff --git a/usr/src/new/new/rcs/src/rcs/snoop.c b/usr/src/new/new/rcs/src/rcs/snoop.c
new file mode 100644 (file)
index 0000000..e4f1da6
--- /dev/null
+++ b/usr/src/new/new/rcs/src/rcs/snoop.c
@@ -0,0 +1,88 @@
+/*
+ *                     Logging of RCS commands co and ci
+ */
+ static char rcsid[]=
+ "$Header: /usr/wft/RCS/SRC/RCS/snoop.c,v 3.2 82/12/04 17:14:31 wft Exp $ Purdue CS";
+/*******************************************************************
+ * This program appends argv[1] to the file SNOOPFILE.
+ * To avoid overlaps, it creates a lockfile with name lock in the same
+ * directory as SNOOPFILE. SNOOPFILE must be defined in the cc command. 
+ * Prints an error message if lockfile doesn't get deleted after
+ * MAXTRIES tries.
+ *******************************************************************
+ *
+ * Copyright (C) 1982 by Walter F. Tichy
+ *                       Purdue University
+ *                       Computer Science Department
+ *                       West Lafayette, IN 47907
+ *
+ * All rights reserved. No part of this software may be sold or distributed
+ * in any form or by any means without the prior written permission of the 
+ * author.
+ * Report problems and direct all inquiries to Tichy@purdue (ARPA net).
+ */
+
+
+/* $Log:       snoop.c,v $
+ * Revision 3.2  82/12/04  17:14:31  wft
+ * Added rcsbase.h, changed SNOOPDIR to SNOOPFILE, reintroduced
+ * error message in case of permanent locking.
+ * 
+ * Revision 3.1  82/10/18  21:22:03  wft
+ * Number of polls now 20, no error message if critical section can't
+ * be entered.
+ * 
+ * Revision 2.3  82/07/01  23:49:28  wft
+ * changed copyright notice only.
+ * 
+ * Revision 2.2  82/06/03  20:00:10  wft
+ * changed name from rcslog to snoop, replaced LOGDIR with SNOOPDIR.
+ * 
+ * Revision 2.1  82/05/06  17:55:54  wft
+ * Initial revision
+ *
+ */
+
+
+#include "rcsbase.h"
+#define fflsbuf _flsbuf
+/* undo redefinition of putc in rcsbase.h */
+
+char  lockfname[NCPPN];
+FILE * logfile;
+int lockfile;
+
+#define MAXTRIES 20
+
+main(argc,argv)
+int argc; char * argv[];
+/* writes argv[1] to SNOOPFILE and appends a newline. Invoked as follows:
+ * rcslog logmessage
+ */
+{       int tries;
+        register char * lastslash, *sp;
+
+        strcpy(lockfname,SNOOPFILE);
+        lastslash = sp = lockfname;
+        while (*sp) if (*sp++ =='/') lastslash=sp; /* points beyond / */
+        strcpy(lastslash,",lockfile");
+        tries=0;
+        while (((lockfile=creat(lockfname, 000)) == -1) && (tries<=MAXTRIES)) {
+                tries++;
+                sleep(5);
+        }
+        if (tries<=MAXTRIES) {
+                close(lockfile);
+                if ((logfile=fopen(SNOOPFILE,"a")) ==NULL) {
+                        fprintf(stderr,"Can't open logfile %s\n",SNOOPFILE);
+                } else {
+                        fputs(argv[1],logfile);
+                        putc('\n',logfile);
+                        fclose(logfile);
+                }
+                unlink(lockfname);
+        } else {
+                fprintf(stderr,"RCS logfile %s seems permanently locked.\n",SNOOPFILE);
+                fprintf(stderr,"Please alert system administrator\n");
+        }
+}