| line |
true |
false |
branch |
|
8
|
1 |
0 |
if ($] >= 5.008) { } |
|
17
|
0 |
0 |
$c >= 192 ? : |
|
71
|
0 |
1 |
eval 'require Sys::Mmap' ? : |
|
152
|
0 |
0 |
if $type >= 106 |
|
155
|
0 |
0 |
unless $name |
|
162
|
0 |
0 |
defined $Geo::IP::PurePerl::OPEN_TYPE_PATH ? : |
|
165
|
0 |
0 |
$^O eq 'NetWare' ? : |
|
166
|
0 |
0 |
$^O eq 'MSWin32' ? : |
|
178
|
0 |
0 |
unless @_ > 1 and $_[1] |
|
183
|
0 |
0 |
unless CORE::open $fh, $db_file |
|
185
|
0 |
0 |
if ($flags and $flags & 9) { } |
|
188
|
0 |
0 |
if ($flags & 8) { } |
|
189
|
0 |
0 |
unless defined $Sys::Mmap::VERSION |
|
191
|
0 |
0 |
unless mmap($self{'buf'} = undef, 0, PROT_READ(), MAP_PRIVATE(), $fh) |
|
214
|
0 |
0 |
if ($^O eq 'NetWare') { } |
|
|
0 |
0 |
elsif ($^O eq 'MSWin32') { } |
|
219
|
0 |
0 |
if (not defined $db_file) { } |
|
|
0 |
0 |
elsif ($db_file =~ /^\d+$/) { } |
|
250
|
0 |
0 |
if ($delim eq "\377\377\377") { } |
|
257
|
0 |
0 |
if $$gi{'databaseType'} >= 106 |
|
261
|
0 |
0 |
if ($$gi{'databaseType'} == 7) { } |
|
|
0 |
0 |
elsif ($$gi{'databaseType'} == 3) { } |
|
|
0 |
0 |
elsif ($$gi{'databaseType'} == 6 or $$gi{'databaseType'} == 2 or $$gi{'databaseType'} == 5 or $$gi{'databaseType'} == 9 or $$gi{'databaseType'} == 11 or $$gi{'databaseType'} == 4) { } |
|
285
|
0 |
0 |
if ($$gi{'databaseType'} == 5 or $$gi{'databaseType'} == 4 or $$gi{'databaseType'} == 11) |
|
297
|
0 |
0 |
if ($$gi{'databaseType'} == 1 or $$gi{'databaseType'} == 10) |
|
316
|
0 |
0 |
if (not exists $$gi{'buf'}) { } |
|
329
|
0 |
0 |
if ($ipnum & 1 << $depth) { } |
|
330
|
0 |
0 |
if ($x1 >= $$gi{'databaseSegments'}) |
|
336
|
0 |
0 |
if ($x0 >= $$gi{'databaseSegments'}) |
|
361
|
0 |
0 |
unless $ip_address =~ /^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}$/ |
|
368
|
0 |
0 |
unless $ip_address =~ /^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}$/ |
|
375
|
0 |
0 |
unless $ip_address =~ /^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}$/ |
|
381
|
0 |
0 |
unless $ip_address =~ /^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}$/ |
|
409
|
0 |
0 |
if ($host =~ /^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}$/) { } |
|
414
|
0 |
0 |
unless $ip_address |
|
422
|
0 |
0 |
unless $ip_address |
|
443
|
0 |
0 |
if ($seek_country == $$gi{'databaseSegments'}) |
|
449
|
0 |
0 |
if (not exists $$gi{'buf'}) { } |
|
472
|
0 |
0 |
if ($str_length > 0) |
|
484
|
0 |
0 |
if ($str_length > 0) |
|
496
|
0 |
0 |
if ($str_length > 0) |
|
519
|
0 |
0 |
if (2 == $$gi{'databaseType'}) |
|
521
|
0 |
0 |
if ($record_country_code eq 'US') |
|
535
|
0 |
0 |
if $gi->charset == 1 |
|
564
|
0 |
0 |
if ($seek_org == $$gi{'databaseSegments'}) |
|
570
|
0 |
0 |
if (not exists $$gi{'buf'}) { } |
|
598
|
0 |
0 |
unless $ip_address |
|
599
|
0 |
0 |
if ($$gi{'databaseType'} == 7) { } |
|
|
0 |
0 |
elsif ($$gi{'databaseType'} == 3) { } |
|
601
|
0 |
0 |
if ($seek_region >= 1000) { } |
|
608
|
0 |
0 |
if ($seek_region < 1) { } |
|
|
0 |
0 |
elsif ($seek_region < 677) { } |
|
|
0 |
0 |
elsif ($seek_region < 1353) { } |
|
630
|
0 |
0 |
if ($host =~ /^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}$/) { } |
|
652
|
0 |
0 |
if ($buf eq "\377\377\377") |
|
658
|
0 |
0 |
if ($hasStructureInfo == 1) { } |
|
666
|
0 |
0 |
if ($buf eq "\000\000\000") |
|
707
|
0 |
0 |
if (exists $$gi{'buf'} and $$gi{'flags'} and $$gi{'flags'} & 8) |
|
708
|
0 |
0 |
unless munmap($$gi{'buf'}) |