Subversion Repositories Applications.papyrus

Rev

Rev 125 | Rev 350 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
4 jpm 1 
<?php
2 
/*vim: set expandtab tabstop=4 shiftwidth=4: */
3 
// +------------------------------------------------------------------------------------------------------+
4 
// | PHP version 4.1                                                                                      |
5 
// +------------------------------------------------------------------------------------------------------+
6 
// | Copyright (C) 2004 Tela Botanica (accueil@tela-botanica.org)                                         |
7 
// +------------------------------------------------------------------------------------------------------+
8 
// | This library is free software; you can redistribute it and/or                                        |
9 
// | modify it under the terms of the GNU Lesser General Public                                           |
10 
// | License as published by the Free Software Foundation; either                                         |
11 
// | version 2.1 of the License, or (at your option) any later version.                                   |
12 
// |                                                                                                      |
13 
// | This library is distributed in the hope that it will be useful,                                      |
14 
// | but WITHOUT ANY WARRANTY; without even the implied warranty of                                       |
15 
// | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU                                    |
16 
// | Lesser General Public License for more details.                                                      |
17 
// |                                                                                                      |
18 
// | You should have received a copy of the GNU Lesser General Public                                     |
19 
// | License along with this library; if not, write to the Free Software                                  |
20 
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
21 
// +------------------------------------------------------------------------------------------------------+
204 jpm 22 
// CVS : $Id: pap_site.fonct.php,v 1.3 2004-12-03 19:22:30 jpm Exp $
4 jpm 23 
/**
24 
* Bibliothèque de fonctions concernant les sites.
25 
*
26 
* Bibliothèque de fonctions permettant de manipuler les tables :
27 
* - gen_site,
28 
* - gen_site_auth,
29 
* - gen_site_auth_bdd,
30 
* - gen_site_auth_ldap,
31 
* - gen_site_categorie,
32 
* - gen_site_categorie_valeur.
33 
*
34 
*@package Papyrus
35 
*@subpackage Fonctions
36 
//Auteur original :
37 
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
38 
//Autres auteurs :
39 
*@author        Alexandre GRANIER <alexandre@tela-botanica.org>
40 
*@copyright     Tela-Botanica 2000-2004
204 jpm 41 
*@version       $Revision: 1.3 $ $Date: 2004-12-03 19:22:30 $
4 jpm 42 
// +------------------------------------------------------------------------------------------------------+
43 
*/
44 
 
45 
// +------------------------------------------------------------------------------------------------------+
46 
// |                                           LISTE de FONCTIONS                                         |
47 
// +------------------------------------------------------------------------------------------------------+
48 
 
125 jpm 49 
/** Fonction GEN_lireInfoSitePrincipal() - Renvoie un objet contenant une ligne de la table gen_site
4 jpm 50 
*
125 jpm 51 
* Retourne la ligne de la table gen_site concernant le site principal ayant pour identifiant la valeur
4 jpm 52 
* passée en paramètre.
53 
*
54 
* @param  mixed   une instance de la classse Pear DB.
125 jpm 55 
* @param  string  l'identifiant du site.
4 jpm 56 
* @return  mixed  un objet résultat de Pear DB contenant une ligne de la table gen_site, ou false en cas d'erreur.
57 
*/
125 jpm 58 
function GEN_lireInfoSitePrincipal($objet_pear_db, $site_id)
4 jpm 59 
{
60 
 
61 
    $requete =  'SELECT * '.
62 
                'FROM gen_site, gen_site_relation '.
125 jpm 63 
                'WHERE gs_id_site = '.$site_id.' '.
4 jpm 64 
                'AND gs_id_site = gsr_id_site_01 '.
65 
                'AND gsr_id_site_01 = gsr_id_site_02 '.
66 
                'AND gsr_id_valeur = 102 '; // 102 = site "principal"
67 
 
68 
    $resultat = $objet_pear_db->query($requete);
69 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
70 
 
71 
    if ($resultat->numRows() != 1) {
72 
        // Impossible de récupérer des informations sur le site principal ayant pour code alpha $code_alpha
73 
        return false;
74 
    }
75 
 
76 
    $info_site_principal = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
77 
    $resultat->free();
78 
 
79 
    return $info_site_principal;
80 
}
81 
 
