Merge git://ozlabs.org/~paulus/gitk
[git] / t / t0060-path-utils.sh
1 #!/bin/sh
2 #
3 # Copyright (c) 2008 David Reiss
4 #
5
6 test_description='Test various path utilities'
7
8 . ./test-lib.sh
9
10 norm_path() {
11         expected=$(test-path-utils print_path "$2")
12         test_expect_success $3 "normalize path: $1 => $2" \
13         "test \"\$(test-path-utils normalize_path_copy '$1')\" = '$expected'"
14 }
15
16 relative_path() {
17         expected=$(test-path-utils print_path "$3")
18         test_expect_success $4 "relative path: $1 $2 => $3" \
19         "test \"\$(test-path-utils relative_path '$1' '$2')\" = '$expected'"
20 }
21
22 # On Windows, we are using MSYS's bash, which mangles the paths.
23 # Absolute paths are anchored at the MSYS installation directory,
24 # which means that the path / accounts for this many characters:
25 rootoff=$(test-path-utils normalize_path_copy / | wc -c)
26 # Account for the trailing LF:
27 if test $rootoff = 2; then
28         rootoff=        # we are on Unix
29 else
30         rootoff=$(($rootoff-1))
31 fi
32
33 ancestor() {
34         # We do some math with the expected ancestor length.
35         expected=$3
36         if test -n "$rootoff" && test "x$expected" != x-1; then
37                 expected=$(($expected+$rootoff))
38         fi
39         test_expect_success "longest ancestor: $1 $2 => $expected" \
40         "actual=\$(test-path-utils longest_ancestor_length '$1' '$2') &&
41          test \"\$actual\" = '$expected'"
42 }
43
44 # Some absolute path tests should be skipped on Windows due to path mangling
45 # on POSIX-style absolute paths
46 case $(uname -s) in
47 *MINGW*)
48         ;;
49 *)
50         test_set_prereq POSIX
51         ;;
52 esac
53
54 norm_path "" ""
55 norm_path . ""
56 norm_path ./ ""
57 norm_path ./. ""
58 norm_path ./.. ++failed++
59 norm_path ../. ++failed++
60 norm_path ./../.// ++failed++
61 norm_path dir/.. ""
62 norm_path dir/sub/../.. ""
63 norm_path dir/sub/../../.. ++failed++
64 norm_path dir dir
65 norm_path dir// dir/
66 norm_path ./dir dir
67 norm_path dir/. dir/
68 norm_path dir///./ dir/
69 norm_path dir//sub/.. dir/
70 norm_path dir/sub/../ dir/
71 norm_path dir/sub/../. dir/
72 norm_path dir/s1/../s2/ dir/s2/
73 norm_path d1/s1///s2/..//../s3/ d1/s3/
74 norm_path d1/s1//../s2/../../d2 d2
75 norm_path d1/.../d2 d1/.../d2
76 norm_path d1/..././../d2 d1/d2
77
78 norm_path / /
79 norm_path // / POSIX
80 norm_path /// / POSIX
81 norm_path /. /
82 norm_path /./ / POSIX
83 norm_path /./.. ++failed++ POSIX
84 norm_path /../. ++failed++
85 norm_path /./../.// ++failed++ POSIX
86 norm_path /dir/.. / POSIX
87 norm_path /dir/sub/../.. / POSIX
88 norm_path /dir/sub/../../.. ++failed++ POSIX
89 norm_path /dir /dir
90 norm_path /dir// /dir/
91 norm_path /./dir /dir
92 norm_path /dir/. /dir/
93 norm_path /dir///./ /dir/
94 norm_path /dir//sub/.. /dir/
95 norm_path /dir/sub/../ /dir/
96 norm_path //dir/sub/../. /dir/ POSIX
97 norm_path /dir/s1/../s2/ /dir/s2/
98 norm_path /d1/s1///s2/..//../s3/ /d1/s3/
99 norm_path /d1/s1//../s2/../../d2 /d2
100 norm_path /d1/.../d2 /d1/.../d2
101 norm_path /d1/..././../d2 /d1/d2
102
103 ancestor / / -1
104 ancestor /foo / 0
105 ancestor /foo /fo -1
106 ancestor /foo /foo -1
107 ancestor /foo /bar -1
108 ancestor /foo /foo/bar -1
109 ancestor /foo /foo:/bar -1
110 ancestor /foo /:/foo:/bar 0
111 ancestor /foo /foo:/:/bar 0
112 ancestor /foo /:/bar:/foo 0
113 ancestor /foo/bar / 0
114 ancestor /foo/bar /fo -1
115 ancestor /foo/bar /foo 4
116 ancestor /foo/bar /foo/ba -1
117 ancestor /foo/bar /:/fo 0
118 ancestor /foo/bar /foo:/foo/ba 4
119 ancestor /foo/bar /bar -1
120 ancestor /foo/bar /fo -1
121 ancestor /foo/bar /foo:/bar 4
122 ancestor /foo/bar /:/foo:/bar 4
123 ancestor /foo/bar /foo:/:/bar 4
124 ancestor /foo/bar /:/bar:/fo 0
125 ancestor /foo/bar /:/bar 0
126 ancestor /foo/bar /foo 4
127 ancestor /foo/bar /foo:/bar 4
128 ancestor /foo/bar /bar -1
129
130 test_expect_success 'strip_path_suffix' '
131         test c:/msysgit = $(test-path-utils strip_path_suffix \
132                 c:/msysgit/libexec//git-core libexec/git-core)
133 '
134
135 test_expect_success 'absolute path rejects the empty string' '
136         test_must_fail test-path-utils absolute_path ""
137 '
138
139 test_expect_success 'real path rejects the empty string' '
140         test_must_fail test-path-utils real_path ""
141 '
142
143 test_expect_success POSIX 'real path works on absolute paths 1' '
144         nopath="hopefully-absent-path" &&
145         test "/" = "$(test-path-utils real_path "/")" &&
146         test "/$nopath" = "$(test-path-utils real_path "/$nopath")"
147 '
148
149 test_expect_success 'real path works on absolute paths 2' '
150         nopath="hopefully-absent-path" &&
151         # Find an existing top-level directory for the remaining tests:
152         d=$(pwd -P | sed -e "s|^\([^/]*/[^/]*\)/.*|\1|") &&
153         test "$d" = "$(test-path-utils real_path "$d")" &&
154         test "$d/$nopath" = "$(test-path-utils real_path "$d/$nopath")"
155 '
156
157 test_expect_success POSIX 'real path removes extra leading slashes' '
158         nopath="hopefully-absent-path" &&
159         test "/" = "$(test-path-utils real_path "///")" &&
160         test "/$nopath" = "$(test-path-utils real_path "///$nopath")" &&
161         # Find an existing top-level directory for the remaining tests:
162         d=$(pwd -P | sed -e "s|^\([^/]*/[^/]*\)/.*|\1|") &&
163         test "$d" = "$(test-path-utils real_path "//$d")" &&
164         test "$d/$nopath" = "$(test-path-utils real_path "//$d/$nopath")"
165 '
166
167 test_expect_success 'real path removes other extra slashes' '
168         nopath="hopefully-absent-path" &&
169         # Find an existing top-level directory for the remaining tests:
170         d=$(pwd -P | sed -e "s|^\([^/]*/[^/]*\)/.*|\1|") &&
171         test "$d" = "$(test-path-utils real_path "$d///")" &&
172         test "$d/$nopath" = "$(test-path-utils real_path "$d///$nopath")"
173 '
174
175 test_expect_success SYMLINKS 'real path works on symlinks' '
176         mkdir first &&
177         ln -s ../.git first/.git &&
178         mkdir second &&
179         ln -s ../first second/other &&
180         mkdir third &&
181         dir="$(cd .git; pwd -P)" &&
182         dir2=third/../second/other/.git &&
183         test "$dir" = "$(test-path-utils real_path $dir2)" &&
184         file="$dir"/index &&
185         test "$file" = "$(test-path-utils real_path $dir2/index)" &&
186         basename=blub &&
187         test "$dir/$basename" = "$(cd .git && test-path-utils real_path "$basename")" &&
188         ln -s ../first/file .git/syml &&
189         sym="$(cd first; pwd -P)"/file &&
190         test "$sym" = "$(test-path-utils real_path "$dir2/syml")"
191 '
192
193 test_expect_success SYMLINKS 'prefix_path works with absolute paths to work tree symlinks' '
194         ln -s target symlink &&
195         test "$(test-path-utils prefix_path prefix "$(pwd)/symlink")" = "symlink"
196 '
197
198 test_expect_success 'prefix_path works with only absolute path to work tree' '
199         echo "" >expected &&
200         test-path-utils prefix_path prefix "$(pwd)" >actual &&
201         test_cmp expected actual
202 '
203
204 test_expect_success 'prefix_path rejects absolute path to dir with same beginning as work tree' '
205         test_must_fail test-path-utils prefix_path prefix "$(pwd)a"
206 '
207
208 test_expect_success SYMLINKS 'prefix_path works with absolute path to a symlink to work tree having  same beginning as work tree' '
209         git init repo &&
210         ln -s repo repolink &&
211         test "a" = "$(cd repo && test-path-utils prefix_path prefix "$(pwd)/../repolink/a")"
212 '
213
214 relative_path /foo/a/b/c/       /foo/a/b/       c/
215 relative_path /foo/a/b/c/       /foo/a/b        c/
216 relative_path /foo/a//b//c/     ///foo/a/b//    c/              POSIX
217 relative_path /foo/a/b          /foo/a/b        ./
218 relative_path /foo/a/b/         /foo/a/b        ./
219 relative_path /foo/a            /foo/a/b        ../
220 relative_path /                 /foo/a/b/       ../../../
221 relative_path /foo/a/c          /foo/a/b/       ../c
222 relative_path /foo/a/c          /foo/a/b        ../c
223 relative_path /foo/x/y          /foo/a/b/       ../../x/y
224 relative_path /foo/a/b          "<empty>"       /foo/a/b
225 relative_path /foo/a/b          "<null>"        /foo/a/b
226 relative_path foo/a/b/c/        foo/a/b/        c/
227 relative_path foo/a/b/c/        foo/a/b         c/
228 relative_path foo/a/b//c        foo/a//b        c
229 relative_path foo/a/b/          foo/a/b/        ./
230 relative_path foo/a/b/          foo/a/b         ./
231 relative_path foo/a             foo/a/b         ../
232 relative_path foo/x/y           foo/a/b         ../../x/y
233 relative_path foo/a/c           foo/a/b         ../c
234 relative_path foo/a/b           /foo/x/y        foo/a/b
235 relative_path /foo/a/b          foo/x/y         /foo/a/b
236 relative_path d:/a/b            D:/a/c          ../b            MINGW
237 relative_path C:/a/b            D:/a/c          C:/a/b          MINGW
238 relative_path foo/a/b           "<empty>"       foo/a/b
239 relative_path foo/a/b           "<null>"        foo/a/b
240 relative_path "<empty>"         /foo/a/b        ./
241 relative_path "<empty>"         "<empty>"       ./
242 relative_path "<empty>"         "<null>"        ./
243 relative_path "<null>"          "<empty>"       ./
244 relative_path "<null>"          "<null>"        ./
245 relative_path "<null>"          /foo/a/b        ./
246
247 test_done