Annotation of src/usr.bin/rcs/rcsprog.c, Revision 1.35
1.35 ! niallo 1: /* $OpenBSD: rcsprog.c,v 1.34 2005/10/19 00:30:22 joris Exp $ */
1.1 deraadt 2: /*
3: * Copyright (c) 2005 Jean-Francois Brousseau <jfb@openbsd.org>
4: * All rights reserved.
5: *
6: * Redistribution and use in source and binary forms, with or without
7: * modification, are permitted provided that the following conditions
8: * are met:
9: *
10: * 1. Redistributions of source code must retain the above copyright
11: * notice, this list of conditions and the following disclaimer.
12: * 2. The name of the author may not be used to endorse or promote products
13: * derived from this software without specific prior written permission.
14: *
15: * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES,
16: * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
17: * AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL
18: * THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
19: * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
20: * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
21: * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
22: * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
23: * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
24: * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
25: */
26:
1.6 joris 27: #include <sys/param.h>
1.1 deraadt 28: #include <sys/wait.h>
1.8 joris 29: #include <sys/stat.h>
1.1 deraadt 30:
1.3 joris 31: #include <ctype.h>
1.1 deraadt 32: #include <err.h>
1.3 joris 33: #include <errno.h>
1.1 deraadt 34: #include <pwd.h>
1.3 joris 35: #include <string.h>
1.1 deraadt 36: #include <stdio.h>
37: #include <stdlib.h>
38: #include <unistd.h>
39:
40: #include "log.h"
41: #include "rcs.h"
1.9 joris 42: #include "rcsprog.h"
1.1 deraadt 43: #include "strtab.h"
44:
1.29 joris 45: #define RCS_CMD_MAXARG 128
46:
1.1 deraadt 47: const char rcs_version[] = "OpenCVS RCS version 3.6";
1.12 joris 48: int verbose = 1;
1.34 joris 49: int pipeout = 0;
1.1 deraadt 50:
1.28 joris 51: int rcs_optind;
52: char *rcs_optarg;
53:
1.1 deraadt 54: struct rcs_prog {
1.26 deraadt 55: char *prog_name;
56: int (*prog_hdlr)(int, char **);
57: void (*prog_usage)(void);
1.1 deraadt 58: } programs[] = {
1.2 deraadt 59: { "rcs", rcs_main, rcs_usage },
1.17 joris 60: { "ci", checkin_main, checkin_usage },
1.11 joris 61: { "co", checkout_main, checkout_usage },
1.20 joris 62: { "rcsclean", rcsclean_main, rcsclean_usage },
1.18 joris 63: { "rcsdiff", rcsdiff_main, rcsdiff_usage },
1.33 xsa 64: { "rcsmerge", rcsmerge_main, rcsmerge_usage },
1.21 joris 65: { "rlog", rlog_main, rlog_usage },
1.22 joris 66: { "ident", ident_main, ident_usage },
1.1 deraadt 67: };
1.31 joris 68:
69: void
70: rcs_set_rev(const char *str, RCSNUM **rev)
71: {
1.32 joris 72: if (str == NULL)
73: return;
74:
1.31 joris 75: if (*rev != RCS_HEAD_REV)
76: cvs_log(LP_WARN, "redefinition of revision number");
77:
78: if ((*rev = rcsnum_parse(str)) == NULL) {
79: cvs_log(LP_ERR, "bad revision number '%s'", str);
80: exit (1);
81: }
82: }
1.1 deraadt 83:
1.9 joris 84: int
1.29 joris 85: rcs_init(char *envstr, char **argv, int argvlen)
86: {
87: u_int i;
88: int argc, error;
89: char linebuf[256], *lp, *cp;
90:
91: strlcpy(linebuf, envstr, sizeof(linebuf));
92: memset(argv, 0, argvlen * sizeof(char *));
93:
94: error = argc = 0;
95: for (lp = linebuf; lp != NULL;) {
96: cp = strsep(&lp, " \t\b\f\n\r\t\v");;
97: if (cp == NULL)
98: break;
99: else if (*cp == '\0')
100: continue;
101:
102: if (argc == argvlen) {
103: error++;
104: break;
105: }
106:
107: argv[argc] = strdup(cp);
108: if (argv[argc] == NULL) {
109: cvs_log(LP_ERRNO, "failed to copy argument");
110: error++;
111: break;
112: }
113:
114: argc++;
115: }
116:
117: if (error != 0) {
118: for (i = 0; i < (u_int)argc; i++)
119: free(argv[i]);
120: argc = -1;
121: }
122:
123: return (argc);
124: }
125:
126: int
1.28 joris 127: rcs_getopt(int argc, char **argv, const char *optstr)
128: {
129: char *a;
130: const char *c;
131: static int i = 1;
132: int opt, hasargument, ret;
133:
134: hasargument = 0;
135: rcs_optarg = NULL;
136:
137: if (i >= argc)
138: return (-1);
139:
140: a = argv[i++];
141: if (*a++ != '-')
142: return (-1);
143:
144: ret = 0;
145: opt = *a;
146: for (c = optstr; *c != '\0'; c++) {
147: if (*c == opt) {
148: a++;
149: ret = opt;
150:
151: if (*(c + 1) == ':') {
152: if (*(c + 2) == ':') {
153: if (*a != '\0')
154: hasargument = 1;
155: } else {
156: if (*a != '\0') {
157: hasargument = 1;
158: } else {
159: ret = 1;
160: break;
161: }
162: }
163: }
164:
165: if (hasargument == 1)
166: rcs_optarg = a;
167:
168: if (ret == opt)
169: rcs_optind++;
170: break;
171: }
172: }
173:
174: if (ret == 0)
175: cvs_log(LP_ERR, "unknown option -%c", opt);
176: else if (ret == 1)
177: cvs_log(LP_ERR, "missing argument for option -%c", opt);
178:
179: return (ret);
180: }
181:
182: int
1.9 joris 183: rcs_statfile(char *fname, char *out, size_t len)
184: {
185: int l;
186: char filev[MAXPATHLEN], fpath[MAXPATHLEN];
187: struct stat st;
188:
189: l = snprintf(filev, sizeof(filev), "%s%s", fname, RCS_FILE_EXT);
190: if (l == -1 || l >= (int)sizeof(filev))
191: return (-1);
192:
1.16 joris 193: if ((stat(RCSDIR, &st) != -1) && (st.st_mode & S_IFDIR)) {
1.9 joris 194: l = snprintf(fpath, sizeof(fpath), "%s/%s", RCSDIR, filev);
195: if (l == -1 || l >= (int)sizeof(fpath))
196: return (-1);
197: } else {
198: strlcpy(fpath, filev, sizeof(fpath));
199: }
200:
201: if (stat(fpath, &st) == -1) {
1.20 joris 202: if (strcmp(__progname, "rcsclean"))
203: cvs_log(LP_ERRNO, "%s", fpath);
1.9 joris 204: return (-1);
205: }
206:
207: strlcpy(out, fpath, len);
208:
209: return (0);
210: }
1.1 deraadt 211:
212: int
213: main(int argc, char **argv)
214: {
215: u_int i;
1.29 joris 216: char *rcsinit, *cmd_argv[RCS_CMD_MAXARG];
217: int ret, cmd_argc;
1.1 deraadt 218:
219: ret = -1;
1.28 joris 220: rcs_optind = 1;
1.1 deraadt 221: cvs_strtab_init();
1.9 joris 222: cvs_log_init(LD_STD, 0);
1.1 deraadt 223:
1.29 joris 224: cmd_argc = 0;
1.30 joris 225: cmd_argv[cmd_argc++] = argv[0];
1.29 joris 226: if ((rcsinit = getenv("RCSINIT")) != NULL) {
227: ret = rcs_init(rcsinit, cmd_argv + 1,
228: RCS_CMD_MAXARG - 1);
229: if (ret < 0) {
230: cvs_log(LP_ERRNO, "failed to prepend RCSINIT options");
231: exit (1);
232: }
233:
234: cmd_argc += ret;
235: }
236:
237: for (ret = 1; ret < argc; ret++)
238: cmd_argv[cmd_argc++] = argv[ret];
239:
1.1 deraadt 240: for (i = 0; i < (sizeof(programs)/sizeof(programs[0])); i++)
1.2 deraadt 241: if (strcmp(__progname, programs[i].prog_name) == 0) {
242: usage = programs[i].prog_usage;
1.29 joris 243: ret = programs[i].prog_hdlr(cmd_argc, cmd_argv);
1.2 deraadt 244: break;
245: }
1.1 deraadt 246:
247: cvs_strtab_cleanup();
248:
1.23 niallo 249: exit(ret);
1.1 deraadt 250: }
251:
252:
253: void
254: rcs_usage(void)
255: {
256: fprintf(stderr,
1.26 deraadt 257: "usage: rcs [-hiLMUV] [-a users] [-b [rev]] [-c string] [-e users]\n"
258: " [-k opt] [-m rev:log] file ...\n");
1.1 deraadt 259: }
260:
261: /*
262: * rcs_main()
263: *
264: * Handler for the `rcs' program.
265: * Returns 0 on success, or >0 on error.
266: */
267: int
268: rcs_main(int argc, char **argv)
269: {
270: int i, ch, flags, kflag, lkmode;
1.10 joris 271: char fpath[MAXPATHLEN];
1.24 joris 272: char *logstr, *logmsg;
1.1 deraadt 273: char *oldfile, *alist, *comment, *elist, *unp, *sp;
274: mode_t fmode;
275: RCSFILE *file;
1.24 joris 276: RCSNUM *logrev;
1.1 deraadt 277:
278: kflag = lkmode = -1;
279: fmode = 0;
280: flags = RCS_RDWR;
1.24 joris 281: logstr = oldfile = alist = comment = elist = NULL;
1.1 deraadt 282:
1.28 joris 283: while ((ch = rcs_getopt(argc, argv, "A:a:b::c:e::hik:Lm:MqUV")) != -1) {
1.1 deraadt 284: switch (ch) {
285: case 'A':
1.28 joris 286: oldfile = rcs_optarg;
1.1 deraadt 287: break;
288: case 'a':
1.28 joris 289: alist = rcs_optarg;
1.1 deraadt 290: break;
291: case 'c':
1.28 joris 292: comment = rcs_optarg;
1.1 deraadt 293: break;
294: case 'e':
1.28 joris 295: elist = rcs_optarg;
1.1 deraadt 296: break;
297: case 'h':
1.2 deraadt 298: (usage)();
1.1 deraadt 299: exit(0);
300: case 'i':
301: flags |= RCS_CREATE;
302: break;
303: case 'k':
1.28 joris 304: kflag = rcs_kflag_get(rcs_optarg);
1.1 deraadt 305: if (RCS_KWEXP_INVAL(kflag)) {
306: cvs_log(LP_ERR,
307: "invalid keyword substitution mode `%s'",
1.28 joris 308: rcs_optarg);
1.1 deraadt 309: exit(1);
310: }
311: break;
312: case 'L':
313: if (lkmode == RCS_LOCK_LOOSE)
314: cvs_log(LP_WARN, "-U overriden by -L");
315: lkmode = RCS_LOCK_STRICT;
316: break;
1.24 joris 317: case 'm':
1.28 joris 318: if ((logstr = strdup(rcs_optarg)) == NULL) {
1.24 joris 319: cvs_log(LP_ERRNO, "failed to copy logstring");
320: exit(1);
321: }
322: break;
1.1 deraadt 323: case 'M':
324: /* ignore for the moment */
325: break;
1.12 joris 326: case 'q':
327: verbose = 0;
328: break;
1.1 deraadt 329: case 'U':
330: if (lkmode == RCS_LOCK_STRICT)
331: cvs_log(LP_WARN, "-L overriden by -U");
332: lkmode = RCS_LOCK_LOOSE;
333: break;
334: case 'V':
335: printf("%s\n", rcs_version);
336: exit(0);
337: default:
1.2 deraadt 338: (usage)();
1.1 deraadt 339: exit(1);
340: }
341: }
342:
1.28 joris 343: argc -= rcs_optind;
344: argv += rcs_optind;
1.30 joris 345:
1.1 deraadt 346: if (argc == 0) {
347: cvs_log(LP_ERR, "no input file");
1.5 joris 348: (usage)();
1.1 deraadt 349: exit(1);
350: }
351:
352: for (i = 0; i < argc; i++) {
1.9 joris 353: if (rcs_statfile(argv[i], fpath, sizeof(fpath)) < 0)
1.8 joris 354: continue;
1.6 joris 355:
1.35 ! niallo 356: if (verbose == 1)
! 357: printf("RCS file: %s\n", fpath);
1.6 joris 358: file = rcs_open(fpath, flags, fmode);
359: if (file == NULL)
360: continue;
1.1 deraadt 361:
1.24 joris 362: if (logstr != NULL) {
363: if ((logmsg = strchr(logstr, ':')) == NULL) {
364: cvs_log(LP_ERR, "missing log message");
365: rcs_close(file);
366: continue;
367: }
368:
369: *logmsg++ = '\0';
370: if ((logrev = rcsnum_parse(logstr)) == NULL) {
371: cvs_log(LP_ERR, "'%s' bad revision number", logstr);
372: rcs_close(file);
373: continue;
374: }
375:
376: if (rcs_rev_setlog(file, logrev, logmsg) < 0) {
377: cvs_log(LP_ERR,
378: "failed to set logmsg for '%s' to '%s'",
379: logstr, logmsg);
380: rcs_close(file);
1.25 joris 381: rcsnum_free(logrev);
1.24 joris 382: continue;
383: }
384:
385: rcsnum_free(logrev);
386: }
387:
1.1 deraadt 388: /* entries to add to the access list */
389: if (alist != NULL) {
390: unp = alist;
391: do {
392: sp = strchr(unp, ',');
393: if (sp != NULL)
394: *(sp++) = '\0';
395:
396: rcs_access_add(file, unp);
397:
398: unp = sp;
399: } while (sp != NULL);
400: }
401:
402: if (comment != NULL)
403: rcs_comment_set(file, comment);
404:
405: if (kflag != -1)
406: rcs_kwexp_set(file, kflag);
407:
408: if (lkmode != -1)
409: rcs_lock_setmode(file, lkmode);
410:
411: rcs_close(file);
1.9 joris 412:
1.14 xsa 413: if (verbose == 1)
1.12 joris 414: printf("done\n");
1.1 deraadt 415: }
1.24 joris 416:
417: if (logstr != NULL)
418: free(logstr);
1.1 deraadt 419:
420: return (0);
421: }