Subversion Repositories Applications.papyrus

Rev

Rev 330 | Rev 340 | 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
// +------------------------------------------------------------------------------------------------------+
334 jpm 22
// CVS : $Id: pap_menu.fonct.php,v 1.15 2005-04-14 13:56:53 jpm Exp $
4 jpm 23
/**
24
* Bibliothèque de fonction sur le rendu.
25
*
26
* Cette bibliothèque contient des fonctions utilisé par le rendu des pages de Papyrus.
27
*
28
*@package Papyrus
29
*@subpackage Fonctions
30
//Auteur original :
285 jpm 31
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
4 jpm 32
//Autres auteurs :
33
*@author        Alexandre GRANIER <alexadandre@tela-botanica.org>
285 jpm 34
*@author        Laurent COUDOUNEAU <laurent.coudouneau@ema.fr>
4 jpm 35
*@copyright     Tela-Botanica 2000-2004
334 jpm 36
*@version       $Revision: 1.15 $ $Date: 2005-04-14 13:56:53 $
4 jpm 37
// +------------------------------------------------------------------------------------------------------+
38
*/
39
 
40
// +------------------------------------------------------------------------------------------------------+
41
// |                                            LISTE des FONCTIONS                                       |
42
// +------------------------------------------------------------------------------------------------------+
43
 
44
/** Fonction GEN_donnerProfondeurMax() - Renvoie le nombre de niveau de menu.
45
*
46
* Cette fonction calcule, pour un menu donné, le nombre de niveau de menu fils complétant
47
* l'arbre des menus jusqu'au feuilles.
48
* Ici on l'utilise en passant l'argument égal à zéro c'est à dire
49
* en partant du menu racine d'un site gmr_id_menu_02 = 0.
50
* C'est une fonction récursive.
51
* Noter que la variable $prof est statique.
52
*
53
* @param integer identifiant du site sur lequel la profondeur est calculé.
54
* @param integer identifiant du menu à partir delaquelle on souhaite calculer la profondeur.
55
* @return integer le nombre de niveau de menu.
56
*/
57
function GEN_donnerProfondeurMax($id_site, $id_menu)
58
{
59
    global $db;
60
    static $prof = 0;
61
 
62
    // Requête sur les relations de type "avoir père" entre menus
63
    $requete =  'SELECT gmr_id_menu_01 '.
64
                'FROM gen_menu, gen_menu_relation '.
65
                'WHERE gmr_id_menu_02 = '.$id_menu.' '.
66
                'AND gmr_id_menu_01 = gm_id_menu '.
67
                'AND gm_ce_site = '.$id_site.' '.
68
                'AND gmr_id_valeur = 1 '.
69
                'ORDER BY gmr_ordre ASC';
70
 
71
    $resultat = $db->query($requete);
72
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
73
 
74
    if ($resultat->numRows() == 0) {
75
        return $prof;
76
    }
77
    $prof++;
78
    while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
79
        $prof = GEN_donnerProfondeurMax($id_site, $ligne->gmr_id_menu_01);
80
    }
81
    return $prof;
82
}
83
 
124 jpm 84
/** Fonction GEN_donnerDernierFreres() - Renvoie l'id du dernier menu frère.
85
*
86
* Cette fonction regarde si un menu donné possède au moins un frère dans l'arbre
87
* des menus. Elle retourne l'id du dernier menu frére en utilisant gmr_ordre.
88
* Cette fonction fait appel à la fonction : GEN_lireIdentifiantMenuPere().
89
*
90
* @param integer identifiant du menu.
91
* @return boolean renvoi l'id du dernier menu frère sinon faux.
92
*/
93
function GEN_donnerDernierFreres($id_menu)
94
{
95
    // Initialisation des variables.
96
    global $db;
97
 
98
    $requete =  'SELECT gmr_id_menu_01 '.
99
                'FROM gen_menu_relation '.
100
                'WHERE gmr_id_menu_02 = '.GEN_lireIdentifiantMenuPere($id_menu).' '.
101
                'AND gmr_id_valeur = 1 '.
102
                'AND gmr_id_menu_01 <> '.$id_menu.' '.
103
                'ORDER BY gmr_ordre DESC';
104
 
105
    $resultat = $db->query($requete);
106
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
107
 
108
    $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
109
    if ($resultat->numRows() > 0) {
110
        return $ligne->gmr_id_menu_01;
111
    } else {
112
        return false;
113
    }
114
}
115
 
