Subversion Repositories Applications.papyrus

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
448 ddelon 1
<?php
2
 
3
/*  +-----------------------------------------------------------------------+
4
*   |projet_derniers_telechargement.php			    	        			|
5
*   +-----------------------------------------------------------------------+
6
*   | Copyright (c) 2001 - 2005 Tela Botanica						        |
7
*   +-----------------------------------------------------------------------+
8
*   | Affiche les derniers fichiers uploader dans le module projet          |
9
*   +-----------------------------------------------------------------------+
10
*   | Auteur : Alexandre Granier <alexandre@tela-botanica.org> 		        |
11
*   +-----------------------------------------------------------------------+
12
 
1319 alexandre_ 13
*   $Id: projet_derniers_telechargements.php,v 1.4 2007-04-19 09:17:35 alexandre_tb Exp $
448 ddelon 14
*/
15
 
510 alexandre_ 16
// Cette application affiche les derniers  documents uploadé dans le module projet
17
// ainsi que tous les documents du module
448 ddelon 18
 
19
// ===========================================================
20
//                  Configuration
21
// ===========================================================
22
 
23
 
510 alexandre_ 24
// Le nombre à afficher
448 ddelon 25
define ("PROJET_TELECHARGEMENT_NOMBRE", 8) ;
26
 
27
//====================      Les labels      =======================================
28
define ("PROJET_TELECHARGEMENT_TITRE", "Page de téléchargements rapides") ;
29
define ("PROJET_TELECHARGEMENT_DERNIERS", "Derniers documents mis en ligne") ;
30
define ("PROJET_TELECHARGEMENT_TOUS", "Tous les documents, par projet") ;
31
 
32
//=============bibliothèques PEAR  ===================================
33
include_once 'HTML/Table.php' ;
34
include_once 'HTML/TreeMenu.php' ;
35
 
36
// ========== Bibliothèque Projet ====================================
37
include_once 'configuration/projet.config.inc.php' ;
38
include_once PROJET_CHEMIN_CLASSES.'projetControleur.class.php' ;
39
include_once PROJET_CHEMIN_CLASSES.'document.class.php' ;
40
include_once PROJET_CHEMIN_APPLI.'langues/pro_langue_fr.inc.php' ;
41
 
42
 
43
function afficherContenuCorps() {
44
    global $id_projet, $repcourant, $baseURL, $projet ;
45
    global $G_ftpHost,$G_ftpUser,$G_ftpPwd,$G_ftpLocal, $PHP_SELF;
46
 
47
    // à remplacer par un div pour genesia
48
    $res = "<h1>".PROJET_TELECHARGEMENT_TITRE."</h1>\n" ;
49
 
50
    $res .= "<h2>".PROJET_TELECHARGEMENT_DERNIERS."</h2>\n" ;
51
 
52
    $liste_documents = document::getDocumentsRecents( $nombre = 10, $GLOBALS['projet_db'], PROJET_CHEMIN_FICHIER,PROJET_CHEMIN_ICONES) ;
53
 
54
    include_once PROJET_CHEMIN_CLASSES.'HTML_Liste.class.php' ;
55
    include_once PROJET_CHEMIN_CLASSES.'HTML_listeDocuments.class.php' ;
56
    $vue_liste_document = new HTML_listeDocuments($GLOBALS['url'], false, '', $GLOBALS['projet_auth']) ;
57
    $vue_liste_document->setCheminIcones(PROJET_CHEMIN_ICONES) ;
58
    $entete_liste = array (PROJET_FICHIERS_NOM, PROJET_FICHIERS_TAILLE, PROJET_FICHIERS_PAR, PROJET_FICHIERS_CREE_LE) ;
59
    if (!isset($droits)) $droits = PROJET_DROIT_AUCUN ;
60
 
61
    $vue_liste_document->construitEntete($entete_liste) ;
62
    $vue_liste_document->construitListe ($liste_documents, $droits, 'ignore_repertoire', $GLOBALS['projet_db']) ;
63
    $res .= $vue_liste_document->toHTML() ;
64
 
65
    $res .= "<h2>".PROJET_TELECHARGEMENT_TOUS."</h2>\n" ;
66
 
67
    // Création de l'objet TreeMenu
1319 alexandre_ 68
    //GEN_stockerFichierScript(1, "api/TreeMenu/TreeMenu.js") ;
448 ddelon 69
 
70
    // Les noms des fichiers graphiques
71
    $icon         = 'folder.gif';
72
    $expandedIcon = 'folder-expanded.gif';
73
 
74
    $i = 0 ;
75
    // Requete sur les projets
76
    $requete = "SELECT p_titre, p_id FROM projet ORDER BY p_titre" ;
77
    $resultat = $GLOBALS['projet_db']->query ($requete) or die ("Echec <br />".mysql_error()."<br />$requete") ;
78
 
1319 alexandre_ 79
//    $menu = new HTML_TreeMenu() ;
80
//    $node = new HTML_TreeNode(array('text' => "Les projets de Tela Botanica", 'link' => "", 'icon' => $icon, 'expandedIcon' => $expandedIcon));
81
    $noeudProjet = '' ;
448 ddelon 82
    while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
83
        $titre = $ligne->p_titre ;
1319 alexandre_ 84
//        $node_1[$i] = &$node->addItem (new HTML_TreeNode(array('text' => $titre, 'link' => "", 'icon' => $icon, 'expandedIcon' => $expandedIcon)));
85
//        projet_fichiers (&$node_1[$i], $ligne->p_id) ;
448 ddelon 86
        $i++ ;
1319 alexandre_ 87
        $noeudProjet .= '<div dojoType="TreeNode" title="'.$ligne->p_titre.'" widgetId="projet_'.
88
        				$ligne->p_id.'" objectId="projet_'.$ligne->p_id.'" isFolder="true"></div>'."\n";
448 ddelon 89
    }
