Subversion Repositories Sites.tela-botanica.org

Compare Revisions

Ignore whitespace Rev 3 → Rev 4

/trunk/actu/ecrire/inc_forum.php3
New file
0,0 → 1,370
<?php
 
/***************************************************************************\
* SPIP, Systeme de publication pour l'internet *
* *
* Copyright (c) 2001-2005 *
* Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James *
* *
* Ce programme est un logiciel libre distribue sous licence GNU/GPL. *
* Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne. *
\***************************************************************************/
 
 
//
// Ce fichier ne sera execute qu'une fois
if (defined("_ECRIRE_INC_FORUM")) return;
define("_ECRIRE_INC_FORUM", "1");
 
 
//
// Suppression de forums
//
function changer_statut_forum($id_forum, $statut) {
$result = spip_query("SELECT * FROM spip_forum WHERE id_forum=$id_forum");
 
if (!($row = spip_fetch_array($result)))
return;
 
$id_parent = $row['id_parent'];
 
// invalider les pages comportant ce forum
include_ecrire('inc_invalideur.php3');
$index_forum = calcul_index_forum($row['id_article'], $row['id_breve'], $row['id_rubrique'], $row['id_syndic']);
suivre_invalideur("id='id_forum/$index_forum'");
 
// Signaler au moteur de recherche qu'il faut reindexer le thread
if ($id_parent) {
include_ecrire('inc_index.php3');
marquer_indexer ('forum', $id_parent);
}
 
// changer le statut de toute l'arborescence dependant de ce message
$id_messages = array($id_forum);
while ($id_messages) {
$id_messages = join(',', $id_messages);
$query_forum = "UPDATE spip_forum SET statut='$statut'
WHERE id_forum IN ($id_messages)";
$result_forum = spip_query($query_forum);
$query_forum = "SELECT id_forum FROM spip_forum
WHERE id_parent IN ($id_messages)";
$result_forum = spip_query($query_forum);
unset($id_messages);
while ($row = spip_fetch_array($result_forum))
$id_messages[] = $row['id_forum'];
}
}
 
function controler_statut_forum ($controle_forum, $id_controle_forum) {
// Verifier qu'on a le droit d'agir sur ce forum
global $connect_toutes_rubriques, $connect_statut;
$ok = ($connect_statut == "0minirezo" AND $connect_toutes_rubriques);
if (!$ok) return;
 
// Que faut-il faire ?
switch($controle_forum) {
case 'supp_forum':
$statut = 'off';
break;
case 'supp_forum_priv':
$statut = 'privoff';
break;
case 'valid_forum':
$statut = 'publie';
break;
// nb : les forums prives (privrac ou prive), une fois effaces
// (privoff), ne sont pas revalidables ; le forum d'admin (privadm)
// n'est pas effacable
}
changer_statut_forum($id_controle_forum, $statut);
return $statut;
}
 
// Installer un bouton de moderation dans l'espace prive
function controle_cache_forum($action, $id, $texte, $fond, $fonction, $but='') {
$link = new Link();
 
$link->addvar('controle_forum', $action);
$link->addvar('id_controle_forum', $id);
$link = $link->geturl() . "#id$id";
 
if ($but)
$link = $but . "&retour=ecrire/" . urlencode($link);
 
return icone($texte,
$link,
$fond,
$fonction,
"right",
'non');
}
 
