3 /***************************************************************************\
4 * SPIP, Systeme de publication pour l'internet *
6 * Copyright (c) 2001-2014 *
7 * Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James *
9 * Ce programme est un logiciel libre distribue sous licence GNU/GPL. *
10 * Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne. *
11 \***************************************************************************/
13 if (!defined('_ECRIRE_INC_VERSION')) return;
15 define('_DEFAULT_DB', 'spip');
17 // Se connecte et retourne le nom de la fonction a connexion persistante
18 // A la premiere connexion de l'installation (BD pas precisee)
19 // si on ne peut se connecter sans la preciser
20 // on reessaye avec le login comme nom de BD
21 // et si ca marche toujours pas, avec "spip" (constante ci-dessus)
22 // si ca ne marche toujours pas, echec.
24 // http://doc.spip.org/@req_pg_dist
25 function req_pg_dist($addr, $port, $login, $pass, $db='', $prefixe='') {
26 static $last_connect = array();
27 if (!charger_php_extension('pgsql')) return false;
29 // si provient de selectdb
30 if (empty($addr) && empty($port) && empty($login) && empty($pass)){
31 foreach (array('addr','port','login','pass','prefixe') as $a){
32 $
$a = $last_connect[$a];
35 @list
($host, $p) = explode(';', $addr);
36 if ($p >0) $port = " port=$p" ; else $port = '';
38 @$link = pg_connect("host=$host$port dbname=$db user=$login password=$pass", PGSQL_CONNECT_FORCE_NEW
);
39 } elseif (!@$link = pg_connect("host=$host$port user=$login password=$pass", PGSQL_CONNECT_FORCE_NEW
)) {
40 if (@$link = pg_connect("host=$host$port dbname=$login user=$login password=$pass", PGSQL_CONNECT_FORCE_NEW
)) {
44 $link = pg_connect("host=$host$port dbname=$db user=$login password=$pass", PGSQL_CONNECT_FORCE_NEW
);
49 $last_connect = array (
55 'prefixe' => $prefixe,
58 # spip_log("Connexion vers $host, base $db, prefixe $prefixe "
59 # . ($link ? 'operationnelle' : 'impossible'));
61 return !$link ?
false : array(
63 'prefixe' => $prefixe ?
$prefixe : $db,
68 $GLOBALS['spip_pg_functions_1'] = array(
69 'alter' => 'spip_pg_alter',
70 'count' => 'spip_pg_count',
71 'countsel' => 'spip_pg_countsel',
72 'create' => 'spip_pg_create',
73 'create_base' => 'spip_pg_create_base',
74 'create_view' => 'spip_pg_create_view',
75 'date_proche' => 'spip_pg_date_proche',
76 'delete' => 'spip_pg_delete',
77 'drop_table' => 'spip_pg_drop_table',
78 'drop_view' => 'spip_pg_drop_view',
79 'errno' => 'spip_pg_errno',
80 'error' => 'spip_pg_error',
81 'explain' => 'spip_pg_explain',
82 'fetch' => 'spip_pg_fetch',
83 'seek' => 'spip_pg_seek',
84 'free' => 'spip_pg_free',
85 'hex' => 'spip_pg_hex',
87 'insert' => 'spip_pg_insert',
88 'insertq' => 'spip_pg_insertq',
89 'insertq_multi' => 'spip_pg_insertq_multi',
90 'listdbs' => 'spip_pg_listdbs',
91 'multi' => 'spip_pg_multi',
92 'optimize' => 'spip_pg_optimize',
93 'query' => 'spip_pg_query',
94 'quote' => 'spip_pg_quote',
95 'replace' => 'spip_pg_replace',
96 'replace_multi' => 'spip_pg_replace_multi',
97 'select' => 'spip_pg_select',
98 'selectdb' => 'spip_pg_selectdb',
99 'set_connect_charset' => 'spip_pg_set_connect_charset',
100 'showbase' => 'spip_pg_showbase',
101 'showtable' => 'spip_pg_showtable',
102 'update' => 'spip_pg_update',
103 'updateq' => 'spip_pg_updateq',
106 // Par ou ca passe une fois les traductions faites
107 // http://doc.spip.org/@spip_pg_trace_query
108 function spip_pg_trace_query($query, $serveur='')
110 $connexion = &$GLOBALS['connexions'][$serveur ?
strtolower($serveur) : 0];
111 $prefixe = $connexion['prefixe'];
112 $link = $connexion['link'];
113 $db = $connexion['db'];
115 if (isset($_GET['var_profile'])) {
116 include_spip('public/tracer');
117 $t = trace_query_start();
120 $connexion['last'] = $query;
121 $r = spip_pg_query_simple($link, $query);
123 if ($e = spip_pg_errno($serveur)) // Log de l'erreur eventuelle
124 $e .= spip_pg_error($query, $serveur); // et du fautif
125 return $t ?
trace_query_end($query, $t, $r, $e, $serveur) : $r;
128 // Fonction de requete generale quand on est sur que c'est SQL standard.
129 // Elle change juste le noms des tables ($table_prefix) dans le FROM etc
131 // http://doc.spip.org/@spip_pg_query
132 function spip_pg_query($query, $serveur='',$requeter=true)
134 $connexion = &$GLOBALS['connexions'][$serveur ?
strtolower($serveur) : 0];
135 $prefixe = $connexion['prefixe'];
136 $link = $connexion['link'];
137 $db = $connexion['db'];
139 if (preg_match('/\s(SET|VALUES|WHERE|DATABASE)\s/i', $query, $regs)) {
140 $suite = strstr($query, $regs[0]);
141 $query = substr($query, 0, -strlen($suite));
143 $query = preg_replace('/([,\s])spip_/', '\1'.$prefixe.'_', $query) . $suite;
145 // renvoyer la requete inerte si demandee
146 if (!$requeter) return $query;
148 return spip_pg_trace_query($query, $serveur);
151 function spip_pg_query_simple($link, $query){
152 #spip_log(var_export($query,true), 'pg_queries');
153 return pg_query($link, $query);
157 * Retrouver les champs 'timestamp'
158 * pour les ajouter aux 'insert' ou 'replace'
159 * afin de simuler le fonctionnement de mysql
161 * stocke le resultat pour ne pas faire
162 * de requetes showtable intempestives
164 function spip_pg_ajouter_champs_timestamp($table, $couples, $desc='', $serveur=''){
165 static $tables = array();
167 if (!isset($tables[$table])){
170 $f = charger_fonction('trouver_table', 'base');
171 $desc = $f($table, $serveur);
172 // si pas de description, on ne fait rien, ou on die() ?
173 if (!$desc) return $couples;
176 // recherche des champs avec simplement 'TIMESTAMP'
177 // cependant, il faudra peut etre etendre
178 // avec la gestion de DEFAULT et ON UPDATE
179 // mais ceux-ci ne sont pas utilises dans le core
180 $tables[$table] = array();
181 foreach ($desc['field'] as $k=>$v){
182 if (strpos(strtolower(ltrim($v)), 'timestamp')===0)
183 $tables[$table][] = $k;
187 // ajout des champs type 'timestamp' absents
188 foreach ($tables[$table] as $maj){
189 if (!array_key_exists($maj, $couples))
190 $couples[$maj] = "NOW()";
196 // Alter en PG ne traite pas les index
197 // http://doc.spip.org/@spip_pg_alter
198 function spip_pg_alter($query, $serveur='',$requeter=true) {
199 // il faudrait une regexp pour eviter de spliter ADD PRIMARY KEY (colA, colB)
200 // tout en cassant en deux alter distincts "ADD PRIMARY KEY (colA, colB), ADD INDEX (chose)"...
201 // ou revoir l'api de sql_alter en creant un
202 // sql_alter_table($table,array($actions));
203 if (!preg_match("/\s*((\s*IGNORE)?\s*TABLE\s*([^\s]*))\s*(.*)?/is", $query, $regs)){
204 spip_log("$query mal comprise", 'pg');
210 $todo = explode(',', $suite);
211 // on remet les morceaux dechires ensembles... que c'est laid !
212 $todo2 = array(); $i=0;
214 while ($do = array_shift($todo)) {
215 $todo2[$i] = isset($todo2[$i]) ?
$todo2[$i] . "," . $do : $do;
216 $o=(false!==strpos($do,"("));
217 $f=(false!==strpos($do,")"));
218 if ($o AND !$f) $ouverte=true;
219 elseif ($f) $ouverte=false;
223 $query = $debut.' '.array_shift($todo);
225 if (!preg_match('/^\s*(IGNORE\s*)?TABLE\s+(\w+)\s+(ADD|DROP|CHANGE|MODIFY|RENAME)\s*(.*)$/is', $query, $r)) {
226 spip_log("$query incompris", 'pg');
228 if ($r[1]) spip_log("j'ignore IGNORE dans $query", 'pg');
229 $f = 'spip_pg_alter_' . strtolower($r[3]);
230 if (function_exists($f))
231 $f($r[2], $r[4], $serveur, $requeter);
232 else spip_log("$query non prevu", 'pg');
234 // Alter a plusieurs args. Faudrait optimiser.
236 spip_pg_alter("TABLE $table " . join(',',$todo));
240 // http://doc.spip.org/@spip_pg_alter_change
241 function spip_pg_alter_change($table, $arg, $serveur='',$requeter=true)
243 if (!preg_match('/^`?(\w+)`?\s+`?(\w+)`?\s+(.*?)\s*(DEFAULT .*?)?(NOT\s+NULL)?\s*(DEFAULT .*?)?$/i',$arg, $r)) {
244 spip_log("alter change: $arg incompris", 'pg');
246 list(,$old, $new, $type, $default, $null, $def2) = $r;
247 $actions = array("ALTER $old TYPE " . mysql2pg_type($type));
249 $actions[]= "ALTER $old SET NOT NULL";
251 $actions[]= "ALTER $old DROP NOT NULL";
253 if ($d = ($default ?
$default : $def2))
254 $actions[]= "ALTER $old SET $d";
256 $actions[]= "ALTER $old DROP DEFAULT";
258 spip_pg_query("ALTER TABLE $table " . join(', ', $actions));
261 spip_pg_query("ALTER TABLE $table RENAME $old TO $new", $serveur);
265 // http://doc.spip.org/@spip_pg_alter_add
266 function spip_pg_alter_add($table, $arg, $serveur='',$requeter=true) {
267 if (!preg_match('/^(COLUMN|INDEX|KEY|PRIMARY\s+KEY|)\s*(.*)$/', $arg, $r)) {
268 spip_log("alter add $arg incompris", 'pg');
271 if (!$r[1] OR $r[1]=='COLUMN') {
272 preg_match('/`?(\w+)`?(.*)/',$r[2], $m);
273 if (preg_match('/^(.*)(BEFORE|AFTER|FIRST)(.*)$/is', $m[2], $n)) {
276 return spip_pg_query("ALTER TABLE $table ADD " . $m[1] . ' ' . mysql2pg_type($m[2]), $serveur, $requeter);
277 } elseif ($r[1][0] == 'P') {
278 // la primary peut etre sur plusieurs champs
279 $r[2] = trim(str_replace('`','',$r[2]));
280 $m = ($r[2][0]=='(') ?
substr($r[2],1,-1) : $r[2];
281 return spip_pg_query("ALTER TABLE $table ADD CONSTRAINT $table" .'_pkey PRIMARY KEY (' . $m . ')', $serveur, $requeter);
283 preg_match('/([^\s,]*)\s*(.*)?/',$r[2], $m);
284 // peut etre "(colonne)" ou "nom_index (colonnes)"
285 // bug potentiel si qqn met "(colonne, colonne)"
287 // nom_index (colonnes)
289 $colonnes = substr($m[2],1,-1);
294 if ($m[1][0] == "(") {
295 $colonnes = substr($m[1],1,-1);
296 if (false!==strpos(",",$colonnes)) {
297 spip_log("PG : Erreur, impossible de creer un index sur plusieurs colonnes"
298 ." sans qu'il ait de nom ($table, ($colonnes))", 'pg');
301 $nom_index = $colonnes;
306 $nom_index = $colonnes = $m[1];
309 return spip_pg_create_index($nom_index, $table, $colonnes, $serveur, $requeter);
313 // http://doc.spip.org/@spip_pg_alter_drop
314 function spip_pg_alter_drop($table, $arg, $serveur='',$requeter=true) {
315 if (!preg_match('/^(COLUMN|INDEX|KEY|PRIMARY\s+KEY|)\s*`?(\w*)`?/', $arg, $r))
316 spip_log("alter drop: $arg incompris", 'pg');
318 if (!$r[1] OR $r[1]=='COLUMN')
319 return spip_pg_query("ALTER TABLE $table DROP " . $r[2], $serveur);
320 elseif ($r[1][0] == 'P')
321 return spip_pg_query("ALTER TABLE $table DROP CONSTRAINT $table" . '_pkey', $serveur);
323 return spip_pg_query("DROP INDEX " . $table . '_' . $r[2], $serveur);
328 function spip_pg_alter_modify($table, $arg, $serveur='',$requeter=true) {
329 if (!preg_match('/^`?(\w+)`?\s+(.*)$/',$arg, $r)) {
330 spip_log("alter modify: $arg incompris", 'pg');
332 return spip_pg_alter_change($table, $r[1].' '.$arg, $serveur='',$requeter=true);
336 // attention (en pg) :
337 // - alter table A rename to X = changer le nom de la table
338 // - alter table A rename X to Y = changer le nom de la colonne X en Y
339 // pour l'instant, traiter simplement RENAME TO X
340 function spip_pg_alter_rename($table, $arg, $serveur='',$requeter=true) {
342 // si TO, mais pas au debut
343 if (!stripos($arg,'TO ')){
346 elseif (preg_match('/^(TO)\s*`?(\w*)`?/', $arg, $r)) {
349 spip_log("alter rename: $arg incompris", 'pg');
351 return $rename?
spip_pg_query("ALTER TABLE $table RENAME TO $rename"):false;
356 * Fonction de creation d'un INDEX
358 * @param string $nom : nom de l'index
359 * @param string $table : table sql de l'index
360 * @param string/array $champs : liste de champs sur lesquels s'applique l'index
361 * @param string $serveur : nom de la connexion sql utilisee
362 * @param bool $requeter : true pour executer la requete ou false pour retourner le texte de la requete
364 * @return bool ou requete
366 function spip_pg_create_index($nom, $table, $champs, $serveur='', $requeter=true) {
367 if (!($nom OR $table OR $champs)) {
368 spip_log("Champ manquant pour creer un index pg ($nom, $table, (".@join
(',',$champs)."))","pg");
372 $nom = str_replace("`","",$nom);
373 $champs = str_replace("`","",$champs);
375 // PG ne differentie pas noms des index en fonction des tables
376 // il faut donc creer des noms uniques d'index pour une base pg
377 $nom = $table.'_'.$nom;
378 // enlever d'eventuelles parentheses deja presentes sur champs
379 if (!is_array($champs)){
380 if ($champs[0]=="(") $champs = substr($champs,1,-1);
381 $champs = array($champs);
383 $query = "CREATE INDEX $nom ON $table (" . join(',',$champs) . ")";
384 if (!$requeter) return $query;
385 $res = spip_pg_query($query, $serveur, $requeter);
390 // http://doc.spip.org/@spip_pg_explain
391 function spip_pg_explain($query, $serveur='',$requeter=true){
392 if (strpos(ltrim($query), 'SELECT') !== 0) return array();
393 $connexion = &$GLOBALS['connexions'][$serveur ?
strtolower($serveur) : 0];
394 $prefixe = $connexion['prefixe'];
395 $link = $connexion['link'];
396 if (preg_match('/\s(SET|VALUES|WHERE)\s/i', $query, $regs)) {
397 $suite = strstr($query, $regs[0]);
398 $query = substr($query, 0, -strlen($suite));
400 $query = 'EXPLAIN ' . preg_replace('/([,\s])spip_/', '\1'.$prefixe.'_', $query) . $suite;
402 if (!$requeter) return $query;
403 $r = spip_pg_query_simple($link,$query);
404 return spip_pg_fetch($r, NULL, $serveur);
407 // http://doc.spip.org/@spip_pg_selectdb
408 function spip_pg_selectdb($db, $serveur='',$requeter=true) {
409 // se connecter a la base indiquee
410 // avec les identifiants connus
411 $index = $serveur ?
strtolower($serveur) : 0;
413 if ($link = spip_connect_db('', '', '', '', $db, 'pg', '', '')){
414 if (($db==$link['db']) && $GLOBALS['connexions'][$index] = $link)
420 // Qu'une seule base pour le moment
422 // http://doc.spip.org/@spip_pg_listdbs
423 function spip_pg_listdbs($serveur) {
424 $connexion = &$GLOBALS['connexions'][$serveur ?
strtolower($serveur) : 0];
425 $link = $connexion['link'];
426 return spip_pg_query_simple($link, "select * From pg_database");
429 // http://doc.spip.org/@spip_pg_select
430 function spip_pg_select($select, $from, $where='',
431 $groupby=array(), $orderby='', $limit='',
432 $having='', $serveur='',$requeter=true){
434 $connexion = &$GLOBALS['connexions'][$serveur ?
strtolower($serveur) : 0];
435 $prefixe = $connexion['prefixe'];
436 $link = $connexion['link'];
437 $db = $connexion['db'];
439 $limit = preg_match("/^\s*(([0-9]+),)?\s*([0-9]+)\s*$/", $limit,$limatch);
441 $offset = $limatch[2];
442 $count = $limatch[3];
445 $select = spip_pg_frommysql($select);
447 // si pas de tri explicitement demande, le GROUP BY ne
448 // contient que la clef primaire.
449 // lui ajouter alors le champ de tri par defaut
450 if (preg_match("/FIELD\(([a-z]+\.[a-z]+),/i", $orderby[0], $groupbyplus)) {
451 $groupby[] = $groupbyplus[1];
454 $orderby = spip_pg_orderby($orderby, $select);
457 if (is_array($having))
458 $having = join("\n\tAND ", array_map('calculer_pg_where', $having));
460 $from = spip_pg_from($from, $prefixe);
461 $query = "SELECT ". $select
462 . (!$from ?
'' : "\nFROM $from")
463 . (!$where ?
'' : ("\nWHERE " . (!is_array($where) ?
calculer_pg_where($where) : (join("\n\tAND ", array_map('calculer_pg_where', $where))))))
464 . spip_pg_groupby($groupby, $from, $select)
465 . (!$having ?
'' : "\nHAVING $having")
466 . ($orderby ?
("\nORDER BY $orderby") :'')
467 . (!$limit ?
'' : (" LIMIT $count" . (!$offset ?
'' : " OFFSET $offset")));
469 // renvoyer la requete inerte si demandee
470 if ($requeter === false) return $query;
472 $r = spip_pg_trace_query($query, $serveur);
473 return $r ?
$r : $query;;
476 // Le traitement des prefixes de table dans un Select se limite au FROM
477 // car le reste de la requete utilise les alias (AS) systematiquement
479 // http://doc.spip.org/@spip_pg_from
480 function spip_pg_from($from, $prefixe)
482 if (is_array($from)) $from = spip_pg_select_as($from);
483 return !$prefixe ?
$from : preg_replace('/(\b)spip_/','\1'.$prefixe.'_', $from);
486 // http://doc.spip.org/@spip_pg_orderby
487 function spip_pg_orderby($order, $select)
490 $arg = (is_array($order) ?
$order : preg_split('/\s*,\s*/',$order));
492 foreach($arg as $v) {
493 if (preg_match('/(case\s+.*?else\s+0\s+end)\s*AS\s+' . $v .'/', $select, $m)) {
498 return spip_pg_frommysql(join(',',$res));
501 // Conversion a l'arrach' des jointures MySQL en jointures PG
502 // A refaire pour tirer parti des possibilites de PG et de MySQL5
503 // et pour enlever les repetitions (sans incidence de perf, mais ca fait sale)
505 // http://doc.spip.org/@spip_pg_groupby
506 function spip_pg_groupby($groupby, $from, $select)
508 $join = strpos($from, ",");
509 if ($join OR $groupby) $join = !is_array($select) ?
$select : join(", ", $select);
511 $join = str_replace('DISTINCT ','',$join);
512 // fct SQL sur colonne et constante apostrophee ==> la colonne
513 $join = preg_replace('/\w+\(\s*([^(),\']*),\s*\'[^\']*\'[^)]*\)/','\\1', $join);
514 $join = preg_replace('/CAST\(\s*([^(),\' ]*\s+)as\s*\w+\)/','\\1', $join);
515 // resultat d'agregat ne sont pas a mettre dans le groupby
516 $join = preg_replace('/(SUM|COUNT|MAX|MIN|UPPER)\([^)]+\)(\s*AS\s+\w+)\s*,?/i','', $join);
517 // idem sans AS (fetch numerique)
518 $join = preg_replace('/(SUM|COUNT|MAX|MIN|UPPER)\([^)]+\)\s*,?/i','', $join);
519 // ne reste plus que les vrais colonnes, et parfois 1 virgule
521 if (preg_match('/^(.*),\s*$/',$join,$m)) $join=$m[1];
523 if (is_array($groupby)) $groupby = join(',',$groupby);
524 if ($join) $groupby = $groupby ?
"$groupby, $join" : $join;
525 if (!$groupby) return '';
527 $groupby = spip_pg_frommysql($groupby);
528 // Ne pas mettre dans le Group-By des valeurs numeriques
529 // issue de prepare_recherche
530 $groupby = preg_replace('/^\s*\d+\s+AS\s+\w+\s*,?\s*/i','', $groupby);
531 $groupby = preg_replace('/,\s*\d+\s+AS\s+\w+\s*/i','', $groupby);
532 $groupby = preg_replace('/\s+AS\s+\w+\s*/i','', $groupby);
534 return "\nGROUP BY $groupby";
537 // Conversion des operateurs MySQL en PG
538 // IMPORTANT: "0+X" est vu comme conversion numerique du debut de X
539 // Les expressions de date ne sont pas gerees au-dela de 3 ()
540 // Le 'as' du 'CAST' est en minuscule pour echapper au dernier preg_replace
541 // de spip_pg_groupby.
544 // http://doc.spip.org/@spip_pg_frommysql
545 function spip_pg_frommysql($arg)
547 if (is_array($arg)) $arg = join(", ", $arg);
549 $res = spip_pg_fromfield($arg);
551 $res = preg_replace('/\brand[(][)]/i','random()', $res);
553 $res = preg_replace('/\b0\.0[+]([a-zA-Z0-9_.]+)\s*/',
554 'CAST(substring(\1, \'^ *[0-9.]+\') as float)',
556 $res = preg_replace('/\b0[+]([a-zA-Z0-9_.]+)\s*/',
557 'CAST(substring(\1, \'^ *[0-9]+\') as int)',
559 $res = preg_replace('/\bconv[(]([^,]*)[^)]*[)]/i',
560 'CAST(substring(\1, \'^ *[0-9]+\') as int)',
563 $res = preg_replace('/UNIX_TIMESTAMP\s*[(]\s*[)]/',
564 ' EXTRACT(epoch FROM NOW())', $res);
566 // la fonction md5(integer) n'est pas connu en pg
567 // il faut donc forcer les types en text (cas de md5(id_article))
568 $res = preg_replace('/md5\s*[(]([^)]*)[)]/i',
569 'MD5(CAST(\1 AS text))', $res);
571 $res = preg_replace('/UNIX_TIMESTAMP\s*[(]([^)]*)[)]/',
572 ' EXTRACT(epoch FROM \1)', $res);
574 $res = preg_replace('/\bDAYOFMONTH\s*[(]([^()]*([(][^()]*[)][^()]*)*[^)]*)[)]/',
575 ' EXTRACT(day FROM \1)',
578 $res = preg_replace('/\bMONTH\s*[(]([^()]*([(][^)]*[)][^()]*)*[^)]*)[)]/',
579 ' EXTRACT(month FROM \1)',
582 $res = preg_replace('/\bYEAR\s*[(]([^()]*([(][^)]*[)][^()]*)*[^)]*)[)]/',
583 ' EXTRACT(year FROM \1)',
586 $res = preg_replace('/TO_DAYS\s*[(]([^()]*([(][^)]*[)][()]*)*)[)]/',
587 ' EXTRACT(day FROM \1 - \'0001-01-01\')',
590 $res = preg_replace("/(EXTRACT[(][^ ]* FROM *)\"([^\"]*)\"/", '\1\'\2\'', $res);
592 $res = preg_replace('/DATE_FORMAT\s*[(]([^,]*),\s*\'%Y%m%d\'[)]/', 'to_char(\1, \'YYYYMMDD\')', $res);
594 $res = preg_replace('/DATE_FORMAT\s*[(]([^,]*),\s*\'%Y%m\'[)]/', 'to_char(\1, \'YYYYMM\')', $res);
596 $res = preg_replace('/DATE_SUB\s*[(]([^,]*),/', '(\1 -', $res);
597 $res = preg_replace('/DATE_ADD\s*[(]([^,]*),/', '(\1 +', $res);
598 $res = preg_replace('/INTERVAL\s+(\d+\s+\w+)/', 'INTERVAL \'\1\'', $res);
599 $res = preg_replace('/([+<>-]=?)\s*(\'\d+-\d+-\d+\s+\d+:\d+(:\d+)\')/', '\1 timestamp \2', $res);
600 $res = preg_replace('/(\'\d+-\d+-\d+\s+\d+:\d+:\d+\')\s*([+<>-]=?)/', 'timestamp \1 \2', $res);
602 $res = preg_replace('/([+<>-]=?)\s*(\'\d+-\d+-\d+\')/', '\1 timestamp \2', $res);
603 $res = preg_replace('/(\'\d+-\d+-\d+\')\s*([+<>-]=?)/', 'timestamp \1 \2', $res);
605 $res = preg_replace('/(timestamp .\d+)-00-/','\1-01-', $res);
606 $res = preg_replace('/(timestamp .\d+-\d+)-00/','\1-01',$res);
607 # correct en theorie mais produit des debordements arithmetiques
608 # $res = preg_replace("/(EXTRACT[(][^ ]* FROM *)(timestamp *'[^']*' *[+-] *timestamp *'[^']*') *[)]/", '\2', $res);
609 $res = preg_replace("/(EXTRACT[(][^ ]* FROM *)('[^']*')/", '\1 timestamp \2', $res);
610 $res = preg_replace("/\sLIKE\s+/", ' ILIKE ', $res);
611 return str_replace('REGEXP', '~', $res);
614 // http://doc.spip.org/@spip_pg_fromfield
615 function spip_pg_fromfield($arg)
617 while(preg_match('/^(.*?)FIELD\s*\(([^,]*)((,[^,)]*)*)\)/', $arg, $m)) {
619 preg_match_all('/,([^,]*)/', $m[3], $r, PREG_PATTERN_ORDER
);
623 foreach($r[1] as $v) {
625 $res .= "\nwhen $index=$v then $n";
627 $arg = $m[1] . "case $res else 0 end "
628 . substr($arg,strlen($m[0]));
633 // http://doc.spip.org/@calculer_pg_where
634 function calculer_pg_where($v)
637 return spip_pg_frommysql($v);
639 $op = str_replace('REGEXP', '~', array_shift($v));
643 $arg = calculer_pg_where(array_shift($v));
647 $arg2 = calculer_pg_where(array_shift($v));
649 return "($arg $op $arg2)";
650 } else return "($arg $op ($arg2) : $v[0])";
656 // http://doc.spip.org/@calculer_pg_expression
657 function calculer_pg_expression($expression, $v, $join = 'AND'){
661 $exp = "\n$expression ";
663 if (!is_array($v)) $v = array($v);
665 if (strtoupper($join) === 'AND')
666 return $exp . join("\n\t$join ", array_map('calculer_pg_where', $v));
668 return $exp . join($join, $v);
671 // http://doc.spip.org/@spip_pg_select_as
672 function spip_pg_select_as($args)
675 foreach($args as $k => $v) {
676 if (substr($k,-1)=='@') {
677 // c'est une jointure qui se refere au from precedent
679 $argsas .= ' ' . $v ;
683 // spip_log("$k : $v");
684 if (!is_numeric($k)) {
685 if (preg_match('/\.(.*)$/', $k, $r))
688 $p = strpos($v, " ");
690 $v = substr($v,0,$p) . " AS $k" . substr($v,$p);
694 // spip_log("subs $k : $v avec $as");
695 // if (strpos($v, 'JOIN') === false) $argsas .= ', ';
696 $argsas .= ', '. $v . $as;
699 return substr($argsas,2) . $join;
702 // http://doc.spip.org/@spip_pg_fetch
703 function spip_pg_fetch($res, $t='', $serveur='',$requeter=true) {
705 if ($res) $res = pg_fetch_array($res, NULL, PGSQL_ASSOC
);
709 function spip_pg_seek($r, $row_number, $serveur='',$requeter=true) {
710 if ($r) return pg_result_seek($r,$row_number);
714 // http://doc.spip.org/@spip_pg_countsel
715 function spip_pg_countsel($from = array(), $where = array(), $groupby=array(),
716 $having = array(), $serveur='',$requeter=true)
718 $c = !$groupby ?
'*' : ('DISTINCT ' . (is_string($groupby) ?
$groupby : join(',', $groupby)));
719 $r = spip_pg_select("COUNT($c)", $from, $where,'', '', '', $having, $serveur, $requeter);
720 if (!$requeter) return $r;
721 if (!is_resource($r)) return 0;
722 list($c) = pg_fetch_array($r, NULL, PGSQL_NUM
);
726 // http://doc.spip.org/@spip_pg_count
727 function spip_pg_count($res, $serveur='',$requeter=true) {
728 return !$res ?
0 : pg_numrows($res);
731 // http://doc.spip.org/@spip_pg_free
732 function spip_pg_free($res, $serveur='',$requeter=true) {
733 // rien a faire en postgres
736 // http://doc.spip.org/@spip_pg_delete
737 function spip_pg_delete($table, $where='', $serveur='',$requeter=true) {
739 $connexion = &$GLOBALS['connexions'][$serveur ?
strtolower($serveur) : 0];
740 $prefixe = $connexion['prefixe'];
741 $link = $connexion['link'];
742 $db = $connexion['db'];
743 if ($prefixe) $table = preg_replace('/^spip/', $prefixe, $table);
745 $query = calculer_pg_expression('DELETE FROM', $table, ',')
746 . calculer_pg_expression('WHERE', $where, 'AND');
748 // renvoyer la requete inerte si demandee
749 if (!$requeter) return $query;
751 $res = spip_pg_trace_query($query, $serveur);
753 return pg_affected_rows($res);
758 // http://doc.spip.org/@spip_pg_insert
759 function spip_pg_insert($table, $champs, $valeurs, $desc=array(), $serveur='',$requeter=true) {
760 $connexion = &$GLOBALS['connexions'][$serveur ?
strtolower($serveur) : 0];
761 $prefixe = $connexion['prefixe'];
762 $link = $connexion['link'];
763 $db = $connexion['db'];
765 if (!$desc) $desc = description_table($table);
766 $seq = spip_pg_sequence($table);
769 $table = preg_replace('/^spip/', $prefixe, $table);
770 $seq = preg_replace('/^spip/', $prefixe, $seq);
772 $ret = !$seq ?
'' : (" RETURNING currval('$seq')");
773 $ins = (strlen($champs)<3)
775 : "$champs VALUES $valeurs";
777 $q ="INSERT INTO $table $ins $ret";
778 if (!$requeter) return $q;
779 $connexion['last'] = $q;
782 $r = spip_pg_query_simple($link, $q);
786 if ($r2 = pg_fetch_array($r, NULL, PGSQL_NUM
))
792 // http://doc.spip.org/@spip_pg_insertq
793 function spip_pg_insertq($table, $couples=array(), $desc=array(), $serveur='',$requeter=true) {
795 if (!$desc) $desc = description_table($table);
796 if (!$desc) die("$table insertion sans description");
797 $fields = $desc['field'];
799 foreach ($couples as $champ => $val) {
800 $couples[$champ]= spip_pg_cite($val, $fields[$champ]);
803 // recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
804 $couples = spip_pg_ajouter_champs_timestamp($table, $couples, $desc, $serveur);
806 return spip_pg_insert($table, "(".join(',',array_keys($couples)).")", "(".join(',', $couples).")", $desc, $serveur, $requeter);
811 // http://doc.spip.org/@spip_pg_insertq_multi
812 function spip_pg_insertq_multi($table, $tab_couples=array(), $desc=array(), $serveur='',$requeter=true) {
814 if (!$desc) $desc = description_table($table);
815 if (!$desc) die("$table insertion sans description");
816 $fields = isset($desc['field'])?
$desc['field']:array();
818 // recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
819 // une premiere fois pour ajouter maj dans les cles
821 $c = isset($tab_couples[0]) ?
$tab_couples[0] : array();
822 $les_cles = spip_pg_ajouter_champs_timestamp($table, $c, $desc, $serveur);
824 $cles = "(" . join(',',array_keys($les_cles)). ')';
826 foreach ($tab_couples as $couples) {
827 foreach ($couples as $champ => $val){
828 $couples[$champ]= spip_pg_cite($val, $fields[$champ]);
830 // recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
831 $couples = spip_pg_ajouter_champs_timestamp($table, $couples, $desc, $serveur);
833 $valeurs[] = '(' .join(',', $couples) . ')';
835 $valeurs = implode(', ',$valeurs);
837 return spip_pg_insert($table, $cles, $valeurs, $desc, $serveur, $requeter);
841 // http://doc.spip.org/@spip_pg_update
842 function spip_pg_update($table, $couples, $where='', $desc='', $serveur='',$requeter=true) {
844 if (!$couples) return;
845 $connexion = $GLOBALS['connexions'][$serveur ?
strtolower($serveur) : 0];
846 $prefixe = $connexion['prefixe'];
847 $link = $connexion['link'];
848 $db = $connexion['db'];
849 if ($prefixe) $table = preg_replace('/^spip/', $prefixe, $table);
851 // recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
852 $couples = spip_pg_ajouter_champs_timestamp($table, $couples, $desc, $serveur);
855 foreach ($couples as $champ => $val) {
856 $set[] = $champ . '=' . $val;
859 $query = calculer_pg_expression('UPDATE', $table, ',')
860 . calculer_pg_expression('SET', $set, ',')
861 . calculer_pg_expression('WHERE', $where, 'AND');
863 // renvoyer la requete inerte si demandee
864 if (!$requeter) return $query;
866 return spip_pg_trace_query($query, $serveur);
869 // idem, mais les valeurs sont des constantes a mettre entre apostrophes
870 // sauf les expressions de date lorsqu'il s'agit de fonctions SQL (NOW etc)
871 // http://doc.spip.org/@spip_pg_updateq
872 function spip_pg_updateq($table, $couples, $where='', $desc=array(), $serveur='',$requeter=true) {
873 if (!$couples) return;
874 if (!$desc) $desc = description_table($table);
875 $fields = $desc['field'];
876 foreach ($couples as $k => $val) {
877 $couples[$k] = spip_pg_cite($val, $fields[$k]);
880 return spip_pg_update($table, $couples, $where, $desc, $serveur, $requeter);
884 // http://doc.spip.org/@spip_pg_replace
885 function spip_pg_replace($table, $values, $desc, $serveur='',$requeter=true) {
886 if (!$values) {spip_log("replace vide $table"); return 0;}
887 $connexion = &$GLOBALS['connexions'][$serveur ?
strtolower($serveur) : 0];
888 $prefixe = $connexion['prefixe'];
889 $link = $connexion['link'];
890 $db = $connexion['db'];
892 if (!$desc) $desc = description_table($table);
893 if (!$desc) die("$table insertion sans description");
894 $prim = $desc['key']['PRIMARY KEY'];
895 $ids = preg_split('/,\s*/', $prim);
896 $noprims = $prims = array();
897 foreach($values as $k=>$v) {
898 $values[$k] = $v = spip_pg_cite($v, $desc['field'][$k]);
900 if (!in_array($k, $ids))
901 $noprims[$k]= "$k=$v";
902 else $prims[$k]= "$k=$v";
905 // recherche de champs 'timestamp' pour mise a jour auto de ceux-ci
906 $values = spip_pg_ajouter_champs_timestamp($table, $values, $desc, $serveur);
908 $where = join(' AND ', $prims);
910 return spip_pg_insert($table, "(".join(',',array_keys($values)).")", "(".join(',', $values).")", $desc, $serveur);
912 $couples = join(',', $noprims);
914 $seq = spip_pg_sequence($table);
916 $table = preg_replace('/^spip/', $prefixe, $table);
917 $seq = preg_replace('/^spip/', $prefixe, $seq);
920 $connexion['last'] = $q = "UPDATE $table SET $couples WHERE $where";
922 $couples = spip_pg_query_simple($link, $q);
924 if (!$couples) return false;
925 $couples = pg_affected_rows($couples);
929 (" RETURNING nextval('$seq') < $prim");
930 $connexion['last'] = $q = "INSERT INTO $table (" . join(',',array_keys($values)) . ') VALUES (' .join(',', $values) . ")$ret";
931 $couples = spip_pg_query_simple($link, $q);
935 $r = pg_fetch_array($couples, NULL, PGSQL_NUM
);
937 $connexion['last'] = $q = "SELECT setval('$seq', $prim) from $table";
938 // Le code de SPIP met parfois la sequence a 0 (dans l'import)
939 // MySQL n'en dit rien, on fait pareil pour PG
940 $r = @pg_query
($link, $q);
949 // http://doc.spip.org/@spip_pg_replace_multi
950 function spip_pg_replace_multi($table, $tab_couples, $desc=array(), $serveur='',$requeter=true) {
951 // boucler pour traiter chaque requete independemment
952 foreach ($tab_couples as $couples){
953 $retour = spip_pg_replace($table, $couples, $desc, $serveur,$requeter);
955 // renvoie le dernier id
961 // Donne la sequence eventuelle associee a une table
962 // Pas extensible pour le moment,
964 // http://doc.spip.org/@spip_pg_sequence
965 function spip_pg_sequence($table)
967 global $tables_principales;
968 include_spip('base/serial');
969 if (!isset($tables_principales[$table])) return false;
970 $desc = $tables_principales[$table];
971 $prim = @$desc['key']['PRIMARY KEY'];
972 if (!preg_match('/^\w+$/', $prim)
973 OR strpos($desc['field'][$prim], 'int') === false)
975 else { return $table . '_' . $prim . "_seq";}
978 // Explicite les conversions de Mysql d'une valeur $v de type $t
979 // Dans le cas d'un champ date, pas d'apostrophe, c'est une syntaxe ad hoc
981 // http://doc.spip.org/@spip_pg_cite
982 function spip_pg_cite($v, $t)
984 if (sql_test_date($t)) {
985 if ($v AND (strpos("0123456789", $v[0]) === false))
986 return spip_pg_frommysql($v);
988 if (strpos($v, "-00-00") <= 4) {
989 $annee = substr($v,0,4);
990 if (!intval($annee)) $annee = '0001';
991 $v = $annee ."-01-01".substr($v,10);
993 return "timestamp '$v'";
996 elseif (!sql_test_int($t))
997 return ("'" . addslashes($v) . "'");
998 elseif (is_numeric($v) OR (strpos($v, 'CAST(') === 0))
1000 elseif ($v[0]== '0' AND $v[1]!=='x' AND ctype_xdigit(substr($v,1)))
1001 return substr($v,1);
1003 spip_log("Warning: '$v' n'est pas de type $t", 'pg');
1008 // http://doc.spip.org/@spip_pg_hex
1009 function spip_pg_hex($v)
1011 return "CAST(x'" . $v . "' as bigint)";
1014 function spip_pg_quote($v, $type='')
1016 return ($type === 'int' AND !$v) ?
'0' :
1017 (is_numeric($v) ?
strval($v) :
1018 (!is_array($v) ?
("'" . pg_escape_string($v) . "'")
1019 : join(",", array_map('_q', $v))));
1022 function spip_pg_date_proche($champ, $interval, $unite)
1026 . (($interval <= 0) ?
'>' : '<')
1027 . (($interval <= 0) ?
'DATE_SUB' : 'DATE_ADD')
1029 . sql_quote(date('Y-m-d H:i:s'))
1031 . (($interval > 0) ?
$interval : (0-$interval))
1037 // http://doc.spip.org/@spip_pg_in
1038 function spip_pg_in($val, $valeurs, $not='', $serveur) {
1040 // IN (...) souvent limite a 255 elements, d'ou cette fonction assistante
1042 // s'il n'y a pas de valeur, eviter de produire un IN vide: PG rale.
1043 if (!$valeurs) return $not ?
'0=0' : '0=1';
1044 if (strpos($valeurs, "CAST(x'") !== false)
1045 return "($val=" . join("OR $val=", explode(',',$valeurs)).')';
1048 while ($n = strpos($valeurs, ',', $n+
1)) {
1049 if ((++
$i) >= 255) {
1050 $in_sql .= "($val $not IN (" .
1051 substr($valeurs, 0, $n) .
1053 ($not ?
"AND\t" : "OR\t");
1054 $valeurs = substr($valeurs, $n+
1);
1058 $in_sql .= "($val $not IN ($valeurs))";
1063 // http://doc.spip.org/@spip_pg_error
1064 function spip_pg_error($query='', $serveur, $requeter=true) {
1065 $link = $GLOBALS['connexions'][$serveur ?
strtolower($serveur) : 0]['link'];
1066 $s = $link ?
pg_last_error($link) : pg_last_error();
1068 $s = str_replace('ERROR', 'errcode: 1000 ', $s);
1069 spip_log("$s - $query", 'pg.'._LOG_ERREUR
);
1074 // http://doc.spip.org/@spip_pg_errno
1075 function spip_pg_errno($serveur='') {
1076 // il faudrait avoir la derniere ressource retournee et utiliser
1077 // http://fr2.php.net/manual/fr/function.pg-result-error.php
1081 // http://doc.spip.org/@spip_pg_drop_table
1082 function spip_pg_drop_table($table, $exist='', $serveur='',$requeter=true)
1084 if ($exist) $exist =" IF EXISTS";
1085 if (spip_pg_query("DROP TABLE$exist $table", $serveur, $requeter))
1091 // http://doc.spip.org/@spip_pg_drop_view
1092 function spip_pg_drop_view($view, $exist='', $serveur='',$requeter=true) {
1093 if ($exist) $exist =" IF EXISTS";
1094 return spip_pg_query("DROP VIEW$exist $view", $serveur, $requeter);
1097 // http://doc.spip.org/@spip_pg_showbase
1098 function spip_pg_showbase($match, $serveur='',$requeter=true)
1100 $connexion = &$GLOBALS['connexions'][$serveur ?
strtolower($serveur) : 0];
1101 $link = $connexion['link'];
1102 $connexion['last'] = $q = "SELECT tablename FROM pg_tables WHERE tablename ILIKE "._q($match);
1103 return spip_pg_query_simple($link, $q);
1106 // http://doc.spip.org/@spip_pg_showtable
1107 function spip_pg_showtable($nom_table, $serveur='',$requeter=true)
1109 $connexion = &$GLOBALS['connexions'][$serveur ?
strtolower($serveur) : 0];
1110 $link = $connexion['link'];
1111 $connexion['last'] = $q = "SELECT column_name, column_default, data_type FROM information_schema.columns WHERE table_name ILIKE " . _q($nom_table);
1113 $res = spip_pg_query_simple($link, $q);
1114 if (!$res) return false;
1116 // etrangement, $res peut ne rien contenir, mais arriver ici...
1117 // il faut en tenir compte dans le return
1119 while($field = pg_fetch_array($res, NULL, PGSQL_NUM
)) {
1120 $fields[$field[0]] = $field[2] . (!$field[1] ?
'' : (" DEFAULT " . $field[1]));
1122 $connexion['last'] = $q = "SELECT indexdef FROM pg_indexes WHERE tablename ILIKE " . _q($nom_table);
1123 $res = spip_pg_query_simple($link, $q);
1125 while($index = pg_fetch_array($res, NULL, PGSQL_NUM
)) {
1126 if (preg_match('/CREATE\s+(UNIQUE\s+)?INDEX\s([^\s]+).*\((.*)\)$/', $index[0],$r)) {
1127 $nom = str_replace($nom_table.'_','',$r[2]);
1128 $keys[($r[1] ?
"PRIMARY KEY" : ("KEY " . $nom))] = $r[3];
1132 return count($fields) ?
array('field' => $fields, 'key' => $keys) : false;
1135 // Fonction de creation d'une table SQL nommee $nom
1136 // a partir de 2 tableaux PHP :
1137 // champs: champ => type
1138 // cles: type-de-cle => champ(s)
1139 // si $autoinc, c'est une auto-increment (i.e. serial) sur la Primary Key
1140 // Le nom des index est prefixe par celui de la table pour eviter les conflits
1141 // http://doc.spip.org/@spip_pg_create
1142 function spip_pg_create($nom, $champs, $cles, $autoinc=false, $temporary=false, $serveur='',$requeter=true) {
1144 $connexion = $GLOBALS['connexions'][$serveur ?
strtolower($serveur) : 0];
1145 $prefixe = $connexion['prefixe'];
1146 $link = $connexion['link'];
1147 $db = $connexion['db'];
1148 if ($prefixe) $nom = preg_replace('/^spip/', $prefixe, $nom);
1149 $query = $prim = $prim_name = $v = $s = $p='';
1152 // certains plugins declarent les tables (permet leur inclusion dans le dump)
1153 // sans les renseigner (laisse le compilo recuperer la description)
1154 if (!is_array($champs) ||
!is_array($cles))
1157 foreach($cles as $k => $v) {
1158 if (strpos($k, "KEY ") === 0) {
1159 $n = str_replace('`','',$k);
1160 $v = str_replace('`','"',$v);
1161 $i = $nom . preg_replace("/KEY +/", '_',$n);
1162 if ($k != $n) $i = "\"$i\"";
1163 $keys[] = "CREATE INDEX $i ON $nom ($v);";
1164 } else $prim .= "$s\n\t\t" . str_replace('`','"',$k) ." ($v)";
1165 if ($k == "PRIMARY KEY")
1171 $character_set = "";
1172 if (@$GLOBALS['meta']['charset_sql_base'])
1173 $character_set .= " CHARACTER SET ".$GLOBALS['meta']['charset_sql_base'];
1174 if (@$GLOBALS['meta']['charset_collation_sql_base'])
1175 $character_set .= " COLLATE ".$GLOBALS['meta']['charset_collation_sql_base'];
1177 foreach($champs as $k => $v) {
1178 $k = str_replace('`','"',$k);
1179 if (preg_match(',([a-z]*\s*(\(\s*[0-9]*\s*\))?(\s*binary)?),i',$v,$defs)){
1180 if (preg_match(',(char|text),i',$defs[1]) AND !preg_match(',binary,i',$defs[1]) ){
1181 $v = $defs[1] . $character_set . ' ' . substr($v,strlen($defs[1]));
1185 $query .= "$s\n\t\t$k "
1186 . (($autoinc && ($prim_name == $k) && preg_match(',\b(big|small|medium|tiny)?int\b,i', $v))
1192 $temporary = $temporary ?
'TEMPORARY':'';
1194 // En l'absence de "if not exists" en PG, on neutralise les erreurs
1196 $q = "CREATE $temporary TABLE $nom ($query" . ($prim ?
",$prim" : '') . ")".
1197 ($character_set?
" DEFAULT $character_set":"")
1200 if (!$requeter) return $q;
1201 $connexion['last'] = $q;
1202 $r = @pg_query
($link, $q);
1205 spip_log("Impossible de creer cette table: $q");
1207 foreach($keys as $index) {pg_query($link, $index);}
1213 function spip_pg_create_base($nom, $serveur='',$requeter=true) {
1214 return spip_pg_query("CREATE DATABASE $nom", $serveur, $requeter);
1217 // Fonction de creation d'une vue SQL nommee $nom
1218 // http://doc.spip.org/@spip_pg_create_view
1219 function spip_pg_create_view($nom, $query_select, $serveur='',$requeter=true) {
1220 if (!$query_select) return false;
1221 // vue deja presente
1222 if (sql_showtable($nom, false, $serveur)) {
1223 if ($requeter) spip_log("Echec creation d'une vue sql ($nom) car celle-ci existe deja (serveur:$serveur)");
1227 $query = "CREATE VIEW $nom AS ". $query_select;
1228 return spip_pg_query($query, $serveur, $requeter);
1232 // http://doc.spip.org/@spip_pg_set_connect_charset
1233 function spip_pg_set_connect_charset($charset, $serveur='',$requeter=true){
1234 spip_log("changement de charset sql a ecrire en PG");
1239 * Optimise une table SQL
1241 * @param $table nom de la table a optimiser
1242 * @param $serveur nom de la connexion
1243 * @param $requeter effectuer la requete ? sinon retourner son code
1244 * @return bool|string true / false / requete
1246 // http://doc.spip.org/@spip_sqlite_optimize
1247 function spip_pg_optimize($table, $serveur='',$requeter=true){
1248 return spip_pg_query("VACUUM ". $table, $serveur, $requeter);
1251 // Selectionner la sous-chaine dans $objet
1252 // correspondant a $lang. Cf balise Multi de Spip
1254 // http://doc.spip.org/@spip_pg_multi
1255 function spip_pg_multi ($objet, $lang) {
1256 $r = "regexp_replace("
1260 . "[]]([^[]*).*</multi>', E'\\\\1') AS multi";
1264 // Palanquee d'idiosyncrasies MySQL dans les creations de table
1265 // A completer par les autres, mais essayer de reduire en amont.
1267 // http://doc.spip.org/@mysql2pg_type
1268 function mysql2pg_type($v)
1271 preg_replace('/auto_increment/i', '', // non reconnu
1272 preg_replace('/bigint/i', 'bigint',
1273 preg_replace('/mediumint/i', 'mediumint',
1274 preg_replace('/smallint/i', 'smallint',
1275 preg_replace("/tinyint/i", 'int',
1276 preg_replace('/int\s*[(]\s*\d+\s*[)]/i', 'int',
1277 preg_replace("/longtext/i", 'text',
1278 str_replace("mediumtext", 'text',
1279 preg_replace("/tinytext/i", 'text',
1280 str_replace("longblob", 'text',
1281 str_replace("0000-00-00",'0001-01-01',
1282 preg_replace("/datetime/i", 'timestamp',
1283 preg_replace("/unsigned/i", '',
1284 preg_replace("/double/i", 'double precision',
1285 preg_replace('/VARCHAR\((\d+)\)\s+BINARY/i', 'varchar(\1)',
1286 preg_replace("/ENUM *[(][^)]*[)]/i", "varchar(255)",
1291 // Renvoie false si on n'a pas les fonctions pg (pour l'install)
1292 // http://doc.spip.org/@spip_versions_pg
1293 function spip_versions_pg(){
1294 charger_php_extension('pgsql');
1295 return function_exists('pg_connect');