4 jpm 116
/** Fonction GEN_etreFreres() - Renvoie vrai si les menus ont le même père.
117
*
118
* Cette fonction regarde si deux menus donnés sont frères dans l'arbre
119
* des menus. Nous regardons si les menus ont le même identifiant comme père.
120
*
121
* @param integer identifiant du premier menu.
122
* @param integer identifiant du seconde menu.
123
* @return boolean renvoi vrai si les deux menus sont frères sinon faux.
124
*/
125
function GEN_etreFreres($id_menu_1, $id_menu_2)
126
{
127
    // Initialisation des variables.
128
    global $db;
129
 
130
    $requete =  'SELECT gmr_id_menu_02 '.
131
                'FROM gen_menu_relation '.
132
                'WHERE gmr_id_menu_01 = '.$id_menu_1.' '.
133
                'AND gmr_id_valeur = 1 ';
134
 
135
    $resultat = $db->query($requete);
136
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
137
 
138
    $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
139
    $id_pere_1 = $ligne->gmr_id_menu_02;
140
    $resultat->free();
141
 
142
    $requete =  'SELECT gmr_id_menu_02 '.
143
                'FROM gen_menu_relation '.
144
                'WHERE gmr_id_menu_01 = '.$id_menu_2.' '.
145
                'AND gmr_id_valeur = 1 ';
146
 
147
    $resultat = $db->query($requete);
148
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
149
 
150
    $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
151
    $id_pere_2 = $ligne->gmr_id_menu_02;
152
    $resultat->free();
153
 
154
    return ($id_pere_1 == $id_pere_2);
155
}
156
 
