1#include "cache.h"
2#include "pkt-line.h"
3#include "quote.h"
4#include <sys/wait.h>
5#include <sys/socket.h>
6#include <netinet/in.h>
7#include <arpa/inet.h>
8#include <netdb.h>
9
10/*
11 * Read all the refs from the other end
12 */
13struct ref **get_remote_heads(int in, struct ref **list, int nr_match, char **match)
14{
15 *list = NULL;
16 for (;;) {
17 struct ref *ref;
18 unsigned char old_sha1[20];
19 static char buffer[1000];
20 char *name;
21 int len;
22
23 len = packet_read_line(in, buffer, sizeof(buffer));
24 if (!len)
25 break;
26 if (buffer[len-1] == '\n')
27 buffer[--len] = 0;
28
29 if (len < 42 || get_sha1_hex(buffer, old_sha1) || buffer[40] != ' ')
30 die("protocol error: expected sha/ref, got '%s'", buffer);
31 name = buffer + 41;
32 if (nr_match && !path_match(name, nr_match, match))
33 continue;
34 ref = xcalloc(1, sizeof(*ref) + len - 40);
35 memcpy(ref->old_sha1, old_sha1, 20);
36 memcpy(ref->name, buffer + 41, len - 40);
37 *list = ref;
38 list = &ref->next;
39 }
40 return list;
41}
42
43int get_ack(int fd, unsigned char *result_sha1)
44{
45 static char line[1000];
46 int len = packet_read_line(fd, line, sizeof(line));
47
48 if (!len)
49 die("git-fetch-pack: expected ACK/NAK, got EOF");
50 if (line[len-1] == '\n')
51 line[--len] = 0;
52 if (!strcmp(line, "NAK"))
53 return 0;
54 if (!strncmp(line, "ACK ", 3)) {
55 if (!get_sha1_hex(line+4, result_sha1))
56 return 1;
57 }
58 die("git-fetch_pack: expected ACK/NAK, got '%s'", line);
59}
60
61int path_match(const char *path, int nr, char **match)
62{
63 int i;
64 int pathlen = strlen(path);
65
66 for (i = 0; i < nr; i++) {
67 char *s = match[i];
68 int len = strlen(s);
69
70 if (!len || len > pathlen)
71 continue;
72 if (memcmp(path + pathlen - len, s, len))
73 continue;
74 if (pathlen > len && path[pathlen - len - 1] != '/')
75 continue;
76 *s = 0;
77 return 1;
78 }
79 return 0;
80}
81
82struct refspec {
83 char *src;
84 char *dst;
85 char force;
86};
87
88/*
89 * A:B means fast forward remote B with local A.
90 * +A:B means overwrite remote B with local A.
91 * +A is a shorthand for +A:A.
92 * A is a shorthand for A:A.
93 */
94static struct refspec *parse_ref_spec(int nr_refspec, char **refspec)
95{
96 int i;
97 struct refspec *rs = xcalloc(sizeof(*rs), (nr_refspec + 1));
98 for (i = 0; i < nr_refspec; i++) {
99 char *sp, *dp, *ep;
100 sp = refspec[i];
101 if (*sp == '+') {
102 rs[i].force = 1;
103 sp++;
104 }
105 ep = strchr(sp, ':');
106 if (ep) {
107 dp = ep + 1;
108 *ep = 0;
109 }
110 else
111 dp = sp;
112 rs[i].src = sp;
113 rs[i].dst = dp;
114 }
115 rs[nr_refspec].src = rs[nr_refspec].dst = NULL;
116 return rs;
117}
118
119static int count_refspec_match(const char *pattern,
120 struct ref *refs,
121 struct ref **matched_ref)
122{
123 int match;
124 int patlen = strlen(pattern);
125
126 for (match = 0; refs; refs = refs->next) {
127 char *name = refs->name;
128 int namelen = strlen(name);
129 if (namelen < patlen ||
130 memcmp(name + namelen - patlen, pattern, patlen))
131 continue;
132 if (namelen != patlen && name[namelen - patlen - 1] != '/')
133 continue;
134 match++;
135 *matched_ref = refs;
136 }
137 return match;
138}
139
140static void link_dst_tail(struct ref *ref, struct ref ***tail)
141{
142 **tail = ref;
143 *tail = &ref->next;
144 **tail = NULL;
145}
146
147static struct ref *try_explicit_object_name(const char *name)
148{
149 unsigned char sha1[20];
150 struct ref *ref;
151 int len;
152 if (get_sha1(name, sha1))
153 return NULL;
154 len = strlen(name) + 1;
155 ref = xcalloc(1, sizeof(*ref) + len);
156 memcpy(ref->name, name, len);
157 memcpy(ref->new_sha1, sha1, 20);
158 return ref;
159}
160
161static int match_explicit_refs(struct ref *src, struct ref *dst,
162 struct ref ***dst_tail, struct refspec *rs)
163{
164 int i, errs;
165 for (i = errs = 0; rs[i].src; i++) {
166 struct ref *matched_src, *matched_dst;
167
168 matched_src = matched_dst = NULL;
169 switch (count_refspec_match(rs[i].src, src, &matched_src)) {
170 case 1:
171 break;
172 case 0:
173 /* The source could be in the get_sha1() format
174 * not a reference name.
175 */
176 matched_src = try_explicit_object_name(rs[i].src);
177 if (matched_src)
178 break;
179 errs = 1;
180 error("src refspec %s does not match any.",
181 rs[i].src);
182 break;
183 default:
184 errs = 1;
185 error("src refspec %s matches more than one.",
186 rs[i].src);
187 break;
188 }
189 switch (count_refspec_match(rs[i].dst, dst, &matched_dst)) {
190 case 1:
191 break;
192 case 0:
193 if (!memcmp(rs[i].dst, "refs/", 5)) {
194 int len = strlen(rs[i].dst) + 1;
195 matched_dst = xcalloc(1, sizeof(*dst) + len);
196 memcpy(matched_dst->name, rs[i].dst, len);
197 link_dst_tail(matched_dst, dst_tail);
198 }
199 else if (!strcmp(rs[i].src, rs[i].dst) &&
200 matched_src) {
201 /* pushing "master:master" when
202 * remote does not have master yet.
203 */
204 int len = strlen(matched_src->name) + 1;
205 matched_dst = xcalloc(1, sizeof(*dst) + len);
206 memcpy(matched_dst->name, matched_src->name,
207 len);
208 link_dst_tail(matched_dst, dst_tail);
209 }
210 else {
211 errs = 1;
212 error("dst refspec %s does not match any "
213 "existing ref on the remote and does "
214 "not start with refs/.", rs[i].dst);
215 }
216 break;
217 default:
218 errs = 1;
219 error("dst refspec %s matches more than one.",
220 rs[i].dst);
221 break;
222 }
223 if (errs)
224 continue;
225 if (matched_dst->peer_ref) {
226 errs = 1;
227 error("dst ref %s receives from more than one src.",
228 matched_dst->name);
229 }
230 else {
231 matched_dst->peer_ref = matched_src;
232 matched_dst->force = rs[i].force;
233 }
234 }
235 return -errs;
236}
237
238static struct ref *find_ref_by_name(struct ref *list, const char *name)
239{
240 for ( ; list; list = list->next)
241 if (!strcmp(list->name, name))
242 return list;
243 return NULL;
244}
245
246int match_refs(struct ref *src, struct ref *dst, struct ref ***dst_tail,
247 int nr_refspec, char **refspec, int all)
248{
249 struct refspec *rs = parse_ref_spec(nr_refspec, refspec);
250
251 if (nr_refspec)
252 return match_explicit_refs(src, dst, dst_tail, rs);
253
254 /* pick the remainder */
255 for ( ; src; src = src->next) {
256 struct ref *dst_peer;
257 if (src->peer_ref)
258 continue;
259 dst_peer = find_ref_by_name(dst, src->name);
260 if ((dst_peer && dst_peer->peer_ref) || (!dst_peer && !all))
261 continue;
262 if (!dst_peer) {
263 /* Create a new one and link it */
264 int len = strlen(src->name) + 1;
265 dst_peer = xcalloc(1, sizeof(*dst_peer) + len);
266 memcpy(dst_peer->name, src->name, len);
267 memcpy(dst_peer->new_sha1, src->new_sha1, 20);
268 link_dst_tail(dst_peer, dst_tail);
269 }
270 dst_peer->peer_ref = src;
271 }
272 return 0;
273}
274
275enum protocol {
276 PROTO_LOCAL = 1,
277 PROTO_SSH,
278 PROTO_GIT,
279};
280
281static enum protocol get_protocol(const char *name)
282{
283 if (!strcmp(name, "ssh"))
284 return PROTO_SSH;
285 if (!strcmp(name, "git"))
286 return PROTO_GIT;
287 if (!strcmp(name, "git+ssh"))
288 return PROTO_SSH;
289 if (!strcmp(name, "ssh+git"))
290 return PROTO_SSH;
291 die("I don't handle protocol '%s'", name);
292}
293
294#define STR_(s) # s
295#define STR(s) STR_(s)
296
297#ifndef NO_IPV6
298
299static int git_tcp_connect(int fd[2], const char *prog, char *host, char *path)
300{
301 int sockfd = -1;
302 char *colon, *end;
303 char *port = STR(DEFAULT_GIT_PORT);
304 struct addrinfo hints, *ai0, *ai;
305 int gai;
306
307 if (host[0] == '[') {
308 end = strchr(host + 1, ']');
309 if (end) {
310 *end = 0;
311 end++;
312 host++;
313 } else
314 end = host;
315 } else
316 end = host;
317 colon = strchr(end, ':');
318
319 if (colon) {
320 *colon = 0;
321 port = colon + 1;
322 }
323
324 memset(&hints, 0, sizeof(hints));
325 hints.ai_socktype = SOCK_STREAM;
326 hints.ai_protocol = IPPROTO_TCP;
327
328 gai = getaddrinfo(host, port, &hints, &ai);
329 if (gai)
330 die("Unable to look up %s (%s)", host, gai_strerror(gai));
331
332 for (ai0 = ai; ai; ai = ai->ai_next) {
333 sockfd = socket(ai->ai_family, ai->ai_socktype, ai->ai_protocol);
334 if (sockfd < 0)
335 continue;
336 if (connect(sockfd, ai->ai_addr, ai->ai_addrlen) < 0) {
337 close(sockfd);
338 sockfd = -1;
339 continue;
340 }
341 break;
342 }
343
344 freeaddrinfo(ai0);
345
346 if (sockfd < 0)
347 die("unable to connect a socket (%s)", strerror(errno));
348
349 fd[0] = sockfd;
350 fd[1] = sockfd;
351 packet_write(sockfd, "%s %s\n", prog, path);
352 return 0;
353}
354
355#else /* NO_IPV6 */
356
357static int git_tcp_connect(int fd[2], const char *prog, char *host, char *path)
358{
359 int sockfd = -1;
360 char *colon, *end;
361 char *port = STR(DEFAULT_GIT_PORT), *ep;
362 struct hostent *he;
363 struct sockaddr_in sa;
364 char **ap;
365 unsigned int nport;
366
367 if (host[0] == '[') {
368 end = strchr(host + 1, ']');
369 if (end) {
370 *end = 0;
371 end++;
372 host++;
373 } else
374 end = host;
375 } else
376 end = host;
377 colon = strchr(end, ':');
378
379 if (colon) {
380 *colon = 0;
381 port = colon + 1;
382 }
383
384
385 he = gethostbyname(host);
386 if (!he)
387 die("Unable to look up %s (%s)", host, hstrerror(h_errno));
388 nport = strtoul(port, &ep, 10);
389 if ( ep == port || *ep ) {
390 /* Not numeric */
391 struct servent *se = getservbyname(port,"tcp");
392 if ( !se )
393 die("Unknown port %s\n", port);
394 nport = se->s_port;
395 }
396
397 for (ap = he->h_addr_list; *ap; ap++) {
398 sockfd = socket(he->h_addrtype, SOCK_STREAM, 0);
399 if (sockfd < 0)
400 continue;
401
402 memset(&sa, 0, sizeof sa);
403 sa.sin_family = he->h_addrtype;
404 sa.sin_port = htons(nport);
405 memcpy(&sa.sin_addr, ap, he->h_length);
406
407 if (connect(sockfd, (struct sockaddr *)&sa, sizeof sa) < 0) {
408 close(sockfd);
409 sockfd = -1;
410 continue;
411 }
412 break;
413 }
414
415 if (sockfd < 0)
416 die("unable to connect a socket (%s)", strerror(errno));
417
418 fd[0] = sockfd;
419 fd[1] = sockfd;
420 packet_write(sockfd, "%s %s\n", prog, path);
421 return 0;
422}
423
424#endif /* NO_IPV6 */
425
426/*
427 * Yeah, yeah, fixme. Need to pass in the heads etc.
428 */
429int git_connect(int fd[2], char *url, const char *prog)
430{
431 char command[1024];
432 char *host, *path;
433 char *colon;
434 int pipefd[2][2];
435 pid_t pid;
436 enum protocol protocol;
437
438 host = NULL;
439 path = url;
440 colon = strchr(url, ':');
441 protocol = PROTO_LOCAL;
442 if (colon) {
443 *colon = 0;
444 host = url;
445 path = colon+1;
446 protocol = PROTO_SSH;
447 if (!memcmp(path, "//", 2)) {
448 char *slash = strchr(path + 2, '/');
449 if (slash) {
450 int nr = slash - path - 2;
451 memmove(path, path+2, nr);
452 path[nr] = 0;
453 protocol = get_protocol(url);
454 host = path;
455 path = slash;
456 }
457 }
458 }
459
460 if (protocol == PROTO_GIT)
461 return git_tcp_connect(fd, prog, host, path);
462
463 if (pipe(pipefd[0]) < 0 || pipe(pipefd[1]) < 0)
464 die("unable to create pipe pair for communication");
465 pid = fork();
466 if (!pid) {
467 snprintf(command, sizeof(command), "%s %s", prog,
468 sq_quote(path));
469 dup2(pipefd[1][0], 0);
470 dup2(pipefd[0][1], 1);
471 close(pipefd[0][0]);
472 close(pipefd[0][1]);
473 close(pipefd[1][0]);
474 close(pipefd[1][1]);
475 if (protocol == PROTO_SSH) {
476 const char *ssh, *ssh_basename;
477 ssh = getenv("GIT_SSH");
478 if (!ssh) ssh = "ssh";
479 ssh_basename = strrchr(ssh, '/');
480 if (!ssh_basename)
481 ssh_basename = ssh;
482 else
483 ssh_basename++;
484 execlp(ssh, ssh_basename, host, command, NULL);
485 }
486 else
487 execlp("sh", "sh", "-c", command, NULL);
488 die("exec failed");
489 }
490 fd[0] = pipefd[0][0];
491 fd[1] = pipefd[1][1];
492 close(pipefd[0][1]);
493 close(pipefd[1][0]);
494 return pid;
495}
496
497int finish_connect(pid_t pid)
498{
499 int ret;
500
501 for (;;) {
502 ret = waitpid(pid, NULL, 0);
503 if (!ret)
504 break;
505 if (errno != EINTR)
506 break;
507 }
508 return ret;
509}