surcharge possible de upgrade.php, et eviter de charger les fonctions...

surcharge possible de upgrade.php, et eviter de charger les fonctions debut/fin_admin a tous les coups

.gitattributes

@@ -319,6 +319,7 @@ ecrire/inc_statistiques_lang.php -text
 ecrire/inc_statistiques_referers.php -text
 ecrire/inc_statistiques_repartition.php -text
 ecrire/inc_synchro.php -text
+ecrire/inc_upgrade.php -text
 ecrire/lang/ecrire_br.php3 -text
 ecrire/lang/ecrire_ru.php3 -text
 ecrire/lang/public_br.php3 -text

ecrire/inc.php3

@@ -123,13 +123,15 @@ topmargin='0' leftmargin='0' marginwidth='0' marginheight='0' frameborder='0'" .
   ($spip_lang_rtl ? " dir='rtl'" : "");
 
 //
-// Gestion de version, sauf si justement on est en train de le faire
+// Controle de la version, sauf si on est deja en train de s'en occuper
 //
 
-if ($reinstall != 'oui') {
-	include_ecrire('inc_admin.php3');
-	// ... ou qu'il s'agit d'une autre intervention avec debut_admin
-	if ((!isset($reinstall)) && (demande_maj_version())) exit;
- }
+if (!isset($reinstall)) {
+
+	if ($spip_version <> ((double) str_replace(',','.',$GLOBALS['meta']['version_installee']))) {
 
+	  include_ecrire('inc_upgrade.php');
+	  demande_maj_version();
+	}
+ }
 ?>

ecrire/inc_admin.php3

@@ -10,8 +10,6 @@
  *  Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne.   *
 \***************************************************************************/
 
