[thirdparty/git.git] / walker.c

#include "cache.h"
#include "walker.h"
#include "commit.h"
#include "tree.h"
#include "tree-walk.h"
#include "tag.h"
#include "blob.h"
#include "refs.h"

static unsigned char current_commit_sha1[20];

void walker_say(struct walker *walker, const char *fmt, const char *hex)
{
	if (walker->get_verbosely)
		fprintf(stderr, fmt, hex);
}

static void report_missing(const struct object *obj)
{
	char missing_hex[41];
	strcpy(missing_hex, sha1_to_hex(obj->sha1));
	fprintf(stderr, "Cannot obtain needed %s %s\n",
		obj->type ? typename(obj->type): "object", missing_hex);
	if (!is_null_sha1(current_commit_sha1))
		fprintf(stderr, "while processing commit %s.\n",
			sha1_to_hex(current_commit_sha1));
}

static int process(struct walker *walker, struct object *obj);

static int process_tree(struct walker *walker, struct tree *tree)
{
	struct tree_desc desc;
	struct name_entry entry;

	if (parse_tree(tree))
		return -1;

	init_tree_desc(&desc, tree->buffer, tree->size);
	while (tree_entry(&desc, &entry)) {
		struct object *obj = NULL;

		/* submodule commits are not stored in the superproject */
		if (S_ISGITLINK(entry.mode))
			continue;
		if (S_ISDIR(entry.mode)) {
			struct tree *tree = lookup_tree(entry.sha1);
			if (tree)
				obj = &tree->object;
		}
		else {
			struct blob *blob = lookup_blob(entry.sha1);
			if (blob)
				obj = &blob->object;
		}
		if (!obj || process(walker, obj))
			return -1;
	}
	free(tree->buffer);
	tree->buffer = NULL;
	tree->size = 0;
	tree->object.parsed = 0;
	return 0;
}

#define COMPLETE	(1U << 0)
#define SEEN		(1U << 1)
#define TO_SCAN		(1U << 2)

static struct commit_list *complete = NULL;

static int process_commit(struct walker *walker, struct commit *commit)
{
	if (parse_commit(commit))
		return -1;

	while (complete && complete->item->date >= commit->date) {
		pop_most_recent_commit(&complete, COMPLETE);
	}

	if (commit->object.flags & COMPLETE)
		return 0;

	hashcpy(current_commit_sha1, commit->object.sha1);

	walker_say(walker, "walk %s\n", sha1_to_hex(commit->object.sha1));

	if (walker->get_tree) {
		if (process(walker, &commit->tree->object))
			return -1;
		if (!walker->get_all)
			walker->get_tree = 0;
	}
	if (walker->get_history) {
		struct commit_list *parents = commit->parents;
		for (; parents; parents = parents->next) {
			if (process(walker, &parents->item->object))
				return -1;
		}
	}
	return 0;
}

static int process_tag(struct walker *walker, struct tag *tag)
{
	if (parse_tag(tag))
		return -1;
	return process(walker, tag->tagged);
}

static struct object_list *process_queue = NULL;
static struct object_list **process_queue_end = &process_queue;

static int process_object(struct walker *walker, struct object *obj)
{
	if (obj->type == OBJ_COMMIT) {
		if (process_commit(walker, (struct commit *)obj))
			return -1;
		return 0;
	}
	if (obj->type == OBJ_TREE) {
		if (process_tree(walker, (struct tree *)obj))
			return -1;
		return 0;
	}
	if (obj->type == OBJ_BLOB) {
		return 0;
	}
	if (obj->type == OBJ_TAG) {
		if (process_tag(walker, (struct tag *)obj))
			return -1;
		return 0;
	}
	return error("Unable to determine requirements "
		     "of type %s for %s",
		     typename(obj->type), sha1_to_hex(obj->sha1));
}

