[thirdparty/git.git] / builtin / worktree.c

#include "cache.h"
#include "config.h"
#include "builtin.h"
#include "dir.h"
#include "parse-options.h"
#include "argv-array.h"
#include "branch.h"
#include "refs.h"
#include "run-command.h"
#include "sigchain.h"
#include "refs.h"
#include "utf8.h"
#include "worktree.h"

static const char * const worktree_usage[] = {
	N_("git worktree add [<options>] <path> [<branch>]"),
	N_("git worktree list [<options>]"),
	N_("git worktree lock [<options>] <path>"),
	N_("git worktree prune [<options>]"),
	N_("git worktree unlock <path>"),
	NULL
};

struct add_opts {
	int force;
	int detach;
	int checkout;
	int keep_locked;
	const char *new_branch;
	int force_new_branch;
};

static int show_only;
static int verbose;
static timestamp_t expire;

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 = xmallocz(len);
	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;
		if (st.st_mtime <= expire) {
			strbuf_addf(reason, _("Removing worktrees/%s: gitdir file points to non-existent location"), id);
			return 1;
		} else {
			return 0;
		}
	}
	free(path);
	return 0;
}

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 (is_dot_or_dotdot(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;
		git_path_buf(&path, "worktrees/%s", d->d_name);
		ret = remove_dir_recursively(&path, 0);
		if (ret < 0 && errno == ENOTDIR)
			ret = unlink(path.buf);
		if (ret)
			error_errno(_("failed to remove '%s'"), path.buf);
	}
	closedir(dir);
	if (!show_only)
		rmdir(git_path("worktrees"));
	strbuf_release(&reason);
	strbuf_release(&path);
}

static int prune(int ac, const char **av, const char *prefix)
{
	struct option options[] = {
		OPT__DRY_RUN(&show_only, N_("do not remove, show only")),
		OPT__VERBOSE(&verbose, N_("report pruned working trees")),
		OPT_EXPIRY_DATE(0, "expire", &expire,
				N_("expire working trees older than <time>")),
		OPT_END()
	};

	expire = TIME_MAX;
	ac = parse_options(ac, av, prefix, options, worktree_usage, 0);
	if (ac)
		usage_with_options(worktree_usage, options);
	prune_worktrees();
	return 0;
}

static char *junk_work_tree;
static char *junk_git_dir;
static int is_junk;
static pid_t junk_pid;

static void remove_junk(void)
{
	struct strbuf sb = STRBUF_INIT;
	if (!is_junk || getpid() != junk_pid)
		return;
	if (junk_git_dir) {
		strbuf_addstr(&sb, junk_git_dir);
		remove_dir_recursively(&sb, 0);
		strbuf_reset(&sb);
	}
	if (junk_work_tree) {
		strbuf_addstr(&sb, junk_work_tree);
		remove_dir_recursively(&sb, 0);
	}
	strbuf_release(&sb);
}

static void remove_junk_on_signal(int signo)
{
	remove_junk();
	sigchain_pop(signo);
	raise(signo);
}

static const char *worktree_basename(const char *path, int *olen)
{
	const char *name;
	int len;

	len = strlen(path);
	while (len && is_dir_sep(path[len - 1]))
		len--;

	for (name = path + len - 1; name > path; name--)
		if (is_dir_sep(*name)) {
			name++;
			break;
		}

	*olen = len;
	return name;
}

