moodle/mod/data/backuplib.php

445 lines
18 KiB
PHP

<?php
//This php script contains all the stuff to backup/restore data mod
//This is the "graphical" structure of the data mod:
//
// data
// (CL,pk->id)
// |
// |
// |
// ---------------------------------------------------------------------------------
// | |
//data_records (UL,pk->id, fk->data) data_fields (pk->id, fk->data)
// | |
// | |
// ----------------------------------------------------------------------------- |
// | | | |
//data_ratings(fk->recordid, pk->id) data_comments (fk->recordid, pk->id) | |
// data_content(pk->id, fk->recordid, fk->fieldid)
//
//
//
// Meaning: pk->primary key field of the table
// fk->foreign key to link with parent
// nt->nested field (recursive data)
// CL->course level info
// UL->user level info
// files->table may have files)
//
//-----------------------------------------------------------
//Backup data files because we've selected to backup user info
//and files are user info's level
//Return a content encoded to support interactivities linking. Every module
function data_backup_mods($bf,$preferences) {
global $CFG, $DB;
$status = true;
// iterate
if ($datas = $DB->get_records('data', array('course'=>$preferences->backup_course),"id")) {
foreach ($datas as $data) {
if (function_exists('backup_mod_selected')) {
// Moodle 1.6
$backup_mod_selected = backup_mod_selected($preferences, 'data', $data->id);
} else {
// Moodle 1.5
$backup_mod_selected = true;
}
if ($backup_mod_selected) {
$status = data_backup_one_mod($bf,$preferences,$data);
// backup files happens in backup_one_mod now too.
}
}
}
return $status;
}
function data_backup_one_mod($bf,$preferences,$data) {
global $CFG, $DB;
if (is_numeric($data)) { // backwards compatibility
$data = $DB->get_record('data', array('id'=>$data));
}
$instanceid = $data->id;
$status = true;
fwrite ($bf,start_tag("MOD",3,true));
//Print data data
fwrite ($bf,full_tag("ID",4,false,$data->id));
fwrite ($bf,full_tag("MODTYPE",4,false,"data"));
fwrite ($bf,full_tag("NAME",4,false,$data->name));
fwrite ($bf,full_tag("INTRO",4,false,$data->intro));
fwrite ($bf,full_tag("COMMENTS",4,false,$data->comments));
fwrite ($bf,full_tag("TIMEAVAILABLEFROM",4,false,$data->timeavailablefrom));
fwrite ($bf,full_tag("TIMEAVAILABLETO",4,false,$data->timeavailableto));
fwrite ($bf,full_tag("TIMEVIEWFROM",4,false,$data->timeviewfrom));
fwrite ($bf,full_tag("TIMEVIEWTO",4,false,$data->timeviewto));
fwrite ($bf,full_tag("REQUIREDENTRIES",4,false,$data->requiredentries));
fwrite ($bf,full_tag("REQUIREDENTRIESTOVIEW",4,false,$data->requiredentriestoview));
fwrite ($bf,full_tag("MAXENTRIES",4,false,$data->maxentries));
fwrite ($bf,full_tag("RSSARTICLES",4,false,$data->rssarticles));
fwrite ($bf,full_tag("SINGLETEMPLATE",4,false,$data->singletemplate));
fwrite ($bf,full_tag("LISTTEMPLATE",4,false,$data->listtemplate));
fwrite ($bf,full_tag("LISTTEMPLATEHEADER",4,false,$data->listtemplateheader));
fwrite ($bf,full_tag("LISTTEMPLATEFOOTER",4,false,$data->listtemplatefooter));
fwrite ($bf,full_tag("ADDTEMPLATE",4,false,$data->addtemplate));
fwrite ($bf,full_tag("RSSTEMPLATE",4,false,$data->rsstemplate));
fwrite ($bf,full_tag("RSSTITLETEMPLATE",4,false,$data->rsstitletemplate));
fwrite ($bf,full_tag("CSSTEMPLATE",4,false,$data->csstemplate));
fwrite ($bf,full_tag("JSTEMPLATE",4,false,$data->jstemplate));
fwrite ($bf,full_tag("ASEARCHTEMPLATE",4,false,$data->asearchtemplate));
fwrite ($bf,full_tag("APPROVAL",4,false,$data->approval));
fwrite ($bf,full_tag("SCALE",4,false,$data->scale));
fwrite ($bf,full_tag("ASSESSED",4,false,$data->assessed));
fwrite ($bf,full_tag("DEFAULTSORT",4,false,$data->defaultsort));
fwrite ($bf,full_tag("DEFAULTSORTDIR",4,false,$data->defaultsortdir));
fwrite ($bf,full_tag("EDITANY",4,false,$data->editany));
fwrite ($bf,full_tag("NOTIFICATION",4,false,$data->notification));
// if we've selected to backup users info, then call any other functions we need
// including backing up individual files
$status = backup_data_fields($bf,$preferences,$data->id);
if (backup_userdata_selected($preferences,'data',$data->id)) {
//$status = backup_someuserdata_for_this_instance();
//$status = backup_somefiles_for_this_instance();
// ... etc
$status = backup_data_records($bf,$preferences,$data->id);
if ($status) {
$status = backup_data_files_instance($bf,$preferences,$data->id); //recursive copy
}
}
fwrite ($bf,end_tag("MOD",3,true));
return $status;
}
function backup_data_fields($bf,$preferences,$dataid){
global $CFG, $DB;
$status = true;
$data_fields = $DB->get_records("data_fields", array("dataid"=>$dataid));
//If there is submissions
if ($data_fields) {
//Write start tag
$status =fwrite ($bf,start_tag("FIELDS",4,true));
//Iterate over each submission
foreach ($data_fields as $fie_sub) {
//Start submission
$status =fwrite ($bf,start_tag("FIELD",5,true));
//Print submission contents
fwrite ($bf,full_tag("ID",6,false,$fie_sub->id));
fwrite ($bf,full_tag("DATAID",6,false,$fie_sub->dataid));
fwrite ($bf,full_tag("TYPE",6,false,$fie_sub->type));
fwrite ($bf,full_tag("NAME",6,false,$fie_sub->name));
fwrite ($bf,full_tag("DESCRIPTION",6,false,$fie_sub->description));
fwrite ($bf,full_tag("PARAM1",6,false,$fie_sub->param1));
fwrite ($bf,full_tag("PARAM2",6,false,$fie_sub->param2));
fwrite ($bf,full_tag("PARAM3",6,false,$fie_sub->param3));
fwrite ($bf,full_tag("PARAM4",6,false,$fie_sub->param4));
fwrite ($bf,full_tag("PARAM5",6,false,$fie_sub->param5));
fwrite ($bf,full_tag("PARAM6",6,false,$fie_sub->param6));
fwrite ($bf,full_tag("PARAM7",6,false,$fie_sub->param7));
fwrite ($bf,full_tag("PARAM8",6,false,$fie_sub->param8));
fwrite ($bf,full_tag("PARAM9",6,false,$fie_sub->param9));
fwrite ($bf,full_tag("PARAM10",6,false,$fie_sub->param10));
//End submission
$status =fwrite ($bf,end_tag("FIELD",5,true));
}
//Write end tag
$status =fwrite ($bf,end_tag("FIELDS",4,true));
}
return $status;
}
function backup_data_content($bf,$preferences,$recordid){
global $CFG, $DB;
$status = true;
$data_contents = $DB->get_records("data_content", array("recordid"=>$recordid));
//If there is submissions
if ($data_contents) {
//Write start tag
$status =fwrite ($bf,start_tag("CONTENTS",6,true));
//Iterate over each submission
foreach ($data_contents as $cnt_sub) {
//Start submission
$status =fwrite ($bf,start_tag("CONTENT",7,true));
//Print submission contents
fwrite ($bf,full_tag("ID",8,false,$cnt_sub->id));
fwrite ($bf,full_tag("RECORDID",8,false,$cnt_sub->recordid));
fwrite ($bf,full_tag("FIELDID",8,false,$cnt_sub->fieldid));
fwrite ($bf,full_tag("CONTENT",8,false,$cnt_sub->content));
fwrite ($bf,full_tag("CONTENT1",8,false,$cnt_sub->content1));
fwrite ($bf,full_tag("CONTENT2",8,false,$cnt_sub->content2));
fwrite ($bf,full_tag("CONTENT3",8,false,$cnt_sub->content3));
fwrite ($bf,full_tag("CONTENT4",8,false,$cnt_sub->content4));
//End submission
$status =fwrite ($bf,end_tag("CONTENT",7,true));
}
//Write end tag
$status =fwrite ($bf,end_tag("CONTENTS",6,true));
}
return $status;
}
function backup_data_ratings($bf,$preferences,$recordid){
global $CFG, $DB;
$status = true;
$data_ratings = $DB->get_records("data_ratings", array("recordid"=>$recordid));
//If there is submissions
if ($data_ratings) {
//Write start tag
$status =fwrite ($bf,start_tag("RATINGS",6,true));
//Iterate over each submission
foreach ($data_ratings as $rat_sub) {
//Start submission
$status =fwrite ($bf,start_tag("RATING",7,true));
//Print submission contents
fwrite ($bf,full_tag("ID",8,false,$rat_sub->id));
fwrite ($bf,full_tag("RECORDID",8,false,$rat_sub->recordid));
fwrite ($bf,full_tag("USERID",8,false,$rat_sub->userid));
fwrite ($bf,full_tag("RATING",8,false,$rat_sub->rating));
//End submission
$status =fwrite ($bf,end_tag("RATING",7,true));
}
//Write end tag
$status =fwrite ($bf,end_tag("RATINGS",6,true));
}
return $status;
}
function backup_data_comments($bf,$preferences,$recordid){
global $CFG, $DB;
$status = true;
$lastrecord = $DB->get_record_sql('SELECT d.id AS dataid, d.course AS course FROM {data} d, {data_records} r
WHERE r.dataid = d.id AND r.id = ?', array($recordid));
$params = array();
$params[] = $recordid;
$sql = 'SELECT d.id, d.course FROM {data_records} r, {data} d WHERE r.dataid = d.id AND r.id=?';
$result = $DB->get_record_sql($sql, $params);
if ($cm = get_coursemodule_from_instance('data', $result->id, $result->course)) {
$context = get_context_instance(CONTEXT_MODULE, $cm->id);
}
$data_comments = $DB->get_records('comments', array(
'itemid'=>$recordid,
'commentarea'=>'database_entry',
'contextid'=>$context->id)
);
//If there is submissions
if ($data_comments) {
//Write start tag
$status =fwrite ($bf,start_tag("COMMENTS",6,true));
//Iterate over each submission
foreach ($data_comments as $com_sub) {
//Start submission
$status =fwrite ($bf,start_tag("COMMENT",7,true));
//Print submission contents
fwrite ($bf,full_tag("ID",8,false,$com_sub->id));
fwrite ($bf,full_tag("USERID",8,false,$com_sub->userid));
fwrite ($bf,full_tag("CONTENT",8,false,$com_sub->content));
fwrite ($bf,full_tag("COMMENTAREA",8,false,'database_entry'));
fwrite ($bf,full_tag("FORMAT",8,false,$com_sub->format));
fwrite ($bf,full_tag("TIMECREATED",8,false,$com_sub->timecreated));
//End submission
$status =fwrite ($bf,end_tag("COMMENT",7,true));
}
//Write end tag
$status =fwrite ($bf,end_tag("COMMENTS",6,true));
}
return $status;
}
function backup_data_files_instance($bf,$preferences,$instanceid) {
global $CFG;
$status = true;
//First we check to moddata exists and create it as necessary
//in temp/backup/$backup_code dir
$status = check_and_create_moddata_dir($preferences->backup_unique_code);
$status = check_dir_exists($CFG->dataroot."/temp/backup/".$preferences->backup_unique_code."/moddata/data/",true);
//Now copy the data dir
if ($status) {
//Only if it exists !! Thanks to Daniel Miksik.
if (is_dir($CFG->dataroot."/".$preferences->backup_course."/".$CFG->moddata."/data/".$instanceid)) {
$status = backup_copy_file($CFG->dataroot."/".$preferences->backup_course."/".$CFG->moddata."/data/".$instanceid,
$CFG->dataroot."/temp/backup/".$preferences->backup_unique_code."/moddata/data/".$instanceid);
}
}
return $status;
}
function backup_data_records($bf,$preferences,$dataid){
global $CFG, $DB;
$status = true;
$data_records = $DB->get_records("data_records", array("dataid"=>$dataid));
//If there is submissions
if ($data_records) {
//Write start tag
$status =fwrite ($bf,start_tag("RECORDS",4,true));
//Iterate over each submission
foreach ($data_records as $rec_sub) {
//Start submission
$status =fwrite ($bf,start_tag("RECORD",5,true));
//Print submission contents
fwrite ($bf,full_tag("ID",6,false,$rec_sub->id));
fwrite ($bf,full_tag("USERID",6,false,$rec_sub->userid));
fwrite ($bf,full_tag("GROUPID",6,false,$rec_sub->groupid));
fwrite ($bf,full_tag("DATAID",6,false,$rec_sub->dataid));
fwrite ($bf,full_tag("TIMECREATED",6,false,$rec_sub->timecreated));
fwrite ($bf,full_tag("TIMEMODIFIED",6,false,$rec_sub->timemodified));
fwrite ($bf,full_tag("APPROVED",6,false,$rec_sub->approved));
//End submission
backup_data_content($bf,$preferences,$rec_sub->id);
backup_data_ratings($bf,$preferences,$rec_sub->id);
backup_data_comments($bf,$preferences,$rec_sub->id);
$status =fwrite ($bf,end_tag("RECORD",5,true));
}
//Write end tag
$status =fwrite ($bf,end_tag("RECORDS",4,true));
}
return $status;
}
function backup_data_files($bf,$preferences) {
global $CFG;
$status = true;
//First we check to moddata exists and create it as necessary
//in temp/backup/$backup_code dir
$status = check_and_create_moddata_dir($preferences->backup_unique_code);
//Now copy the data dir
if ($status) {
//Only if it exists !! Thanks to Daniel Miksik.
if (is_dir($CFG->dataroot."/".$preferences->backup_course."/".$CFG->moddata."/data")) {
$status = backup_copy_file($CFG->dataroot."/".$preferences->backup_course."/".$CFG->moddata."/data",
$CFG->dataroot."/temp/backup/".$preferences->backup_unique_code."/moddata/data");
}
}
return $status;
}
function backup_data_file_instance($bf,$preferences,$instanceid) {
global $CFG;
$status = true;
//First we check to moddata exists and create it as necessary
//in temp/backup/$backup_code dir
$status = check_and_create_moddata_dir($preferences->backup_unique_code);
$status = check_dir_exists($CFG->dataroot."/temp/backup/".$preferences->backup_unique_code."/moddata/data/",true);
//Now copy the data dir
if ($status) {
//Only if it exists !! Thanks to Daniel Miksik.
if (is_dir($CFG->dataroot."/".$preferences->backup_course."/".$CFG->moddata."/data/".$instanceid)) {
$status = backup_copy_file($CFG->dataroot."/".$preferences->backup_course."/".$CFG->moddata."/data/".$instanceid,
$CFG->dataroot."/temp/backup/".$preferences->backup_unique_code."/moddata/data/".$instanceid);
}
}
return $status;
}
function data_check_backup_mods_instances($instance,$backup_unique_code) {
$info[$instance->id.'0'][0] = '<b>'.$instance->name.'</b>';
$info[$instance->id.'0'][1] = '';
if (!empty($instance->userdata)) {
// any other needed stuff
}
return $info;
}
function data_check_backup_mods($course,$user_data=false,$backup_unique_code,$instances=null) {
if (!empty($instances) && is_array($instances) && count($instances)) {
$info = array();
foreach ($instances as $id => $instance) {
$info += data_check_backup_mods_instances($instance,$backup_unique_code);
}
return $info;
}
// otherwise continue as normal
//First the course data
$info[0][0] = get_string("modulenameplural","data");
if ($ids = data_ids ($course)) {
$info[0][1] = count($ids);
} else {
$info[0][1] = 0;
}
//Now, if requested, the user_data
if ($user_data) {
// any other needed stuff
}
return $info;
}
/**
* Returns a content encoded to support interactivities linking. Every module
* should have its own. They are called automatically from the backup procedure.
*
* @param string $content content to be encoded
* @param object $preferences backup preferences in use
* @return string the content encoded
*/
function data_encode_content_links ($content,$preferences) {
global $CFG;
$base = preg_quote($CFG->wwwroot,"/");
/// Link to one "record" of the database
$search="/(".$base."\/mod\/data\/view.php\?d\=)([0-9]+)\&rid\=([0-9]+)/";
$result= preg_replace($search,'$@DATAVIEWRECORD*$2*$3@$',$content);
/// Link to the list of databases
$search="/(".$base."\/mod\/data\/index.php\?id\=)([0-9]+)/";
$result= preg_replace($search,'$@DATAINDEX*$2@$',$result);
/// Link to database view by moduleid
$search="/(".$base."\/mod\/data\/view.php\?id\=)([0-9]+)/";
$result= preg_replace($search,'$@DATAVIEWBYID*$2@$',$result);
/// Link to database view by databaseid
$search="/(".$base."\/mod\/data\/view.php\?d\=)([0-9]+)/";
$result= preg_replace($search,'$@DATAVIEWBYD*$2@$',$result);
return $result;
}
function data_ids($course) {
// stub function, return number of modules
return 1;
}