2 // This file is part of Moodle - http://moodle.org/
4 // Moodle is free software: you can redistribute it and/or modify
5 // it under the terms of the GNU General Public License as published by
6 // the Free Software Foundation, either version 3 of the License, or
7 // (at your option) any later version.
9 // Moodle is distributed in the hope that it will be useful,
10 // but WITHOUT ANY WARRANTY; without even the implied warranty of
11 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 // GNU General Public License for more details.
14 // You should have received a copy of the GNU General Public License
15 // along with Moodle. If not, see <http://www.gnu.org/licenses/>.
20 * @package tool_dbtransfer
21 * @copyright 2008 Petr Skoda {@link http://skodak.org/}
22 * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
25 define('NO_OUTPUT_BUFFERING', true);
27 require('../../../config.php');
28 require_once('locallib.php');
29 require_once('database_transfer_form.php');
31 admin_externalpage_setup('tooldbtransfer');
34 $form = new database_transfer_form();
37 // If we have valid input.
38 if ($data = $form->get_data()) {
39 // Connect to the other database.
40 list($dbtype, $dblibrary) = explode('/', $data->driver
);
41 $targetdb = moodle_database
::get_driver_instance($dbtype, $dblibrary);
44 $dboptions['dbport'] = $data->dbport
;
46 if ($data->dbsocket
) {
47 $dboptions['dbsocket'] = $data->dbsocket
;
50 $targetdb->connect($data->dbhost
, $data->dbuser
, $data->dbpass
, $data->dbname
, $data->prefix
, $dboptions);
51 if ($targetdb->get_tables()) {
52 $problem .= get_string('targetdatabasenotempty', 'tool_dbtransfer');
54 } catch (moodle_exception
$e) {
55 $problem .= get_string('notargetconectexception', 'tool_dbtransfer').'<br />'.$e->debuginfo
;
58 if ($problem === '') {
59 // Scroll down to the bottom when finished.
60 $PAGE->requires
->js_init_code("window.scrollTo(0, 5000000);");
62 // Enable CLI maintenance mode if requested.
63 if ($data->enablemaintenance
) {
64 $PAGE->set_pagelayout('maintenance');
65 tool_dbtransfer_create_maintenance_file();
69 echo $OUTPUT->header();
70 $data->dbtype
= $dbtype;
71 $data->dbtypefrom
= $CFG->dbtype
;
72 echo $OUTPUT->heading(get_string('transferringdbto', 'tool_dbtransfer', $data));
75 $CFG->tool_dbransfer_migration_running
= true;
77 $feedback = new html_list_progress_trace();
78 tool_dbtransfer_transfer_database($DB, $targetdb, $feedback);
79 $feedback->finished();
80 } catch (Exception
$e) {
81 if ($data->enablemaintenance
) {
82 tool_dbtransfer_maintenance_callback();
84 unset($CFG->tool_dbransfer_migration_running
);
87 unset($CFG->tool_dbransfer_migration_running
);
90 echo $OUTPUT->notification(get_string('success'), 'notifysuccess');
91 echo $OUTPUT->continue_button("$CFG->wwwroot/$CFG->admin/");
92 echo $OUTPUT->footer();
97 // Otherwise display the settings form.
98 echo $OUTPUT->header();
99 echo $OUTPUT->heading(get_string('transferdbtoserver', 'tool_dbtransfer'));
101 $info = format_text(get_string('transferdbintro', 'tool_dbtransfer'), FORMAT_MARKDOWN
);
102 echo $OUTPUT->box($info);
105 if ($problem !== '') {
106 echo $OUTPUT->box($problem, 'generalbox error');
108 echo $OUTPUT->footer();