| 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'} ? : |
|
201
|
0 |
0 |
unless $rhInfo |
|
204
|
0 |
0 |
$rhInfo->{'_BIG_BLOCK_SIZE'} ? : |
|
207
|
0 |
0 |
$rhInfo->{'_SMALL_BLOCK_SIZE'} ? : |
|
215
|
0 |
0 |
if (ref $sFile eq 'SCALAR') { } |
|
|
0 |
0 |
elsif (UNIVERSAL::isa($sFile, 'IO::Handle')) { } |
|
|
0 |
0 |
elsif (not ref $sFile) { } |
|
231
|
0 |
0 |
if ($sFile ne '-') { } |
|
233
|
0 |
0 |
unless $oIo->open($sFile, "w") |
|
239
|
0 |
0 |
unless $oIo->fdopen(fileno STDOUT, "w") |
|
256
|
0 |
0 |
if ($bNoAs) { } |
|
282
|
0 |
0 |
if $closeFile |
|
296
|
0 |
0 |
if ($oPps->{'Type'} == &OLE::Storage_Lite::PpsType_File()) |
|
298
|
0 |
0 |
if ($oPps->{'Size'} < $rhInfo->{'_SMALL_SIZE'}) { } |
|
300
|
0 |
0 |
$oPps->{'Size'} % $rhInfo->{'_SMALL_BLOCK_SIZE'} ? : |
|
305
|
0 |
0 |
$oPps->{'Size'} % $rhInfo->{'_BIG_BLOCK_SIZE'} ? : |
|
311
|
0 |
0 |
$iSBcnt % $iSlCnt ? : |
|
313
|
0 |
0 |
$iSmallLen % $rhInfo->{'_BIG_BLOCK_SIZE'} ? : |
|
316
|
0 |
0 |
$iCnt % $iBdCnt ? : |
|
326
|
0 |
0 |
$iWk > int $iWk ? : |
|
342
|
0 |
0 |
$iAllW % $iBlCnt ? : |
|
343
|
0 |
0 |
($iAllW + $iBdCntW) % $iBlCnt ? : |
|
346
|
0 |
0 |
if ($iBdCnt > $i1stBdL) |
|
351
|
0 |
0 |
if ($iAll > $i1stBdMax) |
|
353
|
0 |
0 |
$iBBleftover % $iBlCnt ? : |
|
354
|
0 |
0 |
$iBdCnt % $iBlCnt ? : |
|
356
|
0 |
0 |
$iBBleftover % $iBlCnt ? : |
|
|
0 |
0 |
if $iBdCnt == int($iBBleftover / $iBlCnt) + ($iBBleftover % $iBlCnt ? 1 : 0) |
|
363
|
0 |
0 |
$iSBDcnt ? : |
|
381
|
0 |
0 |
if ($iAll <= $i1stBdMax) { } |
|
398
|
0 |
0 |
if $i < $i1stBdL |
|
410
|
0 |
0 |
if ($oPps->{'Type'} != &OLE::Storage_Lite::PpsType_Dir()) |
|
413
|
0 |
0 |
if ($oPps->{'Size'} >= $rhInfo->{'_SMALL_SIZE'} or $oPps->{'Type'} == &OLE::Storage_Lite::PpsType_Root() and defined $oPps->{'Data'}) |
|
417
|
0 |
0 |
if ($oPps->{'_PPS_FILE'}) { } |
|
433
|
0 |
0 |
if $oPps->{'Size'} % $rhInfo->{'_BIG_BLOCK_SIZE'} |
|
438
|
0 |
0 |
$oPps->{'Size'} % $rhInfo->{'_BIG_BLOCK_SIZE'} ? : |
|
458
|
0 |
0 |
if $iCnt % $iBCnt |
|
460
|
0 |
0 |
$iCnt % $iBCnt ? : |
|
471
|
0 |
0 |
if ($aThis->$#* < 0) { } |
|
|
0 |
0 |
elsif ($aThis->$#* == 0) { } |
|
490
|
0 |
0 |
$aThis->$#* > 1 ? : |
|
513
|
0 |
0 |
if ($aThis->$#* < 0) { } |
|
|
0 |
0 |
elsif ($aThis->$#* == 0) { } |
|
552
|
0 |
0 |
if ($aThis->$#* < 0) { } |
|
|
0 |
0 |
elsif ($aThis->$#* == 0) { } |
|
591
|
0 |
0 |
if ($aThis->$#* < 0) { } |
|
|
0 |
0 |
elsif ($aThis->$#* == 0) { } |
|
637
|
0 |
0 |
$iAllW % $iBbCnt ? : |
|
642
|
0 |
0 |
if ($iAll > $i1stBdMax) |
|
645
|
0 |
0 |
$iBBleftover % $iBlCnt ? : |
|
646
|
0 |
0 |
$iBdCnt % $iBlCnt ? : |
|
648
|
0 |
0 |
$iBBleftover % $iBlCnt ? : |
|
|
0 |
0 |
if $iBdCnt == int($iBBleftover / $iBlCnt) + ($iBBleftover % $iBlCnt ? 1 : 0) |
|
657
|
0 |
0 |
if ($iSbdSize > 0) |
|
683
|
0 |
0 |
if ($iAllW + $iBdCnt) % $iBbCnt |
|
686
|
0 |
0 |
if ($iBdCnt > $i1stBdL) |
|
690
|
0 |
0 |
if ($iN >= $iBbCnt - 1) |
|
697
|
0 |
0 |
if ($iBdCnt - $i1stBdL) % ($iBbCnt - 1) |
|
754
|
0 |
0 |
if (not defined $sFile or $sFile eq '') { } |
|
|
0 |
0 |
elsif (UNIVERSAL::isa($sFile, 'IO::Handle')) { } |
|
|
0 |
0 |
elsif (not ref $sFile) { } |
|
763
|
0 |
0 |
unless $oSelf->{'_PPS_FILE'} |
|
764
|
0 |
0 |
unless $oSelf->{'_PPS_FILE'}->open("$sFile", "r+") |
|
769
|
0 |
0 |
if ($oSelf->{'_PPS_FILE'}) |
|
781
|
0 |
0 |
if ($oSelf->{'_PPS_FILE'}) { } |
|
864
|
0 |
0 |
unless $rhInfo |
|
878
|
0 |
0 |
unless $rhInfo |
|
892
|
0 |
0 |
unless $rhInfo |
|
905
|
0 |
0 |
if (ref $sFile eq 'SCALAR') { } |
|
|
0 |
0 |
elsif (UNIVERSAL::isa($sFile, 'IO::Handle')) { } |
|
|
0 |
0 |
elsif (not ref $sFile) { } |
|
918
|
0 |
0 |
unless $oIo->open($sFile, "r") |
|
934
|
0 |
0 |
if (defined $raDone) { } |
|
935
|
0 |
0 |
if exists $raDone->{$iNo} |
|
946
|
0 |
0 |
if ($oPps->{'DirPps'} != 4294967295) { } |
|
956
|
0 |
0 |
if $oPps->{'PrevPps'} != 4294967295 |
|
959
|
0 |
0 |
if $oPps->{'NextPps'} != 4294967295 |
|
970
|
0 |
0 |
if (defined $raDone) { } |
|
971
|
0 |
0 |
if exists $raDone->{$iNo} |
|
979
|
0 |
0 |
if ($iCase and &first(sub {
/^\Q$oPps->{'Name'}\E$/i;
}
, @$raName) or &first(sub {
$_ eq $oPps->{'Name'};
}
, @$raName)) { } |
|
981
|
0 |
0 |
if $bData |
|
989
|
0 |
0 |
if $oPps->{'DirPps'} != 4294967295 |
|
991
|
0 |
0 |
if $oPps->{'PrevPps'} != 4294967295 |
|
993
|
0 |
0 |
if $oPps->{'NextPps'} != 4294967295 |
|
1008
|
0 |
0 |
unless $sWk eq "\320\317\21\340\241\261\32\341" |
|
1011
|
0 |
0 |
unless defined $iWk |
|
1015
|
0 |
0 |
unless defined $iWk |
|
1019
|
0 |
0 |
unless defined $iWk |
|
1023
|
0 |
0 |
unless defined $iWk |
|
1031
|
0 |
0 |
unless defined $iWk |
|
1035
|
0 |
0 |
unless defined $iWk |
|
1039
|
0 |
0 |
unless defined $iWk |
|
1043
|
0 |
0 |
unless defined $iWk |
|
1058
|
0 |
0 |
unless $iBlockNo < 4294967292 |
|
1065
|
0 |
0 |
unless $iBlockNo < 4294967292 |
|
1072
|
0 |
0 |
unless $iBlockNo < 4294967292 |
|
1085
|
0 |
0 |
unless $FILE |
|
1086
|
0 |
0 |
if $FILE->seek($iPos, 0) == 0 |
|
1087
|
0 |
0 |
if $FILE->read($sWk, $iLen) != $iLen |
|
1105
|
0 |
0 |
$iBdbCnt < $i1stCnt ? : |
|
1113
|
0 |
0 |
$iBdbCnt < $iBdlCnt ? : |
|
1132
|
0 |
0 |
if ($aWk[$i] != $iBlkNo + 1) |
|
1154
|
0 |
0 |
unless defined $iBlock |
|
1159
|
0 |
0 |
unless $sWk |
|
1162
|
0 |
0 |
$iNmSize > 2 ? : |
|
1164
|
0 |
0 |
$iType == 5 || $iType == 1 ? : |
|
|
0 |
0 |
$iType == 5 || $iType == 1 ? : |
|
1171
|
0 |
0 |
if ($bData) { } |
|
1191
|
0 |
0 |
unless $iBlockNo < 4294967292 |
|
1201
|
0 |
0 |
if ($iType == 2) { } |
|
|
0 |
0 |
elsif ($iType == 5) { } |
|
|
0 |
0 |
elsif ($iType == 1) { } |
|
1202
|
0 |
0 |
if ($iSize < 4096) { } |
|
1224
|
0 |
0 |
unless $iBlock < 4294967292 |
|
1237
|
0 |
0 |
if ($aKeys->[$iIndex] < $iBlock) { } |
|
1246
|
0 |
0 |
if $i < 0 |
|
1250
|
0 |
0 |
if $iRest < $iGetSize |
|
1277
|
0 |
0 |
if ($iSize > $iSmallBlkSize) { } |
|
1361
|
0 |
99 |
unless $localtime |
|
1365
|
39 |
60 |
unless $localtime_copy[5] > 99 |