AutorÃa | Ultima modificación | Ver Log |
<?php// This file is part of Moodle - http://moodle.org///// Moodle is free software: you can redistribute it and/or modify// it under the terms of the GNU General Public License as published by// the Free Software Foundation, either version 3 of the License, or// (at your option) any later version.//// Moodle is distributed in the hope that it will be useful,// but WITHOUT ANY WARRANTY; without even the implied warranty of// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the// GNU General Public License for more details.//// You should have received a copy of the GNU General Public License// along with Moodle. If not, see <http://www.gnu.org/licenses/>./*** @package tool_xmldb* @copyright 2003 onwards Eloy Lafuente (stronk7) {@link http://stronk7.com}* @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later*//*** This class will provide the interface for all the edit field actions** @package tool_xmldb* @copyright 2003 onwards Eloy Lafuente (stronk7) {@link http://stronk7.com}* @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later*/class edit_field extends XMLDBAction {/*** Init method, every subclass will have its own*/function init() {parent::init();// Set own custom attributes$this->sesskey_protected = false; // This action doesn't need sesskey protection// Get needed strings$this->loadStrings(array('change' => 'tool_xmldb','float2numbernote' => 'tool_xmldb','vieworiginal' => 'tool_xmldb','viewedited' => 'tool_xmldb','yes' => '','no' => '','back' => 'tool_xmldb'));}/*** 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_GENERATE_HTML;// These are always hereglobal $CFG, $XMLDB, $OUTPUT;// 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 dirsif (!empty($XMLDB->dbdirs)) {$dbdir = $XMLDB->dbdirs[$dirpath];} else {return false;}if (!empty($XMLDB->editeddirs)) {$editeddir = $XMLDB->editeddirs[$dirpath];$structure = $editeddir->xml_file->getStructure();}// Fetch request data$tableparam = required_param('table', PARAM_CLEAN);if (!$table = $structure->getTable($tableparam)) {$this->errormsg = 'Wrong table specified: ' . $tableparam;return false;}$fieldparam = required_param('field', PARAM_CLEAN);if (!$field = $table->getField($fieldparam)) {// Arriving here from a name change, looking for the new field name$fieldparam = required_param('name', PARAM_CLEAN);$field = $table->getField($fieldparam);}$dbdir = $XMLDB->dbdirs[$dirpath];$origstructure = $dbdir->xml_file->getStructure();$o = ''; // Output starts// If field is XMLDB_TYPE_FLOAT, comment about to migrate it to XMLDB_TYPE_NUMBERif ($field->getType() == XMLDB_TYPE_FLOAT) {$o .= '<p>' . $this->str['float2numbernote'] . '</p>';}// Add the main form$o.= '<form id="form" action="index.php" method="post">';$o.= ' <div>';$o.= ' <input type="hidden" name ="dir" value="' . str_replace($CFG->dirroot, '', $dirpath) . '" />';$o.= ' <input type="hidden" name ="table" value="' . $tableparam .'" />';$o.= ' <input type="hidden" name ="field" value="' . $fieldparam .'" />';$o.= ' <input type="hidden" name ="sesskey" value="' . sesskey() .'" />';$o.= ' <input type="hidden" name ="action" value="edit_field_save" />';$o.= ' <input type="hidden" name ="postaction" value="edit_table" />';$o.= ' <table id="formelements" class="boxaligncenter">';// XMLDB field name// If the field has dependencies, we cannot change its name$disabled = '';if ($structure->getFieldUses($table->getName(), $field->getName())) {$o.= ' <input type="hidden" name ="name" value="' . s($field->getName()) .'" />';$o.= ' <tr valign="top"><td>Name:</td><td colspan="2">' . s($field->getName()) . '</td></tr>';} else {$o.= ' <tr valign="top"><td><label for="name" accesskey="n">Name:</label></td><td colspan="2"><input name="name" type="text" size="'.xmldb_field::NAME_MAX_LENGTH.'" maxlength="'.xmldb_field::NAME_MAX_LENGTH.'" id="name" value="' . s($field->getName()) . '" /></td></tr>';}// XMLDB field comment$o .= ' <tr valign="top"><td><label for="comment" accesskey="c">Comment:</label></td><td colspan="2"><textarea name="comment" rows="3" cols="80" id="comment" class="form-control">' .s($field->getComment()) . '</textarea></td></tr>';// xmldb_field Type$typeoptions = array (XMLDB_TYPE_INTEGER => $field->getXMLDBTypeName(XMLDB_TYPE_INTEGER),XMLDB_TYPE_NUMBER => $field->getXMLDBTypeName(XMLDB_TYPE_NUMBER),XMLDB_TYPE_FLOAT => $field->getXMLDBTypeName(XMLDB_TYPE_FLOAT),XMLDB_TYPE_DATETIME=> $field->getXMLDBTypeName(XMLDB_TYPE_DATETIME),XMLDB_TYPE_CHAR => $field->getXMLDBTypeName(XMLDB_TYPE_CHAR),XMLDB_TYPE_TEXT => $field->getXMLDBTypeName(XMLDB_TYPE_TEXT),XMLDB_TYPE_BINARY => $field->getXMLDBTypeName(XMLDB_TYPE_BINARY));// If current field isn't float, delete such column type to avoid its creation from the interface// Note that float fields are supported completely but it's possible than in a next future// we delete them completely from Moodle DB, using, exclusively, number(x,y) typesif ($field->getType() != XMLDB_TYPE_FLOAT) {unset ($typeoptions[XMLDB_TYPE_FLOAT]);}// Also we hide datetimes. Only edition of them is allowed (and retrofit) but not new creationif ($field->getType() != XMLDB_TYPE_DATETIME) {unset ($typeoptions[XMLDB_TYPE_DATETIME]);}$select = html_writer::select($typeoptions, 'type', $field->getType(), false);$o.= ' <tr valign="top"><td><label for="menutype" accesskey="t">Type:</label></td>';$o.= ' <td colspan="2">' . $select . '</td></tr>';// xmldb_field Length$o.= ' <tr valign="top"><td><label for="length" accesskey="l">Length:</label></td>';$o.= ' <td colspan="2"><input name="length" type="text" size="6" maxlength="6" id="length" value="' . s($field->getLength()) . '" /><span id="lengthtip"></span></td></tr>';// xmldb_field Decimals$o.= ' <tr valign="top"><td><label for="decimals" accesskey="d">Decimals:</label></td>';$o.= ' <td colspan="2"><input name="decimals" type="text" size="6" maxlength="6" id="decimals" value="' . s($field->getDecimals()) . '" /><span id="decimalstip"></span></td></tr>';// xmldb_field NotNull$notnulloptions = array (0 => 'null', 'not null');$select = html_writer::select($notnulloptions, 'notnull', $field->getNotNull(), false);$o.= ' <tr valign="top"><td><label for="menunotnull" accesskey="n">Not Null:</label></td>';$o.= ' <td colspan="2">' . $select . '</td></tr>';// xmldb_field Sequence$sequenceoptions = array (0 => $this->str['no'], 1 => 'auto-numbered');$select = html_writer::select($sequenceoptions, 'sequence', $field->getSequence(), false);$o.= ' <tr valign="top"><td><label for="menusequence" accesskey="s">Sequence:</label></td>';$o.= ' <td colspan="2">' . $select . '</td></tr>';// xmldb_field Default$o.= ' <tr valign="top"><td><label for="default" accesskey="d">Default:</label></td>';$o.= ' <td colspan="2"><input type="text" name="default" size="30" maxlength="80" id="default" value="' . s($field->getDefault()) . '" /></td></tr>';// Change button$o .= ' <tr valign="top"><td> </td><td colspan="2"><input type="submit" value="' . $this->str['change'] .'" class="btn btn-secondary" /></td></tr>';$o.= ' </table>';$o.= '</div></form>';// Calculate the buttons$b = ' <p class="centerpara buttons">';// The view original XML buttonif ($table->getField($fieldparam)) {$b .= ' <a href="index.php?action=view_field_xml&dir=' . urlencode(str_replace($CFG->dirroot, '', $dirpath)) . '&select=original&table=' . $tableparam . '&field=' . $fieldparam . '">[' . $this->str['vieworiginal'] . ']</a>';} else {$b .= ' [' . $this->str['vieworiginal'] . ']';}// The view edited XML buttonif ($field->hasChanged()) {$b .= ' <a href="index.php?action=view_field_xml&dir=' . urlencode(str_replace($CFG->dirroot, '', $dirpath)) . '&select=edited&table=' . $tableparam . '&field=' . $fieldparam . '">[' . $this->str['viewedited'] . ']</a>';} else {$b .= ' [' . $this->str['viewedited'] . ']';}// The back to edit table button$b .= ' <a href="index.php?action=edit_table&table=' . $tableparam . '&dir=' . urlencode(str_replace($CFG->dirroot, '', $dirpath)) . '">[' . $this->str['back'] . ']</a>';$b .= '</p>';$o .= $b;$this->output = $o;// Launch postaction if exists (leave this here!)if ($this->getPostAction() && $result) {return $this->launch($this->getPostAction());}// Return ok if arrived herereturn $result;}}