Diff for /embedaddon/pcre/RunTest between versions 1.1.1.1 and 1.1.1.5

version 1.1.1.1, 2012/02/21 23:05:51 version 1.1.1.5, 2014/06/15 19:46:04
Line 1 Line 1
 #! /bin/sh  #! /bin/sh
   
   ###############################################################################
 # Run the PCRE tests using the pcretest program. The appropriate tests are  # Run the PCRE tests using the pcretest program. The appropriate tests are
 # selected, depending on which build-time options were used.  # selected, depending on which build-time options were used.
#
 # All tests are now run both with and without -s, to ensure that everything is  # All tests are now run both with and without -s, to ensure that everything is
 # tested with and without studying. However, there are some tests that produce  # tested with and without studying. However, there are some tests that produce
 # different output after studying, typically when we are tracing the actual  # different output after studying, typically when we are tracing the actual
Line 12 Line 13
 # any difference to their output. There is also one test which compiles invalid  # any difference to their output. There is also one test which compiles invalid
 # UTF-8 with the UTF-8 check turned off; for this, studying must also be  # UTF-8 with the UTF-8 check turned off; for this, studying must also be
 # disabled with /SS.  # disabled with /SS.
   
 # When JIT support is available, all the tests are also run with -s+ to test  
 # (again, almost) everything with studying and the JIT option. There are also  
 # two tests for JIT-specific features, one to be run when JIT support is  
 # available, and one when it is not.  
   
 # The arguments for this script can be individual test numbers, or the word  
 # "valgrind", or "sim" followed by an argument to run cross-compiled  
 # executables under a simulator, for example:  
 #  #
   # When JIT support is available, all appropriate tests are also run with -s+ to
   # test (again, almost) everything with studying and the JIT option, unless
   # "nojit" is given on the command line. There are also two tests for
   # JIT-specific features, one to be run when JIT support is available (unless
   # "nojit" is specified), and one when it is not.
   #
   # Whichever of the 8-, 16- and 32-bit libraries exist are tested. It is also
   # possible to select which to test by giving "-8", "-16" or "-32" on the
   # command line.
   #
   # As well as "nojit", "-8", "-16", and "-32", arguments for this script are
   # individual test numbers, ranges of tests such as 3-6 or 3- (meaning 3 to the
   # end), or a number preceded by ~ to exclude a test. For example, "3-15 ~10"
   # runs tests 3 to 15, excluding test 10, and just "~10" runs all the tests
   # except test 10. Whatever order the arguments are in, the tests are always run
   # in numerical order.
   #
   # Inappropriate tests are automatically skipped (with a comment to say so): for
   # example, if JIT support is not compiled, test 12 is skipped, whereas if JIT
   # support is compiled, test 13 is skipped.
   #
   # Other arguments can be one of the words "valgrind", "valgrind-log", or "sim"
   # followed by an argument to run cross-compiled executables under a simulator,
   # for example:
   #
 # RunTest 3 sim "qemu-arm -s 8388608"  # RunTest 3 sim "qemu-arm -s 8388608"
   #
   # There are two special cases where only one argument is allowed:
   #
   # If the first and only argument is "ebcdic", the script runs the special
   # EBCDIC test that can be useful for checking certain EBCDIC features, even
   # when run in an ASCII environment.
   #
   # If the script is obeyed as "RunTest list", a list of available tests is
   # output, but none of them are run.
   ###############################################################################
   
