1 | <?php |
---|
2 | // Keeps file coded in UTF-8 without BOM : é |
---|
3 | |
---|
4 | include_once (LCAS_PATH.'include/constants.php'); |
---|
5 | load_language('plugin.lang', LCAS_PATH); |
---|
6 | |
---|
7 | |
---|
8 | /** |
---|
9 | * Split a multi-byte string in a array of each of its characters. |
---|
10 | * Many thanks to Whiler ;-) in |
---|
11 | * http://fr.piwigo.org/forum/viewtopic.php?pid=162907#p162907 |
---|
12 | * |
---|
13 | * @param string s: string to split |
---|
14 | * |
---|
15 | * @return : array of each character of s |
---|
16 | */ |
---|
17 | function LCAS_mbStringToArray($s) { |
---|
18 | return preg_split('//u', $s, -1, PREG_SPLIT_NO_EMPTY); |
---|
19 | } |
---|
20 | |
---|
21 | |
---|
22 | /** |
---|
23 | * Change the characters of the given string as stated by values of |
---|
24 | * $conf['insensitive_case_logon'] and $conf['LCAS_replacement_set']. |
---|
25 | * |
---|
26 | * @param mix s: string |
---|
27 | * |
---|
28 | * @return : string modified as stated |
---|
29 | */ |
---|
30 | function LCAS_change_case($Username, $Opt) |
---|
31 | { |
---|
32 | global $conf; |
---|
33 | |
---|
34 | if ($Opt == '0' and !isset($conf['LCAS_replacement_set'][0])) |
---|
35 | return $Username; |
---|
36 | if ($Opt == '0') return $Username; // to be removed once rule 0 is done |
---|
37 | $Option = intval($Opt); |
---|
38 | if (!isset($Opt) or ($Option < 0) or ($Option > 3)) return $Username; |
---|
39 | |
---|
40 | include(LCAS_PATH.'include/LCAS_replacement_set.inc.php'); |
---|
41 | |
---|
42 | // Build an array of characters that must be replaced |
---|
43 | // $rep_char is the replacement character ; $char_rep_arr is an array of |
---|
44 | // characters which have to be replaced. ie : |
---|
45 | // if |
---|
46 | // $conf['LCAS_replacement_set'][$Option]['e'] ='é è' |
---|
47 | // then |
---|
48 | // $char_rep_arr['é'] = 'e' ; $char_rep_arr['è'] = 'e'. |
---|
49 | $char_rep_arr = array(); |
---|
50 | foreach ( |
---|
51 | $conf['LCAS_replacement_set'][$Option] |
---|
52 | as $rep_char => $char_rep_list |
---|
53 | ) { |
---|
54 | $t = explode(' ', $char_rep_list); |
---|
55 | foreach ($t as $c) $char_rep_arr[$c] = $rep_char; |
---|
56 | } |
---|
57 | |
---|
58 | // Replacement in each string of $Username of the characters |
---|
59 | // that needs to be replaced |
---|
60 | $t = LCAS_mbStringToArray($Username); $r =''; |
---|
61 | foreach ($t as $c) { |
---|
62 | if (array_key_exists($c, $char_rep_arr)) |
---|
63 | $r.= $char_rep_arr[$c]; |
---|
64 | else |
---|
65 | $r.= $c; |
---|
66 | } |
---|
67 | |
---|
68 | // Return of the result |
---|
69 | return $r; |
---|
70 | } |
---|
71 | |
---|
72 | /* Function called from LCAS_admin.php to send notification email */ |
---|
73 | function LCAS_SendMail($id, $oldusername, $username) |
---|
74 | { |
---|
75 | global $conf; |
---|
76 | |
---|
77 | $conf_LCAS= unserialize($conf['LoginCaseAccentsSensitivity']); |
---|
78 | |
---|
79 | include_once(PHPWG_ROOT_PATH.'include/functions_mail.inc.php'); |
---|
80 | |
---|
81 | /* We have to get the user's language in database */ |
---|
82 | $query =' |
---|
83 | SELECT user_id, language |
---|
84 | FROM '.USER_INFOS_TABLE.' |
---|
85 | WHERE user_id = '.$id.' |
---|
86 | ;'; |
---|
87 | $data = pwg_db_fetch_assoc(pwg_query($query)); |
---|
88 | |
---|
89 | // Check if user is already registered (profile changing) - |
---|
90 | // If not (new registration), language is set to current gallery language |
---|
91 | if (empty($data)) |
---|
92 | { |
---|
93 | // And switch gallery to this language before using personalized |
---|
94 | // and multilangual contents |
---|
95 | $language = pwg_get_session_var( 'lang_switch', $user['language'] ); |
---|
96 | switch_lang_to($language); |
---|
97 | } |
---|
98 | else |
---|
99 | { |
---|
100 | // And switch gallery to this language before using personalized |
---|
101 | // and multilangual contents |
---|
102 | switch_lang_to($data['language']); |
---|
103 | load_language('plugin.lang', LCAS_PATH); |
---|
104 | } |
---|
105 | |
---|
106 | $subject = '['.$conf['gallery_title'].'] '.l10n_args(get_l10n_args( |
---|
107 | 'Username_updated_for_%s', stripslashes($oldusername))); |
---|
108 | |
---|
109 | if (isset($conf_LCAS[2]) and $conf_LCAS[2] <> '') |
---|
110 | { |
---|
111 | if (function_exists('get_user_language_desc')) |
---|
112 | { |
---|
113 | $customtxt = get_user_language_desc($conf_LCAS[2])."\n\n"; |
---|
114 | } |
---|
115 | else $customtxt = l10n($conf_LCAS[2])."\n\n"; |
---|
116 | } |
---|
117 | |
---|
118 | /* Get user's email address */ |
---|
119 | $query =' |
---|
120 | SELECT mail_address |
---|
121 | FROM '.USERS_TABLE.' |
---|
122 | WHERE id = '.$id.' |
---|
123 | ;'; |
---|
124 | |
---|
125 | $data = pwg_db_fetch_assoc(pwg_query($query)); |
---|
126 | |
---|
127 | /* User standard information */ |
---|
128 | $info = array( |
---|
129 | get_l10n_args('LCAS_NewUsername: %s', stripslashes($username)), |
---|
130 | get_l10n_args('LCAS_NewUser_Email: %s',$data['mail_address']), |
---|
131 | get_l10n_args('', ''), |
---|
132 | ); |
---|
133 | |
---|
134 | /* Send the email with subject and contents */ |
---|
135 | pwg_mail($data['mail_address'], array( |
---|
136 | 'subject' => $subject, |
---|
137 | 'content' => ($customtxt."\n\n").(l10n_args($info)), |
---|
138 | )); |
---|
139 | |
---|
140 | /* Switching back to default language */ |
---|
141 | switch_lang_back(); |
---|
142 | } |
---|
143 | |
---|
144 | |
---|
145 | // Function called from LCAS_admin.php and main.inc.php |
---|
146 | // to get the plugin version and name |
---|
147 | function LCAS_PluginInfos($dir) |
---|
148 | { |
---|
149 | $path = $dir; |
---|
150 | |
---|
151 | $plg_data = implode( '', file($path.'main.inc.php') ); |
---|
152 | if ( preg_match("|Plugin Name: (.*)|", $plg_data, $val) ) |
---|
153 | { |
---|
154 | $plugin['name'] = trim( $val[1] ); |
---|
155 | } |
---|
156 | if (preg_match("|Version: (.*)|", $plg_data, $val)) |
---|
157 | { |
---|
158 | $plugin['version'] = trim($val[1]); |
---|
159 | } |
---|
160 | if ( preg_match("|Plugin URI: (.*)|", $plg_data, $val) ) |
---|
161 | { |
---|
162 | $plugin['uri'] = trim($val[1]); |
---|
163 | } |
---|
164 | if ($desc = |
---|
165 | load_language('description.txt', $path.'/', array('return' => true))) |
---|
166 | { |
---|
167 | $plugin['description'] = trim($desc); |
---|
168 | } |
---|
169 | elseif ( preg_match("|Description: (.*)|", $plg_data, $val) ) |
---|
170 | { |
---|
171 | $plugin['description'] = trim($val[1]); |
---|
172 | } |
---|
173 | if ( preg_match("|Author: (.*)|", $plg_data, $val) ) |
---|
174 | { |
---|
175 | $plugin['author'] = trim($val[1]); |
---|
176 | } |
---|
177 | if ( preg_match("|Author URI: (.*)|", $plg_data, $val) ) |
---|
178 | { |
---|
179 | $plugin['author uri'] = trim($val[1]); |
---|
180 | } |
---|
181 | if (!empty($plugin['uri']) and |
---|
182 | strpos($plugin['uri'] , 'extension_view.php?eid=')) |
---|
183 | { |
---|
184 | list( , $extension) = explode('extension_view.php?eid=', $plugin['uri']); |
---|
185 | if (is_numeric($extension)) $plugin['extension'] = $extension; |
---|
186 | } |
---|
187 | // IMPORTANT SECURITY ! |
---|
188 | $plugin = array_map('htmlspecialchars', $plugin); |
---|
189 | |
---|
190 | return $plugin ; |
---|
191 | } |
---|
192 | |
---|
193 | |
---|
194 | // Tri les doublons |
---|
195 | function CompareTransformedUser($a, $b) |
---|
196 | { |
---|
197 | return strcmp($a['transformed'], $b['transformed']); |
---|
198 | } |
---|
199 | |
---|
200 | |
---|
201 | // Fonctionnel mais optimisable |
---|
202 | function LCAS_GetDuplicates($source) { |
---|
203 | $users = array(); |
---|
204 | $duplicates = array(); |
---|
205 | |
---|
206 | // Liste des utilisateurs uniques |
---|
207 | foreach($source as $user) { |
---|
208 | if (isset($users[$user['transformed']])) { |
---|
209 | $users[$user['transformed']] += 1; |
---|
210 | } |
---|
211 | else { |
---|
212 | $users[$user['transformed']] = 1; |
---|
213 | } |
---|
214 | } |
---|
215 | |
---|
216 | // On récupère les doublons |
---|
217 | foreach($source as $user) { |
---|
218 | if ($users[$user['transformed']] > 1) { |
---|
219 | array_push($duplicates, $user); |
---|
220 | } |
---|
221 | } |
---|
222 | |
---|
223 | // Trier le tableau |
---|
224 | usort($duplicates, 'CompareTransformedUser'); |
---|
225 | |
---|
226 | return $duplicates; |
---|
227 | } |
---|
228 | |
---|
229 | |
---|
230 | /** |
---|
231 | * Retrieve duplicate users according of case and or accent sensitivity |
---|
232 | * |
---|
233 | * @param : $rule for LCAS_change_case()) |
---|
234 | * |
---|
235 | * @return : List of duplicate $username |
---|
236 | * |
---|
237 | */ |
---|
238 | function LCAS_get_user_list($rule) |
---|
239 | { |
---|
240 | global $conf, $page; |
---|
241 | |
---|
242 | $users = array(); |
---|
243 | |
---|
244 | /* search users depending expiration date */ |
---|
245 | $query = ' |
---|
246 | SELECT DISTINCT u.'.$conf['user_fields']['id'].' AS id, |
---|
247 | u.'.$conf['user_fields']['username'].' AS username, |
---|
248 | u.'.$conf['user_fields']['email'].' AS email |
---|
249 | FROM '.USERS_TABLE.' AS u |
---|
250 | ;'; |
---|
251 | |
---|
252 | $result = pwg_query($query); |
---|
253 | |
---|
254 | while ($row = pwg_db_fetch_assoc($result)) |
---|
255 | { |
---|
256 | $user = $row; |
---|
257 | $user['transformed'] = LCAS_change_case($user['username'], $rule); |
---|
258 | array_push($users, $user); |
---|
259 | } |
---|
260 | |
---|
261 | return LCAS_GetDuplicates($users); |
---|
262 | } |
---|
263 | |
---|
264 | |
---|
265 | // Cleaning obsolete files at plugin upgrade |
---|
266 | function LCAS_clean_obsolete_files() |
---|
267 | { |
---|
268 | if (file_exists(LCAS_PATH.'obsolete.list') |
---|
269 | and $old_files = file(LCAS_PATH.'obsolete.list', FILE_IGNORE_NEW_LINES) |
---|
270 | and !empty($old_files)) |
---|
271 | { |
---|
272 | array_push($old_files, 'obsolete.list'); |
---|
273 | foreach($old_files as $old_file) |
---|
274 | { |
---|
275 | $path = LCAS_PATH.$old_file; |
---|
276 | if (is_file($path)) |
---|
277 | { |
---|
278 | @unlink($path); |
---|
279 | } |
---|
280 | } |
---|
281 | } |
---|
282 | } |
---|
283 | |
---|
284 | |
---|
285 | /** |
---|
286 | * Function called from main.inc.php |
---|
287 | * |
---|
288 | * @param : $username typed in by user for identification |
---|
289 | * |
---|
290 | * @return : $username found in database |
---|
291 | * |
---|
292 | */ |
---|
293 | function LCAS_SearchCaseUsername($username, $rule) |
---|
294 | { |
---|
295 | global $conf; |
---|
296 | |
---|
297 | $username_c = LCAS_change_case($username, $rule); |
---|
298 | |
---|
299 | if (isset($username)) |
---|
300 | { |
---|
301 | $LCAS_users = array(); |
---|
302 | |
---|
303 | $q = pwg_query(" |
---|
304 | SELECT ".$conf['user_fields']['username']." AS username |
---|
305 | FROM `".USERS_TABLE."`; |
---|
306 | "); |
---|
307 | while ($r = pwg_db_fetch_assoc($q)) |
---|
308 | $LCAS_users[$r['username']] = |
---|
309 | LCAS_change_case($r['username'], $rule); |
---|
310 | // $LCAS_users is now an associative table where the key is the account |
---|
311 | // as registered in the DB, and the value is this same account, |
---|
312 | // transformed as stated by $rule. |
---|
313 | |
---|
314 | $users_found = array_keys($LCAS_users, $username_c); |
---|
315 | // $users_found is now a table of which the values are all the accounts |
---|
316 | // which can be written as stated by $rule the same way as $username can |
---|
317 | if (count($users_found) != 1) // If ambiguous, don't allow transformed |
---|
318 | return $username; // writing but normal writing will work |
---|
319 | else |
---|
320 | return $users_found[0]; |
---|
321 | } |
---|
322 | } |
---|
323 | |
---|
324 | ?> |
---|