Merge branch 'fixes'
[git.git] / connect.c
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  */
13 struct 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
43 int 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
61 int 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
82 struct 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  */
94 static 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
119 static 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
140 static void link_dst_tail(struct ref *ref, struct ref ***tail)
141 {
142         **tail = ref;
143         *tail = &ref->next;
144         **tail = NULL;
145 }
146
147 static 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
161 static 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
238 static 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
246 int 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
275 enum protocol {
276         PROTO_LOCAL = 1,
277         PROTO_SSH,
278         PROTO_GIT,
279 };
280
281 static 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
299 static 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
357 static 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  */
429 int 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
497 int 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 }