static int add_worktree(const char *path, const char *refname,
			const struct add_opts *opts)
{
	struct strbuf sb_git = STRBUF_INIT, sb_repo = STRBUF_INIT;
	struct strbuf sb = STRBUF_INIT;
	const char *name;
	struct stat st;
	struct child_process cp = CHILD_PROCESS_INIT;
	struct argv_array child_env = ARGV_ARRAY_INIT;
	int counter = 0, len, ret;
	struct strbuf symref = STRBUF_INIT;
	struct commit *commit = NULL;

	if (file_exists(path) && !is_empty_dir(path))
		die(_("'%s' already exists"), path);

	/* is 'refname' a branch or commit? */
	if (!opts->detach && !strbuf_check_branch_ref(&symref, refname) &&
		 ref_exists(symref.buf)) { /* it's a branch */
		if (!opts->force)
			die_if_checked_out(symref.buf, 0);
	} else { /* must be a commit */
		commit = lookup_commit_reference_by_name(refname);
		if (!commit)
			die(_("invalid reference: %s"), refname);
	}

	name = worktree_basename(path, &len);
	git_path_buf(&sb_repo, "worktrees/%.*s", (int)(path + len - name), name);
	len = sb_repo.len;
	if (safe_create_leading_directories_const(sb_repo.buf))
		die_errno(_("could not create leading directories of '%s'"),
			  sb_repo.buf);
	while (!stat(sb_repo.buf, &st)) {
		counter++;
		strbuf_setlen(&sb_repo, len);
		strbuf_addf(&sb_repo, "%d", counter);
	}
	name = strrchr(sb_repo.buf, '/') + 1;

	junk_pid = getpid();
	atexit(remove_junk);
	sigchain_push_common(remove_junk_on_signal);

	if (mkdir(sb_repo.buf, 0777))
		die_errno(_("could not create directory of '%s'"), sb_repo.buf);
	junk_git_dir = xstrdup(sb_repo.buf);
	is_junk = 1;

	/*
	 * lock the incomplete repo so prune won't delete it, unlock
	 * after the preparation is over.
	 */
	strbuf_addf(&sb, "%s/locked", sb_repo.buf);
	if (!opts->keep_locked)
		write_file(sb.buf, "initializing");
	else
		write_file(sb.buf, "added with --lock");

	strbuf_addf(&sb_git, "%s/.git", path);
	if (safe_create_leading_directories_const(sb_git.buf))
		die_errno(_("could not create leading directories of '%s'"),
			  sb_git.buf);
	junk_work_tree = xstrdup(path);

	strbuf_reset(&sb);
	strbuf_addf(&sb, "%s/gitdir", sb_repo.buf);
	write_file(sb.buf, "%s", real_path(sb_git.buf));
	write_file(sb_git.buf, "gitdir: %s/worktrees/%s",
		   real_path(get_git_common_dir()), name);
	/*
	 * This is to keep resolve_ref() happy. We need a valid HEAD
	 * or is_git_directory() will reject the directory. Any value which
	 * looks like an object ID will do since it will be immediately
	 * replaced by the symbolic-ref or update-ref invocation in the new
	 * worktree.
	 */
	strbuf_reset(&sb);
	strbuf_addf(&sb, "%s/HEAD", sb_repo.buf);
	write_file(sb.buf, "%s", sha1_to_hex(null_sha1));
	strbuf_reset(&sb);
	strbuf_addf(&sb, "%s/commondir", sb_repo.buf);
	write_file(sb.buf, "../..");

	fprintf_ln(stderr, _("Preparing %s (identifier %s)"), path, name);

	argv_array_pushf(&child_env, "%s=%s", GIT_DIR_ENVIRONMENT, sb_git.buf);
	argv_array_pushf(&child_env, "%s=%s", GIT_WORK_TREE_ENVIRONMENT, path);
	cp.git_cmd = 1;

	if (commit)
		argv_array_pushl(&cp.args, "update-ref", "HEAD",
				 oid_to_hex(&commit->object.oid), NULL);
	else
		argv_array_pushl(&cp.args, "symbolic-ref", "HEAD",
				 symref.buf, NULL);
	cp.env = child_env.argv;
	ret = run_command(&cp);
	if (ret)
		goto done;

	if (opts->checkout) {
		cp.argv = NULL;
		argv_array_clear(&cp.args);
		argv_array_pushl(&cp.args, "reset", "--hard", NULL);
		cp.env = child_env.argv;
		ret = run_command(&cp);
		if (ret)
			goto done;
	}

	is_junk = 0;
	FREE_AND_NULL(junk_work_tree);
	FREE_AND_NULL(junk_git_dir);

done:
	if (ret || !opts->keep_locked) {
		strbuf_reset(&sb);
		strbuf_addf(&sb, "%s/locked", sb_repo.buf);
		unlink_or_warn(sb.buf);
	}
	argv_array_clear(&child_env);
	strbuf_release(&sb);
	strbuf_release(&symref);
	strbuf_release(&sb_repo);
	strbuf_release(&sb_git);
	return ret;
}

static int add(int ac, const char **av, const char *prefix)
{
	struct add_opts opts;
	const char *new_branch_force = NULL;
	char *path;
	const char *branch;
	struct option options[] = {
		OPT__FORCE(&opts.force, N_("checkout <branch> even if already checked out in other worktree")),
		OPT_STRING('b', NULL, &opts.new_branch, N_("branch"),
			   N_("create a new branch")),
		OPT_STRING('B', NULL, &new_branch_force, N_("branch"),
			   N_("create or reset a branch")),
		OPT_BOOL(0, "detach", &opts.detach, N_("detach HEAD at named commit")),
		OPT_BOOL(0, "checkout", &opts.checkout, N_("populate the new working tree")),
		OPT_BOOL(0, "lock", &opts.keep_locked, N_("keep the new working tree locked")),
		OPT_END()
	};

	memset(&opts, 0, sizeof(opts));
	opts.checkout = 1;
	ac = parse_options(ac, av, prefix, options, worktree_usage, 0);
	if (!!opts.detach + !!opts.new_branch + !!new_branch_force > 1)
		die(_("-b, -B, and --detach are mutually exclusive"));
	if (ac < 1 || ac > 2)
		usage_with_options(worktree_usage, options);

	path = prefix_filename(prefix, av[0]);
	branch = ac < 2 ? "HEAD" : av[1];

	if (!strcmp(branch, "-"))
		branch = "@{-1}";

	opts.force_new_branch = !!new_branch_force;
	if (opts.force_new_branch) {
		struct strbuf symref = STRBUF_INIT;

		opts.new_branch = new_branch_force;

		if (!opts.force &&
		    !strbuf_check_branch_ref(&symref, opts.new_branch) &&
		    ref_exists(symref.buf))
			die_if_checked_out(symref.buf, 0);
		strbuf_release(&symref);
	}

	if (ac < 2 && !opts.new_branch && !opts.detach) {
		int n;
		const char *s = worktree_basename(path, &n);
		opts.new_branch = xstrndup(s, n);
	}

	if (opts.new_branch) {
		struct child_process cp = CHILD_PROCESS_INIT;
		cp.git_cmd = 1;
		argv_array_push(&cp.args, "branch");
		if (opts.force_new_branch)
			argv_array_push(&cp.args, "--force");
		argv_array_push(&cp.args, opts.new_branch);
		argv_array_push(&cp.args, branch);
		if (run_command(&cp))
			return -1;
		branch = opts.new_branch;
	}

	UNLEAK(path);
	UNLEAK(opts);
	return add_worktree(path, branch, &opts);
}

