[SPIP] ~2.1.12 -->2.1.25
[velocampus/web/www.git] / www / ecrire / install / etape_sup1.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('inc/acces');
17 include_spip('install/etape_2');
18
19 // Mise en place d'un fichier de connexion supplementaire
20 // Le serveur n'est pas forcement celui standard
21 // mais on se rabat dessus si on n'a pas mieux.
22
23 // http://doc.spip.org/@install_etape_sup1_dist
24 function install_etape_sup1_dist()
25 {
26 $adresse_db = _request('adresse_db');
27 if (!$adresse_db AND defined('_INSTALL_HOST_DB'))
28 $adresse_db =_INSTALL_HOST_DB;
29
30 $login_db = _request('login_db');
31 if (!$login_db AND defined('_INSTALL_USER_DB'))
32 $login_db = _INSTALL_USER_DB;
33
34 $pass_db = _request('pass_db');
35 if (!$pass_db AND defined('_INSTALL_PASS_DB'))
36 $pass_db = _INSTALL_PASS_DB;
37
38 $server_db =_request('server_db');
39 if (!$server_db AND defined('_INSTALL_SERVER_DB'))
40 $server_db = _INSTALL_SERVER_DB;
41
42 // Ceci indique la base principale (passe en hidden)
43 // pour qu'on la refuse comme choix de base secondaire
44
45 $sel_db =_request('sel_db');
46 if (!$sel_db AND defined('_INSTALL_NAME_DB'))
47 $sel_db = _INSTALL_NAME_DB;
48
49 echo install_debut_html(_T('config_titre_base_sup'));
50
51 $link = spip_connect_db($adresse_db, 0, $login_db, $pass_db, '', $server_db);
52 $GLOBALS['connexions'][$server_db][$GLOBALS['spip_sql_version']]
53 = $GLOBALS['spip_' . $server_db .'_functions_' . $GLOBALS['spip_sql_version']];
54
55 if ($link) {
56 $GLOBALS['connexions'][$server_db] = $link;
57
58 echo '<div style="background-color: #eeeeee">';
59 echo "\n<!--\n", join(', ', $link), " $login_db ";
60 echo join(', ', $GLOBALS['connexions'][$server_db]);
61 echo "\n-->\n<p class='resultat'><b>";
62 echo _T('info_connexion_ok'),"</b></p>\n";
63 echo '<!-- ', sql_version($server_db), ' -->' ;
64 $l = bases_referencees();
65 array_push($l, $sel_db);
66 list(, $res) = install_etape_liste_bases($server_db, $login_db, $l);
67
68 $hidden = predef_ou_cache($adresse_db,$login_db,$pass_db, $server_db)
69 . (defined('_INSTALL_NAME_DB')
70 ? ''
71 : ("\n<input type='hidden' name='sel_db' value='$sel_db' />\n"));
72
73 echo install_etape_sup1_form($hidden, '', $res, 'sup2');
74 echo '</div>';
75 } else {
76 echo info_etape(_T('info_connexion_base'));
77 echo "<p class='resultat'><b>",
78 _T('avis_connexion_echec_1'),
79 "</b></p>";
80 }
81
82 echo install_fin_html();
83 }
84
85 // http://doc.spip.org/@install_etape_sup1_form
86 function install_etape_sup1_form($hidden, $checked, $bases, $etape)
87 {
88 if ($bases) {
89 $bases = "\n<fieldset><legend>"
90 . _T('config_titre_base_sup_choix')
91 . "</legend>\n"
92 . "<ul>\n<li>"
93 . join("</li>\n<li>",$bases)
94 . "</li>\n</ul><p>"
95 . _T('info_ou');
96 $type = " type='radio'" . ($checked ? '' : " checked='checked'");
97
98 } else {
99 $bases = _T('config_erreur_base_sup') . '<br /><br >';
100 $type = " type='hidden'";
101 }
102
103 return generer_form_ecrire('install', (
104 "\n<input type='hidden' name='etape' value='$etape' />"
105 . $hidden
106 . $bases
107 . "\n<input name=\"choix_db\" value='-1' id='nou'"
108 . $type
109 . " />\n"
110 . "<label for='nou'><b>"
111 ._T('config_choix_base_sup')
112 ."</b></label></p>\n"
113 . "\n<input type='text' name='table_new' class='text' size='20' /></p></fieldset>\n"
114 . bouton_suivant()));
115 }
116 ?>