Exemplo n.º 1
0
 /**
  * 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, $db;
     /// 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 = optional_param('table', NULL, PARAM_CLEAN);
     /// If no table, show form
     if (!$tableparam) {
         /// No postaction here
         $this->postaction = NULL;
         /// Get list of tables
         $dbtables = $db->MetaTables('TABLES');
         $selecttables = array();
         foreach ($dbtables as $dbtable) {
             $dbtable = strtolower(str_replace($CFG->prefix, '', $dbtable));
             $i = $structure->findTableInArray($dbtable);
             if ($i === NULL) {
                 $selecttables[$dbtable] = $dbtable;
             }
         }
         /// Get list of after tables
         $aftertables = array();
         if ($tables =& $structure->getTables()) {
             foreach ($tables as $aftertable) {
                 $aftertables[$aftertable->getName()] = $aftertable->getName();
             }
         }
         if (!$selecttables) {
             $this->errormsg = 'No tables available to be retrofitted';
             return false;
         }
         /// Now build the 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 ="action" value="new_table_from_mysql" />';
         $o .= '    <input type="hidden" name ="postaction" value="edit_table" />';
         $o .= '    <table id="formelements" class="boxaligncenter" cellpadding="5">';
         $o .= '      <tr><td><label for="table" accesskey="t">' . $this->str['createtable'] . ' </label>' . choose_from_menu($selecttables, 'table', '', 'choose', '', 0, true) . '<label for="after" accesskey="a">' . $this->str['aftertable'] . ' </label>' . choose_from_menu($aftertables, 'after', '', 'choose', '', 0, true) . '</td></tr>';
         $o .= '      <tr><td colspan="2" align="center"><input type="submit" value="' . $this->str['create'] . '" /></td></tr>';
         $o .= '      <tr><td colspan="2" align="center"><a href="index.php?action=edit_xml_file&amp;dir=' . urlencode(str_replace($CFG->dirroot, '', $dirpath)) . '">[' . $this->str['back'] . ']</a></td></tr>';
         $o .= '    </table>';
         $o .= '</div></form>';
         $this->output = $o;
         /// If table, retrofit information and, if everything works,
         /// go to the table edit action
     } else {
         /// Get some params (table is mandatory here)
         $tableparam = required_param('table', PARAM_CLEAN);
         $afterparam = required_param('after', PARAM_CLEAN);
         /// Create one new XMLDBTable
         $table = new XMLDBTable(strtolower(trim($tableparam)));
         $table->setComment($table->getName() . ' table retrofitted from MySQL');
         /// Get fields info from ADODb
         if (!($dbfields = $db->MetaColumns($CFG->prefix . $tableparam))) {
             ///Try it without prefix if doesn't exist
             $dbfields = $db->MetaColumns($tableparam);
         }
         if ($dbfields) {
             foreach ($dbfields as $dbfield) {
                 /// Create new XMLDB field
                 $field = new XMLDBField(strtolower($dbfield->name));
                 /// Set field with info retrofitted
                 $field->setFromADOField($dbfield);
                 /// Add field to the table
                 $table->addField($field);
             }
         }
         /// Get PK, UK and indexes info from ADODb
         $dbindexes = $db->MetaIndexes($CFG->prefix . $tableparam, true);
         if ($dbindexes) {
             $lastkey = NULL;
             //To temp store the last key processed
             foreach ($dbindexes as $indexname => $dbindex) {
                 /// Add the indexname to the array
                 $dbindex['name'] = $indexname;
                 /// We are handling one XMLDBKey (primaries + uniques)
                 if ($dbindex['unique']) {
                     $key = new XMLDBKey(strtolower($dbindex['name']));
                     /// Set key with info retrofitted
                     $key->setFromADOKey($dbindex);
                     /// Set default comment to PKs
                     if ($key->getType() == XMLDB_KEY_PRIMARY) {
                     }
                     /// Add key to the table
                     $table->addKey($key);
                     /// We are handling one XMLDBIndex (non-uniques)
                 } else {
                     $index = new XMLDBIndex(strtolower($dbindex['name']));
                     /// Set index with info retrofitted
                     $index->setFromADOIndex($dbindex);
                     /// Add index to the table
                     $table->addIndex($index);
                 }
             }
         }
         /// Finally, add the whole retroffited table to the structure
         /// in the place specified
         $structure->addTable($table, $afterparam);
     }
     /// Launch postaction if exists (leave this here!)
     if ($this->getPostAction() && $result) {
         return $this->launch($this->getPostAction());
     }
     /// Return ok if arrived here
     return $result;
 }