webadmin/bpfire
1
0
Fork 0
mirror of https://github.com/vincentmli/bpfire.git synced 2026-04-09 18:45:54 +02:00
Code Issues Packages Projects Releases Wiki Activity

netexternal.cgi: Use new location lookup method.

Browse Source 
Signed-off-by: Stefan Schantl <stefan.schantl@ipfire.org>
This commit is contained in:
Stefan Schantl
2019-12-06 14:33:54 +01:00
parent 50494dfd6e
commit bb7ba3b404
1 changed files with 4 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
html/cgi-bin/netexternal.cgi
View File

@@ -34,6 +34,9 @@ require "${General::swroot}/header.pl";
require "${General::swroot}/geoip-functions.pl";
require "${General::swroot}/graphs.pl";
# Libloc database handle.
my $libloc_db_handle = &GeoIP::init();
my %color = ();
my %mainsettings = ();
my %netsettings=();
@@ -150,7 +153,7 @@ END
my $table_colour = ($id++ % 2) ? $color{'color22'} : $color{'color20'};
# collect more information about name server (rDNS, GeoIP country code)
my $ccode = &GeoIP::lookup($nameserver);
my $ccode = &GeoIP::lookup_country_code($libloc_db_handle, $nameserver);
my $flag_icon = &GeoIP::get_flag_icon($ccode);
my $iaddr = inet_aton($nameserver);