Condition Coverage

blib/lib/TiVo/Calypso.pm
Criterion Covered Total %
condition 0 173 0.0


and 3 conditions

line !l l&&!r l&&r condition
478 0 0 0 defined $params->_EnvPathInfo and $params->_EnvPathInfo
711 0 0 0 defined $params->_Recurse and uc $params->_Recurse eq 'YES'
726 0 0 0 ref($a) =~ /^TiVo::Calypso::Container/ and ref($b) =~ /^TiVo::Calypso::Item/
730 0 0 0 ref($b) =~ /^TiVo::Calypso::Container/ and ref($a) =~ /^TiVo::Calypso::Item/
873 0 0 0 $anchor_pos >= 0 and $anchor_pos <= $#list
1187 0 0 0 ref($a) =~ /^TiVo::Calypso::Container/ and ref($b) =~ /^TiVo::Calypso::Item/
1190 0 0 0 ref($b) =~ /^TiVo::Calypso::Container/ and ref($a) =~ /^TiVo::Calypso::Item/
1538 0 0 0 defined $query and $query =~ /[=&]/

or 2 conditions

line l !l condition
65 0 0 shift() || (return undef)
80 0 0 shift() || $self->_Object || (return undef)
94 0 0 shift() || $self->_Path || (return undef)
110 0 0 $params->_EnvScriptName || ''
153 0 0 $params{'SERVER_NAME'} || 'TiVo Server'
167 0 0 shift() || (return undef)
169 0 0 $self->_CacheDir || (return undef)
192 0 0 shift() || (return 1)
193 0 0 shift() || (return 1)
194 0 0 shift() || (return 1)
254 0 0 shift() || (return undef)
256 0 0 $self->_CacheDir || (return undef)
275 0 0 shift() || (return undef)
286 0 0 shift() || (return undef)
308 0 0 shift() || (return undef)
314 0 0 'TiVo::Calypso::Container::Server'->new('SERVICE', '/', 'TITLE', $self->_Name) || (return undef)
333 0 0 'TiVo::Calypso::Container'->new('PATH', $path, 'SERVICE', $service) || (return undef)
359 0 0 $server->thaw($object_path) || (next)
369 0 0 'TiVo::Calypso::Container'->new('PATH', $full_path, 'SERVICE', $service) || (next)
383 0 0 eval { do { $class->new($full_path, $self->_Service) } } || (next)
396 0 0 'TiVo::Calypso::Container'->new('SERVICE', "/Music/Browse/$letter", 'TITLE', "/Music/Browse/$letter") || (return undef)
418 0 0 'TiVo::Calypso::Container'->new('PATH', $path, 'SERVICE', $service) || (return undef)
431 0 0 eval { do { $class->new($path, $service) } } || (return undef)
435 0 0 $item || undef
444 0 0 shift() || (return undef)
463 0 0 shift() || (return undef)
481 0 0 $self->thaw($path_info) || (return undef)
499 0 0 uc $params->_Command || 'QUERYCONTAINER'
523 0 0 $self->xml_out($response) || (return undef)
545 0 0 shift() || (return undef)
610 0 0 shift() || (return undef)
611 0 0 shift() || 0
631 0 0 $self->xml_out($$data{$key}, $indent + 2) || ''
639 0 0 $self->xml_out($item, $indent + 2) || ''
707 0 0 $self->thaw($container) || (return undef)
828 0 0 scalar @list || 0
849 0 0 $params->_AnchorOffset || 0
892 0 0 $object->_ContentType || 'x-container/folder'
0 0 $object->_SourceFormat || 'x-container/folder'
0 0 scalar @children || 0
951 0 0 $params{'SERVICE'} || (return undef)
956 0 0 $service->path_to_obj($self->_Path) || (return undef)
1004 0 0 shift() || (return undef)
1021 0 0 shift() || (return undef)
1100 0 0 eval { do { $class->new($server->_Services->{'/Shuffle'}->_Path . '/' . $song, $self->_Service) } } || (next)
1111 0 0 'TiVo::Calypso::Container'->new('PATH', $self->_Path . '/Browse/' . $_, 'SERVICE', $self->_Service) || (next)
1129 0 0 $server->thaw($object_path) || (next)
1140 0 0 'TiVo::Calypso::Container'->new('PATH', $full_path, 'SERVICE', $self->_Service) || (next)
1156 0 0 eval { do { $class->new($full_path, $self->_Service) } } || (next)
1207 0 0 $server->thaw($item->_Object) || (next)
1240 0 0 $self->_Title || 'TiVo Server'
1269 0 0 $self->_Title || 'Music'
1299 0 0 shift() || (return undef)
1300 0 0 shift() || (return undef)
1309 0 0 $self->_Service->_MediaTypes->{$suffix} || (return undef)
1312 0 0 $self->_Service->path_to_obj($self->_Path) || (return undef)
1384 0 0 sprintf('%d', $$info{'BITRATE'} * 1000) || 0
1385 0 0 sprintf('%d', $$info{'FREQUENCY'} * 1000) || 0
1387 0 0 sprintf('%d', $$info{'SECS'} * 1000) || 0
1389 0 0 $$tag{'GENRE'} || ''
1390 0 0 $$tag{'ARTIST'} || ''
1391 0 0 $$tag{'ALBUM'} || ''
1392 0 0 $$tag{'YEAR'} || ''
1424 0 0 $params->_EnvScriptName || ''

or 3 conditions

line l !l&&r !l&&!r condition
112 0 0 0 $self->_Title || $self->_basename
230 0 0 0 $otime > $ctime or $ctime < $xtime
292 0 0 0 not defined $item or $item->_Expired == 1
677 0 0 0 $self->_Organization || $self->ORGANIZATION
0 0 0 $self->_Comment || $self->COMMENT
992 0 0 0 $self->_Title || $self->_basename
1393 0 0 0 $$tag{'TITLE'} || $self->_basename