valgrind=# Define test titles in variables so that they can be output as a list. Some
 # of them are modified (e.g. with -8 or -16) when used in the actual tests.
 
 title1="Test 1: Main functionality (Compatible with Perl >= 5.10)"
 title2="Test 2: API, errors, internals, and non-Perl stuff"
 title3="Test 3: Locale-specific features"
 title4A="Test 4: UTF"
 title4B=" support (Compatible with Perl >= 5.10)"
 title5="Test 5: API, internals, and non-Perl stuff for UTF"
 title6="Test 6: Unicode property support (Compatible with Perl >= 5.10)"
 title7="Test 7: API, internals, and non-Perl stuff for Unicode property support"
 title8="Test 8: DFA matching main functionality"
 title9="Test 9: DFA matching with UTF"
 title10="Test 10: DFA matching with Unicode properties"
 title11="Test 11: Internal offsets and code size tests"
 title12="Test 12: JIT-specific features (when JIT is available)"
 title13="Test 13: JIT-specific features (when JIT is not available)"
 title14="Test 14: Specials for the basic 8-bit library"
 title15="Test 15: Specials for the 8-bit library with UTF-8 support"
 title16="Test 16: Specials for the 8-bit library with Unicode propery support"
 title17="Test 17: Specials for the basic 16/32-bit library"
 title18="Test 18: Specials for the 16/32-bit library with UTF-16/32 support"
 title19="Test 19: Specials for the 16/32-bit library with Unicode property support"
 title20="Test 20: DFA specials for the basic 16/32-bit library"
 title21="Test 21: Reloads for the basic 16/32-bit library"
 title22="Test 22: Reloads for the 16/32-bit library with UTF-16/32 support"
 title23="Test 23: Specials for the 16-bit library"
 title24="Test 24: Specials for the 16-bit library with UTF-16 support"
 title25="Test 25: Specials for the 32-bit library"
 title26="Test 26: Specials for the 32-bit library with UTF-32 support"
 
 maxtest=26
 
 if [ $# -eq 1 -a "$1" = "list" ]; then
   echo $title1
   echo $title2 "(not UTF)"
   echo $title3
   echo $title4A $title4B
   echo $title5 support
   echo $title6
   echo $title7
   echo $title8
   echo $title9
   echo $title10
   echo $title11
   echo $title12
   echo $title13
   echo $title14
   echo $title15
   echo $title16
   echo $title17
   echo $title18
   echo $title19
   echo $title20
   echo $title21
   echo $title22
   echo $title23
   echo $title24
   echo $title25
   echo $title26
   exit 0
 fi
 
 # Set up a suitable "diff" command for comparison. Some systems
 # have a diff that lacks a -u option. Try to deal with this.
 
 cf="diff"
 diff -u /dev/null /dev/null 2>/dev/null && cf="diff -u"
 
 # Find the test data
 
 if [ -n "$srcdir" -a -d "$srcdir" ] ; then
   testdata="$srcdir/testdata"
 elif [ -d "./testdata" ] ; then
   testdata=./testdata
 elif [ -d "../testdata" ] ; then
   testdata=../testdata
 else
   echo "Cannot find the testdata directory"
   exit 1
 fi
 
 
 # ------ Special EBCDIC Test -------
 
 if [ $# -eq 1 -a "$1" = "ebcdic" ]; then
   ./pcretest -C ebcdic >/dev/null
   ebcdic=$?
   if [ $ebcdic -ne 1 ] ; then
     echo "Cannot run EBCDIC tests: EBCDIC support not compiled"
     exit 1
   fi
 
   for opt in "" "-s" "-dfa" "-s -dfa"; do
     ./pcretest -q $opt $testdata/testinputEBC >testtry
     if [ $? = 0 ] ; then
       $cf $testdata/testoutputEBC testtry
       if [ $? != 0 ] ; then exit 1; fi
     else exit 1
     fi
     if [ "$opt" = "-s" ] ; then echo "  OK with study"
     elif [ "$opt" = "-dfa" ] ; then echo "  OK using DFA"
     elif [ "$opt" = "-s -dfa" ] ; then echo "  OK using DFA with study"
     else echo "  OK"
     fi
   done
 
 exit 0
 fi
 
 
 # ------ Normal Tests ------
 
 # Default values
 
 arg8=
 arg16=
 arg32=
 nojit=
 sim=  sim=
   skip=
   valgrind=
   
# Select which tests to run; for those that are explicitly requested, check# This is in case the caller has set aliases (as I do - PH)
# that the necessary optional facilities are available.unset cp ls mv rm
   
   # Process options and select which tests to run; for those that are explicitly
   # requested, check that the necessary optional facilities are available.
   
 do1=no  do1=no
 do2=no  do2=no
 do3=no  do3=no
Line 45  do12=no Line 195  do12=no
 do13=no  do13=no
 do14=no  do14=no
 do15=no  do15=no
   do16=no
   do17=no
   do18=no
   do19=no
   do20=no
   do21=no
   do22=no
   do23=no
   do24=no
   do25=no
   do26=no
   
 while [ $# -gt 0 ] ; do  while [ $# -gt 0 ] ; do
   case $1 in    case $1 in
Line 63  while [ $# -gt 0 ] ; do Line 224  while [ $# -gt 0 ] ; do
    13) do13=yes;;     13) do13=yes;;
    14) do14=yes;;     14) do14=yes;;
    15) do15=yes;;     15) do15=yes;;
   valgrind) valgrind="valgrind -q --smc-check=all";;   16) do16=yes;;
    17) do17=yes;;
    18) do18=yes;;
    19) do19=yes;;
    20) do20=yes;;
    21) do21=yes;;
    22) do22=yes;;
    23) do23=yes;;
    24) do24=yes;;
    25) do25=yes;;
    26) do26=yes;;
    -8) arg8=yes;;
   -16) arg16=yes;;
   -32) arg32=yes;;
    nojit) nojit=yes;;
    sim) shift; sim=$1;;     sim) shift; sim=$1;;
    *) echo "Unknown test number $1"; exit 1;;   valgrind) valgrind="valgrind --tool=memcheck -q --smc-check=all";;
    valgrind-log) valgrind="valgrind --tool=memcheck --num-callers=30 --leak-check=no --error-limit=no --smc-check=all --log-file=report.%p ";;
    ~*)
      if expr "$1" : '~[0-9][0-9]*$' >/dev/null; then
        skip="$skip `expr "$1" : '~\([0-9]*\)*$'`"
      else
        echo "Unknown option or test selector '$1'"; exit 1
      fi
    ;;
    *-*)
      if expr "$1" : '[0-9][0-9]*-[0-9]*$' >/dev/null; then
        tf=`expr "$1" : '\([0-9]*\)'`
        tt=`expr "$1" : '.*-\([0-9]*\)'`
        if [ "$tt" = "" ] ; then tt=$maxtest; fi
        if expr \( "$tf" "<" 1 \) \| \( "$tt" ">" "$maxtest" \) >/dev/null; then
          echo "Invalid test range '$1'"; exit 1
        fi
        while expr "$tf" "<=" "$tt" >/dev/null; do
          eval do${tf}=yes
          tf=`expr $tf + 1`
        done
      else
        echo "Invalid test range '$1'"; exit 1
      fi
    ;;
    *) echo "Unknown option or test selector '$1'"; exit 1;;
   esac    esac
   shift    shift
 done  done
   
# Set up a suitable "diff" command for comparison. Some systems# Find which optional facilities are available.
# have a diff that lacks a -u option. Try to deal with this. 
   
if diff -u /dev/null /dev/null; then cf="diff -u"; else cf="diff"; fi$sim ./pcretest -C linksize >/dev/null
link_size=$?
# Find the test dataif [ $link_size -lt 2 ] ; then
  echo "Failed to find internal link size"
