Annotation of src/usr.bin/cvs/admin.c, Revision 1.64
1.64 ! tobias 1: /* $OpenBSD: admin.c,v 1.63 2008/06/20 16:32:06 tobias Exp $ */
1.1 joris 2: /*
3: * Copyright (c) 2004 Jean-Francois Brousseau <jfb@openbsd.org>
4: * Copyright (c) 2005 Joris Vink <joris@openbsd.org>
1.47 xsa 5: * Copyright (c) 2006, 2007 Xavier Santolaria <xsa@openbsd.org>
1.1 joris 6: *
1.35 xsa 7: * Permission to use, copy, modify, and distribute this software for any
8: * purpose with or without fee is hereby granted, provided that the above
9: * copyright notice and this permission notice appear in all copies.
1.1 joris 10: *
1.35 xsa 11: * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
12: * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
13: * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
14: * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
15: * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
16: * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
17: * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
1.1 joris 18: */
19:
1.50 otto 20: #include <sys/param.h>
21: #include <sys/dirent.h>
22:
23: #include <errno.h>
24: #include <fcntl.h>
25: #include <libgen.h>
26: #include <string.h>
27: #include <unistd.h>
1.1 joris 28:
29: #include "cvs.h"
1.35 xsa 30: #include "remote.h"
1.1 joris 31:
1.35 xsa 32: #define ADM_EFLAG 0x01
1.1 joris 33:
1.35 xsa 34: void cvs_admin_local(struct cvs_file *);
1.15 jfb 35:
36: struct cvs_cmd cvs_cmd_admin = {
1.57 joris 37: CVS_OP_ADMIN, CVS_USE_WDIR | CVS_LOCK_REPO, "admin",
1.15 jfb 38: { "adm", "rcs" },
39: "Administrative front-end for RCS",
1.45 xsa 40: "[-ILqU] [-A oldfile] [-a users] [-b branch]\n"
1.35 xsa 41: "[-c string] [-e [users]] [-k mode] [-l [rev]] [-m rev:msg]\n"
42: "[-N tag[:rev]] [-n tag[:rev]] [-o rev] [-s state[:rev]]"
43: "[-t file | str]\n"
44: "[-u [rev]] file ...",
45: "A:a:b::c:e::Ik:l::Lm:N:n:o:qs:t:Uu::",
1.15 jfb 46: NULL,
1.35 xsa 47: cvs_admin
1.7 joris 48: };
49:
1.35 xsa 50: static int runflags = 0;
51: static int lkmode = RCS_LOCK_INVAL;
1.47 xsa 52: static char *alist, *comment, *elist, *logmsg, *logstr, *koptstr;
1.64 ! tobias 53: static char *oldfilename, *orange, *state, *staterevstr;
1.7 joris 54:
1.35 xsa 55: int
56: cvs_admin(int argc, char **argv)
1.1 joris 57: {
1.7 joris 58: int ch;
1.35 xsa 59: int flags;
1.64 ! tobias 60: char *statestr;
1.35 xsa 61: struct cvs_recursion cr;
1.1 joris 62:
1.35 xsa 63: flags = CR_RECURSE_DIRS;
1.1 joris 64:
1.45 xsa 65: alist = comment = elist = logmsg = logstr = NULL;
66: oldfilename = orange = state = statestr = NULL;
1.40 xsa 67:
1.35 xsa 68: while ((ch = getopt(argc, argv, cvs_cmd_admin.cmd_opts)) != -1) {
1.1 joris 69: switch (ch) {
1.35 xsa 70: case 'A':
1.45 xsa 71: oldfilename = optarg;
1.35 xsa 72: break;
1.1 joris 73: case 'a':
1.36 xsa 74: alist = optarg;
1.1 joris 75: break;
76: case 'b':
77: break;
78: case 'c':
79: comment = optarg;
80: break;
81: case 'e':
1.35 xsa 82: elist = optarg;
83: runflags |= ADM_EFLAG;
1.1 joris 84: break;
85: case 'I':
86: break;
87: case 'k':
1.47 xsa 88: koptstr = optarg;
89: kflag = rcs_kflag_get(koptstr);
90: if (RCS_KWEXP_INVAL(kflag)) {
91: cvs_log(LP_ERR,
1.59 tobias 92: "invalid RCS keyword expansion mode");
1.47 xsa 93: fatal("%s", cvs_cmd_admin.cmd_synopsis);
94: }
1.35 xsa 95: break;
96: case 'L':
97: if (lkmode == RCS_LOCK_LOOSE) {
98: cvs_log(LP_ERR, "-L and -U are incompatible");
99: fatal("%s", cvs_cmd_admin.cmd_synopsis);
1.3 joris 100: }
1.35 xsa 101: lkmode = RCS_LOCK_STRICT;
1.1 joris 102: break;
103: case 'l':
104: break;
1.35 xsa 105: case 'm':
1.40 xsa 106: logstr = optarg;
1.1 joris 107: break;
1.35 xsa 108: case 'N':
1.1 joris 109: break;
110: case 'n':
111: break;
112: case 'o':
1.36 xsa 113: orange = optarg;
1.1 joris 114: break;
115: case 'q':
1.35 xsa 116: verbosity = 0;
1.1 joris 117: break;
118: case 's':
1.42 xsa 119: statestr = optarg;
1.1 joris 120: break;
121: case 't':
122: break;
123: case 'U':
1.35 xsa 124: if (lkmode == RCS_LOCK_STRICT) {
125: cvs_log(LP_ERR, "-U and -L are incompatible");
126: fatal("%s", cvs_cmd_admin.cmd_synopsis);
1.16 jfb 127: }
128: lkmode = RCS_LOCK_LOOSE;
1.1 joris 129: break;
1.35 xsa 130: case 'u':
131: break;
1.1 joris 132: default:
1.35 xsa 133: fatal("%s", cvs_cmd_admin.cmd_synopsis);
1.1 joris 134: }
135: }
136:
137: argc -= optind;
138: argv += optind;
139:
1.38 xsa 140: if (argc == 0)
1.35 xsa 141: fatal("%s", cvs_cmd_admin.cmd_synopsis);
1.16 jfb 142:
1.35 xsa 143: cr.enterdir = NULL;
144: cr.leavedir = NULL;
1.25 joris 145:
1.35 xsa 146: if (current_cvsroot->cr_method != CVS_METHOD_LOCAL) {
1.44 joris 147: cvs_client_connect_to_server();
1.35 xsa 148: cr.fileproc = cvs_client_sendfile;
1.1 joris 149:
1.45 xsa 150: if (oldfilename != NULL)
151: cvs_client_send_request("Argument -A%s", oldfilename);
152:
1.36 xsa 153: if (alist != NULL)
154: cvs_client_send_request("Argument -a%s", alist);
155:
1.35 xsa 156: if (comment != NULL)
157: cvs_client_send_request("Argument -c%s", comment);
1.1 joris 158:
1.36 xsa 159: if (runflags & ADM_EFLAG)
160: cvs_client_send_request("Argument -e%s",
161: (elist != NULL) ? elist : "");
162:
1.47 xsa 163: if (koptstr != NULL)
164: cvs_client_send_request("Argument -k%s", koptstr);
165:
1.35 xsa 166: if (lkmode == RCS_LOCK_STRICT)
167: cvs_client_send_request("Argument -L");
168: else if (lkmode == RCS_LOCK_LOOSE)
169: cvs_client_send_request("Argument -U");
1.41 xsa 170:
171: if (logstr != NULL)
1.54 tobias 172: cvs_client_send_logmsg(logstr);
1.25 joris 173:
1.36 xsa 174: if (orange != NULL)
175: cvs_client_send_request("Argument -o%s", orange);
176:
1.42 xsa 177: if (statestr != NULL)
178: cvs_client_send_request("Argument -s%s", statestr);
179:
1.35 xsa 180: if (verbosity == 0)
181: cvs_client_send_request("Argument -q");
1.25 joris 182:
1.35 xsa 183: } else {
1.64 ! tobias 184: if (statestr != NULL) {
! 185: if ((staterevstr = strchr(statestr, ':')) != NULL)
! 186: *staterevstr++ = '\0';
! 187: state = statestr;
! 188: if (rcs_state_check(state) < 0) {
! 189: cvs_log(LP_ERR, "invalid state `%s'", state);
! 190: state = NULL;
! 191: }
! 192: }
! 193:
1.39 xsa 194: flags |= CR_REPO;
1.35 xsa 195: cr.fileproc = cvs_admin_local;
1.7 joris 196: }
1.1 joris 197:
1.35 xsa 198: cr.flags = flags;
1.1 joris 199:
1.35 xsa 200: cvs_file_run(argc, argv, &cr);
1.5 joris 201:
1.35 xsa 202: if (current_cvsroot->cr_method != CVS_METHOD_LOCAL) {
203: cvs_client_send_files(argv, argc);
204: cvs_client_senddir(".");
205: cvs_client_send_request("admin");
206: cvs_client_get_responses();
1.1 joris 207: }
208:
209: return (0);
210: }
211:
1.35 xsa 212: void
213: cvs_admin_local(struct cvs_file *cf)
1.1 joris 214: {
1.35 xsa 215: int i;
1.64 ! tobias 216: RCSNUM *rev;
1.1 joris 217:
1.35 xsa 218: cvs_log(LP_TRACE, "cvs_admin_local(%s)", cf->file_path);
1.14 joris 219:
1.52 joris 220: cvs_file_classify(cf, cvs_directory_tag);
1.39 xsa 221:
1.35 xsa 222: if (cf->file_type == CVS_DIR) {
223: if (verbosity > 1)
224: cvs_log(LP_NOTICE, "Administrating %s", cf->file_name);
225: return;
1.1 joris 226: }
227:
1.63 tobias 228: if (cf->file_ent == NULL)
1.35 xsa 229: return;
230: else if (cf->file_status == FILE_ADDED) {
231: cvs_log(LP_ERR, "cannot admin newly added file `%s'",
232: cf->file_name);
1.58 tobias 233: return;
234: }
235:
236: if (cf->file_rcs == NULL) {
237: cvs_log(LP_ERR, "lost RCS file for `%s'", cf->file_path);
1.35 xsa 238: return;
1.16 jfb 239: }
1.1 joris 240:
1.35 xsa 241: if (verbosity > 0)
1.39 xsa 242: cvs_printf("RCS file: %s\n", cf->file_rcs->rf_path);
1.45 xsa 243:
244: if (oldfilename != NULL) {
245: struct cvs_file *ocf;
246: struct rcs_access *acp;
247: int ofd;
1.46 otto 248: char *d, *f, fpath[MAXPATHLEN], repo[MAXPATHLEN];
1.45 xsa 249:
250:
251: if ((f = basename(oldfilename)) == NULL)
252: fatal("cvs_admin_local: basename failed");
253: if ((d = dirname(oldfilename)) == NULL)
254: fatal("cvs_admin_local: dirname failed");
255:
256: cvs_get_repository_path(d, repo, MAXPATHLEN);
257:
1.49 xsa 258: (void)xsnprintf(fpath, MAXPATHLEN, "%s/%s", repo, f);
1.45 xsa 259:
260: if (strlcat(fpath, RCS_FILE_EXT, MAXPATHLEN) >= MAXPATHLEN)
261: fatal("cvs_admin_local: truncation");
262:
263: if ((ofd = open(fpath, O_RDONLY)) == -1)
264: fatal("cvs_admin_local: open: `%s': %s", fpath,
265: strerror(errno));
266:
267: /* XXX: S_ISREG() check instead of blindly using CVS_FILE? */
1.61 joris 268: ocf = cvs_file_get_cf(d, f, oldfilename, ofd, CVS_FILE, 0);
1.45 xsa 269:
270: ocf->file_rcs = rcs_open(fpath, ofd, RCS_READ, 0444);
271: if (ocf->file_rcs == NULL)
272: fatal("cvs_admin_local: rcs_open failed");
273:
274: TAILQ_FOREACH(acp, &(ocf->file_rcs->rf_access), ra_list)
275: rcs_access_add(cf->file_rcs, acp->ra_name);
276:
277: cvs_file_free(ocf);
278: }
1.14 joris 279:
1.36 xsa 280: if (alist != NULL) {
281: struct cvs_argvector *aargv;
282:
283: aargv = cvs_strsplit(alist, ",");
284: for (i = 0; aargv->argv[i] != NULL; i++)
285: rcs_access_add(cf->file_rcs, aargv->argv[i]);
286:
287: cvs_argv_destroy(aargv);
288: }
289:
1.35 xsa 290: if (comment != NULL)
291: rcs_comment_set(cf->file_rcs, comment);
1.19 xsa 292:
1.35 xsa 293: if (elist != NULL) {
294: struct cvs_argvector *eargv;
1.1 joris 295:
1.35 xsa 296: eargv = cvs_strsplit(elist, ",");
297: for (i = 0; eargv->argv[i] != NULL; i++)
298: rcs_access_remove(cf->file_rcs, eargv->argv[i]);
1.1 joris 299:
1.35 xsa 300: cvs_argv_destroy(eargv);
301: } else if (runflags & ADM_EFLAG) {
302: struct rcs_access *rap;
1.1 joris 303:
1.35 xsa 304: while (!TAILQ_EMPTY(&(cf->file_rcs->rf_access))) {
305: rap = TAILQ_FIRST(&(cf->file_rcs->rf_access));
306: TAILQ_REMOVE(&(cf->file_rcs->rf_access), rap, ra_list);
307: xfree(rap->ra_name);
308: xfree(rap);
309: }
310: /* no synced anymore */
311: cf->file_rcs->rf_flags &= ~RCS_SYNCED;
1.47 xsa 312: }
313:
314: /* Default `-kv' is accepted here. */
1.55 tobias 315: if (kflag) {
1.47 xsa 316: if (cf->file_rcs->rf_expand == NULL ||
317: strcmp(cf->file_rcs->rf_expand, koptstr) != 0)
318: rcs_kwexp_set(cf->file_rcs, kflag);
1.40 xsa 319: }
320:
321: if (logstr != NULL) {
322: if ((logmsg = strchr(logstr, ':')) == NULL) {
323: cvs_log(LP_ERR, "missing log message");
324: return;
325: }
326:
327: *logmsg++ = '\0';
1.64 ! tobias 328: if ((rev = rcsnum_parse(logstr)) == NULL) {
1.40 xsa 329: cvs_log(LP_ERR, "`%s' bad revision number", logstr);
330: return;
331: }
332:
1.64 ! tobias 333: if (rcs_rev_setlog(cf->file_rcs, rev, logmsg) < 0) {
1.40 xsa 334: cvs_log(LP_ERR, "failed to set logmsg for `%s' to `%s'",
335: logstr, logmsg);
1.64 ! tobias 336: rcsnum_free(rev);
1.40 xsa 337: return;
338: }
339:
1.64 ! tobias 340: rcsnum_free(rev);
1.36 xsa 341: }
342:
343: if (orange != NULL) {
344: struct rcs_delta *rdp, *nrdp;
1.51 xsa 345: char b[CVS_REV_BUFSZ];
1.36 xsa 346:
347: cvs_revision_select(cf->file_rcs, orange);
348: for (rdp = TAILQ_FIRST(&(cf->file_rcs->rf_delta));
349: rdp != NULL; rdp = nrdp) {
350: nrdp = TAILQ_NEXT(rdp, rd_list);
351:
352: /*
353: * Delete selected revisions.
354: */
355: if (rdp->rd_flags & RCS_RD_SELECT) {
356: rcsnum_tostr(rdp->rd_num, b, sizeof(b));
357: if (verbosity > 0)
358: cvs_printf("deleting revision %s\n", b);
359:
360: (void)rcs_rev_remove(cf->file_rcs, rdp->rd_num);
361: }
362: }
1.42 xsa 363: }
364:
1.64 ! tobias 365: if (state != NULL) {
! 366: if (staterevstr != NULL) {
! 367: if ((rev = rcsnum_parse(staterevstr)) == NULL) {
! 368: cvs_log(LP_ERR, "`%s' bad revision number",
! 369: staterevstr);
1.42 xsa 370: return;
371: }
1.62 tobias 372: } else if (cf->file_rcs->rf_head != NULL) {
1.64 ! tobias 373: rev = rcsnum_alloc();
! 374: rcsnum_cpy(cf->file_rcs->rf_head, rev, 0);
1.62 tobias 375: } else {
376: cvs_log(LP_ERR, "head revision missing");
1.42 xsa 377: return;
378: }
379:
1.64 ! tobias 380: (void)rcs_state_set(cf->file_rcs, rev, state);
1.42 xsa 381:
1.64 ! tobias 382: rcsnum_free(rev);
1.35 xsa 383: }
1.33 xsa 384:
1.16 jfb 385: if (lkmode != RCS_LOCK_INVAL)
1.35 xsa 386: (void)rcs_lock_setmode(cf->file_rcs, lkmode);
1.37 xsa 387:
388: rcs_write(cf->file_rcs);
1.29 xsa 389:
1.35 xsa 390: if (verbosity > 0)
1.29 xsa 391: cvs_printf("done\n");
1.1 joris 392: }