Completed
Push — master ( 63ef06...04dfc5 )
by cam
03:40
created
ecrire/req/sqlite_generique.php 1 patch
Indentation   +1935 added lines, -1935 removed lines patch added patch discarded remove patch
@@ -18,7 +18,7 @@  discard block
 block discarded – undo
18 18
  */
19 19
 
20 20
 if (!defined('_ECRIRE_INC_VERSION')) {
21
-	return;
21
+    return;
22 22
 }
23 23
 
24 24
 // TODO: get/set_caracteres ?
@@ -42,91 +42,91 @@  discard block
 block discarded – undo
42 42
  * @return array|bool
43 43
  */
44 44
 function req_sqlite_dist($addr, $port, $login, $pass, $db = '', $prefixe = '', $sqlite_version = '') {
45
-	static $last_connect = array();
46
-
47
-	// si provient de selectdb
48
-	// un code pour etre sur que l'on vient de select_db()
49
-	if (strpos($db, $code = '@selectdb@') !== false) {
50
-		foreach (array('addr', 'port', 'login', 'pass', 'prefixe') as $a) {
51
-			$$a = $last_connect[$a];
52
-		}
53
-		$db = str_replace($code, '', $db);
54
-	}
55
-
56
-	/*
45
+    static $last_connect = array();
46
+
47
+    // si provient de selectdb
48
+    // un code pour etre sur que l'on vient de select_db()
49
+    if (strpos($db, $code = '@selectdb@') !== false) {
50
+        foreach (array('addr', 'port', 'login', 'pass', 'prefixe') as $a) {
51
+            $$a = $last_connect[$a];
52
+        }
53
+        $db = str_replace($code, '', $db);
54
+    }
55
+
56
+    /*
57 57
 	 * En sqlite, seule l'adresse du fichier est importante.
58 58
 	 * Ce sera $db le nom,
59 59
 	 * le path est $addr
60 60
 	 * (_DIR_DB si $addr est vide)
61 61
 	 */
62
-	_sqlite_init();
63
-
64
-	// determiner le dossier de la base : $addr ou _DIR_DB
65
-	$f = _DIR_DB;
66
-	if ($addr and strpos($addr, '/') !== false) {
67
-		$f = rtrim($addr, '/') . '/';
68
-	}
69
-
70
-	// un nom de base demande et impossible d'obtenir la base, on s'en va :
71
-	// il faut que la base existe ou que le repertoire parent soit writable
72
-	if ($db and !is_file($f .= $db . '.sqlite') and !is_writable(dirname($f))) {
73
-		spip_log("base $f non trouvee ou droits en ecriture manquants", 'sqlite.' . _LOG_HS);
74
-
75
-		return false;
76
-	}
77
-
78
-	// charger les modules sqlite au besoin
79
-	if (!_sqlite_charger_version($sqlite_version)) {
80
-		spip_log("Impossible de trouver/charger le module SQLite ($sqlite_version)!", 'sqlite.' . _LOG_HS);
81
-
82
-		return false;
83
-	}
84
-
85
-	// chargement des constantes
86
-	// il ne faut pas definir les constantes avant d'avoir charge les modules sqlite
87
-	$define = "spip_sqlite" . $sqlite_version . "_constantes";
88
-	$define();
89
-
90
-	$ok = false;
91
-	if (!$db) {
92
-		// si pas de db ->
93
-		// base temporaire tant qu'on ne connait pas son vrai nom
94
-		// pour tester la connexion
95
-		$db = "_sqlite" . $sqlite_version . "_install";
96
-		$tmp = _DIR_DB . $db . ".sqlite";
97
-		$ok = $link = new \PDO("sqlite:$tmp");
98
-	} else {
99
-		// Ouvrir (eventuellement creer la base)
100
-		$ok = $link = new \PDO("sqlite:$f");
101
-	}
102
-
103
-	if (!$ok) {
104
-		$e = _sqlite_last_error_from_link($link);
105
-		spip_log("Impossible d'ouvrir la base SQLite($sqlite_version) $f : $e", 'sqlite.' . _LOG_HS);
106
-
107
-		return false;
108
-	}
109
-
110
-	if ($link) {
111
-		$last_connect = array(
112
-			'addr' => $addr,
113
-			'port' => $port,
114
-			'login' => $login,
115
-			'pass' => $pass,
116
-			'db' => $db,
117
-			'prefixe' => $prefixe,
118
-		);
119
-		// etre sur qu'on definit bien les fonctions a chaque nouvelle connexion
120
-		include_spip('req/sqlite_fonctions');
121
-		_sqlite_init_functions($link);
122
-	}
123
-
124
-	return array(
125
-		'db' => $db,
126
-		'prefixe' => $prefixe ? $prefixe : $db,
127
-		'link' => $link,
128
-		'total_requetes' => 0,
129
-	);
62
+    _sqlite_init();
63
+
64
+    // determiner le dossier de la base : $addr ou _DIR_DB
65
+    $f = _DIR_DB;
66
+    if ($addr and strpos($addr, '/') !== false) {
67
+        $f = rtrim($addr, '/') . '/';
68
+    }
69
+
70
+    // un nom de base demande et impossible d'obtenir la base, on s'en va :
71
+    // il faut que la base existe ou que le repertoire parent soit writable
72
+    if ($db and !is_file($f .= $db . '.sqlite') and !is_writable(dirname($f))) {
73
+        spip_log("base $f non trouvee ou droits en ecriture manquants", 'sqlite.' . _LOG_HS);
74
+
75
+        return false;
76
+    }
77
+
78
+    // charger les modules sqlite au besoin
79
+    if (!_sqlite_charger_version($sqlite_version)) {
80
+        spip_log("Impossible de trouver/charger le module SQLite ($sqlite_version)!", 'sqlite.' . _LOG_HS);
81
+
82
+        return false;
83
+    }
84
+
85
+    // chargement des constantes
86
+    // il ne faut pas definir les constantes avant d'avoir charge les modules sqlite
87
+    $define = "spip_sqlite" . $sqlite_version . "_constantes";
88
+    $define();
89
+
90
+    $ok = false;
91
+    if (!$db) {
92
+        // si pas de db ->
93
+        // base temporaire tant qu'on ne connait pas son vrai nom
94
+        // pour tester la connexion
95
+        $db = "_sqlite" . $sqlite_version . "_install";
96
+        $tmp = _DIR_DB . $db . ".sqlite";
97
+        $ok = $link = new \PDO("sqlite:$tmp");
98
+    } else {
99
+        // Ouvrir (eventuellement creer la base)
100
+        $ok = $link = new \PDO("sqlite:$f");
101
+    }
102
+
103
+    if (!$ok) {
104
+        $e = _sqlite_last_error_from_link($link);
105
+        spip_log("Impossible d'ouvrir la base SQLite($sqlite_version) $f : $e", 'sqlite.' . _LOG_HS);
106
+
107
+        return false;
108
+    }
109
+
110
+    if ($link) {
111
+        $last_connect = array(
112
+            'addr' => $addr,
113
+            'port' => $port,
114
+            'login' => $login,
115
+            'pass' => $pass,
116
+            'db' => $db,
117
+            'prefixe' => $prefixe,
118
+        );
119
+        // etre sur qu'on definit bien les fonctions a chaque nouvelle connexion
120
+        include_spip('req/sqlite_fonctions');
121
+        _sqlite_init_functions($link);
122
+    }
123
+
124
+    return array(
125
+        'db' => $db,
126
+        'prefixe' => $prefixe ? $prefixe : $db,
127
+        'link' => $link,
128
+        'total_requetes' => 0,
129
+    );
130 130
 }
131 131
 
132 132
 
@@ -145,14 +145,14 @@  discard block
 block discarded – undo
145 145
  *    Resultat de la requete
146 146
  */
147 147
 function spip_sqlite_query($query, $serveur = '', $requeter = true) {
148
-	#spip_log("spip_sqlite_query() > $query",'sqlite.'._LOG_DEBUG);
149
-	#_sqlite_init(); // fait la premiere fois dans spip_sqlite
150
-	$query = spip_sqlite::traduire_requete($query, $serveur);
151
-	if (!$requeter) {
152
-		return $query;
153
-	}
148
+    #spip_log("spip_sqlite_query() > $query",'sqlite.'._LOG_DEBUG);
149
+    #_sqlite_init(); // fait la premiere fois dans spip_sqlite
150
+    $query = spip_sqlite::traduire_requete($query, $serveur);
151
+    if (!$requeter) {
152
+        return $query;
153
+    }
154 154
 
155
-	return spip_sqlite::executer_requete($query, $serveur);
155
+    return spip_sqlite::executer_requete($query, $serveur);
156 156
 }
157 157
 
158 158
 
@@ -169,11 +169,11 @@  discard block
 block discarded – undo
169 169
  */
170 170
 function spip_sqlite_alter($query, $serveur = '', $requeter = true) {
171 171
 
172
-	$query = spip_sqlite_query("ALTER $query", $serveur, false);
173
-	// traduire la requete pour recuperer les bons noms de table
174
-	$query = spip_sqlite::traduire_requete($query, $serveur);
172
+    $query = spip_sqlite_query("ALTER $query", $serveur, false);
173
+    // traduire la requete pour recuperer les bons noms de table
174
+    $query = spip_sqlite::traduire_requete($query, $serveur);
175 175
 
176
-	/*
176
+    /*
177 177
 		 * la il faut faire les transformations
178 178
 		 * si ALTER TABLE x (DROP|CHANGE) y
179 179
 		 *
@@ -182,239 +182,239 @@  discard block
 block discarded – undo
182 182
 		 * 3) faire chaque requete independemment
183 183
 		 */
184 184
 
185
-	// 1
186
-	if (preg_match("/\s*(ALTER(\s*IGNORE)?\s*TABLE\s*([^\s]*))\s*(.*)?/is", $query, $regs)) {
187
-		$debut = $regs[1];
188
-		$table = $regs[3];
189
-		$suite = $regs[4];
190
-	} else {
191
-		spip_log("SQLite : Probleme de ALTER TABLE mal forme dans $query", 'sqlite.' . _LOG_ERREUR);
192
-
193
-		return false;
194
-	}
195
-
196
-	// 2
197
-	// il faudrait une regexp pour eviter de spliter ADD PRIMARY KEY (colA, colB)
198
-	// tout en cassant "ADD PRIMARY KEY (colA, colB), ADD INDEX (chose)"... en deux
199
-	// ou revoir l'api de sql_alter en creant un 
200
-	// sql_alter_table($table,array($actions));
201
-	$todo = explode(',', $suite);
202
-
203
-	// on remet les morceaux dechires ensembles... que c'est laid !
204
-	$todo2 = array();
205
-	$i = 0;
206
-	$ouverte = false;
207
-	while ($do = array_shift($todo)) {
208
-		$todo2[$i] = isset($todo2[$i]) ? $todo2[$i] . "," . $do : $do;
209
-		$o = (false !== strpos($do, "("));
210
-		$f = (false !== strpos($do, ")"));
211
-		if ($o and !$f) {
212
-			$ouverte = true;
213
-		} elseif ($f) {
214
-			$ouverte = false;
215
-		}
216
-		if (!$ouverte) {
217
-			$i++;
218
-		}
219
-	}
220
-
221
-	// 3
222
-	$resultats = array();
223
-	foreach ($todo2 as $do) {
224
-		$do = trim($do);
225
-		if (!preg_match('/(DROP PRIMARY KEY|DROP KEY|DROP INDEX|DROP COLUMN|DROP'
226
-			. '|CHANGE COLUMN|CHANGE|MODIFY|RENAME TO|RENAME'
227
-			. '|ADD PRIMARY KEY|ADD KEY|ADD INDEX|ADD UNIQUE KEY|ADD UNIQUE'
228
-			. '|ADD COLUMN|ADD'
229
-			. ')\s*([^\s]*)\s*(.*)?/i', $do, $matches)
230
-		) {
231
-			spip_log("SQLite : Probleme de ALTER TABLE, utilisation non reconnue dans : $do \n(requete d'origine : $query)",
232
-				'sqlite.' . _LOG_ERREUR);
233
-
234
-			return false;
235
-		}
236
-
237
-		$cle = strtoupper($matches[1]);
238
-		$colonne_origine = $matches[2];
239
-		$colonne_destination = '';
240
-
241
-		$def = $matches[3];
242
-
243
-		// eluder une eventuelle clause before|after|first inutilisable
244
-		$defr = rtrim(preg_replace('/(BEFORE|AFTER|FIRST)(.*)$/is', '', $def));
245
-		$defo = $defr; // garder la def d'origine pour certains cas
246
-		// remplacer les definitions venant de mysql
247
-		$defr = _sqlite_remplacements_definitions_table($defr);
248
-
249
-		// reinjecter dans le do
250
-		$do = str_replace($def, $defr, $do);
251
-		$def = $defr;
252
-
253
-		switch ($cle) {
254
-			// suppression d'un index
255
-			case 'DROP KEY':
256
-			case 'DROP INDEX':
257
-				$nom_index = $colonne_origine;
258
-				spip_sqlite_drop_index($nom_index, $table, $serveur);
259
-				break;
260
-
261
-			// suppression d'une pk
262
-			case 'DROP PRIMARY KEY':
263
-				if (!_sqlite_modifier_table(
264
-					$table,
265
-					$colonne_origine,
266
-					array('key' => array('PRIMARY KEY' => '')),
267
-					$serveur)
268
-				) {
269
-					return false;
270
-				}
271
-				break;
272
-			// suppression d'une colonne
273
-			case 'DROP COLUMN':
274
-			case 'DROP':
275
-				if (!_sqlite_modifier_table(
276
-					$table,
277
-					array($colonne_origine => ""),
278
-					array(),
279
-					$serveur)
280
-				) {
281
-					return false;
282
-				}
283
-				break;
284
-
285
-			case 'CHANGE COLUMN':
286
-			case 'CHANGE':
287
-				// recuperer le nom de la future colonne
288
-				// on reprend la def d'origine car _sqlite_modifier_table va refaire la translation
289
-				// en tenant compte de la cle primaire (ce qui est mieux)
290
-				$def = trim($defo);
291
-				$colonne_destination = substr($def, 0, strpos($def, ' '));
292
-				$def = substr($def, strlen($colonne_destination) + 1);
293
-
294
-				if (!_sqlite_modifier_table(
295
-					$table,
296
-					array($colonne_origine => $colonne_destination),
297
-					array('field' => array($colonne_destination => $def)),
298
-					$serveur)
299
-				) {
300
-					return false;
301
-				}
302
-				break;
303
-
304
-			case 'MODIFY':
305
-				// on reprend la def d'origine car _sqlite_modifier_table va refaire la translation
306
-				// en tenant compte de la cle primaire (ce qui est mieux)
307
-				if (!_sqlite_modifier_table(
308
-					$table,
309
-					$colonne_origine,
310
-					array('field' => array($colonne_origine => $defo)),
311
-					$serveur)
312
-				) {
313
-					return false;
314
-				}
315
-				break;
316
-
317
-			// pas geres en sqlite2
318
-			case 'RENAME':
319
-				$do = "RENAME TO" . substr($do, 6);
320
-			case 'RENAME TO':
321
-				if (!spip_sqlite::executer_requete("$debut $do", $serveur)) {
322
-					spip_log("SQLite : Erreur ALTER TABLE / RENAME : $query", 'sqlite.' . _LOG_ERREUR);
323
-
324
-					return false;
325
-				}
326
-				break;
327
-
328
-			// ajout d'une pk
329
-			case 'ADD PRIMARY KEY':
330
-				$pk = trim(substr($do, 16));
331
-				$pk = ($pk[0] == '(') ? substr($pk, 1, -1) : $pk;
332
-				if (!_sqlite_modifier_table(
333
-					$table,
334
-					$colonne_origine,
335
-					array('key' => array('PRIMARY KEY' => $pk)),
336
-					$serveur)
337
-				) {
338
-					return false;
339
-				}
340
-				break;
341
-			// ajout d'un index
342
-			case 'ADD UNIQUE KEY':
343
-			case 'ADD UNIQUE':
344
-				$unique = true;
345
-			case 'ADD INDEX':
346
-			case 'ADD KEY':
347
-				if (!isset($unique)) {
348
-					$unique = false;
349
-				}
350
-				// peut etre "(colonne)" ou "nom_index (colonnes)"
351
-				// bug potentiel si qqn met "(colonne, colonne)"
352
-				//
353
-				// nom_index (colonnes)
354
-				if ($def) {
355
-					$colonnes = substr($def, 1, -1);
356
-					$nom_index = $colonne_origine;
357
-				} else {
358
-					// (colonne)
359
-					if ($colonne_origine[0] == "(") {
360
-						$colonnes = substr($colonne_origine, 1, -1);
361
-						if (false !== strpos(",", $colonnes)) {
362
-							spip_log("SQLite : Erreur, impossible de creer un index sur plusieurs colonnes"
363
-								. " sans qu'il ait de nom ($table, ($colonnes))", 'sqlite.' . _LOG_ERREUR);
364
-							break;
365
-						} else {
366
-							$nom_index = $colonnes;
367
-						}
368
-					} // nom_index
369
-					else {
370
-						$nom_index = $colonnes = $colonne_origine;
371
-					}
372
-				}
373
-				spip_sqlite_create_index($nom_index, $table, $colonnes, $unique, $serveur);
374
-				break;
375
-
376
-			// pas geres en sqlite2
377
-			case 'ADD COLUMN':
378
-				$do = "ADD" . substr($do, 10);
379
-			case 'ADD':
380
-			default:
381
-				if (!preg_match(',primary\s+key,i', $do)) {
382
-					if (!spip_sqlite::executer_requete("$debut $do", $serveur)) {
383
-						spip_log("SQLite : Erreur ALTER TABLE / ADD : $query", 'sqlite.' . _LOG_ERREUR);
384
-
385
-						return false;
386
-					}
387
-					break;
388
-
389
-				}
390
-				// ou si la colonne est aussi primary key
391
-				// cas du add id_truc int primary key
392
-				// ajout d'une colonne qui passe en primary key directe
393
-				else {
394
-					$def = trim(substr($do, 3));
395
-					$colonne_ajoutee = substr($def, 0, strpos($def, ' '));
396
-					$def = substr($def, strlen($colonne_ajoutee) + 1);
397
-					$opts = array();
398
-					if (preg_match(',primary\s+key,i', $def)) {
399
-						$opts['key'] = array('PRIMARY KEY' => $colonne_ajoutee);
400
-						$def = preg_replace(',primary\s+key,i', '', $def);
401
-					}
402
-					$opts['field'] = array($colonne_ajoutee => $def);
403
-					if (!_sqlite_modifier_table($table, array($colonne_ajoutee), $opts, $serveur)) {
404
-						spip_log("SQLite : Erreur ALTER TABLE / ADD : $query", 'sqlite.' . _LOG_ERREUR);
405
-
406
-						return false;
407
-					}
408
-				}
409
-				break;
410
-		}
411
-		// tout est bon, ouf !
412
-		spip_log("SQLite ($serveur) : Changements OK : $debut $do", 'sqlite.' . _LOG_INFO);
413
-	}
414
-
415
-	spip_log("SQLite ($serveur) : fin ALTER TABLE OK !", 'sqlite.' . _LOG_INFO);
416
-
417
-	return true;
185
+    // 1
186
+    if (preg_match("/\s*(ALTER(\s*IGNORE)?\s*TABLE\s*([^\s]*))\s*(.*)?/is", $query, $regs)) {
187
+        $debut = $regs[1];
188
+        $table = $regs[3];
189
+        $suite = $regs[4];
190
+    } else {
191
+        spip_log("SQLite : Probleme de ALTER TABLE mal forme dans $query", 'sqlite.' . _LOG_ERREUR);
192
+
193
+        return false;
194
+    }
195
+
196
+    // 2
197
+    // il faudrait une regexp pour eviter de spliter ADD PRIMARY KEY (colA, colB)
198
+    // tout en cassant "ADD PRIMARY KEY (colA, colB), ADD INDEX (chose)"... en deux
199
+    // ou revoir l'api de sql_alter en creant un 
200
+    // sql_alter_table($table,array($actions));
201
+    $todo = explode(',', $suite);
202
+
203
+    // on remet les morceaux dechires ensembles... que c'est laid !
204
+    $todo2 = array();
205
+    $i = 0;
206
+    $ouverte = false;
207
+    while ($do = array_shift($todo)) {
208
+        $todo2[$i] = isset($todo2[$i]) ? $todo2[$i] . "," . $do : $do;
209
+        $o = (false !== strpos($do, "("));
210
+        $f = (false !== strpos($do, ")"));
211
+        if ($o and !$f) {
212
+            $ouverte = true;
213
+        } elseif ($f) {
214
+            $ouverte = false;
215
+        }
216
+        if (!$ouverte) {
217
+            $i++;
218
+        }
219
+    }
220
+
221
+    // 3
222
+    $resultats = array();
223
+    foreach ($todo2 as $do) {
224
+        $do = trim($do);
225
+        if (!preg_match('/(DROP PRIMARY KEY|DROP KEY|DROP INDEX|DROP COLUMN|DROP'
226
+            . '|CHANGE COLUMN|CHANGE|MODIFY|RENAME TO|RENAME'
227
+            . '|ADD PRIMARY KEY|ADD KEY|ADD INDEX|ADD UNIQUE KEY|ADD UNIQUE'
228
+            . '|ADD COLUMN|ADD'
229
+            . ')\s*([^\s]*)\s*(.*)?/i', $do, $matches)
230
+        ) {
231
+            spip_log("SQLite : Probleme de ALTER TABLE, utilisation non reconnue dans : $do \n(requete d'origine : $query)",
232
+                'sqlite.' . _LOG_ERREUR);
233
+
234
+            return false;
235
+        }
236
+
237
+        $cle = strtoupper($matches[1]);
238
+        $colonne_origine = $matches[2];
239
+        $colonne_destination = '';
240
+
241
+        $def = $matches[3];
242
+
243
+        // eluder une eventuelle clause before|after|first inutilisable
244
+        $defr = rtrim(preg_replace('/(BEFORE|AFTER|FIRST)(.*)$/is', '', $def));
245
+        $defo = $defr; // garder la def d'origine pour certains cas
246
+        // remplacer les definitions venant de mysql
247
+        $defr = _sqlite_remplacements_definitions_table($defr);
248
+
249
+        // reinjecter dans le do
250
+        $do = str_replace($def, $defr, $do);
251
+        $def = $defr;
252
+
253
+        switch ($cle) {
254
+            // suppression d'un index
255
+            case 'DROP KEY':
256
+            case 'DROP INDEX':
257
+                $nom_index = $colonne_origine;
258
+                spip_sqlite_drop_index($nom_index, $table, $serveur);
259
+                break;
260
+
261
+            // suppression d'une pk
262
+            case 'DROP PRIMARY KEY':
263
+                if (!_sqlite_modifier_table(
264
+                    $table,
265
+                    $colonne_origine,
266
+                    array('key' => array('PRIMARY KEY' => '')),
267
+                    $serveur)
268
+                ) {
269
+                    return false;
270
+                }
271
+                break;
272
+            // suppression d'une colonne
273
+            case 'DROP COLUMN':
274
+            case 'DROP':
275
+                if (!_sqlite_modifier_table(
276
+                    $table,
277
+                    array($colonne_origine => ""),
278
+                    array(),
279
+                    $serveur)
280
+                ) {
281
+                    return false;
282
+                }
283
+                break;
284
+
285
+            case 'CHANGE COLUMN':
286
+            case 'CHANGE':
287
+                // recuperer le nom de la future colonne
288
+                // on reprend la def d'origine car _sqlite_modifier_table va refaire la translation
289
+                // en tenant compte de la cle primaire (ce qui est mieux)
290
+                $def = trim($defo);
291
+                $colonne_destination = substr($def, 0, strpos($def, ' '));
292
+                $def = substr($def, strlen($colonne_destination) + 1);
293
+
294
+                if (!_sqlite_modifier_table(
295
+                    $table,
296
+                    array($colonne_origine => $colonne_destination),
297
+                    array('field' => array($colonne_destination => $def)),
298
+                    $serveur)
299
+                ) {
300
+                    return false;
301
+                }
302
+                break;
303
+
304
+            case 'MODIFY':
305
+                // on reprend la def d'origine car _sqlite_modifier_table va refaire la translation
306
+                // en tenant compte de la cle primaire (ce qui est mieux)
307
+                if (!_sqlite_modifier_table(
308
+                    $table,
309
+                    $colonne_origine,
310
+                    array('field' => array($colonne_origine => $defo)),
311
+                    $serveur)
312
+                ) {
313
+                    return false;
314
+                }
315
+                break;
316
+
317
+            // pas geres en sqlite2
318
+            case 'RENAME':
319
+                $do = "RENAME TO" . substr($do, 6);
320
+            case 'RENAME TO':
321
+                if (!spip_sqlite::executer_requete("$debut $do", $serveur)) {
322
+                    spip_log("SQLite : Erreur ALTER TABLE / RENAME : $query", 'sqlite.' . _LOG_ERREUR);
323
+
324
+                    return false;
325
+                }
326
+                break;
327
+
328
+            // ajout d'une pk
329
+            case 'ADD PRIMARY KEY':
330
+                $pk = trim(substr($do, 16));
331
+                $pk = ($pk[0] == '(') ? substr($pk, 1, -1) : $pk;
332
+                if (!_sqlite_modifier_table(
333
+                    $table,
334
+                    $colonne_origine,
335
+                    array('key' => array('PRIMARY KEY' => $pk)),
336
+                    $serveur)
337
+                ) {
338
+                    return false;
339
+                }
340
+                break;
341
+            // ajout d'un index
342
+            case 'ADD UNIQUE KEY':
343
+            case 'ADD UNIQUE':
344
+                $unique = true;
345
+            case 'ADD INDEX':
346
+            case 'ADD KEY':
347
+                if (!isset($unique)) {
348
+                    $unique = false;
349
+                }
350
+                // peut etre "(colonne)" ou "nom_index (colonnes)"
351
+                // bug potentiel si qqn met "(colonne, colonne)"
352
+                //
353
+                // nom_index (colonnes)
354
+                if ($def) {
355
+                    $colonnes = substr($def, 1, -1);
356
+                    $nom_index = $colonne_origine;
357
+                } else {
358
+                    // (colonne)
359
+                    if ($colonne_origine[0] == "(") {
360
+                        $colonnes = substr($colonne_origine, 1, -1);
361
+                        if (false !== strpos(",", $colonnes)) {
362
+                            spip_log("SQLite : Erreur, impossible de creer un index sur plusieurs colonnes"
363
+                                . " sans qu'il ait de nom ($table, ($colonnes))", 'sqlite.' . _LOG_ERREUR);
364
+                            break;
365
+                        } else {
366
+                            $nom_index = $colonnes;
367
+                        }
368
+                    } // nom_index
369
+                    else {
370
+                        $nom_index = $colonnes = $colonne_origine;
371
+                    }
372
+                }
373
+                spip_sqlite_create_index($nom_index, $table, $colonnes, $unique, $serveur);
374
+                break;
375
+
376
+            // pas geres en sqlite2
377
+            case 'ADD COLUMN':
378
+                $do = "ADD" . substr($do, 10);
379
+            case 'ADD':
380
+            default:
381
+                if (!preg_match(',primary\s+key,i', $do)) {
382
+                    if (!spip_sqlite::executer_requete("$debut $do", $serveur)) {
383
+                        spip_log("SQLite : Erreur ALTER TABLE / ADD : $query", 'sqlite.' . _LOG_ERREUR);
384
+
385
+                        return false;
386
+                    }
387
+                    break;
388
+
389
+                }
390
+                // ou si la colonne est aussi primary key
391
+                // cas du add id_truc int primary key
392
+                // ajout d'une colonne qui passe en primary key directe
393
+                else {
394
+                    $def = trim(substr($do, 3));
395
+                    $colonne_ajoutee = substr($def, 0, strpos($def, ' '));
396
+                    $def = substr($def, strlen($colonne_ajoutee) + 1);
397
+                    $opts = array();
398
+                    if (preg_match(',primary\s+key,i', $def)) {
399
+                        $opts['key'] = array('PRIMARY KEY' => $colonne_ajoutee);
400
+                        $def = preg_replace(',primary\s+key,i', '', $def);
401
+                    }
402
+                    $opts['field'] = array($colonne_ajoutee => $def);
403
+                    if (!_sqlite_modifier_table($table, array($colonne_ajoutee), $opts, $serveur)) {
404
+                        spip_log("SQLite : Erreur ALTER TABLE / ADD : $query", 'sqlite.' . _LOG_ERREUR);
405
+
406
+                        return false;
407
+                    }
408
+                }
409
+                break;
410
+        }
411
+        // tout est bon, ouf !
412
+        spip_log("SQLite ($serveur) : Changements OK : $debut $do", 'sqlite.' . _LOG_INFO);
413
+    }
414
+
415
+    spip_log("SQLite ($serveur) : fin ALTER TABLE OK !", 'sqlite.' . _LOG_INFO);
416
+
417
+    return true;
418 418
 }
419 419
 
420 420
 
@@ -437,38 +437,38 @@  discard block
 block discarded – undo
437 437
  *     - true si la requête réussie, false sinon.
438 438
  */
439 439
 function spip_sqlite_create(
440
-	$nom,
441
-	$champs,
442
-	$cles,
443
-	$autoinc = false,
444
-	$temporary = false,
445
-	$serveur = '',
446
-	$requeter = true
440
+    $nom,
441
+    $champs,
442
+    $cles,
443
+    $autoinc = false,
444
+    $temporary = false,
445
+    $serveur = '',
446
+    $requeter = true
447 447
 ) {
448
-	$query = _sqlite_requete_create($nom, $champs, $cles, $autoinc, $temporary, $ifnotexists = true, $serveur, $requeter);
449
-	if (!$query) {
450
-		return false;
451
-	}
452
-	$res = spip_sqlite_query($query, $serveur, $requeter);
453
-
454
-	// SQLite ne cree pas les KEY sur les requetes CREATE TABLE
455
-	// il faut donc les faire creer ensuite
456
-	if (!$requeter) {
457
-		return $res;
458
-	}
459
-
460
-	$ok = $res ? true : false;
461
-	if ($ok) {
462
-		foreach ($cles as $k => $v) {
463
-			if (preg_match(',^(UNIQUE KEY|KEY|UNIQUE)\s,i', $k, $m)) {
464
-				$index = trim(substr($k, strlen($m[1])));
465
-				$unique = (strlen($m[1]) > 3);
466
-				$ok &= spip_sqlite_create_index($index, $nom, $v, $unique, $serveur);
467
-			}
468
-		}
469
-	}
470
-
471
-	return $ok ? true : false;
448
+    $query = _sqlite_requete_create($nom, $champs, $cles, $autoinc, $temporary, $ifnotexists = true, $serveur, $requeter);
449
+    if (!$query) {
450
+        return false;
451
+    }
452
+    $res = spip_sqlite_query($query, $serveur, $requeter);
453
+
454
+    // SQLite ne cree pas les KEY sur les requetes CREATE TABLE
455
+    // il faut donc les faire creer ensuite
456
+    if (!$requeter) {
457
+        return $res;
458
+    }
459
+
460
+    $ok = $res ? true : false;
461
+    if ($ok) {
462
+        foreach ($cles as $k => $v) {
463
+            if (preg_match(',^(UNIQUE KEY|KEY|UNIQUE)\s,i', $k, $m)) {
464
+                $index = trim(substr($k, strlen($m[1])));
465
+                $unique = (strlen($m[1]) > 3);
466
+                $ok &= spip_sqlite_create_index($index, $nom, $v, $unique, $serveur);
467
+            }
468
+        }
469
+    }
470
+
471
+    return $ok ? true : false;
472 472
 }
473 473
 
474 474
 /**
@@ -481,21 +481,21 @@  discard block
 block discarded – undo
481 481
  * @return bool true si la base est créee.
482 482
  **/
483 483
 function spip_sqlite_create_base($nom, $serveur = '', $option = true) {
484
-	$f = $nom . '.sqlite';
485
-	if (strpos($nom, "/") === false) {
486
-		$f = _DIR_DB . $f;
487
-	}
484
+    $f = $nom . '.sqlite';
485
+    if (strpos($nom, "/") === false) {
486
+        $f = _DIR_DB . $f;
487
+    }
488 488
 
489
-	$ok = new \PDO("sqlite:$f");
489
+    $ok = new \PDO("sqlite:$f");
490 490
 
491
-	if ($ok) {
492
-		unset($ok);
491
+    if ($ok) {
492
+        unset($ok);
493 493
 
494
-		return true;
495
-	}
496
-	unset($ok);
494
+        return true;
495
+    }
496
+    unset($ok);
497 497
 
498
-	return false;
498
+    return false;
499 499
 }
500 500
 
501 501
 
@@ -516,20 +516,20 @@  discard block
 block discarded – undo
516 516
  *     - string texte de la requête si $requeter vaut false
517 517
  */
518 518
 function spip_sqlite_create_view($nom, $query_select, $serveur = '', $requeter = true) {
519
-	if (!$query_select) {
520
-		return false;
521
-	}
522
-	// vue deja presente
523
-	if (sql_showtable($nom, false, $serveur)) {
524
-		spip_log("Echec creation d'une vue sql ($nom) car celle-ci existe deja (serveur:$serveur)",
525
-			'sqlite.' . _LOG_ERREUR);
519
+    if (!$query_select) {
520
+        return false;
521
+    }
522
+    // vue deja presente
523
+    if (sql_showtable($nom, false, $serveur)) {
524
+        spip_log("Echec creation d'une vue sql ($nom) car celle-ci existe deja (serveur:$serveur)",
525
+            'sqlite.' . _LOG_ERREUR);
526 526
 
527
-		return false;
528
-	}
527
+        return false;
528
+    }
529 529
 
530
-	$query = "CREATE VIEW $nom AS " . $query_select;
530
+    $query = "CREATE VIEW $nom AS " . $query_select;
531 531
 
532
-	return spip_sqlite_query($query, $serveur, $requeter);
532
+    return spip_sqlite_query($query, $serveur, $requeter);
533 533
 }
534 534
 
535 535
 /**
@@ -551,52 +551,52 @@  discard block
 block discarded – undo
551 551
  *    string : requête, false si erreur, true sinon.
552 552
  */
553 553
 function spip_sqlite_create_index($nom, $table, $champs, $unique = '', $serveur = '', $requeter = true) {
554
-	if (!($nom or $table or $champs)) {
555
-		spip_log("Champ manquant pour creer un index sqlite ($nom, $table, (" . join(',', $champs) . "))",
556
-			'sqlite.' . _LOG_ERREUR);
557
-
558
-		return false;
559
-	}
560
-
561
-	// SQLite ne differentie pas noms des index en fonction des tables
562
-	// il faut donc creer des noms uniques d'index pour une base sqlite
563
-	$nom = $table . '_' . $nom;
564
-	// enlever d'eventuelles parentheses deja presentes sur champs
565
-	if (!is_array($champs)) {
566
-		if ($champs[0] == "(") {
567
-			$champs = substr($champs, 1, -1);
568
-		}
569
-		$champs = array($champs);
570
-		// supprimer l'info de longueur d'index mysql en fin de champ
571
-		$champs = preg_replace(",\(\d+\)$,", "", $champs);
572
-	}
573
-
574
-	$ifnotexists = "";
575
-	$version = spip_sqlite_fetch(spip_sqlite_query("select sqlite_version() AS sqlite_version", $serveur), '', $serveur);
576
-	if (!function_exists('spip_version_compare')) {
577
-		include_spip('plugins/installer');
578
-	}
579
-
580
-	if ($version and spip_version_compare($version['sqlite_version'], '3.3.0', '>=')) {
581
-		$ifnotexists = ' IF NOT EXISTS';
582
-	} else {
583
-		/* simuler le IF EXISTS - version 2 et sqlite < 3.3a */
584
-		$a = spip_sqlite_showtable($table, $serveur);
585
-		if (isset($a['key']['KEY ' . $nom])) {
586
-			return true;
587
-		}
588
-	}
589
-
590
-	$query = "CREATE " . ($unique ? "UNIQUE " : "") . "INDEX$ifnotexists $nom ON $table (" . join(',', $champs) . ")";
591
-	$res = spip_sqlite_query($query, $serveur, $requeter);
592
-	if (!$requeter) {
593
-		return $res;
594
-	}
595
-	if ($res) {
596
-		return true;
597
-	} else {
598
-		return false;
599
-	}
554
+    if (!($nom or $table or $champs)) {
555
+        spip_log("Champ manquant pour creer un index sqlite ($nom, $table, (" . join(',', $champs) . "))",
556
+            'sqlite.' . _LOG_ERREUR);
557
+
558
+        return false;
559
+    }
560
+
561
+    // SQLite ne differentie pas noms des index en fonction des tables
562
+    // il faut donc creer des noms uniques d'index pour une base sqlite
563
+    $nom = $table . '_' . $nom;
564
+    // enlever d'eventuelles parentheses deja presentes sur champs
565
+    if (!is_array($champs)) {
566
+        if ($champs[0] == "(") {
567
+            $champs = substr($champs, 1, -1);
568
+        }
569
+        $champs = array($champs);
570
+        // supprimer l'info de longueur d'index mysql en fin de champ
571
+        $champs = preg_replace(",\(\d+\)$,", "", $champs);
572
+    }
573
+
574
+    $ifnotexists = "";
575
+    $version = spip_sqlite_fetch(spip_sqlite_query("select sqlite_version() AS sqlite_version", $serveur), '', $serveur);
576
+    if (!function_exists('spip_version_compare')) {
577
+        include_spip('plugins/installer');
578
+    }
579
+
580
+    if ($version and spip_version_compare($version['sqlite_version'], '3.3.0', '>=')) {
581
+        $ifnotexists = ' IF NOT EXISTS';
582
+    } else {
583
+        /* simuler le IF EXISTS - version 2 et sqlite < 3.3a */
584
+        $a = spip_sqlite_showtable($table, $serveur);
585
+        if (isset($a['key']['KEY ' . $nom])) {
586
+            return true;
587
+        }
588
+    }
589
+
590
+    $query = "CREATE " . ($unique ? "UNIQUE " : "") . "INDEX$ifnotexists $nom ON $table (" . join(',', $champs) . ")";
591
+    $res = spip_sqlite_query($query, $serveur, $requeter);
592
+    if (!$requeter) {
593
+        return $res;
594
+    }
595
+    if ($res) {
596
+        return true;
597
+    } else {
598
+        return false;
599
+    }
600 600
 }
601 601
 
602 602
 /**
@@ -613,31 +613,31 @@  discard block
 block discarded – undo
613 613
  * @return int                 Nombre de lignes
614 614
  */
615 615
 function spip_sqlite_count($r, $serveur = '', $requeter = true) {
616
-	if (!$r) {
617
-		return 0;
618
-	}
619
-
620
-	// select ou autre (insert, update,...) ?
621
-	// (link,requete) a compter
622
-	if (is_array($r->spipSqliteRowCount)) {
623
-		list($link, $query) = $r->spipSqliteRowCount;
624
-		// amelioration possible a tester intensivement : pas de order by pour compter !
625
-		// $query = preg_replace(",ORDER BY .+(LIMIT\s|HAVING\s|GROUP BY\s|$),Uims","\\1",$query);
626
-		$query = "SELECT count(*) as zzzzsqlitecount FROM ($query)";
627
-		$l = $link->query($query);
628
-		$i = 0;
629
-		if ($l and $z = $l->fetch()) {
630
-			$i = $z['zzzzsqlitecount'];
631
-		}
632
-		$r->spipSqliteRowCount = $i;
633
-	}
634
-	if (isset($r->spipSqliteRowCount)) {
635
-		// Ce compte est faux s'il y a des limit dans la requete :(
636
-		// il retourne le nombre d'enregistrements sans le limit
637
-		return $r->spipSqliteRowCount;
638
-	} else {
639
-		return $r->rowCount();
640
-	}
616
+    if (!$r) {
617
+        return 0;
618
+    }
619
+
620
+    // select ou autre (insert, update,...) ?
621
+    // (link,requete) a compter
622
+    if (is_array($r->spipSqliteRowCount)) {
623
+        list($link, $query) = $r->spipSqliteRowCount;
624
+        // amelioration possible a tester intensivement : pas de order by pour compter !
625
+        // $query = preg_replace(",ORDER BY .+(LIMIT\s|HAVING\s|GROUP BY\s|$),Uims","\\1",$query);
626
+        $query = "SELECT count(*) as zzzzsqlitecount FROM ($query)";
627
+        $l = $link->query($query);
628
+        $i = 0;
629
+        if ($l and $z = $l->fetch()) {
630
+            $i = $z['zzzzsqlitecount'];
631
+        }
632
+        $r->spipSqliteRowCount = $i;
633
+    }
634
+    if (isset($r->spipSqliteRowCount)) {
635
+        // Ce compte est faux s'il y a des limit dans la requete :(
636
+        // il retourne le nombre d'enregistrements sans le limit
637
+        return $r->spipSqliteRowCount;
638
+    } else {
639
+        return $r->rowCount();
640
+    }
641 641
 }
642 642
 
643 643
 
@@ -656,21 +656,21 @@  discard block
 block discarded – undo
656 656
  *     - false si la requête a échouée
657 657
  **/
658 658
 function spip_sqlite_countsel(
659
-	$from = array(),
660
-	$where = array(),
661
-	$groupby = '',
662
-	$having = array(),
663
-	$serveur = '',
664
-	$requeter = true
659
+    $from = array(),
660
+    $where = array(),
661
+    $groupby = '',
662
+    $having = array(),
663
+    $serveur = '',
664
+    $requeter = true
665 665
 ) {
666
-	$c = !$groupby ? '*' : ('DISTINCT ' . (is_string($groupby) ? $groupby : join(',', $groupby)));
667
-	$r = spip_sqlite_select("COUNT($c)", $from, $where, '', '', '',
668
-		$having, $serveur, $requeter);
669
-	if ((is_resource($r) or is_object($r)) && $requeter) { // ressource : sqlite2, object : sqlite3
670
-		list($r) = spip_sqlite_fetch($r, SPIP_SQLITE3_NUM, $serveur);
671
-	}
666
+    $c = !$groupby ? '*' : ('DISTINCT ' . (is_string($groupby) ? $groupby : join(',', $groupby)));
667
+    $r = spip_sqlite_select("COUNT($c)", $from, $where, '', '', '',
668
+        $having, $serveur, $requeter);
669
+    if ((is_resource($r) or is_object($r)) && $requeter) { // ressource : sqlite2, object : sqlite3
670
+        list($r) = spip_sqlite_fetch($r, SPIP_SQLITE3_NUM, $serveur);
671
+    }
672 672
 
673
-	return $r;
673
+    return $r;
674 674
 }
675 675
 
676 676
 
@@ -687,22 +687,22 @@  discard block
 block discarded – undo
687 687
  *     - False en cas d'erreur.
688 688
  **/
689 689
 function spip_sqlite_delete($table, $where = '', $serveur = '', $requeter = true) {
690
-	$res = spip_sqlite_query(
691
-		_sqlite_calculer_expression('DELETE FROM', $table, ',')
692
-		. _sqlite_calculer_expression('WHERE', $where),
693
-		$serveur, $requeter);
690
+    $res = spip_sqlite_query(
691
+        _sqlite_calculer_expression('DELETE FROM', $table, ',')
692
+        . _sqlite_calculer_expression('WHERE', $where),
693
+        $serveur, $requeter);
694 694
 
695
-	// renvoyer la requete inerte si demandee
696
-	if (!$requeter) {
697
-		return $res;
698
-	}
695
+    // renvoyer la requete inerte si demandee
696
+    if (!$requeter) {
697
+        return $res;
698
+    }
699 699
 
700
-	if ($res) {
701
-		$link = _sqlite_link($serveur);
702
-		return $res->rowCount();
703
-	} else {
704
-		return false;
705
-	}
700
+    if ($res) {
701
+        $link = _sqlite_link($serveur);
702
+        return $res->rowCount();
703
+    } else {
704
+        return false;
705
+    }
706 706
 }
707 707
 
708 708
 
@@ -718,15 +718,15 @@  discard block
 block discarded – undo
718 718
  *     - true si la requête a réussie, false sinon
719 719
  */
720 720
 function spip_sqlite_drop_table($table, $exist = '', $serveur = '', $requeter = true) {
721
-	if ($exist) {
722
-		$exist = " IF EXISTS";
723
-	}
721
+    if ($exist) {
722
+        $exist = " IF EXISTS";
723
+    }
724 724
 
725
-	if (spip_sqlite_query("DROP TABLE$exist $table", $serveur, $requeter)) {
726
-		return true;
727
-	} else {
728
-		return false;
729
-	}
725
+    if (spip_sqlite_query("DROP TABLE$exist $table", $serveur, $requeter)) {
726
+        return true;
727
+    } else {
728
+        return false;
729
+    }
730 730
 }
731 731
 
732 732
 
@@ -742,11 +742,11 @@  discard block
 block discarded – undo
742 742
  *     - true si la requête a réussie, false sinon
743 743
  */
744 744
 function spip_sqlite_drop_view($view, $exist = '', $serveur = '', $requeter = true) {
745
-	if ($exist) {
746
-		$exist = " IF EXISTS";
747
-	}
745
+    if ($exist) {
746
+        $exist = " IF EXISTS";
747
+    }
748 748
 
749
-	return spip_sqlite_query("DROP VIEW$exist $view", $serveur, $requeter);
749
+    return spip_sqlite_query("DROP VIEW$exist $view", $serveur, $requeter);
750 750
 }
751 751
 
752 752
 /**
@@ -760,20 +760,20 @@  discard block
 block discarded – undo
760 760
  * @return bool ou requete
761 761
  */
762 762
 function spip_sqlite_drop_index($nom, $table, $serveur = '', $requeter = true) {
763
-	if (!($nom or $table)) {
764
-		spip_log("Champ manquant pour supprimer un index sqlite ($nom, $table)", 'sqlite.' . _LOG_ERREUR);
763
+    if (!($nom or $table)) {
764
+        spip_log("Champ manquant pour supprimer un index sqlite ($nom, $table)", 'sqlite.' . _LOG_ERREUR);
765 765
 
766
-		return false;
767
-	}
766
+        return false;
767
+    }
768 768
 
769
-	// SQLite ne differentie pas noms des index en fonction des tables
770
-	// il faut donc creer des noms uniques d'index pour une base sqlite
771
-	$index = $table . '_' . $nom;
772
-	$exist = " IF EXISTS";
769
+    // SQLite ne differentie pas noms des index en fonction des tables
770
+    // il faut donc creer des noms uniques d'index pour une base sqlite
771
+    $index = $table . '_' . $nom;
772
+    $exist = " IF EXISTS";
773 773
 
774
-	$query = "DROP INDEX$exist $index";
774
+    $query = "DROP INDEX$exist $index";
775 775
 
776
-	return spip_sqlite_query($query, $serveur, $requeter);
776
+    return spip_sqlite_query($query, $serveur, $requeter);
777 777
 }
778 778
 
779 779
 /**
@@ -789,28 +789,28 @@  discard block
 block discarded – undo
789 789
  *     Erreur eventuelle
790 790
  **/
791 791
 function spip_sqlite_error($query = '', $serveur = '') {
792
-	$link = _sqlite_link($serveur);
792
+    $link = _sqlite_link($serveur);
793 793
 
794
-	if ($link) {
795
-		$errs = $link->errorInfo();
796
-		$s = _sqlite_last_error_from_link($link);
797
-	} else {
798
-		$s = ": aucune ressource sqlite (link)";
799
-	}
800
-	if ($s) {
801
-		$trace = debug_backtrace();
802
-		if ($trace[0]['function'] != "spip_sqlite_error") {
803
-			spip_log("$s - $query - " . sql_error_backtrace(), 'sqlite.' . _LOG_ERREUR);
804
-		}
805
-	}
794
+    if ($link) {
795
+        $errs = $link->errorInfo();
796
+        $s = _sqlite_last_error_from_link($link);
797
+    } else {
798
+        $s = ": aucune ressource sqlite (link)";
799
+    }
800
+    if ($s) {
801
+        $trace = debug_backtrace();
802
+        if ($trace[0]['function'] != "spip_sqlite_error") {
803
+            spip_log("$s - $query - " . sql_error_backtrace(), 'sqlite.' . _LOG_ERREUR);
804
+        }
805
+    }
806 806
 
807
-	return $s;
807
+    return $s;
808 808
 }
809 809
 
810 810
 function _sqlite_last_error_from_link($link) {
811
-	if ($link) {
812
-		$errs = $link->errorInfo();
813
-		/*
811
+    if ($link) {
812
+        $errs = $link->errorInfo();
813
+        /*
814 814
 			$errs[0]
815 815
 				numero SQLState ('HY000' souvent lors d'une erreur)
816 816
 				http://www.easysoft.com/developer/interfaces/odbc/sqlstate_status_return_codes.html
@@ -820,11 +820,11 @@  discard block
 block discarded – undo
820 820
 			$errs[2]
821 821
 				Le texte du message d'erreur
822 822
 		*/
823
-		if (ltrim($errs[0], '0')) { // 00000 si pas d'erreur
824
-			return "$errs[2]";
825
-		}
826
-	}
827
-	return "";
823
+        if (ltrim($errs[0], '0')) { // 00000 si pas d'erreur
824
+            return "$errs[2]";
825
+        }
826
+    }
827
+    return "";
828 828
 }
829 829
 
830 830
 /**
@@ -841,23 +841,23 @@  discard block
 block discarded – undo
841 841
  *    'HY000/1' : numéro de l'erreur SQLState / numéro d'erreur interne SQLite (en sqlite 3)
842 842
  **/
843 843
 function spip_sqlite_errno($serveur = '') {
844
-	$link = _sqlite_link($serveur);
844
+    $link = _sqlite_link($serveur);
845 845
 
846
-	if ($link) {
847
-		$t = $link->errorInfo();
848
-		$s = ltrim($t[0], '0'); // 00000 si pas d'erreur
849
-		if ($s) {
850
-			$s .= ' / ' . $t[1];
851
-		} // ajoute l'erreur du moteur SQLite
852
-	} else {
853
-		$s = ": aucune ressource sqlite (link)";
854
-	}
846
+    if ($link) {
847
+        $t = $link->errorInfo();
848
+        $s = ltrim($t[0], '0'); // 00000 si pas d'erreur
849
+        if ($s) {
850
+            $s .= ' / ' . $t[1];
851
+        } // ajoute l'erreur du moteur SQLite
852
+    } else {
853
+        $s = ": aucune ressource sqlite (link)";
854
+    }
855 855
 
856
-	if ($s) {
857
-		spip_log("Erreur sqlite $s", 'sqlite.' . _LOG_ERREUR);
858
-	}
856
+    if ($s) {
857
+        spip_log("Erreur sqlite $s", 'sqlite.' . _LOG_ERREUR);
858
+    }
859 859
 
860
-	return $s ? $s : 0;
860
+    return $s ? $s : 0;
861 861
 }
862 862
 
863 863
 
@@ -873,19 +873,19 @@  discard block
 block discarded – undo
873 873
  *     - false si on a pas pu avoir d'explication
874 874
  */
875 875
 function spip_sqlite_explain($query, $serveur = '', $requeter = true) {
876
-	if (strpos(ltrim($query), 'SELECT') !== 0) {
877
-		return array();
878
-	}
876
+    if (strpos(ltrim($query), 'SELECT') !== 0) {
877
+        return array();
878
+    }
879 879
 
880
-	$query = spip_sqlite::traduire_requete($query, $serveur);
881
-	$query = 'EXPLAIN ' . $query;
882
-	if (!$requeter) {
883
-		return $query;
884
-	}
885
-	// on ne trace pas ces requetes, sinon on obtient un tracage sans fin...
886
-	$r = spip_sqlite::executer_requete($query, $serveur, false);
880
+    $query = spip_sqlite::traduire_requete($query, $serveur);
881
+    $query = 'EXPLAIN ' . $query;
882
+    if (!$requeter) {
883
+        return $query;
884
+    }
885
+    // on ne trace pas ces requetes, sinon on obtient un tracage sans fin...
886
+    $r = spip_sqlite::executer_requete($query, $serveur, false);
887 887
 
888
-	return $r ? spip_sqlite_fetch($r, null, $serveur) : false; // hum ? etrange ca... a verifier
888
+    return $r ? spip_sqlite_fetch($r, null, $serveur) : false; // hum ? etrange ca... a verifier
889 889
 }
890 890
 
891 891
 
@@ -902,29 +902,29 @@  discard block
 block discarded – undo
902 902
  */
903 903
 function spip_sqlite_fetch($r, $t = '', $serveur = '', $requeter = true) {
904 904
 
905
-	$link = _sqlite_link($serveur);
906
-	$t = $t ? $t : SPIP_SQLITE3_ASSOC;
905
+    $link = _sqlite_link($serveur);
906
+    $t = $t ? $t : SPIP_SQLITE3_ASSOC;
907 907
 
908
-	$retour = false;
909
-	if ($r) {
910
-		$retour = $r->fetch($t);
911
-	}
908
+    $retour = false;
909
+    if ($r) {
910
+        $retour = $r->fetch($t);
911
+    }
912 912
 
913
-	// Renvoie des 'table.titre' au lieu de 'titre' tout court ! pff !
914
-	// suppression de 'table.' pour toutes les cles (c'est un peu violent !)
915
-	// c'est couteux : on ne verifie que la premiere ligne pour voir si on le fait ou non
916
-	if ($retour
917
-		and strpos(implode('', array_keys($retour)), '.') !== false
918
-	) {
919
-		foreach ($retour as $cle => $val) {
920
-			if (($pos = strpos($cle, '.')) !== false) {
921
-				$retour[substr($cle, $pos + 1)] = &$retour[$cle];
922
-				unset($retour[$cle]);
923
-			}
924
-		}
925
-	}
913
+    // Renvoie des 'table.titre' au lieu de 'titre' tout court ! pff !
914
+    // suppression de 'table.' pour toutes les cles (c'est un peu violent !)
915
+    // c'est couteux : on ne verifie que la premiere ligne pour voir si on le fait ou non
916
+    if ($retour
917
+        and strpos(implode('', array_keys($retour)), '.') !== false
918
+    ) {
919
+        foreach ($retour as $cle => $val) {
920
+            if (($pos = strpos($cle, '.')) !== false) {
921
+                $retour[substr($cle, $pos + 1)] = &$retour[$cle];
922
+                unset($retour[$cle]);
923
+            }
924
+        }
925
+    }
926 926
 
927
-	return $retour;
927
+    return $retour;
928 928
 }
929 929
 
930 930
 /**
@@ -937,8 +937,8 @@  discard block
 block discarded – undo
937 937
  * @return bool True si déplacement réussi, false sinon.
938 938
  **/
939 939
 function spip_sqlite_seek($r, $row_number, $serveur = '', $requeter = true) {
940
-	// encore un truc de bien fichu : PDO ne PEUT PAS faire de seek ou de rewind...
941
-	return false;
940
+    // encore un truc de bien fichu : PDO ne PEUT PAS faire de seek ou de rewind...
941
+    return false;
942 942
 }
943 943
 
944 944
 
@@ -954,10 +954,10 @@  discard block
 block discarded – undo
954 954
  * @return bool                True si réussi
955 955
  */
956 956
 function spip_sqlite_free(&$r, $serveur = '', $requeter = true) {
957
-	unset($r);
957
+    unset($r);
958 958
 
959
-	return true;
960
-	//return sqlite_free_result($r);
959
+    return true;
960
+    //return sqlite_free_result($r);
961 961
 }
962 962
 
963 963
 
@@ -972,8 +972,8 @@  discard block
 block discarded – undo
972 972
  * @return void
973 973
  */
974 974
 function spip_sqlite_get_charset($charset = array(), $serveur = '', $requeter = true) {
975
-	//$c = !$charset ? '' : (" LIKE "._q($charset['charset']));
976
-	//return spip_sqlite_fetch(sqlite_query(_sqlite_link($serveur), "SHOW CHARACTER SET$c"), NULL, $serveur);
975
+    //$c = !$charset ? '' : (" LIKE "._q($charset['charset']));
976
+    //return spip_sqlite_fetch(sqlite_query(_sqlite_link($serveur), "SHOW CHARACTER SET$c"), NULL, $serveur);
977 977
 }
978 978
 
979 979
 
@@ -988,7 +988,7 @@  discard block
 block discarded – undo
988 988
  *     Valeur hexadécimale pour SQLite
989 989
  **/
990 990
 function spip_sqlite_hex($v) {
991
-	return hexdec($v);
991
+    return hexdec($v);
992 992
 }
993 993
 
994 994
 
@@ -1010,7 +1010,7 @@  discard block
 block discarded – undo
1010 1010
  *     Expression de requête SQL
1011 1011
  **/
1012 1012
 function spip_sqlite_in($val, $valeurs, $not = '', $serveur = '', $requeter = true) {
1013
-	return "($val $not IN ($valeurs))";
1013
+    return "($val $not IN ($valeurs))";
1014 1014
 }
1015 1015
 
1016 1016
 
@@ -1038,20 +1038,20 @@  discard block
 block discarded – undo
1038 1038
  **/
1039 1039
 function spip_sqlite_insert($table, $champs, $valeurs, $desc = array(), $serveur = '', $requeter = true) {
1040 1040
 
1041
-	$query = "INSERT INTO $table " . ($champs ? "$champs VALUES $valeurs" : "DEFAULT VALUES");
1042
-	if ($r = spip_sqlite_query($query, $serveur, $requeter)) {
1043
-		if (!$requeter) {
1044
-			return $r;
1045
-		}
1046
-		$nb = spip_sqlite::last_insert_id($serveur);
1047
-	} else {
1048
-		$nb = false;
1049
-	}
1041
+    $query = "INSERT INTO $table " . ($champs ? "$champs VALUES $valeurs" : "DEFAULT VALUES");
1042
+    if ($r = spip_sqlite_query($query, $serveur, $requeter)) {
1043
+        if (!$requeter) {
1044
+            return $r;
1045
+        }
1046
+        $nb = spip_sqlite::last_insert_id($serveur);
1047
+    } else {
1048
+        $nb = false;
1049
+    }
1050 1050
 
1051
-	$err = spip_sqlite_error($query, $serveur);
1051
+    $err = spip_sqlite_error($query, $serveur);
1052 1052
 
1053
-	// cas particulier : ne pas substituer la reponse spip_sqlite_query si on est en profilage
1054
-	return isset($_GET['var_profile']) ? $r : $nb;
1053
+    // cas particulier : ne pas substituer la reponse spip_sqlite_query si on est en profilage
1054
+    return isset($_GET['var_profile']) ? $r : $nb;
1055 1055
 
1056 1056
 }
1057 1057
 
@@ -1077,28 +1077,28 @@  discard block
 block discarded – undo
1077 1077
  *     - Tableau de description de la requête et du temps d'exécution, si var_profile activé
1078 1078
  **/
1079 1079
 function spip_sqlite_insertq($table, $couples = array(), $desc = array(), $serveur = '', $requeter = true) {
1080
-	if (!$desc) {
1081
-		$desc = description_table($table, $serveur);
1082
-	}
1083
-	if (!$desc) {
1084
-		die("$table insertion sans description");
1085
-	}
1086
-	$fields = isset($desc['field']) ? $desc['field'] : array();
1080
+    if (!$desc) {
1081
+        $desc = description_table($table, $serveur);
1082
+    }
1083
+    if (!$desc) {
1084
+        die("$table insertion sans description");
1085
+    }
1086
+    $fields = isset($desc['field']) ? $desc['field'] : array();
1087 1087
 
1088
-	foreach ($couples as $champ => $val) {
1089
-		$couples[$champ] = _sqlite_calculer_cite($val, $fields[$champ]);
1090
-	}
1088
+    foreach ($couples as $champ => $val) {
1089
+        $couples[$champ] = _sqlite_calculer_cite($val, $fields[$champ]);
1090
+    }
1091 1091
 
1092
-	// recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
1093
-	$couples = _sqlite_ajouter_champs_timestamp($table, $couples, $desc, $serveur);
1092
+    // recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
1093
+    $couples = _sqlite_ajouter_champs_timestamp($table, $couples, $desc, $serveur);
1094 1094
 
1095
-	$cles = $valeurs = "";
1096
-	if (count($couples)) {
1097
-		$cles = "(" . join(',', array_keys($couples)) . ")";
1098
-		$valeurs = "(" . join(',', $couples) . ")";
1099
-	}
1095
+    $cles = $valeurs = "";
1096
+    if (count($couples)) {
1097
+        $cles = "(" . join(',', array_keys($couples)) . ")";
1098
+        $valeurs = "(" . join(',', $couples) . ")";
1099
+    }
1100 1100
 
1101
-	return spip_sqlite_insert($table, $cles, $valeurs, $desc, $serveur, $requeter);
1101
+    return spip_sqlite_insert($table, $cles, $valeurs, $desc, $serveur, $requeter);
1102 1102
 }
1103 1103
 
1104 1104
 
@@ -1122,70 +1122,70 @@  discard block
 block discarded – undo
1122 1122
  *     - False en cas d'erreur.
1123 1123
  **/
1124 1124
 function spip_sqlite_insertq_multi($table, $tab_couples = array(), $desc = array(), $serveur = '', $requeter = true) {
1125
-	if (!$desc) {
1126
-		$desc = description_table($table, $serveur);
1127
-	}
1128
-	if (!$desc) {
1129
-		die("$table insertion sans description");
1130
-	}
1131
-	if (!isset($desc['field'])) {
1132
-		$desc['field'] = array();
1133
-	}
1134
-
1135
-	// recuperer les champs 'timestamp' pour mise a jour auto de ceux-ci
1136
-	$maj = _sqlite_ajouter_champs_timestamp($table, array(), $desc, $serveur);
1137
-
1138
-	// seul le nom de la table est a traduire ici :
1139
-	// le faire une seule fois au debut
1140
-	$query_start = "INSERT INTO $table ";
1141
-	$query_start = spip_sqlite::traduire_requete($query_start, $serveur);
1142
-
1143
-	// ouvrir une transaction
1144
-	if ($requeter) {
1145
-		spip_sqlite::demarrer_transaction($serveur);
1146
-	}
1147
-
1148
-	while ($couples = array_shift($tab_couples)) {
1149
-		foreach ($couples as $champ => $val) {
1150
-			$couples[$champ] = _sqlite_calculer_cite($val, $desc['field'][$champ]);
1151
-		}
1152
-
1153
-		// inserer les champs timestamp par defaut
1154
-		$couples = array_merge($maj, $couples);
1155
-
1156
-		$champs = $valeurs = "";
1157
-		if (count($couples)) {
1158
-			$champs = "(" . join(',', array_keys($couples)) . ")";
1159
-			$valeurs = "(" . join(',', $couples) . ")";
1160
-			$query = $query_start . "$champs VALUES $valeurs";
1161
-		} else {
1162
-			$query = $query_start . "DEFAULT VALUES";
1163
-		}
1164
-
1165
-		if ($requeter) {
1166
-			$retour = spip_sqlite::executer_requete($query, $serveur);
1167
-		}
1168
-
1169
-		// sur le dernier couple uniquement
1170
-		if (!count($tab_couples)) {
1171
-			$nb = 0;
1172
-			if ($requeter) {
1173
-				$nb = spip_sqlite::last_insert_id($serveur);
1174
-			} else {
1175
-				return $query;
1176
-			}
1177
-		}
1178
-
1179
-		$err = spip_sqlite_error($query, $serveur);
1180
-	}
1181
-
1182
-	if ($requeter) {
1183
-		spip_sqlite::finir_transaction($serveur);
1184
-	}
1185
-
1186
-	// renvoie le dernier id d'autoincrement ajoute
1187
-	// cas particulier : ne pas substituer la reponse spip_sqlite_query si on est en profilage
1188
-	return isset($_GET['var_profile']) ? $retour : $nb;
1125
+    if (!$desc) {
1126
+        $desc = description_table($table, $serveur);
1127
+    }
1128
+    if (!$desc) {
1129
+        die("$table insertion sans description");
1130
+    }
1131
+    if (!isset($desc['field'])) {
1132
+        $desc['field'] = array();
1133
+    }
1134
+
1135
+    // recuperer les champs 'timestamp' pour mise a jour auto de ceux-ci
1136
+    $maj = _sqlite_ajouter_champs_timestamp($table, array(), $desc, $serveur);
1137
+
1138
+    // seul le nom de la table est a traduire ici :
1139
+    // le faire une seule fois au debut
1140
+    $query_start = "INSERT INTO $table ";
1141
+    $query_start = spip_sqlite::traduire_requete($query_start, $serveur);
1142
+
1143
+    // ouvrir une transaction
1144
+    if ($requeter) {
1145
+        spip_sqlite::demarrer_transaction($serveur);
1146
+    }
1147
+
1148
+    while ($couples = array_shift($tab_couples)) {
1149
+        foreach ($couples as $champ => $val) {
1150
+            $couples[$champ] = _sqlite_calculer_cite($val, $desc['field'][$champ]);
1151
+        }
1152
+
1153
+        // inserer les champs timestamp par defaut
1154
+        $couples = array_merge($maj, $couples);
1155
+
1156
+        $champs = $valeurs = "";
1157
+        if (count($couples)) {
1158
+            $champs = "(" . join(',', array_keys($couples)) . ")";
1159
+            $valeurs = "(" . join(',', $couples) . ")";
1160
+            $query = $query_start . "$champs VALUES $valeurs";
1161
+        } else {
1162
+            $query = $query_start . "DEFAULT VALUES";
1163
+        }
1164
+
1165
+        if ($requeter) {
1166
+            $retour = spip_sqlite::executer_requete($query, $serveur);
1167
+        }
1168
+
1169
+        // sur le dernier couple uniquement
1170
+        if (!count($tab_couples)) {
1171
+            $nb = 0;
1172
+            if ($requeter) {
1173
+                $nb = spip_sqlite::last_insert_id($serveur);
1174
+            } else {
1175
+                return $query;
1176
+            }
1177
+        }
1178
+
1179
+        $err = spip_sqlite_error($query, $serveur);
1180
+    }
1181
+
1182
+    if ($requeter) {
1183
+        spip_sqlite::finir_transaction($serveur);
1184
+    }
1185
+
1186
+    // renvoie le dernier id d'autoincrement ajoute
1187
+    // cas particulier : ne pas substituer la reponse spip_sqlite_query si on est en profilage
1188
+    return isset($_GET['var_profile']) ? $retour : $nb;
1189 1189
 }
1190 1190
 
1191 1191
 
@@ -1200,7 +1200,7 @@  discard block
 block discarded – undo
1200 1200
  *     Toujours true.
1201 1201
  **/
1202 1202
 function spip_sqlite_preferer_transaction($serveur = '', $requeter = true) {
1203
-	return true;
1203
+    return true;
1204 1204
 }
1205 1205
 
1206 1206
 /**
@@ -1217,12 +1217,12 @@  discard block
 block discarded – undo
1217 1217
  *     string si texte de la requête demandé, true sinon
1218 1218
  **/
1219 1219
 function spip_sqlite_demarrer_transaction($serveur = '', $requeter = true) {
1220
-	if (!$requeter) {
1221
-		return "BEGIN TRANSACTION";
1222
-	}
1223
-	spip_sqlite::demarrer_transaction($serveur);
1220
+    if (!$requeter) {
1221
+        return "BEGIN TRANSACTION";
1222
+    }
1223
+    spip_sqlite::demarrer_transaction($serveur);
1224 1224
 
1225
-	return true;
1225
+    return true;
1226 1226
 }
1227 1227
 
1228 1228
 /**
@@ -1236,12 +1236,12 @@  discard block
 block discarded – undo
1236 1236
  *     string si texte de la requête demandé, true sinon
1237 1237
  **/
1238 1238
 function spip_sqlite_terminer_transaction($serveur = '', $requeter = true) {
1239
-	if (!$requeter) {
1240
-		return "COMMIT";
1241
-	}
1242
-	spip_sqlite::finir_transaction($serveur);
1239
+    if (!$requeter) {
1240
+        return "COMMIT";
1241
+    }
1242
+    spip_sqlite::finir_transaction($serveur);
1243 1243
 
1244
-	return true;
1244
+    return true;
1245 1245
 }
1246 1246
 
1247 1247
 
@@ -1256,27 +1256,27 @@  discard block
 block discarded – undo
1256 1256
  *     Liste des noms de bases
1257 1257
  **/
1258 1258
 function spip_sqlite_listdbs($serveur = '', $requeter = true) {
1259
-	_sqlite_init();
1259
+    _sqlite_init();
1260 1260
 
1261
-	if (!is_dir($d = substr(_DIR_DB, 0, -1))) {
1262
-		return array();
1263
-	}
1261
+    if (!is_dir($d = substr(_DIR_DB, 0, -1))) {
1262
+        return array();
1263
+    }
1264 1264
 
1265
-	include_spip('inc/flock');
1266
-	$bases = preg_files($d, $pattern = '(.*)\.sqlite$');
1267
-	$bds = array();
1265
+    include_spip('inc/flock');
1266
+    $bases = preg_files($d, $pattern = '(.*)\.sqlite$');
1267
+    $bds = array();
1268 1268
 
1269
-	foreach ($bases as $b) {
1270
-		// pas de bases commencant pas sqlite 
1271
-		// (on s'en sert pour l'installation pour simuler la presence d'un serveur)
1272
-		// les bases sont de la forme _sqliteX_tmp_spip_install.sqlite
1273
-		if (strpos($b, '_sqlite')) {
1274
-			continue;
1275
-		}
1276
-		$bds[] = preg_replace(";.*/$pattern;iS", '$1', $b);
1277
-	}
1269
+    foreach ($bases as $b) {
1270
+        // pas de bases commencant pas sqlite 
1271
+        // (on s'en sert pour l'installation pour simuler la presence d'un serveur)
1272
+        // les bases sont de la forme _sqliteX_tmp_spip_install.sqlite
1273
+        if (strpos($b, '_sqlite')) {
1274
+            continue;
1275
+        }
1276
+        $bds[] = preg_replace(";.*/$pattern;iS", '$1', $b);
1277
+    }
1278 1278
 
1279
-	return $bds;
1279
+    return $bds;
1280 1280
 }
1281 1281
 
1282 1282
 
@@ -1291,9 +1291,9 @@  discard block
 block discarded – undo
1291 1291
  * @return string       Texte de sélection pour la requête
1292 1292
  */
1293 1293
 function spip_sqlite_multi($objet, $lang) {
1294
-	$r = "EXTRAIRE_MULTI(" . $objet . ", '" . $lang . "') AS multi";
1294
+    $r = "EXTRAIRE_MULTI(" . $objet . ", '" . $lang . "') AS multi";
1295 1295
 
1296
-	return $r;
1296
+    return $r;
1297 1297
 }
1298 1298
 
1299 1299
 
@@ -1310,15 +1310,15 @@  discard block
 block discarded – undo
1310 1310
  * @return bool|string true / false / requete
1311 1311
  **/
1312 1312
 function spip_sqlite_optimize($table, $serveur = '', $requeter = true) {
1313
-	static $do = false;
1314
-	if ($requeter and $do) {
1315
-		return true;
1316
-	}
1317
-	if ($requeter) {
1318
-		$do = true;
1319
-	}
1313
+    static $do = false;
1314
+    if ($requeter and $do) {
1315
+        return true;
1316
+    }
1317
+    if ($requeter) {
1318
+        $do = true;
1319
+    }
1320 1320
 
1321
-	return spip_sqlite_query("VACUUM", $serveur, $requeter);
1321
+    return spip_sqlite_query("VACUUM", $serveur, $requeter);
1322 1322
 }
1323 1323
 
1324 1324
 
@@ -1335,15 +1335,15 @@  discard block
 block discarded – undo
1335 1335
  *    Donnée prête à être utilisée par le gestionnaire SQL
1336 1336
  */
1337 1337
 function spip_sqlite_quote($v, $type = '') {
1338
-	if (!is_array($v)) {
1339
-		return _sqlite_calculer_cite($v, $type);
1340
-	}
1341
-	// si c'est un tableau, le parcourir en propageant le type
1342
-	foreach ($v as $k => $r) {
1343
-		$v[$k] = spip_sqlite_quote($r, $type);
1344
-	}
1338
+    if (!is_array($v)) {
1339
+        return _sqlite_calculer_cite($v, $type);
1340
+    }
1341
+    // si c'est un tableau, le parcourir en propageant le type
1342
+    foreach ($v as $k => $r) {
1343
+        $v[$k] = spip_sqlite_quote($r, $type);
1344
+    }
1345 1345
 
1346
-	return join(",", $v);
1346
+    return join(",", $v);
1347 1347
 }
1348 1348
 
1349 1349
 
@@ -1360,9 +1360,9 @@  discard block
 block discarded – undo
1360 1360
  *     Expression SQL
1361 1361
  **/
1362 1362
 function spip_sqlite_date_proche($champ, $interval, $unite) {
1363
-	$op = (($interval <= 0) ? '>' : '<');
1363
+    $op = (($interval <= 0) ? '>' : '<');
1364 1364
 
1365
-	return "($champ $op datetime('" . date("Y-m-d H:i:s") . "', '$interval $unite'))";
1365
+    return "($champ $op datetime('" . date("Y-m-d H:i:s") . "', '$interval $unite'))";
1366 1366
 }
1367 1367
 
1368 1368
 
@@ -1380,44 +1380,44 @@  discard block
 block discarded – undo
1380 1380
  *     l'état de la table après la réparation
1381 1381
  */