1319 alexandre_ 90
//    $menu->addItem($node);
91
//    $treeMenu = &new HTML_TreeMenu_DHTML($menu, array('images' => 'api/TreeMenu/images', 'defaultClass' => 'text'));
92
//    $res .= "<p>".$treeMenu->toHTML()."</p>\n" ;
448 ddelon 93
 
1319 alexandre_ 94
    GEN_stockerFichierScript('dojo', 'api/js/dojo/dojo.js', 'text/javascript');
95
    GEN_stockerFichierScript('dojoScriptProjet', PROJET_CHEMIN_APPLI.'js/telechargement.js');
96
    //$res .= '<p>' ;
97
    $RPCUrl = PROJET_CHEMIN_APPLI.'services/ecouteArbreFichier.php';
98
    $res .= '<div dojoType="TreeLoadingController" RPCUrl="'.$RPCUrl.'" widgetId="treeController" DNDController="create"></div>
99
				<div dojoType="TreeSelector" widgetId="treeSelector"></div>
100
				<div dojoType="Tree" DNDMode="between" selector="treeSelector" widgetId="bandTree" controller="treeController">
101
				<div dojoType="TreeNode" title="Racine" widgetId="rootNode" objectId="root" isFolder="true">'."\n".
102
			$noeudProjet.'</div></div>';
103
 
104
    //$res .= '</p>';
105
 
448 ddelon 106
    return $res ;
107
}
108
 
109
/** fonction projet_fichiers() - Remplie un noeud avec les fichiers et répertoires
110
*
111
* Le noeud est passé en référence. Ainsi, cette fonction ne retourne rien mais modifie le tableau des
112
* noeuds passé en référence.
113
*
114
* return  void
115
*/
116
 
