Skip to content

Commit

Permalink
MDL-23720 improved iplookup coding style + fixed a potential privacy …
Browse files Browse the repository at this point in the history
…issue
  • Loading branch information
skodak committed Aug 9, 2010
1 parent 2265bbc commit b9ee1fc
Show file tree
Hide file tree
Showing 2 changed files with 144 additions and 91 deletions.
117 changes: 26 additions & 91 deletions iplookup/index.php
Original file line number Diff line number Diff line change
Expand Up @@ -16,7 +16,9 @@
// along with Moodle. If not, see <http://www.gnu.org/licenses/>.

/**
* Displays IP address on map
* Displays IP address on map.
*
* This script is not compatible with IPv6.
*
* @package core
* @subpackage iplookup
Expand All @@ -25,13 +27,12 @@
*/

require('../config.php');
require_once($CFG->libdir.'/filelib.php');
require_once('Net/GeoIP.php');
require_once('lib.php');

require_login();

$ip = optional_param('ip', getremoteaddr(), PARAM_HOST);
$user = optional_param('user', $USER->id, PARAM_INT);
$user = optional_param('user', 0, PARAM_INT);

if (isset($CFG->iplookup)) {
//clean up of old settings
Expand All @@ -57,116 +58,50 @@
print_error('iplookupprivate', 'error');
}

if ($user) {
if ($user = $DB->get_record('user', array('id'=>$user, 'deleted'=>0))) {
$info[] = fullname($user);
}
}

$textlib = textlib_get_instance();

