@@ -19,7 +19,7 @@ discard block |
||
| 19 | 19 | **/ |
| 20 | 20 | |
| 21 | 21 | if (!defined('_ECRIRE_INC_VERSION')) { |
| 22 | - return; |
|
| 22 | + return; |
|
| 23 | 23 | } |
| 24 | 24 | |
| 25 | 25 | /** |
@@ -37,14 +37,14 @@ discard block |
||
| 37 | 37 | * Code compilé |
| 38 | 38 | **/ |
| 39 | 39 | function generer_generer_url($type, $p) { |
| 40 | - $_id = interprete_argument_balise(1, $p); |
|
| 40 | + $_id = interprete_argument_balise(1, $p); |
|
| 41 | 41 | |
| 42 | - if (!$_id) { |
|
| 43 | - $primary = id_table_objet($type); |
|
| 44 | - $_id = champ_sql($primary, $p); |
|
| 45 | - } |
|
| 42 | + if (!$_id) { |
|
| 43 | + $primary = id_table_objet($type); |
|
| 44 | + $_id = champ_sql($primary, $p); |
|
| 45 | + } |
|
| 46 | 46 | |
| 47 | - return generer_generer_url_arg($type, $p, $_id); |
|
| 47 | + return generer_generer_url_arg($type, $p, $_id); |
|
| 48 | 48 | } |
| 49 | 49 | |
| 50 | 50 | /** |
@@ -73,29 +73,29 @@ discard block |
||
| 73 | 73 | * Code compilé |
| 74 | 74 | **/ |
| 75 | 75 | function generer_generer_url_arg($type, $p, $_id) { |
| 76 | - if ($s = trouver_nom_serveur_distant($p)) { |
|
| 77 | - |
|
| 78 | - // si une fonction de generation des url a ete definie pour ce connect l'utiliser |
|
| 79 | - if (function_exists($f = 'generer_generer_url_' . $s)) { |
|
| 80 | - return $f($type, $_id, $s); |
|
| 81 | - } |
|
| 82 | - if (!$GLOBALS['connexions'][strtolower($s)]['spip_connect_version']) { |
|
| 83 | - return null; |
|
| 84 | - } |
|
| 85 | - $s = _q($s); |
|
| 86 | - # exception des urls de documents sur un serveur distant... |
|
| 87 | - if ($type == 'document') { |
|
| 88 | - return |
|
| 89 | - "quete_meta('adresse_site', $s) . '/' .\n\t" . |
|
| 90 | - "quete_meta('dir_img', $s) . \n\t" . |
|
| 91 | - "quete_fichier($_id,$s)"; |
|
| 92 | - } |
|
| 93 | - $s = ", '', '', $s, quete_meta('type_urls', $s)"; |
|
| 94 | - } else { |
|
| 95 | - $s = ", '', '', true"; |
|
| 96 | - } |
|
| 97 | - |
|
| 98 | - return "urlencode_1738(generer_url_entite($_id, '$type'$s))"; |
|
| 76 | + if ($s = trouver_nom_serveur_distant($p)) { |
|
| 77 | + |
|
| 78 | + // si une fonction de generation des url a ete definie pour ce connect l'utiliser |
|
| 79 | + if (function_exists($f = 'generer_generer_url_' . $s)) { |
|
| 80 | + return $f($type, $_id, $s); |
|
| 81 | + } |
|
| 82 | + if (!$GLOBALS['connexions'][strtolower($s)]['spip_connect_version']) { |
|
| 83 | + return null; |
|
| 84 | + } |
|
| 85 | + $s = _q($s); |
|
| 86 | + # exception des urls de documents sur un serveur distant... |
|
| 87 | + if ($type == 'document') { |
|
| 88 | + return |
|
| 89 | + "quete_meta('adresse_site', $s) . '/' .\n\t" . |
|
| 90 | + "quete_meta('dir_img', $s) . \n\t" . |
|
| 91 | + "quete_fichier($_id,$s)"; |
|
| 92 | + } |
|
| 93 | + $s = ", '', '', $s, quete_meta('type_urls', $s)"; |
|
| 94 | + } else { |
|
| 95 | + $s = ", '', '', true"; |
|
| 96 | + } |
|
| 97 | + |
|
| 98 | + return "urlencode_1738(generer_url_entite($_id, '$type'$s))"; |
|
| 99 | 99 | } |
| 100 | 100 | |
| 101 | 101 | |
@@ -120,27 +120,27 @@ discard block |
||
| 120 | 120 | */ |
| 121 | 121 | function balise_URL__dist($p) { |
| 122 | 122 | |
| 123 | - $nom = $p->nom_champ; |
|
| 124 | - if ($nom === 'URL_') { |
|
| 125 | - $msg = array('zbug_balise_sans_argument', array('balise' => ' URL_')); |
|
| 126 | - erreur_squelette($msg, $p); |
|
| 127 | - $p->interdire_scripts = false; |
|
| 128 | - |
|
| 129 | - return $p; |
|
| 130 | - } elseif ($f = charger_fonction($nom, 'balise', true)) { |
|
| 131 | - return $f($p); |
|
| 132 | - } else { |
|
| 133 | - $nom = strtolower($nom); |
|
| 134 | - $code = generer_generer_url(substr($nom, 4), $p); |
|
| 135 | - $code = champ_sql($nom, $p, $code); |
|
| 136 | - $p->code = $code; |
|
| 137 | - if (!$p->etoile) { |
|
| 138 | - $p->code = "vider_url($code)"; |
|
| 139 | - } |
|
| 140 | - $p->interdire_scripts = false; |
|
| 141 | - |
|
| 142 | - return $p; |
|
| 143 | - } |
|
| 123 | + $nom = $p->nom_champ; |
|
| 124 | + if ($nom === 'URL_') { |
|
| 125 | + $msg = array('zbug_balise_sans_argument', array('balise' => ' URL_')); |
|
| 126 | + erreur_squelette($msg, $p); |
|
| 127 | + $p->interdire_scripts = false; |
|
| 128 | + |
|
| 129 | + return $p; |
|
| 130 | + } elseif ($f = charger_fonction($nom, 'balise', true)) { |
|
| 131 | + return $f($p); |
|
| 132 | + } else { |
|
| 133 | + $nom = strtolower($nom); |
|
| 134 | + $code = generer_generer_url(substr($nom, 4), $p); |
|
| 135 | + $code = champ_sql($nom, $p, $code); |
|
| 136 | + $p->code = $code; |
|
| 137 | + if (!$p->etoile) { |
|
| 138 | + $p->code = "vider_url($code)"; |
|
| 139 | + } |
|
| 140 | + $p->interdire_scripts = false; |
|
| 141 | + |
|
| 142 | + return $p; |
|
| 143 | + } |
|
| 144 | 144 | } |
| 145 | 145 | |
| 146 | 146 | /** |
@@ -164,20 +164,20 @@ discard block |
||
| 164 | 164 | */ |
| 165 | 165 | function balise_URL_ARTICLE_dist($p) { |
| 166 | 166 | |
| 167 | - // Cas particulier des boucles (SYNDIC_ARTICLES) |
|
| 168 | - if ($p->type_requete == 'syndic_articles') { |
|
| 169 | - $code = champ_sql('url', $p); |
|
| 170 | - } else { |
|
| 171 | - $code = generer_generer_url('article', $p); |
|
| 172 | - } |
|
| 167 | + // Cas particulier des boucles (SYNDIC_ARTICLES) |
|
| 168 | + if ($p->type_requete == 'syndic_articles') { |
|
| 169 | + $code = champ_sql('url', $p); |
|
| 170 | + } else { |
|
| 171 | + $code = generer_generer_url('article', $p); |
|
| 172 | + } |
|
| 173 | 173 | |
| 174 | - $p->code = $code; |
|
| 175 | - if (!$p->etoile) { |
|
| 176 | - $p->code = "vider_url($code)"; |
|
| 177 | - } |
|
| 178 | - $p->interdire_scripts = false; |
|
| 174 | + $p->code = $code; |
|
| 175 | + if (!$p->etoile) { |
|
| 176 | + $p->code = "vider_url($code)"; |
|
| 177 | + } |
|
| 178 | + $p->interdire_scripts = false; |
|
| 179 | 179 | |
| 180 | - return $p; |
|
| 180 | + return $p; |
|
| 181 | 181 | } |
| 182 | 182 | |
| 183 | 183 | /** |
@@ -197,21 +197,21 @@ discard block |
||
| 197 | 197 | * Pile complétée par le code à générer |
| 198 | 198 | */ |
| 199 | 199 | function balise_URL_SITE_dist($p) { |
| 200 | - $code = champ_sql('url_site', $p); |
|
| 201 | - if (strpos($code, '@$Pile[0]') !== false) { |
|
| 202 | - $code = generer_generer_url('site', $p); |
|
| 203 | - if ($code === null) { |
|
| 204 | - return null; |
|
| 205 | - } |
|
| 206 | - } else { |
|
| 207 | - if (!$p->etoile) { |
|
| 208 | - $code = "calculer_url($code,'','url', \$connect)"; |
|
| 209 | - } |
|
| 210 | - } |
|
| 211 | - $p->code = $code; |
|
| 212 | - $p->interdire_scripts = false; |
|
| 213 | - |
|
| 214 | - return $p; |
|
| 200 | + $code = champ_sql('url_site', $p); |
|
| 201 | + if (strpos($code, '@$Pile[0]') !== false) { |
|
| 202 | + $code = generer_generer_url('site', $p); |
|
| 203 | + if ($code === null) { |
|
| 204 | + return null; |
|
| 205 | + } |
|
| 206 | + } else { |
|
| 207 | + if (!$p->etoile) { |
|
| 208 | + $code = "calculer_url($code,'','url', \$connect)"; |
|
| 209 | + } |
|
| 210 | + } |
|
| 211 | + $p->code = $code; |
|
| 212 | + $p->interdire_scripts = false; |
|
| 213 | + |
|
| 214 | + return $p; |
|
| 215 | 215 | } |
| 216 | 216 | |
| 217 | 217 | // Autres balises URL_*, qui ne concernent pas une table |
@@ -230,11 +230,11 @@ discard block |
||
| 230 | 230 | * Pile complétée par le code à générer |
| 231 | 231 | */ |
| 232 | 232 | function balise_URL_SITE_SPIP_dist($p) { |
| 233 | - $p->code = "sinon(\$GLOBALS['meta']['adresse_site'],'.')"; |
|
| 234 | - $p->code = "spip_htmlspecialchars(" . $p->code . ")"; |
|
| 235 | - $p->interdire_scripts = false; |
|
| 233 | + $p->code = "sinon(\$GLOBALS['meta']['adresse_site'],'.')"; |
|
| 234 | + $p->code = "spip_htmlspecialchars(" . $p->code . ")"; |
|
| 235 | + $p->interdire_scripts = false; |
|
| 236 | 236 | |
| 237 | - return $p; |
|
| 237 | + return $p; |
|
| 238 | 238 | } |
| 239 | 239 | |
| 240 | 240 | |
@@ -263,42 +263,42 @@ discard block |
||
| 263 | 263 | */ |
| 264 | 264 | function balise_URL_PAGE_dist($p) { |
| 265 | 265 | |
| 266 | - $code = interprete_argument_balise(1, $p); |
|
| 267 | - $args = interprete_argument_balise(2, $p); |
|
| 268 | - if ($args == null) { |
|
| 269 | - $args = "''"; |
|
| 270 | - } |
|
| 271 | - |
|
| 272 | - if ($s = trouver_nom_serveur_distant($p)) { |
|
| 273 | - // si une fonction de generation des url a ete definie pour ce connect l'utiliser |
|
| 274 | - // elle devra aussi traiter le cas derogatoire type=page |
|
| 275 | - if (function_exists($f = 'generer_generer_url_' . $s)) { |
|
| 276 | - if ($args and $args !== "''") { |
|
| 277 | - $code .= ", $args"; |
|
| 278 | - } |
|
| 279 | - $code = $f('page', $code, $s); |
|
| 280 | - $p->code = $code; |
|
| 281 | - return $p; |
|
| 282 | - } |
|
| 283 | - $s = 'connect=' . addslashes($s); |
|
| 284 | - $args = (($args and $args !== "''") ? "$args . '&$s'" : "'$s'"); |
|
| 285 | - } |
|
| 286 | - |
|
| 287 | - if (!$code) { |
|
| 288 | - $noentities = $p->etoile ? "'&'" : ''; |
|
| 289 | - $code = "url_de_base() . preg_replace(',^./,', '', self($noentities))"; |
|
| 290 | - } else { |
|
| 291 | - if (!$args) { |
|
| 292 | - $args = "''"; |
|
| 293 | - } |
|
| 294 | - $noentities = $p->etoile ? ", true" : ''; |
|
| 295 | - $code = "generer_url_public($code, $args$noentities)"; |
|
| 296 | - } |
|
| 297 | - $p->code = $code; |
|
| 298 | - spip_log("Calcul url page : connect vaut $s ca donne :" . $p->code . " args $args", _LOG_INFO); |
|
| 299 | - |
|
| 300 | - #$p->interdire_scripts = true; |
|
| 301 | - return $p; |
|
| 266 | + $code = interprete_argument_balise(1, $p); |
|
| 267 | + $args = interprete_argument_balise(2, $p); |
|
| 268 | + if ($args == null) { |
|
| 269 | + $args = "''"; |
|
| 270 | + } |
|
| 271 | + |
|
| 272 | + if ($s = trouver_nom_serveur_distant($p)) { |
|
| 273 | + // si une fonction de generation des url a ete definie pour ce connect l'utiliser |
|
| 274 | + // elle devra aussi traiter le cas derogatoire type=page |
|
| 275 | + if (function_exists($f = 'generer_generer_url_' . $s)) { |
|
| 276 | + if ($args and $args !== "''") { |
|
| 277 | + $code .= ", $args"; |
|
| 278 | + } |
|
| 279 | + $code = $f('page', $code, $s); |
|
| 280 | + $p->code = $code; |
|
| 281 | + return $p; |
|
| 282 | + } |
|
| 283 | + $s = 'connect=' . addslashes($s); |
|
| 284 | + $args = (($args and $args !== "''") ? "$args . '&$s'" : "'$s'"); |
|
| 285 | + } |
|
| 286 | + |
|
| 287 | + if (!$code) { |
|
| 288 | + $noentities = $p->etoile ? "'&'" : ''; |
|
| 289 | + $code = "url_de_base() . preg_replace(',^./,', '', self($noentities))"; |
|
| 290 | + } else { |
|
| 291 | + if (!$args) { |
|
| 292 | + $args = "''"; |
|
| 293 | + } |
|
| 294 | + $noentities = $p->etoile ? ", true" : ''; |
|
| 295 | + $code = "generer_url_public($code, $args$noentities)"; |
|
| 296 | + } |
|
| 297 | + $p->code = $code; |
|
| 298 | + spip_log("Calcul url page : connect vaut $s ca donne :" . $p->code . " args $args", _LOG_INFO); |
|
| 299 | + |
|
| 300 | + #$p->interdire_scripts = true; |
|
| 301 | + return $p; |
|
| 302 | 302 | } |
| 303 | 303 | |
| 304 | 304 | |
@@ -325,24 +325,24 @@ discard block |
||
| 325 | 325 | */ |
| 326 | 326 | function balise_URL_ECRIRE_dist($p) { |
| 327 | 327 | |
| 328 | - $code = interprete_argument_balise(1, $p); |
|
| 329 | - if (!$code) { |
|
| 330 | - $fonc = "''"; |
|
| 331 | - } else { |
|
| 332 | - $fonc = $code; |
|
| 333 | - $args = interprete_argument_balise(2, $p); |
|
| 334 | - if ($args === null) { |
|
| 335 | - $args = "''"; |
|
| 336 | - } |
|
| 337 | - $noentities = $p->etoile ? ", true" : ''; |
|
| 338 | - if (($args != "''") or $noentities) { |
|
| 339 | - $fonc .= ",$args$noentities"; |
|
| 340 | - } |
|
| 341 | - } |
|
| 342 | - $p->code = 'generer_url_ecrire(' . $fonc . ')'; |
|
| 343 | - $p->interdire_scripts = false; |
|
| 344 | - |
|
| 345 | - return $p; |
|
| 328 | + $code = interprete_argument_balise(1, $p); |
|
| 329 | + if (!$code) { |
|
| 330 | + $fonc = "''"; |
|
| 331 | + } else { |
|
| 332 | + $fonc = $code; |
|
| 333 | + $args = interprete_argument_balise(2, $p); |
|
| 334 | + if ($args === null) { |
|
| 335 | + $args = "''"; |
|
| 336 | + } |
|
| 337 | + $noentities = $p->etoile ? ", true" : ''; |
|
| 338 | + if (($args != "''") or $noentities) { |
|
| 339 | + $fonc .= ",$args$noentities"; |
|
| 340 | + } |
|
| 341 | + } |
|
| 342 | + $p->code = 'generer_url_ecrire(' . $fonc . ')'; |
|
| 343 | + $p->interdire_scripts = false; |
|
| 344 | + |
|
| 345 | + return $p; |
|
| 346 | 346 | } |
| 347 | 347 | |
| 348 | 348 | |
@@ -368,24 +368,24 @@ discard block |
||
| 368 | 368 | * Pile complétée par le code à générer |
| 369 | 369 | */ |
| 370 | 370 | function balise_URL_ACTION_AUTEUR_dist($p) { |
| 371 | - $p->descr['session'] = true; |
|
| 372 | - |
|
| 373 | - $p->code = interprete_argument_balise(1, $p); |
|
| 374 | - |
|
| 375 | - $args = interprete_argument_balise(2, $p); |
|
| 376 | - if ($args != "''" && $args !== null) { |
|
| 377 | - $p->code .= "," . $args; |
|
| 378 | - } |
|
| 379 | - $redirect = interprete_argument_balise(3, $p); |
|
| 380 | - if ($redirect != "''" && $redirect !== null) { |
|
| 381 | - if ($args == "''" || $args === null) { |
|
| 382 | - $p->code .= ",''"; |
|
| 383 | - } |
|
| 384 | - $p->code .= "," . $redirect; |
|
| 385 | - } |
|
| 386 | - |
|
| 387 | - $p->code = "generer_action_auteur(" . $p->code . ")"; |
|
| 388 | - $p->interdire_scripts = false; |
|
| 389 | - |
|
| 390 | - return $p; |
|
| 371 | + $p->descr['session'] = true; |
|
| 372 | + |
|
| 373 | + $p->code = interprete_argument_balise(1, $p); |
|
| 374 | + |
|
| 375 | + $args = interprete_argument_balise(2, $p); |
|
| 376 | + if ($args != "''" && $args !== null) { |
|
| 377 | + $p->code .= "," . $args; |
|
| 378 | + } |
|
| 379 | + $redirect = interprete_argument_balise(3, $p); |
|
| 380 | + if ($redirect != "''" && $redirect !== null) { |
|
| 381 | + if ($args == "''" || $args === null) { |
|
| 382 | + $p->code .= ",''"; |
|
| 383 | + } |
|
| 384 | + $p->code .= "," . $redirect; |
|
| 385 | + } |
|
| 386 | + |
|
| 387 | + $p->code = "generer_action_auteur(" . $p->code . ")"; |
|
| 388 | + $p->interdire_scripts = false; |
|
| 389 | + |
|
| 390 | + return $p; |
|
| 391 | 391 | } |
@@ -76,7 +76,7 @@ discard block |
||
| 76 | 76 | if ($s = trouver_nom_serveur_distant($p)) { |
| 77 | 77 | |
| 78 | 78 | // si une fonction de generation des url a ete definie pour ce connect l'utiliser |
| 79 | - if (function_exists($f = 'generer_generer_url_' . $s)) { |
|
| 79 | + if (function_exists($f = 'generer_generer_url_'.$s)) { |
|
| 80 | 80 | return $f($type, $_id, $s); |
| 81 | 81 | } |
| 82 | 82 | if (!$GLOBALS['connexions'][strtolower($s)]['spip_connect_version']) { |
@@ -86,8 +86,8 @@ discard block |
||
| 86 | 86 | # exception des urls de documents sur un serveur distant... |
| 87 | 87 | if ($type == 'document') { |
| 88 | 88 | return |
| 89 | - "quete_meta('adresse_site', $s) . '/' .\n\t" . |
|
| 90 | - "quete_meta('dir_img', $s) . \n\t" . |
|
| 89 | + "quete_meta('adresse_site', $s) . '/' .\n\t". |
|
| 90 | + "quete_meta('dir_img', $s) . \n\t". |
|
| 91 | 91 | "quete_fichier($_id,$s)"; |
| 92 | 92 | } |
| 93 | 93 | $s = ", '', '', $s, quete_meta('type_urls', $s)"; |
@@ -231,7 +231,7 @@ discard block |
||
| 231 | 231 | */ |
| 232 | 232 | function balise_URL_SITE_SPIP_dist($p) { |
| 233 | 233 | $p->code = "sinon(\$GLOBALS['meta']['adresse_site'],'.')"; |
| 234 | - $p->code = "spip_htmlspecialchars(" . $p->code . ")"; |
|
| 234 | + $p->code = "spip_htmlspecialchars(".$p->code.")"; |
|
| 235 | 235 | $p->interdire_scripts = false; |
| 236 | 236 | |
| 237 | 237 | return $p; |
@@ -272,7 +272,7 @@ discard block |
||
| 272 | 272 | if ($s = trouver_nom_serveur_distant($p)) { |
| 273 | 273 | // si une fonction de generation des url a ete definie pour ce connect l'utiliser |
| 274 | 274 | // elle devra aussi traiter le cas derogatoire type=page |
| 275 | - if (function_exists($f = 'generer_generer_url_' . $s)) { |
|
| 275 | + if (function_exists($f = 'generer_generer_url_'.$s)) { |
|
| 276 | 276 | if ($args and $args !== "''") { |
| 277 | 277 | $code .= ", $args"; |
| 278 | 278 | } |
@@ -280,7 +280,7 @@ discard block |
||
| 280 | 280 | $p->code = $code; |
| 281 | 281 | return $p; |
| 282 | 282 | } |
| 283 | - $s = 'connect=' . addslashes($s); |
|
| 283 | + $s = 'connect='.addslashes($s); |
|
| 284 | 284 | $args = (($args and $args !== "''") ? "$args . '&$s'" : "'$s'"); |
| 285 | 285 | } |
| 286 | 286 | |
@@ -295,7 +295,7 @@ discard block |
||
| 295 | 295 | $code = "generer_url_public($code, $args$noentities)"; |
| 296 | 296 | } |
| 297 | 297 | $p->code = $code; |
| 298 | - spip_log("Calcul url page : connect vaut $s ca donne :" . $p->code . " args $args", _LOG_INFO); |
|
| 298 | + spip_log("Calcul url page : connect vaut $s ca donne :".$p->code." args $args", _LOG_INFO); |
|
| 299 | 299 | |
| 300 | 300 | #$p->interdire_scripts = true; |
| 301 | 301 | return $p; |
@@ -339,7 +339,7 @@ discard block |
||
| 339 | 339 | $fonc .= ",$args$noentities"; |
| 340 | 340 | } |
| 341 | 341 | } |
| 342 | - $p->code = 'generer_url_ecrire(' . $fonc . ')'; |
|
| 342 | + $p->code = 'generer_url_ecrire('.$fonc.')'; |
|
| 343 | 343 | $p->interdire_scripts = false; |
| 344 | 344 | |
| 345 | 345 | return $p; |
@@ -374,17 +374,17 @@ discard block |
||
| 374 | 374 | |
| 375 | 375 | $args = interprete_argument_balise(2, $p); |
| 376 | 376 | if ($args != "''" && $args !== null) { |
| 377 | - $p->code .= "," . $args; |
|
| 377 | + $p->code .= ",".$args; |
|
| 378 | 378 | } |
| 379 | 379 | $redirect = interprete_argument_balise(3, $p); |
| 380 | 380 | if ($redirect != "''" && $redirect !== null) { |
| 381 | 381 | if ($args == "''" || $args === null) { |
| 382 | 382 | $p->code .= ",''"; |
| 383 | 383 | } |
| 384 | - $p->code .= "," . $redirect; |
|
| 384 | + $p->code .= ",".$redirect; |
|
| 385 | 385 | } |
| 386 | 386 | |
| 387 | - $p->code = "generer_action_auteur(" . $p->code . ")"; |
|
| 387 | + $p->code = "generer_action_auteur(".$p->code.")"; |
|
| 388 | 388 | $p->interdire_scripts = false; |
| 389 | 389 | |
| 390 | 390 | return $p; |