| #include "cache.h" |
| #include "commit.h" |
| #include "diff.h" |
| #include "revision.h" |
| #include "builtin.h" |
| #include "reachable.h" |
| #include "parse-options.h" |
| #include "progress.h" |
| |
| static const char * const prune_usage[] = { |
| N_("git prune [-n] [-v] [--expire <time>] [--] [<head>...]"), |
| NULL |
| }; |
| static int show_only; |
| static int verbose; |
| static unsigned long expire; |
| static int show_progress = -1; |
| |
| static int prune_tmp_file(const char *fullpath) |
| { |
| struct stat st; |
| if (lstat(fullpath, &st)) |
| return error("Could not stat '%s'", fullpath); |
| if (st.st_mtime > expire) |
| return 0; |
| if (show_only || verbose) |
| printf("Removing stale temporary file %s\n", fullpath); |
| if (!show_only) |
| unlink_or_warn(fullpath); |
| return 0; |
| } |
| |
| static int prune_object(const struct object_id *oid, const char *fullpath, |
| void *data) |
| { |
| struct stat st; |
| |
| /* |
| * Do we know about this object? |
| * It must have been reachable |
| */ |
| if (lookup_object(oid->hash)) |
| return 0; |
| |
| if (lstat(fullpath, &st)) { |
| /* report errors, but do not stop pruning */ |
| error("Could not stat '%s'", fullpath); |
| return 0; |
| } |
| if (st.st_mtime > expire) |
| return 0; |
| if (show_only || verbose) { |
| enum object_type type = sha1_object_info(oid->hash, NULL); |
| printf("%s %s\n", oid_to_hex(oid), |
| (type > 0) ? typename(type) : "unknown"); |
| } |
| if (!show_only) |
| unlink_or_warn(fullpath); |
| return 0; |
| } |
| |
| static int prune_cruft(const char *basename, const char *path, void *data) |
| { |
| if (starts_with(basename, "tmp_obj_")) |
| prune_tmp_file(path); |
| else |
| fprintf(stderr, "bad sha1 file: %s\n", path); |
| return 0; |
| } |
| |
| static int prune_subdir(int nr, const char *path, void *data) |
| { |
| if (!show_only) |
| rmdir(path); |
| return 0; |
| } |
| |
| /* |
| * Write errors (particularly out of space) can result in |
| * failed temporary packs (and more rarely indexes and other |
| * files beginning with "tmp_") accumulating in the object |
| * and the pack directories. |
| */ |
| static void remove_temporary_files(const char *path) |
| { |
| DIR *dir; |
| struct dirent *de; |
| |
| dir = opendir(path); |
| if (!dir) { |
| fprintf(stderr, "Unable to open directory %s\n", path); |
| return; |
| } |
| while ((de = readdir(dir)) != NULL) |
| if (starts_with(de->d_name, "tmp_")) |
| prune_tmp_file(mkpath("%s/%s", path, de->d_name)); |
| closedir(dir); |
| } |
| |
| int cmd_prune(int argc, const char **argv, const char *prefix) |
| { |
| struct rev_info revs; |
| struct progress *progress = NULL; |
| const struct option options[] = { |
| OPT__DRY_RUN(&show_only, N_("do not remove, show only")), |
| OPT__VERBOSE(&verbose, N_("report pruned objects")), |
| OPT_BOOL(0, "progress", &show_progress, N_("show progress")), |
| OPT_EXPIRY_DATE(0, "expire", &expire, |
| N_("expire objects older than <time>")), |
| OPT_END() |
| }; |
| char *s; |
| |
| expire = ULONG_MAX; |
| save_commit_buffer = 0; |
| check_replace_refs = 0; |
| ref_paranoia = 1; |
| init_revisions(&revs, prefix); |
| |
| argc = parse_options(argc, argv, prefix, options, prune_usage, 0); |
| |
| if (repository_format_precious_objects) |
| die(_("cannot prune in a precious-objects repo")); |
| |
| while (argc--) { |
| unsigned char sha1[20]; |
| const char *name = *argv++; |
| |
| if (!get_sha1(name, sha1)) { |
| struct object *object = parse_object_or_die(sha1, name); |
| add_pending_object(&revs, object, ""); |
| } |
| else |
| die("unrecognized argument: %s", name); |
| } |
| |
| if (show_progress == -1) |
| show_progress = isatty(2); |
| if (show_progress) |
| progress = start_progress_delay(_("Checking connectivity"), 0, 0, 2); |
| |
| mark_reachable_objects(&revs, 1, expire, progress); |
| stop_progress(&progress); |
| for_each_loose_file_in_objdir(get_object_directory(), prune_object, |
| prune_cruft, prune_subdir, NULL); |
| |
| prune_packed_objects(show_only ? PRUNE_PACKED_DRY_RUN : 0); |
| remove_temporary_files(get_object_directory()); |
| s = mkpathdup("%s/pack", get_object_directory()); |
| remove_temporary_files(s); |
| free(s); |
| |
| if (is_repository_shallow()) |
| prune_shallow(show_only); |
| |
| return 0; |
| } |