1382 1382
 function spip_sqlite_repair($table, $serveur = '', $requeter = true) {
1383
-	if ($desc = spip_sqlite_showtable($table, $serveur)
1384
-		and isset($desc['field'])
1385
-		and is_array($desc['field'])
1386
-	) {
1387
-		foreach ($desc['field'] as $c => $d) {
1388
-			if (preg_match(",^(tinytext|mediumtext|text|longtext|varchar|char),i", $d)
1389
-				and stripos($d, "NOT NULL") !== false
1390
-				and stripos($d, "DEFAULT") === false
1391
-				/* pas touche aux cles primaires */
1392
-				and (!isset($desc['key']['PRIMARY KEY']) or $desc['key']['PRIMARY KEY'] !== $c)
1393
-			) {
1394
-				spip_sqlite_alter($q = "TABLE $table CHANGE $c $c $d DEFAULT ''", $serveur);
1395
-				spip_log("ALTER $q", "repair" . _LOG_INFO_IMPORTANTE);
1396
-			}
1397
-			if (preg_match(",^(INTEGER),i", $d)
1398
-				and stripos($d, "NOT NULL") !== false
1399
-				and stripos($d, "DEFAULT") === false
1400
-				/* pas touche aux cles primaires */
1401
-				and (!isset($desc['key']['PRIMARY KEY']) or $desc['key']['PRIMARY KEY'] !== $c)
1402
-			) {
1403
-				spip_sqlite_alter($q = "TABLE $table CHANGE $c $c $d DEFAULT '0'", $serveur);
1404
-				spip_log("ALTER $q", "repair" . _LOG_INFO_IMPORTANTE);
1405
-			}
1406
-			if (preg_match(",^(datetime),i", $d)
1407
-				and stripos($d, "NOT NULL") !== false
1408
-				and stripos($d, "DEFAULT") === false
1409
-				/* pas touche aux cles primaires */
1410
-				and (!isset($desc['key']['PRIMARY KEY']) or $desc['key']['PRIMARY KEY'] !== $c)
1411
-			) {
1412
-				spip_sqlite_alter($q = "TABLE $table CHANGE $c $c $d DEFAULT '0000-00-00 00:00:00'", $serveur);
1413
-				spip_log("ALTER $q", "repair" . _LOG_INFO_IMPORTANTE);
1414
-			}
1415
-		}
1416
-
1417
-		return array(" OK ");
1418
-	}
1419
-
1420
-	return array(" ERROR ");
1383
+    if ($desc = spip_sqlite_showtable($table, $serveur)
1384
+        and isset($desc['field'])
1385
+        and is_array($desc['field'])
1386
+    ) {
1387
+        foreach ($desc['field'] as $c => $d) {
1388
+            if (preg_match(",^(tinytext|mediumtext|text|longtext|varchar|char),i", $d)
1389
+                and stripos($d, "NOT NULL") !== false
1390
+                and stripos($d, "DEFAULT") === false
1391
+                /* pas touche aux cles primaires */
1392
+                and (!isset($desc['key']['PRIMARY KEY']) or $desc['key']['PRIMARY KEY'] !== $c)
1393
+            ) {
1394
+                spip_sqlite_alter($q = "TABLE $table CHANGE $c $c $d DEFAULT ''", $serveur);
1395
+                spip_log("ALTER $q", "repair" . _LOG_INFO_IMPORTANTE);
1396
+            }
1397
+            if (preg_match(",^(INTEGER),i", $d)
1398
+                and stripos($d, "NOT NULL") !== false
1399
+                and stripos($d, "DEFAULT") === false
1400
+                /* pas touche aux cles primaires */
1401
+                and (!isset($desc['key']['PRIMARY KEY']) or $desc['key']['PRIMARY KEY'] !== $c)
1402
+            ) {
1403
+                spip_sqlite_alter($q = "TABLE $table CHANGE $c $c $d DEFAULT '0'", $serveur);
1404
+                spip_log("ALTER $q", "repair" . _LOG_INFO_IMPORTANTE);
1405
+            }
1406
+            if (preg_match(",^(datetime),i", $d)
1407
+                and stripos($d, "NOT NULL") !== false
1408
+                and stripos($d, "DEFAULT") === false
1409
+                /* pas touche aux cles primaires */
1410
+                and (!isset($desc['key']['PRIMARY KEY']) or $desc['key']['PRIMARY KEY'] !== $c)
1411
+            ) {
1412
+                spip_sqlite_alter($q = "TABLE $table CHANGE $c $c $d DEFAULT '0000-00-00 00:00:00'", $serveur);
1413
+                spip_log("ALTER $q", "repair" . _LOG_INFO_IMPORTANTE);
1414
+            }
1415
+        }
1416
+
1417
+        return array(" OK ");
1418
+    }
1419
+
1420
+    return array(" ERROR ");
1421 1421
 }
1422 1422
 
1423 1423
 
@@ -1446,23 +1446,23 @@  discard block
 block discarded – undo
1446 1446
  *     - False en cas d'erreur.
1447 1447
  **/
1448 1448
 function spip_sqlite_replace($table, $couples, $desc = array(), $serveur = '', $requeter = true) {
1449
-	if (!$desc) {
1450
-		$desc = description_table($table, $serveur);
1451
-	}
1452
-	if (!$desc) {
1453
-		die("$table insertion sans description");
1454
-	}
1455
-	$fields = isset($desc['field']) ? $desc['field'] : array();
1449
+    if (!$desc) {
1450
+        $desc = description_table($table, $serveur);
1451
+    }
1452
+    if (!$desc) {
1453
+        die("$table insertion sans description");
1454
+    }
1455
+    $fields = isset($desc['field']) ? $desc['field'] : array();
1456 1456
 
1457
-	foreach ($couples as $champ => $val) {
1458
-		$couples[$champ] = _sqlite_calculer_cite($val, $fields[$champ]);
1459
-	}
1457
+    foreach ($couples as $champ => $val) {
1458
+        $couples[$champ] = _sqlite_calculer_cite($val, $fields[$champ]);
1459
+    }
1460 1460
 
1461
-	// recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
1462
-	$couples = _sqlite_ajouter_champs_timestamp($table, $couples, $desc, $serveur);
1461
+    // recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
1462
+    $couples = _sqlite_ajouter_champs_timestamp($table, $couples, $desc, $serveur);
1463 1463
 
1464
-	return spip_sqlite_query("REPLACE INTO $table (" . join(',', array_keys($couples)) . ') VALUES (' . join(',',
1465
-			$couples) . ')', $serveur);
1464
+    return spip_sqlite_query("REPLACE INTO $table (" . join(',', array_keys($couples)) . ') VALUES (' . join(',',
1465
+            $couples) . ')', $serveur);
1466 1466
 }
1467 1467
 
1468 1468
 
@@ -1492,13 +1492,13 @@  discard block
 block discarded – undo
1492 1492
  **/
1493 1493
 function spip_sqlite_replace_multi($table, $tab_couples, $desc = array(), $serveur = '', $requeter = true) {
1494 1494
 
1495
-	// boucler pour trainter chaque requete independemment
1496
-	foreach ($tab_couples as $couples) {
1497
-		$retour = spip_sqlite_replace($table, $couples, $desc, $serveur, $requeter);
1498
-	}
1495
+    // boucler pour trainter chaque requete independemment
1496
+    foreach ($tab_couples as $couples) {
1497
+        $retour = spip_sqlite_replace($table, $couples, $desc, $serveur, $requeter);
1498
+    }
1499 1499
 
1500
-	// renvoie le dernier id
1501
-	return $retour;
1500
+    // renvoie le dernier id
1501
+    return $retour;
1502 1502
 }
1503 1503
 
1504 1504
 
@@ -1525,44 +1525,44 @@  discard block
 block discarded – undo
1525 1525
  *     - array  : Tableau décrivant requête et temps d'exécution si var_profile actif pour tracer.
1526 1526
  */
1527 1527
 function spip_sqlite_select(
1528
-	$select,
1529
-	$from,
1530
-	$where = '',
1531
-	$groupby = '',
1532
-	$orderby = '',
1533
-	$limit = '',
1534
-	$having = '',
1535
-	$serveur = '',
1536
-	$requeter = true
1528
+    $select,
1529
+    $from,
1530
+    $where = '',
1531
+    $groupby = '',
1532
+    $orderby = '',
1533
+    $limit = '',
1534
+    $having = '',
1535
+    $serveur = '',
1536
+    $requeter = true
1537 1537
 ) {
1538 1538
 
1539
-	// version() n'est pas connu de sqlite
1540
-	$select = str_replace('version()', 'sqlite_version()', $select);
1539
+    // version() n'est pas connu de sqlite
1540
+    $select = str_replace('version()', 'sqlite_version()', $select);
1541 1541
 
1542
-	// recomposer from
1543
-	$from = (!is_array($from) ? $from : _sqlite_calculer_select_as($from));
1542
+    // recomposer from
1543
+    $from = (!is_array($from) ? $from : _sqlite_calculer_select_as($from));
1544 1544
 
1545
-	$query =
1546
-		_sqlite_calculer_expression('SELECT', $select, ', ')
1547
-		. _sqlite_calculer_expression('FROM', $from, ', ')
1548
-		. _sqlite_calculer_expression('WHERE', $where)
1549
-		. _sqlite_calculer_expression('GROUP BY', $groupby, ',')
1550
-		. _sqlite_calculer_expression('HAVING', $having)
1551
-		. ($orderby ? ("\nORDER BY " . _sqlite_calculer_order($orderby)) : '')
1552
-		. ($limit ? "\nLIMIT $limit" : '');
1545
+    $query =
1546
+        _sqlite_calculer_expression('SELECT', $select, ', ')
1547
+        . _sqlite_calculer_expression('FROM', $from, ', ')
1548
+        . _sqlite_calculer_expression('WHERE', $where)
1549
+        . _sqlite_calculer_expression('GROUP BY', $groupby, ',')
1550
+        . _sqlite_calculer_expression('HAVING', $having)
1551
+        . ($orderby ? ("\nORDER BY " . _sqlite_calculer_order($orderby)) : '')
1552
+        . ($limit ? "\nLIMIT $limit" : '');
1553 1553
 
1554
-	// dans un select, on doit renvoyer la requête en cas d'erreur
1555
-	$res = spip_sqlite_query($query, $serveur, $requeter);
1556
-	// texte de la requete demande ?
1557
-	if (!$requeter) {
1558
-		return $res;
1559
-	}
1560
-	// erreur survenue ?
1561
-	if ($res === false) {
1562
-		return spip_sqlite::traduire_requete($query, $serveur);
1563
-	}
1554
+    // dans un select, on doit renvoyer la requête en cas d'erreur
1555
+    $res = spip_sqlite_query($query, $serveur, $requeter);
1556
+    // texte de la requete demande ?
1557
+    if (!$requeter) {
1558
+        return $res;
1559
+    }
1560
+    // erreur survenue ?
1561
+    if ($res === false) {
1562
+        return spip_sqlite::traduire_requete($query, $serveur);
1563
+    }
1564 1564
 
1565
-	return $res;
1565
+    return $res;
1566 1566
 }
1567 1567
 
1568 1568
 
@@ -1581,31 +1581,31 @@  discard block
 block discarded – undo
1581 1581
  *     - False en cas d'erreur.
1582 1582
  **/
1583 1583
 function spip_sqlite_selectdb($db, $serveur = '', $requeter = true) {
1584
-	_sqlite_init();
1584
+    _sqlite_init();
1585 1585
 
1586
-	// interdire la creation d'une nouvelle base, 
1587
-	// sauf si on est dans l'installation
1588
-	if (!is_file($f = _DIR_DB . $db . '.sqlite')
1589
-		&& (!defined('_ECRIRE_INSTALL') || !_ECRIRE_INSTALL)
1590
-	) {
1591
-		spip_log("Il est interdit de creer la base $db", 'sqlite.' . _LOG_HS);
1586
+    // interdire la creation d'une nouvelle base, 
1587
+    // sauf si on est dans l'installation
1588
+    if (!is_file($f = _DIR_DB . $db . '.sqlite')
1589
+        && (!defined('_ECRIRE_INSTALL') || !_ECRIRE_INSTALL)
1590
+    ) {
1591
+        spip_log("Il est interdit de creer la base $db", 'sqlite.' . _LOG_HS);
1592 1592
 
1593
-		return false;
1594
-	}
1593
+        return false;
1594
+    }
1595 1595
 
1596
-	// se connecter a la base indiquee
1597
-	// avec les identifiants connus
1598
-	$index = $serveur ? $serveur : 0;
1596
+    // se connecter a la base indiquee
1597
+    // avec les identifiants connus
1598
+    $index = $serveur ? $serveur : 0;
1599 1599
 
1600
-	if ($link = spip_connect_db('', '', '', '', '@selectdb@' . $db, $serveur, '', '')) {
1601
-		if (($db == $link['db']) && $GLOBALS['connexions'][$index] = $link) {
1602
-			return $db;
1603
-		}
1604
-	} else {
1605
-		spip_log("Impossible de selectionner la base $db", 'sqlite.' . _LOG_HS);
1600
+    if ($link = spip_connect_db('', '', '', '', '@selectdb@' . $db, $serveur, '', '')) {
1601
+        if (($db == $link['db']) && $GLOBALS['connexions'][$index] = $link) {
1602
+            return $db;
1603
+        }
1604
+    } else {
1605
+        spip_log("Impossible de selectionner la base $db", 'sqlite.' . _LOG_HS);
1606 1606
 
1607
-		return false;
1608
-	}
1607
+        return false;
1608
+    }
1609 1609
 
1610 1610
 }
1611 1611
 
@@ -1621,8 +1621,8 @@  discard block
 block discarded – undo
1621 1621
  * @return void
1622 1622
  */
1623 1623
 function spip_sqlite_set_charset($charset, $serveur = '', $requeter = true) {
1624
-	# spip_log("Gestion charset sql a ecrire : "."SET NAMES "._q($charset), 'sqlite.'._LOG_ERREUR);
1625
-	# return spip_sqlite_query("SET NAMES ". spip_sqlite_quote($charset), $serveur); //<-- Passe pas !
1624
+    # spip_log("Gestion charset sql a ecrire : "."SET NAMES "._q($charset), 'sqlite.'._LOG_ERREUR);
1625
+    # return spip_sqlite_query("SET NAMES ". spip_sqlite_quote($charset), $serveur); //<-- Passe pas !
1626 1626
 }
1627 1627
 
1628 1628
 
@@ -1640,21 +1640,21 @@  discard block
 block discarded – undo
1640 1640
  *     Ressource à utiliser avec sql_fetch()
1641 1641
  **/
1642 1642
 function spip_sqlite_showbase($match, $serveur = '', $requeter = true) {
1643
-	// type est le type d'entrée : table / index / view
1644
-	// on ne retourne que les tables (?) et non les vues...
1645
-	# ESCAPE non supporte par les versions sqlite <3
1646
-	#	return spip_sqlite_query("SELECT name FROM sqlite_master WHERE type='table' AND tbl_name LIKE "._q($match)." ESCAPE '\'", $serveur, $requeter);
1647
-	$match = preg_quote($match);
1648
-	$match = str_replace("\\\_", "[[TIRETBAS]]", $match);
1649
-	$match = str_replace("\\\%", "[[POURCENT]]", $match);
1650
-	$match = str_replace("_", ".", $match);
1651
-	$match = str_replace("%", ".*", $match);
1652
-	$match = str_replace("[[TIRETBAS]]", "_", $match);
1653
-	$match = str_replace("[[POURCENT]]", "%", $match);
1654
-	$match = "^$match$";
1655
-
1656
-	return spip_sqlite_query("SELECT name FROM sqlite_master WHERE type='table' AND tbl_name REGEXP " . _q($match),
1657
-		$serveur, $requeter);
1643
+    // type est le type d'entrée : table / index / view
1644
+    // on ne retourne que les tables (?) et non les vues...
1645
+    # ESCAPE non supporte par les versions sqlite <3
1646
+    #	return spip_sqlite_query("SELECT name FROM sqlite_master WHERE type='table' AND tbl_name LIKE "._q($match)." ESCAPE '\'", $serveur, $requeter);
1647
+    $match = preg_quote($match);
1648
+    $match = str_replace("\\\_", "[[TIRETBAS]]", $match);
1649
+    $match = str_replace("\\\%", "[[POURCENT]]", $match);
1650
+    $match = str_replace("_", ".", $match);
1651
+    $match = str_replace("%", ".*", $match);
1652
+    $match = str_replace("[[TIRETBAS]]", "_", $match);
1653
+    $match = str_replace("[[POURCENT]]", "%", $match);
1654
+    $match = "^$match$";
1655
+
1656
+    return spip_sqlite_query("SELECT name FROM sqlite_master WHERE type='table' AND tbl_name REGEXP " . _q($match),
1657
+        $serveur, $requeter);
1658 1658
 }
1659 1659
 
1660 1660
 define('_SQLITE_RE_SHOW_TABLE', '/^[^(),]*\(((?:[^()]*\((?:[^()]*\([^()]*\))?[^()]*\)[^()]*)*[^()]*)\)[^()]*$/');
@@ -1677,131 +1677,131 @@  discard block
 block discarded – undo
1677 1677
  *     - array description de la table sinon
1678 1678
  */
1679 1679
 function spip_sqlite_showtable($nom_table, $serveur = '', $requeter = true) {
1680
-	$query =
1681
-		'SELECT sql, type FROM'
1682
-		. ' (SELECT * FROM sqlite_master UNION ALL'
1683
-		. ' SELECT * FROM sqlite_temp_master)'
1684
-		. " WHERE tbl_name LIKE '$nom_table'"
1685
-		. " AND type!='meta' AND sql NOT NULL AND name NOT LIKE 'sqlite_%'"
1686
-		. ' ORDER BY substr(type,2,1), name';
1687
-
1688
-	$a = spip_sqlite_query($query, $serveur, $requeter);
1689
-	if (!$a) {
1690
-		return "";
1691
-	}
1692
-	if (!$requeter) {
1693
-		return $a;
1694
-	}
1695
-	if (!($a = spip_sqlite_fetch($a, null, $serveur))) {
1696
-		return "";
1697
-	}
1698
-	$vue = ($a['type'] == 'view'); // table | vue
1699
-
1700
-	// c'est une table
1701
-	// il faut parser le create
1702
-	if (!$vue) {
1703
-		if (!preg_match(_SQLITE_RE_SHOW_TABLE, array_shift($a), $r)) {
1704
-			return "";
1705
-		} else {
1706
-			$desc = $r[1];
1707
-			// extraction d'une KEY éventuelle en prenant garde de ne pas
1708
-			// relever un champ dont le nom contient KEY (ex. ID_WHISKEY)
1709
-			if (preg_match("/^(.*?),([^,]*\sKEY[ (].*)$/s", $desc, $r)) {
1710
-				$namedkeys = $r[2];
1711
-				$desc = $r[1];
1712
-			} else {
1713
-				$namedkeys = "";
1714
-			}
1715
-
1716
-			$fields = array();
1717
-			$keys = array();
1718
-
1719
-			// enlever les contenus des valeurs DEFAULT 'xxx' qui pourraient perturber
1720
-			// par exemple s'il contiennent une virgule.
1721
-			// /!\ cela peut aussi echapper le nom des champs si la table a eu des operations avec SQLite Manager !
1722
-			list($desc, $echaps) = query_echappe_textes($desc);
1723
-
1724
-			// separer toutes les descriptions de champs, separes par des virgules
1725
-			# /!\ explode peut exploser aussi DECIMAL(10,2) !
1726
-			$k_precedent = null;
1727
-			foreach (explode(",", $desc) as $v) {
1728
-
1729
-				preg_match("/^\s*([^\s]+)\s+(.*)/", $v, $r);
1730
-				// Les cles de champs peuvent etre entourees
1731
-				// de guillements doubles " , simples ', graves ` ou de crochets [ ],  ou rien.
1732
-				// http://www.sqlite.org/lang_keywords.html
1733
-				$k = strtolower(query_reinjecte_textes($r[1], $echaps)); // champ, "champ", [champ]...
1734
-				if ($char = strpbrk($k[0], '\'"[`')) {
1735
-					$k = trim($k, $char);
1736
-					if ($char == '[') {
1737
-						$k = rtrim($k, ']');
1738
-					}
1739
-				}
1740
-				$def = query_reinjecte_textes($r[2], $echaps); // valeur du champ
1741
-
1742
-				// rustine pour DECIMAL(10,2)
1743
-				// s'il y a une parenthèse fermante dans la clé
1744
-				// ou dans la définition sans qu'il n'y ait une ouverture avant
1745
-				if (false !== strpos($k, ')') or preg_match('/^[^\(]*\)/', $def)) {
1746
-					$fields[$k_precedent] .= ',' . $k . ' ' . $def;
1747
-					continue;
1748
-				}
1749
-
1750
-				// la primary key peut etre dans une des descriptions de champs
1751
-				// et non en fin de table, cas encore decouvert avec Sqlite Manager
1752
-				if (stripos($r[2], 'PRIMARY KEY') !== false) {
1753
-					$keys['PRIMARY KEY'] = $k;
1754
-				}
1755
-
1756
-				$fields[$k] = $def;
1757
-				$k_precedent = $k;
1758
-			}
1759
-			// key inclues dans la requete
1760
-			foreach (preg_split('/\)\s*(,|$)/', $namedkeys) as $v) {
1761
-				if (preg_match("/^\s*([^(]*)\(([^(]*(\(\d+\))?)$/", $v, $r)) {
1762
-					$k = str_replace("`", '', trim($r[1]));
1763
-					$t = trim(strtolower(str_replace("`", '', $r[2])), '"');
1764
-					if ($k && !isset($keys[$k])) {
1765
-						$keys[$k] = $t;
1766
-					} else {
1767
-						$keys[] = $t;
1768
-					}
1769
-				}
1770
-			}
1771
-			// sinon ajouter les key index
1772
-			$query =
1773
-				'SELECT name,sql FROM'
1774
-				. ' (SELECT * FROM sqlite_master UNION ALL'
1775
-				. ' SELECT * FROM sqlite_temp_master)'
1776
-				. " WHERE tbl_name LIKE '$nom_table'"
1777
-				. " AND type='index' AND name NOT LIKE 'sqlite_%'"
1778
-				. 'ORDER BY substr(type,2,1), name';
1779
-			$a = spip_sqlite_query($query, $serveur, $requeter);
1780
-			while ($r = spip_sqlite_fetch($a, null, $serveur)) {
1781
-				$key = str_replace($nom_table . '_', '', $r['name']); // enlever le nom de la table ajoute a l'index
1782
-				$keytype = "KEY";
1783
-				if (strpos($r['sql'], "UNIQUE INDEX") !== false) {
1784
-					$keytype = "UNIQUE KEY";
1785
-				}
1786
-				$colonnes = preg_replace(',.*\((.*)\).*,', '$1', $r['sql']);
1787
-				$keys[$keytype . ' ' . $key] = $colonnes;
1788
-			}
1789
-		}
1790
-
1791
-	} // c'est une vue, on liste les champs disponibles simplement
1792
-	else {
1793
-		if ($res = sql_fetsel('*', $nom_table, '', '', '', '1', '', $serveur)) { // limit 1
1794
-			$fields = array();
1795
-			foreach ($res as $c => $v) {
1796
-				$fields[$c] = '';
1797
-			}
1798
-			$keys = array();
1799
-		} else {
1800
-			return "";
1801
-		}
1802
-	}
1803
-
1804
-	return array('field' => $fields, 'key' => $keys);
1680
+    $query =
1681
+        'SELECT sql, type FROM'
1682
+        . ' (SELECT * FROM sqlite_master UNION ALL'
1683
+        . ' SELECT * FROM sqlite_temp_master)'
1684
+        . " WHERE tbl_name LIKE '$nom_table'"
1685
+        . " AND type!='meta' AND sql NOT NULL AND name NOT LIKE 'sqlite_%'"
1686
+        . ' ORDER BY substr(type,2,1), name';
1687
+
1688
+    $a = spip_sqlite_query($query, $serveur, $requeter);
1689
+    if (!$a) {
1690
+        return "";
1691
+    }
1692
+    if (!$requeter) {
1693
+        return $a;
1694
+    }
1695
+    if (!($a = spip_sqlite_fetch($a, null, $serveur))) {
1696
+        return "";
1697
+    }
1698
+    $vue = ($a['type'] == 'view'); // table | vue
1699
+
1700
+    // c'est une table
1701
+    // il faut parser le create
1702
+    if (!$vue) {
1703
+        if (!preg_match(_SQLITE_RE_SHOW_TABLE, array_shift($a), $r)) {
1704
+            return "";
1705
+        } else {
1706
+            $desc = $r[1];
1707
+            // extraction d'une KEY éventuelle en prenant garde de ne pas
1708
+            // relever un champ dont le nom contient KEY (ex. ID_WHISKEY)
1709
+            if (preg_match("/^(.*?),([^,]*\sKEY[ (].*)$/s", $desc, $r)) {
1710
+                $namedkeys = $r[2];
1711
+                $desc = $r[1];
1712
+            } else {
1713
+                $namedkeys = "";
1714
+            }
1715
+
1716
+            $fields = array();
1717
+            $keys = array();
1718
+
1719
+            // enlever les contenus des valeurs DEFAULT 'xxx' qui pourraient perturber
1720
+            // par exemple s'il contiennent une virgule.
1721
+            // /!\ cela peut aussi echapper le nom des champs si la table a eu des operations avec SQLite Manager !
1722
+            list($desc, $echaps) = query_echappe_textes($desc);
1723
+
1724
+            // separer toutes les descriptions de champs, separes par des virgules
1725
+            # /!\ explode peut exploser aussi DECIMAL(10,2) !
1726
+            $k_precedent = null;
1727
+            foreach (explode(",", $desc) as $v) {
1728
+
1729
+                preg_match("/^\s*([^\s]+)\s+(.*)/", $v, $r);
1730
+                // Les cles de champs peuvent etre entourees
1731
+                // de guillements doubles " , simples ', graves ` ou de crochets [ ],  ou rien.
1732
+                // http://www.sqlite.org/lang_keywords.html
1733
+                $k = strtolower(query_reinjecte_textes($r[1], $echaps)); // champ, "champ", [champ]...
1734
+                if ($char = strpbrk($k[0], '\'"[`')) {
1735
+                    $k = trim($k, $char);
1736
+                    if ($char == '[') {
1737
+                        $k = rtrim($k, ']');
1738
+                    }
1739
+                }
1740
+                $def = query_reinjecte_textes($r[2], $echaps); // valeur du champ
1741
+
1742
+                // rustine pour DECIMAL(10,2)
1743
+                // s'il y a une parenthèse fermante dans la clé
1744
+                // ou dans la définition sans qu'il n'y ait une ouverture avant
1745
+                if (false !== strpos($k, ')') or preg_match('/^[^\(]*\)/', $def)) {
1746
+                    $fields[$k_precedent] .= ',' . $k . ' ' . $def;
1747
+                    continue;
1748
+                }
1749
+
1750
+                // la primary key peut etre dans une des descriptions de champs
1751
+                // et non en fin de table, cas encore decouvert avec Sqlite Manager
1752
+                if (stripos($r[2], 'PRIMARY KEY') !== false) {
1753
+                    $keys['PRIMARY KEY'] = $k;
1754
+                }
1755
+
1756
+                $fields[$k] = $def;
1757
+                $k_precedent = $k;
1758
+            }
1759
+            // key inclues dans la requete
1760
+            foreach (preg_split('/\)\s*(,|$)/', $namedkeys) as $v) {
1761
+                if (preg_match("/^\s*([^(]*)\(([^(]*(\(\d+\))?)$/", $v, $r)) {
1762
+                    $k = str_replace("`", '', trim($r[1]));
1763
+                    $t = trim(strtolower(str_replace("`", '', $r[2])), '"');
1764
+                    if ($k && !isset($keys[$k])) {
1765
+                        $keys[$k] = $t;
1766
+                    } else {
1767
+                        $keys[] = $t;
1768
+                    }
1769
+                }
1770
+            }
1771
+            // sinon ajouter les key index
1772
+            $query =
1773
+                'SELECT name,sql FROM'
1774
+                . ' (SELECT * FROM sqlite_master UNION ALL'
1775
+                . ' SELECT * FROM sqlite_temp_master)'
1776
+                . " WHERE tbl_name LIKE '$nom_table'"
1777
+                . " AND type='index' AND name NOT LIKE 'sqlite_%'"
1778
+                . 'ORDER BY substr(type,2,1), name';
1779
+            $a = spip_sqlite_query($query, $serveur, $requeter);
1780
+            while ($r = spip_sqlite_fetch($a, null, $serveur)) {
1781
+                $key = str_replace($nom_table . '_', '', $r['name']); // enlever le nom de la table ajoute a l'index
1782
+                $keytype = "KEY";
1783
+                if (strpos($r['sql'], "UNIQUE INDEX") !== false) {
1784
+                    $keytype = "UNIQUE KEY";
1785
+                }
1786
+                $colonnes = preg_replace(',.*\((.*)\).*,', '$1', $r['sql']);
1787
+                $keys[$keytype . ' ' . $key] = $colonnes;
1788
+            }
1789
+        }
1790
+
1791
+    } // c'est une vue, on liste les champs disponibles simplement
1792
+    else {
1793
+        if ($res = sql_fetsel('*', $nom_table, '', '', '', '1', '', $serveur)) { // limit 1
1794
+            $fields = array();
1795
+            foreach ($res as $c => $v) {
1796
+                $fields[$c] = '';
1797
+            }
1798
+            $keys = array();
1799
+        } else {
1800
+            return "";
1801
+        }
1802
+    }
1803
+
1804
+    return array('field' => $fields, 'key' => $keys);
1805 1805
 
1806 1806
 }
