[BACK]Return to admin.c CVS log [TXT][DIR] Up to [local] / src / usr.bin / cvs

Annotation of src/usr.bin/cvs/admin.c, Revision 1.49

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