spip / SPIP

ecrire/action/logout.php

Indentation +84 added lines, -84 removed lines

@@ -17,7 +17,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('inc/cookie');
@@ -34,70 +34,70 @@ 
  *
  */
 function action_logout_dist() {
-	$logout = _request('logout');
-	$url = securiser_redirect_action(_request('url'));
-	// cas particulier, logout dans l'espace public
-	if ($logout == 'public' and !$url) {
-		$url = url_de_base();
-	}
-
-	// seul le loge peut se deloger (mais id_auteur peut valoir 0 apres une restauration avortee)
-	if (isset($GLOBALS['visiteur_session']['id_auteur'])
-		and is_numeric($GLOBALS['visiteur_session']['id_auteur'])
-		// des sessions anonymes avec id_auteur=0 existent, mais elle n'ont pas de statut : double check
-		and isset($GLOBALS['visiteur_session']['statut'])
-	) {
-
-		// il faut un jeton pour fermer la session (eviter les CSRF)
-		if (!$jeton = _request('jeton')
-			or !verifier_jeton_logout($jeton, $GLOBALS['visiteur_session'])
-		) {
-			$jeton = generer_jeton_logout($GLOBALS['visiteur_session']);
-			$action = generer_url_action("logout", "jeton=$jeton");
-			$action = parametre_url($action, 'logout', _request('logout'));
-			$action = parametre_url($action, 'url', _request('url'));
-			include_spip("inc/minipres");
-			include_spip("inc/filtres");
-			$texte = bouton_action(_T('spip:icone_deconnecter'), $action);
-			$texte = "<div class='boutons'>$texte</div>";
-			$texte .= '<script type="text/javascript">document.write("<style>body{visibility:hidden;}</style>");window.document.forms[0].submit();</script>';
-			$res = minipres(_T('spip:icone_deconnecter'), $texte, '', true);
-			echo $res;
-
-			return;
-		}
-
-		include_spip('inc/auth');
-		auth_trace($GLOBALS['visiteur_session'], '0000-00-00 00:00:00');
-		// le logout explicite vaut destruction de toutes les sessions
-		if (isset($_COOKIE['spip_session'])) {
-			$session = charger_fonction('session', 'inc');
-			$session($GLOBALS['visiteur_session']['id_auteur']);
-			spip_setcookie('spip_session', $_COOKIE['spip_session'], [
-				'expires' => time() - 3600
-			]);
-		}
-		// si authentification http, et que la personne est loge,
-		// pour se deconnecter, il faut proposer un nouveau formulaire de connexion http
-		if (isset($_SERVER['PHP_AUTH_USER'])
-			and !$GLOBALS['ignore_auth_http']
-			and $GLOBALS['auth_can_disconnect']
-		) {
-			ask_php_auth(_T('login_deconnexion_ok'),
-				_T('login_verifiez_navigateur'),
-				_T('login_retour_public'),
-				"redirect=" . _DIR_RESTREINT_ABS,
-				_T('login_test_navigateur'),
-				true);
-
-		}
-	}
-
-	// Rediriger en contrant le cache navigateur (Safari3)
-	include_spip('inc/headers');
-	redirige_par_entete($url
-		? parametre_url($url, 'var_hasard', uniqid(rand()), '&')
-		: generer_url_public('login'));
+    $logout = _request('logout');
+    $url = securiser_redirect_action(_request('url'));
+    // cas particulier, logout dans l'espace public
+    if ($logout == 'public' and !$url) {
+        $url = url_de_base();
+    }
+
+    // seul le loge peut se deloger (mais id_auteur peut valoir 0 apres une restauration avortee)
+    if (isset($GLOBALS['visiteur_session']['id_auteur'])
+        and is_numeric($GLOBALS['visiteur_session']['id_auteur'])
+        // des sessions anonymes avec id_auteur=0 existent, mais elle n'ont pas de statut : double check
+        and isset($GLOBALS['visiteur_session']['statut'])
+    ) {
+
+        // il faut un jeton pour fermer la session (eviter les CSRF)
+        if (!$jeton = _request('jeton')
+            or !verifier_jeton_logout($jeton, $GLOBALS['visiteur_session'])
+        ) {
+            $jeton = generer_jeton_logout($GLOBALS['visiteur_session']);
+            $action = generer_url_action("logout", "jeton=$jeton");
+            $action = parametre_url($action, 'logout', _request('logout'));
+            $action = parametre_url($action, 'url', _request('url'));
+            include_spip("inc/minipres");
+            include_spip("inc/filtres");
+            $texte = bouton_action(_T('spip:icone_deconnecter'), $action);
+            $texte = "<div class='boutons'>$texte</div>";
+            $texte .= '<script type="text/javascript">document.write("<style>body{visibility:hidden;}</style>");window.document.forms[0].submit();</script>';
+            $res = minipres(_T('spip:icone_deconnecter'), $texte, '', true);
+            echo $res;
+
+            return;
+        }
+
+        include_spip('inc/auth');
+        auth_trace($GLOBALS['visiteur_session'], '0000-00-00 00:00:00');
+        // le logout explicite vaut destruction de toutes les sessions
+        if (isset($_COOKIE['spip_session'])) {
+            $session = charger_fonction('session', 'inc');
+            $session($GLOBALS['visiteur_session']['id_auteur']);
+            spip_setcookie('spip_session', $_COOKIE['spip_session'], [
+                'expires' => time() - 3600
+            ]);
+        }
+        // si authentification http, et que la personne est loge,
+        // pour se deconnecter, il faut proposer un nouveau formulaire de connexion http
+        if (isset($_SERVER['PHP_AUTH_USER'])
+            and !$GLOBALS['ignore_auth_http']
+            and $GLOBALS['auth_can_disconnect']
+        ) {
+            ask_php_auth(_T('login_deconnexion_ok'),
+                _T('login_verifiez_navigateur'),
+                _T('login_retour_public'),
+                "redirect=" . _DIR_RESTREINT_ABS,
+                _T('login_test_navigateur'),
+                true);
+
+        }
+    }
+
+    // Rediriger en contrant le cache navigateur (Safari3)
+    include_spip('inc/headers');
+    redirige_par_entete($url
+        ? parametre_url($url, 'var_hasard', uniqid(rand()), '&')
+        : generer_url_public('login'));
 }
 
 /**
@@ -108,18 +108,18 @@ 
  * @return string
  */
 function generer_jeton_logout($session, $alea = null) {
-	if (is_null($alea)) {
-		include_spip('inc/acces');
-		$alea = charger_aleas();
-	}
-
-	$jeton = md5($session['date_session']
-		. $session['id_auteur']
-		. $session['statut']
-		. $alea
-	);
-
-	return $jeton;
+    if (is_null($alea)) {
+        include_spip('inc/acces');
+        $alea = charger_aleas();
+    }
+
+    $jeton = md5($session['date_session']
+        . $session['id_auteur']
+        . $session['statut']
+        . $alea
+    );
+
+    return $jeton;
 }
 
 /**
@@ -133,13 +133,13 @@ 
  * @return bool
  */
 function verifier_jeton_logout($jeton, $session) {
-	if (generer_jeton_logout($session) === $jeton) {
-		return true;
-	}
+    if (generer_jeton_logout($session) === $jeton) {
+        return true;
+    }
 
-	if (generer_jeton_logout($session, $GLOBALS['meta']['alea_ephemere_ancien']) === $jeton) {
-		return true;
-	}
+    if (generer_jeton_logout($session, $GLOBALS['meta']['alea_ephemere_ancien']) === $jeton) {
+        return true;
+    }
 
-	return false;
+    return false;
 }

prive/images/index.php

Indentation +7 added lines, -7 removed lines

@@ -9,13 +9,13 @@
 	<h1>Index des icones de <a href='https://www.spip.net'>Spip</a></h1>
 	<table>
 		<?php
-		$myDir = opendir('.');
-		while ($file = readdir($myDir)) {
-			if (preg_match(',\.(png|gif)$,i', $file)) {
-				echo "		<tr><td>$file</td><td><img src='$file' alt='$file' /></td></tr>\n";
-			}
-		}
-		?>
+        $myDir = opendir('.');
+        while ($file = readdir($myDir)) {
+            if (preg_match(',\.(png|gif)$,i', $file)) {
+                echo "		<tr><td>$file</td><td><img src='$file' alt='$file' /></td></tr>\n";
+            }
+        }
+        ?>
 	</table>
 </center>
 </body>

ecrire/req/sqlite3.php

Indentation +8 added lines, -8 removed lines

@@ -11,7 +11,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -22,19 +22,19 @@ 
 
 // https://code.spip.net/@req_sqlite3_dist
 function req_sqlite3_dist($addr, $port, $login, $pass, $db = '', $prefixe = '') {
-	return req_sqlite_dist($addr, $port, $login, $pass, $db, $prefixe, $sqlite_version = 3);
+    return req_sqlite_dist($addr, $port, $login, $pass, $db, $prefixe, $sqlite_version = 3);
 }
 
 
 // https://code.spip.net/@spip_sqlite3_constantes
 function spip_sqlite3_constantes() {
-	if (!defined('SPIP_SQLITE3_ASSOC')) {
-		define('SPIP_SQLITE3_ASSOC', PDO::FETCH_ASSOC);
-		define('SPIP_SQLITE3_NUM', PDO::FETCH_NUM);
-		define('SPIP_SQLITE3_BOTH', PDO::FETCH_BOTH);
-	}
+    if (!defined('SPIP_SQLITE3_ASSOC')) {
+        define('SPIP_SQLITE3_ASSOC', PDO::FETCH_ASSOC);
+        define('SPIP_SQLITE3_NUM', PDO::FETCH_NUM);
+        define('SPIP_SQLITE3_BOTH', PDO::FETCH_BOTH);
+    }
 }
 
 function spip_versions_sqlite3() {
-	return _sqlite_charger_version(3) ? 3 : false;
+    return _sqlite_charger_version(3) ? 3 : false;
 }

ecrire/req/pg.exp.php

Indentation +1112 added lines, -1112 removed lines

@@ -18,7 +18,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 define('_DEFAULT_DB', 'spip');
@@ -32,128 +32,128 @@ 
 
 // https://code.spip.net/@req_pg_dist
 function req_pg_dist($addr, $port, $login, $pass, $db = '', $prefixe = '') {
-	static $last_connect = array();
-	if (!extension_loaded('pgsql')) {
-		return false;
-	}
-
-	// si provient de selectdb
-	if (empty($addr) && empty($port) && empty($login) && empty($pass)) {
-		foreach (array('addr', 'port', 'login', 'pass', 'prefixe') as $a) {
-			$$a = $last_connect[$a];
-		}
-	}
-	@list($host, $p) = explode(';', $addr);
-	if ($p > 0) {
-		$port = " port=$p";
-	} else {
-		$port = '';
-	}
-	$erreurs = array();
-	if ($db) {
-		@$link = pg_connect("host=$host$port dbname=$db user=$login password='$pass'", PGSQL_CONNECT_FORCE_NEW);
-	} elseif (!@$link = pg_connect("host=$host$port user=$login password='$pass'", PGSQL_CONNECT_FORCE_NEW)) {
-		$erreurs[] = pg_last_error();
-		if (@$link = pg_connect("host=$host$port dbname=$login user=$login password='$pass'", PGSQL_CONNECT_FORCE_NEW)) {
-			$db = $login;
-		} else {
-			$erreurs[] = pg_last_error();
-			$db = _DEFAULT_DB;
-			$link = pg_connect("host=$host$port dbname=$db user=$login password='$pass'", PGSQL_CONNECT_FORCE_NEW);
-		}
-	}
-	if (!$link) {
-		$erreurs[] = pg_last_error();
-		foreach ($erreurs as $e) {
-			spip_log('Echec pg_connect. Erreur : ' . $e, 'pg.' . _LOG_HS);
-		}
-
-		return false;
-	}
-
-	if ($link) {
-		$last_connect = array(
-			'addr' => $addr,
-			'port' => $port,
-			'login' => $login,
-			'pass' => $pass,
-			'db' => $db,
-			'prefixe' => $prefixe,
-		);
-	}
-
-	spip_log("Connexion vers $host, base $db, prefixe $prefixe " . ($link ? 'operationnelle' : 'impossible'),
-		'pg.' . _LOG_DEBUG);
-
-	return !$link ? false : array(
-		'db' => $db,
-		'prefixe' => $prefixe ? $prefixe : $db,
-		'link' => $link,
-	);
+    static $last_connect = array();
+    if (!extension_loaded('pgsql')) {
+        return false;
+    }
+
+    // si provient de selectdb
+    if (empty($addr) && empty($port) && empty($login) && empty($pass)) {
+        foreach (array('addr', 'port', 'login', 'pass', 'prefixe') as $a) {
+            $$a = $last_connect[$a];
+        }
+    }
+    @list($host, $p) = explode(';', $addr);
+    if ($p > 0) {
+        $port = " port=$p";
+    } else {
+        $port = '';
+    }
+    $erreurs = array();
+    if ($db) {
+        @$link = pg_connect("host=$host$port dbname=$db user=$login password='$pass'", PGSQL_CONNECT_FORCE_NEW);
+    } elseif (!@$link = pg_connect("host=$host$port user=$login password='$pass'", PGSQL_CONNECT_FORCE_NEW)) {
+        $erreurs[] = pg_last_error();
+        if (@$link = pg_connect("host=$host$port dbname=$login user=$login password='$pass'", PGSQL_CONNECT_FORCE_NEW)) {
+            $db = $login;
+        } else {
+            $erreurs[] = pg_last_error();
+            $db = _DEFAULT_DB;
+            $link = pg_connect("host=$host$port dbname=$db user=$login password='$pass'", PGSQL_CONNECT_FORCE_NEW);
+        }
+    }
+    if (!$link) {
+        $erreurs[] = pg_last_error();
+        foreach ($erreurs as $e) {
+            spip_log('Echec pg_connect. Erreur : ' . $e, 'pg.' . _LOG_HS);
+        }
+
+        return false;
+    }
+
+    if ($link) {
+        $last_connect = array(
+            'addr' => $addr,
+            'port' => $port,
+            'login' => $login,
+            'pass' => $pass,
+            'db' => $db,
+            'prefixe' => $prefixe,
+        );
+    }
+
+    spip_log("Connexion vers $host, base $db, prefixe $prefixe " . ($link ? 'operationnelle' : 'impossible'),
+        'pg.' . _LOG_DEBUG);
+
+    return !$link ? false : array(
+        'db' => $db,
+        'prefixe' => $prefixe ? $prefixe : $db,
+        'link' => $link,
+    );
 }
 
 $GLOBALS['spip_pg_functions_1'] = array(
-	'alter' => 'spip_pg_alter',
-	'count' => 'spip_pg_count',
-	'countsel' => 'spip_pg_countsel',
-	'create' => 'spip_pg_create',
-	'create_base' => 'spip_pg_create_base',
-	'create_view' => 'spip_pg_create_view',
-	'date_proche' => 'spip_pg_date_proche',
-	'delete' => 'spip_pg_delete',
-	'drop_table' => 'spip_pg_drop_table',
-	'drop_view' => 'spip_pg_drop_view',
-	'errno' => 'spip_pg_errno',
-	'error' => 'spip_pg_error',
-	'explain' => 'spip_pg_explain',
-	'fetch' => 'spip_pg_fetch',
-	'seek' => 'spip_pg_seek',
-	'free' => 'spip_pg_free',
-	'hex' => 'spip_pg_hex',
-	'in' => 'spip_pg_in',
-	'insert' => 'spip_pg_insert',
-	'insertq' => 'spip_pg_insertq',
-	'insertq_multi' => 'spip_pg_insertq_multi',
-	'listdbs' => 'spip_pg_listdbs',
-	'multi' => 'spip_pg_multi',
-	'optimize' => 'spip_pg_optimize',
-	'query' => 'spip_pg_query',
-	'quote' => 'spip_pg_quote',
-	'replace' => 'spip_pg_replace',
-	'replace_multi' => 'spip_pg_replace_multi',
-	'select' => 'spip_pg_select',
-	'selectdb' => 'spip_pg_selectdb',
-	'set_connect_charset' => 'spip_pg_set_connect_charset',
-	'showbase' => 'spip_pg_showbase',
-	'showtable' => 'spip_pg_showtable',
-	'update' => 'spip_pg_update',
-	'updateq' => 'spip_pg_updateq',
+    'alter' => 'spip_pg_alter',
+    'count' => 'spip_pg_count',
+    'countsel' => 'spip_pg_countsel',
+    'create' => 'spip_pg_create',
+    'create_base' => 'spip_pg_create_base',
+    'create_view' => 'spip_pg_create_view',
+    'date_proche' => 'spip_pg_date_proche',
+    'delete' => 'spip_pg_delete',
+    'drop_table' => 'spip_pg_drop_table',
+    'drop_view' => 'spip_pg_drop_view',
+    'errno' => 'spip_pg_errno',
+    'error' => 'spip_pg_error',
+    'explain' => 'spip_pg_explain',
+    'fetch' => 'spip_pg_fetch',
+    'seek' => 'spip_pg_seek',
+    'free' => 'spip_pg_free',
+    'hex' => 'spip_pg_hex',
+    'in' => 'spip_pg_in',
+    'insert' => 'spip_pg_insert',
+    'insertq' => 'spip_pg_insertq',
+    'insertq_multi' => 'spip_pg_insertq_multi',
+    'listdbs' => 'spip_pg_listdbs',
+    'multi' => 'spip_pg_multi',
+    'optimize' => 'spip_pg_optimize',
+    'query' => 'spip_pg_query',
+    'quote' => 'spip_pg_quote',
+    'replace' => 'spip_pg_replace',
+    'replace_multi' => 'spip_pg_replace_multi',
+    'select' => 'spip_pg_select',
+    'selectdb' => 'spip_pg_selectdb',
+    'set_connect_charset' => 'spip_pg_set_connect_charset',
+    'showbase' => 'spip_pg_showbase',
+    'showtable' => 'spip_pg_showtable',
+    'update' => 'spip_pg_update',
+    'updateq' => 'spip_pg_updateq',
 );
 
 // Par ou ca passe une fois les traductions faites
 // https://code.spip.net/@spip_pg_trace_query
 function spip_pg_trace_query($query, $serveur = '') {
-	$connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
-	$prefixe = $connexion['prefixe'];
-	$link = $connexion['link'];
-	$db = $connexion['db'];
-
-	if (isset($_GET['var_profile'])) {
-		include_spip('public/tracer');
-		$t = trace_query_start();
-		$e = '';
-	} else {
-		$t = 0;
-	}
-
-	$connexion['last'] = $query;
-	$r = spip_pg_query_simple($link, $query);
-
-	// Log de l'erreur eventuelle
-	if ($e = spip_pg_errno($serveur)) {
-		$e .= spip_pg_error($query, $serveur);
-	} // et du fautif
-	return $t ? trace_query_end($query, $t, $r, $e, $serveur) : $r;
+    $connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
+    $prefixe = $connexion['prefixe'];
+    $link = $connexion['link'];
+    $db = $connexion['db'];
+
+    if (isset($_GET['var_profile'])) {
+        include_spip('public/tracer');
+        $t = trace_query_start();
+        $e = '';
+    } else {
+        $t = 0;
+    }
+
+    $connexion['last'] = $query;
+    $r = spip_pg_query_simple($link, $query);
+
+    // Log de l'erreur eventuelle
+    if ($e = spip_pg_errno($serveur)) {
+        $e .= spip_pg_error($query, $serveur);
+    } // et du fautif
+    return $t ? trace_query_end($query, $t, $r, $e, $serveur) : $r;
 }
 
 // Fonction de requete generale quand on est sur que c'est SQL standard.