// tous les boutons de controle d'un forum
function boutons_controle_forum($id_forum, $forum_stat, $forum_id_auteur=0, $ref, $forum_ip) {
$controle = '';
 
// selection du logo et des boutons correspondant a l'etat du forum
switch ($forum_stat) {
# forum sous un article dans l'espace prive
case "prive":
$logo = "forum-interne-24.gif";
$valider = false;
$valider_repondre = false;
$supprimer = 'supp_forum_priv';
break;
# forum des administrateurs
case "privadmin":
$logo = "forum-admin-24.gif";
$valider = false;
$valider_repondre = false;
$supprimer = false;
break;
# forum de l'espace prive, supprime (non revalidable,
# d'ailleurs on ne sait plus a quel type de forum il appartenait)
case "privoff":
$logo = "forum-interne-24.gif";
$valider = false;
$valider_repondre = false;
$supprimer = false;
break;
# forum general de l'espace prive
case "privrac":
$logo = "forum-interne-24.gif";
$valider = false;
$valider_repondre = false;
$supprimer = 'supp_forum_priv';
break;
 
# forum publie sur le site public
case "publie":
$logo = "forum-public-24.gif";
$valider = false;
$valider_repondre = false;
$supprimer = 'supp_forum';
break;
# forum supprime sur le site public
case "off":
$logo = "forum-public-24.gif";
$valider = 'valid_forum';
$valider_repondre = false;
$supprimer = false;
$message = "<BR><FONT COLOR='red'><B>"._T('info_message_supprime')." $forum_ip</B></FONT>";
if($forum_id_auteur)
$message .= " - <A HREF='auteurs_edit.php3?id_auteur="
.$forum_id_auteur."'>" ._T('lien_voir_auteur'). "</A>";
break;
# forum propose (a moderer) sur le site public
case "prop":
$logo = "forum-public-24.gif";
$valider = 'valid_forum';
$valider_repondre = true;
$supprimer = 'supp_forum';
break;
default:
return;
}
 
if ($message)
$controle .= $message;
 
if ($supprimer)
$controle .= controle_cache_forum($supprimer,
$id_forum,
_T('icone_supprimer_message'),
$logo,
"supprimer.gif");
 
if ($valider)
$controle .= controle_cache_forum($valider,
$id_forum,
_T('icone_valider_message'),
$logo,
"creer.gif");
 
if ($valider_repondre) {
 
$controle .= controle_cache_forum($valider,
$id_forum,
_T('icone_valider_message') . " &amp; " .
_T('lien_repondre_message'),
$logo,
"creer.gif",
"../forum.php3?$ref&id_forum=$id_forum"
);
}
 
return $controle;
}
 
// Selon ce qu'on veut suivre depuis ecrire/controle_forum, retourner le SQL
function critere_statut_controle_forum($page) {
switch ($page) {
case 'public':
$query_forum = "statut IN ('publie', 'off', 'prop') AND texte!=''";
break;
case 'prop':
$query_forum = "statut='prop'";
break;
case 'interne':
$query_forum = "statut IN ('prive', 'privrac', 'privoff', 'privadm') AND texte!=''";
break;
case 'vide':
$query_forum = "statut IN ('publie', 'off', 'prive', 'privrac', 'privoff', 'privadm') AND texte=''";
break;
default:
$query_forum = "0=1";
break;
}
 
return $query_forum;
}
 
// Index d'invalidation des forums
function calcul_index_forum($id_article, $id_breve, $id_rubrique, $id_syndic) {
if ($id_article) return 'a'.$id_article;
if ($id_breve) return 'b'.$id_breve;
if ($id_rubrique) return 'r'.$id_rubrique;
if ($id_syndic) return 's'.$id_syndic;
}
 