static int process(struct walker *walker, struct object *obj)
{
	if (obj->flags & SEEN)
		return 0;
	obj->flags |= SEEN;

	if (has_sha1_file(obj->sha1)) {
		/* We already have it, so we should scan it now. */
		obj->flags |= TO_SCAN;
	}
	else {
		if (obj->flags & COMPLETE)
			return 0;
		walker->prefetch(walker, obj->sha1);
	}

	object_list_insert(obj, process_queue_end);
	process_queue_end = &(*process_queue_end)->next;
	return 0;
}

static int loop(struct walker *walker)
{
	struct object_list *elem;

	while (process_queue) {
		struct object *obj = process_queue->item;
		elem = process_queue;
		process_queue = elem->next;
		free(elem);
		if (!process_queue)
			process_queue_end = &process_queue;

		/* If we are not scanning this object, we placed it in
		 * the queue because we needed to fetch it first.
		 */
		if (! (obj->flags & TO_SCAN)) {
			if (walker->fetch(walker, obj->sha1)) {
				report_missing(obj);
				return -1;
			}
		}
		if (!obj->type)
			parse_object(obj->sha1);
		if (process_object(walker, obj))
			return -1;
	}
	return 0;
}

static int interpret_target(struct walker *walker, char *target, unsigned char *sha1)
{
	if (!get_sha1_hex(target, sha1))
		return 0;
	if (!check_ref_format(target)) {
		struct ref *ref = alloc_ref(target);
		if (!walker->fetch_ref(walker, ref)) {
			hashcpy(sha1, ref->old_sha1);
			free(ref);
			return 0;
		}
		free(ref);
	}
	return -1;
}

static int mark_complete(const char *path, const unsigned char *sha1, int flag, void *cb_data)
{
	struct commit *commit = lookup_commit_reference_gently(sha1, 1);
	if (commit) {
		commit->object.flags |= COMPLETE;
		commit_list_insert_by_date(commit, &complete);
	}
	return 0;
}

int walker_targets_stdin(char ***target, const char ***write_ref)
{
	int targets = 0, targets_alloc = 0;
	struct strbuf buf = STRBUF_INIT;
	*target = NULL; *write_ref = NULL;
	while (1) {
		char *rf_one = NULL;
		char *tg_one;

		if (strbuf_getline(&buf, stdin, '\n') == EOF)
			break;
		tg_one = buf.buf;
		rf_one = strchr(tg_one, '\t');
		if (rf_one)
			*rf_one++ = 0;

		if (targets >= targets_alloc) {
			targets_alloc = targets_alloc ? targets_alloc * 2 : 64;
			*target = xrealloc(*target, targets_alloc * sizeof(**target));
			*write_ref = xrealloc(*write_ref, targets_alloc * sizeof(**write_ref));
		}
		(*target)[targets] = xstrdup(tg_one);
		(*write_ref)[targets] = rf_one ? xstrdup(rf_one) : NULL;
		targets++;
	}
	strbuf_release(&buf);
	return targets;
}

void walker_targets_free(int targets, char **target, const char **write_ref)
{
	while (targets--) {
		free(target[targets]);
		if (write_ref)
			free((char *) write_ref[targets]);
	}
}

