receive-pack: detect aliased updates which can occur with symrefs
[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 static int 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 static void 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 #define SUMMARY_WIDTH (2 * DEFAULT_ABBREV + 3)
613
614 static void print_ref_status(char flag, const char *summary, struct ref *to, struct ref *from, const char *msg, int porcelain)
615 {
616         if (porcelain) {
617                 if (from)
618                         fprintf(stdout, "%c\t%s:%s\t", flag, from->name, to->name);
619                 else
620                         fprintf(stdout, "%c\t:%s\t", flag, to->name);
621                 if (msg)
622                         fprintf(stdout, "%s (%s)\n", summary, msg);
623                 else
624                         fprintf(stdout, "%s\n", summary);
625         } else {
626                 fprintf(stderr, " %c %-*s ", flag, SUMMARY_WIDTH, summary);
627                 if (from)
628                         fprintf(stderr, "%s -> %s", prettify_refname(from->name), prettify_refname(to->name));
629                 else
630                         fputs(prettify_refname(to->name), stderr);
631                 if (msg) {
632                         fputs(" (", stderr);
633                         fputs(msg, stderr);
634                         fputc(')', stderr);
635                 }
636                 fputc('\n', stderr);
637         }
638 }
639
640 static const char *status_abbrev(unsigned char sha1[20])
641 {
642         return find_unique_abbrev(sha1, DEFAULT_ABBREV);
643 }
644
645 static void print_ok_ref_status(struct ref *ref, int porcelain)
646 {
647         if (ref->deletion)
648                 print_ref_status('-', "[deleted]", ref, NULL, NULL, porcelain);
649         else if (is_null_sha1(ref->old_sha1))
650                 print_ref_status('*',
651                         (!prefixcmp(ref->name, "refs/tags/") ? "[new tag]" :
652                         "[new branch]"),
653                         ref, ref->peer_ref, NULL, porcelain);
654         else {
655                 char quickref[84];
656                 char type;
657                 const char *msg;
658
659                 strcpy(quickref, status_abbrev(ref->old_sha1));
660                 if (ref->nonfastforward) {
661                         strcat(quickref, "...");
662                         type = '+';
663                         msg = "forced update";
664                 } else {
665                         strcat(quickref, "..");
666                         type = ' ';
667                         msg = NULL;
668                 }
669                 strcat(quickref, status_abbrev(ref->new_sha1));
670
671                 print_ref_status(type, quickref, ref, ref->peer_ref, msg, porcelain);
672         }
673 }
674
675 static int print_one_push_status(struct ref *ref, const char *dest, int count, int porcelain)
676 {
677         if (!count)
678                 fprintf(stderr, "To %s\n", dest);
679
680         switch(ref->status) {
681         case REF_STATUS_NONE:
682                 print_ref_status('X', "[no match]", ref, NULL, NULL, porcelain);
683                 break;
684         case REF_STATUS_REJECT_NODELETE:
685                 print_ref_status('!', "[rejected]", ref, NULL,
686                                                  "remote does not support deleting refs", porcelain);
687                 break;
688         case REF_STATUS_UPTODATE:
689                 print_ref_status('=', "[up to date]", ref,
690                                                  ref->peer_ref, NULL, porcelain);
691                 break;
692         case REF_STATUS_REJECT_NONFASTFORWARD:
693                 print_ref_status('!', "[rejected]", ref, ref->peer_ref,
694                                                  "non-fast-forward", porcelain);
695                 break;
696         case REF_STATUS_REMOTE_REJECT:
697                 print_ref_status('!', "[remote rejected]", ref,
698                                                  ref->deletion ? NULL : ref->peer_ref,
699                                                  ref->remote_status, porcelain);
700                 break;
701         case REF_STATUS_EXPECTING_REPORT:
702                 print_ref_status('!', "[remote failure]", ref,
703                                                  ref->deletion ? NULL : ref->peer_ref,
704                                                  "remote failed to report status", porcelain);
705                 break;
706         case REF_STATUS_OK:
707                 print_ok_ref_status(ref, porcelain);
708                 break;
709         }
710
711         return 1;
712 }
713
714 static void print_push_status(const char *dest, struct ref *refs,
715                               int verbose, int porcelain, int * nonfastforward)
716 {
717         struct ref *ref;
718         int n = 0;
719
720         if (verbose) {
721                 for (ref = refs; ref; ref = ref->next)
722                         if (ref->status == REF_STATUS_UPTODATE)
723                                 n += print_one_push_status(ref, dest, n, porcelain);
724         }
725
726         for (ref = refs; ref; ref = ref->next)
727                 if (ref->status == REF_STATUS_OK)
728                         n += print_one_push_status(ref, dest, n, porcelain);
729
730         *nonfastforward = 0;
731         for (ref = refs; ref; ref = ref->next) {
732                 if (ref->status != REF_STATUS_NONE &&
733                     ref->status != REF_STATUS_UPTODATE &&
734                     ref->status != REF_STATUS_OK)
735                         n += print_one_push_status(ref, dest, n, porcelain);
736                 if (ref->status == REF_STATUS_REJECT_NONFASTFORWARD)
737                         *nonfastforward = 1;
738         }
739 }
740
741 static void verify_remote_names(int nr_heads, const char **heads)
742 {
743         int i;
744
745         for (i = 0; i < nr_heads; i++) {
746                 const char *local = heads[i];
747                 const char *remote = strrchr(heads[i], ':');
748
749                 if (*local == '+')
750                         local++;
751
752                 /* A matching refspec is okay.  */
753                 if (remote == local && remote[1] == '\0')
754                         continue;
755
756                 remote = remote ? (remote + 1) : local;
757                 switch (check_ref_format(remote)) {
758                 case 0: /* ok */
759                 case CHECK_REF_FORMAT_ONELEVEL:
760                         /* ok but a single level -- that is fine for
761                          * a match pattern.
762                          */
763                 case CHECK_REF_FORMAT_WILDCARD:
764                         /* ok but ends with a pattern-match character */
765                         continue;
766                 }
767                 die("remote part of refspec is not a valid name in %s",
768                     heads[i]);
769         }
770 }
771
772 static int git_transport_push(struct transport *transport, struct ref *remote_refs, int flags)
773 {
774         struct git_transport_data *data = transport->data;
775         struct send_pack_args args;
776         int ret;
777
778         if (!data->got_remote_heads) {
779                 struct ref *tmp_refs;
780                 connect_setup(transport, 1, 0);
781
782                 get_remote_heads(data->fd[0], &tmp_refs, 0, NULL, REF_NORMAL,
783                                  NULL);
784                 data->got_remote_heads = 1;
785         }
786
787         memset(&args, 0, sizeof(args));
788         args.send_mirror = !!(flags & TRANSPORT_PUSH_MIRROR);
789         args.force_update = !!(flags & TRANSPORT_PUSH_FORCE);
790         args.use_thin_pack = data->options.thin;
791         args.verbose = !!(flags & TRANSPORT_PUSH_VERBOSE);
792         args.quiet = !!(flags & TRANSPORT_PUSH_QUIET);
793         args.dry_run = !!(flags & TRANSPORT_PUSH_DRY_RUN);
794
795         ret = send_pack(&args, data->fd, data->conn, remote_refs,
796                         &data->extra_have);
797
798         close(data->fd[1]);
799         close(data->fd[0]);
800         ret |= finish_connect(data->conn);
801         data->conn = NULL;
802         data->got_remote_heads = 0;
803
804         return ret;
805 }
806
807 static int connect_git(struct transport *transport, const char *name,
808                        const char *executable, int fd[2])
809 {
810         struct git_transport_data *data = transport->data;
811         data->conn = git_connect(data->fd, transport->url,
812                                  executable, 0);
813         fd[0] = data->fd[0];
814         fd[1] = data->fd[1];
815         return 0;
816 }
817
818 static int disconnect_git(struct transport *transport)
819 {
820         struct git_transport_data *data = transport->data;
821         if (data->conn) {
822                 if (data->got_remote_heads)
823                         packet_flush(data->fd[1]);
824                 close(data->fd[0]);
825                 close(data->fd[1]);
826                 finish_connect(data->conn);
827         }
828
829         free(data);
830         return 0;
831 }
832
833 void transport_take_over(struct transport *transport,
834                          struct child_process *child)
835 {
836         struct git_transport_data *data;
837
838         if (!transport->smart_options)
839                 die("Bug detected: Taking over transport requires non-NULL "
840                     "smart_options field.");
841
842         data = xcalloc(1, sizeof(*data));
843         data->options = *transport->smart_options;
844         data->conn = child;
845         data->fd[0] = data->conn->out;
846         data->fd[1] = data->conn->in;
847         data->got_remote_heads = 0;
848         transport->data = data;
849
850         transport->set_option = NULL;
851         transport->get_refs_list = get_refs_via_connect;
852         transport->fetch = fetch_refs_via_pack;
853         transport->push = NULL;
854         transport->push_refs = git_transport_push;
855         transport->disconnect = disconnect_git;
856         transport->smart_options = &(data->options);
857 }
858
859 static int is_local(const char *url)
860 {
861         const char *colon = strchr(url, ':');
862         const char *slash = strchr(url, '/');
863         return !colon || (slash && slash < colon) ||
864                 has_dos_drive_prefix(url);
865 }
866
867 static int is_file(const char *url)
868 {
869         struct stat buf;
870         if (stat(url, &buf))
871                 return 0;
872         return S_ISREG(buf.st_mode);
873 }
874
875 static int is_url(const char *url)
876 {
877         const char *url2, *first_slash;
878
879         if (!url)
880                 return 0;
881         url2 = url;
882         first_slash = strchr(url, '/');
883
884         /* Input with no slash at all or slash first can't be URL. */
885         if (!first_slash || first_slash == url)
886                 return 0;
887         /* Character before must be : and next must be /. */
888         if (first_slash[-1] != ':' || first_slash[1] != '/')
889                 return 0;
890         /* There must be something before the :// */
891         if (first_slash == url + 1)
892                 return 0;
893         /*
894          * Check all characters up to first slash - 1. Only alphanum
895          * is allowed.
896          */
897         url2 = url;
898         while (url2 < first_slash - 1) {
899                 if (!isalnum((unsigned char)*url2))
900                         return 0;
901                 url2++;
902         }
903
904         /* Valid enough. */
905         return 1;
906 }
907
908 static int external_specification_len(const char *url)
909 {
910         return strchr(url, ':') - url;
911 }
912
913 struct transport *transport_get(struct remote *remote, const char *url)
914 {
915         const char *helper;
916         struct transport *ret = xcalloc(1, sizeof(*ret));
917
918         if (!remote)
919                 die("No remote provided to transport_get()");
920
921         ret->got_remote_refs = 0;
922         ret->remote = remote;
923         helper = remote->foreign_vcs;
924
925         if (!url && remote->url)
926                 url = remote->url[0];
927         ret->url = url;
928
929         /* maybe it is a foreign URL? */
930         if (url) {
931                 const char *p = url;
932
933                 while (isalnum(*p))
934                         p++;
935                 if (!prefixcmp(p, "::"))
936                         helper = xstrndup(url, p - url);
937         }
938
939         if (helper) {
940                 transport_helper_init(ret, helper);
941         } else if (!prefixcmp(url, "rsync:")) {
942                 ret->get_refs_list = get_refs_via_rsync;
943                 ret->fetch = fetch_objs_via_rsync;
944                 ret->push = rsync_transport_push;
945                 ret->smart_options = NULL;
946         } else if (is_local(url) && is_file(url)) {
947                 struct bundle_transport_data *data = xcalloc(1, sizeof(*data));
948                 ret->data = data;
949                 ret->get_refs_list = get_refs_from_bundle;
950                 ret->fetch = fetch_refs_from_bundle;
951                 ret->disconnect = close_bundle;
952                 ret->smart_options = NULL;
953         } else if (!is_url(url)
954                 || !prefixcmp(url, "file://")
955                 || !prefixcmp(url, "git://")
956                 || !prefixcmp(url, "ssh://")
957                 || !prefixcmp(url, "git+ssh://")
958                 || !prefixcmp(url, "ssh+git://")) {
959                 /* These are builtin smart transports. */
960                 struct git_transport_data *data = xcalloc(1, sizeof(*data));
961                 ret->data = data;
962                 ret->set_option = NULL;
963                 ret->get_refs_list = get_refs_via_connect;
964                 ret->fetch = fetch_refs_via_pack;
965                 ret->push_refs = git_transport_push;
966                 ret->connect = connect_git;
967                 ret->disconnect = disconnect_git;
968                 ret->smart_options = &(data->options);
969
970                 data->conn = NULL;
971                 data->got_remote_heads = 0;
972         } else {
973                 /* Unknown protocol in URL. Pass to external handler. */
974                 int len = external_specification_len(url);
975                 char *handler = xmalloc(len + 1);
976                 handler[len] = 0;
977                 strncpy(handler, url, len);
978                 transport_helper_init(ret, handler);
979         }
980
981         if (ret->smart_options) {
982                 ret->smart_options->thin = 1;
983                 ret->smart_options->uploadpack = "git-upload-pack";
984                 if (remote->uploadpack)
985                         ret->smart_options->uploadpack = remote->uploadpack;
986                 ret->smart_options->receivepack = "git-receive-pack";
987                 if (remote->receivepack)
988                         ret->smart_options->receivepack = remote->receivepack;
989         }
990
991         return ret;
992 }
993
994 int transport_set_option(struct transport *transport,
995                          const char *name, const char *value)
996 {
997         int git_reports = 1, protocol_reports = 1;
998
999         if (transport->smart_options)
1000                 git_reports = set_git_option(transport->smart_options,
1001                                              name, value);
1002
1003         if (transport->set_option)
1004                 protocol_reports = transport->set_option(transport, name,
1005                                                         value);
1006
1007         /* If either report is 0, report 0 (success). */
1008         if (!git_reports || !protocol_reports)
1009                 return 0;
1010         /* If either reports -1 (invalid value), report -1. */
1011         if ((git_reports == -1) || (protocol_reports == -1))
1012                 return -1;
1013         /* Otherwise if both report unknown, report unknown. */
1014         return 1;
1015 }
1016
1017 int transport_push(struct transport *transport,
1018                    int refspec_nr, const char **refspec, int flags,
1019                    int *nonfastforward)
1020 {
1021         *nonfastforward = 0;
1022         verify_remote_names(refspec_nr, refspec);
1023
1024         if (transport->push) {
1025                 /* Maybe FIXME. But no important transport uses this case. */
1026                 if (flags & TRANSPORT_PUSH_SET_UPSTREAM)
1027                         die("This transport does not support using --set-upstream");
1028
1029                 return transport->push(transport, refspec_nr, refspec, flags);
1030         } else if (transport->push_refs) {
1031                 struct ref *remote_refs =
1032                         transport->get_refs_list(transport, 1);
1033                 struct ref *local_refs = get_local_heads();
1034                 int match_flags = MATCH_REFS_NONE;
1035                 int verbose = flags & TRANSPORT_PUSH_VERBOSE;
1036                 int quiet = flags & TRANSPORT_PUSH_QUIET;
1037                 int porcelain = flags & TRANSPORT_PUSH_PORCELAIN;
1038                 int pretend = flags & TRANSPORT_PUSH_DRY_RUN;
1039                 int ret, err;
1040
1041                 if (flags & TRANSPORT_PUSH_ALL)
1042                         match_flags |= MATCH_REFS_ALL;
1043                 if (flags & TRANSPORT_PUSH_MIRROR)
1044                         match_flags |= MATCH_REFS_MIRROR;
1045
1046                 if (match_refs(local_refs, &remote_refs,
1047                                refspec_nr, refspec, match_flags)) {
1048                         return -1;
1049                 }
1050
1051                 set_ref_status_for_push(remote_refs,
1052                         flags & TRANSPORT_PUSH_MIRROR,
1053                         flags & TRANSPORT_PUSH_FORCE);
1054
1055                 ret = transport->push_refs(transport, remote_refs, flags);
1056                 err = push_had_errors(remote_refs);
1057
1058                 ret |= err;
1059
1060                 if (!quiet || err)
1061                         print_push_status(transport->url, remote_refs,
1062                                         verbose | porcelain, porcelain,
1063                                         nonfastforward);
1064
1065                 if (flags & TRANSPORT_PUSH_SET_UPSTREAM)
1066                         set_upstreams(transport, remote_refs, pretend);
1067
1068                 if (!(flags & TRANSPORT_PUSH_DRY_RUN)) {
1069                         struct ref *ref;
1070                         for (ref = remote_refs; ref; ref = ref->next)
1071                                 update_tracking_ref(transport->remote, ref, verbose);
1072                 }
1073
1074                 if (!quiet && !ret && !refs_pushed(remote_refs))
1075                         fprintf(stderr, "Everything up-to-date\n");
1076                 return ret;
1077         }
1078         return 1;
1079 }
1080
1081 const struct ref *transport_get_remote_refs(struct transport *transport)
1082 {
1083         if (!transport->got_remote_refs) {
1084                 transport->remote_refs = transport->get_refs_list(transport, 0);
1085                 transport->got_remote_refs = 1;
1086         }
1087
1088         return transport->remote_refs;
1089 }
1090
1091 int transport_fetch_refs(struct transport *transport, struct ref *refs)
1092 {
1093         int rc;
1094         int nr_heads = 0, nr_alloc = 0, nr_refs = 0;
1095         struct ref **heads = NULL;
1096         struct ref *rm;
1097
1098         for (rm = refs; rm; rm = rm->next) {
1099                 nr_refs++;
1100                 if (rm->peer_ref &&
1101                     !is_null_sha1(rm->old_sha1) &&
1102                     !hashcmp(rm->peer_ref->old_sha1, rm->old_sha1))
1103                         continue;
1104                 ALLOC_GROW(heads, nr_heads + 1, nr_alloc);
1105                 heads[nr_heads++] = rm;
1106         }
1107
1108         if (!nr_heads) {
1109                 /*
1110                  * When deepening of a shallow repository is requested,
1111                  * then local and remote refs are likely to still be equal.
1112                  * Just feed them all to the fetch method in that case.
1113                  * This condition shouldn't be met in a non-deepening fetch
1114                  * (see builtin-fetch.c:quickfetch()).
1115                  */
1116                 heads = xmalloc(nr_refs * sizeof(*heads));
1117                 for (rm = refs; rm; rm = rm->next)
1118                         heads[nr_heads++] = rm;
1119         }
1120
1121         rc = transport->fetch(transport, nr_heads, heads);
1122
1123         free(heads);
1124         return rc;
1125 }
1126
1127 void transport_unlock_pack(struct transport *transport)
1128 {
1129         if (transport->pack_lockfile) {
1130                 unlink_or_warn(transport->pack_lockfile);
1131                 free(transport->pack_lockfile);
1132                 transport->pack_lockfile = NULL;
1133         }
1134 }
1135
1136 int transport_connect(struct transport *transport, const char *name,
1137                       const char *exec, int fd[2])
1138 {
1139         if (transport->connect)
1140                 return transport->connect(transport, name, exec, fd);
1141         else
1142                 die("Operation not supported by protocol");
1143 }
1144
1145 int transport_disconnect(struct transport *transport)
1146 {
1147         int ret = 0;
1148         if (transport->disconnect)
1149                 ret = transport->disconnect(transport);
1150         free(transport);
1151         return ret;
1152 }
1153
1154 /*
1155  * Strip username (and password) from an url and return
1156  * it in a newly allocated string.
1157  */
1158 char *transport_anonymize_url(const char *url)
1159 {
1160         char *anon_url, *scheme_prefix, *anon_part;
1161         size_t anon_len, prefix_len = 0;
1162
1163         anon_part = strchr(url, '@');
1164         if (is_local(url) || !anon_part)
1165                 goto literal_copy;
1166
1167         anon_len = strlen(++anon_part);
1168         scheme_prefix = strstr(url, "://");
1169         if (!scheme_prefix) {
1170                 if (!strchr(anon_part, ':'))
1171                         /* cannot be "me@there:/path/name" */
1172                         goto literal_copy;
1173         } else {
1174                 const char *cp;
1175                 /* make sure scheme is reasonable */
1176                 for (cp = url; cp < scheme_prefix; cp++) {
1177                         switch (*cp) {
1178                                 /* RFC 1738 2.1 */
1179                         case '+': case '.': case '-':
1180                                 break; /* ok */
1181                         default:
1182                                 if (isalnum(*cp))
1183                                         break;
1184                                 /* it isn't */
1185                                 goto literal_copy;
1186                         }
1187                 }
1188                 /* @ past the first slash does not count */
1189                 cp = strchr(scheme_prefix + 3, '/');
1190                 if (cp && cp < anon_part)
1191                         goto literal_copy;
1192                 prefix_len = scheme_prefix - url + 3;
1193         }
1194         anon_url = xcalloc(1, 1 + prefix_len + anon_len);
1195         memcpy(anon_url, url, prefix_len);
1196         memcpy(anon_url + prefix_len, anon_part, anon_len);
1197         return anon_url;
1198 literal_copy:
1199         return xstrdup(url);
1200 }