static void show_worktree_porcelain(struct worktree *wt)
{
	printf("worktree %s\n", wt->path);
	if (wt->is_bare)
		printf("bare\n");
	else {
		printf("HEAD %s\n", sha1_to_hex(wt->head_sha1));
		if (wt->is_detached)
			printf("detached\n");
		else if (wt->head_ref)
			printf("branch %s\n", wt->head_ref);
	}
	printf("\n");
}

static void show_worktree(struct worktree *wt, int path_maxlen, int abbrev_len)
{
	struct strbuf sb = STRBUF_INIT;
	int cur_path_len = strlen(wt->path);
	int path_adj = cur_path_len - utf8_strwidth(wt->path);

	strbuf_addf(&sb, "%-*s ", 1 + path_maxlen + path_adj, wt->path);
	if (wt->is_bare)
		strbuf_addstr(&sb, "(bare)");
	else {
		strbuf_addf(&sb, "%-*s ", abbrev_len,
				find_unique_abbrev(wt->head_sha1, DEFAULT_ABBREV));
		if (wt->is_detached)
			strbuf_addstr(&sb, "(detached HEAD)");
		else if (wt->head_ref) {
			char *ref = shorten_unambiguous_ref(wt->head_ref, 0);
			strbuf_addf(&sb, "[%s]", ref);
			free(ref);
		} else
			strbuf_addstr(&sb, "(error)");
	}
	printf("%s\n", sb.buf);

	strbuf_release(&sb);
}

static void measure_widths(struct worktree **wt, int *abbrev, int *maxlen)
{
	int i;

	for (i = 0; wt[i]; i++) {
		int sha1_len;
		int path_len = strlen(wt[i]->path);

		if (path_len > *maxlen)
			*maxlen = path_len;
		sha1_len = strlen(find_unique_abbrev(wt[i]->head_sha1, *abbrev));
		if (sha1_len > *abbrev)
			*abbrev = sha1_len;
	}
}

static int list(int ac, const char **av, const char *prefix)
{
	int porcelain = 0;

	struct option options[] = {
		OPT_BOOL(0, "porcelain", &porcelain, N_("machine-readable output")),
		OPT_END()
	};

	ac = parse_options(ac, av, prefix, options, worktree_usage, 0);
	if (ac)
		usage_with_options(worktree_usage, options);
	else {
		struct worktree **worktrees = get_worktrees(GWT_SORT_LINKED);
		int path_maxlen = 0, abbrev = DEFAULT_ABBREV, i;

		if (!porcelain)
			measure_widths(worktrees, &abbrev, &path_maxlen);

		for (i = 0; worktrees[i]; i++) {
			if (porcelain)
				show_worktree_porcelain(worktrees[i]);
			else
				show_worktree(worktrees[i], path_maxlen, abbrev);
		}
		free_worktrees(worktrees);
	}
	return 0;
}

static int lock_worktree(int ac, const char **av, const char *prefix)
{
	const char *reason = "", *old_reason;
	struct option options[] = {
		OPT_STRING(0, "reason", &reason, N_("string"),
			   N_("reason for locking")),
		OPT_END()
	};
	struct worktree **worktrees, *wt;

	ac = parse_options(ac, av, prefix, options, worktree_usage, 0);
	if (ac != 1)
		usage_with_options(worktree_usage, options);

	worktrees = get_worktrees(0);
	wt = find_worktree(worktrees, prefix, av[0]);
	if (!wt)
		die(_("'%s' is not a working tree"), av[0]);
	if (is_main_worktree(wt))
		die(_("The main working tree cannot be locked or unlocked"));

	old_reason = is_worktree_locked(wt);
	if (old_reason) {
		if (*old_reason)
			die(_("'%s' is already locked, reason: %s"),
			    av[0], old_reason);
		die(_("'%s' is already locked"), av[0]);
	}

	write_file(git_common_path("worktrees/%s/locked", wt->id),
		   "%s", reason);
	free_worktrees(worktrees);
	return 0;
}

static int unlock_worktree(int ac, const char **av, const char *prefix)
{
	struct option options[] = {
		OPT_END()
	};
	struct worktree **worktrees, *wt;
	int ret;

	ac = parse_options(ac, av, prefix, options, worktree_usage, 0);
	if (ac != 1)
		usage_with_options(worktree_usage, options);

	worktrees = get_worktrees(0);
	wt = find_worktree(worktrees, prefix, av[0]);
	if (!wt)
		die(_("'%s' is not a working tree"), av[0]);
	if (is_main_worktree(wt))
		die(_("The main working tree cannot be locked or unlocked"));
	if (!is_worktree_locked(wt))
		die(_("'%s' is not locked"), av[0]);
	ret = unlink_or_warn(git_common_path("worktrees/%s/locked", wt->id));
	free_worktrees(worktrees);
	return ret;
}

