(List
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('test_description', {[SQ <LIT_CHARS "Test the update hook infrastructure.">]})])
  (Com {[LIT_CHARS .]} {[LIT_CHARS ./test-lib.sh]})
  (Com {[LIT_CHARS test_expect_success]} {[LIT_CHARS setup]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo This is a test. >a &&\n"> <LIT_CHARS "\tgit update-index --add a &&\n"> <LIT_CHARS "\ttree0=$(git write-tree) &&\n"> <LIT_CHARS "\tcommit0=$(echo setup | git commit-tree $tree0) &&\n"> <LIT_CHARS "\techo We hope it works. >a &&\n"> <LIT_CHARS "\tgit update-index a &&\n"> <LIT_CHARS "\ttree1=$(git write-tree) &&\n"> <LIT_CHARS "\tcommit1=$(echo modify | git commit-tree $tree1 -p $commit0) &&\n"> <LIT_CHARS "\tgit update-ref refs/heads/master $commit0 &&\n"> <LIT_CHARS "\tgit update-ref refs/heads/tofail $commit1 &&\n"> <LIT_CHARS "\tgit clone --bare ./. victim.git &&\n"> <LIT_CHARS "\tGIT_DIR=victim.git git update-ref refs/heads/tofail $commit1 &&\n"> <LIT_CHARS "\tgit update-ref refs/heads/master $commit1 &&\n"> <LIT_CHARS "\tgit update-ref refs/heads/tofail $commit0\n">]})
  (Com {[LIT_CHARS cat]}
    <
    (FilenameRedirectNode filename={[LIT_CHARS victim.git/hooks/pre-receive]} <REDIR_GREAT ">"> 1),
    (HereDocRedirectNode here_end='EOF' do_expansion=False body_word={[LIT_CHARS "#!/bin/sh\n"] [LIT_CHARS "printf %s \"$@\" >>$GIT_DIR/pre-receive.args\n"] [LIT_CHARS "cat - >$GIT_DIR/pre-receive.stdin\n"] [LIT_CHARS "echo STDOUT pre-receive\n"] [LIT_CHARS "echo STDERR pre-receive >&2\n"]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS chmod]} {[LIT_CHARS u] [LIT_OTHER "+"] [LIT_CHARS x]} {[LIT_CHARS victim.git/hooks/pre-receive]})
  (Com {[LIT_CHARS cat]}
    <
    (FilenameRedirectNode filename={[LIT_CHARS victim.git/hooks/update]} <REDIR_GREAT ">"> 1),
    (HereDocRedirectNode here_end='EOF' do_expansion=False body_word={[LIT_CHARS "#!/bin/sh\n"] [LIT_CHARS "echo \"$@\" >>$GIT_DIR/update.args\n"] [LIT_CHARS "read x; printf %s \"$x\" >$GIT_DIR/update.stdin\n"] [LIT_CHARS "echo STDOUT update $1\n"] [LIT_CHARS "echo STDERR update $1 >&2\n"] [LIT_CHARS "test \"$1\" = refs/heads/master || exit\n"]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS chmod]} {[LIT_CHARS u] [LIT_OTHER "+"] [LIT_CHARS x]} {[LIT_CHARS victim.git/hooks/update]})
  (Com {[LIT_CHARS cat]}
    <
    (FilenameRedirectNode filename={[LIT_CHARS victim.git/hooks/post-receive]} <REDIR_GREAT ">"> 1),
    (HereDocRedirectNode here_end='EOF' do_expansion=False body_word={[LIT_CHARS "#!/bin/sh\n"] [LIT_CHARS "printf %s \"$@\" >>$GIT_DIR/post-receive.args\n"] [LIT_CHARS "cat - >$GIT_DIR/post-receive.stdin\n"] [LIT_CHARS "echo STDOUT post-receive\n"] [LIT_CHARS "echo STDERR post-receive >&2\n"]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS chmod]} {[LIT_CHARS u] [LIT_OTHER "+"] [LIT_CHARS x]} {[LIT_CHARS victim.git/hooks/post-receive]})
  (Com {[LIT_CHARS cat]}
    <
    (FilenameRedirectNode filename={[LIT_CHARS victim.git/hooks/post-update]} <REDIR_GREAT ">"> 1),
    (HereDocRedirectNode here_end='EOF' do_expansion=False body_word={[LIT_CHARS "#!/bin/sh\n"] [LIT_CHARS "echo \"$@\" >>$GIT_DIR/post-update.args\n"] [LIT_CHARS "read x; printf %s \"$x\" >$GIT_DIR/post-update.stdin\n"] [LIT_CHARS "echo STDOUT post-update\n"] [LIT_CHARS "echo STDERR post-update >&2\n"]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS chmod]} {[LIT_CHARS u] [LIT_OTHER "+"] [LIT_CHARS x]} {[LIT_CHARS victim.git/hooks/post-update]})
  (Com {[LIT_CHARS test_expect_success]} {[LIT_CHARS push]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_must_fail git send-pack --force ./victim.git \\\n"> <LIT_CHARS "\t\tmaster tofail >send.out 2>send.err\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "updated as expected">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest $(GIT_DIR=victim.git git rev-parse master) = $commit1 &&\n"> <LIT_CHARS "\ttest $(GIT_DIR=victim.git git rev-parse tofail) = $commit1\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "hooks ran">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest -f victim.git/pre-receive.args &&\n"> <LIT_CHARS "\ttest -f victim.git/pre-receive.stdin &&\n"> <LIT_CHARS "\ttest -f victim.git/update.args &&\n"> <LIT_CHARS "\ttest -f victim.git/update.stdin &&\n"> <LIT_CHARS "\ttest -f victim.git/post-receive.args &&\n"> <LIT_CHARS "\ttest -f victim.git/post-receive.stdin &&\n"> <LIT_CHARS "\ttest -f victim.git/post-update.args &&\n"> <LIT_CHARS "\ttest -f victim.git/post-update.stdin\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "pre-receive hook input">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t(echo $commit0 $commit1 refs/heads/master;\n"> <LIT_CHARS "\t echo $commit1 $commit0 refs/heads/tofail\n"> <LIT_CHARS "\t) | test_cmp - victim.git/pre-receive.stdin\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "update hook arguments">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t(echo refs/heads/master $commit0 $commit1;\n"> <LIT_CHARS "\t echo refs/heads/tofail $commit1 $commit0\n"> <LIT_CHARS "\t) | test_cmp - victim.git/update.args\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "post-receive hook input">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo $commit0 $commit1 refs/heads/master |\n"> <LIT_CHARS "\ttest_cmp - victim.git/post-receive.stdin\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "post-update hook arguments">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo refs/heads/master |\n"> <LIT_CHARS "\ttest_cmp - victim.git/post-update.args\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "all hook stdin is /dev/null">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t! test -s victim.git/update.stdin &&\n"> <LIT_CHARS "\t! test -s victim.git/post-update.stdin\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "all *-receive hook args are empty">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t! test -s victim.git/pre-receive.args &&\n"> <LIT_CHARS "\t! test -s victim.git/post-receive.args\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "send-pack produced no output">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t! test -s send.out\n">]})
  (Com {[LIT_CHARS cat]}
    <
    (HereDocRedirectNode here_end='EOF' do_expansion=True body_word={[DQ [LIT_CHARS "remote: STDOUT pre-receive\n"][LIT_CHARS "remote: STDERR pre-receive\n"][LIT_CHARS "remote: STDOUT update refs/heads/master\n"][LIT_CHARS "remote: STDERR update refs/heads/master\n"][LIT_CHARS "remote: STDOUT update refs/heads/tofail\n"][LIT_CHARS "remote: STDERR update refs/heads/tofail\n"][LIT_CHARS "remote: error: hook declined to update refs/heads/tofail\n"][LIT_CHARS "remote: STDOUT post-receive\n"][LIT_CHARS "remote: STDERR post-receive\n"][LIT_CHARS "remote: STDOUT post-update\n"][LIT_CHARS "remote: STDERR post-update\n"]]} <REDIR_DLESS "<<"> 0),
    (FilenameRedirectNode filename={[LIT_CHARS expect]} <REDIR_GREAT ">"> 1),
    >
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "send-pack stderr contains hook messages">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgrep ^remote: send.err | sed \"s/ *\\$//\" >actual &&\n"> <LIT_CHARS "\ttest_cmp expect actual\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "pre-receive hook that forgets to read its input">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\twrite_script victim.git/hooks/pre-receive <<-\\EOF &&\n"> <LIT_CHARS "\texit 0\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\trm -f victim.git/hooks/update victim.git/hooks/post-update &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tfor v in $(test_seq 100 999)\n"> <LIT_CHARS "\tdo\n"> <LIT_CHARS "\t\tgit branch branch_$v master || return\n"> <LIT_CHARS "\tdone &&\n"> <LIT_CHARS "\tgit push ./victim.git \"+refs/heads/*:refs/heads/*\"\n">]})
  (Com {[LIT_CHARS test_done]})
)