@@ -161,30 +161,30 @@ 
 
 // https://code.spip.net/@spip_pg_query
 function spip_pg_query($query, $serveur = '', $requeter = true) {
-	$connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
-	$prefixe = $connexion['prefixe'];
-	$link = $connexion['link'];
-	$db = $connexion['db'];
-
-	if (preg_match('/\s(SET|VALUES|WHERE|DATABASE)\s/i', $query, $regs)) {
-		$suite = strstr($query, $regs[0]);
-		$query = substr($query, 0, -strlen($suite));
-	} else {
-		$suite = '';
-	}
-	$query = preg_replace('/([,\s])spip_/', '\1' . $prefixe . '_', $query) . $suite;
-
-	// renvoyer la requete inerte si demandee
-	if (!$requeter) {
-		return $query;
-	}
-
-	return spip_pg_trace_query($query, $serveur);
+    $connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
+    $prefixe = $connexion['prefixe'];
+    $link = $connexion['link'];
+    $db = $connexion['db'];
+
+    if (preg_match('/\s(SET|VALUES|WHERE|DATABASE)\s/i', $query, $regs)) {
+        $suite = strstr($query, $regs[0]);
+        $query = substr($query, 0, -strlen($suite));
+    } else {
+        $suite = '';
+    }
+    $query = preg_replace('/([,\s])spip_/', '\1' . $prefixe . '_', $query) . $suite;
+
+    // renvoyer la requete inerte si demandee
+    if (!$requeter) {
+        return $query;
+    }
+
+    return spip_pg_trace_query($query, $serveur);
 }
 
 function spip_pg_query_simple($link, $query) {
-	#spip_log(var_export($query,true), 'pg.'._LOG_DEBUG);
-	return pg_query($link, $query);
+    #spip_log(var_export($query,true), 'pg.'._LOG_DEBUG);
+    return pg_query($link, $query);
 }
 
 /*
@@ -196,198 +196,198 @@ 
  * de requetes showtable intempestives
  */
 function spip_pg_ajouter_champs_timestamp($table, $couples, $desc = '', $serveur = '') {
-	static $tables = array();
-
-	if (!isset($tables[$table])) {
-
-		if (!$desc) {
-			$trouver_table = charger_fonction('trouver_table', 'base');
-			$desc = $trouver_table($table, $serveur);
-			// si pas de description, on ne fait rien, ou on die() ?
-			if (!$desc) {
-				return $couples;
-			}
-		}
-
-		// recherche des champs avec simplement 'TIMESTAMP'
-		// cependant, il faudra peut etre etendre
-		// avec la gestion de DEFAULT et ON UPDATE
-		// mais ceux-ci ne sont pas utilises dans le core
-		$tables[$table] = array();
-		foreach ($desc['field'] as $k => $v) {
-			$v = strtolower(ltrim($v));
-			// ne pas ajouter de timestamp now() si un default est specifie
-			if (strpos($v, 'timestamp') === 0 and strpos($v, 'default') === false) {
-				$tables[$table][] = $k;
-			}
-		}
-	}
-
-	// ajout des champs type 'timestamp' absents
-	foreach ($tables[$table] as $maj) {
-		if (!array_key_exists($maj, $couples)) {
-			$couples[$maj] = "NOW()";
-		}
-	}
-
-	return $couples;
+    static $tables = array();
+
+    if (!isset($tables[$table])) {
+
+        if (!$desc) {
+            $trouver_table = charger_fonction('trouver_table', 'base');
+            $desc = $trouver_table($table, $serveur);
+            // si pas de description, on ne fait rien, ou on die() ?
+            if (!$desc) {
+                return $couples;
+            }
+        }
+
+        // recherche des champs avec simplement 'TIMESTAMP'
+        // cependant, il faudra peut etre etendre
+        // avec la gestion de DEFAULT et ON UPDATE
+        // mais ceux-ci ne sont pas utilises dans le core
+        $tables[$table] = array();
+        foreach ($desc['field'] as $k => $v) {
+            $v = strtolower(ltrim($v));
+            // ne pas ajouter de timestamp now() si un default est specifie
+            if (strpos($v, 'timestamp') === 0 and strpos($v, 'default') === false) {
+                $tables[$table][] = $k;
+            }
+        }
+    }
+
+    // ajout des champs type 'timestamp' absents
+    foreach ($tables[$table] as $maj) {
+        if (!array_key_exists($maj, $couples)) {
+            $couples[$maj] = "NOW()";
+        }
+    }
+
+    return $couples;
 }
 
 
 // Alter en PG ne traite pas les index
 // https://code.spip.net/@spip_pg_alter
 function spip_pg_alter($query, $serveur = '', $requeter = true) {
-	// il faudrait une regexp pour eviter de spliter ADD PRIMARY KEY (colA, colB)
-	// tout en cassant en deux alter distincts "ADD PRIMARY KEY (colA, colB), ADD INDEX (chose)"... 
-	// ou revoir l'api de sql_alter en creant un 
-	// sql_alter_table($table,array($actions));
-	if (!preg_match("/\s*((\s*IGNORE)?\s*TABLE\s*([^\s]*))\s*(.*)?/is", $query, $regs)) {
-		spip_log("$query mal comprise", 'pg.' . _LOG_ERREUR);
-
-		return false;
-	}
-	$debut = $regs[1];
-	$table = $regs[3];
-	$suite = $regs[4];
-	$todo = explode(',', $suite);
-	// on remet les morceaux dechires ensembles... que c'est laid !
-	$todo2 = array();
-	$i = 0;
-	$ouverte = false;
-	while ($do = array_shift($todo)) {
-		$todo2[$i] = isset($todo2[$i]) ? $todo2[$i] . "," . $do : $do;
-		$o = (false !== strpos($do, "("));
-		$f = (false !== strpos($do, ")"));
-		if ($o and !$f) {
-			$ouverte = true;
-		} elseif ($f) {
-			$ouverte = false;
-		}
-		if (!$ouverte) {
-			$i++;
-		}
-	}
-	$todo = $todo2;
-	$query = $debut . ' ' . array_shift($todo);
-
-	if (!preg_match('/^\s*(IGNORE\s*)?TABLE\s+(\w+)\s+(ADD|DROP|CHANGE|MODIFY|RENAME)\s*(.*)$/is', $query, $r)) {
-		spip_log("$query incompris", 'pg.' . _LOG_ERREUR);
-	} else {
-		if ($r[1]) {
-			spip_log("j'ignore IGNORE dans $query", 'pg.' . _LOG_AVERTISSEMENT);
-		}
-		$f = 'spip_pg_alter_' . strtolower($r[3]);
-		if (function_exists($f)) {
-			$f($r[2], $r[4], $serveur, $requeter);
-		} else {
-			spip_log("$query non prevu", 'pg.' . _LOG_ERREUR);
-		}
-	}
-	// Alter a plusieurs args. Faudrait optimiser.
-	if ($todo) {
-		spip_pg_alter("TABLE $table " . join(',', $todo));
-	}
+    // il faudrait une regexp pour eviter de spliter ADD PRIMARY KEY (colA, colB)
+    // tout en cassant en deux alter distincts "ADD PRIMARY KEY (colA, colB), ADD INDEX (chose)"... 
+    // ou revoir l'api de sql_alter en creant un 
+    // sql_alter_table($table,array($actions));
+    if (!preg_match("/\s*((\s*IGNORE)?\s*TABLE\s*([^\s]*))\s*(.*)?/is", $query, $regs)) {
+        spip_log("$query mal comprise", 'pg.' . _LOG_ERREUR);
+
+        return false;
+    }
+    $debut = $regs[1];
+    $table = $regs[3];
+    $suite = $regs[4];
+    $todo = explode(',', $suite);
+    // on remet les morceaux dechires ensembles... que c'est laid !
+    $todo2 = array();
+    $i = 0;
+    $ouverte = false;
+    while ($do = array_shift($todo)) {
+        $todo2[$i] = isset($todo2[$i]) ? $todo2[$i] . "," . $do : $do;
+        $o = (false !== strpos($do, "("));
+        $f = (false !== strpos($do, ")"));
+        if ($o and !$f) {
+            $ouverte = true;
+        } elseif ($f) {
+            $ouverte = false;
+        }
+        if (!$ouverte) {
+            $i++;
+        }
+    }
+    $todo = $todo2;
+    $query = $debut . ' ' . array_shift($todo);
+
+    if (!preg_match('/^\s*(IGNORE\s*)?TABLE\s+(\w+)\s+(ADD|DROP|CHANGE|MODIFY|RENAME)\s*(.*)$/is', $query, $r)) {
+        spip_log("$query incompris", 'pg.' . _LOG_ERREUR);
+    } else {
+        if ($r[1]) {
+            spip_log("j'ignore IGNORE dans $query", 'pg.' . _LOG_AVERTISSEMENT);
+        }
+        $f = 'spip_pg_alter_' . strtolower($r[3]);
+        if (function_exists($f)) {
+            $f($r[2], $r[4], $serveur, $requeter);
+        } else {
+            spip_log("$query non prevu", 'pg.' . _LOG_ERREUR);
+        }
+    }
+    // Alter a plusieurs args. Faudrait optimiser.
+    if ($todo) {
+        spip_pg_alter("TABLE $table " . join(',', $todo));
+    }
 
 }
 
 // https://code.spip.net/@spip_pg_alter_change
 function spip_pg_alter_change($table, $arg, $serveur = '', $requeter = true) {
-	if (!preg_match('/^`?(\w+)`?\s+`?(\w+)`?\s+(.*?)\s*(DEFAULT .*?)?(NOT\s+NULL)?\s*(DEFAULT .*?)?$/i', $arg, $r)) {
-		spip_log("alter change: $arg  incompris", 'pg.' . _LOG_ERREUR);
-	} else {
-		list(, $old, $new, $type, $default, $null, $def2) = $r;
-		$actions = array("ALTER $old TYPE " . mysql2pg_type($type));
-		if ($null) {
-			$actions[] = "ALTER $old SET NOT NULL";
-		} else {
-			$actions[] = "ALTER $old DROP NOT NULL";
-		}
-
-		if ($d = ($default ? $default : $def2)) {
-			$actions[] = "ALTER $old SET $d";
-		} else {
-			$actions[] = "ALTER $old DROP DEFAULT";
-		}
-
-		spip_pg_query("ALTER TABLE $table " . join(', ', $actions));
-
-		if ($old != $new) {
-			spip_pg_query("ALTER TABLE $table RENAME $old TO $new", $serveur);
-		}
-	}
+    if (!preg_match('/^`?(\w+)`?\s+`?(\w+)`?\s+(.*?)\s*(DEFAULT .*?)?(NOT\s+NULL)?\s*(DEFAULT .*?)?$/i', $arg, $r)) {
+        spip_log("alter change: $arg  incompris", 'pg.' . _LOG_ERREUR);
+    } else {
+        list(, $old, $new, $type, $default, $null, $def2) = $r;
+        $actions = array("ALTER $old TYPE " . mysql2pg_type($type));
+        if ($null) {
+            $actions[] = "ALTER $old SET NOT NULL";
+        } else {
+            $actions[] = "ALTER $old DROP NOT NULL";
+        }
+
+        if ($d = ($default ? $default : $def2)) {
+            $actions[] = "ALTER $old SET $d";
+        } else {
+            $actions[] = "ALTER $old DROP DEFAULT";
+        }
+
+        spip_pg_query("ALTER TABLE $table " . join(', ', $actions));
+
+        if ($old != $new) {
+            spip_pg_query("ALTER TABLE $table RENAME $old TO $new", $serveur);
+        }
+    }
 }
 
 // https://code.spip.net/@spip_pg_alter_add
 function spip_pg_alter_add($table, $arg, $serveur = '', $requeter = true) {
-	if (!preg_match('/^(COLUMN|INDEX|KEY|PRIMARY\s+KEY|)\s*(.*)$/', $arg, $r)) {
-		spip_log("alter add $arg  incompris", 'pg.' . _LOG_ERREUR);
-
-		return null;
-	}
-	if (!$r[1] or $r[1] == 'COLUMN') {
-		preg_match('/`?(\w+)`?(.*)/', $r[2], $m);
-		if (preg_match('/^(.*)(BEFORE|AFTER|FIRST)(.*)$/is', $m[2], $n)) {
-			$m[2] = $n[1];
-		}
-
-		return spip_pg_query("ALTER TABLE $table ADD " . $m[1] . ' ' . mysql2pg_type($m[2]), $serveur, $requeter);
-	} elseif ($r[1][0] == 'P') {
-		// la primary peut etre sur plusieurs champs
-		$r[2] = trim(str_replace('`', '', $r[2]));
-		$m = ($r[2][0] == '(') ? substr($r[2], 1, -1) : $r[2];
-
-		return spip_pg_query("ALTER TABLE $table ADD CONSTRAINT $table" . '_pkey PRIMARY KEY (' . $m . ')', $serveur,
-			$requeter);
-	} else {
-		preg_match('/([^\s,]*)\s*(.*)?/', $r[2], $m);
-		// peut etre "(colonne)" ou "nom_index (colonnes)"
-		// bug potentiel si qqn met "(colonne, colonne)"
-		//
-		// nom_index (colonnes)
-		if ($m[2]) {
-			$colonnes = substr($m[2], 1, -1);
-			$nom_index = $m[1];
-		} else {
-			// (colonne)
-			if ($m[1][0] == "(") {
-				$colonnes = substr($m[1], 1, -1);
-				if (false !== strpos(",", $colonnes)) {
-					spip_log("PG : Erreur, impossible de creer un index sur plusieurs colonnes"
-						. " sans qu'il ait de nom ($table, ($colonnes))", 'pg.' . _LOG_ERREUR);
-				} else {
-					$nom_index = $colonnes;
-				}
-			} // nom_index
-			else {
-				$nom_index = $colonnes = $m[1];
-			}
-		}
-
-		return spip_pg_create_index($nom_index, $table, $colonnes, $serveur, $requeter);
-	}
+    if (!preg_match('/^(COLUMN|INDEX|KEY|PRIMARY\s+KEY|)\s*(.*)$/', $arg, $r)) {
+        spip_log("alter add $arg  incompris", 'pg.' . _LOG_ERREUR);
+
+        return null;
+    }
+    if (!$r[1] or $r[1] == 'COLUMN') {
+        preg_match('/`?(\w+)`?(.*)/', $r[2], $m);
+        if (preg_match('/^(.*)(BEFORE|AFTER|FIRST)(.*)$/is', $m[2], $n)) {
+            $m[2] = $n[1];
+        }
+
+        return spip_pg_query("ALTER TABLE $table ADD " . $m[1] . ' ' . mysql2pg_type($m[2]), $serveur, $requeter);
+    } elseif ($r[1][0] == 'P') {
+        // la primary peut etre sur plusieurs champs
+        $r[2] = trim(str_replace('`', '', $r[2]));
+        $m = ($r[2][0] == '(') ? substr($r[2], 1, -1) : $r[2];
+
+        return spip_pg_query("ALTER TABLE $table ADD CONSTRAINT $table" . '_pkey PRIMARY KEY (' . $m . ')', $serveur,
+            $requeter);
+    } else {
+        preg_match('/([^\s,]*)\s*(.*)?/', $r[2], $m);
+        // peut etre "(colonne)" ou "nom_index (colonnes)"
+        // bug potentiel si qqn met "(colonne, colonne)"
+        //
+        // nom_index (colonnes)
+        if ($m[2]) {
+            $colonnes = substr($m[2], 1, -1);
+            $nom_index = $m[1];
+        } else {
+            // (colonne)
+            if ($m[1][0] == "(") {
+                $colonnes = substr($m[1], 1, -1);
+                if (false !== strpos(",", $colonnes)) {
+                    spip_log("PG : Erreur, impossible de creer un index sur plusieurs colonnes"
+                        . " sans qu'il ait de nom ($table, ($colonnes))", 'pg.' . _LOG_ERREUR);
+                } else {
+                    $nom_index = $colonnes;
+                }
+            } // nom_index
+            else {
+                $nom_index = $colonnes = $m[1];
+            }
+        }
+
+        return spip_pg_create_index($nom_index, $table, $colonnes, $serveur, $requeter);
+    }
 }
 
 // https://code.spip.net/@spip_pg_alter_drop
 function spip_pg_alter_drop($table, $arg, $serveur = '', $requeter = true) {
-	if (!preg_match('/^(COLUMN|INDEX|KEY|PRIMARY\s+KEY|)\s*`?(\w*)`?/', $arg, $r)) {
-		spip_log("alter drop: $arg  incompris", 'pg.' . _LOG_ERREUR);
-	} else {
-		if (!$r[1] or $r[1] == 'COLUMN') {
-			return spip_pg_query("ALTER TABLE $table DROP " . $r[2], $serveur);
-		} elseif ($r[1][0] == 'P') {
-			return spip_pg_query("ALTER TABLE $table DROP CONSTRAINT $table" . '_pkey', $serveur);
-		} else {
-			return spip_pg_query("DROP INDEX " . $table . '_' . $r[2], $serveur);
-		}
-	}
+    if (!preg_match('/^(COLUMN|INDEX|KEY|PRIMARY\s+KEY|)\s*`?(\w*)`?/', $arg, $r)) {
+        spip_log("alter drop: $arg  incompris", 'pg.' . _LOG_ERREUR);
+    } else {
+        if (!$r[1] or $r[1] == 'COLUMN') {
+            return spip_pg_query("ALTER TABLE $table DROP " . $r[2], $serveur);
+        } elseif ($r[1][0] == 'P') {
+            return spip_pg_query("ALTER TABLE $table DROP CONSTRAINT $table" . '_pkey', $serveur);
+        } else {
+            return spip_pg_query("DROP INDEX " . $table . '_' . $r[2], $serveur);
+        }
+    }
 }
 
 function spip_pg_alter_modify($table, $arg, $serveur = '', $requeter = true) {
-	if (!preg_match('/^`?(\w+)`?\s+(.*)$/', $arg, $r)) {
-		spip_log("alter modify: $arg  incompris", 'pg.' . _LOG_ERREUR);
-	} else {
-		return spip_pg_alter_change($table, $r[1] . ' ' . $arg, $serveur = '', $requeter = true);
-	}
+    if (!preg_match('/^`?(\w+)`?\s+(.*)$/', $arg, $r)) {
+        spip_log("alter modify: $arg  incompris", 'pg.' . _LOG_ERREUR);
+    } else {
+        return spip_pg_alter_change($table, $r[1] . ' ' . $arg, $serveur = '', $requeter = true);
+    }
 }
 
 // attention (en pg) : 
@@ -395,17 +395,17 @@ 
 // - alter table A rename X to Y = changer le nom de la colonne X en Y 
 // pour l'instant, traiter simplement RENAME TO X
 function spip_pg_alter_rename($table, $arg, $serveur = '', $requeter = true) {
-	$rename = "";
-	// si TO, mais pas au debut
-	if (!stripos($arg, 'TO ')) {
-		$rename = $arg;
-	} elseif (preg_match('/^(TO)\s*`?(\w*)`?/', $arg, $r)) {
-		$rename = $r[2];
-	} else {
-		spip_log("alter rename: $arg  incompris", 'pg.' . _LOG_ERREUR);
-	}
-
-	return $rename ? spip_pg_query("ALTER TABLE $table RENAME TO $rename") : false;
+    $rename = "";
+    // si TO, mais pas au debut
+    if (!stripos($arg, 'TO ')) {
+        $rename = $arg;
+    } elseif (preg_match('/^(TO)\s*`?(\w*)`?/', $arg, $r)) {
+        $rename = $r[2];
+    } else {
+        spip_log("alter rename: $arg  incompris", 'pg.' . _LOG_ERREUR);
+    }
+
+    return $rename ? spip_pg_query("ALTER TABLE $table RENAME TO $rename") : false;
 }
 
 
@@ -421,58 +421,58 @@ 
  * @return bool ou requete
  */
 function spip_pg_create_index($nom, $table, $champs, $serveur = '', $requeter = true) {
-	if (!($nom or $table or $champs)) {
-		spip_log("Champ manquant pour creer un index pg ($nom, $table, (" . @join(',', $champs) . "))",
-			'pg.' . _LOG_ERREUR);
-
-		return false;
-	}
-
-	$nom = str_replace("`", "", $nom);
-	$champs = str_replace("`", "", $champs);
-
-	// PG ne differentie pas noms des index en fonction des tables
-	// il faut donc creer des noms uniques d'index pour une base pg
-	$nom = $table . '_' . $nom;
-	// enlever d'eventuelles parentheses deja presentes sur champs
-	if (!is_array($champs)) {
-		if ($champs[0] == "(") {
-			$champs = substr($champs, 1, -1);
-		}
-		$champs = array($champs);
-	}
-	$query = "CREATE INDEX $nom ON $table (" . join(',', $champs) . ")";
-	if (!$requeter) {
-		return $query;
-	}
-	$res = spip_pg_query($query, $serveur, $requeter);
-
-	return $res;
+    if (!($nom or $table or $champs)) {
+        spip_log("Champ manquant pour creer un index pg ($nom, $table, (" . @join(',', $champs) . "))",
+            'pg.' . _LOG_ERREUR);
+
+        return false;
+    }
+
+    $nom = str_replace("`", "", $nom);
+    $champs = str_replace("`", "", $champs);
+
+    // PG ne differentie pas noms des index en fonction des tables
+    // il faut donc creer des noms uniques d'index pour une base pg
+    $nom = $table . '_' . $nom;
+    // enlever d'eventuelles parentheses deja presentes sur champs
+    if (!is_array($champs)) {
+        if ($champs[0] == "(") {
+            $champs = substr($champs, 1, -1);
+        }
+        $champs = array($champs);
+    }
+    $query = "CREATE INDEX $nom ON $table (" . join(',', $champs) . ")";
+    if (!$requeter) {
+        return $query;
+    }
+    $res = spip_pg_query($query, $serveur, $requeter);
+
+    return $res;
 }
 
 
 // https://code.spip.net/@spip_pg_explain
 function spip_pg_explain($query, $serveur = '', $requeter = true) {
-	if (strpos(ltrim($query), 'SELECT') !== 0) {
-		return array();
-	}
-	$connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
-	$prefixe = $connexion['prefixe'];
-	$link = $connexion['link'];
-	if (preg_match('/\s(SET|VALUES|WHERE)\s/i', $query, $regs)) {
-		$suite = strstr($query, $regs[0]);
-		$query = substr($query, 0, -strlen($suite));
-	} else {
-		$suite = '';
-	}
-	$query = 'EXPLAIN ' . preg_replace('/([,\s])spip_/', '\1' . $prefixe . '_', $query) . $suite;
-
-	if (!$requeter) {
-		return $query;
-	}
-	$r = spip_pg_query_simple($link, $query);
-
-	return spip_pg_fetch($r, null, $serveur);
+    if (strpos(ltrim($query), 'SELECT') !== 0) {
+        return array();
+    }
+    $connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
+    $prefixe = $connexion['prefixe'];
+    $link = $connexion['link'];
+    if (preg_match('/\s(SET|VALUES|WHERE)\s/i', $query, $regs)) {
+        $suite = strstr($query, $regs[0]);
+        $query = substr($query, 0, -strlen($suite));
+    } else {
+        $suite = '';
+    }
+    $query = 'EXPLAIN ' . preg_replace('/([,\s])spip_/', '\1' . $prefixe . '_', $query) . $suite;
+
+    if (!$requeter) {
+        return $query;
+    }
+    $r = spip_pg_query_simple($link, $query);
+
+    return spip_pg_fetch($r, null, $serveur);
 }
 
 