int cmd_worktree(int ac, const char **av, const char *prefix)
{
	struct option options[] = {
		OPT_END()
	};

	git_config(git_default_config, NULL);

	if (ac < 2)
		usage_with_options(worktree_usage, options);
	if (!prefix)
		prefix = "";
	if (!strcmp(av[1], "add"))
		return add(ac - 1, av + 1, prefix);
	if (!strcmp(av[1], "prune"))
		return prune(ac - 1, av + 1, prefix);
	if (!strcmp(av[1], "list"))
		return list(ac - 1, av + 1, prefix);
	if (!strcmp(av[1], "lock"))
		return lock_worktree(ac - 1, av + 1, prefix);
	if (!strcmp(av[1], "unlock"))
		return unlock_worktree(ac - 1, av + 1, prefix);
	usage_with_options(worktree_usage, options);
}
Commit	Line	Data
df0b6cfb	1	#include "cache.h"
b2141fc1	2	#include "config.h"
df0b6cfb NTND	3	#include "builtin.h"
	4	#include "dir.h"
	5	#include "parse-options.h"
fc56361f	6	#include "argv-array.h"
f7c9dac1 ES	7	#include "branch.h"
f7c9dac1 ES	8	#include "refs.h"
fc56361f	9	#include "run-command.h"
b979d950	10	#include "sigchain.h"
799767cc	11	#include "refs.h"
bb9c03b8 MR	12	#include "utf8.h"
bb9c03b8 MR	13	#include "worktree.h"
df0b6cfb NTND	14
df0b6cfb NTND	15	static const char * const worktree_usage[] = {
ae9f2745	16	N_("git worktree add [<options>] <path> [<branch>]"),
bb9c03b8	17	N_("git worktree list [<options>]"),
58142c09	18	N_("git worktree lock [<options>] <path>"),
7b722d90	19	N_("git worktree prune [<options>]"),
6d308627	20	N_("git worktree unlock <path>"),
df0b6cfb NTND	21	NULL
	22	};
	23
5dd6e234 ES	24	struct add_opts {
	25	int force;
	26	int detach;
ef2a0ac9	27	int checkout;
507e6e9e	28	int keep_locked;
5dd6e234 ES	29	const char *new_branch;
	30	int force_new_branch;
	31	};
	32
df0b6cfb NTND	33	static int show_only;
df0b6cfb NTND	34	static int verbose;
dddbad72	35	static timestamp_t expire;
df0b6cfb NTND	36
	37	static int prune_worktree(const char id, struct strbuf reason)
	38	{
	39	struct stat st;
	40	char *path;
	41	int fd, len;
	42
	43	if (!is_directory(git_path("worktrees/%s", id))) {
	44	strbuf_addf(reason, _("Removing worktrees/%s: not a valid directory"), id);
	45	return 1;
	46	}
	47	if (file_exists(git_path("worktrees/%s/locked", id)))
	48	return 0;
	49	if (stat(git_path("worktrees/%s/gitdir", id), &st)) {
	50	strbuf_addf(reason, _("Removing worktrees/%s: gitdir file does not exist"), id);
	51	return 1;
	52	}
	53	fd = open(git_path("worktrees/%s/gitdir", id), O_RDONLY);
	54	if (fd < 0) {
	55	strbuf_addf(reason, _("Removing worktrees/%s: unable to read gitdir file (%s)"),
	56	id, strerror(errno));
	57	return 1;
	58	}
	59	len = st.st_size;
3733e694	60	path = xmallocz(len);
df0b6cfb NTND	61	read_in_full(fd, path, len);
	62	close(fd);
	63	while (len && (path[len - 1] == '\n' \|\| path[len - 1] == '\r'))
	64	len--;
	65	if (!len) {
	66	strbuf_addf(reason, _("Removing worktrees/%s: invalid gitdir file"), id);
	67	free(path);
	68	return 1;
	69	}
	70	path[len] = '\0';
	71	if (!file_exists(path)) {
	72	struct stat st_link;
	73	free(path);
	74	/*
	75	* the repo is moved manually and has not been
	76	* accessed since?
	77	*/
	78	if (!stat(git_path("worktrees/%s/link", id), &st_link) &&
	79	st_link.st_nlink > 1)
	80	return 0;
	81	if (st.st_mtime <= expire) {
	82	strbuf_addf(reason, _("Removing worktrees/%s: gitdir file points to non-existent location"), id);
	83	return 1;
	84	} else {
	85	return 0;
	86	}
	87	}
	88	free(path);
	89	return 0;
	90	}
	91
	92	static void prune_worktrees(void)
	93	{
	94	struct strbuf reason = STRBUF_INIT;
	95	struct strbuf path = STRBUF_INIT;
	96	DIR *dir = opendir(git_path("worktrees"));
	97	struct dirent *d;
	98	int ret;
	99	if (!dir)
	100	return;
	101	while ((d = readdir(dir)) != NULL) {
afb9e30b	102	if (is_dot_or_dotdot(d->d_name))
df0b6cfb NTND	103	continue;
	104	strbuf_reset(&reason);
	105	if (!prune_worktree(d->d_name, &reason))
	106	continue;
	107	if (show_only \|\| verbose)
	108	printf("%s\n", reason.buf);
	109	if (show_only)
	110	continue;
8c2ca3a6	111	git_path_buf(&path, "worktrees/%s", d->d_name);
df0b6cfb NTND	112	ret = remove_dir_recursively(&path, 0);
	113	if (ret < 0 && errno == ENOTDIR)
	114	ret = unlink(path.buf);
	115	if (ret)
8d19e930	116	error_errno(_("failed to remove '%s'"), path.buf);
df0b6cfb NTND	117	}
	118	closedir(dir);
	119	if (!show_only)
	120	rmdir(git_path("worktrees"));
	121	strbuf_release(&reason);
	122	strbuf_release(&path);
	123	}
	124
	125	static int prune(int ac, const char *av, const char prefix)
	126	{
	127	struct option options[] = {
	128	OPT__DRY_RUN(&show_only, N_("do not remove, show only")),
2488dcab	129	OPT__VERBOSE(&verbose, N_("report pruned working trees")),
df0b6cfb	130	OPT_EXPIRY_DATE(0, "expire", &expire,
2488dcab	131	N_("expire working trees older than <time>")),
df0b6cfb NTND	132	OPT_END()
	133	};
	134
dddbad72	135	expire = TIME_MAX;
df0b6cfb NTND	136	ac = parse_options(ac, av, prefix, options, worktree_usage, 0);
	137	if (ac)
	138	usage_with_options(worktree_usage, options);
	139	prune_worktrees();
	140	return 0;
	141	}
	142
