├── .travis.yml
├── CHANGES.txt
├── README.txt
├── classes
    ├── mqxml2xhtml.xsl
    ├── mqxmlconverter.php
    ├── privacy
    │   └── provider.php
    └── xhtml2mqxml.xsl
├── db
    ├── install.php
    └── upgrade.php
├── format.php
├── lang
    └── en
    │   └── qformat_wordtable.php
├── tests
    └── qformat_wordtable_export_test.php
└── version.php


/.travis.yml:
--------------------------------------------------------------------------------
 1 | language: php
 2 | 
 3 | os: linux
 4 | dist: xenial
 5 | 
 6 | services:
 7 |   - mysql
 8 |   - postgresql
 9 | 
10 | addons:
11 |   firefox: "47.0.1"
12 |   apt:
13 |     packages:
14 |       - openjdk-8-jre-headless
15 |       - chromium-chromedriver
16 | 
17 | cache:
18 |   directories:
19 |     - $HOME/.composer/cache
20 |     - $HOME/.npm
21 | 
22 | matrix:
23 |   include:
24 |     - php: 7.3
25 |       env:
26 |         - MOODLE_BRANCH=master
27 |         - DB=mysqli
28 | 
29 |     - php: 7.3
30 |       env:
31 |         - MOODLE_BRANCH=MOODLE_38_STABLE
32 |         - DB=pgsql
33 |         - CHECK_GRUNT=yes
34 | 
35 |     - php: 7.2
36 |       env:
37 |         - MOODLE_BRANCH=MOODLE_37_STABLE
38 |         - DB=mysqli
39 | 
40 |     - php: 7.1
41 |       env:
42 |         - MOODLE_BRANCH=MOODLE_36_STABLE
43 |         - DB=pgsql
44 |         - NODE=8.9
45 | 
46 | before_install:
47 |   - phpenv config-rm xdebug.ini
48 | 
49 |   - if [ -z $CHECK_GRUNT ]; then
50 |       export CHECK_GRUNT=no;
51 |     fi
52 | 
53 |   - if [ -z $NODE ]; then
54 |       export NODE=14;
55 |     fi
56 |   - nvm install $NODE
57 |   - nvm use $NODE
58 | 
59 |   - cd ../..
60 |   - composer create-project -n --no-dev --prefer-dist moodlerooms/moodle-plugin-ci ci ^2
61 |   - export PATH="$(cd ci/bin; pwd):$(cd ci/vendor/bin; pwd):$PATH"
62 | 
63 | install:
64 |   - moodle-plugin-ci install
65 | 
66 | script:
67 |   - moodle-plugin-ci phplint
68 |   - moodle-plugin-ci phpcpd
69 |   - moodle-plugin-ci phpmd
70 |   - moodle-plugin-ci codechecker
71 |   - moodle-plugin-ci validate
72 |   - moodle-plugin-ci savepoints
73 |   - moodle-plugin-ci mustache
74 |   - moodle-plugin-ci grunt || [ "$CHECK_GRUNT" = 'no' ]
75 |   - moodle-plugin-ci phpunit
76 |   - moodle-plugin-ci behat
77 | 


