| line |
true |
false |
branch |
|
25
|
0 |
0 |
if ($iType == &OLE::Storage_Lite::PpsType_File()) { } |
|
|
0 |
0 |
elsif ($iType == &OLE::Storage_Lite::PpsType_Dir()) { } |
|
|
0 |
0 |
elsif ($iType == &OLE::Storage_Lite::PpsType_Root()) { } |
|
75
|
0 |
0 |
unless defined $oSelf->{'Data'} |
|
77
|
0 |
0 |
$oSelf->{'_PPS_FILE'} ? : |
|
90
|
0 |
0 |
if ($oPps->{'Type'} == &OLE::Storage_Lite::PpsType_File()) |
|
91
|
0 |
0 |
if $oPps->{'Size'} <= 0 |
|
92
|
0 |
0 |
if ($oPps->{'Size'} < $rhInfo->{'_SMALL_SIZE'}) |
|
94
|
0 |
0 |
$oPps->{'Size'} % $rhInfo->{'_SMALL_BLOCK_SIZE'} ? : |
|
103
|
0 |
0 |
if ($oPps->{'_PPS_FILE'}) { } |
|
115
|
0 |
0 |
if $oPps->{'Size'} % $rhInfo->{'_SMALL_BLOCK_SIZE'} |
|
123
|
0 |
0 |
if $iSmBlk % $iSbCnt |
|
155
|
0 |
0 |
defined $oThis->{'StartBlock'} ? : |
|
|
0 |
0 |
defined $oThis->{'Size'} ? : |
|
203
|
0 |
0 |
unless $rhInfo |
|
206
|
0 |
0 |
$rhInfo->{'_BIG_BLOCK_SIZE'} ? : |
|
209
|
0 |
0 |
$rhInfo->{'_SMALL_BLOCK_SIZE'} ? : |
|
217
|
0 |
0 |
if (ref $sFile eq 'SCALAR') { } |
|
|
0 |
0 |
elsif (UNIVERSAL::isa($sFile, 'IO::Handle')) { } |
|
|
0 |
0 |
elsif (not ref $sFile) { } |
|
233
|
0 |
0 |
if ($sFile ne '-') { } |
|
235
|
0 |
0 |
unless $oIo->open(">$sFile") |
|
241
|
0 |
0 |
unless $oIo->fdopen(fileno STDOUT, "w") |
|
258
|
0 |
0 |
if ($bNoAs) { } |
|
284
|
0 |
0 |
if $closeFile |
|
298
|
0 |
0 |
if ($oPps->{'Type'} == &OLE::Storage_Lite::PpsType_File()) |
|
300
|
0 |
0 |
if ($oPps->{'Size'} < $rhInfo->{'_SMALL_SIZE'}) { } |
|
302
|
0 |
0 |
$oPps->{'Size'} % $rhInfo->{'_SMALL_BLOCK_SIZE'} ? : |
|
307
|
0 |
0 |
$oPps->{'Size'} % $rhInfo->{'_BIG_BLOCK_SIZE'} ? : |
|
313
|
0 |
0 |
$iSBcnt % $iSlCnt ? : |
|
315
|
0 |
0 |
$iSmallLen % $rhInfo->{'_BIG_BLOCK_SIZE'} ? : |
|
318
|
0 |
0 |
$iCnt % $iBdCnt ? : |
|
328
|
0 |
0 |
$iWk > int $iWk ? : |
|
344
|
0 |
0 |
$iAllW % $iBlCnt ? : |
|
345
|
0 |
0 |
($iAllW + $iBdCntW) % $iBlCnt ? : |
|
348
|
0 |
0 |
if ($iBdCnt > $i1stBdL) |
|
353
|
0 |
0 |
if ($iAll > $i1stBdMax) |
|
355
|
0 |
0 |
$iBBleftover % $iBlCnt ? : |
|
356
|
0 |
0 |
$iBdCnt % $iBlCnt ? : |
|
358
|
0 |
0 |
$iBBleftover % $iBlCnt ? : |
|
|
0 |
0 |
if $iBdCnt == int($iBBleftover / $iBlCnt) + ($iBBleftover % $iBlCnt ? 1 : 0) |
|
365
|
0 |
0 |
$iSBDcnt ? : |
|
383
|
0 |
0 |
if ($iAll <= $i1stBdMax) { } |
|
400
|
0 |
0 |
if $i < $i1stBdL |
|
412
|
0 |
0 |
if ($oPps->{'Type'} != &OLE::Storage_Lite::PpsType_Dir()) |
|
415
|
0 |
0 |
if ($oPps->{'Size'} >= $rhInfo->{'_SMALL_SIZE'} or $oPps->{'Type'} == &OLE::Storage_Lite::PpsType_Root() and defined $oPps->{'Data'}) |
|
419
|
0 |
0 |
if ($oPps->{'_PPS_FILE'}) { } |
|
435
|
0 |
0 |
if $oPps->{'Size'} % $rhInfo->{'_BIG_BLOCK_SIZE'} |
|
440
|
0 |
0 |
$oPps->{'Size'} % $rhInfo->{'_BIG_BLOCK_SIZE'} ? : |
|
460
|
0 |
0 |
if $iCnt % $iBCnt |
|
462
|
0 |
0 |
$iCnt % $iBCnt ? : |
|
473
|
0 |
0 |
if ($#$aThis < 0) { } |
|
|
0 |
0 |
elsif ($#$aThis == 0) { } |
|
492
|
0 |
0 |
$#$aThis > 1 ? : |
|
515
|
0 |
0 |
if ($#$aThis < 0) { } |
|
|
0 |
0 |
elsif ($#$aThis == 0) { } |
|
554
|
0 |
0 |
if ($#$aThis < 0) { } |
|
|
0 |
0 |
elsif ($#$aThis == 0) { } |
|
593
|
0 |
0 |
if ($#$aThis < 0) { } |
|
|
0 |
0 |
elsif ($#$aThis == 0) { } |
|
639
|
0 |
0 |
$iAllW % $iBbCnt ? : |
|
644
|
0 |
0 |
if ($iAll > $i1stBdMax) |
|
647
|
0 |
0 |
$iBBleftover % $iBlCnt ? : |
|
648
|
0 |
0 |
$iBdCnt % $iBlCnt ? : |
|
650
|
0 |
0 |
$iBBleftover % $iBlCnt ? : |
|
|
0 |
0 |
if $iBdCnt == int($iBBleftover / $iBlCnt) + ($iBBleftover % $iBlCnt ? 1 : 0) |
|
659
|
0 |
0 |
if ($iSbdSize > 0) |
|
685
|
0 |
0 |
if ($iAllW + $iBdCnt) % $iBbCnt |
|
688
|
0 |
0 |
if ($iBdCnt > $i1stBdL) |
|
692
|
0 |
0 |
if ($iN >= $iBbCnt - 1) |
|
699
|
0 |
0 |
if ($iBdCnt - $i1stBdL) % ($iBbCnt - 1) |
|
758
|
0 |
0 |
if (not defined $sFile or $sFile eq '') { } |
|
|
0 |
0 |
elsif (UNIVERSAL::isa($sFile, 'IO::Handle')) { } |
|
|
0 |
0 |
elsif (not ref $sFile) { } |
|
767
|
0 |
0 |
unless $oSelf->{'_PPS_FILE'} |
|
768
|
0 |
0 |
unless $oSelf->{'_PPS_FILE'}->open("$sFile", "r+") |
|
773
|
0 |
0 |
if ($oSelf->{'_PPS_FILE'}) |
|
785
|
0 |
0 |
if ($oSelf->{'_PPS_FILE'}) { } |
|
873
|
0 |
0 |
unless $rhInfo |
|
887
|
0 |
0 |
unless $rhInfo |
|
901
|
0 |
0 |
unless $rhInfo |
|
914
|
0 |
0 |
if (ref $sFile eq 'SCALAR') { } |
|
|
0 |
0 |
elsif (UNIVERSAL::isa($sFile, 'IO::Handle')) { } |
|
|
0 |
0 |
elsif (not ref $sFile) { } |
|
927
|
0 |
0 |
unless $oIo->open("<$sFile") |
|
943
|
0 |
0 |
if (defined $raDone) { } |
|
944
|
0 |
0 |
if exists $raDone->{$iNo} |
|
955
|
0 |
0 |
if ($oPps->{'DirPps'} != 4294967295) { } |
|
965
|
0 |
0 |
if $oPps->{'PrevPps'} != 4294967295 |
|
968
|
0 |
0 |
if $oPps->{'NextPps'} != 4294967295 |
|
979
|
0 |
0 |
if (defined $raDone) { } |
|
980
|
0 |
0 |
if exists $raDone->{$iNo} |
|
988
|
0 |
0 |
if ($iCase and defined &first(sub {
$_ =~ /^\Q$oPps->{'Name'}\E$/i, @$raName;
}
) or defined &first(sub {
$_ eq $oPps->{'Name'}, @$raName;
}
)) { } |
|
990
|
0 |
0 |
if $bData |
|
998
|
0 |
0 |
if $oPps->{'DirPps'} != 4294967295 |
|
1000
|
0 |
0 |
if $oPps->{'PrevPps'} != 4294967295 |
|
1002
|
0 |
0 |
if $oPps->{'NextPps'} != 4294967295 |
|
1017
|
0 |
0 |
unless $sWk eq "\320\317\21\340\241\261\32\341" |
|
1020
|
0 |
0 |
unless defined $iWk |
|
1024
|
0 |
0 |
unless defined $iWk |
|
1028
|
0 |
0 |
unless defined $iWk |
|
1032
|
0 |
0 |
unless defined $iWk |
|
1040
|
0 |
0 |
unless defined $iWk |
|
1044
|
0 |
0 |
unless defined $iWk |
|
1048
|
0 |
0 |
unless defined $iWk |
|
1052
|
0 |
0 |
unless defined $iWk |
|
1067
|
0 |
0 |
unless $iBlockNo < 4294967292 |
|
1074
|
0 |
0 |
unless $iBlockNo < 4294967292 |
|
1081
|
0 |
0 |
unless $iBlockNo < 4294967292 |
|
1094
|
0 |
0 |
unless $FILE |
|
1095
|
0 |
0 |
if $FILE->seek($iPos, 0) == 0 |
|
1096
|
0 |
0 |
if $FILE->read($sWk, $iLen) != $iLen |
|
1114
|
0 |
0 |
$iBdbCnt < $i1stCnt ? : |
|
1122
|
0 |
0 |
$iBdbCnt < $iBdlCnt ? : |
|
1141
|
0 |
0 |
if ($aWk[$i] != $iBlkNo + 1) |
|
1163
|
0 |
0 |
unless defined $iBlock |
|
1168
|
0 |
0 |
unless $sWk |
|
1171
|
0 |
0 |
$iNmSize > 2 ? : |
|
1173
|
0 |
0 |
$iType == 5 || $iType == 1 ? : |
|
|
0 |
0 |
$iType == 5 || $iType == 1 ? : |
|
1180
|
0 |
0 |
if ($bData) { } |
|
1200
|
0 |
0 |
unless $iBlockNo < 4294967292 |
|
1210
|
0 |
0 |
if ($iType == 2) { } |
|
|
0 |
0 |
elsif ($iType == 5) { } |
|
|
0 |
0 |
elsif ($iType == 1) { } |
|
1211
|
0 |
0 |
if ($iSize < 4096) { } |
|
1233
|
0 |
0 |
unless $iBlock < 4294967292 |
|
1246
|
0 |
0 |
if ($aKeys->[$iIndex] < $iBlock) { } |
|
1255
|
0 |
0 |
if $i < 0 |
|
1259
|
0 |
0 |
if $iRest < $iGetSize |
|
1286
|
0 |
0 |
if ($iSize > $iSmallBlkSize) { } |
|
1370
|
0 |
99 |
unless $localtime |
|
1374
|
39 |
60 |
unless $localtimecopy[5] > 99 |