Subversion Repositories Sites.tela-botanica.org

Rev

Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
4 david 1
<?php
2
 
3
//
4
// Ce fichier ne sera execute qu'une fois
5
if (defined("_INC_FORUM")) return;
6
define("_INC_FORUM", "1");
7
 
8
 
9
include_ecrire("inc_meta.php3");
10
include_ecrire("inc_admin.php3");
11
include_ecrire("inc_acces.php3");
12
include_ecrire("inc_texte.php3");
13
include_ecrire("inc_filtres.php3");
14
include_ecrire('inc_lang.php3');	// pour lang_select
15
include_ecrire("inc_mail.php3");
16
include_ecrire("inc_barre.php3");
17
 
18
if (@file_exists("inc-urls.php3")) {
19
	include_local ("inc-urls.php3");
20
}
21
else {
22
	include_local ("inc-urls-dist.php3");
23
}
24
 
25
// dupliquee dans ecrire/articles.php3 ; mais je ne sais pas ou l'installer (Fil)...
26
function get_forums_publics($id_article=0) {
27
	$forums_publics = lire_meta("forums_publics");
28
	if ($id_article) {
29
		$query = "SELECT accepter_forum FROM spip_articles WHERE id_article=$id_article";
30
		$res = spip_query($query);
31
		if ($obj = spip_fetch_object($res))
32
			$forums_publics = $obj->accepter_forum;
33
	} else {
34
		$forums_publics = substr(lire_meta("forums_publics"),0,3);
35
	}
36
	return $forums_publics;
37
}
38
 
39
function afficher_petits_logos_mots($id_mot) {
40
	$racine = "IMG/moton$id_mot";
41
	if (@file_exists("$racine.gif")) {
42
		$image = "$racine.gif";
43
	} elseif (@file_exists("$racine.jpg")) {
44
		$image = "$racine.jpg";
45
	} elseif (@file_exists("$racine.png")) {
46
		$image = "$racine.png";
47
	}
48
 
49
	if ($image) {
50
		$taille = getimagesize($image);
51
		$largeur = $taille[0];
52
		$hauteur = $taille[1];
53
		if ($largeur < 100 AND $hauteur < 100)
54
			return "<IMG SRC='$image' align='middle' WIDTH='$largeur' HEIGHT='$hauteur' HSPACE='1' VSPACE='1' ALT=' ' BORDER=0 class='spip_image'> ";
55
		else return "";
56
	} else {
57
		return "";
58
	}
59
}
60
 
61
 
62
function decoder_hash_forum($email, $hash) {
63
	if (!$email OR !$hash) return false;
64
	$query = "SELECT * FROM spip_auteurs WHERE email='$email'";
65
	$result = spip_query($query);
66
	while ($row = spip_fetch_array($result)) {
67
		if (verifier_action_auteur("forum public $email", $hash, $row['id_auteur'])) {
68
			$ok = true;
69
			break;
70
		}
71
	}
72
	if ($ok) return $row;
73
	else return false;
74
}
75
 
76
 
77
function forum_abonnement($retour) {
78
	if ($GLOBALS['auteur_session'])
79
		return true;	// autoriser le formulaire
80
	else {
81
		include_local("inc-login.php3");
82
 
83
		$message_login = _T('forum_vous_enregistrer').'<a href="spip_pass.php3" target="spip_pass" onclick="'
84
			."javascript:window.open(this.href, 'spip_pass', 'scrollbars=yes, resizable=yes, width=480, height=450'); return false;\">"
85
			._T('forum_vous_inscrire')."<br>\n";
86
		login('', false, $message_login);
87
		return false;
88
	}
89
}
90
 
91
 
92
//
93
// Afficher le formulaire d'edition de forum en fonction du contexte
94
//
95
 
