1<?php
2// This file is part of Moodle - http://moodle.org/
3//
4// Moodle is free software: you can redistribute it and/or modify
5// it under the terms of the GNU General Public License as published by
6// the Free Software Foundation, either version 3 of the License, or
7// (at your option) any later version.
8//
9// Moodle is distributed in the hope that it will be useful,
10// but WITHOUT ANY WARRANTY; without even the implied warranty of
11// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12// GNU General Public License for more details.
13//
14// You should have received a copy of the GNU General Public License
15// along with Moodle.  If not, see <http://www.gnu.org/licenses/>.
16
17/**
18 * Displays IP address on map.
19 *
20 * This script is not compatible with IPv6.
21 *
22 * @package    core_iplookup
23 * @copyright  2008 Petr Skoda (http://skodak.org)
24 * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
25 */
26
27require('../config.php');
28require_once('lib.php');
29
30require_login(0, false);
31if (isguestuser()) {
32    // Guest users cannot perform lookups.
33    throw new require_login_exception('Guests are not allowed here.');
34}
35
36$ip   = optional_param('ip', getremoteaddr(), PARAM_RAW);
37$user = optional_param('user', 0, PARAM_INT);
38
39if (isset($CFG->iplookup)) {
40    // Clean up of old settings.
41    set_config('iplookup', NULL);
42}
43
44$PAGE->set_url('/iplookup/index.php', array('id'=>$ip, 'user'=>$user));
45$PAGE->set_pagelayout('popup');
46$PAGE->set_context(context_system::instance());
47
48$info = array($ip);
49$note = array();
50
51if (cleanremoteaddr($ip) === false) {
52    print_error('invalidipformat', 'error');
53}
54
55if (!ip_is_public($ip)) {
56    print_error('iplookupprivate', 'error');
57}
58
59$info = iplookup_find_location($ip);
60
61if ($info['error']) {
62    // Can not display.
63    notice($info['error']);
64}
65
66if ($user) {
67    if ($user = $DB->get_record('user', array('id'=>$user, 'deleted'=>0))) {
68        // note: better not show full names to everybody
69        if (has_capability('moodle/user:viewdetails', context_user::instance($user->id))) {
70            array_unshift($info['title'], fullname($user));
71        }
72    }
73}
74array_unshift($info['title'], $ip);
75
76$title = implode(' - ', $info['title']);
77$PAGE->set_title(get_string('iplookup', 'admin').': '.$title);
78$PAGE->set_heading($title);
79echo $OUTPUT->header();
80
81if (empty($CFG->googlemapkey3)) {
82    $imgwidth  = 620;
83    $imgheight = 310;
84    $dotwidth  = 18;
85    $dotheight = 30;
86
87    $dx = round((($info['longitude'] + 180) * ($imgwidth / 360)) - $imgwidth - $dotwidth/2);
88    $dy = round((($info['latitude'] + 90) * ($imgheight / 180)));
89
90    echo '<div id="map" style="width:'.($imgwidth+$dotwidth).'px; height:'.$imgheight.'px;">';
91    echo '<img src="earth.jpeg" style="width:'.$imgwidth.'px; height:'.$imgheight.'px" alt="" />';
92    echo '<img src="marker.gif" style="width:'.$dotwidth.'px; height:'.$dotheight.'px; margin-left:'.$dx.'px; margin-bottom:'.$dy.'px;" alt="" />';
93    echo '</div>';
94    echo '<div id="note">'.$info['note'].'</div>';
95
96} else {
97    if (is_https()) {
98        $PAGE->requires->js(new moodle_url('https://maps.googleapis.com/maps/api/js', array('key'=>$CFG->googlemapkey3, 'sensor'=>'false')));
99    } else {
100        $PAGE->requires->js(new moodle_url('http://maps.googleapis.com/maps/api/js', array('key'=>$CFG->googlemapkey3, 'sensor'=>'false')));
101    }
102    $module = array('name'=>'core_iplookup', 'fullpath'=>'/iplookup/module.js');
103    $PAGE->requires->js_init_call('M.core_iplookup.init3', array($info['latitude'], $info['longitude'], $ip), true, $module);
104
105    echo '<div id="map" style="width: 650px; height: 360px"></div>';
106    echo '<div id="note">'.$info['note'].'</div>';
107}
108
109echo $OUTPUT->footer();
110