1807 1807
 
@@ -1828,20 +1828,20 @@  discard block
 block discarded – undo
1828 1828
  *     - array Tableau décrivant la requête et son temps d'exécution si var_profile est actif
1829 1829
  */
1830 1830
 function spip_sqlite_update($table, $champs, $where = '', $desc = '', $serveur = '', $requeter = true) {
1831
-	// recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
1832
-	$champs = _sqlite_ajouter_champs_timestamp($table, $champs, $desc, $serveur);
1831
+    // recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
1832
+    $champs = _sqlite_ajouter_champs_timestamp($table, $champs, $desc, $serveur);
1833 1833
 
1834
-	$set = array();
1835
-	foreach ($champs as $champ => $val) {
1836
-		$set[] = $champ . "=$val";
1837
-	}
1838
-	if (!empty($set)) {
1839
-		return spip_sqlite_query(
1840
-			_sqlite_calculer_expression('UPDATE', $table, ',')
1841
-			. _sqlite_calculer_expression('SET', $set, ',')
1842
-			. _sqlite_calculer_expression('WHERE', $where),
1843
-			$serveur, $requeter);
1844
-	}
1834
+    $set = array();
1835
+    foreach ($champs as $champ => $val) {
1836
+        $set[] = $champ . "=$val";
1837
+    }
1838
+    if (!empty($set)) {
1839
+        return spip_sqlite_query(
1840
+            _sqlite_calculer_expression('UPDATE', $table, ',')
1841
+            . _sqlite_calculer_expression('SET', $set, ',')
1842
+            . _sqlite_calculer_expression('WHERE', $where),
1843
+            $serveur, $requeter);
1844
+    }
1845 1845
 }
1846 1846
 
1847 1847
 
@@ -1871,36 +1871,36 @@  discard block
 block discarded – undo
1871 1871
  */
1872 1872
 function spip_sqlite_updateq($table, $champs, $where = '', $desc = array(), $serveur = '', $requeter = true) {
1873 1873
 
1874
-	if (!$champs) {
1875
-		return;
1876
-	}
1877
-	if (!$desc) {
1878
-		$desc = description_table($table, $serveur);
1879
-	}
1880
-	if (!$desc) {
1881
-		die("$table insertion sans description");
1882
-	}
1883
-	$fields = $desc['field'];
1884
-
1885
-	$set = array();
1886
-	foreach ($champs as $champ => $val) {
1887
-		$set[$champ] = $champ . '=' . _sqlite_calculer_cite($val, isset($fields[$champ]) ? $fields[$champ] : '');
1888
-	}
1889
-
1890
-	// recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
1891
-	// attention ils sont deja quotes
1892
-	$maj = _sqlite_ajouter_champs_timestamp($table, [], $desc, $serveur);
1893
-	foreach ($maj as $champ => $val) {
1894
-		if (!isset($set[$champ])) {
1895
-			$set[$champ] = $champ . '=' . $val;
1896
-		}
1897
-	}
1898
-
1899
-	return spip_sqlite_query(
1900
-		_sqlite_calculer_expression('UPDATE', $table, ',')
1901
-		. _sqlite_calculer_expression('SET', $set, ',')
1902
-		. _sqlite_calculer_expression('WHERE', $where),
1903
-		$serveur, $requeter);
1874
+    if (!$champs) {
1875
+        return;
1876
+    }
1877
+    if (!$desc) {
1878
+        $desc = description_table($table, $serveur);
1879
+    }
1880
+    if (!$desc) {
1881
+        die("$table insertion sans description");
1882
+    }
1883
+    $fields = $desc['field'];
1884
+
1885
+    $set = array();
1886
+    foreach ($champs as $champ => $val) {
1887
+        $set[$champ] = $champ . '=' . _sqlite_calculer_cite($val, isset($fields[$champ]) ? $fields[$champ] : '');
1888
+    }
1889
+
1890
+    // recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
1891
+    // attention ils sont deja quotes
1892
+    $maj = _sqlite_ajouter_champs_timestamp($table, [], $desc, $serveur);
1893
+    foreach ($maj as $champ => $val) {
1894
+        if (!isset($set[$champ])) {
1895
+            $set[$champ] = $champ . '=' . $val;
1896
+        }
1897
+    }
1898
+
1899
+    return spip_sqlite_query(
1900
+        _sqlite_calculer_expression('UPDATE', $table, ',')
1901
+        . _sqlite_calculer_expression('SET', $set, ',')
1902
+        . _sqlite_calculer_expression('WHERE', $where),
1903
+        $serveur, $requeter);
1904 1904
 }
1905 1905
 
1906 1906
 
@@ -1918,17 +1918,17 @@  discard block
 block discarded – undo
1918 1918
  * @return void
1919 1919
  */
1920 1920
 function _sqlite_init() {
1921
-	if (!defined('_DIR_DB')) {
1922
-		define('_DIR_DB', _DIR_ETC . 'bases/');
1923
-	}
1924
-	if (!defined('_SQLITE_CHMOD')) {
1925
-		define('_SQLITE_CHMOD', _SPIP_CHMOD);
1926
-	}
1921
+    if (!defined('_DIR_DB')) {
1922
+        define('_DIR_DB', _DIR_ETC . 'bases/');
1923
+    }
1924
+    if (!defined('_SQLITE_CHMOD')) {
1925
+        define('_SQLITE_CHMOD', _SPIP_CHMOD);
1926
+    }
1927 1927
 
1928
-	if (!is_dir($d = _DIR_DB)) {
1929
-		include_spip('inc/flock');
1930
-		sous_repertoire($d);
1931
-	}
1928
+    if (!is_dir($d = _DIR_DB)) {
1929
+        include_spip('inc/flock');
1930
+        sous_repertoire($d);
1931
+    }
1932 1932
 }
1933 1933
 
1934 1934
 
@@ -1942,20 +1942,20 @@  discard block
 block discarded – undo
1942 1942
  * @return bool|int
1943 1943
  */
1944 1944
 function _sqlite_is_version($version = '', $link = '', $serveur = '', $requeter = true) {
1945
-	if ($link === '') {
1946
-		$link = _sqlite_link($serveur);
1947
-	}
1948
-	if (!$link) {
1949
-		return false;
1950
-	}
1945
+    if ($link === '') {
1946
+        $link = _sqlite_link($serveur);
1947
+    }
1948
+    if (!$link) {
1949
+        return false;
1950
+    }
1951 1951
 
1952
-	$v = 3;
1952
+    $v = 3;
1953 1953
 
1954
-	if (!$version) {
1955
-		return $v;
1956
-	}
1954
+    if (!$version) {
1955
+        return $v;
1956
+    }
1957 1957
 
1958
-	return ($version == $v);
1958
+    return ($version == $v);
1959 1959
 }
1960 1960
 
1961 1961
 
@@ -1966,9 +1966,9 @@  discard block
 block discarded – undo
1966 1966
  * @return Object Information de connexion pour SQLite
1967 1967
  */
1968 1968
 function _sqlite_link($serveur = '') {
1969
-	$link = &$GLOBALS['connexions'][$serveur ? $serveur : 0]['link'];
1969
+    $link = &$GLOBALS['connexions'][$serveur ? $serveur : 0]['link'];
1970 1970
 
1971
-	return $link;
1971
+    return $link;
1972 1972
 }
1973 1973
 
1974 1974
 
@@ -1983,51 +1983,51 @@  discard block
 block discarded – undo
1983 1983
  * @return string|number     Texte ou nombre échappé
1984 1984
  */
1985 1985
 function _sqlite_calculer_cite($v, $type) {
1986
-	if ($type) {
1987
-		if (is_null($v)
1988
-			and stripos($type, "NOT NULL") === false
1989
-		) {
1990
-			return 'NULL';
1991
-		} // null php se traduit en NULL SQL
1992
-
1993
-		if (sql_test_date($type) and preg_match('/^\w+\(/', $v)) {
1994
-			return $v;
1995
-		}
1996
-		if (sql_test_int($type)) {
1997
-			if (is_numeric($v)) {
1998
-				return $v;
1999
-			} elseif (ctype_xdigit(substr($v, 2)) and strncmp($v, '0x', 2) == 0) {
2000
-				return hexdec(substr($v, 2));
2001
-			} else {
2002
-				return intval($v);
2003
-			}
2004
-		}
2005
-	} else {
2006
-		// si on ne connait pas le type on le deduit de $v autant que possible
2007
-		if (is_bool($v)) {
2008
-			return strval(intval($v));
2009
-		}
2010
-		elseif (is_numeric($v)) {
2011
-			return strval($v);
2012
-		}
2013
-	}
2014
-
2015
-	// trouver un link sqlite pour faire l'echappement
2016
-	foreach ($GLOBALS['connexions'] as $s) {
2017
-		if (
2018
-			$l = $s['link']
2019
-			and is_object($l)
2020
-			and $l instanceof \PDO
2021
-			and $l->getAttribute(\PDO::ATTR_DRIVER_NAME) === 'sqlite'
2022
-		) {
2023
-			return $l->quote($v);
2024
-		}
2025
-	}
2026
-
2027
-	// echapper les ' en ''
2028
-	spip_log("Pas de methode ->quote pour echapper", "sqlite." . _LOG_INFO_IMPORTANTE);
2029
-
2030
-	return ("'" . str_replace("'", "''", $v) . "'");
1986
+    if ($type) {
1987
+        if (is_null($v)
1988
+            and stripos($type, "NOT NULL") === false
1989
+        ) {
1990
+            return 'NULL';
1991
+        } // null php se traduit en NULL SQL
1992
+
1993
+        if (sql_test_date($type) and preg_match('/^\w+\(/', $v)) {
1994
+            return $v;
1995
+        }
1996
+        if (sql_test_int($type)) {
1997
+            if (is_numeric($v)) {
1998
+                return $v;
1999
+            } elseif (ctype_xdigit(substr($v, 2)) and strncmp($v, '0x', 2) == 0) {
2000
+                return hexdec(substr($v, 2));
2001
+            } else {
2002
+                return intval($v);
2003
+            }
2004
+        }
2005
+    } else {
2006
+        // si on ne connait pas le type on le deduit de $v autant que possible
2007
+        if (is_bool($v)) {
2008
+            return strval(intval($v));
2009
+        }
2010
+        elseif (is_numeric($v)) {
2011
+            return strval($v);
2012
+        }
2013
+    }
2014
+
2015
+    // trouver un link sqlite pour faire l'echappement
2016
+    foreach ($GLOBALS['connexions'] as $s) {
2017
+        if (
2018
+            $l = $s['link']
2019
+            and is_object($l)
2020
+            and $l instanceof \PDO
2021
+            and $l->getAttribute(\PDO::ATTR_DRIVER_NAME) === 'sqlite'
2022
+        ) {
2023
+            return $l->quote($v);
2024
+        }
2025
+    }
2026
+
2027
+    // echapper les ' en ''
2028
+    spip_log("Pas de methode ->quote pour echapper", "sqlite." . _LOG_INFO_IMPORTANTE);
2029
+
2030
+    return ("'" . str_replace("'", "''", $v) . "'");
2031 2031
 }
2032 2032
 
2033 2033
 
@@ -2043,21 +2043,21 @@  discard block
 block discarded – undo
2043 2043
  * @return string            Texte de l'expression, une partie donc, du texte la requête.
2044 2044
  */
2045 2045
 function _sqlite_calculer_expression($expression, $v, $join = 'AND') {
2046
-	if (empty($v)) {
2047
-		return '';
2048
-	}
2046
+    if (empty($v)) {
2047
+        return '';
2048
+    }
2049 2049
 
2050
-	$exp = "\n$expression ";
2050
+    $exp = "\n$expression ";
2051 2051
 
2052
-	if (!is_array($v)) {
2053
-		return $exp . $v;
2054
-	} else {
2055
-		if (strtoupper($join) === 'AND') {
2056
-			return $exp . join("\n\t$join ", array_map('_sqlite_calculer_where', $v));
2057
-		} else {
2058
-			return $exp . join($join, $v);
2059
-		}
2060
-	}
2052
+    if (!is_array($v)) {
2053
+        return $exp . $v;
2054
+    } else {
2055
+        if (strtoupper($join) === 'AND') {
2056
+            return $exp . join("\n\t$join ", array_map('_sqlite_calculer_where', $v));
2057
+        } else {
2058
+            return $exp . join($join, $v);
2059
+        }
2060
+    }
2061 2061
 }
2062 2062
 
2063 2063
 
@@ -2073,7 +2073,7 @@  discard block
 block discarded – undo
2073 2073
  * @return string Texte du orderby préparé
2074 2074
  */
2075 2075
 function _sqlite_calculer_order($orderby) {
2076
-	return (is_array($orderby)) ? join(", ", $orderby) : $orderby;
2076
+    return (is_array($orderby)) ? join(", ", $orderby) : $orderby;
2077 2077
 }
2078 2078
 
2079 2079
 
@@ -2084,26 +2084,26 @@  discard block
 block discarded – undo
2084 2084
  * @return string Sélection de colonnes pour une clause SELECT
2085 2085
  */
2086 2086
 function _sqlite_calculer_select_as($args) {
2087
-	$res = '';
2088
-	foreach ($args as $k => $v) {
2089
-		if (substr($k, -1) == '@') {
2090
-			// c'est une jointure qui se refere au from precedent
2091
-			// pas de virgule
2092
-			$res .= '  ' . $v;
2093
-		} else {
2094
-			if (!is_numeric($k)) {
2095
-				$p = strpos($v, " ");
2096
-				if ($p) {
2097
-					$v = substr($v, 0, $p) . " AS '$k'" . substr($v, $p);
2098
-				} else {
2099
-					$v .= " AS '$k'";
2100
-				}
2101
-			}
2102
-			$res .= ', ' . $v;
2103
-		}
2104
-	}
2105
-
2106
-	return substr($res, 2);
2087
+    $res = '';
2088
+    foreach ($args as $k => $v) {
2089
+        if (substr($k, -1) == '@') {
2090
+            // c'est une jointure qui se refere au from precedent
2091
+            // pas de virgule
2092
+            $res .= '  ' . $v;
2093
+        } else {
2094
+            if (!is_numeric($k)) {
2095
+                $p = strpos($v, " ");
2096
+                if ($p) {
2097
+                    $v = substr($v, 0, $p) . " AS '$k'" . substr($v, $p);
2098
+                } else {
2099
+                    $v .= " AS '$k'";
2100
+                }
2101
+            }
2102
+            $res .= ', ' . $v;
2103
+        }
2104
+    }
2105
+
2106
+    return substr($res, 2);
2107 2107
 }
2108 2108
 
2109 2109
 
@@ -2126,26 +2126,26 @@  discard block
 block discarded – undo
2126 2126
  *     Contrainte pour clause WHERE
2127 2127
  */
2128 2128
 function _sqlite_calculer_where($v) {
2129
-	if (!is_array($v)) {
2130
-		return $v;
2131
-	}
2132
-
2133
-	$op = array_shift($v);
2134
-	if (!($n = count($v))) {
2135
-		return $op;
2136
-	} else {
2137
-		$arg = _sqlite_calculer_where(array_shift($v));
2138
-		if ($n == 1) {
2139
-			return "$op($arg)";
2140
-		} else {
2141
-			$arg2 = _sqlite_calculer_where(array_shift($v));
2142
-			if ($n == 2) {
2143
-				return "($arg $op $arg2)";
2144
-			} else {
2145
-				return "($arg $op ($arg2) : $v[0])";
2146
-			}
2147
-		}
2148
-	}
2129
+    if (!is_array($v)) {
2130
+        return $v;
2131
+    }
2132
+
2133
+    $op = array_shift($v);
2134
+    if (!($n = count($v))) {
2135
+        return $op;
2136
+    } else {
2137
+        $arg = _sqlite_calculer_where(array_shift($v));
2138
+        if ($n == 1) {
2139
+            return "$op($arg)";
2140
+        } else {
2141
+            $arg2 = _sqlite_calculer_where(array_shift($v));
2142
+            if ($n == 2) {
2143
+                return "($arg $op $arg2)";
2144
+            } else {
2145
+                return "($arg $op ($arg2) : $v[0])";
2146
+            }
2147
+        }
2148
+    }
2149 2149
 }
2150 2150
 
2151 2151
 
@@ -2160,19 +2160,19 @@  discard block
 block discarded – undo
2160 2160
  * @return array|bool
2161 2161
  */
2162 2162
 function _sqlite_charger_version($version = '') {
2163
-	$versions = array();
2163
+    $versions = array();
2164 2164
 
2165
-	// version 3
2166
-	if (!$version || $version == 3) {
2167
-		if (extension_loaded('pdo') && extension_loaded('pdo_sqlite')) {
2168
-			$versions[] = 3;
2169
-		}
2170
-	}
2171
-	if ($version) {
2172
-		return in_array($version, $versions);
2173
-	}
2165
+    // version 3
2166
+    if (!$version || $version == 3) {
2167
+        if (extension_loaded('pdo') && extension_loaded('pdo_sqlite')) {
2168
+            $versions[] = 3;
2169
+        }
2170
+    }
2171
+    if ($version) {
2172
+        return in_array($version, $versions);
2173
+    }
2174 2174
 
2175
-	return $versions;
2175
+    return $versions;
2176 2176
 }
2177 2177
 
2178 2178
 
@@ -2210,146 +2210,146 @@  discard block
 block discarded – undo
2210 2210
  */
