tags/pcre-2.06/RunTest

#! /bin/sh

# Run PCRE tests

cf=diff

# Select which tests to run; if no selection, run all

do1=no
do2=no
do3=no
do4=no

while [ $# -gt 0 ] ; do
  case $1 in
    1) do1=yes;;
    2) do2=yes;;
    3) do3=yes;;
    4) do4=yes;;
    *) echo "Unknown test number $1"; exit 1;;
  esac
  shift
done

if [ $do1 = no -a $do2 = no -a $do3 = no -a $do4 = no ] ; then
  do1=yes
  do2=yes
  do3=yes
  do4=yes
fi

# Primary test, Perl-compatible

if [ $do1 = yes ] ; then
  echo "Testing main functionality (Perl compatible)"
  ./pcretest testinput1 testtry
  if [ $? = 0 ] ; then
    $cf testtry testoutput1
    if [ $? != 0 ] ; then exit 1; fi
  else exit 1
  fi
fi

# PCRE tests that are not Perl-compatible - API & error tests, mostly

if [ $do2 = yes ] ; then
  echo "Testing API and error handling (not Perl compatible)"
  ./pcretest -i testinput2 testtry
  if [ $? = 0 ] ; then
    $cf testtry testoutput2
    if [ $? != 0 ] ; then exit 1; fi
  else exit 1
  fi
fi

# Additional Perl-compatible tests for Perl 5.005's new features

if [ $do3 = yes ] ; then
  echo "Testing Perl 5.005 features (Perl 5.005 compatible)"
  ./pcretest testinput3 testtry
  if [ $? = 0 ] ; then
    $cf testtry testoutput3
    if [ $? != 0 ] ; then exit 1; fi
  else exit 1
  fi
fi

if [ $do1 = yes -a $do2 = yes -a $do3 = yes ] ; then
  echo "The three main tests all ran OK"
  echo " " 
fi

# Locale-specific tests, provided the "fr" locale is available

if [ $do4 = yes ] ; then
  locale -a | grep '^fr$' >/dev/null
  if [ $? -eq 0 ] ; then
    echo "Testing locale-specific features (using 'fr' locale)"
    ./pcretest testinput4 testtry
    if [ $? = 0 ] ; then
      $cf testtry testoutput4
      if [ $? != 0 ] ; then exit 1; fi
      echo "Locale test ran OK" 
      echo " " 
    else exit 1
    fi
  else
    echo "Cannot test locale-specific features - 'fr' locale not found,"
    echo "or the \"locale\" command is not available to check for it."
    echo " " 
  fi
fi

# End
1	#! /bin/sh
2
3	# Run PCRE tests
4
5	cf=diff
6
7	# Select which tests to run; if no selection, run all
8
9	do1=no
10	do2=no
11	do3=no
12	do4=no
13
14	while [ $# -gt 0 ] ; do
15	case $1 in
16	1) do1=yes;;
17	2) do2=yes;;
18	3) do3=yes;;
19	4) do4=yes;;
20	*) echo "Unknown test number $1"; exit 1;;
21	esac
22	shift
23	done
24
25	if [ $do1 = no -a $do2 = no -a $do3 = no -a $do4 = no ] ; then
26	do1=yes
27	do2=yes
28	do3=yes
29	do4=yes
30	fi
31
32	# Primary test, Perl-compatible
33
34	if [ $do1 = yes ] ; then
35	echo "Testing main functionality (Perl compatible)"
36	./pcretest testinput1 testtry
37	if [ $? = 0 ] ; then
38	$cf testtry testoutput1
39	if [ $? != 0 ] ; then exit 1; fi
40	else exit 1
41	fi
42	fi
43
44	# PCRE tests that are not Perl-compatible - API & error tests, mostly
45
46	if [ $do2 = yes ] ; then
47	echo "Testing API and error handling (not Perl compatible)"
48	./pcretest -i testinput2 testtry
49	if [ $? = 0 ] ; then
50	$cf testtry testoutput2
51	if [ $? != 0 ] ; then exit 1; fi
52	else exit 1
53	fi
54	fi
55
56	# Additional Perl-compatible tests for Perl 5.005's new features
57
58	if [ $do3 = yes ] ; then
59	echo "Testing Perl 5.005 features (Perl 5.005 compatible)"
60	./pcretest testinput3 testtry
61	if [ $? = 0 ] ; then
62	$cf testtry testoutput3
63	if [ $? != 0 ] ; then exit 1; fi
64	else exit 1
65	fi
66	fi
67
68	if [ $do1 = yes -a $do2 = yes -a $do3 = yes ] ; then
69	echo "The three main tests all ran OK"
70	echo " "
71	fi
72
73	# Locale-specific tests, provided the "fr" locale is available
74
75	if [ $do4 = yes ] ; then
76	locale -a \| grep '^fr$' >/dev/null
77	if [ $? -eq 0 ] ; then
78	echo "Testing locale-specific features (using 'fr' locale)"
79	./pcretest testinput4 testtry
80	if [ $? = 0 ] ; then
81	$cf testtry testoutput4
82	if [ $? != 0 ] ; then exit 1; fi
83	echo "Locale test ran OK"
84	echo " "
85	else exit 1
86	fi
87	else
88	echo "Cannot test locale-specific features - 'fr' locale not found,"
89	echo "or the \"locale\" command is not available to check for it."
90	echo " "
91	fi
92	fi
93
94	# End