| line |
true |
false |
branch |
|
40
|
0 |
0 |
unless $param =~ /^_(.+)$/ |
|
199
|
0 |
0 |
if (defined $item) |
|
202
|
0 |
0 |
unless defined $self->_Services->{$service} |
|
211
|
0 |
0 |
if (not -r $real_path) { } |
|
230
|
0 |
0 |
if ($otime > $ctime or $ctime < $xtime) { } |
|
290
|
0 |
0 |
unless $path eq '/Shuffle' |
|
292
|
0 |
0 |
if (not defined $item or $item->_Expired == 1) |
|
313
|
0 |
0 |
if ($path eq '/') { } |
|
|
0 |
0 |
elsif ($path eq '/Shuffle') { } |
|
|
0 |
0 |
elsif ($path =~ m[/Browse/]) { } |
|
328
|
0 |
0 |
unless defined $self->_Services->{$service} |
|
342
|
0 |
0 |
unless defined $self->_Services->{$service} |
|
347
|
0 |
0 |
if grep {/^\.\.$/;} split(m[/], $path, 0) |
|
349
|
0 |
0 |
if $path =~ m[.+?/Browse/(.*)] |
|
350
|
0 |
0 |
if $path =~ m[(.+?)/Browse.*] |
|
352
|
0 |
0 |
unless opendir DIR, $path |
|
355
|
0 |
0 |
if $file =~ /^\./ |
|
357
|
0 |
0 |
if (defined $server) { } |
|
364
|
0 |
0 |
unless $file =~ /^$letter/ |
|
368
|
0 |
0 |
if (-d $full_path) { } |
|
|
0 |
0 |
elsif (-r $full_path) { } |
|
394
|
0 |
0 |
if defined $server |
|
409
|
0 |
0 |
unless defined $self->_Services->{$service} |
|
414
|
0 |
0 |
if grep {/^\.\.$/;} split(m[/], $path, 0) |
|
417
|
0 |
0 |
if (-d $path) { } |
|
|
0 |
0 |
elsif (-r $path) { } |
|
467
|
0 |
0 |
unless (ref($params) =~ /^TiVo::Calypso::Request/) |
|
478
|
0 |
0 |
if (defined $params->_EnvPathInfo and $params->_EnvPathInfo) { } |
|
483
|
0 |
0 |
if $item->_Service->_Scrobble |
|
489
|
0 |
0 |
if ($isDirty == 1) |
|
506
|
0 |
0 |
unless (defined $response) |
|
514
|
0 |
0 |
if (defined $params->_Format) |
|
518
|
0 |
0 |
if ($mime_type eq 'text/html') |
|
620
|
0 |
0 |
if ($data_type eq 'HASH') { } |
|
|
0 |
0 |
elsif ($data_type eq 'ARRAY') { } |
|
624
|
0 |
0 |
unless defined $$data{$key} |
|
629
|
0 |
0 |
if ($key_type eq 'HASH') { } |
|
|
0 |
0 |
elsif ($key_type eq 'ARRAY') { } |
|
703
|
0 |
0 |
unless defined $container |
|
711
|
0 |
0 |
if (defined $params->_Recurse and uc $params->_Recurse eq 'YES') { } |
|
725
|
0 |
0 |
unless ($params->_Container eq '/Shuffle') |
|
726
|
0 |
0 |
if ref($a) =~ /^TiVo::Calypso::Container/ and ref($b) =~ /^TiVo::Calypso::Item/ |
|
730
|
0 |
0 |
if ref($b) =~ /^TiVo::Calypso::Container/ and ref($a) =~ /^TiVo::Calypso::Item/ |
|
786
|
0 |
0 |
if (defined $_->_Duration) |
|
793
|
0 |
0 |
if (defined $params->_SortOrder) |
|
794
|
0 |
0 |
if (uc $params->_SortOrder eq 'RANDOM') |
|
798
|
0 |
0 |
if (defined $params->_RandomStart) |
|
805
|
0 |
0 |
unless defined $list[$i]->_Url |
|
806
|
0 |
0 |
unless $list[$i]->_Url eq $short_start |
|
814
|
0 |
0 |
if defined $params->_RandomSeed |
|
819
|
0 |
0 |
if $i == $j |
|
824
|
0 |
0 |
if defined $start |
|
833
|
0 |
0 |
if (defined $params->_AnchorItem) |
|
840
|
0 |
0 |
unless defined $list[$i]->_Url |
|
841
|
0 |
0 |
unless $list[$i]->_Url eq $short_anchor |
|
848
|
0 |
0 |
if (defined $params->_AnchorOffset) |
|
856
|
0 |
0 |
if (defined $params->_ItemCount) |
|
860
|
0 |
0 |
if ($count < 0) |
|
864
|
0 |
0 |
if (defined $params->_AnchorItem) { } |
|
873
|
0 |
0 |
if ($anchor_pos >= 0 and $anchor_pos <= $#list) { } |
|
955
|
0 |
0 |
if (ref($service) =~ /^TiVo::Calypso::Container/) { } |
|
978
|
0 |
0 |
unless $self->init(%params) |
|
1040
|
0 |
0 |
if defined $self->_Contents |
|
1045
|
0 |
0 |
if ($self->_Path eq '/Shuffle') { } |
|
|
0 |
0 |
elsif ($self->_Path eq $server->_Services->{'/Music'}->_Path) { } |
|
1048
|
0 |
0 |
unless opendir DIR, $server->_Services->{'/Shuffle'}->_Path |
|
1051
|
0 |
0 |
if $file =~ /^\./ |
|
1065
|
0 |
0 |
unless opendir DIR, $server->_Services->{'/Shuffle'}->_Path . '/' . $artist |
|
1070
|
0 |
0 |
if $file =~ /^\./ |
|
1079
|
0 |
0 |
unless opendir DIR, $server->_Services->{'/Shuffle'}->_Path . '/' . $album |
|
1084
|
0 |
0 |
if $file =~ /^\./ |
|
1121
|
0 |
0 |
unless opendir DIR, $self->_Path |
|
1124
|
0 |
0 |
if $file =~ /^\./ |
|
1126
|
0 |
0 |
if (defined $server) { } |
|
1138
|
0 |
0 |
if (-d $full_path) { } |
|
|
0 |
0 |
elsif (-r $full_path) { } |
|
1171
|
0 |
0 |
if defined $server |
|
1187
|
0 |
0 |
if ref($a) =~ /^TiVo::Calypso::Container/ and ref($b) =~ /^TiVo::Calypso::Item/ |
|
1190
|
0 |
0 |
if ref($b) =~ /^TiVo::Calypso::Container/ and ref($a) =~ /^TiVo::Calypso::Item/ |
|
1204
|
0 |
0 |
if (ref($item) =~ /^TiVo::Calypso::Container/) { } |
|
1271
|
0 |
0 |
if ($params{'SCROBBLER'}) |
|
1307
|
0 |
0 |
unless defined $self->_Service->_MediaTypes |
|
1325
|
0 |
0 |
unless $self->init |
|
1382
|
0 |
0 |
unless defined $info |
|
1396
|
0 |
0 |
if (stat $self->_Path) |
|
1467
|
0 |
0 |
if (defined $params->_Seek) |
|
1521
|
0 |
0 |
if (defined $self->_EnvQueryString) |
|
1538
|
0 |
0 |
if (defined $query and $query =~ /[=&]/) |
|
1549
|
0 |
0 |
if (defined $key) |