//
// Recalculer tous les threads
//
function calculer_threads() {
// fixer les id_thread des debuts de discussion
spip_query("UPDATE spip_forum SET id_thread=id_forum
WHERE id_parent=0");
 
// reparer les messages qui n'ont pas l'id_secteur de leur parent
do {
$discussion = "0";
$precedent = 0;
$r = spip_query("SELECT fille.id_forum AS id,
maman.id_thread AS thread
FROM spip_forum AS fille, spip_forum AS maman
WHERE fille.id_parent = maman.id_forum
AND fille.id_thread <> maman.id_thread
ORDER BY thread");
while (list($id, $thread) = spip_fetch_array($r)) {
if ($thread == $precedent)
$discussion .= ",$id";
else {
if ($precedent)
spip_query("UPDATE spip_forum SET id_thread=$precedent
WHERE id_forum IN ($discussion)");
$precedent = $thread;
$discussion = "$id";
}
}
spip_query("UPDATE spip_forum SET id_thread=$precedent
WHERE id_forum IN ($discussion)");
} while ($discussion != "0");
}
 
// Calculs des URLs des forums (pour l'espace public)
function racine_forum($id_forum){
if (!$id_forum = intval($id_forum)) return;
$query = "SELECT id_parent, id_rubrique, id_article, id_breve FROM spip_forum WHERE id_forum=".$id_forum;
$result = spip_query($query);
if($row = spip_fetch_array($result)){
if($row['id_parent']) {
return racine_forum($row['id_parent']);
}
else {
if($row['id_rubrique']) return array('rubrique',$row['id_rubrique'], $id_forum);
if($row['id_article']) return array('article',$row['id_article'], $id_forum);
if($row['id_breve']) return array('breve',$row['id_breve'], $id_forum);
}
}
}
 
function generer_url_forum_dist($id_forum, $show_thread=false) {
list($type, $id, $id_thread) = racine_forum($id_forum);
if ($id_thread>0 AND $show_thread)
$id_forum = $id_thread;
switch($type) {
case 'article':
return generer_url_article($id)."#forum$id_forum";
break;
case 'breve':
return generer_url_breve($id)."#forum$id_forum";
break;
case 'rubrique':
return generer_url_rubrique($id)."#forum$id_forum";
break;
case 'site':
return generer_url_site($id)."#forum$id_forum";
break;
default:
return "forum.php3?id_forum=".$id_forum;
}
}
 
 
// Recuperer le reglage des forums publics de l'article x
function get_forums_publics($id_article=0) {
$forums_publics = lire_meta("forums_publics");
if ($id_article) {
$query = "SELECT accepter_forum FROM spip_articles WHERE id_article=$id_article";
$res = spip_query($query);
if ($obj = spip_fetch_array($res))
$forums_publics = $obj['accepter_forum'];
} else { // dans ce contexte, inutile
$forums_publics = substr(lire_meta("forums_publics"),0,3);
}
return $forums_publics;
}
 
// Modifier le reglage des forums publics de l'article x
function modifier_forums_publics($id_article, $forums_publics) {
spip_query ("UPDATE spip_articles
SET accepter_forum='$forums_publics'
WHERE id_article=".intval($id_article));
if ($forums_publics == 'abo') {
ecrire_meta('accepter_visiteurs', 'oui');
ecrire_metas();
}
include_ecrire('inc_invalideur.php3');
suivre_invalideur("id='id_forum/a$id_article'");
 
}
 
// Cree le formulaire de modification du reglage des forums de l'article
function formulaire_modification_forums_publics($id_article, $forums_publics) {
global $spip_lang_right;
 
$r = "\n<form action='". $GLOBALS['clean_link']->getUrl()
."' method='POST'>";
 
$r .= "\n<input type='hidden' name='id_article' value='$id_article'>";
$r .= "<br>"._T('info_fonctionnement_forum')."\n";
$r .= "<select name='change_accepter_forum'
class='fondl' style='font-size:10px;'
onChange=\"setvisibility('valider_forum', 'visible');\"
>\n";
 
foreach (array(
'pos'=>_T('bouton_radio_modere_posteriori'),
'pri'=>_T('bouton_radio_modere_priori'),
'abo'=>_T('bouton_radio_modere_abonnement'),
'non'=>_T('info_pas_de_forum'))
as $val => $desc) {
$r .= "<option";
if ($forums_publics == $val)
$r .= " selected";
$r .= " value='$val'>".$desc."</option>\n";
}
$r .= "</select>\n";
 
$r .= "<div align='$spip_lang_right'
class='visible_au_chargement' id='valider_forum'>
<input type='submit' name='Changer' class='fondo'
value='"._T('bouton_changer')."' STYLE='font-size:10px'>
</div>\n";
 
$r .= "</form>";
 
return $r;
}
 
?>