Mise en route du suivi.
[aidenligne_francais_universite.git] / ecrire / exec / forum.php
1 <?php
2
3 /***************************************************************************\
4 * SPIP, Systeme de publication pour l'internet *
5 * *
6 * Copyright (c) 2001-2007 *
7 * Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James *
8 * *
9 * Ce programme est un logiciel libre distribue sous licence GNU/GPL. *
10 * Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne. *
11 \***************************************************************************/
12
13 if (!defined("_ECRIRE_INC_VERSION")) return;
14
15 include_spip('inc/presentation');
16 include_spip('inc/texte');
17 charger_generer_url();
18
19
20 // http://doc.spip.org/@liste_numeros_forum
21 function liste_numeros_forum($script, $debut, $total)
22 {
23 echo "\n<p>";
24 for ($i = 0; $i < $total; $i = $i + 10){
25 if ($i > 0) echo " | ";
26 if ($i == $debut)
27 echo "\n<span class='spip_medium'><b>$i</b></span>";
28 else
29 echo "\n<a href='", generer_url_ecrire($script, "debut=$i"), "'>$i</a>";
30 }
31 echo "\n</p>\n";
32 }
33
34 // http://doc.spip.org/@exec_forum_dist
35 function exec_forum_dist()
36 {
37 global $connect_statut, $debut, $admin;
38
39 pipeline('exec_init',array('args'=>array('exec'=>'forum'),'data'=>''));
40
41 $debut = intval($debut);
42
43 $commencer_page = charger_fonction('commencer_page', 'inc');
44 if ($admin) {
45 echo $commencer_page(_T('titre_page_forum'), "forum", "privadm");
46 $statutforum = 'privadm';
47 $logo = "forum-admin-24.gif";
48 $script = 'forum_admin';
49 } else {
50 echo $commencer_page(_T('titre_forum'), "forum", "forum-interne");
51 $statutforum = 'privrac';
52 $logo = "forum-interne-24.gif";
53 $script = 'forum';
54 }
55
56 debut_gauche();
57 echo pipeline('affiche_gauche',array('args'=>array('exec'=>'naviguer','id_rubrique'=>$id_rubrique),'data'=>''));
58 creer_colonne_droite();
59 echo pipeline('affiche_droite',array('args'=>array('exec'=>'naviguer','id_rubrique'=>$id_rubrique),'data'=>''));
60
61 debut_droite();
62
63 if ($admin)
64 gros_titre(_T('titre_cadre_forum_administrateur'));
65 else
66 gros_titre(_T('titre_cadre_forum_interne'));
67
68 if ($admin AND $connect_statut != "0minirezo") {
69 echo _T('avis_non_acces_page');
70 exit;
71 }
72
73 echo pipeline('affiche_milieu',array('args'=>array('exec'=>'naviguer','id_rubrique'=>$id_rubrique),'data'=>''));
74
75
76 $result_forum = spip_query("SELECT COUNT(*) AS cnt FROM spip_forum WHERE statut='$statutforum' AND id_parent=0 LIMIT 11");
77
78 $total = ($row = spip_fetch_array($result_forum)) ? $row['cnt'] : 0;
79
80 if ($total > 10) liste_numeros_forum($script, $debut, $total);
81
82
83 echo "\n<div align='center'>\n";
84 icone (_T('icone_poster_message'), generer_url_ecrire("forum_envoi", "statut=$statutforum&script=$script"), $logo, "creer.gif");
85 echo "\n</div>";
86
87 $limit = $debut ? "LIMIT $debut,10" : "LIMIT 10" ;
88 $result_forum = spip_query("SELECT * FROM spip_forum WHERE statut='$statutforum' AND id_parent=0 ORDER BY date_heure DESC $limit");
89
90 echo afficher_forum($result_forum,$script,"&debut=$debut");
91
92 echo fin_gauche(), fin_page();
93 }
94 ?>