diff --git a/admin/xmldb/actions/view_table_php/view_table_php.class.php b/admin/xmldb/actions/view_table_php/view_table_php.class.php
new file mode 100644
index 00000000000..fdefe8728f1
--- /dev/null
+++ b/admin/xmldb/actions/view_table_php/view_table_php.class.php
@@ -0,0 +1,301 @@
+loadStrings(array(
+ 'selectaction' => 'xmldb',
+ 'selectfieldkeyindex' => 'xmldb',
+ 'view' => 'xmldb',
+ 'back' => '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 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 . stripslashes_safe($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();
+ }
+ /// ADD YOUR CODE HERE
+
+ $tableparam = required_param('table', PARAM_PATH);
+
+ $table =& $structure->getTable($tableparam);
+ $fields = $table->getFields();
+ $field = reset($fields);
+ $defaultfieldkeyindex = null;
+ if ($field) {
+ $defaultfieldkeyindex = $field->getName();
+ }
+
+ /// Get parameters
+ $commandparam = optional_param('command', 'add_field', PARAM_PATH);
+ $fieldkeyindexparam = optional_param('fieldkeyindex', $defaultfieldkeyindex, PARAM_PATH);
+
+ /// The back to edit xml button
+ $b = '
';
+ $b .= '[' . $this->str['back'] . ']';
+ $b .= '
';
+ $o = $b;
+
+ /// Calculate the popup of commands
+ $commands = array('add_field',
+ 'drop_field',
+ 'rename_field');
+ foreach ($commands as $command) {
+ $popcommands[$command] = str_replace('_', ' ', $command);
+ }
+ /// Calculate the popup of tables
+ foreach ($fields as $field) {
+ $poptables[$field->getName()] = $field->getName();
+ }
+ /// Now build the form
+ $o.= '';
+ $o.= ' ';
+
+ $this->output = $o;
+
+ /// Launch postaction if exists (leave this here!)
+ if ($this->getPostAction() && $result) {
+ return $this->launch($this->getPostAction());
+ }
+
+ /// Return ok if arrived here
+ return $result;
+ }
+
+ /**
+ * This function will generate all the PHP code needed to
+ * create one table using XMLDB objects and functions
+ *
+ * @param XMLDBStructure structure object containing all the info
+ * @param string table table code to be created
+ * @return string PHP code to be used to create the table
+ */
+ function create_table_php($structure, $table) {
+
+ $result = '';
+ /// Validate if we can do it
+ if (!$table = $structure->getTable($table)) {
+ return false;
+ }
+ if ($table->getAllErrors()) {
+ return false;
+ }
+
+ /// Add the standard PHP header
+ $result .= XMLDB_PHP_HEADER;
+
+ /// Add contents
+ $result .= XMLDB_LINEFEED;
+ $result .= ' /// Create table ' . $table->getName() . XMLDB_LINEFEED;
+ $result .= ' $table = new XMLDBTable(' . "'" . $table->getName() . "'" . ');' . XMLDB_LINEFEED;
+ $result .= XMLDB_LINEFEED;
+ $result .= ' /// Adding fields to table ' . $table->getName() . XMLDB_LINEFEED;
+ /// Iterate over each field
+ foreach ($table->getFields() as $field) {
+ /// The field header, with name
+ $result .= ' $table->addFieldInfo(' . "'" . $field->getName() . "', ";
+ /// The field PHP specs
+ $result .= $field->getPHP(false);
+ /// The end of the line
+ $result .= ');' . XMLDB_LINEFEED;
+ }
+ /// Iterate over each key
+ if ($keys = $table->getKeys()) {
+ $result .= XMLDB_LINEFEED;
+ $result .= ' /// Adding keys to table ' . $table->getName() . XMLDB_LINEFEED;
+ foreach ($keys as $key) {
+ /// The key header, with name
+ $result .= ' $table->addKeyInfo(' . "'" . $key->getName() . "', ";
+ /// The key PHP specs
+ $result .= $key->getPHP();
+ /// The end of the line
+ $result .= ');' . XMLDB_LINEFEED;
+ }
+ }
+ /// Iterate over each index
+ if ($indexes = $table->getIndexes()) {
+ $result .= XMLDB_LINEFEED;
+ $result .= ' /// Adding indexes to table ' . $table->getName() . XMLDB_LINEFEED;
+ foreach ($indexes as $index) {
+ /// The index header, with name
+ $result .= ' $table->addIndexInfo(' . "'" . $index->getName() . "', ";
+ /// The index PHP specs
+ $result .= $index->getPHP();
+ /// The end of the line
+ $result .= ');' . XMLDB_LINEFEED;
+ }
+ }
+
+ /// Launch the proper DDL
+ $result .= XMLDB_LINEFEED;
+ $result .= ' /// Launch create table for ' . $table->getName() . XMLDB_LINEFEED;
+ $result .= ' $status = $status && create_table($table);' . XMLDB_LINEFEED;
+
+ /// Add standard PHP footer
+ $result .= XMLDB_PHP_FOOTER;
+
+ return $result;
+ }
+
+ /**
+ * This function will generate all the PHP code needed to
+ * drop one table using XMLDB objects and functions
+ *
+ * @param XMLDBStructure structure object containing all the info
+ * @param string table table code to be dropped
+ * @return string PHP code to be used to drop the table
+ */
+ function drop_table_php($structure, $table) {
+
+ $result = '';
+ /// Validate if we can do it
+ if (!$table = $structure->getTable($table)) {
+ return false;
+ }
+ if ($table->getAllErrors()) {
+ return false;
+ }
+
+ /// Add the standard PHP header
+ $result .= XMLDB_PHP_HEADER;
+
+ /// Add contents
+ $result .= XMLDB_LINEFEED;
+ $result .= ' /// Create table ' . $table->getName() . XMLDB_LINEFEED;
+ $result .= ' $table = new XMLDBTable(' . "'" . $table->getName() . "'" . ');' . XMLDB_LINEFEED;
+
+ /// Launch the proper DDL
+ $result .= XMLDB_LINEFEED;
+ $result .= ' /// Launch drop table for ' . $table->getName() . XMLDB_LINEFEED;
+ $result .= ' $status = $status && drop_table($table);' . XMLDB_LINEFEED;
+
+ /// Add standard PHP footer
+ $result .= XMLDB_PHP_FOOTER;
+
+ return $result;
+ }
+
+ /**
+ * This function will generate all the PHP code needed to
+ * rename one table using XMLDB objects and functions
+ *
+ * @param XMLDBStructure structure object containing all the info
+ * @param string table table code to be renamed
+ * @return string PHP code to be used to rename the table
+ */
+ function rename_table_php($structure, $table) {
+
+ $result = '';
+ /// Validate if we can do it
+ if (!$table = $structure->getTable($table)) {
+ return false;
+ }
+ if ($table->getAllErrors()) {
+ return false;
+ }
+
+ /// Add the standard PHP header
+ $result .= XMLDB_PHP_HEADER;
+
+ /// Add contents
+ $result .= XMLDB_LINEFEED;
+ $result .= ' /// Create table ' . $table->getName() . XMLDB_LINEFEED;
+ $result .= ' $table = new XMLDBTable(' . "'" . $table->getName() . "'" . ');' . XMLDB_LINEFEED;
+
+ /// Launch the proper DDL
+ $result .= XMLDB_LINEFEED;
+ $result .= ' /// Launch rename table for ' . $table->getName() . XMLDB_LINEFEED;
+ $result .= ' $status = $status && rename_table($table, ' . "'NEWNAMEGOESHERE'" . ');' . XMLDB_LINEFEED;
+
+ /// Add standard PHP footer
+ $result .= XMLDB_PHP_FOOTER;
+
+ return $result;
+ }
+}
+?>