home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 8 / FreshFishVol8-CD2.bin / bbs / gnu / rcs-5.6.0.1-src.lha / rcs-5.6.0.1 / src / rcs.c < prev    next >
C/C++ Source or Header  |  1991-11-22  |  44KB  |  1,555 lines
  1. /*
  2.  *                      RCS create/change operation
  3.  */
  4. /* Copyright (C) 1982, 1988, 1989 Walter Tichy
  5.    Copyright 1990, 1991 by Paul Eggert
  6.    Distributed under license by the Free Software Foundation, Inc.
  7.  
  8. This file is part of RCS.
  9.  
  10. RCS is free software; you can redistribute it and/or modify
  11. it under the terms of the GNU General Public License as published by
  12. the Free Software Foundation; either version 2, or (at your option)
  13. any later version.
  14.  
  15. RCS is distributed in the hope that it will be useful,
  16. but WITHOUT ANY WARRANTY; without even the implied warranty of
  17. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18. GNU General Public License for more details.
  19.  
  20. You should have received a copy of the GNU General Public License
  21. along with RCS; see the file COPYING.  If not, write to
  22. the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
  23.  
  24. Report problems and direct all questions to:
  25.  
  26.     rcs-bugs@cs.purdue.edu
  27.  
  28. */
  29.  
  30.  
  31.  
  32.  
  33. /* $Log: rcs.c,v $
  34.  * Revision 5.12  1991/11/20  17:58:08  eggert
  35.  * Don't read the delta tree from a nonexistent RCS file.
  36.  *
  37.  * Revision 5.11  1991/10/07  17:32:46  eggert
  38.  * Remove lint.
  39.  *
  40.  * Revision 5.10  1991/08/19  23:17:54  eggert
  41.  * Add -m, -r$, piece tables.  Revision separator is `:', not `-'.  Tune.
  42.  *
  43.  * Revision 5.9  1991/04/21  11:58:18  eggert
  44.  * Add -x, RCSINIT, MS-DOS support.
  45.  *
  46.  * Revision 5.8  1991/02/25  07:12:38  eggert
  47.  * strsave -> str_save (DG/UX name clash)
  48.  * 0444 -> S_IRUSR|S_IRGRP|S_IROTH for portability
  49.  *
  50.  * Revision 5.7  1990/12/18  17:19:21  eggert
  51.  * Fix bug with multiple -n and -N options.
  52.  *
  53.  * Revision 5.6  1990/12/04  05:18:40  eggert
  54.  * Use -I for prompts and -q for diagnostics.
  55.  *
  56.  * Revision 5.5  1990/11/11  00:06:35  eggert
  57.  * Fix `rcs -e' core dump.
  58.  *
  59.  * Revision 5.4  1990/11/01  05:03:33  eggert
  60.  * Add -I and new -t behavior.  Permit arbitrary data in logs.
  61.  *
  62.  * Revision 5.3  1990/10/04  06:30:16  eggert
  63.  * Accumulate exit status across files.
  64.  *
  65.  * Revision 5.2  1990/09/04  08:02:17  eggert
  66.  * Standardize yes-or-no procedure.
  67.  *
  68.  * Revision 5.1  1990/08/29  07:13:51  eggert
  69.  * Remove unused setuid support.  Clean old log messages too.
  70.  *
  71.  * Revision 5.0  1990/08/22  08:12:42  eggert
  72.  * Don't lose names when applying -a option to multiple files.
  73.  * Remove compile-time limits; use malloc instead.  Add setuid support.
  74.  * Permit dates past 1999/12/31.  Make lock and temp files faster and safer.
  75.  * Ansify and Posixate.  Add -V.  Fix umask bug.  Make linting easier.  Tune.
  76.  * Yield proper exit status.  Check diff's output.
  77.  *
  78.  * Revision 4.11  89/05/01  15:12:06  narten
  79.  * changed copyright header to reflect current distribution rules
  80.  * 
  81.  * Revision 4.10  88/11/08  16:01:54  narten
  82.  * didn't install previous patch correctly
  83.  * 
  84.  * Revision 4.9  88/11/08  13:56:01  narten
  85.  * removed include <sysexits.h> (not needed)
  86.  * minor fix for -A option
  87.  * 
  88.  * Revision 4.8  88/08/09  19:12:27  eggert
  89.  * Don't access freed storage.
  90.  * Use execv(), not system(); yield proper exit status; remove lint.
  91.  * 
  92.  * Revision 4.7  87/12/18  11:37:17  narten
  93.  * lint cleanups (Guy Harris)
  94.  * 
  95.  * Revision 4.6  87/10/18  10:28:48  narten
  96.  * Updating verison numbers. Changes relative to 1.1 are actually 
  97.  * relative to 4.3
  98.  * 
  99.  * Revision 1.4  87/09/24  13:58:52  narten
  100.  * Sources now pass through lint (if you ignore printf/sprintf/fprintf 
  101.  * warnings)
  102.  * 
  103.  * Revision 1.3  87/03/27  14:21:55  jenkins
  104.  * Port to suns
  105.  * 
  106.  * Revision 1.2  85/12/17  13:59:09  albitz
  107.  * Changed setstate to rcs_setstate because of conflict with random.o.
  108.  * 
  109.  * Revision 4.3  83/12/15  12:27:33  wft
  110.  * rcs -u now breaks most recent lock if it can't find a lock by the caller.
  111.  * 
  112.  * Revision 4.2  83/12/05  10:18:20  wft
  113.  * Added conditional compilation for sending mail.
  114.  * Alternatives: V4_2BSD, V6, USG, and other.
  115.  * 
  116.  * Revision 4.1  83/05/10  16:43:02  wft
  117.  * Simplified breaklock(); added calls to findlock() and getcaller().
  118.  * Added option -b (default branch). Updated -s and -w for -b.
  119.  * Removed calls to stat(); now done by pairfilenames().
  120.  * Replaced most catchints() calls with restoreints().
  121.  * Removed check for exit status of delivermail().
  122.  * Directed all interactive output to stderr.
  123.  * 
  124.  * Revision 3.9.1.1  83/12/02  22:08:51  wft
  125.  * Added conditional compilation for 4.2 sendmail and 4.1 delivermail.
  126.  * 
  127.  * Revision 3.9  83/02/15  15:38:39  wft
  128.  * Added call to fastcopy() to copy remainder of RCS file.
  129.  *
  130.  * Revision 3.8  83/01/18  17:37:51  wft
  131.  * Changed sendmail(): now uses delivermail, and asks whether to break the lock.
  132.  *
  133.  * Revision 3.7  83/01/15  18:04:25  wft
  134.  * Removed putree(); replaced with puttree() in rcssyn.c.
  135.  * Combined putdellog() and scanlogtext(); deleted putdellog().
  136.  * Cleaned up diagnostics and error messages. Fixed problem with
  137.  * mutilated files in case of deletions in 2 files in a single command.
  138.  * Changed marking of selector from 'D' to DELETE.
  139.  *
  140.  * Revision 3.6  83/01/14  15:37:31  wft
  141.  * Added ignoring of interrupts while new RCS file is renamed;
  142.  * Avoids deletion of RCS files by interrupts.
  143.  *
  144.  * Revision 3.5  82/12/10  21:11:39  wft
  145.  * Removed unused variables, fixed checking of return code from diff,
  146.  * introduced variant COMPAT2 for skipping Suffix on -A files.
  147.  *
  148.  * Revision 3.4  82/12/04  13:18:20  wft
  149.  * Replaced getdelta() with gettree(), changed breaklock to update
  150.  * field lockedby, added some diagnostics.
  151.  *
  152.  * Revision 3.3  82/12/03  17:08:04  wft
  153.  * Replaced getlogin() with getpwuid(), flcose() with ffclose(),
  154.  * /usr/ucb/Mail with macro MAIL. Removed handling of Suffix (-x).
  155.  * fixed -u for missing revno. Disambiguated structure members.
  156.  *
  157.  * Revision 3.2  82/10/18  21:05:07  wft
  158.  * rcs -i now generates a file mode given by the umask minus write permission;
  159.  * otherwise, rcs keeps the mode, but removes write permission.
  160.  * I added a check for write error, fixed call to getlogin(), replaced
  161.  * curdir() with getfullRCSname(), cleaned up handling -U/L, and changed
  162.  * conflicting, long identifiers.
  163.  *
  164.  * Revision 3.1  82/10/13  16:11:07  wft
  165.  * fixed type of variables receiving from getc() (char -> int).
  166.  */
  167.  
  168.  
  169. #include "rcsbase.h"
  170.  
  171. struct  Lockrev {
  172.     char const *revno;
  173.         struct  Lockrev   * nextrev;
  174. };
  175.  
  176. struct  Symrev {
  177.     char const *revno;
  178.     char const *ssymbol;
  179.         int     override;
  180.         struct  Symrev  * nextsym;
  181. };
  182.  
  183. struct Message {
  184.     char const *revno;
  185.     struct cbuf message;
  186.     struct Message *nextmessage;
  187. };
  188.  
  189. struct  Status {
  190.     char const *revno;
  191.     char const *status;
  192.         struct  Status  * nextstatus;
  193. };
  194.  
  195. enum changeaccess {append, erase};
  196. struct chaccess {
  197.     char const *login;
  198.     enum changeaccess command;
  199.     struct chaccess *nextchaccess;
  200. };
  201.  
  202. struct delrevpair {
  203.     char const *strt;
  204.     char const *end;
  205.         int     code;
  206. };
  207.  
  208. static int buildeltatext P((struct hshentries const*));
  209. static int removerevs P((void));
  210. static int sendmail P((char const*,char const*));
  211. static struct Lockrev *rmnewlocklst P((struct Lockrev const*));
  212. static void breaklock P((struct hshentry const*));
  213. static void buildtree P((void));
  214. static void cleanup P((void));
  215. static void doaccess P((void));
  216. static void doassoc P((void));
  217. static void dolocks P((void));
  218. static void domessages P((void));
  219. static void getaccessor P((char*,enum changeaccess));
  220. static void getassoclst P((int,char*));
  221. static void getchaccess P((char const*,enum changeaccess));
  222. static void getdelrev P((char*));
  223. static void getmessage P((char*));
  224. static void getstates P((char*));
  225. static void rcs_setstate P((char const*,char const*));
  226. static void scanlogtext P((struct hshentry*,int));
  227. static void setlock P((char const*));
  228.  
  229. static struct buf numrev;
  230. static char const *headstate;
  231. static int chgheadstate, exitstatus, lockhead, unlockcaller;
  232. static struct Lockrev *newlocklst, *rmvlocklst;
  233. static struct Message *messagelst, *lastmessage;
  234. static struct Status *statelst, *laststate;
  235. static struct Symrev *assoclst, *lastassoc;
  236. static struct chaccess *chaccess, **nextchaccess;
  237. static struct delrevpair delrev;
  238. static struct hshentry *cuthead, *cuttail, *delstrt;
  239. static struct hshentries *gendeltas;
  240.  
  241. mainProg(rcsId, "rcs", "$Id: rcs.c,v 5.12 1991/11/20 17:58:08 eggert Exp $")
  242. {
  243.     static char const cmdusage[] =
  244.         "\nrcs