-<?php // $Id$\r
-\r
-/*************************************************\r
- ACTIONS handled are:\r
-\r
- closeconversation\r
- confirmclose\r
- getsubject\r
- insertentries\r
- openconversation\r
- printdialogue\r
- showdialogues\r
- updatesubject\r
- \r
-************************************************/\r
-\r
- require_once("../../config.php");\r
- require_once("lib.php");\r
- require_once("locallib.php");\r
-\r
- require_variable($id); // Course Module ID\r
-\r
- if (! $cm = get_record("course_modules", "id", $id)) {\r
- error("Course Module ID was incorrect");\r
- }\r
-\r
- if (! $course = get_record("course", "id", $cm->course)) {\r
- error("Course is misconfigured");\r
- }\r
-\r
- if (! $dialogue = get_record("dialogue", "id", $cm->instance)) {\r
- error("Course module dialogue is incorrect");\r
- }\r
-\r
- require_login($course->id);\r
- \r
- // set up some general variables\r
- $usehtmleditor = can_use_html_editor();\r
-\r
- $strdialogues = get_string("modulenameplural", "dialogue");\r
- $strdialogue = get_string("modulename", "dialogue");\r
- \r
- // ... print the header and...\r
- print_header_simple("$dialogue->name", "",\r
- "<a href=\"index.php?id=$course->id\">$strdialogues</a> -> \r
- <a hre=\"view.php?id=$cm->id\">$dialogue->name</a>", \r
- "", "", true);\r
-\r
-\r
- require_variable($action); // need something to do!\r
- \r
- /************** close conversation ************************************/\r
- if ($action == 'closeconversation') {\r
- if (empty($_GET['cid'])) {\r
- error("Close dialogue: Missing conversation id");\r
- }\r
- else {\r
- $conversationid = $_GET['cid'];\r
- }\r
- if (!set_field("dialogue_conversations", "closed", 1, "id", $conversationid)) {\r
- error("Close dialogue: unable to set closed");\r
- }\r
- if (!set_field("dialogue_conversations", "lastid", $USER->id, "id", $conversationid)) {\r
- error("Close dialogue: unable to set lastid");\r
- }\r
- $pane=$_GET['pane'];\r
-\r
- add_to_log($course->id, "dialogue", "closed", "view.php?id=$cm->id", "$conversationid");\r
- redirect("view.php?id=$cm->id&pane=$pane", get_string("dialogueclosed", "dialogue"));\r
- }\r
- \r
- \r
- /****************** confirm close ************************************/\r
- elseif ($action == 'confirmclose' ) {\r
-\r
- if (empty($_GET['cid'])) {\r
- error("Confirm Close: conversation id missing");\r
- }\r
- if (!$conversation = get_record("dialogue_conversations", "id", $_GET['cid'])) {\r
- error("Confirm close: cannot get conversation record");\r
- }\r
- if ($conversation->userid == $USER->id) {\r
- if (!$user = get_record("user", "id", $conversation->recipientid)) {\r
- error("Confirm Close: cannot get recipient record");\r
- }\r
- }\r
- else {\r
- if (!$user = get_record("user", "id", $conversation->userid)) {\r
- error("Confirm Close: cannot get user record");\r
- }\r
- }\r
- $pane = $_GET['pane'];\r
- notice_yesno(get_string("confirmclosure", "dialogue", fullname($user)), \r
- "dialogues.php?action=closeconversation&id=$cm->id&cid=$conversation->id&pane=$pane", \r
- "view.php?id=$cm->id&pane=$pane");\r
- }\r
- \r
- /****************** get subject ************************************/\r
- elseif ($action == 'getsubject' ) {\r
-\r
- if (empty($_GET['cid'])) {\r
- error("Confirm Close: conversation id missing");\r
- }\r
- print_heading(get_string("addsubject", "dialogue"));\r
- echo "<form name=\"getsubjectform\" method=\"post\" action=\"dialogues.php\">\n";\r
- echo "<input type=\"hidden\" name=\"action\" value=\"updatesubject\"/>\n";\r
- echo "<input type=\"hidden\" name=\"id\" value=\"".p($_GET[id])."\"/>\n";\r
- echo "<input type=\"hidden\" name=\"cid\" value=\"".p($_GET[cid])."\"/>\n";\r
- echo "<input type=\"hidden\" name=\"pane\" value=\"".p($_GET[pane])."\"/>\n";\r
- echo "<table align=\"center\" border=\"1\" width=\"60%\">\n";\r
- echo "<tr><td align=\"right\"><b>".get_string("subject", "dialogue")."</b></td>";\r
- echo "<td><input type=\"text\" size=\"50\" maxsize=\"100\" name=\"subject\" \r
- value=\"\" /></td></tr>\n";\r
- echo "<tr><td colspan=\"2\" align=\"center\"><input type=\"submit\" value=\"".\r
- get_string("addsubject", "dialogue")."\" /></td></tr>\n";\r
- echo "</table></form>\n";\r
- }\r
- \r
- \r
- /****************** insert conversation entries ******************************/\r
- elseif ($action == 'insertentries' ) {\r
-\r
- $timenow = time();\r
- $n = 0;\r
- // get all the open conversations for this user\r
- if ($conversations = dialogue_get_conversations($dialogue, $USER, "closed = 0")) {\r
- foreach ($conversations as $conversation) {\r
- $textarea_name = "reply$conversation->id";\r
- $stripped_text = '';\r
- if (isset($_POST[$textarea_name])) {\r
- $stripped_text = strip_tags(trim($_POST[$textarea_name]));\r
- }\r
- if ($stripped_text) {\r
- unset($item);\r
- $item->dialogueid = $dialogue->id;\r
- $item->conversationid = $conversation->id;\r
- $item->userid = $USER->id;\r
- $item->timecreated = time(); \r
- // reverse the dialogue mail default \r
- $item->mailed = !$dialogue->maildefault;\r
- $item->text = clean_text($_POST[$textarea_name]);\r
- if (!$item->id = insert_record("dialogue_entries", $item)) {\r
- error("Insert Entries: Could not insert dialogue record!");\r
- }\r
- if (!set_field("dialogue_conversations", "lastid", $USER->id, "id", $conversation->id)) {\r
- error("Insert Dialogue Entries: could not set lastid");\r
- }\r
- if (!set_field("dialogue_conversations", "timemodified", $timenow, "id", \r
- $conversation->id)) {\r
- error("Insert Dialogue Entries: could not set lastid");\r
- }\r
- // reset seenon time\r
- if (!set_field("dialogue_conversations", "seenon", 0, "id", \r
- $conversation->id)) {\r
- error("Insert Dialogue Entries: could not reset seenon");\r
- }\r
- add_to_log($course->id, "dialogue", "add entry", "view.php?id=$cm->id", "$item->id");\r
- $n++;\r
- }\r
- }\r
- }\r
- redirect("view.php?id=$cm->id&pane={$_POST['pane']}", get_string("numberofentriesadded", \r
- "dialogue", $n));\r
- }\r
- \r
- /****************** list closed conversations *********************************/\r
- elseif ($action == 'listclosed') {\r
- \r
- print_simple_box( text_to_html($dialogue->intro) , "center");\r
- echo "<br />";\r
- \r
- dialogue_list_closed_conversations($dialogue);\r
- }\r
- \r
- /****************** open conversation ************************************/\r
- elseif ($action == 'openconversation' ) {\r
-\r
- if (empty($_POST['recipientid'])) {\r
- redirect("view.php?id=$cm->id", get_string("nopersonchosen", "dialogue"));\r
- } else {\r
- $recipientid = $_POST['recipientid'];\r
- if (substr($recipientid, 0, 1) == 'g') { // it's a group\r
- $groupid = intval(substr($recipientid, 1));\r
- if ($groupid) { // it's a real group\r
- $recipients = get_records_sql("SELECT u.*\r
- FROM {$CFG->prefix}user u,\r
- {$CFG->prefix}groups_members g\r
- WHERE g.groupid = $groupid and\r
- u.id = g.userid");\r
- } else { // it's all participants\r
- $recipients = get_course_students($course->id);\r
- }\r
- } else {\r
- $recipients[$recipientid] = get_record("user", "id", $recipientid);\r
- }\r
- if ($recipients) {\r
- $n = 0;\r
- foreach ($recipients as $recipient) { \r
- if ($recipient->id == $USER->id) { // teacher could be member of a group\r
- continue;\r
- }\r
- $stripped_text = strip_tags(trim($_POST['firstentry']));\r
- if (!$stripped_text) {\r
- redirect("view.php?id=$cm->id", get_string("notextentered", "dialogue"));\r
- }\r
- unset($conversation);\r
- $conversation->dialogueid = $dialogue->id;\r
- $conversation->userid = $USER->id;\r
- $conversation->recipientid = $recipient->id;\r
- $conversation->lastid = $USER->id; // this USER is adding an entry too\r
- $conversation->timemodified = time();\r
- $conversation->subject = clean_text($_POST['subject']); // may be blank\r
- if (!$conversation->id = insert_record("dialogue_conversations", $conversation)) {\r
- error("Open dialogue: Could not insert dialogue record!");\r
- }\r
- add_to_log($course->id, "dialogue", "open", "view.php?id=$cm->id", "$dialogue->id");\r
-\r
- // now add the entry\r
- unset($entry);\r
- $entry->dialogueid = $dialogue->id;\r
- $entry->conversationid = $conversation->id;\r
- $entry->userid = $USER->id;\r
- $entry->timecreated = time(); \r
- // reverse the dialogue default value\r
- $entry->mailed = !$dialogue->maildefault;\r
- $entry->text = clean_text($_POST['firstentry']);\r
- if (!$entry->id = insert_record("dialogue_entries", $entry)) {\r
- error("Insert Entries: Could not insert dialogue record!");\r
- }\r
- add_to_log($course->id, "dialogue", "add entry", "view.php?id=$cm->id", "$entry->id");\r
- $n++;\r
- }\r
- print_heading(get_string("numberofentriesadded", "dialogue", $n));\r
- } else {\r
- redirect("view.php?id=$cm->id", get_string("noavailablepeople", "dialogue"));\r
- }\r
- if (isset($groupid)) {\r
- if ($groupid) { // a real group\r
- if (!$group = get_record("groups", "id", $groupid)) {\r
- error("Dialogue open conversation: Group not found");\r
- }\r
- redirect("view.php?id=$cm->id", get_string("dialogueopened", "dialogue", $group->name));\r
- } else { // all participants\r
- redirect("view.php?id=$cm->id", get_string("dialogueopened", "dialogue", \r
- get_string("allparticipants")));\r
- }\r
- } else {\r
- if (!$user = get_record("user", "id", $conversation->recipientid)) {\r
- error("Open dialogue: user record not found");\r
- }\r
- redirect("view.php?id=$cm->id", get_string("dialogueopened", "dialogue", fullname($user) ));\r
- }\r
- }\r
- }\r
- \r
-\r
- /****************** print dialogue (allowing new entry)********************/\r
- elseif ($action == 'printdialogue') {\r
- \r
- if (!$conversation = get_record("dialogue_conversations", "id", $_GET['cid'])) {\r
- error("Print Dialogue: can not get conversation record");\r
- }\r
- \r
- print_simple_box( text_to_html($dialogue->intro) , "center");\r
- echo "<br />";\r
- \r
- dialogue_print_conversation($dialogue, $conversation);\r
- }\r
- \r
-\r
- /****************** show dialogues ****************************************/\r
- elseif ($action == 'showdialogues') {\r
- \r
- if (!$conversation = get_record("dialogue_conversations", "id", $_GET['cid'])) {\r
- error("Show Dialogue: can not get conversation record");\r
- }\r
- \r
- print_simple_box( text_to_html($dialogue->intro) , "center");\r
- echo "<br />";\r
- \r
- dialogue_show_conversation($dialogue, $conversation);\r
- dialogue_show_other_conversations($dialogue, $conversation);\r
- }\r
- \r
-\r
- /****************** update subject ****************************************/\r
- elseif ($action == 'updatesubject') {\r
- \r
- if (!$conversation = get_record("dialogue_conversations", "id", $_POST['cid'])) {\r
- error("Update Subject: can not get conversation record");\r
- }\r
- \r
- if (!$_POST['subject']) {\r
- redirect("view.php?id=$cm->id&pane=$_POST[pane]", get_string("nosubject", "dialogue"));\r
- } elseif (!set_field("dialogue_conversations", "subject", clean_text($_POST['subject']), "id", $_POST['cid'])) {\r
- error("Update subject: could not update conversation record");\r
- }\r
- redirect("view.php?id=$cm->id&pane=$_POST[pane]", get_string("subjectadded", "dialogue"));\r
- }\r
- \r
-\r
- /*************** no man's land **************************************/\r
- else {\r
- error("Fatal Error: Unknown Action: ".$action."\n");\r
- }\r
-\r
- print_footer($course);\r
-\r
-?>\r
+<?php // $Id$
+
+/*************************************************
+ ACTIONS handled are:
+
+ closeconversation
+ confirmclose
+ getsubject
+ insertentries
+ openconversation
+ printdialogue
+ showdialogues
+ updatesubject
+
+************************************************/
+
+ require_once("../../config.php");
+ require_once("lib.php");
+ require_once("locallib.php");
+
+ require_variable($id); // Course Module ID
+
+ if (! $cm = get_record("course_modules", "id", $id)) {
+ error("Course Module ID was incorrect");
+ }
+
+ if (! $course = get_record("course", "id", $cm->course)) {
+ error("Course is misconfigured");
+ }
+
+ if (! $dialogue = get_record("dialogue", "id", $cm->instance)) {
+ error("Course module dialogue is incorrect");
+ }
+
+ require_login($course->id);
+
+ // set up some general variables
+ $usehtmleditor = can_use_html_editor();
+
+ $strdialogues = get_string("modulenameplural", "dialogue");
+ $strdialogue = get_string("modulename", "dialogue");
+
+ // ... print the header and...
+ print_header_simple("$dialogue->name", "",
+ "<a href=\"index.php?id=$course->id\">$strdialogues</a> ->
+ <a hre=\"view.php?id=$cm->id\">$dialogue->name</a>",
+ "", "", true);
+
+
+ require_variable($action); // need something to do!
+
+ /************** close conversation ************************************/
+ if ($action == 'closeconversation') {
+ if (empty($_GET['cid'])) {
+ error("Close dialogue: Missing conversation id");
+ }
+ else {
+ $conversationid = $_GET['cid'];
+ }
+ if (!set_field("dialogue_conversations", "closed", 1, "id", $conversationid)) {
+ error("Close dialogue: unable to set closed");
+ }
+ if (!set_field("dialogue_conversations", "lastid", $USER->id, "id", $conversationid)) {
+ error("Close dialogue: unable to set lastid");
+ }
+ $pane=$_GET['pane'];
+
+ add_to_log($course->id, "dialogue", "closed", "view.php?id=$cm->id", "$conversationid");
+ redirect("view.php?id=$cm->id&pane=$pane", get_string("dialogueclosed", "dialogue"));
+ }
+
+
+ /****************** confirm close ************************************/
+ elseif ($action == 'confirmclose' ) {
+
+ if (empty($_GET['cid'])) {
+ error("Confirm Close: conversation id missing");
+ }
+ if (!$conversation = get_record("dialogue_conversations", "id", $_GET['cid'])) {
+ error("Confirm close: cannot get conversation record");
+ }
+ if ($conversation->userid == $USER->id) {
+ if (!$user = get_record("user", "id", $conversation->recipientid)) {
+ error("Confirm Close: cannot get recipient record");
+ }
+ }
+ else {
+ if (!$user = get_record("user", "id", $conversation->userid)) {
+ error("Confirm Close: cannot get user record");
+ }
+ }
+ $pane = $_GET['pane'];
+ notice_yesno(get_string("confirmclosure", "dialogue", fullname($user)),
+ "dialogues.php?action=closeconversation&id=$cm->id&cid=$conversation->id&pane=$pane",
+ "view.php?id=$cm->id&pane=$pane");
+ }
+
+ /****************** get subject ************************************/
+ elseif ($action == 'getsubject' ) {
+
+ if (empty($_GET['cid'])) {
+ error("Confirm Close: conversation id missing");
+ }
+ print_heading(get_string("addsubject", "dialogue"));
+ echo "<form name=\"getsubjectform\" method=\"post\" action=\"dialogues.php\">\n";
+ echo "<input type=\"hidden\" name=\"action\" value=\"updatesubject\"/>\n";
+ echo "<input type=\"hidden\" name=\"id\" value=\"".p($_GET[id])."\"/>\n";
+ echo "<input type=\"hidden\" name=\"cid\" value=\"".p($_GET[cid])."\"/>\n";
+ echo "<input type=\"hidden\" name=\"pane\" value=\"".p($_GET[pane])."\"/>\n";
+ echo "<table align=\"center\" border=\"1\" width=\"60%\">\n";
+ echo "<tr><td align=\"right\"><b>".get_string("subject", "dialogue")."</b></td>";
+ echo "<td><input type=\"text\" size=\"50\" maxsize=\"100\" name=\"subject\"
+ value=\"\" /></td></tr>\n";
+ echo "<tr><td colspan=\"2\" align=\"center\"><input type=\"submit\" value=\"".
+ get_string("addsubject", "dialogue")."\" /></td></tr>\n";
+ echo "</table></form>\n";
+ }
+
+
+ /****************** insert conversation entries ******************************/
+ elseif ($action == 'insertentries' ) {
+
+ $timenow = time();
+ $n = 0;
+ // get all the open conversations for this user
+ if ($conversations = dialogue_get_conversations($dialogue, $USER, "closed = 0")) {
+ foreach ($conversations as $conversation) {
+ $textarea_name = "reply$conversation->id";
+ $stripped_text = '';
+ if (isset($_POST[$textarea_name])) {
+ $stripped_text = strip_tags(trim($_POST[$textarea_name]));
+ }
+ if ($stripped_text) {
+ unset($item);
+ $item->dialogueid = $dialogue->id;
+ $item->conversationid = $conversation->id;
+ $item->userid = $USER->id;
+ $item->timecreated = time();
+ // reverse the dialogue mail default
+ $item->mailed = !$dialogue->maildefault;
+ $item->text = clean_text($_POST[$textarea_name]);
+ if (!$item->id = insert_record("dialogue_entries", $item)) {
+ error("Insert Entries: Could not insert dialogue record!");
+ }
+ if (!set_field("dialogue_conversations", "lastid", $USER->id, "id", $conversation->id)) {
+ error("Insert Dialogue Entries: could not set lastid");
+ }
+ if (!set_field("dialogue_conversations", "timemodified", $timenow, "id",
+ $conversation->id)) {
+ error("Insert Dialogue Entries: could not set lastid");
+ }
+ // reset seenon time
+ if (!set_field("dialogue_conversations", "seenon", 0, "id",
+ $conversation->id)) {
+ error("Insert Dialogue Entries: could not reset seenon");
+ }
+ add_to_log($course->id, "dialogue", "add entry", "view.php?id=$cm->id", "$item->id");
+ $n++;
+ }
+ }
+ }
+ redirect("view.php?id=$cm->id&pane={$_POST['pane']}", get_string("numberofentriesadded",
+ "dialogue", $n));
+ }
+
+ /****************** list closed conversations *********************************/
+ elseif ($action == 'listclosed') {
+
+ print_simple_box( text_to_html($dialogue->intro) , "center");
+ echo "<br />";
+
+ dialogue_list_closed_conversations($dialogue);
+ }
+
+ /****************** open conversation ************************************/
+ elseif ($action == 'openconversation' ) {
+
+ if (empty($_POST['recipientid'])) {
+ redirect("view.php?id=$cm->id", get_string("nopersonchosen", "dialogue"));
+ } else {
+ $recipientid = $_POST['recipientid'];
+ if (substr($recipientid, 0, 1) == 'g') { // it's a group
+ $groupid = intval(substr($recipientid, 1));
+ if ($groupid) { // it's a real group
+ $recipients = get_records_sql("SELECT u.*
+ FROM {$CFG->prefix}user u,
+ {$CFG->prefix}groups_members g
+ WHERE g.groupid = $groupid and
+ u.id = g.userid");
+ } else { // it's all participants
+ $recipients = get_course_students($course->id);
+ }
+ } else {
+ $recipients[$recipientid] = get_record("user", "id", $recipientid);
+ }
+ if ($recipients) {
+ $n = 0;
+ foreach ($recipients as $recipient) {
+ if ($recipient->id == $USER->id) { // teacher could be member of a group
+ continue;
+ }
+ $stripped_text = strip_tags(trim($_POST['firstentry']));
+ if (!$stripped_text) {
+ redirect("view.php?id=$cm->id", get_string("notextentered", "dialogue"));
+ }
+ unset($conversation);
+ $conversation->dialogueid = $dialogue->id;
+ $conversation->userid = $USER->id;
+ $conversation->recipientid = $recipient->id;
+ $conversation->lastid = $USER->id; // this USER is adding an entry too
+ $conversation->timemodified = time();
+ $conversation->subject = clean_text($_POST['subject']); // may be blank
+ if (!$conversation->id = insert_record("dialogue_conversations", $conversation)) {
+ error("Open dialogue: Could not insert dialogue record!");
+ }
+ add_to_log($course->id, "dialogue", "open", "view.php?id=$cm->id", "$dialogue->id");
+
+ // now add the entry
+ unset($entry);
+ $entry->dialogueid = $dialogue->id;
+ $entry->conversationid = $conversation->id;
+ $entry->userid = $USER->id;
+ $entry->timecreated = time();
+ // reverse the dialogue default value
+ $entry->mailed = !$dialogue->maildefault;
+ $entry->text = clean_text($_POST['firstentry']);
+ if (!$entry->id = insert_record("dialogue_entries", $entry)) {
+ error("Insert Entries: Could not insert dialogue record!");
+ }
+ add_to_log($course->id, "dialogue", "add entry", "view.php?id=$cm->id", "$entry->id");
+ $n++;
+ }
+ print_heading(get_string("numberofentriesadded", "dialogue", $n));
+ } else {
+ redirect("view.php?id=$cm->id", get_string("noavailablepeople", "dialogue"));
+ }
+ if (isset($groupid)) {
+ if ($groupid) { // a real group
+ if (!$group = get_record("groups", "id", $groupid)) {
+ error("Dialogue open conversation: Group not found");
+ }
+ redirect("view.php?id=$cm->id", get_string("dialogueopened", "dialogue", $group->name));
+ } else { // all participants
+ redirect("view.php?id=$cm->id", get_string("dialogueopened", "dialogue",
+ get_string("allparticipants")));
+ }
+ } else {
+ if (!$user = get_record("user", "id", $conversation->recipientid)) {
+ error("Open dialogue: user record not found");
+ }
+ redirect("view.php?id=$cm->id", get_string("dialogueopened", "dialogue", fullname($user) ));
+ }
+ }
+ }
+
+
+ /****************** print dialogue (allowing new entry)********************/
+ elseif ($action == 'printdialogue') {
+
+ if (!$conversation = get_record("dialogue_conversations", "id", $_GET['cid'])) {
+ error("Print Dialogue: can not get conversation record");
+ }
+
+ print_simple_box( text_to_html($dialogue->intro) , "center");
+ echo "<br />";
+
+ dialogue_print_conversation($dialogue, $conversation);
+ }
+
+
+ /****************** show dialogues ****************************************/
+ elseif ($action == 'showdialogues') {
+
+ if (!$conversation = get_record("dialogue_conversations", "id", $_GET['cid'])) {
+ error("Show Dialogue: can not get conversation record");
+ }
+
+ print_simple_box( text_to_html($dialogue->intro) , "center");
+ echo "<br />";
+
+ dialogue_show_conversation($dialogue, $conversation);
+ dialogue_show_other_conversations($dialogue, $conversation);
+ }
+
+
+ /****************** update subject ****************************************/
+ elseif ($action == 'updatesubject') {
+
+ if (!$conversation = get_record("dialogue_conversations", "id", $_POST['cid'])) {
+ error("Update Subject: can not get conversation record");
+ }
+
+ if (!$_POST['subject']) {
+ redirect("view.php?id=$cm->id&pane=$_POST[pane]", get_string("nosubject", "dialogue"));
+ } elseif (!set_field("dialogue_conversations", "subject", clean_text($_POST['subject']), "id", $_POST['cid'])) {
+ error("Update subject: could not update conversation record");
+ }
+ redirect("view.php?id=$cm->id&pane=$_POST[pane]", get_string("subjectadded", "dialogue"));
+ }
+
+
+ /*************** no man's land **************************************/
+ else {
+ error("Fatal Error: Unknown Action: ".$action."\n");
+ }
+
+ print_footer($course);
+
+?>
-<?php // $Id$\r
-\r
-/// Library of extra functions for the dialogue module\r
-\r
-// SQL FUNCTIONS ///////////////////////////////////////////////////////////////////\r
-\r
-//////////////////////////////////////////////////////////////////////////////////////\r
-function dialogue_count_all_needing_replies_self($user = '') {\r
-// count [conversations] needing replies [from] self for all dialogues\r
-// function requested by Williams Castillo 17 Oct 2003 \r
- global $USER;\r
- \r
- if ($user) { \r
- return count_records_select("dialogue_conversations", "(userid = $user->id OR \r
- recipientid = $user->id) AND lastid != $user->id AND closed = 0");\r
- } else {\r
- return count_records_select("dialogue_conversations", "(userid = $USER->id OR \r
- recipientid = $USER->id) AND lastid != $USER->id AND closed = 0");\r
- }\r
-}\r
-\r
-\r
-//////////////////////////////////////////////////////////////////////////////////////\r
-function dialogue_count_closed($dialogue, $user) {\r
- \r
- return count_records_select("dialogue_conversations", "dialogueid = $dialogue->id AND \r
- (userid = $user->id OR recipientid = $user->id) AND closed = 1");\r
- }\r
-\r
-\r
-//////////////////////////////////////////////////////////////////////////////////////\r
-function dialogue_count_open($dialogue, $user) {\r
- \r
- return count_records_select("dialogue_conversations", "dialogueid = $dialogue->id AND \r
- (userid = $user->id OR recipientid = $user->id) AND closed = 0");\r
-}\r
-\r
-\r
-//////////////////////////////////////////////////////////////////////////////////////\r
-function dialogue_count_needing_replies_other($dialogue, $user) {\r
-// count [conversations] needing replies [from] other [person] \r
- return count_records_select("dialogue_conversations", "dialogueid = $dialogue->id AND \r
- (userid = $user->id OR recipientid = $user->id) AND lastid = $user->id AND closed = 0");\r
-}\r
-\r
-\r
-//////////////////////////////////////////////////////////////////////////////////////\r
-function dialogue_count_needing_replies_self($dialogue, $user) {\r
-// count [conversations] needing replies [from] self\r
- \r
- return count_records_select("dialogue_conversations", "dialogueid = $dialogue->id AND \r
- (userid = $user->id OR recipientid = $user->id) AND lastid != $user->id AND closed = 0");\r
-}\r
-\r
-\r
-//////////////////////////////////////////////////////////////////////////////////////\r
-function dialogue_get_participants($dialogueid) {\r
-//Returns the users with data in one dialogue\r
-//(users with records in dialogue_conversations, creators and receivers)\r
-\r
- global $CFG;\r
-\r
- //Get conversation's creators\r
- $creators = get_records_sql("SELECT DISTINCT u.*\r
- FROM {$CFG->prefix}user u,\r
- {$CFG->prefix}dialogue_conversations c\r
- WHERE c.dialogueid = '$dialogueid' and\r
- u.id = c.userid");\r
-\r
- //Get conversation's receivers\r
- $receivers = get_records_sql("SELECT DISTINCT u.*\r
- FROM {$CFG->prefix}user u,\r
- {$CFG->prefix}dialogue_conversations c\r
- WHERE c.dialogueid = '$dialogueid' and\r
- u.id = c.recipientid");\r
-\r
- //Add receivers to creators\r
- if ($receivers) {\r
- foreach ($receivers as $receiver) {\r
- $creators[$receiver->id] = $receiver;\r
- }\r
- }\r
-\r
- //Return creators array (it contains an array of unique users, creators and receivers)\r
- return ($creators);\r
-} \r
-\r
-//////////////////////////////////////////////////////////////////////////////////////\r
-function dialogue_get_available_users($dialogue) {\r
-\r
- if (! $course = get_record("course", "id", $dialogue->course)) {\r
- error("Course is misconfigured");\r
- }\r
- switch ($dialogue->dialoguetype) {\r
- case 0 : // teacher to student\r
- if (isteacher($course->id)) {\r
- return dialogue_get_available_students($dialogue);\r
- }\r
- else {\r
- return dialogue_get_available_teachers($dialogue);\r
- }\r
- case 1: // student to student\r
- if (isstudent($course->id)) {\r
- return dialogue_get_available_students($dialogue);\r
- }\r
- else {\r
- return;\r
- }\r
- case 2: // everyone\r
- if ($teachers = dialogue_get_available_teachers($dialogue)) {\r
- foreach ($teachers as $userid=>$name) {\r
- $names[$userid] = $name;\r
- }\r
- $names[-1] = "-------------";\r
- }\r
- if ($students = dialogue_get_available_students($dialogue)) {\r
- foreach ($students as $userid=>$name) {\r
- $names[$userid] = $name;\r
- }\r
- }\r
- if (isset($names)) {\r
- return $names;\r
- }\r
- return;\r
- }\r
-}\r
-\r
- \r
-//////////////////////////////////////////////////////////////////////////////////////\r
-function dialogue_get_available_students($dialogue) {\r
-global $USER;\r
- \r
- if (! $course = get_record("course", "id", $dialogue->course)) {\r
- error("Course is misconfigured");\r
- }\r
- if (! $cm = get_coursemodule_from_instance("dialogue", $dialogue->id, $course->id)) {\r
- error("Course Module ID was incorrect");\r
- }\r
- \r
- $groupid = get_current_group($course->id);\r
- // add current group before list of students if it's the teacher\r
- if (isteacher($course->id) and groupmode($course, $cm)) {\r
- // show teacher their current group\r
- if ($groupid) {\r
- if (!$group = get_record("groups", "id", $groupid)) {\r
- error("Dialogue get available students: group not found");\r
- }\r
- $gnames["g$groupid"] = $group->name;\r
- } else { // all participants\r
- $gnames["g0"] = get_string("allparticipants");\r
- }\r
- $gnames["spacer"] = "------------";\r
- }\r
- // get the students on this course (default sort order)...\r
- if ($users = get_course_students($course->id)) {\r
- foreach ($users as $otheruser) {\r
- // ...exclude self and...\r
- if ($USER->id != $otheruser->id) {\r
- // ...if teacher and groups then exclude students not in the current group\r
- if (isteacher($course->id) and groupmode($course, $cm) and $groupid) {\r
- if (!ismember($groupid, $otheruser->id)) {\r
- continue;\r
- }\r
- }\r
- // ...if student and groupmode is SEPARATEGROUPS then exclude students not in student's group\r
- if (isstudent($course->id) and (groupmode($course, $cm) == SEPARATEGROUPS)) {\r
- if (!ismember($groupid, $otheruser->id)) {\r
- continue;\r
- }\r
- }\r
- // ... and any already in any open conversations unless multiple conversations allowed\r
- if ($dialogue->multipleconversations or count_records_select("dialogue_conversations", \r
- "dialogueid = $dialogue->id AND \r
- ((userid = $USER->id AND recipientid = $otheruser->id) OR \r
- (userid = $otheruser->id AND recipientid = $USER->id)) AND closed = 0") == 0) {\r
- $names[$otheruser->id] = fullname($otheruser);\r
- }\r
- }\r
- }\r
- }\r
- if (isset($gnames)) {\r
- $list = $gnames;\r
- }\r
- if (isset($names)) {\r
- natcasesort($names);\r
- if (isset($list)) {\r
- $list += $names;\r
- } else {\r
- $list = $names;\r
- }\r
- }\r
- if (isset($list)) {\r
- return $list;\r
- } else {\r
- return;\r
- }\r
-}\r
-\r
-\r
-//////////////////////////////////////////////////////////////////////////////////////\r
-function dialogue_get_available_teachers($dialogue) {\r
-global $USER;\r
- \r
- if (! $course = get_record("course", "id", $dialogue->course)) {\r
- error("Course is misconfigured");\r
- }\r
- if (! $cm = get_coursemodule_from_instance("dialogue", $dialogue->id, $course->id)) {\r
- error("Course Module ID was incorrect");\r
- }\r
-\r
- $groupid = get_current_group($course->id);\r
- // get the teachers on this course (default sort order)...\r
- if ($users = get_course_teachers($course->id)) {\r
- // $names[0] = "-----------------------";\r
- foreach ($users as $otheruser) {\r
- // ...exclude self and ...\r
- if ($USER->id != $otheruser->id) {\r
- // ...if groupmode is SEPARATEGROUPS then exclude teachers not in student's group\r
- if ($groupid and (groupmode($course, $cm) == SEPARATEGROUPS)) {\r
- if (!ismember($groupid, $otheruser->id)) {\r
- continue;\r
- }\r
- }\r
- // ...any already in open conversations unless multiple conversations allowed \r
- if ($dialogue->multipleconversations or count_records_select("dialogue_conversations", \r
- "dialogueid = $dialogue->id AND ((userid = $USER->id AND \r
- recipientid = $otheruser->id) OR (userid = $otheruser->id AND \r
- recipientid = $USER->id)) AND closed = 0") == 0) {\r
- $names[$otheruser->id] = fullname($otheruser);\r
- }\r
- }\r
- }\r
- }\r
- if (isset($names)) {\r
- natcasesort($names);\r
- return $names;\r
- }\r
- return;\r
-}\r
-\r
-\r
-\r
-//////////////////////////////////////////////////////////////////////////////////////\r
-function dialogue_get_users_done($dialogue) {\r
- global $CFG;\r
-\r
- // make sure it works on the site course\r
- $select = "s.course = '$dialogue->course' AND";\r
- if ($courseid == SITEID) {\r
- $select = '';\r
- }\r
- if (!$students = get_records_sql("SELECT u.* \r
- FROM {$CFG->prefix}user u, \r
- {$CFG->prefix}user_students s,\r
- {$CFG->prefix}dialogue_entries j\r
- WHERE ($select s.userid = u.id)\r
- AND u.id = j.userid \r
- AND j.dialogue = '$dialogue->id'\r
- ORDER BY j.modified DESC")) {\r
- $students = array();\r
- }\r
- if (!$teachers = get_records_sql("SELECT u.* \r
- FROM {$CFG->prefix}user u, \r
- {$CFG->prefix}user_teachers s,\r
- {$CFG->prefix}dialogue_entries j\r
- WHERE (s.course = '$dialogue->course' AND s.userid = u.id)\r
- AND u.id = j.userid \r
- AND j.dialogue = '$dialogue->id'\r
- ORDER BY j.modified DESC")) {\r
- $teachers = array();\r
- }\r
- return $teachers + $students;\r
- \r
-// The following original version is very inefficient on large sites\r
-// return get_records_sql("SELECT u.* \r
-// FROM {$CFG->prefix}user u, \r
-// {$CFG->prefix}user_students s, \r
-// {$CFG->prefix}user_teachers t, \r
-// {$CFG->prefix}dialogue_entries j\r
-// WHERE ((s.course = '$dialogue->course' AND s.userid = u.id) \r
-// OR (t.course = '$dialogue->course' AND t.userid = u.id))\r
-// AND u.id = j.userid \r
-// AND j.dialogue = '$dialogue->id'\r
-// ORDER BY j.modified DESC");\r
-}\r
-\r
-\r
-// OTHER dialogue FUNCTIONS ///////////////////////////////////////////////////////////////////\r
-\r
-//////////////////////////////////////////////////////////////////////////////////////\r
-function dialogue_list_conversations_closed($dialogue) {\r
-// list the closed for the current user\r
- global $USER;\r
- \r
- if (! $course = get_record("course", "id", $dialogue->course)) {\r
- error("Course is misconfigured");\r
- }\r
- if (! $cm = get_coursemodule_from_instance("dialogue", $dialogue->id, $course->id)) {\r
- error("Course Module ID was incorrect");\r
- }\r
- \r
- if ($conversations = dialogue_get_conversations($dialogue, $USER, "closed = 1")) {\r
- // reorder the conversations by (other) name\r
- foreach ($conversations as $conversation) {\r
- if ($USER->id != $conversation->userid) {\r
- if (!$with = get_record("user", "id", $conversation->userid)) {\r
- error("User's record not found");\r
- }\r
- }\r
- else {\r
- if (!$with = get_record("user", "id", $conversation->recipientid)) {\r
- error("User's record not found");\r
- }\r
- }\r
- $names[$conversation->id] = fullname($with);\r
- }\r
- natcasesort($names);\r
- \r
- print_simple_box_start("center");\r
- $table->head = array (get_string("dialoguewith", "dialogue"), get_string("subject", "dialogue"), \r
- get_string("numberofentries", "dialogue"), get_string("lastentry", "dialogue"), \r
- get_string("status", "dialogue"));\r
- $table->width = "100%";\r
- $table->align = array ("left", "left", "center", "left", "left");\r
- $table->size = array ("*", "*", "*", "*", "*");\r
- $table->cellpadding = 2;\r
- $table->cellspacing = 0;\r
-\r
- foreach ($names as $cid=>$name) {\r
- if (!$conversation = get_record("dialogue_conversations", "id", $cid)) {\r
- error("Closed conversations: could not find conversation record");\r
- }\r
- $total = dialogue_count_entries($dialogue, $conversation);\r
- $byuser = dialogue_count_entries($dialogue, $conversation, $USER);\r
- if ($conversation->closed) {\r
- $status = get_string("closed", "dialogue");\r
- } else {\r
- $status = get_string("open", "dialogue");\r
- }\r
- $table->data[] = array("<a href=\"dialogues.php?id=$cm->id&action=showdialogues&cid=$conversation->id\">".\r
- "$name</a>", clean_text($conversation->subject), $byuser." ".get_string("of", "dialogue")." ".$total,\r
- userdate($conversation->timemodified), $status);\r
- }\r
- print_table($table);\r
- print_simple_box_end();\r
- } \r
-}\r
-\r
-\r
-//////////////////////////////////////////////////////////////////////////////////////\r
-function dialogue_list_conversations_other($dialogue) {\r
-// list the conversations of the current user awaiting response from the other person\r
- global $THEME, $USER;\r
- \r
- if (!$course = get_record("course", "id", $dialogue->course)) {\r
- error("Course is misconfigured");\r
- }\r
- if (!$cm = get_coursemodule_from_instance("dialogue", $dialogue->id, $course->id)) {\r
- error("Course Module ID was incorrect");\r
- }\r
- \r
- $timenow = time();\r
- if ($conversations = dialogue_get_conversations($dialogue, $USER, "lastid = $USER->id AND closed = 0")) {\r
- // reorder the conversations by (other) name\r
- foreach ($conversations as $conversation) {\r
- if ($USER->id != $conversation->userid) {\r
- if (!$with = get_record("user", "id", $conversation->userid)) {\r
- error("User's record not found");\r
- }\r
- }\r
- else {\r
- if (!$with = get_record("user", "id", $conversation->recipientid)) {\r
- error("User's record not found");\r
- }\r
- }\r
- $names[$conversation->id] = fullname($with);\r
- }\r
- natcasesort($names);\r
- \r
- print_simple_box_start("center");\r
- $table->head = array (get_string("dialoguewith", "dialogue"), get_string("subject", "dialogue"), \r
- get_string("numberofentries", "dialogue"), get_string("lastentry", "dialogue"), \r
- get_string("status", "dialogue"));\r
- $table->width = "100%";\r
- $table->align = array ("left", "left", "center", "left", "left");\r
- $table->size = array ("*", "*", "*", "*", "*");\r
- $table->cellpadding = 2;\r
- $table->cellspacing = 0;\r
-\r
- foreach ($names as $cid=>$name) {\r
- if (!$conversation = get_record("dialogue_conversations", "id", $cid)) {\r
- error("Closed conversations: could not find conversation record");\r
- }\r
- $total = dialogue_count_entries($dialogue, $conversation);\r
- $byuser = dialogue_count_entries($dialogue, $conversation, $USER);\r
- if ($conversation->seenon) {\r
- $status = get_string("seen", "dialogue", format_time($timenow - $conversation->seenon));\r
- } else {\r
- $status = get_string("notyetseen", "dialogue");\r
- }\r
- $table->data[] = array("<a href=\"dialogues.php?id=$cm->id&action=printdialogue&cid=$conversation->id\">".\r
- "$name</a>", clean_text($conversation->subject), $byuser." ".get_string("of", "dialogue")." ".$total,\r
- userdate($conversation->timemodified), $status);\r
- }\r
- print_table($table);\r
- print_simple_box_end();\r
- } \r
-}\r
-\r
-\r
-//////////////////////////////////////////////////////////////////////////////////////\r
-function dialogue_list_conversations_self($dialogue) {\r
-// list open conversations of the current user awaiting their reply\r
- global $THEME, $USER;\r
- \r
- if (! $course = get_record("course", "id", $dialogue->course)) {\r
- error("Course is misconfigured");\r
- }\r
- if (! $cm = get_coursemodule_from_instance("dialogue", $dialogue->id, $course->id)) {\r
- error("Course Module ID was incorrect");\r
- }\r
- \r
- // set up some general variables\r
- $usehtmleditor = can_use_html_editor();\r
-\r
- $timenow = time();\r
- $showbutton = false;\r
- \r
- echo "<form name=\"replies\" method=\"post\" action=\"dialogues.php\">\n";\r
- echo "<input type=\"hidden\" name=\"action\" value=\"insertentries\"/>\n";\r
- echo "<input type=\"hidden\" name=\"id\" value=\"$cm->id\" />\n";\r
- echo "<input type=\"hidden\" name=\"pane\" value=\"1\" />\n";\r
-\r
- // list the conversations requiring a resonse from this user in full\r
- if ($conversations = dialogue_get_conversations($dialogue, $USER, "lastid != $USER->id AND closed = 0")) {\r
- $showbutton = true;\r
- print_simple_box_start("center");\r
- foreach ($conversations as $conversation) {\r
- // set seenon if required\r
- if (!$conversation->seenon) {\r
- if (!set_field("dialogue_conversations", "seenon", $timenow, "id", $conversation->id)) {\r
- error("List conversations self: could not set seenon");\r
- }\r
- }\r
- echo "<table align=\"center\" border=\"1\" cellspacing=\"0\" valign=\"top\" cellpadding=\"4\" \r
- width=\"100%\">\n";\r
- echo "<tr><td bgcolor=\"$THEME->cellheading2\" valign=\"top\">\n";\r
- if ($conversation->userid == $USER->id) {\r
- if (!$otheruser = get_record("user", "id", $conversation->recipientid)) {\r
- error("User not found");\r
- }\r
- }\r
- else {\r
- if (!$otheruser = get_record("user", "id", $conversation->userid)) {\r
- error("User not found");\r
- }\r
- }\r
- // print_user_picture($user->id, $course->id, $user->picture);\r
- echo "<b>".get_string("dialoguewith", "dialogue", fullname($otheruser)).\r
- "</b></td>";\r
- echo "<td bgcolor=\"$THEME->cellheading2\"><i>".clean_text($conversation->subject)." </i><br />\n";\r
- echo "<div align=\"right\">\n";\r
- if (!$conversation->subject) {\r
- // conversation does not have a subject, show add subject link\r
- echo "<a href=\"dialogues.php?action=getsubject&id=$cm->id&cid=$conversation->id&pane=2\">".\r
- get_string("addsubject", "dialogue")."</a>\n";\r
- helpbutton("addsubject", get_string("addsubject", "dialogue"), "dialogue");\r
- echo " | ";\r
- }\r
- if (dialogue_count_entries($dialogue, $conversation)) {\r
- echo "<a href=\"dialogues.php?action=confirmclose&id=$cm->id&cid=$conversation->id&pane=1\">".\r
- get_string("close", "dialogue")."</a>\n";\r
- helpbutton("closedialogue", get_string("close", "dialogue"), "dialogue");\r
- }\r
- else {\r
- echo " ";\r
- }\r
- echo "<div></td></tr>";\r
- \r
- if ($entries = get_records_select("dialogue_entries", "conversationid = $conversation->id", \r
- "id")) {\r
- foreach ($entries as $entry) {\r
- if ($entry->userid == $USER->id) {\r
- echo "<tr><td colspan=\"2\" bgcolor=\"#FFFFFF\">\n";\r
- echo text_to_html("<font size=\"1\">".get_string("onyouwrote", "dialogue", \r
- userdate($entry->timecreated)).":</font><br />".clean_text($entry->text));\r
- echo "</td></tr>\n";\r
- }\r
- else {\r
- echo "<tr><td colspan=\"2\" bgcolor=\"$THEME->body\">\n";\r
- echo text_to_html("<font size=\"1\">".get_string("onwrote", "dialogue", \r
- userdate($entry->timecreated)." ".$otheruser->firstname).\r
- ":</font><br />".clean_text($entry->text));\r
- echo "</td></tr>\n";\r
- }\r
- }\r
- }\r
- \r
- echo "<tr><td colspan=\"2\" align=\"center\" valign=\"top\">\n";\r
- if ($entries) {\r
- echo "<i>".get_string("typereply", "dialogue")."</i>\n";\r
- }\r
- else {\r
- echo "<i>".get_string("typefirstentry", "dialogue")."</i>\n";\r
- }\r
- echo "</td></tr>\n";\r
- echo "<tr><td valign=\"top\" align=\"right\">\n";\r
- helpbutton("writing", get_string("helpwriting"), "moodle", true, true);\r
- echo "<br />";\r
- echo "</td><td>\n";\r
- // use a cumbersome name on the textarea is just historical :-) \r
- print_textarea($usehtmleditor, 20, 75, 630, 300, "reply$conversation->id");\r
- echo "</td></tr>";\r
- echo "</table><br />\n";\r
- }\r
- print_simple_box_end();\r
- use_html_editor();\r
- if ($showbutton) {\r
- echo "<hr />\n";\r
- echo "<p align=\"center\"><input type=\"submit\" value=\"".get_string("addmynewentries", "dialogue").\r
- "\"/></p>\n";\r
- }\r
- echo "</form>\n";\r
- }\r
-}\r
-\r
-\r
-//////////////////////////////////////////////////////////////////////////////////////\r
-function dialogue_print_conversation($dialogue, $conversation) {\r
-// print a conversation and allow a new entry\r
- global $THEME, $USER;\r
- \r
- if (! $course = get_record("course", "id", $dialogue->course)) {\r
- error("Course is misconfigured");\r
- }\r
- if (! $cm = get_coursemodule_from_instance("dialogue", $dialogue->id, $course->id)) {\r
- error("Course Module ID was incorrect");\r
- }\r
- \r
- $timenow = time();\r
- $showbutton = false;\r
- \r
- echo "<form name=\"replies\" method=\"post\" action=\"dialogues.php\">\n";\r
- echo "<input type=\"hidden\" name=\"action\" value=\"insertentries\"/>\n";\r
- echo "<input type=\"hidden\" name=\"id\" value=\"$cm->id\" />\n";\r
- echo "<input type=\"hidden\" name=\"pane\" value=\"2\" />\n";\r
-\r
- $showbutton = true;\r
- print_simple_box_start("center", "", $THEME->cellcontent2);\r
- echo "<table align=\"center\" border=\"1\" cellspacing=\"0\" valign=\"top\" cellpadding=\"4\" \r
- width=\"100%\">\n";\r
- echo "<tr><td bgcolor=\"$THEME->cellheading2\" valign=\"top\">\n";\r
- if ($conversation->userid == $USER->id) {\r
- if (!$otheruser = get_record("user", "id", $conversation->recipientid)) {\r
- error("User not found");\r
- }\r
- }\r
- else {\r
- if (!$otheruser = get_record("user", "id", $conversation->userid)) {\r
- error("User not found");\r
- }\r
- }\r
- // print_user_picture($user->id, $course->id, $user->picture);\r
- echo "<b>".get_string("dialoguewith", "dialogue", fullname($otheruser)).\r
- "</b></td>";\r
- echo "<td bgcolor=\"$THEME->cellheading2\"><i>".clean_text($conversation->subject)." </i><br />\n";\r
- echo "<div align=\"right\">\n";\r
- if (!$conversation->subject) {\r
- // conversation does not have a subject, show add subject link\r
- echo "<a href=\"dialogues.php?action=getsubject&id=$cm->id&cid=$conversation->id&pane=2\">".\r
- get_string("addsubject", "dialogue")."</a>\n";\r
- helpbutton("addsubject", get_string("addsubject", "dialogue"), "dialogue");\r
- echo " | ";\r
- }\r
- echo "<a href=\"dialogues.php?action=confirmclose&id=$cm->id&cid=$conversation->id&pane=2\">".\r
- get_string("close", "dialogue")."</a>\n";\r
- helpbutton("closedialogue", get_string("close", "dialogue"), "dialogue");\r
- echo "</div></td></tr>\n";\r
-\r
- if ($entries = get_records_select("dialogue_entries", "conversationid = $conversation->id", "id")) {\r
- foreach ($entries as $entry) {\r
- if ($entry->userid == $USER->id) {\r
- echo "<tr><td colspan=\"2\" bgcolor=\"#FFFFFF\">\n";\r
- echo text_to_html("<font size=\"1\">".get_string("onyouwrote", "dialogue", \r
- userdate($entry->timecreated)).":</font><br />".clean_text($entry->text));\r
- }\r
- else {\r
- echo "<tr><td colspan=\"2\" bgcolor=\"$THEME->body\">\n";\r
- echo text_to_html("<font size=\"1\">".get_string("onwrote", "dialogue", \r
- userdate($entry->timecreated)." ".$otheruser->firstname).":</font><br />".\r
- clean_text($entry->text));\r
- }\r
- }\r
- echo "</td></tr>\n";\r
- }\r
- echo "<tr><td colspan=\"2\" align=\"center\" valign=\"top\"><i>".\r
- get_string("typefollowup", "dialogue")."</i></td></tr>\n";\r
- echo "<tr><td valign=\"top\" align=\"right\">\n";\r
- helpbutton("writing", get_string("helpwriting"), "moodle", true, true);\r
- echo "<br />";\r
- echo "</td><td>\n";\r
- // use a cumbersome name on the textarea for historical reasons :-) \r
- $usehtmleditor = can_use_html_editor();\r
- print_textarea($usehtmleditor, 20, 75, 630, 300, "reply$conversation->id");\r
- use_html_editor();\r
- echo "</td></tr>";\r
- echo "</table><br />\n";\r
- print_simple_box_end();\r
- if ($showbutton) {\r
- echo "<hr />\n";\r
- echo "<br /><input type=\"submit\" value=\"".get_string("addmynewentry", "dialogue")."\" />\n";\r
- }\r
- echo "</form>\n";\r
-}\r
-\r
-\r
-//////////////////////////////////////////////////////////////////////////////////////\r
-function dialogue_print_tabbed_heading($tabs) {\r
-// Prints a tabbed heading where one of the tabs highlighted.\r
-// $tabs is an object with several properties.\r
-// $tabs->names is an array of tab names\r
-// $tabs->urls is an array of links\r
-// $tabs->align is an array of column alignments (defaults to "center")\r
-// $tabs->size is an array of column sizes\r
-// $tabs->wrap is an array of "nowrap"s or nothing\r
-// $tabs->highlight is an index (zero based) of "active" heading .\r
-// $tabs->width is an percentage of the page (defualts to 80%)\r
-// $tabs->cellpadding padding on each cell (defaults to 5)\r
-\r
- global $CFG, $THEME;\r
- \r
- if (isset($tabs->names)) {\r
- foreach ($tabs->names as $key => $name) {\r
- if (!empty($tabs->urls[$key])) {\r
- $url =$tabs->urls[$key];\r
- if ($tabs->highlight == $key) {\r
- $tabcontents[$key] = "<b>$name</b>";\r
- } else {\r
- $tabcontents[$key] = "<a class= \"dimmed\" href=\"$url\"><b>$name</b></a>";\r
- }\r
- } else {\r
- $tabcontents[$key] = "<b>$name</b>";\r
- }\r
- }\r
- }\r
-\r
- if (empty($tabs->width)) {\r
- $tabs->width = "80%";\r
- }\r
-\r
- if (empty($tabs->cellpadding)) {\r
- $tabs->cellpadding = "5";\r
- }\r
-\r
- // print_simple_box_start("center", "$table->width", "#ffffff", 0);\r
- echo "<table width=\"$tabs->width\" border=\"0\" valign=\"top\" align=\"center\" ";\r
- echo " cellpadding=\"$tabs->cellpadding\" cellspacing=\"0\" class=\"generaltable\">\n";\r
-\r
- if (!empty($tabs->names)) {\r
- echo "<tr>";\r
- echo "<td class=\"generaltablecell\">".\r
- "<img width=\"10\" src=\"$CFG->wwwroot/pix/spacer.gif\" alt=\"\" /></td>\n";\r
- foreach ($tabcontents as $key => $tab) {\r
- if (isset($align[$key])) {\r
- $alignment = "align=\"$align[$key]\"";\r
- } else {\r
- $alignment = "align=\"center\"";\r
- }\r
- if (isset($size[$key])) {\r
- $width = "width=\"$size[$key]\"";\r
- } else {\r
- $width = "";\r
- }\r
- if (isset($wrap[$key])) {\r
- $wrapping = "no wrap";\r
- } else {\r
- $wrapping = "";\r
- }\r
- if ($key == $tabs->highlight) {\r
- echo "<td valign=top class=\"generaltabselected\" $alignment $width $wrapping bgcolor=\"$THEME->cellheading2\">$tab</td>\n";\r
- } else {\r
- echo "<td valign=top class=\"generaltab\" $alignment $width $wrapping bgcolor=\"$THEME->cellheading\">$tab</td>\n";\r
- }\r
- echo "<td class=\"generaltablecell\">".\r
- "<img width=\"10\" src=\"$CFG->wwwroot/pix/spacer.gif\" alt=\"\" /></td>\n";\r
- }\r
- echo "</tr>\n";\r
- } else {\r
- echo "<tr><td>No names specified</td></tr>\n";\r
- }\r
- // bottom stripe\r
- $ncells = count($tabs->names)*2 +1;\r
- $height = 2;\r
- echo "<tr><td colspan=\"$ncells\" bgcolor=\"$THEME->cellheading2\">".\r
- "<img height=\"$height\" src=\"$CFG->wwwroot/pix/spacer.gif\" alt=\"\" /></td></tr>\n";\r
- echo "</table>\n";\r
- // print_simple_box_end();\r
-\r
- return true;\r
-}\r
-\r
-\r
-\r
-//////////////////////////////////////////////////////////////////////////////////////\r
-function dialogue_show_conversation($dialogue, $conversation) {\r
- global $THEME, $USER;\r
- \r
- if (! $course = get_record("course", "id", $dialogue->course)) {\r
- error("Course is misconfigured");\r
- }\r
- if (! $cm = get_coursemodule_from_instance("dialogue", $dialogue->id, $course->id)) {\r
- error("Course Module ID was incorrect");\r
- }\r
- \r
- $timenow = time();\r
- print_simple_box_start("center");\r
- echo "<table border=\"1\" cellspacing=\"0\" valign=\"top\" cellpadding=\"4\" width=\"100%\">\n";\r
- \r
- echo "<tr>";\r
- echo "<td bgcolor=\"$THEME->cellheading2\" valign=\"top\">\n";\r
- if ($conversation->userid == $USER->id) {\r
- if (!$otheruser = get_record("user", "id", $conversation->recipientid)) {\r
- error("User not found");\r
- }\r
- }\r
- else {\r
- if (!$otheruser = get_record("user", "id", $conversation->userid)) {\r
- error("User not found");\r
- }\r
- }\r
- // print_user_picture($user->id, $course->id, $user->picture);\r
- echo "<b>".get_string("dialoguewith", "dialogue", fullname($otheruser)).\r
- "</b></td>";\r
- echo "<td bgcolor=\"$THEME->cellheading2\" valign=\"top\"><i>".clean_text($conversation->subject)." </i></td></tr>";\r
-\r
- if ($entries = get_records_select("dialogue_entries", "conversationid = $conversation->id", "id")) {\r
- foreach ($entries as $entry) {\r
- if ($entry->userid == $USER->id) {\r
- echo "<tr><td colspan=\"2\" bgcolor=\"#FFFFFF\">\n";\r
- echo text_to_html("<font size=\"1\">".get_string("onyouwrote", "dialogue", \r
- userdate($entry->timecreated)).\r
- ":</font><br />".clean_text($entry->text));\r
- echo "</td></tr>\n";\r
- }\r
- else {\r
- echo "<tr><td colspan=\"2\" bgcolor=\"$THEME->body\">\n";\r
- echo text_to_html("<font size=\"1\">".get_string("onwrote", "dialogue", \r
- userdate($entry->timecreated)." ".$otheruser->firstname).":</font><br />".clean_text($entry->text));\r
- echo "</td></tr>\n";\r
- }\r
- }\r
- }\r
- echo "</table><br />\n";\r
- print_simple_box_end();\r
- print_continue("view.php?id=$cm->id&pane=3");\r
-}\r
-\r
-\r
-//////////////////////////////////////////////////////////////////////////////////////\r
-function dialogue_show_other_conversations($dialogue, $conversation) {\r
-// prints the other CLOSED conversations for this pair of users\r
- global $THEME;\r
- \r
- if (! $course = get_record("course", "id", $dialogue->course)) {\r
- error("Course is misconfigured");\r
- }\r
- if (! $cm = get_coursemodule_from_instance("dialogue", $dialogue->id, $course->id)) {\r
- error("Course Module ID was incorrect");\r
- }\r
- \r
- if (!$user = get_record("user", "id", $conversation->userid)) {\r
- error("User not found");\r
- }\r
- if (!$otheruser = get_record("user", "id", $conversation->recipientid)) {\r
- error("User not found");\r
- }\r
- \r
- if ($conversations = get_records_select("dialogue_conversations", "dialogueid = $dialogue->id AND \r
- ((userid = $user->id AND recipientid = $otheruser->id) OR (userid = $otheruser->id AND \r
- recipientid = $user->id)) AND closed = 1", "timemodified DESC")) {\r
- if (count($conversations) > 1) {\r
- $timenow = time();\r
- foreach ($conversations as $otherconversation) {\r
- if ($conversation->id != $otherconversation->id) {\r
- // for this conversation work out which is the other user\r
- if ($otherconversation->userid == $user->id) {\r
- if (!$otheruser = get_record("user", "id", $otherconversation->recipientid)) {\r
- error("Show other conversations: could not get user record");\r
- }\r
- }\r
- else {\r
- if (!$otheruser = get_record("user", "id", $otherconversation->userid)) {\r
- error("Show other conversations: could not get user record");\r
- }\r
- } \r
- print_simple_box_start("center");\r
- echo "<table align=\"center\" border=\"1\" cellspacing=\"0\" valign=\"top\" cellpadding=\"4\"\r
- width=\"100%\">\n";\r
- echo "<tr>";\r
- echo "<td bgcolor=\"$THEME->cellheading2\" valign=\"top\">\n";\r
- // print_user_picture($otheruser->id, $course->id, $otheruser->picture);\r
- echo "<b>".get_string("dialoguewith", "dialogue", \r
- fullname($otheruser))."</b></td>";\r
- echo "<td bgcolor=\"$THEME->cellheading2\" valign=\"top\"><i>$otherconversation->subject </i></td></tr>";\r
- if ($entries = get_records_select("dialogue_entries", \r
- "conversationid = $otherconversation->id", "id")) {\r
- foreach ($entries as $entry) {\r
- if ($entry->userid == $user->id) {\r
- echo "<tr><td colspan=\"2\" bgcolor=\"#FFFFFF\">\n";\r
- echo text_to_html("<font size=\"1\">".get_string("onyouwrote", "dialogue", \r
- userdate($entry->timecreated)).":</font><br />".clean_text($entry->text));\r
- echo "</td></tr>\n";\r
- }\r
- else {\r
- echo "<tr><td colspan=\"2\" bgcolor=\"$THEME->body\">\n";\r
- echo text_to_html("<font size=\"1\">".get_string("onwrote", "dialogue", \r
- userdate($entry->timecreated)." ".$otheruser->firstname).\r
- ":</font><br />".clean_text($entry->text));\r
- echo "</td></tr>\n";\r
- }\r
- }\r
- }\r
- \r
- echo "</table><br />\n";\r
- print_simple_box_end();\r
- }\r
- }\r
- print_continue("view.php?id=$cm->id&pane=3");\r
- }\r
- }\r
-}\r
-\r
-\r
-?>\r
+<?php // $Id$
+
+/// Library of extra functions for the dialogue module
+
+// SQL FUNCTIONS ///////////////////////////////////////////////////////////////////
+
+//////////////////////////////////////////////////////////////////////////////////////
+function dialogue_count_all_needing_replies_self($user = '') {
+// count [conversations] needing replies [from] self for all dialogues
+// function requested by Williams Castillo 17 Oct 2003
+ global $USER;
+
+ if ($user) {
+ return count_records_select("dialogue_conversations", "(userid = $user->id OR
+ recipientid = $user->id) AND lastid != $user->id AND closed = 0");
+ } else {
+ return count_records_select("dialogue_conversations", "(userid = $USER->id OR
+ recipientid = $USER->id) AND lastid != $USER->id AND closed = 0");
+ }
+}
+
+
+//////////////////////////////////////////////////////////////////////////////////////
+function dialogue_count_closed($dialogue, $user) {
+
+ return count_records_select("dialogue_conversations", "dialogueid = $dialogue->id AND
+ (userid = $user->id OR recipientid = $user->id) AND closed = 1");
+ }
+
+
+//////////////////////////////////////////////////////////////////////////////////////
+function dialogue_count_open($dialogue, $user) {
+
+ return count_records_select("dialogue_conversations", "dialogueid = $dialogue->id AND
+ (userid = $user->id OR recipientid = $user->id) AND closed = 0");
+}
+
+
+//////////////////////////////////////////////////////////////////////////////////////
+function dialogue_count_needing_replies_other($dialogue, $user) {
+// count [conversations] needing replies [from] other [person]
+ return count_records_select("dialogue_conversations", "dialogueid = $dialogue->id AND
+ (userid = $user->id OR recipientid = $user->id) AND lastid = $user->id AND closed = 0");
+}
+
+
+//////////////////////////////////////////////////////////////////////////////////////
+function dialogue_count_needing_replies_self($dialogue, $user) {
+// count [conversations] needing replies [from] self
+
+ return count_records_select("dialogue_conversations", "dialogueid = $dialogue->id AND
+ (userid = $user->id OR recipientid = $user->id) AND lastid != $user->id AND closed = 0");
+}
+
+
+//////////////////////////////////////////////////////////////////////////////////////
+function dialogue_get_participants($dialogueid) {
+//Returns the users with data in one dialogue
+//(users with records in dialogue_conversations, creators and receivers)
+
+ global $CFG;
+
+ //Get conversation's creators
+ $creators = get_records_sql("SELECT DISTINCT u.*
+ FROM {$CFG->prefix}user u,
+ {$CFG->prefix}dialogue_conversations c
+ WHERE c.dialogueid = '$dialogueid' and
+ u.id = c.userid");
+
+ //Get conversation's receivers
+ $receivers = get_records_sql("SELECT DISTINCT u.*
+ FROM {$CFG->prefix}user u,
+ {$CFG->prefix}dialogue_conversations c
+ WHERE c.dialogueid = '$dialogueid' and
+ u.id = c.recipientid");
+
+ //Add receivers to creators
+ if ($receivers) {
+ foreach ($receivers as $receiver) {
+ $creators[$receiver->id] = $receiver;
+ }
+ }
+
+ //Return creators array (it contains an array of unique users, creators and receivers)
+ return ($creators);
+}
+
+//////////////////////////////////////////////////////////////////////////////////////
+function dialogue_get_available_users($dialogue) {
+
+ if (! $course = get_record("course", "id", $dialogue->course)) {
+ error("Course is misconfigured");
+ }
+ switch ($dialogue->dialoguetype) {
+ case 0 : // teacher to student
+ if (isteacher($course->id)) {
+ return dialogue_get_available_students($dialogue);
+ }
+ else {
+ return dialogue_get_available_teachers($dialogue);
+ }
+ case 1: // student to student
+ if (isstudent($course->id)) {
+ return dialogue_get_available_students($dialogue);
+ }
+ else {
+ return;
+ }
+ case 2: // everyone
+ if ($teachers = dialogue_get_available_teachers($dialogue)) {
+ foreach ($teachers as $userid=>$name) {
+ $names[$userid] = $name;
+ }
+ $names[-1] = "-------------";
+ }
+ if ($students = dialogue_get_available_students($dialogue)) {
+ foreach ($students as $userid=>$name) {
+ $names[$userid] = $name;
+ }
+ }
+ if (isset($names)) {
+ return $names;
+ }
+ return;
+ }
+}
+
+
+//////////////////////////////////////////////////////////////////////////////////////
+function dialogue_get_available_students($dialogue) {
+global $USER;
+
+ if (! $course = get_record("course", "id", $dialogue->course)) {
+ error("Course is misconfigured");
+ }
+ if (! $cm = get_coursemodule_from_instance("dialogue", $dialogue->id, $course->id)) {
+ error("Course Module ID was incorrect");
+ }
+
+ $groupid = get_current_group($course->id);
+ // add current group before list of students if it's the teacher
+ if (isteacher($course->id) and groupmode($course, $cm)) {
+ // show teacher their current group
+ if ($groupid) {
+ if (!$group = get_record("groups", "id", $groupid)) {
+ error("Dialogue get available students: group not found");
+ }
+ $gnames["g$groupid"] = $group->name;
+ } else { // all participants
+ $gnames["g0"] = get_string("allparticipants");
+ }
+ $gnames["spacer"] = "------------";
+ }
+ // get the students on this course (default sort order)...
+ if ($users = get_course_students($course->id)) {
+ foreach ($users as $otheruser) {
+ // ...exclude self and...
+ if ($USER->id != $otheruser->id) {
+ // ...if teacher and groups then exclude students not in the current group
+ if (isteacher($course->id) and groupmode($course, $cm) and $groupid) {
+ if (!ismember($groupid, $otheruser->id)) {
+ continue;
+ }
+ }
+ // ...if student and groupmode is SEPARATEGROUPS then exclude students not in student's group
+ if (isstudent($course->id) and (groupmode($course, $cm) == SEPARATEGROUPS)) {
+ if (!ismember($groupid, $otheruser->id)) {
+ continue;
+ }
+ }
+ // ... and any already in any open conversations unless multiple conversations allowed
+ if ($dialogue->multipleconversations or count_records_select("dialogue_conversations",
+ "dialogueid = $dialogue->id AND
+ ((userid = $USER->id AND recipientid = $otheruser->id) OR
+ (userid = $otheruser->id AND recipientid = $USER->id)) AND closed = 0") == 0) {
+ $names[$otheruser->id] = fullname($otheruser);
+ }
+ }
+ }
+ }
+ if (isset($gnames)) {
+ $list = $gnames;
+ }
+ if (isset($names)) {
+ natcasesort($names);
+ if (isset($list)) {
+ $list += $names;
+ } else {
+ $list = $names;
+ }
+ }
+ if (isset($list)) {
+ return $list;
+ } else {
+ return;
+ }
+}
+
+
+//////////////////////////////////////////////////////////////////////////////////////
+function dialogue_get_available_teachers($dialogue) {
+global $USER;
+
+ if (! $course = get_record("course", "id", $dialogue->course)) {
+ error("Course is misconfigured");
+ }
+ if (! $cm = get_coursemodule_from_instance("dialogue", $dialogue->id, $course->id)) {
+ error("Course Module ID was incorrect");
+ }
+
+ $groupid = get_current_group($course->id);
+ // get the teachers on this course (default sort order)...
+ if ($users = get_course_teachers($course->id)) {
+ // $names[0] = "-----------------------";
+ foreach ($users as $otheruser) {
+ // ...exclude self and ...
+ if ($USER->id != $otheruser->id) {
+ // ...if groupmode is SEPARATEGROUPS then exclude teachers not in student's group
+ if ($groupid and (groupmode($course, $cm) == SEPARATEGROUPS)) {
+ if (!ismember($groupid, $otheruser->id)) {
+ continue;
+ }
+ }
+ // ...any already in open conversations unless multiple conversations allowed
+ if ($dialogue->multipleconversations or count_records_select("dialogue_conversations",
+ "dialogueid = $dialogue->id AND ((userid = $USER->id AND
+ recipientid = $otheruser->id) OR (userid = $otheruser->id AND
+ recipientid = $USER->id)) AND closed = 0") == 0) {
+ $names[$otheruser->id] = fullname($otheruser);
+ }
+ }
+ }
+ }
+ if (isset($names)) {
+ natcasesort($names);
+ return $names;
+ }
+ return;
+}
+
+
+
+//////////////////////////////////////////////////////////////////////////////////////
+function dialogue_get_users_done($dialogue) {
+ global $CFG;
+
+ // make sure it works on the site course
+ $select = "s.course = '$dialogue->course' AND";
+ if ($courseid == SITEID) {
+ $select = '';
+ }
+ if (!$students = get_records_sql("SELECT u.*
+ FROM {$CFG->prefix}user u,
+ {$CFG->prefix}user_students s,
+ {$CFG->prefix}dialogue_entries j
+ WHERE ($select s.userid = u.id)
+ AND u.id = j.userid
+ AND j.dialogue = '$dialogue->id'
+ ORDER BY j.modified DESC")) {
+ $students = array();
+ }
+ if (!$teachers = get_records_sql("SELECT u.*
+ FROM {$CFG->prefix}user u,
+ {$CFG->prefix}user_teachers s,
+ {$CFG->prefix}dialogue_entries j
+ WHERE (s.course = '$dialogue->course' AND s.userid = u.id)
+ AND u.id = j.userid
+ AND j.dialogue = '$dialogue->id'
+ ORDER BY j.modified DESC")) {
+ $teachers = array();
+ }
+ return $teachers + $students;
+
+// The following original version is very inefficient on large sites
+// return get_records_sql("SELECT u.*
+// FROM {$CFG->prefix}user u,
+// {$CFG->prefix}user_students s,
+// {$CFG->prefix}user_teachers t,
+// {$CFG->prefix}dialogue_entries j
+// WHERE ((s.course = '$dialogue->course' AND s.userid = u.id)
+// OR (t.course = '$dialogue->course' AND t.userid = u.id))
+// AND u.id = j.userid
+// AND j.dialogue = '$dialogue->id'
+// ORDER BY j.modified DESC");
+}
+
+
+// OTHER dialogue FUNCTIONS ///////////////////////////////////////////////////////////////////
+
+//////////////////////////////////////////////////////////////////////////////////////
+function dialogue_list_conversations_closed($dialogue) {
+// list the closed for the current user
+ global $USER;
+
+ if (! $course = get_record("course", "id", $dialogue->course)) {
+ error("Course is misconfigured");
+ }
+ if (! $cm = get_coursemodule_from_instance("dialogue", $dialogue->id, $course->id)) {
+ error("Course Module ID was incorrect");
+ }
+
+ if ($conversations = dialogue_get_conversations($dialogue, $USER, "closed = 1")) {
+ // reorder the conversations by (other) name
+ foreach ($conversations as $conversation) {
+ if ($USER->id != $conversation->userid) {
+ if (!$with = get_record("user", "id", $conversation->userid)) {
+ error("User's record not found");
+ }
+ }
+ else {
+ if (!$with = get_record("user", "id", $conversation->recipientid)) {
+ error("User's record not found");
+ }
+ }
+ $names[$conversation->id] = fullname($with);
+ }
+ natcasesort($names);
+
+ print_simple_box_start("center");
+ $table->head = array (get_string("dialoguewith", "dialogue"), get_string("subject", "dialogue"),
+ get_string("numberofentries", "dialogue"), get_string("lastentry", "dialogue"),
+ get_string("status", "dialogue"));
+ $table->width = "100%";
+ $table->align = array ("left", "left", "center", "left", "left");
+ $table->size = array ("*", "*", "*", "*", "*");
+ $table->cellpadding = 2;
+ $table->cellspacing = 0;
+
+ foreach ($names as $cid=>$name) {
+ if (!$conversation = get_record("dialogue_conversations", "id", $cid)) {
+ error("Closed conversations: could not find conversation record");
+ }
+ $total = dialogue_count_entries($dialogue, $conversation);
+ $byuser = dialogue_count_entries($dialogue, $conversation, $USER);
+ if ($conversation->closed) {
+ $status = get_string("closed", "dialogue");
+ } else {
+ $status = get_string("open", "dialogue");
+ }
+ $table->data[] = array("<a href=\"dialogues.php?id=$cm->id&action=showdialogues&cid=$conversation->id\">".
+ "$name</a>", clean_text($conversation->subject), $byuser." ".get_string("of", "dialogue")." ".$total,
+ userdate($conversation->timemodified), $status);
+ }
+ print_table($table);
+ print_simple_box_end();
+ }
+}
+
+
+//////////////////////////////////////////////////////////////////////////////////////
+function dialogue_list_conversations_other($dialogue) {
+// list the conversations of the current user awaiting response from the other person
+ global $THEME, $USER;
+
+ if (!$course = get_record("course", "id", $dialogue->course)) {
+ error("Course is misconfigured");
+ }
+ if (!$cm = get_coursemodule_from_instance("dialogue", $dialogue->id, $course->id)) {
+ error("Course Module ID was incorrect");
+ }
+
+ $timenow = time();
+ if ($conversations = dialogue_get_conversations($dialogue, $USER, "lastid = $USER->id AND closed = 0")) {
+ // reorder the conversations by (other) name
+ foreach ($conversations as $conversation) {
+ if ($USER->id != $conversation->userid) {
+ if (!$with = get_record("user", "id", $conversation->userid)) {
+ error("User's record not found");
+ }
+ }
+ else {
+ if (!$with = get_record("user", "id", $conversation->recipientid)) {
+ error("User's record not found");
+ }
+ }
+ $names[$conversation->id] = fullname($with);
+ }
+ natcasesort($names);
+
+ print_simple_box_start("center");
+ $table->head = array (get_string("dialoguewith", "dialogue"), get_string("subject", "dialogue"),
+ get_string("numberofentries", "dialogue"), get_string("lastentry", "dialogue"),
+ get_string("status", "dialogue"));
+ $table->width = "100%";
+ $table->align = array ("left", "left", "center", "left", "left");
+ $table->size = array ("*", "*", "*", "*", "*");
+ $table->cellpadding = 2;
+ $table->cellspacing = 0;
+
+ foreach ($names as $cid=>$name) {
+ if (!$conversation = get_record("dialogue_conversations", "id", $cid)) {
+ error("Closed conversations: could not find conversation record");
+ }
+ $total = dialogue_count_entries($dialogue, $conversation);
+ $byuser = dialogue_count_entries($dialogue, $conversation, $USER);
+ if ($conversation->seenon) {
+ $status = get_string("seen", "dialogue", format_time($timenow - $conversation->seenon));
+ } else {
+ $status = get_string("notyetseen", "dialogue");
+ }
+ $table->data[] = array("<a href=\"dialogues.php?id=$cm->id&action=printdialogue&cid=$conversation->id\">".
+ "$name</a>", clean_text($conversation->subject), $byuser." ".get_string("of", "dialogue")." ".$total,
+ userdate($conversation->timemodified), $status);
+ }
+ print_table($table);
+ print_simple_box_end();
+ }
+}
+
+
+//////////////////////////////////////////////////////////////////////////////////////
+function dialogue_list_conversations_self($dialogue) {
+// list open conversations of the current user awaiting their reply
+ global $THEME, $USER;
+
+ if (! $course = get_record("course", "id", $dialogue->course)) {
+ error("Course is misconfigured");
+ }
+ if (! $cm = get_coursemodule_from_instance("dialogue", $dialogue->id, $course->id)) {
+ error("Course Module ID was incorrect");
+ }
+
+ // set up some general variables
+ $usehtmleditor = can_use_html_editor();
+
+ $timenow = time();
+ $showbutton = false;
+
+ echo "<form name=\"replies\" method=\"post\" action=\"dialogues.php\">\n";
+ echo "<input type=\"hidden\" name=\"action\" value=\"insertentries\"/>\n";
+ echo "<input type=\"hidden\" name=\"id\" value=\"$cm->id\" />\n";
+ echo "<input type=\"hidden\" name=\"pane\" value=\"1\" />\n";
+
+ // list the conversations requiring a resonse from this user in full
+ if ($conversations = dialogue_get_conversations($dialogue, $USER, "lastid != $USER->id AND closed = 0")) {
+ $showbutton = true;
+ print_simple_box_start("center");
+ foreach ($conversations as $conversation) {
+ // set seenon if required
+ if (!$conversation->seenon) {
+ if (!set_field("dialogue_conversations", "seenon", $timenow, "id", $conversation->id)) {
+ error("List conversations self: could not set seenon");
+ }
+ }
+ echo "<table align=\"center\" border=\"1\" cellspacing=\"0\" valign=\"top\" cellpadding=\"4\"
+ width=\"100%\">\n";
+ echo "<tr><td bgcolor=\"$THEME->cellheading2\" valign=\"top\">\n";
+ if ($conversation->userid == $USER->id) {
+ if (!$otheruser = get_record("user", "id", $conversation->recipientid)) {
+ error("User not found");
+ }
+ }
+ else {
+ if (!$otheruser = get_record("user", "id", $conversation->userid)) {
+ error("User not found");
+ }
+ }
+ // print_user_picture($user->id, $course->id, $user->picture);
+ echo "<b>".get_string("dialoguewith", "dialogue", fullname($otheruser)).
+ "</b></td>";
+ echo "<td bgcolor=\"$THEME->cellheading2\"><i>".clean_text($conversation->subject)." </i><br />\n";
+ echo "<div align=\"right\">\n";
+ if (!$conversation->subject) {
+ // conversation does not have a subject, show add subject link
+ echo "<a href=\"dialogues.php?action=getsubject&id=$cm->id&cid=$conversation->id&pane=2\">".
+ get_string("addsubject", "dialogue")."</a>\n";
+ helpbutton("addsubject", get_string("addsubject", "dialogue"), "dialogue");
+ echo " | ";
+ }
+ if (dialogue_count_entries($dialogue, $conversation)) {
+ echo "<a href=\"dialogues.php?action=confirmclose&id=$cm->id&cid=$conversation->id&pane=1\">".
+ get_string("close", "dialogue")."</a>\n";
+ helpbutton("closedialogue", get_string("close", "dialogue"), "dialogue");
+ }
+ else {
+ echo " ";
+ }
+ echo "<div></td></tr>";
+
+ if ($entries = get_records_select("dialogue_entries", "conversationid = $conversation->id",
+ "id")) {
+ foreach ($entries as $entry) {
+ if ($entry->userid == $USER->id) {
+ echo "<tr><td colspan=\"2\" bgcolor=\"#FFFFFF\">\n";
+ echo text_to_html("<font size=\"1\">".get_string("onyouwrote", "dialogue",
+ userdate($entry->timecreated)).":</font><br />".clean_text($entry->text));
+ echo "</td></tr>\n";
+ }
+ else {
+ echo "<tr><td colspan=\"2\" bgcolor=\"$THEME->body\">\n";
+ echo text_to_html("<font size=\"1\">".get_string("onwrote", "dialogue",
+ userdate($entry->timecreated)." ".$otheruser->firstname).
+ ":</font><br />".clean_text($entry->text));
+ echo "</td></tr>\n";
+ }
+ }
+ }
+
+ echo "<tr><td colspan=\"2\" align=\"center\" valign=\"top\">\n";
+ if ($entries) {
+ echo "<i>".get_string("typereply", "dialogue")."</i>\n";
+ }
+ else {
+ echo "<i>".get_string("typefirstentry", "dialogue")."</i>\n";
+ }
+ echo "</td></tr>\n";
+ echo "<tr><td valign=\"top\" align=\"right\">\n";
+ helpbutton("writing", get_string("helpwriting"), "moodle", true, true);
+ echo "<br />";
+ echo "</td><td>\n";
+ // use a cumbersome name on the textarea is just historical :-)
+ print_textarea($usehtmleditor, 20, 75, 630, 300, "reply$conversation->id");
+ echo "</td></tr>";
+ echo "</table><br />\n";
+ }
+ print_simple_box_end();
+ use_html_editor();
+ if ($showbutton) {
+ echo "<hr />\n";
+ echo "<p align=\"center\"><input type=\"submit\" value=\"".get_string("addmynewentries", "dialogue").
+ "\"/></p>\n";
+ }
+ echo "</form>\n";
+ }
+}
+
+
+//////////////////////////////////////////////////////////////////////////////////////
+function dialogue_print_conversation($dialogue, $conversation) {
+// print a conversation and allow a new entry
+ global $THEME, $USER;
+
+ if (! $course = get_record("course", "id", $dialogue->course)) {
+ error("Course is misconfigured");
+ }
+ if (! $cm = get_coursemodule_from_instance("dialogue", $dialogue->id, $course->id)) {
+ error("Course Module ID was incorrect");
+ }
+
+ $timenow = time();
+ $showbutton = false;
+
+ echo "<form name=\"replies\" method=\"post\" action=\"dialogues.php\">\n";
+ echo "<input type=\"hidden\" name=\"action\" value=\"insertentries\"/>\n";
+ echo "<input type=\"hidden\" name=\"id\" value=\"$cm->id\" />\n";
+ echo "<input type=\"hidden\" name=\"pane\" value=\"2\" />\n";
+
+ $showbutton = true;
+ print_simple_box_start("center", "", $THEME->cellcontent2);
+ echo "<table align=\"center\" border=\"1\" cellspacing=\"0\" valign=\"top\" cellpadding=\"4\"
+ width=\"100%\">\n";
+ echo "<tr><td bgcolor=\"$THEME->cellheading2\" valign=\"top\">\n";
+ if ($conversation->userid == $USER->id) {
+ if (!$otheruser = get_record("user", "id", $conversation->recipientid)) {
+ error("User not found");
+ }
+ }
+ else {
+ if (!$otheruser = get_record("user", "id", $conversation->userid)) {
+ error("User not found");
+ }
+ }
+ // print_user_picture($user->id, $course->id, $user->picture);
+ echo "<b>".get_string("dialoguewith", "dialogue", fullname($otheruser)).
+ "</b></td>";
+ echo "<td bgcolor=\"$THEME->cellheading2\"><i>".clean_text($conversation->subject)." </i><br />\n";
+ echo "<div align=\"right\">\n";
+ if (!$conversation->subject) {
+ // conversation does not have a subject, show add subject link
+ echo "<a href=\"dialogues.php?action=getsubject&id=$cm->id&cid=$conversation->id&pane=2\">".
+ get_string("addsubject", "dialogue")."</a>\n";
+ helpbutton("addsubject", get_string("addsubject", "dialogue"), "dialogue");
+ echo " | ";
+ }
+ echo "<a href=\"dialogues.php?action=confirmclose&id=$cm->id&cid=$conversation->id&pane=2\">".
+ get_string("close", "dialogue")."</a>\n";
+ helpbutton("closedialogue", get_string("close", "dialogue"), "dialogue");
+ echo "</div></td></tr>\n";
+
+ if ($entries = get_records_select("dialogue_entries", "conversationid = $conversation->id", "id")) {
+ foreach ($entries as $entry) {
+ if ($entry->userid == $USER->id) {
+ echo "<tr><td colspan=\"2\" bgcolor=\"#FFFFFF\">\n";
+ echo text_to_html("<font size=\"1\">".get_string("onyouwrote", "dialogue",
+ userdate($entry->timecreated)).":</font><br />".clean_text($entry->text));
+ }
+ else {
+ echo "<tr><td colspan=\"2\" bgcolor=\"$THEME->body\">\n";
+ echo text_to_html("<font size=\"1\">".get_string("onwrote", "dialogue",
+ userdate($entry->timecreated)." ".$otheruser->firstname).":</font><br />".
+ clean_text($entry->text));
+ }
+ }
+ echo "</td></tr>\n";
+ }
+ echo "<tr><td colspan=\"2\" align=\"center\" valign=\"top\"><i>".
+ get_string("typefollowup", "dialogue")."</i></td></tr>\n";
+ echo "<tr><td valign=\"top\" align=\"right\">\n";
+ helpbutton("writing", get_string("helpwriting"), "moodle", true, true);
+ echo "<br />";
+ echo "</td><td>\n";
+ // use a cumbersome name on the textarea for historical reasons :-)
+ $usehtmleditor = can_use_html_editor();
+ print_textarea($usehtmleditor, 20, 75, 630, 300, "reply$conversation->id");
+ use_html_editor();
+ echo "</td></tr>";
+ echo "</table><br />\n";
+ print_simple_box_end();
+ if ($showbutton) {
+ echo "<hr />\n";
+ echo "<br /><input type=\"submit\" value=\"".get_string("addmynewentry", "dialogue")."\" />\n";
+ }
+ echo "</form>\n";
+}
+
+
+//////////////////////////////////////////////////////////////////////////////////////
+function dialogue_print_tabbed_heading($tabs) {
+// Prints a tabbed heading where one of the tabs highlighted.
+// $tabs is an object with several properties.
+// $tabs->names is an array of tab names
+// $tabs->urls is an array of links
+// $tabs->align is an array of column alignments (defaults to "center")
+// $tabs->size is an array of column sizes
+// $tabs->wrap is an array of "nowrap"s or nothing
+// $tabs->highlight is an index (zero based) of "active" heading .
+// $tabs->width is an percentage of the page (defualts to 80%)
+// $tabs->cellpadding padding on each cell (defaults to 5)
+
+ global $CFG, $THEME;
+
+ if (isset($tabs->names)) {
+ foreach ($tabs->names as $key => $name) {
+ if (!empty($tabs->urls[$key])) {
+ $url =$tabs->urls[$key];
+ if ($tabs->highlight == $key) {
+ $tabcontents[$key] = "<b>$name</b>";
+ } else {
+ $tabcontents[$key] = "<a class= \"dimmed\" href=\"$url\"><b>$name</b></a>";
+ }
+ } else {
+ $tabcontents[$key] = "<b>$name</b>";
+ }
+ }
+ }
+
+ if (empty($tabs->width)) {
+ $tabs->width = "80%";
+ }
+
+ if (empty($tabs->cellpadding)) {
+ $tabs->cellpadding = "5";
+ }
+
+ // print_simple_box_start("center", "$table->width", "#ffffff", 0);
+ echo "<table width=\"$tabs->width\" border=\"0\" valign=\"top\" align=\"center\" ";
+ echo " cellpadding=\"$tabs->cellpadding\" cellspacing=\"0\" class=\"generaltable\">\n";
+
+ if (!empty($tabs->names)) {
+ echo "<tr>";
+ echo "<td class=\"generaltablecell\">".
+ "<img width=\"10\" src=\"$CFG->wwwroot/pix/spacer.gif\" alt=\"\" /></td>\n";
+ foreach ($tabcontents as $key => $tab) {
+ if (isset($align[$key])) {
+ $alignment = "align=\"$align[$key]\"";
+ } else {
+ $alignment = "align=\"center\"";
+ }
+ if (isset($size[$key])) {
+ $width = "width=\"$size[$key]\"";
+ } else {
+ $width = "";
+ }
+ if (isset($wrap[$key])) {
+ $wrapping = "no wrap";
+ } else {
+ $wrapping = "";
+ }
+ if ($key == $tabs->highlight) {
+ echo "<td valign=top class=\"generaltabselected\" $alignment $width $wrapping bgcolor=\"$THEME->cellheading2\">$tab</td>\n";
+ } else {
+ echo "<td valign=top class=\"generaltab\" $alignment $width $wrapping bgcolor=\"$THEME->cellheading\">$tab</td>\n";
+ }
+ echo "<td class=\"generaltablecell\">".
+ "<img width=\"10\" src=\"$CFG->wwwroot/pix/spacer.gif\" alt=\"\" /></td>\n";
+ }
+ echo "</tr>\n";
+ } else {
+ echo "<tr><td>No names specified</td></tr>\n";
+ }
+ // bottom stripe
+ $ncells = count($tabs->names)*2 +1;
+ $height = 2;
+ echo "<tr><td colspan=\"$ncells\" bgcolor=\"$THEME->cellheading2\">".
+ "<img height=\"$height\" src=\"$CFG->wwwroot/pix/spacer.gif\" alt=\"\" /></td></tr>\n";
+ echo "</table>\n";
+ // print_simple_box_end();
+
+ return true;
+}
+
+
+
+//////////////////////////////////////////////////////////////////////////////////////
+function dialogue_show_conversation($dialogue, $conversation) {
+ global $THEME, $USER;
+
+ if (! $course = get_record("course", "id", $dialogue->course)) {
+ error("Course is misconfigured");
+ }
+ if (! $cm = get_coursemodule_from_instance("dialogue", $dialogue->id, $course->id)) {
+ error("Course Module ID was incorrect");
+ }
+
+ $timenow = time();
+ print_simple_box_start("center");
+ echo "<table border=\"1\" cellspacing=\"0\" valign=\"top\" cellpadding=\"4\" width=\"100%\">\n";
+
+ echo "<tr>";
+ echo "<td bgcolor=\"$THEME->cellheading2\" valign=\"top\">\n";
+ if ($conversation->userid == $USER->id) {
+ if (!$otheruser = get_record("user", "id", $conversation->recipientid)) {
+ error("User not found");
+ }
+ }
+ else {
+ if (!$otheruser = get_record("user", "id", $conversation->userid)) {
+ error("User not found");
+ }
+ }
+ // print_user_picture($user->id, $course->id, $user->picture);
+ echo "<b>".get_string("dialoguewith", "dialogue", fullname($otheruser)).
+ "</b></td>";
+ echo "<td bgcolor=\"$THEME->cellheading2\" valign=\"top\"><i>".clean_text($conversation->subject)." </i></td></tr>";
+
+ if ($entries = get_records_select("dialogue_entries", "conversationid = $conversation->id", "id")) {
+ foreach ($entries as $entry) {
+ if ($entry->userid == $USER->id) {
+ echo "<tr><td colspan=\"2\" bgcolor=\"#FFFFFF\">\n";
+ echo text_to_html("<font size=\"1\">".get_string("onyouwrote", "dialogue",
+ userdate($entry->timecreated)).
+ ":</font><br />".clean_text($entry->text));
+ echo "</td></tr>\n";
+ }
+ else {
+ echo "<tr><td colspan=\"2\" bgcolor=\"$THEME->body\">\n";
+ echo text_to_html("<font size=\"1\">".get_string("onwrote", "dialogue",
+ userdate($entry->timecreated)." ".$otheruser->firstname).":</font><br />".clean_text($entry->text));
+ echo "</td></tr>\n";
+ }
+ }
+ }
+ echo "</table><br />\n";
+ print_simple_box_end();
+ print_continue("view.php?id=$cm->id&pane=3");
+}
+
+
+//////////////////////////////////////////////////////////////////////////////////////
+function dialogue_show_other_conversations($dialogue, $conversation) {
+// prints the other CLOSED conversations for this pair of users
+ global $THEME;
+
+ if (! $course = get_record("course", "id", $dialogue->course)) {
+ error("Course is misconfigured");
+ }
+ if (! $cm = get_coursemodule_from_instance("dialogue", $dialogue->id, $course->id)) {
+ error("Course Module ID was incorrect");
+ }
+
+ if (!$user = get_record("user", "id", $conversation->userid)) {
+ error("User not found");
+ }
+ if (!$otheruser = get_record("user", "id", $conversation->recipientid)) {
+ error("User not found");
+ }
+
+ if ($conversations = get_records_select("dialogue_conversations", "dialogueid = $dialogue->id AND
+ ((userid = $user->id AND recipientid = $otheruser->id) OR (userid = $otheruser->id AND
+ recipientid = $user->id)) AND closed = 1", "timemodified DESC")) {
+ if (count($conversations) > 1) {
+ $timenow = time();
+ foreach ($conversations as $otherconversation) {
+ if ($conversation->id != $otherconversation->id) {
+ // for this conversation work out which is the other user
+ if ($otherconversation->userid == $user->id) {
+ if (!$otheruser = get_record("user", "id", $otherconversation->recipientid)) {
+ error("Show other conversations: could not get user record");
+ }
+ }
+ else {
+ if (!$otheruser = get_record("user", "id", $otherconversation->userid)) {
+ error("Show other conversations: could not get user record");
+ }
+ }
+ print_simple_box_start("center");
+ echo "<table align=\"center\" border=\"1\" cellspacing=\"0\" valign=\"top\" cellpadding=\"4\"
+ width=\"100%\">\n";
+ echo "<tr>";
+ echo "<td bgcolor=\"$THEME->cellheading2\" valign=\"top\">\n";
+ // print_user_picture($otheruser->id, $course->id, $otheruser->picture);
+ echo "<b>".get_string("dialoguewith", "dialogue",
+ fullname($otheruser))."</b></td>";
+ echo "<td bgcolor=\"$THEME->cellheading2\" valign=\"top\"><i>$otherconversation->subject </i></td></tr>";
+ if ($entries = get_records_select("dialogue_entries",
+ "conversationid = $otherconversation->id", "id")) {
+ foreach ($entries as $entry) {
+ if ($entry->userid == $user->id) {
+ echo "<tr><td colspan=\"2\" bgcolor=\"#FFFFFF\">\n";
+ echo text_to_html("<font size=\"1\">".get_string("onyouwrote", "dialogue",
+ userdate($entry->timecreated)).":</font><br />".clean_text($entry->text));
+ echo "</td></tr>\n";
+ }
+ else {
+ echo "<tr><td colspan=\"2\" bgcolor=\"$THEME->body\">\n";
+ echo text_to_html("<font size=\"1\">".get_string("onwrote", "dialogue",
+ userdate($entry->timecreated)." ".$otheruser->firstname).
+ ":</font><br />".clean_text($entry->text));
+ echo "</td></tr>\n";
+ }
+ }
+ }
+
+ echo "</table><br />\n";
+ print_simple_box_end();
+ }
+ }
+ print_continue("view.php?id=$cm->id&pane=3");
+ }
+ }
+}
+
+
+?>
projects / moodle.git / commitdiff