Allow name modifications without validation when only changing case or accents. Close...
[platal.git] / include / name.func.inc.php
1 <?php
2 /***************************************************************************
3 * Copyright (C) 2003-2010 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 function build_javascript_names($data, $isFemale)
23 {
24 $data_array = explode(';;', $data);
25 $n = count($data_array);
26 $n--;
27 for ($i = 0; $i < $n; $i++) {
28 $searchname = explode(';', $data_array[$i]);
29 if (isset($search_names[$searchname[0]])) {
30 $search_names[$searchname[0]][] = $searchname[1];
31 } else {
32 $search_names[$searchname[0]] = array('fullname' => $searchname[1]);
33 }
34 }
35
36 $sn_types_public = build_types('public');
37 $sn_types_private = build_types('private');
38 $full_name = build_full_name($search_names, $sn_types_public, $isFemale);
39 return build_public_name($search_names, $sn_types_public, $full_name) . ';' .
40 build_private_name($search_names, $sn_types_private);
41 }
42
43 function build_display_names(&$display_names, $search_names, $isFemale, $private_name_end = null, &$alias = null)
44 {
45 $sn_types_public = build_types('public');
46 $full_name = build_full_name($search_names, $sn_types_public, $isFemale);
47 $display_names['public_name'] = build_public_name($search_names, $sn_types_public, $full_name);
48 $display_names['private_name'] = $display_names['public_name'] . $private_name_end;
49 $display_names['directory_name'] = build_directory_name($search_names, $sn_types_public, $full_name);
50 $display_names['short_name'] = build_short_name($search_names, $sn_types_public, $alias);
51 $display_names['sort_name'] = build_sort_name($search_names, $sn_types_public);
52 }
53
54 function build_types($pub = null)
55 {
56 if ($pub == 'public') {
57 $sql_pub = "AND FIND_IN_SET('public', flags)";
58 } elseif ($pub == 'private') {
59 $sql_pub = "AND NOT FIND_IN_SET('public', flags)";
60 } else {
61 $sql_pub = "";
62 }
63 $sql = "SELECT id, type, name
64 FROM profile_name_enum
65 WHERE NOT FIND_IN_SET('not_displayed', flags)" . $sql_pub;
66 $sn_types = XDB::iterator($sql);
67 $types = array();
68 while ($sn_type = $sn_types->next()) {
69 if ($pub) {
70 $types[$sn_type['type']] = $sn_type['id'];
71 } else {
72 $types[$sn_type['id']] = $sn_type['name'];
73 }
74 }
75 return $types;
76 }
77
78 function build_full_name(&$search_names, &$sn_types, $isFemale)
79 {
80 $name = "";
81 if (isset($search_names[$sn_types['lastname_ordinary']])) {
82 $name .= $search_names[$sn_types['lastname_ordinary']]['fullname'] . " ("
83 . $search_names[$sn_types['lastname']]['fullname'] . ")";
84 } else {
85 $name .= $search_names[$sn_types['lastname']]['fullname'];
86 }
87 if (isset($search_names[$sn_types['lastname_marital']])
88 || isset($search_names[$sn_types['pseudonym']])) {
89 $name .= " (";
90 if (isset($search_names[$sn_types['lastname_marital']])) {
91 if ($isFemale) {
92 $name .= "Mme ";
93 } else {
94 $name .= "M ";
95 }
96 $name .= $search_names[$sn_types['lastname_marital']]['fullname'];
97 if (isset($search_names[$sn_types['pseudonym']])) {
98 $name .= ", ";
99 }
100 }
101 if (isset($search_names[$sn_types['pseudonym']])) {
102 $name .= $search_names[$sn_types['pseudonym']]['fullname'];
103 }
104 $name .= ")";
105 }
106 return $name;
107 }
108
109 function build_public_name(&$search_names, &$sn_types, $full_name)
110 {
111 return $search_names[$sn_types['firstname']]['fullname'] . " " . $full_name;
112 }
113
114 function build_private_name(&$search_names, &$sn_types)
115 {
116 $name = "";
117 if (isset($search_names[$sn_types['nickname']])
118 || (isset($search_names[$sn_types['name_other']])
119 || isset($search_names[$sn_types['name_other']]))) {
120 $name .= " (";
121 if (isset($search_names[$sn_types['nickname']])) {
122 $name .= "alias " . $search_names[$sn_types['nickname']]['fullname'];
123 $i = 0;
124 while (isset($search_names[$sn_types['nickname']][$i])) {
125 $name .= ", " . $search_names[$sn_types['nickname']][$i];
126 $i++;
127 }
128 if (isset($search_names[$sn_types['name_other']])
129 || isset($search_names[$sn_types['name_other']])) {
130 $name .= ", ";
131 }
132 }
133 if (isset($search_names[$sn_types['firstname_other']])) {
134 $name .= "autres prénoms : " . $search_names[$sn_types['firstname_other']]['fullname'];
135 $i = 0;
136 while (isset($search_names[$sn_types['firstname_other']][$i])) {
137 $name .= ", " . $search_names[$sn_types['firstname_other']][$i];
138 $i++;
139 }
140 if (isset($search_names[$sn_types['name_other']])) {
141 $name .= ", ";
142 }
143 }
144 if (isset($search_names[$sn_types['name_other']])) {
145 $name .= "autres noms : " . $search_names[$sn_types['name_other']]['fullname'];
146 $i = 0;
147 while (isset($search_names[$sn_types['name_other']][$i])) {
148 $name .= ", " . $search_names[$sn_types['name_other']][$i];
149 $i++;
150 }
151 }
152 $name .= ")";
153 }
154 return $name;
155 }
156
157 function build_directory_name(&$search_names, &$sn_types, $full_name)
158 {
159 return $full_name . " " . $search_names[$sn_types['firstname']]['fullname'];
160 }
161
162 function build_short_name(&$search_names, &$sn_types, &$alias = null)
163 {
164 if (isset($search_names[$sn_types['lastname_ordinary']])) {
165 $lastname = $search_names[$sn_types['lastname_ordinary']]['fullname'];
166 } else {
167 $lastname = $search_names[$sn_types['lastname']]['fullname'];
168 }
169 if (isset($search_names[$sn_types['firstname_ordinary']])) {
170 $firstname = $search_names[$sn_types['firstname_ordinary']]['fullname'];
171 } else {
172 $firstname = $search_names[$sn_types['firstname']]['fullname'];
173 }
174 if ($alias) {
175 $alias = PlUser::makeUserName($firstname, $lastname);
176 }
177 return $firstname . " " . $lastname;
178 }
179
180 function build_sort_name(&$search_names, &$sn_types)
181 {
182 $name = "";
183 if (isset($search_names[$sn_types['lastname_ordinary']])) {
184 $name .= $search_names[$sn_types['lastname_ordinary']]['name'];
185 } else {
186 $name .= $search_names[$sn_types['lastname']]['name'];
187 }
188 $name .= " " . $search_names[$sn_types['firstname']]['fullname'];
189 return $name;
190 }
191
192 function set_profile_display(&$display_names, $pid)
193 {
194 XDB::execute("UPDATE profile_display
195 SET public_name = {?}, private_name = {?},
196 directory_name = {?}, short_name = {?}, sort_name = {?}
197 WHERE pid = {?}",
198 $display_names['public_name'], $display_names['private_name'],
199 $display_names['directory_name'], $display_names['short_name'],
200 $display_names['sort_name'], $pid);
201 }
202
203 function build_sn_pub($pid)
204 {
205 $res = XDB::iterator("SELECT CONCAT(sn.particle, sn.name) AS fullname, sn.typeid,
206 sn.particle, sn.name, sn.id
207 FROM profile_name AS sn
208 INNER JOIN profile_name_enum AS e ON (e.id = sn.typeid)
209 WHERE sn.pid = {?} AND NOT FIND_IN_SET('not_displayed', e.flags)
210 AND FIND_IN_SET('public', e.flags)
211 ORDER BY NOT FIND_IN_SET('always_displayed', e.flags), e.id, sn.name",
212 $pid);
213 $sn_old = array();
214 while ($old = $res->next()) {
215 $sn_old[$old['typeid']] = array('fullname' => $old['fullname'],
216 'name' => $old['name'],
217 'particle' => $old['particle'],
218 'id' => $old['id']);
219 }
220 return $sn_old;
221 }
222
223 /** Transform a name to its canonical value so it can be compared
224 * to another form (different case, with accents or with - instead
225 * of blanks).
226 * @see compare_basename to compare
227 */
228 function name_to_basename($value) {
229 $value = mb_strtoupper(replace_accent($value));
230 return preg_replace('/[^A-Z]/', ' ', $value);
231 }
232
233 /** Compares two strings and check if they are two forms of the
234 * same name (different case, with accents or with - instead of
235 * blanks).
236 * @see name_to_basename to retreive the compared string
237 */
238 function compare_basename($a, $b) {
239 return name_to_basename($a) == name_to_basename($b);
240 }
241
242 function set_alias_names(&$sn_new, $sn_old, $pid, $uid, $update_new = false, $new_alias = null)
243 {
244 $has_new = false;
245 foreach ($sn_new as $typeid => $sn) {
246 if (isset($sn['pub'])) {
247 if (isset($sn_old[$typeid]) && ($sn_old[$typeid]['fullname'] == $sn['fullname'] && $update_new)) {
248 XDB::execute("UPDATE profile_name
249 SET particle = {?}, name = {?}, typeid = {?}
250 WHERE id = {?} AND pid = {?}",
251 $sn['particle'], $sn['name'], $typeid, $sn_old[$typeid]['id'], $pid);
252 unset($sn_old[$typeid]);
253 } elseif ($update_new
254 || (isset($sn_old[$typeid]) && compare_basename($sn_old[$typeid]['fullname'], $sn['fullname']))) {
255 XDB::execute("INSERT INTO profile_name (particle, name, typeid, pid)
256 VALUES ({?}, {?}, {?}, {?})",
257 $sn['particle'], $sn['name'], $typeid, $pid);
258 unset($sn_old[$typeid]);
259 } else {
260 $has_new = true;
261 }
262 } else {
263 if ($sn['fullname'] != '') {
264 XDB::execute("INSERT INTO profile_name (particle, name, typeid, pid)
265 VALUES ('', {?}, {?}, {?})",
266 $sn['fullname'], $typeid, $pid);
267 }
268 $i = 0;
269 while (isset($sn[$i])) {
270 XDB::execute("INSERT INTO profile_name (particle, name, typeid, pid)
271 VALUES ('', {?}, {?}, {?})",
272 $sn[$i], $typeid, $pid);
273 $i++;
274 }
275 }
276 }
277 if (count($sn_old) > 0) {
278 if (!$update_new) {
279 $has_new = true;
280 foreach ($sn_old as $typeid => $sn) {
281 XDB::execute("INSERT INTO profile_name (particle, name, typeid, pid)
282 VALUES ({?}, {?}, {?}, {?})",
283 $sn['particle'], $sn['name'], $typeid, $pid);
284 }
285 } else {
286 foreach ($sn_old as $typeid => $sn) {
287 XDB::execute("DELETE FROM profile_name
288 WHERE pid = {?} AND id = {?}",
289 $pid, $sn['id']);
290 }
291 }
292 }
293 if ($update_new) {
294 XDB::execute("DELETE FROM aliases
295 WHERE FIND_IN_SET('usage', flags) AND uid = {?}",
296 $uid);
297 }
298 if ($new_alias) {
299 XDB::execute("INSERT INTO aliases (alias, type, flags, uid)
300 VALUES ({?}, 'alias', 'usage', {?})",
301 $new_alias, $uid);
302 }
303 Profile::rebuildSearchTokens($pid);
304 return $has_new;
305 }
306
307 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
308 ?>