mirror of
https://github.com/moodle/moodle.git
synced 2025-01-19 14:27:22 +01:00
250 lines
11 KiB
PHP
250 lines
11 KiB
PHP
<?php // $Id$
|
|
/**
|
|
* Allows someone with appropriate permissions to move a category and associated
|
|
* files to another context.
|
|
*
|
|
* @author Jamie Pratt
|
|
* @license http://www.gnu.org/copyleft/gpl.html GNU Public License
|
|
* @package questionbank
|
|
*/
|
|
|
|
require_once("../config.php");
|
|
require_once($CFG->dirroot."/question/editlib.php");
|
|
require_once($CFG->dirroot."/question/contextmove_form.php");
|
|
|
|
list($thispageurl, $contexts, $cmid, $cm, $module, $pagevars) = question_edit_setup('categories');
|
|
|
|
// get values from form for actions on this page
|
|
$toparent = required_param('toparent', PARAM_SEQUENCE);
|
|
$cattomove = required_param('cattomove', PARAM_INT);
|
|
$totop = optional_param('totop', 0, PARAM_INT); // optional param moves category to top of peers. Default is
|
|
//to add it to the bottom.
|
|
|
|
|
|
|
|
$onerrorurl = $CFG->wwwroot.'/question/category.php?'.$thispageurl->get_query_string();
|
|
list($toparent, $contextto) = explode(',', $toparent);
|
|
if (!empty($toparent)){//not top level category, make it a child of $toparent
|
|
if (!$toparent = get_record('question_categories', 'id', $toparent)){
|
|
error('Invalid category id for parent!', $onerrorurl);
|
|
}
|
|
$contextto = $toparent->contextid;
|
|
} else {
|
|
$toparent = new object();
|
|
$toparent->id = 0;
|
|
$toparent->contextid = $contextto;
|
|
}
|
|
if (!$cattomove = get_record('question_categories', 'id', $cattomove)){
|
|
error('Invalid category id to move!', $onerrorurl);
|
|
}
|
|
if ($cattomove->contextid == $contextto){
|
|
error("You shouldn't have got here if you're not moving a category to another context.", $onerrorurl);
|
|
}
|
|
$cattomove->categorylist = question_categorylist($cattomove->id);
|
|
|
|
$thispageurl->params(array('cattomove'=>$cattomove->id,
|
|
'toparent'=>"{$toparent->id},{$toparent->contextid}",
|
|
'totop'=>$totop));
|
|
|
|
$contextfrom = get_context_instance_by_id($cattomove->contextid);
|
|
$contextto = get_context_instance_by_id($contextto);
|
|
$contexttostring = print_context_name($contextto);
|
|
|
|
require_capability('moodle/question:managecategory', $contextfrom);
|
|
require_capability('moodle/question:managecategory', $contextto);
|
|
|
|
|
|
$fromcoursefilesid = get_filesdir_from_context($contextfrom);//siteid or courseid
|
|
$tocoursefilesid = get_filesdir_from_context($contextto);//siteid or courseid
|
|
if ($fromcoursefilesid != $tocoursefilesid){
|
|
$questions = get_records_select('question', "category IN ({$cattomove->categorylist})");
|
|
$urls = array();
|
|
if ($questions){
|
|
foreach ($questions as $id => $question){
|
|
$QTYPES[$questions[$id]->qtype]->get_question_options(&$questions[$id]);
|
|
$urls = array_merge_recursive($urls, $QTYPES[$questions[$id]->qtype]->find_file_links($questions[$id], $fromcoursefilesid));
|
|
}
|
|
}
|
|
ksort($urls);
|
|
} else {
|
|
$urls = array();
|
|
}
|
|
$brokenurls = array();
|
|
foreach (array_keys($urls) as $url){
|
|
if (!file_exists($CFG->dataroot."/$fromcoursefilesid/".$url)){
|
|
$brokenurls[] = $url;
|
|
}
|
|
}
|
|
if ($fromcoursefilesid == SITEID){
|
|
$fromareaname = get_string('filesareasite', 'question');
|
|
} else {
|
|
$fromareaname = get_string('filesareacourse', 'question');
|
|
}
|
|
if ($tocoursefilesid == SITEID){
|
|
$toareaname = get_string('filesareasite', 'question');
|
|
} else {
|
|
$toareaname = get_string('filesareacourse', 'question');
|
|
}
|
|
$contextmoveform = new question_context_move_form($thispageurl,
|
|
compact('urls', 'fromareaname', 'toareaname', 'brokenurls',
|
|
'fromcoursefilesid', 'tocoursefilesid'));
|
|
if ($contextmoveform->is_cancelled()){
|
|
$thispageurl->remove_params('cattomove', 'toparent', 'totop');
|
|
redirect($CFG->wwwroot."/question/category.php?".$thispageurl->get_query_string());
|
|
}elseif ($moveformdata = $contextmoveform->get_data()) {
|
|
if (isset($moveformdata->urls) && is_array($moveformdata->urls)){
|
|
check_dir_exists($CFG->dataroot."/$tocoursefilesid/", true);
|
|
$flipurls = array_keys($urls);
|
|
foreach ($moveformdata->urls as $key => $urlaction){
|
|
$source = $CFG->dataroot."/$fromcoursefilesid/".$flipurls[$key];
|
|
$destination = $flipurls[$key];
|
|
if (($urlaction != QUESTION_FILEDONOTHING) && ($urlaction != QUESTION_FILEMOVELINKSONLY)){
|
|
while (file_exists($CFG->dataroot."/$tocoursefilesid/".$destination)){
|
|
$matches = array();
|
|
//check for '_'. copyno after filename, before extension.
|
|
if (preg_match('!\_([0-9]+)(\.[^\.\\/]+)?$!', $destination, $matches)){
|
|
$copyno = $matches[1]+1;
|
|
} else {
|
|
$copyno = 1;
|
|
}
|
|
//replace old copy no with incremented one.
|
|
$destination = preg_replace('!(\_[0-9]+)?(\.[^\.\\/]+)?$!', '_'.$copyno.'\\2', $destination, 1);
|
|
}
|
|
}
|
|
switch ($urlaction){
|
|
case QUESTION_FILECOPY :
|
|
if (!copy($source, $CFG->dataroot."/$tocoursefilesid/".$destination)){
|
|
print_error('errorfilecannotbecopied', 'question', $onerrorurl, $source);
|
|
}
|
|
break;
|
|
case QUESTION_FILEMOVE :
|
|
if (!rename($source, $CFG->dataroot."/$tocoursefilesid/".$destination)){
|
|
print_error('errorfilecannotbemoved', 'question', $onerrorurl, $source);
|
|
}
|
|
break;
|
|
case QUESTION_FILEDONOTHING :
|
|
case QUESTION_FILEMOVELINKSONLY :
|
|
break;
|
|
default :
|
|
error('Invalid action selected!', $onerrorurl);
|
|
}
|
|
switch ($urlaction){
|
|
//now search and replace urls in questions.
|
|
case QUESTION_FILECOPY :
|
|
case QUESTION_FILEMOVE :
|
|
case QUESTION_FILEMOVELINKSONLY :
|
|
$url = $flipurls[$key];
|
|
$questionids = array_unique($urls[$url]);
|
|
foreach ($questionids as $questionid){
|
|
$question = $questions[$questionid];
|
|
$QTYPES[$question->qtype]->replace_file_links($question, $fromcoursefilesid, $tocoursefilesid, $url, $destination);
|
|
}
|
|
break;
|
|
case QUESTION_FILEDONOTHING :
|
|
default :
|
|
break;
|
|
}
|
|
|
|
|
|
}
|
|
}
|
|
|
|
//adjust sortorder before we make the cat a peer of it's new peers
|
|
$peers = get_records_select_menu('question_categories', "contextid = {$toparent->contextid} AND ".
|
|
"parent = {$toparent->id}", "sortorder ASC",
|
|
"id, id");
|
|
$peers = array_keys($peers);
|
|
if ($totop){
|
|
array_unshift($peers, $cattomove->id);
|
|
} else {
|
|
$peers[] = $cattomove->id;
|
|
}
|
|
$sortorder = 0;
|
|
foreach ($peers as $peer) {
|
|
if (! set_field('question_categories', "sortorder", $sortorder, "id", $peer)) {
|
|
print_error('listupdatefail', '', $onerrorurl);
|
|
}
|
|
$sortorder++;
|
|
}
|
|
//now move category
|
|
$cat = new object();
|
|
$cat->id = $cattomove->id;
|
|
$cat->parent = $toparent->id;
|
|
//set context of category we are moving and all children also!
|
|
if (!execute_sql("UPDATE {$CFG->prefix}question_categories SET contextid = {$contextto->id} WHERE id IN ({$cattomove->categorylist})", false)){
|
|
error("Could not move the category '$newname' to ".$contexttostring, $onerrorurl);
|
|
}
|
|
//finally set the new parent id
|
|
if (!update_record("question_categories", $cat)) {
|
|
error("Could not update the category '$updatename'", $onerrorurl);
|
|
}
|
|
$thispageurl->remove_params('cattomove', 'toparent', 'totop');
|
|
redirect($CFG->wwwroot."/question/category.php?".$thispageurl->get_query_string(array('cat'=>"{$cattomove->id},{$contextto->id}")));
|
|
}
|
|
|
|
$streditingcategories = get_string('editcategories', 'quiz');
|
|
$crumbs = array();
|
|
if ($cm!==null) {
|
|
// Page header
|
|
$strupdatemodule = has_capability('moodle/course:manageactivities', $contexts->lowest())
|
|
? update_module_button($cm->id, $COURSE->id, get_string('modulename', $cm->modname))
|
|
: "";
|
|
$crumbs[] = array('name' => get_string('modulenameplural', $cm->modname),
|
|
'link' => "$CFG->wwwroot/mod/{$cm->modname}/index.php?id=$COURSE->id",
|
|
'type' => 'activity');
|
|
$crumbs[] = array('name' => format_string($module->name),
|
|
'link' => "$CFG->wwwroot/mod/{$cm->modname}/view.php?id={$cm->id}",
|
|
'type' => 'title');
|
|
} else {
|
|
// Print basic page layout.
|
|
$strupdatemodule = '';
|
|
}
|
|
|
|
|
|
$crumbs[] = array('name' => $streditingcategories, 'link' => $thispageurl->out(), 'type' => 'title');
|
|
$crumbs[] = array('name' => get_string('movingcategory', 'question'), 'link' => '', 'type' => 'title');
|
|
|
|
$navigation = build_navigation($crumbs);
|
|
print_header_simple($streditingcategories, '', $navigation, "", "", true, $strupdatemodule);
|
|
|
|
// print tabs
|
|
if ($cm!==null) {
|
|
$currenttab = 'edit';
|
|
$mode = 'categories';
|
|
${$cm->modname} = $module;
|
|
include($CFG->dirroot."/mod/{$cm->modname}/tabs.php");
|
|
} else {
|
|
$currenttab = 'categories';
|
|
$context = $contexts->lowest();
|
|
include('tabs.php');
|
|
}
|
|
//parameter for get_string
|
|
$cattomove->contextto = $contexttostring;
|
|
if (count($urls)){
|
|
$defaults = array();
|
|
for ($default_key =0; $default_key < count($urls); $default_key++){
|
|
switch ($tocoursefilesid){
|
|
case SITEID:
|
|
$defaults['urls'][$default_key] = QUESTION_FILEMOVE;
|
|
break;
|
|
default :
|
|
$defaults['urls'][$default_key] = QUESTION_FILECOPY;
|
|
break;
|
|
|
|
}
|
|
}
|
|
$contextmoveform->set_data($defaults);
|
|
//some parameters for get_string
|
|
$cattomove->urlcount = count($urls);
|
|
$cattomove->toareaname = $toareaname;
|
|
$cattomove->fromareaname = $fromareaname;
|
|
|
|
print_box(get_string('movingcategoryandfiles', 'question', $cattomove), 'boxwidthnarrow boxaligncenter generalbox');
|
|
} else {
|
|
print_box(get_string('movingcategorynofiles', 'question', $cattomove), 'boxwidthnarrow boxaligncenter generalbox');
|
|
}
|
|
$contextmoveform->display();
|
|
print_object($brokenurls);
|
|
print_footer($COURSE);
|
|
?>
|