spip / SPIP

prive/formulaires/dater.php

Indentation +260 added lines, -260 removed lines

@@ -17,7 +17,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -45,130 +45,130 @@ 
  **/
 function formulaires_dater_charger_dist($objet, $id_objet, $retour = '', $options = array()) {
 
-	$objet = objet_type($objet);
-	if (!$objet or !intval($id_objet)) {
-		return false;
-	}
-
-	if (!is_array($options)) {
-		$options = unserialize($options);
-	}
-
-	$_id_objet = id_table_objet($objet);
-	$table = table_objet($objet);
-	$trouver_table = charger_fonction('trouver_table', 'base');
-	$desc = $trouver_table($table);
-
-	if (!$desc) {
-		return false;
-	}
-
-	$champ_date = $desc['date'] ? $desc['date'] : 'date';
-	if (isset($options['champ_date']) and $options['champ_date']) {
-		$champ_date = $options['champ_date'];
-	}
-	if (!isset($desc['field'][$champ_date])) {
-		return false;
-	}
-
-	$valeurs = array(
-		'objet' => $objet,
-		'id_objet' => $id_objet,
-		'id' => $id_objet,
-	);
-
-
-	$select = "$champ_date as date";
-	$champ_date_redac = 'date_redac';
-	if (isset($options['champ_date_redac']) and $options['champ_date_redac']) {
-		$champ_date_redac = $options['champ_date_redac'];
-	}
-	if (isset($desc['field'][$champ_date_redac])) {
-		$select .= ",$champ_date_redac as date_redac";
-	}
-	if (isset($desc['field']['statut'])) {
-		$select .= ",statut";
-	}
-
-
-	$row = sql_fetsel($select, $desc['table'], "$_id_objet=" . intval($id_objet));
-	$statut = isset($row['statut']) ? $row['statut'] : 'publie'; // pas de statut => publie
-
-	$valeurs['editable'] = autoriser('dater', $objet, $id_objet, null, array('statut' => $statut));
-
-	$possedeDateRedac = false;
-
-	if (isset($row['date_redac']) and
-		$regs = recup_date($row['date_redac'], false)
-	) {
-		$annee_redac = $regs[0];
-		$mois_redac = $regs[1];
-		$jour_redac = $regs[2];
-		$heure_redac = $regs[3];
-		$minute_redac = $regs[4];
-		$possedeDateRedac = true;
-		// attention : les vrai dates de l'annee 1 sont stockee avec +9000 => 9001
-		// mais reviennent ici en annee 1 par recup_date
-		// on verifie donc que le intval($row['date_redac']) qui ressort l'annee
-		// est bien lui aussi <=1 : dans ce cas c'est une date sql 'nulle' ou presque, selon
-		// le gestionnnaire sql utilise (0001-01-01 pour PG par exemple)
-		if (intval($row['date_redac']) <= 1 and ($annee_redac <= 1) and ($mois_redac <= 1) and ($jour_redac <= 1)) {
-			$possedeDateRedac = false;
-		}
-	} else {
-		$annee_redac = $mois_redac = $jour_redac = $heure_redac = $minute_redac = 0;
-	}
-
-	if ($regs = recup_date($row['date'], false)) {
-		$annee = $regs[0];
-		$mois = $regs[1];
-		$jour = $regs[2];
-		$heure = $regs[3];
-		$minute = $regs[4];
-	}
-
-	// attention, si la variable s'appelle date ou date_redac, le compilo va
-	// la normaliser, ce qu'on ne veut pas ici.
-	$valeurs['afficher_date_redac'] = ($possedeDateRedac ? $row['date_redac'] : '');
-	$valeurs['date_redac_jour'] = dater_formater_saisie_jour($jour_redac, $mois_redac, $annee_redac);
-	$valeurs['date_redac_heure'] = "$heure_redac:$minute_redac";
-
-	$valeurs['afficher_date'] = $row['date'];
-	$valeurs['date_jour'] = dater_formater_saisie_jour($jour, $mois, $annee);
-	$valeurs['date_heure'] = "$heure:$minute";
-
-	$valeurs['sans_redac'] = !$possedeDateRedac;
-
-	if (isset($options['date_redac'])) {
-		$valeurs['_editer_date_anterieure'] = $options['date_redac'];
-	} else {
-		$valeurs['_editer_date_anterieure'] = ($objet == 'article' and ($GLOBALS['meta']['articles_redac'] != 'non' or $possedeDateRedac));
-	}
-	$valeurs['_label_date'] = (($statut == 'publie') ?
-		_T('texte_date_publication_objet') : _T('texte_date_creation_objet'));
-	if (isset($options['label_date']) and $options['label_date']) {
-		$valeurs['_label_date'] = $options['label_date'];
-	}
-	if (isset($options['label_date_redac']) and $options['label_date_redac']) {
-		$valeurs['_label_date_redac'] = $options['label_date_redac'];
-	}
-	if (isset($options['texte_sans_date_redac']) and $options['texte_sans_date_redac']) {
-		$valeurs['_texte_sans_date_redac'] = $options['texte_sans_date_redac'];
-	}
-	if (isset($options['class']) and $options['class']) {
-		$valeurs['_class'] = $options['class'];
-	}
-
-	$valeurs['_saisie_en_cours'] = (_request('_saisie_en_cours') !== null or _request('date_jour') !== null);
-
-	// cas ou l'on ne peut pas dater mais on peut modifier la date de redac anterieure
-	// https://core.spip.net/issues/3494
-	$valeurs['_editer_date'] = $valeurs['editable'];
-	if ($valeurs['_editer_date_anterieure'] and !$valeurs['editable']) {
-		$valeurs['editable'] = autoriser('modifier', $objet, $id_objet);
-	}
-
-	return $valeurs;
+    $objet = objet_type($objet);
+    if (!$objet or !intval($id_objet)) {
+        return false;
+    }
+
+    if (!is_array($options)) {
+        $options = unserialize($options);
+    }
+
+    $_id_objet = id_table_objet($objet);
+    $table = table_objet($objet);
+    $trouver_table = charger_fonction('trouver_table', 'base');
+    $desc = $trouver_table($table);
+
+    if (!$desc) {
+        return false;
+    }
+
+    $champ_date = $desc['date'] ? $desc['date'] : 'date';
+    if (isset($options['champ_date']) and $options['champ_date']) {
+        $champ_date = $options['champ_date'];
+    }
+    if (!isset($desc['field'][$champ_date])) {
+        return false;
+    }
+
+    $valeurs = array(
+        'objet' => $objet,
+        'id_objet' => $id_objet,
+        'id' => $id_objet,
+    );
+
+
+    $select = "$champ_date as date";
+    $champ_date_redac = 'date_redac';
+    if (isset($options['champ_date_redac']) and $options['champ_date_redac']) {
+        $champ_date_redac = $options['champ_date_redac'];
+    }
+    if (isset($desc['field'][$champ_date_redac])) {
+        $select .= ",$champ_date_redac as date_redac";
+    }
+    if (isset($desc['field']['statut'])) {
+        $select .= ",statut";
+    }
+
+
+    $row = sql_fetsel($select, $desc['table'], "$_id_objet=" . intval($id_objet));
+    $statut = isset($row['statut']) ? $row['statut'] : 'publie'; // pas de statut => publie
+
+    $valeurs['editable'] = autoriser('dater', $objet, $id_objet, null, array('statut' => $statut));
+
+    $possedeDateRedac = false;
+
+    if (isset($row['date_redac']) and
+        $regs = recup_date($row['date_redac'], false)
+    ) {
+        $annee_redac = $regs[0];
+        $mois_redac = $regs[1];
+        $jour_redac = $regs[2];
+        $heure_redac = $regs[3];
+        $minute_redac = $regs[4];
+        $possedeDateRedac = true;
+        // attention : les vrai dates de l'annee 1 sont stockee avec +9000 => 9001
+        // mais reviennent ici en annee 1 par recup_date
+        // on verifie donc que le intval($row['date_redac']) qui ressort l'annee
+        // est bien lui aussi <=1 : dans ce cas c'est une date sql 'nulle' ou presque, selon
+        // le gestionnnaire sql utilise (0001-01-01 pour PG par exemple)
+        if (intval($row['date_redac']) <= 1 and ($annee_redac <= 1) and ($mois_redac <= 1) and ($jour_redac <= 1)) {
+            $possedeDateRedac = false;
+        }
+    } else {
+        $annee_redac = $mois_redac = $jour_redac = $heure_redac = $minute_redac = 0;
+    }
+
+    if ($regs = recup_date($row['date'], false)) {
+        $annee = $regs[0];
+        $mois = $regs[1];
+        $jour = $regs[2];
+        $heure = $regs[3];
+        $minute = $regs[4];
+    }
+
+    // attention, si la variable s'appelle date ou date_redac, le compilo va
+    // la normaliser, ce qu'on ne veut pas ici.
+    $valeurs['afficher_date_redac'] = ($possedeDateRedac ? $row['date_redac'] : '');
+    $valeurs['date_redac_jour'] = dater_formater_saisie_jour($jour_redac, $mois_redac, $annee_redac);
+    $valeurs['date_redac_heure'] = "$heure_redac:$minute_redac";
+
+    $valeurs['afficher_date'] = $row['date'];
+    $valeurs['date_jour'] = dater_formater_saisie_jour($jour, $mois, $annee);
+    $valeurs['date_heure'] = "$heure:$minute";
+
+    $valeurs['sans_redac'] = !$possedeDateRedac;
+
+    if (isset($options['date_redac'])) {
+        $valeurs['_editer_date_anterieure'] = $options['date_redac'];
+    } else {
+        $valeurs['_editer_date_anterieure'] = ($objet == 'article' and ($GLOBALS['meta']['articles_redac'] != 'non' or $possedeDateRedac));
+    }
+    $valeurs['_label_date'] = (($statut == 'publie') ?
+        _T('texte_date_publication_objet') : _T('texte_date_creation_objet'));
+    if (isset($options['label_date']) and $options['label_date']) {
+        $valeurs['_label_date'] = $options['label_date'];
+    }
+    if (isset($options['label_date_redac']) and $options['label_date_redac']) {
+        $valeurs['_label_date_redac'] = $options['label_date_redac'];
+    }
+    if (isset($options['texte_sans_date_redac']) and $options['texte_sans_date_redac']) {
+        $valeurs['_texte_sans_date_redac'] = $options['texte_sans_date_redac'];
+    }
+    if (isset($options['class']) and $options['class']) {
+        $valeurs['_class'] = $options['class'];
+    }
+
+    $valeurs['_saisie_en_cours'] = (_request('_saisie_en_cours') !== null or _request('date_jour') !== null);
+
+    // cas ou l'on ne peut pas dater mais on peut modifier la date de redac anterieure
+    // https://core.spip.net/issues/3494
+    $valeurs['_editer_date'] = $valeurs['editable'];
+    if ($valeurs['_editer_date_anterieure'] and !$valeurs['editable']) {
+        $valeurs['editable'] = autoriser('modifier', $objet, $id_objet);
+    }
+
+    return $valeurs;
 }
 
 /**
@@ -186,20 +186,20 @@ 
  *     Date formatée tel que `02/10/2012`
  **/
 function dater_formater_saisie_jour($jour, $mois, $annee, $sep = '/') {
-	$annee = str_pad($annee, 4, '0', STR_PAD_LEFT);
-	if (intval($jour)) {
-		$jour = str_pad($jour, 2, '0', STR_PAD_LEFT);
-		$mois = str_pad($mois, 2, '0', STR_PAD_LEFT);
+    $annee = str_pad($annee, 4, '0', STR_PAD_LEFT);
+    if (intval($jour)) {
+        $jour = str_pad($jour, 2, '0', STR_PAD_LEFT);
+        $mois = str_pad($mois, 2, '0', STR_PAD_LEFT);
 
-		return "$jour$sep$mois$sep$annee";
-	}
-	if (intval($mois)) {
-		$mois = str_pad($mois, 2, '0', STR_PAD_LEFT);
+        return "$jour$sep$mois$sep$annee";
+    }
+    if (intval($mois)) {
+        $mois = str_pad($mois, 2, '0', STR_PAD_LEFT);
 
-		return "$mois$sep$annee";
-	}
+        return "$mois$sep$annee";
+    }
 
-	return $annee;
+    return $annee;
 }
 
 /**
@@ -218,7 +218,7 @@ 
  *     Hash du formulaire
  **/
 function formulaires_dater_identifier_dist($objet, $id_objet, $retour = '', $options = array()) {
-	return serialize(array($objet, $id_objet));
+    return serialize(array($objet, $id_objet));
 }
 
 /**
@@ -236,30 +236,30 @@ 
  *     Tableau des erreurs
  */
 function formulaires_dater_verifier_dist($objet, $id_objet, $retour = '', $options = array()) {
-	$erreurs = array();
-
-	// ouvrir le formulaire en edition ?
-	if (_request('_saisie_en_cours')) {
-		$erreurs['message_erreur'] = '';
-
-		return $erreurs;
-	}
-
-	if (_request('changer')) {
-		foreach (array('date', 'date_redac') as $k) {
-			if ($v = _request($k . '_jour') and !dater_recuperer_date_saisie($v, $k)) {
-				$erreurs[$k] = _T('format_date_incorrecte');
-			} elseif ($v = _request($k . '_heure') and !dater_recuperer_heure_saisie($v)) {
-				$erreurs[$k] = _T('format_heure_incorrecte');
-			}
-		}
-
-		if (!_request('date_jour')) {
-			$erreurs['date'] = _T('info_obligatoire');
-		}
-	}
-
-	return $erreurs;
+    $erreurs = array();
+
+    // ouvrir le formulaire en edition ?
+    if (_request('_saisie_en_cours')) {
+        $erreurs['message_erreur'] = '';
+
+        return $erreurs;
+    }
+
+    if (_request('changer')) {
+        foreach (array('date', 'date_redac') as $k) {
+            if ($v = _request($k . '_jour') and !dater_recuperer_date_saisie($v, $k)) {
+                $erreurs[$k] = _T('format_date_incorrecte');
+            } elseif ($v = _request($k . '_heure') and !dater_recuperer_heure_saisie($v)) {
+                $erreurs[$k] = _T('format_heure_incorrecte');
+            }
+        }
+
+        if (!_request('date_jour')) {
+            $erreurs['date'] = _T('info_obligatoire');
+        }
+    }
+
+    return $erreurs;
 }
 
 /**
@@ -277,79 +277,79 @@ 
  *     Retours des traitements
  */
 function formulaires_dater_traiter_dist($objet, $id_objet, $retour = '', $options = array()) {
-	$res = array('editable' => ' ');
-
-	if (_request('changer')) {
-		$table = table_objet($objet);
-		$trouver_table = charger_fonction('trouver_table', 'base');
-		$desc = $trouver_table($table);
-
-		if (!$desc) {
-			return array('message_erreur' => _L('erreur'));
-		} #impossible en principe
-
-		$champ_date = $desc['date'] ? $desc['date'] : 'date';
-		if (isset($options['champ_date']) and $options['champ_date']) {
-			$champ_date = $options['champ_date'];
-		}
-
-		$set = array();
-
-		$charger = charger_fonction('charger', 'formulaires/dater/');
-		$v = $charger($objet, $id_objet, $retour, $options);
-
-		if ($v['_editer_date']) {
-			if (!$d = dater_recuperer_date_saisie(_request('date_jour'))) {
-				$d = array(date('Y'), date('m'), date('d'));
-			}
-			if (!$h = dater_recuperer_heure_saisie(_request('date_heure'))) {
-				$h = array(0, 0);
-			}
-
-			$set[$champ_date] = sql_format_date($d[0], $d[1], $d[2], $h[0], $h[1]);
-		}
-
-		$champ_date_redac = 'date_redac';
-		if (isset($options['champ_date_redac']) and $options['champ_date_redac']) {
-			$champ_date_redac = $options['champ_date_redac'];
-		}
-		if (isset($desc['field'][$champ_date_redac]) and $v['_editer_date_anterieure']) {
-			if (!_request('date_redac_jour') or _request('sans_redac')) {
-				$set[$champ_date_redac] = sql_format_date(0, 0, 0, 0, 0, 0);
-			} else {
-				if (!$d = dater_recuperer_date_saisie(_request('date_redac_jour'), 'date_redac')) {
-					$d = array(date('Y'), date('m'), date('d'));
-				}
-				if (!$h = dater_recuperer_heure_saisie(_request('date_redac_heure'))) {
-					$h = array(0, 0);
-				}
-				$set[$champ_date_redac] = sql_format_date($d[0], $d[1], $d[2], $h[0], $h[1]);
-			}
-		}
-
-		if (count($set)) {
-			$publie_avant = objet_test_si_publie($objet, $id_objet);
-			include_spip('action/editer_objet');
-			objet_modifier($objet, $id_objet, $set);
-			$publie_apres = objet_test_si_publie($objet, $id_objet);
-			if ($publie_avant !== $publie_apres) {
-				// on refuse ajax pour forcer le rechargement de la page ici
-				// on refera traiter une 2eme fois, mais c'est sans consequence
-				refuser_traiter_formulaire_ajax();
-			}
-		}
-	}
-
-	if ($retour) {
-		$res['redirect'] = $retour;
-	}
-
-	set_request('date_jour');
-	set_request('date_redac_jour');
-	set_request('date_heure');
-	set_request('date_redac_heure');
-
-	return $res;
+    $res = array('editable' => ' ');
+
+    if (_request('changer')) {
+        $table = table_objet($objet);
+        $trouver_table = charger_fonction('trouver_table', 'base');
+        $desc = $trouver_table($table);
+
+        if (!$desc) {
+            return array('message_erreur' => _L('erreur'));
+        } #impossible en principe
+
+        $champ_date = $desc['date'] ? $desc['date'] : 'date';
+        if (isset($options['champ_date']) and $options['champ_date']) {
+            $champ_date = $options['champ_date'];
+        }
+
+        $set = array();
+
+        $charger = charger_fonction('charger', 'formulaires/dater/');
+        $v = $charger($objet, $id_objet, $retour, $options);
+
+        if ($v['_editer_date']) {
+            if (!$d = dater_recuperer_date_saisie(_request('date_jour'))) {
+                $d = array(date('Y'), date('m'), date('d'));
+            }
+            if (!$h = dater_recuperer_heure_saisie(_request('date_heure'))) {
+                $h = array(0, 0);
+            }
+
+            $set[$champ_date] = sql_format_date($d[0], $d[1], $d[2], $h[0], $h[1]);
+        }
+
+        $champ_date_redac = 'date_redac';
+        if (isset($options['champ_date_redac']) and $options['champ_date_redac']) {
+            $champ_date_redac = $options['champ_date_redac'];
+        }
+        if (isset($desc['field'][$champ_date_redac]) and $v['_editer_date_anterieure']) {
+            if (!_request('date_redac_jour') or _request('sans_redac')) {
+                $set[$champ_date_redac] = sql_format_date(0, 0, 0, 0, 0, 0);
+            } else {
+                if (!$d = dater_recuperer_date_saisie(_request('date_redac_jour'), 'date_redac')) {
+                    $d = array(date('Y'), date('m'), date('d'));
+                }
+                if (!$h = dater_recuperer_heure_saisie(_request('date_redac_heure'))) {
+                    $h = array(0, 0);
+                }
+                $set[$champ_date_redac] = sql_format_date($d[0], $d[1], $d[2], $h[0], $h[1]);
+            }
+        }
+
+        if (count($set)) {
+            $publie_avant = objet_test_si_publie($objet, $id_objet);
+            include_spip('action/editer_objet');
+            objet_modifier($objet, $id_objet, $set);
+            $publie_apres = objet_test_si_publie($objet, $id_objet);
+            if ($publie_avant !== $publie_apres) {
+                // on refuse ajax pour forcer le rechargement de la page ici
+                // on refera traiter une 2eme fois, mais c'est sans consequence
+                refuser_traiter_formulaire_ajax();
+            }
+        }
+    }
+
+    if ($retour) {
+        $res['redirect'] = $retour;
+    }
+
+    set_request('date_jour');
+    set_request('date_redac_jour');
+    set_request('date_heure');
+    set_request('date_redac_heure');
+
+    return $res;
 }
 
 /**
@@ -360,24 +360,24 @@ 
  * @return array|string Chaîne vide si date invalide, tableau (année, mois, jour) sinon.
  */
 function dater_recuperer_date_saisie($post, $quoi = 'date') {
-	if (!preg_match('#^(?:(?:([0-9]{1,2})[/-])?([0-9]{1,2})[/-])?([0-9]{4}|[0-9]{1,2})#', $post, $regs)) {
-		return '';
-	}
-	if ($quoi == 'date_redac') {
-		if ($regs[3] <> '' and $regs[3] < 1001) {
-			$regs[3] += 9000;
-		}
-
-		return array($regs[3], $regs[2], $regs[1]);
-	} else {
-		if (
-			checkdate(intval($regs[2]), intval($regs[1]), intval($regs[3]))
-			and $t = mktime(0, 0, 0, $regs[2], $regs[1], $regs[3])
-		) {
-			return array(date('Y', $t), date('m', $t), date('d', $t));
-		}
-		return '';
-	}
+    if (!preg_match('#^(?:(?:([0-9]{1,2})[/-])?([0-9]{1,2})[/-])?([0-9]{4}|[0-9]{1,2})#', $post, $regs)) {
+        return '';
+    }
+    if ($quoi == 'date_redac') {
+        if ($regs[3] <> '' and $regs[3] < 1001) {
+            $regs[3] += 9000;
+        }
+
+        return array($regs[3], $regs[2], $regs[1]);
+    } else {
+        if (
+            checkdate(intval($regs[2]), intval($regs[1]), intval($regs[3]))
+            and $t = mktime(0, 0, 0, $regs[2], $regs[1], $regs[3])
+        ) {
+            return array(date('Y', $t), date('m', $t), date('d', $t));
+        }
+        return '';
+    }
 }
 
 /**
@@ -387,12 +387,12 @@ 
  * @return array
  */
 function dater_recuperer_heure_saisie($post) {
-	if (!preg_match('#([0-9]{1,2})(?:[h:](?:([0-9]{1,2}))?)?#', $post, $regs)) {
-		return '';
-	}
-	if ($regs[1] > 23 or $regs[2] > 59) {
-		return '';
-	}
-
-	return array($regs[1], $regs[2]);
+    if (!preg_match('#([0-9]{1,2})(?:[h:](?:([0-9]{1,2}))?)?#', $post, $regs)) {
+        return '';
+    }
+    if ($regs[1] > 23 or $regs[2] > 59) {
+        return '';
+    }
+
+    return array($regs[1], $regs[2]);
 }

Spacing +3 added lines, -3 removed lines

@@ -91,7 +91,7 @@ 
 	}
 
 
-	$row = sql_fetsel($select, $desc['table'], "$_id_objet=" . intval($id_objet));
+	$row = sql_fetsel($select, $desc['table'], "$_id_objet=".intval($id_objet));
 	$statut = isset($row['statut']) ? $row['statut'] : 'publie'; // pas de statut => publie
 
 	$valeurs['editable'] = autoriser('dater', $objet, $id_objet, null, array('statut' => $statut));
