[thirdparty/git.git] / upload-pack.c

#include "cache.h"
#include "refs.h"
#include "pkt-line.h"
#include "tag.h"
#include "object.h"

static const char upload_pack_usage[] = "git-upload-pack [--strict] [--timeout=nn] <dir>";

#define OUR_REF (1U << 1)
#define WANTED (1U << 2)
#define MAX_HAS 256
#define MAX_NEEDS 256
static int nr_has = 0, nr_needs = 0, nr_our_refs = 0;
static unsigned char has_sha1[MAX_HAS][20];
static unsigned char needs_sha1[MAX_NEEDS][20];
static unsigned int timeout = 0;

static void reset_timeout(void)
{
	alarm(timeout);
}

static int strip(char *line, int len)
{
	if (len && line[len-1] == '\n')
		line[--len] = 0;
	return len;
}

static void create_pack_file(void)
{
	int fd[2];
	pid_t pid;
	int create_full_pack = (nr_our_refs == nr_needs && !nr_has);

	if (pipe(fd) < 0)
		die("git-upload-pack: unable to create pipe");
	pid = fork();
	if (pid < 0)
		die("git-upload-pack: unable to fork git-rev-list");

	if (!pid) {
		int i;
		int args;
		char **argv;
		char *buf;
		char **p;

		if (create_full_pack)
			args = 10;
		else
			args = nr_has + nr_needs + 5;
		argv = xmalloc(args * sizeof(char *));
		buf = xmalloc(args * 45);
		p = argv;

		dup2(fd[1], 1);
		close(0);
		close(fd[0]);
		close(fd[1]);
		*p++ = "git-rev-list";
		*p++ = "--objects";
		if (create_full_pack || MAX_NEEDS <= nr_needs)
			*p++ = "--all";
		else {
			for (i = 0; i < nr_needs; i++) {
				*p++ = buf;
				memcpy(buf, sha1_to_hex(needs_sha1[i]), 41);
				buf += 41;
			}
		}
		if (!create_full_pack)
			for (i = 0; i < nr_has; i++) {
				*p++ = buf;
				*buf++ = '^';
				memcpy(buf, sha1_to_hex(has_sha1[i]), 41);
				buf += 41;
			}
		*p++ = NULL;
		execvp("git-rev-list", argv);
		die("git-upload-pack: unable to exec git-rev-list");
	}
	dup2(fd[0], 0);
	close(fd[0]);
	close(fd[1]);
	execlp("git-pack-objects", "git-pack-objects", "--stdout", NULL);
	die("git-upload-pack: unable to exec git-pack-objects");
}

static int got_sha1(char *hex, unsigned char *sha1)
{
	int nr;
	if (get_sha1_hex(hex, sha1))
		die("git-upload-pack: expected SHA1 object, got '%s'", hex);
	if (!has_sha1_file(sha1))
		return 0;
	nr = nr_has;
	if (nr < MAX_HAS) {
		memcpy(has_sha1[nr], sha1, 20);
		nr_has = nr+1;
	}
	return 1;
}

static int get_common_commits(void)
{
	static char line[1000];
	unsigned char sha1[20];
	int len;

	for(;;) {
		len = packet_read_line(0, line, sizeof(line));
		reset_timeout();

		if (!len) {
			packet_write(1, "NAK\n");
			continue;
		}
		len = strip(line, len);
		if (!strncmp(line, "have ", 5)) {
			if (got_sha1(line+5, sha1)) {
				packet_write(1, "ACK %s\n", sha1_to_hex(sha1));
				break;
			}
			continue;
		}
		if (!strcmp(line, "done")) {
			packet_write(1, "NAK\n");
			return -1;
		}
		die("git-upload-pack: expected SHA1 list, got '%s'", line);
	}

	for (;;) {
		len = packet_read_line(0, line, sizeof(line));
		reset_timeout();
		if (!len)
			continue;
		len = strip(line, len);
		if (!strncmp(line, "have ", 5)) {
			got_sha1(line+5, sha1);
			continue;
		}
		if (!strcmp(line, "done"))
			break;
		die("git-upload-pack: expected SHA1 list, got '%s'", line);
	}
	return 0;
}

