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

Annotation of src/usr.bin/cvs/file.c, Revision 1.166

1.166   ! xsa         1: /*     $OpenBSD: file.c,v 1.165 2007/01/06 17:09:08 xsa 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:
1.164     xsa        30: #include <sys/mman.h>
                     31:
1.1       jfb        32: #include "cvs.h"
1.83      xsa        33: #include "file.h"
1.1       jfb        34: #include "log.h"
                     35:
1.104     xsa        36: #define CVS_IGN_STATIC 0x01    /* pattern is static, no need to glob */
1.1       jfb        37:
1.104     xsa        38: #define CVS_CHAR_ISMETA(c)     ((c == '*') || (c == '?') || (c == '['))
1.1       jfb        39:
                     40: /*
                     41:  * Standard patterns to ignore.
                     42:  */
                     43: static const char *cvs_ign_std[] = {
                     44:        ".",
                     45:        "..",
                     46:        "*.o",
1.45      xsa        47:        "*.a",
1.1       jfb        48:        "*.bak",
                     49:        "*.orig",
                     50:        "*.rej",
1.45      xsa        51:        "*.old",
1.1       jfb        52:        "*.exe",
                     53:        "*.depend",
1.45      xsa        54:        "*.obj",
                     55:        "*.elc",
                     56:        "*.ln",
                     57:        "*.olb",
1.1       jfb        58:        "CVS",
                     59:        "core",
1.102     joris      60:        "cvslog*",
1.49      jfb        61:        "*.core",
1.8       jfb        62:        ".#*",
1.45      xsa        63:        "*~",
                     64:        "_$*",
                     65:        "*$",
1.1       jfb        66: };
                     67:
1.138     joris      68: struct ignore_head cvs_ign_pats;
                     69: struct ignore_head dir_ign_pats;
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.163     moritz    104:                        if (buf[len - 1] == '\n')
                    105:                                buf[len - 1] = '\0';
1.138     joris     106:
                    107:                        cvs_file_ignore(buf, &cvs_ign_pats);
1.1       jfb       108:                }
1.138     joris     109:
1.111     xsa       110:                (void)fclose(ifp);
1.1       jfb       111:        }
                    112:
1.138     joris     113:        xfree(path);
                    114:        xfree(buf);
1.1       jfb       115: }
                    116:
1.138     joris     117: void
                    118: cvs_file_ignore(const char *pat, struct ignore_head *list)
1.1       jfb       119: {
                    120:        char *cp;
1.138     joris     121:        size_t len;
1.1       jfb       122:        struct cvs_ignpat *ip;
                    123:
1.136     ray       124:        ip = xmalloc(sizeof(*ip));
1.138     joris     125:        len = strlcpy(ip->ip_pat, pat, sizeof(ip->ip_pat));
                    126:        if (len >= sizeof(ip->ip_pat))
                    127:                fatal("cvs_file_ignore: truncation of pattern '%s'", pat);
1.1       jfb       128:
                    129:        /* check if we will need globbing for that pattern */
                    130:        ip->ip_flags = CVS_IGN_STATIC;
                    131:        for (cp = ip->ip_pat; *cp != '\0'; cp++) {
                    132:                if (CVS_CHAR_ISMETA(*cp)) {
                    133:                        ip->ip_flags &= ~CVS_IGN_STATIC;
                    134:                        break;
                    135:                }
                    136:        }
                    137:
1.138     joris     138:        TAILQ_INSERT_TAIL(list, ip, ip_list);
1.1       jfb       139: }
                    140:
                    141: int