96
function retour_forum($id_rubrique, $id_parent, $id_article, $id_breve, $id_syndic, $titre='') {
97
	global $REQUEST_URI, $HTTP_GET_VARS, $PATH_TRANSLATED, $REMOTE_ADDR, $id_message;
98
	global $new, $redac, $afficher_groupe, $afficher_texte;
99
	global $spip_forum_user;
100
 
101
	$forums_publics = get_forums_publics($id_article);
102
	if ($forums_publics == "non") return;
103
 
104
	$lien = substr($REQUEST_URI, strrpos($REQUEST_URI, '/') + 1);
105
 
106
	$retour = $HTTP_GET_VARS['retour'];
107
	if (!$retour)
108
		$retour = rawurlencode($lien);
109
 
110
	if ($forums_publics == 'abo') {
111
		if (!forum_abonnement($retour)) return;
112
	}
113
 
114
	$ret .= "\n<a name='formulaire_forum'></a>\n";
115
 
116
	if ($forums_publics == "pri") {
117
		$ret.= _T('forum_info_modere')."<p>";
118
	}
119
 
120
	// Recuperer le message a previsualiser
121
	if ($id_message = intval($id_message)) {
122
		$query_forum="SELECT * FROM spip_forum WHERE ip=\"$REMOTE_ADDR\" AND id_forum=$id_message";
123
		$result_forum=spip_query($query_forum);
124
 
125
		while($row = spip_fetch_array($result_forum)) {
126
			$titre=$row['titre'];
127
			$texte=$row['texte'];
128
			$auteur=$row['auteur'];
129
			$email_auteur=$row['email_auteur'];
130
			$nom_site_forum=$row['nom_site'];
131
			$url_site=$row['url_site'];
132
		}
133
 
134
		if ($afficher_texte != 'non') {
135
			$ret .= "<div class='spip_encadrer'>";
136
			if ($afficher_texte != "non"){
137
				$ret .= "<div style='font-size: 120%; font-weigth: bold;'>".typo($titre)."</div>";
138
				$ret .= "<p /><b><a href='mailto:".entites_html($email_auteur)."'>".typo($auteur)."</a></b>";
139
				$ret .= "<p />".propre($texte)."<p />";
140
			}
141
 
142
			$ret .= "<a href='".entites_html($url_site)."'>".typo($nom_site_forum)."</a>";
143
 
144
			// Verifier mots associes au message
145
			$query_mots = "SELECT mots.* FROM spip_mots_forum AS lien, spip_mots AS mots WHERE id_forum='$id_message' AND mots.id_mot = lien.id_mot GROUP BY mots.id_mot";
146
			$result_mots = spip_query($query_mots);
147
			if (spip_num_rows($result_mots)>0) $ret .= "<p>"._T('forum_avez_selectionne');
148
			while ($row = spip_fetch_array($result_mots)) {
149
				$id_mot = $row['id_mot'];
150
				$type_mot = $row['type'];
151
				$titre_mot = $row['titre'];
152
				$les_mots[$id_mot] = true;
153
				$presence_mots = true;
154
 
155
				$ret.= "<li class='font-size=80%'> $type_mot&nbsp;: <b>$titre_mot</b></li>";
156
			}
157
 
158
			$ret .= "\n<form action='$lien' name='formulaire' method='post'>";
159
			if (strlen($texte) < 10 AND !$presence_mots) {
160
				$ret .= "<p align='right'><font color=red>"._T('forum_attention_dix_caracteres')."</font></p>\n";
161
			}
162
			else if (strlen($titre) < 3 AND $afficher_texte <> "non") {
163
				$ret .= "<p align='right'><font color=red>"._T('forum_attention_trois_caracteres')."</font></p>\n";
164
			}
165
			else {
166
				$ret .= "\n<div align='right'><input type='submit' name='confirmer' class='spip_bouton' value='"._T('forum_message_definitif')."' /></div>";
167
			}
168
			$ret .= "</div>\n<br />";
169
		}
170
	}
171
	else {
172
		// Si premiere edition, initialiser le titre et l'auteur
173
		if (!$titre) {
174
			if ($id_parent)
175
				$titre_select = "SELECT titre FROM spip_forum WHERE id_forum = $id_parent AND statut='publie'";
176
			else if ($id_rubrique)
177
				$titre_select = "SELECT titre FROM spip_rubriques WHERE id_rubrique = $id_rubrique AND statut='publie'";
178
			else if ($id_article)
179
				$titre_select = "SELECT titre FROM spip_articles WHERE id_article = $id_article AND statut='publie'";
180
			else if ($id_breve)
181
				$titre_select = "SELECT titre FROM spip_breves WHERE id_breve = $id_breve AND statut='publie'";
182
			else if ($id_syndic)
183
				$titre_select = "SELECT nom_site AS titre FROM spip_syndic WHERE id_syndic = $id_syndic AND statut='publie'";
184
			else
185
				$titre_select = "SELECT '".addslashes(_T('forum_titre_erreur'))."' AS titre";
186
 
187
			if ($res = spip_fetch_object(spip_query($titre_select)))
188
				$titre = '> ' . supprimer_numero(ereg_replace ('^[>[:space:]]*', '', $res->titre));
189
			else
190
				$titre = _T('forum_titre_erreur');
191
		}
192
		if ($spip_forum_user && is_array($cookie_user = unserialize($spip_forum_user))) {
193
			$auteur = $cookie_user['nom'];
194
			$email_auteur = $cookie_user['email'];
195
		}
196
		else {
197
			$auteur = $GLOBALS['auteur_session']['nom'];
198
			$email_auteur = $GLOBALS['auteur_session']['email'];
199
		}
200
		$ret .= "\n<form action='$lien' name='formulaire' method='post'>";
201
	}
202
 
203
	$ret .= "\n";
204
 
205
	// Generation d'une valeur de securite pour validation
206
	$seed = (double) (microtime() + 1) * time() * 1000000;
207
	@mt_srand($seed);
208
	$alea = @mt_rand();
209
	if (!$alea) {
210
		srand($seed);
211
		$alea = rand();
212
	}
213
	$id_rubrique = intval($id_rubrique);
214
	$id_parent = intval($id_parent);
215
	$id_article = intval($id_article);
216
	$id_breve = intval($id_breve);
217
	$id_syndic = intval($id_syndic);
218
	$hash = calculer_action_auteur("ajout_forum $id_rubrique $id_parent $id_article $id_breve $id_syndic $alea");
219
 
220
	// Afficher le formulaire d'edition
221
	$titre = entites_html($titre);
222
	$texte = entites_html($texte);
223
 
224
	if ($afficher_texte == "non"){
225
		$ret .= "\n<input type='hidden' name='titre' VALUE=\"$titre\" />";
226
	}
227
	else {
228
		$ret .= "\n<div class='spip_encadrer'><b>"._T('forum_titre')."</b><br />";
229
		$ret .= "\n<input type='text' CLASS='forml' name='titre' value=\"$titre\" size='40'></div>";
230
	}
231
 
232
	$ret .= "\n<input type='Hidden' name='id_message' value=\"$id_message\" />";
233
	$ret .= "\n<input type='Hidden' name='ajout_forum' value=\"oui\" />";
234
	$ret .= "\n<input type='Hidden' name='forum_id_rubrique' value=\"$id_rubrique\" />";
235
	$ret .= "\n<input type='Hidden' name='forum_id_parent' value=\"$id_parent\" />";
236
	$ret .= "\n<input type='Hidden' name='forum_id_article' value=\"$id_article\" />";
237
	$ret .= "\n<input type='Hidden' name='forum_id_breve' value=\"$id_breve\" />";
238
	$ret .= "\n<input type='Hidden' name='forum_id_syndic' value=\"$id_syndic\" />";
239
	$ret .= "\n<input type='Hidden' name='alea' value=\"$alea\" />";
240
	$ret .= "\n<input type='Hidden' name='hash' value=\"$hash\" />";
241
	$ret .= "\n<input type='Hidden' name='retour_forum' value=\"$retour\" />";
242
 
243
	if ($new != "oui" AND $redac != "oui") $ret .= "\n<input type='Hidden' name='new' value=\"oui\" />";
244
	if ($new == "oui") $ret .= "\n<input type='Hidden' name='redac' value=\"oui\" />";
245
 
246
	if ($afficher_texte != "non"){
247
		$ret .= "\n<br /><div class='spip_encadrer'><b>"._T('forum_texte')."</b><br />\n";
248
		$ret .= _T('forum_creer_paragraphes');
249
		$ret .= "<br />\n";
250
		$ret .= afficher_barre('formulaire', 'texte', true);
251
		$ret .= "<textarea name='texte' ".afficher_claret()." rows='12' class='forml' cols='40'>";
252
		$ret.= $texte;
253
		$ret .= "\n</textarea></div>\n";
254
	}
255
 
256
 
257
	// Gestion des mots-cles
258
 
259
	$mots_cles_forums=lire_meta("mots_cles_forums");
260
	if ($mots_cles_forums == "oui"){
261
		if ($id_rubrique > 0) $table = "rubriques";
262
		else if ($id_article > 0) $table = "articles";
263
		else if ($id_breve > 0) $table = "breves";
264
		else if ($id_syndic > 0) $table = "syndic";
265
 
266
 
267
		if ($afficher_groupe) {
268
			$afficher_groupe = join($afficher_groupe, ",");
269
			$selectionner_groupe = "AND id_groupe IN ($afficher_groupe)";
270
		}
271
		if ($table){
272
			$query_groupe = "SELECT * FROM spip_groupes_mots WHERE 6forum = 'oui' AND $table = 'oui' $selectionner_groupe";
273
			$result_groupe = spip_query($query_groupe);
274
			while ($row_groupe = spip_fetch_array($result_groupe)) {
275
				$id_groupe = $row_groupe['id_groupe'];
276
				$titre_groupe = $row_groupe['titre'];
277
				$unseul_groupe = $row_groupe['unseul'];
278
 
279
				$query = "SELECT * FROM spip_mots WHERE id_groupe='$id_groupe'";
280
				$result = spip_query($query);
281
				$total_rows = spip_num_rows($result);
282
 
283
				if ($total_rows > 0){
284
					$ret .= "\n<p /><div class='spip_encadrer' style='font-size: 80%;'>";
285
					$ret.= "<b>$titre_groupe&nbsp;:</b>";
286
 
287
					$ret .= "<table cellpadding=0 cellspacing=0 border=0 width='100%'>\n";
288
					$ret .= "<tr><td width='47%' valign='top'>";
289
					$i = 0;
290
 
291
					while ($row = spip_fetch_array($result)) {
292
						$id_mot = $row['id_mot'];
293
						$titre_mot = propre($row['titre']);
294
						$type_mot = propre($row['type']);
295
						$descriptif_mot = $row['descriptif'];
296
 
297
						if ($i >= ($total_rows/2) AND $i < $total_rows){
298
							$i = $total_rows + 1;
299
							$ret .= "</font></td><td width='6%'>&nbsp;</td><td width='47%' valign='top'>";
300
						}
301
 
302
						if ($les_mots[$id_mot]) $checked = "checked";
303
						else $checked = "";
304
 
305
						if ($unseul_groupe == 'oui'){
306
							$ret .= "<input type='radio' name='ajouter_mot[$id_groupe][]' value='$id_mot' $checked id='mot$id_mot'> ";
307
						}
308
						else {
309
							$ret .= "<input type='checkbox' name='ajouter_mot[$id_groupe][]' value='$id_mot' $checked id='mot$id_mot'> ";
310
						}
311
 
312
						$ret .=  afficher_petits_logos_mots($id_mot);
313
						$ret .= "<B><label for='mot$id_mot'>$titre_mot</label></B><br>";
314
						if (strlen($descriptif_mot) > 0) $ret .= "$descriptif_mot<br>";
315
						$i++;
316
					}
317
 
318
					$ret .= "</font></td></tr></table>";
319
 
320
					$ret .= "</div>";
321
				}
322
			}
323
		}
324
	}
325
 
326
	// Edition du texte du forum
327
	if ($afficher_texte != "non") {
328
		$ret .= "\n<br /><div class='spip_encadrer'>"._T('forum_lien_hyper')."<br />\n";
329
		$ret .= _T('forum_page_url');
330
		$ret .= "<br />\n"._T('forum_titre');
331
		$ret .= "<br />\n<input type='text' class='forml' name='nom_site_forum' value=\"".entites_html($nom_site_forum)."\" size='40'><br />";
332
 
333
		if (!$url_site) $url_site = "http://";
334
		$ret .= "\n"._T('forum_url');
335
		$ret .= "<br />\n<input type='text' class='forml' name='url_site' value=\"".entites_html($url_site)."\" size='40' /></div>";
336
 
337
		$ret .= "\n<br /><div class='spip_encadrer'>"._T('forum_qui_etes_vous')."<br />";
338
 
339
		if ($forums_publics == "abo")
340
			$disabled = ' disabled="disabled"';
341
 
342
		$ret .= "\n"._T('forum_votre_nom');
343
		$ret .= "<br />\n<input type='text' class='forml' name='auteur' value=\"".entites_html($auteur)."\" size='40'$disabled /><br />\n";
344
 
345
		$ret .= _T('forum_votre_email');
346
		$ret .= "<br />\n<input type='text' class='forml' name='email_auteur' value=\"".entites_html($email_auteur)."\" size='40'$disabled /></div>";
347
	}
348
 
349
	// Bouton de validation
350
	if ($afficher_texte !="non") $ret .= "\n<br /><div align='right'><input type='submit' name='Valider' class='spip_bouton' value='"._T('forum_voir_avant')."' /></div>";
351
	else  $ret .= "\n<br /><div align='right'><input type='submit' name='Valider' class='spip_bouton' value='"._T('forum_valider')."' /></div>";
352
 
353
	$ret .= "</form>";
354
 
355
	return $ret;
356
}
357
 
