(List
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('test_description', {[SQ <LIT_CHARS "Test the Git Mediawiki remote helper: git clone">]})])
  (Com {[LIT_CHARS .]} {[LIT_CHARS ./test-gitmw-lib.sh]})
  (Com {[LIT_CHARS .]} {[VarSub TEST_DIRECTORY] [LIT_CHARS /test-lib.sh]})
  (Com {[LIT_CHARS test_check_precond]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "Git clone creates the expected git log with one file">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\twiki_reset &&\n"> <LIT_CHARS "\twiki_editpage foo \"this is not important\" false -c cat -s \"this must be the same\" &&\n"> <LIT_CHARS "\tgit clone mediawiki::">] [DQ [VarSub WIKI_URL]] [SQ <LIT_CHARS " mw_dir_1 &&\n"> <LIT_CHARS "\t(\n"> <LIT_CHARS "\t\tcd mw_dir_1 &&\n"> <LIT_CHARS "\t\tgit log --format=%s HEAD^..HEAD >log.tmp\n"> <LIT_CHARS "\t) &&\n"> <LIT_CHARS "\techo \"this must be the same\" >msg.tmp &&\n"> <LIT_CHARS "\tdiff -b mw_dir_1/log.tmp msg.tmp\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "Git clone creates the expected git log with multiple files">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\twiki_reset &&\n"> <LIT_CHARS "\twiki_editpage daddy \"this is not important\" false -s=\"this must be the same\" &&\n"> <LIT_CHARS "\twiki_editpage daddy \"neither is this\" true -s=\"this must also be the same\" &&\n"> <LIT_CHARS "\twiki_editpage daddy \"neither is this\" true -s=\"same same same\" &&\n"> <LIT_CHARS "\twiki_editpage dj \"dont care\" false -s=\"identical\" &&\n"> <LIT_CHARS "\twiki_editpage dj \"dont care either\" true -s=\"identical too\" &&\n"> <LIT_CHARS "\tgit clone mediawiki::">] [DQ [VarSub WIKI_URL]] [SQ <LIT_CHARS " mw_dir_2 &&\n"> <LIT_CHARS "\t(\n"> <LIT_CHARS "\t\tcd mw_dir_2 &&\n"> <LIT_CHARS "\t\tgit log --format=%s Daddy.mw  >logDaddy.tmp &&\n"> <LIT_CHARS "\t\tgit log --format=%s Dj.mw >logDj.tmp\n"> <LIT_CHARS "\t) &&\n"> <LIT_CHARS "\techo \"same same same\" >msgDaddy.tmp &&\n"> <LIT_CHARS "\techo \"this must also be the same\" >>msgDaddy.tmp &&\n"> <LIT_CHARS "\techo \"this must be the same\" >>msgDaddy.tmp &&\n"> <LIT_CHARS "\techo \"identical too\" >msgDj.tmp &&\n"> <LIT_CHARS "\techo \"identical\" >>msgDj.tmp &&\n"> <LIT_CHARS "\tdiff -b mw_dir_2/logDaddy.tmp msgDaddy.tmp &&\n"> <LIT_CHARS "\tdiff -b mw_dir_2/logDj.tmp msgDj.tmp\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "Git clone creates only Main_Page.mw with an empty wiki">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\twiki_reset &&\n"> <LIT_CHARS "\tgit clone mediawiki::">] [DQ [VarSub WIKI_URL]] [SQ <LIT_CHARS " mw_dir_3 &&\n"> <LIT_CHARS "\ttest_contains_N_files mw_dir_3 1 &&\n"> <LIT_CHARS "\ttest_path_is_file mw_dir_3/Main_Page.mw\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "Git clone does not fetch a deleted page">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\twiki_reset &&\n"> <LIT_CHARS "\twiki_editpage foo \"this page must be deleted before the clone\" false &&\n"> <LIT_CHARS "\twiki_delete_page foo &&\n"> <LIT_CHARS "\tgit clone mediawiki::">] [DQ [VarSub WIKI_URL]] [SQ <LIT_CHARS " mw_dir_4 &&\n"> <LIT_CHARS "\ttest_contains_N_files mw_dir_4 1 &&\n"> <LIT_CHARS "\ttest_path_is_file mw_dir_4/Main_Page.mw &&\n"> <LIT_CHARS "\ttest_path_is_missing mw_dir_4/Foo.mw\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "Git clone works with page added">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\twiki_reset &&\n"> <LIT_CHARS "\twiki_editpage foo \" I will be cloned\" false &&\n"> <LIT_CHARS "\twiki_editpage bar \"I will be cloned\" false &&\n"> <LIT_CHARS "\tgit clone mediawiki::">] [DQ [VarSub WIKI_URL]] [SQ <LIT_CHARS " mw_dir_5 &&\n"> <LIT_CHARS "\twiki_getallpage ref_page_5 &&\n"> <LIT_CHARS "\ttest_diff_directories mw_dir_5 ref_page_5 &&\n"> <LIT_CHARS "\twiki_delete_page foo &&\n"> <LIT_CHARS "\twiki_delete_page bar\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "Git clone works with an edited page ">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\twiki_reset &&\n"> <LIT_CHARS "\twiki_editpage foo \"this page will be edited\" \\\n"> <LIT_CHARS "\t\tfalse -s \"first edition of page foo\"&&\n"> <LIT_CHARS "\twiki_editpage foo \"this page has been edited and must be on the clone \" true &&\n"> <LIT_CHARS "\tgit clone mediawiki::">] [DQ [VarSub WIKI_URL]] [SQ <LIT_CHARS " mw_dir_6 &&\n"> <LIT_CHARS "\ttest_path_is_file mw_dir_6/Foo.mw &&\n"> <LIT_CHARS "\ttest_path_is_file mw_dir_6/Main_Page.mw &&\n"> <LIT_CHARS "\twiki_getallpage mw_dir_6/page_ref_6 &&\n"> <LIT_CHARS "\ttest_diff_directories mw_dir_6 mw_dir_6/page_ref_6 &&\n"> <LIT_CHARS "\t(\n"> <LIT_CHARS "\t\tcd mw_dir_6 &&\n"> <LIT_CHARS "\t\tgit log --format=%s HEAD^ Foo.mw > ../Foo.log\n"> <LIT_CHARS "\t) &&\n"> <LIT_CHARS "\techo \"first edition of page foo\" > FooExpect.log &&\n"> <LIT_CHARS "\tdiff FooExpect.log Foo.log\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "Git clone works with several pages and some deleted ">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\twiki_reset &&\n"> <LIT_CHARS "\twiki_editpage foo \"this page will not be deleted\" false &&\n"> <LIT_CHARS "\twiki_editpage bar \"I must not be erased\" false &&\n"> <LIT_CHARS "\twiki_editpage namnam \"I will not be there at the end\" false &&\n"> <LIT_CHARS "\twiki_editpage nyancat \"nyan nyan nyan delete me\" false &&\n"> <LIT_CHARS "\twiki_delete_page namnam &&\n"> <LIT_CHARS "\twiki_delete_page nyancat &&\n"> <LIT_CHARS "\tgit clone mediawiki::">] [DQ [VarSub WIKI_URL]] [SQ <LIT_CHARS " mw_dir_7 &&\n"> <LIT_CHARS "\ttest_path_is_file mw_dir_7/Foo.mw &&\n"> <LIT_CHARS "\ttest_path_is_file mw_dir_7/Bar.mw &&\n"> <LIT_CHARS "\ttest_path_is_missing mw_dir_7/Namnam.mw &&\n"> <LIT_CHARS "\ttest_path_is_missing mw_dir_7/Nyancat.mw &&\n"> <LIT_CHARS "\twiki_getallpage mw_dir_7/page_ref_7 &&\n"> <LIT_CHARS "\ttest_diff_directories mw_dir_7 mw_dir_7/page_ref_7\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "Git clone works with one specific page cloned ">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\twiki_reset &&\n"> <LIT_CHARS "\twiki_editpage foo \"I will not be cloned\" false &&\n"> <LIT_CHARS "\twiki_editpage bar \"Do not clone me\" false &&\n"> <LIT_CHARS "\twiki_editpage namnam \"I will be cloned :)\" false  -s=\"this log must stay\" &&\n"> <LIT_CHARS "\twiki_editpage nyancat \"nyan nyan nyan you cant clone me\" false &&\n"> <LIT_CHARS "\tgit clone -c remote.origin.pages=namnam \\\n"> <LIT_CHARS "\t\tmediawiki::">] [DQ [VarSub WIKI_URL]] [SQ <LIT_CHARS " mw_dir_8 &&\n"> <LIT_CHARS "\ttest_contains_N_files mw_dir_8 1 &&\n"> <LIT_CHARS "\ttest_path_is_file mw_dir_8/Namnam.mw &&\n"> <LIT_CHARS "\ttest_path_is_missing mw_dir_8/Main_Page.mw &&\n"> <LIT_CHARS "\t(\n"> <LIT_CHARS "\t\tcd mw_dir_8 &&\n"> <LIT_CHARS "\t\techo \"this log must stay\" >msg.tmp &&\n"> <LIT_CHARS "\t\tgit log --format=%s >log.tmp &&\n"> <LIT_CHARS "\t\tdiff -b msg.tmp log.tmp\n"> <LIT_CHARS "\t) &&\n"> <LIT_CHARS "\twiki_check_content mw_dir_8/Namnam.mw Namnam\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "Git clone works with multiple specific page cloned ">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\twiki_reset &&\n"> <LIT_CHARS "\twiki_editpage foo \"I will be there\" false &&\n"> <LIT_CHARS "\twiki_editpage bar \"I will not disapear\" false &&\n"> <LIT_CHARS "\twiki_editpage namnam \"I be erased\" false &&\n"> <LIT_CHARS "\twiki_editpage nyancat \"nyan nyan nyan you will not erase me\" false &&\n"> <LIT_CHARS "\twiki_delete_page namnam &&\n"> <LIT_CHARS "\tgit clone -c remote.origin.pages=\"foo bar nyancat namnam\" \\\n"> <LIT_CHARS "\t\tmediawiki::">] [DQ [VarSub WIKI_URL]] [SQ <LIT_CHARS " mw_dir_9 &&\n"> <LIT_CHARS "\ttest_contains_N_files mw_dir_9 3 &&\n"> <LIT_CHARS "\ttest_path_is_missing mw_dir_9/Namnam.mw &&\n"> <LIT_CHARS "\ttest_path_is_file mw_dir_9/Foo.mw &&\n"> <LIT_CHARS "\ttest_path_is_file mw_dir_9/Nyancat.mw &&\n"> <LIT_CHARS "\ttest_path_is_file mw_dir_9/Bar.mw &&\n"> <LIT_CHARS "\twiki_check_content mw_dir_9/Foo.mw Foo &&\n"> <LIT_CHARS "\twiki_check_content mw_dir_9/Bar.mw Bar &&\n"> <LIT_CHARS "\twiki_check_content mw_dir_9/Nyancat.mw Nyancat\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "Mediawiki-clone of several specific pages on wiki">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\twiki_reset &&\n"> <LIT_CHARS "\twiki_editpage foo \"foo 1\" false &&\n"> <LIT_CHARS "\twiki_editpage bar \"bar 1\" false &&\n"> <LIT_CHARS "\twiki_editpage dummy \"dummy 1\" false &&\n"> <LIT_CHARS "\twiki_editpage cloned_1 \"cloned_1 1\" false &&\n"> <LIT_CHARS "\twiki_editpage cloned_2 \"cloned_2 2\" false &&\n"> <LIT_CHARS "\twiki_editpage cloned_3 \"cloned_3 3\" false &&\n"> <LIT_CHARS "\tmkdir -p ref_page_10 &&\n"> <LIT_CHARS "\twiki_getpage cloned_1 ref_page_10 &&\n"> <LIT_CHARS "\twiki_getpage cloned_2 ref_page_10 &&\n"> <LIT_CHARS "\twiki_getpage cloned_3 ref_page_10 &&\n"> <LIT_CHARS "\tgit clone -c remote.origin.pages=\"cloned_1 cloned_2 cloned_3\" \\\n"> <LIT_CHARS "\t\tmediawiki::">] [DQ [VarSub WIKI_URL]] [SQ <LIT_CHARS " mw_dir_10 &&\n"> <LIT_CHARS "\ttest_diff_directories mw_dir_10 ref_page_10\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "Git clone works with the shallow option">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\twiki_reset &&\n"> <LIT_CHARS "\twiki_editpage foo \"1st revision, should be cloned\" false &&\n"> <LIT_CHARS "\twiki_editpage bar \"1st revision, should be cloned\" false &&\n"> <LIT_CHARS "\twiki_editpage nyan \"1st revision, should not be cloned\" false &&\n"> <LIT_CHARS "\twiki_editpage nyan \"2nd revision, should be cloned\" false &&\n"> <LIT_CHARS "\tgit -c remote.origin.shallow=true clone \\\n"> <LIT_CHARS "\t\tmediawiki::">] [DQ [VarSub WIKI_URL]] [SQ <LIT_CHARS " mw_dir_11 &&\n"> <LIT_CHARS "\ttest_contains_N_files mw_dir_11 4 &&\n"> <LIT_CHARS "\ttest_path_is_file mw_dir_11/Nyan.mw &&\n"> <LIT_CHARS "\ttest_path_is_file mw_dir_11/Foo.mw &&\n"> <LIT_CHARS "\ttest_path_is_file mw_dir_11/Bar.mw &&\n"> <LIT_CHARS "\ttest_path_is_file mw_dir_11/Main_Page.mw &&\n"> <LIT_CHARS "\t(\n"> <LIT_CHARS "\t\tcd mw_dir_11 &&\n"> <LIT_CHARS "\t\ttest $(git log --oneline Nyan.mw | wc -l) -eq 1 &&\n"> <LIT_CHARS "\t\ttest $(git log --oneline Foo.mw | wc -l) -eq 1 &&\n"> <LIT_CHARS "\t\ttest $(git log --oneline Bar.mw | wc -l) -eq 1 &&\n"> <LIT_CHARS "\t\ttest $(git log --oneline Main_Page.mw | wc -l ) -eq 1\n"> <LIT_CHARS "\t) &&\n"> <LIT_CHARS "\twiki_check_content mw_dir_11/Nyan.mw Nyan &&\n"> <LIT_CHARS "\twiki_check_content mw_dir_11/Foo.mw Foo &&\n"> <LIT_CHARS "\twiki_check_content mw_dir_11/Bar.mw Bar &&\n"> <LIT_CHARS "\twiki_check_content mw_dir_11/Main_Page.mw Main_Page\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "Git clone works with the shallow option with a delete page">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\twiki_reset &&\n"> <LIT_CHARS "\twiki_editpage foo \"1st revision, will be deleted\" false &&\n"> <LIT_CHARS "\twiki_editpage bar \"1st revision, should be cloned\" false &&\n"> <LIT_CHARS "\twiki_editpage nyan \"1st revision, should not be cloned\" false &&\n"> <LIT_CHARS "\twiki_editpage nyan \"2nd revision, should be cloned\" false &&\n"> <LIT_CHARS "\twiki_delete_page foo &&\n"> <LIT_CHARS "\tgit -c remote.origin.shallow=true clone \\\n"> <LIT_CHARS "\t\tmediawiki::">] [DQ [VarSub WIKI_URL]] [SQ <LIT_CHARS " mw_dir_12 &&\n"> <LIT_CHARS "\ttest_contains_N_files mw_dir_12 3 &&\n"> <LIT_CHARS "\ttest_path_is_file mw_dir_12/Nyan.mw &&\n"> <LIT_CHARS "\ttest_path_is_missing mw_dir_12/Foo.mw &&\n"> <LIT_CHARS "\ttest_path_is_file mw_dir_12/Bar.mw &&\n"> <LIT_CHARS "\ttest_path_is_file mw_dir_12/Main_Page.mw &&\n"> <LIT_CHARS "\t(\n"> <LIT_CHARS "\t\tcd mw_dir_12 &&\n"> <LIT_CHARS "\t\ttest $(git log --oneline Nyan.mw | wc -l) -eq 1 &&\n"> <LIT_CHARS "\t\ttest $(git log --oneline Bar.mw | wc -l) -eq 1 &&\n"> <LIT_CHARS "\t\ttest $(git log --oneline Main_Page.mw | wc -l ) -eq 1\n"> <LIT_CHARS "\t) &&\n"> <LIT_CHARS "\twiki_check_content mw_dir_12/Nyan.mw Nyan &&\n"> <LIT_CHARS "\twiki_check_content mw_dir_12/Bar.mw Bar &&\n"> <LIT_CHARS "\twiki_check_content mw_dir_12/Main_Page.mw Main_Page\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "Test of fetching a category">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\twiki_reset &&\n"> <LIT_CHARS "\twiki_editpage Foo \"I will be cloned\" false -c=Category &&\n"> <LIT_CHARS "\twiki_editpage Bar \"Meet me on the repository\" false -c=Category &&\n"> <LIT_CHARS "\twiki_editpage Dummy \"I will not come\" false &&\n"> <LIT_CHARS "\twiki_editpage BarWrong \"I will stay online only\" false -c=NotCategory &&\n"> <LIT_CHARS "\tgit clone -c remote.origin.categories=\"Category\" \\\n"> <LIT_CHARS "\t\tmediawiki::">] [DQ [VarSub WIKI_URL]] [SQ <LIT_CHARS " mw_dir_13 &&\n"> <LIT_CHARS "\twiki_getallpage ref_page_13 Category &&\n"> <LIT_CHARS "\ttest_diff_directories mw_dir_13 ref_page_13\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "Test of resistance to modification of category on wiki for clone">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\twiki_reset &&\n"> <LIT_CHARS "\twiki_editpage Tobedeleted \"this page will be deleted\" false -c=Catone &&\n"> <LIT_CHARS "\twiki_editpage Tobeedited \"this page will be modified\" false -c=Catone &&\n"> <LIT_CHARS "\twiki_editpage Normalone \"this page wont be modified and will be on git\" false -c=Catone &&\n"> <LIT_CHARS "\twiki_editpage Notconsidered \"this page will not appear on local\" false &&\n"> <LIT_CHARS "\twiki_editpage Othercategory \"this page will not appear on local\" false -c=Cattwo &&\n"> <LIT_CHARS "\twiki_editpage Tobeedited \"this page have been modified\" true -c=Catone &&\n"> <LIT_CHARS "\twiki_delete_page Tobedeleted\n"> <LIT_CHARS "\tgit clone -c remote.origin.categories=\"Catone\" \\\n"> <LIT_CHARS "\t\tmediawiki::">] [DQ [VarSub WIKI_URL]] [SQ <LIT_CHARS " mw_dir_14 &&\n"> <LIT_CHARS "\twiki_getallpage ref_page_14 Catone &&\n"> <LIT_CHARS "\ttest_diff_directories mw_dir_14 ref_page_14\n">]})
  (Com {[LIT_CHARS test_done]})
)