| line |
true |
false |
branch |
|
32
|
7 |
0 |
unless $GEOIP_PP_ONLY or $ENV{'GEOIP_PP_ONLY'} |
|
36
|
7 |
0 |
if $ENV{'PERL_DL_NONLAZY'} |
|
83
|
0 |
1 |
defined &Geo::IP::Record::_XScompiled ? : |
|
87
|
7 |
0 |
if ($pp) { } |
|
94
|
0 |
7 |
eval 'require Sys::Mmap' ? : |
|
119
|
0 |
0 |
$c >= 192 ? : |
|
|
7 |
0 |
if ($] >= 5.008) { } |
|
|
0 |
0 |
unless munmap($$gi{'buf'}) |
|
|
0 |
0 |
if (exists $$gi{'buf'} and $$gi{'flags'} and $$gi{'flags'} & 8) |
|
|
0 |
1 |
unless $region |
|
|
0 |
1 |
if $region eq '00' |
|
|
1 |
0 |
if exists $country_region_names{$ccode} |
|
|
195 |
0 |
if (not exists $$gi{'buf'}) { } |
|
|
6 |
83 |
if ($x1 >= $$gi{'databaseSegments'}) |
|
|
1 |
105 |
if ($x0 >= $$gi{'databaseSegments'}) |
|
|
89 |
106 |
if ($ipnum & 1 << $depth) { } |
|
|
0 |
5 |
if $database_type >= 106 |
|
|
0 |
2 |
if ($$gi{'databaseType'} == 5 or $$gi{'databaseType'} == 4 or $$gi{'databaseType'} == 11) |
|
|
0 |
5 |
if ($$gi{'databaseType'} == 7) { } |
|
|
1 |
4 |
elsif ($$gi{'databaseType'} == 3) { } |
|
|
4 |
0 |
elsif ($$gi{'databaseType'} == 6 or $$gi{'databaseType'} == 2 or $$gi{'databaseType'} == 5 or $$gi{'databaseType'} == 11 or $$gi{'databaseType'} == 9 or $$gi{'databaseType'} == 32 or $$gi{'databaseType'} == 4) { } |
|
|
5 |
40 |
if ($delim eq "\377\377\377") { } |
|
|
1 |
5 |
if ($$gi{'databaseType'} == 1 or $$gi{'databaseType'} == 10) |
|
|
0 |
0 |
unless $ip_address =~ /^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}$/ |
|
|
0 |
1 |
unless $ip_address =~ /^(?:\d{1,3}\.){3}\d{1,3}$/ |
|
|
0 |
1 |
unless $ip_address =~ /^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}$/ |
|
|
0 |
0 |
if ($buf eq "\377\377\377") |
|
|
0 |
0 |
if ($hasStructureInfo == 1) { } |
|
|
0 |
0 |
if ($buf eq "\000\000\000") |
|
|
0 |
1 |
unless $ip_address |
|
|
0 |
1 |
if ($seek_country == $$gi{'databaseSegments'}) |
|
|
1 |
0 |
if (not exists $$gi{'buf'}) { } |
|
|
1 |
0 |
if ($str_length > 0) |
|
|
1 |
0 |
if ($str_length > 0) |
|
|
1 |
0 |
if ($str_length > 0) |
|
|
1 |
0 |
if ($record_country_code eq 'US') |
|
|
1 |
0 |
if (2 == $$gi{'databaseType'}) |
|
|
0 |
1 |
if $gi->charset == 1 |
|
|
1 |
0 |
defined $gir{'latitude'} ? : |
|
|
2 |
0 |
if ($host =~ /^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}$/) { } |
|
|
0 |
2 |
unless $ip_address =~ /^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}$/ |
|
|
0 |
0 |
if ($host =~ /^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}$/) { } |
|
|
0 |
0 |
unless $ip_address |
|
|
0 |
0 |
if ($^O eq 'NetWare') { } |
|
|
0 |
0 |
elsif ($^O eq 'MSWin32') { } |
|
|
0 |
0 |
if (not defined $db_file) { } |
|
|
0 |
0 |
elsif ($db_file =~ /^\d+$/) { } |
|
|
0 |
6 |
unless @_ > 1 and $_[1] |
|
|
0 |
6 |
unless CORE::open $fh, "$db_file" |
|
|
0 |
0 |
unless defined $Sys::Mmap::VERSION |
|
|
0 |
0 |
unless mmap($self{'buf'} = undef, 0, PROT_READ(), MAP_PRIVATE(), $fh) |
|
|
0 |
0 |
if ($flags & 8) { } |
|
|
0 |
6 |
if ($flags and $flags & 9) { } |
|
|
0 |
0 |
if $type >= 106 |
|
|
0 |
0 |
unless $name |
|
|
0 |
0 |
$^O eq 'MSWin32' ? : |
|
|
0 |
0 |
$^O eq 'NetWare' ? : |
|
|
0 |
0 |
defined $Geo::IP::PP_OPEN_TYPE_PATH ? : |
|
|
0 |
3 |
if ($seek_org == $$gi{'databaseSegments'}) |
|
|
3 |
0 |
if (not exists $$gi{'buf'}) { } |
|
|
0 |
3 |
if $gi->charset == 1 |
|
|
0 |
1 |
unless $ip_address |
|
|
0 |
0 |
if ($seek_region >= 1000) { } |
|
|
0 |
0 |
$a2 ? : |
|
|
0 |
1 |
if ($seek_region < 1) { } |
|
|
1 |
0 |
elsif ($seek_region < 677) { } |
|
|
0 |
0 |
elsif ($seek_region < 1353) { } |
|
|
0 |
1 |
if ($$gi{'databaseType'} == 7) { } |
|
|
1 |
0 |
elsif ($$gi{'databaseType'} == 3) { } |