Annotation of src/usr.bin/cvs/admin.c, Revision 1.15
1.15 ! jfb 1: /* $OpenBSD: admin.c,v 1.14 2005/05/20 20:00:53 joris Exp $ */
1.1 joris 2: /*
3: * Copyright (c) 2004 Jean-Francois Brousseau <jfb@openbsd.org>
4: * Copyright (c) 2005 Joris Vink <joris@openbsd.org>
5: * All rights reserved.
6: *
7: * Redistribution and use in source and binary forms, with or without
8: * modification, are permitted provided that the following conditions
9: * are met:
10: *
11: * 1. Redistributions of source code must retain the above copyright
12: * notice, this list of conditions and the following disclaimer.
13: * 2. The name of the author may not be used to endorse or promote products
14: * derived from this software without specific prior written permission.
15: *
16: * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES,
17: * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
18: * AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL
19: * THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
20: * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
21: * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
22: * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
23: * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
24: * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
25: * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
26: */
27:
28: #include <sys/types.h>
29: #include <sys/stat.h>
30:
31: #include <errno.h>
32: #include <stdio.h>
33: #include <fcntl.h>
34: #include <stdlib.h>
35: #include <unistd.h>
36: #include <string.h>
37:
38: #include "cvs.h"
39: #include "log.h"
40: #include "proto.h"
41:
42:
43: #define LOCK_SET 0x01
44: #define LOCK_REMOVE 0x02
45:
46: #define FLAG_BRANCH 0x01
47: #define FLAG_DELUSER 0x02
48: #define FLAG_INTERACTIVE 0x04
49: #define FLAG_QUIET 0x08
50:
1.15 ! jfb 51: static int cvs_admin_init (struct cvs_cmd *, int, char **, int *);
! 52: static int cvs_admin_pre_exec (struct cvsroot *);
! 53: static int cvs_admin_file (CVSFILE *, void *);
! 54:
! 55: struct cvs_cmd cvs_cmd_admin = {
! 56: CVS_OP_ADMIN, CVS_REQ_ADMIN, "admin",
! 57: { "adm", "rcs" },
! 58: "Administrative front-end for RCS",
! 59: "",
! 60: "a:A:b::c:e::Ik:l::Lm:n:N:o:qs:t:u::U",
! 61: NULL,
! 62: CF_SORT | CF_IGNORE | CF_RECURSE,
! 63: cvs_admin_init,
! 64: cvs_admin_pre_exec,
! 65: cvs_admin_file,
1.7 joris 66: cvs_admin_file,
1.15 ! jfb 67: NULL,
! 68: NULL,
1.7 joris 69: CVS_CMD_ALLOWSPEC | CVS_CMD_SENDDIR | CVS_CMD_SENDARGS2
70: };
71:
72: static char *q, *Ntag, *ntag, *comment, *replace_msg;
73: static char *alist, *subst, *lockrev_arg, *unlockrev_arg;
74: static char *state, *userfile, *branch_arg, *elist, *range;
75: static int runflags, kflag, lockrev, strictlock;
76:
1.15 ! jfb 77: static int
! 78: cvs_admin_init(struct cvs_cmd *cmd, int argc, char **argv, int *arg)
1.1 joris 79: {
1.7 joris 80: int ch;
1.1 joris 81: RCSNUM *rcs;
82:
83: runflags = strictlock = lockrev = 0;
1.5 joris 84: Ntag = ntag = comment = replace_msg = NULL;
85: state = alist = subst = elist = lockrev_arg = NULL;
86: range = userfile = branch_arg = unlockrev_arg = NULL;
1.1 joris 87:
88: /* option-o-rama ! */
1.15 ! jfb 89: while ((ch = getopt(argc, argv, cmd->cmd_opts)) != -1) {
1.1 joris 90: switch (ch) {
91: case 'a':
92: alist = optarg;
93: break;
94: case 'A':
95: userfile = optarg;
96: break;
97: case 'b':
98: runflags |= FLAG_BRANCH;
99: if (optarg)
100: branch_arg = optarg;
101: break;
102: case 'c':
103: comment = optarg;
104: break;
105: case 'e':
106: runflags |= FLAG_DELUSER;
107: if (optarg)
108: elist = optarg;
109: break;
110: case 'I':
111: runflags |= FLAG_INTERACTIVE;
112: break;
113: case 'k':
114: subst = optarg;
1.3 joris 115: kflag = rcs_kflag_get(subst);
116: if (RCS_KWEXP_INVAL(kflag)) {
117: cvs_log(LP_ERR,
118: "invalid RCS keyword expansion mode");
119: rcs_kflag_usage();
1.11 joris 120: return (CVS_EX_USAGE);
1.3 joris 121: }
1.1 joris 122: break;
123: case 'l':
124: lockrev |= LOCK_SET;
125: if (optarg)
126: lockrev_arg = optarg;
127: break;
128: case 'L':
129: strictlock |= LOCK_SET;
130: break;
131: case 'm':
132: replace_msg = optarg;
133: break;
134: case 'n':
1.5 joris 135: ntag = optarg;
1.1 joris 136: break;
137: case 'N':
1.5 joris 138: Ntag = optarg;
1.1 joris 139: break;
140: case 'o':
1.5 joris 141: range = optarg;
1.1 joris 142: break;
143: case 'q':
144: runflags |= FLAG_QUIET;
145: break;
146: case 's':
1.5 joris 147: state = optarg;
1.1 joris 148: break;
149: case 't':
150: break;
151: case 'u':
152: lockrev |= LOCK_REMOVE;
153: if (optarg)
154: unlockrev_arg = optarg;
155: break;
156: case 'U':
157: strictlock |= LOCK_REMOVE;
158: break;
159: default:
1.11 joris 160: return (CVS_EX_USAGE);
1.1 joris 161: }
162: }
163:
164: argc -= optind;
165: argv += optind;
166:
167: /* do some sanity checking on the arguments */
168: if ((strictlock & LOCK_SET) && (strictlock & LOCK_REMOVE)) {
169: cvs_log(LP_ERR, "-L and -U are incompatible");
1.11 joris 170: return (CVS_EX_USAGE);
1.1 joris 171: }
172:
173: if (lockrev_arg != NULL) {
174: if ((rcs = rcsnum_parse(lockrev_arg)) == NULL) {
175: cvs_log(LP_ERR, "%s is not a numeric branch",
176: lockrev_arg);
1.11 joris 177: return (CVS_EX_USAGE);
1.1 joris 178: }
179: rcsnum_free(rcs);
180: }
181:
182: if (unlockrev_arg != NULL) {
183: if ((rcs = rcsnum_parse(unlockrev_arg)) == NULL) {
184: cvs_log(LP_ERR, "%s is not a numeric branch",
185: unlockrev_arg);
1.11 joris 186: return (CVS_EX_USAGE);
1.1 joris 187: }
188: rcsnum_free(rcs);
189: }
190:
191: if (replace_msg != NULL) {
192: if ((q = strchr(replace_msg, ':')) == NULL) {
193: cvs_log(LP_ERR, "invalid option for -m");
1.11 joris 194: return (CVS_EX_USAGE);
1.1 joris 195: }
196: *q = '\0';
197: if ((rcs = rcsnum_parse(replace_msg)) == NULL) {
198: cvs_log(LP_ERR, "%s is not a numeric revision",
199: replace_msg);
1.11 joris 200: return (CVS_EX_USAGE);
1.1 joris 201: }
1.2 joris 202: rcsnum_free(rcs);
1.1 joris 203: *q = ':';
204: }
205:
1.7 joris 206: *arg = optind;
207: return (0);
208: }
1.1 joris 209:
1.15 ! jfb 210: static int
! 211: cvs_admin_pre_exec(struct cvsroot *root)
1.7 joris 212: {
213: if ((alist != NULL) && ((cvs_sendarg(root, "-a", 0) < 0) ||
214: (cvs_sendarg(root, alist, 0) < 0)))
1.11 joris 215: return (CVS_EX_PROTO);
1.1 joris 216:
1.7 joris 217: if ((userfile != NULL) && ((cvs_sendarg(root, "-A", 0) < 0) ||
218: (cvs_sendarg(root, userfile, 0) < 0)))
1.11 joris 219: return (CVS_EX_PROTO);
1.1 joris 220:
1.7 joris 221: if (runflags & FLAG_BRANCH) {
222: if (cvs_sendarg(root, "-b", 0) < 0)
1.11 joris 223: return (CVS_EX_PROTO);
1.7 joris 224: if ((branch_arg != NULL) &&
225: (cvs_sendarg(root, branch_arg, 0) < 0))
1.11 joris 226: return (CVS_EX_PROTO);
1.7 joris 227: }
1.1 joris 228:
1.7 joris 229: if ((comment != NULL) && ((cvs_sendarg(root, "-c", 0) < 0) ||
230: (cvs_sendarg(root, comment, 0) < 0)))
1.11 joris 231: return (CVS_EX_PROTO);
1.1 joris 232:
1.7 joris 233: if (runflags & FLAG_DELUSER) {
234: if (cvs_sendarg(root, "-e", 0) < 0)
1.11 joris 235: return (CVS_EX_PROTO);
1.7 joris 236: if ((elist != NULL) &&
237: (cvs_sendarg(root, elist, 0) < 0))
1.11 joris 238: return (CVS_EX_PROTO);
1.7 joris 239: }
1.1 joris 240:
1.7 joris 241: if (runflags & FLAG_INTERACTIVE) {
242: if (cvs_sendarg(root, "-I", 0) < 0)
1.11 joris 243: return (CVS_EX_PROTO);
1.7 joris 244: }
1.1 joris 245:
1.7 joris 246: if ((subst != NULL) && ((cvs_sendarg(root, "-k", 0) < 0) ||
247: (cvs_sendarg(root, subst, 0) < 0)))
1.11 joris 248: return (CVS_EX_PROTO);
1.5 joris 249:
1.7 joris 250: if (lockrev & LOCK_SET) {
251: if (cvs_sendarg(root, "-l", 0) < 0)
1.11 joris 252: return (CVS_EX_PROTO);
1.7 joris 253: if ((lockrev_arg != NULL) &&
254: (cvs_sendarg(root, lockrev_arg, 0) < 0))
1.11 joris 255: return (CVS_EX_PROTO);
1.7 joris 256: }
1.5 joris 257:
1.7 joris 258: if ((strictlock & LOCK_SET) &&
259: (cvs_sendarg(root, "-L", 0) < 0))
1.11 joris 260: return (CVS_EX_PROTO);
1.5 joris 261:
1.7 joris 262: if ((replace_msg != NULL) && ((cvs_sendarg(root, "-m", 0) < 0)
263: || (cvs_sendarg(root, replace_msg, 0) < 0)))
1.11 joris 264: return (CVS_EX_PROTO);
1.5 joris 265:
1.7 joris 266: if ((ntag != NULL) && ((cvs_sendarg(root, "-n", 0) < 0) ||
267: (cvs_sendarg(root, ntag, 0) < 0)))
1.11 joris 268: return (CVS_EX_PROTO);
1.1 joris 269:
1.7 joris 270: if ((Ntag != NULL) && ((cvs_sendarg(root, "-N", 0) < 0) ||
271: (cvs_sendarg(root, Ntag, 0) < 0)))
1.11 joris 272: return (CVS_EX_PROTO);
1.1 joris 273:
1.7 joris 274: if ((range != NULL) && ((cvs_sendarg(root, "-o", 0) < 0) ||
275: (cvs_sendarg(root, range, 0) < 0)))
1.11 joris 276: return (CVS_EX_PROTO);
1.1 joris 277:
1.7 joris 278: if ((state != NULL) && ((cvs_sendarg(root, "-s", 0) < 0) ||
279: (cvs_sendarg(root, state, 0) < 0)))
1.11 joris 280: return (CVS_EX_PROTO);
1.1 joris 281:
1.7 joris 282: if (lockrev & LOCK_REMOVE) {
283: if (cvs_sendarg(root, "-u", 0) < 0)
1.11 joris 284: return (CVS_EX_PROTO);
1.7 joris 285: if ((unlockrev_arg != NULL) &&
286: (cvs_sendarg(root, unlockrev_arg, 0) < 0))
1.11 joris 287: return (CVS_EX_PROTO);
1.1 joris 288: }
289:
1.7 joris 290: if ((strictlock & LOCK_REMOVE) &&
291: (cvs_sendarg(root, "-U", 0) < 0))
1.11 joris 292: return (CVS_EX_PROTO);
1.7 joris 293:
1.1 joris 294: return (0);
295: }
296:
297: /*
298: * cvs_admin_file()
299: *
300: * Perform admin commands on each file.
301: */
1.15 ! jfb 302: static int
1.1 joris 303: cvs_admin_file(CVSFILE *cfp, void *arg)
304: {
1.12 xsa 305: int ret, l;
1.1 joris 306: char *repo, fpath[MAXPATHLEN], rcspath[MAXPATHLEN];
307: RCSFILE *rf;
308: struct cvsroot *root;
309:
310: ret = 0;
311: rf = NULL;
312: root = CVS_DIR_ROOT(cfp);
313: repo = CVS_DIR_REPO(cfp);
314:
315: if (cfp->cf_type == DT_DIR) {
316: if (root->cr_method != CVS_METHOD_LOCAL) {
317: if (cfp->cf_cvstat == CVS_FST_UNKNOWN)
318: ret = cvs_sendreq(root, CVS_REQ_QUESTIONABLE,
319: CVS_FILE_NAME(cfp));
320: else
321: ret = cvs_senddir(root, cfp);
1.14 joris 322:
323: if (ret == -1)
324: ret = CVS_EX_PROTO;
1.1 joris 325: }
326:
327: return (ret);
328: }
329:
330: cvs_file_getpath(cfp, fpath, sizeof(fpath));
331:
332: if (root->cr_method != CVS_METHOD_LOCAL) {
1.13 jfb 333: if (cvs_sendentry(root, cfp) < 0) {
1.11 joris 334: return (CVS_EX_PROTO);
1.1 joris 335: }
336:
337: switch (cfp->cf_cvstat) {
338: case CVS_FST_UNKNOWN:
339: ret = cvs_sendreq(root, CVS_REQ_QUESTIONABLE,
340: CVS_FILE_NAME(cfp));
341: break;
342: case CVS_FST_UPTODATE:
343: ret = cvs_sendreq(root, CVS_REQ_UNCHANGED,
344: CVS_FILE_NAME(cfp));
345: break;
346: case CVS_FST_MODIFIED:
347: ret = cvs_sendreq(root, CVS_REQ_MODIFIED,
348: CVS_FILE_NAME(cfp));
349: if (ret == 0)
350: ret = cvs_sendfile(root, fpath);
351: default:
352: break;
353: }
1.14 joris 354:
355: if (ret == -1)
356: ret = CVS_EX_PROTO;
1.1 joris 357: } else {
358: if (cfp->cf_cvstat == CVS_FST_UNKNOWN) {
359: cvs_log(LP_WARN, "I know nothing about %s", fpath);
360: return (0);
361: }
362:
1.12 xsa 363: l = snprintf(rcspath, sizeof(rcspath), "%s/%s/%s%s",
1.1 joris 364: root->cr_dir, repo, CVS_FILE_NAME(cfp), RCS_FILE_EXT);
1.12 xsa 365: if (l == -1 || l >= (int)sizeof(rcspath)) {
366: errno = ENAMETOOLONG;
367: cvs_log(LP_ERRNO, "%s", rcspath);
1.14 joris 368: return (CVS_EX_DATA);
1.12 xsa 369: }
1.1 joris 370:
371: rf = rcs_open(rcspath, RCS_READ);
372: if (rf == NULL) {
1.11 joris 373: return (CVS_EX_DATA);
1.1 joris 374: }
375:
376: rcs_close(rf);
377: }
378:
379: return (ret);
380: }