1.5       jfb       142: cvs_file_chkign(const char *file)
1.1       jfb       143: {
1.23      jfb       144:        int flags;
1.1       jfb       145:        struct cvs_ignpat *ip;
                    146:
1.23      jfb       147:        flags = FNM_PERIOD;
                    148:        if (cvs_nocase)
                    149:                flags |= FNM_CASEFOLD;
                    150:
1.1       jfb       151:        TAILQ_FOREACH(ip, &cvs_ign_pats, ip_list) {
                    152:                if (ip->ip_flags & CVS_IGN_STATIC) {
1.23      jfb       153:                        if (cvs_file_cmpname(file, ip->ip_pat) == 0)
1.1       jfb       154:                                return (1);
1.38      deraadt   155:                } else if (fnmatch(ip->ip_pat, file, flags) == 0)
1.1       jfb       156:                        return (1);
                    157:        }
                    158:
1.138     joris     159:        TAILQ_FOREACH(ip, &dir_ign_pats, ip_list) {
                    160:                if (ip->ip_flags & CVS_IGN_STATIC) {
                    161:                        if (cvs_file_cmpname(file, ip->ip_pat) == 0)
                    162:                                return (1);
                    163:                } else if (fnmatch(ip->ip_pat, file, flags) == 0)
                    164:                        return (1);
                    165:        }
                    166:
1.1       jfb       167:        return (0);
                    168: }
                    169:
1.138     joris     170: void
                    171: cvs_file_run(int argc, char **argv, struct cvs_recursion *cr)
1.1       jfb       172: {
1.138     joris     173:        int i;
                    174:        struct cvs_flisthead fl;
1.84      joris     175:
1.138     joris     176:        TAILQ_INIT(&fl);
1.85      joris     177:
1.138     joris     178:        for (i = 0; i < argc; i++)
                    179:                cvs_file_get(argv[i], &fl);
1.1       jfb       180:
1.138     joris     181:        cvs_file_walklist(&fl, cr);
                    182:        cvs_file_freelist(&fl);
1.3       jfb       183: }
                    184:
1.138     joris     185: struct cvs_filelist *
                    186: cvs_file_get(const char *name, struct cvs_flisthead *fl)
                    187: {
                    188:        const char *p;
                    189:        struct cvs_filelist *l;
1.3       jfb       190:
1.138     joris     191:        for (p = name; p[0] == '.' && p[1] == '/';)
                    192:                p += 2;
1.35      jfb       193:
1.138     joris     194:        TAILQ_FOREACH(l, fl, flist)
                    195:                if (!strcmp(l->file_path, p))
                    196:                        return (l);
1.35      jfb       197:
1.138     joris     198:        l = (struct cvs_filelist *)xmalloc(sizeof(*l));
                    199:        l->file_path = xstrdup(p);
1.35      jfb       200:
1.138     joris     201:        TAILQ_INSERT_TAIL(fl, l, flist);
                    202:        return (l);
1.35      jfb       203: }
                    204:
1.138     joris     205: struct cvs_file *
                    206: cvs_file_get_cf(const char *d, const char *f, int fd, int type)
                    207: {
                    208:        int l;
                    209:        struct cvs_file *cf;
                    210:        char *p, *rpath;
1.35      jfb       211:
1.138     joris     212:        rpath = xmalloc(MAXPATHLEN);
1.3       jfb       213:
1.138     joris     214:        l = snprintf(rpath, MAXPATHLEN, "%s/%s", d, f);
                    215:        if (l == -1 || l >= MAXPATHLEN)
                    216:                fatal("cvs_file_get_cf: overflow");
                    217:
                    218:        for (p = rpath; p[0] == '.' && p[1] == '/';)
                    219:                p += 2;
                    220:
                    221:        cf = (struct cvs_file *)xmalloc(sizeof(*cf));
                    222:        memset(cf, 0, sizeof(*cf));
                    223:
                    224:        cf->file_name = xstrdup(f);
                    225:        cf->file_wd = xstrdup(d);
                    226:        cf->file_path = xstrdup(p);
                    227:        cf->fd = fd;
                    228:        cf->repo_fd = -1;
                    229:        cf->file_type = type;
                    230:        cf->file_status = cf->file_flags = 0;
                    231:        cf->file_ent = NULL;
1.68      joris     232:
1.138     joris     233:        xfree(rpath);
                    234:        return (cf);
1.9       jfb       235: }
                    236:
1.138     joris     237: void
                    238: cvs_file_walklist(struct cvs_flisthead *fl, struct cvs_recursion *cr)
1.9       jfb       239: {
1.138     joris     240:        int len, fd, type;
                    241:        struct stat st;
                    242:        struct cvs_file *cf;
                    243:        struct cvs_filelist *l, *nxt;
                    244:        char *d, *f, *repo, *fpath;
                    245:
                    246:        fpath = xmalloc(MAXPATHLEN);
                    247:        repo = xmalloc(MAXPATHLEN);
                    248:
                    249:        for (l = TAILQ_FIRST(fl); l != NULL; l = nxt) {
                    250:                if (cvs_quit)
                    251:                        fatal("received signal %d", sig_received);
                    252:
                    253:                cvs_log(LP_TRACE, "cvs_file_walklist: element '%s'",
                    254:                    l->file_path);
                    255:
                    256:                if ((f = basename(l->file_path)) == NULL)
                    257:                        fatal("cvs_file_walklist: basename failed");
                    258:                if ((d = dirname(l->file_path)) == NULL)
                    259:                        fatal("cvs_file_walklist: dirname failed");
                    260:
1.146     joris     261:                type = CVS_FILE;
1.138     joris     262:                if ((fd = open(l->file_path, O_RDONLY)) != -1) {
                    263:                        if (fstat(fd, &st) == -1) {
                    264:                                cvs_log(LP_ERRNO, "%s", l->file_path);
                    265:                                (void)close(fd);
                    266:                                goto next;
                    267:                        }
1.26      jfb       268:
1.138     joris     269:                        if (S_ISDIR(st.st_mode))
                    270:                                type = CVS_DIR;
                    271:                        else if (S_ISREG(st.st_mode))
                    272:                                type = CVS_FILE;
                    273:                        else {
                    274:                                cvs_log(LP_ERR,
                    275:                                    "ignoring bad file type for %s",
                    276:                                    l->file_path);
                    277:                                (void)close(fd);
                    278:                                goto next;
                    279:                        }
1.162     joris     280:                } else if (current_cvsroot->cr_method == CVS_METHOD_LOCAL) {
1.138     joris     281:                        if (stat(d, &st) == -1) {
                    282:                                cvs_log(LP_ERRNO, "%s", d);
                    283:                                goto next;
                    284:                        }
1.87      joris     285:
1.146     joris     286:                        cvs_get_repository_path(d, repo, MAXPATHLEN);
1.138     joris     287:                        len = snprintf(fpath, MAXPATHLEN, "%s/%s",
                    288:                            repo, f);
                    289:                        if (len == -1 || len >= MAXPATHLEN)
                    290:                                fatal("cvs_file_walklist: overflow");
                    291:
                    292:                        if ((fd = open(fpath, O_RDONLY)) == -1) {
                    293:                                strlcat(fpath, RCS_FILE_EXT, MAXPATHLEN);
                    294:                                fd = open(fpath, O_RDONLY);
                    295:                        }
1.26      jfb       296:
1.138     joris     297:                        if (fd != -1) {
                    298:                                if (fstat(fd, &st) == -1)
                    299:                                        fatal("cvs_file_walklist: %s: %s",
                    300:                                             fpath, strerror(errno));
                    301:
                    302:                                if (S_ISDIR(st.st_mode))
                    303:                                        type = CVS_DIR;
                    304:                                else if (S_ISREG(st.st_mode))
                    305:                                        type = CVS_FILE;
                    306:                                else {
                    307:                                        cvs_log(LP_ERR,
                    308:                                            "ignoring bad file type for %s",
                    309:                                            l->file_path);
                    310:                                        (void)close(fd);
                    311:                                        goto next;
                    312:                                }
                    313:
                    314:                                /* this file is not in our working copy yet */
                    315:                                (void)close(fd);
                    316:                                fd = -1;
                    317:                        }
                    318:                }
1.73      joris     319:
1.138     joris     320:                cf = cvs_file_get_cf(d, f, fd, type);
                    321:                if (cf->file_type == CVS_DIR) {
                    322:                        cvs_file_walkdir(cf, cr);
                    323:                } else {
1.161     joris     324:                        if (cr->fileproc != NULL)
                    325:                                cr->fileproc(cf);
1.128     joris     326:                }
1.100     joris     327:
1.138     joris     328:                cvs_file_free(cf);
1.123     joris     329:
1.138     joris     330: next:
                    331:                nxt = TAILQ_NEXT(l, flist);
                    332:                TAILQ_REMOVE(fl, l, flist);
1.68      joris     333:
1.138     joris     334:                xfree(l->file_path);
                    335:                xfree(l);
1.100     joris     336:        }
                    337:
1.138     joris     338:        xfree(fpath);
                    339:        xfree(repo);
1.100     joris     340: }
                    341:
1.138     joris     342: void
                    343: cvs_file_walkdir(struct cvs_file *cf, struct cvs_recursion *cr)
1.100     joris     344: {
1.138     joris     345:        int l;
                    346:        FILE *fp;
                    347:        int nbytes;
                    348:        size_t len;
                    349:        long base;
                    350:        size_t bufsize;
                    351:        struct stat st;
                    352:        struct dirent *dp;
1.100     joris     353:        struct cvs_ent *ent;
1.138     joris     354:        struct cvs_ignpat *ip;
                    355:        struct cvs_ent_line *line;
                    356:        struct cvs_flisthead fl, dl;
                    357:        CVSENTRIES *entlist;
                    358:        char *buf, *ebuf, *cp, *repo, *fpath;
1.100     joris     359:
1.138     joris     360:        cvs_log(LP_TRACE, "cvs_file_walkdir(%s)", cf->file_path);
1.100     joris     361:
1.138     joris     362:        if (cr->enterdir != NULL)
                    363:                cr->enterdir(cf);
1.100     joris     364:
1.161     joris     365:        if (cr->fileproc != NULL)
                    366:                cr->fileproc(cf);
1.100     joris     367:
1.146     joris     368:        if (cf->file_status == FILE_SKIP)
                    369:                return;
                    370:
1.138     joris     371:        fpath = xmalloc(MAXPATHLEN);
1.100     joris     372:
                    373:        /*
1.151     joris     374:         * If we do not have a admin directory inside here, dont bother,
                    375:         * unless we are running import.
1.100     joris     376:         */
1.138     joris     377:        l = snprintf(fpath, MAXPATHLEN, "%s/%s", cf->file_path,
                    378:            CVS_PATH_CVSDIR);
                    379:        if (l == -1 || l >= MAXPATHLEN)
                    380:                fatal("cvs_file_walkdir: overflow");
1.100     joris     381:
1.146     joris     382:        l = stat(fpath, &st);
1.151     joris     383:        if (cvs_cmdop != CVS_OP_IMPORT &&
                    384:            (l == -1 || (l == 0 && !S_ISDIR(st.st_mode)))) {
1.138     joris     385:                xfree(fpath);
                    386:                return;
1.100     joris     387:        }
                    388:
                    389:        /*
1.138     joris     390:         * check for a local .cvsignore file
1.100     joris     391:         */
1.138     joris     392:        l = snprintf(fpath, MAXPATHLEN, "%s/.cvsignore", cf->file_path);
                    393:        if (l == -1 || l >= MAXPATHLEN)
                    394:                fatal("cvs_file_walkdir: overflow");
1.100     joris     395:
1.138     joris     396:        if ((fp = fopen(fpath, "r")) != NULL) {
1.163     moritz    397:                while (fgets(fpath, MAXPATHLEN, fp) != NULL) {
1.138     joris     398:                        len = strlen(fpath);
1.163     moritz    399:                        if (len == 0)
                    400:                                continue;
1.138     joris     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 != cf->file_ent->ce_mtime)
                    664:                        ismodified = 1;
1.149     joris     665:        }
                    666:
                    667:        if (ismodified == 1 && cf->fd != -1 && cf->file_rcs != NULL) {
1.153     joris     668:                b1 = rcs_getrev(cf->file_rcs, cf->file_rcsrev);
1.149     joris     669:                if (b1 == NULL)
                    670:                        fatal("failed to get HEAD revision for comparison");
                    671:
1.153     joris     672:                b1 = rcs_kwexp_buf(b1, cf->file_rcs, cf->file_rcsrev);
1.149     joris     673:
1.159     joris     674:                b2 = cvs_buf_load_fd(cf->fd, BUF_AUTOEXT);
1.149     joris     675:                if (b2 == NULL)
                    676:                        fatal("failed to get file content for comparison");
                    677:
                    678:                /* b1 and b2 get released in cvs_buf_differ */
                    679:                if (cvs_buf_differ(b1, b2))
                    680:                        ismodified = 1;
                    681:                else
                    682:                        ismodified = 0;
1.62      jfb       683:        }
                    684:
1.138     joris     685:        if (cf->file_rcs != NULL) {
1.153     joris     686:                state = rcs_state_get(cf->file_rcs, cf->file_rcsrev);
1.138     joris     687:                if (state == NULL)
                    688:                        fatal("failed to get state for HEAD for %s",
                    689:                            cf->file_path);
1.139     joris     690:                if (!strcmp(state, RCS_STATE_DEAD))
1.138     joris     691:                        rcsdead = 1;
1.145     joris     692:
                    693:                cf->file_rcs->rf_dead = rcsdead;
1.128     joris     694:        }
                    695:
1.138     joris     696:        /*
                    697:         * 10 Sin
                    698:         * 20 Goto hell
                    699:         * (I welcome you if-else hell)
                    700:         */
                    701:        if (cf->file_ent == NULL) {
                    702:                if (cf->file_rcs == NULL) {
                    703:                        if (cf->fd == -1) {
1.143     joris     704:                                if (verbose)
1.138     joris     705:                                        cvs_log(LP_NOTICE,
                    706:                                            "nothing known about '%s'",
                    707:                                            cf->file_path);
                    708:                        } else {
1.143     joris     709:                                if (verbose)
1.138     joris     710:                                        cvs_log(LP_NOTICE,
                    711:                                            "use add to create an entry for %s",
                    712:                                            cf->file_path);
                    713:                        }
1.130     joris     714:
1.138     joris     715:                        cf->file_status = FILE_UNKNOWN;
                    716:                } else if (rcsdead == 1) {
                    717:                        if (cf->fd == -1) {
                    718:                                cf->file_status = FILE_UPTODATE;
                    719:                        } else {
1.143     joris     720:                                if (verbose)
                    721:                                        cvs_log(LP_NOTICE,
                    722:                                            "use add to create an entry for %s",
                    723:                                            cf->file_path);
1.138     joris     724:                                cf->file_status = FILE_UNKNOWN;
1.44      jfb       725:                        }
1.138     joris     726:                } else {
                    727:                        cf->file_status = FILE_CHECKOUT;
1.14      jfb       728:                }
1.138     joris     729:        } else if (cf->file_ent->ce_status == CVS_ENT_ADDED) {
                    730:                if (cf->fd == -1) {
1.143     joris     731:                        if (verbose)
1.138     joris     732:                                cvs_log(LP_NOTICE,
1.157     david     733:                                    "warning: new-born %s has disappeared",
1.138     joris     734:                                    cf->file_path);
                    735:                        cf->file_status = FILE_REMOVE_ENTRY;
                    736:                } else if (cf->file_rcs == NULL || rcsdead == 1) {
                    737:                        cf->file_status = FILE_ADDED;
                    738:                } else {
1.143     joris     739:                        if (verbose)
1.138     joris     740:                                cvs_log(LP_NOTICE,
                    741:                                    "conflict: %s already created by others",
                    742:                                    cf->file_path);
                    743:                        cf->file_status = FILE_CONFLICT;
                    744:                }
                    745:        } else if (cf->file_ent->ce_status == CVS_ENT_REMOVED) {
                    746:                if (cf->fd != -1) {
1.143     joris     747:                        if (verbose)
1.138     joris     748:                                cvs_log(LP_NOTICE,
                    749:                                    "%s should be removed but is still there",
                    750:                                    cf->file_path);
                    751:                        cf->file_status = FILE_REMOVED;
                    752:                } else if (cf->file_rcs == NULL || rcsdead == 1) {
                    753:                        cf->file_status = FILE_REMOVE_ENTRY;
1.66      joris     754:                } else {
1.138     joris     755:                        if (strcmp(r1, r2)) {
1.143     joris     756:                                if (verbose)
1.138     joris     757:                                        cvs_log(LP_NOTICE,
                    758:                                            "conflict: removed %s was modified"
                    759:                                            " by a second party",
                    760:                                            cf->file_path);
                    761:                                cf->file_status = FILE_CONFLICT;
                    762:                        } else {
                    763:                                cf->file_status = FILE_REMOVED;
                    764:                        }
1.66      joris     765:                }
1.138     joris     766:        } else if (cf->file_ent->ce_status == CVS_ENT_REG) {
                    767:                if (cf->file_rcs == NULL || rcsdead == 1) {
                    768:                        if (cf->fd == -1) {
1.143     joris     769:                                if (verbose)
1.138     joris     770:                                        cvs_log(LP_NOTICE,
                    771:                                            "warning: %s's entry exists but"
                    772:                                            " there is no longer a file"
                    773:                                            " in the repository,"
                    774:                                            " removing entry",
                    775:                                             cf->file_path);
                    776:                                cf->file_status = FILE_REMOVE_ENTRY;
                    777:                        } else {
                    778:                                if (ismodified) {
1.143     joris     779:                                        if (verbose)
1.138     joris     780:                                                cvs_log(LP_NOTICE,
                    781:                                                    "conflict: %s is no longer "
                    782:                                                    "in the repository but is "
                    783:                                                    "locally modified",
                    784:                                                    cf->file_path);
                    785:                                        cf->file_status = FILE_CONFLICT;
                    786:                                } else {
1.143     joris     787:                                        if (verbose)
1.138     joris     788:                                                cvs_log(LP_NOTICE,
                    789:                                                    "%s is no longer in the "
                    790:                                                    "repository",
                    791:                                                    cf->file_path);
1.128     joris     792:
1.138     joris     793:                                        cf->file_status = FILE_UNLINK;
                    794:                                }
                    795:                        }
1.128     joris     796:                } else {
1.138     joris     797:                        if (cf->fd == -1) {
1.143     joris     798:                                if (verbose)
1.138     joris     799:                                        cvs_log(LP_NOTICE,
                    800:                                            "warning: %s was lost",
                    801:                                            cf->file_path);
                    802:                                cf->file_status = FILE_LOST;
                    803:                        } else {
                    804:                                if (ismodified == 1)
                    805:                                        cf->file_status = FILE_MODIFIED;
                    806:                                else
                    807:                                        cf->file_status = FILE_UPTODATE;
                    808:
                    809:                                if (strcmp(r1, r2)) {
                    810:                                        if (cf->file_status == FILE_MODIFIED)
                    811:                                                cf->file_status = FILE_MERGE;
                    812:                                        else
                    813:                                                cf->file_status = FILE_PATCH;
                    814:                                }
                    815:                        }
1.128     joris     816:                }
                    817:        }
                    818:
1.138     joris     819:        xfree(repo);
                    820:        xfree(rcsfile);
                    821:        cvs_ent_close(entlist, ENT_NOSYNC);
                    822: }