@@ -491,92 +491,92 @@ 
  *     - False en cas d'erreur.
  **/
 function spip_pg_selectdb($db, $serveur = '', $requeter = true) {
-	// se connecter a la base indiquee
-	// avec les identifiants connus
-	$index = $serveur ? strtolower($serveur) : 0;
-
-	if ($link = spip_connect_db('', '', '', '', $db, 'pg', '', '')) {
-		if (($db == $link['db']) && $GLOBALS['connexions'][$index] = $link) {
-			return $db;
-		}
-	} else {
-		return false;
-	}
+    // se connecter a la base indiquee
+    // avec les identifiants connus
+    $index = $serveur ? strtolower($serveur) : 0;
+
+    if ($link = spip_connect_db('', '', '', '', $db, 'pg', '', '')) {
+        if (($db == $link['db']) && $GLOBALS['connexions'][$index] = $link) {
+            return $db;
+        }
+    } else {
+        return false;
+    }
 }
 
 // Qu'une seule base pour le moment
 
 // https://code.spip.net/@spip_pg_listdbs
 function spip_pg_listdbs($serveur) {
-	$connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
-	$link = $connexion['link'];
-	$dbs = array();
-	$res = spip_pg_query_simple($link, "select * From pg_database");
-	while ($row = pg_fetch_array($res, null, PGSQL_NUM)) {
-		$dbs[] = reset($row);
-	}
-
-	return $dbs;
+    $connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
+    $link = $connexion['link'];
+    $dbs = array();
+    $res = spip_pg_query_simple($link, "select * From pg_database");
+    while ($row = pg_fetch_array($res, null, PGSQL_NUM)) {
+        $dbs[] = reset($row);
+    }
+
+    return $dbs;
 }
 
 // https://code.spip.net/@spip_pg_select
 function spip_pg_select(
-	$select,
-	$from,
-	$where = '',
-	$groupby = array(),
-	$orderby = '',
-	$limit = '',
-	$having = '',
-	$serveur = '',
-	$requeter = true
+    $select,
+    $from,
+    $where = '',
+    $groupby = array(),
+    $orderby = '',
+    $limit = '',
+    $having = '',
+    $serveur = '',
+    $requeter = true
 ) {
 
-	$connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
-	$prefixe = $connexion['prefixe'];
-	$link = $connexion['link'];
-	$db = $connexion['db'];
-
-	$limit = preg_match("/^\s*(([0-9]+),)?\s*([0-9]+)\s*$/", $limit, $limatch);
-	if ($limit) {
-		$offset = $limatch[2];
-		$count = $limatch[3];
-	}
-
-	$select = spip_pg_frommysql($select);
-
-	// si pas de tri explicitement demande, le GROUP BY ne
-	// contient que la clef primaire.
-	// lui ajouter alors le champ de tri par defaut
-	if (preg_match("/FIELD\(([a-z]+\.[a-z]+),/i", $orderby[0], $groupbyplus)) {
-		$groupby[] = $groupbyplus[1];
-	}
-
-	$orderby = spip_pg_orderby($orderby, $select);
-
-	if ($having) {
-		if (is_array($having)) {
-			$having = join("\n\tAND ", array_map('calculer_pg_where', $having));
-		}
-	}
-	$from = spip_pg_from($from, $prefixe);
-	$query = "SELECT " . $select
-		. (!$from ? '' : "\nFROM $from")
-		. (!$where ? '' : ("\nWHERE " . (!is_array($where) ? calculer_pg_where($where) : (join("\n\tAND ",
-				array_map('calculer_pg_where', $where))))))
-		. spip_pg_groupby($groupby, $from, $select)
-		. (!$having ? '' : "\nHAVING $having")
-		. ($orderby ? ("\nORDER BY $orderby") : '')
-		. (!$limit ? '' : (" LIMIT $count" . (!$offset ? '' : " OFFSET $offset")));
-
-	// renvoyer la requete inerte si demandee
-	if ($requeter === false) {
-		return $query;
-	}
-
-	$r = spip_pg_trace_query($query, $serveur);
-
-	return $r ? $r : $query;;
+    $connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
+    $prefixe = $connexion['prefixe'];
+    $link = $connexion['link'];
+    $db = $connexion['db'];
+
+    $limit = preg_match("/^\s*(([0-9]+),)?\s*([0-9]+)\s*$/", $limit, $limatch);
+    if ($limit) {
+        $offset = $limatch[2];
+        $count = $limatch[3];
+    }
+
+    $select = spip_pg_frommysql($select);
+
+    // si pas de tri explicitement demande, le GROUP BY ne
+    // contient que la clef primaire.
+    // lui ajouter alors le champ de tri par defaut
+    if (preg_match("/FIELD\(([a-z]+\.[a-z]+),/i", $orderby[0], $groupbyplus)) {
+        $groupby[] = $groupbyplus[1];
+    }
+
+    $orderby = spip_pg_orderby($orderby, $select);
+
+    if ($having) {
+        if (is_array($having)) {
+            $having = join("\n\tAND ", array_map('calculer_pg_where', $having));
+        }
+    }
+    $from = spip_pg_from($from, $prefixe);
+    $query = "SELECT " . $select
+        . (!$from ? '' : "\nFROM $from")
+        . (!$where ? '' : ("\nWHERE " . (!is_array($where) ? calculer_pg_where($where) : (join("\n\tAND ",
+                array_map('calculer_pg_where', $where))))))
+        . spip_pg_groupby($groupby, $from, $select)
+        . (!$having ? '' : "\nHAVING $having")
+        . ($orderby ? ("\nORDER BY $orderby") : '')
+        . (!$limit ? '' : (" LIMIT $count" . (!$offset ? '' : " OFFSET $offset")));
+
+    // renvoyer la requete inerte si demandee
+    if ($requeter === false) {
+        return $query;
+    }
+
+    $r = spip_pg_trace_query($query, $serveur);
+
+    return $r ? $r : $query;;
 }
 
 // Le traitement des prefixes de table dans un Select se limite au FROM
@@ -584,28 +584,28 @@ 
 
 // https://code.spip.net/@spip_pg_from
 function spip_pg_from($from, $prefixe) {
-	if (is_array($from)) {
-		$from = spip_pg_select_as($from);
-	}
+    if (is_array($from)) {
+        $from = spip_pg_select_as($from);
+    }
 
-	return !$prefixe ? $from : preg_replace('/(\b)spip_/', '\1' . $prefixe . '_', $from);
+    return !$prefixe ? $from : preg_replace('/(\b)spip_/', '\1' . $prefixe . '_', $from);
 }
 
 // https://code.spip.net/@spip_pg_orderby
 function spip_pg_orderby($order, $select) {
-	$res = array();
-	$arg = (is_array($order) ? $order : preg_split('/\s*,\s*/', $order));
+    $res = array();
+    $arg = (is_array($order) ? $order : preg_split('/\s*,\s*/', $order));
 
-	foreach ($arg as $v) {
-		if (preg_match('/(case\s+.*?else\s+0\s+end)\s*AS\s+' . $v . '/', $select, $m)) {
+    foreach ($arg as $v) {
+        if (preg_match('/(case\s+.*?else\s+0\s+end)\s*AS\s+' . $v . '/', $select, $m)) {
 
-			$res[] = $m[1];
-		} else {
-			$res[] = $v;
-		}
-	}
+            $res[] = $m[1];
+        } else {
+            $res[] = $v;
+        }
+    }
 
-	return spip_pg_frommysql(join(',', $res));
+    return spip_pg_frommysql(join(',', $res));
 }
 
 // Conversion a l'arrach' des jointures MySQL en jointures PG
@@ -614,57 +614,57 @@ 
 
 // https://code.spip.net/@spip_pg_groupby
 function spip_pg_groupby($groupby, $from, $select) {
-	$join = strpos($from, ",");
-	// ismplifier avant de decouper
-	if (is_string($select)) // fct SQL sur colonne et constante apostrophee ==> la colonne
-	{
-		$select = preg_replace('/\w+\(\s*([^(),\']*),\s*\'[^\']*\'[^)]*\)/', '\\1', $select);
-	}
-
-	if ($join or $groupby) {
-		$join = is_array($select) ? $select : explode(", ", $select);
-	}
-	if ($join) {
-		// enlever les 0 as points, '', ...
-		foreach ($join as $k => $v) {
-			$v = str_replace('DISTINCT ', '', $v);
-			// fct SQL sur colonne et constante apostrophee ==> la colonne
-			$v = preg_replace('/\w+\(\s*([^(),\']*),\s*\'[^\']*\'[^)]*\)/', '\\1', $v);
-			$v = preg_replace('/CAST\(\s*([^(),\' ]*\s+)as\s*\w+\)/', '\\1', $v);
-			// resultat d'agregat ne sont pas a mettre dans le groupby
-			$v = preg_replace('/(SUM|COUNT|MAX|MIN|UPPER)\([^)]+\)(\s*AS\s+\w+)\s*,?/i', '', $v);
-			// idem sans AS (fetch numerique)
-			$v = preg_replace('/(SUM|COUNT|MAX|MIN|UPPER)\([^)]+\)\s*,?/i', '', $v);
-			// des AS simples : on garde le cote droit du AS
-			$v = preg_replace('/^.*\sAS\s+(\w+)\s*$/i', '\\1', $v);
-			// ne reste plus que les vrais colonnes, ou des constantes a virer
-			if (preg_match(',^[\'"],', $v) or is_numeric($v)) {
-				unset($join[$k]);
-			} else {
-				$join[$k] = trim($v);
-			}
-		}
-		$join = array_diff($join, array(''));
-		$join = implode(',', $join);
-	}
-	if (is_array($groupby)) {
-		$groupby = join(',', $groupby);
-	}
-	if ($join) {
-		$groupby = $groupby ? "$groupby, $join" : $join;
-	}
-	if (!$groupby) {
-		return '';
-	}
-
-	$groupby = spip_pg_frommysql($groupby);
-	// Ne pas mettre dans le Group-By des valeurs numeriques
-	// issue de prepare_recherche
-	$groupby = preg_replace('/^\s*\d+\s+AS\s+\w+\s*,?\s*/i', '', $groupby);
-	$groupby = preg_replace('/,\s*\d+\s+AS\s+\w+\s*/i', '', $groupby);
-	$groupby = preg_replace('/\s+AS\s+\w+\s*/i', '', $groupby);
-
-	return "\nGROUP BY $groupby";
+    $join = strpos($from, ",");
+    // ismplifier avant de decouper
+    if (is_string($select)) // fct SQL sur colonne et constante apostrophee ==> la colonne
+    {
+        $select = preg_replace('/\w+\(\s*([^(),\']*),\s*\'[^\']*\'[^)]*\)/', '\\1', $select);
+    }
+
+    if ($join or $groupby) {
+        $join = is_array($select) ? $select : explode(", ", $select);
+    }
+    if ($join) {
+        // enlever les 0 as points, '', ...
+        foreach ($join as $k => $v) {
+            $v = str_replace('DISTINCT ', '', $v);
+            // fct SQL sur colonne et constante apostrophee ==> la colonne
+            $v = preg_replace('/\w+\(\s*([^(),\']*),\s*\'[^\']*\'[^)]*\)/', '\\1', $v);
+            $v = preg_replace('/CAST\(\s*([^(),\' ]*\s+)as\s*\w+\)/', '\\1', $v);
+            // resultat d'agregat ne sont pas a mettre dans le groupby
+            $v = preg_replace('/(SUM|COUNT|MAX|MIN|UPPER)\([^)]+\)(\s*AS\s+\w+)\s*,?/i', '', $v);
+            // idem sans AS (fetch numerique)
+            $v = preg_replace('/(SUM|COUNT|MAX|MIN|UPPER)\([^)]+\)\s*,?/i', '', $v);
+            // des AS simples : on garde le cote droit du AS
+            $v = preg_replace('/^.*\sAS\s+(\w+)\s*$/i', '\\1', $v);
+            // ne reste plus que les vrais colonnes, ou des constantes a virer
+            if (preg_match(',^[\'"],', $v) or is_numeric($v)) {
+                unset($join[$k]);
+            } else {
+                $join[$k] = trim($v);
+            }
+        }
+        $join = array_diff($join, array(''));
+        $join = implode(',', $join);
+    }
+    if (is_array($groupby)) {
+        $groupby = join(',', $groupby);
+    }
+    if ($join) {
+        $groupby = $groupby ? "$groupby, $join" : $join;
+    }
+    if (!$groupby) {
+        return '';
+    }
+
+    $groupby = spip_pg_frommysql($groupby);
+    // Ne pas mettre dans le Group-By des valeurs numeriques
+    // issue de prepare_recherche
+    $groupby = preg_replace('/^\s*\d+\s+AS\s+\w+\s*,?\s*/i', '', $groupby);
+    $groupby = preg_replace('/,\s*\d+\s+AS\s+\w+\s*/i', '', $groupby);
+    $groupby = preg_replace('/\s+AS\s+\w+\s*/i', '', $groupby);
+
+    return "\nGROUP BY $groupby";
 }
 
 // Conversion des operateurs MySQL en PG
