MDL-22388 Added some checks to kill these scripts dead with an unequivocal notice...
[moodle.git] / grade / import / xml / grade_import_form.php
1 <?php
3 // This file is part of Moodle - http://moodle.org/
4 //
5 // Moodle is free software: you can redistribute it and/or modify
6 // it under the terms of the GNU General Public License as published by
7 // the Free Software Foundation, either version 3 of the License, or
8 // (at your option) any later version.
9 //
10 // Moodle is distributed in the hope that it will be useful,
11 // but WITHOUT ANY WARRANTY; without even the implied warranty of
12 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13 // GNU General Public License for more details.
14 //
15 // You should have received a copy of the GNU General Public License
16 // along with Moodle.  If not, see <http://www.gnu.org/licenses/>.
18 if (!defined('MOODLE_INTERNAL')) {
19     die('Direct access to this script is forbidden.');    ///  It must be included from a Moodle page
20 }
22 require_once $CFG->libdir.'/formslib.php';
24 class grade_import_form extends moodleform {
25     function definition () {
26         global $COURSE, $USER, $CFG, $DB;
28         $mform =& $this->_form;
30         $this->set_upload_manager(new upload_manager('userfile', false, false, null, false, 0, true, true, false));
32         // course id needs to be passed for auth purposes
33         $mform->addElement('hidden', 'id', optional_param('id', 0, PARAM_INT));
34         $mform->setType('id', PARAM_INT);
36         $mform->addElement('header', 'general', get_string('importfile', 'grades'));
37         $mform->disabledIf('url', 'userfile', 'noteq', '');
39         $mform->addElement('advcheckbox', 'feedback', get_string('importfeedback', 'grades'));
40         $mform->setDefault('feedback', 0);
42         // file upload
43         $mform->addElement('file', 'userfile', get_string('file'));
44         $mform->setType('userfile', PARAM_FILE);
45         $mform->disabledIf('userfile', 'url', 'noteq', '');
47         $mform->addElement('text', 'url', get_string('fileurl', 'gradeimport_xml'), 'size="80"');
49         if (!empty($CFG->gradepublishing)) {
50             $mform->addElement('header', 'publishing', get_string('publishing', 'grades'));
51             $options = array(get_string('nopublish', 'grades'), get_string('createnewkey', 'userkey'));
52             $keys = $DB->get_records_select('user_private_key',
53                             "script='grade/import' AND instance=? AND userid=?",
54                             array($COURSE->id, $USER->id));
55             if ($keys) {
56                 foreach ($keys as $key) {
57                     $options[$key->value] = $key->value; // TODO: add more details - ip restriction, valid until ??
58                 }
59             }
60             $mform->addElement('select', 'key', get_string('userkey', 'userkey'), $options);
61             $mform->setHelpButton('key', array('userkey', get_string('userkey', 'userkey'), 'grade'));
62             $mform->addElement('static', 'keymanagerlink', get_string('keymanager', 'userkey'),
63                     '<a href="'.$CFG->wwwroot.'/grade/import/keymanager.php?id='.$COURSE->id.'">'.get_string('keymanager', 'userkey').'</a>');
65             $mform->addElement('text', 'iprestriction', get_string('keyiprestriction', 'userkey'), array('size'=>80));
66             $mform->setHelpButton('iprestriction', array('keyiprestriction', get_string('keyiprestriction', 'userkey'), 'userkey'));
67             $mform->setDefault('iprestriction', getremoteaddr()); // own IP - just in case somebody does not know what user key is
69             $mform->addElement('date_time_selector', 'validuntil', get_string('keyvaliduntil', 'userkey'), array('optional'=>true));
70             $mform->setHelpButton('validuntil', array('keyvaliduntil', get_string('keyvaliduntil', 'userkey'), 'userkey'));
71             $mform->setDefault('validuntil', time()+3600*24*7); // only 1 week default duration - just in case somebody does not know what user key is
73             $mform->disabledIf('iprestriction', 'key', 'noteq', 1);
74             $mform->disabledIf('validuntil', 'key', 'noteq', 1);
76             $mform->disabledIf('iprestriction', 'url', 'eq', '');
77             $mform->disabledIf('validuntil', 'url', 'eq', '');
78             $mform->disabledIf('key', 'url', 'eq', '');
79         }
81         $this->add_action_buttons(false, get_string('uploadgrades', 'grades'));
82     }
84     function validation($data, $files) {
85         $err = parent::validation($data, $files);
86         if (empty($data['url']) and empty($files['userfile'])) {
87             if (array_key_exists('url', $data)) {
88                 $err['url'] = get_string('required');
89             }
90             if (array_key_exists('userfile', $data)) {
91                 $err['userfile'] = get_string('required');
92             }
94         } else if (array_key_exists('url', $data) and $data['url'] != clean_param($data['url'], PARAM_URL)) {
95             $err['url'] = get_string('error');
96         }
98         return $err;
99     }