3 /***************************************************************************\
4 * SPIP, Systeme de publication pour l'internet *
6 * Copyright (c) 2001-2014 *
7 * Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James *
9 * Ce programme est un logiciel libre distribue sous licence GNU/GPL. *
10 * Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne. *
11 \***************************************************************************/
13 if (!defined('_ECRIRE_INC_VERSION')) return;
15 // Les parametres generaux du site sont dans une table SQL;
16 // Recopie dans le tableau PHP global meta, car on en a souvent besoin
18 // duree maximale du cache. Le double pour l'antidater
19 define('_META_CACHE_TIME', 1<<24);
21 // http://doc.spip.org/@inc_meta_dist
22 function inc_meta_dist($table='meta')
24 // Lire les meta, en cache si present, valide et lisible
25 // en cas d'install ne pas faire confiance au meta_cache eventuel
26 $cache = cache_meta($table);
28 if ((_request('exec')!=='install' OR !test_espace_prive())
29 AND $new = jeune_fichier($cache, _META_CACHE_TIME
)
30 AND lire_fichier_securise($cache, $meta)
31 AND $meta = @unserialize
($meta))
32 $GLOBALS[$table] = $meta;
34 if (isset($GLOBALS[$table]['touch'])
35 AND ($GLOBALS[$table]['touch']<time()-_META_CACHE_TIME
))
36 $GLOBALS[$table] = array();
38 if (!$GLOBALS[$table]) $new = !lire_metas($table);
40 // renouveller l'alea general si trop vieux ou sur demande explicite
41 if ((test_espace_prive() ||
isset($_GET['renouvelle_alea']))
43 AND (time() > _RENOUVELLE_ALEA +
$GLOBALS['meta']['alea_ephemere_date'])) {
44 // si on n'a pas l'acces en ecriture sur le cache,
45 // ne pas renouveller l'alea sinon le cache devient faux
46 if (supprimer_fichier($cache)) {
47 include_spip('inc/acces');
50 } else spip_log("impossible d'ecrire dans " . $cache);
52 // et refaire le cache si on a du lire en base
53 if (!$new) touch_meta(false, $table);
56 // fonctions aussi appelees a l'install ==> spip_query en premiere requete
57 // pour eviter l'erreur fatale (serveur non encore configure)
59 // http://doc.spip.org/@lire_metas
60 function lire_metas($table='meta') {
62 if ($result = spip_query("SELECT nom,valeur FROM spip_$table")) {
63 include_spip('base/abstract_sql');
64 $GLOBALS[$table] = array();
65 while ($row = sql_fetch($result))
66 $GLOBALS[$table][$row['nom']] = $row['valeur'];
69 if (!$GLOBALS[$table]['charset']
70 OR $GLOBALS[$table]['charset']=='_DEFAULT_CHARSET' // hum, correction d'un bug ayant abime quelques install
72 ecrire_meta('charset', _DEFAULT_CHARSET
, NULL, $table);
74 // noter cette table de configuration dans les meta de SPIP
75 if ($table!=='meta') {
76 $liste = unserialize($GLOBALS['meta']['tables_config']);
79 if (!in_array($table, $liste)) {
81 ecrire_meta('tables_config', serialize($liste));
85 return $GLOBALS[$table];
88 // Mettre en cache la liste des meta, sauf les valeurs sensibles
89 // pour qu'elles ne soient pas visibiles dans un fichier.souvent en 777
90 // http://doc.spip.org/@touch_meta
91 function touch_meta($antidate= false, $table='meta'){
92 $file = cache_meta($table);
93 if (!$antidate OR !@touch
($file, $antidate)) {
94 $r = $GLOBALS[$table];
95 unset($r['alea_ephemere']);
96 unset($r['alea_ephemere_ancien']);
97 // le secret du site est utilise pour encoder les contextes ajax que l'on considere fiables
98 // mais le sortir deu cache meta implique une requete sql des qu'on a un form dynamique
99 // meme si son squelette est en cache
100 //unset($r['secret_du_site']);
101 if ($antidate) $r['touch']= $antidate;
102 ecrire_fichier_securise($file, serialize($r));
106 // http://doc.spip.org/@effacer_meta
107 function effacer_meta($nom, $table='meta') {
108 // section critique sur le cache:
109 // l'invalider avant et apres la MAJ de la BD
110 // c'est un peu moins bien qu'un vrai verrou mais ca suffira
111 // et utiliser une statique pour eviter des acces disques a repetition
112 static $touch = array();
113 $antidate = time() - (_META_CACHE_TIME
<<4);
114 if (!isset($touch[$table])) {touch_meta($antidate, $table);}
115 sql_delete('spip_' . $table, "nom='$nom'");
116 unset($GLOBALS[$table][$nom]);
117 if (!isset($touch[$table])) {touch_meta($antidate, $table); $touch[$table] = false;}
120 // http://doc.spip.org/@ecrire_meta
121 function ecrire_meta($nom, $valeur, $importable = NULL, $table='meta') {
123 static $touch = array();
125 include_spip('base/abstract_sql');
126 $res = sql_select("*",'spip_' . $table,"nom=" . sql_quote($nom),'','','','','','continue');
127 // table pas encore installee, travailler en php seulement
129 $GLOBALS[$table][$nom] = $valeur;
132 $row = sql_fetch($res);
135 // ne pas invalider le cache si affectation a l'identique
136 // (tant pis si impt aurait du changer)
137 if ($row AND $valeur == $row['valeur'] AND $GLOBALS[$table][$nom] == $valeur) return;
139 $GLOBALS[$table][$nom] = $valeur;
140 // cf effacer pour comprendre le double touch
141 $antidate = time() - (_META_CACHE_TIME
<<1);
142 if (!isset($touch[$table])) {touch_meta($antidate, $table);}
143 $r = array('nom' => $nom, 'valeur' => $valeur);
144 // Gaffe aux tables sans impt (vieilles versions de SPIP notamment)
145 if ($importable AND isset($row['impt'])) $r['impt'] = $importable;
147 sql_updateq('spip_' . $table, $r,"nom=" . sql_quote($nom));
149 sql_insertq('spip_' . $table, $r);
151 if (!isset($touch[$table])) {touch_meta($antidate, $table); $touch[$table] = false;}
154 function cache_meta($table='meta')
156 return ($table=='meta') ? _FILE_META
: (_DIR_CACHE
. $table . '.php');
160 * Une fonction pour installer une table de configuration supplementaire
161 * @param string $table
163 function installer_table_meta($table) {
164 $trouver_table = charger_fonction('trouver_table','base');
165 if (!$trouver_table("spip_$table")) {
166 include_spip('base/auxiliaires');
167 include_spip('base/create');
168 creer_ou_upgrader_table("spip_$table", $GLOBALS['tables_auxiliaires']['spip_meta'], false, false);
175 * Une fonction pour supprimer une table de configuration supplementaire
176 * si $force=true, on ne verifie pas qu'elle est bien vide
178 * @param string $table
181 function supprimer_table_meta($table, $force=false) {
182 if ($table=='meta') return; // interdit !
184 if ($force OR !sql_countsel("spip_$table")) {
185 unset($GLOBALS[$table]);
186 sql_drop_table("spip_$table");
187 // vider le cache des tables
188 $trouver_table = charger_fonction('trouver_table','base');