Subversion Repositories Applications.papyrus

<?php
/*vim: set expandtab tabstop=4 shiftwidth=4: */
// +------------------------------------------------------------------------------------------------------+
// | PHP version 4.1                                                                                      |
// +------------------------------------------------------------------------------------------------------+
// | Copyright (C) 2004 Tela Botanica (accueil@tela-botanica.org)                                         |
// +------------------------------------------------------------------------------------------------------+
// | This library is free software; you can redistribute it and/or                                        |
// | modify it under the terms of the GNU General Public                                                  |
// | License as published by the Free Software Foundation; either                                         |
// | version 2.1 of the License, or (at your option) any later version.                                   |
// |                                                                                                      |
// | This library is distributed in the hope that it will be useful,                                      |
// | but WITHOUT ANY WARRANTY; without even the implied warranty of                                       |
// | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU                                    |
// | General Public License for more details.                                                             |
// |                                                                                                      |
// | You should have received a copy of the GNU General Public                                            |
// | License along with this library; if not, write to the Free Software                                  |
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
// +------------------------------------------------------------------------------------------------------+
// CVS : $Id: projet.class.php,v 1.10.2.1 2008-02-08 08:41:00 alexandre_tb Exp $
/**
* Application projet
*
* La classe projet
*
*@package projet
//Auteur original :
*@author        Alexandre Granier <alexandre@tela-botanica.org>
//Autres auteurs :
*@author        Aucun
*@copyright     Tela-Botanica 2000-2004
*@version       $Revision: 1.10.2.1 $
// +------------------------------------------------------------------------------------------------------+
*/


// +------------------------------------------------------------------------------------------------------+
// |                                            ENTETE du PROGRAMME                                       |
// +------------------------------------------------------------------------------------------------------+

include_once PROJET_CHEMIN_CLASSES.'document.class.php' ;
include_once PROJET_CHEMIN_CLASSES.'liste_discussion.class.php' ;
/* Permet la récupération d'un nouvel identifiant d'une table.*/
require_once PROJET_CHEMIN_BIBLIOTHEQUE_API.'sql/SQL_manipulation.fonct.php';
include_once 'Mail.php' ;

// +------------------------------------------------------------------------------------------------------+
// |                                            ENTETE du PROGRAMME                                       |
// +------------------------------------------------------------------------------------------------------+




/**
 * class projet
 *
 */
class projet
{

    /** Aggregations: */

    /**
     * Le tableau d'objet document associés au projet
     *
     */
    var $_documents_associes = array();

    var $_listes_associes = array();

    /** Compositions: */

    /*** Attributes: ***/

    /**
     * L'identifiant du projet.
     * @access private
     */
    var $_id_projet;

    /**
     * Le titre du projet, tel que dans la base de donnée.
     * @access private
     */
    var $_titre;
    /**
     * La description du projet, tel que dans la base.
     * @access private
     */
    var $_description;
    /**
     * L'URL d'un site sur le projet. Facultatif.
     * @access private
     */
    var $_espace_internet;
    /**
     * Le nom du wikini associé au projet, avec la syntaxe wikini. Vide par défaut.
     * @access private
     */
    var $_nom_wikini;
    /**
     * Date de création du projet. A priori ne varie pas dans le temps.
     * @access private
     */
    var $_date_creation;
    /**
     * Le chemin relatif vers le répertoire contenant les wikinis.
     * @access private
     */
    var $_chemin_wikini;
    /**
     * Une connexion vers la base de donnée.
     * @access private
     */
    var $_db;

    /**
     * Contient le nom du répertoire du projet tel que sur le disque.
     * @access private
     */
    var $_nom_repertoire;

    /**
     * Le chemin jusqu'au répertoire où seront stockés les fichiers.
     * @access private
     */
    var $_chemin_repertoire;

    /**
     * Vaut vrai si le projet est un projet racine et s'il est le seul.
     * @access private
     */
    var $_est_racine;
    /**
     * Le résumé du projet
     * @access private
     */
    var $_resume;
    /**
     * Contient le numéro du type du projet
     * @access private
     */
    var $_type;

        /**
     * Indique si l'inscription au projet est moderes
     * @access private
     */
    var $_isModere;

        /**
     * Indique si le projet a des documents
     * @access private
     */
    var $_avoirDocument;
       
