62bb42eeb00c1e4883fba045d2ff99c1778763c5
2 /***************************************************************************
3 * Copyright (C) 2003-2011 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 'map' => $this->make_hook('map', AUTH_COOKIE
),
28 'map/ajax' => $this->make_hook('map_ajax', AUTH_COOKIE
)
32 function handler_map($page)
35 $page->changeTpl('geoloc/index.tpl');
36 $map_url = $globals->maps
->dynamic_map
. '?&sensor=false&v=' . $globals->maps
->api_version
. '&language=' . $globals->maps
->language
;
37 $page->addJsLink($map_url, false
);
38 $page->addJsLink('maps.js');
39 $page->addJsLink('markerclusterer_packed.js');
40 $page->addJsLink('markerwithlabel_packed.js');
41 $page->assign('pl_extra_header', '<meta name="viewport" content="initial-scale=1.0, user-scalable=no" />');
43 $page->assign('latitude', 0);
44 $page->assign('longitude', 0);
47 function handler_map_ajax($page)
49 $data = XDB
::rawFetchAllAssoc('SELECT pa.latitude, pa.longitude, GROUP_CONCAT(DISTINCT p.hrpid SEPARATOR \',\') AS hrpid,
50 GROUP_CONCAT(DISTINCT CONCAT(pd.private_name, \' (\', pd.promo, \')\') SEPARATOR \',\') AS name
51 FROM profile_addresses AS pa
52 INNER JOIN profiles AS p ON (pa.pid = p.pid)
53 INNER JOIN profile_display AS pd ON (pd.pid = pa.pid)
54 WHERE pa.type = \'home\' AND pa.latitude IS NOT NULL AND pa.longitude IS NOT NULL
55 GROUP BY pa.latitude, pa.longitude');
56 $page->jsonAssign('data', $data);
62 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8: