inc-messforum.php3

<?php

include_ecrire('inc_texte.php3');
include_ecrire('inc_filtres.php3');
include_ecrire('inc_mail.php3');
include_ecrire('inc_forum.php3');
include_local('inc-forum.php3');

// Gestionnaire d'URLs
if (@file_exists("inc-urls.php3"))
	include_local("inc-urls.php3");
else
	include_local("inc-urls-".$GLOBALS['type_urls'].".php3");

// Ce fichier inclus par inc-public a un comportement special
// Voir commentaires dans celui-ci et dans inc-forum

$retour_forum = rawurldecode($retour);
$forum_id_article = intval($id_article);
$forum_id_rubrique = intval($id_rubrique);
$forum_id_forum = intval($id_forum);
$forum_id_breve = intval($id_breve);
$forum_id_syndic = intval($id_syndic);
$slash_texte = addslashes($texte);
$slash_titre = addslashes($titre);
$slash_nom_site_forum = addslashes($nom_site_forum);
$slash_url_site = addslashes($url_site);
$id_message = intval($id_message);

// Nature du forum
if (!$id_auteur)
	$id_auteur = intval($GLOBALS['auteur_session']['id_auteur']);

if ($forum_id_article) {
	if ($s = spip_query("SELECT accepter_forum FROM spip_articles
	WHERE id_article=$forum_id_article") AND
	$obj = spip_fetch_array($s))
		$forums_publics = $obj['accepter_forum'];
	else
		$forums_publics = lire_meta("forums_publics");
} else {
	$forums_publics = substr(lire_meta("forums_publics"),0,3);
}

if ($forums_publics == "abo") {
	if ($auteur_session) {
		$statut = $auteur_session['statut'];
		if (!$statut OR $statut == '5poubelle') {
			die ("<h4>"._T('forum_acces_refuse'). "</h4>" . 
			_T('forum_cliquer_retour', array('retour_forum' => $retour_forum)).
			"<p>");
		}
	}
	else {
		die ("<h4>"._T('forum_non_inscrit'). "</h4>" . 
		_T('forum_cliquer_retour', array('retour_forum' => $retour_forum)).
		"<p>");
	}

	// Ne pas autoriser de changement de nom si forum sur abonnement
	$auteur = $auteur_session['nom'];
	$email_auteur = $auteur_session['email'];
} 

$slash_auteur = addslashes($auteur);
$slash_email_auteur = addslashes($email_auteur);

if ((strlen($slash_texte) + strlen($slash_titre) + strlen($slash_nom_site_forum) + strlen($slash_url_site) + strlen($slash_auteur) + strlen($slash_email_auteur)) > 20 * 1024) {
	die ("<h4>"._T('forum_message_trop_long')."</h4>\n" .
	_T('forum_cliquer_retour', array('retour_forum' => $retour_forum)).