Annotation of src/usr.bin/cvs/file.c, Revision 1.159
1.159 ! joris 1: /* $OpenBSD: file.c,v 1.158 2006/06/03 19:07:13 joris Exp $ */
1.1 jfb 2: /*
1.138 joris 3: * Copyright (c) 2006 Joris Vink <joris@openbsd.org>
1.1 jfb 4: * Copyright (c) 2004 Jean-Francois Brousseau <jfb@openbsd.org>
1.26 jfb 5: * All rights reserved.
1.1 jfb 6: *
1.26 jfb 7: * Redistribution and use in source and binary forms, with or without
8: * modification, are permitted provided that the following conditions
9: * are met:
1.1 jfb 10: *
1.26 jfb 11: * 1. Redistributions of source code must retain the above copyright
12: * notice, this list of conditions and the following disclaimer.
1.1 jfb 13: * 2. The name of the author may not be used to endorse or promote products
1.26 jfb 14: * derived from this software without specific prior written permission.
1.1 jfb 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
1.26 jfb 25: * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
1.1 jfb 26: */
27:
1.134 xsa 28: #include "includes.h"
1.1 jfb 29:
30: #include "cvs.h"
1.83 xsa 31: #include "file.h"
1.1 jfb 32: #include "log.h"
33:
1.104 xsa 34: #define CVS_IGN_STATIC 0x01 /* pattern is static, no need to glob */
1.1 jfb 35:
1.104 xsa 36: #define CVS_CHAR_ISMETA(c) ((c == '*') || (c == '?') || (c == '['))
1.1 jfb 37:
38: /*
39: * Standard patterns to ignore.
40: */
41: static const char *cvs_ign_std[] = {
42: ".",
43: "..",
44: "*.o",
1.45 xsa 45: "*.a",
1.1 jfb 46: "*.bak",
47: "*.orig",
48: "*.rej",
1.45 xsa 49: "*.old",
1.1 jfb 50: "*.exe",
51: "*.depend",
1.45 xsa 52: "*.obj",
53: "*.elc",
54: "*.ln",
55: "*.olb",
1.1 jfb 56: "CVS",
57: "core",
1.102 joris 58: "cvslog*",
1.49 jfb 59: "*.core",
1.8 jfb 60: ".#*",
1.45 xsa 61: "*~",
62: "_$*",
63: "*$",
1.1 jfb 64: };
65:
1.138 joris 66: struct ignore_head cvs_ign_pats;
67: struct ignore_head dir_ign_pats;
1.1 jfb 68:
1.138 joris 69: static int cvs_file_cmpname(const char *, const char *);
1.1 jfb 70:
1.138 joris 71: void
1.1 jfb 72: cvs_file_init(void)
73: {
1.61 xsa 74: int i, l;
1.138 joris 75: FILE *ifp;
1.1 jfb 76: size_t len;
1.138 joris 77: char *path, *buf;
78:
79: path = xmalloc(MAXPATHLEN);
80: buf = xmalloc(MAXNAMLEN);
1.1 jfb 81:
82: TAILQ_INIT(&cvs_ign_pats);
1.138 joris 83: TAILQ_INIT(&dir_ign_pats);
1.4 jfb 84:
1.1 jfb 85: /* standard patterns to ignore */
1.10 jfb 86: for (i = 0; i < (int)(sizeof(cvs_ign_std)/sizeof(char *)); i++)
1.138 joris 87: cvs_file_ignore(cvs_ign_std[i], &cvs_ign_pats);
1.1 jfb 88:
89: /* read the cvsignore file in the user's home directory, if any */
1.138 joris 90: l = snprintf(path, MAXPATHLEN, "%s/.cvsignore", cvs_homedir);
91: if (l == -1 || l >= MAXPATHLEN)
92: fatal("overflow in cvs_file_init");
1.61 xsa 93:
1.111 xsa 94: ifp = fopen(path, "r");
95: if (ifp == NULL) {
96: if (errno != ENOENT)
97: cvs_log(LP_ERRNO,
98: "failed to open user's cvsignore file `%s'", path);
99: } else {
1.138 joris 100: while (fgets(buf, MAXNAMLEN, ifp) != NULL) {
1.111 xsa 101: len = strlen(buf);
102: if (len == 0)
103: continue;
1.138 joris 104:
105: if (buf[len - 1] != '\n')
1.111 xsa 106: cvs_log(LP_ERR, "line too long in `%s'", path);
1.138 joris 107:
1.111 xsa 108: buf[--len] = '\0';
1.138 joris 109: cvs_file_ignore(buf, &cvs_ign_pats);
1.1 jfb 110: }
1.138 joris 111:
1.111 xsa 112: (void)fclose(ifp);
1.1 jfb 113: }
114:
1.138 joris 115: xfree(path);
116: xfree(buf);
1.1 jfb 117: }
118:
1.138 joris 119: void
120: cvs_file_ignore(const char *pat, struct ignore_head *list)
1.1 jfb 121: {
122: char *cp;
1.138 joris 123: size_t len;
1.1 jfb 124: struct cvs_ignpat *ip;
125:
1.136 ray 126: ip = xmalloc(sizeof(*ip));
1.138 joris 127: len = strlcpy(ip->ip_pat, pat, sizeof(ip->ip_pat));
128: if (len >= sizeof(ip->ip_pat))
129: fatal("cvs_file_ignore: truncation of pattern '%s'", pat);
1.1 jfb 130:
131: /* check if we will need globbing for that pattern */
132: ip->ip_flags = CVS_IGN_STATIC;
133: for (cp = ip->ip_pat; *cp != '\0'; cp++) {
134: if (CVS_CHAR_ISMETA(*cp)) {
135: ip->ip_flags &= ~CVS_IGN_STATIC;
136: break;
137: }
138: }
139:
1.138 joris 140: TAILQ_INSERT_TAIL(list, ip, ip_list);
1.1 jfb 141: }
142:
143: int
1.5 jfb 144: cvs_file_chkign(const char *file)
1.1 jfb 145: {
1.23 jfb 146: int flags;
1.1 jfb 147: struct cvs_ignpat *ip;
148:
1.23 jfb 149: flags = FNM_PERIOD;
150: if (cvs_nocase)
151: flags |= FNM_CASEFOLD;
152:
1.1 jfb 153: TAILQ_FOREACH(ip, &cvs_ign_pats, ip_list) {
154: if (ip->ip_flags & CVS_IGN_STATIC) {
1.23 jfb 155: if (cvs_file_cmpname(file, ip->ip_pat) == 0)
1.1 jfb 156: return (1);
1.38 deraadt 157: } else if (fnmatch(ip->ip_pat, file, flags) == 0)
1.1 jfb 158: return (1);
159: }
160:
1.138 joris 161: TAILQ_FOREACH(ip, &dir_ign_pats, ip_list) {
162: if (ip->ip_flags & CVS_IGN_STATIC) {
163: if (cvs_file_cmpname(file, ip->ip_pat) == 0)
164: return (1);
165: } else if (fnmatch(ip->ip_pat, file, flags) == 0)
166: return (1);
167: }
168:
1.1 jfb 169: return (0);
170: }
171:
1.138 joris 172: void
173: cvs_file_run(int argc, char **argv, struct cvs_recursion *cr)
1.1 jfb 174: {
1.138 joris 175: int i;
176: struct cvs_flisthead fl;
1.84 joris 177:
1.138 joris 178: TAILQ_INIT(&fl);
1.85 joris 179:
1.138 joris 180: for (i = 0; i < argc; i++)
181: cvs_file_get(argv[i], &fl);
1.1 jfb 182:
1.138 joris 183: cvs_file_walklist(&fl, cr);
184: cvs_file_freelist(&fl);
1.3 jfb 185: }
186:
1.138 joris 187: struct cvs_filelist *
188: cvs_file_get(const char *name, struct cvs_flisthead *fl)
189: {
190: const char *p;
191: struct cvs_filelist *l;
1.3 jfb 192:
1.138 joris 193: for (p = name; p[0] == '.' && p[1] == '/';)
194: p += 2;
1.35 jfb 195:
1.138 joris 196: TAILQ_FOREACH(l, fl, flist)
197: if (!strcmp(l->file_path, p))
198: return (l);
1.35 jfb 199:
1.138 joris 200: l = (struct cvs_filelist *)xmalloc(sizeof(*l));
201: l->file_path = xstrdup(p);
1.35 jfb 202:
1.138 joris 203: TAILQ_INSERT_TAIL(fl, l, flist);
204: return (l);
1.35 jfb 205: }
206:
1.138 joris 207: struct cvs_file *
208: cvs_file_get_cf(const char *d, const char *f, int fd, int type)
209: {
210: int l;
211: struct cvs_file *cf;
212: char *p, *rpath;
1.35 jfb 213:
1.138 joris 214: rpath = xmalloc(MAXPATHLEN);
1.3 jfb 215:
1.138 joris 216: l = snprintf(rpath, MAXPATHLEN, "%s/%s", d, f);
217: if (l == -1 || l >= MAXPATHLEN)
218: fatal("cvs_file_get_cf: overflow");
219:
220: for (p = rpath; p[0] == '.' && p[1] == '/';)
221: p += 2;
222:
223: cf = (struct cvs_file *)xmalloc(sizeof(*cf));
224: memset(cf, 0, sizeof(*cf));
225:
226: cf->file_name = xstrdup(f);
227: cf->file_wd = xstrdup(d);
228: cf->file_path = xstrdup(p);
229: cf->fd = fd;
230: cf->repo_fd = -1;
231: cf->file_type = type;
232: cf->file_status = cf->file_flags = 0;
233: cf->file_ent = NULL;
1.68 joris 234:
1.138 joris 235: xfree(rpath);
236: return (cf);
1.9 jfb 237: }
238:
1.138 joris 239: void
240: cvs_file_walklist(struct cvs_flisthead *fl, struct cvs_recursion *cr)
1.9 jfb 241: {
1.138 joris 242: int len, fd, type;
243: struct stat st;
244: struct cvs_file *cf;
245: struct cvs_filelist *l, *nxt;
246: char *d, *f, *repo, *fpath;
247:
248: fpath = xmalloc(MAXPATHLEN);
249: repo = xmalloc(MAXPATHLEN);
250:
251: for (l = TAILQ_FIRST(fl); l != NULL; l = nxt) {
252: if (cvs_quit)
253: fatal("received signal %d", sig_received);
254:
255: cvs_log(LP_TRACE, "cvs_file_walklist: element '%s'",
256: l->file_path);
257:
258: if ((f = basename(l->file_path)) == NULL)
259: fatal("cvs_file_walklist: basename failed");
260: if ((d = dirname(l->file_path)) == NULL)
261: fatal("cvs_file_walklist: dirname failed");
262:
1.146 joris 263: type = CVS_FILE;
1.138 joris 264: if ((fd = open(l->file_path, O_RDONLY)) != -1) {
265: if (fstat(fd, &st) == -1) {
266: cvs_log(LP_ERRNO, "%s", l->file_path);
267: (void)close(fd);
268: goto next;
269: }
1.26 jfb 270:
1.138 joris 271: if (S_ISDIR(st.st_mode))
272: type = CVS_DIR;
273: else if (S_ISREG(st.st_mode))
274: type = CVS_FILE;
275: else {
276: cvs_log(LP_ERR,
277: "ignoring bad file type for %s",
278: l->file_path);
279: (void)close(fd);
280: goto next;
281: }
282: } else {
283: if (stat(d, &st) == -1) {
284: cvs_log(LP_ERRNO, "%s", d);
285: goto next;
286: }
1.87 joris 287:
1.146 joris 288: cvs_get_repository_path(d, repo, MAXPATHLEN);
1.138 joris 289: len = snprintf(fpath, MAXPATHLEN, "%s/%s",
290: repo, f);
291: if (len == -1 || len >= MAXPATHLEN)
292: fatal("cvs_file_walklist: overflow");
293:
294: if ((fd = open(fpath, O_RDONLY)) == -1) {
295: strlcat(fpath, RCS_FILE_EXT, MAXPATHLEN);
296: fd = open(fpath, O_RDONLY);
297: }
1.26 jfb 298:
1.138 joris 299: if (fd != -1) {
300: if (fstat(fd, &st) == -1)
301: fatal("cvs_file_walklist: %s: %s",
302: fpath, strerror(errno));
303:
304: if (S_ISDIR(st.st_mode))
305: type = CVS_DIR;
306: else if (S_ISREG(st.st_mode))
307: type = CVS_FILE;
308: else {
309: cvs_log(LP_ERR,
310: "ignoring bad file type for %s",
311: l->file_path);
312: (void)close(fd);
313: goto next;
314: }
315:
316: /* this file is not in our working copy yet */
317: (void)close(fd);
318: fd = -1;
319: }
320: }
1.73 joris 321:
1.138 joris 322: cf = cvs_file_get_cf(d, f, fd, type);
323: if (cf->file_type == CVS_DIR) {
324: cvs_file_walkdir(cf, cr);
325: } else {
326: if (cr->local != NULL)
327: cr->local(cf);
1.128 joris 328: }
1.100 joris 329:
1.138 joris 330: cvs_file_free(cf);
1.123 joris 331:
1.138 joris 332: next:
333: nxt = TAILQ_NEXT(l, flist);
334: TAILQ_REMOVE(fl, l, flist);
1.68 joris 335:
1.138 joris 336: xfree(l->file_path);
337: xfree(l);
1.100 joris 338: }
339:
1.138 joris 340: xfree(fpath);
341: xfree(repo);
1.100 joris 342: }
343:
1.138 joris 344: void
345: cvs_file_walkdir(struct cvs_file *cf, struct cvs_recursion *cr)
1.100 joris 346: {
1.138 joris 347: int l;
348: FILE *fp;
349: int nbytes;
350: size_t len;
351: long base;
352: size_t bufsize;
353: struct stat st;
354: struct dirent *dp;
1.100 joris 355: struct cvs_ent *ent;
1.138 joris 356: struct cvs_ignpat *ip;
357: struct cvs_ent_line *line;
358: struct cvs_flisthead fl, dl;
359: CVSENTRIES *entlist;
360: char *buf, *ebuf, *cp, *repo, *fpath;
1.100 joris 361:
1.138 joris 362: cvs_log(LP_TRACE, "cvs_file_walkdir(%s)", cf->file_path);
1.100 joris 363:
1.138 joris 364: if (cr->enterdir != NULL)
365: cr->enterdir(cf);
1.100 joris 366:
1.138 joris 367: if (cr->local != NULL)
368: cr->local(cf);
1.100 joris 369:
1.146 joris 370: if (cf->file_status == FILE_SKIP)
371: return;
372:
1.138 joris 373: fpath = xmalloc(MAXPATHLEN);
1.100 joris 374:
375: /*
1.151 joris 376: * If we do not have a admin directory inside here, dont bother,
377: * unless we are running import.
1.100 joris 378: */
1.138 joris 379: l = snprintf(fpath, MAXPATHLEN, "%s/%s", cf->file_path,
380: CVS_PATH_CVSDIR);
381: if (l == -1 || l >= MAXPATHLEN)
382: fatal("cvs_file_walkdir: overflow");
1.100 joris 383:
1.146 joris 384: l = stat(fpath, &st);
1.151 joris 385: if (cvs_cmdop != CVS_OP_IMPORT &&
386: (l == -1 || (l == 0 && !S_ISDIR(st.st_mode)))) {
1.138 joris 387: xfree(fpath);
388: return;
1.100 joris 389: }
390:
391: /*
1.138 joris 392: * check for a local .cvsignore file
1.100 joris 393: */
1.138 joris 394: l = snprintf(fpath, MAXPATHLEN, "%s/.cvsignore", cf->file_path);
395: if (l == -1 || l >= MAXPATHLEN)
396: fatal("cvs_file_walkdir: overflow");
1.100 joris 397:
1.138 joris 398: if ((fp = fopen(fpath, "r")) != NULL) {
399: while (fgets(fpath, MAXPATHLEN, fp)) {
400: len = strlen(fpath);
401: if (fpath[len - 1] == '\n')
402: fpath[len - 1] = '\0';
1.26 jfb 403:
1.138 joris 404: cvs_file_ignore(fpath, &dir_ign_pats);
1.68 joris 405: }
1.26 jfb 406:
1.138 joris 407: (void)fclose(fp);
1.100 joris 408: }
409:
1.138 joris 410: if (fstat(cf->fd, &st) == -1)
411: fatal("cvs_file_walkdir: %s %s", cf->file_path,
412: strerror(errno));
1.100 joris 413:
1.138 joris 414: bufsize = st.st_size;
415: if (bufsize < st.st_blksize)
416: bufsize = st.st_blksize;
1.116 joris 417:
1.138 joris 418: buf = xmalloc(bufsize);
419: TAILQ_INIT(&fl);
420: TAILQ_INIT(&dl);
1.87 joris 421:
1.138 joris 422: while ((nbytes = getdirentries(cf->fd, buf, bufsize, &base)) > 0) {
423: ebuf = buf + nbytes;
424: cp = buf;
1.26 jfb 425:
1.138 joris 426: while (cp < ebuf) {
427: dp = (struct dirent *)cp;
428: if (!strcmp(dp->d_name, ".") ||
429: !strcmp(dp->d_name, "..") ||
430: !strcmp(dp->d_name, CVS_PATH_CVSDIR) ||
431: dp->d_reclen == 0) {
432: cp += dp->d_reclen;
433: continue;
434: }
1.13 jfb 435:
1.138 joris 436: if (cvs_file_chkign(dp->d_name)) {
437: cp += dp->d_reclen;
1.13 jfb 438: continue;
1.138 joris 439: }
1.13 jfb 440:
1.140 joris 441: if (!(cr->flags & CR_RECURSE_DIRS) &&
442: dp->d_type == DT_DIR) {
443: cp += dp->d_reclen;
444: continue;
445: }
446:
1.138 joris 447: l = snprintf(fpath, MAXPATHLEN, "%s/%s",
448: cf->file_path, dp->d_name);
449: if (l == -1 || l >= MAXPATHLEN)
450: fatal("cvs_file_walkdir: overflow");
1.13 jfb 451:
1.138 joris 452: /*
453: * Anticipate the file type to sort them,
454: * note that we do not determine the final
455: * type until we actually have the fd floating
456: * around.
457: */
458: if (dp->d_type == DT_DIR)
459: cvs_file_get(fpath, &dl);
460: else if (dp->d_type == DT_REG)
461: cvs_file_get(fpath, &fl);
1.13 jfb 462:
1.138 joris 463: cp += dp->d_reclen;
464: }
1.34 jfb 465: }
466:
1.138 joris 467: if (nbytes == -1)
468: fatal("cvs_file_walkdir: %s %s", cf->file_path,
469: strerror(errno));
1.22 jfb 470:
1.138 joris 471: xfree(buf);
1.22 jfb 472:
1.138 joris 473: while ((ip = TAILQ_FIRST(&dir_ign_pats)) != NULL) {
474: TAILQ_REMOVE(&dir_ign_pats, ip, ip_list);
475: xfree(ip);
1.91 joris 476: }
1.114 xsa 477:
1.138 joris 478: entlist = cvs_ent_open(cf->file_path);
479: TAILQ_FOREACH(line, &(entlist->cef_ent), entries_list) {
480: ent = cvs_ent_parse(line->buf);
1.61 xsa 481:
1.138 joris 482: l = snprintf(fpath, MAXPATHLEN, "%s/%s", cf->file_path,
483: ent->ce_name);
484: if (l == -1 || l >= MAXPATHLEN)
485: fatal("cvs_file_walkdir: overflow");
1.100 joris 486:
1.140 joris 487: if (!(cr->flags & CR_RECURSE_DIRS) &&
488: ent->ce_type == CVS_ENT_DIR)
489: continue;
490:
1.138 joris 491: if (ent->ce_type == CVS_ENT_DIR)
492: cvs_file_get(fpath, &dl);
493: else if (ent->ce_type == CVS_ENT_FILE)
494: cvs_file_get(fpath, &fl);
1.68 joris 495:
1.138 joris 496: cvs_ent_free(ent);
1.128 joris 497: }
498:
1.138 joris 499: cvs_ent_close(entlist, ENT_NOSYNC);
1.91 joris 500:
1.140 joris 501: if (cr->flags & CR_REPO) {
502: repo = xmalloc(MAXPATHLEN);
1.146 joris 503: cvs_get_repository_path(cf->file_path, repo, MAXPATHLEN);
1.140 joris 504: cvs_repository_lock(repo);
1.68 joris 505:
1.140 joris 506: cvs_repository_getdir(repo, cf->file_path, &fl, &dl,
507: (cr->flags & CR_RECURSE_DIRS));
508: }
1.68 joris 509:
1.138 joris 510: cvs_file_walklist(&fl, cr);
511: cvs_file_freelist(&fl);
1.68 joris 512:
1.140 joris 513: if (cr->flags & CR_REPO) {
514: cvs_repository_unlock(repo);
515: xfree(repo);
516: }
1.68 joris 517:
1.138 joris 518: cvs_file_walklist(&dl, cr);
519: cvs_file_freelist(&dl);
1.34 jfb 520:
1.138 joris 521: xfree(fpath);
1.26 jfb 522:
1.138 joris 523: if (cr->leavedir != NULL)
524: cr->leavedir(cf);
1.3 jfb 525: }
526:
527: void
1.138 joris 528: cvs_file_freelist(struct cvs_flisthead *fl)
1.3 jfb 529: {
1.138 joris 530: struct cvs_filelist *f;
1.62 jfb 531:
1.138 joris 532: while ((f = TAILQ_FIRST(fl)) != NULL) {
533: TAILQ_REMOVE(fl, f, flist);
534: xfree(f->file_path);
535: xfree(f);
1.62 jfb 536: }
1.5 jfb 537: }
538:
1.138 joris 539: void
1.153 joris 540: cvs_file_classify(struct cvs_file *cf, const char *tag, int loud)
1.3 jfb 541: {
1.138 joris 542: size_t len;
543: time_t mtime;
544: struct stat st;
1.149 joris 545: BUF *b1, *b2;
1.143 joris 546: int rflags, l, ismodified, rcsdead, verbose;
1.138 joris 547: CVSENTRIES *entlist = NULL;
548: const char *state;
549: char *repo, *rcsfile, r1[16], r2[16];
550:
551: cvs_log(LP_TRACE, "cvs_file_classify(%s)", cf->file_path);
552:
553: if (!strcmp(cf->file_path, ".")) {
554: cf->file_status = FILE_UPTODATE;
555: return;
556: }
557:
1.143 joris 558: verbose = (verbosity > 1 && loud == 1);
1.138 joris 559:
560: repo = xmalloc(MAXPATHLEN);
561: rcsfile = xmalloc(MAXPATHLEN);
562:
1.146 joris 563: cvs_get_repository_path(cf->file_wd, repo, MAXPATHLEN);
1.138 joris 564: l = snprintf(rcsfile, MAXPATHLEN, "%s/%s",
565: repo, cf->file_name);
566: if (l == -1 || l >= MAXPATHLEN)
567: fatal("cvs_file_classify: overflow");
568:
569: if (cf->file_type == CVS_FILE) {
570: len = strlcat(rcsfile, RCS_FILE_EXT, MAXPATHLEN);
571: if (len >= MAXPATHLEN)
572: fatal("cvs_file_classify: truncation");
573: }
574:
575: cf->file_rpath = xstrdup(rcsfile);
1.151 joris 576:
577: entlist = cvs_ent_open(cf->file_wd);
1.138 joris 578: cf->file_ent = cvs_ent_get(entlist, cf->file_name);
579:
1.144 joris 580: if (cf->file_ent != NULL) {
581: if (cf->file_ent->ce_type == CVS_ENT_DIR &&
582: cf->file_type != CVS_DIR)
1.148 pedro 583: fatal("%s is supposed to be a directory, but it is not",
1.144 joris 584: cf->file_path);
585: if (cf->file_ent->ce_type == CVS_ENT_FILE &&
586: cf->file_type != CVS_FILE)
1.148 pedro 587: fatal("%s is supposed to be a file, but it is not",
1.144 joris 588: cf->file_path);
589: }
590:
1.138 joris 591: if (cf->file_type == CVS_DIR) {
592: if (cf->fd == -1 && stat(rcsfile, &st) != -1)
593: cf->file_status = DIR_CREATE;
594: else if (cf->file_ent != NULL)
595: cf->file_status = FILE_UPTODATE;
1.144 joris 596: else
597: cf->file_status = FILE_UNKNOWN;
598:
1.138 joris 599: xfree(repo);
600: xfree(rcsfile);
601: cvs_ent_close(entlist, ENT_NOSYNC);
602: return;
603: }
604:
1.147 joris 605: rflags = RCS_READ;
606: switch (cvs_cmdop) {
607: case CVS_OP_COMMIT:
608: rflags = RCS_WRITE;
609: break;
1.156 joris 610: case CVS_OP_IMPORT:
1.147 joris 611: case CVS_OP_LOG:
612: rflags |= RCS_PARSE_FULLY;
613: break;
614: }
615:
1.138 joris 616: cf->repo_fd = open(cf->file_rpath, O_RDONLY);
617: if (cf->repo_fd != -1) {
618: cf->file_rcs = rcs_open(cf->file_rpath, cf->repo_fd, rflags);
619: if (cf->file_rcs == NULL)
1.152 joris 620: fatal("cvs_file_classify: failed to parse RCS");
621: cf->file_rcs->rf_inattic = 0;
1.155 joris 622: } else if (cvs_cmdop != CVS_OP_CHECKOUT) {
1.152 joris 623: l = snprintf(rcsfile, MAXPATHLEN, "%s/%s/%s%s",
624: repo, CVS_PATH_ATTIC, cf->file_name, RCS_FILE_EXT);
625: if (l == -1 || l >= MAXPATHLEN)
626: fatal("cvs_file_classify: overflow");
627:
1.155 joris 628: cf->repo_fd = open(rcsfile, O_RDONLY);
1.152 joris 629: if (cf->repo_fd != -1) {
1.155 joris 630: xfree(cf->file_rpath);
631: cf->file_rpath = xstrdup(rcsfile);
1.152 joris 632: cf->file_rcs = rcs_open(cf->file_rpath,
633: cf->repo_fd, rflags);
634: if (cf->file_rcs == NULL)
635: fatal("cvs_file_classify: failed to parse RCS");
636: cf->file_rcs->rf_inattic = 1;
637: } else {
638: cf->file_rcs = NULL;
639: }
1.154 joris 640: } else
641: cf->file_rcs = NULL;
1.3 jfb 642:
1.153 joris 643: if (tag != NULL && cf->file_rcs != NULL)
644: cf->file_rcsrev = rcs_translate_tag(tag, cf->file_rcs);
1.158 joris 645: else if (cf->file_ent != NULL && cf->file_ent->ce_tag != NULL)
646: cf->file_rcsrev = cf->file_ent->ce_rev;
1.153 joris 647: else if (cf->file_rcs != NULL)
1.156 joris 648: cf->file_rcsrev = rcs_head_get(cf->file_rcs);
1.153 joris 649: else
650: cf->file_rcsrev = NULL;
651:
1.138 joris 652: if (cf->file_ent != NULL)
653: rcsnum_tostr(cf->file_ent->ce_rev, r1, sizeof(r1));
1.153 joris 654: if (cf->file_rcsrev != NULL)
655: rcsnum_tostr(cf->file_rcsrev, r2, sizeof(r2));
1.6 jfb 656:
1.138 joris 657: ismodified = rcsdead = 0;
658: if (cf->fd != -1 && cf->file_ent != NULL) {
659: if (fstat(cf->fd, &st) == -1)
660: fatal("cvs_file_classify: %s", strerror(errno));
1.6 jfb 661:
1.138 joris 662: mtime = cvs_hack_time(st.st_mtime, 1);
663: if (mtime == 0)
664: fatal("to gmt failed");
1.62 jfb 665:
1.138 joris 666: if (mtime != cf->file_ent->ce_mtime)
667: ismodified = 1;
1.149 joris 668: }
669:
670: if (ismodified == 1 && cf->fd != -1 && cf->file_rcs != NULL) {
1.153 joris 671: b1 = rcs_getrev(cf->file_rcs, cf->file_rcsrev);
1.149 joris 672: if (b1 == NULL)
673: fatal("failed to get HEAD revision for comparison");
674:
1.153 joris 675: b1 = rcs_kwexp_buf(b1, cf->file_rcs, cf->file_rcsrev);
1.149 joris 676:
1.159 ! joris 677: b2 = cvs_buf_load_fd(cf->fd, BUF_AUTOEXT);
1.149 joris 678: if (b2 == NULL)
679: fatal("failed to get file content for comparison");
680:
681: /* b1 and b2 get released in cvs_buf_differ */
682: if (cvs_buf_differ(b1, b2))
683: ismodified = 1;
684: else
685: ismodified = 0;
1.62 jfb 686: }
687:
1.138 joris 688: if (cf->file_rcs != NULL) {
1.153 joris 689: state = rcs_state_get(cf->file_rcs, cf->file_rcsrev);
1.138 joris 690: if (state == NULL)
691: fatal("failed to get state for HEAD for %s",
692: cf->file_path);
1.139 joris 693: if (!strcmp(state, RCS_STATE_DEAD))
1.138 joris 694: rcsdead = 1;
1.145 joris 695:
696: cf->file_rcs->rf_dead = rcsdead;
1.128 joris 697: }
698:
1.138 joris 699: /*
700: * 10 Sin
701: * 20 Goto hell
702: * (I welcome you if-else hell)
703: */
704: if (cf->file_ent == NULL) {
705: if (cf->file_rcs == NULL) {
706: if (cf->fd == -1) {
1.143 joris 707: if (verbose)
1.138 joris 708: cvs_log(LP_NOTICE,
709: "nothing known about '%s'",
710: cf->file_path);
711: } else {
1.143 joris 712: if (verbose)
1.138 joris 713: cvs_log(LP_NOTICE,
714: "use add to create an entry for %s",
715: cf->file_path);
716: }
1.130 joris 717:
1.138 joris 718: cf->file_status = FILE_UNKNOWN;
719: } else if (rcsdead == 1) {
720: if (cf->fd == -1) {
721: cf->file_status = FILE_UPTODATE;
722: } else {
1.143 joris 723: if (verbose)
724: cvs_log(LP_NOTICE,
725: "use add to create an entry for %s",
726: cf->file_path);
1.138 joris 727: cf->file_status = FILE_UNKNOWN;
1.44 jfb 728: }
1.138 joris 729: } else {
730: cf->file_status = FILE_CHECKOUT;
1.14 jfb 731: }
1.138 joris 732: } else if (cf->file_ent->ce_status == CVS_ENT_ADDED) {
733: if (cf->fd == -1) {
1.143 joris 734: if (verbose)
1.138 joris 735: cvs_log(LP_NOTICE,
1.157 david 736: "warning: new-born %s has disappeared",
1.138 joris 737: cf->file_path);
738: cf->file_status = FILE_REMOVE_ENTRY;
739: } else if (cf->file_rcs == NULL || rcsdead == 1) {
740: cf->file_status = FILE_ADDED;
741: } else {
1.143 joris 742: if (verbose)
1.138 joris 743: cvs_log(LP_NOTICE,
744: "conflict: %s already created by others",
745: cf->file_path);
746: cf->file_status = FILE_CONFLICT;
747: }
748: } else if (cf->file_ent->ce_status == CVS_ENT_REMOVED) {
749: if (cf->fd != -1) {
1.143 joris 750: if (verbose)
1.138 joris 751: cvs_log(LP_NOTICE,
752: "%s should be removed but is still there",
753: cf->file_path);
754: cf->file_status = FILE_REMOVED;
755: } else if (cf->file_rcs == NULL || rcsdead == 1) {
756: cf->file_status = FILE_REMOVE_ENTRY;
1.66 joris 757: } else {
1.138 joris 758: if (strcmp(r1, r2)) {
1.143 joris 759: if (verbose)
1.138 joris 760: cvs_log(LP_NOTICE,
761: "conflict: removed %s was modified"
762: " by a second party",
763: cf->file_path);
764: cf->file_status = FILE_CONFLICT;
765: } else {
766: cf->file_status = FILE_REMOVED;
767: }
1.66 joris 768: }
1.138 joris 769: } else if (cf->file_ent->ce_status == CVS_ENT_REG) {
770: if (cf->file_rcs == NULL || rcsdead == 1) {
771: if (cf->fd == -1) {
1.143 joris 772: if (verbose)
1.138 joris 773: cvs_log(LP_NOTICE,
774: "warning: %s's entry exists but"
775: " there is no longer a file"
776: " in the repository,"
777: " removing entry",
778: cf->file_path);
779: cf->file_status = FILE_REMOVE_ENTRY;
780: } else {
781: if (ismodified) {
1.143 joris 782: if (verbose)
1.138 joris 783: cvs_log(LP_NOTICE,
784: "conflict: %s is no longer "
785: "in the repository but is "
786: "locally modified",
787: cf->file_path);
788: cf->file_status = FILE_CONFLICT;
789: } else {
1.143 joris 790: if (verbose)
1.138 joris 791: cvs_log(LP_NOTICE,
792: "%s is no longer in the "
793: "repository",
794: cf->file_path);
1.128 joris 795:
1.138 joris 796: cf->file_status = FILE_UNLINK;
797: }
798: }
1.128 joris 799: } else {
1.138 joris 800: if (cf->fd == -1) {
1.143 joris 801: if (verbose)
1.138 joris 802: cvs_log(LP_NOTICE,
803: "warning: %s was lost",
804: cf->file_path);
805: cf->file_status = FILE_LOST;
806: } else {
807: if (ismodified == 1)
808: cf->file_status = FILE_MODIFIED;
809: else
810: cf->file_status = FILE_UPTODATE;
811:
812: if (strcmp(r1, r2)) {
813: if (cf->file_status == FILE_MODIFIED)
814: cf->file_status = FILE_MERGE;
815: else
816: cf->file_status = FILE_PATCH;
817: }
818: }
1.128 joris 819: }
820: }
821:
1.138 joris 822: xfree(repo);
823: xfree(rcsfile);
824: cvs_ent_close(entlist, ENT_NOSYNC);
825: }
1.14 jfb 826:
1.138 joris 827: void
828: cvs_file_free(struct cvs_file *cf)
829: {
830: xfree(cf->file_name);
831: xfree(cf->file_wd);
832: xfree(cf->file_path);
833:
834: if (cf->file_rpath != NULL)
835: xfree(cf->file_rpath);
836: if (cf->file_ent != NULL)
837: cvs_ent_free(cf->file_ent);
838: if (cf->file_rcs != NULL)
839: rcs_close(cf->file_rcs);
840: if (cf->fd != -1)
841: (void)close(cf->fd);
842: if (cf->repo_fd != -1)
843: (void)close(cf->repo_fd);
844: xfree(cf);
1.23 jfb 845: }
846:
847: static int
848: cvs_file_cmpname(const char *name1, const char *name2)
849: {
850: return (cvs_nocase == 0) ? (strcmp(name1, name2)) :
851: (strcasecmp(name1, name2));
1.14 jfb 852: }