set('xorgid', Profile::getXorgId($subState->i('schoolid')));
if (!$subState->v('xorgid')) {
return 'Le matricule est incorrect.';
}
$uf = new UserFilter(new PFC_And(
new UFC_SchoolId('xorg', $subState->i('xorgid')),
new PFC_Not(new UFC_Dead()),
new PFC_Not(new UFC_Registered(true))
));
$profile = $uf->getProfile();
if (is_null($profile)) {
return "Tu es déjà inscrit ou ton matricule est incorrect !";
}
if ($profile->promo() != $subState->s('promo')) {
return 'Le matricule est incorrect.';
}
if (!$profile->compareNames($subState->s('firstname'), $subState->s('lastname'))) {
return "Erreur dans l'identification. Réessaie, il y a une erreur quelque part !";
}
$subState->set('lastname', $profile->lastName());
$subState->set('firstname', $profile->firstName());
$subState->set('uid', $profile->owner()->id());
$subState->set('watch', $profile->owner()->watch);
$subState->set('comment', $profile->owner()->comment);
$subState->set('birthdateRef', $profile->__get('birthdate_ref'));
return true;
}
// }}}
// {{{ function weakCheckId
function weakCheckId($subState)
{
$uf = new UserFilter(new PFC_And(
new PFC_Not(new UFC_Dead()),
new UFC_Promo('=', $subState->s('edu_type'), $subState->s('yearpromo')),
new PFC_Not(new UFC_Registered(true))
));
if ($it = $uf->iterProfiles()) {
while ($profile = $it->next()) {
if ($profile->compareNames($subState->s('firstname'), $subState->s('lastname'))) {
$subState->set('lastname', $profile->lastName());
$subState->set('firstname', $profile->firstName());
$subState->set('uid', $profile->owner()->id());
$subState->set('watch', $profile->owner()->watch);
$subState->set('comment', $profile->owner()->comment);
$subState->set('birthdateRef', $profile->__get('birthdate_ref'));
$subState->set('xorgid', $profile->__get('xorg_id'));
return true;
}
}
}
$uf = new UserFilter(new PFC_And(
new PFC_Not(new UFC_Dead()),
new UFC_Promo('=', $subState->s('edu_type'), $subState->s('yearpromo')),
new UFC_Registered(true)
));
if ($it = $uf->iterProfiles()) {
while ($profile = $it->next()) {
if ($profile->compareNames($subState->s('firstname'), $subState->s('lastname'))) {
$subState->set('uid', $profile->owner()->id());
$subState->set('watch', $profile->owner()->watch);
$subState->set('comment', $profile->owner()->comment);
$subState->set('birthdateRef', $profile->__get('birthdate_ref'));
$subState->set('xorgid', $profile->__get('xorg_id'));
return 'Tu es vraisemblablement déjà inscrit !';
}
}
}
return 'Erreur : vérifie que tu as bien orthographié ton nom !';
}
// }}}
// {{{ function checkNewUser
function checkNewUser($subState)
{
$firstname = preg_replace("/[ \t]+/", ' ', $subState->t('firstname'));
$firstname = preg_replace("/--+/", '-', $firstname);
$firstname = preg_replace("/''+/", '\'', $firstname);
$subState->set('firstname', PlUser::fixFirstnameCase($firstname));
$lastname = preg_replace("/[ \t]+/", ' ', $subState->t('lastname'));
$lastname = preg_replace("/--+/", '-', $lastname);
$lastname = preg_replace("/''+/", '\'', $lastname);
$subState->set('lastname', mb_strtoupper($lastname));
if ($subState->v('edu_type') == Profile::DEGREE_X && $subState->i('yearpromo') >= 1996) {
$res = strongCheckId($subState);
} else {
$res = weakCheckId($subState);
}
if ($res !== true) {
return $res;
}
return true;
}
// }}}
// {{{ function createAliases
function createAliases($subState)
{
global $globals;
$res = XDB::query("SELECT hruid, state, type
FROM accounts
WHERE uid = {?} AND hruid != ''",
$subState->i('uid'));
if ($res->numRows() == 0) {
return "Tu n'as pas d'adresse à vie pré-attribuée.
"
. "Envoie un mail à mail->domain}\">"
. "support@{$globals->mail->domain} en expliquant ta situation.";
} else {
list($forlife, $state, $type) = $res->fetchOneRow();
}
if ($state == 'active') {
return "Tu es déjà inscrit, si tu ne te souviens plus de ton mot de passe d'accès au site, "
. "tu peux suivre la procédure de récupération de mot de passe.";
} else if ($state == 'disabled') {
return "Ton compte a été désactivé par les administrateurs du site suite à des abus. "
. "Pour plus d'information ou pour demander la réactivation du compte, tu peux t'adresser à "
. "mail->domain}\">support@{$globals->mail->domain}.";
}
$emailXorg = PlUser::makeUserName($subState->t('firstname'), $subState->t('lastname'));
$suffix = (User::$sub_mail_domains[$type] ? substr(User::$sub_mail_domains[$type], 0, 1) : '') . substr($subState->v('yearpromo'), -2);
$emailXorg2 = $emailXorg . '.' . $suffix;
$res = XDB::query('SELECT uid, expire
FROM email_source_account
WHERE email = {?} AND type != \'alias_aux\'',
$emailXorg);
if ($res->numRows()) {
list($h_id, $expire) = $res->fetchOneRow();
if (empty($expire)) {
XDB::execute('UPDATE email_source_account
SET expire = ADDDATE(NOW(), INTERVAL 1 MONTH)
WHERE email = {?} AND type != \'alias_aux\'',
$emailXorg);
$hrmid = User::makeHomonymHrmid($emailXorg);
XDB::execute('INSERT IGNORE INTO homonyms_list (hrmid, uid)
VALUES ({?}, {?}), ({?}, {?})',
$hrmid, $h_id, $hrmid, $subState->i('uid'));
$als = XDB::fetchColumn('SELECT email
FROM email_source_account
WHERE uid = {?} AND type != \'alias_aux\' AND expire IS NULL',
$h_id);
$homonym = User::getSilentWithUID($h_id);
$mailer = new PlMailer('register/lostalias.mail.tpl');
$mailer->addTo($homonym);
$mailer->setSubject("Perte de ton alias $emailXorg dans un mois !");
$mailer->assign('emailXorg', $emailXorg);
$mailer->assign('als', join(', ', $als));
$mailer->SetTxtBody(wordwrap($msg,72));
$mailer->send();
}
$subState->set('forlife', $forlife);
$subState->set('bestalias', $emailXorg2);
$subState->set('emailXorg2', null);
} else {
$subState->set('forlife', $forlife);
$subState->set('bestalias', $emailXorg);
$subState->set('emailXorg2', $emailXorg2);
}
$subState->set('main_mail_domain', User::$sub_mail_domains[$type] . Platal::globals()->mail->domain);
return true;
}
// }}}
// {{{ function finishRegistration
function finishRegistration($subState)
{
global $globals;
$hash = rand_url_id(12);
XDB::execute('INSERT INTO register_pending (uid, forlife, bestalias, mailorg2, password,
email, date, relance, naissance, hash, services)
VALUES ({?}, {?}, {?}, {?}, {?}, {?}, NOW(), 0, {?}, {?}, {?})
ON DUPLICATE KEY UPDATE password=VALUES(password), email=VALUES(email),
date=VALUES(date), naissance=VALUES(naissance),
hash=VALUES(hash), services=VALUES(services)',
$subState->i('uid'), $subState->s('forlife'), $subState->s('bestalias'),
$subState->s('emailXorg2'), $subState->s('password'), $subState->s('email'),
$subState->s('birthdate'), $hash, implode(',', $subState->v('services')));
$mymail = new PlMailer('register/end.mail.tpl');
$mymail->assign('emailXorg', $subState->s('bestalias'));
$mymail->assign('to', $subState->s('email'));
$mymail->assign('baseurl', $globals->baseurl);
$mymail->assign('hash', $hash);
$mymail->assign('subject', ucfirst($globals->mail->domain) . ' : ' . $subState->s('bestalias'));
$mymail->send();
}
// }}}
// vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
?>