git.oblomov.eu Git - git/blob - dir.c

   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 #include "refs.h"
  11
  12 struct path_simplify {
  13         int len;
  14         const char *path;
  15 };
  16
  17 static int read_directory_recursive(struct dir_struct *dir,
  18         const char *path, const char *base, int baselen,
  19         int check_only, const struct path_simplify *simplify);
  20
  21 int common_prefix(const char **pathspec)
  22 {
  23         const char *path, *slash, *next;
  24         int prefix;
  25
  26         if (!pathspec)
  27                 return 0;
  28
  29         path = *pathspec;
  30         slash = strrchr(path, '/');
  31         if (!slash)
  32                 return 0;
  33
  34         prefix = slash - path + 1;
  35         while ((next = *++pathspec) != NULL) {
  36                 int len = strlen(next);
  37                 if (len >= prefix && !memcmp(path, next, prefix))
  38                         continue;
  39                 len = prefix - 1;
  40                 for (;;) {
  41                         if (!len)
  42                                 return 0;
  43                         if (next[--len] != '/')
  44                                 continue;
  45                         if (memcmp(path, next, len+1))
  46                                 continue;
  47                         prefix = len + 1;
  48                         break;
  49                 }
  50         }
  51         return prefix;
  52 }
  53
  54 /*
  55  * Does 'match' matches the given name?
  56  * A match is found if
  57  *
  58  * (1) the 'match' string is leading directory of 'name', or
  59  * (2) the 'match' string is a wildcard and matches 'name', or
  60  * (3) the 'match' string is exactly the same as 'name'.
  61  *
  62  * and the return value tells which case it was.
  63  *
  64  * It returns 0 when there is no match.
  65  */
  66 static int match_one(const char *match, const char *name, int namelen)
  67 {
  68         int matchlen;
  69
  70         /* If the match was just the prefix, we matched */
  71         matchlen = strlen(match);
  72         if (!matchlen)
  73                 return MATCHED_RECURSIVELY;
  74
  75         /*
  76          * If we don't match the matchstring exactly,
  77          * we need to match by fnmatch
  78          */
  79         if (strncmp(match, name, matchlen))
  80                 return !fnmatch(match, name, 0) ? MATCHED_FNMATCH : 0;
  81
  82         if (!name[matchlen])
  83                 return MATCHED_EXACTLY;
  84         if (match[matchlen-1] == '/' || name[matchlen] == '/')
  85                 return MATCHED_RECURSIVELY;
  86         return 0;
  87 }
  88
  89 /*
  90  * Given a name and a list of pathspecs, see if the name matches
  91  * any of the pathspecs.  The caller is also interested in seeing
  92  * all pathspec matches some names it calls this function with
  93  * (otherwise the user could have mistyped the unmatched pathspec),
  94  * and a mark is left in seen[] array for pathspec element that
  95  * actually matched anything.
  96  */
  97 int match_pathspec(const char **pathspec, const char *name, int namelen, int prefix, char *seen)
  98 {
  99         int retval;
 100         const char *match;
 101
 102         name += prefix;
 103         namelen -= prefix;
 104
 105         for (retval = 0; (match = *pathspec++) != NULL; seen++) {
 106                 int how;
 107                 if (retval && *seen == MATCHED_EXACTLY)
 108                         continue;
 109                 match += prefix;
 110                 how = match_one(match, name, namelen);
 111                 if (how) {
 112                         if (retval < how)
 113                                 retval = how;
 114                         if (*seen < how)
 115                                 *seen = how;
 116                 }
 117         }
 118         return retval;
 119 }
 120
 121 static int no_wildcard(const char *string)
 122 {
 123         return string[strcspn(string, "*?[{")] == '\0';
 124 }
 125
 126 void add_exclude(const char *string, const char *base,
 127                  int baselen, struct exclude_list *which)
 128 {
 129         struct exclude *x = xmalloc(sizeof (*x));
 130
 131         x->to_exclude = 1;
 132         if (*string == '!') {
 133                 x->to_exclude = 0;
 134                 string++;
 135         }
 136         x->pattern = string;
 137         x->patternlen = strlen(string);
 138         x->base = base;
 139         x->baselen = baselen;
 140         x->flags = 0;
 141         if (!strchr(string, '/'))
 142                 x->flags |= EXC_FLAG_NODIR;
 143         if (no_wildcard(string))
 144                 x->flags |= EXC_FLAG_NOWILDCARD;
 145         if (*string == '*' && no_wildcard(string+1))
 146                 x->flags |= EXC_FLAG_ENDSWITH;
 147         if (which->nr == which->alloc) {
 148                 which->alloc = alloc_nr(which->alloc);
 149                 which->excludes = xrealloc(which->excludes,
 150                                            which->alloc * sizeof(x));
 151         }
 152         which->excludes[which->nr++] = x;
 153 }
 154
 155 static int add_excludes_from_file_1(const char *fname,
 156                                     const char *base,
 157                                     int baselen,
 158                                     struct exclude_list *which)
 159 {
 160         struct stat st;
 161         int fd, i;
 162         size_t size;
 163         char *buf, *entry;
 164
 165         fd = open(fname, O_RDONLY);
 166         if (fd < 0 || fstat(fd, &st) < 0)
 167                 goto err;
 168         size = xsize_t(st.st_size);
 169         if (size == 0) {
 170                 close(fd);
 171                 return 0;
 172         }
 173         buf = xmalloc(size+1);
 174         if (read_in_full(fd, buf, size) != size)
 175                 goto err;
 176         close(fd);
 177
 178         buf[size++] = '\n';
 179         entry = buf;
 180         for (i = 0; i < size; i++) {
 181                 if (buf[i] == '\n') {
 182                         if (entry != buf + i && entry[0] != '#') {
 183                                 buf[i - (i && buf[i-1] == '\r')] = 0;
 184                                 add_exclude(entry, base, baselen, which);
 185                         }
 186                         entry = buf + i + 1;
 187                 }
 188         }
 189         return 0;
 190
 191  err:
 192         if (0 <= fd)
 193                 close(fd);
 194         return -1;
 195 }
 196
 197 void add_excludes_from_file(struct dir_struct *dir, const char *fname)
 198 {
 199         if (add_excludes_from_file_1(fname, "", 0,
 200                                      &dir->exclude_list[EXC_FILE]) < 0)
 201                 die("cannot use %s as an exclude file", fname);
 202 }
 203
 204 int push_exclude_per_directory(struct dir_struct *dir, const char *base, int baselen)
 205 {
 206         char exclude_file[PATH_MAX];
 207         struct exclude_list *el = &dir->exclude_list[EXC_DIRS];
 208         int current_nr = el->nr;
 209
 210         if (dir->exclude_per_dir) {
 211                 memcpy(exclude_file, base, baselen);
 212                 strcpy(exclude_file + baselen, dir->exclude_per_dir);
 213                 add_excludes_from_file_1(exclude_file, base, baselen, el);
 214         }
 215         return current_nr;
 216 }
 217
 218 void pop_exclude_per_directory(struct dir_struct *dir, int stk)
 219 {
 220         struct exclude_list *el = &dir->exclude_list[EXC_DIRS];
 221
 222         while (stk < el->nr)
 223                 free(el->excludes[--el->nr]);
 224 }
 225
 226 /* Scan the list and let the last match determines the fate.
 227  * Return 1 for exclude, 0 for include and -1 for undecided.
 228  */
 229 static int excluded_1(const char *pathname,
 230                       int pathlen, const char *basename,
 231                       struct exclude_list *el)
 232 {
 233         int i;
 234
 235         if (el->nr) {
 236                 for (i = el->nr - 1; 0 <= i; i--) {
 237                         struct exclude *x = el->excludes[i];
 238                         const char *exclude = x->pattern;
 239                         int to_exclude = x->to_exclude;
 240
 241                         if (x->flags & EXC_FLAG_NODIR) {
 242                                 /* match basename */
 243                                 if (x->flags & EXC_FLAG_NOWILDCARD) {
 244                                         if (!strcmp(exclude, basename))
 245                                                 return to_exclude;
 246                                 } else if (x->flags & EXC_FLAG_ENDSWITH) {
 247                                         if (x->patternlen - 1 <= pathlen &&
 248                                             !strcmp(exclude + 1, pathname + pathlen - x->patternlen + 1))
 249                                                 return to_exclude;
 250                                 } else {
 251                                         if (fnmatch(exclude, basename, 0) == 0)
 252                                                 return to_exclude;
 253                                 }
 254                         }
 255                         else {
 256                                 /* match with FNM_PATHNAME:
 257                                  * exclude has base (baselen long) implicitly
 258                                  * in front of it.
 259                                  */
 260                                 int baselen = x->baselen;
 261                                 if (*exclude == '/')
 262                                         exclude++;
 263
 264                                 if (pathlen < baselen ||
 265                                     (baselen && pathname[baselen-1] != '/') ||
 266                                     strncmp(pathname, x->base, baselen))
 267                                     continue;
 268
 269                                 if (x->flags & EXC_FLAG_NOWILDCARD) {
 270                                         if (!strcmp(exclude, pathname + baselen))
 271                                                 return to_exclude;
 272                                 } else {
 273                                         if (fnmatch(exclude, pathname+baselen,
 274                                                     FNM_PATHNAME) == 0)
 275                                             return to_exclude;
 276                                 }
 277                         }
 278                 }
 279         }
 280         return -1; /* undecided */
 281 }
 282
 283 int excluded(struct dir_struct *dir, const char *pathname)
 284 {
 285         int pathlen = strlen(pathname);
 286         int st;
 287         const char *basename = strrchr(pathname, '/');
 288         basename = (basename) ? basename+1 : pathname;
 289
 290         for (st = EXC_CMDL; st <= EXC_FILE; st++) {
 291                 switch (excluded_1(pathname, pathlen, basename, &dir->exclude_list[st])) {
 292                 case 0:
 293                         return 0;
 294                 case 1:
 295                         return 1;
 296                 }
 297         }
 298         return 0;
 299 }
 300
 301 static struct dir_entry *dir_entry_new(const char *pathname, int len)
 302 {
 303         struct dir_entry *ent;
 304
 305         ent = xmalloc(sizeof(*ent) + len + 1);
 306         ent->len = len;
 307         memcpy(ent->name, pathname, len);
 308         ent->name[len] = 0;
 309         return ent;
 310 }
 311
 312 struct dir_entry *dir_add_name(struct dir_struct *dir, const char *pathname, int len)
 313 {
 314         if (cache_name_pos(pathname, len) >= 0)
 315                 return NULL;
 316
 317         ALLOC_GROW(dir->entries, dir->nr+1, dir->alloc);
 318         return dir->entries[dir->nr++] = dir_entry_new(pathname, len);
 319 }
 320
 321 struct dir_entry *dir_add_ignored(struct dir_struct *dir, const char *pathname, int len)
 322 {
 323         if (cache_name_pos(pathname, len) >= 0)
 324                 return NULL;
 325
 326         ALLOC_GROW(dir->ignored, dir->ignored_nr+1, dir->ignored_alloc);
 327         return dir->ignored[dir->ignored_nr++] = dir_entry_new(pathname, len);
 328 }
 329
 330 enum exist_status {
 331         index_nonexistent = 0,
 332         index_directory,
 333         index_gitdir,
 334 };
 335
 336 /*
 337  * The index sorts alphabetically by entry name, which
 338  * means that a gitlink sorts as '\0' at the end, while
 339  * a directory (which is defined not as an entry, but as
 340  * the files it contains) will sort with the '/' at the
 341  * end.
 342  */
 343 static enum exist_status directory_exists_in_index(const char *dirname, int len)
 344 {
 345         int pos = cache_name_pos(dirname, len);
 346         if (pos < 0)
 347                 pos = -pos-1;
 348         while (pos < active_nr) {
 349                 struct cache_entry *ce = active_cache[pos++];
 350                 unsigned char endchar;
 351
 352                 if (strncmp(ce->name, dirname, len))
 353                         break;
 354                 endchar = ce->name[len];
 355                 if (endchar > '/')
 356                         break;
 357                 if (endchar == '/')
 358                         return index_directory;
 359                 if (!endchar && S_ISGITLINK(ntohl(ce->ce_mode)))
 360                         return index_gitdir;
 361         }
 362         return index_nonexistent;
 363 }
 364
 365 /*
 366  * When we find a directory when traversing the filesystem, we
 367  * have three distinct cases:
 368  *
 369  *  - ignore it
 370  *  - see it as a directory
 371  *  - recurse into it
 372  *
 373  * and which one we choose depends on a combination of existing
 374  * git index contents and the flags passed into the directory
 375  * traversal routine.
 376  *
 377  * Case 1: If we *already* have entries in the index under that
 378  * directory name, we always recurse into the directory to see
 379  * all the files.
 380  *
 381  * Case 2: If we *already* have that directory name as a gitlink,
 382  * we always continue to see it as a gitlink, regardless of whether
 383  * there is an actual git directory there or not (it might not
 384  * be checked out as a subproject!)
 385  *
 386  * Case 3: if we didn't have it in the index previously, we
 387  * have a few sub-cases:
 388  *
 389  *  (a) if "show_other_directories" is true, we show it as
 390  *      just a directory, unless "hide_empty_directories" is
 391  *      also true and the directory is empty, in which case
 392  *      we just ignore it entirely.
 393  *  (b) if it looks like a git directory, and we don't have
 394  *      'no_gitlinks' set we treat it as a gitlink, and show it
 395  *      as a directory.
 396  *  (c) otherwise, we recurse into it.
 397  */
 398 enum directory_treatment {
 399         show_directory,
 400         ignore_directory,
 401         recurse_into_directory,
 402 };
 403
 404 static enum directory_treatment treat_directory(struct dir_struct *dir,
 405         const char *dirname, int len,
 406         const struct path_simplify *simplify)
 407 {
 408         /* The "len-1" is to strip the final '/' */
 409         switch (directory_exists_in_index(dirname, len-1)) {
 410         case index_directory:
 411                 return recurse_into_directory;
 412
 413         case index_gitdir:
 414                 if (dir->show_other_directories)
 415                         return ignore_directory;
 416                 return show_directory;
 417
 418         case index_nonexistent:
 419                 if (dir->show_other_directories)
 420                         break;
 421                 if (!dir->no_gitlinks) {
 422                         unsigned char sha1[20];
 423                         if (resolve_gitlink_ref(dirname, "HEAD", sha1) == 0)
 424                                 return show_directory;
 425                 }
 426                 return recurse_into_directory;
 427         }
 428
 429         /* This is the "show_other_directories" case */
 430         if (!dir->hide_empty_directories)
 431                 return show_directory;
 432         if (!read_directory_recursive(dir, dirname, dirname, len, 1, simplify))
 433                 return ignore_directory;
 434         return show_directory;
 435 }
 436
 437 /*
 438  * This is an inexact early pruning of any recursive directory
 439  * reading - if the path cannot possibly be in the pathspec,
 440  * return true, and we'll skip it early.
 441  */
 442 static int simplify_away(const char *path, int pathlen, const struct path_simplify *simplify)
 443 {
 444         if (simplify) {
 445                 for (;;) {
 446                         const char *match = simplify->path;
 447                         int len = simplify->len;
 448
 449                         if (!match)
 450                                 break;
 451                         if (len > pathlen)
 452                                 len = pathlen;
 453                         if (!memcmp(path, match, len))
 454                                 return 0;
 455                         simplify++;
 456                 }
 457                 return 1;
 458         }
 459         return 0;
 460 }
 461
 462 static int in_pathspec(const char *path, int len, const struct path_simplify *simplify)
 463 {
 464         if (simplify) {
 465                 for (; simplify->path; simplify++) {
 466                         if (len == simplify->len
 467                             && !memcmp(path, simplify->path, len))
 468                                 return 1;
 469                 }
 470         }
 471         return 0;
 472 }
 473
 474 static int get_dtype(struct dirent *de, const char *path)
 475 {
 476         int dtype = DTYPE(de);
 477         struct stat st;
 478
 479         if (dtype != DT_UNKNOWN)
 480                 return dtype;
 481         if (lstat(path, &st))
 482                 return dtype;
 483         if (S_ISREG(st.st_mode))
 484                 return DT_REG;
 485         if (S_ISDIR(st.st_mode))
 486                 return DT_DIR;
 487         if (S_ISLNK(st.st_mode))
 488                 return DT_LNK;
 489         return dtype;
 490 }
 491
 492 /*
 493  * Read a directory tree. We currently ignore anything but
 494  * directories, regular files and symlinks. That's because git
 495  * doesn't handle them at all yet. Maybe that will change some
 496  * day.
 497  *
 498  * Also, we ignore the name ".git" (even if it is not a directory).
 499  * That likely will not change.
 500  */
 501 static int read_directory_recursive(struct dir_struct *dir, const char *path, const char *base, int baselen, int check_only, const struct path_simplify *simplify)
 502 {
 503         DIR *fdir = opendir(path);
 504         int contents = 0;
 505
 506         if (fdir) {
 507                 int exclude_stk;
 508                 struct dirent *de;
 509                 char fullname[PATH_MAX + 1];
 510                 memcpy(fullname, base, baselen);
 511
 512                 exclude_stk = push_exclude_per_directory(dir, base, baselen);
 513
 514                 while ((de = readdir(fdir)) != NULL) {
 515                         int len, dtype;
 516                         int exclude;
 517
 518                         if ((de->d_name[0] == '.') &&
 519                             (de->d_name[1] == 0 ||
 520                              !strcmp(de->d_name + 1, ".") ||
 521                              !strcmp(de->d_name + 1, "git")))
 522                                 continue;
 523                         len = strlen(de->d_name);
 524                         /* Ignore overly long pathnames! */
 525                         if (len + baselen + 8 > sizeof(fullname))
 526                                 continue;
 527                         memcpy(fullname + baselen, de->d_name, len+1);
 528                         if (simplify_away(fullname, baselen + len, simplify))
 529                                 continue;
 530
 531                         exclude = excluded(dir, fullname);
 532                         if (exclude && dir->collect_ignored
 533                             && in_pathspec(fullname, baselen + len, simplify))
 534                                 dir_add_ignored(dir, fullname, baselen + len);
 535
 536                         /*
 537                          * Excluded? If we don't explicitly want to show
 538                          * ignored files, ignore it
 539                          */
 540                         if (exclude && !dir->show_ignored)
 541                                 continue;
 542
 543                         dtype = get_dtype(de, fullname);
 544
 545                         /*
 546                          * Do we want to see just the ignored files?
 547                          * We still need to recurse into directories,
 548                          * even if we don't ignore them, since the
 549                          * directory may contain files that we do..
 550                          */
 551                         if (!exclude && dir->show_ignored) {
 552                                 if (dtype != DT_DIR)
 553                                         continue;
 554                         }
 555
 556                         switch (dtype) {
 557                         default:
 558                                 continue;
 559                         case DT_DIR:
 560                                 memcpy(fullname + baselen + len, "/", 2);
 561                                 len++;
 562                                 switch (treat_directory(dir, fullname, baselen + len, simplify)) {
 563                                 case show_directory:
 564                                         if (exclude != dir->show_ignored)
 565                                                 continue;
 566                                         break;
 567                                 case recurse_into_directory:
 568                                         contents += read_directory_recursive(dir,
 569                                                 fullname, fullname, baselen + len, 0, simplify);
 570                                         continue;
 571                                 case ignore_directory:
 572                                         continue;
 573                                 }
 574                                 break;
 575                         case DT_REG:
 576                         case DT_LNK:
 577                                 break;
 578                         }
 579                         contents++;
 580                         if (check_only)
 581                                 goto exit_early;
 582                         else
 583                                 dir_add_name(dir, fullname, baselen + len);
 584                 }
 585 exit_early:
 586                 closedir(fdir);
 587
 588                 pop_exclude_per_directory(dir, exclude_stk);
 589         }
 590
 591         return contents;
 592 }
 593
 594 static int cmp_name(const void *p1, const void *p2)
 595 {
 596         const struct dir_entry *e1 = *(const struct dir_entry **)p1;
 597         const struct dir_entry *e2 = *(const struct dir_entry **)p2;
 598
 599         return cache_name_compare(e1->name, e1->len,
 600                                   e2->name, e2->len);
 601 }
 602
 603 /*
 604  * Return the length of the "simple" part of a path match limiter.
 605  */
 606 static int simple_length(const char *match)
 607 {
 608         const char special[256] = {
 609                 [0] = 1, ['?'] = 1,
 610                 ['\\'] = 1, ['*'] = 1,
 611                 ['['] = 1
 612         };
 613         int len = -1;
 614
 615         for (;;) {
 616                 unsigned char c = *match++;
 617                 len++;
 618                 if (special[c])
 619                         return len;
 620         }
 621 }
 622
 623 static struct path_simplify *create_simplify(const char **pathspec)
 624 {
 625         int nr, alloc = 0;
 626         struct path_simplify *simplify = NULL;
 627
 628         if (!pathspec)
 629                 return NULL;
 630
 631         for (nr = 0 ; ; nr++) {
 632                 const char *match;
 633                 if (nr >= alloc) {
 634                         alloc = alloc_nr(alloc);
 635                         simplify = xrealloc(simplify, alloc * sizeof(*simplify));
 636                 }
 637                 match = *pathspec++;
 638                 if (!match)
 639                         break;
 640                 simplify[nr].path = match;
 641                 simplify[nr].len = simple_length(match);
 642         }
 643         simplify[nr].path = NULL;
 644         simplify[nr].len = 0;
 645         return simplify;
 646 }
 647
 648 static void free_simplify(struct path_simplify *simplify)
 649 {
 650         if (simplify)
 651                 free(simplify);
 652 }
 653
 654 int read_directory(struct dir_struct *dir, const char *path, const char *base, int baselen, const char **pathspec)
 655 {
 656         struct path_simplify *simplify = create_simplify(pathspec);
 657
 658         /*
 659          * Make sure to do the per-directory exclude for all the
 660          * directories leading up to our base.
 661          */
 662         if (baselen) {
 663                 if (dir->exclude_per_dir) {
 664                         char *p, *pp = xmalloc(baselen+1);
 665                         memcpy(pp, base, baselen+1);
 666                         p = pp;
 667                         while (1) {
 668                                 char save = *p;
 669                                 *p = 0;
 670                                 push_exclude_per_directory(dir, pp, p-pp);
 671                                 *p++ = save;
 672                                 if (!save)
 673                                         break;
 674                                 p = strchr(p, '/');
 675                                 if (p)
 676                                         p++;
 677                                 else
 678                                         p = pp + baselen;
 679                         }
 680                         free(pp);
 681                 }
 682         }
 683
 684         read_directory_recursive(dir, path, base, baselen, 0, simplify);
 685         free_simplify(simplify);
 686         qsort(dir->entries, dir->nr, sizeof(struct dir_entry *), cmp_name);
 687         qsort(dir->ignored, dir->ignored_nr, sizeof(struct dir_entry *), cmp_name);
 688         return dir->nr;
 689 }
 690
 691 int
 692 file_exists(const char *f)
 693 {
 694   struct stat sb;
 695   return stat(f, &sb) == 0;
 696 }
 697
 698 /*
 699  * get_relative_cwd() gets the prefix of the current working directory
 700  * relative to 'dir'.  If we are not inside 'dir', it returns NULL.
 701  *
 702  * As a convenience, it also returns NULL if 'dir' is already NULL.  The
 703  * reason for this behaviour is that it is natural for functions returning
 704  * directory names to return NULL to say "this directory does not exist"
 705  * or "this directory is invalid".  These cases are usually handled the
 706  * same as if the cwd is not inside 'dir' at all, so get_relative_cwd()
 707  * returns NULL for both of them.
 708  *
 709  * Most notably, get_relative_cwd(buffer, size, get_git_work_tree())
 710  * unifies the handling of "outside work tree" with "no work tree at all".
 711  */
 712 char *get_relative_cwd(char *buffer, int size, const char *dir)
 713 {
 714         char *cwd = buffer;
 715
 716         if (!dir)
 717                 return NULL;
 718         if (!getcwd(buffer, size))
 719                 die("can't find the current directory: %s", strerror(errno));
 720
 721         if (!is_absolute_path(dir))
 722                 dir = make_absolute_path(dir);
 723
 724         while (*dir && *dir == *cwd) {
 725                 dir++;
 726                 cwd++;
 727         }
 728         if (*dir)
 729                 return NULL;
 730         if (*cwd == '/')
 731                 return cwd + 1;
 732         return cwd;
 733 }
 734
 735 int is_inside_dir(const char *dir)
 736 {
 737         char buffer[PATH_MAX];
 738         return get_relative_cwd(buffer, sizeof(buffer), dir) != NULL;
 739 }
 740
 741 int remove_dir_recursively(struct strbuf *path, int only_empty)
 742 {
 743         DIR *dir = opendir(path->buf);
 744         struct dirent *e;
 745         int ret = 0, original_len = path->len, len;
 746
 747         if (!dir)
 748                 return -1;
 749         if (path->buf[original_len - 1] != '/')
 750                 strbuf_addch(path, '/');
 751
 752         len = path->len;
 753         while ((e = readdir(dir)) != NULL) {
 754                 struct stat st;
 755                 if ((e->d_name[0] == '.') &&
 756                     ((e->d_name[1] == 0) ||
 757                      ((e->d_name[1] == '.') && e->d_name[2] == 0)))
 758                         continue; /* "." and ".." */
 759
 760                 strbuf_setlen(path, len);
 761                 strbuf_addstr(path, e->d_name);
 762                 if (lstat(path->buf, &st))
 763                         ; /* fall thru */
 764                 else if (S_ISDIR(st.st_mode)) {
 765                         if (!remove_dir_recursively(path, only_empty))
 766                                 continue; /* happy */
 767                 } else if (!only_empty && !unlink(path->buf))
 768                         continue; /* happy, too */
 769
 770                 /* path too long, stat fails, or non-directory still exists */
 771                 ret = -1;
 772                 break;
 773         }
 774         closedir(dir);
 775
 776         strbuf_setlen(path, original_len);
 777         if (!ret)
 778                 ret = rmdir(path->buf);
 779         return ret;
 780 }