157
/** Fonction GEN_etreAncetre() - Renvoie vrai si le premier argument (identifiant de menu) est un ancètre du second.
158
*
159
* Nous récupérons l'identifiant du père du menu passé en argument numéro 2. Puis,
160
* nous le comparons à l'argument 1. Si c'est les même on retourne faux. Sinon on rapelle
161
* la fonction avec l'identifiant du père trouvé pour l'argument 2. Ainsi de suite jusqu'a
162
* renvoyé vrai où tomber sur un menu racine (idetifiant du père = 0).
84 jpm 163
* Si les variable sont null nous retournons false.
4 jpm 164
* C'est une fonction récursive.
165
*
166
* @param integer identifiant d'un menu numéro 1.
167
* @param integer identifiant d'un menu numéro 2.
168
* @return boolean vrai si le menu numéro 1 est ancètre du second.
169
*/
170
function GEN_etreAncetre($id_menu_1, $id_menu_2)
171
{
84 jpm 172
    //Test erreur
173
    if (is_null($id_menu_1) || is_null($id_menu_2)) {
174
        return false;
175
    }
176
 
4 jpm 177
    // Initialisation des variables.
178
    global $db;
179
 
180
    $requete =  'SELECT gmr_id_menu_02 '.
181
                'FROM gen_menu_relation '.
182
                'WHERE gmr_id_menu_01 = '.$id_menu_2.' '.
183
                'AND gmr_id_valeur = 1 ';
184
 
185
    $resultat = $db->query($requete);
186
    (DB::isError($resultat)) ? die (BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
187
 
188
    $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
189
    $resultat->free();
190
    if ($ligne->gmr_id_menu_02 == 0) {
191
        return false;
124 jpm 192
    } else if ($ligne->gmr_id_menu_02 == $id_menu_1) {
4 jpm 193
        return true;
194
    } else {
195
        return GEN_etreAncetre($id_menu_1, $ligne->gmr_id_menu_02);
196
    }
197
}
198
 
199
/** Fonction GEN_lireIdentifiantMenuAncetre() - Renvoie l'identifiant du menu ancètre du menu passé en paramètre.
200
*
201
*   Cette fonction parcours la table gen_menu_relation et retourne l'identifiant du
202
*   menu dont le père est le menu racine (identifiant = 0) pour le menu passé en paramètre.
203
*
204
*   @global mixed   objet Pear DB de connexion à la base de données..
205
*   @param  int     identifiant du menu dont il faut rechercher le père.
206
*   @return int     identifiant du menu ancètre du menu passé en paramètre.
207
*/
208
function GEN_lireIdentifiantMenuAncetre($id_menu)
209
{
210
    global $db;
211
    // On teste si on est au niveau d'un menu racine i.e GM_ID_PERE=0
212
    $requete =  'SELECT gmr_id_menu_02 '.
213
                'FROM gen_menu_relation '.
214
                'WHERE gmr_id_menu_01 = '.$id_menu.' '.
215
                'AND gmr_id_valeur = 1 ';// 1 = avoir "père"
216
 
217
    $resultat = $db->query($requete);
218
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
219
 
220
    $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
221
    $resultat->free();
222
 
223
    // Dans le cas où le menu en paramètre est un menu racine
224
    if ($ligne->gmr_id_menu_02 == 0) {
225
        return $id_menu;
226
    }
227
 
228
    return GEN_lireIdentifiantMenuAncetre($ligne->gmr_id_menu_02);
229
}
230
 
231
/** Fonction GEN_lireIdentifiantMenuPere() - Renvoie l'identifiant du père du menu passé en paramètre.
232
*
334 jpm 233
* Cette fonction parcours la table gen_menu_relation et retourne l'identifiant du
234
* menu père du menu passé en paramètre.
4 jpm 235
*
334 jpm 236
* @global mixed   objet Pear DB de connexion à la base de données..
237
* @param  int     l'identifiant du fils
238
* @param  mixed     une instance de la classse Pear DB.
239
* @return mixed   l'identifiant du père,ou false en cas d'erreur.
4 jpm 240
*/
334 jpm 241
function GEN_lireIdentifiantMenuPere($id_menu, $db = null)
4 jpm 242
{
334 jpm 243
    if (is_null($db)) {
244
        $db =& $GLOBALS['_GEN_commun']['pear_db'];
245
    }
4 jpm 246
 
247
    $requete =  'SELECT gmr_id_menu_02 '.
248
                'FROM gen_menu_relation '.
249
                'WHERE gmr_id_menu_01 = '.$id_menu.' '.
250
                'AND gmr_id_valeur = 1 ';// 1 = avoir "père"
251
 
103 jpm 252
    $resultat = $db->getOne($requete) ;
4 jpm 253
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
254
 
103 jpm 255
    return $resultat;
4 jpm 256
}
257
 
258
/** Fonction GEN_lireInfoMenu() - Renvoie un objet ou un tableau contenant une ligne de la table gen_menu
259
*
260
* Retourne la ligne de la table gen_menu concernant le menu ayant pour identifiant la valeur
261
* passée en paramètre.
262
* Ancien nom : getLevel()
263
*
264
* @param  mixed     une instance de la classse Pear DB.
265
* @param  int       l'identifiant d'un menu.
266
* @param  string    le mode dans Pear DB dans lequel on veut recevoir les infos du menu.
267
* @return  mixed    un objet ou tableau résultat de Pear DB contenant une ligne de la table gen_menu, ou false en cas d'erreur.
268
*/
146 jpm 269
function GEN_lireInfoMenu($db, $id_menu, $mode = DB_FETCHMODE_OBJECT)
4 jpm 270
{
271
    //----------------------------------------------------------------------------
149 jpm 272
    // Gestion des erreurs
273
 
274
    //----------------------------------------------------------------------------
4 jpm 275
    // Recherche des informations sur le menu
276
    $requete =  'SELECT * '.
277
                'FROM gen_menu '.
146 jpm 278
                'WHERE gm_id_menu = '.$id_menu;
4 jpm 279
 
280
    $resultat = $db->query($requete);
281
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
282
 
283
    if ($resultat->numRows() != 1) {
284
        return false;
285
    }
286
 
287
    //----------------------------------------------------------------------------
288
    // Récupération des infos
289
    $info_menu = $resultat->fetchRow($mode);
290
    $resultat->free();
291
 
292
    return $info_menu;
293
}
322 jpm 294
/** Fonction GEN_retournerMenuCodeNum() - Renvoie le code num d'un menu en fonction du code Alphanumérique
295
*
296
* Retourne le code numérique d'un menu en fonction du code alphanumérique.
297
*
298
* @param  mixed  une instance de la classse Pear DB.
299
* @param  string le code alphanumérique d'un menu.
300
* @return mixed le code numérique du menu sinon false.
301
*/
302
function GEN_retournerMenuCodeNum($db, $code_alphanum)
303
{
304
    //----------------------------------------------------------------------------
305
    // Recherche des informations sur le menu
306
    $requete =  'SELECT gm_code_num '.
307
                'FROM gen_menu '.
308
                'WHERE gm_code_alpha = "'.$code_alphanum.'"';
309
 
310
    $resultat = $db->query($requete);
311
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
312
 
313
    if ($resultat->numRows() != 1) {
314
        return false;
315
    }
316
 
317
    //----------------------------------------------------------------------------
318
    // Récupération des infos
319
    $info_menu = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
320
    $code_num = $info_menu->gm_code_num;
321
    $resultat->free();
322
 
323
    return $code_num;
324
}
4 jpm 325
 
322 jpm 326
/** Fonction GEN_retournerMenuCodeAlpha() - Renvoie le code alphanumérique d'un menu en fonction du code numérique
327
*
328
* Retourne le code alphanumérique d'un menu en fonction du code numérique.
329
*
330
* @param  mixed  une instance de la classse Pear DB.
331
* @param  string le code numérique d'un menu.
332
* @return mixed le code alphanumérique du menu sinon false.
333
*/
334
function GEN_retournerMenuCodeAlpha($db, $code_num)
335
{
336
    //----------------------------------------------------------------------------
337
    // Recherche des informations sur le menu
338
    $requete =  'SELECT gm_code_alpha '.
339
                'FROM gen_menu '.
340
                'WHERE gm_code_num = '.$code_num;
341
 
342
    $resultat = $db->query($requete);
343
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
344
 
345
    if ($resultat->numRows() != 1) {
346
        return false;
347
    }
348
 
349
    //----------------------------------------------------------------------------
350
    // Récupération des infos
351
    $info_menu = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
352
    $code_alphanum = $info_menu->gm_code_alpha;
353
    $resultat->free();
354
 
355
    return $code_alphanum;
356
}
357
 
216 jpm 358
/** Fonction GEN_lireContenuMenu() - Renvoie un objet ou un tableau contenant une ligne de la table gen_menu_contenu
359
*
360
* Retourne la ligne de la table gen_menu_contenu concernant le menu ayant pour identifiant la valeur
361
* passée en paramètre.
362
*
363
* @param  mixed     une instance de la classse Pear DB.
364
* @param  int       l'identifiant d'un menu.
365
* @param  string    le mode dans Pear DB dans lequel on veut recevoir les infos du menu.
366
* @return  mixed    un objet ou tableau résultat de Pear DB contenant une ligne de la table gen_menu_contenu, ou false en cas d'erreur.
367
*/
368
function GEN_lireContenuMenu($db, $id_menu, $mode = DB_FETCHMODE_OBJECT)
369
{
370
    //----------------------------------------------------------------------------
371
    // Gestion des erreurs
372
 
373
    //----------------------------------------------------------------------------
374
    // Recherche des informations sur le menu
375
    $requete =  'SELECT * '.
376
                'FROM gen_menu_contenu '.
377
                'WHERE gmc_ce_menu = '.$id_menu;
378
 
379
    $resultat = $db->query($requete);
380
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
381
 
382
    if ($resultat->numRows() != 1) {
383
        return false;
384
    }
385
 
386
    //----------------------------------------------------------------------------
387
    // Récupération des infos
388
    $info_menu = $resultat->fetchRow($mode);
389
    $resultat->free();
390
 
391
    return $info_menu;
392
}
393
 
211 jpm 394
/** Fonction GEN_retournerMenus() - Renvoie un tableau contenant les id de l'ensemble des menus
395
*
396
* Retourne un tableau contenant les id de l'ensemble des menus des différents sites de Papyrus.
397
*
398
* @param  mixed     une instance de la classse Pear DB.
399
* @return array    tableau contenant les id de chaque menu.
400
*/
401
function GEN_retournerMenus($db)
402
{
403
    //----------------------------------------------------------------------------
404
    // Gestion des erreurs
405
 
406
    //----------------------------------------------------------------------------
407
    // Recherche des informations sur le menu
408
    $requete =  'SELECT gm_id_menu '.
409
                'FROM gen_menu ';
410
 
411
    $resultat = $db->query($requete);
412
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
413
 
414
    //----------------------------------------------------------------------------
415
    // Récupération des infos
416
    $tab_retour = array();
417
    while ($info_menu = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
418
        array_push($tab_retour, $info_menu->gm_id_menu);
419
    }
420
    $resultat->free();
421
 
422
    return $tab_retour;
423
}
424
 
4 jpm 425
/** Fonction GEN_lireInfoMenuRelation() - Renvoie un objet ou un tableau contenant une ligne de la table gen_menu_relation
426
*
124 jpm 427
* Par défaut recherche une relation de type père.
4 jpm 428
* Ancien nom : getMenuRelation().
429
*
430
* @param  mixed   Une instance de la classse PEAR_DB
431
* @param  int  l'identifiant d'un menu.
432
* @param  int  l'identifiant d'une valeur de relation.
433
* @param  string  le mode dans Pear DB dans lequel on veut recevoir les infos du menu.
330 jpm 434
* @return  mixed  un objet ou tableau résultat Pear DB, ou false en cas d'erreur.
4 jpm 435
*/
193 jpm 436
function GEN_lireInfoMenuRelation($db, $menuid, $id_valeur = 1, $mode = DB_FETCHMODE_OBJECT)
4 jpm 437
{
438
    //----------------------------------------------------------------------------
439
    // Recherche des informations sur la relation de menu
440
    $requete =  'SELECT * '.
441
                'FROM gen_menu_relation '.
442
                'WHERE gmr_id_menu_01 = '.$menuid.' '.
443
                'AND gmr_id_valeur = '.$id_valeur;
444
 
445
    $result = $db->query($requete);
446
    (DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';
447
 
448
    if ($result->numRows() != 1) {
449
        return false;
450
    }
451
 
452
    //----------------------------------------------------------------------------
453
    // Récupération des infos
454
    $info_menu_relation = $result->fetchRow($mode);
455
    $result->free();
456
 
457
    return $info_menu_relation;
458
}
459
 
124 jpm 460
/** Fonction GEN_verifierPresenceCodeMenu() - Vérifie l'existence d'un code de menu
461
*
462
* Permet de vérifier dans la base de données si le code fournie (alphanumérique ou numérique) a déjà
463
* été attribué à un menu ou pas!
464
*
465
* @param  mixed   Une instance de la classse PEAR_DB
466
* @param  string  le type du code (int ou string).
149 jpm 467
* @param  integer l'identifiant du menu courant.
124 jpm 468
* @param  mixed   le code numérique ou alphanumérique.
469
* @return mixed   retourne l'identifiant du menu possédant le code sinon false.
470
*/
149 jpm 471
function GEN_verifierPresenceCodeMenu($db, $type, $id_menu, $code)
124 jpm 472
{
149 jpm 473
    // Gestion des erreurs
474
    if ($code == '') {
475
        return true;
476
    }
477
 
124 jpm 478
    // Requete pour vérifier l'abscence du code numérique et alphanumérique de la table gen_menu
479
    $requete =  'SELECT gm_id_menu '.
149 jpm 480
                'FROM gen_menu '.
481
                'WHERE gm_id_menu <> '.$id_menu.' ';
482
 
124 jpm 483
    // Complément de requête en fonction du type de code
484
    if ($type == 'int') {
149 jpm 485
        $requete .= 'AND gm_code_num = '.$code;
124 jpm 486
    } else {
149 jpm 487
        $requete .= 'AND gm_code_alpha = "'.$code.'"';
124 jpm 488
    }
149 jpm 489
    $resultat = $db->query($requete);
490
    if (DB::isError($resultat)) {
491
            die( BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete) );
124 jpm 492
    }
149 jpm 493
    $nombre_reponse = $resultat->numRows();
494
    if ($nombre_reponse >= 1) {
495
        return true;
124 jpm 496
    } else {
497
        return false;
498
    }
499
}
330 jpm 500
/** Fonction GEN_lireInfoMenuMotsCles() - Renvoie un objet ou un tableau contenant des lignes de la table gen_menu
501
*
502
* Renvoie un objet ou un tableau contenant une ligne de la table gen_menu en fonction des mots clés présents dans
503
* la table gen_menu.
504
*
505
* @param  mixed   Une instance de la classse PEAR_DB
506
* @param  array  un tableau de mots clés.
507
* @param  string  le mode dans Pear DB dans lequel on veut recevoir les infos du menu.
508
* @param  boolean  true pour grouper les résultats (voir Pear DB : getAssoc() ) sinon false.
509
* @return  mixed   un objet ou tableau résultat Pear DB, ou false en cas d'erreur.
510
*/
511
function GEN_lireInfoMenuMotsCles($db, $tab_mots, $mode = DB_FETCHMODE_OBJECT, $groupe = false)
512
{
513
    //----------------------------------------------------------------------------
514
    // Recherche des informations sur les menus en fonctions des mots clés
515
    $requete =  'SELECT DISTINCT * '.
516
                'FROM gen_menu '.
517
                'WHERE ';
518
    for ($i = 0; $i < count($tab_mots); $i++) {
519
        if ($i == 0) {
520
            $requete .= 'gm_mots_cles LIKE "%'.$tab_mots[$i].'%" ';
521
        } else {
522
            $requete .= 'OR gm_mots_cles LIKE "%'.$tab_mots[$i].'%" ';
523
        }
524
    }
525
    $aso_info =& $db->getAssoc($requete, false, array(), $mode, $groupe);
526
    (PEAR::isError($aso_info)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $aso_info->getMessage(), $requete)) : '';
527
 
528
    return $aso_info;
529
}
530
/** Fonction GEN_lireInfoMenuCategorie() - Renvoie un objet ou un tableau contenant des lignes de la table gen_menu
531
*
532
* Renvoie un objet ou un tableau contenant une ligne de la table gen_menu en fonction des catégories présentes dans
533
* la table gen_menu.
534
*
535
* @param  mixed   Une instance de la classse PEAR_DB
536
* @param  array  un tableau de catégorie(s).
537
* @param  string  le mode dans Pear DB dans lequel on veut recevoir les infos du menu.
538
* @param  boolean  true pour grouper les résultats (voir Pear DB : getAssoc() ) sinon false.
539
* @return  mixed   un objet ou tableau résultat Pear DB, ou false en cas d'erreur.
540
*/
541
function GEN_lireInfoMenuCategorie($db, $tab_categories, $mode = DB_FETCHMODE_OBJECT, $groupe = false)
542
{
543
    //----------------------------------------------------------------------------
544
    // Recherche des informations sur les menus en fonctions des mots clés
545
    $requete =  'SELECT DISTINCT * '.
546
                'FROM gen_menu '.
547
                'WHERE ';
548
    for ($i = 0; $i < count($tab_categories); $i++) {
549
        if ($i == 0) {
550
            $requete .= 'gm_categorie LIKE "%'.$tab_categories[$i].'%" ';
551
        } else {
552
            $requete .= 'OR gm_categorie LIKE "%'.$tab_categories[$i].'%" ';
553
        }
554
    }
555
    $aso_info =& $db->getAssoc($requete, false, array(), $mode, $groupe);
556
    (PEAR::isError($aso_info)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $aso_info->getMessage(), $requete)) : '';
