function forum($parent)
{
$result = dbquery("SELECT forum_id, forum_cat, forum_name, forum_description, forum_parent, forum_order FROM " . DB_FORUMS . " WHERE forum_parent='{$parent}' ORDER BY forum_order asc");
$forumR = "";
if (dbrows($result)) {
$k = 1;
while ($data = dbarray($result)) {
$forumR .= forum_parent($data, $result, $k);
$k++;
$forumR .= forum($data['forum_id']);
}
}
return $forumR;
}
function controle_forum_boucle($row, $args) {
$id_forum = $row['id_forum'];
$forum_id_parent = $row['id_parent'];
$forum_id_rubrique = $row['id_rubrique'];
$forum_id_article = $row['id_article'];
$forum_id_breve = $row['id_breve'];
$forum_date_heure = $row['date_heure'];
$forum_titre = echapper_tags($row['titre']);
$forum_texte = $row['texte'];
$forum_auteur = echapper_tags(extraire_multi($row['auteur']));
$forum_email_auteur = echapper_tags($row['email_auteur']);
$forum_nom_site = echapper_tags($row['nom_site']);
$forum_url_site = echapper_tags($row['url_site']);
$forum_stat = $row['statut'];
$forum_ip = $row['ip'];
$forum_id_auteur = $row["id_auteur"];
$r = forum_parent($id_forum);
$avant = $r['avant'];
$url = $r['url'];
$titre = $r['titre'];
$type = $r['type'];
$valeur = $r['valeur'];
$pref = $r['pref'];
if ($documents = sql_allfetsel('doc.id_document, doc.fichier AS fichier', 'spip_documents AS doc LEFT JOIN spip_documents_liens AS lien ON doc.id_document=lien.id_document', 'lien.id_objet='.intval($id_forum)." AND objet='forum'")) {
include_spip('inc/documents');
foreach ($documents as $k => $t) {
$h = generer_url_entite($t['id_document'], 'document');
$documents[$k] = "<a href='".$h."'>".basename($t['fichier'])."</a>";
}
}
switch($forum_stat) {
case 'off':
case 'privoff':
$style = " style='border: 2px #ff0000 dashed;'";
break;
case 'prop':
$style = " style='border: 2px yellow solid; background-color: white;'";
break;
case 'spam':
$style = " style='border: 2px black dotted;'";
break;
default:
$style = "";
break;
}
if ($forum_email_auteur) {
if (email_valide($forum_email_auteur))
$forum_email_auteur = "<a href='mailto:"
.htmlspecialchars($forum_email_auteur)
."?subject=".rawurlencode($forum_titre)."'>".$forum_email_auteur
."</a>";
$forum_auteur .= " — $forum_email_auteur";
}
$suite = "\n<br />$avant<b>$pref\n<a href='$url' class='controle'>$titre</a></b>"
. "<div class='controle'>".justifier(propre($forum_texte))."</div>";
include_spip('public/composer');
if ($forum_notes = safehtml(calculer_notes()))
$suite .= "<div class='notes controle'>".justifier(safehtml($forum_notes))."</div>";
if (strlen($forum_url_site) > 10 AND strlen($forum_nom_site) >= 3)
$suite .= "\n<div style='text-align: left' class='serif'><b><a href='$forum_url_site'>$forum_nom_site</a></b></div>";
return "\n<div><br /><a id='forum$id_forum'></a></div>" .
debut_cadre_forum("", true, "", typo($forum_titre)) .
"<div$style>" .
date_interface($forum_date_heure) .
safehtml("<span class='arial2'> / <b>$forum_auteur</b></span>") .
boutons_controle_forum($id_forum, $forum_stat, $forum_id_auteur, "$type=$valeur", $forum_ip, 'controle_forum', $args) .
safehtml(lignes_longues($suite)) .
afficher_forum_mots($id_forum) .
join(', ', $documents) .
"<div class='nettoyeur'></div></div>".
fin_cadre_forum(true);
}