static int receive_needs(void)
{
	static char line[1000];
	int len, needs;

	needs = 0;
	for (;;) {
		struct object *o;
		unsigned char dummy[20], *sha1_buf;
		len = packet_read_line(0, line, sizeof(line));
		reset_timeout();
		if (!len)
			return needs;

		sha1_buf = dummy;
		if (needs == MAX_NEEDS) {
			fprintf(stderr,
				"warning: supporting only a max of %d requests. "
				"sending everything instead.\n",
				MAX_NEEDS);
		}
		else if (needs < MAX_NEEDS)
			sha1_buf = needs_sha1[needs];

		if (strncmp("want ", line, 5) || get_sha1_hex(line+5, sha1_buf))
			die("git-upload-pack: protocol error, "
			    "expected to get sha, not '%s'", line);

		/* We have sent all our refs already, and the other end
		 * should have chosen out of them; otherwise they are
		 * asking for nonsense.
		 *
		 * Hmph.  We may later want to allow "want" line that
		 * asks for something like "master~10" (symbolic)...
		 * would it make sense?  I don't know.
		 */
		o = lookup_object(sha1_buf);
		if (!o || !(o->flags & OUR_REF))
			die("git-upload-pack: not our ref %s", line+5);
		if (!(o->flags & WANTED)) {
			o->flags |= WANTED;
			needs++;
		}
	}
}

static int send_ref(const char *refname, const unsigned char *sha1)
{
	struct object *o = parse_object(sha1);

	packet_write(1, "%s %s\n", sha1_to_hex(sha1), refname);
	if (!(o->flags & OUR_REF)) {
		o->flags |= OUR_REF;
		nr_our_refs++;
	}
	if (o->type == tag_type) {
		o = deref_tag(o);
		packet_write(1, "%s %s^{}\n", sha1_to_hex(o->sha1), refname);
	}
	return 0;
}

static int upload_pack(void)
{
	reset_timeout();
	head_ref(send_ref);
	for_each_ref(send_ref);
	packet_flush(1);
	nr_needs = receive_needs();
	if (!nr_needs)
		return 0;
	get_common_commits();
	create_pack_file();
	return 0;
}

int main(int argc, char **argv)
{
	const char *dir;
	int i;
	int strict = 0;

	for (i = 1; i < argc; i++) {
		char *arg = argv[i];

		if (arg[0] != '-')
			break;
		if (!strcmp(arg, "--strict")) {
			strict = 1;
			continue;
		}
		if (!strncmp(arg, "--timeout=", 10)) {
			timeout = atoi(arg+10);
			continue;
		}
		if (!strcmp(arg, "--")) {
			i++;
			break;
		}
	}
	
	if (i != argc-1)
		usage(upload_pack_usage);
	dir = argv[i];

	/* chdir to the directory. If that fails, try appending ".git" */
	if (chdir(dir) < 0) {
		if (strict || chdir(mkpath("%s.git", dir)) < 0)
			die("git-upload-pack unable to chdir to %s", dir);
	}
	if (!strict)
		chdir(".git");

	if (access("objects", X_OK) || access("refs", X_OK))
		die("git-upload-pack: %s doesn't seem to be a git archive", dir);

	putenv("GIT_DIR=.");
	upload_pack();
	return 0;
}
Commit	Line	Data
def88e9a LT	1	#include "cache.h"
	2	#include "refs.h"
	3	#include "pkt-line.h"
f6b42a81 JH	4	#include "tag.h"
f6b42a81 JH	5	#include "object.h"
def88e9a	6
960deccb	7	static const char upload_pack_usage[] = "git-upload-pack [--strict] [--timeout=nn] <dir>";
def88e9a	8
565ebbf7 JH	9	#define OUR_REF (1U << 1)
565ebbf7 JH	10	#define WANTED (1U << 2)
6b32884a JH	11	#define MAX_HAS 256
6b32884a JH	12	#define MAX_NEEDS 256
565ebbf7	13	static int nr_has = 0, nr_needs = 0, nr_our_refs = 0;
fb9040cc LT	14	static unsigned char has_sha1[MAX_HAS][20];
fb9040cc LT	15	static unsigned char needs_sha1[MAX_NEEDS][20];
960deccb PA	16	static unsigned int timeout = 0;
	17
	18	static void reset_timeout(void)
	19	{
	20	alarm(timeout);
	21	}
fb9040cc	22
75bfc6c2 LT	23	static int strip(char *line, int len)
	24	{
	25	if (len && line[len-1] == '\n')
	26	line[--len] = 0;
	27	return len;
	28	}
	29
