(List
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('test_description', {[SQ <LIT_CHARS "test WebDAV http-push\n"> <LIT_CHARS "\n"> <LIT_CHARS "This test runs various sanity checks on http-push.">]})])
  (Com {[LIT_CHARS .]} {[LIT_CHARS ./test-lib.sh]}  )
  (If
    (AndOr OP_OR_IF
      (Com {[LIT_CHARS git]} {[LIT_CHARS http-push]}
        <
        (FilenameRedirectNode filename={[LIT_CHARS /dev/null]} <REDIR_GREAT ">"> 1),
        (DescriptorRedirectNode target={[LIT_CHARS 1]} <REDIR_GREATAND "2>&"> 2),
        >
      )
      (Com {[LIT_DBRACKET_LIKE "["]} {[VarSub ?]} {[LIT_CHARS -eq]} {[LIT_CHARS 128]} {[LIT_DBRACKET_LIKE "]"]}      )
    )
    (List
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('skip_all', {[DQ [LIT_CHARS "skipping test, USE_CURL_MULTI is not defined"]]})])
      (Com {[LIT_CHARS test_done]}      )
    )
  )
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('LIB_HTTPD_DAV', {[LIT_CHARS t]})])
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('LIB_HTTPD_PORT', {[VarSub LIB_HTTPD_PORT test_op=VS_TEST_HYPHEN {[LIT_CHARS "'5540'"]}]})])
  (Com {[LIT_CHARS .]} {[DQ [VarSub TEST_DIRECTORY]] [LIT_CHARS /lib-httpd.sh]}  )
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('ROOT_PATH', {[DQ [VarSub PWD]]})])
  (Com {[LIT_CHARS start_httpd]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "setup remote repository">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tcd \"$ROOT_PATH\" &&\n"> <LIT_CHARS "\tmkdir test_repo &&\n"> <LIT_CHARS "\tcd test_repo &&\n"> <LIT_CHARS "\tgit init &&\n"> <LIT_CHARS "\t: >path1 &&\n"> <LIT_CHARS "\tgit add path1 &&\n"> <LIT_CHARS "\ttest_tick &&\n"> <LIT_CHARS "\tgit commit -m initial &&\n"> <LIT_CHARS "\tcd - &&\n"> <LIT_CHARS "\tgit clone --bare test_repo test_repo.git &&\n"> <LIT_CHARS "\tcd test_repo.git &&\n"> <LIT_CHARS "\tgit --bare update-server-info &&\n"> <LIT_CHARS "\tmv hooks/post-update.sample hooks/post-update &&\n"> <LIT_CHARS "\tORIG_HEAD=$(git rev-parse --verify HEAD) &&\n"> <LIT_CHARS "\tcd - &&\n"> <LIT_CHARS "\tmv test_repo.git \"$HTTPD_DOCUMENT_ROOT_PATH\"\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "create password-protected repository">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tmkdir -p \"$HTTPD_DOCUMENT_ROOT_PATH/auth/dumb\" &&\n"> <LIT_CHARS "\tcp -Rf \"$HTTPD_DOCUMENT_ROOT_PATH/test_repo.git\" \\\n"> <LIT_CHARS "\t       \"$HTTPD_DOCUMENT_ROOT_PATH/auth/dumb/test_repo.git\"\n">]}  )
  (Com {[LIT_CHARS setup_askpass_helper]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "clone remote repository">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tcd \"$ROOT_PATH\" &&\n"> <LIT_CHARS "\tgit clone $HTTPD_URL/dumb/test_repo.git test_repo_clone\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "push to remote repository with packed refs">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tcd \"$ROOT_PATH\"/test_repo_clone &&\n"> <LIT_CHARS "\t: >path2 &&\n"> <LIT_CHARS "\tgit add path2 &&\n"> <LIT_CHARS "\ttest_tick &&\n"> <LIT_CHARS "\tgit commit -m path2 &&\n"> <LIT_CHARS "\tHEAD=$(git rev-parse --verify HEAD) &&\n"> <LIT_CHARS "\tgit push &&\n"> <LIT_CHARS "\t(cd \"$HTTPD_DOCUMENT_ROOT_PATH\"/test_repo.git &&\n"> <LIT_CHARS "\t test $HEAD = $(git rev-parse --verify HEAD))\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "push already up-to-date">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit push\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "push to remote repository with unpacked refs">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t(cd \"$HTTPD_DOCUMENT_ROOT_PATH\"/test_repo.git &&\n"> <LIT_CHARS "\t rm packed-refs &&\n"> <LIT_CHARS "\t git update-ref refs/heads/master $ORIG_HEAD &&\n"> <LIT_CHARS "\t git --bare update-server-info) &&\n"> <LIT_CHARS "\tgit push &&\n"> <LIT_CHARS "\t(cd \"$HTTPD_DOCUMENT_ROOT_PATH\"/test_repo.git &&\n"> <LIT_CHARS "\t test $HEAD = $(git rev-parse --verify HEAD))\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "http-push fetches unpacked objects">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tcp -R \"$HTTPD_DOCUMENT_ROOT_PATH\"/test_repo.git \\\n"> <LIT_CHARS "\t\t\"$HTTPD_DOCUMENT_ROOT_PATH\"/test_repo_unpacked.git &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit clone $HTTPD_URL/dumb/test_repo_unpacked.git \\\n"> <LIT_CHARS "\t\t\"$ROOT_PATH\"/fetch_unpacked &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\t# By reset, we force git to retrieve the object\n"> <LIT_CHARS "\t(cd \"$ROOT_PATH\"/fetch_unpacked &&\n"> <LIT_CHARS "\t git reset --hard HEAD^ &&\n"> <LIT_CHARS "\t git remote rm origin &&\n"> <LIT_CHARS "\t git reflog expire --expire=0 --all &&\n"> <LIT_CHARS "\t git prune &&\n"> <LIT_CHARS "\t git push -f -v $HTTPD_URL/dumb/test_repo_unpacked.git master)\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "http-push fetches packed objects">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tcp -R \"$HTTPD_DOCUMENT_ROOT_PATH\"/test_repo.git \\\n"> <LIT_CHARS "\t\t\"$HTTPD_DOCUMENT_ROOT_PATH\"/test_repo_packed.git &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit clone $HTTPD_URL/dumb/test_repo_packed.git \\\n"> <LIT_CHARS "\t\t\"$ROOT_PATH\"/test_repo_clone_packed &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\t(cd \"$HTTPD_DOCUMENT_ROOT_PATH\"/test_repo_packed.git &&\n"> <LIT_CHARS "\t git --bare repack &&\n"> <LIT_CHARS "\t git --bare prune-packed) &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\t# By reset, we force git to retrieve the packed object\n"> <LIT_CHARS "\t(cd \"$ROOT_PATH\"/test_repo_clone_packed &&\n"> <LIT_CHARS "\t git reset --hard HEAD^ &&\n"> <LIT_CHARS "\t git remote remove origin &&\n"> <LIT_CHARS "\t git reflog expire --expire=0 --all &&\n"> <LIT_CHARS "\t git prune &&\n"> <LIT_CHARS "\t git push -f -v $HTTPD_URL/dumb/test_repo_packed.git master)\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "create and delete remote branch">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tcd \"$ROOT_PATH\"/test_repo_clone &&\n"> <LIT_CHARS "\tgit checkout -b dev &&\n"> <LIT_CHARS "\t: >path3 &&\n"> <LIT_CHARS "\tgit add path3 &&\n"> <LIT_CHARS "\ttest_tick &&\n"> <LIT_CHARS "\tgit commit -m dev &&\n"> <LIT_CHARS "\tgit push origin dev &&\n"> <LIT_CHARS "\tgit push origin :dev &&\n"> <LIT_CHARS "\ttest_must_fail git show-ref --verify refs/remotes/origin/dev\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "MKCOL sends directory names with trailing slashes">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\t! grep \"\\\"MKCOL.*[^/] HTTP/[^ ]*\\\"\" < \"$HTTPD_ROOT_PATH\"/access.log\n"> <LIT_CHARS "\n">]}  )
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('x1', {[DQ [LIT_CHARS "[0-9a-f]"]]})])
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('x2', {[DQ [VarSub x1][VarSub x1]]})])
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('x5', {[DQ [VarSub x1][VarSub x1][VarSub x1][VarSub x1][VarSub x1]]})])
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('x38', {[DQ [VarSub x5][VarSub x5][VarSub x5][VarSub x5][VarSub x5][VarSub x5][VarSub x5][VarSub x1][VarSub x1][VarSub x1]]})])
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('x40', {[DQ [VarSub x38][VarSub x2]]})])
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "PUT and MOVE sends object to URLs with SHA-1 hash suffix">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tsed \\\n"> <LIT_CHARS "\t\t-e \"s/PUT /OP /\" \\\n"> <LIT_CHARS "\t\t-e \"s/MOVE /OP /\" \\\n"> <LIT_CHARS "\t    -e \"s|/objects/$x2/${x38}_$x40|WANTED_PATH_REQUEST|\" \\\n"> <LIT_CHARS "\t\t\"$HTTPD_ROOT_PATH\"/access.log |\n"> <LIT_CHARS "\tgrep -e \"\\\"OP .*WANTED_PATH_REQUEST HTTP/[.0-9]*\\\" 20[0-9] \"\n"> <LIT_CHARS "\n">]}  )
  (Com {[LIT_CHARS test_http_push_nonff]} {[DQ [VarSub HTTPD_DOCUMENT_ROOT_PATH]] [LIT_CHARS /test_repo.git]} {[DQ [VarSub ROOT_PATH]] [LIT_CHARS /test_repo_clone]} {[LIT_CHARS master]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "push to password-protected repository (user in URL)">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_commit pw-user &&\n"> <LIT_CHARS "\tset_askpass user@host &&\n"> <LIT_CHARS "\tgit push \"$HTTPD_URL_USER/auth/dumb/test_repo.git\" HEAD &&\n"> <LIT_CHARS "\tgit rev-parse --verify HEAD >expect &&\n"> <LIT_CHARS "\tgit --git-dir=\"$HTTPD_DOCUMENT_ROOT_PATH/auth/dumb/test_repo.git\" \\\n"> <LIT_CHARS "\t\trev-parse --verify HEAD >actual &&\n"> <LIT_CHARS "\ttest_cmp expect actual\n">]}  )
  (Com {[LIT_CHARS test_expect_failure]} {[SQ <LIT_CHARS "user was prompted only once for password">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\texpect_askpass pass user@host\n">]}  )
  (Com {[LIT_CHARS test_expect_failure]} {[SQ <LIT_CHARS "push to password-protected repository (no user in URL)">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_commit pw-nouser &&\n"> <LIT_CHARS "\tset_askpass user@host &&\n"> <LIT_CHARS "\tgit push \"$HTTPD_URL/auth/dumb/test_repo.git\" HEAD &&\n"> <LIT_CHARS "\texpect_askpass both user@host\n"> <LIT_CHARS "\tgit rev-parse --verify HEAD >expect &&\n"> <LIT_CHARS "\tgit --git-dir=\"$HTTPD_DOCUMENT_ROOT_PATH/auth/dumb/test_repo.git\" \\\n"> <LIT_CHARS "\t\trev-parse --verify HEAD >actual &&\n"> <LIT_CHARS "\ttest_cmp expect actual\n">]}  )
  (Com {[LIT_CHARS stop_httpd]}  )
  (Com {[LIT_CHARS test_done]}  )
)