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: document.class.php,v 1.9 2008-08-25 15:18:10 alexandre_tb Exp $

/**

* Application projet

*

* La classe document

*

*@package projet

//Auteur original :

*@author        Alexandre Granier <alexandre@tela-botanica.org>

//Autres auteurs :

*@author        Aucun

*@copyright     Tela-Botanica 2000-2004

*@version       $Revision: 1.9 $

// +------------------------------------------------------------------------------------------------------+

*/

// +------------------------------------------------------------------------------------------------------+

// |                                            ENTETE du PROGRAMME                                       |

// +------------------------------------------------------------------------------------------------------+

include_once PROJET_CHEMIN_CLASSES.'fichier.class.php' ;

// +------------------------------------------------------------------------------------------------------+

// |                                            ENTETE du PROGRAMME                                       |

// +------------------------------------------------------------------------------------------------------+

/**

 * class document

 * Représente un document associé à un projet. C'est à dire un fichier

 * téléchargeable disposant en plus d'une visibilité, d'un nom long, d'une

 * description et d'une url.

 */

class document extends fichier

{

    /*** Attributes: ***/

    /**

     * Description qui apparaitra à l'écran.

     * @access private

     */

    var $_description;

    /**

     * Date de dernière mise à jour des attributs du fichier.

     * @access private

     */

    var $_date_mise_a_jour;

    /**

     * Soit public, soit privé.

     * @access private

     */

    var $_visibilite;

    /**

     * Le nom du fichier tel qu'il apparaitra à l'écran.

     * @access private

     */

    var $_nom_long;

    /**

     * Un objet PEAR:DB

     * @access private

     */

    var $_db;

    /**

     * L'identifiant du document dans la table projet_document.

     * @access private

     */

    var $_id;

    /**

     *

     * @access private

     */

    var $_chemin_icone;

    /**

     * L'identifiant du père, peut être à NULL

     * @access private

     */

    var $_id_pere;

    /**

     * L'identifiant du propriétaire. Provient d'un annuaire. Peut être à NULL.

     * @access private

     */

    var $_id_proprietaire;

    /**

     * L'identifiant du projet auquel appartient le document. Peut être à NULL.

     * @access private

     */

    var $_id_projet;

    /**

    *   Le chemin du fichier, depuis le répertoire du projet

    *

    */

    var $_pd_lien ;

    var $nom_fichier ;

    /**

     *

     *

     * @param int id_document L'identifiant du document dans la base.

     * @param int objetDB un objet PEAR:DB

     * @return void

     * @access public

     */

    function document( $id_document = "",  &$objetDB, $chemin = '', $chemin_icones = '')

    {

        if (is_object($objetDB)) {

        	$GLOBALS['projet_db'] = $objetDB;

        }

        $this->_chemin_icone = $chemin_icones ;

        if ($id_document != "") {

            $requete = "select * from projet_documents where pd_id=".$id_document ;

            $resultat = $GLOBALS['projet_db']->query ($requete) ;

            if (DB::isError($resultat)) {

                die ("Echec de la requete<br />".$resultat->getMessage()."<br />".$resultat->getDebugInfo()) ;

            }

            $ligne = $resultat->fetchRow (DB_FETCHMODE_OBJECT) ;

    		if ($resultat->numRows()>0) {

	            $this->nom_fichier = $ligne->pd_lien;

	            $this->_id_projet = $ligne->pd_ce_projet;

	            $this->_id = $ligne->pd_id ;

	            fichier::fichier($chemin.$this->getChemin(), $GLOBALS['projet_db']) ;

	            if (is_object ($this->_type_mime)) $this->_type_mime->setCheminIcone ($chemin_icones) ;

	            $this->_id_proprietaire = $ligne->pd_ce_utilisateur ;

	            $this->_nom_long = $ligne->pd_nom ;

	            $this->_visibilite = $ligne->pd_visibilite ;

	            $this->_date_mise_a_jour = $ligne->pd_date_de_mise_a_jour ;

	            $this->_description = $ligne->pd_description ;

	            $this->_pd_lien = $ligne->pd_lien;

	            if ($this->_isRacine($ligne->pd_pere)) {

	                $this->_id_pere = 0 ;

	            } else {

	                $this->_id_pere = $ligne->pd_pere ;

	            }

    		}

        }

    } // end of member function document

