mirror of
https://github.com/moodle/moodle.git
synced 2025-02-16 05:45:36 +01:00
ec81373f50
(While I was at it I also turned the autologinguests off for most module pages, except on the index.php pages and the view.php pages for those modules that allow guests)
373 lines
15 KiB
PHP
373 lines
15 KiB
PHP
<?php // $Id$
|
|
|
|
require_once("../../config.php");
|
|
require_once("lib.php");
|
|
require_once("$CFG->libdir/rsslib.php");
|
|
|
|
optional_variable($id); // course
|
|
|
|
if ($id) {
|
|
if (! $course = get_record("course", "id", $id)) {
|
|
error("Course ID is incorrect");
|
|
}
|
|
} else {
|
|
if (! $course = get_site()) {
|
|
error("Could not find a top-level course!");
|
|
}
|
|
}
|
|
|
|
require_course_login($course->id);
|
|
|
|
$currentgroup = get_current_group($course->id);
|
|
|
|
unset($SESSION->fromdiscussion);
|
|
|
|
add_to_log($course->id, "forum", "view forums", "index.php?id=$course->id");
|
|
|
|
$strforums = get_string("forums", "forum");
|
|
$strforum = get_string("forum", "forum");
|
|
$strdescription = get_string("description");
|
|
$strdiscussions = get_string("discussions", "forum");
|
|
$strsubscribed = get_string("subscribed", "forum");
|
|
$strunreadposts = get_string("unreadposts", "forum");
|
|
$strrss = get_string("rss");
|
|
|
|
$searchform = forum_print_search_form($course, "", true, "plain");
|
|
|
|
|
|
// Start of the table for General Forums
|
|
|
|
$generaltable->head = array ($strforum, $strdescription, $strdiscussions);
|
|
$generaltable->align = array ('left', 'left', 'center');
|
|
|
|
if ($CFG->forum_trackreadposts) {
|
|
$generaltable->head[] = $strunreadposts;
|
|
$generaltable->align[] = 'center';
|
|
}
|
|
|
|
if ($can_subscribe = (isstudent($course->id) or isteacher($course->id) or isadmin())) {
|
|
$generaltable->head[] = $strsubscribed;
|
|
$generaltable->align[] = 'center';
|
|
}
|
|
|
|
if ($show_rss = (($can_subscribe || $course->id == SITEID) &&
|
|
isset($CFG->enablerssfeeds) && isset($CFG->forum_enablerssfeeds) &&
|
|
$CFG->enablerssfeeds && $CFG->forum_enablerssfeeds)) {
|
|
$generaltable->head[] = $strrss;
|
|
$generaltable->align[] = 'center';
|
|
}
|
|
|
|
|
|
// Parse and organise all the forums. Most forums are course modules but
|
|
// some special ones are not. These get placed in the general forums
|
|
// category with the forums in section 0.
|
|
|
|
$generalforums = array(); // For now
|
|
$learningforums = get_all_instances_in_course("forum", $course);
|
|
|
|
if ($forums = get_records("forum", "course", $id, "name ASC")) { // All known forums
|
|
|
|
if ($learningforums) { // Copy "full" data into this complete array
|
|
foreach ($learningforums as $key => $learningforum) {
|
|
$learningforum->keyreference = $key;
|
|
$forums[$learningforum->id] = $learningforum;
|
|
}
|
|
}
|
|
|
|
foreach ($forums as $forum) {
|
|
if (!isset($forum->visible)) {
|
|
$forum->visible = instance_is_visible("forum", $forum);
|
|
if (!$forum->visible and !isteacher($course->id)) {
|
|
if (isset($forum->keyreference)) {
|
|
unset($learningforums[$forum->keyreference]);
|
|
}
|
|
continue;
|
|
}
|
|
}
|
|
switch ($forum->type) {
|
|
case "news":
|
|
case "social":
|
|
$generalforums[] = $forum;
|
|
if (isset($forum->keyreference)) { // Should always be
|
|
unset($learningforums[$forum->keyreference]);
|
|
}
|
|
break;
|
|
case "teacher":
|
|
if (isteacher($course->id)) {
|
|
$forum->visible = true;
|
|
$generalforums[] = $forum;
|
|
}
|
|
break;
|
|
default:
|
|
if (!$course->category or empty($forum->section)) { // Site level or section 0
|
|
$generalforums[] = $forum;
|
|
if (isset($forum->keyreference)) {
|
|
unset($learningforums[$forum->keyreference]);
|
|
}
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
/// First, let's process the general forums and build up a display
|
|
|
|
if ($generalforums) {
|
|
foreach ($generalforums as $forum) {
|
|
if (isset($forum->groupmode)) {
|
|
$groupmode = groupmode($course, $forum); /// Can do this because forum->groupmode is defined
|
|
} else {
|
|
$groupmode = NOGROUPS;
|
|
}
|
|
|
|
if ($groupmode == SEPARATEGROUPS and !isteacheredit($course->id)) {
|
|
$count = count_records_select("forum_discussions", "forum = '$forum->id' AND (groupid = '$currentgroup' OR groupid = '-1')");
|
|
} else {
|
|
$count = count_records("forum_discussions", "forum", "$forum->id");
|
|
}
|
|
|
|
if ($CFG->forum_trackreadposts) {
|
|
$groupid = ($groupmode==SEPARATEGROUPS && !isteacheredit($course->id)) ? $currentgroup : false;
|
|
$unread = forum_tp_count_forum_posts($forum->id, $groupid) -
|
|
forum_tp_count_forum_read_records($USER->id, $forum->id, $groupid);
|
|
if ($unread > 0) {
|
|
$unreadlink = '<span class="unread"><a href="view.php?f='.$forum->id.'">'.$unread.'</a>';
|
|
} else {
|
|
$unreadlink = '<span class="read"><a href="view.php?f='.$forum->id.'">'.$unread.'</a>';
|
|
}
|
|
}
|
|
|
|
$forum->intro = forum_shorten_post($forum->intro);
|
|
replace_smilies($forum->intro);
|
|
$forum->intro = "<span style=\"font-size:x-small;\">$forum->intro</span>";;
|
|
|
|
if ($forum->visible) {
|
|
$forumlink = "<a href=\"view.php?f=$forum->id\">$forum->name</a>";
|
|
} else {
|
|
$forumlink = "<a class=\"dimmed\" href=\"view.php?f=$forum->id\">$forum->name</a>";
|
|
}
|
|
|
|
//If this forum has RSS activated, calculate it
|
|
$rsslink = '';
|
|
if ($show_rss) {
|
|
if ($forum->rsstype and $forum->rssarticles) {
|
|
//Calculate the tolltip text
|
|
if ($forum->rsstype == 1) {
|
|
$tooltiptext = get_string("rsssubscriberssdiscussions","forum",$forum->name);
|
|
} else {
|
|
$tooltiptext = get_string("rsssubscriberssposts","forum",$forum->name);
|
|
}
|
|
if (empty($USER->id)) {
|
|
$userid = 0;
|
|
} else {
|
|
$userid = $USER->id;
|
|
}
|
|
//Get html code for RSS link
|
|
$rsslink = rss_get_link($course->id, $userid, "forum", $forum->id, $tooltiptext);
|
|
}
|
|
}
|
|
|
|
if ($can_subscribe) {
|
|
if (forum_is_forcesubscribed($forum->id)) {
|
|
$sublink = get_string("yes");
|
|
} else {
|
|
if ($groupmode and !isteacheredit($course->id) and !mygroupid($course->id)) {
|
|
$sublink = get_string("no"); // Can't subscribe to a group forum (not in a group)
|
|
$forumlink = $forum->name;
|
|
} else {
|
|
if (forum_is_subscribed($USER->id, $forum->id)) {
|
|
$subscribed = get_string("yes");
|
|
$subtitle = get_string("unsubscribe", "forum");
|
|
} else {
|
|
$subscribed = get_string("no");
|
|
$subtitle = get_string("subscribe", "forum");
|
|
}
|
|
$sublink = "<a title=\"$subtitle\" href=\"subscribe.php?id=$forum->id\">$subscribed</a>";
|
|
}
|
|
}
|
|
$row = array ($forumlink, $forum->intro, "$count");
|
|
if ($CFG->forum_trackreadposts) {
|
|
$row[] = $unreadlink;
|
|
}
|
|
$row[] = $sublink;
|
|
if (!empty($rsslink)) {
|
|
$row[] = $rsslink;
|
|
}
|
|
$generaltable->data[] = $row;
|
|
} else {
|
|
$row = array ($forumlink, $forum->intro, "$count");
|
|
if ($CFG->forum_trackreadposts) {
|
|
$row[] = $unreadlink;
|
|
}
|
|
if (!empty($rsslink)) {
|
|
$row[] = $rsslink;
|
|
}
|
|
$generaltable->data[] = $row;
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
// Start of the table for Learning Forums
|
|
$learningtable->head = array ($strforum, $strdescription, $strdiscussions);
|
|
$learningtable->align = array ("left", "left", "center");
|
|
|
|
if ($CFG->forum_trackreadposts) {
|
|
$learningtable->head[] = $strunreadposts;
|
|
$learningtable->align[] = 'center';
|
|
}
|
|
|
|
if ($can_subscribe = (isstudent($course->id) or isteacher($course->id) or isadmin())) {
|
|
$learningtable->head[] = $strsubscribed;
|
|
$learningtable->align[] = 'center';
|
|
}
|
|
|
|
if ($show_rss = (($can_subscribe || $course->id == SITEID) &&
|
|
isset($CFG->enablerssfeeds) && isset($CFG->forum_enablerssfeeds) &&
|
|
$CFG->enablerssfeeds && $CFG->forum_enablerssfeeds)) {
|
|
$learningtable->head[] = $strrss;
|
|
$learningtable->align[] = 'center';
|
|
}
|
|
|
|
/// Now let's process the learning forums
|
|
|
|
if ($course->category) { // Only real courses have learning forums
|
|
// Add extra field for section number, at the front
|
|
array_unshift($learningtable->head, "");
|
|
array_unshift($learningtable->align, "center");
|
|
|
|
|
|
if ($learningforums) {
|
|
$currentsection = "";
|
|
|
|
foreach ($learningforums as $key => $forum) {
|
|
$groupmode = groupmode($course, $forum); /// Can do this because forum->groupmode is defined
|
|
|
|
if ($groupmode == SEPARATEGROUPS and !isteacheredit($course->id)) {
|
|
$count = count_records("forum_discussions", "forum", "$forum->id", "groupid", $currentgroup);
|
|
} else {
|
|
$count = count_records("forum_discussions", "forum", "$forum->id");
|
|
}
|
|
|
|
if ($CFG->forum_trackreadposts) {
|
|
$groupid = ($groupmode==SEPARATEGROUPS && !isteacheredit($course->id)) ? $currentgroup : false;
|
|
$unread = forum_tp_count_forum_posts($forum->id, $groupid) -
|
|
forum_tp_count_forum_read_records($USER->id, $forum->id, $groupid);
|
|
if ($unread > 0) {
|
|
$unreadlink = '<span class="unread">'.$unread.'</span>';
|
|
} else {
|
|
$unreadlink = '<span class="read">'.$unread.'</span>';
|
|
}
|
|
}
|
|
|
|
$forum->intro = forum_shorten_post($forum->intro);
|
|
replace_smilies($forum->intro);
|
|
$forum->intro = "<span style=\"font-size:x-small;\">$forum->intro</span>";
|
|
|
|
if ($forum->section != $currentsection) {
|
|
$printsection = $forum->section;
|
|
if ($currentsection) {
|
|
$learningtable->data[] = 'hr';
|
|
}
|
|
$currentsection = $forum->section;
|
|
} else {
|
|
$printsection = "";
|
|
}
|
|
|
|
if ($forum->visible) {
|
|
$forumlink = "<a href=\"view.php?f=$forum->id\">$forum->name</a>";
|
|
} else {
|
|
$forumlink = "<a class=\"dimmed\" href=\"view.php?f=$forum->id\">$forum->name</a>";
|
|
}
|
|
|
|
//If this forum has RSS activated, calculate it
|
|
$rsslink = '';
|
|
if ($show_rss) {
|
|
if ($forum->rsstype and $forum->rssarticles) {
|
|
//Calculate the tolltip text
|
|
if ($forum->rsstype == 1) {
|
|
$tooltiptext = get_string("rsssubscriberssdiscussions","forum",$forum->name);
|
|
} else {
|
|
$tooltiptext = get_string("rsssubscriberssposts","forum",$forum->name);
|
|
}
|
|
if (empty($USER->id)) {
|
|
$userid = 0;
|
|
} else {
|
|
$userid = $USER->id;
|
|
}
|
|
//Get html code for RSS link
|
|
$rsslink = rss_get_link($course->id, $userid, "forum", $forum->id, $tooltiptext);
|
|
}
|
|
}
|
|
|
|
if ($can_subscribe) {
|
|
if (forum_is_forcesubscribed($forum->id)) {
|
|
$sublink = get_string("yes");
|
|
} else {
|
|
if ($groupmode and !isteacheredit($course->id) and !mygroupid($course->id)) {
|
|
$sublink = get_string("no"); // Can't subscribe to a group forum (not in a group)
|
|
if ($groupmode == SEPARATEGROUPS) {
|
|
$forumlink = $forum->name;
|
|
}
|
|
} else {
|
|
if (forum_is_subscribed($USER->id, $forum->id)) {
|
|
$subscribed = get_string("yes");
|
|
$subtitle = get_string("unsubscribe", "forum");
|
|
} else {
|
|
$subscribed = get_string("no");
|
|
$subtitle = get_string("subscribe", "forum");
|
|
}
|
|
$sublink = "<a title=\"$subtitle\" href=\"subscribe.php?id=$forum->id\">$subscribed</a>";
|
|
}
|
|
}
|
|
|
|
$row = array ($printsection, $forumlink, $forum->intro, $count);
|
|
if ($CFG->forum_trackreadposts) {
|
|
$row[] = $unreadlink;
|
|
}
|
|
$row[] = $sublink;
|
|
if (!empty($rsslink)) {
|
|
$row[] = $rsslink;
|
|
}
|
|
$learningtable->data[] = $row;
|
|
|
|
} else {
|
|
$row = array ($printsection, $forumlink, $forum->intro, $count);
|
|
if ($CFG->forum_trackreadposts) {
|
|
$row[] = $unreadlink;
|
|
}
|
|
if (!empty($rsslink)) {
|
|
$row[] = $rsslink;
|
|
}
|
|
$learningtable->data[] = $row;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
/// Output the page
|
|
|
|
if ($course->category) {
|
|
print_header("$course->shortname: $strforums", "$course->fullname",
|
|
"<a href=\"../../course/view.php?id=$course->id\">$course->shortname</a> -> $strforums",
|
|
"", "", true, $searchform, navmenu($course));
|
|
} else {
|
|
print_header("$course->shortname: $strforums", "$course->fullname", "$strforums",
|
|
"", "", true, $searchform, navmenu($course));
|
|
}
|
|
|
|
if ($generalforums) {
|
|
print_heading(get_string("generalforums", "forum"));
|
|
print_table($generaltable);
|
|
}
|
|
|
|
if ($learningforums) {
|
|
print_heading(get_string("learningforums", "forum"));
|
|
print_table($learningtable);
|
|
}
|
|
|
|
print_footer($course);
|
|
|
|
?>
|