git-svn: make test for SVK mirror path import

A manual test that sets up a repository that looks like an SVK depot,
and then imports it to check that it looks like we mirrored the
'original' source.

There is also a minor modification to the git-svn test library shell
file which sets a variable for the subversion repository's filesystem
path.

[ew: made some of the tests stricter and more thorough]

Signed-off-by: Eric Wong <normalperson@yhbt.net>

diff --git a/t/lib-git-svn.sh b/t/lib-git-svn.sh
index 67d08cf74083e1b4f045b5c4dfc510f1c3cae5c8..27ad3b70f9d9c38defdcf632db0e79ce09c65f4e 100644 (file)
--- a/t/lib-git-svn.sh
+++ b/t/lib-git-svn.sh
@@ -42,9 +42,9 @@ then
        exit
 fi
 
+rawsvnrepo="$svnrepo"
 svnrepo="file://$svnrepo"
 
-
 poke() {
        perl -e '@x = stat($ARGV[0]); utime($x[8], $x[9] + 1, $ARGV[0])' "$1"
 }

diff --git a/t/t9109-git-svn-svk-mirrorpaths.sh b/t/t9109-git-svn-svk-mirrorpaths.sh
new file mode 100755 (executable)
index 0000000..0e0ba3d
--- /dev/null
+++ b/t/t9109-git-svn-svk-mirrorpaths.sh
@@ -0,0 +1,104 @@
+#!/bin/sh
+#
+# Copyright (c) 2006 Sam Vilian
+#
+
+test_description='git-svn on SVK mirror paths'
+. ./lib-git-svn.sh
+
+# ok, people who don't have SVK installed probably don't care about
+# this test.
+
+# we set up the repository manually, because even if SVK is installed
+# it is difficult to use it in a way that is idempotent.
+
+# we are not yet testing merge tickets..
+
+uuid=b00bface-b1ff-c0ff-f0ff-b0bafe775e1e
+url=https://really.slow.server.com/foobar
+
+test_expect_success 'initialize repo' "
+       git config svn-remote.svn.useSvmProps true &&
+
+       echo '#!/bin/sh' > $rawsvnrepo/hooks/pre-revprop-change &&
+       echo 'exit 0' >> $rawsvnrepo/hooks/pre-revprop-change &&
+       chmod +x $rawsvnrepo/hooks/pre-revprop-change &&
+
+       mkdir import &&
+       cd import &&
+       mkdir local &&
+       echo hello > local/readme &&
+       svn import -m 'random local work' . $svnrepo &&
+       cd .. &&
+
+       svn co $svnrepo wc &&
+       cd wc &&
+       mkdir -p mirror/foobar &&
+       svn add mirror &&
+       svn ps svm:source $url mirror/foobar &&
+       svn ps svm:uuid $uuid mirror/foobar &&
+       svn ps svm:mirror / mirror/foobar &&
+       svn commit -m 'setup mirror/foobar as mirror of upstream' &&
+       svn ps -r 2 --revprop svm:headrev $uuid:0 $svnrepo &&
+
+       mkdir mirror/foobar/trunk
+       echo hello, world > mirror/foobar/trunk/readme &&
+       svn add mirror/foobar/trunk &&
+       svn commit -m 'first upstream revision' &&
+       svn ps -r 3 --revprop svm:headrev $uuid:1 $svnrepo &&
+
+       svn up &&
+       svn mkdir mirror/foobar/branches &&
+       svn cp mirror/foobar/trunk mirror/foobar/branches/silly &&
+       svn commit -m 'make branch for silliness' &&
+       svn ps -r 4 --revprop svm:headrev $uuid:2 $svnrepo &&
+
+       svn up &&
+       echo random untested feature >> mirror/foobar/trunk/readme &&
+       svn commit -m 'add a c00l feature to trunk' &&
+       svn ps -r 5 --revprop svm:headrev $uuid:3 $svnrepo &&
+
+       svn up &&
+       echo bug fix >> mirror/foobar/branches/silly/readme &&
+       svn commit -m 'fix a bug' &&
+       svn ps -r 6 --revprop svm:headrev $uuid:4 $svnrepo &&
+
+       svn mkdir mirror/foobar/tags &&
+       svn cp mirror/foobar/branches/silly mirror/foobar/tags/blah-1.0 &&
+       svn commit -m 'make a release' &&
+       svn ps -r 7 --revprop svm:headrev $uuid:5 $svnrepo &&
+
+       cd ..
+       "
+
+test_expect_success 'multi-init an SVK mirror path' "
+       git-svn multi-init -T trunk -t tags -b branches $svnrepo/mirror/foobar
+       "
+
+test_expect_success 'multi-fetch an SVK mirror path' "git-svn multi-fetch"
+
+test_expect_success 'got tag history OK' "
+       test \`git-log --pretty=oneline remotes/tags/blah-1.0 | wc -l\` -eq 3
+       "
+
+test_expect_success 're-wrote git-svn-id URL, revision and UUID' "
+       git cat-file commit refs/remotes/trunk | \
+           fgrep 'git-svn-id: $url/mirror/foobar/trunk@3 $uuid' &&
+       git cat-file commit refs/remotes/tags/blah-1.0 | \
+           fgrep 'git-svn-id: $url/mirror/foobar/tags/blah-1.0@5 $uuid'
+       git cat-file commit refs/remotes/silly | \
+           fgrep 'git-svn-id: $url/mirror/foobar/branches/silly@4 $uuid'
+       "
+
+test_expect_success 're-wrote author e-mail domain UUID' "
+       test \`git log --pretty=fuller trunk | \
+              grep '<.*@.*>' | fgrep '@$uuid>' | wc -l\` -eq 4 &&
+       test \`git log --pretty=fuller remotes/silly | \
+              grep '<.*@.*>' | fgrep '@$uuid>' | wc -l\` -eq 6 &&
+       test \`git log --pretty=fuller remotes/tags/blah-1.0 | \
+              grep '<.*@.*>' | fgrep '@$uuid>' | wc -l\` -eq 6
+       "
+
+test_debug 'gitk --all &'
+
+test_done