1.14      jfb       823:
1.138     joris     824: void
                    825: cvs_file_free(struct cvs_file *cf)
                    826: {
                    827:        xfree(cf->file_name);
                    828:        xfree(cf->file_wd);
                    829:        xfree(cf->file_path);
                    830:
                    831:        if (cf->file_rpath != NULL)
                    832:                xfree(cf->file_rpath);
                    833:        if (cf->file_ent != NULL)
                    834:                cvs_ent_free(cf->file_ent);
                    835:        if (cf->file_rcs != NULL)
                    836:                rcs_close(cf->file_rcs);
                    837:        if (cf->fd != -1)
                    838:                (void)close(cf->fd);
                    839:        if (cf->repo_fd != -1)
                    840:                (void)close(cf->repo_fd);
                    841:        xfree(cf);
1.23      jfb       842: }
                    843:
1.165     xsa       844: int
1.23      jfb       845: cvs_file_cmpname(const char *name1, const char *name2)
                    846: {
                    847:        return (cvs_nocase == 0) ? (strcmp(name1, name2)) :
                    848:            (strcasecmp(name1, name2));
1.164     xsa       849: }
                    850:
                    851: int
                    852: cvs_file_cmp(const char *file1, const char *file2)
                    853: {
                    854:        struct stat stb1, stb2;
                    855:        int fd1, fd2, ret;
                    856:
                    857:        ret = 0;
                    858:
                    859:        if ((fd1 = open(file1, O_RDONLY|O_NOFOLLOW, 0)) == -1)
                    860:                fatal("cvs_file_cmp: open: `%s': %s", file1, strerror(errno));
                    861:        if ((fd2 = open(file2, O_RDONLY|O_NOFOLLOW, 0)) == -1)
                    862:                fatal("cvs_file_cmp: open: `%s': %s", file2, strerror(errno));
                    863:
                    864:        if (fstat(fd1, &stb1) == -1)
                    865:                fatal("cvs_file_cmp: `%s': %s", file1, strerror(errno));
                    866:        if (fstat(fd2, &stb2) == -1)
                    867:                fatal("cvs_file_cmp: `%s': %s", file2, strerror(errno));
                    868:
                    869:        if (stb1.st_size != stb2.st_size ||
                    870:            (stb1.st_mode & S_IFMT) != (stb2.st_mode & S_IFMT)) {
                    871:                ret = 1;
                    872:                goto out;
                    873:        }
                    874:
                    875:        if (S_ISBLK(stb1.st_mode) || S_ISCHR(stb1.st_mode)) {
                    876:                if (stb1.st_rdev != stb2.st_rdev)
                    877:                        ret = 1;
                    878:                goto out;
                    879:        }
                    880:
                    881:        if (S_ISREG(stb1.st_mode)) {
                    882:                void *p1, *p2;
                    883:
                    884:                if (stb1.st_size > SIZE_MAX) {
                    885:                        ret = 1;
                    886:                        goto out;
                    887:                }
                    888:
                    889:                if ((p1 = mmap(NULL, stb1.st_size, PROT_READ,
                    890:                    MAP_FILE, fd1, (off_t)0)) == MAP_FAILED)
                    891:                        fatal("cvs_file_cmp: mmap failed");
                    892:
                    893:                if ((p2 = mmap(NULL, stb1.st_size, PROT_READ,
                    894:                    MAP_FILE, fd2, (off_t)0)) == MAP_FAILED)
                    895:                        fatal("cvs_file_cmp: mmap failed");
                    896:
                    897:                madvise(p1, stb1.st_size, MADV_SEQUENTIAL);
                    898:                madvise(p2, stb1.st_size, MADV_SEQUENTIAL);
                    899:
                    900:                ret = memcmp(p1, p2, stb1.st_size);
                    901:
                    902:                (void)munmap(p1, stb1.st_size);
                    903:                (void)munmap(p2, stb1.st_size);
                    904:        }
                    905:
                    906: out:
                    907:        (void)close(fd1);
                    908:        (void)close(fd2);
1.166   ! xsa       909:
        !           910:        return (ret);
        !           911: }
        !           912:
        !           913: int
        !           914: cvs_file_copy(const char *from, const char *to)
        !           915: {
        !           916:        struct stat st;
        !           917:        struct timeval tv[2];
        !           918:        time_t atime, mtime;
        !           919:        int src, dst, ret;
        !           920:
        !           921:        ret = 0;
        !           922:
        !           923:        cvs_log(LP_TRACE, "cvs_file_copy(%s,%s)", from, to);
        !           924:
        !           925:        if (cvs_noexec == 1)
        !           926:                return (0);
        !           927:
        !           928:        if ((src = open(from, O_RDONLY, 0)) == -1)
        !           929:                fatal("cvs_file_copy: open: `%s': %s", from, strerror(errno));
        !           930:
        !           931:        if (fstat(src, &st) == -1)
        !           932:                fatal("cvs_file_copy: `%s': %s", from, strerror(errno));
        !           933:
        !           934:        atime = st.st_atimespec.tv_sec;
        !           935:        mtime = st.st_mtimespec.tv_sec;
        !           936:
        !           937:        if (S_ISREG(st.st_mode)) {
        !           938:                size_t sz;
        !           939:                ssize_t nw;
        !           940:                char *p, *buf;
        !           941:                int saved_errno;
        !           942:
        !           943:                if (st.st_size > SIZE_MAX) {
        !           944:                        ret = -1;
        !           945:                        goto out;
        !           946:                }
        !           947:
        !           948:                if ((dst = open(to, O_CREAT|O_TRUNC|O_WRONLY,
        !           949:                    st.st_mode & (S_IRWXU|S_IRWXG|S_IRWXO))) == -1)
        !           950:                        fatal("cvs_file_copy: open `%s': %s",
        !           951:                            to, strerror(errno));
        !           952:
        !           953:                if ((p = mmap(NULL, st.st_size, PROT_READ,
        !           954:                    MAP_FILE, src, (off_t)0)) == MAP_FAILED) {
        !           955:                        saved_errno = errno;
        !           956:                        (void)unlink(to);
        !           957:                        fatal("cvs_file_copy: mmap: %s", strerror(saved_errno));
        !           958:                }
        !           959:
        !           960:                madvise(p, st.st_size, MADV_SEQUENTIAL);
        !           961:
        !           962:                sz = st.st_size;
        !           963:                buf = p;
        !           964:
        !           965:                while (sz > 0) {
        !           966:                        if ((nw = write(dst, p, sz)) == -1) {
        !           967:                                saved_errno = errno;
        !           968:                                (void)unlink(to);
        !           969:                                fatal("cvs_file_copy: `%s': %s",
        !           970:                                    from, strerror(saved_errno));
        !           971:                        }
        !           972:                        buf += nw;
        !           973:                        sz -= nw;
        !           974:                }
        !           975:
        !           976:                (void)munmap(p, st.st_size);
        !           977:
        !           978:                tv[0].tv_sec = atime;
        !           979:                tv[1].tv_sec = mtime;
        !           980:
        !           981:                if (futimes(dst, tv) == -1) {
        !           982:                        saved_errno = errno;
        !           983:                        (void)unlink(to);
        !           984:                        fatal("cvs_file_copy: futimes: %s",
        !           985:                            strerror(saved_errno));
        !           986:                }
        !           987:                (void)close(dst);
        !           988:        }
        !           989: out:
        !           990:        (void)close(src);
1.164     xsa       991:
                    992:        return (ret);
1.14      jfb       993: }