if [ -n "$srcdir" -a -d "$srcdir" ] ; then 
  testdata="$srcdir/testdata" 
elif [ -d "./testdata" ] ; then 
  testdata=./testdata 
elif [ -d "../testdata" ] ; then 
  testdata=../testdata 
else 
  echo "Cannot find the testdata directory" 
   exit 1    exit 1
 fi  fi
   if [ $link_size -gt 4 ] ; then
     echo "Failed to find internal link size"
     exit 1
   fi
   
# Find which optional facilities are available. In some Windows environments# All of 8-bit, 16-bit, and 32-bit character strings may be supported, but only
# the output of pcretest -C has CRLF at the end of each line, but the shell# one need be.
# strips only linefeeds from the output of a `backquoted` command. Hence the 
# alternative patterns. 
   
case `$sim ./pcretest -C | $sim ./pcregrep 'Internal link size'` in$sim ./pcretest -C pcre8 >/dev/null
  *2|*2[[:space:]]) link_size=2;;support8=$?
  *3|*3[[:space:]]) link_size=3;;$sim ./pcretest -C pcre16 >/dev/null
  *4|*4[[:space:]]) link_size=4;;support16=$?
   *) echo "Failed to find internal link size"; exit 1;;$sim ./pcretest -C pcre32 >/dev/null
esacsupport32=$?
   
$sim ./pcretest -C | $sim ./pcregrep 'No UTF-8 support' >/dev/null# Initialize all bitsizes skipped
utf8=$? 
   
$sim ./pcretest -C | $sim ./pcregrep 'No Unicode properties support' >/dev/nulltest8=skip
ucp=$?test16=skip
 test32=skip
   
jitopt=# If no bitsize arguments, select all that are available
$sim ./pcretest -C | $sim ./pcregrep 'No just-in-time compiler support' \ 
  >/dev/null 
jit=$? 
if [ $jit -ne 0 ] ; then 
  jitopt=-s+ 
fi 
   
if [ $utf8 -eq 0 ] ; thenif [ "$arg8$arg16$arg32" = "" ] ; then
  if [ $do4 = yes ] ; then  if [ $support8 -ne 0 ] ; then
    echo "Can't run test 4 because UTF-8 support is not configured"    test8=
    exit 1 
   fi    fi
  if [ $do5 = yes ] ; then  if [ $support16 -ne 0 ] ; then
    echo "Can't run test 5 because UTF-8 support is not configured"    test16=-16
    exit 1 
   fi    fi
  if [ $do8 = yes ] ; then  if [ $support32 -ne 0 ] ; then
    echo "Can't run test 8 because UTF-8 support is not configured"    test32=-32
    exit 1 
   fi    fi
   if [ $do12 = yes ] ; then  
     echo "Can't run test 12 because UTF-8 support is not configured"  
     exit 1  
   fi  
 fi  
   
if [ $ucp -eq 0 ] ; then# Select requested bit sizes
  if [ $do6 = yes ] ; then
    echo "Can't run test 6 because Unicode property support is not configured"else
    exit 1  if [ "$arg8" = yes ] ; then
     if [ $support8 -eq 0 ] ; then
       echo "Cannot run 8-bit library tests: 8-bit library not compiled"
       exit 1
     fi
     test8=
   fi    fi
  if [ $do9 = yes ] ; then  if [ "$arg16" = yes ] ; then
    echo "Can't run test 9 because Unicode property support is not configured"    if [ $support16 -eq 0 ] ; then
    exit 1      echo "Cannot run 16-bit library tests: 16-bit library not compiled"
       exit 1
     fi
     test16=-16
   fi    fi
  if [ $do10 = yes ] ; then  if [ "$arg32" = yes ] ; then
    echo "Can't run test 10 because Unicode property support is not configured"    if [ $support32 -eq 0 ] ; then
    exit 1      echo "Cannot run 32-bit library tests: 32-bit library not compiled"
       exit 1
     fi
     test32=-32
   fi    fi
   if [ $do13 = yes ] ; then  
     echo "Can't run test 12 because Unicode property support is not configured"  
     exit 1  
   fi  
 fi  fi
   
if [ $link_size -ne 2 ] ; then# UTF support always applies to all bit sizes if both are supported; we can't
  if [ $do10 = yes ] ; then# have UTF-8 support without UTF-16 support (for example).
    echo "Can't run test 10 because the link size ($link_size) is not 2" 
    exit 1 
  fi 
fi 
   
if [ $jit -eq 0 ] ; then$sim ./pcretest -C utf >/dev/null
  if [ $do14 = "yes" ] ; thenutf=$?
    echo "Can't run test 14 because JIT support is not configured"
    exit 1$sim ./pcretest -C ucp >/dev/null
  fiucp=$?
else
  if [ $do15 = "yes" ] ; thenjitopt=
    echo "Can't run test 15 because JIT support is configured"$sim ./pcretest -C jit >/dev/null
    exit 1jit=$?
  fiif [ $jit -ne 0 -a "$nojit" != "yes" ] ; then
   jitopt=-s+
 fi  fi
   
 # If no specific tests were requested, select all. Those that are not  # If no specific tests were requested, select all. Those that are not
