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