fb9040cc LT	30	static void create_pack_file(void)
fb9040cc LT	31	{
75bfc6c2 LT	32	int fd[2];
75bfc6c2 LT	33	pid_t pid;
565ebbf7	34	int create_full_pack = (nr_our_refs == nr_needs && !nr_has);
75bfc6c2 LT	35
	36	if (pipe(fd) < 0)
	37	die("git-upload-pack: unable to create pipe");
	38	pid = fork();
	39	if (pid < 0)
	40	die("git-upload-pack: unable to fork git-rev-list");
	41
	42	if (!pid) {
	43	int i;
e091eb93 JH	44	int args;
	45	char **argv;
	46	char *buf;
	47	char **p;
	48
565ebbf7 JH	49	if (create_full_pack)
565ebbf7 JH	50	args = 10;
e091eb93 JH	51	else
	52	args = nr_has + nr_needs + 5;
	53	argv = xmalloc(args * sizeof(char *));
	54	buf = xmalloc(args * 45);
	55	p = argv;
75bfc6c2 LT	56
	57	dup2(fd[1], 1);
	58	close(0);
	59	close(fd[0]);
	60	close(fd[1]);
	61	*p++ = "git-rev-list";
	62	*p++ = "--objects";
b5c367f7	63	if (create_full_pack \|\| MAX_NEEDS <= nr_needs)
e091eb93 JH	64	*p++ = "--all";
	65	else {
	66	for (i = 0; i < nr_needs; i++) {
	67	*p++ = buf;
	68	memcpy(buf, sha1_to_hex(needs_sha1[i]), 41);
	69	buf += 41;
	70	}
75bfc6c2	71	}
b5c367f7 JS	72	if (!create_full_pack)
	73	for (i = 0; i < nr_has; i++) {
	74	*p++ = buf;
	75	*buf++ = '^';
	76	memcpy(buf, sha1_to_hex(has_sha1[i]), 41);
	77	buf += 41;
	78	}
75bfc6c2 LT	79	*p++ = NULL;
	80	execvp("git-rev-list", argv);
	81	die("git-upload-pack: unable to exec git-rev-list");
	82	}
	83	dup2(fd[0], 0);
	84	close(fd[0]);
	85	close(fd[1]);
	86	execlp("git-pack-objects", "git-pack-objects", "--stdout", NULL);
	87	die("git-upload-pack: unable to exec git-pack-objects");
fb9040cc LT	88	}
fb9040cc LT	89
def88e9a LT	90	static int got_sha1(char hex, unsigned char sha1)
def88e9a LT	91	{
af2d3aa4	92	int nr;
def88e9a LT	93	if (get_sha1_hex(hex, sha1))
def88e9a LT	94	die("git-upload-pack: expected SHA1 object, got '%s'", hex);
fb9040cc LT	95	if (!has_sha1_file(sha1))
fb9040cc LT	96	return 0;
af2d3aa4 JH	97	nr = nr_has;
	98	if (nr < MAX_HAS) {
	99	memcpy(has_sha1[nr], sha1, 20);
	100	nr_has = nr+1;
fb9040cc LT	101	}
fb9040cc LT	102	return 1;
def88e9a LT	103	}
	104
	105	static int get_common_commits(void)
	106	{
	107	static char line[1000];
	108	unsigned char sha1[20];
	109	int len;
	110
	111	for(;;) {
	112	len = packet_read_line(0, line, sizeof(line));
960deccb	113	reset_timeout();
def88e9a LT	114
def88e9a LT	115	if (!len) {
af2d3aa4	116	packet_write(1, "NAK\n");
def88e9a LT	117	continue;
def88e9a LT	118	}
75bfc6c2	119	len = strip(line, len);
def88e9a	120	if (!strncmp(line, "have ", 5)) {
af2d3aa4 JH	121	if (got_sha1(line+5, sha1)) {
	122	packet_write(1, "ACK %s\n", sha1_to_hex(sha1));
	123	break;
	124	}
def88e9a LT	125	continue;
	126	}
	127	if (!strcmp(line, "done")) {
	128	packet_write(1, "NAK\n");
	129	return -1;
	130	}
	131	die("git-upload-pack: expected SHA1 list, got '%s'", line);
	132	}
af2d3aa4 JH	133
	134	for (;;) {
	135	len = packet_read_line(0, line, sizeof(line));
	136	reset_timeout();
	137	if (!len)
	138	continue;
	139	len = strip(line, len);
	140	if (!strncmp(line, "have ", 5)) {
	141	got_sha1(line+5, sha1);
	142	continue;
	143	}
	144	if (!strcmp(line, "done"))
	145	break;
	146	die("git-upload-pack: expected SHA1 list, got '%s'", line);
	147	}
	148	return 0;
def88e9a LT	149	}
def88e9a LT	150
fb9040cc LT	151	static int receive_needs(void)
	152	{
	153	static char line[1000];
	154	int len, needs;
	155
	156	needs = 0;
	157	for (;;) {
565ebbf7	158	struct object *o;
e091eb93	159	unsigned char dummy[20], *sha1_buf;
fb9040cc	160	len = packet_read_line(0, line, sizeof(line));
960deccb	161	reset_timeout();
fb9040cc LT	162	if (!len)
	163	return needs;
	164
e091eb93 JH	165	sha1_buf = dummy;
	166	if (needs == MAX_NEEDS) {
	167	fprintf(stderr,
	168	"warning: supporting only a max of %d requests. "
	169	"sending everything instead.\n",
	170	MAX_NEEDS);
	171	}
	172	else if (needs < MAX_NEEDS)
	173	sha1_buf = needs_sha1[needs];
	174
	175	if (strncmp("want ", line, 5) \|\| get_sha1_hex(line+5, sha1_buf))
	176	die("git-upload-pack: protocol error, "
	177	"expected to get sha, not '%s'", line);
565ebbf7 JH	178
	179	/* We have sent all our refs already, and the other end
	180	* should have chosen out of them; otherwise they are
	181	* asking for nonsense.
	182	*
	183	* Hmph. We may later want to allow "want" line that
	184	* asks for something like "master~10" (symbolic)...
	185	* would it make sense? I don't know.
	186	*/
	187	o = lookup_object(sha1_buf);
	188	if (!o \|\| !(o->flags & OUR_REF))
	189	die("git-upload-pack: not our ref %s", line+5);
	190	if (!(o->flags & WANTED)) {
	191	o->flags \|= WANTED;
	192	needs++;
	193	}
fb9040cc LT	194	}
	195	}
	196
