Fixed the test harness so it will write out zero-length data files.

This commit is contained in:
Dan Fandrich
2008-03-06 01:11:43 +00:00
parent 6c2c281a7e
commit 80cec5a62a
2 changed files with 5 additions and 7 deletions

View File

@@ -36,7 +36,7 @@ statistical/informational purposes.
<reply> <reply>
<data [nocheck="1"] [sendzero="yes"] [base64="yes"]> <data [nocheck="1"] [sendzero="yes"] [base64="yes"]>
data to be sent to the client on its request and later verified that it arrived data to be sent to the client on its request and later verified that it arrived
safely. Set the nocheck=1 to prevent the test script to verify the arrival safely. Set nocheck="1" to prevent the test script from verifying the arrival
of this data. of this data.
If the data contains 'swsclose' anywhere within the start and end tag, and If the data contains 'swsclose' anywhere within the start and end tag, and

View File

@@ -1957,13 +1957,11 @@ sub singletest {
unlink($memdump); unlink($memdump);
} }
# create a (possibly-empty) file before starting the test
my @inputfile=getpart("client", "file"); my @inputfile=getpart("client", "file");
if(@inputfile) { my %fileattr = getpartattr("client", "file");
# we need to generate a file before this test is invoked my $filename=$fileattr{'name'};
my %fileattr = getpartattr("client", "file"); if(@inputfile || $filename) {
my $filename=$fileattr{'name'};
if(!$filename) { if(!$filename) {
logmsg "ERROR: section client=>file has no name attribute\n"; logmsg "ERROR: section client=>file has no name attribute\n";
return -1; return -1;