";
echo ("Dropping instance databases \n");
vchamilo_drop_databases($instance);
// Remove all files and eventual symlinks
$absalternatecourse = vchamilo_get_config('vchamilo', 'course_real_root');
if (!empty($absalternatecourse)){
// this is the relocated case
$coursedir = str_replace('//', '/', $absalternatecourse.'/'.$instance->course_folder);
} else {
// this is the standard local case
$coursedir = api_get_path(SYS_PATH).$instance->course_folder;
}
$standardlocation = str_replace('//', '/', $_configuration['root_sys'].'/'.$instance->course_folder); // where it should be
echo ("Deleting $coursedir \n");
removeDir($coursedir);
if (is_link($standardlocation)) {
unlink($standardlocation);
}
preg_match('#https?://([^\.]+)#', $instance->root_web, $matches);
$home_folder = $matches[1];
$archive_folder = $matches[1]; // prepare it now
if ($absalternatehome = vchamilo_get_config('vchamilo', 'home_real_root')){
$homedir = str_replace('//', '/', $absalternatehome.'/'.$home_folder);
} else {
$homedir = api_get_path(SYS_PATH).'home/'.$home_folder;
}
$standardlocation = $_configuration['root_sys'].'home/'.$home_folder; // where it should be
echo ("Deleting $homedir \n");
removeDir($homedir);
if (is_link($standardlocation)) {
unlink($standardlocation);
}
// delete archive
if($absalternatearchive = vchamilo_get_config('vchamilo', 'archive_real_root')){
$archivedir = str_replace('//', '/', $absalternatearchive.'/'.$archive_folder);
} else {
$archivedir = $_configuration['root_sys'].'archive/'.$archive_folder;
}
$standardlocation = $_configuration['root_sys'].'archive/'.$archive_folder; // where it should be
echo ("Deleting $archivedir \n");
removeDir($archivedir);
if (is_link($standardlocation)) {
unlink($standardlocation);
}
echo '
';
echo ("Removing vchamilo record \n");
$sql = "
DELETE FROM
{$table}
WHERE
id = {$instance->id}
";
Database::query($sql);
}
// vchamilo_redirect($_configuration['root_web'].'/plugin/vchamilo/views/manage.php');
}
if ($action == 'snapshotinstance') {
$vid = $_REQUEST['vid'];
if ($vid) {
$vhosts = Database::select('*', 'vchamilo', array('where' => array('id = ?' => $vid)));
$vhost = (object)array_pop($vhosts);
} else {
$vhost = (object)$_configuration;
}
// Parsing url for building the template name.
$wwwroot = $vhost->root_web;
$vchamilostep = $_REQUEST['step'];
preg_match('#https?://([^/]+)#', $wwwroot, $matches);
$hostname = $matches[1];
// Make template directory (files and SQL).
$separator = DIRECTORY_SEPARATOR;
$templatefoldername = 'plugin'.$separator.'vchamilo'.$separator.'templates';
$relative_datadir = $templatefoldername.$separator.$hostname.'_vchamilodata';
$absolute_datadir = $_configuration['root_sys'].$relative_datadir;
$relative_sqldir = $templatefoldername.$separator.$hostname.'_sql';
$absolute_sqldir = $_configuration['root_sys'].$separator.$relative_sqldir;
// $absolute_templatesdir = api_get_path(SYS_PATH, CHAMILO_ARCHIVE_PATH).$separator.$templatefoldername; // can be problematic as self containing
$absolute_templatesdir = $_configuration['root_sys'].$templatefoldername;
if (preg_match('/ /', $absolute_sqldir)){
$erroritem = new StdClass();
$erroritem->message = $plugininstance->get_lang('errorspacesinpath');
vchamilo_print_error(array($erroritem));
}
if (!is_dir($absolute_templatesdir)){
mkdir($absolute_templatesdir, 0777, true);
}
if ($vchamilostep == 0) {
// Create directories, if necessary.
if (!is_dir($absolute_datadir)){
mkdir($absolute_datadir, 0777, true);
mkdir($absolute_datadir.'/archive', 0777, true);
mkdir($absolute_datadir.'/home', 0777, true);
}
if (!is_dir($absolute_sqldir)) {
mkdir($absolute_sqldir, 0777, true);
}
if (empty($fullautomation)) {
$actionurl = $_configuration['root_web'].'/plugin/vchamilo/views/manage.php';
$content .= '';
$content .= '';
$tpl = new Template($tool_name, true, true, false, true, false);
$tpl->assign('actions', '');
$tpl->assign('message', $plugininstance->get_lang('vchamilosnapshot1'));
$tpl->assign('content', $content);
$tpl->display_one_col_template();
die;
} else {
// continue next step
$vchamilostep = 1;
}
}
if ($vchamilostep >= 1) {
if ($wwwroot == $_configuration['root_web']) {
// Make fake Vchamilo record.
$vchamilo = vchamilo_make_this();
$vcoursepath = api_get_path(SYS_COURSE_PATH);
$vhomepath = api_get_path(SYS_HOME_PATH);
$varchivepath = api_get_path(SYS_ARCHIVE_PATH);
} else {
// Get Vchamilo known record.
$vchamilos = Database::select('*', 'vchamilo', array('where' => array('root_web = ?' => array($wwwroot))));
$vchamilo = (object)array_pop($vchamilos);
$vcoursepath = api_get_path(SYS_COURSE_PATH, (array)$vchamilo);
$vhomepath = api_get_path(SYS_HOME_PATH, (array)$vchamilo);
$varchivepath = api_get_path(SYS_ARCHIVE_PATH, (array)$vchamilo);
}
if ($vchamilostep == 1) {
// Auto dump the databases in a master template folder.
// this will create three files : chamilo_master_main.sql, chamilo_master_statistics.sql, chamilo_master_user_personal.sql
$errors = vchamilo_dump_databases($vchamilo, $absolute_sqldir.$separator.'chamilo_master');
if (empty($fullautomation)) {
if(!empty($errors)) {
$actionurl = $_configuration['root_web'].'/plugin/vchamilo/views/manage.php';
$message = vchamilo_print_error($errors, true);
$content .= '';
} else {
$actionurl = $_configuration['root_web'].'/plugin/vchamilo/views/manage.php';
$message = $plugininstance->get_lang('vchamilosnapshot2');
$content .= '';
}
$tpl = new Template($tool_name, true, true, false, true, false);
$tpl->assign('actions', '');
$tpl->assign('message', $message);
$tpl->assign('content', $content);
$tpl->display_one_col_template();
die;
}
}
// end of process
// copy chamilo data dirs and protect against copy recursion.
/*
echo "