Change École polytechnique favicon.

[platal.git] / modules / register / register.inc.php

diff --git a/modules/register/register.inc.php b/modules/register/register.inc.php
index 9393bd6..993ead3 100644 (file)
--- a/modules/register/register.inc.php
+++ b/modules/register/register.inc.php
@@ -1,6 +1,6 @@
 <?php
 /***************************************************************************
- *  Copyright (C) 2003-2011 Polytechnique.org                              *
+ *  Copyright (C) 2003-2014 Polytechnique.org                              *
  *  http://opensource.polytechnique.org/                                   *
  *                                                                         *
  *  This program is free software; you can redistribute it and/or modify   *
@@ -50,6 +50,7 @@ function strongCheckId($subState)
     $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;
 }
@@ -71,6 +72,7 @@ function weakCheckId($subState)
                 $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;
@@ -88,6 +90,7 @@ function weakCheckId($subState)
             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 !';
@@ -155,34 +158,49 @@ function createAliases($subState)
     $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;
+    // Search for homonyms:
+    //  * first case: only one homonym already registered.
     $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\'',
+    //  * second case: at least two homonyms registerd.
+    $result = XDB::query("SELECT  hrmid
+                            FROM  email_source_other
+                           WHERE  type = 'homonym' AND email = {?}",
                          $emailXorg);
-            $hrmid = User::makeHomonymHrmid($emailXorg);
+    if ($res->numRows() || $result->numRows()) {
+        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();
+            }
+        } else {
+            $hrmid = $result->fetchOneCell();
             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();
+                                      VALUES  ({?}, {?})',
+                         $hrmid, $subState->i('uid'));
+            // TODO: insert into source_other if new domain
         }
 
         $subState->set('forlife', $forlife);
@@ -226,5 +244,5 @@ function finishRegistration($subState)
 }
 
 // }}}
-// vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
+// vim:set et sw=4 sts=4 sws=4 foldmethod=marker fenc=utf-8:
 ?>