(command.CommandList children: [ (command.ShAssignment pairs: [ (assign_pair lhs: (sh_lhs_expr.Name name:test_description) op: assign_op.Equal rhs: {(SQ <'fetch/clone from a shallow clone over http'>)} spids: [4] ) ] ) (C {<.>} {<'./test-lib.sh'>}) (C {<.>} {(DQ ($ Id.VSub_DollarName '$TEST_DIRECTORY')) <'/lib-httpd.sh'>}) (C {<start_httpd>}) (command.ShFunction name: commit body: (BraceGroup children: [ (command.AndOr ops: [Id.Op_DAmp Id.Op_DAmp] children: [ (command.Simple words: [{<echo>} {(DQ ($ Id.VSub_Number '$1'))}] redirects: [(redir op:<Id.Redir_Great '>'> loc:(redir_loc.Fd fd:1) arg:{<tracked>})] do_fork: T ) (C {<git>} {<add>} {<tracked>}) (C {<git>} {<commit>} {<-m>} {(DQ ($ Id.VSub_Number '$1'))}) ] ) ] ) ) (C {<test_expect_success>} {(SQ <'setup shallow clone'>)} { (SQ <'\n'> <'\tcommit 1 &&\n'> <'\tcommit 2 &&\n'> <'\tcommit 3 &&\n'> <'\tcommit 4 &&\n'> <'\tcommit 5 &&\n'> <'\tcommit 6 &&\n'> <'\tcommit 7 &&\n'> <'\tgit clone --no-local --depth=5 .git shallow &&\n'> <'\tgit config --global transfer.fsckObjects true\n'> ) } ) (C {<test_expect_success>} {(SQ <'clone http repository'>)} { (SQ <'\n'> <'\tgit clone --bare --no-local shallow "$HTTPD_DOCUMENT_ROOT_PATH/repo.git" &&\n'> <'\tgit clone $HTTPD_URL/smart/repo.git clone &&\n'> <'\t(\n'> <'\tcd clone &&\n'> <'\tgit fsck &&\n'> <'\tgit log --format=%s origin/master >actual &&\n'> <'\tcat <<EOF >expect &&\n'> <'7\n'> <'6\n'> <'5\n'> <'4\n'> <'3\n'> <'EOF\n'> <'\ttest_cmp expect actual\n'> <'\t)\n'> ) } ) (C {<test_expect_success>} {(SQ <'no shallow lines after receiving ACK ready'>)} { (SQ <'\n'> <'\t(\n'> <'\t\tcd shallow &&\n'> <'\t\ttest_tick &&\n'> <'\t\tfor i in $(test_seq 15)\n'> <'\t\tdo\n'> <'\t\t\tgit checkout --orphan unrelated$i &&\n'> <'\t\t\ttest_commit unrelated$i &&\n'> <'\t\t\tgit push -q "$HTTPD_DOCUMENT_ROOT_PATH/repo.git" \\\n'> <'\t\t\t\trefs/heads/unrelated$i:refs/heads/unrelated$i &&\n'> <'\t\t\tgit push -q ../clone/.git \\\n'> <'\t\t\t\trefs/heads/unrelated$i:refs/heads/unrelated$i ||\n'> <'\t\t\texit 1\n'> <'\t\tdone &&\n'> <'\t\tgit checkout master &&\n'> <'\t\ttest_commit new &&\n'> <'\t\tgit push "$HTTPD_DOCUMENT_ROOT_PATH/repo.git" master\n'> <'\t) &&\n'> <'\t(\n'> <'\t\tcd clone &&\n'> <'\t\tgit checkout --orphan newnew &&\n'> <'\t\ttest_commit new-too &&\n'> <'\t\tGIT_TRACE_PACKET="$TRASH_DIRECTORY/trace" git fetch --depth=2 &&\n'> <'\t\tgrep "fetch-pack< ACK .* ready" ../trace &&\n'> <'\t\t! grep "fetch-pack> done" ../trace\n'> <'\t)\n'> ) } ) (C {<test_expect_success>} {(SQ <'clone shallow since ...'>)} { (SQ <'\n'> <'\ttest_create_repo shallow-since &&\n'> <'\t(\n'> <'\tcd shallow-since &&\n'> <'\tGIT_COMMITTER_DATE="100000000 +0700" git commit --allow-empty -m one &&\n'> <'\tGIT_COMMITTER_DATE="200000000 +0700" git commit --allow-empty -m two &&\n'> <'\tGIT_COMMITTER_DATE="300000000 +0700" git commit --allow-empty -m three &&\n'> <'\tmv .git "$HTTPD_DOCUMENT_ROOT_PATH/shallow-since.git" &&\n'> < '\tgit clone --shallow-since "300000000 +0700" $HTTPD_URL/smart/shallow-since.git ../shallow11 &&\n' > <'\tgit -C ../shallow11 log --pretty=tformat:%s HEAD >actual &&\n'> <'\techo three >expected &&\n'> <'\ttest_cmp expected actual\n'> <'\t)\n'> ) } ) (C {<test_expect_success>} {(SQ <'fetch shallow since ...'>)} { (SQ <'\n'> <'\tgit -C shallow11 fetch --shallow-since "200000000 +0700" origin &&\n'> <'\tgit -C shallow11 log --pretty=tformat:%s origin/master >actual &&\n'> <'\tcat >expected <<-\\EOF &&\n'> <'\tthree\n'> <'\ttwo\n'> <'\tEOF\n'> <'\ttest_cmp expected actual\n'> ) } ) (C {<test_expect_success>} {(SQ <'shallow clone exclude tag two'>)} { (SQ <'\n'> <'\ttest_create_repo shallow-exclude &&\n'> <'\t(\n'> <'\tcd shallow-exclude &&\n'> <'\ttest_commit one &&\n'> <'\ttest_commit two &&\n'> <'\ttest_commit three &&\n'> <'\tmv .git "$HTTPD_DOCUMENT_ROOT_PATH/shallow-exclude.git" &&\n'> <'\tgit clone --shallow-exclude two $HTTPD_URL/smart/shallow-exclude.git ../shallow12 &&\n'> <'\tgit -C ../shallow12 log --pretty=tformat:%s HEAD >actual &&\n'> <'\techo three >expected &&\n'> <'\ttest_cmp expected actual\n'> <'\t)\n'> ) } ) (C {<test_expect_success>} {(SQ <'fetch exclude tag one'>)} { (SQ <'\n'> <'\tgit -C shallow12 fetch --shallow-exclude one origin &&\n'> <'\tgit -C shallow12 log --pretty=tformat:%s origin/master >actual &&\n'> <'\ttest_write_lines three two >expected &&\n'> <'\ttest_cmp expected actual\n'> ) } ) (C {<test_expect_success>} {(SQ <'fetching deepen'>)} { (SQ <'\n'> <'\ttest_create_repo shallow-deepen &&\n'> <'\t(\n'> <'\tcd shallow-deepen &&\n'> <'\ttest_commit one &&\n'> <'\ttest_commit two &&\n'> <'\ttest_commit three &&\n'> <'\tmv .git "$HTTPD_DOCUMENT_ROOT_PATH/shallow-deepen.git" &&\n'> <'\tgit clone --depth 1 $HTTPD_URL/smart/shallow-deepen.git deepen &&\n'> <'\tmv "$HTTPD_DOCUMENT_ROOT_PATH/shallow-deepen.git" .git &&\n'> <'\ttest_commit four &&\n'> <'\tgit -C deepen log --pretty=tformat:%s master >actual &&\n'> <'\techo three >expected &&\n'> <'\ttest_cmp expected actual &&\n'> <'\tmv .git "$HTTPD_DOCUMENT_ROOT_PATH/shallow-deepen.git" &&\n'> <'\tgit -C deepen fetch --deepen=1 &&\n'> <'\tgit -C deepen log --pretty=tformat:%s origin/master >actual &&\n'> <'\tcat >expected <<-\\EOF &&\n'> <'\tfour\n'> <'\tthree\n'> <'\ttwo\n'> <'\tEOF\n'> <'\ttest_cmp expected actual\n'> <'\t)\n'> ) } ) (C {<stop_httpd>}) (C {<test_done>}) ] )