spip /
SPIP
@@ -165,7 +165,7 @@ |
||
| 165 | 165 | * @param string $primary |
| 166 | 166 | * @param array $rows |
| 167 | 167 | * @param string $serveur |
| 168 | - * @return array |
|
| 168 | + * @return string[] |
|
| 169 | 169 | */ |
| 170 | 170 | function generer_select_where_explicites($table, $primary, $rows, $serveur) { |
| 171 | 171 | # calculer le {id_article IN()} et le {... as points} |
@@ -17,12 +17,12 @@ discard block |
||
| 17 | 17 | **/ |
| 18 | 18 | |
| 19 | 19 | if (!defined('_ECRIRE_INC_VERSION')) { |
| 20 | - return; |
|
| 20 | + return; |
|
| 21 | 21 | } |
| 22 | 22 | |
| 23 | 23 | include_spip('inc/rechercher'); |
| 24 | 24 | if (!defined('_DELAI_CACHE_resultats')) { |
| 25 | - define('_DELAI_CACHE_resultats', 600); |
|
| 25 | + define('_DELAI_CACHE_resultats', 600); |
|
| 26 | 26 | } |
| 27 | 27 | |
| 28 | 28 | /** |
@@ -49,111 +49,111 @@ discard block |
||
| 49 | 49 | * @return array |
| 50 | 50 | */ |
| 51 | 51 | function inc_prepare_recherche_dist( |
| 52 | - $recherche, |
|
| 53 | - $table = 'articles', |
|
| 54 | - $cond = false, |
|
| 55 | - $serveur = '', |
|
| 56 | - $modificateurs = array(), |
|
| 57 | - $primary = '' |
|
| 52 | + $recherche, |
|
| 53 | + $table = 'articles', |
|
| 54 | + $cond = false, |
|
| 55 | + $serveur = '', |
|
| 56 | + $modificateurs = array(), |
|
| 57 | + $primary = '' |
|
| 58 | 58 | ) { |
| 59 | - static $cache = array(); |
|
| 60 | - $delai_fraicheur = min(_DELAI_CACHE_resultats, |
|
| 61 | - time() - (isset($GLOBALS['meta']['derniere_modif']) ? $GLOBALS['meta']['derniere_modif'] : 0)); |
|
| 62 | - |
|
| 63 | - // si recherche n'est pas dans le contexte, on va prendre en globals |
|
| 64 | - // ca permet de faire des inclure simple. |
|
| 65 | - if (!isset($recherche) and isset($GLOBALS['recherche'])) { |
|
| 66 | - $recherche = $GLOBALS['recherche']; |
|
| 67 | - } |
|
| 68 | - |
|
| 69 | - // traiter le cas {recherche?} |
|
| 70 | - if ($cond and !strlen($recherche)) { |
|
| 71 | - return array( |
|
| 72 | - "0 as points" /* as points */, /* where */ |
|
| 73 | - '' |
|
| 74 | - ); |
|
| 75 | - } |
|
| 76 | - |
|
| 77 | - |
|
| 78 | - $rechercher = false; |
|
| 79 | - |
|
| 80 | - $where_resultat_recent = sql_date_proche('maj', (0 - ($delai_fraicheur + 100)), " SECOND"); |
|
| 81 | - if (!isset($cache[$serveur][$table][$recherche])) { |
|
| 82 | - $hash_serv = ($serveur ? substr(md5($serveur), 0, 16) : ''); |
|
| 83 | - $hash = substr(md5($recherche . $table), 0, 16); |
|
| 84 | - $where = "(resultats.recherche='$hash' AND resultats.table_objet=" . sql_quote($table) . " AND resultats.serveur='$hash_serv')"; |
|
| 85 | - $row = sql_fetsel('recherche', 'spip_resultats AS resultats', |
|
| 86 | - $where . " AND $where_resultat_recent", '', '', '0,1'); |
|
| 87 | - if (!$row |
|
| 88 | - or (defined('_VAR_MODE') and _VAR_MODE == 'recalcul') |
|
| 89 | - ) { |
|
| 90 | - $rechercher = true; |
|
| 91 | - } |
|
| 92 | - } |
|
| 93 | - |
|
| 94 | - // si on n'a pas encore traite les donnees dans une boucle precedente |
|
| 95 | - if ($rechercher) { |
|
| 96 | - //$tables = liste_des_champs(); |
|
| 97 | - $x = objet_type($table); |
|
| 98 | - $points = recherche_en_base($recherche, |
|
| 99 | - $x, |
|
| 100 | - array( |
|
| 101 | - 'score' => true, |
|
| 102 | - 'toutvoir' => true, |
|
| 103 | - 'jointures' => true |
|
| 104 | - ), |
|
| 105 | - $serveur); |
|
| 106 | - // pas de résultat, pas de point |
|
| 107 | - $points = isset($points[$x]) ? $points[$x] : array(); |
|
| 108 | - |
|
| 109 | - // permettre aux plugins de modifier le resultat |
|
| 110 | - $points = pipeline('prepare_recherche', array( |
|
| 111 | - 'args' => array( |
|
| 112 | - 'type' => $x, |
|
| 113 | - 'recherche' => $recherche, |
|
| 114 | - 'serveur' => $serveur, |
|
| 115 | - 'modificateurs' => $modificateurs |
|
| 116 | - ), |
|
| 117 | - 'data' => $points |
|
| 118 | - )); |
|
| 119 | - |
|
| 120 | - // supprimer les anciens resultats de cette recherche |
|
| 121 | - // et les resultats trop vieux avec une marge |
|
| 122 | - // pas de AS resultats dans un delete (mysql) |
|
| 123 | - $whered = str_replace(array("resultats.recherche", "resultats.table_objet", "resultats.serveur"), |
|
| 124 | - array("recherche", "table_objet", "serveur"), $where); |
|
| 125 | - |
|
| 126 | - sql_delete('spip_resultats', |
|
| 127 | - "NOT($where_resultat_recent) OR ($whered)"); |
|
| 128 | - |
|
| 129 | - // inserer les resultats dans la table de cache des resultats |
|
| 130 | - if (count($points)) { |
|
| 131 | - $tab_couples = array(); |
|
| 132 | - foreach ($points as $id => $p) { |
|
| 133 | - $tab_couples[] = array( |
|
| 134 | - 'recherche' => $hash, |
|
| 135 | - 'id' => $id, |
|
| 136 | - 'points' => $p['score'], |
|
| 137 | - 'table_objet' => $table, |
|
| 138 | - 'serveur' => $hash_serv, |
|
| 139 | - ); |
|
| 140 | - } |
|
| 141 | - sql_insertq_multi('spip_resultats', $tab_couples, array()); |
|
| 142 | - } |
|
| 143 | - } |
|
| 144 | - |
|
| 145 | - if (!isset($cache[$serveur][$table][$recherche])) { |
|
| 146 | - if (!$serveur) { |
|
| 147 | - $cache[$serveur][$table][$recherche] = array("resultats.points AS points", $where); |
|
| 148 | - } else { |
|
| 149 | - if (sql_countsel('spip_resultats as resultats', $where)) { |
|
| 150 | - $rows = sql_allfetsel('resultats.id,resultats.points', 'spip_resultats as resultats', $where); |
|
| 151 | - } |
|
| 152 | - $cache[$serveur][$table][$recherche] = generer_select_where_explicites($table, $primary, $rows, $serveur); |
|
| 153 | - } |
|
| 154 | - } |
|
| 155 | - |
|
| 156 | - return $cache[$serveur][$table][$recherche]; |
|
| 59 | + static $cache = array(); |
|
| 60 | + $delai_fraicheur = min(_DELAI_CACHE_resultats, |
|
| 61 | + time() - (isset($GLOBALS['meta']['derniere_modif']) ? $GLOBALS['meta']['derniere_modif'] : 0)); |
|
| 62 | + |
|
| 63 | + // si recherche n'est pas dans le contexte, on va prendre en globals |
|
| 64 | + // ca permet de faire des inclure simple. |
|
| 65 | + if (!isset($recherche) and isset($GLOBALS['recherche'])) { |
|
| 66 | + $recherche = $GLOBALS['recherche']; |
|
| 67 | + } |
|
| 68 | + |
|
| 69 | + // traiter le cas {recherche?} |
|
| 70 | + if ($cond and !strlen($recherche)) { |
|
| 71 | + return array( |
|
| 72 | + "0 as points" /* as points */, /* where */ |
|
| 73 | + '' |
|
| 74 | + ); |
|
| 75 | + } |
|
| 76 | + |
|
| 77 | + |
|
| 78 | + $rechercher = false; |
|
| 79 | + |
|
| 80 | + $where_resultat_recent = sql_date_proche('maj', (0 - ($delai_fraicheur + 100)), " SECOND"); |
|
| 81 | + if (!isset($cache[$serveur][$table][$recherche])) { |
|
| 82 | + $hash_serv = ($serveur ? substr(md5($serveur), 0, 16) : ''); |
|
| 83 | + $hash = substr(md5($recherche . $table), 0, 16); |
|
| 84 | + $where = "(resultats.recherche='$hash' AND resultats.table_objet=" . sql_quote($table) . " AND resultats.serveur='$hash_serv')"; |
|
| 85 | + $row = sql_fetsel('recherche', 'spip_resultats AS resultats', |
|
| 86 | + $where . " AND $where_resultat_recent", '', '', '0,1'); |
|
| 87 | + if (!$row |
|
| 88 | + or (defined('_VAR_MODE') and _VAR_MODE == 'recalcul') |
|
| 89 | + ) { |
|
| 90 | + $rechercher = true; |
|
| 91 | + } |
|
| 92 | + } |
|
| 93 | + |
|
| 94 | + // si on n'a pas encore traite les donnees dans une boucle precedente |
|
| 95 | + if ($rechercher) { |
|
| 96 | + //$tables = liste_des_champs(); |
|
| 97 | + $x = objet_type($table); |
|
| 98 | + $points = recherche_en_base($recherche, |
|
| 99 | + $x, |
|
| 100 | + array( |
|
| 101 | + 'score' => true, |
|
| 102 | + 'toutvoir' => true, |
|
| 103 | + 'jointures' => true |
|
| 104 | + ), |
|
| 105 | + $serveur); |
|
| 106 | + // pas de résultat, pas de point |
|
| 107 | + $points = isset($points[$x]) ? $points[$x] : array(); |
|
| 108 | + |
|
| 109 | + // permettre aux plugins de modifier le resultat |
|
| 110 | + $points = pipeline('prepare_recherche', array( |
|
| 111 | + 'args' => array( |
|
| 112 | + 'type' => $x, |
|
| 113 | + 'recherche' => $recherche, |
|
| 114 | + 'serveur' => $serveur, |
|
| 115 | + 'modificateurs' => $modificateurs |
|
| 116 | + ), |
|
| 117 | + 'data' => $points |
|
| 118 | + )); |
|
| 119 | + |
|
| 120 | + // supprimer les anciens resultats de cette recherche |
|
| 121 | + // et les resultats trop vieux avec une marge |
|
| 122 | + // pas de AS resultats dans un delete (mysql) |
|
| 123 | + $whered = str_replace(array("resultats.recherche", "resultats.table_objet", "resultats.serveur"), |
|
| 124 | + array("recherche", "table_objet", "serveur"), $where); |
|
| 125 | + |
|
| 126 | + sql_delete('spip_resultats', |
|
| 127 | + "NOT($where_resultat_recent) OR ($whered)"); |
|
| 128 | + |
|
| 129 | + // inserer les resultats dans la table de cache des resultats |
|
| 130 | + if (count($points)) { |
|
| 131 | + $tab_couples = array(); |
|
| 132 | + foreach ($points as $id => $p) { |
|
| 133 | + $tab_couples[] = array( |
|
| 134 | + 'recherche' => $hash, |
|
| 135 | + 'id' => $id, |
|
| 136 | + 'points' => $p['score'], |
|
| 137 | + 'table_objet' => $table, |
|
| 138 | + 'serveur' => $hash_serv, |
|
| 139 | + ); |
|
| 140 | + } |
|
| 141 | + sql_insertq_multi('spip_resultats', $tab_couples, array()); |
|
| 142 | + } |
|
| 143 | + } |
|
| 144 | + |
|
| 145 | + if (!isset($cache[$serveur][$table][$recherche])) { |
|
| 146 | + if (!$serveur) { |
|
| 147 | + $cache[$serveur][$table][$recherche] = array("resultats.points AS points", $where); |
|
| 148 | + } else { |
|
| 149 | + if (sql_countsel('spip_resultats as resultats', $where)) { |
|
| 150 | + $rows = sql_allfetsel('resultats.id,resultats.points', 'spip_resultats as resultats', $where); |
|
| 151 | + } |
|
| 152 | + $cache[$serveur][$table][$recherche] = generer_select_where_explicites($table, $primary, $rows, $serveur); |
|
| 153 | + } |
|
| 154 | + } |
|
| 155 | + |
|
| 156 | + return $cache[$serveur][$table][$recherche]; |
|
| 157 | 157 | } |
| 158 | 158 | |
| 159 | 159 | |
@@ -169,22 +169,22 @@ discard block |
||
| 169 | 169 | * @return array |
| 170 | 170 | */ |
| 171 | 171 | function generer_select_where_explicites($table, $primary, $rows, $serveur) { |
| 172 | - # calculer le {id_article IN()} et le {... as points} |
|
| 173 | - if (!count($rows)) { |
|
| 174 | - return array("''", "0=1"); |
|
| 175 | - } else { |
|
| 176 | - $listes_ids = array(); |
|
| 177 | - $select = '0'; |
|
| 178 | - foreach ($rows as $r) { |
|
| 179 | - $listes_ids[$r['points']][] = $r['id']; |
|
| 180 | - } |
|
| 181 | - |
|
| 182 | - foreach ($listes_ids as $p => $ids) { |
|
| 183 | - $select .= "+$p*(" . |
|
| 184 | - sql_in("$table.$primary", $ids, '', $serveur) |
|
| 185 | - . ") "; |
|
| 186 | - } |
|
| 187 | - |
|
| 188 | - return array("$select AS points ", sql_in("$table.$primary", array_map('reset', $rows), '', $serveur)); |
|
| 189 | - } |
|
| 172 | + # calculer le {id_article IN()} et le {... as points} |
|
| 173 | + if (!count($rows)) { |
|
| 174 | + return array("''", "0=1"); |
|
| 175 | + } else { |
|
| 176 | + $listes_ids = array(); |
|
| 177 | + $select = '0'; |
|
| 178 | + foreach ($rows as $r) { |
|
| 179 | + $listes_ids[$r['points']][] = $r['id']; |
|
| 180 | + } |
|
| 181 | + |
|
| 182 | + foreach ($listes_ids as $p => $ids) { |
|
| 183 | + $select .= "+$p*(" . |
|
| 184 | + sql_in("$table.$primary", $ids, '', $serveur) |
|
| 185 | + . ") "; |
|
| 186 | + } |
|
| 187 | + |
|
| 188 | + return array("$select AS points ", sql_in("$table.$primary", array_map('reset', $rows), '', $serveur)); |
|
| 189 | + } |
|
| 190 | 190 | } |
@@ -80,10 +80,10 @@ discard block |
||
| 80 | 80 | $where_resultat_recent = sql_date_proche('maj', (0 - ($delai_fraicheur + 100)), " SECOND"); |
| 81 | 81 | if (!isset($cache[$serveur][$table][$recherche])) { |
| 82 | 82 | $hash_serv = ($serveur ? substr(md5($serveur), 0, 16) : ''); |
| 83 | - $hash = substr(md5($recherche . $table), 0, 16); |
|
| 84 | - $where = "(resultats.recherche='$hash' AND resultats.table_objet=" . sql_quote($table) . " AND resultats.serveur='$hash_serv')"; |
|
| 83 | + $hash = substr(md5($recherche.$table), 0, 16); |
|
| 84 | + $where = "(resultats.recherche='$hash' AND resultats.table_objet=".sql_quote($table)." AND resultats.serveur='$hash_serv')"; |
|
| 85 | 85 | $row = sql_fetsel('recherche', 'spip_resultats AS resultats', |
| 86 | - $where . " AND $where_resultat_recent", '', '', '0,1'); |
|
| 86 | + $where." AND $where_resultat_recent", '', '', '0,1'); |
|
| 87 | 87 | if (!$row |
| 88 | 88 | or (defined('_VAR_MODE') and _VAR_MODE == 'recalcul') |
| 89 | 89 | ) { |
@@ -180,7 +180,7 @@ discard block |
||
| 180 | 180 | } |
| 181 | 181 | |
| 182 | 182 | foreach ($listes_ids as $p => $ids) { |
| 183 | - $select .= "+$p*(" . |
|
| 183 | + $select .= "+$p*(". |
|
| 184 | 184 | sql_in("$table.$primary", $ids, '', $serveur) |
| 185 | 185 | . ") "; |
| 186 | 186 | } |
@@ -31,7 +31,7 @@ discard block |
||
| 31 | 31 | /** |
| 32 | 32 | * Raccourcis dépendant du sens de la langue |
| 33 | 33 | * |
| 34 | - * @return array Tablea ('','') |
|
| 34 | + * @return string[] Tablea ('','') |
|
| 35 | 35 | */ |
| 36 | 36 | function definir_raccourcis_alineas() { |
| 37 | 37 | return array('', ''); |
@@ -354,7 +354,7 @@ discard block |
||
| 354 | 354 | * Ne fait rien ici. Voir plugin Textwheel |
| 355 | 355 | * |
| 356 | 356 | * @param string $letexte |
| 357 | - * @param null $forcer |
|
| 357 | + * @param boolean|null $forcer |
|
| 358 | 358 | * @return string |
| 359 | 359 | */ |
| 360 | 360 | function paragrapher($letexte, $forcer = true) { |
@@ -17,7 +17,7 @@ discard block |
||
| 17 | 17 | **/ |
| 18 | 18 | |
| 19 | 19 | if (!defined('_ECRIRE_INC_VERSION')) { |
| 20 | - return; |
|
| 20 | + return; |
|
| 21 | 21 | } |
| 22 | 22 | |
| 23 | 23 | include_spip('inc/texte_mini'); |
@@ -34,7 +34,7 @@ discard block |
||
| 34 | 34 | * @return array Tablea ('','') |
| 35 | 35 | */ |
| 36 | 36 | function definir_raccourcis_alineas() { |
| 37 | - return array('', ''); |
|
| 37 | + return array('', ''); |
|
| 38 | 38 | } |
| 39 | 39 | |
| 40 | 40 | |
@@ -47,7 +47,7 @@ discard block |
||
| 47 | 47 | * @return string |
| 48 | 48 | */ |
| 49 | 49 | function traiter_tableau($bloc) { |
| 50 | - return $bloc; |
|
| 50 | + return $bloc; |
|
| 51 | 51 | } |
| 52 | 52 | |
| 53 | 53 | |
@@ -61,7 +61,7 @@ discard block |
||
| 61 | 61 | * @return string |
| 62 | 62 | */ |
| 63 | 63 | function traiter_listes($texte) { |
| 64 | - return $texte; |
|
| 64 | + return $texte; |
|
| 65 | 65 | } |
| 66 | 66 | |
| 67 | 67 | /** |
@@ -77,16 +77,16 @@ discard block |
||
| 77 | 77 | */ |
| 78 | 78 | function traiter_raccourcis($letexte) { |
| 79 | 79 | |
| 80 | - // Appeler les fonctions de pre_traitement |
|
| 81 | - $letexte = pipeline('pre_propre', $letexte); |
|
| 80 | + // Appeler les fonctions de pre_traitement |
|
| 81 | + $letexte = pipeline('pre_propre', $letexte); |
|
| 82 | 82 | |
| 83 | - // APPELER ICI UN PIPELINE traiter_raccourcis ? |
|
| 84 | - // $letexte = pipeline('traiter_raccourcis', $letexte); |
|
| 83 | + // APPELER ICI UN PIPELINE traiter_raccourcis ? |
|
| 84 | + // $letexte = pipeline('traiter_raccourcis', $letexte); |
|
| 85 | 85 | |
| 86 | - // Appeler les fonctions de post-traitement |
|
| 87 | - $letexte = pipeline('post_propre', $letexte); |
|
| 86 | + // Appeler les fonctions de post-traitement |
|
| 87 | + $letexte = pipeline('post_propre', $letexte); |
|
| 88 | 88 | |
| 89 | - return $letexte; |
|
| 89 | + return $letexte; |
|
| 90 | 90 | } |
| 91 | 91 | |
| 92 | 92 | /************************************************************************************************************************* |
@@ -102,19 +102,19 @@ discard block |
||
| 102 | 102 | * @return string |
| 103 | 103 | */ |
| 104 | 104 | function echappe_js($t, $class = ' class = "echappe-js"') { |
| 105 | - foreach (array('script', 'iframe') as $tag) { |
|
| 106 | - if (stripos($t, "<$tag") !== false |
|
| 107 | - and preg_match_all(',<' . $tag . '.*?($|</' . $tag . '.),isS', $t, $r, PREG_SET_ORDER) |
|
| 108 | - ) { |
|
| 109 | - foreach ($r as $regs) { |
|
| 110 | - $t = str_replace($regs[0], |
|
| 111 | - "<code$class>" . nl2br(spip_htmlspecialchars($regs[0])) . '</code>', |
|
| 112 | - $t); |
|
| 113 | - } |
|
| 114 | - } |
|
| 115 | - } |
|
| 116 | - |
|
| 117 | - return $t; |
|
| 105 | + foreach (array('script', 'iframe') as $tag) { |
|
| 106 | + if (stripos($t, "<$tag") !== false |
|
| 107 | + and preg_match_all(',<' . $tag . '.*?($|</' . $tag . '.),isS', $t, $r, PREG_SET_ORDER) |
|
| 108 | + ) { |
|
| 109 | + foreach ($r as $regs) { |
|
| 110 | + $t = str_replace($regs[0], |
|
| 111 | + "<code$class>" . nl2br(spip_htmlspecialchars($regs[0])) . '</code>', |
|
| 112 | + $t); |
|
| 113 | + } |
|
| 114 | + } |
|
| 115 | + } |
|
| 116 | + |
|
| 117 | + return $t; |
|
| 118 | 118 | } |
| 119 | 119 | |
| 120 | 120 | |
@@ -143,55 +143,55 @@ discard block |
||
| 143 | 143 | * Code protégé |
| 144 | 144 | **/ |
| 145 | 145 | function interdire_scripts($arg, $mode_filtre=null) { |
| 146 | - // on memorise le resultat sur les arguments non triviaux |
|
| 147 | - static $dejavu = array(); |
|
| 148 | - |
|
| 149 | - // Attention, si ce n'est pas une chaine, laisser intact |
|
| 150 | - if (!$arg or !is_string($arg) or !strstr($arg, '<')) { |
|
| 151 | - return $arg; |
|
| 152 | - } |
|
| 153 | - |
|
| 154 | - if (is_null($mode_filtre) or !in_array($mode_filtre, array(-1, 0, 1))) { |
|
| 155 | - $mode_filtre = $GLOBALS['filtrer_javascript']; |
|
| 156 | - } |
|
| 157 | - |
|
| 158 | - if (isset($dejavu[$mode_filtre][$arg])) { |
|
| 159 | - return $dejavu[$mode_filtre][$arg]; |
|
| 160 | - } |
|
| 161 | - |
|
| 162 | - // echapper les tags asp/php |
|
| 163 | - $t = str_replace('<' . '%', '<%', $arg); |
|
| 164 | - |
|
| 165 | - // echapper le php |
|
| 166 | - $t = str_replace('<' . '?', '<?', $t); |
|
| 167 | - |
|
| 168 | - // echapper le < script language=php > |
|
| 169 | - $t = preg_replace(',<(script\b[^>]+\blanguage\b[^\w>]+php\b),UimsS', '<\1', $t); |
|
| 170 | - |
|
| 171 | - // Pour le js, trois modes : parano (-1), prive (0), ok (1) |
|
| 172 | - switch ($mode_filtre) { |
|
| 173 | - case 0: |
|
| 174 | - if (!_DIR_RESTREINT) { |
|
| 175 | - $t = echappe_js($t); |
|
| 176 | - } |
|
| 177 | - break; |
|
| 178 | - case -1: |
|
| 179 | - $t = echappe_js($t); |
|
| 180 | - break; |
|
| 181 | - } |
|
| 182 | - |
|
| 183 | - // pas de <base href /> svp ! |
|
| 184 | - $t = preg_replace(',<(base\b),iS', '<\1', $t); |
|
| 185 | - |
|
| 186 | - // Reinserer les echappements des modeles |
|
| 187 | - if (defined('_PROTEGE_JS_MODELES')) { |
|
| 188 | - $t = echappe_retour($t, "javascript" . _PROTEGE_JS_MODELES); |
|
| 189 | - } |
|
| 190 | - if (defined('_PROTEGE_PHP_MODELES')) { |
|
| 191 | - $t = echappe_retour($t, "php" . _PROTEGE_PHP_MODELES); |
|
| 192 | - } |
|
| 193 | - |
|
| 194 | - return $dejavu[$mode_filtre][$arg] = $t; |
|
| 146 | + // on memorise le resultat sur les arguments non triviaux |
|
| 147 | + static $dejavu = array(); |
|
| 148 | + |
|
| 149 | + // Attention, si ce n'est pas une chaine, laisser intact |
|
| 150 | + if (!$arg or !is_string($arg) or !strstr($arg, '<')) { |
|
| 151 | + return $arg; |
|
| 152 | + } |
|
| 153 | + |
|
| 154 | + if (is_null($mode_filtre) or !in_array($mode_filtre, array(-1, 0, 1))) { |
|
| 155 | + $mode_filtre = $GLOBALS['filtrer_javascript']; |
|
| 156 | + } |
|
| 157 | + |
|
| 158 | + if (isset($dejavu[$mode_filtre][$arg])) { |
|
| 159 | + return $dejavu[$mode_filtre][$arg]; |
|
| 160 | + } |
|
| 161 | + |
|
| 162 | + // echapper les tags asp/php |
|
| 163 | + $t = str_replace('<' . '%', '<%', $arg); |
|
| 164 | + |
|
| 165 | + // echapper le php |
|
| 166 | + $t = str_replace('<' . '?', '<?', $t); |
|
| 167 | + |
|
| 168 | + // echapper le < script language=php > |
|
| 169 | + $t = preg_replace(',<(script\b[^>]+\blanguage\b[^\w>]+php\b),UimsS', '<\1', $t); |
|
| 170 | + |
|
| 171 | + // Pour le js, trois modes : parano (-1), prive (0), ok (1) |
|
| 172 | + switch ($mode_filtre) { |
|
| 173 | + case 0: |
|
| 174 | + if (!_DIR_RESTREINT) { |
|
| 175 | + $t = echappe_js($t); |
|
| 176 | + } |
|
| 177 | + break; |
|
| 178 | + case -1: |
|
| 179 | + $t = echappe_js($t); |
|
| 180 | + break; |
|
| 181 | + } |
|
| 182 | + |
|
| 183 | + // pas de <base href /> svp ! |
|
| 184 | + $t = preg_replace(',<(base\b),iS', '<\1', $t); |
|
| 185 | + |
|
| 186 | + // Reinserer les echappements des modeles |
|
| 187 | + if (defined('_PROTEGE_JS_MODELES')) { |
|
| 188 | + $t = echappe_retour($t, "javascript" . _PROTEGE_JS_MODELES); |
|
| 189 | + } |
|
| 190 | + if (defined('_PROTEGE_PHP_MODELES')) { |
|
| 191 | + $t = echappe_retour($t, "php" . _PROTEGE_PHP_MODELES); |
|
| 192 | + } |
|
| 193 | + |
|
| 194 | + return $dejavu[$mode_filtre][$arg] = $t; |
|
| 195 | 195 | } |
| 196 | 196 | |
| 197 | 197 | |
@@ -220,64 +220,64 @@ discard block |
||
| 220 | 220 | * Texte transformé |
| 221 | 221 | **/ |
| 222 | 222 | function typo($letexte, $echapper = true, $connect = null, $env = array()) { |
| 223 | - // Plus vite ! |
|
| 224 | - if (!$letexte) { |
|
| 225 | - return $letexte; |
|
| 226 | - } |
|
| 227 | - |
|
| 228 | - // les appels directs a cette fonction depuis le php de l'espace |
|
| 229 | - // prive etant historiquement ecrit sans argment $connect |
|
| 230 | - // on utilise la presence de celui-ci pour distinguer les cas |
|
| 231 | - // ou il faut passer interdire_script explicitement |
|
| 232 | - // les appels dans les squelettes (de l'espace prive) fournissant un $connect |
|
| 233 | - // ne seront pas perturbes |
|
| 234 | - $interdire_script = false; |
|
| 235 | - if (is_null($connect)) { |
|
| 236 | - $connect = ''; |
|
| 237 | - $interdire_script = true; |
|
| 238 | - $env['espace_prive'] = test_espace_prive(); |
|
| 239 | - } |
|
| 240 | - |
|
| 241 | - // Echapper les codes <html> etc |
|
| 242 | - if ($echapper) { |
|
| 243 | - $letexte = echappe_html($letexte, 'TYPO'); |
|
| 244 | - } |
|
| 245 | - |
|
| 246 | - // |
|
| 247 | - // Installer les modeles, notamment images et documents ; |
|
| 248 | - // |
|
| 249 | - // NOTE : propre() ne passe pas par ici mais directement par corriger_typo |
|
| 250 | - // cf. inc/lien |
|
| 251 | - |
|
| 252 | - $letexte = traiter_modeles($mem = $letexte, false, $echapper ? 'TYPO' : '', $connect, null, $env); |
|
| 253 | - if ($letexte != $mem) { |
|
| 254 | - $echapper = true; |
|
| 255 | - } |
|
| 256 | - unset($mem); |
|
| 257 | - |
|
| 258 | - $letexte = corriger_typo($letexte); |
|
| 259 | - $letexte = echapper_faux_tags($letexte); |
|
| 260 | - |
|
| 261 | - // reintegrer les echappements |
|
| 262 | - if ($echapper) { |
|
| 263 | - $letexte = echappe_retour($letexte, 'TYPO'); |
|
| 264 | - } |
|
| 265 | - |
|
| 266 | - // Dans les appels directs hors squelette, securiser ici aussi |
|
| 267 | - if ($interdire_script) { |
|
| 268 | - $letexte = interdire_scripts($letexte); |
|
| 269 | - } |
|
| 270 | - |
|
| 271 | - // Dans l'espace prive on se mefie de tout contenu dangereux |
|
| 272 | - // https://core.spip.net/issues/3371 |
|
| 273 | - // et aussi dans l'espace public si la globale filtrer_javascript = -1 |
|
| 274 | - // https://core.spip.net/issues/4166 |
|
| 275 | - if ($GLOBALS['filtrer_javascript'] == -1 |
|
| 276 | - or (isset($env['espace_prive']) and $env['espace_prive'] and $GLOBALS['filtrer_javascript']<=0)) { |
|
| 277 | - $letexte = echapper_html_suspect($letexte); |
|
| 278 | - } |
|
| 279 | - |
|
| 280 | - return $letexte; |
|
| 223 | + // Plus vite ! |
|
| 224 | + if (!$letexte) { |
|
| 225 | + return $letexte; |
|
| 226 | + } |
|
| 227 | + |
|
| 228 | + // les appels directs a cette fonction depuis le php de l'espace |
|
| 229 | + // prive etant historiquement ecrit sans argment $connect |
|
| 230 | + // on utilise la presence de celui-ci pour distinguer les cas |
|
| 231 | + // ou il faut passer interdire_script explicitement |
|
| 232 | + // les appels dans les squelettes (de l'espace prive) fournissant un $connect |
|
| 233 | + // ne seront pas perturbes |
|
| 234 | + $interdire_script = false; |
|
| 235 | + if (is_null($connect)) { |
|
| 236 | + $connect = ''; |
|
| 237 | + $interdire_script = true; |
|
| 238 | + $env['espace_prive'] = test_espace_prive(); |
|
| 239 | + } |
|
| 240 | + |
|
| 241 | + // Echapper les codes <html> etc |
|
| 242 | + if ($echapper) { |
|
| 243 | + $letexte = echappe_html($letexte, 'TYPO'); |
|
| 244 | + } |
|
| 245 | + |
|
| 246 | + // |
|
| 247 | + // Installer les modeles, notamment images et documents ; |
|
| 248 | + // |
|
| 249 | + // NOTE : propre() ne passe pas par ici mais directement par corriger_typo |
|
| 250 | + // cf. inc/lien |
|
| 251 | + |
|
| 252 | + $letexte = traiter_modeles($mem = $letexte, false, $echapper ? 'TYPO' : '', $connect, null, $env); |
|
| 253 | + if ($letexte != $mem) { |
|
| 254 | + $echapper = true; |
|
| 255 | + } |
|
| 256 | + unset($mem); |
|
| 257 | + |
|
| 258 | + $letexte = corriger_typo($letexte); |
|
| 259 | + $letexte = echapper_faux_tags($letexte); |
|
| 260 | + |
|
| 261 | + // reintegrer les echappements |
|
| 262 | + if ($echapper) { |
|
| 263 | + $letexte = echappe_retour($letexte, 'TYPO'); |
|
| 264 | + } |
|
| 265 | + |
|
| 266 | + // Dans les appels directs hors squelette, securiser ici aussi |
|
| 267 | + if ($interdire_script) { |
|
| 268 | + $letexte = interdire_scripts($letexte); |
|
| 269 | + } |
|
| 270 | + |
|
| 271 | + // Dans l'espace prive on se mefie de tout contenu dangereux |
|
| 272 | + // https://core.spip.net/issues/3371 |
|
| 273 | + // et aussi dans l'espace public si la globale filtrer_javascript = -1 |
|
| 274 | + // https://core.spip.net/issues/4166 |
|
| 275 | + if ($GLOBALS['filtrer_javascript'] == -1 |
|
| 276 | + or (isset($env['espace_prive']) and $env['espace_prive'] and $GLOBALS['filtrer_javascript']<=0)) { |
|
| 277 | + $letexte = echapper_html_suspect($letexte); |
|
| 278 | + } |
|
| 279 | + |
|
| 280 | + return $letexte; |
|
| 281 | 281 | } |
| 282 | 282 | |
| 283 | 283 | // Correcteur typographique |
@@ -302,57 +302,57 @@ discard block |
||
| 302 | 302 | */ |
| 303 | 303 | function corriger_typo($letexte, $lang = '') { |
| 304 | 304 | |
| 305 | - // Plus vite ! |
|
| 306 | - if (!$letexte) { |
|
| 307 | - return $letexte; |
|
| 308 | - } |
|
| 309 | - |
|
| 310 | - $letexte = pipeline('pre_typo', $letexte); |
|
| 311 | - |
|
| 312 | - // Caracteres de controle "illegaux" |
|
| 313 | - $letexte = corriger_caracteres($letexte); |
|
| 314 | - |
|
| 315 | - // Proteger les caracteres typographiques a l'interieur des tags html |
|
| 316 | - if (preg_match_all(_TYPO_BALISE, $letexte, $regs, PREG_SET_ORDER)) { |
|
| 317 | - foreach ($regs as $reg) { |
|
| 318 | - $insert = $reg[0]; |
|
| 319 | - // hack: on transforme les caracteres a proteger en les remplacant |
|
| 320 | - // par des caracteres "illegaux". (cf corriger_caracteres()) |
|
| 321 | - $insert = strtr($insert, _TYPO_PROTEGER, _TYPO_PROTECTEUR); |
|
| 322 | - $letexte = str_replace($reg[0], $insert, $letexte); |
|
| 323 | - } |
|
| 324 | - } |
|
| 325 | - |
|
| 326 | - // trouver les blocs idiomes et les traiter à part |
|
| 327 | - $letexte = extraire_idiome($ei = $letexte, $lang, true); |
|
| 328 | - $ei = ($ei !== $letexte); |
|
| 329 | - |
|
| 330 | - // trouver les blocs multi et les traiter a part |
|
| 331 | - $letexte = extraire_multi($em = $letexte, $lang, true); |
|
| 332 | - $em = ($em !== $letexte); |
|
| 333 | - |
|
| 334 | - // Charger & appliquer les fonctions de typographie |
|
| 335 | - $typographie = charger_fonction(lang_typo($lang), 'typographie'); |
|
| 336 | - $letexte = $typographie($letexte); |
|
| 337 | - |
|
| 338 | - // Les citations en une autre langue, s'il y a lieu |
|
| 339 | - if ($em) { |
|
| 340 | - $letexte = echappe_retour($letexte, 'multi'); |
|
| 341 | - } |
|
| 342 | - if ($ei) { |
|
| 343 | - $letexte = echappe_retour($letexte, 'idiome'); |
|
| 344 | - } |
|
| 345 | - |
|
| 346 | - // Retablir les caracteres proteges |
|
| 347 | - $letexte = strtr($letexte, _TYPO_PROTECTEUR, _TYPO_PROTEGER); |
|
| 348 | - |
|
| 349 | - // pipeline |
|
| 350 | - $letexte = pipeline('post_typo', $letexte); |
|
| 351 | - |
|
| 352 | - # un message pour abs_url - on est passe en mode texte |
|
| 353 | - $GLOBALS['mode_abs_url'] = 'texte'; |
|
| 354 | - |
|
| 355 | - return $letexte; |
|
| 305 | + // Plus vite ! |
|
| 306 | + if (!$letexte) { |
|
| 307 | + return $letexte; |
|
| 308 | + } |
|
| 309 | + |
|
| 310 | + $letexte = pipeline('pre_typo', $letexte); |
|
| 311 | + |
|
| 312 | + // Caracteres de controle "illegaux" |
|
| 313 | + $letexte = corriger_caracteres($letexte); |
|
| 314 | + |
|
| 315 | + // Proteger les caracteres typographiques a l'interieur des tags html |
|
| 316 | + if (preg_match_all(_TYPO_BALISE, $letexte, $regs, PREG_SET_ORDER)) { |
|
| 317 | + foreach ($regs as $reg) { |
|
| 318 | + $insert = $reg[0]; |
|
| 319 | + // hack: on transforme les caracteres a proteger en les remplacant |
|
| 320 | + // par des caracteres "illegaux". (cf corriger_caracteres()) |
|
| 321 | + $insert = strtr($insert, _TYPO_PROTEGER, _TYPO_PROTECTEUR); |
|
| 322 | + $letexte = str_replace($reg[0], $insert, $letexte); |
|
| 323 | + } |
|
| 324 | + } |
|
| 325 | + |
|
| 326 | + // trouver les blocs idiomes et les traiter à part |
|
| 327 | + $letexte = extraire_idiome($ei = $letexte, $lang, true); |
|
| 328 | + $ei = ($ei !== $letexte); |
|
| 329 | + |
|
| 330 | + // trouver les blocs multi et les traiter a part |
|
| 331 | + $letexte = extraire_multi($em = $letexte, $lang, true); |
|
| 332 | + $em = ($em !== $letexte); |
|
| 333 | + |
|
| 334 | + // Charger & appliquer les fonctions de typographie |
|
| 335 | + $typographie = charger_fonction(lang_typo($lang), 'typographie'); |
|
| 336 | + $letexte = $typographie($letexte); |
|
| 337 | + |
|
| 338 | + // Les citations en une autre langue, s'il y a lieu |
|
| 339 | + if ($em) { |
|
| 340 | + $letexte = echappe_retour($letexte, 'multi'); |
|
| 341 | + } |
|
| 342 | + if ($ei) { |
|
| 343 | + $letexte = echappe_retour($letexte, 'idiome'); |
|
| 344 | + } |
|
| 345 | + |
|
| 346 | + // Retablir les caracteres proteges |
|
| 347 | + $letexte = strtr($letexte, _TYPO_PROTECTEUR, _TYPO_PROTEGER); |
|
| 348 | + |
|
| 349 | + // pipeline |
|
| 350 | + $letexte = pipeline('post_typo', $letexte); |
|
| 351 | + |
|
| 352 | + # un message pour abs_url - on est passe en mode texte |
|
| 353 | + $GLOBALS['mode_abs_url'] = 'texte'; |
|
| 354 | + |
|
| 355 | + return $letexte; |
|
| 356 | 356 | } |
| 357 | 357 | |
| 358 | 358 | |
@@ -368,7 +368,7 @@ discard block |
||
| 368 | 368 | * @return string |
| 369 | 369 | */ |
| 370 | 370 | function paragrapher($letexte, $forcer = true) { |
| 371 | - return $letexte; |
|
| 371 | + return $letexte; |
|
| 372 | 372 | } |
| 373 | 373 | |
| 374 | 374 | /** |
@@ -380,11 +380,11 @@ discard block |
||
| 380 | 380 | * @return string Texte |
| 381 | 381 | **/ |
| 382 | 382 | function traiter_retours_chariots($letexte) { |
| 383 | - $letexte = preg_replace(",\r\n?,S", "\n", $letexte); |
|
| 384 | - $letexte = preg_replace(",<p[>[:space:]],iS", "\n\n\\0", $letexte); |
|
| 385 | - $letexte = preg_replace(",</p[>[:space:]],iS", "\\0\n\n", $letexte); |
|
| 383 | + $letexte = preg_replace(",\r\n?,S", "\n", $letexte); |
|
| 384 | + $letexte = preg_replace(",<p[>[:space:]],iS", "\n\n\\0", $letexte); |
|
| 385 | + $letexte = preg_replace(",</p[>[:space:]],iS", "\\0\n\n", $letexte); |
|
| 386 | 386 | |
| 387 | - return $letexte; |
|
| 387 | + return $letexte; |
|
| 388 | 388 | } |
| 389 | 389 | |
| 390 | 390 | |
@@ -410,37 +410,37 @@ discard block |
||
| 410 | 410 | * Texte transformé |
| 411 | 411 | **/ |
| 412 | 412 | function propre($t, $connect = null, $env = array()) { |
| 413 | - // les appels directs a cette fonction depuis le php de l'espace |
|
| 414 | - // prive etant historiquement ecrits sans argment $connect |
|
| 415 | - // on utilise la presence de celui-ci pour distinguer les cas |
|
| 416 | - // ou il faut passer interdire_script explicitement |
|
| 417 | - // les appels dans les squelettes (de l'espace prive) fournissant un $connect |
|
| 418 | - // ne seront pas perturbes |
|
| 419 | - $interdire_script = false; |
|
| 420 | - if (is_null($connect)) { |
|
| 421 | - $connect = ''; |
|
| 422 | - $interdire_script = true; |
|
| 423 | - } |
|
| 424 | - |
|
| 425 | - if (!$t) { |
|
| 426 | - return strval($t); |
|
| 427 | - } |
|
| 428 | - |
|
| 429 | - // Dans l'espace prive on se mefie de tout contenu dangereux |
|
| 430 | - // avant echappement des balises <html> |
|
| 431 | - // https://core.spip.net/issues/3371 |
|
| 432 | - // et aussi dans l'espace public si la globale filtrer_javascript = -1 |
|
| 433 | - // https://core.spip.net/issues/4166 |
|
| 434 | - if ($interdire_script |
|
| 435 | - or $GLOBALS['filtrer_javascript'] == -1 |
|
| 436 | - or (isset($env['espace_prive']) and $env['espace_prive'] and $GLOBALS['filtrer_javascript']<=0) |
|
| 437 | - or (isset($env['wysiwyg']) and $env['wysiwyg'] and $GLOBALS['filtrer_javascript']<=0)) { |
|
| 438 | - $t = echapper_html_suspect($t, false); |
|
| 439 | - } |
|
| 440 | - $t = echappe_html($t); |
|
| 441 | - $t = expanser_liens($t, $connect, $env); |
|
| 442 | - $t = traiter_raccourcis($t); |
|
| 443 | - $t = echappe_retour_modeles($t, $interdire_script); |
|
| 444 | - |
|
| 445 | - return $t; |
|
| 413 | + // les appels directs a cette fonction depuis le php de l'espace |
|
| 414 | + // prive etant historiquement ecrits sans argment $connect |
|
| 415 | + // on utilise la presence de celui-ci pour distinguer les cas |
|
| 416 | + // ou il faut passer interdire_script explicitement |
|
| 417 | + // les appels dans les squelettes (de l'espace prive) fournissant un $connect |
|
| 418 | + // ne seront pas perturbes |
|
| 419 | + $interdire_script = false; |
|
| 420 | + if (is_null($connect)) { |
|
| 421 | + $connect = ''; |
|
| 422 | + $interdire_script = true; |
|
| 423 | + } |
|
| 424 | + |
|
| 425 | + if (!$t) { |
|
| 426 | + return strval($t); |
|
| 427 | + } |
|
| 428 | + |
|
| 429 | + // Dans l'espace prive on se mefie de tout contenu dangereux |
|
| 430 | + // avant echappement des balises <html> |
|
| 431 | + // https://core.spip.net/issues/3371 |
|
| 432 | + // et aussi dans l'espace public si la globale filtrer_javascript = -1 |
|
| 433 | + // https://core.spip.net/issues/4166 |
|
| 434 | + if ($interdire_script |
|
| 435 | + or $GLOBALS['filtrer_javascript'] == -1 |
|
| 436 | + or (isset($env['espace_prive']) and $env['espace_prive'] and $GLOBALS['filtrer_javascript']<=0) |
|
| 437 | + or (isset($env['wysiwyg']) and $env['wysiwyg'] and $GLOBALS['filtrer_javascript']<=0)) { |
|
| 438 | + $t = echapper_html_suspect($t, false); |
|
| 439 | + } |
|
| 440 | + $t = echappe_html($t); |
|
| 441 | + $t = expanser_liens($t, $connect, $env); |
|
| 442 | + $t = traiter_raccourcis($t); |
|
| 443 | + $t = echappe_retour_modeles($t, $interdire_script); |
|
| 444 | + |
|
| 445 | + return $t; |
|
| 446 | 446 | } |
@@ -104,11 +104,11 @@ discard block |
||
| 104 | 104 | function echappe_js($t, $class = ' class = "echappe-js"') { |
| 105 | 105 | foreach (array('script', 'iframe') as $tag) { |
| 106 | 106 | if (stripos($t, "<$tag") !== false |
| 107 | - and preg_match_all(',<' . $tag . '.*?($|</' . $tag . '.),isS', $t, $r, PREG_SET_ORDER) |
|
| 107 | + and preg_match_all(',<'.$tag.'.*?($|</'.$tag.'.),isS', $t, $r, PREG_SET_ORDER) |
|
| 108 | 108 | ) { |
| 109 | 109 | foreach ($r as $regs) { |
| 110 | 110 | $t = str_replace($regs[0], |
| 111 | - "<code$class>" . nl2br(spip_htmlspecialchars($regs[0])) . '</code>', |
|
| 111 | + "<code$class>".nl2br(spip_htmlspecialchars($regs[0])).'</code>', |
|
| 112 | 112 | $t); |
| 113 | 113 | } |
| 114 | 114 | } |
@@ -142,7 +142,7 @@ discard block |
||
| 142 | 142 | * @return string |
| 143 | 143 | * Code protégé |
| 144 | 144 | **/ |
| 145 | -function interdire_scripts($arg, $mode_filtre=null) { |
|
| 145 | +function interdire_scripts($arg, $mode_filtre = null) { |
|
| 146 | 146 | // on memorise le resultat sur les arguments non triviaux |
| 147 | 147 | static $dejavu = array(); |
| 148 | 148 | |
@@ -160,10 +160,10 @@ discard block |
||
| 160 | 160 | } |
| 161 | 161 | |
| 162 | 162 | // echapper les tags asp/php |
| 163 | - $t = str_replace('<' . '%', '<%', $arg); |
|
| 163 | + $t = str_replace('<'.'%', '<%', $arg); |
|
| 164 | 164 | |
| 165 | 165 | // echapper le php |
| 166 | - $t = str_replace('<' . '?', '<?', $t); |
|
| 166 | + $t = str_replace('<'.'?', '<?', $t); |
|
| 167 | 167 | |
| 168 | 168 | // echapper le < script language=php > |
| 169 | 169 | $t = preg_replace(',<(script\b[^>]+\blanguage\b[^\w>]+php\b),UimsS', '<\1', $t); |
@@ -185,10 +185,10 @@ discard block |
||
| 185 | 185 | |
| 186 | 186 | // Reinserer les echappements des modeles |
| 187 | 187 | if (defined('_PROTEGE_JS_MODELES')) { |
| 188 | - $t = echappe_retour($t, "javascript" . _PROTEGE_JS_MODELES); |
|
| 188 | + $t = echappe_retour($t, "javascript"._PROTEGE_JS_MODELES); |
|
| 189 | 189 | } |
| 190 | 190 | if (defined('_PROTEGE_PHP_MODELES')) { |
| 191 | - $t = echappe_retour($t, "php" . _PROTEGE_PHP_MODELES); |
|
| 191 | + $t = echappe_retour($t, "php"._PROTEGE_PHP_MODELES); |
|
| 192 | 192 | } |
| 193 | 193 | |
| 194 | 194 | return $dejavu[$mode_filtre][$arg] = $t; |
@@ -273,7 +273,7 @@ discard block |
||
| 273 | 273 | // et aussi dans l'espace public si la globale filtrer_javascript = -1 |
| 274 | 274 | // https://core.spip.net/issues/4166 |
| 275 | 275 | if ($GLOBALS['filtrer_javascript'] == -1 |
| 276 | - or (isset($env['espace_prive']) and $env['espace_prive'] and $GLOBALS['filtrer_javascript']<=0)) { |
|
| 276 | + or (isset($env['espace_prive']) and $env['espace_prive'] and $GLOBALS['filtrer_javascript'] <= 0)) { |
|
| 277 | 277 | $letexte = echapper_html_suspect($letexte); |
| 278 | 278 | } |
| 279 | 279 | |
@@ -284,7 +284,7 @@ discard block |
||
| 284 | 284 | define('_TYPO_PROTEGER', "!':;?~%-"); |
| 285 | 285 | define('_TYPO_PROTECTEUR', "\x1\x2\x3\x4\x5\x6\x7\x8"); |
| 286 | 286 | |
| 287 | -define('_TYPO_BALISE', ",</?[a-z!][^<>]*[" . preg_quote(_TYPO_PROTEGER) . "][^<>]*>,imsS"); |
|
| 287 | +define('_TYPO_BALISE', ",</?[a-z!][^<>]*[".preg_quote(_TYPO_PROTEGER)."][^<>]*>,imsS"); |
|
| 288 | 288 | |
| 289 | 289 | /** |
| 290 | 290 | * Corrige la typographie |
@@ -433,8 +433,8 @@ discard block |
||
| 433 | 433 | // https://core.spip.net/issues/4166 |
| 434 | 434 | if ($interdire_script |
| 435 | 435 | or $GLOBALS['filtrer_javascript'] == -1 |
| 436 | - or (isset($env['espace_prive']) and $env['espace_prive'] and $GLOBALS['filtrer_javascript']<=0) |
|
| 437 | - or (isset($env['wysiwyg']) and $env['wysiwyg'] and $GLOBALS['filtrer_javascript']<=0)) { |
|
| 436 | + or (isset($env['espace_prive']) and $env['espace_prive'] and $GLOBALS['filtrer_javascript'] <= 0) |
|
| 437 | + or (isset($env['wysiwyg']) and $env['wysiwyg'] and $GLOBALS['filtrer_javascript'] <= 0)) { |
|
| 438 | 438 | $t = echapper_html_suspect($t, false); |
| 439 | 439 | } |
| 440 | 440 | $t = echappe_html($t); |
@@ -245,7 +245,7 @@ |
||
| 245 | 245 | * @param array $matches |
| 246 | 246 | * Branches de l'arbre validant la rexgep |
| 247 | 247 | * @param bool $init ? |
| 248 | - * @return bool |
|
| 248 | + * @return integer |
|
| 249 | 249 | * false si aucun élément ne valide l'expression régulière, true sinon. |
| 250 | 250 | **/ |
| 251 | 251 | function spip_xml_match_nodes($regexp, &$arbre, &$matches, $init = true) { |
@@ -135,7 +135,7 @@ |
||
| 135 | 135 | while ( |
| 136 | 136 | $p !== false |
| 137 | 137 | and ($morceau = substr($txt, $d, $p - $d)) |
| 138 | - and (($nopen += preg_match_all("{<" . preg_quote($closing_tag) . "(\s*>|\s[^>]*[^/>]>)}is", $morceau, |
|
| 138 | + and (($nopen += preg_match_all("{<".preg_quote($closing_tag)."(\s*>|\s[^>]*[^/>]>)}is", $morceau, |
|
| 139 | 139 | $matches, PREG_SET_ORDER)) > $nclose) |
| 140 | 140 | ) { |
| 141 | 141 | $nclose++; |
@@ -154,9 +154,11 @@ |
||
| 154 | 154 | } |
| 155 | 155 | $content = substr($txt, 0, $p); |
| 156 | 156 | $txt = substr($txt, $p + $ncclos); |
| 157 | - if ($profondeur == 0 or strpos($content, "<") === false) // eviter une recursion si pas utile |
|
| 157 | + if ($profondeur == 0 or strpos($content, "<") === false) { |
|
| 158 | + // eviter une recursion si pas utile |
|
| 158 | 159 | { |
| 159 | 160 | $out[$tag][] = importer_charset($content, $charset); |
| 161 | + } |
|
| 160 | 162 | }//$content; |
| 161 | 163 | else { |
| 162 | 164 | $out[$tag][] = spip_xml_parse($content, $strict, $clean, $profondeur - 1); |
@@ -17,7 +17,7 @@ discard block |
||
| 17 | 17 | **/ |
| 18 | 18 | |
| 19 | 19 | if (!defined('_ECRIRE_INC_VERSION')) { |
| 20 | - return; |
|
| 20 | + return; |
|
| 21 | 21 | } |
| 22 | 22 | |
| 23 | 23 | |
@@ -47,24 +47,24 @@ discard block |
||
| 47 | 47 | * - false si l'arbre xml ne peut être créé ou est vide |
| 48 | 48 | **/ |
| 49 | 49 | function spip_xml_load($fichier, $strict = true, $clean = true, $taille_max = 1048576, $datas = '', $profondeur = -1) { |
| 50 | - $contenu = ""; |
|
| 51 | - if (tester_url_absolue($fichier)) { |
|
| 52 | - include_spip('inc/distant'); |
|
| 53 | - $contenu = recuperer_url($fichier, ['taille_max' => $taille_max, 'datas' => $datas]); |
|
| 54 | - $contenu = $contenu['page'] ?? ''; |
|
| 55 | - } else { |
|
| 56 | - lire_fichier($fichier, $contenu); |
|
| 57 | - } |
|
| 58 | - $arbre = array(); |
|
| 59 | - if ($contenu) { |
|
| 60 | - $arbre = spip_xml_parse($contenu, $strict, $clean, $profondeur); |
|
| 61 | - } |
|
| 50 | + $contenu = ""; |
|
| 51 | + if (tester_url_absolue($fichier)) { |
|
| 52 | + include_spip('inc/distant'); |
|
| 53 | + $contenu = recuperer_url($fichier, ['taille_max' => $taille_max, 'datas' => $datas]); |
|
| 54 | + $contenu = $contenu['page'] ?? ''; |
|
| 55 | + } else { |
|
| 56 | + lire_fichier($fichier, $contenu); |
|
| 57 | + } |
|
| 58 | + $arbre = array(); |
|
| 59 | + if ($contenu) { |
|
| 60 | + $arbre = spip_xml_parse($contenu, $strict, $clean, $profondeur); |
|
| 61 | + } |
|
| 62 | 62 | |
| 63 | - return count($arbre) ? $arbre : false; |
|
| 63 | + return count($arbre) ? $arbre : false; |
|
| 64 | 64 | } |
| 65 | 65 | |
| 66 | 66 | if (!defined('_SPIP_XML_TAG_SPLIT')) { |
| 67 | - define('_SPIP_XML_TAG_SPLIT', "{<([^:>][^>]*?)>}sS"); |
|
| 67 | + define('_SPIP_XML_TAG_SPLIT', "{<([^:>][^>]*?)>}sS"); |
|
| 68 | 68 | } |
| 69 | 69 | |
| 70 | 70 | /** |
@@ -83,150 +83,150 @@ discard block |
||
| 83 | 83 | * - false si l'arbre xml ne peut être créé ou est vide |
| 84 | 84 | **/ |
| 85 | 85 | function spip_xml_parse(&$texte, $strict = true, $clean = true, $profondeur = -1) { |
| 86 | - $out = array(); |
|
| 87 | - // enlever les commentaires |
|
| 88 | - $charset = 'AUTO'; |
|
| 89 | - if ($clean === true) { |
|
| 90 | - if (preg_match(",<\?xml\s(.*?)encoding=['\"]?(.*?)['\"]?(\s(.*))?\?>,im", $texte, $regs)) { |
|
| 91 | - $charset = $regs[2]; |
|
| 92 | - } |
|
| 93 | - $texte = preg_replace(',<!--(.*?)-->,is', '', $texte); |
|
| 94 | - $texte = preg_replace(',<\?(.*?)\?>,is', '', $texte); |
|
| 95 | - include_spip('inc/charsets'); |
|
| 96 | - $clean = $charset; |
|
| 97 | - //$texte = importer_charset($texte,$charset); |
|
| 98 | - } |
|
| 99 | - if (is_string($clean)) { |
|
| 100 | - $charset = $clean; |
|
| 101 | - } |
|
| 102 | - $txt = $texte; |
|
| 86 | + $out = array(); |
|
| 87 | + // enlever les commentaires |
|
| 88 | + $charset = 'AUTO'; |
|
| 89 | + if ($clean === true) { |
|
| 90 | + if (preg_match(",<\?xml\s(.*?)encoding=['\"]?(.*?)['\"]?(\s(.*))?\?>,im", $texte, $regs)) { |
|
| 91 | + $charset = $regs[2]; |
|
| 92 | + } |
|
| 93 | + $texte = preg_replace(',<!--(.*?)-->,is', '', $texte); |
|
| 94 | + $texte = preg_replace(',<\?(.*?)\?>,is', '', $texte); |
|
| 95 | + include_spip('inc/charsets'); |
|
| 96 | + $clean = $charset; |
|
| 97 | + //$texte = importer_charset($texte,$charset); |
|
| 98 | + } |
|
| 99 | + if (is_string($clean)) { |
|
| 100 | + $charset = $clean; |
|
| 101 | + } |
|
| 102 | + $txt = $texte; |
|
| 103 | 103 | |
| 104 | - // tant qu'il y a des tags |
|
| 105 | - $chars = preg_split(_SPIP_XML_TAG_SPLIT, $txt, 2, PREG_SPLIT_DELIM_CAPTURE); |
|
| 106 | - while (count($chars) >= 2) { |
|
| 107 | - // tag ouvrant |
|
| 108 | - //$chars = preg_split("{<([^>]*?)>}s",$txt,2,PREG_SPLIT_DELIM_CAPTURE); |
|
| 104 | + // tant qu'il y a des tags |
|
| 105 | + $chars = preg_split(_SPIP_XML_TAG_SPLIT, $txt, 2, PREG_SPLIT_DELIM_CAPTURE); |
|
| 106 | + while (count($chars) >= 2) { |
|
| 107 | + // tag ouvrant |
|
| 108 | + //$chars = preg_split("{<([^>]*?)>}s",$txt,2,PREG_SPLIT_DELIM_CAPTURE); |
|
| 109 | 109 | |
| 110 | - // $before doit etre vide ou des espaces uniquements! |
|
| 111 | - $before = trim($chars[0]); |
|
| 110 | + // $before doit etre vide ou des espaces uniquements! |
|
| 111 | + $before = trim($chars[0]); |
|
| 112 | 112 | |
| 113 | - if (strlen($before) > 0) { |
|
| 114 | - return importer_charset($texte, $charset); |
|
| 115 | - }//$texte; // before non vide, donc on est dans du texte |
|
| 113 | + if (strlen($before) > 0) { |
|
| 114 | + return importer_charset($texte, $charset); |
|
| 115 | + }//$texte; // before non vide, donc on est dans du texte |
|
| 116 | 116 | |
| 117 | - $tag = rtrim($chars[1]); |
|
| 118 | - $txt = $chars[2]; |
|
| 117 | + $tag = rtrim($chars[1]); |
|
| 118 | + $txt = $chars[2]; |
|
| 119 | 119 | |
| 120 | - if (strncmp($tag, '![CDATA[', 8) == 0) { |
|
| 121 | - return importer_charset($texte, $charset); |
|
| 122 | - }//$texte; |
|
| 123 | - if (substr($tag, -1) == '/') { // self closing tag |
|
| 124 | - $tag = rtrim(substr($tag, 0, strlen($tag) - 1)); |
|
| 125 | - $out[$tag][] = ""; |
|
| 126 | - } else { |
|
| 127 | - $closing_tag = preg_split(",\s|\t|\n|\r,", trim($tag)); |
|
| 128 | - $closing_tag = reset($closing_tag); |
|
| 129 | - // tag fermant |
|
| 130 | - $ncclos = strlen("</$closing_tag>"); |
|
| 131 | - $p = strpos($txt, "</$closing_tag>"); |
|
| 132 | - if ($p !== false and (strpos($txt, "<") < $p)) { |
|
| 133 | - $nclose = 0; |
|
| 134 | - $nopen = 0; |
|
| 135 | - $d = 0; |
|
| 136 | - while ( |
|
| 137 | - $p !== false |
|
| 138 | - and ($morceau = substr($txt, $d, $p - $d)) |
|
| 139 | - and (($nopen += preg_match_all("{<" . preg_quote($closing_tag) . "(\s*>|\s[^>]*[^/>]>)}is", $morceau, |
|
| 140 | - $matches, PREG_SET_ORDER)) > $nclose) |
|
| 141 | - ) { |
|
| 142 | - $nclose++; |
|
| 143 | - $d = $p + $ncclos; |
|
| 144 | - $p = strpos($txt, "</$closing_tag>", $d); |
|
| 145 | - } |
|
| 146 | - } |
|
| 147 | - if ($p === false) { |
|
| 148 | - if ($strict) { |
|
| 149 | - $out[$tag][] = "erreur : tag fermant $tag manquant::$txt"; |
|
| 120 | + if (strncmp($tag, '![CDATA[', 8) == 0) { |
|
| 121 | + return importer_charset($texte, $charset); |
|
| 122 | + }//$texte; |
|
| 123 | + if (substr($tag, -1) == '/') { // self closing tag |
|
| 124 | + $tag = rtrim(substr($tag, 0, strlen($tag) - 1)); |
|
| 125 | + $out[$tag][] = ""; |
|
| 126 | + } else { |
|
| 127 | + $closing_tag = preg_split(",\s|\t|\n|\r,", trim($tag)); |
|
| 128 | + $closing_tag = reset($closing_tag); |
|
| 129 | + // tag fermant |
|
| 130 | + $ncclos = strlen("</$closing_tag>"); |
|
| 131 | + $p = strpos($txt, "</$closing_tag>"); |
|
| 132 | + if ($p !== false and (strpos($txt, "<") < $p)) { |
|
| 133 | + $nclose = 0; |
|
| 134 | + $nopen = 0; |
|
| 135 | + $d = 0; |
|
| 136 | + while ( |
|
| 137 | + $p !== false |
|
| 138 | + and ($morceau = substr($txt, $d, $p - $d)) |
|
| 139 | + and (($nopen += preg_match_all("{<" . preg_quote($closing_tag) . "(\s*>|\s[^>]*[^/>]>)}is", $morceau, |
|
| 140 | + $matches, PREG_SET_ORDER)) > $nclose) |
|
| 141 | + ) { |
|
| 142 | + $nclose++; |
|
| 143 | + $d = $p + $ncclos; |
|
| 144 | + $p = strpos($txt, "</$closing_tag>", $d); |
|
| 145 | + } |
|
| 146 | + } |
|
| 147 | + if ($p === false) { |
|
| 148 | + if ($strict) { |
|
| 149 | + $out[$tag][] = "erreur : tag fermant $tag manquant::$txt"; |
|
| 150 | 150 | |
| 151 | - return $out; |
|
| 152 | - } else { |
|
| 153 | - return importer_charset($texte, $charset); |
|
| 154 | - }//$texte // un tag qui constitue du texte a reporter dans $before |
|
| 155 | - } |
|
| 156 | - $content = substr($txt, 0, $p); |
|
| 157 | - $txt = substr($txt, $p + $ncclos); |
|
| 158 | - if ($profondeur == 0 or strpos($content, "<") === false) // eviter une recursion si pas utile |
|
| 159 | - { |
|
| 160 | - $out[$tag][] = importer_charset($content, $charset); |
|
| 161 | - }//$content; |
|
| 162 | - else { |
|
| 163 | - $out[$tag][] = spip_xml_parse($content, $strict, $clean, $profondeur - 1); |
|
| 164 | - } |
|
| 165 | - } |
|
| 166 | - $chars = preg_split(_SPIP_XML_TAG_SPLIT, $txt, 2, PREG_SPLIT_DELIM_CAPTURE); |
|
| 167 | - } |
|
| 168 | - if (count($out) && (strlen(trim($txt)) == 0)) { |
|
| 169 | - return $out; |
|
| 170 | - } else { |
|
| 171 | - return importer_charset($texte, $charset); |
|
| 172 | - }//$texte; |
|
| 151 | + return $out; |
|
| 152 | + } else { |
|
| 153 | + return importer_charset($texte, $charset); |
|
| 154 | + }//$texte // un tag qui constitue du texte a reporter dans $before |
|
| 155 | + } |
|
| 156 | + $content = substr($txt, 0, $p); |
|
| 157 | + $txt = substr($txt, $p + $ncclos); |
|
| 158 | + if ($profondeur == 0 or strpos($content, "<") === false) // eviter une recursion si pas utile |
|
| 159 | + { |
|
| 160 | + $out[$tag][] = importer_charset($content, $charset); |
|
| 161 | + }//$content; |
|
| 162 | + else { |
|
| 163 | + $out[$tag][] = spip_xml_parse($content, $strict, $clean, $profondeur - 1); |
|
| 164 | + } |
|
| 165 | + } |
|
| 166 | + $chars = preg_split(_SPIP_XML_TAG_SPLIT, $txt, 2, PREG_SPLIT_DELIM_CAPTURE); |
|
| 167 | + } |
|
| 168 | + if (count($out) && (strlen(trim($txt)) == 0)) { |
|
| 169 | + return $out; |
|
| 170 | + } else { |
|
| 171 | + return importer_charset($texte, $charset); |
|
| 172 | + }//$texte; |
|
| 173 | 173 | } |
| 174 | 174 | |
| 175 | 175 | // https://code.spip.net/@spip_xml_aplatit |
| 176 | 176 | function spip_xml_aplatit($arbre, $separateur = " ") { |
| 177 | - $s = ""; |
|
| 178 | - if (is_array($arbre)) { |
|
| 179 | - foreach ($arbre as $tag => $feuille) { |
|
| 180 | - if (is_array($feuille)) { |
|
| 181 | - if ($tag !== intval($tag)) { |
|
| 182 | - $f = spip_xml_aplatit($feuille, $separateur); |
|
| 183 | - if (strlen($f)) { |
|
| 184 | - $tagf = explode(" ", $tag); |
|
| 185 | - $tagf = $tagf[0]; |
|
| 186 | - $s .= "<$tag>$f</$tagf>"; |
|
| 187 | - } else { |
|
| 188 | - $s .= "<$tag />"; |
|
| 189 | - } |
|
| 190 | - } else { |
|
| 191 | - $s .= spip_xml_aplatit($feuille); |
|
| 192 | - } |
|
| 193 | - $s .= $separateur; |
|
| 194 | - } else { |
|
| 195 | - $s .= "$feuille$separateur"; |
|
| 196 | - } |
|
| 197 | - } |
|
| 198 | - } |
|
| 177 | + $s = ""; |
|
| 178 | + if (is_array($arbre)) { |
|
| 179 | + foreach ($arbre as $tag => $feuille) { |
|
| 180 | + if (is_array($feuille)) { |
|
| 181 | + if ($tag !== intval($tag)) { |
|
| 182 | + $f = spip_xml_aplatit($feuille, $separateur); |
|
| 183 | + if (strlen($f)) { |
|
| 184 | + $tagf = explode(" ", $tag); |
|
| 185 | + $tagf = $tagf[0]; |
|
| 186 | + $s .= "<$tag>$f</$tagf>"; |
|
| 187 | + } else { |
|
| 188 | + $s .= "<$tag />"; |
|
| 189 | + } |
|
| 190 | + } else { |
|
| 191 | + $s .= spip_xml_aplatit($feuille); |
|
| 192 | + } |
|
| 193 | + $s .= $separateur; |
|
| 194 | + } else { |
|
| 195 | + $s .= "$feuille$separateur"; |
|
| 196 | + } |
|
| 197 | + } |
|
| 198 | + } |
|
| 199 | 199 | |
| 200 | - return strlen($separateur) ? substr($s, 0, -strlen($separateur)) : $s; |
|
| 200 | + return strlen($separateur) ? substr($s, 0, -strlen($separateur)) : $s; |
|
| 201 | 201 | } |
| 202 | 202 | |
| 203 | 203 | // https://code.spip.net/@spip_xml_tagname |
| 204 | 204 | function spip_xml_tagname($tag) { |
| 205 | - if (preg_match(',^([a-z][\w:]*),i', $tag, $reg)) { |
|
| 206 | - return $reg[1]; |
|
| 207 | - } |
|
| 205 | + if (preg_match(',^([a-z][\w:]*),i', $tag, $reg)) { |
|
| 206 | + return $reg[1]; |
|
| 207 | + } |
|
| 208 | 208 | |
| 209 | - return ""; |
|
| 209 | + return ""; |
|
| 210 | 210 | } |
| 211 | 211 | |
| 212 | 212 | // https://code.spip.net/@spip_xml_decompose_tag |
| 213 | 213 | function spip_xml_decompose_tag($tag) { |
| 214 | - $tagname = spip_xml_tagname($tag); |
|
| 215 | - $liste = array(); |
|
| 216 | - $tag = ltrim(strpbrk($tag, " \n\t")); |
|
| 217 | - $p = strpos($tag, '='); |
|
| 218 | - while ($p !== false) { |
|
| 219 | - $attr = trim(substr($tag, 0, $p)); |
|
| 220 | - $tag = ltrim(substr($tag, $p + 1)); |
|
| 221 | - $quote = $tag[0]; |
|
| 222 | - $p = strpos($tag, $quote, 1); |
|
| 223 | - $cont = substr($tag, 1, $p - 1); |
|
| 224 | - $liste[$attr] = $cont; |
|
| 225 | - $tag = substr($tag, $p + 1); |
|
| 226 | - $p = strpos($tag, '='); |
|
| 227 | - } |
|
| 214 | + $tagname = spip_xml_tagname($tag); |
|
| 215 | + $liste = array(); |
|
| 216 | + $tag = ltrim(strpbrk($tag, " \n\t")); |
|
| 217 | + $p = strpos($tag, '='); |
|
| 218 | + while ($p !== false) { |
|
| 219 | + $attr = trim(substr($tag, 0, $p)); |
|
| 220 | + $tag = ltrim(substr($tag, $p + 1)); |
|
| 221 | + $quote = $tag[0]; |
|
| 222 | + $p = strpos($tag, $quote, 1); |
|
| 223 | + $cont = substr($tag, 1, $p - 1); |
|
| 224 | + $liste[$attr] = $cont; |
|
| 225 | + $tag = substr($tag, $p + 1); |
|
| 226 | + $p = strpos($tag, '='); |
|
| 227 | + } |
|
| 228 | 228 | |
| 229 | - return array($tagname, $liste); |
|
| 229 | + return array($tagname, $liste); |
|
| 230 | 230 | } |
| 231 | 231 | |
| 232 | 232 | /** |
@@ -249,21 +249,21 @@ discard block |
||
| 249 | 249 | * false si aucun élément ne valide l'expression régulière, true sinon. |
| 250 | 250 | **/ |
| 251 | 251 | function spip_xml_match_nodes($regexp, &$arbre, &$matches, $init = true) { |
| 252 | - if ($init) { |
|
| 253 | - $matches = array(); |
|
| 254 | - } |
|
| 255 | - if (is_array($arbre) && count($arbre)) { |
|
| 256 | - foreach (array_keys($arbre) as $tag) { |
|
| 257 | - if (preg_match($regexp, $tag)) { |
|
| 258 | - $matches[$tag] = &$arbre[$tag]; |
|
| 259 | - } |
|
| 260 | - if (is_array($arbre[$tag])) { |
|
| 261 | - foreach (array_keys($arbre[$tag]) as $occurences) { |
|
| 262 | - spip_xml_match_nodes($regexp, $arbre[$tag][$occurences], $matches, false); |
|
| 263 | - } |
|
| 264 | - } |
|
| 265 | - } |
|
| 266 | - } |
|
| 252 | + if ($init) { |
|
| 253 | + $matches = array(); |
|
| 254 | + } |
|
| 255 | + if (is_array($arbre) && count($arbre)) { |
|
| 256 | + foreach (array_keys($arbre) as $tag) { |
|
| 257 | + if (preg_match($regexp, $tag)) { |
|
| 258 | + $matches[$tag] = &$arbre[$tag]; |
|
| 259 | + } |
|
| 260 | + if (is_array($arbre[$tag])) { |
|
| 261 | + foreach (array_keys($arbre[$tag]) as $occurences) { |
|
| 262 | + spip_xml_match_nodes($regexp, $arbre[$tag][$occurences], $matches, false); |
|
| 263 | + } |
|
| 264 | + } |
|
| 265 | + } |
|
| 266 | + } |
|
| 267 | 267 | |
| 268 | - return (count($matches)); |
|
| 268 | + return (count($matches)); |
|
| 269 | 269 | } |
@@ -133,7 +133,7 @@ discard block |
||
| 133 | 133 | /** |
| 134 | 134 | * Déclarer les critères exceptions |
| 135 | 135 | * |
| 136 | - * @return array |
|
| 136 | + * @return string[] |
|
| 137 | 137 | */ |
| 138 | 138 | public function exception_des_criteres() { |
| 139 | 139 | return array('tableau'); |
@@ -787,7 +787,7 @@ discard block |
||
| 787 | 787 | * pour la syntaxe cf la fonction spip preg_files |
| 788 | 788 | * |
| 789 | 789 | * @param string $dir |
| 790 | - * @param string $regexp |
|
| 790 | + * @param integer $regexp |
|
| 791 | 791 | * @param int $limit |
| 792 | 792 | * @return array|bool |
| 793 | 793 | */ |
@@ -826,7 +826,7 @@ discard block |
||
| 826 | 826 | /** |
| 827 | 827 | * Object -> tableau |
| 828 | 828 | * |
| 829 | - * @param Object $object |
|
| 829 | + * @param SimpleXMLIterator $object |
|
| 830 | 830 | * @return array|bool |
| 831 | 831 | */ |
| 832 | 832 | function XMLObjectToArray($object) { |
@@ -231,7 +231,7 @@ discard block |
||
| 231 | 231 | // Si a ce stade on n'a pas de table, il y a un bug |
| 232 | 232 | if (!is_array($this->tableau)) { |
| 233 | 233 | $this->err = true; |
| 234 | - spip_log("erreur datasource " . var_export($command, true)); |
|
| 234 | + spip_log("erreur datasource ".var_export($command, true)); |
|
| 235 | 235 | } |
| 236 | 236 | |
| 237 | 237 | // {datapath query.results} |
@@ -271,7 +271,7 @@ discard block |
||
| 271 | 271 | if (isset($this->command['sourcemode']) |
| 272 | 272 | and !in_array($this->command['sourcemode'], array('table', 'array', 'tableau')) |
| 273 | 273 | ) { |
| 274 | - charger_fonction($this->command['sourcemode'] . '_to_array', 'inc', true); |
|
| 274 | + charger_fonction($this->command['sourcemode'].'_to_array', 'inc', true); |
|
| 275 | 275 | } |
| 276 | 276 | |
| 277 | 277 | # le premier argument peut etre un array, une URL etc. |
@@ -280,7 +280,7 @@ discard block |
||
| 280 | 280 | # avons-nous un cache dispo ? |
| 281 | 281 | $cle = null; |
| 282 | 282 | if (is_string($src)) { |
| 283 | - $cle = 'datasource_' . md5($this->command['sourcemode'] . ':' . var_export($this->command['source'], true)); |
|
| 283 | + $cle = 'datasource_'.md5($this->command['sourcemode'].':'.var_export($this->command['source'], true)); |
|
| 284 | 284 | } |
| 285 | 285 | |
| 286 | 286 | $cache = $this->cache_get($cle); |
@@ -332,7 +332,7 @@ discard block |
||
| 332 | 332 | } |
| 333 | 333 | |
| 334 | 334 | if (!$this->err |
| 335 | - and $data_to_array = charger_fonction($this->command['sourcemode'] . '_to_array', 'inc', true) |
|
| 335 | + and $data_to_array = charger_fonction($this->command['sourcemode'].'_to_array', 'inc', true) |
|
| 336 | 336 | ) { |
| 337 | 337 | $args = $this->command['source']; |
| 338 | 338 | $args[0] = $data; |
@@ -467,13 +467,13 @@ discard block |
||
| 467 | 467 | $tv = '%s'; |
| 468 | 468 | } # {par valeur/xx/yy} ?? |
| 469 | 469 | else { |
| 470 | - $tv = 'table_valeur(%s, ' . var_export($r[1], true) . ')'; |
|
| 470 | + $tv = 'table_valeur(%s, '.var_export($r[1], true).')'; |
|
| 471 | 471 | } |
| 472 | 472 | $sortfunc .= ' |
| 473 | - $a = ' . sprintf($tv, '$aa') . '; |
|
| 474 | - $b = ' . sprintf($tv, '$bb') . '; |
|
| 473 | + $a = ' . sprintf($tv, '$aa').'; |
|
| 474 | + $b = ' . sprintf($tv, '$bb').'; |
|
| 475 | 475 | if ($a <> $b) |
| 476 | - return ($a ' . (!empty($r[2]) ? '>' : '<') . ' $b) ? -1 : 1;'; |
|
| 476 | + return ($a ' . (!empty($r[2]) ? '>' : '<').' $b) ? -1 : 1;'; |
|
| 477 | 477 | } |
| 478 | 478 | } |
| 479 | 479 | } |
@@ -626,7 +626,7 @@ discard block |
||
| 626 | 626 | function inc_sql_to_array_dist($data) { |
| 627 | 627 | # sortir le connecteur de $data |
| 628 | 628 | preg_match(',^(?:(\w+):)?(.*)$,Sm', $data, $v); |
| 629 | - $serveur = (string)$v[1]; |
|
| 629 | + $serveur = (string) $v[1]; |
|
| 630 | 630 | $req = trim($v[2]); |
| 631 | 631 | if ($s = sql_query($req, $serveur)) { |
| 632 | 632 | $r = array(); |
@@ -648,7 +648,7 @@ discard block |
||
| 648 | 648 | */ |
| 649 | 649 | function inc_json_to_array_dist($data) { |
| 650 | 650 | if (is_array($json = json_decode($data, true))) { |
| 651 | - return (array)$json; |
|
| 651 | + return (array) $json; |
|
| 652 | 652 | } |
| 653 | 653 | } |
| 654 | 654 | |
@@ -667,13 +667,13 @@ discard block |
||
| 667 | 667 | $i = 1; |
| 668 | 668 | foreach ($entete as $k => $v) { |
| 669 | 669 | if (trim($v) == "") { |
| 670 | - $v = "col" . $i; |
|
| 670 | + $v = "col".$i; |
|
| 671 | 671 | } // reperer des eventuelles cases vides |
| 672 | 672 | if (is_numeric($v) and $v < 0) { |
| 673 | - $v = "__" . $v; |
|
| 673 | + $v = "__".$v; |
|
| 674 | 674 | } // ne pas risquer d'ecraser une cle numerique |
| 675 | 675 | if (is_numeric($v)) { |
| 676 | - $v = "_" . $v; |
|
| 676 | + $v = "_".$v; |
|
| 677 | 677 | } // ne pas risquer d'ecraser une cle numerique |
| 678 | 678 | $v = strtolower(preg_replace(',\W+,', '_', translitteration($v))); |
| 679 | 679 | foreach ($csv as &$item) { |
@@ -757,7 +757,7 @@ discard block |
||
| 757 | 757 | * @return array|bool |
| 758 | 758 | */ |
| 759 | 759 | function inc_pregfiles_to_array_dist($dir, $regexp = -1, $limit = 10000) { |
| 760 | - return (array)preg_files($dir, $regexp, $limit); |
|
| 760 | + return (array) preg_files($dir, $regexp, $limit); |
|
| 761 | 761 | } |
| 762 | 762 | |
| 763 | 763 | /** |
@@ -772,13 +772,13 @@ discard block |
||
| 772 | 772 | $glob_to_array = charger_fonction('glob_to_array', 'inc'); |
| 773 | 773 | $a = $glob_to_array($data); |
| 774 | 774 | foreach ($a as &$v) { |
| 775 | - $b = (array)@stat($v); |
|
| 775 | + $b = (array) @stat($v); |
|
| 776 | 776 | foreach ($b as $k => $ignore) { |
| 777 | 777 | if (is_numeric($k)) { |
| 778 | 778 | unset($b[$k]); |
| 779 | 779 | } |
| 780 | 780 | } |
| 781 | - $b['file'] = preg_replace('`/$`','',$v) ; |
|
| 781 | + $b['file'] = preg_replace('`/$`', '', $v); |
|
| 782 | 782 | $v = array_merge( |
| 783 | 783 | pathinfo($v), |
| 784 | 784 | $b |
@@ -798,7 +798,7 @@ discard block |
||
| 798 | 798 | $xml_array = array(); |
| 799 | 799 | for ($object->rewind(); $object->valid(); $object->next()) { |
| 800 | 800 | if (array_key_exists($key = $object->key(), $xml_array)) { |
| 801 | - $key .= '-' . uniqid(); |
|
| 801 | + $key .= '-'.uniqid(); |
|
| 802 | 802 | } |
| 803 | 803 | $vars = get_object_vars($object->current()); |
| 804 | 804 | if (isset($vars['@attributes'])) { |
@@ -17,11 +17,11 @@ discard block |
||
| 17 | 17 | **/ |
| 18 | 18 | |
| 19 | 19 | if (!defined('_ECRIRE_INC_VERSION')) { |
| 20 | - return; |
|
| 20 | + return; |
|
| 21 | 21 | } |
| 22 | 22 | |
| 23 | 23 | if (!defined('_DATA_SOURCE_MAX_SIZE')) { |
| 24 | - define('_DATA_SOURCE_MAX_SIZE', 2 * 1048576); |
|
| 24 | + define('_DATA_SOURCE_MAX_SIZE', 2 * 1048576); |
|
| 25 | 25 | } |
| 26 | 26 | |
| 27 | 27 | |
@@ -42,17 +42,17 @@ discard block |
||
| 42 | 42 | * Description de la boucle complétée des champs |
| 43 | 43 | */ |
| 44 | 44 | function iterateur_DATA_dist($b) { |
| 45 | - $b->iterateur = 'DATA'; # designe la classe d'iterateur |
|
| 46 | - $b->show = array( |
|
| 47 | - 'field' => array( |
|
| 48 | - 'cle' => 'STRING', |
|
| 49 | - 'valeur' => 'STRING', |
|
| 50 | - '*' => 'ALL' // Champ joker * |
|
| 51 | - ) |
|
| 52 | - ); |
|
| 53 | - $b->select[] = '.valeur'; |
|
| 54 | - |
|
| 55 | - return $b; |
|
| 45 | + $b->iterateur = 'DATA'; # designe la classe d'iterateur |
|
| 46 | + $b->show = array( |
|
| 47 | + 'field' => array( |
|
| 48 | + 'cle' => 'STRING', |
|
| 49 | + 'valeur' => 'STRING', |
|
| 50 | + '*' => 'ALL' // Champ joker * |
|
| 51 | + ) |
|
| 52 | + ); |
|
| 53 | + $b->select[] = '.valeur'; |
|
| 54 | + |
|
| 55 | + return $b; |
|
| 56 | 56 | } |
| 57 | 57 | |
| 58 | 58 | |
@@ -62,506 +62,506 @@ discard block |
||
| 62 | 62 | * Pour itérer sur des données quelconques (transformables en tableau) |
| 63 | 63 | */ |
| 64 | 64 | class IterateurDATA implements Iterator { |
| 65 | - /** |
|
| 66 | - * tableau de donnees |
|
| 67 | - * |
|
| 68 | - * @var array |
|
| 69 | - */ |
|
| 70 | - protected $tableau = array(); |
|
| 71 | - |
|
| 72 | - /** |
|
| 73 | - * Conditions de filtrage |
|
| 74 | - * ie criteres de selection |
|
| 75 | - * |
|
| 76 | - * @var array |
|
| 77 | - */ |
|
| 78 | - protected $filtre = array(); |
|
| 79 | - |
|
| 80 | - |
|
| 81 | - /** |
|
| 82 | - * Cle courante |
|
| 83 | - * |
|
| 84 | - * @var null |
|
| 85 | - */ |
|
| 86 | - protected $cle = null; |
|
| 87 | - |
|
| 88 | - /** |
|
| 89 | - * Valeur courante |
|
| 90 | - * |
|
| 91 | - * @var null |
|
| 92 | - */ |
|
| 93 | - protected $valeur = null; |
|
| 94 | - |
|
| 95 | - /** |
|
| 96 | - * Erreur presente ? |
|
| 97 | - * |
|
| 98 | - * @var bool |
|
| 99 | - **/ |
|
| 100 | - public $err = false; |
|
| 101 | - |
|
| 102 | - /** |
|
| 103 | - * Calcul du total des elements |
|
| 104 | - * |
|
| 105 | - * @var int|null |
|
| 106 | - **/ |
|
| 107 | - public $total = null; |
|
| 108 | - |
|
| 109 | - /** |
|
| 110 | - * Constructeur |
|
| 111 | - * |
|
| 112 | - * @param $command |
|
| 113 | - * @param array $info |
|
| 114 | - */ |
|
| 115 | - public function __construct($command, $info = array()) { |
|
| 116 | - $this->type = 'DATA'; |
|
| 117 | - $this->command = $command; |
|
| 118 | - $this->info = $info; |
|
| 119 | - |
|
| 120 | - $this->select($command); |
|
| 121 | - } |
|
| 122 | - |
|
| 123 | - /** |
|
| 124 | - * Revenir au depart |
|
| 125 | - * |
|
| 126 | - * @return void |
|
| 127 | - */ |
|
| 128 | - public function rewind() { |
|
| 129 | - reset($this->tableau); |
|
| 130 | - $this->cle = key($this->tableau); |
|
| 131 | - $this->valeur = current($this->tableau); |
|
| 132 | - next($this->tableau); |
|
| 133 | - } |
|
| 134 | - |
|
| 135 | - /** |
|
| 136 | - * Déclarer les critères exceptions |
|
| 137 | - * |
|
| 138 | - * @return array |
|
| 139 | - */ |
|
| 140 | - public function exception_des_criteres() { |
|
| 141 | - return array('tableau'); |
|
| 142 | - } |
|
| 143 | - |
|
| 144 | - /** |
|
| 145 | - * Récupérer depuis le cache si possible |
|
| 146 | - * |
|
| 147 | - * @param string $cle |
|
| 148 | - * @return mixed |
|
| 149 | - */ |
|
| 150 | - protected function cache_get($cle) { |
|
| 151 | - if (!$cle) { |
|
| 152 | - return; |
|
| 153 | - } |
|
| 154 | - # utiliser memoization si dispo |
|
| 155 | - if (!function_exists('cache_get')) { |
|
| 156 | - return; |
|
| 157 | - } |
|
| 158 | - |
|
| 159 | - return cache_get($cle); |
|
| 160 | - } |
|
| 161 | - |
|
| 162 | - /** |
|
| 163 | - * Stocker en cache si possible |
|
| 164 | - * |
|
| 165 | - * @param string $cle |
|
| 166 | - * @param int $ttl |
|
| 167 | - * @param null|mixed $valeur |
|
| 168 | - * @return bool |
|
| 169 | - */ |
|
| 170 | - protected function cache_set($cle, $ttl, $valeur = null) { |
|
| 171 | - if (!$cle) { |
|
| 172 | - return; |
|
| 173 | - } |
|
| 174 | - if (is_null($valeur)) { |
|
| 175 | - $valeur = $this->tableau; |
|
| 176 | - } |
|
| 177 | - # utiliser memoization si dispo |
|
| 178 | - if (!function_exists('cache_set')) { |
|
| 179 | - return; |
|
| 180 | - } |
|
| 181 | - |
|
| 182 | - return cache_set($cle, |
|
| 183 | - array( |
|
| 184 | - 'data' => $valeur, |
|
| 185 | - 'time' => time(), |
|
| 186 | - 'ttl' => $ttl |
|
| 187 | - ), |
|
| 188 | - 3600 + $ttl); |
|
| 189 | - # conserver le cache 1h de plus que la validite demandee, |
|
| 190 | - # pour le cas ou le serveur distant ne reponde plus |
|
| 191 | - } |
|
| 192 | - |
|
| 193 | - /** |
|
| 194 | - * Aller chercher les données de la boucle DATA |
|
| 195 | - * |
|
| 196 | - * @throws Exception |
|
| 197 | - * @param array $command |
|
| 198 | - * @return void |
|
| 199 | - */ |
|
| 200 | - protected function select($command) { |
|
| 201 | - |
|
| 202 | - // l'iterateur DATA peut etre appele en passant (data:type) |
|
| 203 | - // le type se retrouve dans la commande 'from' |
|
| 204 | - // dans ce cas la le critere {source}, si present, n'a pas besoin du 1er argument |
|
| 205 | - if (isset($this->command['from'][0])) { |
|
| 206 | - if (isset($this->command['source']) and is_array($this->command['source'])) { |
|
| 207 | - array_unshift($this->command['source'], $this->command['sourcemode']); |
|
| 208 | - } |
|
| 209 | - $this->command['sourcemode'] = $this->command['from'][0]; |
|
| 210 | - } |
|
| 211 | - |
|
| 212 | - // cherchons differents moyens de creer le tableau de donnees |
|
| 213 | - // les commandes connues pour l'iterateur DATA |
|
| 214 | - // sont : {tableau #ARRAY} ; {cle=...} ; {valeur=...} |
|
| 215 | - |
|
| 216 | - // {source format, [URL], [arg2]...} |
|
| 217 | - if (isset($this->command['source']) |
|
| 218 | - and isset($this->command['sourcemode']) |
|
| 219 | - ) { |
|
| 220 | - $this->select_source(); |
|
| 221 | - } |
|
| 222 | - |
|
| 223 | - // Critere {liste X1, X2, X3} |
|
| 224 | - if (isset($this->command['liste'])) { |
|
| 225 | - $this->select_liste(); |
|
| 226 | - } |
|
| 227 | - if (isset($this->command['enum'])) { |
|
| 228 | - $this->select_enum(); |
|
| 229 | - } |
|
| 230 | - |
|
| 231 | - // Si a ce stade on n'a pas de table, il y a un bug |
|
| 232 | - if (!is_array($this->tableau)) { |
|
| 233 | - $this->err = true; |
|
| 234 | - spip_log("erreur datasource " . var_export($command, true)); |
|
| 235 | - } |
|
| 236 | - |
|
| 237 | - // {datapath query.results} |
|
| 238 | - // extraire le chemin "query.results" du tableau de donnees |
|
| 239 | - if (!$this->err |
|
| 240 | - and isset($this->command['datapath']) |
|
| 241 | - and is_array($this->command['datapath']) |
|
| 242 | - ) { |
|
| 243 | - $this->select_datapath(); |
|
| 244 | - } |
|
| 245 | - |
|
| 246 | - // tri {par x} |
|
| 247 | - if ($this->command['orderby']) { |
|
| 248 | - $this->select_orderby(); |
|
| 249 | - } |
|
| 250 | - |
|
| 251 | - // grouper les resultats {fusion /x/y/z} ; |
|
| 252 | - if ($this->command['groupby']) { |
|
| 253 | - $this->select_groupby(); |
|
| 254 | - } |
|
| 255 | - |
|
| 256 | - $this->rewind(); |
|
| 257 | - #var_dump($this->tableau); |
|
| 258 | - } |
|
| 259 | - |
|
| 260 | - |
|
| 261 | - /** |
|
| 262 | - * Aller chercher les donnees de la boucle DATA |
|
| 263 | - * depuis une source |
|
| 264 | - * {source format, [URL], [arg2]...} |
|
| 265 | - */ |
|
| 266 | - protected function select_source() { |
|
| 267 | - # un peu crado : avant de charger le cache il faut charger |
|
| 268 | - # les class indispensables, sinon PHP ne saura pas gerer |
|
| 269 | - # l'objet en cache ; cf plugins/icalendar |
|
| 270 | - # perf : pas de fonction table_to_array ! (table est deja un array) |
|
| 271 | - if (isset($this->command['sourcemode']) |
|
| 272 | - and !in_array($this->command['sourcemode'], array('table', 'array', 'tableau')) |
|
| 273 | - ) { |
|
| 274 | - charger_fonction($this->command['sourcemode'] . '_to_array', 'inc', true); |
|
| 275 | - } |
|
| 276 | - |
|
| 277 | - # le premier argument peut etre un array, une URL etc. |
|
| 278 | - $src = $this->command['source'][0]; |
|
| 279 | - |
|
| 280 | - # avons-nous un cache dispo ? |
|
| 281 | - $cle = null; |
|
| 282 | - if (is_string($src)) { |
|
| 283 | - $cle = 'datasource_' . md5($this->command['sourcemode'] . ':' . var_export($this->command['source'], true)); |
|
| 284 | - } |
|
| 285 | - |
|
| 286 | - $cache = $this->cache_get($cle); |
|
| 287 | - if (isset($this->command['datacache'])) { |
|
| 288 | - $ttl = intval($this->command['datacache']); |
|
| 289 | - } |
|
| 290 | - if ($cache |
|
| 291 | - and ($cache['time'] + (isset($ttl) ? $ttl : $cache['ttl']) |
|
| 292 | - > time()) |
|
| 293 | - and !(_request('var_mode') === 'recalcul' |
|
| 294 | - and include_spip('inc/autoriser') |
|
| 295 | - and autoriser('recalcul') |
|
| 296 | - ) |
|
| 297 | - ) { |
|
| 298 | - $this->tableau = $cache['data']; |
|
| 299 | - } else { |
|
| 300 | - try { |
|
| 301 | - if (isset($this->command['sourcemode']) |
|
| 302 | - and in_array($this->command['sourcemode'], |
|
| 303 | - array('table', 'array', 'tableau')) |
|
| 304 | - ) { |
|
| 305 | - if (is_array($a = $src) |
|
| 306 | - or (is_string($a) |
|
| 307 | - and $a = str_replace('"', '"', $a) # fragile! |
|
| 308 | - and is_array($a = @unserialize($a))) |
|
| 309 | - ) { |
|
| 310 | - $this->tableau = $a; |
|
| 311 | - } |
|
| 312 | - } else { |
|
| 313 | - $data = $src; |
|
| 314 | - if (is_string($src)) { |
|
| 315 | - if (tester_url_absolue($src)) { |
|
| 316 | - include_spip('inc/distant'); |
|
| 317 | - $data = recuperer_url($src, ['taille_max' => _DATA_SOURCE_MAX_SIZE]); |
|
| 318 | - $data = $data['page'] ?? ''; |
|
| 319 | - if (!$data) { |
|
| 320 | - throw new Exception("404"); |
|
| 321 | - } |
|
| 322 | - if (!isset($ttl)) { |
|
| 323 | - $ttl = 24 * 3600; |
|
| 324 | - } |
|
| 325 | - } elseif (@is_dir($src)) { |
|
| 326 | - $data = $src; |
|
| 327 | - } elseif (@is_readable($src) && @is_file($src)) { |
|
| 328 | - $data = spip_file_get_contents($src); |
|
| 329 | - } |
|
| 330 | - if (!isset($ttl)) { |
|
| 331 | - $ttl = 10; |
|
| 332 | - } |
|
| 333 | - } |
|
| 334 | - |
|
| 335 | - if (!$this->err |
|
| 336 | - and $data_to_array = charger_fonction($this->command['sourcemode'] . '_to_array', 'inc', true) |
|
| 337 | - ) { |
|
| 338 | - $args = $this->command['source']; |
|
| 339 | - $args[0] = $data; |
|
| 340 | - if (is_array($a = $data_to_array(...$args))) { |
|
| 341 | - $this->tableau = $a; |
|
| 342 | - } |
|
| 343 | - } |
|
| 344 | - } |
|
| 345 | - |
|
| 346 | - if (!is_array($this->tableau)) { |
|
| 347 | - $this->err = true; |
|
| 348 | - } |
|
| 349 | - |
|
| 350 | - if (!$this->err and isset($ttl) and $ttl > 0) { |
|
| 351 | - $this->cache_set($cle, $ttl); |
|
| 352 | - } |
|
| 353 | - |
|
| 354 | - } catch (Exception $e) { |
|
| 355 | - $e = $e->getMessage(); |
|
| 356 | - $err = sprintf("[%s, %s] $e", |
|
| 357 | - $src, |
|
| 358 | - $this->command['sourcemode']); |
|
| 359 | - erreur_squelette(array($err, array())); |
|
| 360 | - $this->err = true; |
|
| 361 | - } |
|
| 362 | - } |
|
| 363 | - |
|
| 364 | - # en cas d'erreur, utiliser le cache si encore dispo |
|
| 365 | - if ($this->err |
|
| 366 | - and $cache |
|
| 367 | - ) { |
|
| 368 | - $this->tableau = $cache['data']; |
|
| 369 | - $this->err = false; |
|
| 370 | - } |
|
| 371 | - } |
|
| 372 | - |
|
| 373 | - |
|
| 374 | - /** |
|
| 375 | - * Retourne un tableau donne depuis un critère liste |
|
| 376 | - * |
|
| 377 | - * Critère `{liste X1, X2, X3}` |
|
| 378 | - * |
|
| 379 | - * @see critere_DATA_liste_dist() |
|
| 380 | - * |
|
| 381 | - **/ |
|
| 382 | - protected function select_liste() { |
|
| 383 | - # s'il n'y a qu'une valeur dans la liste, sans doute une #BALISE |
|
| 384 | - if (!isset($this->command['liste'][1])) { |
|
| 385 | - if (!is_array($this->command['liste'][0])) { |
|
| 386 | - $this->command['liste'] = explode(',', $this->command['liste'][0]); |
|
| 387 | - } else { |
|
| 388 | - $this->command['liste'] = $this->command['liste'][0]; |
|
| 389 | - } |
|
| 390 | - } |
|
| 391 | - $this->tableau = $this->command['liste']; |
|
| 392 | - } |
|
| 393 | - |
|
| 394 | - /** |
|
| 395 | - * Retourne un tableau donne depuis un critere liste |
|
| 396 | - * Critere {enum Xmin, Xmax} |
|
| 397 | - * |
|
| 398 | - **/ |
|
| 399 | - protected function select_enum() { |
|
| 400 | - # s'il n'y a qu'une valeur dans la liste, sans doute une #BALISE |
|
| 401 | - if (!isset($this->command['enum'][1])) { |
|
| 402 | - if (!is_array($this->command['enum'][0])) { |
|
| 403 | - $this->command['enum'] = explode(',', $this->command['enum'][0]); |
|
| 404 | - } else { |
|
| 405 | - $this->command['enum'] = $this->command['enum'][0]; |
|
| 406 | - } |
|
| 407 | - } |
|
| 408 | - if (count($this->command['enum']) >= 3) { |
|
| 409 | - $enum = range(array_shift($this->command['enum']), array_shift($this->command['enum']), |
|
| 410 | - array_shift($this->command['enum'])); |
|
| 411 | - } else { |
|
| 412 | - $enum = range(array_shift($this->command['enum']), array_shift($this->command['enum'])); |
|
| 413 | - } |
|
| 414 | - $this->tableau = $enum; |
|
| 415 | - } |
|
| 416 | - |
|
| 417 | - |
|
| 418 | - /** |
|
| 419 | - * extraire le chemin "query.results" du tableau de donnees |
|
| 420 | - * {datapath query.results} |
|
| 421 | - * |
|
| 422 | - **/ |
|
| 423 | - protected function select_datapath() { |
|
| 424 | - $base = reset($this->command['datapath']); |
|
| 425 | - if (strlen($base = ltrim(trim($base), "/"))) { |
|
| 426 | - $this->tableau = table_valeur($this->tableau, $base); |
|
| 427 | - if (!is_array($this->tableau)) { |
|
| 428 | - $this->tableau = array(); |
|
| 429 | - $this->err = true; |
|
| 430 | - spip_log("datapath '$base' absent"); |
|
| 431 | - } |
|
| 432 | - } |
|
| 433 | - } |
|
| 434 | - |
|
| 435 | - /** |
|
| 436 | - * Ordonner les resultats |
|
| 437 | - * {par x} |
|
| 438 | - * |
|
| 439 | - **/ |
|
| 440 | - protected function select_orderby() { |
|
| 441 | - $sortfunc = ''; |
|
| 442 | - $aleas = 0; |
|
| 443 | - foreach ($this->command['orderby'] as $tri) { |
|
| 444 | - // virer le / initial pour les criteres de la forme {par /xx} |
|
| 445 | - if (preg_match(',^\.?([/\w]+)( DESC)?$,iS', ltrim($tri, '/'), $r)) { |
|
| 446 | - $r = array_pad($r, 3, null); |
|
| 447 | - |
|
| 448 | - // tri par cle |
|
| 449 | - if ($r[1] == 'cle') { |
|
| 450 | - if (isset($r[2]) and $r[2]) { |
|
| 451 | - krsort($this->tableau); |
|
| 452 | - } else { |
|
| 453 | - ksort($this->tableau); |
|
| 454 | - } |
|
| 455 | - } # {par hasard} |
|
| 456 | - else { |
|
| 457 | - if ($r[1] == 'hasard') { |
|
| 458 | - $k = array_keys($this->tableau); |
|
| 459 | - shuffle($k); |
|
| 460 | - $v = array(); |
|
| 461 | - foreach ($k as $cle) { |
|
| 462 | - $v[$cle] = $this->tableau[$cle]; |
|
| 463 | - } |
|
| 464 | - $this->tableau = $v; |
|
| 465 | - } else { |
|
| 466 | - # {par valeur} |
|
| 467 | - if ($r[1] == 'valeur') { |
|
| 468 | - $tv = '%s'; |
|
| 469 | - } # {par valeur/xx/yy} ?? |
|
| 470 | - else { |
|
| 471 | - $tv = 'table_valeur(%s, ' . var_export($r[1], true) . ')'; |
|
| 472 | - } |
|
| 473 | - $sortfunc .= ' |
|
| 65 | + /** |
|
| 66 | + * tableau de donnees |
|
| 67 | + * |
|
| 68 | + * @var array |
|
| 69 | + */ |
|
| 70 | + protected $tableau = array(); |
|
| 71 | + |
|
| 72 | + /** |
|
| 73 | + * Conditions de filtrage |
|
| 74 | + * ie criteres de selection |
|
| 75 | + * |
|
| 76 | + * @var array |
|
| 77 | + */ |
|
| 78 | + protected $filtre = array(); |
|
| 79 | + |
|
| 80 | + |
|
| 81 | + /** |
|
| 82 | + * Cle courante |
|
| 83 | + * |
|
| 84 | + * @var null |
|
| 85 | + */ |
|
| 86 | + protected $cle = null; |
|
| 87 | + |
|
| 88 | + /** |
|
| 89 | + * Valeur courante |
|
| 90 | + * |
|
| 91 | + * @var null |
|
| 92 | + */ |
|
| 93 | + protected $valeur = null; |
|
| 94 | + |
|
| 95 | + /** |
|
| 96 | + * Erreur presente ? |
|
| 97 | + * |
|
| 98 | + * @var bool |
|
| 99 | + **/ |
|
| 100 | + public $err = false; |
|
| 101 | + |
|
| 102 | + /** |
|
| 103 | + * Calcul du total des elements |
|
| 104 | + * |
|
| 105 | + * @var int|null |
|
| 106 | + **/ |
|
| 107 | + public $total = null; |
|
| 108 | + |
|
| 109 | + /** |
|
| 110 | + * Constructeur |
|
| 111 | + * |
|
| 112 | + * @param $command |
|
| 113 | + * @param array $info |
|
| 114 | + */ |
|
| 115 | + public function __construct($command, $info = array()) { |
|
| 116 | + $this->type = 'DATA'; |
|
| 117 | + $this->command = $command; |
|
| 118 | + $this->info = $info; |
|
| 119 | + |
|
| 120 | + $this->select($command); |
|
| 121 | + } |
|
| 122 | + |
|
| 123 | + /** |
|
| 124 | + * Revenir au depart |
|
| 125 | + * |
|
| 126 | + * @return void |
|
| 127 | + */ |
|
| 128 | + public function rewind() { |
|
| 129 | + reset($this->tableau); |
|
| 130 | + $this->cle = key($this->tableau); |
|
| 131 | + $this->valeur = current($this->tableau); |
|
| 132 | + next($this->tableau); |
|
| 133 | + } |
|
| 134 | + |
|
| 135 | + /** |
|
| 136 | + * Déclarer les critères exceptions |
|
| 137 | + * |
|
| 138 | + * @return array |
|
| 139 | + */ |
|
| 140 | + public function exception_des_criteres() { |
|
| 141 | + return array('tableau'); |
|
| 142 | + } |
|
| 143 | + |
|
| 144 | + /** |
|
| 145 | + * Récupérer depuis le cache si possible |
|
| 146 | + * |
|
| 147 | + * @param string $cle |
|
| 148 | + * @return mixed |
|
| 149 | + */ |
|
| 150 | + protected function cache_get($cle) { |
|
| 151 | + if (!$cle) { |
|
| 152 | + return; |
|
| 153 | + } |
|
| 154 | + # utiliser memoization si dispo |
|
| 155 | + if (!function_exists('cache_get')) { |
|
| 156 | + return; |
|
| 157 | + } |
|
| 158 | + |
|
| 159 | + return cache_get($cle); |
|
| 160 | + } |
|
| 161 | + |
|
| 162 | + /** |
|
| 163 | + * Stocker en cache si possible |
|
| 164 | + * |
|
| 165 | + * @param string $cle |
|
| 166 | + * @param int $ttl |
|
| 167 | + * @param null|mixed $valeur |
|
| 168 | + * @return bool |
|
| 169 | + */ |
|
| 170 | + protected function cache_set($cle, $ttl, $valeur = null) { |
|
| 171 | + if (!$cle) { |
|
| 172 | + return; |
|
| 173 | + } |
|
| 174 | + if (is_null($valeur)) { |
|
| 175 | + $valeur = $this->tableau; |
|
| 176 | + } |
|
| 177 | + # utiliser memoization si dispo |
|
| 178 | + if (!function_exists('cache_set')) { |
|
| 179 | + return; |
|
| 180 | + } |
|
| 181 | + |
|
| 182 | + return cache_set($cle, |
|
| 183 | + array( |
|
| 184 | + 'data' => $valeur, |
|
| 185 | + 'time' => time(), |
|
| 186 | + 'ttl' => $ttl |
|
| 187 | + ), |
|
| 188 | + 3600 + $ttl); |
|
| 189 | + # conserver le cache 1h de plus que la validite demandee, |
|
| 190 | + # pour le cas ou le serveur distant ne reponde plus |
|
| 191 | + } |
|
| 192 | + |
|
| 193 | + /** |
|
| 194 | + * Aller chercher les données de la boucle DATA |
|
| 195 | + * |
|
| 196 | + * @throws Exception |
|
| 197 | + * @param array $command |
|
| 198 | + * @return void |
|
| 199 | + */ |
|
| 200 | + protected function select($command) { |
|
| 201 | + |
|
| 202 | + // l'iterateur DATA peut etre appele en passant (data:type) |
|
| 203 | + // le type se retrouve dans la commande 'from' |
|
| 204 | + // dans ce cas la le critere {source}, si present, n'a pas besoin du 1er argument |
|
| 205 | + if (isset($this->command['from'][0])) { |
|
| 206 | + if (isset($this->command['source']) and is_array($this->command['source'])) { |
|
| 207 | + array_unshift($this->command['source'], $this->command['sourcemode']); |
|
| 208 | + } |
|
| 209 | + $this->command['sourcemode'] = $this->command['from'][0]; |
|
| 210 | + } |
|
| 211 | + |
|
| 212 | + // cherchons differents moyens de creer le tableau de donnees |
|
| 213 | + // les commandes connues pour l'iterateur DATA |
|
| 214 | + // sont : {tableau #ARRAY} ; {cle=...} ; {valeur=...} |
|
| 215 | + |
|
| 216 | + // {source format, [URL], [arg2]...} |
|
| 217 | + if (isset($this->command['source']) |
|
| 218 | + and isset($this->command['sourcemode']) |
|
| 219 | + ) { |
|
| 220 | + $this->select_source(); |
|
| 221 | + } |
|
| 222 | + |
|
| 223 | + // Critere {liste X1, X2, X3} |
|
| 224 | + if (isset($this->command['liste'])) { |
|
| 225 | + $this->select_liste(); |
|
| 226 | + } |
|
| 227 | + if (isset($this->command['enum'])) { |
|
| 228 | + $this->select_enum(); |
|
| 229 | + } |
|
| 230 | + |
|
| 231 | + // Si a ce stade on n'a pas de table, il y a un bug |
|
| 232 | + if (!is_array($this->tableau)) { |
|
| 233 | + $this->err = true; |
|
| 234 | + spip_log("erreur datasource " . var_export($command, true)); |
|
| 235 | + } |
|
| 236 | + |
|
| 237 | + // {datapath query.results} |
|
| 238 | + // extraire le chemin "query.results" du tableau de donnees |
|
| 239 | + if (!$this->err |
|
| 240 | + and isset($this->command['datapath']) |
|
| 241 | + and is_array($this->command['datapath']) |
|
| 242 | + ) { |
|
| 243 | + $this->select_datapath(); |
|
| 244 | + } |
|
| 245 | + |
|
| 246 | + // tri {par x} |
|
| 247 | + if ($this->command['orderby']) { |
|
| 248 | + $this->select_orderby(); |
|
| 249 | + } |
|
| 250 | + |
|
| 251 | + // grouper les resultats {fusion /x/y/z} ; |
|
| 252 | + if ($this->command['groupby']) { |
|
| 253 | + $this->select_groupby(); |
|
| 254 | + } |
|
| 255 | + |
|
| 256 | + $this->rewind(); |
|
| 257 | + #var_dump($this->tableau); |
|
| 258 | + } |
|
| 259 | + |
|
| 260 | + |
|
| 261 | + /** |
|
| 262 | + * Aller chercher les donnees de la boucle DATA |
|
| 263 | + * depuis une source |
|
| 264 | + * {source format, [URL], [arg2]...} |
|
| 265 | + */ |
|
| 266 | + protected function select_source() { |
|
| 267 | + # un peu crado : avant de charger le cache il faut charger |
|
| 268 | + # les class indispensables, sinon PHP ne saura pas gerer |
|
| 269 | + # l'objet en cache ; cf plugins/icalendar |
|
| 270 | + # perf : pas de fonction table_to_array ! (table est deja un array) |
|
| 271 | + if (isset($this->command['sourcemode']) |
|
| 272 | + and !in_array($this->command['sourcemode'], array('table', 'array', 'tableau')) |
|
| 273 | + ) { |
|
| 274 | + charger_fonction($this->command['sourcemode'] . '_to_array', 'inc', true); |
|
| 275 | + } |
|
| 276 | + |
|
| 277 | + # le premier argument peut etre un array, une URL etc. |
|
| 278 | + $src = $this->command['source'][0]; |
|
| 279 | + |
|
| 280 | + # avons-nous un cache dispo ? |
|
| 281 | + $cle = null; |
|
| 282 | + if (is_string($src)) { |
|
| 283 | + $cle = 'datasource_' . md5($this->command['sourcemode'] . ':' . var_export($this->command['source'], true)); |
|
| 284 | + } |
|
| 285 | + |
|
| 286 | + $cache = $this->cache_get($cle); |
|
| 287 | + if (isset($this->command['datacache'])) { |
|
| 288 | + $ttl = intval($this->command['datacache']); |
|
| 289 | + } |
|
| 290 | + if ($cache |
|
| 291 | + and ($cache['time'] + (isset($ttl) ? $ttl : $cache['ttl']) |
|
| 292 | + > time()) |
|
| 293 | + and !(_request('var_mode') === 'recalcul' |
|
| 294 | + and include_spip('inc/autoriser') |
|
| 295 | + and autoriser('recalcul') |
|
| 296 | + ) |
|
| 297 | + ) { |
|
| 298 | + $this->tableau = $cache['data']; |
|
| 299 | + } else { |
|
| 300 | + try { |
|
| 301 | + if (isset($this->command['sourcemode']) |
|
| 302 | + and in_array($this->command['sourcemode'], |
|
| 303 | + array('table', 'array', 'tableau')) |
|
| 304 | + ) { |
|
| 305 | + if (is_array($a = $src) |
|
| 306 | + or (is_string($a) |
|
| 307 | + and $a = str_replace('"', '"', $a) # fragile! |
|
| 308 | + and is_array($a = @unserialize($a))) |
|
| 309 | + ) { |
|
| 310 | + $this->tableau = $a; |
|
| 311 | + } |
|
| 312 | + } else { |
|
| 313 | + $data = $src; |
|
| 314 | + if (is_string($src)) { |
|
| 315 | + if (tester_url_absolue($src)) { |
|
| 316 | + include_spip('inc/distant'); |
|
| 317 | + $data = recuperer_url($src, ['taille_max' => _DATA_SOURCE_MAX_SIZE]); |
|
| 318 | + $data = $data['page'] ?? ''; |
|
| 319 | + if (!$data) { |
|
| 320 | + throw new Exception("404"); |
|
| 321 | + } |
|
| 322 | + if (!isset($ttl)) { |
|
| 323 | + $ttl = 24 * 3600; |
|
| 324 | + } |
|
| 325 | + } elseif (@is_dir($src)) { |
|
| 326 | + $data = $src; |
|
| 327 | + } elseif (@is_readable($src) && @is_file($src)) { |
|
| 328 | + $data = spip_file_get_contents($src); |
|
| 329 | + } |
|
| 330 | + if (!isset($ttl)) { |
|
| 331 | + $ttl = 10; |
|
| 332 | + } |
|
| 333 | + } |
|
| 334 | + |
|
| 335 | + if (!$this->err |
|
| 336 | + and $data_to_array = charger_fonction($this->command['sourcemode'] . '_to_array', 'inc', true) |
|
| 337 | + ) { |
|
| 338 | + $args = $this->command['source']; |
|
| 339 | + $args[0] = $data; |
|
| 340 | + if (is_array($a = $data_to_array(...$args))) { |
|
| 341 | + $this->tableau = $a; |
|
| 342 | + } |
|
| 343 | + } |
|
| 344 | + } |
|
| 345 | + |
|
| 346 | + if (!is_array($this->tableau)) { |
|
| 347 | + $this->err = true; |
|
| 348 | + } |
|
| 349 | + |
|
| 350 | + if (!$this->err and isset($ttl) and $ttl > 0) { |
|
| 351 | + $this->cache_set($cle, $ttl); |
|
| 352 | + } |
|
| 353 | + |
|
| 354 | + } catch (Exception $e) { |
|
| 355 | + $e = $e->getMessage(); |
|
| 356 | + $err = sprintf("[%s, %s] $e", |
|
| 357 | + $src, |
|
| 358 | + $this->command['sourcemode']); |
|
| 359 | + erreur_squelette(array($err, array())); |
|
| 360 | + $this->err = true; |
|
| 361 | + } |
|
| 362 | + } |
|
| 363 | + |
|
| 364 | + # en cas d'erreur, utiliser le cache si encore dispo |
|
| 365 | + if ($this->err |
|
| 366 | + and $cache |
|
| 367 | + ) { |
|
| 368 | + $this->tableau = $cache['data']; |
|
| 369 | + $this->err = false; |
|
| 370 | + } |
|
| 371 | + } |
|
| 372 | + |
|
| 373 | + |
|
| 374 | + /** |
|
| 375 | + * Retourne un tableau donne depuis un critère liste |
|
| 376 | + * |
|
| 377 | + * Critère `{liste X1, X2, X3}` |
|
| 378 | + * |
|
| 379 | + * @see critere_DATA_liste_dist() |
|
| 380 | + * |
|
| 381 | + **/ |
|
| 382 | + protected function select_liste() { |
|
| 383 | + # s'il n'y a qu'une valeur dans la liste, sans doute une #BALISE |
|
| 384 | + if (!isset($this->command['liste'][1])) { |
|
| 385 | + if (!is_array($this->command['liste'][0])) { |
|
| 386 | + $this->command['liste'] = explode(',', $this->command['liste'][0]); |
|
| 387 | + } else { |
|
| 388 | + $this->command['liste'] = $this->command['liste'][0]; |
|
| 389 | + } |
|
| 390 | + } |
|
| 391 | + $this->tableau = $this->command['liste']; |
|
| 392 | + } |
|
| 393 | + |
|
| 394 | + /** |
|
| 395 | + * Retourne un tableau donne depuis un critere liste |
|
| 396 | + * Critere {enum Xmin, Xmax} |
|
| 397 | + * |
|
| 398 | + **/ |
|
| 399 | + protected function select_enum() { |
|
| 400 | + # s'il n'y a qu'une valeur dans la liste, sans doute une #BALISE |
|
| 401 | + if (!isset($this->command['enum'][1])) { |
|
| 402 | + if (!is_array($this->command['enum'][0])) { |
|
| 403 | + $this->command['enum'] = explode(',', $this->command['enum'][0]); |
|
| 404 | + } else { |
|
| 405 | + $this->command['enum'] = $this->command['enum'][0]; |
|
| 406 | + } |
|
| 407 | + } |
|
| 408 | + if (count($this->command['enum']) >= 3) { |
|
| 409 | + $enum = range(array_shift($this->command['enum']), array_shift($this->command['enum']), |
|
| 410 | + array_shift($this->command['enum'])); |
|
| 411 | + } else { |
|
| 412 | + $enum = range(array_shift($this->command['enum']), array_shift($this->command['enum'])); |
|
| 413 | + } |
|
| 414 | + $this->tableau = $enum; |
|
| 415 | + } |
|
| 416 | + |
|
| 417 | + |
|
| 418 | + /** |
|
| 419 | + * extraire le chemin "query.results" du tableau de donnees |
|
| 420 | + * {datapath query.results} |
|
| 421 | + * |
|
| 422 | + **/ |
|
| 423 | + protected function select_datapath() { |
|
| 424 | + $base = reset($this->command['datapath']); |
|
| 425 | + if (strlen($base = ltrim(trim($base), "/"))) { |
|
| 426 | + $this->tableau = table_valeur($this->tableau, $base); |
|
| 427 | + if (!is_array($this->tableau)) { |
|
| 428 | + $this->tableau = array(); |
|
| 429 | + $this->err = true; |
|
| 430 | + spip_log("datapath '$base' absent"); |
|
| 431 | + } |
|
| 432 | + } |
|
| 433 | + } |
|
| 434 | + |
|
| 435 | + /** |
|
| 436 | + * Ordonner les resultats |
|
| 437 | + * {par x} |
|
| 438 | + * |
|
| 439 | + **/ |
|
| 440 | + protected function select_orderby() { |
|
| 441 | + $sortfunc = ''; |
|
| 442 | + $aleas = 0; |
|
| 443 | + foreach ($this->command['orderby'] as $tri) { |
|
| 444 | + // virer le / initial pour les criteres de la forme {par /xx} |
|
| 445 | + if (preg_match(',^\.?([/\w]+)( DESC)?$,iS', ltrim($tri, '/'), $r)) { |
|
| 446 | + $r = array_pad($r, 3, null); |
|
| 447 | + |
|
| 448 | + // tri par cle |
|
| 449 | + if ($r[1] == 'cle') { |
|
| 450 | + if (isset($r[2]) and $r[2]) { |
|
| 451 | + krsort($this->tableau); |
|
| 452 | + } else { |
|
| 453 | + ksort($this->tableau); |
|
| 454 | + } |
|
| 455 | + } # {par hasard} |
|
| 456 | + else { |
|
| 457 | + if ($r[1] == 'hasard') { |
|
| 458 | + $k = array_keys($this->tableau); |
|
| 459 | + shuffle($k); |
|
| 460 | + $v = array(); |
|
| 461 | + foreach ($k as $cle) { |
|
| 462 | + $v[$cle] = $this->tableau[$cle]; |
|
| 463 | + } |
|
| 464 | + $this->tableau = $v; |
|
| 465 | + } else { |
|
| 466 | + # {par valeur} |
|
| 467 | + if ($r[1] == 'valeur') { |
|
| 468 | + $tv = '%s'; |
|
| 469 | + } # {par valeur/xx/yy} ?? |
|
| 470 | + else { |
|
| 471 | + $tv = 'table_valeur(%s, ' . var_export($r[1], true) . ')'; |
|
| 472 | + } |
|
| 473 | + $sortfunc .= ' |
|
| 474 | 474 | $a = ' . sprintf($tv, '$aa') . '; |
| 475 | 475 | $b = ' . sprintf($tv, '$bb') . '; |
| 476 | 476 | if ($a <> $b) |
| 477 | 477 | return ($a ' . (!empty($r[2]) ? '>' : '<') . ' $b) ? -1 : 1;'; |
| 478 | - } |
|
| 479 | - } |
|
| 480 | - } |
|
| 481 | - } |
|
| 482 | - |
|
| 483 | - if ($sortfunc) { |
|
| 484 | - $sortfunc .= "\n return 0;"; |
|
| 485 | - uasort($this->tableau, function($aa, $bb) use ($sortfunc) { |
|
| 486 | - return eval($sortfunc); |
|
| 487 | - }); |
|
| 488 | - } |
|
| 489 | - } |
|
| 490 | - |
|
| 491 | - |
|
| 492 | - /** |
|
| 493 | - * Grouper les resultats |
|
| 494 | - * {fusion /x/y/z} |
|
| 495 | - * |
|
| 496 | - **/ |
|
| 497 | - protected function select_groupby() { |
|
| 498 | - // virer le / initial pour les criteres de la forme {fusion /xx} |
|
| 499 | - if (strlen($fusion = ltrim($this->command['groupby'][0], '/'))) { |
|
| 500 | - $vu = array(); |
|
| 501 | - foreach ($this->tableau as $k => $v) { |
|
| 502 | - $val = table_valeur($v, $fusion); |
|
| 503 | - if (isset($vu[$val])) { |
|
| 504 | - unset($this->tableau[$k]); |
|
| 505 | - } else { |
|
| 506 | - $vu[$val] = true; |
|
| 507 | - } |
|
| 508 | - } |
|
| 509 | - } |
|
| 510 | - } |
|
| 511 | - |
|
| 512 | - |
|
| 513 | - /** |
|
| 514 | - * L'iterateur est-il encore valide ? |
|
| 515 | - * |
|
| 516 | - * @return bool |
|
| 517 | - */ |
|
| 518 | - public function valid() { |
|
| 519 | - return !is_null($this->cle); |
|
| 520 | - } |
|
| 521 | - |
|
| 522 | - /** |
|
| 523 | - * Retourner la valeur |
|
| 524 | - * |
|
| 525 | - * @return null |
|
| 526 | - */ |
|
| 527 | - public function current() { |
|
| 528 | - return $this->valeur; |
|
| 529 | - } |
|
| 530 | - |
|
| 531 | - /** |
|
| 532 | - * Retourner la cle |
|
| 533 | - * |
|
| 534 | - * @return null |
|
| 535 | - */ |
|
| 536 | - public function key() { |
|
| 537 | - return $this->cle; |
|
| 538 | - } |
|
| 539 | - |
|
| 540 | - /** |
|
| 541 | - * Passer a la valeur suivante |
|
| 542 | - * |
|
| 543 | - * @return void |
|
| 544 | - */ |
|
| 545 | - public function next() { |
|
| 546 | - if ($this->valid()) { |
|
| 547 | - $this->cle = key($this->tableau); |
|
| 548 | - $this->valeur = current($this->tableau); |
|
| 549 | - next($this->tableau); |
|
| 550 | - } |
|
| 551 | - } |
|
| 552 | - |
|
| 553 | - /** |
|
| 554 | - * Compter le nombre total de resultats |
|
| 555 | - * |
|
| 556 | - * @return int |
|
| 557 | - */ |
|
| 558 | - public function count() { |
|
| 559 | - if (is_null($this->total)) { |
|
| 560 | - $this->total = count($this->tableau); |
|
| 561 | - } |
|
| 562 | - |
|
| 563 | - return $this->total; |
|
| 564 | - } |
|
| 478 | + } |
|
| 479 | + } |
|
| 480 | + } |
|
| 481 | + } |
|
| 482 | + |
|
| 483 | + if ($sortfunc) { |
|
| 484 | + $sortfunc .= "\n return 0;"; |
|
| 485 | + uasort($this->tableau, function($aa, $bb) use ($sortfunc) { |
|
| 486 | + return eval($sortfunc); |
|
| 487 | + }); |
|
| 488 | + } |
|
| 489 | + } |
|
| 490 | + |
|
| 491 | + |
|
| 492 | + /** |
|
| 493 | + * Grouper les resultats |
|
| 494 | + * {fusion /x/y/z} |
|
| 495 | + * |
|
| 496 | + **/ |
|
| 497 | + protected function select_groupby() { |
|
| 498 | + // virer le / initial pour les criteres de la forme {fusion /xx} |
|
| 499 | + if (strlen($fusion = ltrim($this->command['groupby'][0], '/'))) { |
|
| 500 | + $vu = array(); |
|
| 501 | + foreach ($this->tableau as $k => $v) { |
|
| 502 | + $val = table_valeur($v, $fusion); |
|
| 503 | + if (isset($vu[$val])) { |
|
| 504 | + unset($this->tableau[$k]); |
|
| 505 | + } else { |
|
| 506 | + $vu[$val] = true; |
|
| 507 | + } |
|
| 508 | + } |
|
| 509 | + } |
|
| 510 | + } |
|
| 511 | + |
|
| 512 | + |
|
| 513 | + /** |
|
| 514 | + * L'iterateur est-il encore valide ? |
|
| 515 | + * |
|
| 516 | + * @return bool |
|
| 517 | + */ |
|
| 518 | + public function valid() { |
|
| 519 | + return !is_null($this->cle); |
|
| 520 | + } |
|
| 521 | + |
|
| 522 | + /** |
|
| 523 | + * Retourner la valeur |
|
| 524 | + * |
|
| 525 | + * @return null |
|
| 526 | + */ |
|
| 527 | + public function current() { |
|
| 528 | + return $this->valeur; |
|
| 529 | + } |
|
| 530 | + |
|
| 531 | + /** |
|
| 532 | + * Retourner la cle |
|
| 533 | + * |
|
| 534 | + * @return null |
|
| 535 | + */ |
|
| 536 | + public function key() { |
|
| 537 | + return $this->cle; |
|
| 538 | + } |
|
| 539 | + |
|
| 540 | + /** |
|
| 541 | + * Passer a la valeur suivante |
|
| 542 | + * |
|
| 543 | + * @return void |
|
| 544 | + */ |
|
| 545 | + public function next() { |
|
| 546 | + if ($this->valid()) { |
|
| 547 | + $this->cle = key($this->tableau); |
|
| 548 | + $this->valeur = current($this->tableau); |
|
| 549 | + next($this->tableau); |
|
| 550 | + } |
|
| 551 | + } |
|
| 552 | + |
|
| 553 | + /** |
|
| 554 | + * Compter le nombre total de resultats |
|
| 555 | + * |
|
| 556 | + * @return int |
|
| 557 | + */ |
|
| 558 | + public function count() { |
|
| 559 | + if (is_null($this->total)) { |
|
| 560 | + $this->total = count($this->tableau); |
|
| 561 | + } |
|
| 562 | + |
|
| 563 | + return $this->total; |
|
| 564 | + } |
|
| 565 | 565 | } |
| 566 | 566 | |
| 567 | 567 | /* |
@@ -575,7 +575,7 @@ discard block |
||
| 575 | 575 | * @return array |
| 576 | 576 | */ |
| 577 | 577 | function inc_file_to_array_dist($data) { |
| 578 | - return preg_split('/\r?\n/', $data); |
|
| 578 | + return preg_split('/\r?\n/', $data); |
|
| 579 | 579 | } |
| 580 | 580 | |
| 581 | 581 | /** |
@@ -584,9 +584,9 @@ discard block |
||
| 584 | 584 | * @return array |
| 585 | 585 | */ |
| 586 | 586 | function inc_plugins_to_array_dist() { |
| 587 | - include_spip('inc/plugin'); |
|
| 587 | + include_spip('inc/plugin'); |
|
| 588 | 588 | |
| 589 | - return liste_chemin_plugin_actifs(); |
|
| 589 | + return liste_chemin_plugin_actifs(); |
|
| 590 | 590 | } |
| 591 | 591 | |
| 592 | 592 | /** |
@@ -596,7 +596,7 @@ discard block |
||
| 596 | 596 | * @return array |
| 597 | 597 | */ |
| 598 | 598 | function inc_xml_to_array_dist($data) { |
| 599 | - return @XMLObjectToArray(new SimpleXmlIterator($data)); |
|
| 599 | + return @XMLObjectToArray(new SimpleXmlIterator($data)); |
|
| 600 | 600 | } |
| 601 | 601 | |
| 602 | 602 | /** |
@@ -608,14 +608,14 @@ discard block |
||
| 608 | 608 | * |
| 609 | 609 | */ |
| 610 | 610 | function inc_object_to_array($object) { |
| 611 | - if (!is_object($object) && !is_array($object)) { |
|
| 612 | - return $object; |
|
| 613 | - } |
|
| 614 | - if (is_object($object)) { |
|
| 615 | - $object = get_object_vars($object); |
|
| 616 | - } |
|
| 617 | - |
|
| 618 | - return array_map('inc_object_to_array', $object); |
|
| 611 | + if (!is_object($object) && !is_array($object)) { |
|
| 612 | + return $object; |
|
| 613 | + } |
|
| 614 | + if (is_object($object)) { |
|
| 615 | + $object = get_object_vars($object); |
|
| 616 | + } |
|
| 617 | + |
|
| 618 | + return array_map('inc_object_to_array', $object); |
|
| 619 | 619 | } |
| 620 | 620 | |
| 621 | 621 | /** |
@@ -625,20 +625,20 @@ discard block |
||
| 625 | 625 | * @return array|bool |
| 626 | 626 | */ |
| 627 | 627 | function inc_sql_to_array_dist($data) { |
| 628 | - # sortir le connecteur de $data |
|
| 629 | - preg_match(',^(?:(\w+):)?(.*)$,Sm', $data, $v); |
|
| 630 | - $serveur = (string)$v[1]; |
|
| 631 | - $req = trim($v[2]); |
|
| 632 | - if ($s = sql_query($req, $serveur)) { |
|
| 633 | - $r = array(); |
|
| 634 | - while ($t = sql_fetch($s)) { |
|
| 635 | - $r[] = $t; |
|
| 636 | - } |
|
| 637 | - |
|
| 638 | - return $r; |
|
| 639 | - } |
|
| 640 | - |
|
| 641 | - return false; |
|
| 628 | + # sortir le connecteur de $data |
|
| 629 | + preg_match(',^(?:(\w+):)?(.*)$,Sm', $data, $v); |
|
| 630 | + $serveur = (string)$v[1]; |
|
| 631 | + $req = trim($v[2]); |
|
| 632 | + if ($s = sql_query($req, $serveur)) { |
|
| 633 | + $r = array(); |
|
| 634 | + while ($t = sql_fetch($s)) { |
|
| 635 | + $r[] = $t; |
|
| 636 | + } |
|
| 637 | + |
|
| 638 | + return $r; |
|
| 639 | + } |
|
| 640 | + |
|
| 641 | + return false; |
|
| 642 | 642 | } |
| 643 | 643 | |
| 644 | 644 | /** |
@@ -648,9 +648,9 @@ discard block |
||
| 648 | 648 | * @return array|bool |
| 649 | 649 | */ |
| 650 | 650 | function inc_json_to_array_dist($data) { |
| 651 | - if (is_array($json = json_decode($data, true))) { |
|
| 652 | - return (array)$json; |
|
| 653 | - } |
|
| 651 | + if (is_array($json = json_decode($data, true))) { |
|
| 652 | + return (array)$json; |
|
| 653 | + } |
|
| 654 | 654 | } |
| 655 | 655 | |
| 656 | 656 | /** |
@@ -660,30 +660,30 @@ discard block |
||
| 660 | 660 | * @return array|bool |
| 661 | 661 | */ |
| 662 | 662 | function inc_csv_to_array_dist($data) { |
| 663 | - include_spip('inc/csv'); |
|
| 664 | - list($entete, $csv) = analyse_csv($data); |
|
| 665 | - array_unshift($csv, $entete); |
|
| 666 | - |
|
| 667 | - include_spip('inc/charsets'); |
|
| 668 | - $i = 1; |
|
| 669 | - foreach ($entete as $k => $v) { |
|
| 670 | - if (trim($v) == "") { |
|
| 671 | - $v = "col" . $i; |
|
| 672 | - } // reperer des eventuelles cases vides |
|
| 673 | - if (is_numeric($v) and $v < 0) { |
|
| 674 | - $v = "__" . $v; |
|
| 675 | - } // ne pas risquer d'ecraser une cle numerique |
|
| 676 | - if (is_numeric($v)) { |
|
| 677 | - $v = "_" . $v; |
|
| 678 | - } // ne pas risquer d'ecraser une cle numerique |
|
| 679 | - $v = strtolower(preg_replace(',\W+,', '_', translitteration($v))); |
|
| 680 | - foreach ($csv as &$item) { |
|
| 681 | - $item[$v] = &$item[$k]; |
|
| 682 | - } |
|
| 683 | - $i++; |
|
| 684 | - } |
|
| 685 | - |
|
| 686 | - return $csv; |
|
| 663 | + include_spip('inc/csv'); |
|
| 664 | + list($entete, $csv) = analyse_csv($data); |
|
| 665 | + array_unshift($csv, $entete); |
|
| 666 | + |
|
| 667 | + include_spip('inc/charsets'); |
|
| 668 | + $i = 1; |
|
| 669 | + foreach ($entete as $k => $v) { |
|
| 670 | + if (trim($v) == "") { |
|
| 671 | + $v = "col" . $i; |
|
| 672 | + } // reperer des eventuelles cases vides |
|
| 673 | + if (is_numeric($v) and $v < 0) { |
|
| 674 | + $v = "__" . $v; |
|
| 675 | + } // ne pas risquer d'ecraser une cle numerique |
|
| 676 | + if (is_numeric($v)) { |
|
| 677 | + $v = "_" . $v; |
|
| 678 | + } // ne pas risquer d'ecraser une cle numerique |
|
| 679 | + $v = strtolower(preg_replace(',\W+,', '_', translitteration($v))); |
|
| 680 | + foreach ($csv as &$item) { |
|
| 681 | + $item[$v] = &$item[$k]; |
|
| 682 | + } |
|
| 683 | + $i++; |
|
| 684 | + } |
|
| 685 | + |
|
| 686 | + return $csv; |
|
| 687 | 687 | } |
| 688 | 688 | |
| 689 | 689 | /** |
@@ -693,12 +693,12 @@ discard block |
||
| 693 | 693 | * @return array|bool |
| 694 | 694 | */ |
| 695 | 695 | function inc_rss_to_array_dist($data) { |
| 696 | - include_spip('inc/syndic'); |
|
| 697 | - if (is_array($rss = analyser_backend($data))) { |
|
| 698 | - $tableau = $rss; |
|
| 699 | - } |
|
| 696 | + include_spip('inc/syndic'); |
|
| 697 | + if (is_array($rss = analyser_backend($data))) { |
|
| 698 | + $tableau = $rss; |
|
| 699 | + } |
|
| 700 | 700 | |
| 701 | - return $tableau; |
|
| 701 | + return $tableau; |
|
| 702 | 702 | } |
| 703 | 703 | |
| 704 | 704 | /** |
@@ -708,9 +708,9 @@ discard block |
||
| 708 | 708 | * @return array|bool |
| 709 | 709 | */ |
| 710 | 710 | function inc_atom_to_array_dist($data) { |
| 711 | - $rss_to_array = charger_fonction('rss_to_array', 'inc'); |
|
| 711 | + $rss_to_array = charger_fonction('rss_to_array', 'inc'); |
|
| 712 | 712 | |
| 713 | - return $rss_to_array($data); |
|
| 713 | + return $rss_to_array($data); |
|
| 714 | 714 | } |
| 715 | 715 | |
| 716 | 716 | /** |
@@ -721,11 +721,11 @@ discard block |
||
| 721 | 721 | * @return array|bool |
| 722 | 722 | */ |
| 723 | 723 | function inc_glob_to_array_dist($data) { |
| 724 | - $a = glob($data, |
|
| 725 | - GLOB_MARK | GLOB_NOSORT | GLOB_BRACE |
|
| 726 | - ); |
|
| 724 | + $a = glob($data, |
|
| 725 | + GLOB_MARK | GLOB_NOSORT | GLOB_BRACE |
|
| 726 | + ); |
|
| 727 | 727 | |
| 728 | - return $a ? $a : array(); |
|
| 728 | + return $a ? $a : array(); |
|
| 729 | 729 | } |
| 730 | 730 | |
| 731 | 731 | /** |
@@ -736,14 +736,14 @@ discard block |
||
| 736 | 736 | * @throws Exception |
| 737 | 737 | */ |
| 738 | 738 | function inc_yaml_to_array_dist($data) { |
| 739 | - include_spip('inc/yaml-mini'); |
|
| 740 | - if (!function_exists("yaml_decode")) { |
|
| 741 | - throw new Exception('YAML: impossible de trouver la fonction yaml_decode'); |
|
| 739 | + include_spip('inc/yaml-mini'); |
|
| 740 | + if (!function_exists("yaml_decode")) { |
|
| 741 | + throw new Exception('YAML: impossible de trouver la fonction yaml_decode'); |
|
| 742 | 742 | |
| 743 | - return false; |
|
| 744 | - } |
|
| 743 | + return false; |
|
| 744 | + } |
|
| 745 | 745 | |
| 746 | - return yaml_decode($data); |
|
| 746 | + return yaml_decode($data); |
|
| 747 | 747 | } |
| 748 | 748 | |
| 749 | 749 | |
@@ -758,7 +758,7 @@ discard block |
||
| 758 | 758 | * @return array|bool |
| 759 | 759 | */ |
| 760 | 760 | function inc_pregfiles_to_array_dist($dir, $regexp = -1, $limit = 10000) { |
| 761 | - return (array)preg_files($dir, $regexp, $limit); |
|
| 761 | + return (array)preg_files($dir, $regexp, $limit); |
|
| 762 | 762 | } |
| 763 | 763 | |
| 764 | 764 | /** |
@@ -770,23 +770,23 @@ discard block |
||
| 770 | 770 | * @return array|bool |
| 771 | 771 | */ |
| 772 | 772 | function inc_ls_to_array_dist($data) { |
| 773 | - $glob_to_array = charger_fonction('glob_to_array', 'inc'); |
|
| 774 | - $a = $glob_to_array($data); |
|
| 775 | - foreach ($a as &$v) { |
|
| 776 | - $b = (array)@stat($v); |
|
| 777 | - foreach ($b as $k => $ignore) { |
|
| 778 | - if (is_numeric($k)) { |
|
| 779 | - unset($b[$k]); |
|
| 780 | - } |
|
| 781 | - } |
|
| 782 | - $b['file'] = preg_replace('`/$`','',$v) ; |
|
| 783 | - $v = array_merge( |
|
| 784 | - pathinfo($v), |
|
| 785 | - $b |
|
| 786 | - ); |
|
| 787 | - } |
|
| 788 | - |
|
| 789 | - return $a; |
|
| 773 | + $glob_to_array = charger_fonction('glob_to_array', 'inc'); |
|
| 774 | + $a = $glob_to_array($data); |
|
| 775 | + foreach ($a as &$v) { |
|
| 776 | + $b = (array)@stat($v); |
|
| 777 | + foreach ($b as $k => $ignore) { |
|
| 778 | + if (is_numeric($k)) { |
|
| 779 | + unset($b[$k]); |
|
| 780 | + } |
|
| 781 | + } |
|
| 782 | + $b['file'] = preg_replace('`/$`','',$v) ; |
|
| 783 | + $v = array_merge( |
|
| 784 | + pathinfo($v), |
|
| 785 | + $b |
|
| 786 | + ); |
|
| 787 | + } |
|
| 788 | + |
|
| 789 | + return $a; |
|
| 790 | 790 | } |
| 791 | 791 | |
| 792 | 792 | /** |
@@ -796,24 +796,24 @@ discard block |
||
| 796 | 796 | * @return array|bool |
| 797 | 797 | */ |
| 798 | 798 | function XMLObjectToArray($object) { |
| 799 | - $xml_array = array(); |
|
| 800 | - for ($object->rewind(); $object->valid(); $object->next()) { |
|
| 801 | - if (array_key_exists($key = $object->key(), $xml_array)) { |
|
| 802 | - $key .= '-' . uniqid(); |
|
| 803 | - } |
|
| 804 | - $vars = get_object_vars($object->current()); |
|
| 805 | - if (isset($vars['@attributes'])) { |
|
| 806 | - foreach ($vars['@attributes'] as $k => $v) { |
|
| 807 | - $xml_array[$key][$k] = $v; |
|
| 808 | - } |
|
| 809 | - } |
|
| 810 | - if ($object->hasChildren()) { |
|
| 811 | - $xml_array[$key][] = XMLObjectToArray( |
|
| 812 | - $object->current()); |
|
| 813 | - } else { |
|
| 814 | - $xml_array[$key][] = strval($object->current()); |
|
| 815 | - } |
|
| 816 | - } |
|
| 817 | - |
|
| 818 | - return $xml_array; |
|
| 799 | + $xml_array = array(); |
|
| 800 | + for ($object->rewind(); $object->valid(); $object->next()) { |
|
| 801 | + if (array_key_exists($key = $object->key(), $xml_array)) { |
|
| 802 | + $key .= '-' . uniqid(); |
|
| 803 | + } |
|
| 804 | + $vars = get_object_vars($object->current()); |
|
| 805 | + if (isset($vars['@attributes'])) { |
|
| 806 | + foreach ($vars['@attributes'] as $k => $v) { |
|
| 807 | + $xml_array[$key][$k] = $v; |
|
| 808 | + } |
|
| 809 | + } |
|
| 810 | + if ($object->hasChildren()) { |
|
| 811 | + $xml_array[$key][] = XMLObjectToArray( |
|
| 812 | + $object->current()); |
|
| 813 | + } else { |
|
| 814 | + $xml_array[$key][] = strval($object->current()); |
|
| 815 | + } |
|
| 816 | + } |
|
| 817 | + |
|
| 818 | + return $xml_array; |
|
| 819 | 819 | } |
@@ -457,6 +457,10 @@ |
||
| 457 | 457 | * aller a la position $n en parcourant |
| 458 | 458 | * un par un tous les elements |
| 459 | 459 | */ |
| 460 | + |
|
| 461 | + /** |
|
| 462 | + * @param integer $n |
|
| 463 | + */ |
|
| 460 | 464 | private function seek_loop($n) { |
| 461 | 465 | if ($this->pos > $n) { |
| 462 | 466 | $this->rewind(); |
@@ -79,9 +79,9 @@ discard block |
||
| 79 | 79 | // chercher la classe d'iterateur |
| 80 | 80 | // IterateurXXX |
| 81 | 81 | // definie dans le fichier iterateurs/xxx.php |
| 82 | - $class = "Iterateur" . $iterateur; |
|
| 82 | + $class = "Iterateur".$iterateur; |
|
| 83 | 83 | if (!class_exists($class)) { |
| 84 | - if (!include_spip("iterateur/" . strtolower($iterateur)) |
|
| 84 | + if (!include_spip("iterateur/".strtolower($iterateur)) |
|
| 85 | 85 | or !class_exists($class) |
| 86 | 86 | ) { |
| 87 | 87 | die("Iterateur $iterateur non trouvé"); |
@@ -208,7 +208,7 @@ discard block |
||
| 208 | 208 | return $this->iter->$nom(); |
| 209 | 209 | } catch (Exception $e) { |
| 210 | 210 | // #GETCHILDREN sur un fichier de DirectoryIterator ... |
| 211 | - spip_log("Methode $nom en echec sur " . get_class($this->iter)); |
|
| 211 | + spip_log("Methode $nom en echec sur ".get_class($this->iter)); |
|
| 212 | 212 | spip_log("Cela peut être normal : retour d'une ligne de resultat ne pouvant pas calculer cette methode"); |
| 213 | 213 | |
| 214 | 214 | return ''; |
@@ -290,8 +290,8 @@ discard block |
||
| 290 | 290 | |
| 291 | 291 | // Creer la fonction de filtrage sur $this |
| 292 | 292 | if ($this->filtre) { |
| 293 | - $filtres = 'return (' . join(') AND (', $this->filtre) . ');'; |
|
| 294 | - $this->func_filtre = function () use ($filtres) { |
|
| 293 | + $filtres = 'return ('.join(') AND (', $this->filtre).');'; |
|
| 294 | + $this->func_filtre = function() use ($filtres) { |
|
| 295 | 295 | return eval($filtres); |
| 296 | 296 | }; |
| 297 | 297 | } |
@@ -313,28 +313,28 @@ discard block |
||
| 313 | 313 | # if (!in_array($cle, array('cle', 'valeur'))) |
| 314 | 314 | # return; |
| 315 | 315 | |
| 316 | - $a = '$this->get_select(\'' . $cle . '\')'; |
|
| 316 | + $a = '$this->get_select(\''.$cle.'\')'; |
|
| 317 | 317 | |
| 318 | 318 | $filtre = ''; |
| 319 | 319 | |
| 320 | 320 | if ($op == 'REGEXP') { |
| 321 | - $filtre = 'filtrer("match", ' . $a . ', ' . str_replace('\"', '"', $valeur) . ')'; |
|
| 321 | + $filtre = 'filtrer("match", '.$a.', '.str_replace('\"', '"', $valeur).')'; |
|
| 322 | 322 | $op = ''; |
| 323 | 323 | } else { |
| 324 | 324 | if ($op == 'LIKE') { |
| 325 | 325 | $valeur = str_replace(array('\"', '_', '%'), array('"', '.', '.*'), preg_quote($valeur)); |
| 326 | - $filtre = 'filtrer("match", ' . $a . ', ' . $valeur . ')'; |
|
| 326 | + $filtre = 'filtrer("match", '.$a.', '.$valeur.')'; |
|
| 327 | 327 | $op = ''; |
| 328 | 328 | } else { |
| 329 | 329 | if ($op == '=') { |
| 330 | 330 | $op = '=='; |
| 331 | 331 | } else { |
| 332 | 332 | if ($op == 'IN') { |
| 333 | - $filtre = 'in_array(' . $a . ', array' . $valeur . ')'; |
|
| 333 | + $filtre = 'in_array('.$a.', array'.$valeur.')'; |
|
| 334 | 334 | $op = ''; |
| 335 | 335 | } else { |
| 336 | 336 | if (!in_array($op, array('<', '<=', '>', '>='))) { |
| 337 | - spip_log('operateur non reconnu ' . $op); // [todo] mettre une erreur de squelette |
|
| 337 | + spip_log('operateur non reconnu '.$op); // [todo] mettre une erreur de squelette |
|
| 338 | 338 | $op = ''; |
| 339 | 339 | } |
| 340 | 340 | } |
@@ -343,7 +343,7 @@ discard block |
||
| 343 | 343 | } |
| 344 | 344 | |
| 345 | 345 | if ($op) { |
| 346 | - $filtre = $a . $op . str_replace('\"', '"', $valeur); |
|
| 346 | + $filtre = $a.$op.str_replace('\"', '"', $valeur); |
|
| 347 | 347 | } |
| 348 | 348 | |
| 349 | 349 | if ($not) { |
@@ -12,7 +12,7 @@ discard block |
||
| 12 | 12 | \***************************************************************************/ |
| 13 | 13 | |
| 14 | 14 | if (!defined('_ECRIRE_INC_VERSION')) { |
| 15 | - return; |
|
| 15 | + return; |
|
| 16 | 16 | } |
| 17 | 17 | |
| 18 | 18 | /** |
@@ -22,578 +22,578 @@ discard block |
||
| 22 | 22 | * |
| 23 | 23 | */ |
| 24 | 24 | class IterFactory { |
| 25 | - public static function create($iterateur, $command, $info = null) { |
|
| 26 | - |
|
| 27 | - // cas des SI {si expression} analises tres tot |
|
| 28 | - // pour eviter le chargement de tout iterateur |
|
| 29 | - if (isset($command['si'])) { |
|
| 30 | - foreach ($command['si'] as $si) { |
|
| 31 | - if (!$si) { |
|
| 32 | - // $command pour boucle SQL peut generer des erreurs de compilation |
|
| 33 | - // s'il est transmis alors qu'on est dans un iterateur vide |
|
| 34 | - return new IterDecorator(new EmptyIterator(), array(), $info); |
|
| 35 | - } |
|
| 36 | - } |
|
| 37 | - } |
|
| 38 | - |
|
| 39 | - // chercher un iterateur PHP existant (par exemple dans SPL) |
|
| 40 | - // (il faudrait passer l'argument ->sql_serveur |
|
| 41 | - // pour etre certain qu'on est sur un "php:") |
|
| 42 | - if (class_exists($iterateur)) { |
|
| 43 | - $a = isset($command['args']) ? $command['args'] : array(); |
|
| 44 | - |
|
| 45 | - // permettre de passer un Iterateur directement {args #ITERATEUR} : |
|
| 46 | - // si on recoit deja un iterateur en argument, on l'utilise |
|
| 47 | - if (count($a) == 1 and is_object($a[0]) and is_subclass_of($a[0], 'Iterator')) { |
|
| 48 | - $iter = $a[0]; |
|
| 49 | - |
|
| 50 | - // sinon, on cree un iterateur du type donne |
|
| 51 | - } else { |
|
| 52 | - // arguments de creation de l'iterateur... |
|
| 53 | - // (pas glop) |
|
| 54 | - try { |
|
| 55 | - switch (count($a)) { |
|
| 56 | - case 0: |
|
| 57 | - $iter = new $iterateur(); |
|
| 58 | - break; |
|
| 59 | - case 1: |
|
| 60 | - $iter = new $iterateur($a[0]); |
|
| 61 | - break; |
|
| 62 | - case 2: |
|
| 63 | - $iter = new $iterateur($a[0], $a[1]); |
|
| 64 | - break; |
|
| 65 | - case 3: |
|
| 66 | - $iter = new $iterateur($a[0], $a[1], $a[2]); |
|
| 67 | - break; |
|
| 68 | - case 4: |
|
| 69 | - $iter = new $iterateur($a[0], $a[1], $a[2], $a[3]); |
|
| 70 | - break; |
|
| 71 | - } |
|
| 72 | - } catch (Exception $e) { |
|
| 73 | - spip_log("Erreur de chargement de l'iterateur $iterateur"); |
|
| 74 | - spip_log($e->getMessage()); |
|
| 75 | - $iter = new EmptyIterator(); |
|
| 76 | - } |
|
| 77 | - } |
|
| 78 | - } else { |
|
| 79 | - // chercher la classe d'iterateur |
|
| 80 | - // IterateurXXX |
|
| 81 | - // definie dans le fichier iterateurs/xxx.php |
|
| 82 | - $class = "Iterateur" . $iterateur; |
|
| 83 | - if (!class_exists($class)) { |
|
| 84 | - if (!include_spip("iterateur/" . strtolower($iterateur)) |
|
| 85 | - or !class_exists($class) |
|
| 86 | - ) { |
|
| 87 | - die("Iterateur $iterateur non trouvé"); |
|
| 88 | - // si l'iterateur n'existe pas, on se rabat sur le generique |
|
| 89 | - # $iter = new EmptyIterator(); |
|
| 90 | - } |
|
| 91 | - } |
|
| 92 | - $iter = new $class($command, $info); |
|
| 93 | - } |
|
| 94 | - |
|
| 95 | - return new IterDecorator($iter, $command, $info); |
|
| 96 | - } |
|
| 25 | + public static function create($iterateur, $command, $info = null) { |
|
| 26 | + |
|
| 27 | + // cas des SI {si expression} analises tres tot |
|
| 28 | + // pour eviter le chargement de tout iterateur |
|
| 29 | + if (isset($command['si'])) { |
|
| 30 | + foreach ($command['si'] as $si) { |
|
| 31 | + if (!$si) { |
|
| 32 | + // $command pour boucle SQL peut generer des erreurs de compilation |
|
| 33 | + // s'il est transmis alors qu'on est dans un iterateur vide |
|
| 34 | + return new IterDecorator(new EmptyIterator(), array(), $info); |
|
| 35 | + } |
|
| 36 | + } |
|
| 37 | + } |
|
| 38 | + |
|
| 39 | + // chercher un iterateur PHP existant (par exemple dans SPL) |
|
| 40 | + // (il faudrait passer l'argument ->sql_serveur |
|
| 41 | + // pour etre certain qu'on est sur un "php:") |
|
| 42 | + if (class_exists($iterateur)) { |
|
| 43 | + $a = isset($command['args']) ? $command['args'] : array(); |
|
| 44 | + |
|
| 45 | + // permettre de passer un Iterateur directement {args #ITERATEUR} : |
|
| 46 | + // si on recoit deja un iterateur en argument, on l'utilise |
|
| 47 | + if (count($a) == 1 and is_object($a[0]) and is_subclass_of($a[0], 'Iterator')) { |
|
| 48 | + $iter = $a[0]; |
|
| 49 | + |
|
| 50 | + // sinon, on cree un iterateur du type donne |
|
| 51 | + } else { |
|
| 52 | + // arguments de creation de l'iterateur... |
|
| 53 | + // (pas glop) |
|
| 54 | + try { |
|
| 55 | + switch (count($a)) { |
|
| 56 | + case 0: |
|
| 57 | + $iter = new $iterateur(); |
|
| 58 | + break; |
|
| 59 | + case 1: |
|
| 60 | + $iter = new $iterateur($a[0]); |
|
| 61 | + break; |
|
| 62 | + case 2: |
|
| 63 | + $iter = new $iterateur($a[0], $a[1]); |
|
| 64 | + break; |
|
| 65 | + case 3: |
|
| 66 | + $iter = new $iterateur($a[0], $a[1], $a[2]); |
|
| 67 | + break; |
|
| 68 | + case 4: |
|
| 69 | + $iter = new $iterateur($a[0], $a[1], $a[2], $a[3]); |
|
| 70 | + break; |
|
| 71 | + } |
|
| 72 | + } catch (Exception $e) { |
|
| 73 | + spip_log("Erreur de chargement de l'iterateur $iterateur"); |
|
| 74 | + spip_log($e->getMessage()); |
|
| 75 | + $iter = new EmptyIterator(); |
|
| 76 | + } |
|
| 77 | + } |
|
| 78 | + } else { |
|
| 79 | + // chercher la classe d'iterateur |
|
| 80 | + // IterateurXXX |
|
| 81 | + // definie dans le fichier iterateurs/xxx.php |
|
| 82 | + $class = "Iterateur" . $iterateur; |
|
| 83 | + if (!class_exists($class)) { |
|
| 84 | + if (!include_spip("iterateur/" . strtolower($iterateur)) |
|
| 85 | + or !class_exists($class) |
|
| 86 | + ) { |
|
| 87 | + die("Iterateur $iterateur non trouvé"); |
|
| 88 | + // si l'iterateur n'existe pas, on se rabat sur le generique |
|
| 89 | + # $iter = new EmptyIterator(); |
|
| 90 | + } |
|
| 91 | + } |
|
| 92 | + $iter = new $class($command, $info); |
|
| 93 | + } |
|
| 94 | + |
|
| 95 | + return new IterDecorator($iter, $command, $info); |
|
| 96 | + } |
|
| 97 | 97 | } |
| 98 | 98 | |
| 99 | 99 | |
| 100 | 100 | class IterDecorator extends FilterIterator { |
| 101 | - private $iter; |
|
| 102 | - |
|
| 103 | - /** |
|
| 104 | - * Conditions de filtrage |
|
| 105 | - * ie criteres de selection |
|
| 106 | - * |
|
| 107 | - * @var array |
|
| 108 | - */ |
|
| 109 | - protected $filtre = array(); |
|
| 110 | - |
|
| 111 | - /** |
|
| 112 | - * Fonction de filtrage compilee a partir des criteres de filtre |
|
| 113 | - * |
|
| 114 | - * @var string |
|
| 115 | - */ |
|
| 116 | - protected $func_filtre = null; |
|
| 117 | - |
|
| 118 | - /** |
|
| 119 | - * Critere {offset, limit} |
|
| 120 | - * |
|
| 121 | - * @var int |
|
| 122 | - * @var int |
|
| 123 | - */ |
|
| 124 | - protected $offset = null; |
|
| 125 | - protected $limit = null; |
|
| 126 | - |
|
| 127 | - /** |
|
| 128 | - * nombre d'elements recuperes depuis la position 0, |
|
| 129 | - * en tenant compte des filtres |
|
| 130 | - * |
|
| 131 | - * @var int |
|
| 132 | - */ |
|
| 133 | - protected $fetched = 0; |
|
| 134 | - |
|
| 135 | - /** |
|
| 136 | - * Y a t'il une erreur ? |
|
| 137 | - * |
|
| 138 | - * @var bool |
|
| 139 | - **/ |
|
| 140 | - protected $err = false; |
|
| 141 | - |
|
| 142 | - /** |
|
| 143 | - * Drapeau a activer en cas d'echec |
|
| 144 | - * (select SQL errone, non chargement des DATA, etc) |
|
| 145 | - */ |
|
| 146 | - public function err() { |
|
| 147 | - if (method_exists($this->iter, 'err')) { |
|
| 148 | - return $this->iter->err(); |
|
| 149 | - } |
|
| 150 | - if (property_exists($this->iter, 'err')) { |
|
| 151 | - return $this->iter->err; |
|
| 152 | - } |
|
| 153 | - |
|
| 154 | - return false; |
|
| 155 | - } |
|
| 156 | - |
|
| 157 | - public function __construct(Iterator $iter, $command, $info) { |
|
| 158 | - parent::__construct($iter); |
|
| 159 | - parent::rewind(); // remettre a la premiere position (bug? connu de FilterIterator) |
|
| 160 | - |
|
| 161 | - // recuperer l'iterateur transmis |
|
| 162 | - $this->iter = $this->getInnerIterator(); |
|
| 163 | - $this->command = $command; |
|
| 164 | - $this->info = $info; |
|
| 165 | - $this->pos = 0; |
|
| 166 | - $this->fetched = 0; |
|
| 167 | - |
|
| 168 | - // chercher la liste des champs a retourner par |
|
| 169 | - // fetch si l'objet ne les calcule pas tout seul |
|
| 170 | - if (!method_exists($this->iter, 'fetch')) { |
|
| 171 | - $this->calculer_select(); |
|
| 172 | - $this->calculer_filtres(); |
|
| 173 | - } |
|
| 174 | - |
|
| 175 | - // emptyIterator critere {si} faux n'a pas d'erreur ! |
|
| 176 | - if (isset($this->iter->err)) { |
|
| 177 | - $this->err = $this->iter->err; |
|
| 178 | - } |
|
| 179 | - |
|
| 180 | - // pas d'init a priori, le calcul ne sera fait qu'en cas de besoin (provoque une double requete souvent inutile en sqlite) |
|
| 181 | - //$this->total = $this->count(); |
|
| 182 | - } |
|
| 183 | - |
|
| 184 | - |
|
| 185 | - // calcule les elements a retournes par fetch() |
|
| 186 | - // enleve les elements inutiles du select() |
|
| 187 | - // |
|
| 188 | - private function calculer_select() { |
|
| 189 | - if ($select = &$this->command['select']) { |
|
| 190 | - foreach ($select as $s) { |
|
| 191 | - // /!\ $s = '.nom' |
|
| 192 | - if ($s[0] == '.') { |
|
| 193 | - $s = substr($s, 1); |
|
| 194 | - } |
|
| 195 | - $this->select[] = $s; |
|
| 196 | - } |
|
| 197 | - } |
|
| 198 | - } |
|
| 199 | - |
|
| 200 | - // recuperer la valeur d'une balise #X |
|
| 201 | - // en fonction des methodes |
|
| 202 | - // et proprietes disponibles |
|
| 203 | - public function get_select($nom) { |
|
| 204 | - if (is_object($this->iter) |
|
| 205 | - and method_exists($this->iter, $nom) |
|
| 206 | - ) { |
|
| 207 | - try { |
|
| 208 | - return $this->iter->$nom(); |
|
| 209 | - } catch (Exception $e) { |
|
| 210 | - // #GETCHILDREN sur un fichier de DirectoryIterator ... |
|
| 211 | - spip_log("Methode $nom en echec sur " . get_class($this->iter)); |
|
| 212 | - spip_log("Cela peut être normal : retour d'une ligne de resultat ne pouvant pas calculer cette methode"); |
|
| 213 | - |
|
| 214 | - return ''; |
|
| 215 | - } |
|
| 216 | - } |
|
| 217 | - /* |
|
| 101 | + private $iter; |
|
| 102 | + |
|
| 103 | + /** |
|
| 104 | + * Conditions de filtrage |
|
| 105 | + * ie criteres de selection |
|
| 106 | + * |
|
| 107 | + * @var array |
|
| 108 | + */ |
|
| 109 | + protected $filtre = array(); |
|
| 110 | + |
|
| 111 | + /** |
|
| 112 | + * Fonction de filtrage compilee a partir des criteres de filtre |
|
| 113 | + * |
|
| 114 | + * @var string |
|
| 115 | + */ |
|
| 116 | + protected $func_filtre = null; |
|
| 117 | + |
|
| 118 | + /** |
|
| 119 | + * Critere {offset, limit} |
|
| 120 | + * |
|
| 121 | + * @var int |
|
| 122 | + * @var int |
|
| 123 | + */ |
|
| 124 | + protected $offset = null; |
|
| 125 | + protected $limit = null; |
|
| 126 | + |
|
| 127 | + /** |
|
| 128 | + * nombre d'elements recuperes depuis la position 0, |
|
| 129 | + * en tenant compte des filtres |
|
| 130 | + * |
|
| 131 | + * @var int |
|
| 132 | + */ |
|
| 133 | + protected $fetched = 0; |
|
| 134 | + |
|
| 135 | + /** |
|
| 136 | + * Y a t'il une erreur ? |
|
| 137 | + * |
|
| 138 | + * @var bool |
|
| 139 | + **/ |
|
| 140 | + protected $err = false; |
|
| 141 | + |
|
| 142 | + /** |
|
| 143 | + * Drapeau a activer en cas d'echec |
|
| 144 | + * (select SQL errone, non chargement des DATA, etc) |
|
| 145 | + */ |
|
| 146 | + public function err() { |
|
| 147 | + if (method_exists($this->iter, 'err')) { |
|
| 148 | + return $this->iter->err(); |
|
| 149 | + } |
|
| 150 | + if (property_exists($this->iter, 'err')) { |
|
| 151 | + return $this->iter->err; |
|
| 152 | + } |
|
| 153 | + |
|
| 154 | + return false; |
|
| 155 | + } |
|
| 156 | + |
|
| 157 | + public function __construct(Iterator $iter, $command, $info) { |
|
| 158 | + parent::__construct($iter); |
|
| 159 | + parent::rewind(); // remettre a la premiere position (bug? connu de FilterIterator) |
|
| 160 | + |
|
| 161 | + // recuperer l'iterateur transmis |
|
| 162 | + $this->iter = $this->getInnerIterator(); |
|
| 163 | + $this->command = $command; |
|
| 164 | + $this->info = $info; |
|
| 165 | + $this->pos = 0; |
|
| 166 | + $this->fetched = 0; |
|
| 167 | + |
|
| 168 | + // chercher la liste des champs a retourner par |
|
| 169 | + // fetch si l'objet ne les calcule pas tout seul |
|
| 170 | + if (!method_exists($this->iter, 'fetch')) { |
|
| 171 | + $this->calculer_select(); |
|
| 172 | + $this->calculer_filtres(); |
|
| 173 | + } |
|
| 174 | + |
|
| 175 | + // emptyIterator critere {si} faux n'a pas d'erreur ! |
|
| 176 | + if (isset($this->iter->err)) { |
|
| 177 | + $this->err = $this->iter->err; |
|
| 178 | + } |
|
| 179 | + |
|
| 180 | + // pas d'init a priori, le calcul ne sera fait qu'en cas de besoin (provoque une double requete souvent inutile en sqlite) |
|
| 181 | + //$this->total = $this->count(); |
|
| 182 | + } |
|
| 183 | + |
|
| 184 | + |
|
| 185 | + // calcule les elements a retournes par fetch() |
|
| 186 | + // enleve les elements inutiles du select() |
|
| 187 | + // |
|
| 188 | + private function calculer_select() { |
|
| 189 | + if ($select = &$this->command['select']) { |
|
| 190 | + foreach ($select as $s) { |
|
| 191 | + // /!\ $s = '.nom' |
|
| 192 | + if ($s[0] == '.') { |
|
| 193 | + $s = substr($s, 1); |
|
| 194 | + } |
|
| 195 | + $this->select[] = $s; |
|
| 196 | + } |
|
| 197 | + } |
|
| 198 | + } |
|
| 199 | + |
|
| 200 | + // recuperer la valeur d'une balise #X |
|
| 201 | + // en fonction des methodes |
|
| 202 | + // et proprietes disponibles |
|
| 203 | + public function get_select($nom) { |
|
| 204 | + if (is_object($this->iter) |
|
| 205 | + and method_exists($this->iter, $nom) |
|
| 206 | + ) { |
|
| 207 | + try { |
|
| 208 | + return $this->iter->$nom(); |
|
| 209 | + } catch (Exception $e) { |
|
| 210 | + // #GETCHILDREN sur un fichier de DirectoryIterator ... |
|
| 211 | + spip_log("Methode $nom en echec sur " . get_class($this->iter)); |
|
| 212 | + spip_log("Cela peut être normal : retour d'une ligne de resultat ne pouvant pas calculer cette methode"); |
|
| 213 | + |
|
| 214 | + return ''; |
|
| 215 | + } |
|
| 216 | + } |
|
| 217 | + /* |
|
| 218 | 218 | if (property_exists($this->iter, $nom)) { |
| 219 | 219 | return $this->iter->$nom; |
| 220 | 220 | }*/ |
| 221 | - // cle et valeur par defaut |
|
| 222 | - // ICI PLANTAGE SI ON NE CONTROLE PAS $nom |
|
| 223 | - if (in_array($nom, array('cle', 'valeur')) |
|
| 224 | - and method_exists($this, $nom) |
|
| 225 | - ) { |
|
| 226 | - return $this->$nom(); |
|
| 227 | - } |
|
| 228 | - |
|
| 229 | - // Par defaut chercher en xpath dans la valeur() |
|
| 230 | - return table_valeur($this->valeur(), $nom, null); |
|
| 231 | - } |
|
| 232 | - |
|
| 233 | - |
|
| 234 | - private function calculer_filtres() { |
|
| 235 | - |
|
| 236 | - // Issu de calculer_select() de public/composer L.519 |
|
| 237 | - // TODO: externaliser... |
|
| 238 | - // |
|
| 239 | - // retirer les criteres vides: |
|
| 240 | - // {X ?} avec X absent de l'URL |
|
| 241 | - // {par #ENV{X}} avec X absent de l'URL |
|
| 242 | - // IN sur collection vide (ce dernier devrait pouvoir etre fait a la compil) |
|
| 243 | - if ($where = &$this->command['where']) { |
|
| 244 | - foreach ($where as $k => $v) { |
|
| 245 | - if (is_array($v)) { |
|
| 246 | - if ((count($v) >= 2) && ($v[0] == 'REGEXP') && ($v[2] == "'.*'")) { |
|
| 247 | - $op = false; |
|
| 248 | - } elseif ((count($v) >= 2) && ($v[0] == 'LIKE') && ($v[2] == "'%'")) { |
|
| 249 | - $op = false; |
|
| 250 | - } else { |
|
| 251 | - $op = $v[0] ? $v[0] : $v; |
|
| 252 | - } |
|
| 253 | - } else { |
|
| 254 | - $op = $v; |
|
| 255 | - } |
|
| 256 | - if ((!$op) or ($op == 1) or ($op == '0=0')) { |
|
| 257 | - unset($where[$k]); |
|
| 258 | - } |
|
| 259 | - // traiter {cle IN a,b} ou {valeur !IN a,b} |
|
| 260 | - if (preg_match(',^\(([\w/]+)(\s+NOT)?\s+IN\s+(\(.*\))\)$,', $op, $regs)) { |
|
| 261 | - $this->ajouter_filtre($regs[1], 'IN', $regs[3], $regs[2]); |
|
| 262 | - unset($op, $where[$k]); |
|
| 263 | - } |
|
| 264 | - } |
|
| 265 | - foreach ($where as $k => $v) { |
|
| 266 | - // 3 possibilites : count($v) = |
|
| 267 | - // * 1 : {x y} ; on recoit $v[0] = y |
|
| 268 | - // * 2 : {x !op y} ; on recoit $v[0] = 'NOT', $v[1] = array() // array du type {x op y} |
|
| 269 | - // * 3 : {x op y} ; on recoit $v[0] = 'op', $v[1] = x, $v[2] = y |
|
| 270 | - |
|
| 271 | - // 1 : forcement traite par un critere, on passe |
|
| 272 | - if (!$v or count($v) == 1) { |
|
| 273 | - continue; |
|
| 274 | - } |
|
| 275 | - if (count($v) == 2 and is_array($v[1])) { |
|
| 276 | - $this->ajouter_filtre($v[1][1], $v[1][0], $v[1][2], 'NOT'); |
|
| 277 | - } |
|
| 278 | - if (count($v) == 3) { |
|
| 279 | - $this->ajouter_filtre($v[1], $v[0], $v[2]); |
|
| 280 | - } |
|
| 281 | - } |
|
| 282 | - } |
|
| 283 | - |
|
| 284 | - // critere {2,7} |
|
| 285 | - if (isset($this->command['limit']) and $this->command['limit']) { |
|
| 286 | - $limit = explode(',', $this->command['limit']); |
|
| 287 | - $this->offset = $limit[0]; |
|
| 288 | - $this->limit = $limit[1]; |
|
| 289 | - } |
|
| 290 | - |
|
| 291 | - // Creer la fonction de filtrage sur $this |
|
| 292 | - if ($this->filtre) { |
|
| 293 | - $filtres = 'return (' . join(') AND (', $this->filtre) . ');'; |
|
| 294 | - $this->func_filtre = function () use ($filtres) { |
|
| 295 | - return eval($filtres); |
|
| 296 | - }; |
|
| 297 | - } |
|
| 298 | - } |
|
| 299 | - |
|
| 300 | - |
|
| 301 | - protected function ajouter_filtre($cle, $op, $valeur, $not = false) { |
|
| 302 | - if (method_exists($this->iter, 'exception_des_criteres')) { |
|
| 303 | - if (in_array($cle, $this->iter->exception_des_criteres())) { |
|
| 304 | - return; |
|
| 305 | - } |
|
| 306 | - } |
|
| 307 | - // TODO: analyser le filtre pour refuser ce qu'on ne sait pas traiter ? |
|
| 308 | - # mais c'est normalement deja opere par calculer_critere_infixe() |
|
| 309 | - # qui regarde la description 'desc' (en casse reelle d'ailleurs : {isDir=1} |
|
| 310 | - # ne sera pas vu si l'on a defini desc['field']['isdir'] pour que #ISDIR soit present. |
|
| 311 | - # il faudrait peut etre definir les 2 champs isDir et isdir... a reflechir... |
|
| 312 | - |
|
| 313 | - # if (!in_array($cle, array('cle', 'valeur'))) |
|
| 314 | - # return; |
|
| 315 | - |
|
| 316 | - $a = '$this->get_select(\'' . $cle . '\')'; |
|
| 317 | - |
|
| 318 | - $filtre = ''; |
|
| 319 | - |
|
| 320 | - if ($op == 'REGEXP') { |
|
| 321 | - $filtre = 'filtrer("match", ' . $a . ', ' . str_replace('\"', '"', $valeur) . ')'; |
|
| 322 | - $op = ''; |
|
| 323 | - } else { |
|
| 324 | - if ($op == 'LIKE') { |
|
| 325 | - $valeur = str_replace(array('\"', '_', '%'), array('"', '.', '.*'), preg_quote($valeur)); |
|
| 326 | - $filtre = 'filtrer("match", ' . $a . ', ' . $valeur . ')'; |
|
| 327 | - $op = ''; |
|
| 328 | - } else { |
|
| 329 | - if ($op == '=') { |
|
| 330 | - $op = '=='; |
|
| 331 | - } else { |
|
| 332 | - if ($op == 'IN') { |
|
| 333 | - $filtre = 'in_array(' . $a . ', array' . $valeur . ')'; |
|
| 334 | - $op = ''; |
|
| 335 | - } else { |
|
| 336 | - if (!in_array($op, array('<', '<=', '>', '>='))) { |
|
| 337 | - spip_log('operateur non reconnu ' . $op); // [todo] mettre une erreur de squelette |
|
| 338 | - $op = ''; |
|
| 339 | - } |
|
| 340 | - } |
|
| 341 | - } |
|
| 342 | - } |
|
| 343 | - } |
|
| 344 | - |
|
| 345 | - if ($op) { |
|
| 346 | - $filtre = $a . $op . str_replace('\"', '"', $valeur); |
|
| 347 | - } |
|
| 348 | - |
|
| 349 | - if ($not) { |
|
| 350 | - $filtre = "!($filtre)"; |
|
| 351 | - } |
|
| 352 | - |
|
| 353 | - if ($filtre) { |
|
| 354 | - $this->filtre[] = $filtre; |
|
| 355 | - } |
|
| 356 | - } |
|
| 357 | - |
|
| 358 | - |
|
| 359 | - public function next() { |
|
| 360 | - $this->pos++; |
|
| 361 | - parent::next(); |
|
| 362 | - } |
|
| 363 | - |
|
| 364 | - /** |
|
| 365 | - * revient au depart |
|
| 366 | - * |
|
| 367 | - * @return void |
|
| 368 | - */ |
|
| 369 | - public function rewind() { |
|
| 370 | - $this->pos = 0; |
|
| 371 | - $this->fetched = 0; |
|
| 372 | - parent::rewind(); |
|
| 373 | - } |
|
| 374 | - |
|
| 375 | - |
|
| 376 | - # Extension SPIP des iterateurs PHP |
|
| 377 | - /** |
|
| 378 | - * type de l'iterateur |
|
| 379 | - * |
|
| 380 | - * @var string |
|
| 381 | - */ |
|
| 382 | - protected $type; |
|
| 383 | - |
|
| 384 | - /** |
|
| 385 | - * parametres de l'iterateur |
|
| 386 | - * |
|
| 387 | - * @var array |
|
| 388 | - */ |
|
| 389 | - protected $command; |
|
| 390 | - |
|
| 391 | - /** |
|
| 392 | - * infos de compilateur |
|
| 393 | - * |
|
| 394 | - * @var array |
|
| 395 | - */ |
|
| 396 | - protected $info; |
|
| 397 | - |
|
| 398 | - /** |
|
| 399 | - * position courante de l'iterateur |
|
| 400 | - * |
|
| 401 | - * @var int |
|
| 402 | - */ |
|
| 403 | - protected $pos = null; |
|
| 404 | - |
|
| 405 | - /** |
|
| 406 | - * nombre total resultats dans l'iterateur |
|
| 407 | - * |
|
| 408 | - * @var int |
|
| 409 | - */ |
|
| 410 | - protected $total = null; |
|
| 411 | - |
|
| 412 | - /** |
|
| 413 | - * nombre maximal de recherche pour $total |
|
| 414 | - * si l'iterateur n'implemente pas de fonction specifique |
|
| 415 | - */ |
|
| 416 | - protected $max = 100000; |
|
| 417 | - |
|
| 418 | - |
|
| 419 | - /** |
|
| 420 | - * Liste des champs a inserer dans les $row |
|
| 421 | - * retournes par ->fetch() |
|
| 422 | - */ |
|
| 423 | - protected $select = array(); |
|
| 424 | - |
|
| 425 | - |
|
| 426 | - /** |
|
| 427 | - * aller a la position absolue n, |
|
| 428 | - * comptee depuis le debut |
|
| 429 | - * |
|
| 430 | - * @param int $n |
|
| 431 | - * absolute pos |
|
| 432 | - * @param string $continue |
|
| 433 | - * param for sql_ api |
|
| 434 | - * @return bool |
|
| 435 | - * success or fail if not implemented |
|
| 436 | - */ |
|
| 437 | - public function seek($n = 0, $continue = null) { |
|
| 438 | - if ($this->func_filtre or !method_exists($this->iter, 'seek') or !$this->iter->seek($n)) { |
|
| 439 | - $this->seek_loop($n); |
|
| 440 | - } |
|
| 441 | - $this->pos = $n; |
|
| 442 | - $this->fetched = $n; |
|
| 443 | - |
|
| 444 | - return true; |
|
| 445 | - } |
|
| 446 | - |
|
| 447 | - /* |
|
| 221 | + // cle et valeur par defaut |
|
| 222 | + // ICI PLANTAGE SI ON NE CONTROLE PAS $nom |
|
| 223 | + if (in_array($nom, array('cle', 'valeur')) |
|
| 224 | + and method_exists($this, $nom) |
|
| 225 | + ) { |
|
| 226 | + return $this->$nom(); |
|
| 227 | + } |
|
| 228 | + |
|
| 229 | + // Par defaut chercher en xpath dans la valeur() |
|
| 230 | + return table_valeur($this->valeur(), $nom, null); |
|
| 231 | + } |
|
| 232 | + |
|
| 233 | + |
|
| 234 | + private function calculer_filtres() { |
|
| 235 | + |
|
| 236 | + // Issu de calculer_select() de public/composer L.519 |
|
| 237 | + // TODO: externaliser... |
|
| 238 | + // |
|
| 239 | + // retirer les criteres vides: |
|
| 240 | + // {X ?} avec X absent de l'URL |
|
| 241 | + // {par #ENV{X}} avec X absent de l'URL |
|
| 242 | + // IN sur collection vide (ce dernier devrait pouvoir etre fait a la compil) |
|
| 243 | + if ($where = &$this->command['where']) { |
|
| 244 | + foreach ($where as $k => $v) { |
|
| 245 | + if (is_array($v)) { |
|
| 246 | + if ((count($v) >= 2) && ($v[0] == 'REGEXP') && ($v[2] == "'.*'")) { |
|
| 247 | + $op = false; |
|
| 248 | + } elseif ((count($v) >= 2) && ($v[0] == 'LIKE') && ($v[2] == "'%'")) { |
|
| 249 | + $op = false; |
|
| 250 | + } else { |
|
| 251 | + $op = $v[0] ? $v[0] : $v; |
|
| 252 | + } |
|
| 253 | + } else { |
|
| 254 | + $op = $v; |
|
| 255 | + } |
|
| 256 | + if ((!$op) or ($op == 1) or ($op == '0=0')) { |
|
| 257 | + unset($where[$k]); |
|
| 258 | + } |
|
| 259 | + // traiter {cle IN a,b} ou {valeur !IN a,b} |
|
| 260 | + if (preg_match(',^\(([\w/]+)(\s+NOT)?\s+IN\s+(\(.*\))\)$,', $op, $regs)) { |
|
| 261 | + $this->ajouter_filtre($regs[1], 'IN', $regs[3], $regs[2]); |
|
| 262 | + unset($op, $where[$k]); |
|
| 263 | + } |
|
| 264 | + } |
|
| 265 | + foreach ($where as $k => $v) { |
|
| 266 | + // 3 possibilites : count($v) = |
|
| 267 | + // * 1 : {x y} ; on recoit $v[0] = y |
|
| 268 | + // * 2 : {x !op y} ; on recoit $v[0] = 'NOT', $v[1] = array() // array du type {x op y} |
|
| 269 | + // * 3 : {x op y} ; on recoit $v[0] = 'op', $v[1] = x, $v[2] = y |
|
| 270 | + |
|
| 271 | + // 1 : forcement traite par un critere, on passe |
|
| 272 | + if (!$v or count($v) == 1) { |
|
| 273 | + continue; |
|
| 274 | + } |
|
| 275 | + if (count($v) == 2 and is_array($v[1])) { |
|
| 276 | + $this->ajouter_filtre($v[1][1], $v[1][0], $v[1][2], 'NOT'); |
|
| 277 | + } |
|
| 278 | + if (count($v) == 3) { |
|
| 279 | + $this->ajouter_filtre($v[1], $v[0], $v[2]); |
|
| 280 | + } |
|
| 281 | + } |
|
| 282 | + } |
|
| 283 | + |
|
| 284 | + // critere {2,7} |
|
| 285 | + if (isset($this->command['limit']) and $this->command['limit']) { |
|
| 286 | + $limit = explode(',', $this->command['limit']); |
|
| 287 | + $this->offset = $limit[0]; |
|
| 288 | + $this->limit = $limit[1]; |
|
| 289 | + } |
|
| 290 | + |
|
| 291 | + // Creer la fonction de filtrage sur $this |
|
| 292 | + if ($this->filtre) { |
|
| 293 | + $filtres = 'return (' . join(') AND (', $this->filtre) . ');'; |
|
| 294 | + $this->func_filtre = function () use ($filtres) { |
|
| 295 | + return eval($filtres); |
|
| 296 | + }; |
|
| 297 | + } |
|
| 298 | + } |
|
| 299 | + |
|
| 300 | + |
|
| 301 | + protected function ajouter_filtre($cle, $op, $valeur, $not = false) { |
|
| 302 | + if (method_exists($this->iter, 'exception_des_criteres')) { |
|
| 303 | + if (in_array($cle, $this->iter->exception_des_criteres())) { |
|
| 304 | + return; |
|
| 305 | + } |
|
| 306 | + } |
|
| 307 | + // TODO: analyser le filtre pour refuser ce qu'on ne sait pas traiter ? |
|
| 308 | + # mais c'est normalement deja opere par calculer_critere_infixe() |
|
| 309 | + # qui regarde la description 'desc' (en casse reelle d'ailleurs : {isDir=1} |
|
| 310 | + # ne sera pas vu si l'on a defini desc['field']['isdir'] pour que #ISDIR soit present. |
|
| 311 | + # il faudrait peut etre definir les 2 champs isDir et isdir... a reflechir... |
|
| 312 | + |
|
| 313 | + # if (!in_array($cle, array('cle', 'valeur'))) |
|
| 314 | + # return; |
|
| 315 | + |
|
| 316 | + $a = '$this->get_select(\'' . $cle . '\')'; |
|
| 317 | + |
|
| 318 | + $filtre = ''; |
|
| 319 | + |
|
| 320 | + if ($op == 'REGEXP') { |
|
| 321 | + $filtre = 'filtrer("match", ' . $a . ', ' . str_replace('\"', '"', $valeur) . ')'; |
|
| 322 | + $op = ''; |
|
| 323 | + } else { |
|
| 324 | + if ($op == 'LIKE') { |
|
| 325 | + $valeur = str_replace(array('\"', '_', '%'), array('"', '.', '.*'), preg_quote($valeur)); |
|
| 326 | + $filtre = 'filtrer("match", ' . $a . ', ' . $valeur . ')'; |
|
| 327 | + $op = ''; |
|
| 328 | + } else { |
|
| 329 | + if ($op == '=') { |
|
| 330 | + $op = '=='; |
|
| 331 | + } else { |
|
| 332 | + if ($op == 'IN') { |
|
| 333 | + $filtre = 'in_array(' . $a . ', array' . $valeur . ')'; |
|
| 334 | + $op = ''; |
|
| 335 | + } else { |
|
| 336 | + if (!in_array($op, array('<', '<=', '>', '>='))) { |
|
| 337 | + spip_log('operateur non reconnu ' . $op); // [todo] mettre une erreur de squelette |
|
| 338 | + $op = ''; |
|
| 339 | + } |
|
| 340 | + } |
|
| 341 | + } |
|
| 342 | + } |
|
| 343 | + } |
|
| 344 | + |
|
| 345 | + if ($op) { |
|
| 346 | + $filtre = $a . $op . str_replace('\"', '"', $valeur); |
|
| 347 | + } |
|
| 348 | + |
|
| 349 | + if ($not) { |
|
| 350 | + $filtre = "!($filtre)"; |
|
| 351 | + } |
|
| 352 | + |
|
| 353 | + if ($filtre) { |
|
| 354 | + $this->filtre[] = $filtre; |
|
| 355 | + } |
|
| 356 | + } |
|
| 357 | + |
|
| 358 | + |
|
| 359 | + public function next() { |
|
| 360 | + $this->pos++; |
|
| 361 | + parent::next(); |
|
| 362 | + } |
|
| 363 | + |
|
| 364 | + /** |
|
| 365 | + * revient au depart |
|
| 366 | + * |
|
| 367 | + * @return void |
|
| 368 | + */ |
|
| 369 | + public function rewind() { |
|
| 370 | + $this->pos = 0; |
|
| 371 | + $this->fetched = 0; |
|
| 372 | + parent::rewind(); |
|
| 373 | + } |
|
| 374 | + |
|
| 375 | + |
|
| 376 | + # Extension SPIP des iterateurs PHP |
|
| 377 | + /** |
|
| 378 | + * type de l'iterateur |
|
| 379 | + * |
|
| 380 | + * @var string |
|
| 381 | + */ |
|
| 382 | + protected $type; |
|
| 383 | + |
|
| 384 | + /** |
|
| 385 | + * parametres de l'iterateur |
|
| 386 | + * |
|
| 387 | + * @var array |
|
| 388 | + */ |
|
| 389 | + protected $command; |
|
| 390 | + |
|
| 391 | + /** |
|
| 392 | + * infos de compilateur |
|
| 393 | + * |
|
| 394 | + * @var array |
|
| 395 | + */ |
|
| 396 | + protected $info; |
|
| 397 | + |
|
| 398 | + /** |
|
| 399 | + * position courante de l'iterateur |
|
| 400 | + * |
|
| 401 | + * @var int |
|
| 402 | + */ |
|
| 403 | + protected $pos = null; |
|
| 404 | + |
|
| 405 | + /** |
|
| 406 | + * nombre total resultats dans l'iterateur |
|
| 407 | + * |
|
| 408 | + * @var int |
|
| 409 | + */ |
|
| 410 | + protected $total = null; |
|
| 411 | + |
|
| 412 | + /** |
|
| 413 | + * nombre maximal de recherche pour $total |
|
| 414 | + * si l'iterateur n'implemente pas de fonction specifique |
|
| 415 | + */ |
|
| 416 | + protected $max = 100000; |
|
| 417 | + |
|
| 418 | + |
|
| 419 | + /** |
|
| 420 | + * Liste des champs a inserer dans les $row |
|
| 421 | + * retournes par ->fetch() |
|
| 422 | + */ |
|
| 423 | + protected $select = array(); |
|
| 424 | + |
|
| 425 | + |
|
| 426 | + /** |
|
| 427 | + * aller a la position absolue n, |
|
| 428 | + * comptee depuis le debut |
|
| 429 | + * |
|
| 430 | + * @param int $n |
|
| 431 | + * absolute pos |
|
| 432 | + * @param string $continue |
|
| 433 | + * param for sql_ api |
|
| 434 | + * @return bool |
|
| 435 | + * success or fail if not implemented |
|
| 436 | + */ |
|
| 437 | + public function seek($n = 0, $continue = null) { |
|
| 438 | + if ($this->func_filtre or !method_exists($this->iter, 'seek') or !$this->iter->seek($n)) { |
|
| 439 | + $this->seek_loop($n); |
|
| 440 | + } |
|
| 441 | + $this->pos = $n; |
|
| 442 | + $this->fetched = $n; |
|
| 443 | + |
|
| 444 | + return true; |
|
| 445 | + } |
|
| 446 | + |
|
| 447 | + /* |
|
| 448 | 448 | * aller a la position $n en parcourant |
| 449 | 449 | * un par un tous les elements |
| 450 | 450 | */ |
| 451 | - private function seek_loop($n) { |
|
| 452 | - if ($this->pos > $n) { |
|
| 453 | - $this->rewind(); |
|
| 454 | - } |
|
| 455 | - |
|
| 456 | - while ($this->pos < $n and $this->valid()) { |
|
| 457 | - $this->next(); |
|
| 458 | - } |
|
| 459 | - |
|
| 460 | - return true; |
|
| 461 | - } |
|
| 462 | - |
|
| 463 | - /** |
|
| 464 | - * Avancer de $saut pas |
|
| 465 | - * |
|
| 466 | - * @param $saut |
|
| 467 | - * @param $max |
|
| 468 | - * @return int |
|
| 469 | - */ |
|
| 470 | - public function skip($saut, $max = null) { |
|
| 471 | - // pas de saut en arriere autorise pour cette fonction |
|
| 472 | - if (($saut = intval($saut)) <= 0) { |
|
| 473 | - return $this->pos; |
|
| 474 | - } |
|
| 475 | - $seek = $this->pos + $saut; |
|
| 476 | - // si le saut fait depasser le maxi, on libere la resource |
|
| 477 | - // et on sort |
|
| 478 | - if (is_null($max)) { |
|
| 479 | - $max = $this->count(); |
|
| 480 | - } |
|
| 481 | - |
|
| 482 | - if ($seek >= $max or $seek >= $this->count()) { |
|
| 483 | - // sortie plus rapide que de faire next() jusqu'a la fin ! |
|
| 484 | - $this->free(); |
|
| 485 | - |
|
| 486 | - return $max; |
|
| 487 | - } |
|
| 488 | - |
|
| 489 | - $this->seek($seek); |
|
| 490 | - |
|
| 491 | - return $this->pos; |
|
| 492 | - } |
|
| 493 | - |
|
| 494 | - /** |
|
| 495 | - * Renvoyer un tableau des donnees correspondantes |
|
| 496 | - * a la position courante de l'iterateur |
|
| 497 | - * en controlant si on respecte le filtre |
|
| 498 | - * Appliquer aussi le critere {offset,limit} |
|
| 499 | - * |
|
| 500 | - * @return array|bool |
|
| 501 | - */ |
|
| 502 | - public function fetch() { |
|
| 503 | - if (method_exists($this->iter, 'fetch')) { |
|
| 504 | - return $this->iter->fetch(); |
|
| 505 | - } else { |
|
| 506 | - |
|
| 507 | - while ($this->valid() |
|
| 508 | - and ( |
|
| 509 | - !$this->accept() |
|
| 510 | - or (isset($this->offset) and $this->fetched++ < $this->offset) |
|
| 511 | - )) { |
|
| 512 | - $this->next(); |
|
| 513 | - } |
|
| 514 | - |
|
| 515 | - if (!$this->valid()) { |
|
| 516 | - return false; |
|
| 517 | - } |
|
| 518 | - |
|
| 519 | - if (isset($this->limit) |
|
| 520 | - and $this->fetched > $this->offset + $this->limit |
|
| 521 | - ) { |
|
| 522 | - return false; |
|
| 523 | - } |
|
| 524 | - |
|
| 525 | - $r = array(); |
|
| 526 | - foreach ($this->select as $nom) { |
|
| 527 | - $r[$nom] = $this->get_select($nom); |
|
| 528 | - } |
|
| 529 | - $this->next(); |
|
| 530 | - |
|
| 531 | - return $r; |
|
| 532 | - } |
|
| 533 | - } |
|
| 534 | - |
|
| 535 | - // retourner la cle pour #CLE |
|
| 536 | - public function cle() { |
|
| 537 | - return $this->key(); |
|
| 538 | - } |
|
| 539 | - |
|
| 540 | - // retourner la valeur pour #VALEUR |
|
| 541 | - public function valeur() { |
|
| 542 | - return $this->current(); |
|
| 543 | - } |
|
| 544 | - |
|
| 545 | - /** |
|
| 546 | - * Accepte-t-on l'entree courante lue ? |
|
| 547 | - * On execute les filtres pour le savoir. |
|
| 548 | - **/ |
|
| 549 | - public function accept() { |
|
| 550 | - if ($f = $this->func_filtre) { |
|
| 551 | - return $f(); |
|
| 552 | - } |
|
| 553 | - |
|
| 554 | - return true; |
|
| 555 | - } |
|
| 556 | - |
|
| 557 | - /** |
|
| 558 | - * liberer la ressource |
|
| 559 | - * |
|
| 560 | - * @return bool |
|
| 561 | - */ |
|
| 562 | - public function free() { |
|
| 563 | - if (method_exists($this->iter, 'free')) { |
|
| 564 | - $this->iter->free(); |
|
| 565 | - } |
|
| 566 | - $this->pos = $this->total = 0; |
|
| 567 | - |
|
| 568 | - return true; |
|
| 569 | - } |
|
| 570 | - |
|
| 571 | - /** |
|
| 572 | - * Compter le nombre total de resultats |
|
| 573 | - * pour #TOTAL_BOUCLE |
|
| 574 | - * |
|
| 575 | - * @return int |
|
| 576 | - */ |
|
| 577 | - public function count() { |
|
| 578 | - if (is_null($this->total)) { |
|
| 579 | - if (method_exists($this->iter, 'count') |
|
| 580 | - and !$this->func_filtre |
|
| 581 | - ) { |
|
| 582 | - return $this->total = $this->iter->count(); |
|
| 583 | - } else { |
|
| 584 | - // compter les lignes et rembobiner |
|
| 585 | - $total = 0; |
|
| 586 | - $pos = $this->pos; // sauver la position |
|
| 587 | - $this->rewind(); |
|
| 588 | - while ($this->fetch() and $total < $this->max) { |
|
| 589 | - $total++; |
|
| 590 | - } |
|
| 591 | - $this->seek($pos); |
|
| 592 | - $this->total = $total; |
|
| 593 | - } |
|
| 594 | - } |
|
| 595 | - |
|
| 596 | - return $this->total; |
|
| 597 | - } |
|
| 451 | + private function seek_loop($n) { |
|
| 452 | + if ($this->pos > $n) { |
|
| 453 | + $this->rewind(); |
|
| 454 | + } |
|
| 455 | + |
|
| 456 | + while ($this->pos < $n and $this->valid()) { |
|
| 457 | + $this->next(); |
|
| 458 | + } |
|
| 459 | + |
|
| 460 | + return true; |
|
| 461 | + } |
|
| 462 | + |
|
| 463 | + /** |
|
| 464 | + * Avancer de $saut pas |
|
| 465 | + * |
|
| 466 | + * @param $saut |
|
| 467 | + * @param $max |
|
| 468 | + * @return int |
|
| 469 | + */ |
|
| 470 | + public function skip($saut, $max = null) { |
|
| 471 | + // pas de saut en arriere autorise pour cette fonction |
|
| 472 | + if (($saut = intval($saut)) <= 0) { |
|
| 473 | + return $this->pos; |
|
| 474 | + } |
|
| 475 | + $seek = $this->pos + $saut; |
|
| 476 | + // si le saut fait depasser le maxi, on libere la resource |
|
| 477 | + // et on sort |
|
| 478 | + if (is_null($max)) { |
|
| 479 | + $max = $this->count(); |
|
| 480 | + } |
|
| 481 | + |
|
| 482 | + if ($seek >= $max or $seek >= $this->count()) { |
|
| 483 | + // sortie plus rapide que de faire next() jusqu'a la fin ! |
|
| 484 | + $this->free(); |
|
| 485 | + |
|
| 486 | + return $max; |
|
| 487 | + } |
|
| 488 | + |
|
| 489 | + $this->seek($seek); |
|
| 490 | + |
|
| 491 | + return $this->pos; |
|
| 492 | + } |
|
| 493 | + |
|
| 494 | + /** |
|
| 495 | + * Renvoyer un tableau des donnees correspondantes |
|
| 496 | + * a la position courante de l'iterateur |
|
| 497 | + * en controlant si on respecte le filtre |
|
| 498 | + * Appliquer aussi le critere {offset,limit} |
|
| 499 | + * |
|
| 500 | + * @return array|bool |
|
| 501 | + */ |
|
| 502 | + public function fetch() { |
|
| 503 | + if (method_exists($this->iter, 'fetch')) { |
|
| 504 | + return $this->iter->fetch(); |
|
| 505 | + } else { |
|
| 506 | + |
|
| 507 | + while ($this->valid() |
|
| 508 | + and ( |
|
| 509 | + !$this->accept() |
|
| 510 | + or (isset($this->offset) and $this->fetched++ < $this->offset) |
|
| 511 | + )) { |
|
| 512 | + $this->next(); |
|
| 513 | + } |
|
| 514 | + |
|
| 515 | + if (!$this->valid()) { |
|
| 516 | + return false; |
|
| 517 | + } |
|
| 518 | + |
|
| 519 | + if (isset($this->limit) |
|
| 520 | + and $this->fetched > $this->offset + $this->limit |
|
| 521 | + ) { |
|
| 522 | + return false; |
|
| 523 | + } |
|
| 524 | + |
|
| 525 | + $r = array(); |
|
| 526 | + foreach ($this->select as $nom) { |
|
| 527 | + $r[$nom] = $this->get_select($nom); |
|
| 528 | + } |
|
| 529 | + $this->next(); |
|
| 530 | + |
|
| 531 | + return $r; |
|
| 532 | + } |
|
| 533 | + } |
|
| 534 | + |
|
| 535 | + // retourner la cle pour #CLE |
|
| 536 | + public function cle() { |
|
| 537 | + return $this->key(); |
|
| 538 | + } |
|
| 539 | + |
|
| 540 | + // retourner la valeur pour #VALEUR |
|
| 541 | + public function valeur() { |
|
| 542 | + return $this->current(); |
|
| 543 | + } |
|
| 544 | + |
|
| 545 | + /** |
|
| 546 | + * Accepte-t-on l'entree courante lue ? |
|
| 547 | + * On execute les filtres pour le savoir. |
|
| 548 | + **/ |
|
| 549 | + public function accept() { |
|
| 550 | + if ($f = $this->func_filtre) { |
|
| 551 | + return $f(); |
|
| 552 | + } |
|
| 553 | + |
|
| 554 | + return true; |
|
| 555 | + } |
|
| 556 | + |
|
| 557 | + /** |
|
| 558 | + * liberer la ressource |
|
| 559 | + * |
|
| 560 | + * @return bool |
|
| 561 | + */ |
|
| 562 | + public function free() { |
|
| 563 | + if (method_exists($this->iter, 'free')) { |
|
| 564 | + $this->iter->free(); |
|
| 565 | + } |
|
| 566 | + $this->pos = $this->total = 0; |
|
| 567 | + |
|
| 568 | + return true; |
|
| 569 | + } |
|
| 570 | + |
|
| 571 | + /** |
|
| 572 | + * Compter le nombre total de resultats |
|
| 573 | + * pour #TOTAL_BOUCLE |
|
| 574 | + * |
|
| 575 | + * @return int |
|
| 576 | + */ |
|
| 577 | + public function count() { |
|
| 578 | + if (is_null($this->total)) { |
|
| 579 | + if (method_exists($this->iter, 'count') |
|
| 580 | + and !$this->func_filtre |
|
| 581 | + ) { |
|
| 582 | + return $this->total = $this->iter->count(); |
|
| 583 | + } else { |
|
| 584 | + // compter les lignes et rembobiner |
|
| 585 | + $total = 0; |
|
| 586 | + $pos = $this->pos; // sauver la position |
|
| 587 | + $this->rewind(); |
|
| 588 | + while ($this->fetch() and $total < $this->max) { |
|
| 589 | + $total++; |
|
| 590 | + } |
|
| 591 | + $this->seek($pos); |
|
| 592 | + $this->total = $total; |
|
| 593 | + } |
|
| 594 | + } |
|
| 595 | + |
|
| 596 | + return $this->total; |
|
| 597 | + } |
|
| 598 | 598 | |
| 599 | 599 | } |
@@ -231,7 +231,7 @@ |
||
| 231 | 231 | * |
| 232 | 232 | * @param array $depart |
| 233 | 233 | * @param array $arrivee |
| 234 | - * @param string|array $col |
|
| 234 | + * @param string $col |
|
| 235 | 235 | * @return bool |
| 236 | 236 | */ |
| 237 | 237 | function nogroupby_if($depart, $arrivee, $col) { |
@@ -17,7 +17,7 @@ discard block |
||
| 17 | 17 | **/ |
| 18 | 18 | |
| 19 | 19 | if (!defined('_ECRIRE_INC_VERSION')) { |
| 20 | - return; |
|
| 20 | + return; |
|
| 21 | 21 | } |
| 22 | 22 | |
| 23 | 23 | |
@@ -33,11 +33,11 @@ discard block |
||
| 33 | 33 | * Chaine sinon : le nom du champ (non décomposable donc) |
| 34 | 34 | */ |
| 35 | 35 | function decompose_champ_id_objet($champ) { |
| 36 | - if (($champ !== 'id_objet') and preg_match(',^id_([a-z_]+)$,', $champ, $regs)) { |
|
| 37 | - return array('id_objet', 'objet', objet_type($champ)); |
|
| 38 | - } |
|
| 36 | + if (($champ !== 'id_objet') and preg_match(',^id_([a-z_]+)$,', $champ, $regs)) { |
|
| 37 | + return array('id_objet', 'objet', objet_type($champ)); |
|
| 38 | + } |
|
| 39 | 39 | |
| 40 | - return $champ; |
|
| 40 | + return $champ; |
|
| 41 | 41 | } |
| 42 | 42 | |
| 43 | 43 | /** |
@@ -56,20 +56,20 @@ discard block |
||
| 56 | 56 | * - array(id_objet, objet), si le champ n'existe pas mais qu'on peut décomposer |
| 57 | 57 | */ |
| 58 | 58 | function trouver_champs_decomposes($champ, $desc) { |
| 59 | - if (!is_array($desc) // on ne se risque pas en conjectures si on ne connait pas la table |
|
| 60 | - or array_key_exists($champ, $desc['field']) |
|
| 61 | - ) { |
|
| 62 | - return array($champ); |
|
| 63 | - } |
|
| 64 | - // si le champ se décompose, tester que les colonnes décomposées sont présentes |
|
| 65 | - if (is_array($decompose = decompose_champ_id_objet($champ))) { |
|
| 66 | - array_pop($decompose); |
|
| 67 | - if (count(array_intersect($decompose, array_keys($desc['field']))) == count($decompose)) { |
|
| 68 | - return $decompose; |
|
| 69 | - } |
|
| 70 | - } |
|
| 71 | - |
|
| 72 | - return array($champ); |
|
| 59 | + if (!is_array($desc) // on ne se risque pas en conjectures si on ne connait pas la table |
|
| 60 | + or array_key_exists($champ, $desc['field']) |
|
| 61 | + ) { |
|
| 62 | + return array($champ); |
|
| 63 | + } |
|
| 64 | + // si le champ se décompose, tester que les colonnes décomposées sont présentes |
|
| 65 | + if (is_array($decompose = decompose_champ_id_objet($champ))) { |
|
| 66 | + array_pop($decompose); |
|
| 67 | + if (count(array_intersect($decompose, array_keys($desc['field']))) == count($decompose)) { |
|
| 68 | + return $decompose; |
|
| 69 | + } |
|
| 70 | + } |
|
| 71 | + |
|
| 72 | + return array($champ); |
|
| 73 | 73 | } |
| 74 | 74 | |
| 75 | 75 | |
@@ -99,23 +99,23 @@ discard block |
||
| 99 | 99 | * Alias de la table de jointure (Lx) |
| 100 | 100 | */ |
| 101 | 101 | function calculer_jointure(&$boucle, $depart, $arrivee, $col = '', $cond = false, $max_liens = 5) { |
| 102 | - // les jointures minimales sont optimales : |
|
| 103 | - // on contraint le nombre d'etapes en l'augmentant |
|
| 104 | - // jusqu'a ce qu'on trouve une jointure ou qu'on atteigne la limite maxi |
|
| 105 | - $max = 1; |
|
| 106 | - $res = false; |
|
| 107 | - $milieu_exclus = ($col ? $col : array()); |
|
| 108 | - while ($max <= $max_liens and !$res) { |
|
| 109 | - $res = calculer_chaine_jointures($boucle, $depart, $arrivee, array(), $milieu_exclus, $max); |
|
| 110 | - $max++; |
|
| 111 | - } |
|
| 112 | - if (!$res) { |
|
| 113 | - return ""; |
|
| 114 | - } |
|
| 115 | - |
|
| 116 | - list($nom, $desc) = $depart; |
|
| 117 | - |
|
| 118 | - return fabrique_jointures($boucle, $res, $cond, $desc, $nom, $col); |
|
| 102 | + // les jointures minimales sont optimales : |
|
| 103 | + // on contraint le nombre d'etapes en l'augmentant |
|
| 104 | + // jusqu'a ce qu'on trouve une jointure ou qu'on atteigne la limite maxi |
|
| 105 | + $max = 1; |
|
| 106 | + $res = false; |
|
| 107 | + $milieu_exclus = ($col ? $col : array()); |
|
| 108 | + while ($max <= $max_liens and !$res) { |
|
| 109 | + $res = calculer_chaine_jointures($boucle, $depart, $arrivee, array(), $milieu_exclus, $max); |
|
| 110 | + $max++; |
|
| 111 | + } |
|
| 112 | + if (!$res) { |
|
| 113 | + return ""; |
|
| 114 | + } |
|
| 115 | + |
|
| 116 | + list($nom, $desc) = $depart; |
|
| 117 | + |
|
| 118 | + return fabrique_jointures($boucle, $res, $cond, $desc, $nom, $col); |
|
| 119 | 119 | } |
| 120 | 120 | |
| 121 | 121 | /** |
@@ -154,78 +154,78 @@ discard block |
||
| 154 | 154 | * Alias de la table de jointure (Lx) |
| 155 | 155 | */ |
| 156 | 156 | function fabrique_jointures(&$boucle, $res, $cond = false, $desc = array(), $nom = '', $col = '', $echap = true) { |
| 157 | - static $num = array(); |
|
| 158 | - $id_table = ""; |
|
| 159 | - $cpt = &$num[$boucle->descr['nom']][$boucle->descr['gram']][$boucle->id_boucle]; |
|
| 160 | - foreach ($res as $cle => $r) { |
|
| 161 | - list($d, $a, $j) = $r; |
|
| 162 | - if (!$id_table) { |
|
| 163 | - $id_table = $d; |
|
| 164 | - } |
|
| 165 | - $n = ++$cpt; |
|
| 166 | - if (is_array($j)) { // c'est un lien sur un champ du type id_objet,objet,'article' |
|
| 167 | - list($j1, $j2, $obj, $type) = $j; |
|
| 168 | - // trouver de quel cote est (id_objet,objet) |
|
| 169 | - if ($j1 == "id_$obj") { |
|
| 170 | - $obj = "$id_table.$obj"; |
|
| 171 | - } else { |
|
| 172 | - $obj = "L$n.$obj"; |
|
| 173 | - } |
|
| 174 | - // le where complementaire est envoye dans la jointure et dans le where |
|
| 175 | - // on utilise une clé qui le relie a la jointure pour que l'optimiseur |
|
| 176 | - // sache qu'il peut enlever ce where si il enleve la jointure |
|
| 177 | - $boucle->where["JOIN-L$n"] = |
|
| 178 | - $echap ? |
|
| 179 | - array("'='","'$obj'","sql_quote('$type')") |
|
| 180 | - : |
|
| 181 | - array("=","$obj",sql_quote($type)); |
|
| 182 | - $boucle->join["L$n"] = |
|
| 183 | - $echap ? |
|
| 184 | - array("'$id_table'", "'$j2'", "'$j1'", "'$obj='.sql_quote('$type')") |
|
| 185 | - : |
|
| 186 | - array($id_table, $j2, $j1, "$obj=" . sql_quote($type)); |
|
| 187 | - } else { |
|
| 188 | - $boucle->join["L$n"] = $echap ? array("'$id_table'", "'$j'") : array($id_table, $j); |
|
| 189 | - } |
|
| 190 | - $boucle->from[$id_table = "L$n"] = $a[0]; |
|
| 191 | - } |
|
| 192 | - |
|
| 193 | - |
|
| 194 | - // pas besoin de group by |
|
| 195 | - // (cf http://article.gmane.org/gmane.comp.web.spip.devel/30555) |
|
| 196 | - // si une seule jointure et sur une table avec primary key formee |
|
| 197 | - // de l'index principal et de l'index de jointure (non conditionnel! [6031]) |
|
| 198 | - // et operateur d'egalite (https://core.spip.net/issues/477) |
|
| 199 | - |
|
| 200 | - if ($pk = (isset($a[1]) && (count($boucle->from) == 2) && !$cond)) { |
|
| 201 | - $pk = nogroupby_if($desc, $a[1], $col); |
|
| 202 | - } |
|
| 203 | - |
|
| 204 | - // pas de group by |
|
| 205 | - // si une seule jointure |
|
| 206 | - // et si l'index de jointure est une primary key a l'arrivee ! |
|
| 207 | - if (!$pk |
|
| 208 | - and (count($boucle->from) == 2) |
|
| 209 | - and isset($a[1]['key']['PRIMARY KEY']) |
|
| 210 | - and ($j == $a[1]['key']['PRIMARY KEY']) |
|
| 211 | - ) { |
|
| 212 | - $pk = true; |
|
| 213 | - } |
|
| 214 | - |
|
| 215 | - // la clause Group by est en conflit avec ORDER BY, a completer |
|
| 216 | - $groups = liste_champs_jointures($nom, $desc, true); |
|
| 217 | - if (!$pk) { |
|
| 218 | - foreach ($groups as $id_prim) { |
|
| 219 | - $id_field = $nom . '.' . $id_prim; |
|
| 220 | - if (!in_array($id_field, $boucle->group)) { |
|
| 221 | - $boucle->group[] = $id_field; |
|
| 222 | - } |
|
| 223 | - } |
|
| 224 | - } |
|
| 225 | - |
|
| 226 | - $boucle->modificateur['lien'] = true; |
|
| 227 | - |
|
| 228 | - return "L$n"; |
|
| 157 | + static $num = array(); |
|
| 158 | + $id_table = ""; |
|
| 159 | + $cpt = &$num[$boucle->descr['nom']][$boucle->descr['gram']][$boucle->id_boucle]; |
|
| 160 | + foreach ($res as $cle => $r) { |
|
| 161 | + list($d, $a, $j) = $r; |
|
| 162 | + if (!$id_table) { |
|
| 163 | + $id_table = $d; |
|
| 164 | + } |
|
| 165 | + $n = ++$cpt; |
|
| 166 | + if (is_array($j)) { // c'est un lien sur un champ du type id_objet,objet,'article' |
|
| 167 | + list($j1, $j2, $obj, $type) = $j; |
|
| 168 | + // trouver de quel cote est (id_objet,objet) |
|
| 169 | + if ($j1 == "id_$obj") { |
|
| 170 | + $obj = "$id_table.$obj"; |
|
| 171 | + } else { |
|
| 172 | + $obj = "L$n.$obj"; |
|
| 173 | + } |
|
| 174 | + // le where complementaire est envoye dans la jointure et dans le where |
|
| 175 | + // on utilise une clé qui le relie a la jointure pour que l'optimiseur |
|
| 176 | + // sache qu'il peut enlever ce where si il enleve la jointure |
|
| 177 | + $boucle->where["JOIN-L$n"] = |
|
| 178 | + $echap ? |
|
| 179 | + array("'='","'$obj'","sql_quote('$type')") |
|
| 180 | + : |
|
| 181 | + array("=","$obj",sql_quote($type)); |
|
| 182 | + $boucle->join["L$n"] = |
|
| 183 | + $echap ? |
|
| 184 | + array("'$id_table'", "'$j2'", "'$j1'", "'$obj='.sql_quote('$type')") |
|
| 185 | + : |
|
| 186 | + array($id_table, $j2, $j1, "$obj=" . sql_quote($type)); |
|
| 187 | + } else { |
|
| 188 | + $boucle->join["L$n"] = $echap ? array("'$id_table'", "'$j'") : array($id_table, $j); |
|
| 189 | + } |
|
| 190 | + $boucle->from[$id_table = "L$n"] = $a[0]; |
|
| 191 | + } |
|
| 192 | + |
|
| 193 | + |
|
| 194 | + // pas besoin de group by |
|
| 195 | + // (cf http://article.gmane.org/gmane.comp.web.spip.devel/30555) |
|
| 196 | + // si une seule jointure et sur une table avec primary key formee |
|
| 197 | + // de l'index principal et de l'index de jointure (non conditionnel! [6031]) |
|
| 198 | + // et operateur d'egalite (https://core.spip.net/issues/477) |
|
| 199 | + |
|
| 200 | + if ($pk = (isset($a[1]) && (count($boucle->from) == 2) && !$cond)) { |
|
| 201 | + $pk = nogroupby_if($desc, $a[1], $col); |
|
| 202 | + } |
|
| 203 | + |
|
| 204 | + // pas de group by |
|
| 205 | + // si une seule jointure |
|
| 206 | + // et si l'index de jointure est une primary key a l'arrivee ! |
|
| 207 | + if (!$pk |
|
| 208 | + and (count($boucle->from) == 2) |
|
| 209 | + and isset($a[1]['key']['PRIMARY KEY']) |
|
| 210 | + and ($j == $a[1]['key']['PRIMARY KEY']) |
|
| 211 | + ) { |
|
| 212 | + $pk = true; |
|
| 213 | + } |
|
| 214 | + |
|
| 215 | + // la clause Group by est en conflit avec ORDER BY, a completer |
|
| 216 | + $groups = liste_champs_jointures($nom, $desc, true); |
|
| 217 | + if (!$pk) { |
|
| 218 | + foreach ($groups as $id_prim) { |
|
| 219 | + $id_field = $nom . '.' . $id_prim; |
|
| 220 | + if (!in_array($id_field, $boucle->group)) { |
|
| 221 | + $boucle->group[] = $id_field; |
|
| 222 | + } |
|
| 223 | + } |
|
| 224 | + } |
|
| 225 | + |
|
| 226 | + $boucle->modificateur['lien'] = true; |
|
| 227 | + |
|
| 228 | + return "L$n"; |
|
| 229 | 229 | } |
| 230 | 230 | |
| 231 | 231 | /** |
@@ -240,16 +240,16 @@ discard block |
||
| 240 | 240 | * @return bool |
| 241 | 241 | */ |
| 242 | 242 | function nogroupby_if($depart, $arrivee, $col) { |
| 243 | - $pk = $arrivee['key']['PRIMARY KEY']; |
|
| 244 | - if (!$pk) { |
|
| 245 | - return false; |
|
| 246 | - } |
|
| 247 | - $id_primary = $depart['key']['PRIMARY KEY']; |
|
| 248 | - if (is_array($col)) { |
|
| 249 | - $col = implode(', *', $col); |
|
| 250 | - } // cas id_objet, objet |
|
| 251 | - return (preg_match("/^$id_primary, *$col$/", $pk) or |
|
| 252 | - preg_match("/^$col, *$id_primary$/", $pk)); |
|
| 243 | + $pk = $arrivee['key']['PRIMARY KEY']; |
|
| 244 | + if (!$pk) { |
|
| 245 | + return false; |
|
| 246 | + } |
|
| 247 | + $id_primary = $depart['key']['PRIMARY KEY']; |
|
| 248 | + if (is_array($col)) { |
|
| 249 | + $col = implode(', *', $col); |
|
| 250 | + } // cas id_objet, objet |
|
| 251 | + return (preg_match("/^$id_primary, *$col$/", $pk) or |
|
| 252 | + preg_match("/^$col, *$id_primary$/", $pk)); |
|
| 253 | 253 | } |
| 254 | 254 | |
| 255 | 255 | /** |
@@ -267,46 +267,46 @@ discard block |
||
| 267 | 267 | */ |
| 268 | 268 | function liste_champs_jointures($nom, $desc, $primary = false) { |
| 269 | 269 | |
| 270 | - static $nojoin = array('idx', 'maj', 'date', 'statut'); |
|
| 270 | + static $nojoin = array('idx', 'maj', 'date', 'statut'); |
|
| 271 | 271 | |
| 272 | - // si cle primaire demandee, la privilegier |
|
| 273 | - if ($primary && isset($desc['key']['PRIMARY KEY'])) { |
|
| 274 | - return split_key($desc['key']['PRIMARY KEY']); |
|
| 275 | - } |
|
| 272 | + // si cle primaire demandee, la privilegier |
|
| 273 | + if ($primary && isset($desc['key']['PRIMARY KEY'])) { |
|
| 274 | + return split_key($desc['key']['PRIMARY KEY']); |
|
| 275 | + } |
|
| 276 | 276 | |
| 277 | - // les champs declares explicitement pour les jointures |
|
| 278 | - if (isset($desc['join'])) { |
|
| 279 | - return $desc['join']; |
|
| 280 | - } |
|
| 281 | - /*elseif (isset($GLOBALS['tables_principales'][$nom]['join'])) return $GLOBALS['tables_principales'][$nom]['join']; |
|
| 277 | + // les champs declares explicitement pour les jointures |
|
| 278 | + if (isset($desc['join'])) { |
|
| 279 | + return $desc['join']; |
|
| 280 | + } |
|
| 281 | + /*elseif (isset($GLOBALS['tables_principales'][$nom]['join'])) return $GLOBALS['tables_principales'][$nom]['join']; |
|
| 282 | 282 | elseif (isset($GLOBALS['tables_auxiliaires'][$nom]['join'])) return $GLOBALS['tables_auxiliaires'][$nom]['join'];*/ |
| 283 | 283 | |
| 284 | - // si pas de cle, c'est fichu |
|
| 285 | - if (!isset($desc['key'])) { |
|
| 286 | - return array(); |
|
| 287 | - } |
|
| 288 | - |
|
| 289 | - // si cle primaire |
|
| 290 | - if (isset($desc['key']['PRIMARY KEY'])) { |
|
| 291 | - return split_key($desc['key']['PRIMARY KEY']); |
|
| 292 | - } |
|
| 293 | - |
|
| 294 | - // ici on se rabat sur les cles secondaires, |
|
| 295 | - // en eliminant celles qui sont pas pertinentes (idx, maj) |
|
| 296 | - // si jamais le resultat n'est pas pertinent pour une table donnee, |
|
| 297 | - // il faut declarer explicitement le champ 'join' de sa description |
|
| 298 | - |
|
| 299 | - $join = array(); |
|
| 300 | - foreach ($desc['key'] as $v) { |
|
| 301 | - $join = split_key($v, $join); |
|
| 302 | - } |
|
| 303 | - foreach ($join as $k) { |
|
| 304 | - if (in_array($k, $nojoin)) { |
|
| 305 | - unset($join[$k]); |
|
| 306 | - } |
|
| 307 | - } |
|
| 308 | - |
|
| 309 | - return $join; |
|
| 284 | + // si pas de cle, c'est fichu |
|
| 285 | + if (!isset($desc['key'])) { |
|
| 286 | + return array(); |
|
| 287 | + } |
|
| 288 | + |
|
| 289 | + // si cle primaire |
|
| 290 | + if (isset($desc['key']['PRIMARY KEY'])) { |
|
| 291 | + return split_key($desc['key']['PRIMARY KEY']); |
|
| 292 | + } |
|
| 293 | + |
|
| 294 | + // ici on se rabat sur les cles secondaires, |
|
| 295 | + // en eliminant celles qui sont pas pertinentes (idx, maj) |
|
| 296 | + // si jamais le resultat n'est pas pertinent pour une table donnee, |
|
| 297 | + // il faut declarer explicitement le champ 'join' de sa description |
|
| 298 | + |
|
| 299 | + $join = array(); |
|
| 300 | + foreach ($desc['key'] as $v) { |
|
| 301 | + $join = split_key($v, $join); |
|
| 302 | + } |
|
| 303 | + foreach ($join as $k) { |
|
| 304 | + if (in_array($k, $nojoin)) { |
|
| 305 | + unset($join[$k]); |
|
| 306 | + } |
|
| 307 | + } |
|
| 308 | + |
|
| 309 | + return $join; |
|
| 310 | 310 | } |
| 311 | 311 | |
| 312 | 312 | /** |
@@ -317,14 +317,14 @@ discard block |
||
| 317 | 317 | * @return array |
| 318 | 318 | */ |
| 319 | 319 | function split_key($v, $join = array()) { |
| 320 | - foreach (preg_split('/,\s*/', $v) as $k) { |
|
| 321 | - if (strpos($k, '(') !== false) { |
|
| 322 | - $k = explode('(', $k); |
|
| 323 | - $k = trim(reset($k)); |
|
| 324 | - } |
|
| 325 | - $join[$k] = $k; |
|
| 326 | - } |
|
| 327 | - return $join; |
|
| 320 | + foreach (preg_split('/,\s*/', $v) as $k) { |
|
| 321 | + if (strpos($k, '(') !== false) { |
|
| 322 | + $k = explode('(', $k); |
|
| 323 | + $k = trim(reset($k)); |
|
| 324 | + } |
|
| 325 | + $join[$k] = $k; |
|
| 326 | + } |
|
| 327 | + return $join; |
|
| 328 | 328 | } |
| 329 | 329 | |
| 330 | 330 | /** |
@@ -347,126 +347,126 @@ discard block |
||
| 347 | 347 | * @return array |
| 348 | 348 | */ |
| 349 | 349 | function calculer_chaine_jointures( |
| 350 | - &$boucle, |
|
| 351 | - $depart, |
|
| 352 | - $arrivee, |
|
| 353 | - $vu = array(), |
|
| 354 | - $milieu_exclus = array(), |
|
| 355 | - $max_liens = 5 |
|
| 350 | + &$boucle, |
|
| 351 | + $depart, |
|
| 352 | + $arrivee, |
|
| 353 | + $vu = array(), |
|
| 354 | + $milieu_exclus = array(), |
|
| 355 | + $max_liens = 5 |
|
| 356 | 356 | ) { |
| 357 | - static $trouver_table; |
|
| 358 | - if (!$trouver_table) { |
|
| 359 | - $trouver_table = charger_fonction('trouver_table', 'base'); |
|
| 360 | - } |
|
| 361 | - |
|
| 362 | - if (is_string($milieu_exclus)) { |
|
| 363 | - $milieu_exclus = array($milieu_exclus); |
|
| 364 | - } |
|
| 365 | - // quand on a exclus id_objet comme cle de jointure, il faut aussi exclure objet |
|
| 366 | - // faire une jointure sur objet tout seul n'a pas de sens |
|
| 367 | - if (in_array('id_objet', $milieu_exclus) and !in_array('objet', $milieu_exclus)) { |
|
| 368 | - $milieu_exclus[] = 'objet'; |
|
| 369 | - } |
|
| 370 | - |
|
| 371 | - list($dnom, $ddesc) = $depart; |
|
| 372 | - list($anom, $adesc) = $arrivee; |
|
| 373 | - if (!count($vu)) { |
|
| 374 | - $vu[] = $dnom; // ne pas oublier la table de depart |
|
| 375 | - $vu[] = $anom; // ne pas oublier la table d'arrivee |
|
| 376 | - } |
|
| 377 | - |
|
| 378 | - $akeys = array(); |
|
| 379 | - foreach ($adesc['key'] as $k) { |
|
| 380 | - // respecter l'ordre de $adesc['key'] pour ne pas avoir id_trad en premier entre autres... |
|
| 381 | - $akeys = array_merge($akeys, preg_split('/,\s*/', $k)); |
|
| 382 | - } |
|
| 383 | - |
|
| 384 | - // enlever les cles d'arrivee exclues par l'appel |
|
| 385 | - $akeys = array_diff($akeys, $milieu_exclus); |
|
| 386 | - |
|
| 387 | - // cles candidates au depart |
|
| 388 | - $keys = liste_champs_jointures($dnom, $ddesc); |
|
| 389 | - // enlever les cles dde depart exclues par l'appel |
|
| 390 | - $keys = array_diff($keys, $milieu_exclus); |
|
| 391 | - |
|
| 392 | - $v = !$keys ? false : array_intersect(array_values($keys), $akeys); |
|
| 393 | - |
|
| 394 | - if ($v) { |
|
| 395 | - return array(array($dnom, array($adesc['table'], $adesc), array_shift($v))); |
|
| 396 | - } |
|
| 397 | - |
|
| 398 | - // regarder si l'on a (id_objet,objet) au depart et si on peut le mapper sur un id_xx |
|
| 399 | - if (count(array_intersect(array('id_objet', 'objet'), $keys)) == 2) { |
|
| 400 | - // regarder si l'une des cles d'arrivee peut se decomposer en |
|
| 401 | - // id_objet,objet |
|
| 402 | - // si oui on la prend |
|
| 403 | - foreach ($akeys as $key) { |
|
| 404 | - $v = decompose_champ_id_objet($key); |
|
| 405 | - if (is_array($v)) { |
|
| 406 | - $objet = array_shift($v); // objet,'article' |
|
| 407 | - array_unshift($v, $key); // id_article,objet,'article' |
|
| 408 | - array_unshift($v, $objet); // id_objet,id_article,objet,'article' |
|
| 409 | - return array(array($dnom, array($adesc['table'], $adesc), $v)); |
|
| 410 | - } |
|
| 411 | - } |
|
| 412 | - } else { |
|
| 413 | - // regarder si l'une des cles de depart peut se decomposer en |
|
| 414 | - // id_objet,objet a l'arrivee |
|
| 415 | - // si oui on la prend |
|
| 416 | - foreach ($keys as $key) { |
|
| 417 | - if (count($v = trouver_champs_decomposes($key, $adesc)) > 1) { |
|
| 418 | - if (count($v) == count(array_intersect($v, $akeys))) { |
|
| 419 | - $v = decompose_champ_id_objet($key); // id_objet,objet,'article' |
|
| 420 | - array_unshift($v, $key); // id_article,id_objet,objet,'article' |
|
| 421 | - return array(array($dnom, array($adesc['table'], $adesc), $v)); |
|
| 422 | - } |
|
| 423 | - } |
|
| 424 | - } |
|
| 425 | - } |
|
| 426 | - // si l'on voulait une jointure direct, c'est rate ! |
|
| 427 | - if ($max_liens <= 1) { |
|
| 428 | - return array(); |
|
| 429 | - } |
|
| 430 | - |
|
| 431 | - // sinon essayer de passer par une autre table |
|
| 432 | - $new = $vu; |
|
| 433 | - foreach ($boucle->jointures as $v) { |
|
| 434 | - if ($v |
|
| 435 | - and !in_array($v, $vu) |
|
| 436 | - and $def = $trouver_table($v, $boucle->sql_serveur) |
|
| 437 | - and !in_array($def['table_sql'], $vu) |
|
| 438 | - ) { |
|
| 439 | - // ne pas tester les cles qui sont exclues a l'appel |
|
| 440 | - // ie la cle de la jointure precedente |
|
| 441 | - $test_cles = $milieu_exclus; |
|
| 442 | - $new[] = $v; |
|
| 443 | - $max_iter = 50; // securite |
|
| 444 | - while (count($jointure_directe_possible = calculer_chaine_jointures($boucle, $depart, array($v, $def), $vu, |
|
| 445 | - $test_cles, 1)) |
|
| 446 | - and $max_iter--) { |
|
| 447 | - $jointure_directe_possible = reset($jointure_directe_possible); |
|
| 448 | - $milieu = end($jointure_directe_possible); |
|
| 449 | - $exclure_fin = $milieu_exclus; |
|
| 450 | - if (is_string($milieu)) { |
|
| 451 | - $exclure_fin[] = $milieu; |
|
| 452 | - $test_cles[] = $milieu; |
|
| 453 | - } else { |
|
| 454 | - $exclure_fin = array_merge($exclure_fin, $milieu); |
|
| 455 | - $test_cles = array_merge($test_cles, $milieu); |
|
| 456 | - } |
|
| 457 | - // essayer de rejoindre l'arrivee a partir de cette etape intermediaire |
|
| 458 | - // sans repasser par la meme cle milieu, ni une cle deja vue ! |
|
| 459 | - $r = calculer_chaine_jointures($boucle, array($v, $def), $arrivee, $new, $exclure_fin, $max_liens - 1); |
|
| 460 | - if ($r) { |
|
| 461 | - array_unshift($r, $jointure_directe_possible); |
|
| 462 | - |
|
| 463 | - return $r; |
|
| 464 | - } |
|
| 465 | - } |
|
| 466 | - } |
|
| 467 | - } |
|
| 468 | - |
|
| 469 | - return array(); |
|
| 357 | + static $trouver_table; |
|
| 358 | + if (!$trouver_table) { |
|
| 359 | + $trouver_table = charger_fonction('trouver_table', 'base'); |
|
| 360 | + } |
|
| 361 | + |
|
| 362 | + if (is_string($milieu_exclus)) { |
|
| 363 | + $milieu_exclus = array($milieu_exclus); |
|
| 364 | + } |
|
| 365 | + // quand on a exclus id_objet comme cle de jointure, il faut aussi exclure objet |
|
| 366 | + // faire une jointure sur objet tout seul n'a pas de sens |
|
| 367 | + if (in_array('id_objet', $milieu_exclus) and !in_array('objet', $milieu_exclus)) { |
|
| 368 | + $milieu_exclus[] = 'objet'; |
|
| 369 | + } |
|
| 370 | + |
|
| 371 | + list($dnom, $ddesc) = $depart; |
|
| 372 | + list($anom, $adesc) = $arrivee; |
|
| 373 | + if (!count($vu)) { |
|
| 374 | + $vu[] = $dnom; // ne pas oublier la table de depart |
|
| 375 | + $vu[] = $anom; // ne pas oublier la table d'arrivee |
|
| 376 | + } |
|
| 377 | + |
|
| 378 | + $akeys = array(); |
|
| 379 | + foreach ($adesc['key'] as $k) { |
|
| 380 | + // respecter l'ordre de $adesc['key'] pour ne pas avoir id_trad en premier entre autres... |
|
| 381 | + $akeys = array_merge($akeys, preg_split('/,\s*/', $k)); |
|
| 382 | + } |
|
| 383 | + |
|
| 384 | + // enlever les cles d'arrivee exclues par l'appel |
|
| 385 | + $akeys = array_diff($akeys, $milieu_exclus); |
|
| 386 | + |
|
| 387 | + // cles candidates au depart |
|
| 388 | + $keys = liste_champs_jointures($dnom, $ddesc); |
|
| 389 | + // enlever les cles dde depart exclues par l'appel |
|
| 390 | + $keys = array_diff($keys, $milieu_exclus); |
|
| 391 | + |
|
| 392 | + $v = !$keys ? false : array_intersect(array_values($keys), $akeys); |
|
| 393 | + |
|
| 394 | + if ($v) { |
|
| 395 | + return array(array($dnom, array($adesc['table'], $adesc), array_shift($v))); |
|
| 396 | + } |
|
| 397 | + |
|
| 398 | + // regarder si l'on a (id_objet,objet) au depart et si on peut le mapper sur un id_xx |
|
| 399 | + if (count(array_intersect(array('id_objet', 'objet'), $keys)) == 2) { |
|
| 400 | + // regarder si l'une des cles d'arrivee peut se decomposer en |
|
| 401 | + // id_objet,objet |
|
| 402 | + // si oui on la prend |
|
| 403 | + foreach ($akeys as $key) { |
|
| 404 | + $v = decompose_champ_id_objet($key); |
|
| 405 | + if (is_array($v)) { |
|
| 406 | + $objet = array_shift($v); // objet,'article' |
|
| 407 | + array_unshift($v, $key); // id_article,objet,'article' |
|
| 408 | + array_unshift($v, $objet); // id_objet,id_article,objet,'article' |
|
| 409 | + return array(array($dnom, array($adesc['table'], $adesc), $v)); |
|
| 410 | + } |
|
| 411 | + } |
|
| 412 | + } else { |
|
| 413 | + // regarder si l'une des cles de depart peut se decomposer en |
|
| 414 | + // id_objet,objet a l'arrivee |
|
| 415 | + // si oui on la prend |
|
| 416 | + foreach ($keys as $key) { |
|
| 417 | + if (count($v = trouver_champs_decomposes($key, $adesc)) > 1) { |
|
| 418 | + if (count($v) == count(array_intersect($v, $akeys))) { |
|
| 419 | + $v = decompose_champ_id_objet($key); // id_objet,objet,'article' |
|
| 420 | + array_unshift($v, $key); // id_article,id_objet,objet,'article' |
|
| 421 | + return array(array($dnom, array($adesc['table'], $adesc), $v)); |
|
| 422 | + } |
|
| 423 | + } |
|
| 424 | + } |
|
| 425 | + } |
|
| 426 | + // si l'on voulait une jointure direct, c'est rate ! |
|
| 427 | + if ($max_liens <= 1) { |
|
| 428 | + return array(); |
|
| 429 | + } |
|
| 430 | + |
|
| 431 | + // sinon essayer de passer par une autre table |
|
| 432 | + $new = $vu; |
|
| 433 | + foreach ($boucle->jointures as $v) { |
|
| 434 | + if ($v |
|
| 435 | + and !in_array($v, $vu) |
|
| 436 | + and $def = $trouver_table($v, $boucle->sql_serveur) |
|
| 437 | + and !in_array($def['table_sql'], $vu) |
|
| 438 | + ) { |
|
| 439 | + // ne pas tester les cles qui sont exclues a l'appel |
|
| 440 | + // ie la cle de la jointure precedente |
|
| 441 | + $test_cles = $milieu_exclus; |
|
| 442 | + $new[] = $v; |
|
| 443 | + $max_iter = 50; // securite |
|
| 444 | + while (count($jointure_directe_possible = calculer_chaine_jointures($boucle, $depart, array($v, $def), $vu, |
|
| 445 | + $test_cles, 1)) |
|
| 446 | + and $max_iter--) { |
|
| 447 | + $jointure_directe_possible = reset($jointure_directe_possible); |
|
| 448 | + $milieu = end($jointure_directe_possible); |
|
| 449 | + $exclure_fin = $milieu_exclus; |
|
| 450 | + if (is_string($milieu)) { |
|
| 451 | + $exclure_fin[] = $milieu; |
|
| 452 | + $test_cles[] = $milieu; |
|
| 453 | + } else { |
|
| 454 | + $exclure_fin = array_merge($exclure_fin, $milieu); |
|
| 455 | + $test_cles = array_merge($test_cles, $milieu); |
|
| 456 | + } |
|
| 457 | + // essayer de rejoindre l'arrivee a partir de cette etape intermediaire |
|
| 458 | + // sans repasser par la meme cle milieu, ni une cle deja vue ! |
|
| 459 | + $r = calculer_chaine_jointures($boucle, array($v, $def), $arrivee, $new, $exclure_fin, $max_liens - 1); |
|
| 460 | + if ($r) { |
|
| 461 | + array_unshift($r, $jointure_directe_possible); |
|
| 462 | + |
|
| 463 | + return $r; |
|
| 464 | + } |
|
| 465 | + } |
|
| 466 | + } |
|
| 467 | + } |
|
| 468 | + |
|
| 469 | + return array(); |
|
| 470 | 470 | } |
| 471 | 471 | |
| 472 | 472 | /** |
@@ -477,18 +477,18 @@ discard block |
||
| 477 | 477 | * @return array |
| 478 | 478 | */ |
| 479 | 479 | function trouver_cles_table($keys) { |
| 480 | - $res = array(); |
|
| 481 | - foreach ($keys as $v) { |
|
| 482 | - if (!strpos($v, ",")) { |
|
| 483 | - $res[$v] = 1; |
|
| 484 | - } else { |
|
| 485 | - foreach (preg_split("/\s*,\s*/", $v) as $k) { |
|
| 486 | - $res[$k] = 1; |
|
| 487 | - } |
|
| 488 | - } |
|
| 489 | - } |
|
| 490 | - |
|
| 491 | - return array_keys($res); |
|
| 480 | + $res = array(); |
|
| 481 | + foreach ($keys as $v) { |
|
| 482 | + if (!strpos($v, ",")) { |
|
| 483 | + $res[$v] = 1; |
|
| 484 | + } else { |
|
| 485 | + foreach (preg_split("/\s*,\s*/", $v) as $k) { |
|
| 486 | + $res[$k] = 1; |
|
| 487 | + } |
|
| 488 | + } |
|
| 489 | + } |
|
| 490 | + |
|
| 491 | + return array_keys($res); |
|
| 492 | 492 | } |
| 493 | 493 | |
| 494 | 494 | |
@@ -515,33 +515,33 @@ discard block |
||
| 515 | 515 | * - 'alias' : alias utilisé pour la table (si pertinent. ie: avec `$boucle->from` transmis par exemple) |
| 516 | 516 | */ |
| 517 | 517 | function chercher_champ_dans_tables($cle, $tables, $connect, $checkarrivee = false) { |
| 518 | - static $trouver_table = ''; |
|
| 519 | - if (!$trouver_table) { |
|
| 520 | - $trouver_table = charger_fonction('trouver_table', 'base'); |
|
| 521 | - } |
|
| 522 | - |
|
| 523 | - if (!is_array($cle)) { |
|
| 524 | - $cle = array($cle); |
|
| 525 | - } |
|
| 526 | - |
|
| 527 | - foreach ($tables as $k => $table) { |
|
| 528 | - if ($table && $desc = $trouver_table($table, $connect)) { |
|
| 529 | - if (isset($desc['field']) |
|
| 530 | - // verifier que toutes les cles cherchees sont la |
|
| 531 | - and (count(array_intersect($cle, array_keys($desc['field']))) == count($cle)) |
|
| 532 | - // si on sait ou on veut arriver, il faut que ca colle |
|
| 533 | - and ($checkarrivee == false || $checkarrivee == $desc['table']) |
|
| 534 | - ) { |
|
| 535 | - return array( |
|
| 536 | - 'desc' => $desc, |
|
| 537 | - 'table' => $desc['table'], |
|
| 538 | - 'alias' => $k, |
|
| 539 | - ); |
|
| 540 | - } |
|
| 541 | - } |
|
| 542 | - } |
|
| 543 | - |
|
| 544 | - return false; |
|
| 518 | + static $trouver_table = ''; |
|
| 519 | + if (!$trouver_table) { |
|
| 520 | + $trouver_table = charger_fonction('trouver_table', 'base'); |
|
| 521 | + } |
|
| 522 | + |
|
| 523 | + if (!is_array($cle)) { |
|
| 524 | + $cle = array($cle); |
|
| 525 | + } |
|
| 526 | + |
|
| 527 | + foreach ($tables as $k => $table) { |
|
| 528 | + if ($table && $desc = $trouver_table($table, $connect)) { |
|
| 529 | + if (isset($desc['field']) |
|
| 530 | + // verifier que toutes les cles cherchees sont la |
|
| 531 | + and (count(array_intersect($cle, array_keys($desc['field']))) == count($cle)) |
|
| 532 | + // si on sait ou on veut arriver, il faut que ca colle |
|
| 533 | + and ($checkarrivee == false || $checkarrivee == $desc['table']) |
|
| 534 | + ) { |
|
| 535 | + return array( |
|
| 536 | + 'desc' => $desc, |
|
| 537 | + 'table' => $desc['table'], |
|
| 538 | + 'alias' => $k, |
|
| 539 | + ); |
|
| 540 | + } |
|
| 541 | + } |
|
| 542 | + } |
|
| 543 | + |
|
| 544 | + return false; |
|
| 545 | 545 | } |
| 546 | 546 | |
| 547 | 547 | /** |
@@ -567,52 +567,52 @@ discard block |
||
| 567 | 567 | */ |
| 568 | 568 | function trouver_champ_exterieur($cle, $joints, &$boucle, $checkarrivee = false) { |
| 569 | 569 | |
| 570 | - // support de la recherche multi champ : |
|
| 571 | - // si en seconde etape on a decompose le champ id_xx en id_objet,objet |
|
| 572 | - // on reentre ici soit en cherchant une table les 2 champs id_objet,objet |
|
| 573 | - // soit une table avec les 3 champs id_xx, id_objet, objet |
|
| 574 | - if (!is_array($cle)) { |
|
| 575 | - $cle = array($cle); |
|
| 576 | - } |
|
| 577 | - |
|
| 578 | - if ($infos = chercher_champ_dans_tables($cle, $joints, $boucle->sql_serveur, $checkarrivee)) { |
|
| 579 | - return array($infos['table'], $infos['desc'], $cle); |
|
| 580 | - } |
|
| 581 | - |
|
| 582 | - // au premier coup, on essaye de decomposer, si possible |
|
| 583 | - if (count($cle) == 1 |
|
| 584 | - and $c = reset($cle) |
|
| 585 | - and is_array($decompose = decompose_champ_id_objet($c)) |
|
| 586 | - ) { |
|
| 587 | - |
|
| 588 | - $desc = $boucle->show; |
|
| 589 | - |
|
| 590 | - // cas 1 : la cle id_xx est dans la table de depart |
|
| 591 | - // -> on cherche uniquement id_objet,objet a l'arrivee |
|
| 592 | - if (isset($desc['field'][$c])) { |
|
| 593 | - $cle = array(); |
|
| 594 | - $cle[] = array_shift($decompose); // id_objet |
|
| 595 | - $cle[] = array_shift($decompose); // objet |
|
| 596 | - return trouver_champ_exterieur($cle, $joints, $boucle, $checkarrivee); |
|
| 597 | - } |
|
| 598 | - // cas 2 : la cle id_xx n'est pas dans la table de depart |
|
| 599 | - // -> il faut trouver une cle de depart zzz telle que |
|
| 600 | - // id_objet,objet,zzz soit a l'arrivee |
|
| 601 | - else { |
|
| 602 | - $depart = liste_champs_jointures((isset($desc['table']) ? $desc['table'] : ''), $desc); |
|
| 603 | - foreach ($depart as $d) { |
|
| 604 | - $cle = array(); |
|
| 605 | - $cle[] = array_shift($decompose); // id_objet |
|
| 606 | - $cle[] = array_shift($decompose); // objet |
|
| 607 | - $cle[] = $d; |
|
| 608 | - if ($ext = trouver_champ_exterieur($cle, $joints, $boucle, $checkarrivee)) { |
|
| 609 | - return $ext; |
|
| 610 | - } |
|
| 611 | - } |
|
| 612 | - } |
|
| 613 | - } |
|
| 614 | - |
|
| 615 | - return ""; |
|
| 570 | + // support de la recherche multi champ : |
|
| 571 | + // si en seconde etape on a decompose le champ id_xx en id_objet,objet |
|
| 572 | + // on reentre ici soit en cherchant une table les 2 champs id_objet,objet |
|
| 573 | + // soit une table avec les 3 champs id_xx, id_objet, objet |
|
| 574 | + if (!is_array($cle)) { |
|
| 575 | + $cle = array($cle); |
|
| 576 | + } |
|
| 577 | + |
|
| 578 | + if ($infos = chercher_champ_dans_tables($cle, $joints, $boucle->sql_serveur, $checkarrivee)) { |
|
| 579 | + return array($infos['table'], $infos['desc'], $cle); |
|
| 580 | + } |
|
| 581 | + |
|
| 582 | + // au premier coup, on essaye de decomposer, si possible |
|
| 583 | + if (count($cle) == 1 |
|
| 584 | + and $c = reset($cle) |
|
| 585 | + and is_array($decompose = decompose_champ_id_objet($c)) |
|
| 586 | + ) { |
|
| 587 | + |
|
| 588 | + $desc = $boucle->show; |
|
| 589 | + |
|
| 590 | + // cas 1 : la cle id_xx est dans la table de depart |
|
| 591 | + // -> on cherche uniquement id_objet,objet a l'arrivee |
|
| 592 | + if (isset($desc['field'][$c])) { |
|
| 593 | + $cle = array(); |
|
| 594 | + $cle[] = array_shift($decompose); // id_objet |
|
| 595 | + $cle[] = array_shift($decompose); // objet |
|
| 596 | + return trouver_champ_exterieur($cle, $joints, $boucle, $checkarrivee); |
|
| 597 | + } |
|
| 598 | + // cas 2 : la cle id_xx n'est pas dans la table de depart |
|
| 599 | + // -> il faut trouver une cle de depart zzz telle que |
|
| 600 | + // id_objet,objet,zzz soit a l'arrivee |
|
| 601 | + else { |
|
| 602 | + $depart = liste_champs_jointures((isset($desc['table']) ? $desc['table'] : ''), $desc); |
|
| 603 | + foreach ($depart as $d) { |
|
| 604 | + $cle = array(); |
|
| 605 | + $cle[] = array_shift($decompose); // id_objet |
|
| 606 | + $cle[] = array_shift($decompose); // objet |
|
| 607 | + $cle[] = $d; |
|
| 608 | + if ($ext = trouver_champ_exterieur($cle, $joints, $boucle, $checkarrivee)) { |
|
| 609 | + return $ext; |
|
| 610 | + } |
|
| 611 | + } |
|
| 612 | + } |
|
| 613 | + } |
|
| 614 | + |
|
| 615 | + return ""; |
|
| 616 | 616 | } |
| 617 | 617 | |
| 618 | 618 | /** |
@@ -644,21 +644,21 @@ discard block |
||
| 644 | 644 | * @return string |
| 645 | 645 | */ |
| 646 | 646 | function trouver_jointure_champ($champ, &$boucle, $jointures = false, $cond = false, $checkarrivee = false) { |
| 647 | - if ($jointures === false) { |
|
| 648 | - $jointures = $boucle->jointures; |
|
| 649 | - } |
|
| 650 | - // TODO : aberration, on utilise $jointures pour trouver le champ |
|
| 651 | - // mais pas poour construire la jointure ensuite |
|
| 652 | - $arrivee = trouver_champ_exterieur($champ, $jointures, $boucle, $checkarrivee); |
|
| 653 | - if ($arrivee) { |
|
| 654 | - $desc = $boucle->show; |
|
| 655 | - array_pop($arrivee); // enlever la cle en 3eme argument |
|
| 656 | - $cle = calculer_jointure($boucle, array($desc['id_table'], $desc), $arrivee, '', $cond); |
|
| 657 | - if ($cle) { |
|
| 658 | - return $cle; |
|
| 659 | - } |
|
| 660 | - } |
|
| 661 | - spip_log("trouver_jointure_champ: $champ inconnu"); |
|
| 662 | - |
|
| 663 | - return ''; |
|
| 647 | + if ($jointures === false) { |
|
| 648 | + $jointures = $boucle->jointures; |
|
| 649 | + } |
|
| 650 | + // TODO : aberration, on utilise $jointures pour trouver le champ |
|
| 651 | + // mais pas poour construire la jointure ensuite |
|
| 652 | + $arrivee = trouver_champ_exterieur($champ, $jointures, $boucle, $checkarrivee); |
|
| 653 | + if ($arrivee) { |
|
| 654 | + $desc = $boucle->show; |
|
| 655 | + array_pop($arrivee); // enlever la cle en 3eme argument |
|
| 656 | + $cle = calculer_jointure($boucle, array($desc['id_table'], $desc), $arrivee, '', $cond); |
|
| 657 | + if ($cle) { |
|
| 658 | + return $cle; |
|
| 659 | + } |
|
| 660 | + } |
|
| 661 | + spip_log("trouver_jointure_champ: $champ inconnu"); |
|
| 662 | + |
|
| 663 | + return ''; |
|
| 664 | 664 | } |
@@ -176,14 +176,14 @@ discard block |
||
| 176 | 176 | // sache qu'il peut enlever ce where si il enleve la jointure |
| 177 | 177 | $boucle->where["JOIN-L$n"] = |
| 178 | 178 | $echap ? |
| 179 | - array("'='","'$obj'","sql_quote('$type')") |
|
| 179 | + array("'='", "'$obj'", "sql_quote('$type')") |
|
| 180 | 180 | : |
| 181 | - array("=","$obj",sql_quote($type)); |
|
| 181 | + array("=", "$obj", sql_quote($type)); |
|
| 182 | 182 | $boucle->join["L$n"] = |
| 183 | 183 | $echap ? |
| 184 | 184 | array("'$id_table'", "'$j2'", "'$j1'", "'$obj='.sql_quote('$type')") |
| 185 | 185 | : |
| 186 | - array($id_table, $j2, $j1, "$obj=" . sql_quote($type)); |
|
| 186 | + array($id_table, $j2, $j1, "$obj=".sql_quote($type)); |
|
| 187 | 187 | } else { |
| 188 | 188 | $boucle->join["L$n"] = $echap ? array("'$id_table'", "'$j'") : array($id_table, $j); |
| 189 | 189 | } |
@@ -216,7 +216,7 @@ discard block |
||
| 216 | 216 | $groups = liste_champs_jointures($nom, $desc, true); |
| 217 | 217 | if (!$pk) { |
| 218 | 218 | foreach ($groups as $id_prim) { |
| 219 | - $id_field = $nom . '.' . $id_prim; |
|
| 219 | + $id_field = $nom.'.'.$id_prim; |
|
| 220 | 220 | if (!in_array($id_field, $boucle->group)) { |
| 221 | 221 | $boucle->group[] = $id_field; |
| 222 | 222 | } |
@@ -75,6 +75,9 @@ |
||
| 75 | 75 | } |
| 76 | 76 | |
| 77 | 77 | |
| 78 | +/** |
|
| 79 | + * @param string $nom |
|
| 80 | + */ |
|
| 78 | 81 | function phraser_logo_faux_filtres($nom) { |
| 79 | 82 | switch ($nom) { |
| 80 | 83 | case 'top': |
@@ -53,7 +53,7 @@ discard block |
||
| 53 | 53 | $p->etoile = '*'; |
| 54 | 54 | spip_log("filtre de logo obsolete $nom", 'vieilles_defs'); |
| 55 | 55 | |
| 56 | - } elseif (preg_match("/^" . NOM_DE_CHAMP . '(.*)$/sS', $nom, $m)) { |
|
| 56 | + } elseif (preg_match("/^".NOM_DE_CHAMP.'(.*)$/sS', $nom, $m)) { |
|
| 57 | 57 | $champ = new Champ(); |
| 58 | 58 | $champ->nom_boucle = $m[2]; |
| 59 | 59 | $champ->nom_champ = $m[3]; |
@@ -131,7 +131,7 @@ discard block |
||
| 131 | 131 | $p->param[0][1] = array($c); |
| 132 | 132 | $p->param[0][0] = ''; |
| 133 | 133 | $p->fonctions = array(); |
| 134 | - spip_log('FORMULAIRE_RECHERCHE avec filtre ' . $c->texte, 'vieilles_defs'); |
|
| 134 | + spip_log('FORMULAIRE_RECHERCHE avec filtre '.$c->texte, 'vieilles_defs'); |
|
| 135 | 135 | } |
| 136 | 136 | } |
| 137 | 137 | |
@@ -11,7 +11,7 @@ discard block |
||
| 11 | 11 | \***************************************************************************/ |
| 12 | 12 | |
| 13 | 13 | if (!defined('_ECRIRE_INC_VERSION')) { |
| 14 | - return; |
|
| 14 | + return; |
|
| 15 | 15 | } |
| 16 | 16 | |
| 17 | 17 | // Les fonctions de ce fichier sont appelees en certains points |
@@ -25,135 +25,135 @@ discard block |
||
| 25 | 25 | // -> https://www.spip.net/fr_article901.html |
| 26 | 26 | |
| 27 | 27 | function phraser_vieux_logos(&$p) { |
| 28 | - if ($p->param[0][0]) { |
|
| 29 | - $args = array(''); |
|
| 30 | - } else { |
|
| 31 | - $args = array_shift($p->param); |
|
| 32 | - } |
|
| 33 | - |
|
| 34 | - foreach ($p->param as $couple) { |
|
| 35 | - $nom = trim($couple[0]); |
|
| 36 | - if ($nom == '') { |
|
| 37 | - array_shift($p->param); |
|
| 38 | - break; |
|
| 39 | - } |
|
| 40 | - $r = phraser_logo_faux_filtres($nom); |
|
| 41 | - if ($r === 0) { |
|
| 42 | - $c = new Texte; |
|
| 43 | - $c->texte = $nom; |
|
| 44 | - $args[] = array($c); |
|
| 45 | - array_shift($p->param); |
|
| 46 | - spip_log("filtre de logo obsolete $nom", 'vieilles_defs'); |
|
| 47 | - } elseif ($r === 2) { |
|
| 48 | - $p->etoile = '**'; |
|
| 49 | - array_shift($p->param); |
|
| 50 | - spip_log("filtre de logo obsolete $nom", 'vieilles_defs'); |
|
| 51 | - } elseif ($r === 1) { |
|
| 52 | - array_shift($p->param); |
|
| 53 | - $p->etoile = '*'; |
|
| 54 | - spip_log("filtre de logo obsolete $nom", 'vieilles_defs'); |
|
| 55 | - |
|
| 56 | - } elseif (preg_match("/^" . NOM_DE_CHAMP . '(.*)$/sS', $nom, $m)) { |
|
| 57 | - $champ = new Champ(); |
|
| 58 | - $champ->nom_boucle = $m[2]; |
|
| 59 | - $champ->nom_champ = $m[3]; |
|
| 60 | - $champ->etoile = $m[5]; |
|
| 61 | - $champ = array($champ); |
|
| 62 | - if ($m[6]) { |
|
| 63 | - $r = new Texte; |
|
| 64 | - $r->texte = $m[6]; |
|
| 65 | - $champ[] = $r; |
|
| 66 | - } |
|
| 67 | - $args[] = $champ; |
|
| 68 | - array_shift($p->param); |
|
| 69 | - spip_log("filtre de logo obsolete $nom", 'vieilles_defs'); |
|
| 70 | - |
|
| 71 | - } // le cas else est la seule incompatibilite |
|
| 72 | - |
|
| 73 | - } |
|
| 74 | - array_unshift($p->param, $args); |
|
| 28 | + if ($p->param[0][0]) { |
|
| 29 | + $args = array(''); |
|
| 30 | + } else { |
|
| 31 | + $args = array_shift($p->param); |
|
| 32 | + } |
|
| 33 | + |
|
| 34 | + foreach ($p->param as $couple) { |
|
| 35 | + $nom = trim($couple[0]); |
|
| 36 | + if ($nom == '') { |
|
| 37 | + array_shift($p->param); |
|
| 38 | + break; |
|
| 39 | + } |
|
| 40 | + $r = phraser_logo_faux_filtres($nom); |
|
| 41 | + if ($r === 0) { |
|
| 42 | + $c = new Texte; |
|
| 43 | + $c->texte = $nom; |
|
| 44 | + $args[] = array($c); |
|
| 45 | + array_shift($p->param); |
|
| 46 | + spip_log("filtre de logo obsolete $nom", 'vieilles_defs'); |
|
| 47 | + } elseif ($r === 2) { |
|
| 48 | + $p->etoile = '**'; |
|
| 49 | + array_shift($p->param); |
|
| 50 | + spip_log("filtre de logo obsolete $nom", 'vieilles_defs'); |
|
| 51 | + } elseif ($r === 1) { |
|
| 52 | + array_shift($p->param); |
|
| 53 | + $p->etoile = '*'; |
|
| 54 | + spip_log("filtre de logo obsolete $nom", 'vieilles_defs'); |
|
| 55 | + |
|
| 56 | + } elseif (preg_match("/^" . NOM_DE_CHAMP . '(.*)$/sS', $nom, $m)) { |
|
| 57 | + $champ = new Champ(); |
|
| 58 | + $champ->nom_boucle = $m[2]; |
|
| 59 | + $champ->nom_champ = $m[3]; |
|
| 60 | + $champ->etoile = $m[5]; |
|
| 61 | + $champ = array($champ); |
|
| 62 | + if ($m[6]) { |
|
| 63 | + $r = new Texte; |
|
| 64 | + $r->texte = $m[6]; |
|
| 65 | + $champ[] = $r; |
|
| 66 | + } |
|
| 67 | + $args[] = $champ; |
|
| 68 | + array_shift($p->param); |
|
| 69 | + spip_log("filtre de logo obsolete $nom", 'vieilles_defs'); |
|
| 70 | + |
|
| 71 | + } // le cas else est la seule incompatibilite |
|
| 72 | + |
|
| 73 | + } |
|
| 74 | + array_unshift($p->param, $args); |
|
| 75 | 75 | } |
| 76 | 76 | |
| 77 | 77 | |
| 78 | 78 | function phraser_logo_faux_filtres($nom) { |
| 79 | - switch ($nom) { |
|
| 80 | - case 'top': |
|
| 81 | - case 'left': |
|
| 82 | - case 'right': |
|
| 83 | - case 'center': |
|
| 84 | - case 'bottom': |
|
| 85 | - return 0; |
|
| 86 | - case 'lien': |
|
| 87 | - return 1; |
|
| 88 | - case 'fichier': |
|
| 89 | - return 2; |
|
| 90 | - default: |
|
| 91 | - return $nom; |
|
| 92 | - } |
|
| 79 | + switch ($nom) { |
|
| 80 | + case 'top': |
|
| 81 | + case 'left': |
|
| 82 | + case 'right': |
|
| 83 | + case 'center': |
|
| 84 | + case 'bottom': |
|
| 85 | + return 0; |
|
| 86 | + case 'lien': |
|
| 87 | + return 1; |
|
| 88 | + case 'fichier': |
|
| 89 | + return 2; |
|
| 90 | + default: |
|
| 91 | + return $nom; |
|
| 92 | + } |
|
| 93 | 93 | } |
| 94 | 94 | |
| 95 | 95 | |
| 96 | 96 | // La balise embed_document est a present le modele emb |
| 97 | 97 | |
| 98 | 98 | function phraser_vieux_emb(&$p) { |
| 99 | - if (!is_array($p->param)) { |
|
| 100 | - $p->param = array(); |
|
| 101 | - } |
|
| 102 | - |
|
| 103 | - // Produire le premier argument {emb} |
|
| 104 | - $texte = new Texte; |
|
| 105 | - $texte->texte = 'emb'; |
|
| 106 | - $param = array('', array($texte)); |
|
| 107 | - |
|
| 108 | - // Transformer les filtres en arguments |
|
| 109 | - for ($i = 0; $i < count($p->param); $i++) { |
|
| 110 | - if ($p->param[$i][0]) { |
|
| 111 | - if (!strstr($p->param[$i][0], '=')) { |
|
| 112 | - break; |
|
| 113 | - }# on a rencontre un vrai filtre, c'est fini |
|
| 114 | - $texte = new Texte; |
|
| 115 | - $texte->texte = $p->param[$i][0]; |
|
| 116 | - $param[] = array($texte); |
|
| 117 | - } |
|
| 118 | - array_shift($p->param); |
|
| 119 | - } |
|
| 120 | - array_unshift($p->param, $param); |
|
| 121 | - spip_log('balise EMBED_DOCUMENT obsolete', 'vieilles_defs'); |
|
| 122 | - $p->nom_champ = 'MODELE'; |
|
| 99 | + if (!is_array($p->param)) { |
|
| 100 | + $p->param = array(); |
|
| 101 | + } |
|
| 102 | + |
|
| 103 | + // Produire le premier argument {emb} |
|
| 104 | + $texte = new Texte; |
|
| 105 | + $texte->texte = 'emb'; |
|
| 106 | + $param = array('', array($texte)); |
|
| 107 | + |
|
| 108 | + // Transformer les filtres en arguments |
|
| 109 | + for ($i = 0; $i < count($p->param); $i++) { |
|
| 110 | + if ($p->param[$i][0]) { |
|
| 111 | + if (!strstr($p->param[$i][0], '=')) { |
|
| 112 | + break; |
|
| 113 | + }# on a rencontre un vrai filtre, c'est fini |
|
| 114 | + $texte = new Texte; |
|
| 115 | + $texte->texte = $p->param[$i][0]; |
|
| 116 | + $param[] = array($texte); |
|
| 117 | + } |
|
| 118 | + array_shift($p->param); |
|
| 119 | + } |
|
| 120 | + array_unshift($p->param, $param); |
|
| 121 | + spip_log('balise EMBED_DOCUMENT obsolete', 'vieilles_defs'); |
|
| 122 | + $p->nom_champ = 'MODELE'; |
|
| 123 | 123 | } |
| 124 | 124 | |
| 125 | 125 | // Vieux formulaire de recherch |
| 126 | 126 | |
| 127 | 127 | function phraser_vieux_recherche($p) { |
| 128 | - if ($p->param[0][0]) { |
|
| 129 | - $c = new Texte; |
|
| 130 | - $c->texte = $p->param[0][0]; |
|
| 131 | - $p->param[0][1] = array($c); |
|
| 132 | - $p->param[0][0] = ''; |
|
| 133 | - $p->fonctions = array(); |
|
| 134 | - spip_log('FORMULAIRE_RECHERCHE avec filtre ' . $c->texte, 'vieilles_defs'); |
|
| 135 | - } |
|
| 128 | + if ($p->param[0][0]) { |
|
| 129 | + $c = new Texte; |
|
| 130 | + $c->texte = $p->param[0][0]; |
|
| 131 | + $p->param[0][1] = array($c); |
|
| 132 | + $p->param[0][0] = ''; |
|
| 133 | + $p->fonctions = array(); |
|
| 134 | + spip_log('FORMULAIRE_RECHERCHE avec filtre ' . $c->texte, 'vieilles_defs'); |
|
| 135 | + } |
|
| 136 | 136 | } |
| 137 | 137 | |
| 138 | 138 | // Gerer la notation [(#EXPOSER|on,off)] |
| 139 | 139 | function phraser_vieux_exposer($p) { |
| 140 | - if ($a = $p->fonctions) { |
|
| 141 | - preg_match("#([^,]*)(,(.*))?#", $a[0][0], $regs); |
|
| 142 | - $args = array(); |
|
| 143 | - if ($regs[1]) { |
|
| 144 | - $a = new Texte; |
|
| 145 | - $a->texte = $regs[1]; |
|
| 146 | - $args = array('', array($a)); |
|
| 147 | - if ($regs[3]) { |
|
| 148 | - $a = new Texte; |
|
| 149 | - $a->texte = $regs[3]; |
|
| 150 | - $args[] = array($a); |
|
| 151 | - } |
|
| 152 | - } |
|
| 153 | - $p->param[0] = $args; |
|
| 154 | - $p->fonctions = array(); |
|
| 155 | - $p->nom_champ = 'EXPOSE'; |
|
| 156 | - } |
|
| 140 | + if ($a = $p->fonctions) { |
|
| 141 | + preg_match("#([^,]*)(,(.*))?#", $a[0][0], $regs); |
|
| 142 | + $args = array(); |
|
| 143 | + if ($regs[1]) { |
|
| 144 | + $a = new Texte; |
|
| 145 | + $a->texte = $regs[1]; |
|
| 146 | + $args = array('', array($a)); |
|
| 147 | + if ($regs[3]) { |
|
| 148 | + $a = new Texte; |
|
| 149 | + $a->texte = $regs[3]; |
|
| 150 | + $args[] = array($a); |
|
| 151 | + } |
|
| 152 | + } |
|
| 153 | + $p->param[0] = $args; |
|
| 154 | + $p->fonctions = array(); |
|
| 155 | + $p->nom_champ = 'EXPOSE'; |
|
| 156 | + } |
|
| 157 | 157 | } |
| 158 | 158 | |
| 159 | 159 | function phraser_vieux_modele($p) { normaliser_args_inclumodel($p); } |
@@ -161,55 +161,55 @@ discard block |
||
| 161 | 161 | function phraser_vieux_inclu($p) { normaliser_args_inclumodel($p); } |
| 162 | 162 | |
| 163 | 163 | function normaliser_args_inclumodel($p) { |
| 164 | - $params = $p->param; |
|
| 165 | - if (!$params) { |
|
| 166 | - return; |
|
| 167 | - } |
|
| 168 | - $args = $params[0]; |
|
| 169 | - if ($args[0]) { |
|
| 170 | - return; |
|
| 171 | - } // filtre immediat |
|
| 172 | - array_shift($p->param); |
|
| 173 | - foreach ($p->param as $l) { |
|
| 174 | - if (!array_shift($l)) { |
|
| 175 | - $args = array_merge($args, $l); |
|
| 176 | - array_shift($p->param); |
|
| 177 | - } else { |
|
| 178 | - break; |
|
| 179 | - } // filtre |
|
| 180 | - } |
|
| 181 | - array_unshift($p->param, $args); |
|
| 164 | + $params = $p->param; |
|
| 165 | + if (!$params) { |
|
| 166 | + return; |
|
| 167 | + } |
|
| 168 | + $args = $params[0]; |
|
| 169 | + if ($args[0]) { |
|
| 170 | + return; |
|
| 171 | + } // filtre immediat |
|
| 172 | + array_shift($p->param); |
|
| 173 | + foreach ($p->param as $l) { |
|
| 174 | + if (!array_shift($l)) { |
|
| 175 | + $args = array_merge($args, $l); |
|
| 176 | + array_shift($p->param); |
|
| 177 | + } else { |
|
| 178 | + break; |
|
| 179 | + } // filtre |
|
| 180 | + } |
|
| 181 | + array_unshift($p->param, $args); |
|
| 182 | 182 | } |
| 183 | 183 | |
| 184 | 184 | function normaliser_inclure($champ) { |
| 185 | - normaliser_args_inclumodel($champ); |
|
| 186 | - $l = $champ->param[0]; |
|
| 187 | - if (is_array($l) and !$l[0]) { |
|
| 188 | - foreach ($l as $k => $p) { |
|
| 189 | - if ($p and $p[0]->type == 'texte' and !strpos($p[0]->texte, '=')) { |
|
| 190 | - $p[0]->texte = trim($p[0]->texte); |
|
| 191 | - } |
|
| 192 | - } |
|
| 193 | - foreach ($l as $k => $p) { |
|
| 194 | - if (!$p or $p[0]->type != 'texte' or |
|
| 195 | - !preg_match('/^fond\s*=\s*(.*)$/', $p[0]->texte, $r) |
|
| 196 | - ) { |
|
| 197 | - continue; |
|
| 198 | - } |
|
| 199 | - |
|
| 200 | - if ($r[1]) { |
|
| 201 | - $p[0]->texte = $r[1]; |
|
| 202 | - } else { |
|
| 203 | - unset($p[0]); |
|
| 204 | - } |
|
| 205 | - $champ->texte = $p; |
|
| 206 | - unset($champ->param[0][$k]); |
|
| 207 | - if (count($champ->param[0]) == 1) { |
|
| 208 | - array_shift($champ->param); |
|
| 209 | - } |
|
| 210 | - |
|
| 211 | - return; |
|
| 212 | - } |
|
| 213 | - } |
|
| 214 | - spip_log("inclure sans fond ni fichier"); |
|
| 185 | + normaliser_args_inclumodel($champ); |
|
| 186 | + $l = $champ->param[0]; |
|
| 187 | + if (is_array($l) and !$l[0]) { |
|
| 188 | + foreach ($l as $k => $p) { |
|
| 189 | + if ($p and $p[0]->type == 'texte' and !strpos($p[0]->texte, '=')) { |
|
| 190 | + $p[0]->texte = trim($p[0]->texte); |
|
| 191 | + } |
|
| 192 | + } |
|
| 193 | + foreach ($l as $k => $p) { |
|
| 194 | + if (!$p or $p[0]->type != 'texte' or |
|
| 195 | + !preg_match('/^fond\s*=\s*(.*)$/', $p[0]->texte, $r) |
|
| 196 | + ) { |
|
| 197 | + continue; |
|
| 198 | + } |
|
| 199 | + |
|
| 200 | + if ($r[1]) { |
|
| 201 | + $p[0]->texte = $r[1]; |
|
| 202 | + } else { |
|
| 203 | + unset($p[0]); |
|
| 204 | + } |
|
| 205 | + $champ->texte = $p; |
|
| 206 | + unset($champ->param[0][$k]); |
|
| 207 | + if (count($champ->param[0]) == 1) { |
|
| 208 | + array_shift($champ->param); |
|
| 209 | + } |
|
| 210 | + |
|
| 211 | + return; |
|
| 212 | + } |
|
| 213 | + } |
|
| 214 | + spip_log("inclure sans fond ni fichier"); |
|
| 215 | 215 | } |
@@ -231,7 +231,7 @@ |
||
| 231 | 231 | * |
| 232 | 232 | * @uses public_tester_redirection_dist() |
| 233 | 233 | * @param string $fond |
| 234 | - * @param array $contexte |
|
| 234 | + * @param string $contexte |
|
| 235 | 235 | * @param string $connect |
| 236 | 236 | * @return array|bool |
| 237 | 237 | */ |
@@ -11,7 +11,7 @@ discard block |
||
| 11 | 11 | \***************************************************************************/ |
| 12 | 12 | |
| 13 | 13 | if (!defined('_ECRIRE_INC_VERSION')) { |
| 14 | - return; |
|
| 14 | + return; |
|
| 15 | 15 | } |
| 16 | 16 | |
| 17 | 17 | include_fichiers_fonctions(); |
@@ -31,177 +31,177 @@ discard block |
||
| 31 | 31 | |
| 32 | 32 | // https://code.spip.net/@public_parametrer_dist |
| 33 | 33 | function public_parametrer_dist($fond, $contexte = '', $cache = '', $connect = '') { |
| 34 | - static $composer, $styliser, $notes = null; |
|
| 35 | - $page = tester_redirection($fond, $contexte, $connect); |
|
| 36 | - if ($page) { |
|
| 37 | - return $page; |
|
| 38 | - } |
|
| 39 | - |
|
| 40 | - if (isset($contexte['lang'])) { |
|
| 41 | - $lang = $contexte['lang']; |
|
| 42 | - } elseif (!isset($lang)) { |
|
| 43 | - $lang = $GLOBALS['meta']['langue_site']; |
|
| 44 | - } |
|
| 45 | - |
|
| 46 | - $select = ((!isset($GLOBALS['forcer_lang']) or !$GLOBALS['forcer_lang']) and $lang <> $GLOBALS['spip_lang']); |
|
| 47 | - if ($select) { |
|
| 48 | - $select = lang_select($lang); |
|
| 49 | - } |
|
| 50 | - |
|
| 51 | - $debug = (defined('_VAR_MODE') && _VAR_MODE == 'debug'); |
|
| 52 | - |
|
| 53 | - if (!$styliser) { |
|
| 54 | - $styliser = charger_fonction('styliser', 'public'); |
|
| 55 | - } |
|
| 56 | - list($skel, $mime_type, $gram, $sourcefile) = |
|
| 57 | - $styliser($fond, $contexte, $GLOBALS['spip_lang'], $connect); |
|
| 58 | - |
|
| 59 | - if ($skel) { |
|
| 60 | - |
|
| 61 | - // sauver le nom de l'eventuel squelette en cours d'execution |
|
| 62 | - // (recursion possible a cause des modeles) |
|
| 63 | - if ($debug) { |
|
| 64 | - $courant = @$GLOBALS['debug_objets']['courant']; |
|
| 65 | - $GLOBALS['debug_objets']['contexte'][$sourcefile] = $contexte; |
|
| 66 | - } |
|
| 67 | - |
|
| 68 | - // charger le squelette en specifiant les langages cibles et source |
|
| 69 | - // au cas il faudrait le compiler (source posterieure au resultat) |
|
| 70 | - |
|
| 71 | - if (!$composer) { |
|
| 72 | - $composer = charger_fonction('composer', 'public'); |
|
| 73 | - } |
|
| 74 | - $fonc = $composer($skel, $mime_type, $gram, $sourcefile, $connect); |
|
| 75 | - } else { |
|
| 76 | - $fonc = ''; |
|
| 77 | - } |
|
| 78 | - |
|
| 79 | - if (!$fonc) { // squelette inconnu (==='') ou faux (===false) |
|
| 80 | - $page = $fonc; |
|
| 81 | - } else { |
|
| 82 | - // Preparer l'appel de la fonction principale du squelette |
|
| 83 | - |
|
| 84 | - spip_timer($a = 'calcul page ' . rand(0, 1000)); |
|
| 85 | - |
|
| 86 | - // On cree un marqueur de notes unique lie a cette composition |
|
| 87 | - // et on enregistre l'etat courant des globales de notes... |
|
| 88 | - if (is_null($notes)) { |
|
| 89 | - $notes = charger_fonction('notes', 'inc', true); |
|
| 90 | - } |
|
| 91 | - if ($notes) { |
|
| 92 | - $notes('', 'empiler'); |
|
| 93 | - } |
|
| 94 | - |
|
| 95 | - // Rajouter d'office ces deux parametres |
|
| 96 | - // (mais vaudrait mieux que le compilateur sache le simuler |
|
| 97 | - // car ca interdit l'usage de criteres conditionnels dessus). |
|
| 98 | - if (!isset($contexte['date'])) { |
|
| 99 | - $contexte['date'] = date("Y-m-d H:i:s"); |
|
| 100 | - $contexte['date_default'] = true; |
|
| 101 | - } else { |
|
| 102 | - $contexte['date'] = normaliser_date($contexte['date'], true); |
|
| 103 | - } |
|
| 104 | - |
|
| 105 | - if (!isset($contexte['date_redac'])) { |
|
| 106 | - $contexte['date_redac'] = date("Y-m-d H:i:s"); |
|
| 107 | - $contexte['date_redac_default'] = true; |
|
| 108 | - } else { |
|
| 109 | - $contexte['date_redac'] = normaliser_date($contexte['date_redac'], true); |
|
| 110 | - } |
|
| 111 | - |
|
| 112 | - // Passer le nom du cache pour produire sa destruction automatique |
|
| 113 | - try { |
|
| 114 | - $page = $fonc(array('cache' => $cache), array($contexte)); |
|
| 115 | - } catch (Throwable $e) { |
|
| 116 | - $msg = _T('zbug_erreur_execution_page') . " $sourcefile"; |
|
| 117 | - $full_msg = $msg . ' | File ' . $e->getFile() . ' Line ' . $e->getLine() . ' : ' . $e->getMessage(); |
|
| 118 | - $full_msg = str_replace(_ROOT_RACINE, '[…]/', $full_msg); |
|
| 119 | - $corps = "<pre>$msg</pre>"; |
|
| 120 | - $page = analyse_resultat_skel($fond, array('cache' => $cache), $corps, $sourcefile); |
|
| 121 | - erreur_squelette($full_msg); |
|
| 122 | - unset($msg, $full_msg, $corps); |
|
| 123 | - } |
|
| 124 | - |
|
| 125 | - // Restituer les globales de notes telles qu'elles etaient avant l'appel |
|
| 126 | - // Si l'inclus n'a pas affiche ses notes, tant pis (elles *doivent* |
|
| 127 | - // etre dans son resultat, autrement elles ne seraient pas prises en |
|
| 128 | - // compte a chaque calcul d'un texte contenant un modele, mais seulement |
|
| 129 | - // quand le modele serait calcule, et on aurait des resultats incoherents) |
|
| 130 | - if ($notes) { |
|
| 131 | - $notes('', 'depiler'); |
|
| 132 | - } |
|
| 133 | - |
|
| 134 | - // reinjecter en dynamique la pile des notes |
|
| 135 | - // si il y a des inclure dynamiques |
|
| 136 | - // si la pile n'est pas vide |
|
| 137 | - // la generalisation de cette injection permettrait de corriger le point juste au dessus |
|
| 138 | - // en faisant remonter les notes a l'incluant (A tester et valider avant application) |
|
| 139 | - if ($notes) { |
|
| 140 | - $page['notes'] = $notes('', 'sauver_etat'); |
|
| 141 | - } |
|
| 142 | - |
|
| 143 | - // spip_log: un joli contexte |
|
| 144 | - $infos = presenter_contexte(array_filter($contexte)); |
|
| 145 | - |
|
| 146 | - $profile = spip_timer($a); |
|
| 147 | - spip_log("calcul ($profile) [$skel] $infos" |
|
| 148 | - . ' (' . strlen($page['texte']) . ' octets)'); |
|
| 149 | - |
|
| 150 | - if (defined('_CALCUL_PROFILER') AND intval($profile)>_CALCUL_PROFILER){ |
|
| 151 | - spip_log("calcul ($profile) [$skel] $infos" |
|
| 152 | - .' ('.strlen($page['texte']).' octets) | '.$_SERVER['REQUEST_URI'],"profiler"._LOG_AVERTISSEMENT); |
|
| 153 | - } |
|
| 154 | - |
|
| 155 | - if ($debug) { |
|
| 156 | - // si c'est ce que demande le debusqueur, lui passer la main |
|
| 157 | - $t = strlen($page['texte']) ? $page['texte'] : " "; |
|
| 158 | - $GLOBALS['debug_objets']['resultat'][$fonc . 'tout'] = $t; |
|
| 159 | - $GLOBALS['debug_objets']['courant'] = $courant; |
|
| 160 | - $GLOBALS['debug_objets']['profile'][$sourcefile] = $profile; |
|
| 161 | - if ($GLOBALS['debug_objets']['sourcefile'] |
|
| 162 | - and (_request('var_mode_objet') == $fonc) |
|
| 163 | - and (_request('var_mode_affiche') == 'resultat') |
|
| 164 | - ) { |
|
| 165 | - erreur_squelette(); |
|
| 166 | - } |
|
| 167 | - } |
|
| 168 | - // Si #CACHE{} n'etait pas la, le mettre a $delais |
|
| 169 | - if (!isset($page['entetes']['X-Spip-Cache'])) { |
|
| 170 | - // Dans l'espace prive ou dans un modeles/ on pose un cache 0 par defaut |
|
| 171 | - // si aucun #CACHE{} spécifié |
|
| 172 | - // le contexte implicite qui conditionne le cache assure qu'on retombe pas sur le meme |
|
| 173 | - // entre public et prive |
|
| 174 | - if (test_espace_prive() or strncmp($fond, 'modeles/', 8) == 0) { |
|
| 175 | - $page['entetes']['X-Spip-Cache'] = 0; |
|
| 176 | - } else { |
|
| 177 | - $page['entetes']['X-Spip-Cache'] = isset($GLOBALS['delais']) ? $GLOBALS['delais'] : 36000; |
|
| 178 | - } |
|
| 179 | - } |
|
| 180 | - |
|
| 181 | - $page['contexte'] = $contexte; |
|
| 182 | - |
|
| 183 | - // faire remonter le fichier source |
|
| 184 | - static $js_inclus = false; |
|
| 185 | - if (defined('_VAR_INCLURE') and _VAR_INCLURE) { |
|
| 186 | - $page['sourcefile'] = $sourcefile; |
|
| 187 | - $page['texte'] = |
|
| 188 | - "<div class='inclure_blocs'><h6>" . $page['sourcefile'] . "</h6>" . $page['texte'] . "</div>" |
|
| 189 | - . ($js_inclus ? "" : "<script type='text/javascript'>jQuery(function(){jQuery('.inclure_blocs > h6:first-child').hover(function(){jQuery(this).parent().addClass('hover')},function(){jQuery(this).parent().removeClass('hover')})});</script>"); |
|
| 190 | - $js_inclus = true; |
|
| 191 | - } |
|
| 192 | - |
|
| 193 | - // Si un modele contenait #SESSION, on note l'info dans $page |
|
| 194 | - if (isset($GLOBALS['cache_utilise_session'])) { |
|
| 195 | - $page['invalideurs']['session'] = $GLOBALS['cache_utilise_session']; |
|
| 196 | - unset($GLOBALS['cache_utilise_session']); |
|
| 197 | - } |
|
| 198 | - } |
|
| 199 | - |
|
| 200 | - if ($select) { |
|
| 201 | - lang_select(); |
|
| 202 | - } |
|
| 203 | - |
|
| 204 | - return $page; |
|
| 34 | + static $composer, $styliser, $notes = null; |
|
| 35 | + $page = tester_redirection($fond, $contexte, $connect); |
|
| 36 | + if ($page) { |
|
| 37 | + return $page; |
|
| 38 | + } |
|
| 39 | + |
|
| 40 | + if (isset($contexte['lang'])) { |
|
| 41 | + $lang = $contexte['lang']; |
|
| 42 | + } elseif (!isset($lang)) { |
|
| 43 | + $lang = $GLOBALS['meta']['langue_site']; |
|
| 44 | + } |
|
| 45 | + |
|
| 46 | + $select = ((!isset($GLOBALS['forcer_lang']) or !$GLOBALS['forcer_lang']) and $lang <> $GLOBALS['spip_lang']); |
|
| 47 | + if ($select) { |
|
| 48 | + $select = lang_select($lang); |
|
| 49 | + } |
|
| 50 | + |
|
| 51 | + $debug = (defined('_VAR_MODE') && _VAR_MODE == 'debug'); |
|
| 52 | + |
|
| 53 | + if (!$styliser) { |
|
| 54 | + $styliser = charger_fonction('styliser', 'public'); |
|
| 55 | + } |
|
| 56 | + list($skel, $mime_type, $gram, $sourcefile) = |
|
| 57 | + $styliser($fond, $contexte, $GLOBALS['spip_lang'], $connect); |
|
| 58 | + |
|
| 59 | + if ($skel) { |
|
| 60 | + |
|
| 61 | + // sauver le nom de l'eventuel squelette en cours d'execution |
|
| 62 | + // (recursion possible a cause des modeles) |
|
| 63 | + if ($debug) { |
|
| 64 | + $courant = @$GLOBALS['debug_objets']['courant']; |
|
| 65 | + $GLOBALS['debug_objets']['contexte'][$sourcefile] = $contexte; |
|
| 66 | + } |
|
| 67 | + |
|
| 68 | + // charger le squelette en specifiant les langages cibles et source |
|
| 69 | + // au cas il faudrait le compiler (source posterieure au resultat) |
|
| 70 | + |
|
| 71 | + if (!$composer) { |
|
| 72 | + $composer = charger_fonction('composer', 'public'); |
|
| 73 | + } |
|
| 74 | + $fonc = $composer($skel, $mime_type, $gram, $sourcefile, $connect); |
|
| 75 | + } else { |
|
| 76 | + $fonc = ''; |
|
| 77 | + } |
|
| 78 | + |
|
| 79 | + if (!$fonc) { // squelette inconnu (==='') ou faux (===false) |
|
| 80 | + $page = $fonc; |
|
| 81 | + } else { |
|
| 82 | + // Preparer l'appel de la fonction principale du squelette |
|
| 83 | + |
|
| 84 | + spip_timer($a = 'calcul page ' . rand(0, 1000)); |
|
| 85 | + |
|
| 86 | + // On cree un marqueur de notes unique lie a cette composition |
|
| 87 | + // et on enregistre l'etat courant des globales de notes... |
|
| 88 | + if (is_null($notes)) { |
|
| 89 | + $notes = charger_fonction('notes', 'inc', true); |
|
| 90 | + } |
|
| 91 | + if ($notes) { |
|
| 92 | + $notes('', 'empiler'); |
|
| 93 | + } |
|
| 94 | + |
|
| 95 | + // Rajouter d'office ces deux parametres |
|
| 96 | + // (mais vaudrait mieux que le compilateur sache le simuler |
|
| 97 | + // car ca interdit l'usage de criteres conditionnels dessus). |
|
| 98 | + if (!isset($contexte['date'])) { |
|
| 99 | + $contexte['date'] = date("Y-m-d H:i:s"); |
|
| 100 | + $contexte['date_default'] = true; |
|
| 101 | + } else { |
|
| 102 | + $contexte['date'] = normaliser_date($contexte['date'], true); |
|
| 103 | + } |
|
| 104 | + |
|
| 105 | + if (!isset($contexte['date_redac'])) { |
|
| 106 | + $contexte['date_redac'] = date("Y-m-d H:i:s"); |
|
| 107 | + $contexte['date_redac_default'] = true; |
|
| 108 | + } else { |
|
| 109 | + $contexte['date_redac'] = normaliser_date($contexte['date_redac'], true); |
|
| 110 | + } |
|
| 111 | + |
|
| 112 | + // Passer le nom du cache pour produire sa destruction automatique |
|
| 113 | + try { |
|
| 114 | + $page = $fonc(array('cache' => $cache), array($contexte)); |
|
| 115 | + } catch (Throwable $e) { |
|
| 116 | + $msg = _T('zbug_erreur_execution_page') . " $sourcefile"; |
|
| 117 | + $full_msg = $msg . ' | File ' . $e->getFile() . ' Line ' . $e->getLine() . ' : ' . $e->getMessage(); |
|
| 118 | + $full_msg = str_replace(_ROOT_RACINE, '[…]/', $full_msg); |
|
| 119 | + $corps = "<pre>$msg</pre>"; |
|
| 120 | + $page = analyse_resultat_skel($fond, array('cache' => $cache), $corps, $sourcefile); |
|
| 121 | + erreur_squelette($full_msg); |
|
| 122 | + unset($msg, $full_msg, $corps); |
|
| 123 | + } |
|
| 124 | + |
|
| 125 | + // Restituer les globales de notes telles qu'elles etaient avant l'appel |
|
| 126 | + // Si l'inclus n'a pas affiche ses notes, tant pis (elles *doivent* |
|
| 127 | + // etre dans son resultat, autrement elles ne seraient pas prises en |
|
| 128 | + // compte a chaque calcul d'un texte contenant un modele, mais seulement |
|
| 129 | + // quand le modele serait calcule, et on aurait des resultats incoherents) |
|
| 130 | + if ($notes) { |
|
| 131 | + $notes('', 'depiler'); |
|
| 132 | + } |
|
| 133 | + |
|
| 134 | + // reinjecter en dynamique la pile des notes |
|
| 135 | + // si il y a des inclure dynamiques |
|
| 136 | + // si la pile n'est pas vide |
|
| 137 | + // la generalisation de cette injection permettrait de corriger le point juste au dessus |
|
| 138 | + // en faisant remonter les notes a l'incluant (A tester et valider avant application) |
|
| 139 | + if ($notes) { |
|
| 140 | + $page['notes'] = $notes('', 'sauver_etat'); |
|
| 141 | + } |
|
| 142 | + |
|
| 143 | + // spip_log: un joli contexte |
|
| 144 | + $infos = presenter_contexte(array_filter($contexte)); |
|
| 145 | + |
|
| 146 | + $profile = spip_timer($a); |
|
| 147 | + spip_log("calcul ($profile) [$skel] $infos" |
|
| 148 | + . ' (' . strlen($page['texte']) . ' octets)'); |
|
| 149 | + |
|
| 150 | + if (defined('_CALCUL_PROFILER') AND intval($profile)>_CALCUL_PROFILER){ |
|
| 151 | + spip_log("calcul ($profile) [$skel] $infos" |
|
| 152 | + .' ('.strlen($page['texte']).' octets) | '.$_SERVER['REQUEST_URI'],"profiler"._LOG_AVERTISSEMENT); |
|
| 153 | + } |
|
| 154 | + |
|
| 155 | + if ($debug) { |
|
| 156 | + // si c'est ce que demande le debusqueur, lui passer la main |
|
| 157 | + $t = strlen($page['texte']) ? $page['texte'] : " "; |
|
| 158 | + $GLOBALS['debug_objets']['resultat'][$fonc . 'tout'] = $t; |
|
| 159 | + $GLOBALS['debug_objets']['courant'] = $courant; |
|
| 160 | + $GLOBALS['debug_objets']['profile'][$sourcefile] = $profile; |
|
| 161 | + if ($GLOBALS['debug_objets']['sourcefile'] |
|
| 162 | + and (_request('var_mode_objet') == $fonc) |
|
| 163 | + and (_request('var_mode_affiche') == 'resultat') |
|
| 164 | + ) { |
|
| 165 | + erreur_squelette(); |
|
| 166 | + } |
|
| 167 | + } |
|
| 168 | + // Si #CACHE{} n'etait pas la, le mettre a $delais |
|
| 169 | + if (!isset($page['entetes']['X-Spip-Cache'])) { |
|
| 170 | + // Dans l'espace prive ou dans un modeles/ on pose un cache 0 par defaut |
|
| 171 | + // si aucun #CACHE{} spécifié |
|
| 172 | + // le contexte implicite qui conditionne le cache assure qu'on retombe pas sur le meme |
|
| 173 | + // entre public et prive |
|
| 174 | + if (test_espace_prive() or strncmp($fond, 'modeles/', 8) == 0) { |
|
| 175 | + $page['entetes']['X-Spip-Cache'] = 0; |
|
| 176 | + } else { |
|
| 177 | + $page['entetes']['X-Spip-Cache'] = isset($GLOBALS['delais']) ? $GLOBALS['delais'] : 36000; |
|
| 178 | + } |
|
| 179 | + } |
|
| 180 | + |
|
| 181 | + $page['contexte'] = $contexte; |
|
| 182 | + |
|
| 183 | + // faire remonter le fichier source |
|
| 184 | + static $js_inclus = false; |
|
| 185 | + if (defined('_VAR_INCLURE') and _VAR_INCLURE) { |
|
| 186 | + $page['sourcefile'] = $sourcefile; |
|
| 187 | + $page['texte'] = |
|
| 188 | + "<div class='inclure_blocs'><h6>" . $page['sourcefile'] . "</h6>" . $page['texte'] . "</div>" |
|
| 189 | + . ($js_inclus ? "" : "<script type='text/javascript'>jQuery(function(){jQuery('.inclure_blocs > h6:first-child').hover(function(){jQuery(this).parent().addClass('hover')},function(){jQuery(this).parent().removeClass('hover')})});</script>"); |
|
| 190 | + $js_inclus = true; |
|
| 191 | + } |
|
| 192 | + |
|
| 193 | + // Si un modele contenait #SESSION, on note l'info dans $page |
|
| 194 | + if (isset($GLOBALS['cache_utilise_session'])) { |
|
| 195 | + $page['invalideurs']['session'] = $GLOBALS['cache_utilise_session']; |
|
| 196 | + unset($GLOBALS['cache_utilise_session']); |
|
| 197 | + } |
|
| 198 | + } |
|
| 199 | + |
|
| 200 | + if ($select) { |
|
| 201 | + lang_select(); |
|
| 202 | + } |
|
| 203 | + |
|
| 204 | + return $page; |
|
| 205 | 205 | } |
| 206 | 206 | |
| 207 | 207 | /** |
@@ -210,33 +210,33 @@ discard block |
||
| 210 | 210 | * @return string |
| 211 | 211 | */ |
| 212 | 212 | function presenter_contexte($contexte, $profondeur_max = 1, $max_lines = 0) { |
| 213 | - $infos = array(); |
|
| 214 | - $line = 0; |
|
| 215 | - foreach ($contexte as $var => $val) { |
|
| 216 | - $line++; |
|
| 217 | - if ($max_lines and $max_lines < $line) { |
|
| 218 | - $infos[] = '…'; |
|
| 219 | - break; |
|
| 220 | - } |
|
| 221 | - if (is_array($val)) { |
|
| 222 | - if ($profondeur_max > 0) { |
|
| 223 | - $val = 'array:' . count($val) . '(' . presenter_contexte($val, $profondeur_max - 1, 3) . ')'; |
|
| 224 | - } else { |
|
| 225 | - $val = 'array:' . count($val); |
|
| 226 | - } |
|
| 227 | - } elseif (is_object($val)) { |
|
| 228 | - $val = get_class($val); |
|
| 229 | - } elseif (strlen("$val") > 30) { |
|
| 230 | - $val = substr("$val", 0, 29) . '…'; |
|
| 231 | - if (strstr($val, ' ')) { |
|
| 232 | - $val = "'$val'"; |
|
| 233 | - } |
|
| 234 | - } elseif (strstr($val, ' ')) { |
|
| 235 | - $val = "'$val'"; |
|
| 236 | - } |
|
| 237 | - $infos[] = $var . '=' . $val; |
|
| 238 | - } |
|
| 239 | - return join(', ', $infos); |
|
| 213 | + $infos = array(); |
|
| 214 | + $line = 0; |
|
| 215 | + foreach ($contexte as $var => $val) { |
|
| 216 | + $line++; |
|
| 217 | + if ($max_lines and $max_lines < $line) { |
|
| 218 | + $infos[] = '…'; |
|
| 219 | + break; |
|
| 220 | + } |
|
| 221 | + if (is_array($val)) { |
|
| 222 | + if ($profondeur_max > 0) { |
|
| 223 | + $val = 'array:' . count($val) . '(' . presenter_contexte($val, $profondeur_max - 1, 3) . ')'; |
|
| 224 | + } else { |
|
| 225 | + $val = 'array:' . count($val); |
|
| 226 | + } |
|
| 227 | + } elseif (is_object($val)) { |
|
| 228 | + $val = get_class($val); |
|
| 229 | + } elseif (strlen("$val") > 30) { |
|
| 230 | + $val = substr("$val", 0, 29) . '…'; |
|
| 231 | + if (strstr($val, ' ')) { |
|
| 232 | + $val = "'$val'"; |
|
| 233 | + } |
|
| 234 | + } elseif (strstr($val, ' ')) { |
|
| 235 | + $val = "'$val'"; |
|
| 236 | + } |
|
| 237 | + $infos[] = $var . '=' . $val; |
|
| 238 | + } |
|
| 239 | + return join(', ', $infos); |
|
| 240 | 240 | } |
| 241 | 241 | |
| 242 | 242 | |
@@ -253,11 +253,11 @@ discard block |
||
| 253 | 253 | * @return array|bool |
| 254 | 254 | */ |
| 255 | 255 | function tester_redirection($fond, $contexte, $connect) { |
| 256 | - static $tester_redirection = null; |
|
| 257 | - if (is_null($tester_redirection)) { |
|
| 258 | - $tester_redirection = charger_fonction('tester_redirection', 'public'); |
|
| 259 | - } |
|
| 260 | - return $tester_redirection($fond, $contexte, $connect); |
|
| 256 | + static $tester_redirection = null; |
|
| 257 | + if (is_null($tester_redirection)) { |
|
| 258 | + $tester_redirection = charger_fonction('tester_redirection', 'public'); |
|
| 259 | + } |
|
| 260 | + return $tester_redirection($fond, $contexte, $connect); |
|
| 261 | 261 | } |
| 262 | 262 | |
| 263 | 263 | |
@@ -273,41 +273,41 @@ discard block |
||
| 273 | 273 | * @return array|bool |
| 274 | 274 | */ |
| 275 | 275 | function public_tester_redirection_dist($fond, $contexte, $connect) { |
| 276 | - if ($fond == 'article' |
|
| 277 | - and !empty($contexte['id_article']) |
|
| 278 | - and $id_article = intval($contexte['id_article']) |
|
| 279 | - ) { |
|
| 280 | - include_spip('public/quete'); // pour quete_virtuel et ses dependances |
|
| 281 | - $m = quete_virtuel($id_article, $connect); |
|
| 282 | - if (strlen($m)) { |
|
| 283 | - include_spip('inc/texte'); |
|
| 284 | - // les navigateurs pataugent si l'URL est vide |
|
| 285 | - if ($url = virtuel_redirige($m, true)) { |
|
| 286 | - // passer en url absolue car cette redirection pourra |
|
| 287 | - // etre utilisee dans un contexte d'url qui change |
|
| 288 | - // y compris url arbo |
|
| 289 | - $status = 302; |
|
| 290 | - if (defined('_STATUS_REDIRECTION_VIRTUEL')) { |
|
| 291 | - $status = _STATUS_REDIRECTION_VIRTUEL; |
|
| 292 | - } |
|
| 293 | - if (!preg_match(',^\w+:,', $url)) { |
|
| 294 | - include_spip('inc/filtres_mini'); |
|
| 295 | - $url = url_absolue($url); |
|
| 296 | - } |
|
| 297 | - $url = str_replace('&', '&', $url); |
|
| 298 | - |
|
| 299 | - return array( |
|
| 300 | - 'texte' => "<" |
|
| 301 | - . "?php include_spip('inc/headers');redirige_par_entete('" |
|
| 302 | - . texte_script($url) |
|
| 303 | - . "','',$status);" |
|
| 304 | - . "?" . ">", |
|
| 305 | - 'process_ins' => 'php', |
|
| 306 | - 'status' => $status |
|
| 307 | - ); |
|
| 308 | - } |
|
| 309 | - } |
|
| 310 | - } |
|
| 311 | - |
|
| 312 | - return false; |
|
| 276 | + if ($fond == 'article' |
|
| 277 | + and !empty($contexte['id_article']) |
|
| 278 | + and $id_article = intval($contexte['id_article']) |
|
| 279 | + ) { |
|
| 280 | + include_spip('public/quete'); // pour quete_virtuel et ses dependances |
|
| 281 | + $m = quete_virtuel($id_article, $connect); |
|
| 282 | + if (strlen($m)) { |
|
| 283 | + include_spip('inc/texte'); |
|
| 284 | + // les navigateurs pataugent si l'URL est vide |
|
| 285 | + if ($url = virtuel_redirige($m, true)) { |
|
| 286 | + // passer en url absolue car cette redirection pourra |
|
| 287 | + // etre utilisee dans un contexte d'url qui change |
|
| 288 | + // y compris url arbo |
|
| 289 | + $status = 302; |
|
| 290 | + if (defined('_STATUS_REDIRECTION_VIRTUEL')) { |
|
| 291 | + $status = _STATUS_REDIRECTION_VIRTUEL; |
|
| 292 | + } |
|
| 293 | + if (!preg_match(',^\w+:,', $url)) { |
|
| 294 | + include_spip('inc/filtres_mini'); |
|
| 295 | + $url = url_absolue($url); |
|
| 296 | + } |
|
| 297 | + $url = str_replace('&', '&', $url); |
|
| 298 | + |
|
| 299 | + return array( |
|
| 300 | + 'texte' => "<" |
|
| 301 | + . "?php include_spip('inc/headers');redirige_par_entete('" |
|
| 302 | + . texte_script($url) |
|
| 303 | + . "','',$status);" |
|
| 304 | + . "?" . ">", |
|
| 305 | + 'process_ins' => 'php', |
|
| 306 | + 'status' => $status |
|
| 307 | + ); |
|
| 308 | + } |
|
| 309 | + } |
|
| 310 | + } |
|
| 311 | + |
|
| 312 | + return false; |
|
| 313 | 313 | } |
@@ -81,7 +81,7 @@ discard block |
||
| 81 | 81 | } else { |
| 82 | 82 | // Preparer l'appel de la fonction principale du squelette |
| 83 | 83 | |
| 84 | - spip_timer($a = 'calcul page ' . rand(0, 1000)); |
|
| 84 | + spip_timer($a = 'calcul page '.rand(0, 1000)); |
|
| 85 | 85 | |
| 86 | 86 | // On cree un marqueur de notes unique lie a cette composition |
| 87 | 87 | // et on enregistre l'etat courant des globales de notes... |
@@ -113,8 +113,8 @@ discard block |
||
| 113 | 113 | try { |
| 114 | 114 | $page = $fonc(array('cache' => $cache), array($contexte)); |
| 115 | 115 | } catch (Throwable $e) { |
| 116 | - $msg = _T('zbug_erreur_execution_page') . " $sourcefile"; |
|
| 117 | - $full_msg = $msg . ' | File ' . $e->getFile() . ' Line ' . $e->getLine() . ' : ' . $e->getMessage(); |
|
| 116 | + $msg = _T('zbug_erreur_execution_page')." $sourcefile"; |
|
| 117 | + $full_msg = $msg.' | File '.$e->getFile().' Line '.$e->getLine().' : '.$e->getMessage(); |
|
| 118 | 118 | $full_msg = str_replace(_ROOT_RACINE, '[…]/', $full_msg); |
| 119 | 119 | $corps = "<pre>$msg</pre>"; |
| 120 | 120 | $page = analyse_resultat_skel($fond, array('cache' => $cache), $corps, $sourcefile); |
@@ -145,17 +145,17 @@ discard block |
||
| 145 | 145 | |
| 146 | 146 | $profile = spip_timer($a); |
| 147 | 147 | spip_log("calcul ($profile) [$skel] $infos" |
| 148 | - . ' (' . strlen($page['texte']) . ' octets)'); |
|
| 148 | + . ' ('.strlen($page['texte']).' octets)'); |
|
| 149 | 149 | |
| 150 | - if (defined('_CALCUL_PROFILER') AND intval($profile)>_CALCUL_PROFILER){ |
|
| 150 | + if (defined('_CALCUL_PROFILER') AND intval($profile) > _CALCUL_PROFILER) { |
|
| 151 | 151 | spip_log("calcul ($profile) [$skel] $infos" |
| 152 | - .' ('.strlen($page['texte']).' octets) | '.$_SERVER['REQUEST_URI'],"profiler"._LOG_AVERTISSEMENT); |
|
| 152 | + .' ('.strlen($page['texte']).' octets) | '.$_SERVER['REQUEST_URI'], "profiler"._LOG_AVERTISSEMENT); |
|
| 153 | 153 | } |
| 154 | 154 | |
| 155 | 155 | if ($debug) { |
| 156 | 156 | // si c'est ce que demande le debusqueur, lui passer la main |
| 157 | 157 | $t = strlen($page['texte']) ? $page['texte'] : " "; |
| 158 | - $GLOBALS['debug_objets']['resultat'][$fonc . 'tout'] = $t; |
|
| 158 | + $GLOBALS['debug_objets']['resultat'][$fonc.'tout'] = $t; |
|
| 159 | 159 | $GLOBALS['debug_objets']['courant'] = $courant; |
| 160 | 160 | $GLOBALS['debug_objets']['profile'][$sourcefile] = $profile; |
| 161 | 161 | if ($GLOBALS['debug_objets']['sourcefile'] |
@@ -185,7 +185,7 @@ discard block |
||
| 185 | 185 | if (defined('_VAR_INCLURE') and _VAR_INCLURE) { |
| 186 | 186 | $page['sourcefile'] = $sourcefile; |
| 187 | 187 | $page['texte'] = |
| 188 | - "<div class='inclure_blocs'><h6>" . $page['sourcefile'] . "</h6>" . $page['texte'] . "</div>" |
|
| 188 | + "<div class='inclure_blocs'><h6>".$page['sourcefile']."</h6>".$page['texte']."</div>" |
|
| 189 | 189 | . ($js_inclus ? "" : "<script type='text/javascript'>jQuery(function(){jQuery('.inclure_blocs > h6:first-child').hover(function(){jQuery(this).parent().addClass('hover')},function(){jQuery(this).parent().removeClass('hover')})});</script>"); |
| 190 | 190 | $js_inclus = true; |
| 191 | 191 | } |
@@ -220,21 +220,21 @@ discard block |
||
| 220 | 220 | } |
| 221 | 221 | if (is_array($val)) { |
| 222 | 222 | if ($profondeur_max > 0) { |
| 223 | - $val = 'array:' . count($val) . '(' . presenter_contexte($val, $profondeur_max - 1, 3) . ')'; |
|
| 223 | + $val = 'array:'.count($val).'('.presenter_contexte($val, $profondeur_max - 1, 3).')'; |
|
| 224 | 224 | } else { |
| 225 | - $val = 'array:' . count($val); |
|
| 225 | + $val = 'array:'.count($val); |
|
| 226 | 226 | } |
| 227 | 227 | } elseif (is_object($val)) { |
| 228 | 228 | $val = get_class($val); |
| 229 | 229 | } elseif (strlen("$val") > 30) { |
| 230 | - $val = substr("$val", 0, 29) . '…'; |
|
| 230 | + $val = substr("$val", 0, 29).'…'; |
|
| 231 | 231 | if (strstr($val, ' ')) { |
| 232 | 232 | $val = "'$val'"; |
| 233 | 233 | } |
| 234 | 234 | } elseif (strstr($val, ' ')) { |
| 235 | 235 | $val = "'$val'"; |
| 236 | 236 | } |
| 237 | - $infos[] = $var . '=' . $val; |
|
| 237 | + $infos[] = $var.'='.$val; |
|
| 238 | 238 | } |
| 239 | 239 | return join(', ', $infos); |
| 240 | 240 | } |
@@ -301,7 +301,7 @@ discard block |
||
| 301 | 301 | . "?php include_spip('inc/headers');redirige_par_entete('" |
| 302 | 302 | . texte_script($url) |
| 303 | 303 | . "','',$status);" |
| 304 | - . "?" . ">", |
|
| 304 | + . "?".">", |
|
| 305 | 305 | 'process_ins' => 'php', |
| 306 | 306 | 'status' => $status |
| 307 | 307 | ); |
@@ -158,7 +158,7 @@ |
||
| 158 | 158 | * @param string $corps |
| 159 | 159 | * @param array $filtres |
| 160 | 160 | * Tableau de filtres à appliquer. |
| 161 | - * @return mixed|string |
|
| 161 | + * @return string |
|
| 162 | 162 | */ |
| 163 | 163 | function sandbox_filtrer_squelette($skel, $corps, $filtres) { |
| 164 | 164 | $series_filtres = func_get_args(); |
@@ -23,7 +23,7 @@ discard block |
||
| 23 | 23 | **/ |
| 24 | 24 | |
| 25 | 25 | if (!defined('_ECRIRE_INC_VERSION')) { |
| 26 | - return; |
|
| 26 | + return; |
|
| 27 | 27 | } |
| 28 | 28 | |
| 29 | 29 | /** |
@@ -41,9 +41,9 @@ discard block |
||
| 41 | 41 | * Texte |
| 42 | 42 | */ |
| 43 | 43 | function sandbox_composer_texte($texte, &$p) { |
| 44 | - $code = "'" . str_replace(array("\\", "'"), array("\\\\", "\\'"), $texte) . "'"; |
|
| 44 | + $code = "'" . str_replace(array("\\", "'"), array("\\\\", "\\'"), $texte) . "'"; |
|
| 45 | 45 | |
| 46 | - return $code; |
|
| 46 | + return $code; |
|
| 47 | 47 | } |
| 48 | 48 | |
| 49 | 49 | |
@@ -59,43 +59,43 @@ discard block |
||
| 59 | 59 | * @return string |
| 60 | 60 | */ |
| 61 | 61 | function sandbox_composer_filtre($fonc, $code, $arglist, &$p, $nb_arg_droite=1000) : string { |
| 62 | - if (isset($GLOBALS['spip_matrice'][$fonc])) { |
|
| 63 | - $code = "filtrer('$fonc',$code$arglist)"; |
|
| 64 | - } |
|
| 65 | - |
|
| 66 | - // le filtre est defini sous forme de fonction ou de methode |
|
| 67 | - // par ex. dans inc_texte, inc_filtres ou mes_fonctions |
|
| 68 | - elseif ($f = chercher_filtre($fonc)) { |
|
| 69 | - |
|
| 70 | - // cas particulier : le filtre |set doit acceder a la $Pile |
|
| 71 | - // proto: filtre_set(&$Pile, $val, $args...) |
|
| 72 | - if (strpbrk($f, ':')) { // Class::method |
|
| 73 | - $refl = new ReflectionMethod($f); |
|
| 74 | - } else { |
|
| 75 | - $refl = new ReflectionFunction($f); |
|
| 76 | - } |
|
| 77 | - $refs = $refl->getParameters(); |
|
| 78 | - if (isset($refs[0]) and $refs[0]->name == 'Pile') { |
|
| 79 | - $code = "$f(\$Pile,$code$arglist)"; |
|
| 80 | - $nb_arg_gauche = 2; // la balise à laquelle s'applique le filtre + $Pile |
|
| 81 | - } else { |
|
| 82 | - $code = "$f($code$arglist)"; |
|
| 83 | - $nb_arg_gauche = 1; // la balise à laquelle s'applique le filtre |
|
| 84 | - } |
|
| 85 | - $nb_args_f = $nb_arg_gauche+$nb_arg_droite; |
|
| 86 | - $min_f = $refl->getNumberOfRequiredParameters(); |
|
| 87 | - if (($nb_args_f < $min_f)) { |
|
| 88 | - $msg_args = ['filtre' => texte_script ($fonc), 'nb'=> $min_f - $nb_args_f]; |
|
| 89 | - erreur_squelette ([ 'zbug_erreur_filtre_nbarg_min', $msg_args], $p); |
|
| 90 | - } |
|
| 91 | - } |
|
| 92 | - // le filtre n'existe pas, |
|
| 93 | - // on le notifie |
|
| 94 | - else { |
|
| 95 | - erreur_squelette(array('zbug_erreur_filtre', array('filtre' => texte_script($fonc))), $p); |
|
| 96 | - } |
|
| 97 | - |
|
| 98 | - return $code; |
|
| 62 | + if (isset($GLOBALS['spip_matrice'][$fonc])) { |
|
| 63 | + $code = "filtrer('$fonc',$code$arglist)"; |
|
| 64 | + } |
|
| 65 | + |
|
| 66 | + // le filtre est defini sous forme de fonction ou de methode |
|
| 67 | + // par ex. dans inc_texte, inc_filtres ou mes_fonctions |
|
| 68 | + elseif ($f = chercher_filtre($fonc)) { |
|
| 69 | + |
|
| 70 | + // cas particulier : le filtre |set doit acceder a la $Pile |
|
| 71 | + // proto: filtre_set(&$Pile, $val, $args...) |
|
| 72 | + if (strpbrk($f, ':')) { // Class::method |
|
| 73 | + $refl = new ReflectionMethod($f); |
|
| 74 | + } else { |
|
| 75 | + $refl = new ReflectionFunction($f); |
|
| 76 | + } |
|
| 77 | + $refs = $refl->getParameters(); |
|
| 78 | + if (isset($refs[0]) and $refs[0]->name == 'Pile') { |
|
| 79 | + $code = "$f(\$Pile,$code$arglist)"; |
|
| 80 | + $nb_arg_gauche = 2; // la balise à laquelle s'applique le filtre + $Pile |
|
| 81 | + } else { |
|
| 82 | + $code = "$f($code$arglist)"; |
|
| 83 | + $nb_arg_gauche = 1; // la balise à laquelle s'applique le filtre |
|
| 84 | + } |
|
| 85 | + $nb_args_f = $nb_arg_gauche+$nb_arg_droite; |
|
| 86 | + $min_f = $refl->getNumberOfRequiredParameters(); |
|
| 87 | + if (($nb_args_f < $min_f)) { |
|
| 88 | + $msg_args = ['filtre' => texte_script ($fonc), 'nb'=> $min_f - $nb_args_f]; |
|
| 89 | + erreur_squelette ([ 'zbug_erreur_filtre_nbarg_min', $msg_args], $p); |
|
| 90 | + } |
|
| 91 | + } |
|
| 92 | + // le filtre n'existe pas, |
|
| 93 | + // on le notifie |
|
| 94 | + else { |
|
| 95 | + erreur_squelette(array('zbug_erreur_filtre', array('filtre' => texte_script($fonc))), $p); |
|
| 96 | + } |
|
| 97 | + |
|
| 98 | + return $code; |
|
| 99 | 99 | } |
| 100 | 100 | |
| 101 | 101 | // Calculer un <INCLURE(xx.php)> |
@@ -119,15 +119,15 @@ discard block |
||
| 119 | 119 | * @return string |
| 120 | 120 | */ |
| 121 | 121 | function sandbox_composer_inclure_php($fichier, &$p, $_contexte) { |
| 122 | - $compil = texte_script(memoriser_contexte_compil($p)); |
|
| 123 | - // si inexistant, on essaiera a l'execution |
|
| 124 | - if ($path = find_in_path($fichier)) { |
|
| 125 | - $path = "\"$path\""; |
|
| 126 | - } else { |
|
| 127 | - $path = "find_in_path(\"$fichier\")"; |
|
| 128 | - } |
|
| 129 | - |
|
| 130 | - return sprintf(CODE_INCLURE_SCRIPT, $path, $fichier, $compil, $_contexte); |
|
| 122 | + $compil = texte_script(memoriser_contexte_compil($p)); |
|
| 123 | + // si inexistant, on essaiera a l'execution |
|
| 124 | + if ($path = find_in_path($fichier)) { |
|
| 125 | + $path = "\"$path\""; |
|
| 126 | + } else { |
|
| 127 | + $path = "find_in_path(\"$fichier\")"; |
|
| 128 | + } |
|
| 129 | + |
|
| 130 | + return sprintf(CODE_INCLURE_SCRIPT, $path, $fichier, $compil, $_contexte); |
|
| 131 | 131 | } |
| 132 | 132 | |
| 133 | 133 | /** |
@@ -139,19 +139,19 @@ discard block |
||
| 139 | 139 | * @return string |
| 140 | 140 | */ |
| 141 | 141 | function sandbox_composer_interdire_scripts($code, &$p) { |
| 142 | - // Securite |
|
| 143 | - if ($p->interdire_scripts |
|
| 144 | - and $p->etoile != '**' |
|
| 145 | - ) { |
|
| 146 | - if (!preg_match("/^sinon[(](.*),'([^']*)'[)]$/", $code, $r)) { |
|
| 147 | - $code = "interdire_scripts($code)"; |
|
| 148 | - } else { |
|
| 149 | - $code = interdire_scripts($r[2]); |
|
| 150 | - $code = "sinon(interdire_scripts($r[1]),'$code')"; |
|
| 151 | - } |
|
| 152 | - } |
|
| 153 | - |
|
| 154 | - return $code; |
|
| 142 | + // Securite |
|
| 143 | + if ($p->interdire_scripts |
|
| 144 | + and $p->etoile != '**' |
|
| 145 | + ) { |
|
| 146 | + if (!preg_match("/^sinon[(](.*),'([^']*)'[)]$/", $code, $r)) { |
|
| 147 | + $code = "interdire_scripts($code)"; |
|
| 148 | + } else { |
|
| 149 | + $code = interdire_scripts($r[2]); |
|
| 150 | + $code = "sinon(interdire_scripts($r[1]),'$code')"; |
|
| 151 | + } |
|
| 152 | + } |
|
| 153 | + |
|
| 154 | + return $code; |
|
| 155 | 155 | } |
| 156 | 156 | |
| 157 | 157 | |
@@ -170,30 +170,30 @@ discard block |
||
| 170 | 170 | * @return mixed|string |
| 171 | 171 | */ |
| 172 | 172 | function sandbox_filtrer_squelette($skel, $corps, $filtres) { |
| 173 | - $series_filtres = func_get_args(); |
|
| 174 | - array_shift($series_filtres);// skel |
|
| 175 | - array_shift($series_filtres);// corps |
|
| 176 | - |
|
| 177 | - // proteger les <INCLUDE> et tous les morceaux de php licites |
|
| 178 | - if ($skel['process_ins'] == 'php') { |
|
| 179 | - $corps = preg_replace_callback(',<[?](\s|php|=).*[?]>,UimsS', 'echapper_php_callback', $corps); |
|
| 180 | - } |
|
| 181 | - |
|
| 182 | - // recuperer les couples de remplacement |
|
| 183 | - $replace = echapper_php_callback(); |
|
| 184 | - |
|
| 185 | - foreach ($series_filtres as $filtres) { |
|
| 186 | - if (count($filtres)) { |
|
| 187 | - foreach ($filtres as $filtre) { |
|
| 188 | - if ($filtre and $f = chercher_filtre($filtre)) { |
|
| 189 | - $corps = $f($corps); |
|
| 190 | - } |
|
| 191 | - } |
|
| 192 | - } |
|
| 193 | - } |
|
| 194 | - |
|
| 195 | - // restaurer les echappements |
|
| 196 | - return str_replace($replace[0], $replace[1], $corps); |
|
| 173 | + $series_filtres = func_get_args(); |
|
| 174 | + array_shift($series_filtres);// skel |
|
| 175 | + array_shift($series_filtres);// corps |
|
| 176 | + |
|
| 177 | + // proteger les <INCLUDE> et tous les morceaux de php licites |
|
| 178 | + if ($skel['process_ins'] == 'php') { |
|
| 179 | + $corps = preg_replace_callback(',<[?](\s|php|=).*[?]>,UimsS', 'echapper_php_callback', $corps); |
|
| 180 | + } |
|
| 181 | + |
|
| 182 | + // recuperer les couples de remplacement |
|
| 183 | + $replace = echapper_php_callback(); |
|
| 184 | + |
|
| 185 | + foreach ($series_filtres as $filtres) { |
|
| 186 | + if (count($filtres)) { |
|
| 187 | + foreach ($filtres as $filtre) { |
|
| 188 | + if ($filtre and $f = chercher_filtre($filtre)) { |
|
| 189 | + $corps = $f($corps); |
|
| 190 | + } |
|
| 191 | + } |
|
| 192 | + } |
|
| 193 | + } |
|
| 194 | + |
|
| 195 | + // restaurer les echappements |
|
| 196 | + return str_replace($replace[0], $replace[1], $corps); |
|
| 197 | 197 | } |
| 198 | 198 | |
| 199 | 199 | |
@@ -212,21 +212,21 @@ discard block |
||
| 212 | 212 | * - array : Liste( liste des codes PHP, liste des substitutions ) |
| 213 | 213 | **/ |
| 214 | 214 | function echapper_php_callback($r = null) { |
| 215 | - static $src = array(); |
|
| 216 | - static $dst = array(); |
|
| 215 | + static $src = array(); |
|
| 216 | + static $dst = array(); |
|
| 217 | 217 | |
| 218 | - // si on recoit un tableau, on est en mode echappement |
|
| 219 | - // on enregistre le code a echapper dans dst, et le code echappe dans src |
|
| 220 | - if (is_array($r)) { |
|
| 221 | - $dst[] = $r[0]; |
|
| 218 | + // si on recoit un tableau, on est en mode echappement |
|
| 219 | + // on enregistre le code a echapper dans dst, et le code echappe dans src |
|
| 220 | + if (is_array($r)) { |
|
| 221 | + $dst[] = $r[0]; |
|
| 222 | 222 | |
| 223 | - return $src[] = '___' . md5($r[0]) . '___'; |
|
| 224 | - } |
|
| 223 | + return $src[] = '___' . md5($r[0]) . '___'; |
|
| 224 | + } |
|
| 225 | 225 | |
| 226 | - // si on recoit pas un tableau, on renvoit les couples de substitution |
|
| 227 | - // et on RAZ les remplacements |
|
| 228 | - $r = array($src, $dst); |
|
| 229 | - $src = $dst = array(); |
|
| 226 | + // si on recoit pas un tableau, on renvoit les couples de substitution |
|
| 227 | + // et on RAZ les remplacements |
|
| 228 | + $r = array($src, $dst); |
|
| 229 | + $src = $dst = array(); |
|
| 230 | 230 | |
| 231 | - return $r; |
|
| 231 | + return $r; |
|
| 232 | 232 | } |
@@ -41,7 +41,7 @@ discard block |
||
| 41 | 41 | * Texte |
| 42 | 42 | */ |
| 43 | 43 | function sandbox_composer_texte($texte, &$p) { |
| 44 | - $code = "'" . str_replace(array("\\", "'"), array("\\\\", "\\'"), $texte) . "'"; |
|
| 44 | + $code = "'".str_replace(array("\\", "'"), array("\\\\", "\\'"), $texte)."'"; |
|
| 45 | 45 | |
| 46 | 46 | return $code; |
| 47 | 47 | } |
@@ -58,7 +58,7 @@ discard block |
||
| 58 | 58 | * Balise qui appelle ce filtre |
| 59 | 59 | * @return string |
| 60 | 60 | */ |
| 61 | -function sandbox_composer_filtre($fonc, $code, $arglist, &$p, $nb_arg_droite=1000) : string { |
|
| 61 | +function sandbox_composer_filtre($fonc, $code, $arglist, &$p, $nb_arg_droite = 1000) : string { |
|
| 62 | 62 | if (isset($GLOBALS['spip_matrice'][$fonc])) { |
| 63 | 63 | $code = "filtrer('$fonc',$code$arglist)"; |
| 64 | 64 | } |
@@ -82,11 +82,11 @@ discard block |
||
| 82 | 82 | $code = "$f($code$arglist)"; |
| 83 | 83 | $nb_arg_gauche = 1; // la balise à laquelle s'applique le filtre |
| 84 | 84 | } |
| 85 | - $nb_args_f = $nb_arg_gauche+$nb_arg_droite; |
|
| 85 | + $nb_args_f = $nb_arg_gauche + $nb_arg_droite; |
|
| 86 | 86 | $min_f = $refl->getNumberOfRequiredParameters(); |
| 87 | 87 | if (($nb_args_f < $min_f)) { |
| 88 | - $msg_args = ['filtre' => texte_script ($fonc), 'nb'=> $min_f - $nb_args_f]; |
|
| 89 | - erreur_squelette ([ 'zbug_erreur_filtre_nbarg_min', $msg_args], $p); |
|
| 88 | + $msg_args = ['filtre' => texte_script($fonc), 'nb'=> $min_f - $nb_args_f]; |
|
| 89 | + erreur_squelette(['zbug_erreur_filtre_nbarg_min', $msg_args], $p); |
|
| 90 | 90 | } |
| 91 | 91 | } |
| 92 | 92 | // le filtre n'existe pas, |
@@ -171,8 +171,8 @@ discard block |
||
| 171 | 171 | */ |
| 172 | 172 | function sandbox_filtrer_squelette($skel, $corps, $filtres) { |
| 173 | 173 | $series_filtres = func_get_args(); |
| 174 | - array_shift($series_filtres);// skel |
|
| 175 | - array_shift($series_filtres);// corps |
|
| 174 | + array_shift($series_filtres); // skel |
|
| 175 | + array_shift($series_filtres); // corps |
|
| 176 | 176 | |
| 177 | 177 | // proteger les <INCLUDE> et tous les morceaux de php licites |
| 178 | 178 | if ($skel['process_ins'] == 'php') { |
@@ -220,7 +220,7 @@ discard block |
||
| 220 | 220 | if (is_array($r)) { |
| 221 | 221 | $dst[] = $r[0]; |
| 222 | 222 | |
| 223 | - return $src[] = '___' . md5($r[0]) . '___'; |
|
| 223 | + return $src[] = '___'.md5($r[0]).'___'; |
|
| 224 | 224 | } |
| 225 | 225 | |
| 226 | 226 | // si on recoit pas un tableau, on renvoit les couples de substitution |
