modules/geoloc.php

   1 <?php
   2 /***************************************************************************
   3  *  Copyright (C) 2003-2009 Polytechnique.org                              *
   4  *  http://opensource.polytechnique.org/                                   *
   5  *                                                                         *
   6  *  This program is free software; you can redistribute it and/or modify   *
   7  *  it under the terms of the GNU General Public License as published by   *
   8  *  the Free Software Foundation; either version 2 of the License, or      *
   9  *  (at your option) any later version.                                    *
  10  *                                                                         *
  11  *  This program is distributed in the hope that it will be useful,        *
  12  *  but WITHOUT ANY WARRANTY; without even the implied warranty of         *
  13  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the          *
  14  *  GNU General Public License for more details.                           *
  15  *                                                                         *
  16  *  You should have received a copy of the GNU General Public License      *
  17  *  along with this program; if not, write to the Free Software            *
  18  *  Foundation, Inc.,                                                      *
  19  *  59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                *
  20  ***************************************************************************/
  21
  22 class GeolocModule extends PLModule
  23 {
  24     function handlers()
  25     {
  26         return array(
  27             'geoloc'             => $this->make_hook('default', AUTH_COOKIE),
  28             'admin/geoloc'           => $this->make_hook('admin', AUTH_MDP, 'admin'),
  29             'admin/geoloc/dynamap'   => $this->make_hook('admin_dynamap', AUTH_MDP, 'admin'),
  30             'admin/geoloc/country'   => $this->make_hook('admin_country',  AUTH_MDP, 'admin')
  31         );
  32     }
  33
  34     function handler_default(&$page, $action = null, $subaction = null)
  35     {
  36         global $globals;
  37
  38         $set = new UserSet();
  39         $set->addMod('geoloc', 'Geolocalisation', true);
  40         $set->apply('geoloc', $page, $action, $subaction);
  41     }
  42
  43     function handler_admin(&$page, $action = false) {
  44         $page->changeTpl('geoloc/admin.tpl');
  45         require_once("geoloc.inc.php");
  46         $page->setTitle('Administration - Geolocalisation');
  47
  48         $nb_synchro = 0;
  49
  50         if (Env::has('id') && is_numeric(Env::v('id'))) {
  51             if (synchro_city(Env::v('id'))) $nb_synchro ++;
  52         }
  53
  54         if ($action == 'missinglat') {
  55             $res = XDB::iterRow("SELECT id FROM geoloc_city WHERE lat = 0 AND lon = 0");
  56             while ($a = $res->next()) if (synchro_city($a[0])) $nb_synchro++;
  57         }
  58
  59         if ($nb_synchro)
  60             $page->trigSuccess(($nb_synchro > 1)?($nb_synchro." villes ont été synchronisées"):"Une ville a été synchronisée");
  61
  62         $res = XDB::query("SELECT COUNT(*) FROM geoloc_city WHERE lat = 0 AND lon = 0");
  63         $page->assign("nb_missinglat", $res->fetchOneCell());
  64     }
  65
  66     function handler_admin_dynamap(&$page, $action = false) {
  67         $page->changeTpl('geoloc/admin_dynamap.tpl');
  68
  69         if ($action == 'cities_not_on_map') {
  70             require_once('geoloc.inc.php');
  71             if (!fix_cities_not_on_map(20))
  72                 $page->trigError("Impossible d'accéder au webservice");
  73             else
  74                 $refresh = true;
  75         }
  76
  77         if ($action == 'smallest_maps') {
  78             require_once('geoloc.inc.php');
  79             set_smallest_levels();
  80         }
  81
  82         if ($action == 'precise_coordinates') {
  83             XDB::execute("UPDATE  adresses AS a
  84                       INNER JOIN  geoloc_city AS c ON(a.cityid = c.id)
  85                              SET  a.glat = c.lat / 100000, a.glng = c.lon / 100000");
  86         }
  87
  88         if ($action == 'newmaps') {
  89             require_once('geoloc.inc.php');
  90             if (!get_new_maps(Env::v('url')))
  91                 $page->trigError("Impossible d'accéder aux nouvelles cartes");
  92         }
  93
  94         $countMissing = XDB::query("SELECT COUNT(*) FROM geoloc_city AS c LEFT JOIN geoloc_city_in_maps AS m ON(c.id = m.city_id) WHERE m.city_id IS NULL");
  95         $missing = $countMissing->fetchOneCell();
  96
  97         $countNoSmallest = XDB::query("SELECT SUM(IF(infos = 'smallest',1,0)) AS n FROM geoloc_city_in_maps GROUP BY city_id ORDER BY n");
  98         $noSmallest = $countNoSmallest->fetchOneCell() == 0;
  99
 100         $countNoCoordinates = XDB::query("SELECT COUNT(*) FROM adresses WHERE cityid IS NOT NULL AND glat = 0 AND glng = 0");
 101         $noCoordinates = $countNoCoordinates->fetchOneCell();
 102
 103         if (isset($refresh) && $missing) {
 104             $page->assign("pl_extra_header", "<meta http-equiv='Refresh' content='3'/>");
 105         }
 106         $page->assign("nb_cities_not_on_map", $missing);
 107         $page->assign("no_smallest", $noSmallest);
 108         $page->assign("no_coordinates", $noCoordinates);
 109     }
 110
 111     function handler_admin_country(&$page, $action = 'list', $id = null)
 112     {
 113         $page->assign('xorg_title', 'Polytechnique.org - Administration - Pays');
 114         $page->assign('title', 'Gestion des pays');
 115         $table_editor = new PLTableEditor('admin/geoloc/country', 'geoloc_pays', 'a2', true);
 116         $table_editor->describe('a2', 'alpha-2', true);
 117         $table_editor->describe('a3', 'alpha-3', false);
 118         $table_editor->describe('n3', 'ISO numeric', false);
 119         $table_editor->describe('num', 'num', false);
 120         $table_editor->describe('worldrgn', 'Continent', false);
 121         $table_editor->describe('subd', 'Subdivisions territoriales', false);
 122         $table_editor->describe('post', 'post', false);
 123         $table_editor->describe('pays', 'Nom (fr)', true);
 124         $table_editor->describe('country', 'Nom (en)', true);
 125         $table_editor->describe('phoneprf', 'Préfixe téléphonique', true);
 126         $table_editor->describe('phoneformat', 'Format du téléphone (ex: (+p) ### ## ## ##)', false);
 127         $table_editor->describe('capital', 'Capitale', true);
 128         $table_editor->describe('nat', 'Nationalité', true);
 129         $table_editor->describe('display', 'Format des adresses', false);
 130
 131         if ($action == 'update') {
 132             if (Post::has('a2') && (Post::v('a2') == $id) && Post::has('phoneprf') && (Post::v('phoneprf') != '')) {
 133                 if (Post::has('phoneformat')) {
 134                     $new_format = Post::v('phoneformat');
 135                 } else {
 136                     $new_format = '';
 137                 }
 138                 $res = XDB::query("SELECT phoneformat
 139                                      FROM geoloc_pays
 140                                     WHERE phoneprf = {?}
 141                                     LIMIT 1",
 142                                   Post::v('phoneprf'));
 143                 $old_format = $res->fetchOneCell();
 144                 if ($new_format != $old_format) {
 145                     require_once("profil.func.inc.php");
 146                     XDB::execute("UPDATE  geoloc_pays
 147                                      SET  phoneformat = {?}
 148                                    WHERE  phoneprf = {?}",
 149                                  $new_format, Post::v('phoneprf'));
 150                 }
 151             }
 152         }
 153         $table_editor->apply($page, $action, $id);
 154     }
 155
 156 }
 157
 158 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
 159 ?>