@@ -676,472 +676,472 @@ 
 
 // https://code.spip.net/@spip_pg_frommysql
 function spip_pg_frommysql($arg) {
-	if (is_array($arg)) {
-		$arg = join(", ", $arg);
-	}
+    if (is_array($arg)) {
+        $arg = join(", ", $arg);
+    }
 
-	$res = spip_pg_fromfield($arg);
+    $res = spip_pg_fromfield($arg);
 
-	$res = preg_replace('/\brand[(][)]/i', 'random()', $res);
+    $res = preg_replace('/\brand[(][)]/i', 'random()', $res);
 
-	$res = preg_replace('/\b0\.0[+]([a-zA-Z0-9_.]+)\s*/',
-		'CAST(substring(\1, \'^ *[0-9.]+\') as float)',
-		$res);
-	$res = preg_replace('/\b0[+]([a-zA-Z0-9_.]+)\s*/',
-		'CAST(substring(\1, \'^ *[0-9]+\') as int)',
-		$res);
-	$res = preg_replace('/\bconv[(]([^,]*)[^)]*[)]/i',
-		'CAST(substring(\1, \'^ *[0-9]+\') as int)',
-		$res);
+    $res = preg_replace('/\b0\.0[+]([a-zA-Z0-9_.]+)\s*/',
+        'CAST(substring(\1, \'^ *[0-9.]+\') as float)',
+        $res);
+    $res = preg_replace('/\b0[+]([a-zA-Z0-9_.]+)\s*/',
+        'CAST(substring(\1, \'^ *[0-9]+\') as int)',
+        $res);
+    $res = preg_replace('/\bconv[(]([^,]*)[^)]*[)]/i',
+        'CAST(substring(\1, \'^ *[0-9]+\') as int)',
+        $res);
 
-	$res = preg_replace('/UNIX_TIMESTAMP\s*[(]\s*[)]/',
-		' EXTRACT(epoch FROM NOW())', $res);
+    $res = preg_replace('/UNIX_TIMESTAMP\s*[(]\s*[)]/',
+        ' EXTRACT(epoch FROM NOW())', $res);
 
-	// la fonction md5(integer) n'est pas connu en pg
-	// il faut donc forcer les types en text (cas de md5(id_article))
-	$res = preg_replace('/md5\s*[(]([^)]*)[)]/i',
-		'MD5(CAST(\1 AS text))', $res);
+    // la fonction md5(integer) n'est pas connu en pg
+    // il faut donc forcer les types en text (cas de md5(id_article))
+    $res = preg_replace('/md5\s*[(]([^)]*)[)]/i',
+        'MD5(CAST(\1 AS text))', $res);
 
-	$res = preg_replace('/UNIX_TIMESTAMP\s*[(]([^)]*)[)]/',
-		' EXTRACT(epoch FROM \1)', $res);
+    $res = preg_replace('/UNIX_TIMESTAMP\s*[(]([^)]*)[)]/',
+        ' EXTRACT(epoch FROM \1)', $res);
 
-	$res = preg_replace('/\bDAYOFMONTH\s*[(]([^()]*([(][^()]*[)][^()]*)*[^)]*)[)]/',
-		' EXTRACT(day FROM \1)',
-		$res);
+    $res = preg_replace('/\bDAYOFMONTH\s*[(]([^()]*([(][^()]*[)][^()]*)*[^)]*)[)]/',
+        ' EXTRACT(day FROM \1)',
+        $res);
 
-	$res = preg_replace('/\bMONTH\s*[(]([^()]*([(][^)]*[)][^()]*)*[^)]*)[)]/',
-		' EXTRACT(month FROM \1)',
-		$res);
+    $res = preg_replace('/\bMONTH\s*[(]([^()]*([(][^)]*[)][^()]*)*[^)]*)[)]/',
+        ' EXTRACT(month FROM \1)',
+        $res);
 
-	$res = preg_replace('/\bYEAR\s*[(]([^()]*([(][^)]*[)][^()]*)*[^)]*)[)]/',
-		' EXTRACT(year FROM \1)',
-		$res);
+    $res = preg_replace('/\bYEAR\s*[(]([^()]*([(][^)]*[)][^()]*)*[^)]*)[)]/',
+        ' EXTRACT(year FROM \1)',
+        $res);
 
-	$res = preg_replace('/TO_DAYS\s*[(]([^()]*([(][^)]*[)][()]*)*)[)]/',
-		' EXTRACT(day FROM \1 - \'0001-01-01\')',
-		$res);
+    $res = preg_replace('/TO_DAYS\s*[(]([^()]*([(][^)]*[)][()]*)*)[)]/',
+        ' EXTRACT(day FROM \1 - \'0001-01-01\')',
+        $res);
 
-	$res = preg_replace("/(EXTRACT[(][^ ]* FROM *)\"([^\"]*)\"/", '\1\'\2\'', $res);
+    $res = preg_replace("/(EXTRACT[(][^ ]* FROM *)\"([^\"]*)\"/", '\1\'\2\'', $res);
 
-	$res = preg_replace('/DATE_FORMAT\s*[(]([^,]*),\s*\'%Y%m%d\'[)]/', 'to_char(\1, \'YYYYMMDD\')', $res);
+    $res = preg_replace('/DATE_FORMAT\s*[(]([^,]*),\s*\'%Y%m%d\'[)]/', 'to_char(\1, \'YYYYMMDD\')', $res);
 
-	$res = preg_replace('/DATE_FORMAT\s*[(]([^,]*),\s*\'%Y%m\'[)]/', 'to_char(\1, \'YYYYMM\')', $res);
+    $res = preg_replace('/DATE_FORMAT\s*[(]([^,]*),\s*\'%Y%m\'[)]/', 'to_char(\1, \'YYYYMM\')', $res);
 
-	$res = preg_replace('/DATE_SUB\s*[(]([^,]*),/', '(\1 -', $res);
-	$res = preg_replace('/DATE_ADD\s*[(]([^,]*),/', '(\1 +', $res);
-	$res = preg_replace('/INTERVAL\s+(\d+\s+\w+)/', 'INTERVAL \'\1\'', $res);
-	$res = preg_replace('/([+<>-]=?)\s*(\'\d+-\d+-\d+\s+\d+:\d+(:\d+)\')/', '\1 timestamp \2', $res);
-	$res = preg_replace('/(\'\d+-\d+-\d+\s+\d+:\d+:\d+\')\s*([+<>-]=?)/', 'timestamp \1 \2', $res);
+    $res = preg_replace('/DATE_SUB\s*[(]([^,]*),/', '(\1 -', $res);
+    $res = preg_replace('/DATE_ADD\s*[(]([^,]*),/', '(\1 +', $res);
+    $res = preg_replace('/INTERVAL\s+(\d+\s+\w+)/', 'INTERVAL \'\1\'', $res);
+    $res = preg_replace('/([+<>-]=?)\s*(\'\d+-\d+-\d+\s+\d+:\d+(:\d+)\')/', '\1 timestamp \2', $res);
+    $res = preg_replace('/(\'\d+-\d+-\d+\s+\d+:\d+:\d+\')\s*([+<>-]=?)/', 'timestamp \1 \2', $res);
 
-	$res = preg_replace('/([+<>-]=?)\s*(\'\d+-\d+-\d+\')/', '\1 timestamp \2', $res);
-	$res = preg_replace('/(\'\d+-\d+-\d+\')\s*([+<>-]=?)/', 'timestamp \1 \2', $res);
+    $res = preg_replace('/([+<>-]=?)\s*(\'\d+-\d+-\d+\')/', '\1 timestamp \2', $res);
+    $res = preg_replace('/(\'\d+-\d+-\d+\')\s*([+<>-]=?)/', 'timestamp \1 \2', $res);
 
-	$res = preg_replace('/(timestamp .\d+)-00-/', '\1-01-', $res);
-	$res = preg_replace('/(timestamp .\d+-\d+)-00/', '\1-01', $res);
+    $res = preg_replace('/(timestamp .\d+)-00-/', '\1-01-', $res);
+    $res = preg_replace('/(timestamp .\d+-\d+)-00/', '\1-01', $res);
 # correct en theorie mais produit des debordements arithmetiques
 #	$res = preg_replace("/(EXTRACT[(][^ ]* FROM *)(timestamp *'[^']*' *[+-] *timestamp *'[^']*') *[)]/", '\2', $res);
-	$res = preg_replace("/(EXTRACT[(][^ ]* FROM *)('[^']*')/", '\1 timestamp \2', $res);
-	$res = preg_replace("/\sLIKE\s+/", ' ILIKE ', $res);
+    $res = preg_replace("/(EXTRACT[(][^ ]* FROM *)('[^']*')/", '\1 timestamp \2', $res);
+    $res = preg_replace("/\sLIKE\s+/", ' ILIKE ', $res);
 
-	return str_replace('REGEXP', '~', $res);
+    return str_replace('REGEXP', '~', $res);
 }
 
 // https://code.spip.net/@spip_pg_fromfield
 function spip_pg_fromfield($arg) {
-	while (preg_match('/^(.*?)FIELD\s*\(([^,]*)((,[^,)]*)*)\)/', $arg, $m)) {
-
-		preg_match_all('/,([^,]*)/', $m[3], $r, PREG_PATTERN_ORDER);
-		$res = '';
-		$n = 0;
-		$index = $m[2];
-		foreach ($r[1] as $v) {
-			$n++;
-			$res .= "\nwhen $index=$v then $n";
-		}
-		$arg = $m[1] . "case $res else 0 end "
-			. substr($arg, strlen($m[0]));
-	}
-
-	return $arg;
+    while (preg_match('/^(.*?)FIELD\s*\(([^,]*)((,[^,)]*)*)\)/', $arg, $m)) {
+
+        preg_match_all('/,([^,]*)/', $m[3], $r, PREG_PATTERN_ORDER);
+        $res = '';
+        $n = 0;
+        $index = $m[2];
+        foreach ($r[1] as $v) {
+            $n++;
+            $res .= "\nwhen $index=$v then $n";
+        }
+        $arg = $m[1] . "case $res else 0 end "
+            . substr($arg, strlen($m[0]));
+    }
+
+    return $arg;
 }
 
 // https://code.spip.net/@calculer_pg_where
 function calculer_pg_where($v) {
-	if (!is_array($v)) {
-		return spip_pg_frommysql($v);
-	}
-
-	$op = str_replace('REGEXP', '~', array_shift($v));
-	if (!($n = count($v))) {
-		return $op;
-	} else {
-		$arg = calculer_pg_where(array_shift($v));
-		if ($n == 1) {
-			return "$op($arg)";
-		} else {
-			$arg2 = calculer_pg_where(array_shift($v));
-			if ($n == 2) {
-				return "($arg $op $arg2)";
-			} else {
-				return "($arg $op ($arg2) : $v[0])";
-			}
-		}
-	}
+    if (!is_array($v)) {
+        return spip_pg_frommysql($v);
+    }
+
+    $op = str_replace('REGEXP', '~', array_shift($v));
+    if (!($n = count($v))) {
+        return $op;
+    } else {
+        $arg = calculer_pg_where(array_shift($v));
+        if ($n == 1) {
+            return "$op($arg)";
+        } else {
+            $arg2 = calculer_pg_where(array_shift($v));
+            if ($n == 2) {
+                return "($arg $op $arg2)";
+            } else {
+                return "($arg $op ($arg2) : $v[0])";
+            }
+        }
+    }
 }
 
 
 // https://code.spip.net/@calculer_pg_expression
 function calculer_pg_expression($expression, $v, $join = 'AND') {
-	if (empty($v)) {
-		return '';
-	}
+    if (empty($v)) {
+        return '';
+    }
 
-	$exp = "\n$expression ";
+    $exp = "\n$expression ";
 
-	if (!is_array($v)) {
-		$v = array($v);
-	}
+    if (!is_array($v)) {
+        $v = array($v);
+    }
 
-	if (strtoupper($join) === 'AND') {
-		return $exp . join("\n\t$join ", array_map('calculer_pg_where', $v));
-	} else {
-		return $exp . join($join, $v);
-	}
+    if (strtoupper($join) === 'AND') {
+        return $exp . join("\n\t$join ", array_map('calculer_pg_where', $v));
+    } else {
+        return $exp . join($join, $v);
+    }
 }
 
 // https://code.spip.net/@spip_pg_select_as
 function spip_pg_select_as($args) {
-	$argsas = "";
-	foreach ($args as $k => $v) {
-		if (substr($k, -1) == '@') {
-			// c'est une jointure qui se refere au from precedent
-			// pas de virgule
-			$argsas .= '  ' . $v;
-		} else {
-			$as = '';
-			//  spip_log("$k : $v", _LOG_DEBUG);
-			if (!is_numeric($k)) {
-				if (preg_match('/\.(.*)$/', $k, $r)) {
-					$v = $k;
-				} elseif ($v != $k) {
-					$p = strpos($v, " ");
-					if ($p) {
-						$v = substr($v, 0, $p) . " AS $k" . substr($v, $p);
-					} else {
-						$as = " AS $k";
-					}
-				}
-			}
-			// spip_log("subs $k : $v avec $as", _LOG_DEBUG);
-			// if (strpos($v, 'JOIN') === false)  $argsas .= ', ';
-			$argsas .= ', ' . $v . $as;
-		}
-	}
-
-	return substr($argsas, 2);
+    $argsas = "";
+    foreach ($args as $k => $v) {
+        if (substr($k, -1) == '@') {
+            // c'est une jointure qui se refere au from precedent
+            // pas de virgule
+            $argsas .= '  ' . $v;
+        } else {
+            $as = '';
+            //  spip_log("$k : $v", _LOG_DEBUG);
+            if (!is_numeric($k)) {
+                if (preg_match('/\.(.*)$/', $k, $r)) {
+                    $v = $k;
+                } elseif ($v != $k) {
+                    $p = strpos($v, " ");
+                    if ($p) {
+                        $v = substr($v, 0, $p) . " AS $k" . substr($v, $p);
+                    } else {
+                        $as = " AS $k";
+                    }
+                }
+            }
+            // spip_log("subs $k : $v avec $as", _LOG_DEBUG);
+            // if (strpos($v, 'JOIN') === false)  $argsas .= ', ';
+            $argsas .= ', ' . $v . $as;
+        }
+    }
+
+    return substr($argsas, 2);
 }
 
 // https://code.spip.net/@spip_pg_fetch
 function spip_pg_fetch($res, $t = '', $serveur = '', $requeter = true) {
 
-	if ($res) {
-		$res = pg_fetch_array($res, null, PGSQL_ASSOC);
-	}
+    if ($res) {
+        $res = pg_fetch_array($res, null, PGSQL_ASSOC);
+    }
 
-	return $res;
+    return $res;
 }
 
 function spip_pg_seek($r, $row_number, $serveur = '', $requeter = true) {
-	if ($r) {
-		return pg_result_seek($r, $row_number);
-	}
+    if ($r) {
+        return pg_result_seek($r, $row_number);
+    }
 }
 
 
 // https://code.spip.net/@spip_pg_countsel
 function spip_pg_countsel(
-	$from = array(),
-	$where = array(),
-	$groupby = array(),
-	$having = array(),
-	$serveur = '',
-	$requeter = true
+    $from = array(),
+    $where = array(),
+    $groupby = array(),
+    $having = array(),
+    $serveur = '',
+    $requeter = true
 ) {
-	$c = !$groupby ? '*' : ('DISTINCT ' . (is_string($groupby) ? $groupby : join(',', $groupby)));
-	$r = spip_pg_select("COUNT($c)", $from, $where, '', '', '', $having, $serveur, $requeter);
-	if (!$requeter) {
-		return $r;
-	}
-	if (!is_resource($r)) {
-		return 0;
-	}
-	list($c) = pg_fetch_array($r, null, PGSQL_NUM);
-
-	return $c;
+    $c = !$groupby ? '*' : ('DISTINCT ' . (is_string($groupby) ? $groupby : join(',', $groupby)));
+    $r = spip_pg_select("COUNT($c)", $from, $where, '', '', '', $having, $serveur, $requeter);
+    if (!$requeter) {
+        return $r;
+    }
+    if (!is_resource($r)) {
+        return 0;
+    }
+    list($c) = pg_fetch_array($r, null, PGSQL_NUM);
+
+    return $c;
 }
 
 // https://code.spip.net/@spip_pg_count
 function spip_pg_count($res, $serveur = '', $requeter = true) {
-	return !$res ? 0 : pg_numrows($res);
+    return !$res ? 0 : pg_numrows($res);
 }
 
 // https://code.spip.net/@spip_pg_free
 function spip_pg_free($res, $serveur = '', $requeter = true) {
-	// rien a faire en postgres
+    // rien a faire en postgres
 }
 
 // https://code.spip.net/@spip_pg_delete
 function spip_pg_delete($table, $where = '', $serveur = '', $requeter = true) {
 
-	$connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
-	$table = prefixer_table_spip($table, $connexion['prefixe']);
+    $connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
+    $table = prefixer_table_spip($table, $connexion['prefixe']);
 
-	$query = calculer_pg_expression('DELETE FROM', $table, ',')
-		. calculer_pg_expression('WHERE', $where, 'AND');
+    $query = calculer_pg_expression('DELETE FROM', $table, ',')
+        . calculer_pg_expression('WHERE', $where, 'AND');
 
-	// renvoyer la requete inerte si demandee
-	if (!$requeter) {
-		return $query;
-	}
+    // renvoyer la requete inerte si demandee
+    if (!$requeter) {
+        return $query;
+    }
 
-	$res = spip_pg_trace_query($query, $serveur);
-	if ($res) {
-		return pg_affected_rows($res);
-	} else {
-		return false;
-	}
+    $res = spip_pg_trace_query($query, $serveur);
+    if ($res) {
+        return pg_affected_rows($res);
+    } else {
+        return false;
+    }
 }
 
 // https://code.spip.net/@spip_pg_insert
 function spip_pg_insert($table, $champs, $valeurs, $desc = array(), $serveur = '', $requeter = true) {
-	$connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
-	$prefixe = $connexion['prefixe'];
-	$link = $connexion['link'];
-
-	if (!$desc) {
-		$desc = description_table($table, $serveur);
-	}
-	$seq = spip_pg_sequence($table, true);
-	// si pas de cle primaire dans l'insertion, renvoyer curval
-	if (!preg_match(",\b$seq\b,", $champs)) {
-		$seq = spip_pg_sequence($table);
-		$seq = prefixer_table_spip($seq, $prefixe);
-		$seq = "currval('$seq')";
-	}
-
-	$table = prefixer_table_spip($table, $prefixe);
-	$ret = !$seq ? '' : (" RETURNING $seq");
-	$ins = (strlen($champs) < 3)
-		? " DEFAULT VALUES"
-		: "$champs VALUES $valeurs";
-	$q = "INSERT INTO $table $ins $ret";
-	if (!$requeter) {
-		return $q;
-	}
-	$connexion['last'] = $q;
-	$r = spip_pg_query_simple($link, $q);
+    $connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
+    $prefixe = $connexion['prefixe'];
+    $link = $connexion['link'];
+
+    if (!$desc) {
+        $desc = description_table($table, $serveur);
+    }
+    $seq = spip_pg_sequence($table, true);
+    // si pas de cle primaire dans l'insertion, renvoyer curval
+    if (!preg_match(",\b$seq\b,", $champs)) {
+        $seq = spip_pg_sequence($table);
+        $seq = prefixer_table_spip($seq, $prefixe);
+        $seq = "currval('$seq')";
+    }
+
+    $table = prefixer_table_spip($table, $prefixe);
+    $ret = !$seq ? '' : (" RETURNING $seq");
+    $ins = (strlen($champs) < 3)
+        ? " DEFAULT VALUES"
+        : "$champs VALUES $valeurs";
+    $q = "INSERT INTO $table $ins $ret";
+    if (!$requeter) {
+        return $q;
+    }
+    $connexion['last'] = $q;
+    $r = spip_pg_query_simple($link, $q);
 #	spip_log($q,'pg.'._LOG_DEBUG);
-	if ($r) {
-		if (!$ret) {
-			return 0;
-		}
-		if ($r2 = pg_fetch_array($r, null, PGSQL_NUM)) {
-			return $r2[0];
-		}
-	}
-
-	return false;
+    if ($r) {
+        if (!$ret) {
+            return 0;
+        }
+        if ($r2 = pg_fetch_array($r, null, PGSQL_NUM)) {
+            return $r2[0];
+        }
+    }
+
+    return false;
 }
 
 // https://code.spip.net/@spip_pg_insertq
 function spip_pg_insertq($table, $couples = array(), $desc = array(), $serveur = '', $requeter = true) {
 
-	if (!$desc) {
-		$desc = description_table($table, $serveur);
-	}
-	if (!$desc) {
-		die("$table insertion sans description");
-	}
-	$fields = $desc['field'];
+    if (!$desc) {
+        $desc = description_table($table, $serveur);
+    }
+    if (!$desc) {
+        die("$table insertion sans description");
+    }
+    $fields = $desc['field'];
 
-	foreach ($couples as $champ => $val) {
-		$couples[$champ] = spip_pg_cite($val, $fields[$champ]);
-	}
+    foreach ($couples as $champ => $val) {
+        $couples[$champ] = spip_pg_cite($val, $fields[$champ]);
+    }
 
-	// recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
-	$couples = spip_pg_ajouter_champs_timestamp($table, $couples, $desc, $serveur);
+    // recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
+    $couples = spip_pg_ajouter_champs_timestamp($table, $couples, $desc, $serveur);
 
-	return spip_pg_insert($table, "(" . join(',', array_keys($couples)) . ")", "(" . join(',', $couples) . ")", $desc,
-		$serveur, $requeter);
+    return spip_pg_insert($table, "(" . join(',', array_keys($couples)) . ")", "(" . join(',', $couples) . ")", $desc,
+        $serveur, $requeter);
 }
 
 
 // https://code.spip.net/@spip_pg_insertq_multi
 function spip_pg_insertq_multi($table, $tab_couples = array(), $desc = array(), $serveur = '', $requeter = true) {
 
-	if (!$desc) {
-		$desc = description_table($table, $serveur);
-	}
-	if (!$desc) {
-		die("$table insertion sans description");
-	}
-	$fields = isset($desc['field']) ? $desc['field'] : array();
-
-	// recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
-	// une premiere fois pour ajouter maj dans les cles
-	$c = isset($tab_couples[0]) ? $tab_couples[0] : array();
-	$les_cles = spip_pg_ajouter_champs_timestamp($table, $c, $desc, $serveur);
-
-	$cles = "(" . join(',', array_keys($les_cles)) . ')';
-	$valeurs = array();
-	foreach ($tab_couples as $couples) {
-		foreach ($couples as $champ => $val) {
-			$couples[$champ] = spip_pg_cite($val, $fields[$champ]);
-		}
-		// recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
-		$couples = spip_pg_ajouter_champs_timestamp($table, $couples, $desc, $serveur);
-
-		$valeurs[] = '(' . join(',', $couples) . ')';
-	}
-	$valeurs = implode(', ', $valeurs);
-
-	return spip_pg_insert($table, $cles, $valeurs, $desc, $serveur, $requeter);
+    if (!$desc) {
+        $desc = description_table($table, $serveur);
+    }
+    if (!$desc) {
+        die("$table insertion sans description");
+    }
+    $fields = isset($desc['field']) ? $desc['field'] : array();
+
+    // recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
+    // une premiere fois pour ajouter maj dans les cles
+    $c = isset($tab_couples[0]) ? $tab_couples[0] : array();
+    $les_cles = spip_pg_ajouter_champs_timestamp($table, $c, $desc, $serveur);
+
+    $cles = "(" . join(',', array_keys($les_cles)) . ')';
+    $valeurs = array();
+    foreach ($tab_couples as $couples) {
+        foreach ($couples as $champ => $val) {
+            $couples[$champ] = spip_pg_cite($val, $fields[$champ]);
+        }
+        // recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
+        $couples = spip_pg_ajouter_champs_timestamp($table, $couples, $desc, $serveur);
+
+        $valeurs[] = '(' . join(',', $couples) . ')';
+    }
+    $valeurs = implode(', ', $valeurs);
+
+    return spip_pg_insert($table, $cles, $valeurs, $desc, $serveur, $requeter);
 }
 
 
 // https://code.spip.net/@spip_pg_update
 function spip_pg_update($table, $couples, $where = '', $desc = '', $serveur = '', $requeter = true) {
 
-	if (!$couples) {
-		return;
-	}
-	$connexion = $GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
-	$table = prefixer_table_spip($table, $connexion['prefixe']);
+    if (!$couples) {
+        return;
+    }
+    $connexion = $GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
+    $table = prefixer_table_spip($table, $connexion['prefixe']);
 
-	// recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
-	$couples = spip_pg_ajouter_champs_timestamp($table, $couples, $desc, $serveur);
+    // recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
+    $couples = spip_pg_ajouter_champs_timestamp($table, $couples, $desc, $serveur);
 
-	$set = array();
-	foreach ($couples as $champ => $val) {
-		$set[] = $champ . '=' . $val;
-	}
+    $set = array();
+    foreach ($couples as $champ => $val) {
+        $set[] = $champ . '=' . $val;
+    }
 
-	$query = calculer_pg_expression('UPDATE', $table, ',')
-		. calculer_pg_expression('SET', $set, ',')
-		. calculer_pg_expression('WHERE', $where, 'AND');
+    $query = calculer_pg_expression('UPDATE', $table, ',')
+        . calculer_pg_expression('SET', $set, ',')
+        . calculer_pg_expression('WHERE', $where, 'AND');
 
-	// renvoyer la requete inerte si demandee
-	if (!$requeter) {
-		return $query;
-	}
+    // renvoyer la requete inerte si demandee
+    if (!$requeter) {
+        return $query;
+    }
 
-	return spip_pg_trace_query($query, $serveur);
+    return spip_pg_trace_query($query, $serveur);
 }
 
 // idem, mais les valeurs sont des constantes a mettre entre apostrophes
 // sauf les expressions de date lorsqu'il s'agit de fonctions SQL (NOW etc)
 // https://code.spip.net/@spip_pg_updateq
 function spip_pg_updateq($table, $couples, $where = '', $desc = array(), $serveur = '', $requeter = true) {
-	if (!$couples) {
-		return;
-	}
-	if (!$desc) {
-		$desc = description_table($table, $serveur);
-	}
-	$fields = $desc['field'];
-	foreach ($couples as $k => $val) {
-		$couples[$k] = spip_pg_cite($val, $fields[$k]);
-	}
-
-	return spip_pg_update($table, $couples, $where, $desc, $serveur, $requeter);
+    if (!$couples) {
+        return;
+    }
+    if (!$desc) {
+        $desc = description_table($table, $serveur);
+    }
+    $fields = $desc['field'];
+    foreach ($couples as $k => $val) {
+        $couples[$k] = spip_pg_cite($val, $fields[$k]);
+    }
+
+    return spip_pg_update($table, $couples, $where, $desc, $serveur, $requeter);
 }
 
 
 // https://code.spip.net/@spip_pg_replace
 function spip_pg_replace($table, $values, $desc, $serveur = '', $requeter = true) {
-	if (!$values) {
-		spip_log("replace vide $table", 'pg.' . _LOG_AVERTISSEMENT);
-
-		return 0;
-	}
-	$connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
-	$prefixe = $connexion['prefixe'];
-	$link = $connexion['link'];
-
-	if (!$desc) {
-		$desc = description_table($table, $serveur);
-	}
-	if (!$desc) {
-		die("$table insertion sans description");
-	}
-	$prim = $desc['key']['PRIMARY KEY'];
-	$ids = preg_split('/,\s*/', $prim);
-	$noprims = $prims = array();
-	foreach ($values as $k => $v) {
-		$values[$k] = $v = spip_pg_cite($v, $desc['field'][$k]);
-
-		if (!in_array($k, $ids)) {
-			$noprims[$k] = "$k=$v";
-		} else {
-			$prims[$k] = "$k=$v";
-		}
-	}
-
-	// recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
-	$values = spip_pg_ajouter_champs_timestamp($table, $values, $desc, $serveur);
-
-	$where = join(' AND ', $prims);
-	if (!$where) {
-		return spip_pg_insert($table, "(" . join(',', array_keys($values)) . ")", "(" . join(',', $values) . ")", $desc,
-			$serveur);
-	}
-	$couples = join(',', $noprims);
-
-	$seq = spip_pg_sequence($table);
-	$table = prefixer_table_spip($table, $prefixe);
-	$seq = prefixer_table_spip($seq, $prefixe);
-
-	$connexion['last'] = $q = "UPDATE $table SET $couples WHERE $where";
-	if ($couples) {
-		$couples = spip_pg_query_simple($link, $q);
+    if (!$values) {
+        spip_log("replace vide $table", 'pg.' . _LOG_AVERTISSEMENT);
+
+        return 0;
+    }
+    $connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
+    $prefixe = $connexion['prefixe'];
+    $link = $connexion['link'];
+
+    if (!$desc) {
+        $desc = description_table($table, $serveur);
+    }
+    if (!$desc) {
+        die("$table insertion sans description");
+    }
+    $prim = $desc['key']['PRIMARY KEY'];
+    $ids = preg_split('/,\s*/', $prim);
+    $noprims = $prims = array();
+    foreach ($values as $k => $v) {
+        $values[$k] = $v = spip_pg_cite($v, $desc['field'][$k]);
+
+        if (!in_array($k, $ids)) {
+            $noprims[$k] = "$k=$v";
+        } else {
+            $prims[$k] = "$k=$v";
+        }
+    }
+
+    // recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
+    $values = spip_pg_ajouter_champs_timestamp($table, $values, $desc, $serveur);
+
+    $where = join(' AND ', $prims);
+    if (!$where) {
+        return spip_pg_insert($table, "(" . join(',', array_keys($values)) . ")", "(" . join(',', $values) . ")", $desc,
+            $serveur);
+    }
+    $couples = join(',', $noprims);
+
+    $seq = spip_pg_sequence($table);
+    $table = prefixer_table_spip($table, $prefixe);
+    $seq = prefixer_table_spip($seq, $prefixe);
+
+    $connexion['last'] = $q = "UPDATE $table SET $couples WHERE $where";
+    if ($couples) {
+        $couples = spip_pg_query_simple($link, $q);
 #	  spip_log($q,'pg.'._LOG_DEBUG);
-		if (!$couples) {
-			return false;
-		}
-		$couples = pg_affected_rows($couples);
-	}
-	if (!$couples) {
-		$ret = !$seq ? '' :
-			(" RETURNING nextval('$seq') < $prim");
-		$connexion['last'] = $q = "INSERT INTO $table (" . join(',', array_keys($values)) . ') VALUES (' . join(',',
-				$values) . ")$ret";
-		$couples = spip_pg_query_simple($link, $q);
-		if (!$couples) {
-			return false;
-		} elseif ($ret) {
-			$r = pg_fetch_array($couples, null, PGSQL_NUM);
-			if ($r[0]) {
-				$connexion['last'] = $q = "SELECT setval('$seq', $prim) from $table";
-				// Le code de SPIP met parfois la sequence a 0 (dans l'import)
-				// MySQL n'en dit rien, on fait pareil pour PG
-				$r = @pg_query($link, $q);
-			}
-		}
-	}
-
-	return $couples;
+        if (!$couples) {
+            return false;
+        }
+        $couples = pg_affected_rows($couples);
+    }
+    if (!$couples) {
+        $ret = !$seq ? '' :
+            (" RETURNING nextval('$seq') < $prim");
+        $connexion['last'] = $q = "INSERT INTO $table (" . join(',', array_keys($values)) . ') VALUES (' . join(',',
+                $values) . ")$ret";
+        $couples = spip_pg_query_simple($link, $q);
+        if (!$couples) {
+            return false;
+        } elseif ($ret) {
+            $r = pg_fetch_array($couples, null, PGSQL_NUM);
+            if ($r[0]) {
+                $connexion['last'] = $q = "SELECT setval('$seq', $prim) from $table";
+                // Le code de SPIP met parfois la sequence a 0 (dans l'import)
+                // MySQL n'en dit rien, on fait pareil pour PG
+                $r = @pg_query($link, $q);
+            }
+        }
+    }
+
+    return $couples;
 }
 
 
 // https://code.spip.net/@spip_pg_replace_multi
 function spip_pg_replace_multi($table, $tab_couples, $desc = array(), $serveur = '', $requeter = true) {
-	// boucler pour traiter chaque requete independemment
-	foreach ($tab_couples as $couples) {
-		$retour = spip_pg_replace($table, $couples, $desc, $serveur, $requeter);
-	}
+    // boucler pour traiter chaque requete independemment
+    foreach ($tab_couples as $couples) {
+        $retour = spip_pg_replace($table, $couples, $desc, $serveur, $requeter);
+    }
 
-	// renvoie le dernier id
-	return $retour;
+    // renvoie le dernier id
+    return $retour;
 }
 
 
