'."\n";
+ global $CFG;
+
+ $reports = hotpot_get_report_names('overview,simplestat,fullstat');
+
+ print ''."\n";
}
function hotpot_get_report_names($names='') {
- // $names : optional list showing required order reports names
+ // $names : optional list showing required order reports names
- $reports = array();
+ $reports = array();
- // convert $names to an array, if necessary (usually is)
- if (!is_array($names)) {
- $names = explode(',', $names);
- }
+ // convert $names to an array, if necessary (usually is)
+ if (!is_array($names)) {
+ $names = explode(',', $names);
+ }
- $plugins = get_list_of_plugins('mod/hotpot/report');
- foreach($names as $name) {
- if (is_numeric($i = array_search($name, $plugins))) {
- $reports[] = $name;
- unset($plugins[$i]);
- }
- }
+ $plugins = get_list_of_plugins('mod/hotpot/report');
+ foreach($names as $name) {
+ if (is_numeric($i = array_search($name, $plugins))) {
+ $reports[] = $name;
+ unset($plugins[$i]);
+ }
+ }
- // append remaining plugins
- $reports = array_merge($reports, $plugins);
+ // append remaining plugins
+ $reports = array_merge($reports, $plugins);
- return $reports;
+ return $reports;
}
function hotpot_get_report_users($course_ids, $formdata) {
- $users = array();
-
- /// Check to see if groups are being used in this module
- $currentgroup = false;
- if ($groupmode = groupmode($course, $cm)) { // Groups are being used
- $currentgroup = setup_and_print_groups($course, $groupmode, "report.php?id=$cm->id&mode=simple");
- }
-
- $sort = "u.lastname ASC";
-
- switch ($formdata['reportusers']) {
- case 'students':
- if ($currentgroup) {
- $users = get_group_students($currentgroup, $sort);
- } else {
- $users = get_course_students($course->id, $sort);
- }
- break;
- case 'all':
- if ($currentgroup) {
- $users = get_group_users($currentgroup, $sort);
- } else {
- $users = get_course_users($course->id, $sort);
- }
- break;
- }
-
- return $users;
+ $users = array();
+
+ /// Check to see if groups are being used in this module
+ $currentgroup = false;
+ if ($groupmode = groupmode($course, $cm)) { // Groups are being used
+ $currentgroup = setup_and_print_groups($course, $groupmode, "report.php?id=$cm->id&mode=simple");
+ }
+
+ $sort = "u.lastname ASC";
+
+ switch ($formdata['reportusers']) {
+ case 'students':
+ if ($currentgroup) {
+ $users = get_group_students($currentgroup, $sort);
+ } else {
+ $users = get_course_students($course->id, $sort);
+ }
+ break;
+ case 'all':
+ if ($currentgroup) {
+ $users = get_group_users($currentgroup, $sort);
+ } else {
+ $users = get_course_users($course->id, $sort);
+ }
+ break;
+ }
+
+ return $users;
}
function hotpot_get_records_groupby($function, $fieldnames, $table, $select, $groupby) {
- // $function is an SQL aggregate function (MAX or MIN)
-
- global $CFG;
-
- switch (strtolower($CFG->dbtype)) {
- case 'mysql':
- $fields = "$groupby, $function(CONCAT(".join(",'_',", $fieldnames).")) AS joinedvalues";
- break;
- case 'postgres7':
- $fields = "$groupby, $function(".join("||'_'||", $fieldnames).") AS joinedvalues";
- break;
- default:
- $fields = "";
- break;
- }
-
- if ($fields) {
- $records = get_records_sql("SELECT $fields FROM $table WHERE $select GROUP BY $groupby");
- }
-
- if (empty($fields) || empty($records)) {
- $records = array();
- }
-
- $fieldcount = count($fieldnames);
-
- foreach ($records as $id=>$record) {
- if (empty($record->joinedvalues)) {
- unset($records[$id]);
- } else {
- $formdata = explode('_', $record->joinedvalues);
-
- for ($i=0; $i<$fieldcount; $i++) {
- $fieldname = $fieldnames[$i];
- $records[$id]->$fieldname = $formdata[$i];
- }
- }
- unset($record->joinedvalues);
- }
-
- return $records;
+ // $function is an SQL aggregate function (MAX or MIN)
+
+ global $CFG;
+
+ switch (strtolower($CFG->dbtype)) {
+ case 'mysql':
+ $fields = "$groupby, $function(CONCAT(".join(",'_',", $fieldnames).")) AS joinedvalues";
+ break;
+ case 'postgres7':
+ $fields = "$groupby, $function(".join("||'_'||", $fieldnames).") AS joinedvalues";
+ break;
+ default:
+ $fields = "";
+ break;
+ }
+
+ if ($fields) {
+ $records = get_records_sql("SELECT $fields FROM $table WHERE $select GROUP BY $groupby");
+ }
+
+ if (empty($fields) || empty($records)) {
+ $records = array();
+ }
+
+ $fieldcount = count($fieldnames);
+
+ foreach ($records as $id=>$record) {
+ if (empty($record->joinedvalues)) {
+ unset($records[$id]);
+ } else {
+ $formdata = explode('_', $record->joinedvalues);
+
+ for ($i=0; $i<$fieldcount; $i++) {
+ $fieldname = $fieldnames[$i];
+ $records[$id]->$fieldname = $formdata[$i];
+ }
+ }
+ unset($record->joinedvalues);
+ }
+
+ return $records;
}
?>
diff --git a/mod/hotpot/report/default.php b/mod/hotpot/report/default.php
index 998362d3f0..c89423e2c5 100644
--- a/mod/hotpot/report/default.php
+++ b/mod/hotpot/report/default.php
@@ -2,7 +2,7 @@
////////////////////////////////////////////////////////////////////
/// Default class for report plugins
-///
+///
/// Doesn't do anything on it's own -- it needs to be extended.
/// This class displays quiz reports. Because it is called from
/// within /mod/quiz/report.php you can assume that the page header
@@ -17,227 +17,227 @@
class hotpot_default_report {
- function display($hotpot, $cm, $course, $users, $attempts, $questions, $options) {
- /// This function just displays the report
- // it is replaced by the "display" functions in the scripts in the "report" folder
- return true;
- }
-
- function add_question_headings(&$questions, &$table, $align='center', $size=50, $wrap=false, $fontsize=0) {
- $count = count($questions);
- for ($i=0; $i<$count; $i++) {
- $table->head[] = get_string('questionshort', 'hotpot', $i+1);
- if (isset($table->align)) {
- $table->align[] = $align;
- }
- if (isset($table->size)) {
- $table->size[] = $size;
- }
- if (isset($table->wrap)) {
- $table->wrap[] = $wrap;
- }
- if (isset($table->fontsize)) {
- $table->fontsize[] = $fontsize;
- }
- }
-
- }
-
- function set_legend(&$table, &$q, &$value, &$question) {
- // $q is the question number
- // $value is the value (=text) of the answer
-
- // check the legend is required
- if (isset($table->legend) && isset($value)) {
-
- // create question details array, if necessary
- if (empty($table->legend[$q])) {
- $table->legend[$q] = array(
- 'name' => hotpot_get_question_name($question),
- 'answers' => array()
- );
- }
-
- // search for this $value in answers array for this $q(uestion)
- $i_max = count($table->legend[$q]['answers']);
- for ($i=0; $i<$i_max; $i++) {
- if ($table->legend[$q]['answers'][$i]==$value) {
- break;
- }
- }
-
- // add $value to answers array, if it was not there
- if ($i==$i_max) {
- $table->legend[$q]['answers'][$i] = $value;
- }
-
- // convert $value to alphabetic index (A, B ... AA, AB ...)
- $value = $this->dec_to_ALPHA($i);
- }
- }
- function create_legend_table(&$tables, &$table) {
-
- if (isset($table->legend)) {
-
- $legend->width = '*';
- $legend->tablealign = '*';
- $legend->border = isset($table->border) ? $table->border : NULL;
- $legend->cellpadding = isset($table->cellpadding) ? $table->cellpadding : NULL;
- $legend->cellspacing = isset($table->cellspacing) ? $table->cellspacing : NULL;
- $legend->tableclass = isset($table->tableclass) ? $table->tableclass : NULL;
-
- $legend->caption = get_string('reportlegend', 'hotpot');
- $legend->align = array('right', 'left');
- $legend->statheadercols = array(0);
-
- $legend->stat = array();
-
- // put the questions in order
- sort($table->legend);
-
- foreach($table->legend as $q=>$question) {
-
- $legend->stat[] = array(
- get_string('questionshort', 'hotpot', $q+1),
- $question['name']
- );
- foreach($question['answers'] as $a=>$answer) {
- $legend->stat[] = array(
- $this->dec_to_ALPHA($a),
- $answer
- );
- }
- }
-
- unset($table->legend);
- $tables[] = $legend;
- }
- }
- function dec_to_ALPHA($dec) {
- if ($dec < 26) {
- return chr(ord('A') + $dec);
- } else {
- return $this->dec_to_ALPHA(intval($dec/26)-1).$this->dec_to_ALPHA($dec % 26);
- }
- }
- function remove_column(&$table, $target_col) {
-
- if (is_array($table)) {
- unset($table[$target_col]);
- $table = array_values($table);
-
- } else if (is_object($table)) {
- $vars = get_object_vars($table);
- foreach ($vars as $name=>$value) {
- switch ($name) {
- case 'data' :
- case 'stat' :
- case 'foot' :
- $skipcol = array();
- $cells = &$table->$name;
-
- $row_max = count($cells);
- for ($row=0; $row<$row_max; $row++) {
-
- $col = 0;
- $col_max = count($cells[$row]);
-
- $current_col = 0;
- while ($current_col<$target_col && $col<$col_max) {
-
- if (empty($skipcol[$current_col])) {
-
- $cell = $cells[$row][$col++];
- if (is_object($cell)) {
- if (isset($cell->rowspan) && is_numeric($cell->rowspan) && ($cell->rowspan>0)) {
- // skip cells below this one
- $skipcol[$current_col] = $cell->rowspan-1;
- }
- if (isset($cell->colspan) && is_numeric($cell->colspan) && ($cell->colspan>0)) {
- // skip cells to the right of this one
- for ($c=1; $c<$cell->colspan; $c++) {
- if (empty($skipcol[$current_col+$c])) {
- $skipcol[$current_col+$c] = 1;
- } else {
- $skipcol[$current_col+$c] ++;
- }
- }
- }
- }
- } else {
- $skipcol[$current_col]--;
- }
- $current_col++;
- }
- if ($current_col==$target_col && $col<$col_max) {
- $this->remove_column($cells[$row], $col);
- }
- } // end for $row
- break;
- case 'head' :
- case 'align' :
- case 'class' :
- case 'fontsize' :
- case 'size' :
- case 'wrap' :
- $this->remove_column($table->$name, $target_col);
- break;
- case 'statheadercols' :
- $array = &$table->$name;
- $count = count($array);
- for ($i=0; $i<$count; $i++) {
- if ($array[$i]>=$target_col) {
- $array[$i] --;
- }
- }
- break;
- } // end switch
- } // end foreach
- } // end if
- } // end function
-
-
- function expand_spans(&$table, $zone) {
- // expand multi-column and multi-row cells in a specified $zone of a $table
-
- // do nothing if this $zone is empty
- if (empty($table->$zone)) return;
-
- // shortcut to rows in this $table $zone
- $rows = &$table->{$zone};
-
- // loop through the rows
- foreach ($rows as $row=>$cells) {
-
- // check this is an array
- if (is_array($cells)) {
-
- // loop through the cells in this row
- foreach ($cells as $col=>$cell) {
-
- if (is_object($cell)) {
- if (isset($cell->rowspan) && is_numeric($cell->rowspan) && ($cell->rowspan>1)) {
- // fill in cells below this one
- $new_cell = array($cell->text);
- for ($r=1; $r<$cell->rowspan; $r++) {
- array_splice($rows[$row+$r], $col, 0, $new_cell);
- }
- }
- if (isset($cell->colspan) && is_numeric($cell->colspan) && ($cell->colspan>1)) {
- // fill in cells to the right of this one
- $new_cells = array();
- for ($c=1; $c<$cell->colspan; $c++) {
- $new_cells[] = $cell->text;
- }
- array_splice($rows[$row], $col, 0, $new_cells);
- }
- // replace $cell object with plain text
- $rows[$row][$col] = $cell->text;
- }
- }
- }
- }
- }
+ function display($hotpot, $cm, $course, $users, $attempts, $questions, $options) {
+ /// This function just displays the report
+ // it is replaced by the "display" functions in the scripts in the "report" folder
+ return true;
+ }
+
+ function add_question_headings(&$questions, &$table, $align='center', $size=50, $wrap=false, $fontsize=0) {
+ $count = count($questions);
+ for ($i=0; $i<$count; $i++) {
+ $table->head[] = get_string('questionshort', 'hotpot', $i+1);
+ if (isset($table->align)) {
+ $table->align[] = $align;
+ }
+ if (isset($table->size)) {
+ $table->size[] = $size;
+ }
+ if (isset($table->wrap)) {
+ $table->wrap[] = $wrap;
+ }
+ if (isset($table->fontsize)) {
+ $table->fontsize[] = $fontsize;
+ }
+ }
+
+ }
+
+ function set_legend(&$table, &$q, &$value, &$question) {
+ // $q is the question number
+ // $value is the value (=text) of the answer
+
+ // check the legend is required
+ if (isset($table->legend) && isset($value)) {
+
+ // create question details array, if necessary
+ if (empty($table->legend[$q])) {
+ $table->legend[$q] = array(
+ 'name' => hotpot_get_question_name($question),
+ 'answers' => array()
+ );
+ }
+
+ // search for this $value in answers array for this $q(uestion)
+ $i_max = count($table->legend[$q]['answers']);
+ for ($i=0; $i<$i_max; $i++) {
+ if ($table->legend[$q]['answers'][$i]==$value) {
+ break;
+ }
+ }
+
+ // add $value to answers array, if it was not there
+ if ($i==$i_max) {
+ $table->legend[$q]['answers'][$i] = $value;
+ }
+
+ // convert $value to alphabetic index (A, B ... AA, AB ...)
+ $value = $this->dec_to_ALPHA($i);
+ }
+ }
+ function create_legend_table(&$tables, &$table) {
+
+ if (isset($table->legend)) {
+
+ $legend->width = '*';
+ $legend->tablealign = '*';
+ $legend->border = isset($table->border) ? $table->border : NULL;
+ $legend->cellpadding = isset($table->cellpadding) ? $table->cellpadding : NULL;
+ $legend->cellspacing = isset($table->cellspacing) ? $table->cellspacing : NULL;
+ $legend->tableclass = isset($table->tableclass) ? $table->tableclass : NULL;
+
+ $legend->caption = get_string('reportlegend', 'hotpot');
+ $legend->align = array('right', 'left');
+ $legend->statheadercols = array(0);
+
+ $legend->stat = array();
+
+ // put the questions in order
+ sort($table->legend);
+
+ foreach($table->legend as $q=>$question) {
+
+ $legend->stat[] = array(
+ get_string('questionshort', 'hotpot', $q+1),
+ $question['name']
+ );
+ foreach($question['answers'] as $a=>$answer) {
+ $legend->stat[] = array(
+ $this->dec_to_ALPHA($a),
+ $answer
+ );
+ }
+ }
+
+ unset($table->legend);
+ $tables[] = $legend;
+ }
+ }
+ function dec_to_ALPHA($dec) {
+ if ($dec < 26) {
+ return chr(ord('A') + $dec);
+ } else {
+ return $this->dec_to_ALPHA(intval($dec/26)-1).$this->dec_to_ALPHA($dec % 26);
+ }
+ }
+ function remove_column(&$table, $target_col) {
+
+ if (is_array($table)) {
+ unset($table[$target_col]);
+ $table = array_values($table);
+
+ } else if (is_object($table)) {
+ $vars = get_object_vars($table);
+ foreach ($vars as $name=>$value) {
+ switch ($name) {
+ case 'data' :
+ case 'stat' :
+ case 'foot' :
+ $skipcol = array();
+ $cells = &$table->$name;
+
+ $row_max = count($cells);
+ for ($row=0; $row<$row_max; $row++) {
+
+ $col = 0;
+ $col_max = count($cells[$row]);
+
+ $current_col = 0;
+ while ($current_col<$target_col && $col<$col_max) {
+
+ if (empty($skipcol[$current_col])) {
+
+ $cell = $cells[$row][$col++];
+ if (is_object($cell)) {
+ if (isset($cell->rowspan) && is_numeric($cell->rowspan) && ($cell->rowspan>0)) {
+ // skip cells below this one
+ $skipcol[$current_col] = $cell->rowspan-1;
+ }
+ if (isset($cell->colspan) && is_numeric($cell->colspan) && ($cell->colspan>0)) {
+ // skip cells to the right of this one
+ for ($c=1; $c<$cell->colspan; $c++) {
+ if (empty($skipcol[$current_col+$c])) {
+ $skipcol[$current_col+$c] = 1;
+ } else {
+ $skipcol[$current_col+$c] ++;
+ }
+ }
+ }
+ }
+ } else {
+ $skipcol[$current_col]--;
+ }
+ $current_col++;
+ }
+ if ($current_col==$target_col && $col<$col_max) {
+ $this->remove_column($cells[$row], $col);
+ }
+ } // end for $row
+ break;
+ case 'head' :
+ case 'align' :
+ case 'class' :
+ case 'fontsize' :
+ case 'size' :
+ case 'wrap' :
+ $this->remove_column($table->$name, $target_col);
+ break;
+ case 'statheadercols' :
+ $array = &$table->$name;
+ $count = count($array);
+ for ($i=0; $i<$count; $i++) {
+ if ($array[$i]>=$target_col) {
+ $array[$i] --;
+ }
+ }
+ break;
+ } // end switch
+ } // end foreach
+ } // end if
+ } // end function
+
+
+ function expand_spans(&$table, $zone) {
+ // expand multi-column and multi-row cells in a specified $zone of a $table
+
+ // do nothing if this $zone is empty
+ if (empty($table->$zone)) return;
+
+ // shortcut to rows in this $table $zone
+ $rows = &$table->{$zone};
+
+ // loop through the rows
+ foreach ($rows as $row=>$cells) {
+
+ // check this is an array
+ if (is_array($cells)) {
+
+ // loop through the cells in this row
+ foreach ($cells as $col=>$cell) {
+
+ if (is_object($cell)) {
+ if (isset($cell->rowspan) && is_numeric($cell->rowspan) && ($cell->rowspan>1)) {
+ // fill in cells below this one
+ $new_cell = array($cell->text);
+ for ($r=1; $r<$cell->rowspan; $r++) {
+ array_splice($rows[$row+$r], $col, 0, $new_cell);
+ }
+ }
+ if (isset($cell->colspan) && is_numeric($cell->colspan) && ($cell->colspan>1)) {
+ // fill in cells to the right of this one
+ $new_cells = array();
+ for ($c=1; $c<$cell->colspan; $c++) {
+ $new_cells[] = $cell->text;
+ }
+ array_splice($rows[$row], $col, 0, $new_cells);
+ }
+ // replace $cell object with plain text
+ $rows[$row][$col] = $cell->text;
+ }
+ }
+ }
+ }
+ }
/////////////////////////////////////////////////
/// print a report in html, text or Excel format
@@ -246,592 +246,592 @@ class hotpot_default_report {
// the stuff to print is contained in $table
// which has the following properties:
-// $table->border border width for the table
-// $table->cellpadding padding on each cell
-// $table->cellspacing spacing between cells
-// $table->tableclass class for table
-// $table->width table width
-
-// $table->align is an array of column alignments
-// $table->class is an array of column classes
-// $table->size is an array of column sizes
-// $table->wrap is an array of column wrap/nowrap switches
-// $table->fontsize is an array of fontsizes
-
-// $table->caption is a caption (=title) for the report
-// $table->head is an array of headings (all TH cells)
-// $table->data[] is an array of arrays containing the data (all TD cells)
-// if a row is given as "hr", a "tabledivider" is inserted
-// if a cell is a string, it is assumed to be the cell content
-// a cell can also be an object, thus:
-// $cell->text : the content of the cell
-// $cell->rowspan : the row span of this cell
-// $cell->colspan : the column span of this cell
-// if rowspan or colspan are specified, neighboring cells are shifted accordingly
-// $table->stat[] is an array of arrays containing the statistics rows (TD and TH cells)
-// $table->foot[] is an array of arrays containing the footer rows (all TH cells)
-
-// $table->statheadercols is an array of column numbers which are headers
+// $table->border border width for the table
+// $table->cellpadding padding on each cell
+// $table->cellspacing spacing between cells
+// $table->tableclass class for table
+// $table->width table width
+
+// $table->align is an array of column alignments
+// $table->class is an array of column classes
+// $table->size is an array of column sizes
+// $table->wrap is an array of column wrap/nowrap switches
+// $table->fontsize is an array of fontsizes
+
+// $table->caption is a caption (=title) for the report
+// $table->head is an array of headings (all TH cells)
+// $table->data[] is an array of arrays containing the data (all TD cells)
+// if a row is given as "hr", a "tabledivider" is inserted
+// if a cell is a string, it is assumed to be the cell content
+// a cell can also be an object, thus:
+// $cell->text : the content of the cell
+// $cell->rowspan : the row span of this cell
+// $cell->colspan : the column span of this cell
+// if rowspan or colspan are specified, neighboring cells are shifted accordingly
+// $table->stat[] is an array of arrays containing the statistics rows (TD and TH cells)
+// $table->foot[] is an array of arrays containing the footer rows (all TH cells)
+
+// $table->statheadercols is an array of column numbers which are headers
//////////////////////////////////////////
/// print a report
- function print_report(&$course, &$hotpot, &$tables, &$options) {
- switch ($options['reportformat']) {
- case 'txt':
- $this->print_text_report($course, $hotpot, $tables, $options);
- break;
- case 'xls':
- $this->print_excel_report($course, $hotpot, $tables, $options);
- break;
- default: // 'htm' (and anything else)
- $this->print_html_report($tables);
- break;
- }
- }
-
- function print_report_start(&$course, &$hotpot, &$options, &$table) {
- switch ($options['reportformat']) {
- case 'txt':
- $this->print_text_start($course, $hotpot, $options);
- break;
- case 'xls':
- $this->print_excel_start($course, $hotpot, $options);
- break;
-
- case 'htm':
- $this->print_html_start($course, $hotpot, $options);
- break;
- }
- }
-
- function print_report_cells(&$table, &$options, $zone) {
- switch ($options['reportformat']) {
- case 'txt':
- $fmt = 'text';
- break;
- case 'xls':
- $fmt = 'excel';
- break;
- default: // 'htm' (and anything else)
- $fmt = 'html';
- break;
- }
- $fn = "print_{$fmt}_{$zone}";
- $this->$fn($table, $options);
- }
-
- function print_report_finish(&$course, &$hotpot, &$options) {
- switch ($options['reportformat']) {
- case 'txt' :
- // do nothing
- break;
- case 'xls':
- $this->print_excel_finish($course, $hotpot, $options);
- break;
- case 'htm':
- $this->print_html_finish($course, $hotpot, $options);
- break;
- }
- }
+ function print_report(&$course, &$hotpot, &$tables, &$options) {
+ switch ($options['reportformat']) {
+ case 'txt':
+ $this->print_text_report($course, $hotpot, $tables, $options);
+ break;
+ case 'xls':
+ $this->print_excel_report($course, $hotpot, $tables, $options);
+ break;
+ default: // 'htm' (and anything else)
+ $this->print_html_report($tables);
+ break;
+ }
+ }
+
+ function print_report_start(&$course, &$hotpot, &$options, &$table) {
+ switch ($options['reportformat']) {
+ case 'txt':
+ $this->print_text_start($course, $hotpot, $options);
+ break;
+ case 'xls':
+ $this->print_excel_start($course, $hotpot, $options);
+ break;
+
+ case 'htm':
+ $this->print_html_start($course, $hotpot, $options);
+ break;
+ }
+ }
+
+ function print_report_cells(&$table, &$options, $zone) {
+ switch ($options['reportformat']) {
+ case 'txt':
+ $fmt = 'text';
+ break;
+ case 'xls':
+ $fmt = 'excel';
+ break;
+ default: // 'htm' (and anything else)
+ $fmt = 'html';
+ break;
+ }
+ $fn = "print_{$fmt}_{$zone}";
+ $this->$fn($table, $options);
+ }
+
+ function print_report_finish(&$course, &$hotpot, &$options) {
+ switch ($options['reportformat']) {
+ case 'txt' :
+ // do nothing
+ break;
+ case 'xls':
+ $this->print_excel_finish($course, $hotpot, $options);
+ break;
+ case 'htm':
+ $this->print_html_finish($course, $hotpot, $options);
+ break;
+ }
+ }
//////////////////////////////////////////
/// print an html report
- function print_html_report(&$tables) {
- $count = count($tables);
- foreach($tables as $i=>$table) {
-
- $this->print_html_start($table);
- $this->print_html_head($table);
- $this->print_html_data($table);
- $this->print_html_stat($table);
- $this->print_html_foot($table);
- $this->print_html_finish($table);
-
- if (($i+1)<$count) {
- print_spacer(30, 10, true);
- }
- }
- }
- function print_html_start(&$table) {
-
- // default class for the table
- if (empty($table->tableclass)) {
- $table->tableclass = 'generaltable';
- }
-
- // default classes for TD and TH
- $d = $table->tableclass.'cell';
- $h = $table->tableclass.'header';
-
- $table->th_side = '';
-
- $table->td = array();
- $table->th_top = array();
-
- if (empty($table->colspan)) {
- if (isset($table->head)) {
- $table->colspan = count($table->head);
- } else if (isset($table->data)) {
- $table->colspan = count($table->data[0]);
- } else if (isset($table->stat)) {
- $table->colspan = count($table->stat);
- } else if (isset($table->foot)) {
- $table->colspan = count($table->foot);
- } else {
- $table->colspan = 0;
- }
- }
-
- for ($i=0; $i<$table->colspan; $i++) {
-
- $align = empty($table->align[$i]) ? '' : ' align="'.$table->align[$i].'"';
- $class = empty($table->class[$i]) ? $d : ' class="'.$table->class[$i].'"';
- $size = empty($table->size[$i]) ? '' : ' width="'.$table->size[$i].'"';
- $wrap = empty($table->wrap[$i]) ? '' : ' nowrap="nowrap"';
-
- $table->th_top[$i] = ' ';
-
- $table->td[$i] = ' ';
-
- if (!empty($table->fontsize[$i])) {
- $table->td[$i] .= '';
- }
- }
-
- if (empty($table->border)) {
- $table->border = 0;
- }
- if (empty($table->cellpadding)) {
- $table->cellpadding = 5;
- }
- if (empty($table->cellspacing)) {
- $table->cellspacing = 1;
- }
- if (empty($table->width)) {
- $table->width = "80%"; // actually the width of the "simple box"
- }
- if (empty($table->tablealign)) {
- $table->tablealign = "center";
- }
-
- if (isset($table->start)) {
- print $table->start."\n";
- }
-
- print_simple_box_start("$table->tablealign", "$table->width", "#ffffff", 0);
- print ''."\n";
-
- if (isset($table->caption)) {
- print '\n";
- foreach ($table->head as $i=>$cell) {
- $th = $table->th_top[$i];
- print $th.$cell."\n";
- }
- print " \n";
- }
- }
- function print_html_data(&$table) {
- if (isset($table->data)) {
- $skipcol = array();
- foreach ($table->data as $cells) {
- print "\n";
- if (is_array($cells)) {
- $i = 0; // index on $cells
- $col = 0; // column index
- while ($col<$table->colspan && isset($cells[$i])) {
- if (empty($skipcol[$col])) {
- $cell = &$cells[$i++];
- $td = $table->td[$col];
- if (is_object($cell)) {
- $text = $cell->text;
- if (isset($cell->rowspan) && is_numeric($cell->rowspan) && ($cell->rowspan>0)) {
- $td = 'rowspan-1;
- }
- if (isset($cell->colspan) && is_numeric($cell->colspan) && ($cell->colspan>0)) {
- $td = ' colspan; $c++) {
- if (empty($skipcol[$col+$c])) {
- $skipcol[$col+$c] = 1;
- } else {
- $skipcol[$col+$c] ++;
- }
- }
- }
- } else { // $cell is a string
- $text = $cell;
- }
- print $td.$text." \n";
- } else {
- $skipcol[$col]--;
- }
- $col++;
- } // end while
- } else if ($cells=='hr') {
- print '
\n";
- }
- }
- }
- function print_html_stat(&$table) {
- if (isset($table->stat)) {
- if (empty($table->statheadercols)) {
- $table->statheadercols = array();
- }
- foreach ($table->stat as $cells) {
- print '';
- foreach ($cells as $i => $cell) {
- if (in_array($i, $table->statheadercols)) {
- $th = $table->th_side;
- print $th.$cell."\n";
- } else {
- $td = $table->td[$i];
- print $td.$cell."\n";
- }
- }
- print " \n";
- }
- }
- }
- function print_html_foot(&$table) {
- if (isset($table->foot)) {
- foreach ($table->foot as $cells) {
- print "\n";
- foreach ($cells as $i => $cell) {
- if ($i==0) {
- $th = $table->th_side;
- print $th.$cell."\n";
- } else {
- $th = $table->th_top[$i];
- print $th.$cell."\n";
- }
- }
- print " \n";
- }
- }
- }
- function print_html_finish(&$table) {
- print "
\n";
- print_simple_box_end();
-
- if (isset($table->finish)) {
- print $table->finish."\n";
- }
- }
+ function print_html_report(&$tables) {
+ $count = count($tables);
+ foreach($tables as $i=>$table) {
+
+ $this->print_html_start($table);
+ $this->print_html_head($table);
+ $this->print_html_data($table);
+ $this->print_html_stat($table);
+ $this->print_html_foot($table);
+ $this->print_html_finish($table);
+
+ if (($i+1)<$count) {
+ print_spacer(30, 10, true);
+ }
+ }
+ }
+ function print_html_start(&$table) {
+
+ // default class for the table
+ if (empty($table->tableclass)) {
+ $table->tableclass = 'generaltable';
+ }
+
+ // default classes for TD and TH
+ $d = $table->tableclass.'cell';
+ $h = $table->tableclass.'header';
+
+ $table->th_side = ' ';
+
+ $table->td = array();
+ $table->th_top = array();
+
+ if (empty($table->colspan)) {
+ if (isset($table->head)) {
+ $table->colspan = count($table->head);
+ } else if (isset($table->data)) {
+ $table->colspan = count($table->data[0]);
+ } else if (isset($table->stat)) {
+ $table->colspan = count($table->stat);
+ } else if (isset($table->foot)) {
+ $table->colspan = count($table->foot);
+ } else {
+ $table->colspan = 0;
+ }
+ }
+
+ for ($i=0; $i<$table->colspan; $i++) {
+
+ $align = empty($table->align[$i]) ? '' : ' align="'.$table->align[$i].'"';
+ $class = empty($table->class[$i]) ? $d : ' class="'.$table->class[$i].'"';
+ $size = empty($table->size[$i]) ? '' : ' width="'.$table->size[$i].'"';
+ $wrap = empty($table->wrap[$i]) ? '' : ' nowrap="nowrap"';
+
+ $table->th_top[$i] = ' ';
+
+ $table->td[$i] = ' ';
+
+ if (!empty($table->fontsize[$i])) {
+ $table->td[$i] .= '';
+ }
+ }
+
+ if (empty($table->border)) {
+ $table->border = 0;
+ }
+ if (empty($table->cellpadding)) {
+ $table->cellpadding = 5;
+ }
+ if (empty($table->cellspacing)) {
+ $table->cellspacing = 1;
+ }
+ if (empty($table->width)) {
+ $table->width = "80%"; // actually the width of the "simple box"
+ }
+ if (empty($table->tablealign)) {
+ $table->tablealign = "center";
+ }
+
+ if (isset($table->start)) {
+ print $table->start."\n";
+ }
+
+ print_simple_box_start("$table->tablealign", "$table->width", "#ffffff", 0);
+ print ''."\n";
+
+ if (isset($table->caption)) {
+ print '\n";
+ foreach ($table->head as $i=>$cell) {
+ $th = $table->th_top[$i];
+ print $th.$cell."\n";
+ }
+ print " \n";
+ }
+ }
+ function print_html_data(&$table) {
+ if (isset($table->data)) {
+ $skipcol = array();
+ foreach ($table->data as $cells) {
+ print "\n";
+ if (is_array($cells)) {
+ $i = 0; // index on $cells
+ $col = 0; // column index
+ while ($col<$table->colspan && isset($cells[$i])) {
+ if (empty($skipcol[$col])) {
+ $cell = &$cells[$i++];
+ $td = $table->td[$col];
+ if (is_object($cell)) {
+ $text = $cell->text;
+ if (isset($cell->rowspan) && is_numeric($cell->rowspan) && ($cell->rowspan>0)) {
+ $td = 'rowspan-1;
+ }
+ if (isset($cell->colspan) && is_numeric($cell->colspan) && ($cell->colspan>0)) {
+ $td = ' colspan; $c++) {
+ if (empty($skipcol[$col+$c])) {
+ $skipcol[$col+$c] = 1;
+ } else {
+ $skipcol[$col+$c] ++;
+ }
+ }
+ }
+ } else { // $cell is a string
+ $text = $cell;
+ }
+ print $td.$text." \n";
+ } else {
+ $skipcol[$col]--;
+ }
+ $col++;
+ } // end while
+ } else if ($cells=='hr') {
+ print '
\n";
+ }
+ }
+ }
+ function print_html_stat(&$table) {
+ if (isset($table->stat)) {
+ if (empty($table->statheadercols)) {
+ $table->statheadercols = array();
+ }
+ foreach ($table->stat as $cells) {
+ print '';
+ foreach ($cells as $i => $cell) {
+ if (in_array($i, $table->statheadercols)) {
+ $th = $table->th_side;
+ print $th.$cell."\n";
+ } else {
+ $td = $table->td[$i];
+ print $td.$cell."\n";
+ }
+ }
+ print " \n";
+ }
+ }
+ }
+ function print_html_foot(&$table) {
+ if (isset($table->foot)) {
+ foreach ($table->foot as $cells) {
+ print "\n";
+ foreach ($cells as $i => $cell) {
+ if ($i==0) {
+ $th = $table->th_side;
+ print $th.$cell."\n";
+ } else {
+ $th = $table->th_top[$i];
+ print $th.$cell."\n";
+ }
+ }
+ print " \n";
+ }
+ }
+ }
+ function print_html_finish(&$table) {
+ print "
\n";
+ print_simple_box_end();
+
+ if (isset($table->finish)) {
+ print $table->finish."\n";
+ }
+ }
//////////////////////////////////////////
/// print a text report
- function print_text_report(&$course, &$hotpot, &$tables, &$options) {
- $this->print_text_start($course, $hotpot, $options);
- foreach ($tables as $table) {
- $this->print_text_head($table, $options);
- $this->print_text_data($table, $options);
- $this->print_text_stat($table, $options);
- $this->print_text_foot($table, $options);
- }
- }
- function print_text_start(&$course, &$hotpot, &$options) {
- $downloadfilename = clean_filename("$course->shortname $hotpot->name.txt");
- header("Content-Type: application/download\n");
- header("Content-Disposition: attachment; filename=$downloadfilename");
- header("Expires: 0");
- header("Cache-Control: must-revalidate, post-check=0,pre-check=0");
- header("Pragma: public");
- }
- function print_text_head(&$table, &$options) {
- if (isset($table->caption)) {
- $i = strlen($table->caption);
- $data = array(
- array(str_repeat('=', $i)),
- array($table->caption),
- array(str_repeat('=', $i)),
- );
- foreach($data as $cells) {
- $this->print_text_cells($cells, $options);
- }
- }
- if (isset($table->head)) {
- $this->expand_spans($table, 'head');
- $this->print_text_cells($table->head, $options);
- }
- }
- function print_text_data(&$table, &$options) {
- if (isset($table->data)) {
- $this->expand_spans($table, 'data');
- foreach ($table->data as $cells) {
- $this->print_text_cells($cells, $options);
- }
- }
- }
- function print_text_stat(&$table, &$options) {
- if (isset($table->stat)) {
- $this->expand_spans($table, 'stat');
- foreach ($table->stat as $cells) {
- $this->print_text_cells($cells, $options);
- }
- }
- }
- function print_text_foot(&$table, &$options) {
- if (isset($table->foot)) {
- $this->expand_spans($table, 'foot');
- foreach ($table->foot as $cells) {
- $this->print_text_cells($cells, $options);
- }
- }
- }
- function print_text_cells(&$cells, &$options) {
-
- // do nothing if there are no cells
- if (empty($cells) || is_string($cells)) return;
-
- // convert to tab-delimted string
- $str = implode("\t", $cells);
-
- // replace newlines in string
- $str = preg_replace("/\n/", ",", $str);
-
- // set best newline for this browser (if it hasn't been done already)
- if (empty($this->nl)) {
- $s = &$_SERVER['HTTP_USER_AGENT'];
- $win = is_numeric(strpos($s, 'Win'));
- $mac = is_numeric(strpos($s, 'Mac')) && !is_numeric(strpos($s, 'OS X'));
- $this->nl = $win ? "\r\n" : ($mac ? "\r" : "\n");
- }
-
- print $str.$this->nl;
- }
+ function print_text_report(&$course, &$hotpot, &$tables, &$options) {
+ $this->print_text_start($course, $hotpot, $options);
+ foreach ($tables as $table) {
+ $this->print_text_head($table, $options);
+ $this->print_text_data($table, $options);
+ $this->print_text_stat($table, $options);
+ $this->print_text_foot($table, $options);
+ }
+ }
+ function print_text_start(&$course, &$hotpot, &$options) {
+ $downloadfilename = clean_filename("$course->shortname $hotpot->name.txt");
+ header("Content-Type: application/download\n");
+ header("Content-Disposition: attachment; filename=$downloadfilename");
+ header("Expires: 0");
+ header("Cache-Control: must-revalidate, post-check=0,pre-check=0");
+ header("Pragma: public");
+ }
+ function print_text_head(&$table, &$options) {
+ if (isset($table->caption)) {
+ $i = strlen($table->caption);
+ $data = array(
+ array(str_repeat('=', $i)),
+ array($table->caption),
+ array(str_repeat('=', $i)),
+ );
+ foreach($data as $cells) {
+ $this->print_text_cells($cells, $options);
+ }
+ }
+ if (isset($table->head)) {
+ $this->expand_spans($table, 'head');
+ $this->print_text_cells($table->head, $options);
+ }
+ }
+ function print_text_data(&$table, &$options) {
+ if (isset($table->data)) {
+ $this->expand_spans($table, 'data');
+ foreach ($table->data as $cells) {
+ $this->print_text_cells($cells, $options);
+ }
+ }
+ }
+ function print_text_stat(&$table, &$options) {
+ if (isset($table->stat)) {
+ $this->expand_spans($table, 'stat');
+ foreach ($table->stat as $cells) {
+ $this->print_text_cells($cells, $options);
+ }
+ }
+ }
+ function print_text_foot(&$table, &$options) {
+ if (isset($table->foot)) {
+ $this->expand_spans($table, 'foot');
+ foreach ($table->foot as $cells) {
+ $this->print_text_cells($cells, $options);
+ }
+ }
+ }
+ function print_text_cells(&$cells, &$options) {
+
+ // do nothing if there are no cells
+ if (empty($cells) || is_string($cells)) return;
+
+ // convert to tab-delimted string
+ $str = implode("\t", $cells);
+
+ // replace newlines in string
+ $str = preg_replace("/\n/", ",", $str);
+
+ // set best newline for this browser (if it hasn't been done already)
+ if (empty($this->nl)) {
+ $s = &$_SERVER['HTTP_USER_AGENT'];
+ $win = is_numeric(strpos($s, 'Win'));
+ $mac = is_numeric(strpos($s, 'Mac')) && !is_numeric(strpos($s, 'OS X'));
+ $this->nl = $win ? "\r\n" : ($mac ? "\r" : "\n");
+ }
+
+ print $str.$this->nl;
+ }
//////////////////////////////////////////
/// print an Excel report
- function print_excel_report(&$course, &$hotpot, &$tables, &$options) {
- global $CFG;
-
- // create Excel workbook
- if (file_exists("$CFG->libdir/excellib.class.php")) {
- // Moodle >= 1.6
- require_once("$CFG->libdir/excellib.class.php");
- $wb = new MoodleExcelWorkbook("-");
- } else {
- // Moodle <= 1.5
- require_once("$CFG->libdir/excel/Worksheet.php");
- require_once("$CFG->libdir/excel/Workbook.php");
- $wb = new Workbook("-");
- }
-
- // send HTTP headers
- $this->print_excel_headers($wb, $course, $hotpot);
-
- // create one worksheet for each table
- foreach($tables as $table) {
- unset($ws);
- $ws = &$wb->add_worksheet(empty($table->caption) ? '' : strip_tags($table->caption));
-
- $row = 0;
- $this->print_excel_head($wb, $ws, $table, $row, $options);
- $this->print_excel_data($wb, $ws, $table, $row, $options);
- $this->print_excel_stat($wb, $ws, $table, $row, $options);
- $this->print_excel_foot($wb, $ws, $table, $row, $options);
- }
-
- // close the workbook (and send it to the browser)
- $wb->close();
- }
- function print_excel_headers(&$wb, &$course, &$hotpot) {
- $downloadfilename = clean_filename("$course->shortname $hotpot->name.xls");
- if (method_exists($wb, 'send')) {
- // Moodle >=1.6
- $wb->send($downloadfilename);
- } else {
- // Moodle <=1.5
- header("Content-type: application/vnd.ms-excel");
- header("Content-Disposition: attachment; filename=$downloadfilename" );
- header("Expires: 0");
- header("Cache-Control: must-revalidate, post-check=0,pre-check=0");
- header("Pragma: public");
- }
- }
- function print_excel_head(&$wb, &$ws, &$table, &$row, &$options) {
- // define format properties
- $properties = array(
- 'bold'=>1,
- 'align'=>'center',
- 'v_align'=>'bottom',
- 'text_wrap'=>1
- );
-
- // expand multi-column and multi-row cells
- $this->expand_spans($table, 'head');
-
- // print the headings
- $this->print_excel_cells($wb, $ws, $table, $row, $properties, $table->head, $options);
- }
- function print_excel_data(&$wb, &$ws, &$table, &$row, &$options) {
- // do nothing if there are no cells
- if (empty($table->data)) return;
-
- // define format properties
- $properties = array('text_wrap' => (empty($options['reportwrapdata']) ? 0 : 1));
-
- // expand multi-column and multi-row cells
- $this->expand_spans($table, 'data');
-
- // print rows
- foreach ($table->data as $cells) {
- $this->print_excel_cells($wb, $ws, $table, $row, $properties, $cells, $options);
- }
- }
- function print_excel_stat(&$wb, &$ws, &$table, &$row, &$options) {
- // do nothing if there are no cells
- if (empty($table->stat)) return;
-
- // define format properties
- $properties = array('align'=>'right');
-
- // expand multi-column and multi-row cells
- $this->expand_spans($table, 'stat');
-
- // print rows
- $i_count = count($table->stat);
- foreach ($table->stat as $i => $cells) {
-
- // set border on top and bottom row
- $properties['top'] = ($i==0) ? 1 : 0;
- $properties['bottom'] = ($i==($i_count-1)) ? 1 : 0;
-
- // print this row
- $this->print_excel_cells($wb, $ws, $table, $row, $properties, $cells, $options, $table->statheadercols);
- }
- }
- function print_excel_foot(&$wb, &$ws, &$table, &$row, &$options) {
- // do nothing if there are no cells
- if (empty($table->foot)) return;
-
- // define format properties
- $properties = array('bold'=>1, 'align'=>'center');
-
- // expand multi-column and multi-row cells
- $this->expand_spans($table, 'foot');
-
- // print rows
- $i_count = count($table->foot);
- foreach ($table->foot as $i => $cells) {
-
- // set border on top and bottom row
- $properties['top'] = ($i==0) ? 1 : 0;
- $properties['bottom'] = ($i==($i_count-1)) ? 1 : 0;
-
- // print this footer row
- $this->print_excel_cells($wb, $ws, $table, $row, $properties, $cells, $options);
- }
- }
-
- function print_excel_cells(&$wb, &$ws, &$table, &$row, &$properties, &$cells, &$options, $statheadercols=NULL) {
- // do nothing if there are no cells
- if (empty($cells) || is_string($cells)) return;
-
- // print cells
- foreach($cells as $col => $cell) {
-
- unset($fmt_properties);
- $fmt_properties = $properties;
-
- if (empty($fmt_properties['text_wrap'])) {
- if (strlen("$cell")>=9) {
- // long cell value
- $fmt_properties['align'] = 'left';
- }
- } else {
- if (strlen("$cell")<9 && strpos("$cell", "\n")===false) {
- // short cell value (wrapping not required)
- $fmt_properties['text_wrap'] = 0;
- }
- }
-
- // set bold, if required (for stat)
- if (isset($statheadercols)) {
- $fmt_properties['bold'] = in_array($col, $statheadercols) ? 1 : 0;
- $fmt_properties['align'] = in_array($col, $statheadercols) ? 'right' : $table->align[$col];
- }
-
- // set align, if required
- if (isset($table->align[$col]) && empty($fmt_properties['align'])) {
- $fmt_properties['align'] = $table->align[$col];
- }
-
- // check to see that an identical format object has not already been created
- unset($fmt);
-
- if (isset($wb->pear_excel_workbook)) {
- // Moodle >=1.6
- $fmt_properties_obj = (object)$fmt_properties;
- foreach ($wb->pear_excel_workbook->_formats as $id=>$format) {
- if ($format==$fmt_properties_obj) {
- $fmt = &$wb->pear_excel_workbook->_formats[$id];
- break;
- }
- }
- } else {
- // Moodle <=1.5
- foreach ($wb->formats as $id=>$format) {
- if (isset($format->properties) && $format->properties==$fmt_properties) {
- $fmt = &$wb->formats[$id];
- break;
- }
- }
- if (is_numeric($cell) || empty($options['reportencoding'])) {
- // do nothing
- } else {
- $in_charset = '';
- if (function_exists('mb_convert_encoding')) {
- $in_charset = mb_detect_encoding($cell, 'auto');
- }
- if (empty($in_charset)) {
- $in_charset = get_string('thischarset');
- }
- if ($in_charset != 'ASCII' && function_exists('mb_convert_encoding')) {
- $cell = mb_convert_encoding($cell, $options['reportencoding'], $in_charset);
- }
- }
- }
-
- // create new format object, if necessary (to avoid "too many cell formats" error)
- if (!isset($fmt)) {
- $fmt = &$wb->add_format($fmt_properties);
- $fmt->properties = &$fmt_properties;
-
- // set vertical alignment
- if (isset($fmt->properties['v_align'])) {
- $fmt->set_align($fmt->properties['v_align']);
- } else {
- $fmt->set_align('top'); // default
- }
- }
-
- // write cell
- if (is_numeric($cell) && !preg_match("/^0./", $cell)) {
- $ws->write_number($row, $col, $cell, $fmt);
- } else {
- $ws->write_string($row, $col, $cell, $fmt);
- }
- } // end foreach $col
-
- // increment $row
- $row++;
- }
+ function print_excel_report(&$course, &$hotpot, &$tables, &$options) {
+ global $CFG;
+
+ // create Excel workbook
+ if (file_exists("$CFG->libdir/excellib.class.php")) {
+ // Moodle >= 1.6
+ require_once("$CFG->libdir/excellib.class.php");
+ $wb = new MoodleExcelWorkbook("-");
+ } else {
+ // Moodle <= 1.5
+ require_once("$CFG->libdir/excel/Worksheet.php");
+ require_once("$CFG->libdir/excel/Workbook.php");
+ $wb = new Workbook("-");
+ }
+
+ // send HTTP headers
+ $this->print_excel_headers($wb, $course, $hotpot);
+
+ // create one worksheet for each table
+ foreach($tables as $table) {
+ unset($ws);
+ $ws = &$wb->add_worksheet(empty($table->caption) ? '' : strip_tags($table->caption));
+
+ $row = 0;
+ $this->print_excel_head($wb, $ws, $table, $row, $options);
+ $this->print_excel_data($wb, $ws, $table, $row, $options);
+ $this->print_excel_stat($wb, $ws, $table, $row, $options);
+ $this->print_excel_foot($wb, $ws, $table, $row, $options);
+ }
+
+ // close the workbook (and send it to the browser)
+ $wb->close();
+ }
+ function print_excel_headers(&$wb, &$course, &$hotpot) {
+ $downloadfilename = clean_filename("$course->shortname $hotpot->name.xls");
+ if (method_exists($wb, 'send')) {
+ // Moodle >=1.6
+ $wb->send($downloadfilename);
+ } else {
+ // Moodle <=1.5
+ header("Content-type: application/vnd.ms-excel");
+ header("Content-Disposition: attachment; filename=$downloadfilename" );
+ header("Expires: 0");
+ header("Cache-Control: must-revalidate, post-check=0,pre-check=0");
+ header("Pragma: public");
+ }
+ }
+ function print_excel_head(&$wb, &$ws, &$table, &$row, &$options) {
+ // define format properties
+ $properties = array(
+ 'bold'=>1,
+ 'align'=>'center',
+ 'v_align'=>'bottom',
+ 'text_wrap'=>1
+ );
+
+ // expand multi-column and multi-row cells
+ $this->expand_spans($table, 'head');
+
+ // print the headings
+ $this->print_excel_cells($wb, $ws, $table, $row, $properties, $table->head, $options);
+ }
+ function print_excel_data(&$wb, &$ws, &$table, &$row, &$options) {
+ // do nothing if there are no cells
+ if (empty($table->data)) return;
+
+ // define format properties
+ $properties = array('text_wrap' => (empty($options['reportwrapdata']) ? 0 : 1));
+
+ // expand multi-column and multi-row cells
+ $this->expand_spans($table, 'data');
+
+ // print rows
+ foreach ($table->data as $cells) {
+ $this->print_excel_cells($wb, $ws, $table, $row, $properties, $cells, $options);
+ }
+ }
+ function print_excel_stat(&$wb, &$ws, &$table, &$row, &$options) {
+ // do nothing if there are no cells
+ if (empty($table->stat)) return;
+
+ // define format properties
+ $properties = array('align'=>'right');
+
+ // expand multi-column and multi-row cells
+ $this->expand_spans($table, 'stat');
+
+ // print rows
+ $i_count = count($table->stat);
+ foreach ($table->stat as $i => $cells) {
+
+ // set border on top and bottom row
+ $properties['top'] = ($i==0) ? 1 : 0;
+ $properties['bottom'] = ($i==($i_count-1)) ? 1 : 0;
+
+ // print this row
+ $this->print_excel_cells($wb, $ws, $table, $row, $properties, $cells, $options, $table->statheadercols);
+ }
+ }
+ function print_excel_foot(&$wb, &$ws, &$table, &$row, &$options) {
+ // do nothing if there are no cells
+ if (empty($table->foot)) return;
+
+ // define format properties
+ $properties = array('bold'=>1, 'align'=>'center');
+
+ // expand multi-column and multi-row cells
+ $this->expand_spans($table, 'foot');
+
+ // print rows
+ $i_count = count($table->foot);
+ foreach ($table->foot as $i => $cells) {
+
+ // set border on top and bottom row
+ $properties['top'] = ($i==0) ? 1 : 0;
+ $properties['bottom'] = ($i==($i_count-1)) ? 1 : 0;
+
+ // print this footer row
+ $this->print_excel_cells($wb, $ws, $table, $row, $properties, $cells, $options);
+ }
+ }
+
+ function print_excel_cells(&$wb, &$ws, &$table, &$row, &$properties, &$cells, &$options, $statheadercols=NULL) {
+ // do nothing if there are no cells
+ if (empty($cells) || is_string($cells)) return;
+
+ // print cells
+ foreach($cells as $col => $cell) {
+
+ unset($fmt_properties);
+ $fmt_properties = $properties;
+
+ if (empty($fmt_properties['text_wrap'])) {
+ if (strlen("$cell")>=9) {
+ // long cell value
+ $fmt_properties['align'] = 'left';
+ }
+ } else {
+ if (strlen("$cell")<9 && strpos("$cell", "\n")===false) {
+ // short cell value (wrapping not required)
+ $fmt_properties['text_wrap'] = 0;
+ }
+ }
+
+ // set bold, if required (for stat)
+ if (isset($statheadercols)) {
+ $fmt_properties['bold'] = in_array($col, $statheadercols) ? 1 : 0;
+ $fmt_properties['align'] = in_array($col, $statheadercols) ? 'right' : $table->align[$col];
+ }
+
+ // set align, if required
+ if (isset($table->align[$col]) && empty($fmt_properties['align'])) {
+ $fmt_properties['align'] = $table->align[$col];
+ }
+
+ // check to see that an identical format object has not already been created
+ unset($fmt);
+
+ if (isset($wb->pear_excel_workbook)) {
+ // Moodle >=1.6
+ $fmt_properties_obj = (object)$fmt_properties;
+ foreach ($wb->pear_excel_workbook->_formats as $id=>$format) {
+ if ($format==$fmt_properties_obj) {
+ $fmt = &$wb->pear_excel_workbook->_formats[$id];
+ break;
+ }
+ }
+ } else {
+ // Moodle <=1.5
+ foreach ($wb->formats as $id=>$format) {
+ if (isset($format->properties) && $format->properties==$fmt_properties) {
+ $fmt = &$wb->formats[$id];
+ break;
+ }
+ }
+ if (is_numeric($cell) || empty($options['reportencoding'])) {
+ // do nothing
+ } else {
+ $in_charset = '';
+ if (function_exists('mb_convert_encoding')) {
+ $in_charset = mb_detect_encoding($cell, 'auto');
+ }
+ if (empty($in_charset)) {
+ $in_charset = get_string('thischarset');
+ }
+ if ($in_charset != 'ASCII' && function_exists('mb_convert_encoding')) {
+ $cell = mb_convert_encoding($cell, $options['reportencoding'], $in_charset);
+ }
+ }
+ }
+
+ // create new format object, if necessary (to avoid "too many cell formats" error)
+ if (!isset($fmt)) {
+ $fmt = &$wb->add_format($fmt_properties);
+ $fmt->properties = &$fmt_properties;
+
+ // set vertical alignment
+ if (isset($fmt->properties['v_align'])) {
+ $fmt->set_align($fmt->properties['v_align']);
+ } else {
+ $fmt->set_align('top'); // default
+ }
+ }
+
+ // write cell
+ if (is_numeric($cell) && !preg_match("/^0./", $cell)) {
+ $ws->write_number($row, $col, $cell, $fmt);
+ } else {
+ $ws->write_string($row, $col, $cell, $fmt);
+ }
+ } // end foreach $col
+
+ // increment $row
+ $row++;
+ }
}
?>
diff --git a/mod/hotpot/review.php b/mod/hotpot/review.php
index 8d2b8fcad8..06f1169654 100644
--- a/mod/hotpot/review.php
+++ b/mod/hotpot/review.php
@@ -1,240 +1,240 @@
course)) {
- error("Course is misconfigured");
- }
- if (! $hotpot = get_record("hotpot", "id", $cm->instance)) {
- error("Course module is incorrect");
- }
- } else {
- if (! $hotpot = get_record("hotpot", "id", $hp)) {
- error("Course module is incorrect");
- }
- if (! $course = get_record("course", "id", $hotpot->course)) {
- error("Course is misconfigured");
- }
- if (! $cm = get_coursemodule_from_instance("hotpot", $hotpot->id, $course->id)) {
- error("Course Module ID was incorrect");
- }
- }
- if (! $attempt = get_record("hotpot_attempts", "id", $attempt)) {
- error("Attempt ID was incorrect");
- }
- require_login($course->id);
- if (!isteacher($course->id)) {
- if (!$hotpot->review) {
- error(get_string("noreview", "quiz"));
- }
- //if (time() < $hotpot->timeclose) {
- // error(get_string("noreviewuntil", "quiz", userdate($hotpot->timeclose)));
- //}
- if ($attempt->userid != $USER->id) {
- error("This is not your attempt!");
- }
- }
- add_to_log($course->id, "hotpot", "review", "review.php?id=$cm->id&attempt=$attempt->id", "$hotpot->id", "$cm->id");
+ require_once("../../config.php");
+ require_once("lib.php");
+ $id = optional_param("id"); // Course Module ID, or
+ $hp = optional_param("hp"); // hotpot ID
+ $attempt = required_param("attempt"); // A particular attempt ID for review
+ if ($id) {
+ if (! $cm = get_coursemodule_from_id('hotpot', $id)) {
+ error("Course Module ID was incorrect");
+ }
+ if (! $course = get_record("course", "id", $cm->course)) {
+ error("Course is misconfigured");
+ }
+ if (! $hotpot = get_record("hotpot", "id", $cm->instance)) {
+ error("Course module is incorrect");
+ }
+ } else {
+ if (! $hotpot = get_record("hotpot", "id", $hp)) {
+ error("Course module is incorrect");
+ }
+ if (! $course = get_record("course", "id", $hotpot->course)) {
+ error("Course is misconfigured");
+ }
+ if (! $cm = get_coursemodule_from_instance("hotpot", $hotpot->id, $course->id)) {
+ error("Course Module ID was incorrect");
+ }
+ }
+ if (! $attempt = get_record("hotpot_attempts", "id", $attempt)) {
+ error("Attempt ID was incorrect");
+ }
+ require_login($course->id);
+ if (!isteacher($course->id)) {
+ if (!$hotpot->review) {
+ error(get_string("noreview", "quiz"));
+ }
+ //if (time() < $hotpot->timeclose) {
+ // error(get_string("noreviewuntil", "quiz", userdate($hotpot->timeclose)));
+ //}
+ if ($attempt->userid != $USER->id) {
+ error("This is not your attempt!");
+ }
+ }
+ add_to_log($course->id, "hotpot", "review", "review.php?id=$cm->id&attempt=$attempt->id", "$hotpot->id", "$cm->id");
// Print the page header
- $strmodulenameplural = get_string("modulenameplural", "hotpot");
- $strmodulename = get_string("modulename", "hotpot");
- // print header
- $title = "$course->shortname: $hotpot->name";
- $heading = "$course->fullname";
- $navigation = "id\">$strmodulenameplural -> ".get_string("review", "quiz");
- if ($course->category) {
- $navigation = "id\">$course->shortname -> $navigation";
- }
- $button = update_module_button($cm->id, $course->id, $strmodulename);
- print_header($title, $heading, $navigation, "", "", true, $button, navmenu($course, $cm));
- print '
'; // for overlib
- print_heading($hotpot->name);
- hotpot_print_attempt_summary($hotpot, $attempt);
- hotpot_print_review_buttons($course, $hotpot, $attempt);
- $action = isteacher($course->id) ? optional_param('action') : '';
- if ($action) {
- $xml = get_field('hotpot_details', 'details', 'attempt', $attempt->id);
- print '';
- $xml_tree = new hotpot_xml_tree($xml, "['hpjsresult']['#']");
- print_r ($xml_tree->xml_value('fields'));
- print ' ';
- break;
- case 'showxmlsource':
- print htmlspecialchars($xml);
- break;
- default:
- print "Action '$action' not recognized";
- }
- print 'id\">$strmodulenameplural -> ".get_string("review", "quiz");
+ if ($course->category) {
+ $navigation = "id\">$course->shortname -> $navigation";
+ }
+ $button = update_module_button($cm->id, $course->id, $strmodulename);
+ print_header($title, $heading, $navigation, "", "", true, $button, navmenu($course, $cm));
+ print '
'; // for overlib
+ print_heading($hotpot->name);
+ hotpot_print_attempt_summary($hotpot, $attempt);
+ hotpot_print_review_buttons($course, $hotpot, $attempt);
+ $action = isteacher($course->id) ? optional_param('action') : '';
+ if ($action) {
+ $xml = get_field('hotpot_details', 'details', 'attempt', $attempt->id);
+ print '';
+ $xml_tree = new hotpot_xml_tree($xml, "['hpjsresult']['#']");
+ print_r ($xml_tree->xml_value('fields'));
+ print ' ';
+ break;
+ case 'showxmlsource':
+ print htmlspecialchars($xml);
+ break;
+ default:
+ print "Action '$action' not recognized";
+ }
+ print ''."\n";
- // add attempt properties
- $fields = array('attempt', 'score', 'penalties', 'status', 'timetaken', 'timerecorded');
- foreach ($fields as $field) {
- switch ($field) {
- case 'score':
- $value = hotpot_format_score($attempt);
- break;
- case 'status':
- $value = hotpot_format_status($attempt);
- break;
- case 'timerecorded':
- $value = empty($attempt->timefinish) ? '-' : userdate($attempt->timefinish);
- break;
- case 'timetaken':
- $value = empty($attempt->timefinish) ? '-' : format_time($attempt->timefinish - $attempt->timestart);
- break;
- default:
- $value = isset($attempt->$field) ? $attempt->$field : NULL;
- }
- if (isset($value)) {
- switch ($field) {
- case 'status':
- case 'timerecorded':
- $name = get_string('report'.$field, 'hotpot');
- break;
- case 'penalties':
- $name = get_string('penalties', 'hotpot');
- break;
- default:
- $name = get_string($field, 'quiz');
- }
- print ''.$value.'
';
- print_simple_box_end();
+ // start table
+ print_simple_box_start("center", "80%", "#ffffff", 0);
+ print ''."\n";
+ // add attempt properties
+ $fields = array('attempt', 'score', 'penalties', 'status', 'timetaken', 'timerecorded');
+ foreach ($fields as $field) {
+ switch ($field) {
+ case 'score':
+ $value = hotpot_format_score($attempt);
+ break;
+ case 'status':
+ $value = hotpot_format_status($attempt);
+ break;
+ case 'timerecorded':
+ $value = empty($attempt->timefinish) ? '-' : userdate($attempt->timefinish);
+ break;
+ case 'timetaken':
+ $value = empty($attempt->timefinish) ? '-' : format_time($attempt->timefinish - $attempt->timestart);
+ break;
+ default:
+ $value = isset($attempt->$field) ? $attempt->$field : NULL;
+ }
+ if (isset($value)) {
+ switch ($field) {
+ case 'status':
+ case 'timerecorded':
+ $name = get_string('report'.$field, 'hotpot');
+ break;
+ case 'penalties':
+ $name = get_string('penalties', 'hotpot');
+ break;
+ default:
+ $name = get_string($field, 'quiz');
+ }
+ print ''.$value.'
';
+ print_simple_box_end();
}
function hotpot_print_review_buttons(&$course, &$hotpot, &$attempt) {
- print "\n".'';
- print "\n\n".'';
- print_single_button("report.php?hp=$hotpot->id", NULL, get_string('continue'), 'post');
- if (isteacher($course->id) && record_exists('hotpot_details', 'attempt', $attempt->id)) {
- print " \n".'';
- print_single_button("review.php?hp=$hotpot->id&attempt=$attempt->id&action=showxmlsource", NULL, get_string('showxmlsource', 'hotpot'), 'post');
- print " \n".'';
- print_single_button("review.php?hp=$hotpot->id&attempt=$attempt->id&action=showxmltree", NULL, get_string('showxmltree', 'hotpot'), 'post');
- $colspan = 3;
- } else {
- $colspan = 1;
- }
- print " \n \n";
- print '';
- print_spacer(4, 1, false); // height=4, width=1, no
\n";
+ print "\n".'';
+ print "\n\n".'';
+ print_single_button("report.php?hp=$hotpot->id", NULL, get_string('continue'), 'post');
+ if (isteacher($course->id) && record_exists('hotpot_details', 'attempt', $attempt->id)) {
+ print " \n".'';
+ print_single_button("review.php?hp=$hotpot->id&attempt=$attempt->id&action=showxmlsource", NULL, get_string('showxmlsource', 'hotpot'), 'post');
+ print " \n".'';
+ print_single_button("review.php?hp=$hotpot->id&attempt=$attempt->id&action=showxmltree", NULL, get_string('showxmltree', 'hotpot'), 'post');
+ $colspan = 3;
+ } else {
+ $colspan = 1;
+ }
+ print " \n \n";
+ print '';
+ print_spacer(4, 1, false); // height=4, width=1, no
\n";
}
function hotpot_print_attempt_details(&$hotpot, &$attempt) {
- // define fields to print
- $textfields = array('correct', 'ignored', 'wrong');
- $numfields = array('score', 'weighting', 'hints', 'clues', 'checks');
- $fields = array_merge($textfields, $numfields);
- $q = array(); // questions
- $f = array(); // fields
- foreach ($fields as $field) {
- $name = get_string($field, 'hotpot');
- $f[$field] = array('count'=>0, 'name'=>$name);
- }
- // get questions and responses for this attempt
- $questions = get_records_select('hotpot_questions', "hotpot='$hotpot->id'", 'id');
- $responses = get_records_select('hotpot_responses', "attempt='$attempt->id'", 'id');
- if ($questions && $responses) {
- foreach ($responses as $response) {
- $id = $response->question;
- foreach ($fields as $field) {
- if (!isset($f[$field])) {
- $name = get_string($field, 'hotpot');
- $f[$field] = array('count'=>0, 'name'=>$name);
- }
- if (isset($response->$field)) {
- $f[$field]['count']++;
- if (!isset($q[$id])) {
- $name = hotpot_get_question_name($questions[$id]);
- $q[$id] = array('name'=>$name);
- }
- $q[$id][$field] = $response->$field;
- }
- }
- }
- }
- // count the number of columns required in the table
- $colspan = 0;
- foreach ($numfields as $field) {
- if ($f[$field]['count']) {
- $colspan += 2;
- }
- }
- $colspan = max(2, $colspan);
- // start table of questions and responses
- print_simple_box_start("center", "80%", "#ffffff", 0);
- print ''."\n";
- if (empty($q)) {
- print ''.get_string("noresponses", "hotpot")."
'.$question['name'].' '.$text.' ';
- foreach ($numfields as $field) {
- if ($f[$field]['count']) {
- // print question if necessary
- if (!$printedquestion) {
- print ''.$question['name']." \n";
- $printedquestion = true;
- }
- // print numeric response
- $value = isset($question[$field]) ? $question[$field] : '-';
- print ''.$value.' ';
- }
- }
- print " \n";
- } // foreach $q
- }
- // finish table
- print "
\n";
- print_simple_box_end();
+ // define fields to print
+ $textfields = array('correct', 'ignored', 'wrong');
+ $numfields = array('score', 'weighting', 'hints', 'clues', 'checks');
+ $fields = array_merge($textfields, $numfields);
+ $q = array(); // questions
+ $f = array(); // fields
+ foreach ($fields as $field) {
+ $name = get_string($field, 'hotpot');
+ $f[$field] = array('count'=>0, 'name'=>$name);
+ }
+ // get questions and responses for this attempt
+ $questions = get_records_select('hotpot_questions', "hotpot='$hotpot->id'", 'id');
+ $responses = get_records_select('hotpot_responses', "attempt='$attempt->id'", 'id');
+ if ($questions && $responses) {
+ foreach ($responses as $response) {
+ $id = $response->question;
+ foreach ($fields as $field) {
+ if (!isset($f[$field])) {
+ $name = get_string($field, 'hotpot');
+ $f[$field] = array('count'=>0, 'name'=>$name);
+ }
+ if (isset($response->$field)) {
+ $f[$field]['count']++;
+ if (!isset($q[$id])) {
+ $name = hotpot_get_question_name($questions[$id]);
+ $q[$id] = array('name'=>$name);
+ }
+ $q[$id][$field] = $response->$field;
+ }
+ }
+ }
+ }
+ // count the number of columns required in the table
+ $colspan = 0;
+ foreach ($numfields as $field) {
+ if ($f[$field]['count']) {
+ $colspan += 2;
+ }
+ }
+ $colspan = max(2, $colspan);
+ // start table of questions and responses
+ print_simple_box_start("center", "80%", "#ffffff", 0);
+ print ''."\n";
+ if (empty($q)) {
+ print ''.get_string("noresponses", "hotpot")."
'.$question['name'].' '.$text.' ';
+ foreach ($numfields as $field) {
+ if ($f[$field]['count']) {
+ // print question if necessary
+ if (!$printedquestion) {
+ print ''.$question['name']." \n";
+ $printedquestion = true;
+ }
+ // print numeric response
+ $value = isset($question[$field]) ? $question[$field] : '-';
+ print ''.$value.' ';
+ }
+ }
+ print " \n";
+ } // foreach $q
+ }
+ // finish table
+ print "
\n";
+ print_simple_box_end();
}
?>
diff --git a/mod/hotpot/show.php b/mod/hotpot/show.php
index 923780f038..2905ec256f 100644
--- a/mod/hotpot/show.php
+++ b/mod/hotpot/show.php
@@ -1,68 +1,68 @@
action = required_param('action');
- $params->course = required_param('course');
- $params->reference = required_param('reference');
- require_login($params->course);
- if (!isteacher($params->course)) {
- error("You are not allowed to view this page!");
- }
- if (isadmin()) {
- $params->location = optional_param('location', HOTPOT_LOCATION_COURSEFILES);
- } else {
- $params->location = HOTPOT_LOCATION_COURSEFILES;
- }
- $title = get_string($params->action, 'hotpot').': '.$params->reference;
- print_header($title, $title);
- hotpot_print_show_links($params->course, $params->location, $params->reference);
+ require_once("../../config.php");
+ require_once("lib.php");
+ require_login();
+ // fetch and clean the required $_GET parameters
+ // (script stops here if any parameters are missing)
+ unset($params);
+ $params->action = required_param('action');
+ $params->course = required_param('course');
+ $params->reference = required_param('reference');
+ require_login($params->course);
+ if (!isteacher($params->course)) {
+ error("You are not allowed to view this page!");
+ }
+ if (isadmin()) {
+ $params->location = optional_param('location', HOTPOT_LOCATION_COURSEFILES);
+ } else {
+ $params->location = HOTPOT_LOCATION_COURSEFILES;
+ }
+ $title = get_string($params->action, 'hotpot').': '.$params->reference;
+ print_header($title, $title);
+ hotpot_print_show_links($params->course, $params->location, $params->reference);
?>
';
- switch ($params->action) {
- case 'showxmlsource':
- print htmlspecialchars($hp->source);
- break;
- case 'showxmltree':
- print_r($hp->xml);
- break;
- case 'showhtmlsource':
- print htmlspecialchars($hp->html);
- break;
- case 'showhtmlquiz':
- print $hp->html;
- break;
- }
- print '';
- } else {
- print_simple_box("Could not open Hot Potatoes XML file", "center", "", "#FFBBBB");
- }
- print_simple_box_end();
- print '';
+ switch ($params->action) {
+ case 'showxmlsource':
+ print htmlspecialchars($hp->source);
+ break;
+ case 'showxmltree':
+ print_r($hp->xml);
+ break;
+ case 'showhtmlsource':
+ print htmlspecialchars($hp->html);
+ break;
+ case 'showhtmlquiz':
+ print $hp->html;
+ break;
+ }
+ print ' ';
+ } else {
+ print_simple_box("Could not open Hot Potatoes XML file", "center", "", "#FFBBBB");
+ }
+ print_simple_box_end();
+ print ''.$value.'
');
- return $title.$value;
- }
- function v6_expand_ReadingTitle() {
- $value = $this->parent->xml_value('data,reading,reading-title');
- return empty($value) ? '' : (''.$value.' ');
- }
-
- // timer
-
- function v6_expand_Timer() {
- return $this->int_value('data,timer,include-timer');
- }
- function v6_expand_JSTimer() {
- return $this->read_template('hp6timer.js_');
- }
- function v6_expand_Seconds() {
- return $this->parent->xml_value('data,timer,seconds');
- }
-
- // send results
-
- function v6_expand_SendResults() {
- return $this->parent->xml_value('hotpot-config-file,'.$this->parent->quiztype.',send-email');
- }
- function v6_expand_JSSendResults() {
- return $this->read_template('hp6sendresults.js_');
- }
- function v6_expand_FormMailURL() {
- return $this->parent->xml_value('hotpot-config-file,global,formmail-url');
- }
- function v6_expand_EMail() {
- return $this->parent->xml_value('hotpot-config-file,global,email');
- }
- function v6_expand_NamePlease() {
- return $this->js_value('hotpot-config-file,global,name-please');
- }
-
- // preload images
-
- function v6_expand_PreloadImages() {
- $value = $this->v6_expand_PreloadImageList();
- return empty($value) ? false : true;
- }
- function v6_expand_PreloadImageList() {
-
- // check it has not been set already
- if (!isset($this->PreloadImageList)) {
-
- // the list of image urls
- $list = array();
-
- // extract '.$this->parent->xml_value('data,matching-exercise,default-right-item').' ';
- foreach ($r_keys as $key) {
- $options .= ''.$r_items[$key]['text'][0]['#'].' '."\n";
- }
-
- $str = '';
- foreach ($l_keys as $key) {
- $str .= ''.$l_items[$key]['text'][0]['#'].' ';
- $str .= ''.$options.' js_safe($values[$key], true)."';\n";
- $str .= "Segments[$i][1] = ".($key+1).";\n";
- $str .= "Segments[$i][2] = 0;\n";
- }
- return $str;
- }
- function v6_expand_AnswerArray() {
-
- $segments = array();
- $values = array();
- $VALUES = array();
- $escapedvalues = array();
-
- // XML tags to the start of a segment
- $tags = 'data,jumbled-order-exercise,main-order,segment';
-
- $i = 0;
- while ($value = $this->parent->xml_value($tags, "[$i]['#']")) {
- $VALUE = strtoupper($value);
- $key = array_search($VALUE, $VALUES);
- if (is_numeric($key)) {
- $segments[] = $key+1;
- } else {
- $segments[] = $i+1;
- $values[$i] = $value;
- $VALUES[$i] = $VALUE;
- $escapedvalues[] = preg_quote($value, '/');
- }
- $i++;
- }
-
- // start the answers array
- $a = 0;
- $str = 'Answers['.($a++).'] = new Array('.implode(',', $segments).");\n";
-
- // pattern to match the next part of an alternate answer
- $pattern = '/^('.implode('|', $escapedvalues).')\\s*/i';
-
- // XML tags to the start of an alternate answer
- $tags = 'data,jumbled-order-exercise,alternate';
-
- $i = 0;
- while ($value = $this->parent->xml_value($tags, "[$i]['#']")) {
- $segments = array();
- while (strlen($value) && preg_match($pattern, $value, $matches)) {
- $key = array_search($matches[1], $values);
- if (is_numeric($key)) {
- $segments[] = $key+1;
- $value = substr($value, strlen($matches[0]));
- } else {
- // invalid alternate sequence
- $segments = array();
- break;
- }
- }
- if (count($segments)) {
- $str .= 'Answers['.($a++).'] = new Array('.implode(',', $segments).");\n";
- }
- $i++;
- }
- return $str;
- }
-
- // ===============================================================
-
- // JMix (jmix6.js_)
-
- function v6_expand_RemainingWords() {
- return $this->parent->xml_value('hotpot-config-file,'.$this->parent->quiztype.',remaining-words');
- }
- function v6_expand_TimesUp() {
- return $this->parent->xml_value('hotpot-config-file,global,times-up');
- }
-
- // nav bar
-
- function v6_expand_NavBar($navbarid='') {
- $this->navbarid = $navbarid;
-
- $tag = 'navbar';
- $this->read_template('hp6navbar.ht_', $tag);
-
- unset($this->navbarid);
-
- return $this->$tag;
- }
- function v6_expand_TopNavBar() {
- return $this->v6_expand_NavBar('TopNavBar');
- }
- function v6_expand_BottomNavBar() {
- return $this->v6_expand_NavBar('BottomNavBar');
- }
-
- // hp6navbar.ht_
-
- function v6_expand_NavBarID() {
- // $this->navbarid is set in "$this->v6_expand_NavBar"
- return empty($this->navbarid) ? '' : $this->navbarid;
- }
- function v6_expand_ContentsURL() {
- $url = $this->parent->xml_value('hotpot-config-file,global,contents-url');
- if ($url) {
- $url = hotpot_convert_navbutton_url($this->parent->get_baseurl(), $this->parent->reference, $url, $this->parent->course);
- }
- return $url;
- }
- function v6_expand_NextExURL() {
- $url = $this->parent->xml_value('hotpot-config-file,'.$this->parent->quiztype.',next-ex-url');
- if ($url) {
- $url = hotpot_convert_navbutton_url($this->parent->get_baseurl(), $this->parent->reference, $url, $this->parent->course);
- }
- return $url;
- }
-
- // conditional blocks
-
- function v6_expand_ShowAnswer() {
- return $this->int_value('hotpot-config-file,'.$this->parent->quiztype.',include-show-answer');
- }
- function v6_expand_Slide() {
- return true; // whats's this (JMatch drag and drop)
- }
-
- // specials (JMatch)
-
- function v6_expand_FixedArray() {
- $l_items = array();
- $r_items = array();
- $this->get_jmatch_items($l_items, $r_items);
-
- $str = '';
- foreach ($l_items as $i=>$item) {
- $str .= "F[$i] = new Array();\n";
- $str .= "F[$i][0] = '".$this->js_safe($item['text'][0]['#'], true)."';\n";
- $str .= "F[$i][1] = ".($i+1).";\n";
- }
- return $str;
- }
- function v6_expand_DragArray() {
- $l_items = array();
- $r_items = array();
- $this->get_jmatch_items($l_items, $r_items);
-
- $str = '';
- foreach ($r_items as $i=>$item) {
- $str .= "D[$i] = new Array();\n";
- $str .= "D[$i][0] = '".$this->js_safe($item['text'][0]['#'], true)."';\n";
- $str .= "D[$i][1] = ".($i+1).";\n";
- $str .= "D[$i][2] = 0;\n";
- }
- return $str;
- }
-
- function get_jmatch_items(&$l_items, &$r_items) {
- $tags = 'data,matching-exercise,pair';
- $i = 0;
- while($item = $this->parent->xml_value($tags,"[$i]['#']['left-item'][0]['#']")) {
- if (!empty($item['text'][0]['#'])) {
- $l_items[] = $item;
- }
- $i++;
- }
- $i = 0;
- while($item = $this->parent->xml_value($tags,"[$i]['#']['right-item'][0]['#']")) {
- if (!empty($item['text'][0]['#'])) {
- $r_items[] = $item;
- }
- $i++;
- }
- }
- function shuffle_jmatch_items(&$items) {
- // get moveable items
- $moveable_keys = array();
- for($i=0; $iseed_random_number_generator();
- shuffle($moveable_keys);
-
- $keys = array();
- for($i=0, $ii=0; $iparent->quiztype) {
- case 'jcloze':
- $tags = 'data,gap-fill,question-record';
- while (($question="[$q]['#']") && $this->parent->xml_value($tags, $question)) {
- $a = 0;
- $aa = 0;
- while (($answer=$question."['answer'][$a]['#']") && $this->parent->xml_value($tags, $answer)) {
- $text = $this->js_value($tags, $answer."['text'][0]['#']", true);
- if (strlen($text)) {
- if ($aa==0) { // first time only
- $str .= "\n";
- $str .= "I[$q] = new Array();\n";
- $str .= "I[$q][1] = new Array();\n";
- }
- $str .= "I[$q][1][$aa] = new Array();\n";
- $str .= "I[$q][1][$aa][0] = '$text';\n";
- $aa++;
- }
- $a++;
- }
- // add clue, if any answers were found
- if ($aa) {
- $clue = $this->js_value($tags, $question."['clue'][0]['#']", true);
- $str .= "I[$q][2] = '$clue';\n";
- }
- $q++;
- }
- break;
- case 'jquiz':
- $str .= "I=new Array();\n";
- $tags = 'data,questions,question-record';
- while (($question="[$q]['#']") && $this->parent->xml_value($tags, $question)) {
-
- $question_type = $this->int_value($tags, $question."['question-type'][0]['#']");
- $weighting = $this->int_value($tags, $question."['weighting'][0]['#']");
- $clue = $this->js_value($tags, $question."['clue'][0]['#']", true);
-
- $answers = $question."['answers'][0]['#']";
-
- $a = 0;
- $aa = 0;
- while (($answer = $answers."['answer'][$a]['#']") && $this->parent->xml_value($tags, $answer)) {
- $text = $this->js_value($tags, $answer."['text'][0]['#']", true);
- $feedback = $this->js_value($tags, $answer."['feedback'][0]['#']", true);
- $correct = $this->int_value($tags, $answer."['correct'][0]['#']");
- $percent = $this->int_value($tags, $answer."['percent-correct'][0]['#']");
- $include = $this->int_value($tags, $answer."['include-in-mc-options'][0]['#']");
- if (strlen($text)) {
- if ($aa==0) { // first time only
- $str .= "\n";
- $str .= "I[$q] = new Array();\n";
- $str .= "I[$q][0] = $weighting;\n";
- $str .= "I[$q][1] = '$clue';\n";
- $str .= "I[$q][2] = '".($question_type-1)."';\n";
- $str .= "I[$q][3] = new Array();\n";
- }
- $str .= "I[$q][3][$aa] = new Array('$text','$feedback',$correct,$percent,$include);\n";
- $aa++;
- }
- $a++;
- }
- $q++;
- }
- break;
- }
- return $str;
- }
-
- function v6_expand_ClozeBody() {
- $str = '';
-
- // get drop down list of words, if required
- $dropdownlist = '';
- if ($this->v6_use_DropDownList()) {
- $this->v6_set_WordList();
- foreach ($this->wordlist as $word) {
- $dropdownlist .= ''.$word.' ';
- }
- }
-
- // cache clues flag and caption
- $includeclues = $this->v6_expand_Clues();
- $cluecaption = $this->v6_expand_ClueCaption();
-
- // detect if cloze starts with gap
- $strpos = strpos($this->parent->source, '');
- if (is_numeric($strpos)) {
- $startwithgap = true;
- } else {
- $startwithgap = false;
- }
-
- // initialize loop values
- $q = 0;
- $tags = 'data,gap-fill';
- $question_record = "$tags,question-record";
-
- // loop through text and gaps
- do {
- $text = $this->parent->xml_value($tags, "[0]['#'][$q]");
- $gap = '';
- if (($question="[$q]['#']") && $this->parent->xml_value($question_record, $question)) {
- $gap .= '';
- if ($this->v6_use_DropDownList()) {
- $gap .= ''.$cluecaption.' ';
- }
- }
- $gap .= ' ';
- }
- if ($startwithgap) {
- $str .= "$gap$text";
- } else {
- $str .= "$text$gap";
- }
- $q++;
- } while (strlen($text) || strlen($gap));
-
- return $str;
- }
-
- // JCloze quiztype
-
- function v6_expand_WordList() {
- $str = '';
- if ($this->v6_include_WordList()) {
- $this->v6_set_WordList();
- $str = implode(' ', $this->wordlist);
- }
- return $str;
- }
- function v6_include_WordList() {
- return $this->int_value('hotpot-config-file,'.$this->parent->quiztype.',include-word-list');
- }
- function v6_use_DropDownList() {
- return $this->int_value('hotpot-config-file,'.$this->parent->quiztype.',use-drop-down-list');
- }
- function v6_set_WordList() {
-
- if (isset($this->wordlist)) {
- // do nothing
- } else {
- $this->wordlist = array();
-
- // is the wordlist required
- if ($this->v6_include_WordList() || $this->v6_use_DropDownList()) {
-
- $q = 0;
- $tags = 'data,gap-fill,question-record';
- while (($question="[$q]['#']") && $this->parent->xml_value($tags, $question)) {
- $a = 0;
- $aa = 0;
- while (($answer=$question."['answer'][$a]['#']") && $this->parent->xml_value($tags, $answer)) {
- $text = $this->parent->xml_value($tags, $answer."['text'][0]['#']");
- $correct = $this->int_value($tags, $answer."['correct'][0]['#']");
- if ($text && $correct) { // $correct is always true
- $this->wordlist[] = $text;
- $aa++;
- }
- $a++;
- }
- $q++;
- }
- $this->wordlist = array_unique($this->wordlist);
- sort($this->wordlist);
- }
- }
- }
- function v6_expand_Keypad() {
- $str = '';
- if ($this->int_value('hotpot-config-file,'.$this->parent->quiztype.',include-keypad')) {
-
- // these characters must always be in the keypad
- $chars = array();
- $this->add_keypad_chars($chars, $this->parent->xml_value('hotpot-config-file,global,keypad-characters'));
-
- // append other characters used in the answers
- $tags = '';
- switch ($this->parent->quiztype) {
- case 'jcloze':
- $tags = 'data,gap-fill,question-record';
- break;
- case 'jquiz':
- $tags = 'data,questions,question-record';
- break;
- }
- if ($tags) {
- $q = 0;
- while (($question="[$q]['#']") && $this->parent->xml_value($tags, $question)) {
-
- if ($this->parent->quiztype=='jquiz') {
- $answers = $question."['answers'][0]['#']";
- } else {
- $answers = $question;
- }
-
- $a = 0;
- while (($answer=$answers."['answer'][$a]['#']") && $this->parent->xml_value($tags, $answer)) {
- $this->add_keypad_chars($chars, $this->parent->xml_value($tags, $answer."['text'][0]['#']"));
- $a++;
- }
- $q++;
- }
- }
-
- // remove duplicate characters and sort
- $chars = array_unique($chars);
- usort($chars, "hotpot_sort_keypad_chars");
-
- // create keypad buttons for each character
- $str .= '';
- foreach ($chars as $char) {
- $str .= "js_safe($char, true)."'); return false;\">$char ";
- }
- $str .= '
';
- }
- return $str;
- }
- function add_keypad_chars(&$chars, $text) {
- if (preg_match_all('|&[^;]+;|i', $text, $more_chars)) {
- $chars = array_merge($chars, $more_chars[0]);
- }
- }
- function v6_expand_Correct() {
- return $this->js_value('hotpot-config-file,'.$this->parent->quiztype.',guesses-correct');
- }
- function v6_expand_Incorrect() {
- return $this->js_value('hotpot-config-file,'.$this->parent->quiztype.',guesses-incorrect');
- }
- function v6_expand_GiveHint() {
- return $this->js_value('hotpot-config-file,'.$this->parent->quiztype.',next-correct-letter');
- }
- function v6_expand_CaseSensitive() {
- return $this->bool_value('hotpot-config-file,'.$this->parent->quiztype.',case-sensitive');
- }
-
- // JCross quiztype
-
- function v6_expand_CluesAcrossLabel() {
- return $this->js_value('hotpot-config-file,'.$this->parent->quiztype.',clues-across');
- }
- function v6_expand_CluesDownLabel() {
- return $this->js_value('hotpot-config-file,'.$this->parent->quiztype.',clues-down');
- }
- function v6_expand_EnterCaption() {
- return $this->js_value('hotpot-config-file,'.$this->parent->quiztype.',enter-caption');
- }
- function v6_expand_ShowHideClueList() {
- $value = $this->int_value('hotpot-config-file,'.$this->parent->quiztype.',include-clue-list');
- return empty($value) ? ' style="display: none;"' : '';
- }
-
- // JCross specials
-
- function v6_expand_CluesDown() {
- return $this->v6_expand_jcross_clues('D');
- }
- function v6_expand_CluesAcross() {
- return $this->v6_expand_jcross_clues('A');
- }
- function v6_expand_jcross_clues($direction) {
- // $direction: A(cross) or D(own)
- $row = NULL;
- $r_max = 0;
- $c_max = 0;
- $this->v6_get_jcross_grid($row, $r_max, $c_max);
-
- $i = 0; // clue index;
- $str = '';
- for($r=0; $r<=$r_max; $r++) {
- for($c=0; $c<=$c_max; $c++) {
- $aword = $this->get_jcross_aword($row, $r, $r_max, $c, $c_max);
- $dword = $this->get_jcross_dword($row, $r, $r_max, $c, $c_max);
- if ($aword || $dword) {
- $i++; // increment clue index
-
- // get the definition for this word
- $def = '';
- $word = ($direction=='A') ? $aword : $dword;
- $clues = $this->parent->xml_values('data,crossword,clues,item');
- foreach ($clues as $clue) {
- if ($clue['word'][0]['#']==$word) {
- $def = $clue['def'][0]['#'];
- $def = strtr($def, array('<'=>'<', '>'=>'>', "\n"=>''.$i.'. '.$def.' ';
- for($c=0; $c<=$c_max; $c++) {
- if (empty($row[$r]['cell'][$c]['#'])) {
- $str .= ' ';
- } else {
- $aword = $this->get_jcross_aword($row, $r, $r_max, $c, $c_max);
- $dword = $this->get_jcross_dword($row, $r, $r_max, $c, $c_max);
- if (empty($aword) && empty($dword)) {
- $str .= ' '.$i.' ';
- }
- return $str;
- }
- function v6_get_jcross_grid(&$row, &$r_max, &$c_max) {
- $row = $this->parent->xml_values('data,crossword,grid,row');
- $r_max = 0;
- $c_max = 0;
- if (isset($row) && is_array($row)) {
- for($r=0; $rget_jcross_word($row, $r, $r_max, $c, $c_max, true);
- }
- return $str;
- }
- function get_jcross_aword(&$row, $r, $r_max, $c, $c_max) {
- $str = '';
- if (($c==0 || empty($row[$r]['cell'][$c-1]['#'])) && $c<$c_max && !empty($row[$r]['cell'][$c+1]['#'])) {
- $str = $this->get_jcross_word($row, $r, $r_max, $c, $c_max, false);
- }
- return $str;
- }
- function get_jcross_word(&$row, $r, $r_max, $c, $c_max, $go_down=false) {
- $str = '';
- while ($r<=$r_max && $c<=$c_max && !empty($row[$r]['cell'][$c]['#'])) {
- $str .= $row[$r]['cell'][$c]['#'];
- if ($go_down) {
- $r++;
- } else {
- $c++;
- }
- }
- return $str;
- }
-
- // specials (JQuiz)
-
- function v6_expand_QuestionOutput() {
- $str = '';
- $str .= ''."\n";
-
- $q = 0;
- $tags = 'data,questions,question-record';
- while (($question="[$q]['#']") && $this->parent->xml_value($tags, $question)) {
-
- // get question
- $question_text = $this->parent->xml_value($tags, $question."['question'][0]['#']");
- $question_type = $this->parent->xml_value($tags, $question."['question-type'][0]['#']");
-
- // check we have a question
- if ($question_text && $question_type) {
-
- $str .= '';
- $str .= ''.$question_text.'
';
-
- if (
- $question_type==HOTPOT_JQUIZ_SHORTANSWER ||
- $question_type==HOTPOT_JQUIZ_HYBRID
- ) {
- $str .= '';
- }
-
- if (
- $question_type==HOTPOT_JQUIZ_MULTICHOICE ||
- $question_type==HOTPOT_JQUIZ_HYBRID ||
- $question_type==HOTPOT_JQUIZ_MULTISELECT
- ) {
-
- switch ($question_type) {
- case HOTPOT_JQUIZ_MULTICHOICE:
- $str .= ''."\n";
- break;
- case HOTPOT_JQUIZ_HYBRID:
- $str .= ''."\n";
- break;
- case HOTPOT_JQUIZ_MULTISELECT:
- $str .= ''."\n";
- break;
- }
-
- $a = 0;
- $aa = 0;
- $answers = $question."['answers'][0]['#']";
- while (($answer = $answers."['answer'][$a]['#']") && $this->parent->xml_value($tags, $answer)) {
- $text = $this->parent->xml_value($tags, $answer."['text'][0]['#']");
- if ($text) {
- switch ($question_type) {
- case HOTPOT_JQUIZ_MULTICHOICE:
- case HOTPOT_JQUIZ_HYBRID:
- $include = $this->int_value($tags, $answer."['include-in-mc-options'][0]['#']");
- if ($include) {
- $str .= ' ? '.$text.' ';
-
- if ($question_type==HOTPOT_JQUIZ_MULTISELECT) {
- $caption = $this->v6_expand_CheckCaption();
- $str .= $this->v6_expand_jquiz_button($caption, "CheckMultiSelAnswer($q)");
- }
- }
-
- $str .= " \n";
- }
- $q++;
-
- } // end while $question
-
- $str .= " \n";
- return $str;
- }
-
- function v6_expand_jquiz_button($caption, $onclick) {
- return ''.$caption.' ';
- }
-
- // jquiz.js_
-
- function v6_expand_MultiChoice() {
- return $this->v6_jquiz_question_type(HOTPOT_JQUIZ_MULTICHOICE);
- }
- function v6_expand_ShortAnswer() {
- return $this->v6_jquiz_question_type(HOTPOT_JQUIZ_SHORTANSWER);
- }
- function v6_expand_MultiSelect() {
- return $this->v6_jquiz_question_type(HOTPOT_JQUIZ_MULTISELECT);
- }
- function v6_jquiz_question_type($type) {
- // does this quiz have any questions of the given $type?
- $flag = false;
-
- $q = 0;
- $tags = 'data,questions,question-record';
- while (($question = "[$q]['#']") && $this->parent->xml_value($tags, $question)) {
- $question_type = $this->parent->xml_value($tags, $question."['question-type'][0]['#']");
- if ($question_type==$type || ($question_type==HOTPOT_JQUIZ_HYBRID && ($type==HOTPOT_JQUIZ_MULTICHOICE || $type==HOTPOT_JQUIZ_SHORTANSWER))) {
- $flag = true;
- break;
- }
- $q++;
- }
- return $flag;
- }
- function v6_expand_CorrectFirstTime() {
- return $this->js_value('hotpot-config-file,global,correct-first-time');
- }
- function v6_expand_ContinuousScoring() {
- return $this->bool_value('hotpot-config-file,'.$this->parent->quiztype.',continuous-scoring');
- }
- function v6_expand_ShowCorrectFirstTime() {
- return $this->bool_value('hotpot-config-file,'.$this->parent->quiztype.',show-correct-first-time');
- }
- function v6_expand_ShuffleAs() {
- return $this->bool_value('hotpot-config-file,'.$this->parent->quiztype.',shuffle-answers');
- }
-
- function v6_expand_DefaultRight() {
- return $this->v6_expand_GuessCorrect();
- }
- function v6_expand_DefaultWrong() {
- return $this->v6_expand_GuessIncorrect();
- }
- function v6_expand_ShowAllQuestionsCaptionJS() {
- return $this->v6_expand_ShowAllQuestionsCaption();
- }
- function v6_expand_ShowOneByOneCaptionJS() {
- return $this->v6_expand_ShowOneByOneCaption();
- }
-
- // hp6checkshortanswers.js_ (JQuiz)
-
- function v6_expand_CorrectList() {
- return $this->parent->xml_value('hotpot-config-file,'.$this->parent->quiztype.',correct-answers');
- }
- function v6_expand_HybridTries() {
- return $this->parent->xml_value('hotpot-config-file,'.$this->parent->quiztype.',short-answer-tries-on-hybrid-q');
- }
- function v6_expand_PleaseEnter() {
- return $this->parent->xml_value('hotpot-config-file,'.$this->parent->quiztype.',enter-a-guess');
- }
- function v6_expand_PartlyIncorrect() {
- return $this->parent->xml_value('hotpot-config-file,'.$this->parent->quiztype.',partly-incorrect');
- }
- function v6_expand_ShowAnswerCaption() {
- return $this->parent->xml_value('hotpot-config-file,'.$this->parent->quiztype.',show-answer-caption');
- }
- function v6_expand_ShowAlsoCorrect() {
- return $this->bool_value('hotpot-config-file,global,show-also-correct');
- }
+ // constructor function for this class
+ function hotpot_xml_quiz_template(&$parent) {
+
+ $this->parent = &$parent;
+
+ $get_js = optional_param('js', false);
+ $get_css = optional_param('css', false);
+
+ if (!empty($get_css)) {
+ // set $this->css
+ $this->v6_expand_StyleSheet();
+
+ } else if (!empty($get_js)) {
+ // set $this->js
+ $this->read_template($this->parent->draganddrop.$this->parent->quiztype.'6.js_', 'js');
+
+ } else {
+ // set $this->html
+ $this->read_template($this->parent->draganddrop.$this->parent->quiztype.'6.ht_', 'html');
+ }
+
+ // expand special strings, if any
+ $pattern = '';
+ switch ($this->parent->quiztype) {
+ case 'jcloze':
+ $pattern = '/\[(PreloadImageList)\]/';
+ break;
+ case 'jcross':
+ $pattern = '/\[(PreloadImageList|ShowHideClueList)\]/';
+ break;
+ case 'jmatch':
+ $pattern = '/\[(PreloadImageList|QsToShow|FixedArray|DragArray)\]/';
+ break;
+ case 'jmix':
+ $pattern = '/\[(PreloadImageList|SegmentArray|AnswerArray)\]/';
+ break;
+ case 'jquiz':
+ $pattern = '/\[(PreloadImageList|QsToShow)\]/';
+ break;
+ }
+ if (!empty($pattern)) {
+ $this->expand_strings('html', $pattern);
+ }
+ }
+
+ // captions and messages
+
+ function v6_expand_AlsoCorrect() {
+ return $this->parent->xml_value('hotpot-config-file,'.$this->parent->quiztype.',also-correct');
+ }
+ function v6_expand_CapitalizeFirst() {
+ return $this->bool_value('hotpot-config-file,'.$this->parent->quiztype.',capitalize-first-letter');
+ }
+ function v6_expand_CheckCaption() {
+ return $this->parent->xml_value('hotpot-config-file,global,check-caption');
+ }
+ function v6_expand_CorrectIndicator() {
+ return $this->js_value('hotpot-config-file,global,correct-indicator');
+ }
+ function v6_expand_Back() {
+ return $this->int_value('hotpot-config-file,global,include-back');
+ }
+ function v6_expand_BackCaption() {
+ return $this->parent->xml_value('hotpot-config-file,global,back-caption');
+ }
+ function v6_expand_ClickToAdd() {
+ return $this->parent->xml_value('hotpot-config-file,'.$this->parent->quiztype.',click-to-add');
+ }
+ function v6_expand_ClueCaption() {
+ return $this->parent->xml_value('hotpot-config-file,global,clue-caption');
+ }
+ function v6_expand_Clues() {
+ return $this->int_value('hotpot-config-file,'.$this->parent->quiztype.',include-clues');
+ }
+ function v6_expand_Contents() {
+ return $this->int_value('hotpot-config-file,global,include-contents');
+ }
+ function v6_expand_ContentsCaption() {
+ return $this->parent->xml_value('hotpot-config-file,global,contents-caption');
+ }
+ function v6_expand_GuessCorrect() {
+ return $this->js_value('hotpot-config-file,'.$this->parent->quiztype.',guess-correct');
+ }
+ function v6_expand_GuessIncorrect() {
+ return $this->js_value('hotpot-config-file,'.$this->parent->quiztype.',guess-incorrect');
+ }
+ function v6_expand_Hint() {
+ return $this->int_value('hotpot-config-file,'.$this->parent->quiztype.',include-hint');
+ }
+ function v6_expand_HintCaption() {
+ return $this->parent->xml_value('hotpot-config-file,global,hint-caption');
+ }
+ function v6_expand_IncorrectIndicator() {
+ return $this->js_value('hotpot-config-file,global,incorrect-indicator');
+ }
+ function v6_expand_LastQCaption() {
+ return $this->parent->xml_value('hotpot-config-file,global,last-q-caption');
+ }
+ function v6_expand_NextCorrect() {
+ $value = $this->js_value('hotpot-config-file,'.$this->parent->quiztype.',next-correct-part');
+ if (empty($value)) { // jquiz
+ $value = $this->js_value('hotpot-config-file,'.$this->parent->quiztype.',next-correct-letter');
+ }
+ return $value;
+ }
+ function v6_expand_NextEx() {
+ return $this->int_value('hotpot-config-file,global,include-next-ex');
+ }
+ function v6_expand_NextExCaption() {
+ return $this->parent->xml_value('hotpot-config-file,global,next-ex-caption');
+ }
+ function v6_expand_NextQCaption() {
+ return $this->parent->xml_value('hotpot-config-file,global,next-q-caption');
+ }
+ function v6_expand_OKCaption() {
+ return $this->parent->xml_value('hotpot-config-file,global,ok-caption');
+ }
+ function v6_expand_Restart() {
+ return $this->int_value('hotpot-config-file,'.$this->parent->quiztype.',include-restart');
+ }
+ function v6_expand_RestartCaption() {
+ return $this->parent->xml_value('hotpot-config-file,global,restart-caption');
+ }
+ function v6_expand_ShowAllQuestionsCaption() {
+ return $this->js_value('hotpot-config-file,global,show-all-questions-caption');
+ }
+ function v6_expand_ShowOneByOneCaption() {
+ return $this->js_value('hotpot-config-file,global,show-one-by-one-caption');
+ }
+ function v6_expand_TheseAnswersToo() {
+ return $this->js_value('hotpot-config-file,'.$this->parent->quiztype.',also-correct');
+ }
+ function v6_expand_ThisMuch() {
+ return $this->js_value('hotpot-config-file,'.$this->parent->quiztype.',this-much-correct');
+ }
+ function v6_expand_Undo() {
+ return $this->int_value('hotpot-config-file,'.$this->parent->quiztype.',include-undo');
+ }
+ function v6_expand_UndoCaption() {
+ return $this->parent->xml_value('hotpot-config-file,global,undo-caption');
+ }
+ function v6_expand_YourScoreIs() {
+ return $this->js_value('hotpot-config-file,global,your-score-is');
+ }
+
+ // reading
+
+ function v6_expand_Reading() {
+ return $this->int_value('data,reading,include-reading');
+ }
+ function v6_expand_ReadingText() {
+ $title = $this->v6_expand_ReadingTitle();
+ $value = $this->parent->xml_value('data,reading,reading-text');
+ $value = empty($value) ? '' : (''.$value.'
');
+ return $title.$value;
+ }
+ function v6_expand_ReadingTitle() {
+ $value = $this->parent->xml_value('data,reading,reading-title');
+ return empty($value) ? '' : (''.$value.' ');
+ }
+
+ // timer
+
+ function v6_expand_Timer() {
+ return $this->int_value('data,timer,include-timer');
+ }
+ function v6_expand_JSTimer() {
+ return $this->read_template('hp6timer.js_');
+ }
+ function v6_expand_Seconds() {
+ return $this->parent->xml_value('data,timer,seconds');
+ }
+
+ // send results
+
+ function v6_expand_SendResults() {
+ return $this->parent->xml_value('hotpot-config-file,'.$this->parent->quiztype.',send-email');
+ }
+ function v6_expand_JSSendResults() {
+ return $this->read_template('hp6sendresults.js_');
+ }
+ function v6_expand_FormMailURL() {
+ return $this->parent->xml_value('hotpot-config-file,global,formmail-url');
+ }
+ function v6_expand_EMail() {
+ return $this->parent->xml_value('hotpot-config-file,global,email');
+ }
+ function v6_expand_NamePlease() {
+ return $this->js_value('hotpot-config-file,global,name-please');
+ }
+
+ // preload images
+
+ function v6_expand_PreloadImages() {
+ $value = $this->v6_expand_PreloadImageList();
+ return empty($value) ? false : true;
+ }
+ function v6_expand_PreloadImageList() {
+
+ // check it has not been set already
+ if (!isset($this->PreloadImageList)) {
+
+ // the list of image urls
+ $list = array();
+
+ // extract '.$this->parent->xml_value('data,matching-exercise,default-right-item').' ';
+ foreach ($r_keys as $key) {
+ $options .= ''.$r_items[$key]['text'][0]['#'].' '."\n";
+ }
+
+ $str = '';
+ foreach ($l_keys as $key) {
+ $str .= ''.$l_items[$key]['text'][0]['#'].' ';
+ $str .= ''.$options.' js_safe($values[$key], true)."';\n";
+ $str .= "Segments[$i][1] = ".($key+1).";\n";
+ $str .= "Segments[$i][2] = 0;\n";
+ }
+ return $str;
+ }
+ function v6_expand_AnswerArray() {
+
+ $segments = array();
+ $values = array();
+ $VALUES = array();
+ $escapedvalues = array();
+
+ // XML tags to the start of a segment
+ $tags = 'data,jumbled-order-exercise,main-order,segment';
+
+ $i = 0;
+ while ($value = $this->parent->xml_value($tags, "[$i]['#']")) {
+ $VALUE = strtoupper($value);
+ $key = array_search($VALUE, $VALUES);
+ if (is_numeric($key)) {
+ $segments[] = $key+1;
+ } else {
+ $segments[] = $i+1;
+ $values[$i] = $value;
+ $VALUES[$i] = $VALUE;
+ $escapedvalues[] = preg_quote($value, '/');
+ }
+ $i++;
+ }
+
+ // start the answers array
+ $a = 0;
+ $str = 'Answers['.($a++).'] = new Array('.implode(',', $segments).");\n";
+
+ // pattern to match the next part of an alternate answer
+ $pattern = '/^('.implode('|', $escapedvalues).')\\s*/i';
+
+ // XML tags to the start of an alternate answer
+ $tags = 'data,jumbled-order-exercise,alternate';
+
+ $i = 0;
+ while ($value = $this->parent->xml_value($tags, "[$i]['#']")) {
+ $segments = array();
+ while (strlen($value) && preg_match($pattern, $value, $matches)) {
+ $key = array_search($matches[1], $values);
+ if (is_numeric($key)) {
+ $segments[] = $key+1;
+ $value = substr($value, strlen($matches[0]));
+ } else {
+ // invalid alternate sequence
+ $segments = array();
+ break;
+ }
+ }
+ if (count($segments)) {
+ $str .= 'Answers['.($a++).'] = new Array('.implode(',', $segments).");\n";
+ }
+ $i++;
+ }
+ return $str;
+ }
+
+ // ===============================================================
+
+ // JMix (jmix6.js_)
+
+ function v6_expand_RemainingWords() {
+ return $this->parent->xml_value('hotpot-config-file,'.$this->parent->quiztype.',remaining-words');
+ }
+ function v6_expand_TimesUp() {
+ return $this->parent->xml_value('hotpot-config-file,global,times-up');
+ }
+
+ // nav bar
+
+ function v6_expand_NavBar($navbarid='') {
+ $this->navbarid = $navbarid;
+
+ $tag = 'navbar';
+ $this->read_template('hp6navbar.ht_', $tag);
+
+ unset($this->navbarid);
+
+ return $this->$tag;
+ }
+ function v6_expand_TopNavBar() {
+ return $this->v6_expand_NavBar('TopNavBar');
+ }
+ function v6_expand_BottomNavBar() {
+ return $this->v6_expand_NavBar('BottomNavBar');
+ }
+
+ // hp6navbar.ht_
+
+ function v6_expand_NavBarID() {
+ // $this->navbarid is set in "$this->v6_expand_NavBar"
+ return empty($this->navbarid) ? '' : $this->navbarid;
+ }
+ function v6_expand_ContentsURL() {
+ $url = $this->parent->xml_value('hotpot-config-file,global,contents-url');
+ if ($url) {
+ $url = hotpot_convert_navbutton_url($this->parent->get_baseurl(), $this->parent->reference, $url, $this->parent->course);
+ }
+ return $url;
+ }
+ function v6_expand_NextExURL() {
+ $url = $this->parent->xml_value('hotpot-config-file,'.$this->parent->quiztype.',next-ex-url');
+ if ($url) {
+ $url = hotpot_convert_navbutton_url($this->parent->get_baseurl(), $this->parent->reference, $url, $this->parent->course);
+ }
+ return $url;
+ }
+
+ // conditional blocks
+
+ function v6_expand_ShowAnswer() {
+ return $this->int_value('hotpot-config-file,'.$this->parent->quiztype.',include-show-answer');
+ }
+ function v6_expand_Slide() {
+ return true; // whats's this (JMatch drag and drop)
+ }
+
+ // specials (JMatch)
+
+ function v6_expand_FixedArray() {
+ $l_items = array();
+ $r_items = array();
+ $this->get_jmatch_items($l_items, $r_items);
+
+ $str = '';
+ foreach ($l_items as $i=>$item) {
+ $str .= "F[$i] = new Array();\n";
+ $str .= "F[$i][0] = '".$this->js_safe($item['text'][0]['#'], true)."';\n";
+ $str .= "F[$i][1] = ".($i+1).";\n";
+ }
+ return $str;
+ }
+ function v6_expand_DragArray() {
+ $l_items = array();
+ $r_items = array();
+ $this->get_jmatch_items($l_items, $r_items);
+
+ $str = '';
+ foreach ($r_items as $i=>$item) {
+ $str .= "D[$i] = new Array();\n";
+ $str .= "D[$i][0] = '".$this->js_safe($item['text'][0]['#'], true)."';\n";
+ $str .= "D[$i][1] = ".($i+1).";\n";
+ $str .= "D[$i][2] = 0;\n";
+ }
+ return $str;
+ }
+
+ function get_jmatch_items(&$l_items, &$r_items) {
+ $tags = 'data,matching-exercise,pair';
+ $i = 0;
+ while($item = $this->parent->xml_value($tags,"[$i]['#']['left-item'][0]['#']")) {
+ if (!empty($item['text'][0]['#'])) {
+ $l_items[] = $item;
+ }
+ $i++;
+ }
+ $i = 0;
+ while($item = $this->parent->xml_value($tags,"[$i]['#']['right-item'][0]['#']")) {
+ if (!empty($item['text'][0]['#'])) {
+ $r_items[] = $item;
+ }
+ $i++;
+ }
+ }
+ function shuffle_jmatch_items(&$items) {
+ // get moveable items
+ $moveable_keys = array();
+ for($i=0; $iseed_random_number_generator();
+ shuffle($moveable_keys);
+
+ $keys = array();
+ for($i=0, $ii=0; $iparent->quiztype) {
+ case 'jcloze':
+ $tags = 'data,gap-fill,question-record';
+ while (($question="[$q]['#']") && $this->parent->xml_value($tags, $question)) {
+ $a = 0;
+ $aa = 0;
+ while (($answer=$question."['answer'][$a]['#']") && $this->parent->xml_value($tags, $answer)) {
+ $text = $this->js_value($tags, $answer."['text'][0]['#']", true);
+ if (strlen($text)) {
+ if ($aa==0) { // first time only
+ $str .= "\n";
+ $str .= "I[$q] = new Array();\n";
+ $str .= "I[$q][1] = new Array();\n";
+ }
+ $str .= "I[$q][1][$aa] = new Array();\n";
+ $str .= "I[$q][1][$aa][0] = '$text';\n";
+ $aa++;
+ }
+ $a++;
+ }
+ // add clue, if any answers were found
+ if ($aa) {
+ $clue = $this->js_value($tags, $question."['clue'][0]['#']", true);
+ $str .= "I[$q][2] = '$clue';\n";
+ }
+ $q++;
+ }
+ break;
+ case 'jquiz':
+ $str .= "I=new Array();\n";
+ $tags = 'data,questions,question-record';
+ while (($question="[$q]['#']") && $this->parent->xml_value($tags, $question)) {
+
+ $question_type = $this->int_value($tags, $question."['question-type'][0]['#']");
+ $weighting = $this->int_value($tags, $question."['weighting'][0]['#']");
+ $clue = $this->js_value($tags, $question."['clue'][0]['#']", true);
+
+ $answers = $question."['answers'][0]['#']";
+
+ $a = 0;
+ $aa = 0;
+ while (($answer = $answers."['answer'][$a]['#']") && $this->parent->xml_value($tags, $answer)) {
+ $text = $this->js_value($tags, $answer."['text'][0]['#']", true);
+ $feedback = $this->js_value($tags, $answer."['feedback'][0]['#']", true);
+ $correct = $this->int_value($tags, $answer."['correct'][0]['#']");
+ $percent = $this->int_value($tags, $answer."['percent-correct'][0]['#']");
+ $include = $this->int_value($tags, $answer."['include-in-mc-options'][0]['#']");
+ if (strlen($text)) {
+ if ($aa==0) { // first time only
+ $str .= "\n";
+ $str .= "I[$q] = new Array();\n";
+ $str .= "I[$q][0] = $weighting;\n";
+ $str .= "I[$q][1] = '$clue';\n";
+ $str .= "I[$q][2] = '".($question_type-1)."';\n";
+ $str .= "I[$q][3] = new Array();\n";
+ }
+ $str .= "I[$q][3][$aa] = new Array('$text','$feedback',$correct,$percent,$include);\n";
+ $aa++;
+ }
+ $a++;
+ }
+ $q++;
+ }
+ break;
+ }
+ return $str;
+ }
+
+ function v6_expand_ClozeBody() {
+ $str = '';
+
+ // get drop down list of words, if required
+ $dropdownlist = '';
+ if ($this->v6_use_DropDownList()) {
+ $this->v6_set_WordList();
+ foreach ($this->wordlist as $word) {
+ $dropdownlist .= ''.$word.' ';
+ }
+ }
+
+ // cache clues flag and caption
+ $includeclues = $this->v6_expand_Clues();
+ $cluecaption = $this->v6_expand_ClueCaption();
+
+ // detect if cloze starts with gap
+ $strpos = strpos($this->parent->source, '');
+ if (is_numeric($strpos)) {
+ $startwithgap = true;
+ } else {
+ $startwithgap = false;
+ }
+
+ // initialize loop values
+ $q = 0;
+ $tags = 'data,gap-fill';
+ $question_record = "$tags,question-record";
+
+ // loop through text and gaps
+ do {
+ $text = $this->parent->xml_value($tags, "[0]['#'][$q]");
+ $gap = '';
+ if (($question="[$q]['#']") && $this->parent->xml_value($question_record, $question)) {
+ $gap .= '';
+ if ($this->v6_use_DropDownList()) {
+ $gap .= ''.$cluecaption.' ';
+ }
+ }
+ $gap .= ' ';
+ }
+ if ($startwithgap) {
+ $str .= "$gap$text";
+ } else {
+ $str .= "$text$gap";
+ }
+ $q++;
+ } while (strlen($text) || strlen($gap));
+
+ return $str;
+ }
+
+ // JCloze quiztype
+
+ function v6_expand_WordList() {
+ $str = '';
+ if ($this->v6_include_WordList()) {
+ $this->v6_set_WordList();
+ $str = implode(' ', $this->wordlist);
+ }
+ return $str;
+ }
+ function v6_include_WordList() {
+ return $this->int_value('hotpot-config-file,'.$this->parent->quiztype.',include-word-list');
+ }
+ function v6_use_DropDownList() {
+ return $this->int_value('hotpot-config-file,'.$this->parent->quiztype.',use-drop-down-list');
+ }
+ function v6_set_WordList() {
+
+ if (isset($this->wordlist)) {
+ // do nothing
+ } else {
+ $this->wordlist = array();
+
+ // is the wordlist required
+ if ($this->v6_include_WordList() || $this->v6_use_DropDownList()) {
+
+ $q = 0;
+ $tags = 'data,gap-fill,question-record';
+ while (($question="[$q]['#']") && $this->parent->xml_value($tags, $question)) {
+ $a = 0;
+ $aa = 0;
+ while (($answer=$question."['answer'][$a]['#']") && $this->parent->xml_value($tags, $answer)) {
+ $text = $this->parent->xml_value($tags, $answer."['text'][0]['#']");
+ $correct = $this->int_value($tags, $answer."['correct'][0]['#']");
+ if ($text && $correct) { // $correct is always true
+ $this->wordlist[] = $text;
+ $aa++;
+ }
+ $a++;
+ }
+ $q++;
+ }
+ $this->wordlist = array_unique($this->wordlist);
+ sort($this->wordlist);
+ }
+ }
+ }
+ function v6_expand_Keypad() {
+ $str = '';
+ if ($this->int_value('hotpot-config-file,'.$this->parent->quiztype.',include-keypad')) {
+
+ // these characters must always be in the keypad
+ $chars = array();
+ $this->add_keypad_chars($chars, $this->parent->xml_value('hotpot-config-file,global,keypad-characters'));
+
+ // append other characters used in the answers
+ $tags = '';
+ switch ($this->parent->quiztype) {
+ case 'jcloze':
+ $tags = 'data,gap-fill,question-record';
+ break;
+ case 'jquiz':
+ $tags = 'data,questions,question-record';
+ break;
+ }
+ if ($tags) {
+ $q = 0;
+ while (($question="[$q]['#']") && $this->parent->xml_value($tags, $question)) {
+
+ if ($this->parent->quiztype=='jquiz') {
+ $answers = $question."['answers'][0]['#']";
+ } else {
+ $answers = $question;
+ }
+
+ $a = 0;
+ while (($answer=$answers."['answer'][$a]['#']") && $this->parent->xml_value($tags, $answer)) {
+ $this->add_keypad_chars($chars, $this->parent->xml_value($tags, $answer."['text'][0]['#']"));
+ $a++;
+ }
+ $q++;
+ }
+ }
+
+ // remove duplicate characters and sort
+ $chars = array_unique($chars);
+ usort($chars, "hotpot_sort_keypad_chars");
+
+ // create keypad buttons for each character
+ $str .= '';
+ foreach ($chars as $char) {
+ $str .= "js_safe($char, true)."'); return false;\">$char ";
+ }
+ $str .= '
';
+ }
+ return $str;
+ }
+ function add_keypad_chars(&$chars, $text) {
+ if (preg_match_all('|&[^;]+;|i', $text, $more_chars)) {
+ $chars = array_merge($chars, $more_chars[0]);
+ }
+ }
+ function v6_expand_Correct() {
+ return $this->js_value('hotpot-config-file,'.$this->parent->quiztype.',guesses-correct');
+ }
+ function v6_expand_Incorrect() {
+ return $this->js_value('hotpot-config-file,'.$this->parent->quiztype.',guesses-incorrect');
+ }
+ function v6_expand_GiveHint() {
+ return $this->js_value('hotpot-config-file,'.$this->parent->quiztype.',next-correct-letter');
+ }
+ function v6_expand_CaseSensitive() {
+ return $this->bool_value('hotpot-config-file,'.$this->parent->quiztype.',case-sensitive');
+ }
+
+ // JCross quiztype
+
+ function v6_expand_CluesAcrossLabel() {
+ return $this->js_value('hotpot-config-file,'.$this->parent->quiztype.',clues-across');
+ }
+ function v6_expand_CluesDownLabel() {
+ return $this->js_value('hotpot-config-file,'.$this->parent->quiztype.',clues-down');
+ }
+ function v6_expand_EnterCaption() {
+ return $this->js_value('hotpot-config-file,'.$this->parent->quiztype.',enter-caption');
+ }
+ function v6_expand_ShowHideClueList() {
+ $value = $this->int_value('hotpot-config-file,'.$this->parent->quiztype.',include-clue-list');
+ return empty($value) ? ' style="display: none;"' : '';
+ }
+
+ // JCross specials
+
+ function v6_expand_CluesDown() {
+ return $this->v6_expand_jcross_clues('D');
+ }
+ function v6_expand_CluesAcross() {
+ return $this->v6_expand_jcross_clues('A');
+ }
+ function v6_expand_jcross_clues($direction) {
+ // $direction: A(cross) or D(own)
+ $row = NULL;
+ $r_max = 0;
+ $c_max = 0;
+ $this->v6_get_jcross_grid($row, $r_max, $c_max);
+
+ $i = 0; // clue index;
+ $str = '';
+ for($r=0; $r<=$r_max; $r++) {
+ for($c=0; $c<=$c_max; $c++) {
+ $aword = $this->get_jcross_aword($row, $r, $r_max, $c, $c_max);
+ $dword = $this->get_jcross_dword($row, $r, $r_max, $c, $c_max);
+ if ($aword || $dword) {
+ $i++; // increment clue index
+
+ // get the definition for this word
+ $def = '';
+ $word = ($direction=='A') ? $aword : $dword;
+ $clues = $this->parent->xml_values('data,crossword,clues,item');
+ foreach ($clues as $clue) {
+ if ($clue['word'][0]['#']==$word) {
+ $def = $clue['def'][0]['#'];
+ $def = strtr($def, array('<'=>'<', '>'=>'>', "\n"=>''.$i.'. '.$def.' ';
+ for($c=0; $c<=$c_max; $c++) {
+ if (empty($row[$r]['cell'][$c]['#'])) {
+ $str .= ' ';
+ } else {
+ $aword = $this->get_jcross_aword($row, $r, $r_max, $c, $c_max);
+ $dword = $this->get_jcross_dword($row, $r, $r_max, $c, $c_max);
+ if (empty($aword) && empty($dword)) {
+ $str .= ' '.$i.' ';
+ }
+ return $str;
+ }
+ function v6_get_jcross_grid(&$row, &$r_max, &$c_max) {
+ $row = $this->parent->xml_values('data,crossword,grid,row');
+ $r_max = 0;
+ $c_max = 0;
+ if (isset($row) && is_array($row)) {
+ for($r=0; $rget_jcross_word($row, $r, $r_max, $c, $c_max, true);
+ }
+ return $str;
+ }
+ function get_jcross_aword(&$row, $r, $r_max, $c, $c_max) {
+ $str = '';
+ if (($c==0 || empty($row[$r]['cell'][$c-1]['#'])) && $c<$c_max && !empty($row[$r]['cell'][$c+1]['#'])) {
+ $str = $this->get_jcross_word($row, $r, $r_max, $c, $c_max, false);
+ }
+ return $str;
+ }
+ function get_jcross_word(&$row, $r, $r_max, $c, $c_max, $go_down=false) {
+ $str = '';
+ while ($r<=$r_max && $c<=$c_max && !empty($row[$r]['cell'][$c]['#'])) {
+ $str .= $row[$r]['cell'][$c]['#'];
+ if ($go_down) {
+ $r++;
+ } else {
+ $c++;
+ }
+ }
+ return $str;
+ }
+
+ // specials (JQuiz)
+
+ function v6_expand_QuestionOutput() {
+ $str = '';
+ $str .= ''."\n";
+
+ $q = 0;
+ $tags = 'data,questions,question-record';
+ while (($question="[$q]['#']") && $this->parent->xml_value($tags, $question)) {
+
+ // get question
+ $question_text = $this->parent->xml_value($tags, $question."['question'][0]['#']");
+ $question_type = $this->parent->xml_value($tags, $question."['question-type'][0]['#']");
+
+ // check we have a question
+ if ($question_text && $question_type) {
+
+ $str .= '';
+ $str .= ''.$question_text.'
';
+
+ if (
+ $question_type==HOTPOT_JQUIZ_SHORTANSWER ||
+ $question_type==HOTPOT_JQUIZ_HYBRID
+ ) {
+ $str .= '';
+ }
+
+ if (
+ $question_type==HOTPOT_JQUIZ_MULTICHOICE ||
+ $question_type==HOTPOT_JQUIZ_HYBRID ||
+ $question_type==HOTPOT_JQUIZ_MULTISELECT
+ ) {
+
+ switch ($question_type) {
+ case HOTPOT_JQUIZ_MULTICHOICE:
+ $str .= ''."\n";
+ break;
+ case HOTPOT_JQUIZ_HYBRID:
+ $str .= ''."\n";
+ break;
+ case HOTPOT_JQUIZ_MULTISELECT:
+ $str .= ''."\n";
+ break;
+ }
+
+ $a = 0;
+ $aa = 0;
+ $answers = $question."['answers'][0]['#']";
+ while (($answer = $answers."['answer'][$a]['#']") && $this->parent->xml_value($tags, $answer)) {
+ $text = $this->parent->xml_value($tags, $answer."['text'][0]['#']");
+ if ($text) {
+ switch ($question_type) {
+ case HOTPOT_JQUIZ_MULTICHOICE:
+ case HOTPOT_JQUIZ_HYBRID:
+ $include = $this->int_value($tags, $answer."['include-in-mc-options'][0]['#']");
+ if ($include) {
+ $str .= ' ? '.$text.' ';
+
+ if ($question_type==HOTPOT_JQUIZ_MULTISELECT) {
+ $caption = $this->v6_expand_CheckCaption();
+ $str .= $this->v6_expand_jquiz_button($caption, "CheckMultiSelAnswer($q)");
+ }
+ }
+
+ $str .= " \n";
+ }
+ $q++;
+
+ } // end while $question
+
+ $str .= " \n";
+ return $str;
+ }
+
+ function v6_expand_jquiz_button($caption, $onclick) {
+ return ''.$caption.' ';
+ }
+
+ // jquiz.js_
+
+ function v6_expand_MultiChoice() {
+ return $this->v6_jquiz_question_type(HOTPOT_JQUIZ_MULTICHOICE);
+ }
+ function v6_expand_ShortAnswer() {
+ return $this->v6_jquiz_question_type(HOTPOT_JQUIZ_SHORTANSWER);
+ }
+ function v6_expand_MultiSelect() {
+ return $this->v6_jquiz_question_type(HOTPOT_JQUIZ_MULTISELECT);
+ }
+ function v6_jquiz_question_type($type) {
+ // does this quiz have any questions of the given $type?
+ $flag = false;
+
+ $q = 0;
+ $tags = 'data,questions,question-record';
+ while (($question = "[$q]['#']") && $this->parent->xml_value($tags, $question)) {
+ $question_type = $this->parent->xml_value($tags, $question."['question-type'][0]['#']");
+ if ($question_type==$type || ($question_type==HOTPOT_JQUIZ_HYBRID && ($type==HOTPOT_JQUIZ_MULTICHOICE || $type==HOTPOT_JQUIZ_SHORTANSWER))) {
+ $flag = true;
+ break;
+ }
+ $q++;
+ }
+ return $flag;
+ }
+ function v6_expand_CorrectFirstTime() {
+ return $this->js_value('hotpot-config-file,global,correct-first-time');
+ }
+ function v6_expand_ContinuousScoring() {
+ return $this->bool_value('hotpot-config-file,'.$this->parent->quiztype.',continuous-scoring');
+ }
+ function v6_expand_ShowCorrectFirstTime() {
+ return $this->bool_value('hotpot-config-file,'.$this->parent->quiztype.',show-correct-first-time');
+ }
+ function v6_expand_ShuffleAs() {
+ return $this->bool_value('hotpot-config-file,'.$this->parent->quiztype.',shuffle-answers');
+ }
+
+ function v6_expand_DefaultRight() {
+ return $this->v6_expand_GuessCorrect();
+ }
+ function v6_expand_DefaultWrong() {
+ return $this->v6_expand_GuessIncorrect();
+ }
+ function v6_expand_ShowAllQuestionsCaptionJS() {
+ return $this->v6_expand_ShowAllQuestionsCaption();
+ }
+ function v6_expand_ShowOneByOneCaptionJS() {
+ return $this->v6_expand_ShowOneByOneCaption();
+ }
+
+ // hp6checkshortanswers.js_ (JQuiz)
+
+ function v6_expand_CorrectList() {
+ return $this->parent->xml_value('hotpot-config-file,'.$this->parent->quiztype.',correct-answers');
+ }
+ function v6_expand_HybridTries() {
+ return $this->parent->xml_value('hotpot-config-file,'.$this->parent->quiztype.',short-answer-tries-on-hybrid-q');
+ }
+ function v6_expand_PleaseEnter() {
+ return $this->parent->xml_value('hotpot-config-file,'.$this->parent->quiztype.',enter-a-guess');
+ }
+ function v6_expand_PartlyIncorrect() {
+ return $this->parent->xml_value('hotpot-config-file,'.$this->parent->quiztype.',partly-incorrect');
+ }
+ function v6_expand_ShowAnswerCaption() {
+ return $this->parent->xml_value('hotpot-config-file,'.$this->parent->quiztype.',show-answer-caption');
+ }
+ function v6_expand_ShowAlsoCorrect() {
+ return $this->bool_value('hotpot-config-file,global,show-also-correct');
+ }
} // end class
function hotpot_sort_keypad_chars($a, $b) {
- $a = hotpot_keypad_sort_value($a);
- $b = hotpot_keypad_sort_value($b);
- return ($a<$b) ? -1 : ($a==$b ? 0 : 1);
+ $a = hotpot_keypad_sort_value($a);
+ $b = hotpot_keypad_sort_value($b);
+ return ($a<$b) ? -1 : ($a==$b ? 0 : 1);
}
function hotpot_keypad_sort_value($char) {
- // hexadecimal
- if (preg_match('|&#x([0-9A-F]+);|ie', $char, $matches)) {
- $ord = hexdec($matches[1]);
+ // hexadecimal
+ if (preg_match('|&#x([0-9A-F]+);|ie', $char, $matches)) {
+ $ord = hexdec($matches[1]);
- // decimal
- } else if (preg_match('|&#(\d+);|i', $char, $matches)) {
- $ord = intval($matches[1]);
+ // decimal
+ } else if (preg_match('|&#(\d+);|i', $char, $matches)) {
+ $ord = intval($matches[1]);
- // other html entity
- } else if (preg_match('|&[^;]+;|', $char, $matches)) {
- $char = html_entity_decode($matches[0]);
- $ord = empty($char) ? 0 : ord($char);
+ // other html entity
+ } else if (preg_match('|&[^;]+;|', $char, $matches)) {
+ $char = html_entity_decode($matches[0]);
+ $ord = empty($char) ? 0 : ord($char);
- // not an html entity
- } else {
- $char = trim($char);
- $ord = empty($char) ? 0 : ord($char);
- }
+ // not an html entity
+ } else {
+ $char = trim($char);
+ $ord = empty($char) ? 0 : ord($char);
+ }
- // lowercase letters (plain or accented)
- if (($ord>=97 && $ord<=122) || ($ord>=224 && $ord<=255)) {
- $sort_value = ($ord-31).'.'.sprintf('%04d', $ord);
+ // lowercase letters (plain or accented)
+ if (($ord>=97 && $ord<=122) || ($ord>=224 && $ord<=255)) {
+ $sort_value = ($ord-31).'.'.sprintf('%04d', $ord);
- // all other characters
- } else {
- $sort_value = $ord;
- }
+ // all other characters
+ } else {
+ $sort_value = $ord;
+ }
- return $sort_value;
+ return $sort_value;
}
?>
diff --git a/mod/hotpot/view.php b/mod/hotpot/view.php
index ab9c01324d..86b5d7332c 100644
--- a/mod/hotpot/view.php
+++ b/mod/hotpot/view.php
@@ -1,455 +1,455 @@
course)) {
- error("Course is misconfigured");
- }
- if (! $hotpot = get_record("hotpot", "id", $cm->instance)) {
- error("Course module is incorrect");
- }
+ if ($id) {
+ if (! $cm = get_coursemodule_from_id('hotpot', $id)) {
+ error("Course Module ID was incorrect");
+ }
+ if (! $course = get_record("course", "id", $cm->course)) {
+ error("Course is misconfigured");
+ }
+ if (! $hotpot = get_record("hotpot", "id", $cm->instance)) {
+ error("Course module is incorrect");
+ }
- } else {
- if (! $hotpot = get_record("hotpot", "id", $hp)) {
- error("Course module is incorrect");
- }
- if (! $course = get_record("course", "id", $hotpot->course)) {
- error("Course is misconfigured");
- }
- if (! $cm = get_coursemodule_from_instance("hotpot", $hotpot->id, $course->id)) {
- error("Course Module ID was incorrect");
- }
- }
- require_login($course->id);
- }
- // set nextpage (for error messages)
- $nextpage = "$CFG->wwwroot/course/view.php?id=$course->id";
- // header strings
- $title = strip_tags($course->shortname.': '.$hotpot->name);
- $heading = "$course->fullname";
- $target = empty($CFG->framename) ? '' : ' target="'.$CFG->framename.'"';
- $navigation = ''.get_string("modulenameplural", "hotpot")." -> $hotpot->name";
- if ($course->category) {
- $navigation = ''.$course->shortname.' -> '.$navigation;
- }
- $button = update_module_button($cm->id, $course->id, get_string("modulename", "hotpot").'" style="font-size:0.75em;');
- $loggedinas = ''.user_login_string($course, $USER).' ';
- $time = time();
- $hppassword = optional_param('hppassword');
- if (HOTPOT_FIRST_ATTEMPT && !isteacher($course->id)) {
- // check this quiz is available to this student
- // error message, if quiz is unavailable
- $error = '';
- // check quiz is visible
- if (!hotpot_is_visible($cm)) {
- $error = get_string("activityiscurrentlyhidden");
- // check network address
- } else if ($hotpot->subnet && !address_in_subnet($_SERVER['REMOTE_ADDR'], $hotpot->subnet)) {
- $error = get_string("subneterror", "quiz");
- // check number of attempts
- } else if ($hotpot->attempts && $hotpot->attempts <= count_records('hotpot_attempts', 'hotpot', $hotpot->id, 'userid', $USER->id)) {
- $error = get_string("nomoreattempts", "quiz");
- // get password
- } else if ($hotpot->password && empty($hppassword)) {
- print_header($title, $heading, $navigation, "", "", true, $button, $loggedinas, false);
- print_heading($hotpot->name);
- $boxalign = 'center';
- $boxwidth = 500;
- if (trim(strip_tags($hotpot->summary))) {
- print_simple_box_start($boxalign, $boxwidth);
- print ''.format_text($hotpot->summary)."
\n";
- print_simple_box_end();
- print " (HP5 v5)
- $frameset = '';
- $frameset_tags = '';
- if (preg_match_all('|]*)>(.*?) |is', $hp->html, $matches)) {
- $last = count($matches[0])-1;
- $frameset = $matches[2][$last];
- $frameset_tags = $matches[1][$last];
- }
- // if HTML is being requested ...
- if (empty($get_js) && empty($get_css)) {
- if (empty($frameset)) {
- // HP v6
- if ($hotpot->navigation==HOTPOT_NAVIGATION_FRAME || $hotpot->navigation==HOTPOT_NAVIGATION_IFRAME) {
- $get_html = ($framename=='main') ? true : false;
- } else {
- $get_html = true;
- }
- } else {
- // HP5 v5
- $get_html = empty($framename) ? true : false;
- }
- if ($get_html) {
-
- if (HOTPOT_FIRST_ATTEMPT) {
- add_to_log($course->id, "hotpot", "view", "view.php?id=$cm->id", "$hotpot->id", "$cm->id");
+ } else {
+ if (! $hotpot = get_record("hotpot", "id", $hp)) {
+ error("Course module is incorrect");
+ }
+ if (! $course = get_record("course", "id", $hotpot->course)) {
+ error("Course is misconfigured");
+ }
+ if (! $cm = get_coursemodule_from_instance("hotpot", $hotpot->id, $course->id)) {
+ error("Course Module ID was incorrect");
+ }
+ }
+ require_login($course->id);
+ }
+ // set nextpage (for error messages)
+ $nextpage = "$CFG->wwwroot/course/view.php?id=$course->id";
+ // header strings
+ $title = strip_tags($course->shortname.': '.$hotpot->name);
+ $heading = "$course->fullname";
+ $target = empty($CFG->framename) ? '' : ' target="'.$CFG->framename.'"';
+ $navigation = ''.get_string("modulenameplural", "hotpot")." -> $hotpot->name";
+ if ($course->category) {
+ $navigation = ''.$course->shortname.' -> '.$navigation;
+ }
+ $button = update_module_button($cm->id, $course->id, get_string("modulename", "hotpot").'" style="font-size:0.75em;');
+ $loggedinas = ''.user_login_string($course, $USER).' ';
+ $time = time();
+ $hppassword = optional_param('hppassword');
+ if (HOTPOT_FIRST_ATTEMPT && !isteacher($course->id)) {
+ // check this quiz is available to this student
+ // error message, if quiz is unavailable
+ $error = '';
+ // check quiz is visible
+ if (!hotpot_is_visible($cm)) {
+ $error = get_string("activityiscurrentlyhidden");
+ // check network address
+ } else if ($hotpot->subnet && !address_in_subnet($_SERVER['REMOTE_ADDR'], $hotpot->subnet)) {
+ $error = get_string("subneterror", "quiz");
+ // check number of attempts
+ } else if ($hotpot->attempts && $hotpot->attempts <= count_records('hotpot_attempts', 'hotpot', $hotpot->id, 'userid', $USER->id)) {
+ $error = get_string("nomoreattempts", "quiz");
+ // get password
+ } else if ($hotpot->password && empty($hppassword)) {
+ print_header($title, $heading, $navigation, "", "", true, $button, $loggedinas, false);
+ print_heading($hotpot->name);
+ $boxalign = 'center';
+ $boxwidth = 500;
+ if (trim(strip_tags($hotpot->summary))) {
+ print_simple_box_start($boxalign, $boxwidth);
+ print ''.format_text($hotpot->summary)."
\n";
+ print_simple_box_end();
+ print " (HP5 v5)
+ $frameset = '';
+ $frameset_tags = '';
+ if (preg_match_all('|]*)>(.*?) |is', $hp->html, $matches)) {
+ $last = count($matches[0])-1;
+ $frameset = $matches[2][$last];
+ $frameset_tags = $matches[1][$last];
+ }
+ // if HTML is being requested ...
+ if (empty($get_js) && empty($get_css)) {
+ if (empty($frameset)) {
+ // HP v6
+ if ($hotpot->navigation==HOTPOT_NAVIGATION_FRAME || $hotpot->navigation==HOTPOT_NAVIGATION_IFRAME) {
+ $get_html = ($framename=='main') ? true : false;
+ } else {
+ $get_html = true;
+ }
+ } else {
+ // HP5 v5
+ $get_html = empty($framename) ? true : false;
+ }
+ if ($get_html) {
+
+ if (HOTPOT_FIRST_ATTEMPT) {
+ add_to_log($course->id, "hotpot", "view", "view.php?id=$cm->id", "$hotpot->id", "$cm->id");
- $attemptid = hotpot_add_attempt($hotpot->id);
- if (! is_numeric($attemptid)) {
- error('Could not insert attempt record: '.$db->ErrorMsg);
- }
- }
- $hp->adjust_media_urls();
- if (empty($frameset)) {
- // HP6 v6
- switch ($hotpot->navigation) {
- case HOTPOT_NAVIGATION_BUTTONS:
- // do nothing (i.e. leave buttons as they are)
- break;
- case HOTPOT_NAVIGATION_GIVEUP:
- $hp->insert_giveup_form($attemptid, '', '');
- break;
- default:
- $hp->remove_nav_buttons();
- }
- if (isset($hp->real_outputformat) && $hp->real_outputformat==HOTPOT_OUTPUTFORMAT_MOBILE) {
- $hp->insert_submission_form($attemptid, '', '', true);
- } else {
- $hp->insert_submission_form($attemptid, '', '');
- }
- } else {
- // HP5 v5
- switch ($hotpot->navigation) {
- case HOTPOT_NAVIGATION_BUTTONS:
- // convert URLs in nav buttons
- break;
- case HOTPOT_NAVIGATION_GIVEUP:
- // $hp->insert_giveup_form($attemptid, '', '');
- break;
- default:
- // remove navigation buttons
- $hp->html = preg_replace('#NavBar\+=(.*);#', '', $hp->html);
- }
- $hp->insert_submission_form($attemptid, "var NavBar='", "';");
- }
- }
- }
- //FEEDBACK = new Array();
- //FEEDBACK[0] = ''; // url of feedback page/script
- //FEEDBACK[1] = ''; // array of array('teachername', 'value');
- //FEEDBACK[2] = ''; // 'student name' [formmail only]
- //FEEDBACK[3] = ''; // 'student email' [formmail only]
- //FEEDBACK[4] = ''; // window width
- //FEEDBACK[5] = ''; // window height
- //FEEDBACK[6] = ''; // 'Send a message to teacher' [prompt/button text]
- //FEEDBACK[7] = ''; // 'Title'
- //FEEDBACK[8] = ''; // 'Teacher'
- //FEEDBACK[9] = ''; // 'Message'
- //FEEDBACK[10] = ''; // 'Close this window'
- $feedback = array();
- switch ($hotpot->studentfeedback) {
- case HOTPOT_FEEDBACK_NONE:
- // do nothing
- break;
- case HOTPOT_FEEDBACK_WEBPAGE:
- if (empty($hotpot->studentfeedbackurl)) {
- $hotpot->studentfeedback = HOTPOT_FEEDBACK_NONE;
- } else {
- $feedback[0] = "'$hotpot->studentfeedbackurl'";
- }
- break;
- case HOTPOT_FEEDBACK_FORMMAIL:
- $teachers = hotpot_feedback_teachers($course, $hotpot);
- if (empty($teachers) || empty($hotpot->studentfeedbackurl)) {
- $hotpot->studentfeedback = HOTPOT_FEEDBACK_NONE;
- } else {
- $feedback[0] = "'$hotpot->studentfeedbackurl'";
- $feedback[1] = $teachers;
- $feedback[2] = "'".fullname($USER)."'";
- $feedback[3] = "'".$USER->email."'";
- $feedback[4] = 500; // width
- $feedback[5] = 300; // height
- }
- break;
- case HOTPOT_FEEDBACK_MOODLEFORUM:
- $module = get_record('modules', 'name', 'forum');
- $forums = get_records('forum', 'course', "$course->id");
- if (empty($module) || empty($module->visible) || empty($forums)) {
- $hotpot->studentfeedback = HOTPOT_FEEDBACK_NONE;
- } else {
- $feedback[0] = "'$CFG->wwwroot/mod/forum/index.php?id=$course->id'";
- }
- break;
- case HOTPOT_FEEDBACK_MOODLEMESSAGING:
- $teachers = hotpot_feedback_teachers($course, $hotpot);
- if (empty($CFG->messaging) || empty($teachers)) {
- $hotpot->studentfeedback = HOTPOT_FEEDBACK_NONE;
- } else {
- $feedback[0] = "'$CFG->wwwroot/message/discussion.php?id='";
- $feedback[1] = $teachers;
- $feedback[4] = 400; // width
- $feedback[5] = 500; // height
- }
- break;
- default:
- // do nothing
- }
- if ($hotpot->studentfeedback != HOTPOT_FEEDBACK_NONE) {
- $feedback[6] = "'Send a message to teacher'";
- $feedback[7] = "'Title'";
- $feedback[8] = "'Teacher'";
- $feedback[9] = "'Message'";
- $feedback[10] = "'Close this window'";
- $js = '';
- foreach ($feedback as $i=>$str) {
- $js .= 'FEEDBACK['.$i."] = $str;\n";
- }
- $js = '\n";
- $hp->html = preg_replace('||i', "$js", $hp->html, 1);
- }
- // insert hot-potatoes.js
- $hp->insert_script(HOTPOT_JS);
- // extract first tag
- $head = '';
- $pattern = '|]*)>(.*?)|is';
- if (preg_match($pattern, $hp->html, $matches)) {
- $head = $matches[2];
- // remove
- $head = preg_replace('|<title[^>]*>(.*?) |is', '', $head);
- }
- // extract |is';
- if (preg_match_all($pattern, $head, $matches)) {
- $count = count($matches[0]);
- for ($i=0; $i<$count; $i++) {
- $styles .= $matches[0][$i]."\n";
- $head = str_replace($matches[0][$i], '', $head);
- }
- }
- // extract |is';
- if (preg_match_all($pattern, $head, $matches)) {
- $count = count($matches[0]);
- for ($i=0; $i<$count; $i++) {
- $scripts .= $matches[0][$i]."\n";
- $head = str_replace($matches[0][$i], '', $head);
- }
- }
- // extract tags
- $body = '';
- $body_tags = '';
- $footer = '';
- // HP6 and some HP5 (v6 and v4)
- if (preg_match('|]*'.'onLoad=(["\'])(.*?)(\\2)'.'[^>]*)'.'>(.*)