ae45b22525449ede2ee1bacea8f617472cc68af2
2 /***************************************************************************
3 * Copyright (C) 2003-2008 Polytechnique.org *
4 * http://opensource.polytechnique.org/ *
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. *
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. *
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 *
19 * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA *
20 ***************************************************************************/
22 class GeolocModule
extends PLModule
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')
34 function handler_default(&$page, $action = null
, $subaction = null
)
39 $set->addMod('geoloc', 'Geolocalisation', true
);
40 $set->apply('geoloc', $page, $action, $subaction);
43 function handler_admin(&$page, $action = false
) {
44 $page->changeTpl('geoloc/admin.tpl');
45 require_once("geoloc.inc.php");
46 $page->setTitle('Administration - Geolocalisation');
50 if (Env
::has('id') && is_numeric(Env
::v('id'))) {
51 if (synchro_city(Env
::v('id'))) $nb_synchro ++
;
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++
;
60 $page->trigSuccess(($nb_synchro > 1)?
($nb_synchro." villes ont été synchronisées"):"Une ville a été synchronisée");
62 $res = XDB
::query("SELECT COUNT(*) FROM geoloc_city WHERE lat = 0 AND lon = 0");
63 $page->assign("nb_missinglat", $res->fetchOneCell());
66 function handler_admin_dynamap(&$page, $action = false
) {
67 $page->changeTpl('geoloc/admin_dynamap.tpl');
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");
77 if ($action == 'smallest_maps') {
78 require_once('geoloc.inc.php');
79 set_smallest_levels();
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");
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");
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();
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;
100 $countNoCoordinates = XDB
::query("SELECT COUNT(*) FROM adresses WHERE cityid IS NOT NULL AND glat = 0 AND glng = 0");
101 $noCoordinates = $countNoCoordinates->fetchOneCell();
103 if (isset($refresh) && $missing) {
104 $page->assign("pl_extra_header", "<meta http-equiv='Refresh' content='3'/>");
106 $page->assign("nb_cities_not_on_map", $missing);
107 $page->assign("no_smallest", $noSmallest);
108 $page->assign("no_coordinates", $noCoordinates);
111 function handler_admin_country(&$page, $action = 'list', $id = null
)
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
);
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');
138 $res = XDB
::query("SELECT phoneformat
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'));
153 $table_editor->apply($page, $action, $id);
158 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8: