(CommandList children: [ (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:test_description) op: Equal rhs: {(SQ <"exercise basic bitmap functionality">)} spids: [4] ) ] spids: [4] ) (C {(.)} {(./test-lib.sh)}) (FuncDef name: objpath body: (BraceGroup children: [ (C {(echo)} { (DQ (.git/objects/) (CommandSubPart command_list: (CommandList children: [ (Pipeline children: [ (C {(echo)} {(DQ ($ VSub_Number "$1"))}) (C {(sed)} {(-e)} {(SQ <"s|\\(..\\)|\\1/|">)}) ] negated: False ) ] ) left_token: <Left_CommandSub "$("> spids: [26 42] ) ) } ) ] spids: [19] ) spids: [14 18] ) (FuncDef name: list_packed_objects body: (BraceGroup children: [ (Pipeline children: [ (SimpleCommand words: [{(git)} {(show-index)}] redirects: [ (Redir op_id: Redir_Less fd: -1 arg_word: {(DQ ($ VSub_Number "$1"))} spids: [63] ) ] ) (C {(cut)} {(-d) (SQ <" ">)} {(-f2)}) ] negated: False ) ] spids: [56] ) spids: [51 55] ) (FuncDef name: has_any body: (BraceGroup children: [(C {(grep)} {(-Ff)} {(DQ ($ VSub_Number "$1"))} {(DQ ($ VSub_Number "$2"))})] spids: [96] ) spids: [91 95] ) (C {(test_expect_success)} {(SQ <"setup repo with moderate-sized history">)} { (SQ <"\n"> <"\tfor i in $(test_seq 1 10); do\n"> <"\t\ttest_commit $i\n"> <"\tdone &&\n"> <"\tgit checkout -b other HEAD~5 &&\n"> <"\tfor i in $(test_seq 1 10); do\n"> <"\t\ttest_commit side-$i\n"> <"\tdone &&\n"> <"\tgit checkout master &&\n"> <"\tbitmaptip=$(git rev-parse master) &&\n"> <"\tblob=$(echo tagged-blob | git hash-object -w --stdin) &&\n"> <"\tgit tag tagged-blob $blob &&\n"> <"\tgit config repack.writebitmaps true &&\n"> <"\tgit config pack.writebitmaphashcache true\n"> ) } ) (C {(test_expect_success)} {(SQ <"full repack creates bitmaps">)} { (SQ <"\n"> <"\tgit repack -ad &&\n"> <"\tls .git/objects/pack/ | grep bitmap >output &&\n"> <"\ttest_line_count = 1 output\n"> ) } ) (C {(test_expect_success)} {(SQ <"rev-list --test-bitmap verifies bitmaps">)} {(SQ <"\n"> <"\tgit rev-list --test-bitmap HEAD\n">)} ) (FuncDef name: rev_list_tests body: (BraceGroup children: [ (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:state) op: Equal rhs: {($ VSub_Number "$1")} spids: [171] ) ] spids: [171] ) (C {(test_expect_success)} {(DQ ("counting commits via bitmap (") ($ VSub_Name "$state") (")"))} { (SQ <"\n"> <"\t\tgit rev-list --count HEAD >expect &&\n"> <"\t\tgit rev-list --use-bitmap-index --count HEAD >actual &&\n"> <"\t\ttest_cmp expect actual\n"> <"\t"> ) } ) (C {(test_expect_success)} {(DQ ("counting partial commits via bitmap (") ($ VSub_Name "$state") (")"))} { (SQ <"\n"> <"\t\tgit rev-list --count HEAD~5..HEAD >expect &&\n"> <"\t\tgit rev-list --use-bitmap-index --count HEAD~5..HEAD >actual &&\n"> <"\t\ttest_cmp expect actual\n"> <"\t"> ) } ) (C {(test_expect_success)} {(DQ ("counting commits with limit (") ($ VSub_Name "$state") (")"))} { (SQ <"\n"> <"\t\tgit rev-list --count -n 1 HEAD >expect &&\n"> <"\t\tgit rev-list --use-bitmap-index --count -n 1 HEAD >actual &&\n"> <"\t\ttest_cmp expect actual\n"> <"\t"> ) } ) (C {(test_expect_success)} {(DQ ("counting non-linear history (") ($ VSub_Name "$state") (")"))} { (SQ <"\n"> <"\t\tgit rev-list --count other...master >expect &&\n"> <"\t\tgit rev-list --use-bitmap-index --count other...master >actual &&\n"> <"\t\ttest_cmp expect actual\n"> <"\t"> ) } ) (C {(test_expect_success)} {(DQ ("counting commits with limiting (") ($ VSub_Name "$state") (")"))} { (SQ <"\n"> <"\t\tgit rev-list --count HEAD -- 1.t >expect &&\n"> <"\t\tgit rev-list --use-bitmap-index --count HEAD -- 1.t >actual &&\n"> <"\t\ttest_cmp expect actual\n"> <"\t"> ) } ) (C {(test_expect_success)} {(DQ ("enumerate --objects (") ($ VSub_Name "$state") (")"))} { (SQ <"\n"> <"\t\tgit rev-list --objects --use-bitmap-index HEAD >tmp &&\n"> <"\t\tcut -d\" \" -f1 <tmp >tmp2 &&\n"> <"\t\tsort <tmp2 >actual &&\n"> <"\t\tgit rev-list --objects HEAD >tmp &&\n"> <"\t\tcut -d\" \" -f1 <tmp >tmp2 &&\n"> <"\t\tsort <tmp2 >expect &&\n"> <"\t\ttest_cmp expect actual\n"> <"\t"> ) } ) (C {(test_expect_success)} {(DQ ("bitmap --objects handles non-commit objects (") ($ VSub_Name "$state") (")"))} { (SQ <"\n"> <"\t\tgit rev-list --objects --use-bitmap-index HEAD tagged-blob >actual &&\n"> <"\t\tgrep $blob actual\n"> <"\t"> ) } ) ] spids: [168] ) spids: [164 167] ) (C {(rev_list_tests)} {(SQ <"full bitmap">)}) (C {(test_expect_success)} {(SQ <"clone from bitmapped repository">)} { (SQ <"\n"> <"\tgit clone --no-local --bare . clone.git &&\n"> <"\tgit rev-parse HEAD >expect &&\n"> <"\tgit --git-dir=clone.git rev-parse HEAD >actual &&\n"> <"\ttest_cmp expect actual\n"> ) } ) (C {(test_expect_success)} {(SQ <"setup further non-bitmapped commits">)} { (SQ <"\n"> <"\tfor i in $(test_seq 1 10); do\n"> <"\t\ttest_commit further-$i\n"> <"\tdone\n">) } ) (C {(rev_list_tests)} {(SQ <"partial bitmap">)}) (C {(test_expect_success)} {(SQ <"fetch (partial bitmap)">)} { (SQ <"\n"> <"\tgit --git-dir=clone.git fetch origin master:master &&\n"> <"\tgit rev-parse HEAD >expect &&\n"> <"\tgit --git-dir=clone.git rev-parse HEAD >actual &&\n"> <"\ttest_cmp expect actual\n"> ) } ) (C {(test_expect_success)} {(SQ <"incremental repack cannot create bitmaps">)} { (SQ <"\n"> <"\ttest_commit more-1 &&\n"> <"\tfind .git/objects/pack -name \"*.bitmap\" >expect &&\n"> <"\tgit repack -d &&\n"> <"\tfind .git/objects/pack -name \"*.bitmap\" >actual &&\n"> <"\ttest_cmp expect actual\n"> ) } ) (C {(test_expect_success)} {(SQ <"incremental repack can disable bitmaps">)} {(SQ <"\n"> <"\ttest_commit more-2 &&\n"> <"\tgit repack -d --no-write-bitmap-index\n">)} ) (C {(test_expect_success)} {(SQ <"pack-objects respects --local (non-local loose)">)} { (SQ <"\n"> <"\tgit init --bare alt.git &&\n"> <"\techo $(pwd)/alt.git/objects >.git/objects/info/alternates &&\n"> <"\techo content1 >file1 &&\n"> <"\t# non-local loose object which is not present in bitmapped pack\n"> <"\taltblob=$(GIT_DIR=alt.git git hash-object -w file1) &&\n"> <"\t# non-local loose object which is also present in bitmapped pack\n"> <"\tgit cat-file blob $blob | GIT_DIR=alt.git git hash-object -w --stdin &&\n"> <"\tgit add file1 &&\n"> <"\ttest_tick &&\n"> <"\tgit commit -m commit_file1 &&\n"> <"\techo HEAD | git pack-objects --local --stdout --revs >1.pack &&\n"> <"\tgit index-pack 1.pack &&\n"> <"\tlist_packed_objects 1.idx >1.objects &&\n"> <"\tprintf \"%s\\n\" \"$altblob\" \"$blob\" >nonlocal-loose &&\n"> <"\t! has_any nonlocal-loose 1.objects\n"> ) } ) (C {(test_expect_success)} {(SQ <"pack-objects respects --honor-pack-keep (local non-bitmapped pack)">)} { (SQ <"\n"> <"\techo content2 >file2 &&\n"> <"\tblob2=$(git hash-object -w file2) &&\n"> <"\tgit add file2 &&\n"> <"\ttest_tick &&\n"> <"\tgit commit -m commit_file2 &&\n"> <"\tprintf \"%s\\n\" \"$blob2\" \"$bitmaptip\" >keepobjects &&\n"> <"\tpack2=$(git pack-objects pack2 <keepobjects) &&\n"> <"\tmv pack2-$pack2.* .git/objects/pack/ &&\n"> <"\t>.git/objects/pack/pack2-$pack2.keep &&\n"> <"\trm $(objpath $blob2) &&\n"> <"\techo HEAD | git pack-objects --honor-pack-keep --stdout --revs >2a.pack &&\n"> <"\tgit index-pack 2a.pack &&\n"> <"\tlist_packed_objects 2a.idx >2a.objects &&\n"> <"\t! has_any keepobjects 2a.objects\n"> ) } ) (C {(test_expect_success)} {(SQ <"pack-objects respects --local (non-local pack)">)} { (SQ <"\n"> <"\tmv .git/objects/pack/pack2-$pack2.* alt.git/objects/pack/ &&\n"> <"\techo HEAD | git pack-objects --local --stdout --revs >2b.pack &&\n"> <"\tgit index-pack 2b.pack &&\n"> <"\tlist_packed_objects 2b.idx >2b.objects &&\n"> <"\t! has_any keepobjects 2b.objects\n"> ) } ) (C {(test_expect_success)} {(SQ <"pack-objects respects --honor-pack-keep (local bitmapped pack)">)} { (SQ <"\n"> <"\tls .git/objects/pack/ | grep bitmap >output &&\n"> <"\ttest_line_count = 1 output &&\n"> <"\tpackbitmap=$(basename $(cat output) .bitmap) &&\n"> <"\tlist_packed_objects .git/objects/pack/$packbitmap.idx >packbitmap.objects &&\n"> <"\ttest_when_finished \"rm -f .git/objects/pack/$packbitmap.keep\" &&\n"> <"\t>.git/objects/pack/$packbitmap.keep &&\n"> <"\techo HEAD | git pack-objects --honor-pack-keep --stdout --revs >3a.pack &&\n"> <"\tgit index-pack 3a.pack &&\n"> <"\tlist_packed_objects 3a.idx >3a.objects &&\n"> <"\t! has_any packbitmap.objects 3a.objects\n"> ) } ) (C {(test_expect_success)} {(SQ <"pack-objects respects --local (non-local bitmapped pack)">)} { (SQ <"\n"> <"\tmv .git/objects/pack/$packbitmap.* alt.git/objects/pack/ &&\n"> < "\ttest_when_finished \"mv alt.git/objects/pack/$packbitmap.* .git/objects/pack/\" &&\n" > <"\techo HEAD | git pack-objects --local --stdout --revs >3b.pack &&\n"> <"\tgit index-pack 3b.pack &&\n"> <"\tlist_packed_objects 3b.idx >3b.objects &&\n"> <"\t! has_any packbitmap.objects 3b.objects\n"> ) } ) (C {(test_expect_success)} {(SQ <"pack-objects to file can use bitmap">)} { (SQ <"\n"> <"\t# make sure we still have 1 bitmap index from previous tests\n"> <"\tls .git/objects/pack/ | grep bitmap >output &&\n"> <"\ttest_line_count = 1 output &&\n"> <"\t# verify equivalent packs are generated with/without using bitmap index\n"> <"\tpackasha1=$(git pack-objects --no-use-bitmap-index --all packa </dev/null) &&\n"> <"\tpackbsha1=$(git pack-objects --use-bitmap-index --all packb </dev/null) &&\n"> <"\tlist_packed_objects <packa-$packasha1.idx >packa.objects &&\n"> <"\tlist_packed_objects <packb-$packbsha1.idx >packb.objects &&\n"> <"\ttest_cmp packa.objects packb.objects\n"> ) } ) (C {(test_expect_success)} {(SQ <"full repack, reusing previous bitmaps">)} { (SQ <"\n"> <"\tgit repack -ad &&\n"> <"\tls .git/objects/pack/ | grep bitmap >output &&\n"> <"\ttest_line_count = 1 output\n"> ) } ) (C {(test_expect_success)} {(SQ <"fetch (full bitmap)">)} { (SQ <"\n"> <"\tgit --git-dir=clone.git fetch origin master:master &&\n"> <"\tgit rev-parse HEAD >expect &&\n"> <"\tgit --git-dir=clone.git rev-parse HEAD >actual &&\n"> <"\ttest_cmp expect actual\n"> ) } ) (C {(test_expect_success)} {(SQ <"create objects for missing-HAVE tests">)} { (SQ <"\n"> <"\tblob=$(echo \"missing have\" | git hash-object -w --stdin) &&\n"> <"\ttree=$(printf \"100644 blob $blob\\tfile\\n\" | git mktree) &&\n"> <"\tparent=$(echo parent | git commit-tree $tree) &&\n"> <"\tcommit=$(echo commit | git commit-tree $tree -p $parent) &&\n"> <"\tcat >revs <<-EOF\n"> <"\tHEAD\n"> <"\t^HEAD^\n"> <"\t^$commit\n"> <"\tEOF\n"> ) } ) (C {(test_expect_success)} {(SQ <"pack-objects respects --incremental">)} { (SQ <"\n"> <"\tcat >revs2 <<-EOF &&\n"> <"\tHEAD\n"> <"\t$commit\n"> <"\tEOF\n"> <"\tgit pack-objects --incremental --stdout --revs <revs2 >4.pack &&\n"> <"\tgit index-pack 4.pack &&\n"> <"\tlist_packed_objects 4.idx >4.objects &&\n"> <"\ttest_line_count = 4 4.objects &&\n"> <"\tgit rev-list --objects $commit >revlist &&\n"> <"\tcut -d\" \" -f1 revlist |sort >objects &&\n"> <"\ttest_cmp 4.objects objects\n"> ) } ) (C {(test_expect_success)} {(SQ <"pack with missing blob">)} { (SQ <"\n"> <"\trm $(objpath $blob) &&\n"> <"\tgit pack-objects --stdout --revs <revs >/dev/null\n"> ) } ) (C {(test_expect_success)} {(SQ <"pack with missing tree">)} { (SQ <"\n"> <"\trm $(objpath $tree) &&\n"> <"\tgit pack-objects --stdout --revs <revs >/dev/null\n"> ) } ) (C {(test_expect_success)} {(SQ <"pack with missing parent">)} { (SQ <"\n"> <"\trm $(objpath $parent) &&\n"> <"\tgit pack-objects --stdout --revs <revs >/dev/null\n"> ) } ) (C {(test_expect_success)} {(JGIT)} {(SQ <"we can read jgit bitmaps">)} { (SQ <"\n"> <"\tgit clone . compat-jgit &&\n"> <"\t(\n"> <"\t\tcd compat-jgit &&\n"> <"\t\trm -f .git/objects/pack/*.bitmap &&\n"> <"\t\tjgit gc &&\n"> <"\t\tgit rev-list --test-bitmap HEAD\n"> <"\t)\n"> ) } ) (C {(test_expect_success)} {(JGIT)} {(SQ <"jgit can read our bitmaps">)} { (SQ <"\n"> <"\tgit clone . compat-us &&\n"> <"\t(\n"> <"\t\tcd compat-us &&\n"> <"\t\tgit repack -adb &&\n"> <"\t\t# jgit gc will barf if it does not like our bitmaps\n"> <"\t\tjgit gc\n"> <"\t)\n"> ) } ) (C {(test_expect_success)} {(SQ <"splitting packs does not generate bogus bitmaps">)} { (SQ <"\n"> <"\ttest-genrandom foo $((1024 * 1024)) >rand &&\n"> <"\tgit add rand &&\n"> <"\tgit commit -m \"commit with big file\" &&\n"> <"\tgit -c pack.packSizeLimit=500k repack -adb &&\n"> <"\tgit init --bare no-bitmaps.git &&\n"> <"\tgit -C no-bitmaps.git fetch .. HEAD\n"> ) } ) (C {(test_done)}) ] )