b979d950 ES	143	static char *junk_work_tree;
	144	static char *junk_git_dir;
	145	static int is_junk;
	146	static pid_t junk_pid;
	147
	148	static void remove_junk(void)
	149	{
	150	struct strbuf sb = STRBUF_INIT;
	151	if (!is_junk \|\| getpid() != junk_pid)
	152	return;
	153	if (junk_git_dir) {
	154	strbuf_addstr(&sb, junk_git_dir);
	155	remove_dir_recursively(&sb, 0);
	156	strbuf_reset(&sb);
	157	}
	158	if (junk_work_tree) {
	159	strbuf_addstr(&sb, junk_work_tree);
	160	remove_dir_recursively(&sb, 0);
	161	}
	162	strbuf_release(&sb);
	163	}
	164
	165	static void remove_junk_on_signal(int signo)
	166	{
	167	remove_junk();
	168	sigchain_pop(signo);
	169	raise(signo);
	170	}
	171
f5682b2a ES	172	static const char worktree_basename(const char path, int *olen)
	173	{
	174	const char *name;
	175	int len;
	176
	177	len = strlen(path);
	178	while (len && is_dir_sep(path[len - 1]))
	179	len--;
	180
	181	for (name = path + len - 1; name > path; name--)
	182	if (is_dir_sep(*name)) {
	183	name++;
	184	break;
	185	}
	186
	187	*olen = len;
	188	return name;
	189	}
	190