--------------------------------------------------------------------------------
/CHANGES.txt:
--------------------------------------------------------------------------------
  1 | # Change log
  2 | 
  3 | Date          Version   Comment
  4 | 2025/04/23    3.9.7     Relax Moodle version requirement back to 3.9, not 5.0, as uploadlib was obsolete then anyway.
  5 | 2025/04/04    3.9.6     Remove dependency on uploadlib library.
  6 | 2022/10/26    3.9.5     Fix bug in checking for versions before 3.11.6.
  7 | 2022/04/05    3.9.4     Support file validation on import for Moodle 3.11.6 and higher.
  8 | 2022/04/04    3.9.3     Support "Import questions" command in Lesson activity (thanks to drobayo for the code).
  9 | 2021/08/31    3.9.2     Improve support for Lesson question imports.
 10 | 2021/08/23    3.9.1     Fix dependency on Book Word converter.
 11 | 2021/08/21    3.9.0     Use Book Word import wordconverter class for import/export of Word files.
 12 | 2020/12/08    3.7.1     Add support for letter-groups in Select Missing Word questions.
 13 | 2020/07/10    3.6.3     Stop leaving temporary files lying around.
 14 | 2020/07/10    3.6.2     Add support for Office MML m:deg element, which caused an error.
 15 | 2020/06/18    3.6.1     Add support for 'No online text' responses and accepted file types.
 16 | 2019/07/15    3.6.0     Add support for optional ID number field in Moodle 3.6, plus small Missing Word type bug-fixes.
 17 | 2018/08/03    3.5.23    Clean Moodle question type explanatory text XHTML exported to Word, for more robust operation.
 18 | 2018/06/04    3.5.22    Support Privacy API for GDPR compliance.
 19 | 2017/09/02    3.5.21    Fix handling of hints.
 20 | 2017/08/31    3.5.20    Don't raise the memory limit for XSLT any more, fix roman uppercase numbering import bug.
 21 | 2017/08/14    3.5.19    Handle list item duplication bug inside adjacent table cells
 22 | 2017/08/06    3.5.18    Handle Bootstrap Alert components.
 23 | 2017/05/21    3.5.17    Handle penalty value of 0% on multiple tries.
 24 | 2017/04/17    3.5.16    Use canonical reference to temp directory, start using PHPStorm IDE.
 25 | 2017/01/05    3.5.15    Fix error when handling empty table cells.
 26 | 2016/12/16    3.5.14    Improve RTL language support again.
 27 | 2016/11/14    3.5.13    Improve localisation by adding more strings for use in Word template, improve RTL language support.
 28 | 2016/11/05    3.5.12    Fix Hebrew support for True/False question import.
 29 | 2016/11/02    3.5.11    Replace "<br>" with "<br/>" in the Moodle text strings used for exporting Word files (for Polish issue).
 30 | 2016/10/31    3.5.10    Retain table border style, handle WMF images better, support pre-formatted text.
 31 | 2016/09/09    3.5.9     Strip out OfficeMath revision control markup from Word 2010 files.
 32 | 2016/09/08    3.5.8     Strip out VML/drawingML markup from Word 2010 files.
 33 | 2016/06/12    3.5.7     Fix equation problem, improve table handling and Cloze question formatting.
 34 | 2016/01/14    3.5.6     Add PHPUnit tests for exports, remove debugging.
 35 | 2016/01/08    3.5.5     Fix incorrect conversion of Cloze text.
 36 | 2016/01/05    3.5.4     Improve handling of exported images to avoid bookmark name clashes.
 37 | 2016/01/05    3.5.3     Improve handling of adjacent bold/italic formatting when importing Cloze questions.
 38 | 2015/12/30    3.5.2     Fix error in Cloze MC/SA subquestion import processing, and '--' in text in export processing.
 39 | 2015/12/15    3.5.1     Fix error in non-ASCII characters and alignment when exporting questions.
 40 | 2015/12/14    3.5.0     Support OU question types 'Drag and drop onto image,' 'Drag and drop markers',
 41 |                         'Drag and drop into text' and 'Select missing words',
 42 |                         clean code to pass Travis codechecker.
 43 | 2015/09/30    3.4.3     Support RTL equations in MathML conversion.
 44 | 2015/09/24    3.4.2     Minimise empty attributes in Pass 1 of conversion.
 45 | 2015/09/21    3.4.1     Handle unusual WordML markup (w:dir) in RTL (e.g. Arabic) text.
 46 | 2015/09/21    3.4.0     Convert Microsoft Equation Editor equations into MathML for display by MathJax.
 47 | 2015/09/16    3.3.2     Improve code formatting to comply better with Moodle guidelines.
 48 | 2015/09/16    3.3.1     Support target attribute in hyperlinks to allow links to open in new window.
 49 | 2015/09/01    3.3.0     Improve reliability of the question exports if question text content is badly formatted.
 50 | 2015/08/19    3.2.2     Grab extra memory to allow very large Word files to be exported, handle HTML markup in exports better.
 51 | 2015/08/04    3.2.1     Grab extra memory to allow very large Word files to be imported,
 52 |                         fix Essay and All-or-Nothing question type issues.
 53 | 2015/08/01    3.2.0     Support All-or-Nothing Multiple Choice import and export.
 54 | 2015/07/27    3.1.11    Support question export for all built-in question types.
 55 | 2015/07/25    3.1.10    Support question import in Lessons.
 56 | 2015/07/17    3.1.9     Minor change to delete old and unused configuration values from config_plugins table.
 57 | 2015/07/15    3.1.8     Improve export formatting to handle paragraph attributes better (alignment, etc.).
 58 | 2015/07/13    3.1.7     On import, retain the size of images as defined within Word, and retain text alignment.
 59 | 2015/07/04    3.1.6     Support the new 'Require text' field added to Essay questions in Moodle 2.9.
 60 | 2015/07/03    3.1.5     Improve export of far-eastern languages like Chinese and Japanese.
 61 | 2015/04/02    3.1.4     Fix text direction in non-Arabic Word templates, handle strikethrough better.
 62 | 2015/03/11    3.1.3     Fix image handling, including external images not embedded in Word file, and hyperlinked images.
 63 | 2015/03/03    3.1.2     Fix for Moodle 2.7/2.8 to improve handling of attachments in essay questions.
 64 | 2015/03/03    3.1.1     Fix for Moodle 2.7/2.8 to enable question import, by deleting superfluous namespace attributes.
 65 | 2015/03/02    3.1.0     Keep original uploaded Word file in debug mode. Fix handling of Cloze questions.
 66 |                         Handle hyperlinks and other character formatting properly, support questions created 
 67 |                         in Word language versions other than English, fix Cloze questions.
 68 | 2015/02/20    3.0.0     Support import of Word 2010 (.docx) documents, remove all question import limits,
 69 |                         and use of an external conversion server.
 70 |                         Also add support for tables and lists inside item components.
 71 | 
 72 | 2014/10/08    2.10.1    Fix bug in handling of image filenames containing spaces.
 73 | 2014/08/12    2.10      Support case-sensitivity and selection style and orientation in Cloze SA and MC subquestions.
 74 |                         Support specification of default mark in Cloze questions. Fix merging of paragraphs.
 75 | 2014/07/10    2.9.2     Fix syntax error in db/install.php.
 76 | 2014/07/10    2.9.1     Fix error in registration process set-up, which prevented registration to set 10-question limit.
 77 | 
 78 | 2014/06/17    2.9       Use default username and password for importing Word files to make Registration optional.
 79 |                         Handle named numeric entities (e.g. &nbsp;) by converting them to numeric entities 
 80 |                         instead (i.e. &#160;) to avoid XSLT processing errors.
 81 | 
 82 | 2014/05/12    2.8.5     Handle invalid 'complete="true"' attribute in images, fix loop through all CDATA 
 83 |                         sections, keep tr elements when cleaning HTML manually.
 84 | 
 85 | 2014/05/07    2.8.4     Fix error in image handling in Moodle 1.9, add work-around to cope with XSLT 
 86 |                         idiosyncrasies that insert namespace declaration on wrong element, breaking the
 87 |                         Word export facility. Fix mishandling of Hints in Short Answer export.
 88 | 
 89 | 2014/05/04    2.8.3     Improve image handling to properly export any images used inside feedback text.
 90 | 
 91 | 2014/05/03    2.8.2     Handle images with names that include spaces or other non-alphanumeric characters.
 92 | 
 93 | 2014/05/02    2.8.1     CONTRIB-5028: clean up HTML markup better (using strip_tags) if the PHP tidy 
 94 |                         extension is not installed.
 95 | 
 96 | 2014/04/28    2.8       Use the PHP tidy extension to ensure that any HTML inside CDATA sections is well-formed
 97 |                         XHTML, otherwise Word export fails.
 98 | 
 99 | 2014/02/27    2.7.1     Add Word export support for RTL languages such as Arabic and Hebrew.
100 | 
101 | 2014/02/03    2.7       Add Word export support for languages other than English, using labels in the language
102 |                         of the users' current interface language selection. Also support new Moodle 2.x
103 |                         question features such as Hints and Tags.
104 | 
105 | 2014/01/03    2.6       Add support for including any images used in questions exported into a Word file, in a
106 |                         two-stage process that also requires using a command in the Moodle2Word Word template to
107 |                         embed the encoded images into the file.
108 | 
109 | 2013/12/20    2.5       Improve handling of CDATA text that includes HTML markup, and the Moodle 1.9 question
110 |                         textancillary image element.
111 | 
112 | 2013/03/15    2.4       Improve handling of Cloze question formatting when exporting to Word format.
113 | 


--------------------------------------------------------------------------------
/README.txt:
--------------------------------------------------------------------------------
 1 | # Description
 2 | Moodle2Word is a plugin that allows quiz questions to be exported from Moodle into a Word file.
 3 | The Word file can then be used to quickly review large numbers of questions
 4 | (either online or in print), or to prepare paper tests (where the answers and feedback are hidden).
 5 | 
 6 | Moodle2Word also supports importing questions from structured tables in Word directly into the Moodle question bank.
 7 | The tables support all the question components (stem, answer options, option-specific and general feedback, 
 8 | hints, tags and question meta-data such as penalties grades and other options), as well as embedded images. 
 9 | 
10 | All the main question types except Numerical and Calculated questions are fully supported.
11 | Numerical and Calculated questions are exported, but cannot be imported.
12 | 
13 | Some OU question types added to core in Moodle 3.0 are also supported: Drag and drop onto image, 
14 | Drag and drop markers, Drag and drop into text and Select missing words.
15 | All-or-Nothing Multiple Choice is also supported. These additional question types all require that
16 | custom versions of the questions be installed to replace the defaults, however.
17 | 
18 | The Cloze question syntax is particularly useful, as it does not require any knowledge of the
19 | arcane Moodle syntax; instead, use bold for drop-down menu items, and italic for fill-in text fields.
20 | 
21 | # Language support
22 | Exported questions are labelled in the language of the current Moodle user interface, and the spell-check language is
23 | also set to the correct language.
24 | Similarly, questions can be imported in the same language, not just English.
25 | Both left-to-right and right-to-left languages (such as Arabic and Hebrew) are supported.
26 | 
27 | # Supporting Word templates
28 | Word templates to support the plugin can be downloaded from the demonstration website
29 | www.Moodle2Word.net, and are available for Word 2003, 2007, 2010 and 2013 (Windows),
30 | and Word 2004 and 2011 (MacOSX). The Windows templates also support a simple question preview facility,
31 | as well as uploading questions from within Word.
32 | 
33 | If questions contain images, then you need to install the Word template in order to be able to convert
34 | the images in exported questions into embedded images in Word, as they are not automatically visible.
35 | 
36 | The Word templates are available in most major languages, including English, Spanish and Chinese.
37 | Templates for other languages can be easily added, so feel free to ask.
38 | 


--------------------------------------------------------------------------------
/classes/mqxml2xhtml.xsl:
--------------------------------------------------------------------------------
   1 | <?xml version="1.0" encoding="UTF-8"?>
   2 | <!--
   3 | // This file is part of Moodle - http://moodle.org/
   4 | //
   5 | // Moodle is free software: you can redistribute it and/or modify
   6 | // it under the terms of the GNU General Public License as published by
   7 | // the Free Software Foundation, either version 3 of the License, or
   8 | // (at your option) any later version.
   9 | //
  10 | // Moodle is distributed in the hope that it will be useful,
  11 | // but WITHOUT ANY WARRANTY; without even the implied warranty of
  12 | // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13 | // GNU General Public License for more details.
  14 | //
  15 | // You should have received a copy of the GNU General Public License
  16 | // along with Moodle.  If not, see <http://www.gnu.org/licenses/>.
  17 | 
  18 |  * XSLT stylesheet to transform Moodle Question XML-formatted questions into Word-compatible HTML tables
  19 |  *
  20 |  * @package    qformat_wordtable
  21 |  * @copyright  2010-2015 Eoin Campbell
  22 |  * @author     Eoin Campbell
  23 |  * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later (5)
  24 | -->
  25 | <xsl:stylesheet exclude-result-prefixes="htm"
  26 |     xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
  27 |     xmlns:htm="http://www.w3.org/1999/xhtml"
  28 |     xmlns="http://www.w3.org/1999/xhtml"
  29 |     version="1.0">
  30 | 
  31 | <xsl:param name="course_name"/>
  32 | <xsl:param name="course_id"/>
  33 | <xsl:param name="author_name"/>
  34 | <xsl:param name="author_id"/>
  35 | <xsl:param name="institution_name"/>
  36 | <xsl:param name="moodle_language" select="'en'"/> <!-- Interface language for user -->
  37 | <xsl:param name="moodle_release"/> <!-- 1.9 or 2.x -->
  38 | <xsl:param name="moodle_version"/>  <!-- Datestamp of release -->
  39 | <xsl:param name="moodle_textdirection" select="'ltr'"/> <!-- ltr/rtl, ltr except for Arabic, Hebrew, Urdu, Farsi, Maldivian (who knew?) -->
  40 | <xsl:param name="moodle_username"/> <!-- Username for login -->
  41 | <xsl:param name="moodle_url"/>      <!-- Location of Moodle site -->
  42 | <xsl:param name="debug_flag" select="'0'"/>      <!-- Debugging on or off -->
  43 | 
  44 | <xsl:output method="xml" version="1.0" indent="yes" omit-xml-declaration="yes"/>
  45 | 
  46 | <!-- Text labels from translated Moodle files - now stored in the input XML file -->
  47 | <xsl:variable name="moodle_labels" select="/container/moodlelabels"/>
  48 | 
  49 | 
  50 | <xsl:variable name="ucase" select="'ABCDEFGHIJKLMNOPQRSTUVWXYZ'" />
  51 | <xsl:variable name="lcase" select="'abcdefghijklmnopqrstuvwxyz'" />
  52 | <xsl:variable name="pluginfiles_string" select="'@@PLUGINFILE@@/'"/>
  53 | <!-- Cloze question keywords to watch out for -->
  54 | <xsl:variable name="cloze_mc_keyword1" select="':MULTICHOICE:'"/>
  55 | <xsl:variable name="cloze_mc_keyword2" select="':MC:'"/>
  56 | <xsl:variable name="cloze_mch_keyword1" select="':MCH:'"/>
  57 | <xsl:variable name="cloze_mch_keyword2" select="':MULTICHOICE_H:'"/>
  58 | <xsl:variable name="cloze_mcv_keyword1" select="':MULTICHOICE_V:'"/>
  59 | <xsl:variable name="cloze_mcv_keyword2" select="':MCV:'"/>
  60 | <xsl:variable name="cloze_sa_keyword1" select="':SHORTANSWER:'"/>
  61 | <xsl:variable name="cloze_sa_keyword2" select="':SA:'"/>
  62 | <xsl:variable name="cloze_sa_keyword3" select="':MW:'"/>
  63 | <xsl:variable name="cloze_sac_keyword1" select="':SHORTANSWER_C:'"/>
  64 | <xsl:variable name="cloze_sac_keyword2" select="':SAC:'"/>
  65 | <xsl:variable name="cloze_sac_keyword3" select="':MWC:'"/>
  66 | <xsl:variable name="cloze_num_keyword1" select="':NUMERICAL:'"/>
  67 | <xsl:variable name="cloze_num_keyword2" select="':NM:'"/>
  68 | <xsl:variable name="cloze_correct_prefix1" select="'%100%'"/>
  69 | <xsl:variable name="cloze_correct_prefix2" select="'='"/>
  70 | <xsl:variable name="cloze_incorrect_prefix" select="'%0%'"/>
  71 | <xsl:variable name="cloze_start_delimiter" select="'{'"/>
  72 | <xsl:variable name="cloze_end_delimiter" select="'}'"/>
  73 | <xsl:variable name="cloze_keyword_delimiter" select="':'"/>
  74 | <xsl:variable name="cloze_answer_delimiter" select="'~'"/>
  75 | <xsl:variable name="cloze_distractor_column_label" select="$moodle_labels/data[@name = 'qformat_wordtable_cloze_distractor_column_label']"/>
  76 | <xsl:variable name="cloze_feedback_column_label" select="$moodle_labels/data[@name = 'qformat_wordtable_cloze_feedback_column_label']"/>
  77 | <xsl:variable name="cloze_mcformat_label" select="concat($moodle_labels/data[@name = 'qformat_wordtable_cloze_mcformat_label'], $colon_string)"/>
  78 | 
  79 | <!-- Moodle release is significant for the format of different questions
  80 |     Essay:
  81 |         1.9   - no grader info or response template
  82 |         2.1-4 - grader info and attachments, but no response template
  83 |         2.5+  - grader info, attachments and response template
  84 |         2.7+  - number of required attachments field
  85 |         2.9+  - response text required/optional field
  86 | 
  87 |     Cloze:
  88 |         2.1-3 - no per-hint options
  89 |         2.4+  - per hint options, i.e. clear wrong responses, show number of correct responses
  90 | 
  91 |     Hints and Tags:
  92 |         1.9  - no hints or tags
  93 |         2.1+ - hints and tags
  94 | -->
  95 | <!-- Convert Moodle release numbers such as "2.4" to "24" for easier numerical comparisons, to decide what question heading rows to include -->
  96 | <xsl:variable name="moodle_release_number" select="translate(substring($moodle_release, 1, 3), '.', '')"/>
  97 | <xsl:variable name="moodle_release_date" select="substring($moodle_version, 1, 8)"/>
  98 | 
  99 | <!-- Handle colon usage in French -->
 100 | <xsl:variable name="colon_string">
 101 |     <xsl:choose>
 102 |     <xsl:when test="starts-with($moodle_language, 'fr')"><xsl:text> :</xsl:text></xsl:when>
 103 |     <xsl:otherwise><xsl:text>:</xsl:text></xsl:otherwise>
 104 |     </xsl:choose>
 105 | </xsl:variable>
 106 | <xsl:variable name="blank_cell" select="'&#160;'"/>
 107 | 
 108 | <!-- Create the list of labels from text strings in Moodle, to maximise familiarity of Word file labels -->
 109 | <xsl:variable name="answer_label" select="$moodle_labels/data[@name = 'quiz_answer']"/>
 110 | <xsl:variable name="answers_label" select="$moodle_labels/data[@name = 'quiz_answers']"/>
 111 | <xsl:variable name="categoryname_label" select="$moodle_labels/data[@name = 'moodle_categoryname']"/>
 112 | <xsl:variable name="defaultmark_label" select="concat($moodle_labels/data[@name = 'question_defaultmark'], $colon_string)"/>
 113 | <xsl:variable name="grade_label" select="$moodle_labels/data[@name = 'moodle_gradenoun']"/>
 114 | <xsl:variable name="no_label" select="$moodle_labels/data[@name = 'moodle_no']"/>
 115 | <xsl:variable name="yes_label" select="$moodle_labels/data[@name = 'moodle_yes']"/>
 116 | <xsl:variable name="item_label" select="$moodle_labels/data[@name = 'grades_item']"/>
 117 | <xsl:variable name="penalty_label" select="concat($moodle_labels/data[@name = 'question_penaltyforeachincorrecttry'], $colon_string)"/>
 118 | <xsl:variable name="question_label" select="$moodle_labels/data[@name = 'moodle_question']"/>
 119 | <xsl:variable name="category_label" select="$moodle_labels/data[@name = 'question_category']"/>
 120 | <xsl:variable name="tags_label" select="concat($moodle_labels/data[@name = 'moodle_tags'], $colon_string)"/>
 121 | <xsl:variable name="idnumber_label" select="concat($moodle_labels/data[@name = 'question_idnumber'], $colon_string)"/>
 122 | 
 123 | <xsl:variable name="matching_shuffle_label" select="concat($moodle_labels/data[@name = 'quiz_shuffle'], $colon_string)"/>
 124 | <xsl:variable name="mcq_shuffleanswers_label" select="$moodle_labels/data[@name = 'qtype_multichoice_shuffleanswers']"/>
 125 | <xsl:variable name="gapselect_shuffle_label" select="concat($moodle_labels/data[@name = 'qtype_gapselect_shuffle'], $colon_string)"/>
 126 | <xsl:variable name="answernumbering_label" select="$moodle_labels/data[@name = 'qtype_multichoice_answernumbering']"/>
 127 | 
 128 | <!-- Per-question feedback labels -->
 129 | <xsl:variable name="correctfeedback_label" select="concat($moodle_labels/data[@name = 'qtype_multichoice_correctfeedback'], $colon_string)"/>
 130 | <xsl:variable name="feedback_label" select="$moodle_labels/data[@name = 'moodle_feedback']"/>
 131 | <xsl:variable name="generalfeedback_label" select="concat($moodle_labels/data[@name = 'question_generalfeedback'], $colon_string)"/>
 132 | 
 133 | <xsl:variable name="incorrectfeedback_label" select="concat($moodle_labels/data[@name = 'qtype_multichoice_incorrectfeedback'], $colon_string)"/>
 134 | <xsl:variable name="pcorrectfeedback_label" select="concat($moodle_labels/data[@name = 'qtype_multichoice_partiallycorrectfeedback'], $colon_string)"/>
 135 | <xsl:variable name="shownumcorrectfeedback_label" select="concat($moodle_labels/data[@name = 'question_shownumpartscorrectwhenfinished'], $colon_string)"/>
 136 | 
 137 | <!-- Default feedback text (2.5+ only) -->
 138 | <xsl:variable name="correctfeedback_default" select="$moodle_labels/data[@name = 'question_correctfeedbackdefault']"/>
 139 | <xsl:variable name="incorrectfeedback_default" select="$moodle_labels/data[@name = 'question_incorrectfeedbackdefault']"/>
 140 | <xsl:variable name="pcorrectfeedback_default" select="$moodle_labels/data[@name = 'question_partiallycorrectfeedbackdefault']"/>
 141 | 
 142 | <!-- Hint labels; don't add a colon yet, because we'll suffix a specific hint number when printing -->
 143 | <xsl:variable name="hintn_label" select="$moodle_labels/data[@name = 'question_hintn']"/>
 144 | <xsl:variable name="hint_shownumpartscorrect_label" select="$moodle_labels/data[@name = 'question_shownumpartscorrect']"/>
 145 | <xsl:variable name="hint_clearwrongparts_label" select="$moodle_labels/data[@name = 'question_clearwrongparts']"/>
 146 | 
 147 | <!-- Description labels -->
 148 | <xsl:variable name="description_instructions" select="$moodle_labels/data[@name = 'qtype_description_pluginnamesummary']"/>
 149 | 
 150 | <!-- Essay question labels -->
 151 | <xsl:variable name="acceptedfiletypes_label" select="concat($moodle_labels/data[@name = 'qtype_essay_acceptedfiletypes'], $colon_string)"/>
 152 | <xsl:variable name="allowattachments_label" select="concat($moodle_labels/data[@name = 'qtype_essay_allowattachments'], $colon_string)"/>
 153 | <xsl:variable name="attachmentsoptional_label" select="concat($moodle_labels/data[@name = 'qtype_essay_attachmentsoptional'], $colon_string)"/>
 154 | <xsl:variable name="attachmentsrequired_label" select="concat($moodle_labels/data[@name = 'qtype_essay_attachmentsrequired'], $colon_string)"/>
 155 | <xsl:variable name="graderinfo_label" select="$moodle_labels/data[@name = 'qtype_essay_graderinfo']"/>
 156 | <xsl:variable name="responsetemplate_label" select="$moodle_labels/data[@name = 'qtype_essay_responsetemplate']"/>
 157 | <xsl:variable name="responsetemplate_help_label" select="$moodle_labels/data[@name = 'qtype_essay_responsetemplate_help']"/>
 158 | <xsl:variable name="responsefieldlines_label" select="concat($moodle_labels/data[@name = 'qtype_essay_responsefieldlines'], $colon_string)"/>
 159 | <xsl:variable name="responseformat_label" select="concat($moodle_labels/data[@name = 'qtype_essay_responseformat'], $colon_string)"/>
 160 | <xsl:variable name="responserequired_label" select="concat($moodle_labels/data[@name = 'qtype_essay_responserequired'], $colon_string)"/>
 161 | <xsl:variable name="format_html_label" select="$moodle_labels/data[@name = 'qtype_essay_formateditor']"/>
 162 | <xsl:variable name="format_plain_label" select="$moodle_labels/data[@name = 'qtype_essay_formatplain']"/>
 163 | <xsl:variable name="format_noinline_label" select="$moodle_labels/data[@name = 'qtype_essay_formatnoinline']"/>
 164 | <!-- Moodle 2.x only -->
 165 | <xsl:variable name="format_editorfilepicker_label" select="$moodle_labels/data[@name = 'qtype_essay_formateditorfilepicker']"/>
 166 | <xsl:variable name="format_mono_label" select="$moodle_labels/data[@name = 'qtype_essay_formatmonospaced']"/>
 167 | <!-- Moodle 1.9 only -->
 168 | <xsl:variable name="format_auto_label" select="$moodle_labels/data[@name = 'moodle_formattext']"/>
 169 | <xsl:variable name="format_markdown_label" select="$moodle_labels/data[@name = 'moodle_formatmarkdown']"/>
 170 | <xsl:variable name="essay_instructions" select="$moodle_labels/data[@name = 'qtype_essay_pluginnamesummary']"/>
 171 | 
 172 | <!-- Matching question labels -->
 173 | <xsl:variable name="matching_instructions" select="$moodle_labels/data[@name = 'qtype_match_filloutthreeqsandtwoas']"/>
 174 | 
 175 | <!-- Multichoice/Multi-Answer question labels -->
 176 | <xsl:variable name="choice_label">
 177 |     <xsl:variable name="choice_text" select="$moodle_labels/data[@name = 'qtype_multichoice_choiceno']"/>
 178 |     <xsl:choose>
 179 |     <xsl:when test="contains($choice_text, '{')">
 180 |         <xsl:value-of select="normalize-space(substring-before($choice_text, '{'))"/>
 181 |     </xsl:when>
 182 |     <xsl:otherwise><xsl:value-of select="$choice_text"/></xsl:otherwise>
 183 |     </xsl:choose>
 184 | </xsl:variable>
 185 | <xsl:variable name="multichoice_instructions" select="concat($moodle_labels/data[@name = 'qtype_multichoice_pluginnamesummary'], ' (MC/MA)')"/>
 186 | 
 187 | <!-- Multichoice Set (All-or-Nothing Multichoice) question labels -->
 188 | <xsl:variable name="multichoiceset_showeachfeedback_label" select="$moodle_labels/data[@name = 'qtype_multichoiceset_showeachanswerfeedback']"/>
 189 | <xsl:variable name="multichoiceset_instructions" select="$moodle_labels/data[@name = 'qtype_multichoiceset_pluginnamesummary']"/>
 190 | 
 191 | <!-- Gapselect (Select missing word) question labels -->
 192 | <xsl:variable name="missingword_instructions" select="$moodle_labels/data[@name = 'qtype_gapselect_errornoslots']"/>
 193 | <xsl:variable name="group_label" select="$moodle_labels/data[@name = 'qtype_gapselect_group']"/>
 194 | 
 195 | <!-- Short Answer question labels -->
 196 | <xsl:variable name="casesensitive_label" select="concat($moodle_labels/data[@name = 'qtype_shortanswer_casesensitive'], $colon_string)"/>
 197 | <xsl:variable name="shortanswer_instructions" select="$moodle_labels/data[@name = 'qtype_shortanswer_filloutoneanswer']"/>
 198 | 
 199 | <!-- True/False question labels -->
 200 | <xsl:variable name="false_label" select="$moodle_labels/data[@name = 'qtype_truefalse_false']"/>
 201 | <xsl:variable name="true_label" select="$moodle_labels/data[@name = 'qtype_truefalse_true']"/>
 202 | 
 203 | <!-- Drag and Drop question labels -->
 204 | <xsl:variable name="ddi_shuffleimages_label" select="$moodle_labels/data[@name = 'qtype_ddimageortext_shuffleimages']"/>
 205 | <xsl:variable name="ddi_dropzoneheader_label" select="$moodle_labels/data[@name = 'qtype_ddimageortext_dropzoneheader']"/>
 206 | <xsl:variable name="ddi_draggableitem_label" select="$moodle_labels/data[@name = 'qtype_ddimageortext_draggableitem']"/>
 207 | <xsl:variable name="ddi_text_label" select="$moodle_labels/data[@name = 'qtype_ddimageortext_text']"/>
 208 | <xsl:variable name="ddi_bgimage_label" select="$moodle_labels/data[@name = 'qtype_ddimageortext_bgimage']"/>
 209 | <xsl:variable name="ddi_coords_label">
 210 |     <xsl:value-of select="$moodle_labels/data[@name = 'qtype_ddimageortext_xleft']"/>
 211 |     <xsl:text>, </xsl:text>
 212 |     <xsl:value-of select="$moodle_labels/data[@name = 'qtype_ddimageortext_ytop']"/>
 213 | </xsl:variable>
 214 | <xsl:variable name="ddi_infinite_label" select="$moodle_labels/data[@name = 'qtype_ddimageortext_infinite']"/>
 215 | <xsl:variable name="ddi_instructions" select="$moodle_labels/data[@name = 'qtype_ddimageortext_pluginnamesummary']"/>
 216 | <xsl:variable name="ddi_shape_label" select="$moodle_labels/data[@name = 'qtype_ddimageortext_shape']"/>
 217 | 
 218 | <xsl:variable name="ddm_circle_label" select="$moodle_labels/data[@name = 'qtype_ddmarker_shape_circle']"/>
 219 | <xsl:variable name="ddm_hint_clearwrongparts_label" select="$moodle_labels/data[@name = 'qtype_ddmarker_clearwrongparts']"/>
 220 | <xsl:variable name="ddm_coords_label" select="$moodle_labels/data[@name = 'qtype_ddmarker_coords']"/>
 221 | <xsl:variable name="ddm_marker_label" select="$moodle_labels/data[@name = 'qtype_ddmarker_marker']"/>
 222 | <xsl:variable name="ddm_instructions" select="$moodle_labels/data[@name = 'qtype_ddmarker_pluginnamesummary']"/>
 223 | <xsl:variable name="ddm_infinite_label" select="$moodle_labels/data[@name = 'qtype_ddmarker_infinite']"/>
 224 | <xsl:variable name="ddm_noofdrags_label" select="$moodle_labels/data[@name = 'qtype_ddmarker_noofdrags']"/>
 225 | <xsl:variable name="ddm_polygon_label" select="$moodle_labels/data[@name = 'qtype_ddmarker_shape_polygon']"/>
 226 | <xsl:variable name="ddm_rectangle_label" select="$moodle_labels/data[@name = 'qtype_ddmarker_shape_rectangle']"/>
 227 | <xsl:variable name="ddm_shape_label" select="$moodle_labels/data[@name = 'qtype_ddmarker_shape']"/>
 228 | <xsl:variable name="ddm_showmisplaced_label" select="$moodle_labels/data[@name = 'qtype_ddmarker_showmisplaced']"/>
 229 | <xsl:variable name="ddm_stateincorrectlyplaced_label" select="$moodle_labels/data[@name = 'qtype_ddmarker_stateincorrectlyplaced']"/>
 230 | 
 231 | <xsl:variable name="ddt_infinite_label" select="$moodle_labels/data[@name = 'qtype_ddwtos_infinite']"/>
 232 | <xsl:variable name="ddt_instructions" select="$moodle_labels/data[@name = 'qtype_ddwtos_pluginnamesummary']"/>
 233 | 
 234 | <!-- Wordtable-specific instruction strings -->
 235 | <xsl:variable name="cloze_instructions" select="$moodle_labels/data[@name = 'qformat_wordtable_cloze_instructions']"/>
 236 | <xsl:variable name="truefalse_instructions" select="$moodle_labels/data[@name = 'qformat_wordtable_truefalse_instructions']"/>
 237 | <xsl:variable name="unsupported_instructions" select="$moodle_labels/data[@name = 'qformat_wordtable_unsupported_instructions']"/>
 238 | 
 239 | 
 240 | <!-- Column widths -->
 241 | <xsl:variable name="col2_width" select="'width: 5.0cm'"/>
 242 | <xsl:variable name="col2_2span_width" select="'width: 6.0cm'"/>
 243 | <xsl:variable name="col3_width" select="'width: 6.0cm'"/>
 244 | <xsl:variable name="col3_2span_width" select="'width: 7.0cm'"/>
 245 | 
 246 | <!-- Match document root node, and read in and process Word-compatible XHTML template -->
 247 | <xsl:template match="/container/quiz">
 248 |     <html>
 249 |         <xsl:variable name="category">
 250 |             <xsl:variable name="raw_category" select="normalize-space(./question[1]/category)"/>
 251 | 
 252 |             <xsl:choose>
 253 |             <xsl:when test="contains($raw_category, '$course$/')">
 254 |                 <xsl:value-of select="substring-after($raw_category, '$course$/')"/>
 255 |             </xsl:when>
 256 |             <xsl:otherwise><xsl:value-of select="$raw_category"/></xsl:otherwise>
 257 |             </xsl:choose>
 258 |         </xsl:variable>
 259 | 
 260 |         <head>
 261 |             <title><xsl:value-of select="concat($course_name, ', ', $category_label, $colon_string, ' ', $category)"/></title>
 262 |         </head>
 263 |         <body>
 264 |             <!--<xsl:comment><xsl:value-of select="concat('Release: ', $moodle_release, '; rel_number: ', $moodle_release_number)"/></xsl:comment>-->
 265 |             <p class="MsoTitle"><xsl:value-of select="$course_name"/></p>
 266 |             <xsl:apply-templates select="./question"/>
 267 |         </body>
 268 |     </html>
 269 | </xsl:template>
 270 | 
 271 | <!-- Throw away extra wrapper elements included in container XML -->
 272 | <xsl:template match="/container/moodlelabels"/>
 273 | 
 274 | <!-- Omit any Numerical, Random or Calculated questions because we don't want to attempt to import them later
 275 | <xsl:template match="question[@type = 'numerical']"/>
 276 | <xsl:template match="question[starts-with(@type, 'calc')]"/>
 277 | <xsl:template match="question[starts-with(@type, 'random')]"/>
 278 | -->
 279 | <!-- Category becomes a Heading 1 style -->
 280 | <!-- There can be lots of categories, but they can also be duplicated -->
 281 | <xsl:template match="question[@type = 'category']">
 282 |     <xsl:variable name="category">
 283 |         <xsl:variable name="raw_category" select="normalize-space(category)"/>
 284 | 
 285 |         <xsl:choose>
 286 |         <xsl:when test="contains($raw_category, '$course$/')">
 287 |             <xsl:value-of select="substring-after($raw_category, '$course$/')"/>
 288 |         </xsl:when>
 289 |         <xsl:otherwise><xsl:value-of select="$raw_category"/></xsl:otherwise>
 290 |         </xsl:choose>
 291 |     </xsl:variable>
 292 | 
 293 |     <h1 class="MsoHeading1"><xsl:value-of select="$category"/></h1>
 294 | </xsl:template>
 295 | 
 296 | <!-- Handle the questions -->
 297 | <xsl:template match="question">
 298 |     <xsl:variable name="qtype">
 299 |         <xsl:choose>
 300 |         <xsl:when test="@type = 'calculated'"><xsl:text>CA</xsl:text></xsl:when>
 301 |         <xsl:when test="@type = 'calculatedmulti'"><xsl:text>CM</xsl:text></xsl:when>
 302 |         <xsl:when test="@type = 'calculatedsimple'"><xsl:text>CS</xsl:text></xsl:when>
 303 |         <xsl:when test="@type = 'cloze'"><xsl:text>CL</xsl:text></xsl:when>
 304 |         <xsl:when test="@type = 'description'"><xsl:text>DE</xsl:text></xsl:when>
 305 |         <xsl:when test="@type = 'essay'"><xsl:text>ES</xsl:text></xsl:when>
 306 |         <xsl:when test="@type = 'gapselect'"><xsl:text>MW</xsl:text></xsl:when>
 307 |         <xsl:when test="@type = 'matching'"><xsl:text>MAT</xsl:text></xsl:when>
 308 |         <xsl:when test="@type = 'multichoice' and single = 'false'"><xsl:text>MA</xsl:text></xsl:when>
 309 |         <xsl:when test="@type = 'multichoice' and single = 'true'"><xsl:text>MC</xsl:text></xsl:when>
 310 |         <xsl:when test="@type = 'multichoiceset'"><xsl:text>MS</xsl:text></xsl:when>
 311 |         <xsl:when test="@type = 'numerical'"><xsl:text>NUM</xsl:text></xsl:when>
 312 |         <xsl:when test="@type = 'shortanswer'"><xsl:text>SA</xsl:text></xsl:when>
 313 |         <xsl:when test="@type = 'truefalse'"><xsl:text>TF</xsl:text></xsl:when>
 314 |         <xsl:when test="@type = 'ddimageortext'"><xsl:text>DDI</xsl:text></xsl:when>
 315 |         <xsl:when test="@type = 'ddmarker'"><xsl:text>DDM</xsl:text></xsl:when>
 316 |         <xsl:when test="@type = 'ddwtos'"><xsl:text>DDT</xsl:text></xsl:when>
 317 |         <xsl:when test="@type = 'truefalse'"><xsl:text>TF</xsl:text></xsl:when>
 318 |         <xsl:otherwise><xsl:value-of select="@type"/></xsl:otherwise>
 319 |         </xsl:choose>
 320 |     </xsl:variable>
 321 | 
 322 | 
 323 |     <!-- Figure out the metadata to be included in table heading rows -->
 324 |     <!-- Get Cloze text string if it's a Cloze question containing subquestions -->
 325 |     <xsl:variable name="cloze_questiontext_string">
 326 |         <xsl:if test="$qtype = 'CL'">
 327 |             <xsl:apply-templates select="questiontext/text"/>
 328 |         </xsl:if>
 329 |     </xsl:variable>
 330 |     <!-- Get the default mark from defaultgrade or from Cloze subquestions. If it isn't the same for all Cloze subquestions, set it to 0 -->
 331 |     <xsl:variable name="defaultmark_value">
 332 |         <xsl:choose>
 333 |         <xsl:when test="defaultgrade">
 334 |             <xsl:value-of select="number(defaultgrade)"/>
 335 |         </xsl:when>
 336 |         <xsl:when test="$qtype = 'CL' and contains($cloze_questiontext_string, $cloze_start_delimiter)">
 337 |             <xsl:call-template name="get_cloze_defaultmark">
 338 |                 <xsl:with-param name="cloze_questiontext_string" select="$cloze_questiontext_string"/>
 339 |             </xsl:call-template>
 340 |         </xsl:when>
 341 |         <xsl:otherwise><xsl:text>1</xsl:text></xsl:otherwise>
 342 |         </xsl:choose>
 343 |     </xsl:variable>
 344 | 
 345 |     <xsl:variable name="numbering_flag">
 346 |         <xsl:choose>
 347 |         <xsl:when test="answernumbering = 'none'">0</xsl:when>
 348 |         <xsl:when test="answernumbering"><xsl:value-of select="substring(answernumbering, 1, 1)"/></xsl:when>
 349 |         </xsl:choose>
 350 |     </xsl:variable>
 351 | 
 352 |     <xsl:variable name="shuffleanswers_flag">
 353 |         <xsl:choose>
 354 |         <!-- shuffleanswers element might be duplicated in XML, or contain either 'true' or '1', so allow for these possibilities -->
 355 |         <xsl:when test="shuffleanswers[1] = 'true' or shuffleanswers[1] = '1'">
 356 |             <xsl:value-of select="$yes_label"/> <!-- Explicit true used in MC -->
 357 |         </xsl:when>
 358 |         <xsl:when test="shuffleanswers[1] = 'false' or shuffleanswers[1] = '0'">
 359 |             <xsl:value-of select="$no_label"/> <!-- Explicit false used in MAT -->
 360 |         </xsl:when>
 361 |         <xsl:when test="shuffleanswers"> <!-- Empty element used in DDM -->
 362 |             <xsl:value-of select="$yes_label"/>
 363 |         </xsl:when>
 364 |         <xsl:otherwise><xsl:value-of select="$no_label"/></xsl:otherwise>
 365 |         </xsl:choose>
 366 |     </xsl:variable>
 367 | 
 368 |     <xsl:variable name="idnumber_value" select="idnumber"/>
 369 | 
 370 |     <xsl:variable name="showmisplaced_flag">
 371 |         <xsl:choose>
 372 |         <!-- shuffleanswers element might be duplicated in XML, or contain either 'true' or '1', so allow for these possibilities -->
 373 |         <xsl:when test="showmisplaced">
 374 |             <xsl:value-of select="$yes_label"/> <!-- Explicit true used in MC -->
 375 |         </xsl:when>
 376 |         <xsl:otherwise><xsl:value-of select="$no_label"/></xsl:otherwise>
 377 |         </xsl:choose>
 378 |     </xsl:variable>
 379 | 
 380 |     <!-- Simplify the penalty value to keep it short, to fit it in the 4th column -->
 381 |     <xsl:variable name="penalty_value">
 382 |         <xsl:choose>
 383 |         <xsl:when test="starts-with(penalty, '1')">100</xsl:when>
 384 |         <xsl:when test="starts-with(penalty, '0.5')">50</xsl:when>
 385 |         <xsl:when test="starts-with(penalty, '0.3333333')">33.3</xsl:when>
 386 |         <xsl:when test="starts-with(penalty, '0.25')">25</xsl:when>
 387 |         <xsl:when test="starts-with(penalty, '0.2')">20</xsl:when>
 388 |         <xsl:when test="starts-with(penalty, '0.1')">10</xsl:when>
 389 |         <xsl:otherwise>0</xsl:otherwise>
 390 |         </xsl:choose>
 391 |     </xsl:variable>
 392 | 
 393 |     <!-- Column heading 1 is blank if question is not numbered, otherwise it includes a #, and importantly, a list number reset style -->
 394 |     <xsl:variable name="colheading1_label">
 395 |         <xsl:choose>
 396 |         <xsl:when test="$qtype = 'MA' or $qtype = 'MC' or $qtype = 'MAT' or $qtype = 'MS' or $qtype = 'MW' or $qtype = 'NUM' or starts-with($qtype, 'C')"><xsl:text>#</xsl:text></xsl:when>
 397 |         <xsl:when test="$qtype = 'DDI' or $qtype = 'DDM' or $qtype = 'DDT'"><xsl:text>#</xsl:text></xsl:when>
 398 |         <xsl:otherwise><xsl:value-of select="$blank_cell"/></xsl:otherwise>
 399 |         </xsl:choose>
 400 |     </xsl:variable>
 401 |     <xsl:variable name="colheading1_style">
 402 |         <xsl:choose>
 403 |         <xsl:when test="$qtype = 'MA' or $qtype = 'MC' or $qtype = 'MS' or $qtype = 'NUM' or starts-with($qtype, 'C')"><xsl:value-of select="'QFOptionReset'"/></xsl:when>
 404 |         <xsl:when test="$qtype = 'MAT' or $qtype = 'MW'"><xsl:value-of select="'ListNumberReset'"/></xsl:when>
 405 |         <xsl:when test="starts-with($qtype, 'DD')"><xsl:value-of select="'ListNumberReset'"/></xsl:when>
 406 |         <xsl:otherwise><xsl:value-of select="'Cell'"/></xsl:otherwise>
 407 |         </xsl:choose>
 408 |     </xsl:variable>
 409 | 
 410 |     <!-- Answer/Option column heading for most question types, distractors for Cloze, and the response template for Essays (2.5 and above) -->
 411 |     <xsl:variable name="colheading2_label">
 412 |         <xsl:choose>
 413 |         <xsl:when test="$qtype = 'CL'"><xsl:value-of select="$cloze_distractor_column_label"/></xsl:when>
 414 |         <xsl:when test="$qtype = 'DE'"><xsl:value-of select="$blank_cell"/></xsl:when>
 415 |         <xsl:when test="$qtype = 'ES'"><xsl:value-of select="$responsetemplate_label"/></xsl:when>
 416 |         <xsl:when test="$qtype = 'MAT'"><xsl:value-of select="$question_label"/></xsl:when>
 417 |         <xsl:when test="$qtype = 'DDI'"><xsl:value-of select="$ddi_draggableitem_label"/></xsl:when>
 418 |         <xsl:when test="$qtype = 'DDM'"><xsl:value-of select="$ddm_marker_label"/></xsl:when>
 419 |         <xsl:otherwise><xsl:value-of select="$answers_label"/></xsl:otherwise>
 420 |         </xsl:choose>
 421 |     </xsl:variable>
 422 | 
 423 |     <!-- Option feedback and general feedback column heading -->
 424 |     <xsl:variable name="colheading3_label">
 425 |         <xsl:choose>
 426 |         <xsl:when test="$qtype = 'CL'"><xsl:value-of select="$cloze_feedback_column_label"/></xsl:when>
 427 |         <xsl:when test="$qtype = 'DE'"><xsl:value-of select="$blank_cell"/></xsl:when>
 428 |         <xsl:when test="$qtype = 'ES'"><xsl:value-of select="$graderinfo_label"/></xsl:when>
 429 |         <xsl:when test="$qtype = 'MAT'"><xsl:value-of select="$answer_label"/></xsl:when>
 430 |         <xsl:when test="$qtype = 'CL' or $qtype = 'MA' or $qtype = 'MC' or $qtype = 'SA' or $qtype = 'TF' or $qtype = 'MS' or $qtype = 'NUM' or starts-with($qtype, 'C')">
 431 |             <xsl:value-of select="$feedback_label"/>
 432 |         </xsl:when>
 433 |         <xsl:when test="$qtype = 'DDI'"><xsl:value-of select="$ddi_infinite_label"/></xsl:when>
 434 |         <xsl:when test="$qtype = 'DDT'"><xsl:value-of select="$ddt_infinite_label"/></xsl:when>
 435 |         <xsl:otherwise><xsl:value-of select="$blank_cell"/></xsl:otherwise>
 436 |         </xsl:choose>
 437 |     </xsl:variable>
 438 | 
 439 |     <!-- Grade column heading, or blank if no grade (CL, DE, ES, MAT) -->
 440 |     <xsl:variable name="colheading4_label">
 441 |         <xsl:choose>
 442 |         <xsl:when test="$qtype = 'MW'"><xsl:value-of select="$group_label"/></xsl:when>
 443 |         <xsl:when test="$qtype = 'CL' or $qtype = 'MA' or $qtype = 'MC' or $qtype = 'MS' or $qtype = 'SA' or $qtype = 'TF' or $qtype = 'NUM'">
 444 |             <xsl:value-of select="$grade_label"/>
 445 |         </xsl:when>
 446 |         <xsl:when test="$qtype = 'DDI'"><xsl:value-of select="$group_label"/></xsl:when>
 447 |         <xsl:when test="$qtype = 'DDM'"><xsl:value-of select="$ddm_noofdrags_label"/></xsl:when>
 448 |         <xsl:when test="$qtype = 'DDT'"><xsl:value-of select="$group_label"/></xsl:when>
 449 |         <xsl:otherwise><xsl:value-of select="$blank_cell"/></xsl:otherwise>
 450 |         </xsl:choose>
 451 |     </xsl:variable>
 452 | 
 453 |     <!-- Configure Cloze flags to define whether mixed formatting is used in MC and SA subquestions -->
 454 |     <!-- Does :MULTICHOICE: or :MC: occur in a Cloze question? -->
 455 |     <xsl:variable name="cloze_mc_formatting_dropdown">
 456 |         <xsl:choose>
 457 |         <xsl:when test="contains($cloze_questiontext_string, $cloze_mc_keyword1) or contains($cloze_questiontext_string, $cloze_mc_keyword2)">
 458 |             <xsl:text>D</xsl:text>
 459 |         </xsl:when>
 460 |         <xsl:otherwise><xsl:text>0</xsl:text></xsl:otherwise>
 461 |         </xsl:choose>
 462 |     </xsl:variable>
 463 |     <!-- Does :MULTICHOICE_H: or :MCH: occur in a Cloze question? -->
 464 |     <xsl:variable name="cloze_mc_formatting_radio_horizontal">
 465 |         <xsl:choose>
 466 |         <xsl:when test="contains($cloze_questiontext_string, $cloze_mch_keyword1) or contains($cloze_questiontext_string, $cloze_mch_keyword2)">
 467 |             <xsl:text>1</xsl:text>
 468 |         </xsl:when>
 469 |         <xsl:otherwise><xsl:text>0</xsl:text></xsl:otherwise>
 470 |         </xsl:choose>
 471 |     </xsl:variable>
 472 |     <!-- Does :MULTICHOICE_V: or :MCV: occur in a Cloze question? -->
 473 |     <xsl:variable name="cloze_mc_formatting_radio_vertical">
 474 |         <xsl:choose>
 475 |         <xsl:when test="contains($cloze_questiontext_string, $cloze_mcv_keyword1) or contains($cloze_questiontext_string, $cloze_mcv_keyword2)">
 476 |             <xsl:text>1</xsl:text>
 477 |         </xsl:when>
 478 |         <xsl:otherwise><xsl:text>0</xsl:text></xsl:otherwise>
 479 |         </xsl:choose>
 480 |     </xsl:variable>
 481 |     <!-- Does :SHORTANSWER:, :MW: or :SA: occur in a Cloze question? -->
 482 |     <xsl:variable name="cloze_sa_formatting_case_insensitive">
 483 |         <xsl:choose>
 484 |         <xsl:when test="contains($cloze_questiontext_string, $cloze_sa_keyword1) or contains($cloze_questiontext_string, $cloze_sa_keyword2) or contains($cloze_questiontext_string, $cloze_sa_keyword3)">
 485 |             <xsl:text>1</xsl:text>
 486 |         </xsl:when>
 487 |         <xsl:otherwise><xsl:text>0</xsl:text></xsl:otherwise>
 488 |         </xsl:choose>
 489 |     </xsl:variable>
 490 |     <!-- Does :SHORTANSWER_C:, :MWC: or :SAC: occur in a Cloze question? -->
 491 |     <xsl:variable name="cloze_sa_formatting_case_sensitive">
 492 |         <xsl:choose>
 493 |         <xsl:when test="contains($cloze_questiontext_string, $cloze_sac_keyword1) or contains($cloze_questiontext_string, $cloze_sac_keyword2) or contains($cloze_questiontext_string, $cloze_sac_keyword3)">
 494 |             <xsl:text>1</xsl:text>
 495 |         </xsl:when>
 496 |         <xsl:otherwise><xsl:text>0</xsl:text></xsl:otherwise>
 497 |         </xsl:choose>
 498 |     </xsl:variable>
 499 | 
 500 |     <!-- Now set flags to define the default values for CL/SA case and CL/MC style row indicators -->
 501 |     <xsl:variable name="cloze_sa_casesensitive_flag">
 502 |         <xsl:choose>
 503 |         <xsl:when test="$cloze_sa_formatting_case_sensitive = '1' and $cloze_sa_formatting_case_insensitive = '0'"><xsl:text>1</xsl:text></xsl:when>
 504 |         <xsl:otherwise><xsl:text>0</xsl:text></xsl:otherwise>
 505 |         </xsl:choose>
 506 |     </xsl:variable>
 507 |     <xsl:variable name="cloze_mc_formatting_flag">
 508 |         <xsl:choose>
 509 |         <xsl:when test="$cloze_mc_formatting_dropdown = '0' and $cloze_mc_formatting_radio_horizontal = '0' and $cloze_mc_formatting_radio_vertical = '1'"><xsl:text>V</xsl:text></xsl:when>
 510 |         <xsl:when test="$cloze_mc_formatting_dropdown = '0' and $cloze_mc_formatting_radio_horizontal = '1' and $cloze_mc_formatting_radio_vertical = '0'"><xsl:text>H</xsl:text></xsl:when>
 511 |         <xsl:otherwise><xsl:text>D</xsl:text></xsl:otherwise>
 512 |         </xsl:choose>
 513 |     </xsl:variable>
 514 | 
 515 |     <!-- Instruction text for each question type -->
 516 |     <xsl:variable name="instruction_text">
 517 |         <xsl:choose>
 518 |         <xsl:when test="$qtype = 'DDI'"><xsl:value-of select="$ddi_instructions"/></xsl:when>
 519 |         <xsl:when test="$qtype = 'DDM'"><xsl:value-of select="$ddm_instructions"/></xsl:when>
 520 |         <xsl:when test="$qtype = 'DDT'"><xsl:value-of select="$ddt_instructions"/></xsl:when>
 521 |         <xsl:when test="$qtype = 'DE'"><xsl:value-of select="$description_instructions"/></xsl:when>
 522 |         <xsl:when test="$qtype = 'ES'"><xsl:value-of select="$essay_instructions"/></xsl:when>
 523 |         <xsl:when test="$qtype = 'MA'"><xsl:value-of select="$multichoice_instructions"/></xsl:when>
 524 |         <xsl:when test="$qtype = 'MAT'"><xsl:value-of select="$matching_instructions"/></xsl:when>
 525 |         <xsl:when test="$qtype = 'MC'"><xsl:value-of select="$multichoice_instructions"/></xsl:when>
 526 |         <xsl:when test="$qtype = 'MS'"><xsl:value-of select="$multichoiceset_instructions"/></xsl:when>
 527 |         <xsl:when test="$qtype = 'MW'"><xsl:value-of select="$missingword_instructions"/></xsl:when>
 528 |         <xsl:when test="$qtype = 'SA'"><xsl:value-of select="$shortanswer_instructions"/></xsl:when>
 529 |         <xsl:when test="$qtype = 'TF'"><xsl:value-of select="$truefalse_instructions"/></xsl:when>
 530 |         <xsl:otherwise>
 531 |             <xsl:value-of select="$unsupported_instructions"/>
 532 |         </xsl:otherwise>
 533 |         </xsl:choose>
 534 |     </xsl:variable>
 535 | 
 536 | 
 537 |     <!-- Start generating the HTML output, now that we've finished figuring out all the values -->
 538 |     <!-- Put the question name in a heading, so it can be easily viewed in the Word navigation window -->
 539 |     <xsl:variable name="qheading">
 540 |         <xsl:apply-templates select="name/text"/>
 541 |     </xsl:variable>
 542 |     <h2 class="MsoHeading2"><xsl:value-of select="normalize-space($qheading)"/></h2>
 543 |     <p class="MsoBodyText"> </p>
 544 | 
 545 |     <!-- Generate the table containing the question stem and the answers -->
 546 |     <div class="TableDiv">
 547 |     <table border="1" dir="{$moodle_textdirection}">
 548 |     <thead>
 549 |         <!-- 1st heading row: question stem/description and type cells -->
 550 |         <xsl:text>&#x0a;</xsl:text>
 551 |         <tr>
 552 |             <td colspan="3" style="width: 12.0cm"><div class="chapter"> <!-- Wrap cells in a div in case an image is present -->
 553 |                 <xsl:choose>
 554 |                     <xsl:when test="$qtype = 'CL'">
 555 |                         <!-- Put Cloze text into the first option table cell, and convert subquestion markup too-->
 556 |                         <xsl:apply-templates select="questiontext/text" mode="cloze">
 557 |                             <xsl:with-param name="cloze_sa_casesensitive_flag" select="$cloze_sa_casesensitive_flag"/>
 558 |                             <xsl:with-param name="cloze_mc_formatting_flag" select="$cloze_mc_formatting_flag"/>
 559 |                             <xsl:with-param name="cloze_defaultmark_value" select="$defaultmark_value"/>
 560 |                         </xsl:apply-templates>
 561 |                         <xsl:apply-templates select="questiontext/file"/>
 562 |                     </xsl:when>
 563 |                     <xsl:otherwise>
 564 |                         <xsl:apply-templates select="questiontext/*"/>
 565 |                     </xsl:otherwise>
 566 |                 </xsl:choose>
 567 | 
 568 |                 <!-- Handle supplementary image for question text, as implemented in Moodle 1.9 -->
 569 |                 <xsl:if test="image and image != ''">
 570 |                     <xsl:variable name="image_file_suffix">
 571 |                         <xsl:value-of select="translate(substring-after(image, '.'), $ucase, $lcase)"/>
 572 |                     </xsl:variable>
 573 |                     <xsl:variable name="image_format">
 574 |                         <xsl:value-of select="concat('data:image/', $image_file_suffix, ';base64,')"/>
 575 |                     </xsl:variable>
 576 |                     <xsl:variable name="image_id">
 577 |                         <xsl:value-of select="'Q'"/>
 578 |                         <!-- Count the number of questions -->
 579 |                         <xsl:number value="position()" format="0001"/>
 580 |                         <xsl:value-of select="'_IID0001'"/>
 581 |                     </xsl:variable>
 582 |                     <p><img id="{$image_id}" src="{concat($pluginfiles_string, image)}"/></p>
 583 | 
 584 |                     <!-- Emit the image in the supplementary format, to be removed later -->
 585 |                     <div class="ImageFile"><img id="{$image_id}" title="{image}" src="{concat($image_format, normalize-space(image_base64))}"/></div>
 586 |                 </xsl:if>
 587 |             </div></td>
 588 |             <td style="width: 1.0cm"><p class="QFType"><xsl:value-of select="$qtype" /></p></td>
 589 |         </tr>
 590 |         <xsl:text>&#x0a;</xsl:text>
 591 | 
 592 |         <!-- Handle background image for DDI and DDM questions -->
 593 |         <xsl:if test="$qtype = 'DDI' or $qtype = 'DDM'">
 594 |             <xsl:variable name="image_id">
 595 |                 <xsl:value-of select="'Q'"/>
 596 |                 <xsl:number value="position()" format="0001"/>
 597 |                 <xsl:value-of select="'_IID0000'"/>
 598 |             </xsl:variable>
 599 |             <tr>
 600 |                 <td colspan="4" style="width: 12.0cm">
 601 |                     <p class="Cell">
 602 |                         <img id="{$image_id}" src="{concat($pluginfiles_string,file/@name)}"/>
 603 |                     </p>
 604 |                     <xsl:apply-templates select="file">
 605 |                         <xsl:with-param name="image_id" select="$image_id"/>
 606 |                     </xsl:apply-templates>
 607 |                 </td>
 608 |                 <!--<td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>-->
 609 |             </tr>
 610 |             <xsl:text>&#x0a;</xsl:text>
 611 |         </xsl:if>
 612 | 
 613 |         <!-- Handle heading rows for various metadata specific to each question -->
 614 |         <!-- 2nd heading row: Default mark / Default grade / Question weighting, i.e. total marks available for question -->
 615 |         <xsl:if test="$qtype != 'DE'">
 616 |             <tr>
 617 |                 <td colspan="3" style="width: 12.0cm"><p class="TableRowHead" style="text-align: right"><xsl:value-of select="$defaultmark_label"/></p></td>
 618 |                 <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$defaultmark_value"/></p></td>
 619 |             </tr>
 620 |             <xsl:text>&#x0a;</xsl:text>
 621 |         </xsl:if>
 622 |         <!-- Shuffle the choices? -->
 623 |         <xsl:if test="$qtype = 'MAT'">
 624 |             <tr>
 625 |                 <td colspan="3" style="width: 12.0cm"><p class="TableRowHead" style="text-align: right"><xsl:value-of select="$matching_shuffle_label"/></p></td>
 626 |                     <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$shuffleanswers_flag"/></p></td>
 627 |             </tr>
 628 |             <xsl:text>&#x0a;</xsl:text>
 629 |         </xsl:if>
 630 |         <xsl:if test="$qtype = 'MA' or $qtype = 'MC' or $qtype = 'MS'">
 631 |             <tr>
 632 |                 <td colspan="3" style="width: 12.0cm">
 633 |                     <p class="TableRowHead" style="text-align: right">
 634 |                         <xsl:value-of select="$mcq_shuffleanswers_label"/>
 635 |                     </p>
 636 |                 </td>
 637 |                 <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$shuffleanswers_flag"/></p></td>
 638 |             </tr>
 639 |             <xsl:text>&#x0a;</xsl:text>
 640 |         </xsl:if>
 641 |         <xsl:if test="$qtype = 'MW'">
 642 |             <tr>
 643 |                 <td colspan="3" style="width: 12.0cm"><p class="TableRowHead" style="text-align: right"><xsl:value-of select="$gapselect_shuffle_label"/></p></td>
 644 |                     <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$shuffleanswers_flag"/></p></td>
 645 |             </tr>
 646 |             <xsl:text>&#x0a;</xsl:text>
 647 |         </xsl:if>
 648 |         <xsl:if test="$qtype = 'DDI' or $qtype = 'DDM'">
 649 |             <tr>
 650 |                 <td colspan="3" style="width: 12.0cm">
 651 |                     <p class="TableRowHead" style="text-align: right">
 652 |                         <xsl:value-of select="$ddi_shuffleimages_label"/>
 653 |                     </p>
 654 |                 </td>
 655 |                 <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$shuffleanswers_flag"/></p></td>
 656 |             </tr>
 657 |             <xsl:text>&#x0a;</xsl:text>
 658 |         </xsl:if>
 659 |         <xsl:if test="$qtype = 'DDM'">
 660 |             <tr>
 661 |                 <td colspan="3" style="width: 12.0cm">
 662 |                     <p class="TableRowHead" style="text-align: right">
 663 |                         <xsl:value-of select="$ddm_showmisplaced_label"/>
 664 |                     </p>
 665 |                 </td>
 666 |                 <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$showmisplaced_flag"/></p></td>
 667 |             </tr>
 668 |             <xsl:text>&#x0a;</xsl:text>
 669 |         </xsl:if>
 670 | 
 671 |         <!-- Number the choices, and if so, how? May be alphabetic, numeric or roman -->
 672 |         <xsl:if test="$qtype = 'MC' or $qtype = 'MA' or $qtype = 'MS'">
 673 |             <tr>
 674 |                 <td colspan="3" style="width: 12.0cm"><p class="TableRowHead" style="text-align: right"><xsl:value-of select="$answernumbering_label"/></p></td>
 675 |                 <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$numbering_flag"/></p></td>
 676 |             </tr>
 677 |             <xsl:text>&#x0a;</xsl:text>
 678 |         </xsl:if>
 679 | 
 680 |         <!-- Essay questions in Moodle 2.x have 3 specific fields, for Response field format, Attachments, and Number of lines -->
 681 |         <xsl:if test="$qtype = 'ES'">
 682 |             <tr>
 683 |                 <td colspan="3" style="width: 12.0cm"><p class="TableRowHead" style="text-align: right"><xsl:value-of select="$responseformat_label"/></p></td>
 684 |                 <td style="width: 1.0cm">
 685 |                     <p class="Cell">
 686 |                         <xsl:choose>
 687 |                         <xsl:when test="responseformat = 'monospaced'">
 688 |                             <xsl:value-of select="$format_mono_label"/>
 689 |                         </xsl:when>
 690 |                         <xsl:when test="responseformat = 'editorfilepicker'">
 691 |                             <xsl:value-of select="$format_editorfilepicker_label"/>
 692 |                         </xsl:when>
 693 |                         <xsl:when test="responseformat = 'plain'">
 694 |                             <xsl:value-of select="$format_plain_label"/>
 695 |                         </xsl:when>
 696 |                         <xsl:when test="responseformat = 'noinline'">
 697 |                             <xsl:value-of select="$format_noinline_label"/>
 698 |                         </xsl:when>
 699 |                         <xsl:when test="responseformat = 'editor'">
 700 |                             <xsl:value-of select="$format_html_label"/>
 701 |                         </xsl:when>
 702 |                         <xsl:when test="questiontext/@format = 'markdown'">
 703 |                             <xsl:value-of select="$format_markdown_label"/>
 704 |                         </xsl:when>
 705 |                         <xsl:when test="questiontext/@format = 'moodle_auto_format'">
 706 |                             <xsl:value-of select="$format_auto_label"/>
 707 |                         </xsl:when>
 708 |                         <xsl:when test="questiontext/@format = 'plain_text'">
 709 |                             <xsl:value-of select="$format_plain_label"/>
 710 |                         </xsl:when>
 711 |                         <xsl:when test="questiontext/@format = 'html'">
 712 |                             <xsl:value-of select="$format_html_label"/>
 713 |                         </xsl:when>
 714 |                         <xsl:otherwise><xsl:value-of select="$format_editorfilepicker_label"/></xsl:otherwise>
 715 |                         </xsl:choose>
 716 |                     </p>
 717 |                 </td>
 718 |             </tr>
 719 |             <xsl:text>&#x0a;</xsl:text>
 720 | 
 721 |             <!-- Essays: text input required flag -->
 722 |             <xsl:variable name="responserequired_flag">
 723 |                 <xsl:choose>
 724 |                 <xsl:when test="responserequired = 0"><xsl:value-of select="$no_label"/></xsl:when>
 725 |                 <xsl:otherwise><xsl:value-of select="$yes_label"/></xsl:otherwise>
 726 |                 </xsl:choose>
 727 |             </xsl:variable>
 728 |             <tr>
 729 |                 <td colspan="3" style="width: 12.0cm"><p class="TableRowHead" style="text-align: right"><xsl:value-of select="$responserequired_label"/></p></td>
 730 |                 <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$responserequired_flag"/></p></td>
 731 |             </tr>
 732 | 
 733 |             <tr>
 734 |                 <td colspan="3" style="width: 12.0cm"><p class="TableRowHead" style="text-align: right"><xsl:value-of select="$responsefieldlines_label"/></p></td>
 735 |                     <td style="width: 1.0cm">
 736 |                     <p class="Cell">
 737 |                             <xsl:choose>
 738 |                             <xsl:when test="responsefieldlines">
 739 |                                 <xsl:value-of select="responsefieldlines"/>
 740 |                             </xsl:when>
 741 |                             <xsl:otherwise><xsl:text>15</xsl:text></xsl:otherwise>
 742 |                             </xsl:choose>
 743 |                         </p>
 744 |                     </td>
 745 |             </tr>
 746 |             <xsl:text>&#x0a;</xsl:text>
 747 | 
 748 |             <!-- Essays: number of attachments field -->
 749 |             <tr>
 750 |                 <td colspan="3" style="width: 12.0cm"><p class="TableRowHead" style="text-align: right"><xsl:value-of select="$allowattachments_label"/></p></td>
 751 |                 <td style="width: 1.0cm">
 752 |                     <p class="Cell">
 753 |                         <xsl:choose>
 754 |                         <xsl:when test="attachments">
 755 |                             <xsl:value-of select="attachments"/>
 756 |                         </xsl:when>
 757 |                         <xsl:otherwise><xsl:text>0</xsl:text></xsl:otherwise>
 758 |                         </xsl:choose>
 759 |                     </p>
 760 |                 </td>
 761 |             </tr>
 762 |             <xsl:text>&#x0a;</xsl:text>
 763 | 
 764 |             <!-- Essays: number of attachments required field -->
 765 |             <xsl:text>&#x0a;</xsl:text>
 766 |             <xsl:call-template name="debugComment">
 767 |                 <xsl:with-param name="comment_text">
 768 |                     <xsl:value-of select="concat('$attachmentsrequired_label: ', $attachmentsrequired_label, '; attachmentsrequired: ', attachmentsrequired, '&#x0a;')"/>
 769 |                     <xsl:value-of select="concat('$moodle_release_number: ', $moodle_release_number, '&#x0a;')"/>
 770 |                 </xsl:with-param>
 771 |                 <xsl:with-param name="condition" select="$debug_flag &gt; 1"/>
 772 |             </xsl:call-template>
 773 |             <tr>
 774 |                 <td colspan="3" style="width: 12.0cm"><p class="TableRowHead" style="text-align: right"><xsl:value-of select="$attachmentsrequired_label"/></p></td>
 775 |                 <td style="width: 1.0cm">
 776 |                     <p class="Cell">
 777 |                         <xsl:choose>
 778 |                         <xsl:when test="attachmentsrequired">
 779 |                             <xsl:value-of select="attachmentsrequired"/>
 780 |                         </xsl:when>
 781 |                         <xsl:otherwise><xsl:text>0</xsl:text></xsl:otherwise>
 782 |                         </xsl:choose>
 783 |                     </p>
 784 |                 </td>
 785 |             </tr>
 786 |             <xsl:text>&#x0a;</xsl:text>
 787 | 
 788 |             <!-- Essays: accepted file types field -->
 789 |             <tr>
 790 |                 <td colspan="3" style="width: 12.0cm"><p class="TableRowHead" style="text-align: right"><xsl:value-of select="$acceptedfiletypes_label"/></p></td>
 791 |                 <td style="width: 1.0cm">
 792 |                     <p class="Cell">
 793 |                         <xsl:choose>
 794 |                         <xsl:when test="acceptedfiletypes">
 795 |                             <xsl:value-of select="acceptedfiletypes"/>
 796 |                         </xsl:when>
 797 |                         <xsl:otherwise><xsl:value-of select="$blank_cell"/></xsl:otherwise>
 798 |                         </xsl:choose>
 799 |                     </p>
 800 |                 </td>
 801 |             </tr>
 802 |             <xsl:text>&#x0a;</xsl:text>
 803 |         </xsl:if> <!-- 2.x Essay-specific question fields -->
 804 | 
 805 |         <!-- Short answers: are they case-sensitive? -->
 806 |         <xsl:if test="$qtype = 'SA'">
 807 |             <xsl:variable name="casesensitive_flag">
 808 |                 <xsl:choose>
 809 |                 <xsl:when test="usecase = 0"><xsl:value-of select="$no_label"/></xsl:when>
 810 |                 <xsl:otherwise><xsl:value-of select="$yes_label"/></xsl:otherwise>
 811 |                 </xsl:choose>
 812 |             </xsl:variable>
 813 | 
 814 |             <tr>
 815 |                 <td colspan="3" style="width: 12.0cm"><p class="TableRowHead" style="text-align: right"><xsl:value-of select="$casesensitive_label"/></p></td>
 816 |                 <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$casesensitive_flag"/></p></td>
 817 |             </tr>
 818 |             <xsl:text>&#x0a;</xsl:text>
 819 |         </xsl:if>
 820 | 
 821 |         <!-- Cloze question flags: are SA case-sensitive?, are MC drop-down, vertical or horizontal radio? -->
 822 |         <xsl:if test="$qtype = 'CL'">
 823 |             <xsl:call-template name="debugComment">
 824 |                 <xsl:with-param name="comment_text">
 825 |                     <xsl:value-of select="concat('cloze_sa_casesensitive_flag: ', $cloze_sa_casesensitive_flag, '; cloze_sa_formatting_case_sensitive: ', $cloze_sa_formatting_case_sensitive, '; cloze_sa_formatting_case_insensitive: ', $cloze_sa_formatting_case_insensitive, '&#x0a;')"/>
 826 |                     <xsl:value-of select="concat('cloze_mc_formatting_flag: ', $cloze_mc_formatting_flag, '; cloze_mc_formatting_radio_horizontal: ', $cloze_mc_formatting_radio_horizontal, '; cloze_mc_formatting_dropdown: ', $cloze_mc_formatting_dropdown, '; cloze_mc_formatting_radio_vertical: ', $cloze_mc_formatting_radio_vertical, '&#x0a;')"/>
 827 |                     <xsl:value-of select="concat('cloze_defaultmark_value: ', $defaultmark_value, '&#x0a;')"/>
 828 |                     <xsl:value-of select="concat('cloze_questiontext_string: ', translate($cloze_questiontext_string, '&#x0a;', ' '), '&#x0a;')"/>
 829 |                 </xsl:with-param>
 830 |                 <xsl:with-param name="condition" select="$debug_flag &gt; 1"/>
 831 |             </xsl:call-template>
 832 | 
 833 |             <!-- Case sensitivity for SA subquestions -->
 834 |             <tr>
 835 |                 <td colspan="3" style="width: 12.0cm"><p class="TableRowHead" style="text-align: right"><xsl:value-of select="$casesensitive_label"/></p></td>
 836 |                 <td style="width: 1.0cm"><p class="Cell">
 837 |                     <xsl:choose>
 838 |                     <xsl:when test="$cloze_sa_casesensitive_flag = '1'">
 839 |                         <xsl:value-of select="$yes_label"/>
 840 |                     </xsl:when>
 841 |                     <xsl:otherwise><xsl:value-of select="$no_label"/></xsl:otherwise>
 842 |                     </xsl:choose>
 843 |                 </p></td>
 844 |             </tr>
 845 |             <xsl:text>&#x0a;</xsl:text>
 846 |             <!-- Style and orientation for MC subquestions: Drop-down menu, vertical or horizontal radio button -->
 847 |             <tr>
 848 |                 <td colspan="3" style="width: 12.0cm"><p class="TableRowHead" style="text-align: right"><xsl:value-of select="$cloze_mcformat_label"/></p></td>
 849 |                 <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$cloze_mc_formatting_flag"/></p></td>
 850 |             </tr>
 851 |             <xsl:text>&#x0a;</xsl:text>
 852 |         </xsl:if>
 853 | 
 854 |         <!-- Show number of correct responses when finished (Moodle 2.x only) -->
 855 |         <xsl:if test="($qtype = 'MA' or $qtype = 'MAT' or $qtype = 'MS' or $qtype = 'MW' or $qtype = 'DDI' or $qtype = 'DDM' or $qtype = 'DDT')">
 856 |             <tr>
 857 |                 <td colspan="3" style="width: 12.0cm"><p class="TableRowHead" style="text-align: right">
 858 |                     <xsl:choose>
 859 |                     <xsl:when test="$qtype = 'MS'">
 860 |                         <xsl:value-of select="concat($hint_shownumpartscorrect_label, $colon_string)"/>
 861 |                     </xsl:when>
 862 |                     <xsl:otherwise>
 863 |                         <xsl:value-of select="$shownumcorrectfeedback_label"/>
 864 |                     </xsl:otherwise>
 865 |                     </xsl:choose>
 866 |                 </p></td>
 867 |                 <td style="width: 1.0cm">
 868 |                     <p class="Cell">
 869 |                         <xsl:choose>
 870 |                         <xsl:when test="shownumcorrect">
 871 |                             <xsl:value-of select="$yes_label"/>
 872 |                         </xsl:when>
 873 |                         <xsl:otherwise><xsl:value-of select="$no_label"/></xsl:otherwise>
 874 |                         </xsl:choose>
 875 |                     </p>
 876 |                 </td>
 877 |             </tr>
 878 |             <xsl:text>&#x0a;</xsl:text>
 879 |         </xsl:if>
 880 | 
 881 |         <!-- 2nd last heading row: Penalty for each incorrect try: Don't include for True/False, as it is always 100% in this case -->
 882 |         <xsl:if test="$qtype != 'DE' and $qtype != 'ES' and $qtype != 'TF'">
 883 |             <tr>
 884 |                 <td colspan="3" style="width: 12.0cm"><p class="TableRowHead" style="text-align: right"><xsl:value-of select="$penalty_label"/></p></td>
 885 |                 <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$penalty_value"/></p></td>
 886 |             </tr>
 887 |             <xsl:text>&#x0a;</xsl:text>
 888 |         </xsl:if>
 889 | 
 890 |         <!-- New 2nd last heading row: optional ID number -->
 891 |         <xsl:text>&#x0a;</xsl:text>
 892 |         <tr>
 893 |             <td colspan="3" style="width: 12.0cm"><p class="TableRowHead" style="text-align: right"><xsl:value-of select="$idnumber_label"/></p></td>
 894 |             <td style="width: 1.0cm">
 895 |                 <p class="QFID">
 896 |                     <xsl:choose>
 897 |                     <xsl:when test="$idnumber_value != ''">
 898 |                         <xsl:value-of select="$idnumber_value"/>
 899 |                     </xsl:when>
 900 |                     <xsl:otherwise>
 901 |                         <xsl:value-of select="$blank_cell"/>
 902 |                     </xsl:otherwise>
 903 |                     </xsl:choose>
 904 |                 </p>
 905 |             </td>
 906 |         </tr>
 907 |         <xsl:text>&#x0a;</xsl:text>
 908 | 
 909 |         <!-- Last heading row: column headings for table body -->
 910 |         <tr>
 911 |             <td style="width: 1.0cm"><p class="{$colheading1_style}"><xsl:value-of select="$colheading1_label"/></p></td>
 912 |             <td style="{$col2_width}"><p class="TableHead"><xsl:value-of select="$colheading2_label"/></p></td>
 913 |             <td style="{$col3_width}"><p class="TableHead"><xsl:value-of select="$colheading3_label"/></p></td>
 914 |             <td style="width: 1.0cm"><p class="TableHead"><xsl:value-of select="$colheading4_label"/></p></td>
 915 |         </tr>
 916 |         <xsl:text>&#x0a;</xsl:text>
 917 |     </thead>
 918 |     <tbody>
 919 |         <xsl:text>&#x0a;</xsl:text>
 920 | 
 921 |         <!-- Handle the body, containing the options and feedback (for most questions) -->
 922 | 
 923 |         <!-- The first body row is the most complicated depending on the question, so do the special cases first -->
 924 |         <xsl:choose>
 925 |         <xsl:when test="$qtype = 'CL'">
 926 |             <!-- Cloze questions should ideally have distractors in the rows, but that's too complicated at the moment, so just include one empty row -->
 927 |             <tr>
 928 |                 <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
 929 |                 <td style="{$col2_width}"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
 930 |                 <td style="{$col3_width}"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
 931 |                 <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
 932 |             </tr>
 933 |         </xsl:when>
 934 |         <xsl:when test="$qtype = 'ES'">
 935 |             <!-- Essay questions in Moodle 2.5+ have a response template and information for graders, so put in a row for these -->
 936 |             <tr>
 937 |                 <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
 938 |                 <td style="{$col2_width}"><div class="chapter">
 939 |                     <xsl:choose>
 940 |                     <xsl:when test="responsetemplate and normalize-space(responsetemplate) = ''">
 941 |                         <p class="Cell"><xsl:value-of select="$blank_cell"/></p>
 942 |                     </xsl:when>
 943 |                     <xsl:when test="responsetemplate and responsetemplate/@format and responsetemplate/@format = 'html'">
 944 |                         <xsl:apply-templates select="responsetemplate/*"/>
 945 |                     </xsl:when>
 946 |                     <xsl:when test="responsetemplate and responsetemplate/@format and responsetemplate/@format != 'html'">
 947 |                         <p class="Cell"><xsl:apply-templates select="responsetemplate/*"/></p>
 948 |                     </xsl:when>
 949 |                     <xsl:otherwise>
 950 |                         <!-- No essay response template, so it's probably an older version of Moodle. -->
 951 |                         <p class="Cell"><xsl:value-of select="$blank_cell"/></p>
 952 |                     </xsl:otherwise>
 953 |                     </xsl:choose>
 954 |                 </div></td>
 955 |                 <td style="{$col3_width}"><div class="chapter">
 956 |                     <xsl:choose>
 957 |                     <xsl:when test="graderinfo and graderinfo = ''">
 958 |                         <p class="Cell"><xsl:value-of select="$blank_cell"/></p>
 959 |                     </xsl:when>
 960 |                     <xsl:when test="graderinfo and graderinfo/@format and graderinfo/@format = 'html'">
 961 |                         <xsl:apply-templates select="graderinfo/*"/>
 962 |                     </xsl:when>
 963 |                     <xsl:when test="graderinfo and graderinfo/@format and graderinfo/@format != 'html'">
 964 |                         <p class="Cell"><xsl:apply-templates select="graderinfo/*"/></p>
 965 |                     </xsl:when>
 966 |                     <xsl:otherwise>
 967 |                         <!-- No information for essay graders, so it's probably an older version of Moodle. -->
 968 |                         <p class="Cell"><xsl:value-of select="$blank_cell"/></p>
 969 |                     </xsl:otherwise>
 970 |                     </xsl:choose>
 971 |                 </div></td>
 972 |                 <!-- No grade info used in essays -->
 973 |                 <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
 974 |             </tr>
 975 |         </xsl:when>
 976 |         <xsl:when test="$qtype = 'DDI'">
 977 |             <!-- Drag and Drop image questions -->
 978 |             <xsl:apply-templates select="drag">
 979 |                 <xsl:with-param name="qtype" select="$qtype"/>
 980 |                 <xsl:with-param name="numbering_flag" select="$numbering_flag"/>
 981 |             </xsl:apply-templates>
 982 |             <tr>
 983 |                 <td style="width: 1.0cm"><p class="{$colheading1_style}" style="page-break-after:avoid">#</p></td>
 984 |                 <td style="{$col3_width}"><p class="TableHead"><xsl:value-of select="$ddi_dropzoneheader_label"/></p></td>
 985 |                 <td style="{$col2_width}"><p class="TableHead"><xsl:value-of select="$ddi_coords_label"/></p></td>
 986 |                 <td style="width: 1.0cm"><p class="TableHead"><xsl:value-of select="$ddi_draggableitem_label"/></p></td>
 987 |             </tr>
 988 |             <xsl:apply-templates select="drop" mode="ddimageortext">
 989 |                 <xsl:with-param name="qtype" select="$qtype"/>
 990 |                 <xsl:with-param name="numbering_flag" select="$numbering_flag"/>
 991 |             </xsl:apply-templates>
 992 |         </xsl:when>
 993 |         <xsl:when test="$qtype = 'DDM'">
 994 |             <!-- Drag and Drop marker onto image questions -->
 995 |             <xsl:apply-templates select="drag" mode="ddmarker">
 996 |                 <xsl:with-param name="qtype" select="$qtype"/>
 997 |                 <xsl:with-param name="numbering_flag" select="$numbering_flag"/>
 998 |             </xsl:apply-templates>
 999 |             <tr>
1000 |                 <td style="width: 1.0cm"><p class="{$colheading1_style}" style="page-break-after:avoid">#</p></td>
1001 |                 <td style="{$col2_width}"><p class="TableHead"><xsl:value-of select="$ddm_shape_label"/></p></td>
1002 |                 <td style="{$col3_width}"><p class="TableHead"><xsl:value-of select="$ddm_coords_label"/></p></td>
1003 |                 <td style="width: 1.0cm"><p class="TableHead"><xsl:value-of select="$ddm_marker_label"/></p></td>
1004 |             </tr>
1005 |             <xsl:apply-templates select="drop" mode="ddmarker">
1006 |                 <xsl:with-param name="qtype" select="$qtype"/>
1007 |                 <xsl:with-param name="numbering_flag" select="$numbering_flag"/>
1008 |             </xsl:apply-templates>
1009 |         </xsl:when>
1010 |         <xsl:otherwise>
1011 |             <!-- Special cases done, so for other question types, loop through the answers -->
1012 |             <xsl:apply-templates select="answer|subquestion|selectoption|dragbox">
1013 |                 <xsl:with-param name="qtype" select="$qtype"/>
1014 |                 <xsl:with-param name="numbering_flag" select="$numbering_flag"/>
1015 |             </xsl:apply-templates>
1016 |         </xsl:otherwise>
1017 |         </xsl:choose>
1018 |         <xsl:text>&#x0a;</xsl:text>
1019 | 
1020 |         <!-- General feedback for all question types except Description -->
1021 |         <xsl:if test="$qtype != 'DE'">
1022 |             <tr>
1023 |                 <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
1024 |                 <th style="{$col2_width}"><p class="TableRowHead"><xsl:value-of select="$generalfeedback_label"/></p></th>
1025 |                 <td style="{$col3_width}"><div class="chapter">
1026 |                     <xsl:choose>
1027 |                     <xsl:when test="generalfeedback/text = ''">
1028 |                         <p class="Cell"><xsl:value-of select="$blank_cell"/></p>
1029 |                     </xsl:when>
1030 |                     <xsl:otherwise>
1031 |                         <xsl:apply-templates select="generalfeedback/*"/>
1032 |                     </xsl:otherwise>
1033 |                     </xsl:choose>
1034 |                 </div></td>
1035 |                 <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
1036 |             </tr>
1037 |         <xsl:text>&#x0a;</xsl:text>
1038 |         </xsl:if>
1039 | 
1040 |         <!-- Correct and Incorrect feedback for MA, MAT, MC and MW questions only -->
1041 |         <xsl:if test="$qtype = 'MA' or $qtype = 'MC' or $qtype = 'MS' or $qtype = 'MAT' or $qtype = 'MW' or starts-with($qtype, 'DD')">
1042 |             <tr>
1043 |                 <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
1044 |                 <th style="{$col2_width}"><p class="TableRowHead"><xsl:value-of select="$correctfeedback_label"/></p></th>
1045 |                 <td style="{$col3_width}"><div class="chapter">
1046 |                     <xsl:choose>
1047 |                     <xsl:when test="normalize-space(correctfeedback/text) = ''">
1048 |                         <p class="Cell"><xsl:value-of select="$blank_cell"/></p>
1049 |                     </xsl:when>
1050 |                     <xsl:otherwise><xsl:apply-templates select="correctfeedback/*"/></xsl:otherwise>
1051 |                     </xsl:choose>
1052 |                 </div></td>
1053 |                 <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
1054 |             </tr>
1055 |             <xsl:text>&#x0a;</xsl:text>
1056 |             <tr>
1057 |                 <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
1058 |                 <th style="{$col2_width}"><p class="TableRowHead"><xsl:value-of select="$incorrectfeedback_label"/></p></th>
1059 |                 <td style="{$col3_width}"><div class="chapter">
1060 |                     <xsl:choose>
1061 |                     <xsl:when test="normalize-space(incorrectfeedback/text) = ''">
1062 |                         <p class="Cell"><xsl:value-of select="$blank_cell"/></p>
1063 |                     </xsl:when>
1064 |                     <xsl:otherwise><xsl:apply-templates select="incorrectfeedback/*"/></xsl:otherwise>
1065 |                     </xsl:choose>
1066 |                 </div></td>
1067 |                 <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
1068 |             </tr>
1069 |             <xsl:text>&#x0a;</xsl:text>
1070 |         </xsl:if>
1071 |         <!-- Partially correct feedback for MA (Multi-answer), MAT(ching) and Missing Word (gapselect) questions only -->
1072 |         <xsl:if test="$qtype = 'MA' or $qtype = 'MAT' or $qtype = 'MW' or starts-with($qtype, 'DD')">
1073 |             <tr>
1074 |                 <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
1075 |                 <th style="{$col2_width}"><p class="TableRowHead"><xsl:value-of select="$pcorrectfeedback_label"/></p></th>
1076 |                 <td style="{$col3_width}"><div class="chapter">
1077 |                     <xsl:choose>
1078 |                     <xsl:when test="normalize-space(partiallycorrectfeedback/text) = ''">
1079 |                         <p class="Cell"><xsl:value-of select="$blank_cell"/></p>
1080 |                     </xsl:when>
1081 |                     <xsl:otherwise><xsl:apply-templates select="partiallycorrectfeedback/*"/></xsl:otherwise>
1082 |                     </xsl:choose>
1083 |                 </div></td>
1084 |                 <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
1085 |             </tr>
1086 |             <xsl:text>&#x0a;</xsl:text>
1087 |         </xsl:if>
1088 | 
1089 |         <!-- Hints rows (added in Moodle 2.x) for CL MA MAT MC SA questions -->
1090 |         <xsl:for-each select="hint[text != '']">
1091 |             <!-- Define a label for the hint text row (row 1 of 3) -->
1092 |             <xsl:variable name="hint_number_label" select="concat(substring-before($hintn_label, '{no}'), position())"/>
1093 |             <tr>
1094 |                 <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
1095 |                 <th style="{$col2_width}"><p class="TableRowHead"><xsl:value-of select="concat($hint_number_label, $colon_string)"/></p></th>
1096 |                 <td style="{$col3_width}"><div class="chapter">
1097 |                     <xsl:apply-templates/>
1098 |                 </div></td>
1099 |                 <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
1100 |             </tr>
1101 |             <xsl:text>&#x0a;</xsl:text>
1102 |             <!-- Most question types allow for some qualifier fields on the behaviour of hints -->
1103 |             <xsl:if test="$qtype != 'SA'">
1104 |                 <tr>
1105 |                     <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
1106 |                     <th style="{$col2_width}"><p class="TableRowHead"><xsl:value-of select="concat($multichoiceset_showeachfeedback_label, ' (', $hint_number_label, ')', $colon_string)"/></p></th>
1107 |                     <td style="{$col3_width}"><p class="Cell">
1108 |                         <xsl:choose>
1109 |                         <xsl:when test="options and options = '1'">
1110 |                             <xsl:value-of select="$yes_label"/>
1111 |                         </xsl:when>
1112 |                         <xsl:otherwise><xsl:value-of select="$no_label"/></xsl:otherwise>
1113 |                         </xsl:choose>
1114 |                     </p></td>
1115 |                     <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
1116 |                 </tr>
1117 |                 <xsl:text>&#x0a;</xsl:text>
1118 |                 <tr>
1119 |                     <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
1120 |                     <th style="{$col2_width}"><p class="TableRowHead"><xsl:value-of select="concat($hint_shownumpartscorrect_label, ' (', $hint_number_label, ')', $colon_string)"/></p></th>
1121 |                     <td style="{$col3_width}"><p class="Cell">
1122 |                         <xsl:choose>
1123 |                         <xsl:when test="shownumcorrect">
1124 |                             <xsl:value-of select="$yes_label"/>
1125 |                         </xsl:when>
1126 |                         <xsl:otherwise><xsl:value-of select="$no_label"/></xsl:otherwise>
1127 |                         </xsl:choose>
1128 |                     </p></td>
1129 |                     <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
1130 |                 </tr>
1131 |                 <xsl:text>&#x0a;</xsl:text>
1132 |             </xsl:if>
1133 |             <tr>
1134 |                 <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
1135 |                 <th style="{$col2_width}">
1136 |                     <p class="TableRowHead">
1137 |                         <xsl:choose>
1138 |                         <xsl:when test="$qtype = 'DDM'">
1139 |                             <xsl:value-of select="concat($ddm_hint_clearwrongparts_label, ' (', $hint_number_label, ')', $colon_string)"/>
1140 |                         </xsl:when>
1141 |                         <xsl:otherwise>
1142 |                             <xsl:value-of select="concat($hint_clearwrongparts_label, ' (', $hint_number_label, ')', $colon_string)"/>
1143 |                         </xsl:otherwise>
1144 |                         </xsl:choose>
1145 |                     </p>
1146 |                 </th>
1147 |                 <td style="{$col3_width}"><p class="Cell">
1148 |                     <xsl:choose>
1149 |                     <xsl:when test="clearwrong">
1150 |                         <xsl:value-of select="$yes_label"/>
1151 |                     </xsl:when>
1152 |                     <xsl:otherwise><xsl:value-of select="$no_label"/></xsl:otherwise>
1153 |                     </xsl:choose>
1154 |                 </p></td>
1155 |                 <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
1156 |             </tr>
1157 |             <xsl:text>&#x0a;</xsl:text>
1158 |             <xsl:if test="$qtype = 'MS'">
1159 |                 <tr>
1160 |                     <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
1161 |                     <th style="{$col2_width}"><p class="TableRowHead"><xsl:value-of select="concat($multichoiceset_showeachfeedback_label, ' (', $hint_number_label, ')', $colon_string)"/></p></th>
1162 |                     <td style="{$col3_width}"><p class="Cell">
1163 |                         <xsl:choose>
1164 |                         <xsl:when test="options and options = '1'">
1165 |                             <xsl:value-of select="$yes_label"/>
1166 |                         </xsl:when>
1167 |                         <xsl:otherwise><xsl:value-of select="$no_label"/></xsl:otherwise>
1168 |                         </xsl:choose>
1169 |                     </p></td>
1170 |                     <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
1171 |                 </tr>
1172 |                 <xsl:text>&#x0a;</xsl:text>
1173 |             </xsl:if>
1174 |             <xsl:text>&#x0a;</xsl:text>
1175 |             <xsl:if test="$qtype = 'DDM'">
1176 |                 <tr>
1177 |                     <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
1178 |                     <th style="{$col2_width}"><p class="TableRowHead"><xsl:value-of select="concat($ddm_stateincorrectlyplaced_label, ' (', $hint_number_label, ')', $colon_string)"/></p></th>
1179 |                     <td style="{$col3_width}"><p class="Cell">
1180 |                         <xsl:choose>
1181 |                         <xsl:when test="options and options = '1'">
1182 |                             <xsl:value-of select="$yes_label"/>
1183 |                         </xsl:when>
1184 |                         <xsl:otherwise><xsl:value-of select="$no_label"/></xsl:otherwise>
1185 |                         </xsl:choose>
1186 |                     </p></td>
1187 |                     <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
1188 |                 </tr>
1189 |                 <xsl:text>&#x0a;</xsl:text>
1190 |             </xsl:if>
1191 |         </xsl:for-each>
1192 | 
1193 |         <!-- Include 1 empty hint row even if there are no hints, or if hint elements are present, but only have flags set -->
1194 |         <xsl:if test="(not(hint) or hint/text = '') and ($qtype != 'DE' and $qtype != 'ES' and $qtype != 'TF')">
1195 |             <!-- Define a label for the hint text row (row 1 of 3) -->
1196 |             <xsl:variable name="hint_number_label" select="concat(substring-before($hintn_label, '{no}'), 1)"/>
1197 |             <tr>
1198 |                 <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
1199 |                 <th style="{$col2_width}"><p class="TableRowHead"><xsl:value-of select="concat($hint_number_label, $colon_string)"/></p></th>
1200 |                 <td style="{$col3_width}"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
1201 |                 <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
1202 |             </tr>
1203 |             <xsl:text>&#x0a;</xsl:text>
1204 |             <!-- Most question types allow for some fields on the behaviour of hints, but SA doesn't, and CL only in 2.4+ -->
1205 |             <xsl:if test="($qtype != 'CL' and $qtype != 'SA') or ($qtype = 'CL')">
1206 |                 <tr>
1207 |                     <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
1208 |                     <th style="{$col2_width}"><p class="TableRowHead"><xsl:value-of select="concat($hint_shownumpartscorrect_label, ' (', $hint_number_label, ')', $colon_string)"/></p></th>
1209 |                     <td style="{$col3_width}"><p class="Cell"><xsl:value-of select="$no_label"/></p></td>
1210 |                     <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
1211 |                 </tr>
1212 |                 <xsl:text>&#x0a;</xsl:text>
1213 |                 <tr>
1214 |                     <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
1215 |                     <th style="{$col2_width}"><p class="TableRowHead"><xsl:value-of select="concat($hint_clearwrongparts_label, ' (', $hint_number_label, ')', $colon_string)"/></p></th>
1216 |                     <td style="{$col3_width}"><p class="Cell"><xsl:value-of select="$no_label"/></p></td>
1217 |                     <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
1218 |                 </tr>
1219 |                 <xsl:if test="$qtype = 'MS'">
1220 |                     <xsl:text>&#x0a;</xsl:text>
1221 |                     <tr>
1222 |                         <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
1223 |                         <th style="{$col2_width}"><p class="TableRowHead"><xsl:value-of select="concat($multichoiceset_showeachfeedback_label, ' (', $hint_number_label, ')', $colon_string)"/></p></th>
1224 |                         <td style="{$col3_width}"><p class="Cell"><xsl:value-of select="$no_label"/></p></td>
1225 |                         <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
1226 |                     </tr>
1227 |                 </xsl:if>
1228 |             </xsl:if>
1229 |             <xsl:text>&#x0a;</xsl:text>
1230 |         </xsl:if>
1231 |         <!-- End Hint processing -->
1232 | 
1233 |         <!-- Tags row (added in Moodle 2.x) -->
1234 |         <tr>
1235 |             <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
1236 |             <th style="{$col2_width}"><p class="TableRowHead"><xsl:value-of select="$tags_label"/></p></th>
1237 |             <td style="{$col3_width}">
1238 |                 <p class="Cell">
1239 |                         <xsl:choose>
1240 |                         <xsl:when test="tags[tag = '']">
1241 |                             <!-- tag element present but empty -->
1242 |                             <xsl:value-of select="$blank_cell"/>
1243 |                         </xsl:when>
1244 |                         <xsl:when test="tags/tag">
1245 |                             <!-- tag element present and not empty -->
1246 |                                 <xsl:for-each select="tags/tag">
1247 |                                     <xsl:value-of select="normalize-space(.)"/>
1248 |                                     <xsl:if test="position() != last()">
1249 |                                         <xsl:text>, </xsl:text>
1250 |                                     </xsl:if>
1251 |                                 </xsl:for-each>
1252 |                         </xsl:when>
1253 |                         <xsl:otherwise><xsl:value-of select="$blank_cell"/></xsl:otherwise>
1254 |                         </xsl:choose>
1255 |                 </p>
1256 |             </td>
1257 |             <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
1258 |         </tr>
1259 |         <xsl:text>&#x0a;</xsl:text>
1260 | 
1261 |         <!-- Instructions row for each question type -->
1262 |         <tr>
1263 |             <td colspan="3" style="width: 12.0cm">
1264 |             <xsl:choose>
1265 |             <xsl:when test="$qtype = 'CL'">
1266 |                 <p class="Cell">
1267 |                     <xsl:apply-templates select="$moodle_labels/data[@name = 'qformat_wordtable_cloze_instructions']"/>
1268 |                 </p>
1269 |             </xsl:when>
1270 |             <xsl:otherwise>
1271 |                 <p class="Cell"><i><xsl:value-of select="$instruction_text"/></i></p>
1272 |             </xsl:otherwise>
1273 |             </xsl:choose>
1274 | 
1275 |             </td>
1276 |             <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
1277 |         </tr>
1278 |         <xsl:text>&#x0a;</xsl:text>
1279 | 
1280 |     </tbody>
1281 |     </table>
1282 |     </div>
1283 |     <!-- CONTRIB-2847: Insert an empty paragraph after the table so that the "Insert new question" facility works -->
1284 |     <p class="MsoNormal"><xsl:value-of select="$blank_cell"/></p>
1285 | </xsl:template>
1286 | 
1287 | <!-- Omit hint sub-elements, including multichoiceset (All-or-Nothing MCQ) -->
1288 | <xsl:template match="hint/clearwrong|hint/shownumcorrect|hint/options"/>
1289 | 
1290 | <!-- Handle True/False question rows as a special case, as they only contain 'true' or 'false', which should be translated -->
1291 | <xsl:template match="answer[ancestor::question/@type = 'truefalse']" priority="2">
1292 |     <tr>
1293 |         <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
1294 |         <td style="{$col2_width}">
1295 |             <xsl:choose>
1296 |             <xsl:when test="text = 'true'">
1297 |                 <p class="Cell"><xsl:value-of select="$true_label"/></p>
1298 |             </xsl:when>
1299 |             <xsl:when test="text = 'false'">
1300 |                 <p class="Cell"><xsl:value-of select="$false_label"/></p>
1301 |             </xsl:when>
1302 |             <xsl:otherwise>
1303 |                 <!-- Lesson True/False questions can contain any text -->
1304 |                 <xsl:apply-templates select="text"/>
1305 |             </xsl:otherwise>
1306 |             </xsl:choose>
1307 |         </td>
1308 |         <td style="{$col3_width}"><p class="QFFeedback"><xsl:apply-templates select="feedback/*"/></p></td>
1309 |         <td style="width: 1.0cm"><p class="QFGrade"><xsl:value-of select="@fraction"/></p></td>
1310 |     </tr>
1311 | </xsl:template>
1312 | 
1313 | <!-- Handle standard question rows -->
1314 | <xsl:template match="answer[not(ancestor::subquestion)]|subquestion">
1315 |     <xsl:param name="qtype"/>
1316 |     <xsl:param name="numbering_flag"/>
1317 | 
1318 |     <!-- The 1st column contains a list item for MA and MC, and is blank for other questions. Use the paragraph style to control the enumeration -->
1319 |     <xsl:variable name="numbercolumn_class">
1320 |         <xsl:choose>
1321 |         <xsl:when test="$qtype = 'MAT'">
1322 |             <xsl:text>MsoListNumber</xsl:text>
1323 |         </xsl:when>
1324 |         <xsl:when test="$qtype = 'SA'">
1325 |             <xsl:text>Cell</xsl:text>
1326 |         </xsl:when>
1327 |         <xsl:otherwise><xsl:text>QFOption</xsl:text></xsl:otherwise>
1328 |         </xsl:choose>
1329 |     </xsl:variable>
1330 | 
1331 |     <!-- Simplify the percentage score value for an answer to keep it short, to fit it in the 4th column -->
1332 |     <xsl:variable name="grade_value">
1333 |         <xsl:choose>
1334 |         <xsl:when test="@fraction = '83.33333'"><xsl:text>83.3</xsl:text></xsl:when>
1335 |         <xsl:when test="@fraction = '66.66667'"><xsl:text>66.6</xsl:text></xsl:when>
1336 |         <xsl:when test="@fraction = '33.33333'"><xsl:text>33.3</xsl:text></xsl:when>
1337 |         <xsl:when test="@fraction = '16.66667'"><xsl:text>16.6</xsl:text></xsl:when>
1338 |         <xsl:when test="@fraction = '14.28571'"><xsl:text>14.3</xsl:text></xsl:when>
1339 |         <xsl:when test="@fraction = '11.11111'"><xsl:text>11.1</xsl:text></xsl:when>
1340 |         <xsl:when test="@fraction = '-83.33333'"><xsl:text>-83.3</xsl:text></xsl:when>
1341 |         <xsl:when test="@fraction = '-66.66667'"><xsl:text>-66.6</xsl:text></xsl:when>
1342 |         <xsl:when test="@fraction = '-33.33333'"><xsl:text>-33.3</xsl:text></xsl:when>
1343 |         <xsl:when test="@fraction = '-16.66667'"><xsl:text>-16.6</xsl:text></xsl:when>
1344 |         <xsl:when test="@fraction = '-14.28571'"><xsl:text>-14.3</xsl:text></xsl:when>
1345 |         <xsl:when test="@fraction = '-11.11111'"><xsl:text>-11.1</xsl:text></xsl:when>
1346 |         <xsl:otherwise><xsl:value-of select="@fraction"/></xsl:otherwise>
1347 |         </xsl:choose>
1348 |     </xsl:variable>
1349 | 
1350 |     <!-- Process body row columns 1 and 2, for MA, MC, MAT and SA -->
1351 |     <tr>
1352 |         <td style="width: 1.0cm"><p class="{$numbercolumn_class}"><xsl:value-of select="$blank_cell"/></p></td>
1353 |         <xsl:choose>
1354 |         <xsl:when test="$qtype = 'SA'">
1355 |             <td style="{$col2_width}"><div class="chapter"><p class="Cell"><xsl:value-of select="normalize-space(text)"/></p></div></td>
1356 |         </xsl:when>
1357 |         <xsl:otherwise>
1358 |             <td style="{$col2_width}"><div class="chapter"><xsl:apply-templates select="text|file"/></div></td>
1359 |         </xsl:otherwise>
1360 |         </xsl:choose>
1361 | 
1362 |         <!-- Process body row columns 3 and 4 -->
1363 |         <xsl:choose>
1364 |         <xsl:when test="$qtype = 'MAT'">
1365 |             <td style="{$col3_width}"><p class="Cell"><xsl:value-of select="answer/*"/></p></td>
1366 |             <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
1367 |         </xsl:when>
1368 |         <xsl:otherwise>
1369 |             <td style="{$col3_width}"><div class="chapter"><p class="QFFeedback"><xsl:apply-templates select="feedback/*"/></p></div></td>
1370 |             <td style="width: 1.0cm"><p class="QFGrade"><xsl:value-of select="$grade_value"/></p></td>
1371 |         </xsl:otherwise>
1372 |         </xsl:choose>
1373 |     </tr>
1374 | </xsl:template>
1375 | 
1376 | <!-- Handle MQXML text elements, which may consist only of a CDATA section -->
1377 | <xsl:template match="text">
1378 |     <xsl:variable name="text_string">
1379 |         <xsl:variable name="raw_text" select="normalize-space(.)"/>
1380 | 
1381 |         <xsl:choose>
1382 |         <!-- If the string is wrapped in <p>...</p>, get rid of it -->
1383 |         <xsl:when test="starts-with($raw_text, '&lt;p&gt;') and substring($raw_text, -4) = '&lt;/p&gt;'">
1384 |             <!-- 7 = string-length('<p>') + string-length('</p>') </p> -->
1385 |             <xsl:value-of select="substring($raw_text, 4, string-length($raw_text) - 7)"/>
1386 |         </xsl:when>
1387 |         <xsl:when test="starts-with($raw_text, '&lt;table')">
1388 |             <!-- Add a blank paragraph before the table, -->
1389 |             <xsl:value-of select="concat('&lt;p&gt;', $blank_cell, '&lt;/p&gt;', $raw_text)"/>
1390 |         </xsl:when>
1391 |         <xsl:when test="$raw_text = ''"><xsl:value-of select="$blank_cell"/></xsl:when>
1392 |         <xsl:otherwise><xsl:value-of select="$raw_text"/></xsl:otherwise>
1393 |         </xsl:choose>
1394 |     </xsl:variable>
1395 | 
1396 |     <xsl:value-of select="$text_string" disable-output-escaping="yes"/>
1397 | </xsl:template>
1398 | 
1399 | <!-- Handle Cloze text by converting it back to nicely formatted bold/italic, instead of ugly Moodle format, if we can -->
1400 | <xsl:template match="text" mode="cloze">
1401 |     <xsl:param name="cloze_mc_formatting_flag"/>
1402 |     <xsl:param name="cloze_sa_casesensitive_flag"/>
1403 |     <xsl:param name="cloze_defaultmark_value"/>
1404 | 
1405 |     <xsl:variable name="text_string">
1406 |         <xsl:variable name="raw_text" select="normalize-space(.)"/>
1407 | 
1408 |         <xsl:choose>
1409 |         <!-- If the string is wrapped in <p>...</p>, get rid of it -->
1410 |         <xsl:when test="starts-with($raw_text, '&lt;p&gt;') and substring($raw_text, -4) = '&lt;/p&gt;'">
1411 |             <!-- 7 = string-length('<p>') + string-length('</p>') </p> -->
1412 |             <xsl:value-of select="substring($raw_text, 4, string-length($raw_text) - 7)"/>
1413 |         </xsl:when>
1414 |         <xsl:when test="$raw_text = ''"><xsl:value-of select="$blank_cell"/></xsl:when>
1415 |         <xsl:otherwise><xsl:value-of select="$raw_text"/></xsl:otherwise>
1416 |         </xsl:choose>
1417 |     </xsl:variable>
1418 | 
1419 |     <!-- Convert the Cloze string to nice Word format -->
1420 |     <xsl:choose>
1421 |     <xsl:when test="normalize-space($text_string) != '' and normalize-space($text_string) != '&#160;'">
1422 |         <xsl:call-template name="convert_cloze_string">
1423 |             <xsl:with-param name="cloze_string" select="$text_string"/>
1424 |             <xsl:with-param name="cloze_sa_casesensitive_flag" select="$cloze_sa_casesensitive_flag"/>
1425 |             <xsl:with-param name="cloze_mc_formatting_flag" select="$cloze_mc_formatting_flag"/>
1426 |             <xsl:with-param name="cloze_defaultmark_value" select="$cloze_defaultmark_value"/>
1427 |         </xsl:call-template>
1428 |     </xsl:when>
1429 |     <xsl:otherwise>
1430 |         <xsl:value-of select="$blank_cell"/>
1431 |     </xsl:otherwise>
1432 |     </xsl:choose>
1433 | </xsl:template>
1434 | 
1435 | <!-- Convert Cloze text strings into bold or italic, or leave as is if conversion not possible -->
1436 | <!-- This template calls itself recursively to handle each subquestion in the string -->
1437 | <xsl:template name="convert_cloze_string">
1438 |     <xsl:param name="cloze_string"/>
1439 |     <xsl:param name="cloze_mc_formatting_flag"/> <!-- Default MC format: D, H or V -->
1440 |     <xsl:param name="cloze_sa_casesensitive_flag"/> <!-- Default SA case: 0 or 1 -->
1441 |     <xsl:param name="cloze_defaultmark_value"/> <!-- Default mark/weight -->
1442 | 
1443 |     <!--
1444 |     <xsl:message>
1445 |         <xsl:value-of select="concat('convert_cloze_string(cloze_string = &quot;', translate(substring($cloze_string, 1, 100), '&#x0a;', ''), '&quot;; default = ', $cloze_defaultmark_value, ')')"/>
1446 |     </xsl:message>
1447 |     -->
1448 |     <xsl:choose>
1449 |     <xsl:when test="not(contains($cloze_string, $cloze_start_delimiter))">
1450 |         <!-- Simple case: No subquestion left, so return the remaining string -->
1451 |         <xsl:value-of select="$cloze_string" disable-output-escaping="yes"/>
1452 |     </xsl:when>
1453 |     <xsl:otherwise>
1454 |         <!-- Have a subquestion, so handle it -->
1455 |         <!-- First, copy the text prior to the first subquestion -->
1456 |         <xsl:value-of select="substring-before($cloze_string, $cloze_start_delimiter)" disable-output-escaping="yes"/>
1457 | 
1458 |         <!-- Next, identify the first subquestion, and figure out what is its type and default mark -->
1459 |         <xsl:variable name="this_subquestion_string" select="substring-before(substring-after($cloze_string, $cloze_start_delimiter), $cloze_end_delimiter)"/>
1460 |         <xsl:variable name="this_subquestion_defaultmark">
1461 |             <xsl:call-template name="get_cloze_defaultmark">
1462 |                 <xsl:with-param name="cloze_questiontext_string" select="concat($cloze_start_delimiter, $this_subquestion_string, $cloze_end_delimiter)"/>
1463 |             </xsl:call-template>
1464 |         </xsl:variable>
1465 | 
1466 |         <xsl:variable name="this_subquestion_type">
1467 |             <xsl:variable name="this_subquestion_type_string" select="concat(':', substring-before(substring-after($this_subquestion_string, $cloze_keyword_delimiter), $cloze_keyword_delimiter), ':')"/>
1468 |             <xsl:choose>
1469 |             <!-- Numerical -->
1470 |             <xsl:when test="$this_subquestion_type_string = $cloze_num_keyword1 or $this_subquestion_type_string = $cloze_num_keyword2">
1471 |                 <xsl:value-of select="$cloze_num_keyword1"/>
1472 |             </xsl:when>
1473 |             <!-- Case-insensitive SA -->
1474 |             <xsl:when test="$this_subquestion_type_string = $cloze_sa_keyword1 or $this_subquestion_type_string = $cloze_sa_keyword2 or $this_subquestion_type_string = $cloze_sa_keyword3">
1475 |                 <xsl:value-of select="$cloze_sa_keyword1"/>
1476 |             </xsl:when>
1477 |             <!-- Case-sensitive SA -->
1478 |             <xsl:when test="$this_subquestion_type_string = $cloze_sac_keyword1 or $this_subquestion_type_string = $cloze_sac_keyword2 or $this_subquestion_type_string = $cloze_sac_keyword3">
1479 |                 <xsl:value-of select="$cloze_sac_keyword1"/>
1480 |             </xsl:when>
1481 |             <!-- Dropdown MC -->
1482 |             <xsl:when test="$this_subquestion_type_string = $cloze_mc_keyword1 or $this_subquestion_type_string = $cloze_mc_keyword2">
1483 |                 <xsl:value-of select="$cloze_mc_keyword1"/>
1484 |             </xsl:when>
1485 |             <!-- Vertical radio-button MC -->
1486 |             <xsl:when test="$this_subquestion_type_string = $cloze_mcv_keyword1 or $this_subquestion_type_string = $cloze_mcv_keyword2">
1487 |                 <xsl:value-of select="$cloze_mcv_keyword1"/>
1488 |             </xsl:when>
1489 |             <!-- Horizontal radio-button MC -->
1490 |             <xsl:when test="$this_subquestion_type_string = $cloze_mch_keyword1 or $this_subquestion_type_string = $cloze_mch_keyword2">
1491 |                 <xsl:value-of select="$cloze_mch_keyword1"/>
1492 |             </xsl:when>
1493 |             </xsl:choose>
1494 |         </xsl:variable>
1495 | 
1496 |         <xsl:call-template name="debugComment">
1497 |             <xsl:with-param name="comment_text" select="concat('this_subquestion: type = ', $this_subquestion_type, ', mark = ', normalize-space(translate($this_subquestion_defaultmark, '&#x0a;', '')), '; default: ', $cloze_defaultmark_value)"/>
1498 |             <xsl:with-param name="condition" select="$debug_flag &gt; 1"/>
1499 |         </xsl:call-template>
1500 | 
1501 |         <!-- Compare this subquestions' type and mark against the defaults, to figure out how best to present it -->
1502 |         <xsl:choose>
1503 |         <xsl:when test="$this_subquestion_defaultmark != $cloze_defaultmark_value">
1504 |             <!-- The default mark for this subquestion doesn't match the default for the whole Cloze, so just copy the raw text -->
1505 |             <xsl:value-of select="concat($cloze_start_delimiter, $this_subquestion_string, $cloze_end_delimiter)" disable-output-escaping="yes"/>
1506 |         </xsl:when>
1507 |         <xsl:when test="($this_subquestion_type = $cloze_sa_keyword1 and $cloze_sa_casesensitive_flag = '0') or ($this_subquestion_type = $cloze_sac_keyword1 and $cloze_sa_casesensitive_flag = '1')">
1508 |             <!-- An SA subquestion in a consistent case-sensitivity cloze, so convert it to italic -->
1509 |             <xsl:call-template name="convert_cloze_subquestion">
1510 |                 <xsl:with-param name="cloze_subquestion_string" select="$this_subquestion_string"/>
1511 |                 <xsl:with-param name="cloze_sa_casesensitive_flag" select="$cloze_sa_casesensitive_flag"/>
1512 |                 <xsl:with-param name="cloze_mc_formatting_flag" select="$cloze_mc_formatting_flag"/>
1513 |             </xsl:call-template>
1514 |             </xsl:when>
1515 |         <xsl:when test="($this_subquestion_type = $cloze_mc_keyword1 and $cloze_mc_formatting_flag = 'D') or ($this_subquestion_type = $cloze_mch_keyword1 and $cloze_mc_formatting_flag = 'H') or ($this_subquestion_type = $cloze_mcv_keyword1 and $cloze_mc_formatting_flag = 'V')">
1516 |             <!-- An MCD, MCH or MCV subquestion in a consistent cloze, so convert it to  bold -->
1517 |             <xsl:call-template name="convert_cloze_subquestion">
1518 |                 <xsl:with-param name="cloze_subquestion_string" select="$this_subquestion_string"/>
1519 |                 <xsl:with-param name="cloze_sa_casesensitive_flag" select="$cloze_sa_casesensitive_flag"/>
1520 |                 <xsl:with-param name="cloze_mc_formatting_flag" select="$cloze_mc_formatting_flag"/>
1521 |             </xsl:call-template>
1522 |         </xsl:when>
1523 |         <xsl:when test="$this_subquestion_type = $cloze_num_keyword1 or $this_subquestion_type = $cloze_num_keyword2">
1524 |             <!-- A NUMERICAL subquestion, so convert it to underline -->
1525 |             <xsl:call-template name="convert_cloze_subquestion">
1526 |                 <xsl:with-param name="cloze_subquestion_string" select="$this_subquestion_string"/>
1527 |             </xsl:call-template>
1528 |         </xsl:when>
1529 |         <xsl:otherwise>
1530 |             <!-- Some other case we don't handle well, so just copy the raw text -->
1531 |             <xsl:value-of select="concat($cloze_start_delimiter, $this_subquestion_string, $cloze_end_delimiter)" disable-output-escaping="yes"/>
1532 |         </xsl:otherwise>
1533 |         </xsl:choose>
1534 | 
1535 |         <!-- Finally, recurse through the remaining part of the string to do the remaining subquestions -->
1536 |         <xsl:call-template name="convert_cloze_string">
1537 |             <xsl:with-param name="cloze_string" select="substring-after($cloze_string, $cloze_end_delimiter)"/>
1538 |             <xsl:with-param name="cloze_sa_casesensitive_flag" select="$cloze_sa_casesensitive_flag"/>
1539 |             <xsl:with-param name="cloze_mc_formatting_flag" select="$cloze_mc_formatting_flag"/>
1540 |             <xsl:with-param name="cloze_defaultmark_value" select="$cloze_defaultmark_value"/>
1541 |         </xsl:call-template>
1542 |     </xsl:otherwise>
1543 |     </xsl:choose>
1544 | </xsl:template>
1545 | 
1546 | <!-- Convert a single embedded NUMERICAL, SHORTANSWER or MULTICHOICE subquestion into corresponding Word markup -->
1547 | <xsl:template name="convert_cloze_subquestion">
1548 |     <xsl:param name="cloze_subquestion_string"/>
1549 |     <xsl:param name="cloze_mc_formatting_flag"/>
1550 |     <xsl:param name="cloze_sa_casesensitive_flag"/>
1551 | 
1552 |     <!-- Get the remainder of the string, after the 2nd colon, which occurs as the keyword end delimiter, e.g. ':SA:' -->
1553 |     <xsl:variable name="cloze_remainder_string" select="substring-after(substring-after($cloze_subquestion_string, $cloze_keyword_delimiter), $cloze_keyword_delimiter)"/>
1554 | 
1555 |     <xsl:choose>
1556 |     <xsl:when test="contains($cloze_subquestion_string, $cloze_num_keyword1) or contains($cloze_subquestion_string, $cloze_num_keyword2)">
1557 |         <u>
1558 |             <xsl:call-template name="format_cloze_subquestion">
1559 |                 <xsl:with-param name="cloze_subquestion_string" select="$cloze_remainder_string"/>
1560 |                 <xsl:with-param name="first_answer_item" select="'true'"/>
1561 |                 <xsl:with-param name="cloze_sa_casesensitive_flag" select="$cloze_sa_casesensitive_flag"/>
1562 |                 <xsl:with-param name="cloze_mc_formatting_flag" select="$cloze_mc_formatting_flag"/>
1563 |             </xsl:call-template>
1564 |         </u>
1565 |     </xsl:when>
1566 |     <xsl:when test="contains($cloze_subquestion_string, $cloze_sa_keyword1) or contains($cloze_subquestion_string, $cloze_sa_keyword2) or contains($cloze_subquestion_string, $cloze_sa_keyword3) or contains($cloze_subquestion_string, $cloze_sac_keyword1) or contains($cloze_subquestion_string, $cloze_sac_keyword2) or contains($cloze_subquestion_string, $cloze_sac_keyword3)">
1567 |         <i>
1568 |             <xsl:call-template name="format_cloze_subquestion">
1569 |                 <xsl:with-param name="cloze_subquestion_string" select="$cloze_remainder_string"/>
1570 |                 <xsl:with-param name="first_answer_item" select="'true'"/>
1571 |                 <xsl:with-param name="cloze_sa_casesensitive_flag" select="$cloze_sa_casesensitive_flag"/>
1572 |                 <xsl:with-param name="cloze_mc_formatting_flag" select="$cloze_mc_formatting_flag"/>
1573 |             </xsl:call-template>
1574 |         </i>
1575 |     </xsl:when>
1576 |     <xsl:when test="contains($cloze_subquestion_string, $cloze_mc_keyword1) or contains($cloze_subquestion_string, $cloze_mc_keyword2) or contains($cloze_subquestion_string, $cloze_mch_keyword1) or contains($cloze_subquestion_string, $cloze_mch_keyword2) or contains($cloze_subquestion_string, $cloze_mcv_keyword1) or contains($cloze_subquestion_string, $cloze_mcv_keyword2)">
1577 |         <b>
1578 |             <xsl:call-template name="format_cloze_subquestion">
1579 |                 <xsl:with-param name="cloze_subquestion_string" select="$cloze_remainder_string"/>
1580 |                 <xsl:with-param name="first_answer_item" select="'true'"/>
1581 |                 <xsl:with-param name="cloze_sa_casesensitive_flag" select="$cloze_sa_casesensitive_flag"/>
1582 |                 <xsl:with-param name="cloze_mc_formatting_flag" select="$cloze_mc_formatting_flag"/>
1583 |             </xsl:call-template>
1584 |         </b>
1585 |     </xsl:when>
1586 |     </xsl:choose>
1587 | </xsl:template>
1588 | 
1589 | <!-- Clean up Cloze subquestion items by removing '%100%' or '=', empty feedback, etc. -->
1590 | <xsl:template name="format_cloze_subquestion">
1591 |     <xsl:param name="cloze_subquestion_string"/>
1592 |     <xsl:param name="first_answer_item" select="'false'"/>
1593 |     <xsl:param name="cloze_mc_formatting_flag"/>
1594 |     <xsl:param name="cloze_sa_casesensitive_flag"/>
1595 | 
1596 |     <xsl:if test="$first_answer_item = 'false'">
1597 |         <xsl:value-of select="$cloze_answer_delimiter"/>
1598 |     </xsl:if>
1599 | 
1600 |     <xsl:choose>
1601 |     <!-- Does the answer contain multiple components separated by tilda delimiter (~)? -->
1602 |     <xsl:when test="contains($cloze_subquestion_string, $cloze_answer_delimiter)">
1603 |         <!-- Format the answer before the ~ delimiter -->
1604 |         <xsl:call-template name="format_cloze_answer">
1605 |             <xsl:with-param name="cloze_subquestion_string" select="substring-before($cloze_subquestion_string, $cloze_answer_delimiter)"/>
1606 |             <xsl:with-param name="cloze_sa_casesensitive_flag" select="$cloze_sa_casesensitive_flag"/>
1607 |             <xsl:with-param name="cloze_mc_formatting_flag" select="$cloze_mc_formatting_flag"/>
1608 |         </xsl:call-template>
1609 | 
1610 |         <!-- Recurse to format the answers after the ~ delimiter -->
1611 |         <xsl:call-template name="format_cloze_subquestion">
1612 |             <xsl:with-param name="cloze_subquestion_string" select="substring-after($cloze_subquestion_string, $cloze_answer_delimiter)"/>
1613 |             <xsl:with-param name="cloze_sa_casesensitive_flag" select="$cloze_sa_casesensitive_flag"/>
1614 |             <xsl:with-param name="cloze_mc_formatting_flag" select="$cloze_mc_formatting_flag"/>
1615 |         </xsl:call-template>
1616 |     </xsl:when>
1617 |     <xsl:otherwise>
1618 |         <!-- Format the only answer -->
1619 |         <xsl:call-template name="format_cloze_answer">
1620 |             <xsl:with-param name="cloze_subquestion_string" select="$cloze_subquestion_string"/>
1621 |             <xsl:with-param name="cloze_sa_casesensitive_flag" select="$cloze_sa_casesensitive_flag"/>
1622 |             <xsl:with-param name="cloze_mc_formatting_flag" select="$cloze_mc_formatting_flag"/>
1623 |         </xsl:call-template>
1624 |     </xsl:otherwise>
1625 |     </xsl:choose>
1626 | </xsl:template>
1627 | 
1628 | <!-- Clean up answer string Cloze inside subquestion -->
1629 | <xsl:template name="format_cloze_answer">
1630 |     <xsl:param name="cloze_subquestion_string"/>
1631 |     <xsl:param name="cloze_mc_formatting_flag"/>
1632 |     <xsl:param name="cloze_sa_casesensitive_flag"/>
1633 | 
1634 |     <xsl:choose>
1635 |     <!-- If an answer starts with '%100%', leave it out -->
1636 |     <xsl:when test="starts-with($cloze_subquestion_string, $cloze_correct_prefix1)">
1637 |         <xsl:value-of select="substring-after($cloze_subquestion_string, $cloze_correct_prefix1)" disable-output-escaping="yes"/>
1638 |     </xsl:when>
1639 |     <!-- If an answer starts with '=', leave it out -->
1640 |     <xsl:when test="starts-with($cloze_subquestion_string, $cloze_correct_prefix2)">
1641 |         <xsl:value-of select="substring-after($cloze_subquestion_string, $cloze_correct_prefix2)" disable-output-escaping="yes"/>
1642 |     </xsl:when>
1643 |     <!-- If an answer has an incorrect prefix ('%0%'), just copy it -->
1644 |     <xsl:when test="starts-with($cloze_subquestion_string, $cloze_incorrect_prefix)">
1645 |         <xsl:value-of select="$cloze_subquestion_string" disable-output-escaping="yes"/>
1646 |     </xsl:when>
1647 |     <!-- If an answer has a partially correct prefix (i.e. starts with '%', but not '%0%' or '%100%', just copy it -->
1648 |     <xsl:when test="starts-with($cloze_subquestion_string, $cloze_incorrect_prefix)">
1649 |         <xsl:value-of select="$cloze_subquestion_string" disable-output-escaping="yes"/>
1650 |     </xsl:when>
1651 |     <xsl:otherwise>
1652 |         <xsl:if test="contains(., '&amp;')">
1653 |             <xsl:message>
1654 |                 <xsl:value-of select="concat('String: ', .)"/>
1655 |             </xsl:message>
1656 |         </xsl:if>
1657 | 
1658 |         <!-- Add explicit incorrect marker '%0%' if it is not present -->
1659 |         <xsl:value-of select="concat($cloze_incorrect_prefix, $cloze_subquestion_string)" disable-output-escaping="yes"/>
1660 |     </xsl:otherwise>
1661 |     </xsl:choose>
1662 | </xsl:template>
1663 | 
1664 | 
1665 | <!-- Get the default mark in Cloze subquestions; it must be the same for all subquestions or we cannot optimise the Word output -->
1666 | <xsl:template name="get_cloze_defaultmark">
1667 |     <xsl:param name="cloze_questiontext_string"/>
1668 |     <xsl:param name="current_defaultmark" select="'0'"/>
1669 | 
1670 |     <!-- This template assumes there is always be a subquestion to process -->
1671 |     <!--
1672 |     <xsl:if test="$current_defaultmark = '0' and $cloze_questiontext_string != ''">
1673 |         <xsl:message>
1674 |             <xsl:value-of select="concat('get_cloze_defaultmark: starting string = &quot;', translate(substring(normalize-space($cloze_questiontext_string), 1, 100), '&#x0a;', ''), '&quot;')"/>
1675 |         </xsl:message>
1676 |     </xsl:if>
1677 |     -->
1678 | 
1679 |     <!-- Get the default mark for the first subquestion -->
1680 |     <xsl:variable name="defaultmark_string" select="substring-before(substring-after($cloze_questiontext_string, $cloze_start_delimiter), $cloze_keyword_delimiter)"/>
1681 |     <xsl:variable name="this_defaultmark">
1682 |         <xsl:choose>
1683 |         <xsl:when test="$defaultmark_string != ''">
1684 |             <xsl:value-of select="$defaultmark_string"/>
1685 |         </xsl:when>
1686 |         <!-- Default mark not explicitly specified, so use Moodle-defined default of 1 -->
1687 |         <xsl:otherwise><xsl:text>1</xsl:text></xsl:otherwise>
1688 |         </xsl:choose>
1689 |     </xsl:variable>
1690 | 
1691 |     <!--
1692 |     <xsl:message>
1693 |         <xsl:value-of select="concat('get_cloze_defaultmark: this_defaultmark = ', $this_defaultmark, ', defaultmark_string = ', $defaultmark_string, '; cloze_questiontext_string: &quot;', translate(substring(normalize-space(substring-after($cloze_questiontext_string, $cloze_start_delimiter)), 1, 30), '&#x0a;', ''), '&quot;')"/>
1694 |     </xsl:message>
1695 |     -->
1696 | 
1697 |     <!-- Are there more subquestions? Check the remainder of the string after the end of the first subquestion to find out -->
1698 |     <xsl:variable name="cloze_questiontext_remainder" select="substring-after($cloze_questiontext_string, $cloze_end_delimiter)"/>
1699 |     <xsl:choose>
1700 |     <xsl:when test="contains($cloze_questiontext_remainder, $cloze_start_delimiter)">
1701 |         <!-- Yes, more subquestions, so recurse to the next one, passing this defaultmark value through as the current default -->
1702 |         <xsl:call-template name="get_cloze_defaultmark">
1703 |             <xsl:with-param name="cloze_questiontext_string" select="$cloze_questiontext_remainder"/>
1704 |             <xsl:with-param name="current_defaultmark" select="$this_defaultmark"/>
1705 |         </xsl:call-template>
1706 |     </xsl:when>
1707 |     <xsl:when test="$current_defaultmark = 0 or $current_defaultmark = $this_defaultmark">
1708 |         <!-- No more subquestions, so check the default mark for this subquestion against the current value to decide what to return -->
1709 |         <!-- If current default mark is 0, just return this default mark, since this is the first recursive call -->
1710 |         <xsl:value-of select="$this_defaultmark"/>
1711 |     </xsl:when>
1712 |     <xsl:when test="$current_defaultmark != $this_defaultmark">
1713 |         <!-- If current and this default marks are not the same, return 0 to indicate that different subquestions have different marks, because it means we cannot optimise Word output -->
1714 |         <xsl:value-of select="'0'"/>
1715 |     </xsl:when>
1716 |     </xsl:choose>
1717 | </xsl:template>
1718 | 
1719 | <!-- Handle Missing Words-specific question elements -->
1720 | <xsl:template match="selectoption">
1721 |     <tr>
1722 |         <td style="width: 1.0cm"><p class="MsoListNumber"><xsl:value-of select="$blank_cell"/></p></td>
1723 |         <td style="{$col2_width}"><p class="Cell"><xsl:value-of select="normalize-space(text)"/></p></td>
1724 |         <td style="{$col3_width}"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
1725 |         <td style="width: 1.0cm"><p class="QFGrade">
1726 |             <xsl:choose>
1727 |             <xsl:when test="group &lt; 10"><xsl:value-of select="translate(group, '123456789', 'ABCDEFGHI')"/></xsl:when>
1728 |             <xsl:when test="group &lt; 19"><xsl:value-of select="translate(group - 9, '123456789', 'JKLMNOPQR')"/></xsl:when>
1729 |             <xsl:when test="group &gt;= 19"><xsl:value-of select="translate(group - 18, '12', 'ST')"/></xsl:when>
1730 |             </xsl:choose>
1731 |         </p></td>
1732 |     </tr>
1733 | </xsl:template>
1734 | 
1735 | <!-- Handle Drag and Drop text question elements -->
1736 | <xsl:template match="dragbox">
1737 |     <tr>
1738 |         <td style="width: 1.0cm"><p class="MsoListNumber"><xsl:value-of select="$blank_cell"/></p></td>
1739 |         <td style="{$col2_width}"><p class="Cell"><xsl:value-of select="normalize-space(text)"/></p></td>
1740 |         <td style="{$col3_width}">
1741 |             <p class="Cell">
1742 |                 <xsl:choose>
1743 |                 <xsl:when test="infinite">
1744 |                     <xsl:value-of select="$yes_label"/>
1745 |                 </xsl:when>
1746 |                 <xsl:otherwise>
1747 |                     <xsl:value-of select="$no_label"/>
1748 |                 </xsl:otherwise>
1749 |                 </xsl:choose>
1750 |             </p>
1751 |         </td>
1752 |         <td style="width: 1.0cm"><p class="QFGrade"><xsl:value-of select="group"/></p></td>
1753 |     </tr>
1754 | </xsl:template>
1755 | 
1756 | <!-- Handle Drag and Drop onto image question elements -->
1757 | <xsl:template match="drag">
1758 |     <tr>
1759 |         <td style="width: 1.0cm"><p class="MsoListNumber"><xsl:value-of select="$blank_cell"/></p></td>
1760 |         <td style="{$col2_width}">
1761 |             <p class="Cell">
1762 |                 <!-- May be dealing with either an image or a text label -->
1763 |                 <xsl:choose>
1764 |                 <xsl:when test="file">
1765 |                     <xsl:variable name="image_id">
1766 |                         <xsl:value-of select="'Q'"/>
1767 |                         <xsl:number value="count(preceding::question) + 1" format="0001"/>
1768 |                         <xsl:value-of select="'_IID'"/>
1769 |                         <xsl:number value="position()" format="0001"/>
1770 |                     </xsl:variable>
1771 |                     <img id="{$image_id}" src="{concat($pluginfiles_string,file/@name)}" alt="{normalize-space(text)}"/>
1772 |                     <xsl:apply-templates select="file">
1773 |                         <xsl:with-param name="image_id" select="$image_id"/>
1774 |                     </xsl:apply-templates>
1775 |                 </xsl:when>
1776 |                 <xsl:otherwise>
1777 |                     <xsl:value-of select="normalize-space(text)"/>
1778 |                 </xsl:otherwise>
1779 |                 </xsl:choose>
1780 |             </p>
1781 |         </td>
1782 |         <td style="{$col3_width}">
1783 |             <p class="Cell">
1784 |                 <xsl:choose>
1785 |                 <xsl:when test="infinite">
1786 |                     <xsl:value-of select="$yes_label"/>
1787 |                 </xsl:when>
1788 |                 <xsl:otherwise>
1789 |                     <xsl:value-of select="$no_label"/>
1790 |                 </xsl:otherwise>
1791 |                 </xsl:choose>
1792 |             </p>
1793 |         </td>
1794 |         <td style="width: 1.0cm"><p class="QFGrade"><xsl:value-of select="draggroup"/></p></td>
1795 |     </tr>
1796 | </xsl:template>
1797 | 
1798 | <!-- Markers area of Drag and Drop marker -->
1799 | <xsl:template match="drag" mode="ddmarker">
1800 |     <tr>
1801 |         <td style="width: 1.0cm"><p class="MsoListNumber"><xsl:value-of select="$blank_cell"/></p></td>
1802 |         <td style="{$col2_width}"><p class="Cell"><xsl:value-of select="normalize-space(text)"/></p></td>
1803 |         <td style="{$col3_width}"><p class="Cell"><xsl:value-of select="$blank_cell"/></p></td>
1804 |         <td style="width: 1.0cm">
1805 |             <p class="Cell">
1806 |                 <xsl:choose>
1807 |                 <xsl:when test="infinite"><xsl:value-of select="'0'"/></xsl:when>
1808 |                 <xsl:otherwise><xsl:value-of select="noofdrags"/></xsl:otherwise>
1809 |                 </xsl:choose>
1810 |             </p>
1811 |         </td>
1812 |     </tr>
1813 | </xsl:template>
1814 | 
1815 | <xsl:template match="drop" mode="ddmarker">
1816 |     <tr>
1817 |         <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="no"/></p></td>
1818 |         <td style="{$col2_width}">
1819 |             <p class="Cell">
1820 |                 <xsl:variable name="this_shape">
1821 |                     <xsl:choose>
1822 |                     <xsl:when test="shape = 'circle'">
1823 |                         <xsl:value-of select="$ddm_circle_label"/>
1824 |                     </xsl:when>
1825 |                     <xsl:when test="shape = 'rectangle'">
1826 |                         <xsl:value-of select="$ddm_rectangle_label"/>
1827 |                     </xsl:when>
1828 |                     <xsl:otherwise>
1829 |                         <xsl:value-of select="$ddm_polygon_label"/>
1830 |                     </xsl:otherwise>
1831 |                     </xsl:choose>
1832 |                 </xsl:variable>
1833 |                 <xsl:value-of select="$this_shape"/>
1834 |             </p>
1835 |         </td>
1836 |         <td style="{$col3_width}"><p class="Cell"><xsl:value-of select="coords"/></p></td>
1837 |         <td style="width: 1.0cm"><p class="QFGrade"><xsl:value-of select="choice"/></p></td>
1838 |     </tr>
1839 | </xsl:template>
1840 | 
1841 | <xsl:template match="drop" mode="ddimageortext">
1842 |     <tr>
1843 |         <td style="width: 1.0cm"><p class="Cell"><xsl:value-of select="no"/></p></td>
1844 |         <td style="{$col2_width}"><p class="Cell"><xsl:value-of select="normalize-space(text)"/></p></td>
1845 |         <td style="{$col3_width}"><p class="Cell"><xsl:value-of select="concat(xleft, ', ', ytop)"/></p></td>
1846 |         <td style="width: 1.0cm"><p class="QFGrade"><xsl:value-of select="choice"/></p></td>
1847 |     </tr>
1848 | </xsl:template>
1849 | 
1850 | <!-- Handle images associated with '@@PLUGINFILE@@' keyword by including them in temporary supplementary paragraphs in whatever component they occur in -->
1851 | <xsl:template match="file">
1852 |     <xsl:param name="image_id"/>
1853 | 
1854 |     <xsl:variable name="image_file_suffix">
1855 |         <xsl:value-of select="translate(substring-after(@name, '.'), $ucase, $lcase)"/>
1856 |     </xsl:variable>
1857 |     <xsl:variable name="image_format">
1858 |         <xsl:value-of select="concat('data:image/', $image_file_suffix, ';', @encoding, ',')"/>
1859 |     </xsl:variable>
1860 |     <xsl:variable name="alt_text">
1861 |         <xsl:value-of select="concat('data:image/', $image_file_suffix, ';', @encoding, ',')"/>
1862 |     </xsl:variable>
1863 | 
1864 |     <div class="ImageFile">
1865 |         <img title="{@name}" src="{concat($image_format, .)}">
1866 |             <xsl:if test="$image_id != ''">
1867 |                 <xsl:attribute name="id"><xsl:value-of select="$image_id"/></xsl:attribute>
1868 |             </xsl:if>
1869 |         </img>
1870 |     </div>
1871 | </xsl:template>
1872 | 
1873 | <!-- got to preserve comments for style definitions -->
1874 | <xsl:template match="comment()">
1875 |     <xsl:comment><xsl:value-of select="."/></xsl:comment>
1876 | </xsl:template>
1877 | 
1878 | <!-- Identity transformations -->
1879 | <xsl:template match="*">
1880 |     <xsl:element name="{name()}">
1881 |         <xsl:call-template name="copyAttributes" />
1882 |         <xsl:apply-templates select="node()"/>
1883 |     </xsl:element>
1884 | </xsl:template>
1885 | 
1886 | <xsl:template name="copyAttributes">
1887 |     <xsl:for-each select="@*">
1888 |         <xsl:attribute name="{name()}"><xsl:value-of select="."/></xsl:attribute>
1889 |     </xsl:for-each>
1890 | </xsl:template>
1891 | 
1892 | <!-- Include debugging information in the output -->
1893 | <xsl:template name="debugComment">
1894 |     <xsl:param name="comment_text"/>
1895 |     <xsl:param name="inline" select="'false'"/>
1896 |     <xsl:param name="condition" select="'true'"/>
1897 | 
1898 |     <xsl:if test="boolean($condition) and $debug_flag != 0">
1899 |         <xsl:if test="$inline = 'false'"><xsl:text>&#x0a;</xsl:text></xsl:if>
1900 |         <xsl:comment><xsl:value-of select="concat('Debug: ', $comment_text)"/></xsl:comment>
1901 |         <xsl:if test="$inline = 'false'"><xsl:text>&#x0a;</xsl:text></xsl:if>
1902 |     </xsl:if>
1903 | </xsl:template>
1904 | </xsl:stylesheet>
1905 | 


--------------------------------------------------------------------------------
/classes/mqxmlconverter.php:
--------------------------------------------------------------------------------
  1 | <?php
  2 | // This file is part of Moodle - http://moodle.org/
  3 | //
  4 | // This program is free software: you can redistribute it and/or modify
  5 | // it under the terms of the GNU General Public License as published by
  6 | // the Free Software Foundation, either version 3 of the License, or
  7 | // (at your option) any later version.
  8 | //
  9 | // This program is distributed in the hope that it will be useful,
 10 | // but WITHOUT ANY WARRANTY; without even the implied warranty of
 11 | // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 12 | // GNU General Public License for more details.
 13 | //
 14 | // You should have received a copy of the GNU General Public License
 15 | // along with this program.  If not, see <http://www.gnu.org/licenses/>.
 16 | 
 17 | /**
 18 |  * Import/Export Moodle Question XML library.
 19 |  *
 20 |  * @package    qformat_wordtable
 21 |  * @copyright  2021 Eoin Campbell
 22 |  * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
 23 |  */
 24 | 
 25 | namespace qformat_wordtable;
 26 | 
 27 | use booktool_wordimport\wordconverter;
 28 | use moodle_exception;
 29 | 
 30 | /**
 31 |  * Convert XHTML into XML and vice versa.
 32 |  *
 33 |  * Class to convert XHTML strings into Moodle Question XML (import), and convert Moodle Question XML into XHTML strings (export).
 34 |  */
 35 | class mqxmlconverter {
 36 |     /** @var string Stylesheet to export Moodle Question XML into XHTML */
 37 |     private $mqxml2xhtmlstylesheet = __DIR__ . "/mqxml2xhtml.xsl";
 38 | 
 39 |     /** @var string Stylesheet to import XHTML into question XML */
 40 |     private $xhtml2mqxmlstylesheet = __DIR__ . "/xhtml2mqxml.xsl";
 41 | 
 42 |     /**
 43 |      * Class constructor
 44 |      *
 45 |      * @param string $plugin Name of plugin module
 46 |      */
 47 |     public function __construct(string $plugin = 'qformat_wordtable') {
 48 |         global $CFG, $USER, $COURSE;
 49 | 
 50 |         // Set common parameters for all XSLT transformations.
 51 |         $this->xsltparameters = [
 52 |             'course_id' => $COURSE->id,
 53 |             'course_name' => $COURSE->fullname,
 54 |             'author_name' => $USER->firstname . ' ' . $USER->lastname,
 55 |             'moodle_country' => $USER->country,
 56 |             'moodle_language' => current_language(),
 57 |             'moodle_textdirection' => (right_to_left()) ? 'rtl' : 'ltr',
 58 |             'moodle_release' => $CFG->release, // Moodle version, e.g. 3.5, 3.10.
 59 |             'moodle_release_date' => substr($CFG->version, 0, 8), // The Moodle major version release date, for testing.
 60 |             'moodle_url' => $CFG->wwwroot . "/",
 61 |             'moodle_username' => $USER->username,
 62 |             'imagehandling' => 'embedded', // Question banks are embedded, Lessons are referenced.
 63 |             'heading1stylelevel' => 1, // Question banks are 1, Lessons should be overridden to 3.
 64 |             'pluginname' => $plugin,
 65 |             'debug_flag' => (debugging(null, DEBUG_DEVELOPER)) ? '1' : '0',
 66 |             ];
 67 |     }
 68 | 
 69 |     /**
 70 |      * Convert XHTML into Moodle Question XML.
 71 |      *
 72 |      * @param string $xhtmldata XHTML-formatted content
 73 |      * @param string $imagedata Base64-encoded images
 74 |      * @param array $parameters Extra XSLT parameters, if any
 75 |      * @return string Processed XML content
 76 |      */
 77 |     public function import(string $xhtmldata, string $imagedata, array $parameters = []) {
 78 |         global $CFG;
 79 | 
 80 |         // Set common parameters for all XSLT transformations. Note that the XSLT processor doesn't support $arguments.
 81 |         $this->xsltparameters = array_merge($this->xsltparameters, $parameters);
 82 | 
 83 |         // Check that the XSLT stylesheet exists.
 84 |         if (!file_exists($this->xhtml2mqxmlstylesheet)) {
 85 |             throw new \moodle_exception(get_string('stylesheetunavailable', 'qformat_wordtable', $this->xhtml2mqxmlstylesheet));
 86 |         }
 87 | 
 88 |         // Merge and wrap all the required input data into a single string to simplify XSLT processing.
 89 |         $xhtmldata = "<pass3Container>\n" . $xhtmldata .
 90 |             "<imagesContainer>\n" . $imagedata . "</imagesContainer>\n" .
 91 |             $this->get_question_labels() . "\n</pass3Container>";
 92 | 
 93 |         // Use the Book tool wordimport plugin to do the actual XSLT transformation.
 94 |         $word2xml = new wordconverter($this->xsltparameters['pluginname']);
 95 |         $mqxml = $word2xml->xsltransform($xhtmldata, $this->xhtml2mqxmlstylesheet);
 96 |         return $mqxml;
 97 |     }  // End import function.
 98 | 
 99 |     /**
100 |      * Export Moodle Question XML into Word-compatible XHTML
101 |      *
102 |      * This export function is for Question bank questions only, not for Lesson questions.
103 |      * It exports all questions in a category.
104 |      *
105 |      * @param string $mqxml Moodle Question XML
106 |      * @param string $imagehandling Embedded or encoded image data
107 |      * @return string XHTML text
108 |      */
109 |     public function export(string $mqxml, string $imagehandling = 'embedded') {
110 |         $this->xsltparameters['exportimagehandling'] = $imagehandling;
111 |         // Check that the XSLT stylesheet exists.
112 |         if (!file_exists($this->mqxml2xhtmlstylesheet)) {
113 |             throw new \moodle_exception(get_string('stylesheetunavailable', 'qformat_wordtable', $this->mqxml2xhtmlstylesheet));
114 |         }
115 | 
116 |         // Clean up the Question XML to ensure it is well-formed XML and won't break the XSLT processing.
117 |         $mqxml = $this->clean_all_questions($mqxml);
118 | 
119 |         // Merge and wrap all the required input data into a single string to simplify XSLT processing.
120 |         $moodlelabels = $this->get_question_labels();
121 |         $mqxml = "<container>\n<quiz>" . $mqxml . "</quiz>\n" . $moodlelabels . "\n</container>";
122 | 
123 |         // Use the Book tool wordimport plugin to do the actual XSLT transformation.
124 |         $word2xml = new wordconverter($this->xsltparameters['pluginname']);
125 |         $xhtmldata = $word2xml->xsltransform($mqxml, $this->mqxml2xhtmlstylesheet);
126 | 
127 |         // Embed the XHTML tables into a Word-compatible template document with styling information, etc.
128 |         $content = $word2xml->export($xhtmldata, $this->xsltparameters['pluginname'], $moodlelabels, 'embedded');
129 |         return $content;
130 |     }   // End export function.
131 | 
132 |     /**
133 |      * Convert Moodle Question XML into generic XHTML
134 |      *
135 |      * This function converts a single Lesson question into generic XHTML.
136 |      *
137 |      * @param string $mqxml Moodle Question XML
138 |      * @param string $imagehandling Embedded or encoded image data
139 |      * @return string XHTML text
140 |      */
141 |     public function convert_mqx2htm(string $mqxml, string $imagehandling = 'embedded') {
142 |         $this->xsltparameters['exportimagehandling'] = $imagehandling;
143 |         // Check that the XML to XHTML conversion XSLT stylesheet exists.
144 |         if (!file_exists($this->mqxml2xhtmlstylesheet)) {
145 |             throw new \moodle_exception(get_string('stylesheetunavailable', 'qformat_wordtable', $this->mqxml2xhtmlstylesheet));
146 |         }
147 | 
148 |         // Clean up the Question XML to ensure it is well-formed XML and won't break the XSLT processing.
149 |         $mqxml = $this->clean_all_questions($mqxml);
150 | 
151 |         // Merge and wrap all the required input data into a single string to simplify XSLT processing.
152 |         $moodlelabels = $this->get_core_question_labels();
153 |         $mqxml = "<container>\n<quiz>" . $mqxml . "</quiz>\n" . $moodlelabels . "\n</container>";
154 | 
155 |         // Use the Book tool wordimport plugin to do the actual XSLT transformation.
156 |         $word2xml = new wordconverter($this->xsltparameters['pluginname']);
157 |         $xhtmldata = $word2xml->xsltransform($mqxml, $this->mqxml2xhtmlstylesheet, $this->xsltparameters);
158 |         $matches = null;
159 |         if (preg_match('/<div[^>]*>(.+)<\/div>/is', $xhtmldata, $matches)) {
160 |             $xhtmldata = $matches[1];
161 |         }
162 |         return $xhtmldata;
163 |     }   // End convert_mqx2htm function.
164 | 
165 |     /**
166 |      * Convert a question in a generic XHTML table into Moodle Question XML
167 |      *
168 |      * This function converts a single XHTML question table into a question.
169 |      *
170 |      * @param string $xhtmltable Question table
171 |      * @param string $imagehandling Embedded or encoded image data
172 |      * @return string XHTML text
173 |      */
174 |     public function convert_htm2mqx(string $xhtmltable, string $imagehandling = 'referenced') {
175 |         $this->xsltparameters['imagehandling'] = $imagehandling;
176 |         // Check that the XML to XHTML conversion XSLT stylesheet exists.
177 |         if (!file_exists($this->xhtml2mqxmlstylesheet)) {
178 |             throw new \moodle_exception(get_string('stylesheetunavailable', 'qformat_wordtable', $this->xhtml2mqxmlstylesheet));
179 |         }
180 | 
181 |         // Merge and wrap all the required input data into a single string to simplify XSLT processing.
182 |         $moodlelabels = $this->get_core_question_labels();
183 |         $xhtmltable = "<pass3Container>\n" . $xhtmltable . "<imagesContainer></imagesContainer>\n" .
184 |                 $moodlelabels . "\n</pass3Container>";
185 | 
186 |         // Use the Book tool wordimport plugin to do the actual XSLT transformation.
187 |         $word2xml = new wordconverter($this->xsltparameters['pluginname']);
188 |         $mqxml = $word2xml->xsltransform($xhtmltable, $this->xhtml2mqxmlstylesheet, $this->xsltparameters);
189 |         return $mqxml;
190 |     }   // End convert_htm2mqx function.
191 | 
192 |     /**
193 |      * Get the core question text strings needed to fill in table labels
194 |      *
195 |      * A string containing XML data, populated from the language folders, is returned
196 |      *
197 |      * @return string
198 |      */
199 |     public function get_core_question_labels() {
200 |         global $CFG;
201 | 
202 |         // Release-independent list of all strings required in the XSLT stylesheets for labels etc.
203 |         $textstrings = [
204 |             'grades' => ['item'],
205 |             'moodle' => ['categoryname', 'no', 'yes', 'feedback', 'format', 'formathtml', 'formatmarkdown',
206 |                             'formatplain', 'formattext', 'gradenoun', 'question', 'tags'],
207 |             'qformat_wordtable' => ['cloze_instructions', 'cloze_distractor_column_label', 'cloze_feedback_column_label',
208 |                             'cloze_mcformat_label', 'description_instructions', 'essay_instructions',
209 |                             'interface_language_mismatch', 'multichoice_instructions', 'truefalse_instructions',
210 |                             'transformationfailed', 'unsupported_instructions'],
211 |             'qtype_description' => ['pluginnamesummary'],
212 |             'qtype_ddimageortext' => ['pluginnamesummary', 'bgimage', 'dropbackground', 'dropzoneheader',
213 |                     'draggableitem', 'infinite', 'label', 'shuffleimages', 'xleft', 'ytop'],
214 |             'qtype_ddmarker' => ['pluginnamesummary', 'bgimage', 'clearwrongparts', 'coords',
215 |                 'dropbackground', 'dropzoneheader', 'infinite', 'marker', 'noofdrags', 'shape_circle',
216 |                 'shape_polygon', 'shape_rectangle', 'shape', 'showmisplaced', 'stateincorrectlyplaced'],
217 |             'qtype_ddwtos' => ['pluginnamesummary', 'infinite'],
218 |             'qtype_essay' => ['acceptedfiletypes', 'allowattachments', 'attachmentsrequired', 'formatnoinline',
219 |                             'graderinfo', 'formateditor', 'formateditorfilepicker',
220 |                             'formatmonospaced', 'formatplain', 'pluginnamesummary', 'responsefieldlines', 'responseformat',
221 |                             'responseisrequired', 'responsenotrequired',
222 |                             'responserequired', 'responsetemplate', 'responsetemplate_help'],
223 |             'qtype_gapselect' => ['pluginnamesummary', 'errornoslots', 'group', 'shuffle'],
224 |             'qtype_match' => ['blanksforxmorequestions', 'filloutthreeqsandtwoas'],
225 |             'qtype_multichoice' => ['answernumbering', 'choiceno', 'correctfeedback', 'incorrectfeedback',
226 |                             'partiallycorrectfeedback', 'pluginnamesummary', 'shuffleanswers'],
227 |             'qtype_shortanswer' => ['casesensitive', 'filloutoneanswer'],
228 |             'qtype_truefalse' => ['false', 'true'],
229 |             'question' => ['addmorechoiceblanks', 'category', 'clearwrongparts', 'correctfeedbackdefault',
230 |                             'defaultmark', 'generalfeedback', 'hintn', 'hintnoptions', 'idnumber',
231 |                             'incorrectfeedbackdefault', 'partiallycorrectfeedbackdefault',
232 |                             'penaltyforeachincorrecttry', 'questioncategory', 'shownumpartscorrect',
233 |                             'shownumpartscorrectwhenfinished'],
234 |             'quiz' => ['answer', 'answers', 'casesensitive', 'correct', 'correctanswers',
235 |                             'defaultgrade', 'incorrect', 'shuffle'],
236 |             ];
237 | 
238 |         // Get the question type field labels, to populate table cell labels on export, recognise cell labels on import.
239 |         $questionlabels = "<moodlelabels>\n";
240 |         foreach ($textstrings as $typegroup => $grouparray) {
241 |             foreach ($grouparray as $stringid) {
242 |                 // Use 'grade' instead of 'gradenoun' in Moodle versions prior to 3.11.6.
243 |                 if ($CFG->version < 2021051706 && $stringid === 'gradenoun') {
244 |                     $labeltext = get_string('grade', 'moodle');
245 |                 } else {
246 |                     $labeltext = get_string($stringid, $typegroup);
247 |                 }
248 |                 $namestring = $typegroup . '_' . $stringid;
249 |                 $questionlabels .= '<data name="' . $namestring . '"><value>' . $labeltext . "</value></data>\n";
250 |             }
251 |         }
252 |         $questionlabels .= "</moodlelabels>";
253 | 
254 |         // Ensure the XML is well-formed, as the standard label and help text strings may have been overridden on some sites.
255 |         $word2xml = new wordconverter($this->xsltparameters['pluginname']);
256 |         $questionlabels = $word2xml->convert_to_xml($questionlabels);
257 |         $questionlabels = str_replace("<br>", "<br/>", $questionlabels);
258 | 
259 |         return $questionlabels;
260 |     }
261 | 
262 |     /**
263 |      * Get the core and contributed question text strings needed to fill in table labels
264 |      *
265 |      * A string containing XML data, populated from the language folders, is returned.
266 |      * We need to split core from contributed questions to support the Core questions in Lessons.
267 |      *
268 |      * @return string
269 |      */
270 |     private function get_question_labels() {
271 |         global $CFG;
272 | 
273 |         // Get the core question labels first.
274 |         $questionlabels = $this->get_core_question_labels();
275 | 
276 |         // Append All-or-Nothing MCQ question type strings if present.
277 |         if (\question_bank::is_qtype_installed('multichoiceset')) {
278 |             // Strip out the closing element first so that we can insert the extra labels.
279 |             $questionlabels = str_replace("</moodlelabels>", "", $questionlabels);
280 | 
281 |             $textstrings['qtype_multichoiceset'] = ['pluginnamesummary', 'showeachanswerfeedback'];
282 |             foreach ($textstrings as $typegroup => $grouparray) {
283 |                 foreach ($grouparray as $stringid) {
284 |                     $namestring = $typegroup . '_' . $stringid;
285 |                     // Get the question type field label text.
286 |                     $labeltext = get_string($stringid, $typegroup);
287 |                     $questionlabels .= '<data name="' . $namestring . '"><value>' . $labeltext . "</value></data>\n";
288 |                 }
289 |             }
290 |             $questionlabels .= "</moodlelabels>";
291 |         }
292 | 
293 |         // Ensure the XML is well-formed, as the standard label and help text strings may have been overridden on some sites.
294 |         $word2xml = new wordconverter($this->xsltparameters['pluginname']);
295 |         $questionlabels = $word2xml->convert_to_xml($questionlabels);
296 |         $questionlabels = str_replace("<br>", "<br/>", $questionlabels);
297 | 
298 |         return $questionlabels;
299 |     }
300 | 
301 |     /**
302 |      * Clean HTML markup inside question text element content
303 |      *
304 |      * A string containing Moodle Question XML with clean HTML inside the text elements is returned.
305 |      *
306 |      * @param string $questionxmlstring Question XML text
307 |      * @return string
308 |      */
309 |     private function clean_all_questions($questionxmlstring) {
310 |         // Start assembling the cleaned output string, starting with empty.
311 |         $cleanquestionxml = "";
312 |         $word2xml = new wordconverter($this->xsltparameters['pluginname']);
313 | 
314 |         // Split the string into questions in order to check the text fields for clean HTML.
315 |         $foundquestions = preg_match_all('~(.*?)<question type="([^"]*)"[^>]*>(.*?)</question>~s', $questionxmlstring,
316 |                             $questionmatches, PREG_SET_ORDER);
317 |         $numquestions = count($questionmatches);
318 |         if ($foundquestions === false || $foundquestions == 0) {
319 |             return $questionxmlstring;
320 |         }
321 | 
322 |         // Split the questions into text strings to check the HTML.
323 |         for ($i = 0; $i < $numquestions; $i++) {
324 |             $qtype = $questionmatches[$i][2];
325 |             $questioncontent = $questionmatches[$i][3];
326 |             // Split the question into chunks at CDATA boundaries, using ungreedy (?) and matching across newlines (s modifier).
327 |             $foundcdatasections = preg_match_all('~(.*?)<\!\[CDATA\[(.*?)\]\]>~s', $questioncontent, $cdatamatches, PREG_SET_ORDER);
328 |             if ($foundcdatasections === false) {
329 |                 $cleanquestionxml .= $questionmatches[$i][0];
330 |             } else if ($foundcdatasections != 0) {
331 |                 $numcdatasections = count($cdatamatches);
332 |                 // Found CDATA sections, so first add the question start tag and then process the body.
333 |                 $cleanquestionxml .= '<question type="' . $qtype . '">';
334 | 
335 |                 // Process content of each CDATA section to clean the HTML.
336 |                 for ($j = 0; $j < $numcdatasections; $j++) {
337 |                     $cleancdatacontent = $word2xml->clean_html_text($cdatamatches[$j][2]);
338 | 
339 |                     // Add all the text before the first CDATA start boundary, and the cleaned string, to the output string.
340 |                     $cleanquestionxml .= $cdatamatches[$j][1] . '<![CDATA[' . $cleancdatacontent . ']]>';
341 |                 } // End CDATA section loop.
342 | 
343 |                 // Add the text after the last CDATA section closing delimiter.
344 |                 $textafterlastcdata = substr($questionmatches[$i][0], strrpos($questionmatches[$i][0], "]]>") + 3);
345 |                 $cleanquestionxml .= $textafterlastcdata;
346 |             } else {
347 |                 $cleanquestionxml .= $questionmatches[$i][0];
348 |             }
349 |         } // End question element loop.
350 | 
351 |         return $cleanquestionxml;
352 |     }
353 | }
354 | 


--------------------------------------------------------------------------------
/classes/privacy/provider.php:
--------------------------------------------------------------------------------
 1 | <?php
 2 | // This file is part of Moodle - http://moodle.org/
 3 | //
 4 | // Moodle is free software: you can redistribute it and/or modify
 5 | // it under the terms of the GNU General Public License as published by
 6 | // the Free Software Foundation, either version 3 of the License, or
 7 | // (at your option) any later version.
 8 | //
 9 | // Moodle is distributed in the hope that it will be useful,
10 | // but WITHOUT ANY WARRANTY; without even the implied warranty of
11 | // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12 | // GNU General Public License for more details.
13 | //
14 | // You should have received a copy of the GNU General Public License
15 | // along with Moodle.  If not, see <http://www.gnu.org/licenses/>.
16 | 
17 | /**
18 |  * Privacy Subsystem implementation for qformat_wordtable.
19 |  *
20 |  * @package    qformat_wordtable
21 |  * @copyright  2018 Eoin Campbell
22 |  * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
23 |  */
24 | 
25 | namespace qformat_wordtable\privacy;
26 | 
27 | /**
28 |  * Privacy Subsystem for qformat_wordtable implementing null_provider.
29 |  *
30 |  * @copyright  2018 Eoin Campbell
31 |  * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
32 |  */
33 | class provider implements \core_privacy\local\metadata\null_provider {
34 | 
35 |     /**
36 |      * Get the language string identifier with the component's language
37 |      * file to explain why this plugin stores no data.
38 |      *
39 |      * @return  string
40 |      */
41 |     public static function get_reason(): string {
42 |         return 'privacy:metadata';
43 |     }
44 | }
45 | 


--------------------------------------------------------------------------------
/db/install.php:
--------------------------------------------------------------------------------
 1 | <?php
 2 | // This file is part of Moodle - http://moodle.org/
 3 | //
 4 | // Moodle is free software: you can redistribute it and/or modify
 5 | // it under the terms of the GNU General Public License as published by
 6 | // the Free Software Foundation, either version 3 of the License, or
 7 | // (at your option) any later version.
 8 | //
 9 | // Moodle is distributed in the hope that it will be useful,
10 | // but WITHOUT ANY WARRANTY; without even the implied warranty of
11 | // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12 | // GNU General Public License for more details.
13 | //
14 | // You should have received a copy of the GNU General Public License
15 | // along with Moodle.  If not, see <http://www.gnu.org/licenses/>.
16 | 
17 | /**
18 |  * Post-install script for manual graded question behaviour.
19 |  * @package   qformat_wordtable
20 |  * @copyright 2014 Eoin Campbell
21 |  * @license   http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
22 |  */
23 | 
24 | /**
25 |  * Post-install script
26 |  */
27 | function xmldb_qformat_wordtable_install() {
28 |     // Don't add anything to the plugins configuration table.
29 | }
30 | 


--------------------------------------------------------------------------------
/db/upgrade.php:
--------------------------------------------------------------------------------
 1 | <?php
 2 | // This file is part of Moodle - http://moodle.org/
 3 | //
 4 | // Moodle is free software: you can redistribute it and/or modify
 5 | // it under the terms of the GNU General Public License as published by
 6 | // the Free Software Foundation, either version 3 of the License, or
 7 | // (at your option) any later version.
 8 | //
 9 | // Moodle is distributed in the hope that it will be useful,
10 | // but WITHOUT ANY WARRANTY; without even the implied warranty of
11 | // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12 | // GNU General Public License for more details.
13 | //
14 | // You should have received a copy of the GNU General Public License
15 | // along with Moodle.  If not, see <http://www.gnu.org/licenses/>.
16 | 
17 | /**
18 |  * Short-answer question type upgrade code.
19 |  *
20 |  * @package    qformat_wordtable
21 |  * @copyright  2014 Eoin Campbell
22 |  * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
23 |  */
24 | 
25 | /**
26 |  * Upgrade code for the wordtable question format.
27 |  * @param int $oldversion the version we are upgrading from.
28 |  */
29 | function xmldb_qformat_wordtable_upgrade($oldversion) {
30 | 
31 |     if (get_config('converter_url', 'qformat_wordtable') !== false) {
32 |         unset_config('converter_url', 'qformat_wordtable');
33 |         unset_config('registration_url', 'qformat_wordtable');
34 |         unset_config('username', 'qformat_wordtable');
35 |         unset_config('password', 'qformat_wordtable');
36 |     }
37 | 
38 |     return true;
39 | }
40 | 


--------------------------------------------------------------------------------
/format.php:
--------------------------------------------------------------------------------
  1 | <?php
  2 | // This file is part of Moodle - http://moodle.org/
  3 | //
  4 | // Moodle is free software: you can redistribute it and/or modify
  5 | // it under the terms of the GNU General Public License as published by
  6 | // the Free Software Foundation, either version 3 of the License, or
  7 | // (at your option) any later version.
  8 | //
  9 | // Moodle is distributed in the hope that it will be useful,
 10 | // but WITHOUT ANY WARRANTY; without even the implied warranty of
 11 | // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 12 | // GNU General Public License for more details.
 13 | //
 14 | // You should have received a copy of the GNU General Public License
 15 | // along with Moodle.  If not, see <http://www.gnu.org/licenses/>.
 16 | 
 17 | /**
 18 |  * Convert Word tables into Moodle Question XML format
 19 |  *
 20 |  * The wordtable class inherits from the XML question import class, rather than the
 21 |  * default question format class, as this minimises code duplication.
 22 |  *
 23 |  * This code converts quiz questions between structured Word tables and Moodle
 24 |  * Question XML format.
 25 |  *
 26 |  * The export facility also converts questions into Word files using an XSLT script
 27 |  * and an XSLT processor. The Word files are really just XHTML files with some
 28 |  * extra markup to get Word to open them and apply styles and formatting properly.
 29 |  *
 30 |  * @package qformat_wordtable
 31 |  * @copyright 2010-2021 Eoin Campbell
 32 |  * @author Eoin Campbell
 33 |  * @license   http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later (5)
 34 |  */
 35 | 
 36 | defined('MOODLE_INTERNAL') || die();
 37 | 
 38 | require_once("$CFG->libdir/xmlize.php");
 39 | 
 40 | // Development: turn on all debug messages and strict warnings.
 41 | // The wordtable plugin just extends XML import/export.
 42 | require_once("$CFG->dirroot/question/format/xml/format.php");
 43 | 
 44 | // Include Book tool Word import plugin wordconverter class and utility functions.
 45 | use booktool_wordimport\wordconverter;
 46 | use qformat_wordtable\mqxmlconverter;
 47 | 
 48 | /**
 49 |  * Importer for Microsoft Word table question format.
 50 |  *
 51 |  * See {@link https://docs.moodle.org/en/Word_table_format} for a description of the format.
 52 |  *
 53 |  * @copyright 2010-2021 Eoin Campbell
 54 |  * @author Eoin Campbell
 55 |  * @license   http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later (5)
 56 |  */
 57 | class qformat_wordtable extends qformat_xml {
 58 |     /** @var array Overrides to default XSLT parameters used for conversion */
 59 |     private $xsltparameters = ['pluginname' => 'qformat_wordtable',
 60 |             'heading1stylelevel' => 1, // Map "Heading 1" style to <h1> element.
 61 |             'imagehandling' => 'embedded', // Embed image data directly into the generated Moodle Question XML.
 62 |         ];
 63 |     /** @var array Lesson questions are stored here if importing a lesson Word file. */
 64 |     private $lessonquestions = [];
 65 | 
 66 |     /**
 67 |      * Define required MIME-Type
 68 |      *
 69 |      * @return string MIME-Type
 70 |      */
 71 |     public function mime_type() {
 72 |         return 'application/vnd.openxmlformats-officedocument.wordprocessingml.document';
 73 |     }
 74 | 
 75 |     /**
 76 |      * Validate the given file.
 77 |      *
 78 |      * Check that the file has a .docx suffix, should also check it's in Zip file format.
 79 |      *
 80 |      * @param stored_file $file the file to check
 81 |      * @return string the error message that occurred while validating the given file
 82 |      */
 83 |     public function validate_file(stored_file $file): string {
 84 |         if (!preg_match('#\.docx$#i', $file->get_filename())) {
 85 |             return get_string('errorfilenamemustbedocx', 'qformat_wordtable');
 86 |         }
 87 |         return '';
 88 |     }
 89 | 
 90 |     // IMPORT FUNCTIONS START HERE.
 91 | 
 92 |     /**
 93 |      * Perform required pre-processing, i.e. convert Word file into Moodle Question XML
 94 |      *
 95 |      * Extract the WordProcessingML XML files from the .docx file, and use a sequence of XSLT
 96 |      * steps to convert it into Moodle Question XML
 97 |      *
 98 |      * @return bool Success
 99 |      */
100 |     public function importpreprocess() {
101 |         global $CFG;
102 |         $realfilename = "";
103 |         $filename = "";
104 | 
105 |         // Handle question imports in Lesson module by using mform, not the question/format.php qformat_default class.
106 |         if (property_exists('qformat_default', 'realfilename')) {
107 |             $realfilename = $this->realfilename;
108 |         } else {
109 |             global $mform;
110 |             $realfilename = $mform->get_new_filename('questionfile');
111 |         }
112 |         if (property_exists('qformat_default', 'filename')) {
113 |             $filename = $this->filename;
114 |         } else {
115 |             global $mform, $USER;
116 | 
117 |             if (property_exists('qformat_default', 'importcontext')) {
118 |                 // We have to check if this request is made from the lesson interface.
119 |                 $cm = get_coursemodule_from_id('lesson', $this->importcontext->instanceid);
120 |                 if ($cm) {
121 |                     $draftid = optional_param('questionfile', '', PARAM_FILE);
122 |                     $dir = make_temp_directory('forms');
123 |                     $tempfile = tempnam($dir, 'tempup_');
124 | 
125 |                     $fs = get_file_storage();
126 |                     $context = context_user::instance($USER->id);
127 |                     if (!$files = $fs->get_area_files($context->id, 'user', 'draft', $draftid, 'id DESC', false)) {
128 |                         throw new \moodle_exception(get_string('cannotwritetotempfile', 'qformat_wordtable', ''));
129 |                     }
130 |                     $file = reset($files);
131 | 
132 |                     $filename = $file->copy_content_to($tempfile);
133 |                     $filename = $tempfile;
134 |                 } else {
135 |                     $filename = "{$CFG->tempdir}/questionimport/{$realfilename}";
136 |                 }
137 |             } else {
138 |                 $filename = "{$CFG->tempdir}/questionimport/{$realfilename}";
139 |             }
140 |         }
141 |         $basefilename = basename($filename);
142 |         $baserealfilename = basename($realfilename);
143 | 
144 |         // Check that the file is in Word 2010 format, not HTML, XML, or Word 2003.
145 |         if ((substr($realfilename, -3, 3) == 'doc')) {
146 |             throw new \moodle_exception(get_string('docnotsupported', 'qformat_wordtable', $baserealfilename));
147 |             return false;
148 |         } else if ((substr($realfilename, -3, 3) == 'xml')) {
149 |             throw new \moodle_exception(get_string('xmlnotsupported', 'qformat_wordtable', $baserealfilename));
150 |             return false;
151 |         } else if ((stripos($realfilename, 'htm'))) {
152 |             throw new \moodle_exception(get_string('htmlnotsupported', 'qformat_wordtable', $baserealfilename));
153 |             return false;
154 |         } else if ((stripos(file_get_contents($filename, 0, null, 0, 100), 'html'))) {
155 |             throw new \moodle_exception(get_string('htmldocnotsupported', 'qformat_wordtable', $baserealfilename));
156 |             return false;
157 |         }
158 | 
159 |         // Import the Word file into XHTML and an array of images.
160 |         $imagesforzipping = [];
161 |         $word2xml = new wordconverter($this->xsltparameters['pluginname']);
162 |         $word2xml->set_heading1styleoffset($this->xsltparameters['heading1stylelevel']);
163 |         $word2xml->set_imagehandling($this->xsltparameters['imagehandling']);
164 |         $xhtmldata = $word2xml->import($filename, $imagesforzipping, true);
165 | 
166 |         // Convert the returned array of images, if any, into a string.
167 |         $imagestring = "";
168 |         foreach ($imagesforzipping as $imagename => $imagedata) {
169 |             $filetype = strtolower(pathinfo($imagename, PATHINFO_EXTENSION));
170 |             $base64data = base64_encode($imagedata);
171 |             $filedata = 'data:image/' . $filetype . ';base64,' . $base64data;
172 |             // Embed the image name and data into the HTML.
173 |             $imagestring .= '<img title="' . $imagename . '" src="' . $filedata . '"/>';
174 |         }
175 | 
176 |         // Convert XHTML into Moodle Question XML.
177 |         $xhtml2mqxml = new mqxmlconverter($this->xsltparameters['pluginname']);
178 |         $mqxmldata = $xhtml2mqxml->import($xhtmldata, $imagestring, $this->xsltparameters);
179 | 
180 |         if ((strpos($mqxmldata, "</question>") === false)) {
181 |             throw new \moodle_exception(get_string('noquestionsinfile', 'question'));
182 |         }
183 | 
184 |         // Now over-write the original Word file with the XML file, so that default XML file handling will work.
185 |         if (($fp = fopen($filename, "wb"))) {
186 |             if (($nbytes = fwrite($fp, $mqxmldata)) == 0) {
187 |                 throw new moodle_exception(get_string('cannotwritetotempfile', 'qformat_wordtable', $basefilename));
188 |             }
189 |             fclose($fp);
190 |         }
191 | 
192 |         // This part of the code is a copy of "readdata" function developed in format.php question/import.php
193 |         // and mod/lesson/import.php, to return the structure of the file.
194 |         // This patch is required because the lesson logic file uses its own file that it consumes in the form
195 |         // and does not do so like question import which shares a file at the class level.
196 |         if (is_readable($filename) && isset($cm)) {
197 |             $filearray = file($filename);
198 |             // Check for Macintosh OS line returns (ie file on one line), and fix.
199 |             if (preg_match("/\r/", $filearray[0]) && !preg_match("/\n/", $filearray[0])) {
200 |                 $this->lessonquestions = explode("\r", $filearray[0]);
201 |             } else {
202 |                 $this->lessonquestions = $filearray;
203 |             }
204 |         }
205 | 
206 |         return true;
207 |     }   // End importpreprocess function.
208 | 
209 |     // EXPORT FUNCTIONS START HERE.
210 | 
211 |     /**
212 |      * Use a .doc file extension when exporting, so that Word is used to open the file
213 |      * @return string file extension
214 |      */
215 |     public function export_file_extension() {
216 |         return ".doc";
217 |     }
218 | 
219 |     /**
220 |      * Convert the Moodle Question XML into Word-compatible XHTML format
221 |      * just prior to the file being saved
222 |      *
223 |      * Use an XSLT script to do the job, as it is much easier to implement this,
224 |      * and Moodle sites are guaranteed to have an XSLT processor available (I think).
225 |      *
226 |      * @param string $content Question XML text
227 |      * @return string Word-compatible XHTML text
228 |      */
229 |     public function presave_process($content) {
230 |         // Check that there are questions to convert.
231 |         if (strpos($content, "</question>") === false) {
232 |             throw new moodle_exception(get_string('noquestions', 'qformat_wordtable'));
233 |             return $content;
234 |         }
235 | 
236 |         // Convert the Moodle Question XML into Word-compatible XHTML.
237 |         $mqxml2xhtml = new mqxmlconverter($this->xsltparameters['pluginname']);
238 |         $xhtmldata = $mqxml2xhtml->export($content, $this->xsltparameters['pluginname'], $this->xsltparameters['imagehandling']);
239 |         return $xhtmldata;
240 |     }   // End presave_process function.
241 | 
242 |     /**
243 |      * Return content of all files containing questions as an array with one element for each file found,
244 |      * For each file, the corresponding element is an array of lines.
245 |      *
246 |      * @param string $filename name of file
247 |      * @return mixed array of content if successful, false on failure
248 |      */
249 |     public function readdata($filename) {
250 | 
251 |         if (property_exists('qformat_default', 'importcontext')) {
252 |             // We have to check if this request is made from the lesson interface.
253 |             $cm = get_coursemodule_from_id('lesson', $this->importcontext->instanceid);
254 |             if ($cm) {
255 |                 // Since we have already developed the logic of this file above, we only need to return the result.
256 |                 return $this->lessonquestions;
257 |             } else {
258 |                 // In case it is not a lesson request then we must return the core solution.
259 |                 return parent::readdata($filename);
260 |             }
261 |         } else {
262 |             // In case it is not a lesson request then we must return the core solution.
263 |             return parent::readdata($filename);
264 |         }
265 | 
266 |         return false;
267 |     }
268 | }
269 | 


--------------------------------------------------------------------------------
/lang/en/qformat_wordtable.php:
--------------------------------------------------------------------------------
 1 | <?php
 2 | // This file is part of Moodle - http://moodle.org/
 3 | //
 4 | // Moodle is free software: you can redistribute it and/or modify
 5 | // it under the terms of the GNU General Public License as published by
 6 | // the Free Software Foundation, either version 3 of the License, or
 7 | // (at your option) any later version.
 8 | //
 9 | // Moodle is distributed in the hope that it will be useful,
10 | // but WITHOUT ANY WARRANTY; without even the implied warranty of
11 | // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12 | // GNU General Public License for more details.
13 | //
14 | // You should have received a copy of the GNU General Public License
15 | // along with Moodle.  If not, see <http://www.gnu.org/licenses/>.
16 | 
17 | /**
18 |  * Strings for component 'qformat_wordtable', language 'en', branch 'MOODLE_20_STABLE'
19 |  *
20 |  * @package    qformat_wordtable
21 |  * @copyright  2010-2021 Eoin Campbell
22 |  * @author     Eoin Campbell
23 |  * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later (5)
24 |  */
25 | 
26 | // Strings used in format.php.
27 | 
28 | 
29 | $string['cannotopentempfile'] = 'Cannot open temporary file <b>{$a}</b>';
30 | $string['cannotreadzippedfile'] = 'Cannot read Zipped file <b>{$a}</b>';
31 | $string['cannotwritetotempfile'] = 'Cannot write to temporary file <b>{$a}</b>';
32 | $string['cloze_distractor_column_label'] = 'Distractors';
33 | $string['cloze_feedback_column_label'] = 'Distractor Feedback';
34 | $string['cloze_instructions'] = 'Use <strong>bold</strong> for Multichoice, <em>italic</em> for Short Answer, and <u>Underline</u> for Numerical questions.';
35 | $string['cloze_mcformat_label'] = 'Orientation (D = dropdown; V = vertical, H = horizontal radio buttons)';
36 | $string['description_instructions'] = 'This is not actually a question. Instead it is a way to add some instructions, rubric or other content to the activity. This is similar to the way that labels can be used to add content to the course page.';
37 | $string['docnotsupported'] = 'Files in Word 2003 format not supported: <b>{$a}</b>, use Moodle2Word 3.x instead';
38 | $string['essay_instructions'] = 'Allows a response of a few sentences or paragraphs. This must then be graded manually.';
39 | $string['htmldocnotsupported'] = 'Incorrect Word format: please use <i>File>Save As...</i> to save <b>{$a}</b> in native Word 2010 (.docx) format and import again';
40 | $string['htmlnotsupported'] = 'Files in HTML format not supported: <b>{$a}</b>';
41 | $string['interface_language_mismatch'] = 'No questions imported because the language of the labels in the Word file does not match your current Moodle interface language.';
42 | $string['multichoice_instructions'] = 'Allows the selection of a single or multiple responses from a pre-defined list.';
43 | $string['noquestions'] = 'No questions to export';
44 | $string['pluginname'] = 'Microsoft Word 2010 table format (wordtable)';
45 | $string['pluginname_help'] = 'This is a front-end for converting Microsoft Word 2010 files into Moodle Question XML format for import, and converting Moodle Question XML format into a format suitable for editing in Microsoft Word.';
46 | $string['pluginname_link'] = 'qformat/wordtable';
47 | $string['preview_question_not_found'] = 'Preview question not found, name / course ID: {$a}';
48 | $string['privacy:metadata'] = 'The WordTable question format plugin does not store any personal data.';
49 | $string['stylesheetunavailable'] = 'XSLT Stylesheet <b>{$a}</b> is not available';
50 | $string['transformationfailed'] = 'XSLT transformation failed (<b>{$a}</b>)';
51 | $string['truefalse_instructions'] = 'Set grade \'100\' to the correct answer.';
52 | $string['unsupported_instructions'] = 'Importing this question type is not supported.';
53 | $string['word_about_moodle2word'] = 'About Moodle2Word';
54 | $string['word_about_moodle2word_screentip'] = 'About the Moodle2Word Word templates and Moodle plug-in';
55 | $string['word_addcategory_supertip'] = 'Category names use the Heading 1 style';
56 | $string['word_currentquestion'] = ' (Current Question)';
57 | $string['word_gapselect_screentip'] = 'Warning: customised Select missing words Moodle plugin required for this question type.';
58 | $string['word_import'] = 'Import';
59 | $string['word_multiple_answer'] = 'Multiple answer';
60 | $string['word_new_question_file'] = 'New Question File';
61 | $string['word_new_question_file_screentip'] = 'Questions must be saved in Word 2010 (.docx) format';
62 | $string['word_new_question_file_supertip'] = 'Each Word file may contain multiple categories';
63 | $string['word_setunset_assessment_view'] = 'Set/Unset Assessment View';
64 | $string['word_showhide_assessment_screentip'] = 'Show question metadata to edit, hide to preview printed assessment';
65 | $string['word_showhide_assessment_supertip'] = 'Shows or hides the hidden text';
66 | $string['word_showhide_assessment_view'] = 'Show/Hide Assessment View';
67 | $string['word_shuffle_screentip'] = 'Shuffle the answers to MCQ/TF/MA questions';
68 | $string['word_shuffle_supertip'] = 'A few shuffles is better than 1';
69 | $string['word_view'] = 'View';
70 | $string['wordtable'] = 'Microsoft Word 2010 table format (wordtable)';
71 | $string['wordtable_help'] = 'This is a front-end for converting Microsoft Word 2010 files into Moodle Question XML format for import, and converting Moodle Question XML format into an enhanced XHTML format for exporting into a format suitable for editing in Microsoft Word.';
72 | $string['xmlnotsupported'] = 'Files in XML format not supported: <b>{$a}</b>';
73 | $string['xsltunavailable'] = 'You need the XSLT library installed in PHP to save this Word file';
74 | 


--------------------------------------------------------------------------------
/tests/qformat_wordtable_export_test.php:
--------------------------------------------------------------------------------
  1 | <?php
  2 | // This file is part of Moodle - http://moodle.org/
  3 | //
  4 | // Moodle is free software: you can redistribute it and/or modify
  5 | // it under the terms of the GNU General Public License as published by
  6 | // the Free Software Foundation, either version 3 of the License, or
  7 | // (at your option) any later version.
  8 | //
  9 | // Moodle is distributed in the hope that it will be useful,
 10 | // but WITHOUT ANY WARRANTY; without even the implied warranty of
 11 | // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 12 | // GNU General Public License for more details.
 13 | //
 14 | // You should have received a copy of the GNU General Public License
 15 | // along with Moodle.  If not, see <http://www.gnu.org/licenses/>.
 16 | 
 17 | /**
 18 |  * Unit tests for the Moodle WordTable format.
 19 |  *
 20 |  * @package    qformat_wordtable
 21 |  * @copyright  2016 Eoin Campbell
 22 |  * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
 23 |  */
 24 | 
 25 | 
 26 | defined('MOODLE_INTERNAL') || die();
 27 | 
 28 | global $CFG;
 29 | require_once($CFG->libdir . '/questionlib.php');
 30 | require_once($CFG->dirroot . '/question/format/xml/format.php');
 31 | require_once($CFG->dirroot . '/question/format/wordtable/format.php');
 32 | require_once($CFG->dirroot . '/question/engine/tests/helpers.php');
 33 | require_once($CFG->dirroot . '/question/format/xml/tests/xmlformat_test.php');
 34 | require_once($CFG->dirroot . '/tag/lib.php');
 35 | 
 36 | namespace qformat_wordtable
 37 | 
 38 | /**
 39 |  * Unit tests for exporting questions into Word (via XML).
 40 |  *
 41 |  * Each test has a question in XML format, which is converted to HTML using
 42 |  * the qformat_wordtable::presave_process method, and then compared to the expected output.
 43 |  * @copyright  2016 Eoin Campbell
 44 |  * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
 45 |  * @group qformat_wordtable
 46 |  */
 47 | final class qformat_wordtable_export_test extends question_testcase {
 48 | 
 49 |     /**
 50 |      * Test if the exported HTML output is the same as the expected HTML (ignoring newlines).
 51 |      *
 52 |      * @param string $expectedhtml as defined.
 53 |      * @param string $html as returned by presave_process.
 54 |      */
 55 |     public function assert_same_html($expectedhtml, $html): void {
 56 |         // Only test the question content, assuming a single question.
 57 |         $html = substr($html, strpos($html, '<h2 '));
 58 |         // Remove any non-breaking spaces, which are often used in empty cells.
 59 |         $html = str_replace("\xA0", "", $html);
 60 |         $expectedhtml = str_replace("\xA0", "", $expectedhtml);
 61 |         $html = str_replace("\r\n", "\n", $html);
 62 |         $expectedhtml = str_replace("\r\n", "\n", $expectedhtml);
 63 |         $this->assertEquals($expectedhtml, $html);
 64 |     }
 65 | 
 66 |     /**
 67 |      * Test if the exported HTML for a Description question matches the expected output.
 68 |      */
 69 |     public function test_export_description(): void {
 70 |         $descriptionxml = '<question type="description">
 71 |     <name>
 72 |       <text>A description</text>
 73 |     </name>
 74 |     <questiontext format="html">
 75 |       <text>The question text.</text>
 76 |     </questiontext>
 77 |     <generalfeedback format="html">
 78 |       <text>Here is some general feedback.</text>
 79 |     </generalfeedback>
 80 |     <defaultgrade>0</defaultgrade>
 81 |     <penalty>0</penalty>
 82 |     <hidden>0</hidden>
 83 |   </question>';
 84 | 
 85 |         $expectedhtml = '<h2 class="MsoHeading2">A description</h2><p class="MsoBodyText"/>' .
 86 |             '<div class="TableDiv">
 87 | <table border="1" dir="ltr"><thead>
 88 | <tr>
 89 | <td colspan="3" style="width: 12.0cm"><div class="chapter">The question text.</div></td>
 90 | <td style="width: 1.0cm"><p class="QFType">DE</p></td></tr>
 91 | 
 92 | <tr>
 93 | <td colspan="3" style="width: 12.0cm"><p class="TableRowHead" style="text-align: right">ID number:</p></td>
 94 | <td style="width: 1.0cm"><p class="QFID"></p></td></tr>
 95 | <tr>
 96 | <td style="width: 1.0cm"><p class="Cell"></p></td>
 97 | <td style="width: 5.0cm"><p class="TableHead"></p></td>
 98 | <td style="width: 6.0cm"><p class="TableHead"></p></td>
 99 | <td style="width: 1.0cm"><p class="TableHead"></p></td></tr>
100 | </thead><tbody>
101 | 
102 | <tr>
103 | <td style="width: 1.0cm"><p class="Cell"></p></td>
104 | <th style="width: 5.0cm"><p class="TableRowHead"><p class="TableRowHead">Tags:</p></p></th>
105 | <td style="width: 6.0cm"><p class="Cell"></p></td>
106 | <td style="width: 1.0cm"><p class="Cell"></p></td></tr>
107 | <tr>
108 | <td colspan="3" style="width: 12.0cm"><p class="Cell">' .
109 |         '<i>This is not actually a question. ' .
110 |         'Instead it is a way to add some instructions, rubric or other content to the activity. ' .
111 |         'This is similar to the way that labels can be used to add content to the course page.</i></p></td>
112 | <td style="width: 1.0cm"><p class="Cell"></p></td></tr>
113 | </tbody></table></div><p class="MsoNormal"></p>
114 | 
115 | </container>
116 |   </body>
117 | </html>
118 | ';
119 |         $this->resetAfterTest(true);
120 |         $this->setGuestUser();
121 |         $exporter = new qformat_wordtable();
122 |         $html = $exporter->presave_process($descriptionxml);
123 | 
124 |         $this->assert_same_html($expectedhtml, $html);
125 |     }
126 | 
127 | 
128 |     /**
129 |      * Test if the exported HTML for an Essay question matches the expected output.
130 |      */
131 |     public function test_export_essay29(): void {
132 |         $descriptionxml = '<question type="essay">
133 |     <name><text>Moodle 2.9 Essay Question</text></name>
134 |     <questiontext format="moodle_auto_format">
135 |       <text><![CDATA[<p>Essay question text.</p>]]></text>
136 |     </questiontext>
137 |     <generalfeedback format="moodle_auto_format">
138 |       <text><![CDATA[<p>General Feedback led the charge</p>]]></text>
139 |     </generalfeedback>
140 |     <defaultgrade>1.0000000</defaultgrade>
141 |     <penalty>0.0000000</penalty>
142 |     <hidden>0</hidden>
143 |     <responseformat>editor</responseformat>
144 |     <responsefieldlines>15</responsefieldlines>
145 |     <attachments>1</attachments>
146 |     <graderinfo format="moodle_auto_format">
147 |       <text>Grader information.</text>
148 |     </graderinfo>
149 |     <responsetemplate format="moodle_auto_format">
150 |       <text>Optional response template.</text>
151 |     </responsetemplate>
152 |   </question>';
153 | 
154 |         $expectedhtml = '<h2 class="MsoHeading2">Moodle 2.9 Essay Question</h2><p class="MsoBodyText"/>' .
155 |         '<div class="TableDiv">
156 | <table border="1" dir="ltr"><thead>
157 | <tr>
158 | <td colspan="3" style="width: 12.0cm"><div class="chapter"><p class="MsoBodyText">Essay question text.</p></div></td>
159 | <td style="width: 1.0cm"><p class="QFType">ES</p></td></tr>
160 | <tr>
161 | <td colspan="3" style="width: 12.0cm"><p class="TableRowHead" style="text-align: right">Default mark:</p></td>
162 | <td style="width: 1.0cm"><p class="Cell">1</p></td></tr>
163 | <tr>
164 | <td colspan="3" style="width: 12.0cm"><p class="TableRowHead" style="text-align: right">Response format:</p></td>
165 | <td style="width: 1.0cm"><p class="Cell">HTML editor</p></td></tr>
166 | <tr>
167 | <td colspan="3" style="width: 12.0cm"><p class="TableRowHead" style="text-align: right">Require text:</p></td>
168 | <td style="width: 1.0cm"><p class="Cell">Yes</p></td></tr><tr>
169 | <td colspan="3" style="width: 12.0cm"><p class="TableRowHead" style="text-align: right">Input box size:</p></td>
170 | <td style="width: 1.0cm"><p class="Cell">15</p></td></tr>
171 | <tr>
172 | <td colspan="3" style="width: 12.0cm"><p class="TableRowHead" style="text-align: right">Allow attachments:</p></td>
173 | <td style="width: 1.0cm"><p class="Cell">1</p></td></tr>
174 | 
175 | <tr>
176 | <td colspan="3" style="width: 12.0cm"><p class="TableRowHead" style="text-align: right">Require attachments:</p></td>
177 | <td style="width: 1.0cm"><p class="Cell">0</p></td></tr>
178 | <tr>
179 | <td colspan="3" style="width: 12.0cm"><p class="TableRowHead" style="text-align: right">Accepted file types:</p></td>
180 | <td style="width: 1.0cm"><p class="Cell"></p></td></tr>
181 | 
182 | <tr>
183 | <td colspan="3" style="width: 12.0cm"><p class="TableRowHead" style="text-align: right">ID number:</p></td>
184 | <td style="width: 1.0cm"><p class="QFID"></p></td></tr>
185 | <tr>
186 | <td style="width: 1.0cm"><p class="Cell"></p></td>
187 | <td style="width: 5.0cm"><p class="TableHead">Response template</p></td>
188 | <td style="width: 6.0cm"><p class="TableHead">Information for graders</p></td>
189 | <td style="width: 1.0cm"><p class="TableHead"></p></td></tr>
190 | </thead><tbody>
191 | <tr>
192 | <td style="width: 1.0cm"><p class="Cell"></p></td>
193 | <td style="width: 5.0cm"><div class="chapter"><p class="Cell">Optional response template.</p></div></td>
194 | <td style="width: 6.0cm"><div class="chapter"><p class="Cell">Grader information.</p></div></td>
195 | <td style="width: 1.0cm"><p class="Cell"></p></td></tr>
196 | <tr>
197 | <td style="width: 1.0cm"><p class="Cell"></p></td>
198 | <th style="width: 5.0cm"><p class="TableRowHead"><p class="TableRowHead">General feedback:</p></p></th>
199 | <td style="width: 6.0cm"><div class="chapter"><p class="MsoBodyText">General Feedback led the charge</p></div></td>
200 | <td style="width: 1.0cm"><p class="Cell"></p></td></tr>
201 | <tr>
202 | <td style="width: 1.0cm"><p class="Cell"></p></td>
203 | <th style="width: 5.0cm"><p class="TableRowHead"><p class="TableRowHead">Tags:</p></p></th>
204 | <td style="width: 6.0cm"><p class="Cell"></p></td>
205 | <td style="width: 1.0cm"><p class="Cell"></p></td></tr>
206 | <tr>
207 | <td colspan="3" style="width: 12.0cm"><p class="Cell"><i>Allows a response of a file upload and/or online text. This must then be graded manually.</i></p></td>
208 | <td style="width: 1.0cm"><p class="Cell"></p></td></tr>
209 | </tbody></table></div><p class="MsoNormal"></p>
210 | 
211 | </container>
212 |   </body>
213 | </html>
214 | ';
215 |         $this->resetAfterTest(true);
216 |         $this->setGuestUser();
217 |         $exporter = new qformat_wordtable();
218 |         $html = $exporter->presave_process($descriptionxml);
219 | 
220 |         $this->assert_same_html($expectedhtml, $html);
221 |     }
222 | }
223 | 


--------------------------------------------------------------------------------
/version.php:
--------------------------------------------------------------------------------
 1 | <?php
 2 | // This file is part of Moodle - http://moodle.org/
 3 | //
 4 | // Moodle is free software: you can redistribute it and/or modify
 5 | // it under the terms of the GNU General Public License as published by
 6 | // the Free Software Foundation, either version 3 of the License, or
 7 | // (at your option) any later version.
 8 | //
 9 | // Moodle is distributed in the hope that it will be useful,
10 | // but WITHOUT ANY WARRANTY; without even the implied warranty of
11 | // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12 | // GNU General Public License for more details.
13 | //
14 | // You should have received a copy of the GNU General Public License
15 | // along with Moodle.  If not, see <http://www.gnu.org/licenses/>.
16 | 
17 | /**
18 |  * Word table question import format
19 |  *
20 |  * This fragment is called by moodle_needs_upgrading() and /admin/index.php
21 |  *
22 |  * @package    qformat_wordtable
23 |  * @copyright  2010-2021 Eoin Campbell
24 |  * @author     Eoin Campbell
25 |  * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later (5)
26 |  **/
27 | 
28 | 
29 | defined('MOODLE_INTERNAL') || die();
30 | 
31 | $plugin->version   = 2025042400;            // The current plugin version (Date: YYYYMMDDXX).
32 | $plugin->maturity  = MATURITY_STABLE;       // Maturity level.
33 | $plugin->component  = 'qformat_wordtable';  // Plugin name.
34 | $plugin->release  = '3.9.7 (Build: 2025042400)';  // The current module release in human-readable form (x.y).
35 | $plugin->requires = 2023041800;             // Requires Moodle 4.2 or higher.
36 | $plugin->dependencies = ['booktool_wordimport' => 2020061500];
37 | 


--------------------------------------------------------------------------------