Proyectos de Subversion Moodle

<?php

// This file is part of Moodle - http://moodle.org/

//

// Moodle is free software: you can redistribute it and/or modify

// it under the terms of the GNU General Public License as published by

// the Free Software Foundation, either version 3 of the License, or

// (at your option) any later version.

//

// Moodle is distributed in the hope that it will be useful,

// but WITHOUT ANY WARRANTY; without even the implied warranty of

// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

// GNU General Public License for more details.

//

// You should have received a copy of the GNU General Public License

// along with Moodle.  If not, see <http://www.gnu.org/licenses/>.

/**

 * This file is the admin frontend to execute all the checks available

 * in the environment.xml file. It includes database, php and

 * php_extensions. Also, it's possible to update the xml file

 * from moodle.org be able to check more and more versions.

 *

 * @package    core

 * @subpackage admin

 * @copyright  2006 onwards Eloy Lafuente (stronk7) {@link http://stronk7.com}

 * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later

 */

require_once('../config.php');

require_once($CFG->libdir.'/adminlib.php');

require_once($CFG->libdir.'/environmentlib.php');

require_once($CFG->libdir.'/componentlib.class.php');

// Parameters

$action  = optional_param('action', '', PARAM_ALPHANUMEXT);

$version = optional_param('version', '', PARAM_FILE); //

$extraurlparams = array();

if ($version) {

    $extraurlparams['version'] = $version;

}

admin_externalpage_setup('environment', '', $extraurlparams);

// Handle the 'updatecomponent' action

if ($action == 'updatecomponent' && confirm_sesskey()) {

    // Create component installer and execute it

    if ($cd = new component_installer('https://download.moodle.org',

                                      'environment',

                                      'environment.zip')) {

        $status = $cd->install(); //returns COMPONENT_(ERROR | UPTODATE | INSTALLED)

        switch ($status) {

            case COMPONENT_ERROR:

                if ($cd->get_error() == 'remotedownloaderror') {

                    $a = new stdClass();

                    $a->url  = 'https://download.moodle.org/environment/environment.zip';

                    $a->dest = $CFG->dataroot . '/';

                    throw new \moodle_exception($cd->get_error(), 'error', $PAGE->url, $a);

                    die();

                } else {

                    throw new \moodle_exception($cd->get_error(), 'error', $PAGE->url);

                    die();

                }

            case COMPONENT_UPTODATE:

                redirect($PAGE->url, get_string($cd->get_error(), 'error'));

                die;

            case COMPONENT_INSTALLED:

                redirect($PAGE->url, get_string('componentinstalled', 'admin'));

                die;

        }

    }

}

// Get current Moodle version

$current_version = $CFG->release;

// Calculate list of versions

$versions = array();

if ($contents = load_environment_xml()) {

    if ($env_versions = get_list_of_environment_versions($contents)) {

        // Set the current version at the beginning

        $env_version = normalize_version($current_version); //We need this later (for the upwards)

        $versions[$env_version] = $current_version;

        // If no version has been previously selected, default to $current_version

        if (empty($version)) {

            $version =  $env_version;

        }

        //Iterate over each version, adding bigger than current

        foreach ($env_versions as $env_version) {

            if (version_compare(normalize_version($current_version), $env_version, '<')) {

                $versions[$env_version] = $env_version;

            }

        }

        // Add 'upwards' to the last element

        $versions[$env_version] = $env_version.' '.get_string('upwards', 'admin');

    } else {

        $versions = array('error' => get_string('error'));

    }

}

// Get the results of the environment check.

list($envstatus, $environment_results) = check_moodle_environment($version, ENV_SELECT_NEWER);

// Display the page.

$output = $PAGE->get_renderer('core', 'admin');

echo $output->environment_check_page($versions, $version, $envstatus, $environment_results);