function action_spiplistes_listes_abonner_auteur_dist () {
$securiser_action = charger_fonction('securiser_action', 'inc');
$arg = intval($securiser_action());
$id_liste = intval(_request('id_liste'));
$ajouter_id_abo = intval(_request('ajouter_id_abo'));
$ajouter_id_mod = intval(_request('ajouter_id_mod'));
$nouv_auteur = intval(_request('nouv_auteur'));
$action = _request('action');
$tri = urldecode(_request('tri'));
$debut = intval(_request('debut'));
$redirect = urldecode(_request('redirect'));
$cherche_auteur = trim(urldecode(_request('cherche_auteur')));
// appel de exec/spiplistes_liste_gerer.php ?
if($id_liste > 0) {
include_spip('inc/spiplistes_listes_selectionner_auteur');
$statut_liste = sql_getfetsel('statut', 'spip_listes', "id_liste=".sql_quote($id_liste), '', '', 1);
if(!empty($cherche_auteur)) {
// ne rafraichir que le formulaire
$result = spiplistes_listes_selectionner_elligibles (0, 0, $id_liste, $tri, '', '', '', '', true);
}
else if($ajouter_id_abo > 0) {
spiplistes_abonnements_ajouter($ajouter_id_abo, $id_liste);
$scrip_exec = urldecode(_request('scrip_exec'));
$result = spiplistes_listes_boite_abonnes($id_liste, $statut_liste, $tri, $debut, $scrip_exec)
. spiplistes_listes_boite_elligibles ($id_liste, $statut_liste, $tri, $debut);
}
// echo(spiplistes_listes_boite_abonnements($id_liste, $statut_liste, $tri, $debut, $redirect));
echo($result);
}
else {
}
exit(0);
}
function action_spiplistes_changer_statut_abonne_dist () {
// les globales ne passent pas en action
//global $connect_id_auteur;
$connect_id_auteur = $GLOBALS['auteur_session']['id_auteur'];
include_spip('inc/autoriser');
include_spip(_DIR_PLUGIN_SPIPLISTES.'inc/spiplistes_api');
$securiser_action = charger_fonction('securiser_action', 'inc');
$arg = $securiser_action();
$redirect = urldecode(_request('redirect'));
$id_liste = urldecode(_request('id_liste'));
$tri = urldecode(_request('tri'));
$debut = urldecode(_request('debut'));
$arg = explode('-',$arg);
$id_auteur = intval($arg[0]);
$action = $arg[1];
if(($id_auteur > 0) && ($connect_id_auteur > 0)) {
if ($action == 'format') {
//modification du format abonne ('html', 'texte' ou 'non')
$statut = _request('statut');
if(autoriser('modifierformat', 'abonne', $id_auteur)) {
if(spiplistes_format_abo_modifier($id_auteur, $statut)) {
if(!$redirect) {
include_spip('inc/spiplistes_api_presentation');
include_spip('inc/spiplistes_listes_selectionner_auteur');
//echo(spiplistes_listes_boite_abonnes($id_liste, $tri, $debut, $script_retour));
echo(spiplistes_listes_boite_abonnements($id_liste, $statut_liste, $tri, $debut, $redirect, $elligibles, $nb_elligibles));
exit(0);
}
}
}
}
if ($action == 'supprimer') {
// supprimer un abonne'. Ne supprime pas le compte, juste l'abo dans la liste indiquee.
include_spip('inc/spiplistes_api_presentation');
include_spip('inc/spiplistes_listes_selectionner_auteur');
spiplistes_abonnements_auteur_desabonner ($id_auteur, (($id_liste > 0) ? $id_liste : 'toutes'));
$statut_liste = sql_getfetsel('statut', 'spip_listes', "id_liste=".sql_quote($id_liste), '', '', 1);
$scrip_retour = urldecode(_request('scrip_retour'));
echo(
spiplistes_listes_boite_abonnes ($id_liste, $statut_liste, $tri, $debut, $scrip_retour)
. spiplistes_listes_boite_elligibles ($id_liste, $statut_liste, $tri, $debut)
);
}
// CP-20080324: l'abonnement par action/ actuellement pas utilise par le formulaire abonnes_tous.
// A voir si on conserve
// CP-20081111: code probablement inutile. Un autre script action fait le meme boulot. A supprimer apres verif
/* */
if ($action=='listeabo') {
//abonne un auteur, force en _SPIPLISTES_FORMAT_DEFAULT si pas de format
if ($id_auteur
&& (($id_liste = intval($arg[2])) > 0)
&& autoriser('abonnerauteur', 'liste', $id_liste, NULL, array('id_auteur'=>$id_auteur))
) {
spiplistes_abonnements_ajouter($id_auteur, $id_liste);
//attribuer un format de reception si besoin (ancien auteur)
if(
(!$abo = spiplistes_format_abo_demande($id_auteur))
|| ($abo == 'non')
) {
spiplistes_format_abo_modifier($id_auteur, _SPIPLISTES_FORMAT_DEFAULT);
}
}
spiplistes_log("SUBSCRIBE ID_AUTEUR #$id_auteur to ID_LISTE #$id_liste by ID_AUTEUR #$connect_id_auteur");
}
if ($action=='listedesabo') {
// desabonne un auteur
if ($id_liste = intval($arg[2])) {
if (autoriser('desabonnerauteur', 'liste', $id_liste, NULL, array('id_auteur'=>$id_auteur))) {
if(spiplistes_abonnements_auteur_desabonner ($id_auteur, $id_liste)) {
spiplistes_log("UNSUBSCRIBE ID_AUTEUR #$id_auteur from ID_LISTE #$id_liste by ID_AUTEUR #$connect_id_auteur");
}
}
}
}
// CP-20081111: fin de code inutile.
}
if ($redirect){
redirige_par_entete(str_replace("&","&",$redirect)."#abo$id_auteur");
}
} // action_spiplistes_changer_statut_abonne_dist()
function formulaires_modif_abonnement2_traiter_dist(){
spiplistes_debug_log('formulaires_modif_abonnement2_traiter_dist()');
$d = _request('d');
$list = _request('list');
$email_desabo = _request('email_desabo');
$format = _request('suppl_abo');
// cherche l'abonne'
$sql_select = "id_auteur,statut,nom,email";
$sql_result = sql_select(
$sql_select
, 'spip_auteurs'
, array(
"cookie_oubli=".sql_quote($d)
, "statut<>".sql_quote('5poubelle')
, "pass<>".sql_quote('')
)
, '', '', 1
);
$row = sql_fetch($sql_result);
//print_r($row);
foreach(explode(",",$sql_select) as $key) {
$$key = $row[$key];
}
$id_auteur = intval($id_auteur);
$prev_format = spiplistes_format_abo_demande($id_auteur);
// desabonne l'auteur de toute les listes
spiplistes_abonnements_desabonner_statut($id_auteur, explode(";", _SPIPLISTES_LISTES_STATUTS_TOUS));
// re-abonne' l'auteur aux listes demandees
if(is_array($list) && count($list)) {
if(spiplistes_abonnements_ajouter($id_auteur, $list) !== false) {
$message_formulaire = _T('spiplistes:abonnement_modifie');
}
}
spiplistes_format_abo_modifier($id_auteur, $format);
if($format != $prev_format) {
// affichage des modifs
if($format == 'non')
{
$message_formulaire = _T('spiplistes:desabonnement_valid').": ".$email;
}
else
{
$message_formulaire = _T('spiplistes:abonnement_modifie');
$message_formulaire .= "<p>"._T('spiplistes:abonnement_nouveau_format').$format."<br />";
$message_ok = _T('spiplistes:abonnement_modifie');
}
}
// detruire le cookie perso
//spip_query("UPDATE spip_auteurs SET cookie_oubli='' WHERE cookie_oubli =".sql_quote($d));
spiplistes_auteurs_cookie_oubli_updateq('', $d, $true);
$contexte = array(
'editable' => true
, 'message_ok' => $message_ok
, 'message_formulaire' => $message_formulaire
, 'format' => $format
);
return ($contexte);
}
function spiplistes_formulaire_abonnement (
$type
, $acces_membres
, $formulaire
, $nom_site_spip
, $inscription_redacteur
, $inscription_visiteur
) {
$mail_inscription_ = trim(strtolower(_request('mail_inscription_')));
$nom_inscription_ = trim(_request('nom_inscription_'));
$type_abo = _request('suppl_abo') ;
$listes_demande = _request('list');
$desabo = ($type_abo == 'non') ? 'oui' : 'non';
$adresse_site = $GLOBALS['meta']['adresse_site'];
$reponse_formulaire = '';
$email_a_envoyer = $mode_modifier = $sql_where = false;
$abonne = array();
// traiter d'abord si retour de mail lien cookie
$d = _request('d');
if(!empty($d)) {
$sql_where = array(
'cookie_oubli='.sql_quote($d)
, 'statut<>'.sql_quote('5poubelle')
, 'pass<>'.sql_quote('')
);
}
// ou si identifie'
else if($connect_id_auteur = intval($GLOBALS['auteur_session']['id_auteur']))
{
$sql_where = array("id_auteur=$connect_id_auteur");
}
if($sql_where) {
// cherche les coordonnees de l'abonne'
$sql_select = 'id_auteur,statut,nom,email,cookie_oubli';
$sql_result = sql_select(
$sql_select
, 'spip_auteurs'
, $sql_where
, '', '', 1
);
if($row = sql_fetch($sql_result)) {
foreach(explode(',', $sql_select) as $key) {
$abonne[$key] = $row[$key];
}
}
$abonne['format'] = spiplistes_format_abo_demande($abonne['id_auteur']);
}
// si identifie' par cookie ou login... effectuer les modifications demandees
if(count($abonne)) {
// toujours rester en mode modif pour permettre la correction
$mode_modifier = 'oui';
if($desabo == 'oui')
{
spiplistes_format_abo_modifier($abonne['id_auteur']);
$reponse_formulaire = _T('spiplistes:vous_etes_desabonne');
$email_a_envoyer = true;
}
else if($listes_demande)
{
//spiplistes_debug_log("demande modification abonnements listes " . implode(",", $listes_demande));
if(is_array($listes_demande) && count($listes_demande))
{
$listes_ajoutees = spiplistes_abonnements_ajouter($abonne['id_auteur']
, array_map('intval', $listes_demande)
);
$curr_abos_auteur = spiplistes_abonnements_listes_auteur($abonne['id_auteur']);
foreach($curr_abos_auteur as $id_liste) {
if(!in_array($id_liste, $listes_demande)) {
spiplistes_abonnements_auteur_desabonner($abonne['id_auteur']
, $id_liste
);
}
}
}
// modifier le format de reception ?
if(spiplistes_format_valide($type_abo) && ($type_abo != $abonne['format']))
{
spiplistes_format_abo_modifier($abonne['id_auteur'], $abonne['format'] = $type_abo);
//$abonne['ids_abos'] = spiplistes_abonnements_listes_auteur($abonne['id_auteur']);
}
$reponse_formulaire = _T('spiplistes:demande_enregistree_retour_mail');
$email_a_envoyer = true;
}
else
{
//spiplistes_debug_log('pas de demande, afficher formulaire de modif au complet');
$reponse_formulaire = ''
. '<span class="nom">' . $abonne['nom'] . "</span>\n"
. '<span class="souhait">' . _T('spiplistes:effectuez_modif_validez', array('s'=>$abonne['nom'])). "</span>\n"
;
}
$id_abonne = $abonne['id_auteur'];
$objet_email = _T('spiplistes:votre_abo_listes');
$contexte = array('titre' => $objet_email);
}
else // non identifie' ? gestion par cookie_oubli.
{
$texte_intro = _T('form_forum_message_auto') . '<br /><br />'._T('spiplistes:bonjour') . "<br />\n";
$abonne = array('email' => email_valide($mail_inscription_));
if($abonne['email'])
{
// si l'abonne existe deja mais pas d'action demandee,
// affiche formulaire complet
//if($row = sql_fetch(
if ($row =
spiplistes_auteurs_auteur_select ('id_auteur,login,nom,statut,lang', 'email='.sql_quote($abonne['email']))
) {
$abonne['id_auteur'] = intval($row['id_auteur']);
$abonne['statut'] = $row['statut'];
$abonne['login'] = $row['login'];
$abonne['nom'] = $row['nom'];
$abonne['lang'] = $row['lang'];
$abonne['format'] =
($f = spiplistes_format_abo_demande($abonne['id_auteur']))
? $f
: 'texte'
;
if($abonne['statut'] == '5poubelle')
{
$reponse_formulaire = _T('form_forum_access_refuse');
}
// si encore nouveau, c'est qu'il ne s'est jamais identifie'
else if($abonne['statut'] == 'nouveau')
{
// le supprimer. Il sera re-cree plus loin
spiplistes_auteurs_auteur_delete('id_auteur='.sql_quote($abonne['id_auteur']));
$abonne['id_auteur'] = false;
}
else {
// demande de modifier l'abonnement ? envoie le cookie de relance par mail
spiplistes_auteurs_cookie_oubli_updateq($abonne['cookie_oubli'] = creer_uniqid(), $abonne['email']);
$objet_email = _T('spiplistes:abonnement_titre_mail');
$texte_email = spiplistes_texte_inventaire_abos($abonne['id_auteur'], $type_abo, $nom_site_spip);
$contexte = array('titre' => $objet_email);
$id_abonne = $abonne['id_auteur'];
}
}
// l'adresse mail n'existe pas dans la base.
else
{
$abonne['login'] = spiplistes_login_from_email($abonne['email']);
$abonne['nom'] =
(($acces_membres == 'non') || empty($nom_inscription_))
? ucfirst($abonne['login'])
: $nom_inscription_
;
// ajouter l'abonne
$pass = creer_pass_aleatoire(8, $abonne['email']);
$abonne['zepass'] = $pass;
$abonne['mdpass'] = md5($pass);
$abonne['htpass'] = generer_htpass($pass);
$abonne['cookie_oubli'] = creer_uniqid();
$abonne['statut'] = ($inscription_redacteur == 'oui') ? 'nouveau' : '6forum';
// format d'envoi par defaut pour le premier envoi de confirmation
$abonne['format'] = 'texte';
// creation du compte ...
if($id_abonne = spiplistes_auteurs_auteur_insertq(
array(
'nom' => $abonne['nom']
, 'email' => $abonne['email']
, 'login' => $abonne['login']
, 'pass' => $abonne['mdpass']
, 'statut' => $abonne['statut']
, 'htpass' => $abonne['htpass']
, 'cookie_oubli' => $abonne['cookie_oubli']
)
)) {
// creation .htpasswd & LDAP si besoin systeme
ecrire_acces();
// premier format de reception par defaut
spiplistes_format_abo_modifier($id_abonne, $abonne['format']);
}
$objet_email = _T('spiplistes:confirmation_inscription');
$contexte = array(
'titre' => $objet_email
, 'nouvel_inscription' => 'oui'
, 'inscription_redacteur' => $inscription_redacteur
, 'inscription_visiteur' => $inscription_visiteur
);
}
$email_a_envoyer = true;
}
else if(!empty($mail_inscription_)) {
//Non email o non valida
return(array(true, _T('spiplistes:erreur_adresse'), $mode_modifier, false));
}
}
if($id_abonne && $email_a_envoyer) {
$abonne['ids_abos'] = spiplistes_abonnements_listes_auteur($abonne['id_auteur']);
$abonne['format'] = spiplistes_format_valide($abonne['format']);
$email_a_envoyer = spiplistes_preparer_message(
($objet_email = "[$nom_site_spip] " . $objet_email)
, spiplistes_patron_message()
, array_merge($contexte, $abonne)
);
if(
spiplistes_envoyer_mail(
$abonne['email']
, $objet_email
, $email_a_envoyer
, false
, ''
, $abonne['format']
)
) {
$reponse_formulaire =
($acces_membres == 'oui')
? _T('form_forum_identifiant_mail')
: _T('spiplistes:demande_enregistree_retour_mail')
;
}
else {
$reponse_formulaire = _T('form_forum_probleme_mail');
}
}
return(array(true, $reponse_formulaire, $mode_modifier, $abonne));
} // end spiplistes_formulaire_abonnement()
function spiplistes_listes_liste_creer ($statut, $lang, $titre, $texte, $pied_page) {
global $connect_id_auteur;
if($id_liste = sql_insertq('spip_listes', array(
'statut' => $statut
, 'lang' => $lang
, 'titre' => $titre
, 'texte' => $texte
, 'pied_page' => $pied_page
)
)
) {
$id_liste = intval($id_liste);
$id_auteur = intval($connect_id_auteur);
spiplistes_mod_listes_supprimer("tous", $id_liste);
spiplistes_mod_listes_ajouter($id_auteur, $id_liste);
spiplistes_abonnements_auteur_desabonner("tous", $id_liste);
spiplistes_abonnements_ajouter($id_auteur, $id_liste);
return($id_liste);
}
return(false);
}
function spiplistes_auteur_abonnement_details ($id_auteur, $auteur_statut, $email) {
include_spip("inc/spiplistes_api");
include_spip("inc/spiplistes_api_presentation");
global $connect_statut
, $connect_toutes_rubriques
, $connect_id_auteur
;
$result = "";
$flag_editable = (
(($connect_statut == '0minirezo') && $connect_toutes_rubriques)
|| ($connect_id_auteur == $id_auteur)
);
if($flag_editable) {
// recupere la liste des abonnements disponibles
$sql_where = spiplistes_listes_sql_where_or(_SPIPLISTES_LISTES_STATUTS_PERIODIQUES)
. " OR statut=".sql_quote(_SPIPLISTES_LIST_PUBLIC);
// les auteurs ont droit aux listes privees (internes)
if(($auteur_statut == '1comite') || ($auteur_statut == '0minirezo')) {
$sql_where .= " OR statut=".sql_quote(_SPIPLISTES_LIST_PRIVATE);
}
$sql_result = sql_select(
array('id_liste','titre','texte','date','statut')
, "spip_listes"
, $sql_where
, ''
, array("titre ASC")
);
$nb_listes_dispo = sql_count($sql_result);
//spiplistes_log(gettype($nb_listes_dispo).":".$nb_listes_dispo);
// si liste disponible, affiche formulaire
if($sql_result && $nb_listes_dispo) {
// recupere la liste des listes
$listes = array();
while($row = sql_fetch($sql_result)) {
$texte = propre($row['texte']);
if(strlen($legend = textebrut($texte)) > 40) {
$texte = couper($texte, 40);
}
$texte = strip_tags($texte, '<strong>');
$listes[] = array(
'id_liste' => intval($row['id_liste'])
, 'titre' => $row['titre']
, 'texte' => $texte
, 'date' => $row['date']
, 'statut' => $row['statut']
, 'legend' => $legend
);
} // end while
// si retour de formulaire, ajoute/retire les abonnements
if(_request('btn_abonnements_valider')) {
$abos_set = _request('abos_set');
$abo_ajoute = array();
// liste des abonnements de id_auteur
$auteur_abos_current_list = spiplistes_abonnements_listes_auteur($id_auteur);
// ajoute/retire les abonnements desires
if(count($abos_set)) {
// Abonnements ?
foreach($abos_set as $value) {
if(!in_array($value, $auteur_abos_current_list)) {
$abo_ajoute[] = $value;
}
}
if(count($abo_ajoute)) {
spiplistes_abonnements_ajouter($id_auteur, $abo_ajoute);
}
// Desabonnements ?
foreach($auteur_abos_current_list as $value) {
if(!in_array($value, $abos_set)) {
spiplistes_abonnements_auteur_desabonner($id_auteur, $value);
}
}
}
// desabonne de tout
else {
if(spiplistes_abonnements_auteur_desabonner($id_auteur, "toutes") === false) {
$result .= spiplistes_boite_alerte(_T('spiplistes:Erreur_sur_la_base'), true);
}
}
} // end if
// si retour de formulaire, modifie le format de reception
if($abo_format = _request('abo_format')) {
spiplistes_format_abo_modifier($id_auteur, $abo_format);
}
// recupere le format d'abonnement de id_auteur
$abo_format = spiplistes_format_abo_demande($id_auteur);
// recupere la liste ou auteur est abonne
$auteur_abos_current_list = spiplistes_abonnements_listes_auteur($id_auteur);
$bloc_visible = _request('btn_abonnements_valider');
$debut_block = ($bloc_visible ? "spiplistes_debut_block_visible" : "spiplistes_debut_block_invisible");
$result .= ""
. "<!-- formulaire abonnement spiplistes -->\n"
. "<a name='abonnement'></a>\n"
. debut_cadre_enfonce(_DIR_PLUGIN_SPIPLISTES_IMG_PACK."courriers_listes-24.png"
, true, '', _T('spiplistes:listes_de_diffusion_'))
. spiplistes_bouton_block_depliable(
_T('spiplistes:abonnements_aux_courriers')
, $bloc_visible
, "abos_block")
. "<div class='verdana2'>"
;
if($n = count($auteur_abos_current_list)) {
$result .= $n."/"
. spiplistes_nb_listes_str_get ($nb_listes_dispo)
. ". "
. _T('spiplistes:format_de_reception')." : "
. (
(in_array($abo_format, array('html', 'texte')))
? _T('spiplistes:'.$abo_format)
: "<"._T('spiplistes:aucun').">"
)
;
} else {
$result .= _T('spiplistes:Sans_abonnement');
}
$result .= ""
. "</div>\n"
. $debut_block("abos_block")
. "<form action='".generer_url_ecrire("auteur_infos", "id_auteur=$id_auteur")."' method='post' style='margin-bottom:0;' name='abos_formulaire'>\n"
. debut_cadre_formulaire("", true)
. "\n<p class='verdana2' style='margin-top:0;margin-bottom:0;'>"
. (
($abo_format!='html' && $abo_format!='texte')
? _T('spiplistes:Alert_abonnement_sans_format')
: _T('spiplistes:vous_etes_abonne_aux_listes_selectionnees_').":"
)
. "</p>\n"
//
. "<!-- liste des abonnements -->\n"
. "<ul class='liste-listes'>\n"
;
foreach($listes as $key=>$value) {
$id_liste = $value['id_liste'];
$auteur_est_abonne = in_array($id_liste, $auteur_abos_current_list);
$checked = $auteur_est_abonne ? "checked='checked'" : "";
$label = $auteur_est_abonne ? "Arreter_abonnement_a" : "Abonner_a";
$label = _T("spiplistes:".$label)." ".$value['titre'];
$prochain_envoi =
($value['date'] > 0)
? _T('spiplistes:Prochain_envoi_').": <span style='font-weight:bold;'>".affdate_heure($value['date'])."</span>"
: _T('spiplistes:envoi_non_programme')
;
$result .= ""
. "<li>\n"
. "<label>\n"
. "<input name='abos_set[]' type='checkbox' value='$id_liste' title=\"$label\" $checked />\n"
. spiplistes_bullet_titre_liste('puce', $value['statut'], '', true)
. "<span title=\"".$value['legend']."\">\n"
. "<span class='titre'>".typo($value['titre'])."</span> \n"
. "<span class='description'>".typo($value['texte'])." </span>\n"
. "<span class='periodicite'>($prochain_envoi)</span>\n"
. "</span>\n"
. "</label></li>\n"
;
}
$result .= ""
. "</ul>\n"
. "<!-- fin liste des abonnements -->\n"
. fin_cadre_formulaire(true)
//
// selection du format de reception
. debut_cadre_formulaire("margin-top:1ex", true)
. ((empty($abo_format) || ($abo_format=="non"))
? "<p>"._T('spiplistes:Format_obligatoire_pour_diffusion')."</p>" : "" )
. _T('spiplistes:format_de_reception')
. "<ul class='liste-format'>\n"
;
$checked = ($abo_format=="html" ? "checked='checked'" : "");
$result .= ""
. "<li style='width:50%;float:left;'>\n"
. " <input type='radio' name='abo_format' value='html' id='format_rcpt_html' title='"._T('spiplistes:html')."' $checked />"
. " <label for='format_rcpt_html'>"._T('spiplistes:version_html')."</label></li>\n"
;
$checked = ($abo_format=="texte" ? "checked='checked'" : "");
$result .= ""
. "<li>\n"
. " <input type='radio' name='abo_format' value='texte' id='format_rcpt_texte' title='"._T('spiplistes:texte')."' $checked />"
. " <label for='format_rcpt_texte'>"._T('spiplistes:version_texte')."</label></li>\n"
. "</ul>\n"
. fin_cadre_formulaire(true)
;
if(spiplistes_format_valide($abo_format) && ($abo_format!="non")) {
$result .= ""
. debut_cadre_formulaire("margin-top:1ex", true)
. "<ul class='liste-format-desabo'>\n"
. "<li>\n"
. spiplistes_form_input_radio('abo_format', 'non', _T('spiplistes:Suspendre_abonnements')
, false, true, false)
. "</li>\n"
. "</ul>\n"
. fin_cadre_formulaire(true)
;
}
$result .= ""
//
. "<div style='text-align:right;margin-top:1ex;'><input type='submit' name='btn_abonnements_valider' "
. " value='"._T('spiplistes:Valider_abonnement')."' class='fondo' /></div>\n"
. "</form>\n"
. fin_block()
. fin_cadre_enfonce(true)
;
}
}
return($result);
}
function formulaires_gestion_abonnement_traiter_dist($id_liste='') {
//spiplistes_debug_log('formulaires_gestion_abonnement_traiter_dist()');
$d = _request('d');
$listes = _request('listes');
$format = _request('suppl_abo');
$stop = intval(_request('stop'));
if ($auteur = auteur_cookie_ou_session($d))
{
$id_auteur = $auteur['id_auteur'];
$email = $auteur['email'];
// la liste des abonnements en cours
// pour cet auteur
$mes_abos = spiplistes_abonnements_listes_auteur ($id_auteur, true);
// demander de stopper une inscription ?
if ($stop > 0)
{
$id_liste = $stop;
if (isset ($mes_abos[$id_liste]))
{
spiplistes_abonnements_auteur_desabonner ($id_auteur, $id_liste);
$contexte = array(
'message_ok' => _T('spiplistes:vous_etes_desinscrit')
);
}
}
else
{
$prev_format = spiplistes_format_abo_demande($id_auteur);
$listes_souhaitees =
(is_array($listes) && count($listes))
? $listes
: array()
;
if (count ($listes_souhaitees))
{
$listes_souhaitees = array_flip ($listes_souhaitees);
// abonner aux listes demandées
foreach (array_keys($listes_souhaitees) as $id_liste)
{
if (!isset($mes_abos[$id_liste]))
{
spiplistes_abonnements_ajouter ($id_auteur, $id_liste);
$mes_abos[$id_liste] = '';
}
}
// désabonner les listes non souhaitées
foreach (array_keys($mes_abos) as $id_liste)
{
if (!isset ($listes_souhaitees[$id_liste]))
{
spiplistes_abonnements_auteur_desabonner ($id_auteur, $id_liste);
}
}
// abonner aux listes demandées,
// si pas déjà abonné
foreach (array_keys($listes_souhaitees) as $id_liste)
{
if (!isset ($mes_abos[$id_liste]))
{
if(spiplistes_abonnements_ajouter($id_auteur, $id_liste) !== false)
{
// @todo a ameliorer, style une ligne de confirmation par liste ?
$message_ok = _T('spiplistes:abonnement_modifie');
}
}
}
}
else if (count ($mes_abos))
{
// tout est déselectionné ?
// supprimer tout les abonnements !
spiplistes_abonnements_auteur_desabonner ($id_auteur, 'toutes');
$mes_abos = array();
}
if($format != $prev_format)
{
if ($format == 'non')
{
if (count ($mes_abos))
{
spiplistes_abonnements_auteur_desabonner ($id_auteur, 'toutes');
}
$message_ok = _T('spiplistes:desabonnement_valid').' : '.$email;
}
else {
spiplistes_format_abo_modifier($id_auteur, $format);
$message_ok = _T('spiplistes:abonnement_modifie');
$message_ok .= '<br />'._T('spiplistes:abonnement_nouveau_format').$format;
}
}
spiplistes_auteurs_cookie_oubli_updateq ('', $d, $true);
$contexte = array(
'editable' => true,
'message_ok' => $message_ok,
'format' => $format
);
}
}
return ($contexte);
}
