(command.CommandList children: [ (command.ShAssignment pairs: [ (assign_pair lhs: (sh_lhs_expr.Name name:test_description) op: assign_op.Equal rhs: {(SQ <'test clone --reference'>)} spids: [13] ) ] ) (C {<.>} {<'./test-lib.sh'>}) (command.ShAssignment pairs: [ (assign_pair lhs: (sh_lhs_expr.Name name:base_dir) op: assign_op.Equal rhs: {(command_sub left_token:<Id.Left_DollarParen '$('> child:(C {<pwd>}))} spids: [23] ) ] ) (command.ShFunction name: test_alternate_is_used body: (BraceGroup children: [ (command.AndOr ops: [Id.Op_DAmp Id.Op_DAmp Id.Op_DAmp Id.Op_DAmp Id.Op_DAmp] children: [ (command.ShAssignment pairs: [ (assign_pair lhs: (sh_lhs_expr.Name name:alternates_file) op: assign_op.Equal rhs: {(DQ ($ Id.VSub_Number '$1'))} spids: [37] ) ] ) (command.ShAssignment pairs: [ (assign_pair lhs: (sh_lhs_expr.Name name:working_dir) op: assign_op.Equal rhs: {(DQ ($ Id.VSub_Number '$2'))} spids: [45] ) ] ) (C {<test_line_count>} {<Id.Lit_Equals '='>} {<1>} {(DQ ($ Id.VSub_DollarName '$alternates_file'))} ) (command.Simple words: [{<echo>} {(DQ <'0 objects, 0 kilobytes'>)}] redirects: [(redir op:<Id.Redir_Great '>'> loc:(redir_loc.Fd fd:1) arg:{<expect>})] do_fork: T ) (command.Simple words: [{<git>} {<-C>} {(DQ ($ Id.VSub_DollarName '$working_dir'))} {<count-objects>}] redirects: [(redir op:<Id.Redir_Great '>'> loc:(redir_loc.Fd fd:1) arg:{<actual>})] do_fork: T ) (C {<test_cmp>} {<expect>} {<actual>}) ] ) ] ) ) (C {<test_expect_success>} {(SQ <'preparing first repository'>)} { (SQ <'\n'> <'\ttest_create_repo A &&\n'> <'\t(\n'> <'\t\tcd A &&\n'> <'\t\techo first >file1 &&\n'> <'\t\tgit add file1 &&\n'> <'\t\tgit commit -m A-initial\n'> <'\t)\n'> ) } ) (C {<test_expect_success>} {(SQ <'preparing second repository'>)} { (SQ <'\n'> <'\tgit clone A B &&\n'> <'\t(\n'> <'\t\tcd B &&\n'> <'\t\techo second >file2 &&\n'> <'\t\tgit add file2 &&\n'> <'\t\tgit commit -m B-addition &&\n'> <'\t\tgit repack -a -d &&\n'> <'\t\tgit prune\n'> <'\t)\n'> ) } ) (C {<test_expect_success>} {(SQ <'preparing superproject'>)} { (SQ <'\n'> <'\ttest_create_repo super &&\n'> <'\t(\n'> <'\t\tcd super &&\n'> <'\t\techo file >file &&\n'> <'\t\tgit add file &&\n'> <'\t\tgit commit -m B-super-initial\n'> <'\t)\n'> ) } ) (C {<test_expect_success>} {(SQ <'submodule add --reference uses alternates'>)} { (SQ <'\n'> <'\t(\n'> <'\t\tcd super &&\n'> <'\t\tgit submodule add --reference ../B "file://$base_dir/A" sub &&\n'> <'\t\tgit commit -m B-super-added &&\n'> <'\t\tgit repack -ad\n'> <'\t) &&\n'> <'\ttest_alternate_is_used super/.git/modules/sub/objects/info/alternates super/sub\n'> ) } ) (C {<test_expect_success>} {(SQ <'that reference gets used with add'>)} { (SQ <'\n'> <'\t(\n'> <'\t\tcd super/sub &&\n'> <'\t\techo "0 objects, 0 kilobytes" >expected &&\n'> <'\t\tgit count-objects >current &&\n'> <'\t\tdiff expected current\n'> <'\t)\n'> ) } ) (C {<test_expect_success>} {(SQ <'updating superproject keeps alternates'>)} { (SQ <'\n'> <'\ttest_when_finished "rm -rf super-clone" &&\n'> <'\tgit clone super super-clone &&\n'> <'\tgit -C super-clone submodule update --init --reference ../B &&\n'> < '\ttest_alternate_is_used super-clone/.git/modules/sub/objects/info/alternates super-clone/sub\n' > ) } ) (C {<test_expect_success>} {(SQ <'submodules use alternates when cloning a superproject'>)} { (SQ <'\n'> <'\ttest_when_finished "rm -rf super-clone" &&\n'> <'\tgit clone --reference super --recursive super super-clone &&\n'> <'\t(\n'> <'\t\tcd super-clone &&\n'> <'\t\t# test superproject has alternates setup correctly\n'> <'\t\ttest_alternate_is_used .git/objects/info/alternates . &&\n'> <'\t\t# test submodule has correct setup\n'> <'\t\ttest_alternate_is_used .git/modules/sub/objects/info/alternates sub\n'> <'\t)\n'> ) } ) (C {<test_expect_success>} {(SQ <'missing submodule alternate fails clone and submodule update'>)} { (SQ <'\n'> <'\ttest_when_finished "rm -rf super-clone" &&\n'> <'\tgit clone super super2 &&\n'> <'\ttest_must_fail git clone --recursive --reference super2 super2 super-clone &&\n'> <'\t(\n'> <'\t\tcd super-clone &&\n'> <'\t\t# test superproject has alternates setup correctly\n'> <'\t\ttest_alternate_is_used .git/objects/info/alternates . &&\n'> <'\t\t# update of the submodule succeeds\n'> <'\t\ttest_must_fail git submodule update --init &&\n'> <'\t\t# and we have no alternates:\n'> <'\t\ttest_must_fail test_alternate_is_used .git/modules/sub/objects/info/alternates sub &&\n'> <'\t\ttest_must_fail test_path_is_file sub/file1\n'> <'\t)\n'> ) } ) (C {<test_expect_success>} {(SQ <'ignoring missing submodule alternates passes clone and submodule update'>)} { (SQ <'\n'> <'\ttest_when_finished "rm -rf super-clone" &&\n'> <'\tgit clone --reference-if-able super2 --recursive super2 super-clone &&\n'> <'\t(\n'> <'\t\tcd super-clone &&\n'> <'\t\t# test superproject has alternates setup correctly\n'> <'\t\ttest_alternate_is_used .git/objects/info/alternates . &&\n'> <'\t\t# update of the submodule succeeds\n'> <'\t\tgit submodule update --init &&\n'> <'\t\t# and we have no alternates:\n'> <'\t\ttest_must_fail test_alternate_is_used .git/modules/sub/objects/info/alternates sub &&\n'> <'\t\ttest_path_is_file sub/file1\n'> <'\t)\n'> ) } ) (C {<test_done>}) ] )