public function frameResponse(\FrameResponseObject $frameResponseObject)
{
$portal = \lms_portal::get_instance();
if (!isset($messageboard) || !is_object($messageboard)) {
if (empty($this->params[0])) {
throw new \Exception("Environment not set.");
}
if (empty($this->params[1])) {
throw new \Exception("Group not set.");
}
if (!($env = \steam_factory::get_object($GLOBALS["STEAM"]->get_id(), $this->params[0]))) {
throw new \Exception("Environment unknown.");
}
if (!($grp = \steam_factory::get_object($GLOBALS["STEAM"]->get_id(), $this->params[1]))) {
throw new \Exception("Group unknown");
}
}
$accessmergel = FALSE;
if (isset($messageboard) && is_object($messageboard)) {
$creator = $messageboard->get_creator();
if ($messageboard->get_attribute(KOALA_ACCESS) == PERMISSION_UNDEFINED && \lms_steam::get_current_user()->get_id() != $creator->get_id() && !\lms_steam::is_koala_admin(\lms_steam::get_current_user())) {
$accessmergel = TRUE;
}
}
// TODO: Passt der link?
$backlink = empty($_POST["values"]["backlink"]) ? $_SERVER["HTTP_REFERER"] : $_POST["values"]["backlink"];
if ($_SERVER["REQUEST_METHOD"] == "POST") {
$values = $_POST["values"];
if (get_magic_quotes_gpc()) {
if (!empty($values['name'])) {
$values['name'] = stripslashes($values['name']);
}
if (!empty($values['dsc'])) {
$values['dsc'] = stripslashes($values['dsc']);
}
}
if (empty($values["name"])) {
$problems = gettext("The name of new message board is missing.");
$hints = gettext("Please type in a name.");
}
if (strpos($values["name"], "/")) {
if (!isset($problems)) {
$problems = "";
}
$problems .= gettext("Please don't use the \"/\"-char in the the forum name.");
}
if (empty($problems)) {
$group_members = $grp;
$group_admins = 0;
$group_staff = 0;
// check if group is a course
$grouptype = (string) $grp->get_attribute("OBJ_TYPE");
if ($grouptype == "course") {
$group_staff = \steam_factory::groupname_to_object($GLOBALS["STEAM"]->get_id(), $grp->get_groupname() . ".staff");
$group_admins = \steam_factory::groupname_to_object($GLOBALS["STEAM"]->get_id(), $grp->get_groupname() . ".admins");
$group_members = \steam_factory::groupname_to_object($GLOBALS["STEAM"]->get_id(), $grp->get_groupname() . ".learners");
$workroom = $group_members->get_workroom();
} else {
$workroom = $grp->get_workroom();
}
if (!isset($messageboard) || !is_object($messageboard)) {
$new_forum = \steam_factory::create_messageboard($GLOBALS["STEAM"]->get_id(), $values["name"], $env, $values["dsc"]);
$_SESSION["confirmation"] = str_replace("%NAME", h($values["name"]), gettext("New forum '%NAME' created."));
} else {
$messageboard->set_attribute(OBJ_NAME, $values["name"]);
$messageboard->set_attribute(OBJ_DESC, $values["dsc"]);
$portal->set_confirmation(gettext("The changes have been saved."));
$new_forum = $messageboard;
}
$koala_forum = new \lms_forum($new_forum);
$access = (int) $values["access"];
$access_descriptions = \lms_forum::get_access_descriptions($grp);
if (!$accessmergel) {
$koala_forum->set_access($access, $access_descriptions[$access]["members"], $access_descriptions[$access]["steam"], $group_members, $group_staff, $group_admins);
}
$GLOBALS["STEAM"]->buffer_flush();
$cache = get_cache_function(\lms_steam::get_current_user()->get_name(), 600);
$cache->drop("lms_steam::get_inventory_recursive", $workroom->get_id(), CLASS_MESSAGEBOARD, array("FORUM_LANGUAGE"));
$cache->drop("lms_steam::get_group_communication_objects", $workroom->get_id(), CLASS_MESSAGEBOARD | CLASS_CALENDAR | CLASS_CONTAINER | CLASS_ROOM);
if (!isset($messageboard) || !is_object($messageboard)) {
header("Location: " . $backlink);
exit;
}
} else {
$portal->set_problem_description($problems, isset($hints) ? $hints : "");
}
}
$content = \Messageboard::getInstance()->loadTemplate("object_new.template.html");
if (isset($messageboard) && is_object($messageboard)) {
$content->setVariable("INFO_TEXT", str_replace("%NAME", h($messageboard->get_name()), gettext("You are going to edit the forum '<b>%NAME</b>'.")));
$content->setVariable("LABEL_CREATE", gettext("Save changes"));
$pagetitle = gettext("Preferences");
if (empty($values)) {
$values = array();
$values["name"] = $messageboard->get_name();
$values["dsc"] = $messageboard->get_attribute(OBJ_DESC);
$values["access"] = $messageboard->get_attribute(KOALA_ACCESS);
}
$breadcrumbheader = gettext("Preferences");
} else {
$grpname = $grp->get_attribute(OBJ_NAME);
if ($grp->get_attribute(OBJ_TYPE) == "course") {
$grpname = $grp->get_attribute(OBJ_DESC);
}
$content->setVariable("INFO_TEXT", str_replace("%ENV", h($grpname), gettext("You are going to create a new forum in '<b>%ENV</b>'.")));
$content->setVariable("LABEL_CREATE", gettext("Create forum"));
$pagetitle = gettext("Create forum");
$breadcrumbheader = gettext("Add new forum");
}
if (!empty($values)) {
if (!empty($values["name"])) {
$content->setVariable("VALUE_NAME", h($values["name"]));
}
if (!empty($values["dsc"])) {
$content->setVariable("VALUE_DSC", h($values["dsc"]));
}
}
$content->setVariable("VALUE_BACKLINK", $backlink);
$content->setVariable("BACKLINK", "<a href=\"{$backlink}\">" . gettext("back") . "</a>");
$content->setVariable("LABEL_NAME", gettext("Name"));
$content->setVariable("LABEL_DSC", gettext("Description"));
$content->setVariable("LABEL_BB_BOLD", gettext("B"));
$content->setVariable("HINT_BB_BOLD", gettext("boldface"));
$content->setVariable("LABEL_BB_ITALIC", gettext("I"));
$content->setVariable("HINT_BB_ITALIC", gettext("italic"));
$content->setVariable("LABEL_BB_UNDERLINE", gettext("U"));
$content->setVariable("HINT_BB_UNDERLINE", gettext("underline"));
$content->setVariable("LABEL_BB_STRIKETHROUGH", gettext("S"));
$content->setVariable("HINT_BB_STRIKETHROUGH", gettext("strikethrough"));
$content->setVariable("LABEL_BB_IMAGE", gettext("IMG"));
$content->setVariable("HINT_BB_IMAGE", gettext("image"));
$content->setVariable("LABEL_BB_URL", gettext("URL"));
$content->setVariable("HINT_BB_URL", gettext("web link"));
$content->setVariable("LABEL_BB_MAIL", gettext("MAIL"));
$content->setVariable("HINT_BB_MAIL", gettext("email link"));
$content->setVariable("LABEL_ACCESS", gettext("Access"));
if ((string) $grp->get_attribute("OBJ_TYPE") == "course") {
$access_default = PERMISSION_PUBLIC;
} else {
$access_default = PERMISSION_PUBLIC;
}
if ($accessmergel) {
$mailto = "mailto:'.SUPPORT_EMAIL.'?subject=KoaLA:%20Invalid%20Access%20Rights&body=" . rawurlencode("\nLink: " . get_current_URL() . "\nCreator: " . $creator->get_identifier() . "\n");
$content->setCurrentBlock("BLOCK_ACCESSMERGEL");
$content->setVariable("LABEL_ACCESSMERGEL", str_replace("%MAILTO", $mailto, gettext("There is a problem with the access settings. Please <a href=\"%MAILTO\">contact the support team</a> to fix it by setting the access rights again.")));
$content->parse("BLOCK_ACCESSMERGEL");
} else {
$access = \lms_forum::get_access_descriptions($grp);
if (is_array($access)) {
$content->setCurrentBlock("BLOCK_ACCESS");
foreach ($access as $key => $array) {
if ($key != PERMISSION_UNDEFINED || isset($values) && (int) $values["access"] == PERMISSION_UNDEFINED) {
$content->setCurrentBlock("ACCESS");
$content->setVariable("LABEL", $array["summary_short"] . ": " . $array["label"]);
$content->setVariable("VALUE", $key);
if (isset($values) && $key == (int) $values["access"] || empty($values) && $key == $access_default) {
$content->setVariable("CHECK", "checked=\"checked\"");
}
$content->parse("ACCESS");
}
}
$content->parse("BLOCK_ACCESS");
}
}
// TODO: Passt der link?
$rootlink = \lms_steam::get_link_to_root($grp);
$headline = array($rootlink[0], $rootlink[1], array("link" => $rootlink[1]["link"] . "communication/", "name" => gettext("Communication")));
if (isset($messageboard) && is_object($messageboard)) {
$headline[] = array("link" => PATH_URL . "forums/" . $messageboard->get_id() . "/", "name" => $messageboard->get_name());
}
$headline[] = array("link" => "", "name" => $breadcrumbheader);
$frameResponseObject->setTitle("Messageboard");
$rawHtml = new \Widgets\RawHtml();
$rawHtml->setHtml($content->get());
$frameResponseObject->addWidget($rawHtml);
return $frameResponseObject;
}
public function frameResponse(\FrameResponseObject $frameResponseObject)
{
$forum_id = $this->params[0];
$portal = \lms_portal::get_instance();
$user = \lms_steam::get_current_user();
$rss_feeds = $user->get_attribute("USER_RSS_FEEDS");
$author_id = isset($this->params[1]) ? $this->params[1] : null;
if (!($messageboard = \steam_factory::get_object($GLOBALS["STEAM"]->get_id(), $forum_id))) {
include "bad_link.php";
exit;
}
if ($messageboard instanceof \steam_document) {
$thread = $messageboard;
$messageboard = $thread->get_annotating();
define("OBJ_ID", $thread->get_id());
if (!$thread->check_access_read($user)) {
throw new \Exception("No rights to view this.", E_USER_RIGHTS);
}
} else {
define("OBJ_ID", $messageboard->get_id());
if (!$messageboard->check_access_read($user)) {
throw new \Exception("No rights to view this.", E_USER_RIGHTS);
}
}
if (!$messageboard instanceof \steam_messageboard) {
include "bad_link.php";
exit;
}
$is_watching = FALSE;
if (is_array($rss_feeds)) {
foreach (array_keys($rss_feeds) as $item) {
if ($item == $messageboard->get_id()) {
$is_watching = TRUE;
}
}
}
$content = \Messageboard::getInstance()->loadTemplate("forum_all_topics.template.html");
$dsc = $messageboard->get_attribute("OBJ_DESC");
if (!empty($dsc)) {
$content->setCurrentBlock("BLOCK_DESCRIPTION");
$content->setVariable("FORUM_DESCRIPTION", get_formatted_output($dsc));
$content->parse("BLOCK_DESCRIPTION");
}
$grp = $messageboard->get_environment()->get_creator();
if ($grp->get_name() == "learners" && $grp->get_attribute(OBJ_TYPE) == "course_learners") {
$grp = $grp->get_parent_group();
}
$content->setVariable("CURRENT_DISCUSSIONS_LABEL", gettext("Current Thread"));
$content->setVariable("LABEL_SEARCH", gettext("Search"));
if (isset($_GET["action"]) && $_GET["action"] == "bookmark_rss") {
\lms_steam::user_add_rssfeed($messageboard->get_id(), PATH_URL . "services/feeds/forum_public.php?id=" . $messageboard->get_id(), "discussion board", \lms_steam::get_link_to_root($messageboard));
$_SESSION["confirmation"] = str_replace("%NAME", h($messageboard->get_name()), gettext("You are keeping an eye on '%NAME' from now on."));
header("Location: " . PATH_URL . "forums/" . $messageboard->get_id() . "/");
exit;
}
if (isset($_GET["action"]) && $_GET["action"] == "delete_bookmark") {
$user = \lms_steam::get_current_user();
$id = (int) $_GET["unsubscribe"];
$feeds = $user->get_attribute("USER_RSS_FEEDS");
if (!is_array($feeds)) {
$feeds = array();
}
unset($feeds[$id]);
$user->set_attribute("USER_RSS_FEEDS", $feeds);
$_SESSION["confirmation"] = str_replace("%NAME", h($messageboard->get_name()), gettext("subscription of '%NAME' canceled."));
header("Location: " . PATH_URL . "forums/" . $messageboard->get_id() . "/");
exit;
}
if (empty($_GET["pattern"]) && !isset($author_id)) {
$cache = get_cache_function(OBJ_ID, 300);
$discussions = $cache->call("lms_forum::get_discussions", OBJ_ID);
} elseif (isset($author_id)) {
$cache = get_cache_function(\lms_steam::get_current_user()->get_name(), 300);
$discussions = $cache->call("lms_forum::search_user_posts", $messageboard->get_id(), $author_id);
} else {
$cache = get_cache_function(\lms_steam::get_current_user()->get_name(), 300);
$discussions = $cache->call("lms_forum::search_pattern", $messageboard->get_id(), $_GET["pattern"]);
}
$content->setVariable("LABEL_ALL_TOPICS", gettext("All Threads"));
if ($messageboard->check_access_annotate(\lms_steam::get_current_user())) {
$content->setCurrentBlock("BLOCK_WRITE_ACCESS");
if (isset($author_id)) {
$content->setVariable("LABEL_THREADS_POSTED_IN", gettext("All Threads"));
// TODO: Passt der link?
$content->setVariable("LINK_AUTHOR", PATH_URL . "forums/" . $messageboard->get_id() . "/");
} else {
$content->setVariable("LABEL_THREADS_POSTED_IN", gettext("Threads you've posted in"));
// TODO: Passt der link?
$content->setVariable("LINK_AUTHOR", PATH_URL . "forums/" . $messageboard->get_id() . "/?author=" . \lms_steam::get_current_user()->get_name());
}
// TODO: Passt der link?
$content->setVariable("LINK_POST_NEW", PATH_URL . "messageboard/newDiscussion/" . $messageboard->get_id());
$content->setVariable("LABEL_POST_NEW_THREAD", gettext("Post a new thread"));
$content->parse("BLOCK_WRITE_ACCESS");
}
if ($messageboard->check_access_write(\lms_steam::get_current_user())) {
$content->setCurrentBlock("BLOCK_ADMIN");
$content->setVariable("LINK_EDIT", PATH_URL . "messageboard/editMessageboard/" . $messageboard->get_id());
$content->setVariable("LABEL_EDIT", gettext("Preferences"));
$content->setVariable("LINK_DELETE", PATH_URL . "messageboard/deleteMessageboard/" . $messageboard->get_id());
$content->setVariable("LABEL_DELETE", gettext("Delete forum"));
$content->parse("BLOCK_ADMIN");
}
$content->setCurrentBlock("BLOCK_WATCH");
if ($is_watching) {
$content->setVariable("LABEL_BOOKMARK", gettext("End watching"));
// TODO: Passt der link?
$content->setVariable("LINK_BOOKMARK", PATH_URL . "forums/" . $messageboard->get_id() . "/?action=delete_bookmark&unsubscribe=" . $messageboard->get_id());
} else {
$content->setVariable("LABEL_BOOKMARK", gettext("Watch this forum"));
// TODO: Passt der link?
$content->setVariable("LINK_BOOKMARK", PATH_URL . "forums/" . $messageboard->get_id() . "/?action=bookmark_rss");
}
$content->parse("BLOCK_WATCH");
// ACCESS
$access_descriptions = \lms_forum::get_access_descriptions($grp);
$access_descriptions = $access_descriptions[$messageboard->get_attribute(KOALA_ACCESS)];
$access = $access_descriptions["summary_short"] . ": " . $access_descriptions["label"];
$content->setCurrentBlock("BLOCK_ACCESS");
$content->setVariable("TITLE_ACCESS", gettext("Access"));
$content->setVariable("LABEL_ACCESS", $access);
$content->parse("BLOCK_ACCESS");
$content->setVariable("LABEL_TITLE", gettext("Title"));
$content->setVariable("LABEL_AUTHOR", gettext("Author"));
$content->setVariable("LABEL_REPLIES", gettext("Replies"));
$content->setVariable("LABEL_LATEST_POST", gettext("Latest Post"));
// PAGE SETZEN
$no_discussions = count($discussions);
$paginator = \lms_portal::get_paginator(20, $no_discussions, gettext("(%TOTAL discussions in forum)"));
$start = $paginator["startIndex"];
//$start = $portal->set_paginator( $content, 20, $no_discussions, gettext( "(%TOTAL discussions in forum)" ) );
$end = $start + 20 > $no_discussions ? $no_discussions : $start + 20;
for ($i = $start; $i < $end; $i++) {
$discussion = $discussions[$i];
$content->setVariable("PAGINATOR", $paginator["html"]);
$content->setCurrentBlock("BLOCK_THREAD");
if (time() - $discussion["LATEST_POST_TS"] > $_SESSION["last_login"]) {
$content->setCurrentBlock("BLOCK_THREAD_NEW");
$content->setVariable("NEW_LABEL", gettext("New"));
$content->parse("BLOCK_THREAD_NEW");
}
$content->setVariable("THREAD_LINK", PATH_URL . "messageboard/viewDiscussion/" . $discussion["OBJ_ID"] . "/");
$content->setVariable("THREAD_SUBJECT", h($discussion["OBJ_NAME"]));
$content->setVariable("THREAD_LAST_ENTRY", how_long_ago($discussion["LATEST_POST_TS"]));
// TODO: Passt der link?
$content->setVariable("AUTHOR_LINK", PATH_URL . "user/" . $discussion["AUTHOR_LOGIN"] . "/");
$content->setVariable("AUTHOR_IMAGE", PATH_URL . "cached/get_document.php?id=" . $discussion["OBJ_ICON"] . "&type=usericon&width=30&height=40");
$title = !empty($discussion["USER_ACADEMIC_TITLE"]) ? $discussion["USER_ACADEMIC_TITLE"] . " " : "";
$content->setVariable("AUTHOR_NAME", h($title . $discussion["USER_FIRSTNAME"] . " " . $discussion["USER_FULLNAME"]));
$content->setVariable("THREAD_REPLIES", h($discussion["REPLIES"]));
$content->parse("BLOCK_THREAD");
}
$portal->set_rss_feed(PATH_URL . "services/feeds/forum_public.php?id=" . OBJ_ID, gettext("Feed"), str_replace("%l", isset($login) ? $login : "", gettext("Subscribe to this forum's Newsfeed")));
// TODO: Passt der link?
$rootlink = \lms_steam::get_link_to_root($messageboard);
$headline = array($rootlink[0], $rootlink[1], array("link" => $rootlink[1]["link"] . "communication/", "name" => gettext("Communication")), array("link" => "", "name" => h($messageboard->get_name())));
$frameResponseObject->setTitle("Messageboard");
$rawHtml = new \Widgets\RawHtml();
$rawHtml->setHtml($content->get());
$frameResponseObject->addWidget($rawHtml);
return $frameResponseObject;
}
public function frameResponse(\FrameResponseObject $frameResponseObject)
{
$path = $this->params;
$user = \lms_steam::get_current_user();
$public = \steam_factory::get_object($GLOBALS["STEAM"]->get_id(), STEAM_PUBLIC_GROUP, CLASS_GROUP);
$id = $path[0];
try {
$steam_group = !empty($id) ? \steam_factory::get_object($GLOBALS["STEAM"]->get_id(), $id) : FALSE;
} catch (\Exception $ex) {
include "bad_link.php";
exit;
}
$group_is_private = FALSE;
if ($steam_group && is_object($steam_group)) {
switch ((string) $steam_group->get_attribute("OBJ_TYPE")) {
case "course":
$group = new \koala_group_course($steam_group);
// TODO: Passt der backlink?
$backlink = PATH_URL . SEMESTER_URL . "/" . $group->get_semester()->get_name() . "/" . h($group->get_name()) . "/";
break;
default:
$group = new \koala_group_default($steam_group);
// TODO: Passt der backlink?
$backlink = PATH_URL . "groups/" . $group->get_id() . "/";
// Determine if group is public or private
$parent = $group->get_parent_group();
if ($parent->get_id() == STEAM_PRIVATE_GROUP) {
$group_is_private = TRUE;
}
break;
}
}
if ($group_is_private) {
if (!$steam_group->is_member($user) && !\lms_steam::is_koala_admin($user)) {
throw new \Exception(gettext("You have no rights to access this group"), E_USER_RIGHTS);
}
}
if (!$group instanceof \koala_group) {
throw new \Exception("Is not a koala_group: " . $group_id, E_PARAMETER);
}
switch (get_class($group)) {
case "koala_group_course":
$html_handler_group = new \koala_html_course($group);
$html_handler_group->set_context("communication");
break;
default:
$html_handler_group = new \koala_html_group($group);
$html_handler_group->set_context("communication");
break;
}
$content = \Group::getInstance()->loadTemplate("groups_communication.template.html");
$workroom = $group->get_workroom();
$read_access = $workroom->check_access_read($user);
if (!$read_access) {
throw new \Exception("No read access on container: id=" . $workroom->get_id(), E_USER_RIGHTS);
}
$cache = get_cache_function(\lms_steam::get_current_user()->get_name(), 600);
$communication_objects = $cache->call("lms_steam::get_group_communication_objects", $workroom->get_id(), CLASS_MESSAGEBOARD | CLASS_CALENDAR | CLASS_CONTAINER | CLASS_ROOM);
$forums = array();
$weblogs = array();
$wikis = array();
foreach ($communication_objects as $object) {
if ($object["OBJ_CLASS"] === "steam_messageboard") {
$forums[] = $object;
} else {
if ($object["OBJ_CLASS"] === "steam_calendar") {
$weblogs[] = $object;
} else {
if (($object["OBJ_CLASS"] === "steam_container" || $object["OBJ_CLASS"] === "steam_room") && ($object["OBJ_TYPE"] != null && ($object["OBJ_TYPE"] == "KOALA_WIKI" || $object["OBJ_TYPE"] == "container_wiki_koala"))) {
$wikis[] = $object;
}
}
}
}
$content->setVariable("LABEL_FORUMS", gettext("Discussion Boards"));
if (count($forums) > 0) {
$content->setCurrentBlock("BLOCK_FORUMS");
$content->setVariable("LABEL_FORUM_DESCRIPTION", gettext("Forum / description"));
$content->setVariable("LABEL_ARTICLES", gettext("Articles"));
$content->setVariable("LABEL_ACCESS", gettext("Access"));
$content->setVariable("LABEL_LAST_COMMENT", gettext("Last comment"));
$access_descriptions = \lms_forum::get_access_descriptions($group);
foreach ($forums as $forum) {
$cache = get_cache_function($forum["OBJ_ID"], 600);
$discussions = $cache->call("lms_forum::get_discussions", $forum["OBJ_ID"]);
$latest_post = isset($discussions[0]) ? $discussions[0] : FALSE;
$content->setCurrentBlock("BLOCK_FORUM");
$content->setVariable("NAME_FORUM", h($forum["OBJ_NAME"]));
$content->setVariable("LINK_FORUM", PATH_URL . "messageboard/index/" . $forum["OBJ_ID"]);
$content->setVariable("OBJ_DESC", get_formatted_output($forum["OBJ_DESC"]));
$language = !empty($forum["FORUM_LANGUAGE"]) ? $forum["FORUM_LANGUAGE"] : "German";
$content->setVariable("VALUE_LANGUAGE", $language);
$access = "<span title=\"" . $access_descriptions[$forum["KOALA_ACCESS"]]["label"] . "\">" . $access_descriptions[$forum["KOALA_ACCESS"]]["summary_short"] . "</span>";
$content->setVariable("VALUE_ACCESS", $access);
$content->setVariable("VALUE_ARTICLES", count($discussions));
if ($latest_post) {
$content->setVariable("SUBJECT_LAST_COMMENT", h($latest_post["LATEST_POST_TITLE"]));
$content->setVariable("LINK_LAST_COMMENT", PATH_URL . "forums/" . $latest_post["OBJ_ID"] . "/");
$content->setVariable("POSTED_BY_LABEL", "(" . h($latest_post["LATEST_POST_AUTHOR"]) . ", " . how_long_ago($latest_post["LATEST_POST_TS"]) . ")");
} else {
$content->setVariable("POSTED_BY_LABEL", gettext("-"));
}
$content->parse("BLOCK_FORUM");
}
$content->parse("BLOCK_FORUMS");
} else {
$content->setVariable("LABEL_NO_FORUMS_FOUND", "<b>" . gettext("No forums available. Either no forums are created in this context, or you have no rights to read them.") . "</b>");
}
$content->setVariable("LABEL_WEBLOGS", gettext("Weblogs"));
if (count($weblogs) > 0) {
$content->setCurrentBlock("BLOCK_WEBLOGS");
$content->setVariable("LABEL_WEBLOG_DESCRIPTION", gettext("Weblog / description"));
$content->setVariable("LABEL_WEBLOG_ENTRIES", gettext("Entries"));
$content->setVariable("LABEL_WEBLOG_ACCESS", gettext("Access"));
$content->setVariable("LABEL_WEBLOG_LAST_ENTRY", gettext("Last entry"));
$access_descriptions = \lms_weblog::get_access_descriptions($group);
foreach ($weblogs as $weblog) {
$cache = get_cache_function($weblog["OBJ_ID"], 600);
$entries = $cache->call("lms_weblog::get_items", $weblog["OBJ_ID"]);
$last_entry = isset($entries[0]) ? $entries[0] : FALSE;
$content->setCurrentBlock("BLOCK_WEBLOG");
$content->setVariable("NAME_WEBLOG", h($weblog["OBJ_NAME"]));
$content->setVariable("LINK_WEBLOG", PATH_URL . "weblog/" . $weblog["OBJ_ID"] . "/");
$content->setVariable("WEBLOG_OBJ_DESC", get_formatted_output($weblog["OBJ_DESC"]));
$title = $access_descriptions[$weblog["KOALA_ACCESS"]]["label"];
if ($weblog["KOALA_ACCESS"] == PERMISSION_PRIVATE_READONLY && !$group instanceof \koala_html_course) {
$obj = \steam_factory::get_object($GLOBALS["STEAM"]->get_id(), $weblog["OBJ_ID"], CLASS_CALENDAR);
$creator = $obj->get_creator();
if ($creator->get_id() != \lms_steam::get_current_user()->get_id()) {
$title = str_replace("%NAME", $creator->get_name(), $title);
} else {
$title = str_replace("%NAME", "you", $title);
}
}
$content->setVariable("VALUE_WEBLOG_LANGUAGE", "German");
$access = "<span title=\"" . $title . "\">" . $access_descriptions[$weblog["KOALA_ACCESS"]]["summary_short"] . "</span>";
$content->setVariable("VALUE_WEBLOG_ACCESS", $access);
$content->setVariable("VALUE_WEBLOG_ARTICLES", count($entries));
$content->setVariable("LINK_WEBLOG_LAST_ENTRY", PATH_URL . "weblog/" . $last_entry["OBJ_ID"] . "/");
if ($last_entry) {
$content->setVariable("SUBJECT_WEBLOG_LAST_ENTRY", h($last_entry["DATE_TITLE"]));
$content->setVariable("WEBLOG_POSTED_BY_LABEL", "(" . h($last_entry["AUTHOR"]) . ", " . how_long_ago($last_entry["DATE_START_DATE"]) . ")");
} else {
$content->setVariable("WEBLOG_POSTED_BY_LABEL", gettext("-"));
}
$content->parse("BLOCK_WEBLOG");
}
$content->parse("BLOCK_WEBLOGS");
} else {
$content->setVariable("LABEL_NO_WEBLOGS_FOUND", "<b>" . gettext("No weblogs available. Either no weblogs are created in this context, or you have no rights to read them.") . "</b>");
}
$content->setVariable("LABEL_WIKIS", gettext("Wikis"));
if (count($wikis) > 0) {
$content->setCurrentBlock("BLOCK_WIKIS");
$content->setVariable("LABEL_WIKI_DESCRIPTION", gettext("Wiki / description"));
$content->setVariable("LABEL_WIKI_ENTRIES", gettext("Entries"));
$content->setVariable("LABEL_WIKI_ACCESS", gettext("Access"));
$content->setVariable("LABEL_WIKI_LAST_ENTRY", gettext("Last entry"));
$access_descriptions = \lms_wiki::get_access_descriptions($group);
foreach ($wikis as $wiki) {
$cache = get_cache_function($wiki["OBJ_ID"], 600);
$entries = $cache->call("lms_wiki::get_items", $wiki["OBJ_ID"]);
$last_entry = isset($entries[0]) ? $entries[0] : FALSE;
$content->setCurrentBlock("BLOCK_WIKI");
$content->setVariable("NAME_WIKI", h($wiki["OBJ_NAME"]));
$content->setVariable("LINK_WIKI", PATH_URL . "wiki/index/" . $wiki["OBJ_ID"] . "/");
$content->setVariable("WIKI_OBJ_DESC", get_formatted_output($wiki["OBJ_DESC"]));
$title = $access_descriptions[$wiki["KOALA_ACCESS"]]["label"];
if ($wiki["KOALA_ACCESS"] == PERMISSION_PRIVATE_READONLY && !$group instanceof \koala_html_course) {
$obj = \steam_factory::get_object($GLOBALS["STEAM"]->get_id(), $wiki["OBJ_ID"], CLASS_CONTAINER);
$creator = $obj->get_creator();
if ($creator->get_id() != \lms_steam::get_current_user()->get_id()) {
$title = str_replace("%NAME", $creator->get_name(), $title);
} else {
$title = str_replace("%NAME", "you", $title);
}
}
$access = "<span title=\"" . $title . "\">" . $access_descriptions[$wiki["KOALA_ACCESS"]]["summary_short"] . "</span>";
$content->setVariable("VALUE_WIKI_ACCESS", $access);
$content->setVariable("VALUE_WIKI_ARTICLES", count($entries));
$content->setVariable("LINK_WIKI_LAST_ENTRY", PATH_URL . "wiki/" . $last_entry["OBJ_ID"] . "/");
$content->setVariable("SUBJECT_WIKI_LAST_ENTRY", str_replace(".wiki", "", h($last_entry["OBJ_NAME"])));
$content->setVariable("WIKI_POSTED_BY_LABEL", $last_entry["DOC_LAST_MODIFIED"] != null ? "(" . h($last_entry["DOC_USER_MODIFIED"]) . ", " . how_long_ago($last_entry["DOC_LAST_MODIFIED"]) . ")" : "-");
$content->parse("BLOCK_WIKI");
}
$content->parse("BLOCK_WIKIS");
} else {
$content->setVariable("LABEL_NO_WIKIS_FOUND", "<b>" . gettext("No wikis available. Either no wikis are created in this context, or you have no rights to read them.") . "</b>");
}
$html_handler_group->set_html_left($content->get());
$frameResponseObject->setTitle("Group");
$rawHtml = new \Widgets\RawHtml();
$rawHtml->setHtml($html_handler_group->get_html());
$frameResponseObject->addWidget($rawHtml);
return $frameResponseObject;
}
public function execute(\FrameResponseObject $frameResponseObject)
{
//$portal = \lms_portal::get_instance();
//$portal->initialize( GUEST_NOT_ALLOWED );
//$portal->set_guest_allowed( GUEST_NOT_ALLOWED );
$user = \lms_steam::get_current_user();
//$portal_user = $portal->get_user();
//$path = $request->getPath();
$group_course = \steam_factory::groupname_to_object($GLOBALS["STEAM"]->get_id(), "Courses." . $this->params[0] . "." . $this->params[1]);
$group = new \koala_group_course($group_course);
if (!$group instanceof \koala_group) {
throw new \Exception("Is not a koala_group: " . $group_id, E_PARAMETER);
}
switch (get_class($group)) {
case "koala_group_course":
$html_handler_group = new \koala_html_course($group);
$html_handler_group->set_context("communication");
break;
default:
$html_handler_group = new \koala_html_group($group);
$html_handler_group->set_context("communication");
break;
}
$content = \Course::getInstance()->loadTemplate("groups_communication.template.html");
//$content = new HTML_TEMPLATE_IT();
//$content->loadTemplateFile( PATH_TEMPLATES . "groups_communication.template.html" );
$workroom = $group->get_workroom();
$read_access = $workroom->check_access_read($user);
if (!$read_access) {
throw new Exception("No read access on container: id=" . $workroom->get_id(), E_USER_RIGHTS);
}
$cache = get_cache_function(\lms_steam::get_current_user()->get_name(), 600);
$communication_objects = $cache->call("lms_steam::get_group_communication_objects", $workroom->get_id(), CLASS_MESSAGEBOARD | CLASS_CALENDAR | CLASS_CONTAINER | CLASS_ROOM);
$forums = array();
$weblogs = array();
$wikis = array();
foreach ($communication_objects as $object) {
if ($object["OBJ_CLASS"] === "steam_messageboard") {
$forums[] = $object;
} else {
if ($object["OBJ_CLASS"] === "steam_calendar") {
$weblogs[] = $object;
} else {
if (($object["OBJ_CLASS"] === "steam_container" || $object["OBJ_CLASS"] === "steam_room") && ($object["OBJ_TYPE"] != null && ($object["OBJ_TYPE"] == "KOALA_WIKI" || $object["OBJ_TYPE"] == "container_wiki_koala"))) {
$wikis[] = $object;
}
}
}
}
$content->setVariable("LABEL_FORUMS", gettext("Discussion Boards"));
if (count($forums) > 0) {
$content->setCurrentBlock("BLOCK_FORUMS");
$content->setVariable("LABEL_FORUM_DESCRIPTION", gettext("Forum / description"));
$content->setVariable("LABEL_ARTICLES", gettext("Articles"));
$content->setVariable("LABEL_ACCESS", gettext("Access"));
$content->setVariable("LABEL_LAST_COMMENT", gettext("Last comment"));
$access_descriptions = \lms_forum::get_access_descriptions($group);
foreach ($forums as $forum) {
$cache = get_cache_function($forum["OBJ_ID"], 600);
$discussions = $cache->call("lms_forum::get_discussions", $forum["OBJ_ID"]);
$latest_post = isset($discussions[0]) ? $discussions[0] : FALSE;
$content->setCurrentBlock("BLOCK_FORUM");
$content->setVariable("NAME_FORUM", h($forum["OBJ_NAME"]));
$content->setVariable("LINK_FORUM", PATH_URL . "forums/" . $forum["OBJ_ID"] . "/");
$content->setVariable("OBJ_DESC", get_formatted_output($forum["OBJ_DESC"]));
$language = !empty($forum["FORUM_LANGUAGE"]) ? $forum["FORUM_LANGUAGE"] : "German";
$content->setVariable("VALUE_LANGUAGE", $language);
$access = "<span title=\"" . $access_descriptions[$forum["KOALA_ACCESS"]]["label"] . "\">" . $access_descriptions[$forum["KOALA_ACCESS"]]["summary_short"] . "</span>";
$content->setVariable("VALUE_ACCESS", $access);
$content->setVariable("VALUE_ARTICLES", count($discussions));
if ($latest_post) {
$content->setVariable("SUBJECT_LAST_COMMENT", h($latest_post["LATEST_POST_TITLE"]));
$content->setVariable("LINK_LAST_COMMENT", PATH_URL . "forums/" . $latest_post["OBJ_ID"] . "/");
$content->setVariable("POSTED_BY_LABEL", "(" . h($latest_post["LATEST_POST_AUTHOR"]) . ", " . how_long_ago($latest_post["LATEST_POST_TS"]) . ")");
} else {
$content->setVariable("POSTED_BY_LABEL", gettext("-"));
}
$content->parse("BLOCK_FORUM");
}
$content->parse("BLOCK_FORUMS");
} else {
$content->setVariable("LABEL_NO_FORUMS_FOUND", "<b>" . gettext("No forums available. Either no forums are created in this context, or you have no rights to read them.") . "</b>");
}
$content->setVariable("LABEL_WEBLOGS", gettext("Weblogs"));
if (count($weblogs) > 0) {
$content->setCurrentBlock("BLOCK_WEBLOGS");
$content->setVariable("LABEL_WEBLOG_DESCRIPTION", gettext("Weblog / description"));
$content->setVariable("LABEL_WEBLOG_ENTRIES", gettext("Entries"));
$content->setVariable("LABEL_WEBLOG_ACCESS", gettext("Access"));
$content->setVariable("LABEL_WEBLOG_LAST_ENTRY", gettext("Last entry"));
$access_descriptions = \lms_weblog::get_access_descriptions($group);
foreach ($weblogs as $weblog) {
$cache = get_cache_function($weblog["OBJ_ID"], 600);
$entries = $cache->call("lms_weblog::get_items", $weblog["OBJ_ID"]);
$last_entry = isset($entries[0]) ? $entries[0] : FALSE;
$content->setCurrentBlock("BLOCK_WEBLOG");
$content->setVariable("NAME_WEBLOG", h($weblog["OBJ_NAME"]));
$content->setVariable("LINK_WEBLOG", PATH_URL . "weblog/" . $weblog["OBJ_ID"] . "/");
$content->setVariable("WEBLOG_OBJ_DESC", get_formatted_output($weblog["OBJ_DESC"]));
$title = $access_descriptions[$weblog["KOALA_ACCESS"]]["label"];
if ($weblog["KOALA_ACCESS"] == PERMISSION_PRIVATE_READONLY && !$group instanceof koala_html_course) {
$obj = \steam_factory::get_object($GLOBALS["STEAM"]->get_id(), $weblog["OBJ_ID"], CLASS_CALENDAR);
$creator = $obj->get_creator();
if ($creator->get_id() != \lms_steam::get_current_user()->get_id()) {
$title = str_replace("%NAME", $creator->get_name(), $title);
} else {
$title = str_replace("%NAME", "you", $title);
}
}
$content->setVariable("VALUE_WEBLOG_LANGUAGE", "German");
$access = "<span title=\"" . $title . "\">" . $access_descriptions[$weblog["KOALA_ACCESS"]]["summary_short"] . "</span>";
$content->setVariable("VALUE_WEBLOG_ACCESS", $access);
$content->setVariable("VALUE_WEBLOG_ARTICLES", count($entries));
$content->setVariable("LINK_WEBLOG_LAST_ENTRY", PATH_URL . "weblog/" . $last_entry["OBJ_ID"] . "/");
if ($last_entry) {
$content->setVariable("SUBJECT_WEBLOG_LAST_ENTRY", h($last_entry["DATE_TITLE"]));
$content->setVariable("WEBLOG_POSTED_BY_LABEL", "(" . h($last_entry["AUTHOR"]) . ", " . how_long_ago($last_entry["DATE_START_DATE"]) . ")");
} else {
$content->setVariable("WEBLOG_POSTED_BY_LABEL", gettext("-"));
}
$content->parse("BLOCK_WEBLOG");
}
$content->parse("BLOCK_WEBLOGS");
} else {
$content->setVariable("LABEL_NO_WEBLOGS_FOUND", "<b>" . gettext("No weblogs available. Either no weblogs are created in this context, or you have no rights to read them.") . "</b>");
}
$content->setVariable("LABEL_WIKIS", gettext("Wikis"));
if (count($wikis) > 0) {
$content->setCurrentBlock("BLOCK_WIKIS");
$content->setVariable("LABEL_WIKI_DESCRIPTION", gettext("Wiki / description"));
$content->setVariable("LABEL_WIKI_ENTRIES", gettext("Entries"));
$content->setVariable("LABEL_WIKI_ACCESS", gettext("Access"));
$content->setVariable("LABEL_WIKI_LAST_ENTRY", gettext("Last entry"));
$access_descriptions = lms_wiki::get_access_descriptions($group);
foreach ($wikis as $wiki) {
$cache = get_cache_function($wiki["OBJ_ID"], 600);
$entries = $cache->call("lms_wiki::get_items", $wiki["OBJ_ID"]);
$last_entry = isset($entries[0]) ? $entries[0] : FALSE;
$content->setCurrentBlock("BLOCK_WIKI");
$content->setVariable("NAME_WIKI", h($wiki["OBJ_NAME"]));
$content->setVariable("LINK_WIKI", PATH_URL . "wiki/" . $wiki["OBJ_ID"] . "/");
$content->setVariable("WIKI_OBJ_DESC", get_formatted_output($wiki["OBJ_DESC"]));
$title = $access_descriptions[$wiki["KOALA_ACCESS"]]["label"];
if ($wiki["KOALA_ACCESS"] == PERMISSION_PRIVATE_READONLY && !$group instanceof koala_html_course) {
$obj = steam_factory::get_object($GLOBALS["STEAM"]->get_id(), $wiki["OBJ_ID"], CLASS_CONTAINER);
$creator = $obj->get_creator();
if ($creator->get_id() != lms_steam::get_current_user()->get_id()) {
$title = str_replace("%NAME", $creator->get_name(), $title);
} else {
$title = str_replace("%NAME", "you", $title);
}
}
$access = "<span title=\"" . $title . "\">" . $access_descriptions[$wiki["KOALA_ACCESS"]]["summary_short"] . "</span>";
$content->setVariable("VALUE_WIKI_ACCESS", $access);
$content->setVariable("VALUE_WIKI_ARTICLES", count($entries));
$content->setVariable("LINK_WIKI_LAST_ENTRY", PATH_URL . "wiki/" . $last_entry["OBJ_ID"] . "/");
$content->setVariable("SUBJECT_WIKI_LAST_ENTRY", str_replace(".wiki", "", h($last_entry["OBJ_NAME"])));
$content->setVariable("WIKI_POSTED_BY_LABEL", $last_entry["DOC_LAST_MODIFIED"] != null ? "(" . h($last_entry["DOC_USER_MODIFIED"]) . ", " . how_long_ago($last_entry["DOC_LAST_MODIFIED"]) . ")" : "-");
$content->parse("BLOCK_WIKI");
}
$content->parse("BLOCK_WIKIS");
} else {
$content->setVariable("LABEL_NO_WIKIS_FOUND", "<b>" . gettext("No wikis available. Either no wikis are created in this context, or you have no rights to read them.") . "</b>");
}
$html_handler_group->set_html_left($content->get());
//$portal->set_page_main( $html_handler_group->get_headline(), $html_handler_group->get_html(), "");
$frameResponseObject->setHeadline($html_handler_group->get_headline());
$widget = new \Widgets\RawHtml();
$widget->setHtml($html_handler_group->get_html());
$frameResponseObject->addWidget($widget);
return $frameResponseObject;
}
$weblogs[] = $object;
} else {
if (($object["OBJ_CLASS"] === "steam_container" || $object["OBJ_CLASS"] === "steam_room") && ($object["OBJ_TYPE"] != null && ($object["OBJ_TYPE"] == "KOALA_WIKI" || $object["OBJ_TYPE"] == "container_wiki_koala"))) {
$wikis[] = $object;
}
}
}
}
$content->setVariable("LABEL_FORUMS", gettext("Discussion Boards"));
if (count($forums) > 0) {
$content->setCurrentBlock("BLOCK_FORUMS");
$content->setVariable("LABEL_FORUM_DESCRIPTION", gettext("Forum / description"));
$content->setVariable("LABEL_ARTICLES", gettext("Articles"));
$content->setVariable("LABEL_ACCESS", gettext("Access"));
$content->setVariable("LABEL_LAST_COMMENT", gettext("Last comment"));
$access_descriptions = lms_forum::get_access_descriptions($group);
foreach ($forums as $forum) {
$cache = get_cache_function($forum["OBJ_ID"], 600);
$discussions = $cache->call("lms_forum::get_discussions", $forum["OBJ_ID"]);
$latest_post = isset($discussions[0]) ? $discussions[0] : FALSE;
$content->setCurrentBlock("BLOCK_FORUM");
$content->setVariable("NAME_FORUM", h($forum["OBJ_NAME"]));
$content->setVariable("LINK_FORUM", PATH_URL . "forums/" . $forum["OBJ_ID"] . "/");
$content->setVariable("OBJ_DESC", get_formatted_output($forum["OBJ_DESC"]));
$language = !empty($forum["FORUM_LANGUAGE"]) ? $forum["FORUM_LANGUAGE"] : "German";
$content->setVariable("VALUE_LANGUAGE", $language);
$access = "<span title=\"" . $access_descriptions[$forum["KOALA_ACCESS"]]["label"] . "\">" . $access_descriptions[$forum["KOALA_ACCESS"]]["summary_short"] . "</span>";
$content->setVariable("VALUE_ACCESS", $access);
$content->setVariable("VALUE_ARTICLES", count($discussions));
if ($latest_post) {
$content->setVariable("SUBJECT_LAST_COMMENT", h($latest_post["LATEST_POST_TITLE"]));
$group_admins = steam_factory::groupname_to_object($GLOBALS["STEAM"]->get_id(), $grp->get_groupname() . ".admins");
$group_members = steam_factory::groupname_to_object($GLOBALS["STEAM"]->get_id(), $grp->get_groupname() . ".learners");
$workroom = $group_members->get_workroom();
} else {
$workroom = $grp->get_workroom();
}
if (!isset($messageboard) || !is_object($messageboard)) {
$new_forum = steam_factory::create_messageboard($GLOBALS["STEAM"]->get_id(), $values["name"], $env, $values["dsc"]);
$_SESSION["confirmation"] = str_replace("%NAME", h($values["name"]), gettext("New forum '%NAME' created."));
} else {
$messageboard->set_attribute(OBJ_NAME, $values["name"]);
$messageboard->set_attribute(OBJ_DESC, $values["dsc"]);
$portal->set_confirmation(gettext("The changes have been saved."));
$new_forum = $messageboard;
}
$koala_forum = new lms_forum($new_forum);
$access = (int) $values["access"];
$access_descriptions = lms_forum::get_access_descriptions($grp);
if (!$accessmergel) {
$koala_forum->set_access($access, $access_descriptions[$access]["members"], $access_descriptions[$access]["steam"], $group_members, $group_staff, $group_admins);
}
$GLOBALS["STEAM"]->buffer_flush();
$cache = get_cache_function(lms_steam::get_current_user()->get_name(), 600);
$cache->drop("lms_steam::get_inventory_recursive", $workroom->get_id(), CLASS_MESSAGEBOARD, array("FORUM_LANGUAGE"));
$cache->drop("lms_steam::get_group_communication_objects", $workroom->get_id(), CLASS_MESSAGEBOARD | CLASS_CALENDAR | CLASS_CONTAINER | CLASS_ROOM);
if (!isset($messageboard) || !is_object($messageboard)) {
header("Location: " . $backlink);
exit;
}
} else {
$portal->set_problem_description($problems, isset($hints) ? $hints : "");
public function search_user_posts($messageboard_id, $user_name)
{
if (defined("LOG_DEBUGLOG")) {
$time1 = microtime(TRUE);
logging::write_log(LOG_DEBUGLOG, "lms_forum::search_user_posts(" . $messageboard_id . ", " . $user_name . ") \t" . $GLOBALS["STEAM"]->get_login_user_name() . " \t" . $messageboard_id . " \t... ");
}
if (!($search_mod = $GLOBALS["STEAM"]->get_module("package:searchsupport"))) {
throw new Exception("sTeam 'package:searchsupport' not installed.");
}
$messageboard = steam_factory::get_object($GLOBALS["STEAM"]->get_id(), $messageboard_id, CLASS_MESSAGEBOARD);
$user = steam_factory::username_to_object($GLOBALS["STEAM"]->get_id(), $user_name);
$search_results = $GLOBALS["STEAM"]->predefined_command($search_mod, "search_user_posts", array($messageboard, $user), 0);
$result = lms_forum::get_discussions($messageboard->get_id(), $search_results);
if (defined("LOG_DEBUGLOG")) {
logging::append_log(LOG_DEBUGLOG, " \t" . round((microtime(TRUE) - $time1) * 1000) . " ms \t" . count($result));
}
return $result;
}