int walker_fetch(struct walker *walker, int targets, char **target,
		 const char **write_ref, const char *write_ref_log_details)
{
	struct ref_lock **lock = xcalloc(targets, sizeof(struct ref_lock *));
	unsigned char *sha1 = xmalloc(targets * 20);
	char *msg;
	int ret;
	int i;

	save_commit_buffer = 0;

	for (i = 0; i < targets; i++) {
		if (!write_ref || !write_ref[i])
			continue;

		lock[i] = lock_ref_sha1(write_ref[i], NULL);
		if (!lock[i]) {
			error("Can't lock ref %s", write_ref[i]);
			goto unlock_and_fail;
		}
	}

	if (!walker->get_recover)
		for_each_ref(mark_complete, NULL);

	for (i = 0; i < targets; i++) {
		if (interpret_target(walker, target[i], &sha1[20 * i])) {
			error("Could not interpret response from server '%s' as something to pull", target[i]);
			goto unlock_and_fail;
		}
		if (process(walker, lookup_unknown_object(&sha1[20 * i])))
			goto unlock_and_fail;
	}

	if (loop(walker))
		goto unlock_and_fail;

	if (write_ref_log_details) {
		msg = xmalloc(strlen(write_ref_log_details) + 12);
		sprintf(msg, "fetch from %s", write_ref_log_details);
	} else {
		msg = NULL;
	}
	for (i = 0; i < targets; i++) {
		if (!write_ref || !write_ref[i])
			continue;
		ret = write_ref_sha1(lock[i], &sha1[20 * i], msg ? msg : "fetch (unknown)");
		lock[i] = NULL;
		if (ret)
			goto unlock_and_fail;
	}
	free(msg);

	return 0;

unlock_and_fail:
	for (i = 0; i < targets; i++)
		if (lock[i])
			unlock_ref(lock[i]);

	return -1;
}

void walker_free(struct walker *walker)
{
	walker->cleanup(walker);
	free(walker);
}
Commit	Line	Data
4250a5e5	1	#include "cache.h"
30ae764b	2	#include "walker.h"
4250a5e5 DB	3	#include "commit.h"
4250a5e5 DB	4	#include "tree.h"
1bc995a3	5	#include "tree-walk.h"
3173bd49 DB	6	#include "tag.h"
3173bd49 DB	7	#include "blob.h"
cd541a68 DB	8	#include "refs.h"
cd541a68 DB	9
b2d62f16	10	static unsigned char current_commit_sha1[20];
4250a5e5	11
30ae764b	12	void walker_say(struct walker walker, const char fmt, const char *hex)
1e8be59d	13	{
30ae764b	14	if (walker->get_verbosely)
e78d9772 JH	15	fprintf(stderr, fmt, hex);
	16	}
	17
0d7a6e4e	18	static void report_missing(const struct object *obj)
b2d62f16 JH	19	{
b2d62f16 JH	20	char missing_hex[41];
ba19a808	21	strcpy(missing_hex, sha1_to_hex(obj->sha1));
0d7a6e4e AR	22	fprintf(stderr, "Cannot obtain needed %s %s\n",
	23	obj->type ? typename(obj->type): "object", missing_hex);
	24	if (!is_null_sha1(current_commit_sha1))
	25	fprintf(stderr, "while processing commit %s.\n",
	26	sha1_to_hex(current_commit_sha1));
b2d62f16 JH	27	}
b2d62f16 JH	28
30ae764b	29	static int process(struct walker walker, struct object obj);
3173bd49	30
30ae764b	31	static int process_tree(struct walker walker, struct tree tree)
4250a5e5	32	{
1bc995a3	33	struct tree_desc desc;
4c068a98	34	struct name_entry entry;
4250a5e5 DB	35
	36	if (parse_tree(tree))
	37	return -1;
	38
6fda5e51	39	init_tree_desc(&desc, tree->buffer, tree->size);
4c068a98	40	while (tree_entry(&desc, &entry)) {
6f9012b6 JH	41	struct object *obj = NULL;
6f9012b6 JH	42
582c7393	43	/* submodule commits are not stored in the superproject */
68fb4650	44	if (S_ISGITLINK(entry.mode))
582c7393	45	continue;
4c068a98 LT	46	if (S_ISDIR(entry.mode)) {
4c068a98 LT	47	struct tree *tree = lookup_tree(entry.sha1);
6f9012b6 JH	48	if (tree)
	49	obj = &tree->object;
	50	}
	51	else {
4c068a98	52	struct blob *blob = lookup_blob(entry.sha1);
6f9012b6 JH	53	if (blob)
6f9012b6 JH	54	obj = &blob->object;
2d9c58c6	55	}
30ae764b	56	if (!obj \|\| process(walker, obj))
4250a5e5	57	return -1;
4250a5e5	58	}
2d9c58c6 LT	59	free(tree->buffer);
2d9c58c6 LT	60	tree->buffer = NULL;
1bc995a3	61	tree->size = 0;
541fc218	62	tree->object.parsed = 0;
4250a5e5 DB	63	return 0;
	64	}
	65
