3 ///////////////////////////////////////////////////////////////////////////
5 // NOTICE OF COPYRIGHT //
7 // Moodle - Modular Object-Oriented Dynamic Learning Environment //
8 // http://moodle.com //
10 // Copyright (C) 1999 onwards Martin Dougiamas http://dougiamas.com //
11 // (C) 2001-3001 Eloy Lafuente (stronk7) http://contiento.com //
13 // This program is free software; you can redistribute it and/or modify //
14 // it under the terms of the GNU General Public License as published by //
15 // the Free Software Foundation; either version 2 of the License, or //
16 // (at your option) any later version. //
18 // This program is distributed in the hope that it will be useful, //
19 // but WITHOUT ANY WARRANTY; without even the implied warranty of //
20 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the //
21 // GNU General Public License for more details: //
23 // http://www.gnu.org/copyleft/gpl.html //
25 ///////////////////////////////////////////////////////////////////////////
27 /// This class will display the XML for one key being edited
29 class view_key_xml
extends XMLDBAction
{
32 * Init method, every subclass will have its own
37 /// Set own custom attributes
39 /// Get needed strings
40 $this->loadStrings(array(
41 /// 'key' => 'module',
46 * Invoke method, every class will have its own
47 * returns true/false on completion, setting both
48 * errormsg and output as necessary
55 /// Set own core attributes
56 $this->does_generate
= ACTION_GENERATE_XML
;
58 /// These are always here
61 /// Do the job, setting result as needed
63 /// Get the file parameter
64 $key = required_param('key', PARAM_PATH
);
65 $table = required_param('table', PARAM_PATH
);
66 $select = required_param('select', PARAM_ALPHA
); //original/edited
67 /// Get the dir containing the file
68 $dirpath = required_param('dir', PARAM_PATH
);
69 $dirpath = $CFG->dirroot
. stripslashes_safe($dirpath);
71 /// Get the correct dir
72 if ($select == 'original') {
73 if (!empty($XMLDB->dbdirs
)) {
74 $base =& $XMLDB->dbdirs
[$dirpath];
76 } else if ($select == 'edited') {
77 if (!empty($XMLDB->editeddirs
)) {
78 $base =& $XMLDB->editeddirs
[$dirpath];
81 $this->errormsg
= 'Cannot access to ' . $select . ' info';
85 /// Only if the directory exists and it has been loaded
86 if (!$base->path_exists ||
!$base->xml_loaded
) {
87 $this->errormsg
= 'Directory ' . $dirpath . ' not loaded';
91 $this->errormsg
= 'Problem handling ' . $select . ' files';
97 if (!$structure =& $base->xml_file
->getStructure()) {
98 $this->errormsg
= 'Error retrieving ' . $select . ' structure';
104 if (!$tables =& $structure->getTables()) {
105 $this->errormsg
= 'Error retrieving ' . $select . ' tables';
110 if ($result && !$t =& $structure->getTable($table)) {
111 $this->errormsg
= 'Error retrieving ' . $table . ' table';
116 if (!$keys =& $t->getKeys()) {
117 $this->errormsg
= 'Error retrieving ' . $select . ' keys';
122 if ($result && !$k = $t->getKey($key)) {
123 $this->errormsg
= 'Error retrieving ' . $key . ' key';
128 /// Everything is ok. Generate the XML output
129 $this->output
= $k->xmlOutput();
131 /// Switch to HTML and error
132 $this->does_generate
= ACTION_GENERATE_HTML
;
135 /// Return ok if arrived here