1/* RCS common definitions and data structures */
2
| 1/* RCS common definitions and data structures */
2
|
3#define RCSBASE "$Id$"
| 3#define RCSBASE "$Id: rcsbase.h,v 1.8 1997/02/22 15:47:33 peter Exp $"
|
4
5/* Copyright 1982, 1988, 1989 Walter Tichy
6 Copyright 1990, 1991, 1992, 1993, 1994, 1995 Paul Eggert
7 Distributed under license by the Free Software Foundation, Inc.
8
9This file is part of RCS.
10
11RCS is free software; you can redistribute it and/or modify
12it under the terms of the GNU General Public License as published by
13the Free Software Foundation; either version 2, or (at your option)
14any later version.
15
16RCS is distributed in the hope that it will be useful,
17but WITHOUT ANY WARRANTY; without even the implied warranty of
18MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
19GNU General Public License for more details.
20
21You should have received a copy of the GNU General Public License
22along with RCS; see the file COPYING.
23If not, write to the Free Software Foundation,
2459 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
25
26Report problems and direct all questions to:
27
28 rcs-bugs@cs.purdue.edu
29
30*/
31
32/*
33 * Revision 5.20 1995/06/16 06:19:24 eggert
34 * Update FSF address.
35 *
36 * Revision 5.19 1995/06/01 16:23:43 eggert
37 * (SIZEABLE_PATH): Don't depend on PATH_MAX: it's not worth configuring.
38 * (Ioffset_type,BINARY_EXPAND,MIN_UNEXPAND,MIN_UNCHANGED_EXPAND): New macros.
39 * (maps_memory): New macro; replaces many instances of `has_mmap'.
40 * (cacheptr): Renamed from cachetell.
41 * (struct RILE): New alternate name for RILE; the type is now recursive.
42 * (deallocate): New member for RILE, used for generic buffer deallocation.
43 * (cacheunget_): No longer take a failure arg; just call Ierror on failure.
44 * (struct rcslock): Renamed from struct lock, to avoid collisions with
45 * system headers on some hosts. All users changed.
46 * (basefilename): Renamed from basename, likewise.
47 * (dirtpname): Remove; no longer external.
48 * (dirlen, dateform): Remove; no longer used.
49 * (cmpdate, fopenSafer, fdSafer, readAccessFilenameBuffer): New functions.
50 * (zonelenmax): Increase to 9 for full ISO 8601 format.
51 * (catchmmapints): Depend on has_NFS.
52 *
53 * Revision 5.18 1994/03/17 14:05:48 eggert
54 * Add primitives for reading backwards from a RILE;
55 * this is needed to go back and find the $Log prefix.
56 * Specify subprocess input via file descriptor, not file name. Remove lint.
57 *
58 * Revision 5.17 1993/11/09 17:40:15 eggert
59 * Move RCS-specific time handling into rcstime.c.
60 * printf_string now takes two arguments, alas.
61 *
62 * Revision 5.16 1993/11/03 17:42:27 eggert
63 * Don't arbitrarily limit the number of joins. Remove `nil'.
64 * Add Name keyword. Don't discard ignored phrases.
65 * Add support for merge -A vs -E, and allow up to three labels.
66 * Improve quality of diagnostics and prototypes.
67 *
68 * Revision 5.15 1992/07/28 16:12:44 eggert
69 * Statement macro names now end in _.
70 *
71 * Revision 5.14 1992/02/17 23:02:22 eggert
72 * Add -T support. Work around NFS mmap SIGBUS problem.
73 *
74 * Revision 5.13 1992/01/24 18:44:19 eggert
75 * Add support for bad_creat0. lint -> RCS_lint
76 *
77 * Revision 5.12 1992/01/06 02:42:34 eggert
78 * while (E) ; -> while (E) continue;
79 *
80 * Revision 5.11 1991/10/07 17:32:46 eggert
81 * Support piece tables even if !has_mmap.
82 *
83 * Revision 5.10 1991/09/24 00:28:39 eggert
84 * Remove unexported functions.
85 *
86 * Revision 5.9 1991/08/19 03:13:55 eggert
87 * Add piece tables and other tuneups, and NFS workarounds.
88 *
89 * Revision 5.8 1991/04/21 11:58:20 eggert
90 * Add -x, RCSINIT, MS-DOS support.
91 *
92 * Revision 5.7 1991/02/28 19:18:50 eggert
93 * Try setuid() if seteuid() doesn't work.
94 *
95 * Revision 5.6 1991/02/26 17:48:37 eggert
96 * Support new link behavior. Move ANSI C / Posix declarations into conf.sh.
97 *
98 * Revision 5.5 1990/12/04 05:18:43 eggert
99 * Use -I for prompts and -q for diagnostics.
100 *
101 * Revision 5.4 1990/11/01 05:03:35 eggert
102 * Don't assume that builtins are functions; they may be macros.
103 * Permit arbitrary data in logs.
104 *
105 * Revision 5.3 1990/09/26 23:36:58 eggert
106 * Port wait() to non-Posix ANSI C hosts.
107 *
108 * Revision 5.2 1990/09/04 08:02:20 eggert
109 * Don't redefine NAME_MAX, PATH_MAX.
110 * Improve incomplete line handling. Standardize yes-or-no procedure.
111 *
112 * Revision 5.1 1990/08/29 07:13:53 eggert
113 * Add -kkvl. Fix type typos exposed by porting. Clean old log messages too.
114 *
115 * Revision 5.0 1990/08/22 08:12:44 eggert
116 * Adjust ANSI C / Posix support. Add -k, -V, setuid. Don't call access().
117 * Remove compile-time limits; use malloc instead.
118 * Ansify and Posixate. Add support for ISO 8859.
119 * Remove snoop and v2 support.
120 *
121 * Revision 4.9 89/05/01 15:17:14 narten
122 * botched previous USG fix
123 *
124 * Revision 4.8 89/05/01 14:53:05 narten
125 * changed #include <strings.h> -> string.h for USG systems.
126 *
127 * Revision 4.7 88/11/08 15:58:45 narten
128 * removed defs for functions loaded from libraries
129 *
130 * Revision 4.6 88/08/09 19:12:36 eggert
131 * Shrink stdio code size; remove lint; permit -Dhshsize=nn.
132 *
133 * Revision 4.5 87/12/18 17:06:41 narten
134 * made removed BSD ifdef, now uses V4_2BSD
135 *
136 * Revision 4.4 87/10/18 10:29:49 narten
137 * Updating version numbers
138 * Changes relative to 1.1 are actually relative to 4.2
139 *
140 * Revision 1.3 87/09/24 14:02:25 narten
141 * changes for lint
142 *
143 * Revision 1.2 87/03/27 14:22:02 jenkins
144 * Port to suns
145 *
146 * Revision 4.2 83/12/20 16:04:20 wft
147 * merged 3.6.1.1 and 4.1 (SMALLOG, logsize).
148 * moved setting of STRICT_LOCKING to Makefile.
149 * changed DOLLAR to UNKN (conflict with KDELIM).
150 *
151 * Revision 4.1 83/05/04 09:12:41 wft
152 * Added markers Id and RCSfile.
153 * Added Dbranch for default branches.
154 *
155 * Revision 3.6.1.1 83/12/02 21:56:22 wft
156 * Increased logsize, added macro SMALLOG.
157 *
158 * Revision 3.6 83/01/15 16:43:28 wft
159 * 4.2 prerelease
160 *
161 * Revision 3.6 83/01/15 16:43:28 wft
162 * Replaced dbm.h with BYTESIZ, fixed definition of rindex().
163 * Added variants of NCPFN and NCPPN for bsd 4.2, selected by defining V4_2BSD.
164 * Added macro DELNUMFORM to have uniform format for printing delta text nodes.
165 * Added macro DELETE to mark deleted deltas.
166 *
167 * Revision 3.5 82/12/10 12:16:56 wft
168 * Added two forms of DATEFORM, one using %02d, the other %.2d.
169 *
170 * Revision 3.4 82/12/04 20:01:25 wft
171 * added LOCKER, Locker, and USG (redefinition of rindex).
172 *
173 * Revision 3.3 82/12/03 12:22:04 wft
174 * Added dbm.h, stdio.h, RCSBASE, RCSSEP, RCSSUF, WORKMODE, TMPFILE3,
175 * PRINTDATE, PRINTTIME, map, and ctab; removed Suffix. Redefined keyvallength
176 * using NCPPN. Changed putc() to abort on write error.
177 *
178 * Revision 3.2 82/10/18 15:03:52 wft
179 * added macro STRICT_LOCKING, removed RCSUMASK.
180 * renamed JOINFILE[1,2] to JOINFIL[1,2].
181 *
182 * Revision 3.1 82/10/11 19:41:17 wft
183 * removed NBPW, NBPC, NCPW.
184 * added typdef int void to aid compiling
185 */
186
187
188#include "conf.h"
189
190
191#define EXIT_TROUBLE DIFF_TROUBLE
192
193#ifdef _POSIX_PATH_MAX
194# define SIZEABLE_PATH _POSIX_PATH_MAX
195#else
196# define SIZEABLE_PATH 255 /* size of a large path; not a hard limit */
197#endif
198
199/* for traditional C hosts with unusual size arguments */
200#define Fread(p,s,n,f) fread(p, (freadarg_type)(s), (freadarg_type)(n), f)
201#define Fwrite(p,s,n,f) fwrite(p, (freadarg_type)(s), (freadarg_type)(n), f)
202
203
204/*
205 * Parameters
206 */
207
208/* backwards compatibility with old versions of RCS */
209#define VERSION_min 3 /* old output RCS format supported */
210#define VERSION_max 5 /* newest output RCS format supported */
211#ifndef VERSION_DEFAULT /* default RCS output format */
212# define VERSION_DEFAULT VERSION_max
213#endif
214#define VERSION(n) ((n) - VERSION_DEFAULT) /* internally, 0 is the default */
215
216#ifndef STRICT_LOCKING
217#define STRICT_LOCKING 1
218#endif
219 /* 0 sets the default locking to non-strict; */
220 /* used in experimental environments. */
221 /* 1 sets the default locking to strict; */
222 /* used in production environments. */
223
224#define yearlength 16 /* (good through AD 9,999,999,999,999,999) */
225#define datesize (yearlength+16) /* size of output of time2date */
226#define RCSTMPPREFIX '_' /* prefix for temp files in working dir */
227#define KDELIM '$' /* delimiter for keywords */
228#define VDELIM ':' /* separates keywords from values */
229#define DEFAULTSTATE "Exp" /* default state of revisions */
230
231
232
233#define true 1
234#define false 0
235
236
237/*
238 * RILE - readonly file
239 * declarecache; - declares local cache for RILE variable(s)
240 * setupcache - sets up the local RILE cache, but does not initialize it
241 * cache, uncache - caches and uncaches the local RILE;
242 * (uncache,cache) is needed around functions that advance the RILE pointer
243 * Igeteof_(f,c,s) - get a char c from f, executing statement s at EOF
244 * cachegeteof_(c,s) - Igeteof_ applied to the local RILE
245 * Iget_(f,c) - like Igeteof_, except EOF is an error
246 * cacheget_(c) - Iget_ applied to the local RILE
247 * cacheunget_(f,c,s) - read c backwards from cached f, executing s at BOF
248 * Ifileno, Ioffset_type, Irewind, Itell - analogs to stdio routines
249 *
250 * By conventions, macros whose names end in _ are statements, not expressions.
251 * Following such macros with `; else' results in a syntax error.
252 */
253
254#define maps_memory (has_map_fd || has_mmap)
255
256#if large_memory
257 typedef unsigned char const *Iptr_type;
258 typedef struct RILE {
259 Iptr_type ptr, lim;
260 unsigned char *base; /* not Iptr_type for lint's sake */
261 unsigned char *readlim;
262 int fd;
263# if maps_memory
264 void (*deallocate) P((struct RILE *));
265# else
266 FILE *stream;
267# endif
268 } RILE;
269# if maps_memory
270# define declarecache register Iptr_type ptr, lim
271# define setupcache(f) (lim = (f)->lim)
272# define Igeteof_(f,c,s) if ((f)->ptr==(f)->lim) s else (c)= *(f)->ptr++;
273# define cachegeteof_(c,s) if (ptr==lim) s else (c)= *ptr++;
274# else
275 int Igetmore P((RILE*));
276# define declarecache register Iptr_type ptr; register RILE *rRILE
277# define setupcache(f) (rRILE = (f))
278# define Igeteof_(f,c,s) if ((f)->ptr==(f)->readlim && !Igetmore(f)) s else (c)= *(f)->ptr++;
279# define cachegeteof_(c,s) if (ptr==rRILE->readlim && !Igetmore(rRILE)) s else (c)= *ptr++;
280# endif
281# define uncache(f) ((f)->ptr = ptr)
282# define cache(f) (ptr = (f)->ptr)
283# define Iget_(f,c) Igeteof_(f,c,Ieof();)
284# define cacheget_(c) cachegeteof_(c,Ieof();)
285# define cacheunget_(f,c) (c)=(--ptr)[-1];
286# define Ioffset_type size_t
287# define Itell(f) ((f)->ptr - (f)->base)
288# define Irewind(f) ((f)->ptr = (f)->base)
289# define cacheptr() ptr
290# define Ifileno(f) ((f)->fd)
291#else
292# define RILE FILE
293# define declarecache register FILE *ptr
294# define setupcache(f) (ptr = (f))
295# define uncache(f)
296# define cache(f)
297# define Igeteof_(f,c,s) {if(((c)=getc(f))==EOF){testIerror(f);if(feof(f))s}}
298# define cachegeteof_(c,s) Igeteof_(ptr,c,s)
299# define Iget_(f,c) { if (((c)=getc(f))==EOF) testIeof(f); }
300# define cacheget_(c) Iget_(ptr,c)
301# define cacheunget_(f,c) if(fseek(ptr,-2L,SEEK_CUR))Ierror();else cacheget_(c)
302# define Ioffset_type long
303# define Itell(f) ftell(f)
304# define Ifileno(f) fileno(f)
305#endif
306
307/* Print a char, but abort on write error. */
308#define aputc_(c,o) { if (putc(c,o)==EOF) testOerror(o); }
309
310/* Get a character from an RCS file, perhaps copying to a new RCS file. */
311#define GETCeof_(o,c,s) { cachegeteof_(c,s) if (o) aputc_(c,o) }
312#define GETC_(o,c) { cacheget_(c) if (o) aputc_(c,o) }
313
314
315#define WORKMODE(RCSmode, writable) (((RCSmode)&(mode_t)~(S_IWUSR|S_IWGRP|S_IWOTH)) | ((writable)?S_IWUSR:0))
316/* computes mode of working file: same as RCSmode, but write permission */
317/* determined by writable */
318
319
320/* character classes and token codes */
321enum tokens {
322/* classes */ DELIM, DIGIT, IDCHAR, NEWLN, LETTER, Letter,
323 PERIOD, SBEGIN, SPACE, UNKN,
324/* tokens */ COLON, ID, NUM, SEMI, STRING
325};
326
327#define SDELIM '@' /* the actual character is needed for string handling*/
328/* SDELIM must be consistent with ctab[], so that ctab[SDELIM]==SBEGIN.
329 * there should be no overlap among SDELIM, KDELIM, and VDELIM
330 */
331
332#define isdigit(c) (((unsigned)(c)-'0') <= 9) /* faster than ctab[c]==DIGIT */
333
334
335
336
337
338/***************************************
339 * Data structures for the symbol table
340 ***************************************/
341
342/* Buffer of arbitrary data */
343struct buf {
344 char *string;
345 size_t size;
346};
347struct cbuf {
348 char const *string;
349 size_t size;
350};
351
352/* Hash table entry */
353struct hshentry {
354 char const * num; /* pointer to revision number (ASCIZ) */
355 char const * date; /* pointer to date of checkin */
356 char const * author; /* login of person checking in */
357 char const * lockedby; /* who locks the revision */
358 char const * state; /* state of revision (Exp by default) */
359 char const * name; /* name (if any) by which retrieved */
360 struct cbuf log; /* log message requested at checkin */
361 struct branchhead * branches; /* list of first revisions on branches*/
362 struct cbuf ig; /* ignored phrases in admin part */
363 struct cbuf igtext; /* ignored phrases in deltatext part */
364 struct hshentry * next; /* next revision on same branch */
365 struct hshentry * nexthsh; /* next revision with same hash value */
366 long insertlns;/* lines inserted (computed by rlog) */
367 long deletelns;/* lines deleted (computed by rlog) */
368 char selector; /* true if selected, false if deleted */
369};
370
371/* list of hash entries */
372struct hshentries {
373 struct hshentries *rest;
374 struct hshentry *first;
375};
376
377/* list element for branch lists */
378struct branchhead {
379 struct hshentry * hsh;
380 struct branchhead * nextbranch;
381};
382
383/* accesslist element */
384struct access {
385 char const * login;
386 struct access * nextaccess;
387};
388
389/* list element for locks */
390struct rcslock {
391 char const * login;
392 struct hshentry * delta;
393 struct rcslock * nextlock;
394};
395
396/* list element for symbolic names */
397struct assoc {
398 char const * symbol;
399 char const * num;
400 struct assoc * nextassoc;
401};
402
403
404#define mainArgs (argc,argv) int argc; char **argv;
405
406#if RCS_lint
407# define libId(name,rcsid)
408# define mainProg(name,cmd,rcsid) int name mainArgs
409#else
410# define libId(name,rcsid) char const name[] = rcsid;
411# define mainProg(n,c,i) char const Copyright[] = "Copyright 1982,1988,1989 Walter F. Tichy, Purdue CS\nCopyright 1990,1991,1992,1993,1994,1995 Paul Eggert", baseid[] = RCSBASE, cmdid[] = c; libId(n,i) int main P((int,char**)); int main mainArgs
412#endif
413
414/*
415 * Markers for keyword expansion (used in co and ident)
416 * Every byte must have class LETTER or Letter.
417 */
418#define AUTHOR "Author"
419#define DATE "Date"
420#define HEADER "Header"
421#define IDH "Id"
422#define LOCKER "Locker"
423#define LOG "Log"
424#define NAME "Name"
425#define RCSFILE "RCSfile"
426#define REVISION "Revision"
427#define SOURCE "Source"
428#define STATE "State"
| 4
5/* Copyright 1982, 1988, 1989 Walter Tichy
6 Copyright 1990, 1991, 1992, 1993, 1994, 1995 Paul Eggert
7 Distributed under license by the Free Software Foundation, Inc.
8
9This file is part of RCS.
10
11RCS is free software; you can redistribute it and/or modify
12it under the terms of the GNU General Public License as published by
13the Free Software Foundation; either version 2, or (at your option)
14any later version.
15
16RCS is distributed in the hope that it will be useful,
17but WITHOUT ANY WARRANTY; without even the implied warranty of
18MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
19GNU General Public License for more details.
20
21You should have received a copy of the GNU General Public License
22along with RCS; see the file COPYING.
23If not, write to the Free Software Foundation,
2459 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
25
26Report problems and direct all questions to:
27
28 rcs-bugs@cs.purdue.edu
29
30*/
31
32/*
33 * Revision 5.20 1995/06/16 06:19:24 eggert
34 * Update FSF address.
35 *
36 * Revision 5.19 1995/06/01 16:23:43 eggert
37 * (SIZEABLE_PATH): Don't depend on PATH_MAX: it's not worth configuring.
38 * (Ioffset_type,BINARY_EXPAND,MIN_UNEXPAND,MIN_UNCHANGED_EXPAND): New macros.
39 * (maps_memory): New macro; replaces many instances of `has_mmap'.
40 * (cacheptr): Renamed from cachetell.
41 * (struct RILE): New alternate name for RILE; the type is now recursive.
42 * (deallocate): New member for RILE, used for generic buffer deallocation.
43 * (cacheunget_): No longer take a failure arg; just call Ierror on failure.
44 * (struct rcslock): Renamed from struct lock, to avoid collisions with
45 * system headers on some hosts. All users changed.
46 * (basefilename): Renamed from basename, likewise.
47 * (dirtpname): Remove; no longer external.
48 * (dirlen, dateform): Remove; no longer used.
49 * (cmpdate, fopenSafer, fdSafer, readAccessFilenameBuffer): New functions.
50 * (zonelenmax): Increase to 9 for full ISO 8601 format.
51 * (catchmmapints): Depend on has_NFS.
52 *
53 * Revision 5.18 1994/03/17 14:05:48 eggert
54 * Add primitives for reading backwards from a RILE;
55 * this is needed to go back and find the $Log prefix.
56 * Specify subprocess input via file descriptor, not file name. Remove lint.
57 *
58 * Revision 5.17 1993/11/09 17:40:15 eggert
59 * Move RCS-specific time handling into rcstime.c.
60 * printf_string now takes two arguments, alas.
61 *
62 * Revision 5.16 1993/11/03 17:42:27 eggert
63 * Don't arbitrarily limit the number of joins. Remove `nil'.
64 * Add Name keyword. Don't discard ignored phrases.
65 * Add support for merge -A vs -E, and allow up to three labels.
66 * Improve quality of diagnostics and prototypes.
67 *
68 * Revision 5.15 1992/07/28 16:12:44 eggert
69 * Statement macro names now end in _.
70 *
71 * Revision 5.14 1992/02/17 23:02:22 eggert
72 * Add -T support. Work around NFS mmap SIGBUS problem.
73 *
74 * Revision 5.13 1992/01/24 18:44:19 eggert
75 * Add support for bad_creat0. lint -> RCS_lint
76 *
77 * Revision 5.12 1992/01/06 02:42:34 eggert
78 * while (E) ; -> while (E) continue;
79 *
80 * Revision 5.11 1991/10/07 17:32:46 eggert
81 * Support piece tables even if !has_mmap.
82 *
83 * Revision 5.10 1991/09/24 00:28:39 eggert
84 * Remove unexported functions.
85 *
86 * Revision 5.9 1991/08/19 03:13:55 eggert
87 * Add piece tables and other tuneups, and NFS workarounds.
88 *
89 * Revision 5.8 1991/04/21 11:58:20 eggert
90 * Add -x, RCSINIT, MS-DOS support.
91 *
92 * Revision 5.7 1991/02/28 19:18:50 eggert
93 * Try setuid() if seteuid() doesn't work.
94 *
95 * Revision 5.6 1991/02/26 17:48:37 eggert
96 * Support new link behavior. Move ANSI C / Posix declarations into conf.sh.
97 *
98 * Revision 5.5 1990/12/04 05:18:43 eggert
99 * Use -I for prompts and -q for diagnostics.
100 *
101 * Revision 5.4 1990/11/01 05:03:35 eggert
102 * Don't assume that builtins are functions; they may be macros.
103 * Permit arbitrary data in logs.
104 *
105 * Revision 5.3 1990/09/26 23:36:58 eggert
106 * Port wait() to non-Posix ANSI C hosts.
107 *
108 * Revision 5.2 1990/09/04 08:02:20 eggert
109 * Don't redefine NAME_MAX, PATH_MAX.
110 * Improve incomplete line handling. Standardize yes-or-no procedure.
111 *
112 * Revision 5.1 1990/08/29 07:13:53 eggert
113 * Add -kkvl. Fix type typos exposed by porting. Clean old log messages too.
114 *
115 * Revision 5.0 1990/08/22 08:12:44 eggert
116 * Adjust ANSI C / Posix support. Add -k, -V, setuid. Don't call access().
117 * Remove compile-time limits; use malloc instead.
118 * Ansify and Posixate. Add support for ISO 8859.
119 * Remove snoop and v2 support.
120 *
121 * Revision 4.9 89/05/01 15:17:14 narten
122 * botched previous USG fix
123 *
124 * Revision 4.8 89/05/01 14:53:05 narten
125 * changed #include <strings.h> -> string.h for USG systems.
126 *
127 * Revision 4.7 88/11/08 15:58:45 narten
128 * removed defs for functions loaded from libraries
129 *
130 * Revision 4.6 88/08/09 19:12:36 eggert
131 * Shrink stdio code size; remove lint; permit -Dhshsize=nn.
132 *
133 * Revision 4.5 87/12/18 17:06:41 narten
134 * made removed BSD ifdef, now uses V4_2BSD
135 *
136 * Revision 4.4 87/10/18 10:29:49 narten
137 * Updating version numbers
138 * Changes relative to 1.1 are actually relative to 4.2
139 *
140 * Revision 1.3 87/09/24 14:02:25 narten
141 * changes for lint
142 *
143 * Revision 1.2 87/03/27 14:22:02 jenkins
144 * Port to suns
145 *
146 * Revision 4.2 83/12/20 16:04:20 wft
147 * merged 3.6.1.1 and 4.1 (SMALLOG, logsize).
148 * moved setting of STRICT_LOCKING to Makefile.
149 * changed DOLLAR to UNKN (conflict with KDELIM).
150 *
151 * Revision 4.1 83/05/04 09:12:41 wft
152 * Added markers Id and RCSfile.
153 * Added Dbranch for default branches.
154 *
155 * Revision 3.6.1.1 83/12/02 21:56:22 wft
156 * Increased logsize, added macro SMALLOG.
157 *
158 * Revision 3.6 83/01/15 16:43:28 wft
159 * 4.2 prerelease
160 *
161 * Revision 3.6 83/01/15 16:43:28 wft
162 * Replaced dbm.h with BYTESIZ, fixed definition of rindex().
163 * Added variants of NCPFN and NCPPN for bsd 4.2, selected by defining V4_2BSD.
164 * Added macro DELNUMFORM to have uniform format for printing delta text nodes.
165 * Added macro DELETE to mark deleted deltas.
166 *
167 * Revision 3.5 82/12/10 12:16:56 wft
168 * Added two forms of DATEFORM, one using %02d, the other %.2d.
169 *
170 * Revision 3.4 82/12/04 20:01:25 wft
171 * added LOCKER, Locker, and USG (redefinition of rindex).
172 *
173 * Revision 3.3 82/12/03 12:22:04 wft
174 * Added dbm.h, stdio.h, RCSBASE, RCSSEP, RCSSUF, WORKMODE, TMPFILE3,
175 * PRINTDATE, PRINTTIME, map, and ctab; removed Suffix. Redefined keyvallength
176 * using NCPPN. Changed putc() to abort on write error.
177 *
178 * Revision 3.2 82/10/18 15:03:52 wft
179 * added macro STRICT_LOCKING, removed RCSUMASK.
180 * renamed JOINFILE[1,2] to JOINFIL[1,2].
181 *
182 * Revision 3.1 82/10/11 19:41:17 wft
183 * removed NBPW, NBPC, NCPW.
184 * added typdef int void to aid compiling
185 */
186
187
188#include "conf.h"
189
190
191#define EXIT_TROUBLE DIFF_TROUBLE
192
193#ifdef _POSIX_PATH_MAX
194# define SIZEABLE_PATH _POSIX_PATH_MAX
195#else
196# define SIZEABLE_PATH 255 /* size of a large path; not a hard limit */
197#endif
198
199/* for traditional C hosts with unusual size arguments */
200#define Fread(p,s,n,f) fread(p, (freadarg_type)(s), (freadarg_type)(n), f)
201#define Fwrite(p,s,n,f) fwrite(p, (freadarg_type)(s), (freadarg_type)(n), f)
202
203
204/*
205 * Parameters
206 */
207
208/* backwards compatibility with old versions of RCS */
209#define VERSION_min 3 /* old output RCS format supported */
210#define VERSION_max 5 /* newest output RCS format supported */
211#ifndef VERSION_DEFAULT /* default RCS output format */
212# define VERSION_DEFAULT VERSION_max
213#endif
214#define VERSION(n) ((n) - VERSION_DEFAULT) /* internally, 0 is the default */
215
216#ifndef STRICT_LOCKING
217#define STRICT_LOCKING 1
218#endif
219 /* 0 sets the default locking to non-strict; */
220 /* used in experimental environments. */
221 /* 1 sets the default locking to strict; */
222 /* used in production environments. */
223
224#define yearlength 16 /* (good through AD 9,999,999,999,999,999) */
225#define datesize (yearlength+16) /* size of output of time2date */
226#define RCSTMPPREFIX '_' /* prefix for temp files in working dir */
227#define KDELIM '$' /* delimiter for keywords */
228#define VDELIM ':' /* separates keywords from values */
229#define DEFAULTSTATE "Exp" /* default state of revisions */
230
231
232
233#define true 1
234#define false 0
235
236
237/*
238 * RILE - readonly file
239 * declarecache; - declares local cache for RILE variable(s)
240 * setupcache - sets up the local RILE cache, but does not initialize it
241 * cache, uncache - caches and uncaches the local RILE;
242 * (uncache,cache) is needed around functions that advance the RILE pointer
243 * Igeteof_(f,c,s) - get a char c from f, executing statement s at EOF
244 * cachegeteof_(c,s) - Igeteof_ applied to the local RILE
245 * Iget_(f,c) - like Igeteof_, except EOF is an error
246 * cacheget_(c) - Iget_ applied to the local RILE
247 * cacheunget_(f,c,s) - read c backwards from cached f, executing s at BOF
248 * Ifileno, Ioffset_type, Irewind, Itell - analogs to stdio routines
249 *
250 * By conventions, macros whose names end in _ are statements, not expressions.
251 * Following such macros with `; else' results in a syntax error.
252 */
253
254#define maps_memory (has_map_fd || has_mmap)
255
256#if large_memory
257 typedef unsigned char const *Iptr_type;
258 typedef struct RILE {
259 Iptr_type ptr, lim;
260 unsigned char *base; /* not Iptr_type for lint's sake */
261 unsigned char *readlim;
262 int fd;
263# if maps_memory
264 void (*deallocate) P((struct RILE *));
265# else
266 FILE *stream;
267# endif
268 } RILE;
269# if maps_memory
270# define declarecache register Iptr_type ptr, lim
271# define setupcache(f) (lim = (f)->lim)
272# define Igeteof_(f,c,s) if ((f)->ptr==(f)->lim) s else (c)= *(f)->ptr++;
273# define cachegeteof_(c,s) if (ptr==lim) s else (c)= *ptr++;
274# else
275 int Igetmore P((RILE*));
276# define declarecache register Iptr_type ptr; register RILE *rRILE
277# define setupcache(f) (rRILE = (f))
278# define Igeteof_(f,c,s) if ((f)->ptr==(f)->readlim && !Igetmore(f)) s else (c)= *(f)->ptr++;
279# define cachegeteof_(c,s) if (ptr==rRILE->readlim && !Igetmore(rRILE)) s else (c)= *ptr++;
280# endif
281# define uncache(f) ((f)->ptr = ptr)
282# define cache(f) (ptr = (f)->ptr)
283# define Iget_(f,c) Igeteof_(f,c,Ieof();)
284# define cacheget_(c) cachegeteof_(c,Ieof();)
285# define cacheunget_(f,c) (c)=(--ptr)[-1];
286# define Ioffset_type size_t
287# define Itell(f) ((f)->ptr - (f)->base)
288# define Irewind(f) ((f)->ptr = (f)->base)
289# define cacheptr() ptr
290# define Ifileno(f) ((f)->fd)
291#else
292# define RILE FILE
293# define declarecache register FILE *ptr
294# define setupcache(f) (ptr = (f))
295# define uncache(f)
296# define cache(f)
297# define Igeteof_(f,c,s) {if(((c)=getc(f))==EOF){testIerror(f);if(feof(f))s}}
298# define cachegeteof_(c,s) Igeteof_(ptr,c,s)
299# define Iget_(f,c) { if (((c)=getc(f))==EOF) testIeof(f); }
300# define cacheget_(c) Iget_(ptr,c)
301# define cacheunget_(f,c) if(fseek(ptr,-2L,SEEK_CUR))Ierror();else cacheget_(c)
302# define Ioffset_type long
303# define Itell(f) ftell(f)
304# define Ifileno(f) fileno(f)
305#endif
306
307/* Print a char, but abort on write error. */
308#define aputc_(c,o) { if (putc(c,o)==EOF) testOerror(o); }
309
310/* Get a character from an RCS file, perhaps copying to a new RCS file. */
311#define GETCeof_(o,c,s) { cachegeteof_(c,s) if (o) aputc_(c,o) }
312#define GETC_(o,c) { cacheget_(c) if (o) aputc_(c,o) }
313
314
315#define WORKMODE(RCSmode, writable) (((RCSmode)&(mode_t)~(S_IWUSR|S_IWGRP|S_IWOTH)) | ((writable)?S_IWUSR:0))
316/* computes mode of working file: same as RCSmode, but write permission */
317/* determined by writable */
318
319
320/* character classes and token codes */
321enum tokens {
322/* classes */ DELIM, DIGIT, IDCHAR, NEWLN, LETTER, Letter,
323 PERIOD, SBEGIN, SPACE, UNKN,
324/* tokens */ COLON, ID, NUM, SEMI, STRING
325};
326
327#define SDELIM '@' /* the actual character is needed for string handling*/
328/* SDELIM must be consistent with ctab[], so that ctab[SDELIM]==SBEGIN.
329 * there should be no overlap among SDELIM, KDELIM, and VDELIM
330 */
331
332#define isdigit(c) (((unsigned)(c)-'0') <= 9) /* faster than ctab[c]==DIGIT */
333
334
335
336
337
338/***************************************
339 * Data structures for the symbol table
340 ***************************************/
341
342/* Buffer of arbitrary data */
343struct buf {
344 char *string;
345 size_t size;
346};
347struct cbuf {
348 char const *string;
349 size_t size;
350};
351
352/* Hash table entry */
353struct hshentry {
354 char const * num; /* pointer to revision number (ASCIZ) */
355 char const * date; /* pointer to date of checkin */
356 char const * author; /* login of person checking in */
357 char const * lockedby; /* who locks the revision */
358 char const * state; /* state of revision (Exp by default) */
359 char const * name; /* name (if any) by which retrieved */
360 struct cbuf log; /* log message requested at checkin */
361 struct branchhead * branches; /* list of first revisions on branches*/
362 struct cbuf ig; /* ignored phrases in admin part */
363 struct cbuf igtext; /* ignored phrases in deltatext part */
364 struct hshentry * next; /* next revision on same branch */
365 struct hshentry * nexthsh; /* next revision with same hash value */
366 long insertlns;/* lines inserted (computed by rlog) */
367 long deletelns;/* lines deleted (computed by rlog) */
368 char selector; /* true if selected, false if deleted */
369};
370
371/* list of hash entries */
372struct hshentries {
373 struct hshentries *rest;
374 struct hshentry *first;
375};
376
377/* list element for branch lists */
378struct branchhead {
379 struct hshentry * hsh;
380 struct branchhead * nextbranch;
381};
382
383/* accesslist element */
384struct access {
385 char const * login;
386 struct access * nextaccess;
387};
388
389/* list element for locks */
390struct rcslock {
391 char const * login;
392 struct hshentry * delta;
393 struct rcslock * nextlock;
394};
395
396/* list element for symbolic names */
397struct assoc {
398 char const * symbol;
399 char const * num;
400 struct assoc * nextassoc;
401};
402
403
404#define mainArgs (argc,argv) int argc; char **argv;
405
406#if RCS_lint
407# define libId(name,rcsid)
408# define mainProg(name,cmd,rcsid) int name mainArgs
409#else
410# define libId(name,rcsid) char const name[] = rcsid;
411# define mainProg(n,c,i) char const Copyright[] = "Copyright 1982,1988,1989 Walter F. Tichy, Purdue CS\nCopyright 1990,1991,1992,1993,1994,1995 Paul Eggert", baseid[] = RCSBASE, cmdid[] = c; libId(n,i) int main P((int,char**)); int main mainArgs
412#endif
413
414/*
415 * Markers for keyword expansion (used in co and ident)
416 * Every byte must have class LETTER or Letter.
417 */
418#define AUTHOR "Author"
419#define DATE "Date"
420#define HEADER "Header"
421#define IDH "Id"
422#define LOCKER "Locker"
423#define LOG "Log"
424#define NAME "Name"
425#define RCSFILE "RCSfile"
426#define REVISION "Revision"
427#define SOURCE "Source"
428#define STATE "State"
|
429#define FREEBSD "FreeBSD"
430#define keylength 8 /* max length of any of the above keywords */
| 429#define CVSHEADER "CVSHeader"
430#define keylength 9 /* max length of any of the above keywords */
|
431
432enum markers { Nomatch, Author, Date, Header, Id,
| 431
432enum markers { Nomatch, Author, Date, Header, Id,
|
433 Locker, Log, Name, RCSfile, Revision, Source, State, FreeBSD };
| 433 Locker, Log, Name, RCSfile, Revision, Source, State, CVSHeader,
434 LocalId };
|
434 /* This must be in the same order as rcskeys.c's Keyword[] array. */
435
436#define DELNUMFORM "\n\n%s\n%s\n"
437/* used by putdtext and scanlogtext */
438
439#define EMPTYLOG "*** empty log message ***" /* used by ci and rlog */
440
441/* main program */
442extern char const cmdid[];
443void exiterr P((void)) exiting;
444
445/* merge */
446int merge P((int,char const*,char const*const[3],char const*const[3]));
447
448/* rcsedit */
449#define ciklogsize 23 /* sizeof("checked in with -k by ") */
450extern FILE *fcopy;
451extern char const *resultname;
452extern char const ciklog[ciklogsize];
453extern int locker_expansion;
454RILE *rcswriteopen P((struct buf*,struct stat*,int));
455char const *makedirtemp P((int));
456char const *getcaller P((void));
457int addlock P((struct hshentry*,int));
458int addsymbol P((char const*,char const*,int));
459int checkaccesslist P((void));
460int chnamemod P((FILE**,char const*,char const*,int,mode_t,time_t));
461int donerewrite P((int,time_t));
462int dorewrite P((int,int));
463int expandline P((RILE*,FILE*,struct hshentry const*,int,FILE*,int));
464int findlock P((int,struct hshentry**));
465int setmtime P((char const*,time_t));
466void ORCSclose P((void));
467void ORCSerror P((void));
468void copystring P((void));
469void dirtempunlink P((void));
470void enterstring P((void));
471void finishedit P((struct hshentry const*,FILE*,int));
472void keepdirtemp P((char const*));
473void openfcopy P((FILE*));
474void snapshotedit P((FILE*));
475void xpandstring P((struct hshentry const*));
476#if has_NFS || bad_unlink
477 int un_link P((char const*));
478#else
479# define un_link(s) unlink(s)
480#endif
481#if large_memory
482 void edit_string P((void));
483# define editstring(delta) edit_string()
484#else
485 void editstring P((struct hshentry const*));
486#endif
487
488/* rcsfcmp */
489int rcsfcmp P((RILE*,struct stat const*,char const*,struct hshentry const*));
490
491/* rcsfnms */
492#define bufautobegin(b) clear_buf(b)
493#define clear_buf(b) (VOID ((b)->string = 0, (b)->size = 0))
494extern FILE *workstdout;
495extern char *workname;
496extern char const *RCSname;
497extern char const *suffixes;
498extern int fdlock;
499extern struct stat RCSstat;
500RILE *rcsreadopen P((struct buf*,struct stat*,int));
501char *bufenlarge P((struct buf*,char const**));
502char const *basefilename P((char const*));
503char const *getfullRCSname P((void));
| 435 /* This must be in the same order as rcskeys.c's Keyword[] array. */
436
437#define DELNUMFORM "\n\n%s\n%s\n"
438/* used by putdtext and scanlogtext */
439
440#define EMPTYLOG "*** empty log message ***" /* used by ci and rlog */
441
442/* main program */
443extern char const cmdid[];
444void exiterr P((void)) exiting;
445
446/* merge */
447int merge P((int,char const*,char const*const[3],char const*const[3]));
448
449/* rcsedit */
450#define ciklogsize 23 /* sizeof("checked in with -k by ") */
451extern FILE *fcopy;
452extern char const *resultname;
453extern char const ciklog[ciklogsize];
454extern int locker_expansion;
455RILE *rcswriteopen P((struct buf*,struct stat*,int));
456char const *makedirtemp P((int));
457char const *getcaller P((void));
458int addlock P((struct hshentry*,int));
459int addsymbol P((char const*,char const*,int));
460int checkaccesslist P((void));
461int chnamemod P((FILE**,char const*,char const*,int,mode_t,time_t));
462int donerewrite P((int,time_t));
463int dorewrite P((int,int));
464int expandline P((RILE*,FILE*,struct hshentry const*,int,FILE*,int));
465int findlock P((int,struct hshentry**));
466int setmtime P((char const*,time_t));
467void ORCSclose P((void));
468void ORCSerror P((void));
469void copystring P((void));
470void dirtempunlink P((void));
471void enterstring P((void));
472void finishedit P((struct hshentry const*,FILE*,int));
473void keepdirtemp P((char const*));
474void openfcopy P((FILE*));
475void snapshotedit P((FILE*));
476void xpandstring P((struct hshentry const*));
477#if has_NFS || bad_unlink
478 int un_link P((char const*));
479#else
480# define un_link(s) unlink(s)
481#endif
482#if large_memory
483 void edit_string P((void));
484# define editstring(delta) edit_string()
485#else
486 void editstring P((struct hshentry const*));
487#endif
488
489/* rcsfcmp */
490int rcsfcmp P((RILE*,struct stat const*,char const*,struct hshentry const*));
491
492/* rcsfnms */
493#define bufautobegin(b) clear_buf(b)
494#define clear_buf(b) (VOID ((b)->string = 0, (b)->size = 0))
495extern FILE *workstdout;
496extern char *workname;
497extern char const *RCSname;
498extern char const *suffixes;
499extern int fdlock;
500extern struct stat RCSstat;
501RILE *rcsreadopen P((struct buf*,struct stat*,int));
502char *bufenlarge P((struct buf*,char const**));
503char const *basefilename P((char const*));
504char const *getfullRCSname P((void));
|
| 505char const *getfullCVSname P((void));
|
504char const *maketemp P((int));
505char const *rcssuffix P((char const*));
506int pairnames P((int,char**,RILE*(*)P((struct buf*,struct stat*,int)),int,int));
507struct cbuf bufremember P((struct buf*,size_t));
508void bufalloc P((struct buf*,size_t));
509void bufautoend P((struct buf*));
510void bufrealloc P((struct buf*,size_t));
511void bufscat P((struct buf*,char const*));
512void bufscpy P((struct buf*,char const*));
513void tempunlink P((void));
514
515/* rcsgen */
516extern int interactiveflag;
517extern struct buf curlogbuf;
518char const *buildrevision P((struct hshentries const*,struct hshentry*,FILE*,int));
519int getcstdin P((void));
520int putdtext P((struct hshentry const*,char const*,FILE*,int));
521int ttystdin P((void));
522int yesorno P((int,char const*,...)) printf_string(2,3);
523struct cbuf cleanlogmsg P((char*,size_t));
524struct cbuf getsstdin P((char const*,char const*,char const*,struct buf*));
525void putdesc P((int,char*));
526void putdftext P((struct hshentry const*,RILE*,FILE*,int));
527
528/* rcskeep */
529extern int prevkeys;
530extern struct buf prevauthor, prevdate, prevname, prevrev, prevstate;
531int getoldkeys P((RILE*));
532
533/* rcskeys */
| 506char const *maketemp P((int));
507char const *rcssuffix P((char const*));
508int pairnames P((int,char**,RILE*(*)P((struct buf*,struct stat*,int)),int,int));
509struct cbuf bufremember P((struct buf*,size_t));
510void bufalloc P((struct buf*,size_t));
511void bufautoend P((struct buf*));
512void bufrealloc P((struct buf*,size_t));
513void bufscat P((struct buf*,char const*));
514void bufscpy P((struct buf*,char const*));
515void tempunlink P((void));
516
517/* rcsgen */
518extern int interactiveflag;
519extern struct buf curlogbuf;
520char const *buildrevision P((struct hshentries const*,struct hshentry*,FILE*,int));
521int getcstdin P((void));
522int putdtext P((struct hshentry const*,char const*,FILE*,int));
523int ttystdin P((void));
524int yesorno P((int,char const*,...)) printf_string(2,3);
525struct cbuf cleanlogmsg P((char*,size_t));
526struct cbuf getsstdin P((char const*,char const*,char const*,struct buf*));
527void putdesc P((int,char*));
528void putdftext P((struct hshentry const*,RILE*,FILE*,int));
529
530/* rcskeep */
531extern int prevkeys;
532extern struct buf prevauthor, prevdate, prevname, prevrev, prevstate;
533int getoldkeys P((RILE*));
534
535/* rcskeys */
|
534extern char const *const Keyword[];
| 536extern char const *Keyword[];
537extern enum markers LocalIdMode;
|
535enum markers trymatch P((char const*));
| 538enum markers trymatch P((char const*));
|
| 539void setRCSLocalId(char const *);
540void setIncExc(char const *);
|
536
537/* rcslex */
538extern FILE *foutptr;
539extern FILE *frewrite;
540extern RILE *finptr;
541extern char const *NextString;
542extern enum tokens nexttok;
543extern int hshenter;
544extern int nerror;
545extern int nextc;
546extern int quietflag;
547extern long rcsline;
548char const *getid P((void));
549void efaterror P((char const*)) exiting;
550void enfaterror P((int,char const*)) exiting;
551void fatcleanup P((int)) exiting;
552void faterror P((char const*,...)) printf_string_exiting(1,2);
553void fatserror P((char const*,...)) printf_string_exiting(1,2);
554void rcsfaterror P((char const*,...)) printf_string_exiting(1,2);
555void Ieof P((void)) exiting;
556void Ierror P((void)) exiting;
557void Oerror P((void)) exiting;
558char *checkid P((char*,int));
559char *checksym P((char*,int));
560int eoflex P((void));
561int getkeyopt P((char const*));
562int getlex P((enum tokens));
563struct cbuf getphrases P((char const*));
564struct cbuf savestring P((struct buf*));
565struct hshentry *getnum P((void));
566void Ifclose P((RILE*));
567void Izclose P((RILE**));
568void Lexinit P((void));
569void Ofclose P((FILE*));
570void Orewind P((FILE*));
571void Ozclose P((FILE**));
572void aflush P((FILE*));
573void afputc P((int,FILE*));
574void aprintf P((FILE*,char const*,...)) printf_string(2,3);
575void aputs P((char const*,FILE*));
576void checksid P((char*));
577void checkssym P((char*));
578void diagnose P((char const*,...)) printf_string(1,2);
579void eerror P((char const*));
580void eflush P((void));
581void enerror P((int,char const*));
582void error P((char const*,...)) printf_string(1,2);
583void fvfprintf P((FILE*,char const*,va_list));
584void getkey P((char const*));
585void getkeystring P((char const*));
586void nextlex P((void));
587void oflush P((void));
588void printstring P((void));
589void readstring P((void));
590void redefined P((int));
591void rcserror P((char const*,...)) printf_string(1,2);
592void rcswarn P((char const*,...)) printf_string(1,2);
593void testIerror P((FILE*));
594void testOerror P((FILE*));
595void warn P((char const*,...)) printf_string(1,2);
596void warnignore P((void));
597void workerror P((char const*,...)) printf_string(1,2);
598void workwarn P((char const*,...)) printf_string(1,2);
599#if has_madvise && has_mmap && large_memory
600 void advise_access P((RILE*,int));
601# define if_advise_access(p,f,advice) if (p) advise_access(f,advice)
602#else
603# define advise_access(f,advice)
604# define if_advise_access(p,f,advice)
605#endif
606#if large_memory && maps_memory
607 RILE *I_open P((char const*,struct stat*));
608# define Iopen(f,m,s) I_open(f,s)
609#else
610 RILE *Iopen P((char const*,char const*,struct stat*));
611#endif
612#if !large_memory
613 void testIeof P((FILE*));
614 void Irewind P((RILE*));
615#endif
616
617/* rcsmap */
618extern enum tokens const ctab[];
619
620/* rcsrev */
621char *partialno P((struct buf*,char const*,int));
622char const *namedrev P((char const*,struct hshentry*));
623char const *tiprev P((void));
624int cmpdate P((char const*,char const*));
625int cmpnum P((char const*,char const*));
626int cmpnumfld P((char const*,char const*,int));
627int compartial P((char const*,char const*,int));
628int expandsym P((char const*,struct buf*));
629int fexpandsym P((char const*,struct buf*,RILE*));
630struct hshentry *genrevs P((char const*,char const*,char const*,char const*,struct hshentries**));
631int countnumflds P((char const*));
632void getbranchno P((char const*,struct buf*));
633
634/* rcssyn */
635/* These expand modes must agree with Expand_names[] in rcssyn.c. */
636#define KEYVAL_EXPAND 0 /* -kkv `$Keyword: value $' */
637#define KEYVALLOCK_EXPAND 1 /* -kkvl `$Keyword: value locker $' */
638#define KEY_EXPAND 2 /* -kk `$Keyword$' */
639#define VAL_EXPAND 3 /* -kv `value' */
640#define OLD_EXPAND 4 /* -ko use old string, omitting expansion */
641#define BINARY_EXPAND 5 /* -kb like -ko, but use binary mode I/O */
642#define MIN_UNEXPAND OLD_EXPAND /* min value for no logical expansion */
643#define MIN_UNCHANGED_EXPAND (OPEN_O_BINARY ? BINARY_EXPAND : OLD_EXPAND)
644 /* min value guaranteed to yield an identical file */
645struct diffcmd {
646 long
647 line1, /* number of first line */
648 nlines, /* number of lines affected */
649 adprev, /* previous 'a' line1+1 or 'd' line1 */
650 dafter; /* sum of previous 'd' line1 and previous 'd' nlines */
651};
652extern char const * Dbranch;
653extern struct access * AccessList;
654extern struct assoc * Symbols;
655extern struct cbuf Comment;
656extern struct cbuf Ignored;
657extern struct rcslock *Locks;
658extern struct hshentry * Head;
659extern int Expand;
660extern int StrictLocks;
661extern int TotalDeltas;
662extern char const *const expand_names[];
663extern char const
664 Kaccess[], Kauthor[], Kbranch[], Kcomment[],
665 Kdate[], Kdesc[], Kexpand[], Khead[], Klocks[], Klog[],
666 Knext[], Kstate[], Kstrict[], Ksymbols[], Ktext[];
667void unexpected_EOF P((void)) exiting;
668int getdiffcmd P((RILE*,int,FILE*,struct diffcmd*));
669int str2expmode P((char const*));
670void getadmin P((void));
671void getdesc P((int));
672void gettree P((void));
673void ignorephrases P((char const*));
674void initdiffcmd P((struct diffcmd*));
675void putadmin P((void));
676void putstring P((FILE*,int,struct cbuf,int));
677void puttree P((struct hshentry const*,FILE*));
678
679/* rcstime */
680#define zonelenmax 9 /* maxiumum length of time zone string, e.g. "+12:34:56" */
681char const *date2str P((char const[datesize],char[datesize + zonelenmax]));
682time_t date2time P((char const[datesize]));
683void str2date P((char const*,char[datesize]));
684void time2date P((time_t,char[datesize]));
685void zone_set P((char const*));
686
687/* rcsutil */
688extern int RCSversion;
689FILE *fopenSafer P((char const*,char const*));
690char *cgetenv P((char const*));
691char *fstr_save P((char const*));
692char *str_save P((char const*));
693char const *getusername P((int));
694int fdSafer P((int));
695int getRCSINIT P((int,char**,char***));
696int run P((int,char const*,...));
697int runv P((int,char const*,char const**));
698malloc_type fremember P((malloc_type));
699malloc_type ftestalloc P((size_t));
700malloc_type testalloc P((size_t));
701malloc_type testrealloc P((malloc_type,size_t));
702#define ftalloc(T) ftnalloc(T,1)
703#define talloc(T) tnalloc(T,1)
704#if RCS_lint
705 extern malloc_type lintalloc;
706# define ftnalloc(T,n) (lintalloc = ftestalloc(sizeof(T)*(n)), (T*)0)
707# define tnalloc(T,n) (lintalloc = testalloc(sizeof(T)*(n)), (T*)0)
708# define trealloc(T,p,n) (lintalloc = testrealloc((malloc_type)0, sizeof(T)*(n)), p)
709# define tfree(p)
710#else
711# define ftnalloc(T,n) ((T*) ftestalloc(sizeof(T)*(n)))
712# define tnalloc(T,n) ((T*) testalloc(sizeof(T)*(n)))
713# define trealloc(T,p,n) ((T*) testrealloc((malloc_type)(p), sizeof(T)*(n)))
714# define tfree(p) free((malloc_type)(p))
715#endif
716time_t now P((void));
717void awrite P((char const*,size_t,FILE*));
718void fastcopy P((RILE*,FILE*));
719void ffree P((void));
720void ffree1 P((char const*));
721void setRCSversion P((char const*));
722#if has_signal
723 void catchints P((void));
724 void ignoreints P((void));
725 void restoreints P((void));
726#else
727# define catchints()
728# define ignoreints()
729# define restoreints()
730#endif
731#if has_mmap && large_memory
732# if has_NFS && mmap_signal
733 void catchmmapints P((void));
734 void readAccessFilenameBuffer P((char const*,unsigned char const*));
735# else
736# define catchmmapints()
737# endif
738#endif
739#if has_getuid
740 uid_t ruid P((void));
741# define myself(u) ((u) == ruid())
742#else
743# define myself(u) true
744#endif
745#if has_setuid
746 uid_t euid P((void));
747 void nosetid P((void));
748 void seteid P((void));
749 void setrid P((void));
750#else
751# define nosetid()
752# define seteid()
753# define setrid()
754#endif
755
756/* version */
757extern char const RCS_version_string[];
| 541
542/* rcslex */
543extern FILE *foutptr;
544extern FILE *frewrite;
545extern RILE *finptr;
546extern char const *NextString;
547extern enum tokens nexttok;
548extern int hshenter;
549extern int nerror;
550extern int nextc;
551extern int quietflag;
552extern long rcsline;
553char const *getid P((void));
554void efaterror P((char const*)) exiting;
555void enfaterror P((int,char const*)) exiting;
556void fatcleanup P((int)) exiting;
557void faterror P((char const*,...)) printf_string_exiting(1,2);
558void fatserror P((char const*,...)) printf_string_exiting(1,2);
559void rcsfaterror P((char const*,...)) printf_string_exiting(1,2);
560void Ieof P((void)) exiting;
561void Ierror P((void)) exiting;
562void Oerror P((void)) exiting;
563char *checkid P((char*,int));
564char *checksym P((char*,int));
565int eoflex P((void));
566int getkeyopt P((char const*));
567int getlex P((enum tokens));
568struct cbuf getphrases P((char const*));
569struct cbuf savestring P((struct buf*));
570struct hshentry *getnum P((void));
571void Ifclose P((RILE*));
572void Izclose P((RILE**));
573void Lexinit P((void));
574void Ofclose P((FILE*));
575void Orewind P((FILE*));
576void Ozclose P((FILE**));
577void aflush P((FILE*));
578void afputc P((int,FILE*));
579void aprintf P((FILE*,char const*,...)) printf_string(2,3);
580void aputs P((char const*,FILE*));
581void checksid P((char*));
582void checkssym P((char*));
583void diagnose P((char const*,...)) printf_string(1,2);
584void eerror P((char const*));
585void eflush P((void));
586void enerror P((int,char const*));
587void error P((char const*,...)) printf_string(1,2);
588void fvfprintf P((FILE*,char const*,va_list));
589void getkey P((char const*));
590void getkeystring P((char const*));
591void nextlex P((void));
592void oflush P((void));
593void printstring P((void));
594void readstring P((void));
595void redefined P((int));
596void rcserror P((char const*,...)) printf_string(1,2);
597void rcswarn P((char const*,...)) printf_string(1,2);
598void testIerror P((FILE*));
599void testOerror P((FILE*));
600void warn P((char const*,...)) printf_string(1,2);
601void warnignore P((void));
602void workerror P((char const*,...)) printf_string(1,2);
603void workwarn P((char const*,...)) printf_string(1,2);
604#if has_madvise && has_mmap && large_memory
605 void advise_access P((RILE*,int));
606# define if_advise_access(p,f,advice) if (p) advise_access(f,advice)
607#else
608# define advise_access(f,advice)
609# define if_advise_access(p,f,advice)
610#endif
611#if large_memory && maps_memory
612 RILE *I_open P((char const*,struct stat*));
613# define Iopen(f,m,s) I_open(f,s)
614#else
615 RILE *Iopen P((char const*,char const*,struct stat*));
616#endif
617#if !large_memory
618 void testIeof P((FILE*));
619 void Irewind P((RILE*));
620#endif
621
622/* rcsmap */
623extern enum tokens const ctab[];
624
625/* rcsrev */
626char *partialno P((struct buf*,char const*,int));
627char const *namedrev P((char const*,struct hshentry*));
628char const *tiprev P((void));
629int cmpdate P((char const*,char const*));
630int cmpnum P((char const*,char const*));
631int cmpnumfld P((char const*,char const*,int));
632int compartial P((char const*,char const*,int));
633int expandsym P((char const*,struct buf*));
634int fexpandsym P((char const*,struct buf*,RILE*));
635struct hshentry *genrevs P((char const*,char const*,char const*,char const*,struct hshentries**));
636int countnumflds P((char const*));
637void getbranchno P((char const*,struct buf*));
638
639/* rcssyn */
640/* These expand modes must agree with Expand_names[] in rcssyn.c. */
641#define KEYVAL_EXPAND 0 /* -kkv `$Keyword: value $' */
642#define KEYVALLOCK_EXPAND 1 /* -kkvl `$Keyword: value locker $' */
643#define KEY_EXPAND 2 /* -kk `$Keyword$' */
644#define VAL_EXPAND 3 /* -kv `value' */
645#define OLD_EXPAND 4 /* -ko use old string, omitting expansion */
646#define BINARY_EXPAND 5 /* -kb like -ko, but use binary mode I/O */
647#define MIN_UNEXPAND OLD_EXPAND /* min value for no logical expansion */
648#define MIN_UNCHANGED_EXPAND (OPEN_O_BINARY ? BINARY_EXPAND : OLD_EXPAND)
649 /* min value guaranteed to yield an identical file */
650struct diffcmd {
651 long
652 line1, /* number of first line */
653 nlines, /* number of lines affected */
654 adprev, /* previous 'a' line1+1 or 'd' line1 */
655 dafter; /* sum of previous 'd' line1 and previous 'd' nlines */
656};
657extern char const * Dbranch;
658extern struct access * AccessList;
659extern struct assoc * Symbols;
660extern struct cbuf Comment;
661extern struct cbuf Ignored;
662extern struct rcslock *Locks;
663extern struct hshentry * Head;
664extern int Expand;
665extern int StrictLocks;
666extern int TotalDeltas;
667extern char const *const expand_names[];
668extern char const
669 Kaccess[], Kauthor[], Kbranch[], Kcomment[],
670 Kdate[], Kdesc[], Kexpand[], Khead[], Klocks[], Klog[],
671 Knext[], Kstate[], Kstrict[], Ksymbols[], Ktext[];
672void unexpected_EOF P((void)) exiting;
673int getdiffcmd P((RILE*,int,FILE*,struct diffcmd*));
674int str2expmode P((char const*));
675void getadmin P((void));
676void getdesc P((int));
677void gettree P((void));
678void ignorephrases P((char const*));
679void initdiffcmd P((struct diffcmd*));
680void putadmin P((void));
681void putstring P((FILE*,int,struct cbuf,int));
682void puttree P((struct hshentry const*,FILE*));
683
684/* rcstime */
685#define zonelenmax 9 /* maxiumum length of time zone string, e.g. "+12:34:56" */
686char const *date2str P((char const[datesize],char[datesize + zonelenmax]));
687time_t date2time P((char const[datesize]));
688void str2date P((char const*,char[datesize]));
689void time2date P((time_t,char[datesize]));
690void zone_set P((char const*));
691
692/* rcsutil */
693extern int RCSversion;
694FILE *fopenSafer P((char const*,char const*));
695char *cgetenv P((char const*));
696char *fstr_save P((char const*));
697char *str_save P((char const*));
698char const *getusername P((int));
699int fdSafer P((int));
700int getRCSINIT P((int,char**,char***));
701int run P((int,char const*,...));
702int runv P((int,char const*,char const**));
703malloc_type fremember P((malloc_type));
704malloc_type ftestalloc P((size_t));
705malloc_type testalloc P((size_t));
706malloc_type testrealloc P((malloc_type,size_t));
707#define ftalloc(T) ftnalloc(T,1)
708#define talloc(T) tnalloc(T,1)
709#if RCS_lint
710 extern malloc_type lintalloc;
711# define ftnalloc(T,n) (lintalloc = ftestalloc(sizeof(T)*(n)), (T*)0)
712# define tnalloc(T,n) (lintalloc = testalloc(sizeof(T)*(n)), (T*)0)
713# define trealloc(T,p,n) (lintalloc = testrealloc((malloc_type)0, sizeof(T)*(n)), p)
714# define tfree(p)
715#else
716# define ftnalloc(T,n) ((T*) ftestalloc(sizeof(T)*(n)))
717# define tnalloc(T,n) ((T*) testalloc(sizeof(T)*(n)))
718# define trealloc(T,p,n) ((T*) testrealloc((malloc_type)(p), sizeof(T)*(n)))
719# define tfree(p) free((malloc_type)(p))
720#endif
721time_t now P((void));
722void awrite P((char const*,size_t,FILE*));
723void fastcopy P((RILE*,FILE*));
724void ffree P((void));
725void ffree1 P((char const*));
726void setRCSversion P((char const*));
727#if has_signal
728 void catchints P((void));
729 void ignoreints P((void));
730 void restoreints P((void));
731#else
732# define catchints()
733# define ignoreints()
734# define restoreints()
735#endif
736#if has_mmap && large_memory
737# if has_NFS && mmap_signal
738 void catchmmapints P((void));
739 void readAccessFilenameBuffer P((char const*,unsigned char const*));
740# else
741# define catchmmapints()
742# endif
743#endif
744#if has_getuid
745 uid_t ruid P((void));
746# define myself(u) ((u) == ruid())
747#else
748# define myself(u) true
749#endif
750#if has_setuid
751 uid_t euid P((void));
752 void nosetid P((void));
753 void seteid P((void));
754 void setrid P((void));
755#else
756# define nosetid()
757# define seteid()
758# define setrid()
759#endif
760
761/* version */
762extern char const RCS_version_string[];
|