(CommandList children: [ (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:test_description) op: Equal rhs: {(SQ <"git svn authors file tests">)} spids: [13] ) ] spids: [13] ) (C {(.)} {(./lib-git-svn.sh)}) (SimpleCommand words: [{(cat)}] redirects: [ (Redir op_id:Redir_Great fd:-1 arg_word:{(svn-authors)} spids:[26]) (HereDoc op_id: Redir_DLess fd: -1 body: { (DQ ("aa = AAAAAAA AAAAAAA <aa@example.com>\n") ("bb = BBBBBBB BBBBBBB <bb@example.com>\n") ) } do_expansion: True here_end: EOF was_filled: True spids: [30] ) ] ) (C {(test_expect_success)} {(SQ <"setup svnrepo">)} { (SQ <"\n"> <"\tfor i in aa bb cc dd\n"> <"\tdo\n"> <"\t\tsvn_cmd mkdir -m $i --username $i \"$svnrepo\"/$i\n"> <"\tdone\n"> <"\t"> ) } ) (C {(test_expect_success)} {(SQ <"start import with incomplete authors file">)} { (SQ <"\n"> <"\ttest_must_fail git svn clone --authors-file=svn-authors \"$svnrepo\" x\n"> <"\t"> ) } ) (C {(test_expect_success)} {(SQ <"imported 2 revisions successfully">)} { (SQ <"\n"> <"\t(\n"> <"\t\tcd x\n"> <"\t\ttest \"$(git rev-list refs/remotes/git-svn | wc -l)\" -eq 2 &&\n"> <"\t\tgit rev-list -1 --pretty=raw refs/remotes/git-svn | \\\n"> <"\t\t grep \"^author BBBBBBB BBBBBBB <bb@example\\.com> \" &&\n"> <"\t\tgit rev-list -1 --pretty=raw refs/remotes/git-svn~1 | \\\n"> <"\t\t grep \"^author AAAAAAA AAAAAAA <aa@example\\.com> \"\n"> <"\t)\n"> <"\t"> ) } ) (SimpleCommand words: [{(cat)}] redirects: [ (Redir op_id:Redir_DGreat fd:-1 arg_word:{(svn-authors)} spids:[87]) (HereDoc op_id: Redir_DLess fd: -1 body: { (DQ ("cc = CCCCCCC CCCCCCC <cc@example.com>\n") ("dd = DDDDDDD DDDDDDD <dd@example.com>\n") ) } do_expansion: True here_end: EOF was_filled: True spids: [91] ) ] ) (C {(test_expect_success)} {(SQ <"continues to import once authors have been added">)} { (SQ <"\n"> <"\t(\n"> <"\t\tcd x\n"> <"\t\tgit svn fetch --authors-file=../svn-authors &&\n"> <"\t\ttest \"$(git rev-list refs/remotes/git-svn | wc -l)\" -eq 4 &&\n"> <"\t\tgit rev-list -1 --pretty=raw refs/remotes/git-svn | \\\n"> <"\t\t grep \"^author DDDDDDD DDDDDDD <dd@example\\.com> \" &&\n"> <"\t\tgit rev-list -1 --pretty=raw refs/remotes/git-svn~1 | \\\n"> <"\t\t grep \"^author CCCCCCC CCCCCCC <cc@example\\.com> \"\n"> <"\t)\n"> <"\t"> ) } ) (C {(test_expect_success)} {(SQ <"authors-file against globs">)} { (SQ <"\n"> <"\tsvn_cmd mkdir -m globs --username aa \\\n"> <"\t \"$svnrepo\"/aa/trunk \"$svnrepo\"/aa/branches \"$svnrepo\"/aa/tags &&\n"> <"\tgit svn clone --authors-file=svn-authors -s \"$svnrepo\"/aa aa-work &&\n"> <"\tfor i in bb ee cc\n"> <"\tdo\n"> <"\t\tbranch=\"aa/branches/$i\"\n"> <"\t\tsvn_cmd mkdir -m \"$branch\" --username $i \"$svnrepo/$branch\"\n"> <"\tdone\n"> <"\t"> ) } ) (C {(test_expect_success)} {(SQ <"fetch fails on ee">)} { (SQ <"\n"> <"\t( cd aa-work && test_must_fail git svn fetch --authors-file=../svn-authors )\n"> <"\t"> ) } ) (FuncDef name: tmp_config_get body: (BraceGroup children: [ (C {(git)} {(config)} {(--file) (Lit_Other "=") (.git/svn/.metadata)} {(--get)} {(DQ ($ VSub_Number "$1"))} ) ] spids: [156] ) spids: [151 155] ) (C {(test_expect_success)} {(SQ <"failure happened without negative side effects">)} { (SQ <"\n"> <"\t(\n"> <"\t\tcd aa-work &&\n"> <"\t\ttest 6 -eq \"$(tmp_config_get svn-remote.svn.branches-maxRev)\" &&\n"> <"\t\ttest 6 -eq \"$(tmp_config_get svn-remote.svn.tags-maxRev)\"\n"> <"\t)\n"> <"\t"> ) } ) (SimpleCommand words: [{(cat)}] redirects: [ (Redir op_id:Redir_DGreat fd:-1 arg_word:{(svn-authors)} spids:[195]) (HereDoc op_id: Redir_DLess fd: -1 body: {(DQ ("ee = EEEEEEE EEEEEEE <ee@example.com>\n"))} do_expansion: True here_end: EOF was_filled: True spids: [199] ) ] ) (C {(test_expect_success)} {(SQ <"fetch continues after authors-file is fixed">)} { (SQ <"\n"> <"\t(\n"> <"\t\tcd aa-work &&\n"> <"\t\tgit svn fetch --authors-file=../svn-authors &&\n"> <"\t\ttest 8 -eq \"$(tmp_config_get svn-remote.svn.branches-maxRev)\" &&\n"> <"\t\ttest 8 -eq \"$(tmp_config_get svn-remote.svn.tags-maxRev)\"\n"> <"\t)\n"> <"\t"> ) } ) (C {(test_expect_success)} {(KW_Bang "!") (MINGW)} {(SQ <"fresh clone with svn.authors-file in config">)} { (SQ <"\n"> <"\t(\n"> <"\t\trm -r \"$GIT_DIR\" &&\n"> <"\t\ttest x = x\"$(git config svn.authorsfile)\" &&\n"> <"\t\ttest_config=\"$HOME\"/.gitconfig &&\n"> <"\t\tsane_unset GIT_DIR &&\n"> <"\t\tgit config --global \\\n"> <"\t\t svn.authorsfile \"$HOME\"/svn-authors &&\n"> <"\t\ttest x\"$HOME\"/svn-authors = x\"$(git config svn.authorsfile)\" &&\n"> <"\t\tgit svn clone \"$svnrepo\" gitconfig.clone &&\n"> <"\t\tcd gitconfig.clone &&\n"> <"\t\tnr_ex=$(git log | grep \"^Author:.*example.com\" | wc -l) &&\n"> <"\t\tnr_rev=$(git rev-list HEAD | wc -l) &&\n"> <"\t\ttest $nr_rev -eq $nr_ex\n"> <"\t)\n"> ) } ) (C {(test_debug)} {(SQ <"GIT_DIR=gitconfig.clone/.git git log">)}) (C {(test_done)}) ] )