chiark / gitweb /
Apply https://sourceware.org/git/?p=glibc.git;a=commit;h=d5dd6189d506068ed11c8bfa1e1e...
[eglibc.git] / io / ftwtest-sh
1 #! /bin/sh
2
3 # The common objpfx, used to find libraries and the dynamic loader.
4 objpfx=$1
5
6 # The cross-testing wrapper.
7 cross_test_wrapper="$2"
8
9 # The environment-setting wrapper.
10 run_with_env="$3"
11
12 # We expect one parameter which is the test program.  This must understand
13 # a number options:
14 #   --phys              use the FTW_PHYS flag
15 #   --chdir             use the FTW_CHDIR and print the current directory
16 #                       in the callback
17 #   --depth             use the FTW_DEPTH flag
18 #   --early-exit        print file@2 item only and return non-zero from the
19 #                       callback when it is seen
20 testprogram=$4
21
22 # We cannot test this as root.
23 if test `id | sed "s/uid=\([0-9]*\).*/\1/"` = 0; then
24   exit 0
25 fi
26
27 # Since we use `sort' we must make sure to use the same locale everywhere.
28 LC_ALL=C
29 export LC_ALL
30 LANG=C
31 export LANG
32
33 # First create our scenario:
34 tmp=`echo ${TMPDIR:-/tmp} | sed 's|\(.\)/*$|\1|'`
35 tmpdir=$tmp/ftwtest.d
36
37 [ -f ${objpfx}elf/ld.so ] && ldso=${objpfx}elf/ld.so
38 ldso="${cross_test_wrapper:+$cross_test_wrapper }$run_with_env $ldso"
39
40 trap 'chmod -fR a+x $tmpdir; rm -fr $tmpdir $testout' 1 2 3 15
41
42 if test -d $tmpdir; then
43   chmod -fR a+x $tmpdir
44   rm -fr $tmpdir
45 fi
46 mkdir $tmpdir
47 mkdir $tmpdir/foo
48 mkdir $tmpdir/bar
49 echo > $tmpdir/baz
50 mkdir $tmpdir/foo/lvl1
51 echo > $tmpdir/foo/lvl1/file@1
52 mkdir $tmpdir/foo/lvl1/lvl2
53 echo > $tmpdir/foo/lvl1/lvl2/file@2
54 mkdir $tmpdir/foo/lvl1/lvl2/lvl3
55 echo > $tmpdir/foo/lvl1/lvl2/lvl3/file@3
56 ln -s $tmpdir $tmpdir/foo/lvl1/lvl2/lvl3/link@3
57 ln -s $tmpdir/foo/lvl1/lvl2 $tmpdir/foo/lvl1/lvl2/link@2
58 ln -s $tmpdir/foo/lvl1/lvl2/lvl3/lvl4 $tmpdir/foo/lvl1/link@1
59 echo > $tmpdir/bar/xo
60 chmod a-x,a+r $tmpdir/bar
61
62 testout=${TMPDIR:-/tmp}/ftwtest.out
63
64 EGLIBC_TEST_LD_LIBRARY_PATH=$objpfx $ldso $testprogram $tmpdir |
65     sort > $testout
66
67 cat <<EOF | cmp $testout - || exit 1
68 base = "$tmp/", file = "ftwtest.d", flag = FTW_D, level = 0
69 base = "$tmp/ftwtest.d/", file = "bar", flag = FTW_D, level = 1
70 base = "$tmp/ftwtest.d/", file = "baz", flag = FTW_F, level = 1
71 base = "$tmp/ftwtest.d/", file = "foo", flag = FTW_D, level = 1
72 base = "$tmp/ftwtest.d/bar/", file = "xo", flag = FTW_NS, level = 2
73 base = "$tmp/ftwtest.d/foo/", file = "lvl1", flag = FTW_D, level = 2
74 base = "$tmp/ftwtest.d/foo/lvl1/", file = "file@1", flag = FTW_F, level = 3
75 base = "$tmp/ftwtest.d/foo/lvl1/", file = "link@1", flag = FTW_SLN, level = 3
76 base = "$tmp/ftwtest.d/foo/lvl1/", file = "lvl2", flag = FTW_D, level = 3
77 base = "$tmp/ftwtest.d/foo/lvl1/lvl2/", file = "file@2", flag = FTW_F, level = 4
78 base = "$tmp/ftwtest.d/foo/lvl1/lvl2/", file = "lvl3", flag = FTW_D, level = 4
79 base = "$tmp/ftwtest.d/foo/lvl1/lvl2/lvl3/", file = "file@3", flag = FTW_F, level = 5
80 EOF
81 rm $testout
82
83 EGLIBC_TEST_LD_LIBRARY_PATH=$objpfx $ldso $testprogram --depth $tmpdir |
84     sort > $testout
85
86 cat <<EOF | cmp $testout - || exit 1
87 base = "$tmp/", file = "ftwtest.d", flag = FTW_DP, level = 0
88 base = "$tmp/ftwtest.d/", file = "bar", flag = FTW_DP, level = 1
89 base = "$tmp/ftwtest.d/", file = "baz", flag = FTW_F, level = 1
90 base = "$tmp/ftwtest.d/", file = "foo", flag = FTW_DP, level = 1
91 base = "$tmp/ftwtest.d/bar/", file = "xo", flag = FTW_NS, level = 2
92 base = "$tmp/ftwtest.d/foo/", file = "lvl1", flag = FTW_DP, level = 2
93 base = "$tmp/ftwtest.d/foo/lvl1/", file = "file@1", flag = FTW_F, level = 3
94 base = "$tmp/ftwtest.d/foo/lvl1/", file = "link@1", flag = FTW_SLN, level = 3
95 base = "$tmp/ftwtest.d/foo/lvl1/", file = "lvl2", flag = FTW_DP, level = 3
96 base = "$tmp/ftwtest.d/foo/lvl1/lvl2/", file = "file@2", flag = FTW_F, level = 4
97 base = "$tmp/ftwtest.d/foo/lvl1/lvl2/", file = "lvl3", flag = FTW_DP, level = 4
98 base = "$tmp/ftwtest.d/foo/lvl1/lvl2/lvl3/", file = "file@3", flag = FTW_F, level = 5
99 EOF
100 rm $testout
101
102 EGLIBC_TEST_LD_LIBRARY_PATH=$objpfx $ldso $testprogram --phys $tmpdir |
103     sort > $testout
104
105 cat <<EOF | cmp $testout - || exit 1
106 base = "$tmp/", file = "ftwtest.d", flag = FTW_D, level = 0
107 base = "$tmp/ftwtest.d/", file = "bar", flag = FTW_D, level = 1
108 base = "$tmp/ftwtest.d/", file = "baz", flag = FTW_F, level = 1
109 base = "$tmp/ftwtest.d/", file = "foo", flag = FTW_D, level = 1
110 base = "$tmp/ftwtest.d/bar/", file = "xo", flag = FTW_NS, level = 2
111 base = "$tmp/ftwtest.d/foo/", file = "lvl1", flag = FTW_D, level = 2
112 base = "$tmp/ftwtest.d/foo/lvl1/", file = "file@1", flag = FTW_F, level = 3
113 base = "$tmp/ftwtest.d/foo/lvl1/", file = "link@1", flag = FTW_SL, level = 3
114 base = "$tmp/ftwtest.d/foo/lvl1/", file = "lvl2", flag = FTW_D, level = 3
115 base = "$tmp/ftwtest.d/foo/lvl1/lvl2/", file = "file@2", flag = FTW_F, level = 4
116 base = "$tmp/ftwtest.d/foo/lvl1/lvl2/", file = "link@2", flag = FTW_SL, level = 4
117 base = "$tmp/ftwtest.d/foo/lvl1/lvl2/", file = "lvl3", flag = FTW_D, level = 4
118 base = "$tmp/ftwtest.d/foo/lvl1/lvl2/lvl3/", file = "file@3", flag = FTW_F, level = 5
119 base = "$tmp/ftwtest.d/foo/lvl1/lvl2/lvl3/", file = "link@3", flag = FTW_SL, level = 5
120 EOF
121 rm $testout
122
123 # For the next test everything must be readable.
124 chmod -fR a+x $tmpdir
125
126 EGLIBC_TEST_LD_LIBRARY_PATH=$objpfx $ldso $testprogram --chdir $tmpdir |
127     sort > $testout
128
129 # perhaps $tmp involves some symlinks...
130 tmpreal=`cd $tmp; /bin/pwd 2>/dev/null || /usr/bin/pwd`
131
132 cat <<EOF | cmp $testout - || exit 1
133 base = "$tmp/", file = "ftwtest.d", flag = FTW_D, cwd = $tmpreal, level = 0
134 base = "$tmp/ftwtest.d/", file = "bar", flag = FTW_D, cwd = $tmpreal/ftwtest.d, level = 1
135 base = "$tmp/ftwtest.d/", file = "baz", flag = FTW_F, cwd = $tmpreal/ftwtest.d, level = 1
136 base = "$tmp/ftwtest.d/", file = "foo", flag = FTW_D, cwd = $tmpreal/ftwtest.d, level = 1
137 base = "$tmp/ftwtest.d/bar/", file = "xo", flag = FTW_F, cwd = $tmpreal/ftwtest.d/bar, level = 2
138 base = "$tmp/ftwtest.d/foo/", file = "lvl1", flag = FTW_D, cwd = $tmpreal/ftwtest.d/foo, level = 2
139 base = "$tmp/ftwtest.d/foo/lvl1/", file = "file@1", flag = FTW_F, cwd = $tmpreal/ftwtest.d/foo/lvl1, level = 3
140 base = "$tmp/ftwtest.d/foo/lvl1/", file = "link@1", flag = FTW_SLN, cwd = $tmpreal/ftwtest.d/foo/lvl1, level = 3
141 base = "$tmp/ftwtest.d/foo/lvl1/", file = "lvl2", flag = FTW_D, cwd = $tmpreal/ftwtest.d/foo/lvl1, level = 3
142 base = "$tmp/ftwtest.d/foo/lvl1/lvl2/", file = "file@2", flag = FTW_F, cwd = $tmpreal/ftwtest.d/foo/lvl1/lvl2, level = 4
143 base = "$tmp/ftwtest.d/foo/lvl1/lvl2/", file = "lvl3", flag = FTW_D, cwd = $tmpreal/ftwtest.d/foo/lvl1/lvl2, level = 4
144 base = "$tmp/ftwtest.d/foo/lvl1/lvl2/lvl3/", file = "file@3", flag = FTW_F, cwd = $tmpreal/ftwtest.d/foo/lvl1/lvl2/lvl3, level = 5
145 EOF
146 rm $testout
147
148 curwd=`/bin/pwd 2>/dev/null || /usr/bin/pwd`
149 cd "$tmp"
150 EGLIBC_TEST_LD_LIBRARY_PATH=$objpfx $ldso $testprogram --chdir ftwtest.d |
151     sort > $testout
152 cd "$curwd"
153
154 cat <<EOF | diff -u $testout - || exit 1
155 base = "", file = "ftwtest.d", flag = FTW_D, cwd = $tmpreal, level = 0
156 base = "ftwtest.d/", file = "bar", flag = FTW_D, cwd = $tmpreal/ftwtest.d, level = 1
157 base = "ftwtest.d/", file = "baz", flag = FTW_F, cwd = $tmpreal/ftwtest.d, level = 1
158 base = "ftwtest.d/", file = "foo", flag = FTW_D, cwd = $tmpreal/ftwtest.d, level = 1
159 base = "ftwtest.d/bar/", file = "xo", flag = FTW_F, cwd = $tmpreal/ftwtest.d/bar, level = 2
160 base = "ftwtest.d/foo/", file = "lvl1", flag = FTW_D, cwd = $tmpreal/ftwtest.d/foo, level = 2
161 base = "ftwtest.d/foo/lvl1/", file = "file@1", flag = FTW_F, cwd = $tmpreal/ftwtest.d/foo/lvl1, level = 3
162 base = "ftwtest.d/foo/lvl1/", file = "link@1", flag = FTW_SLN, cwd = $tmpreal/ftwtest.d/foo/lvl1, level = 3
163 base = "ftwtest.d/foo/lvl1/", file = "lvl2", flag = FTW_D, cwd = $tmpreal/ftwtest.d/foo/lvl1, level = 3
164 base = "ftwtest.d/foo/lvl1/lvl2/", file = "file@2", flag = FTW_F, cwd = $tmpreal/ftwtest.d/foo/lvl1/lvl2, level = 4
165 base = "ftwtest.d/foo/lvl1/lvl2/", file = "lvl3", flag = FTW_D, cwd = $tmpreal/ftwtest.d/foo/lvl1/lvl2, level = 4
166 base = "ftwtest.d/foo/lvl1/lvl2/lvl3/", file = "file@3", flag = FTW_F, cwd = $tmpreal/ftwtest.d/foo/lvl1/lvl2/lvl3, level = 5
167 EOF
168 rm $testout
169
170 curwd=`/bin/pwd 2>/dev/null || /usr/bin/pwd`
171 cd "$tmp"
172 EGLIBC_TEST_LD_LIBRARY_PATH=$objpfx $ldso $testprogram --chdir ftwtest.d/. |
173     sort > $testout
174 cd "$curwd"
175
176 cat <<EOF | diff -u $testout - || exit 1
177 base = "ftwtest.d/", file = ".", flag = FTW_D, cwd = $tmpreal/ftwtest.d, level = 0
178 base = "ftwtest.d/./", file = "bar", flag = FTW_D, cwd = $tmpreal/ftwtest.d, level = 1
179 base = "ftwtest.d/./", file = "baz", flag = FTW_F, cwd = $tmpreal/ftwtest.d, level = 1
180 base = "ftwtest.d/./", file = "foo", flag = FTW_D, cwd = $tmpreal/ftwtest.d, level = 1
181 base = "ftwtest.d/./bar/", file = "xo", flag = FTW_F, cwd = $tmpreal/ftwtest.d/bar, level = 2
182 base = "ftwtest.d/./foo/", file = "lvl1", flag = FTW_D, cwd = $tmpreal/ftwtest.d/foo, level = 2
183 base = "ftwtest.d/./foo/lvl1/", file = "file@1", flag = FTW_F, cwd = $tmpreal/ftwtest.d/foo/lvl1, level = 3
184 base = "ftwtest.d/./foo/lvl1/", file = "link@1", flag = FTW_SLN, cwd = $tmpreal/ftwtest.d/foo/lvl1, level = 3
185 base = "ftwtest.d/./foo/lvl1/", file = "lvl2", flag = FTW_D, cwd = $tmpreal/ftwtest.d/foo/lvl1, level = 3
186 base = "ftwtest.d/./foo/lvl1/lvl2/", file = "file@2", flag = FTW_F, cwd = $tmpreal/ftwtest.d/foo/lvl1/lvl2, level = 4
187 base = "ftwtest.d/./foo/lvl1/lvl2/", file = "lvl3", flag = FTW_D, cwd = $tmpreal/ftwtest.d/foo/lvl1/lvl2, level = 4
188 base = "ftwtest.d/./foo/lvl1/lvl2/lvl3/", file = "file@3", flag = FTW_F, cwd = $tmpreal/ftwtest.d/foo/lvl1/lvl2/lvl3, level = 5
189 EOF
190 rm $testout
191
192 curwd=`/bin/pwd 2>/dev/null || /usr/bin/pwd`
193 cd "$tmp"
194 EGLIBC_TEST_LD_LIBRARY_PATH=$objpfx $ldso $testprogram --chdir ftwtest.d/foo/lvl1/link@1 |
195     sort > $testout
196 cd "$curwd"
197
198 cat <<EOF | diff -u $testout - || exit 1
199 base = "ftwtest.d/foo/lvl1/", file = "link@1", flag = FTW_SLN, cwd = $tmpreal/ftwtest.d/foo/lvl1, level = 0
200 EOF
201 rm $testout
202
203 EGLIBC_TEST_LD_LIBRARY_PATH=$objpfx $ldso $testprogram --early-exit $tmpdir |
204     sort > $testout
205
206 cat <<EOF | cmp $testout - || exit 1
207 base = "$tmp/ftwtest.d/foo/lvl1/lvl2/", file = "file@2", flag = FTW_F, level = 4
208 succeeded
209 EOF
210 rm $testout
211
212 mkdir $tmpdir/foo/lvl1b
213 echo > $tmpdir/foo/lvl1b/file@1b
214 echo > $tmpdir/foo/lvl1b/file2@1b
215 echo > $tmpdir/foo/lvl1b/file3@1b
216
217 EGLIBC_TEST_LD_LIBRARY_PATH=$objpfx $ldso $testprogram --skip-subtree=lvl1 $tmpdir |
218     sort > $testout
219
220 cat <<EOF | diff -u $testout - || exit 1
221 base = "$tmp/", file = "ftwtest.d", flag = FTW_D, level = 0
222 base = "$tmp/ftwtest.d/", file = "bar", flag = FTW_D, level = 1
223 base = "$tmp/ftwtest.d/", file = "baz", flag = FTW_F, level = 1
224 base = "$tmp/ftwtest.d/", file = "foo", flag = FTW_D, level = 1
225 base = "$tmp/ftwtest.d/bar/", file = "xo", flag = FTW_F, level = 2
226 base = "$tmp/ftwtest.d/foo/", file = "lvl1", flag = FTW_D, level = 2
227 base = "$tmp/ftwtest.d/foo/", file = "lvl1b", flag = FTW_D, level = 2
228 base = "$tmp/ftwtest.d/foo/lvl1b/", file = "file2@1b", flag = FTW_F, level = 3
229 base = "$tmp/ftwtest.d/foo/lvl1b/", file = "file3@1b", flag = FTW_F, level = 3
230 base = "$tmp/ftwtest.d/foo/lvl1b/", file = "file@1b", flag = FTW_F, level = 3
231 EOF
232 rm $testout
233
234 EGLIBC_TEST_LD_LIBRARY_PATH=$objpfx $ldso $testprogram --skip-siblings=lvl1 $tmpdir |
235     sort > $testout
236
237 # The filesystem is not required to put lvl1 before lvl1b.
238 # If lvl1b comes after lvl1, it shouldn't be printed, while if it
239 # comes before, it should.
240 catcmd=cat
241 [ -n "`ls -U $tmpdir/foo/ | sed -n '/lvl1$/,${/lvl1b$/p;}'`" ] \
242   && catcmd="grep -v lvl1b"
243
244 $catcmd <<EOF | diff -u $testout - || exit 1
245 base = "$tmp/", file = "ftwtest.d", flag = FTW_D, level = 0
246 base = "$tmp/ftwtest.d/", file = "bar", flag = FTW_D, level = 1
247 base = "$tmp/ftwtest.d/", file = "baz", flag = FTW_F, level = 1
248 base = "$tmp/ftwtest.d/", file = "foo", flag = FTW_D, level = 1
249 base = "$tmp/ftwtest.d/bar/", file = "xo", flag = FTW_F, level = 2
250 base = "$tmp/ftwtest.d/foo/", file = "lvl1", flag = FTW_D, level = 2
251 base = "$tmp/ftwtest.d/foo/", file = "lvl1b", flag = FTW_D, level = 2
252 base = "$tmp/ftwtest.d/foo/lvl1b/", file = "file2@1b", flag = FTW_F, level = 3
253 base = "$tmp/ftwtest.d/foo/lvl1b/", file = "file3@1b", flag = FTW_F, level = 3
254 base = "$tmp/ftwtest.d/foo/lvl1b/", file = "file@1b", flag = FTW_F, level = 3
255 EOF
256 rm $testout
257
258 EGLIBC_TEST_LD_LIBRARY_PATH=$objpfx $ldso $testprogram --skip-siblings=file@1b $tmpdir |
259     sort > $testout
260
261 # The filesystem is not required to put file2@1b and file3@1b after file@1b.
262 # If file[23]@1b come after file@1b, it shouldn't be printed, while if they
263 # come before, they should.
264 regexp=`echo $(ls -U $tmp/ftwtest.d/foo/lvl1b \
265                | sed -n '/file@1b$/,${/file[23]@1b$/p;}') | sed 's, ,|,'`
266 catcmd=cat
267 [ -n "$regexp" ] && catcmd="egrep -v $regexp"
268
269 $catcmd <<EOF | diff -u $testout - || exit 1
270 base = "$tmp/", file = "ftwtest.d", flag = FTW_D, level = 0
271 base = "$tmp/ftwtest.d/", file = "bar", flag = FTW_D, level = 1
272 base = "$tmp/ftwtest.d/", file = "baz", flag = FTW_F, level = 1
273 base = "$tmp/ftwtest.d/", file = "foo", flag = FTW_D, level = 1
274 base = "$tmp/ftwtest.d/bar/", file = "xo", flag = FTW_F, level = 2
275 base = "$tmp/ftwtest.d/foo/", file = "lvl1", flag = FTW_D, level = 2
276 base = "$tmp/ftwtest.d/foo/", file = "lvl1b", flag = FTW_D, level = 2
277 base = "$tmp/ftwtest.d/foo/lvl1/", file = "file@1", flag = FTW_F, level = 3
278 base = "$tmp/ftwtest.d/foo/lvl1/", file = "link@1", flag = FTW_SLN, level = 3
279 base = "$tmp/ftwtest.d/foo/lvl1/", file = "lvl2", flag = FTW_D, level = 3
280 base = "$tmp/ftwtest.d/foo/lvl1/lvl2/", file = "file@2", flag = FTW_F, level = 4
281 base = "$tmp/ftwtest.d/foo/lvl1/lvl2/", file = "lvl3", flag = FTW_D, level = 4
282 base = "$tmp/ftwtest.d/foo/lvl1/lvl2/lvl3/", file = "file@3", flag = FTW_F, level = 5
283 base = "$tmp/ftwtest.d/foo/lvl1b/", file = "file2@1b", flag = FTW_F, level = 3
284 base = "$tmp/ftwtest.d/foo/lvl1b/", file = "file3@1b", flag = FTW_F, level = 3
285 base = "$tmp/ftwtest.d/foo/lvl1b/", file = "file@1b", flag = FTW_F, level = 3
286 EOF
287 rm $testout
288
289 rm -fr $tmpdir
290
291 exit 0