Branch Coverage

blib/lib/Ace.pm
Criterion Covered Total %
branch 18 232 7.7


line true false branch
66 0 3 if (@_ == 1)
77 0 3 if defined $url
81 0 3 if ($path) { }
87 0 0 $server_type eq 'Ace::SocketServer' ? :
88 3 0 unless defined $query_timeout
89 3 0 if $port < 100000
90 0 3 if $port >= 100000
94 0 3 unless eval "require $server_type"
95 0 3 if ($path) { }
101 3 0 unless ($database)
122 0 0 if $cache
129 0 0 if $self->ping
132 0 0 if ($$self{'path'}) { }
138 0 0 unless ($database)
149 0 0 if @_
158 0 0 if (my $selector = $self->class)
159 0 0 if (ref $selector eq 'HASH') { }
0 0 elsif ($selector->can('class_for')) { }
0 0 elsif (not ref $selector) { }
175 0 0 unless $selected_class->can('new')
186 0 0 if ($url)
188 0 0 if (m[^rpcace://([^:]+):(\d+)$]) { }
0 0 elsif (m[^sace://([\w:]+)\@([^:]+):(\d+)$]) { }
0 0 elsif (m[^sace://([^:]+):(\d+)$]) { }
0 0 elsif (m[^tace:(/.+)$]) { }
0 0 elsif (m[^(/.+)$]) { }
208 0 0 if ($user =~ /:/)
231 0 0 unless ($$self{'models'}{$model})
249 0 0 if $obj
252 0 0 unless $obj = $self->_acedb_get($class, $name, $fill)
259 0 0 unless $self->count($class, $name) >= 1
262 0 0 unless $filltag
264 0 0 if (defined $filltag and $filltag eq '1') { }
281 0 0 unless defined $MEMORY_CACHE{$key}
282 0 0 if 'Ace'->debug
289 0 0 unless @_ == 1
292 0 0 if exists $MEMORY_CACHE{$key}
293 0 0 if 'Ace'->debug
304 0 0 unless my $obj = shift()
315 0 0 unless my $cache = $self->cache
317 0 0 if ($obj and not exists $$obj{'.root'})
324 0 0 $obj ? :
0 0 if 'Ace'->debug
325 0 0 if $obj
335 0 0 unless $obj->name
338 0 0 unless my $cache = $self->cache
340 0 0 if 'Ace'->debug
341 0 0 if ($key eq ':')
351 0 0 unless my $cache = $self->cache
353 0 0 if 'Ace'->debug
367 0 0 if (defined $class and defined $pattern and not $pattern =~ /[\?\*]/)
378 0 0 if (defined $query) { }
0 0 elsif (defined $class) { }
379 0 0 unless $query =~ /^query\s/
390 0 0 if defined $total
394 0 0 if not wantarray and $pattern =~ /(?:[^\\]|^)[*?]/
397 0 0 if ($filltag) { }
400 0 0 $filled ? :
403 0 0 wantarray ? :
409 0 0 if @_
416 0 0 if $params and not ref $params
418 0 0 unless eval { do { require Cache::SizeAwareFileCache } }
434 0 0 unless defined $name
437 0 0 if @_
445 0 0 unless $class and $pattern
451 0 0 if (defined $r and $r =~ /write access/im)
456 0 0 unless ($r =~ /($class)\s+\"([^\"]+)\"$/im)
469 0 0 if ($r =~ /(AQL error.*)/)
475 0 0 if m[^//]
476 0 0 if /^\0/
501 0 0 unless $self->count($class, $pattern)
505 0 0 $$self{'timestamps'} ? :
508 0 0 unless ($result =~ /(\d+) object dumped/m)
517 0 0 unless $$self{'database'}
522 0 0 if defined $data
530 0 0 unless $no_alert
531 0 0 $parse ? :
538 0 0 if defined $_[0]
546 0 0 if $self->auto_save
555 0 0 if (caller()) =~ /^Cache\:\:/
556 0 0 if 'Ace'->debug
565 0 7 unless @param
568 0 7 if (ref $param[0] eq 'HASH') { }
571 4 3 unless defined $param[0] and substr($param[0], 0, 1) eq '-'
588 3 27 if (ref $key eq 'ARRAY') { }
590 0 6 if defined $value
600 0 3 if %param
617 0 0 if defined $offset
618 0 0 if defined $count
623 0 0 unless $class and $name
626 0 0 unless ($obj)
641 0 0 unless defined $tag
643 0 0 if $$self{'timestamps'}
644 0 0 if defined $start
645 0 0 if defined $count
651 0 0 if ($tag)
660 0 0 if (my $obj = $self->memory_cache_store($_)) { }
661 0 0 unless $obj->filled
667 0 0 wantarray ? :
672 0 0 unless $$self{'database'}->status == 1
678 0 0 if m[^//]
679 0 0 unless /\S/
689 0 0 if $$self{'iterators'}{$_}
696 0 0 if $$self{'path'}
697 0 0 $self->db && $self->db->isa('Ace::SocketServer') ? :
698 0 0 if $$self{'host'}
705 0 0 if (ref $arg and $arg->isa('Ace')) { }
710 0 0 $reversed ? :
725 0 0 unless defined $query
726 0 0 unless defined $pattern
727 0 0 unless defined $class
730 0 0 if (defined $$self{'active_list'} and defined $$self{'active_list'}{$active_tag})
735 0 0 if ($query) { }
736 0 0 unless $query =~ /^query\s/
745 0 0 unless ($result =~ /(\d+) Active Objects/m)
1826 1 0 if @_