Merge branch 'jc/fetch-param'
[git] / transport.c
1 #include "cache.h"
2 #include "transport.h"
3 #include "run-command.h"
4 #include "pkt-line.h"
5 #include "fetch-pack.h"
6 #include "send-pack.h"
7 #include "walker.h"
8 #include "bundle.h"
9 #include "dir.h"
10 #include "refs.h"
11 #include "branch.h"
12
13 /* rsync support */
14
15 /*
16  * We copy packed-refs and refs/ into a temporary file, then read the
17  * loose refs recursively (sorting whenever possible), and then inserting
18  * those packed refs that are not yet in the list (not validating, but
19  * assuming that the file is sorted).
20  *
21  * Appears refactoring this from refs.c is too cumbersome.
22  */
23
24 static int str_cmp(const void *a, const void *b)
25 {
26         const char *s1 = a;
27         const char *s2 = b;
28
29         return strcmp(s1, s2);
30 }
31
32 /* path->buf + name_offset is expected to point to "refs/" */
33
34 static int read_loose_refs(struct strbuf *path, int name_offset,
35                 struct ref **tail)
36 {
37         DIR *dir = opendir(path->buf);
38         struct dirent *de;
39         struct {
40                 char **entries;
41                 int nr, alloc;
42         } list;
43         int i, pathlen;
44
45         if (!dir)
46                 return -1;
47
48         memset (&list, 0, sizeof(list));
49
50         while ((de = readdir(dir))) {
51                 if (is_dot_or_dotdot(de->d_name))
52                         continue;
53                 ALLOC_GROW(list.entries, list.nr + 1, list.alloc);
54                 list.entries[list.nr++] = xstrdup(de->d_name);
55         }
56         closedir(dir);
57
58         /* sort the list */
59
60         qsort(list.entries, list.nr, sizeof(char *), str_cmp);
61
62         pathlen = path->len;
63         strbuf_addch(path, '/');
64
65         for (i = 0; i < list.nr; i++, strbuf_setlen(path, pathlen + 1)) {
66                 strbuf_addstr(path, list.entries[i]);
67                 if (read_loose_refs(path, name_offset, tail)) {
68                         int fd = open(path->buf, O_RDONLY);
69                         char buffer[40];
70                         struct ref *next;
71
72                         if (fd < 0)
73                                 continue;
74                         next = alloc_ref(path->buf + name_offset);
75                         if (read_in_full(fd, buffer, 40) != 40 ||
76                                         get_sha1_hex(buffer, next->old_sha1)) {
77                                 close(fd);
78                                 free(next);
79                                 continue;
80                         }
81                         close(fd);
82                         (*tail)->next = next;
83                         *tail = next;
84                 }
85         }
86         strbuf_setlen(path, pathlen);
87
88         for (i = 0; i < list.nr; i++)
89                 free(list.entries[i]);
90         free(list.entries);
91
92         return 0;
93 }
94
95 /* insert the packed refs for which no loose refs were found */
96
97 static void insert_packed_refs(const char *packed_refs, struct ref **list)
98 {
99         FILE *f = fopen(packed_refs, "r");
100         static char buffer[PATH_MAX];
101
102         if (!f)
103                 return;
104
105         for (;;) {
106                 int cmp = cmp, len;
107
108                 if (!fgets(buffer, sizeof(buffer), f)) {
109                         fclose(f);
110                         return;
111                 }
112
113                 if (hexval(buffer[0]) > 0xf)
114                         continue;
115                 len = strlen(buffer);
116                 if (len && buffer[len - 1] == '\n')
117                         buffer[--len] = '\0';
118                 if (len < 41)
119                         continue;
120                 while ((*list)->next &&
121                                 (cmp = strcmp(buffer + 41,
122                                       (*list)->next->name)) > 0)
123                         list = &(*list)->next;
124                 if (!(*list)->next || cmp < 0) {
125                         struct ref *next = alloc_ref(buffer + 41);
126                         buffer[40] = '\0';
127                         if (get_sha1_hex(buffer, next->old_sha1)) {
128                                 warning ("invalid SHA-1: %s", buffer);
129                                 free(next);
130                                 continue;
131                         }
132                         next->next = (*list)->next;
133                         (*list)->next = next;
134                         list = &(*list)->next;
135                 }
136         }
137 }
138
139 static void set_upstreams(struct transport *transport, struct ref *refs,
140         int pretend)
141 {
142         struct ref *ref;
143         for (ref = refs; ref; ref = ref->next) {
144                 const char *localname;
145                 const char *tmp;
146                 const char *remotename;
147                 unsigned char sha[20];
148                 int flag = 0;
149                 /*
150                  * Check suitability for tracking. Must be successful /
151                  * already up-to-date ref create/modify (not delete).
152                  */
153                 if (ref->status != REF_STATUS_OK &&
154                         ref->status != REF_STATUS_UPTODATE)
155                         continue;
156                 if (!ref->peer_ref)
157                         continue;
158                 if (!ref->new_sha1 || is_null_sha1(ref->new_sha1))
159                         continue;
160
161                 /* Follow symbolic refs (mainly for HEAD). */
162                 localname = ref->peer_ref->name;
163                 remotename = ref->name;
164                 tmp = resolve_ref(localname, sha, 1, &flag);
165                 if (tmp && flag & REF_ISSYMREF &&
166                         !prefixcmp(tmp, "refs/heads/"))
167                         localname = tmp;
168
169                 /* Both source and destination must be local branches. */
170                 if (!localname || prefixcmp(localname, "refs/heads/"))
171                         continue;
172                 if (!remotename || prefixcmp(remotename, "refs/heads/"))
173                         continue;
174
175                 if (!pretend)
176                         install_branch_config(BRANCH_CONFIG_VERBOSE,
177                                 localname + 11, transport->remote->name,
178                                 remotename);
179                 else
180                         printf("Would set upstream of '%s' to '%s' of '%s'\n",
181                                 localname + 11, remotename + 11,
182                                 transport->remote->name);
183         }
184 }
185
186 static const char *rsync_url(const char *url)
187 {
188         return prefixcmp(url, "rsync://") ? skip_prefix(url, "rsync:") : url;
189 }
190
191 static struct ref *get_refs_via_rsync(struct transport *transport, int for_push)
192 {
193         struct strbuf buf = STRBUF_INIT, temp_dir = STRBUF_INIT;
194         struct ref dummy = {0}, *tail = &dummy;
195         struct child_process rsync;
196         const char *args[5];
197         int temp_dir_len;
198
199         if (for_push)
200                 return NULL;
201
202         /* copy the refs to the temporary directory */
203
204         strbuf_addstr(&temp_dir, git_path("rsync-refs-XXXXXX"));
205         if (!mkdtemp(temp_dir.buf))
206                 die_errno ("Could not make temporary directory");
207         temp_dir_len = temp_dir.len;
208
209         strbuf_addstr(&buf, rsync_url(transport->url));
210         strbuf_addstr(&buf, "/refs");
211
212         memset(&rsync, 0, sizeof(rsync));
213         rsync.argv = args;
214         rsync.stdout_to_stderr = 1;
215         args[0] = "rsync";
216         args[1] = (transport->verbose > 0) ? "-rv" : "-r";
217         args[2] = buf.buf;
218         args[3] = temp_dir.buf;
219         args[4] = NULL;
220
221         if (run_command(&rsync))
222                 die ("Could not run rsync to get refs");
223
224         strbuf_reset(&buf);
225         strbuf_addstr(&buf, rsync_url(transport->url));
226         strbuf_addstr(&buf, "/packed-refs");
227
228         args[2] = buf.buf;
229
230         if (run_command(&rsync))
231                 die ("Could not run rsync to get refs");
232
233         /* read the copied refs */
234
235         strbuf_addstr(&temp_dir, "/refs");
236         read_loose_refs(&temp_dir, temp_dir_len + 1, &tail);
237         strbuf_setlen(&temp_dir, temp_dir_len);
238
239         tail = &dummy;
240         strbuf_addstr(&temp_dir, "/packed-refs");
241         insert_packed_refs(temp_dir.buf, &tail);
242         strbuf_setlen(&temp_dir, temp_dir_len);
243
244         if (remove_dir_recursively(&temp_dir, 0))
245                 warning ("Error removing temporary directory %s.",
246                                 temp_dir.buf);
247
248         strbuf_release(&buf);
249         strbuf_release(&temp_dir);
250
251         return dummy.next;
252 }
253
254 static int fetch_objs_via_rsync(struct transport *transport,
255                                 int nr_objs, struct ref **to_fetch)
256 {
257         struct strbuf buf = STRBUF_INIT;
258         struct child_process rsync;
259         const char *args[8];
260         int result;
261
262         strbuf_addstr(&buf, rsync_url(transport->url));
263         strbuf_addstr(&buf, "/objects/");
264
265         memset(&rsync, 0, sizeof(rsync));
266         rsync.argv = args;
267         rsync.stdout_to_stderr = 1;
268         args[0] = "rsync";
269         args[1] = (transport->verbose > 0) ? "-rv" : "-r";
270         args[2] = "--ignore-existing";
271         args[3] = "--exclude";
272         args[4] = "info";
273         args[5] = buf.buf;
274         args[6] = get_object_directory();
275         args[7] = NULL;
276
277         /* NEEDSWORK: handle one level of alternates */
278         result = run_command(&rsync);
279
280         strbuf_release(&buf);
281
282         return result;
283 }
284
285 static int write_one_ref(const char *name, const unsigned char *sha1,
286                 int flags, void *data)
287 {
288         struct strbuf *buf = data;
289         int len = buf->len;
290         FILE *f;
291
292         /* when called via for_each_ref(), flags is non-zero */
293         if (flags && prefixcmp(name, "refs/heads/") &&
294                         prefixcmp(name, "refs/tags/"))
295                 return 0;
296
297         strbuf_addstr(buf, name);
298         if (safe_create_leading_directories(buf->buf) ||
299                         !(f = fopen(buf->buf, "w")) ||
300                         fprintf(f, "%s\n", sha1_to_hex(sha1)) < 0 ||
301                         fclose(f))
302                 return error("problems writing temporary file %s", buf->buf);
303         strbuf_setlen(buf, len);
304         return 0;
305 }
306
307 static int write_refs_to_temp_dir(struct strbuf *temp_dir,
308                 int refspec_nr, const char **refspec)
309 {
310         int i;
311
312         for (i = 0; i < refspec_nr; i++) {
313                 unsigned char sha1[20];
314                 char *ref;
315
316                 if (dwim_ref(refspec[i], strlen(refspec[i]), sha1, &ref) != 1)
317                         return error("Could not get ref %s", refspec[i]);
318
319                 if (write_one_ref(ref, sha1, 0, temp_dir)) {
320                         free(ref);
321                         return -1;
322                 }
323                 free(ref);
324         }
325         return 0;
326 }
327
328 static int rsync_transport_push(struct transport *transport,
329                 int refspec_nr, const char **refspec, int flags)
330 {
331         struct strbuf buf = STRBUF_INIT, temp_dir = STRBUF_INIT;
332         int result = 0, i;
333         struct child_process rsync;
334         const char *args[10];
335
336         if (flags & TRANSPORT_PUSH_MIRROR)
337                 return error("rsync transport does not support mirror mode");
338
339         /* first push the objects */
340
341         strbuf_addstr(&buf, rsync_url(transport->url));
342         strbuf_addch(&buf, '/');
343
344         memset(&rsync, 0, sizeof(rsync));
345         rsync.argv = args;
346         rsync.stdout_to_stderr = 1;
347         i = 0;
348         args[i++] = "rsync";
349         args[i++] = "-a";
350         if (flags & TRANSPORT_PUSH_DRY_RUN)
351                 args[i++] = "--dry-run";
352         if (transport->verbose > 0)
353                 args[i++] = "-v";
354         args[i++] = "--ignore-existing";
355         args[i++] = "--exclude";
356         args[i++] = "info";
357         args[i++] = get_object_directory();
358         args[i++] = buf.buf;
359         args[i++] = NULL;
360
361         if (run_command(&rsync))
362                 return error("Could not push objects to %s",
363                                 rsync_url(transport->url));
364
365         /* copy the refs to the temporary directory; they could be packed. */
366
367         strbuf_addstr(&temp_dir, git_path("rsync-refs-XXXXXX"));
368         if (!mkdtemp(temp_dir.buf))
369                 die_errno ("Could not make temporary directory");
370         strbuf_addch(&temp_dir, '/');
371
372         if (flags & TRANSPORT_PUSH_ALL) {
373                 if (for_each_ref(write_one_ref, &temp_dir))
374                         return -1;
375         } else if (write_refs_to_temp_dir(&temp_dir, refspec_nr, refspec))
376                 return -1;
377
378         i = 2;
379         if (flags & TRANSPORT_PUSH_DRY_RUN)
380                 args[i++] = "--dry-run";
381         if (!(flags & TRANSPORT_PUSH_FORCE))
382                 args[i++] = "--ignore-existing";
383         args[i++] = temp_dir.buf;
384         args[i++] = rsync_url(transport->url);
385         args[i++] = NULL;
386         if (run_command(&rsync))
387                 result = error("Could not push to %s",
388                                 rsync_url(transport->url));
389
390         if (remove_dir_recursively(&temp_dir, 0))
391                 warning ("Could not remove temporary directory %s.",
392                                 temp_dir.buf);
393
394         strbuf_release(&buf);
395         strbuf_release(&temp_dir);
396
397         return result;
398 }
399
400 struct bundle_transport_data {
401         int fd;
402         struct bundle_header header;
403 };
404
405 static struct ref *get_refs_from_bundle(struct transport *transport, int for_push)
406 {
407         struct bundle_transport_data *data = transport->data;
408         struct ref *result = NULL;
409         int i;
410
411         if (for_push)
412                 return NULL;
413
414         if (data->fd > 0)
415                 close(data->fd);
416         data->fd = read_bundle_header(transport->url, &data->header);
417         if (data->fd < 0)
418                 die ("Could not read bundle '%s'.", transport->url);
419         for (i = 0; i < data->header.references.nr; i++) {
420                 struct ref_list_entry *e = data->header.references.list + i;
421                 struct ref *ref = alloc_ref(e->name);
422                 hashcpy(ref->old_sha1, e->sha1);
423                 ref->next = result;
424                 result = ref;
425         }
426         return result;
427 }
428
429 static int fetch_refs_from_bundle(struct transport *transport,
430                                int nr_heads, struct ref **to_fetch)
431 {
432         struct bundle_transport_data *data = transport->data;
433         return unbundle(&data->header, data->fd);
434 }
435
436 static int close_bundle(struct transport *transport)
437 {
438         struct bundle_transport_data *data = transport->data;
439         if (data->fd > 0)
440                 close(data->fd);
441         free(data);
442         return 0;
443 }
444
445 struct git_transport_data {
446         struct git_transport_options options;
447         struct child_process *conn;
448         int fd[2];
449         unsigned got_remote_heads : 1;
450         struct extra_have_objects extra_have;
451 };
452
453 static int set_git_option(struct git_transport_options *opts,
454                           const char *name, const char *value)
455 {
456         if (!strcmp(name, TRANS_OPT_UPLOADPACK)) {
457                 opts->uploadpack = value;
458                 return 0;
459         } else if (!strcmp(name, TRANS_OPT_RECEIVEPACK)) {
460                 opts->receivepack = value;
461                 return 0;
462         } else if (!strcmp(name, TRANS_OPT_THIN)) {
463                 opts->thin = !!value;
464                 return 0;
465         } else if (!strcmp(name, TRANS_OPT_FOLLOWTAGS)) {
466                 opts->followtags = !!value;
467                 return 0;
468         } else if (!strcmp(name, TRANS_OPT_KEEP)) {
469                 opts->keep = !!value;
470                 return 0;
471         } else if (!strcmp(name, TRANS_OPT_DEPTH)) {
472                 if (!value)
473                         opts->depth = 0;
474                 else
475                         opts->depth = atoi(value);
476                 return 0;
477         }
478         return 1;
479 }
480
481 static int connect_setup(struct transport *transport, int for_push, int verbose)
482 {
483         struct git_transport_data *data = transport->data;
484
485         if (data->conn)
486                 return 0;
487
488         data->conn = git_connect(data->fd, transport->url,
489                                  for_push ? data->options.receivepack :
490                                  data->options.uploadpack,
491                                  verbose ? CONNECT_VERBOSE : 0);
492
493         return 0;
494 }
495
496 static struct ref *get_refs_via_connect(struct transport *transport, int for_push)
497 {
498         struct git_transport_data *data = transport->data;
499         struct ref *refs;
500
501         connect_setup(transport, for_push, 0);
502         get_remote_heads(data->fd[0], &refs, 0, NULL,
503                          for_push ? REF_NORMAL : 0, &data->extra_have);
504         data->got_remote_heads = 1;
505
506         return refs;
507 }
508
509 static int fetch_refs_via_pack(struct transport *transport,
510                                int nr_heads, struct ref **to_fetch)
511 {
512         struct git_transport_data *data = transport->data;
513         char **heads = xmalloc(nr_heads * sizeof(*heads));
514         char **origh = xmalloc(nr_heads * sizeof(*origh));
515         const struct ref *refs;
516         char *dest = xstrdup(transport->url);
517         struct fetch_pack_args args;
518         int i;
519         struct ref *refs_tmp = NULL;
520
521         memset(&args, 0, sizeof(args));
522         args.uploadpack = data->options.uploadpack;
523         args.keep_pack = data->options.keep;
524         args.lock_pack = 1;
525         args.use_thin_pack = data->options.thin;
526         args.include_tag = data->options.followtags;
527         args.verbose = (transport->verbose > 0);
528         args.quiet = (transport->verbose < 0);
529         args.no_progress = args.quiet || (!transport->progress && !isatty(2));
530         args.depth = data->options.depth;
531
532         for (i = 0; i < nr_heads; i++)
533                 origh[i] = heads[i] = xstrdup(to_fetch[i]->name);
534
535         if (!data->got_remote_heads) {
536                 connect_setup(transport, 0, 0);
537                 get_remote_heads(data->fd[0], &refs_tmp, 0, NULL, 0, NULL);
538                 data->got_remote_heads = 1;
539         }
540
541         refs = fetch_pack(&args, data->fd, data->conn,
542                           refs_tmp ? refs_tmp : transport->remote_refs,
543                           dest, nr_heads, heads, &transport->pack_lockfile);
544         close(data->fd[0]);
545         close(data->fd[1]);
546         if (finish_connect(data->conn))
547                 refs = NULL;
548         data->conn = NULL;
549         data->got_remote_heads = 0;
550
551         free_refs(refs_tmp);
552
553         for (i = 0; i < nr_heads; i++)
554                 free(origh[i]);
555         free(origh);
556         free(heads);
557         free(dest);
558         return (refs ? 0 : -1);
559 }
560
561 static int push_had_errors(struct ref *ref)
562 {
563         for (; ref; ref = ref->next) {
564                 switch (ref->status) {
565                 case REF_STATUS_NONE:
566                 case REF_STATUS_UPTODATE:
567                 case REF_STATUS_OK:
568                         break;
569                 default:
570                         return 1;
571                 }
572         }
573         return 0;
574 }
575
576 int transport_refs_pushed(struct ref *ref)
577 {
578         for (; ref; ref = ref->next) {
579                 switch(ref->status) {
580                 case REF_STATUS_NONE:
581                 case REF_STATUS_UPTODATE:
582                         break;
583                 default:
584                         return 1;
585                 }
586         }
587         return 0;
588 }
589
590 void transport_update_tracking_ref(struct remote *remote, struct ref *ref, int verbose)
591 {
592         struct refspec rs;
593
594         if (ref->status != REF_STATUS_OK && ref->status != REF_STATUS_UPTODATE)
595                 return;
596
597         rs.src = ref->name;
598         rs.dst = NULL;
599
600         if (!remote_find_tracking(remote, &rs)) {
601                 if (verbose)
602                         fprintf(stderr, "updating local tracking ref '%s'\n", rs.dst);
603                 if (ref->deletion) {
604                         delete_ref(rs.dst, NULL, 0);
605                 } else
606                         update_ref("update by push", rs.dst,
607                                         ref->new_sha1, NULL, 0, 0);
608                 free(rs.dst);
609         }
610 }
611
612 static void print_ref_status(char flag, const char *summary, struct ref *to, struct ref *from, const char *msg, int porcelain)
613 {
614         if (porcelain) {
615                 if (from)
616                         fprintf(stdout, "%c\t%s:%s\t", flag, from->name, to->name);
617                 else
618                         fprintf(stdout, "%c\t:%s\t", flag, to->name);
619                 if (msg)
620                         fprintf(stdout, "%s (%s)\n", summary, msg);
621                 else
622                         fprintf(stdout, "%s\n", summary);
623         } else {
624                 fprintf(stderr, " %c %-*s ", flag, TRANSPORT_SUMMARY_WIDTH, summary);
625                 if (from)
626                         fprintf(stderr, "%s -> %s", prettify_refname(from->name), prettify_refname(to->name));
627                 else
628                         fputs(prettify_refname(to->name), stderr);
629                 if (msg) {
630                         fputs(" (", stderr);
631                         fputs(msg, stderr);
632                         fputc(')', stderr);
633                 }
634                 fputc('\n', stderr);
635         }
636 }
637
638 static const char *status_abbrev(unsigned char sha1[20])
639 {
640         return find_unique_abbrev(sha1, DEFAULT_ABBREV);
641 }
642
643 static void print_ok_ref_status(struct ref *ref, int porcelain)
644 {
645         if (ref->deletion)
646                 print_ref_status('-', "[deleted]", ref, NULL, NULL, porcelain);
647         else if (is_null_sha1(ref->old_sha1))
648                 print_ref_status('*',
649                         (!prefixcmp(ref->name, "refs/tags/") ? "[new tag]" :
650                         "[new branch]"),
651                         ref, ref->peer_ref, NULL, porcelain);
652         else {
653                 char quickref[84];
654                 char type;
655                 const char *msg;
656
657                 strcpy(quickref, status_abbrev(ref->old_sha1));
658                 if (ref->nonfastforward) {
659                         strcat(quickref, "...");
660                         type = '+';
661                         msg = "forced update";
662                 } else {
663                         strcat(quickref, "..");
664                         type = ' ';
665                         msg = NULL;
666                 }
667                 strcat(quickref, status_abbrev(ref->new_sha1));
668
669                 print_ref_status(type, quickref, ref, ref->peer_ref, msg, porcelain);
670         }
671 }
672
673 static int print_one_push_status(struct ref *ref, const char *dest, int count, int porcelain)
674 {
675         if (!count)
676                 fprintf(stderr, "To %s\n", dest);
677
678         switch(ref->status) {
679         case REF_STATUS_NONE:
680                 print_ref_status('X', "[no match]", ref, NULL, NULL, porcelain);
681                 break;
682         case REF_STATUS_REJECT_NODELETE:
683                 print_ref_status('!', "[rejected]", ref, NULL,
684                                                  "remote does not support deleting refs", porcelain);
685                 break;
686         case REF_STATUS_UPTODATE:
687                 print_ref_status('=', "[up to date]", ref,
688                                                  ref->peer_ref, NULL, porcelain);
689                 break;
690         case REF_STATUS_REJECT_NONFASTFORWARD:
691                 print_ref_status('!', "[rejected]", ref, ref->peer_ref,
692                                                  "non-fast-forward", porcelain);
693                 break;
694         case REF_STATUS_REMOTE_REJECT:
695                 print_ref_status('!', "[remote rejected]", ref,
696                                                  ref->deletion ? NULL : ref->peer_ref,
697                                                  ref->remote_status, porcelain);
698                 break;
699         case REF_STATUS_EXPECTING_REPORT:
700                 print_ref_status('!', "[remote failure]", ref,
701                                                  ref->deletion ? NULL : ref->peer_ref,
702                                                  "remote failed to report status", porcelain);
703                 break;
704         case REF_STATUS_OK:
705                 print_ok_ref_status(ref, porcelain);
706                 break;
707         }
708
709         return 1;
710 }
711
712 void transport_print_push_status(const char *dest, struct ref *refs,
713                                   int verbose, int porcelain, int *nonfastforward)
714 {
715         struct ref *ref;
716         int n = 0;
717
718         if (verbose) {
719                 for (ref = refs; ref; ref = ref->next)
720                         if (ref->status == REF_STATUS_UPTODATE)
721                                 n += print_one_push_status(ref, dest, n, porcelain);
722         }
723
724         for (ref = refs; ref; ref = ref->next)
725                 if (ref->status == REF_STATUS_OK)
726                         n += print_one_push_status(ref, dest, n, porcelain);
727
728         *nonfastforward = 0;
729         for (ref = refs; ref; ref = ref->next) {
730                 if (ref->status != REF_STATUS_NONE &&
731                     ref->status != REF_STATUS_UPTODATE &&
732                     ref->status != REF_STATUS_OK)
733                         n += print_one_push_status(ref, dest, n, porcelain);
734                 if (ref->status == REF_STATUS_REJECT_NONFASTFORWARD)
735                         *nonfastforward = 1;
736         }
737 }
738
739 void transport_verify_remote_names(int nr_heads, const char **heads)
740 {
741         int i;
742
743         for (i = 0; i < nr_heads; i++) {
744                 const char *local = heads[i];
745                 const char *remote = strrchr(heads[i], ':');
746
747                 if (*local == '+')
748                         local++;
749
750                 /* A matching refspec is okay.  */
751                 if (remote == local && remote[1] == '\0')
752                         continue;
753
754                 remote = remote ? (remote + 1) : local;
755                 switch (check_ref_format(remote)) {
756                 case 0: /* ok */
757                 case CHECK_REF_FORMAT_ONELEVEL:
758                         /* ok but a single level -- that is fine for
759                          * a match pattern.
760                          */
761                 case CHECK_REF_FORMAT_WILDCARD:
762                         /* ok but ends with a pattern-match character */
763                         continue;
764                 }
765                 die("remote part of refspec is not a valid name in %s",
766                     heads[i]);
767         }
768 }
769
770 static int git_transport_push(struct transport *transport, struct ref *remote_refs, int flags)
771 {
772         struct git_transport_data *data = transport->data;
773         struct send_pack_args args;
774         int ret;
775
776         if (!data->got_remote_heads) {
777                 struct ref *tmp_refs;
778                 connect_setup(transport, 1, 0);
779
780                 get_remote_heads(data->fd[0], &tmp_refs, 0, NULL, REF_NORMAL,
781                                  NULL);
782                 data->got_remote_heads = 1;
783         }
784
785         memset(&args, 0, sizeof(args));
786         args.send_mirror = !!(flags & TRANSPORT_PUSH_MIRROR);
787         args.force_update = !!(flags & TRANSPORT_PUSH_FORCE);
788         args.use_thin_pack = data->options.thin;
789         args.verbose = !!(flags & TRANSPORT_PUSH_VERBOSE);
790         args.quiet = !!(flags & TRANSPORT_PUSH_QUIET);
791         args.dry_run = !!(flags & TRANSPORT_PUSH_DRY_RUN);
792
793         ret = send_pack(&args, data->fd, data->conn, remote_refs,
794                         &data->extra_have);
795
796         close(data->fd[1]);
797         close(data->fd[0]);
798         ret |= finish_connect(data->conn);
799         data->conn = NULL;
800         data->got_remote_heads = 0;
801
802         return ret;
803 }
804
805 static int connect_git(struct transport *transport, const char *name,
806                        const char *executable, int fd[2])
807 {
808         struct git_transport_data *data = transport->data;
809         data->conn = git_connect(data->fd, transport->url,
810                                  executable, 0);
811         fd[0] = data->fd[0];
812         fd[1] = data->fd[1];
813         return 0;
814 }
815
816 static int disconnect_git(struct transport *transport)
817 {
818         struct git_transport_data *data = transport->data;
819         if (data->conn) {
820                 if (data->got_remote_heads)
821                         packet_flush(data->fd[1]);
822                 close(data->fd[0]);
823                 close(data->fd[1]);
824                 finish_connect(data->conn);
825         }
826
827         free(data);
828         return 0;
829 }
830
831 void transport_take_over(struct transport *transport,
832                          struct child_process *child)
833 {
834         struct git_transport_data *data;
835
836         if (!transport->smart_options)
837                 die("Bug detected: Taking over transport requires non-NULL "
838                     "smart_options field.");
839
840         data = xcalloc(1, sizeof(*data));
841         data->options = *transport->smart_options;
842         data->conn = child;
843         data->fd[0] = data->conn->out;
844         data->fd[1] = data->conn->in;
845         data->got_remote_heads = 0;
846         transport->data = data;
847
848         transport->set_option = NULL;
849         transport->get_refs_list = get_refs_via_connect;
850         transport->fetch = fetch_refs_via_pack;
851         transport->push = NULL;
852         transport->push_refs = git_transport_push;
853         transport->disconnect = disconnect_git;
854         transport->smart_options = &(data->options);
855 }
856
857 static int is_local(const char *url)
858 {
859         const char *colon = strchr(url, ':');
860         const char *slash = strchr(url, '/');
861         return !colon || (slash && slash < colon) ||
862                 has_dos_drive_prefix(url);
863 }
864
865 static int is_file(const char *url)
866 {
867         struct stat buf;
868         if (stat(url, &buf))
869                 return 0;
870         return S_ISREG(buf.st_mode);
871 }
872
873 static int isurlschemechar(int first_flag, int ch)
874 {
875         /*
876          * The set of valid URL schemes, as per STD66 (RFC3986) is
877          * '[A-Za-z][A-Za-z0-9+.-]*'. But use sightly looser check
878          * of '[A-Za-z0-9][A-Za-z0-9+.-]*' because earlier version
879          * of check used '[A-Za-z0-9]+' so not to break any remote
880          * helpers.
881          */
882         int alphanumeric, special;
883         alphanumeric = ch > 0 && isalnum(ch);
884         special = ch == '+' || ch == '-' || ch == '.';
885         return alphanumeric || (!first_flag && special);
886 }
887
888 static int is_url(const char *url)
889 {
890         const char *url2, *first_slash;
891
892         if (!url)
893                 return 0;
894         url2 = url;
895         first_slash = strchr(url, '/');
896
897         /* Input with no slash at all or slash first can't be URL. */
898         if (!first_slash || first_slash == url)
899                 return 0;
900         /* Character before must be : and next must be /. */
901         if (first_slash[-1] != ':' || first_slash[1] != '/')
902                 return 0;
903         /* There must be something before the :// */
904         if (first_slash == url + 1)
905                 return 0;
906         /*
907          * Check all characters up to first slash - 1. Only alphanum
908          * is allowed.
909          */
910         url2 = url;
911         while (url2 < first_slash - 1) {
912                 if (!isurlschemechar(url2 == url, (unsigned char)*url2))
913                         return 0;
914                 url2++;
915         }
916
917         /* Valid enough. */
918         return 1;
919 }
920
921 static int external_specification_len(const char *url)
922 {
923         return strchr(url, ':') - url;
924 }
925
926 struct transport *transport_get(struct remote *remote, const char *url)
927 {
928         const char *helper;
929         struct transport *ret = xcalloc(1, sizeof(*ret));
930
931         if (!remote)
932                 die("No remote provided to transport_get()");
933
934         ret->got_remote_refs = 0;
935         ret->remote = remote;
936         helper = remote->foreign_vcs;
937
938         if (!url && remote->url)
939                 url = remote->url[0];
940         ret->url = url;
941
942         /* maybe it is a foreign URL? */
943         if (url) {
944                 const char *p = url;
945
946                 while (isurlschemechar(p == url, *p))
947                         p++;
948                 if (!prefixcmp(p, "::"))
949                         helper = xstrndup(url, p - url);
950         }
951
952         if (helper) {
953                 transport_helper_init(ret, helper);
954         } else if (!prefixcmp(url, "rsync:")) {
955                 ret->get_refs_list = get_refs_via_rsync;
956                 ret->fetch = fetch_objs_via_rsync;
957                 ret->push = rsync_transport_push;
958                 ret->smart_options = NULL;
959         } else if (is_local(url) && is_file(url)) {
960                 struct bundle_transport_data *data = xcalloc(1, sizeof(*data));
961                 ret->data = data;
962                 ret->get_refs_list = get_refs_from_bundle;
963                 ret->fetch = fetch_refs_from_bundle;
964                 ret->disconnect = close_bundle;
965                 ret->smart_options = NULL;
966         } else if (!is_url(url)
967                 || !prefixcmp(url, "file://")
968                 || !prefixcmp(url, "git://")
969                 || !prefixcmp(url, "ssh://")
970                 || !prefixcmp(url, "git+ssh://")
971                 || !prefixcmp(url, "ssh+git://")) {
972                 /* These are builtin smart transports. */
973                 struct git_transport_data *data = xcalloc(1, sizeof(*data));
974                 ret->data = data;
975                 ret->set_option = NULL;
976                 ret->get_refs_list = get_refs_via_connect;
977                 ret->fetch = fetch_refs_via_pack;
978                 ret->push_refs = git_transport_push;
979                 ret->connect = connect_git;
980                 ret->disconnect = disconnect_git;
981                 ret->smart_options = &(data->options);
982
983                 data->conn = NULL;
984                 data->got_remote_heads = 0;
985         } else {
986                 /* Unknown protocol in URL. Pass to external handler. */
987                 int len = external_specification_len(url);
988                 char *handler = xmalloc(len + 1);
989                 handler[len] = 0;
990                 strncpy(handler, url, len);
991                 transport_helper_init(ret, handler);
992         }
993
994         if (ret->smart_options) {
995                 ret->smart_options->thin = 1;
996                 ret->smart_options->uploadpack = "git-upload-pack";
997                 if (remote->uploadpack)
998                         ret->smart_options->uploadpack = remote->uploadpack;
999                 ret->smart_options->receivepack = "git-receive-pack";
1000                 if (remote->receivepack)
1001                         ret->smart_options->receivepack = remote->receivepack;
1002         }
1003
1004         return ret;
1005 }
1006
1007 int transport_set_option(struct transport *transport,
1008                          const char *name, const char *value)
1009 {
1010         int git_reports = 1, protocol_reports = 1;
1011
1012         if (transport->smart_options)
1013                 git_reports = set_git_option(transport->smart_options,
1014                                              name, value);
1015
1016         if (transport->set_option)
1017                 protocol_reports = transport->set_option(transport, name,
1018                                                         value);
1019
1020         /* If either report is 0, report 0 (success). */
1021         if (!git_reports || !protocol_reports)
1022                 return 0;
1023         /* If either reports -1 (invalid value), report -1. */
1024         if ((git_reports == -1) || (protocol_reports == -1))
1025                 return -1;
1026         /* Otherwise if both report unknown, report unknown. */
1027         return 1;
1028 }
1029
1030 int transport_push(struct transport *transport,
1031                    int refspec_nr, const char **refspec, int flags,
1032                    int *nonfastforward)
1033 {
1034         *nonfastforward = 0;
1035         transport_verify_remote_names(refspec_nr, refspec);
1036
1037         if (transport->push) {
1038                 /* Maybe FIXME. But no important transport uses this case. */
1039                 if (flags & TRANSPORT_PUSH_SET_UPSTREAM)
1040                         die("This transport does not support using --set-upstream");
1041
1042                 return transport->push(transport, refspec_nr, refspec, flags);
1043         } else if (transport->push_refs) {
1044                 struct ref *remote_refs =
1045                         transport->get_refs_list(transport, 1);
1046                 struct ref *local_refs = get_local_heads();
1047                 int match_flags = MATCH_REFS_NONE;
1048                 int verbose = flags & TRANSPORT_PUSH_VERBOSE;
1049                 int quiet = flags & TRANSPORT_PUSH_QUIET;
1050                 int porcelain = flags & TRANSPORT_PUSH_PORCELAIN;
1051                 int pretend = flags & TRANSPORT_PUSH_DRY_RUN;
1052                 int ret, err;
1053
1054                 if (flags & TRANSPORT_PUSH_ALL)
1055                         match_flags |= MATCH_REFS_ALL;
1056                 if (flags & TRANSPORT_PUSH_MIRROR)
1057                         match_flags |= MATCH_REFS_MIRROR;
1058
1059                 if (match_refs(local_refs, &remote_refs,
1060                                refspec_nr, refspec, match_flags)) {
1061                         return -1;
1062                 }
1063
1064                 set_ref_status_for_push(remote_refs,
1065                         flags & TRANSPORT_PUSH_MIRROR,
1066                         flags & TRANSPORT_PUSH_FORCE);
1067
1068                 ret = transport->push_refs(transport, remote_refs, flags);
1069                 err = push_had_errors(remote_refs);
1070
1071                 ret |= err;
1072
1073                 if (!quiet || err)
1074                         transport_print_push_status(transport->url, remote_refs,
1075                                         verbose | porcelain, porcelain,
1076                                         nonfastforward);
1077
1078                 if (flags & TRANSPORT_PUSH_SET_UPSTREAM)
1079                         set_upstreams(transport, remote_refs, pretend);
1080
1081                 if (!(flags & TRANSPORT_PUSH_DRY_RUN)) {
1082                         struct ref *ref;
1083                         for (ref = remote_refs; ref; ref = ref->next)
1084                                 transport_update_tracking_ref(transport->remote, ref, verbose);
1085                 }
1086
1087                 if (!quiet && !ret && !transport_refs_pushed(remote_refs))
1088                         fprintf(stderr, "Everything up-to-date\n");
1089                 return ret;
1090         }
1091         return 1;
1092 }
1093
1094 const struct ref *transport_get_remote_refs(struct transport *transport)
1095 {
1096         if (!transport->got_remote_refs) {
1097                 transport->remote_refs = transport->get_refs_list(transport, 0);
1098                 transport->got_remote_refs = 1;
1099         }
1100
1101         return transport->remote_refs;
1102 }
1103
1104 int transport_fetch_refs(struct transport *transport, struct ref *refs)
1105 {
1106         int rc;
1107         int nr_heads = 0, nr_alloc = 0, nr_refs = 0;
1108         struct ref **heads = NULL;
1109         struct ref *rm;
1110
1111         for (rm = refs; rm; rm = rm->next) {
1112                 nr_refs++;
1113                 if (rm->peer_ref &&
1114                     !is_null_sha1(rm->old_sha1) &&
1115                     !hashcmp(rm->peer_ref->old_sha1, rm->old_sha1))
1116                         continue;
1117                 ALLOC_GROW(heads, nr_heads + 1, nr_alloc);
1118                 heads[nr_heads++] = rm;
1119         }
1120
1121         if (!nr_heads) {
1122                 /*
1123                  * When deepening of a shallow repository is requested,
1124                  * then local and remote refs are likely to still be equal.
1125                  * Just feed them all to the fetch method in that case.
1126                  * This condition shouldn't be met in a non-deepening fetch
1127                  * (see builtin-fetch.c:quickfetch()).
1128                  */
1129                 heads = xmalloc(nr_refs * sizeof(*heads));
1130                 for (rm = refs; rm; rm = rm->next)
1131                         heads[nr_heads++] = rm;
1132         }
1133
1134         rc = transport->fetch(transport, nr_heads, heads);
1135
1136         free(heads);
1137         return rc;
1138 }
1139
1140 void transport_unlock_pack(struct transport *transport)
1141 {
1142         if (transport->pack_lockfile) {
1143                 unlink_or_warn(transport->pack_lockfile);
1144                 free(transport->pack_lockfile);
1145                 transport->pack_lockfile = NULL;
1146         }
1147 }
1148
1149 int transport_connect(struct transport *transport, const char *name,
1150                       const char *exec, int fd[2])
1151 {
1152         if (transport->connect)
1153                 return transport->connect(transport, name, exec, fd);
1154         else
1155                 die("Operation not supported by protocol");
1156 }
1157
1158 int transport_disconnect(struct transport *transport)
1159 {
1160         int ret = 0;
1161         if (transport->disconnect)
1162                 ret = transport->disconnect(transport);
1163         free(transport);
1164         return ret;
1165 }
1166
1167 /*
1168  * Strip username (and password) from an url and return
1169  * it in a newly allocated string.
1170  */
1171 char *transport_anonymize_url(const char *url)
1172 {
1173         char *anon_url, *scheme_prefix, *anon_part;
1174         size_t anon_len, prefix_len = 0;
1175
1176         anon_part = strchr(url, '@');
1177         if (is_local(url) || !anon_part)
1178                 goto literal_copy;
1179
1180         anon_len = strlen(++anon_part);
1181         scheme_prefix = strstr(url, "://");
1182         if (!scheme_prefix) {
1183                 if (!strchr(anon_part, ':'))
1184                         /* cannot be "me@there:/path/name" */
1185                         goto literal_copy;
1186         } else {
1187                 const char *cp;
1188                 /* make sure scheme is reasonable */
1189                 for (cp = url; cp < scheme_prefix; cp++) {
1190                         switch (*cp) {
1191                                 /* RFC 1738 2.1 */
1192                         case '+': case '.': case '-':
1193                                 break; /* ok */
1194                         default:
1195                                 if (isalnum(*cp))
1196                                         break;
1197                                 /* it isn't */
1198                                 goto literal_copy;
1199                         }
1200                 }
1201                 /* @ past the first slash does not count */
1202                 cp = strchr(scheme_prefix + 3, '/');
1203                 if (cp && cp < anon_part)
1204                         goto literal_copy;
1205                 prefix_len = scheme_prefix - url + 3;
1206         }
1207         anon_url = xcalloc(1, 1 + prefix_len + anon_len);
1208         memcpy(anon_url, url, prefix_len);
1209         memcpy(anon_url + prefix_len, anon_part, anon_len);
1210         return anon_url;
1211 literal_copy:
1212         return xstrdup(url);
1213 }