function dater_table($id, $type)
{
$trouver_table = charger_fonction('trouver_table', 'base');
$nom = table_objet($type);
$desc = $trouver_table($nom);
$table = $desc['table'];
$col_id = @$desc['key']["PRIMARY KEY"];
if (!$table OR !$col_id) {
spip_log("action_dater: table $type ?");
return;
}
include_spip('public/interfaces');
$champ = @$GLOBALS['table_date'][$nom];
if (!$champ) $champ = 'date';
$date = format_mysql_date(_request('annee'), _request('mois'), _request('jour'), _request('heure'), _request('minute'));
// utiliser instituer_xx si dispo
if (include_spip('action/editer_'.$type) AND function_exists($f='instituer_'.$type)){
$f($id,array($champ => $date));
}
else
sql_updateq($table, array($champ => $date), "$col_id=$id");
return $date;
}
function exec_spiplistes_courrier_previsu () {
global $meta;
include_spip('base/abstract_sql');
include_spip('inc/presentation');
include_spip('inc/distant');
include_spip('inc/date');
include_spip('inc/urls');
include_spip('inc/meta');
include_spip('inc/filtres');
include_spip('inc/lang');
include_spip('inc/spiplistes_api');
include_spip('inc/spiplistes_api_courrier');
include_spip('inc/spiplistes_api_abstract_sql');
include_spip('public/assembler');
spiplistes_debug_log ('ACTION: exec_spiplistes_courrier_previsu()');
$eol = PHP_EOL;
$int_values = array(
'id_rubrique', 'id_mot', 'id_courrier', 'id_liste'
, 'annee', 'mois', 'jour', 'heure', 'minute'
);
$str_values = array(
'lang'
, 'avec_intro', 'message_intro'
, 'avec_patron', 'patron', 'patron_pos'
, 'avec_sommaire'
, 'titre', 'message', 'pied_patron'
, 'Confirmer', 'date'
, 'lire_base', 'format', 'plein_ecran'
, 'date_sommaire'
, 'oeil_html', 'oeil_texte'
);
foreach(array_merge($str_values, $int_values) as $key) {
$$key = _request($key);
// méfiance sur jQuery 1.4.4 qui semble
// ne plus transmettre les vars qu'en 1.4.2
// @todo: a creuser, verifier les autres vars ajax transmises
//spiplistes_debug_log('PREVISU: '.$key.': '.$$key);
}
foreach($int_values as $key) {
$$key = intval($$key);
}
$date = format_mysql_date($annee,$mois,$jour,$heure,$minute);
$charset = $meta['charset'];
$contexte = array(
'id_courrier' => $id_courrier
, 'lang' => $lang
);
list($lien_html, $lien_texte) = spiplistes_courriers_assembler_patron (
_SPIPLISTES_PATRONS_TETE_DIR . spiplistes_pref_lire('lien_patron')
, $contexte
, !((spiplistes_pref_lire('opt_lien_en_tete_courrier') == 'oui') && $id_courrier)
);
// si envoi a une liste, reprendre le patron de pied de la liste
list($pied_html, $pied_texte) = spiplistes_pied_page_assembler_patron($id_liste, $lang);
$texte_intro = $texte_patron =
$tampon_html = $tampon_texte =
$sommaire_html = '';
if(spiplistes_pref_lire('opt_ajout_tampon_editeur') == 'oui') {
list($tampon_html, $tampon_texte) = spiplistes_tampon_assembler_patron();
}
if($lire_base) {
// prendre le courrier enregistre dans la base
$sql_select = 'texte,titre' . (($format=='texte') ? ',message_texte' : '');
if(
$id_courrier
&& ($row = sql_fetsel($sql_select, "spip_courriers", "id_courrier=".sql_quote($id_courrier), "", "", 1))
) {
foreach(explode(",", $sql_select) as $key) {
$$key = propre($row[$key]);
}
//if($plein_ecran) {
$texte_html = ''
. $lien_html
. $texte
. $pied_html
. $tampon_html
;
if($format=="texte") {
header("Content-Type: text/plain; charset=$charset");
// forcer IE a afficher en ligne.
header("Content-Disposition: inline; filename=spiplistes-previsu.txt");
$message_texte =
empty($message_texte)
? spiplistes_courrier_version_texte($texte_html)
: spiplistes_courrier_version_texte($lien_texte)
. spiplistes_courrier_version_texte($message_texte)
. $pied_texte
. spiplistes_courrier_version_texte($tampon_texte)
;
echo($message_texte);
exit(0);
}
// else
$texte_html = ''
. '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Strict//EN">'.$eol
. (($lang) ? '<html lang="'.$lang.'" dir="ltr">'.$eol : '')
. '<head>'.$eol
. '<meta http-equiv="Content-Type" content="text/html; charset='.$charset.'">'.$eol
. '<meta http-equiv="Pragma" content="no-cache">'.$eol
. '<title>'.textebrut($titre).'</title>'.$eol
. '</head>'.$eol
. '<body style="text-align:center">'.$eol
. '<div style="margin:0 auto">'.$eol
. $texte_html
. '</div>'.$eol
. '</body>'.$eol
. '</html>'.$eol
;
ajax_retour($texte_html);
exit(0);
//} // end if plein_ecran
}
else {
echo(_T('spiplistes:Erreur_courrier_introuvable'));
}
}
//////////////////////////////////////////////////
// si nouveau courrier (pas dans la base), generer un apercu
else {
//spiplistes_debug_log('ACTION: generate preview');
$intro_html = $intro_texte =
$sommaire_html = $sommaire_texte = '';
if($avec_intro == 'oui') {
$ii = propre($message_intro);
$intro_html = '<div>'.$ii.'</div>'.$eol;
$intro_texte = spiplistes_courrier_version_texte($ii).$eol.$eol;
}
if($avec_patron == 'oui') {
// generer le contenu (editeur)
include_spip('public/assembler');
$contexte_template = array(
'date' => trim ($date)
, 'id_rubrique' => $id_rubrique
, 'id_mot' => $id_mot
, 'patron' => $patron
, 'lang' => $lang
, 'sujet' => $titre
, 'message' => $message
);
$titre_html = _T('spiplistes:lettre_info').' '.$nomsite;
$titre_texte = spiplistes_courrier_version_texte($titre_html) . $eol;
list($message_html, $message_texte) = spiplistes_courriers_assembler_patron (
_SPIPLISTES_PATRONS_DIR . $patron
, $contexte_template);
} // end if($avec_patron == 'oui')
else {
$titre_html = propre($titre);
$message_html = propre($message);
$titre_texte = spiplistes_courrier_version_texte($titre_html) . $eol;
$message_texte = spiplistes_courrier_version_texte($message_html) . $eol;
}
if($avec_sommaire == 'oui') {
if($id_rubrique > 0) {
$sql_where = array('id_rubrique='.sql_quote($id_rubrique)
, "statut=".sql_quote('publie'));
if($date_sommaire == 'oui') {
$sql_where[] = "date >= " . sql_quote($date);
}
if($sql_result = sql_select("titre,id_article"
, "spip_articles"
, $sql_where
)) {
while($row = sql_fetch($sql_result)) {
$url =
(spiplistes_spip_est_inferieur_193())
? generer_url_article($row['id_article'])
: generer_url_entite($row['id_article'], 'article')
;
$ii = typo($row['titre']);
$sommaire_html .= "<li> <a href='" . $url . "'>" . $ii . '</a></li>'.$eol;
$sommaire_texte .= " - " . textebrut($ii) . "\n " . $url . $eol;
}
}
}
if($id_mot > 0) {
if($sql_result = sql_select("a.titre,a.id_article"
, "spip_articles AS a LEFT JOIN spip_mots_articles AS m ON a.id_article=m.id_article"
, array(
"a.statut=".sql_quote('publie')
, "m.id_mot=".sql_quote($id_mot)
, "a.date >= " . sql_quote($sql_date)
)
)) {
while($row = sql_fetch($sql_result)) {
$ii = typo($row['titre']);
$url =
(spiplistes_spip_est_inferieur_193())
? generer_url_article($row['id_article'])
: generer_url_entite($row['id_article'], 'article')
;
$sommaire_html .= "<li> <a href='" . $url . "'> " . $ii . "</a></li>\n";
$sommaire_texte .= " - " . textebrut($ii) . "\n " . $url . $eol;
}
}
}
if(!empty($sommaire_html)) {
$sommaire_html = "<ul>" . $sommaire_html . "</ul>\n";
$message_html =
($patron_pos == "avant")
? $message_html . $sommaire_html
: $sommaire_html . $message_html
;
$message_texte =
($patron_pos == "avant")
? $message_texte . $eol . $sommaire_texte
: $sommaire_texte . $eol . $message_texte
;
}
} // end if($avec_sommaire == 'oui')
$form_action = ($id_courrier)
? generer_url_ecrire(_SPIPLISTES_EXEC_COURRIER_GERER, 'id_courrier='.$id_courrier)
: generer_url_ecrire(_SPIPLISTES_EXEC_COURRIER_GERER)
;
$message_html = spiplistes_liens_absolus ($intro_html . $message_html);
$message_texte = spiplistes_liens_absolus ($intro_texte . $message_texte);
spiplistes_debug_log('ACTION: generate page');
$page_result = ''
// boite courrier au format html
. debut_cadre_couleur('', true)
. "<form id='choppe_patron-1' action='$form_action' method='post' name='choppe_patron-1'>\n"
. "<div id='previsu-html' class='switch-previsu'>\n"
. _T('spiplistes:version_html')
. " / " . "<a href='javascript:jQuery(this).switch_previsu()'>"
. _T('spiplistes:version_texte') . "</a>\n"
. "<div class='previsu-content'>\n"
. $message_html
. $message_erreur
. $pied_html
. $tampon_html
. "</div>\n"
. "</div>\n" // fin id='previsu-html
. "<div id='previsu-texte' class='switch-previsu' style='display:none;'>\n"
. "<a href='javascript:jQuery(this).switch_previsu()'>" . _T('spiplistes:version_html') . "</a>\n"
. " / "
. _T('spiplistes:version_texte')
. "<div class='previsu-content'>\n"
. "<pre>"
. $message_texte
. $message_erreur
. $pied_texte
. $tampon_texte
. "</pre>"
. "</div>\n"
. "</div>\n" // fin id='previsu-texte
. "<p style='text-align:right;margin-bottom:0;'>"
. "<input type='hidden' name='modifier_message' value='oui' />\n"
. (
($id_courrier)
? "<input type='hidden' name='id_courrier' value='$id_courrier' />\n"
: "<input type='hidden' name='new' value='oui' />\n"
)
. "<input type='hidden' name='titre' value=\"".htmlspecialchars($titre)."\">\n"
. "<input type='hidden' name='message' value=\"".htmlspecialchars($message_html)."\">\n"
. "<input type='hidden' name='message_texte' value=\"".htmlspecialchars($message_texte)."\">\n"
. "<input type='hidden' name='date' value='$date'>\n"
. "<input type='submit' name='btn_courrier_valider' value='"._T('bouton_valider')."' class='fondo' /></p>\n"
. "</form>\n"
. fin_cadre_couleur(true)
. "<br />\n"
;
echo($page_result);
}
exit(0);
}