# relevant will be skipped.# relevant will be automatically skipped.
   
 if [ $do1  = no -a $do2  = no -a $do3  = no -a $do4  = no -a \  if [ $do1  = no -a $do2  = no -a $do3  = no -a $do4  = no -a \
      $do5  = no -a $do6  = no -a $do7  = no -a $do8  = no -a \       $do5  = no -a $do6  = no -a $do7  = no -a $do8  = no -a \
      $do9  = no -a $do10 = no -a $do11 = no -a $do12 = no -a \       $do9  = no -a $do10 = no -a $do11 = no -a $do12 = no -a \
     $do13 = no -a $do14 = no -a $do15 = no ] ; then     $do13 = no -a $do14 = no -a $do15 = no -a $do16 = no -a \
      $do17 = no -a $do18 = no -a $do19 = no -a $do20 = no -a \
      $do21 = no -a $do22 = no -a $do23 = no -a $do24 = no -a \
      $do25 = no -a $do26 = no ] ; then
   do1=yes    do1=yes
   do2=yes    do2=yes
   do3=yes    do3=yes
Line 193  if [ $do1  = no -a $do2  = no -a $do3  = no -a $do4  = Line 379  if [ $do1  = no -a $do2  = no -a $do3  = no -a $do4  =
   do13=yes    do13=yes
   do14=yes    do14=yes
   do15=yes    do15=yes
     do16=yes
     do17=yes
     do18=yes
     do19=yes
     do20=yes
     do21=yes
     do22=yes
     do23=yes
     do24=yes
     do25=yes
     do26=yes
 fi  fi
   
   # Handle any explicit skips at this stage, so that an argument list may consist
   # only of explicit skips.
   
   for i in $skip; do eval do$i=no; done
   
 # Show which release and which test data  # Show which release and which test data
   
 echo ""  echo ""
 echo PCRE C library tests using test data from $testdata  echo PCRE C library tests using test data from $testdata
 $sim ./pcretest /dev/null  $sim ./pcretest /dev/null
   
   for bmode in "$test8" "$test16" "$test32"; do
     case "$bmode" in
       skip) continue;;
       -16)  if [ "$test8$test32" != "skipskip" ] ; then echo ""; fi
             bits=16; echo "---- Testing 16-bit library ----"; echo "";;
       -32)  if [ "$test8$test16" != "skipskip" ] ; then echo ""; fi
             bits=32; echo "---- Testing 32-bit library ----"; echo "";;
       *)    bits=8; echo "---- Testing 8-bit library ----"; echo "";;
     esac
   
 # Primary test, compatible with JIT and all versions of Perl >= 5.8  # Primary test, compatible with JIT and all versions of Perl >= 5.8
   
 if [ $do1 = yes ] ; then  if [ $do1 = yes ] ; then
  echo "Test 1: main functionality (Compatible with Perl >= 5.8)"  echo $title1
   for opt in "" "-s" $jitopt; do    for opt in "" "-s" $jitopt; do
    $sim $valgrind ./pcretest -q $opt $testdata/testinput1 testtry    $sim $valgrind ./pcretest -q $bmode $opt $testdata/testinput1 testtry
     if [ $? = 0 ] ; then      if [ $? = 0 ] ; then
       $cf $testdata/testoutput1 testtry        $cf $testdata/testoutput1 testtry
       if [ $? != 0 ] ; then exit 1; fi        if [ $? != 0 ] ; then exit 1; fi
Line 222  fi Line 434  fi
 # PCRE tests that are not JIT or Perl-compatible: API, errors, internals  # PCRE tests that are not JIT or Perl-compatible: API, errors, internals
   
 if [ $do2 = yes ] ; then  if [ $do2 = yes ] ; then
  echo "Test 2: API, errors, internals, and non-Perl stuff (not UTF-8)"  echo $title2 "(not UTF-$bits)"
   for opt in "" "-s" $jitopt; do    for opt in "" "-s" $jitopt; do
    $sim $valgrind ./pcretest -q $opt $testdata/testinput2 testtry    $sim $valgrind ./pcretest -q $bmode $opt $testdata/testinput2 testtry
     if [ $? = 0 ] ; then      if [ $? = 0 ] ; then
       $cf $testdata/testoutput2 testtry        $cf $testdata/testoutput2 testtry
       if [ $? != 0 ] ; then exit 1; fi        if [ $? != 0 ] ; then exit 1; fi
Line 276  if [ $do3 = yes ] ; then Line 488  if [ $do3 = yes ] ; then
   fi    fi
   
   if [ "$locale" != "" ] ; then    if [ "$locale" != "" ] ; then
    echo "Test 3: locale-specific features (using '$locale' locale)"    echo $title3 "(using '$locale' locale)"
     for opt in "" "-s" $jitopt; do      for opt in "" "-s" $jitopt; do
      $sim $valgrind ./pcretest -q $opt $infile testtry      $sim $valgrind ./pcretest -q $bmode $opt $infile testtry
       if [ $? = 0 ] ; then        if [ $? = 0 ] ; then
         $cf $outfile testtry          $cf $outfile testtry
         if [ $? != 0 ] ; then          if [ $? != 0 ] ; then
Line 304  if [ $do3 = yes ] ; then Line 516  if [ $do3 = yes ] ; then
   fi    fi
 fi  fi
   
# Additional tests for UTF8 support# Additional tests for UTF support
   
 if [ $do4 = yes ] ; then  if [ $do4 = yes ] ; then
  echo "Test 4: UTF-8 support (Compatible with Perl >= 5.8)"  echo ${title4A}-${bits}${title4B}
  if [ $utf8 -eq 0 ] ; then  if [ $utf -eq 0 ] ; then
    echo "  Skipped because UTF-8 support is not available"    echo "  Skipped because UTF-$bits support is not available"
   else    else
     for opt in "" "-s" $jitopt; do      for opt in "" "-s" $jitopt; do
      $sim $valgrind ./pcretest -q $opt $testdata/testinput4 testtry      $sim $valgrind ./pcretest -q $bmode $opt $testdata/testinput4 testtry
       if [ $? = 0 ] ; then        if [ $? = 0 ] ; then
         $cf $testdata/testoutput4 testtry          $cf $testdata/testoutput4 testtry
         if [ $? != 0 ] ; then exit 1; fi          if [ $? != 0 ] ; then exit 1; fi
Line 327  if [ $do4 = yes ] ; then Line 539  if [ $do4 = yes ] ; then
 fi  fi
   
 if [ $do5 = yes ] ; then  if [ $do5 = yes ] ; then
  echo "Test 5: API, internals, and non-Perl stuff for UTF-8 support"  echo ${title5}-${bits} support
  if [ $utf8 -eq 0 ] ; then  if [ $utf -eq 0 ] ; then
    echo "  Skipped because UTF-8 support is not available"    echo "  Skipped because UTF-$bits support is not available"
   else    else
     for opt in "" "-s" $jitopt; do      for opt in "" "-s" $jitopt; do
      $sim $valgrind ./pcretest -q $opt $testdata/testinput5 testtry      $sim $valgrind ./pcretest -q $bmode $opt $testdata/testinput5 testtry
       if [ $? = 0 ] ; then        if [ $? = 0 ] ; then
         $cf $testdata/testoutput5 testtry          $cf $testdata/testoutput5 testtry
         if [ $? != 0 ] ; then exit 1; fi          if [ $? != 0 ] ; then exit 1; fi
Line 347  if [ $do5 = yes ] ; then Line 559  if [ $do5 = yes ] ; then
 fi  fi
   
 if [ $do6 = yes ] ; then  if [ $do6 = yes ] ; then
  echo "Test 6: Unicode property support (Compatible with Perl >= 5.10)"  echo $title6
  if [ $utf8 -eq 0 -o $ucp -eq 0 ] ; then  if [ $utf -eq 0 -o $ucp -eq 0 ] ; then
     echo "  Skipped because Unicode property support is not available"      echo "  Skipped because Unicode property support is not available"
   else    else
     for opt in "" "-s" $jitopt; do      for opt in "" "-s" $jitopt; do
      $sim $valgrind ./pcretest -q $opt $testdata/testinput6 testtry      $sim $valgrind ./pcretest -q $bmode $opt $testdata/testinput6 testtry
       if [ $? = 0 ] ; then        if [ $? = 0 ] ; then
         $cf $testdata/testoutput6 testtry          $cf $testdata/testoutput6 testtry
         if [ $? != 0 ] ; then exit 1; fi          if [ $? != 0 ] ; then exit 1; fi
Line 366  if [ $do6 = yes ] ; then Line 578  if [ $do6 = yes ] ; then
   fi    fi
 fi  fi
   
# Tests for DFA matching support# Test non-Perl-compatible Unicode property support
   
 if [ $do7 = yes ] ; then  if [ $do7 = yes ] ; then
  echo "Test 7: DFA matching"  echo $title7
   if [ $utf -eq 0 -o $ucp -eq 0 ] ; then
     echo "  Skipped because Unicode property support is not available"
   else
     for opt in "" "-s" $jitopt; do
       $sim $valgrind ./pcretest -q $bmode $opt $testdata/testinput7 testtry
       if [ $? = 0 ] ; then
         $cf $testdata/testoutput7 testtry
         if [ $? != 0 ] ; then exit 1; fi
       else exit 1
       fi
       if [ "$opt" = "-s" ] ; then echo "  OK with study"
       elif [ "$opt" = "-s+" ] ; then echo "  OK with JIT study"
       else echo "  OK"
       fi
     done
   fi
 fi
 
 # Tests for DFA matching support
 
 if [ $do8 = yes ] ; then
   echo $title8
   for opt in "" "-s"; do    for opt in "" "-s"; do
    $sim $valgrind ./pcretest -q $opt -dfa $testdata/testinput7 testtry    $sim $valgrind ./pcretest -q $bmode $opt -dfa $testdata/testinput8 testtry
     if [ $? = 0 ] ; then      if [ $? = 0 ] ; then
      $cf $testdata/testoutput7 testtry      $cf $testdata/testoutput8 testtry
       if [ $? != 0 ] ; then exit 1; fi        if [ $? != 0 ] ; then exit 1; fi
     else exit 1      else exit 1
     fi      fi
Line 381  if [ $do7 = yes ] ; then Line 615  if [ $do7 = yes ] ; then
   done    done
 fi  fi
   
if [ $do8 = yes ] ; thenif [ $do9 = yes ] ; then
  echo "Test 8: DFA matching with UTF-8"  echo ${title9}-${bits}
  if [ $utf8 -eq 0 ] ; then  if [ $utf -eq 0 ] ; then
    echo "  Skipped because UTF-8 support is not available"    echo "  Skipped because UTF-$bits support is not available"
   else    else
     for opt in "" "-s"; do      for opt in "" "-s"; do
      $sim $valgrind ./pcretest -q $opt -dfa $testdata/testinput8 testtry      $sim $valgrind ./pcretest -q $bmode $opt -dfa $testdata/testinput9 testtry
       if [ $? = 0 ] ; then        if [ $? = 0 ] ; then
        $cf $testdata/testoutput8 testtry        $cf $testdata/testoutput9 testtry
         if [ $? != 0 ] ; then exit 1; fi          if [ $? != 0 ] ; then exit 1; fi
       else exit 1        else exit 1
       fi        fi
Line 398  if [ $do8 = yes ] ; then Line 632  if [ $do8 = yes ] ; then
   fi    fi
 fi  fi
   
if [ $do9 = yes ] ; thenif [ $do10 = yes ] ; then
  echo "Test 9: DFA matching with Unicode properties"  echo $title10
  if [ $utf8 -eq 0 -o $ucp -eq 0 ] ; then  if [ $utf -eq 0 -o $ucp -eq 0 ] ; then
     echo "  Skipped because Unicode property support is not available"      echo "  Skipped because Unicode property support is not available"
   else    else
     for opt in "" "-s"; do      for opt in "" "-s"; do
      $sim $valgrind ./pcretest -q $opt -dfa $testdata/testinput9 testtry      $sim $valgrind ./pcretest -q $bmode $opt -dfa $testdata/testinput10 testtry
       if [ $? = 0 ] ; then        if [ $? = 0 ] ; then
        $cf $testdata/testoutput9 testtry        $cf $testdata/testoutput10 testtry
         if [ $? != 0 ] ; then exit 1; fi          if [ $? != 0 ] ; then exit 1; fi
       else exit 1        else exit 1
       fi        fi
Line 419  fi Line 653  fi
 # is Unicode property support and the link size is 2. The actual tests are  # is Unicode property support and the link size is 2. The actual tests are
 # mostly the same as in some of the above, but in this test we inspect some  # mostly the same as in some of the above, but in this test we inspect some
 # offsets and sizes that require a known link size. This is a doublecheck for  # offsets and sizes that require a known link size. This is a doublecheck for
# the maintainer, just in case something changes unexpectely.# the maintainer, just in case something changes unexpectely. The output from
 # this test is not the same in 8-bit and 16-bit modes.
   
if [ $do10 = yes ] ; thenif [ $do11 = yes ] ; then
  echo "Test 10: Internal offsets and code size tests"  echo $title11
   if [ $link_size -ne 2 ] ; then    if [ $link_size -ne 2 ] ; then
     echo "  Skipped because link size is not 2"      echo "  Skipped because link size is not 2"
   elif [ $ucp -eq 0 ] ; then    elif [ $ucp -eq 0 ] ; then
     echo "  Skipped because Unicode property support is not available"      echo "  Skipped because Unicode property support is not available"
   else    else
     for opt in "" "-s"; do      for opt in "" "-s"; do
      $sim $valgrind ./pcretest -q $opt $testdata/testinput10 testtry      $sim $valgrind ./pcretest -q $bmode $opt $testdata/testinput11 testtry
       if [ $? = 0 ] ; then        if [ $? = 0 ] ; then
        $cf $testdata/testoutput10 testtry        $cf $testdata/testoutput11-$bits testtry
         if [ $? != 0 ] ; then exit 1; fi          if [ $? != 0 ] ; then exit 1; fi
       else exit 1        else exit 1
       fi        fi
Line 440  if [ $do10 = yes ] ; then Line 675  if [ $do10 = yes ] ; then
   fi    fi
 fi  fi
   
# Test of Perl >= 5.10 features without UTF8 support# Test JIT-specific features when JIT is available
   
if [ $do11 = yes ] ; thenif [ $do12 = yes ] ; then
  echo "Test 11: Features from Perl >= 5.10 without UTF8 support"  echo $title12
  for opt in "" "-s" $jitopt; do  if [ $jit -eq 0 -o "$nojit" = "yes" ] ; then
    $sim $valgrind ./pcretest -q $opt $testdata/testinput11 testtry    echo "  Skipped because JIT is not available or not usable"
   else
     $sim $valgrind ./pcretest -q $bmode $testdata/testinput12 testtry
     if [ $? = 0 ] ; then      if [ $? = 0 ] ; then
      $cf $testdata/testoutput11 testtry      $cf $testdata/testoutput12 testtry
       if [ $? != 0 ] ; then exit 1; fi        if [ $? != 0 ] ; then exit 1; fi
     else exit 1      else exit 1
     fi      fi
    if [ "$opt" = "-s" ] ; then echo "  OK with study"    echo "  OK"
    elif [ "$opt" = "-s+" ] ; then echo "  OK with JIT study"  fi
    else echo "  OK"fi
 
 # Test JIT-specific features when JIT is not available
 
 if [ $do13 = yes ] ; then
   echo $title13
   if [ $jit -ne 0 ] ; then
     echo "  Skipped because JIT is available"
   else
     $sim $valgrind ./pcretest -q $bmode $testdata/testinput13 testtry
     if [ $? = 0 ] ; then
       $cf $testdata/testoutput13 testtry
       if [ $? != 0 ] ; then exit 1; fi
     else exit 1
     fi      fi
  done    echo "  OK"
   fi
 fi  fi
   
# Test of Perl >= 5.10 features with UTF8 support# Tests for 8-bit-specific features
   
if [ $do12 = yes ] ; thenif [ "$do14" = yes ] ; then
  echo "Test 12: Features from Perl >= 5.10 with UTF8 support"  echo $title14
  if [ $utf8 -eq 0 ] ; then  if [ "$bits" = "16" -o "$bits" = "32" ] ; then
    echo "  Skipped because UTF-8 support is not available"    echo "  Skipped when running 16/32-bit tests"
   else    else
       cp -f $testdata/saved16 testsaved16
       cp -f $testdata/saved32 testsaved32
     for opt in "" "-s" $jitopt; do      for opt in "" "-s" $jitopt; do
      $sim $valgrind ./pcretest -q $opt $testdata/testinput12 testtry      $sim $valgrind ./pcretest -q $bmode $opt $testdata/testinput14 testtry
       if [ $? = 0 ] ; then        if [ $? = 0 ] ; then
        $cf $testdata/testoutput12 testtry        $cf $testdata/testoutput14 testtry
         if [ $? != 0 ] ; then exit 1; fi          if [ $? != 0 ] ; then exit 1; fi
       else exit 1        else exit 1
       fi        fi