358
 
359
//
360
// Fonction appelee a l'ajout d'un message
361
// (previsualisation et validation finale)
362
//
363
 
364
function ajout_forum() {
365
	global $texte, $titre, $nom_site_forum, $url_site, $auteur, $email_auteur, $retour_forum, $id_message, $confirmer;
366
	global $forum_id_rubrique, $forum_id_parent, $forum_id_article, $forum_id_breve, $forum_id_syndic, $alea, $hash;
367
	global $auteur_session;
368
	global $ajouter_mot, $new;
369
	global $REQUEST_URI, $HTTP_COOKIE_VARS, $REMOTE_ADDR;
370
	global $afficher_texte;
371
 
372
	if (!$GLOBALS['db_ok']) {
373
		die ("<h4>"._T('forum_probleme_database')."</h4>");
374
	}
375
 
376
	$texte = addslashes($texte);
377
	$titre = addslashes($titre);
378
	$nom_site_forum = addslashes($nom_site_forum);
379
	$url_site = addslashes($url_site);
380
	$auteur = addslashes($auteur);
381
	$email_auteur = addslashes($email_auteur);
382
	$id_message = intval($id_message);
383
	$retour_forum = rawurldecode($retour_forum);
384
	$forum_id_article = intval($forum_id_article);
385
	$forum_id_rubrique = intval($forum_id_rubrique);
386
	$forum_id_parent = intval($forum_id_parent);
387
	$forum_id_breve = intval($forum_id_breve);
388
	$forum_id_syndic = intval($forum_id_syndic);
389
 
390
	$forums_publics = get_forums_publics($forum_id_article);
391
	$validation_finale = (strlen($confirmer) > 0 OR ($afficher_texte=='non' AND $ajouter_mot));
392
 
393
	// Gestion forums sur abonnement
394
	if ($forums_publics == "abo") {
395
		if ($auteur_session) {
396
			$statut = $auteur_session['statut'];
397
 
398
			if (!$statut OR $statut == '5poubelle') {
399
				die ("<h4>"._T('forum_acces_refuse'). "</h4>" . _T('forum_cliquer_retour', array('retour_forum' => $retour_forum)). "<p>");
400
			}
401
		}
402
		else {
403
			die ("<h4>"._T('forum_non_inscrit'). "</h4>" .
404
			_T('forum_cliquer_retour', array('retour_forum' => $retour_forum))."<p>");
405
		}
406
		// Ne pas autoriser de changement de nom si le forum est sur abonnement
407
		$auteur = $auteur_session['nom'];
408
		$email_auteur = $auteur_session['email'];
409
	}
410
 
411
	// Verification des donnees et gestion du cache
412
	if ($validation_finale) {
413
		if (!verifier_action_auteur("ajout_forum $forum_id_rubrique $forum_id_parent $forum_id_article $forum_id_breve $forum_id_syndic $alea", $hash)) {
414
			@header("Location: $retour_forum");
415
			exit;
416
		}
417
		if ((strlen($texte) + strlen($titre) + strlen($nom_site_forum) + strlen($url_site) + strlen($auteur) + strlen($email_auteur)) > 20 * 1024) {
418
			die ("<h4>"._T('forum_message_trop_long')."</h4>\n" .
419
			_T('forum_cliquer_retour', array('retour_forum' => $retour_forum))."<p>");
420
		}
421
 
422
		unset($where);
423
		if ($forum_id_article) $where[] = "id_article=$forum_id_article";
424
		if ($forum_id_rubrique) $where[] = "id_rubrique=$forum_id_rubrique";
425
		if ($forum_id_breve) $where[] = "id_breve=$forum_id_breve";
426
		if ($forum_id_parent) $where[] = "id_forum=$forum_id_parent";
427
		if ($where) {
428
			$query = "SELECT fichier FROM spip_forum_cache WHERE ".join(' OR ', $where);
429
			$result = spip_query($query);
430
			unset($fichiers);
431
			while ($row = spip_fetch_array($result)) {
432
				$fichier = $row["fichier"];
433
				@unlink("CACHE/$fichier");
434
				@unlink("CACHE/$fichier.NEW");
435
				$fichiers[] = "'".$fichier."'";
436
			}
437
			if ($fichiers) {
438
				$fichiers = join(',', $fichiers);
439
				$query = "DELETE FROM spip_forum_cache WHERE fichier IN ($fichiers)";
440
				spip_query($query);
441
			}
442
		}
443
	}
444
 
445
	switch ($forums_publics) {
446
		case "non":
447
			$etat = "off";
448
			break;
449
		case "pri":
450
			$etat = "prop";
451
			break;
452
		default:
453
			$etat = "publie";
454
			break;
455
	}
456
 
457
	if (!$id_auteur) $id_auteur = $GLOBALS['auteur_session']['id_auteur'];
458
 
459
	if ($new == "oui") {
460
		$nouveau_document = true;
461
		if ($HTTP_GET_VARS['titre']){
462
			$titre = "> ".rawurldecode($HTTP_GET_VARS['titre']);
463
		}
464
		$query_forum = "INSERT INTO spip_forum (date_heure, titre, ip, statut)
465
			VALUES (NOW(), \"".addslashes($titre)."\", \"$REMOTE_ADDR\", \"redac\")";
466
		$result_forum = spip_query($query_forum);
467
		$id_message = spip_insert_id();
468
	}
469
 
470
	// Ajouter les mots-cles
471
	$query_mots = "DELETE FROM spip_mots_forum WHERE id_forum='$id_message'";
472
	$result_mots = spip_query($query_mots);
473
	if ($ajouter_mot){
474
		for (reset($ajouter_mot); $key = key($ajouter_mot); next($ajouter_mot)){
475
			$les_mots .= ",".join($ajouter_mot[$key],",");
476
		}
477
 
478
		$les_mots = explode(",", $les_mots);
479
		for ($index = 0; $index < count($les_mots); $index++){
480
			$le_mot = $les_mots[$index];
481
			if ($le_mot > 0)
482
				spip_query("INSERT INTO spip_mots_forum (id_mot, id_forum) VALUES ('$le_mot', '$id_message')");
483
		}
484
 
485
	}
486
 
487
	$query_forum = "UPDATE spip_forum
488
		SET id_parent = $forum_id_parent, id_rubrique =$forum_id_rubrique, id_article = $forum_id_article, id_breve = $forum_id_breve, id_syndic = \"$forum_id_syndic\",
489
			date_heure = NOW(), titre = \"$titre\", texte = \"$texte\", nom_site = \"$nom_site_forum\", url_site = \"$url_site\", auteur = \"$auteur\",
490
			email_auteur = \"$email_auteur\",  ip = \"$REMOTE_ADDR\", statut = \"redac\", id_auteur = \"$id_auteur\"
491
		WHERE id_forum = '$id_message'";
492
	$result_forum = spip_query($query_forum);
493
 
494
	if ($validation_finale) {
495
		spip_query("UPDATE spip_forum SET statut=\"$etat\" WHERE id_forum='$id_message'");
496
 
497
		$texte = stripslashes($texte);
498
		$titre = stripslashes($titre);
499
		$auteur = stripslashes($auteur);
500
		$email_auteur = stripslashes($email_auteur);
501
 
502
		// Poser un cookie pour ne pas retaper le nom / email
503
		$cookie_user = array('nom' => $auteur, 'email' => $email_auteur);
504
		spip_setcookie('spip_forum_user', serialize($cookie_user));
505
 
506
		// Envoi d'un mail aux auteurs
507
		$prevenir_auteurs = lire_meta("prevenir_auteurs");
508
		if ($prevenir_auteurs == "oui" AND $afficher_texte != "non") {
509
			if ($id_article = $forum_id_article) {
510
				$url = ereg_replace('^/', '', generer_url_article($id_article));
511
				$adresse_site = lire_meta("adresse_site");
512
				$nom_site_spip = lire_meta("nom_site");
513
				$url = "$adresse_site/$url";
514
				$courr = _T('form_forum_message_auto')."\n\n";
515
				$parauteur = '';
516
				if (strlen($auteur) > 2) {
517
					$parauteur = " "._T('forum_par_auteur', array('auteur' => $auteur));
518
					if ($email_auteur) $parauteur .= " <$email_auteur>";
519
				}
520
				$courr .= _T('forum_poste_par', array('parauteur' => $parauteur))."\n";
521
				$courr .= _T('forum_ne_repondez_pas')."\n";
522
				$courr .= "$url\n";
523
				$courr .= "\n\n".$titre."\n\n".textebrut(propre($texte))."\n\n$nom_site_forum\n$url_site\n";
524
				$sujet = "[$nom_site_spip] ["._T('forum_forum')."] $titre";
525
				$query = "SELECT auteurs.* FROM spip_auteurs AS auteurs, spip_auteurs_articles AS lien ".
526
					"WHERE lien.id_article='$id_article' AND auteurs.id_auteur=lien.id_auteur";
527
				$result = spip_query($query);
528
 
529
				while ($row = spip_fetch_array($result)) {
530
					$email_auteur = trim($row["email"]);
531
					if (strlen($email_auteur) < 3) continue;
532
					envoyer_mail($email_auteur, $sujet, $courr);
533
				}
534
			}
535
		}
536
 
537
		@header("Location: $retour_forum");
538
		exit;
539
	}
540
}
541
 
542
?>