Annotation of src/usr.bin/rcs/rlog.c, Revision 1.40
1.40 ! joris 1: /* $OpenBSD: rlog.c,v 1.39 2006/04/10 15:32:26 niallo Exp $ */
1.1 joris 2: /*
3: * Copyright (c) 2005 Joris Vink <joris@openbsd.org>
1.20 xsa 4: * Copyright (c) 2005, 2006 Xavier Santolaria <xsa@openbsd.org>
1.1 joris 5: * All rights reserved.
6: *
7: * Redistribution and use in source and binary forms, with or without
8: * modification, are permitted provided that the following conditions
9: * are met:
10: *
11: * 1. Redistributions of source code must retain the above copyright
12: * notice, this list of conditions and the following disclaimer.
13: * 2. The name of the author may not be used to endorse or promote products
14: * derived from this software without specific prior written permission.
15: *
16: * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES,
17: * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
18: * AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL
19: * THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
20: * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
21: * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
22: * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
23: * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
24: * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
25: * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
26: */
27:
1.18 xsa 28: #include "includes.h"
1.1 joris 29:
1.19 xsa 30: #include "rcsprog.h"
1.3 niallo 31: #include "diff.h"
1.1 joris 32:
1.32 xsa 33: static void rlog_file(const char *, const char *);
34: static void rlog_rev_print(struct rcs_delta *);
1.36 ray 35: static u_int rlog_rev_select(void);
1.1 joris 36:
1.38 xsa 37: #define RLOG_OPTSTRING "hLl::NqRr::s:TtVw::x::z::"
1.1 joris 38: #define REVSEP "----------------------------"
39: #define REVEND \
1.6 xsa 40: "============================================================================="
1.1 joris 41:
1.36 ray 42: static int hflag, Lflag, lflag, rflag, tflag, Nflag, wflag;
1.23 xsa 43: static char *llist = NULL;
1.20 xsa 44: static char *slist = NULL;
45: static char *wlist = NULL;
1.36 ray 46: static char *revisions = NULL;
1.23 xsa 47: static RCSFILE *file;
1.1 joris 48:
1.21 xsa 49: void
50: rlog_usage(void)
51: {
52: fprintf(stderr,
1.25 jmc 53: "usage: rlog [-bhLNqRtV] [-ddates] [-l[lockers]] [-r[revs]]\n"
1.28 xsa 54: " [-sstates] [-w[logins]] [-xsuffixes]\n"
55: " [-ztz] file ...\n");
1.21 xsa 56: }
57:
1.1 joris 58: int
59: rlog_main(int argc, char **argv)
60: {
61: int Rflag;
62: int i, ch;
63: char fpath[MAXPATHLEN];
64:
1.36 ray 65: hflag = Rflag = rflag = 0;
66: while ((ch = rcs_getopt(argc, argv, RLOG_OPTSTRING)) != -1) {
1.1 joris 67: switch (ch) {
68: case 'h':
69: hflag = 1;
70: break;
1.11 xsa 71: case 'L':
72: Lflag = 1;
73: break;
1.23 xsa 74: case 'l':
75: lflag = 1;
76: llist = rcs_optarg;
77: break;
1.1 joris 78: case 'N':
79: Nflag = 1;
80: break;
81: case 'q':
82: verbose = 0;
83: break;
1.37 xsa 84: case 'R':
85: Rflag = 1;
86: break;
1.36 ray 87: case 'r':
88: rflag = 1;
89: revisions = rcs_optarg;
90: break;
1.20 xsa 91: case 's':
92: slist = rcs_optarg;
93: break;
1.8 xsa 94: case 'T':
95: /*
96: * kept for compatibility
97: */
98: break;
1.1 joris 99: case 't':
100: tflag = 1;
101: break;
102: case 'V':
103: printf("%s\n", rcs_version);
104: exit(0);
1.29 ray 105: /* NOTREACHED */
1.20 xsa 106: case 'w':
107: wflag = 1;
108: wlist = rcs_optarg;
109: break;
1.14 xsa 110: case 'x':
1.33 ray 111: /* Use blank extension if none given. */
112: rcs_suffixes = rcs_optarg ? rcs_optarg : "";
1.14 xsa 113: break;
1.26 joris 114: case 'z':
115: timezone_flag = rcs_optarg;
1.27 xsa 116: break;
1.1 joris 117: default:
1.21 xsa 118: (usage());
119: exit(1);
1.1 joris 120: }
121: }
122:
1.5 joris 123: argc -= rcs_optind;
124: argv += rcs_optind;
1.1 joris 125:
126: if (argc == 0) {
127: cvs_log(LP_ERR, "no input file");
128: (usage)();
129: exit(1);
130: }
131:
1.7 xsa 132: if ((hflag == 1) && (tflag == 1)) {
1.6 xsa 133: cvs_log(LP_WARN, "warning: -t overrides -h.");
1.7 xsa 134: hflag = 0;
135: }
1.6 xsa 136:
1.1 joris 137: for (i = 0; i < argc; i++) {
138: if (rcs_statfile(argv[i], fpath, sizeof(fpath)) < 0)
139: continue;
140:
1.17 niallo 141: if ((file = rcs_open(fpath, RCS_READ|RCS_PARSE_FULLY)) == NULL)
1.11 xsa 142: continue;
143:
144: if ((Lflag == 1) && (TAILQ_EMPTY(&(file->rf_locks)))) {
145: rcs_close(file);
146: continue;
147: }
148:
1.9 xsa 149: if (Rflag == 1) {
150: printf("%s\n", fpath);
1.11 xsa 151: rcs_close(file);
1.9 xsa 152: continue;
153: }
154:
1.23 xsa 155: rlog_file(argv[i], fpath);
1.9 xsa 156:
1.1 joris 157: rcs_close(file);
158: }
159:
160: return (0);
161: }
162:
1.32 xsa 163: static void
1.23 xsa 164: rlog_file(const char *fname, const char *fpath)
1.1 joris 165: {
166: char numb[64];
1.36 ray 167: u_int nrev;
1.1 joris 168: struct rcs_sym *sym;
169: struct rcs_access *acp;
1.20 xsa 170: struct rcs_delta *rdp;
1.10 xsa 171: struct rcs_lock *lkp;
1.1 joris 172:
1.36 ray 173: if (rflag == 1)
174: nrev = rlog_rev_select();
175: else
176: nrev = file->rf_ndelta;
177:
1.12 xsa 178: printf("\nRCS file: %s", fpath);
1.6 xsa 179: printf("\nWorking file: %s", fname);
1.1 joris 180: printf("\nhead:");
181: if (file->rf_head != NULL)
182: printf(" %s", rcsnum_tostr(file->rf_head, numb, sizeof(numb)));
183:
184: printf("\nbranch:");
185: if (rcs_branch_get(file) != NULL) {
186: printf(" %s", rcsnum_tostr(rcs_branch_get(file),
187: numb, sizeof(numb)));
188: }
189:
190: printf("\nlocks: %s", (file->rf_flags & RCS_SLOCK) ? "strict" : "");
1.10 xsa 191: TAILQ_FOREACH(lkp, &(file->rf_locks), rl_list)
192: printf("\n\t%s: %s", lkp->rl_name,
193: rcsnum_tostr(lkp->rl_num, numb, sizeof(numb)));
1.1 joris 194: printf("\naccess list:\n");
195: TAILQ_FOREACH(acp, &(file->rf_access), ra_list)
196: printf("\t%s\n", acp->ra_name);
197:
198: if (Nflag == 0) {
199: printf("symbolic names:\n");
200: TAILQ_FOREACH(sym, &(file->rf_symbols), rs_list) {
201: printf("\t%s: %s\n", sym->rs_name,
202: rcsnum_tostr(sym->rs_num, numb, sizeof(numb)));
203: }
204: }
205:
206: printf("keyword substitution: %s\n",
207: file->rf_expand == NULL ? "kv" : file->rf_expand);
208:
1.20 xsa 209: printf("total revisions: %u", file->rf_ndelta);
210:
1.35 xsa 211: if ((file->rf_head != NULL) && (hflag == 0) && (tflag == 0))
1.36 ray 212: printf(";\tselected revisions: %u", nrev);
1.20 xsa 213:
214: printf("\n");
215:
1.1 joris 216:
217: if ((hflag == 0) || (tflag == 1))
1.13 xsa 218: printf("description:\n%s", file->rf_desc);
1.1 joris 219:
1.20 xsa 220: if ((hflag == 0) && (tflag == 0)) {
1.36 ray 221: TAILQ_FOREACH(rdp, &(file->rf_delta), rd_list) {
222: /*
223: * if selections are enabled verify that entry is
1.39 niallo 224: * selected.
1.36 ray 225: */
226: if ((rflag == 0) || (rdp->rd_flags & RCS_RD_SELECT))
227: rlog_rev_print(rdp);
228: }
1.20 xsa 229: }
1.1 joris 230:
231: printf("%s\n", REVEND);
1.16 xsa 232: }
233:
234: static void
1.20 xsa 235: rlog_rev_print(struct rcs_delta *rdp)
1.16 xsa 236: {
1.20 xsa 237: int i, found;
1.40 ! joris 238: struct tm t;
! 239: char *author, numb[64], *fmt, timeb[64];
1.34 pat 240: struct cvs_argvector *largv, *sargv, *wargv;
1.20 xsa 241:
242: i = found = 0;
243: author = NULL;
244:
1.23 xsa 245: /* -l[lockers] */
246: if (lflag == 1) {
247: /* if no locks at all, abort. */
248: if (TAILQ_EMPTY(&(file->rf_locks)))
249: return;
250: else
251: if (rdp->rd_locker != NULL)
252: found++;
253:
254: if (llist != NULL) {
255: /* if locker is empty, no need to go further. */
256: if (rdp->rd_locker == NULL)
257: return;
1.30 xsa 258: largv = cvs_strsplit(llist, ",");
1.34 pat 259: for (i = 0; largv->argv[i] != NULL; i++) {
260: if (strcmp(rdp->rd_locker, largv->argv[i])
261: == 0) {
1.23 xsa 262: found++;
263: break;
264: }
265: found = 0;
266: }
1.39 niallo 267: cvs_argv_destroy(largv);
1.23 xsa 268: }
269: }
1.40 ! joris 270:
1.20 xsa 271: /* -sstates */
272: if (slist != NULL) {
1.30 xsa 273: sargv = cvs_strsplit(slist, ",");
1.34 pat 274: for (i = 0; sargv->argv[i] != NULL; i++) {
275: if (strcmp(rdp->rd_state, sargv->argv[i]) == 0) {
1.20 xsa 276: found++;
277: break;
278: }
279: found = 0;
280: }
1.39 niallo 281: cvs_argv_destroy(sargv);
1.20 xsa 282: }
1.40 ! joris 283:
1.20 xsa 284: /* -w[logins] */
285: if (wflag == 1) {
286: if (wlist != NULL) {
1.30 xsa 287: wargv = cvs_strsplit(wlist, ",");
1.34 pat 288: for (i = 0; wargv->argv[i] != NULL; i++) {
289: if (strcmp(rdp->rd_author, wargv->argv[i])
290: == 0) {
1.20 xsa 291: found++;
292: break;
293: }
294: found = 0;
295: }
1.39 niallo 296: cvs_argv_destroy(wargv);
1.20 xsa 297: } else {
298: if ((author = getlogin()) == NULL)
299: fatal("getlogin failed");
1.16 xsa 300:
1.20 xsa 301: if (strcmp(rdp->rd_author, author) == 0)
302: found++;
303: }
304: }
1.16 xsa 305:
1.20 xsa 306: /* XXX dirty... */
1.23 xsa 307: if (((((slist != NULL) && (wflag == 1)) ||
308: ((slist != NULL) && (lflag == 1)) ||
309: ((lflag == 1) && (wflag == 1))) && (found < 2)) ||
310: ((((slist != NULL) && (lflag == 1) && (wflag == 1)) ||
311: ((slist != NULL) || (lflag == 1) || (wflag == 1))) && (found == 0)))
1.20 xsa 312: return;
313:
314: printf("%s\n", REVSEP);
315:
316: rcsnum_tostr(rdp->rd_num, numb, sizeof(numb));
317:
1.22 xsa 318: printf("revision %s", numb);
319: if (rdp->rd_locker != NULL)
320: printf("\tlocked by: %s;", rdp->rd_locker);
1.40 ! joris 321:
! 322: if (timezone_flag != NULL) {
! 323: rcs_set_tz(timezone_flag, rdp, &t);
! 324: fmt = "%Y/%m/%d %H:%M:%S%z";
! 325: } else {
! 326: t = rdp->rd_date;
! 327: fmt = "%Y/%m/%d %H:%M:%S";
! 328: }
! 329:
! 330: strftime(timeb, sizeof(timeb), fmt, &t);
! 331:
! 332: printf("\ndate: %s; author: %s; state: %s;\n", timeb, rdp->rd_author,
! 333: rdp->rd_state);
! 334:
1.20 xsa 335: printf("%s", rdp->rd_log);
1.36 ray 336: }
337:
338: static u_int
339: rlog_rev_select(void)
340: {
341: int i;
342: u_int nrev;
343: char *ep;
344: char *lstr, *rstr;
345: struct rcs_delta *rdp;
346: struct cvs_argvector *revargv, *revrange;
347: RCSNUM lnum, rnum;
348:
349: nrev = 0;
350: (void)memset(&lnum, 0, sizeof(lnum));
351: (void)memset(&rnum, 0, sizeof(rnum));
352:
353: if (revisions == NULL) {
354: TAILQ_FOREACH(rdp, &file->rf_delta, rd_list)
355: if (rcsnum_cmp(rdp->rd_num, file->rf_head, 0) == 0) {
356: rdp->rd_flags |= RCS_RD_SELECT;
357: return (1);
358: }
359: return (0);
360: }
361:
362: revargv = cvs_strsplit(revisions, ",");
363: for (i = 0; revargv->argv[i] != NULL; i++) {
364: revrange = cvs_strsplit(revargv->argv[i], ":");
365: if (revrange->argv[0] == NULL)
366: /* should not happen */
367: fatal("invalid revision range: %s", revargv->argv[i]);
1.37 xsa 368: else if (revrange->argv[1] == NULL)
1.36 ray 369: lstr = rstr = revrange->argv[0];
1.37 xsa 370: else {
1.36 ray 371: if (revrange->argv[2] != NULL)
1.39 niallo 372: fatal("invalid revision range: %s",
1.36 ray 373: revargv->argv[i]);
374: lstr = revrange->argv[0];
375: rstr = revrange->argv[1];
1.37 xsa 376: if (strcmp(lstr, "") == 0)
1.36 ray 377: lstr = NULL;
1.37 xsa 378: if (strcmp(rstr, "") == 0)
1.36 ray 379: rstr = NULL;
380: }
381:
382: if (lstr == NULL)
383: lstr = RCS_HEAD_INIT;
384: if (rcsnum_aton(lstr, &ep, &lnum) == 0 || (*ep != '\0'))
385: fatal("invalid revision: %s", lstr);
386:
387: if (rstr != NULL) {
388: if (rcsnum_aton(rstr, &ep, &rnum) == 0 || (*ep != '\0'))
389: fatal("invalid revision: %s", rstr);
390: } else
1.37 xsa 391: rcsnum_cpy(file->rf_head, &rnum, 0);
392:
1.36 ray 393: cvs_argv_destroy(revrange);
394:
395: TAILQ_FOREACH(rdp, &file->rf_delta, rd_list)
396: if ((rcsnum_cmp(rdp->rd_num, &lnum, 0) <= 0) &&
397: (rcsnum_cmp(rdp->rd_num, &rnum, 0) >= 0) &&
398: !(rdp->rd_flags & RCS_RD_SELECT)) {
399: rdp->rd_flags |= RCS_RD_SELECT;
400: nrev++;
401: }
402: }
1.39 niallo 403: cvs_argv_destroy(revargv);
1.36 ray 404:
405: if (lnum.rn_id != NULL)
406: xfree(lnum.rn_id);
407: if (rnum.rn_id != NULL)
408: xfree(rnum.rn_id);
409:
410: return (nrev);
1.1 joris 411: }