@@ -1151,19 +1151,19 @@ 
 // https://code.spip.net/@spip_pg_sequence
 function spip_pg_sequence($table, $raw = false) {
 
-	include_spip('base/serial');
-	if (!isset($GLOBALS['tables_principales'][$table])) {
-		return false;
-	}
-	$desc = $GLOBALS['tables_principales'][$table];
-	$prim = @$desc['key']['PRIMARY KEY'];
-	if (!preg_match('/^\w+$/', $prim)
-		or strpos($desc['field'][$prim], 'int') === false
-	) {
-		return '';
-	} else {
-		return $raw ? $prim : $table . '_' . $prim . "_seq";
-	}
+    include_spip('base/serial');
+    if (!isset($GLOBALS['tables_principales'][$table])) {
+        return false;
+    }
+    $desc = $GLOBALS['tables_principales'][$table];
+    $prim = @$desc['key']['PRIMARY KEY'];
+    if (!preg_match('/^\w+$/', $prim)
+        or strpos($desc['field'][$prim], 'int') === false
+    ) {
+        return '';
+    } else {
+        return $raw ? $prim : $table . '_' . $prim . "_seq";
+    }
 }
 
 // Explicite les conversions de Mysql d'une valeur $v de type $t
@@ -1171,65 +1171,65 @@ 
 
 // https://code.spip.net/@spip_pg_cite
 function spip_pg_cite($v, $t) {
-	if (is_null($v)) {
-		return 'NULL';
-	} // null php se traduit en NULL SQL
-
-	if (sql_test_date($t)) {
-		if ($v and (strpos("0123456789", $v[0]) === false)) {
-			return spip_pg_frommysql($v);
-		} else {
-			if (strncmp($v, '0000', 4) == 0) {
-				$v = "0001" . substr($v, 4);
-			}
-			if (strpos($v, "-00-00") === 4) {
-				$v = substr($v, 0, 4) . "-01-01" . substr($v, 10);
-			}
-
-			return "timestamp '$v'";
-		}
-	} elseif (!sql_test_int($t)) {
-		return ("'" . pg_escape_string($v) . "'");
-	} elseif (is_numeric($v) or (strpos($v, 'CAST(') === 0)) {
-		return $v;
-	} elseif ($v[0] == '0' and $v[1] !== 'x' and ctype_xdigit(substr($v, 1))) {
-		return substr($v, 1);
-	} else {
-		spip_log("Warning: '$v'  n'est pas de type $t", 'pg.' . _LOG_AVERTISSEMENT);
-
-		return intval($v);
-	}
+    if (is_null($v)) {
+        return 'NULL';
+    } // null php se traduit en NULL SQL
+
+    if (sql_test_date($t)) {
+        if ($v and (strpos("0123456789", $v[0]) === false)) {
+            return spip_pg_frommysql($v);
+        } else {
+            if (strncmp($v, '0000', 4) == 0) {
+                $v = "0001" . substr($v, 4);
+            }
+            if (strpos($v, "-00-00") === 4) {
+                $v = substr($v, 0, 4) . "-01-01" . substr($v, 10);
+            }
+
+            return "timestamp '$v'";
+        }
+    } elseif (!sql_test_int($t)) {
+        return ("'" . pg_escape_string($v) . "'");
+    } elseif (is_numeric($v) or (strpos($v, 'CAST(') === 0)) {
+        return $v;
+    } elseif ($v[0] == '0' and $v[1] !== 'x' and ctype_xdigit(substr($v, 1))) {
+        return substr($v, 1);
+    } else {
+        spip_log("Warning: '$v'  n'est pas de type $t", 'pg.' . _LOG_AVERTISSEMENT);
+
+        return intval($v);
+    }
 }
 
 // https://code.spip.net/@spip_pg_hex
 function spip_pg_hex($v) {
-	return "CAST(x'" . $v . "' as bigint)";
+    return "CAST(x'" . $v . "' as bigint)";
 }
 
 function spip_pg_quote($v, $type = '') {
-	if (!is_array($v)) {
-		return spip_pg_cite($v, $type);
-	}
-	// si c'est un tableau, le parcourir en propageant le type
-	foreach ($v as $k => $r) {
-		$v[$k] = spip_pg_quote($r, $type);
-	}
-
-	return join(",", $v);
+    if (!is_array($v)) {
+        return spip_pg_cite($v, $type);
+    }
+    // si c'est un tableau, le parcourir en propageant le type
+    foreach ($v as $k => $r) {
+        $v[$k] = spip_pg_quote($r, $type);
+    }
+
+    return join(",", $v);
 }
 
 function spip_pg_date_proche($champ, $interval, $unite) {
-	return '('
-	. $champ
-	. (($interval <= 0) ? '>' : '<')
-	. (($interval <= 0) ? 'DATE_SUB' : 'DATE_ADD')
-	. '('
-	. sql_quote(date('Y-m-d H:i:s'))
-	. ', INTERVAL '
-	. (($interval > 0) ? $interval : (0 - $interval))
-	. ' '
-	. $unite
-	. '))';
+    return '('
+    . $champ
+    . (($interval <= 0) ? '>' : '<')
+    . (($interval <= 0) ? 'DATE_SUB' : 'DATE_ADD')
+    . '('
+    . sql_quote(date('Y-m-d H:i:s'))
+    . ', INTERVAL '
+    . (($interval > 0) ? $interval : (0 - $interval))
+    . ' '
+    . $unite
+    . '))';
 }
 
 // https://code.spip.net/@spip_pg_in
@@ -1237,69 +1237,69 @@ 
 //
 // IN (...) souvent limite a 255  elements, d'ou cette fonction assistante
 //
-	// s'il n'y a pas de valeur, eviter de produire un IN vide: PG rale.
-	if (!$valeurs) {
-		return $not ? '0=0' : '0=1';
-	}
-	if (strpos($valeurs, "CAST(x'") !== false) {
-		return "($val=" . join("OR $val=", explode(',', $valeurs)) . ')';
-	}
-	$n = $i = 0;
-	$in_sql = "";
-	while ($n = strpos($valeurs, ',', $n + 1)) {
-		if ((++$i) >= 255) {
-			$in_sql .= "($val $not IN (" .
-				substr($valeurs, 0, $n) .
-				"))\n" .
-				($not ? "AND\t" : "OR\t");
-			$valeurs = substr($valeurs, $n + 1);
-			$i = $n = 0;
-		}
-	}
-	$in_sql .= "($val $not IN ($valeurs))";
-
-	return "($in_sql)";
+    // s'il n'y a pas de valeur, eviter de produire un IN vide: PG rale.
+    if (!$valeurs) {
+        return $not ? '0=0' : '0=1';
+    }
+    if (strpos($valeurs, "CAST(x'") !== false) {
+        return "($val=" . join("OR $val=", explode(',', $valeurs)) . ')';
+    }
+    $n = $i = 0;
+    $in_sql = "";
+    while ($n = strpos($valeurs, ',', $n + 1)) {
+        if ((++$i) >= 255) {
+            $in_sql .= "($val $not IN (" .
+                substr($valeurs, 0, $n) .
+                "))\n" .
+                ($not ? "AND\t" : "OR\t");
+            $valeurs = substr($valeurs, $n + 1);
+            $i = $n = 0;
+        }
+    }
+    $in_sql .= "($val $not IN ($valeurs))";
+
+    return "($in_sql)";
 }
 
 // https://code.spip.net/@spip_pg_error
 function spip_pg_error($query = '', $serveur = '', $requeter = true) {
-	$link = $GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0]['link'];
-	$s = $link ? pg_last_error($link) : pg_last_error();
-	if ($s) {
-		$s = str_replace('ERROR', 'errcode: 1000 ', $s);
-		spip_log("$s - $query", 'pg.' . _LOG_ERREUR);
-	}
-
-	return $s;
+    $link = $GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0]['link'];
+    $s = $link ? pg_last_error($link) : pg_last_error();
+    if ($s) {
+        $s = str_replace('ERROR', 'errcode: 1000 ', $s);
+        spip_log("$s - $query", 'pg.' . _LOG_ERREUR);
+    }
+
+    return $s;
 }
 
 // https://code.spip.net/@spip_pg_errno
 function spip_pg_errno($serveur = '') {
-	// il faudrait avoir la derniere ressource retournee et utiliser
-	// http://fr2.php.net/manual/fr/function.pg-result-error.php
-	return 0;
+    // il faudrait avoir la derniere ressource retournee et utiliser
+    // http://fr2.php.net/manual/fr/function.pg-result-error.php
+    return 0;
 }
 
 // https://code.spip.net/@spip_pg_drop_table
 function spip_pg_drop_table($table, $exist = '', $serveur = '', $requeter = true) {
-	if ($exist) {
-		$exist = " IF EXISTS";
-	}
-	if (spip_pg_query("DROP TABLE$exist $table", $serveur, $requeter)) {
-		return true;
-	} else {
-		return false;
-	}
+    if ($exist) {
+        $exist = " IF EXISTS";
+    }
+    if (spip_pg_query("DROP TABLE$exist $table", $serveur, $requeter)) {
+        return true;
+    } else {
+        return false;
+    }
 }
 
 // supprime une vue 
 // https://code.spip.net/@spip_pg_drop_view
 function spip_pg_drop_view($view, $exist = '', $serveur = '', $requeter = true) {
-	if ($exist) {
-		$exist = " IF EXISTS";
-	}
+    if ($exist) {
+        $exist = " IF EXISTS";
+    }
 
-	return spip_pg_query("DROP VIEW$exist $view", $serveur, $requeter);
+    return spip_pg_query("DROP VIEW$exist $view", $serveur, $requeter);
 }
 
 /**
@@ -1316,41 +1316,41 @@ 
  *     Ressource à utiliser avec sql_fetch()
  **/
 function spip_pg_showbase($match, $serveur = '', $requeter = true) {
-	$connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
-	$link = $connexion['link'];
-	$connexion['last'] = $q = "SELECT tablename FROM pg_tables WHERE tablename ILIKE " . _q($match);
+    $connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
+    $link = $connexion['link'];
+    $connexion['last'] = $q = "SELECT tablename FROM pg_tables WHERE tablename ILIKE " . _q($match);
 
-	return spip_pg_query_simple($link, $q);
+    return spip_pg_query_simple($link, $q);
 }
 
 // https://code.spip.net/@spip_pg_showtable
 function spip_pg_showtable($nom_table, $serveur = '', $requeter = true) {
-	$connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
-	$link = $connexion['link'];
-	$connexion['last'] = $q = "SELECT column_name, column_default, data_type FROM information_schema.columns WHERE table_name ILIKE " . _q($nom_table);
-
-	$res = spip_pg_query_simple($link, $q);
-	if (!$res) {
-		return false;
-	}
-
-	// etrangement, $res peut ne rien contenir, mais arriver ici...
-	// il faut en tenir compte dans le return
-	$fields = array();
-	while ($field = pg_fetch_array($res, null, PGSQL_NUM)) {
-		$fields[$field[0]] = $field[2] . (!$field[1] ? '' : (" DEFAULT " . $field[1]));
-	}
-	$connexion['last'] = $q = "SELECT indexdef FROM pg_indexes WHERE tablename ILIKE " . _q($nom_table);
-	$res = spip_pg_query_simple($link, $q);
-	$keys = array();
-	while ($index = pg_fetch_array($res, null, PGSQL_NUM)) {
-		if (preg_match('/CREATE\s+(UNIQUE\s+)?INDEX\s([^\s]+).*\((.*)\)$/', $index[0], $r)) {
-			$nom = str_replace($nom_table . '_', '', $r[2]);
-			$keys[($r[1] ? "PRIMARY KEY" : ("KEY " . $nom))] = $r[3];
-		}
-	}
-
-	return count($fields) ? array('field' => $fields, 'key' => $keys) : false;
+    $connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
+    $link = $connexion['link'];
+    $connexion['last'] = $q = "SELECT column_name, column_default, data_type FROM information_schema.columns WHERE table_name ILIKE " . _q($nom_table);
+
+    $res = spip_pg_query_simple($link, $q);
+    if (!$res) {
+        return false;
+    }
+
+    // etrangement, $res peut ne rien contenir, mais arriver ici...
+    // il faut en tenir compte dans le return
+    $fields = array();
+    while ($field = pg_fetch_array($res, null, PGSQL_NUM)) {
+        $fields[$field[0]] = $field[2] . (!$field[1] ? '' : (" DEFAULT " . $field[1]));
+    }
+    $connexion['last'] = $q = "SELECT indexdef FROM pg_indexes WHERE tablename ILIKE " . _q($nom_table);
+    $res = spip_pg_query_simple($link, $q);
+    $keys = array();
+    while ($index = pg_fetch_array($res, null, PGSQL_NUM)) {
+        if (preg_match('/CREATE\s+(UNIQUE\s+)?INDEX\s([^\s]+).*\((.*)\)$/', $index[0], $r)) {
+            $nom = str_replace($nom_table . '_', '', $r[2]);
+            $keys[($r[1] ? "PRIMARY KEY" : ("KEY " . $nom))] = $r[3];
+        }
+    }
+
+    return count($fields) ? array('field' => $fields, 'key' => $keys) : false;
 }
 
 // Fonction de creation d'une table SQL nommee $nom
@@ -1362,118 +1362,118 @@ 
 // https://code.spip.net/@spip_pg_create
 function spip_pg_create($nom, $champs, $cles, $autoinc = false, $temporary = false, $serveur = '', $requeter = true) {
 
-	$connexion = $GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
-	$link = $connexion['link'];
-	$nom = prefixer_table_spip($nom, $connexion['prefixe']);
-
-	$query = $prim = $prim_name = $v = $s = $p = '';
-	$keys = array();
-
-	// certains plugins declarent les tables  (permet leur inclusion dans le dump)
-	// sans les renseigner (laisse le compilo recuperer la description)
-	if (!is_array($champs) || !is_array($cles)) {
-		return;
-	}
-
-	foreach ($cles as $k => $v) {
-		if (strpos($k, "KEY ") === 0) {
-			$n = str_replace('`', '', $k);
-			$v = str_replace('`', '"', $v);
-			$i = $nom . preg_replace("/KEY +/", '_', $n);
-			if ($k != $n) {
-				$i = "\"$i\"";
-			}
-			$keys[] = "CREATE INDEX $i ON $nom ($v);";
-		} elseif (strpos($k, "UNIQUE ") === 0) {
-			$k = preg_replace("/^UNIQUE +/", '', $k);
-			$prim .= "$s\n\t\tCONSTRAINT " . str_replace('`', '"', $k) . " UNIQUE ($v)";
-		} else {
-			$prim .= "$s\n\t\t" . str_replace('`', '"', $k) . " ($v)";
-		}
-		if ($k == "PRIMARY KEY") {
-			$prim_name = $v;
-		}
-		$s = ",";
-	}
-	$s = '';
-
-	$character_set = "";
-	if (@$GLOBALS['meta']['charset_sql_base']) {
-		$character_set .= " CHARACTER SET " . $GLOBALS['meta']['charset_sql_base'];
-	}
-	if (@$GLOBALS['meta']['charset_collation_sql_base']) {
-		$character_set .= " COLLATE " . $GLOBALS['meta']['charset_collation_sql_base'];
-	}
-
-	foreach ($champs as $k => $v) {
-		$k = str_replace('`', '"', $k);
-		if (preg_match(',([a-z]*\s*(\(\s*[0-9]*\s*\))?(\s*binary)?),i', $v, $defs)) {
-			if (preg_match(',(char|text),i', $defs[1]) and !preg_match(',binary,i', $defs[1])) {
-				$v = $defs[1] . $character_set . ' ' . substr($v, strlen($defs[1]));
-			}
-		}
-
-		$query .= "$s\n\t\t$k "
-			. (($autoinc && ($prim_name == $k) && preg_match(',\b(big|small|medium|tiny)?int\b,i', $v))
-				? " bigserial"
-				: mysql2pg_type($v)
-			);
-		$s = ",";
-	}
-	$temporary = $temporary ? 'TEMPORARY' : '';
-
-	// En l'absence de "if not exists" en PG, on neutralise les erreurs
-
-	$q = "CREATE $temporary TABLE $nom ($query" . ($prim ? ",$prim" : '') . ")" .
-		($character_set ? " DEFAULT $character_set" : "")
-		. "\n";
-
-	if (!$requeter) {
-		return $q;
-	}
-	$connexion['last'] = $q;
-	$r = @pg_query($link, $q);
-
-	if (!$r) {
-		spip_log("Impossible de creer cette table: $q", 'pg.' . _LOG_ERREUR);
-	} else {
-		foreach ($keys as $index) {
-			pg_query($link, $index);
-		}
-	}
-
-	return $r;
+    $connexion = $GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
+    $link = $connexion['link'];
+    $nom = prefixer_table_spip($nom, $connexion['prefixe']);
+
+    $query = $prim = $prim_name = $v = $s = $p = '';
+    $keys = array();
+
+    // certains plugins declarent les tables  (permet leur inclusion dans le dump)
+    // sans les renseigner (laisse le compilo recuperer la description)
+    if (!is_array($champs) || !is_array($cles)) {
+        return;
+    }
+
+    foreach ($cles as $k => $v) {
+        if (strpos($k, "KEY ") === 0) {
+            $n = str_replace('`', '', $k);
+            $v = str_replace('`', '"', $v);
+            $i = $nom . preg_replace("/KEY +/", '_', $n);
+            if ($k != $n) {
+                $i = "\"$i\"";
+            }
+            $keys[] = "CREATE INDEX $i ON $nom ($v);";
+        } elseif (strpos($k, "UNIQUE ") === 0) {
+            $k = preg_replace("/^UNIQUE +/", '', $k);
+            $prim .= "$s\n\t\tCONSTRAINT " . str_replace('`', '"', $k) . " UNIQUE ($v)";
+        } else {
+            $prim .= "$s\n\t\t" . str_replace('`', '"', $k) . " ($v)";
+        }
+        if ($k == "PRIMARY KEY") {
+            $prim_name = $v;
+        }
+        $s = ",";
+    }
+    $s = '';
+
+    $character_set = "";
+    if (@$GLOBALS['meta']['charset_sql_base']) {
+        $character_set .= " CHARACTER SET " . $GLOBALS['meta']['charset_sql_base'];
+    }
+    if (@$GLOBALS['meta']['charset_collation_sql_base']) {
+        $character_set .= " COLLATE " . $GLOBALS['meta']['charset_collation_sql_base'];
+    }
+
+    foreach ($champs as $k => $v) {
+        $k = str_replace('`', '"', $k);
+        if (preg_match(',([a-z]*\s*(\(\s*[0-9]*\s*\))?(\s*binary)?),i', $v, $defs)) {
+            if (preg_match(',(char|text),i', $defs[1]) and !preg_match(',binary,i', $defs[1])) {
+                $v = $defs[1] . $character_set . ' ' . substr($v, strlen($defs[1]));
+            }
+        }
+
+        $query .= "$s\n\t\t$k "
+            . (($autoinc && ($prim_name == $k) && preg_match(',\b(big|small|medium|tiny)?int\b,i', $v))
+                ? " bigserial"
+                : mysql2pg_type($v)
+            );
+        $s = ",";
+    }
+    $temporary = $temporary ? 'TEMPORARY' : '';
+
+    // En l'absence de "if not exists" en PG, on neutralise les erreurs
+
+    $q = "CREATE $temporary TABLE $nom ($query" . ($prim ? ",$prim" : '') . ")" .
+        ($character_set ? " DEFAULT $character_set" : "")
+        . "\n";
+
+    if (!$requeter) {
+        return $q;
+    }
+    $connexion['last'] = $q;
+    $r = @pg_query($link, $q);
+
+    if (!$r) {
+        spip_log("Impossible de creer cette table: $q", 'pg.' . _LOG_ERREUR);
+    } else {
+        foreach ($keys as $index) {
+            pg_query($link, $index);
+        }
+    }
+
+    return $r;
 }
 
 
 function spip_pg_create_base($nom, $serveur = '', $requeter = true) {
-	return spip_pg_query("CREATE DATABASE $nom", $serveur, $requeter);
+    return spip_pg_query("CREATE DATABASE $nom", $serveur, $requeter);
 }
 
 // Fonction de creation d'une vue SQL nommee $nom
 // https://code.spip.net/@spip_pg_create_view
 function spip_pg_create_view($nom, $query_select, $serveur = '', $requeter = true) {
-	if (!$query_select) {
-		return false;
-	}
-	// vue deja presente
-	if (sql_showtable($nom, false, $serveur)) {
-		if ($requeter) {
-			spip_log("Echec creation d'une vue sql ($nom) car celle-ci existe deja (serveur:$serveur)", 'pg.' . _LOG_ERREUR);
-		}
+    if (!$query_select) {
+        return false;
+    }
+    // vue deja presente
+    if (sql_showtable($nom, false, $serveur)) {
+        if ($requeter) {
+            spip_log("Echec creation d'une vue sql ($nom) car celle-ci existe deja (serveur:$serveur)", 'pg.' . _LOG_ERREUR);
+        }
 
-		return false;
-	}
+        return false;
+    }
 
-	$query = "CREATE VIEW $nom AS " . $query_select;
+    $query = "CREATE VIEW $nom AS " . $query_select;
 
-	return spip_pg_query($query, $serveur, $requeter);
+    return spip_pg_query($query, $serveur, $requeter);
 }
 
 
 // https://code.spip.net/@spip_pg_set_connect_charset
 function spip_pg_set_connect_charset($charset, $serveur = '', $requeter = true) {
-	spip_log("changement de charset sql a ecrire en PG", 'pg.' . _LOG_ERREUR);
+    spip_log("changement de charset sql a ecrire en PG", 'pg.' . _LOG_ERREUR);
 }
 
 
