[SPIP] ~2.1.12 -->2.1.25
[velocampus/web/www.git] / www / ecrire / install / etape_3.php
1 <?php
2
3 /***************************************************************************\
4 * SPIP, Systeme de publication pour l'internet *
5 * *
6 * Copyright (c) 2001-2014 *
7 * Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James *
8 * *
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 \***************************************************************************/
12
13 if (!defined('_ECRIRE_INC_VERSION')) return;
14
15 include_spip('inc/headers');
16 include_spip('base/abstract_sql');
17
18 // http://doc.spip.org/@install_bases
19 function install_bases($adresse_db, $login_db, $pass_db, $server_db, $choix_db, $sel_db, $chmod_db){
20 global $spip_version_base;
21
22 // Prefix des tables :
23 // contrairement a ce qui est dit dans le message (trop strict mais c'est
24 // pour notre bien), on va tolerer les chiffres en plus des minuscules
25 // S'il n'est pas defini par mes_options/inc/mutualiser, on va le creer
26 // a partir de ce qui est envoye a l'installation
27 if (!defined('_INSTALL_TABLE_PREFIX')) {
28 $table_prefix = ($GLOBALS['table_prefix'] != 'spip')
29 ? $GLOBALS['table_prefix']
30 : trim(preg_replace(',[^a-z0-9],','',strtolower(_request('tprefix'))));
31 // S'il est vide on remet spip
32 if (!$table_prefix)
33 $table_prefix = 'spip';
34 } else {
35 $table_prefix = _INSTALL_TABLE_PREFIX;
36 }
37
38 $GLOBALS['connexions'][$server_db]
39 = spip_connect_db($adresse_db, 0, $login_db, $pass_db, '', $server_db);
40
41 $GLOBALS['connexions'][$server_db][$GLOBALS['spip_sql_version']]
42 = $GLOBALS['spip_' . $server_db .'_functions_' . $GLOBALS['spip_sql_version']];
43
44 $fquery = sql_serveur('query', $server_db);
45 if ($choix_db == "new_spip") {
46 $re = ',^[a-z_][a-z_0-9-]*$,i';
47 if (preg_match($re, $sel_db))
48 sql_create_base($sel_db, $server_db);
49 else {
50 $re = "Le nom de la base doit correspondre a $re";
51 spip_log($re);
52 return "<!--\n$re\n-->";
53 }
54 }
55
56 // on rejoue la connexion apres avoir teste si il faut lui indiquer
57 // un sql_mode
58 install_mode_appel($server_db, false);
59 $GLOBALS['connexions'][$server_db]
60 = spip_connect_db($adresse_db, $sel_db, $login_db, $pass_db, $sel_db, $server_db);
61
62 $GLOBALS['connexions'][$server_db][$GLOBALS['spip_sql_version']]
63 = $GLOBALS['spip_' . $server_db .'_functions_' . $GLOBALS['spip_sql_version']];
64
65 // Completer le tableau decrivant la connexion
66
67 $GLOBALS['connexions'][$server_db]['prefixe'] = $table_prefix;
68 $GLOBALS['connexions'][$server_db]['db'] = $sel_db;
69
70 $old = sql_showbase($table_prefix . "_meta", $server_db);
71 if ($old) $old = sql_fetch($old, $server_db);
72 if (!$old) {
73
74 // Si possible, demander au serveur d'envoyer les textes
75 // dans le codage std de SPIP,
76 $charset = sql_get_charset(_DEFAULT_CHARSET, $server_db);
77
78 if ($charset) {
79 sql_set_charset($charset['charset'], $server_db);
80 $GLOBALS['meta']['charset_sql_base'] =
81 $charset['charset'];
82 $GLOBALS['meta']['charset_collation_sql_base'] =
83 $charset['collation'];
84 $GLOBALS['meta']['charset_sql_connexion'] =
85 $charset['charset'];
86 $charsetbase = $charset['charset'];
87 } else {
88 spip_log(_DEFAULT_CHARSET . " inconnu du serveur SQL");
89 $charsetbase = 'standard';
90 }
91 spip_log("Creation des tables. Codage $charsetbase");
92 creer_base($server_db); // AT LAST
93 creer_base_types_doc($server_db);
94 // memoriser avec quel charset on l'a creee
95
96 if ($charset) {
97 $t = array('nom' => 'charset_sql_base',
98 'valeur' => $charset['charset'],
99 'impt' => 'non');
100 @sql_insertq('spip_meta', $t, '', $server_db);
101 $t['nom'] = 'charset_collation_sql_base';
102 $t['valeur'] = $charset['collation'];
103 @sql_insertq('spip_meta', $t, '', $server_db);
104 $t['nom'] = 'charset_sql_connexion';
105 $t['valeur'] = $charset['charset'];
106 @sql_insertq('spip_meta', $t, '', $server_db);
107 }
108 $t = array('nom' => 'version_installee',
109 'valeur' => $spip_version_base,
110 'impt' => 'non');
111 @sql_insertq('spip_meta', $t, '', $server_db);
112 $t['nom'] = 'nouvelle_install';
113 $t['valeur'] = 1;
114 @sql_insertq('spip_meta', $t, '', $server_db);
115 // positionner la langue par defaut du site si un cookie de lang a ete mis
116 if (isset($_COOKIE['spip_lang_ecrire'])){
117 @sql_insertq('spip_meta', array('nom'=>'langue_site','valeur'=>$_COOKIE['spip_lang_ecrire']), '', $server_db);
118 }
119 } else {
120
121 // pour recreer les tables disparues au besoin
122 spip_log("Table des Meta deja la. Verification des autres.");
123 creer_base($server_db);
124 $fupdateq = sql_serveur('updateq', $server_db);
125
126 $r = $fquery("SELECT valeur FROM spip_meta WHERE nom='version_installee'", $server_db);
127
128 if ($r) $r = sql_fetch($r, $server_db);
129 $version_installee = !$r ? 0 : (double) $r['valeur'];
130 if (!$version_installee OR ($spip_version_base < $version_installee)) {
131 $fupdateq('spip_meta', array('valeur'=>$spip_version_base, 'impt'=>'non'), "nom='version_installee'", $server_db);
132 spip_log("nouvelle version installee: $spip_version_base");
133 }
134 // eliminer la derniere operation d'admin mal terminee
135 // notamment la mise a jour
136 @$fquery("DELETE FROM spip_meta WHERE nom='import_all' OR nom='admin'", $server_db);
137 }
138
139 $ligne_rappel = install_mode_appel($server_db);
140
141 $result_ok = @$fquery("SELECT COUNT(*) FROM spip_meta", $server_db);
142 if (!$result_ok) return "<!--\nvielle = $old rappel= $ligne_rappel\n-->";
143
144 if ($chmod_db) {
145 install_fichier_connexion(_FILE_CHMOD_TMP, "if (!defined('_SPIP_CHMOD')) define('_SPIP_CHMOD', ". sprintf('0%3o',$chmod_db).");\n");
146 }
147
148 if (preg_match(',(.*):(.*),', $adresse_db, $r))
149 list(,$adresse_db, $port) = $r;
150 else $port = '';
151
152 // si ce fichier existe a cette etape c'est qu'il provient
153 // d'une installation qui ne l'a pas cree correctement.
154 // Le supprimer pour que _FILE_CONNECT_TMP prime.
155
156 if (_FILE_CONNECT AND file_exists(_FILE_CONNECT))
157 spip_unlink(_FILE_CONNECT);
158
159 install_fichier_connexion(_FILE_CONNECT_TMP,
160 $ligne_rappel
161 . install_connexion($adresse_db,
162 $port,
163 $login_db,
164 $pass_db,
165 $sel_db,
166 $server_db,
167 $table_prefix));
168 return '';
169 }
170
171 // http://doc.spip.org/@install_propose_ldap
172 function install_propose_ldap()
173 {
174 return generer_form_ecrire('install', (
175 fieldset(_T('info_authentification_externe'),
176 array(
177 'etape' => array(
178 'label' => _T('texte_annuaire_ldap_1'),
179 'valeur' => 'ldap1',
180 'hidden' => true
181 )),
182 bouton_suivant(_T('bouton_acces_ldap'))
183 )));
184 }
185
186
187 // http://doc.spip.org/@install_premier_auteur
188 function install_premier_auteur($email, $login, $nom, $pass, $hidden)
189 {
190 return info_progression_etape(3,'etape_','install/') .
191 info_etape(_T('info_informations_personnelles'),
192
193 "<b>"._T('texte_informations_personnelles_1')."</b>" .
194 aide ("install5") .
195 "<p>" .
196 _T('texte_informations_personnelles_2') . " " .
197 _T('info_laisser_champs_vides')
198 )
199 . generer_form_ecrire('install', (
200 "\n<input type='hidden' name='etape' value='3b' />"
201 . $hidden
202 . fieldset(_T('info_identification_publique'),
203 array(
204 'nom' => array(
205 'label' => "<b>"._T('entree_signature')."</b><br />\n"._T('entree_nom_pseudo_1')."\n",
206 'valeur' => $nom
207 ),
208 'email' => array(
209 'label' => "<b>"._T('entree_adresse_email')."</b>\n",
210 'valeur' => $email
211 )
212 )
213 )
214
215 . fieldset(_T('entree_identifiants_connexion'),
216 array(
217 'login' => array(
218 'label' => "<b>"._T('entree_login')."</b><br />\n"._T('info_plus_trois_car')."\n",
219 'valeur' => $login
220 ),
221 'pass' => array(
222 'label' => "<b>"._T('entree_mot_passe')."</b><br />\n"._T('info_plus_cinq_car_2')."\n",
223 'valeur' => $pass
224 ),
225 'pass_verif' => array(
226 'label' => "<b>"._T('info_confirmer_passe')."</b><br />\n",
227 'valeur' => $pass
228 )
229 )
230 )
231 . bouton_suivant()));
232 }
233
234 // http://doc.spip.org/@install_etape_3_dist
235 function install_etape_3_dist()
236 {
237 $ldap_present = _request('ldap_present');
238
239 if (!$ldap_present) {
240 $adresse_db = defined('_INSTALL_HOST_DB')
241 ? _INSTALL_HOST_DB
242 : _request('adresse_db');
243
244 $login_db = defined('_INSTALL_USER_DB')
245 ? _INSTALL_USER_DB
246 : _request('login_db');
247
248 $pass_db = defined('_INSTALL_PASS_DB')
249 ? _INSTALL_PASS_DB
250 : _request('pass_db');
251
252 $server_db = defined('_INSTALL_SERVER_DB')
253 ? _INSTALL_SERVER_DB
254 : _request('server_db');
255
256 $chmod_db = defined('_SPIP_CHMOD')
257 ? _SPIP_CHMOD
258 : _request('chmod');
259
260 $choix_db = defined('_INSTALL_NAME_DB')
261 ? _INSTALL_NAME_DB
262 : _request('choix_db');
263
264 $sel_db = ($choix_db == "new_spip")
265 ? _request('table_new') : $choix_db;
266
267 $res = install_bases($adresse_db, $login_db, $pass_db, $server_db, $choix_db, $sel_db, $chmod_db);
268
269 if ($res) {
270 $res .= info_progression_etape(2,'etape_','install/', true);
271
272 $res .= "<p class='resultat echec'><b>"._T('avis_operation_echec')."</b></p>"._T('texte_operation_echec');
273 }
274
275 } else {
276 $res = '';
277 list($adresse_db, $login_db, $pass_db, $sel_db, $server_db)
278 = analyse_fichier_connection(_FILE_CONNECT_TMP);
279 }
280
281 if (!$res) {
282 if (file_exists(_FILE_CONNECT_TMP))
283 include(_FILE_CONNECT_TMP);
284 else
285 redirige_url_ecrire('install');
286
287 if (file_exists(_FILE_CHMOD_TMP))
288 include(_FILE_CHMOD_TMP);
289 else
290 redirige_url_ecrire('install');
291
292 $hidden = predef_ou_cache($adresse_db, $login_db, $pass_db, $server_db)
293 . (defined('_INSTALL_NAME_DB') ? ''
294 : "\n<input type='hidden' name='sel_db' value='$sel_db' />");
295 $res = "<p class='resultat ok'><b>"
296 . _T('info_base_installee')
297 . "</b></p>"
298 . install_premier_auteur(_request('email'),
299 _request('login'),
300 _request('nom'),
301 _request('pass'),
302 $hidden)
303 . (($ldap_present OR !function_exists('ldap_connect'))
304 ? '' : install_propose_ldap());
305 }
306
307 echo install_debut_html();
308 echo $res;
309 echo install_fin_html();
310 }
311
312 ?>