117
function projet_fichiers ($noeud, $id_rep, $pere = 0)
118
{
119
    //Récupération de l'identifiant du répertoire courant
120
 
121
    //La fonction est appelé récursivement quand $pere ne vaut pas null
122
    //$id_rep prend donc la valeur de $pere transmise par l'appel précédent de la fonction.
123
 
124
    // Les noms des fichiers graphiques
125
    $icon = 'folder.gif';
126
    $expandedIcon = 'folder-expanded.gif';
127
 
128
    //Requête pour récupérer les noms des répertoires contenus dans le répertoire courant ($id_rep)
129
    $queryRep =    ' SELECT projet_documents.*'.
130
                            ' FROM projet_documents'.
131
                            ' WHERE projet_documents.pd_pere = '.$pere.
132
                            ' AND projet_documents.pd_visibilite = "public" and pd_ce_projet='.$id_rep.' and pd_ce_type=0'.
133
                            ' ORDER BY projet_documents.pd_nom ASC' ;
134
 
135
    $resultRep = $GLOBALS['projet_db']->query($queryRep) ;
136
    if (DB::isError ($resultRep)) {
137
        die ('Echec de la requete : '.$queryRep.'<br />'.$resultRep->getMessage()) ;
138
    }
139
 
140
    //Stockage des informations sur les répertoires contenu dans le répertoire courant pour affichage dans un arbre.
141
    //Et appel récursif de la fonction pour examiner le contenu de chaque répertoire du répertoire courant.
142
    if ( $resultRep->numRows() != 0 ) {
143
        while ( $ligneRep = $resultRep->fetchRow(DB_FETCHMODE_OBJECT) ) {
144
            //Stockage des informations sur le répertoire courant
145
            $noeud1_1 = &$noeud->addItem(new HTML_TreeNode(
146
                                                        array(
147
                                                            'text' => trim ($ligneRep->pd_nom),
148
                                                            'link' => "", 'icon' => $icon,
149
                                                            'expandedIcon' => $expandedIcon ) ) );
150
            //Appel récursif de fonction courante
151
            projet_fichiers (&$noeud1_1, $id_rep, $ligneRep->pd_id) ;
152
        }
153
    }
154
 
155
    // Requête pour récupérer les fichiers du répertoire courant ($id_rep) et leurs informations
156
    $requete_fichiers = 'SELECT projet_documents.*, gen_type_de_fichier.gtf_type_icone'.
157
                                    ' FROM projet_documents, gen_type_de_fichier'.
158
                                    ' WHERE projet_documents.pd_ce_type= gen_type_de_fichier.gtf_id_type'.
159
                                    ' AND projet_documents.pd_visibilite= "public" ' ;
160
    if ($pere == 0) {
161
        $requete_fichiers .= ' AND projet_documents.pd_ce_projet= '.$id_rep.' and pd_pere=0 and pd_ce_type <> 0' ;
162
    } else {
163
        $requete_fichiers .= ' AND projet_documents.pd_pere= '.$pere.' and pd_ce_type<>0' ;
164
    }
165
    $requete_fichiers .= ' ORDER BY projet_documents.pd_nom ASC' ;
166
 
167
    $resultat_fichiers = $GLOBALS['projet_db']->query($requete_fichiers) ;
168
    if (DB::isError ($resultat_fichiers)) {
169
        die ('Echec de la requete : '.$requete.'<br />'.$resultat_fichiers->getMessage()) ;
170
    }
171
 
172
    //Stockage des informations sur les fichiers du répertoires courant pour affichage dans un arbre
173
    if ( $resultat_fichiers->numRows() != 0 ) {
174
        while ( $ligne_fichiers = $resultat_fichiers->fetchRow(DB_FETCHMODE_OBJECT) ) {
175
            //Ajout de slash devant les caractères spéciaux et suppression des caractères invisibles en début et fin des noms de fichier.
176
            $lien = trim( $ligne_fichiers->pd_nom  );
177
            $noeud_1_2 = &$noeud->addItem (new HTML_TreeNode (
178
                                                            array (
179
                                                                "text" => $lien,
180
                                                                "link" => PROJET_CHEMIN_FICHIER.$ligne_fichiers->pd_lien,
181
                                                                'icon' => $ligne_fichiers->gtf_type_icone,
182
                                                                "linkTarget" => "_blank" ))) ;
183
        }
184
    }
185
}
186
 
510 alexandre_ 187
/* +--Fin du code ----------------------------------------------------------------------------------------+
188
*
189
* $Log: not supported by cvs2svn $
1319 alexandre_ 190
* Revision 1.3  2005/10/06 08:23:48  alexandre_tb
191
* Ajout de commentaires
510 alexandre_ 192
*
193
*
1319 alexandre_ 194
*
510 alexandre_ 195
* +-- Fin du code ----------------------------------------------------------------------------------------+
196
*/
197
 
448 ddelon 198
?>