    /**
     *
     * PHP5
     * @return projet
     * @access public
     */
    function __construct( &$dbObject,  $id_projet = "")
    {
      $this->projet($dbObject,  $id_projet);

    } // end of member function __construct

    /**
     *
     *
     * @param DB dbObject Un objet PEAR:DB
     * @param int id_projet On passe un identifiant de projet au constructeur. Cela lui permet de faire une
     * première requête pour les infos de bases comme le titre, le description etc.
     * @return projet
     * @access public
     */
    function projet( &$dbObject,  $id_projet = "")
    {
        $this->_db = $dbObject ;
        if ($id_projet != "") {
            $requete = "select * from projet where p_id=$id_projet" ;
            $resultat = $this->_db->query ($requete) ;
            if (DB::isError($resultat)) {
                die ("Echec de la requete<br />".$resultat->getMessage()."<br />".$resultat->getDebugInfo()) ;
            }
            $ligne = $resultat->fetchRow (DB_FETCHMODE_OBJECT) ;

            // Affectations dans les propriétés
            $this->_id_projet = $ligne->p_id ;
            $this->_titre = $ligne->p_titre ;
            $this->_description = $ligne->p_description ;
            $this->_espace_internet = $ligne->p_espace_internet ;
            $this->_date_creation = $ligne->p_date_creation ;
            $this->_nom_wikini = $ligne->p_wikini ;
            $this->_resume = $ligne->p_resume;
            $this->_type = $ligne->p_type ;
            // On récupère le nom du répertoire
            $this->_nom_repertoire = $ligne->p_nom_repertoire ;
            $this->_isModere = $ligne->p_modere;
                        $this->_avoirDocument = $ligne->p_avoir_document;
            // on regarde si on a à faire au projet racine
            if (PROJET_UTILISE_HIERARCHIE) {
                    $requete = 'select  ph_id_projet_pere, ph_id_projet_fils from projet_hierarchie where ph_id_projet_fils='.$this->_id_projet ;
                    $resultat = $this->_db->query ($requete) ;
                    if (DB::isError ($resultat)) {
                        die ("Echec de la requete : $requete<br />".$resultat->getMessage()) ;
                    }
                    if (!$resultat->numRows()) {
                        $this->_est_racine = true ;
                    } else {
                        $this->_est_racine = false ;
                    }
            }
        }
    } // end of member function projet

    /**
     *
     *
     * @param DB dbObject Un objet PEAR:DB
     * @param int id_projet On passe un identifiant de projet au constructeur.
     * @return bool
     * @access public
     */
    function projetExiste( &$dbObject,  $id_projet)
    {
        if ($id_projet != "") {
            $requete = "select * from projet where p_id=$id_projet" ;
            $resultat = $dbObject->query ($requete) ;
            if (DB::isError($resultat)) {
                die ("Echec de la requete<br />".$resultat->getMessage()."<br />".$resultat->getDebugInfo()) ;
            }
            if ($resultat->numRows() != 0) {
                return true ;
            }
        }
    } // end of member function projet

    /**
     *
     *
     * @param int id_projet
     * @return string
     * @access public
     */
    function getTitre( $id_projet = "" )
    {
        return $this->_titre ;
    } // end of member function getTitre

    /**
     *
     *
     * @return string
     * @access public
     */
    function getResume( )
    {
        return $this->_resume ;
    } // end of member function getResume

    /**
     * Renvoie l'identifiant du projet courant.
     *
     * @return int
     * @access public
     */
    function getId( )
    {
        return $this->_id_projet ;
    } // end of member function getId

    /**
     *
     *
     * @return string
     * @access public
     */
    function getDescription( )
    {
        return $this->_description;
    } // end of member function getDescription

    /**
     *
     *
     * @return string
     * @access public
     */
    function getEspaceInternet( )
    {
        return $this->_espace_internet;
    } // end of member function getEspaceInternet

    /**
     * Charge dans l'objet projet, les listes de discussion
     * ['nom_liste']
     * ['domaine']
     * ['adresse']
     *
     * @return boolean  true en cas de succès
     * @access public
     */
    function getListesAssociees( )
    {
        // On rajoute un test pour éviter l'appel SQL si il a déjà été fait une fois
        if (count($this->_listes_associes) > 0) return ;
        $requete = "select pl_id_liste from projet_lien_liste where pl_id_projet=".$this->_id_projet ;
        $resultat = $this->_db->query ($requete) ;
        if (DB::isError ($resultat)) {
            die ("Echec de la requete : $requete<br />".$resultat->getMessage()) ;
        }
        $retour = array() ;
        if ($resultat->numRows()) {
            $ligne = $resultat->fetchRow (DB_FETCHMODE_OBJECT) ;
            $this->_listes_associes[] = new liste_discussion($ligne->pl_id_liste, $this->_db) ;

        }
    } // end of member function getListesAssociees

