spip / SPIP

ecrire/src/Texte/Collecteur/Multis.php

Indentation +204 added lines, -204 removed lines

@@ -29,209 +29,209 @@
  */
 class Multis extends AbstractCollecteur {
 
-	protected static string $markPrefix = 'MULTI';
-
-	/**
-	 * La preg pour découper et collecter les modèles
-	 * @var string
-	 */
-	protected string $preg_multi;
-
-	public function __construct(?string $preg = null) {
-
-		$this->preg_multi = ($preg ?: '@<multi>(.*?)</multi>@sS');
-	}
-
-	/**
-	 * Sanitizer une collection d'occurences de multi : on sanitize chaque texte de langue séparemment
-	 *
-	 * @param array $collection
-	 * @param string $sanitize_callback
-	 * @return array
-	 */
-	protected function sanitizer_collection(array $collection, string $sanitize_callback): array {
-
-		foreach ($collection as &$multi) {
-			$changed = false;
-			foreach ($multi['trads'] as $lang => $trad) {
-				$t = $sanitize_callback($trad);
-				if ($t !== $trad) {
-					$changed = true;
-					$multi['trads'][$lang] = $t;
-				}
-			}
-			if ($changed) {
-				$texte = $this->agglomerer_trads($multi['trads']);
-				$multi['raw'] = str_replace($multi['texte'], $texte, $multi['raw']);
-				$multi['texte'] = $texte;
-			}
-		}
-		return $collection;
-	}
-
-
-	/**
-	 * Convertit le contenu d'une balise `<multi>` en un tableau
-	 *
-	 * Exemple de blocs.
-	 * - `texte par défaut [fr] en français [en] en anglais`
-	 * - `[fr] en français [en] en anglais`
-	 *
-	 * @param string $bloc
-	 *     Le contenu intérieur d'un bloc multi
-	 * @return array [code de langue => texte]
-	 *     Peut retourner un code de langue vide, lorsqu'un texte par défaut est indiqué.
-	 **/
-	protected function extraire_trads($bloc) {
-		$trads = [];
-
-		if (strlen($bloc)) {
-			$langs = $this->collecteur($bloc, ']', '[', '@[\[]([a-z]{2,3}(_[a-z]{2,3})?(_[a-z]{2,3})?)[\]]@siS');
-			$lang = '';
-			$pos_prev = 0;
-			foreach ($langs as $l) {
-				$pos = $l['pos'];
-				if ($lang or $pos > $pos_prev) {
-					$trads[$lang] = substr($bloc, $pos_prev, $pos - $pos_prev);
-				}
-				$lang = $l['match'][1];
-				$pos_prev = $pos + $l['length'];
-			}
-			$trads[$lang] = substr($bloc, $pos_prev);
-		}
-
-		return $trads;
-	}
-
-	/**
-	 * Recoller ensemble les trads pour reconstituer le texte dans la balise <multi>...</multi>
-	 * @param $trads
-	 * @return string
-	 */
-	protected function agglomerer_trads($trads) {
-		$texte = '';
-		foreach ($trads as $lang => $trad) {
-			if ($texte or $lang) {
-				$texte .= "[$lang]";
-			}
-			$texte .= $trad;
-		}
-		return $texte;
-	}
-
-	/**
-	 * @param string $texte
-	 * @param array $options
-	 *   bool $collecter_liens
-	 * @return array
-	 */
-	public function collecter(string $texte, array $options = []): array {
-		if (!$texte) {
-			return [];
-		}
-
-		// collecter les matchs de la preg
-		$multis = $this->collecteur($texte, '', '<multi', $this->preg_multi, empty($options['detecter_presence']) ? 0 : 1);
-		// si on veut seulement detecter la présence, on peut retourner tel quel
-		if (empty($options['detecter_presence'])) {
-			foreach ($multis as $k => &$multi) {
-				$multi['texte'] = $multi['match'][1];
-				// extraire les trads du texte
-				$multi['trads'] = $this->extraire_trads($multi['texte']);
-			}
-		}
-
-		return $multis;
-	}
-
-	/**
-	 * Traiter les multis d'un texte
-	 *
-	 * @uses approcher_langue()
-	 * @uses lang_typo()
-	 * @uses code_echappement()
-	 * @uses echappe_retour()
-	 *
-	 * @param string $texte
-	 * @param array $options
-	 *   ?string $lang
-	 *   ?string $lang_defaut
-	 *   ?bool echappe_span
-	 *   ?bool appliquer_typo
-	 * @return string
-	 */
-	public function traiter(string $texte, array $options) {
-		if ($texte) {
-
-			$multis = $this->collecter($texte);
-			if (!empty($multis)) {
-				$lang = $options['lang'] ?? $GLOBALS['spip_lang'];
-				$lang_defaut = $options['lang_defaut'] ?? _LANGUE_PAR_DEFAUT;
-				$echappe_span = $options['echappe_span'] ?? false;
-				$appliquer_typo = $options['appliquer_typo'] ?? true;
-
-				if (!function_exists('approcher_langue')) {
-					include_spip('inc/lang');
-				}
-				if (!function_exists('code_echappement')) {
-					include_spip('inc/texte_mini');
-				}
-
-				$offset_pos = 0;
-				foreach ($multis as $m) {
-
-					// chercher la version de la langue courante
-					$trads = $m['trads'];
-					if (empty($trads)) {
-						$trad = '';
-					}
-					elseif ($l = approcher_langue($trads, $lang)) {
-						$trad = $trads[$l];
-					} else {
-						if ($lang_defaut == 'aucune') {
-							$trad = '';
-						} else {
-							// langue absente, prendre le fr ou une langue précisée (meme comportement que inc/traduire.php)
-							// ou la premiere dispo
-							if (!$l = approcher_langue($trads, $lang_defaut)) {
-								$l = array_keys($trads);
-								$l = reset($l);
-							}
-							$trad = $trads[$l];
-
-							// mais typographier le texte selon les regles de celle-ci
-							// Attention aux blocs multi sur plusieurs lignes
-							if ($appliquer_typo) {
-								$typographie = charger_fonction(lang_typo($l), 'typographie');
-								$trad = $typographie($trad);
-
-								// Tester si on echappe en span ou en div
-								// il ne faut pas echapper en div si propre produit un seul paragraphe
-								include_spip('inc/texte');
-								$trad_propre = preg_replace(',(^<p[^>]*>|</p>$),Uims', '', propre($trad));
-								$mode = preg_match(',</?(' . _BALISES_BLOCS . ')[>[:space:]],iS', $trad_propre) ? 'div' : 'span';
-								if ($mode === 'div') {
-									$trad = rtrim($trad) . "\n\n";
-								}
-								$trad = code_echappement($trad, 'multi', false, $mode);
-								$trad = str_replace("'", '"', inserer_attribut($trad, 'lang', $l));
-								if (lang_dir($l) !== lang_dir($lang)) {
-									$trad = str_replace("'", '"', inserer_attribut($trad, 'dir', lang_dir($l)));
-								}
-								if (!$echappe_span) {
-									$trad = echappe_retour($trad, 'multi');
-								}
-							}
-						}
-					}
-
-					$texte = substr_replace($texte, $trad, $m['pos'] + $offset_pos, $m['length']);
-					$offset_pos += strlen($trad) - $m['length'];
-				}
-			}
-		}
-
-		return $texte;
-	}
+    protected static string $markPrefix = 'MULTI';
+
+    /**
+     * La preg pour découper et collecter les modèles
+     * @var string
+     */
+    protected string $preg_multi;
+
+    public function __construct(?string $preg = null) {
+
+        $this->preg_multi = ($preg ?: '@<multi>(.*?)</multi>@sS');
+    }
+
+    /**
+     * Sanitizer une collection d'occurences de multi : on sanitize chaque texte de langue séparemment
+     *
+     * @param array $collection
+     * @param string $sanitize_callback
+     * @return array
+     */
+    protected function sanitizer_collection(array $collection, string $sanitize_callback): array {
+
+        foreach ($collection as &$multi) {
+            $changed = false;
+            foreach ($multi['trads'] as $lang => $trad) {
+                $t = $sanitize_callback($trad);
+                if ($t !== $trad) {
+                    $changed = true;
+                    $multi['trads'][$lang] = $t;
+                }
+            }
+            if ($changed) {
+                $texte = $this->agglomerer_trads($multi['trads']);
+                $multi['raw'] = str_replace($multi['texte'], $texte, $multi['raw']);
+                $multi['texte'] = $texte;
+            }
+        }
+        return $collection;
+    }
+
+
+    /**
+     * Convertit le contenu d'une balise `<multi>` en un tableau
+     *
+     * Exemple de blocs.
+     * - `texte par défaut [fr] en français [en] en anglais`
+     * - `[fr] en français [en] en anglais`
+     *
+     * @param string $bloc
+     *     Le contenu intérieur d'un bloc multi
+     * @return array [code de langue => texte]
+     *     Peut retourner un code de langue vide, lorsqu'un texte par défaut est indiqué.
+     **/
+    protected function extraire_trads($bloc) {
+        $trads = [];
+
+        if (strlen($bloc)) {
+            $langs = $this->collecteur($bloc, ']', '[', '@[\[]([a-z]{2,3}(_[a-z]{2,3})?(_[a-z]{2,3})?)[\]]@siS');
+            $lang = '';
+            $pos_prev = 0;
+            foreach ($langs as $l) {
+                $pos = $l['pos'];
+                if ($lang or $pos > $pos_prev) {
+                    $trads[$lang] = substr($bloc, $pos_prev, $pos - $pos_prev);
+                }
+                $lang = $l['match'][1];
+                $pos_prev = $pos + $l['length'];
+            }
+            $trads[$lang] = substr($bloc, $pos_prev);
+        }
+
+        return $trads;
+    }
+
+    /**
+     * Recoller ensemble les trads pour reconstituer le texte dans la balise <multi>...</multi>
+     * @param $trads
+     * @return string
+     */
+    protected function agglomerer_trads($trads) {
+        $texte = '';
+        foreach ($trads as $lang => $trad) {
+            if ($texte or $lang) {
+                $texte .= "[$lang]";
+            }
+            $texte .= $trad;
+        }
+        return $texte;
+    }
+
+    /**
+     * @param string $texte
+     * @param array $options
+     *   bool $collecter_liens
+     * @return array
+     */
+    public function collecter(string $texte, array $options = []): array {
+        if (!$texte) {
+            return [];
+        }
+
+        // collecter les matchs de la preg
+        $multis = $this->collecteur($texte, '', '<multi', $this->preg_multi, empty($options['detecter_presence']) ? 0 : 1);
+        // si on veut seulement detecter la présence, on peut retourner tel quel
+        if (empty($options['detecter_presence'])) {
+            foreach ($multis as $k => &$multi) {
+                $multi['texte'] = $multi['match'][1];
+                // extraire les trads du texte
+                $multi['trads'] = $this->extraire_trads($multi['texte']);
+            }
+        }
+
+        return $multis;
+    }
+
+    /**
+     * Traiter les multis d'un texte
+     *
+     * @uses approcher_langue()
+     * @uses lang_typo()
+     * @uses code_echappement()
+     * @uses echappe_retour()
+     *
+     * @param string $texte
+     * @param array $options
+     *   ?string $lang
+     *   ?string $lang_defaut
+     *   ?bool echappe_span
+     *   ?bool appliquer_typo
+     * @return string
+     */
+    public function traiter(string $texte, array $options) {
+        if ($texte) {
+
+            $multis = $this->collecter($texte);
+            if (!empty($multis)) {
+                $lang = $options['lang'] ?? $GLOBALS['spip_lang'];
+                $lang_defaut = $options['lang_defaut'] ?? _LANGUE_PAR_DEFAUT;
+                $echappe_span = $options['echappe_span'] ?? false;
+                $appliquer_typo = $options['appliquer_typo'] ?? true;
+
+                if (!function_exists('approcher_langue')) {
+                    include_spip('inc/lang');
+                }
+                if (!function_exists('code_echappement')) {
+                    include_spip('inc/texte_mini');
+                }
+
+                $offset_pos = 0;
+                foreach ($multis as $m) {
+
+                    // chercher la version de la langue courante
+                    $trads = $m['trads'];
+                    if (empty($trads)) {
+                        $trad = '';
+                    }
+                    elseif ($l = approcher_langue($trads, $lang)) {
+                        $trad = $trads[$l];
+                    } else {
+                        if ($lang_defaut == 'aucune') {
+                            $trad = '';
+                        } else {
+                            // langue absente, prendre le fr ou une langue précisée (meme comportement que inc/traduire.php)
+                            // ou la premiere dispo
+                            if (!$l = approcher_langue($trads, $lang_defaut)) {
+                                $l = array_keys($trads);
+                                $l = reset($l);
+                            }
+                            $trad = $trads[$l];
+
+                            // mais typographier le texte selon les regles de celle-ci
+                            // Attention aux blocs multi sur plusieurs lignes
+                            if ($appliquer_typo) {
+                                $typographie = charger_fonction(lang_typo($l), 'typographie');
+                                $trad = $typographie($trad);
+
+                                // Tester si on echappe en span ou en div
+                                // il ne faut pas echapper en div si propre produit un seul paragraphe
+                                include_spip('inc/texte');
+                                $trad_propre = preg_replace(',(^<p[^>]*>|</p>$),Uims', '', propre($trad));
+                                $mode = preg_match(',</?(' . _BALISES_BLOCS . ')[>[:space:]],iS', $trad_propre) ? 'div' : 'span';
+                                if ($mode === 'div') {
+                                    $trad = rtrim($trad) . "\n\n";
+                                }
+                                $trad = code_echappement($trad, 'multi', false, $mode);
+                                $trad = str_replace("'", '"', inserer_attribut($trad, 'lang', $l));
+                                if (lang_dir($l) !== lang_dir($lang)) {
+                                    $trad = str_replace("'", '"', inserer_attribut($trad, 'dir', lang_dir($l)));
+                                }
+                                if (!$echappe_span) {
+                                    $trad = echappe_retour($trad, 'multi');
+                                }
+                            }
+                        }
+                    }
+
+                    $texte = substr_replace($texte, $trad, $m['pos'] + $offset_pos, $m['length']);
+                    $offset_pos += strlen($trad) - $m['length'];
+                }
+            }
+        }
+
+        return $texte;
+    }
 
 }

ecrire/req/sqlite_generique.php

Indentation +1623 added lines, -1623 removed lines

@@ -20,7 +20,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 // TODO: get/set_caracteres ?
@@ -44,91 +44,91 @@ 
  */
 function req_sqlite_dist($addr, $port, $login, $pass, $db = '', $prefixe = '', $sqlite_version = '')
 {
-	static $last_connect = [];
-
-	// si provient de selectdb
-	// un code pour etre sur que l'on vient de select_db()
-	if (strpos($db, $code = '@selectdb@') !== false) {
-		foreach (['addr', 'port', 'login', 'pass', 'prefixe'] as $a) {
-			$$a = $last_connect[$a];
-		}
-		$db = str_replace($code, '', $db);
-	}
-
-	/*
+    static $last_connect = [];
+
+    // si provient de selectdb
+    // un code pour etre sur que l'on vient de select_db()
+    if (strpos($db, $code = '@selectdb@') !== false) {
+        foreach (['addr', 'port', 'login', 'pass', 'prefixe'] as $a) {
+            $$a = $last_connect[$a];
+        }
+        $db = str_replace($code, '', $db);
+    }
+
+    /*
 	 * En sqlite, seule l'adresse du fichier est importante.
 	 * Ce sera $db le nom,
 	 * le path est $addr
 	 * (_DIR_DB si $addr est vide)
 	 */
-	_sqlite_init();
-
-	// determiner le dossier de la base : $addr ou _DIR_DB
-	$f = _DIR_DB;
-	if ($addr and str_contains($addr, '/')) {
-		$f = rtrim($addr, '/') . '/';
-	}
-
-	// un nom de base demande et impossible d'obtenir la base, on s'en va :
-	// il faut que la base existe ou que le repertoire parent soit writable
-	if ($db and !is_file($f .= $db . '.sqlite') and !is_writable(dirname($f))) {
-		spip_log("base $f non trouvee ou droits en ecriture manquants", 'sqlite.' . _LOG_HS);
-
-		return false;
-	}
-
-	// charger les modules sqlite au besoin
-	if (!_sqlite_charger_version($sqlite_version)) {
-		spip_log("Impossible de trouver/charger le module SQLite ($sqlite_version)!", 'sqlite.' . _LOG_HS);
-
-		return false;
-	}
-
-	// chargement des constantes
-	// il ne faut pas definir les constantes avant d'avoir charge les modules sqlite
-	$define = 'spip_sqlite' . $sqlite_version . '_constantes';
-	$define();
-
-	$ok = false;
-	if (!$db) {
-		// si pas de db ->
-		// base temporaire tant qu'on ne connait pas son vrai nom
-		// pour tester la connexion
-		$db = '_sqlite' . $sqlite_version . '_install';
-		$tmp = _DIR_DB . $db . '.sqlite';
-		$ok = $link = new \PDO("sqlite:$tmp");
-	} else {
-		// Ouvrir (eventuellement creer la base)
-		$ok = $link = new \PDO("sqlite:$f");
-	}
-
-	if (!$ok) {
-		$e = _sqlite_last_error_from_link($link);
-		spip_log("Impossible d'ouvrir la base SQLite($sqlite_version) $f : $e", 'sqlite.' . _LOG_HS);
-
-		return false;
-	}
-
-	if ($link) {
-		$last_connect = [
-			'addr' => $addr,
-			'port' => $port,
-			'login' => $login,
-			'pass' => $pass,
-			'db' => $db,
-			'prefixe' => $prefixe,
-		];
-		// etre sur qu'on definit bien les fonctions a chaque nouvelle connexion
-		include_spip('req/sqlite_fonctions');
-		_sqlite_init_functions($link);
-	}
-
-	return [
-		'db' => $db,
-		'prefixe' => $prefixe ? $prefixe : $db,
-		'link' => $link,
-		'total_requetes' => 0,
-	];
+    _sqlite_init();
+
+    // determiner le dossier de la base : $addr ou _DIR_DB
+    $f = _DIR_DB;
+    if ($addr and str_contains($addr, '/')) {
+        $f = rtrim($addr, '/') . '/';
+    }
+
+    // un nom de base demande et impossible d'obtenir la base, on s'en va :
+    // il faut que la base existe ou que le repertoire parent soit writable
+    if ($db and !is_file($f .= $db . '.sqlite') and !is_writable(dirname($f))) {
+        spip_log("base $f non trouvee ou droits en ecriture manquants", 'sqlite.' . _LOG_HS);
+
+        return false;
+    }
+
+    // charger les modules sqlite au besoin
+    if (!_sqlite_charger_version($sqlite_version)) {
+        spip_log("Impossible de trouver/charger le module SQLite ($sqlite_version)!", 'sqlite.' . _LOG_HS);
+
+        return false;
+    }
+
+    // chargement des constantes
+    // il ne faut pas definir les constantes avant d'avoir charge les modules sqlite
+    $define = 'spip_sqlite' . $sqlite_version . '_constantes';
+    $define();
+
+    $ok = false;
+    if (!$db) {
+        // si pas de db ->
+        // base temporaire tant qu'on ne connait pas son vrai nom
+        // pour tester la connexion
+        $db = '_sqlite' . $sqlite_version . '_install';
+        $tmp = _DIR_DB . $db . '.sqlite';
+        $ok = $link = new \PDO("sqlite:$tmp");
+    } else {
+        // Ouvrir (eventuellement creer la base)
+        $ok = $link = new \PDO("sqlite:$f");
+    }
+
+    if (!$ok) {
+        $e = _sqlite_last_error_from_link($link);
+        spip_log("Impossible d'ouvrir la base SQLite($sqlite_version) $f : $e", 'sqlite.' . _LOG_HS);
+
+        return false;
+    }
+
+    if ($link) {
+        $last_connect = [
+            'addr' => $addr,
+            'port' => $port,
+            'login' => $login,
+            'pass' => $pass,
+            'db' => $db,
+            'prefixe' => $prefixe,
+        ];
+        // etre sur qu'on definit bien les fonctions a chaque nouvelle connexion
+        include_spip('req/sqlite_fonctions');
+        _sqlite_init_functions($link);
+    }
+
+    return [
+        'db' => $db,
+        'prefixe' => $prefixe ? $prefixe : $db,
+        'link' => $link,
+        'total_requetes' => 0,
+    ];
 }
 
 
@@ -148,14 +148,14 @@ 
  */
 function spip_sqlite_query($query, $serveur = '', $requeter = true)
 {
-	#spip_log("spip_sqlite_query() > $query",'sqlite.'._LOG_DEBUG);
-	#_sqlite_init(); // fait la premiere fois dans spip_sqlite
-	$query = Sqlite::traduire_requete($query, $serveur);
-	if (!$requeter) {
-		return $query;
-	}
-
-	return Sqlite::executer_requete($query, $serveur);
+    #spip_log("spip_sqlite_query() > $query",'sqlite.'._LOG_DEBUG);
+    #_sqlite_init(); // fait la premiere fois dans spip_sqlite
+    $query = Sqlite::traduire_requete($query, $serveur);
+    if (!$requeter) {
+        return $query;
+    }
+
+    return Sqlite::executer_requete($query, $serveur);
 }
 
 
@@ -173,11 +173,11 @@ 
 function spip_sqlite_alter($query, $serveur = '', $requeter = true)
 {
 
-	$query = spip_sqlite_query("ALTER $query", $serveur, false);
-	// traduire la requete pour recuperer les bons noms de table
-	$query = Sqlite::traduire_requete($query, $serveur);
+    $query = spip_sqlite_query("ALTER $query", $serveur, false);
+    // traduire la requete pour recuperer les bons noms de table
+    $query = Sqlite::traduire_requete($query, $serveur);
 
-	/*
+    /*
 		 * la il faut faire les transformations
 		 * si ALTER TABLE x (DROP|CHANGE) y
 		 *
@@ -186,251 +186,251 @@ 
 		 * 3) faire chaque requete independemment
 		 */
 
-	// 1
-	if (preg_match('/\s*(ALTER(\s*IGNORE)?\s*TABLE\s*([^\s]*))\s*(.*)?/is', $query, $regs)) {
-		$debut = $regs[1];
-		$table = $regs[3];
-		$suite = $regs[4];
-	} else {
-		spip_log("SQLite : Probleme de ALTER TABLE mal forme dans $query", 'sqlite.' . _LOG_ERREUR);
-
-		return false;
-	}
-
-	// 2
-	// il faudrait une regexp pour eviter de spliter ADD PRIMARY KEY (colA, colB)
-	// tout en cassant "ADD PRIMARY KEY (colA, colB), ADD INDEX (chose)"... en deux
-	// ou revoir l'api de sql_alter en creant un
-	// sql_alter_table($table,array($actions));
-	$todo = explode(',', $suite);
-
-	// on remet les morceaux dechires ensembles... que c'est laid !
-	$todo2 = [];
-	$i = 0;
-	$ouverte = false;
-	while ($do = array_shift($todo)) {
-		$todo2[$i] = isset($todo2[$i]) ? $todo2[$i] . ',' . $do : $do;
-		$o = (str_contains($do, '('));
-		$f = (str_contains($do, ')'));
-		if ($o and !$f) {
-			$ouverte = true;
-		} elseif ($f) {
-			$ouverte = false;
-		}
-		if (!$ouverte) {
-			$i++;
-		}
-	}
-
-	// 3
-	$resultats = [];
-	foreach ($todo2 as $do) {
-		$do = trim($do);
-		if (
-			!preg_match('/(DROP PRIMARY KEY|DROP KEY|DROP INDEX|DROP COLUMN|DROP'
-				. '|CHANGE COLUMN|CHANGE|MODIFY|RENAME TO|RENAME'
-				. '|ADD PRIMARY KEY|ADD KEY|ADD INDEX|ADD UNIQUE KEY|ADD UNIQUE'
-				. '|ADD COLUMN|ADD'
-				. ')\s*([^\s]*)\s*(.*)?/i', $do, $matches)
-		) {
-			spip_log(
-				"SQLite : Probleme de ALTER TABLE, utilisation non reconnue dans : $do \n(requete d'origine : $query)",
-				'sqlite.' . _LOG_ERREUR
-			);
-
-			return false;
-		}
-
-		$cle = strtoupper($matches[1]);
-		$colonne_origine = $matches[2];
-		$colonne_destination = '';
-
-		$def = $matches[3];
-
-		// eluder une eventuelle clause before|after|first inutilisable
-		$defr = rtrim(preg_replace('/(BEFORE|AFTER|FIRST)(.*)$/is', '', $def));
-		$defo = $defr; // garder la def d'origine pour certains cas
-		// remplacer les definitions venant de mysql
-		$defr = _sqlite_remplacements_definitions_table($defr);
-
-		// reinjecter dans le do
-		$do = str_replace($def, $defr, $do);
-		$def = $defr;
-
-		switch ($cle) {
-				// suppression d'un index
-			case 'DROP KEY':
-			case 'DROP INDEX':
-				$nom_index = $colonne_origine;
-				spip_sqlite_drop_index($nom_index, $table, $serveur);
-				break;
-
-				// suppression d'une pk
-			case 'DROP PRIMARY KEY':
-				if (
-					!_sqlite_modifier_table(
-						$table,
-						$colonne_origine,
-						['key' => ['PRIMARY KEY' => '']],
-						$serveur
-					)
-				) {
-					return false;
-				}
-				break;
-				// suppression d'une colonne
-			case 'DROP COLUMN':
-			case 'DROP':
-				if (
-					!_sqlite_modifier_table(
-						$table,
-						[$colonne_origine => ''],
-						[],
-						$serveur
-					)
-				) {
-					return false;
-				}
-				break;
-
-			case 'CHANGE COLUMN':
-			case 'CHANGE':
-				// recuperer le nom de la future colonne
-				// on reprend la def d'origine car _sqlite_modifier_table va refaire la translation
-				// en tenant compte de la cle primaire (ce qui est mieux)
-				$def = trim($defo);
-				$colonne_destination = substr($def, 0, strpos($def, ' '));
-				$def = substr($def, strlen($colonne_destination) + 1);
-
-				if (
-					!_sqlite_modifier_table(
-						$table,
-						[$colonne_origine => $colonne_destination],
-						['field' => [$colonne_destination => $def]],
-						$serveur
-					)
-				) {
-					return false;
-				}
-				break;
-
-			case 'MODIFY':
-				// on reprend la def d'origine car _sqlite_modifier_table va refaire la translation
-				// en tenant compte de la cle primaire (ce qui est mieux)
-				if (
-					!_sqlite_modifier_table(
-						$table,
-						$colonne_origine,
-						['field' => [$colonne_origine => $defo]],
-						$serveur
-					)
-				) {
-					return false;
-				}
-				break;
-
-				// pas geres en sqlite2
-			case 'RENAME':
-				$do = 'RENAME TO' . substr($do, 6);
-			case 'RENAME TO':
-				if (!Sqlite::executer_requete("$debut $do", $serveur)) {
-					spip_log("SQLite : Erreur ALTER TABLE / RENAME : $query", 'sqlite.' . _LOG_ERREUR);
-
-					return false;
-				}
-				break;
-
-				// ajout d'une pk
-			case 'ADD PRIMARY KEY':
-				$pk = trim(substr($do, 16));
-				$pk = ($pk[0] == '(') ? substr($pk, 1, -1) : $pk;
-				if (
-					!_sqlite_modifier_table(
-						$table,
-						$colonne_origine,
-						['key' => ['PRIMARY KEY' => $pk]],
-						$serveur
-					)
-				) {
-					return false;
-				}
-				break;
-				// ajout d'un index
-			case 'ADD UNIQUE KEY':
-			case 'ADD UNIQUE':
-				$unique = true;
-			case 'ADD INDEX':
-			case 'ADD KEY':
-				if (!isset($unique)) {
-					$unique = false;
-				}
-				// peut etre "(colonne)" ou "nom_index (colonnes)"
-				// bug potentiel si qqn met "(colonne, colonne)"
-				//
-				// nom_index (colonnes)
-				if ($def) {
-					$colonnes = substr($def, 1, -1);
-					$nom_index = $colonne_origine;
-				} else {
-					// (colonne)
-					if ($colonne_origine[0] == '(') {
-						$colonnes = substr($colonne_origine, 1, -1);
-						if (str_contains(',', $colonnes)) {
-							spip_log('SQLite : Erreur, impossible de creer un index sur plusieurs colonnes'
-								. " sans qu'il ait de nom ($table, ($colonnes))", 'sqlite.' . _LOG_ERREUR);
-							break;
-						} else {
-							$nom_index = $colonnes;
-						}
-					} // nom_index
-					else {
-						$nom_index = $colonnes = $colonne_origine;
-					}
-				}
-				spip_sqlite_create_index($nom_index, $table, $colonnes, $unique, $serveur);
-				break;
-
-				// pas geres en sqlite2
-			case 'ADD COLUMN':
-				$do = 'ADD' . substr($do, 10);
-			case 'ADD':
-			default:
-				if (!preg_match(',primary\s+key,i', $do)) {
-					if (!Sqlite::executer_requete("$debut $do", $serveur)) {
-						spip_log("SQLite : Erreur ALTER TABLE / ADD : $query", 'sqlite.' . _LOG_ERREUR);
-
-						return false;
-					}
-					break;
-				}
-				// ou si la colonne est aussi primary key
-				// cas du add id_truc int primary key
-				// ajout d'une colonne qui passe en primary key directe
-				else {
-					$def = trim(substr($do, 3));
-					$colonne_ajoutee = substr($def, 0, strpos($def, ' '));
-					$def = substr($def, strlen($colonne_ajoutee) + 1);
-					$opts = [];
-					if (preg_match(',primary\s+key,i', $def)) {
-						$opts['key'] = ['PRIMARY KEY' => $colonne_ajoutee];
-						$def = preg_replace(',primary\s+key,i', '', $def);
-					}
-					$opts['field'] = [$colonne_ajoutee => $def];
-					if (!_sqlite_modifier_table($table, [$colonne_ajoutee], $opts, $serveur)) {
-						spip_log("SQLite : Erreur ALTER TABLE / ADD : $query", 'sqlite.' . _LOG_ERREUR);
-
-						return false;
-					}
-				}
-				break;
-		}
-		// tout est bon, ouf !
-		spip_log("SQLite ($serveur) : Changements OK : $debut $do", 'sqlite.' . _LOG_INFO);
-	}
-
-	spip_log("SQLite ($serveur) : fin ALTER TABLE OK !", 'sqlite.' . _LOG_INFO);
-
-	return true;
+    // 1
+    if (preg_match('/\s*(ALTER(\s*IGNORE)?\s*TABLE\s*([^\s]*))\s*(.*)?/is', $query, $regs)) {
+        $debut = $regs[1];
+        $table = $regs[3];
+        $suite = $regs[4];
+    } else {
+        spip_log("SQLite : Probleme de ALTER TABLE mal forme dans $query", 'sqlite.' . _LOG_ERREUR);
+
+        return false;
+    }
+
+    // 2
+    // il faudrait une regexp pour eviter de spliter ADD PRIMARY KEY (colA, colB)
+    // tout en cassant "ADD PRIMARY KEY (colA, colB), ADD INDEX (chose)"... en deux
+    // ou revoir l'api de sql_alter en creant un
+    // sql_alter_table($table,array($actions));
+    $todo = explode(',', $suite);
+
+    // on remet les morceaux dechires ensembles... que c'est laid !
+    $todo2 = [];
+    $i = 0;
+    $ouverte = false;
+    while ($do = array_shift($todo)) {
+        $todo2[$i] = isset($todo2[$i]) ? $todo2[$i] . ',' . $do : $do;
+        $o = (str_contains($do, '('));
+        $f = (str_contains($do, ')'));
+        if ($o and !$f) {
+            $ouverte = true;
+        } elseif ($f) {
+            $ouverte = false;
+        }
+        if (!$ouverte) {
+            $i++;
+        }
+    }
+
+    // 3
+    $resultats = [];
+    foreach ($todo2 as $do) {
+        $do = trim($do);
+        if (
+            !preg_match('/(DROP PRIMARY KEY|DROP KEY|DROP INDEX|DROP COLUMN|DROP'
+                . '|CHANGE COLUMN|CHANGE|MODIFY|RENAME TO|RENAME'
+                . '|ADD PRIMARY KEY|ADD KEY|ADD INDEX|ADD UNIQUE KEY|ADD UNIQUE'
+                . '|ADD COLUMN|ADD'
+                . ')\s*([^\s]*)\s*(.*)?/i', $do, $matches)
+        ) {
+            spip_log(
+                "SQLite : Probleme de ALTER TABLE, utilisation non reconnue dans : $do \n(requete d'origine : $query)",
+                'sqlite.' . _LOG_ERREUR
+            );
+
+            return false;
+        }
+
+        $cle = strtoupper($matches[1]);
+        $colonne_origine = $matches[2];
+        $colonne_destination = '';
+
+        $def = $matches[3];
+
+        // eluder une eventuelle clause before|after|first inutilisable
+        $defr = rtrim(preg_replace('/(BEFORE|AFTER|FIRST)(.*)$/is', '', $def));
+        $defo = $defr; // garder la def d'origine pour certains cas
+        // remplacer les definitions venant de mysql
+        $defr = _sqlite_remplacements_definitions_table($defr);
+
+        // reinjecter dans le do
+        $do = str_replace($def, $defr, $do);
+        $def = $defr;
+
+        switch ($cle) {
+                // suppression d'un index
+            case 'DROP KEY':
+            case 'DROP INDEX':
+                $nom_index = $colonne_origine;
+                spip_sqlite_drop_index($nom_index, $table, $serveur);
+                break;
+
+                // suppression d'une pk
+            case 'DROP PRIMARY KEY':
+                if (
+                    !_sqlite_modifier_table(
+                        $table,
+                        $colonne_origine,
+                        ['key' => ['PRIMARY KEY' => '']],
+                        $serveur
+                    )
+                ) {
+                    return false;
+                }
+                break;
+                // suppression d'une colonne
+            case 'DROP COLUMN':
+            case 'DROP':
+                if (
+                    !_sqlite_modifier_table(
+                        $table,
+                        [$colonne_origine => ''],
+                        [],
+                        $serveur
+                    )
+                ) {
+                    return false;
+                }
+                break;
+
+            case 'CHANGE COLUMN':
+            case 'CHANGE':
+                // recuperer le nom de la future colonne
+                // on reprend la def d'origine car _sqlite_modifier_table va refaire la translation
+                // en tenant compte de la cle primaire (ce qui est mieux)
+                $def = trim($defo);
+                $colonne_destination = substr($def, 0, strpos($def, ' '));
+                $def = substr($def, strlen($colonne_destination) + 1);
+
+                if (
+                    !_sqlite_modifier_table(
+                        $table,
+                        [$colonne_origine => $colonne_destination],
+                        ['field' => [$colonne_destination => $def]],
+                        $serveur
+                    )
+                ) {
+                    return false;
+                }
+                break;
+
+            case 'MODIFY':
+                // on reprend la def d'origine car _sqlite_modifier_table va refaire la translation
+                // en tenant compte de la cle primaire (ce qui est mieux)
+                if (
+                    !_sqlite_modifier_table(
+                        $table,
+                        $colonne_origine,
+                        ['field' => [$colonne_origine => $defo]],
+                        $serveur
+                    )
+                ) {
+                    return false;
+                }
+                break;
+
+                // pas geres en sqlite2
+            case 'RENAME':
+                $do = 'RENAME TO' . substr($do, 6);
+            case 'RENAME TO':
+                if (!Sqlite::executer_requete("$debut $do", $serveur)) {
+                    spip_log("SQLite : Erreur ALTER TABLE / RENAME : $query", 'sqlite.' . _LOG_ERREUR);
+
+                    return false;
+                }
+                break;
+
+                // ajout d'une pk
+            case 'ADD PRIMARY KEY':
+                $pk = trim(substr($do, 16));
+                $pk = ($pk[0] == '(') ? substr($pk, 1, -1) : $pk;
+                if (
+                    !_sqlite_modifier_table(
+                        $table,
+                        $colonne_origine,
+                        ['key' => ['PRIMARY KEY' => $pk]],
+                        $serveur
+                    )
+                ) {
+                    return false;
+                }
+                break;
+                // ajout d'un index
+            case 'ADD UNIQUE KEY':
+            case 'ADD UNIQUE':
+                $unique = true;
+            case 'ADD INDEX':
+            case 'ADD KEY':
+                if (!isset($unique)) {
+                    $unique = false;
+                }
+                // peut etre "(colonne)" ou "nom_index (colonnes)"
+                // bug potentiel si qqn met "(colonne, colonne)"
+                //
+                // nom_index (colonnes)
+                if ($def) {
+                    $colonnes = substr($def, 1, -1);
+                    $nom_index = $colonne_origine;
+                } else {
+                    // (colonne)
+                    if ($colonne_origine[0] == '(') {
+                        $colonnes = substr($colonne_origine, 1, -1);
+                        if (str_contains(',', $colonnes)) {
+                            spip_log('SQLite : Erreur, impossible de creer un index sur plusieurs colonnes'
+                                . " sans qu'il ait de nom ($table, ($colonnes))", 'sqlite.' . _LOG_ERREUR);
+                            break;
+                        } else {
+                            $nom_index = $colonnes;
+                        }
+                    } // nom_index
+                    else {
+                        $nom_index = $colonnes = $colonne_origine;
+                    }
+                }
+                spip_sqlite_create_index($nom_index, $table, $colonnes, $unique, $serveur);
+                break;
+
+                // pas geres en sqlite2
+            case 'ADD COLUMN':
+                $do = 'ADD' . substr($do, 10);
+            case 'ADD':
+            default:
+                if (!preg_match(',primary\s+key,i', $do)) {
+                    if (!Sqlite::executer_requete("$debut $do", $serveur)) {
+                        spip_log("SQLite : Erreur ALTER TABLE / ADD : $query", 'sqlite.' . _LOG_ERREUR);
+
+                        return false;
+                    }
+                    break;
+                }
+                // ou si la colonne est aussi primary key
+                // cas du add id_truc int primary key
+                // ajout d'une colonne qui passe en primary key directe
+                else {
+                    $def = trim(substr($do, 3));
+                    $colonne_ajoutee = substr($def, 0, strpos($def, ' '));
+                    $def = substr($def, strlen($colonne_ajoutee) + 1);
+                    $opts = [];
+                    if (preg_match(',primary\s+key,i', $def)) {
+                        $opts['key'] = ['PRIMARY KEY' => $colonne_ajoutee];
+                        $def = preg_replace(',primary\s+key,i', '', $def);
+                    }
+                    $opts['field'] = [$colonne_ajoutee => $def];
+                    if (!_sqlite_modifier_table($table, [$colonne_ajoutee], $opts, $serveur)) {
+                        spip_log("SQLite : Erreur ALTER TABLE / ADD : $query", 'sqlite.' . _LOG_ERREUR);
+
+                        return false;
+                    }
+                }
+                break;
+        }
+        // tout est bon, ouf !
+        spip_log("SQLite ($serveur) : Changements OK : $debut $do", 'sqlite.' . _LOG_INFO);
+    }
+
+    spip_log("SQLite ($serveur) : fin ALTER TABLE OK !", 'sqlite.' . _LOG_INFO);
+
+    return true;
 }
 
 /**
@@ -452,38 +452,38 @@ 
  *     - true si la requête réussie, false sinon.
  */
 function spip_sqlite_create(
-	$nom,
-	$champs,
-	$cles,
-	$autoinc = false,
-	$temporary = false,
-	$serveur = '',
-	$requeter = true
+    $nom,
+    $champs,
+    $cles,
+    $autoinc = false,
+    $temporary = false,
+    $serveur = '',
+    $requeter = true
 ) {
-	$query = _sqlite_requete_create($nom, $champs, $cles, $autoinc, $temporary, $ifnotexists = true, $serveur, $requeter);
-	if (!$query) {
-		return false;
-	}
-	$res = spip_sqlite_query($query, $serveur, $requeter);
-
-	// SQLite ne cree pas les KEY sur les requetes CREATE TABLE
-	// il faut donc les faire creer ensuite
-	if (!$requeter) {
-		return $res;
-	}
-
-	$ok = $res ? true : false;
-	if ($ok) {
-		foreach ($cles as $k => $v) {
-			if (preg_match(',^(UNIQUE KEY|KEY|UNIQUE)\s,i', $k, $m)) {
-				$index = trim(substr($k, strlen($m[1])));
-				$unique = (strlen($m[1]) > 3);
-				$ok &= spip_sqlite_create_index($index, $nom, $v, $unique, $serveur);
-			}
-		}
-	}
-
-	return $ok ? true : false;
+    $query = _sqlite_requete_create($nom, $champs, $cles, $autoinc, $temporary, $ifnotexists = true, $serveur, $requeter);
+    if (!$query) {
+        return false;
+    }
+    $res = spip_sqlite_query($query, $serveur, $requeter);
+
+    // SQLite ne cree pas les KEY sur les requetes CREATE TABLE
+    // il faut donc les faire creer ensuite
+    if (!$requeter) {
+        return $res;
+    }
+
+    $ok = $res ? true : false;
+    if ($ok) {
+        foreach ($cles as $k => $v) {
+            if (preg_match(',^(UNIQUE KEY|KEY|UNIQUE)\s,i', $k, $m)) {
+                $index = trim(substr($k, strlen($m[1])));
+                $unique = (strlen($m[1]) > 3);
+                $ok &= spip_sqlite_create_index($index, $nom, $v, $unique, $serveur);
+            }
+        }
+    }
+
+    return $ok ? true : false;
 }
 
 /**
@@ -497,21 +497,21 @@ 
  **/
 function spip_sqlite_create_base($nom, $serveur = '', $option = true)
 {
-	$f = $nom . '.sqlite';
-	if (strpos($nom, '/') === false) {
-		$f = _DIR_DB . $f;
-	}
+    $f = $nom . '.sqlite';
+    if (strpos($nom, '/') === false) {
+        $f = _DIR_DB . $f;
+    }
 
-	$ok = new \PDO("sqlite:$f");
+    $ok = new \PDO("sqlite:$f");
 
-	if ($ok) {
-		unset($ok);
+    if ($ok) {
+        unset($ok);
 
-		return true;
-	}
-	unset($ok);
+        return true;
+    }
+    unset($ok);
 
-	return false;
+    return false;
 }
 
 
@@ -533,22 +533,22 @@ 
  */
 function spip_sqlite_create_view($nom, $query_select, $serveur = '', $requeter = true)
 {
-	if (!$query_select) {
-		return false;
-	}
-	// vue deja presente
-	if (sql_showtable($nom, false, $serveur)) {
-		spip_log(
-			"Echec creation d'une vue sql ($nom) car celle-ci existe deja (serveur:$serveur)",
-			'sqlite.' . _LOG_ERREUR
-		);
-
-		return false;
-	}
-
-	$query = "CREATE VIEW $nom AS " . $query_select;
-
-	return spip_sqlite_query($query, $serveur, $requeter);
+    if (!$query_select) {
+        return false;
+    }
+    // vue deja presente
+    if (sql_showtable($nom, false, $serveur)) {
+        spip_log(
+            "Echec creation d'une vue sql ($nom) car celle-ci existe deja (serveur:$serveur)",
+            'sqlite.' . _LOG_ERREUR
+        );
+
+        return false;
+    }
+
+    $query = "CREATE VIEW $nom AS " . $query_select;
+
+    return spip_sqlite_query($query, $serveur, $requeter);
 }
 
 /**
@@ -571,54 +571,54 @@ 
  */
 function spip_sqlite_create_index($nom, $table, $champs, $unique = '', $serveur = '', $requeter = true)
 {
-	if (!($nom or $table or $champs)) {
-		spip_log(
-			"Champ manquant pour creer un index sqlite ($nom, $table, (" . join(',', $champs) . '))',
-			'sqlite.' . _LOG_ERREUR
-		);
-
-		return false;
-	}
-
-	// SQLite ne differentie pas noms des index en fonction des tables
-	// il faut donc creer des noms uniques d'index pour une base sqlite
-	$nom = $table . '_' . $nom;
-	// enlever d'eventuelles parentheses deja presentes sur champs
-	if (!is_array($champs)) {
-		if ($champs[0] == '(') {
-			$champs = substr($champs, 1, -1);
-		}
-		$champs = [$champs];
-		// supprimer l'info de longueur d'index mysql en fin de champ
-		$champs = preg_replace(',\(\d+\)$,', '', $champs);
-	}
-
-	$ifnotexists = '';
-	$version = spip_sqlite_fetch(spip_sqlite_query('select sqlite_version() AS sqlite_version', $serveur), '', $serveur);
-	if (!function_exists('spip_version_compare')) {
-		include_spip('plugins/installer');
-	}
-
-	if ($version and spip_version_compare($version['sqlite_version'], '3.3.0', '>=')) {
-		$ifnotexists = ' IF NOT EXISTS';
-	} else {
-		/* simuler le IF EXISTS - version 2 et sqlite < 3.3a */
-		$a = spip_sqlite_showtable($table, $serveur);
-		if (isset($a['key']['KEY ' . $nom])) {
-			return true;
-		}
-	}
-
-	$query = 'CREATE ' . ($unique ? 'UNIQUE ' : '') . "INDEX$ifnotexists $nom ON $table (" . join(',', $champs) . ')';
-	$res = spip_sqlite_query($query, $serveur, $requeter);
-	if (!$requeter) {
-		return $res;
-	}
-	if ($res) {
-		return true;
-	} else {
-		return false;
-	}
+    if (!($nom or $table or $champs)) {
+        spip_log(
+            "Champ manquant pour creer un index sqlite ($nom, $table, (" . join(',', $champs) . '))',
+            'sqlite.' . _LOG_ERREUR
+        );
+
+        return false;
+    }
+
+    // SQLite ne differentie pas noms des index en fonction des tables
+    // il faut donc creer des noms uniques d'index pour une base sqlite
+    $nom = $table . '_' . $nom;
+    // enlever d'eventuelles parentheses deja presentes sur champs
+    if (!is_array($champs)) {
+        if ($champs[0] == '(') {
+            $champs = substr($champs, 1, -1);
+        }
+        $champs = [$champs];
+        // supprimer l'info de longueur d'index mysql en fin de champ
+        $champs = preg_replace(',\(\d+\)$,', '', $champs);
+    }
+
+    $ifnotexists = '';
+    $version = spip_sqlite_fetch(spip_sqlite_query('select sqlite_version() AS sqlite_version', $serveur), '', $serveur);
+    if (!function_exists('spip_version_compare')) {
+        include_spip('plugins/installer');
+    }
+
+    if ($version and spip_version_compare($version['sqlite_version'], '3.3.0', '>=')) {
+        $ifnotexists = ' IF NOT EXISTS';
+    } else {
+        /* simuler le IF EXISTS - version 2 et sqlite < 3.3a */
+        $a = spip_sqlite_showtable($table, $serveur);
+        if (isset($a['key']['KEY ' . $nom])) {
+            return true;
+        }
+    }
+
+    $query = 'CREATE ' . ($unique ? 'UNIQUE ' : '') . "INDEX$ifnotexists $nom ON $table (" . join(',', $champs) . ')';
+    $res = spip_sqlite_query($query, $serveur, $requeter);
+    if (!$requeter) {
+        return $res;
+    }
+    if ($res) {
+        return true;
+    } else {
+        return false;
+    }
 }
 
 /**
@@ -636,31 +636,31 @@ 
  */
 function spip_sqlite_count($r, $serveur = '', $requeter = true)
 {
-	if (!$r) {
-		return 0;
-	}
-
-	// select ou autre (insert, update,...) ?
-	// (link,requete) a compter
-	if (is_array($r->spipSqliteRowCount)) {
-		list($link, $query) = $r->spipSqliteRowCount;
-		// amelioration possible a tester intensivement : pas de order by pour compter !
-		// $query = preg_replace(",ORDER BY .+(LIMIT\s|HAVING\s|GROUP BY\s|$),Uims","\\1",$query);
-		$query = "SELECT count(*) as zzzzsqlitecount FROM ($query)";
-		$l = $link->query($query);
-		$i = 0;
-		if ($l and $z = $l->fetch()) {
-			$i = (int) $z['zzzzsqlitecount'];
-		}
-		$r->spipSqliteRowCount = $i;
-	}
-	if (isset($r->spipSqliteRowCount)) {
-		// Ce compte est faux s'il y a des limit dans la requete :(
-		// il retourne le nombre d'enregistrements sans le limit
-		return $r->spipSqliteRowCount;
-	} else {
-		return $r->rowCount();
-	}
+    if (!$r) {
+        return 0;
+    }
+
+    // select ou autre (insert, update,...) ?
+    // (link,requete) a compter
+    if (is_array($r->spipSqliteRowCount)) {
+        list($link, $query) = $r->spipSqliteRowCount;
+        // amelioration possible a tester intensivement : pas de order by pour compter !
+        // $query = preg_replace(",ORDER BY .+(LIMIT\s|HAVING\s|GROUP BY\s|$),Uims","\\1",$query);
+        $query = "SELECT count(*) as zzzzsqlitecount FROM ($query)";
+        $l = $link->query($query);
+        $i = 0;
+        if ($l and $z = $l->fetch()) {
+            $i = (int) $z['zzzzsqlitecount'];
+        }
+        $r->spipSqliteRowCount = $i;
+    }
+    if (isset($r->spipSqliteRowCount)) {
+        // Ce compte est faux s'il y a des limit dans la requete :(
+        // il retourne le nombre d'enregistrements sans le limit
+        return $r->spipSqliteRowCount;
+    } else {
+        return $r->rowCount();
+    }
 }
 
 
@@ -679,31 +679,31 @@ 
  *     - false si la requête a échouée
  **/
 function spip_sqlite_countsel(
-	$from = [],
-	$where = [],
-	$groupby = '',
-	$having = [],
-	$serveur = '',
-	$requeter = true
+    $from = [],
+    $where = [],
+    $groupby = '',
+    $having = [],
+    $serveur = '',
+    $requeter = true
 ) {
-	$c = !$groupby ? '*' : ('DISTINCT ' . (is_string($groupby) ? $groupby : join(',', $groupby)));
-	$r = spip_sqlite_select(
-		"COUNT($c)",
-		$from,
-		$where,
-		'',
-		'',
-		'',
-		$having,
-		$serveur,
-		$requeter
-	);
-	if ((is_resource($r) or is_object($r)) && $requeter) { // ressource : sqlite2, object : sqlite3
-		[$r] = spip_sqlite_fetch($r, SPIP_SQLITE3_NUM, $serveur);
-		$r = (int) $r;
-	}
-
-	return $r;
+    $c = !$groupby ? '*' : ('DISTINCT ' . (is_string($groupby) ? $groupby : join(',', $groupby)));
+    $r = spip_sqlite_select(
+        "COUNT($c)",
+        $from,
+        $where,
+        '',
+        '',
+        '',
+        $having,
+        $serveur,
+        $requeter
+    );
+    if ((is_resource($r) or is_object($r)) && $requeter) { // ressource : sqlite2, object : sqlite3
+        [$r] = spip_sqlite_fetch($r, SPIP_SQLITE3_NUM, $serveur);
+        $r = (int) $r;
+    }
+
+    return $r;
 }
 
 
@@ -721,24 +721,24 @@ 
  **/
 function spip_sqlite_delete($table, $where = '', $serveur = '', $requeter = true)
 {
-	$res = spip_sqlite_query(
-		_sqlite_calculer_expression('DELETE FROM', $table, ',')
-			. _sqlite_calculer_expression('WHERE', $where),
-		$serveur,
-		$requeter
-	);
-
-	// renvoyer la requete inerte si demandee
-	if (!$requeter) {
-		return $res;
-	}
-
-	if ($res) {
-		$link = _sqlite_link($serveur);
-		return $res->rowCount();
-	} else {
-		return false;
-	}
+    $res = spip_sqlite_query(
+        _sqlite_calculer_expression('DELETE FROM', $table, ',')
+            . _sqlite_calculer_expression('WHERE', $where),
+        $serveur,
+        $requeter
+    );
+
+    // renvoyer la requete inerte si demandee
+    if (!$requeter) {
+        return $res;
+    }
+
+    if ($res) {
+        $link = _sqlite_link($serveur);
+        return $res->rowCount();
+    } else {
+        return false;
+    }
 }
 
 
@@ -755,15 +755,15 @@ 
  */
 function spip_sqlite_drop_table($table, $exist = '', $serveur = '', $requeter = true)
 {
-	if ($exist) {
-		$exist = ' IF EXISTS';
-	}
-
-	if (spip_sqlite_query("DROP TABLE$exist $table", $serveur, $requeter)) {
-		return true;
-	} else {
-		return false;
-	}
+    if ($exist) {
+        $exist = ' IF EXISTS';
+    }
+
+    if (spip_sqlite_query("DROP TABLE$exist $table", $serveur, $requeter)) {
+        return true;
+    } else {
+        return false;
+    }
 }
 
 
@@ -780,11 +780,11 @@ 
  */
 function spip_sqlite_drop_view($view, $exist = '', $serveur = '', $requeter = true)
 {
-	if ($exist) {
-		$exist = ' IF EXISTS';
-	}
+    if ($exist) {
+        $exist = ' IF EXISTS';
+    }
 
-	return spip_sqlite_query("DROP VIEW$exist $view", $serveur, $requeter);
+    return spip_sqlite_query("DROP VIEW$exist $view", $serveur, $requeter);
 }
 
 /**
@@ -799,20 +799,20 @@ 
  */
 function spip_sqlite_drop_index($nom, $table, $serveur = '', $requeter = true)
 {
-	if (!($nom or $table)) {
-		spip_log("Champ manquant pour supprimer un index sqlite ($nom, $table)", 'sqlite.' . _LOG_ERREUR);
+    if (!($nom or $table)) {
+        spip_log("Champ manquant pour supprimer un index sqlite ($nom, $table)", 'sqlite.' . _LOG_ERREUR);
 
-		return false;
-	}
+        return false;
+    }
 
-	// SQLite ne differentie pas noms des index en fonction des tables
-	// il faut donc creer des noms uniques d'index pour une base sqlite
-	$index = $table . '_' . $nom;
-	$exist = ' IF EXISTS';
+    // SQLite ne differentie pas noms des index en fonction des tables
+    // il faut donc creer des noms uniques d'index pour une base sqlite
+    $index = $table . '_' . $nom;
+    $exist = ' IF EXISTS';
 
-	$query = "DROP INDEX$exist $index";
+    $query = "DROP INDEX$exist $index";
 
-	return spip_sqlite_query($query, $serveur, $requeter);
+    return spip_sqlite_query($query, $serveur, $requeter);
 }
 
 /**
@@ -829,29 +829,29 @@ 
  **/
 function spip_sqlite_error($query = '', $serveur = '')
 {
-	$link = _sqlite_link($serveur);
-
-	if ($link) {
-		$errs = $link->errorInfo();
-		$s = _sqlite_last_error_from_link($link);
-	} else {
-		$s = ': aucune ressource sqlite (link)';
-	}
-	if ($s) {
-		$trace = debug_backtrace();
-		if ($trace[0]['function'] != 'spip_sqlite_error') {
-			spip_log("$s - $query - " . sql_error_backtrace(), 'sqlite.' . _LOG_ERREUR);
-		}
-	}
-
-	return $s;
+    $link = _sqlite_link($serveur);
+
+    if ($link) {
+        $errs = $link->errorInfo();
+        $s = _sqlite_last_error_from_link($link);
+    } else {
+        $s = ': aucune ressource sqlite (link)';
+    }
+    if ($s) {
+        $trace = debug_backtrace();
+        if ($trace[0]['function'] != 'spip_sqlite_error') {
+            spip_log("$s - $query - " . sql_error_backtrace(), 'sqlite.' . _LOG_ERREUR);
+        }
+    }
+
+    return $s;
 }
 
 function _sqlite_last_error_from_link($link)
 {
-	if ($link) {
-		$errs = $link->errorInfo();
-		/*
+    if ($link) {
+        $errs = $link->errorInfo();
+        /*
 			$errs[0]
 				numero SQLState ('HY000' souvent lors d'une erreur)
 				http://www.easysoft.com/developer/interfaces/odbc/sqlstate_status_return_codes.html
@@ -861,11 +861,11 @@ 
 			$errs[2]
 				Le texte du message d'erreur
 		*/
-		if (ltrim($errs[0], '0')) { // 00000 si pas d'erreur
-			return "$errs[2]";
-		}
-	}
-	return '';
+        if (ltrim($errs[0], '0')) { // 00000 si pas d'erreur
+            return "$errs[2]";
+        }
+    }
+    return '';
 }
 
 /**
@@ -883,23 +883,23 @@ 
  **/
 function spip_sqlite_errno($serveur = '')
 {
-	$link = _sqlite_link($serveur);
-
-	if ($link) {
-		$t = $link->errorInfo();
-		$s = ltrim($t[0], '0'); // 00000 si pas d'erreur
-		if ($s) {
-			$s .= ' / ' . $t[1];
-		} // ajoute l'erreur du moteur SQLite
-	} else {
-		$s = ': aucune ressource sqlite (link)';
-	}
-
-	if ($s) {
-		spip_log("Erreur sqlite $s", 'sqlite.' . _LOG_ERREUR);
-	}
-
-	return $s ? $s : 0;
+    $link = _sqlite_link($serveur);
+
+    if ($link) {
+        $t = $link->errorInfo();
+        $s = ltrim($t[0], '0'); // 00000 si pas d'erreur
+        if ($s) {
+            $s .= ' / ' . $t[1];
+        } // ajoute l'erreur du moteur SQLite
+    } else {
+        $s = ': aucune ressource sqlite (link)';
+    }
+
+    if ($s) {
+        spip_log("Erreur sqlite $s", 'sqlite.' . _LOG_ERREUR);
+    }
+
+    return $s ? $s : 0;
 }
 
 
@@ -916,19 +916,19 @@ 
  */
 function spip_sqlite_explain($query, $serveur = '', $requeter = true)
 {
-	if (strpos(ltrim($query), 'SELECT') !== 0) {
-		return [];
-	}
-
-	$query = Sqlite::traduire_requete($query, $serveur);
-	$query = 'EXPLAIN ' . $query;
-	if (!$requeter) {
-		return $query;
-	}
-	// on ne trace pas ces requetes, sinon on obtient un tracage sans fin...
-	$r = Sqlite::executer_requete($query, $serveur, false);
-
-	return $r ? spip_sqlite_fetch($r, null, $serveur) : false; // hum ? etrange ca... a verifier
+    if (strpos(ltrim($query), 'SELECT') !== 0) {
+        return [];
+    }
+
+    $query = Sqlite::traduire_requete($query, $serveur);
+    $query = 'EXPLAIN ' . $query;
+    if (!$requeter) {
+        return $query;
+    }
+    // on ne trace pas ces requetes, sinon on obtient un tracage sans fin...
+    $r = Sqlite::executer_requete($query, $serveur, false);
+
+    return $r ? spip_sqlite_fetch($r, null, $serveur) : false; // hum ? etrange ca... a verifier
 }
 
 
@@ -949,35 +949,35 @@ 
 function spip_sqlite_fetch($r, $t = '', $serveur = '', $requeter = true)
 {
 
-	$link = _sqlite_link($serveur);
-	$t = $t ? $t : SPIP_SQLITE3_ASSOC;
-
-	if (!$r) {
-		return false;
-	}
-
-	$retour = $r->fetch($t);
-
-	if (!$retour) {
-		if ($r->errorCode() === '00000') {
-			return null;
-		}
-		return false;
-	}
-
-	// Renvoie des 'table.titre' au lieu de 'titre' tout court ! pff !
-	// suppression de 'table.' pour toutes les cles (c'est un peu violent !)
-	// c'est couteux : on ne verifie que la premiere ligne pour voir si on le fait ou non
-	if (str_contains(implode('', array_keys($retour)), '.')) {
-		foreach ($retour as $cle => $val) {
-			if (($pos = strpos($cle, '.')) !== false) {
-				$retour[substr($cle, $pos + 1)] = &$retour[$cle];
-				unset($retour[$cle]);
-			}
-		}
-	}
-
-	return $retour;
+    $link = _sqlite_link($serveur);
+    $t = $t ? $t : SPIP_SQLITE3_ASSOC;
+
+    if (!$r) {
+        return false;
+    }
+
+    $retour = $r->fetch($t);
+
+    if (!$retour) {
+        if ($r->errorCode() === '00000') {
+            return null;
+        }
+        return false;
+    }
+
+    // Renvoie des 'table.titre' au lieu de 'titre' tout court ! pff !
+    // suppression de 'table.' pour toutes les cles (c'est un peu violent !)
+    // c'est couteux : on ne verifie que la premiere ligne pour voir si on le fait ou non
+    if (str_contains(implode('', array_keys($retour)), '.')) {
+        foreach ($retour as $cle => $val) {
+            if (($pos = strpos($cle, '.')) !== false) {
+                $retour[substr($cle, $pos + 1)] = &$retour[$cle];
+                unset($retour[$cle]);
+            }
+        }
+    }
+
+    return $retour;
 }
 
 /**
@@ -991,8 +991,8 @@ 
  **/
 function spip_sqlite_seek($r, $row_number, $serveur = '', $requeter = true)
 {
-	// encore un truc de bien fichu : PDO ne PEUT PAS faire de seek ou de rewind...
-	return false;
+    // encore un truc de bien fichu : PDO ne PEUT PAS faire de seek ou de rewind...
+    return false;
 }
 
 
@@ -1009,10 +1009,10 @@ 
  */
 function spip_sqlite_free(&$r, $serveur = '', $requeter = true)
 {
-	unset($r);
+    unset($r);
 
-	return true;
-	//return sqlite_free_result($r);
+    return true;
+    //return sqlite_free_result($r);
 }
 
 
@@ -1028,8 +1028,8 @@ 
  */
 function spip_sqlite_get_charset($charset = [], $serveur = '', $requeter = true)
 {
-	//$c = !$charset ? '' : (" LIKE "._q($charset['charset']));
-	//return spip_sqlite_fetch(sqlite_query(_sqlite_link($serveur), "SHOW CHARACTER SET$c"), NULL, $serveur);
+    //$c = !$charset ? '' : (" LIKE "._q($charset['charset']));
+    //return spip_sqlite_fetch(sqlite_query(_sqlite_link($serveur), "SHOW CHARACTER SET$c"), NULL, $serveur);
 }
 
 
@@ -1045,7 +1045,7 @@ 
  **/
 function spip_sqlite_hex($v)
 {
-	return hexdec($v);
+    return hexdec($v);
 }
 
 
@@ -1068,7 +1068,7 @@ 
  **/
 function spip_sqlite_in($val, $valeurs, $not = '', $serveur = '', $requeter = true)
 {
-	return "($val $not IN ($valeurs))";
+    return "($val $not IN ($valeurs))";
 }
 
 
