mirror of
https://github.com/moodle/moodle.git
synced 2025-02-08 09:02:07 +01:00
375 lines
13 KiB
PHP
375 lines
13 KiB
PHP
<?php
|
|
|
|
// This file is part of Moodle - http://moodle.org/
|
|
//
|
|
// Moodle is free software: you can redistribute it and/or modify
|
|
// it under the terms of the GNU General Public License as published by
|
|
// the Free Software Foundation, either version 3 of the License, or
|
|
// (at your option) any later version.
|
|
//
|
|
// Moodle is distributed in the hope that it will be useful,
|
|
// but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
// GNU General Public License for more details.
|
|
//
|
|
// You should have received a copy of the GNU General Public License
|
|
// along with Moodle. If not, see <http://www.gnu.org/licenses/>.
|
|
|
|
/**
|
|
* This file adds support to rss feeds generation
|
|
*
|
|
* @package mod_forum
|
|
* @category rss
|
|
* @copyright 2001 Eloy Lafuente (stronk7) http://contiento.com
|
|
* @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
|
|
*/
|
|
|
|
/**
|
|
* Returns the path to the cached rss feed contents. Creates/updates the cache if necessary.
|
|
* @param stdClass $context the context
|
|
* @param array $args the arguments received in the url
|
|
* @return string the full path to the cached RSS feed directory. Null if there is a problem.
|
|
*/
|
|
function forum_rss_get_feed($context, $args) {
|
|
global $CFG, $DB;
|
|
|
|
$status = true;
|
|
|
|
//are RSS feeds enabled?
|
|
if (empty($CFG->forum_enablerssfeeds)) {
|
|
debugging('DISABLED (module configuration)');
|
|
return null;
|
|
}
|
|
|
|
$forumid = clean_param($args[3], PARAM_INT);
|
|
$cm = get_coursemodule_from_instance('forum', $forumid, 0, false, MUST_EXIST);
|
|
if ($cm) {
|
|
$modcontext = get_context_instance(CONTEXT_MODULE, $cm->id);
|
|
|
|
//context id from db should match the submitted one
|
|
if ($context->id != $modcontext->id || !has_capability('mod/forum:viewdiscussion', $modcontext)) {
|
|
return null;
|
|
}
|
|
}
|
|
|
|
$forum = $DB->get_record('forum', array('id' => $forumid), '*', MUST_EXIST);
|
|
if (!rss_enabled_for_mod('forum', $forum)) {
|
|
return null;
|
|
}
|
|
|
|
//the sql that will retreive the data for the feed and be hashed to get the cache filename
|
|
$sql = forum_rss_get_sql($forum, $cm);
|
|
|
|
//hash the sql to get the cache file name
|
|
$filename = rss_get_file_name($forum, $sql);
|
|
$cachedfilepath = rss_get_file_full_name('mod_forum', $filename);
|
|
|
|
//Is the cache out of date?
|
|
$cachedfilelastmodified = 0;
|
|
if (file_exists($cachedfilepath)) {
|
|
$cachedfilelastmodified = filemtime($cachedfilepath);
|
|
}
|
|
//if the cache is more than 60 seconds old and there's new stuff
|
|
$dontrecheckcutoff = time()-60;
|
|
if ( $dontrecheckcutoff > $cachedfilelastmodified && forum_rss_newstuff($forum, $cm, $cachedfilelastmodified)) {
|
|
//need to regenerate the cached version
|
|
$result = forum_rss_feed_contents($forum, $sql);
|
|
if (!empty($result)) {
|
|
$status = rss_save_file('mod_forum',$filename,$result);
|
|
}
|
|
}
|
|
|
|
//return the path to the cached version
|
|
return $cachedfilepath;
|
|
}
|
|
|
|
/**
|
|
* Given a forum object, deletes all cached RSS files associated with it.
|
|
*
|
|
* @param stdClass $forum
|
|
*/
|
|
function forum_rss_delete_file($forum) {
|
|
rss_delete_file('mod_forum', $forum);
|
|
}
|
|
|
|
///////////////////////////////////////////////////////
|
|
//Utility functions
|
|
|
|
/**
|
|
* If there is new stuff in the forum since $time this returns true
|
|
* Otherwise it returns false.
|
|
*
|
|
* @param stdClass $forum the forum object
|
|
* @param stdClass $cm Course Module object
|
|
* @param int $time check for items since this epoch timestamp
|
|
* @return bool True for new items
|
|
*/
|
|
function forum_rss_newstuff($forum, $cm, $time) {
|
|
global $DB;
|
|
|
|
$sql = forum_rss_get_sql($forum, $cm, $time);
|
|
|
|
$recs = $DB->get_records_sql($sql, null, 0, 1);//limit of 1. If we get even 1 back we have new stuff
|
|
return ($recs && !empty($recs));
|
|
}
|
|
|
|
/**
|
|
* Determines which type of SQL query is required, one for posts or one for discussions, and returns the appropriate query
|
|
*
|
|
* @param stdClass $forum the forum object
|
|
* @param stdClass $cm Course Module object
|
|
* @param int $time check for items since this epoch timestamp
|
|
* @return string the SQL query to be used to get the Discussion/Post details from the forum table of the database
|
|
*/
|
|
function forum_rss_get_sql($forum, $cm, $time=0) {
|
|
$sql = null;
|
|
|
|
if (!empty($forum->rsstype)) {
|
|
if ($forum->rsstype == 1) { //Discussion RSS
|
|
$sql = forum_rss_feed_discussions_sql($forum, $cm, $time);
|
|
} else { //Post RSS
|
|
$sql = forum_rss_feed_posts_sql($forum, $cm, $time);
|
|
}
|
|
}
|
|
|
|
return $sql;
|
|
}
|
|
|
|
/**
|
|
* Generates the SQL query used to get the Discussion details from the forum table of the database
|
|
*
|
|
* @param stdClass $forum the forum object
|
|
* @param stdClass $cm Course Module object
|
|
* @param int $newsince check for items since this epoch timestamp
|
|
* @return string the SQL query to be used to get the Discussion details from the forum table of the database
|
|
*/
|
|
function forum_rss_feed_discussions_sql($forum, $cm, $newsince=0) {
|
|
global $CFG, $DB, $USER;
|
|
|
|
$timelimit = '';
|
|
|
|
$modcontext = null;
|
|
|
|
$now = round(time(), -2);
|
|
$params = array($cm->instance);
|
|
|
|
$modcontext = get_context_instance(CONTEXT_MODULE, $cm->id);
|
|
|
|
if (!empty($CFG->forum_enabletimedposts)) { /// Users must fulfill timed posts
|
|
if (!has_capability('mod/forum:viewhiddentimedposts', $modcontext)) {
|
|
$timelimit = " AND ((d.timestart <= :now1 AND (d.timeend = 0 OR d.timeend > :now2))";
|
|
$params['now1'] = $now;
|
|
$params['now2'] = $now;
|
|
if (isloggedin()) {
|
|
$timelimit .= " OR d.userid = :userid";
|
|
$params['userid'] = $USER->id;
|
|
}
|
|
$timelimit .= ")";
|
|
}
|
|
}
|
|
|
|
//do we only want new posts?
|
|
if ($newsince) {
|
|
$newsince = " AND p.modified > '$newsince'";
|
|
} else {
|
|
$newsince = '';
|
|
}
|
|
|
|
//get group enforcing SQL
|
|
$groupmode = groups_get_activity_groupmode($cm);
|
|
$currentgroup = groups_get_activity_group($cm);
|
|
$groupselect = forum_rss_get_group_sql($cm, $groupmode, $currentgroup, $modcontext);
|
|
|
|
if ($groupmode && $currentgroup) {
|
|
$params['groupid'] = $currentgroup;
|
|
}
|
|
|
|
$forumsort = "d.timemodified DESC";
|
|
$postdata = "p.id, p.subject, p.created as postcreated, p.modified, p.discussion, p.userid, p.message as postmessage, p.messageformat AS postformat, p.messagetrust AS posttrust";
|
|
|
|
$sql = "SELECT $postdata, d.id as discussionid, d.name as discussionname, d.timemodified, d.usermodified, d.groupid, d.timestart, d.timeend,
|
|
u.firstname as userfirstname, u.lastname as userlastname, u.email, u.picture, u.imagealt
|
|
FROM {forum_discussions} d
|
|
JOIN {forum_posts} p ON p.discussion = d.id
|
|
JOIN {user} u ON p.userid = u.id
|
|
WHERE d.forum = {$forum->id} AND p.parent = 0
|
|
$timelimit $groupselect $newsince
|
|
ORDER BY $forumsort";
|
|
return $sql;
|
|
}
|
|
|
|
/**
|
|
* Generates the SQL query used to get the Post details from the forum table of the database
|
|
*
|
|
* @param stdClass $forum the forum object
|
|
* @param stdClass $cm Course Module object
|
|
* @param int $newsince check for items since this epoch timestamp
|
|
* @return string the SQL query to be used to get the Post details from the forum table of the database
|
|
*/
|
|
function forum_rss_feed_posts_sql($forum, $cm, $newsince=0) {
|
|
$modcontext = get_context_instance(CONTEXT_MODULE, $cm->id);
|
|
|
|
//get group enforcement SQL
|
|
$groupmode = groups_get_activity_groupmode($cm);
|
|
$currentgroup = groups_get_activity_group($cm);
|
|
|
|
$groupselect = forum_rss_get_group_sql($cm, $groupmode, $currentgroup, $modcontext);
|
|
|
|
if ($groupmode && $currentgroup) {
|
|
$params['groupid'] = $currentgroup;
|
|
}
|
|
|
|
//do we only want new posts?
|
|
if ($newsince) {
|
|
$newsince = " AND p.modified > '$newsince'";
|
|
} else {
|
|
$newsince = '';
|
|
}
|
|
|
|
$sql = "SELECT p.id AS postid,
|
|
d.id AS discussionid,
|
|
d.name AS discussionname,
|
|
u.id AS userid,
|
|
u.firstname AS userfirstname,
|
|
u.lastname AS userlastname,
|
|
p.subject AS postsubject,
|
|
p.message AS postmessage,
|
|
p.created AS postcreated,
|
|
p.messageformat AS postformat,
|
|
p.messagetrust AS posttrust
|
|
FROM {forum_discussions} d,
|
|
{forum_posts} p,
|
|
{user} u
|
|
WHERE d.forum = {$forum->id} AND
|
|
p.discussion = d.id AND
|
|
u.id = p.userid $newsince
|
|
$groupselect
|
|
ORDER BY p.created desc";
|
|
|
|
return $sql;
|
|
}
|
|
|
|
/**
|
|
* Retrieve the correct SQL snippet for group-only forums
|
|
*
|
|
* @param stdClass $cm Course Module object
|
|
* @param int $groupmode the mode in which the forum's groups are operating
|
|
* @param bool $currentgroup true if the user is from the a group enabled on the forum
|
|
* @param stdClass $modcontext The context instance of the forum module
|
|
* @return string SQL Query for group details of the forum
|
|
*/
|
|
function forum_rss_get_group_sql($cm, $groupmode, $currentgroup, $modcontext=null) {
|
|
$groupselect = '';
|
|
|
|
if ($groupmode) {
|
|
if ($groupmode == VISIBLEGROUPS or has_capability('moodle/site:accessallgroups', $modcontext)) {
|
|
if ($currentgroup) {
|
|
$groupselect = "AND (d.groupid = :groupid OR d.groupid = -1)";
|
|
$params['groupid'] = $currentgroup;
|
|
}
|
|
} else {
|
|
//seprate groups without access all
|
|
if ($currentgroup) {
|
|
$groupselect = "AND (d.groupid = :groupid OR d.groupid = -1)";
|
|
$params['groupid'] = $currentgroup;
|
|
} else {
|
|
$groupselect = "AND d.groupid = -1";
|
|
}
|
|
}
|
|
}
|
|
|
|
return $groupselect;
|
|
}
|
|
|
|
/**
|
|
* This function return the XML rss contents about the forum
|
|
* It returns false if something is wrong
|
|
*
|
|
* @param stdClass $forum the forum object
|
|
* @param string $sql The SQL used to retrieve the contents from the database
|
|
* @return bool|string false if the contents is empty, otherwise the contents of the feed is returned
|
|
*
|
|
* @Todo MDL-31129 implement post attachment handling
|
|
*/
|
|
function forum_rss_feed_contents($forum, $sql) {
|
|
global $CFG, $DB;
|
|
|
|
$status = true;
|
|
|
|
$params = array();
|
|
//$params['forumid'] = $forum->id;
|
|
$recs = $DB->get_recordset_sql($sql, $params, 0, $forum->rssarticles);
|
|
|
|
//set a flag. Are we displaying discussions or posts?
|
|
$isdiscussion = true;
|
|
if (!empty($forum->rsstype) && $forum->rsstype!=1) {
|
|
$isdiscussion = false;
|
|
}
|
|
|
|
$formatoptions = new stdClass();
|
|
$items = array();
|
|
foreach ($recs as $rec) {
|
|
$item = new stdClass();
|
|
$user = new stdClass();
|
|
if ($isdiscussion && !empty($rec->discussionname)) {
|
|
$item->title = format_string($rec->discussionname);
|
|
} else if (!empty($rec->postsubject)) {
|
|
$item->title = format_string($rec->postsubject);
|
|
} else {
|
|
//we should have an item title by now but if we dont somehow then substitute something somewhat meaningful
|
|
$item->title = format_string($forum->name.' '.userdate($rec->postcreated,get_string('strftimedatetimeshort', 'langconfig')));
|
|
}
|
|
$user->firstname = $rec->userfirstname;
|
|
$user->lastname = $rec->userlastname;
|
|
$item->author = fullname($user);
|
|
$item->pubdate = $rec->postcreated;
|
|
if ($isdiscussion) {
|
|
$item->link = $CFG->wwwroot."/mod/forum/discuss.php?d=".$rec->discussionid;
|
|
} else {
|
|
$item->link = $CFG->wwwroot."/mod/forum/discuss.php?d=".$rec->discussionid."&parent=".$rec->postid;
|
|
}
|
|
|
|
$formatoptions->trusted = $rec->posttrust;
|
|
$item->description = format_text($rec->postmessage,$rec->postformat,$formatoptions,$forum->course);
|
|
|
|
//TODO: MDL-31129 implement post attachment handling
|
|
/*if (!$isdiscussion) {
|
|
$post_file_area_name = str_replace('//', '/', "$forum->course/$CFG->moddata/forum/$forum->id/$rec->postid");
|
|
$post_files = get_directory_list("$CFG->dataroot/$post_file_area_name");
|
|
|
|
if (!empty($post_files)) {
|
|
$item->attachments = array();
|
|
}
|
|
}*/
|
|
|
|
$items[] = $item;
|
|
}
|
|
$recs->close();
|
|
|
|
|
|
if (!empty($items)) {
|
|
//First the RSS header
|
|
$header = rss_standard_header(strip_tags(format_string($forum->name,true)),
|
|
$CFG->wwwroot."/mod/forum/view.php?f=".$forum->id,
|
|
format_string($forum->intro,true)); // TODO: fix format
|
|
//Now all the rss items
|
|
if (!empty($header)) {
|
|
$articles = rss_add_items($items);
|
|
}
|
|
//Now the RSS footer
|
|
if (!empty($header) && !empty($articles)) {
|
|
$footer = rss_standard_footer();
|
|
}
|
|
//Now, if everything is ok, concatenate it
|
|
if (!empty($header) && !empty($articles) && !empty($footer)) {
|
|
$status = $header.$articles.$footer;
|
|
} else {
|
|
$status = false;
|
|
}
|
|
} else {
|
|
$status = false;
|
|
}
|
|
|
|
return $status;
|
|
}
|