    /**
     * Renvoie vrai si le projet a au moins une liste
     *
     * @return bool
     * @access public
     */
    function avoirListe( )
    {
        $this->getListesAssociees() ;
        if (count($this->_listes_associes)) {
            return true ;
        }
        return false ;
    }

    /**
     * Renvoie vrai si le projet a au moins un document, fichier ou repertoire
     *
     * Mis en place pour des raisons de performances avant la methode getListesDocuments etait utilisee
     * 
     * @return bool
     * @access public
     */
    function avoirDocument( )
    {
        return $this->_avoirDocument;
    }

    /**
     * Permet de fixer la colonne p_avoir_document à 1 
     *
     * Mis en place pour des raisons de performances avant la methode getListesDocuments etait utilisee
     * 
     * @param bool 
     * @return mixed true si la requete fonctionne
     * @access public
     */
    function setAvoirDocument($bool)
    {
        $val = 0 ;
        if ($bool) $val = 1;
        $requete = 'update projet set p_avoir_document='.$val.' where p_id='.$this->_id_projet;
        $resultat = $this->_db->query ($requete) ;
        if (DB::isError($resultat)) {
            echo ("Echec de la requete<br />".$resultat->getMessage()."<br />".$resultat->getDebugInfo()) ;
        }
        return true;
    }

    /**
     * Renvoie la liste des documents associes sous forme d'un tableau, avec les
     * informations afférentes. 0 => "nom (cliquable)"
     "Taille"
     "Date
     * de creation"          "Prorietaire"          "Visibilite"          "Action
     * (cliquable)"
     *
     * @param visibilite visibilite Si visibilite est prive, tous les fichiers sont renvoyes ainsi qu'une entree
     * pour indiquer la visibilite du document.
     * @return Array
     * @access public
     */
    function getListesDocuments( $chemin, $chemin_icones = "icones/", $id_repertoire = '' )
    {
        // On realise une requete sur projet_documents avec une jointure sur l'annuaire
        // et sur gen_type_de_fichier pour envoyer un resultat complet.
        // On exclue les fichiers racines cad pd_pere is null
        $requete = "select pd_id from projet_documents where pd_ce_projet=".$this->_id_projet ;
        if ($id_repertoire != '') $requete .= ' and pd_pere='.$id_repertoire;
        if ($id_repertoire == 0) $requete .= ' and pd_pere=0';
        $requete .= ' order by pd_nom' ;
        $resultat = $this->_db->query ($requete) ;
        if (DB::isError($resultat)) {
            return ("Echec de la requete<br />".$resultat->getMessage()."<br />".$resultat->getDebugInfo()) ;
        }
        $tableau_document = array() ;
        // Un compteur
        $i = 0 ;
        while ($ligne = $resultat->fetchRow (DB_FETCHMODE_OBJECT)) {
            array_push ($tableau_document, new document ($ligne->pd_id, &$this->_db, $chemin, $chemin_icones)) ;
        }
        return $tableau_document ;
    }


