dir.con commit git-cvsexportcommit.perl: fix typo (e968751)
   1/*
   2 * This handles recursive filename detection with exclude
   3 * files, index knowledge etc..
   4 *
   5 * Copyright (C) Linus Torvalds, 2005-2006
   6 *               Junio Hamano, 2005-2006
   7 */
   8#include <dirent.h>
   9#include <fnmatch.h>
  10
  11#include "cache.h"
  12#include "dir.h"
  13
  14int common_prefix(const char **pathspec)
  15{
  16        const char *path, *slash, *next;
  17        int prefix;
  18
  19        if (!pathspec)
  20                return 0;
  21
  22        path = *pathspec;
  23        slash = strrchr(path, '/');
  24        if (!slash)
  25                return 0;
  26
  27        prefix = slash - path + 1;
  28        while ((next = *++pathspec) != NULL) {
  29                int len = strlen(next);
  30                if (len >= prefix && !memcmp(path, next, len))
  31                        continue;
  32                for (;;) {
  33                        if (!len)
  34                                return 0;
  35                        if (next[--len] != '/')
  36                                continue;
  37                        if (memcmp(path, next, len+1))
  38                                continue;
  39                        prefix = len + 1;
  40                        break;
  41                }
  42        }
  43        return prefix;
  44}
  45
  46static int match_one(const char *match, const char *name, int namelen)
  47{
  48        int matchlen;
  49
  50        /* If the match was just the prefix, we matched */
  51        matchlen = strlen(match);
  52        if (!matchlen)
  53                return 1;
  54
  55        /*
  56         * If we don't match the matchstring exactly,
  57         * we need to match by fnmatch
  58         */
  59        if (strncmp(match, name, matchlen))
  60                return !fnmatch(match, name, 0);
  61
  62        /*
  63         * If we did match the string exactly, we still
  64         * need to make sure that it happened on a path
  65         * component boundary (ie either the last character
  66         * of the match was '/', or the next character of
  67         * the name was '/' or the terminating NUL.
  68         */
  69        return  match[matchlen-1] == '/' ||
  70                name[matchlen] == '/' ||
  71                !name[matchlen];
  72}
  73
  74int match_pathspec(const char **pathspec, const char *name, int namelen, int prefix, char *seen)
  75{
  76        int retval;
  77        const char *match;
  78
  79        name += prefix;
  80        namelen -= prefix;
  81
  82        for (retval = 0; (match = *pathspec++) != NULL; seen++) {
  83                if (retval & *seen)
  84                        continue;
  85                match += prefix;
  86                if (match_one(match, name, namelen)) {
  87                        retval = 1;
  88                        *seen = 1;
  89                }
  90        }
  91        return retval;
  92}
  93
  94void add_exclude(const char *string, const char *base,
  95                 int baselen, struct exclude_list *which)
  96{
  97        struct exclude *x = xmalloc(sizeof (*x));
  98
  99        x->pattern = string;
 100        x->base = base;
 101        x->baselen = baselen;
 102        if (which->nr == which->alloc) {
 103                which->alloc = alloc_nr(which->alloc);
 104                which->excludes = realloc(which->excludes,
 105                                          which->alloc * sizeof(x));
 106        }
 107        which->excludes[which->nr++] = x;
 108}
 109
 110static int add_excludes_from_file_1(const char *fname,
 111                                    const char *base,
 112                                    int baselen,
 113                                    struct exclude_list *which)
 114{
 115        int fd, i;
 116        long size;
 117        char *buf, *entry;
 118
 119        fd = open(fname, O_RDONLY);
 120        if (fd < 0)
 121                goto err;
 122        size = lseek(fd, 0, SEEK_END);
 123        if (size < 0)
 124                goto err;
 125        lseek(fd, 0, SEEK_SET);
 126        if (size == 0) {
 127                close(fd);
 128                return 0;
 129        }
 130        buf = xmalloc(size+1);
 131        if (read(fd, buf, size) != size)
 132                goto err;
 133        close(fd);
 134
 135        buf[size++] = '\n';
 136        entry = buf;
 137        for (i = 0; i < size; i++) {
 138                if (buf[i] == '\n') {
 139                        if (entry != buf + i && entry[0] != '#') {
 140                                buf[i - (i && buf[i-1] == '\r')] = 0;
 141                                add_exclude(entry, base, baselen, which);
 142                        }
 143                        entry = buf + i + 1;
 144                }
 145        }
 146        return 0;
 147
 148 err:
 149        if (0 <= fd)
 150                close(fd);
 151        return -1;
 152}
 153
 154void add_excludes_from_file(struct dir_struct *dir, const char *fname)
 155{
 156        if (add_excludes_from_file_1(fname, "", 0,
 157                                     &dir->exclude_list[EXC_FILE]) < 0)
 158                die("cannot use %s as an exclude file", fname);
 159}
 160
 161static int push_exclude_per_directory(struct dir_struct *dir, const char *base, int baselen)
 162{
 163        char exclude_file[PATH_MAX];
 164        struct exclude_list *el = &dir->exclude_list[EXC_DIRS];
 165        int current_nr = el->nr;
 166
 167        if (dir->exclude_per_dir) {
 168                memcpy(exclude_file, base, baselen);
 169                strcpy(exclude_file + baselen, dir->exclude_per_dir);
 170                add_excludes_from_file_1(exclude_file, base, baselen, el);
 171        }
 172        return current_nr;
 173}
 174
 175static void pop_exclude_per_directory(struct dir_struct *dir, int stk)
 176{
 177        struct exclude_list *el = &dir->exclude_list[EXC_DIRS];
 178
 179        while (stk < el->nr)
 180                free(el->excludes[--el->nr]);
 181}
 182
 183/* Scan the list and let the last match determines the fate.
 184 * Return 1 for exclude, 0 for include and -1 for undecided.
 185 */
 186static int excluded_1(const char *pathname,
 187                      int pathlen,
 188                      struct exclude_list *el)
 189{
 190        int i;
 191
 192        if (el->nr) {
 193                for (i = el->nr - 1; 0 <= i; i--) {
 194                        struct exclude *x = el->excludes[i];
 195                        const char *exclude = x->pattern;
 196                        int to_exclude = 1;
 197
 198                        if (*exclude == '!') {
 199                                to_exclude = 0;
 200                                exclude++;
 201                        }
 202
 203                        if (!strchr(exclude, '/')) {
 204                                /* match basename */
 205                                const char *basename = strrchr(pathname, '/');
 206                                basename = (basename) ? basename+1 : pathname;
 207                                if (fnmatch(exclude, basename, 0) == 0)
 208                                        return to_exclude;
 209                        }
 210                        else {
 211                                /* match with FNM_PATHNAME:
 212                                 * exclude has base (baselen long) implicitly
 213                                 * in front of it.
 214                                 */
 215                                int baselen = x->baselen;
 216                                if (*exclude == '/')
 217                                        exclude++;
 218
 219                                if (pathlen < baselen ||
 220                                    (baselen && pathname[baselen-1] != '/') ||
 221                                    strncmp(pathname, x->base, baselen))
 222                                    continue;
 223
 224                                if (fnmatch(exclude, pathname+baselen,
 225                                            FNM_PATHNAME) == 0)
 226                                        return to_exclude;
 227                        }
 228                }
 229        }
 230        return -1; /* undecided */
 231}
 232
 233int excluded(struct dir_struct *dir, const char *pathname)
 234{
 235        int pathlen = strlen(pathname);
 236        int st;
 237
 238        for (st = EXC_CMDL; st <= EXC_FILE; st++) {
 239                switch (excluded_1(pathname, pathlen, &dir->exclude_list[st])) {
 240                case 0:
 241                        return 0;
 242                case 1:
 243                        return 1;
 244                }
 245        }
 246        return 0;
 247}
 248
 249static void add_name(struct dir_struct *dir, const char *pathname, int len)
 250{
 251        struct dir_entry *ent;
 252
 253        if (cache_name_pos(pathname, len) >= 0)
 254                return;
 255
 256        if (dir->nr == dir->alloc) {
 257                int alloc = alloc_nr(dir->alloc);
 258                dir->alloc = alloc;
 259                dir->entries = xrealloc(dir->entries, alloc*sizeof(ent));
 260        }
 261        ent = xmalloc(sizeof(*ent) + len + 1);
 262        ent->len = len;
 263        memcpy(ent->name, pathname, len);
 264        ent->name[len] = 0;
 265        dir->entries[dir->nr++] = ent;
 266}
 267
 268static int dir_exists(const char *dirname, int len)
 269{
 270        int pos = cache_name_pos(dirname, len);
 271        if (pos >= 0)
 272                return 1;
 273        pos = -pos-1;
 274        if (pos >= active_nr) /* can't */
 275                return 0;
 276        return !strncmp(active_cache[pos]->name, dirname, len);
 277}
 278
 279/*
 280 * Read a directory tree. We currently ignore anything but
 281 * directories, regular files and symlinks. That's because git
 282 * doesn't handle them at all yet. Maybe that will change some
 283 * day.
 284 *
 285 * Also, we ignore the name ".git" (even if it is not a directory).
 286 * That likely will not change.
 287 */
 288static int read_directory_recursive(struct dir_struct *dir, const char *path, const char *base, int baselen)
 289{
 290        DIR *fdir = opendir(path);
 291        int contents = 0;
 292
 293        if (fdir) {
 294                int exclude_stk;
 295                struct dirent *de;
 296                char fullname[MAXPATHLEN + 1];
 297                memcpy(fullname, base, baselen);
 298
 299                exclude_stk = push_exclude_per_directory(dir, base, baselen);
 300
 301                while ((de = readdir(fdir)) != NULL) {
 302                        int len;
 303
 304                        if ((de->d_name[0] == '.') &&
 305                            (de->d_name[1] == 0 ||
 306                             !strcmp(de->d_name + 1, ".") ||
 307                             !strcmp(de->d_name + 1, "git")))
 308                                continue;
 309                        len = strlen(de->d_name);
 310                        memcpy(fullname + baselen, de->d_name, len+1);
 311                        if (excluded(dir, fullname) != dir->show_ignored) {
 312                                if (!dir->show_ignored || DTYPE(de) != DT_DIR) {
 313                                        continue;
 314                                }
 315                        }
 316
 317                        switch (DTYPE(de)) {
 318                        struct stat st;
 319                        int subdir, rewind_base;
 320                        default:
 321                                continue;
 322                        case DT_UNKNOWN:
 323                                if (lstat(fullname, &st))
 324                                        continue;
 325                                if (S_ISREG(st.st_mode) || S_ISLNK(st.st_mode))
 326                                        break;
 327                                if (!S_ISDIR(st.st_mode))
 328                                        continue;
 329                                /* fallthrough */
 330                        case DT_DIR:
 331                                memcpy(fullname + baselen + len, "/", 2);
 332                                len++;
 333                                rewind_base = dir->nr;
 334                                subdir = read_directory_recursive(dir, fullname, fullname,
 335                                                        baselen + len);
 336                                if (dir->show_other_directories &&
 337                                    (subdir || !dir->hide_empty_directories) &&
 338                                    !dir_exists(fullname, baselen + len)) {
 339                                        // Rewind the read subdirectory
 340                                        while (dir->nr > rewind_base)
 341                                                free(dir->entries[--dir->nr]);
 342                                        break;
 343                                }
 344                                contents += subdir;
 345                                continue;
 346                        case DT_REG:
 347                        case DT_LNK:
 348                                break;
 349                        }
 350                        add_name(dir, fullname, baselen + len);
 351                        contents++;
 352                }
 353                closedir(fdir);
 354
 355                pop_exclude_per_directory(dir, exclude_stk);
 356        }
 357
 358        return contents;
 359}
 360
 361static int cmp_name(const void *p1, const void *p2)
 362{
 363        const struct dir_entry *e1 = *(const struct dir_entry **)p1;
 364        const struct dir_entry *e2 = *(const struct dir_entry **)p2;
 365
 366        return cache_name_compare(e1->name, e1->len,
 367                                  e2->name, e2->len);
 368}
 369
 370int read_directory(struct dir_struct *dir, const char *path, const char *base, int baselen)
 371{
 372        /*
 373         * Make sure to do the per-directory exclude for all the
 374         * directories leading up to our base.
 375         */
 376        if (baselen) {
 377                if (dir->exclude_per_dir) {
 378                        char *p, *pp = xmalloc(baselen+1);
 379                        memcpy(pp, base, baselen+1);
 380                        p = pp;
 381                        while (1) {
 382                                char save = *p;
 383                                *p = 0;
 384                                push_exclude_per_directory(dir, pp, p-pp);
 385                                *p++ = save;
 386                                if (!save)
 387                                        break;
 388                                p = strchr(p, '/');
 389                                if (p)
 390                                        p++;
 391                                else
 392                                        p = pp + baselen;
 393                        }
 394                        free(pp);
 395                }
 396        }
 397
 398        read_directory_recursive(dir, path, base, baselen);
 399        qsort(dir->entries, dir->nr, sizeof(struct dir_entry *), cmp_name);
 400        return dir->nr;
 401}