557
 
558
    return $aso_info;
559
}
560
/** Fonction GEN_lireInfoMenuContenuDate() - Renvoie un objet ou un tableau contenant des lignes de la table gen_menu
561
*
562
* Renvoie un objet ou un tableau contenant une ligne de la table gen_menu en fonction des catégories présentes dans
563
* la table gen_menu.
564
*
565
* @param  mixed   Une instance de la classse PEAR_DB
566
* @param  array  le nombre maximum de nouvelle page à retourner.
567
* @param  string  le mode dans Pear DB dans lequel on veut recevoir les infos du menu.
568
* @param  boolean  true pour grouper les résultats (voir Pear DB : getAssoc() ) sinon false.
569
* @return  mixed   un objet ou tableau résultat Pear DB, ou false en cas d'erreur.
570
*/
571
function GEN_lireInfoMenuContenuDate($db, $type_modif = '1, 2', $mode = DB_FETCHMODE_OBJECT, $groupe = false)
572
{
573
    //----------------------------------------------------------------------------
574
    // Recherche des informations sur les menus en fonctions des mots clés
575
    $requete =  'SELECT DISTINCT gen_menu.*, gmc_date_modification, gmc_resume_modification, gmc_ce_type_modification '.
576
                'FROM gen_menu, gen_menu_contenu '.
577
                'WHERE gmc_date_modification <= "'.date('Y-m-d h:i:s', time()).'" '.
578
                'AND gm_id_menu = gmc_ce_menu '.
579
                'AND gmc_bool_dernier = 1 '.
580
                'AND gmc_ce_type_modification IN ('.$type_modif.') '.
581
                'ORDER BY gmc_date_modification DESC';
582
    $aso_info =& $db->getAssoc($requete, false, array(), $mode, $groupe);
583
    (PEAR::isError($aso_info)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $aso_info->getMessage(), $requete)) : '';
