Merge with Linus' current tree
[alt-git.git] / fetch-pack.c
blobb8367a4d625fdfe59cf30e0a4aed40443139c40c
1 #include "cache.h"
2 #include "refs.h"
3 #include "pkt-line.h"
4 #include <sys/wait.h>
6 static const char fetch_pack_usage[] = "git-fetch-pack [host:]directory [heads]* < mycommitlist";
7 static const char *exec = "git-upload-pack";
9 static int get_ack(int fd, unsigned char *result_sha1)
11 static char line[1000];
12 int len = packet_read_line(fd, line, sizeof(line));
14 if (!len)
15 die("git-fetch-pack: expected ACK/NAK, got EOF");
16 if (line[len-1] == '\n')
17 line[--len] = 0;
18 if (!strcmp(line, "NAK"))
19 return 0;
20 if (!strncmp(line, "ACK ", 3)) {
21 if (!get_sha1_hex(line+4, result_sha1))
22 return 1;
24 die("git-fetch_pack: expected ACK/NAK, got '%s'", line);
27 static int find_common(int fd[2], unsigned char *result_sha1, unsigned char *remote)
29 static char line[1000];
30 int count = 0, flushes = 0, retval;
31 FILE *revs;
33 revs = popen("git-rev-list $(git-rev-parse --all)", "r");
34 if (!revs)
35 die("unable to run 'git-rev-list'");
36 packet_write(fd[1], "want %s\n", sha1_to_hex(remote));
37 packet_flush(fd[1]);
38 flushes = 1;
39 retval = -1;
40 while (fgets(line, sizeof(line), revs) != NULL) {
41 unsigned char sha1[20];
42 if (get_sha1_hex(line, sha1))
43 die("git-fetch-pack: expected object name, got crud");
44 packet_write(fd[1], "have %s\n", sha1_to_hex(sha1));
45 if (!(31 & ++count)) {
46 packet_flush(fd[1]);
47 flushes++;
50 * We keep one window "ahead" of the other side, and
51 * will wait for an ACK only on the next one
53 if (count == 32)
54 continue;
55 if (get_ack(fd[0], result_sha1)) {
56 flushes = 0;
57 retval = 0;
58 break;
60 flushes--;
63 pclose(revs);
64 packet_write(fd[1], "done\n");
65 while (flushes) {
66 flushes--;
67 if (get_ack(fd[0], result_sha1))
68 return 0;
70 return retval;
73 static int get_old_sha1(const char *refname, unsigned char *sha1)
75 static char pathname[PATH_MAX];
76 const char *git_dir;
77 int fd, ret;
79 git_dir = gitenv(GIT_DIR_ENVIRONMENT) ? : DEFAULT_GIT_DIR_ENVIRONMENT;
80 snprintf(pathname, sizeof(pathname), "%s/%s", git_dir, refname);
81 fd = open(pathname, O_RDONLY);
82 ret = -1;
83 if (fd >= 0) {
84 char buffer[60];
85 if (read(fd, buffer, sizeof(buffer)) >= 40)
86 ret = get_sha1_hex(buffer, sha1);
87 close(fd);
89 return ret;
92 static int check_ref(const char *refname, const unsigned char *sha1)
94 unsigned char mysha1[20];
95 char oldhex[41];
97 if (get_old_sha1(refname, mysha1) < 0)
98 memset(mysha1, 0, 20);
100 if (!memcmp(sha1, mysha1, 20)) {
101 fprintf(stderr, "%s: unchanged\n", refname);
102 return 0;
105 memcpy(oldhex, sha1_to_hex(mysha1), 41);
106 fprintf(stderr, "%s: %s (%s)\n", refname, sha1_to_hex(sha1), oldhex);
107 return 1;
110 static int get_remote_heads(int fd, int nr_match, char **match, unsigned char *result)
112 int count = 0;
114 for (;;) {
115 static char line[1000];
116 unsigned char sha1[20];
117 char *refname;
118 int len;
120 len = packet_read_line(fd, line, sizeof(line));
121 if (!len)
122 break;
123 if (line[len-1] == '\n')
124 line[--len] = 0;
125 if (len < 42 || get_sha1_hex(line, sha1))
126 die("git-fetch-pack: protocol error - expected ref descriptor, got '%sä'", line);
127 refname = line+41;
128 if (nr_match && !path_match(refname, nr_match, match))
129 continue;
130 if (check_ref(refname, sha1)) {
131 count++;
132 memcpy(result, sha1, 20);
135 return count;
138 static int fetch_pack(int fd[2], int nr_match, char **match)
140 unsigned char sha1[20], remote[20];
141 int heads, status;
142 pid_t pid;
144 heads = get_remote_heads(fd[0], nr_match, match, remote);
145 if (heads != 1) {
146 packet_flush(fd[1]);
147 die(heads ? "multiple remote heads" : "no matching remote head");
149 if (find_common(fd, sha1, remote) < 0)
150 die("git-fetch-pack: no common commits");
151 pid = fork();
152 if (pid < 0)
153 die("git-fetch-pack: unable to fork off git-unpack-objects");
154 if (!pid) {
155 close(fd[1]);
156 dup2(fd[0], 0);
157 close(fd[0]);
158 execlp("git-unpack-objects", "git-unpack-objects", NULL);
159 die("git-unpack-objects exec failed");
161 close(fd[0]);
162 close(fd[1]);
163 while (waitpid(pid, &status, 0) < 0) {
164 if (errno != EINTR)
165 die("waiting for git-unpack-objects: %s", strerror(errno));
167 if (WIFEXITED(status)) {
168 int code = WEXITSTATUS(status);
169 if (code)
170 die("git-unpack-objects died with error code %d", code);
171 puts(sha1_to_hex(remote));
172 return 0;
174 if (WIFSIGNALED(status)) {
175 int sig = WTERMSIG(status);
176 die("git-unpack-objects died of signal %d", sig);
178 die("Sherlock Holmes! git-unpack-objects died of unnatural causes %d!", status);
181 int main(int argc, char **argv)
183 int i, ret, nr_heads;
184 char *dest = NULL, **heads;
185 int fd[2];
186 pid_t pid;
188 nr_heads = 0;
189 heads = NULL;
190 for (i = 1; i < argc; i++) {
191 char *arg = argv[i];
193 if (*arg == '-') {
194 /* Arguments go here */
195 usage(fetch_pack_usage);
197 dest = arg;
198 heads = argv + i + 1;
199 nr_heads = argc - i - 1;
200 break;
202 if (!dest)
203 usage(fetch_pack_usage);
204 pid = git_connect(fd, dest, exec);
205 if (pid < 0)
206 return 1;
207 ret = fetch_pack(fd, nr_heads, heads);
208 close(fd[0]);
209 close(fd[1]);
210 finish_connect(pid);
211 return ret;