    /**
     * Renvoie un tableau avec tous les repertoires d'un projet, imbrique. ['rep1'],
     * ['rep2'] => array (['rep21'],    ['rep22']), etc .
     *
     * @return Array
     * @access public
     */
    function getListeRepertoireHierarchisee( )
    {
        // On ne prend que les repertoires
        $requete = "select pd_id, pd_pere, pd_nom from projet_documents where pd_ce_projet=".$this->_id_projet.' and pd_ce_type=0 order by pd_nom' ;
        $resultat = $this->_db->query ($requete) ;
        if (DB::isError($resultat)) {
            die ("Echec de la requete<br />".$resultat->getMessage()."<br />".$resultat->getDebugInfo()) ;
        }
        $tableau_document = array() ;
                /*
        while ($ligne = $resultat->fetchRow (DB_FETCHMODE_OBJECT)) {
            array_push ($tableau_document, new document ($ligne->pd_id, $this->_db));
        }
        */
        $tableau = array();
        $tab = array();

        
        while ($ligne = $resultat->fetchRow (DB_FETCHMODE_OBJECT)) {
            array_push ($tableau, array ('id' => $ligne->pd_id, 
                                                                                'id_pere' => $ligne->pd_pere, 
                                                                                'fils' => array(),
                                                                                'label' => $ligne->pd_nom));

        }
        
        // la $tableau reste un tableau de valeur a plat
        
        
                $i = 0;
        foreach ($tableau as $noeud) {
                // On teste si le noeud est racine si oui on l ajoute a l arbre sinon on ne l ajoute pas
                if ($noeud['id_pere'] == 0) {
                        $tab[$i] = $noeud;
                        $this->construireArbre($tab[$i], $tableau) ;
                }
                $i++;
        }
        return $tab;
    } // end of member function getListeRepertoireHierarchisee

        function construireArbre(&$noeud, $tableau) {
        $j = 0;
        foreach ($tableau as $element) {
                // pour chaque element on teste 
                if ($element['id_pere'] == $noeud['id']) {
                        $noeud['fils'][$j]= $element ;                          
                        $this->construireArbre($noeud['fils'][$j],$tableau);
                }
                $j++; 
        }       
    }

    /**
     * Renvoie un tableau comprenant tous les objets projet de la base.
     *
     * @return Array
     * @static
     * @access public
     */
    function getTousLesProjets(&$objetDB, $exclu = '')
    {
        $sql = '';
        if (is_object($this) && isset ($this->_projet_exclu) && count($this->_projet_exclu)) {
                $sql = 'where p_id not in (';
            foreach ($this->_projet_exclu as $valeur) {
                $sql .= $valeur.',' ;
            }
            $sql[count($sql)-1] = ')';
        }
        $requete = 'select p_id from projet '.$sql.' order by p_titre' ;
        $resultat = $objetDB->query ($requete) ;
        if (DB::isError($resultat)) {
            echo ("Echec de la requete<br />".$resultat->getMessage()."<br />".$resultat->getDebugInfo()) ;
        }
        $tableau_resultat = array() ;
        while ($ligne = $resultat->fetchRow (DB_FETCHMODE_OBJECT)) {
            array_push ($tableau_resultat, new projet ($objetDB, $ligne->p_id)) ;
        }
        return $tableau_resultat ;
    } // end of member function getTousLesProjets

    /**
     * Renvoie un tableau comprenant les objets projet de la base du type $type.
     *
     * @return Array
     * @static
     * @access public
     */
    function getProjetDuType($type, &$objetDB)
    {
        $requete = "select p_id from projet where p_type=$type order by p_titre" ;
        $resultat = $objetDB->query ($requete) ;
        if (DB::isError($resultat)) {
            die ("Echec de la requete<br />".$resultat->getMessage()."<br />".$resultat->getDebugInfo()) ;
        }
        $tableau_resultat = array() ;
        while ($ligne = $resultat->fetchRow (DB_FETCHMODE_OBJECT)) {
            array_push ($tableau_resultat, new projet ($objetDB, $ligne->p_id)) ;
        }
        return $tableau_resultat ;
    } // end of member function getTousLesProjets

