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 Lesser 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                                    |

// | Lesser General Public License for more details.                                                      |

// |                                                                                                      |

// | You should have received a copy of the GNU Lesser 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: pap_site.fonct.php,v 1.4 2005-04-19 17:21:19 jpm Exp $

/**

* Bibliothèque de fonctions concernant les sites.

*

* Bibliothèque de fonctions permettant de manipuler les tables :

* - gen_site,

* - gen_site_auth,

* - gen_site_auth_bdd,

* - gen_site_auth_ldap,

* - gen_site_categorie,

* - gen_site_categorie_valeur.

*

*@package Papyrus

*@subpackage Fonctions

//Auteur original :

*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>

//Autres auteurs :

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

*@copyright     Tela-Botanica 2000-2004

*@version       $Revision: 1.4 $ $Date: 2005-04-19 17:21:19 $

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

*/

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

// |                                           LISTE de FONCTIONS                                         |

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

/** Fonction GEN_lireInfoSites() - Renvoie un tableau contenant les lignes de la table gen_site

*

* Retourne un tableau contenant les lignes de la table gen_site pour les sites "classiques".

*

* @param  mixed  une instance de la classse Pear DB.

* @param  string  le mode dans Pear DB dans lequel on veut recevoir les infos du menu.

* @param  integer le type de site (par défaut 102 = site "principal")

* @return array  un tableau contenant les lignes de la table gen_site pour les sites "principaux".

*/

function GEN_lireInfoSites(&$bdd, $mode = DB_FETCHMODE_OBJECT, $type_site = 102)

{

    $aso_sites = array();

    $requete =  'SELECT gen_site.* '.

                'FROM gen_site, gen_site_relation '.

                'WHERE gs_id_site = gsr_id_site_01 '.

                'AND gsr_id_site_01 = gsr_id_site_02 '.

                'AND gsr_id_valeur = '.$type_site.' '; // 102 = par défaut site "principal"

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

    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';

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

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

            array_push($aso_sites, $ligne);

        }

    }

    $resultat->free();

    return $aso_sites;

}

/** Fonction GEN_lireInfoSitePrincipal() - Renvoie un objet contenant une ligne de la table gen_site

*

* Retourne la ligne de la table gen_site concernant le site principal ayant pour identifiant la valeur

* passée en paramètre.

*

* @param  mixed   une instance de la classse Pear DB.

* @param  string  l'identifiant du site.

* @param  string  le mode dans Pear DB dans lequel on veut recevoir les infos du menu.

* @return  mixed  un objet résultat de Pear DB contenant une ligne de la table gen_site, ou false en cas d'erreur.

*/

function GEN_lireInfoSitePrincipal(&$objet_pear_db, $site_id, $mode = DB_FETCHMODE_OBJECT)

{

    $requete =  'SELECT * '.

                'FROM gen_site, gen_site_relation '.

                'WHERE gs_id_site = '.$site_id.' '.

                'AND gs_id_site = gsr_id_site_01 '.

                'AND gsr_id_site_01 = gsr_id_site_02 '.

                'AND gsr_id_valeur = 102 '; // 102 = site "principal"

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

    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';

    if ($resultat->numRows() != 1) {

        // Impossible de récupérer des informations sur le site principal ayant pour code alpha $code_alpha

        return false;

    }

    $info_site_principal = $resultat->fetchRow($mode);

    $resultat->free();

    return $info_site_principal;

}

/** Fonction GEN_lireInfoSitePrincipalCodeAlpha() - Renvoie un objet contenant une ligne de la table gen_site

*

* Retourne la ligne de la table gen_site concernant le site principal ayant pour code alphanumérique la valeur

* passée en paramètre.

* Ancien nom : getProjectInfos()

*

* @param  mixed   une instance de la classse Pear DB.

* @param  string  le code alphanumérique du site.

* @param  string  le mode dans Pear DB dans lequel on veut recevoir les infos du menu.

* @return  mixed  un objet résultat de Pear DB contenant une ligne de la table gen_site, ou false en cas d'erreur.

*/

