[SPIP][PLUGINS] v3.0-->v3.2
[lhc/web/www.git] / www / prive / formulaires / editer_auteur.php
index 69e6647..4101f0a 100644 (file)
 <?php
 
-if (!defined('_ECRIRE_INC_VERSION')) return;
+/**
+ * Gestion du formulaire de d'édition de rubrique
+ *
+ * @package SPIP\Core\Auteurs\Formulaires
+ **/
+
+if (!defined('_ECRIRE_INC_VERSION')) {
+       return;
+}
 
 include_spip('inc/actions');
 include_spip('inc/editer');
 include_spip('inc/filtres_ecrire'); // si on utilise le formulaire dans le public
+include_spip('inc/autoriser');
 
-// http://doc.spip.org/@inc_editer_mot_dist
-function formulaires_editer_auteur_charger_dist($id_auteur='new', $retour='', $associer_objet='', $config_fonc='auteurs_edit_config', $row=array(), $hidden=''){
-       $valeurs = formulaires_editer_objet_charger('auteur',$id_auteur,0,0,$retour,$config_fonc,$row,$hidden);
+/**
+ * Chargement du formulaire d'édition d'un auteur
+ *
+ * @see formulaires_editer_objet_charger()
+ *
+ * @param int|string $id_auteur
+ *     Identifiant de l'auteur. 'new' pour une nouvel auteur.
+ * @param string $retour
+ *     URL de redirection après le traitement
+ * @param string $associer_objet
+ *     Éventuel 'objet|x' indiquant de lier le mot créé à cet objet,
+ *     tel que 'article|3'
+ * @param string $config_fonc
+ *     Nom de la fonction ajoutant des configurations particulières au formulaire
+ * @param array $row
+ *     Valeurs de la ligne SQL de l'auteur, si connu
+ * @param string $hidden
+ *     Contenu HTML ajouté en même temps que les champs cachés du formulaire.
+ * @return array
+ *     Environnement du formulaire
+ **/
+function formulaires_editer_auteur_charger_dist(
+       $id_auteur = 'new',
+       $retour = '',
+       $associer_objet = '',
+       $config_fonc = 'auteurs_edit_config',
+       $row = array(),
+       $hidden = ''
+) {
+       $valeurs = formulaires_editer_objet_charger('auteur', $id_auteur, 0, 0, $retour, $config_fonc, $row, $hidden);
        $valeurs['new_login'] = $valeurs['login'];
 
+       if (!autoriser('modifier', 'auteur', intval($id_auteur))) {
+               $valeurs['editable'] = '';
+       }
+
        return $valeurs;
 }
 
 /**
- * Identifier le formulaire en faisant abstraction des parametres qui
- * ne representent pas l'objet edite
+ * Identifier le formulaire en faisant abstraction des paramètres qui
+ * ne représentent pas l'objet édité
+ *
+ * @param int|string $id_auteur
+ *     Identifiant de l'auteur. 'new' pour une nouvel auteur.
+ * @param string $retour
+ *     URL de redirection après le traitement
+ * @param string $associer_objet
+ *     Éventuel 'objet|x' indiquant de lier le mot créé à cet objet,
+ *     tel que 'article|3'
+ * @param string $config_fonc
+ *     Nom de la fonction ajoutant des configurations particulières au formulaire
+ * @param array $row
+ *     Valeurs de la ligne SQL de l'auteur, si connu
+ * @param string $hidden
+ *     Contenu HTML ajouté en même temps que les champs cachés du formulaire.
+ * @return string
+ *     Hash du formulaire
  */
-function formulaires_editer_auteur_identifier_dist($id_auteur='new', $retour='', $associer_objet='', $config_fonc='auteurs_edit_config', $row=array(), $hidden=''){
-       return serialize(array(intval($id_auteur),$associer_objet));
+function formulaires_editer_auteur_identifier_dist(
+       $id_auteur = 'new',
+       $retour = '',
+       $associer_objet = '',
+       $config_fonc = 'auteurs_edit_config',
+       $row = array(),
+       $hidden = ''
+) {
+       return serialize(array(intval($id_auteur), $associer_objet));
 }
 
 
-// Choix par defaut des options de presentation
-// http://doc.spip.org/@articles_edit_config
-function auteurs_edit_config($row)
-{
+/**
+ * Choix par défaut des options de présentation
+ *
+ * @param array $row
+ *     Valeurs de la ligne SQL d'un auteur, si connu
+ * return array
+ *     Configuration pour le formulaire
+ */
+function auteurs_edit_config($row) {
        global $spip_lang;
 
        $config = $GLOBALS['meta'];
@@ -35,69 +103,125 @@ function auteurs_edit_config($row)
 
        // pour instituer_auteur
        $config['auteur'] = $row;
-       
+
        //$config['restreint'] = ($row['statut'] == 'publie');
        $auth_methode = $row['source'];
        include_spip('inc/auth');
-       include_spip('inc/autoriser');
-       $autoriser = autoriser('modifier','auteur',$row['id_auteur'],null, array('email'=>true));
        $config['edit_login'] =
-               (auth_autoriser_modifier_login($auth_methode) AND $autoriser);
+               (auth_autoriser_modifier_login($auth_methode)
+                       and autoriser('modifier', 'auteur', $row['id_auteur'], null, array('email' => true)));
        $config['edit_pass'] =
                (auth_autoriser_modifier_pass($auth_methode)
-               AND
-                       ($GLOBALS['visiteur_session']['id_auteur'] == $row['id_auteur'] OR $autoriser)
-               );
+                       and autoriser('modifier', 'auteur', $row['id_auteur']));
 
        return $config;
 }
 
-function formulaires_editer_auteur_verifier_dist($id_auteur='new', $retour='', $associer_objet='', $config_fonc='auteurs_edit_config', $row=array(), $hidden=''){
+/**
+ * Vérifications du formulaire d'édition d'un auteur
+ *
+ * Vérifie en plus des vérifications prévues :
+ * - qu'un rédacteur ne peut pas supprimer son adresse mail,
+ * - que le mot de passe choisi n'est pas trop court et identique à sa
+ *   deuxième saisie
+ *
+ * @see formulaires_editer_objet_verifier()
+ *
+ * @param int|string $id_auteur
+ *     Identifiant de l'auteur. 'new' pour une nouvel auteur.
+ * @param string $retour
+ *     URL de redirection après le traitement
+ * @param string $associer_objet
+ *     Éventuel 'objet|x' indiquant de lier le mot créé à cet objet,
+ *     tel que 'article|3'
+ * @param string $config_fonc
+ *     Nom de la fonction ajoutant des configurations particulières au formulaire
+ * @param array $row
+ *     Valeurs de la ligne SQL de l'auteur, si connu
+ * @param string $hidden
+ *     Contenu HTML ajouté en même temps que les champs cachés du formulaire.
+ * @return array
+ *     Erreurs des saisies
+ **/
+function formulaires_editer_auteur_verifier_dist(
+       $id_auteur = 'new',
+       $retour = '',
+       $associer_objet = '',
+       $config_fonc = 'auteurs_edit_config',
+       $row = array(),
+       $hidden = ''
+) {
        // auto-renseigner le nom si il n'existe pas, sans couper
-       titre_automatique('nom',array('email','login'),255);
+       titre_automatique('nom', array('email', 'login'), 255);
+
+       $oblis = array('nom');
+       // si on veut renvoyer des identifiants il faut un email et un login
+       if (_request('reset_password')) {
+               $oblis[] = 'email';
+               $oblis[] = 'new_login';
+       }
        // mais il reste obligatoire si on a rien trouve
-       $erreurs = formulaires_editer_objet_verifier('auteur',$id_auteur,array('nom'));
+       $erreurs = formulaires_editer_objet_verifier('auteur', $id_auteur, $oblis);
+       if (isset($erreurs['new_login'])) {
+               $erreurs['login'] = $erreurs['new_login'];
+               unset($erreurs['new_login']);
+       }
 
-       $auth_methode = sql_getfetsel('source','spip_auteurs','id_auteur='.intval($id_auteur));
+       $auth_methode = sql_getfetsel('source', 'spip_auteurs', 'id_auteur=' . intval($id_auteur));
        $auth_methode = ($auth_methode ? $auth_methode : 'spip');
        include_spip('inc/auth');
-       include_spip('inc/filtres');
 
        if (!nom_acceptable(_request('nom'))) {
-               $erreurs['nom'] = _T("info_nom_pas_conforme");
+               $erreurs['nom'] = _T('info_nom_pas_conforme');
        }
 
-       if ($email = _request('email')){
+       if ($email = _request('email')) {
+               include_spip('inc/filtres');
                include_spip('inc/autoriser');
                // un redacteur qui modifie son email n'a pas le droit de le vider si il y en avait un
-               if (!autoriser('modifier','auteur',$id_auteur,null,array('email'=>'?'))
-                       AND $GLOBALS['visiteur_session']['id_auteur']==$id_auteur
-                       AND !strlen(trim($email))
-                       AND $email!=($email_ancien=sql_getfetsel('email', 'spip_auteurs', 'id_auteur='.intval($id_auteur)))
-                       ){
-                       $erreurs['email'] = (($id_auteur==$GLOBALS['visiteur_session']['id_auteur'])?_T('form_email_non_valide'):_T('form_prop_indiquer_email'));
-               }
-               else if (!email_valide($email)){
-                       $erreurs['email'] = (($id_auteur==$GLOBALS['visiteur_session']['id_auteur'])?_T('form_email_non_valide'):_T('form_prop_indiquer_email'));
+               if (!autoriser('modifier', 'auteur', $id_auteur, null, array('email' => '?'))
+                       and $GLOBALS['visiteur_session']['id_auteur'] == $id_auteur
+                       and !strlen(trim($email))
+                       and $email != ($email_ancien = sql_getfetsel('email', 'spip_auteurs', 'id_auteur=' . intval($id_auteur)))
+               ) {
+                       $erreurs['email'] = (($id_auteur == $GLOBALS['visiteur_session']['id_auteur']) ? _T('form_email_non_valide') : _T('form_prop_indiquer_email'));
+               } else {
+                       if (!email_valide($email)) {
+                               $erreurs['email'] = (($id_auteur == $GLOBALS['visiteur_session']['id_auteur']) ? _T('form_email_non_valide') : _T('form_prop_indiquer_email'));
+                       }
                }
-
                # Ne pas autoriser d'avoir deux auteurs avec le même email
                # cette fonctionalité nécessite que la base soit clean à l'activation : pas de
                # doublon sur la requête select email,count(*) from spip_auteurs group by email ;
                if (defined('_INTERDIRE_AUTEUR_MEME_EMAIL')) {
                        #Nouvel auteur
-                       if (intval($id_auteur)==0) {
+                       if (intval($id_auteur) == 0) {
                                #Un auteur existe deja avec cette adresse ?
-                               if (sql_countsel("spip_auteurs", "email=".sql_quote($email)) > 0)
+                               if (sql_countsel('spip_auteurs', 'email=' . sql_quote($email)) > 0) {
                                        $erreurs['email'] = _T('erreur_email_deja_existant');
+                               }
                        } else {
                                #Un auteur existe deja avec cette adresse ? et n'est pas le user courant.
-                               if ((sql_countsel("spip_auteurs", "email=".sql_quote($email)) > 0) AND ($id_auteur!=($id_auteur_ancien=sql_getfetsel('id_auteur', 'spip_auteurs', "email=".sql_quote($email)))))
+                               if ((sql_countsel(
+                                       'spip_auteurs',
+                                       'email=' . sql_quote($email)
+                               ) > 0) and ($id_auteur != ($id_auteur_ancien = sql_getfetsel(
+                                       'id_auteur',
+                                       'spip_auteurs',
+                                       'email=' . sql_quote($email)
+                               )))) {
                                        $erreurs['email'] = _T('erreur_email_deja_existant');
+                               }
                        }
                }
        }
 
+       // quand c'est un auteur existant on fait le reset password ici
+       if (!count($erreurs) and _request('reset_password') and intval($id_auteur)) {
+               $erreurs = auteur_reset_password($id_auteur, $erreurs);
+               return $erreurs;
+       }
+
        // corriger un cas si frequent : www.example.org sans le http:// qui precede
        if ($url = _request('url_site') and !tester_url_absolue($url)) {
                if (strpos($url, ':') === false and strncasecmp($url, 'www.', 4) === 0) {
@@ -111,77 +235,215 @@ function formulaires_editer_auteur_verifier_dist($id_auteur='new', $retour='', $
                $erreurs['url_site'] = _T('info_url_site_pas_conforme');
        }
 
-       if ($err = auth_verifier_login($auth_methode, _request('new_login'), $id_auteur)){
+       $erreurs['message_erreur'] = '';
+
+       if ($err = auth_verifier_login($auth_methode, _request('new_login'), $id_auteur)) {
                $erreurs['new_login'] = $err;
                $erreurs['message_erreur'] .= $err;
-       }
-       else {
+       } else {
                // pass trop court ou confirmation non identique
                if ($p = _request('new_pass')) {
                        if ($p != _request('new_pass2')) {
                                $erreurs['new_pass'] = _T('info_passes_identiques');
                                $erreurs['message_erreur'] .= _T('info_passes_identiques');
-                       }
-                       elseif ($err = auth_verifier_pass($auth_methode, _request('new_login'),$p, $id_auteur)){
+                       } elseif ($err = auth_verifier_pass($auth_methode, _request('new_login'), $p, $id_auteur)) {
                                $erreurs['new_pass'] = $err;
                                $erreurs['message_erreur'] .= $err;
                        }
                }
        }
+
+       if (!$erreurs['message_erreur']) {
+               unset($erreurs['message_erreur']);
+       }
+
        return $erreurs;
 }
 
-// http://doc.spip.org/@inc_editer_mot_dist
-function formulaires_editer_auteur_traiter_dist($id_auteur='new', $retour='', $associer_objet='', $config_fonc='auteurs_edit_config', $row=array(), $hidden=''){
-       if (_request('saisie_webmestre') OR _request('webmestre'))
-               set_request('webmestre',_request('webmestre')?_request('webmestre'):'non');
-       $retour = parametre_url($retour, 'email_confirm','');
 
-       set_request('email', email_valide(_request('email'))); // eviter d'enregistrer les cas qui sont acceptés par email_valide dans le verifier :
-       // "Marie@toto.com  " ou encore "Marie Toto <Marie@toto.com>"   
-       
+/**
+ * Traitements du formulaire d'édition d'un auteur
+ *
+ * En plus de l'enregistrement normal des infos de l'auteur, la fonction
+ * traite ces cas spécifiques :
+ *
+ * - Envoie lorsqu'un rédacteur n'a pas forcément l'autorisation changer
+ *   seul son adresse email, un email à la nouvelle adresse indiquée
+ *   pour vérifier l'email saisi, avec un lien dans le mai sur l'action
+ *   'confirmer_email' qui acceptera alors le nouvel email.
+ *
+ * - Crée aussi une éventuelle laision indiquée dans $associer_objet avec
+ *   cet auteur.
+ *
+ * @see formulaires_editer_objet_traiter()
+ *
+ * @param int|string $id_auteur
+ *     Identifiant de l'auteur. 'new' pour une nouvel auteur.
+ * @param string $retour
+ *     URL de redirection après le traitement
+ * @param string $associer_objet
+ *     Éventuel 'objet|x' indiquant de lier le mot créé à cet objet,
+ *     tel que 'article|3'
+ * @param string $config_fonc
+ *     Nom de la fonction ajoutant des configurations particulières au formulaire
+ * @param array $row
+ *     Valeurs de la ligne SQL de l'auteur, si connu
+ * @param string $hidden
+ *     Contenu HTML ajouté en même temps que les champs cachés du formulaire.
+ * @return array
+ *     Retour des traitements
+ **/
+function formulaires_editer_auteur_traiter_dist(
+       $id_auteur = 'new',
+       $retour = '',
+       $associer_objet = '',
+       $config_fonc = 'auteurs_edit_config',
+       $row = array(),
+       $hidden = ''
+) {
+       if (_request('saisie_webmestre') or _request('webmestre')) {
+               set_request('webmestre', _request('webmestre') ? _request('webmestre') : 'non');
+       }
+       $retour = parametre_url($retour, 'email_confirm', '');
+
+       set_request(
+               'email',
+               email_valide(_request('email'))
+       ); // eviter d'enregistrer les cas qui sont acceptés par email_valide dans le verifier :
+       // "Marie@toto.com  " ou encore "Marie Toto <Marie@toto.com>"
+
        include_spip('inc/autoriser');
-       if (!autoriser('modifier','auteur',$id_auteur,null,array('email'=>'?'))){
+       if (!autoriser('modifier', 'auteur', $id_auteur, null, array('email' => '?'))) {
                $email_nouveau = _request('email');
                set_request('email'); // vider la saisie car l'auteur n'a pas le droit de modifier cet email
                // mais si c'est son propre profil on lui envoie un email à l'adresse qu'il a indique
                // pour qu'il confirme qu'il possede bien cette adresse
                // son clic sur l'url du message permettre de confirmer le changement
                // et de revenir sur son profil
-               if ($GLOBALS['visiteur_session']['id_auteur']==$id_auteur
-                       AND $email_nouveau!=($email_ancien=sql_getfetsel('email', 'spip_auteurs', 'id_auteur='.intval($id_auteur)))){
-                       $envoyer_mail = charger_fonction('envoyer_mail','inc');
-                       $texte = _T('form_auteur_mail_confirmation',
-                                                                                       array('url'=>generer_action_auteur('confirmer_email', $email_nouveau,parametre_url($retour, 'email_modif','ok'))));
-                       $envoyer_mail($email_nouveau,_T('form_auteur_confirmation'),$texte);
-                       set_request('email_confirm',$email_nouveau);
-                       if ($email_ancien)
-                               $envoyer_mail($email_ancien,_T('form_auteur_confirmation'),_T('form_auteur_envoi_mail_confirmation',array('email'=>$email_nouveau)));
-                       $retour = parametre_url($retour, 'email_confirm',$email_nouveau);
+               if ($GLOBALS['visiteur_session']['id_auteur'] == $id_auteur
+                       and $email_nouveau !=
+                               ($email_ancien = sql_getfetsel('email', 'spip_auteurs', 'id_auteur=' . intval($id_auteur)))
+               ) {
+                       $envoyer_mail = charger_fonction('envoyer_mail', 'inc');
+                       $texte = _T(
+                               'form_auteur_mail_confirmation',
+                               array(
+                                       'url' => generer_action_auteur(
+                                               'confirmer_email',
+                                               $email_nouveau,
+                                               parametre_url($retour, 'email_modif', 'ok')
+                                       )
+                               )
+                       );
+                       $envoyer_mail($email_nouveau, _T('form_auteur_confirmation'), $texte);
+                       set_request('email_confirm', $email_nouveau);
+                       if ($email_ancien) {
+                               $envoyer_mail($email_ancien, _T('form_auteur_confirmation'),
+                                       _T('form_auteur_envoi_mail_confirmation', array('email' => $email_nouveau)));
+                       }
+                       $retour = parametre_url($retour, 'email_confirm', $email_nouveau);
                }
        }
 
-       $res = formulaires_editer_objet_traiter('auteur',$id_auteur,0,0,$retour,$config_fonc,$row,$hidden);
+       $res = formulaires_editer_objet_traiter('auteur', $id_auteur, 0, 0, $retour, $config_fonc, $row, $hidden);
+
+       if (_request('reset_password') and !intval($id_auteur) and intval($res['id_auteur'])) {
+               $erreurs = array();
+               $erreurs = auteur_reset_password($res['id_auteur'], $erreurs);
+               if (isset($erreurs['message_ok'])) {
+                       if (!isset($res['message_ok'])) $res['message_ok'] = '';
+                       $res['message_ok'] = trim($res['message_ok'] . ' ' . $erreurs['message_ok']);
+               }
+               if (isset($erreurs['message_erreur']) and $erreurs['message_erreur']) {
+                       if (!isset($res['message_erreur'])) $res['message_erreur'] = '';
+                       $res['message_erreur'] = trim($res['message_erreur'] . ' ' . $erreurs['message_erreur']);
+               }
+       }
 
        // Un lien auteur a prendre en compte ?
-       if ($associer_objet AND $id_auteur=$res['id_auteur']){
+       if ($associer_objet and $id_auteur = $res['id_auteur']) {
                $objet = '';
-               if (intval($associer_objet)){
-                       $objet='article';
+               if (intval($associer_objet)) {
+                       $objet = 'article';
                        $id_objet = intval($associer_objet);
+               } elseif (preg_match(',^\w+\|[0-9]+$,', $associer_objet)) {
+                       list($objet, $id_objet) = explode('|', $associer_objet);
                }
-               elseif(preg_match(',^\w+\|[0-9]+$,',$associer_objet)){
-                       list($objet,$id_objet) = explode('|',$associer_objet);
-               }
-               if ($objet AND $id_objet AND autoriser('modifier',$objet,$id_objet)){
+               if ($objet and $id_objet and autoriser('modifier', $objet, $id_objet)) {
                        include_spip('action/editer_auteur');
                        auteur_associer($id_auteur, array($objet => $id_objet));
-                       if (isset($res['redirect']))
-                               $res['redirect'] = parametre_url ($res['redirect'], "id_lien_ajoute", $id_auteur, '&');
+                       if (isset($res['redirect'])) {
+                               $res['redirect'] = parametre_url($res['redirect'], 'id_lien_ajoute', $id_auteur, '&');
+                       }
                }
        }
 
        return $res;
 }
 
-?>
+
+function auteur_reset_password($id_auteur, $erreurs = array()) {
+       $auteur = sql_fetsel('*', 'spip_auteurs', 'id_auteur=' . intval($id_auteur));
+       $config = auteurs_edit_config($auteur);
+
+       if ($config['edit_pass']) {
+               if ($email = auteur_regenerer_identifiants($id_auteur)) {
+                       $erreurs['message_ok'] = _T('message_nouveaux_identifiants_ok', array('email' => $email));
+                       $erreurs['message_erreur'] = '';
+               } elseif ($email === false) {
+                       $erreurs['message_erreur'] = _T('message_nouveaux_identifiants_echec_envoi');
+               } else {
+                       $erreurs['message_erreur'] = _T('message_nouveaux_identifiants_echec');
+               }
+       } else {
+               $erreurs['message_erreur'] = _T('message_nouveaux_identifiants_echec');
+       }
+
+       return $erreurs;
+}
+
+/**
+ * Renvoyer des identifiants
+ * @param int $id_auteur
+ * @param bool $notifier
+ * @param array $contexte
+ * @return string
+ */
+function auteur_regenerer_identifiants($id_auteur, $notifier=true, $contexte = array()) {
+       if ($id_auteur){
+               $set = array();
+               include_spip('inc/access');
+               $set['pass'] = creer_pass_aleatoire();
+
+               include_spip('action/editer_auteur');
+               auteur_modifier($id_auteur,$set);
+
+               $row = sql_fetsel('*','spip_auteurs','id_auteur='.intval($id_auteur));
+               include_spip('inc/filtres');
+               if ($notifier
+                       and $row['email']
+                       and email_valide($row['email'])
+                 and trouver_fond($fond = 'modeles/mail_nouveaux_identifiants')){
+                       // envoyer l'email avec login/pass
+                       $c = array(
+                               'id_auteur' => $id_auteur,
+                               'nom' => $row['nom'],
+                               'mode' => $row['statut'],
+                               'email' => $row['email'],
+                               'pass' => $set['pass'],
+                       );
+                       // on merge avec les champs fournit en appel, qui sont passes au modele de notification donc
+                       $contexte = array_merge($contexte, $c);
+                       $message = recuperer_fond($fond, $contexte);
+                       include_spip("inc/notifications");
+                       notifications_envoyer_mails($row['email'],$message);
+
+                       return $row['email'];
+               }
+
+               return false;
+
+       }
+
+       return '';
+}
\ No newline at end of file