can_subaction = ACTION_NONE; //$this->can_subaction = ACTION_HAVE_SUBACTIONS; /// Set own custom attributes /// Get needed strings $this->loadStrings(array( /// 'key' => 'module', )); } /** * 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 . stripslashes_safe($dirpath); $file = $dirpath . '/install.xml'; /// Some variables $xmlpath = dirname(str_replace($CFG->dirroot . '/', '', $file)); $xmlversion = userdate(time(), '%Y%m%d', 99, false); $xmlcomment = 'XMLDB file for Moodle ' . dirname($xmlpath); $xmltable = strtolower(basename(dirname($xmlpath))); /// Initial contents $c = '' . "\n"; $c.= ' ' . "\n"; $c.= ' ' . "\n"; $c.= ' ' . "\n"; $c.= ' ' . "\n"; $c.= ' ' . "\n"; $c.= ' ' . "\n"; $c.= ' ' . "\n"; $c.= ' ' . "\n"; $c.= ' ' . "\n"; $c.= '
' . "\n"; $c.= '
' . "\n"; $c.= '
'; if (!file_put_contents($file, $c)) { $errormsg = 'Error creando fichero ' . $file; $result = false; } /// Launch postaction if exists if ($this->getPostAction() && $result) { return $this->launch($this->getPostAction()); } /// Return ok if arrived here return $result; } } ?>