From mboxrd@z Thu Jan  1 00:00:00 1970
From: Michael Tremer <michael.tremer@ipfire.org>
To: development@lists.ipfire.org
Subject: Re: [PATCH] Add GeoIP location to nameservers
Date: Mon, 04 Jan 2016 16:59:40 +0000
Message-ID: <1451926780.31655.263.camel@ipfire.org>
In-Reply-To: <5686D08D.7000802@ipfire.org>
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="===============5529937036417429806=="
List-Id: <development.lists.ipfire.org>

--===============5529937036417429806==
Content-Type: text/plain; charset="utf-8"
Content-Transfer-Encoding: 7bit

Just out of curiosity, why do you find this information so helpful?

-Michael

On Fri, 2016-01-01 at 20:16 +0100, Matthias Fischer wrote:
> Hi,
> 
> Tested.
> 
> Works.
> 
> Thanks! ;-)
> 
> One suggestion:
> 
> If you change line ~156 in 'netexternal.cgi' from:
> 
> ...
> <td>$nameserver</td>
> ...
> 
> to
> 
> ...
> <td align="center">$nameserver</td>
> ...
> 
> it looks even better... (see Attachment)
> 
> Jm2C!
> 
> Best,
> Matthias
> 
> 
> On 01.01.2016 18:11, IT Superhack wrote:
> > Add the GeoIP location flag to the nameservers entry on
> > netexternal.cgi. The appropriate flag is shown between
> > ip address and dnssec status.
> > 
> > Signed-off-by: Timmothy Wilson <itsuperhack(a)web.de>
> > ---
> > diff --git a/html/cgi-bin/netexternal.cgi b/html/cgi
> > -bin/netexternal.cgi
> > index 299612d..757785e 100644
> > --- a/html/cgi-bin/netexternal.cgi
> > +++ b/html/cgi-bin/netexternal.cgi
> > @@ -19,6 +19,7 @@
> >   #                                                                
> >              #
> >  
> > ###################################################################
> > ############
> > 
> > +use Geo::IP::PurePerl;
> >   use strict;
> > 
> >   # enable only the following on debugging purpose
> > @@ -28,6 +29,7 @@ use strict;
> >   require '/var/ipfire/general-functions.pl';
> >   require "${General::swroot}/lang.pl";
> >   require "${General::swroot}/header.pl";
> > +require "${General::swroot}/geoip-functions.pl";
> >   require "${General::swroot}/graphs.pl";
> > 
> >   my %color = ();
> > @@ -99,6 +101,9 @@ if ( $querry[0] ne~ ""){
> >   						<strong>$Lang::tr
> > {'nameserver'}</strong>
> >   					</th>
> >   					<th align="center">
> > +						<strong>$Lang::tr{
> > 'location'}</strong>
> > +					</th>
> > +					<th align="center">
> >   						<strong>$Lang::tr
> > {'status'}</strong>
> >   					</th>
> >   				</tr>
> > @@ -138,10 +143,20 @@ END
> >   		}
> > 
> >   		my $table_colour = ($id++ % 2) ?
> > $color{'color22'} : $color{'color20'};
> > +		
> > +		# geoip lookup
> > +		my $geoaddr = Geo::IP::PurePerl->new();
> > +		my $ccode = $geoaddr
> > ->country_code_by_name($nameserver);
> > +		my $fcode = lc($ccode);
> > +		# Get flag icon for of the country.
> > +		my $flag_icon = &GeoIP::get_flag_icon($ccode);
> > 
> >   		print <<END;
> >   			<tr bgcolor="$table_colour">
> >   				<td>$nameserver</td>
> > +				<td align="center">
> > +					<a href='/cgi
> > -bin/country.cgi#$fcode'><img src='$flag_icon' border='0'
> > align='absmiddle' alt='$ccode' title='$ccode'></a>
> > +				</td>
> >   				<td bgcolor="$bgcolour"
> > align="center">
> >   					<font
> > color="$colour"><strong>$message</strong></font>
> >   				</td>
> > diff --git a/langs/de/cgi-bin/de.pl b/langs/de/cgi-bin/de.pl
> > index 2bca854..836d12f 100644
> > --- a/langs/de/cgi-bin/de.pl
> > +++ b/langs/de/cgi-bin/de.pl
> > @@ -1429,6 +1429,7 @@
> >   'local vpn hostname/ip' => 'Lokaler VPN Hostname/IP',
> >   'localkey' => 'Localkey',
> >   'localkeyfile' => 'Localkeyfile',
> > +'location' => 'Standort',
> >   'log' => 'Protokoll',
> >   'log enabled' => 'Log aktiviert',
> >   'log level' => 'Log Level',
> > diff --git a/langs/en/cgi-bin/en.pl b/langs/en/cgi-bin/en.pl
> > index 4c52392..51a6241 100644
> > --- a/langs/en/cgi-bin/en.pl
> > +++ b/langs/en/cgi-bin/en.pl
> > @@ -1459,6 +1459,7 @@
> >   'local vpn hostname/ip' => 'Local VPN Hostname/IP',
> >   'localkey' => 'Localkey',
> >   'localkeyfile' => 'Localkeyfile',
> > +'location' => 'Location',
> >   'log' => 'Log',
> >   'log enabled' => 'Log Enabled',
> >   'log level' => 'Log Level',
> > 
> 

