Annotation of src/usr.bin/rcs/co.c, Revision 1.58
1.58 ! xsa 1: /* $OpenBSD: co.c,v 1.57 2006/03/06 13:49:24 xsa Exp $ */
1.1 joris 2: /*
3: * Copyright (c) 2005 Joris Vink <joris@openbsd.org>
4: * All rights reserved.
5: *
6: * Redistribution and use in source and binary forms, with or without
7: * modification, are permitted provided that the following conditions
8: * are met:
9: *
10: * 1. Redistributions of source code must retain the above copyright
11: * notice, this list of conditions and the following disclaimer.
12: * 2. The name of the author may not be used to endorse or promote products
13: * derived from this software without specific prior written permission.
14: *
15: * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES,
16: * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
17: * AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL
18: * THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
19: * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
20: * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
21: * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
22: * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
23: * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
24: * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
25: */
26:
1.51 xsa 27: #include "includes.h"
1.1 joris 28:
29: #include "rcsprog.h"
30:
1.49 joris 31: #define CO_OPTSTRING "d:f::k:l::M::p::q::r::s:Tu::Vw::x:"
1.38 xsa 32:
1.43 xsa 33: static void checkout_err_nobranch(RCSFILE *, const char *, const char *,
34: const char *, int);
1.4 joris 35:
1.1 joris 36: int
37: checkout_main(int argc, char **argv)
38: {
1.33 xsa 39: int i, ch, flags, kflag;
1.4 joris 40: RCSNUM *frev, *rev;
1.1 joris 41: RCSFILE *file;
1.45 joris 42: char fpath[MAXPATHLEN];
1.49 joris 43: char *author, *username, *date;
1.38 xsa 44: const char *state;
1.37 xsa 45: time_t rcs_mtime = -1;
1.1 joris 46:
1.24 niallo 47: flags = 0;
1.33 xsa 48: kflag = RCS_KWEXP_ERR;
1.1 joris 49: rev = RCS_HEAD_REV;
1.6 joris 50: frev = NULL;
1.44 joris 51: state = NULL;
52: author = NULL;
1.49 joris 53: date = NULL;
1.4 joris 54:
1.38 xsa 55: while ((ch = rcs_getopt(argc, argv, CO_OPTSTRING)) != -1) {
1.1 joris 56: switch (ch) {
1.49 joris 57: case 'd':
58: date = xstrdup(rcs_optarg);
59: break;
1.18 joris 60: case 'f':
1.19 joris 61: rcs_set_rev(rcs_optarg, &rev);
1.24 niallo 62: flags |= FORCE;
1.18 joris 63: break;
1.33 xsa 64: case 'k':
65: kflag = rcs_kflag_get(rcs_optarg);
66: if (RCS_KWEXP_INVAL(kflag)) {
67: cvs_log(LP_ERR,
68: "invalid RCS keyword expansion mode");
69: (usage)();
70: exit(1);
71: }
72: break;
1.4 joris 73: case 'l':
1.19 joris 74: rcs_set_rev(rcs_optarg, &rev);
1.53 xsa 75: if (flags & CO_UNLOCK) {
76: cvs_log(LP_ERR, "warning: -u overridden by -l");
77: flags &= ~CO_UNLOCK;
78: }
1.24 niallo 79: flags |= CO_LOCK;
1.26 niallo 80: break;
81: case 'M':
82: rcs_set_rev(rcs_optarg, &rev);
83: flags |= CO_REVDATE;
1.4 joris 84: break;
1.20 joris 85: case 'p':
86: rcs_set_rev(rcs_optarg, &rev);
87: pipeout = 1;
88: break;
1.3 joris 89: case 'q':
1.32 xsa 90: rcs_set_rev(rcs_optarg, &rev);
1.3 joris 91: verbose = 0;
92: break;
1.1 joris 93: case 'r':
1.19 joris 94: rcs_set_rev(rcs_optarg, &rev);
1.4 joris 95: break;
1.24 niallo 96: case 's':
1.47 joris 97: state = xstrdup(rcs_optarg);
1.24 niallo 98: flags |= CO_STATE;
1.34 xsa 99: break;
100: case 'T':
101: flags |= PRESERVETIME;
1.24 niallo 102: break;
1.4 joris 103: case 'u':
1.19 joris 104: rcs_set_rev(rcs_optarg, &rev);
1.53 xsa 105: if (flags & CO_LOCK) {
106: cvs_log(LP_ERR, "warning: -l overridden by -u");
107: flags &= ~CO_LOCK;
108: }
1.24 niallo 109: flags |= CO_UNLOCK;
1.1 joris 110: break;
1.7 joris 111: case 'V':
112: printf("%s\n", rcs_version);
113: exit(0);
1.38 xsa 114: case 'w':
1.44 joris 115: /* if no argument, assume current user */
116: if (rcs_optarg == NULL) {
1.48 xsa 117: if ((author = getlogin()) == NULL)
118: fatal("getlogin failed");
1.47 joris 119: } else
120: author = xstrdup(rcs_optarg);
1.43 xsa 121: flags |= CO_AUTHOR;
1.38 xsa 122: break;
1.30 xsa 123: case 'x':
124: rcs_suffixes = rcs_optarg;
125: break;
1.1 joris 126: default:
127: (usage)();
128: exit(1);
129: }
130: }
131:
1.13 joris 132: argc -= rcs_optind;
133: argv += rcs_optind;
1.1 joris 134:
135: if (argc == 0) {
136: cvs_log(LP_ERR, "no input file");
137: (usage)();
138: exit (1);
139: }
1.11 deraadt 140:
1.44 joris 141: if ((username = getlogin()) == NULL) {
1.38 xsa 142: cvs_log(LP_ERRNO, "failed to get username");
143: exit (1);
144: }
145:
1.1 joris 146: for (i = 0; i < argc; i++) {
147: if (rcs_statfile(argv[i], fpath, sizeof(fpath)) < 0)
148: continue;
149:
1.21 niallo 150: if (verbose == 1)
1.22 xsa 151: printf("%s --> %s\n", fpath,
152: (pipeout == 1) ? "standard output" : argv[i]);
1.35 xsa 153:
154: if ((flags & CO_LOCK) && (kflag & RCS_KWEXP_VAL)) {
155: cvs_log(LP_ERR, "%s: cannot combine -kv and -l", fpath);
156: continue;
157: }
1.21 niallo 158:
1.50 niallo 159: if ((file = rcs_open(fpath, RCS_RDWR|RCS_PARSE_FULLY)) == NULL)
1.1 joris 160: continue;
161:
1.37 xsa 162: if (flags & PRESERVETIME)
163: rcs_mtime = rcs_get_mtime(file->rf_path);
164:
165: if (kflag != RCS_KWEXP_ERR)
166: rcs_kwexp_set(file, kflag);
167:
1.4 joris 168: if (rev == RCS_HEAD_REV)
169: frev = file->rf_head;
170: else
171: frev = rev;
1.17 joris 172:
1.44 joris 173: if (checkout_rev(file, frev, argv[i], flags,
1.49 joris 174: username, author, state, date) < 0) {
1.24 niallo 175: rcs_close(file);
176: continue;
1.8 niallo 177: }
1.58 ! xsa 178:
! 179: if (verbose == 1)
! 180: printf("done\n");
1.17 joris 181:
1.1 joris 182: rcs_close(file);
1.37 xsa 183:
184: if (flags & PRESERVETIME)
185: rcs_set_mtime(fpath, rcs_mtime);
1.1 joris 186: }
187:
188: if (rev != RCS_HEAD_REV)
1.5 joris 189: rcsnum_free(frev);
1.1 joris 190:
191: return (0);
192: }
193:
194: void
195: checkout_usage(void)
196: {
1.11 deraadt 197: fprintf(stderr,
1.42 xsa 198: "usage: co [-TV] [-ddate] [-f[rev]] [-I[rev]] [-kmode] [-l[rev]]\n"
199: " [-M[rev]] [-p[rev]] [-q[rev]] [-r[rev]] [-sstate]\n"
200: " [-u[rev]] [-w[user]] [-xsuffixes] [-ztz] file ...\n");
1.1 joris 201: }
1.14 niallo 202:
203: /*
204: * Checkout revision <rev> from RCSFILE <file>, writing it to the path <dst>
1.29 xsa 205: * Currenly recognised <flags> are CO_LOCK, CO_UNLOCK and CO_REVDATE.
1.14 niallo 206: *
1.49 joris 207: * Looks up revision based upon <lockname>, <author>, <state> and <date>
1.44 joris 208: *
1.14 niallo 209: * Returns 0 on success, -1 on failure.
210: */
211: int
1.24 niallo 212: checkout_rev(RCSFILE *file, RCSNUM *frev, const char *dst, int flags,
1.49 joris 213: const char *lockname, const char *author, const char *state,
214: const char *date)
1.14 niallo 215: {
1.44 joris 216: BUF *bp;
217: int lcount;
1.18 joris 218: char buf[16], yn;
1.14 niallo 219: mode_t mode = 0444;
1.18 joris 220: struct stat st;
1.44 joris 221: struct rcs_delta *rdp;
222: struct rcs_lock *lkp;
1.49 joris 223: char *content, msg[128], *fdate;
224: time_t rcsdate, givendate;
225:
226: rcsdate = givendate = -1;
227: if (date != NULL)
228: givendate = cvs_date_parse(date);
1.14 niallo 229:
1.39 xsa 230: /* Check out the latest revision if <frev> is greater than HEAD */
1.15 niallo 231: if (rcsnum_cmp(frev, file->rf_head, 0) == -1)
1.23 xsa 232: frev = file->rf_head;
1.15 niallo 233:
1.44 joris 234: lcount = 0;
235: TAILQ_FOREACH(lkp, &(file->rf_locks), rl_list) {
236: if (!strcmp(lkp->rl_name, lockname))
237: lcount++;
238: }
239:
240: /*
241: * If the user didn't specify any revision, we cycle through
242: * revisions to lookup the first one that matches what he specified.
243: *
244: * If we cannot find one, we return an error.
245: */
246: rdp = NULL;
247: if (frev == file->rf_head) {
248: if (lcount > 1) {
249: cvs_log(LP_WARN,
250: "multiple revisions locked by %s; "
251: "please specify one", lockname);
252: return (-1);
253: }
254:
255: TAILQ_FOREACH(rdp, &file->rf_delta, rd_list) {
1.49 joris 256: if (date != NULL) {
257: fdate = asctime(&rdp->rd_date);
258: rcsdate = cvs_date_parse(fdate);
259: if (givendate <= rcsdate)
260: continue;
261: }
262:
1.44 joris 263: if ((author != NULL) &&
264: (strcmp(rdp->rd_author, author)))
265: continue;
1.49 joris 266:
1.44 joris 267: if ((state != NULL) &&
268: (strcmp(rdp->rd_state, state)))
269: continue;
270:
271: frev = rdp->rd_num;
272: break;
273: }
274: } else {
275: rdp = rcs_findrev(file, frev);
276: }
277:
278: if (rdp == NULL) {
1.49 joris 279: checkout_err_nobranch(file, author, date, state, flags);
1.44 joris 280: return (-1);
281: }
282:
1.15 niallo 283: rcsnum_tostr(frev, buf, sizeof(buf));
284:
1.44 joris 285: if (rdp->rd_locker != NULL) {
286: if (strcmp(lockname, rdp->rd_locker)) {
287: strlcpy(msg, "Revision %s is already locked by %s; ",
288: sizeof(msg));
289: if (flags & CO_UNLOCK)
290: strlcat(msg, "use co -r or rcs -u", sizeof(msg));
291: cvs_log(LP_ERR, msg, buf, rdp->rd_locker);
292: return (-1);
293: }
294: }
295:
1.53 xsa 296: if ((verbose == 1) && !(flags & NEWFILE))
1.18 joris 297: printf("revision %s", buf);
298:
1.44 joris 299:
1.14 niallo 300: if ((bp = rcs_getrev(file, frev)) == NULL) {
301: cvs_log(LP_ERR, "cannot find revision `%s'", buf);
302: return (-1);
303: }
1.55 niallo 304: /*
305: * Do keyword expansion if required.
306: */
307: bp = rcs_kwexp_buf(bp, file, frev);
1.14 niallo 308:
1.24 niallo 309: if (flags & CO_LOCK) {
1.44 joris 310: if ((lockname != NULL)
311: && (rcs_lock_add(file, lockname, frev) < 0)) {
312: if (rcs_errno != RCS_ERR_DUPENT)
313: return (-1);
1.14 niallo 314: }
1.18 joris 315:
1.14 niallo 316: mode = 0644;
1.53 xsa 317: if ((verbose == 1) && !(flags & NEWFILE))
1.57 xsa 318: printf(" (locked)");
1.24 niallo 319: } else if (flags & CO_UNLOCK) {
1.46 joris 320: if (rcs_lock_remove(file, lockname, frev) < 0) {
321: if (rcs_errno != RCS_ERR_NOENT)
322: return (-1);
323: }
1.18 joris 324:
1.14 niallo 325: mode = 0444;
1.53 xsa 326: if ((verbose == 1) && !(flags & NEWFILE))
1.57 xsa 327: printf(" (unlocked)");
1.18 joris 328: }
1.56 xsa 329:
330: if ((verbose == 1) && !(flags & NEWFILE))
331: printf("\n");
1.18 joris 332:
1.44 joris 333: if (flags & CO_LOCK) {
334: lcount++;
335: if (lcount > 1)
336: cvs_log(LP_WARN, "You now have %d locks.", lcount);
337: }
338:
1.41 xsa 339: if ((pipeout == 0) && (stat(dst, &st) == 0) && !(flags & FORCE)) {
1.18 joris 340: if (st.st_mode & S_IWUSR) {
341: yn = 0;
1.21 niallo 342: if (verbose == 0) {
343: cvs_log(LP_ERR,
1.40 xsa 344: "writable %s exists; checkout aborted",
1.21 niallo 345: dst);
346: return (-1);
347: }
1.41 xsa 348:
349: while ((yn != 'y') && (yn != 'n')) {
350: printf("writable %s exists%s; ", dst,
351: ((uid_t)getuid() == st.st_uid) ? "" :
352: ", and you do not own it");
1.21 niallo 353: printf("remove it? [ny](n): ");
1.18 joris 354: fflush(stdout);
355: yn = getchar();
356: }
357:
358: if (yn == 'n') {
1.21 niallo 359: cvs_log(LP_ERR, "checkout aborted");
1.18 joris 360: return (-1);
361: }
362: }
1.14 niallo 363: }
1.17 joris 364:
1.20 joris 365: if (pipeout == 1) {
366: cvs_buf_putc(bp, '\0');
367: content = cvs_buf_release(bp);
368: printf("%s", content);
1.47 joris 369: xfree(content);
1.20 joris 370: } else {
371: if (cvs_buf_write(bp, dst, mode) < 0) {
372: cvs_log(LP_ERR, "failed to write revision to file");
373: cvs_buf_free(bp);
374: return (-1);
375: }
1.14 niallo 376: cvs_buf_free(bp);
1.24 niallo 377: if (flags & CO_REVDATE) {
378: struct timeval tv[2];
1.36 xsa 379: memset(&tv, 0, sizeof(tv));
1.24 niallo 380: tv[0].tv_sec = (long)rcs_rev_getdate(file, frev);
381: tv[1].tv_sec = tv[0].tv_sec;
382: if (utimes(dst, (const struct timeval *)&tv) < 0)
383: cvs_log(LP_ERRNO, "error setting utimes");
384: }
1.14 niallo 385: }
1.17 joris 386:
1.14 niallo 387: return (0);
1.43 xsa 388: }
389:
390: /*
391: * checkout_err_nobranch()
392: *
393: * XXX - should handle the dates too.
394: */
395: static void
396: checkout_err_nobranch(RCSFILE *file, const char *author, const char *date,
397: const char *state, int flags)
398: {
399: if (!(flags & CO_AUTHOR))
400: author = NULL;
401: if (!(flags & CO_STATE))
402: state = NULL;
403:
404: cvs_log(LP_ERR, "%s: No revision on branch has%s%s%s%s%s%s.",
405: file->rf_path,
406: date ? " a date before " : "",
407: date ? date : "",
408: author ? " and author " + (date ? 0:4 ) : "",
409: author ? author : "",
410: state ? " and state " + (date || author ? 0:4) : "",
411: state ? state : "");
1.24 niallo 412: }