Subversion Repositories Applications.papyrus

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
5 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
// +------------------------------------------------------------------------------------------------------+
1316 neiluj 22
// CVS : $Id: pap_cache.inc.php,v 1.4 2007-04-13 09:41:09 neiluj Exp $
5 jpm 23
/**
24
* Gestion de la suppression et de la recherche dans le cache.
25
*
26
* Ce fichier n'est utilisé que si le site utilise la gestion du cache proposée
27
* par Papyrus.
28
* Il commence par supprimer les pages en cache trop anciennes et recherche en suite
29
* la présence de la page demandée dans le cache. Si elle est trouvée la page est renvoyée
30
* directement et le programme s'arrête ici. Si elle n'est pas trouvée, le programme de rendu
31
* la reconstruit et le programme d'envoi la sotcke dans le cache.
32
*
33
*@package Papyrus
34
//Auteur original :
286 jpm 35
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
36
//Autres auteurs :
5 jpm 37
*@author        Laurent COUDOUNEAU <lc@gsite.org>
38
*@copyright     Tela-Botanica 2000-2004
1316 neiluj 39
*@version       $Revision: 1.4 $ $Date: 2007-04-13 09:41:09 $
5 jpm 40
// +------------------------------------------------------------------------------------------------------+
41
*/
42
 
43
// +------------------------------------------------------------------------------------------------------+
44
// |                                            ENTÊTE du PROGRAMME                                       |
45
// +------------------------------------------------------------------------------------------------------+
46
 
47
/** <BR> Inclusion de la bibliothèque de fonctions de gestion du cache.*/
832 florian 48
include_once './bibliotheque/fonctions/pap_cache.fonct.php';
5 jpm 49
 
50
/** <BR> Inclusion de la bibliothèque de fonctions de compression des données à envoyer.*/
832 florian 51
include_once './bibliotheque/fonctions/pap_compression.fonct.php';
5 jpm 52
 
53
// +------------------------------------------------------------------------------------------------------+
54
// |                                            CORPS du PROGRAMME                                        |
55
// +------------------------------------------------------------------------------------------------------+
56
 
57
// +------------------------------------------------------------------------------------------------------+
58
// Gestion de la recherche dans le cache de la page demandée.
59
 
60
/*
61
// Utilisons nous le cache ?
62
if (! $GS_ARGUMENTS['cachectrl']) {
63
    //header ("Cache-Control: no-cache, must-revalidate"); // HTTP/1.1
64
    //header ("Pragma: no-cache");                         // HTTP/1.0
65
}
66
*/
67
 
68
// Nous supprimons les pages en cache dont le délai de mise en cache est dépassé.
69
$duree_cache = $_GEN_commun['application_info']->cache_duree * 3600;
70
if ($duree_cache > 0) {
71
    $requete =  'DELETE FROM gen_page_cache '.
72
                'WHERE gpc_ce_site = '.$_GEN_commun['site_info']->gsi_id_site.' '.
73
                'AND gpc_ce_i18n = "'.$_GEN_commun['site_info']->gsi_id_i18n.'" '.
74
                'AND gpc_date_heure + '.$duree_cache.' < NOW()';
75
 
76
    $resultat = $db->query($requete);
77
    (DB::isError($resultat))
78
        ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete))
79
        : '';
80
}
81
 
82
// Vérification de la présence de la page demandée dans le cache.
83
$requete =  'SELECT * '.
84
            'FROM gen_page_cache '.
85
            'WHERE gpc_ce_site = '.$_GEN_commun['site_info']->gsi_id_site.' '.
86
            'AND gpc_ce_i18n = "'.$_GEN_commun['site_info']->gsi_id_i18n.'" '.
87
            'AND gpc_id_md5_url = "'.GEN_donnerMD5UriPostSession().'"';
88
 
89
$resultat = $db->query($requete);
90
(DB::isError($resultat))
91
    ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete))
92
    : '';
93
 
94
$ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT) ;
95
$resultat->free();
96
 
97
// Nous avons trouvé la page. Nous essayons de la renvoyer.
98
if ($ligne == true) {
99
    if ( GEN_envoyerDonneesCompressees($ligne->gpc_corps) ) {
100
        // Si l'envoie des données à réussi nous arrétons le script ICI.
101
        exit();
102
    }
103
}
104
 
105
/* +--Fin du code ----------------------------------------------------------------------------------------+
106
*
107
* $Log: not supported by cvs2svn $
1316 neiluj 108
* Revision 1.3  2006/04/28 12:41:49  florian
109
* corrections erreurs chemin
110
*
832 florian 111
* Revision 1.2  2005/02/28 11:20:42  jpm
112
* Modification des auteurs.
113
*
286 jpm 114
* Revision 1.1  2004/06/16 08:11:01  jpm
115
* Changement de nom de Génésia en Papyrus.
116
* Changement de l'arborescence.
117
*
5 jpm 118
* Revision 1.2  2004/04/22 08:29:55  jpm
119
* Transformation de $GS_GLOBAL en $_GEN_commun.
120
*
121
* Revision 1.1  2004/04/09 16:19:15  jpm
122
* Ajout du fichier indépendant du cache avec gestion des tables i18n.
123
*
124
*
125
* +-- Fin du code ----------------------------------------------------------------------------------------+
126
*/
127
?>