@@ -247,9 +247,9 @@ 
 
 	if (_request('changer')) {
 		foreach (array('date', 'date_redac') as $k) {
-			if ($v = _request($k . '_jour') and !dater_recuperer_date_saisie($v, $k)) {
+			if ($v = _request($k.'_jour') and !dater_recuperer_date_saisie($v, $k)) {
 				$erreurs[$k] = _T('format_date_incorrecte');
-			} elseif ($v = _request($k . '_heure') and !dater_recuperer_heure_saisie($v)) {
+			} elseif ($v = _request($k.'_heure') and !dater_recuperer_heure_saisie($v)) {
 				$erreurs[$k] = _T('format_heure_incorrecte');
 			}
 		}

ecrire/action/redirect.php

Indentation +68 added lines, -68 removed lines

@@ -18,7 +18,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -36,55 +36,55 @@ 
  *   ```
  **/
 function action_redirect_dist() {
-	$type = _request('type');
-	$id = intval(_request('id'));
-	$page = false;
+    $type = _request('type');
+    $id = intval(_request('id'));
+    $page = false;
 
-	// verifier le type ou page transmis
-	if (!preg_match('/^\w+$/', $type)) {
-		$page = _request('page');
-		if (!preg_match('/^\w+$/', $page)) {
-			return;
-		}
-	}
+    // verifier le type ou page transmis
+    if (!preg_match('/^\w+$/', $type)) {
+        $page = _request('page');
+        if (!preg_match('/^\w+$/', $page)) {
+            return;
+        }
+    }
 
-	if ($var_mode = _request('var_mode')) {
-		// forcer la mise a jour de l'url de cet objet !
-		if (!defined('_VAR_URLS')) {
-			define('_VAR_URLS', true);
-		}
-	}
+    if ($var_mode = _request('var_mode')) {
+        // forcer la mise a jour de l'url de cet objet !
+        if (!defined('_VAR_URLS')) {
+            define('_VAR_URLS', true);
+        }
+    }
 
-	if ($page) {
-		$url = generer_url_public($page, '', true);
-	} else {
-		$url = calculer_url_redirect_entite($type, $id, $var_mode);
-	}
+    if ($page) {
+        $url = generer_url_public($page, '', true);
+    } else {
+        $url = calculer_url_redirect_entite($type, $id, $var_mode);
+    }
 
-	$status = '302';
-	if ($url) {
-		if ($var_mode) {
-			$url = parametre_url($url, 'var_mode', $var_mode, '&');
-		}
+    $status = '302';
+    if ($url) {
+        if ($var_mode) {
+            $url = parametre_url($url, 'var_mode', $var_mode, '&');
+        }
 
-		if ($var_mode == 'preview'
-			and defined('_PREVIEW_TOKEN')
-			and _PREVIEW_TOKEN
-			and autoriser('previsualiser')
-		) {
-			include_spip('inc/securiser_action');
-			$token = calculer_token_previsu($url);
-			$url = parametre_url($url, 'var_previewtoken', $token);
-		}
+        if ($var_mode == 'preview'
+            and defined('_PREVIEW_TOKEN')
+            and _PREVIEW_TOKEN
+            and autoriser('previsualiser')
+        ) {
+            include_spip('inc/securiser_action');
+            $token = calculer_token_previsu($url);
+            $url = parametre_url($url, 'var_previewtoken', $token);
+        }
 
-		if (_request('status') and _request('status') == '301') {
-			$status = '301';
-		}
-	} else {
-		$url = generer_url_public('404', '', true);
-	}
+        if (_request('status') and _request('status') == '301') {
+            $status = '301';
+        }
+    } else {
+        $url = generer_url_public('404', '', true);
+    }
 
-	redirige_par_entete(str_replace('&', '&', $url), '', $status);
+    redirige_par_entete(str_replace('&', '&', $url), '', $status);
 }
 
 /**
@@ -99,32 +99,32 @@ 
  * @return string|null
  */
 function calculer_url_redirect_entite($type, $id, $var_mode) {
-	// invalider le cache à chaque modif en bdd
-	$date = 0;
-	if (isset($GLOBALS['meta']['derniere_modif'])) {
-		$date = $GLOBALS['meta']['derniere_modif'];
-	}
-	$key = "url-$date-$type-$id";
+    // invalider le cache à chaque modif en bdd
+    $date = 0;
+    if (isset($GLOBALS['meta']['derniere_modif'])) {
+        $date = $GLOBALS['meta']['derniere_modif'];
+    }
+    $key = "url-$date-$type-$id";
 
-	// Obtenir l’url et si elle est publié du cache memoization
-	if (function_exists('cache_get') and $desc = cache_get($key)) {
-		list($url, $publie) = $desc;
-	}
-	// Si on ne l’a pas trouvé, ou si var mode, on calcule l’url et son état publie
-	if (empty($desc) or $var_mode) {
-		$publie = objet_test_si_publie($type, $id);
-		$url = generer_url_entite_absolue($id, $type, '', '', true);
-		if (function_exists('cache_set')) {
-			cache_set($key, array($url, $publie), 3600);
-		}
-	}
+    // Obtenir l’url et si elle est publié du cache memoization
+    if (function_exists('cache_get') and $desc = cache_get($key)) {
+        list($url, $publie) = $desc;
+    }
+    // Si on ne l’a pas trouvé, ou si var mode, on calcule l’url et son état publie
+    if (empty($desc) or $var_mode) {
+        $publie = objet_test_si_publie($type, $id);
+        $url = generer_url_entite_absolue($id, $type, '', '', true);
+        if (function_exists('cache_set')) {
+            cache_set($key, array($url, $publie), 3600);
+        }
+    }
 
-	// On valide l’url si elle est publiee ; sinon si preview on teste l’autorisation
-	if ($publie) {
-		return $url;
-	} elseif (defined('_VAR_PREVIEW') and _VAR_PREVIEW and autoriser('voir', $type, $id)) {
-		return $url;
-	}
+    // On valide l’url si elle est publiee ; sinon si preview on teste l’autorisation
+    if ($publie) {
+        return $url;
+    } elseif (defined('_VAR_PREVIEW') and _VAR_PREVIEW and autoriser('voir', $type, $id)) {
+        return $url;
+    }
 
-	return;
+    return;
 }
\ No newline at end of file

ecrire/base/repair.php

Indentation +102 added lines, -102 removed lines

@@ -17,7 +17,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -36,18 +36,18 @@ 
  **/
 function base_repair_dist($titre = '', $reprise = '') {
 
-	$res = admin_repair_tables();
-	if (!$res) {
-		$res = "<div class='error'>" . _T('avis_erreur_mysql') . ' ' . sql_errno() . ': ' . sql_error() . "</div>\n";
-	} else {
-		include_spip('inc/rubriques');
-		calculer_rubriques();
-		propager_les_secteurs();
-	}
-	include_spip('inc/minipres');
-	$res .= pipeline('base_admin_repair', $res);
-	echo minipres(_T('texte_tentative_recuperation'),
-		$res . generer_form_ecrire('accueil', '', '', _T('public:accueil_site')));
+    $res = admin_repair_tables();
+    if (!$res) {
+        $res = "<div class='error'>" . _T('avis_erreur_mysql') . ' ' . sql_errno() . ': ' . sql_error() . "</div>\n";
+    } else {
+        include_spip('inc/rubriques');
+        calculer_rubriques();
+        propager_les_secteurs();
+    }
+    include_spip('inc/minipres');
+    $res .= pipeline('base_admin_repair', $res);
+    echo minipres(_T('texte_tentative_recuperation'),
+        $res . generer_form_ecrire('accueil', '', '', _T('public:accueil_site')));
 }
 
 /**
@@ -59,42 +59,42 @@ 
  * @return string Description des changements de chemins des documents
  **/
 function admin_repair_plat() {
-	spip_log("verification des documents joints", _LOG_INFO_IMPORTANTE);
-	$out = "";
-	$repertoire = array();
-	include_spip('inc/getdocument');
-	$res = sql_select('*', 'spip_documents', "fichier REGEXP CONCAT('^',extension,'[^/\]') AND distant='non'");
-
-	while ($row = sql_fetch($res)) {
-		$ext = $row['extension'];
-		if (!$ext) {
-			spip_log("document sans extension: " . $row['id_document'], _LOG_INFO_IMPORTANTE);
-			continue;
-		}
-		if (!isset($repertoire[$ext])) {
-			if (@file_exists($plat = _DIR_IMG . $ext . ".plat")) {
-				spip_unlink($plat);
-			}
-			$repertoire[$ext] = creer_repertoire_documents($ext);
-			if (preg_match(',_$,', $repertoire[$ext])) {
-				$repertoire[$ext] = false;
-			}
-		}
-		if ($d = $repertoire[$ext]) {
-			$d = substr($d, strlen(_DIR_IMG));
-			$src = $row['fichier'];
-			$dest = $d . substr($src, strlen($d));
-			if (@copy(_DIR_IMG . $src, _DIR_IMG . $dest)
-				and file_exists(_DIR_IMG . $dest)
-			) {
-				sql_updateq('spip_documents', array('fichier' => $dest), 'id_document=' . intval($row['id_document']));
-				spip_unlink(_DIR_IMG . $src);
-				$out .= "$src => $dest<br />";
-			}
-		}
-	}
-
-	return $out;
+    spip_log("verification des documents joints", _LOG_INFO_IMPORTANTE);
+    $out = "";
+    $repertoire = array();
+    include_spip('inc/getdocument');
+    $res = sql_select('*', 'spip_documents', "fichier REGEXP CONCAT('^',extension,'[^/\]') AND distant='non'");
+
+    while ($row = sql_fetch($res)) {
+        $ext = $row['extension'];
+        if (!$ext) {
+            spip_log("document sans extension: " . $row['id_document'], _LOG_INFO_IMPORTANTE);
+            continue;
+        }
+        if (!isset($repertoire[$ext])) {
+            if (@file_exists($plat = _DIR_IMG . $ext . ".plat")) {
+                spip_unlink($plat);
+            }
+            $repertoire[$ext] = creer_repertoire_documents($ext);
+            if (preg_match(',_$,', $repertoire[$ext])) {
+                $repertoire[$ext] = false;
+            }
+        }
+        if ($d = $repertoire[$ext]) {
+            $d = substr($d, strlen(_DIR_IMG));
+            $src = $row['fichier'];
+            $dest = $d . substr($src, strlen($d));
+            if (@copy(_DIR_IMG . $src, _DIR_IMG . $dest)
+                and file_exists(_DIR_IMG . $dest)
+            ) {
+                sql_updateq('spip_documents', array('fichier' => $dest), 'id_document=' . intval($row['id_document']));
+                spip_unlink(_DIR_IMG . $src);
+                $out .= "$src => $dest<br />";
+            }
+        }
+    }
+
+    return $out;
 }
 
 /**
@@ -108,57 +108,57 @@ 
  **/
 function admin_repair_tables() {
 
-	$repair = sql_repair('repair', null, 'continue');
-
-	// recreer les tables manquantes eventuelles
-	include_spip('base/create');
-	creer_base();
-	$tables = sql_alltable();
-
-	$res = "";
-	foreach ($tables as $tab) {
-
-		$class = "";
-		$m = "<strong>$tab</strong> ";
-		spip_log("Repare $tab", _LOG_INFO_IMPORTANTE);
-		// supprimer la meta avant de lancer la reparation
-		// car le repair peut etre long ; on ne veut pas boucler
-		effacer_meta('admin_repair');
-		if ($repair) {
-			$result_repair = sql_repair($tab);
-			if (!$result_repair) {
-				return false;
-			}
-		}
-
-		// essayer de maj la table (creation de champs manquants)
-		maj_tables($tab);
-
-		$count = sql_countsel($tab);
-
-		if ($count > 1) {
-			$m .= "(" . _T('texte_compte_elements', array('count' => $count)) . ")\n";
-		} else {
-			if ($count == 1) {
-				$m .= "(" . _T('texte_compte_element', array('count' => $count)) . ")\n";
-			} else {
-				$m .= "(" . _T('texte_vide') . ")\n";
-			}
-		}
-
-		if ($result_repair
-			and $msg = join(" ",
-					(is_resource($result_repair) or is_object($result_repair)) ? sql_fetch($result_repair) : $result_repair) . ' '
-			and strpos($msg, ' OK ') === false
-		) {
-			$class = " class='notice'";
-			$m .= "<br /><tt>" . spip_htmlentities($msg) . "</tt>\n";
-		} else {
-			$m .= " " . _T('texte_table_ok');
-		}
-
-		$res .= "<div$class>$m</div>";
-	}
-
-	return $res;
+    $repair = sql_repair('repair', null, 'continue');
+
+    // recreer les tables manquantes eventuelles
+    include_spip('base/create');
+    creer_base();
+    $tables = sql_alltable();
+
+    $res = "";
+    foreach ($tables as $tab) {
+
+        $class = "";
+        $m = "<strong>$tab</strong> ";
+        spip_log("Repare $tab", _LOG_INFO_IMPORTANTE);
+        // supprimer la meta avant de lancer la reparation
+        // car le repair peut etre long ; on ne veut pas boucler
+        effacer_meta('admin_repair');
+        if ($repair) {
+            $result_repair = sql_repair($tab);
+            if (!$result_repair) {
+                return false;
+            }
+        }
+
+        // essayer de maj la table (creation de champs manquants)
+        maj_tables($tab);
+
+        $count = sql_countsel($tab);
+
+        if ($count > 1) {
+            $m .= "(" . _T('texte_compte_elements', array('count' => $count)) . ")\n";
+        } else {
+            if ($count == 1) {
+                $m .= "(" . _T('texte_compte_element', array('count' => $count)) . ")\n";
+            } else {
+                $m .= "(" . _T('texte_vide') . ")\n";
+            }
+        }
+
+        if ($result_repair
+            and $msg = join(" ",
+                    (is_resource($result_repair) or is_object($result_repair)) ? sql_fetch($result_repair) : $result_repair) . ' '
+            and strpos($msg, ' OK ') === false
+        ) {
+            $class = " class='notice'";
+            $m .= "<br /><tt>" . spip_htmlentities($msg) . "</tt>\n";
+        } else {
+            $m .= " " . _T('texte_table_ok');
+        }
+
+        $res .= "<div$class>$m</div>";
+    }
+
+    return $res;
 }

Spacing +15 added lines, -15 removed lines

@@ -38,7 +38,7 @@ 
 
 	$res = admin_repair_tables();
 	if (!$res) {
-		$res = "<div class='error'>" . _T('avis_erreur_mysql') . ' ' . sql_errno() . ': ' . sql_error() . "</div>\n";
+		$res = "<div class='error'>"._T('avis_erreur_mysql').' '.sql_errno().': '.sql_error()."</div>\n";
 	} else {
 		include_spip('inc/rubriques');
 		calculer_rubriques();
@@ -47,7 +47,7 @@ 
 	include_spip('inc/minipres');
 	$res .= pipeline('base_admin_repair', $res);
 	echo minipres(_T('texte_tentative_recuperation'),
-		$res . generer_form_ecrire('accueil', '', '', _T('public:accueil_site')));
+		$res.generer_form_ecrire('accueil', '', '', _T('public:accueil_site')));
 }
 
 /**
@@ -68,11 +68,11 @@ 
 	while ($row = sql_fetch($res)) {
 		$ext = $row['extension'];
 		if (!$ext) {
-			spip_log("document sans extension: " . $row['id_document'], _LOG_INFO_IMPORTANTE);
+			spip_log("document sans extension: ".$row['id_document'], _LOG_INFO_IMPORTANTE);
 			continue;
 		}
 		if (!isset($repertoire[$ext])) {
-			if (@file_exists($plat = _DIR_IMG . $ext . ".plat")) {
+			if (@file_exists($plat = _DIR_IMG.$ext.".plat")) {
 				spip_unlink($plat);
 			}
 			$repertoire[$ext] = creer_repertoire_documents($ext);
@@ -83,12 +83,12 @@ 
 		if ($d = $repertoire[$ext]) {
 			$d = substr($d, strlen(_DIR_IMG));
 			$src = $row['fichier'];
-			$dest = $d . substr($src, strlen($d));
-			if (@copy(_DIR_IMG . $src, _DIR_IMG . $dest)
-				and file_exists(_DIR_IMG . $dest)
+			$dest = $d.substr($src, strlen($d));
+			if (@copy(_DIR_IMG.$src, _DIR_IMG.$dest)
+				and file_exists(_DIR_IMG.$dest)
 			) {
-				sql_updateq('spip_documents', array('fichier' => $dest), 'id_document=' . intval($row['id_document']));
-				spip_unlink(_DIR_IMG . $src);
+				sql_updateq('spip_documents', array('fichier' => $dest), 'id_document='.intval($row['id_document']));
+				spip_unlink(_DIR_IMG.$src);
 				$out .= "$src => $dest<br />";
 			}
 		}
@@ -137,24 +137,24 @@ 
 		$count = sql_countsel($tab);
 
 		if ($count > 1) {
-			$m .= "(" . _T('texte_compte_elements', array('count' => $count)) . ")\n";
+			$m .= "("._T('texte_compte_elements', array('count' => $count)).")\n";
 		} else {
 			if ($count == 1) {
-				$m .= "(" . _T('texte_compte_element', array('count' => $count)) . ")\n";
+				$m .= "("._T('texte_compte_element', array('count' => $count)).")\n";
 			} else {
-				$m .= "(" . _T('texte_vide') . ")\n";
+				$m .= "("._T('texte_vide').")\n";
 			}
 		}
 
 		if ($result_repair
 			and $msg = join(" ",
-					(is_resource($result_repair) or is_object($result_repair)) ? sql_fetch($result_repair) : $result_repair) . ' '
+					(is_resource($result_repair) or is_object($result_repair)) ? sql_fetch($result_repair) : $result_repair).' '
 			and strpos($msg, ' OK ') === false
 		) {
 			$class = " class='notice'";
-			$m .= "<br /><tt>" . spip_htmlentities($msg) . "</tt>\n";
+			$m .= "<br /><tt>".spip_htmlentities($msg)."</tt>\n";
 		} else {
-			$m .= " " . _T('texte_table_ok');
+			$m .= " "._T('texte_table_ok');
 		}
 
 		$res .= "<div$class>$m</div>";

ecrire/lang/public_ja.php

Indentation +110 added lines, -110 removed lines

@@ -4,118 +4,118 @@
 // ** ne pas modifier le fichier **
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 $GLOBALS[$GLOBALS['idx_lang']] = array(
 
-	// A
-	'accueil_site' => 'ホーム',
-	'article' => '記事',
-	'articles' => '記事',
-	'articles_auteur' => 'この著者の記事',
-	'articles_populaires' => '人気のある記事',
-	'articles_rubrique' => 'このセクションにある記事',
-	'aucun_article' => 'このアドレスに記事はありません',
-	'aucun_auteur' => 'このアドレスに著者はいません',
-	'aucun_site' => 'このアドレスにサイトはありません',
-	'aucune_breve' => 'このアドレスにニュースはありません',
-	'aucune_rubrique' => 'このアドレスにセクションはありません',
-	'auteur' => '著者',
-	'autres' => 'その他',
-	'autres_breves' => '他のニュース',
-	'autres_groupes_mots_clefs' => 'キーワードの他のグループ',
-	'autres_sites' => '他のサイト',
-
-	// B
-	'bonjour' => 'こんにちは',
-
-	// C
-	'commenter_site' => 'このサイトについてコメントして下さい',
-	'contact' => '連絡先',
-	'copie_document_impossible' => 'ファイルのコーピは不可能です',
-
-	// D
-	'date' => '日付',
-	'dernier_ajout' => '最新の追加',
-	'dernieres_breves' => '最新のニュース',
-	'derniers_articles' => '最新の記事',
-	'derniers_commentaires' => '最新のコメント',
-	'derniers_messages_forum' => 'フォーラムで投稿された最新のメッセージ',
-
-	// E
-	'edition_mode_texte' => 'テキストモード編集',
-	'en_reponse' => '返事として：',
-	'en_resume' => 'まとめとして',
-	'envoyer_message' => 'メッセージを送る',
-	'espace_prive' => '管理エリア',
-
-	// F
-	'formats_acceptes' => '受け入れるファイルのフォーマット: @formats@です。',
-
-	// H
-	'hierarchie_site' => 'サイトの階層',
-
-	// J
-	'jours' => '日付',
-
-	// L
-	'lien_connecter' => 'ログイン',
-
-	// M
-	'meme_auteur' => '同じ著者',
-	'meme_rubrique' => '同じセクションの中で',
-	'memes_auteurs' => '同じ著者',
-	'message' => 'フォーラムのメッセージ',
-	'messages_forum' => 'フォーラムのメッセージ',
-	'messages_recents' => '最新のフォーラムのメッセージ',
-	'mots_clef' => 'キーワード',
-	'mots_clefs' => 'キーワード',
-	'mots_clefs_meme_groupe' => '同じグループのキーワード',
-
-	// N
-	'navigation' => 'ナビゲーション',
-	'nom' => 'お名前',
-	'nouveautes' => '最新刊',
-	'nouveautes_web' => 'ウェブに関する最新刊',
-	'nouveaux_articles' => '新しい記事',
-	'nouvelles_breves' => '新しいニュース',
-
-	// P
-	'page_precedente' => '前のページ',
-	'page_suivante' => '次のページ',
-	'par_auteur' => '著者：',
-	'participer_site' => 'サインアップすると、サイトにご自分の記事を書くことが出来ます。申し込みしてから、管理エリアへのアクセスコードがメールで届きます。',
-	'plan_site' => 'サイトマップ',
-	'popularite' => '人気',
-	'poster_message' => 'メッセージを投稿する',
-	'proposer_site' => '追加するサイトを提案できるセクション：',
-
-	// R
-	'repondre_article' => 'この記事に返信する',
-	'repondre_breve' => 'このニュースに返信する',
-	'resultats_recherche' => '検索結果',
-	'retour_debut_forums' => 'フォーラムの最初のページに戻る',
-	'rubrique' => 'セクション',
-	'rubriques' => 'セクション',
-
-	// S
-	'signatures_petition' => '署名',
-	'site_realise_avec_spip' => 'SPIPで創造されたサイトです',
-	'sites_web' => 'ウェブサイト',
-	'sous_rubriques' => 'サブセクション',
-	'spam' => '迷惑メール',
-	'suite' => '次へ',
-	'sur_web' => 'ウェブ上',
-	'syndiquer_rubrique' => 'このセクションを供給する',
-	'syndiquer_site' => '全サイトを供給する',
-
-	// T
-	'texte_lettre_information' => 'サイトのニュースレター',
-	'texte_lettre_information_2' => '最新刊をまとめるニュースレター',
-
-	// V
-	'ver_imprimer' => '印刷用のバージョン',
-	'voir_en_ligne' => 'オンラインで見る',
-	'voir_squelette' => 'ページのテンプレートを見る'
+    // A
+    'accueil_site' => 'ホーム',
+    'article' => '記事',
+    'articles' => '記事',
+    'articles_auteur' => 'この著者の記事',
+    'articles_populaires' => '人気のある記事',
+    'articles_rubrique' => 'このセクションにある記事',
+    'aucun_article' => 'このアドレスに記事はありません',
+    'aucun_auteur' => 'このアドレスに著者はいません',
+    'aucun_site' => 'このアドレスにサイトはありません',
+    'aucune_breve' => 'このアドレスにニュースはありません',
+    'aucune_rubrique' => 'このアドレスにセクションはありません',
+    'auteur' => '著者',
+    'autres' => 'その他',
+    'autres_breves' => '他のニュース',
+    'autres_groupes_mots_clefs' => 'キーワードの他のグループ',
+    'autres_sites' => '他のサイト',
+
+    // B
+    'bonjour' => 'こんにちは',
+
+    // C
+    'commenter_site' => 'このサイトについてコメントして下さい',
+    'contact' => '連絡先',
+    'copie_document_impossible' => 'ファイルのコーピは不可能です',
+
+    // D
+    'date' => '日付',
+    'dernier_ajout' => '最新の追加',
+    'dernieres_breves' => '最新のニュース',
+    'derniers_articles' => '最新の記事',
+    'derniers_commentaires' => '最新のコメント',
+    'derniers_messages_forum' => 'フォーラムで投稿された最新のメッセージ',
+
+    // E
+    'edition_mode_texte' => 'テキストモード編集',
+    'en_reponse' => '返事として：',
+    'en_resume' => 'まとめとして',
+    'envoyer_message' => 'メッセージを送る',
+    'espace_prive' => '管理エリア',
+
+    // F
+    'formats_acceptes' => '受け入れるファイルのフォーマット: @formats@です。',
+
+    // H
+    'hierarchie_site' => 'サイトの階層',
+
+    // J
+    'jours' => '日付',
+
+    // L
+    'lien_connecter' => 'ログイン',
+
+    // M
+    'meme_auteur' => '同じ著者',
+    'meme_rubrique' => '同じセクションの中で',
+    'memes_auteurs' => '同じ著者',
+    'message' => 'フォーラムのメッセージ',
+    'messages_forum' => 'フォーラムのメッセージ',
+    'messages_recents' => '最新のフォーラムのメッセージ',
+    'mots_clef' => 'キーワード',
+    'mots_clefs' => 'キーワード',
+    'mots_clefs_meme_groupe' => '同じグループのキーワード',
+
+    // N
+    'navigation' => 'ナビゲーション',
+    'nom' => 'お名前',
+    'nouveautes' => '最新刊',
+    'nouveautes_web' => 'ウェブに関する最新刊',
+    'nouveaux_articles' => '新しい記事',
+    'nouvelles_breves' => '新しいニュース',
+
+    // P
+    'page_precedente' => '前のページ',
+    'page_suivante' => '次のページ',
+    'par_auteur' => '著者：',
+    'participer_site' => 'サインアップすると、サイトにご自分の記事を書くことが出来ます。申し込みしてから、管理エリアへのアクセスコードがメールで届きます。',
+    'plan_site' => 'サイトマップ',
+    'popularite' => '人気',
+    'poster_message' => 'メッセージを投稿する',
+    'proposer_site' => '追加するサイトを提案できるセクション：',
+
+    // R
+    'repondre_article' => 'この記事に返信する',
+    'repondre_breve' => 'このニュースに返信する',
+    'resultats_recherche' => '検索結果',
+    'retour_debut_forums' => 'フォーラムの最初のページに戻る',
+    'rubrique' => 'セクション',
+    'rubriques' => 'セクション',
+
+    // S
+    'signatures_petition' => '署名',
+    'site_realise_avec_spip' => 'SPIPで創造されたサイトです',
+    'sites_web' => 'ウェブサイト',
+    'sous_rubriques' => 'サブセクション',
+    'spam' => '迷惑メール',
+    'suite' => '次へ',
+    'sur_web' => 'ウェブ上',
+    'syndiquer_rubrique' => 'このセクションを供給する',
+    'syndiquer_site' => '全サイトを供給する',
+
+    // T
+    'texte_lettre_information' => 'サイトのニュースレター',
+    'texte_lettre_information_2' => '最新刊をまとめるニュースレター',
+
+    // V
+    'ver_imprimer' => '印刷用のバージョン',
+    'voir_en_ligne' => 'オンラインで見る',
+    'voir_squelette' => 'ページのテンプレートを見る'
 );

ecrire/inc/csv.php

Indentation +95 added lines, -95 removed lines

@@ -17,7 +17,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -33,105 +33,105 @@ 
  **/
 function analyse_csv($t) {
 	
-	// Quel est le séparateur ?
-	$virg = substr_count($t, ',');
-	$pvirg = substr_count($t, ';');
-	$tab = substr_count($t, "\t");
-	if ($virg > $pvirg) {
-		$sep = ',';
-		$hs = ',';
-	} else {
-		$sep = ';';
-		$hs = '&#59;';
-		$virg = $pvirg;
-	}
-	// un certain nombre de tab => le séparateur est tab
-	if ($tab > $virg / 10) {
-		$sep = "\t";
-		$hs = "\t";
-	}
+    // Quel est le séparateur ?
+    $virg = substr_count($t, ',');
+    $pvirg = substr_count($t, ';');
+    $tab = substr_count($t, "\t");
+    if ($virg > $pvirg) {
+        $sep = ',';
+        $hs = ',';
+    } else {
+        $sep = ';';
+        $hs = '&#59;';
+        $virg = $pvirg;
+    }
+    // un certain nombre de tab => le séparateur est tab
+    if ($tab > $virg / 10) {
+        $sep = "\t";
+        $hs = "\t";
+    }
 	
-	// un separateur suivi de 3 guillemets attention !
-	// attention au ; ou , suceptible d'etre confondu avec un separateur
-	// on substitue un # et on remplacera a la fin
-	$t = preg_replace("/([\n$sep])\"\"\"/", '\\1"&#34#', $t);
-	$t = str_replace('""', '&#34#', $t);
-	preg_match_all('/"[^"]*"/', $t, $r);
-	foreach ($r[0] as $cell) {
-		$t = str_replace($cell,
-			str_replace($sep, $hs,
-				str_replace("\n", "``**``", // échapper les saut de lignes, on les remettra après.
-					substr($cell, 1, -1))),
-			$t);
-	}
+    // un separateur suivi de 3 guillemets attention !
+    // attention au ; ou , suceptible d'etre confondu avec un separateur
+    // on substitue un # et on remplacera a la fin
+    $t = preg_replace("/([\n$sep])\"\"\"/", '\\1"&#34#', $t);
+    $t = str_replace('""', '&#34#', $t);
+    preg_match_all('/"[^"]*"/', $t, $r);
+    foreach ($r[0] as $cell) {
+        $t = str_replace($cell,
+            str_replace($sep, $hs,
+                str_replace("\n", "``**``", // échapper les saut de lignes, on les remettra après.
+                    substr($cell, 1, -1))),
+            $t);
+    }
 	
-	$t = preg_replace('/\r?\n/', "\n",
-	preg_replace('/[\r\n]+/', "\n", $t));
+    $t = preg_replace('/\r?\n/', "\n",
+    preg_replace('/[\r\n]+/', "\n", $t));
 	
-	list($entete, $corps) = explode("\n", $t, 2);
-	$caption = '';
-	// sauter la ligne de tete formee seulement de separateurs
-	if (substr_count($entete, $sep) == strlen($entete)) {
-		list($entete, $corps) = explode("\n", $corps, 2);
-	}
-	// si une seule colonne, en faire le titre
-	if (preg_match("/^([^$sep]+)$sep+\$/", $entete, $l)) {
-		$caption = "\n||" . $l[1] . "|";
-		list($entete, $corps) = explode("\n", $corps, 2);
-	}
-	// si premiere colonne vide, le raccourci doit quand meme produire <th...
-	if ($entete[0] == $sep) {
-		$entete = ' ' . $entete;
-	}
+    list($entete, $corps) = explode("\n", $t, 2);
+    $caption = '';
+    // sauter la ligne de tete formee seulement de separateurs
+    if (substr_count($entete, $sep) == strlen($entete)) {
+        list($entete, $corps) = explode("\n", $corps, 2);
+    }
+    // si une seule colonne, en faire le titre
+    if (preg_match("/^([^$sep]+)$sep+\$/", $entete, $l)) {
+        $caption = "\n||" . $l[1] . "|";
+        list($entete, $corps) = explode("\n", $corps, 2);
+    }
+    // si premiere colonne vide, le raccourci doit quand meme produire <th...
+    if ($entete[0] == $sep) {
+        $entete = ' ' . $entete;
+    }
 
-	$lignes = explode("\n", $corps);
+    $lignes = explode("\n", $corps);
 
-	// retrait des lignes vides finales
-	while (count($lignes) > 0
-		and preg_match("/^$sep*$/", $lignes[count($lignes) - 1])) {
-		unset($lignes[count($lignes) - 1]);
-	}
-	//  calcul du  nombre de colonne a chaque ligne
-	$nbcols = array();
-	$max = $mil = substr_count($entete, $sep);
-	foreach ($lignes as $k => $v) {
-		if ($max <> ($nbcols[$k] = substr_count($v, $sep))) {
-			if ($max > $nbcols[$k]) {
-				$mil = $nbcols[$k];
-			} else {
-				$mil = $max;
-				$max = $nbcols[$k];
-			}
-		}
-	}
-	// Si pas le meme nombre, cadrer au nombre max
-	if ($mil <> $max) {
-		foreach ($nbcols as $k => $v) {
-			if ($v < $max) {
-				$lignes[$k] .= str_repeat($sep, $max - $v);
-			}
-		}
-	}
-	// et retirer les colonnes integralement vides
-	while (true) {
-		$nbcols = ($entete[strlen($entete) - 1] === $sep);
-		foreach ($lignes as $v) {
-			$nbcols &= ($v[strlen($v) - 1] === $sep);
-		}
-		if (!$nbcols) {
-			break;
-		}
-		$entete = substr($entete, 0, -1);
-		foreach ($lignes as $k => $v) {
-			$lignes[$k] = substr($v, 0, -1);
-		}
-	}
+    // retrait des lignes vides finales
+    while (count($lignes) > 0
+        and preg_match("/^$sep*$/", $lignes[count($lignes) - 1])) {
+        unset($lignes[count($lignes) - 1]);
+    }
+    //  calcul du  nombre de colonne a chaque ligne
+    $nbcols = array();
+    $max = $mil = substr_count($entete, $sep);
+    foreach ($lignes as $k => $v) {
+        if ($max <> ($nbcols[$k] = substr_count($v, $sep))) {
+            if ($max > $nbcols[$k]) {
+                $mil = $nbcols[$k];
+            } else {
+                $mil = $max;
+                $max = $nbcols[$k];
+            }
+        }
+    }
+    // Si pas le meme nombre, cadrer au nombre max
+    if ($mil <> $max) {
+        foreach ($nbcols as $k => $v) {
+            if ($v < $max) {
+                $lignes[$k] .= str_repeat($sep, $max - $v);
+            }
+        }
+    }
+    // et retirer les colonnes integralement vides
+    while (true) {
+        $nbcols = ($entete[strlen($entete) - 1] === $sep);
+        foreach ($lignes as $v) {
+            $nbcols &= ($v[strlen($v) - 1] === $sep);
+        }
+        if (!$nbcols) {
+            break;
+        }
+        $entete = substr($entete, 0, -1);
+        foreach ($lignes as $k => $v) {
+            $lignes[$k] = substr($v, 0, -1);
+        }
+    }
 	
-	foreach ($lignes as &$l) {
-		$l = str_replace('&#34#','"',$l);
-		$l = str_replace('``**``',"\n",$l);
-		$l = explode($sep, $l);
-	}
+    foreach ($lignes as &$l) {
+        $l = str_replace('&#34#','"',$l);
+        $l = str_replace('``**``',"\n",$l);
+        $l = explode($sep, $l);
+    }
 	
-	return array(explode($sep, $entete), $lignes, $caption);
+    return array(explode($sep, $entete), $lignes, $caption);
 }

Spacing +4 added lines, -4 removed lines

@@ -76,12 +76,12 @@ 
 	}
 	// si une seule colonne, en faire le titre
 	if (preg_match("/^([^$sep]+)$sep+\$/", $entete, $l)) {
-		$caption = "\n||" . $l[1] . "|";
+		$caption = "\n||".$l[1]."|";
 		list($entete, $corps) = explode("\n", $corps, 2);
 	}
 	// si premiere colonne vide, le raccourci doit quand meme produire <th...
 	if ($entete[0] == $sep) {
-		$entete = ' ' . $entete;
+		$entete = ' '.$entete;
 	}
 
 	$lignes = explode("\n", $corps);
@@ -128,8 +128,8 @@ 
 	}
 	
 	foreach ($lignes as &$l) {
-		$l = str_replace('&#34#','"',$l);
-		$l = str_replace('``**``',"\n",$l);
+		$l = str_replace('&#34#', '"', $l);
+		$l = str_replace('``**``', "\n", $l);
 		$l = explode($sep, $l);
 	}
 	

ecrire/lang/public_nl.php

Indentation +110 added lines, -110 removed lines

@@ -4,118 +4,118 @@
 // ** ne pas modifier le fichier **
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 $GLOBALS[$GLOBALS['idx_lang']] = array(
 
-	// A
-	'accueil_site' => 'Homepagina',
-	'article' => 'Artikel',
-	'articles' => 'Artikelen',
-	'articles_auteur' => 'Artikelen van deze auteur',
-	'articles_populaires' => 'Meest bekeken artikelen',
-	'articles_rubrique' => 'Artikelen in deze rubriek',
-	'aucun_article' => 'Op dit adres is geen artikel te vinden',
-	'aucun_auteur' => 'Op dit adres is geen auteur te vinden',
-	'aucun_site' => 'Op dit adres is geen site te vinden',
-	'aucune_breve' => 'Op dit adres is geen nieuwsflits te vinden',
-	'aucune_rubrique' => 'Op dit adres is geen rubriek te vinden',
-	'auteur' => 'Auteur',
-	'autres' => 'Anderen',
-	'autres_breves' => 'Andere nieuwsflitsen',
-	'autres_groupes_mots_clefs' => 'Andere groepen trefwoorden',
-	'autres_sites' => 'Andere sites',
-
-	// B
-	'bonjour' => 'Hallo',
-
-	// C
-	'commenter_site' => 'Reageren op de site',
-	'contact' => 'Contact',
-	'copie_document_impossible' => 'Het is niet mogelijk het document te kopiëren',
-
-	// D
-	'date' => 'Datum',
-	'dernier_ajout' => 'Laatste toevoeging',
-	'dernieres_breves' => 'Laatste nieuwsflitsen',
-	'derniers_articles' => 'Laatste artikelen',
-	'derniers_commentaires' => 'Laatste commentaren',
-	'derniers_messages_forum' => 'Laatst gepubliceerde berichten in het forum',
-
-	// E
-	'edition_mode_texte' => 'Uitgave in tekstmodus van',
-	'en_reponse' => 'Als antwoord op:',
-	'en_resume' => 'Samengevat',
-	'envoyer_message' => 'Een bericht sturen',
-	'espace_prive' => 'Privé gedeelte',
-
-	// F
-	'formats_acceptes' => 'Toegelaten formaten: @formats@.',
-
-	// H
-	'hierarchie_site' => 'Structuur van de site',
-
-	// J
-	'jours' => 'dagen',
-
-	// L
-	'lien_connecter' => 'Aanmelden',
-
-	// M
-	'meme_auteur' => 'Van dezelfde auteur',
-	'meme_rubrique' => 'In dezelfde rubriek',
-	'memes_auteurs' => 'Van dezelfde auteurs',
-	'message' => 'Bericht',
-	'messages_forum' => 'Berichten',
-	'messages_recents' => 'Meest recente forumberichten',
-	'mots_clef' => 'Trefwoord',
-	'mots_clefs' => 'Trefwoorden',
-	'mots_clefs_meme_groupe' => 'Trefwoorden van dezelfde groep',
-
-	// N
-	'navigation' => 'Navigatie',
-	'nom' => 'Naam',
-	'nouveautes' => 'Nieuwigheden',
-	'nouveautes_web' => 'Nieuwigheden op het Web',
-	'nouveaux_articles' => 'Nieuwe artikelen',
-	'nouvelles_breves' => 'Nieuwe nieuwsflitsen',
-
-	// P
-	'page_precedente' => 'vorige pagina',
-	'page_suivante' => 'volgende pagina',
-	'par_auteur' => 'door ',
-	'participer_site' => 'Wanneer je je hieronder inschrijft, kun je zelf een bijdrage leveren aan deze site door je eigen artikelen voor te stellen. Je ontvangt meteen een e-mail met daarin de toegangscode voor het privé-gedeelte van de site.',
-	'plan_site' => 'Overzicht van de site',
-	'popularite' => 'Populariteit',
-	'poster_message' => 'Een bericht plaatsen',
-	'proposer_site' => 'Je kan voorstellen een site in deze rubriek op te nemen:',
-
-	// R
-	'repondre_article' => 'Dit artikel beantwoorden',
-	'repondre_breve' => 'Op deze nieuwsflits reageren',
-	'resultats_recherche' => 'Resultaten van de zoekopdracht',
-	'retour_debut_forums' => 'Terug naar de startpagina van de forums',
-	'rubrique' => 'Rubriek',
-	'rubriques' => 'Rubrieken',
-
-	// S
-	'signatures_petition' => 'Ondertekeningen',
-	'site_realise_avec_spip' => 'Site gebouwd met SPIP',
-	'sites_web' => 'Websites',
-	'sous_rubriques' => 'Subrubrieken',
-	'spam' => 'Spam',
-	'suite' => 'vervolg',
-	'sur_web' => 'Op het web',
-	'syndiquer_rubrique' => 'Nieuws overnemen uit deze rubriek',
-	'syndiquer_site' => 'Nieuws overnemen van de hele site',
-
-	// T
-	'texte_lettre_information' => 'Dit is de nieuwsbrief van de site',
-	'texte_lettre_information_2' => 'Deze nieuwsbrief toont de publicaties vanaf',
-
-	// V
-	'ver_imprimer' => 'Afdrukversie',
-	'voir_en_ligne' => 'Online bekijken',
-	'voir_squelette' => 'het skelet van deze bladzijde bekijken'
+    // A
+    'accueil_site' => 'Homepagina',
+    'article' => 'Artikel',
+    'articles' => 'Artikelen',
+    'articles_auteur' => 'Artikelen van deze auteur',
+    'articles_populaires' => 'Meest bekeken artikelen',
+    'articles_rubrique' => 'Artikelen in deze rubriek',
+    'aucun_article' => 'Op dit adres is geen artikel te vinden',
+    'aucun_auteur' => 'Op dit adres is geen auteur te vinden',
+    'aucun_site' => 'Op dit adres is geen site te vinden',
+    'aucune_breve' => 'Op dit adres is geen nieuwsflits te vinden',
+    'aucune_rubrique' => 'Op dit adres is geen rubriek te vinden',
+    'auteur' => 'Auteur',
+    'autres' => 'Anderen',
+    'autres_breves' => 'Andere nieuwsflitsen',
+    'autres_groupes_mots_clefs' => 'Andere groepen trefwoorden',
+    'autres_sites' => 'Andere sites',
+
+    // B
+    'bonjour' => 'Hallo',
+
+    // C
+    'commenter_site' => 'Reageren op de site',
+    'contact' => 'Contact',
+    'copie_document_impossible' => 'Het is niet mogelijk het document te kopiëren',
+
+    // D
+    'date' => 'Datum',
+    'dernier_ajout' => 'Laatste toevoeging',
+    'dernieres_breves' => 'Laatste nieuwsflitsen',
+    'derniers_articles' => 'Laatste artikelen',
+    'derniers_commentaires' => 'Laatste commentaren',
+    'derniers_messages_forum' => 'Laatst gepubliceerde berichten in het forum',
+
+    // E
+    'edition_mode_texte' => 'Uitgave in tekstmodus van',
+    'en_reponse' => 'Als antwoord op:',
+    'en_resume' => 'Samengevat',
+    'envoyer_message' => 'Een bericht sturen',
+    'espace_prive' => 'Privé gedeelte',
+
+    // F
+    'formats_acceptes' => 'Toegelaten formaten: @formats@.',
+
+    // H
+    'hierarchie_site' => 'Structuur van de site',
+
+    // J
+    'jours' => 'dagen',
+
+    // L
+    'lien_connecter' => 'Aanmelden',
+
+    // M
+    'meme_auteur' => 'Van dezelfde auteur',
+    'meme_rubrique' => 'In dezelfde rubriek',
+    'memes_auteurs' => 'Van dezelfde auteurs',
+    'message' => 'Bericht',
+    'messages_forum' => 'Berichten',
+    'messages_recents' => 'Meest recente forumberichten',
+    'mots_clef' => 'Trefwoord',
+    'mots_clefs' => 'Trefwoorden',
+    'mots_clefs_meme_groupe' => 'Trefwoorden van dezelfde groep',
+
+    // N
+    'navigation' => 'Navigatie',
+    'nom' => 'Naam',
+    'nouveautes' => 'Nieuwigheden',
+    'nouveautes_web' => 'Nieuwigheden op het Web',
+    'nouveaux_articles' => 'Nieuwe artikelen',
+    'nouvelles_breves' => 'Nieuwe nieuwsflitsen',
+
+    // P
+    'page_precedente' => 'vorige pagina',
+    'page_suivante' => 'volgende pagina',
+    'par_auteur' => 'door ',
+    'participer_site' => 'Wanneer je je hieronder inschrijft, kun je zelf een bijdrage leveren aan deze site door je eigen artikelen voor te stellen. Je ontvangt meteen een e-mail met daarin de toegangscode voor het privé-gedeelte van de site.',
+    'plan_site' => 'Overzicht van de site',
+    'popularite' => 'Populariteit',
+    'poster_message' => 'Een bericht plaatsen',
+    'proposer_site' => 'Je kan voorstellen een site in deze rubriek op te nemen:',
+
+    // R
+    'repondre_article' => 'Dit artikel beantwoorden',
+    'repondre_breve' => 'Op deze nieuwsflits reageren',
+    'resultats_recherche' => 'Resultaten van de zoekopdracht',
+    'retour_debut_forums' => 'Terug naar de startpagina van de forums',
+    'rubrique' => 'Rubriek',
+    'rubriques' => 'Rubrieken',
+
+    // S
+    'signatures_petition' => 'Ondertekeningen',
+    'site_realise_avec_spip' => 'Site gebouwd met SPIP',
+    'sites_web' => 'Websites',
+    'sous_rubriques' => 'Subrubrieken',
+    'spam' => 'Spam',
+    'suite' => 'vervolg',
+    'sur_web' => 'Op het web',
+    'syndiquer_rubrique' => 'Nieuws overnemen uit deze rubriek',
+    'syndiquer_site' => 'Nieuws overnemen van de hele site',
+
+    // T
+    'texte_lettre_information' => 'Dit is de nieuwsbrief van de site',
+    'texte_lettre_information_2' => 'Deze nieuwsbrief toont de publicaties vanaf',
+
+    // V
+    'ver_imprimer' => 'Afdrukversie',
+    'voir_en_ligne' => 'Online bekijken',
+    'voir_squelette' => 'het skelet van deze bladzijde bekijken'
 );

ecrire/install/etape_chmod.php

Spacing +15 added lines, -16 removed lines

@@ -81,7 +81,7 @@ 
 			$test_dir .= '/';
 		}
 		if (!in_array($test_dir, $GLOBALS['test_dirs'])) {
-			$GLOBALS['test_dirs'][] = _DIR_RACINE . $test_dir;
+			$GLOBALS['test_dirs'][] = _DIR_RACINE.$test_dir;
 		}
 	} else {
 		if (!_FILE_CONNECT) {
@@ -96,11 +96,11 @@ 
 	foreach ($GLOBALS['test_dirs'] as $i => $my_dir) {
 		$test = test_ecrire($my_dir);
 		if (!$test) {
-			$m = preg_replace(',^' . _DIR_RACINE . ',', '', $my_dir);
+			$m = preg_replace(',^'._DIR_RACINE.',', '', $my_dir);
 			if (@file_exists($my_dir)) {
-				$bad_dirs['<li>' . $m . '</li>'] = 1;
+				$bad_dirs['<li>'.$m.'</li>'] = 1;
 			} else {
-				$absent_dirs['<li>' . $m . '</li>'] = 1;
+				$absent_dirs['<li>'.$m.'</li>'] = 1;
 			}
 		} else {
 			$chmod = max($chmod, $test);
@@ -110,21 +110,21 @@ 
 	if ($bad_dirs or $absent_dirs) {
 		if (!_FILE_CONNECT) {
 			$titre = _T('dirs_preliminaire');
-			$continuer = ' ' . _T('dirs_commencer') . '.';
+			$continuer = ' '._T('dirs_commencer').'.';
 		} else {
 			$titre = _T('dirs_probleme_droits');
 		}
 
 
-		$res = "<div align='right'>" . menu_langues('var_lang_ecrire') . "</div>\n";
+		$res = "<div align='right'>".menu_langues('var_lang_ecrire')."</div>\n";
 
 		if ($bad_dirs) {
 			$res .=
 				_T(
 					'dirs_repertoires_suivants',
 					array('bad_dirs' => join("\n", array_keys($bad_dirs)))
-				) .
-				'<b>' . _T('login_recharger') . '</b>.';
+				).
+				'<b>'._T('login_recharger').'</b>.';
 		}
 
 		if ($absent_dirs) {
@@ -132,22 +132,21 @@ 
 				_T(
 					'dirs_repertoires_absents',
 					array('bad_dirs' => join("\n", array_keys($absent_dirs)))
-				) .
-				'<b>' . _T('login_recharger') . '</b>.';
+				).
+				'<b>'._T('login_recharger').'</b>.';
 		}
-		$res = '<p>' . $continuer . $res . aider('install0', true) . '</p>';
+		$res = '<p>'.$continuer.$res.aider('install0', true).'</p>';
 
 		$t = _T('login_recharger');
-		$t = (!$test_dir ? '' :
-				"<input type='hidden' name='test_dir' value='" . spip_htmlspecialchars($test_dir, ENT_QUOTES) . "' />")
+		$t = (!$test_dir ? '' : "<input type='hidden' name='test_dir' value='".spip_htmlspecialchars($test_dir, ENT_QUOTES)."' />")
 			. "<input type='hidden' name='etape' value='chmod' />"
-			. "<div style='text-align: right'><input type='submit' value='" . attribut_html($t) . "' /></div>";
+			. "<div style='text-align: right'><input type='submit' value='".attribut_html($t)."' /></div>";
 
-		echo minipres($titre, $res . generer_form_ecrire('install', $t));
+		echo minipres($titre, $res.generer_form_ecrire('install', $t));
 	} else {
 		$deja = (_FILE_CONNECT and analyse_fichier_connection(_FILE_CONNECT));
 		if (!$deja) {
-			redirige_url_ecrire('install', 'etape=1&chmod=' . $chmod);
+			redirige_url_ecrire('install', 'etape=1&chmod='.$chmod);
 		} else {
 			redirige_url_ecrire();
 		}

Indentation +117 added lines, -117 removed lines

@@ -11,11 +11,11 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 if (defined('_TEST_DIRS')) {
-	return;
+    return;
 }
 define('_TEST_DIRS', '1');
 
@@ -27,42 +27,42 @@ 
 //
 // https://code.spip.net/@test_ecrire
 function test_ecrire($my_dir) {
-	static $chmod = 0;
-
-	$ok = false;
-	$script = @file_exists('spip_loader.php') ? 'spip_loader.php' : $_SERVER['PHP_SELF'];
-	$self = basename($script);
-	$uid = @fileowner('.');
-	$uid2 = @fileowner($self);
-	$gid = @filegroup('.');
-	$gid2 = @filegroup($self);
-	$perms = @fileperms($self);
-
-	// Comparer l'appartenance d'un fichier cree par PHP
-	// avec celle du script et du repertoire courant
-	if (!$chmod) {
-		@rmdir('test');
-		spip_unlink('test'); // effacer au cas ou
-		@touch('test');
-		if ($uid > 0 && $uid == $uid2 && @fileowner('test') == $uid) {
-			$chmod = 0700;
-		} else {
-			if ($gid > 0 && $gid == $gid2 && @filegroup('test') == $gid) {
-				$chmod = 0770;
-			} else {
-				$chmod = 0777;
-			}
-		}
-		// Appliquer de plus les droits d'acces du script
-		if ($perms > 0) {
-			$perms = ($perms & 0777) | (($perms & 0444) >> 2);
-			$chmod |= $perms;
-		}
-		spip_unlink('test');
-	}
-	$ok = is_dir($my_dir) && is_writable($my_dir);
-
-	return $ok ? $chmod : false;
+    static $chmod = 0;
+
+    $ok = false;
+    $script = @file_exists('spip_loader.php') ? 'spip_loader.php' : $_SERVER['PHP_SELF'];
+    $self = basename($script);
+    $uid = @fileowner('.');
+    $uid2 = @fileowner($self);
+    $gid = @filegroup('.');
+    $gid2 = @filegroup($self);
+    $perms = @fileperms($self);
+
+    // Comparer l'appartenance d'un fichier cree par PHP
+    // avec celle du script et du repertoire courant
+    if (!$chmod) {
+        @rmdir('test');
+        spip_unlink('test'); // effacer au cas ou
+        @touch('test');
+        if ($uid > 0 && $uid == $uid2 && @fileowner('test') == $uid) {
+            $chmod = 0700;
+        } else {
+            if ($gid > 0 && $gid == $gid2 && @filegroup('test') == $gid) {
+                $chmod = 0770;
+            } else {
+                $chmod = 0777;
+            }
+        }
+        // Appliquer de plus les droits d'acces du script
+        if ($perms > 0) {
+            $perms = ($perms & 0777) | (($perms & 0444) >> 2);
+            $chmod |= $perms;
+        }
+        spip_unlink('test');
+    }
+    $ok = is_dir($my_dir) && is_writable($my_dir);
+
+    return $ok ? $chmod : false;
 }
 
 //
@@ -73,83 +73,83 @@ 
 // https://code.spip.net/@install_etape_chmod_dist
 function install_etape_chmod_dist() {
 
-	$test_dir = _request('test_dir');
-	$chmod = 0;
-
-	if ($test_dir) {
-		if (substr($test_dir, -1) !== '/') {
-			$test_dir .= '/';
-		}
-		if (!in_array($test_dir, $GLOBALS['test_dirs'])) {
-			$GLOBALS['test_dirs'][] = _DIR_RACINE . $test_dir;
-		}
-	} else {
-		if (!_FILE_CONNECT) {
-			$GLOBALS['test_dirs'][] = _DIR_CONNECT;
-			$GLOBALS['test_dirs'][] = _DIR_CHMOD;
-		}
-	}
-
-	$bad_dirs = array();
-	$absent_dirs = array();
-
-	foreach ($GLOBALS['test_dirs'] as $i => $my_dir) {
-		$test = test_ecrire($my_dir);
-		if (!$test) {
-			$m = preg_replace(',^' . _DIR_RACINE . ',', '', $my_dir);
-			if (@file_exists($my_dir)) {
-				$bad_dirs['<li>' . $m . '</li>'] = 1;
-			} else {
-				$absent_dirs['<li>' . $m . '</li>'] = 1;
-			}
-		} else {
-			$chmod = max($chmod, $test);
-		}
-	}
-
-	if ($bad_dirs or $absent_dirs) {
-		if (!_FILE_CONNECT) {
-			$titre = _T('dirs_preliminaire');
-			$continuer = ' ' . _T('dirs_commencer') . '.';
-		} else {
-			$titre = _T('dirs_probleme_droits');
-		}
-
-
-		$res = "<div align='right'>" . menu_langues('var_lang_ecrire') . "</div>\n";
-
-		if ($bad_dirs) {
-			$res .=
-				_T(
-					'dirs_repertoires_suivants',
-					array('bad_dirs' => join("\n", array_keys($bad_dirs)))
-				) .
-				'<b>' . _T('login_recharger') . '</b>.';
-		}
-
-		if ($absent_dirs) {
-			$res .=
-				_T(
-					'dirs_repertoires_absents',
-					array('bad_dirs' => join("\n", array_keys($absent_dirs)))
-				) .
-				'<b>' . _T('login_recharger') . '</b>.';
-		}
-		$res = '<p>' . $continuer . $res . aider('install0', true) . '</p>';
-
-		$t = _T('login_recharger');
-		$t = (!$test_dir ? '' :
-				"<input type='hidden' name='test_dir' value='" . spip_htmlspecialchars($test_dir, ENT_QUOTES) . "' />")
-			. "<input type='hidden' name='etape' value='chmod' />"
-			. "<div style='text-align: right'><input type='submit' value='" . attribut_html($t) . "' /></div>";
-
-		echo minipres($titre, $res . generer_form_ecrire('install', $t));
-	} else {
-		$deja = (_FILE_CONNECT and analyse_fichier_connection(_FILE_CONNECT));
-		if (!$deja) {
-			redirige_url_ecrire('install', 'etape=1&chmod=' . $chmod);
-		} else {
-			redirige_url_ecrire();
-		}
-	}
+    $test_dir = _request('test_dir');
+    $chmod = 0;
+
+    if ($test_dir) {
+        if (substr($test_dir, -1) !== '/') {
+            $test_dir .= '/';
+        }
+        if (!in_array($test_dir, $GLOBALS['test_dirs'])) {
+            $GLOBALS['test_dirs'][] = _DIR_RACINE . $test_dir;
+        }
+    } else {
+        if (!_FILE_CONNECT) {
+            $GLOBALS['test_dirs'][] = _DIR_CONNECT;
+            $GLOBALS['test_dirs'][] = _DIR_CHMOD;
+        }
+    }
+
+    $bad_dirs = array();
+    $absent_dirs = array();
+
+    foreach ($GLOBALS['test_dirs'] as $i => $my_dir) {
+        $test = test_ecrire($my_dir);
+        if (!$test) {
+            $m = preg_replace(',^' . _DIR_RACINE . ',', '', $my_dir);
+            if (@file_exists($my_dir)) {
+                $bad_dirs['<li>' . $m . '</li>'] = 1;
+            } else {
+                $absent_dirs['<li>' . $m . '</li>'] = 1;
+            }
+        } else {
+            $chmod = max($chmod, $test);
+        }
+    }
+
+    if ($bad_dirs or $absent_dirs) {
+        if (!_FILE_CONNECT) {
+            $titre = _T('dirs_preliminaire');
+            $continuer = ' ' . _T('dirs_commencer') . '.';
+        } else {
+            $titre = _T('dirs_probleme_droits');
+        }
+
+
+        $res = "<div align='right'>" . menu_langues('var_lang_ecrire') . "</div>\n";
+
+        if ($bad_dirs) {
+            $res .=
+                _T(
+                    'dirs_repertoires_suivants',
+                    array('bad_dirs' => join("\n", array_keys($bad_dirs)))
+                ) .
+                '<b>' . _T('login_recharger') . '</b>.';
+        }
+
+        if ($absent_dirs) {
+            $res .=
+                _T(
+                    'dirs_repertoires_absents',
+                    array('bad_dirs' => join("\n", array_keys($absent_dirs)))
+                ) .
+                '<b>' . _T('login_recharger') . '</b>.';
+        }
+        $res = '<p>' . $continuer . $res . aider('install0', true) . '</p>';
+
+        $t = _T('login_recharger');
+        $t = (!$test_dir ? '' :
+                "<input type='hidden' name='test_dir' value='" . spip_htmlspecialchars($test_dir, ENT_QUOTES) . "' />")
+            . "<input type='hidden' name='etape' value='chmod' />"
+            . "<div style='text-align: right'><input type='submit' value='" . attribut_html($t) . "' /></div>";
+
+        echo minipres($titre, $res . generer_form_ecrire('install', $t));
+    } else {
+        $deja = (_FILE_CONNECT and analyse_fichier_connection(_FILE_CONNECT));
+        if (!$deja) {
+            redirige_url_ecrire('install', 'etape=1&chmod=' . $chmod);
+        } else {
+            redirige_url_ecrire();
+        }
+    }
 }

ecrire/req/sqlite_generique.php

Doc Comments +6 added lines, -6 removed lines

@@ -1528,8 +1528,8 @@ 
  * @param string|array $select Champs sélectionnés
  * @param string|array $from Tables sélectionnées
  * @param string|array $where Contraintes
- * @param string|array $groupby Regroupements
- * @param string|array $orderby Tris
+ * @param string $groupby Regroupements
+ * @param string $orderby Tris
  * @param string $limit Limites de résultats
  * @param string|array $having Contraintes posts sélections
  * @param string $serveur Nom de la connexion
@@ -1687,7 +1687,7 @@ 
  * @param string $nom_table Nom de la table SQL
  * @param string $serveur Nom de la connexion
  * @param bool $requeter Exécuter la requête, sinon la retourner
- * @return array|string
+ * @return string
  *     - chaîne vide si pas de description obtenue
  *     - string Texte de la requête si demandé
  *     - array description de la table sinon
@@ -2194,7 +2194,7 @@ 
  * 4) Renommer la table B en A
  * 5) Remettre les index (qui sont supprimés avec la table A)
  *
- * @param string|array $table
+ * @param string $table
  *     - string : Nom de la table table,
  *     - array : couple (nom de la table => nom futur)
  * @param string|array $colonne
@@ -2597,7 +2597,7 @@ 
  * stocke le resultat pour ne pas faire
  * de requetes showtable intempestives
  *
- * @param  $table
+ * @param  string $table
  * @param  $couples
  * @param string $desc
  * @param string $serveur
@@ -2789,7 +2789,7 @@ 
 	 * Constructeur
 	 *
 	 * @param string $serveur
-	 * @return bool
+	 * @return false|null
 	 */
 	public function __construct($serveur = '') {
 		_sqlite_init();

Spacing +93 added lines, -93 removed lines

@@ -64,27 +64,27 @@ 
 	// determiner le dossier de la base : $addr ou _DIR_DB
 	$f = _DIR_DB;
 	if ($addr and strpos($addr, '/') !== false) {
-		$f = rtrim($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);
+	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);
+		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 = "spip_sqlite".$sqlite_version."_constantes";
 	$define();
 
 	$ok = false;
@@ -92,8 +92,8 @@ 
 		// 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";
+		$db = "_sqlite".$sqlite_version."_install";
+		$tmp = _DIR_DB.$db.".sqlite";
 		$ok = $link = new \PDO("sqlite:$tmp");
 	} else {
 		// Ouvrir (eventuellement creer la base)
@@ -102,7 +102,7 @@ 
 
 	if (!$ok) {
 		$e = _sqlite_last_error_from_link($link);
-		spip_log("Impossible d'ouvrir la base SQLite($sqlite_version) $f : $e", 'sqlite.' . _LOG_HS);
+		spip_log("Impossible d'ouvrir la base SQLite($sqlite_version) $f : $e", 'sqlite.'._LOG_HS);
 
 		return false;
 	}
@@ -188,7 +188,7 @@ 
 		$table = $regs[3];
 		$suite = $regs[4];
 	} else {
-		spip_log("SQLite : Probleme de ALTER TABLE mal forme dans $query", 'sqlite.' . _LOG_ERREUR);
+		spip_log("SQLite : Probleme de ALTER TABLE mal forme dans $query", 'sqlite.'._LOG_ERREUR);
 
 		return false;
 	}
@@ -205,7 +205,7 @@ 
 	$i = 0;
 	$ouverte = false;
 	while ($do = array_shift($todo)) {
-		$todo2[$i] = isset($todo2[$i]) ? $todo2[$i] . "," . $do : $do;
+		$todo2[$i] = isset($todo2[$i]) ? $todo2[$i].",".$do : $do;
 		$o = (false !== strpos($do, "("));
 		$f = (false !== strpos($do, ")"));
 		if ($o and !$f) {
@@ -229,7 +229,7 @@ 
 			. ')\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);
+				'sqlite.'._LOG_ERREUR);
 
 			return false;
 		}
@@ -316,10 +316,10 @@ 
 
 			// pas geres en sqlite2
 			case 'RENAME':
-				$do = "RENAME TO" . substr($do, 6);
+				$do = "RENAME TO".substr($do, 6);
 			case 'RENAME TO':
 				if (!spip_sqlite::executer_requete("$debut $do", $serveur)) {
-					spip_log("SQLite : Erreur ALTER TABLE / RENAME : $query", 'sqlite.' . _LOG_ERREUR);
+					spip_log("SQLite : Erreur ALTER TABLE / RENAME : $query", 'sqlite.'._LOG_ERREUR);
 
 					return false;
 				}
@@ -360,7 +360,7 @@ 
 						$colonnes = substr($colonne_origine, 1, -1);
 						if (false !== strpos(",", $colonnes)) {
 							spip_log("SQLite : Erreur, impossible de creer un index sur plusieurs colonnes"
-								. " sans qu'il ait de nom ($table, ($colonnes))", 'sqlite.' . _LOG_ERREUR);
+								. " sans qu'il ait de nom ($table, ($colonnes))", 'sqlite.'._LOG_ERREUR);
 							break;
 						} else {
 							$nom_index = $colonnes;
@@ -375,12 +375,12 @@ 
 
 			// pas geres en sqlite2
 			case 'ADD COLUMN':
-				$do = "ADD" . substr($do, 10);
+				$do = "ADD".substr($do, 10);
 			case 'ADD':
 			default:
 				if (!preg_match(',primary\s+key,i', $do)) {
 					if (!spip_sqlite::executer_requete("$debut $do", $serveur)) {
-						spip_log("SQLite : Erreur ALTER TABLE / ADD : $query", 'sqlite.' . _LOG_ERREUR);
+						spip_log("SQLite : Erreur ALTER TABLE / ADD : $query", 'sqlite.'._LOG_ERREUR);
 
 						return false;
 					}
@@ -401,7 +401,7 @@ 
 					}
 					$opts['field'] = array($colonne_ajoutee => $def);
 					if (!_sqlite_modifier_table($table, array($colonne_ajoutee), $opts, $serveur)) {
-						spip_log("SQLite : Erreur ALTER TABLE / ADD : $query", 'sqlite.' . _LOG_ERREUR);
+						spip_log("SQLite : Erreur ALTER TABLE / ADD : $query", 'sqlite.'._LOG_ERREUR);
 
 						return false;
 					}
@@ -409,10 +409,10 @@ 
 				break;
 		}
 		// tout est bon, ouf !
-		spip_log("SQLite ($serveur) : Changements OK : $debut $do", 'sqlite.' . _LOG_INFO);
+		spip_log("SQLite ($serveur) : Changements OK : $debut $do", 'sqlite.'._LOG_INFO);
 	}
 
-	spip_log("SQLite ($serveur) : fin ALTER TABLE OK !", 'sqlite.' . _LOG_INFO);
+	spip_log("SQLite ($serveur) : fin ALTER TABLE OK !", 'sqlite.'._LOG_INFO);
 
 	return true;
 }
@@ -481,9 +481,9 @@ 
  * @return bool true si la base est créee.
  **/
 function spip_sqlite_create_base($nom, $serveur = '', $option = true) {
-	$f = $nom . '.sqlite';
+	$f = $nom.'.sqlite';
 	if (strpos($nom, "/") === false) {
-		$f = _DIR_DB . $f;
+		$f = _DIR_DB.$f;
 	}
 
 	$ok = new \PDO("sqlite:$f");
@@ -522,12 +522,12 @@ 
 	// 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);
+			'sqlite.'._LOG_ERREUR);
 
 		return false;
 	}
 
-	$query = "CREATE VIEW $nom AS " . $query_select;
+	$query = "CREATE VIEW $nom AS ".$query_select;
 
 	return spip_sqlite_query($query, $serveur, $requeter);
 }
@@ -552,15 +552,15 @@ 
  */
 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);
+		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;
+	$nom = $table.'_'.$nom;
 	// enlever d'eventuelles parentheses deja presentes sur champs
 	if (!is_array($champs)) {
 		if ($champs[0] == "(") {
@@ -582,12 +582,12 @@ 
 	} else {
 		/* simuler le IF EXISTS - version 2 et sqlite < 3.3a */
 		$a = spip_sqlite_showtable($table, $serveur);
-		if (isset($a['key']['KEY ' . $nom])) {
+		if (isset($a['key']['KEY '.$nom])) {
 			return true;
 		}
 	}
 
-	$query = "CREATE " . ($unique ? "UNIQUE " : "") . "INDEX$ifnotexists $nom ON $table (" . join(',', $champs) . ")";
+	$query = "CREATE ".($unique ? "UNIQUE " : "")."INDEX$ifnotexists $nom ON $table (".join(',', $champs).")";
 	$res = spip_sqlite_query($query, $serveur, $requeter);
 	if (!$requeter) {
 		return $res;
@@ -663,7 +663,7 @@ 
 	$serveur = '',
 	$requeter = true
 ) {
-	$c = !$groupby ? '*' : ('DISTINCT ' . (is_string($groupby) ? $groupby : join(',', $groupby)));
+	$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
@@ -761,14 +761,14 @@ 
  */
 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);
+		spip_log("Champ manquant pour supprimer un index sqlite ($nom, $table)", '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
-	$index = $table . '_' . $nom;
+	$index = $table.'_'.$nom;
 	$exist = " IF EXISTS";
 
 	$query = "DROP INDEX$exist $index";
@@ -800,7 +800,7 @@ 
 	if ($s) {
 		$trace = debug_backtrace();
 		if ($trace[0]['function'] != "spip_sqlite_error") {
-			spip_log("$s - $query - " . sql_error_backtrace(), 'sqlite.' . _LOG_ERREUR);
+			spip_log("$s - $query - ".sql_error_backtrace(), 'sqlite.'._LOG_ERREUR);
 		}
 	}
 
@@ -847,14 +847,14 @@ 
 		$t = $link->errorInfo();
 		$s = ltrim($t[0], '0'); // 00000 si pas d'erreur
 		if ($s) {
-			$s .= ' / ' . $t[1];
+			$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);
+		spip_log("Erreur sqlite $s", 'sqlite.'._LOG_ERREUR);
 	}
 
 	return $s ? $s : 0;
@@ -878,7 +878,7 @@ 
 	}
 
 	$query = spip_sqlite::traduire_requete($query, $serveur);
-	$query = 'EXPLAIN ' . $query;
+	$query = 'EXPLAIN '.$query;
 	if (!$requeter) {
 		return $query;
 	}
@@ -1038,7 +1038,7 @@ 
  **/
 function spip_sqlite_insert($table, $champs, $valeurs, $desc = array(), $serveur = '', $requeter = true) {
 
-	$query = "INSERT INTO $table " . ($champs ? "$champs VALUES $valeurs" : "DEFAULT VALUES");
+	$query = "INSERT INTO $table ".($champs ? "$champs VALUES $valeurs" : "DEFAULT VALUES");
 	if ($r = spip_sqlite_query($query, $serveur, $requeter)) {
 		if (!$requeter) {
 			return $r;
@@ -1094,8 +1094,8 @@ 
 
 	$cles = $valeurs = "";
 	if (count($couples)) {
-		$cles = "(" . join(',', array_keys($couples)) . ")";
-		$valeurs = "(" . join(',', $couples) . ")";
+		$cles = "(".join(',', array_keys($couples)).")";
+		$valeurs = "(".join(',', $couples).")";
 	}
 
 	return spip_sqlite_insert($table, $cles, $valeurs, $desc, $serveur, $requeter);
@@ -1155,11 +1155,11 @@ 
 
 		$champs = $valeurs = "";
 		if (count($couples)) {
-			$champs = "(" . join(',', array_keys($couples)) . ")";
-			$valeurs = "(" . join(',', $couples) . ")";
-			$query = $query_start . "$champs VALUES $valeurs";
+			$champs = "(".join(',', array_keys($couples)).")";
+			$valeurs = "(".join(',', $couples).")";
+			$query = $query_start."$champs VALUES $valeurs";
 		} else {
-			$query = $query_start . "DEFAULT VALUES";
+			$query = $query_start."DEFAULT VALUES";
 		}
 
 		if ($requeter) {
@@ -1291,7 +1291,7 @@ 
  * @return string       Texte de sélection pour la requête
  */
 function spip_sqlite_multi($objet, $lang) {
-	$r = "EXTRAIRE_MULTI(" . $objet . ", '" . $lang . "') AS multi";
+	$r = "EXTRAIRE_MULTI(".$objet.", '".$lang."') AS multi";
 
 	return $r;
 }
@@ -1362,7 +1362,7 @@ 
 function spip_sqlite_date_proche($champ, $interval, $unite) {
 	$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'))";
 }
 
 
@@ -1392,7 +1392,7 @@ 
 				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);
+				spip_log("ALTER $q", "repair"._LOG_INFO_IMPORTANTE);
 			}
 			if (preg_match(",^(INTEGER),i", $d)
 				and stripos($d, "NOT NULL") !== false
@@ -1401,7 +1401,7 @@ 
 				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);
+				spip_log("ALTER $q", "repair"._LOG_INFO_IMPORTANTE);
 			}
 			if (preg_match(",^(datetime),i", $d)
 				and stripos($d, "NOT NULL") !== false
@@ -1410,7 +1410,7 @@ 
 				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);
+				spip_log("ALTER $q", "repair"._LOG_INFO_IMPORTANTE);
 			}
 		}
 
@@ -1461,8 +1461,8 @@ 
 	// 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);
+	return spip_sqlite_query("REPLACE INTO $table (".join(',', array_keys($couples)).') VALUES ('.join(',',
+			$couples).')', $serveur);
 }
 
 
@@ -1548,7 +1548,7 @@ 
 		. _sqlite_calculer_expression('WHERE', $where)
 		. _sqlite_calculer_expression('GROUP BY', $groupby, ',')
 		. _sqlite_calculer_expression('HAVING', $having)
-		. ($orderby ? ("\nORDER BY " . _sqlite_calculer_order($orderby)) : '')
+		. ($orderby ? ("\nORDER BY "._sqlite_calculer_order($orderby)) : '')
 		. ($limit ? "\nLIMIT $limit" : '');
 
 	// dans un select, on doit renvoyer la requête en cas d'erreur
@@ -1585,10 +1585,10 @@ 
 
 	// interdire la creation d'une nouvelle base, 
 	// sauf si on est dans l'installation
-	if (!is_file($f = _DIR_DB . $db . '.sqlite')
+	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);
+		spip_log("Il est interdit de creer la base $db", 'sqlite.'._LOG_HS);
 
 		return false;
 	}
@@ -1597,12 +1597,12 @@ 
 	// avec les identifiants connus
 	$index = $serveur ? $serveur : 0;
 
-	if ($link = spip_connect_db('', '', '', '', '@selectdb@' . $db, $serveur, '', '')) {
+	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);
+		spip_log("Impossible de selectionner la base $db", 'sqlite.'._LOG_HS);
 
 		return false;
 	}
@@ -1653,7 +1653,7 @@ 
 	$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),
+	return spip_sqlite_query("SELECT name FROM sqlite_master WHERE type='table' AND tbl_name REGEXP "._q($match),
 		$serveur, $requeter);
 }
 
@@ -1743,7 +1743,7 @@ 
 				// 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 (false !== strpos($k, ')') or preg_match('/^[^\(]*\)/', $def)) {
-					$fields[$k_precedent] .= ',' . $k . ' ' . $def;
+					$fields[$k_precedent] .= ','.$k.' '.$def;
 					continue;
 				}
 
@@ -1778,13 +1778,13 @@ 
 				. '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
+				$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;
+				$keys[$keytype.' '.$key] = $colonnes;
 			}
 		}
 
@@ -1833,7 +1833,7 @@ 
 
 	$set = array();
 	foreach ($champs as $champ => $val) {
-		$set[] = $champ . "=$val";
+		$set[] = $champ."=$val";
 	}
 	if (!empty($set)) {
 		return spip_sqlite_query(
@@ -1887,7 +1887,7 @@ 
 
 	$set = array();
 	foreach ($champs as $champ => $val) {
-		$set[] = $champ . '=' . _sqlite_calculer_cite($val, isset($fields[$champ]) ? $fields[$champ] : '');
+		$set[] = $champ.'='._sqlite_calculer_cite($val, isset($fields[$champ]) ? $fields[$champ] : '');
 	}
 
 	return spip_sqlite_query(
@@ -1913,7 +1913,7 @@ 
  */
 function _sqlite_init() {
 	if (!defined('_DIR_DB')) {
-		define('_DIR_DB', _DIR_ETC . 'bases/');
+		define('_DIR_DB', _DIR_ETC.'bases/');
 	}
 	if (!defined('_SQLITE_CHMOD')) {
 		define('_SQLITE_CHMOD', _SPIP_CHMOD);
@@ -2016,9 +2016,9 @@ 
 	}
 
 	// echapper les ' en ''
-	spip_log("Pas de methode ->quote pour echapper", "sqlite." . _LOG_INFO_IMPORTANTE);
+	spip_log("Pas de methode ->quote pour echapper", "sqlite."._LOG_INFO_IMPORTANTE);
 
-	return ("'" . str_replace("'", "''", $v) . "'");
+	return ("'".str_replace("'", "''", $v)."'");
 }
 
 
@@ -2041,12 +2041,12 @@ 
 	$exp = "\n$expression ";
 
 	if (!is_array($v)) {
-		return $exp . $v;
+		return $exp.$v;
 	} else {
 		if (strtoupper($join) === 'AND') {
-			return $exp . join("\n\t$join ", array_map('_sqlite_calculer_where', $v));
+			return $exp.join("\n\t$join ", array_map('_sqlite_calculer_where', $v));
 		} else {
-			return $exp . join($join, $v);
+			return $exp.join($join, $v);
 		}
 	}
 }
@@ -2080,17 +2080,17 @@ 
 		if (substr($k, -1) == '@') {
 			// c'est une jointure qui se refere au from precedent
 			// pas de virgule
-			$res .= '  ' . $v;
+			$res .= '  '.$v;
 		} else {
 			if (!is_numeric($k)) {
 				$p = strpos($v, " ");
 				if ($p) {
-					$v = substr($v, 0, $p) . " AS '$k'" . substr($v, $p);
+					$v = substr($v, 0, $p)." AS '$k'".substr($v, $p);
 				} else {
 					$v .= " AS '$k'";
 				}
 			}
-			$res .= ', ' . $v;
+			$res .= ', '.$v;
 		}
 	}
 
@@ -2228,13 +2228,13 @@ 
 
 	$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);
+		spip_log("Alter table impossible sur $table_origine : table non trouvee", 'sqlite'._LOG_ERREUR);
 
 		return false;
 	}
 
 
-	$table_tmp = $table_origine . '_tmp';
+	$table_tmp = $table_origine.'_tmp';
 
 	// 1) creer une table temporaire avec les modifications	
 	// - DROP : suppression de la colonne
@@ -2320,7 +2320,7 @@ 
 		} else {
 			// enlever KEY
 			$k = substr($k, 4);
-			$queries[] = "CREATE INDEX $table_destination" . "_$k ON $table_destination ($v)";
+			$queries[] = "CREATE INDEX $table_destination"."_$k ON $table_destination ($v)";
 		}
 	}
 
@@ -2331,7 +2331,7 @@ 
 		foreach ($queries as $q) {
 			if (!spip_sqlite::executer_requete($q, $serveur)) {
 				spip_log("SQLite : ALTER TABLE table :"
-					. " Erreur a l'execution de la requete : $q", 'sqlite.' . _LOG_ERREUR);
+					. " Erreur a l'execution de la requete : $q", 'sqlite.'._LOG_ERREUR);
 				spip_sqlite::annuler_transaction($serveur);
 
 				return false;
@@ -2420,27 +2420,27 @@ 
 	$enum = "(\s*\([^\)]*\))?";
 
 	$remplace = array(
-		'/enum' . $enum . '/is' => 'VARCHAR(255)',
+		'/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',
+		'/((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 ''",
+		'/((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 = array(
-		'/(big|small|medium|tiny)?int(eger)?' . $num . '/is' => 'INTEGER'
+		'/(big|small|medium|tiny)?int(eger)?'.$num.'/is' => 'INTEGER'
 	);
 	// pour les int non autoincrement, il faut un DEFAULT
 	$remplace_nonautocinc = array(
-		'/((big|small|medium|tiny)?int(eger)?' . $num . '\s+not\s+null)\s*$/is' => "\\1 DEFAULT 0",
+		'/((big|small|medium|tiny)?int(eger)?'.$num.'\s+not\s+null)\s*$/is' => "\\1 DEFAULT 0",
 	);
 
 	if (is_string($query)) {
@@ -2482,7 +2482,7 @@ 
 		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." COLLATE NOCASE";
 	}
 
 	return $champ;
@@ -2569,7 +2569,7 @@ 
 		} else {
 			/* simuler le IF EXISTS - version 2 et sqlite < 3.3a */
 			$a = spip_sqlite_showtable($nom, $serveur);
-			if (isset($a['key']['KEY ' . $nom])) {
+			if (isset($a['key']['KEY '.$nom])) {
 				return true;
 			}
 		}
@@ -2577,7 +2577,7 @@ 
 	}
 
 	$temporary = $temporary ? ' TEMPORARY' : '';
-	$q = "CREATE$temporary TABLE$ifnotexists $nom ($query" . ($keys ? ",$keys" : '') . ")\n";
+	$q = "CREATE$temporary TABLE$ifnotexists $nom ($query".($keys ? ",$keys" : '').")\n";
 
 	return $q;
 }
@@ -2791,7 +2791,7 @@ 
 		$this->serveur = strtolower($serveur);
 
 		if (!($this->link = _sqlite_link($this->serveur)) && (!defined('_ECRIRE_INSTALL') || !_ECRIRE_INSTALL)) {
-			spip_log("Aucune connexion sqlite (link)", 'sqlite.' . _LOG_ERREUR);
+			spip_log("Aucune connexion sqlite (link)", 'sqlite.'._LOG_ERREUR);
 
 			return false;
 		}
@@ -2837,7 +2837,7 @@ 
 			try {
 				$r = $this->link->query($query);
 			} catch (\PDOException $e) {
-				spip_log("PDOException: " . $e->getMessage(), 'sqlite.' . _LOG_DEBUG);
+				spip_log("PDOException: ".$e->getMessage(), 'sqlite.'._LOG_DEBUG);
 				$r = false;
 			}
 			// sauvegarde de la requete (elle y est deja dans $r->queryString)
@@ -2858,11 +2858,11 @@ 
 
 			// loger les warnings/erreurs eventuels de sqlite remontant dans PHP
 			if ($e and $e instanceof \PDOException) {
-				$err = strip_tags($e->getMessage()) . " in " . $e->getFile() . " line " . $e->getLine();
-				spip_log("$err - " . $query, 'sqlite.' . _LOG_ERREUR);
+				$err = strip_tags($e->getMessage())." in ".$e->getFile()." line ".$e->getLine();
+				spip_log("$err - ".$query, 'sqlite.'._LOG_ERREUR);
 			} elseif ($err = (function_exists('error_get_last') ? error_get_last() : "") and $err != $last_error) {
-				$err = strip_tags($err['message']) . " in " . $err['file'] . " line " . $err['line'];
-				spip_log("$err - " . $query, 'sqlite.' . _LOG_ERREUR);
+				$err = strip_tags($err['message'])." in ".$err['file']." line ".$err['line'];
+				spip_log("$err - ".$query, 'sqlite.'._LOG_ERREUR);
 			} else {
 				$err = "";
 			}
@@ -2941,15 +2941,15 @@ 
 		// Correction Create Database
 		// Create Database -> requete ignoree
 		if (strpos($this->query, 'CREATE DATABASE') === 0) {
-			spip_log("Sqlite : requete non executee -> $this->query", 'sqlite.' . _LOG_AVERTISSEMENT);
+			spip_log("Sqlite : requete non executee -> $this->query", 'sqlite.'._LOG_AVERTISSEMENT);
 			$this->query = "SELECT 1";
 		}
 
 		// Correction Insert Ignore
 		// INSERT IGNORE -> insert (tout court et pas 'insert or replace')
 		if (strpos($this->query, 'INSERT IGNORE') === 0) {
-			spip_log("Sqlite : requete transformee -> $this->query", 'sqlite.' . _LOG_DEBUG);
-			$this->query = 'INSERT ' . substr($this->query, '13');
+			spip_log("Sqlite : requete transformee -> $this->query", 'sqlite.'._LOG_DEBUG);
+			$this->query = 'INSERT '.substr($this->query, '13');
 		}
 
 		// Correction des dates avec INTERVAL
@@ -2974,7 +2974,7 @@ 
 		// problematique car la jointure ne se fait pas du coup.
 		if (($this->sqlite_version == 2) && (strpos($this->query, "USING") !== false)) {
 			spip_log("'USING (champ)' n'est pas reconnu en SQLite 2. Utilisez 'ON table1.champ = table2.champ'",
-				'sqlite.' . _LOG_ERREUR);
+				'sqlite.'._LOG_ERREUR);
 			$this->query = preg_replace('/USING\s*\([^\)]*\)/', '', $this->query);
 		}
 
@@ -2994,8 +2994,8 @@ 
 		} else {
 			$suite = '';
 		}
-		$pref = ($this->prefixe) ? $this->prefixe . "_" : "";
-		$this->query = preg_replace('/([,\s])spip_/S', '\1' . $pref, $this->query) . $suite;
+		$pref = ($this->prefixe) ? $this->prefixe."_" : "";
+		$this->query = preg_replace('/([,\s])spip_/S', '\1'.$pref, $this->query).$suite;
 
 		// Correction zero AS x
 		// pg n'aime pas 0+x AS alias, sqlite, dans le meme style, 

Indentation +1908 added lines, -1908 removed lines

@@ -18,7 +18,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 // TODO: get/set_caracteres ?
@@ -42,91 +42,91 @@ 
  * @return array|bool
  */
 function req_sqlite_dist($addr, $port, $login, $pass, $db = '', $prefixe = '', $sqlite_version = '') {
-	static $last_connect = array();
-
-	// si provient de selectdb
-	// un code pour etre sur que l'on vient de select_db()
-	if (strpos($db, $code = '@selectdb@') !== false) {
-		foreach (array('addr', 'port', 'login', 'pass', 'prefixe') as $a) {
-			$$a = $last_connect[$a];
-		}
-		$db = str_replace($code, '', $db);
-	}
-
-	/*
+    static $last_connect = array();
+
+    // si provient de selectdb
+    // un code pour etre sur que l'on vient de select_db()
+    if (strpos($db, $code = '@selectdb@') !== false) {
+        foreach (array('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 strpos($addr, '/') !== false) {
-		$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 = array(
-			'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 array(
-		'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 strpos($addr, '/') !== false) {
+        $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 = array(
+            '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 array(
+        'db' => $db,
+        'prefixe' => $prefixe ? $prefixe : $db,
+        'link' => $link,
+        'total_requetes' => 0,
+    );
 }
 
 
@@ -145,14 +145,14 @@ 
  *    Resultat de la requete
  */
 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 = spip_sqlite::traduire_requete($query, $serveur);
-	if (!$requeter) {
-		return $query;
-	}
+    #spip_log("spip_sqlite_query() > $query",'sqlite.'._LOG_DEBUG);
+    #_sqlite_init(); // fait la premiere fois dans spip_sqlite
+    $query = spip_sqlite::traduire_requete($query, $serveur);
+    if (!$requeter) {
+        return $query;
+    }
 
-	return spip_sqlite::executer_requete($query, $serveur);
+    return spip_sqlite::executer_requete($query, $serveur);
 }
 
 
@@ -169,11 +169,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 = spip_sqlite::traduire_requete($query, $serveur);
+    $query = spip_sqlite_query("ALTER $query", $serveur, false);
+    // traduire la requete pour recuperer les bons noms de table
+    $query = spip_sqlite::traduire_requete($query, $serveur);
 
-	/*
+    /*
 		 * la il faut faire les transformations
 		 * si ALTER TABLE x (DROP|CHANGE) y
 		 *
@@ -182,239 +182,239 @@ 
 		 * 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 = array();
-	$i = 0;
-	$ouverte = false;
-	while ($do = array_shift($todo)) {
-		$todo2[$i] = isset($todo2[$i]) ? $todo2[$i] . "," . $do : $do;
-		$o = (false !== strpos($do, "("));
-		$f = (false !== strpos($do, ")"));
-		if ($o and !$f) {
-			$ouverte = true;
-		} elseif ($f) {
-			$ouverte = false;
-		}
-		if (!$ouverte) {
-			$i++;
-		}
-	}
-
-	// 3
-	$resultats = array();
-	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,
-					array('key' => array('PRIMARY KEY' => '')),
-					$serveur)
-				) {
-					return false;
-				}
-				break;
-			// suppression d'une colonne
-			case 'DROP COLUMN':
-			case 'DROP':
-				if (!_sqlite_modifier_table(
-					$table,
-					array($colonne_origine => ""),
-					array(),
-					$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,
-					array($colonne_origine => $colonne_destination),
-					array('field' => array($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,
-					array('field' => array($colonne_origine => $defo)),
-					$serveur)
-				) {
-					return false;
-				}
-				break;
-
-			// pas geres en sqlite2
-			case 'RENAME':
-				$do = "RENAME TO" . substr($do, 6);
-			case 'RENAME TO':
-				if (!spip_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,
-					array('key' => array('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 (false !== strpos(",", $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 (!spip_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 = array();
-					if (preg_match(',primary\s+key,i', $def)) {
-						$opts['key'] = array('PRIMARY KEY' => $colonne_ajoutee);
-						$def = preg_replace(',primary\s+key,i', '', $def);
-					}
-					$opts['field'] = array($colonne_ajoutee => $def);
-					if (!_sqlite_modifier_table($table, array($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 = array();
+    $i = 0;
+    $ouverte = false;
+    while ($do = array_shift($todo)) {
+        $todo2[$i] = isset($todo2[$i]) ? $todo2[$i] . "," . $do : $do;
+        $o = (false !== strpos($do, "("));
+        $f = (false !== strpos($do, ")"));
+        if ($o and !$f) {
+            $ouverte = true;
+        } elseif ($f) {
+            $ouverte = false;
+        }
+        if (!$ouverte) {
+            $i++;
+        }
+    }
+
+    // 3
+    $resultats = array();
+    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,
+                    array('key' => array('PRIMARY KEY' => '')),
+                    $serveur)
+                ) {
+                    return false;
+                }
+                break;
+            // suppression d'une colonne
+            case 'DROP COLUMN':
+            case 'DROP':
+                if (!_sqlite_modifier_table(
+                    $table,
+                    array($colonne_origine => ""),
+                    array(),
+                    $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,
+                    array($colonne_origine => $colonne_destination),
+                    array('field' => array($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,
+                    array('field' => array($colonne_origine => $defo)),
+                    $serveur)
+                ) {
+                    return false;
+                }
+                break;
+
+            // pas geres en sqlite2
+            case 'RENAME':
+                $do = "RENAME TO" . substr($do, 6);
+            case 'RENAME TO':
+                if (!spip_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,
+                    array('key' => array('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 (false !== strpos(",", $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 (!spip_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 = array();
+                    if (preg_match(',primary\s+key,i', $def)) {
+                        $opts['key'] = array('PRIMARY KEY' => $colonne_ajoutee);
+                        $def = preg_replace(',primary\s+key,i', '', $def);
+                    }
+                    $opts['field'] = array($colonne_ajoutee => $def);
+                    if (!_sqlite_modifier_table($table, array($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;
 }
 
 
@@ -437,38 +437,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;
 }
 
 /**
@@ -481,21 +481,21 @@ 
  * @return bool true si la base est créee.
  **/
 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;
 }
 
 
@@ -516,20 +516,20 @@ 
  *     - string texte de la requête si $requeter vaut false
  */
 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);
+    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;
-	}
+        return false;
+    }
 
-	$query = "CREATE VIEW $nom AS " . $query_select;
+    $query = "CREATE VIEW $nom AS " . $query_select;
 
-	return spip_sqlite_query($query, $serveur, $requeter);
+    return spip_sqlite_query($query, $serveur, $requeter);
 }
 
 /**
@@ -551,52 +551,52 @@ 
  *    string : requête, false si erreur, true sinon.
  */
 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 = array($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 = array($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;
+    }
 }
 
 /**
@@ -613,31 +613,31 @@ 
  * @return int                 Nombre de lignes
  */
 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 = $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 = $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();
+    }
 }
 
 
@@ -656,21 +656,21 @@ 
  *     - false si la requête a échouée
  **/
 function spip_sqlite_countsel(
-	$from = array(),
-	$where = array(),
-	$groupby = '',
-	$having = array(),
-	$serveur = '',
-	$requeter = true
+    $from = array(),
+    $where = array(),
+    $groupby = '',
+    $having = array(),
+    $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
-		list($r) = spip_sqlite_fetch($r, SPIP_SQLITE3_NUM, $serveur);
-	}
+    $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
+        list($r) = spip_sqlite_fetch($r, SPIP_SQLITE3_NUM, $serveur);
+    }
 
-	return $r;
+    return $r;
 }
 
 
@@ -687,22 +687,22 @@ 
  *     - False en cas d'erreur.
  **/
 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);
+    $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;
-	}
+    // renvoyer la requete inerte si demandee
+    if (!$requeter) {
+        return $res;
+    }
 
-	if ($res) {
-		$link = _sqlite_link($serveur);
-		return $res->rowCount();
-	} else {
-		return false;
-	}
+    if ($res) {
+        $link = _sqlite_link($serveur);
+        return $res->rowCount();
+    } else {
+        return false;
+    }
 }
 
 
@@ -718,15 +718,15 @@ 
  *     - true si la requête a réussie, false sinon
  */
 function spip_sqlite_drop_table($table, $exist = '', $serveur = '', $requeter = true) {
-	if ($exist) {
-		$exist = " IF EXISTS";
-	}
+    if ($exist) {
+        $exist = " IF EXISTS";
+    }
 
-	if (spip_sqlite_query("DROP TABLE$exist $table", $serveur, $requeter)) {
-		return true;
-	} else {
-		return false;
-	}
+    if (spip_sqlite_query("DROP TABLE$exist $table", $serveur, $requeter)) {
+        return true;
+    } else {
+        return false;
+    }
 }
 
 
@@ -742,11 +742,11 @@ 
  *     - true si la requête a réussie, false sinon
  */
 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);
 }
 
 /**
@@ -760,20 +760,20 @@ 
  * @return bool ou requete
  */
 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);
 }
 
 /**
@@ -789,28 +789,28 @@ 
  *     Erreur eventuelle
  **/
 function spip_sqlite_error($query = '', $serveur = '') {
-	$link = _sqlite_link($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);
-		}
-	}
+    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;
+    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
@@ -820,11 +820,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 "";
 }
 
 /**
@@ -841,23 +841,23 @@ 
  *    'HY000/1' : numéro de l'erreur SQLState / numéro d'erreur interne SQLite (en sqlite 3)
  **/
 function spip_sqlite_errno($serveur = '') {
-	$link = _sqlite_link($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 ($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);
-	}
+    if ($s) {
+        spip_log("Erreur sqlite $s", 'sqlite.' . _LOG_ERREUR);
+    }
 
-	return $s ? $s : 0;
+    return $s ? $s : 0;
 }
 
 
@@ -873,19 +873,19 @@ 
  *     - false si on a pas pu avoir d'explication
  */
 function spip_sqlite_explain($query, $serveur = '', $requeter = true) {
-	if (strpos(ltrim($query), 'SELECT') !== 0) {
-		return array();
-	}
+    if (strpos(ltrim($query), 'SELECT') !== 0) {
+        return array();
+    }
 
-	$query = spip_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 = spip_sqlite::executer_requete($query, $serveur, false);
+    $query = spip_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 = spip_sqlite::executer_requete($query, $serveur, false);
 
-	return $r ? spip_sqlite_fetch($r, null, $serveur) : false; // hum ? etrange ca... a verifier
+    return $r ? spip_sqlite_fetch($r, null, $serveur) : false; // hum ? etrange ca... a verifier
 }
 
 
@@ -902,29 +902,29 @@ 
  */
 function spip_sqlite_fetch($r, $t = '', $serveur = '', $requeter = true) {
 
-	$link = _sqlite_link($serveur);
-	$t = $t ? $t : SPIP_SQLITE3_ASSOC;
+    $link = _sqlite_link($serveur);
+    $t = $t ? $t : SPIP_SQLITE3_ASSOC;
 
-	$retour = false;
-	if ($r) {
-		$retour = $r->fetch($t);
-	}
+    $retour = false;
+    if ($r) {
+        $retour = $r->fetch($t);
+    }
 
-	// 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 ($retour
-		and strpos(implode('', array_keys($retour)), '.') !== false
-	) {
-		foreach ($retour as $cle => $val) {
-			if (($pos = strpos($cle, '.')) !== false) {
-				$retour[substr($cle, $pos + 1)] = &$retour[$cle];
-				unset($retour[$cle]);
-			}
-		}
-	}
+    // 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 ($retour
+        and strpos(implode('', array_keys($retour)), '.') !== false
+    ) {
+        foreach ($retour as $cle => $val) {
+            if (($pos = strpos($cle, '.')) !== false) {
+                $retour[substr($cle, $pos + 1)] = &$retour[$cle];
+                unset($retour[$cle]);
+            }
+        }
+    }
 
-	return $retour;
+    return $retour;
 }
 
 /**
@@ -937,8 +937,8 @@ 
  * @return bool True si déplacement réussi, false sinon.
  **/
 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;
 }
 
 
@@ -954,10 +954,10 @@ 
  * @return bool                True si réussi
  */
 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);
 }
 
 
@@ -972,8 +972,8 @@ 
  * @return void
  */
 function spip_sqlite_get_charset($charset = array(), $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);
 }
 
 
@@ -988,7 +988,7 @@ 
  *     Valeur hexadécimale pour SQLite
  **/
 function spip_sqlite_hex($v) {
-	return hexdec($v);
+    return hexdec($v);
 }
 
 
@@ -1010,7 +1010,7 @@ 
  *     Expression de requête SQL
  **/
 function spip_sqlite_in($val, $valeurs, $not = '', $serveur = '', $requeter = true) {
-	return "($val $not IN ($valeurs))";
+    return "($val $not IN ($valeurs))";
 }
 
 
@@ -1038,20 +1038,20 @@ 
  **/
 function spip_sqlite_insert($table, $champs, $valeurs, $desc = array(), $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 = spip_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 = spip_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;
 
 }
 
@@ -1077,28 +1077,28 @@ 
  *     - Tableau de description de la requête et du temps d'exécution, si var_profile activé
  **/
 function spip_sqlite_insertq($table, $couples = array(), $desc = array(), $serveur = '', $requeter = true) {
-	if (!$desc) {
-		$desc = description_table($table, $serveur);
-	}
-	if (!$desc) {
-		die("$table insertion sans description");
-	}
-	$fields = isset($desc['field']) ? $desc['field'] : array();
+    if (!$desc) {
+        $desc = description_table($table, $serveur);
+    }
+    if (!$desc) {
+        die("$table insertion sans description");
+    }
+    $fields = isset($desc['field']) ? $desc['field'] : array();
 
-	foreach ($couples as $champ => $val) {
-		$couples[$champ] = _sqlite_calculer_cite($val, $fields[$champ]);
-	}
+    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);
+    // 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) . ")";
-	}
+    $cles = $valeurs = "";
+    if (count($couples)) {
+        $cles = "(" . join(',', array_keys($couples)) . ")";
+        $valeurs = "(" . join(',', $couples) . ")";
+    }
 
-	return spip_sqlite_insert($table, $cles, $valeurs, $desc, $serveur, $requeter);
+    return spip_sqlite_insert($table, $cles, $valeurs, $desc, $serveur, $requeter);
 }
 
 
@@ -1122,70 +1122,70 @@ 
  *     - False en cas d'erreur.
  **/
 function spip_sqlite_insertq_multi($table, $tab_couples = array(), $desc = array(), $serveur = '', $requeter = true) {
-	if (!$desc) {
-		$desc = description_table($table, $serveur);
-	}
-	if (!$desc) {
-		die("$table insertion sans description");
-	}
-	if (!isset($desc['field'])) {
-		$desc['field'] = array();
-	}
-
-	// recuperer les champs 'timestamp' pour mise a jour auto de ceux-ci
-	$maj = _sqlite_ajouter_champs_timestamp($table, array(), $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 = spip_sqlite::traduire_requete($query_start, $serveur);
-
-	// ouvrir une transaction
-	if ($requeter) {
-		spip_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 = spip_sqlite::executer_requete($query, $serveur);
-		}
-
-		// sur le dernier couple uniquement
-		if (!count($tab_couples)) {
-			$nb = 0;
-			if ($requeter) {
-				$nb = spip_sqlite::last_insert_id($serveur);
-			} else {
-				return $query;
-			}
-		}
-
-		$err = spip_sqlite_error($query, $serveur);
-	}
-
-	if ($requeter) {
-		spip_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'] = array();
+    }
+
+    // recuperer les champs 'timestamp' pour mise a jour auto de ceux-ci
+    $maj = _sqlite_ajouter_champs_timestamp($table, array(), $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 = spip_sqlite::traduire_requete($query_start, $serveur);
+
+    // ouvrir une transaction
+    if ($requeter) {
+        spip_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 = spip_sqlite::executer_requete($query, $serveur);
+        }
+
+        // sur le dernier couple uniquement
+        if (!count($tab_couples)) {
+            $nb = 0;
+            if ($requeter) {
+                $nb = spip_sqlite::last_insert_id($serveur);
+            } else {
+                return $query;
+            }
+        }
+
+        $err = spip_sqlite_error($query, $serveur);
+    }
+
+    if ($requeter) {
+        spip_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;
 }
 
 
@@ -1200,7 +1200,7 @@ 
  *     Toujours true.
  **/
 function spip_sqlite_preferer_transaction($serveur = '', $requeter = true) {
-	return true;
+    return true;
 }
 
 /**
@@ -1217,12 +1217,12 @@ 
  *     string si texte de la requête demandé, true sinon
  **/
 function spip_sqlite_demarrer_transaction($serveur = '', $requeter = true) {
-	if (!$requeter) {
-		return "BEGIN TRANSACTION";
-	}
-	spip_sqlite::demarrer_transaction($serveur);
+    if (!$requeter) {
+        return "BEGIN TRANSACTION";
+    }
+    spip_sqlite::demarrer_transaction($serveur);
 
-	return true;
+    return true;
 }
 
 /**
@@ -1236,12 +1236,12 @@ 
  *     string si texte de la requête demandé, true sinon
  **/
 function spip_sqlite_terminer_transaction($serveur = '', $requeter = true) {
-	if (!$requeter) {
-		return "COMMIT";
-	}
-	spip_sqlite::finir_transaction($serveur);
+    if (!$requeter) {
+        return "COMMIT";
+    }
+    spip_sqlite::finir_transaction($serveur);
 
-	return true;
+    return true;
 }
 
 
@@ -1256,27 +1256,27 @@ 
  *     Liste des noms de bases
  **/
 function spip_sqlite_listdbs($serveur = '', $requeter = true) {
-	_sqlite_init();
+    _sqlite_init();
 
-	if (!is_dir($d = substr(_DIR_DB, 0, -1))) {
-		return array();
-	}
+    if (!is_dir($d = substr(_DIR_DB, 0, -1))) {
+        return array();
+    }
 
-	include_spip('inc/flock');
-	$bases = preg_files($d, $pattern = '(.*)\.sqlite$');
-	$bds = array();
+    include_spip('inc/flock');
+    $bases = preg_files($d, $pattern = '(.*)\.sqlite$');
+    $bds = array();
 
-	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);
-	}
+    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;
+    return $bds;
 }
 
 
@@ -1291,9 +1291,9 @@ 
  * @return string       Texte de sélection pour la requête
  */
 function spip_sqlite_multi($objet, $lang) {
-	$r = "EXTRAIRE_MULTI(" . $objet . ", '" . $lang . "') AS multi";
+    $r = "EXTRAIRE_MULTI(" . $objet . ", '" . $lang . "') AS multi";
 
-	return $r;
+    return $r;
 }
 
 
@@ -1310,15 +1310,15 @@ 
  * @return bool|string true / false / requete
  **/
 function spip_sqlite_optimize($table, $serveur = '', $requeter = true) {
-	static $do = false;
-	if ($requeter and $do) {
-		return true;
-	}
-	if ($requeter) {
-		$do = true;
-	}
+    static $do = false;
+    if ($requeter and $do) {
+        return true;
+    }
+    if ($requeter) {
+        $do = true;
+    }
 
-	return spip_sqlite_query("VACUUM", $serveur, $requeter);
+    return spip_sqlite_query("VACUUM", $serveur, $requeter);
 }
 
 
@@ -1335,15 +1335,15 @@ 
  *    Donnée prête à être utilisée par le gestionnaire SQL
  */
 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);
-	}
+    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);
+    return join(",", $v);
 }
 
 
@@ -1360,9 +1360,9 @@ 
  *     Expression SQL
  **/
 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'))";
 }
 
 
@@ -1380,44 +1380,44 @@ 
  *     l'état de la table après la réparation
  */
 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 array(" OK ");
-	}
-
-	return array(" 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 array(" OK ");
+    }
+
+    return array(" ERROR ");
 }
 
 
@@ -1446,23 +1446,23 @@ 
  *     - False en cas d'erreur.
  **/
 function spip_sqlite_replace($table, $couples, $desc = array(), $serveur = '', $requeter = true) {
-	if (!$desc) {
-		$desc = description_table($table, $serveur);
-	}
-	if (!$desc) {
-		die("$table insertion sans description");
-	}
-	$fields = isset($desc['field']) ? $desc['field'] : array();
+    if (!$desc) {
+        $desc = description_table($table, $serveur);
+    }
+    if (!$desc) {
+        die("$table insertion sans description");
+    }
+    $fields = isset($desc['field']) ? $desc['field'] : array();
 
-	foreach ($couples as $champ => $val) {
-		$couples[$champ] = _sqlite_calculer_cite($val, $fields[$champ]);
-	}
+    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);
+    // 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);
+    return spip_sqlite_query("REPLACE INTO $table (" . join(',', array_keys($couples)) . ') VALUES (' . join(',',
+            $couples) . ')', $serveur);
 }
 
 
@@ -1492,13 +1492,13 @@ 
  **/
 function spip_sqlite_replace_multi($table, $tab_couples, $desc = array(), $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;
 }
 
 
@@ -1525,44 +1525,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);
+    // 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));
+    // 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" : '');
+    $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 spip_sqlite::traduire_requete($query, $serveur);
-	}
+    // 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 spip_sqlite::traduire_requete($query, $serveur);
+    }
 
-	return $res;
+    return $res;
 }
 
 
@@ -1581,31 +1581,31 @@ 
  *     - False en cas d'erreur.
  **/
 function spip_sqlite_selectdb($db, $serveur = '', $requeter = true) {
-	_sqlite_init();
+    _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);
+    // 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;
-	}
+        return false;
+    }
 
-	// se connecter a la base indiquee
-	// avec les identifiants connus
-	$index = $serveur ? $serveur : 0;
+    // 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);
+    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;
-	}
+        return false;
+    }
 
 }
 
@@ -1621,8 +1621,8 @@ 
  * @return void
  */
 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 !
 }
 
 
@@ -1640,21 +1640,21 @@ 
  *     Ressource à utiliser avec sql_fetch()
  **/
 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);
 }
 
 define('_SQLITE_RE_SHOW_TABLE', '/^[^(),]*\(((?:[^()]*\((?:[^()]*\([^()]*\))?[^()]*\)[^()]*)*[^()]*)\)[^()]*$/');
@@ -1677,131 +1677,131 @@ 
  *     - array description de la table sinon
  */
 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 = array();
-			$keys = array();
-
-			// 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 (false !== strpos($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 = array();
-			foreach ($res as $c => $v) {
-				$fields[$c] = '';
-			}
-			$keys = array();
-		} else {
-			return "";
-		}
-	}
-
-	return array('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 = array();
+            $keys = array();
+
+            // 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 (false !== strpos($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 = array();
+            foreach ($res as $c => $v) {
+                $fields[$c] = '';
+            }
+            $keys = array();
+        } else {
+            return "";
+        }
+    }
+
+    return array('field' => $fields, 'key' => $keys);
 
 }
 
@@ -1828,20 +1828,20 @@ 
  *     - array Tableau décrivant la requête et son temps d'exécution si var_profile est actif
  */
 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);
+    // recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
+    $champs = _sqlite_ajouter_champs_timestamp($table, $champs, $desc, $serveur);
 
-	$set = array();
-	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);
-	}
+    $set = array();
+    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);
+    }
 }
 
 
@@ -1871,30 +1871,30 @@ 
  */
 function spip_sqlite_updateq($table, $champs, $where = '', $desc = array(), $serveur = '', $requeter = true) {
 
-	if (!$champs) {
-		return;
-	}
-	if (!$desc) {
-		$desc = description_table($table, $serveur);
-	}
-	if (!$desc) {
-		die("$table insertion sans description");
-	}
-	$fields = $desc['field'];
+    if (!$champs) {
+        return;
+    }
+    if (!$desc) {
+        $desc = description_table($table, $serveur);
+    }
+    if (!$desc) {
+        die("$table insertion sans description");
+    }
+    $fields = $desc['field'];
 
-	// recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
-	$champs = _sqlite_ajouter_champs_timestamp($table, $champs, $desc, $serveur);
+    // recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
+    $champs = _sqlite_ajouter_champs_timestamp($table, $champs, $desc, $serveur);
 
-	$set = array();
-	foreach ($champs as $champ => $val) {
-		$set[] = $champ . '=' . _sqlite_calculer_cite($val, isset($fields[$champ]) ? $fields[$champ] : '');
-	}
+    $set = array();
+    foreach ($champs as $champ => $val) {
+        $set[] = $champ . '=' . _sqlite_calculer_cite($val, isset($fields[$champ]) ? $fields[$champ] : '');
+    }
 
-	return spip_sqlite_query(
-		_sqlite_calculer_expression('UPDATE', $table, ',')
-		. _sqlite_calculer_expression('SET', $set, ',')
-		. _sqlite_calculer_expression('WHERE', $where),
-		$serveur, $requeter);
+    return spip_sqlite_query(
+        _sqlite_calculer_expression('UPDATE', $table, ',')
+        . _sqlite_calculer_expression('SET', $set, ',')
+        . _sqlite_calculer_expression('WHERE', $where),
+        $serveur, $requeter);
 }
 
 
@@ -1912,17 +1912,17 @@ 
  * @return void
  */
 function _sqlite_init() {
-	if (!defined('_DIR_DB')) {
-		define('_DIR_DB', _DIR_ETC . 'bases/');
-	}
-	if (!defined('_SQLITE_CHMOD')) {
-		define('_SQLITE_CHMOD', _SPIP_CHMOD);
-	}
+    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 (!is_dir($d = _DIR_DB)) {
+        include_spip('inc/flock');
+        sous_repertoire($d);
+    }
 }
 
 
@@ -1936,20 +1936,20 @@ 
  * @return bool|int
  */
 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);
 }
 
 
@@ -1960,9 +1960,9 @@ 
  * @return Object Information de connexion pour SQLite
  */
 function _sqlite_link($serveur = '') {
-	$link = &$GLOBALS['connexions'][$serveur ? $serveur : 0]['link'];
+    $link = &$GLOBALS['connexions'][$serveur ? $serveur : 0]['link'];
 
-	return $link;
+    return $link;
 }
 
 
@@ -1977,48 +1977,48 @@ 
  * @return string|number     Texte ou nombre échappé
  */
 function _sqlite_calculer_cite($v, $type) {
-	if ($type) {
-		if (is_null($v)
-			and stripos($type, "NOT NULL") === false
-		) {
-			return 'NULL';
-		} // null php se traduit en NULL SQL
-
-		if (sql_test_date($type) and preg_match('/^\w+\(/', $v)) {
-			return $v;
-		}
-		if (sql_test_int($type)) {
-			if (is_numeric($v)) {
-				return $v;
-			} 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_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
+        ) {
+            return 'NULL';
+        } // null php se traduit en NULL SQL
+
+        if (sql_test_date($type) and preg_match('/^\w+\(/', $v)) {
+            return $v;
+        }
+        if (sql_test_int($type)) {
+            if (is_numeric($v)) {
+                return $v;
+            } 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_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) . "'");
 }
 
 
@@ -2034,21 +2034,21 @@ 
  * @return string            Texte de l'expression, une partie donc, du texte la requête.
  */
 function _sqlite_calculer_expression($expression, $v, $join = 'AND') {
-	if (empty($v)) {
-		return '';
-	}
+    if (empty($v)) {
+        return '';
+    }
 
-	$exp = "\n$expression ";
+    $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 (!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);
+        }
+    }
 }
 
 
@@ -2064,7 +2064,7 @@ 
  * @return string Texte du orderby préparé
  */
 function _sqlite_calculer_order($orderby) {
-	return (is_array($orderby)) ? join(", ", $orderby) : $orderby;
+    return (is_array($orderby)) ? join(", ", $orderby) : $orderby;
 }
 
 
@@ -2075,26 +2075,26 @@ 
  * @return string Sélection de colonnes pour une clause SELECT
  */
 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);
 }
 
 
@@ -2117,26 +2117,26 @@ 
  *     Contrainte pour clause WHERE
  */
 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])";
+            }
+        }
+    }
 }
 
 
@@ -2151,19 +2151,19 @@ 
  * @return array|bool
  */
 function _sqlite_charger_version($version = '') {
-	$versions = array();
+    $versions = array();
 
-	// version 3
-	if (!$version || $version == 3) {
-		if (extension_loaded('pdo') && extension_loaded('pdo_sqlite')) {
-			$versions[] = 3;
-		}
-	}
-	if ($version) {
-		return in_array($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;
+    return $versions;
 }
 
 
@@ -2201,146 +2201,146 @@ 
  */
 function _sqlite_modifier_table($table, $colonne, $opt = array(), $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'] = array();
-	}
-	if (!isset($opt['key'])) {
-		$opt['key'] = array();
-	}
-
-	// 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 = array();
-	// pour le INSERT INTO plus loin
-	// stocker la correspondance nouvelles->anciennes colonnes
-	$fields_correspondances = array();
-	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 = array();
-	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 = array();
-
-	// 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)) {
-		spip_sqlite::demarrer_transaction($serveur);
-		// il faut les faire une par une car $query = join('; ', $queries).";"; ne fonctionne pas
-		foreach ($queries as $q) {
-			if (!spip_sqlite::executer_requete($q, $serveur)) {
-				spip_log("SQLite : ALTER TABLE table :"
-					. " Erreur a l'execution de la requete : $q", 'sqlite.' . _LOG_ERREUR);
-				spip_sqlite::annuler_transaction($serveur);
-
-				return false;
-			}
-		}
-		spip_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'] = array();
+    }
+    if (!isset($opt['key'])) {
+        $opt['key'] = array();
+    }
+
+    // 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 = array();
+    // pour le INSERT INTO plus loin
+    // stocker la correspondance nouvelles->anciennes colonnes
+    $fields_correspondances = array();
+    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 = array();
+    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 = array();
+
+    // 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)) {
+        spip_sqlite::demarrer_transaction($serveur);
+        // il faut les faire une par une car $query = join('; ', $queries).";"; ne fonctionne pas
+        foreach ($queries as $q) {
+            if (!spip_sqlite::executer_requete($q, $serveur)) {
+                spip_log("SQLite : ALTER TABLE table :"
+                    . " Erreur a l'execution de la requete : $q", 'sqlite.' . _LOG_ERREUR);
+                spip_sqlite::annuler_transaction($serveur);
+
+                return false;
+            }
+        }
+        spip_sqlite::finir_transaction($serveur);
+    }
+
+    return true;
 }
 
 
@@ -2350,60 +2350,60 @@ 
  * @return array
  */
 function _sqlite_ref_fonctions() {
-	$fonctions = array(
-		'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',
-		'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 = array(
-		'utf-8' => array('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 = array(
+        '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',
+        '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 = array(
+        'utf-8' => array('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;
 }
 
 
@@ -2415,56 +2415,56 @@ 
  * @return mixed
  */
 function _sqlite_remplacements_definitions_table($query, $autoinc = false) {
-	// quelques remplacements
-	$num = "(\s*\([0-9]*\))?";
-	$enum = "(\s*\([^\)]*\))?";
-
-	$remplace = array(
-		'/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 = array(
-		'/(big|small|medium|tiny)?int(eger)?' . $num . '/is' => 'INTEGER'
-	);
-	// pour les int non autoincrement, il faut un DEFAULT
-	$remplace_nonautocinc = array(
-		'/((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 = array(
+        '/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 = array(
+        '/(big|small|medium|tiny)?int(eger)?' . $num . '/is' => 'INTEGER'
+    );
+    // pour les int non autoincrement, il faut un DEFAULT
+    $remplace_nonautocinc = array(
+        '/((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;
 }
 
 /**
@@ -2475,17 +2475,17 @@ 
  * @return string
  */
 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";
-	}
+    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;
+    return $champ;
 }
 
 
@@ -2504,82 +2504,82 @@ 
  * @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;
 }
 
 
@@ -2598,35 +2598,35 @@ 
  * @return
  */
 function _sqlite_ajouter_champs_timestamp($table, $couples, $desc = '', $serveur = '') {
-	static $tables = array();
+    static $tables = array();
 
-	if (!isset($tables[$table])) {
+    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;
-			}
-		}
+        if (!$desc) {
+            $trouver_table = charger_fonction('trouver_table', 'base');
+            $desc = $trouver_table($table, $serveur);
+            // si pas de description, on ne fait rien, ou on die() ?
+            if (!$desc) {
+                return $couples;
+            }
+        }
 
-		// recherche des champs avec simplement 'TIMESTAMP'
-		// cependant, il faudra peut etre etendre
-		// avec la gestion de DEFAULT et ON UPDATE
-		// mais ceux-ci ne sont pas utilises dans le core
-		$tables[$table] = array();
+        // recherche des champs avec simplement 'TIMESTAMP'
+        // cependant, il faudra peut etre etendre
+        // avec la gestion de DEFAULT et ON UPDATE
+        // mais ceux-ci ne sont pas utilises dans le core
+        $tables[$table] = array();
 
-		$now = _sqlite_func_now();
-		foreach ($desc['field'] as $k => $v) {
-			if (strpos(strtolower(ltrim($v)), 'timestamp') === 0) {
-				$tables[$table][$k] = _sqlite_calculer_cite($now, $v);
-			}
-		}
-	}
+        $now = _sqlite_func_now();
+        foreach ($desc['field'] as $k => $v) {
+            if (strpos(strtolower(ltrim($v)), 'timestamp') === 0) {
+                $tables[$table][$k] = _sqlite_calculer_cite($now, $v);
+            }
+        }
+    }
 
-	// ajout des champs type 'timestamp' absents
-	return array_merge($tables[$table], $couples);
+    // ajout des champs type 'timestamp' absents
+    return array_merge($tables[$table], $couples);
 }
 
 
@@ -2637,7 +2637,7 @@ 
  * @return array|bool
  */
 function spip_versions_sqlite() {
-	return _sqlite_charger_version();
+    return _sqlite_charger_version();
 }
 
 /**
@@ -2645,113 +2645,113 @@ 
  * encadrées de transactions.
  **/
 class spip_sqlite {
-	/** @var sqlite_requeteur[] Liste des instances de requêteurs créés */
-	public static $requeteurs = array();
-	/** @var bool[] Pour chaque connexion, flag pour savoir si une transaction est en cours */
-	public static $transaction_en_cours = array();
-
-
-	/**
-	 * Retourne une unique instance du requêteur
-	 *
-	 * Retourne une instance unique du requêteur pour une connexion SQLite
-	 * donnée
-	 *
-	 * @param string $serveur
-	 *    Nom du connecteur
-	 * @return sqlite_requeteur
-	 *    Instance unique du requêteur
-	 **/
-	public static function requeteur($serveur) {
-		if (!isset(spip_sqlite::$requeteurs[$serveur])) {
-			spip_sqlite::$requeteurs[$serveur] = new sqlite_requeteur($serveur);
-		}
-
-		return spip_sqlite::$requeteurs[$serveur];
-	}
-
-	/**
-	 * Prépare le texte d'une requête avant son exécution
-	 *
-	 * Adapte la requête au format plus ou moins MySQL par un format
-	 * compris de SQLite.
-	 *
-	 * Change les préfixes de tables SPIP par ceux véritables
-	 *
-	 * @param string $query Requête à préparer
-	 * @param string $serveur Nom de la connexion
-	 * @return string           Requête préparée
-	 */
-	public static function traduire_requete($query, $serveur) {
-		$requeteur = spip_sqlite::requeteur($serveur);
-		$traducteur = new sqlite_traducteur($query, $requeteur->prefixe, $requeteur->sqlite_version);
-
-		return $traducteur->traduire_requete();
-	}
-
-	/**
-	 * Démarre une transaction
-	 *
-	 * @param string $serveur Nom de la connexion
-	 **/
-	public static function demarrer_transaction($serveur) {
-		spip_sqlite::executer_requete("BEGIN TRANSACTION", $serveur);
-		spip_sqlite::$transaction_en_cours[$serveur] = true;
-	}
-
-	/**
-	 * Exécute la requête donnée
-	 *
-	 * @param string $query Requête
-	 * @param string $serveur Nom de la connexion
-	 * @param null|bool $tracer Demander des statistiques (temps) ?
-	 **/
-	public static function executer_requete($query, $serveur, $tracer = null) {
-		$requeteur = spip_sqlite::requeteur($serveur);
-
-		return $requeteur->executer_requete($query, $tracer);
-	}
-
-	/**
-	 * Obtient l'identifiant de la dernière ligne insérée ou modifiée
-	 *
-	 * @param string $serveur Nom de la connexion
-	 * return int                Identifiant
-	 **/
-	public static function last_insert_id($serveur) {
-		$requeteur = spip_sqlite::requeteur($serveur);
-
-		return $requeteur->last_insert_id($serveur);
-	}
-
-	/**
-	 * Annule une transaction
-	 *
-	 * @param string $serveur Nom de la connexion
-	 **/
-	public static function annuler_transaction($serveur) {
-		spip_sqlite::executer_requete("ROLLBACK", $serveur);
-		spip_sqlite::$transaction_en_cours[$serveur] = false;
-	}
-
-	/**
-	 * Termine une transaction
-	 *
-	 * @param string $serveur Nom de la connexion
-	 **/
-	public static function finir_transaction($serveur) {
-		// si pas de transaction en cours, ne rien faire et le dire
-		if (!isset(spip_sqlite::$transaction_en_cours[$serveur])
-			or spip_sqlite::$transaction_en_cours[$serveur] == false
-		) {
-			return false;
-		}
-		// sinon fermer la transaction et retourner true
-		spip_sqlite::executer_requete("COMMIT", $serveur);
-		spip_sqlite::$transaction_en_cours[$serveur] = false;
-
-		return true;
-	}
+    /** @var sqlite_requeteur[] Liste des instances de requêteurs créés */
+    public static $requeteurs = array();
+    /** @var bool[] Pour chaque connexion, flag pour savoir si une transaction est en cours */
+    public static $transaction_en_cours = array();
+
+
+    /**
+     * Retourne une unique instance du requêteur
+     *
+     * Retourne une instance unique du requêteur pour une connexion SQLite
+     * donnée
+     *
+     * @param string $serveur
+     *    Nom du connecteur
+     * @return sqlite_requeteur
+     *    Instance unique du requêteur
+     **/
+    public static function requeteur($serveur) {
+        if (!isset(spip_sqlite::$requeteurs[$serveur])) {
+            spip_sqlite::$requeteurs[$serveur] = new sqlite_requeteur($serveur);
+        }
+
+        return spip_sqlite::$requeteurs[$serveur];
+    }
+
+    /**
+     * Prépare le texte d'une requête avant son exécution
+     *
+     * Adapte la requête au format plus ou moins MySQL par un format
+     * compris de SQLite.
+     *
+     * Change les préfixes de tables SPIP par ceux véritables
+     *
+     * @param string $query Requête à préparer
+     * @param string $serveur Nom de la connexion
+     * @return string           Requête préparée
+     */
+    public static function traduire_requete($query, $serveur) {
+        $requeteur = spip_sqlite::requeteur($serveur);
+        $traducteur = new sqlite_traducteur($query, $requeteur->prefixe, $requeteur->sqlite_version);
+
+        return $traducteur->traduire_requete();
+    }
+
+    /**
+     * Démarre une transaction
+     *
+     * @param string $serveur Nom de la connexion
+     **/
+    public static function demarrer_transaction($serveur) {
+        spip_sqlite::executer_requete("BEGIN TRANSACTION", $serveur);
+        spip_sqlite::$transaction_en_cours[$serveur] = true;
+    }
+
+    /**
+     * Exécute la requête donnée
+     *
+     * @param string $query Requête
+     * @param string $serveur Nom de la connexion
+     * @param null|bool $tracer Demander des statistiques (temps) ?
+     **/
+    public static function executer_requete($query, $serveur, $tracer = null) {
+        $requeteur = spip_sqlite::requeteur($serveur);
+
+        return $requeteur->executer_requete($query, $tracer);
+    }
+
+    /**
+     * Obtient l'identifiant de la dernière ligne insérée ou modifiée
+     *
+     * @param string $serveur Nom de la connexion
+     * return int                Identifiant
+     **/
+    public static function last_insert_id($serveur) {
+        $requeteur = spip_sqlite::requeteur($serveur);
+
+        return $requeteur->last_insert_id($serveur);
+    }
+
+    /**
+     * Annule une transaction
+     *
+     * @param string $serveur Nom de la connexion
+     **/
+    public static function annuler_transaction($serveur) {
+        spip_sqlite::executer_requete("ROLLBACK", $serveur);
+        spip_sqlite::$transaction_en_cours[$serveur] = false;
+    }
+
+    /**
+     * Termine une transaction
+     *
+     * @param string $serveur Nom de la connexion
+     **/
+    public static function finir_transaction($serveur) {
+        // si pas de transaction en cours, ne rien faire et le dire
+        if (!isset(spip_sqlite::$transaction_en_cours[$serveur])
+            or spip_sqlite::$transaction_en_cours[$serveur] == false
+        ) {
+            return false;
+        }
+        // sinon fermer la transaction et retourner true
+        spip_sqlite::executer_requete("COMMIT", $serveur);
+        spip_sqlite::$transaction_en_cours[$serveur] = false;
+
+        return true;
+    }
 }
 
 /*
@@ -2764,128 +2764,128 @@ 
  */
 
 class sqlite_requeteur {
-	/** @var string Texte de la requête */
-	public $query = ''; // la requete
-	/** @var string Nom de la connexion */
-	public $serveur = '';
-	/** @var Ressource Identifiant de la connexion SQLite */
-	public $link = '';
-	/** @var string Prefixe des tables SPIP */
-	public $prefixe = '';
-	/** @var string Nom de la base de donnée */
-	public $db = '';
-	/** @var bool Doit-on tracer les requetes (var_profile) ? */
-	public $tracer = false; // doit-on tracer les requetes (var_profile)
-
-	/** @var string Version de SQLite (2 ou 3) */
-	public $sqlite_version = '';
-
-	/**
-	 * Constructeur
-	 *
-	 * @param string $serveur
-	 * @return bool
-	 */
-	public function __construct($serveur = '') {
-		_sqlite_init();
-		$this->serveur = strtolower($serveur);
-
-		if (!($this->link = _sqlite_link($this->serveur)) && (!defined('_ECRIRE_INSTALL') || !_ECRIRE_INSTALL)) {
-			spip_log("Aucune connexion sqlite (link)", 'sqlite.' . _LOG_ERREUR);
-
-			return false;
-		}
-
-		$this->sqlite_version = _sqlite_is_version('', $this->link);
-
-		$this->prefixe = $GLOBALS['connexions'][$this->serveur ? $this->serveur : 0]['prefixe'];
-		$this->db = $GLOBALS['connexions'][$this->serveur ? $this->serveur : 0]['db'];
-
-		// tracage des requetes ?
-		$this->tracer = (isset($_GET['var_profile']) && $_GET['var_profile']);
-	}
-
-	/**
-	 * Lancer la requête transmise et faire le tracage si demandé
-	 *
-	 * @param string $query
-	 *     Requête à exécuter
-	 * @param bool|null $tracer
-	 *     true pour tracer la requête
-	 * @return bool|SQLiteResult
-	 */
-	public function executer_requete($query, $tracer = null) {
-		if (is_null($tracer)) {
-			$tracer = $this->tracer;
-		}
-		$err = "";
-		$t = 0;
-		if ($tracer or (defined('_DEBUG_TRACE_QUERIES') and _DEBUG_TRACE_QUERIES)) {
-			include_spip('public/tracer');
-			$t = trace_query_start();
-		}
-
-		# spip_log("requete: $this->serveur >> $query",'sqlite.'._LOG_DEBUG); // boum ? pourquoi ?
-		if ($this->link) {
-			// memoriser la derniere erreur PHP vue
-			$last_error = (function_exists('error_get_last') ? error_get_last() : "");
-			$e = null;
-			// sauver la derniere requete
-			$GLOBALS['connexions'][$this->serveur ? $this->serveur : 0]['last'] = $query;
-			$GLOBALS['connexions'][$this->serveur ? $this->serveur : 0]['total_requetes']++;
-
-			try {
-				$r = $this->link->query($query);
-			} catch (\PDOException $e) {
-				spip_log("PDOException: " . $e->getMessage(), 'sqlite.' . _LOG_DEBUG);
-				$r = false;
-			}
-			// sauvegarde de la requete (elle y est deja dans $r->queryString)
-			# $r->spipQueryString = $query;
-
-			// comptage : oblige de compter le nombre d'entrees retournees
-			// par une requete SELECT
-			// aucune autre solution ne donne le nombre attendu :( !
-			// particulierement s'il y a des LIMIT dans la requete.
-			if (strtoupper(substr(ltrim($query), 0, 6)) == 'SELECT') {
-				if ($r) {
-					// noter le link et la query pour faire le comptage *si* on en a besoin
-					$r->spipSqliteRowCount = array($this->link, $query);
-				} elseif ($r instanceof PDOStatement) {
-					$r->spipSqliteRowCount = 0;
-				}
-			}
-
-			// loger les warnings/erreurs eventuels de sqlite remontant dans PHP
-			if ($e and $e instanceof \PDOException) {
-				$err = strip_tags($e->getMessage()) . " in " . $e->getFile() . " line " . $e->getLine();
-				spip_log("$err - " . $query, 'sqlite.' . _LOG_ERREUR);
-			} elseif ($err = (function_exists('error_get_last') ? error_get_last() : "") and $err != $last_error) {
-				$err = strip_tags($err['message']) . " in " . $err['file'] . " line " . $err['line'];
-				spip_log("$err - " . $query, 'sqlite.' . _LOG_ERREUR);
-			} else {
-				$err = "";
-			}
-
-		} else {
-			$r = false;
-		}
-
-		if (spip_sqlite_errno($this->serveur)) {
-			$err .= spip_sqlite_error($query, $this->serveur);
-		}
-
-		return $t ? trace_query_end($query, $t, $r, $err, $this->serveur) : $r;
-	}
-
-	/**
-	 * Obtient l'identifiant de la dernière ligne insérée ou modifiée
-	 *
-	 * @return int
-	 **/
-	public function last_insert_id() {
-		return $this->link->lastInsertId();
-	}
+    /** @var string Texte de la requête */
+    public $query = ''; // la requete
+    /** @var string Nom de la connexion */
+    public $serveur = '';
+    /** @var Ressource Identifiant de la connexion SQLite */
+    public $link = '';
+    /** @var string Prefixe des tables SPIP */
+    public $prefixe = '';
+    /** @var string Nom de la base de donnée */
+    public $db = '';
+    /** @var bool Doit-on tracer les requetes (var_profile) ? */
+    public $tracer = false; // doit-on tracer les requetes (var_profile)
+
+    /** @var string Version de SQLite (2 ou 3) */
+    public $sqlite_version = '';
+
+    /**
+     * Constructeur
+     *
+     * @param string $serveur
+     * @return bool
+     */
+    public function __construct($serveur = '') {
+        _sqlite_init();
+        $this->serveur = strtolower($serveur);
+
+        if (!($this->link = _sqlite_link($this->serveur)) && (!defined('_ECRIRE_INSTALL') || !_ECRIRE_INSTALL)) {
+            spip_log("Aucune connexion sqlite (link)", 'sqlite.' . _LOG_ERREUR);
+
+            return false;
+        }
+
+        $this->sqlite_version = _sqlite_is_version('', $this->link);
+
+        $this->prefixe = $GLOBALS['connexions'][$this->serveur ? $this->serveur : 0]['prefixe'];
+        $this->db = $GLOBALS['connexions'][$this->serveur ? $this->serveur : 0]['db'];
+
+        // tracage des requetes ?
+        $this->tracer = (isset($_GET['var_profile']) && $_GET['var_profile']);
+    }
+
+    /**
+     * Lancer la requête transmise et faire le tracage si demandé
+     *
+     * @param string $query
+     *     Requête à exécuter
+     * @param bool|null $tracer
+     *     true pour tracer la requête
+     * @return bool|SQLiteResult
+     */
+    public function executer_requete($query, $tracer = null) {
+        if (is_null($tracer)) {
+            $tracer = $this->tracer;
+        }
+        $err = "";
+        $t = 0;
+        if ($tracer or (defined('_DEBUG_TRACE_QUERIES') and _DEBUG_TRACE_QUERIES)) {
+            include_spip('public/tracer');
+            $t = trace_query_start();
+        }
+
+        # spip_log("requete: $this->serveur >> $query",'sqlite.'._LOG_DEBUG); // boum ? pourquoi ?
+        if ($this->link) {
+            // memoriser la derniere erreur PHP vue
+            $last_error = (function_exists('error_get_last') ? error_get_last() : "");
+            $e = null;
+            // sauver la derniere requete
+            $GLOBALS['connexions'][$this->serveur ? $this->serveur : 0]['last'] = $query;
+            $GLOBALS['connexions'][$this->serveur ? $this->serveur : 0]['total_requetes']++;
+
+            try {
+                $r = $this->link->query($query);
+            } catch (\PDOException $e) {
+                spip_log("PDOException: " . $e->getMessage(), 'sqlite.' . _LOG_DEBUG);
+                $r = false;
+            }
+            // sauvegarde de la requete (elle y est deja dans $r->queryString)
+            # $r->spipQueryString = $query;
+
+            // comptage : oblige de compter le nombre d'entrees retournees
+            // par une requete SELECT
+            // aucune autre solution ne donne le nombre attendu :( !
+            // particulierement s'il y a des LIMIT dans la requete.
+            if (strtoupper(substr(ltrim($query), 0, 6)) == 'SELECT') {
+                if ($r) {
+                    // noter le link et la query pour faire le comptage *si* on en a besoin
+                    $r->spipSqliteRowCount = array($this->link, $query);
+                } elseif ($r instanceof PDOStatement) {
+                    $r->spipSqliteRowCount = 0;
+                }
+            }
+
+            // loger les warnings/erreurs eventuels de sqlite remontant dans PHP
+            if ($e and $e instanceof \PDOException) {
+                $err = strip_tags($e->getMessage()) . " in " . $e->getFile() . " line " . $e->getLine();
+                spip_log("$err - " . $query, 'sqlite.' . _LOG_ERREUR);
+            } elseif ($err = (function_exists('error_get_last') ? error_get_last() : "") and $err != $last_error) {
+                $err = strip_tags($err['message']) . " in " . $err['file'] . " line " . $err['line'];
+                spip_log("$err - " . $query, 'sqlite.' . _LOG_ERREUR);
+            } else {
+                $err = "";
+            }
+
+        } else {
+            $r = false;
+        }
+
+        if (spip_sqlite_errno($this->serveur)) {
+            $err .= spip_sqlite_error($query, $this->serveur);
+        }
+
+        return $t ? trace_query_end($query, $t, $r, $err, $this->serveur) : $r;
+    }
+
+    /**
+     * Obtient l'identifiant de la dernière ligne insérée ou modifiée
+     *
+     * @return int
+     **/
+    public function last_insert_id() {
+        return $this->link->lastInsertId();
+    }
 }
 
 
@@ -2895,198 +2895,198 @@ 
  * (fonction pour proteger les textes)
  */
 class sqlite_traducteur {
-	/** @var string $query Texte de la requête */
-	public $query = '';
-	/** @var string $prefixe Préfixe des tables */
-	public $prefixe = '';
-	/** @var string $sqlite_version Version de sqlite (2 ou 3) */
-	public $sqlite_version = '';
-
-	/** Pour les corrections à effectuer sur les requêtes : array(code=>'texte') trouvé
-	 *
-	 * @var array
-	 */
-	public $textes = array();
-
-	/**
-	 * Constructeur
-	 *
-	 * @param string $query Requête à préparer
-	 * @param string $prefixe Prefixe des tables à utiliser
-	 * @param string $sqlite_version Version SQLite (2 ou 3)
-	 */
-	public function __construct($query, $prefixe, $sqlite_version) {
-		$this->query = $query;
-		$this->prefixe = $prefixe;
-		$this->sqlite_version = $sqlite_version;
-	}
-
-	/**
-	 * Transformer la requete pour SQLite
-	 *
-	 * Enlève les textes, transforme la requête pour quelle soit
-	 * bien interprétée par SQLite, puis remet les textes
-	 * la fonction affecte `$this->query`
-	 */
-	public function traduire_requete() {
-		//
-		// 1) Protection des textes en les remplacant par des codes
-		//
-		// enlever les 'textes' et initialiser avec
-		list($this->query, $textes) = query_echappe_textes($this->query);
-
-		//
-		// 2) Corrections de la requete
-		//
-		// Correction Create Database
-		// Create Database -> requete ignoree
-		if (strpos($this->query, 'CREATE DATABASE') === 0) {
-			spip_log("Sqlite : requete non executee -> $this->query", 'sqlite.' . _LOG_AVERTISSEMENT);
-			$this->query = "SELECT 1";
-		}
-
-		// Correction Insert Ignore
-		// INSERT IGNORE -> insert (tout court et pas 'insert or replace')
-		if (strpos($this->query, 'INSERT IGNORE') === 0) {
-			spip_log("Sqlite : requete transformee -> $this->query", 'sqlite.' . _LOG_DEBUG);
-			$this->query = 'INSERT ' . substr($this->query, '13');
-		}
-
-		// Correction des dates avec INTERVAL
-		// utiliser sql_date_proche() de preference
-		if (strpos($this->query, 'INTERVAL') !== false) {
-			$this->query = preg_replace_callback("/DATE_(ADD|SUB)(.*)INTERVAL\s+(\d+)\s+([a-zA-Z]+)\)/U",
-				array(&$this, '_remplacerDateParTime'),
-				$this->query);
-		}
-
-		if (strpos($this->query, 'LEFT(') !== false) {
-			$this->query = str_replace('LEFT(', '_LEFT(', $this->query);
-		}
-
-		if (strpos($this->query, 'TIMESTAMPDIFF(') !== false) {
-			$this->query = preg_replace('/TIMESTAMPDIFF\(\s*([^,]*)\s*,/Uims', "TIMESTAMPDIFF('\\1',", $this->query);
-		}
-
-
-		// Correction Using
-		// USING (non reconnu en sqlite2)
-		// problematique car la jointure ne se fait pas du coup.
-		if (($this->sqlite_version == 2) && (strpos($this->query, "USING") !== false)) {
-			spip_log("'USING (champ)' n'est pas reconnu en SQLite 2. Utilisez 'ON table1.champ = table2.champ'",
-				'sqlite.' . _LOG_ERREUR);
-			$this->query = preg_replace('/USING\s*\([^\)]*\)/', '', $this->query);
-		}
-
-		// Correction Field
-		// remplace FIELD(table,i,j,k...) par CASE WHEN table=i THEN n ... ELSE 0 END
-		if (strpos($this->query, 'FIELD') !== false) {
-			$this->query = preg_replace_callback('/FIELD\s*\(([^\)]*)\)/',
-				array(&$this, '_remplacerFieldParCase'),
-				$this->query);
-		}
-
-		// Correction des noms de tables FROM
-		// mettre les bons noms de table dans from, update, insert, replace...
-		if (preg_match('/\s(SET|VALUES|WHERE|DATABASE)\s/iS', $this->query, $regs)) {
-			$suite = strstr($this->query, $regs[0]);
-			$this->query = substr($this->query, 0, -strlen($suite));
-		} else {
-			$suite = '';
-		}
-		$pref = ($this->prefixe) ? $this->prefixe . "_" : "";
-		$this->query = preg_replace('/([,\s])spip_/S', '\1' . $pref, $this->query) . $suite;
-
-		// Correction zero AS x
-		// pg n'aime pas 0+x AS alias, sqlite, dans le meme style, 
-		// n'apprecie pas du tout SELECT 0 as x ... ORDER BY x
-		// il dit que x ne doit pas être un integer dans le order by !
-		// on remplace du coup x par vide() dans ce cas uniquement
-		//
-		// rien que pour public/vertebrer.php ?
-		if ((strpos($this->query, "0 AS") !== false)) {
-			// on ne remplace que dans ORDER BY ou GROUP BY
-			if (preg_match('/\s(ORDER|GROUP) BY\s/i', $this->query, $regs)) {
-				$suite = strstr($this->query, $regs[0]);
-				$this->query = substr($this->query, 0, -strlen($suite));
-
-				// on cherche les noms des x dans 0 AS x
-				// on remplace dans $suite le nom par vide()
-				preg_match_all('/\b0 AS\s*([^\s,]+)/', $this->query, $matches, PREG_PATTERN_ORDER);
-				foreach ($matches[1] as $m) {
-					$suite = str_replace($m, 'VIDE()', $suite);
-				}
-				$this->query .= $suite;
-			}
-		}
-
-		// Correction possible des divisions entieres
-		// Le standard SQL (lequel? ou?) semble indiquer que
-		// a/b=c doit donner c entier si a et b sont entiers 4/3=1.
-		// C'est ce que retournent effectivement SQL Server et SQLite
-		// Ce n'est pas ce qu'applique MySQL qui retourne un reel : 4/3=1.333...
-		// 
-		// On peut forcer la conversion en multipliant par 1.0 avant la division
-		// /!\ SQLite 3.5.9 Debian/Ubuntu est victime d'un bug en plus ! 
-		// cf. https://bugs.launchpad.net/ubuntu/+source/sqlite3/+bug/254228
-		//     http://www.sqlite.org/cvstrac/tktview?tn=3202
-		// (4*1.0/3) n'est pas rendu dans ce cas !
-		# $this->query = str_replace('/','* 1.00 / ',$this->query);
-
-
-		// Correction critere REGEXP, non reconnu en sqlite2
-		if (($this->sqlite_version == 2) && (strpos($this->query, 'REGEXP') !== false)) {
-			$this->query = preg_replace('/([^\s\(]*)(\s*)REGEXP(\s*)([^\s\)]*)/', 'REGEXP($4, $1)', $this->query);
-		}
-
-		//
-		// 3) Remise en place des textes d'origine
-		//
-		// Correction Antiquotes et echappements
-		// ` => rien
-		if (strpos($this->query, '`') !== false) {
-			$this->query = str_replace('`', '', $this->query);
-		}
-
-		$this->query = query_reinjecte_textes($this->query, $textes);
-
-		return $this->query;
-	}
-
-
-	/**
-	 * Callback pour remplacer `DATE_` / `INTERVAL`
-	 * par `DATE ... strtotime`
-	 *
-	 * @param array $matches Captures
-	 * @return string Texte de date compris par SQLite
-	 */
-	public function _remplacerDateParTime($matches) {
-		$op = strtoupper($matches[1] == 'ADD') ? '+' : '-';
-
-		return "datetime$matches[2] '$op$matches[3] $matches[4]')";
-	}
-
-	/**
-	 * Callback pour remplacer `FIELD(table,i,j,k...)`
-	 * par `CASE WHEN table=i THEN n ... ELSE 0 END`
-	 *
-	 * @param array $matches Captures
-	 * @return string Texte de liste ordonnée compris par SQLite
-	 */
-	public function _remplacerFieldParCase($matches) {
-		$fields = substr($matches[0], 6, -1); // ne recuperer que l'interieur X de field(X)
-		$t = explode(',', $fields);
-		$index = array_shift($t);
-
-		$res = '';
-		$n = 0;
-		foreach ($t as $v) {
-			$n++;
-			$res .= "\nWHEN $index=$v THEN $n";
-		}
-
-		return "CASE $res ELSE 0 END ";
-	}
+    /** @var string $query Texte de la requête */
+    public $query = '';
+    /** @var string $prefixe Préfixe des tables */
+    public $prefixe = '';
+    /** @var string $sqlite_version Version de sqlite (2 ou 3) */
+    public $sqlite_version = '';
+
+    /** Pour les corrections à effectuer sur les requêtes : array(code=>'texte') trouvé
+     *
+     * @var array
+     */
+    public $textes = array();
+
+    /**
+     * Constructeur
+     *
+     * @param string $query Requête à préparer
+     * @param string $prefixe Prefixe des tables à utiliser
+     * @param string $sqlite_version Version SQLite (2 ou 3)
+     */
+    public function __construct($query, $prefixe, $sqlite_version) {
+        $this->query = $query;
+        $this->prefixe = $prefixe;
+        $this->sqlite_version = $sqlite_version;
+    }
+
+    /**
+     * Transformer la requete pour SQLite
+     *
+     * Enlève les textes, transforme la requête pour quelle soit
+     * bien interprétée par SQLite, puis remet les textes
+     * la fonction affecte `$this->query`
+     */
+    public function traduire_requete() {
+        //
+        // 1) Protection des textes en les remplacant par des codes
+        //
+        // enlever les 'textes' et initialiser avec
+        list($this->query, $textes) = query_echappe_textes($this->query);
+
+        //
+        // 2) Corrections de la requete
+        //
+        // Correction Create Database
+        // Create Database -> requete ignoree
+        if (strpos($this->query, 'CREATE DATABASE') === 0) {
+            spip_log("Sqlite : requete non executee -> $this->query", 'sqlite.' . _LOG_AVERTISSEMENT);
+            $this->query = "SELECT 1";
+        }
+
+        // Correction Insert Ignore
+        // INSERT IGNORE -> insert (tout court et pas 'insert or replace')
+        if (strpos($this->query, 'INSERT IGNORE') === 0) {
+            spip_log("Sqlite : requete transformee -> $this->query", 'sqlite.' . _LOG_DEBUG);
+            $this->query = 'INSERT ' . substr($this->query, '13');
+        }
+
+        // Correction des dates avec INTERVAL
+        // utiliser sql_date_proche() de preference
+        if (strpos($this->query, 'INTERVAL') !== false) {
+            $this->query = preg_replace_callback("/DATE_(ADD|SUB)(.*)INTERVAL\s+(\d+)\s+([a-zA-Z]+)\)/U",
+                array(&$this, '_remplacerDateParTime'),
+                $this->query);
+        }
+
+        if (strpos($this->query, 'LEFT(') !== false) {
+            $this->query = str_replace('LEFT(', '_LEFT(', $this->query);
+        }
+
+        if (strpos($this->query, 'TIMESTAMPDIFF(') !== false) {
+            $this->query = preg_replace('/TIMESTAMPDIFF\(\s*([^,]*)\s*,/Uims', "TIMESTAMPDIFF('\\1',", $this->query);
+        }
+
+
+        // Correction Using
+        // USING (non reconnu en sqlite2)
+        // problematique car la jointure ne se fait pas du coup.
+        if (($this->sqlite_version == 2) && (strpos($this->query, "USING") !== false)) {
+            spip_log("'USING (champ)' n'est pas reconnu en SQLite 2. Utilisez 'ON table1.champ = table2.champ'",
+                'sqlite.' . _LOG_ERREUR);
+            $this->query = preg_replace('/USING\s*\([^\)]*\)/', '', $this->query);
+        }
+
+        // Correction Field
+        // remplace FIELD(table,i,j,k...) par CASE WHEN table=i THEN n ... ELSE 0 END
+        if (strpos($this->query, 'FIELD') !== false) {
+            $this->query = preg_replace_callback('/FIELD\s*\(([^\)]*)\)/',
+                array(&$this, '_remplacerFieldParCase'),
+                $this->query);
+        }
+
+        // Correction des noms de tables FROM
+        // mettre les bons noms de table dans from, update, insert, replace...
+        if (preg_match('/\s(SET|VALUES|WHERE|DATABASE)\s/iS', $this->query, $regs)) {
+            $suite = strstr($this->query, $regs[0]);
+            $this->query = substr($this->query, 0, -strlen($suite));
+        } else {
+            $suite = '';
+        }
+        $pref = ($this->prefixe) ? $this->prefixe . "_" : "";
+        $this->query = preg_replace('/([,\s])spip_/S', '\1' . $pref, $this->query) . $suite;
+
+        // Correction zero AS x
+        // pg n'aime pas 0+x AS alias, sqlite, dans le meme style, 
+        // n'apprecie pas du tout SELECT 0 as x ... ORDER BY x
+        // il dit que x ne doit pas être un integer dans le order by !
+        // on remplace du coup x par vide() dans ce cas uniquement
+        //
+        // rien que pour public/vertebrer.php ?
+        if ((strpos($this->query, "0 AS") !== false)) {
+            // on ne remplace que dans ORDER BY ou GROUP BY
+            if (preg_match('/\s(ORDER|GROUP) BY\s/i', $this->query, $regs)) {
+                $suite = strstr($this->query, $regs[0]);
+                $this->query = substr($this->query, 0, -strlen($suite));
+
+                // on cherche les noms des x dans 0 AS x
+                // on remplace dans $suite le nom par vide()
+                preg_match_all('/\b0 AS\s*([^\s,]+)/', $this->query, $matches, PREG_PATTERN_ORDER);
+                foreach ($matches[1] as $m) {
+                    $suite = str_replace($m, 'VIDE()', $suite);
+                }
+                $this->query .= $suite;
+            }
+        }
+
+        // Correction possible des divisions entieres
+        // Le standard SQL (lequel? ou?) semble indiquer que
+        // a/b=c doit donner c entier si a et b sont entiers 4/3=1.
+        // C'est ce que retournent effectivement SQL Server et SQLite
+        // Ce n'est pas ce qu'applique MySQL qui retourne un reel : 4/3=1.333...
+        // 
+        // On peut forcer la conversion en multipliant par 1.0 avant la division
+        // /!\ SQLite 3.5.9 Debian/Ubuntu est victime d'un bug en plus ! 
+        // cf. https://bugs.launchpad.net/ubuntu/+source/sqlite3/+bug/254228
+        //     http://www.sqlite.org/cvstrac/tktview?tn=3202
+        // (4*1.0/3) n'est pas rendu dans ce cas !
+        # $this->query = str_replace('/','* 1.00 / ',$this->query);
+
+
+        // Correction critere REGEXP, non reconnu en sqlite2
+        if (($this->sqlite_version == 2) && (strpos($this->query, 'REGEXP') !== false)) {
+            $this->query = preg_replace('/([^\s\(]*)(\s*)REGEXP(\s*)([^\s\)]*)/', 'REGEXP($4, $1)', $this->query);
+        }
+
+        //
+        // 3) Remise en place des textes d'origine
+        //
+        // Correction Antiquotes et echappements
+        // ` => rien
+        if (strpos($this->query, '`') !== false) {
+            $this->query = str_replace('`', '', $this->query);
+        }
+
+        $this->query = query_reinjecte_textes($this->query, $textes);
+
+        return $this->query;
+    }
+
+
+    /**
+     * Callback pour remplacer `DATE_` / `INTERVAL`
+     * par `DATE ... strtotime`
+     *
+     * @param array $matches Captures
+     * @return string Texte de date compris par SQLite
+     */
+    public function _remplacerDateParTime($matches) {
+        $op = strtoupper($matches[1] == 'ADD') ? '+' : '-';
+
+        return "datetime$matches[2] '$op$matches[3] $matches[4]')";
+    }
+
+    /**
+     * Callback pour remplacer `FIELD(table,i,j,k...)`
+     * par `CASE WHEN table=i THEN n ... ELSE 0 END`
+     *
+     * @param array $matches Captures
+     * @return string Texte de liste ordonnée compris par SQLite
+     */
+    public function _remplacerFieldParCase($matches) {
+        $fields = substr($matches[0], 6, -1); // ne recuperer que l'interieur X de field(X)
+        $t = explode(',', $fields);
+        $index = array_shift($t);
+
+        $res = '';
+        $n = 0;
+        foreach ($t as $v) {
+            $n++;
+            $res .= "\nWHEN $index=$v THEN $n";
+        }
+
+        return "CASE $res ELSE 0 END ";
+    }
 
 }