125 jpm 82 
/** Fonction GEN_lireInfoSitePrincipalCodeAlpha() - Renvoie un objet contenant une ligne de la table gen_site
83 
*
84 
* Retourne la ligne de la table gen_site concernant le site principal ayant pour code alphanumérique la valeur
85 
* passée en paramètre.
86 
* Ancien nom : getProjectInfos()
87 
*
88 
* @param  mixed   une instance de la classse Pear DB.
89 
* @param  string  le code alphanumérique du site.
90 
* @return  mixed  un objet résultat de Pear DB contenant une ligne de la table gen_site, ou false en cas d'erreur.
91 
*/
92 
function GEN_lireInfoSitePrincipalCodeAlpha($objet_pear_db, $code_alpha)
93 
{
94 
 
95 
    $requete =  'SELECT * '.
96 
                'FROM gen_site, gen_site_relation '.
97 
                'WHERE gs_code_alpha = "'.$code_alpha.'" '.
98 
                'AND gs_id_site = gsr_id_site_01 '.
99 
                'AND gsr_id_site_01 = gsr_id_site_02 '.
100 
                'AND gsr_id_valeur = 102 '; // 102 = site "principal"
101 
 
102 
    $resultat = $objet_pear_db->query($requete);
103 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
104 
 
105 
    if ($resultat->numRows() != 1) {
106 
        // Impossible de récupérer des informations sur le site principal ayant pour code alpha $code_alpha
107 
        return false;
108 
    }
109 
 
110 
    $info_site_principal = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
111 
    $resultat->free();
112 
 
113 
    return $info_site_principal;
114 
}
115 
 
116 
/** Fonction getSiteI18nInfos() - Renvoie un objet contenant une ligne de la table gen_site
117 
*
118 
* Retourne la ligne de la table gen_site concernant un site ayant pour code alphanumérique et identifiant
119 
* i18n les valeurs passées en paramètres.
120 
* Ancien nom :getSiteI18nInfos():
121 
*
122 
* @param  mixed   une instance de la classse Pear DB.
123 
* @param  string  le code alphanumérique du site recherché.
124 
* @param  string  l'identifiant i18n possédé par le site recherché.
125 
* @return  mixed  un objet résultat de Pear DB contenant une ligne de la table gen_site, ou false en cas d'erreur.
126 
*/
127 
function GEN_lireInfoSiteI18nCodeAlpha($objet_pear_db, $code_alpha, $i18n)
128 
{
129 
    $requete =  'SELECT * '.
130 
                'FROM gen_site, gen_site_relation '.
131 
                'WHERE gs_code_alpha = "'.$code_alpha.'" '.
132 
                'AND gs_ce_i18n = "'.$i18n.'" ';
133 
 
134 
    $resultat = $objet_pear_db->query($requete);
135 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
136 
 
137 
    if ($resultat->numRows() != 1) {
138 
        return false;
139 
    }
140 
 
141 
    $info_site = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
142 
    $resultat->free();
143 
 
144 
    return $info_site;
204 jpm 145 
}
146 
 
147 
/** Fonction GEN_retournerTableauTypeSiteExterne() - Renvoie un tableau des types site externe
148 
*
149 
* Retourne un tableau de tableaux associatifs contenant les valeurs des types des sites externes.
150 
*
151 
* @param  mixed   une instance de la classse Pear DB.
152 
* @return  mixed  un tableau de tableaux associatifs contenant les valeurs des types des sites externes
153 
*/
154 
function GEN_retournerTableauTypeSiteExterne($objet_pear_db)
155 
{
156 
    $requete =  'SELECT * '.
157 
                'FROM gen_site_categorie_valeur '.
158 
                'WHERE gscv_id_categorie = 3 ';// 3 = type de site externe
159 
 
160 
    $resultat = $objet_pear_db->query($requete);
161 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
162 
 
163 
    if ($resultat->numRows() == 0) {
164 
        return false;
165 
    }
166 
    $tab_type = array();
167 
    while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT) ) {
168 
        $aso_type_site_externe = array('id' => $ligne->gscv_id_valeur, 'intitule' => $ligne->gscv_intitule_valeur);
169 
        array_push($tab_type, $aso_type_site_externe);
170 
    }
171 
    $resultat->free();
172 
 
173 
    return $tab_type;
4 jpm 174 
}
175 
 
176 
/* +--Fin du code ----------------------------------------------------------------------------------------+
177 
*
178 
* $Log: not supported by cvs2svn $
204 jpm 179 
* Revision 1.2  2004/11/04 12:25:35  jpm
180 
* Ajout d'une fonction permettant de récupérer les infos sur un site à partir de son id.
181 
*
125 jpm 182 
* Revision 1.1  2004/06/15 15:13:37  jpm
183 
* Changement de nom et d'arborescence de Genesia en Papyrus.
184 
*
4 jpm 185 
* Revision 1.1  2004/05/03 16:26:07  jpm
186 
* Ajout de la bibliothèque de fonctions permettant de manipuler les informations issues des tables "gen_site_..." de Génésia.
187 
*
188 
*
189 
* +-- Fin du code ----------------------------------------------------------------------------------------+
190 
*/
191 
?>