@@ -1487,7 +1487,7 @@ 
  **/
 // https://code.spip.net/@spip_sqlite_optimize
 function spip_pg_optimize($table, $serveur = '', $requeter = true) {
-	return spip_pg_query("VACUUM " . $table, $serveur, $requeter);
+    return spip_pg_query("VACUUM " . $table, $serveur, $requeter);
 }
 
 // Selectionner la sous-chaine dans $objet
@@ -1495,13 +1495,13 @@ 
 
 // https://code.spip.net/@spip_pg_multi
 function spip_pg_multi($objet, $lang) {
-	$r = "regexp_replace("
-		. $objet
-		. ",'<multi>.*[[]"
-		. $lang
-		. "[]]([^[]*).*</multi>', E'\\\\1') AS multi";
+    $r = "regexp_replace("
+        . $objet
+        . ",'<multi>.*[[]"
+        . $lang
+        . "[]]([^[]*).*</multi>', E'\\\\1') AS multi";
 
-	return $r;
+    return $r;
 }
 
 // Palanquee d'idiosyncrasies MySQL dans les creations de table
@@ -1509,31 +1509,31 @@ 
 
 // https://code.spip.net/@mysql2pg_type
 function mysql2pg_type($v) {
-	$remplace = array(
-		'/auto_increment/i' => '', // non reconnu
-		'/bigint/i' => 'bigint',
-		'/mediumint/i' => 'mediumint',
-		'/smallint/i' => 'smallint',
-		"/tinyint/i" => 'int',
-		'/int\s*[(]\s*\d+\s*[)]/i' => 'int',
-		"/longtext/i" => 'text',
-		"/mediumtext/i" => 'text',
-		"/tinytext/i" => 'text',
-		"/longblob/i" => 'text',
-		"/0000-00-00/" => '0001-01-01',
-		"/datetime/i" => 'timestamp',
-		"/unsigned/i" => '',
-		"/double/i" => 'double precision',
-		'/VARCHAR\((\d+)\)\s+BINARY/i' => 'varchar(\1)',
-		"/ENUM *[(][^)]*[)]/i" => "varchar(255)",
-		'/(timestamp .* )ON .*$/is' => '\\1',
-	);
-
-	return preg_replace(array_keys($remplace), array_values($remplace), $v);
+    $remplace = array(
+        '/auto_increment/i' => '', // non reconnu
+        '/bigint/i' => 'bigint',
+        '/mediumint/i' => 'mediumint',
+        '/smallint/i' => 'smallint',
+        "/tinyint/i" => 'int',
+        '/int\s*[(]\s*\d+\s*[)]/i' => 'int',
+        "/longtext/i" => 'text',
+        "/mediumtext/i" => 'text',
+        "/tinytext/i" => 'text',
+        "/longblob/i" => 'text',
+        "/0000-00-00/" => '0001-01-01',
+        "/datetime/i" => 'timestamp',
+        "/unsigned/i" => '',
+        "/double/i" => 'double precision',
+        '/VARCHAR\((\d+)\)\s+BINARY/i' => 'varchar(\1)',
+        "/ENUM *[(][^)]*[)]/i" => "varchar(255)",
+        '/(timestamp .* )ON .*$/is' => '\\1',
+    );
+
+    return preg_replace(array_keys($remplace), array_values($remplace), $v);
 }
 
 // Renvoie false si on n'a pas les fonctions pg (pour l'install)
 // https://code.spip.net/@spip_versions_pg
 function spip_versions_pg() {
-	return function_exists('pg_connect');
+    return function_exists('pg_connect');
 }

ecrire/urls/page.php

Indentation +53 added lines, -53 removed lines

@@ -11,7 +11,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 define('URLS_PAGE_EXEMPLE', 'spip.php?article12');
@@ -30,74 +30,74 @@ 
 // https://code.spip.net/@_generer_url_page
 function _generer_url_page($type, $id, $args = '', $ancre = '') {
 
-	if ($generer_url_externe = charger_fonction("generer_url_$type", 'urls', true)) {
-		$url = $generer_url_externe($id, $args, $ancre);
-		if (null != $url) {
-			return $url;
-		}
-	}
+    if ($generer_url_externe = charger_fonction("generer_url_$type", 'urls', true)) {
+        $url = $generer_url_externe($id, $args, $ancre);
+        if (null != $url) {
+            return $url;
+        }
+    }
 
-	$url = _debut_urls_page . $type . _separateur_urls_page
-		. $id . _terminaison_urls_page;
+    $url = _debut_urls_page . $type . _separateur_urls_page
+        . $id . _terminaison_urls_page;
 
-	if ($args) {
-		$args = strpos($url, '?') ? "&$args" : "?$args";
-	}
+    if ($args) {
+        $args = strpos($url, '?') ? "&$args" : "?$args";
+    }
 
-	return _DIR_RACINE . $url . $args . ($ancre ? "#$ancre" : '');
+    return _DIR_RACINE . $url . $args . ($ancre ? "#$ancre" : '');
 }
 
 // retrouve le fond et les parametres d'une URL abregee
 // le contexte deja existant est fourni dans args sous forme de tableau ou query string
 // https://code.spip.net/@urls_page_dist
 function urls_page_dist($i, &$entite, $args = '', $ancre = '') {
-	if (is_numeric($i)) {
-		return _generer_url_page($entite, $i, $args, $ancre);
-	}
+    if (is_numeric($i)) {
+        return _generer_url_page($entite, $i, $args, $ancre);
+    }
 
-	// traiter les injections du type domaine.org/spip.php/cestnimportequoi/ou/encore/plus/rubrique23
-	if ($GLOBALS['profondeur_url'] > 0 and $entite == 'sommaire') {
-		return array(array(), '404');
-	}
+    // traiter les injections du type domaine.org/spip.php/cestnimportequoi/ou/encore/plus/rubrique23
+    if ($GLOBALS['profondeur_url'] > 0 and $entite == 'sommaire') {
+        return array(array(), '404');
+    }
 
-	// voir s'il faut recuperer le id_* implicite et les &debut_xx;
-	if (is_array($args)) {
-		$contexte = $args;
-	} else {
-		parse_str($args, $contexte);
-	}
-	include_spip('inc/urls');
-	$r = nettoyer_url_page($i, $contexte);
-	if ($r) {
-		array_pop($r); // nettoyer_url_page renvoie un argument de plus inutile ici
-		return $r;
-	}
+    // voir s'il faut recuperer le id_* implicite et les &debut_xx;
+    if (is_array($args)) {
+        $contexte = $args;
+    } else {
+        parse_str($args, $contexte);
+    }
+    include_spip('inc/urls');
+    $r = nettoyer_url_page($i, $contexte);
+    if ($r) {
+        array_pop($r); // nettoyer_url_page renvoie un argument de plus inutile ici
+        return $r;
+    }
 
-	/*
+    /*
 	 * Le bloc qui suit sert a faciliter les transitions depuis
 	 * le mode 'urls-propres' vers les modes 'urls-standard' et 'url-html'
 	 * Il est inutile de le recopier si vous personnalisez vos URLs
 	 * et votre .htaccess
 	 */
-	// Si on est revenu en mode html, mais c'est une ancienne url_propre
-	// on ne redirige pas, on assume le nouveau contexte (si possible)
-	$url = $i;
-	$url_propre = isset($url)
-		? $url
-		: (isset($_SERVER['REDIRECT_url_propre'])
-			? $_SERVER['REDIRECT_url_propre']
-			: (isset($_ENV['url_propre'])
-				? $_ENV['url_propre']
-				: ''
-			));
-	if ($url_propre) {
-		if ($GLOBALS['profondeur_url'] <= 0) {
-			$urls_anciennes = charger_fonction('propres', 'urls', true);
-		} else {
-			$urls_anciennes = charger_fonction('arbo', 'urls', true);
-		}
+    // Si on est revenu en mode html, mais c'est une ancienne url_propre
+    // on ne redirige pas, on assume le nouveau contexte (si possible)
+    $url = $i;
+    $url_propre = isset($url)
+        ? $url
+        : (isset($_SERVER['REDIRECT_url_propre'])
+            ? $_SERVER['REDIRECT_url_propre']
+            : (isset($_ENV['url_propre'])
+                ? $_ENV['url_propre']
+                : ''
+            ));
+    if ($url_propre) {
+        if ($GLOBALS['profondeur_url'] <= 0) {
+            $urls_anciennes = charger_fonction('propres', 'urls', true);
+        } else {
+            $urls_anciennes = charger_fonction('arbo', 'urls', true);
+        }
 
-		return $urls_anciennes ? $urls_anciennes($url_propre, $entite, $contexte) : '';
-	}
-	/* Fin du bloc compatibilite url-propres */
+        return $urls_anciennes ? $urls_anciennes($url_propre, $entite, $contexte) : '';
+    }
+    /* Fin du bloc compatibilite url-propres */
 }

ecrire/action/purger.php

Indentation +47 added lines, -47 removed lines

@@ -16,7 +16,7 @@ 
  * @package SPIP\Core\Cache
  **/
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -39,57 +39,57 @@ 
  *     de l'action sécurisée.
  */
 function action_purger_dist($arg = null) {
-	if (is_null($arg)) {
-		$securiser_action = charger_fonction('securiser_action', 'inc');
-		$arg = $securiser_action();
-	}
+    if (is_null($arg)) {
+        $securiser_action = charger_fonction('securiser_action', 'inc');
+        $arg = $securiser_action();
+    }
 
-	include_spip('inc/invalideur');
+    include_spip('inc/invalideur');
 
-	spip_log("purger $arg");
+    spip_log("purger $arg");
 
-	switch ($arg) {
-		case 'inhibe_cache':
-			// inhiber le cache pendant 24h
-			ecrire_meta('cache_inhib', $_SERVER['REQUEST_TIME'] + 24 * 3600);
-			break;
-		case 'reactive_cache':
-			effacer_meta('cache_inhib');
-			break;
+    switch ($arg) {
+        case 'inhibe_cache':
+            // inhiber le cache pendant 24h
+            ecrire_meta('cache_inhib', $_SERVER['REQUEST_TIME'] + 24 * 3600);
+            break;
+        case 'reactive_cache':
+            effacer_meta('cache_inhib');
+            break;
 
-		case 'cache':
-			supprime_invalideurs();
-			@spip_unlink(_CACHE_RUBRIQUES);
-			@spip_unlink(_CACHE_CHEMIN);
-			@spip_unlink(_DIR_TMP . "plugin_xml_cache.gz");
-			// on ne supprime que _CACHE_PLUGINS_OPT qui declenche la reconstruction des 3
-			// _CACHE_PIPELINES _CACHE_PLUGINS_PATH et _CACHE_PLUGINS_FCT
-			// pour eviter des problemes de concurence
-			// cf https://core.spip.net/issues/2989
-			//@spip_unlink(_CACHE_PIPELINES);
-			//@spip_unlink(_CACHE_PLUGINS_PATH);
-			//@spip_unlink(_CACHE_PLUGINS_FCT);
-			@spip_unlink(_CACHE_PLUGINS_OPT);
-			purger_repertoire(_DIR_CACHE, array('subdir' => true));
-			purger_repertoire(_DIR_AIDE);
-			purger_repertoire(_DIR_VAR . 'cache-css');
-			purger_repertoire(_DIR_VAR . 'cache-js');
-			break;
+        case 'cache':
+            supprime_invalideurs();
+            @spip_unlink(_CACHE_RUBRIQUES);
+            @spip_unlink(_CACHE_CHEMIN);
+            @spip_unlink(_DIR_TMP . "plugin_xml_cache.gz");
+            // on ne supprime que _CACHE_PLUGINS_OPT qui declenche la reconstruction des 3
+            // _CACHE_PIPELINES _CACHE_PLUGINS_PATH et _CACHE_PLUGINS_FCT
+            // pour eviter des problemes de concurence
+            // cf https://core.spip.net/issues/2989
+            //@spip_unlink(_CACHE_PIPELINES);
+            //@spip_unlink(_CACHE_PLUGINS_PATH);
+            //@spip_unlink(_CACHE_PLUGINS_FCT);
+            @spip_unlink(_CACHE_PLUGINS_OPT);
+            purger_repertoire(_DIR_CACHE, array('subdir' => true));
+            purger_repertoire(_DIR_AIDE);
+            purger_repertoire(_DIR_VAR . 'cache-css');
+            purger_repertoire(_DIR_VAR . 'cache-js');
+            break;
 
-		case 'squelettes':
-			purger_repertoire(_DIR_SKELS);
-			break;
+        case 'squelettes':
+            purger_repertoire(_DIR_SKELS);
+            break;
 
-		case 'vignettes':
-			purger_repertoire(_DIR_VAR . 'cache-gd2', array('subdir' => true));
-			purger_repertoire(_DIR_VAR . 'cache-texte', array('subdir' => true));
-			purger_repertoire(_DIR_VAR . 'cache-vignettes', array('subdir' => true));
-			purger_repertoire(_DIR_VAR . 'cache-TeX', array('subdir' => true));
-			supprime_invalideurs();
-			purger_repertoire(_DIR_CACHE, array('subdir' => true));
-			break;
-	}
+        case 'vignettes':
+            purger_repertoire(_DIR_VAR . 'cache-gd2', array('subdir' => true));
+            purger_repertoire(_DIR_VAR . 'cache-texte', array('subdir' => true));
+            purger_repertoire(_DIR_VAR . 'cache-vignettes', array('subdir' => true));
+            purger_repertoire(_DIR_VAR . 'cache-TeX', array('subdir' => true));
+            supprime_invalideurs();
+            purger_repertoire(_DIR_CACHE, array('subdir' => true));
+            break;
+    }
 
-	// le faire savoir aux plugins
-	pipeline('trig_purger', $arg);
+    // le faire savoir aux plugins
+    pipeline('trig_purger', $arg);
 }

ecrire/xml/sax.php

Indentation +246 added lines, -246 removed lines