-
-//
 if (!defined("_ECRIRE_INC_VERSION")) return;
 
 function fichier_admin($action) {
@@ -61,18 +59,4 @@ function fin_admin($action) {
 	@rmdir(_DIR_SESSIONS . $fichier);
 }
 
-function demande_maj_version()
-{
-	global $spip_version;
-	$version_installee = (double) str_replace(',','.',$GLOBALS['meta']['version_installee']);
-	if ($version_installee == $spip_version) return false;
-	include_ecrire("inc_presentation.php3");
-	debut_page();
-	if (!$version_installee) $version_installee = _T('info_anterieur');
-	echo "<blockquote><blockquote><h4><font color='red'>"._T('info_message_technique')."</font><br> "._T('info_procedure_maj_version')."</h4>
-	"._T('info_administrateur_site_01')." <a href='upgrade.php3'>"._T('info_administrateur_site_02')."</a></blockquote></blockquote><p>";
-	fin_page();
-	return true;
-}
-
 ?>

ecrire/inc_admin_tech.php

@@ -76,7 +76,7 @@ else {
 	echo "\n<INPUT TYPE='hidden' NAME='gz' VALUE='0'>";
 }
 
-echo "\n<p><DIV align='right'><INPUT CLASS='fondo' TYPE='submit' NAME='valider' VALUE='"._T('texte_sauvegarde_base')."'></FORM></DIV>";
+echo "\n<p><DIV align='right'><INPUT CLASS='fondo' TYPE='submit' VALUE='"._T('texte_sauvegarde_base')."'></FORM></DIV>";
 
 echo "</td></tr>";
 echo "</TABLE>";

ecrire/inc_delete_all.php

@@ -10,6 +10,8 @@
  *  Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne.   *
 \***************************************************************************/
 
+include_ecrire('inc_admin.php3');
+
 function delete_all_dist()
 {
 $action = _T('titre_page_delete_all');

ecrire/inc_export_all.php

@@ -11,6 +11,7 @@
 \***************************************************************************/
 
 include_ecrire ("inc_export.php3");
+include_ecrire('inc_admin.php3');
 
 function export_all_dist()
 {

ecrire/inc_import_all.php

@@ -10,6 +10,8 @@
  *  Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne.   *
 \***************************************************************************/
 
+include_ecrire('inc_admin.php3');
+
 function verifier_version_sauvegarde ($archive) {
 	global $spip_version;
 	global $flag_gz;

ecrire/inc_upgrade.php

+<?php
+
+/***************************************************************************\
+ *  SPIP, Systeme de publication pour l'internet                           *
+ *                                                                         *
+ *  Copyright (c) 2001-2005                                                *
+ *  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.   *
+\***************************************************************************/
+
+function upgrade_dist()
+{
+
+  global $connect_id_auteur, $spip_version, $reinstall;
+
+  if (!_FILE_CONNECT) {
+	Header("Location: install.php3");
+	exit;
+  }
+
+// Si reinstallation necessaire, message ad hoc
+  if ($reinstall == 'oui') {
+
+	@copy(_FILE_CONNECT, _FILE_CONNECT_INS);
+
+	install_debut_html(_T('titre_page_upgrade')); 
+	echo "<p><b>",_T('texte_nouvelle_version_spip_1'),"</b><p> ";
+	echo _T('texte_nouvelle_version_spip_2');
+	echo "<p><div align='right'>";
+	echo '<form action="upgrade.php3">';
+	echo "<input type='submit' value=\"",
+	  _T('bouton_relancer_installation'),
+	  "\" class='fondl'>";
+	echo "</form>\n";
+	install_fin_html();
+	exit;
+  }
+
+// eviter les actions vides pour cause de fichier de langue inaccessible.
+  $upgrade_titre = _T('info_mise_a_niveau_base') ;
+  if (!$upgrade_titre) $upgrade_titre = 'info_mise_a_niveau_base';
+
+// Commentaire standard upgrade
+  $commentaire = _T('texte_mise_a_niveau_base_1');
+
+// Verifier la version
+  $version_installee = (double) str_replace(',','.',$GLOBALS['meta']['version_installee']);
+# NB: str_replace car, sur club-internet, il semble que version_installe soit
+# enregistree au format '1,812' et non '1.812'
+
+// Erreur downgrade (cas de double installation de fichiers SPIP sur une meme base)
+  if ($spip_version < $version_installee)
+	$commentaire = _T('info_mise_a_niveau_base_2');
+
+  // Qu'est-ce que tu fais ici?
+  if ($spip_version == $version_installee) {
+	@header("Location: ./");
+	exit;
+  }
+
+  include_ecrire('inc_admin.php3');
+
+  debut_admin($upgrade_titre, $commentaire);
+
+  include_ecrire ("inc_base.php3");
+
+  creer_base();
+  $ok = maj_base();
+
+  if ($ok) {
+	include_ecrire ("inc_acces.php3");
+	include_ecrire ("inc_config.php3");
+	ecrire_acces();
+	init_config();
+  }
+
+  fin_admin($upgrade_titre);
+
+  if ($ok) {
+	$hash = calculer_action_auteur("purger_cache");
+	redirige_par_entete("../spip_cache.php3?purger_cache=oui"
+		."&id_auteur=$connect_id_auteur&hash=$hash"
+		."&redirect=" .  _DIR_RESTREINT_ABS);
+  }
+  else {
+	echo _T('alerte_maj_impossible', array('version' => $spip_version));
+  }
+}
+
+function demande_maj_version()
+{
+	include_ecrire("inc_presentation.php3");
+	debut_page();
+	echo "<blockquote><blockquote><h4><font color='red'>",
+	_T('info_message_technique'),
+	"</font><br> ",
+	_T('info_procedure_maj_version'),
+	"</h4>",
+	_T('info_administrateur_site_01'),
+	" <a href='upgrade.php3'>",
+	_T('info_administrateur_site_02'),
+	"</a></blockquote></blockquote><p>";
+	fin_page();
+	exit;
+}
+
+?>

ecrire/unpack.php3

@@ -13,7 +13,7 @@
 
 $reinstall = 'non';
 include ("inc.php3");
-
+include_ecrire('inc_admin.php3');
 $action = _T('texte_unpack');
 
 debut_admin($action);

ecrire/upgrade.php3

@@ -10,85 +10,8 @@
  *  Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne.   *
 \***************************************************************************/
 
-
 if (!isset($reinstall)) $reinstall = 'non';
 include ("inc.php3");
-
-if (!_FILE_CONNECT) {
-	Header("Location: install.php3");
-	exit;
- }
-
-include_ecrire ("inc_acces.php3");
-include_ecrire ("inc_config.php3");
-include_ecrire ("inc_texte.php3");
-
-// Si reinstallation necessaire, message ad hoc
-if ($reinstall == 'oui') {
-
-	@copy(_FILE_CONNECT, _FILE_CONNECT_INS);
-
-	$link = new Link();
-
-	install_debut_html(_T('titre_page_upgrade')); echo "<p><b>"._T('texte_nouvelle_version_spip_1')."</b><p> ";
-	echo _T('texte_nouvelle_version_spip_2');
-	echo "<p><div align='right'>";
-	echo $link->getForm('GET');
-	echo "<input type='submit' name='submit' value=\""._T('bouton_relancer_installation')."\" class='fondl'>";
-	echo "</form>\n";
-
-	install_fin_html();
-	exit;
-}
-
-
-// eviter les actions vides pour cause de fichier de langue inaccessible.
-$upgrade_titre = _T('info_mise_a_niveau_base') ;
-if (!$upgrade_titre) $upgrade_titre = 'info_mise_a_niveau_base';
-
-// Commentaire standard upgrade
-$commentaire = _T('texte_mise_a_niveau_base_1');
-
-// Verifier la version
-$version_installee = (double) str_replace(',','.',$GLOBALS['meta']['version_installee']);
-# NB: str_replace car, sur club-internet, il semble que version_installe soit
-# enregistree au format '1,812' et non '1.812'
-
-// Erreur downgrade (cas de double installation de fichiers SPIP sur une meme base)
-if ($spip_version < $version_installee)
-	$commentaire = _T('info_mise_a_niveau_base_2');
-
-
-// Qu'est-ce que tu fais ici?
-if ($spip_version == $version_installee) {
-	@header("Location: index.php3");
-	exit;
-}
-
-debut_admin($upgrade_titre, $commentaire);
-
-include_ecrire ("inc_base.php3");
-
-creer_base();
-$ok = maj_base();
-
-if ($ok) {
-	ecrire_acces();
-	init_config();
-
-}
-
-fin_admin($upgrade_titre);
-
-if ($ok) {
-	$hash = calculer_action_auteur("purger_cache");
-	redirige_par_entete("../spip_cache.php3?purger_cache=oui"
-		."&id_auteur=$connect_id_auteur&hash=$hash"
-		."&redirect=" .  _DIR_RESTREINT_ABS . "index.php3");
-}
-else {
-	echo _T('alerte_maj_impossible', array('version' => $spip_version));
-	exit;
-}
-
+$var_f = include_fonction(basename($SCRIPT_NAME, _EXTENSION_PHP));
+$var_f();
 ?>