24451c31 SV	66	#define COMPLETE (1U << 0)
	67	#define SEEN (1U << 1)
	68	#define TO_SCAN (1U << 2)
85d106c2	69
d0ac30f2	70	static struct commit_list *complete = NULL;
22c6e1d0	71
30ae764b	72	static int process_commit(struct walker walker, struct commit commit)
4250a5e5	73	{
1e8be59d	74	if (parse_commit(commit))
4250a5e5 DB	75	return -1;
4250a5e5 DB	76
22c6e1d0	77	while (complete && complete->item->date >= commit->date) {
d0ac30f2	78	pop_most_recent_commit(&complete, COMPLETE);
22c6e1d0	79	}
22c6e1d0	80
d0ac30f2	81	if (commit->object.flags & COMPLETE)
22c6e1d0 DB	82	return 0;
22c6e1d0 DB	83
e702496e	84	hashcpy(current_commit_sha1, commit->object.sha1);
4250a5e5	85
30ae764b	86	walker_say(walker, "walk %s\n", sha1_to_hex(commit->object.sha1));
85d106c2	87
30ae764b DB	88	if (walker->get_tree) {
30ae764b DB	89	if (process(walker, &commit->tree->object))
4250a5e5	90	return -1;
30ae764b DB	91	if (!walker->get_all)
30ae764b DB	92	walker->get_tree = 0;
4250a5e5	93	}
30ae764b	94	if (walker->get_history) {
1e8be59d	95	struct commit_list *parents = commit->parents;
4250a5e5	96	for (; parents; parents = parents->next) {
30ae764b	97	if (process(walker, &parents->item->object))
4250a5e5 DB	98	return -1;
	99	}
	100	}
	101	return 0;
	102	}
	103
30ae764b	104	static int process_tag(struct walker walker, struct tag tag)
3173bd49	105	{
1e8be59d	106	if (parse_tag(tag))
3173bd49	107	return -1;
30ae764b	108	return process(walker, tag->tagged);
3173bd49 DB	109	}
3173bd49 DB	110
1e8be59d DB	111	static struct object_list *process_queue = NULL;
	112	static struct object_list **process_queue_end = &process_queue;
	113
30ae764b	114	static int process_object(struct walker walker, struct object obj)
3173bd49	115	{
1974632c	116	if (obj->type == OBJ_COMMIT) {
30ae764b	117	if (process_commit(walker, (struct commit *)obj))
f88fcf8b DB	118	return -1;
	119	return 0;
	120	}
1974632c	121	if (obj->type == OBJ_TREE) {
30ae764b	122	if (process_tree(walker, (struct tree *)obj))
f88fcf8b DB	123	return -1;
	124	return 0;
	125	}
1974632c	126	if (obj->type == OBJ_BLOB) {
f88fcf8b DB	127	return 0;
f88fcf8b DB	128	}
1974632c	129	if (obj->type == OBJ_TAG) {
30ae764b	130	if (process_tag(walker, (struct tag *)obj))
f88fcf8b	131	return -1;
3173bd49	132	return 0;
f88fcf8b DB	133	}
	134	return error("Unable to determine requirements "
	135	"of type %s for %s",
885a86ab	136	typename(obj->type), sha1_to_hex(obj->sha1));
f88fcf8b DB	137	}
f88fcf8b DB	138
30ae764b	139	static int process(struct walker walker, struct object obj)
f88fcf8b	140	{
a82d07e5 SV	141	if (obj->flags & SEEN)
	142	return 0;
	143	obj->flags \|= SEEN;
	144
80077f07	145	if (has_sha1_file(obj->sha1)) {
f88fcf8b	146	/* We already have it, so we should scan it now. */
85d106c2	147	obj->flags \|= TO_SCAN;
e5f38ec3 JH	148	}
e5f38ec3 JH	149	else {
7b64d06b SV	150	if (obj->flags & COMPLETE)
7b64d06b SV	151	return 0;
30ae764b	152	walker->prefetch(walker, obj->sha1);
f88fcf8b	153	}
a6080a0a	154
1e8be59d DB	155	object_list_insert(obj, process_queue_end);
1e8be59d DB	156	process_queue_end = &(*process_queue_end)->next;
1e8be59d DB	157	return 0;
	158	}
	159
