'phpinfo' => $this->make_hook('phpinfo', AUTH_MDP, 'admin'),
'get_rights' => $this->make_hook('get_rights', AUTH_MDP, 'admin'),
'admin' => $this->make_hook('default', AUTH_MDP, 'admin'),
- 'admin/ax-xorg' => $this->make_hook('ax_xorg', AUTH_MDP, 'admin'),
'admin/dead-but-active' => $this->make_hook('dead_but_active', AUTH_MDP, 'admin'),
'admin/deaths' => $this->make_hook('deaths', AUTH_MDP, 'admin'),
'admin/downtime' => $this->make_hook('downtime', AUTH_MDP, 'admin'),
function _getDays($year, $month)
{
// give a 'no filter' option
- $months[0] = "----";
+ $days = array();
+ $days[0] = "----";
if ($year && $month) {
$day_max = Array(-1, 31, checkdate(2, 29, $year) ? 29 : 28 , 31,
function _getMonths($year)
{
// give a 'no filter' option
+ $months = array();
$months[0] = "----";
if ($year) {
function _getYears()
{
// give a 'no filter' option
+ $years = array();
$years[0] = "----";
// retrieve available years
$where = array();
if ($uid)
- array_push($where, "uid='$uid'");
+ array_push($where, "s.uid='$uid'");
// we were given at least a year
if ($year) {
// we are viewing a session
$res = XDB::query("SELECT ls.*, a.alias AS username, sa.alias AS suer
FROM log_sessions AS ls
- LEFT JOIN #x4dat#.aliases AS a ON (a.id = ls.uid AND a.type='a_vie')
- LEFT JOIN #x4dat#.aliases AS sa ON (sa.id = ls.suid AND sa.type='a_vie')
+ LEFT JOIN aliases AS a ON (a.uid = ls.uid AND a.type='a_vie')
+ LEFT JOIN aliases AS sa ON (sa.uid = ls.suid AND sa.type='a_vie')
WHERE ls.id = {?}", $arg);
$page->assign('session', $a = $res->fetchOneAssoc());
} else {
$loguser = $action == 'user' ? $arg : Env::v('loguser');
- $res = XDB::query('SELECT id FROM aliases WHERE alias={?}',
+ $res = XDB::query('SELECT uid FROM aliases WHERE alias={?}',
$loguser);
$loguid = $res->fetchOneCell();
$select = "SELECT s.id, s.start, s.uid,
a.alias as username
FROM log_sessions AS s
- LEFT JOIN #x4dat#.aliases AS a ON (a.id = s.uid AND a.type='a_vie')
+ LEFT JOIN aliases AS a ON (a.uid = s.uid AND a.type='a_vie')
$where
ORDER BY start DESC";
$res = XDB::iterator($select);
}
// Loads the user identity using the environment.
- $user = User::get($login);
- if (!$user) {
+ if ($login) {
+ $user = User::get($login);
+ }
+ if (empty($user)) {
return;
}
}
// Handles specific requests (AX sync, su, ...).
- if(Post::has('logs_account')) {
+ if(Post::has('log_account')) {
pl_redirect("admin/logger?loguser=$login&year=".date('Y')."&month=".date('m'));
}
- if(Post::has('su_button') && $registered) {
+ if(Post::has('su_account') && $registered) {
if (!Platal::session()->startSUID($user)) {
$page->trigError('Impossible d\'effectuer un SUID sur ' . $user->login());
} else {
if (Post::i('token_access', 0) != ($user->token_access ? 1 : 0)) {
$to_update['token'] = Post::i('token_access') ? rand_url_id(16) : null;
}
- if (Post::i('skin', 0) != $user->skin) {
- $to_update['skin'] = Post::i('skin', 0);
+ if (Post::i('skin') != $user->skin) {
+ $to_update['skin'] = Post::i('skin');
if ($to_update['skin'] == 0) {
$to_update['skin'] = null;
}
$page->trigError("Impossible d'ajouter l'alias '$alias@$domain', il est probablement déjà attribué");
}
} elseif ($domain == $globals->mail->domain || $domain == $globals->mail->domain2) {
- $res = XDB::execute("INSERT INTO aliases (id, alias, type)
+ $res = XDB::execute("INSERT INTO aliases (uid, alias, type)
VALUES ({?}, {?}, 'alias')",
$user->id(), $alias);
$page->trigSuccess("Nouvel alias '$alias' ajouté");
}
} else if (!Post::blank('del_alias')) {
XDB::execute("DELETE FROM aliases
- WHERE id = {?} AND alias = {?} AND
+ WHERE uid = {?} AND alias = {?} AND
type NOT IN ('a_vie', 'homonyme')",
$user->id(), $val);
XDB::execute("UPDATE emails
} else if (!Post::blank('best')) {
XDB::execute("UPDATE aliases
SET flags = TRIM(BOTH ',' FROM REPLACE(CONCAT(',', flags, ','), ',bestalias,', ','))
- WHERE id = {?}", $user->id());
+ WHERE uid = {?}", $user->id());
XDB::execute("UPDATE aliases
SET flags = CONCAT_WS(',', IF(flags = '', NULL, flags), 'bestalias')
- WHERE id = {?} AND alias = {?}", $user->id(), $val);
+ WHERE uid = {?} AND alias = {?}", $user->id(), $val);
// As having a non-null bestalias value is critical in
// plat/al's code, we do an a posteriori check on the
// validity of the bestalias.
// OpenId form {{{
if (Post::has('del_openid')) {
- XDB::execute('DELETE FROM openid_trusted
+ XDB::execute('DELETE FROM account_auth_openid
WHERE id = {?}', Post::i('del_openid'));
}
// }}}
// }}}
- $page->addJsLink('ui.core.js');
- $page->addJsLink('ui.tabs.js');
+ $page->addJsLink('jquery.ui.core.js');
+ $page->addJsLink('jquery.ui.tabs.js');
// Displays last login and last host information.
$res = XDB::query("SELECT start, host
$page->assign('aliases', XDB::iterator("SELECT alias, type='a_vie' AS for_life,
FIND_IN_SET('bestalias',flags) AS best, expire
FROM aliases
- WHERE id = {?} AND type != 'homonyme'
+ WHERE uid = {?} AND type != 'homonyme'
ORDER BY type != 'a_vie'", $user->id()));
$page->assign('account_types', XDB::iterator('SELECT * FROM account_types ORDER BY type'));
$page->assign('skins', XDB::iterator('SELECT id, name FROM skins ORDER BY name'));
INNER JOIN profiles AS p ON (ap.pid = p.pid)
WHERE ap.uid = {?}', $user->id()));
$page->assign('openid', XDB::iterator('SELECT id, url
- FROM openid_trusted
- WHERE user_id = {?}', $user->id()));
+ FROM account_auth_openid
+ WHERE uid = {?}', $user->id()));
// Displays email redirection and the general profile.
if ($registered && $redirect) {
private static function getHrid($firstname, $lastname, $promo)
{
if ($firstname != null && $lastname != null && $promo != null) {
- return User::makeForlife($firstname, $lastname, $promo);
+ return User::makeHrid($firstname, $lastname, $promo);
}
return null;
}
- private static function formatNewUser($infosLine, $separator, $promo, $size)
+ private static function formatNewUser(&$page, $infosLine, $separator, $promo, $size)
{
$infos = explode($separator, $infosLine);
- if (sizeof($infos) != $size) {
+ if (sizeof($infos) > $size || sizeof($infos) < 2) {
+ $page->trigError("La ligne $infosLine n'a pas été ajoutée.");
return false;
}
FROM profiles
WHERE hrpid = {?}', $hrid);
if (is_null($hrid) || $res1->fetchOneCell() > 0 || $res2->fetchOneCell() > 0) {
- $page->trigError("La ligne $line n'a pas été ajoutée.");
+ $page->trigError("La ligne $infosLine n'a pas été ajoutée.");
return false;
}
$infos['hrid'] = $hrid;
$page->changeTpl('admin/add_accounts.tpl');
if (Env::has('add_type') && Env::has('people')) {
- require_once 'directory.enums.inc.php';
$lines = explode("\n", Env::t('people'));
$separator = Env::t('separator');
$promotion = Env::i('promotion');
- $nameTypes = DirEnum::getOptionsArray(DirEnum::NAMETYPES);
+ $nameTypes = DirEnum::getOptions(DirEnum::NAMETYPES);
$nameTypes = array_flip($nameTypes);
if (Env::t('add_type') == 'promo') {
$type = 'x';
- $eduSchools = DirEnum::getOptionsArray(DirEnum::EDUSCHOOLS);
+ $eduSchools = DirEnum::getOptions(DirEnum::EDUSCHOOLS);
$eduSchools = array_flip($eduSchools);
- $eduDegrees = DirEnum::getOptionsArray(DirEnum::EDUDEGREES);
+ $eduDegrees = DirEnum::getOptions(DirEnum::EDUDEGREES);
$eduDegrees = array_flip($eduDegrees);
- var_dump($eduDegrees);
switch (Env::t('edu_type')) {
case 'X':
$degreeid = $eduDegrees[Profile::DEGREE_X];
}
foreach ($lines as $line) {
- if (($infos = self::formatNewUser($line, $separator, $promotion, 6))
- && ($sex = self::formatSex($page, $infos[3], $line))) {
- $name = $infos[1] . ' ' . $infos[0];
- $birthDate = self::formatBirthDate($infos[2]);
- $xorgId = Profile::getXorgId($infos[4]);
-
- XDB::execute('INSERT INTO profiles (hrpid, xorg_id, ax_id, birthdate_ref, sex)
- VALUES ({?}, {?}, {?}, {?})',
- $infos['hrid'], $xorgId, $infos[5], $birthDate, $sex);
- $pid = XDB::insertId();
- XDB::execute('INSERT INTO profile_name (pid, name, typeid)
- VALUES ({?}, {?}, {?})',
- $pid, $infos[0], $nameTypes['name_ini']);
- XDB::execute('INSERT INTO profile_name (pid, name, typeid)
- VALUES ({?}, {?}, {?})',
- $pid, $infos[1], $nameTypes['firstname_ini']);
- XDB::execute('INSERT INTO profile_display (pid, yourself, public_name, private_name,
- directory_name, short_name, sort_name, promo)
- VALUES ({?}, {?}, {?}, {?}, {?}, {?}, {?}, {?})',
- $pid, $infos[1], $name, $name, $name, $name, $infos[0] . ' ' . $infos[1], $promo);
- XDB::execute('INSERT INTO profile_education (pid, eduid, degreeid, entry_year, grad_year, flags)
- VALUES ({?}, {?}, {?}, {?}, {?}, {?})',
- $pid, $eduSchools[Profile::EDU_X], $degreeid, $entry_year, $grad_year, 'primary');
- XDB::execute('INSERT INTO accounts (hruid, type, is_admin, state, full_name, display_name, sex)
- VALUES ({?}, {?}, {?}, {?}, {?}, {?}, {?})',
- $infos['hrid'], $type, 0, 'active', $name, $infos[1], $sex);
- $uid = XDB::insertId();
- XDB::execute('INSERT INTO account_profiles (uid, pid, perms)
- VALUES ({?}, {?}, {?})',
- $uid, $pid, 'owner');
+ if ($infos = self::formatNewUser($page, $line, $separator, $promotion, 6)) {
+ $sex = self::formatSex($page, $infos[3], $line);
+ if (!is_null($sex)) {
+ $name = $infos[1] . ' ' . $infos[0];
+ $birthDate = self::formatBirthDate($infos[2]);
+ $xorgId = Profile::getXorgId($infos[4]);
+ if (is_null($xorgId)) {
+ $page->trigError("La ligne $line n'a pas été ajoutée car le matricule École est mal renseigné.");
+ continue;
+ }
+
+ XDB::execute('INSERT INTO profiles (hrpid, xorg_id, ax_id, birthdate_ref, sex)
+ VALUES ({?}, {?}, {?}, {?}, {?})',
+ $infos['hrid'], $xorgId, $infos[5], $birthDate, $sex);
+ $pid = XDB::insertId();
+ XDB::execute('INSERT INTO profile_name (pid, name, typeid)
+ VALUES ({?}, {?}, {?})',
+ $pid, $infos[0], $nameTypes['name_ini']);
+ XDB::execute('INSERT INTO profile_name (pid, name, typeid)
+ VALUES ({?}, {?}, {?})',
+ $pid, $infos[1], $nameTypes['firstname_ini']);
+ XDB::execute('INSERT INTO profile_display (pid, yourself, public_name, private_name,
+ directory_name, short_name, sort_name, promo)
+ VALUES ({?}, {?}, {?}, {?}, {?}, {?}, {?}, {?})',
+ $pid, $infos[1], $name, $name, $name, $name, $infos[0] . ' ' . $infos[1], $promo);
+ XDB::execute('INSERT INTO profile_education (pid, eduid, degreeid, entry_year, grad_year, flags)
+ VALUES ({?}, {?}, {?}, {?}, {?}, {?})',
+ $pid, $eduSchools[Profile::EDU_X], $degreeid, $entry_year, $grad_year, 'primary');
+ XDB::execute('INSERT INTO accounts (hruid, type, is_admin, state, full_name, display_name, sex)
+ VALUES ({?}, {?}, {?}, {?}, {?}, {?}, {?})',
+ $infos['hrid'], $type, 0, 'active', $name, $infos[1], $sex);
+ $uid = XDB::insertId();
+ XDB::execute('INSERT INTO account_profiles (uid, pid, perms)
+ VALUES ({?}, {?}, {?})',
+ $uid, $pid, 'owner');
+ }
}
}
} else if (Env::t('add_type') == 'account') {
$type = Env::t('type');
+ $newAccounts = array();
foreach ($lines as $line) {
- if (($infos = self::formatNewUser($line, $separator, $type, 4))
- && ($sex = self::formatSex(&$page, $infos[3], $line))) {
- XDB::execute('INSERT INTO accounts (hruid, type, is_admin, state, email, full_name, display_name, sex)
- VALUES ({?}, {?}, {?}, {?}, {?}, {?}, {?}, {?})',
- $infos['hrid'], $type, 0, 'active', $infos[2], $infos[1] . ' ' . $infos[0], $infos[1], $sex);
+ if ($infos = self::formatNewUser($page, $line, $separator, $type, 4)) {
+ $sex = self::formatSex($page, $infos[3], $line);
+ if (!is_null($sex)) {
+ XDB::execute('INSERT INTO accounts (hruid, type, is_admin, state, email, full_name, display_name, sex)
+ VALUES ({?}, {?}, {?}, {?}, {?}, {?}, {?}, {?})',
+ $infos['hrid'], $type, 0, 'active', $infos[2], $infos[1] . ' ' . $infos[0], $infos[1], $sex);
+ $newAccounts[$infos['hrid']] = $infos[1] . ' ' . $infos[0];
+ }
}
}
+ if (!empty($newAccounts)) {
+ $page->assign('newAccounts', $newAccounts);
+ }
} else if (Env::t('add_type') == 'ax_id') {
$type = 'x';
foreach ($lines as $line) {
- if ($infos = self::formatNewUser($line, $separator, $promotion, 3)) {
+ if ($infos = self::formatNewUser($page, $line, $separator, $promotion, 3)) {
XDB::execute('UPDATE profiles
SET ax_id = {?}
WHERE hrpid = {?}',
}
}
- if ($page->nb_errs == 0) {
+ $errors = $page->nb_errs();
+ if ($errors == 0) {
$page->trigSuccess("L'opération a été effectuée avec succès.");
} else {
- $page->trigSuccess("L'opération a été effectuée avec succès, sauf pour les "
- . $page->nb_errs . 'erreurs signalées ci-dessus.');
+ $page->trigSuccess('L\'opération a été effectuée avec succès, sauf pour '
+ . (($errors == 1) ? 'l\'erreur signalée' : "les $errors erreurs signalées") . ' ci-dessus.');
}
} else if (Env::has('add_type')) {
$res = XDB::query('SELECT type
XDB::execute("UPDATE aliases
SET type = 'homonyme', expire=NOW()
WHERE alias = {?}", $loginbis);
- XDB::execute("REPLACE INTO homonyms (homonyme_id,user_id)
+ XDB::execute("REPLACE INTO homonyms (homonyme_id, uid)
VALUES ({?}, {?})", $target, $target);
send_robot_homonyme($user, $loginbis);
$op = 'list';
if ($op == 'list') {
$res = XDB::iterator(
"SELECT a.alias AS homonyme, s.alias AS forlife,
- IF(h.homonyme_id = s.id, a.expire, NULL) AS expire,
- IF(h.homonyme_id = s.id, a.type, NULL) AS type,
- ac.uid AS user_id
+ IF(h.homonyme_id = s.uid, a.expire, NULL) AS expire,
+ IF(h.homonyme_id = s.uid, a.type, NULL) AS type, ac.uid
FROM aliases AS a
- LEFT JOIN homonyms AS h ON (h.homonyme_id = a.id)
- INNER JOIN aliases AS s ON (s.id = h.user_id AND s.type='a_vie')
- INNER JOIN accounts AS ac ON (ac.uid = a.id)
+ LEFT JOIN homonyms AS h ON (h.homonyme_id = a.uid)
+ INNER JOIN aliases AS s ON (s.uid = h.uid AND s.type = 'a_vie')
+ INNER JOIN accounts AS ac ON (ac.uid = a.uid)
WHERE a.type = 'homonyme' OR a.expire != ''
ORDER BY a.alias, forlife");
$hnymes = Array();
while ($tab = $res->next()) {
$hnymes[$tab['homonyme']][] = $tab;
}
- $page->assign_by_ref('hnymes',$hnymes);
+ $page->assign_by_ref('hnymes', $hnymes);
}
}
if ($validate) {
S::assert_xsrf_token();
- $res = XDB::iterRow('SELECT p.hrpid, pd.directory_name, p.deathdate
+ $res = XDB::iterRow('SELECT p.pid, pd.directory_name, p.deathdate
FROM profiles AS p
INNER JOIN profile_display AS pd ON (p.pid = pd.pid)
WHERE pd.promo = {?}', $promo);
while (list($pid, $name, $death) = $res->next()) {
- $val = Env::v($pid);
- if($val == $deces || empty($val)) {
+ $val = Env::v('death_' . $pid);
+ if($val == $death || empty($val)) {
continue;
}
XDB::execute('UPDATE profiles
SET deathdate = {?}, deathdate_rec = NOW()
- WHERE hrpid = {?}', $val, $pid);
+ WHERE pid = {?}', $val, $pid);
$page->trigSuccess('Ajout du décès de ' . $name . ' le ' . $val . '.');
if($death == '0000-00-00' || empty($death)) {
- // TODO: FIX THIS DEPRECATED CALL
- require_once('user.func.inc.php');
- user_clear_all_subs($uid, false); // by default, dead ppl do not loose their email
+ $profile = Profile::get($pid);
+ $profile->clear();
+ $profile->owner()->clear(false);
}
}
}
- $res = XDB::iterator('SELECT p.hrpid, pd.directory_name, p.deathdate
+ $res = XDB::iterator('SELECT p.pid, pd.directory_name, p.deathdate
FROM profiles AS p
INNER JOIN profile_display AS pd ON (p.pid = pd.pid)
WHERE pd.promo = {?}
$res = XDB::iterator(
"SELECT a.hruid, pd.promo, p.ax_id, pd.directory_name, p.deathdate, DATE(MAX(s.start)) AS last
- FROM #x4dat#.accounts AS a
- INNER JOIN #x4dat#.account_profiles AS ap ON (ap.uid = a.uid AND FIND_IN_SET('owner', ap.perms))
- INNER JOIN #x4dat#.profiles AS p ON (p.pid = ap.pid)
- INNER JOIN #x4dat#.profile_display AS pd ON (pd.pid = p.pid)
+ FROM accounts AS a
+ INNER JOIN account_profiles AS ap ON (ap.uid = a.uid AND FIND_IN_SET('owner', ap.perms))
+ INNER JOIN profiles AS p ON (p.pid = ap.pid)
+ INNER JOIN profile_display AS pd ON (pd.pid = p.pid)
LEFT JOIN log_sessions AS s ON (s.uid = a.uid AND suid = 0)
WHERE a.state = 'active' AND p.deathdate IS NOT NULL
GROUP BY a.uid
function handler_validate(&$page, $action = 'list', $id = null)
{
- $page->changeTpl('admin/valider.tpl');
+ $page->changeTpl('admin/validation.tpl');
$page->setTitle('Administration - Valider une demande');
$page->addCssLink('nl.css');
$page->addJsLink('ajax.js');
$page->assign('categories', $categories = explode(',', str_replace("'", '', substr($a['Type'], 5, -1))));
$hidden = array();
- $res = XDB::query('SELECT hidden_requests FROM requests_hidden WHERE user_id = {?}', S::v('uid'));
+ $res = XDB::query('SELECT hidden_requests
+ FROM requests_hidden
+ WHERE uid = {?}', S::v('uid'));
$hide_requests = $res->fetchOneCell();
if (Post::has('hide')) {
$hide = array();
$hide[] = $cat;
}
$hide_requests = join(',', $hide);
- XDB::query('REPLACE INTO requests_hidden (user_id, hidden_requests) VALUES({?}, {?})',
+ XDB::query('REPLACE INTO requests_hidden (uid, hidden_requests)
+ VALUES ({?}, {?})',
S::v('uid'), $hide_requests);
} elseif ($hide_requests) {
foreach (explode(',', $hide_requests) as $hide_type)
IF(w.ip = s2.ip, s2.host, s2.forward_host),
IF(w.ip = s.ip, s.host, s.forward_host)),
w.mask, w.detection, w.state, a.hruid
- FROM #x4dat#.ip_watch AS w
+ FROM ip_watch AS w
LEFT JOIN log_sessions AS s ON (s.ip = w.ip)
LEFT JOIN log_sessions AS s2 ON (s2.forward_ip = w.ip)
- LEFT JOIN #x4dat#.accounts AS a ON (a.uid = s.uid)
+ LEFT JOIN accounts AS a ON (a.uid = s.uid)
GROUP BY w.ip, a.hruid
ORDER BY w.state, w.ip, a.hruid";
$it = Xdb::iterRow($sql);
} elseif ($action == 'edit') {
$sql = "SELECT w.detection, w.state, w.last, w.description, w.mask,
a1.hruid AS edit, a2.hruid AS hruid, s.host
- FROM #x4dat#.ip_watch AS w
- LEFT JOIN #x4dat#.accounts AS a1 ON (a1.uid = w.uid)
+ FROM ip_watch AS w
+ LEFT JOIN accounts AS a1 ON (a1.uid = w.uid)
LEFT JOIN log_sessions AS s ON (w.ip = s.ip)
- LEFT JOIN #x4dat#.accounts AS a2 ON (a2.uid = s.uid)
+ LEFT JOIN accounts AS a2 ON (a2.uid = s.uid)
WHERE w.ip = {?}
GROUP BY a2.hruid
ORDER BY a2.hruid";
$selectedJob = Env::has('selectedJob');
XDB::execute("DELETE FROM profile_phones
- WHERE uid = {?} AND link_type = 'hq'",
+ WHERE pid = {?} AND link_type = 'hq'",
$id);
XDB::execute("DELETE FROM profile_addresses
WHERE jobid = {?} AND type = 'hq'",
Env::t('name'), Env::t('acronym'), Env::t('url'), Env::t('email'),
Env::t('NAF_code'), Env::i('AX_code'), Env::i('holdingId'), $id);
- XDB::execute("INSERT INTO profile_phones (uid, link_type, link_id, tel_id, tel_type,
+ XDB::execute("INSERT INTO profile_phones (pid, link_type, link_id, tel_id, tel_type,
search_tel, display_tel, pub)
VALUES ({?}, 'hq', 0, 0, 'fixed', {?}, {?}, 'public'),
({?}, 'hq', 0, 1, 'fax', {?}, {?}, 'public')",
t.display_tel AS tel, f.display_tel AS fax, a.text AS address
FROM profile_job_enum AS e
LEFT JOIN profile_job_enum AS h ON (e.holdingid = h.id)
- LEFT JOIN profile_phones AS t ON (t.uid = e.id AND link_type = 'hq' AND tel_id = 0)
- LEFT JOIN profile_phones AS f ON (f.uid = e.id AND link_type = 'hq' AND tel_id = 1)
+ LEFT JOIN profile_phones AS t ON (t.pid = e.id AND t.link_type = 'hq' AND t.tel_id = 0)
+ LEFT JOIN profile_phones AS f ON (f.pid = e.id AND f.link_type = 'hq' AND f.tel_id = 1)
LEFT JOIN profile_addresses AS a ON (a.jobid = e.id AND a.type = 'hq')
WHERE e.id = {?}",
$id);