]>
Commit | Line | Data |
---|---|---|
a00439ac EW |
1 | #!/bin/sh |
2 | # | |
3 | # Copyright (c) 2006 Eric Wong | |
4 | # | |
5 | ||
0bed5eaa | 6 | test_description='git-svn fetching' |
a00439ac EW |
7 | . ./lib-git-svn.sh |
8 | ||
a00439ac EW |
9 | test_expect_success 'initialize repo' " |
10 | mkdir import && | |
11 | cd import && | |
12 | mkdir -p trunk && | |
13 | echo hello > trunk/readme && | |
14 | svn import -m 'initial' . $svnrepo && | |
15 | cd .. && | |
16 | svn co $svnrepo wc && | |
17 | cd wc && | |
18 | echo world >> trunk/readme && | |
7b3fab87 | 19 | poke trunk/readme && |
a00439ac | 20 | svn commit -m 'another commit' && |
e66191f4 | 21 | svn up && |
a00439ac EW |
22 | svn mv -m 'rename to thunk' trunk thunk && |
23 | svn up && | |
24 | echo goodbye >> thunk/readme && | |
7b3fab87 | 25 | poke thunk/readme && |
a00439ac EW |
26 | svn commit -m 'bye now' && |
27 | cd .. | |
28 | " | |
29 | ||
0bed5eaa | 30 | test_expect_success 'init and fetch a moved directory' " |
a00439ac | 31 | git-svn init -i thunk $svnrepo/thunk && |
0bed5eaa | 32 | git-svn fetch -i thunk && |
ce2a0f2f | 33 | test \"\`git-rev-parse --verify refs/remotes/thunk@2\`\" \ |
15710b6f EW |
34 | = \"\`git-rev-parse --verify refs/remotes/thunk~1\`\" && |
35 | test \"\`git-cat-file blob refs/remotes/thunk:readme |\ | |
ce2a0f2f | 36 | sed -n -e '3p'\`\" = goodbye && |
9fa00b65 | 37 | test -z \"\`git-config --get svn-remote.svn.fetch \ |
ce2a0f2f | 38 | '^trunk:refs/remotes/thunk@2$'\`\" |
a00439ac EW |
39 | " |
40 | ||
8b8fc068 | 41 | test_expect_success 'init and fetch from one svn-remote' " |
9fa00b65 EW |
42 | git-repo-config svn-remote.svn.url $svnrepo && |
43 | git-repo-config --add svn-remote.svn.fetch \ | |
8b8fc068 | 44 | trunk:refs/remotes/svn/trunk && |
9fa00b65 | 45 | git-repo-config --add svn-remote.svn.fetch \ |
8b8fc068 | 46 | thunk:refs/remotes/svn/thunk && |
0bed5eaa | 47 | git-svn fetch -i svn/thunk && |
8b8fc068 EW |
48 | test \"\`git-rev-parse --verify refs/remotes/svn/trunk\`\" \ |
49 | = \"\`git-rev-parse --verify refs/remotes/svn/thunk~1\`\" && | |
50 | test \"\`git-cat-file blob refs/remotes/svn/thunk:readme |\ | |
51 | sed -n -e '3p'\`\" = goodbye | |
52 | " | |
53 | ||
a2003abc EW |
54 | test_expect_success 'follow deleted parent' " |
55 | svn cp -m 'resurrecting trunk as junk' \ | |
56 | -r2 $svnrepo/trunk $svnrepo/junk && | |
9fa00b65 | 57 | git-repo-config --add svn-remote.svn.fetch \ |
a2003abc | 58 | junk:refs/remotes/svn/junk && |
0bed5eaa EW |
59 | git-svn fetch -i svn/thunk && |
60 | git-svn fetch -i svn/junk && | |
a2003abc EW |
61 | test -z \"\`git diff svn/junk svn/trunk\`\" && |
62 | test \"\`git merge-base svn/junk svn/trunk\`\" \ | |
63 | = \"\`git rev-parse svn/trunk\`\" | |
64 | " | |
65 | ||
7f578c55 EW |
66 | test_expect_success 'follow larger parent' " |
67 | mkdir -p import/trunk/thunk/bump/thud && | |
68 | echo hi > import/trunk/thunk/bump/thud/file && | |
69 | svn import -m 'import a larger parent' import $svnrepo/larger-parent && | |
70 | svn cp -m 'hi' $svnrepo/larger-parent $svnrepo/another-larger && | |
71 | git-svn init -i larger $svnrepo/another-larger/trunk/thunk/bump/thud && | |
0bed5eaa | 72 | git-svn fetch -i larger && |
7f578c55 EW |
73 | git-rev-parse --verify refs/remotes/larger && |
74 | git-rev-parse --verify \ | |
75 | refs/remotes/larger-parent/trunk/thunk/bump/thud && | |
76 | test \"\`git-merge-base \ | |
77 | refs/remotes/larger-parent/trunk/thunk/bump/thud \ | |
78 | refs/remotes/larger\`\" = \ | |
79 | \"\`git-rev-parse refs/remotes/larger\`\" | |
80 | true | |
81 | " | |
82 | ||
1492b424 EW |
83 | test_expect_success 'follow higher-level parent' " |
84 | svn mkdir -m 'follow higher-level parent' $svnrepo/blob && | |
85 | svn co $svnrepo/blob blob && | |
86 | cd blob && | |
87 | echo hi > hi && | |
88 | svn add hi && | |
e5a0b240 | 89 | svn commit -m 'hihi' && |
1492b424 EW |
90 | cd .. |
91 | svn mkdir -m 'new glob at top level' $svnrepo/glob && | |
92 | svn mv -m 'move blob down a level' $svnrepo/blob $svnrepo/glob/blob && | |
93 | git-svn init -i blob $svnrepo/glob/blob && | |
0bed5eaa | 94 | git-svn fetch -i blob |
1492b424 EW |
95 | " |
96 | ||
e5a0b240 | 97 | test_expect_success 'follow deleted directory' " |
8a603774 | 98 | svn mv -m 'bye!' $svnrepo/glob/blob/hi $svnrepo/glob/blob/bye && |
e5a0b240 EW |
99 | svn rm -m 'remove glob' $svnrepo/glob && |
100 | git-svn init -i glob $svnrepo/glob && | |
101 | git-svn fetch -i glob && | |
8a603774 EW |
102 | test \"\`git cat-file blob refs/remotes/glob:blob/bye\`\" = hi && |
103 | test \"\`git ls-tree refs/remotes/glob | wc -l \`\" -eq 1 | |
e5a0b240 EW |
104 | " |
105 | ||
2b27f6c8 EW |
106 | # ref: r9270 of the Subversion repository: (http://svn.collab.net/repos/svn) |
107 | # in trunk/subversion/bindings/swig/perl | |
28937057 | 108 | test_expect_success 'follow-parent avoids deleting relevant info' " |
2b27f6c8 EW |
109 | mkdir -p import/trunk/subversion/bindings/swig/perl/t && |
110 | for i in a b c ; do \ | |
111 | echo \$i > import/trunk/subversion/bindings/swig/perl/\$i.pm && | |
112 | echo _\$i > import/trunk/subversion/bindings/swig/perl/t/\$i.t; \ | |
113 | done && | |
114 | echo 'bad delete test' > \ | |
115 | import/trunk/subversion/bindings/swig/perl/t/larger-parent && | |
116 | echo 'bad delete test 2' > \ | |
117 | import/trunk/subversion/bindings/swig/perl/another-larger && | |
118 | cd import && | |
119 | svn import -m 'r9270 test' . $svnrepo/r9270 && | |
120 | cd .. && | |
121 | svn co $svnrepo/r9270/trunk/subversion/bindings/swig/perl r9270 && | |
122 | cd r9270 && | |
123 | svn mkdir native && | |
124 | svn mv t native/t && | |
125 | for i in a b c; do svn mv \$i.pm native/\$i.pm; done && | |
126 | echo z >> native/t/c.t && | |
127 | svn commit -m 'reorg test' && | |
128 | cd .. && | |
129 | git-svn init -i r9270-t \ | |
130 | $svnrepo/r9270/trunk/subversion/bindings/swig/perl/native/t && | |
0bed5eaa | 131 | git-svn fetch -i r9270-t && |
2b27f6c8 EW |
132 | test \`git rev-list r9270-t | wc -l\` -eq 2 && |
133 | test \"\`git ls-tree --name-only r9270-t~1\`\" = \ | |
134 | \"\`git ls-tree --name-only r9270-t\`\" | |
135 | " | |
136 | ||
28937057 EW |
137 | test_expect_success "track initial change if it was only made to parent" " |
138 | svn cp -m 'wheee!' $svnrepo/r9270/trunk $svnrepo/r9270/drunk && | |
139 | git-svn init -i r9270-d \ | |
140 | $svnrepo/r9270/drunk/subversion/bindings/swig/perl/native/t && | |
0bed5eaa | 141 | git-svn fetch -i r9270-d && |
28937057 EW |
142 | test \`git rev-list r9270-d | wc -l\` -eq 3 && |
143 | test \"\`git ls-tree --name-only r9270-t\`\" = \ | |
144 | \"\`git ls-tree --name-only r9270-d\`\" && | |
145 | test \"\`git rev-parse r9270-t\`\" = \ | |
146 | \"\`git rev-parse r9270-d~1\`\" | |
147 | " | |
148 | ||
b9dffd8c EW |
149 | test_expect_success "track multi-parent paths" " |
150 | svn cp -m 'resurrect /glob' $svnrepo/r9270 $svnrepo/glob && | |
0bed5eaa | 151 | git-svn multi-fetch && |
b9dffd8c EW |
152 | test \`git cat-file commit refs/remotes/glob | \ |
153 | grep '^parent ' | wc -l\` -eq 2 | |
154 | " | |
155 | ||
8a603774 | 156 | test_expect_success "multi-fetch continues to work" " |
0bed5eaa | 157 | git-svn multi-fetch |
8a603774 EW |
158 | " |
159 | ||
160 | test_expect_success "multi-fetch works off a 'clean' repository" " | |
161 | rm -r $GIT_DIR/svn $GIT_DIR/refs/remotes $GIT_DIR/logs && | |
162 | mkdir $GIT_DIR/svn && | |
0bed5eaa | 163 | git-svn multi-fetch |
8a603774 EW |
164 | " |
165 | ||
a00439ac EW |
166 | test_debug 'gitk --all &' |
167 | ||
168 | test_done |