function install_bases_sup($adresse_db, $login_db, $pass_db, $server_db, $sup_db){
if (!($GLOBALS['connexions'][$server_db] = spip_connect_db($adresse_db, 0, $login_db, $pass_db, '', $server_db)))
return "<!-- connection perdue -->";
$GLOBALS['connexions'][$server_db][$GLOBALS['spip_sql_version']]
= $GLOBALS['spip_' . $server_db .'_functions_' . $GLOBALS['spip_sql_version']];
if (!sql_selectdb($sup_db, $server_db))
return "<!-- base inaccessible -->";
$tables = sql_alltable('%', $server_db);
if (!$tables)
$res = _T('install_pas_table');
else {
$res = _T('install_tables_base')
. "<ol style='text-align: left'>\n<li>"
. join("</li>\n<li>", $tables)
. "</li>\n</ol>\n";
}
if (preg_match(',(.*):(.*),', $adresse_db, $r))
list(,$adresse_db, $port) = $r;
else
$port = '';
$adresse_db = addcslashes($adresse_db,"'\\");
$port = addcslashes($port,"'\\");
$login_db = addcslashes($login_db,"'\\");
$pass_db = addcslashes($pass_db,"'\\");
$sup_db = addcslashes($sup_db,"'\\");
$server_db = addcslashes($server_db,"'\\");
$conn = install_mode_appel($server_db)
. "spip_connect_db("
. "'$adresse_db','$port','$login_db',"
. "'$pass_db','$sup_db'"
. ",'$server_db', '');\n";
install_fichier_connexion(_DIR_CONNECT . $sup_db . '.php', $conn);
return '<div style="background-color: #eeeeee">' . $res . '</div>';
}
function install_bases($adresse_db, $login_db, $pass_db, $server_db, $choix_db, $sel_db, $chmod_db){
global $spip_version_base;
// Prefix des tables :
// contrairement a ce qui est dit dans le message (trop strict mais c'est
// pour notre bien), on va tolerer les chiffres en plus des minuscules
// S'il n'est pas defini par mes_options/inc/mutualiser, on va le creer
// a partir de ce qui est envoye a l'installation
if (!defined('_INSTALL_TABLE_PREFIX')) {
$table_prefix = ($GLOBALS['table_prefix'] != 'spip')
? $GLOBALS['table_prefix']
: trim(preg_replace(',[^a-z0-9],','',strtolower(_request('tprefix'))));
// S'il est vide on remet spip
if (!$table_prefix)
$table_prefix = 'spip';
} else {
$table_prefix = _INSTALL_TABLE_PREFIX;
}
$GLOBALS['connexions'][$server_db]
= spip_connect_db($adresse_db, 0, $login_db, $pass_db, '', $server_db);
$GLOBALS['connexions'][$server_db][$GLOBALS['spip_sql_version']]
= $GLOBALS['spip_' . $server_db .'_functions_' . $GLOBALS['spip_sql_version']];
$fquery = sql_serveur('query', $server_db);
if ($choix_db == "new_spip") {
$re = ',^[a-z_][a-z_0-9-]*$,i';
if (preg_match($re, $sel_db))
sql_create_base($sel_db, $server_db);
else {
$re = "Le nom de la base doit correspondre a $re";
spip_log($re);
return "<!--\n$re\n-->";
}
}
// on rejoue la connexion apres avoir teste si il faut lui indiquer
// un sql_mode
install_mode_appel($server_db, false);
$GLOBALS['connexions'][$server_db]
= spip_connect_db($adresse_db, $sel_db, $login_db, $pass_db, $sel_db, $server_db);
$GLOBALS['connexions'][$server_db][$GLOBALS['spip_sql_version']]
= $GLOBALS['spip_' . $server_db .'_functions_' . $GLOBALS['spip_sql_version']];
// Completer le tableau decrivant la connexion
$GLOBALS['connexions'][$server_db]['prefixe'] = $table_prefix;
$GLOBALS['connexions'][$server_db]['db'] = $sel_db;
$old = sql_showbase($table_prefix . "_meta", $server_db);
if ($old) $old = sql_fetch($old, $server_db);
if (!$old) {
// Si possible, demander au serveur d'envoyer les textes
// dans le codage std de SPIP,
$charset = sql_get_charset(_DEFAULT_CHARSET, $server_db);
if ($charset) {
sql_set_charset($charset['charset'], $server_db);
$GLOBALS['meta']['charset_sql_base'] =
$charset['charset'];
$GLOBALS['meta']['charset_collation_sql_base'] =
$charset['collation'];
$GLOBALS['meta']['charset_sql_connexion'] =
$charset['charset'];
$charsetbase = $charset['charset'];
} else {
spip_log(_DEFAULT_CHARSET . " inconnu du serveur SQL");
$charsetbase = 'standard';
}
spip_log("Creation des tables. Codage $charsetbase");
creer_base($server_db); // AT LAST
creer_base_types_doc($server_db);
// memoriser avec quel charset on l'a creee
if ($charset) {
$t = array('nom' => 'charset_sql_base',
'valeur' => $charset['charset'],
'impt' => 'non');
@sql_insertq('spip_meta', $t, '', $server_db);
$t['nom'] = 'charset_collation_sql_base';
$t['valeur'] = $charset['collation'];
@sql_insertq('spip_meta', $t, '', $server_db);
$t['nom'] = 'charset_sql_connexion';
$t['valeur'] = $charset['charset'];
@sql_insertq('spip_meta', $t, '', $server_db);
}
$t = array('nom' => 'version_installee',
'valeur' => $spip_version_base,
'impt' => 'non');
@sql_insertq('spip_meta', $t, '', $server_db);
$t['nom'] = 'nouvelle_install';
$t['valeur'] = 1;
@sql_insertq('spip_meta', $t, '', $server_db);
// positionner la langue par defaut du site si un cookie de lang a ete mis
if (isset($_COOKIE['spip_lang_ecrire'])){
@sql_insertq('spip_meta', array('nom'=>'langue_site','valeur'=>$_COOKIE['spip_lang_ecrire']), '', $server_db);
}
} else {
// pour recreer les tables disparues au besoin
spip_log("Table des Meta deja la. Verification des autres.");
creer_base($server_db);
$fupdateq = sql_serveur('updateq', $server_db);
$r = $fquery("SELECT valeur FROM spip_meta WHERE nom='version_installee'", $server_db);
if ($r) $r = sql_fetch($r, $server_db);
$version_installee = !$r ? 0 : (double) $r['valeur'];
if (!$version_installee OR ($spip_version_base < $version_installee)) {
$fupdateq('spip_meta', array('valeur'=>$spip_version_base, 'impt'=>'non'), "nom='version_installee'", $server_db);
spip_log("nouvelle version installee: $spip_version_base");
}
// eliminer la derniere operation d'admin mal terminee
// notamment la mise a jour
@$fquery("DELETE FROM spip_meta WHERE nom='import_all' OR nom='admin'", $server_db);
}
$ligne_rappel = install_mode_appel($server_db);
$result_ok = @$fquery("SELECT COUNT(*) FROM spip_meta", $server_db);
if (!$result_ok) return "<!--\nvielle = $old rappel= $ligne_rappel\n-->";
if ($chmod_db) {
install_fichier_connexion(_FILE_CHMOD_TMP, "if (!defined('_SPIP_CHMOD')) define('_SPIP_CHMOD', ". sprintf('0%3o',$chmod_db).");\n");
}
if (preg_match(',(.*):(.*),', $adresse_db, $r))
list(,$adresse_db, $port) = $r;
else $port = '';
// si ce fichier existe a cette etape c'est qu'il provient
// d'une installation qui ne l'a pas cree correctement.
// Le supprimer pour que _FILE_CONNECT_TMP prime.
if (_FILE_CONNECT AND file_exists(_FILE_CONNECT))
spip_unlink(_FILE_CONNECT);
install_fichier_connexion(_FILE_CONNECT_TMP,
$ligne_rappel
. install_connexion($adresse_db,
$port,
$login_db,
$pass_db,
$sel_db,
$server_db,
$table_prefix));
return '';
}
function formulaires_declarer_bases_traiter_dist()
{
$adresse_db = _DECLARER_adresse_db;
if (preg_match(',(.*):(.*),', $adresse_db, $r)) {
list(, $adresse_db, $port) = $r;
} else {
$port = '';
}
$adresse_db = addcslashes($adresse_db, "'\\");
$port = addcslashes($port, "'\\");
$login_db = addcslashes(_DECLARER_login_db, "'\\");
$pass_db = addcslashes(_DECLARER_pass_db, "'\\");
$sup_db = addcslashes(_DECLARER_choix_db, "'\\");
$server_db = addcslashes(_DECLARER_serveur_db, "'\\");
$conn = install_mode_appel($server_db) . "spip_connect_db(" . "'{$adresse_db}','{$port}','{$login_db}'," . "'{$pass_db}','{$sup_db}'" . ",'{$server_db}', '');\n";
install_fichier_connexion(_DIR_CONNECT . _DECLARER_nom_connect . '.php', $conn);
return array('message_ok' => _T('install_connect_ok', array('connect' => "<strong>" . _DECLARER_nom_connect . "</strong>")));
}