@@ -1097,20 +1097,20 @@ 
 function spip_sqlite_insert($table, $champs, $valeurs, $desc = [], $serveur = '', $requeter = true)
 {
 
-	$query = "INSERT INTO $table " . ($champs ? "$champs VALUES $valeurs" : 'DEFAULT VALUES');
-	if ($r = spip_sqlite_query($query, $serveur, $requeter)) {
-		if (!$requeter) {
-			return $r;
-		}
-		$nb = Sqlite::last_insert_id($serveur);
-	} else {
-		$nb = false;
-	}
+    $query = "INSERT INTO $table " . ($champs ? "$champs VALUES $valeurs" : 'DEFAULT VALUES');
+    if ($r = spip_sqlite_query($query, $serveur, $requeter)) {
+        if (!$requeter) {
+            return $r;
+        }
+        $nb = Sqlite::last_insert_id($serveur);
+    } else {
+        $nb = false;
+    }
 
-	$err = spip_sqlite_error($query, $serveur);
+    $err = spip_sqlite_error($query, $serveur);
 
-	// cas particulier : ne pas substituer la reponse spip_sqlite_query si on est en profilage
-	return isset($_GET['var_profile']) ? $r : $nb;
+    // cas particulier : ne pas substituer la reponse spip_sqlite_query si on est en profilage
+    return isset($_GET['var_profile']) ? $r : $nb;
 }
 
 
@@ -1136,28 +1136,28 @@ 
  **/
 function spip_sqlite_insertq($table, $couples = [], $desc = [], $serveur = '', $requeter = true)
 {
-	if (!$desc) {
-		$desc = description_table($table, $serveur);
-	}
-	if (!$desc) {
-		die("$table insertion sans description");
-	}
-	$fields = isset($desc['field']) ? $desc['field'] : [];
-
-	foreach ($couples as $champ => $val) {
-		$couples[$champ] = _sqlite_calculer_cite($val, $fields[$champ]);
-	}
-
-	// recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
-	$couples = _sqlite_ajouter_champs_timestamp($table, $couples, $desc, $serveur);
-
-	$cles = $valeurs = '';
-	if (count($couples)) {
-		$cles = '(' . join(',', array_keys($couples)) . ')';
-		$valeurs = '(' . join(',', $couples) . ')';
-	}
-
-	return spip_sqlite_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'] : [];
+
+    foreach ($couples as $champ => $val) {
+        $couples[$champ] = _sqlite_calculer_cite($val, $fields[$champ]);
+    }
+
+    // recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
+    $couples = _sqlite_ajouter_champs_timestamp($table, $couples, $desc, $serveur);
+
+    $cles = $valeurs = '';
+    if (count($couples)) {
+        $cles = '(' . join(',', array_keys($couples)) . ')';
+        $valeurs = '(' . join(',', $couples) . ')';
+    }
+
+    return spip_sqlite_insert($table, $cles, $valeurs, $desc, $serveur, $requeter);
 }
 
 
@@ -1182,70 +1182,70 @@ 
  **/
 function spip_sqlite_insertq_multi($table, $tab_couples = [], $desc = [], $serveur = '', $requeter = true)
 {
-	if (!$desc) {
-		$desc = description_table($table, $serveur);
-	}
-	if (!$desc) {
-		die("$table insertion sans description");
-	}
-	if (!isset($desc['field'])) {
-		$desc['field'] = [];
-	}
-
-	// recuperer les champs 'timestamp' pour mise a jour auto de ceux-ci
-	$maj = _sqlite_ajouter_champs_timestamp($table, [], $desc, $serveur);
-
-	// seul le nom de la table est a traduire ici :
-	// le faire une seule fois au debut
-	$query_start = "INSERT INTO $table ";
-	$query_start = Sqlite::traduire_requete($query_start, $serveur);
-
-	// ouvrir une transaction
-	if ($requeter) {
-		Sqlite::demarrer_transaction($serveur);
-	}
-
-	while ($couples = array_shift($tab_couples)) {
-		foreach ($couples as $champ => $val) {
-			$couples[$champ] = _sqlite_calculer_cite($val, $desc['field'][$champ]);
-		}
-
-		// inserer les champs timestamp par defaut
-		$couples = array_merge($maj, $couples);
-
-		$champs = $valeurs = '';
-		if (count($couples)) {
-			$champs = '(' . join(',', array_keys($couples)) . ')';
-			$valeurs = '(' . join(',', $couples) . ')';
-			$query = $query_start . "$champs VALUES $valeurs";
-		} else {
-			$query = $query_start . 'DEFAULT VALUES';
-		}
-
-		if ($requeter) {
-			$retour = Sqlite::executer_requete($query, $serveur);
-		}
-
-		// sur le dernier couple uniquement
-		if (!count($tab_couples)) {
-			$nb = 0;
-			if ($requeter) {
-				$nb = Sqlite::last_insert_id($serveur);
-			} else {
-				return $query;
-			}
-		}
-
-		$err = spip_sqlite_error($query, $serveur);
-	}
-
-	if ($requeter) {
-		Sqlite::finir_transaction($serveur);
-	}
-
-	// renvoie le dernier id d'autoincrement ajoute
-	// cas particulier : ne pas substituer la reponse spip_sqlite_query si on est en profilage
-	return isset($_GET['var_profile']) ? $retour : $nb;
+    if (!$desc) {
+        $desc = description_table($table, $serveur);
+    }
+    if (!$desc) {
+        die("$table insertion sans description");
+    }
+    if (!isset($desc['field'])) {
+        $desc['field'] = [];
+    }
+
+    // recuperer les champs 'timestamp' pour mise a jour auto de ceux-ci
+    $maj = _sqlite_ajouter_champs_timestamp($table, [], $desc, $serveur);
+
+    // seul le nom de la table est a traduire ici :
+    // le faire une seule fois au debut
+    $query_start = "INSERT INTO $table ";
+    $query_start = Sqlite::traduire_requete($query_start, $serveur);
+
+    // ouvrir une transaction
+    if ($requeter) {
+        Sqlite::demarrer_transaction($serveur);
+    }
+
+    while ($couples = array_shift($tab_couples)) {
+        foreach ($couples as $champ => $val) {
+            $couples[$champ] = _sqlite_calculer_cite($val, $desc['field'][$champ]);
+        }
+
+        // inserer les champs timestamp par defaut
+        $couples = array_merge($maj, $couples);
+
+        $champs = $valeurs = '';
+        if (count($couples)) {
+            $champs = '(' . join(',', array_keys($couples)) . ')';
+            $valeurs = '(' . join(',', $couples) . ')';
+            $query = $query_start . "$champs VALUES $valeurs";
+        } else {
+            $query = $query_start . 'DEFAULT VALUES';
+        }
+
+        if ($requeter) {
+            $retour = Sqlite::executer_requete($query, $serveur);
+        }
+
+        // sur le dernier couple uniquement
+        if (!count($tab_couples)) {
+            $nb = 0;
+            if ($requeter) {
+                $nb = Sqlite::last_insert_id($serveur);
+            } else {
+                return $query;
+            }
+        }
+
+        $err = spip_sqlite_error($query, $serveur);
+    }
+
+    if ($requeter) {
+        Sqlite::finir_transaction($serveur);
+    }
+
+    // renvoie le dernier id d'autoincrement ajoute
+    // cas particulier : ne pas substituer la reponse spip_sqlite_query si on est en profilage
+    return isset($_GET['var_profile']) ? $retour : $nb;
 }
 
 
@@ -1261,7 +1261,7 @@ 
  **/
 function spip_sqlite_preferer_transaction($serveur = '', $requeter = true)
 {
-	return true;
+    return true;
 }
 
 /**
@@ -1279,12 +1279,12 @@ 
  **/
 function spip_sqlite_demarrer_transaction($serveur = '', $requeter = true)
 {
-	if (!$requeter) {
-		return 'BEGIN TRANSACTION';
-	}
-	Sqlite::demarrer_transaction($serveur);
+    if (!$requeter) {
+        return 'BEGIN TRANSACTION';
+    }
+    Sqlite::demarrer_transaction($serveur);
 
-	return true;
+    return true;
 }
 
 /**
@@ -1299,12 +1299,12 @@ 
  **/
 function spip_sqlite_terminer_transaction($serveur = '', $requeter = true)
 {
-	if (!$requeter) {
-		return 'COMMIT';
-	}
-	Sqlite::finir_transaction($serveur);
+    if (!$requeter) {
+        return 'COMMIT';
+    }
+    Sqlite::finir_transaction($serveur);
 
-	return true;
+    return true;
 }
 
 
@@ -1320,27 +1320,27 @@ 
  **/
 function spip_sqlite_listdbs($serveur = '', $requeter = true)
 {
-	_sqlite_init();
-
-	if (!is_dir($d = substr(_DIR_DB, 0, -1))) {
-		return [];
-	}
-
-	include_spip('inc/flock');
-	$bases = preg_files($d, $pattern = '(.*)\.sqlite$');
-	$bds = [];
-
-	foreach ($bases as $b) {
-		// pas de bases commencant pas sqlite
-		// (on s'en sert pour l'installation pour simuler la presence d'un serveur)
-		// les bases sont de la forme _sqliteX_tmp_spip_install.sqlite
-		if (strpos($b, '_sqlite')) {
-			continue;
-		}
-		$bds[] = preg_replace(";.*/$pattern;iS", '$1', $b);
-	}
-
-	return $bds;
+    _sqlite_init();
+
+    if (!is_dir($d = substr(_DIR_DB, 0, -1))) {
+        return [];
+    }
+
+    include_spip('inc/flock');
+    $bases = preg_files($d, $pattern = '(.*)\.sqlite$');
+    $bds = [];
+
+    foreach ($bases as $b) {
+        // pas de bases commencant pas sqlite
+        // (on s'en sert pour l'installation pour simuler la presence d'un serveur)
+        // les bases sont de la forme _sqliteX_tmp_spip_install.sqlite
+        if (strpos($b, '_sqlite')) {
+            continue;
+        }
+        $bds[] = preg_replace(";.*/$pattern;iS", '$1', $b);
+    }
+
+    return $bds;
 }
 
 
@@ -1356,9 +1356,9 @@ 
  */
 function spip_sqlite_multi($objet, $lang)
 {
-	$r = 'EXTRAIRE_MULTI(' . $objet . ", '" . $lang . "') AS multi";
+    $r = 'EXTRAIRE_MULTI(' . $objet . ", '" . $lang . "') AS multi";
 
-	return $r;
+    return $r;
 }
 
 
@@ -1376,15 +1376,15 @@ 
  **/
 function spip_sqlite_optimize($table, $serveur = '', $requeter = true)
 {
-	static $do = false;
-	if ($requeter and $do) {
-		return true;
-	}
-	if ($requeter) {
-		$do = true;
-	}
-
-	return spip_sqlite_query('VACUUM', $serveur, $requeter);
+    static $do = false;
+    if ($requeter and $do) {
+        return true;
+    }
+    if ($requeter) {
+        $do = true;
+    }
+
+    return spip_sqlite_query('VACUUM', $serveur, $requeter);
 }
 
 
@@ -1402,15 +1402,15 @@ 
  */
 function spip_sqlite_quote($v, $type = '')
 {
-	if (!is_array($v)) {
-		return _sqlite_calculer_cite($v, $type);
-	}
-	// si c'est un tableau, le parcourir en propageant le type
-	foreach ($v as $k => $r) {
-		$v[$k] = spip_sqlite_quote($r, $type);
-	}
-
-	return join(',', $v);
+    if (!is_array($v)) {
+        return _sqlite_calculer_cite($v, $type);
+    }
+    // si c'est un tableau, le parcourir en propageant le type
+    foreach ($v as $k => $r) {
+        $v[$k] = spip_sqlite_quote($r, $type);
+    }
+
+    return join(',', $v);
 }
 
 
@@ -1428,9 +1428,9 @@ 
  **/
 function spip_sqlite_date_proche($champ, $interval, $unite)
 {
-	$op = (($interval <= 0) ? '>' : '<');
+    $op = (($interval <= 0) ? '>' : '<');
 
-	return "($champ $op datetime('" . date('Y-m-d H:i:s') . "', '$interval $unite'))";
+    return "($champ $op datetime('" . date('Y-m-d H:i:s') . "', '$interval $unite'))";
 }
 
 
@@ -1449,48 +1449,48 @@ 
  */
 function spip_sqlite_repair($table, $serveur = '', $requeter = true)
 {
-	if (
-		$desc = spip_sqlite_showtable($table, $serveur)
-		and isset($desc['field'])
-		and is_array($desc['field'])
-	) {
-		foreach ($desc['field'] as $c => $d) {
-			if (
-				preg_match(',^(tinytext|mediumtext|text|longtext|varchar|char),i', $d)
-				and stripos($d, 'NOT NULL') !== false
-				and stripos($d, 'DEFAULT') === false
-				/* pas touche aux cles primaires */
-				and (!isset($desc['key']['PRIMARY KEY']) or $desc['key']['PRIMARY KEY'] !== $c)
-			) {
-				spip_sqlite_alter($q = "TABLE $table CHANGE $c $c $d DEFAULT ''", $serveur);
-				spip_log("ALTER $q", 'repair' . _LOG_INFO_IMPORTANTE);
-			}
-			if (
-				preg_match(',^(INTEGER),i', $d)
-				and stripos($d, 'NOT NULL') !== false
-				and stripos($d, 'DEFAULT') === false
-				/* pas touche aux cles primaires */
-				and (!isset($desc['key']['PRIMARY KEY']) or $desc['key']['PRIMARY KEY'] !== $c)
-			) {
-				spip_sqlite_alter($q = "TABLE $table CHANGE $c $c $d DEFAULT '0'", $serveur);
-				spip_log("ALTER $q", 'repair' . _LOG_INFO_IMPORTANTE);
-			}
-			if (
-				preg_match(',^(datetime),i', $d)
-				and stripos($d, 'NOT NULL') !== false
-				and stripos($d, 'DEFAULT') === false
-				/* pas touche aux cles primaires */
-				and (!isset($desc['key']['PRIMARY KEY']) or $desc['key']['PRIMARY KEY'] !== $c)
-			) {
-				spip_sqlite_alter($q = "TABLE $table CHANGE $c $c $d DEFAULT '0000-00-00 00:00:00'", $serveur);
-				spip_log("ALTER $q", 'repair' . _LOG_INFO_IMPORTANTE);
-			}
-		}
-
-		return [' OK '];
-	}
-
-	return [' ERROR '];
+    if (
+        $desc = spip_sqlite_showtable($table, $serveur)
+        and isset($desc['field'])
+        and is_array($desc['field'])
+    ) {
+        foreach ($desc['field'] as $c => $d) {
+            if (
+                preg_match(',^(tinytext|mediumtext|text|longtext|varchar|char),i', $d)
+                and stripos($d, 'NOT NULL') !== false
+                and stripos($d, 'DEFAULT') === false
+                /* pas touche aux cles primaires */
+                and (!isset($desc['key']['PRIMARY KEY']) or $desc['key']['PRIMARY KEY'] !== $c)
+            ) {
+                spip_sqlite_alter($q = "TABLE $table CHANGE $c $c $d DEFAULT ''", $serveur);
+                spip_log("ALTER $q", 'repair' . _LOG_INFO_IMPORTANTE);
+            }
+            if (
+                preg_match(',^(INTEGER),i', $d)
+                and stripos($d, 'NOT NULL') !== false
+                and stripos($d, 'DEFAULT') === false
+                /* pas touche aux cles primaires */
+                and (!isset($desc['key']['PRIMARY KEY']) or $desc['key']['PRIMARY KEY'] !== $c)
+            ) {
+                spip_sqlite_alter($q = "TABLE $table CHANGE $c $c $d DEFAULT '0'", $serveur);
+                spip_log("ALTER $q", 'repair' . _LOG_INFO_IMPORTANTE);
+            }
+            if (
+                preg_match(',^(datetime),i', $d)
+                and stripos($d, 'NOT NULL') !== false
+                and stripos($d, 'DEFAULT') === false
+                /* pas touche aux cles primaires */
+                and (!isset($desc['key']['PRIMARY KEY']) or $desc['key']['PRIMARY KEY'] !== $c)
+            ) {
+                spip_sqlite_alter($q = "TABLE $table CHANGE $c $c $d DEFAULT '0000-00-00 00:00:00'", $serveur);
+                spip_log("ALTER $q", 'repair' . _LOG_INFO_IMPORTANTE);
+            }
+        }
+
+        return [' OK '];
+    }
+
+    return [' ERROR '];
 }
 
 
@@ -1520,25 +1520,25 @@ 
  **/
 function spip_sqlite_replace($table, $couples, $desc = [], $serveur = '', $requeter = true)
 {
-	if (!$desc) {
-		$desc = description_table($table, $serveur);
-	}
-	if (!$desc) {
-		die("$table insertion sans description");
-	}
-	$fields = isset($desc['field']) ? $desc['field'] : [];
-
-	foreach ($couples as $champ => $val) {
-		$couples[$champ] = _sqlite_calculer_cite($val, $fields[$champ]);
-	}
-
-	// recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
-	$couples = _sqlite_ajouter_champs_timestamp($table, $couples, $desc, $serveur);
-
-	return spip_sqlite_query("REPLACE INTO $table (" . join(',', array_keys($couples)) . ') VALUES (' . join(
-		',',
-		$couples
-	) . ')', $serveur);
+    if (!$desc) {
+        $desc = description_table($table, $serveur);
+    }
+    if (!$desc) {
+        die("$table insertion sans description");
+    }
+    $fields = isset($desc['field']) ? $desc['field'] : [];
+
+    foreach ($couples as $champ => $val) {
+        $couples[$champ] = _sqlite_calculer_cite($val, $fields[$champ]);
+    }
+
+    // recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
+    $couples = _sqlite_ajouter_champs_timestamp($table, $couples, $desc, $serveur);
+
+    return spip_sqlite_query("REPLACE INTO $table (" . join(',', array_keys($couples)) . ') VALUES (' . join(
+        ',',
+        $couples
+    ) . ')', $serveur);
 }
 
 
@@ -1569,13 +1569,13 @@ 
 function spip_sqlite_replace_multi($table, $tab_couples, $desc = [], $serveur = '', $requeter = true)
 {
 
-	// boucler pour trainter chaque requete independemment
-	foreach ($tab_couples as $couples) {
-		$retour = spip_sqlite_replace($table, $couples, $desc, $serveur, $requeter);
-	}
+    // boucler pour trainter chaque requete independemment
+    foreach ($tab_couples as $couples) {
+        $retour = spip_sqlite_replace($table, $couples, $desc, $serveur, $requeter);
+    }
 
-	// renvoie le dernier id
-	return $retour;
+    // renvoie le dernier id
+    return $retour;
 }
 
 
@@ -1602,44 +1602,44 @@ 
  *     - array  : Tableau décrivant requête et temps d'exécution si var_profile actif pour tracer.
  */
 function spip_sqlite_select(
-	$select,
-	$from,
-	$where = '',
-	$groupby = '',
-	$orderby = '',
-	$limit = '',
-	$having = '',
-	$serveur = '',
-	$requeter = true
+    $select,
+    $from,
+    $where = '',
+    $groupby = '',
+    $orderby = '',
+    $limit = '',
+    $having = '',
+    $serveur = '',
+    $requeter = true
 ) {
 
-	// version() n'est pas connu de sqlite
-	$select = str_replace('version()', 'sqlite_version()', $select);
-
-	// recomposer from
-	$from = (!is_array($from) ? $from : _sqlite_calculer_select_as($from));
-
-	$query =
-		_sqlite_calculer_expression('SELECT', $select, ', ')
-		. _sqlite_calculer_expression('FROM', $from, ', ')
-		. _sqlite_calculer_expression('WHERE', $where)
-		. _sqlite_calculer_expression('GROUP BY', $groupby, ',')
-		. _sqlite_calculer_expression('HAVING', $having)
-		. ($orderby ? ("\nORDER BY " . _sqlite_calculer_order($orderby)) : '')
-		. ($limit ? "\nLIMIT $limit" : '');
-
-	// dans un select, on doit renvoyer la requête en cas d'erreur
-	$res = spip_sqlite_query($query, $serveur, $requeter);
-	// texte de la requete demande ?
-	if (!$requeter) {
-		return $res;
-	}
-	// erreur survenue ?
-	if ($res === false) {
-		return Sqlite::traduire_requete($query, $serveur);
-	}
-
-	return $res;
+    // version() n'est pas connu de sqlite
+    $select = str_replace('version()', 'sqlite_version()', $select);
+
+    // recomposer from
+    $from = (!is_array($from) ? $from : _sqlite_calculer_select_as($from));
+
+    $query =
+        _sqlite_calculer_expression('SELECT', $select, ', ')
+        . _sqlite_calculer_expression('FROM', $from, ', ')
+        . _sqlite_calculer_expression('WHERE', $where)
+        . _sqlite_calculer_expression('GROUP BY', $groupby, ',')
+        . _sqlite_calculer_expression('HAVING', $having)
+        . ($orderby ? ("\nORDER BY " . _sqlite_calculer_order($orderby)) : '')
+        . ($limit ? "\nLIMIT $limit" : '');
+
+    // dans un select, on doit renvoyer la requête en cas d'erreur
+    $res = spip_sqlite_query($query, $serveur, $requeter);
+    // texte de la requete demande ?
+    if (!$requeter) {
+        return $res;
+    }
+    // erreur survenue ?
+    if ($res === false) {
+        return Sqlite::traduire_requete($query, $serveur);
+    }
+
+    return $res;
 }
 
 