if (!empty($CFG->geoipfile) and file_exists($CFG->geoipfile)) {
$geoip = Net_GeoIP::getInstance($CFG->geoipfile, Net_GeoIP::STANDARD);
$location = $geoip->lookupLocation($ip);
$geoip->close();

if (empty($location)) {
print_error('iplookupfailed', 'error', '', $ip);
}
if (!empty($location->city)) {
$info[] = $textlib->convert($location->city, 'iso-8859-1', 'utf-8');
}

if (!empty($location->country_code)) {
$countries = get_string_manager()->get_list_of_countries(true);
if (isset($countries[$location->country_code])) {
// prefer our localized country names
$info[] = $countries[$location->country_code];
} else {
$info[] = $location->country_name;
}
}
$longitude = $location->longitude;
$latitude = $location->latitude;
$note[] = get_string('iplookupmaxmindnote', 'admin');

} else {
$ipdata = download_file_content('http://netgeo.caida.org/perl/netgeo.cgi?target='.$ip);
if ($ipdata === false) {
print_error('cannotnetgeo');
}
$matches = null;
if (!preg_match('/LAT:\s*(-?\d+\.\d+)/s', $ipdata, $matches)) {
print_error('iplookupfailed', 'error', '', $ip);
}
$latitude = (float)$matches[1];
if (!preg_match('/LONG:\s*(-?\d+\.\d+)/s', $ipdata, $matches)) {
print_error('iplookupfailed', 'error', '', $ip);
}
$longitude = (float)$matches[1];
$info = iplookup_find_location($ip);

if (preg_match('/CITY:\s*([^<]*)/', $ipdata, $matches)) {
if (!empty($matches[1])) {
$info[] = s($matches[1]);
}
}
if ($info['error']) {
// can not display
notice($info['error']);
}

if (preg_match('/COUNTRY:\s*([^<]*)/', $ipdata, $matches)) {
if (!empty($matches[1])) {
$countrycode = $matches[1];
$countries = get_string_manager()->get_list_of_countries(true);
if (isset($countries[$countrycode])) {
// prefer our localized country names
$info[] = $countries[$countrycode];
} else {
$info[] = $countrycode;
}
if ($user) {
if ($user = $DB->get_record('user', array('id'=>$user, 'deleted'=>0))) {
// note: better not show full names to everybody
if (has_capability('moodle/user:viewdetails', get_context_instance(CONTEXT_USER, $user->id))) {
array_unshift($info['title'], fullname($user));
}
}
$note[] = get_string('iplookupnetgeonote', 'admin');
}
array_unshift($info['title'], $ip);


$title = implode(' - ', $info['title']);
$PAGE->set_title(get_string('iplookup', 'admin').': '.$title);
$PAGE->set_heading($title);
echo $OUTPUT->header();

if (empty($CFG->googlemapkey)) {
$info = implode(' - ', $info);
$note = implode('<br />', $note);

$imgwidth = 620;
$imgheight = 310;
$dotwidth = 18;
$dotheight = 30;

$dx = round((($longitude + 180) * ($imgwidth / 360)) - $imgwidth - $dotwidth/2);
$dy = round((($latitude + 90) * ($imgheight / 180)));

$PAGE->set_title(get_string('iplookup', 'admin').': '.$info);
$PAGE->set_heading($info);
echo $OUTPUT->header();
$dx = round((($info['longitude'] + 180) * ($imgwidth / 360)) - $imgwidth - $dotwidth/2);
$dy = round((($info['latitude'] + 90) * ($imgheight / 180)));

echo '<div id="map" style="width:'.($imgwidth+$dotwidth).'px; height:'.$imgheight.'px;">';
echo '<img src="earth.jpeg" style="width:'.$imgwidth.'px; height:'.$imgheight.'px" alt="" />';
echo '<img src="marker.gif" style="width:'.$dotwidth.'px; height:'.$dotheight.'px; margin-left:'.$dx.'px; margin-bottom:'.$dy.'px;" alt="" />';
echo '</div>';
echo '<div id="note">'.$note.'</div>';

echo $OUTPUT->footer();
echo '<div id="note">'.$info['note'].'</div>';

} else {
$info = implode(' - ', $info);
$note = implode('<br />', $note);

$PAGE->requires->js(new moodle_url("http://maps.google.com/maps?file=api&v=2&key=$CFG->googlemapkey"));
$module = array('name'=>'core_iplookup', 'fullpath'=>'/iplookup/module.js');
$PAGE->requires->js_init_call('M.core_iplookup.init', array($latitude, $longitude), true, $module);

$PAGE->set_title(get_string('iplookup', 'admin').': '.$info);
$PAGE->set_heading($info);
echo $OUTPUT->header();
$PAGE->requires->js_init_call('M.core_iplookup.init', array($info['latitude'], $info['longitude']), true, $module);

echo '<div id="map" style="width: 650px; height: 360px"></div>';
echo '<div id="note">'.$note.'</div>';

echo $OUTPUT->footer();
echo '<div id="note">'.$info['note'].'</div>';
}

echo $OUTPUT->footer();
118 changes: 118 additions & 0 deletions iplookup/lib.php
Original file line number Diff line number Diff line change
@@ -0,0 +1,118 @@
<?php

// This file is part of Moodle - http://moodle.org/
//
// Moodle is free software: you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation, either version 3 of the License, or
// (at your option) any later version.
//
// Moodle is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with Moodle. If not, see <http://www.gnu.org/licenses/>.

/**
* IP Lookup utility functions
*
* @package core
* @subpackage iplookup
* @copyright 2010 Petr Skoda {@link http://skodak.org}
* @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
*/

defined('MOODLE_INTERNAL') || die();

/**
* Returns location information
* @param string $ip
* @return array
*/
function iplookup_find_location($ip) {
global $CFG;

$info = array('city'=>null, 'country'=>null, 'longitude'=>null, 'latitude'=>null, 'error'=>null, 'note'=>'', 'title'=>array());

if (!empty($CFG->geoipfile) and file_exists($CFG->geoipfile)) {
require_once('Net/GeoIP.php');

$textlib = textlib_get_instance();

$geoip = Net_GeoIP::getInstance($CFG->geoipfile, Net_GeoIP::STANDARD);
$location = $geoip->lookupLocation($ip);
$geoip->close();

if (empty($location)) {
$info['error'] = get_string('iplookupfailed', 'error', $ip);
return $info;
}
if (!empty($location->city)) {
$info['city'] = $textlib->convert($location->city, 'iso-8859-1', 'utf-8');
$info['title'][] = $info['city'];
}

if (!empty($location->country_code)) {
$countries = get_string_manager()->get_list_of_countries(true);
if (isset($countries[$location->country_code])) {
// prefer our localized country names
$info['country'] = $countries[$location->country_code];
} else {
$info['country'] = $location->country_name;
}
$info['title'][] = $info['country'];
}
$info['longitude'] = $location->longitude;
$info['latitude'] = $location->latitude;
$info['note'] = get_string('iplookupmaxmindnote', 'admin');

return $info;

} else {
require_once($CFG->libdir.'/filelib.php');

$ipdata = download_file_content('http://netgeo.caida.org/perl/netgeo.cgi?target='.$ip);
if ($ipdata === false) {
$info['error'] = get_string('cannotnetgeo', 'error');
return $info;
}
$matches = null;
if (!preg_match('/LAT:\s*(-?\d+\.\d+)/s', $ipdata, $matches)) {
$info['error'] = get_string('iplookupfailed', 'error', $ip);
return $info;
}
$info['latitude'] = (float)$matches[1];
if (!preg_match('/LONG:\s*(-?\d+\.\d+)/s', $ipdata, $matches)) {
$info['error'] = get_string('iplookupfailed', 'error', $ip);
return $info;
}
$info['longitude'] = (float)$matches[1];

if (preg_match('/CITY:\s*([^<]*)/', $ipdata, $matches)) {
if (!empty($matches[1])) {
$info['city'] = s($matches[1]);
$info['title'][] = $info['city'];
}
}

if (preg_match('/COUNTRY:\s*([^<]*)/', $ipdata, $matches)) {
if (!empty($matches[1])) {
$countrycode = $matches[1];
$countries = get_string_manager()->get_list_of_countries(true);
if (isset($countries[$countrycode])) {
// prefer our localized country names
$info['country'] = $countries[$countrycode];
} else {
$info['country'] = $countrycode;
}
$info['title'][] = $info['country'];
}
}
$info['note'] = get_string('iplookupnetgeonote', 'admin');

return $info;
}

}

0 comments on commit b9ee1fc

Please sign in to comment.