#!/bin/sh

global test_description := ''"-C <path>" option and its effects on other path-related options''

source ./test-lib.sh

test_expect_success '"git -C <path>" runs git from the directory <path>' '
	test_create_repo dir1 &&
	echo 1 >dir1/a.txt &&
	msg="initial in dir1" &&
	(cd dir1 && git add a.txt && git commit -m "$msg") &&
	echo "$msg" >expected &&
	git -C dir1 log --format=%s >actual &&
	test_cmp expected actual
'

test_expect_success '"git -C <path>" with an empty <path> is a no-op' '
	(
		mkdir -p dir1/subdir &&
		cd dir1/subdir &&
		git -C "" rev-parse --show-prefix >actual &&
		echo subdir/ >expect &&
		test_cmp expect actual
	)
'

test_expect_success 'Multiple -C options: "-C dir1 -C dir2" is equivalent to "-C dir1/dir2"' '
	test_create_repo dir1/dir2 &&
	echo 1 >dir1/dir2/b.txt &&
	git -C dir1/dir2 add b.txt &&
	msg="initial in dir1/dir2" &&
	echo "$msg" >expected &&
	git -C dir1/dir2 commit -m "$msg" &&
	git -C dir1 -C dir2 log --format=%s >actual &&
	test_cmp expected actual
'

test_expect_success 'Effect on --git-dir option: "-C c --git-dir=a.git" is equivalent to "--git-dir c/a.git"' '
	mkdir c &&
	mkdir c/a &&
	mkdir c/a.git &&
	(cd c/a.git && git init --bare) &&
	echo 1 >c/a/a.txt &&
	git --git-dir c/a.git --work-tree=c/a add a.txt &&
	git --git-dir c/a.git --work-tree=c/a commit -m "initial" &&
	git --git-dir=c/a.git log -1 --format=%s >expected &&
	git -C c --git-dir=a.git log -1 --format=%s >actual &&
	test_cmp expected actual
'

test_expect_success 'Order should not matter: "--git-dir=a.git -C c" is equivalent to "-C c --git-dir=a.git"' '
	git -C c --git-dir=a.git log -1 --format=%s >expected &&
	git --git-dir=a.git -C c log -1 --format=%s >actual &&
	test_cmp expected actual
'

test_expect_success 'Effect on --work-tree option: "-C c/a.git --work-tree=../a"  is equivalent to "--work-tree=c/a --git-dir=c/a.git"' '
	rm c/a/a.txt &&
	git --git-dir=c/a.git --work-tree=c/a status >expected &&
	git -C c/a.git --work-tree=../a status >actual &&
	test_cmp expected actual
'

test_expect_success 'Order should not matter: "--work-tree=../a -C c/a.git" is equivalent to "-C c/a.git --work-tree=../a"' '
	git -C c/a.git --work-tree=../a status >expected &&
	git --work-tree=../a -C c/a.git status >actual &&
	test_cmp expected actual
'

test_expect_success 'Effect on --git-dir and --work-tree options - "-C c --git-dir=a.git --work-tree=a" is equivalent to "--git-dir=c/a.git --work-tree=c/a"' '
	git --git-dir=c/a.git --work-tree=c/a status >expected &&
	git -C c --git-dir=a.git --work-tree=a status >actual &&
	test_cmp expected actual
'

test_expect_success 'Order should not matter: "-C c --git-dir=a.git --work-tree=a" is equivalent to "--git-dir=a.git -C c --work-tree=a"' '
	git -C c --git-dir=a.git --work-tree=a status >expected &&
	git --git-dir=a.git -C c --work-tree=a status >actual &&
	test_cmp expected actual
'

test_expect_success 'Order should not matter: "-C c --git-dir=a.git --work-tree=a" is equivalent to "--git-dir=a.git --work-tree=a -C c"' '
	git -C c --git-dir=a.git --work-tree=a status >expected &&
	git --git-dir=a.git --work-tree=a -C c status >actual &&
	test_cmp expected actual
'

test_expect_success 'Relative followed by fullpath: "-C ./here -C /there" is equivalent to "-C /there"' '
	echo "initial in dir1/dir2" >expected &&
	git -C dir1 -C "$(pwd)/dir1/dir2" log --format=%s >actual &&
	test_cmp expected actual
'

test_done
(CommandList
  children: [
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:test_description)
          op: Equal
          rhs: {(SQ <"\"-C <path>\" option and its effects on other path-related options">)}
          spids: [4]
        )
      ]
      spids: [4]
    )
    (C {(.)} {(./test-lib.sh)})
    (C {(test_expect_success)} {(SQ <"\"git -C <path>\" runs git from the directory <path>">)} 
      {
        (SQ <"\n"> <"\ttest_create_repo dir1 &&\n"> <"\techo 1 >dir1/a.txt &&\n"> 
          <"\tmsg=\"initial in dir1\" &&\n"> <"\t(cd dir1 && git add a.txt && git commit -m \"$msg\") &&\n"> <"\techo \"$msg\" >expected &&\n"> 
          <"\tgit -C dir1 log --format=%s >actual &&\n"> <"\ttest_cmp expected actual\n">
        )
      }
    )
    (C {(test_expect_success)} {(SQ <"\"git -C <path>\" with an empty <path> is a no-op">)} 
      {
        (SQ <"\n"> <"\t(\n"> <"\t\tmkdir -p dir1/subdir &&\n"> <"\t\tcd dir1/subdir &&\n"> 
          <"\t\tgit -C \"\" rev-parse --show-prefix >actual &&\n"> <"\t\techo subdir/ >expect &&\n"> <"\t\ttest_cmp expect actual\n"> <"\t)\n">
        )
      }
    )
    (C {(test_expect_success)} 
      {(SQ <"Multiple -C options: \"-C dir1 -C dir2\" is equivalent to \"-C dir1/dir2\"">)} 
      {
        (SQ <"\n"> <"\ttest_create_repo dir1/dir2 &&\n"> <"\techo 1 >dir1/dir2/b.txt &&\n"> 
          <"\tgit -C dir1/dir2 add b.txt &&\n"> <"\tmsg=\"initial in dir1/dir2\" &&\n"> <"\techo \"$msg\" >expected &&\n"> 
          <"\tgit -C dir1/dir2 commit -m \"$msg\" &&\n"> <"\tgit -C dir1 -C dir2 log --format=%s >actual &&\n"> <"\ttest_cmp expected actual\n">
        )
      }
    )
    (C {(test_expect_success)} 
      {
        (SQ 
          <
"Effect on --git-dir option: \"-C c --git-dir=a.git\" is equivalent to \"--git-dir c/a.git\""
          >
        )
      } 
      {
        (SQ <"\n"> <"\tmkdir c &&\n"> <"\tmkdir c/a &&\n"> <"\tmkdir c/a.git &&\n"> 
          <"\t(cd c/a.git && git init --bare) &&\n"> <"\techo 1 >c/a/a.txt &&\n"> <"\tgit --git-dir c/a.git --work-tree=c/a add a.txt &&\n"> 
          <"\tgit --git-dir c/a.git --work-tree=c/a commit -m \"initial\" &&\n"> <"\tgit --git-dir=c/a.git log -1 --format=%s >expected &&\n"> 
          <"\tgit -C c --git-dir=a.git log -1 --format=%s >actual &&\n"> <"\ttest_cmp expected actual\n">
        )
      }
    )
    (C {(test_expect_success)} 
      {
        (SQ 
          <
"Order should not matter: \"--git-dir=a.git -C c\" is equivalent to \"-C c --git-dir=a.git\""
          >
        )
      } 
      {
        (SQ <"\n"> <"\tgit -C c --git-dir=a.git log -1 --format=%s >expected &&\n"> 
          <"\tgit --git-dir=a.git -C c log -1 --format=%s >actual &&\n"> <"\ttest_cmp expected actual\n">
        )
      }
    )
    (C {(test_expect_success)} 
      {
        (SQ 
          <
"Effect on --work-tree option: \"-C c/a.git --work-tree=../a\"  is equivalent to \"--work-tree=c/a --git-dir=c/a.git\""
          >
        )
      } 
      {
        (SQ <"\n"> <"\trm c/a/a.txt &&\n"> 
          <"\tgit --git-dir=c/a.git --work-tree=c/a status >expected &&\n"> <"\tgit -C c/a.git --work-tree=../a status >actual &&\n"> <"\ttest_cmp expected actual\n">
        )
      }
    )
    (C {(test_expect_success)} 
      {
        (SQ 
          <
"Order should not matter: \"--work-tree=../a -C c/a.git\" is equivalent to \"-C c/a.git --work-tree=../a\""
          >
        )
      } 
      {
        (SQ <"\n"> <"\tgit -C c/a.git --work-tree=../a status >expected &&\n"> 
          <"\tgit --work-tree=../a -C c/a.git status >actual &&\n"> <"\ttest_cmp expected actual\n">
        )
      }
    )
    (C {(test_expect_success)} 
      {
        (SQ 
          <
"Effect on --git-dir and --work-tree options - \"-C c --git-dir=a.git --work-tree=a\" is equivalent to \"--git-dir=c/a.git --work-tree=c/a\""
          >
        )
      } 
      {
        (SQ <"\n"> <"\tgit --git-dir=c/a.git --work-tree=c/a status >expected &&\n"> 
          <"\tgit -C c --git-dir=a.git --work-tree=a status >actual &&\n"> <"\ttest_cmp expected actual\n">
        )
      }
    )
    (C {(test_expect_success)} 
      {
        (SQ 
          <
"Order should not matter: \"-C c --git-dir=a.git --work-tree=a\" is equivalent to \"--git-dir=a.git -C c --work-tree=a\""
          >
        )
      } 
      {
        (SQ <"\n"> <"\tgit -C c --git-dir=a.git --work-tree=a status >expected &&\n"> 
          <"\tgit --git-dir=a.git -C c --work-tree=a status >actual &&\n"> <"\ttest_cmp expected actual\n">
        )
      }
    )
    (C {(test_expect_success)} 
      {
        (SQ 
          <
"Order should not matter: \"-C c --git-dir=a.git --work-tree=a\" is equivalent to \"--git-dir=a.git --work-tree=a -C c\""
          >
        )
      } 
      {
        (SQ <"\n"> <"\tgit -C c --git-dir=a.git --work-tree=a status >expected &&\n"> 
          <"\tgit --git-dir=a.git --work-tree=a -C c status >actual &&\n"> <"\ttest_cmp expected actual\n">
        )
      }
    )
    (C {(test_expect_success)} 
      {
        (SQ <"Relative followed by fullpath: \"-C ./here -C /there\" is equivalent to \"-C /there\"">)
      } 
      {
        (SQ <"\n"> <"\techo \"initial in dir1/dir2\" >expected &&\n"> 
          <"\tgit -C dir1 -C \"$(pwd)/dir1/dir2\" log --format=%s >actual &&\n"> <"\ttest_cmp expected actual\n">
        )
      }
    )
    (C {(test_done)})
  ]
)