65ff188eba7c5cb0f4841cf2ad155a7e753a1446
3 /***************************************************************************\
4 * SPIP, Systeme de publication pour l'internet *
6 * Copyright (c) 2001-2017 *
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')) {
17 include_spip('inc/headers');
18 include_spip('base/abstract_sql');
20 // http://code.spip.net/@install_bases
21 function install_bases($adresse_db, $login_db, $pass_db, $server_db, $choix_db, $sel_db, $chmod_db) {
23 // Prefix des tables :
24 // S'il n'est pas defini par mes_options/inc/mutualiser, on va le creer
25 // a partir de ce qui est envoye a l'installation
26 if (!defined('_INSTALL_TABLE_PREFIX')) {
27 $table_prefix = ($GLOBALS['table_prefix'] != 'spip')
28 ?
$GLOBALS['table_prefix']
29 : preparer_prefixe_tables(_request('tprefix'));
30 // S'il est vide on remet spip
32 $table_prefix = 'spip';
35 $table_prefix = _INSTALL_TABLE_PREFIX
;
38 if (preg_match(',(.*):(.*),', $adresse_db, $r)) {
39 list(, $adresse_db, $port) = $r;
44 $GLOBALS['connexions'][$server_db]
45 = spip_connect_db($adresse_db, $port, $login_db, $pass_db, '', $server_db);
47 $GLOBALS['connexions'][$server_db][$GLOBALS['spip_sql_version']]
48 = $GLOBALS['spip_' . $server_db . '_functions_' . $GLOBALS['spip_sql_version']];
50 $fquery = sql_serveur('query', $server_db);
51 if ($choix_db == 'new_spip') {
52 $re = ',^[a-z_][a-z_0-9-]*$,i';
53 if (preg_match($re, $sel_db)) {
54 $ok = sql_create_base($sel_db, $server_db);
56 $re = "Impossible de creer la base $re";
58 return '<p>' . _T('avis_connexion_erreur_creer_base') . "</p><!--\n$re\n-->";
61 $re = "Le nom de la base doit correspondre a $re";
64 return '<p>' . _T('avis_connexion_erreur_nom_base') . "</p><!--\n$re\n-->";
68 // on rejoue la connexion apres avoir teste si il faut lui indiquer
70 install_mode_appel($server_db, false);
71 $GLOBALS['connexions'][$server_db]
72 = spip_connect_db($adresse_db, $port, $login_db, $pass_db, $sel_db, $server_db);
74 $GLOBALS['connexions'][$server_db][$GLOBALS['spip_sql_version']]
75 = $GLOBALS['spip_' . $server_db . '_functions_' . $GLOBALS['spip_sql_version']];
77 // Completer le tableau decrivant la connexion
79 $GLOBALS['connexions'][$server_db]['prefixe'] = $table_prefix;
80 $GLOBALS['connexions'][$server_db]['db'] = $sel_db;
82 $old = sql_showbase($table_prefix . '_meta', $server_db);
84 $old = sql_fetch($old, $server_db);
87 // Si possible, demander au serveur d'envoyer les textes
88 // dans le codage std de SPIP,
89 $charset = sql_get_charset(_DEFAULT_CHARSET
, $server_db);
92 sql_set_charset($charset['charset'], $server_db);
93 $GLOBALS['meta']['charset_sql_base'] =
95 $GLOBALS['meta']['charset_collation_sql_base'] =
96 $charset['collation'];
97 $GLOBALS['meta']['charset_sql_connexion'] =
99 $charsetbase = $charset['charset'];
101 spip_log(_DEFAULT_CHARSET
. ' inconnu du serveur SQL');
102 $charsetbase = 'standard';
104 spip_log("Creation des tables. Codage $charsetbase");
105 creer_base($server_db); // AT LAST
106 // memoriser avec quel charset on l'a creee
110 'nom' => 'charset_sql_base',
111 'valeur' => $charset['charset'],
114 @sql_insertq
('spip_meta', $t, '', $server_db);
115 $t['nom'] = 'charset_collation_sql_base';
116 $t['valeur'] = $charset['collation'];
117 @sql_insertq
('spip_meta', $t, '', $server_db);
118 $t['nom'] = 'charset_sql_connexion';
119 $t['valeur'] = $charset['charset'];
120 @sql_insertq
('spip_meta', $t, '', $server_db);
123 'nom' => 'version_installee',
124 'valeur' => $GLOBALS['spip_version_base'],
127 @sql_insertq
('spip_meta', $t, '', $server_db);
128 $t['nom'] = 'nouvelle_install';
130 @sql_insertq
('spip_meta', $t, '', $server_db);
131 // positionner la langue par defaut du site si un cookie de lang a ete mis
132 if (isset($_COOKIE['spip_lang_ecrire'])) {
135 array('nom' => 'langue_site', 'valeur' => $_COOKIE['spip_lang_ecrire']),
141 // pour recreer les tables disparues au besoin
142 spip_log('Table des Meta deja la. Verification des autres.');
143 creer_base($server_db);
144 $fupdateq = sql_serveur('updateq', $server_db);
146 $r = $fquery("SELECT valeur FROM spip_meta WHERE nom='version_installee'", $server_db);
149 $r = sql_fetch($r, $server_db);
151 $version_installee = !$r ?
0 : (double)$r['valeur'];
152 if (!$version_installee or ($GLOBALS['spip_version_base'] < $version_installee)) {
155 array('valeur' => $GLOBALS['spip_version_base'], 'impt' => 'non'),
156 "nom='version_installee'",
160 spip_log('nouvelle version installee: ' . $GLOBALS['spip_version_base']);
162 // eliminer la derniere operation d'admin mal terminee
163 // notamment la mise a jour
164 @$fquery("DELETE FROM spip_meta WHERE nom='import_all' OR nom='admin'", $server_db);
167 // recuperer le charset de la connexion dans les meta
169 $r = $fquery("SELECT valeur FROM spip_meta WHERE nom='charset_sql_connexion'", $server_db);
171 $r = sql_fetch($r, $server_db);
174 $charset = $r['valeur'];
177 $ligne_rappel = install_mode_appel($server_db);
179 $result_ok = @$fquery('SELECT COUNT(*) FROM spip_meta', $server_db);
181 return "<!--\nvielle = $old rappel= $ligne_rappel\n-->";
185 install_fichier_connexion(
187 "if (!defined('_SPIP_CHMOD')) define('_SPIP_CHMOD', " . sprintf('0%3o', $chmod_db) . ");\n"
191 // si ce fichier existe a cette etape c'est qu'il provient
192 // d'une installation qui ne l'a pas cree correctement.
193 // Le supprimer pour que _FILE_CONNECT_TMP prime.
195 if (_FILE_CONNECT
and file_exists(_FILE_CONNECT
)) {
196 spip_unlink(_FILE_CONNECT
);
199 install_fichier_connexion(
219 * Préparer le préfixe des tables
221 * Contrairement a ce qui est dit dans le message (trop strict mais c'est
222 * pour notre bien), on tolère les chiffres en plus des minuscules.
223 * On corrige aussi le préfixe afin qu'il ne commence pas par un chiffre
224 * cf https://core.spip.net/issues/3626
226 * @param string $prefixe Le préfixe demandé
227 * @return string Le préfixe corrigé
229 function preparer_prefixe_tables($prefixe) {
230 return trim(preg_replace(',^[0-9]+,', '', preg_replace(',[^a-z0-9],', '', strtolower($prefixe))));
233 // http://code.spip.net/@install_propose_ldap
234 function install_propose_ldap() {
235 return generer_form_ecrire('install', (
237 _T('info_authentification_externe'),
240 'label' => _T('texte_annuaire_ldap_1'),
245 bouton_suivant(_T('bouton_acces_ldap'))
250 // http://code.spip.net/@install_premier_auteur
251 function install_premier_auteur($email, $login, $nom, $pass, $hidden, $auteur_obligatoire) {
252 return info_progression_etape(3, 'etape_', 'install/') .
254 _T('info_informations_personnelles'),
255 '<b>' . _T('texte_informations_personnelles_1') . '</b>' .
256 aider('install5', true) .
258 ($auteur_obligatoire ?
261 _T('texte_informations_personnelles_2') . ' ' . _T('info_laisser_champs_vides')
264 . generer_form_ecrire('install', (
265 "\n<input type='hidden' name='etape' value='3b' />"
268 _T('info_identification_publique'),
271 'label' => '<b>' . _T('entree_signature') . "</b><br />\n" . _T('entree_nom_pseudo_1') . "\n",
273 'required' => $auteur_obligatoire,
276 'label' => '<b>' . _T('entree_adresse_email') . "</b>\n",
283 _T('entree_identifiants_connexion'),
286 'label' => '<b>' . _T('entree_login') . "</b><br />\n" . _T(
287 'info_login_trop_court_car_pluriel',
288 array('nb' => _LOGIN_TROP_COURT
)
291 'required' => $auteur_obligatoire,
294 'label' => '<b>' . _T('entree_mot_passe') . "</b><br />\n" . _T(
295 'info_passe_trop_court_car_pluriel',
296 array('nb' => _PASS_LONGUEUR_MINI
)
299 'required' => $auteur_obligatoire,
301 'pass_verif' => array(
302 'label' => '<b>' . _T('info_confirmer_passe') . "</b><br />\n",
304 'required' => $auteur_obligatoire,
308 . bouton_suivant()));
311 // http://code.spip.net/@install_etape_3_dist
312 function install_etape_3_dist() {
313 $ldap_present = _request('ldap_present');
315 if (!$ldap_present) {
316 $adresse_db = defined('_INSTALL_HOST_DB')
318 : _request('adresse_db');
320 $login_db = defined('_INSTALL_USER_DB')
322 : _request('login_db');
324 $pass_db = defined('_INSTALL_PASS_DB')
326 : _request('pass_db');
328 $server_db = defined('_INSTALL_SERVER_DB')
330 : _request('server_db');
332 $chmod_db = defined('_SPIP_CHMOD')
336 $choix_db = defined('_INSTALL_NAME_DB')
338 : _request('choix_db');
340 $sel_db = ($choix_db == 'new_spip')
341 ?
_request('table_new') : $choix_db;
343 $res = install_bases($adresse_db, $login_db, $pass_db, $server_db, $choix_db, $sel_db, $chmod_db);
346 $res = info_progression_etape(2, 'etape_', 'install/', true)
347 . "<div class='error'><h3>" . _T('avis_operation_echec') . '</h3>'
349 . '<p>' . _T('texte_operation_echec') . '</p>'
354 list($adresse_db, $login_db, $pass_db, $sel_db, $server_db) = analyse_fichier_connection(_FILE_CONNECT_TMP
);
355 $GLOBALS['connexions'][$server_db] = spip_connect_db($adresse_db, $sel_db, $login_db, $pass_db, $sel_db, $server_db);
359 if (file_exists(_FILE_CONNECT_TMP
)) {
360 include(_FILE_CONNECT_TMP
);
362 redirige_url_ecrire('install');
365 if (file_exists(_FILE_CHMOD_TMP
)) {
366 include(_FILE_CHMOD_TMP
);
368 redirige_url_ecrire('install');
371 $hidden = predef_ou_cache($adresse_db, $login_db, $pass_db, $server_db)
372 . (defined('_INSTALL_NAME_DB') ?
''
373 : "\n<input type='hidden' name='sel_db' value='$sel_db' />");
375 $auteur_obligatoire = ($ldap_present ?
0 : !sql_countsel('spip_auteurs', '', '', '', $server_db));
377 $res = "<div class='success'><b>"
378 . _T('info_base_installee')
380 . install_premier_auteur(
388 . (($ldap_present or !function_exists('ldap_connect'))
389 ?
'' : install_propose_ldap());
392 echo install_debut_html();
394 echo install_fin_html();