@@ -1659,32 +1659,32 @@ 
  **/
 function spip_sqlite_selectdb($db, $serveur = '', $requeter = true)
 {
-	_sqlite_init();
-
-	// interdire la creation d'une nouvelle base,
-	// sauf si on est dans l'installation
-	if (
-		!is_file($f = _DIR_DB . $db . '.sqlite')
-		&& (!defined('_ECRIRE_INSTALL') || !_ECRIRE_INSTALL)
-	) {
-		spip_log("Il est interdit de creer la base $db", 'sqlite.' . _LOG_HS);
-
-		return false;
-	}
-
-	// se connecter a la base indiquee
-	// avec les identifiants connus
-	$index = $serveur ? $serveur : 0;
-
-	if ($link = spip_connect_db('', '', '', '', '@selectdb@' . $db, $serveur, '', '')) {
-		if (($db == $link['db']) && $GLOBALS['connexions'][$index] = $link) {
-			return $db;
-		}
-	} else {
-		spip_log("Impossible de selectionner la base $db", 'sqlite.' . _LOG_HS);
-	}
-
-	return false;
+    _sqlite_init();
+
+    // interdire la creation d'une nouvelle base,
+    // sauf si on est dans l'installation
+    if (
+        !is_file($f = _DIR_DB . $db . '.sqlite')
+        && (!defined('_ECRIRE_INSTALL') || !_ECRIRE_INSTALL)
+    ) {
+        spip_log("Il est interdit de creer la base $db", 'sqlite.' . _LOG_HS);
+
+        return false;
+    }
+
+    // se connecter a la base indiquee
+    // avec les identifiants connus
+    $index = $serveur ? $serveur : 0;
+
+    if ($link = spip_connect_db('', '', '', '', '@selectdb@' . $db, $serveur, '', '')) {
+        if (($db == $link['db']) && $GLOBALS['connexions'][$index] = $link) {
+            return $db;
+        }
+    } else {
+        spip_log("Impossible de selectionner la base $db", 'sqlite.' . _LOG_HS);
+    }
+
+    return false;
 }
 
 
@@ -1700,8 +1700,8 @@ 
  */
 function spip_sqlite_set_charset($charset, $serveur = '', $requeter = true)
 {
-	# spip_log("Gestion charset sql a ecrire : "."SET NAMES "._q($charset), 'sqlite.'._LOG_ERREUR);
-	# return spip_sqlite_query("SET NAMES ". spip_sqlite_quote($charset), $serveur); //<-- Passe pas !
+    # spip_log("Gestion charset sql a ecrire : "."SET NAMES "._q($charset), 'sqlite.'._LOG_ERREUR);
+    # return spip_sqlite_query("SET NAMES ". spip_sqlite_quote($charset), $serveur); //<-- Passe pas !
 }
 
 
@@ -1720,24 +1720,24 @@ 
  **/
 function spip_sqlite_showbase($match, $serveur = '', $requeter = true)
 {
-	// type est le type d'entrée : table / index / view
-	// on ne retourne que les tables (?) et non les vues...
-	# ESCAPE non supporte par les versions sqlite <3
-	#	return spip_sqlite_query("SELECT name FROM sqlite_master WHERE type='table' AND tbl_name LIKE "._q($match)." ESCAPE '\'", $serveur, $requeter);
-	$match = preg_quote($match);
-	$match = str_replace('\\\_', '[[TIRETBAS]]', $match);
-	$match = str_replace('\\\%', '[[POURCENT]]', $match);
-	$match = str_replace('_', '.', $match);
-	$match = str_replace('%', '.*', $match);
-	$match = str_replace('[[TIRETBAS]]', '_', $match);
-	$match = str_replace('[[POURCENT]]', '%', $match);
-	$match = "^$match$";
-
-	return spip_sqlite_query(
-		"SELECT name FROM sqlite_master WHERE type='table' AND tbl_name REGEXP " . _q($match),
-		$serveur,
-		$requeter
-	);
+    // type est le type d'entrée : table / index / view
+    // on ne retourne que les tables (?) et non les vues...
+    # ESCAPE non supporte par les versions sqlite <3
+    #	return spip_sqlite_query("SELECT name FROM sqlite_master WHERE type='table' AND tbl_name LIKE "._q($match)." ESCAPE '\'", $serveur, $requeter);
+    $match = preg_quote($match);
+    $match = str_replace('\\\_', '[[TIRETBAS]]', $match);
+    $match = str_replace('\\\%', '[[POURCENT]]', $match);
+    $match = str_replace('_', '.', $match);
+    $match = str_replace('%', '.*', $match);
+    $match = str_replace('[[TIRETBAS]]', '_', $match);
+    $match = str_replace('[[POURCENT]]', '%', $match);
+    $match = "^$match$";
+
+    return spip_sqlite_query(
+        "SELECT name FROM sqlite_master WHERE type='table' AND tbl_name REGEXP " . _q($match),
+        $serveur,
+        $requeter
+    );
 }
 
 /**
@@ -1756,19 +1756,19 @@ 
  **/
 function spip_sqlite_table_exists(string $table, $serveur = '', $requeter = true)
 {
-	$r = spip_sqlite_query(
-		'SELECT name FROM sqlite_master WHERE'
-			. ' type=\'table\''
-			. ' AND name=' . spip_sqlite_quote($table, 'string')
-			. ' AND name NOT LIKE \'sqlite_%\'',
-		$serveur,
-		$requeter
-	);
-	if (!$requeter) {
-		return $r;
-	}
-	$res = spip_sqlite_fetch($r);
-	return (bool) $res;
+    $r = spip_sqlite_query(
+        'SELECT name FROM sqlite_master WHERE'
+            . ' type=\'table\''
+            . ' AND name=' . spip_sqlite_quote($table, 'string')
+            . ' AND name NOT LIKE \'sqlite_%\'',
+        $serveur,
+        $requeter
+    );
+    if (!$requeter) {
+        return $r;
+    }
+    $res = spip_sqlite_fetch($r);
+    return (bool) $res;
 }
 
 define('_SQLITE_RE_SHOW_TABLE', '/^[^(),]*\(((?:[^()]*\((?:[^()]*\([^()]*\))?[^()]*\)[^()]*)*[^()]*)\)[^()]*$/');
@@ -1792,129 +1792,129 @@ 
  */
 function spip_sqlite_showtable($nom_table, $serveur = '', $requeter = true)
 {
-	$query =
-		'SELECT sql, type FROM'
-		. ' (SELECT * FROM sqlite_master UNION ALL'
-		. ' SELECT * FROM sqlite_temp_master)'
-		. " WHERE tbl_name LIKE '$nom_table'"
-		. " AND type!='meta' AND sql NOT NULL AND name NOT LIKE 'sqlite_%'"
-		. ' ORDER BY substr(type,2,1), name';
-
-	$a = spip_sqlite_query($query, $serveur, $requeter);
-	if (!$a) {
-		return '';
-	}
-	if (!$requeter) {
-		return $a;
-	}
-	if (!($a = spip_sqlite_fetch($a, null, $serveur))) {
-		return '';
-	}
-	$vue = ($a['type'] == 'view'); // table | vue
-
-	// c'est une table
-	// il faut parser le create
-	if (!$vue) {
-		if (!preg_match(_SQLITE_RE_SHOW_TABLE, array_shift($a), $r)) {
-			return '';
-		} else {
-			$desc = $r[1];
-			// extraction d'une KEY éventuelle en prenant garde de ne pas
-			// relever un champ dont le nom contient KEY (ex. ID_WHISKEY)
-			if (preg_match('/^(.*?),([^,]*\sKEY[ (].*)$/s', $desc, $r)) {
-				$namedkeys = $r[2];
-				$desc = $r[1];
-			} else {
-				$namedkeys = '';
-			}
-
-			$fields = [];
-			$keys = [];
-
-			// enlever les contenus des valeurs DEFAULT 'xxx' qui pourraient perturber
-			// par exemple s'il contiennent une virgule.
-			// /!\ cela peut aussi echapper le nom des champs si la table a eu des operations avec SQLite Manager !
-			list($desc, $echaps) = query_echappe_textes($desc);
-
-			// separer toutes les descriptions de champs, separes par des virgules
-			# /!\ explode peut exploser aussi DECIMAL(10,2) !
-			$k_precedent = null;
-			foreach (explode(',', $desc) as $v) {
-				preg_match('/^\s*([^\s]+)\s+(.*)/', $v, $r);
-				// Les cles de champs peuvent etre entourees
-				// de guillements doubles " , simples ', graves ` ou de crochets [ ],  ou rien.
-				// http://www.sqlite.org/lang_keywords.html
-				$k = strtolower(query_reinjecte_textes($r[1], $echaps)); // champ, "champ", [champ]...
-				if ($char = strpbrk($k[0], '\'"[`')) {
-					$k = trim($k, $char);
-					if ($char == '[') {
-						$k = rtrim($k, ']');
-					}
-				}
-				$def = query_reinjecte_textes($r[2], $echaps); // valeur du champ
-
-				// rustine pour DECIMAL(10,2)
-				// s'il y a une parenthèse fermante dans la clé
-				// ou dans la définition sans qu'il n'y ait une ouverture avant
-				if (str_contains($k, ')') or preg_match('/^[^\(]*\)/', $def)) {
-					$fields[$k_precedent] .= ',' . $k . ' ' . $def;
-					continue;
-				}
-
-				// la primary key peut etre dans une des descriptions de champs
-				// et non en fin de table, cas encore decouvert avec Sqlite Manager
-				if (stripos($r[2], 'PRIMARY KEY') !== false) {
-					$keys['PRIMARY KEY'] = $k;
-				}
-
-				$fields[$k] = $def;
-				$k_precedent = $k;
-			}
-			// key inclues dans la requete
-			foreach (preg_split('/\)\s*(,|$)/', $namedkeys) as $v) {
-				if (preg_match('/^\s*([^(]*)\(([^(]*(\(\d+\))?)$/', $v, $r)) {
-					$k = str_replace('`', '', trim($r[1]));
-					$t = trim(strtolower(str_replace('`', '', $r[2])), '"');
-					if ($k && !isset($keys[$k])) {
-						$keys[$k] = $t;
-					} else {
-						$keys[] = $t;
-					}
-				}
-			}
-			// sinon ajouter les key index
-			$query =
-				'SELECT name,sql FROM'
-				. ' (SELECT * FROM sqlite_master UNION ALL'
-				. ' SELECT * FROM sqlite_temp_master)'
-				. " WHERE tbl_name LIKE '$nom_table'"
-				. " AND type='index' AND name NOT LIKE 'sqlite_%'"
-				. 'ORDER BY substr(type,2,1), name';
-			$a = spip_sqlite_query($query, $serveur, $requeter);
-			while ($r = spip_sqlite_fetch($a, null, $serveur)) {
-				$key = str_replace($nom_table . '_', '', $r['name']); // enlever le nom de la table ajoute a l'index
-				$keytype = 'KEY';
-				if (strpos($r['sql'], 'UNIQUE INDEX') !== false) {
-					$keytype = 'UNIQUE KEY';
-				}
-				$colonnes = preg_replace(',.*\((.*)\).*,', '$1', $r['sql']);
-				$keys[$keytype . ' ' . $key] = $colonnes;
-			}
-		}
-	} // c'est une vue, on liste les champs disponibles simplement
-	else {
-		if ($res = sql_fetsel('*', $nom_table, '', '', '', '1', '', $serveur)) { // limit 1
-			$fields = [];
-			foreach ($res as $c => $v) {
-				$fields[$c] = '';
-			}
-			$keys = [];
-		} else {
-			return '';
-		}
-	}
-
-	return ['field' => $fields, 'key' => $keys];
+    $query =
+        'SELECT sql, type FROM'
+        . ' (SELECT * FROM sqlite_master UNION ALL'
+        . ' SELECT * FROM sqlite_temp_master)'
+        . " WHERE tbl_name LIKE '$nom_table'"
+        . " AND type!='meta' AND sql NOT NULL AND name NOT LIKE 'sqlite_%'"
+        . ' ORDER BY substr(type,2,1), name';
+
+    $a = spip_sqlite_query($query, $serveur, $requeter);
+    if (!$a) {
+        return '';
+    }
+    if (!$requeter) {
+        return $a;
+    }
+    if (!($a = spip_sqlite_fetch($a, null, $serveur))) {
+        return '';
+    }
+    $vue = ($a['type'] == 'view'); // table | vue
+
+    // c'est une table
+    // il faut parser le create
+    if (!$vue) {
+        if (!preg_match(_SQLITE_RE_SHOW_TABLE, array_shift($a), $r)) {
+            return '';
+        } else {
+            $desc = $r[1];
+            // extraction d'une KEY éventuelle en prenant garde de ne pas
+            // relever un champ dont le nom contient KEY (ex. ID_WHISKEY)
+            if (preg_match('/^(.*?),([^,]*\sKEY[ (].*)$/s', $desc, $r)) {
+                $namedkeys = $r[2];
+                $desc = $r[1];
+            } else {
+                $namedkeys = '';
+            }
+
+            $fields = [];
+            $keys = [];
+
+            // enlever les contenus des valeurs DEFAULT 'xxx' qui pourraient perturber
+            // par exemple s'il contiennent une virgule.
+            // /!\ cela peut aussi echapper le nom des champs si la table a eu des operations avec SQLite Manager !
+            list($desc, $echaps) = query_echappe_textes($desc);
+
+            // separer toutes les descriptions de champs, separes par des virgules
+            # /!\ explode peut exploser aussi DECIMAL(10,2) !
+            $k_precedent = null;
+            foreach (explode(',', $desc) as $v) {
+                preg_match('/^\s*([^\s]+)\s+(.*)/', $v, $r);
+                // Les cles de champs peuvent etre entourees
+                // de guillements doubles " , simples ', graves ` ou de crochets [ ],  ou rien.
+                // http://www.sqlite.org/lang_keywords.html
+                $k = strtolower(query_reinjecte_textes($r[1], $echaps)); // champ, "champ", [champ]...
+                if ($char = strpbrk($k[0], '\'"[`')) {
+                    $k = trim($k, $char);
+                    if ($char == '[') {
+                        $k = rtrim($k, ']');
+                    }
+                }
+                $def = query_reinjecte_textes($r[2], $echaps); // valeur du champ
+
+                // rustine pour DECIMAL(10,2)
+                // s'il y a une parenthèse fermante dans la clé
+                // ou dans la définition sans qu'il n'y ait une ouverture avant
+                if (str_contains($k, ')') or preg_match('/^[^\(]*\)/', $def)) {
+                    $fields[$k_precedent] .= ',' . $k . ' ' . $def;
+                    continue;
+                }
+
+                // la primary key peut etre dans une des descriptions de champs
+                // et non en fin de table, cas encore decouvert avec Sqlite Manager
+                if (stripos($r[2], 'PRIMARY KEY') !== false) {
+                    $keys['PRIMARY KEY'] = $k;
+                }
+
+                $fields[$k] = $def;
+                $k_precedent = $k;
+            }
+            // key inclues dans la requete
+            foreach (preg_split('/\)\s*(,|$)/', $namedkeys) as $v) {
+                if (preg_match('/^\s*([^(]*)\(([^(]*(\(\d+\))?)$/', $v, $r)) {
+                    $k = str_replace('`', '', trim($r[1]));
+                    $t = trim(strtolower(str_replace('`', '', $r[2])), '"');
+                    if ($k && !isset($keys[$k])) {
+                        $keys[$k] = $t;
+                    } else {
+                        $keys[] = $t;
+                    }
+                }
+            }
+            // sinon ajouter les key index
+            $query =
+                'SELECT name,sql FROM'
+                . ' (SELECT * FROM sqlite_master UNION ALL'
+                . ' SELECT * FROM sqlite_temp_master)'
+                . " WHERE tbl_name LIKE '$nom_table'"
+                . " AND type='index' AND name NOT LIKE 'sqlite_%'"
+                . 'ORDER BY substr(type,2,1), name';
+            $a = spip_sqlite_query($query, $serveur, $requeter);
+            while ($r = spip_sqlite_fetch($a, null, $serveur)) {
+                $key = str_replace($nom_table . '_', '', $r['name']); // enlever le nom de la table ajoute a l'index
+                $keytype = 'KEY';
+                if (strpos($r['sql'], 'UNIQUE INDEX') !== false) {
+                    $keytype = 'UNIQUE KEY';
+                }
+                $colonnes = preg_replace(',.*\((.*)\).*,', '$1', $r['sql']);
+                $keys[$keytype . ' ' . $key] = $colonnes;
+            }
+        }
+    } // c'est une vue, on liste les champs disponibles simplement
+    else {
+        if ($res = sql_fetsel('*', $nom_table, '', '', '', '1', '', $serveur)) { // limit 1
+            $fields = [];
+            foreach ($res as $c => $v) {
+                $fields[$c] = '';
+            }
+            $keys = [];
+        } else {
+            return '';
+        }
+    }
+
+    return ['field' => $fields, 'key' => $keys];
 }
 
 
@@ -1941,24 +1941,24 @@ 
  */
 function spip_sqlite_update($table, $champs, $where = '', $desc = '', $serveur = '', $requeter = true)
 {
-	// recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
-	$champs = _sqlite_ajouter_champs_timestamp($table, $champs, $desc, $serveur);
-
-	$set = [];
-	foreach ($champs as $champ => $val) {
-		$set[] = $champ . "=$val";
-	}
-	if (!empty($set)) {
-		return spip_sqlite_query(
-			_sqlite_calculer_expression('UPDATE', $table, ',')
-				. _sqlite_calculer_expression('SET', $set, ',')
-				. _sqlite_calculer_expression('WHERE', $where),
-			$serveur,
-			$requeter
-		);
-	}
-
-	return false;
+    // recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
+    $champs = _sqlite_ajouter_champs_timestamp($table, $champs, $desc, $serveur);
+
+    $set = [];
+    foreach ($champs as $champ => $val) {
+        $set[] = $champ . "=$val";
+    }
+    if (!empty($set)) {
+        return spip_sqlite_query(
+            _sqlite_calculer_expression('UPDATE', $table, ',')
+                . _sqlite_calculer_expression('SET', $set, ',')
+                . _sqlite_calculer_expression('WHERE', $where),
+            $serveur,
+            $requeter
+        );
+    }
+
+    return false;
 }
 
 
@@ -1989,38 +1989,38 @@ 
 function spip_sqlite_updateq($table, $champs, $where = '', $desc = [], $serveur = '', $requeter = true)
 {
 
-	if (!$champs) {
-		return;
-	}
-	if (!$desc) {
-		$desc = description_table($table, $serveur);
-	}
-	if (!$desc) {
-		die("$table insertion sans description");
-	}
-	$fields = $desc['field'];
-
-	$set = [];
-	foreach ($champs as $champ => $val) {
-		$set[$champ] = $champ . '=' . _sqlite_calculer_cite($val, isset($fields[$champ]) ? $fields[$champ] : '');
-	}
-
-	// recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
-	// attention ils sont deja quotes
-	$maj = _sqlite_ajouter_champs_timestamp($table, [], $desc, $serveur);
-	foreach ($maj as $champ => $val) {
-		if (!isset($set[$champ])) {
-			$set[$champ] = $champ . '=' . $val;
-		}
-	}
-
-	return spip_sqlite_query(
-		_sqlite_calculer_expression('UPDATE', $table, ',')
-			. _sqlite_calculer_expression('SET', $set, ',')
-			. _sqlite_calculer_expression('WHERE', $where),
-		$serveur,
-		$requeter
-	);
+    if (!$champs) {
+        return;
+    }
+    if (!$desc) {
+        $desc = description_table($table, $serveur);
+    }
+    if (!$desc) {
+        die("$table insertion sans description");
+    }
+    $fields = $desc['field'];
+
+    $set = [];
+    foreach ($champs as $champ => $val) {
+        $set[$champ] = $champ . '=' . _sqlite_calculer_cite($val, isset($fields[$champ]) ? $fields[$champ] : '');
+    }
+
+    // recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
+    // attention ils sont deja quotes
+    $maj = _sqlite_ajouter_champs_timestamp($table, [], $desc, $serveur);
+    foreach ($maj as $champ => $val) {
+        if (!isset($set[$champ])) {
+            $set[$champ] = $champ . '=' . $val;
+        }
+    }
+
+    return spip_sqlite_query(
+        _sqlite_calculer_expression('UPDATE', $table, ',')
+            . _sqlite_calculer_expression('SET', $set, ',')
+            . _sqlite_calculer_expression('WHERE', $where),
+        $serveur,
+        $requeter
+    );
 }
 
 
