Blob


1 /*
2 * Copyright (c) 2018, 2019 Ori Bernstein <ori@openbsd.org>
3 * Copyright (c) 2021 Stefan Sperling <stsp@openbsd.org>
4 *
5 * Permission to use, copy, modify, and distribute this software for any
6 * purpose with or without fee is hereby granted, provided that the above
7 * copyright notice and this permission notice appear in all copies.
8 *
9 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
10 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
11 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
12 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
13 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
14 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
15 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
16 */
18 #include <sys/types.h>
19 #include <sys/stat.h>
20 #include <sys/queue.h>
21 #include <sys/uio.h>
22 #include <sys/socket.h>
23 #include <sys/wait.h>
24 #include <sys/resource.h>
25 #include <sys/socket.h>
27 #include <endian.h>
28 #include <errno.h>
29 #include <err.h>
30 #include <fcntl.h>
31 #include <stdio.h>
32 #include <stdlib.h>
33 #include <string.h>
34 #include <stdint.h>
35 #include <sha1.h>
36 #include <unistd.h>
37 #include <zlib.h>
38 #include <ctype.h>
39 #include <limits.h>
40 #include <imsg.h>
41 #include <time.h>
42 #include <uuid.h>
44 #include "got_error.h"
45 #include "got_reference.h"
46 #include "got_repository.h"
47 #include "got_path.h"
48 #include "got_cancel.h"
49 #include "got_worktree.h"
50 #include "got_object.h"
51 #include "got_opentemp.h"
52 #include "got_send.h"
53 #include "got_repository_admin.h"
54 #include "got_commit_graph.h"
56 #include "got_lib_delta.h"
57 #include "got_lib_inflate.h"
58 #include "got_lib_object.h"
59 #include "got_lib_object_parse.h"
60 #include "got_lib_object_create.h"
61 #include "got_lib_pack.h"
62 #include "got_lib_sha1.h"
63 #include "got_lib_privsep.h"
64 #include "got_lib_object_cache.h"
65 #include "got_lib_repository.h"
66 #include "got_lib_pack_create.h"
67 #include "got_lib_dial.h"
69 #ifndef nitems
70 #define nitems(_a) (sizeof((_a)) / sizeof((_a)[0]))
71 #endif
73 #ifndef ssizeof
74 #define ssizeof(_x) ((ssize_t)(sizeof(_x)))
75 #endif
77 #ifndef MIN
78 #define MIN(_a,_b) ((_a) < (_b) ? (_a) : (_b))
79 #endif
81 const struct got_error *
82 got_send_connect(pid_t *sendpid, int *sendfd, const char *proto,
83 const char *host, const char *port, const char *server_path, int verbosity)
84 {
85 const struct got_error *err = NULL;
87 *sendpid = -1;
88 *sendfd = -1;
90 if (strcmp(proto, "ssh") == 0 || strcmp(proto, "git+ssh") == 0)
91 err = got_dial_ssh(sendpid, sendfd, host, port, server_path,
92 GOT_DIAL_DIRECTION_SEND, verbosity);
93 else if (strcmp(proto, "git") == 0)
94 err = got_dial_git(sendfd, host, port, server_path,
95 GOT_DIAL_DIRECTION_SEND);
96 else if (strcmp(proto, "http") == 0 || strcmp(proto, "git+http") == 0)
97 err = got_error_path(proto, GOT_ERR_NOT_IMPL);
98 else
99 err = got_error_path(proto, GOT_ERR_BAD_PROTO);
100 return err;
103 struct pack_progress_arg {
104 got_send_progress_cb progress_cb;
105 void *progress_arg;
107 off_t packfile_size;
108 int ncommits;
109 int nobj_total;
110 int nobj_deltify;
111 int nobj_written;
112 };
114 static const struct got_error *
115 pack_progress(void *arg, off_t packfile_size, int ncommits,
116 int nobj_total, int nobj_deltify, int nobj_written)
118 const struct got_error *err;
119 struct pack_progress_arg *a = arg;
121 err = a->progress_cb(a->progress_arg, packfile_size, ncommits,
122 nobj_total, nobj_deltify, nobj_written, 0, NULL, 0);
123 if (err)
124 return err;
126 a->packfile_size = packfile_size;
127 a->ncommits = ncommits;
128 a->nobj_total = nobj_total;
129 a->nobj_deltify = nobj_deltify;
130 a->nobj_written = nobj_written;
131 return NULL;
134 static const struct got_error *
135 insert_ref(struct got_reflist_head *refs, const char *refname,
136 struct got_repository *repo)
138 const struct got_error *err;
139 struct got_reference *ref;
140 struct got_reflist_entry *new;
142 err = got_ref_open(&ref, repo, refname, 0);
143 if (err)
144 return err;
146 err = got_reflist_insert(&new, refs, ref, got_ref_cmp_by_name, NULL);
147 if (err || new == NULL /* duplicate */)
148 got_ref_close(ref);
150 return err;
153 static const struct got_error *
154 check_linear_ancestry(const char *refname, struct got_object_id *my_id,
155 struct got_object_id *their_id, struct got_repository *repo,
156 got_cancel_cb cancel_cb, void *cancel_arg)
158 const struct got_error *err = NULL;
159 struct got_object_id *yca_id;
160 int obj_type;
162 err = got_object_get_type(&obj_type, repo, their_id);
163 if (err)
164 return err;
165 if (obj_type != GOT_OBJ_TYPE_COMMIT)
166 return got_error_fmt(GOT_ERR_OBJ_TYPE,
167 "bad object type on server for %s", refname);
169 err = got_commit_graph_find_youngest_common_ancestor(&yca_id,
170 my_id, their_id, repo, cancel_cb, cancel_arg);
171 if (err)
172 return err;
173 if (yca_id == NULL)
174 return got_error_fmt(GOT_ERR_SEND_ANCESTRY, "%s", refname);
176 /*
177 * Require a straight line of history between the two commits,
178 * with their commit being older than my commit.
180 * Non-linear situations such as this require a rebase:
182 * (theirs) D F (mine)
183 * \ /
184 * C E
185 * \ /
186 * B (yca)
187 * |
188 * A
189 */
190 if (got_object_id_cmp(their_id, yca_id) != 0)
191 err = got_error_fmt(GOT_ERR_SEND_ANCESTRY, "%s", refname);
193 free(yca_id);
194 return err;
197 static const struct got_error *
198 realloc_ids(struct got_object_id ***ids, size_t *nalloc, size_t n)
200 struct got_object_id **new;
201 const size_t alloc_chunksz = 256;
203 if (*nalloc >= n)
204 return NULL;
206 new = recallocarray(*ids, *nalloc, *nalloc + alloc_chunksz,
207 sizeof(struct got_object_id));
208 if (new == NULL)
209 return got_error_from_errno("recallocarray");
211 *ids = new;
212 *nalloc += alloc_chunksz;
213 return NULL;
216 static struct got_reference *
217 find_ref(struct got_reflist_head *refs, const char *refname)
219 struct got_reflist_entry *re;
221 TAILQ_FOREACH(re, refs, entry) {
222 if (got_path_cmp(got_ref_get_name(re->ref), refname,
223 strlen(got_ref_get_name(re->ref)),
224 strlen(refname)) == 0) {
225 return re->ref;
229 return NULL;
232 static struct got_pathlist_entry *
233 find_their_ref(struct got_pathlist_head *their_refs, const char *refname)
235 struct got_pathlist_entry *pe;
237 TAILQ_FOREACH(pe, their_refs, entry) {
238 const char *their_refname = pe->path;
239 if (got_path_cmp(their_refname, refname,
240 strlen(their_refname), strlen(refname)) == 0) {
241 return pe;
245 return NULL;
248 static const struct got_error *
249 get_remote_refname(char **remote_refname, const char *remote_name,
250 const char *refname)
252 if (strncmp(refname, "refs/", 5) == 0)
253 refname += 5;
254 if (strncmp(refname, "heads/", 6) == 0)
255 refname += 6;
257 if (asprintf(remote_refname, "refs/remotes/%s/%s",
258 remote_name, refname) == -1)
259 return got_error_from_errno("asprintf");
261 return NULL;
264 static const struct got_error *
265 update_remote_ref(struct got_reference *my_ref, const char *remote_name,
266 struct got_repository *repo)
268 const struct got_error *err, *unlock_err;
269 struct got_object_id *my_id;
270 struct got_reference *ref = NULL;
271 char *remote_refname = NULL;
272 int ref_locked = 0;
274 err = got_ref_resolve(&my_id, repo, my_ref);
275 if (err)
276 return err;
278 err = get_remote_refname(&remote_refname, remote_name,
279 got_ref_get_name(my_ref));
280 if (err)
281 goto done;
283 err = got_ref_open(&ref, repo, remote_refname, 1 /* lock */);
284 if (err) {
285 if (err->code != GOT_ERR_NOT_REF)
286 goto done;
287 err = got_ref_alloc(&ref, remote_refname, my_id);
288 if (err)
289 goto done;
290 } else {
291 ref_locked = 1;
292 err = got_ref_change_ref(ref, my_id);
293 if (err)
294 goto done;
297 err = got_ref_write(ref, repo);
298 done:
299 if (ref) {
300 if (ref_locked) {
301 unlock_err = got_ref_unlock(ref);
302 if (unlock_err && err == NULL)
303 err = unlock_err;
305 got_ref_close(ref);
307 free(my_id);
308 free(remote_refname);
309 return err;
312 const struct got_error*
313 got_send_pack(const char *remote_name, struct got_pathlist_head *branch_names,
314 struct got_pathlist_head *tag_names,
315 struct got_pathlist_head *delete_branches,
316 int verbosity, int overwrite_refs, int sendfd,
317 struct got_repository *repo, got_send_progress_cb progress_cb,
318 void *progress_arg, got_cancel_cb cancel_cb, void *cancel_arg)
320 int imsg_sendfds[2];
321 int npackfd = -1, nsendfd = -1;
322 int sendstatus, done = 0;
323 const struct got_error *err;
324 struct imsgbuf sendibuf;
325 pid_t sendpid = -1;
326 struct got_reflist_head refs;
327 struct got_pathlist_head have_refs;
328 struct got_pathlist_head their_refs;
329 struct got_pathlist_entry *pe;
330 struct got_reflist_entry *re;
331 struct got_object_id **our_ids = NULL;
332 struct got_object_id **their_ids = NULL;
333 struct got_object_id *my_id = NULL;
334 int i, nours = 0, ntheirs = 0;
335 size_t nalloc_ours = 0, nalloc_theirs = 0;
336 int refs_to_send = 0, refs_to_delete = 0;
337 off_t bytes_sent = 0;
338 struct pack_progress_arg ppa;
339 uint8_t packsha1[SHA1_DIGEST_LENGTH];
340 FILE *packfile = NULL;
342 TAILQ_INIT(&refs);
343 TAILQ_INIT(&have_refs);
344 TAILQ_INIT(&their_refs);
346 TAILQ_FOREACH(pe, branch_names, entry) {
347 const char *branchname = pe->path;
348 if (strncmp(branchname, "refs/heads/", 11) != 0) {
349 char *s;
350 if (asprintf(&s, "refs/heads/%s", branchname) == -1) {
351 err = got_error_from_errno("asprintf");
352 goto done;
354 err = insert_ref(&refs, s, repo);
355 free(s);
356 } else {
357 err = insert_ref(&refs, branchname, repo);
359 if (err)
360 goto done;
363 TAILQ_FOREACH(pe, delete_branches, entry) {
364 const char *branchname = pe->path;
365 struct got_reference *ref;
366 if (strncmp(branchname, "refs/heads/", 11) != 0) {
367 err = got_error_fmt(GOT_ERR_SEND_DELETE_REF, "%s",
368 branchname);
369 goto done;
371 ref = find_ref(&refs, branchname);
372 if (ref) {
373 err = got_error_fmt(GOT_ERR_SEND_DELETE_REF,
374 "changes on %s will be sent to server",
375 branchname);
376 goto done;
380 TAILQ_FOREACH(pe, tag_names, entry) {
381 const char *tagname = pe->path;
382 if (strncmp(tagname, "refs/tags/", 10) != 0) {
383 char *s;
384 if (asprintf(&s, "refs/tags/%s", tagname) == -1) {
385 err = got_error_from_errno("asprintf");
386 goto done;
388 err = insert_ref(&refs, s, repo);
389 free(s);
390 } else {
391 err = insert_ref(&refs, tagname, repo);
393 if (err)
394 goto done;
397 if (TAILQ_EMPTY(&refs) && TAILQ_EMPTY(delete_branches)) {
398 err = got_error(GOT_ERR_SEND_EMPTY);
399 goto done;
402 TAILQ_FOREACH(re, &refs, entry) {
403 struct got_object_id *id;
404 int obj_type;
406 if (got_ref_is_symbolic(re->ref)) {
407 err = got_error_fmt(GOT_ERR_BAD_REF_TYPE,
408 "cannot send symbolic reference %s",
409 got_ref_get_name(re->ref));
410 goto done;
413 err = got_ref_resolve(&id, repo, re->ref);
414 if (err)
415 goto done;
416 err = got_object_get_type(&obj_type, repo, id);
417 free(id);
418 if (err)
419 goto done;
420 switch (obj_type) {
421 case GOT_OBJ_TYPE_COMMIT:
422 case GOT_OBJ_TYPE_TAG:
423 break;
424 default:
425 err = got_error_fmt(GOT_ERR_OBJ_TYPE,
426 "cannot send %s", got_ref_get_name(re->ref));
427 goto done;
431 packfile = got_opentemp();
432 if (packfile == NULL) {
433 err = got_error_from_errno("got_opentemp");
434 goto done;
437 if (socketpair(AF_UNIX, SOCK_STREAM, PF_UNSPEC, imsg_sendfds) == -1) {
438 err = got_error_from_errno("socketpair");
439 goto done;
442 sendpid = fork();
443 if (sendpid == -1) {
444 err = got_error_from_errno("fork");
445 goto done;
446 } else if (sendpid == 0){
447 got_privsep_exec_child(imsg_sendfds,
448 GOT_PATH_PROG_SEND_PACK, got_repo_get_path(repo));
451 if (close(imsg_sendfds[1]) == -1) {
452 err = got_error_from_errno("close");
453 goto done;
455 imsg_init(&sendibuf, imsg_sendfds[0]);
456 nsendfd = dup(sendfd);
457 if (nsendfd == -1) {
458 err = got_error_from_errno("dup");
459 goto done;
462 /*
463 * Convert reflist to pathlist since the privsep layer
464 * is linked into helper programs which lack reference.c.
465 */
466 TAILQ_FOREACH(re, &refs, entry) {
467 struct got_object_id *id;
468 err = got_ref_resolve(&id, repo, re->ref);
469 if (err)
470 goto done;
471 err = got_pathlist_append(&have_refs,
472 got_ref_get_name(re->ref), id);
473 if (err)
474 goto done;
475 /*
476 * Also prepare the array of our object IDs which
477 * will be needed for generating a pack file.
478 */
479 err = realloc_ids(&our_ids, &nalloc_ours, nours + 1);
480 if (err)
481 goto done;
482 our_ids[nours] = id;
483 nours++;
486 err = got_privsep_send_send_req(&sendibuf, nsendfd, &have_refs,
487 delete_branches, verbosity);
488 if (err)
489 goto done;
490 nsendfd = -1;
492 err = got_privsep_recv_send_remote_refs(&their_refs, &sendibuf);
493 if (err)
494 goto done;
496 /*
497 * Process references reported by the server.
498 * Push appropriate object IDs onto the "their IDs" array.
499 * This array will be used to exclude objects which already
500 * exist on the server from our pack file.
501 */
502 TAILQ_FOREACH(pe, &their_refs, entry) {
503 const char *refname = pe->path;
504 struct got_object_id *their_id = pe->data;
505 int have_their_id;
506 struct got_object *obj;
507 struct got_reference *my_ref = NULL;
508 int is_tag = 0;
510 /* Don't blindly trust the server to send us valid names. */
511 if (!got_ref_name_is_valid(refname))
512 continue;
514 /*
515 * Find out whether this is a reference we want to upload.
516 * Otherwise we can still use this reference as a hint to
517 * avoid uploading any objects the server already has.
518 */
519 my_ref = find_ref(&refs, refname);
520 if (my_ref) {
521 err = got_ref_resolve(&my_id, repo, my_ref);
522 if (err)
523 goto done;
524 if (got_object_id_cmp(my_id, their_id) == 0) {
525 free(my_id);
526 my_id = NULL;
527 continue;
529 refs_to_send++;
533 if (strncmp(refname, "refs/tags/", 10) == 0)
534 is_tag = 1;
536 /* Prevent tags from being overwritten by default. */
537 if (!overwrite_refs && my_ref && is_tag) {
538 err = got_error_fmt(GOT_ERR_SEND_TAG_EXISTS,
539 "%s", refname);
540 goto done;
543 /* Check if their object exists locally. */
544 err = got_object_open(&obj, repo, their_id);
545 if (err) {
546 if (err->code != GOT_ERR_NO_OBJ)
547 goto done;
548 if (!overwrite_refs && my_ref != NULL) {
549 err = got_error_fmt(GOT_ERR_SEND_ANCESTRY,
550 "%s", refname);
551 goto done;
553 have_their_id = 0;
554 } else {
555 got_object_close(obj);
556 have_their_id = 1;
559 err = realloc_ids(&their_ids, &nalloc_theirs, ntheirs + 1);
560 if (err)
561 goto done;
563 if (have_their_id) {
564 /* Enforce linear ancestry if required. */
565 if (!overwrite_refs && my_ref && !is_tag) {
566 struct got_object_id *my_id;
567 err = got_ref_resolve(&my_id, repo, my_ref);
568 if (err)
569 goto done;
570 err = check_linear_ancestry(refname, my_id,
571 their_id, repo, cancel_cb, cancel_arg);
572 free(my_id);
573 my_id = NULL;
574 if (err)
575 goto done;
577 /* Exclude any objects reachable via their ID. */
578 their_ids[ntheirs] = got_object_id_dup(their_id);
579 if (their_ids[ntheirs] == NULL) {
580 err = got_error_from_errno("got_object_id_dup");
581 goto done;
583 ntheirs++;
584 } else if (!is_tag) {
585 char *remote_refname;
586 struct got_reference *ref;
587 /*
588 * Exclude any objects which exist on the server
589 * according to a locally cached remote reference.
590 */
591 err = get_remote_refname(&remote_refname,
592 remote_name, refname);
593 if (err)
594 goto done;
595 err = got_ref_open(&ref, repo, remote_refname, 0);
596 free(remote_refname);
597 if (err) {
598 if (err->code != GOT_ERR_NOT_REF)
599 goto done;
600 } else {
601 err = got_ref_resolve(&their_ids[ntheirs],
602 repo, ref);
603 got_ref_close(ref);
604 if (err)
605 goto done;
606 ntheirs++;
611 /* Account for any new references we are going to upload. */
612 TAILQ_FOREACH(re, &refs, entry) {
613 if (find_their_ref(&their_refs,
614 got_ref_get_name(re->ref)) == NULL)
615 refs_to_send++;
618 /* Account for any existing references we are going to delete. */
619 TAILQ_FOREACH(pe, delete_branches, entry) {
620 const char *branchname = pe->path;
621 if (find_their_ref(&their_refs, branchname))
622 refs_to_delete++;
625 if (refs_to_send == 0 && refs_to_delete == 0) {
626 got_privsep_send_stop(imsg_sendfds[0]);
627 goto done;
630 if (refs_to_send > 0) {
631 memset(&ppa, 0, sizeof(ppa));
632 ppa.progress_cb = progress_cb;
633 ppa.progress_arg = progress_arg;
634 err = got_pack_create(packsha1, packfile, their_ids, ntheirs,
635 our_ids, nours, repo, 0, 1, pack_progress, &ppa,
636 cancel_cb, cancel_arg);
637 if (err)
638 goto done;
640 if (fflush(packfile) == -1) {
641 err = got_error_from_errno("fflush");
642 goto done;
645 npackfd = dup(fileno(packfile));
646 if (npackfd == -1) {
647 err = got_error_from_errno("dup");
648 goto done;
650 err = got_privsep_send_packfd(&sendibuf, npackfd);
651 if (err != NULL)
652 goto done;
653 npackfd = -1;
654 } else {
655 err = got_privsep_send_packfd(&sendibuf, -1);
656 if (err != NULL)
657 goto done;
660 while (!done) {
661 int success = 0;
662 char *refname = NULL;
663 off_t bytes_sent_cur = 0;
664 if (cancel_cb) {
665 err = (*cancel_cb)(cancel_arg);
666 if (err)
667 goto done;
669 err = got_privsep_recv_send_progress(&done, &bytes_sent,
670 &success, &refname, &sendibuf);
671 if (err)
672 goto done;
673 if (refname && got_ref_name_is_valid(refname) && success &&
674 strncmp(refname, "refs/tags/", 10) != 0) {
675 struct got_reference *my_ref;
676 /*
677 * The server has accepted our changes.
678 * Update our reference in refs/remotes/ accordingly.
679 */
680 my_ref = find_ref(&refs, refname);
681 if (my_ref) {
682 err = update_remote_ref(my_ref, remote_name,
683 repo);
684 if (err)
685 goto done;
688 if (refname != NULL ||
689 bytes_sent_cur != bytes_sent) {
690 err = progress_cb(progress_arg, ppa.packfile_size,
691 ppa.ncommits, ppa.nobj_total, ppa.nobj_deltify,
692 ppa.nobj_written, bytes_sent,
693 refname, success);
694 if (err) {
695 free(refname);
696 goto done;
698 bytes_sent_cur = bytes_sent;
700 free(refname);
702 done:
703 if (sendpid != -1) {
704 if (err)
705 got_privsep_send_stop(imsg_sendfds[0]);
706 if (waitpid(sendpid, &sendstatus, 0) == -1 && err == NULL)
707 err = got_error_from_errno("waitpid");
709 if (packfile && fclose(packfile) == EOF && err == NULL)
710 err = got_error_from_errno("fclose");
711 if (nsendfd != -1 && close(nsendfd) == -1 && err == NULL)
712 err = got_error_from_errno("close");
713 if (npackfd != -1 && close(npackfd) == -1 && err == NULL)
714 err = got_error_from_errno("close");
716 got_ref_list_free(&refs);
717 got_pathlist_free(&have_refs);
718 got_pathlist_free(&their_refs);
719 for (i = 0; i < nours; i++)
720 free(our_ids[i]);
721 free(our_ids);
722 for (i = 0; i < ntheirs; i++)
723 free(their_ids[i]);
724 free(their_ids);
725 free(my_id);
726 return err;