WebSVN – Applications.papyrus – Diff – /trunk/client/bottin/bibliotheque/inscription.fonct.php

 // |                                                                                                      |
 // | You should have received a copy of the GNU Lesser General Public                                     |
 // | License along with this library; if not, write to the Free Software                                  |
 // | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
 // +------------------------------------------------------------------------------------------------------+
-// CVS : $Id: inscription.fonct.php,v 1.1 2005-09-22 14:02:49 ddelon Exp $
+// CVS : $Id: inscription.fonct.php,v 1.2 2005-09-29 13:56:48 alexandre_tb Exp $
-// CVS : $Id: inscription.fonct.php,v 1.1 2005-09-22 14:02:49 ddelon Exp $
+// CVS : $Id: inscription.fonct.php,v 1.2 2005-09-29 13:56:48 alexandre_tb Exp $
 /**
 * Fonctions du module inscription
+*
 * Fonctions du module inscription
+*
 //Auteur original :
 *@author        Alexandre Granier <alexandre@tela-botanica.org>
 //Autres auteurs :
 *@author        Aucun
 *@copyright     Tela-Botanica 2000-2004
-*@version       $Revision: 1.1 $ $Date: 2005-09-22 14:02:49 $
+*@version       $Revision: 1.2 $ $Date: 2005-09-29 13:56:48 $
-*@version       $Revision: 1.1 $ $Date: 2005-09-22 14:02:49 $
+*@version       $Revision: 1.2 $ $Date: 2005-09-29 13:56:48 $
 // +------------------------------------------------------------------------------------------------------+
 */
 // +------------------------------------------------------------------------------------------------------+
 /**
+ *
  * @param   array   les valeurs renvoyés par le formulaire
  * @return
  */