def88e9a LT	197	static int send_ref(const char refname, const unsigned char sha1)
def88e9a LT	198	{
f6b42a81 JH	199	struct object *o = parse_object(sha1);
f6b42a81 JH	200
def88e9a	201	packet_write(1, "%s %s\n", sha1_to_hex(sha1), refname);
565ebbf7 JH	202	if (!(o->flags & OUR_REF)) {
	203	o->flags \|= OUR_REF;
	204	nr_our_refs++;
	205	}
f6b42a81 JH	206	if (o->type == tag_type) {
	207	o = deref_tag(o);
	208	packet_write(1, "%s %s^{}\n", sha1_to_hex(o->sha1), refname);
	209	}
def88e9a LT	210	return 0;
	211	}
	212
	213	static int upload_pack(void)
	214	{
960deccb	215	reset_timeout();
723c31fe	216	head_ref(send_ref);
def88e9a LT	217	for_each_ref(send_ref);
def88e9a LT	218	packet_flush(1);
fb9040cc LT	219	nr_needs = receive_needs();
	220	if (!nr_needs)
	221	return 0;
def88e9a	222	get_common_commits();
fb9040cc	223	create_pack_file();
def88e9a LT	224	return 0;
	225	}
	226
	227	int main(int argc, char **argv)
	228	{
	229	const char *dir;
960deccb PA	230	int i;
	231	int strict = 0;
	232
	233	for (i = 1; i < argc; i++) {
	234	char *arg = argv[i];
	235
	236	if (arg[0] != '-')
	237	break;
	238	if (!strcmp(arg, "--strict")) {
	239	strict = 1;
	240	continue;
	241	}
	242	if (!strncmp(arg, "--timeout=", 10)) {
	243	timeout = atoi(arg+10);
	244	continue;
	245	}
	246	if (!strcmp(arg, "--")) {
	247	i++;
	248	break;
	249	}
	250	}
	251
	252	if (i != argc-1)
def88e9a	253	usage(upload_pack_usage);
960deccb	254	dir = argv[i];
113b9475 LT	255
	256	/* chdir to the directory. If that fails, try appending ".git" */
	257	if (chdir(dir) < 0) {
960deccb	258	if (strict \|\| chdir(mkpath("%s.git", dir)) < 0)
113b9475 LT	259	die("git-upload-pack unable to chdir to %s", dir);
113b9475 LT	260	}
960deccb PA	261	if (!strict)
	262	chdir(".git");
	263
def88e9a LT	264	if (access("objects", X_OK) \|\| access("refs", X_OK))
def88e9a LT	265	die("git-upload-pack: %s doesn't seem to be a git archive", dir);
960deccb	266
e72a7d45	267	putenv("GIT_DIR=.");
def88e9a LT	268	upload_pack();
	269	return 0;
	270	}