web/cgi-bin/yatt.lib/YATT/Registry.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 52 | 84 | 61.9 |
line | l | !l | condition |
---|---|---|---|
457 | 0 | 7 | $dir = $root and next |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
211 | 3 | 0 | 0 | 'YATT::Registry'->is_reloading and defined *{$glob;}{'CODE'} |
288 | 196 | 33 | 322 | $node->{'cf_age'} and not $root->{'cf_auto_reload'} |
292 | 196 | 26 | 7 | $node->{'cf_age'} and not $node->{'is_loaded'} |
389 | 0 | 0 | 101 | defined $root and ref $root |
0 | 0 | 101 | defined $root and ref $root and $root->isa('YATT::Registry') | |
440 | 4 | 2 | 0 | not $nsid = $dir->{'Template'}{$name} and $dir->{'cf_base_nsid'} |
456 | 0 | 12 | 19 | $dir and defined(my $ns = shift @nspath) |
491 | 7 | 2 | 0 | not +($nsid = $d->{'Dir'}{$ns}) || ($nsid = $d->{'Template'}{$ns}) and $d->{'cf_base_nsid'} |
519 | 20 | 2 | 0 | defined $dir->{'cf_name'} and $dir->{'cf_name'} eq $ns |
543 | 9 | 2 | 6 | $dir->{'cf_base_nsid'} and $root->nsobj($dir->{'cf_base_nsid'})->widget_by_name($root, $name) |
553 | 1 | 0 | 0 | defined $parent->{'cf_name'} and $parent->{'cf_name'} eq $ns |
866 | 136 | 96 | 7 | defined $typename and my $sub = $root->can("attr_declare_$typename") |
912 | 196 | 3 | 23 | defined $old and $old >= $mtime |
974 | 38 | 5 | 0 | $root->{'cf_default_base_class'} and $root->{'cf_default_base_class'} ne $root->{'cf_pkg'} || $root->{'is_loaded'} |
line | l | !l | condition |
---|---|---|---|
276 | 0 | 255 | $sep || '::' |
250 | 5 | $root->{'cf_app_prefix'} || '::' | |
472 | 0 | 4 | $dict ||= {} |
614 | 0 | 0 | $msg || 'Not yet implemented' |
945 | 0 | 17 | $layer || '' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
268 | 1248 | 275 | 0 | $nsobj->{'cf_pkg'} ||= do { my $pkg = do { if ($root == $nsobj) { '::' unless $root->{'cf_app_prefix'}; } else { join $sep || '::', $root->{'cf_app_prefix'} || '::', sprintf('%.1s%d', $nsobj->type_name, $nsobj->{'cf_nsid'}); } }; $root->checked_eval("package $pkg"); $pkg } |
286 | 551 | 0 | 0 | $node ||= $root |
429 | 0 | 0 | 2 | $dir->{'Dir'}{$nsname} || $dir->{'Template'}{$nsname} |
491 | 1 | 6 | 2 | ($nsid = $d->{'Dir'}{$ns}) || ($nsid = $d->{'Template'}{$ns}) |
805 | 17 | 71 | 0 | $builder->{'cf_root_builder'} || $builder |
974 | 3 | 0 | 2 | $root->{'cf_default_base_class'} ne $root->{'cf_pkg'} || $root->{'is_loaded'} |
1021 | 0 | 94 | 0 | $loader->{'Cache'}{$path} ||= $root->createNS('Dir', 'name', $name, 'loadkey', &untaint_any($path), 'parent_nsid', $dir->{'cf_nsid'}, 'base_nsid', $dir->{'cf_base_nsid'}) |
2 | 94 | 0 | $dir->{'Dir'}{$name} ||= ($loader->{'Cache'}{$path} ||= $root->createNS('Dir', 'name', $name, 'loadkey', &untaint_any($path), 'parent_nsid', $dir->{'cf_nsid'}, 'base_nsid', $dir->{'cf_base_nsid'})) | |
1028 | 0 | 161 | 0 | $loader->{'Cache'}{$path} ||= $root->createNS('Template', 'name', $1, 'loadkey', &untaint_any($path), 'parent_nsid', $dir->{'cf_nsid'}, 'base_nsid', $dir->{'cf_base_nsid'}) |
2 | 161 | 0 | $dir->{'Template'}{$1} ||= ($loader->{'Cache'}{$path} ||= $root->createNS('Template', 'name', $1, 'loadkey', &untaint_any($path), 'parent_nsid', $dir->{'cf_nsid'}, 'base_nsid', $dir->{'cf_base_nsid'})) |