- Commited Marco's new comment module and forum module!!!

4.1.x
Dries Buytaert 2002-09-15 13:00:12 +00:00
parent 7b155e5226
commit 92326261d1
6 changed files with 3725 additions and 1039 deletions

View File

@ -62,24 +62,6 @@ class BaseTheme {
print $output;
}
function comment_controls($threshold = 1, $mode = 3, $order = 1) {
return form_item(t("Comment viewing options"), comment_mode($mode) . comment_order($order) . comment_threshold($threshold) ." <input type=\"submit\" name=\"op\" value=\"". t("Update settings") ."\" />", t("Select your prefered way to display the comments and click 'Update settings' to active your changes."));
}
function comment($comment, $link = 0) {
$output = "<a name=\"$comment->cid\"></a>";
$output .= "<div style=\"border: 1px solid; padding: 10px;\">";
$output .= "<table border=\"0\" cellpadding=\"0\" cellspacing=\"0\" width=\"100%\">";
$output .= " <tr><td><div style=\"font-size: 110%; font-weight: bold;\">". check_output($comment->subject) ."</div></td><td align=\"right\" rowspan=\"2\" valign=\"top\">". comment_moderation($comment) ."</td></tr>";
$output .= " <tr><td><div style=\"margin-left: 10px; padding-bottom: 10px; font-size: 90%;\">". t("by %a on %b", array("%a" => format_name($comment), "%b" => format_date($comment->timestamp))) ."</div></td></tr>";
$output .= " <tr><td colspan=\"2\">". check_output($comment->comment, 1) ."</td></tr>";
$output .= " <tr><td align=\"right\" colspan=\"2\">$link</td></tr>";
$output .= "</table>";
$output .= "</div><br />";
print $output;
}
function box($subject, $content, $region = "main") {
$output = "<b>". check_output($subject) ."</b><br />". check_output($content) ."<p />";
print $output;

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

View File

@ -2,7 +2,7 @@
// $Id$
function forum_system($field){
$system["description"] = t("Allows threaded discussions about general topics.");
$system["description"] = t("Enable threaded discussions about general topics.");
return $system[$field];
}
@ -17,16 +17,49 @@ function forum_access($op, $node) {
if ($op == "view") {
return $node->status;
}
if ($op == "create") {
return user_access("post content");
}
}
function forum_perm() {
return array("post forum topics without approval");
}
function forum_conf_options() {
foreach (taxonomy_get_vocabularies("forum") as $vid => $voc) {
$vocs[$vid] = $voc->name;
}
$output .= "<a name=\"image_nav_vocabulary\"></a>";
$output .= form_select("Forum vocabulary", "forum_nav_vocabulary", variable_get("forum_nav_vocabulary", ""), $vocs, t("The taxonomy vocabulary that will be uses as the navigation tree."));
$output .= _taxonomy_term_select("Containers", "forum_containers", variable_get("forum_containers", array()), variable_get("forum_nav_vocabulary", ""), t("You can choose vocabularies which will not have topics, but will be just containers for other forums."), 1, t("<none>"));
$output .= form_textfield("Topic icons path", "forum_topic_icon_path", variable_get("forum_topic_icon_path", "images/forum/topics/"), 30, 255, "The path to the topic icons. Leave blank to disable icons.");
$output .= form_textfield("Folder icons path", "forum_folder_icon_path", variable_get("forum_folder_icon_path", "images/forum/folder/"), 30, 255, "Path to the <i>default</i>, <i>hot</i>, <i>new</i> and <i>closed folder</i> icons. Leave blank to disable icons.");
$number = array(5 => 5, 10 => 10, 15 => 15, 20 => 20, 25 => 25, 30 => 30, 35 => 35, 40 => 40, 50 => 50, 60 => 60, 80 => 80, 100 => 100, 10000=>10000);
$output .= form_select("Hot topic threshold", "forum_hot_topic", variable_get("forum_hot_topic", 15), $number, "The number of posts a topic must have to be considered <i>hot</i>.");
$number = array(10 => 10, 25 => 25, 50 => 50, 75 => 75, 100 => 100);
$output .= form_select("Topics per page", "forum_per_page", variable_get("forum_per_page", 25), $number, "The default number of topics displayed per page; links to browse older messages are automatically being displayed.");
$forder = array(1 => "Date - newest first", 2 => "Date - oldest first", 3 => "Posts - most active first", 4=> "Posts - least active first");
$output .= form_select("Default order", "forum_order", variable_get("forum_order", 1), $forder, "The default display order for topics.");
$output .= form_textfield("Number of topics in block", "forum_block_num", variable_get("forum_block_num", "5"), 5, 5, "The number of topics in the <i>active topics</i> block.");
$output .= form_select("Internal caching", "forum_cache", variable_get("forum_cache", 0), array("disabled", "enabled"), "Cache internal datastructures for both anonymous and autheticated users. When enabled, the forum data won't be 100% up to date with regards regardto the number of posts, the number of replies and the last topic being posted. Enable when you have busy forum.");
return $output;
}
function forum_save($op, $node) {
if ($op == "approve") {
return array("status" => 1);
}
if ($op == "create") {
return array("body" => filter($node->body), "teaser" => filter($node->teaser));
if (user_access("post forum topics without approval")) {
$moderation = array("body" => filter($node->body), "moderate" => 0, "status" => 1);
} else {
$moderation = array("body" => filter($node->body), "moderate" => 1, "status" => 0);
}
return array_merge($moderation, array("tid", "icon_num", "shadow"));
}
if ($op == "decline") {
@ -34,69 +67,421 @@ function forum_save($op, $node) {
}
if ($op == "update") {
return array("body" => filter($node->body), "teaser" => filter($node->teaser));
// if she changed the term, we could have to leave a shadow
$old_terms = explode(",", $node->old_container);
foreach ($node->taxonomy as $term) {
if ($term && (!in_array($term, $old_terms)) && $node->shadow) {
$shadow = $term;
break;
}
}
return array("body" => filter($node->body), "tid", "icon_num", "shadow" => $shadow, "old_container");
}
}
function forum_link($type) {
function forum_load($node) {
$forum = db_fetch_object(db_query("SELECT * FROM forum WHERE nid = '%d' AND shadow = 0", $node->nid));
return $forum;
}
function forum_block() {
if (user_access("access content")) {
$result = db_query("SELECT n.nid, n.title, n.body, GREATEST(n.created, MAX(c.timestamp)) AS sort FROM node n, forum f LEFT JOIN comments c ON c.nid = n.nid WHERE n.type = 'forum' AND n.nid = f.nid AND f.shadow = 0 AND n.status = 1 GROUP BY n.nid ORDER BY sort DESC LIMIT ". variable_get("forum_block_num", "5"));
while ($node = db_fetch_object($result)) {
$content .= "<li>".l(check_output($node->title), array("id" => $node->nid), "node", "", array("title" => substr(strip_tags($node->body), 0, 100)."..."))."</li>\n";
}
if ($content) {
$content .= "<p><div align=\"center\">".lm(t("browse forums"), array("mod" => "forum"))."</div></p>";
}
}
$blocks[0][subject] = t("Forum active topics");
$blocks[0][content] = $content;
$blocks[0][info] = t("Forum active topics");
return $blocks;
}
function forum_link($type, $node) {
if ($type == "page" && user_access("access content")) {
$links[] = lm(t("forum"), array("mod" => "forum"), "", array("title" => t("Read and participate in the discussion forums.")));
$links[] = lm(t("forum"), array("mod" => "forum"));
}
if ($type == "menu.create" && user_access("administer nodes")) {
$links[] = lm(t("create forum"), array("mod" => "node", "op" => "add", "type" => "forum"), "", array("title" => t("Add a new discussion forum.")));
if ($type == "menu.create" && user_access("post content")) {
// I had complains that having this link leads people not to choose a forum, and always post in the first forum.
#$links[] = lm(t("create forum topic"), array("mod" => "node", "op" => "add", "type" => "forum"), "", array("title" => t("Start a new forum topic.")));
}
if ($type == "node" && $node->type == "forum") {
// get previous and next topic
$sql = "SELECT n.nid, title, body, GREATEST(n.created, MAX(c.timestamp)) AS date_sort, COUNT(c.nid) AS num_comments FROM node n, term_node t, forum f LEFT JOIN comments c ON c.nid = n.nid WHERE n.nid = t.nid AND n.nid = f.nid AND t.tid = '%d' AND f.shadow = 0 AND n.status = 1 GROUP BY n.nid ORDER BY ". _forum_get_topic_order(isset($user->sortby) ? $user->sortby : variable_get("forum_order",1));
$terms = array_keys(taxonomy_node_get_terms_by_vocabulary($node->nid, variable_get("forum_nav_vocabulary", "")));
$result = db_query($sql, $terms[0]);
while ($topic = db_fetch_object($result)) {
if ($stop == 1) {
$next->nid = $topic->nid;
$next->title = $topic->title;
$next->body = $topic->body;
break;
}
if ($topic->nid == $node->nid) {
$stop = 1;
}
else {
$prev->nid = $topic->nid;
$prev->title = $topic->title;
$prev->body = $topic->body;
}
}
if ($prev) {
$links[] = l(t("previous topic"), array("id" => $prev->nid), "node", "", array("title" => $prev->title."\n".substr(strip_tags($prev->body), 0, 100)."..."));
}
if ($next) {
$links[] = l(t("next topic"), array("id" => $next->nid), "node", "", array("title" => $next->title."\n".substr(strip_tags($next->body), 0, 100)."..."));
}
}
return $links ? $links : array();
}
function forum_view($node) {
function forum_view($node, $main = 0) {
global $theme;
$output .= "<p>". lm(t("Forum"), array("mod" => "forum")) ." / <b>". l(check_output($node->title), array("id" => $node->nid)) ."</b>:</p><p>". check_output($node->body) ."</p>";
$term_data = array_shift(taxonomy_node_get_terms($node->nid));
if (!$term_data) {
// we are previewing
$term_data = taxonomy_get_term($node->taxonomy[0]);
}
$voc = taxonomy_get_vocabulary($term_data->vid);
$output .= "<p>"._forum_get_icon($node)." ".lm(check_output($voc->name), array("mod" => "forum"))." : ".lm(check_output($term_data->name), array("mod" => "forum", "tid" => $term_data->tid));
$output .= " / <b>". check_output($node->title) ."</b><br>".t("%a by %b", array("%a" => format_date($node->created), "%b" => format_name($node)))."</p><p>". check_output($node->body, 1) ."</p>";
$output .= "<p>". $theme->links(link_node($node, $main)) ."</p>";
$theme->box(t("Discussion forum"), $output);
#$theme->box(t("Discussion forum"), $output);
$node->title = _forum_get_icon($node)." ".lm(check_output($voc->name), array("mod" => "forum"))." : ".lm(check_output($term_data->name), array("mod" => "forum", "tid" => $term_data->tid)) . " / <b>". check_output($node->title) ."</b>";
$theme->node($node, $main);
}
function forum_form(&$node, &$help, &$error) {
if (function_exists("taxonomy_node_form")) {
$output = implode("", taxonomy_node_form("forum", $node));
global $tid;
if ($node->nid) {
if ($node->taxonomy) {
$tid = $node->taxonomy;
} else {
// editing: load category from taxonomy
$tid = implode(",", array_keys(taxonomy_node_get_terms($node->nid)));
}
//$output .= implode("<p>", taxonomy_node_form("forum", $node));
$output .= "<input type=\"hidden\" name=\"edit[old_container]\" value=\"".implode(",", array_keys(taxonomy_node_get_terms($node->nid)))."\">";
$output .= form_checkbox(t("Leave shadow?"), "shadow", 1, 1, t("If you move this topic, you can leave a link in the old forum to the new forum."));
} else {
if ($node->taxonomy) {
$tid = $node->taxonomy;
}
}
$output .= form_textarea(t("Body"), "body", $node->body, 60, 10);
$output .= _taxonomy_term_select("Forum", "taxonomy", $tid, variable_get("forum_nav_vocabulary", ""), "", 0, "", variable_get("forum_containers", array()));
if ($icon_path = variable_get("forum_topic_icon_path", "images/forum/topics/")) {
if ($node->icon) {
// we are editing post
if ($dir = @opendir($icon_path)) {
$icon_num = 0;
while($icon = readdir($dir)) {
if ($icon == '.' || $icon == '..') {continue;}
if ($node->icon == $icon) {$checked = "checked";} else {$checked = "";}
$radio .= "<input type=\"radio\" name=\"edit[icon_num]\" value=\"$icon_num\" $checked><img src=\"$icon_path$icon\"> \n";
$icon_num++;
}
closedir($dir);
}
}
else {
if ($dir = @opendir($icon_path)) {
$icon_num = 0;
while($icon = readdir($dir)) {
if ($icon == '.' || $icon == '..') {continue;}
if ($node->icon_num == $icon_num) {$checked = "checked";} else {$checked = "";}
$radio .= "<input type=\"radio\" name=\"edit[icon_num]\" value=\"$icon_num\" $checked><img src=\"$icon_path$icon\"> \n";
$icon_num++;
}
closedir($dir);
}
}
$output .= form_item(t("Topic icon"), $radio);
}
$output .= form_textarea("Body", "body", $node->body, 60, 10);
return $output;
}
function forum_insert($node) {
$node->icon = _forum_decode_icon($node);
if (!$node->shadow) {
db_query("INSERT INTO forum (nid, icon) VALUES ('%d', '%s')", $node->nid, $node->icon);
} else {
// we created a shadow, a link to a moved topic in a new forum
db_query("INSERT INTO forum (nid, icon, shadow) VALUES ('%d', '%s', '%d')", $node->nid, $node->icon, $node->shadow);
}
function forum_num_comments($nid) {
$value = db_fetch_object(db_query("SELECT COUNT(cid) AS count FROM comments WHERE nid = '$nid'"));
if (variable_get("forum_cache", 0)) {
cache_clear();
}
}
function forum_update($node) {
$node->icon = _forum_decode_icon($node);
db_query("UPDATE forum SET icon = '%s' WHERE nid = '%d'", $node->icon, $node->nid);
if ($node->shadow) {
// insert in old forum a new topic, with link to new forum
$node->nid = "";
$node->type = "forum";
$node->status = 1;
$node->taxonomy = array($node->old_container);
node_submit($node);
}
}
function _forum_decode_icon($node) {
// to prevent malicious users
if ($icon_path = variable_get("forum_topic_icon_path", "images/forum/topics/")) {
if ($dir = @opendir($icon_path)) {
$icon_num = 0;
while($icon = readdir($dir)) {
if ($icon == '.' || $icon == '..') {continue;}
if ($icon_num == $node->icon_num) {$myicon = $icon;}
$icon_num++;
}
closedir($dir);
}
}
return $myicon;
}
function forum_delete(&$node) {
db_query("DELETE FROM forum WHERE nid = '%d'", $node->nid);
}
function _forum_num_comments($nid) {
$value = db_fetch_object(db_query("SELECT COUNT(cid) AS count FROM comments WHERE nid = '%d' AND status = 0", $nid));
return ($value) ? $value->count : 0;
}
function forum_last_comment($nid) {
$value = db_fetch_object(db_query("SELECT timestamp FROM comments WHERE nid = '$nid' ORDER BY timestamp DESC LIMIT 1"));
function _forum_last_comment($nid) {
$value = db_fetch_object(db_query("SELECT timestamp FROM comments WHERE nid = '%d' AND status = 0 ORDER BY timestamp DESC LIMIT 1", $nid));
return ($value) ? format_date($value->timestamp, "small") : "&nbsp;";
}
function _forum_last_reply($nid) {
$value = db_fetch_object(db_query("SELECT c.timestamp, u.name, u.uid FROM comments c LEFT JOIN users u ON c.uid = u.uid WHERE c.nid = '%d' AND c.status = 0 ORDER BY c.timestamp DESC LIMIT 1", $nid));
return $value;
}
function _forum_format($topic) {
if ($topic) {
return format_date($topic->timestamp, "small")."<br>".t("by")." ". format_name($topic);
}
else {
return message_na();
}
}
function forum_get_forums($tid = 0) {
global $user;
if (!$tid) {
$tid = 0;
}
if (variable_get("forum_cache", 0)) {
$forums = unserialize(cache_get("forum:$tid"));
}
if (!$forums) {
taxonomy_get_tree(variable_get("forum_nav_vocabulary", ""), $_forums, $tid);
$n = 0;
foreach ($_forums as $forum) {
if (in_array($forum->tid, variable_get("forum_containers", array()))) {
$forum->container = 1;
}
else {
$forum->num_topics = _forum_num_topics($forum->tid);
$forum->num_posts = _forum_num_replies($forum->tid) + $forum->num_topics;
$forum->last_post = _forum_last_post($forum->tid);
}
$forums[$forum->tid] = $forum;
$n++;
}
if (variable_get("forum_cache", 0)) {
cache_set("forum:$tid", serialize($forums), time()+60*10);
}
}
if ($user->uid && $forums) {
foreach (_forum_topics_read($user->uid) as $tid => $old) {
if ($forums[$tid]) {
$forums[$tid]->old_topics = $old;
}
}
}
return $forums;
}
function forum_get_parents($tid) {
if ($tid) {
$parents[] = taxonomy_get_term($tid);
}
$n = 0;
while ($parent = taxonomy_get_parents($parents[$n]->tid)) {
$parents = array_merge($parents, $parent);
$n++;
}
return $parents;
}
function _forum_num_topics($term) {
$value = db_fetch_object(db_query("SELECT COUNT(n.nid) AS count FROM node n, term_node r, forum f WHERE r.tid = '%d' AND n.nid = r.nid AND n.nid = f.nid AND n.status = 1 AND n.type = 'forum' AND f.shadow = 0", $term));
return ($value) ? $value->count : 0;
}
function _forum_num_replies($term) {
$value = db_fetch_object(db_query("SELECT COUNT(*) AS count FROM comments c, term_node r, node n WHERE r.tid = '%d' AND n.nid = r.nid AND n.nid = c.nid AND n.status = 1 AND c.status = 0 AND n.type = 'forum'", $term));
return ($value) ? $value->count : 0;
}
function _forum_topics_read($uid) {
$result = db_query("SELECT tid, count(*) AS c FROM history h, term_node r, node n WHERE r.nid = h.nid AND n.nid = h.nid AND n.type = 'forum' AND n.status = 1 AND h.uid = '%d' GROUP BY tid", $uid);
while ($obj = db_fetch_object($result)) {
$topics_read[$obj->tid] = $obj->c;
}
return $topics_read ? $topics_read : array();
}
function _forum_last_post($term) {
$topic = db_fetch_object(db_query("SELECT n.nid, n.created AS timestamp, u.name AS name, u.uid AS uid FROM node n, term_node r LEFT JOIN users u ON n.uid = u.uid WHERE r.tid = '%d' AND n.nid = r.nid AND n.type = 'forum' AND n.status = 1 ORDER BY timestamp DESC LIMIT 1", $term));
$reply = db_fetch_object(db_query("SELECT n.nid, c.timestamp, u.name AS name, u.uid AS uid FROM term_node r, node n LEFT JOIN comments c ON n.nid=c.nid LEFT JOIN users u ON c.uid = u.uid WHERE r.tid = '%d' AND n.nid = r.nid AND n.type = 'forum' AND n.status = 1 AND c.status = 0 ORDER BY c.timestamp DESC LIMIT 1", $term));
$value = ($topic->timestamp > $reply->timestamp) ? $topic : $reply;
return $value;
}
function forum_get_topics($tid, $sortby, $forum_per_page, $offset) {
global $user;
$term = taxonomy_get_term($tid);
$voc = taxonomy_get_vocabulary($term->vid);
$sql_sortby = _forum_get_topic_order($sortby);
$sql = "
SELECT n.nid, title, users.name AS name, users.uid AS uid, n.created AS timestamp, GREATEST(n.created, MAX(c.timestamp)) AS date_sort, COUNT(c.nid) AS num_comments, icon, n.comment AS comment_mode, shadow FROM node n, term_node r LEFT JOIN users ON n.uid = users.uid LEFT JOIN comments c ON c.nid = n.nid LEFT JOIN forum f ON n.nid = f.nid WHERE n.nid = r.nid AND r.tid = '%d' AND n.status = 1 AND n.type = 'forum' GROUP BY n.nid ORDER BY $sql_sortby";
$result = db_query($sql, $tid);
$topic_num = db_num_rows($result);
$n = 0;
while ($topic = db_fetch_object($result)) {
if ($n < $offset) {
$n++;
continue;
}
$history = _forum_user_last_visit($topic->nid);
// folder is new if topic is new or there are new comments since last visit
if ($topic->shadow > 0) {
$topic->new = 0;
}
else {
if (!$history && $user->uid) {
$topic->new_replies = 0;
$topic->new = 1;
}
else {
$comments = db_result(db_query("SELECT COUNT(c.nid) FROM node n LEFT JOIN comments c ON n.nid = c.nid WHERE n.nid = '$topic->nid' AND c.status = 0 AND timestamp > '$history' GROUP BY n.nid"));
$topic->new_replies = $comments ? $comments : 0;
if ($topic->new_replies) {
$topic->new = 1;
}
else {
$topic->new = 0;
}
}
}
$topic->last_reply = _forum_last_reply($topic->nid);
$topics[] = $topic;
$n++;
if ($n == ($forum_per_page + $offset)) {
break;
}
}
return array($topics, $topic_num);
}
function _forum_first_new($tid) {
global $user;
$result = db_query("SELECT r.nid FROM node n, history h, term_node r WHERE n.type = 'forum' AND n.status = 1 AND h.nid = n.nid AND r.nid = h.nid AND r.tid = '%d' AND h.uid = '%d' ", $tid, $user->uid);
while ($r = db_fetch_object($result)) {
$read[] = $r->nid;
}
if ($read) {
$nid = db_result(db_query("SELECT r.nid AS c FROM node n LEFT JOIN term_node r ON r.nid = n.nid WHERE n.type = 'forum' AND n.status = 1 AND r.tid = '%d' AND NOT (r.nid IN (".implode(",", $read).")) ORDER BY created LIMIT 1", $tid));
}
return $nid ? $nid : 0;
}
function forum_page() {
global $theme;
global $theme, $tid, $sortby, $forum_per_page, $offset, $op, $user;
if (user_access("access content")) {
$result = db_query("SELECT nid FROM node WHERE type = 'forum' ORDER BY title");
$output .= "<table border=\"0\" cellspacing=\"4\" cellpadding=\"4\">";
$output .= " <tr><th>". t("Forum") ."</th><th>". t("Comments") ."</th><th>". t("Last comment") ."</th></tr>";
while ($node = db_fetch_object($result)) {
$node = node_load(array("nid" => $node->nid));
$output .= " <tr><td>". l(check_output($node->title), array("id" => $node->nid)) ."<br /><small>". check_output($node->body, 1) ."</small></td><td align=\"center\">". forum_num_comments($node->nid) ."</td><td align=\"center\">". forum_last_comment($node->nid) ."</td></tr>";
if ($op == "Update settings") {
$user = user_save($user, array("sortby" => $sortby, "forum_per_page" => $forum_per_page));
}
$output .= "</table>";
$theme->header();
$theme->box(t("Discussion forum"), $output);
$theme->footer();
if ($op == "first_new") {
if ($nid = _forum_first_new($tid)) {
drupal_goto(drupal_url(array("id" => $nid), "node"));
}
}
if (empty($sortby)) {
$sortby = isset($user->sortby) ? $user->sortby : variable_get("forum_order",1);
}
if (empty($forum_per_page)) {
$forum_per_page = isset($user->forum_per_page) ? $user->forum_per_page : variable_get("forum_per_page", 25);
}
if (empty($offset)) {
$offset = 0;
}
$forums = forum_get_forums($tid);
$parents = forum_get_parents($tid);
if ($tid && !in_array($tid, variable_get("forum_containers", array()))) {
list($topics, $topic_num) = forum_get_topics($tid, $sortby, $forum_per_page, $offset);
}
_forum_theme_invoke("forum_render", $forums, $topics, $topic_num, $parents, $tid, $sortby, $forum_per_page, $offset);
}
else {
$theme->header();
@ -105,4 +490,249 @@ function forum_page() {
}
}
?>
/**
*** render functions
**/
function forum_render($forums, $topics, $topic_num, $parents, $tid, $sortby, $forum_per_page, $offset) {
// forum list, topics list, topic browser and "add new topic" link
global $theme;
$output .= _forum_theme_invoke("forum_forum_list", $forums, $parents, $tid);
if ($tid && !in_array($tid, variable_get("forum_containers", array()))) {
$output .= _forum_theme_invoke("forum_topic_list", $topics, $topic_num, $sortby, $forum_per_page, $offset);
}
$theme->header();
$theme->box(t("Discussion forum"), $output);
if ($tid && !in_array($tid, variable_get("forum_containers", array()))) {
$theme->box(t("Control panel"), _forum_theme_invoke("forum_topic_browser", $sortby, $forum_per_page, $offset));
}
$theme->footer();
}
function forum_forum_list($forums, $parents, $tid) {
global $user;
if ($parents) {
foreach($parents as $p) {
if ($tid != $p->tid) {
$t[] = lm($p->name, array("mod" => "forum", "tid" => $p->tid));
}
else {
$t[] = $p->name;
}
}
}
$t[] = lm(t("forum"), array("mod" => "forum"));
$output .= "<table border=\"0\" width=\"100%\">\n";
$output .= " <tr><th colspan=\"3\" align=\"left\">".implode(" : ", array_reverse($t)) ."</th>";
if ($forums) {
$output .= "<th>". t("topics") ."</th><th>". t("posts") ."</th><th>". t("last post") ."</th></tr>";
foreach ($forums as $forum) {
if ($forum->container) {
$output .= " <tr><td colspan=\"5\">".lm(check_output($forum->name), array("mod" => "forum", "tid" => $forum->tid))."<br><small>". ($forum->description ? check_output($forum->description, 1) : "") ."</small></td></tr>";
} else {
if ($user->uid) $new_topics = $forum->num_topics - $forum->old_topics;
$icon = _forum_get_folder_icon($new_topics);
$output .= " <tr><td>&nbsp;</td><td>$icon</td>";
$output .= "<td><table><tr><td width=\"".($forum->depth*20)."\">&nbsp;</td><td>".lm(check_output($forum->name), array("mod" => "forum", "tid" => $forum->tid))."<br><small>". check_output($forum->description, 1);
$links = array();
if ($forum->last_post) {
$links[] = l(t("last topic"), array("nid" => $forum->last_post->nid));
}
if ($new_topics) {
$links[] = lm(t("first new topic"), array("mod" => "forum", "op" => "first_new", "tid" => $forum->tid));
}
if ($links) {
$output .= "<br>(".implode(", ", $links).")";
}
$output .= "</small></td></tr></table></td>";
$output .= "<td align=\"center\">".$forum->num_topics.($new_topics ? "<br>(".t("%a new", array("%a" => $new_topics)).")" : "")."</td><td align=\"center\">".$forum->num_posts."</td><td align=\"center\">"._forum_format($forum->last_post)."</td></tr>";
}
}
}
$output .= "</table>\n";
return $output;
}
function forum_topic_browser() {
global $tid, $sortby, $forum_per_page, $offset;
if (empty($sortby)) {
$sortby = variable_get("forum_order",1);
}
if (empty($forum_per_page)) {
$forum_per_page = variable_get("forum_per_page", 25);
}
$forum_per_page_options = array(10, 25, 50, 75, 100);
foreach ($forum_per_page_options as $value) {
$options .= " <option value=\"$value\"". ($forum_per_page == $value ? " selected=\"selected\"" : "") .">".t("%a topics per page", array("%a" => $value))."</option>\n";
}
$output .= "<select name=\"forum_per_page\">$options</select>\n";
$options = "";
$sortby_options = array(1 => t("Date - newest first"), 2 => t("Date - oldest first"), 3 => t("Posts - most active first"), 4=> t("Posts - least active first"));
foreach ($sortby_options as $key => $value) {
$options .= " <option value=\"$key\"". ($sortby == $key ? " selected=\"selected\"" : "") .">$value</option>\n";
}
$output .= "\n<select name=\"sortby\">$options</select>\n";
$output .= form_hidden("tid", $tid);
$output .= form_submit(t("Update settings"));
return form(form_item(t("Topic viewing options"), $output, t("Select your preferred way to display the topics and click 'Update settings'.")));
}
function forum_topic_list($topics, $num_topics, $sortby, $forum_per_page, $offset) {
global $theme, $id, $status, $tid, $user;
$output .= "<div align=\"center\"><small>(".t("%a topics, %b topics per page, page %c of %d", array("%a" => $num_topics, "%b" => $forum_per_page, "%c" => ceil(($offset + 1)/$forum_per_page), "%d" => ceil($num_topics/$forum_per_page))).")</small></div>";
if ($topics) {
$output .= "<table border=\"0\" width=\"100%\">\n";
$output .= " <tr><th>&nbsp;</th><th>&nbsp;</th><th>". t("topic") ."</th><th>". t("replies") ."</th><th>". t("posted") ."</th><th>". t("last reply") ."</th></tr>";
foreach ($topics as $topic) {
// folder is new if topic is new or there are new comments since last visit
if ($topic->shadow) {
$output .= "
<tr>
<td>"._forum_get_folder_icon($topic->new, $topic->num_comments, $topic->comment_mode)."</td>
<td>"._forum_get_icon($topic)."</td>
<td>". check_output($topic->title) ."</td>
<td align=\"center\" colspan=\"3\">".lm(t("This topic has been moved"), array("mod" => "forum", "tid" => $topic->shadow))."</td>
</tr>";
}
else {
$output .= "
<tr>
<td>"._forum_get_folder_icon($topic->new, $topic->num_comments, $topic->comment_mode)."</td>
<td>"._forum_get_icon($topic)."</td>
<td>".l(check_output($topic->title), array("id" => $topic->nid))."</td>
<td align=\"center\">".$topic->num_comments.($topic->new_replies ? " (".t("%a new", array("%a" => $topic->new_replies)).")" : "")."</td>
<td align=\"center\">"._forum_format($topic)."</td>
<td align=\"center\">"._forum_format($topic->last_reply)."</td>
</tr>";
}
}
$output .= "</table></blockquote>\n";
}
$output .= "<table width=\"100%\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\"><tr>";
if ($offset > 0) {
$output .= "<td width=\"33%\"><div align=\"left\"><h4>".lm(t("Previous topics"), array("mod" => "forum", "tid" => $tid, "offset" => ($offset-$forum_per_page)))."</h4></div></td>";
}
else {
$output .= "<td width=\"33%\">&nbsp;</td>";
}
$output .= "<td width=\"33%\"><div align=\"center\"><h4>".lm(t("Start new topic"), array("mod" => "node", "op" => "add", "type" => "forum", "tid" => $tid))."</h4></div></td>";
if (count($topics) >= $forum_per_page) {
$output .= "<td width=\"33%\"><div align=\"right\"><h4>".lm(t("Next topics"), array("mod" => "forum", "tid" => $tid, "offset" => ($offset+$forum_per_page)))."</h4></div></td>";
}
else {
$output .= "<td width=\"33%\">&nbsp;</td>";
}
$output .= "</tr></table>";
return $output;
}
function _forum_get_icon($node) {
if (variable_get("forum_topic_icon_path", "images/topics/") && $node->icon) {
return "<img src=\"".variable_get("forum_topic_icon_path", "images/forum/topics/"). check_output($node->icon)."\">";
}
else {
return "&nbsp;";
}
}
function _forum_get_folder_icon($new_posts, $num_posts = 0, $comment_mode = 0) {
// "folder" icon because it's generally rendered as a folder
global $theme;
$base_path = variable_get("forum_folder_icon_path", "images/forum/folder");
if ($base_path) {
if ($num_posts > variable_get("forum_hot_topic", 15)) {
$icon = $new_posts ? "hot_new" : "hot";
}
else {
$icon = $new_posts ? "new" : "default";
}
if ($comment_mode == 1) {
$icon = "closed";
}
if ($theme->bbs_icons) {
$file = $theme->bbs_icons[$icon];
}
else {
// default
$file = $base_path."/".$icon.".gif";
}
return "<img src=\"$file\">";
}
else {
return "&nbsp;";
}
}
function _forum_user_last_visit($nid) {
global $user;
static $history;
if (!$history) {
$result = db_query("SELECT nid, timestamp FROM history WHERE uid = '%d'", $user->uid);
while ($t = db_fetch_object($result)) {
$history[$t->nid] = $t->timestamp;
}
}
return $history[$nid] ? $history[$nid] : 0;
}
// this will go away as soon as theme_invoke is committed
function _forum_theme_invoke() {
global $theme;
$args = func_get_args();
$function = array_shift($args);
if (method_exists($theme, $function)) {
return call_user_method_array($function, $theme, $args);
}
else {
return call_user_func_array($function, $args);
}
}
function _forum_get_topic_order($sortby) {
switch ($sortby) {
case 1:
return "date_sort DESC";
break;
case 2:
return "date_sort ASC";
break;
case 3:
return "num_comments DESC";
break;
case 4:
return "num_comments ASC";
break;
}
}
?>

View File

@ -2,7 +2,7 @@
// $Id$
function forum_system($field){
$system["description"] = t("Allows threaded discussions about general topics.");
$system["description"] = t("Enable threaded discussions about general topics.");
return $system[$field];
}
@ -17,16 +17,49 @@ function forum_access($op, $node) {
if ($op == "view") {
return $node->status;
}
if ($op == "create") {
return user_access("post content");
}
}
function forum_perm() {
return array("post forum topics without approval");
}
function forum_conf_options() {
foreach (taxonomy_get_vocabularies("forum") as $vid => $voc) {
$vocs[$vid] = $voc->name;
}
$output .= "<a name=\"image_nav_vocabulary\"></a>";
$output .= form_select("Forum vocabulary", "forum_nav_vocabulary", variable_get("forum_nav_vocabulary", ""), $vocs, t("The taxonomy vocabulary that will be uses as the navigation tree."));
$output .= _taxonomy_term_select("Containers", "forum_containers", variable_get("forum_containers", array()), variable_get("forum_nav_vocabulary", ""), t("You can choose vocabularies which will not have topics, but will be just containers for other forums."), 1, t("<none>"));
$output .= form_textfield("Topic icons path", "forum_topic_icon_path", variable_get("forum_topic_icon_path", "images/forum/topics/"), 30, 255, "The path to the topic icons. Leave blank to disable icons.");
$output .= form_textfield("Folder icons path", "forum_folder_icon_path", variable_get("forum_folder_icon_path", "images/forum/folder/"), 30, 255, "Path to the <i>default</i>, <i>hot</i>, <i>new</i> and <i>closed folder</i> icons. Leave blank to disable icons.");
$number = array(5 => 5, 10 => 10, 15 => 15, 20 => 20, 25 => 25, 30 => 30, 35 => 35, 40 => 40, 50 => 50, 60 => 60, 80 => 80, 100 => 100, 10000=>10000);
$output .= form_select("Hot topic threshold", "forum_hot_topic", variable_get("forum_hot_topic", 15), $number, "The number of posts a topic must have to be considered <i>hot</i>.");
$number = array(10 => 10, 25 => 25, 50 => 50, 75 => 75, 100 => 100);
$output .= form_select("Topics per page", "forum_per_page", variable_get("forum_per_page", 25), $number, "The default number of topics displayed per page; links to browse older messages are automatically being displayed.");
$forder = array(1 => "Date - newest first", 2 => "Date - oldest first", 3 => "Posts - most active first", 4=> "Posts - least active first");
$output .= form_select("Default order", "forum_order", variable_get("forum_order", 1), $forder, "The default display order for topics.");
$output .= form_textfield("Number of topics in block", "forum_block_num", variable_get("forum_block_num", "5"), 5, 5, "The number of topics in the <i>active topics</i> block.");
$output .= form_select("Internal caching", "forum_cache", variable_get("forum_cache", 0), array("disabled", "enabled"), "Cache internal datastructures for both anonymous and autheticated users. When enabled, the forum data won't be 100% up to date with regards regardto the number of posts, the number of replies and the last topic being posted. Enable when you have busy forum.");
return $output;
}
function forum_save($op, $node) {
if ($op == "approve") {
return array("status" => 1);
}
if ($op == "create") {
return array("body" => filter($node->body), "teaser" => filter($node->teaser));
if (user_access("post forum topics without approval")) {
$moderation = array("body" => filter($node->body), "moderate" => 0, "status" => 1);
} else {
$moderation = array("body" => filter($node->body), "moderate" => 1, "status" => 0);
}
return array_merge($moderation, array("tid", "icon_num", "shadow"));
}
if ($op == "decline") {
@ -34,69 +67,421 @@ function forum_save($op, $node) {
}
if ($op == "update") {
return array("body" => filter($node->body), "teaser" => filter($node->teaser));
// if she changed the term, we could have to leave a shadow
$old_terms = explode(",", $node->old_container);
foreach ($node->taxonomy as $term) {
if ($term && (!in_array($term, $old_terms)) && $node->shadow) {
$shadow = $term;
break;
}
}
return array("body" => filter($node->body), "tid", "icon_num", "shadow" => $shadow, "old_container");
}
}
function forum_link($type) {
function forum_load($node) {
$forum = db_fetch_object(db_query("SELECT * FROM forum WHERE nid = '%d' AND shadow = 0", $node->nid));
return $forum;
}
function forum_block() {
if (user_access("access content")) {
$result = db_query("SELECT n.nid, n.title, n.body, GREATEST(n.created, MAX(c.timestamp)) AS sort FROM node n, forum f LEFT JOIN comments c ON c.nid = n.nid WHERE n.type = 'forum' AND n.nid = f.nid AND f.shadow = 0 AND n.status = 1 GROUP BY n.nid ORDER BY sort DESC LIMIT ". variable_get("forum_block_num", "5"));
while ($node = db_fetch_object($result)) {
$content .= "<li>".l(check_output($node->title), array("id" => $node->nid), "node", "", array("title" => substr(strip_tags($node->body), 0, 100)."..."))."</li>\n";
}
if ($content) {
$content .= "<p><div align=\"center\">".lm(t("browse forums"), array("mod" => "forum"))."</div></p>";
}
}
$blocks[0][subject] = t("Forum active topics");
$blocks[0][content] = $content;
$blocks[0][info] = t("Forum active topics");
return $blocks;
}
function forum_link($type, $node) {
if ($type == "page" && user_access("access content")) {
$links[] = lm(t("forum"), array("mod" => "forum"), "", array("title" => t("Read and participate in the discussion forums.")));
$links[] = lm(t("forum"), array("mod" => "forum"));
}
if ($type == "menu.create" && user_access("administer nodes")) {
$links[] = lm(t("create forum"), array("mod" => "node", "op" => "add", "type" => "forum"), "", array("title" => t("Add a new discussion forum.")));
if ($type == "menu.create" && user_access("post content")) {
// I had complains that having this link leads people not to choose a forum, and always post in the first forum.
#$links[] = lm(t("create forum topic"), array("mod" => "node", "op" => "add", "type" => "forum"), "", array("title" => t("Start a new forum topic.")));
}
if ($type == "node" && $node->type == "forum") {
// get previous and next topic
$sql = "SELECT n.nid, title, body, GREATEST(n.created, MAX(c.timestamp)) AS date_sort, COUNT(c.nid) AS num_comments FROM node n, term_node t, forum f LEFT JOIN comments c ON c.nid = n.nid WHERE n.nid = t.nid AND n.nid = f.nid AND t.tid = '%d' AND f.shadow = 0 AND n.status = 1 GROUP BY n.nid ORDER BY ". _forum_get_topic_order(isset($user->sortby) ? $user->sortby : variable_get("forum_order",1));
$terms = array_keys(taxonomy_node_get_terms_by_vocabulary($node->nid, variable_get("forum_nav_vocabulary", "")));
$result = db_query($sql, $terms[0]);
while ($topic = db_fetch_object($result)) {
if ($stop == 1) {
$next->nid = $topic->nid;
$next->title = $topic->title;
$next->body = $topic->body;
break;
}
if ($topic->nid == $node->nid) {
$stop = 1;
}
else {
$prev->nid = $topic->nid;
$prev->title = $topic->title;
$prev->body = $topic->body;
}
}
if ($prev) {
$links[] = l(t("previous topic"), array("id" => $prev->nid), "node", "", array("title" => $prev->title."\n".substr(strip_tags($prev->body), 0, 100)."..."));
}
if ($next) {
$links[] = l(t("next topic"), array("id" => $next->nid), "node", "", array("title" => $next->title."\n".substr(strip_tags($next->body), 0, 100)."..."));
}
}
return $links ? $links : array();
}
function forum_view($node) {
function forum_view($node, $main = 0) {
global $theme;
$output .= "<p>". lm(t("Forum"), array("mod" => "forum")) ." / <b>". l(check_output($node->title), array("id" => $node->nid)) ."</b>:</p><p>". check_output($node->body) ."</p>";
$term_data = array_shift(taxonomy_node_get_terms($node->nid));
if (!$term_data) {
// we are previewing
$term_data = taxonomy_get_term($node->taxonomy[0]);
}
$voc = taxonomy_get_vocabulary($term_data->vid);
$output .= "<p>"._forum_get_icon($node)." ".lm(check_output($voc->name), array("mod" => "forum"))." : ".lm(check_output($term_data->name), array("mod" => "forum", "tid" => $term_data->tid));
$output .= " / <b>". check_output($node->title) ."</b><br>".t("%a by %b", array("%a" => format_date($node->created), "%b" => format_name($node)))."</p><p>". check_output($node->body, 1) ."</p>";
$output .= "<p>". $theme->links(link_node($node, $main)) ."</p>";
$theme->box(t("Discussion forum"), $output);
#$theme->box(t("Discussion forum"), $output);
$node->title = _forum_get_icon($node)." ".lm(check_output($voc->name), array("mod" => "forum"))." : ".lm(check_output($term_data->name), array("mod" => "forum", "tid" => $term_data->tid)) . " / <b>". check_output($node->title) ."</b>";
$theme->node($node, $main);
}
function forum_form(&$node, &$help, &$error) {
if (function_exists("taxonomy_node_form")) {
$output = implode("", taxonomy_node_form("forum", $node));
global $tid;
if ($node->nid) {
if ($node->taxonomy) {
$tid = $node->taxonomy;
} else {
// editing: load category from taxonomy
$tid = implode(",", array_keys(taxonomy_node_get_terms($node->nid)));
}
//$output .= implode("<p>", taxonomy_node_form("forum", $node));
$output .= "<input type=\"hidden\" name=\"edit[old_container]\" value=\"".implode(",", array_keys(taxonomy_node_get_terms($node->nid)))."\">";
$output .= form_checkbox(t("Leave shadow?"), "shadow", 1, 1, t("If you move this topic, you can leave a link in the old forum to the new forum."));
} else {
if ($node->taxonomy) {
$tid = $node->taxonomy;
}
}
$output .= form_textarea(t("Body"), "body", $node->body, 60, 10);
$output .= _taxonomy_term_select("Forum", "taxonomy", $tid, variable_get("forum_nav_vocabulary", ""), "", 0, "", variable_get("forum_containers", array()));
if ($icon_path = variable_get("forum_topic_icon_path", "images/forum/topics/")) {
if ($node->icon) {
// we are editing post
if ($dir = @opendir($icon_path)) {
$icon_num = 0;
while($icon = readdir($dir)) {
if ($icon == '.' || $icon == '..') {continue;}
if ($node->icon == $icon) {$checked = "checked";} else {$checked = "";}
$radio .= "<input type=\"radio\" name=\"edit[icon_num]\" value=\"$icon_num\" $checked><img src=\"$icon_path$icon\"> \n";
$icon_num++;
}
closedir($dir);
}
}
else {
if ($dir = @opendir($icon_path)) {
$icon_num = 0;
while($icon = readdir($dir)) {
if ($icon == '.' || $icon == '..') {continue;}
if ($node->icon_num == $icon_num) {$checked = "checked";} else {$checked = "";}
$radio .= "<input type=\"radio\" name=\"edit[icon_num]\" value=\"$icon_num\" $checked><img src=\"$icon_path$icon\"> \n";
$icon_num++;
}
closedir($dir);
}
}
$output .= form_item(t("Topic icon"), $radio);
}
$output .= form_textarea("Body", "body", $node->body, 60, 10);
return $output;
}
function forum_insert($node) {
$node->icon = _forum_decode_icon($node);
if (!$node->shadow) {
db_query("INSERT INTO forum (nid, icon) VALUES ('%d', '%s')", $node->nid, $node->icon);
} else {
// we created a shadow, a link to a moved topic in a new forum
db_query("INSERT INTO forum (nid, icon, shadow) VALUES ('%d', '%s', '%d')", $node->nid, $node->icon, $node->shadow);
}
function forum_num_comments($nid) {
$value = db_fetch_object(db_query("SELECT COUNT(cid) AS count FROM comments WHERE nid = '$nid'"));
if (variable_get("forum_cache", 0)) {
cache_clear();
}
}
function forum_update($node) {
$node->icon = _forum_decode_icon($node);
db_query("UPDATE forum SET icon = '%s' WHERE nid = '%d'", $node->icon, $node->nid);
if ($node->shadow) {
// insert in old forum a new topic, with link to new forum
$node->nid = "";
$node->type = "forum";
$node->status = 1;
$node->taxonomy = array($node->old_container);
node_submit($node);
}
}
function _forum_decode_icon($node) {
// to prevent malicious users
if ($icon_path = variable_get("forum_topic_icon_path", "images/forum/topics/")) {
if ($dir = @opendir($icon_path)) {
$icon_num = 0;
while($icon = readdir($dir)) {
if ($icon == '.' || $icon == '..') {continue;}
if ($icon_num == $node->icon_num) {$myicon = $icon;}
$icon_num++;
}
closedir($dir);
}
}
return $myicon;
}
function forum_delete(&$node) {
db_query("DELETE FROM forum WHERE nid = '%d'", $node->nid);
}
function _forum_num_comments($nid) {
$value = db_fetch_object(db_query("SELECT COUNT(cid) AS count FROM comments WHERE nid = '%d' AND status = 0", $nid));
return ($value) ? $value->count : 0;
}
function forum_last_comment($nid) {
$value = db_fetch_object(db_query("SELECT timestamp FROM comments WHERE nid = '$nid' ORDER BY timestamp DESC LIMIT 1"));
function _forum_last_comment($nid) {
$value = db_fetch_object(db_query("SELECT timestamp FROM comments WHERE nid = '%d' AND status = 0 ORDER BY timestamp DESC LIMIT 1", $nid));
return ($value) ? format_date($value->timestamp, "small") : "&nbsp;";
}
function _forum_last_reply($nid) {
$value = db_fetch_object(db_query("SELECT c.timestamp, u.name, u.uid FROM comments c LEFT JOIN users u ON c.uid = u.uid WHERE c.nid = '%d' AND c.status = 0 ORDER BY c.timestamp DESC LIMIT 1", $nid));
return $value;
}
function _forum_format($topic) {
if ($topic) {
return format_date($topic->timestamp, "small")."<br>".t("by")." ". format_name($topic);
}
else {
return message_na();
}
}
function forum_get_forums($tid = 0) {
global $user;
if (!$tid) {
$tid = 0;
}
if (variable_get("forum_cache", 0)) {
$forums = unserialize(cache_get("forum:$tid"));
}
if (!$forums) {
taxonomy_get_tree(variable_get("forum_nav_vocabulary", ""), $_forums, $tid);
$n = 0;
foreach ($_forums as $forum) {
if (in_array($forum->tid, variable_get("forum_containers", array()))) {
$forum->container = 1;
}
else {
$forum->num_topics = _forum_num_topics($forum->tid);
$forum->num_posts = _forum_num_replies($forum->tid) + $forum->num_topics;
$forum->last_post = _forum_last_post($forum->tid);
}
$forums[$forum->tid] = $forum;
$n++;
}
if (variable_get("forum_cache", 0)) {
cache_set("forum:$tid", serialize($forums), time()+60*10);
}
}
if ($user->uid && $forums) {
foreach (_forum_topics_read($user->uid) as $tid => $old) {
if ($forums[$tid]) {
$forums[$tid]->old_topics = $old;
}
}
}
return $forums;
}
function forum_get_parents($tid) {
if ($tid) {
$parents[] = taxonomy_get_term($tid);
}
$n = 0;
while ($parent = taxonomy_get_parents($parents[$n]->tid)) {
$parents = array_merge($parents, $parent);
$n++;
}
return $parents;
}
function _forum_num_topics($term) {
$value = db_fetch_object(db_query("SELECT COUNT(n.nid) AS count FROM node n, term_node r, forum f WHERE r.tid = '%d' AND n.nid = r.nid AND n.nid = f.nid AND n.status = 1 AND n.type = 'forum' AND f.shadow = 0", $term));
return ($value) ? $value->count : 0;
}
function _forum_num_replies($term) {
$value = db_fetch_object(db_query("SELECT COUNT(*) AS count FROM comments c, term_node r, node n WHERE r.tid = '%d' AND n.nid = r.nid AND n.nid = c.nid AND n.status = 1 AND c.status = 0 AND n.type = 'forum'", $term));
return ($value) ? $value->count : 0;
}
function _forum_topics_read($uid) {
$result = db_query("SELECT tid, count(*) AS c FROM history h, term_node r, node n WHERE r.nid = h.nid AND n.nid = h.nid AND n.type = 'forum' AND n.status = 1 AND h.uid = '%d' GROUP BY tid", $uid);
while ($obj = db_fetch_object($result)) {
$topics_read[$obj->tid] = $obj->c;
}
return $topics_read ? $topics_read : array();
}
function _forum_last_post($term) {
$topic = db_fetch_object(db_query("SELECT n.nid, n.created AS timestamp, u.name AS name, u.uid AS uid FROM node n, term_node r LEFT JOIN users u ON n.uid = u.uid WHERE r.tid = '%d' AND n.nid = r.nid AND n.type = 'forum' AND n.status = 1 ORDER BY timestamp DESC LIMIT 1", $term));
$reply = db_fetch_object(db_query("SELECT n.nid, c.timestamp, u.name AS name, u.uid AS uid FROM term_node r, node n LEFT JOIN comments c ON n.nid=c.nid LEFT JOIN users u ON c.uid = u.uid WHERE r.tid = '%d' AND n.nid = r.nid AND n.type = 'forum' AND n.status = 1 AND c.status = 0 ORDER BY c.timestamp DESC LIMIT 1", $term));
$value = ($topic->timestamp > $reply->timestamp) ? $topic : $reply;
return $value;
}
function forum_get_topics($tid, $sortby, $forum_per_page, $offset) {
global $user;
$term = taxonomy_get_term($tid);
$voc = taxonomy_get_vocabulary($term->vid);
$sql_sortby = _forum_get_topic_order($sortby);
$sql = "
SELECT n.nid, title, users.name AS name, users.uid AS uid, n.created AS timestamp, GREATEST(n.created, MAX(c.timestamp)) AS date_sort, COUNT(c.nid) AS num_comments, icon, n.comment AS comment_mode, shadow FROM node n, term_node r LEFT JOIN users ON n.uid = users.uid LEFT JOIN comments c ON c.nid = n.nid LEFT JOIN forum f ON n.nid = f.nid WHERE n.nid = r.nid AND r.tid = '%d' AND n.status = 1 AND n.type = 'forum' GROUP BY n.nid ORDER BY $sql_sortby";
$result = db_query($sql, $tid);
$topic_num = db_num_rows($result);
$n = 0;
while ($topic = db_fetch_object($result)) {
if ($n < $offset) {
$n++;
continue;
}
$history = _forum_user_last_visit($topic->nid);
// folder is new if topic is new or there are new comments since last visit
if ($topic->shadow > 0) {
$topic->new = 0;
}
else {
if (!$history && $user->uid) {
$topic->new_replies = 0;
$topic->new = 1;
}
else {
$comments = db_result(db_query("SELECT COUNT(c.nid) FROM node n LEFT JOIN comments c ON n.nid = c.nid WHERE n.nid = '$topic->nid' AND c.status = 0 AND timestamp > '$history' GROUP BY n.nid"));
$topic->new_replies = $comments ? $comments : 0;
if ($topic->new_replies) {
$topic->new = 1;
}
else {
$topic->new = 0;
}
}
}
$topic->last_reply = _forum_last_reply($topic->nid);
$topics[] = $topic;
$n++;
if ($n == ($forum_per_page + $offset)) {
break;
}
}
return array($topics, $topic_num);
}
function _forum_first_new($tid) {
global $user;
$result = db_query("SELECT r.nid FROM node n, history h, term_node r WHERE n.type = 'forum' AND n.status = 1 AND h.nid = n.nid AND r.nid = h.nid AND r.tid = '%d' AND h.uid = '%d' ", $tid, $user->uid);
while ($r = db_fetch_object($result)) {
$read[] = $r->nid;
}
if ($read) {
$nid = db_result(db_query("SELECT r.nid AS c FROM node n LEFT JOIN term_node r ON r.nid = n.nid WHERE n.type = 'forum' AND n.status = 1 AND r.tid = '%d' AND NOT (r.nid IN (".implode(",", $read).")) ORDER BY created LIMIT 1", $tid));
}
return $nid ? $nid : 0;
}
function forum_page() {
global $theme;
global $theme, $tid, $sortby, $forum_per_page, $offset, $op, $user;
if (user_access("access content")) {
$result = db_query("SELECT nid FROM node WHERE type = 'forum' ORDER BY title");
$output .= "<table border=\"0\" cellspacing=\"4\" cellpadding=\"4\">";
$output .= " <tr><th>". t("Forum") ."</th><th>". t("Comments") ."</th><th>". t("Last comment") ."</th></tr>";
while ($node = db_fetch_object($result)) {
$node = node_load(array("nid" => $node->nid));
$output .= " <tr><td>". l(check_output($node->title), array("id" => $node->nid)) ."<br /><small>". check_output($node->body, 1) ."</small></td><td align=\"center\">". forum_num_comments($node->nid) ."</td><td align=\"center\">". forum_last_comment($node->nid) ."</td></tr>";
if ($op == "Update settings") {
$user = user_save($user, array("sortby" => $sortby, "forum_per_page" => $forum_per_page));
}
$output .= "</table>";
$theme->header();
$theme->box(t("Discussion forum"), $output);
$theme->footer();
if ($op == "first_new") {
if ($nid = _forum_first_new($tid)) {
drupal_goto(drupal_url(array("id" => $nid), "node"));
}
}
if (empty($sortby)) {
$sortby = isset($user->sortby) ? $user->sortby : variable_get("forum_order",1);
}
if (empty($forum_per_page)) {
$forum_per_page = isset($user->forum_per_page) ? $user->forum_per_page : variable_get("forum_per_page", 25);
}
if (empty($offset)) {
$offset = 0;
}
$forums = forum_get_forums($tid);
$parents = forum_get_parents($tid);
if ($tid && !in_array($tid, variable_get("forum_containers", array()))) {
list($topics, $topic_num) = forum_get_topics($tid, $sortby, $forum_per_page, $offset);
}
_forum_theme_invoke("forum_render", $forums, $topics, $topic_num, $parents, $tid, $sortby, $forum_per_page, $offset);
}
else {
$theme->header();
@ -105,4 +490,249 @@ function forum_page() {
}
}
?>
/**
*** render functions
**/
function forum_render($forums, $topics, $topic_num, $parents, $tid, $sortby, $forum_per_page, $offset) {
// forum list, topics list, topic browser and "add new topic" link
global $theme;
$output .= _forum_theme_invoke("forum_forum_list", $forums, $parents, $tid);
if ($tid && !in_array($tid, variable_get("forum_containers", array()))) {
$output .= _forum_theme_invoke("forum_topic_list", $topics, $topic_num, $sortby, $forum_per_page, $offset);
}
$theme->header();
$theme->box(t("Discussion forum"), $output);
if ($tid && !in_array($tid, variable_get("forum_containers", array()))) {
$theme->box(t("Control panel"), _forum_theme_invoke("forum_topic_browser", $sortby, $forum_per_page, $offset));
}
$theme->footer();
}
function forum_forum_list($forums, $parents, $tid) {
global $user;
if ($parents) {
foreach($parents as $p) {
if ($tid != $p->tid) {
$t[] = lm($p->name, array("mod" => "forum", "tid" => $p->tid));
}
else {
$t[] = $p->name;
}
}
}
$t[] = lm(t("forum"), array("mod" => "forum"));
$output .= "<table border=\"0\" width=\"100%\">\n";
$output .= " <tr><th colspan=\"3\" align=\"left\">".implode(" : ", array_reverse($t)) ."</th>";
if ($forums) {
$output .= "<th>". t("topics") ."</th><th>". t("posts") ."</th><th>". t("last post") ."</th></tr>";
foreach ($forums as $forum) {
if ($forum->container) {
$output .= " <tr><td colspan=\"5\">".lm(check_output($forum->name), array("mod" => "forum", "tid" => $forum->tid))."<br><small>". ($forum->description ? check_output($forum->description, 1) : "") ."</small></td></tr>";
} else {
if ($user->uid) $new_topics = $forum->num_topics - $forum->old_topics;
$icon = _forum_get_folder_icon($new_topics);
$output .= " <tr><td>&nbsp;</td><td>$icon</td>";
$output .= "<td><table><tr><td width=\"".($forum->depth*20)."\">&nbsp;</td><td>".lm(check_output($forum->name), array("mod" => "forum", "tid" => $forum->tid))."<br><small>". check_output($forum->description, 1);
$links = array();
if ($forum->last_post) {
$links[] = l(t("last topic"), array("nid" => $forum->last_post->nid));
}
if ($new_topics) {
$links[] = lm(t("first new topic"), array("mod" => "forum", "op" => "first_new", "tid" => $forum->tid));
}
if ($links) {
$output .= "<br>(".implode(", ", $links).")";
}
$output .= "</small></td></tr></table></td>";
$output .= "<td align=\"center\">".$forum->num_topics.($new_topics ? "<br>(".t("%a new", array("%a" => $new_topics)).")" : "")."</td><td align=\"center\">".$forum->num_posts."</td><td align=\"center\">"._forum_format($forum->last_post)."</td></tr>";
}
}
}
$output .= "</table>\n";
return $output;
}
function forum_topic_browser() {
global $tid, $sortby, $forum_per_page, $offset;
if (empty($sortby)) {
$sortby = variable_get("forum_order",1);
}
if (empty($forum_per_page)) {
$forum_per_page = variable_get("forum_per_page", 25);
}
$forum_per_page_options = array(10, 25, 50, 75, 100);
foreach ($forum_per_page_options as $value) {
$options .= " <option value=\"$value\"". ($forum_per_page == $value ? " selected=\"selected\"" : "") .">".t("%a topics per page", array("%a" => $value))."</option>\n";
}
$output .= "<select name=\"forum_per_page\">$options</select>\n";
$options = "";
$sortby_options = array(1 => t("Date - newest first"), 2 => t("Date - oldest first"), 3 => t("Posts - most active first"), 4=> t("Posts - least active first"));
foreach ($sortby_options as $key => $value) {
$options .= " <option value=\"$key\"". ($sortby == $key ? " selected=\"selected\"" : "") .">$value</option>\n";
}
$output .= "\n<select name=\"sortby\">$options</select>\n";
$output .= form_hidden("tid", $tid);
$output .= form_submit(t("Update settings"));
return form(form_item(t("Topic viewing options"), $output, t("Select your preferred way to display the topics and click 'Update settings'.")));
}
function forum_topic_list($topics, $num_topics, $sortby, $forum_per_page, $offset) {
global $theme, $id, $status, $tid, $user;
$output .= "<div align=\"center\"><small>(".t("%a topics, %b topics per page, page %c of %d", array("%a" => $num_topics, "%b" => $forum_per_page, "%c" => ceil(($offset + 1)/$forum_per_page), "%d" => ceil($num_topics/$forum_per_page))).")</small></div>";
if ($topics) {
$output .= "<table border=\"0\" width=\"100%\">\n";
$output .= " <tr><th>&nbsp;</th><th>&nbsp;</th><th>". t("topic") ."</th><th>". t("replies") ."</th><th>". t("posted") ."</th><th>". t("last reply") ."</th></tr>";
foreach ($topics as $topic) {
// folder is new if topic is new or there are new comments since last visit
if ($topic->shadow) {
$output .= "
<tr>
<td>"._forum_get_folder_icon($topic->new, $topic->num_comments, $topic->comment_mode)."</td>
<td>"._forum_get_icon($topic)."</td>
<td>". check_output($topic->title) ."</td>
<td align=\"center\" colspan=\"3\">".lm(t("This topic has been moved"), array("mod" => "forum", "tid" => $topic->shadow))."</td>
</tr>";
}
else {
$output .= "
<tr>
<td>"._forum_get_folder_icon($topic->new, $topic->num_comments, $topic->comment_mode)."</td>
<td>"._forum_get_icon($topic)."</td>
<td>".l(check_output($topic->title), array("id" => $topic->nid))."</td>
<td align=\"center\">".$topic->num_comments.($topic->new_replies ? " (".t("%a new", array("%a" => $topic->new_replies)).")" : "")."</td>
<td align=\"center\">"._forum_format($topic)."</td>
<td align=\"center\">"._forum_format($topic->last_reply)."</td>
</tr>";
}
}
$output .= "</table></blockquote>\n";
}
$output .= "<table width=\"100%\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\"><tr>";
if ($offset > 0) {
$output .= "<td width=\"33%\"><div align=\"left\"><h4>".lm(t("Previous topics"), array("mod" => "forum", "tid" => $tid, "offset" => ($offset-$forum_per_page)))."</h4></div></td>";
}
else {
$output .= "<td width=\"33%\">&nbsp;</td>";
}
$output .= "<td width=\"33%\"><div align=\"center\"><h4>".lm(t("Start new topic"), array("mod" => "node", "op" => "add", "type" => "forum", "tid" => $tid))."</h4></div></td>";
if (count($topics) >= $forum_per_page) {
$output .= "<td width=\"33%\"><div align=\"right\"><h4>".lm(t("Next topics"), array("mod" => "forum", "tid" => $tid, "offset" => ($offset+$forum_per_page)))."</h4></div></td>";
}
else {
$output .= "<td width=\"33%\">&nbsp;</td>";
}
$output .= "</tr></table>";
return $output;
}
function _forum_get_icon($node) {
if (variable_get("forum_topic_icon_path", "images/topics/") && $node->icon) {
return "<img src=\"".variable_get("forum_topic_icon_path", "images/forum/topics/"). check_output($node->icon)."\">";
}
else {
return "&nbsp;";
}
}
function _forum_get_folder_icon($new_posts, $num_posts = 0, $comment_mode = 0) {
// "folder" icon because it's generally rendered as a folder
global $theme;
$base_path = variable_get("forum_folder_icon_path", "images/forum/folder");
if ($base_path) {
if ($num_posts > variable_get("forum_hot_topic", 15)) {
$icon = $new_posts ? "hot_new" : "hot";
}
else {
$icon = $new_posts ? "new" : "default";
}
if ($comment_mode == 1) {
$icon = "closed";
}
if ($theme->bbs_icons) {
$file = $theme->bbs_icons[$icon];
}
else {
// default
$file = $base_path."/".$icon.".gif";
}
return "<img src=\"$file\">";
}
else {
return "&nbsp;";
}
}
function _forum_user_last_visit($nid) {
global $user;
static $history;
if (!$history) {
$result = db_query("SELECT nid, timestamp FROM history WHERE uid = '%d'", $user->uid);
while ($t = db_fetch_object($result)) {
$history[$t->nid] = $t->timestamp;
}
}
return $history[$nid] ? $history[$nid] : 0;
}
// this will go away as soon as theme_invoke is committed
function _forum_theme_invoke() {
global $theme;
$args = func_get_args();
$function = array_shift($args);
if (method_exists($theme, $function)) {
return call_user_method_array($function, $theme, $args);
}
else {
return call_user_func_array($function, $args);
}
}
function _forum_get_topic_order($sortby) {
switch ($sortby) {
case 1:
return "date_sort DESC";
break;
case 2:
return "date_sort ASC";
break;
case 3:
return "num_comments DESC";
break;
case 4:
return "num_comments ASC";
break;
}
}
?>

View File

@ -50,7 +50,8 @@ $mysql_updates = array(
"2002-08-10" => "update_35",
"2002-08-16" => "update_36",
"2002-08-19" => "update_37",
"2002-08-26" => "update_38"
"2002-08-26" => "update_38",
"2002-09-15" => "update_39"
);
// Update functions
@ -537,6 +538,49 @@ function update_38() {
update_sql("ALTER TABLE watchdog CHANGE message message text NOT NULL default '';");
}
function update_39() {
update_sql("DROP TABLE moderate");
update_sql("ALTER TABLE comments ADD score MEDIUMINT NOT NULL;");
update_sql("ALTER TABLE comments ADD status TINYINT UNSIGNED NOT NULL;");
update_sql("ALTER TABLE comments ADD users MEDIUMTEXT;");
update_sql("CREATE TABLE moderation_votes (
mid INT UNSIGNED NOT NULL AUTO_INCREMENT PRIMARY KEY,
vote VARCHAR(255),
weight TINYINT NOT NULL
);");
update_sql("CREATE TABLE moderation_roles (
rid INT UNSIGNED NOT NULL,
mid INT UNSIGNED NOT NULL,
value TINYINT NOT NULL
);");
update_sql("ALTER TABLE moderation_roles ADD INDEX (rid);");
update_sql("ALTER TABLE moderation_roles ADD INDEX (mid);");
update_sql("CREATE TABLE moderation_filters (
fid INT UNSIGNED NOT NULL AUTO_INCREMENT PRIMARY KEY,
filter VARCHAR(255) NOT NULL,
minimum SMALLINT NOT NULL
);");
update_sql("DELETE FROM moderation_votes;");
update_sql("INSERT INTO moderation_votes VALUES (1, '+1', 0);");
update_sql("INSERT INTO moderation_votes VALUES (2, '-1', 1);");
update_sql("DELETE FROM moderation_roles;");
update_sql("INSERT INTO moderation_roles VALUES (2, 1, 1);");
update_sql("INSERT INTO moderation_roles VALUES (2, 2, -1);");
update_sql("CREATE TABLE forum (
nid int unsigned not null primary key,
icon varchar(255) not null,
shadow int unsigned not null
);");
}
function update_upgrade3() {
update_sql("INSERT INTO system VALUES ('archive.module','archive','module','',1);");
update_sql("INSERT INTO system VALUES ('block.module','block','module','',1);");