Subversion Repositories Applications.papyrus

Rev

Rev 448 | Blame | Last modification | View Log | RSS feed

<?

// +--------------------------------------------------------------------------------------------------+
// |appli_arbre.php                                                                                     |
// +--------------------------------------------------------------------------------------------------+
// | Copyright (c) 2002                                                                                         |
// +--------------------------------------------------------------------------------------------------+
// | Ce programme utilise l'objet arbre défini dans arbre.php pour             |
// | générer un arbre des forums, les tables requises sont                            |
// | agora, agora_join, agora_categ, agora_stat                                         |
// +--------------------------------------------------------------------------------------------------+
// | Auteur : Alexandre Granier <alexandre@tela-botanica.org>           |
// +--------------------------------------------------------------------------------------------------+
//
// $Id: appli_arbre.php,v 1.1 2005-09-22 14:02:48 ddelon Exp $

include ("php/lib/lib.putstyle.php");



function afficherContenuCorps () {
        global $thema; //permet un passage de parametre
        global $GS_GLOBAL ;

$page_arg = $GS_GLOBAL['current_page_row']->P_ARGUMENT;
if($page_arg != ""):$thema=$page_arg;endif;

// version alexandre

//javascript pour la gestion des popup
//------------------------------------------------------------------------------
global $G_javascript;
$G_javascript = $G_javascript." function MagicPopup (mURL) {"."\n";
$G_javascript = $G_javascript." var sArgs = 'toolbar=0'+"."\n";
$G_javascript = $G_javascript." ',hotkeys=0'+"."\n";
$G_javascript = $G_javascript." ',location=0'+"."\n";
$G_javascript = $G_javascript." ',directories=0'+"."\n";
$G_javascript = $G_javascript." ',menubar=0'+"."\n";
$G_javascript = $G_javascript." ',personalbar=0'+"."\n";
$G_javascript = $G_javascript." ',status=0'+"."\n";
$G_javascript = $G_javascript." ',scrollbars=1'+"."\n";
$G_javascript = $G_javascript." ',resizable=1'+"."\n";
$G_javascript = $G_javascript." ',width=640 '+"."\n";
$G_javascript = $G_javascript." ',height=450';"."\n";
$G_javascript = $G_javascript."\n";
$G_javascript = $G_javascript." var wWindow = open (mURL, 'more', sArgs);"."\n";
$G_javascript = $G_javascript." wWindow.window.focus ();"."\n";
$G_javascript = $G_javascript." }"."\n";
$G_javascript = $G_javascript."\n";

GEN_ ("MagicPopup" , $G_javascript) ;

$G_javascript = " function MagicPopup2 (mURL) {"."\n";
$G_javascript = $G_javascript." var sArgs = 'toolbar=1'+"."\n";
$G_javascript = $G_javascript." ',hotkeys=0'+"."\n";
$G_javascript = $G_javascript." ',location=1'+"."\n";
$G_javascript = $G_javascript." ',directories=0'+"."\n";
$G_javascript = $G_javascript." ',menubar=1'+"."\n";
$G_javascript = $G_javascript." ',personalbar=1'+"."\n";
$G_javascript = $G_javascript." ',status=1'+"."\n";
$G_javascript = $G_javascript." ',scrollbars=1'+"."\n";
$G_javascript = $G_javascript." ',resizable=1'+"."\n";
$G_javascript = $G_javascript." ',width=800 '+"."\n";
$G_javascript = $G_javascript." ',height=600';"."\n";
$G_javascript = $G_javascript." ',left=0';"."\n";
$G_javascript = $G_javascript." ',top=0';"."\n";
$G_javascript = $G_javascript."\n";
$G_javascript = $G_javascript." var wWindow = open (mURL, 'more', sArgs);"."\n";
$G_javascript = $G_javascript." wWindow.window.focus ();"."\n";
$G_javascript = $G_javascript." }"."\n";
$G_javascript = $G_javascript."\n";

js_register ("MagicPopup2" , $G_javascript) ;
//------------------------------------------------------------------------------



include "php/frame/arbre/arbre.php" ;

global $num_sem;  // le numero de la semaine

// requete sur le sommet de l'arbre
$query = "SELECT NB_ABONNES,NUM_SEM FROM agora_stats WHERE FORUM=\"tela-botanicae\" ORDER BY NUM_SEM DESC" ;
$result = mysql_query($query) or die ("Echec de la requ&ecirc;te sur les forums1");
$tela = mysql_fetch_object($result) ;

// le numero de la semaine
if (empty($num_sem)) $num_sem = $tela->NUM_SEM ;

// requete sur le sommet de l'arbre avec le bon numero de semaine
$res = mysql_query("SELECT NB_ABONNES,NB_MESSAGES FROM agora_stats WHERE FORUM=\"tela-botanicae\" AND NUM_SEM=\"$num_sem\"");
$tel = mysql_fetch_object($res);

$nb_total_mess = $tel->NB_MESSAGES;
$nb_total_abon = $tel->NB_ABONNES;

$query = "SELECT AGO_A_LIEN_PUCE,AGO_A_LIEN_FEUILLE,AGO_A_LIEN_BRANCHE FROM agora WHERE AGO_A_NOMGRP=\"tela-botanicae\"" ;
$result = mysql_query($query) or die ("Echec de la requ&ecirc;te sur les forums2");
$tela2 = mysql_fetch_object($result) ;

// creation de l'arbre
$arbreforum = new arbre("Tela Botanica",$tela2->AGO_A_LIEN_BRANCHE,$tel->NB_ABONNES,$tela2->AGO_A_LIEN_FEUILLE,"http://fr.groups.yahoo.com/group/tela-botanicae/messages") ;

$res = "<tr class=\"titlePage\"><td>L'arbre des forums de Tela Botanica</td></tr>\n" ;
$res.= "<tr><td>&nbsp;</td></tr>\n" ;

$res .= $arbreforum->cime("Tela Botanica",$tela2->AGO_A_LIEN_BRANCHE,$tel->NB_ABONNES,"javascript:MagicPopup2('$tela2->AGO_A_LIEN_FEUILLE')","http://fr.groups.yahoo.com/group/tela-botanicae/messages") ;
// requete sur les branches
        // d'abord les nom des groupes
$query1 = "SELECT agora.AGO_A_NOMGRP FROM agora" ;
if (!empty($thema)) $query1 .= ",agora_join" ;
$query1 .= " WHERE agora.AGO_A_NOMGRP<>\"tela-botanicae\" AND
                                                        agora.AGO_A_VISIBLE=1" ;
if (!empty($thema)) { $query1 .= " AND agora.AGO_A_ID=agora_join.AGO_J_IDFORUM and
                                                        AGO_J_IDCATEG=\"$thema\"" ;
                                        }
$query1 .= " ORDER BY AGO_A_DATE_CREATION DESC" ;

$result_message = mysql_query($query1) or die ("Echec de la requ&ecirc;te sur les forums");
//tableau stockant la différence du nbre de messages entre la semaine en cours dans la page et la semaine précédente
$diff_message = array();
while ($row_message = mysql_fetch_object($result_message)) {
                 //implémentation du tableau $diff_message
        $query_nb_message_1 = "SELECT NB_MESSAGES FROM agora_stats WHERE FORUM=\"$row_message->AGO_A_NOMGRP\" AND NUM_SEM=\"$num_sem\"";
        $result_nb_message_1 = mysql_query($query_nb_message_1) or die ("Echec sur la requ&ecirc;te _nb_message_1") ;
        $row_nb_message_1 = mysql_fetch_object($result_nb_message_1) ;
        $query_nb_message_2 = "SELECT NB_MESSAGES FROM agora_stats WHERE FORUM=\"$row_message->AGO_A_NOMGRP\" AND NUM_SEM= ".($num_sem -1)."";
        $result_nb_message_2 = mysql_query($query_nb_message_2) or die ("Echec sur la requ&ecirc;te _nb_message_2") ;
        $row_nb_message_2 = mysql_fetch_object($result_nb_message_2) ;
        $diff_message[$row_message->AGO_A_NOMGRP] =  $row_nb_message_1->NB_MESSAGES - $row_nb_message_2->NB_MESSAGES;
    }
$result1 = mysql_query($query1) or die ("Echec de la requ&ecirc;te sur les forums");
while ($row1 = mysql_fetch_object($result1)) {
                // pour chaque groupe, le nbre de messages et le nbre d'abonnes
        $query2 = "SELECT NB_MESSAGES,NB_ABONNES FROM agora_stats WHERE FORUM=\"$row1->AGO_A_NOMGRP\" AND NUM_SEM=\"$num_sem\"" ;
        $result2 = mysql_query($query2) or die ("Echec de la requ&ecirc;te sur agora_stats");
        $row2 = mysql_fetch_object($result2) ;
                // et le reste des informations pour chaque groupe
        $query3 = "SELECT AGO_A_ALIAS,AGO_A_LIEN_BRANCHE,AGO_A_LIEN_FEUILLE,AGO_A_LIEN_PUCE,AGO_A_COULEUR,AGO_A_TAILLE_B FROM agora WHERE AGO_A_NOMGRP=\"$row1->AGO_A_NOMGRP\"";
        $result3 = mysql_query($query3) or die ("Echec sur la requ&ecirc;te 3") ;
        $row3 = mysql_fetch_object($result3) ;
        $lien_feuille = "http://fr.groups.yahoo.com/group/$row1->AGO_A_NOMGRP/messages" ;
        $lien_nombre = "http://fr.groups.yahoo.com/group/$row1->AGO_A_NOMGRP/members" ;
        // On cherche à obtenir une valeur entre 0 et 100 pour déterminer la couleur de la feuille de l'arbre
        $maxi_message = max($diff_message);
        if ($maxi_message == 0){$maxi_message = 0.01;}
        $calcul_couleur = ($diff_message[$row1->AGO_A_NOMGRP])/$maxi_message*100;
        //Fin. La valeur de la couleur pour le groupe en cours est stocké dans $calcul_couleur
        if ($row2->NB_ABONNES != 0) {//pour ne pas afficher les branches n'existant pas encore à la semaine donnée
                $arbreforum->addBranche($row3->AGO_A_ALIAS,$row3->AGO_A_LIEN_BRANCHE,$row2->NB_ABONNES,"javascript:MagicPopup2('$lien_nombre')",$lien_feuille,$calcul_couleur,$row3->AGO_A_TAILLE_B);
                // info pour le cartouche
                $nb_total_mess += $row2->NB_MESSAGES;
                $nb_total_abon += $row2->NB_ABONNES;
        }
    }
$res .= $arbreforum->affBranche() ;
$res .= $arbreforum->affRacine() ;



include ('php/frame/arbre/cartouche.php');



  //fermeture de la connexion
  //mysql_close();

 
  return $res ;
}

//==============================================================================
// FUNCTION putFooter ()
//
// Generation of footer.
//==============================================================================

function putFooter () {
  return '&nbsp;';
}

//-- End of source  ------------------------------------------------------------
?>