@@ -11,7 +11,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('inc/charsets');
@@ -24,218 +24,218 @@ 
  * @return string
  */
 function xml_entites_html($texte) {
-	if (!is_string($texte) or !$texte
-		or strpbrk($texte, "&\"'<>") == false
-	) {
-		return $texte;
-	}
-
-	if (!function_exists('spip_htmlspecialchars')) {
-		include_spip("inc/filtres_mini");
-	}
-	$texte = spip_htmlspecialchars($texte, ENT_QUOTES);
-
-	return $texte;
+    if (!is_string($texte) or !$texte
+        or strpbrk($texte, "&\"'<>") == false
+    ) {
+        return $texte;
+    }
+
+    if (!function_exists('spip_htmlspecialchars')) {
+        include_spip("inc/filtres_mini");
+    }
+    $texte = spip_htmlspecialchars($texte, ENT_QUOTES);
+
+    return $texte;
 }
 
 // https://code.spip.net/@xml_debutElement
 function xml_debutElement($phraseur, $name, $attrs) {
-	$depth = $phraseur->depth;
-
-	$t = isset($phraseur->ouvrant[$depth]) ? $phraseur->ouvrant[$depth] : ' ';
-	// espace initial signifie: deja integree au resultat
-	if ($t[0] != ' ') {
-		$phraseur->res .= '<' . $t . '>';
-		$phraseur->ouvrant[$depth] = ' ' . $t;
-	}
-	$t = $phraseur->contenu[$depth];
-	// n'indenter que s'il y a un separateur avant
-	$phraseur->res .= preg_replace("/[\n\t ]+$/", "\n$depth", $t);
-	$phraseur->contenu[$depth] = "";
-	$att = '';
-	$sep = ' ';
-	foreach ($attrs as $k => $v) {
-		$delim = strpos($v, "'") === false ? "'" : '"';
-		$val = xml_entites_html($v);
-		$att .= $sep . $k . "=" . $delim
-			. ($delim !== '"' ? str_replace('&quot;', '"', $val) : $val)
-			. $delim;
-		$sep = "\n $depth";
-	}
-	$phraseur->depth .= '  ';
-	$phraseur->contenu[$phraseur->depth] = "";
-	$phraseur->ouvrant[$phraseur->depth] = $name . $att;
-	$phraseur->reperes[$phraseur->depth] = xml_get_current_line_number($phraseur->sax);
+    $depth = $phraseur->depth;
+
+    $t = isset($phraseur->ouvrant[$depth]) ? $phraseur->ouvrant[$depth] : ' ';
+    // espace initial signifie: deja integree au resultat
+    if ($t[0] != ' ') {
+        $phraseur->res .= '<' . $t . '>';
+        $phraseur->ouvrant[$depth] = ' ' . $t;
+    }
+    $t = $phraseur->contenu[$depth];
+    // n'indenter que s'il y a un separateur avant
+    $phraseur->res .= preg_replace("/[\n\t ]+$/", "\n$depth", $t);
+    $phraseur->contenu[$depth] = "";
+    $att = '';
+    $sep = ' ';
+    foreach ($attrs as $k => $v) {
+        $delim = strpos($v, "'") === false ? "'" : '"';
+        $val = xml_entites_html($v);
+        $att .= $sep . $k . "=" . $delim
+            . ($delim !== '"' ? str_replace('&quot;', '"', $val) : $val)
+            . $delim;
+        $sep = "\n $depth";
+    }
+    $phraseur->depth .= '  ';
+    $phraseur->contenu[$phraseur->depth] = "";
+    $phraseur->ouvrant[$phraseur->depth] = $name . $att;
+    $phraseur->reperes[$phraseur->depth] = xml_get_current_line_number($phraseur->sax);
 }
 
 // https://code.spip.net/@xml_finElement
 function xml_finElement($phraseur, $name, $fusion_bal = false) {
-	$ouv = $phraseur->ouvrant[$phraseur->depth];
-
-	if ($ouv[0] != ' ') {
-		$phraseur->ouvrant[$phraseur->depth] = ' ' . $ouv;
-	} else {
-		$ouv = "";
-	}
-	$t = $phraseur->contenu[$phraseur->depth];
-	$phraseur->depth = substr($phraseur->depth, 2);
-	$t = preg_replace("/[\n\t ]+$/", "\n" . $phraseur->depth, $t);
-
-	// fusion <balise></balise> en <balise />.
-	// ATTENTION,  certains clients http croient que fusion ==> pas d'atttributs
-	// en particulier pour les balises Script et A.
-	// en presence d'attributs ne le faire que si la DTD est dispo et d'accord
-	// (param fusion_bal)
-
-	if ($t || (($ouv != $name) and !$fusion_bal)) {
-		$phraseur->res .= ($ouv ? ('<' . $ouv . '>') : '') . $t . "</" . $name . ">";
-	} else {
-		$phraseur->res .= ($ouv ? ('<' . $ouv . ' />') : ("</" . $name . ">"));
-	}
+    $ouv = $phraseur->ouvrant[$phraseur->depth];
+
+    if ($ouv[0] != ' ') {
+        $phraseur->ouvrant[$phraseur->depth] = ' ' . $ouv;
+    } else {
+        $ouv = "";
+    }
+    $t = $phraseur->contenu[$phraseur->depth];
+    $phraseur->depth = substr($phraseur->depth, 2);
+    $t = preg_replace("/[\n\t ]+$/", "\n" . $phraseur->depth, $t);
+
+    // fusion <balise></balise> en <balise />.
+    // ATTENTION,  certains clients http croient que fusion ==> pas d'atttributs
+    // en particulier pour les balises Script et A.
+    // en presence d'attributs ne le faire que si la DTD est dispo et d'accord
+    // (param fusion_bal)
+
+    if ($t || (($ouv != $name) and !$fusion_bal)) {
+        $phraseur->res .= ($ouv ? ('<' . $ouv . '>') : '') . $t . "</" . $name . ">";
+    } else {
+        $phraseur->res .= ($ouv ? ('<' . $ouv . ' />') : ("</" . $name . ">"));
+    }
 }
 
 // https://code.spip.net/@xml_textElement
 function xml_textElement($phraseur, $data) {
-	$depth = $phraseur->depth;
-	$phraseur->contenu[$depth] .= preg_match('/^script/', $phraseur->ouvrant[$depth])
-		? $data
-		: xml_entites_html($data);
+    $depth = $phraseur->depth;
+    $phraseur->contenu[$depth] .= preg_match('/^script/', $phraseur->ouvrant[$depth])
+        ? $data
+        : xml_entites_html($data);
 }
 
 function xml_piElement($phraseur, $target, $data) {
-	$depth = $phraseur->depth;
-
-	if (strtolower($target) != "php") {
-		$phraseur->contenu[$depth] .= $data;
-	} else {
-		ob_start();
-		eval($data);
-		$data = ob_get_contents();
-		ob_end_clean();
-		$phraseur->contenu[$depth] .= $data;
-	}
+    $depth = $phraseur->depth;
+
+    if (strtolower($target) != "php") {
+        $phraseur->contenu[$depth] .= $data;
+    } else {
+        ob_start();
+        eval($data);
+        $data = ob_get_contents();
+        ob_end_clean();
+        $phraseur->contenu[$depth] .= $data;
+    }
 }
 
 
 // https://code.spip.net/@xml_defautElement
 function xml_defaultElement($phraseur, $data) {
-	$depth = $phraseur->depth;
+    $depth = $phraseur->depth;
 
-	if (!isset($phraseur->contenu[$depth])) {
-		$phraseur->contenu[$depth] = '';
-	}
-	$phraseur->contenu[$depth] .= $data;
+    if (!isset($phraseur->contenu[$depth])) {
+        $phraseur->contenu[$depth] = '';
+    }
+    $phraseur->contenu[$depth] .= $data;
 }
 
 // https://code.spip.net/@xml_parsestring
 function xml_parsestring($phraseur, $data) {
-	$phraseur->contenu[$phraseur->depth] = '';
-
-	if (!xml_parse($phraseur->sax, $data, true)) {
-		coordonnees_erreur($phraseur,
-			xml_error_string(xml_get_error_code($phraseur->sax))
-			. "<br />\n" .
-			(!$phraseur->depth ? '' :
-				('(' .
-					_T('erreur_balise_non_fermee') .
-					" <tt>" .
-					$phraseur->ouvrant[$phraseur->depth] .
-					"</tt> " .
-					_T('ligne') .
-					" " .
-					$phraseur->reperes[$phraseur->depth] .
-					") <br />\n")));
-	}
+    $phraseur->contenu[$phraseur->depth] = '';
+
+    if (!xml_parse($phraseur->sax, $data, true)) {
+        coordonnees_erreur($phraseur,
+            xml_error_string(xml_get_error_code($phraseur->sax))
+            . "<br />\n" .
+            (!$phraseur->depth ? '' :
+                ('(' .
+                    _T('erreur_balise_non_fermee') .
+                    " <tt>" .
+                    $phraseur->ouvrant[$phraseur->depth] .
+                    "</tt> " .
+                    _T('ligne') .
+                    " " .
+                    $phraseur->reperes[$phraseur->depth] .
+                    ") <br />\n")));
+    }
 }
 
 // https://code.spip.net/@coordonnees_erreur
 function coordonnees_erreur($phraseur, $msg) {
-	$entete_length = substr_count($phraseur->entete, "\n");
-	$phraseur->err[] = array(
-		$msg,
-		xml_get_current_line_number($phraseur->sax) + $entete_length,
-		xml_get_current_column_number($phraseur->sax)
-	);
+    $entete_length = substr_count($phraseur->entete, "\n");
+    $phraseur->err[] = array(
+        $msg,
+        xml_get_current_line_number($phraseur->sax) + $entete_length,
+        xml_get_current_column_number($phraseur->sax)
+    );
 }
 
 // https://code.spip.net/@xml_sax_dist
 function xml_sax_dist($page, $apply = false, $phraseur = null, $doctype = '', $charset = null) {
-	if (is_null($charset)) {
-		$charset = $GLOBALS['meta']['charset'];
-	}
-	if ($apply) {
-		ob_start();
-		if (is_array($apply)) {
-			$r = call_user_func_array($page, $apply);
-		} else {
-			$r = $page();
-		}
-		$page = ob_get_contents();
-		ob_end_clean();
-		// fonction sans aucun "echo", ca doit etre le resultat
-		if (!$page) {
-			$page = $r;
-		}
-	}
-
-	if (!$page) {
-		return '';
-	}
-	// charger la DTD et transcoder les entites,
-	// et escamoter le doctype que sax mange en php5 mais pas en  php4
-	if (!$doctype) {
-		if (!$r = analyser_doctype($page)) {
-			$page = _MESSAGE_DOCTYPE . _DOCTYPE_ECRIRE
-				. preg_replace(_REGEXP_DOCTYPE, '', $page);
-			$r = analyser_doctype($page);
-		}
-		list($entete, $avail, $grammaire, $rotlvl) = array_pad($r, 4, null);
-		$page = substr($page, strlen($entete));
-	} else {
-		$avail = 'SYSTEM';
-		$grammaire = $doctype;
-		$rotlvl = basename($grammaire);
-	}
-
-	include_spip('xml/analyser_dtd');
-	$dtc = charger_dtd($grammaire, $avail, $rotlvl);
-	$page = sax_bug($page, $dtc, $charset);
-
-	// compatibilite Tidy espace public
-	if (!$phraseur) {
-		$indenter_xml = charger_fonction('indenter', 'xml');
-
-		return $indenter_xml($page, $apply);
-	}
-
-	$xml_parser = xml_parser_create($charset);
-
-	xml_set_element_handler($xml_parser,
-		array($phraseur, "debutElement"),
-		array($phraseur, "finElement"));
-
-	xml_set_character_data_handler($xml_parser,
-		array($phraseur, "textElement"));
-
-	xml_set_processing_instruction_handler($xml_parser,
-		array($phraseur, 'piElement'));
-
-	xml_set_default_handler($xml_parser,
-		array($phraseur, "defaultElement"));
-
-	xml_parser_set_option($xml_parser, XML_OPTION_CASE_FOLDING, false);
-
-	$phraseur->sax = $xml_parser;
-	if (isset($entete)) {
-		$phraseur->entete = $entete;
-	}
-	$phraseur->page = $page;
-	$phraseur->dtc = $dtc;
-	$phraseur->phraserTout($xml_parser, $page);
-	xml_parser_free($xml_parser);
-	$phraseur->sax = '';
-
-	return $phraseur;
+    if (is_null($charset)) {
+        $charset = $GLOBALS['meta']['charset'];
+    }
+    if ($apply) {
+        ob_start();
+        if (is_array($apply)) {
+            $r = call_user_func_array($page, $apply);
+        } else {
+            $r = $page();
+        }
+        $page = ob_get_contents();
+        ob_end_clean();
+        // fonction sans aucun "echo", ca doit etre le resultat
+        if (!$page) {
+            $page = $r;
+        }
+    }
+
+    if (!$page) {
+        return '';
+    }
+    // charger la DTD et transcoder les entites,
+    // et escamoter le doctype que sax mange en php5 mais pas en  php4
+    if (!$doctype) {
+        if (!$r = analyser_doctype($page)) {
+            $page = _MESSAGE_DOCTYPE . _DOCTYPE_ECRIRE
+                . preg_replace(_REGEXP_DOCTYPE, '', $page);
+            $r = analyser_doctype($page);
+        }
+        list($entete, $avail, $grammaire, $rotlvl) = array_pad($r, 4, null);
+        $page = substr($page, strlen($entete));
+    } else {
+        $avail = 'SYSTEM';
+        $grammaire = $doctype;
+        $rotlvl = basename($grammaire);
+    }
+
+    include_spip('xml/analyser_dtd');
+    $dtc = charger_dtd($grammaire, $avail, $rotlvl);
+    $page = sax_bug($page, $dtc, $charset);
+
+    // compatibilite Tidy espace public
+    if (!$phraseur) {
+        $indenter_xml = charger_fonction('indenter', 'xml');
+
+        return $indenter_xml($page, $apply);
+    }
+
+    $xml_parser = xml_parser_create($charset);
+
+    xml_set_element_handler($xml_parser,
+        array($phraseur, "debutElement"),
+        array($phraseur, "finElement"));
+
+    xml_set_character_data_handler($xml_parser,
+        array($phraseur, "textElement"));
+
+    xml_set_processing_instruction_handler($xml_parser,
+        array($phraseur, 'piElement'));
+
+    xml_set_default_handler($xml_parser,
+        array($phraseur, "defaultElement"));
+
+    xml_parser_set_option($xml_parser, XML_OPTION_CASE_FOLDING, false);
+
+    $phraseur->sax = $xml_parser;
+    if (isset($entete)) {
+        $phraseur->entete = $entete;
+    }
+    $phraseur->page = $page;
+    $phraseur->dtc = $dtc;
+    $phraseur->phraserTout($xml_parser, $page);
+    xml_parser_free($xml_parser);
+    $phraseur->sax = '';
+
+    return $phraseur;
 }
 
 // SAX ne dit pas si une Entite est dans un attribut ou non.
@@ -247,24 +247,24 @@ 
 
 // https://code.spip.net/@sax_bug
 function sax_bug($data, $dtc, $charset = null) {
-	if (is_null($charset)) {
-		$charset = $GLOBALS['meta']['charset'];
-	}
-
-	if ($dtc) {
-		$trans = array();
-
-		foreach ($dtc->entites as $k => $v) {
-			if (!strpos(" amp lt gt quot ", $k)) {
-				$trans["&$k;"] = $v;
-			}
-		}
-		$data = strtr($data, $trans);
-	} else {
-		$data = html2unicode($data, true);
-	}
-
-	return unicode2charset($data, $charset);
+    if (is_null($charset)) {
+        $charset = $GLOBALS['meta']['charset'];
+    }
+
+    if ($dtc) {
+        $trans = array();
+
+        foreach ($dtc->entites as $k => $v) {
+            if (!strpos(" amp lt gt quot ", $k)) {
+                $trans["&$k;"] = $v;
+            }
+        }
+        $data = strtr($data, $trans);
+    } else {
+        $data = html2unicode($data, true);
+    }
+
+    return unicode2charset($data, $charset);
 }
 
 // Retirer < ? xml... ? > et autre PI, ainsi que les commentaires en debut
@@ -275,52 +275,52 @@ 
 // mais un XML Schema que SPIP ne fait pas encore lire.
 // https://code.spip.net/@analyser_doctype
 function analyser_doctype($data) {
-	if (!preg_match(_REGEXP_DOCTYPE, $data, $page)) {
-		if (preg_match(_REGEXP_XML, $data, $page)) {
-			list(, $entete, $topelement) = $page;
-			if ($topelement == 'rss') {
-				return array(
-					$entete,
-					'PUBLIC',
-					_DOCTYPE_RSS,
-					'rss-0.91.dtd'
-				);
-			} else {
-				$dtd = $topelement . '.dtd';
-				$f = find_in_path($dtd);
-				if (file_exists($f)) {
-					return array($entete, 'SYSTEM', $f, $dtd);
-				}
-			}
-		}
-		spip_log("Dtd pas vu pour " . substr($data, 0, 100));
-
-		return array();
-	}
-	list($entete, , $topelement, $avail, $suite) = $page;
-
-	if (!preg_match('/^"([^"]*)"\s*(.*)$/', $suite, $r)) {
-		if (!preg_match("/^'([^']*)'\s*(.*)$/", $suite, $r)) {
-			return array();
-		}
-	}
-	list(, $rotlvl, $suite) = $r;
-
-	if (!$suite) {
-		if ($avail != 'SYSTEM') {
-			return array();
-		}
-		$grammaire = $rotlvl;
-		$rotlvl = '';
-	} else {
-		if (!preg_match('/^"([^"]*)"\s*$/', $suite, $r)) {
-			if (!preg_match("/^'([^']*)'\s*$/", $suite, $r)) {
-				return array();
-			}
-		}
-
-		$grammaire = $r[1];
-	}
-
-	return array($entete, $avail, $grammaire, $rotlvl);
+    if (!preg_match(_REGEXP_DOCTYPE, $data, $page)) {
+        if (preg_match(_REGEXP_XML, $data, $page)) {
+            list(, $entete, $topelement) = $page;
+            if ($topelement == 'rss') {
+                return array(
+                    $entete,
+                    'PUBLIC',
+                    _DOCTYPE_RSS,
+                    'rss-0.91.dtd'
+                );
+            } else {
+                $dtd = $topelement . '.dtd';
+                $f = find_in_path($dtd);
+                if (file_exists($f)) {
+                    return array($entete, 'SYSTEM', $f, $dtd);
+                }
+            }
+        }
+        spip_log("Dtd pas vu pour " . substr($data, 0, 100));
+
+        return array();
+    }
+    list($entete, , $topelement, $avail, $suite) = $page;
+
+    if (!preg_match('/^"([^"]*)"\s*(.*)$/', $suite, $r)) {
+        if (!preg_match("/^'([^']*)'\s*(.*)$/", $suite, $r)) {
+            return array();
+        }
+    }
+    list(, $rotlvl, $suite) = $r;
+
+    if (!$suite) {
+        if ($avail != 'SYSTEM') {
+            return array();
+        }
+        $grammaire = $rotlvl;
+        $rotlvl = '';
+    } else {
+        if (!preg_match('/^"([^"]*)"\s*$/', $suite, $r)) {
+            if (!preg_match("/^'([^']*)'\s*$/", $suite, $r)) {
+                return array();
+            }
+        }
+
+        $grammaire = $r[1];
+    }
+
+    return array($entete, $avail, $grammaire, $rotlvl);
 }

ecrire/xml/indenter.php

Indentation +42 added lines, -42 removed lines

@@ -11,61 +11,61 @@
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 class IndenteurXML {
 
-	// https://code.spip.net/@debutElement
-	public function debutElement($phraseur, $name, $attrs) {
-		xml_debutElement($this, $name, $attrs);
-	}
+    // https://code.spip.net/@debutElement
+    public function debutElement($phraseur, $name, $attrs) {
+        xml_debutElement($this, $name, $attrs);
+    }
 
-	// https://code.spip.net/@finElement
-	public function finElement($phraseur, $name) {
-		xml_finElement($this, $name);
-	}
+    // https://code.spip.net/@finElement
+    public function finElement($phraseur, $name) {
+        xml_finElement($this, $name);
+    }
 
-	// https://code.spip.net/@textElement
-	public function textElement($phraseur, $data) {
-		xml_textElement($this, $data);
-	}
+    // https://code.spip.net/@textElement
+    public function textElement($phraseur, $data) {
+        xml_textElement($this, $data);
+    }
 
-	public function piElement($phraseur, $target, $data) {
-		xml_PiElement($this, $target, $data);
-	}
+    public function piElement($phraseur, $target, $data) {
+        xml_PiElement($this, $target, $data);
+    }
 
-	// https://code.spip.net/@defautElement
-	public function defaultElement($phraseur, $data) {
-		xml_defaultElement($this, $data);
-	}
+    // https://code.spip.net/@defautElement
+    public function defaultElement($phraseur, $data) {
+        xml_defaultElement($this, $data);
+    }
 
-	// https://code.spip.net/@phraserTout
-	public function phraserTout($phraseur, $data) {
-		xml_parsestring($this, $data);
-	}
+    // https://code.spip.net/@phraserTout
+    public function phraserTout($phraseur, $data) {
+        xml_parsestring($this, $data);
+    }
 
-	public $depth = "";
-	public $res = "";
-	public $err = array();
-	public $contenu = array();
-	public $ouvrant = array();
-	public $reperes = array();
-	public $entete = '';
-	public $page = '';
-	public $dtc = null;
-	public $sax = null;
+    public $depth = "";
+    public $res = "";
+    public $err = array();
+    public $contenu = array();
+    public $ouvrant = array();
+    public $reperes = array();
+    public $entete = '';
+    public $page = '';
+    public $dtc = null;
+    public $sax = null;
 }
 
 // https://code.spip.net/@xml_indenter_dist
 function xml_indenter_dist($page, $apply = false) {
-	$sax = charger_fonction('sax', 'xml');
-	$f = new IndenteurXML();
-	$sax($page, $apply, $f);
-	if (!$f->err) {
-		return $f->entete . $f->res;
-	}
-	spip_log("indentation impossible " . count($f->err) . " erreurs de validation");
+    $sax = charger_fonction('sax', 'xml');
+    $f = new IndenteurXML();
+    $sax($page, $apply, $f);
+    if (!$f->err) {
+        return $f->entete . $f->res;
+    }
+    spip_log("indentation impossible " . count($f->err) . " erreurs de validation");
 
-	return $f->entete . $f->page;
+    return $f->entete . $f->page;
 }

ecrire/xml/valider.php

Indentation +331 added lines, -331 removed lines

