9 #include "fetch-pack.h"
11 #include "run-command.h"
12 #include "transport.h"
14 static int transfer_unpack_limit
= -1;
15 static int fetch_unpack_limit
= -1;
16 static int unpack_limit
= 100;
17 static int prefer_ofs_delta
= 1;
18 static struct fetch_pack_args args
= {
19 /* .uploadpack = */ "git-upload-pack",
22 static const char fetch_pack_usage
[] =
23 "git fetch-pack [--all] [--quiet|-q] [--keep|-k] [--thin] [--include-tag] [--upload-pack=<git-upload-pack>] [--depth=<n>] [--no-progress] [-v] [<host>:]<directory> [<refs>...]";
25 #define COMPLETE (1U << 0)
26 #define COMMON (1U << 1)
27 #define COMMON_REF (1U << 2)
28 #define SEEN (1U << 3)
29 #define POPPED (1U << 4)
34 * After sending this many "have"s if we do not get any new ACK , we
35 * give up traversing our history.
37 #define MAX_IN_VAIN 256
39 static struct commit_list
*rev_list
;
40 static int non_common_revs
, multi_ack
, use_sideband
;
42 static void rev_list_push(struct commit
*commit
, int mark
)
44 if (!(commit
->object
.flags
& mark
)) {
45 commit
->object
.flags
|= mark
;
47 if (!(commit
->object
.parsed
))
48 if (parse_commit(commit
))
51 commit_list_insert_by_date(commit
, &rev_list
);
53 if (!(commit
->object
.flags
& COMMON
))
58 static int rev_list_insert_ref(const char *path
, const unsigned char *sha1
, int flag
, void *cb_data
)
60 struct object
*o
= deref_tag(parse_object(sha1
), path
, 0);
62 if (o
&& o
->type
== OBJ_COMMIT
)
63 rev_list_push((struct commit
*)o
, SEEN
);
68 static int clear_marks(const char *path
, const unsigned char *sha1
, int flag
, void *cb_data
)
70 struct object
*o
= deref_tag(parse_object(sha1
), path
, 0);
72 if (o
&& o
->type
== OBJ_COMMIT
)
73 clear_commit_marks((struct commit
*)o
,
74 COMMON
| COMMON_REF
| SEEN
| POPPED
);
79 This function marks a rev and its ancestors as common.
80 In some cases, it is desirable to mark only the ancestors (for example
81 when only the server does not yet know that they are common).
84 static void mark_common(struct commit
*commit
,
85 int ancestors_only
, int dont_parse
)
87 if (commit
!= NULL
&& !(commit
->object
.flags
& COMMON
)) {
88 struct object
*o
= (struct object
*)commit
;
93 if (!(o
->flags
& SEEN
))
94 rev_list_push(commit
, SEEN
);
96 struct commit_list
*parents
;
98 if (!ancestors_only
&& !(o
->flags
& POPPED
))
100 if (!o
->parsed
&& !dont_parse
)
101 if (parse_commit(commit
))
104 for (parents
= commit
->parents
;
106 parents
= parents
->next
)
107 mark_common(parents
->item
, 0, dont_parse
);
113 Get the next rev to send, ignoring the common.
116 static const unsigned char *get_rev(void)
118 struct commit
*commit
= NULL
;
120 while (commit
== NULL
) {
122 struct commit_list
*parents
;
124 if (rev_list
== NULL
|| non_common_revs
== 0)
127 commit
= rev_list
->item
;
128 if (!commit
->object
.parsed
)
129 parse_commit(commit
);
130 parents
= commit
->parents
;
132 commit
->object
.flags
|= POPPED
;
133 if (!(commit
->object
.flags
& COMMON
))
136 if (commit
->object
.flags
& COMMON
) {
137 /* do not send "have", and ignore ancestors */
139 mark
= COMMON
| SEEN
;
140 } else if (commit
->object
.flags
& COMMON_REF
)
141 /* send "have", and ignore ancestors */
142 mark
= COMMON
| SEEN
;
144 /* send "have", also for its ancestors */
148 if (!(parents
->item
->object
.flags
& SEEN
))
149 rev_list_push(parents
->item
, mark
);
151 mark_common(parents
->item
, 1, 0);
152 parents
= parents
->next
;
155 rev_list
= rev_list
->next
;
158 return commit
->object
.sha1
;
169 static void consume_shallow_list(int fd
)
171 if (args
.stateless_rpc
&& args
.depth
> 0) {
172 /* If we sent a depth we will get back "duplicate"
173 * shallow and unshallow commands every time there
174 * is a block of have lines exchanged.
177 while (packet_read_line(fd
, line
, sizeof(line
))) {
178 if (!prefixcmp(line
, "shallow "))
180 if (!prefixcmp(line
, "unshallow "))
182 die("git fetch-pack: expected shallow list");
187 static enum ack_type
get_ack(int fd
, unsigned char *result_sha1
)
189 static char line
[1000];
190 int len
= packet_read_line(fd
, line
, sizeof(line
));
193 die("git fetch-pack: expected ACK/NAK, got EOF");
194 if (line
[len
-1] == '\n')
196 if (!strcmp(line
, "NAK"))
198 if (!prefixcmp(line
, "ACK ")) {
199 if (!get_sha1_hex(line
+4, result_sha1
)) {
200 if (strstr(line
+45, "continue"))
202 if (strstr(line
+45, "common"))
204 if (strstr(line
+45, "ready"))
209 die("git fetch_pack: expected ACK/NAK, got '%s'", line
);
212 static void send_request(int fd
, struct strbuf
*buf
)
214 if (args
.stateless_rpc
) {
215 send_sideband(fd
, -1, buf
->buf
, buf
->len
, LARGE_PACKET_MAX
);
218 safe_write(fd
, buf
->buf
, buf
->len
);
221 static void insert_one_alternate_ref(const struct ref
*ref
, void *unused
)
223 rev_list_insert_ref(NULL
, ref
->old_sha1
, 0, NULL
);
226 static void insert_alternate_refs(void)
228 foreach_alt_odb(refs_from_alternate_cb
, insert_one_alternate_ref
);
231 static int find_common(int fd
[2], unsigned char *result_sha1
,
235 int count
= 0, flushes
= 0, retval
;
236 const unsigned char *sha1
;
237 unsigned in_vain
= 0;
238 int got_continue
= 0;
239 struct strbuf req_buf
= STRBUF_INIT
;
240 size_t state_len
= 0;
242 if (args
.stateless_rpc
&& multi_ack
== 1)
243 die("--stateless-rpc requires multi_ack_detailed");
245 for_each_ref(clear_marks
, NULL
);
248 for_each_ref(rev_list_insert_ref
, NULL
);
249 insert_alternate_refs();
252 for ( ; refs
; refs
= refs
->next
) {
253 unsigned char *remote
= refs
->old_sha1
;
254 const char *remote_hex
;
258 * If that object is complete (i.e. it is an ancestor of a
259 * local ref), we tell them we have it but do not have to
260 * tell them about its ancestors, which they already know
263 * We use lookup_object here because we are only
264 * interested in the case we *know* the object is
265 * reachable and we have already scanned it.
267 if (((o
= lookup_object(remote
)) != NULL
) &&
268 (o
->flags
& COMPLETE
)) {
272 remote_hex
= sha1_to_hex(remote
);
274 struct strbuf c
= STRBUF_INIT
;
275 if (multi_ack
== 2) strbuf_addstr(&c
, " multi_ack_detailed");
276 if (multi_ack
== 1) strbuf_addstr(&c
, " multi_ack");
277 if (use_sideband
== 2) strbuf_addstr(&c
, " side-band-64k");
278 if (use_sideband
== 1) strbuf_addstr(&c
, " side-band");
279 if (args
.use_thin_pack
) strbuf_addstr(&c
, " thin-pack");
280 if (args
.no_progress
) strbuf_addstr(&c
, " no-progress");
281 if (args
.include_tag
) strbuf_addstr(&c
, " include-tag");
282 if (prefer_ofs_delta
) strbuf_addstr(&c
, " ofs-delta");
283 packet_buf_write(&req_buf
, "want %s%s\n", remote_hex
, c
.buf
);
286 packet_buf_write(&req_buf
, "want %s\n", remote_hex
);
291 strbuf_release(&req_buf
);
296 if (is_repository_shallow())
297 write_shallow_commits(&req_buf
, 1);
299 packet_buf_write(&req_buf
, "deepen %d", args
.depth
);
300 packet_buf_flush(&req_buf
);
301 state_len
= req_buf
.len
;
303 if (args
.depth
> 0) {
305 unsigned char sha1
[20];
307 send_request(fd
[1], &req_buf
);
308 while (packet_read_line(fd
[0], line
, sizeof(line
))) {
309 if (!prefixcmp(line
, "shallow ")) {
310 if (get_sha1_hex(line
+ 8, sha1
))
311 die("invalid shallow line: %s", line
);
312 register_shallow(sha1
);
315 if (!prefixcmp(line
, "unshallow ")) {
316 if (get_sha1_hex(line
+ 10, sha1
))
317 die("invalid unshallow line: %s", line
);
318 if (!lookup_object(sha1
))
319 die("object not found: %s", line
);
320 /* make sure that it is parsed as shallow */
321 if (!parse_object(sha1
))
322 die("error in object: %s", line
);
323 if (unregister_shallow(sha1
))
324 die("no shallow found: %s", line
);
327 die("expected shallow/unshallow, got %s", line
);
329 } else if (!args
.stateless_rpc
)
330 send_request(fd
[1], &req_buf
);
332 if (!args
.stateless_rpc
) {
333 /* If we aren't using the stateless-rpc interface
334 * we don't need to retain the headers.
336 strbuf_setlen(&req_buf
, 0);
342 while ((sha1
= get_rev())) {
343 packet_buf_write(&req_buf
, "have %s\n", sha1_to_hex(sha1
));
345 fprintf(stderr
, "have %s\n", sha1_to_hex(sha1
));
347 if (!(31 & ++count
)) {
350 packet_buf_flush(&req_buf
);
351 send_request(fd
[1], &req_buf
);
352 strbuf_setlen(&req_buf
, state_len
);
356 * We keep one window "ahead" of the other side, and
357 * will wait for an ACK only on the next one
359 if (!args
.stateless_rpc
&& count
== 32)
362 consume_shallow_list(fd
[0]);
364 ack
= get_ack(fd
[0], result_sha1
);
365 if (args
.verbose
&& ack
)
366 fprintf(stderr
, "got ack %d %s\n", ack
,
367 sha1_to_hex(result_sha1
));
377 struct commit
*commit
=
378 lookup_commit(result_sha1
);
379 if (args
.stateless_rpc
381 && !(commit
->object
.flags
& COMMON
)) {
382 /* We need to replay the have for this object
383 * on the next RPC request so the peer knows
384 * it is in common with us.
386 const char *hex
= sha1_to_hex(result_sha1
);
387 packet_buf_write(&req_buf
, "have %s\n", hex
);
388 state_len
= req_buf
.len
;
390 mark_common(commit
, 0, 1);
399 if (got_continue
&& MAX_IN_VAIN
< in_vain
) {
401 fprintf(stderr
, "giving up\n");
407 packet_buf_write(&req_buf
, "done\n");
408 send_request(fd
[1], &req_buf
);
410 fprintf(stderr
, "done\n");
415 strbuf_release(&req_buf
);
417 consume_shallow_list(fd
[0]);
418 while (flushes
|| multi_ack
) {
419 int ack
= get_ack(fd
[0], result_sha1
);
422 fprintf(stderr
, "got ack (%d) %s\n", ack
,
423 sha1_to_hex(result_sha1
));
431 /* it is no error to fetch into a completely empty repo */
432 return count
? retval
: 0;
435 static struct commit_list
*complete
;
437 static int mark_complete(const char *path
, const unsigned char *sha1
, int flag
, void *cb_data
)
439 struct object
*o
= parse_object(sha1
);
441 while (o
&& o
->type
== OBJ_TAG
) {
442 struct tag
*t
= (struct tag
*) o
;
444 break; /* broken repository */
445 o
->flags
|= COMPLETE
;
446 o
= parse_object(t
->tagged
->sha1
);
448 if (o
&& o
->type
== OBJ_COMMIT
) {
449 struct commit
*commit
= (struct commit
*)o
;
450 commit
->object
.flags
|= COMPLETE
;
451 commit_list_insert_by_date(commit
, &complete
);
456 static void mark_recent_complete_commits(unsigned long cutoff
)
458 while (complete
&& cutoff
<= complete
->item
->date
) {
460 fprintf(stderr
, "Marking %s as complete\n",
461 sha1_to_hex(complete
->item
->object
.sha1
));
462 pop_most_recent_commit(&complete
, COMPLETE
);
466 static void filter_refs(struct ref
**refs
, int nr_match
, char **match
)
468 struct ref
**return_refs
;
469 struct ref
*newlist
= NULL
;
470 struct ref
**newtail
= &newlist
;
471 struct ref
*ref
, *next
;
472 struct ref
*fastarray
[32];
474 if (nr_match
&& !args
.fetch_all
) {
475 if (ARRAY_SIZE(fastarray
) < nr_match
)
476 return_refs
= xcalloc(nr_match
, sizeof(struct ref
*));
478 return_refs
= fastarray
;
479 memset(return_refs
, 0, sizeof(struct ref
*) * nr_match
);
485 for (ref
= *refs
; ref
; ref
= next
) {
487 if (!memcmp(ref
->name
, "refs/", 5) &&
488 check_ref_format(ref
->name
+ 5))
490 else if (args
.fetch_all
&&
491 (!args
.depth
|| prefixcmp(ref
->name
, "refs/tags/") )) {
494 newtail
= &ref
->next
;
498 int order
= path_match(ref
->name
, nr_match
, match
);
500 return_refs
[order
-1] = ref
;
501 continue; /* we will link it later */
507 if (!args
.fetch_all
) {
509 for (i
= 0; i
< nr_match
; i
++) {
510 ref
= return_refs
[i
];
514 newtail
= &ref
->next
;
517 if (return_refs
!= fastarray
)
523 static int everything_local(struct ref
**refs
, int nr_match
, char **match
)
527 unsigned long cutoff
= 0;
529 save_commit_buffer
= 0;
531 for (ref
= *refs
; ref
; ref
= ref
->next
) {
534 o
= parse_object(ref
->old_sha1
);
538 /* We already have it -- which may mean that we were
539 * in sync with the other side at some time after
540 * that (it is OK if we guess wrong here).
542 if (o
->type
== OBJ_COMMIT
) {
543 struct commit
*commit
= (struct commit
*)o
;
544 if (!cutoff
|| cutoff
< commit
->date
)
545 cutoff
= commit
->date
;
550 for_each_ref(mark_complete
, NULL
);
552 mark_recent_complete_commits(cutoff
);
556 * Mark all complete remote refs as common refs.
557 * Don't mark them common yet; the server has to be told so first.
559 for (ref
= *refs
; ref
; ref
= ref
->next
) {
560 struct object
*o
= deref_tag(lookup_object(ref
->old_sha1
),
563 if (!o
|| o
->type
!= OBJ_COMMIT
|| !(o
->flags
& COMPLETE
))
566 if (!(o
->flags
& SEEN
)) {
567 rev_list_push((struct commit
*)o
, COMMON_REF
| SEEN
);
569 mark_common((struct commit
*)o
, 1, 1);
573 filter_refs(refs
, nr_match
, match
);
575 for (retval
= 1, ref
= *refs
; ref
; ref
= ref
->next
) {
576 const unsigned char *remote
= ref
->old_sha1
;
577 unsigned char local
[20];
580 o
= lookup_object(remote
);
581 if (!o
|| !(o
->flags
& COMPLETE
)) {
586 "want %s (%s)\n", sha1_to_hex(remote
),
591 hashcpy(ref
->new_sha1
, local
);
595 "already have %s (%s)\n", sha1_to_hex(remote
),
601 static int sideband_demux(int in
, int out
, void *data
)
605 int ret
= recv_sideband("fetch-pack", xd
[0], out
);
610 static int get_pack(int xd
[2], char **pack_lockfile
)
613 const char *argv
[20];
617 int do_keep
= args
.keep_pack
;
618 struct child_process cmd
;
620 memset(&demux
, 0, sizeof(demux
));
622 /* xd[] is talking with upload-pack; subprocess reads from
623 * xd[0], spits out band#2 to stderr, and feeds us band#1
624 * through demux->out.
626 demux
.proc
= sideband_demux
;
629 if (start_async(&demux
))
630 die("fetch-pack: unable to fork off sideband"
636 memset(&cmd
, 0, sizeof(cmd
));
640 if (!args
.keep_pack
&& unpack_limit
) {
641 struct pack_header header
;
643 if (read_pack_header(demux
.out
, &header
))
644 die("protocol error: bad pack header");
645 snprintf(hdr_arg
, sizeof(hdr_arg
),
646 "--pack_header=%"PRIu32
",%"PRIu32
,
647 ntohl(header
.hdr_version
), ntohl(header
.hdr_entries
));
648 if (ntohl(header
.hdr_entries
) < unpack_limit
)
657 *av
++ = "index-pack";
659 if (!args
.quiet
&& !args
.no_progress
)
661 if (args
.use_thin_pack
)
662 *av
++ = "--fix-thin";
663 if (args
.lock_pack
|| unpack_limit
) {
664 int s
= sprintf(keep_arg
,
665 "--keep=fetch-pack %"PRIuMAX
" on ", (uintmax_t) getpid());
666 if (gethostname(keep_arg
+ s
, sizeof(keep_arg
) - s
))
667 strcpy(keep_arg
+ s
, "localhost");
672 *av
++ = "unpack-objects";
682 if (start_command(&cmd
))
683 die("fetch-pack: unable to fork off %s", argv
[0]);
684 if (do_keep
&& pack_lockfile
) {
685 *pack_lockfile
= index_pack_lockfile(cmd
.out
);
689 if (finish_command(&cmd
))
690 die("%s failed", argv
[0]);
691 if (use_sideband
&& finish_async(&demux
))
692 die("error in sideband demultiplexer");
696 static struct ref
*do_fetch_pack(int fd
[2],
697 const struct ref
*orig_ref
,
700 char **pack_lockfile
)
702 struct ref
*ref
= copy_ref_list(orig_ref
);
703 unsigned char sha1
[20];
705 if (is_repository_shallow() && !server_supports("shallow"))
706 die("Server does not support shallow clients");
707 if (server_supports("multi_ack_detailed")) {
709 fprintf(stderr
, "Server supports multi_ack_detailed\n");
712 else if (server_supports("multi_ack")) {
714 fprintf(stderr
, "Server supports multi_ack\n");
717 if (server_supports("side-band-64k")) {
719 fprintf(stderr
, "Server supports side-band-64k\n");
722 else if (server_supports("side-band")) {
724 fprintf(stderr
, "Server supports side-band\n");
727 if (server_supports("ofs-delta")) {
729 fprintf(stderr
, "Server supports ofs-delta\n");
731 prefer_ofs_delta
= 0;
732 if (everything_local(&ref
, nr_match
, match
)) {
736 if (find_common(fd
, sha1
, ref
) < 0)
738 /* When cloning, it is not unusual to have
741 warning("no common commits");
743 if (args
.stateless_rpc
)
745 if (get_pack(fd
, pack_lockfile
))
746 die("git fetch-pack: fetch failed.");
752 static int remove_duplicates(int nr_heads
, char **heads
)
756 for (src
= dst
= 0; src
< nr_heads
; src
++) {
757 /* If heads[src] is different from any of
758 * heads[0..dst], push it in.
761 for (i
= 0; i
< dst
; i
++) {
762 if (!strcmp(heads
[i
], heads
[src
]))
768 heads
[dst
] = heads
[src
];
774 static int fetch_pack_config(const char *var
, const char *value
, void *cb
)
776 if (strcmp(var
, "fetch.unpacklimit") == 0) {
777 fetch_unpack_limit
= git_config_int(var
, value
);
781 if (strcmp(var
, "transfer.unpacklimit") == 0) {
782 transfer_unpack_limit
= git_config_int(var
, value
);
786 if (strcmp(var
, "repack.usedeltabaseoffset") == 0) {
787 prefer_ofs_delta
= git_config_bool(var
, value
);
791 return git_default_config(var
, value
, cb
);
794 static struct lock_file lock
;
796 static void fetch_pack_setup(void)
798 static int did_setup
;
801 git_config(fetch_pack_config
, NULL
);
802 if (0 <= transfer_unpack_limit
)
803 unpack_limit
= transfer_unpack_limit
;
804 else if (0 <= fetch_unpack_limit
)
805 unpack_limit
= fetch_unpack_limit
;
809 int cmd_fetch_pack(int argc
, const char **argv
, const char *prefix
)
811 int i
, ret
, nr_heads
;
812 struct ref
*ref
= NULL
;
813 char *dest
= NULL
, **heads
;
815 char *pack_lockfile
= NULL
;
816 char **pack_lockfile_ptr
= NULL
;
817 struct child_process
*conn
;
819 packet_trace_identity("fetch-pack");
823 for (i
= 1; i
< argc
; i
++) {
824 const char *arg
= argv
[i
];
827 if (!prefixcmp(arg
, "--upload-pack=")) {
828 args
.uploadpack
= arg
+ 14;
831 if (!prefixcmp(arg
, "--exec=")) {
832 args
.uploadpack
= arg
+ 7;
835 if (!strcmp("--quiet", arg
) || !strcmp("-q", arg
)) {
839 if (!strcmp("--keep", arg
) || !strcmp("-k", arg
)) {
840 args
.lock_pack
= args
.keep_pack
;
844 if (!strcmp("--thin", arg
)) {
845 args
.use_thin_pack
= 1;
848 if (!strcmp("--include-tag", arg
)) {
849 args
.include_tag
= 1;
852 if (!strcmp("--all", arg
)) {
856 if (!strcmp("-v", arg
)) {
860 if (!prefixcmp(arg
, "--depth=")) {
861 args
.depth
= strtol(arg
+ 8, NULL
, 0);
864 if (!strcmp("--no-progress", arg
)) {
865 args
.no_progress
= 1;
868 if (!strcmp("--stateless-rpc", arg
)) {
869 args
.stateless_rpc
= 1;
872 if (!strcmp("--lock-pack", arg
)) {
874 pack_lockfile_ptr
= &pack_lockfile
;
877 usage(fetch_pack_usage
);
880 heads
= (char **)(argv
+ i
+ 1);
881 nr_heads
= argc
- i
- 1;
885 usage(fetch_pack_usage
);
887 if (args
.stateless_rpc
) {
892 conn
= git_connect(fd
, (char *)dest
, args
.uploadpack
,
893 args
.verbose
? CONNECT_VERBOSE
: 0);
896 get_remote_heads(fd
[0], &ref
, 0, NULL
, 0, NULL
);
898 ref
= fetch_pack(&args
, fd
, conn
, ref
, dest
,
899 nr_heads
, heads
, pack_lockfile_ptr
);
901 printf("lock %s\n", pack_lockfile
);
906 if (finish_connect(conn
))
910 if (!ret
&& nr_heads
) {
911 /* If the heads to pull were given, we should have
912 * consumed all of them by matching the remote.
913 * Otherwise, 'git fetch remote no-such-ref' would
914 * silently succeed without issuing an error.
916 for (i
= 0; i
< nr_heads
; i
++)
917 if (heads
[i
] && heads
[i
][0]) {
918 error("no such remote ref %s", heads
[i
]);
924 sha1_to_hex(ref
->old_sha1
), ref
->name
);
931 struct ref
*fetch_pack(struct fetch_pack_args
*my_args
,
932 int fd
[], struct child_process
*conn
,
933 const struct ref
*ref
,
937 char **pack_lockfile
)
943 if (&args
!= my_args
)
944 memcpy(&args
, my_args
, sizeof(args
));
945 if (args
.depth
> 0) {
946 if (stat(git_path("shallow"), &st
))
950 if (heads
&& nr_heads
)
951 nr_heads
= remove_duplicates(nr_heads
, heads
);
954 die("no matching remote head");
956 ref_cpy
= do_fetch_pack(fd
, ref
, nr_heads
, heads
, pack_lockfile
);
958 if (args
.depth
> 0) {
959 struct cache_time mtime
;
960 struct strbuf sb
= STRBUF_INIT
;
961 char *shallow
= git_path("shallow");
964 mtime
.sec
= st
.st_mtime
;
965 mtime
.nsec
= ST_MTIME_NSEC(st
);
966 if (stat(shallow
, &st
)) {
968 die("shallow file was removed during fetch");
969 } else if (st
.st_mtime
!= mtime
.sec
971 || ST_MTIME_NSEC(st
) != mtime
.nsec
974 die("shallow file was changed during fetch");
976 fd
= hold_lock_file_for_update(&lock
, shallow
,
978 if (!write_shallow_commits(&sb
, 0)
979 || write_in_full(fd
, sb
.buf
, sb
.len
) != sb
.len
) {
980 unlink_or_warn(shallow
);
981 rollback_lock_file(&lock
);
983 commit_lock_file(&lock
);
988 reprepare_packed_git();