rework XOrgDB -> XDB (shorter, easier to use).
[platal.git] / modules / geoloc.php
1 <?php
2 /***************************************************************************
3 * Copyright (C) 2003-2006 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 'geoloc/icon.php' => $this->make_hook('icon', AUTH_COOKIE),
29 'geoloc/dynamap.php' => $this->make_hook('dynamap', AUTH_COOKIE),
30 'geoloc/geolocInit.php' => $this->make_hook('init', AUTH_COOKIE),
31 'geoloc/getCityInfos.php' => $this->make_hook('city', AUTH_COOKIE),
32 'geoloc/getData.php' => $this->make_hook('data', AUTH_COOKIE),
33 );
34 }
35
36 function _make_qs()
37 {
38 $querystring = "";
39
40 foreach ($_GET as $v => $a) {
41 if ($v != 'initfile') {
42 $querystring .= '&'.urlencode($v).'='.urlencode($a);
43 }
44 }
45
46 return $querystring;
47 }
48
49 function handler_default(&$page)
50 {
51 global $globals;
52
53 require_once 'search.inc.php';
54
55 $page->changeTpl('geoloc/index.tpl');
56
57 $res = XDB::query('SELECT COUNT(DISTINCT uid)
58 FROM adresses WHERE cityid IS NOT NULL');
59 $page->assign('localises', $res->fetchOneCell());
60
61 $fields = new SFieldGroup(true, advancedSearchFromInput());
62 $search = $fields->get_url();
63 if (Env::has('only_current') && Env::get('only_current') != 'on') {
64 $search .= '&only_current=';
65 }
66 $search = preg_replace('/(^|&amp;)mapid=([0-9]+)(&amp;|$)/','\1\3', $search);
67 if ($search) {
68 $page->assign('dynamap_vars', $search);
69 }
70
71 $page->assign('use_map', $globals->geoloc->use_map());
72 }
73
74 function handler_icon(&$page)
75 {
76 global $globals;
77
78 header("Content-type: application/x-shockwave-flash");
79
80 if ($globals->geoloc->use_map()) {
81 readfile($globals->geoloc->icon_path);
82 exit;
83 }
84
85 return PL_NOT_FOUND;
86 }
87
88 function handler_dynamap(&$page)
89 {
90 global $globals;
91
92 $querystring = $this->_make_qs();
93 $initfile = urlencode('geolocInit.php?'.$querystring);
94
95 if (urlencode(Env::get('initfile')) != $initfile) {
96 header("Location: dynamap.php?initfile=$initfile{$querystring}");
97 die();
98 }
99
100 header("Content-type: application/x-shockwave-flash");
101
102 if ($globals->geoloc->use_map()) {
103 readfile($globals->geoloc->dynamap_path);
104 exit;
105 }
106
107 return PL_NOT_FOUND;
108 }
109
110 function handler_init(&$page)
111 {
112 global $globals;
113
114 new_nonhtml_page('geoloc/geolocInit.tpl', AUTH_COOKIE);
115
116 header('Content-type: text/xml');
117 $page->assign('querystring', $this->_make_qs());
118 }
119
120 function handler_city(&$page)
121 {
122 global $globals;
123
124 header("Content-type: text/xml");
125
126 new_nonhtml_page('geoloc/getCityInfos.tpl', AUTH_COOKIE);
127 // to debug sql use the next line
128 //new_skinned_page('', AUTH_COOKIE);
129
130 require_once('geoloc.inc.php');
131 require_once('search.inc.php');
132
133 $usual_fields = advancedSearchFromInput();
134 $fields = new SFieldGroup(true, $usual_fields);
135 $where = $fields->get_where_statement();
136 if ($where) $where = "WHERE ".$where;
137
138 $users = XDB::iterator("
139 SELECT u.user_id AS id, u.prenom, u.nom, u.promo
140 FROM adresses AS a
141 INNER JOIN auth_user_md5 AS u ON(u.user_id = a.uid)
142 INNER JOIN auth_user_quick AS q ON(q.user_id = a.uid)
143 ".$fields->get_select_statement()."
144 ".$where."
145 GROUP BY u.user_id LIMIT 11", $id);
146
147 $page->assign('users', $users);
148 }
149
150 function handler_data(&$page)
151 {
152 global $globals;
153
154 // to debug sql use the next line
155 if (Env::has('debug')) {
156 $page->changeTpl('geoloc/getData.tpl');
157 $page->assign('simple', true);
158 } else {
159 header("Content-type: text/xml");
160 new_nonhtml_page('geoloc/getData.tpl', AUTH_COOKIE);
161 }
162
163 require_once 'geoloc.inc.php';
164 require_once 'search.inc.php';
165
166 $querystring = $this->_make_qs();
167 $page->assign('searchvars', $querystring);
168
169 $mapid = Env::has('mapid') ? Env::getInt('mapid', -2) : false;
170
171 list($countries, $cities) = geoloc_getData_subcountries($mapid, advancedSearchFromInput(), 10);
172
173 $page->assign('countries', $countries);
174 $page->assign('cities', $cities);
175 }
176 }
177
178 ?>