|
|
print ("3"); | print ("3"); |
system ("InitTermTest -n -s -f personal-schema.xml"); | system ("InitTermTest -n -s -f personal-schema.xml"); |
| |
|
sub doTest { |
|
my ( $no, $cmd ) = @_; |
|
print $no; |
|
if ( system($cmd) != 0 ){ |
|
if( $? == -1 ){ |
|
print "failed to execute $! $cmd \n"; |
|
return; |
|
} |
|
if( $? != 0 ){ |
|
print "$! $cmd Exited With State $? \n"; |
|
return; |
|
} |
|
} |
|
return; |
|
} |
# Run ThreadTest | # Run ThreadTest |
system ("ThreadTest"); | system ("ThreadTest"); |
print ("1"); |
doTest ("1", "ThreadTest -parser=sax -v=never -quiet -threads 10 -time 20 personal.xml"); |
system ("ThreadTest -parser=sax -v=never -quiet -threads 10 -time 20 personal.xml"); |
doTest ("2", "ThreadTest -parser=dom -v=never -quiet -threads 10 -time 20 personal.xml"); |
print ("2"); |
doTest ("3", "ThreadTest -parser=sax2 -v=never -quiet -threads 10 -time 20 personal.xml"); |
system ("ThreadTest -parser=dom -v=never -quiet -threads 10 -time 20 personal.xml"); |
doTest ("4", "ThreadTest -parser=sax -v=always -quiet -threads 10 -time 20 personal.xml"); |
print ("3"); |
doTest ("5", "ThreadTest -parser=dom -v=always -quiet -threads 10 -time 20 personal.xml"); |
system ("ThreadTest -parser=sax2 -v=never -quiet -threads 10 -time 20 personal.xml"); |
doTest ("6", "ThreadTest -parser=sax2 -v=always -quiet -threads 10 -time 20 personal.xml"); |
print ("4"); |
doTest ("7", "ThreadTest -parser=sax -gc -v=always -quiet -threads 10 -time 20 personal.xml"); |
system ("ThreadTest -parser=sax -v=always -quiet -threads 10 -time 20 personal.xml"); |
doTest ("8", "ThreadTest -parser=dom -gc -v=always -quiet -threads 10 -time 20 personal.xml"); |
print ("5"); |
doTest ("9", "ThreadTest -parser=sax2 -gc -v=always -quiet -threads 10 -time 20 personal.xml"); |
system ("ThreadTest -parser=dom -v=always -quiet -threads 10 -time 20 personal.xml"); |
doTest ("10", "ThreadTest -parser=sax -n -s -f -v=always -quiet -threads 10 -time 20 personal-schema.xml"); |
print ("6"); |
doTest ("11", "ThreadTest -parser=dom -n -s -f -v=always -quiet -threads 10 -time 20 personal-schema.xml"); |
system ("ThreadTest -parser=sax2 -v=always -quiet -threads 10 -time 20 personal.xml"); |
doTest ("12", "ThreadTest -parser=sax2 -n -s -f -v=always -quiet -threads 10 -time 20 personal-schema.xml"); |
print ("7"); |
doTest ("13", "ThreadTest -parser=sax -gc -n -s -f -v=always -quiet -threads 10 -time 20 personal-schema.xml"); |
system ("ThreadTest -parser=sax -gc -v=always -quiet -threads 10 -time 20 personal.xml"); |
doTest ("14", "ThreadTest -parser=dom -gc -n -s -f -v=always -quiet -threads 10 -time 20 personal-schema.xml"); |
print ("8"); |
doTest ("15", "ThreadTest -parser=sax2 -gc -n -s -f -v=always -quiet -threads 10 -time 20 personal-schema.xml"); |
system ("ThreadTest -parser=dom -gc -v=always -quiet -threads 10 -time 20 personal.xml"); |
|
print ("9"); |
|
system ("ThreadTest -parser=sax2 -gc -v=always -quiet -threads 10 -time 20 personal.xml"); |
|
print ("10"); |
|
system ("ThreadTest -parser=sax -n -s -f -v=always -quiet -threads 10 -time 20 personal-schema.xml"); |
|
print ("11"); |
|
system ("ThreadTest -parser=dom -n -s -f -v=always -quiet -threads 10 -time 20 personal-schema.xml"); |
|
print ("12"); |
|
system ("ThreadTest -parser=sax2 -n -s -f -v=always -quiet -threads 10 -time 20 personal-schema.xml"); |
|
print ("13"); |
|
system ("ThreadTest -parser=sax -gc -n -s -f -v=always -quiet -threads 10 -time 20 personal-schema.xml"); |
|
print ("14"); |
|
system ("ThreadTest -parser=dom -gc -n -s -f -v=always -quiet -threads 10 -time 20 personal-schema.xml"); |
|
print ("15"); |
|
system ("ThreadTest -parser=sax2 -gc -n -s -f -v=always -quiet -threads 10 -time 20 personal-schema.xml"); |
|
| |
# Run MemHandlerTest | # Run MemHandlerTest |
system ("MemHandlerTest"); | system ("MemHandlerTest"); |