upload-pack: add object filtering for partial clone
[git] / upload-pack.c
1 #include "cache.h"
2 #include "config.h"
3 #include "refs.h"
4 #include "pkt-line.h"
5 #include "sideband.h"
6 #include "tag.h"
7 #include "object.h"
8 #include "commit.h"
9 #include "exec_cmd.h"
10 #include "diff.h"
11 #include "revision.h"
12 #include "list-objects.h"
13 #include "list-objects-filter.h"
14 #include "list-objects-filter-options.h"
15 #include "run-command.h"
16 #include "connect.h"
17 #include "sigchain.h"
18 #include "version.h"
19 #include "string-list.h"
20 #include "parse-options.h"
21 #include "argv-array.h"
22 #include "prio-queue.h"
23 #include "quote.h"
24
25 static const char * const upload_pack_usage[] = {
26         N_("git upload-pack [<options>] <dir>"),
27         NULL
28 };
29
30 /* Remember to update object flag allocation in object.h */
31 #define THEY_HAVE       (1u << 11)
32 #define OUR_REF         (1u << 12)
33 #define WANTED          (1u << 13)
34 #define COMMON_KNOWN    (1u << 14)
35 #define REACHABLE       (1u << 15)
36
37 #define SHALLOW         (1u << 16)
38 #define NOT_SHALLOW     (1u << 17)
39 #define CLIENT_SHALLOW  (1u << 18)
40 #define HIDDEN_REF      (1u << 19)
41
42 static timestamp_t oldest_have;
43
44 static int deepen_relative;
45 static int multi_ack;
46 static int no_done;
47 static int use_thin_pack, use_ofs_delta, use_include_tag;
48 static int no_progress, daemon_mode;
49 /* Allow specifying sha1 if it is a ref tip. */
50 #define ALLOW_TIP_SHA1  01
51 /* Allow request of a sha1 if it is reachable from a ref (possibly hidden ref). */
52 #define ALLOW_REACHABLE_SHA1    02
53 /* Allow request of any sha1. Implies ALLOW_TIP_SHA1 and ALLOW_REACHABLE_SHA1. */
54 #define ALLOW_ANY_SHA1  07
55 static unsigned int allow_unadvertised_object_request;
56 static int shallow_nr;
57 static struct object_array have_obj;
58 static struct object_array want_obj;
59 static struct object_array extra_edge_obj;
60 static unsigned int timeout;
61 static int keepalive = 5;
62 /* 0 for no sideband,
63  * otherwise maximum packet size (up to 65520 bytes).
64  */
65 static int use_sideband;
66 static int advertise_refs;
67 static int stateless_rpc;
68 static const char *pack_objects_hook;
69
70 static int filter_capability_requested;
71 static int filter_advertise;
72 static struct list_objects_filter_options filter_options;
73
74 static void reset_timeout(void)
75 {
76         alarm(timeout);
77 }
78
79 static void send_client_data(int fd, const char *data, ssize_t sz)
80 {
81         if (use_sideband) {
82                 send_sideband(1, fd, data, sz, use_sideband);
83                 return;
84         }
85         if (fd == 3)
86                 /* emergency quit */
87                 fd = 2;
88         if (fd == 2) {
89                 /* XXX: are we happy to lose stuff here? */
90                 xwrite(fd, data, sz);
91                 return;
92         }
93         write_or_die(fd, data, sz);
94 }
95
96 static int write_one_shallow(const struct commit_graft *graft, void *cb_data)
97 {
98         FILE *fp = cb_data;
99         if (graft->nr_parent == -1)
100                 fprintf(fp, "--shallow %s\n", oid_to_hex(&graft->oid));
101         return 0;
102 }
103
104 static void create_pack_file(void)
105 {
106         struct child_process pack_objects = CHILD_PROCESS_INIT;
107         char data[8193], progress[128];
108         char abort_msg[] = "aborting due to possible repository "
109                 "corruption on the remote side.";
110         int buffered = -1;
111         ssize_t sz;
112         int i;
113         FILE *pipe_fd;
114
115         if (!pack_objects_hook)
116                 pack_objects.git_cmd = 1;
117         else {
118                 argv_array_push(&pack_objects.args, pack_objects_hook);
119                 argv_array_push(&pack_objects.args, "git");
120                 pack_objects.use_shell = 1;
121         }
122
123         if (shallow_nr) {
124                 argv_array_push(&pack_objects.args, "--shallow-file");
125                 argv_array_push(&pack_objects.args, "");
126         }
127         argv_array_push(&pack_objects.args, "pack-objects");
128         argv_array_push(&pack_objects.args, "--revs");
129         if (use_thin_pack)
130                 argv_array_push(&pack_objects.args, "--thin");
131
132         argv_array_push(&pack_objects.args, "--stdout");
133         if (shallow_nr)
134                 argv_array_push(&pack_objects.args, "--shallow");
135         if (!no_progress)
136                 argv_array_push(&pack_objects.args, "--progress");
137         if (use_ofs_delta)
138                 argv_array_push(&pack_objects.args, "--delta-base-offset");
139         if (use_include_tag)
140                 argv_array_push(&pack_objects.args, "--include-tag");
141         if (filter_options.filter_spec) {
142                 struct strbuf buf = STRBUF_INIT;
143                 sq_quote_buf(&buf, filter_options.filter_spec);
144                 argv_array_pushf(&pack_objects.args, "--filter=%s", buf.buf);
145                 strbuf_release(&buf);
146         }
147
148         pack_objects.in = -1;
149         pack_objects.out = -1;
150         pack_objects.err = -1;
151
152         if (start_command(&pack_objects))
153                 die("git upload-pack: unable to fork git-pack-objects");
154
155         pipe_fd = xfdopen(pack_objects.in, "w");
156
157         if (shallow_nr)
158                 for_each_commit_graft(write_one_shallow, pipe_fd);
159
160         for (i = 0; i < want_obj.nr; i++)
161                 fprintf(pipe_fd, "%s\n",
162                         oid_to_hex(&want_obj.objects[i].item->oid));
163         fprintf(pipe_fd, "--not\n");
164         for (i = 0; i < have_obj.nr; i++)
165                 fprintf(pipe_fd, "%s\n",
166                         oid_to_hex(&have_obj.objects[i].item->oid));
167         for (i = 0; i < extra_edge_obj.nr; i++)
168                 fprintf(pipe_fd, "%s\n",
169                         oid_to_hex(&extra_edge_obj.objects[i].item->oid));
170         fprintf(pipe_fd, "\n");
171         fflush(pipe_fd);
172         fclose(pipe_fd);
173
174         /* We read from pack_objects.err to capture stderr output for
175          * progress bar, and pack_objects.out to capture the pack data.
176          */
177
178         while (1) {
179                 struct pollfd pfd[2];
180                 int pe, pu, pollsize;
181                 int ret;
182
183                 reset_timeout();
184
185                 pollsize = 0;
186                 pe = pu = -1;
187
188                 if (0 <= pack_objects.out) {
189                         pfd[pollsize].fd = pack_objects.out;
190                         pfd[pollsize].events = POLLIN;
191                         pu = pollsize;
192                         pollsize++;
193                 }
194                 if (0 <= pack_objects.err) {
195                         pfd[pollsize].fd = pack_objects.err;
196                         pfd[pollsize].events = POLLIN;
197                         pe = pollsize;
198                         pollsize++;
199                 }
200
201                 if (!pollsize)
202                         break;
203
204                 ret = poll(pfd, pollsize,
205                         keepalive < 0 ? -1 : 1000 * keepalive);
206
207                 if (ret < 0) {
208                         if (errno != EINTR) {
209                                 error_errno("poll failed, resuming");
210                                 sleep(1);
211                         }
212                         continue;
213                 }
214                 if (0 <= pe && (pfd[pe].revents & (POLLIN|POLLHUP))) {
215                         /* Status ready; we ship that in the side-band
216                          * or dump to the standard error.
217                          */
218                         sz = xread(pack_objects.err, progress,
219                                   sizeof(progress));
220                         if (0 < sz)
221                                 send_client_data(2, progress, sz);
222                         else if (sz == 0) {
223                                 close(pack_objects.err);
224                                 pack_objects.err = -1;
225                         }
226                         else
227                                 goto fail;
228                         /* give priority to status messages */
229                         continue;
230                 }
231                 if (0 <= pu && (pfd[pu].revents & (POLLIN|POLLHUP))) {
232                         /* Data ready; we keep the last byte to ourselves
233                          * in case we detect broken rev-list, so that we
234                          * can leave the stream corrupted.  This is
235                          * unfortunate -- unpack-objects would happily
236                          * accept a valid packdata with trailing garbage,
237                          * so appending garbage after we pass all the
238                          * pack data is not good enough to signal
239                          * breakage to downstream.
240                          */
241                         char *cp = data;
242                         ssize_t outsz = 0;
243                         if (0 <= buffered) {
244                                 *cp++ = buffered;
245                                 outsz++;
246                         }
247                         sz = xread(pack_objects.out, cp,
248                                   sizeof(data) - outsz);
249                         if (0 < sz)
250                                 ;
251                         else if (sz == 0) {
252                                 close(pack_objects.out);
253                                 pack_objects.out = -1;
254                         }
255                         else
256                                 goto fail;
257                         sz += outsz;
258                         if (1 < sz) {
259                                 buffered = data[sz-1] & 0xFF;
260                                 sz--;
261                         }
262                         else
263                                 buffered = -1;
264                         send_client_data(1, data, sz);
265                 }
266
267                 /*
268                  * We hit the keepalive timeout without saying anything; send
269                  * an empty message on the data sideband just to let the other
270                  * side know we're still working on it, but don't have any data
271                  * yet.
272                  *
273                  * If we don't have a sideband channel, there's no room in the
274                  * protocol to say anything, so those clients are just out of
275                  * luck.
276                  */
277                 if (!ret && use_sideband) {
278                         static const char buf[] = "0005\1";
279                         write_or_die(1, buf, 5);
280                 }
281         }
282
283         if (finish_command(&pack_objects)) {
284                 error("git upload-pack: git-pack-objects died with error.");
285                 goto fail;
286         }
287
288         /* flush the data */
289         if (0 <= buffered) {
290                 data[0] = buffered;
291                 send_client_data(1, data, 1);
292                 fprintf(stderr, "flushed.\n");
293         }
294         if (use_sideband)
295                 packet_flush(1);
296         return;
297
298  fail:
299         send_client_data(3, abort_msg, sizeof(abort_msg));
300         die("git upload-pack: %s", abort_msg);
301 }
302
303 static int got_oid(const char *hex, struct object_id *oid)
304 {
305         struct object *o;
306         int we_knew_they_have = 0;
307
308         if (get_oid_hex(hex, oid))
309                 die("git upload-pack: expected SHA1 object, got '%s'", hex);
310         if (!has_object_file(oid))
311                 return -1;
312
313         o = parse_object(oid);
314         if (!o)
315                 die("oops (%s)", oid_to_hex(oid));
316         if (o->type == OBJ_COMMIT) {
317                 struct commit_list *parents;
318                 struct commit *commit = (struct commit *)o;
319                 if (o->flags & THEY_HAVE)
320                         we_knew_they_have = 1;
321                 else
322                         o->flags |= THEY_HAVE;
323                 if (!oldest_have || (commit->date < oldest_have))
324                         oldest_have = commit->date;
325                 for (parents = commit->parents;
326                      parents;
327                      parents = parents->next)
328                         parents->item->object.flags |= THEY_HAVE;
329         }
330         if (!we_knew_they_have) {
331                 add_object_array(o, NULL, &have_obj);
332                 return 1;
333         }
334         return 0;
335 }
336
337 static int reachable(struct commit *want)
338 {
339         struct prio_queue work = { compare_commits_by_commit_date };
340
341         prio_queue_put(&work, want);
342         while (work.nr) {
343                 struct commit_list *list;
344                 struct commit *commit = prio_queue_get(&work);
345
346                 if (commit->object.flags & THEY_HAVE) {
347                         want->object.flags |= COMMON_KNOWN;
348                         break;
349                 }
350                 if (!commit->object.parsed)
351                         parse_object(&commit->object.oid);
352                 if (commit->object.flags & REACHABLE)
353                         continue;
354                 commit->object.flags |= REACHABLE;
355                 if (commit->date < oldest_have)
356                         continue;
357                 for (list = commit->parents; list; list = list->next) {
358                         struct commit *parent = list->item;
359                         if (!(parent->object.flags & REACHABLE))
360                                 prio_queue_put(&work, parent);
361                 }
362         }
363         want->object.flags |= REACHABLE;
364         clear_commit_marks(want, REACHABLE);
365         clear_prio_queue(&work);
366         return (want->object.flags & COMMON_KNOWN);
367 }
368
369 static int ok_to_give_up(void)
370 {
371         int i;
372
373         if (!have_obj.nr)
374                 return 0;
375
376         for (i = 0; i < want_obj.nr; i++) {
377                 struct object *want = want_obj.objects[i].item;
378
379                 if (want->flags & COMMON_KNOWN)
380                         continue;
381                 want = deref_tag(want, "a want line", 0);
382                 if (!want || want->type != OBJ_COMMIT) {
383                         /* no way to tell if this is reachable by
384                          * looking at the ancestry chain alone, so
385                          * leave a note to ourselves not to worry about
386                          * this object anymore.
387                          */
388                         want_obj.objects[i].item->flags |= COMMON_KNOWN;
389                         continue;
390                 }
391                 if (!reachable((struct commit *)want))
392                         return 0;
393         }
394         return 1;
395 }
396
397 static int get_common_commits(void)
398 {
399         struct object_id oid;
400         char last_hex[GIT_MAX_HEXSZ + 1];
401         int got_common = 0;
402         int got_other = 0;
403         int sent_ready = 0;
404
405         save_commit_buffer = 0;
406
407         for (;;) {
408                 char *line = packet_read_line(0, NULL);
409                 const char *arg;
410
411                 reset_timeout();
412
413                 if (!line) {
414                         if (multi_ack == 2 && got_common
415                             && !got_other && ok_to_give_up()) {
416                                 sent_ready = 1;
417                                 packet_write_fmt(1, "ACK %s ready\n", last_hex);
418                         }
419                         if (have_obj.nr == 0 || multi_ack)
420                                 packet_write_fmt(1, "NAK\n");
421
422                         if (no_done && sent_ready) {
423                                 packet_write_fmt(1, "ACK %s\n", last_hex);
424                                 return 0;
425                         }
426                         if (stateless_rpc)
427                                 exit(0);
428                         got_common = 0;
429                         got_other = 0;
430                         continue;
431                 }
432                 if (skip_prefix(line, "have ", &arg)) {
433                         switch (got_oid(arg, &oid)) {
434                         case -1: /* they have what we do not */
435                                 got_other = 1;
436                                 if (multi_ack && ok_to_give_up()) {
437                                         const char *hex = oid_to_hex(&oid);
438                                         if (multi_ack == 2) {
439                                                 sent_ready = 1;
440                                                 packet_write_fmt(1, "ACK %s ready\n", hex);
441                                         } else
442                                                 packet_write_fmt(1, "ACK %s continue\n", hex);
443                                 }
444                                 break;
445                         default:
446                                 got_common = 1;
447                                 memcpy(last_hex, oid_to_hex(&oid), 41);
448                                 if (multi_ack == 2)
449                                         packet_write_fmt(1, "ACK %s common\n", last_hex);
450                                 else if (multi_ack)
451                                         packet_write_fmt(1, "ACK %s continue\n", last_hex);
452                                 else if (have_obj.nr == 1)
453                                         packet_write_fmt(1, "ACK %s\n", last_hex);
454                                 break;
455                         }
456                         continue;
457                 }
458                 if (!strcmp(line, "done")) {
459                         if (have_obj.nr > 0) {
460                                 if (multi_ack)
461                                         packet_write_fmt(1, "ACK %s\n", last_hex);
462                                 return 0;
463                         }
464                         packet_write_fmt(1, "NAK\n");
465                         return -1;
466                 }
467                 die("git upload-pack: expected SHA1 list, got '%s'", line);
468         }
469 }
470
471 static int is_our_ref(struct object *o)
472 {
473         int allow_hidden_ref = (allow_unadvertised_object_request &
474                         (ALLOW_TIP_SHA1 | ALLOW_REACHABLE_SHA1));
475         return o->flags & ((allow_hidden_ref ? HIDDEN_REF : 0) | OUR_REF);
476 }
477
478 /*
479  * on successful case, it's up to the caller to close cmd->out
480  */
481 static int do_reachable_revlist(struct child_process *cmd,
482                                 struct object_array *src,
483                                 struct object_array *reachable)
484 {
485         static const char *argv[] = {
486                 "rev-list", "--stdin", NULL,
487         };
488         struct object *o;
489         char namebuf[42]; /* ^ + SHA-1 + LF */
490         int i;
491
492         cmd->argv = argv;
493         cmd->git_cmd = 1;
494         cmd->no_stderr = 1;
495         cmd->in = -1;
496         cmd->out = -1;
497
498         /*
499          * If the next rev-list --stdin encounters an unknown commit,
500          * it terminates, which will cause SIGPIPE in the write loop
501          * below.
502          */
503         sigchain_push(SIGPIPE, SIG_IGN);
504
505         if (start_command(cmd))
506                 goto error;
507
508         namebuf[0] = '^';
509         namebuf[GIT_SHA1_HEXSZ + 1] = '\n';
510         for (i = get_max_object_index(); 0 < i; ) {
511                 o = get_indexed_object(--i);
512                 if (!o)
513                         continue;
514                 if (reachable && o->type == OBJ_COMMIT)
515                         o->flags &= ~TMP_MARK;
516                 if (!is_our_ref(o))
517                         continue;
518                 memcpy(namebuf + 1, oid_to_hex(&o->oid), GIT_SHA1_HEXSZ);
519                 if (write_in_full(cmd->in, namebuf, GIT_SHA1_HEXSZ + 2) < 0)
520                         goto error;
521         }
522         namebuf[GIT_SHA1_HEXSZ] = '\n';
523         for (i = 0; i < src->nr; i++) {
524                 o = src->objects[i].item;
525                 if (is_our_ref(o)) {
526                         if (reachable)
527                                 add_object_array(o, NULL, reachable);
528                         continue;
529                 }
530                 if (reachable && o->type == OBJ_COMMIT)
531                         o->flags |= TMP_MARK;
532                 memcpy(namebuf, oid_to_hex(&o->oid), GIT_SHA1_HEXSZ);
533                 if (write_in_full(cmd->in, namebuf, GIT_SHA1_HEXSZ + 1) < 0)
534                         goto error;
535         }
536         close(cmd->in);
537         cmd->in = -1;
538         sigchain_pop(SIGPIPE);
539
540         return 0;
541
542 error:
543         sigchain_pop(SIGPIPE);
544
545         if (cmd->in >= 0)
546                 close(cmd->in);
547         if (cmd->out >= 0)
548                 close(cmd->out);
549         return -1;
550 }
551
552 static int get_reachable_list(struct object_array *src,
553                               struct object_array *reachable)
554 {
555         struct child_process cmd = CHILD_PROCESS_INIT;
556         int i;
557         struct object *o;
558         char namebuf[42]; /* ^ + SHA-1 + LF */
559
560         if (do_reachable_revlist(&cmd, src, reachable) < 0)
561                 return -1;
562
563         while ((i = read_in_full(cmd.out, namebuf, 41)) == 41) {
564                 struct object_id sha1;
565
566                 if (namebuf[40] != '\n' || get_oid_hex(namebuf, &sha1))
567                         break;
568
569                 o = lookup_object(sha1.hash);
570                 if (o && o->type == OBJ_COMMIT) {
571                         o->flags &= ~TMP_MARK;
572                 }
573         }
574         for (i = get_max_object_index(); 0 < i; i--) {
575                 o = get_indexed_object(i - 1);
576                 if (o && o->type == OBJ_COMMIT &&
577                     (o->flags & TMP_MARK)) {
578                         add_object_array(o, NULL, reachable);
579                                 o->flags &= ~TMP_MARK;
580                 }
581         }
582         close(cmd.out);
583
584         if (finish_command(&cmd))
585                 return -1;
586
587         return 0;
588 }
589
590 static int has_unreachable(struct object_array *src)
591 {
592         struct child_process cmd = CHILD_PROCESS_INIT;
593         char buf[1];
594         int i;
595
596         if (do_reachable_revlist(&cmd, src, NULL) < 0)
597                 return 1;
598
599         /*
600          * The commits out of the rev-list are not ancestors of
601          * our ref.
602          */
603         i = read_in_full(cmd.out, buf, 1);
604         if (i)
605                 goto error;
606         close(cmd.out);
607         cmd.out = -1;
608
609         /*
610          * rev-list may have died by encountering a bad commit
611          * in the history, in which case we do want to bail out
612          * even when it showed no commit.
613          */
614         if (finish_command(&cmd))
615                 goto error;
616
617         /* All the non-tip ones are ancestors of what we advertised */
618         return 0;
619
620 error:
621         sigchain_pop(SIGPIPE);
622         if (cmd.out >= 0)
623                 close(cmd.out);
624         return 1;
625 }
626
627 static void check_non_tip(void)
628 {
629         int i;
630
631         /*
632          * In the normal in-process case without
633          * uploadpack.allowReachableSHA1InWant,
634          * non-tip requests can never happen.
635          */
636         if (!stateless_rpc && !(allow_unadvertised_object_request & ALLOW_REACHABLE_SHA1))
637                 goto error;
638         if (!has_unreachable(&want_obj))
639                 /* All the non-tip ones are ancestors of what we advertised */
640                 return;
641
642 error:
643         /* Pick one of them (we know there at least is one) */
644         for (i = 0; i < want_obj.nr; i++) {
645                 struct object *o = want_obj.objects[i].item;
646                 if (!is_our_ref(o))
647                         die("git upload-pack: not our ref %s",
648                             oid_to_hex(&o->oid));
649         }
650 }
651
652 static void send_shallow(struct commit_list *result)
653 {
654         while (result) {
655                 struct object *object = &result->item->object;
656                 if (!(object->flags & (CLIENT_SHALLOW|NOT_SHALLOW))) {
657                         packet_write_fmt(1, "shallow %s",
658                                          oid_to_hex(&object->oid));
659                         register_shallow(&object->oid);
660                         shallow_nr++;
661                 }
662                 result = result->next;
663         }
664 }
665
666 static void send_unshallow(const struct object_array *shallows)
667 {
668         int i;
669
670         for (i = 0; i < shallows->nr; i++) {
671                 struct object *object = shallows->objects[i].item;
672                 if (object->flags & NOT_SHALLOW) {
673                         struct commit_list *parents;
674                         packet_write_fmt(1, "unshallow %s",
675                                          oid_to_hex(&object->oid));
676                         object->flags &= ~CLIENT_SHALLOW;
677                         /*
678                          * We want to _register_ "object" as shallow, but we
679                          * also need to traverse object's parents to deepen a
680                          * shallow clone. Unregister it for now so we can
681                          * parse and add the parents to the want list, then
682                          * re-register it.
683                          */
684                         unregister_shallow(&object->oid);
685                         object->parsed = 0;
686                         parse_commit_or_die((struct commit *)object);
687                         parents = ((struct commit *)object)->parents;
688                         while (parents) {
689                                 add_object_array(&parents->item->object,
690                                                  NULL, &want_obj);
691                                 parents = parents->next;
692                         }
693                         add_object_array(object, NULL, &extra_edge_obj);
694                 }
695                 /* make sure commit traversal conforms to client */
696                 register_shallow(&object->oid);
697         }
698 }
699
700 static void deepen(int depth, int deepen_relative,
701                    struct object_array *shallows)
702 {
703         if (depth == INFINITE_DEPTH && !is_repository_shallow()) {
704                 int i;
705
706                 for (i = 0; i < shallows->nr; i++) {
707                         struct object *object = shallows->objects[i].item;
708                         object->flags |= NOT_SHALLOW;
709                 }
710         } else if (deepen_relative) {
711                 struct object_array reachable_shallows = OBJECT_ARRAY_INIT;
712                 struct commit_list *result;
713
714                 get_reachable_list(shallows, &reachable_shallows);
715                 result = get_shallow_commits(&reachable_shallows,
716                                              depth + 1,
717                                              SHALLOW, NOT_SHALLOW);
718                 send_shallow(result);
719                 free_commit_list(result);
720                 object_array_clear(&reachable_shallows);
721         } else {
722                 struct commit_list *result;
723
724                 result = get_shallow_commits(&want_obj, depth,
725                                              SHALLOW, NOT_SHALLOW);
726                 send_shallow(result);
727                 free_commit_list(result);
728         }
729
730         send_unshallow(shallows);
731         packet_flush(1);
732 }
733
734 static void deepen_by_rev_list(int ac, const char **av,
735                                struct object_array *shallows)
736 {
737         struct commit_list *result;
738
739         result = get_shallow_commits_by_rev_list(ac, av, SHALLOW, NOT_SHALLOW);
740         send_shallow(result);
741         free_commit_list(result);
742         send_unshallow(shallows);
743         packet_flush(1);
744 }
745
746 static void receive_needs(void)
747 {
748         struct object_array shallows = OBJECT_ARRAY_INIT;
749         struct string_list deepen_not = STRING_LIST_INIT_DUP;
750         int depth = 0;
751         int has_non_tip = 0;
752         timestamp_t deepen_since = 0;
753         int deepen_rev_list = 0;
754
755         shallow_nr = 0;
756         for (;;) {
757                 struct object *o;
758                 const char *features;
759                 struct object_id oid_buf;
760                 char *line = packet_read_line(0, NULL);
761                 const char *arg;
762
763                 reset_timeout();
764                 if (!line)
765                         break;
766
767                 if (skip_prefix(line, "shallow ", &arg)) {
768                         struct object_id oid;
769                         struct object *object;
770                         if (get_oid_hex(arg, &oid))
771                                 die("invalid shallow line: %s", line);
772                         object = parse_object(&oid);
773                         if (!object)
774                                 continue;
775                         if (object->type != OBJ_COMMIT)
776                                 die("invalid shallow object %s", oid_to_hex(&oid));
777                         if (!(object->flags & CLIENT_SHALLOW)) {
778                                 object->flags |= CLIENT_SHALLOW;
779                                 add_object_array(object, NULL, &shallows);
780                         }
781                         continue;
782                 }
783                 if (skip_prefix(line, "deepen ", &arg)) {
784                         char *end = NULL;
785                         depth = strtol(arg, &end, 0);
786                         if (!end || *end || depth <= 0)
787                                 die("Invalid deepen: %s", line);
788                         continue;
789                 }
790                 if (skip_prefix(line, "deepen-since ", &arg)) {
791                         char *end = NULL;
792                         deepen_since = parse_timestamp(arg, &end, 0);
793                         if (!end || *end || !deepen_since ||
794                             /* revisions.c's max_age -1 is special */
795                             deepen_since == -1)
796                                 die("Invalid deepen-since: %s", line);
797                         deepen_rev_list = 1;
798                         continue;
799                 }
800                 if (skip_prefix(line, "deepen-not ", &arg)) {
801                         char *ref = NULL;
802                         struct object_id oid;
803                         if (expand_ref(arg, strlen(arg), oid.hash, &ref) != 1)
804                                 die("git upload-pack: ambiguous deepen-not: %s", line);
805                         string_list_append(&deepen_not, ref);
806                         free(ref);
807                         deepen_rev_list = 1;
808                         continue;
809                 }
810                 if (skip_prefix(line, "filter ", &arg)) {
811                         if (!filter_capability_requested)
812                                 die("git upload-pack: filtering capability not negotiated");
813                         parse_list_objects_filter(&filter_options, arg);
814                         continue;
815                 }
816                 if (!skip_prefix(line, "want ", &arg) ||
817                     get_oid_hex(arg, &oid_buf))
818                         die("git upload-pack: protocol error, "
819                             "expected to get sha, not '%s'", line);
820
821                 features = arg + 40;
822
823                 if (parse_feature_request(features, "deepen-relative"))
824                         deepen_relative = 1;
825                 if (parse_feature_request(features, "multi_ack_detailed"))
826                         multi_ack = 2;
827                 else if (parse_feature_request(features, "multi_ack"))
828                         multi_ack = 1;
829                 if (parse_feature_request(features, "no-done"))
830                         no_done = 1;
831                 if (parse_feature_request(features, "thin-pack"))
832                         use_thin_pack = 1;
833                 if (parse_feature_request(features, "ofs-delta"))
834                         use_ofs_delta = 1;
835                 if (parse_feature_request(features, "side-band-64k"))
836                         use_sideband = LARGE_PACKET_MAX;
837                 else if (parse_feature_request(features, "side-band"))
838                         use_sideband = DEFAULT_PACKET_MAX;
839                 if (parse_feature_request(features, "no-progress"))
840                         no_progress = 1;
841                 if (parse_feature_request(features, "include-tag"))
842                         use_include_tag = 1;
843                 if (parse_feature_request(features, "filter"))
844                         filter_capability_requested = 1;
845
846                 o = parse_object(&oid_buf);
847                 if (!o) {
848                         packet_write_fmt(1,
849                                          "ERR upload-pack: not our ref %s",
850                                          oid_to_hex(&oid_buf));
851                         die("git upload-pack: not our ref %s",
852                             oid_to_hex(&oid_buf));
853                 }
854                 if (!(o->flags & WANTED)) {
855                         o->flags |= WANTED;
856                         if (!((allow_unadvertised_object_request & ALLOW_ANY_SHA1) == ALLOW_ANY_SHA1
857                               || is_our_ref(o)))
858                                 has_non_tip = 1;
859                         add_object_array(o, NULL, &want_obj);
860                 }
861         }
862
863         /*
864          * We have sent all our refs already, and the other end
865          * should have chosen out of them. When we are operating
866          * in the stateless RPC mode, however, their choice may
867          * have been based on the set of older refs advertised
868          * by another process that handled the initial request.
869          */
870         if (has_non_tip)
871                 check_non_tip();
872
873         if (!use_sideband && daemon_mode)
874                 no_progress = 1;
875
876         if (depth == 0 && !deepen_rev_list && shallows.nr == 0)
877                 return;
878         if (depth > 0 && deepen_rev_list)
879                 die("git upload-pack: deepen and deepen-since (or deepen-not) cannot be used together");
880         if (depth > 0)
881                 deepen(depth, deepen_relative, &shallows);
882         else if (deepen_rev_list) {
883                 struct argv_array av = ARGV_ARRAY_INIT;
884                 int i;
885
886                 argv_array_push(&av, "rev-list");
887                 if (deepen_since)
888                         argv_array_pushf(&av, "--max-age=%"PRItime, deepen_since);
889                 if (deepen_not.nr) {
890                         argv_array_push(&av, "--not");
891                         for (i = 0; i < deepen_not.nr; i++) {
892                                 struct string_list_item *s = deepen_not.items + i;
893                                 argv_array_push(&av, s->string);
894                         }
895                         argv_array_push(&av, "--not");
896                 }
897                 for (i = 0; i < want_obj.nr; i++) {
898                         struct object *o = want_obj.objects[i].item;
899                         argv_array_push(&av, oid_to_hex(&o->oid));
900                 }
901                 deepen_by_rev_list(av.argc, av.argv, &shallows);
902                 argv_array_clear(&av);
903         }
904         else
905                 if (shallows.nr > 0) {
906                         int i;
907                         for (i = 0; i < shallows.nr; i++)
908                                 register_shallow(&shallows.objects[i].item->oid);
909                 }
910
911         shallow_nr += shallows.nr;
912         object_array_clear(&shallows);
913 }
914
915 /* return non-zero if the ref is hidden, otherwise 0 */
916 static int mark_our_ref(const char *refname, const char *refname_full,
917                         const struct object_id *oid)
918 {
919         struct object *o = lookup_unknown_object(oid->hash);
920
921         if (ref_is_hidden(refname, refname_full)) {
922                 o->flags |= HIDDEN_REF;
923                 return 1;
924         }
925         o->flags |= OUR_REF;
926         return 0;
927 }
928
929 static int check_ref(const char *refname_full, const struct object_id *oid,
930                      int flag, void *cb_data)
931 {
932         const char *refname = strip_namespace(refname_full);
933
934         mark_our_ref(refname, refname_full, oid);
935         return 0;
936 }
937
938 static void format_symref_info(struct strbuf *buf, struct string_list *symref)
939 {
940         struct string_list_item *item;
941
942         if (!symref->nr)
943                 return;
944         for_each_string_list_item(item, symref)
945                 strbuf_addf(buf, " symref=%s:%s", item->string, (char *)item->util);
946 }
947
948 static int send_ref(const char *refname, const struct object_id *oid,
949                     int flag, void *cb_data)
950 {
951         static const char *capabilities = "multi_ack thin-pack side-band"
952                 " side-band-64k ofs-delta shallow deepen-since deepen-not"
953                 " deepen-relative no-progress include-tag multi_ack_detailed";
954         const char *refname_nons = strip_namespace(refname);
955         struct object_id peeled;
956
957         if (mark_our_ref(refname_nons, refname, oid))
958                 return 0;
959
960         if (capabilities) {
961                 struct strbuf symref_info = STRBUF_INIT;
962
963                 format_symref_info(&symref_info, cb_data);
964                 packet_write_fmt(1, "%s %s%c%s%s%s%s%s%s agent=%s\n",
965                              oid_to_hex(oid), refname_nons,
966                              0, capabilities,
967                              (allow_unadvertised_object_request & ALLOW_TIP_SHA1) ?
968                                      " allow-tip-sha1-in-want" : "",
969                              (allow_unadvertised_object_request & ALLOW_REACHABLE_SHA1) ?
970                                      " allow-reachable-sha1-in-want" : "",
971                              stateless_rpc ? " no-done" : "",
972                              symref_info.buf,
973                              filter_advertise ? " filter" : "",
974                              git_user_agent_sanitized());
975                 strbuf_release(&symref_info);
976         } else {
977                 packet_write_fmt(1, "%s %s\n", oid_to_hex(oid), refname_nons);
978         }
979         capabilities = NULL;
980         if (!peel_ref(refname, peeled.hash))
981                 packet_write_fmt(1, "%s %s^{}\n", oid_to_hex(&peeled), refname_nons);
982         return 0;
983 }
984
985 static int find_symref(const char *refname, const struct object_id *oid,
986                        int flag, void *cb_data)
987 {
988         const char *symref_target;
989         struct string_list_item *item;
990
991         if ((flag & REF_ISSYMREF) == 0)
992                 return 0;
993         symref_target = resolve_ref_unsafe(refname, 0, NULL, &flag);
994         if (!symref_target || (flag & REF_ISSYMREF) == 0)
995                 die("'%s' is a symref but it is not?", refname);
996         item = string_list_append(cb_data, refname);
997         item->util = xstrdup(symref_target);
998         return 0;
999 }
1000
1001 static void upload_pack(void)
1002 {
1003         struct string_list symref = STRING_LIST_INIT_DUP;
1004
1005         head_ref_namespaced(find_symref, &symref);
1006
1007         if (advertise_refs || !stateless_rpc) {
1008                 reset_timeout();
1009                 head_ref_namespaced(send_ref, &symref);
1010                 for_each_namespaced_ref(send_ref, &symref);
1011                 advertise_shallow_grafts(1);
1012                 packet_flush(1);
1013         } else {
1014                 head_ref_namespaced(check_ref, NULL);
1015                 for_each_namespaced_ref(check_ref, NULL);
1016         }
1017         string_list_clear(&symref, 1);
1018         if (advertise_refs)
1019                 return;
1020
1021         receive_needs();
1022         if (want_obj.nr) {
1023                 get_common_commits();
1024                 create_pack_file();
1025         }
1026 }
1027
1028 static int upload_pack_config(const char *var, const char *value, void *unused)
1029 {
1030         if (!strcmp("uploadpack.allowtipsha1inwant", var)) {
1031                 if (git_config_bool(var, value))
1032                         allow_unadvertised_object_request |= ALLOW_TIP_SHA1;
1033                 else
1034                         allow_unadvertised_object_request &= ~ALLOW_TIP_SHA1;
1035         } else if (!strcmp("uploadpack.allowreachablesha1inwant", var)) {
1036                 if (git_config_bool(var, value))
1037                         allow_unadvertised_object_request |= ALLOW_REACHABLE_SHA1;
1038                 else
1039                         allow_unadvertised_object_request &= ~ALLOW_REACHABLE_SHA1;
1040         } else if (!strcmp("uploadpack.allowanysha1inwant", var)) {
1041                 if (git_config_bool(var, value))
1042                         allow_unadvertised_object_request |= ALLOW_ANY_SHA1;
1043                 else
1044                         allow_unadvertised_object_request &= ~ALLOW_ANY_SHA1;
1045         } else if (!strcmp("uploadpack.keepalive", var)) {
1046                 keepalive = git_config_int(var, value);
1047                 if (!keepalive)
1048                         keepalive = -1;
1049         } else if (current_config_scope() != CONFIG_SCOPE_REPO) {
1050                 if (!strcmp("uploadpack.packobjectshook", var))
1051                         return git_config_string(&pack_objects_hook, var, value);
1052         } else if (!strcmp("uploadpack.allowfilter", var)) {
1053                 filter_advertise = git_config_bool(var, value);
1054         }
1055         return parse_hide_refs_config(var, value, "uploadpack");
1056 }
1057
1058 int cmd_main(int argc, const char **argv)
1059 {
1060         const char *dir;
1061         int strict = 0;
1062         struct option options[] = {
1063                 OPT_BOOL(0, "stateless-rpc", &stateless_rpc,
1064                          N_("quit after a single request/response exchange")),
1065                 OPT_BOOL(0, "advertise-refs", &advertise_refs,
1066                          N_("exit immediately after initial ref advertisement")),
1067                 OPT_BOOL(0, "strict", &strict,
1068                          N_("do not try <directory>/.git/ if <directory> is no Git directory")),
1069                 OPT_INTEGER(0, "timeout", &timeout,
1070                             N_("interrupt transfer after <n> seconds of inactivity")),
1071                 OPT_END()
1072         };
1073
1074         packet_trace_identity("upload-pack");
1075         check_replace_refs = 0;
1076
1077         argc = parse_options(argc, argv, NULL, options, upload_pack_usage, 0);
1078
1079         if (argc != 1)
1080                 usage_with_options(upload_pack_usage, options);
1081
1082         if (timeout)
1083                 daemon_mode = 1;
1084
1085         setup_path();
1086
1087         dir = argv[0];
1088
1089         if (!enter_repo(dir, strict))
1090                 die("'%s' does not appear to be a git repository", dir);
1091
1092         git_config(upload_pack_config, NULL);
1093         upload_pack();
1094         return 0;
1095 }