course/index.php

   1 <?php // $Id$
   2       // For most people, just lists the course categories
   3       // Allows the admin to create, delete and rename course categories
   4
   5     require_once("../config.php");
   6     require_once("lib.php");
   7     require_once('category_add_form.php');
   8
   9     $categoryedit = optional_param('categoryedit', -1,PARAM_BOOL);
  10     $delete   = optional_param('delete',0,PARAM_INT);
  11     $hide     = optional_param('hide',0,PARAM_INT);
  12     $show     = optional_param('show',0,PARAM_INT);
  13     $sure     = optional_param('sure','',PARAM_ALPHANUM);
  14     $move     = optional_param('move',0,PARAM_INT);
  15     $moveto   = optional_param('moveto',-1,PARAM_INT);
  16     $moveup   = optional_param('moveup',0,PARAM_INT);
  17     $movedown = optional_param('movedown',0,PARAM_INT);
  18
  19     $context = get_context_instance(CONTEXT_SYSTEM, SITEID);
  20
  21     if (!$site = get_site()) {
  22         error('Site isn\'t defined!');
  23     }
  24
  25     if ($CFG->forcelogin) {
  26         require_login();
  27     }
  28
  29     if (has_capability('moodle/category:update', get_context_instance(CONTEXT_SYSTEM, SITEID))) {
  30         if ($categoryedit !== -1) {
  31             $USER->categoryediting = $categoryedit;
  32         }
  33         $adminediting = !empty($USER->categoryediting);
  34     } else {
  35         $adminediting = false;
  36     }
  37
  38     $stradministration = get_string('administration');
  39     $strcategories = get_string('categories');
  40     $strcategory = get_string('category');
  41     $strcourses = get_string('courses');
  42     $stredit = get_string('edit');
  43     $strdelete = get_string('delete');
  44     $straction = get_string('action');
  45
  46
  47 /// If data for a new category was submitted, then add it
  48     $mform = new category_add_form();
  49     if ($form = $mform->get_data() and has_capability('moodle/category:create', $context)) {
  50         if (!empty($form->addcategory)) {
  51             unset($newcategory);
  52             $newcategory->name = stripslashes_safe($form->addcategory);
  53             $newcategory->description = $form->description;
  54             $newcategory->sortorder = 999;
  55             if (!insert_record('course_categories', $newcategory)) {
  56                 notify("Could not insert the new category '" . format_string($newcategory->name) . "'");
  57             } else {
  58                 notify(get_string('categoryadded', '', format_string($newcategory->name)));
  59             }
  60         }
  61     }
  62
  63 /// Unless it's an editing admin, just print the regular listing of courses/categories
  64
  65     if (!$adminediting) {
  66
  67       /// Print form for creating new categories
  68
  69         $countcategories = count_records('course_categories');
  70
  71         if ($countcategories > 1 || ($countcategories == 1 && count_records('course') > 200)) {
  72             $strcourses = get_string('courses');
  73             $strcategories = get_string('categories');
  74
  75             $navlinks = array();
  76             $navlinks[] = array('name'=>$strcategories,'link'=>'','type'=>'misc');
  77             $navigation = build_navigation($navlinks);
  78             print_header("$site->shortname: $strcategories", $strcourses, $navigation, '', '', true, update_categories_button());
  79             print_heading($strcategories);
  80             print_box_start('categorybox');
  81             print_whole_category_list();
  82             print_box_end();
  83             print_course_search();
  84         } else {
  85             $strfulllistofcourses = get_string('fulllistofcourses');
  86             print_header("$site->shortname: $strfulllistofcourses", $strfulllistofcourses,
  87                     build_navigation(array(array('name'=>$strfulllistofcourses, 'link'=>'','type'=>'misc'))),
  88                          '', '', true, update_categories_button());
  89             print_box_start('courseboxes');
  90             print_courses(0);
  91             print_box_end();
  92         }
  93
  94         /// I am not sure this context in the next has_capability call is correct.
  95         if (isloggedin() and !isguest() and !has_capability('moodle/course:create', get_context_instance(CONTEXT_SYSTEM, SITEID)) and $CFG->enablecourserequests) {  // Print link to request a new course
  96             print_single_button('request.php', NULL, get_string('courserequest'), 'get');
  97         }
  98         if (has_capability('moodle/course:create', get_context_instance(CONTEXT_SYSTEM, SITEID))) {       // Print link to create a new course
  99         /// Get the 1st available category
 100             $options = array('category' => get_field('course_categories', 'id', 'parent', '0'));
 101             print_single_button('edit.php', $options, get_string('addnewcourse'), 'get');
 102         }
 103         if (has_capability('moodle/site:approvecourse', get_context_instance(CONTEXT_SYSTEM, SITEID))  and !empty($CFG->enablecourserequests)) {
 104             print_single_button('pending.php',NULL, get_string('coursespending'),'get');
 105         }
 106         print_footer();
 107         exit;
 108     }
 109
 110 /// From now on is all the admin/course creator functions
 111
 112 /// Print headings
 113
 114     if (has_capability('moodle/site:config', get_context_instance(CONTEXT_SYSTEM))) {
 115         require_once($CFG->libdir.'/adminlib.php');
 116         admin_externalpage_setup('coursemgmt');
 117         admin_externalpage_print_header();
 118     } else {
 119         print_header("$site->shortname: $strcategories", $strcourses,
 120             build_navigation(array(array('name'=>$strcategories,'link'=>'','type'=>'misc'))), '', '', true, update_categories_button());
 121     }
 122
 123     print_heading($strcategories);
 124
 125 /// Delete a category if necessary
 126
 127     if (!empty($delete) and confirm_sesskey()) {
 128
 129           // context is coursecat, if not present admins should have it set in site level
 130          $context = get_context_instance(CONTEXT_COURSECAT, $delete);
 131         if ($deletecat = get_record('course_categories', 'id', $delete) and has_capability('moodle/category:delete', $context)) {
 132             if (!empty($sure) && $sure == md5($deletecat->timemodified)) {
 133                 /// Send the children categories to live with their grandparent
 134                 if ($childcats = get_records('course_categories', 'parent', $deletecat->id)) {
 135                     foreach ($childcats as $childcat) {
 136                         if (! set_field('course_categories', 'parent', $deletecat->parent, 'id', $childcat->id)) {
 137                             error('Could not update a child category!', 'index.php');
 138                         }
 139                     }
 140                 }
 141
 142                 ///  If the grandparent is a valid (non-zero) category, then
 143                 ///  send the children courses to live with their grandparent as well
 144                 if ($deletecat->parent) {
 145                     if ($childcourses = get_records('course', 'category', $deletecat->id)) {
 146                         foreach ($childcourses as $childcourse) {
 147                             if (! set_field('course', 'category', $deletecat->parent, 'id', $childcourse->id)) {
 148                                 error('Could not update a child course!', 'index.php');
 149                             }
 150                         }
 151                     }
 152                 }
 153
 154                 /// Finally delete the category itself
 155                 if (delete_records('course_categories', 'id', $deletecat->id)) {
 156                     notify(get_string('categorydeleted', '', format_string($deletecat->name)));
 157                     // MLD-9983
 158                     events_trigger('category_deleted', $deletecat);
 159                 }
 160             }
 161             else {
 162                 $strdeletecategorycheck = get_string('deletecategorycheck','', format_string($deletecat->name));
 163                 notice_yesno($strdeletecategorycheck,
 164                              "index.php?delete=$delete&amp;sure=".md5($deletecat->timemodified)."&amp;sesskey=$USER->sesskey",
 165                              "index.php?sesskey=$USER->sesskey");
 166
 167                 print_footer();
 168                 exit();
 169             }
 170         }
 171     }
 172
 173
 174 /// Create a default category if necessary
 175     if (!$categories = get_categories()) {    /// No category yet!
 176         // Try and make one
 177         unset($tempcat);
 178         $tempcat->name = get_string('miscellaneous');
 179         if (!$tempcat->id = insert_record('course_categories', $tempcat)) {
 180             error('Serious error: Could not create a default category!');
 181         }
 182     }
 183
 184
 185 /// Move a category to a new parent if required
 186
 187     if (!empty($move) and ($moveto>=0) and confirm_sesskey()) {
 188         if ($tempcat = get_record('course_categories', 'id', $move)) {
 189             if ($tempcat->parent != $moveto) {
 190                 if (! set_field('course_categories', 'parent', $moveto, 'id', $tempcat->id)) {
 191                     notify('Could not update that category!');
 192                 } else {
 193                     rebuild_context_rel(get_context_instance(CONTEXT_COURSECAT, $move));
 194                 }
 195             }
 196         }
 197     }
 198
 199
 200 /// Hide or show a category
 201     if ((!empty($hide) or !empty($show)) and confirm_sesskey()) {
 202         if (!empty($hide)) {
 203             $tempcat = get_record('course_categories', 'id', $hide);
 204             $visible = 0;
 205         } else {
 206             $tempcat = get_record('course_categories', 'id', $show);
 207             $visible = 1;
 208         }
 209         if ($tempcat) {
 210             if (! set_field('course_categories', 'visible', $visible, 'id', $tempcat->id)) {
 211                 notify('Could not update that category!');
 212             }
 213             if (! set_field('course', 'visible', $visible, 'category', $tempcat->id)) {
 214                 notify('Could not hide/show any courses in this category !');
 215             }
 216         }
 217     }
 218
 219
 220 /// Move a category up or down
 221
 222     if ((!empty($moveup) or !empty($movedown)) and confirm_sesskey()) {
 223
 224         $swapcategory = NULL;
 225         $movecategory = NULL;
 226
 227         if (!empty($moveup)) {
 228             if ($movecategory = get_record('course_categories', 'id', $moveup)) {
 229                 $categories = get_categories($movecategory->parent);
 230
 231                 foreach ($categories as $category) {
 232                     if ($category->id == $movecategory->id) {
 233                         break;
 234                     }
 235                     $swapcategory = $category;
 236                 }
 237             }
 238         }
 239         if (!empty($movedown)) {
 240             if ($movecategory = get_record('course_categories', 'id', $movedown)) {
 241                 $categories = get_categories($movecategory->parent);
 242
 243                 $choosenext = false;
 244                 foreach ($categories as $category) {
 245                     if ($choosenext) {
 246                         $swapcategory = $category;
 247                         break;
 248                     }
 249                     if ($category->id == $movecategory->id) {
 250                         $choosenext = true;
 251                     }
 252                 }
 253             }
 254         }
 255         if ($swapcategory and $movecategory) {        // Renumber everything for robustness
 256             $count=0;
 257             foreach ($categories as $category) {
 258                 $count++;
 259                 if ($category->id == $swapcategory->id) {
 260                     $category = $movecategory;
 261                 } else if ($category->id == $movecategory->id) {
 262                     $category = $swapcategory;
 263                 }
 264                 if (! set_field('course_categories', 'sortorder', $count, 'id', $category->id)) {
 265                     notify('Could not update that category!');
 266                 }
 267             }
 268         }
 269     }
 270
 271 /// Find the default category (the one with the lowest ID)
 272     $categories = get_categories();
 273     $default = 99999;
 274     foreach ($categories as $category) {
 275         if ($category->id < $default) {
 276             $default = $category->id;
 277         }
 278     }
 279
 280 /// Find any orphan courses that don't yet have a valid category and set to default
 281     if ($courses = get_courses(NULL,NULL,'c.id, c.category, c.sortorder, c.visible')) {
 282         foreach ($courses as $course) {
 283             if ($course->category and !isset($categories[$course->category])) {
 284                 set_field('course', 'category', $default, 'id', $course->id);
 285             }
 286         }
 287     }
 288
 289     fix_course_sortorder();
 290
 291 /// Print form for creating new categories
 292
 293     if (has_capability('moodle/category:create', get_context_instance(CONTEXT_SYSTEM))) {
 294         $mform->display();
 295     }
 296
 297 /// Print out the categories with all the knobs
 298
 299     $strcategories = get_string('categories');
 300     $strcourses = get_string('courses');
 301     $strmovecategoryto = get_string('movecategoryto');
 302     $stredit = get_string('edit');
 303
 304     $displaylist = array();
 305     $parentlist = array();
 306
 307     $displaylist[0] = get_string('top');
 308     make_categories_list($displaylist, $parentlist, '');
 309
 310     echo '<table class="generalbox editcourse boxaligncenter"><tr class="header">';
 311     echo '<th class="header" scope="col">'.$strcategories.'</th>';
 312     echo '<th class="header" scope="col">'.$strcourses.'</th>';
 313     echo '<th class="header" scope="col">'.$stredit.'</th>';
 314     echo '<th class="header" scope="col">'.$strmovecategoryto.'</th>';
 315     echo '</tr>';
 316
 317     print_category_edit(NULL, $displaylist, $parentlist);
 318
 319     echo '</table>';
 320
 321     echo '<div class="buttons">';
 322     /// Print link to create a new course
 323     if (has_capability('moodle/course:create', $context)) {
 324         unset($options);
 325         $options['category'] = $category->id;
 326         print_single_button('edit.php', $options, get_string('addnewcourse'), 'get');
 327     }
 328
 329     if (has_capability('moodle/site:approvecourse', get_context_instance(CONTEXT_SYSTEM, SITEID))  and !empty($CFG->enablecourserequests)) {
 330         print_single_button('pending.php',NULL, get_string('coursespending'), 'get');
 331     }
 332     // admin page does not allow custom buttons in the navigation bar
 333     echo '<div class="singlebutton">';
 334     echo update_categories_button();
 335     echo '</div></div>';
 336
 337     print_footer();
 338
 339
 340 function print_category_edit($category, $displaylist, $parentslist, $depth=-1, $up=false, $down=false) {
 341 /// Recursive function to print all the categories ready for editing
 342
 343     global $CFG, $USER;
 344
 345     static $str = '';
 346
 347     if (empty($str)) {
 348         $str->delete   = get_string('delete');
 349         $str->moveup   = get_string('moveup');
 350         $str->movedown = get_string('movedown');
 351         $str->edit     = get_string('editthiscategory');
 352         $str->hide     = get_string('hide');
 353         $str->show     = get_string('show');
 354     }
 355
 356     if ($category) {
 357
 358         $context  = get_context_instance(CONTEXT_COURSECAT, $category->id);
 359
 360         echo '<tr><td align="left" class="name">';
 361         for ($i=0; $i<$depth;$i++) {
 362             echo '&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;';
 363         }
 364         $linkcss = $category->visible ? '' : ' class="dimmed" ';
 365         echo '<a '.$linkcss.' title="'.$str->edit.'" '.
 366              ' href="category.php?id='.$category->id.'&amp;categoryedit=on&amp;sesskey='.sesskey().'">'.
 367              format_string($category->name).'</a>';
 368         echo '</td>';
 369
 370         echo '<td class="count">'.$category->coursecount.'</td>';
 371
 372         echo '<td class="icons">';    /// Print little icons
 373
 374         if (has_capability('moodle/category:delete', $context)) {
 375             echo '<a title="'.$str->delete.'" href="index.php?delete='.$category->id.'&amp;sesskey='.sesskey().'"><img'.
 376                  ' src="'.$CFG->pixpath.'/t/delete.gif" class="iconsmall" alt="'.$str->delete.'" /></a> ';
 377         }
 378
 379         if (has_capability('moodle/category:visibility', $context)) {
 380             if (!empty($category->visible)) {
 381                 echo '<a title="'.$str->hide.'" href="index.php?hide='.$category->id.'&amp;sesskey='.sesskey().'"><img'.
 382                      ' src="'.$CFG->pixpath.'/t/hide.gif" class="iconsmall" alt="'.$str->hide.'" /></a> ';
 383             } else {
 384                 echo '<a title="'.$str->show.'" href="index.php?show='.$category->id.'&amp;sesskey='.sesskey().'"><img'.
 385                      ' src="'.$CFG->pixpath.'/t/show.gif" class="iconsmall" alt="'.$str->show.'" /></a> ';
 386             }
 387         }
 388
 389         if ($up) {
 390             echo '<a title="'.$str->moveup.'" href="index.php?moveup='.$category->id.'&amp;sesskey='.sesskey().'"><img'.
 391                  ' src="'.$CFG->pixpath.'/t/up.gif" class="iconsmall" alt="'.$str->moveup.'" /></a> ';
 392         }
 393         if ($down) {
 394             echo '<a title="'.$str->movedown.'" href="index.php?movedown='.$category->id.'&amp;sesskey='.sesskey().'"><img'.
 395                  ' src="'.$CFG->pixpath.'/t/down.gif" class="iconsmall" alt="'.$str->movedown.'" /></a> ';
 396         }
 397         echo '</td>';
 398
 399         echo '<td align="left">';
 400         $tempdisplaylist = $displaylist;
 401         unset($tempdisplaylist[$category->id]);
 402         foreach ($parentslist as $key => $parents) {
 403             if (in_array($category->id, $parents)) {
 404                 unset($tempdisplaylist[$key]);
 405             }
 406         }
 407         popup_form ("index.php?move=$category->id&amp;sesskey=$USER->sesskey&amp;moveto=", $tempdisplaylist, "moveform$category->id", $category->parent, '', '', '', false);
 408         echo '</td>';
 409         echo '</tr>';
 410     } else {
 411         $category->id = '0';
 412     }
 413
 414     if ($categories = get_categories($category->id)) {   // Print all the children recursively
 415         $countcats = count($categories);
 416         $count = 0;
 417         $first = true;
 418         $last = false;
 419         foreach ($categories as $cat) {
 420             $count++;
 421             if ($count == $countcats) {
 422                 $last = true;
 423             }
 424             $up = $first ? false : true;
 425             $down = $last ? false : true;
 426             $first = false;
 427
 428             print_category_edit($cat, $displaylist, $parentslist, $depth+1, $up, $down);
 429         }
 430     }
 431 }
 432 ?>