@@ -2039,17 +2039,17 @@ 
  */
 function _sqlite_init()
 {
-	if (!defined('_DIR_DB')) {
-		define('_DIR_DB', _DIR_ETC . 'bases/');
-	}
-	if (!defined('_SQLITE_CHMOD')) {
-		define('_SQLITE_CHMOD', _SPIP_CHMOD);
-	}
-
-	if (!is_dir($d = _DIR_DB)) {
-		include_spip('inc/flock');
-		sous_repertoire($d);
-	}
+    if (!defined('_DIR_DB')) {
+        define('_DIR_DB', _DIR_ETC . 'bases/');
+    }
+    if (!defined('_SQLITE_CHMOD')) {
+        define('_SQLITE_CHMOD', _SPIP_CHMOD);
+    }
+
+    if (!is_dir($d = _DIR_DB)) {
+        include_spip('inc/flock');
+        sous_repertoire($d);
+    }
 }
 
 
@@ -2064,20 +2064,20 @@ 
  */
 function _sqlite_is_version($version = '', $link = '', $serveur = '', $requeter = true)
 {
-	if ($link === '') {
-		$link = _sqlite_link($serveur);
-	}
-	if (!$link) {
-		return false;
-	}
+    if ($link === '') {
+        $link = _sqlite_link($serveur);
+    }
+    if (!$link) {
+        return false;
+    }
 
-	$v = 3;
+    $v = 3;
 
-	if (!$version) {
-		return $v;
-	}
+    if (!$version) {
+        return $v;
+    }
 
-	return ($version == $v);
+    return ($version == $v);
 }
 
 
@@ -2089,9 +2089,9 @@ 
  */
 function _sqlite_link($serveur = '')
 {
-	$link = &$GLOBALS['connexions'][$serveur ? $serveur : 0]['link'];
+    $link = &$GLOBALS['connexions'][$serveur ? $serveur : 0]['link'];
 
-	return $link;
+    return $link;
 }
 
 
@@ -2107,54 +2107,54 @@ 
  */
 function _sqlite_calculer_cite($v, $type)
 {
-	if ($type) {
-		if (
-			is_null($v)
-			and stripos($type, 'NOT NULL') === false
-		) {
-			// null php se traduit en NULL SQL
-			return 'NULL';
-		}
-
-		if (sql_test_date($type) and preg_match('/^\w+\(/', $v)) {
-			return $v;
-		}
-		if (sql_test_int($type)) {
-			if (is_numeric($v)) {
-				return $v;
-			} elseif ($v === null) {
-				return 0;
-			} elseif (ctype_xdigit(substr($v, 2)) and strncmp($v, '0x', 2) === 0) {
-				return hexdec(substr($v, 2));
-			} else {
-				return intval($v);
-			}
-		}
-	} else {
-		// si on ne connait pas le type on le deduit de $v autant que possible
-		if (is_bool($v)) {
-			return strval(intval($v));
-		} elseif (is_numeric($v)) {
-			return strval($v);
-		}
-	}
-
-	// trouver un link sqlite pour faire l'echappement
-	foreach ($GLOBALS['connexions'] as $s) {
-		if (
-			$l = $s['link']
-			and is_object($l)
-			and $l instanceof \PDO
-			and $l->getAttribute(\PDO::ATTR_DRIVER_NAME) === 'sqlite'
-		) {
-			return $l->quote($v ?? '');
-		}
-	}
-
-	// echapper les ' en ''
-	spip_log('Pas de methode ->quote pour echapper', 'sqlite.' . _LOG_INFO_IMPORTANTE);
-
-	return ("'" . str_replace("'", "''", $v) . "'");
+    if ($type) {
+        if (
+            is_null($v)
+            and stripos($type, 'NOT NULL') === false
+        ) {
+            // null php se traduit en NULL SQL
+            return 'NULL';
+        }
+
+        if (sql_test_date($type) and preg_match('/^\w+\(/', $v)) {
+            return $v;
+        }
+        if (sql_test_int($type)) {
+            if (is_numeric($v)) {
+                return $v;
+            } elseif ($v === null) {
+                return 0;
+            } elseif (ctype_xdigit(substr($v, 2)) and strncmp($v, '0x', 2) === 0) {
+                return hexdec(substr($v, 2));
+            } else {
+                return intval($v);
+            }
+        }
+    } else {
+        // si on ne connait pas le type on le deduit de $v autant que possible
+        if (is_bool($v)) {
+            return strval(intval($v));
+        } elseif (is_numeric($v)) {
+            return strval($v);
+        }
+    }
+
+    // trouver un link sqlite pour faire l'echappement
+    foreach ($GLOBALS['connexions'] as $s) {
+        if (
+            $l = $s['link']
+            and is_object($l)
+            and $l instanceof \PDO
+            and $l->getAttribute(\PDO::ATTR_DRIVER_NAME) === 'sqlite'
+        ) {
+            return $l->quote($v ?? '');
+        }
+    }
+
+    // echapper les ' en ''
+    spip_log('Pas de methode ->quote pour echapper', 'sqlite.' . _LOG_INFO_IMPORTANTE);
+
+    return ("'" . str_replace("'", "''", $v) . "'");
 }
 
 
@@ -2171,21 +2171,21 @@ 
  */
 function _sqlite_calculer_expression($expression, $v, $join = 'AND')
 {
-	if (empty($v)) {
-		return '';
-	}
-
-	$exp = "\n$expression ";
-
-	if (!is_array($v)) {
-		return $exp . $v;
-	} else {
-		if (strtoupper($join) === 'AND') {
-			return $exp . join("\n\t$join ", array_map('_sqlite_calculer_where', $v));
-		} else {
-			return $exp . join($join, $v);
-		}
-	}
+    if (empty($v)) {
+        return '';
+    }
+
+    $exp = "\n$expression ";
+
+    if (!is_array($v)) {
+        return $exp . $v;
+    } else {
+        if (strtoupper($join) === 'AND') {
+            return $exp . join("\n\t$join ", array_map('_sqlite_calculer_where', $v));
+        } else {
+            return $exp . join($join, $v);
+        }
+    }
 }
 
 
@@ -2202,7 +2202,7 @@ 
  */
 function _sqlite_calculer_order($orderby)
 {
-	return (is_array($orderby)) ? join(', ', $orderby) : $orderby;
+    return (is_array($orderby)) ? join(', ', $orderby) : $orderby;
 }
 
 
@@ -2214,26 +2214,26 @@ 
  */
 function _sqlite_calculer_select_as($args)
 {
-	$res = '';
-	foreach ($args as $k => $v) {
-		if (substr($k, -1) == '@') {
-			// c'est une jointure qui se refere au from precedent
-			// pas de virgule
-			$res .= '  ' . $v;
-		} else {
-			if (!is_numeric($k)) {
-				$p = strpos($v, ' ');
-				if ($p) {
-					$v = substr($v, 0, $p) . " AS '$k'" . substr($v, $p);
-				} else {
-					$v .= " AS '$k'";
-				}
-			}
-			$res .= ', ' . $v;
-		}
-	}
-
-	return substr($res, 2);
+    $res = '';
+    foreach ($args as $k => $v) {
+        if (substr($k, -1) == '@') {
+            // c'est une jointure qui se refere au from precedent
+            // pas de virgule
+            $res .= '  ' . $v;
+        } else {
+            if (!is_numeric($k)) {
+                $p = strpos($v, ' ');
+                if ($p) {
+                    $v = substr($v, 0, $p) . " AS '$k'" . substr($v, $p);
+                } else {
+                    $v .= " AS '$k'";
+                }
+            }
+            $res .= ', ' . $v;
+        }
+    }
+
+    return substr($res, 2);
 }
 
 
@@ -2257,26 +2257,26 @@ 
  */
 function _sqlite_calculer_where($v)
 {
-	if (!is_array($v)) {
-		return $v;
-	}
-
-	$op = array_shift($v);
-	if (!($n = count($v))) {
-		return $op;
-	} else {
-		$arg = _sqlite_calculer_where(array_shift($v));
-		if ($n == 1) {
-			return "$op($arg)";
-		} else {
-			$arg2 = _sqlite_calculer_where(array_shift($v));
-			if ($n == 2) {
-				return "($arg $op $arg2)";
-			} else {
-				return "($arg $op ($arg2) : $v[0])";
-			}
-		}
-	}
+    if (!is_array($v)) {
+        return $v;
+    }
+
+    $op = array_shift($v);
+    if (!($n = count($v))) {
+        return $op;
+    } else {
+        $arg = _sqlite_calculer_where(array_shift($v));
+        if ($n == 1) {
+            return "$op($arg)";
+        } else {
+            $arg2 = _sqlite_calculer_where(array_shift($v));
+            if ($n == 2) {
+                return "($arg $op $arg2)";
+            } else {
+                return "($arg $op ($arg2) : $v[0])";
+            }
+        }
+    }
 }
 
 
@@ -2292,19 +2292,19 @@ 
  */
 function _sqlite_charger_version($version = '')
 {
-	$versions = [];
-
-	// version 3
-	if (!$version || $version == 3) {
-		if (extension_loaded('pdo') && extension_loaded('pdo_sqlite')) {
-			$versions[] = 3;
-		}
-	}
-	if ($version) {
-		return in_array($version, $versions);
-	}
-
-	return $versions;
+    $versions = [];
+
+    // version 3
+    if (!$version || $version == 3) {
+        if (extension_loaded('pdo') && extension_loaded('pdo_sqlite')) {
+            $versions[] = 3;
+        }
+    }
+    if ($version) {
+        return in_array($version, $versions);
+    }
+
+    return $versions;
 }
 
 
@@ -2343,147 +2343,147 @@ 
 function _sqlite_modifier_table($table, $colonne, $opt = [], $serveur = '')
 {
 
-	if (is_array($table)) {
-		$table_destination = reset($table);
-		$table_origine = key($table);
-	} else {
-		$table_origine = $table_destination = $table;
-	}
-	// ne prend actuellement qu'un changement
-	// mais pourra etre adapte pour changer plus qu'une colonne a la fois
-	if (is_array($colonne)) {
-		$colonne_destination = reset($colonne);
-		$colonne_origine = key($colonne);
-	} else {
-		$colonne_origine = $colonne_destination = $colonne;
-	}
-	if (!isset($opt['field'])) {
-		$opt['field'] = [];
-	}
-	if (!isset($opt['key'])) {
-		$opt['key'] = [];
-	}
-
-	// si les noms de tables sont differents, pas besoin de table temporaire
-	// on prendra directement le nom de la future table
-	$meme_table = ($table_origine == $table_destination);
-
-	$def_origine = sql_showtable($table_origine, false, $serveur);
-	if (!$def_origine or !isset($def_origine['field'])) {
-		spip_log("Alter table impossible sur $table_origine : table non trouvee", 'sqlite' . _LOG_ERREUR);
-
-		return false;
-	}
-
-
-	$table_tmp = $table_origine . '_tmp';
-
-	// 1) creer une table temporaire avec les modifications
-	// - DROP : suppression de la colonne
-	// - CHANGE : modification de la colonne
-	// (foreach pour conserver l'ordre des champs)
-
-	// field
-	$fields = [];
-	// pour le INSERT INTO plus loin
-	// stocker la correspondance nouvelles->anciennes colonnes
-	$fields_correspondances = [];
-	foreach ($def_origine['field'] as $c => $d) {
-		if ($colonne_origine && ($c == $colonne_origine)) {
-			// si pas DROP
-			if ($colonne_destination) {
-				$fields[$colonne_destination] = $opt['field'][$colonne_destination];
-				$fields_correspondances[$colonne_destination] = $c;
-			}
-		} else {
-			$fields[$c] = $d;
-			$fields_correspondances[$c] = $c;
-		}
-	}
-	// cas de ADD sqlite2 (ajout du champ en fin de table):
-	if (!$colonne_origine && $colonne_destination) {
-		$fields[$colonne_destination] = $opt['field'][$colonne_destination];
-	}
-
-	// key...
-	$keys = [];
-	foreach ($def_origine['key'] as $c => $d) {
-		$c = str_replace($colonne_origine, $colonne_destination, $c);
-		$d = str_replace($colonne_origine, $colonne_destination, $d);
-		// seulement si on ne supprime pas la colonne !
-		if ($d) {
-			$keys[$c] = $d;
-		}
-	}
-
-	// autres keys, on merge
-	$keys = array_merge($keys, $opt['key']);
-	$queries = [];
-
-	// copier dans destination (si differente de origine), sinon tmp
-	$table_copie = ($meme_table) ? $table_tmp : $table_destination;
-	$autoinc = (isset($keys['PRIMARY KEY'])
-		and $keys['PRIMARY KEY']
-		and stripos($keys['PRIMARY KEY'], ',') === false
-		and stripos($fields[$keys['PRIMARY KEY']], 'default') === false);
-
-	if (
-		$q = _sqlite_requete_create(
-			$table_copie,
-			$fields,
-			$keys,
-			$autoinc,
-			$temporary = false,
-			$ifnotexists = true,
-			$serveur
-		)
-	) {
-		$queries[] = $q;
-	}
-
-
-	// 2) y copier les champs qui vont bien
-	$champs_dest = join(', ', array_keys($fields_correspondances));
-	$champs_ori = join(', ', $fields_correspondances);
-	$queries[] = "INSERT INTO $table_copie ($champs_dest) SELECT $champs_ori FROM $table_origine";
-
-	// 3) supprimer la table d'origine
-	$queries[] = "DROP TABLE $table_origine";
-
-	// 4) renommer la table temporaire
-	// avec le nom de la table destination
-	// si necessaire
-	if ($meme_table) {
-		$queries[] = "ALTER TABLE $table_copie RENAME TO $table_destination";
-	}
-
-	// 5) remettre les index !
-	foreach ($keys as $k => $v) {
-		if ($k == 'PRIMARY KEY') {
-		} else {
-			// enlever KEY
-			$k = substr($k, 4);
-			$queries[] = "CREATE INDEX $table_destination" . "_$k ON $table_destination ($v)";
-		}
-	}
-
-
-	if (count($queries)) {
-		Sqlite::demarrer_transaction($serveur);
-		// il faut les faire une par une car $query = join('; ', $queries).";"; ne fonctionne pas
-		foreach ($queries as $q) {
-			if (!Sqlite::executer_requete($q, $serveur)) {
-				spip_log('SQLite : ALTER TABLE table :'
-					. " Erreur a l'execution de la requete : $q", 'sqlite.' . _LOG_ERREUR);
-				Sqlite::annuler_transaction($serveur);
-
-				return false;
-			}
-		}
-		Sqlite::finir_transaction($serveur);
-	}
-
-	return true;
+    if (is_array($table)) {
+        $table_destination = reset($table);
+        $table_origine = key($table);
+    } else {
+        $table_origine = $table_destination = $table;
+    }
+    // ne prend actuellement qu'un changement
+    // mais pourra etre adapte pour changer plus qu'une colonne a la fois
+    if (is_array($colonne)) {
+        $colonne_destination = reset($colonne);
+        $colonne_origine = key($colonne);
+    } else {
+        $colonne_origine = $colonne_destination = $colonne;
+    }
+    if (!isset($opt['field'])) {
+        $opt['field'] = [];
+    }
+    if (!isset($opt['key'])) {
+        $opt['key'] = [];
+    }
+
+    // si les noms de tables sont differents, pas besoin de table temporaire
+    // on prendra directement le nom de la future table
+    $meme_table = ($table_origine == $table_destination);
+
+    $def_origine = sql_showtable($table_origine, false, $serveur);
+    if (!$def_origine or !isset($def_origine['field'])) {
+        spip_log("Alter table impossible sur $table_origine : table non trouvee", 'sqlite' . _LOG_ERREUR);
+
+        return false;
+    }
+
+
+    $table_tmp = $table_origine . '_tmp';
+
+    // 1) creer une table temporaire avec les modifications
+    // - DROP : suppression de la colonne
+    // - CHANGE : modification de la colonne
+    // (foreach pour conserver l'ordre des champs)
+
+    // field
+    $fields = [];
+    // pour le INSERT INTO plus loin
+    // stocker la correspondance nouvelles->anciennes colonnes
+    $fields_correspondances = [];
+    foreach ($def_origine['field'] as $c => $d) {
+        if ($colonne_origine && ($c == $colonne_origine)) {
+            // si pas DROP
+            if ($colonne_destination) {
+                $fields[$colonne_destination] = $opt['field'][$colonne_destination];
+                $fields_correspondances[$colonne_destination] = $c;
+            }
+        } else {
+            $fields[$c] = $d;
+            $fields_correspondances[$c] = $c;
+        }
+    }
+    // cas de ADD sqlite2 (ajout du champ en fin de table):
+    if (!$colonne_origine && $colonne_destination) {
+        $fields[$colonne_destination] = $opt['field'][$colonne_destination];
+    }
+
+    // key...
+    $keys = [];
+    foreach ($def_origine['key'] as $c => $d) {
+        $c = str_replace($colonne_origine, $colonne_destination, $c);
+        $d = str_replace($colonne_origine, $colonne_destination, $d);
+        // seulement si on ne supprime pas la colonne !
+        if ($d) {
+            $keys[$c] = $d;
+        }
+    }
+
+    // autres keys, on merge
+    $keys = array_merge($keys, $opt['key']);
+    $queries = [];
+
+    // copier dans destination (si differente de origine), sinon tmp
+    $table_copie = ($meme_table) ? $table_tmp : $table_destination;
+    $autoinc = (isset($keys['PRIMARY KEY'])
+        and $keys['PRIMARY KEY']
+        and stripos($keys['PRIMARY KEY'], ',') === false
+        and stripos($fields[$keys['PRIMARY KEY']], 'default') === false);
+
+    if (
+        $q = _sqlite_requete_create(
+            $table_copie,
+            $fields,
+            $keys,
+            $autoinc,
+            $temporary = false,
+            $ifnotexists = true,
+            $serveur
+        )
+    ) {
+        $queries[] = $q;
+    }
+
+
+    // 2) y copier les champs qui vont bien
+    $champs_dest = join(', ', array_keys($fields_correspondances));
+    $champs_ori = join(', ', $fields_correspondances);
+    $queries[] = "INSERT INTO $table_copie ($champs_dest) SELECT $champs_ori FROM $table_origine";
+
+    // 3) supprimer la table d'origine
+    $queries[] = "DROP TABLE $table_origine";
+
+    // 4) renommer la table temporaire
+    // avec le nom de la table destination
+    // si necessaire
+    if ($meme_table) {
+        $queries[] = "ALTER TABLE $table_copie RENAME TO $table_destination";
+    }
+
+    // 5) remettre les index !
+    foreach ($keys as $k => $v) {
+        if ($k == 'PRIMARY KEY') {
+        } else {
+            // enlever KEY
+            $k = substr($k, 4);
+            $queries[] = "CREATE INDEX $table_destination" . "_$k ON $table_destination ($v)";
+        }
+    }
+
+
+    if (count($queries)) {
+        Sqlite::demarrer_transaction($serveur);
+        // il faut les faire une par une car $query = join('; ', $queries).";"; ne fonctionne pas
+        foreach ($queries as $q) {
+            if (!Sqlite::executer_requete($q, $serveur)) {
+                spip_log('SQLite : ALTER TABLE table :'
+                    . " Erreur a l'execution de la requete : $q", 'sqlite.' . _LOG_ERREUR);
+                Sqlite::annuler_transaction($serveur);
+
+                return false;
+            }
+        }
+        Sqlite::finir_transaction($serveur);
+    }
+
+    return true;
 }
 
 