ecrire/inc/filtres_mini.php

Doc Comments +1 added lines, -1 removed lines

@@ -147,7 +147,7 @@
 /**
  * Verifier qu'une url est absolue et que son protocole est bien parmi une liste autorisee
  * @param string $url_absolue
- * @param array $protocoles_autorises
+ * @param string[] $protocoles_autorises
  * @return bool
  */
 function protocole_verifier($url_absolue, $protocoles_autorises = array('http','https')) {

Spacing +11 added lines, -11 removed lines

@@ -44,10 +44,10 @@ 
 	}
 
 	if ($query) {
-		$url .= '?' . $query;
+		$url .= '?'.$query;
 	}
 
-	return '/' . preg_replace(',^/,S', '', $url);
+	return '/'.preg_replace(',^/,S', '', $url);
 }
 
 
@@ -74,7 +74,7 @@ 
 	if (preg_match(';^((?:[a-z]{3,33}:)?//.*?)(/.*)?$;iS', $lien, $r)) {
 		$r = array_pad($r, 3, null);
 
-		return $r[1] . resolve_path($r[2]);
+		return $r[1].resolve_path($r[2]);
 	}
 
 	# L'url site spip est un lien absolu aussi
@@ -93,13 +93,13 @@ 
 	}
 	switch (substr($lien, 0, 1)) {
 		case '/':
-			return $debut . resolve_path($lien);
+			return $debut.resolve_path($lien);
 		case '#':
-			return $debut . resolve_path($dir . $mot . $get . $lien);
+			return $debut.resolve_path($dir.$mot.$get.$lien);
 		case '':
-			return $debut . resolve_path($dir . $mot . $get . $hash);
+			return $debut.resolve_path($dir.$mot.$get.$hash);
 		default:
-			return $debut . resolve_path($dir . $lien);
+			return $debut.resolve_path($dir.$lien);
 	}
 }
 
