backport : page profile/private accessible en cookie et non en mot de passe
[platal.git] / include / user.func.inc.php
CommitLineData
0337d704 1<?php
2/***************************************************************************
8b10988d 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
22// {{{ function user_clear_all_subs()
23/** kills the inscription of a user.
24 * we still keep his birthdate, adresses, and personnal stuff
25 * kills the entreprises, mentor, emails and lists subscription stuff
26 */
27function user_clear_all_subs($user_id, $really_del=true)
28{
dd502514 29 // keep datas in : aliases, adresses, tels, applis_ins, binets_ins, contacts, groupesx_ins, homonymes, identification_ax, photo
0337d704 30 // delete in : auth_user_md5, auth_user_quick, competences_ins, emails, entreprises, langues_ins, mentor,
31 // mentor_pays, mentor_secteurs, newsletter_ins, perte_pass, requests, user_changes, virtual_redirect, watch_sub
32 // + delete maillists
33
34 global $globals;
35 $uid = intval($user_id);
08cce2ff 36 $res = XDB::query("SELECT alias FROM aliases WHERE type='a_vie' AND id={?}", $uid);
0337d704 37 $alias = $res->fetchOneCell();
38
39 if ($really_del) {
08cce2ff 40 XDB::execute("DELETE FROM emails WHERE uid={?}", $uid);
41 XDB::execute("DELETE FROM newsletter_ins WHERE user_id={?}", $uid);
0337d704 42 }
43
08cce2ff 44 XDB::execute("DELETE FROM virtual_redirect WHERE redirect = {?}", $alias.'@'.$globals->mail->domain);
45 XDB::execute("DELETE FROM virtual_redirect WHERE redirect = {?}", $alias.'@'.$globals->mail->domain2);
46
47 XDB::execute("UPDATE auth_user_md5 SET password='',smtppass='' WHERE user_id={?}", $uid);
48 XDB::execute("UPDATE auth_user_quick SET watch_flags='' WHERE user_id={?}", $uid);
49
50 XDB::execute("DELETE FROM competences_ins WHERE uid={?}", $uid);
51 XDB::execute("DELETE FROM entreprises WHERE uid={?}", $uid);
52 XDB::execute("DELETE FROM langues_ins WHERE uid={?}", $uid);
53 XDB::execute("DELETE FROM mentor_pays WHERE uid={?}", $uid);
54 XDB::execute("DELETE FROM mentor_secteur WHERE uid={?}", $uid);
55 XDB::execute("DELETE FROM mentor WHERE uid={?}", $uid);
56 XDB::execute("DELETE FROM perte_pass WHERE uid={?}", $uid);
57 XDB::execute("DELETE FROM requests WHERE user_id={?}", $uid);
58 XDB::execute("DELETE FROM user_changes WHERE user_id={?}", $uid);
59 XDB::execute("DELETE FROM watch_sub WHERE uid={?}", $uid);
0337d704 60
61 include_once('lists.inc.php');
62 if (function_exists(lists_xmlrpc)) {
cab08090 63 $client =& lists_xmlrpc(S::v('id'), S::v('password'));
0337d704 64 $client->kill($alias, $really_del);
65 }
66}
67
68// }}}
69// {{{ function get_user_login()
70
71function get_user_login($data, $get_forlife = false) {
72 global $globals, $page;
73
74 if (preg_match(',^[0-9]*$,', $data)) {
08cce2ff 75 $res = XDB::query("SELECT alias FROM aliases WHERE type='a_vie' AND id={?}", $data);
0337d704 76 if ($res->numRows()) {
77 return $res->fetchOneCell();
78 } else {
79 $page->trig("il n'y a pas d'utilisateur avec cet id");
80 return false;
81 }
82 }
83
84 $data = trim(strtolower($data));
85
86 if (strstr($data, '@')===false) {
87 $data = $data.'@'.$globals->mail->domain;
88 }
89
575dd9be 90 list($mbox, $fqdn) = explode('@', $data);
0337d704 91 if ($fqdn == $globals->mail->domain || $fqdn == $globals->mail->domain2) {
92
08cce2ff 93 $res = XDB::query("SELECT a.alias
0337d704 94 FROM aliases AS a
95 INNER JOIN aliases AS b ON (a.id = b.id AND b.type IN ('alias', 'a_vie') AND b.alias={?})
96 WHERE a.type = 'a_vie'", $mbox);
97 if ($res->numRows()) {
98 return $get_forlife ? $res->fetchOneCell() : $mbox;
99 } else {
100 $page->trig("il n'y a pas d'utilisateur avec ce login");
101 return false;
102 }
103
104 } elseif ($fqdn == $globals->mail->alias_dom || $fqdn == $globals->mail->alias_dom2) {
105
08cce2ff 106 $res = XDB::query("SELECT redirect
0337d704 107 FROM virtual_redirect
108 INNER JOIN virtual USING(vid)
109 WHERE alias={?}", $mbox.'@'.$globals->mail->alias_dom);
110 if ($redir = $res->fetchOneCell()) {
575dd9be 111 list($alias) = explode('@', $redir);
0337d704 112 } else {
113 $page->trig("il n'y a pas d'utilisateur avec cet alias");
114 $alias = false;
115 }
116 return $alias;
117
118 } else {
119
08cce2ff 120 $res = XDB::query("SELECT alias
0337d704 121 FROM aliases AS a
122 INNER JOIN emails AS e ON e.uid=a.id
123 WHERE e.email={?} AND a.type='a_vie'", $data);
124 switch ($i = $res->numRows()) {
125 case 0:
126 $page->trig("il n'y a pas d'utilisateur avec cette addresse mail");
127 return false;
128
129 case 1:
130 return $res->fetchOneCell();
131
132 default:
cab08090 133 if (S::has_perms()) {
0337d704 134 $aliases = $res->fetchColumn();
135 $page->trig("Il y a $i utilisateurs avec cette adresse mail : ".join(', ', $aliases));
136 } else {
137 $res->free();
138 }
139 }
140 }
141
142 return false;
143}
144
145// }}}
146// {{{ function get_user_forlife()
147
148function get_user_forlife($data) {
149 return get_user_login($data, true);
150}
151
152// }}}
e7545178 153// {{{ function get_users_forlife_list()
154
155function get_users_forlife_list($members, $strict = false)
156{
157 if (strlen(trim($members)) == 0) {
158 return null;
159 }
160 $members = explode(' ', $members);
161 if ($members) {
162 $list = array();
163 foreach ($members as $i => $alias) {
164 if (($login = get_user_forlife($alias)) !== false) {
165 $list[$i] = $login;
166 } else if(!$strict) {
167 $list[$i] = $alias;
168 }
169 }
170 return $list;
171 }
172 return null;
173}
174
175// }}}
8b10988d 176// {{{ function has_user_right()
177function has_user_right($pub, $view = 'private') {
178 if ($pub == $view) return true;
179 // all infos available for private
180 if ($view == 'private') return true;
181 // public infos available for all
182 if ($pub == 'public') return true;
183 // here we have view = ax or public, and pub = ax or private, and pub != view
184 return false;
185}
186// }}}
9039c94d 187// {{{ function get_user_details_pro()
188
8b10988d 189function get_user_details_pro($uid, $view = 'private')
9039c94d 190{
9039c94d 191 $sql = "SELECT e.entreprise, s.label as secteur , ss.label as sous_secteur , f.fonction_fr as fonction,
dd502514 192 e.poste, e.adr1, e.adr2, e.adr3, e.postcode, e.city, e.entrid,
9039c94d 193 gp.pays AS countrytxt, gr.name AS region, e.tel, e.fax, e.mobile, e.entrid,
194 e.pub, e.adr_pub, e.tel_pub, e.email, e.email_pub, e.web
195 FROM entreprises AS e
196 LEFT JOIN emploi_secteur AS s ON(e.secteur = s.id)
197 LEFT JOIN emploi_ss_secteur AS ss ON(e.ss_secteur = ss.id AND e.secteur = ss.secteur)
198 LEFT JOIN fonctions_def AS f ON(e.fonction = f.id)
199 LEFT JOIN geoloc_pays AS gp ON (gp.a2 = e.country)
200 LEFT JOIN geoloc_region AS gr ON (gr.a2 = e.country and gr.region = e.region)
201 WHERE e.uid = {?}
202 ORDER BY e.entrid";
08cce2ff 203 $res = XDB::query($sql, $uid);
8b10988d 204 $all_pro = $res->fetchAllAssoc();
205 foreach ($all_pro as $i => $pro) {
206 if (!has_user_right($pro['pub'], $view))
207 unset($all_pro[$i]);
208 else {
209 if (!has_user_right($pro['adr_pub'], $view)) {
dd502514 210 if ($pro['adr1'] == '' &&
211 $pro['adr2'] == '' &&
212 $pro['adr3'] == '' &&
213 $pro['postcode'] == '' &&
214 $pro['city'] == '' &&
215 $pro['countrytxt'] == '' &&
216 $pro['region'] == '') {
217 $all_pro[$i]['adr_pub'] = $view;
218 } else {
219 $all_pro[$i]['adr1'] = '';
220 $all_pro[$i]['adr2'] = '';
221 $all_pro[$i]['adr3'] = '';
222 $all_pro[$i]['postcode'] = '';
223 $all_pro[$i]['city'] = '';
224 $all_pro[$i]['countrytxt'] = '';
225 $all_pro[$i]['region'] = '';
226 }
8b10988d 227 }
228 if (!has_user_right($pro['tel_pub'], $view)) {
dd502514 229 // if no tel was defined, then the viewer will be able to write it
230 if ($pro['tel'] == '' &&
231 $pro['fax'] == '' &&
232 $pro['mobile'] == '') {
233 $all_pro[$i]['tel_pub'] = $view;
234 } else {
235 $all_pro[$i]['tel'] = '';
236 $all_pro[$i]['fax'] = '';
237 $all_pro[$i]['mobile'] = '';
238 }
8b10988d 239 }
240 if (!has_user_right($pro['email_pub'], $view)) {
dd502514 241 if ($pro['email'] == '')
242 $all_pro[$i]['email_pub'] = $view;
243 else
244 $all_pro[$i]['email'] = '';
8b10988d 245 }
246 if ($all_pro[$i]['adr1'] == '' &&
247 $all_pro[$i]['adr2'] == '' &&
248 $all_pro[$i]['adr3'] == '' &&
249 $all_pro[$i]['postcode'] == '' &&
250 $all_pro[$i]['city'] == '' &&
251 $all_pro[$i]['countrytxt'] == '' &&
252 $all_pro[$i]['region'] == '' &&
253 $all_pro[$i]['entreprise'] == '' &&
254 $all_pro[$i]['fonction'] == '' &&
255 $all_pro[$i]['secteur'] == '' &&
256 $all_pro[$i]['poste'] == '' &&
257 $all_pro[$i]['tel'] == '' &&
258 $all_pro[$i]['fax'] == '' &&
259 $all_pro[$i]['mobile'] == '' &&
260 $all_pro[$i]['email'] == '')
261 unset($all_pro[$i]);
262 }
263 }
264 if (!count($all_pro)) return false;
265 return $all_pro;
9039c94d 266}
267
268// }}}
8b10988d 269function get_user_details_adr($uid, $view = 'private') {
8b10988d 270 $sql = "SELECT a.adrid, a.adr1,a.adr2,a.adr3,a.postcode,a.city,
271 gp.pays AS countrytxt,a.region, a.regiontxt,
272 FIND_IN_SET('active', a.statut) AS active, a.adrid,
273 FIND_IN_SET('res-secondaire', a.statut) AS secondaire,
274 a.pub, gp.display
275 FROM adresses AS a
276 LEFT JOIN geoloc_pays AS gp ON (gp.a2=a.country)
277 WHERE uid= {?} AND NOT FIND_IN_SET('pro',a.statut)
278 ORDER BY NOT FIND_IN_SET('active',a.statut), FIND_IN_SET('temporaire',a.statut), FIND_IN_SET('res-secondaire',a.statut)";
08cce2ff 279 $res = XDB::query($sql, $uid);
8b10988d 280 $all_adr = $res->fetchAllAssoc();
281 $adrid_index = array();
282 foreach ($all_adr as $i => $adr) {
283 if (!has_user_right($adr['pub'], $view))
284 unset($all_adr[$i]);
285 else
286 $adrid_index[$adr['adrid']] = $i;
287 }
288
289 $sql = "SELECT t.adrid, t.tel_pub, t.tel_type, t.tel, t.telid
290 FROM tels AS t
291 INNER JOIN adresses AS a ON (a.uid = t.uid) AND (a.adrid = t.adrid)
292 WHERE t.uid = {?} AND NOT FIND_IN_SET('pro',a.statut)
293 ORDER BY t.adrid, t.tel_type DESC, t.telid";
08cce2ff 294 $restel = XDB::iterator($sql, $uid);
8b10988d 295 while ($nexttel = $restel->next()) {
296 if (has_user_right($nexttel['tel_pub'], $view)) {
297 $adrid = $nexttel['adrid'];
298 unset($nexttel['adrid']);
299 if (isset($adrid_index[$adrid])) {
300 if (!isset($all_adr[$adrid_index[$adrid]]['tels']))
301 $all_adr[$adrid_index[$adrid]]['tels'] = array($nexttel);
302 else
303 $all_adr[$adrid_index[$adrid]]['tels'][] = $nexttel;
304 }
305 }
306 }
307 return $all_adr;
308}
0337d704 309// {{{ function get_user_details()
310
8b10988d 311function &get_user_details($login, $from_uid = '', $view = 'private')
0337d704 312{
0337d704 313 $reqsql = "SELECT u.user_id, u.promo, u.promo_sortie, u.prenom, u.nom, u.nom_usage, u.date, u.cv,
314 u.perms IN ('admin','user') AS inscrit, FIND_IN_SET('femme', u.flags) AS sexe, u.deces != 0 AS dcd, u.deces,
315 q.profile_nick AS nickname, q.profile_from_ax, q.profile_mobile AS mobile, q.profile_web AS web, q.profile_freetext AS freetext,
316 q.profile_mobile_pub AS mobile_pub, q.profile_web_pub AS web_pub, q.profile_freetext_pub AS freetext_pub,
317 q.profile_medals_pub AS medals_pub,
318 IF(gp.nat='',gp.pays,gp.nat) AS nationalite, gp.a2 AS iso3166,
319 a.alias AS forlife, a2.alias AS bestalias,
320 c.uid IS NOT NULL AS is_contact,
321 s.text AS section, p.x, p.y, p.pub AS photo_pub,
dd502514 322 u.matricule_ax,
0337d704 323 m.expertise != '' AS is_referent
324
325 FROM auth_user_md5 AS u
326 INNER JOIN auth_user_quick AS q USING(user_id)
327 INNER JOIN aliases AS a ON (u.user_id=a.id AND a.type='a_vie')
328 INNER JOIN aliases AS a2 ON (u.user_id=a2.id AND FIND_IN_SET('bestalias',a2.flags))
329 LEFT JOIN contacts AS c ON (c.uid = {?} and c.contact = u.user_id)
330 LEFT JOIN geoloc_pays AS gp ON (gp.a2 = u.nationalite)
331 INNER JOIN sections AS s ON (s.id = u.section)
332 LEFT JOIN photo AS p ON (p.uid = u.user_id)
333 LEFT JOIN mentor AS m ON (m.uid = u.user_id)
334 WHERE a.alias = {?}";
08cce2ff 335 $res = XDB::query($reqsql, $from_uid, $login);
0337d704 336 $user = $res->fetchOneAssoc();
337 $uid = $user['user_id'];
8b10988d 338 // hide orange status, cv, nickname, section
339 if (!has_user_right('private', $view)) {
340 $user['promo_sortie'] = $user['promo'] + 3;
341 $user['cv'] = '';
342 $user['nickname'] = '';
343 $user['section'] = '';
344 }
345 // hide mobile
dd502514 346 if (!has_user_right($user['mobile_pub'], $view)) {
347 if ($user['mobile'] == '')
348 $user['mobile_pub'] = $view;
349 else
350 $user['mobile'] = '';
351 }
8b10988d 352 // hide web
dd502514 353 if (!has_user_right($user['web_pub'], $view)) {
354 if ($user['web'] == '')
355 $user['web_pub'] = $view;
356 else
357 $user['web'] = '';
358 }
8b10988d 359 // hide freetext
dd502514 360 if (!has_user_right($user['freetext_pub'], $view)) {
361 if ($user['freetext'] == '')
362 $user['freetext_pub'] = $view;
363 else
364 $user['freetext'] = '';
365 }
0337d704 366
8b10988d 367 $user['adr_pro'] = get_user_details_pro($uid, $view);
368 $user['adr'] = get_user_details_adr($uid, $view);
0337d704 369
8b10988d 370 if (has_user_right('private', $view)) {
371 $sql = "SELECT text
372 FROM binets_ins
373 LEFT JOIN binets_def ON binets_ins.binet_id = binets_def.id
374 WHERE user_id = {?}";
08cce2ff 375 $res = XDB::query($sql, $uid);
8b10988d 376 $user['binets'] = $res->fetchColumn();
377 $user['binets_join'] = join(', ', $user['binets']);
79a5acea 378
08cce2ff 379 $res = XDB::iterRow("SELECT text, url
8b10988d 380 FROM groupesx_ins
381 LEFT JOIN groupesx_def ON groupesx_ins.gid = groupesx_def.id
382 WHERE guid = {?}", $uid);
383 $user['gpxs'] = Array();
384 while (list($gxt, $gxu) = $res->next()) {
385 $user['gpxs'][] = $gxu ? "<a href=\"$gxu\">$gxt</a>" : $gxt;
386 }
387 $user['gpxs_join'] = join(', ', $user['gpxs']);
79a5acea 388 }
0337d704 389
08cce2ff 390 $res = XDB::iterRow("SELECT applis_def.text, applis_def.url, applis_ins.type
0337d704 391 FROM applis_ins
392 INNER JOIN applis_def ON applis_def.id = applis_ins.aid
393 WHERE uid={?}
394 ORDER BY ordre", $uid);
395
396 $user['applis_fmt'] = Array();
dd502514 397 $user['formation'] = Array();
0337d704 398 while (list($txt, $url, $type) = $res->next()) {
dd502514 399 $user['formation'][] = $txt." ".$type;
0337d704 400 require_once('applis.func.inc.php');
401 $user['applis_fmt'][] = applis_fmt($type, $txt, $url);
402 }
403 $user['applis_join'] = join(', ', $user['applis_fmt']);
404
8b10988d 405 if (has_user_right($user['medals_pub'], $view)) {
08cce2ff 406 $res = XDB::iterator("SELECT m.id, m.text AS medal, m.type, m.img, s.gid, g.text AS grade
8b10988d 407 FROM profile_medals_sub AS s
408 INNER JOIN profile_medals AS m ON ( s.mid = m.id )
409 LEFT JOIN profile_medals_grades AS g ON ( s.mid = g.mid AND s.gid = g.gid )
410 WHERE s.uid = {?}", $uid);
411 $user['medals'] = Array();
412 while ($tmp = $res->next()) {
413 $user['medals'][] = $tmp;
414 }
0337d704 415 }
416
417 return $user;
418}
dd502514 419// }}}
420// {{{ function add_user_address()
421function add_user_address($uid, $adrid, $adr) {
08cce2ff 422 XDB::execute(
dd502514 423 "INSERT INTO adresses (`uid`, `adrid`, `adr1`, `adr2`, `adr3`, `postcode`, `city`, `country`, `datemaj`, `pub`) (
424 SELECT u.user_id, {?}, {?}, {?}, {?}, {?}, {?}, gp.a2, NOW(), {?}
425 FROM auth_user_md5 AS u
426 LEFT JOIN geoloc_pays AS gp ON (gp.pays LIKE {?} OR gp.country LIKE {?} OR gp.a2 LIKE {?})
427 WHERE u.user_id = {?}
428 LIMIT 1)",
429 $adrid, $adr['adr1'], $adr['adr2'], $adr['adr3'], $adr['postcode'], $adr['city'], $adr['pub'], $adr['countrytxt'], $adr['countrytxt'], $adr['countrytxt'], $uid);
430 if (isset($adr['tels']) && is_array($adr['tels'])) {
431 $telid = 0;
432 foreach ($adr['tels'] as $tel) if ($tel['tel']) {
433 add_user_tel($uid, $adrid, $telid, $tel);
434 $telid ++;
435 }
436 }
437}
438// }}}
439// {{{ function update_user_address()
440function update_user_address($uid, $adrid, $adr) {
dd502514 441 // update address
08cce2ff 442 XDB::execute(
dd502514 443 "UPDATE adresses AS a LEFT JOIN geoloc_pays AS gp ON (gp.pays = {?})
444 SET `adr1` = {?}, `adr2` = {?}, `adr3` = {?},
445 `postcode` = {?}, `city` = {?}, a.`country` = gp.a2, `datemaj` = NOW(), `pub` = {?}
446 WHERE adrid = {?} AND uid = {?}",
447 $adr['country_txt'],
448 $adr['adr1'], $adr['adr2'], $adr['adr3'],
449 $adr['postcode'], $adr['city'], $adr['pub'], $adrid, $uid);
450 if (isset($adr['tels']) && is_array($adr['tels'])) {
08cce2ff 451 $res = XDB::query("SELECT telid FROM tels WHERE uid = {?} AND adrid = {?} ORDER BY telid", $uid, $adrid);
dd502514 452 $telids = $res->fetchColumn();
453 foreach ($adr['tels'] as $tel) {
454 if (isset($tel['telid']) && isset($tel['remove']) && $tel['remove']) {
455 remove_user_tel($uid, $adrid, $tel['telid']);
456 if (isset($telids[$tel['telid']])) unset($telids[$tel['telid']]);
457 } else if (isset($tel['telid'])) {
458 update_user_tel($uid, $adrid, $tel['telid'], $tel);
459 } else {
460 for ($telid = 0; isset($telids[$telid]) && ($telids[$telid] == $telid); $telid++);
461 add_user_tel($uid, $adrid, $telid, $tel);
462 }
463 }
464 }
465}
466// }}}
467// {{{ function remove_user_address()
468function remove_user_address($uid, $adrid) {
08cce2ff 469 XDB::execute("DELETE FROM adresses WHERE adrid = {?} AND uid = {?}", $adrid, $uid);
470 XDB::execute("DELETE FROM tels WHERE adrid = {?} AND uid = {?}", $adrid, $uid);
dd502514 471}
472// }}}
473// {{{ function add_user_tel()
474function add_user_tel($uid, $adrid, $telid, $tel) {
08cce2ff 475 XDB::execute(
dd502514 476 "INSERT INTO tels SET uid = {?}, adrid = {?}, telid = {?}, tel = {?}, tel_type = {?}, tel_pub = {?}",
477 $uid, $adrid, $telid, $tel['tel'], $tel['tel_type'], $tel['tel_pub']);
478}
479// }}}
480// {{{ function update_user_tel()
481function update_user_tel($uid, $adrid, $telid, $tel) {
08cce2ff 482 XDB::execute(
dd502514 483 "UPDATE tels SET tel = {?}, tel_type = {?}, tel_pub = {?}
484 WHERE telid = {?} AND adrid = {?} AND uid = {?}",
485 $tel['tel'], $tel['tel_type'], $tel['tel_pub'],
486 $telid, $adrid, $uid);
487}
488// }}}
489// {{{ function remove_user_tel()
490function remove_user_tel($uid, $adrid, $telid) {
a3a049fc 491 XDB::execute("DELETE FROM tels WHERE telid = {?} AND adrid = {?} AND uid = {?}",
492 $telid, $adrid, $uid);
dd502514 493}
494// }}}
495// {{{ function add_user_pro()
496function add_user_pro($uid, $entrid, $pro) {
08cce2ff 497 XDB::execute(
dd502514 498 "INSERT INTO entreprises (`uid`, `entrid`, `entreprise`, `poste`, `secteur`, `ss_secteur`, `fonction`,
499 `adr1`, `adr2`, `adr3`, `postcode`, `city`, `country`, `region`, `tel`, `fax`, `mobile`, `email`, `web`, `pub`, `adr_pub`, `tel_pub`, `email_pub`)
500 SELECT u.user_id, {?}, {?}, {?}, s.id, ss.id, f.id,
501 {?}, {?}, {?}, {?}, {?}, gp.a2, gr.region, {?}, {?}, {?}, {?}, {?}, {?}, {?}, {?}, {?}
502 FROM auth_user_md5 AS u
503 LEFT JOIN emploi_secteur AS s ON(s.label LIKE {?})
504 LEFT JOIN emploi_ss_secteur AS ss ON(s.id = ss.secteur AND ss.label LIKE {?})
505 LEFT JOIN fonctions_def AS f ON(f.fonction_fr LIKE {?} OR f.fonction_en LIKE {?})
506 LEFT JOIN geoloc_pays AS gp ON (gp.country LIKE {?} OR gp.pays LIKE {?})
507 LEFT JOIN geoloc_region AS gr ON (gr.a2 = gp.a2 AND gr.name LIKE {?})
508 WHERE u.user_id = {?}
509 LIMIT 1",
510 $entrid, $pro['entreprise'], $pro['poste'],
511 $pro['adr1'], $pro['adr2'], $pro['adr3'], $pro['postcode'], $pro['city'], $pro['tel'], $pro['fax'], $pro['mobile'], $pro['email'], $pro['web'], $pro['pub'], $pro['adr_pub'], $pro['tel_pub'], $pro['email_pub'],
512 $pro['secteur'], $pro['sous_secteur'], $pro['fonction'], $pro['fonction'],
513 $pro['countrytxt'], $pro['countrytxt'], $pro['region'],
514 $uid);
515}
516// }}}
517// {{{ function update_user_pro()
518function update_user_pro($uid, $entrid, $pro) {
dd502514 519 $join = "";
520 $set = "";
521 $args_join = array();
522 $args_set = array();
523
524 $join .= "LEFT JOIN emploi_secteur AS s ON(s.label LIKE {?})
525 LEFT JOIN emploi_ss_secteur AS ss ON(s.id = ss.secteur AND ss.label LIKE {?})
526 LEFT JOIN fonctions_def AS f ON(f.fonction_fr LIKE {?} OR f.fonction_en LIKE {?})";
527 $args_join[] = $pro['secteur'];
528 $args_join[] = $pro['sous_secteur'];
529 $args_join[] = $pro['fonction'];
530 $args_join[] = $pro['fonction'];
531 $set .= ", e.`entreprise` = {?}, e.`secteur` = s.id, e.`ss_secteur` = ss.id, e.`fonction` = f.id, e.`poste`= {?}, e.`web` = {?}, e.`pub` = {?}";
532 $args_set[] = $pro['entreprise'];
533 $args_set[] = $pro['poste'];
534 $args_set[] = $pro['web'];
535 $args_set[] = $pro['pub'];
536
537 if (isset($pro['adr1'])) {
538 $join .= "LEFT JOIN geoloc_pays AS gp ON (gp.country LIKE {?} OR gp.pays LIKE {?})
539 LEFT JOIN geoloc_region AS gr ON (gr.a2 = gp.a2 AND gr.name LIKE {?})";
540 $args_join[] = $pro['countrytxt'];
541 $args_join[] = $pro['countrytxt'];
542 $args_join[] = $pro['region'];
543 $set .= ", e.`adr1` = {?}, e.`adr2` = {?}, e.`adr3` = {?}, e.`postcode` = {?}, e.`city` = {?}, e.`country` = gp.a2, e.`region` = gr.region, e.`adr_pub` = {?}";
544 $args_set[] = $pro['adr1'];
545 $args_set[] = $pro['adr2'];
546 $args_set[] = $pro['adr3'];
547 $args_set[] = $pro['postcode'];
548 $args_set[] = $pro['city'];
549 $args_set[] = $pro['adr_pub'];
550 }
551
552 if (isset($pro['tel'])) {
553 $set .= ", e.`tel` = {?}, e.`fax` = {?}, e.`mobile` = {?}, e.tel_pub = {?}";
554 $args_set[] = $pro['tel'];
555 $args_set[] = $pro['fax'];
556 $args_set[] = $pro['mobile'];
557 $args_set[] = $pro['tel_pub'];
558 }
559 if (isset($pro['email'])) {
560 $set .= ", e.`email` = {?}, e.`email_pub` = {?}";
561 $args_set[] = $pro['email'];
562 $args_set[] = $pro['email_pub'];
563 }
564 $query = "UPDATE entreprises AS e ".$join." SET ".substr($set,1)." WHERE e.uid = {?} AND e.entrid = {?}";
565 $args_where = array($uid, $entrid);
566 $args = array_merge(array($query), $args_join, $args_set, $args_where);
a3a049fc 567 call_user_func_array(array('XDB', 'execute'), $args);
dd502514 568}
569// }}}
570// {{{ function remove_user_pro()
571function remove_user_pro($uid, $entrid) {
08cce2ff 572 XDB::execute("DELETE FROM entreprises WHERE entrid = {?} AND uid = {?}", $entrid, $uid);
dd502514 573}
574// }}}
575// {{{ function set_user_details()
576function set_user_details_addresses($uid, $adrs) {
08cce2ff 577 $res = XDB::query("SELECT adrid FROM adresses WHERE uid = {?} AND adrid >= 1 ORDER BY adrid", $uid);
dd502514 578 $adrids = $res->fetchColumn();
579 foreach ($adrs as $adr) {
580 if (isset($adr['adrid']) && isset($adr['remove']) && $adr['remove']) {
581 remove_user_address($uid, $adr['adrid']);
582 if (isset($adrids[$adr['adrid']])) unset($adrids[$adr['adrid']]);
583 } else if (isset($adr['adrid'])) {
584 update_user_address($uid, $adr['adrid'], $adr);
585 } else {
586 for ($adrid = 1; isset($adrids[$adrid-1]) && ($adrids[$adrid-1] == $adrid); $adrid++);
587 add_user_address($uid, $adrid, $adr);
588 $adrids[$adrid-1] = $adrid;
589 }
590 }
591 require_once 'geoloc.inc.php';
592 localize_addresses($uid);
593}
594// }}}
595// {{{ function set_user_details_pro()
596
597function set_user_details_pro($uid, $pros)
598{
08cce2ff 599 $res = XDB::query("SELECT entrid FROM entreprises WHERE uid = {?} ORDER BY entrid", $uid);
dd502514 600 $entrids = $res->fetchColumn();
601 foreach ($pros as $pro) {
602 if (isset($pro['entrid']) && isset($pro['remove']) && $pro['remove']) {
603 remove_user_pro($uid, $pro['entrid']);
604 if (isset($entrids[$pro['entrid']])) unset($entrids[$pro['entrid']]);
605 } else if (isset($pro['entrid'])) {
606 update_user_pro($uid, $pro['entrid'], $pro);
607 } else {
608 for ($entrid = 0; isset($entrids[$entrid]) && ($entrids[$entrid] == $entrid); $entrid++);
609 add_user_pro($uid, $entrid, $pro);
610 }
611 }
612}
0337d704 613
614// }}}
dd502514 615// {{{ function set_user_details()
616function set_user_details($uid, $details) {
dd502514 617 if (isset($details['nom_usage'])) {
08cce2ff 618 XDB::execute("UPDATE auth_user_md5 SET nom_usage = {?} WHERE user_id = {?}", strtoupper($details['nom_usage']), $uid);
dd502514 619 }
620 if (isset($details['mobile'])) {
08cce2ff 621 XDB::execute("UPDATE auth_user_quick SET profile_mobile = {?} WHERE user_id = {?}", $details['mobile'], $uid);
dd502514 622 }
623 if (isset($details['nationalite'])) {
08cce2ff 624 XDB::execute(
dd502514 625 "UPDATE auth_user_md5 AS u
626 INNER JOIN geoloc_pays AS gp
627 SET u.nationalite = gp.a2
628 WHERE (gp.a2 = {?} OR gp.nat = {?})
629 AND u.user_id = {?}", $details['nationalite'], $details['nationalite'], $uid);
630 }
631 if (isset($details['adr']) && is_array($details['adr']))
632 set_user_details_addresses($uid, $details['adr']);
633 if (isset($details['adr_pro']) && is_array($details['adr_pro']))
634 set_user_details_pro($uid, $details['adr_pro']);
635 if (isset($details['binets']) && is_array($details['binets'])) {
08cce2ff 636 XDB::execute("DELETE FROM binets_ins WHERE user_id = {?}", $uid);
dd502514 637 foreach ($details['binets'] as $binet)
08cce2ff 638 XDB::execute(
dd502514 639 "INSERT INTO binets_ins (`user_id`, `binet_id`)
640 SELECT {?}, id FROM binets_def WHERE text = {?} LIMIT 1",
641 $uid, $binet);
642 }
643 if (isset($details['gpxs']) && is_array($details['gpxs'])) {
08cce2ff 644 XDB::execute("DELETE FROM groupesx_ins WHERE user_id = {?}", $uid);
dd502514 645 foreach ($details['gpxs'] as $groupex) {
646 if (preg_match('/<a href="[^"]*">([^<]+)</a>/', $groupex, $a)) $groupex = $a[1];
08cce2ff 647 XDB::execute(
dd502514 648 "INSERT INTO groupesx_ins (`user_id`, `binet_id`)
649 SELECT {?}, id FROM groupesx_def WHERE text = {?} LIMIT 1",
650 $uid, $groupex);
651 }
652 }
653 // applis
654 // medals
655}
656// }}}
0337d704 657// {{{ function _user_reindex
658
659function _user_reindex($uid, $keys, $muls) {
0337d704 660 foreach ($keys as $i => $key) {
661 if ($key == '') {
662 continue;
663 }
664 $toks = preg_split('/[ \'\-]+/', $key);
665 $token = "";
666 $first = 5;
667 while ($toks) {
668 $token = strtolower(replace_accent(array_pop($toks) . $token));
669 $score = ($toks ? 0 : 10 + $first) * $muls[$i];
670 mysql_query("REPLACE INTO search_name (token, uid, score) VALUES('$token',$uid,$score)");
671 $first = 0;
672 }
673 }
674}
675
676// }}}
677// {{{ function user_reindex
678
679function user_reindex($uid) {
08cce2ff 680 XDB::execute("DELETE FROM search_name WHERE uid={?}", $uid);
681 $res = XDB::query("SELECT prenom, nom, nom_usage, profile_nick FROM auth_user_md5 INNER JOIN auth_user_quick USING(user_id) WHERE auth_user_md5.user_id = {?}", $uid);
0337d704 682 _user_reindex($uid, $res->fetchOneRow(), array(1,1,1,0.2));
683}
684
685// }}}
74c55fd6 686
687function set_new_usage($uid, $usage, $alias=false) {
688 XDB::execute("UPDATE auth_user_md5 set nom_usage={?} WHERE user_id={?}",$usage ,$uid);
689 XDB::execute("DELETE FROM aliases WHERE FIND_IN_SET('usage',flags) AND id={?}", $uid);
690 if ($alias && $usage) {
691 XDB::execute("UPDATE aliases SET flags=flags & 255-1 WHERE id={?}", $uid);
692 XDB::execute("INSERT INTO aliases VALUES({?}, 'alias', 'usage,bestalias', {?}, null)",
693 $alias, $uid);
694 }
695 $r = XDB::query("SELECT alias FROM aliases WHERE FIND_IN_SET('bestalias', flags) AND id = {?}", $uid);
696 if ($r->fetchOneCell() == "") {
697 XDB::execute("UPDATE aliases SET flags = 1 | flags WHERE id = {?} LIMIT 1", $uid);
698 }
699 require_once 'user.func.inc.php';
700 user_reindex($uid);
701}
702
0337d704 703// vim:set et sw=4 sts=4 sws=4 foldmethod=marker:
704?>