@@ -2494,61 +2494,61 @@ 
  */
 function _sqlite_ref_fonctions()
 {
-	$fonctions = [
-		'alter' => 'spip_sqlite_alter',
-		'count' => 'spip_sqlite_count',
-		'countsel' => 'spip_sqlite_countsel',
-		'create' => 'spip_sqlite_create',
-		'create_base' => 'spip_sqlite_create_base',
-		'create_view' => 'spip_sqlite_create_view',
-		'date_proche' => 'spip_sqlite_date_proche',
-		'delete' => 'spip_sqlite_delete',
-		'drop_table' => 'spip_sqlite_drop_table',
-		'drop_view' => 'spip_sqlite_drop_view',
-		'errno' => 'spip_sqlite_errno',
-		'error' => 'spip_sqlite_error',
-		'explain' => 'spip_sqlite_explain',
-		'fetch' => 'spip_sqlite_fetch',
-		'seek' => 'spip_sqlite_seek',
-		'free' => 'spip_sqlite_free',
-		'hex' => 'spip_sqlite_hex',
-		'in' => 'spip_sqlite_in',
-		'insert' => 'spip_sqlite_insert',
-		'insertq' => 'spip_sqlite_insertq',
-		'insertq_multi' => 'spip_sqlite_insertq_multi',
-		'listdbs' => 'spip_sqlite_listdbs',
-		'multi' => 'spip_sqlite_multi',
-		'optimize' => 'spip_sqlite_optimize',
-		'query' => 'spip_sqlite_query',
-		'quote' => 'spip_sqlite_quote',
-		'repair' => 'spip_sqlite_repair',
-		'replace' => 'spip_sqlite_replace',
-		'replace_multi' => 'spip_sqlite_replace_multi',
-		'select' => 'spip_sqlite_select',
-		'selectdb' => 'spip_sqlite_selectdb',
-		'set_charset' => 'spip_sqlite_set_charset',
-		'get_charset' => 'spip_sqlite_get_charset',
-		'showbase' => 'spip_sqlite_showbase',
-		'showtable' => 'spip_sqlite_showtable',
-		'table_exists' => 'spip_sqlite_table_exists',
-		'update' => 'spip_sqlite_update',
-		'updateq' => 'spip_sqlite_updateq',
-		'preferer_transaction' => 'spip_sqlite_preferer_transaction',
-		'demarrer_transaction' => 'spip_sqlite_demarrer_transaction',
-		'terminer_transaction' => 'spip_sqlite_terminer_transaction',
-	];
-
-	// association de chaque nom http d'un charset aux couples sqlite
-	// SQLite supporte utf-8 et utf-16 uniquement.
-	$charsets = [
-		'utf-8' => ['charset' => 'utf8', 'collation' => 'utf8_general_ci'],
-		//'utf-16be'=>array('charset'=>'utf16be','collation'=>'UTF-16BE'),// aucune idee de quoi il faut remplir dans es champs la
-		//'utf-16le'=>array('charset'=>'utf16le','collation'=>'UTF-16LE')
-	];
-
-	$fonctions['charsets'] = $charsets;
-
-	return $fonctions;
+    $fonctions = [
+        'alter' => 'spip_sqlite_alter',
+        'count' => 'spip_sqlite_count',
+        'countsel' => 'spip_sqlite_countsel',
+        'create' => 'spip_sqlite_create',
+        'create_base' => 'spip_sqlite_create_base',
+        'create_view' => 'spip_sqlite_create_view',
+        'date_proche' => 'spip_sqlite_date_proche',
+        'delete' => 'spip_sqlite_delete',
+        'drop_table' => 'spip_sqlite_drop_table',
+        'drop_view' => 'spip_sqlite_drop_view',
+        'errno' => 'spip_sqlite_errno',
+        'error' => 'spip_sqlite_error',
+        'explain' => 'spip_sqlite_explain',
+        'fetch' => 'spip_sqlite_fetch',
+        'seek' => 'spip_sqlite_seek',
+        'free' => 'spip_sqlite_free',
+        'hex' => 'spip_sqlite_hex',
+        'in' => 'spip_sqlite_in',
+        'insert' => 'spip_sqlite_insert',
+        'insertq' => 'spip_sqlite_insertq',
+        'insertq_multi' => 'spip_sqlite_insertq_multi',
+        'listdbs' => 'spip_sqlite_listdbs',
+        'multi' => 'spip_sqlite_multi',
+        'optimize' => 'spip_sqlite_optimize',
+        'query' => 'spip_sqlite_query',
+        'quote' => 'spip_sqlite_quote',
+        'repair' => 'spip_sqlite_repair',
+        'replace' => 'spip_sqlite_replace',
+        'replace_multi' => 'spip_sqlite_replace_multi',
+        'select' => 'spip_sqlite_select',
+        'selectdb' => 'spip_sqlite_selectdb',
+        'set_charset' => 'spip_sqlite_set_charset',
+        'get_charset' => 'spip_sqlite_get_charset',
+        'showbase' => 'spip_sqlite_showbase',
+        'showtable' => 'spip_sqlite_showtable',
+        'table_exists' => 'spip_sqlite_table_exists',
+        'update' => 'spip_sqlite_update',
+        'updateq' => 'spip_sqlite_updateq',
+        'preferer_transaction' => 'spip_sqlite_preferer_transaction',
+        'demarrer_transaction' => 'spip_sqlite_demarrer_transaction',
+        'terminer_transaction' => 'spip_sqlite_terminer_transaction',
+    ];
+
+    // association de chaque nom http d'un charset aux couples sqlite
+    // SQLite supporte utf-8 et utf-16 uniquement.
+    $charsets = [
+        'utf-8' => ['charset' => 'utf8', 'collation' => 'utf8_general_ci'],
+        //'utf-16be'=>array('charset'=>'utf16be','collation'=>'UTF-16BE'),// aucune idee de quoi il faut remplir dans es champs la
+        //'utf-16le'=>array('charset'=>'utf16le','collation'=>'UTF-16LE')
+    ];
+
+    $fonctions['charsets'] = $charsets;
+
+    return $fonctions;
 }
 
 
@@ -2561,56 +2561,56 @@ 
  */
 function _sqlite_remplacements_definitions_table($query, $autoinc = false)
 {
-	// quelques remplacements
-	$num = '(\s*\([0-9]*\))?';
-	$enum = '(\s*\([^\)]*\))?';
-
-	$remplace = [
-		'/enum' . $enum . '/is' => 'VARCHAR(255)',
-		'/COLLATE \w+_bin/is' => 'COLLATE BINARY',
-		'/COLLATE \w+_ci/is' => 'COLLATE NOCASE',
-		'/auto_increment/is' => '',
-		'/current_timestamp\(\)/is' => 'CURRENT_TIMESTAMP', // Fix export depuis mariaDB #4374
-		'/(timestamp .* )ON .*$/is' => '\\1',
-		'/character set \w+/is' => '',
-		'/((big|small|medium|tiny)?int(eger)?)' . $num . '\s*unsigned/is' => '\\1 UNSIGNED',
-		'/(text\s+not\s+null(\s+collate\s+\w+)?)\s*$/is' => "\\1 DEFAULT ''",
-		'/((char|varchar)' . $num . '\s+not\s+null(\s+collate\s+\w+)?)\s*$/is' => "\\1 DEFAULT ''",
-		'/(datetime\s+not\s+null)\s*$/is' => "\\1 DEFAULT '0000-00-00 00:00:00'",
-		'/(date\s+not\s+null)\s*$/is' => "\\1 DEFAULT '0000-00-00'",
-	];
-
-	// pour l'autoincrement, il faut des INTEGER NOT NULL PRIMARY KEY
-	$remplace_autocinc = [
-		'/(big|small|medium|tiny)?int(eger)?' . $num . '/is' => 'INTEGER'
-	];
-	// pour les int non autoincrement, il faut un DEFAULT
-	$remplace_nonautocinc = [
-		'/((big|small|medium|tiny)?int(eger)?' . $num . '\s+not\s+null)\s*$/is' => "\\1 DEFAULT 0",
-	];
-
-	if (is_string($query)) {
-		$query = preg_replace(array_keys($remplace), $remplace, $query);
-		if ($autoinc or preg_match(',AUTO_INCREMENT,is', $query)) {
-			$query = preg_replace(array_keys($remplace_autocinc), $remplace_autocinc, $query);
-		} else {
-			$query = preg_replace(array_keys($remplace_nonautocinc), $remplace_nonautocinc, $query);
-			$query = _sqlite_collate_ci($query);
-		}
-	} elseif (is_array($query)) {
-		foreach ($query as $k => $q) {
-			$ai = ($autoinc ? $k == $autoinc : preg_match(',AUTO_INCREMENT,is', $q));
-			$query[$k] = preg_replace(array_keys($remplace), $remplace, $query[$k]);
-			if ($ai) {
-				$query[$k] = preg_replace(array_keys($remplace_autocinc), $remplace_autocinc, $query[$k]);
-			} else {
-				$query[$k] = preg_replace(array_keys($remplace_nonautocinc), $remplace_nonautocinc, $query[$k]);
-				$query[$k] = _sqlite_collate_ci($query[$k]);
-			}
-		}
-	}
-
-	return $query;
+    // quelques remplacements
+    $num = '(\s*\([0-9]*\))?';
+    $enum = '(\s*\([^\)]*\))?';
+
+    $remplace = [
+        '/enum' . $enum . '/is' => 'VARCHAR(255)',
+        '/COLLATE \w+_bin/is' => 'COLLATE BINARY',
+        '/COLLATE \w+_ci/is' => 'COLLATE NOCASE',
+        '/auto_increment/is' => '',
+        '/current_timestamp\(\)/is' => 'CURRENT_TIMESTAMP', // Fix export depuis mariaDB #4374
+        '/(timestamp .* )ON .*$/is' => '\\1',
+        '/character set \w+/is' => '',
+        '/((big|small|medium|tiny)?int(eger)?)' . $num . '\s*unsigned/is' => '\\1 UNSIGNED',
+        '/(text\s+not\s+null(\s+collate\s+\w+)?)\s*$/is' => "\\1 DEFAULT ''",
+        '/((char|varchar)' . $num . '\s+not\s+null(\s+collate\s+\w+)?)\s*$/is' => "\\1 DEFAULT ''",
+        '/(datetime\s+not\s+null)\s*$/is' => "\\1 DEFAULT '0000-00-00 00:00:00'",
+        '/(date\s+not\s+null)\s*$/is' => "\\1 DEFAULT '0000-00-00'",
+    ];
+
+    // pour l'autoincrement, il faut des INTEGER NOT NULL PRIMARY KEY
+    $remplace_autocinc = [
+        '/(big|small|medium|tiny)?int(eger)?' . $num . '/is' => 'INTEGER'
+    ];
+    // pour les int non autoincrement, il faut un DEFAULT
+    $remplace_nonautocinc = [
+        '/((big|small|medium|tiny)?int(eger)?' . $num . '\s+not\s+null)\s*$/is' => "\\1 DEFAULT 0",
+    ];
+
+    if (is_string($query)) {
+        $query = preg_replace(array_keys($remplace), $remplace, $query);
+        if ($autoinc or preg_match(',AUTO_INCREMENT,is', $query)) {
+            $query = preg_replace(array_keys($remplace_autocinc), $remplace_autocinc, $query);
+        } else {
+            $query = preg_replace(array_keys($remplace_nonautocinc), $remplace_nonautocinc, $query);
+            $query = _sqlite_collate_ci($query);
+        }
+    } elseif (is_array($query)) {
+        foreach ($query as $k => $q) {
+            $ai = ($autoinc ? $k == $autoinc : preg_match(',AUTO_INCREMENT,is', $q));
+            $query[$k] = preg_replace(array_keys($remplace), $remplace, $query[$k]);
+            if ($ai) {
+                $query[$k] = preg_replace(array_keys($remplace_autocinc), $remplace_autocinc, $query[$k]);
+            } else {
+                $query[$k] = preg_replace(array_keys($remplace_nonautocinc), $remplace_nonautocinc, $query[$k]);
+                $query[$k] = _sqlite_collate_ci($query[$k]);
+            }
+        }
+    }
+
+    return $query;
 }
 
 /**
@@ -2622,17 +2622,17 @@ 
  */
 function _sqlite_collate_ci($champ)
 {
-	if (stripos($champ, 'COLLATE') !== false) {
-		return $champ;
-	}
-	if (stripos($champ, 'BINARY') !== false) {
-		return str_ireplace('BINARY', 'COLLATE BINARY', $champ);
-	}
-	if (preg_match(',^(char|varchar|(long|small|medium|tiny)?text),i', $champ)) {
-		return $champ . ' COLLATE NOCASE';
-	}
-
-	return $champ;
+    if (stripos($champ, 'COLLATE') !== false) {
+        return $champ;
+    }
+    if (stripos($champ, 'BINARY') !== false) {
+        return str_ireplace('BINARY', 'COLLATE BINARY', $champ);
+    }
+    if (preg_match(',^(char|varchar|(long|small|medium|tiny)?text),i', $champ)) {
+        return $champ . ' COLLATE NOCASE';
+    }
+
+    return $champ;
 }
 
 
@@ -2651,84 +2651,84 @@ 
  * @return bool|string
  */
 function _sqlite_requete_create(
-	$nom,
-	$champs,
-	$cles,
-	$autoinc = false,
-	$temporary = false,
-	$_ifnotexists = true,
-	$serveur = '',
-	$requeter = true
+    $nom,
+    $champs,
+    $cles,
+    $autoinc = false,
+    $temporary = false,
+    $_ifnotexists = true,
+    $serveur = '',
+    $requeter = true
 ) {
-	$query = $keys = $s = $p = '';
-
-	// 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;
-	}
-
-	// sqlite ne gere pas KEY tout court dans une requete CREATE TABLE
-	// il faut passer par des create index
-	// Il gere par contre primary key !
-	// Soit la PK est definie dans les cles, soit dans un champs
-	// soit faussement dans les 2 (et dans ce cas, il faut l’enlever à un des 2 endroits !)
-	$pk = 'PRIMARY KEY';
-	// le champ de cle primaire
-	$champ_pk = !empty($cles[$pk]) ? $cles[$pk] : '';
-
-	foreach ($champs as $k => $v) {
-		if (false !== stripos($v, $pk)) {
-			$champ_pk = $k;
-			// on n'en a plus besoin dans field, vu que defini dans key
-			$champs[$k] = preg_replace("/$pk/is", '', $champs[$k]);
-			break;
-		}
-	}
-
-	if ($champ_pk) {
-		$keys = "\n\t\t$pk ($champ_pk)";
-	}
-	// Pas de DEFAULT 0 sur les cles primaires en auto-increment
-	if (
-		isset($champs[$champ_pk])
-		and stripos($champs[$champ_pk], 'default 0') !== false
-	) {
-		$champs[$champ_pk] = trim(str_ireplace('default 0', '', $champs[$champ_pk]));
-	}
-
-	$champs = _sqlite_remplacements_definitions_table($champs, $autoinc ? $champ_pk : false);
-	foreach ($champs as $k => $v) {
-		$query .= "$s\n\t\t$k $v";
-		$s = ',';
-	}
-
-	$ifnotexists = '';
-	if ($_ifnotexists) {
-		$version = spip_sqlite_fetch(
-			spip_sqlite_query('select sqlite_version() AS sqlite_version', $serveur),
-			'',
-			$serveur
-		);
-		if (!function_exists('spip_version_compare')) {
-			include_spip('plugins/installer');
-		}
-
-		if ($version and spip_version_compare($version['sqlite_version'], '3.3.0', '>=')) {
-			$ifnotexists = ' IF NOT EXISTS';
-		} else {
-			/* simuler le IF EXISTS - version 2 et sqlite < 3.3a */
-			$a = spip_sqlite_showtable($nom, $serveur);
-			if (isset($a['key']['KEY ' . $nom])) {
-				return true;
-			}
-		}
-	}
-
-	$temporary = $temporary ? ' TEMPORARY' : '';
-	$q = "CREATE$temporary TABLE$ifnotexists $nom ($query" . ($keys ? ",$keys" : '') . ")\n";
-
-	return $q;
+    $query = $keys = $s = $p = '';
+
+    // 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;
+    }
+
+    // sqlite ne gere pas KEY tout court dans une requete CREATE TABLE
+    // il faut passer par des create index
+    // Il gere par contre primary key !
+    // Soit la PK est definie dans les cles, soit dans un champs
+    // soit faussement dans les 2 (et dans ce cas, il faut l’enlever à un des 2 endroits !)
+    $pk = 'PRIMARY KEY';
+    // le champ de cle primaire
+    $champ_pk = !empty($cles[$pk]) ? $cles[$pk] : '';
+
+    foreach ($champs as $k => $v) {
+        if (false !== stripos($v, $pk)) {
+            $champ_pk = $k;
+            // on n'en a plus besoin dans field, vu que defini dans key
+            $champs[$k] = preg_replace("/$pk/is", '', $champs[$k]);
+            break;
+        }
+    }
+
+    if ($champ_pk) {
+        $keys = "\n\t\t$pk ($champ_pk)";
+    }
+    // Pas de DEFAULT 0 sur les cles primaires en auto-increment
+    if (
+        isset($champs[$champ_pk])
+        and stripos($champs[$champ_pk], 'default 0') !== false
+    ) {
+        $champs[$champ_pk] = trim(str_ireplace('default 0', '', $champs[$champ_pk]));
+    }
+
+    $champs = _sqlite_remplacements_definitions_table($champs, $autoinc ? $champ_pk : false);
+    foreach ($champs as $k => $v) {
+        $query .= "$s\n\t\t$k $v";
+        $s = ',';
+    }
+
+    $ifnotexists = '';
+    if ($_ifnotexists) {
+        $version = spip_sqlite_fetch(
+            spip_sqlite_query('select sqlite_version() AS sqlite_version', $serveur),
+            '',
+            $serveur
+        );
+        if (!function_exists('spip_version_compare')) {
+            include_spip('plugins/installer');
+        }
+
+        if ($version and spip_version_compare($version['sqlite_version'], '3.3.0', '>=')) {
+            $ifnotexists = ' IF NOT EXISTS';
+        } else {
+            /* simuler le IF EXISTS - version 2 et sqlite < 3.3a */
+            $a = spip_sqlite_showtable($nom, $serveur);
+            if (isset($a['key']['KEY ' . $nom])) {
+                return true;
+            }
+        }
+    }
+
+    $temporary = $temporary ? ' TEMPORARY' : '';
+    $q = "CREATE$temporary TABLE$ifnotexists $nom ($query" . ($keys ? ",$keys" : '') . ")\n";
+
+    return $q;
 }
 
 
@@ -2748,40 +2748,40 @@ 
  */
 function _sqlite_ajouter_champs_timestamp($table, $couples, $desc = '', $serveur = '')
 {
-	static $tables = [];
-
-	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] = ['valeur' => [], 'cite' => [], 'desc' => []];
-
-		$now = _sqlite_func_now(true);
-		foreach ($desc['field'] as $k => $v) {
-			if (strpos(strtolower(ltrim($v)), 'timestamp') === 0) {
-				$tables[$table]['desc'][$k] = $v;
-				$tables[$table]['valeur'][$k] = _sqlite_calculer_cite($now, $tables[$table]['desc'][$k]);
-			}
-		}
-	} else {
-		$now = _sqlite_func_now(true);
-		foreach (array_keys($tables[$table]['desc']) as $k) {
-			$tables[$table]['valeur'][$k] = _sqlite_calculer_cite($now, $tables[$table]['desc'][$k]);
-		}
-	}
-
-	// ajout des champs type 'timestamp' absents
-	return array_merge($tables[$table]['valeur'], $couples);
+    static $tables = [];
+
+    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] = ['valeur' => [], 'cite' => [], 'desc' => []];
+
+        $now = _sqlite_func_now(true);
+        foreach ($desc['field'] as $k => $v) {
+            if (strpos(strtolower(ltrim($v)), 'timestamp') === 0) {
+                $tables[$table]['desc'][$k] = $v;
+                $tables[$table]['valeur'][$k] = _sqlite_calculer_cite($now, $tables[$table]['desc'][$k]);
+            }
+        }
+    } else {
+        $now = _sqlite_func_now(true);
+        foreach (array_keys($tables[$table]['desc']) as $k) {
+            $tables[$table]['valeur'][$k] = _sqlite_calculer_cite($now, $tables[$table]['desc'][$k]);
+        }
+    }
+
+    // ajout des champs type 'timestamp' absents
+    return array_merge($tables[$table]['valeur'], $couples);
 }
 
 
@@ -2793,5 +2793,5 @@ 
  */
 function spip_versions_sqlite()
 {
-	return _sqlite_charger_version();
+    return _sqlite_charger_version();
 }

ecrire/req/sqlite_fonctions.php

Indentation +216 added lines, -216 removed lines