--===============5529937036417429806==
Content-Type: application/pgp-signature
Content-Transfer-Encoding: base64
Content-Disposition: attachment; filename="signature.asc"
MIME-Version: 1.0

LS0tLS1CRUdJTiBQR1AgU0lHTkFUVVJFLS0tLS0KVmVyc2lvbjogR251UEcgdjEKCmlRSWNCQUFC
Q2dBR0JRSldpcVQ4QUFvSkVJQjU4UDl2a0FrSG4yd1AvUk5USTgvMEJKTUtQVThTeVNYTm1aM0wK
WWRRTmllTmp1R3BMQm95Szg2aUNRaGFEY003TW9sUnhSTWlEZVRQUzVQVndoSVo4WVk3NGFpR0xv
MUhaakFnagpsRFdBeXhxOVdzOW5IdzRxQjhlOURuZGhUeUNhOThWQVZaWThlRERMclhCdUhabGpI
ODdieWovN3Z5c2FNOWhOCmcrTjdTV3VRTjJwQW9xRndkMWxvWnV1bjF2ZnZlOTQrcTRvME1SQUM0
Q3RvZmViME1uUTE0VVNZUTlYYytXUzkKNmtwbGpmZHowcmRlWlBiVHJPbkNQWGtqSGVWaEVkSWZ5
cTltdGVJNEhIVWh0bFdmLzRnS3BJUE51WnQxakduaQpHRHdyZ0pwejdRZFJiYURmNzlYbkRhY1Bt
Y0owVkhRSFowZ2swV3YyMWZ3MDVrcnhaYUxMdlI3MWdoNTRvQ1hnCnVWbHBOb0ZzdlhPR0xPVlIz
VHJVV25VYy9rK3RwWXdjbzViQ0NzWkc1d3VjSXVIQ3k0V1Z6NHkrdDM0azk4RFEKNm10WUZ6Ynk5
L1JpTnoyYnAvaTdscGxhb1pmY3cyUUs3ZHdtcVF2ZWpHTU1yY1hmM0FOK3NSWUM4WXBWRm82Vwpk
K1NZdEEvb1M0blNBTkV3NGtGd0tsNlF1YzZXMDlnY0U5TnFZaWZPbGcxdFZjcGJ1Z2xMVVp4NEo4
R0UwQ05UCjN6UWxYb24zNWtFSGlaQzYreFRkVjd1OHlaY09BUjFTV1Y1UlVwalU2cEkvTEJrcm5T
TnVFV0h3WFdFZHZZM0QKWVRPeTU0eG92aEFzZXA0ZTJhRHRJTERyOFFXT1VnblFmWENNWG1TeXZZ
ZEJ3azY3WXFGellIbWJFdHlVbi96YQpoeUk2T1VPMll1QkJwZFdsVk9JdAo9VDZhNgotLS0tLUVO
RCBQR1AgU0lHTkFUVVJFLS0tLS0K

--===============5529937036417429806==--