2 if (!defined('MOODLE_INTERNAL')) {
3 die('Direct access to this script is forbidden.'); /// It must be included from a Moodle page
6 require_once ($CFG->dirroot
.'/lib/formslib.php');
8 class mod_glossary_entry_form
extends moodleform
{
10 function definition() {
13 $mform = $this->_form
;
15 $currententry = $this->_customdata
['current'];
16 $glossary = $this->_customdata
['glossary'];
17 $cm = $this->_customdata
['cm'];
18 $definitionoptions = $this->_customdata
['definitionoptions'];
19 $attachmentoptions = $this->_customdata
['attachmentoptions'];
21 $context = context_module
::instance($cm->id
);
22 // Prepare format_string/text options
24 'context' => $context);
26 //-------------------------------------------------------------------------------
27 $mform->addElement('header', 'general', get_string('general', 'form'));
29 $mform->addElement('text', 'concept', get_string('concept', 'glossary'));
30 $mform->setType('concept', PARAM_TEXT
);
31 $mform->addRule('concept', null, 'required', null, 'client');
33 $mform->addElement('editor', 'definition_editor', get_string('definition', 'glossary'), null, $definitionoptions);
34 $mform->setType('definition_editor', PARAM_RAW
);
35 $mform->addRule('definition_editor', get_string('required'), 'required', null, 'client');
37 if ($categories = $DB->get_records_menu('glossary_categories', array('glossaryid'=>$glossary->id
), 'name ASC', 'id, name')){
38 foreach ($categories as $id => $name) {
39 $categories[$id] = format_string($name, true, $fmtoptions);
41 $categories = array(0 => get_string('notcategorised', 'glossary')) +
$categories;
42 $categoriesEl = $mform->addElement('select', 'categories', get_string('categories', 'glossary'), $categories);
43 $categoriesEl->setMultiple(true);
44 $categoriesEl->setSize(5);
47 $mform->addElement('textarea', 'aliases', get_string('aliases', 'glossary'), 'rows="2" cols="40"');
48 $mform->setType('aliases', PARAM_TEXT
);
49 $mform->addHelpButton('aliases', 'aliases', 'glossary');
51 $mform->addElement('filemanager', 'attachment_filemanager', get_string('attachment', 'glossary'), null, $attachmentoptions);
52 $mform->addHelpButton('attachment_filemanager', 'attachment', 'glossary');
54 if (!$glossary->usedynalink
) {
55 $mform->addElement('hidden', 'usedynalink', $CFG->glossary_linkentries
);
56 $mform->setType('usedynalink', PARAM_INT
);
57 $mform->addElement('hidden', 'casesensitive', $CFG->glossary_casesensitive
);
58 $mform->setType('casesensitive', PARAM_INT
);
59 $mform->addElement('hidden', 'fullmatch', $CFG->glossary_fullmatch
);
60 $mform->setType('fullmatch', PARAM_INT
);
63 //-------------------------------------------------------------------------------
64 $mform->addElement('header', 'linkinghdr', get_string('linking', 'glossary'));
66 $mform->addElement('checkbox', 'usedynalink', get_string('entryusedynalink', 'glossary'));
67 $mform->addHelpButton('usedynalink', 'entryusedynalink', 'glossary');
68 $mform->setDefault('usedynalink', $CFG->glossary_linkentries
);
70 $mform->addElement('checkbox', 'casesensitive', get_string('casesensitive', 'glossary'));
71 $mform->addHelpButton('casesensitive', 'casesensitive', 'glossary');
72 $mform->disabledIf('casesensitive', 'usedynalink');
73 $mform->setDefault('casesensitive', $CFG->glossary_casesensitive
);
75 $mform->addElement('checkbox', 'fullmatch', get_string('fullmatch', 'glossary'));
76 $mform->addHelpButton('fullmatch', 'fullmatch', 'glossary');
77 $mform->disabledIf('fullmatch', 'usedynalink');
78 $mform->setDefault('fullmatch', $CFG->glossary_fullmatch
);
81 $mform->addElement('hidden', 'id');
82 $mform->setType('id', PARAM_INT
);
83 $mform->addElement('hidden', 'cmid');
84 $mform->setType('cmid', PARAM_INT
);
86 //-------------------------------------------------------------------------------
87 $this->add_action_buttons();
89 //-------------------------------------------------------------------------------
90 $this->set_data($currententry);
93 function validation($data, $files) {
94 global $CFG, $USER, $DB;
95 $errors = parent
::validation($data, $files);
97 $glossary = $this->_customdata
['glossary'];
98 $cm = $this->_customdata
['cm'];
99 $context = context_module
::instance($cm->id
);
101 $id = (int)$data['id'];
102 $data['concept'] = trim($data['concept']);
105 //We are updating an entry, so we compare current session user with
106 //existing entry user to avoid some potential problems if secureforms=off
107 //Perhaps too much security? Anyway thanks to skodak (Bug 1823)
108 $old = $DB->get_record('glossary_entries', array('id'=>$id));
109 $ineditperiod = ((time() - $old->timecreated
< $CFG->maxeditingtime
) ||
$glossary->editalways
);
110 if ((!$ineditperiod ||
$USER->id
!= $old->userid
) and !has_capability('mod/glossary:manageentries', $context)) {
111 if ($USER->id
!= $old->userid
) {
112 $errors['concept'] = get_string('errcannoteditothers', 'glossary');
113 } elseif (!$ineditperiod) {
114 $errors['concept'] = get_string('erredittimeexpired', 'glossary');
117 if (!$glossary->allowduplicatedentries
) {
118 if ($DB->record_exists_select('glossary_entries',
119 'glossaryid = :glossaryid AND LOWER(concept) = :concept AND id != :id', array(
120 'glossaryid' => $glossary->id
,
121 'concept' => core_text
::strtolower($data['concept']),
123 $errors['concept'] = get_string('errconceptalreadyexists', 'glossary');
128 if (!$glossary->allowduplicatedentries
) {
129 if ($DB->record_exists_select('glossary_entries',
130 'glossaryid = :glossaryid AND LOWER(concept) = :concept', array(
131 'glossaryid' => $glossary->id
,
132 'concept' => core_text
::strtolower($data['concept'])))) {
133 $errors['concept'] = get_string('errconceptalreadyexists', 'glossary');