3 test_description='git partial clone'
7 # create a normal "src" repo where we can later create new commits.
8 # expect_1.oids will contain a list of the OIDs of all blobs.
9 test_expect_success 'setup normal src repo' '
10 echo "{print \$1}" >print_1.awk &&
11 echo "{print \$2}" >print_2.awk &&
16 echo "This is file: $n" > src/file.$n.txt
17 git -C src add file.$n.txt
18 git -C src commit -m "file $n"
19 git -C src ls-files -s file.$n.txt >>temp
21 awk -f print_2.awk <temp | sort >expect_1.oids &&
22 test_line_count = 4 expect_1.oids
25 # bare clone "src" giving "srv.bare" for use as our server.
26 test_expect_success 'setup bare clone for server' '
27 git clone --bare "file://$(pwd)/src" srv.bare &&
28 git -C srv.bare config --local uploadpack.allowfilter 1 &&
29 git -C srv.bare config --local uploadpack.allowanysha1inwant 1
32 # do basic partial clone from "srv.bare"
33 # confirm we are missing all of the known blobs.
34 # confirm partial clone was registered in the local config.
35 test_expect_success 'do partial clone 1' '
36 git clone --no-checkout --filter=blob:none "file://$(pwd)/srv.bare" pc1 &&
38 git -C pc1 rev-list --quiet --objects --missing=print HEAD >revs &&
39 awk -f print_1.awk revs |
41 sort >observed.oids &&
43 test_cmp expect_1.oids observed.oids &&
44 test "$(git -C pc1 config --local core.repositoryformatversion)" = "1" &&
45 test "$(git -C pc1 config --local remote.origin.promisor)" = "true" &&
46 test "$(git -C pc1 config --local remote.origin.partialclonefilter)" = "blob:none"
49 test_expect_success 'verify that .promisor file contains refs fetched' '
50 ls pc1/.git/objects/pack/pack-*.promisor >promisorlist &&
51 test_line_count = 1 promisorlist &&
52 git -C srv.bare rev-parse --verify HEAD >headhash &&
53 grep "$(cat headhash) HEAD" $(cat promisorlist) &&
54 grep "$(cat headhash) refs/heads/master" $(cat promisorlist)
57 # checkout master to force dynamic object fetch of blobs at HEAD.
58 test_expect_success 'verify checkout with dynamic object fetch' '
59 git -C pc1 rev-list --quiet --objects --missing=print HEAD >observed &&
60 test_line_count = 4 observed &&
61 git -C pc1 checkout master &&
62 git -C pc1 rev-list --quiet --objects --missing=print HEAD >observed &&
63 test_line_count = 0 observed
66 # create new commits in "src" repo to establish a blame history on file.1.txt
67 # and push to "srv.bare".
68 test_expect_success 'push new commits to server' '
69 git -C src remote add srv "file://$(pwd)/srv.bare" &&
72 echo "Mod file.1.txt $x" >>src/file.1.txt
73 git -C src add file.1.txt
74 git -C src commit -m "mod $x"
76 git -C src blame master -- file.1.txt >expect.blame &&
77 git -C src push -u srv master
80 # (partial) fetch in the partial clone repo from the promisor remote.
81 # verify that fetch inherited the filter-spec from the config and DOES NOT
83 test_expect_success 'partial fetch inherits filter settings' '
84 git -C pc1 fetch origin &&
85 git -C pc1 rev-list --quiet --objects --missing=print \
86 master..origin/master >observed &&
87 test_line_count = 5 observed
90 # force dynamic object fetch using diff.
91 # we should only get 1 new blob (for the file in origin/master).
92 test_expect_success 'verify diff causes dynamic object fetch' '
93 git -C pc1 diff master..origin/master -- file.1.txt &&
94 git -C pc1 rev-list --quiet --objects --missing=print \
95 master..origin/master >observed &&
96 test_line_count = 4 observed
99 # force full dynamic object fetch of the file's history using blame.
100 # we should get the intermediate blobs for the file.
101 test_expect_success 'verify blame causes dynamic object fetch' '
102 git -C pc1 blame origin/master -- file.1.txt >observed.blame &&
103 test_cmp expect.blame observed.blame &&
104 git -C pc1 rev-list --quiet --objects --missing=print \
105 master..origin/master >observed &&
106 test_line_count = 0 observed
109 # create new commits in "src" repo to establish a history on file.2.txt
110 # and push to "srv.bare".
111 test_expect_success 'push new commits to server for file.2.txt' '
114 echo "Mod file.2.txt $x" >>src/file.2.txt
115 git -C src add file.2.txt
116 git -C src commit -m "mod $x"
118 git -C src push -u srv master
121 # Do FULL fetch by disabling inherited filter-spec using --no-filter.
122 # Verify we have all the new blobs.
123 test_expect_success 'override inherited filter-spec using --no-filter' '
124 git -C pc1 fetch --no-filter origin &&
125 git -C pc1 rev-list --quiet --objects --missing=print \
126 master..origin/master >observed &&
127 test_line_count = 0 observed
130 # create new commits in "src" repo to establish a history on file.3.txt
131 # and push to "srv.bare".
132 test_expect_success 'push new commits to server for file.3.txt' '
135 echo "Mod file.3.txt $x" >>src/file.3.txt
136 git -C src add file.3.txt
137 git -C src commit -m "mod $x"
139 git -C src push -u srv master
142 # Do a partial fetch and then try to manually fetch the missing objects.
143 # This can be used as the basis of a pre-command hook to bulk fetch objects
144 # perhaps combined with a command in dry-run mode.
145 test_expect_success 'manual prefetch of missing objects' '
146 git -C pc1 fetch --filter=blob:none origin &&
148 git -C pc1 rev-list --quiet --objects --missing=print \
149 master..origin/master >revs &&
150 awk -f print_1.awk revs |
152 sort >observed.oids &&
154 test_line_count = 6 observed.oids &&
155 git -C pc1 fetch-pack --stdin "file://$(pwd)/srv.bare" <observed.oids &&
157 git -C pc1 rev-list --quiet --objects --missing=print \
158 master..origin/master >revs &&
159 awk -f print_1.awk revs |
161 sort >observed.oids &&
163 test_line_count = 0 observed.oids
166 test_expect_success 'partial clone with transfer.fsckobjects=1 works with submodules' '
167 test_create_repo submodule &&
168 test_commit -C submodule mycommit &&
170 test_create_repo src_with_sub &&
171 test_config -C src_with_sub uploadpack.allowfilter 1 &&
172 test_config -C src_with_sub uploadpack.allowanysha1inwant 1 &&
174 git -C src_with_sub submodule add "file://$(pwd)/submodule" mysub &&
175 git -C src_with_sub commit -m "commit with submodule" &&
177 git -c transfer.fsckobjects=1 \
178 clone --filter="blob:none" "file://$(pwd)/src_with_sub" dst &&
179 test_when_finished rm -rf dst
182 test_expect_success 'partial clone with transfer.fsckobjects=1 uses index-pack --fsck-objects' '
184 test_commit -C src x &&
185 test_config -C src uploadpack.allowfilter 1 &&
186 test_config -C src uploadpack.allowanysha1inwant 1 &&
188 GIT_TRACE="$(pwd)/trace" git -c transfer.fsckobjects=1 \
189 clone --filter="blob:none" "file://$(pwd)/src" dst &&
190 grep "git index-pack.*--fsck-objects" trace
193 test_expect_success 'use fsck before and after manually fetching a missing subtree' '
194 # push new commit so server has a subtree
196 echo "in dir" >src/dir/file.txt &&
197 git -C src add dir/file.txt &&
198 git -C src commit -m "file in dir" &&
199 git -C src push -u srv master &&
200 SUBTREE=$(git -C src rev-parse HEAD:dir) &&
203 git clone --no-checkout --filter=tree:0 "file://$(pwd)/srv.bare" dst &&
206 # Make sure we only have commits, and all trees and blobs are missing.
207 git -C dst rev-list --missing=allow-any --objects master \
209 awk -f print_1.awk fetched_objects |
210 xargs -n1 git -C dst cat-file -t >fetched_types &&
212 sort -u fetched_types >unique_types.observed &&
213 echo commit >unique_types.expected &&
214 test_cmp unique_types.expected unique_types.observed &&
216 # Auto-fetch a tree with cat-file.
217 git -C dst cat-file -p $SUBTREE >tree_contents &&
218 grep file.txt tree_contents &&
220 # fsck still works after an auto-fetch of a tree.
223 # Auto-fetch all remaining trees and blobs with --missing=error
224 git -C dst rev-list --missing=error --objects master >fetched_objects &&
225 test_line_count = 70 fetched_objects &&
227 awk -f print_1.awk fetched_objects |
228 xargs -n1 git -C dst cat-file -t >fetched_types &&
230 sort -u fetched_types >unique_types.observed &&
231 test_write_lines blob commit tree >unique_types.expected &&
232 test_cmp unique_types.expected unique_types.observed
235 test_expect_success 'implicitly construct combine: filter with repeated flags' '
236 GIT_TRACE=$(pwd)/trace git clone --bare \
237 --filter=blob:none --filter=tree:1 \
238 "file://$(pwd)/srv.bare" pc2 &&
239 grep "trace:.* git pack-objects .*--filter=combine:blob:none+tree:1" \
241 git -C pc2 rev-list --objects --missing=allow-any HEAD >objects &&
243 # We should have gotten some root trees.
245 # Should not have gotten any non-root trees or blobs.
246 ! grep " ." objects &&
248 xargs -n 1 git -C pc2 cat-file -t <objects >types &&
249 sort -u types >unique_types.actual &&
250 test_write_lines commit tree >unique_types.expected &&
251 test_cmp unique_types.expected unique_types.actual
254 test_expect_success 'upload-pack fails banned object filters' '
255 test_config -C srv.bare uploadpackfilter.blob:none.allow false &&
256 test_must_fail ok=sigpipe git clone --no-checkout --filter=blob:none \
257 "file://$(pwd)/srv.bare" pc3 2>err &&
258 test_i18ngrep "filter '\''blob:none'\'' not supported" err
261 test_expect_success 'upload-pack fails banned combine object filters' '
262 test_config -C srv.bare uploadpackfilter.allow false &&
263 test_config -C srv.bare uploadpackfilter.combine.allow true &&
264 test_config -C srv.bare uploadpackfilter.tree.allow true &&
265 test_config -C srv.bare uploadpackfilter.blob:none.allow false &&
266 test_must_fail ok=sigpipe git clone --no-checkout --filter=tree:1 \
267 --filter=blob:none "file://$(pwd)/srv.bare" pc3 2>err &&
268 test_i18ngrep "filter '\''blob:none'\'' not supported" err
271 test_expect_success 'upload-pack fails banned object filters with fallback' '
272 test_config -C srv.bare uploadpackfilter.allow false &&
273 test_must_fail ok=sigpipe git clone --no-checkout --filter=blob:none \
274 "file://$(pwd)/srv.bare" pc3 2>err &&
275 test_i18ngrep "filter '\''blob:none'\'' not supported" err
278 test_expect_success 'upload-pack limits tree depth filters' '
279 test_config -C srv.bare uploadpackfilter.allow false &&
280 test_config -C srv.bare uploadpackfilter.tree.allow true &&
281 test_config -C srv.bare uploadpackfilter.tree.maxDepth 0 &&
282 test_must_fail ok=sigpipe git clone --no-checkout --filter=tree:1 \
283 "file://$(pwd)/srv.bare" pc3 2>err &&
284 test_i18ngrep "tree filter allows max depth 0, but got 1" err
287 test_expect_success 'partial clone fetches blobs pointed to by refs even if normally filtered out' '
290 test_commit -C src x &&
291 test_config -C src uploadpack.allowfilter 1 &&
292 test_config -C src uploadpack.allowanysha1inwant 1 &&
294 # Create a tag pointing to a blob.
295 BLOB=$(echo blob-contents | git -C src hash-object --stdin -w) &&
296 git -C src tag myblob "$BLOB" &&
298 git clone --filter="blob:none" "file://$(pwd)/src" dst 2>err &&
299 ! grep "does not point to a valid object" err &&
303 test_expect_success 'fetch what is specified on CLI even if already promised' '
304 rm -rf src dst.git &&
306 test_commit -C src foo &&
307 test_config -C src uploadpack.allowfilter 1 &&
308 test_config -C src uploadpack.allowanysha1inwant 1 &&
310 git hash-object --stdin <src/foo.t >blob &&
312 git clone --bare --filter=blob:none "file://$(pwd)/src" dst.git &&
313 git -C dst.git rev-list --objects --quiet --missing=print HEAD >missing_before &&
314 grep "?$(cat blob)" missing_before &&
315 git -C dst.git fetch origin $(cat blob) &&
316 git -C dst.git rev-list --objects --quiet --missing=print HEAD >missing_after &&
317 ! grep "?$(cat blob)" missing_after
320 test_expect_success 'setup src repo for sparse filter' '
321 git init sparse-src &&
322 git -C sparse-src config --local uploadpack.allowfilter 1 &&
323 git -C sparse-src config --local uploadpack.allowanysha1inwant 1 &&
324 test_commit -C sparse-src one &&
325 test_commit -C sparse-src two &&
326 echo /one.t >sparse-src/only-one &&
327 git -C sparse-src add . &&
328 git -C sparse-src commit -m "add sparse checkout files"
331 test_expect_success 'partial clone with sparse filter succeeds' '
333 git clone --no-local --bare \
334 --filter=sparse:oid=master:only-one \
335 sparse-src dst.git &&
338 git rev-list --objects --missing=print HEAD >out &&
339 grep "^$(git rev-parse HEAD:one.t)" out &&
340 grep "^?$(git rev-parse HEAD:two.t)" out
344 test_expect_success 'partial clone with unresolvable sparse filter fails cleanly' '
346 test_must_fail git clone --no-local --bare \
347 --filter=sparse:oid=master:no-such-name \
348 sparse-src dst.git 2>err &&
349 test_i18ngrep "unable to access sparse blob in .master:no-such-name" err &&
350 test_must_fail git clone --no-local --bare \
351 --filter=sparse:oid=master \
352 sparse-src dst.git 2>err &&
353 test_i18ngrep "unable to parse sparse filter data in" err
357 rm -rf big-blob.txt server client promisor-remote &&
359 printf "line %d\n" $(test_seq 1 100) >big-blob.txt &&
361 # Create a server with 2 commits: a commit with a big tree and a child
362 # commit with an incremental change. Also, create a partial clone
363 # client that only contains the first commit.
365 git -C server config --local uploadpack.allowfilter 1 &&
366 for i in $(test_seq 1 100)
368 echo "make the tree big" >server/file$i &&
369 git -C server add file$i
371 git -C server commit -m "initial" &&
372 git clone --bare --filter=tree:0 "file://$(pwd)/server" client &&
373 echo another line >>server/file1 &&
374 git -C server commit -am "incremental change" &&
376 # Create a promisor remote that only contains the tree and blob from
378 git init promisor-remote &&
379 git -C server config --local uploadpack.allowanysha1inwant 1 &&
380 TREE_HASH=$(git -C server rev-parse HEAD~1^{tree}) &&
381 git -C promisor-remote fetch --keep "file://$(pwd)/server" "$TREE_HASH" &&
382 git -C promisor-remote count-objects -v >object-count &&
383 test_i18ngrep "count: 0" object-count &&
384 test_i18ngrep "in-pack: 2" object-count &&
386 # Set it as the promisor remote of client. Thus, whenever
387 # the client lazy fetches, the lazy fetch will succeed only if it is
388 # for this tree or blob.
389 test_commit -C promisor-remote one && # so that ref advertisement is not empty
390 git -C promisor-remote config --local uploadpack.allowanysha1inwant 1 &&
391 git -C client remote set-url origin "file://$(pwd)/promisor-remote"
394 # NEEDSWORK: The tests beginning with "fetch lazy-fetches" below only
395 # test that "fetch" avoid fetching trees and blobs, but not commits or
396 # tags. Revisit this if Git is ever taught to support partial clones
397 # with commits and/or tags filtered out.
399 test_expect_success 'fetch lazy-fetches only to resolve deltas' '
402 # Exercise to make sure it works. Git will not fetch anything from the
403 # promisor remote other than for the big tree (because it needs to
404 # resolve the delta).
405 GIT_TRACE_PACKET="$(pwd)/trace" git -C client \
406 fetch "file://$(pwd)/server" master &&
408 # Verify the assumption that the client needed to fetch the delta base
409 # to resolve the delta.
410 git -C server rev-parse HEAD~1^{tree} >hash &&
411 grep "want $(cat hash)" trace
414 test_expect_success 'fetch lazy-fetches only to resolve deltas, protocol v2' '
417 git -C server config --local protocol.version 2 &&
418 git -C client config --local protocol.version 2 &&
419 git -C promisor-remote config --local protocol.version 2 &&
421 # Exercise to make sure it works. Git will not fetch anything from the
422 # promisor remote other than for the big blob (because it needs to
423 # resolve the delta).
424 GIT_TRACE_PACKET="$(pwd)/trace" git -C client \
425 fetch "file://$(pwd)/server" master &&
427 # Verify that protocol version 2 was used.
428 grep "fetch< version 2" trace &&
430 # Verify the assumption that the client needed to fetch the delta base
431 # to resolve the delta.
432 git -C server rev-parse HEAD~1^{tree} >hash &&
433 grep "want $(cat hash)" trace
436 # The following two tests must be in this order. It is important that
437 # the srv.bare repository did not have tags during clone, but has tags
440 test_expect_success 'verify fetch succeeds when asking for new tags' '
441 git clone --filter=blob:none "file://$(pwd)/srv.bare" tag-test &&
444 test_commit -C src $i &&
445 git -C src branch $i || return 1
447 git -C srv.bare fetch --tags origin +refs/heads/*:refs/heads/* &&
448 git -C tag-test -c protocol.version=2 fetch --tags origin
451 test_expect_success 'verify fetch downloads only one pack when updating refs' '
452 git clone --filter=blob:none "file://$(pwd)/srv.bare" pack-test &&
453 ls pack-test/.git/objects/pack/*pack >pack-list &&
454 test_line_count = 2 pack-list &&
457 test_commit -C src $i &&
458 git -C src branch $i || return 1
460 git -C srv.bare fetch origin +refs/heads/*:refs/heads/* &&
461 git -C pack-test fetch origin &&
462 ls pack-test/.git/objects/pack/*pack >pack-list &&
463 test_line_count = 3 pack-list
466 test_expect_success 'single-branch tag following respects partial clone' '
467 git clone --single-branch -b B --filter=blob:none \
468 "file://$(pwd)/srv.bare" single &&
469 git -C single rev-parse --verify refs/tags/B &&
470 git -C single rev-parse --verify refs/tags/A &&
471 test_must_fail git -C single rev-parse --verify refs/tags/C
474 test_expect_success 'fetch from a partial clone, protocol v0' '
475 rm -rf server client trace &&
477 # Pretend that the server is a partial clone
479 git -C server remote add a_remote "file://$(pwd)/" &&
480 test_config -C server core.repositoryformatversion 1 &&
481 test_config -C server extensions.partialclone a_remote &&
482 test_config -C server protocol.version 0 &&
483 test_commit -C server foo &&
485 # Fetch from the server
487 test_config -C client protocol.version 0 &&
488 test_commit -C client bar &&
489 GIT_TRACE_PACKET="$(pwd)/trace" git -C client fetch "file://$(pwd)/server" &&
490 ! grep "version 2" trace
493 test_expect_success 'fetch from a partial clone, protocol v2' '
494 rm -rf server client trace &&
496 # Pretend that the server is a partial clone
498 git -C server remote add a_remote "file://$(pwd)/" &&
499 test_config -C server core.repositoryformatversion 1 &&
500 test_config -C server extensions.partialclone a_remote &&
501 test_config -C server protocol.version 2 &&
502 test_commit -C server foo &&
504 # Fetch from the server
506 test_config -C client protocol.version 2 &&
507 test_commit -C client bar &&
508 GIT_TRACE_PACKET="$(pwd)/trace" git -C client fetch "file://$(pwd)/server" &&
509 grep "version 2" trace
512 . "$TEST_DIRECTORY"/lib-httpd.sh
515 # Converts bytes into their hexadecimal representation. For example,
516 # "printf 'ab\r\n' | hex_unpack" results in '61620d0a'.
518 perl -e '$/ = undef; $input = <>; print unpack("H2" x length($input), $input)'
521 # Inserts $1 at the start of the string and every 2 characters thereafter.
523 sed 's/\(..\)/'$1'\1/g'
526 # Create a one-time-perl command to replace the existing packfile with $1.
527 replace_packfile () {
528 # The protocol requires that the packfile be sent in sideband 1, hence
529 # the extra \x01 byte at the beginning.
530 cp $1 "$HTTPD_ROOT_PATH/one-time-pack" &&
531 echo 'if (/packfile/) {
533 my $length = -s "one-time-pack";
534 printf "%04x\x01", $length + 5;
535 print `cat one-time-pack` . "0000";
537 }' >"$HTTPD_ROOT_PATH/one-time-perl"
540 test_expect_success 'upon cloning, check that all refs point to objects' '
541 SERVER="$HTTPD_DOCUMENT_ROOT_PATH/server" &&
542 rm -rf "$SERVER" repo &&
543 test_create_repo "$SERVER" &&
544 test_commit -C "$SERVER" foo &&
545 test_config -C "$SERVER" uploadpack.allowfilter 1 &&
546 test_config -C "$SERVER" uploadpack.allowanysha1inwant 1 &&
548 # Create a tag pointing to a blob.
549 BLOB=$(echo blob-contents | git -C "$SERVER" hash-object --stdin -w) &&
550 git -C "$SERVER" tag myblob "$BLOB" &&
552 # Craft a packfile not including that blob.
553 git -C "$SERVER" rev-parse HEAD |
554 git -C "$SERVER" pack-objects --stdout >incomplete.pack &&
556 # Replace the existing packfile with the crafted one. The protocol
557 # requires that the packfile be sent in sideband 1, hence the extra
558 # \x01 byte at the beginning.
559 replace_packfile incomplete.pack &&
561 # Use protocol v2 because the perl command looks for the "packfile"
563 test_config -C "$SERVER" protocol.version 2 &&
564 test_must_fail git -c protocol.version=2 clone \
565 --filter=blob:none $HTTPD_URL/one_time_perl/server repo 2>err &&
567 test_i18ngrep "did not send all necessary objects" err &&
569 # Ensure that the one-time-perl script was used.
570 ! test -e "$HTTPD_ROOT_PATH/one-time-perl"
573 test_expect_success 'when partial cloning, tolerate server not sending target of tag' '
574 SERVER="$HTTPD_DOCUMENT_ROOT_PATH/server" &&
575 rm -rf "$SERVER" repo &&
576 test_create_repo "$SERVER" &&
577 test_commit -C "$SERVER" foo &&
578 test_config -C "$SERVER" uploadpack.allowfilter 1 &&
579 test_config -C "$SERVER" uploadpack.allowanysha1inwant 1 &&
581 # Create an annotated tag pointing to a blob.
582 BLOB=$(echo blob-contents | git -C "$SERVER" hash-object --stdin -w) &&
583 git -C "$SERVER" tag -m message -a myblob "$BLOB" &&
585 # Craft a packfile including the tag, but not the blob it points to.
586 # Also, omit objects referenced from HEAD in order to force a second
587 # fetch (to fetch missing objects) upon the automatic checkout that
588 # happens after a clone.
589 printf "%s\n%s\n--not\n%s\n%s\n" \
590 $(git -C "$SERVER" rev-parse HEAD) \
591 $(git -C "$SERVER" rev-parse myblob) \
592 $(git -C "$SERVER" rev-parse HEAD^{tree}) \
593 $(git -C "$SERVER" rev-parse myblob^{blob}) |
594 git -C "$SERVER" pack-objects --thin --stdout >incomplete.pack &&
596 # Replace the existing packfile with the crafted one. The protocol
597 # requires that the packfile be sent in sideband 1, hence the extra
598 # \x01 byte at the beginning.
599 replace_packfile incomplete.pack &&
601 # Use protocol v2 because the perl command looks for the "packfile"
603 test_config -C "$SERVER" protocol.version 2 &&
605 # Exercise to make sure it works.
606 git -c protocol.version=2 clone \
607 --filter=blob:none $HTTPD_URL/one_time_perl/server repo 2> err &&
608 ! grep "missing object referenced by" err &&
610 # Ensure that the one-time-perl script was used.
611 ! test -e "$HTTPD_ROOT_PATH/one-time-perl"
614 test_expect_success 'tolerate server sending REF_DELTA against missing promisor objects' '
615 SERVER="$HTTPD_DOCUMENT_ROOT_PATH/server" &&
616 rm -rf "$SERVER" repo &&
617 test_create_repo "$SERVER" &&
618 test_config -C "$SERVER" uploadpack.allowfilter 1 &&
619 test_config -C "$SERVER" uploadpack.allowanysha1inwant 1 &&
621 # Create a commit with 2 blobs to be used as delta bases.
622 for i in $(test_seq 10)
624 echo "this is a line" >>"$SERVER/foo.txt" &&
625 echo "this is another line" >>"$SERVER/have.txt"
627 git -C "$SERVER" add foo.txt have.txt &&
628 git -C "$SERVER" commit -m bar &&
629 git -C "$SERVER" rev-parse HEAD:foo.txt >deltabase_missing &&
630 git -C "$SERVER" rev-parse HEAD:have.txt >deltabase_have &&
632 # Clone. The client has deltabase_have but not deltabase_missing.
633 git -c protocol.version=2 clone --no-checkout \
634 --filter=blob:none $HTTPD_URL/one_time_perl/server repo &&
635 git -C repo hash-object -w -- "$SERVER/have.txt" &&
637 # Sanity check to ensure that the client does not have
639 git -C repo rev-list --objects --ignore-missing \
640 -- $(cat deltabase_missing) >objlist &&
641 test_line_count = 0 objlist &&
643 # Another commit. This commit will be fetched by the client.
644 echo "abcdefghijklmnopqrstuvwxyz" >>"$SERVER/foo.txt" &&
645 echo "abcdefghijklmnopqrstuvwxyz" >>"$SERVER/have.txt" &&
646 git -C "$SERVER" add foo.txt have.txt &&
647 git -C "$SERVER" commit -m baz &&
649 # Pack a thin pack containing, among other things, HEAD:foo.txt
650 # delta-ed against HEAD^:foo.txt and HEAD:have.txt delta-ed against
652 printf "%s\n--not\n%s\n" \
653 $(git -C "$SERVER" rev-parse HEAD) \
654 $(git -C "$SERVER" rev-parse HEAD^) |
655 git -C "$SERVER" pack-objects --thin --stdout >thin.pack &&
657 # Ensure that the pack contains one delta against HEAD^:foo.txt. Since
658 # the delta contains at least 26 novel characters, the size cannot be
659 # contained in 4 bits, so the object header will take up 2 bytes. The
660 # most significant nybble of the first byte is 0b1111 (0b1 to indicate
661 # that the header continues, and 0b111 to indicate REF_DELTA), followed
662 # by any 3 nybbles, then the OID of the delta base.
663 printf "f.,..%s" $(intersperse "," <deltabase_missing) >want &&
664 hex_unpack <thin.pack | intersperse "," >have &&
665 grep $(cat want) have &&
667 # Ensure that the pack contains one delta against HEAD^:have.txt,
668 # similar to the above.
669 printf "f.,..%s" $(intersperse "," <deltabase_have) >want &&
670 hex_unpack <thin.pack | intersperse "," >have &&
671 grep $(cat want) have &&
673 replace_packfile thin.pack &&
675 # Use protocol v2 because the perl command looks for the "packfile"
677 test_config -C "$SERVER" protocol.version 2 &&
679 # Fetch the thin pack and ensure that index-pack is able to handle the
680 # REF_DELTA object with a missing promisor delta base.
681 GIT_TRACE_PACKET="$(pwd)/trace" git -C repo -c protocol.version=2 fetch &&
683 # Ensure that the missing delta base was directly fetched, but not the
684 # one that the client has.
685 grep "want $(cat deltabase_missing)" trace &&
686 ! grep "want $(cat deltabase_have)" trace &&
688 # Ensure that the one-time-perl script was used.
689 ! test -e "$HTTPD_ROOT_PATH/one-time-perl"
692 # DO NOT add non-httpd-specific tests here, because the last part of this
693 # test script is only executed when httpd is available and enabled.