30ae764b	160	static int loop(struct walker *walker)
1e8be59d	161	{
85d106c2 JH	162	struct object_list *elem;
85d106c2 JH	163
1e8be59d DB	164	while (process_queue) {
1e8be59d DB	165	struct object *obj = process_queue->item;
85d106c2 JH	166	elem = process_queue;
	167	process_queue = elem->next;
	168	free(elem);
1e8be59d DB	169	if (!process_queue)
	170	process_queue_end = &process_queue;
	171
85d106c2 JH	172	/* If we are not scanning this object, we placed it in
	173	* the queue because we needed to fetch it first.
	174	*/
	175	if (! (obj->flags & TO_SCAN)) {
30ae764b	176	if (walker->fetch(walker, obj->sha1)) {
0d7a6e4e	177	report_missing(obj);
85d106c2 JH	178	return -1;
	179	}
	180	}
1e8be59d DB	181	if (!obj->type)
1e8be59d DB	182	parse_object(obj->sha1);
30ae764b	183	if (process_object(walker, obj))
f88fcf8b	184	return -1;
1e8be59d DB	185	}
1e8be59d DB	186	return 0;
3173bd49 DB	187	}
3173bd49 DB	188
30ae764b	189	static int interpret_target(struct walker walker, char target, unsigned char *sha1)
cd541a68 DB	190	{
	191	if (!get_sha1_hex(target, sha1))
	192	return 0;
	193	if (!check_ref_format(target)) {
59c69c0c	194	struct ref *ref = alloc_ref(target);
c13b2633 DB	195	if (!walker->fetch_ref(walker, ref)) {
	196	hashcpy(sha1, ref->old_sha1);
	197	free(ref);
cd541a68 DB	198	return 0;
cd541a68 DB	199	}
c13b2633	200	free(ref);
cd541a68 DB	201	}
	202	return -1;
	203	}
	204
8da19775	205	static int mark_complete(const char path, const unsigned char sha1, int flag, void *cb_data)
22c6e1d0	206	{
d0ac30f2 JH	207	struct commit *commit = lookup_commit_reference_gently(sha1, 1);
	208	if (commit) {
	209	commit->object.flags \|= COMPLETE;
47e44ed1	210	commit_list_insert_by_date(commit, &complete);
22c6e1d0 DB	211	}
	212	return 0;
	213	}
cd541a68	214
30ae764b	215	int walker_targets_stdin(char *target, const char *write_ref)
8e87ca66 PB	216	{
8e87ca66 PB	217	int targets = 0, targets_alloc = 0;
f285a2d7	218	struct strbuf buf = STRBUF_INIT;
8e87ca66	219	target = NULL; write_ref = NULL;
8e87ca66 PB	220	while (1) {
	221	char *rf_one = NULL;
	222	char *tg_one;
	223
e6c019d0	224	if (strbuf_getline(&buf, stdin, '\n') == EOF)
8e87ca66 PB	225	break;
	226	tg_one = buf.buf;
	227	rf_one = strchr(tg_one, '\t');
	228	if (rf_one)
	229	*rf_one++ = 0;
	230
	231	if (targets >= targets_alloc) {
	232	targets_alloc = targets_alloc ? targets_alloc * 2 : 64;
	233	target = xrealloc(target, targets_alloc * sizeof(**target));
	234	write_ref = xrealloc(write_ref, targets_alloc * sizeof(**write_ref));
	235	}
9befac47 SP	236	(*target)[targets] = xstrdup(tg_one);
9befac47 SP	237	(*write_ref)[targets] = rf_one ? xstrdup(rf_one) : NULL;
8e87ca66 PB	238	targets++;
8e87ca66 PB	239	}
e6c019d0	240	strbuf_release(&buf);
8e87ca66 PB	241	return targets;
	242	}
	243
30ae764b	244	void walker_targets_free(int targets, char target, const char write_ref)
8e87ca66 PB	245	{
	246	while (targets--) {
	247	free(target[targets]);
24deea52	248	if (write_ref)
8e87ca66 PB	249	free((char *) write_ref[targets]);
	250	}
	251	}
	252
30ae764b DB	253	int walker_fetch(struct walker walker, int targets, char *target,
30ae764b DB	254	const char *write_ref, const char write_ref_log_details)
4250a5e5	255	{
4211e4d1 PB	256	struct ref_lock *lock = xcalloc(targets, sizeof(struct ref_lock ));
4211e4d1 PB	257	unsigned char sha1 = xmalloc(targets 20);
d0740d92 SP	258	char *msg;
d0740d92 SP	259	int ret;
4211e4d1	260	int i;
cd541a68	261
98533b90	262	save_commit_buffer = 0;
4211e4d1 PB	263
4211e4d1 PB	264	for (i = 0; i < targets; i++) {
1b03dfed	265	if (!write_ref \|\| !write_ref[i])
4211e4d1 PB	266	continue;
4211e4d1 PB	267
4431fcc4	268	lock[i] = lock_ref_sha1(write_ref[i], NULL);
4211e4d1 PB	269	if (!lock[i]) {
	270	error("Can't lock ref %s", write_ref[i]);
	271	goto unlock_and_fail;
d0740d92	272	}
cd541a68 DB	273	}
cd541a68 DB	274
30ae764b	275	if (!walker->get_recover)
cb5d709f	276	for_each_ref(mark_complete, NULL);
22c6e1d0	277
4211e4d1	278	for (i = 0; i < targets; i++) {
30ae764b	279	if (interpret_target(walker, target[i], &sha1[20 * i])) {
5f48741a	280	error("Could not interpret response from server '%s' as something to pull", target[i]);
4211e4d1 PB	281	goto unlock_and_fail;
4211e4d1 PB	282	}
30ae764b	283	if (process(walker, lookup_unknown_object(&sha1[20 * i])))
4211e4d1	284	goto unlock_and_fail;
4bd18c43	285	}
4211e4d1	286
30ae764b	287	if (loop(walker))
4211e4d1 PB	288	goto unlock_and_fail;
	289
	290	if (write_ref_log_details) {
	291	msg = xmalloc(strlen(write_ref_log_details) + 12);
	292	sprintf(msg, "fetch from %s", write_ref_log_details);
	293	} else {
	294	msg = NULL;
4bd18c43	295	}
4211e4d1	296	for (i = 0; i < targets; i++) {
1b03dfed	297	if (!write_ref \|\| !write_ref[i])
4211e4d1 PB	298	continue;
	299	ret = write_ref_sha1(lock[i], &sha1[20 * i], msg ? msg : "fetch (unknown)");
	300	lock[i] = NULL;
	301	if (ret)
	302	goto unlock_and_fail;
4bd18c43	303	}
4cac42b1	304	free(msg);
4bd18c43	305
cd541a68	306	return 0;
4211e4d1	307
4211e4d1 PB	308	unlock_and_fail:
	309	for (i = 0; i < targets; i++)
	310	if (lock[i])
	311	unlock_ref(lock[i]);
30ae764b	312
4211e4d1	313	return -1;
4250a5e5	314	}
30ae764b DB	315
	316	void walker_free(struct walker *walker)
	317	{
	318	walker->cleanup(walker);
	319	free(walker);
	320	}