Easy access to admin page
[platal.git] / htdocs / admin / geoloc_dynamap.php
CommitLineData
0337d704 1<?php
2/***************************************************************************
56670b6a 3 * Copyright (C) 2003-2006 Polytechnique.org *
0337d704 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
56670b6a 22require_once("xorg.inc.php");
23new_admin_page('admin/geoloc_dynamap.tpl');
0337d704 24
5e2307dc 25if (Env::v('fix') == 'cities_not_on_map') {
56670b6a 26 require_once('geoloc.inc.php');
014c8464 27 if (!fix_cities_not_on_map(20))
56670b6a 28 $page->trig("Impossible d'accéder au webservice");
f42813b7 29 else
30 $refresh = true;
56670b6a 31}
0337d704 32
5e2307dc 33if (Env::v('fix') == 'smallest_maps') {
014c8464 34 require_once('geoloc.inc.php');
35 set_smallest_levels();
36}
37
5e2307dc 38if (Env::v('fix') == 'precise_coordinates') {
08cce2ff 39 XDB::execute("UPDATE adresses AS a INNER JOIN geoloc_city AS c ON(a.cityid = c.id) SET a.glat = c.lat / 100000, a.glng = c.lon / 100000");
c41e72df 40}
41
014c8464 42if (Env::has('new_maps')) {
43 require_once('geoloc.inc.php');
5e2307dc 44 if (!get_new_maps(Env::v('url')))
014c8464 45 $page->trig("Impossible d'accéder aux nouvelles cartes");
56670b6a 46}
0337d704 47
08cce2ff 48$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");
f42813b7 49$missing = $countMissing->fetchOneCell();
50
08cce2ff 51$countNoSmallest = XDB::query("SELECT SUM(IF(infos = 'smallest',1,0)) AS n FROM geoloc_city_in_maps GROUP BY city_id ORDER BY n");
014c8464 52$noSmallest = $countNoSmallest->fetchOneCell() == 0;
53
08cce2ff 54$countNoCoordinates = XDB::query("SELECT COUNT(*) FROM adresses WHERE cityid IS NOT NULL AND glat = 0 AND glng = 0");
c41e72df 55$noCoordinates = $countNoCoordinates->fetchOneCell();
56
014c8464 57if (isset($refresh) && $missing) {
c41e72df 58 $page->assign("xorg_extra_header", "<meta http-equiv='Refresh' content='3'/>");
014c8464 59}
f42813b7 60$page->assign("nb_cities_not_on_map", $missing);
014c8464 61$page->assign("no_smallest", $noSmallest);
c41e72df 62$page->assign("no_coordinates", $noCoordinates);
0337d704 63
56670b6a 64$page->run();
0337d704 65
56670b6a 66// vim:set et sws=4 sts=4 sw=4:
0337d704 67?>
56670b6a 68