480 lines
16 KiB
PHP
480 lines
16 KiB
PHP
|
<?php
|
||
|
|
||
|
/**
|
||
|
* 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');
|
||
|
|
||
|
/**
|
||
|
* 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 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));
|
||
|
}
|
||
|
|
||
|
|
||
|
/**
|
||
|
* 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'];
|
||
|
$config['lignes'] = 8;
|
||
|
$config['langue'] = $spip_lang;
|
||
|
|
||
|
// pour instituer_auteur
|
||
|
$config['auteur'] = $row;
|
||
|
|
||
|
//$config['restreint'] = ($row['statut'] == 'publie');
|
||
|
$auth_methode = $row['source'];
|
||
|
include_spip('inc/auth');
|
||
|
$config['edit_login'] =
|
||
|
(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 autoriser('modifier', 'auteur', $row['id_auteur']));
|
||
|
|
||
|
return $config;
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* 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);
|
||
|
|
||
|
$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, $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 = ($auth_methode ? $auth_methode : 'spip');
|
||
|
include_spip('inc/auth');
|
||
|
|
||
|
if (!nom_acceptable(_request('nom'))) {
|
||
|
$erreurs['nom'] = _T('info_nom_pas_conforme');
|
||
|
}
|
||
|
|
||
|
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'));
|
||
|
}
|
||
|
}
|
||
|
# 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) {
|
||
|
#Un auteur existe deja avec cette adresse ?
|
||
|
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)
|
||
|
)))) {
|
||
|
$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) {
|
||
|
$url = 'http://' . $url;
|
||
|
set_request('url_site', $url);
|
||
|
}
|
||
|
}
|
||
|
// traiter les liens implicites avant de tester l'url
|
||
|
include_spip('inc/lien');
|
||
|
if ($url = calculer_url(_request('url_site')) and !tester_url_absolue($url)) {
|
||
|
$erreurs['url_site'] = _T('info_url_site_pas_conforme');
|
||
|
}
|
||
|
|
||
|
$erreurs['message_erreur'] = '';
|
||
|
if (_request('login')) {
|
||
|
// on n'est jamais cense poster le name login
|
||
|
$erreurs['login'] = _T('info_non_modifiable');
|
||
|
}
|
||
|
elseif (
|
||
|
($login = _request('new_login')) and
|
||
|
$login !== sql_getfetsel('login', 'spip_auteurs', 'id_auteur=' . intval($id_auteur))
|
||
|
) {
|
||
|
// on verifie la meme chose que dans auteurs_edit_config()
|
||
|
if (
|
||
|
! auth_autoriser_modifier_login($auth_methode)
|
||
|
or !autoriser('modifier', 'auteur', intval($id_auteur), null, ['email' => true])
|
||
|
) {
|
||
|
$erreurs['login'] = _T('info_non_modifiable');
|
||
|
}
|
||
|
}
|
||
|
|
||
|
if (empty($erreurs['login'])){
|
||
|
if ($err = auth_verifier_login($auth_methode, _request('new_login'), $id_auteur)){
|
||
|
$erreurs['new_login'] = $err;
|
||
|
$erreurs['message_erreur'] .= $err;
|
||
|
} 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)) {
|
||
|
$erreurs['new_pass'] = $err;
|
||
|
$erreurs['message_erreur'] .= $err;
|
||
|
}
|
||
|
}
|
||
|
}
|
||
|
}
|
||
|
|
||
|
if (!$erreurs['message_erreur']) {
|
||
|
unset($erreurs['message_erreur']);
|
||
|
}
|
||
|
|
||
|
return $erreurs;
|
||
|
}
|
||
|
|
||
|
|
||
|
/**
|
||
|
* 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' => '?'))) {
|
||
|
$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);
|
||
|
}
|
||
|
}
|
||
|
|
||
|
$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']) {
|
||
|
$objet = '';
|
||
|
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);
|
||
|
}
|
||
|
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, '&');
|
||
|
}
|
||
|
}
|
||
|
}
|
||
|
|
||
|
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);
|
||
|
// si pas de langue explicitement demandee, prendre celle de l'auteur si on la connait, ou a defaut celle du site
|
||
|
// plutot que celle de l'admin qui vient de cliquer sur le bouton
|
||
|
if (!isset($contexte['lang']) or !$contexte['lang']) {
|
||
|
if (isset($row['lang']) and $row['lang']) {
|
||
|
$contexte['lang'] = $row['lang'];
|
||
|
}
|
||
|
else {
|
||
|
$contexte['lang'] = $GLOBALS['meta']['langue_site'];
|
||
|
}
|
||
|
}
|
||
|
lang_select($contexte['lang']);
|
||
|
$message = recuperer_fond($fond, $contexte);
|
||
|
include_spip("inc/notifications");
|
||
|
notifications_envoyer_mails($row['email'],$message);
|
||
|
lang_select();
|
||
|
|
||
|
return $row['email'];
|
||
|
}
|
||
|
|
||
|
return false;
|
||
|
|
||
|
}
|
||
|
|
||
|
return '';
|
||
|
}
|