/** * Invoke method, every class will have its own * returns true/false on completion, setting both * errormsg and output as necessary */ function invoke() { parent::invoke(); $result = true; // Set own core attributes $this->does_generate = ACTION_NONE; //$this->does_generate = ACTION_GENERATE_HTML; // These are always here global $CFG, $XMLDB; // Do the job, setting result as needed // Get the dir containing the file $dirpath = required_param('dir', PARAM_PATH); $dirpath = $CFG->dirroot . $dirpath; // Get the correct dirs if (!empty($XMLDB->dbdirs)) { $dbdir =& $XMLDB->dbdirs[$dirpath]; } else { return false; } if (!empty($XMLDB->editeddirs)) { $editeddir =& $XMLDB->editeddirs[$dirpath]; $structure =& $editeddir->xml_file->getStructure(); } // If the changeme table exists, just get it and continue $changeme_exists = false; if ($tables =& $structure->getTables()) { if ($table =& $structure->getTable('changeme')) { $changeme_exists = true; } } if (!$changeme_exists) { // Lets create the table $field = new xmldb_field('id'); $field->setType(XMLDB_TYPE_INTEGER); $field->setLength(10); $field->setNotNull(true); $field->setUnsigned(true); $field->setSequence(true); $field->setLoaded(true); $field->setChanged(true); $key = new xmldb_key('primary'); $key->setType(XMLDB_KEY_PRIMARY); $key->setFields(array('id')); $key->setLoaded(true); $key->setChanged(true); $table = new xmldb_table('changeme'); $table->setComment('Default comment for the table, please edit me'); $table->addField($field); $table->addKey($key); // Finally, add the whole retrofitted table to the structure // in the place specified $structure->addTable($table); } // Launch postaction if exists (leave this here!) if ($this->getPostAction() && $result) { return $this->launch($this->getPostAction()); } // Return ok if arrived here return $result; }
/** * Invoke method, every class will have its own * returns true/false on completion, setting both * errormsg and output as necessary */ function invoke() { parent::invoke(); $result = true; /// Set own core attributes $this->does_generate = ACTION_NONE; //$this->does_generate = ACTION_GENERATE_HTML; /// These are always here global $CFG, $XMLDB; /// Do the job, setting result as needed if (!data_submitted()) { ///Basic prevention print_error('wrongcall', 'error'); } /// Get parameters $dirpath = required_param('dir', PARAM_PATH); $dirpath = $CFG->dirroot . $dirpath; $tableparam = strtolower(required_param('table', PARAM_PATH)); $fieldparam = strtolower(required_param('field', PARAM_PATH)); $name = substr(trim(strtolower(optional_param('name', $fieldparam, PARAM_PATH))), 0, 30); $comment = required_param('comment', PARAM_CLEAN); $comment = trim($comment); $type = required_param('type', PARAM_INT); $length = strtolower(optional_param('length', NULL, PARAM_ALPHANUM)); $decimals = optional_param('decimals', NULL, PARAM_INT); $unsigned = optional_param('unsigned', false, PARAM_BOOL); $notnull = optional_param('notnull', false, PARAM_BOOL); $sequence = optional_param('sequence', false, PARAM_BOOL); $default = optional_param('default', NULL, PARAM_PATH); $default = trim($default); $editeddir =& $XMLDB->editeddirs[$dirpath]; $structure =& $editeddir->xml_file->getStructure(); $table =& $structure->getTable($tableparam); $field =& $table->getField($fieldparam); $oldhash = $field->getHash(); $errors = array(); /// To store all the errors found /// Perform some automatic asumptions if ($sequence) { $unsigned = true; $notnull = true; $default = NULL; } if ($type != XMLDB_TYPE_NUMBER && $type != XMLDB_TYPE_FLOAT) { $decimals = NULL; } if ($type == XMLDB_TYPE_BINARY) { $default = NULL; } if ($default === '') { $default = NULL; } /// Perform some checks /// Check empty name if (empty($name)) { $errors[] = $this->str['fieldnameempty']; } /// Check incorrect name if ($name == 'changeme') { $errors[] = $this->str['incorrectfieldname']; } /// Check duplicate name if ($fieldparam != $name && $table->getField($name)) { $errors[] = $this->str['duplicatefieldname']; } /// Integer checks if ($type == XMLDB_TYPE_INTEGER) { if (!(is_numeric($length) && !empty($length) && intval($length) == floatval($length) && $length > 0 && $length <= 20)) { $errors[] = $this->str['integerincorrectlength']; } if (!(empty($default) || is_numeric($default) && !empty($default) && intval($default) == floatval($default))) { $errors[] = $this->str['defaultincorrect']; } } /// Number checks if ($type == XMLDB_TYPE_NUMBER) { if (!(is_numeric($length) && !empty($length) && intval($length) == floatval($length) && $length > 0 && $length <= 20)) { $errors[] = $this->str['numberincorrectlength']; } if (!(empty($decimals) || is_numeric($decimals) && !empty($decimals) && intval($decimals) == floatval($decimals) && $decimals >= 0 && $decimals < $length)) { $errors[] = $this->str['numberincorrectdecimals']; } if (!(empty($default) || is_numeric($default) && !empty($default))) { $errors[] = $this->str['defaultincorrect']; } } /// Float checks if ($type == XMLDB_TYPE_FLOAT) { if (!(empty($length) || is_numeric($length) && !empty($length) && intval($length) == floatval($length) && $length > 0 && $length <= 20)) { $errors[] = $this->str['floatincorrectlength']; } if (!(empty($decimals) || is_numeric($decimals) && !empty($decimals) && intval($decimals) == floatval($decimals) && $decimals >= 0 && $decimals < $length)) { $errors[] = $this->str['floatincorrectdecimals']; } if (!(empty($default) || is_numeric($default) && !empty($default))) { $errors[] = $this->str['defaultincorrect']; } } /// Char checks if ($type == XMLDB_TYPE_CHAR) { if (!(is_numeric($length) && !empty($length) && intval($length) == floatval($length) && $length > 0 && $length <= 255)) { $errors[] = $this->str['charincorrectlength']; } if ($default !== NULL && $default !== '') { if (substr($default, 0, 1) == "'" || substr($default, -1, 1) == "'") { $errors[] = $this->str['defaultincorrect']; } } } /// Text checks if ($type == XMLDB_TYPE_TEXT) { if ($length != 'small' && $length != 'medium' && $length != 'big') { $errors[] = $this->str['textincorrectlength']; } if ($default !== NULL && $default !== '') { if (substr($default, 0, 1) == "'" || substr($default, -1, 1) == "'") { $errors[] = $this->str['defaultincorrect']; } } } /// Binary checks if ($type == XMLDB_TYPE_BINARY) { if ($length != 'small' && $length != 'medium' && $length != 'big') { $errors[] = $this->str['binaryincorrectlength']; } } if (!empty($errors)) { $tempfield = new xmldb_field($name); $tempfield->setType($type); $tempfield->setLength($length); $tempfield->setDecimals($decimals); $tempfield->setUnsigned($unsigned); $tempfield->setNotNull($notnull); $tempfield->setSequence($sequence); $tempfield->setDefault($default); /// Prepare the output $site = get_site(); $navlinks = array(); $navlinks[] = array('name' => $this->str['administration'], 'link' => '../index.php', 'type' => 'misc'); $navlinks[] = array('name' => 'XMLDB', 'link' => 'index.php', 'type' => 'misc'); $navigation = build_navigation($navlinks); print_header("{$site->shortname}: XMLDB", "{$site->fullname}", $navigation); notice('<p>' . implode(', ', $errors) . '</p> <p>' . $tempfield->readableInfo() . '</p>', 'index.php?action=edit_field&field=' . $field->getName() . '&table=' . $table->getName() . '&dir=' . urlencode(str_replace($CFG->dirroot, '', $dirpath))); die; /// re-die :-P } /// Continue if we aren't under errors if (empty($errors)) { /// If there is one name change, do it, changing the prev and next /// atributes of the adjacent fields if ($fieldparam != $name) { $field->setName($name); if ($field->getPrevious()) { $prev =& $table->getField($field->getPrevious()); $prev->setNext($name); $prev->setChanged(true); } if ($field->getNext()) { $next =& $table->getField($field->getNext()); $next->setPrevious($name); $next->setChanged(true); } } /// Set comment $field->setComment($comment); /// Set the rest of fields $field->setType($type); $field->setLength($length); $field->setDecimals($decimals); $field->setUnsigned($unsigned); $field->setNotNull($notnull); $field->setSequence($sequence); $field->setDefault($default); /// If the hash has changed from the old one, change the version /// and mark the structure as changed $field->calculateHash(true); if ($oldhash != $field->getHash()) { $field->setChanged(true); $table->setChanged(true); /// Recalculate the structure hash $structure->calculateHash(true); $structure->setVersion(userdate(time(), '%Y%m%d', 99, false)); /// Mark as changed $structure->setChanged(true); } /// Launch postaction if exists (leave this here!) if ($this->getPostAction() && $result) { return $this->launch($this->getPostAction()); } } /// Return ok if arrived here return $result; }
function xmldb_questionnaire_upgrade($oldversion = 0) { global $CFG, $DB; $dbman = $DB->get_manager(); // Loads ddl manager and xmldb classes. $result = true; if ($oldversion < 2007120101) { $result &= questionnaire_upgrade_2007120101(); // Questionnaire savepoint reached. upgrade_mod_savepoint(true, 2007120101, 'questionnaire'); } if ($oldversion < 2007120102) { // Change enum values to lower case for all tables using them. $enumvals = array('y', 'n'); $table = new xmldb_table('questionnaire_question'); $field = new xmldb_field('required'); $field->set_attributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, false, null, 'n'); $dbman->change_field_enum($table, $field); $DB->set_field('questionnaire_question', 'required', 'y', array('required' => 'Y')); $DB->set_field('questionnaire_question', 'required', 'n', array('required' => 'N')); $field->set_attributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, XMLDB_ENUM, array('y', 'n'), 'n'); $dbman->change_field_enum($table, $field); $dbman->change_field_default($table, $field); unset($field); $field = new xmldb_field('deleted'); $field->set_attributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, false, null, 'n'); $dbman->change_field_enum($table, $field); $DB->set_field('questionnaire_question', 'deleted', 'y', array('deleted' => 'Y')); $DB->set_field('questionnaire_question', 'deleted', 'n', array('deleted' => 'N')); $field->set_attributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, XMLDB_ENUM, array('y', 'n'), 'n'); $dbman->change_field_enum($table, $field); $dbman->change_field_default($table, $field); unset($field); $field = new xmldb_field('public'); $field->set_attributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, false, null, 'n'); $dbman->change_field_enum($table, $field); $DB->set_field('questionnaire_question', 'public', 'y', array('public' => 'Y')); $DB->set_field('questionnaire_question', 'public', 'n', array('public' => 'N')); $field->set_attributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, XMLDB_ENUM, array('y', 'n'), 'y'); $dbman->change_field_enum($table, $field); $dbman->change_field_default($table, $field); unset($field); unset($table); $table = new xmldb_table('questionnaire_question_type'); $field = new xmldb_field('has_choices'); $field->set_attributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, false, null, 'n'); $dbman->change_field_enum($table, $field); $DB->set_field('questionnaire_question_type', 'has_choices', 'y', array('has_choices' => 'Y')); $DB->set_field('questionnaire_question_type', 'has_choices', 'n', array('has_choices' => 'N')); $field->set_attributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, XMLDB_ENUM, array('y', 'n'), 'y'); $dbman->change_field_enum($table, $field); $dbman->change_field_default($table, $field); unset($field); unset($table); $table = new xmldb_table('questionnaire_response'); $field = new xmldb_field('complete'); $field->set_attributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, false, null, 'n'); $dbman->change_field_enum($table, $field); $DB->set_field('questionnaire_response', 'complete', 'y', array('complete' => 'Y')); $DB->set_field('questionnaire_response', 'complete', 'n', array('complete' => 'N')); $field->set_attributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, XMLDB_ENUM, array('y', 'n'), 'n'); $dbman->change_field_enum($table, $field); $dbman->change_field_default($table, $field); unset($field); unset($table); $table = new xmldb_table('questionnaire_response_bool'); $field = new xmldb_field('choice_id'); $field->set_attributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, false, null, 'n'); $dbman->change_field_enum($table, $field); $DB->set_field('questionnaire_response_bool', 'choice_id', 'y', array('choice_id' => 'Y')); $DB->set_field('questionnaire_response_bool', 'choice_id', 'n', array('choice_id' => 'N')); $field->set_attributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, XMLDB_ENUM, array('y', 'n'), 'y'); $dbman->change_field_enum($table, $field); $dbman->change_field_default($table, $field); unset($field); unset($table); $table = new xmldb_table('questionnaire_survey'); $field = new xmldb_field('public'); $field->set_attributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, false, null, 'n'); $dbman->change_field_enum($table, $field); $DB->set_field('questionnaire_survey', 'public', 'y', array('public' => 'Y')); $DB->set_field('questionnaire_survey', 'public', 'n', array('public' => 'N')); $field->set_attributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, XMLDB_ENUM, array('y', 'n'), 'y'); $dbman->change_field_enum($table, $field); $dbman->change_field_default($table, $field); unset($field); // Upgrade question_type table with corrected 'response_table' fields. $DB->set_field('questionnaire_question_type', 'response_table', 'resp_single', array('response_table' => 'response_single')); $DB->set_field('questionnaire_question_type', 'response_table', 'resp_multiple', array('response_table' => 'response_multiple')); // Questionnaire savepoint reached.. upgrade_mod_savepoint(true, 2007120102, 'questionnaire'); } if ($oldversion < 2008031902) { $table = new xmldb_table('questionnaire'); $field = new xmldb_field('grade'); $field->set_attributes(XMLDB_TYPE_INTEGER, '10', false, true, false, false, null, 0, 'navigate'); $dbman->add_field($table, $field); unset($field); unset($table); $table = new xmldb_table('questionnaire_response'); $field = new xmldb_field('grade'); $field->set_attributes(XMLDB_TYPE_INTEGER, '10', false, true, false, false, null, 0, 'complete'); $dbman->add_field($table, $field); // Questionnaire savepoint reached. upgrade_mod_savepoint(true, 2008031902, 'questionnaire'); } if ($oldversion < 2008031904) { $sql = "SELECT q.id, q.resp_eligible, q.resp_view, cm.id as cmid\n FROM {questionnaire} q, {course_modules} cm, {modules} m\n WHERE m.name='questionnaire' AND m.id=cm.module AND cm.instance=q.id"; if ($rs = $DB->get_recordset_sql($sql)) { $studentroleid = $DB->get_field('role', 'id', array('shortname' => 'student')); $editteacherroleid = $DB->get_field('role', 'id', array('shortname' => 'editingteacher')); $teacherroleid = $DB->get_field('role', 'id', array('shortname' => 'teacher')); $capview = 'mod/questionnaire:view'; $capsubmit = 'mod/questionnaire:submit'; foreach ($rs as $questionnaire) { $context = get_context_instance(CONTEXT_MODULE, $questionnaire->cmid); // Convert questionnaires with resp_eligible = 'all' so that students & teachers have view and submit. if ($questionnaire->resp_eligible == 'all') { assign_capability($capsubmit, CAP_ALLOW, $editteacherroleid, $context->id, true); assign_capability($capsubmit, CAP_ALLOW, $teacherroleid, $context->id, true); // Convert questionnaires with resp_eligible = 'students' so that just students have view and submit. } else { if ($questionnaire->resp_eligible == 'teachers') { assign_capability($capsubmit, CAP_ALLOW, $editteacherroleid, $context->id, true); assign_capability($capsubmit, CAP_ALLOW, $teacherroleid, $context->id, true); assign_capability($capview, CAP_PREVENT, $studentroleid, $context->id, true); assign_capability($capsubmit, CAP_PREVENT, $studentroleid, $context->id, true); } } } $rs->close(); } // Questionnaire savepoint reached. upgrade_mod_savepoint(true, 2008031904, 'questionnaire'); } if ($oldversion < 2008031905) { $table = new xmldb_table('questionnaire_survey'); $field = new xmldb_field('changed'); $dbman->drop_field($table, $field); // Questionnaire savepoint reached. upgrade_mod_savepoint(true, 2008031905, 'questionnaire'); } if ($oldversion < 2008031906) { $table = new xmldb_table('questionnaire_response_rank'); $field = new xmldb_field('rank'); $field->set_attributes(XMLDB_TYPE_INTEGER, '11', null, XMLDB_NOTNULL, null, null, null, '0', 'choice_id'); $field->setUnsigned(false); $dbman->change_field_unsigned($table, $field); // Questionnaire savepoint reached. upgrade_mod_savepoint(true, 2008031906, 'questionnaire'); } if ($oldversion < 2008060401) { $table = new xmldb_table('questionnaire_question'); $field = new xmldb_field('name'); $field->set_attributes(XMLDB_TYPE_CHAR, '30', null, XMLDB_NOTNULL, null, null, null, null, 'survey_id'); $field->setNotnull(false); $dbman->change_field_notnull($table, $field); // Questionnaire savepoint reached. upgrade_mod_savepoint(true, 2008060401, 'questionnaire'); } if ($oldversion < 2008070702) { $table = new xmldb_table('questionnaire_question_type'); $field = new xmldb_field('response_table'); $field->set_attributes(XMLDB_TYPE_CHAR, '32', null, XMLDB_NOTNULL, null, null, null, null, 'has_choices'); $field->setNotnull(false); $dbman->change_field_notnull($table, $field); // Questionnaire savepoint reached. upgrade_mod_savepoint(true, 2008070702, 'questionnaire'); } if ($oldversion < 2008070703) { $table = new xmldb_table('questionnaire_resp_multiple'); $index = new xmldb_index('response_question'); $index->set_attributes(XMLDB_INDEX_NOTUNIQUE, array('response_id', 'question_id', 'choice_id')); if (!$dbman->index_exists($table, $index)) { $dbman->add_index($table, $index); } // Questionnaire savepoint reached. upgrade_mod_savepoint(true, 2008070703, 'questionnaire'); } if ($oldversion < 2008070704) { // CONTRIB-1542. $table = new xmldb_table('questionnaire_survey'); $field = new xmldb_field('email'); $field->set_attributes(XMLDB_TYPE_CHAR, '64', null, XMLDB_NOTNULL, null, null, null, null, 'title'); $field->setLength('255'); $dbman->change_field_precision($table, $field); // Questionnaire savepoint reached. upgrade_mod_savepoint(true, 2008070704, 'questionnaire'); } if ($oldversion < 2008070705) { // Rename summary field to 'intro' to adhere to new Moodle standard. $table = new xmldb_table('questionnaire'); $field = new xmldb_field('summary'); $field->set_attributes(XMLDB_TYPE_TEXT, 'small', null, XMLDB_NOTNULL, null, null, null, null, 'name'); $dbman->rename_field($table, $field, 'intro'); // Add 'introformat' to adhere to new Moodle standard. $field = new xmldb_field('introformat', XMLDB_TYPE_INTEGER, '4', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, '0', 'intro'); $dbman->add_field($table, $field); // Set all existing records to HTML format. $DB->set_field('questionnaire', 'introformat', 1); // Questionnaire savepoint reached. upgrade_mod_savepoint(true, 2008070705, 'questionnaire'); } if ($oldversion < 2008070706) { // CONTRIB-1153. $table = new xmldb_table('questionnaire_survey'); $field = new xmldb_field('public'); if ($dbman->field_exists($table, $field)) { $dbman->drop_field($table, $field); } $table = new xmldb_table('questionnaire_question'); $field = new xmldb_field('public'); if ($dbman->field_exists($table, $field)) { $dbman->drop_field($table, $field); } // Questionnaire savepoint reached. upgrade_mod_savepoint(true, 2008070706, 'questionnaire'); } if ($oldversion < 2010110100) { // Drop list of values (enum) from field has_choices on table questionnaire_question_type. $table = new xmldb_table('questionnaire_question_type'); $field = new xmldb_field('has_choices', XMLDB_TYPE_CHAR, '1', null, XMLDB_NOTNULL, null, 'y', 'type'); // Launch drop of list of values from field has_choices. $dbman->drop_enum_from_field($table, $field); // Questionnaire savepoint reached. upgrade_mod_savepoint(true, 2010110100, 'questionnaire'); } if ($oldversion < 2010110101) { // Drop list of values (enum) from field respondenttype on table questionnaire. $table = new xmldb_table('questionnaire'); $field = new xmldb_field('respondenttype', XMLDB_TYPE_CHAR, '9', null, XMLDB_NOTNULL, null, 'fullname', 'qtype'); // Launch drop of list of values from field respondenttype. $dbman->drop_enum_from_field($table, $field); // Drop list of values (enum) from field resp_eligible on table questionnaire. $field = new xmldb_field('resp_eligible', XMLDB_TYPE_CHAR, '8', null, XMLDB_NOTNULL, null, 'all', 'respondenttype'); // Launch drop of list of values from field resp_eligible. $dbman->drop_enum_from_field($table, $field); // Drop list of values (enum) from field required on table questionnaire_question. $table = new xmldb_table('questionnaire_question'); $field = new xmldb_field('required', XMLDB_TYPE_CHAR, '1', null, XMLDB_NOTNULL, null, 'n', 'content'); // Launch drop of list of values from field required. $dbman->drop_enum_from_field($table, $field); // Drop list of values (enum) from field deleted on table questionnaire_question. $field = new xmldb_field('deleted', XMLDB_TYPE_CHAR, '1', null, XMLDB_NOTNULL, null, 'n', 'required'); // Launch drop of list of values from field deleted. $dbman->drop_enum_from_field($table, $field); // Drop list of values (enum) from field complete on table questionnaire_response. $table = new xmldb_table('questionnaire_response'); $field = new xmldb_field('complete', XMLDB_TYPE_CHAR, '1', null, XMLDB_NOTNULL, null, 'n', 'submitted'); // Launch drop of list of values from field complete. $dbman->drop_enum_from_field($table, $field); // Drop list of values (enum) from field choice_id on table questionnaire_response_bool. $table = new xmldb_table('questionnaire_response_bool'); $field = new xmldb_field('choice_id', XMLDB_TYPE_CHAR, '1', null, XMLDB_NOTNULL, null, 'y', 'question_id'); // Launch drop of list of values from field choice_id. $dbman->drop_enum_from_field($table, $field); // Questionnaire savepoint reached. upgrade_mod_savepoint(true, 2010110101, 'questionnaire'); } if ($oldversion < 2012100800) { // Changing precision of field name on table questionnaire_survey to (255). // First drop the index. $table = new xmldb_table('questionnaire_survey'); $index = new xmldb_index('name'); $index->set_attributes(XMLDB_INDEX_NOTUNIQUE, array('name')); $dbman->drop_index($table, $index); // Launch change of precision for field name. $field = new xmldb_field('name', XMLDB_TYPE_CHAR, '255', null, XMLDB_NOTNULL, null, null, 'id'); $dbman->change_field_precision($table, $field); // Add back in the index. $table = new xmldb_table('questionnaire_survey'); $index = new xmldb_index('name'); $index->set_attributes(XMLDB_INDEX_NOTUNIQUE, array('name')); $dbman->add_index($table, $index); // Questionnaire savepoint reached. upgrade_mod_savepoint(true, 2012100800, 'questionnaire'); } if ($oldversion < 2013062302) { // Adding completionsubmit field to table questionnaire. $table = new xmldb_table('questionnaire'); $field = new xmldb_field('completionsubmit', XMLDB_TYPE_INTEGER, '1', null, XMLDB_NOTNULL, null, '0', 'timemodified'); // Conditionally launch add field. if (!$dbman->field_exists($table, $field)) { $dbman->add_field($table, $field); } // Questionnaire savepoint reached. upgrade_mod_savepoint(true, 2013062302, 'questionnaire'); } if ($oldversion < 2013062501) { // Skip logic new feature. // Define field dependquestion to be added to questionnaire_question table. $table = new xmldb_table('questionnaire_question'); $field = new xmldb_field('dependquestion', XMLDB_TYPE_INTEGER, '10', null, XMLDB_NOTNULL, null, '0', 'deleted'); // Conditionally launch add field. if (!$dbman->field_exists($table, $field)) { $dbman->add_field($table, $field); } $table = new xmldb_table('questionnaire_question'); $field = new xmldb_field('dependchoice', XMLDB_TYPE_INTEGER, '10', null, XMLDB_NOTNULL, null, '0', 'dependquestion'); // Conditionally launch add field. if (!$dbman->field_exists($table, $field)) { $dbman->add_field($table, $field); } // Replace the = separator with :: separator in quest_choice content. // This fixes radio button options using old "value"="display" formats. require_once $CFG->dirroot . '/mod/questionnaire/locallib.php'; $choices = $DB->get_recordset('questionnaire_quest_choice', $conditions = null); $total = $DB->count_records('questionnaire_quest_choice'); if ($total > 0) { $pbar = new progress_bar('convertchoicevalues', 500, true); $i = 1; foreach ($choices as $choice) { if (($choice->value == null || $choice->value == 'NULL') && !preg_match("/^([0-9]{1,3}=.*|!other=.*)\$/", $choice->content)) { $content = questionnaire_choice_values($choice->content); if ($pos = strpos($content->text, '=')) { $newcontent = str_replace('=', '::', $content->text); $choice->content = $newcontent; $DB->update_record('questionnaire_quest_choice', $choice); } } $pbar->update($i, $total, "Convert questionnaire choice value separator - {$i}/{$total}."); $i++; } } // Questionnaire savepoint reached. upgrade_mod_savepoint(true, 2013062501, 'questionnaire'); } if ($oldversion < 2013100500) { // Add autonumbering option for questions and pages. $table = new xmldb_table('questionnaire'); $field = new xmldb_field('autonum', XMLDB_TYPE_INTEGER, '1', null, XMLDB_NOTNULL, null, '3', 'completionsubmit'); // Conditionally launch add field. if (!$dbman->field_exists($table, $field)) { $dbman->add_field($table, $field); } // Questionnaire savepoint reached. upgrade_mod_savepoint(true, 2013100500, 'questionnaire'); } if ($oldversion < 2013122202) { // Personality test feature. $table = new xmldb_table('questionnaire_survey'); $field = new xmldb_field('feedbacksections', XMLDB_TYPE_INTEGER, '2', null, null, null, null, null); // Conditionally launch add field. if (!$dbman->field_exists($table, $field)) { $dbman->add_field($table, $field); } unset($field); $field = new xmldb_field('feedbacknotes', XMLDB_TYPE_TEXT, null, null, null, null, null); if (!$dbman->field_exists($table, $field)) { $dbman->add_field($table, $field); } unset($table); unset($field); // Define table questionnaire_fb_sections to be created. $table = new xmldb_table('questionnaire_fb_sections'); $table->add_field('id', XMLDB_TYPE_INTEGER, '18', null, XMLDB_NOTNULL, XMLDB_SEQUENCE, null); $table->add_field('survey_id', XMLDB_TYPE_INTEGER, '18', null, XMLDB_NOTNULL, null, null); $table->add_field('section', XMLDB_TYPE_INTEGER, '2', null, null, null, null); $table->add_field('scorecalculation', XMLDB_TYPE_TEXT, null, null, null, null, null); $table->add_field('sectionlabel', XMLDB_TYPE_CHAR, '50', null, null, null, null); $table->add_field('sectionheading', XMLDB_TYPE_TEXT, null, null, null, null, null); $table->add_field('sectionheadingformat', XMLDB_TYPE_INTEGER, '2', null, null, null, '1'); // Adding keys to table questionnaire_fb_sections. $table->add_key('primary', XMLDB_KEY_PRIMARY, array('id')); // Conditionally launch create table for assign_user_mapping. if (!$dbman->table_exists($table)) { $dbman->create_table($table); } unset($table); // Define table questionnaire_feedback to be created. $table = new xmldb_table('questionnaire_feedback'); $table->add_field('id', XMLDB_TYPE_INTEGER, '18', null, XMLDB_NOTNULL, XMLDB_SEQUENCE, null); $table->add_field('section_id', XMLDB_TYPE_INTEGER, '18', null, XMLDB_NOTNULL, null, null); $table->add_field('feedbacklabel', XMLDB_TYPE_CHAR, '30', null, null, null, null); $table->add_field('feedbacktext', XMLDB_TYPE_TEXT, null, null, null, null, null); $table->add_field('feedbacktextformat', XMLDB_TYPE_INTEGER, '2', null, null, null, '1'); $table->add_field('minscore', XMLDB_TYPE_NUMBER, '10,5', null, null, null, '0.00000'); $table->add_field('maxscore', XMLDB_TYPE_NUMBER, '10,5', null, null, null, '101.00000'); // Adding keys to table questionnaire_fb_sections. $table->add_key('primary', XMLDB_KEY_PRIMARY, array('id')); // Conditionally launch create table for assign_user_mapping. if (!$dbman->table_exists($table)) { $dbman->create_table($table); } // Questionnaire savepoint reached. upgrade_mod_savepoint(true, 2013122202, 'questionnaire'); } if ($oldversion < 2014010300) { // Personality test with chart. $table = new xmldb_table('questionnaire_survey'); $field = new xmldb_field('chart_type', XMLDB_TYPE_CHAR, '64', null, null, null, null, null); // Conditionally launch add field. if (!$dbman->field_exists($table, $field)) { $dbman->add_field($table, $field); } $field = new xmldb_field('feedbackscores', XMLDB_TYPE_INTEGER, '1', null, null, null, '0'); // Conditionally launch add field. if (!$dbman->field_exists($table, $field)) { $dbman->add_field($table, $field); } // Questionnaire savepoint reached. upgrade_mod_savepoint(true, 2014010300, 'questionnaire'); } if ($oldversion < 2015051101) { // Move the global config value for 'usergraph' to the plugin config setting instead. if (isset($CFG->questionnaire_usergraph)) { set_config('usergraph', $CFG->questionnaire_usergraph, 'questionnaire'); unset_config('questionnaire_usergraph'); } upgrade_mod_savepoint(true, 2015051101, 'questionnaire'); } // Add index to reduce load on the questionnaire_quest_choice table. if ($oldversion < 2015051102) { // Conditionally add an index to the question_id field. $table = new xmldb_table('questionnaire_quest_choice'); $index = new xmldb_index('quest_choice_quesidx', XMLDB_INDEX_NOTUNIQUE, array('question_id')); // Only add the index if it does not exist. if (!$dbman->index_exists($table, $index)) { $dbman->add_index($table, $index); } // Questionnaire savepoint reached. upgrade_mod_savepoint(true, 2015051102, 'questionnaire'); } return $result; }