-// A COMPLETER , NE MARCHE PAS
-function demande_inscription($valeurs) {
+function demande_inscription ($valeurs) {
-	// On stocke les informations dans un variable de session
+    // On stocke les informations dans un variable de session
+    // On coupe l'identifiant de session pour ne prendre que les 8 premiers caractères
+    // afin d'éviter d'obtenir une url trop longue
-	$_SESSION['donnees_inscription'] = $valeurs ;
+    $chaine = substr (session_id(), 0, 8) ;
+    $requete_verif = 'select * from inscription_demande where id_identifiant_session="'.$chaine.'"' ;
+    $resultat_verif = $GLOBALS['ins_db']->query ($requete_verif) ;
+    if ($resultat_verif->numRows() != 0) {
+        $requete_suppression = 'delete from inscription_demande where id_identifiant_session="'.$chaine.'"' ;
+        $GLOBALS['ins_db']->query ($requete_suppression) ;
+    }
+    $requete = 'insert into inscription_demande set id_identifiant_session="'.$chaine.'", id_donnees="'.
+                addslashes(serialize($valeurs)).'", id_date=NOW()' ;
+    $resultat = $GLOBALS['ins_db']->query ($requete) ;
+    if (DB::isError ($resultat)) {
+        echo ("Echec de la requete : $requete<br />".$resultat->getMessage()) ;
+    }
-	// On envoie un email de confirmation pour l'utilisateur
+    // On envoie un email de confirmation pour l'utilisateur
-	$GLOBALS['ins_url']->addQueryString('id', session_id()) ;
+    $GLOBALS['ins_url']->addQueryString ('id', $chaine) ;
+    $corps = INS_MESSAGE_DEBUT_MAIL_INSCRIPTION ;
+    if (INS_UTILISE_REECRITURE_URL) {
+        $corps .= 'http://'.$GLOBALS['ins_url']->host.'/'.INS_URL_PREFIXE.$chaine ;
+    } else {
+        $corps .= str_replace ('&amp;', '&', $GLOBALS['ins_url']->getURL()) ;
+    }
+    $corps .= INS_MESSAGE_FIN_MAIL_INSCRIPTION ;
-	mail($GLOBALS['email'], INS_ENTETE_INSCRIPTION, INS_MESSAGE_VALIDER_INSCRIPTION.$GLOBALS['ins_url']->getURL()) ;
+    mail ($GLOBALS['email'], 'Inscription', $corps, 'From: '.INS_MAIL_ADMIN_APRES_INSCRIPTION) ;
+}
 /**
+ *
 	$GLOBALS['AUTH']->username = $valeurs['email'] ;
 	$GLOBALS['AUTH']->password = $valeurs['mot_de_passe'] ;
 	// On loggue l'utilisateur
 	$GLOBALS['AUTH']->login() ;
 	// inscription à la lettre d'information
-	if (isset ($valeurs['lettre'])) {
+	if (INS_CHAMPS_LETTRE != '' && isset ($valeurs['lettre'])) {
 		inscription_lettre(INS_MAIL_INSCRIPTION_LISTE) ;
+	}
+}
     return $res;
+}
 function insertion($valeur) {
+        // ===========  Insertion dans l'annuaire gen_annuaire ===================
+		// Génération du nom wikini à partir du nom et du prénom
+	    if (INS_UTILISE_WIKINI) {
-        // ===========  Insertion dans l'annuaire gen_annuaire ===================
+	        $valeur['nom_wiki'] = genere_nom_wiki ($valeur['nom'], $valeur['prenom']) ;
+	    }
         $id_utilisateur = nextId(INS_ANNUAIRE, INS_CHAMPS_ID, $GLOBALS['ins_db']) ;
         $requete = 'insert into '.INS_ANNUAIRE.' set '.
                     INS_CHAMPS_ID.'="'.$id_utilisateur.'",'.
         // ================ Insertion dans SPIP =========================================
         if (INS_UTILISE_SPIP) {
             inscription_spip($id_utilisateur, $valeur) ;
         }
-	//inscription_interwikini_users() ;
+	if (INS_UTILISE_WIKINI) inscription_interwikini_users('', $valeur) ;
+	// TODO CRéer un fichier bazar/bazar.inscription.inc.php et y mettre le code qui suit
+	// Vérifier tous les noms des répertoires du répertoire client et s'il existe
 	// un fichier nom/nom/inscription.inc.php l'inclure
 	//inscription dans Bazar
 	$requete = 'INSERT INTO bazar_droits VALUES ('.$id_utilisateur.',1,1),('.$id_utilisateur.',2,1),('.$id_utilisateur.',3,1),('.$id_utilisateur.',7,1)';
 	if ($valeur['est_structure']==1) $requete.=',('.$id_utilisateur.',4,1),('.$id_utilisateur.',5,1),('.$id_utilisateur.',6,1)';
 	$resultat = $GLOBALS['ins_db']->query($requete);
 function requete_annuaire($valeur) {
     $req = INS_CHAMPS_NOM.'="'.$valeur['nom'].'", ';
     if (isset($valeur['prenom'])) {
         $req .= INS_CHAMPS_PRENOM.'="'.$valeur['prenom'].'", ';
-	if (INS_UTILISE_WIKINI) $req .= INS_CHAMPS_NOM_WIKINI.'="'.ucfirst(strtr($valeur['prenom'],' ','_')).ucfirst(strtr($valeur['nom'],' ','_')).'", ' ;
+	if (INS_UTILISE_WIKINI) $req .= INS_CHAMPS_NOM_WIKINI.'="'.$valeur['champs_wiki'].'", ' ;
     }
-    elseif (INS_UTILISE_WIKINI) $req .= INS_CHAMPS_NOM_WIKINI.'="Structure'.ucfirst(strtr($valeur['nom'],' ','_')).'", ' ;
+    elseif (INS_UTILISE_WIKINI) $req .= INS_CHAMPS_NOM_WIKINI.'="Structure'.$valeur['champs_wiki'].'", ' ;
     $req .=      INS_CHAMPS_MAIL.'="'.$valeur['email'].'", ' ;
     $req .= INS_CHAMPS_PASSE.'="'.md5 ($valeur['mot_de_passe']).'", '.
 		INS_CHAMPS_EST_STRUCTURE.'="'.$valeur['est_structure'].'", '.
 		INS_CHAMPS_TELEPHONE.'="'.$valeur['telephone'].'", '.
 		INS_CHAMPS_FAX.'="'.$valeur['fax'].'", '.
 		INS_CHAMPS_SITE_INTERNET.'="'.$valeur['site'].'" ';
+	if (INS_CHAMPS_LETTRE != '') {
-	if (isset($valeur['lettre'])) {
+		if (isset($valeur['lettre'])) {
+			$req .= ', '.INS_CHAMPS_LETTRE.'="'.$valeur['lettre'].'"';
+		}
-		$req .= ', '.INS_CHAMPS_LETTRE.'="'.$valeur['lettre'].'"';
+		else 	$req .= ', '.INS_CHAMPS_LETTRE.'=0';
-	}
 	else 	$req .= ', '.INS_CHAMPS_LETTRE.'=0';
 	if (isset($valeur['visible'])) {
 		$req .= ', '.INS_CHAMPS_VISIBLE.'="'.$valeur['visible'].'"';
+	}
 	else 	$req .= ', '.INS_CHAMPS_VISIBLE.'=0';
 */
 function formulaire_defaults() {
     $requete = 'select '.INS_ANNUAIRE.'.* '.
                 'from '.INS_ANNUAIRE.' '.
                 'where '.INS_ANNUAIRE.'.'.INS_CHAMPS_ID.'= "'.$GLOBALS['AUTH']->getAuthData(INS_CHAMPS_ID).'"' ;
-    $resultat = $GLOBALS['ins_db']->query ($requete) ;
+    $resultat = $GLOBALS['ins_db']->query ($requete) ;echo $requete ;
     if (DB::isError($resultat)) {
     	die ($resultat->getMessage().'<br />'.$resultat->getDebugInfo()) ;
+    }
     $ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC) ;
     $valeurs_par_defaut = array() ;
     $res .= '<h2 class="inscription_titre2">'.INS_FICHE_PERSONNELLE.'</h2><br />'."\n" ;
     if ($ligne[INS_CHAMPS_EST_STRUCTURE] == 1) {
 	    $res .=  '<h3>'.$ligne[INS_CHAMPS_NOM].'</h3><br />'."\n";
+    }
     else $res .= '<h3>'.$ligne[INS_CHAMPS_PRENOM].' '.$ligne[INS_CHAMPS_NOM].'</h3><br />'."\n";
-    $res .='<label>'.INS_EMAIL.' :</label> '.$ligne[INS_CHAMPS_MAIL].'<br />'."\n" ;
-    if ($ligne[INS_CHAMPS_ADRESSE_1] != '') $res .= '<label>'.INS_ADRESSE_1.' :</label> '.$ligne[INS_CHAMPS_ADRESSE_1].'<br />'."\n" ;
-    if ($ligne[INS_CHAMPS_ADRESSE_2] != '') $res .= '<label>'.INS_ADRESSE_2.' :</label> '.$ligne[INS_CHAMPS_ADRESSE_2].'<br />'."\n" ;
-    if ($ligne[INS_CHAMPS_TELEPHONE] != '') $res .= '<label>'.INS_TELEPHONE.' :</label> '.$ligne[INS_CHAMPS_TELEPHONE].'<br />'."\n" ;
-    if ($ligne[INS_CHAMPS_FAX] != '') $res .= '<label>'.INS_FAX.' :</label> '.$ligne[INS_CHAMPS_FAX].'<br />'."\n" ;
-    if (INS_UTILISE_WIKINI) {if ($ligne[INS_CHAMPS_NOM_WIKINI] != '') $res .= '<label>'.INS_NOM_WIKI.' :</label> '.$ligne[INS_CHAMPS_NOM_WIKINI].'<br />'."\n" ;}
     $res .= '<br />';
+       $res .= '<dl>' ;
+    $res .= '<dt>'.INS_EMAIL.'</dt><dd>'.$ligne[INS_CHAMPS_MAIL]."</dd>\n" ;
+    if ($ligne[INS_CHAMPS_EST_STRUCTURE] == 1) $nom = INS_NOM_STRUCTURE ; else $nom = INS_NOM ;
+    $res .= '<dt>'.$nom.'</dt><dd>'.$ligne[INS_CHAMPS_NOM]."</dd>" ;
+    if ($ligne[INS_CHAMPS_EST_STRUCTURE] == 0) $res .= '<dt>'.INS_PRENOM.'</dt><dd>'.$ligne[INS_CHAMPS_PRENOM]."</dd>\n" ;
+    //if ($ligne[INS_CHAMPS_LOGIN] != "") $res .= '<dt>'.INS_NOM_WIKI.'</dt><dd>'.$ligne[INS_CHAMPS_LOGIN]."</dd>\n" ;
+    if ($ligne[INS_CHAMPS_ADRESSE_1] != "") $res .= '<dt>'.INS_ADRESSE.'</dt><dd>'.$ligne[INS_CHAMPS_ADRESSE_1]."</dd>\n" ;
+    if ($ligne[INS_CHAMPS_ADRESSE_2] != "") $res .= '<dd> '.$ligne[INS_CHAMPS_ADRESSE_2]."</dd>\n" ;
+    $res .= ligne_inscription (INS_CODE_POSTAL, $ligne[INS_CHAMPS_CODE_POSTAL]) ;
+    $res .= ligne_inscription (INS_VILLE, $ligne[INS_CHAMPS_VILLE]) ;
+    if ($ligne[INS_CHAMPS_TELEPHONE] != "") $res .= '<dt>'.INS_TELEPHONE.'</dt><dd>'.$ligne[INS_CHAMPS_TELEPHONE]."</dd>\n" ;
+    if ($ligne[INS_CHAMPS_FAX] != "") $res .= '<dt>'.INS_FAX.'</dt><dd>'.$ligne[INS_CHAMPS_FAX]."</dd>\n" ;
+    if ($ligne[INS_CHAMPS_STRUCTURE] != "") $res .= '<dt>'.INS_STRUCTURE.'</dt><dd>'.$ligne[INS_CHAMPS_STRUCTURE]."</dd>\n" ;
+	if (INS_UTILISE_WIKINI) {
+		if ($ligne[INS_CHAMPS_NOM_WIKINI] != '') $res .= '<label>'.INS_NOM_WIKI.' :</label> '.$ligne[INS_CHAMPS_NOM_WIKINI].'<br />'."\n" ;
+	}
+    $res .= '</dl>' ;
     return $res ;
+}
+/**
+ *	Renvoie une ligne avec label et valeur
+ *
+ * @param string label Le label
+ * @param string valeur
+ * @return	string HTML
+ */
+function ligne_inscription ($label, $valeur) {
+    if ($valeur == '') {
+        $valeur = '&nbsp;' ;
+    }
+    return '<dt>'.$label.'</dt><dd>'.$valeur.'</dd>' ;
+}
 function bouton($url) {
 	//requete pour savoir s'il s'agit d'une structure ou d'une personne
 	$requete = 'SELECT '.INS_CHAMPS_EST_STRUCTURE.' FROM '.INS_ANNUAIRE.' '.
 	'WHERE '.INS_CHAMPS_ID.'="'.$GLOBALS['AUTH']->getAuthData(INS_CHAMPS_ID).'"' ;
+}
-function envoie_passe()
-{
-    global $SERVER_ADMIN ;
+function envoie_passe()
+{
-    $headers['From']    = $SERVER_ADMIN ;
+    $headers['From']    = INS_MAIL_ADMIN_APRES_INSCRIPTION ;
     $headers['Subject'] = INS_NOUVEAU_MOT_DE_PASSE;
  */
 function envoie_mail() //A COMPLETER!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+{
+    include_once 'Mail/mime.php' ;
-    include_once 'Mail/mime.php' ;
+    include_once 'Mail.php' ;
     $crlf="\n";
     $headers ['From'] = INS_MAIL_ADMIN_APRES_INSCRIPTION ;
         return false ;
+    }
     return true ;
+}
+/**
+ *  Génère un nom wiki valide à partir des données saisies par l'utilisateur
+ *  fait une requete dans la base
+ *
+ * @return  string un nom wiki valide
+ */
+function genere_nom_wiki  ($nom, $prenom) {
+    // 1. suppression des espaces
+    $nom = trim ($nom) ;
+    $prenom = trim ($prenom) ;
+    // 2. suppression des caractères non ascii et ajout de la première lettre en majuscule
+    $nom = trim_non_ascii ($nom) ;
+    $prenom = trim_non_ascii ($prenom) ;
+    // Vérification
+    $nom_wiki = $nom.$prenom ;
+    if (!preg_match('/^[A-Z][a-z]+[A-Z,0-9][A-Z,a-z,0-9]*$/', $nom_wiki)) {
+        $nom_wiki = chr(rand(65, 90)).$nom_wiki.chr(rand(65, 90)) ;
+    }
+    return $nom_wiki ;
+}
+/**
+ *	Cette fonction supprime les caractères autres que asccii et les chiffres
+ *
+ * @return	string la chaine épurée
+ */
+function trim_non_ascii ($nom) {
+    $premiere_lettre = true ;
+    for ($i = 0; $i < strlen ($nom); $i++) {
+        if (!preg_match ('/[a-zA-Z0-9]/', $nom[$i])) {
+            $nom[$i] = '_' ;
+        }
+    // remplacement de la première lettre en majuscule
+        if (preg_match ('/[a-zA-Z]/', $nom[$i]) && $premiere_lettre) {
+            $nom[$i] = strtoupper ($nom[$i]) ;
+            $premiere_lettre = false ;
+        } else {
+            if (preg_match ('/[a-zA-Z]/', $nom[$i])) {
+                $nom[$i] = strtolower ($nom[$i]) ;
+            }
+        }
+    }
+    $nom = preg_replace ('/_/', '', $nom) ;
+    return $nom ;
+}
 // For users prior to PHP 4.3.0 you may do this:
 function unhtmlentities($string)
+{
     $trans_tbl = get_html_translation_table (HTML_ENTITIES);
+}
 /* +--Fin du code ----------------------------------------------------------------------------------------+
+*
+* $Log: not supported by cvs2svn $
+* Revision 1.1  2005/09/22 14:02:49  ddelon
+* nettoyage annuaire et php5
 * $Log: not supported by cvs2svn $
 * Revision 1.4  2005/09/22 13:30:49  florian
 * modifs pour compatibilité XHTML Strict + corrections de bugs (mais ya encore du boulot!!)
+*
 * Revision 1.3  2005/03/21 16:57:30  florian

Subversion Repositories Applications.papyrus

(root)/trunk/client/bottin/bibliotheque/inscription.fonct.php @ 1313 – Rev 448 → 483