Return to snoop.c CVS log

Up to [CSRG BSD Unix] / 43BSD / contrib / rcs / src

Annotation of 43BSD/contrib/rcs/src/snoop.c, revision 1.1.1.1

1.1       root        1: /*
                      2:  *                     Logging of RCS commands co and ci
                      3:  */
                      4:  static char rcsid[]=
                      5:  "$Header: /usr/wft/RCS/SRC/RCS/snoop.c,v 3.2 82/12/04 17:14:31 wft Exp $ Purdue CS";
                      6: /*******************************************************************
                      7:  * This program appends argv[1] to the file SNOOPFILE.
                      8:  * To avoid overlaps, it creates a lockfile with name lock in the same
                      9:  * directory as SNOOPFILE. SNOOPFILE must be defined in the cc command. 
                     10:  * Prints an error message if lockfile doesn't get deleted after
                     11:  * MAXTRIES tries.
                     12:  *******************************************************************
                     13:  *
                     14:  * Copyright (C) 1982 by Walter F. Tichy
                     15:  *                       Purdue University
                     16:  *                       Computer Science Department
                     17:  *                       West Lafayette, IN 47907
                     18:  *
                     19:  * All rights reserved. No part of this software may be sold or distributed
                     20:  * in any form or by any means without the prior written permission of the 
                     21:  * author.
                     22:  * Report problems and direct all inquiries to Tichy@purdue (ARPA net).
                     23:  */
                     24: 
                     25: 
                     26: /* $Log:       snoop.c,v $
                     27:  * Revision 3.2  82/12/04  17:14:31  wft
                     28:  * Added rcsbase.h, changed SNOOPDIR to SNOOPFILE, reintroduced
                     29:  * error message in case of permanent locking.
                     30:  * 
                     31:  * Revision 3.1  82/10/18  21:22:03  wft
                     32:  * Number of polls now 20, no error message if critical section can't
                     33:  * be entered.
                     34:  * 
                     35:  * Revision 2.3  82/07/01  23:49:28  wft
                     36:  * changed copyright notice only.
                     37:  * 
                     38:  * Revision 2.2  82/06/03  20:00:10  wft
                     39:  * changed name from rcslog to snoop, replaced LOGDIR with SNOOPDIR.
                     40:  * 
                     41:  * Revision 2.1  82/05/06  17:55:54  wft
                     42:  * Initial revision
                     43:  *
                     44:  */
                     45: 
                     46: 
                     47: #include "rcsbase.h"
                     48: #define fflsbuf _flsbuf
                     49: /* undo redefinition of putc in rcsbase.h */
                     50: 
                     51: char  lockfname[NCPPN];
                     52: FILE * logfile;
                     53: int lockfile;
                     54: 
                     55: #define MAXTRIES 20
                     56: 
                     57: main(argc,argv)
                     58: int argc; char * argv[];
                     59: /* writes argv[1] to SNOOPFILE and appends a newline. Invoked as follows:
                     60:  * rcslog logmessage
                     61:  */
                     62: {       int tries;
                     63:         register char * lastslash, *sp;
                     64: 
                     65:         strcpy(lockfname,SNOOPFILE);
                     66:         lastslash = sp = lockfname;
                     67:         while (*sp) if (*sp++ =='/') lastslash=sp; /* points beyond / */
                     68:         strcpy(lastslash,",lockfile");
                     69:         tries=0;
                     70:         while (((lockfile=creat(lockfname, 000)) == -1) && (tries<=MAXTRIES)) {
                     71:                 tries++;
                     72:                 sleep(5);
                     73:         }
                     74:         if (tries<=MAXTRIES) {
                     75:                 close(lockfile);
                     76:                 if ((logfile=fopen(SNOOPFILE,"a")) ==NULL) {
                     77:                         fprintf(stderr,"Can't open logfile %s\n",SNOOPFILE);
                     78:                 } else {
                     79:                         fputs(argv[1],logfile);
                     80:                         putc('\n',logfile);
                     81:                         fclose(logfile);
                     82:                 }
                     83:                 unlink(lockfname);
                     84:         } else {
                     85:                 fprintf(stderr,"RCS logfile %s seems permanently locked.\n",SNOOPFILE);
                     86:                 fprintf(stderr,"Please alert system administrator\n");
                     87:         }
                     88: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.