@@ -22,7 +22,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -43,90 +43,90 @@ 
  */
 function _sqlite_init_functions(&$sqlite) {
 
-	if (!$sqlite) {
-		return false;
-	}
+    if (!$sqlite) {
+        return false;
+    }
 
 
-	$fonctions = [
-		// A
-		'ACOS'  => ['acos', 1],
-		'ASIN'  => ['asin', 1],
-		'ATAN'  => ['atan', 1], // mysql accepte 2 params comme atan2… hum ?
-		'ATAN2' => ['atan2', 2],
+    $fonctions = [
+        // A
+        'ACOS'  => ['acos', 1],
+        'ASIN'  => ['asin', 1],
+        'ATAN'  => ['atan', 1], // mysql accepte 2 params comme atan2… hum ?
+        'ATAN2' => ['atan2', 2],
 
-		// C
-		'CEIL'   => ['_sqlite_func_ceil', 1],
-		'CONCAT' => ['_sqlite_func_concat', -1],
-		'COS'    => ['cos', 1],
+        // C
+        'CEIL'   => ['_sqlite_func_ceil', 1],
+        'CONCAT' => ['_sqlite_func_concat', -1],
+        'COS'    => ['cos', 1],
 
-		// D
-		'DATE_FORMAT' => ['_sqlite_func_date_format', 2], // équivalent a strftime avec args inversés
-		'DAYOFMONTH'  => ['_sqlite_func_dayofmonth', 1],
-		'DEGREES'     => ['rad2deg', 1],
+        // D
+        'DATE_FORMAT' => ['_sqlite_func_date_format', 2], // équivalent a strftime avec args inversés
+        'DAYOFMONTH'  => ['_sqlite_func_dayofmonth', 1],
+        'DEGREES'     => ['rad2deg', 1],
 
-		// E
-		'EXTRAIRE_MULTI' => ['_sqlite_func_extraire_multi', 2], // specifique a SPIP/sql_multi()
-		'EXP'            => ['exp', 1],
+        // E
+        'EXTRAIRE_MULTI' => ['_sqlite_func_extraire_multi', 2], // specifique a SPIP/sql_multi()
+        'EXP'            => ['exp', 1],
 
-		// F
-		'FIND_IN_SET' => ['_sqlite_func_find_in_set', 2],
-		'FLOOR'       => ['_sqlite_func_floor', 1],
+        // F
+        'FIND_IN_SET' => ['_sqlite_func_find_in_set', 2],
+        'FLOOR'       => ['_sqlite_func_floor', 1],
 
-		// G
-		'GREATEST' => ['_sqlite_func_greatest', -1],
+        // G
+        'GREATEST' => ['_sqlite_func_greatest', -1],
 
-		// I
-		'IF'     => ['_sqlite_func_if', 3],
-		'INSERT' => ['_sqlite_func_insert', 4],
-		'INSTR'  => ['_sqlite_func_instr', 2],
+        // I
+        'IF'     => ['_sqlite_func_if', 3],
+        'INSERT' => ['_sqlite_func_insert', 4],
+        'INSTR'  => ['_sqlite_func_instr', 2],
 
-		// L
-		'LEAST'  => ['_sqlite_func_least', -1],
-		'_LEFT'  => ['_sqlite_func_left', 2],
+        // L
+        'LEAST'  => ['_sqlite_func_least', -1],
+        '_LEFT'  => ['_sqlite_func_left', 2],
 
-		// N
-		'NOW' => ['_sqlite_func_now', 0],
+        // N
+        'NOW' => ['_sqlite_func_now', 0],
 
-		// M
-		'MD5'   => ['md5', 1],
-		'MONTH' => ['_sqlite_func_month', 1],
+        // M
+        'MD5'   => ['md5', 1],
+        'MONTH' => ['_sqlite_func_month', 1],
 
-		// P
-		'PREG_REPLACE' => ['_sqlite_func_preg_replace', 3],
+        // P
+        'PREG_REPLACE' => ['_sqlite_func_preg_replace', 3],
 
-		// R
-		'RADIANS' => ['deg2rad', 1],
-		'RAND'    => ['_sqlite_func_rand', 0], // sinon random() v2.4
-		'REGEXP'  => ['_sqlite_func_regexp_match', 2], // critere REGEXP supporte a partir de v3.3.2
-		'RIGHT'   => ['_sqlite_func_right', 2],
+        // R
+        'RADIANS' => ['deg2rad', 1],
+        'RAND'    => ['_sqlite_func_rand', 0], // sinon random() v2.4
+        'REGEXP'  => ['_sqlite_func_regexp_match', 2], // critere REGEXP supporte a partir de v3.3.2
+        'RIGHT'   => ['_sqlite_func_right', 2],
 
-		// S
-		'SETTYPE'   => ['settype', 2], // CAST present en v3.2.3
-		'SIN'       => ['sin', 1],
-		'SQRT'      => ['sqrt', 1],
-		'SUBSTRING' => ['_sqlite_func_substring' /*, 3*/], // peut etre appelee avec 2 ou 3 arguments, index base 1 et non 0
+        // S
+        'SETTYPE'   => ['settype', 2], // CAST present en v3.2.3
+        'SIN'       => ['sin', 1],
+        'SQRT'      => ['sqrt', 1],
+        'SUBSTRING' => ['_sqlite_func_substring' /*, 3*/], // peut etre appelee avec 2 ou 3 arguments, index base 1 et non 0
 
-		// T
-		'TAN'           => ['tan', 1],
-		'TIMESTAMPDIFF' => ['_sqlite_timestampdiff'    /*, 3*/],
-		'TO_DAYS'       => ['_sqlite_func_to_days', 1],
+        // T
+        'TAN'           => ['tan', 1],
+        'TIMESTAMPDIFF' => ['_sqlite_timestampdiff'    /*, 3*/],
+        'TO_DAYS'       => ['_sqlite_func_to_days', 1],
 
-		// U
-		'UNIX_TIMESTAMP' => ['_sqlite_func_unix_timestamp', 1],
+        // U
+        'UNIX_TIMESTAMP' => ['_sqlite_func_unix_timestamp', 1],
 
-		// V
-		'VIDE' => ['_sqlite_func_vide', 0], // du vide pour SELECT 0 as x ... ORDER BY x -> ORDER BY vide()
+        // V
+        'VIDE' => ['_sqlite_func_vide', 0], // du vide pour SELECT 0 as x ... ORDER BY x -> ORDER BY vide()
 
-		// Y
-		'YEAR' => ['_sqlite_func_year', 1]
-	];
+        // Y
+        'YEAR' => ['_sqlite_func_year', 1]
+    ];
 
-	foreach ($fonctions as $f => $r) {
-		_sqlite_add_function($sqlite, $f, $r);
-	}
+    foreach ($fonctions as $f => $r) {
+        _sqlite_add_function($sqlite, $f, $r);
+    }
 
-	#spip_log('functions sqlite chargees ','sqlite.'._LOG_DEBUG);
+    #spip_log('functions sqlite chargees ','sqlite.'._LOG_DEBUG);
 }
 
 
@@ -147,9 +147,9 @@ 
  *
 **/
 function _sqlite_add_function(&$sqlite, &$f, &$r) {
-	isset($r[1])
-		? $sqlite->sqliteCreateFunction($f, $r[0], $r[1])
-		: $sqlite->sqliteCreateFunction($f, $r[0]);
+    isset($r[1])
+        ? $sqlite->sqliteCreateFunction($f, $r[0], $r[1])
+        : $sqlite->sqliteCreateFunction($f, $r[0]);
 }
 
 /**
@@ -159,7 +159,7 @@ 
  * @return int
  */
 function _sqlite_func_ceil($a) {
-	return ceil($a);
+    return ceil($a);
 }
 
 /**
@@ -169,7 +169,7 @@ 
  * @return string
  */
 function _sqlite_func_concat(...$args) {
-	return join('', $args);
+    return join('', $args);
 }
 
 
@@ -182,7 +182,7 @@ 
  * @return string
  */
 function _sqlite_func_dayofmonth($d) {
-	return _sqlite_func_date('d', $d);
+    return _sqlite_func_date('d', $d);
 }
 
 
@@ -194,15 +194,15 @@ 
  * @return int
  */
 function _sqlite_func_find_in_set($num, $set) {
-	$rank = 0;
-	foreach (explode(',', $set) as $v) {
-		if ($v == $num) {
-			return (++$rank);
-		}
-		$rank++;
-	}
-
-	return 0;
+    $rank = 0;
+    foreach (explode(',', $set) as $v) {
+        if ($v == $num) {
+            return (++$rank);
+        }
+        $rank++;
+    }
+
+    return 0;
 }
 
 /**
@@ -212,7 +212,7 @@ 
  * @return int
  */
 function _sqlite_func_floor($a) {
-	return floor($a);
+    return floor($a);
 }
 
 
@@ -225,7 +225,7 @@ 
  * @return mixed
  */
 function _sqlite_func_if($bool, $oui, $non) {
-	return ($bool) ? $oui : $non;
+    return ($bool) ? $oui : $non;
 }
 
 
@@ -242,10 +242,10 @@ 
  * @return string
  */
 function _sqlite_func_insert($s, $index, $longueur, $chaine) {
-	return
-		substr($s, 0, $index)
-		. $chaine
-		. substr(substr($s, $index), $longueur);
+    return
+        substr($s, 0, $index)
+        . $chaine
+        . substr(substr($s, $index), $longueur);
 }
 
 
@@ -257,7 +257,7 @@ 
  * @return int
  */
 function _sqlite_func_instr($s, $search) {
-	return strpos($s, $search);
+    return strpos($s, $search);
 }
 
 
@@ -268,7 +268,7 @@ 
  * @return int
  */
 function _sqlite_func_least(...$args) {
-	return min($args);
+    return min($args);
 }
 
 
@@ -279,7 +279,7 @@ 
  * @return int
  */
 function _sqlite_func_greatest(...$args) {
-	return max($args);
+    return max($args);
 }
 
 
@@ -291,7 +291,7 @@ 
  * @return string
  */
 function _sqlite_func_left($s, $lenght) {
-	return substr($s, $lenght);
+    return substr($s, $lenght);
 }
 
 /**
@@ -301,13 +301,13 @@ 
  * @return string
  */
 function _sqlite_func_now($force_refresh = false) {
-	static $now = null;
-	if (is_null($now) or $force_refresh) {
-		$now = date('Y-m-d H:i:s');
-	}
+    static $now = null;
+    if (is_null($now) or $force_refresh) {
+        $now = date('Y-m-d H:i:s');
+    }
 
-	#spip_log("Passage avec NOW : $now | ".time(),'sqlite.'._LOG_DEBUG);
-	return $now;
+    #spip_log("Passage avec NOW : $now | ".time(),'sqlite.'._LOG_DEBUG);
+    return $now;
 }
 
 
@@ -320,7 +320,7 @@ 
  * @return string
  */
 function _sqlite_func_month($d) {
-	return _sqlite_func_date('m', $d);
+    return _sqlite_func_date('m', $d);
 }
 
 
@@ -333,10 +333,10 @@ 
  * @return string
  */
 function _sqlite_func_preg_replace($quoi, $cherche, $remplace) {
-	$return = preg_replace('%' . $cherche . '%', $remplace, $quoi);
+    $return = preg_replace('%' . $cherche . '%', $remplace, $quoi);
 
-	#spip_log("preg_replace : $quoi, $cherche, $remplace, $return",'sqlite.'._LOG_DEBUG);
-	return $return;
+    #spip_log("preg_replace : $quoi, $cherche, $remplace, $return",'sqlite.'._LOG_DEBUG);
+    return $return;
 }
 
 /**
@@ -349,13 +349,13 @@ 
  * @return string, l'extrait trouve.
  **/
 function _sqlite_func_extraire_multi($quoi, $lang) {
-	if (strpos($quoi, '<') !== false) {
-		include_spip("src/Texte/Collecteur/AbstractCollecteur");
-		include_spip("src/Texte/Collecteur/Multis");
-		$collecteurMultis = new Spip\Texte\Collecteur\Multis();
-		$quoi = $collecteurMultis->traiter($quoi, ['lang' => $lang, 'appliquer_typo' => false]);
-	}
-	return $quoi;
+    if (strpos($quoi, '<') !== false) {
+        include_spip("src/Texte/Collecteur/AbstractCollecteur");
+        include_spip("src/Texte/Collecteur/Multis");
+        $collecteurMultis = new Spip\Texte\Collecteur\Multis();
+        $quoi = $collecteurMultis->traiter($quoi, ['lang' => $lang, 'appliquer_typo' => false]);
+    }
+    return $quoi;
 }
 
 
@@ -365,7 +365,7 @@ 
  * @return float
  */
 function _sqlite_func_rand() {
-	return random_int(0, mt_getrandmax());
+    return random_int(0, mt_getrandmax());
 }
 
 
@@ -377,7 +377,7 @@ 
  * @return string
  */
 function _sqlite_func_right($s, $length) {
-	return substr($s, 0 - $length);
+    return substr($s, 0 - $length);
 }
 
 
@@ -389,17 +389,17 @@ 
  * @return bool
  */
 function _sqlite_func_regexp_match($cherche, $quoi) {
-	// optimiser un cas tres courant avec les requetes en base
-	if (!$quoi and !strlen($quoi)) {
-		return false;
-	}
-	// il faut enlever un niveau d'echappement pour être homogène à mysql
-	$cherche = str_replace('\\\\', '\\', $cherche);
-	$u = $GLOBALS['meta']['pcre_u'] ?? 'u';
-	$return = preg_match('%' . $cherche . '%imsS' . $u, $quoi);
-
-	#spip_log("regexp_replace : $quoi, $cherche, $remplace, $return",'sqlite.'._LOG_DEBUG);
-	return $return;
+    // optimiser un cas tres courant avec les requetes en base
+    if (!$quoi and !strlen($quoi)) {
+        return false;
+    }
+    // il faut enlever un niveau d'echappement pour être homogène à mysql
+    $cherche = str_replace('\\\\', '\\', $cherche);
+    $u = $GLOBALS['meta']['pcre_u'] ?? 'u';
+    $return = preg_match('%' . $cherche . '%imsS' . $u, $quoi);
+
+    #spip_log("regexp_replace : $quoi, $cherche, $remplace, $return",'sqlite.'._LOG_DEBUG);
+    return $return;
 }
 
 
@@ -414,8 +414,8 @@ 
  * @return string
  */
 function _sqlite_func_date_format($date, $conv) {
-	$conv = _sqlite_func_strftime_format_converter($conv);
-	return strftime($conv, is_int($date) ? $date : strtotime($date));
+    $conv = _sqlite_func_strftime_format_converter($conv);
+    return strftime($conv, is_int($date) ? $date : strtotime($date));
 }
 
 /**
@@ -431,28 +431,28 @@ 
  * @return void
  */
 function _sqlite_func_strftime_format_converter(string $conv): string {
-	// ok : %a %b %d %e %H %I %l %j %k %m %p %r %S %T %w %y %Y
-	// on ne sait pas en gérer certains...
-	static $mysql_to_strftime_not_ok = ['%c', '%D', '%f', '%U', '%V', '%W', '%X'];
-	static $mysql_to_strftime = [
-		'%h' => '%I',
-		'%i' => '%M',
-		'%M' => '%B',
-		'%s' => '%S',
-		'%u' => '%U',
-		'%v' => '%V',
-		'%x' => '%G',
-	];
-	static $to_strftime = [];
-	if (!isset($to_strftime[$conv])) {
-		$count = 0;
-		str_replace($mysql_to_strftime_not_ok, '', $conv, $count);
-		if ($count > 0) {
-			spip_log("DATE_FORMAT : At least one parameter can't be parsed by strftime with format '$conv'", 'sqlite.' . _LOG_ERREUR);
-		}
-		$to_strftime[$conv] = str_replace(array_keys($mysql_to_strftime), $mysql_to_strftime, $conv);
-	}
-	return $to_strftime[$conv];
+    // ok : %a %b %d %e %H %I %l %j %k %m %p %r %S %T %w %y %Y
+    // on ne sait pas en gérer certains...
+    static $mysql_to_strftime_not_ok = ['%c', '%D', '%f', '%U', '%V', '%W', '%X'];
+    static $mysql_to_strftime = [
+        '%h' => '%I',
+        '%i' => '%M',
+        '%M' => '%B',
+        '%s' => '%S',
+        '%u' => '%U',
+        '%v' => '%V',
+        '%x' => '%G',
+    ];
+    static $to_strftime = [];
+    if (!isset($to_strftime[$conv])) {
+        $count = 0;
+        str_replace($mysql_to_strftime_not_ok, '', $conv, $count);
+        if ($count > 0) {
+            spip_log("DATE_FORMAT : At least one parameter can't be parsed by strftime with format '$conv'", 'sqlite.' . _LOG_ERREUR);
+        }
+        $to_strftime[$conv] = str_replace(array_keys($mysql_to_strftime), $mysql_to_strftime, $conv);
+    }
+    return $to_strftime[$conv];
 }
 
 /**
@@ -466,11 +466,11 @@ 
  * @return int
  */
 function _sqlite_func_to_days($d) {
-	static $offset = 719528; // nb de jour entre 0000-00-00 et timestamp 0=1970-01-01
-	$result = $offset + (int)ceil(_sqlite_func_unix_timestamp($d) / (24 * 3600));
+    static $offset = 719528; // nb de jour entre 0000-00-00 et timestamp 0=1970-01-01
+    $result = $offset + (int)ceil(_sqlite_func_unix_timestamp($d) / (24 * 3600));
 
-	#spip_log("Passage avec TO_DAYS : $d, $result",'sqlite.'._LOG_DEBUG);
-	return $result;
+    #spip_log("Passage avec TO_DAYS : $d, $result",'sqlite.'._LOG_DEBUG);
+    return $result;
 }
 
 /**
@@ -482,13 +482,13 @@ 
  * @return string
  */
 function _sqlite_func_substring($string, $start, $len = null) {
-	// SQL compte a partir de 1, php a partir de 0
-	$start = ($start > 0) ? $start - 1 : $start;
-	if (is_null($len)) {
-		return substr($string, $start);
-	} else {
-		return substr($string, $start, $len);
-	}
+    // SQL compte a partir de 1, php a partir de 0
+    $start = ($start > 0) ? $start - 1 : $start;
+    if (is_null($len)) {
+        return substr($string, $start);
+    } else {
+        return substr($string, $start, $len);
+    }
 }
 
 /**
@@ -504,33 +504,33 @@ 
  * @return int
  */
 function _sqlite_timestampdiff($unit, $date1, $date2) {
-	$d1 = date_create($date1);
-	$d2 = date_create($date2);
-	$diff = date_diff($d1, $d2);
-	$inv = $diff->invert ? -1 : 1;
-	switch ($unit) {
-		case 'YEAR':
-			return $inv * $diff->y;
-		case 'QUARTER':
-			return $inv * (4 * $diff->y + intval(floor($diff->m / 3)));
-		case 'MONTH':
-			return $inv * (12 * $diff->y + $diff->m);
-		case 'WEEK':
-			return $inv * intval(floor($diff->days / 7));
-		case 'DAY':
-			#var_dump($inv*$diff->days);
-			return $inv * $diff->days;
-		case 'HOUR':
-			return $inv * (24 * $diff->days + $diff->h);
-		case 'MINUTE':
-			return $inv * ((24 * $diff->days + $diff->h) * 60 + $diff->i);
-		case 'SECOND':
-			return $inv * (((24 * $diff->days + $diff->h) * 60 + $diff->i) * 60 + $diff->s);
-		case 'MICROSECOND':
-			return $inv * (((24 * $diff->days + $diff->h) * 60 + $diff->i) * 60 + $diff->s) * 1_000_000;
-	}
-
-	return 0;
+    $d1 = date_create($date1);
+    $d2 = date_create($date2);
+    $diff = date_diff($d1, $d2);
+    $inv = $diff->invert ? -1 : 1;
+    switch ($unit) {
+        case 'YEAR':
+            return $inv * $diff->y;
+        case 'QUARTER':
+            return $inv * (4 * $diff->y + intval(floor($diff->m / 3)));
+        case 'MONTH':
+            return $inv * (12 * $diff->y + $diff->m);
+        case 'WEEK':
+            return $inv * intval(floor($diff->days / 7));
+        case 'DAY':
+            #var_dump($inv*$diff->days);
+            return $inv * $diff->days;
+        case 'HOUR':
+            return $inv * (24 * $diff->days + $diff->h);
+        case 'MINUTE':
+            return $inv * ((24 * $diff->days + $diff->h) * 60 + $diff->i);
+        case 'SECOND':
+            return $inv * (((24 * $diff->days + $diff->h) * 60 + $diff->i) * 60 + $diff->s);
+        case 'MICROSECOND':
+            return $inv * (((24 * $diff->days + $diff->h) * 60 + $diff->i) * 60 + $diff->s) * 1_000_000;
+    }
+
+    return 0;
 }
 
 /**
@@ -540,24 +540,24 @@ 
  * @return int
  */
 function _sqlite_func_unix_timestamp($d) {
-	static $mem = [];
-	static $n = 0;
-	if (isset($mem[$d])) {
-		return $mem[$d];
-	}
-	if ($n++ > 100) {
-		$mem = [];
-		$n = 0;
-	}
-
-	//2005-12-02 20:53:53
-	#spip_log("Passage avec UNIX_TIMESTAMP : $d",'sqlite.'._LOG_DEBUG);
-	if (!$d) {
-		return $mem[$d] = time();
-	}
-
-	// une pile plus grosse n'accelere pas le calcul
-	return $mem[$d] = strtotime($d);
+    static $mem = [];
+    static $n = 0;
+    if (isset($mem[$d])) {
+        return $mem[$d];
+    }
+    if ($n++ > 100) {
+        $mem = [];
+        $n = 0;
+    }
+
+    //2005-12-02 20:53:53
+    #spip_log("Passage avec UNIX_TIMESTAMP : $d",'sqlite.'._LOG_DEBUG);
+    if (!$d) {
+        return $mem[$d] = time();
+    }
+
+    // une pile plus grosse n'accelere pas le calcul
+    return $mem[$d] = strtotime($d);
 }
 
 
@@ -570,7 +570,7 @@ 
  * @return string
  */
 function _sqlite_func_year($d) {
-	return _sqlite_func_date('Y', $d);
+    return _sqlite_func_date('Y', $d);
 }
 
 /**
@@ -583,20 +583,20 @@ 
  * @return string
  */
 function _sqlite_func_date($quoi, $d) {
-	static $mem = [];
-	static $n = 0;
-	if (isset($mem[$d])) {
-		return $mem[$d][$quoi];
-	}
-	if ($n++ > 100) {
-		$mem = [];
-		$n = 0;
-	}
-
-	$dec = date('Y-m-d', _sqlite_func_unix_timestamp($d));
-	$mem[$d] = ['Y' => substr($dec, 0, 4), 'm' => substr($dec, 5, 2), 'd' => substr($dec, 8, 2)];
-
-	return $mem[$d][$quoi];
+    static $mem = [];
+    static $n = 0;
+    if (isset($mem[$d])) {
+        return $mem[$d][$quoi];
+    }
+    if ($n++ > 100) {
+        $mem = [];
+        $n = 0;
+    }
+
+    $dec = date('Y-m-d', _sqlite_func_unix_timestamp($d));
+    $mem[$d] = ['Y' => substr($dec, 0, 4), 'm' => substr($dec, 5, 2), 'd' => substr($dec, 8, 2)];
+
+    return $mem[$d][$quoi];
 }
 
 /**
@@ -605,5 +605,5 @@ 
  * @return void
  */
 function _sqlite_func_vide() {
-	return;
+    return;
 }