function couteau_suisse_install($action){
//echo "<br>INSTALL : $action";
static $ok = 0;
if(defined('_LOG_CS')) cs_log("couteau_suisse_install($action)");
include_spip('inc/meta');
include_spip('inc/plugin');
$t = plugin_get_infos('couteau_suisse');
switch ($action){
case 'test':
// affichage d'un lien ici, puisque le pipeline 'affiche_gauche' n'est pas pris en compte dans 'admin_plugin'...
if(!$ok && _request('exec') == 'admin_plugin') {
if(!defined('_SPIP19300')) echo '<br />';
include_spip('inc/presentation');
echo debut_cadre_enfonce('', true),
icone_horizontale(_T('couteau:titre'), generer_url_ecrire('admin_couteau_suisse'), find_in_path('img/couteau-24.gif'), '', false),
fin_cadre_enfonce(true);
$ok++;
}
return isset($GLOBALS['meta']['couteau_suisse_base_version'])
AND ($GLOBALS['meta']['couteau_suisse_base_version']>=$t['version_base'])
AND isset($GLOBALS['meta']['tweaks_actifs']);
break;
case 'install':
couteau_suisse_upgrade('couteau_suisse_base_version',$t['version_base']);
break;
case 'uninstall':
couteau_suisse_vider_tables('couteau_suisse_base_version');
break;
}
}
function menu_admin() {
echo debut_cadre_enfonce(_DIR_IMG_DW2."configure.gif",true);
echo "<div class='verdana2' style='padding:4px;'><b>"._T('rmc:conf')."<br />";
pointe_page(array("rec_mc"), _T('rmc:conf'));
pointe_page(array("cfg&cfg=Recherche%20multicritere"), _T('rmc:conf_public'));
echo "</b></div>";
echo fin_cadre_enfonce(true);
}
/**
* Rajoute à gauche de la page d'admin des plugins un lien vers
* la page de CFG
*
* @param Array $flux
* @return Array
*/
function cfg_affiche_gauche($flux){
if ($flux['args']['exec']=='admin_plugin'){
$flux['data'] =
debut_cadre_enfonce('',true)
. icone_horizontale('CFG – '._T('configuration'), generer_url_ecrire('cfg'), _DIR_PLUGIN_CFG.'cfg-22.png', '', false)
. fin_cadre_enfonce(true)
. $flux['data'];
}
return $flux;
}
function inc_editer_mots_dist($objet, $id_objet, $cherche_mot, $select_groupe, $flag, $visible = false, $url_base='') {
if ($GLOBALS['meta']["articles_mots"] == 'non') return '';
if (!preg_match('/^[0-9, ]*$/', $select_groupe)) return '';
$trouver_table = charger_fonction('trouver_table', 'base');
$nom = table_objet($objet);
$desc = $trouver_table($nom);
$table_id = @$desc['key']["PRIMARY KEY"];
$reponse = ($flag AND $cherche_mot)
? chercher_inserer_mot($cherche_mot, $select_groupe, $objet, $id_objet, $nom, $table_id, $url_base)
: '';
list($liste, $mots) = afficher_mots_cles($flag, $objet, $id_objet, $nom, $table_id, $url_base);
$aff =false;
$bouton = _T('titre_mots_cles').aide ("artmots");
if ($liste)
$aff = true;
if ($flag) { // si droit de modif donner le formulaire
$visible = ($visible OR $cherche_mot OR ($flag === 'ajax'));
list($visible, $res) = formulaire_mots_cles($id_objet, $mots, $nom, $table_id, $url_base, $visible, $objet);
if ($res) {
$liste .= debut_block_depliable($visible,"lesmots")
. $res
. creer_mot($nom, $id_objet, $table_id, $url_base, $cherche_mot, $select_groupe)
. fin_block();
$bouton = bouton_block_depliable($bouton, $visible,"lesmots");
$aff = true;
}
}
if (!$aff)
return '';
$res = debut_cadre_enfonce("mot-cle-24.gif", true, "", $bouton)
. $reponse
. $liste
. fin_cadre_enfonce(true);
return ajax_action_greffe("editer_mots", $id_objet, $res);
}
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 exec_mots_tous_dist()
{
global $spip_lang, $spip_lang_left, $spip_lang_right;
$conf_mot = intval(_request('conf_mot'));
$son_groupe = intval(_request('son_groupe'));
pipeline('exec_init',array('args'=>array('exec'=>'mots_tous'),'data'=>''));
$commencer_page = charger_fonction('commencer_page', 'inc');
echo $commencer_page(_T('titre_page_mots_tous'), "naviguer", "mots");
echo debut_gauche('', true);
echo pipeline('affiche_gauche',array('args'=>array('exec'=>'mots_tous'),'data'=>''));
if (autoriser('creer','groupemots') AND !$conf_mot){
$out = "";
$result = sql_select("*, ".sql_multi ("titre", "$spip_lang"), "spip_groupes_mots", "", "", "multi");
while ($row_groupes = sql_fetch($result)) {
$id_groupe = $row_groupes['id_groupe'];
$titre_groupe = typo($row_groupes['titre']);
$out .= "<li class='item'><a href='#mots_tous-$id_groupe' onclick='$(\"div.mots_tous\").hide().filter(\"#mots_tous-$id_groupe\").show();return false;'>$titre_groupe</a></li>";
}
if (strlen($out))
$out =
"<a class='verdana1' href='#' onclick='$(\"div.mots_tous\").show();return false;'>"._T('icone_voir_tous_mots_cles')."</a>"
."<ul class='liste-items raccourcis_rapides'>"
.$out
."</ul>"
;
echo debut_boite_info(true) . $out . fin_boite_info(true);
$res = icone_horizontale(_T('icone_creation_groupe_mots'), generer_url_ecrire("mots_type","new=oui"), "groupe-mot-24.gif", "creer.gif",false);
echo bloc_des_raccourcis($res);
}
echo creer_colonne_droite('', true);
echo pipeline('affiche_droite',array('args'=>array('exec'=>'mots_tous'),'data'=>''));
echo debut_droite('', true);
echo gros_titre(_T('titre_mots_tous'),'', false);
if (autoriser('creer','groupemots')) {
echo typo(_T('info_creation_mots_cles')) . aide ("mots") ;
}
echo "<br /><br />";
//
// On boucle d'abord sur les groupes de mots
//
$result = sql_select("*, ".sql_multi ("titre", "$spip_lang"), "spip_groupes_mots", "", "", "multi");
while ($row_groupes = sql_fetch($result)) {
if (autoriser('voir','groupemots',$row_groupes['id_groupe'])){
$id_groupe = $row_groupes['id_groupe'];
$titre_groupe = typo($row_groupes['titre']);
$descriptif = $row_groupes['descriptif'];
$texte = $row_groupes['texte'];
$unseul = $row_groupes['unseul'];
$obligatoire = $row_groupes['obligatoire'];
$tables_liees = $row_groupes['tables_liees'];
$acces_minirezo = $row_groupes['minirezo'];
$acces_comite = $row_groupes['comite'];
$acces_forum = $row_groupes['forum'];
// Afficher le titre du groupe
echo "<div id='mots_tous-$id_groupe' class='mots_tous'>";
echo debut_cadre_enfonce("groupe-mot-24.gif", true, '', $titre_groupe);
// Affichage des options du groupe (types d'elements, permissions...)
$res = '';
$tables_liees = explode(',',$tables_liees);
$libelles = array('articles'=>'info_articles_2','breves'=>'info_breves_02','rubriques'=>'info_rubriques','syndic'=>'icone_sites_references');
$libelles = pipeline('libelle_association_mots',$libelles);
foreach($tables_liees as $table)
if (strlen($table))
$res .= "> " . _T(isset($libelles[$table])?$libelles[$table]:"$table:info_$table") . " ";
if ($unseul == "oui" OR $obligatoire == "oui") $res .= "<br />";
if ($unseul == "oui") $res .= "> "._T('info_un_mot')." ";
if ($obligatoire == "oui") $res .= "> "._T('info_groupe_important')." ";
$res .= "<br />";
if ($acces_minirezo == "oui") $res .= "> "._T('info_administrateurs')." ";
if ($acces_comite == "oui") $res .= "> "._T('info_redacteurs')." ";
if ($acces_forum == "oui") $res .= "> "._T('info_visiteurs_02')." ";
echo "<span class='verdana1 spip_x-small'>", $res, "</span>";
if (strlen($descriptif)) {
echo "<div style='border: 1px dashed #aaa; background-color: #fff;' class='verdana1 spip_x-small '>", propre("{{"._T('info_descriptif')."}} ".$descriptif), " </div>";
}
if (strlen($texte)>0){
echo "<div class='verdana1 spip_small'>", propre($texte), "</div>";
}
//
// Afficher les mots-cles du groupe
//
$groupe = sql_countsel("spip_mots", "id_groupe=$id_groupe");
echo "<div\nid='editer_mots-$id_groupe' style='position: relative;'>";
// Preliminaire: confirmation de suppression d'un mot lie a qqch
// (cf fin de afficher_groupe_mots_boucle executee a l'appel precedent)
if ($conf_mot AND $son_groupe==$id_groupe) {
echo confirmer_mot($conf_mot, $row_groupes, $groupe);
}
if ($groupe) {
$grouper_mots = charger_fonction('grouper_mots', 'inc');
echo $grouper_mots($id_groupe, $groupe);
}
echo "</div>";
if (autoriser('modifier','groupemots',$id_groupe)){
echo "\n<table cellpadding='0' cellspacing='0' border='0' width='100%'>";
echo "<tr>";
echo "<td>";
echo icone_inline(_T('icone_modif_groupe_mots'), generer_url_ecrire("mots_type","id_groupe=$id_groupe"), "groupe-mot-24.gif", "edit.gif", $spip_lang_left);
echo "</td>";
echo "\n<td id='editer_mots-$id_groupe-supprimer'",
(!$groupe ? '' : " style='visibility: hidden'"),
">";
echo icone_inline(_T('icone_supprimer_groupe_mots'), redirige_action_auteur('instituer_groupe_mots', "-$id_groupe", "mots_tous"), "groupe-mot-24.gif", "supprimer.gif", $spip_lang_left);
echo "</td>";
echo "<td>";
echo icone_inline(_T('icone_creation_mots_cles'), generer_url_ecrire("mots_edit","new=oui&id_groupe=$id_groupe&redirect=" . generer_url_retour('mots_tous', "#mots_tous-$id_groupe")), "mot-cle-24.gif", "creer.gif", $spip_lang_right);
echo "</td></tr></table>";
}
echo fin_cadre_enfonce(true);
echo "</div>";
}
}
echo pipeline('affiche_milieu',array('args'=>array('exec'=>'mots_tous'),'data'=>''));
echo fin_gauche(), fin_page();
}
/**
* Crée le code HTML de la liste des librairies présentes
*
* @uses liste_librairies()
*
* @return string Code HTML
*/
function afficher_librairies()
{
if (!($libs = liste_librairies())) {
return '';
}
ksort($libs);
$res = debut_cadre_enfonce('', true, '', _T('plugin_librairies_installees'));
$res .= '<dl>';
foreach ($libs as $lib => $rep) {
$res .= "<dt>{$lib}</dt><dd>" . joli_repertoire($rep) . "</dd>\n";
}
$res .= '</dl>';
$res .= fin_cadre_enfonce(true);
return $res;
}
function exec_spiplistes_liste_gerer () {
include_spip('inc/autoriser');
include_spip('inc/mots');
include_spip('inc/lang');
include_spip('inc/editer_auteurs');
include_spip('base/spiplistes_tables');
include_spip('inc/spiplistes_api');
include_spip('inc/spiplistes_api_presentation');
include_spip('inc/spiplistes_dater_envoi');
include_spip('inc/spiplistes_naviguer_paniers');
include_spip('inc/spiplistes_listes_selectionner_auteur');
global $meta
, $connect_statut
, $connect_toutes_rubriques
, $connect_id_auteur
, $spip_lang_left
, $spip_lang_right
, $couleur_claire
;
// initialise les variables postees par le formulaire
foreach(array(
'new' // nouvelle liste si 'oui'
, 'id_liste'// si modif dans l'editeur
, 'btn_liste_edit', 'titre', 'texte', 'pied_page' // renvoyes par l'editeur
, 'btn_modifier_diffusion', 'changer_lang', 'statut' // local
, 'btn_modifier_replyto', 'email_envoi' // local
, 'btn_modifier_courrier_auto', 'message_auto' // local
, 'auto_chrono', 'auto_weekly', 'auto_mois'
, 'titre_message', 'patron', 'periode', 'envoyer_maintenant'
, 'jour', 'mois', 'annee', 'heure', 'minute'
, 'btn_patron_pied', 'btn_grand_patron' // boites gauches
, 'btn_valider_forcer_abos', 'forcer_abo', 'forcer_format_abo', 'forcer_format_reception'
, 'btn_supprimer_liste' //local
) as $key) {
$$key = _request($key);
}
foreach(array('id_liste', 'periode') as $key) {
$$key = intval($$key);
}
foreach(array('titre', 'texte', 'pied_page') as $key) {
$$key = trim(corriger_caracteres($$key));
}
$lang = $changer_lang;
$cherche_auteur = _request('cherche_auteur');
$debut = _request('debut');
$envoyer_maintenant = ($envoyer_maintenant == 'oui');
$boite_pour_confirmer_envoi_maintenant =
$grosse_boite_moderateurs =
$message_erreur =
$page_result = "";
if(!$id_liste)
{
//////////////////////////////////////////////////////
// Creer une liste
////
// admin lambda peut creer une liste
$flag_editable = ($connect_statut == "0minirezo");
if ($btn_liste_edit && ($new=='oui')) {
if ($titre == '') {
$titre = _T('spiplistes:liste_sans_titre');
}
$pied_page = _SPIPLISTES_PATRON_PIED_DEFAUT;
if($id_liste = spiplistes_listes_liste_creer(_SPIPLISTES_LIST_PRIVATE, $GLOBALS['spip_lang']
, $titre, $texte, $pied_page)) {
spiplistes_log("id_liste #$id_liste added by id_auteur #$connect_id_auteur");
}
}
}
else if($id_liste > 0)
{
//////////////////////////////////////////////////////
// Modifier une liste
////
// les admins toutes rubriques et le moderateur seuls peuvent modifier la liste
$flag_editable = autoriser('moderer', 'liste', $id_liste);
if($flag_editable)
{
// Recupere les donnees de la liste courante pour optimiser l'update
$sql_select = "statut,titre,date,lang";
$sql_result = sql_select($sql_select, "spip_listes", "id_liste=".sql_quote($id_liste), "", "", "1");
if($row = sql_fetch($sql_result)) {
foreach(explode(",", $sql_select) as $key) {
$current_liste[$key] = $row[$key];
}
}
///////////////////////////////////
// Les modifications (sql_upadteq)
// A noter, ne pas preparer les valeurs par sql_quote()
// sql_upadteq() s'en occupe
$sql_champs = array();
// Retour de l'editeur ?
if($btn_liste_edit) {
$titre = corriger_caracteres($titre);
$texte = corriger_caracteres($texte);
if(empty($titre)) {
$titre = filtrer_entites(_T('spiplistes:Nouvelle_liste_de_diffusion'));
}
$sql_champs['titre'] = $titre;
$sql_champs['texte'] = $texte;
}
// Modifier le grand patron ?
// a partir de 2.0049, le patron de pied est construit par la meleuse
// afin de permettre _texte et multilingue
if($btn_grand_patron && $patron) {
$sql_champs['patron'] = $patron;
}
// Modifier patron de pied ?
if($btn_patron_pied && $patron) {
$sql_champs['pied_page'] = $patron;
}
// Modifier diffusion ?
if($btn_modifier_diffusion)
{
$current_statut = ($statut)
? $statut
: $current_liste['statut']
;
spiplistes_debug_log ('Modification diffusion statut: '.$current_statut);
// Modifier le statut ?
if(in_array($statut, explode(";", _SPIPLISTES_LISTES_STATUTS_TOUS))
&& ($statut != $current_liste['statut'])
) {
spiplistes_debug_log ('Modification statut: '.$statut);
$sql_champs['statut'] = $statut;
// si la liste passe en privee, retire les invites
if($statut == _SPIPLISTES_LIST_PRIVATE) {
$auteur_statut = '6forum';
spiplistes_abonnements_auteurs_supprimer($auteur_statut);
spiplistes_log("AUTEURS ($auteur_statut) REMOVED FROM LISTE #$id_liste ($statut) BY ID_AUTEUR #$connect_id_auteur");
}
}
// Modifier la langue ?
if(!empty($lang) && ($lang!=$current_liste['lang'])) {
$sql_champs['lang'] = $lang;
}
}
// Modifier l'adresse email de reponse ?
if($btn_modifier_replyto && email_valide($email_envoi) && ($email_envoi!=$current_liste['email_envoi'])) {
$sql_champs['email_envoi'] = $email_envoi;
}
////////////////////////////////////
// Modifier message_auto ?
// bloc "courriers automatiques"
if($btn_modifier_courrier_auto)
{
$current_statut = ($statut)
? $statut
: $current_liste['statut']
;
spiplistes_debug_log ('Modification periodicite statut: '.$current_statut);
$envoyer_quand = spiplistes_formate_date_form($annee, $mois, $jour, $heure, $minute);
if(time() > strtotime($envoyer_quand)) {
// envoi dans le passe est considere comme envoyer maintenant
$envoyer_maintenant = true;
$date_depuis = $envoyer_quand;
$envoyer_quand = false;
}
// spiplistes_debug_log("nb vrais abos : ".spiplistes_listes_vrais_abos_compter($id_liste));
if($envoyer_maintenant && ($message_auto != 'non')) {
if(!spiplistes_listes_vrais_abos_compter($id_liste)) {
$boite_pour_confirmer_envoi_maintenant .=
spiplistes_boite_alerte(_T('spiplistes:boite_alerte_manque_vrais_abos'), true);
}
else {
$boite_pour_confirmer_envoi_maintenant = ""
. debut_cadre_couleur('', true)
// formulaire de confirmation envoi
. spiplistes_form_debut(generer_url_ecrire(_SPIPLISTES_EXEC_LISTES_LISTE), true)
. "<p style='text-align:center;font-weight:bold;' class='verdana2'>"
. _T('spiplistes:boite_confirmez_envoi_liste') . "</p>"
. "<input type='hidden' name='id_liste' value='$id_liste' />\n"
. spiplistes_form_bouton_valider('btn_confirmer_envoi_maintenant')
. spiplistes_form_fin(true)
. fin_cadre_couleur(true)
;
}
$date_prevue = normaliser_date(time());
}
if($message_auto == 'oui') {
$sql_champs['message_auto'] = 'oui';
$sql_champs['titre_message'] = $titre_message;
$sql_champs['date'] = (!$envoyer_maintenant) ? $envoyer_quand : '';
switch($auto_chrono) {
case 'auto_jour':
$sql_champs['statut'] =
($current_statut == _SPIPLISTES_LIST_PRIVATE)
? _SPIPLISTES_LIST_PRIV_DAILY
: _SPIPLISTES_LIST_PUB_DAILY
;
// force au minimum 1 jour
$sql_champs['periode'] = (($periode > 0) ? $periode : 1);
break;
case 'auto_hebdo':
if($auto_weekly == 'oui') {
// debut de semaine ?
$sql_champs['statut'] =
($current_statut == _SPIPLISTES_LIST_PRIVATE)
? _SPIPLISTES_LIST_PRIV_WEEKLY
: _SPIPLISTES_LIST_PUB_WEEKLY
;
// corrige la date pour le lundi de la semaine
$time = strtotime($envoyer_quand);
$time = mktime(0,0,0,date("m", $time),date("d", $time)-date("w", $time)+1,date("Y", $time));
$envoyer_quand = date("Y-m-d H:i:s", $time);
$sql_champs['date'] = $envoyer_quand;
} else {
$sql_champs['statut'] =
($current_statut == _SPIPLISTES_LIST_PRIVATE)
? _SPIPLISTES_LIST_PRIV_HEBDO
: _SPIPLISTES_LIST_PUB_HEBDO
;
}
$sql_champs['periode'] = 0;
break;
case 'auto_mensuel':
if($auto_mois == 'oui') {
// debut du mois ?
$sql_champs['statut'] =
($current_statut == _SPIPLISTES_LIST_PRIVATE)
? _SPIPLISTES_LIST_PRIV_MONTHLY
: _SPIPLISTES_LIST_PUB_MONTHLY
;
// corrige la date, 1' du mois
$envoyer_quand = substr($envoyer_quand, 0, 8)."01 00:00:00";
$sql_champs['date'] = $envoyer_quand;
} else {
$sql_champs['statut'] =
($current_statut == _SPIPLISTES_LIST_PRIVATE)
? _SPIPLISTES_LIST_PRIV_MENSUEL
: _SPIPLISTES_LIST_PUB_MENSUEL
;
}
$sql_champs['periode'] = 0;
break;
case 'auto_an':
$sql_champs['statut'] =
($current_statut == _SPIPLISTES_LIST_PRIVATE)
? _SPIPLISTES_LIST_PRIV_YEARLY
: _SPIPLISTES_LIST_PUB_YEARLY
;
$sql_champs['periode'] = 0;
break;
}
}
else if($message_auto == 'non') {
$sql_champs['message_auto'] = 'non';
$sql_champs['date'] = '';
$sql_champs['periode'] = 0;
}
} // end if($btn_modifier_courrier_auto)
// Enregistre les modifs pour cette liste
if(count($sql_champs))
{
sql_updateq('spip_listes', $sql_champs, 'id_liste='.sql_quote($id_liste).' LIMIT 1');
}
// Forcer les abonnements
if($btn_valider_forcer_abos && $forcer_abo && in_array($forcer_abo, array('tous', 'auteurs', '6forum', 'aucun'))) {
$forcer_format_reception =
(($forcer_format_abo == 'oui') && in_array($forcer_format_reception, spiplistes_formats_autorises()))
? $forcer_format_reception
: false
;
include_spip('inc/spiplistes_listes_forcer_abonnement');
if(spiplistes_listes_forcer_abonnement ($id_liste, $forcer_abo, $forcer_format_reception) === false) {
$message_erreur .= spiplistes_boite_alerte(_T('spiplistes:Forcer_abonnement_erreur'), true);
}
}
} // end if($flag_editable)
}
//////////////////////////////////////////////////////
// Recharge les donnees la liste
$sql_select_array = array('id_liste', 'titre', 'texte'
, 'titre_message', 'pied_page', 'date', 'statut', 'maj'
, 'email_envoi', 'message_auto', 'periode', 'patron', 'lang');
if($row = spiplistes_listes_liste_fetsel($id_liste, $sql_select_array)) {
foreach($sql_select_array as $key) {
// initialise les variables du resultat SQL
$$key = $row[$key];
}
}
// les supers-admins et le moderateur seuls peuvent modifier la liste
$flag_editable = autoriser('moderer', 'liste', $id_liste);
if (empty($titre_message))
{
$titre_message = $titre;
if (spiplistes_pref_lire_defaut('opt_completer_titre_nom_site', 'oui') == 'oui')
{
$titre_message .= _T('spiplistes:_de_')
. spiplistes_nom_site_texte($lang);
}
}
$nb_abonnes = spiplistes_listes_nb_abonnes_compter($id_liste);
// preparation des boutons
if($flag_editable) {
// Propose de modifier la liste
$gros_bouton_modifier =
icone (
_T('spiplistes:Modifier_cette_liste') // legende bouton
, generer_url_ecrire(_SPIPLISTES_EXEC_LISTE_EDIT,'id_liste='.$id_liste) // lien
, _DIR_PLUGIN_SPIPLISTES_IMG_PACK."reply-to-all-24.gif" // image du fond
, "edit.gif" // image de la fonction. Ici, le crayon
, '' // alignement
, false // pas echo, demande retour
)
;
// Propose de supprimer la liste
$gros_bouton_supprimer =
icone (
_T('spiplistes:Supprimer_cette_liste')
, generer_url_ecrire(_SPIPLISTES_EXEC_LISTE_GERER, "btn_supprimer_liste=$id_liste&id_liste=$id_liste")
, _DIR_PLUGIN_SPIPLISTES_IMG_PACK.'poubelle_msg.gif'
, ""
, "right"
, false
)
;
// la grosse boite des abonnes
$tri = _request('tri') ? _request('tri') : 'nom';
//
// CP-20101017: Si trop d'elligibles, ca gele.
// @todo: revoir la boite/liste des abonnes/elligibles
// En attendant ...
//if(spiplistes_auteurs_elligibles_compter() < 1000)
//{
$boite_liste_abonnes = spiplistes_listes_boite_abonnements(
$id_liste, $statut, $tri, $debut, _SPIPLISTES_EXEC_LISTE_GERER
);
//}
//else
//{
// $boite_liste_abonnes = _T('spiplistes:code_en_travaux');
//}
// @see http://www.spip-contrib.net/SPIP-Listes#comment444314
$titre_boite = _T('spiplistes:abos_cette_liste');
$legend = '<small id="legend-abos1">'
. spiplistes_nb_abonnes_liste_str_get($id_liste)
. '</small>'.PHP_EOL
;
$grosse_boite_abonnements = ''
. '<!-- boite abonnes/elligibles -->'.PHP_EOL
. debut_cadre_enfonce('auteur-24.gif', true, '', $titre_boite)
. spiplistes_bouton_block_depliable($legend
, false, md5('abonnes_liste'))
. (spiplistes_spip_est_inferieur_193() ? $legend : '')
. spiplistes_debut_block_invisible(md5('abonnes_liste'))
. debut_cadre_relief('', true)
. $boite_liste_abonnes
. fin_cadre_relief(true)
. fin_block()
. fin_cadre_enfonce(true)
. '<!-- fin boite abonnes/elligibles -->'.PHP_EOL
;
// la grosse boite des moderateurs
$boite_liste_moderateurs = spiplistes_listes_boite_moderateurs(
$id_liste, _SPIPLISTES_EXEC_LISTE_GERER, 'mods-conteneur'
);
$titre_boite = _T('spiplistes:mods_cette_liste');
$nb = spiplistes_mod_listes_compter($id_liste);
$legend = '<small>'
. spiplistes_nb_moderateurs_liste_str_get($nb)
. '</small>'.PHP_EOL
;
$grosse_boite_moderateurs = ''
. '<!-- boite moderateurs -->'.PHP_EOL
. debut_cadre_enfonce('redacteurs-24.gif', true, '', $titre_boite)
. spiplistes_bouton_block_depliable($legend
, false, md5('mods_liste'))
. (spiplistes_spip_est_inferieur_193() ? $legend : '')
. spiplistes_debut_block_invisible(md5('mods_liste'))
. debut_cadre_relief('', true)
. '<div id="mods-conteneur">'.PHP_EOL
. $boite_liste_moderateurs
. '</div>'.PHP_EOL
. fin_cadre_relief(true)
. fin_block()
. fin_cadre_enfonce(true)
. '<!-- fin boite moderateurs -->'.PHP_EOL
;
}
else {
$gros_bouton_modifier = $gros_bouton_supprimer = $grosse_boite_abonnements = '';
}
////////////////////////////////////
// PAGE CONTENU
////////////////////////////////////
$titre_page = _T('spiplistes:gestion_dune_liste');
// Permet entre autres d'ajouter les classes a la page : <body class='$rubrique $sous_rubrique'>
$rubrique = _SPIPLISTES_PREFIX;
$sous_rubrique = 'liste_gerer';
$commencer_page = charger_fonction('commencer_page', 'inc');
echo($commencer_page(_T('spiplistes:spiplistes') . ' - ' . $titre_page, $rubrique, $sous_rubrique));
// la gestion des listes de courriers est reservee aux admins
if($connect_statut != '0minirezo') {
die (spiplistes_terminer_page_non_autorisee() . fin_page());
}
$page_result .= ''
. '<br /><br /><br />' . PHP_EOL
. spiplistes_gros_titre($titre_page, '', true)
. barre_onglets($rubrique, $sous_rubrique)
. debut_gauche($rubrique, true)
. spiplistes_boite_info_id(_T('spiplistes:liste_numero'), $id_liste, true)
. spiplistes_naviguer_paniers_listes(_T('spiplistes:aller_aux_listes_'), true)
. spiplistes_boite_patron($flag_editable, $id_liste, _SPIPLISTES_EXEC_LISTE_GERER, 'btn_grand_patron'
, _SPIPLISTES_PATRONS_DIR, _T('spiplistes:Patron_grand_')
, ($patron ? $patron : '')
, $patron)
. spiplistes_boite_patron($flag_editable, $id_liste, _SPIPLISTES_EXEC_LISTE_GERER, 'btn_patron_pied'
, _SPIPLISTES_PATRONS_PIED_DIR, _T('spiplistes:Patron_de_pied_')
, ((($ii = strlen($pied_page)) > _SPIPLISTES_PATRON_FILENAMEMAX)
? _T('taille_octets',array('taille'=>$ii)) . _T('spiplistes:conseil_regenerer_pied')
: $pied_page)
, $pied_page)
. pipeline('affiche_gauche', array('args'=>array('exec'=>$sous_rubrique),'data'=>''))
//. creer_colonne_droite($rubrique, true) // spiplistes_boite_raccourcis() s'en occupe
. spiplistes_boite_raccourcis(true)
. spiplistes_boite_autocron()
. pipeline('affiche_droite', array('args'=>array('exec'=>$sous_rubrique),'data'=>''))
. debut_droite($rubrique, true)
. $message_erreur
;
changer_typo('','liste'.$id_liste);
// message alerte et demande de confirmation si supprimer liste
if(($btn_supprimer_liste > 0) && ($btn_supprimer_liste == $id_liste)) {
$page_result .= ''
. spiplistes_boite_alerte (_T('spiplistes:Attention_suppression_liste').'<br />'._T('spiplistes:Confirmez_requete'), true)
. '<form name="form_suppr_liste" id="form_suppr_liste" method="post"
action="'.generer_url_ecrire(_SPIPLISTES_EXEC_LISTES_LISTE, '').'">' . PHP_EOL
. "<div class='verdana2' style='text-align:right;'>\n"
. "<input type='hidden' name='id_liste' value='$id_liste' />\n"
. "<label>"._T('spiplistes:Confirmer_la_suppression_de_la_liste')."# $id_liste : \n"
. "<input class='fondo' type='submit' name='btn_supprimer_liste_confirme' value='"._T('bouton_valider')."' /></label>\n"
. "</div>\n"
. "</form>\n"
. "<br />\n"
;
}
$page_result .= ""
. debut_cadre_relief("", true)
. "\n<table cellpadding='0' cellspacing='0' border='0' width='100%'>\n"
. "<tr><td valign='top'>\n"
. spiplistes_gros_titre(spiplistes_bullet_titre_liste('puce', $statut, '', true)." "
. spiplistes_calculer_balise_titre(extraire_multi($titre))
, '', true)
. "</td>"
. "<td rowspan='2'>"
// le gros bouton modifier si besoin
. $gros_bouton_modifier
. "</td></tr>\n"
. "<tr><td width='100%'>\n"
. "<div align='$spip_lang_left' style='padding: 5px; border: 1px dashed #aaa; ' class='verdana1 spip_small'>\n"
. propre($texte."~")
. "</div>\n"
. "</td>\n"
. "</tr></table>\n"
;
//////////////////////////////////////////////////////
// Modifier le statut de la liste
//$email_defaut = entites_html($meta['email_webmaster']);
$email_defaut = ($m = email_valide($GLOBALS['meta']['email_defaut']))
? $m
: $GLOBALS['meta']['email_webmaster']
;
$email_envoi = ($m = email_valide($email_envoi))
? $email_envoi
: $email_defaut
;
$page_result .= ""
//. debut_cadre_relief("racine-site-24.gif", true)
. debut_cadre_relief("racine-site-24.gif", true, '', _T('spiplistes:Diffusion').spiplistes_plugin_aide(_SPIPLISTES_EXEC_AIDE, "diffusion"))
//
////////////////////////////
// Formulaire diffusion
. (
($flag_editable)
? ''
. spiplistes_form_debut(generer_url_ecrire(_SPIPLISTES_EXEC_LISTE_GERER,'id_liste='.$id_liste), true)
. '<input type="hidden" name="exec" value="listes" />' . PHP_EOL
. '<input type="hidden" name="id_liste" value="'.$id_liste.'" />' . PHP_EOL
: ''
)
. '<span class="verdana2">'
. _T('spiplistes:cette_liste_est_'
, array('s' => spiplistes_bullet_titre_liste ('puce', $statut, 'img_statut', true)))
. '</span>' . PHP_EOL
;
$sel_private = ' value="' . _SPIPLISTES_LIST_PRIVATE . '" '
. (
in_array ($statut, array(
_SPIPLISTES_LIST_PRIVATE
, _SPIPLISTES_LIST_PRIV_DAILY
, _SPIPLISTES_LIST_PRIV_HEBDO
, _SPIPLISTES_LIST_PRIV_WEEKLY
, _SPIPLISTES_LIST_PRIV_MENSUEL
, _SPIPLISTES_LIST_PRIV_MONTHLY
, _SPIPLISTES_LIST_PRIV_YEARLY
)
)
? ' selected="selected"'
: ''
)
;
$sel_publique = ' value="' . _SPIPLISTES_LIST_PUBLIC . '" '
. (
in_array ($statut, array(
_SPIPLISTES_LIST_PUBLIC
, _SPIPLISTES_LIST_PUB_DAILY
, _SPIPLISTES_LIST_PUB_HEBDO
, _SPIPLISTES_LIST_PUB_WEEKLY
, _SPIPLISTES_LIST_PUB_MENSUEL
, _SPIPLISTES_LIST_PUB_MONTHLY
, _SPIPLISTES_LIST_PUB_YEARLY
)
)
? ' selected="selected"'
: ''
)
;
$page_result .= PHP_EOL
. (
($flag_editable)
? ''
. '<select class="verdana2 fondl" name="statut" size="1" id="change_statut">' . PHP_EOL
. '<option' . $sel_private . ' style="background-color:#fff">'
. _T('spiplistes:statut_interne')
. '</option>' . PHP_EOL
. '<option' . $sel_publique . ' style="background-color:#B4E8C5">'
. _T('spiplistes:statut_publique')
. '</option>' . PHP_EOL
. '<option' . mySel(_SPIPLISTES_TRASH_LIST, $statut)
. ' style="background:url(' . _DIR_IMG_PACK.'rayures-sup.gif)">'
. _T('texte_statut_poubelle').'</option>' . PHP_EOL
. '</select>' . PHP_EOL
: '<span class="verdana2" style="font-weight:bold;">'
. spiplistes_items_get_item('alt', $statut)
. '</span>'. PHP_EOL
)
. '<div style="margin:10px 0px;">' . PHP_EOL
. (
($flag_editable && strpos($GLOBALS['meta']['langues_multilingue'], ','))
? ''
. '<label class="verdana2" for="changer_lang">'
. _T('info_multi_herit').' : </label>' . PHP_EOL
. '<select name="changer_lang" class="fondl" id="changer_lang">' . PHP_EOL
. liste_options_langues('changer_lang', $lang , _T('spiplistes:langue_'), '', '')
. '</select>' . PHP_EOL
: ''
//. "<span class='verdana2'>". _T('info_multi_herit')." : "
//. "<span class='verdana2' style='font-weight:bold;'>".traduire_nom_langue($lang)."</span>\n"
)
. '</div>' . PHP_EOL
. (
($flag_editable)
? spiplistes_form_bouton_valider('btn_modifier_diffusion')
. spiplistes_form_fin(true)
: ''
)
. fin_cadre_relief(true)
;
////////////////////////////
// Formulaire adresse email pour le reply-to
$page_result .= ''
. debut_cadre_relief(_DIR_PLUGIN_SPIPLISTES_IMG_PACK."reply_to-24.png"
, true
, ''
, _T('spiplistes:adresse_de_reponse').spiplistes_plugin_aide(_SPIPLISTES_EXEC_AIDE
, "replyto")
)
. spiplistes_form_debut(generer_url_ecrire(_SPIPLISTES_EXEC_LISTE_GERER,"id_liste=$id_liste"), true)
. "<p class='verdana2'>\n"
. _T('spiplistes:adresse_mail_retour').":<br />\n"
. (
($flag_editable)
? _T('spiplistes:adresse')."</p>\n"
. "<div style='text-align:center'>\n"
. "<input type='text' name='email_envoi' value=\"".$email_envoi."\" size='40' class='fondl' /></div>\n"
. spiplistes_form_bouton_valider('btn_modifier_replyto')
: "</p><p style='font-weight:bold;text-align:center;'>$email_envoi</p>\n"
)
. spiplistes_form_fin(true)
. fin_cadre_relief(true)
;
////////////////////////////
// Formulaire planifier un courrier automatique
$page_result .= ""
. "<a name='form-programmer' id='form-programmer'></a>\n"
. debut_cadre_relief(_DIR_PLUGIN_SPIPLISTES_IMG_PACK."stock_timer.png", true, '', _T('spiplistes:messages_auto')
. spiplistes_plugin_aide(_SPIPLISTES_EXEC_AIDE, "temporiser"))
;
$page_result .= ""
. $boite_pour_confirmer_envoi_maintenant
. spiplistes_form_debut(generer_url_ecrire(_SPIPLISTES_EXEC_LISTE_GERER,"id_liste=$id_liste")."#form-programmer", true)
. "<table border='0' cellspacing='1' cellpadding='3' width='100%'>\n"
. "<tr><td align='$spip_lang_left' class='verdana2'>\n"
;
if(empty($patron)) {
$page_result .= ""
. (
$flag_editable
? spiplistes_boite_alerte(_T('spiplistes:patron_manquant_message'), true)
: "<p class='verdana2'>" . _T('spiplistes:liste_sans_patron') . "</p>\n"
)
. "</td>\n"
. "</tr>\n"
. "<tr><td align='$spip_lang_left' class='verdana2'>\n"
;
}
if ($message_auto != "oui") {
$page_result .= "<div class='verdana2'>"._T('spiplistes:pas_denvoi_auto_programme')."</div>\n";
}
else {
$page_result .= ""
// petite ligne d'info si envoi programme
. "<p class='verdana2'>"._T('spiplistes:sujet_courrier_auto')."<br />\n"
. "<span class='spip_large'> "
. spiplistes_calculer_balise_titre(extraire_multi($titre_message))
. "</span></p>\n"
. "<p class='verdana2'>"
. spiplistes_items_get_item('alt', $statut)."<br />\n"
. (
($statut == _SPIPLISTES_LIST_PUB_MONTHLY)
? "<strong>" . spiplistes_items_get_item("tab_t", $statut) . "</strong><br />"
: ""
)
. (
($periode > 0)
? _T('spiplistes:periodicite_tous_les_n_s'
, array('n' => " <strong>".$periode."</strong> "
, 's' => spiplistes_singulier_pluriel_str_get($periode, _T('spiplistes:jour'), _T('spiplistes:jours'), false)
)
)
: ""
)
. (
(!in_array($statut, explode(";", _SPIPLISTES_LISTES_STATUTS_PERIODIQUES)))
? " <strong>"._T('spiplistes:Pas_de_periodicite')."</strong><br />"
._T('spiplistes:Ce_courrier_ne_sera_envoye_qu_une_fois')
: ""
)
. "<br />"
. (
(intval($maj))
? _T('spiplistes:Dernier_envoi_le_') . " <strong>" . affdate_heure($maj) . "</strong>"
. (
($last = round((time() - strtotime($maj)) / _SPIPLISTES_TIME_1_DAY))
? " (".spiplistes_singulier_pluriel_str_get($last, _T('spiplistes:jour'), _T('spiplistes:jours')).")"
: ""
). "<br />"
: ""
)
. (
($date_prevue || (intval($date) && (time() < strtotime($date))))
? _T('spiplistes:prochain_envoi_prevu')." : <strong>" . affdate_heure($date_prevue ? $date_prevue : $date) . "</strong>"
. (
(!$date_prevue && ($next = round((strtotime($date) - time()) / _SPIPLISTES_TIME_1_DAY)))
? " (".spiplistes_singulier_pluriel_str_get($next, _T('spiplistes:jour'), _T('spiplistes:jours')).")"
: ""
)
: ""
)
. "</p>\n"
;
if($btn_modifier_courrier_auto) {
$page_result .= ""
. "<p class='verdana2'>"._T('spiplistes:date_act')."<br />"
. _T('spiplistes:env_esquel')." <em>".$patron."</em>"
. "</p>\n"
;
}
}
$date_debut_envoi = (!empty($date_prevue) ? $date_prevue : (($date && intval($date)) ? $date : normaliser_date(time())));
$page_result .= ""
. "</td>\n"
. "</tr>\n"
;
if($flag_editable) {
$page_result .= ""
. "<tr><td align='$spip_lang_left' class='verdana2'>"
. "<input type='radio' name='message_auto' value='oui' id='auto_oui' "
. (empty($patron) ? " disabled='disabled' " : "")
. ($auto_checked = ($message_auto=='oui' ? "checked='checked'" : ""))
. " />"
. "<label for='auto_oui' ".($auto_checked ? "style='font-weight:bold;'" : "").">"
. _T('spiplistes:prog_env')."</label>\n"
. "<div id='auto_oui_detail' "
.((empty($patron) || !$auto_checked) ? "style='display:none;'" : "")
.">"
. "<ul style='list-style-type:none;'>\n"
. "<li>"._T('spiplistes:message_sujet')
. ': <input type="text" name="titre_message" value="'.$titre_message.'" size="50" class="fondl" /> </li>'."\n"
;
//
// chrono jour
$ii = ($periode > 0) ? $periode : 1;
$page_result .= ""
. "<li style='margin-top:0.5em'>"
. spiplistes_form_input_radio ('auto_chrono', 'auto_jour'
, ''
, ($statut == _SPIPLISTES_LIST_PUB_DAILY)
, true, false
)
. _T('spiplistes:Tous_les')
. " <input type='text' name='periode' value='".$ii."' size='4' maxlength='4' class='fondl' /> "
. _T('info_jours')
. "</li>\n"
// chrono hebdo
. "<li>"
. spiplistes_form_input_radio ('auto_chrono', 'auto_hebdo'
, _T('spiplistes:Toutes_les_semaines')
, (($statut == _SPIPLISTES_LIST_PUB_HEBDO) || ($statut == _SPIPLISTES_LIST_PUB_WEEKLY))
, true, false)
. spiplistes_form_input_checkbox('auto_weekly', 'oui'
, _T('spiplistes:en_debut_de_semaine'), ($statut == _SPIPLISTES_LIST_PUB_WEEKLY), true, false)
. "</li>\n"
// chrono mois
. "<li>"
. spiplistes_form_input_radio ('auto_chrono', 'auto_mensuel'
, _T('spiplistes:Tous_les_mois')
, (($statut == _SPIPLISTES_LIST_PUB_MENSUEL) || ($statut == _SPIPLISTES_LIST_PUB_MONTHLY))
, true, false)
. spiplistes_form_input_checkbox('auto_mois', 'oui'
, _T('spiplistes:en_debut_de_mois'), ($statut == _SPIPLISTES_LIST_PUB_MONTHLY), true, false)
. "</li>\n"
// chrono annee
. "<li>"
. spiplistes_form_input_radio ('auto_chrono', 'auto_an'
, _T('spiplistes:Tous_les_ans')
, ($statut == _SPIPLISTES_LIST_PUB_YEARLY)
, true, false)
. "</li>\n"
. "<li style='margin-top:0.5em'>"._T('spiplistes:A_partir_de')." : <br />\n"
//
. spiplistes_dater_envoi(
'liste', $id_liste, $statut
, $flag_editable
, _T('spiplistes:date_expedition_')
, $date_debut_envoi, 'btn_changer_date'
, false
)
. "</li>\n"
. (
(!$envoyer_maintenant)
? " <li>"
. spiplistes_form_input_checkbox('envoyer_maintenant', 'oui'
, _T('spiplistes:env_maint'), false, true)
. "</li>\n"
: ""
)
. "</ul></div>\n"
;
$checked = ($message_auto=='non') ? "checked='checked'" : "";
$class = $checked ? "class='bold'" : "";
$disabled = (empty($patron) ? " disabled='disabled' " : "");
$page_result .= ""
. "<br /><input type='radio' name='message_auto' value='non' id='auto_non' $disabled $checked />"
. "<span $class >"
. " <label for='auto_non'>"._T('spiplistes:prog_env_non')."</label> "
. "</span>\n"
. "</td></tr>\n"
;
$page_result .= ""
. "<tr><td style='text-align:$spip_lang_right;'>"
. (
($id_liste)
? "<input type='hidden' name='id_liste' value='$id_liste' />"
: ""
)
. (
($new)
? "<input type='hidden' name='new' value='$new' />"
: ""
)
// bouton de validation
. (!empty($patron)
? spiplistes_form_bouton_valider('btn_modifier_courrier_auto', _T('bouton_valider'), true)
: "")
. "</td></tr>"
;
}
$page_result .= ""
. "</table>\n"
. spiplistes_form_fin(true)
. fin_cadre_relief(true)
;
// fin formulaire planifier
$page_result .= ""
. fin_cadre_relief(true)
. $grosse_boite_abonnements
. $grosse_boite_moderateurs
;
// le super-admin peut abonner en masse
if($connect_toutes_rubriques) {
$page_result .= ""
. "\n<!-- forcer abo -->\n"
. debut_cadre_enfonce(_DIR_PLUGIN_SPIPLISTES_IMG_PACK."abonner-24.png", true, '', _T('spiplistes:forcer_les_abonnement_liste').spiplistes_plugin_aide("forcerliste"))."\n"
. "<p class='verdana2'>\n"
. _T('spiplistes:forcer_abonnement_desc')
. "</p>\n"
. "<p class='verdana2' style='margin-bottom:1em'><em>"
. _T('spiplistes:forcer_abonnement_aide', array('lien_retour' => generer_url_ecrire(_SPIPLISTES_EXEC_ABONNES_LISTE)))
. "</em></p>\n"
. "<form action='".generer_url_ecrire(_SPIPLISTES_EXEC_LISTE_GERER,"id_liste=$id_liste#auteurs")."' id='form_forcer_abo' name='form_forcer_abo' method='post'>\n"
. debut_cadre_relief("", true)."\n"
//
//////////////////////////
// propose de forcer les membres sauf invites si la liste est privee
. (
($statut==_SPIPLISTES_LIST_PRIVATE)
? "<div class='verdana2'><input type='radio' name='forcer_abo' value='auteurs' id='forcer_abo_tous' />\n"
. "<label for='forcer_abo_tous'>"._T('spiplistes:Abonner_tous_les_inscrits_prives')."</label>"
. "</div>\n"
. spiplistes_boutons_forcer_format('forcer_format', _T('spiplistes:forcer_abonnements_nouveaux'))
: ""
)
//
// propose de forcer les invites si la liste est publique ou periodique
. (
(($statut!=_SPIPLISTES_LIST_PRIVATE) && ($statut!=_SPIPLISTES_TRASH_LIST))
? "<div class='verdana2'><input type='radio' name='forcer_abo' value='6forum' id='forcer_abo_6forum' />\n"
. "<label for='forcer_abo_6forum'>"._T('spiplistes:Abonner_tous_les_invites_public')."</label></div>\n"
. spiplistes_boutons_forcer_format('forcer_format', _T('spiplistes:forcer_abonnements_nouveaux'))
: ""
)
. (
($nb_abonnes)
? "<hr />\n"
. "<div class='verdana2'><input type='radio' name='forcer_abo' value='aucun' id='forcer_desabo' />\n"
. "<label for='forcer_desabo'>"._T('spiplistes:Forcer_desabonner_tous_les_inscrits')."</label></div>\n"
: ""
)
. fin_cadre_relief(true)."\n"
. "<div style='text-align:right;'><input type='submit' name='btn_valider_forcer_abos' value='"._T('bouton_valider')."' class='fondo' /></div>\n"
. "</form>\n"
. fin_cadre_enfonce (true)."\n"
;
}
//
$page_result .= ""
. $gros_bouton_supprimer
;
echo($page_result);
echo pipeline('affiche_milieu',array('args'=>array('exec'=>$sous_rubrique),'data'=>''))
, spiplistes_html_signature(_SPIPLISTES_PREFIX)
, fin_gauche(), fin_page();
} // end exec_spiplistes_liste_gerer()
function editer_auteurs_objet($type, $id, $flag, $cherche_auteur, $ids, $les_auteurs, $futurs, $statut, $titre_boite,$script_edit_objet, $arg_ajax)
{
global $spip_lang_left, $spip_lang_right;
$bouton_creer_auteur = $GLOBALS['connect_toutes_rubriques'];
$clic = _T('icone_creer_auteur');
//
// complement de action/editer_auteurs.php pour notifier la recherche d'auteur
//
if ($cherche_auteur) {
$reponse ="<div style='text-align: $spip_lang_left'>"
. debut_boite_info(true)
. rechercher_auteurs_objet($cherche_auteur, $ids, $type, $id,$script_edit_objet, $arg_ajax);
if ($type=='article' && $bouton_creer_auteur) { // pas generique pour le moment
$legende = generer_url_ecrire("auteur_infos", "new=oui&lier_id_article=$id");
if (isset($cherche_auteur))
$legende = parametre_url($legende, 'nom', $cherche_auteur);
$legende = parametre_url($legende, 'redirect',
generer_url_ecrire('articles', "id_article=$id", '&'));
$reponse .="<div style='width: 200px;'>"
. icone_horizontale($clic, $legende, "redacteurs-24.gif", "creer.gif", false)
. "</div> ";
$bouton_creer_auteur = false;
}
$reponse .= fin_boite_info(true)
. '</div>';
} else $reponse ='';
$reponse .= $les_auteurs;
//
// Ajouter un auteur
//
$res = '';
if ($flag) {
if ($type=='article' && $bouton_creer_auteur) { // pas generique pour le moment
$legende = generer_url_ecrire("auteur_infos", "new=oui&lier_id_article=$id");
if (isset($cherche_auteur))
$legende = parametre_url($legende, 'nom', $cherche_auteur);
$legende = parametre_url($legende, 'redirect',
generer_url_ecrire('articles', "id_article=$id", '&'));
$clic = "<span class='verdana1'><b>$clic</b></span>";
$res = icone_horizontale_display($clic, $legende, "redacteurs-24.gif", "creer.gif", false);
}
$res = "<div style='float:$spip_lang_right; width:280px;position:relative;display:inline;'>"
. $futurs
."</div>\n"
. $res;
}
$idom = "auteurs_$type" . "_$id";
$bouton = bouton_block_depliable($titre_boite,$flag ?($flag === 'ajax'):-1,$idom);
$res = debut_cadre_enfonce("auteur-24.gif", true, "", $bouton)
. $reponse
. debut_block_depliable($flag === 'ajax',$idom)
. $res
. fin_block()
. fin_cadre_enfonce(true);
return ajax_action_greffe("editer_auteurs", $id, $res);
}
function cs_formatspip($id_article){
include_spip('public/assembler');
if(!$txt = recuperer_fond('fonds/format_spip', array('id_article'=>$id_article))) return '';
$txt = explode('@TITRE@=', $txt, 2);
// compatibilite SPIP < 2.0
$compat = function_exists('bouton_block_depliable');
$bouton = $compat?bouton_block_depliable(cs_div_configuration().$txt[1], 'invisible', "formatspip")
:bouton_block_invisible("formatspip").cs_div_configuration().$txt[1];
$bloc = $compat?debut_block_depliable(false, "formatspip")
:debut_block_invisible("formatspip");
return debut_cadre_enfonce(find_in_path('/img/formatspip-24.png'), true, '', $bouton)
. $bloc . $txt[0] . fin_block()
. fin_cadre_enfonce(true);
}
/**
* Afficher la liste des librairies presentes
*
* @return <type>
*/
function afficher_librairies(){
$res = "";
// Lister les librairies disponibles
if ($libs = plugins_liste_librairies()) {
$res .= debut_cadre_enfonce('', true, '', _T('plugin_librairies_installees'));
ksort($libs);
$res .= '<dl>';
foreach ($libs as $lib => $rep)
$res .= "<dt>$lib</dt><dd>".joli_repertoire($rep)."</dd>";
$res .= '</dl>';
$res .= fin_cadre_enfonce(true);
}
return $res;
}
function spiplistes_raccourci_journal ($envelopper = true) {
static $eol = PHP_EOL;
$connect_id_auteur = intval($GLOBALS['connect_id_auteur']);
$result = '';
if($envelopper) {
$result .= ''
. debut_cadre_enfonce('', true)
. '<span class="verdana2" style="font-size:80%;text-transform: uppercase;font-weight:bold;">'
. _T('titre_cadre_raccourcis')
. '</span>'.$eol
. '<ul class="verdana2" style="list-style:none;padding:1ex;margin:0;">'.$eol
;
}
$result .= ''
. '<li id="spiplistes-log-raccourci">'
. icone_horizontale(
_T('spiplistes:log_voir_le_journal')
, generer_url_ecrire('spiplistes_voir_journal')
, _DIR_PLUGIN_SPIPLISTES_IMG_PACK.'log-24.png'
, ''
,false
)
. '</li>'.$eol
. '<li>'.$eol
;
if (spiplistes_pref_lire('opt_console_debug') == 'oui')
{
$ancre = '#regler-console';
if (_request('exec') != _SPIPLISTES_EXEC_CONFIGURE)
{
$ancre = generer_url_ecrire(_SPIPLISTES_EXEC_CONFIGURE) . $ancre;
}
$result .= ''
. '<span class="verdana2" style="display:block;padding:0.5ex;text-align:center">'.$eol
. '<a href="'.$ancre.'" title="'._T('spiplistes:log_configurer').'" class="cellule-h" style="text-align:center">'.$eol
// avertir qu'on est en mode debug
. '<span style="display:block;font-weight:700;color:white;background-color:red;">'.$eol
. _T('spiplistes:mode_debug_actif') . '</span>'
. '</a>'.$eol
// l'adresse IP pour info
. '<span style="display:block;">' . $_SERVER['SERVER_ADDR'] . '</span>'.$eol
. '</span>'.$eol
;
}
$result .= '</li>'.$eol
;
if($envelopper) {
$result .= ''
. '</ul>'.$eol
;
}
if($envelopper)
{
$result .= fin_cadre_enfonce(true);
}
return($result);
}
function spiplistes_debut_raccourcis ($titre = "", $raccourcis = true, $return = false) {
$result = ""
. ($raccourcis ? creer_colonne_droite('', true) : "")
. debut_cadre_enfonce('', true)
. "<span class='verdana2' style='font-size:80%;text-transform: uppercase;font-weight:bold;'>$titre</span>"
. "<br />"
;
if($return) return($result);
else echo($result);
}
function langue_naviguer($id_rubrique, $id_parent, $flag_editable)
{
$res = "";
if ($id_rubrique>0 AND $GLOBALS['meta']['multi_rubriques'] == 'oui' AND ($GLOBALS['meta']['multi_secteurs'] == 'non' OR $id_parent == 0) AND $flag_editable) {
$row = sql_fetsel("lang, langue_choisie", "spip_rubriques", "id_rubrique=$id_rubrique");
$langue_rubrique = $row['lang'];
$langue_choisie_rubrique = $row['langue_choisie'];
$langue_parent = '';
if ($id_parent) {
$row = sql_fetsel("lang", "spip_rubriques", "id_rubrique=$id_parent");
$langue_parent = $row['lang'];
}
if (!$langue_parent)
$langue_parent = $GLOBALS['meta']['langue_site'];
if (!$langue_rubrique)
$langue_rubrique = $langue_parent;
$res .= debut_cadre_enfonce('langues-24.gif', true);
#$res .= bouton_block_depliable(_T('titre_langue_rubrique')." (".traduire_nom_langue($langue_rubrique).")",false,'languesrubrique');
#$res .= debut_block_depliable(false,'languesrubrique');
$res .= "<div class='langue'>";
if ($menu = liste_options_langues('changer_lang', $langue_rubrique, $langue_parent)) {
$lien = redirige_action_auteur('instituer_langue_rubrique', "$id_rubrique-$id_parent","naviguer","id_rubrique=$id_rubrique");
$lien = ("\nonchange=\"document.location.href='$lien" .
"&changer_lang='+this.options[this.selectedIndex].value\"");
$res .= select_langues('changer_lang', $lien, $menu, _T('titre_langue_rubrique'));
}
$res .= "</div>\n";
#$res .= fin_block();
$res .= fin_cadre_enfonce(true);
}
return $res;
}
function langue_breve($id_breve, $row){
$id_rubrique = $row['id_rubrique'];
//
// Langue de la breve
//
$row2 = sql_fetsel("lang", "spip_rubriques", "id_rubrique=$id_rubrique");
$langue_parent = $row2['lang'];
$langue_breve = $row['lang'];
$res = "";
#$bouton = bouton_block_depliable(_T('titre_langue_breve')." (".traduire_nom_langue($langue_breve).")",false,'languesbreve');
$res .= debut_cadre_enfonce('langues-24.gif',true/*,'',$bouton*/);
#$res .= debut_block_depliable(false,'languesbreve');
$res .= "<div class='langue'>";
if ($menu = liste_options_langues('changer_lang', $langue_breve, $langue_parent)) {
$lien = "\nonchange=\"this.nextSibling.firstChild.style.visibility='visible';\"";
$menu = select_langues('changer_lang', $lien, $menu, _T('titre_langue_breve'))
. "<span><input type='submit' class='visible_au_chargement' value='". _T('bouton_changer')."' /></span>";
}
$res .= redirige_action_auteur('editer_breve', "$id_breve/$id_rubrique", "breves_voir","id_breve=$id_breve", $menu);
$res .= "</div>\n";
#$res .= fin_block();
$res .= fin_cadre_enfonce(true);
return $res;
}
function bloc_des_raccourcis($bloc) {
global $spip_display;
return "\n"
. creer_colonne_droite('',true)
. debut_cadre_enfonce('',true)
. (($spip_display != 4)
? ("\n<div style='font-size: x-small' class='verdana1'><b>"
._T('titre_cadre_raccourcis')
."</b>")
: ( "<h3>"._T('titre_cadre_raccourcis')."</h3><ul>"))
. $bloc
. (($spip_display != 4) ? "</div>" : "</ul>")
. fin_cadre_enfonce(true);
}
function statistiques_lang_ok()
{
global $spip_ecran, $spip_lang_right;
$commencer_page = charger_fonction('commencer_page', 'inc');
echo $commencer_page(_T('onglet_repartition_lang'), "statistiques_visites", "repartition-langues");
if ($spip_ecran == "large") {
$largeur_table = 974;
} else {
$largeur_table = 750;
}
$taille = $largeur_table - 200;
echo "<table class='centered' width='$largeur_table'><tr><td style='width: $largeur_table" . "px; text-align:center;' class='verdana2'>";
echo "<br /><br />";
echo gros_titre(_T('onglet_repartition_lang'),'', false);
//barre_onglets("repartition", "langues");
if (_request('critere') == "debut") {
$critere = "visites";
// echo gros_titre(_T('onglet_repartition_debut','', false));
} else {
$critere = "popularite";
// echo gros_titre(_T('onglet_repartition_actuelle','', false));
}
echo ($critere == "popularite") ? barre_onglets("rep_depuis", "popularite"): barre_onglets("rep_depuis", "debut");
//
// Statistiques par langue
//
echo debut_cadre_enfonce("langues-24.gif", true);
$r = sql_fetsel("SUM($critere) AS total_visites", "spip_articles");
$visites = 1;
if ($r)
$total_visites = $r['total_visites'];
else
$total_visites = 1;
$result = sql_select("lang, SUM(".$critere.") AS cnt", "spip_articles", "statut='publie' ", "lang");
$ifond = 1;
$visites_abs = 0;
$res = '';
while ($row = sql_fetch($result)) {
$lang = $row['lang'];
$visites = round($row['cnt'] / $total_visites * $taille);
$pourcent = round($row['cnt'] / $total_visites * 100);
if ($visites > 0) {
if ($ifond==0){
$ifond=1;
$couleur="white";
}else{
$ifond=0;
$couleur="eeeeee";
}
$res .= "\n<tr style='background-color: $couleur'>";
$dir=lang_dir($lang,'',' dir="rtl"');
$res .= "<td style='width: 100%; border-bottom: 1px solid #cccccc;'><span class='verdana2'$dir><span style='float: $spip_lang_right;'>$pourcent%</span>".traduire_nom_langue($lang)."</span></td>";
$res .= "<td style='border-bottom: 1px solid #cccccc;'>";
$res .= "\n<table cellpadding='0' cellspacing='0' border='0' width='".($taille+5)."'>";
$res .= "\n<tr><td style='align:$spip_lang_right; background-color: #eeeeee; border: 1px solid #999999; white-space: nowrap;'>";
if ($visites_abs > 0) $res .= "<img src='" . chemin_image('rien.gif') . "' width='$visites_abs' height='8' alt=' ' />";
if ($visites>0) $res .= "<img src='" . chemin_image('rien.gif') . "' class='couleur_langue' style='border: 0px;' width='$visites' height='8' alt=' ' />";
$res .= "</td></tr></table>\n";
$res .= "</td>";
$res .= "</tr>";
$visites_abs += $visites;
}
}
if ($res)
echo "\n<table cellpadding='2' cellspacing='0' border='0' width='100%' style='border: 1px solid #aaaaaa;'>", $res, "</table>\n";
//echo "<p><span class='verdana1 spip_medium'>"._T('texte_signification')."</span>";
echo fin_cadre_enfonce(true);
echo "</td></tr></table>";
echo fin_page();
}
function exec_synchro_dist()
{
///// debut de la page
$commencer_page = charger_fonction('commencer_page', 'inc');
echo $commencer_page(_T("icone_suivi_activite"), "accueil", "synchro");
echo "<br /><br />";
echo gros_titre(_T("icone_suivi_activite"),'', false);
echo debut_gauche('', true);
echo debut_boite_info(true);
echo "<div class='verdana2'>";
echo _T('ical_info1').'<br /><br />';
echo _T('ical_info2', array('spipnet' => $GLOBALS['home_server']
. '/' . $GLOBALS['spip_lang']
. '_suivi'));
echo "</div>";
echo fin_boite_info(true);
$adresse_suivi_inscription=$GLOBALS['meta']["adresse_suivi_inscription"];
echo debut_droite('', true);
///
/// Suivi par mailing-list
///
if ($GLOBALS['meta']["suivi_edito"] == "oui" AND strlen($GLOBALS['meta']["adresse_suivi"]) > 3 AND strlen($adresse_suivi_inscription) > 3) {
echo debut_cadre_enfonce("racine-site-24.gif", true, "", _T('ical_titre_mailing'));
echo _T('info_config_suivi_explication'),
propre("<b style='text-align: center'>[->$adresse_suivi_inscription]</b>");
echo fin_cadre_enfonce(true);
}
///
/// Suivi par agenda iCal (taches + rendez-vous)
///
echo debut_cadre_relief("agenda-24.gif", true, "", _T('icone_calendrier'));
echo _T('calendrier_synchro');
echo '<p>'._T('ical_info_calendrier').'</p>';
$id_auteur = $GLOBALS['visiteur_session']['id_auteur'];
afficher_liens_calendrier(generer_url_public('ical'),'', _T('ical_texte_public'));
afficher_liens_calendrier(generer_url_public("ical_prive", "id_auteur=$id_auteur&arg=".afficher_low_sec($id_auteur,'ical')),'cadenas-24.gif', _T('ical_texte_prive'));
echo fin_cadre_relief(true);
///
/// Suivi par RSS
///
echo debut_cadre_relief("site-24.gif", true, "", _T('ical_titre_rss'));
echo _T('ical_texte_rss');
echo "<p>"._T("ical_texte_rss_articles")."</p>";
echo propre("<cadre>" . generer_url_public('backend') . "</cadre>");
echo "<p>"._T("ical_texte_rss_articles2")."</p>";
$bouton = http_img_pack( 'feed.png', 'RSS', '');
$result = sql_allfetsel("id_rubrique, titre", "spip_rubriques", 'id_parent=0','', '0+titre,titre');
$res = '';
foreach($result as $row){
$h = generer_url_public('backend', "id_rubrique=" . $row['id_rubrique']);
$titre_rubrique = typo($row['titre']);
$titre = htmlspecialchars($titre_rubrique);
$res .= "\n<li><a href='$h' title=\"$titre\">$bouton $titre_rubrique</a></li>";
}
if ($res) echo "\n<ul>", $res, "\n</ul>";
if ($GLOBALS['meta']['activer_breves'] == "oui") {
echo "<p>"._T("ical_texte_rss_breves")."</p>";
echo "<ul><li><a href='",
generer_url_public('backend-breves', ""),
"' title=\"",
_T('ical_lien_rss_breves'),
"\">",
$bouton,
' ' . _T('ical_lien_rss_breves'),
"</a></li></ul>";
}
echo fin_cadre_relief(true);
///
/// Suivi par Javascript
///
echo debut_cadre_relief("doc-24.gif", true, "", _T('ical_titre_js'));
echo _T('ical_texte_js').'<br />';
echo propre('<code>
<script
type="text/javascript"
src="'.generer_url_public('distrib').'">
</script>
</code>');
echo fin_cadre_relief(true);
echo fin_gauche(), fin_page();
}
function http_message_avec_participants($id_message, $statut, $forcer_dest, $cherche_auteur, $expediteur='')
{
global $connect_id_auteur ;
if ($cherche_auteur) {
echo "\n<div style='text-align: left' class='cadre-info'>"
. http_auteurs_ressemblants($cherche_auteur , $id_message)
. "\n</div>";
}
$bouton = bouton_block_depliable(_T('info_nombre_partcipants'),true,"auteurs,ajouter_auteur");
echo debut_cadre_enfonce("redacteurs-24.gif", true, '', $bouton, 'participants');
//
// Liste des participants
//
$result = sql_allfetsel("*", "spip_auteurs AS auteurs, spip_auteurs_messages AS lien", "lien.id_message=$id_message AND lien.id_auteur=auteurs.id_auteur");
$total_dest = count($result);
if ($total_dest > 0) {
$ifond = 0;
$res = '';
$formater_auteur = charger_fonction('formater_auteur', 'inc');
$t = _T('lien_retrait_particpant');
foreach($result as $k => $row) {
$id_auteur = $row["id_auteur"];
list($status, $mail, $nom, $site,) = $formater_auteur($id_auteur, $row);
if ($id_auteur == $expediteur) {
$nom = "<span class='arial0' style='margin-left: 10px'>"
. _T('info_auteur_message')
. "</span> $nom";
}
$class = alterner (++$ifond,'row_even','row_odd');
$res .= "<tr class='$class'>\n<td class='nom'>$status $mail $nom $site$exp</td>"
. "\n<td align='right' class='lien'>"
. (($id_auteur == $connect_id_auteur) ? " " : ("[<a href='" . redirige_action_auteur("editer_message","$id_message/-$id_auteur", 'message', "id_message=$id_message") . "'>$t</a>]")) . "</td></tr>\n";
$result[$k] = $id_auteur;
}
echo
debut_block_depliable(true,"auteurs"),
"\n<table class='spip' width='100%'>",
$res,
"</table>\n",
fin_block();
}
if ($statut == 'redac' OR $forcer_dest)
echo http_ajouter_participants($result, $id_message);
else {
echo
debut_block_depliable(true,"ajouter_auteur"),
"<br />\n<div style='text-align: right' class='verdana1 spip_small'><a href='" . generer_url_ecrire("message","id_message=$id_message&forcer_dest=oui") . "'>"._T('lien_ajouter_participant')."</a></div>",
fin_block();
}
echo fin_cadre_enfonce(true);
return $total_dest;
}
function adhclub_imp_show_erreurs($erreur)
{
$output = "";
if (count($erreur) > 0) {
$bouton = bouton_block_depliable(_T('adhintg:adh_erreurs'), false, "adh_erreurs");
$output .= debut_cadre_enfonce("mot-cle-24.gif", true, "", $bouton);
$output .= debut_block_depliable(false, "adh_erreurs");
foreach ($erreur as $key => $val) {
$output .= "<dl>";
$output .= "<dt>" . _T('adhclub:champ_err', array('cher' => $key));
$output .= "<dd>" . _T('adhintg:' . $key) . " : {$val}<dd>";
$output .= "</dl>";
}
$output .= fin_block();
$output .= fin_cadre_enfonce(true);
}
return $output;
}
function http_calendrier_rv($messages, $type)
{
global $lcm_lang_rtl;
$total = '';
if (!$messages) {
return $total;
}
foreach ($messages as $row) {
if (preg_match("/^=([^[:space:]]+)\$/", $row['texte'], $match)) {
$url = $match[1];
} else {
$url = "message.php3?id_message=" . $row['id_message'];
}
$rv = $row['rv'] == 'oui';
$date = $row['date_heure'];
$date_fin = $row['date_fin'];
if ($row['type'] == "pb") {
$bouton = "pense-bete";
} else {
if ($row['type'] == "annonces") {
$bouton = "annonce";
} else {
$bouton = "message";
}
}
if ($rv) {
$date_jour = affdate_jourcourt($date);
$total .= "<tr><td colspan='2'>" . ($date_jour == $date_rv ? '' : "<div><b>{$date_jour}</b></div>") . "</td></tr>";
}
$total .= "<tr><td width='24' valign='middle'>" . http_href($url, $rv ? http_img_pack("rv.gif", '', http_style_background($bouton . '.gif', "no-repeat;' border='0'")) : http_img_pack("{$bouton}.gif", '', "border='0'"), '', '') . "</td>" . "<td valign='middle'>" . (!$rv ? '' : (affdate($date) == affdate($date_fin) ? "<div style='font-size: 9px;'" . http_style_background('fond-agenda.gif', "right center no-repeat; float: left; line-height: 12px; color: #666666; margin-right: 3px; padding-right: 4px;") . heures($date) . ":" . minutes($date) . "<br />" . heures($date_fin) . ":" . minutes($date_fin) . "</div>" : "<div style='font-size: 9px;'" . http_style_background('fond-agenda.gif', "right center no-repeat; float: left; line-height: 12px; color: #666666; margin-right: 3px; padding-right: 4px; text-align: center;") . heures($date) . ":" . minutes($date) . "<br />...</div>")) . "<div><b>" . http_href($url, typo($row['titre']), '', 'font-size: 10px;') . "</b></div>" . "</td>" . "</tr>\n";
$date_rv = $date_jour;
}
if ($type == 'annonces') {
$titre = _T('info_annonces_generales');
$couleur_titre = "ccaa00";
$couleur_texte = "black";
$couleur_fond = "#ffffee";
} else {
if ($type == 'pb') {
$titre = _T('infos_vos_pense_bete');
$couleur_titre = "#3874B0";
$couleur_fond = "#EDF3FE";
$couleur_texte = "white";
} else {
if ($type == 'rv') {
$titre = _T('info_vos_rendez_vous');
$couleur_titre = "#666666";
$couleur_fond = "#eeeeee";
$couleur_texte = "white";
}
}
}
return debut_cadre_enfonce("", true, "", $titre) . "<table width='98%' border='0' cellpadding='0' cellspacing='2'>" . $total . "</table>" . fin_cadre_enfonce(true);
}
function afficher_ical($id)
{
echo debut_cadre_enfonce();
echo "<div class='verdana1'>" . _T("calendrier_synchro") . "</div>";
icone_horizontale(_T("icone_suivi_activite"), "synchro.php3", "synchro-24.gif");
echo fin_cadre_enfonce();
}
function controle_petition_page($id_article, $titre, $type, $corps, $count)
{
$args = array();
$rac = '';
if (!(autoriser('modererpetition')
OR (
$id_article > 0
AND autoriser('modererpetition', 'article', $id_article)
))) {
$ong = '';
} else {
$ong = controle_petition_onglet($id_article, $debut, $type, '');
if ($id_article) {
$h = generer_url_ecrire("statistiques_visites","id_article=$id_article");
$rac = icone_horizontale(_T('icone_statistiques_visites'), $h, "statistiques-24.gif","rien.gif", false);
if ($type !== 'public') {
$h = redirige_action_auteur('editer_signatures', $id_article . 'A', 'controle_petition', "id_article=$id_article&type=interne");
$rac .= icone_horizontale(_T('icone_relancer_signataire') . " ($count)", $h, "envoi-message-24.gif","rien.gif", false);
}
$rac = bloc_des_raccourcis($rac);
$titre = "<a href='" .
generer_url_entite($id_article,'article') .
"'>" .
typo($titre) .
"</a>" .
" <span class='arial1'>(" .
_T('info_numero_abbreviation') .
$id_article .
")</span>";
if (!sql_countsel('spip_petitions', "id_article=$id_article"))
$titre .= '<br >' . _T('info_petition_close');
$args = array('id_article' => $id_article);
} else {
$q = sql_select('A.titre, A.date, A.id_article, count(*) AS n',
'spip_signatures AS S LEFT JOIN spip_articles AS A ON A.id_article=S.id_article',
'',
'A.id_article',
'n desc',
"0,10");
while ($r = sql_fetch($q)) {
$id = $r['id_article'];
$h = generer_url_entite($id, 'article');
$title = affdate_jourcourt($r['date']) . "\n" .$r['titre'];
$rac .= "<li><a href='$h' title=\"" . attribut_html($title). '">' . _T('info_numero_abbreviation') . " $id" . '</a> : '. $r['n'] . ' ' . _T('signatures') . "</li>";
}
if ($rac) $rac = "<ul>$rac</ul>";
$rac = debut_cadre_enfonce('',true)
. "\n<div style='font-size: x-small' class='verdana1'><b>"
._T('public:articles_populaires')
."</b>"
. $rac
. "</div>"
. fin_cadre_enfonce(true);
}
$rac = "<br /><br /><br /><br /><br />" . $rac;
}
$head = _T('titre_page_controle_petition');
$idom = "editer_signature-" . $id_article;
$commencer_page = charger_fonction('commencer_page', 'inc');
echo $commencer_page($head, "forum", "suivi-petition");
echo debut_gauche('', true);
echo $rac;
echo debut_droite('', true);
echo gros_titre(_T('titre_suivi_petition'),'', false);
echo $ong;
echo bouton_spip_rss('signatures', $args);
echo $titre;
echo "<br /><br />";
echo "<div id='", $idom, "' class='serif2'>", $corps, "</div>";
echo fin_gauche(), fin_page();
}
function http_calendrier_rv($messages, $type) {
$total = $date_rv = '';
if (!$messages) return $total;
$connect_quand = $GLOBALS['visiteur_session']['quand'];
foreach ($messages as $row) {
$rv = ($row['location'] == 'oui');
$date = $row['dtstart'];
$date_fin = $row['dtend'];
if ($row['category']=="pb") $bouton = "pense-bete";
else if ($row['category']=="affich") $bouton = "annonce";
else $bouton = "message";
if ($rv) {
$date_jour = affdate_jourcourt($date);
$total .= "<tr><td colspan='2'>" .
(($date_jour == $date_rv) ? '' :
"\n<div class='calendrier-arial11'><b>$date_jour</b></div>") .
"</td></tr>";
$date_rv = $date_jour;
$rv =
((affdate($date) == affdate($date_fin)) ?
("\n<div class='calendrier-arial9 fond-agenda'>"
. heures($date).":".minutes($date)."<br />"
. heures($date_fin).":".minutes($date_fin)."</div>") :
( "\n<div class='calendrier-arial9 fond-agenda' style='text-align: center;'>"
. heures($date).":".minutes($date)."<br />...</div>" ));
}
$c = (strtotime($date) <= $connect_quand) ? '' : " color: red;";
$total .= "<tr><td style='width: 24px' valign='middle'>" .
http_href($row['url'],
($rv ?
http_img_pack("rv.gif", 'rv',
http_style_background($bouton . '.gif', "no-repeat;")) :
http_img_pack($bouton.".gif", $bouton, ""))) .
"</td>\n" .
"<td valign='middle'><div style='font-weight: bold;$c'>" .
$rv .
http_href($row['url'], typo($row['summary']), '', '', 'calendrier-verdana') .
"</div></td></tr>";
}
if ($type == 'annonces') {
$titre = _T('info_annonces_generales');
}
else if ($type == 'pb') {
$titre = _T('infos_vos_pense_bete');
}
else if ($type == 'rv') {
$titre = _T('info_vos_rendez_vous');
}
return
debut_cadre_enfonce("", true, "", $titre) .
"\n<table>" .
$total .
"</table>" .
fin_cadre_enfonce(true);
}
function inc_referencer_traduction_dist($id_article, $flag, $id_rubrique, $id_trad, $trad_err='')
{
global $spip_display;
if (! (($GLOBALS['meta']['multi_articles'] == 'oui')
OR (($GLOBALS['meta']['multi_rubriques'] == 'oui')
AND ($GLOBALS['meta']['gerer_trad'] == 'oui'))) )
return '';
$langue_article = sql_fetsel("lang", "spip_articles", "id_article=$id_article");
$langue_article = $langue_article['lang'];
$reponse = '';
// Choix langue article
if ($GLOBALS['meta']['multi_articles'] == 'oui' AND $flag) {
$row = sql_fetsel("lang", "spip_rubriques", "id_rubrique=$id_rubrique");
$langue_parent = $row['lang'];
if (!$langue_parent)
$langue_parent = $GLOBALS['meta']['langue_site'];
if (!$langue_article)
$langue_article = $langue_parent;
if ($menu = liste_options_langues('changer_lang', $langue_article, $langue_parent)) {
// attention ce onchange doit etre suivi de <span><input type='submit'
$lien = "\nonchange=\"this.nextSibling.firstChild.style.visibility='visible';\"";
$menu = select_langues('changer_lang', $lien, $menu, _T('info_multi_cet_article'));
$menu = ajax_action_post('referencer_traduction', "$id_article,$id_rubrique","articles","id_article=$id_article", $menu, _T('bouton_changer'), " class='visible_au_chargement'");
$reponse .= debut_cadre_couleur('',true)
. "\n<div style='text-align: center;'>"
. $menu
. "</div>\n"
. fin_cadre_couleur(true);
}
}
if ($trad_err)
$reponse .= "<div><span style='color: red' size='2' face='Verdana, Geneva, helvetica, sans-serif'>"._T('trad_deja_traduit'). "</span></div>";
// Afficher la liste des traductions
if ($id_trad) {
$requete = array('SELECT' => "id_article, id_rubrique, titre, lang, statut, id_trad", 'FROM' => "spip_articles", 'WHERE' => "id_trad = $id_trad");
$styles = array(array('',7), array('', 12), array('arial2'), array('arial2', 100));
$presenter_liste = charger_fonction('presenter_liste', 'inc');
$tableau = array();
$liste = $presenter_liste($requete, 'articles_traduction', $tableau, $id_article, false, $styles, '',_T('trad_article_traduction'));
} else $liste = '';
// changer les globales de direction de langue
changer_typo($langue_article);
// Participation aux Traductions pas pour Mal-voyant. A completer
if ($spip_display == 4) $form =''; else {
$form = "<table width='100%'><tr>";
if ($flag AND !$liste) {
// Formulaire pour lier a un article
$form .= "<td style='width: 60%' class='arial2'>"
. ajax_action_post("referencer_traduction",
$id_article,
'articles',
"id_article=$id_article",
("<label for='lier_trad'>" . _T('trad_lier') . "</label>" .
"\n<input type='text' name='lier_trad' id='lier_trad' size='5' />\n"),
_T('bouton_valider'),
"")
. "</td>\n"
. "<td style='width: 10px'> </td>"
. "<td style='width: 2px; background: url(" . chemin_image("tirets-separation.gif") . ")'>". http_img_pack('rien.gif', " ", "width='2' height='2'") . "</td>"
. "<td style='width: 10px'> </td>";
}
$form .= "<td>"
. icone_horizontale(_T('trad_new'), generer_url_ecrire("articles_edit","new=oui&lier_trad=$id_article&id_rubrique=$id_rubrique"), "traductions-24.gif", "creer.gif", false)
. "</td>";
if ($flag AND $liste) {
$clic = _T('trad_delier');
$form .= "<td style='width: 10px'> </td>"
. "<td style='width: 2px; background: url(" . chemin_image("tirets-separation.gif") . ")'>". http_img_pack('rien.gif', " ", "width='2' height='2'") . "</td>"
. "<td style='width: 10px'> </td>"
. "<td>"
// la 1ere occurrence de clic ne sert pas en Ajax
. icone_horizontale($clic, ajax_action_auteur("referencer_traduction","$id_article,-$id_trad",'articles', "id_article=$id_article",array($clic)), "traductions-24.gif", "supprimer.gif", false)
. "</td>\n";
}
$form .= "</tr></table>";
}
if ($GLOBALS['meta']['gerer_trad'] == 'oui')
$bouton = _T('titre_langue_trad_article');
else
$bouton = _T('titre_langue_article');
if ($langue_article)
$bouton .= " (".traduire_nom_langue($langue_article).")";
$res = debut_cadre_enfonce('langues-24.gif', true, "",
bouton_block_depliable($bouton,$flag === 'ajax','languearticle,lier_traductions'))
. debut_block_depliable($flag === 'ajax','languearticle')
. $reponse
. fin_block()
. $liste
. debut_block_depliable($flag === 'ajax','lier_traductions')
. $form
. fin_block()
. fin_cadre_enfonce(true);
return ajax_action_greffe("referencer_traduction", $id_article, $res);
}
function spiplistes_afficher_pile_messages() {
$sql_select = "id_liste,titre,date,maj,periode,patron,statut";
$list = sql_select($sql_select, 'spip_listes', "message_auto='oui' AND date > 0");
if (sql_count($list) == 0) {
return (false);
}
$pile_result = ""
. debut_cadre_enfonce(_DIR_PLUGIN_SPIPLISTES_IMG_PACK.'stock_timer.gif', true, ''
, _T('spiplistes:Messages_automatiques').spiplistes_plugin_aide(_SPIPLISTES_EXEC_AIDE, "casier_courriers"))
. "\n"
. "<table class='spiplistes-tab' width='100%' border='0' cellspacing='1' cellpadding='0'>\n"
. "<tr>\n"
. "<th>"._T('spiplistes:envoi_patron')."</th>\n"
. "<th>"._T('spiplistes:sur_liste')."</th>\n"
. "<th>"._T('spiplistes:prochain_envoi_prevu')."</th>\n"
. "</tr>\n"
;
$couleur_ligne = 1;
while($row = sql_fetch($list)) {
foreach(explode(",", $sql_select) as $key) {
$$key = $row[$key];
}
$date_dernier = date(_T('spiplistes:format_date'), strtotime($maj)) ;
switch($statut) {
case _SPIPLISTES_LIST_PRIV_HEBDO:
case _SPIPLISTES_LIST_PRIV_WEEKLY:
case _SPIPLISTES_LIST_PUB_HEBDO:
case _SPIPLISTES_LIST_PUB_WEEKLY:
$periodicite = _T('spiplistes:Liste_hebdo');
break;
case _SPIPLISTES_LIST_PRIV_MENSUEL:
case _SPIPLISTES_LIST_PRIV_MONTHLY:
case _SPIPLISTES_LIST_PUB_MENSUEL:
case _SPIPLISTES_LIST_PUB_MONTHLY:
$periodicite = _T('spiplistes:Liste_mensuelle');
break;
case _SPIPLISTES_LIST_PRIV_YEARLY:
case _SPIPLISTES_LIST_PUB_YEARLY:
$periodicite = _T('spiplistes:Liste_annuelle');
break;
case _SPIPLISTES_LIST_PRIV_DAILY:
case _SPIPLISTES_LIST_PUB_DAILY:
if($periode) {
$periodicite = _T('spiplistes:Tous_les_s'
, array('s' => spiplistes_singulier_pluriel_str_get($periode, _T('spiplistes:jour'), _T('spiplistes:jours')))
);
} else {
$periodicite = _T('spiplistes:Listes_autre');
}
break;
default:
$periodicite = _T('spiplistes:envoi_manuel');
}
$ii = 0;
$pile_result .= ''
. '<tr ' . ((($couleur_ligne++) % 2) ? 'class="row-even"' : '') . '>' . PHP_EOL
. '<td><a href="' . generer_url_public('patron_switch',"patron=$patron&date=$date_dernier").'">'.$patron.'</a>'
. '<br />'.$periodicite.'</td>' . PHP_EOL
. '<td><a href="' . generer_url_ecrire(_SPIPLISTES_EXEC_LISTE_GERER, 'id_liste='.$id_liste) . '">'
. $titre . '</a>'
. '<br />'.spiplistes_nb_abonnes_liste_str_get($id_liste).'.'
. '</td>'
. '<td>'
. spiplistes_affdate ($date)
. '</td></tr>' . PHP_EOL
;
} // end while
$pile_result .= ""
. "</table>\n"
. fin_cadre_enfonce(true)
;
return ($pile_result);
} // end spiplistes_afficher_pile_messages()
function apparait_auteur_infos($id_auteur, $auteur) {
if ($auteur['imessage']=="non"){
$res = "<input type='radio' name='perso_activer_imessage' value='oui' id='perso_activer_imessage_on'>"
. " <label for='perso_activer_imessage_on'>"._T('bouton_radio_apparaitre_liste_redacteurs_connectes')."</label> "
. "<br />\n<input type='radio' name='perso_activer_imessage' value='non' checked='checked' id='perso_activer_imessage_off'>"
. " <b><label for='perso_activer_imessage_off'>"._T('bouton_radio_non_apparaitre_liste_redacteurs_connectes')."</label></b> ";
} else {
$res = "<input type='radio' name='perso_activer_imessage' value='oui' id='perso_activer_imessage_on' checked='checked'>"
. " <b><label for='perso_activer_imessage_on'>"
. _T('bouton_radio_apparaitre_liste_redacteurs_connectes')
. "</label></b> "
. "<br />\n<input type='radio' name='perso_activer_imessage' value='non' id='perso_activer_imessage_off'>"
. " <label for='perso_activer_imessage_off'>"
. _T('bouton_radio_non_apparaitre_liste_redacteurs_connectes')
. "</label> ";
}
return
debut_cadre_enfonce("messagerie-24.gif", true, "", _T('info_liste_redacteurs_connectes'))
. "\n<div>"
. _T('texte_auteur_messagerie')
. "</div>"
. $res
. fin_cadre_enfonce(true)
. "<br />\n";
}
function exec_messagerie_dist()
{
global $connect_id_auteur, $connect_statut, $spip_lang_rtl;
$commencer_page = charger_fonction('commencer_page', 'inc');
echo $commencer_page(_T('titre_page_messagerie'), "accueil", "messagerie");
echo debut_gauche("messagerie",true);
echo debut_boite_info(true);
echo _T('info_gauche_messagerie');
echo "<p>".http_img_pack("m_envoi$spip_lang_rtl.gif", 'V', "style='width: 14px; height: 7px; border: 0px'") .' ' . _T('info_symbole_vert'), '</p>';
echo aide ("messut");
echo "<p>".http_img_pack("m_envoi_bleu$spip_lang_rtl.gif", 'B', "style='width: 14px; height: 7px; border: 0px'") .' ' . _T('info_symbole_bleu'), '</p>';
echo aide ("messpense");
echo "<p>".http_img_pack("m_envoi_jaune$spip_lang_rtl.gif", 'J', "style='width: 14px; height: 7px; border: 0px'") .' ' . _T('info_symbole_jaune'), '</p>';
echo fin_boite_info(true);
echo creer_colonne_droite('', true);
echo debut_cadre_relief("messagerie-24.gif", true);
echo icone_horizontale(_T('lien_nouvea_pense_bete'),generer_action_auteur("editer_message","pb"), "pense-bete.gif", "", false);
echo icone_horizontale(_T('lien_nouveau_message'),generer_action_auteur("editer_message","normal"), "message.gif", "", false);
if ($connect_statut == "0minirezo") {
echo icone_horizontale(_T('lien_nouvelle_annonce'),generer_action_auteur("editer_message","affich"), "annonce.gif", "", false);
}
echo fin_cadre_relief(true);
# Affiche l'encadre "lien iCal"
echo
debut_cadre_enfonce('',true) .
"<div class='verdana1'>"._T("calendrier_synchro") .
"<table class='cellule-h-table' cellpadding='0'><tr>\n" .
"<td><a href='" . generer_url_ecrire("synchro") . "' class='ical'> </a></td>\n"
. "<td class='cellule-h-lien'><br /><a href='" . generer_url_ecrire("synchro") . "' class='cellule-h'>"
. _T("icone_suivi_activite")
. "</a></td>\n</tr></table>\n" ."</div>" .
fin_cadre_enfonce(true);
echo debut_droite("messagerie", true);
$messages_vus = array();
echo afficher_ses_messages('<b>' . _T('infos_vos_pense_bete') . '</b>', '', "id_auteur=$connect_id_auteur AND statut='publie' AND type='pb' AND (date_fin > DATE_SUB(".sql_quote(date('Y-m-d H:i:s')).", INTERVAL 1 DAY) OR rv != 'oui')", $messages_vus, false, true);
echo afficher_ses_messages('<b>' . _T('info_nouveaux_message') . '</b>', ", spip_auteurs_messages AS lien", "lien.id_auteur=$connect_id_auteur AND vu='non' AND statut='publie' AND lien.id_message=messages.id_message", $messages_vus, true, true);
echo afficher_ses_messages('<b>' . _T('info_discussion_cours') . '</b>', ", spip_auteurs_messages AS lien", "lien.id_auteur=$connect_id_auteur AND statut='publie' AND type='normal' AND lien.id_message=messages.id_message AND (date_fin > DATE_SUB(".sql_quote(date('Y-m-d H:i:s')).", INTERVAL 1 DAY) OR rv != 'oui')", $messages_vus, true, false);
// Afficher le lien RSS
echo bouton_spip_rss('messagerie', array('id_auteur' => $connect_id_auteur));
echo afficher_ses_messages('<b>' . _T('info_message_en_redaction') . '</b>', '', "id_auteur=$connect_id_auteur AND statut='redac'", $messages_vus, true, false);
$result = sql_select('auteurs.id_auteur, auteurs.nom, COUNT(*) AS total', 'spip_auteurs AS auteurs, spip_auteurs_messages AS lien2, spip_messages AS messages, spip_auteurs_messages AS lien', "(lien.id_auteur = $connect_id_auteur AND lien.id_message = messages.id_message AND messages.statut = 'publie' AND (messages.rv != 'oui' OR messages.date_fin > ".sql_quote(date('Y-m-d H:i:s'))." )) AND (lien2.id_auteur = lien2.id_auteur AND lien2.id_message = messages.id_message AND lien2.id_auteur != $connect_id_auteur AND auteurs.id_auteur = lien2.id_auteur)", "auteurs.id_auteur", 'total DESC', 10);
$cor = array();
while($row = sql_fetch($result)) {
$id_auteur = $row['id_auteur'];
$nom = typo($row["nom"]);
$total = $row["total"];
$cor[]= "<div class='tr_liste'\nonmouseover=\"changeclass(this,'tr_liste_over');\"\nonmouseout=\"changeclass(this,'tr_liste');\"\nstyle='padding: 2px; padding-left: 10px; border-bottom: 1px solid #cccccc;'><div class='verdana1'><img src='" . chemin_image('redac-12.gif') . "'\nstyle='border: 0px' alt=' ' /> <a href='" . generer_url_ecrire("auteur_infos","id_auteur=$id_auteur") . "'>$nom,</a> ($total)</div></div>";
}
if ($cor) {
echo "<div style='height: 12px;'></div>";
$bouton = bouton_block_depliable(_T('info_principaux_correspondants'),true,'principaux');
echo debut_cadre('liste',"redacteurs-24.gif",'',$bouton);
echo debut_block_depliable(true,'principaux');
echo "<table width='100%' cellpadding='0' cellspacing='0'>";
echo "<tr><td valign='top' style='width: 50%'>";
$count = ceil(count($cor)/2);
echo join("\n",array_slice($cor, 0, $count));
echo "</td><td valign='top' style='width: 50%'>";
echo join("\n",array_slice($cor, $count));
echo "</td></tr></table>";
echo fin_block();
echo fin_cadre('liste');
}
echo afficher_ses_messages('<b>' . _T('info_pense_bete_ancien') . '</b>', '', "id_auteur=$connect_id_auteur AND statut='publie' AND type='pb' AND rv!='oui'", $messages_vus, false, false);
echo afficher_ses_messages('<b>' . _T('info_tous_redacteurs') . '</b>', '', "statut='publie' AND type='affich' AND (date_fin > DATE_SUB(".sql_quote(date('Y-m-d H:i:s')).", INTERVAL 1 DAY) OR rv != 'oui')", $messages_vus, false, false);
echo fin_gauche(), fin_page();
}
function admin_sauvegardes($dir_dump, $tri)
{
$liste_dump = preg_files(_DIR_DUMP,'\.xml(\.gz)?$',50,false);
$selected = end($liste_dump);
$n = strlen(_DIR_DUMP);
$tl = $tt = $td = array();
$f = "";
$i = 0;
foreach($liste_dump as $fichier){
$i++;
$d = filemtime($fichier);
$t = filesize($fichier);
$s = ($fichier==$selected);
$class = 'row_'.alterner($i, 'even', 'odd');
$fichier = substr($fichier, $n);
$tl[]= liste_sauvegardes($i, $fichier, $class, $s, $d, $t);
$td[] = $d;
$tt[] = $t;
}
if ($tri == 'taille')
array_multisort($tt, SORT_ASC, $tl);
elseif ($tri == 'date')
array_multisort($td, SORT_ASC, $tl);
$fichier_defaut = $f ? basename($f) : str_replace(array("@stamp@","@nom_site@"),array("",""),_SPIP_DUMP);
$self = self();
$class = 'row_'.alterner($i+1, 'even', 'odd');
$head = !$tl ? '' : (
"\n<tr>"
. '<th></th><th><a href="'
. parametre_url($self, 'tri', 'nom')
. '#sauvegardes">'
. _T('info_nom')
. "</a></th>\n" . '<th><a href="'
. parametre_url($self, 'tri', 'taille')
. '#sauvegardes">'
. _T('taille_octets', array('taille' => ''))
. "</a></th>\n" . '<th><a href="'
. parametre_url($self, 'tri', 'date')
. '#sauvegardes">'
. _T('public:date')
. '</a></th></tr>');
$texte = _T('texte_compresse_ou_non')." ";
$h = _T('texte_restaurer_sauvegarde', array('dossier' => '<i>'.$dir_dump.'</i>'));
$res = "\n<p style='text-align: justify;'> "
. $h
. '</p>'
. _T('entree_nom_fichier', array('texte_compresse' => $texte))
. "\n<br /><br /><table class='spip' id='sauvegardes'>"
. $head
. join('',$tl)
. "\n<tr class='$class'><td><input type='radio' name='archive' id='archive' value='' /></td><td colspan='3'>"
. "\n<span class='spip_x-small'><input type='text' name='archive_perso' id='archive_perso' value='$fichier_defaut' size='55' /></span></td></tr>"
. '</table>';
$plie = _T('info_options_avancees');
// restauration partielle / fusion
$opt = debut_cadre_enfonce('',true) .
"\n<div>" .
"<input name='insertion' id='insertion' type='checkbox' /> <label for='insertion'>".
_T('sauvegarde_fusionner') .
"</label><br />\n" .
"<input name='statut' id='statut' type='checkbox' /> <label for='statut'>\n".
_T('sauvegarde_fusionner_depublier') .
"</label><br />\n" .
"<label for='url_site'>" .
_T('sauvegarde_url_origine') .
"</label>" .
" \n<input name='url_site' id='url_site' type='text' size='25' />" .
'</div>' .
fin_cadre_enfonce(true);
$res .= block_parfois_visible('import_tables', $plie, $opt, '', false);
return generer_form_ecrire('import_all', $res, '', _T('bouton_restaurer_base'));
}
