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