/[pcre]/code/trunk/RunTest
ViewVC logotype

Contents of /code/trunk/RunTest

Parent Directory Parent Directory | Revision Log Revision Log


Revision 245 - (show annotations) (download)
Fri Sep 14 10:06:05 2007 UTC (7 years, 3 months ago) by ph10
File size: 7477 byte(s)
Skip some tests when \R is defaulted to ANYCRLF.

1 #! /bin/sh
2
3 # Run PCRE tests
4
5 cf="diff -u"
6 valgrind=
7 testdata=testdata
8
9 if [ -n "$srcdir" -a -d "$srcdir" ] ; then
10 testdata="$srcdir/testdata"
11 fi
12
13 # Find which optional facilities are available
14
15 case `./pcretest -C | ./pcregrep 'Internal link size'` in
16 *2) link_size=2;;
17 *3) link_size=3;;
18 *4) link_size=4;;
19 *) echo "Failed to find internal link size"; exit 1;;
20 esac
21
22 ./pcretest -C | ./pcregrep 'No UTF-8 support' >/dev/null
23 utf8=$?
24
25 ./pcretest -C | ./pcregrep 'No Unicode properties support' >/dev/null
26 ucp=$?
27
28 ./pcretest -C | ./pcregrep '\\R matches CR, LF, or CRLF only' >/dev/null
29 bsrok=$?
30
31 # Select which tests to run; for those that are explicitly requested, check
32 # that the necessary optional facilities are available.
33
34 do1=no
35 do2=no
36 do3=no
37 do4=no
38 do5=no
39 do6=no
40 do7=no
41 do8=no
42 do9=no
43 do10=no
44
45 while [ $# -gt 0 ] ; do
46 case $1 in
47 1) do1=yes;;
48 2) do2=yes;;
49 3) do3=yes;;
50 4) do4=yes;;
51 5) do5=yes;;
52 6) do6=yes;;
53 7) do7=yes;;
54 8) do8=yes;;
55 9) do9=yes;;
56 10) do10=yes;;
57 valgrind) valgrind="valgrind -q";;
58 *) echo "Unknown test number $1"; exit 1;;
59 esac
60 shift
61 done
62
63 if [ $utf8 -eq 0 ] ; then
64 if [ $do4 = yes ] ; then
65 echo "Can't run test 4 because UTF-8 support is not configured"
66 exit 1
67 fi
68 if [ $do5 = yes ] ; then
69 echo "Can't run test 5 because UTF-8 support is not configured"
70 exit 1
71 fi
72 if [ $do8 = yes ] ; then
73 echo "Can't run test 8 because UTF-8 support is not configured"
74 exit 1
75 fi
76 fi
77
78 if [ $ucp -eq 0 ] ; then
79 if [ $do6 = yes ] ; then
80 echo "Can't run test 6 because Unicode property support is not configured"
81 exit 1
82 fi
83 if [ $do9 = yes ] ; then
84 echo "Can't run test 9 because Unicode property support is not configured"
85 exit 1
86 fi
87 if [ $do10 = yes ] ; then
88 echo "Can't run test 10 because Unicode property support is not configured"
89 exit 1
90 fi
91 fi
92
93 if [ $link_size -ne 2 ] ; then
94 if [ $do10 = yes ] ; then
95 echo "Can't run test 10 because the link size ($link_size) is not 2"
96 exit 1
97 fi
98 fi
99
100 if [ $bsrok = 0 ] ; then
101 if [ $do2 = yes ] ; then
102 echo "Can't run test 2 because \\R is restricted"
103 exit 1
104 fi
105 if [ $do5 = yes ] ; then
106 echo "Can't run test 5 because \\R is restricted"
107 exit 1
108 fi
109 if [ $do7 = yes ] ; then
110 echo "Can't run test 7 because \\R is restricted"
111 exit 1
112 fi
113 if [ $do8 = yes ] ; then
114 echo "Can't run test 8 because \\R is restricted"
115 exit 1
116 fi
117 fi
118
119 # If no specific tests were requested, select all that are relevant.
120
121 if [ $do1 = no -a $do2 = no -a $do3 = no -a $do4 = no -a \
122 $do5 = no -a $do6 = no -a $do7 = no -a $do8 = no -a \
123 $do9 = no -a $do10 = no ] ; then
124 do1=yes
125 if [ $bsrok -ne 0 ] ; then do2=yes; fi
126 do3=yes
127 if [ $utf8 -ne 0 ] ; then do4=yes; fi
128 if [ $utf8 -ne 0 -a $bsrok -ne 0 ] ; then do5=yes; fi
129 if [ $utf8 -ne 0 -a $ucp -ne 0 ] ; then do6=yes; fi
130 if [ $bsrok -ne 0 ] ; then do7=yes; fi
131 if [ $utf8 -ne 0 -a $bsrok -ne 0 ] ; then do8=yes; fi
132 if [ $utf8 -ne 0 -a $ucp -ne 0 ] ; then do9=yes; fi
133 if [ $link_size -eq 2 -a $ucp -ne 0 ] ; then do10=yes; fi
134 fi
135
136 # Show which release
137
138 echo ""
139 echo PCRE C library tests
140 ./pcretest /dev/null
141
142 # Primary test, Perl-compatible
143
144 if [ $do1 = yes ] ; then
145 echo "Test 1: main functionality (Perl compatible)"
146 $valgrind ./pcretest -q $testdata/testinput1 testtry
147 if [ $? = 0 ] ; then
148 $cf $testdata/testoutput1 testtry
149 if [ $? != 0 ] ; then exit 1; fi
150 else exit 1
151 fi
152 echo "OK"
153 fi
154
155 # PCRE tests that are not Perl-compatible - API & error tests, mostly
156
157 if [ $do2 = yes ] ; then
158 echo "Test 2: API and error handling (not Perl compatible)"
159 $valgrind ./pcretest -q $testdata/testinput2 testtry
160 if [ $? = 0 ] ; then
161 $cf $testdata/testoutput2 testtry
162 if [ $? != 0 ] ; then exit 1; fi
163 else exit 1
164 fi
165 echo "OK"
166 fi
167
168 # Locale-specific tests, provided that either the "fr_FR" or the "french"
169 # locale is available. The former is the Unix-like standard; the latter is
170 # for Windows.
171
172 if [ $do3 = yes ] ; then
173 locale -a | grep '^fr_FR$' >/dev/null
174 if [ $? -eq 0 ] ; then
175 locale=fr_FR
176 infile=$testdata/testinput3
177 outfile=$testdata/testoutput3
178 else
179 locale -a | grep '^french$' >/dev/null
180 if [ $? -eq 0 ] ; then
181 locale=french
182 sed 's/fr_FR/french/' $testdata/testinput3 >test3input
183 sed 's/fr_FR/french/' $testdata/testoutput3 >test3output
184 infile=test3input
185 outfile=test3output
186 else
187 locale=
188 fi
189 fi
190
191 if [ "$locale" != "" ] ; then
192 echo "Test 3: locale-specific features (using '$locale' locale)"
193 $valgrind ./pcretest -q $infile testtry
194 if [ $? = 0 ] ; then
195 $cf $outfile testtry
196 if [ $? != 0 ] ; then
197 echo " "
198 echo "Locale test did not run entirely successfully."
199 echo "This usually means that there is a problem with the locale"
200 echo "settings rather than a bug in PCRE."
201 else
202 echo "OK"
203 fi
204 else exit 1
205 fi
206 else
207 echo "Cannot test locale-specific features - neither the 'fr_FR' nor the"
208 echo "'french' locale exists, or the \"locale\" command is not available"
209 echo "to check for them."
210 echo " "
211 fi
212 fi
213
214 # Additional tests for UTF8 support
215
216 if [ $do4 = yes ] ; then
217 echo "Test 4: UTF-8 support (Perl compatible)"
218 $valgrind ./pcretest -q $testdata/testinput4 testtry
219 if [ $? = 0 ] ; then
220 $cf $testdata/testoutput4 testtry
221 if [ $? != 0 ] ; then exit 1; fi
222 else exit 1
223 fi
224 echo "OK"
225 fi
226
227 if [ $do5 = yes ] ; then
228 echo "Test 5: API and internals for UTF-8 support (not Perl compatible)"
229 $valgrind ./pcretest -q $testdata/testinput5 testtry
230 if [ $? = 0 ] ; then
231 $cf $testdata/testoutput5 testtry
232 if [ $? != 0 ] ; then exit 1; fi
233 else exit 1
234 fi
235 echo "OK"
236 fi
237
238 if [ $do6 = yes ] ; then
239 echo "Test 6: Unicode property support"
240 $valgrind ./pcretest -q $testdata/testinput6 testtry
241 if [ $? = 0 ] ; then
242 $cf $testdata/testoutput6 testtry
243 if [ $? != 0 ] ; then exit 1; fi
244 else exit 1
245 fi
246 echo "OK"
247 fi
248
249 # Tests for DFA matching support
250
251 if [ $do7 = yes ] ; then
252 echo "Test 7: DFA matching"
253 $valgrind ./pcretest -q -dfa $testdata/testinput7 testtry
254 if [ $? = 0 ] ; then
255 $cf $testdata/testoutput7 testtry
256 if [ $? != 0 ] ; then exit 1; fi
257 else exit 1
258 fi
259 echo "OK"
260 fi
261
262 if [ $do8 = yes ] ; then
263 echo "Test 8: DFA matching with UTF-8"
264 $valgrind ./pcretest -q -dfa $testdata/testinput8 testtry
265 if [ $? = 0 ] ; then
266 $cf $testdata/testoutput8 testtry
267 if [ $? != 0 ] ; then exit 1; fi
268 else exit 1
269 fi
270 echo "OK"
271 fi
272
273 if [ $do9 = yes ] ; then
274 echo "Test 9: DFA matching with Unicode properties"
275 $valgrind ./pcretest -q -dfa $testdata/testinput9 testtry
276 if [ $? = 0 ] ; then
277 $cf $testdata/testoutput9 testtry
278 if [ $? != 0 ] ; then exit 1; fi
279 else exit 1
280 fi
281 echo "OK"
282 fi
283
284 # Test of internal offsets and code sizes. This test is run only when there
285 # is Unicode property support and the link size is 2. The actual tests are
286 # mostly the same as in some of the above, but in this test we inspect some
287 # offsets and sizes that require a known link size. This is a doublecheck for
288 # the maintainer, just in case something changes unexpectely.
289
290 if [ $do10 = yes ] ; then
291 echo "Test 10: Internal offsets and code size tests"
292 $valgrind ./pcretest -q $testdata/testinput10 testtry
293 if [ $? = 0 ] ; then
294 $cf $testdata/testoutput10 testtry
295 if [ $? != 0 ] ; then exit 1; fi
296 else exit 1
297 fi
298 echo "OK"
299 fi
300
301 # End

Properties

Name Value
svn:executable *
svn:keywords "Author Date Id Revision Url"

webmaster@exim.org
ViewVC Help
Powered by ViewVC 1.1.12