function GEN_lireInfoSitePrincipalCodeAlpha(&$objet_pear_db, $code_alpha, $mode = DB_FETCHMODE_OBJECT)

{

    $requete =  'SELECT * '.

                'FROM gen_site, gen_site_relation '.

                'WHERE gs_code_alpha = "'.$code_alpha.'" '.

                'AND gs_id_site = gsr_id_site_01 '.

                'AND gsr_id_site_01 = gsr_id_site_02 '.

                'AND gsr_id_valeur = 102 '; // 102 = site "principal"

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

    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';

    if ($resultat->numRows() != 1) {

        // Impossible de récupérer des informations sur le site principal ayant pour code alpha $code_alpha

        return false;

    }

    $info_site_principal = $resultat->fetchRow($mode);

    $resultat->free();

    return $info_site_principal;

}

/** Fonction getSiteI18nInfos() - Renvoie un objet contenant une ligne de la table gen_site

*

* Retourne la ligne de la table gen_site concernant un site ayant pour code alphanumérique et identifiant

* i18n les valeurs passées en paramètres.

* Ancien nom :getSiteI18nInfos():

*

* @param  mixed   une instance de la classse Pear DB.

* @param  string  le code alphanumérique du site recherché.

* @param  string  l'identifiant i18n possédé par le site recherché.

* @return  mixed  un objet résultat de Pear DB contenant une ligne de la table gen_site, ou false en cas d'erreur.

*/

function GEN_lireInfoSiteI18nCodeAlpha(&$objet_pear_db, $code_alpha, $i18n)

{

    $requete =  'SELECT * '.

                'FROM gen_site, gen_site_relation '.

                'WHERE gs_code_alpha = "'.$code_alpha.'" '.

                'AND gs_ce_i18n = "'.$i18n.'" ';

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

    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';

    if ($resultat->numRows() != 1) {

        return false;

    }

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

    $resultat->free();

    return $info_site;

}

/** Fonction GEN_retournerTableauTypeSiteExterne() - Renvoie un tableau des types site externe

*

* Retourne un tableau de tableaux associatifs contenant les valeurs des types des sites externes.

*

* @param  mixed   une instance de la classse Pear DB.

* @return  mixed  un tableau de tableaux associatifs contenant les valeurs des types des sites externes

*/

function GEN_retournerTableauTypeSiteExterne(&$objet_pear_db)

{

    $requete =  'SELECT * '.

                'FROM gen_site_categorie_valeur '.

                'WHERE gscv_id_categorie = 3 ';// 3 = type de site externe

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

    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';

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

        return false;

    }

    $tab_type = array();

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

        $aso_type_site_externe = array('id' => $ligne->gscv_id_valeur, 'intitule' => $ligne->gscv_intitule_valeur);

        array_push($tab_type, $aso_type_site_externe);

    }

    $resultat->free();

    return $tab_type;

}

/* +--Fin du code ----------------------------------------------------------------------------------------+

*

* $Log: not supported by cvs2svn $

* Revision 1.3  2004/12/03 19:22:30  jpm

* Ajout d'une fonction retournant les types de sites externes gérés par Papyrus.

*

* Revision 1.2  2004/11/04 12:25:35  jpm

* Ajout d'une fonction permettant de récupérer les infos sur un site à partir de son id.

*

* Revision 1.1  2004/06/15 15:13:37  jpm

* Changement de nom et d'arborescence de Genesia en Papyrus.

*

* Revision 1.1  2004/05/03 16:26:07  jpm

* Ajout de la bibliothèque de fonctions permettant de manipuler les informations issues des tables "gen_site_..." de Génésia.

*

*

* +-- Fin du code ----------------------------------------------------------------------------------------+

*/

?>