Line 480  if [ $do12 = yes ] ; then Line 733  if [ $do12 = yes ] ; then
   fi    fi
 fi  fi
   
# Test non-Perl-compatible Unicode property support# Tests for 8-bit-specific features (needs UTF-8 support)
   
if [ $do13 = yes ] ; thenif [ "$do15" = yes ] ; then
  echo "Test 13: API, internals, and non-Perl stuff for Unicode property support"  echo $title15
  if [ $utf8 -eq 0 -o $ucp -eq 0 ] ; then  if [ "$bits" = "16" -o "$bits" = "32" ] ; then
     echo "  Skipped when running 16/32-bit tests"
   elif [ $utf -eq 0 ] ; then
     echo "  Skipped because UTF-$bits support is not available"
   else
     for opt in "" "-s" $jitopt; do
       $sim $valgrind ./pcretest -q $bmode $opt $testdata/testinput15 testtry
       if [ $? = 0 ] ; then
         $cf $testdata/testoutput15 testtry
         if [ $? != 0 ] ; then exit 1; fi
       else exit 1
       fi
       if [ "$opt" = "-s" ] ; then echo "  OK with study"
       elif [ "$opt" = "-s+" ] ; then echo "  OK with JIT study"
       else echo "  OK"
       fi
     done
   fi
 fi
 
 # Tests for 8-bit-specific features (Unicode property support)
 
 if [ $do16 = yes ] ; then
   echo $title16
   if [ "$bits" = "16" -o "$bits" = "32" ] ; then
     echo "  Skipped when running 16/32-bit tests"
   elif [ $ucp -eq 0 ] ; then
     echo "  Skipped because Unicode property support is not available"      echo "  Skipped because Unicode property support is not available"
   else    else
     for opt in "" "-s" $jitopt; do      for opt in "" "-s" $jitopt; do
      $sim $valgrind ./pcretest -q $opt $testdata/testinput13 testtry      $sim $valgrind ./pcretest -q $bmode $opt $testdata/testinput16 testtry
       if [ $? = 0 ] ; then        if [ $? = 0 ] ; then
        $cf $testdata/testoutput13 testtry        $cf $testdata/testoutput16 testtry
         if [ $? != 0 ] ; then exit 1; fi          if [ $? != 0 ] ; then exit 1; fi
       else exit 1        else exit 1
       fi        fi
Line 502  if [ $do13 = yes ] ; then Line 781  if [ $do13 = yes ] ; then
   fi    fi
 fi  fi
   
# Test JIT-specific features when JIT is available# Tests for 16/32-bit-specific features
   
if [ $do14 = yes ] ; thenif [ $do17 = yes ] ; then
  echo "Test 14: JIT-specific features (JIT available)"  echo $title17
  if [ $jit -eq 0 ] ; then  if [ "$bits" = "8" ] ; then
    echo "  Skipped because JIT is not available or not usable"    echo "  Skipped when running 8-bit tests"
   else    else
    $sim $valgrind ./pcretest -q $testdata/testinput14 testtry    for opt in "" "-s" $jitopt; do
       $sim $valgrind ./pcretest -q $bmode $opt $testdata/testinput17 testtry
       if [ $? = 0 ] ; then
         $cf $testdata/testoutput17 testtry
         if [ $? != 0 ] ; then exit 1; fi
       else exit 1
       fi
       if [ "$opt" = "-s" ] ; then echo "  OK with study"
       elif [ "$opt" = "-s+" ] ; then echo "  OK with JIT study"
       else echo "  OK"
       fi
     done
   fi
 fi
 
 # Tests for 16/32-bit-specific features (UTF-16/32 support)
 
 if [ $do18 = yes ] ; then
   echo $title18
   if [ "$bits" = "8" ] ; then
     echo "  Skipped when running 8-bit tests"
   elif [ $utf -eq 0 ] ; then
     echo "  Skipped because UTF-$bits support is not available"
   else
     for opt in "" "-s" $jitopt; do
       $sim $valgrind ./pcretest -q $bmode $opt $testdata/testinput18 testtry
       if [ $? = 0 ] ; then
         $cf $testdata/testoutput18-$bits testtry
         if [ $? != 0 ] ; then exit 1; fi
       else exit 1
       fi
       if [ "$opt" = "-s" ] ; then echo "  OK with study"
       elif [ "$opt" = "-s+" ] ; then echo "  OK with JIT study"
       else echo "  OK"
       fi
     done
   fi
 fi
 
 # Tests for 16/32-bit-specific features (Unicode property support)
 
 if [ $do19 = yes ] ; then
   echo $title19
   if [ "$bits" = "8" ] ; then
     echo "  Skipped when running 8-bit tests"
   elif [ $ucp -eq 0 ] ; then
     echo "  Skipped because Unicode property support is not available"
   else
     for opt in "" "-s" $jitopt; do
       $sim $valgrind ./pcretest -q $bmode $opt $testdata/testinput19 testtry
       if [ $? = 0 ] ; then
         $cf $testdata/testoutput19 testtry
         if [ $? != 0 ] ; then exit 1; fi
       else exit 1
       fi
       if [ "$opt" = "-s" ] ; then echo "  OK with study"
       elif [ "$opt" = "-s+" ] ; then echo "  OK with JIT study"
       else echo "  OK"
       fi
     done
   fi
 fi
 
 # Tests for 16/32-bit-specific features in DFA non-UTF-16/32 mode
 
 if [ $do20 = yes ] ; then
   echo $title20
   if [ "$bits" = "8" ] ; then
     echo "  Skipped when running 8-bit tests"
   else
     for opt in "" "-s"; do
       $sim $valgrind ./pcretest -q $bmode $opt -dfa $testdata/testinput20 testtry
       if [ $? = 0 ] ; then
         $cf $testdata/testoutput20 testtry
         if [ $? != 0 ] ; then exit 1; fi
       else exit 1
       fi
       if [ "$opt" = "-s" ] ; then echo "  OK with study"
       else echo "  OK"
       fi
     done
   fi
 fi
 
 # Tests for reloads with 16/32-bit library
 
 if [ $do21 = yes ] ; then
   echo $title21
   if [ "$bits" = "8" ] ; then
     echo "  Skipped when running 8-bit tests"
   elif [ $link_size -ne 2 ] ; then
     echo "  Skipped because link size is not 2"
   else
     cp -f $testdata/saved8 testsaved8
     cp -f $testdata/saved16LE-1 testsaved16LE-1
     cp -f $testdata/saved16BE-1 testsaved16BE-1
     cp -f $testdata/saved32LE-1 testsaved32LE-1
     cp -f $testdata/saved32BE-1 testsaved32BE-1
     $sim $valgrind ./pcretest -q $bmode $testdata/testinput21 testtry
     if [ $? = 0 ] ; then      if [ $? = 0 ] ; then
      $cf $testdata/testoutput14 testtry      $cf $testdata/testoutput21-$bits testtry
       if [ $? != 0 ] ; then exit 1; fi        if [ $? != 0 ] ; then exit 1; fi
     else exit 1      else exit 1
     fi      fi
