Bifurcation depuis
spip / spip
11049 validations de retard le dépôt en amont.
install.php 14,02 Kio
<?php
/***************************************************************************\
* SPIP, Systeme de publication pour l'internet *
* *
* Copyright (c) 2001-2008 *
* Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James *
* *
* Ce programme est un logiciel libre distribue sous licence GNU/GPL. *
* Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne. *
\***************************************************************************/
if (!defined("_ECRIRE_INC_VERSION")) return;
// Pour ecrire les fichiers memorisant les parametres de connexion
// http://doc.spip.org/@install_fichier_connexion
function install_fichier_connexion($nom, $texte)
{
$texte = "<"."?php\n"
. "if (!defined(\"_ECRIRE_INC_VERSION\")) return;\n"
. $texte
. "?".">";
ecrire_fichier($nom, $texte);
}
// Attention etape_ldap4 suppose qu'il n'y aura qu'un seul appel de fonction
// dans le fichier produit.
// http://doc.spip.org/@install_connexion
function install_connexion($adr, $port, $login, $pass, $base, $type, $pref, $ldap='')
{
return "\$GLOBALS['spip_connect_version'] = 0.7;\n"
. "spip_connect_db("
. "'$adr','$port','$login','"
. addcslashes($pass, "'\\") . "','$base'"
. ",'$type', '$pref','$ldap');\n";
}
// http://doc.spip.org/@analyse_fichier_connection
function analyse_fichier_connection($file)
{
$s = @join('', file($file));
if (preg_match("#mysql_connect\([\"'](.*)[\"'],[\"'](.*)[\"'],[\"'](.*)[\"']\)#", $s, $regs)) {
array_shift($regs);
return $regs;
} else if (preg_match("#spip_connect_db\('([^']*)'\s*,\s*'([^']*)'\s*,\s*'([^']*)'\s*,\s*'([^']*)'\s*,\s*'([^']*)'\s*,\s*'([^']*)#", $s, $regs)) {
$regs[2] = $regs[1] . (!$regs[2] ? '' : ":$port_db;");
array_shift($regs);
array_shift($regs);
return $regs;
} else spip_log("$file n'est pas un fichier de connexion");
return '';
}
// http://doc.spip.org/@bases_referencees
function bases_referencees($exclu='')
{
$tables = array();
foreach(preg_files(_DIR_CONNECT, '.php$') as $f) {
if ($f != $exclu AND analyse_fichier_connection($f))
$tables[]= basename($f, '.php');
}
return $tables;
}
//
// Verifier que l'hebergement est compatible SPIP ... ou l'inverse :-)
// (sert a l'etape 1 de l'installation)
// http://doc.spip.org/@tester_compatibilite_hebergement
function tester_compatibilite_hebergement() {
$err = array();
$p = phpversion();
if (preg_match(',^([0-9]+)\.([0-9]+)\.([0-9]+),', $p, $regs)) {
$php = array($regs[1], $regs[2], $regs[3]);
$m = '4.0.8';
$min = explode('.', $m);
if ($php[0]<$min[0]
OR ($php[0]==$min[0] AND $php[1]<$min[1])
OR ($php[0]==$min[0] AND $php[1]==$min[1] AND $php[2]<$min[2]))
$err[] = _T('install_php_version', array('version' => $p, 'minimum' => $m));
}
// Il faut une base de donnees tout de meme ...
if (!function_exists('mysql_query')
AND !function_exists('pg_connect')
AND !function_exists('sqlite_open'))
$err[] = _T('install_extension_php_obligatoire')
. " <a href='http://www.php.net/mysql'>MYSQL</a>"
. "| <a href='http://www.php.net/pgsql'>PostgreSQL</a>"
. "| <a href='http://www.php.net/sqlite'>SQLite</a>";
// et il faut preg
if (!function_exists('preg_match_all'))
$err[] = _T('install_extension_php_obligatoire')
. " <a href='http://se.php.net/pcre'>PCRE</a>";
// et surtout pas ce mbstring.overload
if ($a = @ini_get('mbstring.func_overload'))
$err[] = _T('install_extension_mbstring')
. "mbstring.func_overload=$a - <a href='http://www.php.net/mb_string'>mb_string</a>.<br /><small>";
if ($err) {
echo "<p class='verdana1 spip_large'><b>"._T('avis_attention').'</b></p><p>'._T('install_echec_annonce')."</p><ul>";
while (list(,$e) = each ($err))
echo "<li>$e</li>\n";
# a priori ici on pourrait die(), mais il faut laisser la possibilite
# de forcer malgre tout (pour tester, ou si bug de detection)
echo "</ul><hr />\n";
}
}
// Une fonction pour faciliter la recherche du login (superflu ?)
// http://doc.spip.org/@login_hebergeur
function login_hebergeur() {
global $HTTP_X_HOST, $REQUEST_URI, $SERVER_NAME, $HTTP_HOST;
$base_hebergeur = 'localhost'; # par defaut
// Lycos (ex-Multimachin)
if ($HTTP_X_HOST == 'membres.lycos.fr') {
preg_match(',^/([^/]*),', $REQUEST_URI, $regs);
$login_hebergeur = $regs[1];
}
// Altern
else if (preg_match(',altern\.com$,', $SERVER_NAME)) {
preg_match(',([^.]*\.[^.]*)$,', $HTTP_HOST, $regs);
$login_hebergeur = preg_replace('[^\w\d]', '_', $regs[1]);
}
// Free
else if (preg_match(',(.*)\.free\.fr$,', $SERVER_NAME, $regs)) {
$base_hebergeur = 'sql.free.fr';
$login_hebergeur = $regs[1]; } else $login_hebergeur = '';
return array($base_hebergeur, $login_hebergeur);
}
// http://doc.spip.org/@info_etape
function info_etape($titre, $complement = ''){
return "<h2>".$titre."</h2>\n" .
($complement ? "<br />".$complement."\n":'');
}
// http://doc.spip.org/@bouton_suivant
function bouton_suivant($code = '') {
if($code=='') $code = _T('bouton_suivant');
static $suivant = 0;
$id = 'suivant'.(($suivant>0)?strval($suivant):'');
$suivant +=1;
return "\n<span class='suivant'><input id='".$id."' type='submit' class='fondl'\nvalue=\"" .
$code .
" >>\" /></span>\n";
}
// http://doc.spip.org/@info_progression_etape
function info_progression_etape($en_cours,$phase,$dir, $erreur = false){
//$en_cours = _request('etape')?_request('etape'):"";
$liste = find_all_in_path($dir,$phase.'(([0-9])+|fin)[.]php$');
$debut = 1; $etat = "ok";
$last = count($liste);
// $texte_etat = array('ok'=>'OK','encours'=>_T('en_cours'),'todo'=>_T('todo'));
$intitule_etat["etape_"][1] = _T('info_connexion_base_donnee');
$intitule_etat["etape_"][2] = _T('menu_aide_installation_choix_base');
$intitule_etat["etape_"][3] = _T('info_informations_personnelles');
$intitule_etat["etape_"][4] = _T('info_derniere_etape');
$intitule_etat["etape_ldap"][1] = _T('titre_connexion_ldap');
$intitule_etat["etape_ldap"][2] = _T('titre_connexion_ldap');
$intitule_etat["etape_ldap"][3] = _T('info_chemin_acces_1');
$intitule_etat["etape_ldap"][4] = _T('info_reglage_ldap');
$intitule_etat["etape_ldap"][5] = _T('info_ldap_ok');
// $aff_etapes = "<span id='etapes'>";
$aff_etapes = "<ol id='infos_etapes'>";
foreach($liste as $etape=>$fichier){
/* if ($etape=="$phase$en_cours.php"){
$etat = "encours";
}
$aff_etapes .= ($debut<$last)
? "<span class='$etat'><span>"._T('etape')." </span><em>$debut</em><span> " . $texte_etat[$etat] . ",<br /></span> </span>"
: '';
if ($etat == "encours")
$etat = 'todo';
*/
if ($debut < $last) {
if ($debut == $en_cours && $erreur) $class = "on erreur";
else if ($debut == $en_cours) $class = "on";
else if ($debut > $en_cours) $class = "prochains";
else $class = "valides";
$aff_etapes .= "<li class='$class'><div class='fond'>";
$aff_etapes .= "<span class='numero_etape'>$debut</span>".$intitule_etat["$phase"][$debut];
$aff_etapes .= "</div></li>";
}
$debut++;
}
$aff_etapes .= "</ol>";
$aff_etapes .= "<br class='nettoyeur' /\n"; return $aff_etapes;
}
// http://doc.spip.org/@fieldset
function fieldset($legend, $champs = array(), $horchamps='') {
$fieldset = "<fieldset>\n" .
($legend ? "<legend>".$legend."</legend>\n" : '');
foreach ($champs as $nom => $contenu) {
$type = isset($contenu['hidden']) ? 'hidden' : (preg_match(',^pass,', $nom) ? 'password' : 'text');
$class = isset($contenu['hidden']) ? '' : "class='formo' size='40' ";
if(isset($contenu['alternatives'])) {
$fieldset .= $contenu['label'] ."\n";
foreach($contenu['alternatives'] as $valeur => $label) {
$fieldset .= "<input type='radio' name='".$nom .
"' id='$nom-$valeur' value='$valeur'"
.(($valeur==$contenu['valeur'])?"\nchecked='checked'":'')
.(preg_match(',^(pass|login),', $nom)
?"\nautocomplete='off'"
:'')
."/>\n";
$fieldset .= "<label for='$nom-$valeur'>".$label."</label>\n";
}
$fieldset .= "<br />\n";
}
else {
$fieldset .= "<label for='".$nom."'>".$contenu['label']."</label>\n";
$fieldset .= "<input ".$class."type='".$type."' id='" . $nom . "' name='".$nom."'\nvalue='".$contenu['valeur']."' />\n";
}
}
$fieldset .= "$horchamps</fieldset>\n";
return $fieldset;
}
// http://doc.spip.org/@install_connexion_form
function install_connexion_form($db, $login, $pass, $predef, $hidden, $etape)
{
// demander les version dispo de postgres
if (include_spip('req/pg')) {
$versions = spip_versions_pg();
$pg = !!$versions;
}
// demander les version dispo de mysql
if (include_spip('req/mysql')) {
$versions = spip_versions_mysql();
$mysql = !!$versions;
}
// demander les version dispo de sqlite
if (include_spip('req/sqlite_generique')) {
$versions = spip_versions_sqlite();
$sqlite2 = in_array(2, $versions);
$sqlite3 = in_array(3, $versions);
}
// ne pas cacher le formulaire s'il n'a qu'un serveur :
// ca permet de se rendre compte de ce qu'on fait !
/*
if (($pg + $mysql + $sqlite2 + $sqlite3) == 1){
if ($mysql) $server_db = 'mysql';
if ($pg) $server_db = 'pg';
if ($sqlite2) $server_db = 'sqlite2';
if ($sqlite3) $server_db = 'sqlite3';
} else
*/
// le cacher si l'installation est predefinie avec un serveur particulier
if ($predef[0]) { $server_db = $predef[0];
}
return generer_form_ecrire('install', (
"\n<input type='hidden' name='etape' value='$etape' />"
. $hidden
. (_request('echec')?
("<p><b>"._T('avis_connexion_echec_1').
"</b></p><p>"._T('avis_connexion_echec_2')."</p><p style='font-size: small;'>"._T('avis_connexion_echec_3')."</p>")
:"")
. http_script('', 'jquery.js')
. http_script('
$(document).ready(function() {
$("input[@type=hidden][@name=server_db]").each(function(){
if ($(this).attr("value").match("sqlite*")){
$("#install_adresse_base_hebergeur").hide();
$("#install_login_base_hebergeur").hide();
$("#install_pass_base_hebergeur").hide();
}
});
$("#sql_serveur_db").change(function(){
if ($(this).find("option:selected").attr("value").match("sqlite*")){
$("#install_adresse_base_hebergeur").hide();
$("#install_login_base_hebergeur").hide();
$("#install_pass_base_hebergeur").hide();
} else {
$("#install_adresse_base_hebergeur").show();
$("#install_login_base_hebergeur").show();
$("#install_pass_base_hebergeur").show();
}
});
});')
. ($server_db
? '<input type="hidden" name="server_db" value="'.$server_db.'" />'
. (($predef[0])
?('<b>'._T('install_serveur_hebergeur').'</b>')
:'')
: ('<fieldset><legend>'
._T('install_select_type_db')
. "</legend>"
.'<label for="sql_serveur_db">'
. _T('install_types_db_connus')
// Passer l'avertissement SQLIte en commentaire, on pourra facilement le supprimer par la suite sans changer les traductions.
. "<br /><small>(". _T('install_types_db_connus_avertissement') .')</small>'
.'</label>'
. "\n<div><select name='server_db' id='sql_serveur_db' >"
. ($mysql
? "\n<option value='mysql'>"._T('install_select_type_mysql')."</option>"
: '')
. ($pg
? "\n<option value='pg'>"._T('install_select_type_pgsql')."</option>"
: '')
. (($sqlite2)
? "\n<option value='sqlite2'>"._T('install_select_type_sqlite2')."</option>"
: '')
. (($sqlite3)
? "\n<option value='sqlite3'>"._T('install_select_type_sqlite3')."</option>"
: '')
. "\n</select></div></fieldset>")
)
. '<div id="install_adresse_base_hebergeur">'
. ($predef[1]
? '<h3>'._T('install_adresse_base_hebergeur').'</h3>'
: fieldset(_T('entree_base_donnee_1'),
array(
'adresse_db' => array(
'label' => $db[1],
'valeur' => $db[0] ),
)
)
)
. '</div>'
. '<div id="install_login_base_hebergeur">'
. ($predef[2]
? '<h3>'._T('install_login_base_hebergeur').'</h3>'
: fieldset(_T('entree_login_connexion_1'),
array(
'login_db' => array(
'label' => $login[1],
'valeur' => $login[0]
),
)
)
)
. '</div>'
. '<div id="install_pass_base_hebergeur">'
. ($predef[3]
? '<h3>'._T('install_pass_base_hebergeur').'</h3>'
: fieldset(_T('entree_mot_passe_1'),
array(
'pass_db' => array(
'label' => $pass[1],
'valeur' => $pass[0]
),
)
)
)
. '</div>'
. bouton_suivant()));
}
// 4 valeurs qu'on reconduit d'un script a l'autre
// sauf s'ils sont predefinis.
// http://doc.spip.org/@predef_ou_cache
function predef_ou_cache($adresse_db, $login_db, $pass_db, $server_db)
{
return ((defined('_INSTALL_HOST_DB'))
? ''
: "\n<input type='hidden' name='adresse_db' value=\"".htmlspecialchars($adresse_db)."\" />"
)
. ((defined('_INSTALL_USER_DB'))
? ''
: "\n<input type='hidden' name='login_db' value=\"".htmlspecialchars($login_db)."\" />"
)
. ((defined('_INSTALL_PASS_DB'))
? ''
: "\n<input type='hidden' name='pass_db' value=\"".htmlspecialchars($pass_db)."\" />"
)
. ((defined('_INSTALL_SERVER_DB'))
? ''
: "\n<input type='hidden' name='server_db' value=\"".htmlspecialchars($server_db)."\" />"
);
}
// presentation des bases existantes
// http://doc.spip.org/@install_etape_liste_bases
function install_etape_liste_bases($server_db, $disabled=array())
{
$result = sql_listdbs($server_db);
if (!$result) return '';
$bases = $checked = $noms = array();
// si sqlite : result est deja un tableau
if (is_array($result)){
$noms = $result;
} else {
while ($row = sql_fetch($result, $server_db)) {
$noms[] = array_shift($row);
}
}
foreach ($noms as $nom){
$id = htmlspecialchars($nom);
$dis = in_array($nom, $disabled) ? " disabled='disabled'" : '';
$base = " name=\"choix_db\" value=\""
. $nom
. '"'
. $dis
. " type='radio' id='$id'";
$label = "<label for='$id'>"
. ($dis ? "<i>$nom</i>" : $nom)
. "</label>";
if (!$checked AND !$dis AND
(($nom == $login_db) OR
($GLOBALS['table_prefix'] == $nom))) {
$checked = "<input$base checked='checked' />\n$label";
} else {
$bases[]= "<input$base />\n$label";
}
}
if (!$bases && !$checked) return false;
if ($checked) {array_unshift($bases, $checked); $checked = true;}
return array($checked, $bases);
}
?>