2211 2211
 function _sqlite_modifier_table($table, $colonne, $opt = array(), $serveur = '') {
2212 2212
 
2213
-	if (is_array($table)) {
2214
-		$table_destination = reset($table);
2215
-		$table_origine = key($table);
2216
-	} else {
2217
-		$table_origine = $table_destination = $table;
2218
-	}
2219
-	// ne prend actuellement qu'un changement
2220
-	// mais pourra etre adapte pour changer plus qu'une colonne a la fois
2221
-	if (is_array($colonne)) {
2222
-		$colonne_destination = reset($colonne);
2223
-		$colonne_origine = key($colonne);
2224
-	} else {
2225
-		$colonne_origine = $colonne_destination = $colonne;
2226
-	}
2227
-	if (!isset($opt['field'])) {
2228
-		$opt['field'] = array();
2229
-	}
2230
-	if (!isset($opt['key'])) {
2231
-		$opt['key'] = array();
2232
-	}
2233
-
2234
-	// si les noms de tables sont differents, pas besoin de table temporaire
2235
-	// on prendra directement le nom de la future table
2236
-	$meme_table = ($table_origine == $table_destination);
2237
-
2238
-	$def_origine = sql_showtable($table_origine, false, $serveur);
2239
-	if (!$def_origine or !isset($def_origine['field'])) {
2240
-		spip_log("Alter table impossible sur $table_origine : table non trouvee", 'sqlite' . _LOG_ERREUR);
2241
-
2242
-		return false;
2243
-	}
2244
-
2245
-
2246
-	$table_tmp = $table_origine . '_tmp';
2247
-
2248
-	// 1) creer une table temporaire avec les modifications	
2249
-	// - DROP : suppression de la colonne
2250
-	// - CHANGE : modification de la colonne
2251
-	// (foreach pour conserver l'ordre des champs)
2252
-
2253
-	// field 
2254
-	$fields = array();
2255
-	// pour le INSERT INTO plus loin
2256
-	// stocker la correspondance nouvelles->anciennes colonnes
2257
-	$fields_correspondances = array();
2258
-	foreach ($def_origine['field'] as $c => $d) {
2259
-
2260
-		if ($colonne_origine && ($c == $colonne_origine)) {
2261
-			// si pas DROP
2262
-			if ($colonne_destination) {
2263
-				$fields[$colonne_destination] = $opt['field'][$colonne_destination];
2264
-				$fields_correspondances[$colonne_destination] = $c;
2265
-			}
2266
-		} else {
2267
-			$fields[$c] = $d;
2268
-			$fields_correspondances[$c] = $c;
2269
-		}
2270
-	}
2271
-	// cas de ADD sqlite2 (ajout du champ en fin de table):
2272
-	if (!$colonne_origine && $colonne_destination) {
2273
-		$fields[$colonne_destination] = $opt['field'][$colonne_destination];
2274
-	}
2275
-
2276
-	// key...
2277
-	$keys = array();
2278
-	foreach ($def_origine['key'] as $c => $d) {
2279
-		$c = str_replace($colonne_origine, $colonne_destination, $c);
2280
-		$d = str_replace($colonne_origine, $colonne_destination, $d);
2281
-		// seulement si on ne supprime pas la colonne !
2282
-		if ($d) {
2283
-			$keys[$c] = $d;
2284
-		}
2285
-	}
2286
-
2287
-	// autres keys, on merge
2288
-	$keys = array_merge($keys, $opt['key']);
2289
-	$queries = array();
2290
-
2291
-	// copier dans destination (si differente de origine), sinon tmp
2292
-	$table_copie = ($meme_table) ? $table_tmp : $table_destination;
2293
-	$autoinc = (isset($keys['PRIMARY KEY'])
2294
-		and $keys['PRIMARY KEY']
2295
-		and stripos($keys['PRIMARY KEY'], ',') === false
2296
-		and stripos($fields[$keys['PRIMARY KEY']], 'default') === false);
2297
-
2298
-	if ($q = _sqlite_requete_create(
2299
-		$table_copie,
2300
-		$fields,
2301
-		$keys,
2302
-		$autoinc,
2303
-		$temporary = false,
2304
-		$ifnotexists = true,
2305
-		$serveur)
2306
-	) {
2307
-		$queries[] = $q;
2308
-	}
2309
-
2310
-
2311
-	// 2) y copier les champs qui vont bien
2312
-	$champs_dest = join(', ', array_keys($fields_correspondances));
2313
-	$champs_ori = join(', ', $fields_correspondances);
2314
-	$queries[] = "INSERT INTO $table_copie ($champs_dest) SELECT $champs_ori FROM $table_origine";
2315
-
2316
-	// 3) supprimer la table d'origine
2317
-	$queries[] = "DROP TABLE $table_origine";
2318
-
2319
-	// 4) renommer la table temporaire 
2320
-	// avec le nom de la table destination
2321
-	// si necessaire
2322
-	if ($meme_table) {
2323
-		$queries[] = "ALTER TABLE $table_copie RENAME TO $table_destination";
2324
-	}
2325
-
2326
-	// 5) remettre les index !
2327
-	foreach ($keys as $k => $v) {
2328
-		if ($k == 'PRIMARY KEY') {
2329
-		} else {
2330
-			// enlever KEY
2331
-			$k = substr($k, 4);
2332
-			$queries[] = "CREATE INDEX $table_destination" . "_$k ON $table_destination ($v)";
2333
-		}
2334
-	}
2335
-
2336
-
2337
-	if (count($queries)) {
2338
-		spip_sqlite::demarrer_transaction($serveur);
2339
-		// il faut les faire une par une car $query = join('; ', $queries).";"; ne fonctionne pas
2340
-		foreach ($queries as $q) {
2341
-			if (!spip_sqlite::executer_requete($q, $serveur)) {
2342
-				spip_log("SQLite : ALTER TABLE table :"
2343
-					. " Erreur a l'execution de la requete : $q", 'sqlite.' . _LOG_ERREUR);
2344
-				spip_sqlite::annuler_transaction($serveur);
2345
-
2346
-				return false;
2347
-			}
2348
-		}
2349
-		spip_sqlite::finir_transaction($serveur);
2350
-	}
2351
-
2352
-	return true;
2213
+    if (is_array($table)) {
2214
+        $table_destination = reset($table);
2215
+        $table_origine = key($table);
2216
+    } else {
2217
+        $table_origine = $table_destination = $table;
2218
+    }
2219
+    // ne prend actuellement qu'un changement
2220
+    // mais pourra etre adapte pour changer plus qu'une colonne a la fois
2221
+    if (is_array($colonne)) {
2222
+        $colonne_destination = reset($colonne);
2223
+        $colonne_origine = key($colonne);
2224
+    } else {
2225
+        $colonne_origine = $colonne_destination = $colonne;
2226
+    }
2227
+    if (!isset($opt['field'])) {
2228
+        $opt['field'] = array();
2229
+    }
2230
+    if (!isset($opt['key'])) {
2231
+        $opt['key'] = array();
2232
+    }
2233
+
2234
+    // si les noms de tables sont differents, pas besoin de table temporaire
2235
+    // on prendra directement le nom de la future table
2236
+    $meme_table = ($table_origine == $table_destination);
2237
+
2238
+    $def_origine = sql_showtable($table_origine, false, $serveur);
2239
+    if (!$def_origine or !isset($def_origine['field'])) {
2240
+        spip_log("Alter table impossible sur $table_origine : table non trouvee", 'sqlite' . _LOG_ERREUR);
2241
+
2242
+        return false;
2243
+    }
2244
+
2245
+
2246
+    $table_tmp = $table_origine . '_tmp';
2247
+
2248
+    // 1) creer une table temporaire avec les modifications	
2249
+    // - DROP : suppression de la colonne
2250
+    // - CHANGE : modification de la colonne
2251
+    // (foreach pour conserver l'ordre des champs)
2252
+
2253
+    // field 
2254
+    $fields = array();
2255
+    // pour le INSERT INTO plus loin
2256
+    // stocker la correspondance nouvelles->anciennes colonnes
2257
+    $fields_correspondances = array();
2258
+    foreach ($def_origine['field'] as $c => $d) {
2259
+
2260
+        if ($colonne_origine && ($c == $colonne_origine)) {
2261
+            // si pas DROP
2262
+            if ($colonne_destination) {
2263
+                $fields[$colonne_destination] = $opt['field'][$colonne_destination];
2264
+                $fields_correspondances[$colonne_destination] = $c;
2265
+            }
2266
+        } else {
2267
+            $fields[$c] = $d;
2268
+            $fields_correspondances[$c] = $c;
2269
+        }
2270
+    }
2271
+    // cas de ADD sqlite2 (ajout du champ en fin de table):
2272
+    if (!$colonne_origine && $colonne_destination) {
2273
+        $fields[$colonne_destination] = $opt['field'][$colonne_destination];
2274
+    }
2275
+
2276
+    // key...
2277
+    $keys = array();
2278
+    foreach ($def_origine['key'] as $c => $d) {
2279
+        $c = str_replace($colonne_origine, $colonne_destination, $c);
2280
+        $d = str_replace($colonne_origine, $colonne_destination, $d);
2281
+        // seulement si on ne supprime pas la colonne !
2282
+        if ($d) {
2283
+            $keys[$c] = $d;
2284
+        }
2285
+    }
2286
+
2287
+    // autres keys, on merge
2288
+    $keys = array_merge($keys, $opt['key']);
2289
+    $queries = array();
2290
+
2291
+    // copier dans destination (si differente de origine), sinon tmp
2292
+    $table_copie = ($meme_table) ? $table_tmp : $table_destination;
2293
+    $autoinc = (isset($keys['PRIMARY KEY'])
2294
+        and $keys['PRIMARY KEY']
2295
+        and stripos($keys['PRIMARY KEY'], ',') === false
2296
+        and stripos($fields[$keys['PRIMARY KEY']], 'default') === false);
2297
+
2298
+    if ($q = _sqlite_requete_create(
2299
+        $table_copie,
2300
+        $fields,
2301
+        $keys,
2302
+        $autoinc,
2303
+        $temporary = false,
2304
+        $ifnotexists = true,
2305
+        $serveur)
2306
+    ) {
2307
+        $queries[] = $q;
2308
+    }
2309
+
2310
+
2311
+    // 2) y copier les champs qui vont bien
2312
+    $champs_dest = join(', ', array_keys($fields_correspondances));
2313
+    $champs_ori = join(', ', $fields_correspondances);
2314
+    $queries[] = "INSERT INTO $table_copie ($champs_dest) SELECT $champs_ori FROM $table_origine";
2315
+
2316
+    // 3) supprimer la table d'origine
2317
+    $queries[] = "DROP TABLE $table_origine";
2318
+
2319
+    // 4) renommer la table temporaire 
2320
+    // avec le nom de la table destination
2321
+    // si necessaire
2322
+    if ($meme_table) {
2323
+        $queries[] = "ALTER TABLE $table_copie RENAME TO $table_destination";
2324
+    }
2325
+
2326
+    // 5) remettre les index !
2327
+    foreach ($keys as $k => $v) {
2328
+        if ($k == 'PRIMARY KEY') {
2329
+        } else {
2330
+            // enlever KEY
2331
+            $k = substr($k, 4);
2332
+            $queries[] = "CREATE INDEX $table_destination" . "_$k ON $table_destination ($v)";
2333
+        }
2334
+    }
2335
+
2336
+
2337
+    if (count($queries)) {
2338
+        spip_sqlite::demarrer_transaction($serveur);
2339
+        // il faut les faire une par une car $query = join('; ', $queries).";"; ne fonctionne pas
2340
+        foreach ($queries as $q) {
2341
+            if (!spip_sqlite::executer_requete($q, $serveur)) {
2342
+                spip_log("SQLite : ALTER TABLE table :"
2343
+                    . " Erreur a l'execution de la requete : $q", 'sqlite.' . _LOG_ERREUR);
2344
+                spip_sqlite::annuler_transaction($serveur);
2345
+
2346
+                return false;
2347
+            }
2348
+        }
2349
+        spip_sqlite::finir_transaction($serveur);
2350
+    }
2351
+
2352
+    return true;
2353 2353
 }
2354 2354
 
2355 2355
 
@@ -2359,60 +2359,60 @@  discard block
 block discarded – undo
2359 2359
  * @return array
2360 2360
  */
2361 2361
 function _sqlite_ref_fonctions() {
2362
-	$fonctions = array(
2363
-		'alter' => 'spip_sqlite_alter',
2364
-		'count' => 'spip_sqlite_count',
2365
-		'countsel' => 'spip_sqlite_countsel',
2366
-		'create' => 'spip_sqlite_create',
2367
-		'create_base' => 'spip_sqlite_create_base',
2368
-		'create_view' => 'spip_sqlite_create_view',
2369
-		'date_proche' => 'spip_sqlite_date_proche',
2370
-		'delete' => 'spip_sqlite_delete',
2371
-		'drop_table' => 'spip_sqlite_drop_table',
2372
-		'drop_view' => 'spip_sqlite_drop_view',
2373
-		'errno' => 'spip_sqlite_errno',
2374
-		'error' => 'spip_sqlite_error',
2375
-		'explain' => 'spip_sqlite_explain',
2376
-		'fetch' => 'spip_sqlite_fetch',
2377
-		'seek' => 'spip_sqlite_seek',
2378
-		'free' => 'spip_sqlite_free',
2379
-		'hex' => 'spip_sqlite_hex',
2380
-		'in' => 'spip_sqlite_in',
2381
-		'insert' => 'spip_sqlite_insert',
2382
-		'insertq' => 'spip_sqlite_insertq',
2383
-		'insertq_multi' => 'spip_sqlite_insertq_multi',
2384
-		'listdbs' => 'spip_sqlite_listdbs',
2385
-		'multi' => 'spip_sqlite_multi',
2386
-		'optimize' => 'spip_sqlite_optimize',
2387
-		'query' => 'spip_sqlite_query',
2388
-		'quote' => 'spip_sqlite_quote',
2389
-		'repair' => 'spip_sqlite_repair',
2390
-		'replace' => 'spip_sqlite_replace',
2391
-		'replace_multi' => 'spip_sqlite_replace_multi',
2392
-		'select' => 'spip_sqlite_select',
2393
-		'selectdb' => 'spip_sqlite_selectdb',
2394
-		'set_charset' => 'spip_sqlite_set_charset',
2395
-		'get_charset' => 'spip_sqlite_get_charset',
2396
-		'showbase' => 'spip_sqlite_showbase',
2397
-		'showtable' => 'spip_sqlite_showtable',
2398
-		'update' => 'spip_sqlite_update',
2399
-		'updateq' => 'spip_sqlite_updateq',
2400
-		'preferer_transaction' => 'spip_sqlite_preferer_transaction',
2401
-		'demarrer_transaction' => 'spip_sqlite_demarrer_transaction',
2402
-		'terminer_transaction' => 'spip_sqlite_terminer_transaction',
2403
-	);
2404
-
2405
-	// association de chaque nom http d'un charset aux couples sqlite 
2406
-	// SQLite supporte utf-8 et utf-16 uniquement.
2407
-	$charsets = array(
2408
-		'utf-8' => array('charset' => 'utf8', 'collation' => 'utf8_general_ci'),
2409
-		//'utf-16be'=>array('charset'=>'utf16be','collation'=>'UTF-16BE'),// aucune idee de quoi il faut remplir dans es champs la
2410
-		//'utf-16le'=>array('charset'=>'utf16le','collation'=>'UTF-16LE')
2411
-	);
2412
-
2413
-	$fonctions['charsets'] = $charsets;
2414
-
2415
-	return $fonctions;
2362
+    $fonctions = array(
2363
+        'alter' => 'spip_sqlite_alter',
2364
+        'count' => 'spip_sqlite_count',
2365
+        'countsel' => 'spip_sqlite_countsel',
2366
+        'create' => 'spip_sqlite_create',
2367
+        'create_base' => 'spip_sqlite_create_base',
2368
+        'create_view' => 'spip_sqlite_create_view',
2369
+        'date_proche' => 'spip_sqlite_date_proche',
2370
+        'delete' => 'spip_sqlite_delete',
2371
+        'drop_table' => 'spip_sqlite_drop_table',
2372
+        'drop_view' => 'spip_sqlite_drop_view',
2373
+        'errno' => 'spip_sqlite_errno',
2374
+        'error' => 'spip_sqlite_error',
2375
+        'explain' => 'spip_sqlite_explain',
2376
+        'fetch' => 'spip_sqlite_fetch',
2377
+        'seek' => 'spip_sqlite_seek',
2378
+        'free' => 'spip_sqlite_free',
2379
+        'hex' => 'spip_sqlite_hex',
2380
+        'in' => 'spip_sqlite_in',
2381
+        'insert' => 'spip_sqlite_insert',
2382
+        'insertq' => 'spip_sqlite_insertq',
2383
+        'insertq_multi' => 'spip_sqlite_insertq_multi',
2384
+        'listdbs' => 'spip_sqlite_listdbs',
2385
+        'multi' => 'spip_sqlite_multi',
2386
+        'optimize' => 'spip_sqlite_optimize',
2387
+        'query' => 'spip_sqlite_query',
2388
+        'quote' => 'spip_sqlite_quote',
2389
+        'repair' => 'spip_sqlite_repair',
2390
+        'replace' => 'spip_sqlite_replace',
2391
+        'replace_multi' => 'spip_sqlite_replace_multi',
2392
+        'select' => 'spip_sqlite_select',
2393
+        'selectdb' => 'spip_sqlite_selectdb',
2394
+        'set_charset' => 'spip_sqlite_set_charset',
2395
+        'get_charset' => 'spip_sqlite_get_charset',
2396
+        'showbase' => 'spip_sqlite_showbase',
2397
+        'showtable' => 'spip_sqlite_showtable',
2398
+        'update' => 'spip_sqlite_update',
2399
+        'updateq' => 'spip_sqlite_updateq',
2400
+        'preferer_transaction' => 'spip_sqlite_preferer_transaction',
2401
+        'demarrer_transaction' => 'spip_sqlite_demarrer_transaction',
2402
+        'terminer_transaction' => 'spip_sqlite_terminer_transaction',
2403
+    );
2404
+
2405
+    // association de chaque nom http d'un charset aux couples sqlite 
2406
+    // SQLite supporte utf-8 et utf-16 uniquement.
2407
+    $charsets = array(
2408
+        'utf-8' => array('charset' => 'utf8', 'collation' => 'utf8_general_ci'),
2409
+        //'utf-16be'=>array('charset'=>'utf16be','collation'=>'UTF-16BE'),// aucune idee de quoi il faut remplir dans es champs la
2410
+        //'utf-16le'=>array('charset'=>'utf16le','collation'=>'UTF-16LE')
2411
+    );
2412
+
2413
+    $fonctions['charsets'] = $charsets;
2414
+
2415
+    return $fonctions;
2416 2416
 }
2417 2417
 
2418 2418
 
@@ -2424,56 +2424,56 @@  discard block
 block discarded – undo
2424 2424
  * @return mixed
2425 2425
  */
2426 2426
 function _sqlite_remplacements_definitions_table($query, $autoinc = false) {
2427
-	// quelques remplacements
2428
-	$num = "(\s*\([0-9]*\))?";
2429
-	$enum = "(\s*\([^\)]*\))?";
2430
-
2431
-	$remplace = array(
2432
-		'/enum' . $enum . '/is' => 'VARCHAR(255)',
2433
-		'/COLLATE \w+_bin/is' => 'COLLATE BINARY',
2434
-		'/COLLATE \w+_ci/is' => 'COLLATE NOCASE',
2435
-		'/auto_increment/is' => '',
2436
-		'/current_timestamp\(\)/is' => 'CURRENT_TIMESTAMP', // Fix export depuis mariaDB #4374
2437
-		'/(timestamp .* )ON .*$/is' => '\\1',
2438
-		'/character set \w+/is' => '',
2439
-		'/((big|small|medium|tiny)?int(eger)?)' . $num . '\s*unsigned/is' => '\\1 UNSIGNED',
2440
-		'/(text\s+not\s+null(\s+collate\s+\w+)?)\s*$/is' => "\\1 DEFAULT ''",
2441
-		'/((char|varchar)' . $num . '\s+not\s+null(\s+collate\s+\w+)?)\s*$/is' => "\\1 DEFAULT ''",
2442
-		'/(datetime\s+not\s+null)\s*$/is' => "\\1 DEFAULT '0000-00-00 00:00:00'",
2443
-		'/(date\s+not\s+null)\s*$/is' => "\\1 DEFAULT '0000-00-00'",
2444
-	);
2445
-
2446
-	// pour l'autoincrement, il faut des INTEGER NOT NULL PRIMARY KEY
2447
-	$remplace_autocinc = array(
2448
-		'/(big|small|medium|tiny)?int(eger)?' . $num . '/is' => 'INTEGER'
2449
-	);
2450
-	// pour les int non autoincrement, il faut un DEFAULT
2451
-	$remplace_nonautocinc = array(
2452
-		'/((big|small|medium|tiny)?int(eger)?' . $num . '\s+not\s+null)\s*$/is' => "\\1 DEFAULT 0",
2453
-	);
2454
-
2455
-	if (is_string($query)) {
2456
-		$query = preg_replace(array_keys($remplace), $remplace, $query);
2457
-		if ($autoinc or preg_match(',AUTO_INCREMENT,is', $query)) {
2458
-			$query = preg_replace(array_keys($remplace_autocinc), $remplace_autocinc, $query);
2459
-		} else {
2460
-			$query = preg_replace(array_keys($remplace_nonautocinc), $remplace_nonautocinc, $query);
2461
-			$query = _sqlite_collate_ci($query);
2462
-		}
2463
-	} elseif (is_array($query)) {
2464
-		foreach ($query as $k => $q) {
2465
-			$ai = ($autoinc ? $k == $autoinc : preg_match(',AUTO_INCREMENT,is', $q));
2466
-			$query[$k] = preg_replace(array_keys($remplace), $remplace, $query[$k]);
2467
-			if ($ai) {
2468
-				$query[$k] = preg_replace(array_keys($remplace_autocinc), $remplace_autocinc, $query[$k]);
2469
-			} else {
2470
-				$query[$k] = preg_replace(array_keys($remplace_nonautocinc), $remplace_nonautocinc, $query[$k]);
2471
-				$query[$k] = _sqlite_collate_ci($query[$k]);
2472
-			}
2473
-		}
2474
-	}
2475
-
2476
-	return $query;
2427
+    // quelques remplacements
2428
+    $num = "(\s*\([0-9]*\))?";
2429
+    $enum = "(\s*\([^\)]*\))?";
2430
+
2431
+    $remplace = array(
2432
+        '/enum' . $enum . '/is' => 'VARCHAR(255)',
2433
+        '/COLLATE \w+_bin/is' => 'COLLATE BINARY',
2434
+        '/COLLATE \w+_ci/is' => 'COLLATE NOCASE',
2435
+        '/auto_increment/is' => '',
2436
+        '/current_timestamp\(\)/is' => 'CURRENT_TIMESTAMP', // Fix export depuis mariaDB #4374
2437
+        '/(timestamp .* )ON .*$/is' => '\\1',
2438
+        '/character set \w+/is' => '',
2439
+        '/((big|small|medium|tiny)?int(eger)?)' . $num . '\s*unsigned/is' => '\\1 UNSIGNED',
2440
+        '/(text\s+not\s+null(\s+collate\s+\w+)?)\s*$/is' => "\\1 DEFAULT ''",
2441
+        '/((char|varchar)' . $num . '\s+not\s+null(\s+collate\s+\w+)?)\s*$/is' => "\\1 DEFAULT ''",
2442
+        '/(datetime\s+not\s+null)\s*$/is' => "\\1 DEFAULT '0000-00-00 00:00:00'",
2443
+        '/(date\s+not\s+null)\s*$/is' => "\\1 DEFAULT '0000-00-00'",
2444
+    );
2445
+
2446
+    // pour l'autoincrement, il faut des INTEGER NOT NULL PRIMARY KEY
2447
+    $remplace_autocinc = array(
2448
+        '/(big|small|medium|tiny)?int(eger)?' . $num . '/is' => 'INTEGER'
2449
+    );
2450
+    // pour les int non autoincrement, il faut un DEFAULT
2451
+    $remplace_nonautocinc = array(
2452
+        '/((big|small|medium|tiny)?int(eger)?' . $num . '\s+not\s+null)\s*$/is' => "\\1 DEFAULT 0",
2453
+    );
2454
+
2455
+    if (is_string($query)) {
2456
+        $query = preg_replace(array_keys($remplace), $remplace, $query);
2457
+        if ($autoinc or preg_match(',AUTO_INCREMENT,is', $query)) {
2458
+            $query = preg_replace(array_keys($remplace_autocinc), $remplace_autocinc, $query);
2459
+        } else {
2460
+            $query = preg_replace(array_keys($remplace_nonautocinc), $remplace_nonautocinc, $query);
2461
+            $query = _sqlite_collate_ci($query);
2462
+        }
2463
+    } elseif (is_array($query)) {
2464
+        foreach ($query as $k => $q) {
2465
+            $ai = ($autoinc ? $k == $autoinc : preg_match(',AUTO_INCREMENT,is', $q));
2466
+            $query[$k] = preg_replace(array_keys($remplace), $remplace, $query[$k]);
2467
+            if ($ai) {
2468
+                $query[$k] = preg_replace(array_keys($remplace_autocinc), $remplace_autocinc, $query[$k]);
2469
+            } else {
2470
+                $query[$k] = preg_replace(array_keys($remplace_nonautocinc), $remplace_nonautocinc, $query[$k]);
2471
+                $query[$k] = _sqlite_collate_ci($query[$k]);
2472
+            }
2473
+        }
2474
+    }
2475
+
2476
+    return $query;
2477 2477
 }
2478 2478
 
2479 2479
 /**
@@ -2484,17 +2484,17 @@  discard block
 block discarded – undo
2484 2484
  * @return string
2485 2485
  */
2486 2486
 function _sqlite_collate_ci($champ) {
2487
-	if (stripos($champ, "COLLATE") !== false) {
2488
-		return $champ;
2489
-	}
2490
-	if (stripos($champ, "BINARY") !== false) {
2491
-		return str_ireplace("BINARY", "COLLATE BINARY", $champ);
2492
-	}
2493
-	if (preg_match(",^(char|varchar|(long|small|medium|tiny)?text),i", $champ)) {
2494
-		return $champ . " COLLATE NOCASE";
2495
-	}
2487
+    if (stripos($champ, "COLLATE") !== false) {
2488
+        return $champ;
2489
+    }
2490
+    if (stripos($champ, "BINARY") !== false) {
2491
+        return str_ireplace("BINARY", "COLLATE BINARY", $champ);
2492
+    }
2493
+    if (preg_match(",^(char|varchar|(long|small|medium|tiny)?text),i", $champ)) {
2494
+        return $champ . " COLLATE NOCASE";
2495
+    }
2496 2496
 
2497
-	return $champ;
2497
+    return $champ;
2498 2498
 }
2499 2499
 
2500 2500
 
@@ -2513,82 +2513,82 @@  discard block
 block discarded – undo
2513 2513
  * @return bool|string
2514 2514
  */
