mod/forum/discuss.php

   1 <?php
   2
   3 // This file is part of Moodle - http://moodle.org/
   4 //
   5 // Moodle is free software: you can redistribute it and/or modify
   6 // it under the terms of the GNU General Public License as published by
   7 // the Free Software Foundation, either version 3 of the License, or
   8 // (at your option) any later version.
   9 //
  10 // Moodle is distributed in the hope that it will be useful,
  11 // but WITHOUT ANY WARRANTY; without even the implied warranty of
  12 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13 // GNU General Public License for more details.
  14 //
  15 // You should have received a copy of the GNU General Public License
  16 // along with Moodle.  If not, see <http://www.gnu.org/licenses/>.
  17
  18 /**
  19  * Displays a post, and all the posts below it.
  20  * If no post is given, displays all posts in a discussion
  21  *
  22  * @package   mod_forum
  23  * @copyright 1999 onwards Martin Dougiamas  {@link http://moodle.com}
  24  * @license   http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
  25  */
  26
  27     require_once('../../config.php');
  28
  29     $d      = required_param('d', PARAM_INT);                // Discussion ID
  30     $parent = optional_param('parent', 0, PARAM_INT);        // If set, then display this post and all children.
  31     $mode   = optional_param('mode', 0, PARAM_INT);          // If set, changes the layout of the thread
  32     $move   = optional_param('move', 0, PARAM_INT);          // If set, moves this discussion to another forum
  33     $mark   = optional_param('mark', '', PARAM_ALPHA);       // Used for tracking read posts if user initiated.
  34     $postid = optional_param('postid', 0, PARAM_INT);        // Used for tracking read posts if user initiated.
  35
  36     $url = new moodle_url('/mod/forum/discuss.php', array('d'=>$d));
  37     if ($parent !== 0) {
  38         $url->param('parent', $parent);
  39     }
  40     $PAGE->set_url($url);
  41
  42     $discussion = $DB->get_record('forum_discussions', array('id' => $d), '*', MUST_EXIST);
  43     $course = $DB->get_record('course', array('id' => $discussion->course), '*', MUST_EXIST);
  44     $forum = $DB->get_record('forum', array('id' => $discussion->forum), '*', MUST_EXIST);
  45     $cm = get_coursemodule_from_instance('forum', $forum->id, $course->id, false, MUST_EXIST);
  46
  47     require_course_login($course, true, $cm);
  48
  49     // move this down fix for MDL-6926
  50     require_once($CFG->dirroot.'/mod/forum/lib.php');
  51
  52     $modcontext = context_module::instance($cm->id);
  53     require_capability('mod/forum:viewdiscussion', $modcontext, NULL, true, 'noviewdiscussionspermission', 'forum');
  54
  55     if (!empty($CFG->enablerssfeeds) && !empty($CFG->forum_enablerssfeeds) && $forum->rsstype && $forum->rssarticles) {
  56         require_once("$CFG->libdir/rsslib.php");
  57
  58         $rsstitle = format_string($course->shortname, true, array('context' => context_course::instance($course->id))) . ': ' . format_string($forum->name);
  59         rss_add_http_header($modcontext, 'mod_forum', $forum, $rsstitle);
  60     }
  61
  62     // Move discussion if requested.
  63     if ($move > 0 and confirm_sesskey()) {
  64         $return = $CFG->wwwroot.'/mod/forum/discuss.php?d='.$discussion->id;
  65
  66         if (!$forumto = $DB->get_record('forum', array('id' => $move))) {
  67             print_error('cannotmovetonotexist', 'forum', $return);
  68         }
  69
  70         require_capability('mod/forum:movediscussions', $modcontext);
  71
  72         if ($forum->type == 'single') {
  73             print_error('cannotmovefromsingleforum', 'forum', $return);
  74         }
  75
  76         if (!$forumto = $DB->get_record('forum', array('id' => $move))) {
  77             print_error('cannotmovetonotexist', 'forum', $return);
  78         }
  79
  80         if ($forumto->type == 'single') {
  81             print_error('cannotmovetosingleforum', 'forum', $return);
  82         }
  83
  84         // Get target forum cm and check it is visible to current user.
  85         $modinfo = get_fast_modinfo($course);
  86         $forums = $modinfo->get_instances_of('forum');
  87         if (!array_key_exists($forumto->id, $forums)) {
  88             print_error('cannotmovetonotfound', 'forum', $return);
  89         }
  90         $cmto = $forums[$forumto->id];
  91         if (!$cmto->uservisible) {
  92             print_error('cannotmovenotvisible', 'forum', $return);
  93         }
  94
  95         $destinationctx = context_module::instance($cmto->id);
  96         require_capability('mod/forum:startdiscussion', $destinationctx);
  97
  98         if (!forum_move_attachments($discussion, $forum->id, $forumto->id)) {
  99             echo $OUTPUT->notification("Errors occurred while moving attachment directories - check your file permissions");
 100         }
 101         // For each subscribed user in this forum and discussion, copy over per-discussion subscriptions if required.
 102         $discussiongroup = $discussion->groupid == -1 ? 0 : $discussion->groupid;
 103         $potentialsubscribers = \mod_forum\subscriptions::get_potential_subscribers(
 104             $modcontext,
 105             $discussiongroup,
 106             'u.id'
 107         );
 108
 109         // Pre-seed the subscribed_discussion caches.
 110         // Firstly for the forum being moved to.
 111         \mod_forum\subscriptions::fill_subscription_cache($forumto->id);
 112         // And also for the discussion being moved.
 113         \mod_forum\subscriptions::fill_subscription_cache($forum->id);
 114         $subscriptionchanges = array();
 115         foreach ($potentialsubscribers as $subuser) {
 116             $userid = $subuser->id;
 117             $targetsubscription = \mod_forum\subscriptions::is_subscribed($userid, $forumto, null, $cmto);
 118             if (\mod_forum\subscriptions::is_subscribed($userid, $forum, $discussion->id)) {
 119                 if (!$targetsubscription) {
 120                     $subscriptionchanges[$userid] = \mod_forum\subscriptions::FORUM_DISCUSSION_SUBSCRIBED;
 121                 }
 122             } else {
 123                 if ($targetsubscription) {
 124                     $subscriptionchanges[$userid] = \mod_forum\subscriptions::FORUM_DISCUSSION_UNSUBSCRIBED;
 125                 }
 126             }
 127         }
 128
 129         $DB->set_field('forum_discussions', 'forum', $forumto->id, array('id' => $discussion->id));
 130         $DB->set_field('forum_read', 'forumid', $forumto->id, array('discussionid' => $discussion->id));
 131
 132         // Delete the existing per-discussion subscriptions and replace them with the newly calculated ones.
 133         $DB->delete_records('forum_discussion_subs', array('discussion' => $discussion->id));
 134         $newdiscussion = clone $discussion;
 135         $newdiscussion->forum = $forumto->id;
 136         foreach ($subscriptionchanges as $userid => $preference) {
 137             if ($preference === \mod_forum\subscriptions::FORUM_DISCUSSION_SUBSCRIBED) {
 138                 \mod_forum\subscriptions::subscribe_user_to_discussion($userid, $newdiscussion, $destinationctx);
 139             } else {
 140                 \mod_forum\subscriptions::unsubscribe_user_from_discussion($userid, $newdiscussion, $destinationctx);
 141             }
 142         }
 143
 144         $params = array(
 145             'context' => $destinationctx,
 146             'objectid' => $discussion->id,
 147             'other' => array(
 148                 'fromforumid' => $forum->id,
 149                 'toforumid' => $forumto->id,
 150             )
 151         );
 152         $event = \mod_forum\event\discussion_moved::create($params);
 153         $event->add_record_snapshot('forum_discussions', $discussion);
 154         $event->add_record_snapshot('forum', $forum);
 155         $event->add_record_snapshot('forum', $forumto);
 156         $event->trigger();
 157
 158         // Delete the RSS files for the 2 forums to force regeneration of the feeds
 159         require_once($CFG->dirroot.'/mod/forum/rsslib.php');
 160         forum_rss_delete_file($forum);
 161         forum_rss_delete_file($forumto);
 162
 163         redirect($return.'&moved=-1&sesskey='.sesskey());
 164     }
 165
 166     $params = array(
 167         'context' => $modcontext,
 168         'objectid' => $discussion->id,
 169     );
 170     $event = \mod_forum\event\discussion_viewed::create($params);
 171     $event->add_record_snapshot('forum_discussions', $discussion);
 172     $event->add_record_snapshot('forum', $forum);
 173     $event->trigger();
 174
 175     unset($SESSION->fromdiscussion);
 176
 177     if ($mode) {
 178         set_user_preference('forum_displaymode', $mode);
 179     }
 180
 181     $displaymode = get_user_preferences('forum_displaymode', $CFG->forum_displaymode);
 182
 183     if ($parent) {
 184         // If flat AND parent, then force nested display this time
 185         if ($displaymode == FORUM_MODE_FLATOLDEST or $displaymode == FORUM_MODE_FLATNEWEST) {
 186             $displaymode = FORUM_MODE_NESTED;
 187         }
 188     } else {
 189         $parent = $discussion->firstpost;
 190     }
 191
 192     if (! $post = forum_get_post_full($parent)) {
 193         print_error("notexists", 'forum', "$CFG->wwwroot/mod/forum/view.php?f=$forum->id");
 194     }
 195
 196     if (!forum_user_can_see_post($forum, $discussion, $post, null, $cm)) {
 197         print_error('noviewdiscussionspermission', 'forum', "$CFG->wwwroot/mod/forum/view.php?id=$forum->id");
 198     }
 199
 200     if ($mark == 'read' or $mark == 'unread') {
 201         if ($CFG->forum_usermarksread && forum_tp_can_track_forums($forum) && forum_tp_is_tracked($forum)) {
 202             if ($mark == 'read') {
 203                 forum_tp_add_read_record($USER->id, $postid);
 204             } else {
 205                 // unread
 206                 forum_tp_delete_read_records($USER->id, $postid);
 207             }
 208         }
 209     }
 210
 211     $searchform = forum_search_form($course);
 212
 213     $forumnode = $PAGE->navigation->find($cm->id, navigation_node::TYPE_ACTIVITY);
 214     if (empty($forumnode)) {
 215         $forumnode = $PAGE->navbar;
 216     } else {
 217         $forumnode->make_active();
 218     }
 219     $node = $forumnode->add(format_string($discussion->name), new moodle_url('/mod/forum/discuss.php', array('d'=>$discussion->id)));
 220     $node->display = false;
 221     if ($node && $post->id != $discussion->firstpost) {
 222         $node->add(format_string($post->subject), $PAGE->url);
 223     }
 224
 225     $PAGE->set_title("$course->shortname: ".format_string($discussion->name));
 226     $PAGE->set_heading($course->fullname);
 227     $PAGE->set_button($searchform);
 228     $renderer = $PAGE->get_renderer('mod_forum');
 229
 230     echo $OUTPUT->header();
 231
 232     $headingvalue = format_string($forum->name);
 233     if ((!isguestuser() && isloggedin()) && has_capability('mod/forum:viewdiscussion', $modcontext)) {
 234         // Discussion subscription.
 235         if (\mod_forum\subscriptions::is_subscribable($forum)) {
 236             $headingvalue .= '&nbsp;';
 237             $headingvalue .= html_writer::tag('span', forum_get_discussion_subscription_icon($forum, $post->discussion), array(
 238                 'class' => 'discussionsubscription',
 239             ));
 240         }
 241     }
 242     echo $OUTPUT->heading($headingvalue, 2);
 243
 244
 245 /// Check to see if groups are being used in this forum
 246 /// If so, make sure the current person is allowed to see this discussion
 247 /// Also, if we know they should be able to reply, then explicitly set $canreply for performance reasons
 248
 249     $canreply = forum_user_can_post($forum, $discussion, $USER, $cm, $course, $modcontext);
 250     if (!$canreply and $forum->type !== 'news') {
 251         if (isguestuser() or !isloggedin()) {
 252             $canreply = true;
 253         }
 254         if (!is_enrolled($modcontext) and !is_viewing($modcontext)) {
 255             // allow guests and not-logged-in to see the link - they are prompted to log in after clicking the link
 256             // normal users with temporary guest access see this link too, they are asked to enrol instead
 257             $canreply = enrol_selfenrol_available($course->id);
 258         }
 259     }
 260
 261     // Output the links to neighbour discussions.
 262     $neighbours = forum_get_discussion_neighbours($cm, $discussion);
 263     echo $renderer->neighbouring_discussion_navigation($neighbours['prev'], $neighbours['next']);
 264
 265 /// Print the controls across the top
 266     echo '<div class="discussioncontrols clearfix">';
 267
 268     if (!empty($CFG->enableportfolios) && has_capability('mod/forum:exportdiscussion', $modcontext)) {
 269         require_once($CFG->libdir.'/portfoliolib.php');
 270         $button = new portfolio_add_button();
 271         $button->set_callback_options('forum_portfolio_caller', array('discussionid' => $discussion->id), 'mod_forum');
 272         $button = $button->to_html(PORTFOLIO_ADD_FULL_FORM, get_string('exportdiscussion', 'mod_forum'));
 273         $buttonextraclass = '';
 274         if (empty($button)) {
 275             // no portfolio plugin available.
 276             $button = '&nbsp;';
 277             $buttonextraclass = ' noavailable';
 278         }
 279         echo html_writer::tag('div', $button, array('class' => 'discussioncontrol exporttoportfolio'.$buttonextraclass));
 280     } else {
 281         echo html_writer::tag('div', '&nbsp;', array('class'=>'discussioncontrol nullcontrol'));
 282     }
 283
 284     // groups selector not needed here
 285     echo '<div class="discussioncontrol displaymode">';
 286     forum_print_mode_form($discussion->id, $displaymode);
 287     echo "</div>";
 288
 289     if ($forum->type != 'single'
 290                 && has_capability('mod/forum:movediscussions', $modcontext)) {
 291
 292         echo '<div class="discussioncontrol movediscussion">';
 293         // Popup menu to move discussions to other forums. The discussion in a
 294         // single discussion forum can't be moved.
 295         $modinfo = get_fast_modinfo($course);
 296         if (isset($modinfo->instances['forum'])) {
 297             $forummenu = array();
 298             // Check forum types and eliminate simple discussions.
 299             $forumcheck = $DB->get_records('forum', array('course' => $course->id),'', 'id, type');
 300             foreach ($modinfo->instances['forum'] as $forumcm) {
 301                 if (!$forumcm->uservisible || !has_capability('mod/forum:startdiscussion',
 302                     context_module::instance($forumcm->id))) {
 303                     continue;
 304                 }
 305                 $section = $forumcm->sectionnum;
 306                 $sectionname = get_section_name($course, $section);
 307                 if (empty($forummenu[$section])) {
 308                     $forummenu[$section] = array($sectionname => array());
 309                 }
 310                 $forumidcompare = $forumcm->instance != $forum->id;
 311                 $forumtypecheck = $forumcheck[$forumcm->instance]->type !== 'single';
 312                 if ($forumidcompare and $forumtypecheck) {
 313                     $url = "/mod/forum/discuss.php?d=$discussion->id&move=$forumcm->instance&sesskey=".sesskey();
 314                     $forummenu[$section][$sectionname][$url] = format_string($forumcm->name);
 315                 }
 316             }
 317             if (!empty($forummenu)) {
 318                 echo '<div class="movediscussionoption">';
 319                 $select = new url_select($forummenu, '',
 320                         array(''=>get_string("movethisdiscussionto", "forum")),
 321                         'forummenu', get_string('move'));
 322                 echo $OUTPUT->render($select);
 323                 echo "</div>";
 324             }
 325         }
 326         echo "</div>";
 327     }
 328     echo '<div class="clearfloat">&nbsp;</div>';
 329     echo "</div>";
 330
 331     if (!empty($forum->blockafter) && !empty($forum->blockperiod)) {
 332         $a = new stdClass();
 333         $a->blockafter  = $forum->blockafter;
 334         $a->blockperiod = get_string('secondstotime'.$forum->blockperiod);
 335         echo $OUTPUT->notification(get_string('thisforumisthrottled','forum',$a));
 336     }
 337
 338     if ($forum->type == 'qanda' && !has_capability('mod/forum:viewqandawithoutposting', $modcontext) &&
 339                 !forum_user_has_posted($forum->id,$discussion->id,$USER->id)) {
 340         echo $OUTPUT->notification(get_string('qandanotify','forum'));
 341     }
 342
 343     if ($move == -1 and confirm_sesskey()) {
 344         echo $OUTPUT->notification(get_string('discussionmoved', 'forum', format_string($forum->name,true)));
 345     }
 346
 347     $canrate = has_capability('mod/forum:rate', $modcontext);
 348     forum_print_discussion($course, $cm, $forum, $discussion, $post, $displaymode, $canreply, $canrate);
 349
 350     // Add the subscription toggle JS.
 351     $PAGE->requires->yui_module('moodle-mod_forum-subscriptiontoggle', 'Y.M.mod_forum.subscriptiontoggle.init');
 352
 353     echo $OUTPUT->footer();