    /**

     *

     *

     * @param int id_document L'identifiant du document dans la base.

     * @param int objetDB Un objet PEAR:DB

     * @return document

     * @access public

     */

    function __construct( $id_document = "",  &$objetDB, $chemin = '', $chemin_icones = '' )

    {

       $this->document($id_document, $objetDB, $chemin, $chemin_icones);

    } // end of member function __construct

    /**

     * Renvoie le nom long du fichier.

     *

     * @return string

     * @access public

     */

    function getNomLong( )

    {

        return $this->_nom_long ;

    } // end of member function getNomLong

    /**

     * Renvoie la visibilité du document, soit "public" soit "prive"

     *

     * @return visibilite

     * @access public

     */

    function getVisibilite( )

    {

        return $this->_visibilite ;

    } // end of member function getVisibilite

    /**

     * Renvoie la description du document, sous forme de chaine.

     *

     * @return string

     * @access public

     */

    function getDescription( )

    {

        return $this->_description ;

    } // end of member function getDescription

    /**

     * Renvoie la date de création ou de mise à jour du fichier.

     *

     * @return date

     * @access public

     */

    function getDateMiseAJour( )

    {

        return $this->_date_mise_a_jour ;

    } // end of member function getDateMiseAJour

    /**

     * Renvoie l'identifiant d'un document.

     *

     * @return int

     * @access public

     */

    function getIdDocument( )

    {

        return $this->_id ;

    } // end of member function getIdDocument

    /**

     * Renvoie le chemin de l'icone du fichier. Fait un appel à type_fichier_mime.

     *

     * @return string

     * @access public

     */

    function getCheminIcone()

    {

        if ($this->isRepertoire()) {

            return $this->_chemin_icone."repertoire.gif" ;

        } else {

            if (is_object ($this->_type_mime)) return $this->_type_mime->getCheminIcone() ;

        }

    } // end of member function getCheminIcone

    /**

     * Permet de récupérer le nom du répertoire racine associé à un projet.

     *

     * @param int id_projet L'identifiant du projet dont on veux récupérer le répertoire racine.

     * @param DB objetDB Un objet PEAR:DB

     * @return string

     * @static

     * @access public

     */

    function getNomRepertoireProjet( $id_projet , &$objetDB)

    {

        // Dans la table projet_documents, pour les répertoires racines, pd_pere = null

        $requete = "select pd_nom from projet_documents where pd_ce_projet=$id_projet and pd_pere is null" ;

        $resultat = $objetDB->query ($requete) ;

        if (DB::isError($resultat)) {

            die ("Echec de la requete<br />".$resultat->getMessage()."<br />".$resultat->getDebugInfo()) ;

        }

        $ligne = $resultat->fetchRow (DB_FETCHMODE_OBJECT) ;

        return $ligne->pd_nom ;

    } // end of member function getNomRepertoireProjet

    /**

     * Renvoie true si le document passé en paramètre est le répertoire racine.

     *

     * @param int id_document L'identifiant du document dont on veut savoir si c'est la racine.

     * @return bool

     * @access public

     */

    function _isRacine( $id_document )

    {

    	if ($id_document) {

	        $requete = "select pd_pere from projet_documents where pd_id=".$id_document ;

	        $resultat = $GLOBALS['projet_db']->query ($requete) ;

	        if (DB::isError($resultat)) {

	            die ("Echec de la requete<br />".$resultat->getMessage()."<br />".$resultat->getDebugInfo()) ;

	        }

	        $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT) ;

	        if ($resultat->numRows() >0) {

	        	if ($ligne->pd_pere == null){

	            	return true ;

	        	}

	        }

    	}

