';
+ $this->content->items[] = ''.
+ get_string('composeemail', 'block_quickmail').''.' ';
- /// link to history log
- $this->content->items[] = "wwwroot/blocks/quickmail/emaillog.php?id={$this->course->id}&instanceid={$this->instance->id}\">".
- get_string('history', 'block_quickmail').'';
+
+ if ($this->check_permission('block/quickmail:cansend', CONTEXT_COURSE, $COURSE)) {
+ /// link to history log
$this->content->icons[] = '
';
+ $this->content->items[] = ''.
+ get_string('emailhistory', 'block_quickmail').'';
+
+ }
+
+ }
+ /// link to config for teachers
+ if ($this->check_permission('block/quickmail:canconfig', CONTEXT_COURSE, $COURSE)) {
+ //$this->content->footer = "wwwroot/course/view.php?id={$this->instance->pageid}&instanceid={$this->instance->id}&sesskey=$USER->sesskey&blockaction=config\">".
+ $this->content->footer = ''.
+ get_string('settings').'...';
+ }
+
return $this->content;
}
-
+
/**
- * Loads the course
+ * Allows the block to be configurable at an instance level.
*
- * @return void
+ * @return boolean
+ * @author Mark Nielsen
**/
- function specialization() {
- global $COURSE;
-
- $this->course = $COURSE;
+ function instance_allow_config() {
+ return false;
}
-
+
/**
- * Cleanup the history
+ * New validation method checks by role capability
*
- * @return boolean
- **/
- function instance_delete() {
- return delete_records('block_quickmail_log', 'courseid', $this->course->id);
+ */
+ function check_permission($action, $context_constant, $course) {
+ switch ($context_constant) {
+ case CONTEXT_COURSE:
+ $context = get_context_instance ($context_constant, $course->id);
+ break;
+ case CONTEXT_BLOCK:
+ $context = get_context_instance ($context_constant, $this->instance->id);
+ default:
+ return false;
+ }
+ return has_capability($action, $context);
}
/**
- * Set defaults for new instances
+ * Special validation method for allowing student to use quickmail
*
- * @return boolean
- **/
- function instance_create() {
- $this->config = new stdClass;
- $this->config->groupmode = $this->course->groupmode;
- $pinned = (!isset($this->instance->pageid));
- return $this->instance_config_commit($pinned);
- }
+ */
+ function allow_students_to_email($userid) {
+ global $CFG;
+
+ if (!$this->config->allowstudents) {
+ return false;
+ }
+ $sql = "SELECT COUNT(*)
+ FROM {$CFG->prefix}role_assignments ra,
+ {$CFG->prefix}role r
+ WHERE r.id = ra.roleid
+ AND r.shortname = 'student'
+ AND ra.userid = {$userid}";
+
+ return (count_records_sql($sql) ? true : false);
+ }
+
/**
- * Allows the block to be configurable at an instance level.
+ * Get the groupmode of Quickmail. This function pays
+ * attention to the course group mode force.
*
- * @return boolean
+ * @return int The group mode of the block
+ * @author Mark Nielsen
**/
- function instance_allow_config() {
- return true;
+ function groupmode() {
+ $this->load_course();
+
+ if ($this->course->groupmodeforce) {
+ return $this->course->groupmode;
+ } else {
+ return $this->config->groupmode;
+ }
}
+
/**
- * Check to make sure that the current user is allowed to use Quickmail.
+ * Loads default config data when config is empty (that way we know it exists).
*
- * @return boolean True for access / False for denied
+ * Defaults:
+ * group mode = course group mode
+ * allow student access = yes
+ * @return void
+ * @author Mark Nielsen
+ * @todo Make a global config so that admins can set the defaults (default for student (yes/no) default for groupmode (select a groupmode or use the courses groupmode)) NOTE: make sure email.php and emaillog.php use the global config settings
**/
- function check_permission() {
- return has_capability('block/quickmail:cansend', get_context_instance(CONTEXT_BLOCK, $this->instance->id));
+ function load_defaults() {
+ if (empty($this->config)) {
+ /// blank config
+ global $CFG;
+ $this->load_course();
+
+ $defaults = new stdClass;
+ $defaults->groupmode = $this->course->groupmode;
+ $defaults->allowstudents = 0;
+
+ //Student is a default role selection
+ $student = get_record('role', 'shortname', 'student');
+
+ $defaults->roleselection[$student->shortname] = $student->name;
+
+ $this->instance_config_save($defaults);
+ }
}
+
+ /**
+ Convenience method to retrieve the configured role selections
+ */
+ function grab_roles() {
+ return $this->config->roleselection;
+ }
+
/**
- * Get the groupmode of Quickmail. This function pays
- * attention to the course group mode force.
+ * Loads the course record into $this->course.
*
- * @return int The group mode of the block
+ * This function first checks to make sure that
+ * the course is not already loaded first. If not,
+ * then grab it from the database
+ *
+ * @return void
+ * @author Mark Nielsen
**/
- function groupmode() {
- return groupmode($this->course, $this->config);
+ function load_course() {
+ if (empty($this->course)) {
+ $this->course = get_record('course', 'id', $this->instance->pageid);
+ }
}
}
+
?>
Index: plugins/blocks/quickmail/styles.php
===================================================================
RCS file: /cvsroot/moodle/contrib/plugins/blocks/quickmail/styles.php,v
retrieving revision 1.4
diff -u -r1.4 styles.php
--- plugins/blocks/quickmail/styles.php 2 Mar 2007 03:06:53 -0000 1.4
+++ plugins/blocks/quickmail/styles.php 9 Apr 2009 20:42:46 -0000
@@ -1,5 +1,5 @@
/***
-*** General Table Styles
+ General Table Styles
***/
.blocks-quickmail .generaltable .r0 {
@@ -11,27 +11,29 @@
}
/***
-*** Flexible Table Styles (emaillog.php)
+ Flexible Table Styles (emaillog.php)
***/
body#blocks-quickmail-emaillog table#emaillog .header {
- text-align: left;
+ text-align: left;
}
body#blocks-quickmail-emaillog table#emaillog .header .commands {
display: inline;
}
-body#blocks-quickmail-emaillog table#emaillog td {
- border-left-width: 1px;
- border-right-width: 1px;
- border-left-style: solid;
- border-right-style: solid;
- vertical-align: bottom;
- border-color: #DDDDDD;
+body#blocks-quickmail-emaillog table#emaillog td
+{
+ border-left-width: 1px;
+ border-right-width: 1px;
+ border-left-style: solid;
+ border-right-style: solid;
+ vertical-align: bottom;
+ border-color: #DDDDDD;
}
body#blocks-quickmail-emaillog table#emaillog .header,
-body#blocks-quickmail-emaillog table#emaillog .cell {
- padding: 4px;
+body#blocks-quickmail-emaillog table#emaillog .cell
+{
+ padding: 4px;
}
\ No newline at end of file
Index: plugins/blocks/quickmail/emaillog.php
===================================================================
RCS file: /cvsroot/moodle/contrib/plugins/blocks/quickmail/emaillog.php,v
retrieving revision 1.14
diff -u -r1.14 emaillog.php
--- plugins/blocks/quickmail/emaillog.php 30 Aug 2007 17:33:48 -0000 1.14
+++ plugins/blocks/quickmail/emaillog.php 9 Apr 2009 20:42:46 -0000
@@ -1,54 +1,67 @@
-libdir.'/blocklib.php');
+ require_once($CFG->dirroot.'/blocks/moodleblock.class.php');
require_once($CFG->libdir.'/tablelib.php');
+ require_once('block_quickmail.php');
+ require_login();
+
$id = required_param('id', PARAM_INT); // course id
$action = optional_param('action', '', PARAM_ALPHA);
$instanceid = optional_param('instanceid', 0, PARAM_INT);
- $instance = new stdClass;
-
- if (!$course = get_record('course', 'id', $id)) {
+ $quickmail = new block_quickmail();
+ $instance = new stdClass;
+
+ if (! $course = get_record('course', 'id', $id)) {
error('Course ID was incorrect');
}
- require_login($course->id);
-
- if ($instanceid) {
- $instance = get_record('block_instance', 'id', $instanceid);
- } else {
- if ($quickmailblock = get_record('block', 'name', 'quickmail')) {
- $instance = get_record('block_instance', 'blockid', $quickmailblock->id, 'pageid', $course->id);
+ $quickmailresult = get_record('block', 'name', 'quickmail');
+ if ($instanceid && $quickmailresult) {
+ $instance = get_record('block_instance', 'id', $instanceid, 'blockid', $quickmailresult->id);
+ if (!$instance){
+ $instance = get_record('block_pinned', 'id', $instanceid, 'blockid', $quickmailresult->id);
}
- }
+ }
/// This block of code ensures that Quickmail will run
/// whether it is in the course or not
if (empty($instance)) {
- if (has_capability('block/quickmail:cansend', get_context_instance(CONTEXT_BLOCK, $instanceid))) {
- $haspermission = true;
- } else {
+ if (isGuest()) {
$haspermission = false;
+ } else {
+ $haspermission = true;
}
} else {
// create a quickmail block instance
- $quickmail = block_instance('quickmail', $instance);
- $haspermission = $quickmail->check_permission();
+ $quickmail->_load_instance($instance);
+ $quickmail->load_defaults();
+
+ $haspermission = $quickmail->check_permission('block/quickmail:cansend', CONTEXT_COURSE, $course);
}
- if (!$haspermission) {
+ if (!$haspermission && !is_siteadmin($USER->id)) {
error('Sorry, you do not have the correct permissions to use Quickmail.');
}
@@ -75,7 +88,7 @@
/// define table columns, headers, and base url
$table->define_columns($tablecolumns);
$table->define_headers($tableheaders);
- $table->define_baseurl($CFG->wwwroot.'/blocks/quickmail/emaillog.php?id='.$course->id.'&instanceid='.$instanceid);
+ $table->define_baseurl($CFG->wwwroot.'/blocks/quickmail/emaillog.php?id='.$course->id.'&instanceid='.$instance->id);
/// table settings
$table->sortable(true, 'timesent', SORT_DESC);
@@ -97,80 +110,82 @@
$table->setup();
/// SQL
- $sql = "SELECT *
- FROM {$CFG->prefix}block_quickmail_log
- WHERE courseid = $course->id
- AND userid = $USER->id ";
+ $selectfrom = "SELECT * FROM {$CFG->prefix}block_quickmail_log ";
+ $where = "WHERE courseid = $course->id AND userid = $USER->id ";
- if ($table->get_sql_where()) {
- $sql .= 'AND '.$table->get_sql_where();
+ if($table->get_sql_where()) {
+ $where .= 'AND '.$table->get_sql_where();
}
- $sql .= ' ORDER BY '. $table->get_sql_sort();
-
+ $sort = ' ORDER BY '. $table->get_sql_sort();
+
/// set page size
$total = count_records('block_quickmail_log', 'courseid', $course->id, 'userid', $USER->id);
$table->pagesize(10, $total);
- if ($pastemails = get_records_sql($sql, $table->get_page_start(), $table->get_page_size())) {
+ if($table->get_page_start() !== '' && $table->get_page_size() !== '') {
+ $limitfrom = $table->get_page_start();
+ $limitnum = $table->get_page_size();
+ } else {
+ $limit = '';
+ }
+
+ if ($pastemails = get_records_sql($selectfrom.$where.$sort,$limitfrom,$limitnum)) {
+
foreach ($pastemails as $pastemail) {
$table->add_data( array(userdate($pastemail->timesent),
- s($pastemail->subject),
- format_string($pastemail->attachment, true),
- "id&instanceid=$instanceid&emailid=$pastemail->id&action=view\">".
- "'. + "id&instanceid=$instance->id\">".get_string("composenew", "block_quickmail").' '; + if (isset($pastemails) and !empty($pastemails)) { + echo "| id&instanceid=$instance->id&sesskey=".$USER->sesskey."&action=dump\">".get_string('clearhistory', 'block_quickmail').''; } + echo '
'; - print_footer(); -?> \ No newline at end of file + print_footer(); +?> Index: plugins/blocks/quickmail/email.html =================================================================== RCS file: /cvsroot/moodle/contrib/plugins/blocks/quickmail/email.html,v retrieving revision 1.13 diff -u -r1.13 email.html --- plugins/blocks/quickmail/email.html 2 Mar 2007 03:06:53 -0000 1.13 +++ plugins/blocks/quickmail/email.html 9 Apr 2009 20:42:46 -0000 @@ -1,98 +1,312 @@ - - - + + + + + + + + + Index: plugins/blocks/quickmail/email.php =================================================================== RCS file: /cvsroot/moodle/contrib/plugins/blocks/quickmail/email.php,v retrieving revision 1.20 diff -u -r1.20 email.php --- plugins/blocks/quickmail/email.php 18 Mar 2009 01:09:12 -0000 1.20 +++ plugins/blocks/quickmail/email.php 9 Apr 2009 20:42:46 -0000 @@ -1,380 +1,598 @@ -libdir.'/blocklib.php'); - - $id = required_param('id', PARAM_INT); // course ID - $instanceid = optional_param('instanceid', 0, PARAM_INT); - $action = optional_param('action', '', PARAM_ALPHA); - - $instance = new stdClass; - - if (!$course = get_record('course', 'id', $id)) { - error('Course ID was incorrect'); - } - - require_login($course->id); - $context = get_context_instance(CONTEXT_COURSE, $course->id); - - if ($instanceid) { - $instance = get_record('block_instance', 'id', $instanceid); - } else { - if ($quickmailblock = get_record('block', 'name', 'quickmail')) { - $instance = get_record('block_instance', 'blockid', $quickmailblock->id, 'pageid', $course->id); - } - } - -/// This block of code ensures that Quickmail will run -/// whether it is in the course or not - if (empty($instance)) { - $groupmode = groupmode($course); - if (has_capability('block/quickmail:cansend', get_context_instance(CONTEXT_BLOCK, $instanceid))) { - $haspermission = true; - } else { - $haspermission = false; - } - } else { - // create a quickmail block instance - $quickmail = block_instance('quickmail', $instance); - - $groupmode = $quickmail->groupmode(); - $haspermission = $quickmail->check_permission(); - } - - if (!$haspermission) { - error('Sorry, you do not have the correct permissions to use Quickmail.'); - } - - if (!$courseusers = get_users_by_capability($context, 'moodle/course:view', 'u.*', 'u.lastname, u.firstname', '', '', '', '', false)) { - error('No course users found to email'); - } - - if ($action == 'view') { - // viewing an old email. Hitting the db and puting it into the object $form - $emailid = required_param('emailid', PARAM_INT); - $form = get_record('block_quickmail_log', 'id', $emailid); - $form->mailto = explode(',', $form->mailto); // convert mailto back to an array - - } else if ($form = data_submitted()) { // data was submitted to be mailed - confirm_sesskey(); - - if (!empty($form->cancel)) { - // cancel button was hit... - redirect("$CFG->wwwroot/course/view.php?id=$course->id"); - } - - // prepare variables for email - $form->subject = stripslashes($form->subject); - $form->subject = clean_param(strip_tags($form->subject, '| '.implode(' | ', $row).' |
' . "\n";
+ $mail->SMTPDebug = true;
+ }
+ $mail->Host = $CFG->smtphosts; // specify main and backup servers
+
+ if ($CFG->smtpuser) { // Use SMTP authentication
+ $mail->SMTPAuth = true;
+ $mail->Username = $CFG->smtpuser;
+ $mail->Password = $CFG->smtppass;
+ }
+ }
+
+ $supportuser = generate_email_supportuser();
+
+
+ // make up an email address for handling bounces
+ if (!empty($CFG->handlebounces)) {
+ $modargs = 'B'.base64_encode(pack('V',$user->id)).substr(md5($user->email),0,16);
+ $mail->Sender = generate_email_processing_address(0,$modargs);
+ } else {
+ $mail->Sender = $supportuser->email;
+ }
+
+ if (is_string($from)) { // So we can pass whatever we want if there is need
+ $mail->From = $CFG->noreplyaddress;
+ $mail->FromName = $from;
+ } else if ($usetrueaddress and $from->maildisplay) {
+ $mail->From = $from->email;
+ $mail->FromName = fullname($from);
+ } else {
+ $mail->From = $from->email;
+ $mail->FromName = fullname($from);
+ if (empty($replyto)) {
+ $mail->AddReplyTo($CFG->noreplyaddress,get_string('noreplyname'));
+ }
+ }
+
+ if (!empty($replyto)) {
+ $mail->AddReplyTo($replyto,$replytoname);
+ }
+
+ $mail->Subject = substr(stripslashes($subject), 0, 900);
+
+ $mail->AddAddress($user->email, fullname($user) );
+
+ $mail->WordWrap = 79; // set word wrap
+
+ if (!empty($from->customheaders)) { // Add custom headers
+ if (is_array($from->customheaders)) {
+ foreach ($from->customheaders as $customheader) {
+ $mail->AddCustomHeader($customheader);
+ }
+ } else {
+ $mail->AddCustomHeader($from->customheaders);
+ }
+ }
+
+ if (!empty($from->priority)) {
+ $mail->Priority = $from->priority;
+ }
+
+ if ($messagehtml && $user->mailformat == 1) { // Don't ever send HTML to users who don't want it
+ $mail->IsHTML(true);
+ $mail->Encoding = 'quoted-printable'; // Encoding to use
+ $mail->Body = $messagehtml;
+ $mail->AltBody = "\n$messagetext\n";
+ } else {
+ $mail->IsHTML(false);
+ $mail->Body = "\n$messagetext\n";
+ }
+
+ if ($attachment) {
+ foreach ($attachment as $attachname => $attachvalue) {
+ if (ereg( "\\.\\." ,$attachvalue )) { // Security check for ".." in dir path
+ $mail->AddAddress($supportuser->email, fullname($supportuser, true) );
+ $mail->AddStringAttachment('Error in attachment. User attempted to attach a filename with a unsafe name.', 'error.txt', '8bit', 'text/plain');
+ } else {
+ require_once($CFG->libdir.'/filelib.php');
+ $mimetype = mimeinfo('type', $attachname);
+ $mail->AddAttachment($CFG->dataroot .'/'. $attachvalue, $attachname, 'base64', $mimetype);
+ }
+
+ }
+ }
+
+
+ /// If we are running under Unicode and sitemailcharset or allowusermailcharset are set, convert the email
+ /// encoding to the specified one
+ if ((!empty($CFG->sitemailcharset) || !empty($CFG->allowusermailcharset))) {
+ /// Set it to site mail charset
+ $charset = $CFG->sitemailcharset;
+ /// Overwrite it with the user mail charset
+ if (!empty($CFG->allowusermailcharset)) {
+ if ($useremailcharset = get_user_preferences('mailcharset', '0', $user->id)) {
+ $charset = $useremailcharset;
+ }
+ }
+ /// If it has changed, convert all the necessary strings
+ $charsets = get_list_of_charsets();
+ unset($charsets['UTF-8']);
+ if (in_array($charset, $charsets)) {
+ /// Save the new mail charset
+ $mail->CharSet = $charset;
+ /// And convert some strings
+ $mail->FromName = $textlib->convert($mail->FromName, 'utf-8', $mail->CharSet); //From Name
+ foreach ($mail->ReplyTo as $key => $rt) { //ReplyTo Names
+ $mail->ReplyTo[$key][1] = $textlib->convert($rt, 'utf-8', $mail->CharSet);
+ }
+ $mail->Subject = $textlib->convert($mail->Subject, 'utf-8', $mail->CharSet); //Subject
+ foreach ($mail->to as $key => $to) {
+ $mail->to[$key][1] = $textlib->convert($to, 'utf-8', $mail->CharSet); //To Names
+ }
+ $mail->Body = $textlib->convert($mail->Body, 'utf-8', $mail->CharSet); //Body
+ $mail->AltBody = $textlib->convert($mail->AltBody, 'utf-8', $mail->CharSet); //Subject
+ }
+ }
+
+ if ($mail->Send()) {
+ set_send_count($user);
+ $mail->IsSMTP(); // use SMTP directly
+ if (!empty($CFG->debugsmtp)) {
+ echo '';
+ }
+ return true;
+ } else {
+ mtrace('ERROR: '. $mail->ErrorInfo);
+ add_to_log(SITEID, 'library', 'mailer', $FULLME, 'ERROR: '. $mail->ErrorInfo);
+ if (!empty($CFG->debugsmtp)) {
+ echo '';
+ }
+ return false;
+ }
+ }
+
+?>
Index: plugins/blocks/quickmail/changes.txt
===================================================================
RCS file: plugins/blocks/quickmail/changes.txt
diff -N plugins/blocks/quickmail/changes.txt
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ plugins/blocks/quickmail/changes.txt 1 Jan 1970 00:00:00 -0000
@@ -0,0 +1,30 @@
+CHANGES
+=======
+
+Version 2.5.1 (released on Feb 18, 2008)
+
+(Feb 12, 2008)
+ - Added javascript for multiple attachments; also added support in the code
+
+(Feb 5, 2008)
+ - Added a filter for selection by roles. Gave the user the ability to select whether or not they wish to receive receipts
+
+(Jan 15, 2008)
+ - Added support to select by "Groups" or "Sections" of people
+
+Changes made by Philip Cali (pcali1 at lsu dot edu)
+
+Version 2.0.3 (released on Sep 18, 2007)
+----------------------------------------
+
+(Sep 18, 2007)
+ - Added some more language packs from the original quickmail and fix some issues in the /lang
+
+(Jul 24, 2007)
+ - Minor fixed the < and > (arrows) to use $THEME->larrow and $THEME->rarrow (contributed by Cliff Tham)
+
+(Jul 05, 2007)
+ - Fixed for some browser compatibility issues such as Safari. Problem is in selection.js where it reference listbox elements as selectedList.item(i). Safari doesn't support the "item" property and requires use of the "options" property, as in selectedList.options.item(i) or selectedList.options[i]. Thanks for Slobodan Jovcic pointed this out.
+
+Maintained by Wen-Hao Chuang (enwen at sfsu dot edu)
+
Index: plugins/blocks/quickmail/config_form.php
===================================================================
RCS file: plugins/blocks/quickmail/config_form.php
diff -N plugins/blocks/quickmail/config_form.php
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ plugins/blocks/quickmail/config_form.php 1 Jan 1970 00:00:00 -0000
@@ -0,0 +1,51 @@
+libdir . '/formslib.php');
+
+define('STUDENT_SELECT', 'allowstudents');
+define('ROLE_SELECT', 'roleselection');
+define('COURSE_ID', 'id');
+define('INSTANCE_ID', 'instanceid');
+
+class config_form extends moodleform {
+
+ function definition() {
+ global $CFG, $USER;
+
+ $form=&$this->_form;
+
+ /*original select*/
+ $student_select = array(0 => get_string('no'), 1=>get_string('yes'));
+ $form->addElement('select', STUDENT_SELECT, get_string('allowstudents', 'block_quickmail'), $student_select);
+
+
+ $form->addElement('static', 'static_role', get_string('select_roles', 'block_quickmail'), '');
+
+ $roles = get_records('role');
+ $role_select = array();
+ foreach ($roles as $role) {
+ $form->addElement('checkbox', ROLE_SELECT. ':'. $role->shortname, '', $role->name);
+ }
+
+ //hidden fields needed to process the form
+ $form->addElement('hidden', COURSE_ID, '');
+ $form->addElement('hidden', INSTANCE_ID, '');
+
+ $buttonarray = array();
+ $buttonarray[] = &$form->createElement('submit', 'submitbutton',
+ get_string('submit', 'block_quickmail'));
+ $buttonarray[] = &$form->createElement('cancel');
+ $form->addGroup($buttonarray, 'buttonarr', '', array(' '), false);
+ $form->closeHeaderBefore('buttonarr');
+ }
+}
+
+?>
Index: plugins/blocks/quickmail/selection.js
===================================================================
RCS file: plugins/blocks/quickmail/selection.js
diff -N plugins/blocks/quickmail/selection.js
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ plugins/blocks/quickmail/selection.js 1 Jan 1970 00:00:00 -0000
@@ -0,0 +1,275 @@
+/**
+ * selection.js - Defines functions used by email.html in quickmail package
+ *
+ * Edited by: Philip Cali
+ * 2008/02/15 15:03:00
+ *
+ * @author: Bibek Bhattarai and Wen Hao Chuang
+ * 2007/03/29 09:00:00
+ * @package quickmailv2
+ **/
+
+//Global variables used for pointing to members and mailto selection list
+var selectedList;
+var availableList;
+var availablegroups;
+var availableRoles;
+var oldGroupList;
+var newList;
+var selectedGroupidList;
+
+/** This function initializes selectedlist and availablelist with members and mailto selection lists respectively.
+ * This function is called everytime html form is reloaded
+ **/
+function createListObjects(){
+ //availableRoles points to the role filter list, that holds a list of "filters"
+ availableRoles = document.getElementById("roles");
+ //availablegroups points to the groups list, that holds a list of groups/sections in a course
+ availablegroups = document.getElementById("groups");
+ //availablelist points to members list, that holds list of users (Teachers and Students) present in the class
+ availableList = document.getElementById("members");
+ //Selectedlist points to mailto list, that holds list of users (Teachers and Students) to which email has to be sent
+ selectedList = document.getElementById("mail_to");
+
+ oldGroupList = singlePassPreviousList(availablegroups);
+}
+
+function singlePassPreviousList(passedList) {
+ selectedGroupidList = new Array();
+ list = new Array(passedList.options.length);
+ for (var i=0; i< passedList.options.length; i++) {
+ list[i] = passedList.options[i].selected;
+ if (list[i]) {
+ var val = passedList.options[i].value;
+ var vararr = val.split(" ");
+ selectedGroupidList.push(vararr[0]);
+ }
+ }
+
+ selectedGroupidList.push("");
+ return list;
+}
+
+//apply filter to select_users
+function special_select_users() {
+ if (!availableRoles){
+ createListObjects();
+ }
+ select_users(availablegroups, availableRoles.options[availableRoles.selectedIndex].value);
+}
+
+//abstract select users
+function select_users(list, filter) {
+ // select all the users that belong to that group
+ if (list == null) {
+ return;
+ }
+
+ newList = singlePassPreviousList(list);
+ differentIndexes = oldGroupList.diff(newList);
+
+
+ if (differentIndexes != null) {
+ for (var index =0; index < differentIndexes.length; index++) {
+ if (list.options[differentIndexes[index]]){
+ var selected = list.options[differentIndexes[index]].selected;
+ var interestarr = list.options[differentIndexes[index]].value.split(" ");
+ var interest = interestarr[0];
+ }
+ var role_filter = (filter==null) ? "none" : filter;
+
+ if (selected) {
+ select_list(availableList, interest, role_filter);
+ select_list(selectedList, interest, role_filter);
+ } else {
+ deselect_list(availableList, interest, role_filter);
+ deselect_list(selectedList, interest, role_filter);
+ }
+
+ }
+ }
+
+ oldGroupList = newList;
+}
+
+function deselect_list(list, interest, filter) {
+ for (var j=list.length-1; j>=0; j--) {
+ var val = list.options[j].value;
+ var vararr = val.split(" ");
+ var groups = vararr[2].split(",");
+ var roles = vararr[3].split(",");
+ if (groups.contains(interest)) {
+ if (groups.length ==2) {
+ list.options[j].selected = false;
+ } else if (!checkAllGroups(groups, selectedGroupidList)){
+ list.options[j].selected = false;
+ } else if (filter != "none" && !roles.contains(filter)) {
+ list.options[j].selected = false;
+ }
+ }
+ }
+}
+
+function checkAllGroups(list1, list2) {
+ for (var i =0; i< list1.length; i++) {
+ if (list2.contains(list1[i])) {
+ return true;
+ }
+ }
+ return false;
+}
+
+function select_list(list, interest, filter) {
+ for (var j=list.length-1; j>=0; j--) {
+ var val = list.options[j].value;
+ var vararr = val.split(" ");
+ var groups = vararr[2].split(",");
+ var roles = vararr[3].split(",");
+ if (groups.contains(interest)) {
+ if (filter == "none" || roles.contains(filter)) {
+ list.options[j].selected = true;
+ }
+ }
+ }
+}
+
+/** This function is used to remove user from selected list and add it back to available list */
+function remove_user(){
+ //for all items in selected list
+ for(var i=selectedList.length-1; i>=0; i--){
+ //if selected, append the user to available list.
+ //Append will automatically remove it from selected list
+ if(selectedList.options[i].selected == true){
+ availableList.appendChild(selectedList.options[i]);
+ }
+ }
+ //call selectnone function to remove selection/highlight after move
+ selectNone(selectedList, availableList, availablegroups);
+}
+
+/** This function is used to add user to selectedlist and remove it from available list */
+function add_user(){
+ //for all items in available list
+ for(var i=availableList.length-1; i>=0; i--){
+ //if selected, append the user to selected list.
+ //Append will automatically remove it from available list
+ if(availableList.options[i].selected == true){
+ selectedList.appendChild(availableList.options[i]);
+ }
+ }
+
+ //call selectnone function to remove selection/hightlight after move
+ selectNone(selectedList, availableList, availablegroups);
+}
+
+/** This function is used to remove all users from selectionlist and add them to available list */
+function removeAll(){
+ var len = selectedList.length-1;
+ //Select all users in selected list and append them to available list
+ for(i=len; i>=0; i--){
+ availableList.appendChild(selectedList.options[i]);
+ }
+ //De-select all users after move
+ selectNone(selectedList, availableList, availablegroups);
+}
+
+/** This function is used to add all users from availablelist to selectionlist*/
+function addAll(){
+ var len = availableList.length - 1;
+ //Select all users from availablelist and append them to selectedlist
+ for(i=len; i>=0; i--){
+ selectedList.appendChild(availableList.options[i]);
+ }
+ //De-select all users after move
+ selectNone(selectedList, availableList, availablegroups);
+}
+
+/** This function is used to deselect users in availablelist, selectedlist after move */
+function selectNone(list1, list2, list3){
+ //Set all elements on list1 to selected false
+ for(var i=list1.length-1; i>=0 ; i--){
+ list1.options[i].selected = false;
+ }
+ //Set all elements on list2 to selected false
+ for(var i=list2.length-1; i>=0; i--){
+ list2.options[i].selected = false;
+ }
+ //Set all elements on list3 to selected false
+ for (var i=list3.length-1; i>=0; i--){
+ list3.options[i].selected = false;
+ }
+}
+
+/** This function is used to construct the list of user to whom email has to be sent */
+function updateList(){
+ var ids = '';
+ // add user id of all elements in seleted list to string email as comma seperated value
+ for(var i=selectedList.length-1; i>=0 ; i--){
+ var val = selectedList.options[i].value;
+ var valarr = val.split(" ");
+ val = valarr[0];
+ ids = ids+val;
+ //do not add "," after last element
+ if(i!=0){
+ ids = ids+',';
+ }
+ }
+ //set hidden input value mailuser as email
+ document.getElementById("mailuser").value = ids ;
+}
+
+/** This function is used to construct the list of user to whom email has to be sent.
+ This function builds list of emails to be sent through external client*/
+function mail_to_ext_client(){
+ var emails = '';
+ // add user id of all elements in seleted list to string email as comma seperated value
+ for(var i=selectedList.length-1; i>=0 ; i--){
+ var val = selectedList.options[i].value;
+ var valarr = val.split(" ");
+ val = valarr[1];
+ emails = emails+val;
+ //do not add "," after last element
+ if(i!=0){
+ emails = emails+',';
+ }
+ }
+ from_email = document.getElementById("fromemail").value;
+ //Redirects to external client with list of emails as bcc recievers
+ location.href='mailto:'+from_email+'?bcc='+emails;
+}
+
+
+
+Array.prototype.contains = function(element) {
+ if (element == null || element == '') {
+ return false;
+ }
+
+ for (var i =0; i< this.length; i++) {
+ if (this[i] == element) {
+ return true;
+ }
+ }
+ return false;
+}
+
+Array.prototype.diff = function(secondArray) {
+ if (secondArray == null) {
+ return null;
+ }
+
+ if (this.length != secondArray.length) {
+ return null;
+ }
+
+ diffList = new Array();
+
+ for (var i=0; i < secondArray.length ; i++) {
+ if (this[i] != secondArray[i]) {
+ diffList.push(i);
+ }
+ }
+
+ return diffList;
+}
+
Index: plugins/blocks/quickmail/quickmail_config.php
===================================================================
RCS file: plugins/blocks/quickmail/quickmail_config.php
diff -N plugins/blocks/quickmail/quickmail_config.php
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ plugins/blocks/quickmail/quickmail_config.php 1 Jan 1970 00:00:00 -0000
@@ -0,0 +1,108 @@
+dirroot/blocks/moodleblock.class.php");
+require_once('config_form.php');
+require_once($CFG->libdir . '/accesslib.php');
+require_once('block_quickmail.php');
+
+require_login();
+
+// get the course id, and block instanceid
+$id = required_param('id', PARAM_INT);
+$instanceid = optional_param('instanceid', 0, PARAM_INT);
+
+$quickmail = new block_quickmail();
+$instance = new stdClass;
+
+
+if (!$course = get_record('course', 'id', $id)) {
+ error('Could not load course!');
+}
+
+$pinned = false;
+
+//determine whether this instance is a pinned block, or regular instance
+ if ($instanceid && $quickmailblock = get_record('block', 'name', 'quickmail')) {
+ $instance = get_record('block_instance', 'id', $instanceid, 'blockid', $quickmailblock->id);
+ if (!$instance){
+ $pinned = true;
+ $instance = get_record('block_pinned', 'id', $instanceid, 'blockid', $quickmailblock->id);
+ }
+ }
+
+$quickmail->_load_instance($instance);
+$quickmail->load_defaults();
+
+//can user alter quickmail config?
+if (!$quickmail->check_permission('block/quickmail:canconfig', CONTEXT_COURSE, $course)) {
+ error(get_string('no_permission', 'block_quickmail'));
+}
+
+$form = new config_form();
+
+if ($form->is_cancelled()) {
+ redirect("$CFG->wwwroot/course/view.php?id=$course->id");
+}
+
+if ($data = $form->get_data()) {
+ $config = new stdClass;
+ $roleselection = array();
+
+ foreach ($data as $key => $value) {
+ $keyarr = explode(':', $key);
+ if ($keyarr[0] == ROLE_SELECT) {
+ $role = get_record('role', 'shortname', $keyarr[1]);
+ $roleselection[$role->shortname] = $role->name;
+ }
+ }
+
+ $config->allowstudents = $data->allowstudents;
+ $config->roleselection = $roleselection;
+ $config->groupmode = $course->groupmode;
+
+ //Save into the instance without having to create a special table in the database or anything (using moodle's tables)
+ $quickmail->instance_config_save($config, $pinned);
+
+ //Redirect back to course
+ redirect("$CFG->wwwroot/course/view.php?id=$course->id");
+
+} else if (!$form->is_submitted()) {
+ //Load the form with the correct values
+
+ $form_data = array(
+ STUDENT_SELECT => $quickmail->config->allowstudents,
+ COURSE_ID => $course->id,
+ INSTANCE_ID => $quickmail->instance->id
+ );
+
+ $quickmail_roles = $quickmail->grab_roles();
+ foreach ($quickmail_roles as $role_shortname => $role_name) {
+ $form_data[ROLE_SELECT.':'.$role_shortname] = true;
+ }
+
+ $form->set_data($form_data);
+}
+
+$strquickmail = get_string('blockname', 'block_quickmail');
+
+$navigation = array(
+ array('name' => $course->shortname, 'link'=>"$CFG->wwwroot/course/view.php?id=$course->id", 'type'=>'title'),
+ array('name' => $strquickmail, 'link'=>'', 'type'=>'title')
+ );
+
+print_header_simple($strquickmail, '', build_navigation($navigation));
+
+print_heading('Configuring a '. $strquickmail .' block');
+$form->display();
+print_footer();
+
+?>
Index: plugins/blocks/quickmail/attachment.js
===================================================================
RCS file: plugins/blocks/quickmail/attachment.js
diff -N plugins/blocks/quickmail/attachment.js
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ plugins/blocks/quickmail/attachment.js 1 Jan 1970 00:00:00 -0000
@@ -0,0 +1,85 @@
+/*
+ Author: Philip Cali
+ Date: 2/15/2008
+ Louisiana State University
+
+ java script for applying multiple attachments
+*/
+
+//place holder for all attachment input tags
+var attachArray = new Array("attach_1");
+
+//function adds a remove link, and builds a new attachment field
+function create_new_attachment(input_id) {
+ //main table is the display table
+ main_table = document.getElementById("maintable");
+
+ //loaded attachment: an attachment field that has been loaded
+ input_tag = document.getElementById(input_id);
+ //table row associated with attachment
+ table_row = document.getElementById(input_id+"row");
+
+ var new_cell = table_row.insertCell(table_row.cells.length);
+ //create the remove link
+ new_cell.innerHTML = "Remove";
+
+ //time to create the new attachment field
+ var new_row = main_table.insertRow(main_table.findRow("attach") +1 );
+ var new_id = input_id.split("_");
+
+ var id_number = parseInt(new_id[1]) + 1;
+ new_row.id = new_id[0] + "_" + id_number + "row";
+
+ new_row.insertCell(0);
+ var input_cell = new_row.insertCell(1);
+ input_cell.colSpan = "2";
+
+ var new_input_id = new_id[0] + "_" + id_number;
+ input_cell.innerHTML = "";
+
+ //keep track of our attachments
+ attachArray.push(new_input_id);
+
+ //store in hidden field to process in email.php
+ document.getElementById("attachids").value=attachArray.toString();
+}
+
+//this is executed when the remove link is clicked
+function remove_attachment(input_id) {
+ //get the main display table
+ main_table = document.getElementById("maintable");
+
+ //get table row associated with the remove link
+ table_row = document.getElementById(input_id + "row");
+
+ //remove it
+ main_table.deleteRow(table_row.rowIndex);
+
+ //keep track
+ attachArray.remove(input_id);
+
+ document.getElementById("attachids").value = attachArray.toString();
+}
+
+
+/** Function added to the table class that returns the index
+ * matching the id of the row in question
+ */
+HTMLTableElement.prototype.findRow = function(id) {
+ for (i=this.rows.length-1; i>=0; i--) {
+ rowid = this.rows[i].id;
+
+ if (rowid && id.search(rowid)) {
+ return i;
+ }
+ }
+ return -1;
+}
+
+//loaded prototype for array index removal
+Array.prototype.remove = function(s) {
+ for (i=0;i