xref: /openbsd-src/usr.bin/cvs/admin.c (revision a28daedfc357b214be5c701aa8ba8adb29a7f1c2)
1 /*	$OpenBSD: admin.c,v 1.64 2008/09/12 13:20:36 tobias Exp $	*/
2 /*
3  * Copyright (c) 2004 Jean-Francois Brousseau <jfb@openbsd.org>
4  * Copyright (c) 2005 Joris Vink <joris@openbsd.org>
5  * Copyright (c) 2006, 2007 Xavier Santolaria <xsa@openbsd.org>
6  *
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.
10  *
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.
18  */
19 
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>
28 
29 #include "cvs.h"
30 #include "remote.h"
31 
32 #define ADM_EFLAG	0x01
33 
34 void	cvs_admin_local(struct cvs_file *);
35 
36 struct cvs_cmd cvs_cmd_admin = {
37 	CVS_OP_ADMIN, CVS_USE_WDIR | CVS_LOCK_REPO, "admin",
38 	{ "adm", "rcs" },
39 	"Administrative front-end for RCS",
40 	"[-ILqU] [-A oldfile] [-a users] [-b branch]\n"
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::",
46 	NULL,
47 	cvs_admin
48 };
49 
50 static int	 runflags = 0;
51 static int	 lkmode = RCS_LOCK_INVAL;
52 static char	*alist, *comment, *elist, *logmsg, *logstr, *koptstr;
53 static char	*oldfilename, *orange, *state, *staterevstr;
54 
55 int
56 cvs_admin(int argc, char **argv)
57 {
58 	int ch;
59 	int flags;
60 	char *statestr;
61 	struct cvs_recursion cr;
62 
63 	flags = CR_RECURSE_DIRS;
64 
65 	alist = comment = elist = logmsg = logstr = NULL;
66 	oldfilename = orange = state = statestr = NULL;
67 
68 	while ((ch = getopt(argc, argv, cvs_cmd_admin.cmd_opts)) != -1) {
69 		switch (ch) {
70 		case 'A':
71 			oldfilename = optarg;
72 			break;
73 		case 'a':
74 			alist = optarg;
75 			break;
76 		case 'b':
77 			break;
78 		case 'c':
79 			comment = optarg;
80 			break;
81 		case 'e':
82 			elist = optarg;
83 			runflags |= ADM_EFLAG;
84 			break;
85 		case 'I':
86 			break;
87 		case 'k':
88 			koptstr = optarg;
89 			kflag = rcs_kflag_get(koptstr);
90 			if (RCS_KWEXP_INVAL(kflag)) {
91 				cvs_log(LP_ERR,
92 				    "invalid RCS keyword expansion mode");
93 				fatal("%s", cvs_cmd_admin.cmd_synopsis);
94 			}
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);
100 			}
101 			lkmode = RCS_LOCK_STRICT;
102 			break;
103 		case 'l':
104 			break;
105 		case 'm':
106 			logstr = optarg;
107 			break;
108 		case 'N':
109 			break;
110 		case 'n':
111 			break;
112 		case 'o':
113 			orange = optarg;
114 			break;
115 		case 'q':
116 			verbosity = 0;
117 			break;
118 		case 's':
119 			statestr = optarg;
120 			break;
121 		case 't':
122 			break;
123 		case 'U':
124 			if (lkmode == RCS_LOCK_STRICT) {
125 				cvs_log(LP_ERR, "-U and -L are incompatible");
126 				fatal("%s", cvs_cmd_admin.cmd_synopsis);
127 			}
128 			lkmode = RCS_LOCK_LOOSE;
129 			break;
130 		case 'u':
131 			break;
132 		default:
133 			fatal("%s", cvs_cmd_admin.cmd_synopsis);
134 		}
135 	}
136 
137 	argc -= optind;
138 	argv += optind;
139 
140 	if (argc == 0)
141 		fatal("%s", cvs_cmd_admin.cmd_synopsis);
142 
143 	cr.enterdir = NULL;
144 	cr.leavedir = NULL;
145 
146 	if (current_cvsroot->cr_method != CVS_METHOD_LOCAL) {
147 		cvs_client_connect_to_server();
148 		cr.fileproc = cvs_client_sendfile;
149 
150 		if (oldfilename != NULL)
151 			cvs_client_send_request("Argument -A%s", oldfilename);
152 
153 		if (alist != NULL)
154 			cvs_client_send_request("Argument -a%s", alist);
155 
156 		if (comment != NULL)
157 			cvs_client_send_request("Argument -c%s", comment);
158 
159 		if (runflags & ADM_EFLAG)
160 			cvs_client_send_request("Argument -e%s",
161 			    (elist != NULL) ? elist : "");
162 
163 		if (koptstr != NULL)
164 			cvs_client_send_request("Argument -k%s", koptstr);
165 
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");
170 
171 		if (logstr != NULL)
172 			cvs_client_send_logmsg(logstr);
173 
174 		if (orange != NULL)
175 			cvs_client_send_request("Argument -o%s", orange);
176 
177 		if (statestr != NULL)
178 			cvs_client_send_request("Argument -s%s", statestr);
179 
180 		if (verbosity == 0)
181 			cvs_client_send_request("Argument -q");
182 
183 	} else {
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 
194 		flags |= CR_REPO;
195 		cr.fileproc = cvs_admin_local;
196 	}
197 
198 	cr.flags = flags;
199 
200 	cvs_file_run(argc, argv, &cr);
201 
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();
207 	}
208 
209 	return (0);
210 }
211 
212 void
213 cvs_admin_local(struct cvs_file *cf)
214 {
215 	int i;
216 	RCSNUM *rev;
217 
218 	cvs_log(LP_TRACE, "cvs_admin_local(%s)", cf->file_path);
219 
220 	cvs_file_classify(cf, cvs_directory_tag);
221 
222 	if (cf->file_type == CVS_DIR) {
223 		if (verbosity > 1)
224 			cvs_log(LP_NOTICE, "Administrating %s", cf->file_name);
225 		return;
226 	}
227 
228 	if (cf->file_ent == NULL)
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);
233 		return;
234 	}
235 
236 	if (cf->file_rcs == NULL) {
237 		cvs_log(LP_ERR, "lost RCS file for `%s'", cf->file_path);
238 		return;
239 	}
240 
241 	if (verbosity > 0)
242 		cvs_printf("RCS file: %s\n", cf->file_rcs->rf_path);
243 
244 	if (oldfilename != NULL) {
245 		struct cvs_file *ocf;
246 		struct rcs_access *acp;
247 		int ofd;
248 		char *d, *f, fpath[MAXPATHLEN], repo[MAXPATHLEN];
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 
258 		(void)xsnprintf(fpath, MAXPATHLEN, "%s/%s", repo, f);
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? */
268 		ocf = cvs_file_get_cf(d, f, oldfilename, ofd, CVS_FILE, 0);
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 	}
279 
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 
290 	if (comment != NULL)
291 		rcs_comment_set(cf->file_rcs, comment);
292 
293 	if (elist != NULL) {
294 		struct cvs_argvector *eargv;
295 
296 		eargv = cvs_strsplit(elist, ",");
297 		for (i = 0; eargv->argv[i] != NULL; i++)
298 			rcs_access_remove(cf->file_rcs, eargv->argv[i]);
299 
300 		cvs_argv_destroy(eargv);
301 	} else if (runflags & ADM_EFLAG) {
302 		struct rcs_access *rap;
303 
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;
312 	}
313 
314 	/* Default `-kv' is accepted here. */
315 	if (kflag) {
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);
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';
328 		if ((rev = rcsnum_parse(logstr)) == NULL) {
329 			cvs_log(LP_ERR, "`%s' bad revision number", logstr);
330 			return;
331 		}
332 
333 		if (rcs_rev_setlog(cf->file_rcs, rev, logmsg) < 0) {
334 			cvs_log(LP_ERR, "failed to set logmsg for `%s' to `%s'",
335 			    logstr, logmsg);
336 			rcsnum_free(rev);
337 			return;
338 		}
339 
340 		rcsnum_free(rev);
341 	}
342 
343 	if (orange != NULL) {
344 		struct rcs_delta *rdp, *nrdp;
345 		char b[CVS_REV_BUFSZ];
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 		}
363 	}
364 
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);
370 				return;
371 			}
372 		} else if (cf->file_rcs->rf_head != NULL) {
373 			rev = rcsnum_alloc();
374 			rcsnum_cpy(cf->file_rcs->rf_head, rev, 0);
375 		} else {
376 			cvs_log(LP_ERR, "head revision missing");
377 			return;
378 		}
379 
380 		(void)rcs_state_set(cf->file_rcs, rev, state);
381 
382 		rcsnum_free(rev);
383 	}
384 
385 	if (lkmode != RCS_LOCK_INVAL)
386 		(void)rcs_lock_setmode(cf->file_rcs, lkmode);
387 
388 	rcs_write(cf->file_rcs);
389 
390 	if (verbosity > 0)
391 		cvs_printf("done\n");
392 }
393