584
 
585
    return $aso_info;
586
}
4 jpm 587
/* +--Fin du code ---------------------------------------------------------------------------------------+
588
* $Log: not supported by cvs2svn $
334 jpm 589
* Revision 1.14  2005/04/12 16:13:50  jpm
590
* Ajout de fonction renvoyant des infos sur un menu en fonction des mots clés, catégories ou date de modification du contenu.
591
*
330 jpm 592
* Revision 1.13  2005/03/30 08:53:59  jpm
593
* Ajout de fonctions permettant de récupérer les codes alphanumériques ou numériques en fonction de l'un ou de l'autre.
594
*
322 jpm 595
* Revision 1.12  2005/02/28 11:12:03  jpm
596
* Modification des auteurs.
597
*
285 jpm 598
* Revision 1.11  2004/12/06 19:49:35  jpm
599
* Ajout d'une fonction permettant de récupérer le contenu d'un menu.
600
*
216 jpm 601
* Revision 1.10  2004/12/06 17:53:55  jpm
602
* Ajout fonction GEN_retournerMenus().
603
*
211 jpm 604
* Revision 1.9  2004/11/29 18:34:42  jpm
605
* Correction bogue.
606
*
193 jpm 607
* Revision 1.8  2004/11/10 17:25:51  jpm
608
* Modification de fonction suite à des bogues.
609
*
149 jpm 610
* Revision 1.7  2004/11/09 17:55:26  jpm
611
* Suppresion de fonctions inutiles et mise en conformité.
612
*
146 jpm 613
* Revision 1.6  2004/11/08 17:39:32  jpm
614
* Suppression d'une fonction inutile.
615
* GEN_etreFils() n'est pas utile. On peut utiliser GEN_etreAncetre() à la place.
616
*
129 jpm 617
* Revision 1.5  2004/11/04 12:51:45  jpm
618
* Suppression de message de débogage.
619
*
127 jpm 620
* Revision 1.4  2004/11/04 12:23:50  jpm
621
* Nouvelles fonctions sur les menus frères.
622
*
124 jpm 623
* Revision 1.3  2004/10/25 14:16:21  jpm
624
* Suppression de code commenté.
625
*
103 jpm 626
* Revision 1.2  2004/10/21 18:15:21  jpm
627
* Ajout de gestion d'erreur aux fonctions.
628
*
84 jpm 629
* Revision 1.1  2004/06/15 15:11:37  jpm
630
* Changement de nom et d'arborescence de Genesia en Papyrus.
631
*
4 jpm 632
* Revision 1.43  2004/05/05 06:13:27  jpm
633
* Extraction de la fonction générant le "vous êtes ici", transformée en applette.
634
*
635
* Revision 1.42  2004/05/04 16:24:06  jpm
636
* Amélioration de la fonction générant le "vous êtes ici".
637
*
638
* Revision 1.41  2004/05/04 16:17:31  jpm
639
* Ajout de la fonction générant le "vous êtes ici".
640
*
641
* Revision 1.40  2004/05/03 11:18:17  jpm
642
* Normalisation de deux fonctions issues du fichier fontctions.php.
643
*
644
* Revision 1.39  2004/05/01 16:17:11  jpm
645
* Suppression des fonctions liées à la création des listes de menu. Elles ont été transformées en applette.
646
*
647
* Revision 1.38  2004/05/01 11:43:16  jpm
648
* Suppression des fonction GEN_afficherMenuCommun() et GEN_afficherSelecteurSites() transformées en applette.
649
*
650
* Revision 1.37  2004/04/30 16:18:41  jpm
651
* Correction d'un bogue dans les fonctions de gestion des scripts.
652
*
653
* Revision 1.36  2004/04/28 12:04:40  jpm
654
* Changement du modèle de la base de données.
655
*
656
* Revision 1.35  2004/04/09 16:23:41  jpm
657
* Prise en compte des tables i18n.
658
*
659
* Revision 1.34  2004/04/02 16:34:44  jpm
660
* Extraction de variable globale des fonction, remplacé par un passage en paramètre.
661
*
662
* Revision 1.33  2004/04/01 11:24:51  jpm
663
* Ajout et modification de commentaires pour PhpDocumentor.
664
*
665
* Revision 1.32  2004/03/31 16:52:30  jpm
666
* Modification du code vis à vis du modèle revision 1.9 de Génésia.
667
*
668
* Revision 1.31  2004/03/29 17:13:05  jpm
669
* Suppression de fonction, passer en code classique.
670
*
671
* Revision 1.30  2004/03/27 11:11:58  jpm
672
* Début changement nom de variable dans fonction creerInfoPageEtApplication().
673
*
674
* Revision 1.29  2004/03/26 12:52:25  jpm
675
* Ajout des fonctions creerInfoPageEtApplication() et donnerIdPremiereApplicationLiee().
676
*
677
* +-- Fin du code ----------------------------------------------------------------------------------------+
678
*/
679
?>