1 /* $OpenBSD: admin.c,v 1.50 2007/02/22 06:42:09 otto 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, 0, "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 int kflag = RCS_KWEXP_DEFAULT; 53 static char *alist, *comment, *elist, *logmsg, *logstr, *koptstr; 54 static char *oldfilename, *orange, *state, *statestr; 55 static RCSNUM *logrev; 56 57 int 58 cvs_admin(int argc, char **argv) 59 { 60 int ch; 61 int flags; 62 struct cvs_recursion cr; 63 64 flags = CR_RECURSE_DIRS; 65 66 alist = comment = elist = logmsg = logstr = NULL; 67 oldfilename = orange = state = statestr = NULL; 68 69 while ((ch = getopt(argc, argv, cvs_cmd_admin.cmd_opts)) != -1) { 70 switch (ch) { 71 case 'A': 72 oldfilename = optarg; 73 break; 74 case 'a': 75 alist = optarg; 76 break; 77 case 'b': 78 break; 79 case 'c': 80 comment = optarg; 81 break; 82 case 'e': 83 elist = optarg; 84 runflags |= ADM_EFLAG; 85 break; 86 case 'I': 87 break; 88 case 'k': 89 koptstr = optarg; 90 kflag = rcs_kflag_get(koptstr); 91 if (RCS_KWEXP_INVAL(kflag)) { 92 cvs_log(LP_ERR, 93 "invalid RCS keyword expension mode"); 94 fatal("%s", cvs_cmd_admin.cmd_synopsis); 95 } 96 break; 97 case 'L': 98 if (lkmode == RCS_LOCK_LOOSE) { 99 cvs_log(LP_ERR, "-L and -U are incompatible"); 100 fatal("%s", cvs_cmd_admin.cmd_synopsis); 101 } 102 lkmode = RCS_LOCK_STRICT; 103 break; 104 case 'l': 105 break; 106 case 'm': 107 logstr = optarg; 108 break; 109 case 'N': 110 break; 111 case 'n': 112 break; 113 case 'o': 114 orange = optarg; 115 break; 116 case 'q': 117 verbosity = 0; 118 break; 119 case 's': 120 statestr = optarg; 121 break; 122 case 't': 123 break; 124 case 'U': 125 if (lkmode == RCS_LOCK_STRICT) { 126 cvs_log(LP_ERR, "-U and -L are incompatible"); 127 fatal("%s", cvs_cmd_admin.cmd_synopsis); 128 } 129 lkmode = RCS_LOCK_LOOSE; 130 break; 131 case 'u': 132 break; 133 default: 134 fatal("%s", cvs_cmd_admin.cmd_synopsis); 135 } 136 } 137 138 argc -= optind; 139 argv += optind; 140 141 if (argc == 0) 142 fatal("%s", cvs_cmd_admin.cmd_synopsis); 143 144 cr.enterdir = NULL; 145 cr.leavedir = NULL; 146 147 if (current_cvsroot->cr_method != CVS_METHOD_LOCAL) { 148 cvs_client_connect_to_server(); 149 cr.fileproc = cvs_client_sendfile; 150 151 if (oldfilename != NULL) 152 cvs_client_send_request("Argument -A%s", oldfilename); 153 154 if (alist != NULL) 155 cvs_client_send_request("Argument -a%s", alist); 156 157 if (comment != NULL) 158 cvs_client_send_request("Argument -c%s", comment); 159 160 if (runflags & ADM_EFLAG) 161 cvs_client_send_request("Argument -e%s", 162 (elist != NULL) ? elist : ""); 163 164 if (koptstr != NULL) 165 cvs_client_send_request("Argument -k%s", koptstr); 166 167 if (lkmode == RCS_LOCK_STRICT) 168 cvs_client_send_request("Argument -L"); 169 else if (lkmode == RCS_LOCK_LOOSE) 170 cvs_client_send_request("Argument -U"); 171 172 if (logstr != NULL) 173 cvs_client_send_request("Argument -m%s", logstr); 174 175 if (orange != NULL) 176 cvs_client_send_request("Argument -o%s", orange); 177 178 if (statestr != NULL) 179 cvs_client_send_request("Argument -s%s", statestr); 180 181 if (verbosity == 0) 182 cvs_client_send_request("Argument -q"); 183 184 } else { 185 flags |= CR_REPO; 186 cr.fileproc = cvs_admin_local; 187 } 188 189 cr.flags = flags; 190 191 cvs_file_run(argc, argv, &cr); 192 193 if (current_cvsroot->cr_method != CVS_METHOD_LOCAL) { 194 cvs_client_send_files(argv, argc); 195 cvs_client_senddir("."); 196 cvs_client_send_request("admin"); 197 cvs_client_get_responses(); 198 } 199 200 return (0); 201 } 202 203 void 204 cvs_admin_local(struct cvs_file *cf) 205 { 206 int i; 207 208 cvs_log(LP_TRACE, "cvs_admin_local(%s)", cf->file_path); 209 210 cvs_file_classify(cf, NULL); 211 212 if (cf->file_type == CVS_DIR) { 213 if (verbosity > 1) 214 cvs_log(LP_NOTICE, "Administrating %s", cf->file_name); 215 return; 216 } 217 218 if (cf->file_status == FILE_UNKNOWN) 219 return; 220 else if (cf->file_status == FILE_ADDED) { 221 cvs_log(LP_ERR, "cannot admin newly added file `%s'", 222 cf->file_name); 223 return; 224 } 225 226 if (verbosity > 0) 227 cvs_printf("RCS file: %s\n", cf->file_rcs->rf_path); 228 229 if (oldfilename != NULL) { 230 struct cvs_file *ocf; 231 struct rcs_access *acp; 232 int ofd; 233 char *d, *f, fpath[MAXPATHLEN], repo[MAXPATHLEN]; 234 235 236 if ((f = basename(oldfilename)) == NULL) 237 fatal("cvs_admin_local: basename failed"); 238 if ((d = dirname(oldfilename)) == NULL) 239 fatal("cvs_admin_local: dirname failed"); 240 241 cvs_get_repository_path(d, repo, MAXPATHLEN); 242 243 (void)xsnprintf(fpath, MAXPATHLEN, "%s/%s", repo, f); 244 245 if (strlcat(fpath, RCS_FILE_EXT, MAXPATHLEN) >= MAXPATHLEN) 246 fatal("cvs_admin_local: truncation"); 247 248 if ((ofd = open(fpath, O_RDONLY)) == -1) 249 fatal("cvs_admin_local: open: `%s': %s", fpath, 250 strerror(errno)); 251 252 /* XXX: S_ISREG() check instead of blindly using CVS_FILE? */ 253 ocf = cvs_file_get_cf(d, f, ofd, CVS_FILE); 254 255 ocf->file_rcs = rcs_open(fpath, ofd, RCS_READ, 0444); 256 if (ocf->file_rcs == NULL) 257 fatal("cvs_admin_local: rcs_open failed"); 258 259 TAILQ_FOREACH(acp, &(ocf->file_rcs->rf_access), ra_list) 260 rcs_access_add(cf->file_rcs, acp->ra_name); 261 262 (void)close(ofd); 263 264 cvs_file_free(ocf); 265 } 266 267 if (alist != NULL) { 268 struct cvs_argvector *aargv; 269 270 aargv = cvs_strsplit(alist, ","); 271 for (i = 0; aargv->argv[i] != NULL; i++) 272 rcs_access_add(cf->file_rcs, aargv->argv[i]); 273 274 cvs_argv_destroy(aargv); 275 } 276 277 if (comment != NULL) 278 rcs_comment_set(cf->file_rcs, comment); 279 280 if (elist != NULL) { 281 struct cvs_argvector *eargv; 282 283 eargv = cvs_strsplit(elist, ","); 284 for (i = 0; eargv->argv[i] != NULL; i++) 285 rcs_access_remove(cf->file_rcs, eargv->argv[i]); 286 287 cvs_argv_destroy(eargv); 288 } else if (runflags & ADM_EFLAG) { 289 struct rcs_access *rap; 290 291 while (!TAILQ_EMPTY(&(cf->file_rcs->rf_access))) { 292 rap = TAILQ_FIRST(&(cf->file_rcs->rf_access)); 293 TAILQ_REMOVE(&(cf->file_rcs->rf_access), rap, ra_list); 294 xfree(rap->ra_name); 295 xfree(rap); 296 } 297 /* no synced anymore */ 298 cf->file_rcs->rf_flags &= ~RCS_SYNCED; 299 } 300 301 /* Default `-kv' is accepted here. */ 302 if (koptstr != NULL) { 303 if (cf->file_rcs->rf_expand == NULL || 304 strcmp(cf->file_rcs->rf_expand, koptstr) != 0) 305 rcs_kwexp_set(cf->file_rcs, kflag); 306 } 307 308 if (logstr != NULL) { 309 if ((logmsg = strchr(logstr, ':')) == NULL) { 310 cvs_log(LP_ERR, "missing log message"); 311 return; 312 } 313 314 *logmsg++ = '\0'; 315 if ((logrev = rcsnum_parse(logstr)) == NULL) { 316 cvs_log(LP_ERR, "`%s' bad revision number", logstr); 317 return; 318 } 319 320 if (rcs_rev_setlog(cf->file_rcs, logrev, logmsg) < 0) { 321 cvs_log(LP_ERR, "failed to set logmsg for `%s' to `%s'", 322 logstr, logmsg); 323 rcsnum_free(logrev); 324 return; 325 } 326 327 rcsnum_free(logrev); 328 } 329 330 if (orange != NULL) { 331 struct rcs_delta *rdp, *nrdp; 332 char b[16]; 333 334 cvs_revision_select(cf->file_rcs, orange); 335 for (rdp = TAILQ_FIRST(&(cf->file_rcs->rf_delta)); 336 rdp != NULL; rdp = nrdp) { 337 nrdp = TAILQ_NEXT(rdp, rd_list); 338 339 /* 340 * Delete selected revisions. 341 */ 342 if (rdp->rd_flags & RCS_RD_SELECT) { 343 rcsnum_tostr(rdp->rd_num, b, sizeof(b)); 344 if (verbosity > 0) 345 cvs_printf("deleting revision %s\n", b); 346 347 (void)rcs_rev_remove(cf->file_rcs, rdp->rd_num); 348 } 349 } 350 } 351 352 if (statestr != NULL) { 353 struct cvs_argvector *sargv; 354 355 sargv = cvs_strsplit(statestr, ":"); 356 if (sargv->argv[1] != NULL) { 357 state = xstrdup(sargv->argv[0]); 358 359 if ((logrev = rcsnum_parse(sargv->argv[1])) == NULL) { 360 cvs_log(LP_ERR, "`%s' bad revision number", statestr); 361 cvs_argv_destroy(sargv); 362 xfree(state); 363 return; 364 } 365 } else { 366 state = xstrdup(statestr); 367 logrev = rcsnum_alloc(); 368 rcsnum_cpy(cf->file_rcs->rf_head, logrev, 0); 369 } 370 371 if (rcs_state_check(state) < 0) { 372 cvs_log(LP_ERR, "invalid state `%s'", state); 373 cvs_argv_destroy(sargv); 374 rcsnum_free(logrev); 375 xfree(state); 376 return; 377 } 378 379 (void)rcs_state_set(cf->file_rcs, logrev, state); 380 381 cvs_argv_destroy(sargv); 382 rcsnum_free(logrev); 383 xfree(state); 384 } 385 386 if (lkmode != RCS_LOCK_INVAL) 387 (void)rcs_lock_setmode(cf->file_rcs, lkmode); 388 389 rcs_write(cf->file_rcs); 390 391 if (verbosity > 0) 392 cvs_printf("done\n"); 393 } 394