| #!/bin/sh |
| |
| test_description='git partial clone' |
| |
| . ./test-lib.sh |
| |
| # create a normal "src" repo where we can later create new commits. |
| # expect_1.oids will contain a list of the OIDs of all blobs. |
| test_expect_success 'setup normal src repo' ' |
| echo "{print \$1}" >print_1.awk && |
| echo "{print \$2}" >print_2.awk && |
| |
| git init src && |
| for n in 1 2 3 4 |
| do |
| echo "This is file: $n" > src/file.$n.txt |
| git -C src add file.$n.txt |
| git -C src commit -m "file $n" |
| git -C src ls-files -s file.$n.txt >>temp |
| done && |
| awk -f print_2.awk <temp | sort >expect_1.oids && |
| test_line_count = 4 expect_1.oids |
| ' |
| |
| # bare clone "src" giving "srv.bare" for use as our server. |
| test_expect_success 'setup bare clone for server' ' |
| git clone --bare "file://$(pwd)/src" srv.bare && |
| git -C srv.bare config --local uploadpack.allowfilter 1 && |
| git -C srv.bare config --local uploadpack.allowanysha1inwant 1 |
| ' |
| |
| # do basic partial clone from "srv.bare" |
| # confirm we are missing all of the known blobs. |
| # confirm partial clone was registered in the local config. |
| test_expect_success 'do partial clone 1' ' |
| git clone --no-checkout --filter=blob:none "file://$(pwd)/srv.bare" pc1 && |
| |
| git -C pc1 rev-list --quiet --objects --missing=print HEAD >revs && |
| awk -f print_1.awk revs | |
| sed "s/?//" | |
| sort >observed.oids && |
| |
| test_cmp expect_1.oids observed.oids && |
| test "$(git -C pc1 config --local core.repositoryformatversion)" = "1" && |
| test "$(git -C pc1 config --local remote.origin.promisor)" = "true" && |
| test "$(git -C pc1 config --local remote.origin.partialclonefilter)" = "blob:none" |
| ' |
| |
| test_expect_success 'verify that .promisor file contains refs fetched' ' |
| ls pc1/.git/objects/pack/pack-*.promisor >promisorlist && |
| test_line_count = 1 promisorlist && |
| git -C srv.bare rev-parse --verify HEAD >headhash && |
| grep "$(cat headhash) HEAD" $(cat promisorlist) && |
| grep "$(cat headhash) refs/heads/master" $(cat promisorlist) |
| ' |
| |
| # checkout master to force dynamic object fetch of blobs at HEAD. |
| test_expect_success 'verify checkout with dynamic object fetch' ' |
| git -C pc1 rev-list --quiet --objects --missing=print HEAD >observed && |
| test_line_count = 4 observed && |
| git -C pc1 checkout master && |
| git -C pc1 rev-list --quiet --objects --missing=print HEAD >observed && |
| test_line_count = 0 observed |
| ' |
| |
| # create new commits in "src" repo to establish a blame history on file.1.txt |
| # and push to "srv.bare". |
| test_expect_success 'push new commits to server' ' |
| git -C src remote add srv "file://$(pwd)/srv.bare" && |
| for x in a b c d e |
| do |
| echo "Mod file.1.txt $x" >>src/file.1.txt |
| git -C src add file.1.txt |
| git -C src commit -m "mod $x" |
| done && |
| git -C src blame master -- file.1.txt >expect.blame && |
| git -C src push -u srv master |
| ' |
| |
| # (partial) fetch in the partial clone repo from the promisor remote. |
| # verify that fetch inherited the filter-spec from the config and DOES NOT |
| # have the new blobs. |
| test_expect_success 'partial fetch inherits filter settings' ' |
| git -C pc1 fetch origin && |
| git -C pc1 rev-list --quiet --objects --missing=print \ |
| master..origin/master >observed && |
| test_line_count = 5 observed |
| ' |
| |
| # force dynamic object fetch using diff. |
| # we should only get 1 new blob (for the file in origin/master). |
| test_expect_success 'verify diff causes dynamic object fetch' ' |
| git -C pc1 diff master..origin/master -- file.1.txt && |
| git -C pc1 rev-list --quiet --objects --missing=print \ |
| master..origin/master >observed && |
| test_line_count = 4 observed |
| ' |
| |
| # force full dynamic object fetch of the file's history using blame. |
| # we should get the intermediate blobs for the file. |
| test_expect_success 'verify blame causes dynamic object fetch' ' |
| git -C pc1 blame origin/master -- file.1.txt >observed.blame && |
| test_cmp expect.blame observed.blame && |
| git -C pc1 rev-list --quiet --objects --missing=print \ |
| master..origin/master >observed && |
| test_line_count = 0 observed |
| ' |
| |
| # create new commits in "src" repo to establish a history on file.2.txt |
| # and push to "srv.bare". |
| test_expect_success 'push new commits to server for file.2.txt' ' |
| for x in a b c d e f |
| do |
| echo "Mod file.2.txt $x" >>src/file.2.txt |
| git -C src add file.2.txt |
| git -C src commit -m "mod $x" |
| done && |
| git -C src push -u srv master |
| ' |
| |
| # Do FULL fetch by disabling inherited filter-spec using --no-filter. |
| # Verify we have all the new blobs. |
| test_expect_success 'override inherited filter-spec using --no-filter' ' |
| git -C pc1 fetch --no-filter origin && |
| git -C pc1 rev-list --quiet --objects --missing=print \ |
| master..origin/master >observed && |
| test_line_count = 0 observed |
| ' |
| |
| # create new commits in "src" repo to establish a history on file.3.txt |
| # and push to "srv.bare". |
| test_expect_success 'push new commits to server for file.3.txt' ' |
| for x in a b c d e f |
| do |
| echo "Mod file.3.txt $x" >>src/file.3.txt |
| git -C src add file.3.txt |
| git -C src commit -m "mod $x" |
| done && |
| git -C src push -u srv master |
| ' |
| |
| # Do a partial fetch and then try to manually fetch the missing objects. |
| # This can be used as the basis of a pre-command hook to bulk fetch objects |
| # perhaps combined with a command in dry-run mode. |
| test_expect_success 'manual prefetch of missing objects' ' |
| git -C pc1 fetch --filter=blob:none origin && |
| |
| git -C pc1 rev-list --quiet --objects --missing=print \ |
| master..origin/master >revs && |
| awk -f print_1.awk revs | |
| sed "s/?//" | |
| sort >observed.oids && |
| |
| test_line_count = 6 observed.oids && |
| git -C pc1 fetch-pack --stdin "file://$(pwd)/srv.bare" <observed.oids && |
| |
| git -C pc1 rev-list --quiet --objects --missing=print \ |
| master..origin/master >revs && |
| awk -f print_1.awk revs | |
| sed "s/?//" | |
| sort >observed.oids && |
| |
| test_line_count = 0 observed.oids |
| ' |
| |
| test_expect_success 'partial clone with transfer.fsckobjects=1 works with submodules' ' |
| test_create_repo submodule && |
| test_commit -C submodule mycommit && |
| |
| test_create_repo src_with_sub && |
| test_config -C src_with_sub uploadpack.allowfilter 1 && |
| test_config -C src_with_sub uploadpack.allowanysha1inwant 1 && |
| |
| git -C src_with_sub submodule add "file://$(pwd)/submodule" mysub && |
| git -C src_with_sub commit -m "commit with submodule" && |
| |
| git -c transfer.fsckobjects=1 \ |
| clone --filter="blob:none" "file://$(pwd)/src_with_sub" dst && |
| test_when_finished rm -rf dst |
| ' |
| |
| test_expect_success 'partial clone with transfer.fsckobjects=1 uses index-pack --fsck-objects' ' |
| git init src && |
| test_commit -C src x && |
| test_config -C src uploadpack.allowfilter 1 && |
| test_config -C src uploadpack.allowanysha1inwant 1 && |
| |
| GIT_TRACE="$(pwd)/trace" git -c transfer.fsckobjects=1 \ |
| clone --filter="blob:none" "file://$(pwd)/src" dst && |
| grep "git index-pack.*--fsck-objects" trace |
| ' |
| |
| test_expect_success 'use fsck before and after manually fetching a missing subtree' ' |
| # push new commit so server has a subtree |
| mkdir src/dir && |
| echo "in dir" >src/dir/file.txt && |
| git -C src add dir/file.txt && |
| git -C src commit -m "file in dir" && |
| git -C src push -u srv master && |
| SUBTREE=$(git -C src rev-parse HEAD:dir) && |
| |
| rm -rf dst && |
| git clone --no-checkout --filter=tree:0 "file://$(pwd)/srv.bare" dst && |
| git -C dst fsck && |
| |
| # Make sure we only have commits, and all trees and blobs are missing. |
| git -C dst rev-list --missing=allow-any --objects master \ |
| >fetched_objects && |
| awk -f print_1.awk fetched_objects | |
| xargs -n1 git -C dst cat-file -t >fetched_types && |
| |
| sort -u fetched_types >unique_types.observed && |
| echo commit >unique_types.expected && |
| test_cmp unique_types.expected unique_types.observed && |
| |
| # Auto-fetch a tree with cat-file. |
| git -C dst cat-file -p $SUBTREE >tree_contents && |
| grep file.txt tree_contents && |
| |
| # fsck still works after an auto-fetch of a tree. |
| git -C dst fsck && |
| |
| # Auto-fetch all remaining trees and blobs with --missing=error |
| git -C dst rev-list --missing=error --objects master >fetched_objects && |
| test_line_count = 70 fetched_objects && |
| |
| awk -f print_1.awk fetched_objects | |
| xargs -n1 git -C dst cat-file -t >fetched_types && |
| |
| sort -u fetched_types >unique_types.observed && |
| test_write_lines blob commit tree >unique_types.expected && |
| test_cmp unique_types.expected unique_types.observed |
| ' |
| |
| test_expect_success 'implicitly construct combine: filter with repeated flags' ' |
| GIT_TRACE=$(pwd)/trace git clone --bare \ |
| --filter=blob:none --filter=tree:1 \ |
| "file://$(pwd)/srv.bare" pc2 && |
| grep "trace:.* git pack-objects .*--filter=combine:blob:none+tree:1" \ |
| trace && |
| git -C pc2 rev-list --objects --missing=allow-any HEAD >objects && |
| |
| # We should have gotten some root trees. |
| grep " $" objects && |
| # Should not have gotten any non-root trees or blobs. |
| ! grep " ." objects && |
| |
| xargs -n 1 git -C pc2 cat-file -t <objects >types && |
| sort -u types >unique_types.actual && |
| test_write_lines commit tree >unique_types.expected && |
| test_cmp unique_types.expected unique_types.actual |
| ' |
| |
| test_expect_success 'upload-pack complains of bogus filter config' ' |
| printf 0000 | |
| test_must_fail git \ |
| -c uploadpackfilter.tree.maxdepth \ |
| upload-pack . >/dev/null 2>err && |
| test_i18ngrep "unable to parse.*tree.maxdepth" err |
| ' |
| |
| test_expect_success 'upload-pack fails banned object filters' ' |
| test_config -C srv.bare uploadpackfilter.blob:none.allow false && |
| test_must_fail ok=sigpipe git clone --no-checkout --filter=blob:none \ |
| "file://$(pwd)/srv.bare" pc3 2>err && |
| test_i18ngrep "filter '\''blob:none'\'' not supported" err |
| ' |
| |
| test_expect_success 'upload-pack fails banned combine object filters' ' |
| test_config -C srv.bare uploadpackfilter.allow false && |
| test_config -C srv.bare uploadpackfilter.combine.allow true && |
| test_config -C srv.bare uploadpackfilter.tree.allow true && |
| test_config -C srv.bare uploadpackfilter.blob:none.allow false && |
| test_must_fail ok=sigpipe git clone --no-checkout --filter=tree:1 \ |
| --filter=blob:none "file://$(pwd)/srv.bare" pc3 2>err && |
| test_i18ngrep "filter '\''blob:none'\'' not supported" err |
| ' |
| |
| test_expect_success 'upload-pack fails banned object filters with fallback' ' |
| test_config -C srv.bare uploadpackfilter.allow false && |
| test_must_fail ok=sigpipe git clone --no-checkout --filter=blob:none \ |
| "file://$(pwd)/srv.bare" pc3 2>err && |
| test_i18ngrep "filter '\''blob:none'\'' not supported" err |
| ' |
| |
| test_expect_success 'upload-pack limits tree depth filters' ' |
| test_config -C srv.bare uploadpackfilter.allow false && |
| test_config -C srv.bare uploadpackfilter.tree.allow true && |
| test_config -C srv.bare uploadpackfilter.tree.maxDepth 0 && |
| test_must_fail ok=sigpipe git clone --no-checkout --filter=tree:1 \ |
| "file://$(pwd)/srv.bare" pc3 2>err && |
| test_i18ngrep "tree filter allows max depth 0, but got 1" err && |
| |
| git clone --no-checkout --filter=tree:0 "file://$(pwd)/srv.bare" pc4 && |
| |
| test_config -C srv.bare uploadpackfilter.tree.maxDepth 5 && |
| git clone --no-checkout --filter=tree:5 "file://$(pwd)/srv.bare" pc5 && |
| test_must_fail ok=sigpipe git clone --no-checkout --filter=tree:6 \ |
| "file://$(pwd)/srv.bare" pc6 2>err && |
| test_i18ngrep "tree filter allows max depth 5, but got 6" err |
| ' |
| |
| test_expect_success 'partial clone fetches blobs pointed to by refs even if normally filtered out' ' |
| rm -rf src dst && |
| git init src && |
| test_commit -C src x && |
| test_config -C src uploadpack.allowfilter 1 && |
| test_config -C src uploadpack.allowanysha1inwant 1 && |
| |
| # Create a tag pointing to a blob. |
| BLOB=$(echo blob-contents | git -C src hash-object --stdin -w) && |
| git -C src tag myblob "$BLOB" && |
| |
| git clone --filter="blob:none" "file://$(pwd)/src" dst 2>err && |
| ! grep "does not point to a valid object" err && |
| git -C dst fsck |
| ' |
| |
| test_expect_success 'fetch what is specified on CLI even if already promised' ' |
| rm -rf src dst.git && |
| git init src && |
| test_commit -C src foo && |
| test_config -C src uploadpack.allowfilter 1 && |
| test_config -C src uploadpack.allowanysha1inwant 1 && |
| |
| git hash-object --stdin <src/foo.t >blob && |
| |
| git clone --bare --filter=blob:none "file://$(pwd)/src" dst.git && |
| git -C dst.git rev-list --objects --quiet --missing=print HEAD >missing_before && |
| grep "?$(cat blob)" missing_before && |
| git -C dst.git fetch origin $(cat blob) && |
| git -C dst.git rev-list --objects --quiet --missing=print HEAD >missing_after && |
| ! grep "?$(cat blob)" missing_after |
| ' |
| |
| test_expect_success 'setup src repo for sparse filter' ' |
| git init sparse-src && |
| git -C sparse-src config --local uploadpack.allowfilter 1 && |
| git -C sparse-src config --local uploadpack.allowanysha1inwant 1 && |
| test_commit -C sparse-src one && |
| test_commit -C sparse-src two && |
| echo /one.t >sparse-src/only-one && |
| git -C sparse-src add . && |
| git -C sparse-src commit -m "add sparse checkout files" |
| ' |
| |
| test_expect_success 'partial clone with sparse filter succeeds' ' |
| rm -rf dst.git && |
| git clone --no-local --bare \ |
| --filter=sparse:oid=master:only-one \ |
| sparse-src dst.git && |
| ( |
| cd dst.git && |
| git rev-list --objects --missing=print HEAD >out && |
| grep "^$(git rev-parse HEAD:one.t)" out && |
| grep "^?$(git rev-parse HEAD:two.t)" out |
| ) |
| ' |
| |
| test_expect_success 'partial clone with unresolvable sparse filter fails cleanly' ' |
| rm -rf dst.git && |
| test_must_fail git clone --no-local --bare \ |
| --filter=sparse:oid=master:no-such-name \ |
| sparse-src dst.git 2>err && |
| test_i18ngrep "unable to access sparse blob in .master:no-such-name" err && |
| test_must_fail git clone --no-local --bare \ |
| --filter=sparse:oid=master \ |
| sparse-src dst.git 2>err && |
| test_i18ngrep "unable to parse sparse filter data in" err |
| ' |
| |
| setup_triangle () { |
| rm -rf big-blob.txt server client promisor-remote && |
| |
| printf "line %d\n" $(test_seq 1 100) >big-blob.txt && |
| |
| # Create a server with 2 commits: a commit with a big tree and a child |
| # commit with an incremental change. Also, create a partial clone |
| # client that only contains the first commit. |
| git init server && |
| git -C server config --local uploadpack.allowfilter 1 && |
| for i in $(test_seq 1 100) |
| do |
| echo "make the tree big" >server/file$i && |
| git -C server add file$i |
| done && |
| git -C server commit -m "initial" && |
| git clone --bare --filter=tree:0 "file://$(pwd)/server" client && |
| echo another line >>server/file1 && |
| git -C server commit -am "incremental change" && |
| |
| # Create a promisor remote that only contains the tree and blob from |
| # the first commit. |
| git init promisor-remote && |
| git -C server config --local uploadpack.allowanysha1inwant 1 && |
| TREE_HASH=$(git -C server rev-parse HEAD~1^{tree}) && |
| git -C promisor-remote fetch --keep "file://$(pwd)/server" "$TREE_HASH" && |
| git -C promisor-remote count-objects -v >object-count && |
| test_i18ngrep "count: 0" object-count && |
| test_i18ngrep "in-pack: 2" object-count && |
| |
| # Set it as the promisor remote of client. Thus, whenever |
| # the client lazy fetches, the lazy fetch will succeed only if it is |
| # for this tree or blob. |
| test_commit -C promisor-remote one && # so that ref advertisement is not empty |
| git -C promisor-remote config --local uploadpack.allowanysha1inwant 1 && |
| git -C client remote set-url origin "file://$(pwd)/promisor-remote" |
| } |
| |
| # NEEDSWORK: The tests beginning with "fetch lazy-fetches" below only |
| # test that "fetch" avoid fetching trees and blobs, but not commits or |
| # tags. Revisit this if Git is ever taught to support partial clones |
| # with commits and/or tags filtered out. |
| |
| test_expect_success 'fetch lazy-fetches only to resolve deltas' ' |
| setup_triangle && |
| |
| # Exercise to make sure it works. Git will not fetch anything from the |
| # promisor remote other than for the big tree (because it needs to |
| # resolve the delta). |
| GIT_TRACE_PACKET="$(pwd)/trace" git -C client \ |
| fetch "file://$(pwd)/server" master && |
| |
| # Verify the assumption that the client needed to fetch the delta base |
| # to resolve the delta. |
| git -C server rev-parse HEAD~1^{tree} >hash && |
| grep "want $(cat hash)" trace |
| ' |
| |
| test_expect_success 'fetch lazy-fetches only to resolve deltas, protocol v2' ' |
| setup_triangle && |
| |
| git -C server config --local protocol.version 2 && |
| git -C client config --local protocol.version 2 && |
| git -C promisor-remote config --local protocol.version 2 && |
| |
| # Exercise to make sure it works. Git will not fetch anything from the |
| # promisor remote other than for the big blob (because it needs to |
| # resolve the delta). |
| GIT_TRACE_PACKET="$(pwd)/trace" git -C client \ |
| fetch "file://$(pwd)/server" master && |
| |
| # Verify that protocol version 2 was used. |
| grep "fetch< version 2" trace && |
| |
| # Verify the assumption that the client needed to fetch the delta base |
| # to resolve the delta. |
| git -C server rev-parse HEAD~1^{tree} >hash && |
| grep "want $(cat hash)" trace |
| ' |
| |
| test_expect_success 'fetch does not lazy-fetch missing targets of its refs' ' |
| rm -rf server client trace && |
| |
| test_create_repo server && |
| test_config -C server uploadpack.allowfilter 1 && |
| test_config -C server uploadpack.allowanysha1inwant 1 && |
| test_commit -C server foo && |
| |
| git clone --filter=blob:none "file://$(pwd)/server" client && |
| # Make all refs point to nothing by deleting all objects. |
| rm client/.git/objects/pack/* && |
| |
| test_commit -C server bar && |
| GIT_TRACE_PACKET="$(pwd)/trace" git -C client fetch \ |
| --no-tags --recurse-submodules=no \ |
| origin refs/tags/bar && |
| FOO_HASH=$(git -C server rev-parse foo) && |
| ! grep "want $FOO_HASH" trace |
| ' |
| |
| # The following two tests must be in this order. It is important that |
| # the srv.bare repository did not have tags during clone, but has tags |
| # in the fetch. |
| |
| test_expect_success 'verify fetch succeeds when asking for new tags' ' |
| git clone --filter=blob:none "file://$(pwd)/srv.bare" tag-test && |
| for i in I J K |
| do |
| test_commit -C src $i && |
| git -C src branch $i || return 1 |
| done && |
| git -C srv.bare fetch --tags origin +refs/heads/*:refs/heads/* && |
| git -C tag-test -c protocol.version=2 fetch --tags origin |
| ' |
| |
| test_expect_success 'verify fetch downloads only one pack when updating refs' ' |
| git clone --filter=blob:none "file://$(pwd)/srv.bare" pack-test && |
| ls pack-test/.git/objects/pack/*pack >pack-list && |
| test_line_count = 2 pack-list && |
| for i in A B C |
| do |
| test_commit -C src $i && |
| git -C src branch $i || return 1 |
| done && |
| git -C srv.bare fetch origin +refs/heads/*:refs/heads/* && |
| git -C pack-test fetch origin && |
| ls pack-test/.git/objects/pack/*pack >pack-list && |
| test_line_count = 3 pack-list |
| ' |
| |
| test_expect_success 'single-branch tag following respects partial clone' ' |
| git clone --single-branch -b B --filter=blob:none \ |
| "file://$(pwd)/srv.bare" single && |
| git -C single rev-parse --verify refs/tags/B && |
| git -C single rev-parse --verify refs/tags/A && |
| test_must_fail git -C single rev-parse --verify refs/tags/C |
| ' |
| |
| test_expect_success 'fetch from a partial clone, protocol v0' ' |
| rm -rf server client trace && |
| |
| # Pretend that the server is a partial clone |
| git init server && |
| git -C server remote add a_remote "file://$(pwd)/" && |
| test_config -C server core.repositoryformatversion 1 && |
| test_config -C server extensions.partialclone a_remote && |
| test_config -C server protocol.version 0 && |
| test_commit -C server foo && |
| |
| # Fetch from the server |
| git init client && |
| test_config -C client protocol.version 0 && |
| test_commit -C client bar && |
| GIT_TRACE_PACKET="$(pwd)/trace" git -C client fetch "file://$(pwd)/server" && |
| ! grep "version 2" trace |
| ' |
| |
| test_expect_success 'fetch from a partial clone, protocol v2' ' |
| rm -rf server client trace && |
| |
| # Pretend that the server is a partial clone |
| git init server && |
| git -C server remote add a_remote "file://$(pwd)/" && |
| test_config -C server core.repositoryformatversion 1 && |
| test_config -C server extensions.partialclone a_remote && |
| test_config -C server protocol.version 2 && |
| test_commit -C server foo && |
| |
| # Fetch from the server |
| git init client && |
| test_config -C client protocol.version 2 && |
| test_commit -C client bar && |
| GIT_TRACE_PACKET="$(pwd)/trace" git -C client fetch "file://$(pwd)/server" && |
| grep "version 2" trace |
| ' |
| |
| . "$TEST_DIRECTORY"/lib-httpd.sh |
| start_httpd |
| |
| # Converts bytes into their hexadecimal representation. For example, |
| # "printf 'ab\r\n' | hex_unpack" results in '61620d0a'. |
| hex_unpack () { |
| perl -e '$/ = undef; $input = <>; print unpack("H2" x length($input), $input)' |
| } |
| |
| # Inserts $1 at the start of the string and every 2 characters thereafter. |
| intersperse () { |
| sed 's/\(..\)/'$1'\1/g' |
| } |
| |
| # Create a one-time-perl command to replace the existing packfile with $1. |
| replace_packfile () { |
| # The protocol requires that the packfile be sent in sideband 1, hence |
| # the extra \x01 byte at the beginning. |
| cp $1 "$HTTPD_ROOT_PATH/one-time-pack" && |
| echo 'if (/packfile/) { |
| print; |
| my $length = -s "one-time-pack"; |
| printf "%04x\x01", $length + 5; |
| print `cat one-time-pack` . "0000"; |
| last |
| }' >"$HTTPD_ROOT_PATH/one-time-perl" |
| } |
| |
| test_expect_success 'upon cloning, check that all refs point to objects' ' |
| SERVER="$HTTPD_DOCUMENT_ROOT_PATH/server" && |
| rm -rf "$SERVER" repo && |
| test_create_repo "$SERVER" && |
| test_commit -C "$SERVER" foo && |
| test_config -C "$SERVER" uploadpack.allowfilter 1 && |
| test_config -C "$SERVER" uploadpack.allowanysha1inwant 1 && |
| |
| # Create a tag pointing to a blob. |
| BLOB=$(echo blob-contents | git -C "$SERVER" hash-object --stdin -w) && |
| git -C "$SERVER" tag myblob "$BLOB" && |
| |
| # Craft a packfile not including that blob. |
| git -C "$SERVER" rev-parse HEAD | |
| git -C "$SERVER" pack-objects --stdout >incomplete.pack && |
| |
| # Replace the existing packfile with the crafted one. The protocol |
| # requires that the packfile be sent in sideband 1, hence the extra |
| # \x01 byte at the beginning. |
| replace_packfile incomplete.pack && |
| |
| # Use protocol v2 because the perl command looks for the "packfile" |
| # section header. |
| test_config -C "$SERVER" protocol.version 2 && |
| test_must_fail git -c protocol.version=2 clone \ |
| --filter=blob:none $HTTPD_URL/one_time_perl/server repo 2>err && |
| |
| test_i18ngrep "did not send all necessary objects" err && |
| |
| # Ensure that the one-time-perl script was used. |
| ! test -e "$HTTPD_ROOT_PATH/one-time-perl" |
| ' |
| |
| test_expect_success 'when partial cloning, tolerate server not sending target of tag' ' |
| SERVER="$HTTPD_DOCUMENT_ROOT_PATH/server" && |
| rm -rf "$SERVER" repo && |
| test_create_repo "$SERVER" && |
| test_commit -C "$SERVER" foo && |
| test_config -C "$SERVER" uploadpack.allowfilter 1 && |
| test_config -C "$SERVER" uploadpack.allowanysha1inwant 1 && |
| |
| # Create an annotated tag pointing to a blob. |
| BLOB=$(echo blob-contents | git -C "$SERVER" hash-object --stdin -w) && |
| git -C "$SERVER" tag -m message -a myblob "$BLOB" && |
| |
| # Craft a packfile including the tag, but not the blob it points to. |
| # Also, omit objects referenced from HEAD in order to force a second |
| # fetch (to fetch missing objects) upon the automatic checkout that |
| # happens after a clone. |
| printf "%s\n%s\n--not\n%s\n%s\n" \ |
| $(git -C "$SERVER" rev-parse HEAD) \ |
| $(git -C "$SERVER" rev-parse myblob) \ |
| $(git -C "$SERVER" rev-parse HEAD^{tree}) \ |
| $(git -C "$SERVER" rev-parse myblob^{blob}) | |
| git -C "$SERVER" pack-objects --thin --stdout >incomplete.pack && |
| |
| # Replace the existing packfile with the crafted one. The protocol |
| # requires that the packfile be sent in sideband 1, hence the extra |
| # \x01 byte at the beginning. |
| replace_packfile incomplete.pack && |
| |
| # Use protocol v2 because the perl command looks for the "packfile" |
| # section header. |
| test_config -C "$SERVER" protocol.version 2 && |
| |
| # Exercise to make sure it works. |
| git -c protocol.version=2 clone \ |
| --filter=blob:none $HTTPD_URL/one_time_perl/server repo 2> err && |
| ! grep "missing object referenced by" err && |
| |
| # Ensure that the one-time-perl script was used. |
| ! test -e "$HTTPD_ROOT_PATH/one-time-perl" |
| ' |
| |
| test_expect_success 'tolerate server sending REF_DELTA against missing promisor objects' ' |
| SERVER="$HTTPD_DOCUMENT_ROOT_PATH/server" && |
| rm -rf "$SERVER" repo && |
| test_create_repo "$SERVER" && |
| test_config -C "$SERVER" uploadpack.allowfilter 1 && |
| test_config -C "$SERVER" uploadpack.allowanysha1inwant 1 && |
| |
| # Create a commit with 2 blobs to be used as delta bases. |
| for i in $(test_seq 10) |
| do |
| echo "this is a line" >>"$SERVER/foo.txt" && |
| echo "this is another line" >>"$SERVER/have.txt" |
| done && |
| git -C "$SERVER" add foo.txt have.txt && |
| git -C "$SERVER" commit -m bar && |
| git -C "$SERVER" rev-parse HEAD:foo.txt >deltabase_missing && |
| git -C "$SERVER" rev-parse HEAD:have.txt >deltabase_have && |
| |
| # Clone. The client has deltabase_have but not deltabase_missing. |
| git -c protocol.version=2 clone --no-checkout \ |
| --filter=blob:none $HTTPD_URL/one_time_perl/server repo && |
| git -C repo hash-object -w -- "$SERVER/have.txt" && |
| |
| # Sanity check to ensure that the client does not have |
| # deltabase_missing. |
| git -C repo rev-list --objects --ignore-missing \ |
| -- $(cat deltabase_missing) >objlist && |
| test_line_count = 0 objlist && |
| |
| # Another commit. This commit will be fetched by the client. |
| echo "abcdefghijklmnopqrstuvwxyz" >>"$SERVER/foo.txt" && |
| echo "abcdefghijklmnopqrstuvwxyz" >>"$SERVER/have.txt" && |
| git -C "$SERVER" add foo.txt have.txt && |
| git -C "$SERVER" commit -m baz && |
| |
| # Pack a thin pack containing, among other things, HEAD:foo.txt |
| # delta-ed against HEAD^:foo.txt and HEAD:have.txt delta-ed against |
| # HEAD^:have.txt. |
| printf "%s\n--not\n%s\n" \ |
| $(git -C "$SERVER" rev-parse HEAD) \ |
| $(git -C "$SERVER" rev-parse HEAD^) | |
| git -C "$SERVER" pack-objects --thin --stdout >thin.pack && |
| |
| # Ensure that the pack contains one delta against HEAD^:foo.txt. Since |
| # the delta contains at least 26 novel characters, the size cannot be |
| # contained in 4 bits, so the object header will take up 2 bytes. The |
| # most significant nybble of the first byte is 0b1111 (0b1 to indicate |
| # that the header continues, and 0b111 to indicate REF_DELTA), followed |
| # by any 3 nybbles, then the OID of the delta base. |
| printf "f.,..%s" $(intersperse "," <deltabase_missing) >want && |
| hex_unpack <thin.pack | intersperse "," >have && |
| grep $(cat want) have && |
| |
| # Ensure that the pack contains one delta against HEAD^:have.txt, |
| # similar to the above. |
| printf "f.,..%s" $(intersperse "," <deltabase_have) >want && |
| hex_unpack <thin.pack | intersperse "," >have && |
| grep $(cat want) have && |
| |
| replace_packfile thin.pack && |
| |
| # Use protocol v2 because the perl command looks for the "packfile" |
| # section header. |
| test_config -C "$SERVER" protocol.version 2 && |
| |
| # Fetch the thin pack and ensure that index-pack is able to handle the |
| # REF_DELTA object with a missing promisor delta base. |
| GIT_TRACE_PACKET="$(pwd)/trace" git -C repo -c protocol.version=2 fetch && |
| |
| # Ensure that the missing delta base was directly fetched, but not the |
| # one that the client has. |
| grep "want $(cat deltabase_missing)" trace && |
| ! grep "want $(cat deltabase_have)" trace && |
| |
| # Ensure that the one-time-perl script was used. |
| ! test -e "$HTTPD_ROOT_PATH/one-time-perl" |
| ' |
| |
| # DO NOT add non-httpd-specific tests here, because the last part of this |
| # test script is only executed when httpd is available and enabled. |
| |
| test_done |