        return false ;

    } // end of member function _isRacine

    /**

     * Renvoie le chemin d'un fichier ou d'un répertoire. Contrairement à la classe

     * mère, cette méthode renvoie une URL projet et non pas un fichier.

     *

     * @return string

     * @access public

     */

    function getChemin($prefixe = '')

    {

        $chemin_repertoire_entre_racine_et_fichier = '';

        include_once PROJET_CHEMIN_CLASSES.'projet.class.php';

        $projet = new projet ($GLOBALS['projet_db'], $this->_id_projet);

        // l arborescence des repertoires

        $tableau_navigation = $this->getPath($this->_id) ;

        if (is_array ($tableau_navigation))$tableau_navigation = array_reverse($tableau_navigation);

        for ($i = 0; $i < count ($tableau_navigation); $i++) {

        	$chemin_repertoire_entre_racine_et_fichier.= $tableau_navigation[$i]."/";

        }

        return $projet->getNomRepertoire().'/'.$chemin_repertoire_entre_racine_et_fichier.$this->nom_fichier ;

    }

    /**

     * Renvoie pour le repertoire ou le fichier courant, les identifiants et les noms de tous les

     * répertoires père jusqu'à la racine. 0 => ['id'], ['nom'] 1 => [id'], ['nom'] etc.

     * En commençant par la racine et en descendant.  Pour la racine id vaut "" et nom

     * vaut "".

     *

     * @param int id_repertoire L'identifiant d'un répertoire.

     * @return Array

     * @access public

     */

    function getCheminIdRepertoire( $id_doc, &$objetDB )

    {

        if ($id_doc == "") $id_doc = 0;

        // on commence par rechercher le répertoire père, dans la base de donnée

        $requete = 'select pd_pere, pd_nom, pd_id, pd_ce_type from projet_documents where pd_id='.$id_doc ;

        $resultat = $objetDB->query ($requete) ;

        if (DB::isError($resultat)) {

            die ("Echec de la requete<br />".$resultat->getMessage()."<br />".$resultat->getDebugInfo()) ;

        }

        $ligne = $resultat->fetchRow (DB_FETCHMODE_OBJECT) ;

        $chemin_rep_id_nom = array() ;

        if ($resultat->numRows()>0) {

    	    if ($ligne->pd_pere == 0) {

        	    return ; //array ($ligne->pd_pere);

        	}

            array_push ($chemin_rep_id_nom, $ligne->pd_pere) ;

            $tab = document::getCheminIdRepertoire($ligne->pd_pere, $objetDB) ;

            $chemin_rep_id_nom = array_merge ($tab, $chemin_rep_id_nom) ;

        }

        return array_reverse($chemin_rep_id_nom);

    }

	function getPath( $id_doc)

    {

        if ($id_doc == "") $id_doc = 0;

        // on commence par rechercher le répertoire père, dans la base de donnée

        $requete = 'select pd_pere, pd_nom, pd_id, pd_ce_type from projet_documents where pd_id='.$id_doc ;

        $resultat = $GLOBALS['projet_db']->query ($requete) ;

        if (DB::isError($resultat)) {

            return ("Echec de la requete<br />".$resultat->getMessage()."<br />".$resultat->getDebugInfo()) ;

        }

        $ligne = $resultat->fetchRow (DB_FETCHMODE_OBJECT) ;

        $chemin_rep_id_nom = array() ;

        if ($resultat->numRows()>0) {

    	    if ($ligne->pd_pere == 0) {

        	    return array();

        	}

            array_push ($chemin_rep_id_nom, $ligne->pd_pere) ;

            $chemin_rep_id_nom = array_merge ($chemin_rep_id_nom, document::getPath($ligne->pd_pere) );

        }

        return $chemin_rep_id_nom;

    }

    /**

     *  Calcule le chemin vers le fichier ou le répertoire uploadé

     *  renvoie un chaine de la forme dir1/dir2/fichier.ext

     *  En prenant comme racine le répertoire du projet, exclu.

     * @return  string  Le chemin

     */

    function calculeCheminUploaded ($radical) {

        if (isset($_FILES['fichier']['name'])) {

        	$extension = preg_replace("/^([^\.]+)\.(\w+$)/", "\\2", $_FILES['fichier']['name']) ;

        }

        if ($this->_id_pere != '') {

            // On appelle la méthode getCheminIdRepertoire qui renvoie un tableau avec la liste

            // des répertoires jusqu'à la racine, on enlève la racine ($i = 0) et on concatène

            // toutes les entrées pour obtenir le chemin jusqu'au répertoire courant

            $chemin_repertoire_entre_racine_et_repertoire_a_cree = '' ;

            $doc_pere = new document ($this->_id_pere, $GLOBALS['projet_db']);

            return $doc_pere->getChemin();

            $tableau_navigation = $this->getPath($this->_id_pere) ;

            for ($i = 0; $i < count ($tableau_navigation); $i++) $chemin_repertoire_entre_racine_et_repertoire_a_cree.= $tableau_navigation[$i]."/";

            $chemin = $chemin_repertoire_entre_racine_et_repertoire_a_cree ;

        } else {

            // Si l'on est à la racine du projet, le chemin vide

            return $radical ;

        }

        return $chemin ;

    }

    /**

     * Enregistre une ligne dans la table projet_document

     * Le tableau de valeur doit contenir les éléments suivants 'document_nom','document_description','document_visibilite','fichier'

     *

     * @param Array tableau_de_valeur Le tableau de valeur a insérer dans la base avec pour clé les noms des éléments

     * @access  public

     * @return void

     */

    function enregistrerSQL ($valeur, $chemin) {

        // On teste si on a affaire à un répertoire ou un fichier

        if (isset ($_FILES['fichier']['name'])) {

            // On tente de déterminer le type du fichier à partir de son nom dans $valeur['$fichier']

            $tableau_nom = explode (".", $_FILES['fichier']['name']) ;

            // On prend le dernier élément du tableau, si c'est un tableau

            if (is_array($tableau_nom)) {

                $extension = array_pop($tableau_nom) ;

                $type = type_fichier_mime::factory($extension) ;

                $id_extension = $type->getIdType() ;

            } else {

                $id_extension = 12 ;

            }

            $pd_lien = $chemin ;

        } else {    // Le cas ou on a affaire à un répertoire

            $id_extension = 0 ;

            // Le nom du répertoire est son identifiant avec un slash à la fin

            $pd_lien = $chemin."/" ;

            if ($this->_id_pere != '') {

                // On appelle la méthode getCheminIdRepertoire qui renvoie un tableau avec la liste

                // des répertoires jusqu'à la racine, on enlève la racine ($i = 0) et on concatène

                // toutes les entrées pour obtenir le chemin jusqu'au répertoire courant

                $chemin_repertoire_entre_racine_et_repertoire_a_cree = '' ;

                $tableau_navigation = $this->getCheminIdRepertoire($this->_id_pere, $GLOBALS['projet_db']) ;

                for ($i = 0; $i < count ($tableau_navigation); $i+=2) $chemin_repertoire_entre_racine_et_repertoire_a_cree.= $tableau_navigation[$i]."/";

                $pd_lien .= $chemin_repertoire_entre_racine_et_repertoire_a_cree ;

            }

            //$pd_lien .= SQL_obtenirNouveauId($GLOBALS['projet_db'], 'projet_documents', 'pd_id')."/" ;

            $pd_lien = SQL_obtenirNouveauId($GLOBALS['projet_db'], 'projet_documents', 'pd_id')."/" ;

        }

        $id = SQL_obtenirNouveauId($GLOBALS['projet_db'], 'projet_documents', 'pd_id') ;

        $requete = "insert into projet_documents set pd_id=".$id ;

        $requete .= ", pd_nom=\"".$valeur['document_nom']."\", pd_description=\"".$valeur['document_description']."\"".

                    ", pd_visibilite=\"".$valeur['document_visibilite']."\", pd_date_de_mise_a_jour=NOW(),".

                    "pd_ce_projet=\"".$this->_id_projet."\", pd_ce_utilisateur=\"".$this->_id_proprietaire."\"".

                    ", pd_pere=\"$this->_id_pere\", pd_ce_type=\"$id_extension\", pd_lien=\"$pd_lien\"" ;

        $resultat = $GLOBALS['projet_db']->query ($requete) ;

        if (DB::isError($resultat)) {

            die ("Echec de la requete<br />".$resultat->getMessage()."<br />".$resultat->getDebugInfo()) ;

        }

        $this->_id = $id ;

        return $pd_lien;

    }

	function genereNouveauNom ($radical, $ancien_nom, $id) {

		$extension = preg_replace("/^([^\.]+)\.(\w+$)/", "\\2", $ancien_nom) ;

        $nouveau_nom = $radical."_".$id.".".$extension ;

        return $nouveau_nom;

	}

    /**

     * Met à jour une ligne dans la table projet_document

     * Le tableau de valeur doit contenir les éléments suivants 'document_nom','document_description','document_visibilite','fichier'

     *

     * @param Array tableau_de_valeur Le tableau de valeur a insérer dans la base avec pour clé les noms des éléments

     * @access  public

     * @return void

     */

    function majSQL ($valeur) {

        $requete = "update projet_documents set pd_nom=\"".$valeur['document_nom']."\", pd_description=\"".$valeur['document_description']."\"".

                    ", pd_visibilite=\"".$valeur['document_visibilite']."\", pd_date_de_mise_a_jour=NOW()".

                    " where pd_id=".$this->_id;

        $resultat = $GLOBALS['projet_db']->query ($requete) ;

        if (DB::isError($resultat)) {

            die ("Echec de la requete<br />".$resultat->getMessage()."<br />".$resultat->getDebugInfo()) ;

        }

        return ;

    }

    /** Supprime les donnéexs du document dans la table projet_documents

     *

     *

     * @return true en cas de succès

     */

    function suppressionSQL () {

        $requete = 'delete from projet_documents where pd_id='.$this->_id ;

        $resultat = $GLOBALS['projet_db']->query ($requete) ;

        if ($GLOBALS['projet_db']->affectedRows()) return true ;

        return false ;

    }

    /**

     * Déplace un document au sein d'un même projet

     *

     * @param int repertoire_destination L'identifiant du répertoire destination.

     * @return bool

     * @access public

     */

    function deplace( $repertoire_destination, $repertoire_projet )

    {

        // On récupère les informations du répertoire cible

        if ($repertoire_destination != 0) {

            $repertoire_cible = new document ($repertoire_destination, $GLOBALS['projet_db']) ;

            $chemin_rep_cible = $repertoire_cible->getChemin();

        } else {

        	// Si le repertoire destination est la racine cad id =0

        	// on cree un document qui aura pour chemin le repertoire du projet

        	include_once PROJET_CHEMIN_CLASSES.'projet.class.php';

            $projet = new projet ($GLOBALS['projet_db'], $this->_id_projet);

        	$chemin_rep_cible = $projet->getNomRepertoire().'/';

        }

        $nom_fichier = $this->_pd_lien ;

        $requete = 'update projet_documents set pd_pere='.$repertoire_destination.' where pd_id='.$this->_id ;

        $resultat = $GLOBALS['projet_db']->query ($requete) ;

        if (DB::isError($resultat)) {

            echo ("Echec de la requete<br />".$resultat->getMessage()."<br />".$resultat->getDebugInfo()) ;

            return false ;

        }

        //echo $this->_chemin.'<br>'.PROJET_CHEMIN_FICHIER.$chemin_rep_cible.$nom_fichier;

        return fichier::deplace ($this->_chemin, PROJET_CHEMIN_FICHIER.$chemin_rep_cible.$nom_fichier) ;

    } // end of member function deplace

    /**

     * Pour modifier l'identifiant du projet auquel appartient un document.

     *

     * @param int id_projet L'identifiant du projet.

     * @return void

     * @access public

     */

    function setIdProjet( $id_projet )

    {

        $this->_id_projet = $id_projet ;

    } // end of member function setIdProjet

    /**

     * Permet de modifier l'identifiant du propietaire d'un projet.

     *

     * @param int id_proprietaire L'identifiant du proprietaire d'un document.

     * @return void

     * @access public

     */

    function setIdProprietaire( $id_proprietaire )

    {

        $this->_id_proprietaire = $id_proprietaire ;

    } // end of member function setIdProprietaire

    /**

     * Permet de modifier l'identifiant du répertoire d'un document.

     *

     * @param int id_repertoire L'identifiant du repertoire d'un document.

     * @return void

     * @access public

     */

    function setIdRepertoire( $id_repertoire )

    {

        $this->_id_pere = $id_repertoire;

    } // end of member function setIdRepertoire

    /**

     * initAttributes sets all document attributes to its default                    value make

     * sure to call this method within your class constructor

     */

    function initAttributes( )

    {

        $this->_visibilite = "public";

    }

    /**

     * Renvoie les derniers documents de l'ensemble des projets.

     *

     * @param int nombre Le nombre de document à renvoyer

     * @return Array

     * @static

     * @access public

     */

    function getDocumentsRecents( $nombre = 10, &$objetDB, $chemin, $chemin_icones, $id_projet = '', $visible = true)

    {

        // on recherche les documents, hors repertoire

        $requete = 'select pd_id from projet_documents where pd_ce_type<>0 ';

        if ($id_projet != '') $requete .= ' and pd_ce_projet='.$id_projet.' ';

        if (!$visible) $requete .= ' and pd_visibilite="public" ';

        $requete .= 'order by pd_date_de_mise_a_jour desc limit 0,'.$nombre ;

        $resultat = $objetDB->query ($requete) ;

        if (DB::isError ($resultat)) {

            die ('Echec de la requete : '.$requete.'<br />'.$resultat->getMessage()) ;

        }

        $tableau_document = array() ;

        while ($ligne = $resultat->fetchRow (DB_FETCHMODE_OBJECT)) {

            array_push ($tableau_document, new document ($ligne->pd_id, $objetDB, $chemin, $chemin_icones)) ;

        }

        return $tableau_document ;

    } // end of member function getDocumentsRecents

    /**

     * Renvoie les documents du projet passe en parametre sous forme d arbre d objet document

     *

     * @param int l identifiant du projet

     * @return Array

     * @static

     * @access public

     */

	function getArbreDocument($id_projet, $objetDB = '') {

		$requete = 'select pd_id, pd_nom, pd_ce_type, pd_pere from projet_documents where pd_ce_projet='.$id_projet;

		$resultat = $GLOBALS['projet_db']->getAll($requete, null, DB_FETCHMODE_OBJECT);

		if (DB::isError ($resultat)) {

            return ('Echec de la requete : '.$requete.'<br />'.$resultat->getMessage()) ;

        }

      	return $resultat;

	}

	 /**

     * Renvoie la taille du document formatee avec une unite adapte

     *

     * @return string La taille formate

     * @access public

     */

	function getTailleFormatee($precision = 1) {

		$taille = $this->getTaille();

		if ($taille > 1000000) {

			$diviseur = 1000000;

			$unite = 'Mo';

		} else {

			$diviseur = 1000 ;

			$unite = 'Ko';

		}

		return round ($taille / $diviseur, $precision).' '.$unite;

	}

	/**

     * Renvoie une liste de document, enfant du document courant

     * qui doit etre un repertoire bien sur

     *

     * @return mixed un tableau de document

     * @access public

     */

	function getDocumentsEnfant() {

	}

} // end of document

?>