chamilo-lms/main/admin/system_management.php

<?php

/**
 * 
 * 
 * @package chamilo.admin
 * @author Laurent Opprecht <laurent@opprecht.info>
 * @license see /license.txt
 */
$language_file = array('admin');
$cidReset = true;
require_once '../inc/global.inc.php';
require_once __DIR__ . '/admin_page.class.php';

class SystemManagementPage extends AdminPage
{

    const PARAM_ACTION = 'action';
    const PARAM_SECURITY_TOKEN = 'sec_token';
    const ACTION_DEFAULT = 'list';
    const ACTION_SECURITY_FAILED = 'security_failed';

    function get_action()
    {
        $result = Request::get(self::PARAM_ACTION, self::ACTION_DEFAULT);
        if ($result != self::ACTION_DEFAULT) {
            $passed = Security::check_token('get');
            Security::clear_token();
            $result = $passed ? $result : self::ACTION_SECURITY_FAILED;
        }
        return $result;
    }

    function url($params)
    {
        $token = Security::get_token();
        $params[self::PARAM_SECURITY_TOKEN] = $token;
        return Uri::here($params);
    }

    function display_default()
    {
        $message = get_lang('RemoveOldDatabaseMessage');
        $url = $this->url(array(self::PARAM_ACTION => 'drop_old_databases'));
        $go = get_lang('go');
        $url = api_get_current_access_url_id();
        $message2 = '';
        if ($url === 1) {
          if (api_is_windows_os()) {
              $message2 .= get_lang('SpaceUsedOnSystemCannotBeMeasuresOnWindows');
          } else {
              $dir = api_get_path(SYS_PATH);
              $du = exec('du -sh '.$dir,$err);
              list($size,$none) = explode("\t",$du);
              $limit = $_configuration[$url]['hosting_limit_disk_space'];
              $message2 .= sprintf(get_lang('TotalSpaceUsedByPortalXLimitIsYMB'),$size,$limit);
          }
        }
        if (!empty($message2)) {
            $message2 = '<li>'.$message2.'</li>';
        }
        echo <<<EOT
        <ul>
        <li>
            <div>$message</div>        
            <a href=$url>$go</a>
        </li>
        $message2
        </ul>
EOT;
    }

    function display_security_failed()
    {
        Display::display_error_message(get_lang('NotAuthorized'));
    }

    function display_content()
    {
        $action = $this->get_action();
        switch ($action) {
            case self::ACTION_DEFAULT:
                $this->display_default();
                return;

            case self::ACTION_SECURITY_FAILED:
                $this->display_security_failed();
                return;

            default:
                $f = array($this, $action);
                if (is_callable($f)) {
                    call_user_func($f);
                    return;
                } else {
                    Display::display_error_message(get_lang('UnknownAction'));
                }
                return;
        }
    }

    /**
     *
     * @return ResultSet 
     */
    function get_old_databases()
    {
        $course_db = Database::get_main_table(TABLE_MAIN_COURSE);
        $sql = "SELECT id, code, db_name, directory, course_language FROM $course_db WHERE target_course_code IS NULL AND db_name IS NOT NULL ORDER BY code";
        return new ResultSet($sql);
    }

    function drop_old_databases()
    {
        $result = array();
        $courses = $this->get_old_databases();
        $course_db = Database::get_main_table(TABLE_MAIN_COURSE);
        foreach ($courses as $course) {
            $drop_statement = 'DROP DATABASE ' . $course['db_name'];
            $success = Database::query($drop_statement);
            if ($sucess) {
                /*
                 * Note that Database::update do not supports null statements so
                 * we do it by hand here.
                 */
                $id = $course['id'];                
                $update_statement = "UPDATE $course_db SET db_name = NULL WHERE id = $id";
                Database::query($update_statement);
                $result[] = $course['db_name'];
            }
        }
        
        Display::display_confirmation_message(get_lang('OldDatabasesDeleted') . ' ' . count($result));
        return $result;
    }

}

$page = new SystemManagementPage();
$page->display();