<?php
/***************************************************************************
- * Copyright (C) 2003-2008 Polytechnique.org *
+ * Copyright (C) 2003-2011 Polytechnique.org *
* http://opensource.polytechnique.org/ *
* *
* This program is free software; you can redistribute it and/or modify *
* 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA *
***************************************************************************/
-function build_names_display($data)
+// Some particles should not be capitalized (cf "ORTHOTYPO", by Jean-Pierre
+// Lacroux).
+// Note that some of them are allowed to use capital letters in some cases,
+// for instance "De" in American English.
+static $particles = array('d', 'de', 'an', 'auf', 'von', 'von dem',
+ 'von der', 'zu', 'of', 'del', 'de las',
+ 'de les', 'de los', 'las', 'los', 'y', 'a',
+ 'da', 'das', 'do', 'dos', 'af', 'av');
+
+
+function build_javascript_names($data, $isFemale)
{
- $data_array = explode(';;', $data);
- $n = count($data_array);
- $n--;
- for ($i = 0; $i < $n; $i++) {
- $searchname = explode(';', $data_array[$i]);
- if ($searchname[1] != 0) {
- list($particle, $name) = explode(' ', $searchname[2], 2);
- if (!$name) {
- list($particle, $name) = explode('\'', $searchname[2], 2);
- }
- } else {
- $particle = '';
- $name = $searchname[2];
- }
- if (!isset($search_names[$searchname[0]])) {
- $search_names[$searchname[0]] = array($searchname[2], $name);
- } else {
- $search_names[$searchname[0]] = array_merge($search_names[$searchname[0]], array($name));
- }
+ $names = array();
+ foreach (explode(';-;', $data) as $key => $item) {
+ $names[$key] = explode(';', $item);
+ }
+ $lastnames = array(
+ 'lastname_main' => $names[0][0],
+ 'lastname_ordinary' => $names[0][1],
+ 'lastname_marital' => $names[0][2],
+ 'pseudonym' => $names[0][3]
+ );
+ $firstnames = array(
+ 'firstname_main' => $names[1][0],
+ 'firstname_ordinary' => $names[1][1]
+ );
+ $private_names_count = intval(count($names[2]) / 2);
+ $private_names = array();
+ for ($i = 0; $i < $private_names_count; ++$i) {
+ $private_names[] = array('type' => $names[2][2 * $i], 'name' => $names[2][2 * $i + 1]);
}
- $sn_types_public = build_types('public');
- $sn_types_private = build_types('private');
- $full_name = build_full_name($search_names, $sn_types_public);
- return build_public_name($search_names, $sn_types_public, $full_name) . ';' .
- build_private_name($search_names, $sn_types_private);
+
+ return build_first_name($firstnames) . ' ' . build_full_last_name($lastnames, $isFemale) . ';' . build_private_name($private_names);
+}
+
+function build_email_alias(array $public_names)
+{
+ return PlUser::makeUserName(build_first_name($public_names), build_short_last_name($public_names));
}
-function build_types($pub)
+function build_display_names(array $public_names, array $private_names, $isFemale)
{
- if ($pub == 'public') {
- $sql_pub = "AND FIND_IN_SET('public', flags)";
- } elseif ($pub == 'private') {
- $sql_pub = "AND NOT FIND_IN_SET('public', flags)";
- } else {
- $sql_pub = "";
- }
- $sql = "SELECT id, name
- FROM profile_name_search_enum
- WHERE NOT FIND_IN_SET('not_displayed', flags)" . $sql_pub;
- $sn_types = XDB::iterator($sql);
- $types = array();
- while ($sn_type = $sn_types->next()) {
- $types[$sn_type['name']] = $sn_type['id'];
- }
- return $types;
+ $short_last_name = build_short_last_name($public_names);
+ $full_last_name = build_full_last_name($public_names, $isFemale);
+ $private_last_name_end = build_private_name($private_names);
+ $firstname = build_first_name($public_names);
+
+ $display_names = array();
+ $display_names['public_name'] = build_full_name($firstname, $full_last_name);
+ $display_names['private_name'] = $display_names['public_name'] . $private_last_name_end;
+ $display_names['directory_name'] = build_directory_name($firstname, $full_last_name);
+ $display_names['short_name'] = build_full_name($firstname, $short_last_name);
+ $display_names['sort_name'] = build_sort_name($firstname, $short_last_name);
+
+ return $display_names;
}
-function build_full_name(&$search_names, &$sn_types)
+function build_short_last_name(array $lastnames)
{
- $name = "";
- if (isset($search_names[$sn_types['Nom usuel']])) {
- $name .= $search_names[$sn_types['Nom usuel']][0] . " ("
- . $search_names[$sn_types['Nom patronymique']][0] . ")";
+ return ($lastnames['lastname_ordinary'] == '') ? $lastnames['lastname_main'] : $lastnames['lastname_ordinary'];
+}
+
+function build_full_last_name(array $lastnames, $isFemale)
+{
+ if ($lastnames['lastname_ordinary'] != '') {
+ $name = $lastnames['lastname_ordinary'] . ' (' . $lastnames['lastname_main'] . ')';
} else {
- $name .= $search_names[$sn_types['Nom patronymique']][0];
- }
- if (isset($search_names[$sn_types['Nom marital']])
- || isset($search_names[$sn_types['Pseudonyme (nom de plume)']])) {
- if (isset($search_names[$sn_types['Nom marital']])) {
- $user = S::user();
- if ($user->isFemale()) {
- $name .= " (Mme ";
- } else {
- $name .= " (M ";
- }
- $name .= $search_names[$sn_types['Nom marital']][0];
- if (isset($search_names[$sn_types['Pseudonyme (nom de plume)']])) {
- $name .= ", ";
- }
- }
- if (isset($search_names[$sn_types['Pseudonyme (nom de plume)']])) {
- $name .= $search_names[$sn_types['Pseudonyme (nom de plume)']][0];
+ $name = $lastnames['lastname_main'];
+ }
+ if ($lastnames['lastname_marital'] != '' || $lastnames['pseudonym'] != '') {
+ $name .= ' (';
+ if ($lastnames['lastname_marital'] != '') {
+ $name .= ($isFemale ? 'Mme ' : 'M ') . $lastnames['lastname_marital'];
+ $name .= (($lastnames['pseudonym'] == '') ? '' : ', ');
}
- $name .= ")";
+ $name .= (($lastnames['pseudonym'] == '')? '' : $lastnames['pseudonym']) . ')';
}
return $name;
}
-function build_public_name(&$search_names, &$sn_types, $full_name)
+function build_first_name(array $firstnames)
{
- return $search_names[$sn_types['Prénom']][0] . " " . $full_name;
+ return ($firstnames['firstname_ordinary'] ? $firstnames['firstname_ordinary'] : $firstnames['firstname_main']);
}
-function build_private_name(&$search_names, &$sn_types)
+function build_private_name(array $private_names)
{
- $name = "";
- if (isset($search_names[$sn_types['Surnom']])
- || (isset($search_names[$sn_types['Autre prénom']])
- || isset($search_names[$sn_types['Autre nom']]))) {
- $name .= " (";
- if (isset($search_names[$sn_types['Surnom']])) {
- $name .= "alias " . $search_names[$sn_types['Surnom']][0];
- $i = 2;
- while (isset($search_names[$sn_types['Surnom']][$i])) {
- $name .= ", " . $search_names[$sn_types['Surnom']][$i];
- $i++;
- }
- if (isset($search_names[$sn_types['Autre prénom']])
- || isset($search_names[$sn_types['Autre nom']])) {
- $name .= ", ";
- }
- }
- if (isset($search_names[$sn_types['Autre prénom']])) {
- $name .= "autres prénoms : " . $search_names[$sn_types['Autre prénom']][0];
- $i = 2;
- while (isset($search_names[$sn_types['Autre prénom']][$i])) {
- $name .= ", " . $search_names[$sn_types['Autre prénom']][$i];
- $i++;
- }
- if (isset($search_names[$sn_types['Autre nom']])) {
- $name .= ", ";
- }
- }
- if (isset($search_names[$sn_types['Autre nom']])) {
- $name .= "autres noms : " . $search_names[$sn_types['Autre nom']][0];
- $i = 2;
- while (isset($search_names[$sn_types['Autre nom']][$i])) {
- $name .= ", " . $search_names[$sn_types['Autre nom']][$i];
- $i++;
- }
+ if (is_null($private_names) || count($private_names) == 0) {
+ return '';
+ }
+
+ static $types = array('nickname' => 'alias ', 'firstname' => 'autres prénoms : ', 'lastname' => 'autres noms : ');
+ $names_sorted = array('nickname' => array(), 'firstname' => array(), 'lastname' => array());
+
+ foreach ($private_names as $private_name) {
+ $names_sorted[$private_name['type']][] = $private_name['name'];
+ }
+
+ $names_array = array();
+ foreach ($names_sorted as $type => $names) {
+ if (count($names)) {
+ $names_array[] = $types[$type] . implode(', ', $names);
}
- $name .= ")";
}
- return $name;
+
+ return ' (' . implode(', ', $names_array) . ')';
}
-function build_directory_name(&$search_names, &$sn_types, $full_name)
+function build_directory_name($firstname, $lastname)
{
- return $full_name . " " . $search_names[$sn_types['Prénom']][0];
+ if ($firstname == '') {
+ return mb_strtoupper($lastname);
+ }
+ return mb_strtoupper($lastname) . ' ' . $firstname;
}
-function short_name(&$search_names, &$sn_types)
+function build_full_name($firstname, $lastname)
{
- $name = "";
- if (isset($search_names[$sn_types['Nom usuel']])) {
- $name .= $search_names[$sn_types['Nom usuel']][0];
- } else {
- $name .= $search_names[$sn_types['Nom patronymique']][0];
+ if ($firstname == '') {
+ return $lastname;
}
- $name = " ";
- if (isset($search_names[$sn_types['Prénom usuel']])) {
- $name .= $search_names[$sn_types['Prénom usuel']][0];
- } else {
- $name .= $search_names[$sn_types['Prénom']][0];
+ return $firstname . ' ' . $lastname;
+}
+
+// Returns the name on which the sort is performed, according to French
+// typographic rules.
+function build_sort_name($firstname, $lastname)
+{
+ // Remove uncapitalized particles.
+ $particles = "/^(d'|(" . implode($particles, '|') . ') )/';
+ $name = preg_replace($particles, '', $lastname);
+ // Mac must also be uniformized.
+ $lastname = preg_replace("/^(Mac|Mc)(| )/", 'Mac', $name);
+
+ if ($firstname == '') {
+ return $lastname;
}
- return $name;
+ return $lastname . ' ' . $firstname;
}
-function sort_name(&$search_names, &$sn_types)
+/** Splits a name into tokens, as used in search_name.
+ * Used for search_name rebuilding and for queries.
+ */
+function split_name_for_search($name) {
+ return preg_split('/[[:space:]\'\-]+/', strtolower(replace_accent($name)),
+ -1, PREG_SPLIT_NO_EMPTY);
+}
+
+/** Transform a name to its canonical value so it can be compared
+ * to another form (different case, with accents or with - instead
+ * of blanks).
+ * @see compare_basename to compare
+ */
+function name_to_basename($value) {
+ $value = mb_strtoupper(replace_accent($value));
+ return preg_replace('/[^A-Z]/', ' ', $value);
+}
+
+/** Compares two strings and check if they are two forms of the
+ * same name (different case, with accents or with - instead of
+ * blanks).
+ * @see name_to_basename to retreive the compared string
+ */
+function compare_basename($a, $b) {
+ return name_to_basename($a) == name_to_basename($b);
+}
+
+function update_account_from_profile($uid)
{
- $name = "";
- if (isset($search_names[$sn_types['Nom usuel']])) {
- $name .= $search_names[$sn_types['Nom usuel']][1];
- } else {
- $name .= $search_names[$sn_types['Nom patronymique']][1];
+ XDB::execute("UPDATE accounts AS a
+ INNER JOIN account_profiles AS ap ON (ap.uid = a.uid AND FIND_IN_SET('owner', ap.perms))
+ INNER JOIN profile_public_names AS ppn ON (ppn.pid = ap.pid)
+ INNER JOIN profile_display AS pd ON (pd.pid = ap.pid)
+ SET a.lastname = IF(ppn.lastname_ordinary = '', ppn.lastname_main, ppn.lastname_ordinary),
+ a.firstname = IF(ppn.firstname_ordinary = '', ppn.firstname_main, ppn.firstname_ordinary),
+ a.full_name = pd.short_name, a.directory_name = pd.directory_name, a.sort_name = pd.sort_name
+ WHERE a.uid = {?}",
+ $uid);
+}
+
+function update_display_names(Profile $profile, array $public_names, array $private_names = null)
+{
+ if (is_null($private_names)) {
+ $private_names = XDB::fetchAllAssoc('SELECT type, name
+ FROM profile_private_names
+ WHERE pid = {?}
+ ORDER BY type, id',
+ $profile->id());
}
- $name .= $search_names[$sn_types['Prénom']][0];
- return $name;
+ $display_names = build_display_names($public_names, $private_names, $profile->isFemale());
+
+ XDB::execute('UPDATE profile_display
+ SET public_name = {?}, private_name = {?},
+ directory_name = {?}, short_name = {?}, sort_name = {?}
+ WHERE pid = {?}',
+ $display_names['public_name'], $display_names['private_name'],
+ $display_names['directory_name'], $display_names['short_name'],
+ $display_names['sort_name'], $profile->id());
+
+ Profile::rebuildSearchTokens($profile->id(), false);
+
+ if ($profile->owner()) {
+ update_account_from_profile($profile->owner()->id());
+ }
+}
+
+function update_public_names($pid, array $public_names)
+{
+ XDB::execute('UPDATE profile_public_names
+ SET lastname_main = {?}, lastname_marital = {?}, lastname_ordinary = {?},
+ firstname_main = {?}, firstname_ordinary = {?}, pseudonym = {?}
+ WHERE pid = {?}',
+ $public_names['lastname_main'], $public_names['lastname_marital'], $public_names['lastname_ordinary'],
+ $public_names['firstname_main'], $public_names['firstname_ordinary'], $public_names['pseudonym'], $pid);
+}
+
+// Returns the @p name with all letters in lower case, but the first one.
+function mb_ucfirst($name)
+{
+ return mb_strtoupper(mb_substr($name, 0, 1)) . mb_substr($name, 1);
+}
+
+// Capitalizes the @p name using French typographic rules. Returns
+// false when capitalization rule is not known for the name format.
+function capitalize_name($name)
+{
+ // Some suffixes should not be captitalized either, eg 's' in Bennett's.
+ static $suffixes = array('h', 's', 't');
+
+ // Extracts the first token of the name.
+ if (!preg_match('/^(\pL+)(([\' -])(.*))?$/ui', $name, $m)) {
+ return false;
+ }
+
+ $token = mb_strtolower($m[1]);
+ $separator = (isset($m[3]) ? $m[3] : false);
+ $tail = (isset($m[4]) ? $m[4] : false);
+
+ // Special case for "Malloc'h".
+ if ($separator == "'" && in_array(strtolower($tail[0]), $suffixes) &&
+ (strlen($tail) == 1 || $tail[1] == ' ')) {
+ $token .= "'" . strtolower($tail[0]);
+ $separator = (strlen($tail) == 1 ? false : $tail[1]);
+ $tail = (strlen($tail) > 2 ? substr($tail, 2) : false);
+ }
+
+ // Capitalizes the first token.
+ if (!in_array($token, $particles)) {
+ $token = mb_ucfirst($token);
+ }
+
+ // Capitalizes the tail of the name.
+ if ($tail) {
+ if (($tail = capitalize_name($tail))) {
+ return $token . $separator . $tail;
+ }
+ return false;
+ }
+
+ return $token . $separator;
}
// vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8: