www/ecrire/exec/upgrade.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/actions');
  16 include_spip('inc/headers');
  17
  18 // http://doc.spip.org/@exec_upgrade_dist
  19 function exec_upgrade_dist() {
  20
  21         global $spip_version_base;
  22         if (!_FILE_CONNECT)
  23                 redirige_url_ecrire("install");
  24
  25         // Si reinstallation necessaire, message ad hoc
  26         if (_request('reinstall') == 'oui') {
  27                 include_spip('inc/minipres');
  28                 $r = minipres(_T('titre_page_upgrade'),
  29                                 "<p><b>"
  30                                 . _T('texte_nouvelle_version_spip_1')
  31                                 . "</b><p> "
  32                                 . _T('texte_nouvelle_version_spip_2',
  33                                    array('connect' => '<tt>' . _FILE_CONNECT . '</tt>'))
  34                                 . generer_form_ecrire('upgrade', "<input type='hidden' name='reinstall' value='non' />",'',     _T('bouton_relancer_installation')));
  35                 echo $r;
  36         } else {
  37
  38         if (!isset($GLOBALS['meta']['version_installee']))
  39                 $GLOBALS['meta']['version_installee'] = 0.0;
  40         else $GLOBALS['meta']['version_installee'] =
  41           (double) str_replace(',','.',$GLOBALS['meta']['version_installee']);
  42 # NB: str_replace car, sur club-internet, il semble que version_installe soit
  43 # enregistree au format '1,812' et non '1.812'
  44
  45         // Erreur downgrade
  46         // (cas de double installation de fichiers SPIP sur une meme base)
  47         if ($spip_version_base < $GLOBALS['meta']['version_installee'])
  48                 $commentaire = _T('info_mise_a_niveau_base_2');
  49         // Commentaire standard upgrade
  50         else $commentaire = _T('texte_mise_a_niveau_base_1');
  51
  52         $_POST['reinstall'] = 'non'; // pour copy_request dans admin
  53         include_spip('inc/headers');
  54         $admin = charger_fonction('admin', 'inc');
  55         $res = $admin('upgrade', _T('info_mise_a_niveau_base'), $commentaire);
  56         if ($res) echo $res;
  57         else {
  58                 $res = redirige_action_auteur('purger', 'cache', 'accueil', '', true);
  59                 redirige_par_entete($res);
  60         }
  61         }
  62 }
  63 ?>