migrate referent + profile edition
[platal.git] / include / marketing.inc.php
index 899b3a7..74f7312 100644 (file)
@@ -1,6 +1,6 @@
 <?php
 /***************************************************************************
- *  Copyright (C) 2003-2004 Polytechnique.org                              *
+ *  Copyright (C) 2003-2006 Polytechnique.org                              *
  *  http://opensource.polytechnique.org/                                   *
  *                                                                         *
  *  This program is free software; you can redistribute it and/or modify   *
@@ -22,6 +22,7 @@
 require_once("xorg.misc.inc.php");
 
 // {{{ function mark_from_mail
+
 function mark_from_mail($uid, $email) {
     global $globals;
     $res = $globals->xdb->query(
@@ -35,8 +36,8 @@ function mark_from_mail($uid, $email) {
     return "\"".$sender['prenom']." ".$sender['nom']."\" <".$sender['alias']."@polytechnique.org>";
     
 }
-// }}}
 
+// }}}
 // {{{ function mark_text_mail
 
 function mark_text_mail($uid, $email)
@@ -58,7 +59,7 @@ function mark_text_mail($uid, $email)
     $text  = "   ".($u['flags']?"Chère":"Cher")." camarade,\n\n";
     $text .= "   Ta fiche n'est pas à jour dans l'annuaire des Polytechniciens sur Internet. Pour la mettre à jour, il te suffit de visiter cette page ou de copier cette adresse dans la barre de ton navigateur :\n\n";
     $text .= "==========================================================\n";
-    $text .= $globals->baseurl."/register/?hash=%%hash%%\n";
+    $text .= $globals->baseurl."/register/%%hash%%\n";
     $text .= "==========================================================\n\n";
     $text .= "Il ne te faut que 5 minutes sur http://www.polytechnique.org/ pour rejoindre les $num_users camarades branchés grâce au système de reroutage de l'X et qui permet de joindre un camarade en connaissant seulement son nom et son prénom... et de bénéficier pour la vie d'une adresse prestigieuse $mailorg@polytechnique.org et son alias discret $mailorg@m4x.org (m4x = mail for X).\n\n";
     $text .= "Pas de nouvelle boîte aux lettres à relever, il suffit de la rerouter vers ton adresse personnelle et/ou professionnelle que tu indiques et que tu peux changer tous les jours si tu veux sans imposer à tes correspondants de modifier leur carnet d'adresses...\n\n";
@@ -75,7 +76,6 @@ function mark_text_mail($uid, $email)
     return array($to, $title, $text);
 }
 // }}}
-
 // {{{ function mark_send_mail()
 
 function mark_send_mail($uid, $email, $perso, $to='', $title='', $text='') 
@@ -127,12 +127,14 @@ function relance($uid, $nbx = -1)
         return false;
     }
 
+    require_once('secure_hash.inc.php');
+    
     $hash     = rand_url_id(12);
     $pass     = rand_pass();
-    $pass_md5 = md5($pass);
+    $pass_encrypted = hash_encrypt($pass);
     $fdate    = strftime('%d %B %Y', strtotime($date));
     
-    $mymail = new XOrgMailer('marketing.relance.tpl');
+    $mymail = new XOrgMailer('marketing/mail.relance.tpl');
     $mymail->assign('nbdix',      $nbx);
     $mymail->assign('fdate',      $fdate);
     $mymail->assign('lusername',  $alias);
@@ -142,7 +144,7 @@ function relance($uid, $nbx = -1)
     $mymail->assign('lemail',     $email);
     $mymail->assign('subj',       $alias.'@'.$globals->mail->domain);
     $mymail->send();
-    $globals->xdb->execute('UPDATE register_pending SET hash={?}, password={?}, relance=NOW() WHERE uid={?}', $hash, $pass_md5, $uid);
+    $globals->xdb->execute('UPDATE register_pending SET hash={?}, password={?}, relance=NOW() WHERE uid={?}', $hash, $pass_encrypted, $uid);
 
     return "$prenom $nom ($promo)";
 }