remote-bzr: fix old organization destroy
[git] / t / lib-cvs.sh
1 #!/bin/sh
2
3 . ./test-lib.sh
4
5 unset CVS_SERVER
6
7 if ! type cvs >/dev/null 2>&1
8 then
9         skip_all='skipping cvsimport tests, cvs not found'
10         test_done
11 fi
12
13 CVS="cvs -f"
14 export CVS
15
16 cvsps_version=`cvsps -h 2>&1 | sed -ne 's/cvsps version //p'`
17 case "$cvsps_version" in
18 2.1 | 2.2*)
19         ;;
20 '')
21         skip_all='skipping cvsimport tests, cvsps not found'
22         test_done
23         ;;
24 *)
25         skip_all='skipping cvsimport tests, unsupported cvsps version'
26         test_done
27         ;;
28 esac
29
30 setup_cvs_test_repository () {
31         CVSROOT="$(pwd)/.cvsroot" &&
32         cp -r "$TEST_DIRECTORY/$1/cvsroot" "$CVSROOT" &&
33         export CVSROOT
34 }
35
36 test_cvs_co () {
37         # Usage: test_cvs_co BRANCH_NAME
38         rm -rf module-cvs-"$1"
39         if [ "$1" = "master" ]
40         then
41                 $CVS co -P -d module-cvs-"$1" -A module
42         else
43                 $CVS co -P -d module-cvs-"$1" -r "$1" module
44         fi
45 }
46
47 test_git_co () {
48         # Usage: test_git_co BRANCH_NAME
49         (cd module-git && git checkout "$1")
50 }
51
52 test_cmp_branch_file () {
53         # Usage: test_cmp_branch_file BRANCH_NAME PATH
54         # The branch must already be checked out of CVS and git.
55         test_cmp module-cvs-"$1"/"$2" module-git/"$2"
56 }
57
58 test_cmp_branch_tree () {
59         # Usage: test_cmp_branch_tree BRANCH_NAME
60         # Check BRANCH_NAME out of CVS and git and make sure that all
61         # of the files and directories are identical.
62
63         test_cvs_co "$1" &&
64         test_git_co "$1" &&
65         (
66                 cd module-cvs-"$1"
67                 find . -type d -name CVS -prune -o -type f -print
68         ) | sort >module-cvs-"$1".list &&
69         (
70                 cd module-git
71                 find . -type d -name .git -prune -o -type f -print
72         ) | sort >module-git-"$1".list &&
73         test_cmp module-cvs-"$1".list module-git-"$1".list &&
74         cat module-cvs-"$1".list | while read f
75         do
76                 test_cmp_branch_file "$1" "$f" || return 1
77         done
78 }