80a0548f	191	static int add_worktree(const char path, const char refname,
5dd6e234	192	const struct add_opts *opts)
b979d950 ES	193	{
	194	struct strbuf sb_git = STRBUF_INIT, sb_repo = STRBUF_INIT;
	195	struct strbuf sb = STRBUF_INIT;
	196	const char *name;
	197	struct stat st;
542aa25d	198	struct child_process cp = CHILD_PROCESS_INIT;
ae2a3827	199	struct argv_array child_env = ARGV_ARRAY_INIT;
b979d950	200	int counter = 0, len, ret;
f7c9dac1 ES	201	struct strbuf symref = STRBUF_INIT;
f7c9dac1 ES	202	struct commit *commit = NULL;
b979d950 ES	203
	204	if (file_exists(path) && !is_empty_dir(path))
	205	die(_("'%s' already exists"), path);
	206
f7c9dac1	207	/* is 'refname' a branch or commit? */
0ebf4a2a	208	if (!opts->detach && !strbuf_check_branch_ref(&symref, refname) &&
f7c9dac1 ES	209	ref_exists(symref.buf)) { /* it's a branch */
f7c9dac1 ES	210	if (!opts->force)
8d9fdd70	211	die_if_checked_out(symref.buf, 0);
f7c9dac1 ES	212	} else { /* must be a commit */
	213	commit = lookup_commit_reference_by_name(refname);
	214	if (!commit)
	215	die(_("invalid reference: %s"), refname);
	216	}
	217
f5682b2a	218	name = worktree_basename(path, &len);
8c2ca3a6	219	git_path_buf(&sb_repo, "worktrees/%.*s", (int)(path + len - name), name);
b979d950 ES	220	len = sb_repo.len;
	221	if (safe_create_leading_directories_const(sb_repo.buf))
	222	die_errno(_("could not create leading directories of '%s'"),
	223	sb_repo.buf);
	224	while (!stat(sb_repo.buf, &st)) {
	225	counter++;
	226	strbuf_setlen(&sb_repo, len);
	227	strbuf_addf(&sb_repo, "%d", counter);
	228	}
	229	name = strrchr(sb_repo.buf, '/') + 1;
	230
	231	junk_pid = getpid();
	232	atexit(remove_junk);
	233	sigchain_push_common(remove_junk_on_signal);
	234
	235	if (mkdir(sb_repo.buf, 0777))
	236	die_errno(_("could not create directory of '%s'"), sb_repo.buf);
	237	junk_git_dir = xstrdup(sb_repo.buf);
	238	is_junk = 1;
	239
	240	/*
	241	* lock the incomplete repo so prune won't delete it, unlock
	242	* after the preparation is over.
	243	*/
	244	strbuf_addf(&sb, "%s/locked", sb_repo.buf);
507e6e9e NTND	245	if (!opts->keep_locked)
	246	write_file(sb.buf, "initializing");
	247	else
	248	write_file(sb.buf, "added with --lock");
b979d950 ES	249
	250	strbuf_addf(&sb_git, "%s/.git", path);
	251	if (safe_create_leading_directories_const(sb_git.buf))
	252	die_errno(_("could not create leading directories of '%s'"),
	253	sb_git.buf);
	254	junk_work_tree = xstrdup(path);
	255
	256	strbuf_reset(&sb);
	257	strbuf_addf(&sb, "%s/gitdir", sb_repo.buf);
1f76a10b JH	258	write_file(sb.buf, "%s", real_path(sb_git.buf));
1f76a10b JH	259	write_file(sb_git.buf, "gitdir: %s/worktrees/%s",
b979d950 ES	260	real_path(get_git_common_dir()), name);
	261	/*
	262	* This is to keep resolve_ref() happy. We need a valid HEAD
ed197a6a ES	263	* or is_git_directory() will reject the directory. Any value which
	264	* looks like an object ID will do since it will be immediately
	265	* replaced by the symbolic-ref or update-ref invocation in the new
	266	* worktree.
b979d950	267	*/
b979d950 ES	268	strbuf_reset(&sb);
b979d950 ES	269	strbuf_addf(&sb, "%s/HEAD", sb_repo.buf);
dabd35f4	270	write_file(sb.buf, "%s", sha1_to_hex(null_sha1));
b979d950 ES	271	strbuf_reset(&sb);
b979d950 ES	272	strbuf_addf(&sb, "%s/commondir", sb_repo.buf);
1f76a10b	273	write_file(sb.buf, "../..");
b979d950	274
cd2f4713	275	fprintf_ln(stderr, _("Preparing %s (identifier %s)"), path, name);
b979d950	276
ae2a3827 ES	277	argv_array_pushf(&child_env, "%s=%s", GIT_DIR_ENVIRONMENT, sb_git.buf);
ae2a3827 ES	278	argv_array_pushf(&child_env, "%s=%s", GIT_WORK_TREE_ENVIRONMENT, path);
b979d950	279	cp.git_cmd = 1;
7f44e3d1 ES	280
	281	if (commit)
	282	argv_array_pushl(&cp.args, "update-ref", "HEAD",
f2fd0760	283	oid_to_hex(&commit->object.oid), NULL);
7f44e3d1 ES	284	else
	285	argv_array_pushl(&cp.args, "symbolic-ref", "HEAD",
	286	symref.buf, NULL);
	287	cp.env = child_env.argv;
	288	ret = run_command(&cp);
	289	if (ret)
	290	goto done;
	291
ef2a0ac9 RZ	292	if (opts->checkout) {
	293	cp.argv = NULL;
	294	argv_array_clear(&cp.args);
	295	argv_array_pushl(&cp.args, "reset", "--hard", NULL);
	296	cp.env = child_env.argv;
	297	ret = run_command(&cp);
	298	if (ret)
	299	goto done;
b979d950	300	}
ef2a0ac9 RZ	301
ef2a0ac9 RZ	302	is_junk = 0;
88ce3ef6 ÆAB	303	FREE_AND_NULL(junk_work_tree);
88ce3ef6 ÆAB	304	FREE_AND_NULL(junk_git_dir);
ef2a0ac9	305
7f44e3d1	306	done:
507e6e9e NTND	307	if (ret \|\| !opts->keep_locked) {
	308	strbuf_reset(&sb);
	309	strbuf_addf(&sb, "%s/locked", sb_repo.buf);
	310	unlink_or_warn(sb.buf);
	311	}
ae2a3827	312	argv_array_clear(&child_env);
b979d950	313	strbuf_release(&sb);
f7c9dac1	314	strbuf_release(&symref);
b979d950 ES	315	strbuf_release(&sb_repo);
	316	strbuf_release(&sb_git);
	317	return ret;
	318	}
	319