@@ -11,7 +11,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -23,333 +23,333 @@ 
  **/
 class ValidateurXML {
 
-	// https://code.spip.net/@validerElement
-	public function validerElement($phraseur, $name, $attrs) {
-		if (!($p = isset($this->dtc->elements[$name]))) {
-			if ($p = strpos($name, ':')) {
-				$name = substr($name, $p + 1);
-				$p = isset($this->dtc->elements[$name]);
-			}
-			if (!$p) {
-				coordonnees_erreur($this, " <b>$name</b>&nbsp;: "
-					. _T('zxml_inconnu_balise'));
-
-				return;
-			}
-		}
-		// controler les filles illegitimes, ca suffit 
-		$depth = $this->depth;
-		$ouvrant = $this->ouvrant;
-		#spip_log("trouve $name apres " . $ouvrant[$depth]);
-		if (isset($ouvrant[$depth])) {
-			if (preg_match('/^\s*(\w+)/', $ouvrant[$depth], $r)) {
-				$pere = $r[1];
-				#spip_log("pere $pere");
-				if (isset($this->dtc->elements[$pere])) {
-					$fils = $this->dtc->elements[$pere];
-					#spip_log("rejeton $name fils " . @join(',',$fils));
-					if (!($p = @in_array($name, $fils))) {
-						if ($p = strpos($name, ':')) {
-							$p = substr($name, $p + 1);
-							$p = @in_array($p, $fils);
-						}
-					}
-					if (!$p) {
-						$bons_peres = @join('</b>, <b>', $this->dtc->peres[$name]);
-						coordonnees_erreur($this, " <b>$name</b> "
-							. _T('zxml_non_fils')
-							. ' <b>'
-							. $pere
-							. '</b>'
-							. (!$bons_peres ? ''
-								: ('<p style="font-size: 80%"> ' . _T('zxml_mais_de') . ' <b>' . $bons_peres . '</b></p>')));
-					} elseif ($this->dtc->regles[$pere][0] == '/') {
-						$frat = substr($depth, 2);
-						if (!isset($this->fratrie[$frat])) {
-							$this->fratrie[$frat] = '';
-						}
-						$this->fratrie[$frat] .= "$name ";
-					}
-				}
-			}
-		}
-		// Init de la suite des balises a memoriser si regle difficile
-		if ($this->dtc->regles[$name] and $this->dtc->regles[$name][0] == '/') {
-			$this->fratrie[$depth] = '';
-		}
-		if (isset($this->dtc->attributs[$name])) {
-			foreach ($this->dtc->attributs[$name] as $n => $v) {
-				if (($v[1] == '#REQUIRED') and (!isset($attrs[$n]))) {
-					coordonnees_erreur($this, " <b>$n</b>"
-						. '&nbsp;:&nbsp;'
-						. _T('zxml_obligatoire_attribut')
-						. " <b>$name</b>");
-				}
-			}
-		}
-	}
-
-	// https://code.spip.net/@validerAttribut
-	public function validerAttribut($phraseur, $name, $val, $bal) {
-		// Si la balise est inconnue, eviter d'insister
-		if (!isset($this->dtc->attributs[$bal])) {
-			return;
-		}
-
-		$a = $this->dtc->attributs[$bal];
-		if (!isset($a[$name])) {
-			$bons = join(', ', array_keys($a));
-			if ($bons) {
-				$bons = " title=' " .
-					_T('zxml_connus_attributs') .
-					'&nbsp;: ' .
-					$bons .
-					"'";
-			}
-			$bons .= " style='font-weight: bold'";
-			coordonnees_erreur($this, " <b>$name</b> "
-				. _T('zxml_inconnu_attribut') . ' ' . _T('zxml_de')
-				. " <a$bons>$bal</a> ("
-				. _T('zxml_survoler')
-				. ")");
-		} else {
-			$type = $a[$name][0];
-			if (!preg_match('/^\w+$/', $type)) {
-				$this->valider_motif($phraseur, $name, $val, $bal, $type);
-			} else {
-				if (method_exists($this, $f = 'validerAttribut_' . $type)) {
-					$this->$f($phraseur, $name, $val, $bal);
-				}
-			}
-			#		else spip_log("$type type d'attribut inconnu");
-		}
-	}
-
-	public function validerAttribut_NMTOKEN($phraseur, $name, $val, $bal) {
-		$this->valider_motif($phraseur, $name, $val, $bal, _REGEXP_NMTOKEN);
-	}
-
-	public function validerAttribut_NMTOKENS($phraseur, $name, $val, $bal) {
-		$this->valider_motif($phraseur, $name, $val, $bal, _REGEXP_NMTOKENS);
-	}
-
-	// https://code.spip.net/@validerAttribut_ID
-	public function validerAttribut_ID($phraseur, $name, $val, $bal) {
-		if (isset($this->ids[$val])) {
-			list($l, $c) = $this->ids[$val];
-			coordonnees_erreur($this, " <p><b>$val</b> "
-				. _T('zxml_valeur_attribut')
-				. " <b>$name</b> "
-				. _T('zxml_de')
-				. " <b>$bal</b> "
-				. _T('zxml_vu')
-				. " (L$l,C$c)");
-		} else {
-			$this->valider_motif($phraseur, $name, $val, $bal, _REGEXP_ID);
-			$this->ids[$val] = array(xml_get_current_line_number($phraseur), xml_get_current_column_number($phraseur));
-		}
-	}
-
-	// https://code.spip.net/@validerAttribut_IDREF
-	public function validerAttribut_IDREF($phraseur, $name, $val, $bal) {
-		$this->idrefs[] = array($val, xml_get_current_line_number($phraseur), xml_get_current_column_number($phraseur));
-	}
-
-	// https://code.spip.net/@validerAttribut_IDREFS
-	public function validerAttribut_IDREFS($phraseur, $name, $val, $bal) {
-		$this->idrefss[] = array($val, xml_get_current_line_number($phraseur), xml_get_current_column_number($phraseur));
-	}
-
-	// https://code.spip.net/@valider_motif
-	public function valider_motif($phraseur, $name, $val, $bal, $motif) {
-		if (!preg_match($motif, $val)) {
-			coordonnees_erreur($this, "<b>$val</b> "
-				. _T('zxml_valeur_attribut')
-				. " <b>$name</b> "
-				. _T('zxml_de')
-				. " <b>$bal</b> "
-				. _T('zxml_non_conforme')
-				. "</p><p>"
-				. "<b>" . $motif . "</b>");
-		}
-	}
-
-	// https://code.spip.net/@valider_idref
-	public function valider_idref($nom, $ligne, $col) {
-		if (!isset($this->ids[$nom])) {
-			$this->err[] = array(" <p><b>$nom</b> " . _T('zxml_inconnu_id'), $ligne, $col);
-		}
-	}
-
-	// https://code.spip.net/@valider_passe2
-	public function valider_passe2() {
-		if (!$this->err) {
-			foreach ($this->idrefs as $idref) {
-				list($nom, $ligne, $col) = $idref;
-				$this->valider_idref($nom, $ligne, $col);
-			}
-			foreach ($this->idrefss as $idref) {
-				list($noms, $ligne, $col) = $idref;
-				foreach (preg_split('/\s+/', $noms) as $nom) {
-					$this->valider_idref($nom, $ligne, $col);
-				}
-			}
-		}
-	}
-
-	// https://code.spip.net/@debutElement
-	public function debutElement($phraseur, $name, $attrs) {
-		if ($this->dtc->elements) {
-			$this->validerElement($phraseur, $name, $attrs);
-		}
-
-		if ($f = $this->process['debut']) {
-			$f($this, $name, $attrs);
-		}
-		$depth = $this->depth;
-		$this->debuts[$depth] = strlen($this->res);
-		foreach ($attrs as $k => $v) {
-			$this->validerAttribut($phraseur, $k, $v, $name);
-		}
-	}
-
-	// https://code.spip.net/@finElement
-	public function finElement($phraseur, $name) {
-		$depth = $this->depth;
-		$contenu = $this->contenu;
-
-		$n = strlen($this->res);
-		$c = strlen(trim($contenu[$depth]));
-		$k = $this->debuts[$depth];
-
-		$regle = isset($this->dtc->regles[$name]) ? $this->dtc->regles[$name] : false;
-		$vide = ($regle == 'EMPTY');
-		// controler que les balises devant etre vides le sont 
-		if ($vide) {
-			if ($n <> ($k + $c)) {
-				coordonnees_erreur($this, " <p><b>$name</b> " . _T('zxml_nonvide_balise'));
-			}
-			// pour les regles PCDATA ou iteration de disjonction, tout est fait
-		} elseif ($regle and ($regle != '*')) {
-			if ($regle == '+') {
-				// iteration de disjonction non vide: 1 balise au -
-				if ($n == $k) {
-					coordonnees_erreur($this, "<p>\n<b>$name</b> "
-						. _T('zxml_vide_balise'));
-				}
-			} else {
-				$f = isset($this->fratrie[substr($depth, 2)]) ? $this->fratrie[substr($depth, 2)] : null;
-				if (is_null($f) or !preg_match($regle, $f)) {
-					coordonnees_erreur($this,
-						" <p>\n<b>$name</b> "
-						. _T('zxml_succession_fils_incorrecte')
-						. '&nbsp;: <b>'
-						. $f
-						. '</b>');
-				}
-			}
-
-		}
-		if ($f = $this->process['fin']) {
-			$f($this, $name, $vide);
-		}
-	}
-
-	// https://code.spip.net/@textElement
-	public function textElement($phraseur, $data) {
-		if (trim($data)) {
-			$d = $this->depth;
-			$d = $this->ouvrant[$d];
-			preg_match('/^\s*(\S+)/', $d, $m);
-			if (isset($this->dtc->pcdata[$m[1]]) and ($this->dtc->pcdata[$m[1]])) {
-				coordonnees_erreur($this, " <p><b>" . $m[1] . "</b> "
-					. _T('zxml_nonvide_balise') // message a affiner
-				);
-			}
-		}
-		if ($f = $this->process['text']) {
-			$f($this, $data);
-		}
-	}
-
-	public function piElement($phraseur, $target, $data) {
-		if ($f = $this->process['pi']) {
-			$f($this, $target, $data);
-		}
-	}
-
-	// Denonciation des entitees XML inconnues
-	// Pour contourner le bug de conception de SAX qui ne signale pas si elles
-	// sont dans un attribut, les  entites les plus frequentes ont ete
-	// transcodees au prealable  (sauf & < > " que SAX traite correctement).
-	// On ne les verra donc pas passer a cette etape, contrairement a ce que 
-	// le source de la page laisse legitimement supposer. 
-
-	// https://code.spip.net/@defautElement
-	public function defaultElement($phraseur, $data) {
-		if (!preg_match('/^<!--/', $data)
-			and (preg_match_all('/&([^;]*)?/', $data, $r, PREG_SET_ORDER))
-		) {
-			foreach ($r as $m) {
-				list($t, $e) = $m;
-				if (!isset($this->dtc->entites[$e])) {
-					coordonnees_erreur($this, " <b>$e</b> "
-						. _T('zxml_inconnu_entite')
-						. ' '
-					);
-				}
-			}
-		}
-		if (isset($this->process['default']) and ($f = $this->process['default'])) {
-			$f($this, $data);
-		}
-	}
-
-	// https://code.spip.net/@phraserTout
-	public function phraserTout($phraseur, $data) {
-		xml_parsestring($this, $data);
-
-		if (!$this->dtc or preg_match(',^' . _MESSAGE_DOCTYPE . ',', $data)) {
-			$this->err[] = array('DOCTYPE ?', 0, 0);
-		} else {
-			$this->valider_passe2($this);
-		}
-	}
-
-	/**
-	 * Constructeur
-	 *
-	 * @param array $process ?
-	 **/
-	public function __construct($process = array()) {
-		if (is_array($process)) {
-			$this->process = $process;
-		}
-	}
-
-	public $ids = array();
-	public $idrefs = array();
-	public $idrefss = array();
-	public $debuts = array();
-	public $fratrie = array();
-
-	public $dtc = null;
-	public $sax = null;
-	public $depth = "";
-	public $entete = '';
-	public $page = '';
-	public $res = "";
-	public $err = array();
-	public $contenu = array();
-	public $ouvrant = array();
-	public $reperes = array();
-	public $process = array(
-		'debut' => 'xml_debutElement',
-		'fin' => 'xml_finElement',
-		'text' => 'xml_textElement',
-		'pi' => 'xml_piElement',
-		'default' => 'xml_defaultElement'
-	);
+    // https://code.spip.net/@validerElement
+    public function validerElement($phraseur, $name, $attrs) {
+        if (!($p = isset($this->dtc->elements[$name]))) {
+            if ($p = strpos($name, ':')) {
+                $name = substr($name, $p + 1);
+                $p = isset($this->dtc->elements[$name]);
+            }
+            if (!$p) {
+                coordonnees_erreur($this, " <b>$name</b>&nbsp;: "
+                    . _T('zxml_inconnu_balise'));
+
+                return;
+            }
+        }
+        // controler les filles illegitimes, ca suffit 
+        $depth = $this->depth;
+        $ouvrant = $this->ouvrant;
+        #spip_log("trouve $name apres " . $ouvrant[$depth]);
+        if (isset($ouvrant[$depth])) {
+            if (preg_match('/^\s*(\w+)/', $ouvrant[$depth], $r)) {
+                $pere = $r[1];
+                #spip_log("pere $pere");
+                if (isset($this->dtc->elements[$pere])) {
+                    $fils = $this->dtc->elements[$pere];
+                    #spip_log("rejeton $name fils " . @join(',',$fils));
+                    if (!($p = @in_array($name, $fils))) {
+                        if ($p = strpos($name, ':')) {
+                            $p = substr($name, $p + 1);
+                            $p = @in_array($p, $fils);
+                        }
+                    }
+                    if (!$p) {
+                        $bons_peres = @join('</b>, <b>', $this->dtc->peres[$name]);
+                        coordonnees_erreur($this, " <b>$name</b> "
+                            . _T('zxml_non_fils')
+                            . ' <b>'
+                            . $pere
+                            . '</b>'
+                            . (!$bons_peres ? ''
+                                : ('<p style="font-size: 80%"> ' . _T('zxml_mais_de') . ' <b>' . $bons_peres . '</b></p>')));
+                    } elseif ($this->dtc->regles[$pere][0] == '/') {
+                        $frat = substr($depth, 2);
+                        if (!isset($this->fratrie[$frat])) {
+                            $this->fratrie[$frat] = '';
+                        }
+                        $this->fratrie[$frat] .= "$name ";
+                    }
+                }
+            }
+        }
+        // Init de la suite des balises a memoriser si regle difficile
+        if ($this->dtc->regles[$name] and $this->dtc->regles[$name][0] == '/') {
+            $this->fratrie[$depth] = '';
+        }
+        if (isset($this->dtc->attributs[$name])) {
+            foreach ($this->dtc->attributs[$name] as $n => $v) {
+                if (($v[1] == '#REQUIRED') and (!isset($attrs[$n]))) {
+                    coordonnees_erreur($this, " <b>$n</b>"
+                        . '&nbsp;:&nbsp;'
+                        . _T('zxml_obligatoire_attribut')
+                        . " <b>$name</b>");
+                }
+            }
+        }
+    }
+
+    // https://code.spip.net/@validerAttribut
+    public function validerAttribut($phraseur, $name, $val, $bal) {
+        // Si la balise est inconnue, eviter d'insister
+        if (!isset($this->dtc->attributs[$bal])) {
+            return;
+        }
+
+        $a = $this->dtc->attributs[$bal];
+        if (!isset($a[$name])) {
+            $bons = join(', ', array_keys($a));
+            if ($bons) {
+                $bons = " title=' " .
+                    _T('zxml_connus_attributs') .
+                    '&nbsp;: ' .
+                    $bons .
+                    "'";
+            }
+            $bons .= " style='font-weight: bold'";
+            coordonnees_erreur($this, " <b>$name</b> "
+                . _T('zxml_inconnu_attribut') . ' ' . _T('zxml_de')
+                . " <a$bons>$bal</a> ("
+                . _T('zxml_survoler')
+                . ")");
+        } else {
+            $type = $a[$name][0];
+            if (!preg_match('/^\w+$/', $type)) {
+                $this->valider_motif($phraseur, $name, $val, $bal, $type);
+            } else {
+                if (method_exists($this, $f = 'validerAttribut_' . $type)) {
+                    $this->$f($phraseur, $name, $val, $bal);
+                }
+            }
+            #		else spip_log("$type type d'attribut inconnu");
+        }
+    }
+
+    public function validerAttribut_NMTOKEN($phraseur, $name, $val, $bal) {
+        $this->valider_motif($phraseur, $name, $val, $bal, _REGEXP_NMTOKEN);
+    }
+
+    public function validerAttribut_NMTOKENS($phraseur, $name, $val, $bal) {
+        $this->valider_motif($phraseur, $name, $val, $bal, _REGEXP_NMTOKENS);
+    }
+
+    // https://code.spip.net/@validerAttribut_ID
+    public function validerAttribut_ID($phraseur, $name, $val, $bal) {
+        if (isset($this->ids[$val])) {
+            list($l, $c) = $this->ids[$val];
+            coordonnees_erreur($this, " <p><b>$val</b> "
+                . _T('zxml_valeur_attribut')
+                . " <b>$name</b> "
+                . _T('zxml_de')
+                . " <b>$bal</b> "
+                . _T('zxml_vu')
+                . " (L$l,C$c)");
+        } else {
+            $this->valider_motif($phraseur, $name, $val, $bal, _REGEXP_ID);
+            $this->ids[$val] = array(xml_get_current_line_number($phraseur), xml_get_current_column_number($phraseur));
+        }
+    }
+
+    // https://code.spip.net/@validerAttribut_IDREF
+    public function validerAttribut_IDREF($phraseur, $name, $val, $bal) {
+        $this->idrefs[] = array($val, xml_get_current_line_number($phraseur), xml_get_current_column_number($phraseur));
+    }
+
+    // https://code.spip.net/@validerAttribut_IDREFS
+    public function validerAttribut_IDREFS($phraseur, $name, $val, $bal) {
+        $this->idrefss[] = array($val, xml_get_current_line_number($phraseur), xml_get_current_column_number($phraseur));
+    }
+
+    // https://code.spip.net/@valider_motif
+    public function valider_motif($phraseur, $name, $val, $bal, $motif) {
+        if (!preg_match($motif, $val)) {
+            coordonnees_erreur($this, "<b>$val</b> "
+                . _T('zxml_valeur_attribut')
+                . " <b>$name</b> "
+                . _T('zxml_de')
+                . " <b>$bal</b> "
+                . _T('zxml_non_conforme')
+                . "</p><p>"
+                . "<b>" . $motif . "</b>");
+        }
+    }
+
+    // https://code.spip.net/@valider_idref
+    public function valider_idref($nom, $ligne, $col) {
+        if (!isset($this->ids[$nom])) {
+            $this->err[] = array(" <p><b>$nom</b> " . _T('zxml_inconnu_id'), $ligne, $col);
+        }
+    }
+
+    // https://code.spip.net/@valider_passe2
+    public function valider_passe2() {
+        if (!$this->err) {
+            foreach ($this->idrefs as $idref) {
+                list($nom, $ligne, $col) = $idref;
+                $this->valider_idref($nom, $ligne, $col);
+            }
+            foreach ($this->idrefss as $idref) {
+                list($noms, $ligne, $col) = $idref;
+                foreach (preg_split('/\s+/', $noms) as $nom) {
+                    $this->valider_idref($nom, $ligne, $col);
+                }
+            }
+        }
+    }
+
+    // https://code.spip.net/@debutElement
+    public function debutElement($phraseur, $name, $attrs) {
+        if ($this->dtc->elements) {
+            $this->validerElement($phraseur, $name, $attrs);
+        }
+
+        if ($f = $this->process['debut']) {
+            $f($this, $name, $attrs);
+        }
+        $depth = $this->depth;
+        $this->debuts[$depth] = strlen($this->res);
+        foreach ($attrs as $k => $v) {
+            $this->validerAttribut($phraseur, $k, $v, $name);
+        }
+    }
+
+    // https://code.spip.net/@finElement
+    public function finElement($phraseur, $name) {
+        $depth = $this->depth;
+        $contenu = $this->contenu;
+
+        $n = strlen($this->res);
+        $c = strlen(trim($contenu[$depth]));
+        $k = $this->debuts[$depth];
+
+        $regle = isset($this->dtc->regles[$name]) ? $this->dtc->regles[$name] : false;
+        $vide = ($regle == 'EMPTY');
+        // controler que les balises devant etre vides le sont 
+        if ($vide) {
+            if ($n <> ($k + $c)) {
+                coordonnees_erreur($this, " <p><b>$name</b> " . _T('zxml_nonvide_balise'));
+            }
+            // pour les regles PCDATA ou iteration de disjonction, tout est fait
+        } elseif ($regle and ($regle != '*')) {
+            if ($regle == '+') {
+                // iteration de disjonction non vide: 1 balise au -
+                if ($n == $k) {
+                    coordonnees_erreur($this, "<p>\n<b>$name</b> "
+                        . _T('zxml_vide_balise'));
+                }
+            } else {
+                $f = isset($this->fratrie[substr($depth, 2)]) ? $this->fratrie[substr($depth, 2)] : null;
+                if (is_null($f) or !preg_match($regle, $f)) {
+                    coordonnees_erreur($this,
+                        " <p>\n<b>$name</b> "
+                        . _T('zxml_succession_fils_incorrecte')
+                        . '&nbsp;: <b>'
+                        . $f
+                        . '</b>');
+                }
+            }
+
+        }
+        if ($f = $this->process['fin']) {
+            $f($this, $name, $vide);
+        }
+    }
+
+    // https://code.spip.net/@textElement
+    public function textElement($phraseur, $data) {
+        if (trim($data)) {
+            $d = $this->depth;
+            $d = $this->ouvrant[$d];
+            preg_match('/^\s*(\S+)/', $d, $m);
+            if (isset($this->dtc->pcdata[$m[1]]) and ($this->dtc->pcdata[$m[1]])) {
+                coordonnees_erreur($this, " <p><b>" . $m[1] . "</b> "
+                    . _T('zxml_nonvide_balise') // message a affiner
+                );
+            }
+        }
+        if ($f = $this->process['text']) {
+            $f($this, $data);
+        }
+    }
+
+    public function piElement($phraseur, $target, $data) {
+        if ($f = $this->process['pi']) {
+            $f($this, $target, $data);
+        }
+    }
+
+    // Denonciation des entitees XML inconnues
+    // Pour contourner le bug de conception de SAX qui ne signale pas si elles
+    // sont dans un attribut, les  entites les plus frequentes ont ete
+    // transcodees au prealable  (sauf & < > " que SAX traite correctement).
+    // On ne les verra donc pas passer a cette etape, contrairement a ce que 
+    // le source de la page laisse legitimement supposer. 
+
+    // https://code.spip.net/@defautElement
+    public function defaultElement($phraseur, $data) {
+        if (!preg_match('/^<!--/', $data)
+            and (preg_match_all('/&([^;]*)?/', $data, $r, PREG_SET_ORDER))
+        ) {
+            foreach ($r as $m) {
+                list($t, $e) = $m;
+                if (!isset($this->dtc->entites[$e])) {
+                    coordonnees_erreur($this, " <b>$e</b> "
+                        . _T('zxml_inconnu_entite')
+                        . ' '
+                    );
+                }
+            }
+        }
+        if (isset($this->process['default']) and ($f = $this->process['default'])) {
+            $f($this, $data);
+        }
+    }
+
+    // https://code.spip.net/@phraserTout
+    public function phraserTout($phraseur, $data) {
+        xml_parsestring($this, $data);
+
+        if (!$this->dtc or preg_match(',^' . _MESSAGE_DOCTYPE . ',', $data)) {
+            $this->err[] = array('DOCTYPE ?', 0, 0);
+        } else {
+            $this->valider_passe2($this);
+        }
+    }
+
+    /**
+     * Constructeur
+     *
+     * @param array $process ?
+     **/
+    public function __construct($process = array()) {
+        if (is_array($process)) {
+            $this->process = $process;
+        }
+    }
+
+    public $ids = array();
+    public $idrefs = array();
+    public $idrefss = array();
+    public $debuts = array();
+    public $fratrie = array();
+
+    public $dtc = null;
+    public $sax = null;
+    public $depth = "";
+    public $entete = '';
+    public $page = '';
+    public $res = "";
+    public $err = array();
+    public $contenu = array();
+    public $ouvrant = array();
+    public $reperes = array();
+    public $process = array(
+        'debut' => 'xml_debutElement',
+        'fin' => 'xml_finElement',
+        'text' => 'xml_textElement',
+        'pi' => 'xml_piElement',
+        'default' => 'xml_defaultElement'
+    );
 }
 
 
@@ -359,8 +359,8 @@ 
  *
  **/
 function xml_valider_dist($page, $apply = false, $process = false, $doctype = '', $charset = null) {
-	$f = new ValidateurXML($process);
-	$sax = charger_fonction('sax', 'xml');
+    $f = new ValidateurXML($process);
+    $sax = charger_fonction('sax', 'xml');
 
-	return $sax($page, $apply, $f, $doctype, $charset);
+    return $sax($page, $apply, $f, $doctype, $charset);
 }