| line |
true |
false |
branch |
|
107
|
0 |
22 |
unless defined $text |
|
170
|
1 |
4 |
if ($draft) |
|
174
|
4 |
7 |
if ($in_text) |
|
175
|
1 |
3 |
if ($line =~ /^\t/) { } |
|
183
|
1 |
6 |
if ($line =~ /^%VECTOR\t(.+)$/) { } |
|
|
0 |
6 |
elsif ($line =~ /^%SCORE\t(.+)$/) { } |
|
|
0 |
6 |
elsif ($line =~ /^%/) { } |
|
|
1 |
5 |
elsif ($line =~ /^$/) { } |
|
|
5 |
0 |
elsif ($line =~ /^(.+)=(.*)$/) { } |
|
185
|
1 |
0 |
if ($#fields % 2 == 1) { } |
|
210
|
5 |
0 |
$self ? : |
|
231
|
5 |
5 |
if (not defined $value) { } |
|
253
|
0 |
3 |
unless defined $text |
|
270
|
0 |
1 |
unless defined $text |
|
288
|
0 |
1 |
unless @_ |
|
291
|
0 |
1 |
unless $#_ % 2 == 1 |
|
307
|
0 |
1 |
unless defined $score |
|
319
|
1 |
1 |
unless defined $$self{'score'} |
|
347
|
0 |
3 |
unless $$self{'attrs'} |
|
364
|
1 |
11 |
unless defined $name and $$self{'attrs'} |
|
380
|
1 |
1 |
if $$self{'dtexts'} |
|
394
|
1 |
1 |
if $$self{'dtexts'} |
|
411
|
0 |
10 |
unless defined(my $v = $$self{'attrs'}{$attr_name}) |
|
415
|
2 |
2 |
if ($$self{'kwords'}) |
|
423
|
1 |
3 |
if (defined $$self{'score'} and $$self{'score'} >= 0) |
|
429
|
2 |
2 |
if $$self{'dtexts'} |
|
430
|
2 |
2 |
if $$self{'htexts'} |
|
485
|
1 |
0 |
$self ? : |
|
535
|
1 |
1 |
unless $max =~ /^\d+$/ |
|
597
|
2 |
14 |
unless ($mask = $$options{$option}) |
|
598
|
1 |
1 |
if ($option eq '1') { } |
|
649
|
2 |
0 |
if $$self{'attrs'} |
|
750
|
0 |
1 |
unless @_ |
|
783
|
1 |
1 |
unless defined $$self{'uri'} |
|
785
|
1 |
0 |
$self ? : |
|
813
|
0 |
1 |
unless wantarray |
|
885
|
1 |
2 |
unless defined $$self{$f} |
|
888
|
1 |
0 |
$self ? : |
|
922
|
0 |
5 |
unless $num =~ /^\d+$/ |
|
923
|
0 |
5 |
if $num < 0 or $num > $$self{'docs'} |
|
1058
|
0 |
1 |
if ($#_ == 0) { } |
|
1063
|
0 |
1 |
if $$self{'user'} |
|
1065
|
0 |
1 |
if $$self{'debug'} |
|
1074
|
0 |
1 |
if ($$self{'create'}) |
|
1075
|
0 |
0 |
if (not eval {
do {
$self->name
}
} or $@) |
|
1076
|
0 |
0 |
if $$self{'url'} =~ m[/node/([^/]+)/*] |
|
1077
|
0 |
0 |
unless $name |
|
1079
|
0 |
0 |
unless $self->master('action', 'nodeadd', 'name', $name, 'label', $label) |
|
1087
|
1 |
0 |
$self ? : |
|
1116
|
1 |
1 |
unless $port =~ /^\d+$/ |
|
1133
|
1 |
1 |
unless $sec =~ /^\d+$/ |
|
1184
|
0 |
0 |
unless $$self{'url'} and $doc->isa('Search::Estraier::Document') |
|
1185
|
0 |
0 |
if ($self->shuttle_url($$self{'url'} . '/put_doc', 'text/x-estraier-draft', $doc->dump_draft, undef) == 200) |
|
1210
|
0 |
0 |
unless $$self{'url'} |
|
1211
|
0 |
0 |
unless $id =~ /^\d+$/ |
|
1212
|
0 |
0 |
if ($self->shuttle_url($$self{'url'} . '/out_doc', 'application/x-www-form-urlencoded', "id=$id", undef) == 200) |
|
1237
|
0 |
0 |
unless $$self{'url'} |
|
1238
|
0 |
0 |
if ($self->shuttle_url($$self{'url'} . '/out_doc', 'application/x-www-form-urlencoded', 'uri=' . uri_escape($uri), undef) == 200) |
|
1263
|
0 |
0 |
unless $$self{'url'} and $doc->isa('Search::Estraier::Document') |
|
1264
|
0 |
0 |
if ($self->shuttle_url($$self{'url'} . '/edit_doc', 'text/x-estraier-draft', $doc->dump_draft, undef) == 200) |
|
1322
|
0 |
0 |
unless $id and $name |
|
1339
|
0 |
0 |
unless $uri and $name |
|
1422
|
0 |
0 |
unless $$a{'id'} || $$a{'uri'} and $$self{'url'} |
|
1427
|
0 |
0 |
if $$a{'etch'} |
|
1429
|
0 |
0 |
if ($$a{'id'}) { } |
|
|
0 |
0 |
elsif ($$a{'uri'}) { } |
|
1430
|
0 |
0 |
unless $$a{'id'} =~ /^\d+$/ |
|
1438
|
0 |
0 |
if ($$a{'attr'}) |
|
1451
|
0 |
0 |
if $rv != 200 |
|
1453
|
0 |
0 |
if ($$a{'etch'}) { } |
|
|
0 |
0 |
elsif ($$a{'chomp_resbody'}) { } |
|
1455
|
0 |
0 |
unless $resbody |
|
1458
|
0 |
0 |
if $v |
|
1462
|
0 |
0 |
unless defined $resbody |
|
1479
|
0 |
0 |
unless $$self{'inform'}{'name'} |
|
1492
|
0 |
0 |
unless $$self{'inform'}{'label'} |
|
1505
|
0 |
0 |
if $$self{'inform'}{'dnum'} < 0 |
|
1518
|
0 |
0 |
if $$self{'inform'}{'wnum'} < 0 |
|
1531
|
0 |
0 |
if $$self{'inform'}{'size'} < 0 |
|
1552
|
0 |
0 |
unless $cond and defined $depth and $$self{'url'} |
|
1553
|
0 |
0 |
unless $cond->isa('Search::Estraier::Condition') |
|
1554
|
0 |
0 |
unless $depth =~ /^\d+$/ |
|
1563
|
0 |
0 |
if $rv != 200 |
|
1606
|
0 |
0 |
unless $cond->isa('Search::Estraier::Condition') |
|
1611
|
0 |
0 |
if (my $phrase = $cond->phrase) |
|
1615
|
0 |
0 |
if (my(@attrs) = $cond->attrs) |
|
1617
|
0 |
0 |
if $attrs[$i] |
|
1621
|
0 |
0 |
if (my $order = $cond->order) |
|
1625
|
0 |
0 |
if (my $max = $cond->max) { } |
|
1631
|
0 |
0 |
if (my $options = $cond->options) |
|
1635
|
0 |
0 |
if $depth |
|
1639
|
0 |
0 |
if $$cond{'skip'} |
|
1641
|
0 |
0 |
if (my $distinct = $cond->distinct) |
|
1645
|
0 |
0 |
if ($$cond{'mask'}) |
|
1649
|
0 |
0 |
if $mask |
|
1675
|
0 |
1 |
unless defined $croak_on_error |
|
1679
|
0 |
1 |
if $$self{'debug'} |
|
1682
|
0 |
1 |
if (not $url && $url->scheme or !$url->scheme eq 'http' or not $url->host or not $url->port or $url->port < 1) |
|
1694
|
0 |
1 |
if ($reqbody) { } |
|
1702
|
1 |
0 |
if $$self{'auth'} |
|
1705
|
0 |
1 |
if $$self{'debug'} |
|
1707
|
0 |
1 |
if ($reqbody) |
|
1708
|
0 |
0 |
if $$self{'debug'} |
|
1714
|
0 |
1 |
if $$self{'debug'} |
|
1718
|
1 |
0 |
unless ($res->is_success) |
|
1719
|
1 |
0 |
if ($croak_on_error) { } |
|
1728
|
0 |
0 |
if $resbody and $$self{'debug'} |
|
1756
|
0 |
0 |
if $hwidth >= 0 |
|
1757
|
0 |
0 |
if $awidth >= 0 |
|
1793
|
0 |
0 |
unless $$self{'url'} |
|
1794
|
0 |
0 |
unless $mode =~ /^\d+$/ |
|
1818
|
0 |
0 |
unless $$self{'url'} |
|
1819
|
0 |
0 |
unless $credit =~ /^\d+$/ |
|
1822
|
0 |
0 |
if $credit > 0 |
|
1824
|
0 |
0 |
if ($self->shuttle_url($$self{'url'} . '/_set_link', 'application/x-www-form-urlencoded', $reqbody, undef) == 200) |
|
1846
|
0 |
0 |
unless $$self{'inform'}{'name'} |
|
1860
|
0 |
0 |
unless $$self{'inform'}{'name'} |
|
1874
|
0 |
0 |
unless $$self{'inform'}{'name'} |
|
1889
|
0 |
0 |
unless $$self{'url'} |
|
1898
|
0 |
0 |
if $rv != 200 or not $resbody |
|
1973
|
0 |
1 |
unless $rest |
|
1975
|
0 |
1 |
unless $$rest{'status'} |
|
1979
|
0 |
1 |
if ($$rest{'required'} or $$rest{'optional'}) |
|
1981
|
0 |
0 |
unless $$args{$_} |
|
1986
|
0 |
0 |
if $$args{$_} |
|
1996
|
0 |
0 |
unless my $status = $self->shuttle_url('http://' . $uri->host_port . '/master?action=' . $action, 'application/x-www-form-urlencoded', join('&', @args), \$resbody, 1) |
|
2004
|
0 |
0 |
if ($status == $$rest{'status'}) |
|
2007
|
0 |
0 |
if $action eq 'sync' or $action =~ /^node(?:add|del|clr)$/ |
|
2009
|
0 |
0 |
if ($$rest{'returns'} and wantarray) { } |
|
|
0 |
0 |
elsif ($resbody) { } |
|
2053
|
0 |
0 |
unless $$self{'url'} |
|
2062
|
0 |
0 |
if $rv != 200 or not $resbody |
|
2071
|
0 |
0 |
unless @lines |