2006-07-06 19:16:22 +02:00
|
|
|
#include "cache.h"
|
|
|
|
|
#include "commit.h"
|
|
|
|
|
#include "diff.h"
|
|
|
|
|
#include "revision.h"
|
|
|
|
|
#include "builtin.h"
|
2007-01-06 11:16:17 +01:00
|
|
|
#include "reachable.h"
|
2008-03-23 21:50:29 +01:00
|
|
|
#include "parse-options.h"
|
2011-11-05 13:00:08 +01:00
|
|
|
#include "progress.h"
|
2009-01-10 13:07:50 +01:00
|
|
|
#include "dir.h"
|
2006-07-06 19:16:22 +02:00
|
|
|
|
2008-03-23 21:50:29 +01:00
|
|
|
static const char * const prune_usage[] = {
|
2012-08-20 14:32:32 +02:00
|
|
|
N_("git prune [-n] [-v] [--expire <time>] [--] [<head>...]"),
|
2008-03-23 21:50:29 +01:00
|
|
|
NULL
|
|
|
|
|
};
|
2006-08-15 19:23:48 +02:00
|
|
|
static int show_only;
|
2008-09-29 18:49:52 +02:00
|
|
|
static int verbose;
|
2007-11-29 21:59:55 +01:00
|
|
|
static unsigned long expire;
|
2011-11-08 06:34:08 +01:00
|
|
|
static int show_progress = -1;
|
2006-07-06 19:16:22 +02:00
|
|
|
|
2013-12-18 00:22:31 +01:00
|
|
|
static int prune_tmp_file(const char *fullpath)
|
2008-07-25 00:41:12 +02:00
|
|
|
{
|
2010-02-27 04:50:02 +01:00
|
|
|
struct stat st;
|
|
|
|
|
if (lstat(fullpath, &st))
|
|
|
|
|
return error("Could not stat '%s'", fullpath);
|
|
|
|
|
if (st.st_mtime > expire)
|
|
|
|
|
return 0;
|
2012-08-07 07:01:49 +02:00
|
|
|
if (show_only || verbose)
|
|
|
|
|
printf("Removing stale temporary file %s\n", fullpath);
|
2008-07-25 00:41:12 +02:00
|
|
|
if (!show_only)
|
2009-04-29 23:22:56 +02:00
|
|
|
unlink_or_warn(fullpath);
|
2008-07-25 00:41:12 +02:00
|
|
|
return 0;
|
|
|
|
|
}
|
|
|
|
|
|
2014-10-16 00:38:55 +02:00
|
|
|
static int prune_object(const unsigned char *sha1, const char *fullpath,
|
|
|
|
|
void *data)
|
2006-07-06 19:16:22 +02:00
|
|
|
{
|
2010-02-27 04:50:02 +01:00
|
|
|
struct stat st;
|
2014-10-16 00:38:55 +02:00
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
* Do we know about this object?
|
|
|
|
|
* It must have been reachable
|
|
|
|
|
*/
|
|
|
|
|
if (lookup_object(sha1))
|
|
|
|
|
return 0;
|
|
|
|
|
|
|
|
|
|
if (lstat(fullpath, &st)) {
|
|
|
|
|
/* report errors, but do not stop pruning */
|
|
|
|
|
error("Could not stat '%s'", fullpath);
|
|
|
|
|
return 0;
|
|
|
|
|
}
|
2010-02-27 04:50:02 +01:00
|
|
|
if (st.st_mtime > expire)
|
|
|
|
|
return 0;
|
2008-09-29 18:49:52 +02:00
|
|
|
if (show_only || verbose) {
|
2007-02-26 20:55:59 +01:00
|
|
|
enum object_type type = sha1_object_info(sha1, NULL);
|
|
|
|
|
printf("%s %s\n", sha1_to_hex(sha1),
|
|
|
|
|
(type > 0) ? typename(type) : "unknown");
|
2008-09-29 18:49:52 +02:00
|
|
|
}
|
|
|
|
|
if (!show_only)
|
2009-04-29 23:22:56 +02:00
|
|
|
unlink_or_warn(fullpath);
|
2006-07-06 19:16:22 +02:00
|
|
|
return 0;
|
|
|
|
|
}
|
|
|
|
|
|
2014-10-16 00:38:55 +02:00
|
|
|
static int prune_cruft(const char *basename, const char *path, void *data)
|
2006-07-06 19:16:22 +02:00
|
|
|
{
|
2014-10-16 00:38:55 +02:00
|
|
|
if (starts_with(basename, "tmp_obj_"))
|
|
|
|
|
prune_tmp_file(path);
|
|
|
|
|
else
|
|
|
|
|
fprintf(stderr, "bad sha1 file: %s\n", path);
|
2006-07-06 19:16:22 +02:00
|
|
|
return 0;
|
|
|
|
|
}
|
|
|
|
|
|
2014-10-16 00:38:55 +02:00
|
|
|
static int prune_subdir(int nr, const char *path, void *data)
|
2006-07-06 19:16:22 +02:00
|
|
|
{
|
2014-10-16 00:38:55 +02:00
|
|
|
if (!show_only)
|
|
|
|
|
rmdir(path);
|
|
|
|
|
return 0;
|
2006-07-06 19:16:22 +02:00
|
|
|
}
|
|
|
|
|
|
2014-11-30 09:24:48 +01:00
|
|
|
static int prune_worktree(const char *id, struct strbuf *reason)
|
|
|
|
|
{
|
|
|
|
|
struct stat st;
|
|
|
|
|
char *path;
|
|
|
|
|
int fd, len;
|
|
|
|
|
|
|
|
|
|
if (!is_directory(git_path("worktrees/%s", id))) {
|
|
|
|
|
strbuf_addf(reason, _("Removing worktrees/%s: not a valid directory"), id);
|
|
|
|
|
return 1;
|
|
|
|
|
}
|
|
|
|
|
if (file_exists(git_path("worktrees/%s/locked", id)))
|
|
|
|
|
return 0;
|
|
|
|
|
if (stat(git_path("worktrees/%s/gitdir", id), &st)) {
|
|
|
|
|
strbuf_addf(reason, _("Removing worktrees/%s: gitdir file does not exist"), id);
|
|
|
|
|
return 1;
|
|
|
|
|
}
|
|
|
|
|
fd = open(git_path("worktrees/%s/gitdir", id), O_RDONLY);
|
|
|
|
|
if (fd < 0) {
|
|
|
|
|
strbuf_addf(reason, _("Removing worktrees/%s: unable to read gitdir file (%s)"),
|
|
|
|
|
id, strerror(errno));
|
|
|
|
|
return 1;
|
|
|
|
|
}
|
|
|
|
|
len = st.st_size;
|
|
|
|
|
path = xmalloc(len + 1);
|
|
|
|
|
read_in_full(fd, path, len);
|
|
|
|
|
close(fd);
|
|
|
|
|
while (len && (path[len - 1] == '\n' || path[len - 1] == '\r'))
|
|
|
|
|
len--;
|
|
|
|
|
if (!len) {
|
|
|
|
|
strbuf_addf(reason, _("Removing worktrees/%s: invalid gitdir file"), id);
|
|
|
|
|
free(path);
|
|
|
|
|
return 1;
|
|
|
|
|
}
|
|
|
|
|
path[len] = '\0';
|
|
|
|
|
if (!file_exists(path)) {
|
|
|
|
|
struct stat st_link;
|
|
|
|
|
free(path);
|
|
|
|
|
/*
|
|
|
|
|
* the repo is moved manually and has not been
|
|
|
|
|
* accessed since?
|
|
|
|
|
*/
|
|
|
|
|
if (!stat(git_path("worktrees/%s/link", id), &st_link) &&
|
|
|
|
|
st_link.st_nlink > 1)
|
|
|
|
|
return 0;
|
|
|
|
|
strbuf_addf(reason, _("Removing worktrees/%s: gitdir file points to non-existent location"), id);
|
|
|
|
|
return 1;
|
|
|
|
|
}
|
|
|
|
|
free(path);
|
|
|
|
|
return st.st_mtime <= expire;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
static void prune_worktrees(void)
|
|
|
|
|
{
|
|
|
|
|
struct strbuf reason = STRBUF_INIT;
|
|
|
|
|
struct strbuf path = STRBUF_INIT;
|
|
|
|
|
DIR *dir = opendir(git_path("worktrees"));
|
|
|
|
|
struct dirent *d;
|
|
|
|
|
int ret;
|
|
|
|
|
if (!dir)
|
|
|
|
|
return;
|
|
|
|
|
while ((d = readdir(dir)) != NULL) {
|
|
|
|
|
if (!strcmp(d->d_name, ".") || !strcmp(d->d_name, ".."))
|
|
|
|
|
continue;
|
|
|
|
|
strbuf_reset(&reason);
|
|
|
|
|
if (!prune_worktree(d->d_name, &reason))
|
|
|
|
|
continue;
|
|
|
|
|
if (show_only || verbose)
|
|
|
|
|
printf("%s\n", reason.buf);
|
|
|
|
|
if (show_only)
|
|
|
|
|
continue;
|
|
|
|
|
strbuf_reset(&path);
|
|
|
|
|
strbuf_addstr(&path, git_path("worktrees/%s", d->d_name));
|
|
|
|
|
ret = remove_dir_recursively(&path, 0);
|
|
|
|
|
if (ret < 0 && errno == ENOTDIR)
|
|
|
|
|
ret = unlink(path.buf);
|
|
|
|
|
if (ret)
|
|
|
|
|
error(_("failed to remove: %s"), strerror(errno));
|
|
|
|
|
}
|
|
|
|
|
closedir(dir);
|
|
|
|
|
if (!show_only)
|
|
|
|
|
rmdir(git_path("worktrees"));
|
|
|
|
|
strbuf_release(&reason);
|
|
|
|
|
strbuf_release(&path);
|
|
|
|
|
}
|
|
|
|
|
|
2008-02-07 03:55:14 +01:00
|
|
|
/*
|
|
|
|
|
* Write errors (particularly out of space) can result in
|
|
|
|
|
* failed temporary packs (and more rarely indexes and other
|
2010-02-04 06:23:18 +01:00
|
|
|
* files beginning with "tmp_") accumulating in the object
|
2008-09-23 01:34:26 +02:00
|
|
|
* and the pack directories.
|
2008-02-07 03:55:14 +01:00
|
|
|
*/
|
2008-09-23 01:34:26 +02:00
|
|
|
static void remove_temporary_files(const char *path)
|
2008-02-07 03:55:14 +01:00
|
|
|
{
|
|
|
|
|
DIR *dir;
|
|
|
|
|
struct dirent *de;
|
|
|
|
|
|
2008-09-23 01:34:26 +02:00
|
|
|
dir = opendir(path);
|
2008-02-07 03:55:14 +01:00
|
|
|
if (!dir) {
|
2008-09-23 01:34:26 +02:00
|
|
|
fprintf(stderr, "Unable to open directory %s\n", path);
|
2008-02-07 03:55:14 +01:00
|
|
|
return;
|
|
|
|
|
}
|
2008-07-25 00:41:12 +02:00
|
|
|
while ((de = readdir(dir)) != NULL)
|
2013-11-30 21:55:40 +01:00
|
|
|
if (starts_with(de->d_name, "tmp_"))
|
2013-12-18 00:22:31 +01:00
|
|
|
prune_tmp_file(mkpath("%s/%s", path, de->d_name));
|
2008-02-07 03:55:14 +01:00
|
|
|
closedir(dir);
|
|
|
|
|
}
|
|
|
|
|
|
2006-07-29 07:44:25 +02:00
|
|
|
int cmd_prune(int argc, const char **argv, const char *prefix)
|
2006-07-06 19:16:22 +02:00
|
|
|
{
|
2007-01-06 11:16:10 +01:00
|
|
|
struct rev_info revs;
|
2011-11-08 06:34:08 +01:00
|
|
|
struct progress *progress = NULL;
|
2014-11-30 09:24:48 +01:00
|
|
|
int do_prune_worktrees = 0;
|
2008-03-23 21:50:29 +01:00
|
|
|
const struct option options[] = {
|
2012-08-20 14:32:32 +02:00
|
|
|
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")),
|
2014-11-30 09:24:48 +01:00
|
|
|
OPT_BOOL(0, "worktrees", &do_prune_worktrees, N_("prune .git/worktrees")),
|
2013-04-25 20:13:49 +02:00
|
|
|
OPT_EXPIRY_DATE(0, "expire", &expire,
|
|
|
|
|
N_("expire objects older than <time>")),
|
2008-03-23 21:50:29 +01:00
|
|
|
OPT_END()
|
|
|
|
|
};
|
2008-09-23 01:34:26 +02:00
|
|
|
char *s;
|
2006-07-06 19:16:22 +02:00
|
|
|
|
2010-02-27 04:50:02 +01:00
|
|
|
expire = ULONG_MAX;
|
2007-01-05 22:31:43 +01:00
|
|
|
save_commit_buffer = 0;
|
2014-02-18 12:24:55 +01:00
|
|
|
check_replace_refs = 0;
|
2006-07-29 07:44:25 +02:00
|
|
|
init_revisions(&revs, prefix);
|
2006-07-06 19:16:22 +02:00
|
|
|
|
2009-05-23 20:53:12 +02:00
|
|
|
argc = parse_options(argc, argv, prefix, options, prune_usage, 0);
|
2014-11-30 09:24:48 +01:00
|
|
|
|
|
|
|
|
if (do_prune_worktrees) {
|
|
|
|
|
if (argc)
|
|
|
|
|
die(_("--worktrees does not take extra arguments"));
|
|
|
|
|
prune_worktrees();
|
|
|
|
|
return 0;
|
|
|
|
|
}
|
|
|
|
|
|
2008-03-25 07:20:51 +01:00
|
|
|
while (argc--) {
|
|
|
|
|
unsigned char sha1[20];
|
|
|
|
|
const char *name = *argv++;
|
|
|
|
|
|
|
|
|
|
if (!get_sha1(name, sha1)) {
|
2013-03-17 09:23:31 +01:00
|
|
|
struct object *object = parse_object_or_die(sha1, name);
|
2008-03-25 07:20:51 +01:00
|
|
|
add_pending_object(&revs, object, "");
|
|
|
|
|
}
|
|
|
|
|
else
|
|
|
|
|
die("unrecognized argument: %s", name);
|
|
|
|
|
}
|
2011-11-08 06:34:08 +01:00
|
|
|
|
|
|
|
|
if (show_progress == -1)
|
|
|
|
|
show_progress = isatty(2);
|
|
|
|
|
if (show_progress)
|
2014-02-21 13:50:18 +01:00
|
|
|
progress = start_progress_delay(_("Checking connectivity"), 0, 0, 2);
|
2011-11-08 06:34:08 +01:00
|
|
|
|
prune: keep objects reachable from recent objects
Our current strategy with prune is that an object falls into
one of three categories:
1. Reachable (from ref tips, reflogs, index, etc).
2. Not reachable, but recent (based on the --expire time).
3. Not reachable and not recent.
We keep objects from (1) and (2), but prune objects in (3).
The point of (2) is that these objects may be part of an
in-progress operation that has not yet updated any refs.
However, it is not always the case that objects for an
in-progress operation will have a recent mtime. For example,
the object database may have an old copy of a blob (from an
abandoned operation, a branch that was deleted, etc). If we
create a new tree that points to it, a simultaneous prune
will leave our tree, but delete the blob. Referencing that
tree with a commit will then work (we check that the tree is
in the object database, but not that all of its referred
objects are), as will mentioning the commit in a ref. But
the resulting repo is corrupt; we are missing the blob
reachable from a ref.
One way to solve this is to be more thorough when
referencing a sha1: make sure that not only do we have that
sha1, but that we have objects it refers to, and so forth
recursively. The problem is that this is very expensive.
Creating a parent link would require traversing the entire
object graph!
Instead, this patch pushes the extra work onto prune, which
runs less frequently (and has to look at the whole object
graph anyway). It creates a new category of objects: objects
which are not recent, but which are reachable from a recent
object. We do not prune these objects, just like the
reachable and recent ones.
This lets us avoid the recursive check above, because if we
have an object, even if it is unreachable, we should have
its referent. We can make a simple inductive argument that
with this patch, this property holds (that there are no
objects with missing referents in the repository):
0. When we have no objects, we have nothing to refer or be
referred to, so the property holds.
1. If we add objects to the repository, their direct
referents must generally exist (e.g., if you create a
tree, the blobs it references must exist; if you create
a commit to point at the tree, the tree must exist).
This is already the case before this patch. And it is
not 100% foolproof (you can make bogus objects using
`git hash-object`, for example), but it should be the
case for normal usage.
Therefore for any sequence of object additions, the
property will continue to hold.
2. If we remove objects from the repository, then we will
not remove a child object (like a blob) if an object
that refers to it is being kept. That is the part
implemented by this patch.
Note, however, that our reachability check and the
actual pruning are not atomic. So it _is_ still
possible to violate the property (e.g., an object
becomes referenced just as we are deleting it). This
patch is shooting for eliminating problems where the
mtimes of dependent objects differ by hours or days,
and one is dropped without the other. It does nothing
to help with short races.
Naively, the simplest way to implement this would be to add
all recent objects as tips to the reachability traversal.
However, this does not perform well. In a recently-packed
repository, all reachable objects will also be recent, and
therefore we have to look at each object twice. This patch
instead performs the reachability traversal, then follows up
with a second traversal for recent objects, skipping any
that have already been marked.
Signed-off-by: Jeff King <peff@peff.net>
Signed-off-by: Junio C Hamano <gitster@pobox.com>
2014-10-16 00:41:35 +02:00
|
|
|
mark_reachable_objects(&revs, 1, expire, progress);
|
2011-11-05 13:00:08 +01:00
|
|
|
stop_progress(&progress);
|
2014-10-16 00:38:55 +02:00
|
|
|
for_each_loose_file_in_objdir(get_object_directory(), prune_object,
|
|
|
|
|
prune_cruft, prune_subdir, NULL);
|
2006-07-06 19:16:22 +02:00
|
|
|
|
2013-05-27 13:18:47 +02:00
|
|
|
prune_packed_objects(show_only ? PRUNE_PACKED_DRY_RUN : 0);
|
2008-09-23 01:34:26 +02:00
|
|
|
remove_temporary_files(get_object_directory());
|
2012-09-04 19:31:14 +02:00
|
|
|
s = mkpathdup("%s/pack", get_object_directory());
|
2008-09-23 01:34:26 +02:00
|
|
|
remove_temporary_files(s);
|
|
|
|
|
free(s);
|
2013-12-05 14:02:54 +01:00
|
|
|
|
|
|
|
|
if (is_repository_shallow())
|
|
|
|
|
prune_shallow(show_only);
|
|
|
|
|
|
2006-07-06 19:16:22 +02:00
|
|
|
return 0;
|
|
|
|
|
}
|