c0402bfe6f12fdaf9e79c45082d3b5d923d1fe1c
[platal.git] / modules / geoloc.php
1 <?php
2 /***************************************************************************
3 * Copyright (C) 2003-2011 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 'map' => $this->make_hook('map', AUTH_COOKIE)
28 );
29 }
30
31 static public function prepare_map(PlPage $page)
32 {
33 global $globals;
34 $page->changeTpl('geoloc/index.tpl');
35 $map_url = $globals->maps->dynamic_map . '?&sensor=false&v=' . $globals->maps->api_version . '&language=' . $globals->maps->language;
36 $page->addJsLink($map_url, false);
37 $page->addJsLink('maps.js');
38 $page->addJsLink('markerclusterer_packed.js');
39 $page->addJsLink('markerwithlabel_packed.js');
40 $page->assign('pl_extra_header', '<meta name="viewport" content="initial-scale=1.0, user-scalable=no" />');
41 }
42
43 static public function assign_json_to_map(PlPage $page, $pids = null)
44 {
45 if (!is_null($pids)) {
46 $where = XDB::format(' AND pa.pid IN {?}', $pids);
47 } else {
48 $where = '';
49 }
50
51 $data = XDB::rawFetchAllAssoc('SELECT pa.latitude, pa.longitude, GROUP_CONCAT(DISTINCT p.hrpid SEPARATOR \',\') AS hrpid,
52 GROUP_CONCAT(pd.promo SEPARATOR \',\') AS promo,
53 GROUP_CONCAT(DISTINCT CONCAT(pd.private_name, \' (\', pd.promo, \')\') SEPARATOR \',\') AS name
54 FROM profile_addresses AS pa
55 INNER JOIN profiles AS p ON (pa.pid = p.pid)
56 INNER JOIN profile_display AS pd ON (pd.pid = pa.pid)
57 WHERE pa.type = \'home\' AND pa.latitude IS NOT NULL AND pa.longitude IS NOT NULL' . $where . '
58 GROUP BY pa.latitude, pa.longitude');
59 $page->jsonAssign('data', $data);
60 }
61
62 function handler_map($page)
63 {
64 if (Get::b('ajax')) {
65 self::assign_json_to_map($page);
66 return PL_JSON;
67 } else {
68 self::prepare_map($page);
69 }
70 }
71 }
72
73 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
74 ?>