2515 2515
 function _sqlite_requete_create(
2516
-	$nom,
2517
-	$champs,
2518
-	$cles,
2519
-	$autoinc = false,
2520
-	$temporary = false,
2521
-	$_ifnotexists = true,
2522
-	$serveur = '',
2523
-	$requeter = true
2516
+    $nom,
2517
+    $champs,
2518
+    $cles,
2519
+    $autoinc = false,
2520
+    $temporary = false,
2521
+    $_ifnotexists = true,
2522
+    $serveur = '',
2523
+    $requeter = true
2524 2524
 ) {
2525
-	$query = $keys = $s = $p = '';
2526
-
2527
-	// certains plugins declarent les tables  (permet leur inclusion dans le dump)
2528
-	// sans les renseigner (laisse le compilo recuperer la description)
2529
-	if (!is_array($champs) || !is_array($cles)) {
2530
-		return;
2531
-	}
2532
-
2533
-	// sqlite ne gere pas KEY tout court dans une requete CREATE TABLE
2534
-	// il faut passer par des create index
2535
-	// Il gere par contre primary key !
2536
-	// Soit la PK est definie dans les cles, soit dans un champs
2537
-	// soit faussement dans les 2 (et dans ce cas, il faut l’enlever à un des 2 endroits !)
2538
-	$pk = "PRIMARY KEY";
2539
-	// le champ de cle primaire
2540
-	$champ_pk = !empty($cles[$pk]) ? $cles[$pk] : '';
2541
-
2542
-	foreach ($champs as $k => $v) {
2543
-		if (false !== stripos($v, $pk)) {
2544
-			$champ_pk = $k;
2545
-			// on n'en a plus besoin dans field, vu que defini dans key
2546
-			$champs[$k] = preg_replace("/$pk/is", '', $champs[$k]);
2547
-			break;
2548
-		}
2549
-	}
2550
-
2551
-	if ($champ_pk) {
2552
-		$keys = "\n\t\t$pk ($champ_pk)";
2553
-	}
2554
-	// Pas de DEFAULT 0 sur les cles primaires en auto-increment
2555
-	if (isset($champs[$champ_pk])
2556
-		and stripos($champs[$champ_pk], "default 0") !== false
2557
-	) {
2558
-		$champs[$champ_pk] = trim(str_ireplace("default 0", "", $champs[$champ_pk]));
2559
-	}
2560
-
2561
-	$champs = _sqlite_remplacements_definitions_table($champs, $autoinc ? $champ_pk : false);
2562
-	foreach ($champs as $k => $v) {
2563
-		$query .= "$s\n\t\t$k $v";
2564
-		$s = ",";
2565
-	}
2566
-
2567
-	$ifnotexists = "";
2568
-	if ($_ifnotexists) {
2569
-
2570
-		$version = spip_sqlite_fetch(spip_sqlite_query("select sqlite_version() AS sqlite_version", $serveur), '',
2571
-			$serveur);
2572
-		if (!function_exists('spip_version_compare')) {
2573
-			include_spip('plugins/installer');
2574
-		}
2575
-
2576
-		if ($version and spip_version_compare($version['sqlite_version'], '3.3.0', '>=')) {
2577
-			$ifnotexists = ' IF NOT EXISTS';
2578
-		} else {
2579
-			/* simuler le IF EXISTS - version 2 et sqlite < 3.3a */
2580
-			$a = spip_sqlite_showtable($nom, $serveur);
2581
-			if (isset($a['key']['KEY ' . $nom])) {
2582
-				return true;
2583
-			}
2584
-		}
2585
-
2586
-	}
2587
-
2588
-	$temporary = $temporary ? ' TEMPORARY' : '';
2589
-	$q = "CREATE$temporary TABLE$ifnotexists $nom ($query" . ($keys ? ",$keys" : '') . ")\n";
2590
-
2591
-	return $q;
2525
+    $query = $keys = $s = $p = '';
2526
+
2527
+    // certains plugins declarent les tables  (permet leur inclusion dans le dump)
2528
+    // sans les renseigner (laisse le compilo recuperer la description)
2529
+    if (!is_array($champs) || !is_array($cles)) {
2530
+        return;
2531
+    }
2532
+
2533
+    // sqlite ne gere pas KEY tout court dans une requete CREATE TABLE
2534
+    // il faut passer par des create index
2535
+    // Il gere par contre primary key !
2536
+    // Soit la PK est definie dans les cles, soit dans un champs
2537
+    // soit faussement dans les 2 (et dans ce cas, il faut l’enlever à un des 2 endroits !)
2538
+    $pk = "PRIMARY KEY";
2539
+    // le champ de cle primaire
2540
+    $champ_pk = !empty($cles[$pk]) ? $cles[$pk] : '';
2541
+
2542
+    foreach ($champs as $k => $v) {
2543
+        if (false !== stripos($v, $pk)) {
2544
+            $champ_pk = $k;
2545
+            // on n'en a plus besoin dans field, vu que defini dans key
2546
+            $champs[$k] = preg_replace("/$pk/is", '', $champs[$k]);
2547
+            break;
2548
+        }
2549
+    }
2550
+
2551
+    if ($champ_pk) {
2552
+        $keys = "\n\t\t$pk ($champ_pk)";
2553
+    }
2554
+    // Pas de DEFAULT 0 sur les cles primaires en auto-increment
2555
+    if (isset($champs[$champ_pk])
2556
+        and stripos($champs[$champ_pk], "default 0") !== false
2557
+    ) {
2558
+        $champs[$champ_pk] = trim(str_ireplace("default 0", "", $champs[$champ_pk]));
2559
+    }
2560
+
2561
+    $champs = _sqlite_remplacements_definitions_table($champs, $autoinc ? $champ_pk : false);
2562
+    foreach ($champs as $k => $v) {
2563
+        $query .= "$s\n\t\t$k $v";
2564
+        $s = ",";
2565
+    }
2566
+
2567
+    $ifnotexists = "";
2568
+    if ($_ifnotexists) {
2569
+
2570
+        $version = spip_sqlite_fetch(spip_sqlite_query("select sqlite_version() AS sqlite_version", $serveur), '',
2571
+            $serveur);
2572
+        if (!function_exists('spip_version_compare')) {
2573
+            include_spip('plugins/installer');
2574
+        }
2575
+
2576
+        if ($version and spip_version_compare($version['sqlite_version'], '3.3.0', '>=')) {
2577
+            $ifnotexists = ' IF NOT EXISTS';
2578
+        } else {
2579
+            /* simuler le IF EXISTS - version 2 et sqlite < 3.3a */
2580
+            $a = spip_sqlite_showtable($nom, $serveur);
2581
+            if (isset($a['key']['KEY ' . $nom])) {
2582
+                return true;
2583
+            }
2584
+        }
2585
+
2586
+    }
2587
+
2588
+    $temporary = $temporary ? ' TEMPORARY' : '';
2589
+    $q = "CREATE$temporary TABLE$ifnotexists $nom ($query" . ($keys ? ",$keys" : '') . ")\n";
2590
+
2591
+    return $q;
2592 2592
 }
2593 2593
 
2594 2594
 
@@ -2607,42 +2607,42 @@  discard block
 block discarded – undo
2607 2607
  * @return
2608 2608
  */
2609 2609
 function _sqlite_ajouter_champs_timestamp($table, $couples, $desc = '', $serveur = '') {
2610
-	static $tables = array();
2611
-
2612
-	if (!isset($tables[$table])) {
2613
-
2614
-		if (!$desc) {
2615
-			$trouver_table = charger_fonction('trouver_table', 'base');
2616
-			$desc = $trouver_table($table, $serveur);
2617
-			// si pas de description, on ne fait rien, ou on die() ?
2618
-			if (!$desc) {
2619
-				return $couples;
2620
-			}
2621
-		}
2622
-
2623
-		// recherche des champs avec simplement 'TIMESTAMP'
2624
-		// cependant, il faudra peut etre etendre
2625
-		// avec la gestion de DEFAULT et ON UPDATE
2626
-		// mais ceux-ci ne sont pas utilises dans le core
2627
-		$tables[$table] = ['valeur' => [], 'cite' => [], 'desc' => []];
2628
-
2629
-		$now = _sqlite_func_now(true);
2630
-		foreach ($desc['field'] as $k => $v) {
2631
-			if (strpos(strtolower(ltrim($v)), 'timestamp') === 0) {
2632
-				$tables[$table]['desc'][$k] = $v;
2633
-				$tables[$table]['valeur'][$k] = _sqlite_calculer_cite($now, $tables[$table]['desc'][$k]);
2634
-			}
2635
-		}
2636
-	}
2637
-	else {
2638
-		$now = _sqlite_func_now(true);
2639
-		foreach (array_keys($tables[$table]['desc']) as $k) {
2640
-			$tables[$table]['valeur'][$k] = _sqlite_calculer_cite($now, $tables[$table]['desc'][$k]);
2641
-		}
2642
-	}
2643
-
2644
-	// ajout des champs type 'timestamp' absents
2645
-	return array_merge($tables[$table]['valeur'], $couples);
2610
+    static $tables = array();
2611
+
2612
+    if (!isset($tables[$table])) {
2613
+
2614
+        if (!$desc) {
2615
+            $trouver_table = charger_fonction('trouver_table', 'base');
2616
+            $desc = $trouver_table($table, $serveur);
2617
+            // si pas de description, on ne fait rien, ou on die() ?
2618
+            if (!$desc) {
2619
+                return $couples;
2620
+            }
2621
+        }
2622
+
2623
+        // recherche des champs avec simplement 'TIMESTAMP'
2624
+        // cependant, il faudra peut etre etendre
2625
+        // avec la gestion de DEFAULT et ON UPDATE
2626
+        // mais ceux-ci ne sont pas utilises dans le core
2627
+        $tables[$table] = ['valeur' => [], 'cite' => [], 'desc' => []];
2628
+
2629
+        $now = _sqlite_func_now(true);
2630
+        foreach ($desc['field'] as $k => $v) {
2631
+            if (strpos(strtolower(ltrim($v)), 'timestamp') === 0) {
2632
+                $tables[$table]['desc'][$k] = $v;
2633
+                $tables[$table]['valeur'][$k] = _sqlite_calculer_cite($now, $tables[$table]['desc'][$k]);
2634
+            }
2635
+        }
2636
+    }
2637
+    else {
2638
+        $now = _sqlite_func_now(true);
2639
+        foreach (array_keys($tables[$table]['desc']) as $k) {
2640
+            $tables[$table]['valeur'][$k] = _sqlite_calculer_cite($now, $tables[$table]['desc'][$k]);
2641
+        }
2642
+    }
2643
+
2644
+    // ajout des champs type 'timestamp' absents
2645
+    return array_merge($tables[$table]['valeur'], $couples);
2646 2646
 }
2647 2647
 
2648 2648
 
@@ -2653,7 +2653,7 @@  discard block
 block discarded – undo
2653 2653
  * @return array|bool
2654 2654
  */
2655 2655
 function spip_versions_sqlite() {
2656
-	return _sqlite_charger_version();
2656
+    return _sqlite_charger_version();
2657 2657
 }
2658 2658
 
2659 2659
 /**
@@ -2661,113 +2661,113 @@  discard block
 block discarded – undo
2661 2661
  * encadrées de transactions.
2662 2662
  **/
2663 2663
 class spip_sqlite {
2664
-	/** @var sqlite_requeteur[] Liste des instances de requêteurs créés */
2665
-	public static $requeteurs = array();
2666
-	/** @var bool[] Pour chaque connexion, flag pour savoir si une transaction est en cours */
2667
-	public static $transaction_en_cours = array();
2668
-
2669
-
2670
-	/**
2671
-	 * Retourne une unique instance du requêteur
2672
-	 *
2673
-	 * Retourne une instance unique du requêteur pour une connexion SQLite
2674
-	 * donnée
2675
-	 *
2676
-	 * @param string $serveur
2677
-	 *    Nom du connecteur
2678
-	 * @return sqlite_requeteur
2679
-	 *    Instance unique du requêteur
2680
-	 **/
2681
-	public static function requeteur($serveur) {
2682
-		if (!isset(spip_sqlite::$requeteurs[$serveur])) {
2683
-			spip_sqlite::$requeteurs[$serveur] = new sqlite_requeteur($serveur);
2684
-		}
2685
-
2686
-		return spip_sqlite::$requeteurs[$serveur];
2687
-	}
2688
-
2689
-	/**
2690
-	 * Prépare le texte d'une requête avant son exécution
2691
-	 *
2692
-	 * Adapte la requête au format plus ou moins MySQL par un format
2693
-	 * compris de SQLite.
2694
-	 *
2695
-	 * Change les préfixes de tables SPIP par ceux véritables
2696
-	 *
2697
-	 * @param string $query Requête à préparer
2698
-	 * @param string $serveur Nom de la connexion
2699
-	 * @return string           Requête préparée
2700
-	 */
2701
-	public static function traduire_requete($query, $serveur) {
2702
-		$requeteur = spip_sqlite::requeteur($serveur);
2703
-		$traducteur = new sqlite_traducteur($query, $requeteur->prefixe, $requeteur->sqlite_version);
2704
-
2705
-		return $traducteur->traduire_requete();
2706
-	}
2707
-
2708
-	/**
2709
-	 * Démarre une transaction
2710
-	 *
2711
-	 * @param string $serveur Nom de la connexion
2712
-	 **/
2713
-	public static function demarrer_transaction($serveur) {
2714
-		spip_sqlite::executer_requete("BEGIN TRANSACTION", $serveur);
2715
-		spip_sqlite::$transaction_en_cours[$serveur] = true;
2716
-	}
2717
-
2718
-	/**
2719
-	 * Exécute la requête donnée
2720
-	 *
2721
-	 * @param string $query Requête
2722
-	 * @param string $serveur Nom de la connexion
2723
-	 * @param null|bool $tracer Demander des statistiques (temps) ?
2724
-	 **/
2725
-	public static function executer_requete($query, $serveur, $tracer = null) {
2726
-		$requeteur = spip_sqlite::requeteur($serveur);
2727
-
2728
-		return $requeteur->executer_requete($query, $tracer);
2729
-	}
2730
-
2731
-	/**
2732
-	 * Obtient l'identifiant de la dernière ligne insérée ou modifiée
2733
-	 *
2734
-	 * @param string $serveur Nom de la connexion
2735
-	 * return int                Identifiant
2736
-	 **/
2737
-	public static function last_insert_id($serveur) {
2738
-		$requeteur = spip_sqlite::requeteur($serveur);
2739
-
2740
-		return $requeteur->last_insert_id($serveur);
2741
-	}
2742
-
2743
-	/**
2744
-	 * Annule une transaction
2745
-	 *
2746
-	 * @param string $serveur Nom de la connexion
2747
-	 **/
2748
-	public static function annuler_transaction($serveur) {
2749
-		spip_sqlite::executer_requete("ROLLBACK", $serveur);
2750
-		spip_sqlite::$transaction_en_cours[$serveur] = false;
2751
-	}
2752
-
2753
-	/**
2754
-	 * Termine une transaction
2755
-	 *
2756
-	 * @param string $serveur Nom de la connexion
2757
-	 **/
2758
-	public static function finir_transaction($serveur) {
2759
-		// si pas de transaction en cours, ne rien faire et le dire
2760
-		if (!isset(spip_sqlite::$transaction_en_cours[$serveur])
2761
-			or spip_sqlite::$transaction_en_cours[$serveur] == false
2762
-		) {
2763
-			return false;
2764
-		}
2765
-		// sinon fermer la transaction et retourner true
2766
-		spip_sqlite::executer_requete("COMMIT", $serveur);
2767
-		spip_sqlite::$transaction_en_cours[$serveur] = false;
2768
-
2769
-		return true;
2770
-	}
2664
+    /** @var sqlite_requeteur[] Liste des instances de requêteurs créés */
2665
+    public static $requeteurs = array();
2666
+    /** @var bool[] Pour chaque connexion, flag pour savoir si une transaction est en cours */
2667
+    public static $transaction_en_cours = array();
2668
+
2669
+
2670
+    /**
2671
+     * Retourne une unique instance du requêteur
2672
+     *
2673
+     * Retourne une instance unique du requêteur pour une connexion SQLite
2674
+     * donnée
2675
+     *
2676
+     * @param string $serveur
2677
+     *    Nom du connecteur
2678
+     * @return sqlite_requeteur
2679
+     *    Instance unique du requêteur
2680
+     **/
2681
+    public static function requeteur($serveur) {
2682
+        if (!isset(spip_sqlite::$requeteurs[$serveur])) {
2683
+            spip_sqlite::$requeteurs[$serveur] = new sqlite_requeteur($serveur);
2684
+        }
2685
+
2686
+        return spip_sqlite::$requeteurs[$serveur];
2687
+    }
2688
+
2689
+    /**
2690
+     * Prépare le texte d'une requête avant son exécution
2691
+     *
2692
+     * Adapte la requête au format plus ou moins MySQL par un format
2693
+     * compris de SQLite.
2694
+     *
2695
+     * Change les préfixes de tables SPIP par ceux véritables
2696
+     *
2697
+     * @param string $query Requête à préparer
2698
+     * @param string $serveur Nom de la connexion
2699
+     * @return string           Requête préparée
2700
+     */
2701
+    public static function traduire_requete($query, $serveur) {
2702
+        $requeteur = spip_sqlite::requeteur($serveur);
2703
+        $traducteur = new sqlite_traducteur($query, $requeteur->prefixe, $requeteur->sqlite_version);
2704
+
2705
+        return $traducteur->traduire_requete();
2706
+    }
2707
+
2708
+    /**
2709
+     * Démarre une transaction
2710
+     *
2711
+     * @param string $serveur Nom de la connexion
2712
+     **/
2713
+    public static function demarrer_transaction($serveur) {
2714
+        spip_sqlite::executer_requete("BEGIN TRANSACTION", $serveur);
2715
+        spip_sqlite::$transaction_en_cours[$serveur] = true;
2716
+    }
2717
+
2718
+    /**
2719
+     * Exécute la requête donnée
2720
+     *
2721
+     * @param string $query Requête
2722
+     * @param string $serveur Nom de la connexion
2723
+     * @param null|bool $tracer Demander des statistiques (temps) ?
2724
+     **/
2725
+    public static function executer_requete($query, $serveur, $tracer = null) {
2726
+        $requeteur = spip_sqlite::requeteur($serveur);
2727
+
2728
+        return $requeteur->executer_requete($query, $tracer);
2729
+    }
2730
+
2731
+    /**
2732
+     * Obtient l'identifiant de la dernière ligne insérée ou modifiée
2733
+     *
2734
+     * @param string $serveur Nom de la connexion
2735
+     * return int                Identifiant
2736
+     **/
2737
+    public static function last_insert_id($serveur) {
2738
+        $requeteur = spip_sqlite::requeteur($serveur);
2739
+
2740
+        return $requeteur->last_insert_id($serveur);
2741
+    }
2742
+
2743
+    /**
2744
+     * Annule une transaction
2745
+     *
2746
+     * @param string $serveur Nom de la connexion
2747
+     **/
2748
+    public static function annuler_transaction($serveur) {
2749
+        spip_sqlite::executer_requete("ROLLBACK", $serveur);
2750
+        spip_sqlite::$transaction_en_cours[$serveur] = false;
2751
+    }
2752
+
2753
+    /**
2754
+     * Termine une transaction
2755
+     *
2756
+     * @param string $serveur Nom de la connexion
2757
+     **/
2758
+    public static function finir_transaction($serveur) {
2759
+        // si pas de transaction en cours, ne rien faire et le dire
2760
+        if (!isset(spip_sqlite::$transaction_en_cours[$serveur])
2761
+            or spip_sqlite::$transaction_en_cours[$serveur] == false
2762
+        ) {
2763
+            return false;
2764
+        }
2765
+        // sinon fermer la transaction et retourner true
2766
+        spip_sqlite::executer_requete("COMMIT", $serveur);
2767
+        spip_sqlite::$transaction_en_cours[$serveur] = false;
2768
+
2769
+        return true;
2770
+    }
2771 2771
 }
2772 2772
 
2773 2773
 /*
@@ -2780,128 +2780,128 @@  discard block
 block discarded – undo
2780 2780
  */
2781 2781
 
2782 2782
 class sqlite_requeteur {
2783
-	/** @var string Texte de la requête */
2784
-	public $query = ''; // la requete
2785
-	/** @var string Nom de la connexion */
2786
-	public $serveur = '';
2787
-	/** @var Ressource Identifiant de la connexion SQLite */
2788
-	public $link = '';
2789
-	/** @var string Prefixe des tables SPIP */
2790
-	public $prefixe = '';
2791
-	/** @var string Nom de la base de donnée */
2792
-	public $db = '';
2793
-	/** @var bool Doit-on tracer les requetes (var_profile) ? */
2794
-	public $tracer = false; // doit-on tracer les requetes (var_profile)
2795
-
2796
-	/** @var string Version de SQLite (2 ou 3) */
2797
-	public $sqlite_version = '';
2798
-
2799
-	/**
2800
-	 * Constructeur
2801
-	 *
2802
-	 * @param string $serveur
2803
-	 * @return bool
2804
-	 */
2805
-	public function __construct($serveur = '') {
2806
-		_sqlite_init();
2807
-		$this->serveur = strtolower($serveur);
2808
-
2809
-		if (!($this->link = _sqlite_link($this->serveur)) && (!defined('_ECRIRE_INSTALL') || !_ECRIRE_INSTALL)) {
2810
-			spip_log("Aucune connexion sqlite (link)", 'sqlite.' . _LOG_ERREUR);
2811
-
2812
-			return false;
2813
-		}
2814
-
2815
-		$this->sqlite_version = _sqlite_is_version('', $this->link);
2816
-
2817
-		$this->prefixe = $GLOBALS['connexions'][$this->serveur ? $this->serveur : 0]['prefixe'];
2818
-		$this->db = $GLOBALS['connexions'][$this->serveur ? $this->serveur : 0]['db'];
2819
-
2820
-		// tracage des requetes ?
2821
-		$this->tracer = (isset($_GET['var_profile']) && $_GET['var_profile']);
2822
-	}
2823
-
2824
-	/**
2825
-	 * Lancer la requête transmise et faire le tracage si demandé
2826
-	 *
2827
-	 * @param string $query
2828
-	 *     Requête à exécuter
2829
-	 * @param bool|null $tracer
2830
-	 *     true pour tracer la requête
2831
-	 * @return bool|SQLiteResult
2832
-	 */
2833
-	public function executer_requete($query, $tracer = null) {
2834
-		if (is_null($tracer)) {
2835
-			$tracer = $this->tracer;
2836
-		}
2837
-		$err = "";
2838
-		$t = 0;
2839
-		if ($tracer or (defined('_DEBUG_TRACE_QUERIES') and _DEBUG_TRACE_QUERIES)) {
2840
-			include_spip('public/tracer');
2841
-			$t = trace_query_start();
2842
-		}
2843
-
2844
-		# spip_log("requete: $this->serveur >> $query",'sqlite.'._LOG_DEBUG); // boum ? pourquoi ?
2845
-		if ($this->link) {
2846
-			// memoriser la derniere erreur PHP vue
2847
-			$last_error = (function_exists('error_get_last') ? error_get_last() : "");
2848
-			$e = null;
2849
-			// sauver la derniere requete
2850
-			$GLOBALS['connexions'][$this->serveur ? $this->serveur : 0]['last'] = $query;
2851
-			$GLOBALS['connexions'][$this->serveur ? $this->serveur : 0]['total_requetes']++;
2852
-
2853
-			try {
2854
-				$r = $this->link->query($query);
2855
-			} catch (\PDOException $e) {
2856
-				spip_log("PDOException: " . $e->getMessage(), 'sqlite.' . _LOG_DEBUG);
2857
-				$r = false;
2858
-			}
2859
-			// sauvegarde de la requete (elle y est deja dans $r->queryString)
2860
-			# $r->spipQueryString = $query;
2861
-
2862
-			// comptage : oblige de compter le nombre d'entrees retournees
2863
-			// par une requete SELECT
2864
-			// aucune autre solution ne donne le nombre attendu :( !
2865
-			// particulierement s'il y a des LIMIT dans la requete.
2866
-			if (strtoupper(substr(ltrim($query), 0, 6)) == 'SELECT') {
2867
-				if ($r) {
2868
-					// noter le link et la query pour faire le comptage *si* on en a besoin
2869
-					$r->spipSqliteRowCount = array($this->link, $query);
2870
-				} elseif ($r instanceof PDOStatement) {
2871
-					$r->spipSqliteRowCount = 0;
2872
-				}
2873
-			}
2874
-
2875
-			// loger les warnings/erreurs eventuels de sqlite remontant dans PHP
2876
-			if ($e and $e instanceof \PDOException) {
2877
-				$err = strip_tags($e->getMessage()) . " in " . $e->getFile() . " line " . $e->getLine();
2878
-				spip_log("$err - " . $query, 'sqlite.' . _LOG_ERREUR);
2879
-			} elseif ($err = (function_exists('error_get_last') ? error_get_last() : "") and $err != $last_error) {
2880
-				$err = strip_tags($err['message']) . " in " . $err['file'] . " line " . $err['line'];
2881
-				spip_log("$err - " . $query, 'sqlite.' . _LOG_ERREUR);
2882
-			} else {
2883
-				$err = "";
2884
-			}
2885
-
2886
-		} else {
2887
-			$r = false;
2888
-		}
2889
-
2890
-		if (spip_sqlite_errno($this->serveur)) {
2891
-			$err .= spip_sqlite_error($query, $this->serveur);
2892
-		}
2893
-
2894
-		return $t ? trace_query_end($query, $t, $r, $err, $this->serveur) : $r;
2895
-	}
2896
-
2897
-	/**
2898
-	 * Obtient l'identifiant de la dernière ligne insérée ou modifiée
2899
-	 *
2900
-	 * @return int
2901
-	 **/
2902
-	public function last_insert_id() {
2903
-		return $this->link->lastInsertId();
2904
-	}
2783
+    /** @var string Texte de la requête */
2784
+    public $query = ''; // la requete
2785
+    /** @var string Nom de la connexion */
2786
+    public $serveur = '';
2787
+    /** @var Ressource Identifiant de la connexion SQLite */
2788
+    public $link = '';
2789
+    /** @var string Prefixe des tables SPIP */
2790
+    public $prefixe = '';
2791
+    /** @var string Nom de la base de donnée */
2792
+    public $db = '';
2793
+    /** @var bool Doit-on tracer les requetes (var_profile) ? */
2794
+    public $tracer = false; // doit-on tracer les requetes (var_profile)
2795
+
2796
+    /** @var string Version de SQLite (2 ou 3) */
2797
+    public $sqlite_version = '';
2798
+
2799
+    /**
2800
+     * Constructeur
2801
+     *
2802
+     * @param string $serveur
2803
+     * @return bool
2804
+     */
2805
+    public function __construct($serveur = '') {
2806
+        _sqlite_init();
2807
+        $this->serveur = strtolower($serveur);
2808
+
2809
+        if (!($this->link = _sqlite_link($this->serveur)) && (!defined('_ECRIRE_INSTALL') || !_ECRIRE_INSTALL)) {
2810
+            spip_log("Aucune connexion sqlite (link)", 'sqlite.' . _LOG_ERREUR);
2811
+
2812
+            return false;
2813
+        }
2814
+
2815
+        $this->sqlite_version = _sqlite_is_version('', $this->link);
2816
+
2817
+        $this->prefixe = $GLOBALS['connexions'][$this->serveur ? $this->serveur : 0]['prefixe'];
2818
+        $this->db = $GLOBALS['connexions'][$this->serveur ? $this->serveur : 0]['db'];
2819
+
2820
+        // tracage des requetes ?
2821
+        $this->tracer = (isset($_GET['var_profile']) && $_GET['var_profile']);
2822
+    }
2823
+
2824
+    /**
2825
+     * Lancer la requête transmise et faire le tracage si demandé
2826
+     *
2827
+     * @param string $query
2828
+     *     Requête à exécuter
2829
+     * @param bool|null $tracer
2830
+     *     true pour tracer la requête
2831
+     * @return bool|SQLiteResult
2832
+     */
2833
+    public function executer_requete($query, $tracer = null) {
2834
+        if (is_null($tracer)) {
2835
+            $tracer = $this->tracer;
2836
+        }
2837
+        $err = "";
2838
+        $t = 0;
2839
+        if ($tracer or (defined('_DEBUG_TRACE_QUERIES') and _DEBUG_TRACE_QUERIES)) {
2840
+            include_spip('public/tracer');
2841
+            $t = trace_query_start();
2842
+        }
2843
+
2844
+        # spip_log("requete: $this->serveur >> $query",'sqlite.'._LOG_DEBUG); // boum ? pourquoi ?
2845
+        if ($this->link) {
2846
+            // memoriser la derniere erreur PHP vue
2847
+            $last_error = (function_exists('error_get_last') ? error_get_last() : "");
2848
+            $e = null;
2849
+            // sauver la derniere requete
2850
+            $GLOBALS['connexions'][$this->serveur ? $this->serveur : 0]['last'] = $query;
2851
+            $GLOBALS['connexions'][$this->serveur ? $this->serveur : 0]['total_requetes']++;
2852
+
2853
+            try {
2854
+                $r = $this->link->query($query);
2855
+            } catch (\PDOException $e) {
2856
+                spip_log("PDOException: " . $e->getMessage(), 'sqlite.' . _LOG_DEBUG);
2857
+                $r = false;
2858
+            }
2859
+            // sauvegarde de la requete (elle y est deja dans $r->queryString)
2860
+            # $r->spipQueryString = $query;
2861
+
2862
+            // comptage : oblige de compter le nombre d'entrees retournees
2863
+            // par une requete SELECT
2864
+            // aucune autre solution ne donne le nombre attendu :( !
2865
+            // particulierement s'il y a des LIMIT dans la requete.
2866
+            if (strtoupper(substr(ltrim($query), 0, 6)) == 'SELECT') {
2867
+                if ($r) {
2868
+                    // noter le link et la query pour faire le comptage *si* on en a besoin
2869
+                    $r->spipSqliteRowCount = array($this->link, $query);
2870
+                } elseif ($r instanceof PDOStatement) {
2871
+                    $r->spipSqliteRowCount = 0;
2872
+                }
2873
+            }
2874
+
2875
+            // loger les warnings/erreurs eventuels de sqlite remontant dans PHP
2876
+            if ($e and $e instanceof \PDOException) {
2877
+                $err = strip_tags($e->getMessage()) . " in " . $e->getFile() . " line " . $e->getLine();
2878
+                spip_log("$err - " . $query, 'sqlite.' . _LOG_ERREUR);
2879
+            } elseif ($err = (function_exists('error_get_last') ? error_get_last() : "") and $err != $last_error) {
2880
+                $err = strip_tags($err['message']) . " in " . $err['file'] . " line " . $err['line'];
2881
+                spip_log("$err - " . $query, 'sqlite.' . _LOG_ERREUR);
2882
+            } else {
2883
+                $err = "";
2884
+            }
2885
+
2886
+        } else {
2887
+            $r = false;
2888
+        }
2889
+
2890
+        if (spip_sqlite_errno($this->serveur)) {
2891
+            $err .= spip_sqlite_error($query, $this->serveur);
2892
+        }
2893
+
2894
+        return $t ? trace_query_end($query, $t, $r, $err, $this->serveur) : $r;
2895
+    }
2896
+
2897
+    /**
2898
+     * Obtient l'identifiant de la dernière ligne insérée ou modifiée
2899
+     *
2900
+     * @return int
2901
+     **/
2902
+    public function last_insert_id() {
2903
+        return $this->link->lastInsertId();
2904
+    }
2905 2905
 }
2906 2906
 
2907 2907
 
@@ -2911,201 +2911,201 @@  discard block
 block discarded – undo
2911 2911
  * (fonction pour proteger les textes)
2912 2912
  */
2913 2913
 class sqlite_traducteur {
2914
-	/** @var string $query Texte de la requête */
2915
-	public $query = '';
2916
-	/** @var string $prefixe Préfixe des tables */
2917
-	public $prefixe = '';
2918
-	/** @var string $sqlite_version Version de sqlite (2 ou 3) */
2919
-	public $sqlite_version = '';
2920
-
2921
-	/** Pour les corrections à effectuer sur les requêtes : array(code=>'texte') trouvé
2922
-	 *
2923
-	 * @var array
2924
-	 */
2925
-	public $textes = array();
2926
-
2927
-	/**
2928
-	 * Constructeur
2929
-	 *
2930
-	 * @param string $query Requête à préparer
2931
-	 * @param string $prefixe Prefixe des tables à utiliser
2932
-	 * @param string $sqlite_version Version SQLite (2 ou 3)
2933
-	 */
2934
-	public function __construct($query, $prefixe, $sqlite_version) {
2935
-		$this->query = $query;
2936
-		$this->prefixe = $prefixe;
2937
-		$this->sqlite_version = $sqlite_version;
2938
-	}
2939
-
2940
-	/**
2941
-	 * Transformer la requete pour SQLite
2942
-	 *
2943
-	 * Enlève les textes, transforme la requête pour quelle soit
2944
-	 * bien interprétée par SQLite, puis remet les textes
2945
-	 * la fonction affecte `$this->query`
2946
-	 */
2947
-	public function traduire_requete() {
2948
-		//
2949
-		// 1) Protection des textes en les remplacant par des codes
2950
-		//
2951
-		// enlever les 'textes' et initialiser avec
2952
-		list($this->query, $textes) = query_echappe_textes($this->query);
2953
-
2954
-		//
2955
-		// 2) Corrections de la requete
2956
-		//
2957
-		// Correction Create Database
2958
-		// Create Database -> requete ignoree
2959
-		if (strpos($this->query, 'CREATE DATABASE') === 0) {
2960
-			spip_log("Sqlite : requete non executee -> $this->query", 'sqlite.' . _LOG_AVERTISSEMENT);
2961
-			$this->query = "SELECT 1";
2962
-		}
2963
-
2964
-		// Correction Insert Ignore
2965
-		// INSERT IGNORE -> insert (tout court et pas 'insert or replace')
2966
-		if (strpos($this->query, 'INSERT IGNORE') === 0) {
2967
-			spip_log("Sqlite : requete transformee -> $this->query", 'sqlite.' . _LOG_DEBUG);
2968
-			$this->query = 'INSERT ' . substr($this->query, '13');
2969
-		}
2970
-
2971
-		// Correction des dates avec INTERVAL
2972
-		// utiliser sql_date_proche() de preference
2973
-		if (strpos($this->query, 'INTERVAL') !== false) {
2974
-			$this->query = preg_replace_callback("/DATE_(ADD|SUB)(.*)INTERVAL\s+(\d+)\s+([a-zA-Z]+)\)/U",
2975
-				array(&$this, '_remplacerDateParTime'),
2976
-				$this->query);
2977
-		}
2978
-
2979
-		if (strpos($this->query, 'LEFT(') !== false) {
2980
-			$this->query = str_replace('LEFT(', '_LEFT(', $this->query);
2981
-		}
2982
-
2983
-		if (strpos($this->query, 'TIMESTAMPDIFF(') !== false) {
2984
-			$this->query = preg_replace('/TIMESTAMPDIFF\(\s*([^,]*)\s*,/Uims', "TIMESTAMPDIFF('\\1',", $this->query);
2985
-		}
2986
-
2987
-
2988
-		// Correction Using
2989
-		// USING (non reconnu en sqlite2)
2990
-		// problematique car la jointure ne se fait pas du coup.
2991
-		if (($this->sqlite_version == 2) && (strpos($this->query, "USING") !== false)) {
2992
-			spip_log("'USING (champ)' n'est pas reconnu en SQLite 2. Utilisez 'ON table1.champ = table2.champ'",
2993
-				'sqlite.' . _LOG_ERREUR);
2994
-			$this->query = preg_replace('/USING\s*\([^\)]*\)/', '', $this->query);
2995
-		}
2996
-
2997
-		// Correction Field
2998
-		// remplace FIELD(table,i,j,k...) par CASE WHEN table=i THEN n ... ELSE 0 END
2999
-		if (strpos($this->query, 'FIELD') !== false) {
3000
-			$this->query = preg_replace_callback('/FIELD\s*\(([^\)]*)\)/',
3001
-				array(&$this, '_remplacerFieldParCase'),
3002
-				$this->query);
3003
-		}
3004
-
3005
-		// Correction des noms de tables FROM
3006
-		// mettre les bons noms de table dans from, update, insert, replace...
3007
-		if (preg_match('/\s(SET|VALUES|WHERE|DATABASE)\s/iS', $this->query, $regs)) {
3008
-			$suite = strstr($this->query, $regs[0]);
3009
-			$this->query = substr($this->query, 0, -strlen($suite));
3010
-		} else {
3011
-			$suite = '';
3012
-		}
3013
-		$pref = ($this->prefixe) ? $this->prefixe . "_" : "";
3014
-		$this->query = preg_replace('/([,\s])spip_/S', '\1' . $pref, $this->query) . $suite;
3015
-
3016
-		// Correction zero AS x
3017
-		// pg n'aime pas 0+x AS alias, sqlite, dans le meme style, 
3018
-		// n'apprecie pas du tout SELECT 0 as x ... ORDER BY x
3019
-		// il dit que x ne doit pas être un integer dans le order by !
3020
-		// on remplace du coup x par vide() dans ce cas uniquement
3021
-		//
3022
-		// apparait dans public/vertebrer.php et dans le plugin menu aussi qui genere aussi ce genre de requete via un {par num #GET{tri_num}}
3023
-		// mais est-ce encore un soucis pour sqlite en 2021 ? (ie commenter le preg_replace marche très bien en sqlite 3.28)
3024
-		if ((strpos($this->query, "0 AS") !== false)) {
3025
-			// on ne remplace que dans ORDER BY ou GROUP BY
3026
-			if (preg_match('/\s(ORDER|GROUP) BY\s/i', $this->query, $regs)) {
3027
-				$suite = strstr($this->query, $regs[0]);
3028
-				$this->query = substr($this->query, 0, -strlen($suite));
3029
-
3030
-				// on cherche les noms des x dans 0 AS x
3031
-				// on remplace dans $suite le nom par vide()
3032
-				preg_match_all('/\b0 AS\s*([^\s,]+)/', $this->query, $matches, PREG_PATTERN_ORDER);
3033
-				foreach ($matches[1] as $m) {
3034
-					if (strpos($suite, $m) !== false) {
3035
-						$suite = preg_replace(",\b$m\b,", 'VIDE()', $suite);
3036
-					}
3037
-				}
3038
-				$this->query .= $suite;
3039
-			}
3040
-		}
3041
-
3042
-		// Correction possible des divisions entieres
3043
-		// Le standard SQL (lequel? ou?) semble indiquer que
3044
-		// a/b=c doit donner c entier si a et b sont entiers 4/3=1.
3045
-		// C'est ce que retournent effectivement SQL Server et SQLite
3046
-		// Ce n'est pas ce qu'applique MySQL qui retourne un reel : 4/3=1.333...
3047
-		// 
3048
-		// On peut forcer la conversion en multipliant par 1.0 avant la division
3049
-		// /!\ SQLite 3.5.9 Debian/Ubuntu est victime d'un bug en plus ! 
3050
-		// cf. https://bugs.launchpad.net/ubuntu/+source/sqlite3/+bug/254228
3051
-		//     http://www.sqlite.org/cvstrac/tktview?tn=3202
3052
-		// (4*1.0/3) n'est pas rendu dans ce cas !
3053
-		# $this->query = str_replace('/','* 1.00 / ',$this->query);
3054
-
3055
-
3056
-		// Correction critere REGEXP, non reconnu en sqlite2
3057
-		if (($this->sqlite_version == 2) && (strpos($this->query, 'REGEXP') !== false)) {
3058
-			$this->query = preg_replace('/([^\s\(]*)(\s*)REGEXP(\s*)([^\s\)]*)/', 'REGEXP($4, $1)', $this->query);
3059
-		}
3060
-
3061
-		//
3062
-		// 3) Remise en place des textes d'origine
3063
-		//
3064
-		// Correction Antiquotes et echappements
3065
-		// ` => rien
3066
-		if (strpos($this->query, '`') !== false) {
3067
-			$this->query = str_replace('`', '', $this->query);
3068
-		}
3069
-
3070
-		$this->query = query_reinjecte_textes($this->query, $textes);
3071
-
3072
-		return $this->query;
3073
-	}
3074
-
3075
-
3076
-	/**
3077
-	 * Callback pour remplacer `DATE_` / `INTERVAL`
3078
-	 * par `DATE ... strtotime`
3079
-	 *
3080
-	 * @param array $matches Captures
3081
-	 * @return string Texte de date compris par SQLite
3082
-	 */
3083
-	public function _remplacerDateParTime($matches) {
3084
-		$op = strtoupper($matches[1] == 'ADD') ? '+' : '-';
3085
-
3086
-		return "datetime$matches[2] '$op$matches[3] $matches[4]')";
3087
-	}
3088
-
3089
-	/**
3090
-	 * Callback pour remplacer `FIELD(table,i,j,k...)`
3091
-	 * par `CASE WHEN table=i THEN n ... ELSE 0 END`
3092
-	 *
3093
-	 * @param array $matches Captures
3094
-	 * @return string Texte de liste ordonnée compris par SQLite
3095
-	 */
3096
-	public function _remplacerFieldParCase($matches) {
3097
-		$fields = substr($matches[0], 6, -1); // ne recuperer que l'interieur X de field(X)
3098
-		$t = explode(',', $fields);
3099
-		$index = array_shift($t);
3100
-
3101
-		$res = '';
3102
-		$n = 0;
3103
-		foreach ($t as $v) {
3104
-			$n++;
3105
-			$res .= "\nWHEN $index=$v THEN $n";
3106
-		}
3107
-
3108
-		return "CASE $res ELSE 0 END ";
3109
-	}
2914
+    /** @var string $query Texte de la requête */
2915
+    public $query = '';
2916
+    /** @var string $prefixe Préfixe des tables */
2917
+    public $prefixe = '';
2918
+    /** @var string $sqlite_version Version de sqlite (2 ou 3) */
2919
+    public $sqlite_version = '';
2920
+
2921
+    /** Pour les corrections à effectuer sur les requêtes : array(code=>'texte') trouvé
2922
+     *
2923
+     * @var array
2924
+     */
2925
+    public $textes = array();
2926
+
2927
+    /**
2928
+     * Constructeur
2929
+     *
2930
+     * @param string $query Requête à préparer
2931
+     * @param string $prefixe Prefixe des tables à utiliser
2932
+     * @param string $sqlite_version Version SQLite (2 ou 3)
2933
+     */
2934
+    public function __construct($query, $prefixe, $sqlite_version) {
2935
+        $this->query = $query;
2936
+        $this->prefixe = $prefixe;
2937
+        $this->sqlite_version = $sqlite_version;
2938
+    }
2939
+
2940
+    /**
2941
+     * Transformer la requete pour SQLite
2942
+     *
2943
+     * Enlève les textes, transforme la requête pour quelle soit
2944
+     * bien interprétée par SQLite, puis remet les textes
2945
+     * la fonction affecte `$this->query`
2946
+     */
2947
+    public function traduire_requete() {
2948
+        //
2949
+        // 1) Protection des textes en les remplacant par des codes
2950
+        //
2951
+        // enlever les 'textes' et initialiser avec
2952
+        list($this->query, $textes) = query_echappe_textes($this->query);
2953
+
2954
+        //
2955
+        // 2) Corrections de la requete
2956
+        //
2957
+        // Correction Create Database
2958
+        // Create Database -> requete ignoree
2959
+        if (strpos($this->query, 'CREATE DATABASE') === 0) {
2960
+            spip_log("Sqlite : requete non executee -> $this->query", 'sqlite.' . _LOG_AVERTISSEMENT);
2961
+            $this->query = "SELECT 1";
2962
+        }
2963
+
2964
+        // Correction Insert Ignore
2965
+        // INSERT IGNORE -> insert (tout court et pas 'insert or replace')
2966
+        if (strpos($this->query, 'INSERT IGNORE') === 0) {
2967
+            spip_log("Sqlite : requete transformee -> $this->query", 'sqlite.' . _LOG_DEBUG);
2968
+            $this->query = 'INSERT ' . substr($this->query, '13');
2969
+        }
2970
+
2971
+        // Correction des dates avec INTERVAL
2972
+        // utiliser sql_date_proche() de preference
2973
+        if (strpos($this->query, 'INTERVAL') !== false) {
2974
+            $this->query = preg_replace_callback("/DATE_(ADD|SUB)(.*)INTERVAL\s+(\d+)\s+([a-zA-Z]+)\)/U",
2975
+                array(&$this, '_remplacerDateParTime'),
2976
+                $this->query);
2977
+        }
2978
+
2979
+        if (strpos($this->query, 'LEFT(') !== false) {
2980
+            $this->query = str_replace('LEFT(', '_LEFT(', $this->query);
2981
+        }
2982
+
2983
+        if (strpos($this->query, 'TIMESTAMPDIFF(') !== false) {
2984
+            $this->query = preg_replace('/TIMESTAMPDIFF\(\s*([^,]*)\s*,/Uims', "TIMESTAMPDIFF('\\1',", $this->query);
2985
+        }
2986
+
2987
+
2988
+        // Correction Using
2989
+        // USING (non reconnu en sqlite2)
2990
+        // problematique car la jointure ne se fait pas du coup.
2991
+        if (($this->sqlite_version == 2) && (strpos($this->query, "USING") !== false)) {
2992
+            spip_log("'USING (champ)' n'est pas reconnu en SQLite 2. Utilisez 'ON table1.champ = table2.champ'",
2993
+                'sqlite.' . _LOG_ERREUR);
2994
+            $this->query = preg_replace('/USING\s*\([^\)]*\)/', '', $this->query);
2995
+        }
2996
+
2997
+        // Correction Field
2998
+        // remplace FIELD(table,i,j,k...) par CASE WHEN table=i THEN n ... ELSE 0 END
2999
+        if (strpos($this->query, 'FIELD') !== false) {
3000
+            $this->query = preg_replace_callback('/FIELD\s*\(([^\)]*)\)/',
3001
+                array(&$this, '_remplacerFieldParCase'),
3002
+                $this->query);
3003
+        }
3004
+
3005
+        // Correction des noms de tables FROM
3006
+        // mettre les bons noms de table dans from, update, insert, replace...
3007
+        if (preg_match('/\s(SET|VALUES|WHERE|DATABASE)\s/iS', $this->query, $regs)) {
3008
+            $suite = strstr($this->query, $regs[0]);
3009
+            $this->query = substr($this->query, 0, -strlen($suite));
3010
+        } else {
3011
+            $suite = '';
3012
+        }
3013
+        $pref = ($this->prefixe) ? $this->prefixe . "_" : "";
3014
+        $this->query = preg_replace('/([,\s])spip_/S', '\1' . $pref, $this->query) . $suite;
3015
+
3016
+        // Correction zero AS x
3017
+        // pg n'aime pas 0+x AS alias, sqlite, dans le meme style, 
3018
+        // n'apprecie pas du tout SELECT 0 as x ... ORDER BY x
3019
+        // il dit que x ne doit pas être un integer dans le order by !
3020
+        // on remplace du coup x par vide() dans ce cas uniquement
3021
+        //
3022
+        // apparait dans public/vertebrer.php et dans le plugin menu aussi qui genere aussi ce genre de requete via un {par num #GET{tri_num}}
3023
+        // mais est-ce encore un soucis pour sqlite en 2021 ? (ie commenter le preg_replace marche très bien en sqlite 3.28)
3024
+        if ((strpos($this->query, "0 AS") !== false)) {
3025
+            // on ne remplace que dans ORDER BY ou GROUP BY
3026
+            if (preg_match('/\s(ORDER|GROUP) BY\s/i', $this->query, $regs)) {
3027
+                $suite = strstr($this->query, $regs[0]);
3028
+                $this->query = substr($this->query, 0, -strlen($suite));
3029
+
3030
+                // on cherche les noms des x dans 0 AS x
3031
+                // on remplace dans $suite le nom par vide()
3032
+                preg_match_all('/\b0 AS\s*([^\s,]+)/', $this->query, $matches, PREG_PATTERN_ORDER);
3033
+                foreach ($matches[1] as $m) {
3034
+                    if (strpos($suite, $m) !== false) {
3035
+                        $suite = preg_replace(",\b$m\b,", 'VIDE()', $suite);
3036
+                    }
3037
+                }
3038
+                $this->query .= $suite;
3039
+            }
3040
+        }
3041
+
3042
+        // Correction possible des divisions entieres
3043
+        // Le standard SQL (lequel? ou?) semble indiquer que
3044
+        // a/b=c doit donner c entier si a et b sont entiers 4/3=1.
3045
+        // C'est ce que retournent effectivement SQL Server et SQLite
3046
+        // Ce n'est pas ce qu'applique MySQL qui retourne un reel : 4/3=1.333...
3047
+        // 
3048
+        // On peut forcer la conversion en multipliant par 1.0 avant la division
3049
+        // /!\ SQLite 3.5.9 Debian/Ubuntu est victime d'un bug en plus ! 
3050
+        // cf. https://bugs.launchpad.net/ubuntu/+source/sqlite3/+bug/254228
3051
+        //     http://www.sqlite.org/cvstrac/tktview?tn=3202
3052
+        // (4*1.0/3) n'est pas rendu dans ce cas !
3053
+        # $this->query = str_replace('/','* 1.00 / ',$this->query);
3054
+
3055
+
3056
+        // Correction critere REGEXP, non reconnu en sqlite2
3057
+        if (($this->sqlite_version == 2) && (strpos($this->query, 'REGEXP') !== false)) {
3058
+            $this->query = preg_replace('/([^\s\(]*)(\s*)REGEXP(\s*)([^\s\)]*)/', 'REGEXP($4, $1)', $this->query);
3059
+        }
3060
+
3061
+        //
3062
+        // 3) Remise en place des textes d'origine
3063
+        //
3064
+        // Correction Antiquotes et echappements
3065
+        // ` => rien
3066
+        if (strpos($this->query, '`') !== false) {
3067
+            $this->query = str_replace('`', '', $this->query);
3068
+        }
3069
+
3070
+        $this->query = query_reinjecte_textes($this->query, $textes);
3071
+
3072
+        return $this->query;
3073
+    }
3074
+
3075
+
3076
+    /**
3077
+     * Callback pour remplacer `DATE_` / `INTERVAL`
3078
+     * par `DATE ... strtotime`
3079
+     *
3080
+     * @param array $matches Captures
3081
+     * @return string Texte de date compris par SQLite
3082
+     */
3083
+    public function _remplacerDateParTime($matches) {
3084
+        $op = strtoupper($matches[1] == 'ADD') ? '+' : '-';
3085
+
3086
+        return "datetime$matches[2] '$op$matches[3] $matches[4]')";
3087
+    }
3088
+
3089
+    /**
3090
+     * Callback pour remplacer `FIELD(table,i,j,k...)`
3091
+     * par `CASE WHEN table=i THEN n ... ELSE 0 END`
3092
+     *
3093
+     * @param array $matches Captures
3094
+     * @return string Texte de liste ordonnée compris par SQLite
3095
+     */
3096
+    public function _remplacerFieldParCase($matches) {
3097
+        $fields = substr($matches[0], 6, -1); // ne recuperer que l'interieur X de field(X)
3098
+        $t = explode(',', $fields);
3099
+        $index = array_shift($t);
3100
+
3101
+        $res = '';
3102
+        $n = 0;
3103
+        foreach ($t as $v) {
3104
+            $n++;
3105
+            $res .= "\nWHEN $index=$v THEN $n";
3106
+        }
3107
+
3108
+        return "CASE $res ELSE 0 END ";
3109
+    }
3110 3110
 
3111 3111
 }
Please login to merge, or discard this patch.