fc56361f ES	320	static int add(int ac, const char *av, const char prefix)
fc56361f ES	321	{
5dd6e234 ES	322	struct add_opts opts;
5dd6e234 ES	323	const char *new_branch_force = NULL;
e4da43b1 JK	324	char *path;
e4da43b1 JK	325	const char *branch;
fc56361f	326	struct option options[] = {
5dd6e234 ES	327	OPT__FORCE(&opts.force, N_("checkout <branch> even if already checked out in other worktree")),
5dd6e234 ES	328	OPT_STRING('b', NULL, &opts.new_branch, N_("branch"),
cbdf60fa ES	329	N_("create a new branch")),
	330	OPT_STRING('B', NULL, &new_branch_force, N_("branch"),
	331	N_("create or reset a branch")),
5dd6e234	332	OPT_BOOL(0, "detach", &opts.detach, N_("detach HEAD at named commit")),
ef2a0ac9	333	OPT_BOOL(0, "checkout", &opts.checkout, N_("populate the new working tree")),
507e6e9e	334	OPT_BOOL(0, "lock", &opts.keep_locked, N_("keep the new working tree locked")),
fc56361f ES	335	OPT_END()
	336	};
	337
5dd6e234	338	memset(&opts, 0, sizeof(opts));
ef2a0ac9	339	opts.checkout = 1;
fc56361f	340	ac = parse_options(ac, av, prefix, options, worktree_usage, 0);
ab0b2c53 ES	341	if (!!opts.detach + !!opts.new_branch + !!new_branch_force > 1)
ab0b2c53 ES	342	die(_("-b, -B, and --detach are mutually exclusive"));
0f4af3b9 ES	343	if (ac < 1 \|\| ac > 2)
0f4af3b9 ES	344	usage_with_options(worktree_usage, options);
fc56361f	345
116fb64e	346	path = prefix_filename(prefix, av[0]);
0f4af3b9	347	branch = ac < 2 ? "HEAD" : av[1];
fc56361f	348
1a450e2f JDG	349	if (!strcmp(branch, "-"))
	350	branch = "@{-1}";
	351
5dd6e234	352	opts.force_new_branch = !!new_branch_force;
beb6f24b NTND	353	if (opts.force_new_branch) {
	354	struct strbuf symref = STRBUF_INIT;
	355
5dd6e234	356	opts.new_branch = new_branch_force;
eef005dc	357
beb6f24b NTND	358	if (!opts.force &&
	359	!strbuf_check_branch_ref(&symref, opts.new_branch) &&
	360	ref_exists(symref.buf))
8d9fdd70	361	die_if_checked_out(symref.buf, 0);
beb6f24b NTND	362	strbuf_release(&symref);
	363	}
	364
5c942570	365	if (ac < 2 && !opts.new_branch && !opts.detach) {
1eb07d82 ES	366	int n;
1eb07d82 ES	367	const char *s = worktree_basename(path, &n);
5dd6e234	368	opts.new_branch = xstrndup(s, n);
1eb07d82 ES	369	}
1eb07d82 ES	370
c2842439	371	if (opts.new_branch) {
542aa25d	372	struct child_process cp = CHILD_PROCESS_INIT;
c2842439 ES	373	cp.git_cmd = 1;
	374	argv_array_push(&cp.args, "branch");
	375	if (opts.force_new_branch)
	376	argv_array_push(&cp.args, "--force");
	377	argv_array_push(&cp.args, opts.new_branch);
	378	argv_array_push(&cp.args, branch);
	379	if (run_command(&cp))
	380	return -1;
	381	branch = opts.new_branch;
1eb07d82 ES	382	}
1eb07d82 ES	383
0e5bba53 JK	384	UNLEAK(path);
0e5bba53 JK	385	UNLEAK(opts);
80a0548f	386	return add_worktree(path, branch, &opts);
fc56361f ES	387	}
fc56361f ES	388
bb9c03b8 MR	389	static void show_worktree_porcelain(struct worktree *wt)
	390	{
	391	printf("worktree %s\n", wt->path);
	392	if (wt->is_bare)
	393	printf("bare\n");
	394	else {
	395	printf("HEAD %s\n", sha1_to_hex(wt->head_sha1));
	396	if (wt->is_detached)
	397	printf("detached\n");
a234563a	398	else if (wt->head_ref)
bb9c03b8 MR	399	printf("branch %s\n", wt->head_ref);
	400	}
	401	printf("\n");
	402	}
	403
	404	static void show_worktree(struct worktree *wt, int path_maxlen, int abbrev_len)
	405	{
	406	struct strbuf sb = STRBUF_INIT;
	407	int cur_path_len = strlen(wt->path);
	408	int path_adj = cur_path_len - utf8_strwidth(wt->path);
	409
	410	strbuf_addf(&sb, "%-*s ", 1 + path_maxlen + path_adj, wt->path);
	411	if (wt->is_bare)
	412	strbuf_addstr(&sb, "(bare)");
	413	else {
	414	strbuf_addf(&sb, "%-*s ", abbrev_len,
	415	find_unique_abbrev(wt->head_sha1, DEFAULT_ABBREV));
96f09e2a	416	if (wt->is_detached)
bb9c03b8	417	strbuf_addstr(&sb, "(detached HEAD)");
2e11f58f JS	418	else if (wt->head_ref) {
	419	char *ref = shorten_unambiguous_ref(wt->head_ref, 0);
	420	strbuf_addf(&sb, "[%s]", ref);
	421	free(ref);
	422	} else
a234563a	423	strbuf_addstr(&sb, "(error)");
bb9c03b8 MR	424	}
	425	printf("%s\n", sb.buf);
	426
	427	strbuf_release(&sb);
	428	}
	429
	430	static void measure_widths(struct worktree *wt, int abbrev, int *maxlen)
	431	{
	432	int i;
	433
	434	for (i = 0; wt[i]; i++) {
	435	int sha1_len;
	436	int path_len = strlen(wt[i]->path);
	437
	438	if (path_len > *maxlen)
	439	*maxlen = path_len;
	440	sha1_len = strlen(find_unique_abbrev(wt[i]->head_sha1, *abbrev));
	441	if (sha1_len > *abbrev)
	442	*abbrev = sha1_len;
	443	}
	444	}
	445
	446	static int list(int ac, const char *av, const char prefix)
	447	{
	448	int porcelain = 0;
	449
	450	struct option options[] = {
	451	OPT_BOOL(0, "porcelain", &porcelain, N_("machine-readable output")),
	452	OPT_END()
	453	};
	454
	455	ac = parse_options(ac, av, prefix, options, worktree_usage, 0);
	456	if (ac)
	457	usage_with_options(worktree_usage, options);
	458	else {
4df1d4d4	459	struct worktree **worktrees = get_worktrees(GWT_SORT_LINKED);
bb9c03b8 MR	460	int path_maxlen = 0, abbrev = DEFAULT_ABBREV, i;
	461
	462	if (!porcelain)
	463	measure_widths(worktrees, &abbrev, &path_maxlen);
	464
	465	for (i = 0; worktrees[i]; i++) {
	466	if (porcelain)
	467	show_worktree_porcelain(worktrees[i]);
	468	else
	469	show_worktree(worktrees[i], path_maxlen, abbrev);
	470	}
	471	free_worktrees(worktrees);
	472	}
	473	return 0;
	474	}
	475