Line 519  if [ $do14 = yes ] ; then Line 896  if [ $do14 = yes ] ; then
   fi    fi
 fi  fi
   
# Test JIT-specific features when JIT is not available# Tests for reloads with 16/32-bit library (UTF-16 support)
   
if [ $do15 = yes ] ; thenif [ $do22 = yes ] ; then
  echo "Test 15: JIT-specific features (JIT not available)"  echo $title22
  if [ $jit -ne 0 ] ; then  if [ "$bits" = "8" ] ; then
    echo "  Skipped because JIT is available"    echo "  Skipped when running 8-bit tests"
   elif [ $utf -eq 0 ] ; then
     echo "  Skipped because UTF-$bits support is not available"
   elif [ $link_size -ne 2 ] ; then
     echo "  Skipped because link size is not 2"
   else    else
    $sim $valgrind ./pcretest -q $testdata/testinput15 testtry    cp -f $testdata/saved16LE-2 testsaved16LE-2
     cp -f $testdata/saved16BE-2 testsaved16BE-2
     cp -f $testdata/saved32LE-2 testsaved32LE-2
     cp -f $testdata/saved32BE-2 testsaved32BE-2
     $sim $valgrind ./pcretest -q $bmode $testdata/testinput22 testtry
     if [ $? = 0 ] ; then      if [ $? = 0 ] ; then
      $cf $testdata/testoutput15 testtry      $cf $testdata/testoutput22-$bits testtry
       if [ $? != 0 ] ; then exit 1; fi        if [ $? != 0 ] ; then exit 1; fi
     else exit 1      else exit 1
     fi      fi
     echo "  OK"      echo "  OK"
   fi    fi
 fi  fi
   
   if [ $do23 = yes ] ; then
     echo $title23
     if [ "$bits" = "8" -o "$bits" = "32" ] ; then
       echo "  Skipped when running 8/32-bit tests"
     else
       $sim $valgrind ./pcretest -q $bmode $testdata/testinput23 testtry
       if [ $? = 0 ] ; then
         $cf $testdata/testoutput23 testtry
         if [ $? != 0 ] ; then exit 1; fi
       else exit 1
       fi
       echo "  OK"
     fi
   fi
   
   if [ $do24 = yes ] ; then
     echo $title24
     if [ "$bits" = "8" -o "$bits" = "32" ] ; then
       echo "  Skipped when running 8/32-bit tests"
     elif [ $utf -eq 0 ] ; then
       echo "  Skipped because UTF-$bits support is not available"
     else
       $sim $valgrind ./pcretest -q $bmode $testdata/testinput24 testtry
       if [ $? = 0 ] ; then
         $cf $testdata/testoutput24 testtry
         if [ $? != 0 ] ; then exit 1; fi
       else exit 1
       fi
       echo "  OK"
     fi
   fi
   
   if [ $do25 = yes ] ; then
     echo $title25
     if [ "$bits" = "8" -o "$bits" = "16" ] ; then
       echo "  Skipped when running 8/16-bit tests"
     else
       $sim $valgrind ./pcretest -q $bmode $testdata/testinput25 testtry
       if [ $? = 0 ] ; then
         $cf $testdata/testoutput25 testtry
         if [ $? != 0 ] ; then exit 1; fi
       else exit 1
       fi
       echo "  OK"
     fi
   fi
   
   if [ $do26 = yes ] ; then
     echo $title26
     if [ "$bits" = "8" -o "$bits" = "16" ] ; then
       echo "  Skipped when running 8/16-bit tests"
     elif [ $utf -eq 0 ] ; then
       echo "  Skipped because UTF-$bits support is not available"
     else
       $sim $valgrind ./pcretest -q $bmode $testdata/testinput26 testtry
       if [ $? = 0 ] ; then
         $cf $testdata/testoutput26 testtry
         if [ $? != 0 ] ; then exit 1; fi
       else exit 1
       fi
       echo "  OK"
     fi
   fi
   
   # End of loop for 8/16/32-bit tests
   done
   
   # Clean up local working files
   rm -f test3input test3output testNinput testsaved* teststderr teststdout testtry
   
 # End  # End

Removed from v.1.1.1.1  
changed lines
  Added in v.1.1.1.5


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>