/**
* Creer la requete pour la creation d'une table
* retourne la requete pour utilisation par sql_create() et sql_alter()
*
* http://code.spip.net/@_sqlite_requete_create
*
* @param $nom
* @param $champs
* @param $cles
* @param bool $autoinc
* @param bool $temporary
* @param bool $_ifnotexists
* @param string $serveur
* @param bool $requeter
* @return bool|string
*/
function _sqlite_requete_create($nom, $champs, $cles, $autoinc = false, $temporary = false, $_ifnotexists = true, $serveur = '', $requeter = true)
{
$query = $keys = $s = $p = '';
// certains plugins declarent les tables (permet leur inclusion dans le dump)
// sans les renseigner (laisse le compilo recuperer la description)
if (!is_array($champs) || !is_array($cles)) {
return;
}
// sqlite ne gere pas KEY tout court dans une requete CREATE TABLE
// il faut passer par des create index
// Il gere par contre primary key !
// Soit la PK est definie dans les cles, soit dans un champs
$c = "";
// le champ de cle primaire
if (!isset($cles[$pk = "PRIMARY KEY"]) or !($c = $cles[$pk])) {
foreach ($champs as $k => $v) {
if (false !== stripos($v, $pk)) {
$c = $k;
// on n'en a plus besoin dans field, vu que defini dans key
$champs[$k] = preg_replace("/{$pk}/is", '', $champs[$k]);
break;
}
}
}
if ($c) {
$keys = "\n\t\t{$pk} ({$c})";
}
// Pas de DEFAULT 0 sur les cles primaires en auto-increment
if (isset($champs[$c]) and stripos($champs[$c], "default 0") !== false) {
$champs[$c] = trim(str_ireplace("default 0", "", $champs[$c]));
}
$champs = _sqlite_remplacements_definitions_table($champs, $autoinc ? $c : false);
foreach ($champs as $k => $v) {
$query .= "{$s}\n\t\t{$k} {$v}";
$s = ",";
}
$ifnotexists = "";
if ($_ifnotexists) {
$version = spip_sqlite_fetch(spip_sqlite_query("select sqlite_version() AS sqlite_version", $serveur), '', $serveur);
if (!function_exists('spip_version_compare')) {
include_spip('plugins/installer');
}
if ($version and spip_version_compare($version['sqlite_version'], '3.3.0', '>=')) {
$ifnotexists = ' IF NOT EXISTS';
} else {
/* simuler le IF EXISTS - version 2 et sqlite < 3.3a */
$a = spip_sqlite_showtable($table, $serveur);
if (isset($a['key']['KEY ' . $nom])) {
return true;
}
}
}
$temporary = $temporary ? ' TEMPORARY' : '';
$q = "CREATE{$temporary} TABLE{$ifnotexists} {$nom} ({$query}" . ($keys ? ",{$keys}" : '') . ")\n";
return $q;
}
/**
* Creer la requete pour la creation d'une table
* retourne la requete pour utilisation par sql_create() et sql_alter()
*
* http://doc.spip.org/@_sqlite_requete_create
*
* @param $nom
* @param $champs
* @param $cles
* @param bool $autoinc
* @param bool $temporary
* @param bool $_ifnotexists
* @param string $serveur
* @param bool $requeter
* @return bool|string
*/
function _sqlite_requete_create($nom, $champs, $cles, $autoinc = false, $temporary = false, $_ifnotexists = true, $serveur = '', $requeter = true)
{
$query = $keys = $s = $p = '';
// certains plugins declarent les tables (permet leur inclusion dans le dump)
// sans les renseigner (laisse le compilo recuperer la description)
if (!is_array($champs) || !is_array($cles)) {
return;
}
// sqlite ne gere pas KEY tout court dans une requete CREATE TABLE
// il faut passer par des create index
// Il gere par contre primary key !
// Soit la PK est definie dans les cles, soit dans un champs
$c = "";
// le champ de cle primaire
if (!isset($cles[$pk = "PRIMARY KEY"]) or !($c = $cles[$pk])) {
foreach ($champs as $k => $v) {
if (false !== stripos($v, $pk)) {
$c = $k;
// on n'en a plus besoin dans field, vu que defini dans key
$champs[$k] = preg_replace("/{$pk}/is", '', $champs[$k]);
break;
}
}
}
if ($c) {
$keys = "\n\t\t{$pk} ({$c})";
}
$champs = _sqlite_remplacements_definitions_table($champs, $autoinc);
foreach ($champs as $k => $v) {
$query .= "{$s}\n\t\t{$k} {$v}";
$s = ",";
}
$ifnotexists = "";
if ($_ifnotexists) {
// simuler le IF NOT EXISTS - version 2
if (_sqlite_is_version(2, '', $serveur)) {
$a = spip_sqlite_showtable($nom, $serveur);
if ($a) {
return false;
}
} else {
$ifnotexists = ' IF NOT EXISTS';
}
}
$temporary = $temporary ? ' TEMPORARY' : '';
$q = "CREATE{$temporary} TABLE{$ifnotexists} {$nom} ({$query}" . ($keys ? ",{$keys}" : '') . ")\n";
return $q;
}