58142c09 NTND	476	static int lock_worktree(int ac, const char *av, const char prefix)
	477	{
	478	const char reason = "", old_reason;
	479	struct option options[] = {
	480	OPT_STRING(0, "reason", &reason, N_("string"),
	481	N_("reason for locking")),
	482	OPT_END()
	483	};
	484	struct worktree *worktrees, wt;
	485
	486	ac = parse_options(ac, av, prefix, options, worktree_usage, 0);
	487	if (ac != 1)
	488	usage_with_options(worktree_usage, options);
	489
4fff1ef7	490	worktrees = get_worktrees(0);
58142c09 NTND	491	wt = find_worktree(worktrees, prefix, av[0]);
	492	if (!wt)
	493	die(_("'%s' is not a working tree"), av[0]);
	494	if (is_main_worktree(wt))
	495	die(_("The main working tree cannot be locked or unlocked"));
	496
	497	old_reason = is_worktree_locked(wt);
	498	if (old_reason) {
	499	if (*old_reason)
	500	die(_("'%s' is already locked, reason: %s"),
	501	av[0], old_reason);
	502	die(_("'%s' is already locked"), av[0]);
	503	}
	504
	505	write_file(git_common_path("worktrees/%s/locked", wt->id),
	506	"%s", reason);
	507	free_worktrees(worktrees);
	508	return 0;
	509	}
	510
6d308627 NTND	511	static int unlock_worktree(int ac, const char *av, const char prefix)
	512	{
	513	struct option options[] = {
	514	OPT_END()
	515	};
	516	struct worktree *worktrees, wt;
	517	int ret;
	518
	519	ac = parse_options(ac, av, prefix, options, worktree_usage, 0);
	520	if (ac != 1)
	521	usage_with_options(worktree_usage, options);
	522
4fff1ef7	523	worktrees = get_worktrees(0);
6d308627 NTND	524	wt = find_worktree(worktrees, prefix, av[0]);
	525	if (!wt)
	526	die(_("'%s' is not a working tree"), av[0]);
	527	if (is_main_worktree(wt))
	528	die(_("The main working tree cannot be locked or unlocked"));
	529	if (!is_worktree_locked(wt))
	530	die(_("'%s' is not locked"), av[0]);
	531	ret = unlink_or_warn(git_common_path("worktrees/%s/locked", wt->id));
	532	free_worktrees(worktrees);
	533	return ret;
	534	}
	535
df0b6cfb NTND	536	int cmd_worktree(int ac, const char *av, const char prefix)
	537	{
	538	struct option options[] = {
	539	OPT_END()
	540	};
	541
d49028e6 JH	542	git_config(git_default_config, NULL);
d49028e6 JH	543
df0b6cfb NTND	544	if (ac < 2)
df0b6cfb NTND	545	usage_with_options(worktree_usage, options);
0409e0b6 NTND	546	if (!prefix)
0409e0b6 NTND	547	prefix = "";
fc56361f ES	548	if (!strcmp(av[1], "add"))
fc56361f ES	549	return add(ac - 1, av + 1, prefix);
df0b6cfb NTND	550	if (!strcmp(av[1], "prune"))
df0b6cfb NTND	551	return prune(ac - 1, av + 1, prefix);
bb9c03b8 MR	552	if (!strcmp(av[1], "list"))
bb9c03b8 MR	553	return list(ac - 1, av + 1, prefix);
58142c09 NTND	554	if (!strcmp(av[1], "lock"))
58142c09 NTND	555	return lock_worktree(ac - 1, av + 1, prefix);
6d308627 NTND	556	if (!strcmp(av[1], "unlock"))
6d308627 NTND	557	return unlock_worktree(ac - 1, av + 1, prefix);
df0b6cfb NTND	558	usage_with_options(worktree_usage, options);
df0b6cfb NTND	559	}