dir.con commit merge-recursive: separate out xdl_merge() interface. (3e5261a)
   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 "cache.h"
   9#include "dir.h"
  10
  11struct path_simplify {
  12        int len;
  13        const char *path;
  14};
  15
  16int common_prefix(const char **pathspec)
  17{
  18        const char *path, *slash, *next;
  19        int prefix;
  20
  21        if (!pathspec)
  22                return 0;
  23
  24        path = *pathspec;
  25        slash = strrchr(path, '/');
  26        if (!slash)
  27                return 0;
  28
  29        prefix = slash - path + 1;
  30        while ((next = *++pathspec) != NULL) {
  31                int len = strlen(next);
  32                if (len >= prefix && !memcmp(path, next, len))
  33                        continue;
  34                for (;;) {
  35                        if (!len)
  36                                return 0;
  37                        if (next[--len] != '/')
  38                                continue;
  39                        if (memcmp(path, next, len+1))
  40                                continue;
  41                        prefix = len + 1;
  42                        break;
  43                }
  44        }
  45        return prefix;
  46}
  47
  48/*
  49 * Does 'match' matches the given name?
  50 * A match is found if
  51 *
  52 * (1) the 'match' string is leading directory of 'name', or
  53 * (2) the 'match' string is a wildcard and matches 'name', or
  54 * (3) the 'match' string is exactly the same as 'name'.
  55 *
  56 * and the return value tells which case it was.
  57 *
  58 * It returns 0 when there is no match.
  59 */
  60static int match_one(const char *match, const char *name, int namelen)
  61{
  62        int matchlen;
  63
  64        /* If the match was just the prefix, we matched */
  65        matchlen = strlen(match);
  66        if (!matchlen)
  67                return MATCHED_RECURSIVELY;
  68
  69        /*
  70         * If we don't match the matchstring exactly,
  71         * we need to match by fnmatch
  72         */
  73        if (strncmp(match, name, matchlen))
  74                return !fnmatch(match, name, 0) ? MATCHED_FNMATCH : 0;
  75
  76        if (!name[matchlen])
  77                return MATCHED_EXACTLY;
  78        if (match[matchlen-1] == '/' || name[matchlen] == '/')
  79                return MATCHED_RECURSIVELY;
  80        return 0;
  81}
  82
  83/*
  84 * Given a name and a list of pathspecs, see if the name matches
  85 * any of the pathspecs.  The caller is also interested in seeing
  86 * all pathspec matches some names it calls this function with
  87 * (otherwise the user could have mistyped the unmatched pathspec),
  88 * and a mark is left in seen[] array for pathspec element that
  89 * actually matched anything.
  90 */
  91int match_pathspec(const char **pathspec, const char *name, int namelen, int prefix, char *seen)
  92{
  93        int retval;
  94        const char *match;
  95
  96        name += prefix;
  97        namelen -= prefix;
  98
  99        for (retval = 0; (match = *pathspec++) != NULL; seen++) {
 100                int how;
 101                if (retval && *seen == MATCHED_EXACTLY)
 102                        continue;
 103                match += prefix;
 104                how = match_one(match, name, namelen);
 105                if (how) {
 106                        if (retval < how)
 107                                retval = how;
 108                        if (*seen < how)
 109                                *seen = how;
 110                }
 111        }
 112        return retval;
 113}
 114
 115void add_exclude(const char *string, const char *base,
 116                 int baselen, struct exclude_list *which)
 117{
 118        struct exclude *x = xmalloc(sizeof (*x));
 119
 120        x->pattern = string;
 121        x->base = base;
 122        x->baselen = baselen;
 123        if (which->nr == which->alloc) {
 124                which->alloc = alloc_nr(which->alloc);
 125                which->excludes = xrealloc(which->excludes,
 126                                           which->alloc * sizeof(x));
 127        }
 128        which->excludes[which->nr++] = x;
 129}
 130
 131static int add_excludes_from_file_1(const char *fname,
 132                                    const char *base,
 133                                    int baselen,
 134                                    struct exclude_list *which)
 135{
 136        struct stat st;
 137        int fd, i;
 138        size_t size;
 139        char *buf, *entry;
 140
 141        fd = open(fname, O_RDONLY);
 142        if (fd < 0 || fstat(fd, &st) < 0)
 143                goto err;
 144        size = xsize_t(st.st_size);
 145        if (size == 0) {
 146                close(fd);
 147                return 0;
 148        }
 149        buf = xmalloc(size+1);
 150        if (read_in_full(fd, buf, size) != size)
 151                goto err;
 152        close(fd);
 153
 154        buf[size++] = '\n';
 155        entry = buf;
 156        for (i = 0; i < size; i++) {
 157                if (buf[i] == '\n') {
 158                        if (entry != buf + i && entry[0] != '#') {
 159                                buf[i - (i && buf[i-1] == '\r')] = 0;
 160                                add_exclude(entry, base, baselen, which);
 161                        }
 162                        entry = buf + i + 1;
 163                }
 164        }
 165        return 0;
 166
 167 err:
 168        if (0 <= fd)
 169                close(fd);
 170        return -1;
 171}
 172
 173void add_excludes_from_file(struct dir_struct *dir, const char *fname)
 174{
 175        if (add_excludes_from_file_1(fname, "", 0,
 176                                     &dir->exclude_list[EXC_FILE]) < 0)
 177                die("cannot use %s as an exclude file", fname);
 178}
 179
 180int push_exclude_per_directory(struct dir_struct *dir, const char *base, int baselen)
 181{
 182        char exclude_file[PATH_MAX];
 183        struct exclude_list *el = &dir->exclude_list[EXC_DIRS];
 184        int current_nr = el->nr;
 185
 186        if (dir->exclude_per_dir) {
 187                memcpy(exclude_file, base, baselen);
 188                strcpy(exclude_file + baselen, dir->exclude_per_dir);
 189                add_excludes_from_file_1(exclude_file, base, baselen, el);
 190        }
 191        return current_nr;
 192}
 193
 194void pop_exclude_per_directory(struct dir_struct *dir, int stk)
 195{
 196        struct exclude_list *el = &dir->exclude_list[EXC_DIRS];
 197
 198        while (stk < el->nr)
 199                free(el->excludes[--el->nr]);
 200}
 201
 202/* Scan the list and let the last match determines the fate.
 203 * Return 1 for exclude, 0 for include and -1 for undecided.
 204 */
 205static int excluded_1(const char *pathname,
 206                      int pathlen,
 207                      struct exclude_list *el)
 208{
 209        int i;
 210
 211        if (el->nr) {
 212                for (i = el->nr - 1; 0 <= i; i--) {
 213                        struct exclude *x = el->excludes[i];
 214                        const char *exclude = x->pattern;
 215                        int to_exclude = 1;
 216
 217                        if (*exclude == '!') {
 218                                to_exclude = 0;
 219                                exclude++;
 220                        }
 221
 222                        if (!strchr(exclude, '/')) {
 223                                /* match basename */
 224                                const char *basename = strrchr(pathname, '/');
 225                                basename = (basename) ? basename+1 : pathname;
 226                                if (fnmatch(exclude, basename, 0) == 0)
 227                                        return to_exclude;
 228                        }
 229                        else {
 230                                /* match with FNM_PATHNAME:
 231                                 * exclude has base (baselen long) implicitly
 232                                 * in front of it.
 233                                 */
 234                                int baselen = x->baselen;
 235                                if (*exclude == '/')
 236                                        exclude++;
 237
 238                                if (pathlen < baselen ||
 239                                    (baselen && pathname[baselen-1] != '/') ||
 240                                    strncmp(pathname, x->base, baselen))
 241                                    continue;
 242
 243                                if (fnmatch(exclude, pathname+baselen,
 244                                            FNM_PATHNAME) == 0)
 245                                        return to_exclude;
 246                        }
 247                }
 248        }
 249        return -1; /* undecided */
 250}
 251
 252int excluded(struct dir_struct *dir, const char *pathname)
 253{
 254        int pathlen = strlen(pathname);
 255        int st;
 256
 257        for (st = EXC_CMDL; st <= EXC_FILE; st++) {
 258                switch (excluded_1(pathname, pathlen, &dir->exclude_list[st])) {
 259                case 0:
 260                        return 0;
 261                case 1:
 262                        return 1;
 263                }
 264        }
 265        return 0;
 266}
 267
 268struct dir_entry *dir_add_name(struct dir_struct *dir, const char *pathname, int len)
 269{
 270        struct dir_entry *ent;
 271
 272        if (cache_name_pos(pathname, len) >= 0)
 273                return NULL;
 274
 275        if (dir->nr == dir->alloc) {
 276                int alloc = alloc_nr(dir->alloc);
 277                dir->alloc = alloc;
 278                dir->entries = xrealloc(dir->entries, alloc*sizeof(ent));
 279        }
 280        ent = xmalloc(sizeof(*ent) + len + 1);
 281        ent->ignored = ent->ignored_dir = 0;
 282        ent->len = len;
 283        memcpy(ent->name, pathname, len);
 284        ent->name[len] = 0;
 285        dir->entries[dir->nr++] = ent;
 286        return ent;
 287}
 288
 289static int dir_exists(const char *dirname, int len)
 290{
 291        int pos = cache_name_pos(dirname, len);
 292        if (pos >= 0)
 293                return 1;
 294        pos = -pos-1;
 295        if (pos >= active_nr) /* can't */
 296                return 0;
 297        return !strncmp(active_cache[pos]->name, dirname, len);
 298}
 299
 300/*
 301 * This is an inexact early pruning of any recursive directory
 302 * reading - if the path cannot possibly be in the pathspec,
 303 * return true, and we'll skip it early.
 304 */
 305static int simplify_away(const char *path, int pathlen, const struct path_simplify *simplify)
 306{
 307        if (simplify) {
 308                for (;;) {
 309                        const char *match = simplify->path;
 310                        int len = simplify->len;
 311
 312                        if (!match)
 313                                break;
 314                        if (len > pathlen)
 315                                len = pathlen;
 316                        if (!memcmp(path, match, len))
 317                                return 0;
 318                        simplify++;
 319                }
 320                return 1;
 321        }
 322        return 0;
 323}
 324
 325/*
 326 * Read a directory tree. We currently ignore anything but
 327 * directories, regular files and symlinks. That's because git
 328 * doesn't handle them at all yet. Maybe that will change some
 329 * day.
 330 *
 331 * Also, we ignore the name ".git" (even if it is not a directory).
 332 * That likely will not change.
 333 */
 334static int read_directory_recursive(struct dir_struct *dir, const char *path, const char *base, int baselen, int check_only, const struct path_simplify *simplify)
 335{
 336        DIR *fdir = opendir(path);
 337        int contents = 0;
 338
 339        if (fdir) {
 340                int exclude_stk;
 341                struct dirent *de;
 342                char fullname[PATH_MAX + 1];
 343                memcpy(fullname, base, baselen);
 344
 345                exclude_stk = push_exclude_per_directory(dir, base, baselen);
 346
 347                while ((de = readdir(fdir)) != NULL) {
 348                        int len;
 349
 350                        if ((de->d_name[0] == '.') &&
 351                            (de->d_name[1] == 0 ||
 352                             !strcmp(de->d_name + 1, ".") ||
 353                             !strcmp(de->d_name + 1, "git")))
 354                                continue;
 355                        len = strlen(de->d_name);
 356                        memcpy(fullname + baselen, de->d_name, len+1);
 357                        if (simplify_away(fullname, baselen + len, simplify))
 358                                continue;
 359                        if (excluded(dir, fullname) != dir->show_ignored) {
 360                                if (!dir->show_ignored || DTYPE(de) != DT_DIR) {
 361                                        continue;
 362                                }
 363                        }
 364
 365                        switch (DTYPE(de)) {
 366                        struct stat st;
 367                        default:
 368                                continue;
 369                        case DT_UNKNOWN:
 370                                if (lstat(fullname, &st))
 371                                        continue;
 372                                if (S_ISREG(st.st_mode) || S_ISLNK(st.st_mode))
 373                                        break;
 374                                if (!S_ISDIR(st.st_mode))
 375                                        continue;
 376                                /* fallthrough */
 377                        case DT_DIR:
 378                                memcpy(fullname + baselen + len, "/", 2);
 379                                len++;
 380                                if (dir->show_other_directories &&
 381                                    !dir_exists(fullname, baselen + len)) {
 382                                        if (dir->hide_empty_directories &&
 383                                            !read_directory_recursive(dir,
 384                                                    fullname, fullname,
 385                                                    baselen + len, 1, simplify))
 386                                                continue;
 387                                        break;
 388                                }
 389
 390                                contents += read_directory_recursive(dir,
 391                                        fullname, fullname, baselen + len, 0, simplify);
 392                                continue;
 393                        case DT_REG:
 394                        case DT_LNK:
 395                                break;
 396                        }
 397                        contents++;
 398                        if (check_only)
 399                                goto exit_early;
 400                        else
 401                                dir_add_name(dir, fullname, baselen + len);
 402                }
 403exit_early:
 404                closedir(fdir);
 405
 406                pop_exclude_per_directory(dir, exclude_stk);
 407        }
 408
 409        return contents;
 410}
 411
 412static int cmp_name(const void *p1, const void *p2)
 413{
 414        const struct dir_entry *e1 = *(const struct dir_entry **)p1;
 415        const struct dir_entry *e2 = *(const struct dir_entry **)p2;
 416
 417        return cache_name_compare(e1->name, e1->len,
 418                                  e2->name, e2->len);
 419}
 420
 421/*
 422 * Return the length of the "simple" part of a path match limiter.
 423 */
 424static int simple_length(const char *match)
 425{
 426        const char special[256] = {
 427                [0] = 1, ['?'] = 1,
 428                ['\\'] = 1, ['*'] = 1,
 429                ['['] = 1
 430        };
 431        int len = -1;
 432
 433        for (;;) {
 434                unsigned char c = *match++;
 435                len++;
 436                if (special[c])
 437                        return len;
 438        }
 439}
 440
 441static struct path_simplify *create_simplify(const char **pathspec)
 442{
 443        int nr, alloc = 0;
 444        struct path_simplify *simplify = NULL;
 445
 446        if (!pathspec)
 447                return NULL;
 448
 449        for (nr = 0 ; ; nr++) {
 450                const char *match;
 451                if (nr >= alloc) {
 452                        alloc = alloc_nr(alloc);
 453                        simplify = xrealloc(simplify, alloc * sizeof(*simplify));
 454                }
 455                match = *pathspec++;
 456                if (!match)
 457                        break;
 458                simplify[nr].path = match;
 459                simplify[nr].len = simple_length(match);
 460        }
 461        simplify[nr].path = NULL;
 462        simplify[nr].len = 0;
 463        return simplify;
 464}
 465
 466static void free_simplify(struct path_simplify *simplify)
 467{
 468        if (simplify)
 469                free(simplify);
 470}
 471
 472int read_directory(struct dir_struct *dir, const char *path, const char *base, int baselen, const char **pathspec)
 473{
 474        struct path_simplify *simplify = create_simplify(pathspec);
 475
 476        /*
 477         * Make sure to do the per-directory exclude for all the
 478         * directories leading up to our base.
 479         */
 480        if (baselen) {
 481                if (dir->exclude_per_dir) {
 482                        char *p, *pp = xmalloc(baselen+1);
 483                        memcpy(pp, base, baselen+1);
 484                        p = pp;
 485                        while (1) {
 486                                char save = *p;
 487                                *p = 0;
 488                                push_exclude_per_directory(dir, pp, p-pp);
 489                                *p++ = save;
 490                                if (!save)
 491                                        break;
 492                                p = strchr(p, '/');
 493                                if (p)
 494                                        p++;
 495                                else
 496                                        p = pp + baselen;
 497                        }
 498                        free(pp);
 499                }
 500        }
 501
 502        read_directory_recursive(dir, path, base, baselen, 0, simplify);
 503        free_simplify(simplify);
 504        qsort(dir->entries, dir->nr, sizeof(struct dir_entry *), cmp_name);
 505        return dir->nr;
 506}
 507
 508int
 509file_exists(const char *f)
 510{
 511  struct stat sb;
 512  return stat(f, &sb) == 0;
 513}