@@ -127,7 +127,7 @@ 
 		return '';
 	}
 	if (!$base) {
-		$base = url_de_base() . (_DIR_RACINE ? _DIR_RESTREINT_ABS : '');
+		$base = url_de_base().(_DIR_RACINE ? _DIR_RESTREINT_ABS : '');
 	}
 
 	return suivre_lien($base, $url);
@@ -150,7 +150,7 @@ 
  * @param array $protocoles_autorises
  * @return bool
  */
-function protocole_verifier($url_absolue, $protocoles_autorises = array('http','https')) {
+function protocole_verifier($url_absolue, $protocoles_autorises = array('http', 'https')) {
 
 	if (preg_match(';^([a-z]{3,7})://;i', $url_absolue, $m)) {
 		$protocole = $m[1];
@@ -230,7 +230,7 @@ 
  */
 function spip_htmlspecialchars($string, $flags = null, $encoding = 'UTF-8', $double_encode = true) {
 	if (is_null($flags)) {
-		$flags = ENT_COMPAT|ENT_HTML401;
+		$flags = ENT_COMPAT | ENT_HTML401;
 	}
 
 	return htmlspecialchars($string, $flags, $encoding, $double_encode);
@@ -247,7 +247,7 @@ 
  */
 function spip_htmlentities($string, $flags = null, $encoding = 'UTF-8', $double_encode = true) {
 	if (is_null($flags)) {
-		$flags = ENT_COMPAT|ENT_HTML401;
+		$flags = ENT_COMPAT | ENT_HTML401;
 	}
 
 	return htmlentities($string, $flags, $encoding, $double_encode);

Indentation +93 added lines, -93 removed lines

@@ -17,7 +17,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -35,19 +35,19 @@ 
  * @return string URL nettoyée
  **/
 function resolve_path($url) {
-	list($url, $query) = array_pad(explode('?', $url, 2), 2, null);
-	while (preg_match(',/\.?/,', $url, $regs)    # supprime // et /./
-		or preg_match(',/[^/]*/\.\./,S', $url, $regs)  # supprime /toto/../
-		or preg_match(',^/\.\./,S', $url, $regs) # supprime les /../ du haut
-	) {
-		$url = str_replace($regs[0], '/', $url);
-	}
+    list($url, $query) = array_pad(explode('?', $url, 2), 2, null);
+    while (preg_match(',/\.?/,', $url, $regs)    # supprime // et /./
+        or preg_match(',/[^/]*/\.\./,S', $url, $regs)  # supprime /toto/../
+        or preg_match(',^/\.\./,S', $url, $regs) # supprime les /../ du haut
+    ) {
+        $url = str_replace($regs[0], '/', $url);
+    }
 
-	if ($query) {
-		$url .= '?' . $query;
-	}
+    if ($query) {
+        $url .= '?' . $query;
+    }
 
-	return '/' . preg_replace(',^/,S', '', $url);
+    return '/' . preg_replace(',^/,S', '', $url);
 }
 
 
@@ -68,41 +68,41 @@ 
  **/
 function suivre_lien($url, $lien) {
 
-	if (preg_match(',^(mailto|javascript|data|tel|callto|file|ftp):,iS', $lien)) {
-		return $lien;
-	}
-	if (preg_match(';^((?:[a-z]{3,33}:)?//.*?)(/.*)?$;iS', $lien, $r)) {
-		$r = array_pad($r, 3, null);
+    if (preg_match(',^(mailto|javascript|data|tel|callto|file|ftp):,iS', $lien)) {
+        return $lien;
+    }
+    if (preg_match(';^((?:[a-z]{3,33}:)?//.*?)(/.*)?$;iS', $lien, $r)) {
+        $r = array_pad($r, 3, null);
 
-		return $r[1] . resolve_path($r[2]);
-	}
+        return $r[1] . resolve_path($r[2]);
+    }
 
-	# L'url site spip est un lien absolu aussi
-	if (isset($GLOBALS['meta']['adresse_site']) and $lien == $GLOBALS['meta']['adresse_site']) {
-		return $lien;
-	}
+    # L'url site spip est un lien absolu aussi
+    if (isset($GLOBALS['meta']['adresse_site']) and $lien == $GLOBALS['meta']['adresse_site']) {
+        return $lien;
+    }
 
-	# lien relatif, il faut verifier l'url de base
-	# commencer par virer la chaine de get de l'url de base
-	$dir = '/';
-	$debut = '';
-	if (preg_match(';^((?:[a-z]{3,7}:)?//[^/]+)(/.*?/?)?([^/#?]*)([?][^#]*)?(#.*)?$;S', $url, $regs)) {
-		$debut = $regs[1];
-		$dir = !strlen($regs[2]) ? '/' : $regs[2];
-		$mot = $regs[3];
-		$get = isset($regs[4]) ? $regs[4] : '';
-		$hash = isset($regs[5]) ? $regs[5] : '';
-	}
-	switch (substr($lien, 0, 1)) {
-		case '/':
-			return $debut . resolve_path($lien);
-		case '#':
-			return $debut . resolve_path($dir . $mot . $get . $lien);
-		case '':
-			return $debut . resolve_path($dir . $mot . $get . $hash);
-		default:
-			return $debut . resolve_path($dir . $lien);
-	}
+    # lien relatif, il faut verifier l'url de base
+    # commencer par virer la chaine de get de l'url de base
+    $dir = '/';
+    $debut = '';
+    if (preg_match(';^((?:[a-z]{3,7}:)?//[^/]+)(/.*?/?)?([^/#?]*)([?][^#]*)?(#.*)?$;S', $url, $regs)) {
+        $debut = $regs[1];
+        $dir = !strlen($regs[2]) ? '/' : $regs[2];
+        $mot = $regs[3];
+        $get = isset($regs[4]) ? $regs[4] : '';
+        $hash = isset($regs[5]) ? $regs[5] : '';
+    }
+    switch (substr($lien, 0, 1)) {
+        case '/':
+            return $debut . resolve_path($lien);
+        case '#':
+            return $debut . resolve_path($dir . $mot . $get . $lien);
+        case '':
+            return $debut . resolve_path($dir . $mot . $get . $hash);
+        default:
+            return $debut . resolve_path($dir . $lien);
+    }
 }
 
 
@@ -125,14 +125,14 @@ 
  * @return string Texte ou URL (en absolus)
  **/
 function url_absolue($url, $base = '') {
-	if (strlen($url = trim($url)) == 0) {
-		return '';
-	}
-	if (!$base) {
-		$base = url_de_base() . (_DIR_RACINE ? _DIR_RESTREINT_ABS : '');
-	}
+    if (strlen($url = trim($url)) == 0) {
+        return '';
+    }
+    if (!$base) {
+        $base = url_de_base() . (_DIR_RACINE ? _DIR_RESTREINT_ABS : '');
+    }
 
-	return suivre_lien($base, $url);
+    return suivre_lien($base, $url);
 }
 
 /**
@@ -143,7 +143,7 @@ 
  * @return string
  */
 function protocole_implicite($url_absolue) {
-	return preg_replace(';^[a-z]{3,7}://;i', '//', $url_absolue);
+    return preg_replace(';^[a-z]{3,7}://;i', '//', $url_absolue);
 }
 
 /**
@@ -154,14 +154,14 @@ 
  */
 function protocole_verifier($url_absolue, $protocoles_autorises = array('http','https')) {
 
-	if (preg_match(';^([a-z]{3,7})://;i', $url_absolue, $m)) {
-		$protocole = $m[1];
-		if (in_array($protocole, $protocoles_autorises)
-		  or in_array(strtolower($protocole), array_map('strtolower', $protocoles_autorises))) {
-			return true;
-		}
-	}
-	return false;
+    if (preg_match(';^([a-z]{3,7})://;i', $url_absolue, $m)) {
+        $protocole = $m[1];
+        if (in_array($protocole, $protocoles_autorises)
+          or in_array(strtolower($protocole), array_map('strtolower', $protocoles_autorises))) {
+            return true;
+        }
+    }
+    return false;
 }
 
 /**
@@ -178,27 +178,27 @@ 
  * @return string Texte avec des URLs absolues
  **/
 function liens_absolus($texte, $base = '') {
-	if (preg_match_all(',(<(a|link|image|img|script)\s[^<>]*(href|src)=[^<>]*>),imsS', $texte, $liens, PREG_SET_ORDER)) {
-		if (!function_exists('extraire_attribut')) {
-			include_spip('inc/filtres');
-		}
-		foreach ($liens as $lien) {
-			foreach (array('href', 'src') as $attr) {
-				$href = extraire_attribut($lien[0], $attr);
-				if (strlen($href) > 0) {
-					if (!preg_match(';^((?:[a-z]{3,7}:)?//);iS', $href)) {
-						$abs = url_absolue($href, $base);
-						if (rtrim($href, '/') !== rtrim($abs, '/') and !preg_match('/^#/', $href)) {
-							$texte_lien = inserer_attribut($lien[0], $attr, $abs);
-							$texte = str_replace($lien[0], $texte_lien, $texte);
-						}
-					}
-				}
-			}
-		}
-	}
+    if (preg_match_all(',(<(a|link|image|img|script)\s[^<>]*(href|src)=[^<>]*>),imsS', $texte, $liens, PREG_SET_ORDER)) {
+        if (!function_exists('extraire_attribut')) {
+            include_spip('inc/filtres');
+        }
+        foreach ($liens as $lien) {
+            foreach (array('href', 'src') as $attr) {
+                $href = extraire_attribut($lien[0], $attr);
+                if (strlen($href) > 0) {
+                    if (!preg_match(';^((?:[a-z]{3,7}:)?//);iS', $href)) {
+                        $abs = url_absolue($href, $base);
+                        if (rtrim($href, '/') !== rtrim($abs, '/') and !preg_match('/^#/', $href)) {
+                            $texte_lien = inserer_attribut($lien[0], $attr, $abs);
+                            $texte = str_replace($lien[0], $texte_lien, $texte);
+                        }
+                    }
+                }
+            }
+        }
+    }
 
-	return $texte;
+    return $texte;
 }
 
 
@@ -214,11 +214,11 @@ 
  * @return string Texte ou URL (en absolus)
  **/
 function abs_url($texte, $base = '') {
-	if ($GLOBALS['mode_abs_url'] == 'url') {
-		return url_absolue($texte, $base);
-	} else {
-		return liens_absolus($texte, $base);
-	}
+    if ($GLOBALS['mode_abs_url'] == 'url') {
+        return url_absolue($texte, $base);
+    } else {
+        return liens_absolus($texte, $base);
+    }
 }
 
 /**
@@ -231,11 +231,11 @@ 
  * @return string
  */
 function spip_htmlspecialchars($string, $flags = null, $encoding = 'UTF-8', $double_encode = true) {
-	if (is_null($flags)) {
-		$flags = ENT_COMPAT|ENT_HTML401;
-	}
+    if (is_null($flags)) {
+        $flags = ENT_COMPAT|ENT_HTML401;
+    }
 
-	return htmlspecialchars($string, $flags, $encoding, $double_encode);
+    return htmlspecialchars($string, $flags, $encoding, $double_encode);
 }
 
 /**
@@ -248,9 +248,9 @@ 
  * @return string
  */
 function spip_htmlentities($string, $flags = null, $encoding = 'UTF-8', $double_encode = true) {
-	if (is_null($flags)) {
-		$flags = ENT_COMPAT|ENT_HTML401;
-	}
+    if (is_null($flags)) {
+        $flags = ENT_COMPAT|ENT_HTML401;
+    }
 
-	return htmlentities($string, $flags, $encoding, $double_encode);
+    return htmlentities($string, $flags, $encoding, $double_encode);
 }