function schedule_inc_backup_course_execute($preferences, $starttime = 0)
{
global $CFG;
$status = true;
//Some parts of the backup doesn't know about $preferences, so we
//put a copy of it inside that CFG (always global) to be able to
//use it. Then, when needed I search for preferences inside CFG
//Used to avoid some problems in full_tag() when preferences isn't
//set globally (i.e. in scheduled backups)
$CFG->backup_preferences = $preferences;
//Check for temp and backup and backup_unique_code directory
//Create them as needed
backup_add_to_log($starttime, $preferences->backup_course, " checking temp structures", 'incrementalbackup');
$status = check_and_create_backup_dir($preferences->backup_unique_code);
//Empty backup dir
if ($status) {
backup_add_to_log($starttime, $preferences->backup_course, " cleaning current dir", 'incrementalbackup');
$status = clear_backup_dir($preferences->backup_unique_code);
}
//Create the moodle.xml file
if ($status) {
backup_add_to_log($starttime, $preferences->backup_course, " creating backup file", 'incrementalbackup');
//Obtain the xml file (create and open) and print prolog information
$backup_file = backup_open_xml($preferences->backup_unique_code);
//Prints general info about backup to file
if ($backup_file) {
backup_add_to_log($starttime, $preferences->backup_course, " general info", 'incrementalbackup');
$status = backup_general_info($backup_file, $preferences);
} else {
$status = false;
}
//Prints course start (tag and general info)
if ($status) {
$status = backup_course_start($backup_file, $preferences);
}
//Metacourse information
if ($status && $preferences->backup_metacourse) {
backup_add_to_log($starttime, $preferences->backup_course, " metacourse info", 'incrementalbackup');
$status = backup_course_metacourse($backup_file, $preferences);
}
//Block info
if ($status) {
backup_add_to_log($starttime, $preferences->backup_course, " blocks info", 'incrementalbackup');
$status = backup_course_blocks($backup_file, $preferences);
}
//Section info
if ($status) {
backup_add_to_log($starttime, $preferences->backup_course, " sections info", 'incrementalbackup');
$status = backup_course_sections($backup_file, $preferences);
}
//User info
if ($status) {
backup_add_to_log($starttime, $preferences->backup_course, " user info", 'incrementalbackup');
$status = backup_user_info($backup_file, $preferences);
}
//If we have selected to backup messages and we are
//doing a SITE backup, let's do it
if ($status && $preferences->backup_messages && $preferences->backup_course == SITEID) {
backup_add_to_log($starttime, $preferences->backup_course, " messages", 'incrementalbackup');
if (!($status = backup_messages($backup_file, $preferences))) {
notify("An error occurred while backing up messages");
}
}
//If we have selected to backup blogs and we are
//doing a SITE backup, let's do it
if ($status && isset($preferences->backup_blogs) && isset($preferences->backup_course) && $preferences->backup_blogs && $preferences->backup_course == SITEID) {
schedule_backup_log($starttime, $preferences->backup_course, " blogs", 'incrementalbackup');
$status = backup_blogs($backup_file, $preferences);
}
//If we have selected to backup quizzes, backup categories and
//questions structure (step 1). See notes on mod/quiz/backuplib.php
if ($status and isset($preferences->mods['quiz']->backup)) {
backup_add_to_log($starttime, $preferences->backup_course, " categories & questions", 'incrementalbackup');
$status = backup_question_categories($backup_file, $preferences);
}
//Print logs if selected
if ($status) {
if ($preferences->backup_logs) {
backup_add_to_log($starttime, $preferences->backup_course, " logs", 'incrementalbackup');
$status = backup_log_info($backup_file, $preferences);
}
}
//Print scales info
if ($status) {
backup_add_to_log($starttime, $preferences->backup_course, " scales", 'incrementalbackup');
$status = backup_scales_info($backup_file, $preferences);
}
//Print groups info
if ($status) {
backup_add_to_log($starttime, $preferences->backup_course, " groups", 'incrementalbackup');
$status = backup_groups_info($backup_file, $preferences);
}
//Print groupings info
if ($status) {
backup_add_to_log($starttime, $preferences->backup_course, " groupings", 'incrementalbackup');
$status = backup_groupings_info($backup_file, $preferences);
}
//Print groupings_groups info
if ($status) {
backup_add_to_log($starttime, $preferences->backup_course, " groupings_groups", 'incrementalbackup');
$status = backup_groupings_groups_info($backup_file, $preferences);
}
//Print events info
if ($status) {
backup_add_to_log($starttime, $preferences->backup_course, " events", 'incrementalbackup');
$status = backup_events_info($backup_file, $preferences);
}
//Print gradebook info
if ($status) {
backup_add_to_log($starttime, $preferences->backup_course, " gradebook", 'incrementalbackup');
$status = backup_gradebook_info($backup_file, $preferences);
}
//Module info, this unique function makes all the work!!
//db export and module fileis copy
if ($status) {
$mods_to_backup = false;
//Check if we have any mod to backup
if (!empty($preferences->mods)) {
foreach ($preferences->mods as $module) {
if ($module->backup) {
$mods_to_backup = true;
}
}
}
//If we have to backup some module
if ($mods_to_backup) {
backup_add_to_log($starttime, $preferences->backup_course, " modules", 'incrementalbackup');
//Start modules tag
$status = backup_modules_start($backup_file, $preferences);
//Iterate over modules and call backup
foreach ($preferences->mods as $module) {
if ($module->backup and $status) {
backup_add_to_log($starttime, $preferences->backup_course, " {$module->name}", 'incrementalbackup');
$status = backup_module($backup_file, $preferences, $module->name);
}
}
//Close modules tag
$status = backup_modules_end($backup_file, $preferences);
}
}
//Backup course format data, if any.
if ($status) {
backup_add_to_log($starttime, $preferences->backup_course, " course format data", 'incrementalbackup');
$status = backup_format_data($backup_file, $preferences);
}
//Prints course end
if ($status) {
$status = backup_course_end($backup_file, $preferences);
}
//Close the xml file and xml data
if ($backup_file) {
backup_close_xml($backup_file);
}
}
//Now, if selected, copy user files
if ($status) {
if ($preferences->backup_user_files) {
backup_add_to_log($starttime, $preferences->backup_course, " copying user files", 'incrementalbackup');
$status = backup_copy_user_files($preferences);
}
}
//Now, if selected, copy course files
if ($status) {
if ($preferences->backup_course_files) {
backup_add_to_log($starttime, $preferences->backup_course, " copying course files", 'incrementalbackup');
$status = backup_copy_course_files($preferences);
}
}
//Now, if selected, copy site files
if ($status) {
if ($preferences->backup_site_files) {
backup_add_to_log($starttime, $preferences->backup_course, " copying site files", 'incrementalbackup');
$status = backup_copy_site_files($preferences);
}
}
//Now, zip all the backup directory contents
if ($status) {
backup_add_to_log($starttime, $preferences->backup_course, " zipping files", 'incrementalbackup');
$status = backup_zip($preferences);
}
//Now, copy the zip file to course directory
if ($status) {
backup_add_to_log($starttime, $preferences->backup_course, " copying backup", 'incrementalbackup');
$status = copy_zip_to_course_dir($preferences);
}
//Now, clean temporary data (db and filesystem)
if ($status) {
backup_add_to_log($starttime, $preferences->backup_course, " cleaning temp data", 'incrementalbackup');
$status = clean_temp_data($preferences);
}
//Unset CFG->backup_preferences only needed in scheduled backups
unset($CFG->backup_preferences);
return $status;
}
function schedule_backup_course_delete_old_files($preferences, $starttime = 0)
{
global $CFG;
$status = true;
//Calculate the directory to check
$dirtocheck = "";
//if $preferences->backup_destination isn't empty, then check that directory
if (!empty($preferences->backup_destination)) {
$dirtocheck = $preferences->backup_destination;
//else calculate standard backup directory location
} else {
$dirtocheck = $CFG->dataroot . "/" . $preferences->backup_course . "/backupdata";
}
schedule_backup_log($starttime, $preferences->backup_course, " checking {$dirtocheck}");
if ($CFG->debug > 7) {
mtrace(" Keeping backup files in {$dirtocheck}");
}
//Get all the files in $dirtocheck
$files = get_directory_list($dirtocheck, "", false);
//Get all matching files ($preferences->keep_name) from $files
$matchingfiles = array();
foreach ($files as $file) {
if (substr($file, 0, strlen($preferences->keep_name)) == $preferences->keep_name) {
$modifieddate = filemtime($dirtocheck . "/" . $file);
$matchingfiles[$modifieddate] = $file;
}
}
//Sort by key (modified date) to get the oldest first (instead of doing that by name
//because it could give us problems in some languages with different format names).
ksort($matchingfiles);
//Count matching files
$countmatching = count($matchingfiles);
schedule_backup_log($starttime, $preferences->backup_course, " found {$countmatching} backup files");
mtrace(" found {$countmatching} backup files");
if ($preferences->backup_keep < $countmatching) {
schedule_backup_log($starttime, $preferences->backup_course, " keep limit ({$preferences->backup_keep}) reached. Deleting old files");
mtrace(" keep limit ({$preferences->backup_keep}) reached. Deleting old files");
$filestodelete = $countmatching - $preferences->backup_keep;
$filesdeleted = 0;
foreach ($matchingfiles as $matchfile) {
if ($filesdeleted < $filestodelete) {
schedule_backup_log($starttime, $preferences->backup_course, " {$matchfile} deleted");
mtrace(" {$matchfile} deleted");
$filetodelete = $dirtocheck . "/" . $matchfile;
unlink($filetodelete);
$filesdeleted++;
}
}
}
return $status;
}