    /**
     * Renvoie un le projet racine.
     *
     * @return projet
     * @static
     * @access public
     */
    function getProjetRacine(&$objetDB)
    {
        $requete = "select p_id from projet where p_id not in (select ph_id_projet_fils from projet_hierarchie)" ;
        $resultat = $objetDB->query ($requete) ;
        if (DB::isError($resultat)) {
            die ("Echec de la requete<br />".$resultat->getMessage()."<br />".$resultat->getDebugInfo()) ;
        }
        if ($resultat->numRows() == 1) {
            $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT) ;
            return new projet($objetDB, $ligne->p_id) ;
        }
        $tableau_resultat = array() ;
        while ($ligne = $resultat->fetchRow (DB_FETCHMODE_OBJECT)) {
            array_push ($tableau_resultat, new projet ($objetDB, $ligne->p_id)) ;
        }
        return $tableau_resultat ;
    } // end of member function getTousLesProjets

    /**
     * Desctructeur de la classe. Libère la mémoire, ferme les connexions et fichiers.
     *
     * @return void
     * @access public
     */
    function __destruct( )
    {

    } // end of member function __destruct

    /**
     * Supprime le projet courrant. Il s'ensuit une suppression en cascade de tous les
     * éléments liés.
     *
     * @return void
     * @access public
     */
    function supprimer( )
    {

    } // end of member function supprimer

    /**
     * Permet d'enregistrer une ligne dans la table concernée.
     *
     * @param Array tableau_de_valeur Le tableau de valeur a insérer dans la base avec pour clé les noms des éléments
     * du formulaire.
     * @return int
     * @access public
     */
    function enregistrerSQL( $tableau_de_valeur )
    {
        $nom_repertoire = projet::genereNomRepertoire($tableau_de_valeur['projet_titre'], $this->_db) ;
        if (!$this->_creationRepertoire ($nom_repertoire)) {
            echo 'Impossible de crée un répertoire'.$nom_repertoire ;
            return false ;
        }
        // Traitement du type
        if (!PROJET_UTILISE_TYPE) {
            $tableau_de_valeur['projet_type'] = 0 ;
        }
        $id = SQL_obtenirNouveauId($this->_db, 'projet', 'p_id') ;
        $requete = 'insert into projet set p_id='.$id ;
        if (!isset($tableau_de_valeur['projet_wikini'])) {
                $tableau_de_valeur['projet_wikini']='';
        }
        $requete .= ', p_titre="'.$tableau_de_valeur['projet_titre'].'", p_description="'.$tableau_de_valeur['projet_description'].'"'.
                    ', p_espace_internet="'.$tableau_de_valeur['projet_espace_internet'].'", p_date_creation=NOW()'.
                    ', p_wikini="'.$tableau_de_valeur['projet_wikini'].'", p_nom_repertoire="'.$nom_repertoire.'", p_resume="'.$tableau_de_valeur['projet_resume'].
                    '", p_type='.$tableau_de_valeur['projet_type'].', p_modere="'.$tableau_de_valeur['projet_moderation'].'"' ;
        $resultat = $this->_db->query ($requete) ;

        if (DB::isError($resultat)) {
            die ("Echec de la requete<br />".$resultat->getMessage()."<br />".$resultat->getDebugInfo()) ;
        }

        // On affecte à l'objet projet son identifiant
        $this->_id_projet = $id ;

        //insertion dans projet_hierarchie
                if (PROJET_UTILISE_HIERARCHIE) {
                $requete = 'insert into projet_hierarchie set ph_id_projet_pere='.$tableau_de_valeur['projet_asso'].
                            ', ph_id_projet_fils='.$id ;
                $resultat = $this->_db->query ($requete) ;
                }
        return true ;
    } // end of member function enregistrerSQL

    /**
     * Permet de mettre à jour une ligne dans la table concernée.
     *
     * @param Array tableau_de_valeur Le tableau de valeur a insérer dans la base avec pour clé les noms des éléments
     * du formulaire.
     * @return int
     * @access public
     */
    function majSQL( $tableau_de_valeur )
    {
        // Traitement du type
        if (!PROJET_UTILISE_TYPE) {
            $tableau_de_valeur['projet_type'] = 0 ;
        }
        $requete = 'update projet set ';
        $requete .= 'p_titre="'.$tableau_de_valeur['projet_titre'].'", p_description="'.$tableau_de_valeur['projet_description'].'"'.
                    ', p_espace_internet="'.$tableau_de_valeur['projet_espace_internet'].'"'.
                    ', p_resume="'.$tableau_de_valeur['projet_resume'].'", p_type='.$tableau_de_valeur['projet_type'].
                    ', p_modere='.$tableau_de_valeur['projet_moderation'].
                    ' where p_id="'.$this->_id_projet.'"' ;
        $resultat = $this->_db->query ($requete) ;
        if (DB::isError($resultat)) {
            die ("Echec de la requete<br />".$resultat->getMessage()."<br />".$resultat->getDebugInfo()) ;
        }

        if (PROJET_UTILISE_HIERARCHIE) {
                // suppression dans projet_hierarchie

                $requete = 'delete from projet_hierarchie where ph_id_projet_fils='.$this->_id_projet ;
                $resultat = $this->_db->query ($requete) ;

                //insertion dans projet_hierarchie

                $requete = 'insert into projet_hierarchie set ph_id_projet_pere='.$tableau_de_valeur['projet_asso'].
                            ', ph_id_projet_fils='.$this->_id_projet ;
                $resultat = $this->_db->query ($requete) ;
        }
        return true ;
    } // end of member function enregistrerSQL

    /**
     * Met à jour dans la base de donnée le champs p_nom_wikini
     *
     * @param int nom_wikini Le nouveau nom wikini
     * @return bool
     * @access public
     */
    function majNomWikini( $nom_wikini )
    {
        $requete = 'update projet set p_wikini="'.$nom_wikini.'" where p_id="'.$this->_id_projet.'"' ;
        $resultat = $this->_db->query ($requete) ;
        if (DB::isError ($resultat)) {
            die ('Echec de la requete : '.$requete.'<br />'.$resultat->getMessage()) ;
        }
        return true ;
    } // end of member function majNomWikini


    /**
     *
     *
     * @param string code_sql
     * @return bool
     * @access public
     */
    function suppressionSQL()
    {
        $msg = '' ;
        // Supression du répertoire du projet
        if (!$this->_suppression_repertoire()) {
            $msg = 'La suppression du répertoire n\'a pas fonctionn°' ;
        }
        // A ajouter la suppression des documents associés

        // La suppression des évènements associés

        // Le projet lui-même
        $requete = "delete from projet where p_id=".$this->_id_projet ;
        $resultat = $this->_db->query ($requete) ;

        if (PROJET_UTILISE_HIERARCHIE) {
                $requete = "delete from projet_hierarchie where ph_id_projet_fils=".$this->_id_projet ;
                $resultat = $this->_db->query ($requete) ;
        }
        $requete = "delete from projet_statut_utilisateurs where psu_id_projet=".$this->_id_projet ;
        $resultat = $this->_db->query ($requete) ;
        return $msg ;
    } // end of member function suppressionSQL

    /**
     * Supprime le répertoire associé au projet (le répertoire doit être vide).
     *
     * @return void
     * @access private
     */
    function _suppression_repertoire( )
    {
        return rmdir ($this->_chemin_repertoire.$this->_nom_repertoire) ;
    } // end of member function _suppression_repertoire

    /**
     * Permet de créer le répertoire associé au projet.
     *
     * @param string nom_repertoire Le nom du répertoire à créer.
     * @return boolean
     * @access private
     */
    function _creationRepertoire( $nom_repertoire )
    {
        return mkdir ($this->_chemin_repertoire.$nom_repertoire) ;
    } // end of member function _creationRepertoire

    /**
     * Permet d'indiquer où seront stockés les fichiers.
     *
     * @param string cheminRepertoire Le chemin jusqu'au répertoire où seront stockés les fichiers.
     * @return void
     * @access public
     */
    function setCheminRepertoire( $cheminRepertoire )
    {
        $this->_chemin_repertoire = $cheminRepertoire ;
    } // end of member function setCheminRepertoire

    /**
     * Génère un nom de répertoire à partir de la première lettre de la chaine passé en
     * paramètre et de l'identifiant du dernier projet.
     *
     * @param string chaine Une chaine à partir de laquelle sera générer le nom du répertoire.
     * @param DB objetDB un objet PEAR::DB
     * @return string
     * @static
     * @access public
     */
    function genereNomRepertoire( $chaine, &$objetDB )
    {
        $requete = "select p_id from projet order by p_id desc limit 0,1" ;
        $resultat = $objetDB->query ($requete) ;
        if (DB::isError ($resultat)) {
            die ("Echec de la requete : $requete<br />".$resultat->getMessage()) ;
        }
        if ($resultat->numRows() > 0) {
                $ligne = $resultat->fetchRow (DB_FETCHMODE_OBJECT) ;
                $nom = strtoupper(substr($chaine, 0, 1)) ;
                $nom .= $ligne->p_id + 1 ;
        }
            else {
                $nom = strtoupper(substr($chaine, 0, 1)) ;
                $nom .=  1 ;
            }
        return $nom ;

    } // end of member function genereNomRepertoire

    /**
     * Permet de récupérer le nom du répertoire d'un projet.
     *
     * @return string
     * @access public
     */
    function getNomRepertoire( )
    {
        return $this->_nom_repertoire ;
    } // end of member function getNomRepertoire

    /**
     *  Ajoute une liste à un projet
     *  Effectue une insertion dans projet_lien_liste
     *
     * @param liste_discussion liste Une instance de la classe liste_discussion
     * @return void
     * @access public
     */
    function ajouterListe( &$liste )
    {
        $requete = "insert into projet_lien_liste set pl_id_liste=".$liste->getId().
                    ', pl_id_projet='.$this->_id_projet ;
        $resultat = $this->_db->query ($requete) ;
        if (DB::isError ($resultat)) {
            die ("Echec de la requete : $requete<br />".$resultat->getMessage()) ;
        }
    } // end of member function ajouterListe

    /**
     * Supprime la liste de discussion associée au projet
     *
     * @return void
     * @access public
     */
    function supprimerListe(&$liste)
    {
        $requete = 'delete from projet_lien_liste where pl_id_liste='.$liste->getId() ;
        $resultat = $this->_db->query ($requete) ;
        if (DB::isError ($resultat)) {
            die ('Echec de la requete : '.$requete.'<br />'.$resultat->getMessage()) ;
        }
        $requete = 'delete from projet_liste where pl_id_liste='.$liste->getId() ;
        $resultat = $this->_db->query ($requete) ;
        if (DB::isError ($resultat)) {
            die ('Echec de la requete : '.$requete.'<br />'.$resultat->getMessage()) ;
        }
    } // end of member function supprimerListe


    /**
     * Renvoie vrai si le projet est racine.
     *
     * @return bool
     * @access public
     */
    function isRacine( )
    {
        return $this->_est_racine ;
    } // end of member function isRacine

    /**
     * Renvoie le nombre d'inscrits au projet. Effectue une requete dans la table
     * projet_statut_utilisateurs
     *
     * @return int
     * @access public
     */
    function getNombreInscrits( )
    {
        $requete = 'select count(psu_id_utilisateur) as nbre from projet_statut_utilisateurs where psu_id_projet='.$this->_id_projet ;
        $resultat = $this->_db->query ($requete) ;
        if (DB::isError ($resultat)) {
            die ('Echec de la requete : '.$requete.'<br />'.$resultat->getMessage()) ;
        }
        $ligne = $resultat->fetchRow (DB_FETCHMODE_OBJECT) ;
        return $ligne->nbre ;
    } // end of member function getNombreInscrits


    /**
     * Renvoie un tableau contenant les identifiants des fils du projet courant.
     *
     * @return Array
     * @access public
     */
    function getHierarchie( )
    {
        $requete = 'select ph_id_projet_fils from projet_hierarchie where ph_id_projet_pere='.$this->_id_projet ;
        $resultat = $this->_db->query ($requete) ;
        if (DB::isError ($resultat)) {
            die ('Echec de la requete : '.$requete.'<br />'.$resultat->getMessage()) ;
        }
        $tableau_resultat = array() ;
        while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
            array_push ($tableau_resultat, $ligne->ph_id_projet_fils) ;
        }
        return $tableau_resultat ;
    } // end of member function getHierarchie

    /**
     * Renvoie l'identifiant du pere du projet courrant.
     *
     * @return int
     * @access public
     */
    function getIdPere()
    {
        $requete = 'select ph_id_projet_pere from projet_hierarchie where ph_id_projet_fils='.$this->_id_projet ;
        $resultat = $this->_db->query ($requete) ;
        if (DB::isError ($resultat)) {
            die ('Echec de la requete : '.$requete.'<br />'.$resultat->getMessage()) ;
        }
        $tableau_resultat = array() ;
        $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT) ;
        return $ligne->ph_id_projet_pere ;
    } // end of member function getIdPere()

    /**
     * Renvoie le nom Wiki du wikini associé au projet.
     *
     * @return string
     * @access public
     */
    function getWikini( )
    {
        return $this->_nom_wikini ;
    } // end of member function getWikini

    /**
     * Renvoie le type du projet, ou zéro si le projet n'a pas de type.
     *
     * @return int
     * @access public
     */
    function getType( )
    {
        return $this->_type ;
    } // end of member function getType

        /**
     * Renvoie 1 si les inscriptions au projet sont modérées.
     *
     * @return int
     * @access public
     */
    function isModere( )
    {
        return $this->_isModere ;
    } // end of member function getType



    /**
     * initAttributes sets all projet attributes to its default                    value make
     * sure to call this method within your class constructor
     */
    function initAttributes( )
    {
        $this->chemin_wikini = "projet/wikini/";
    }


} // end of projet
?>