Gecko [ admjudic.com.br ]

Name	Size	Permission
accessrule	[ DIR ]	drwxr-xr-x
amd	[ DIR ]	drwxr-xr-x
backup	[ DIR ]	drwxr-xr-x
classes	[ DIR ]	drwxr-xr-x
db	[ DIR ]	drwxr-xr-x
lang	[ DIR ]	drwxr-xr-x
pix	[ DIR ]	drwxr-xr-x
report	[ DIR ]	drwxr-xr-x
templates	[ DIR ]	drwxr-xr-x
tests	[ DIR ]	drwxr-xr-x
yui	[ DIR ]	drwxr-xr-x
accessmanager.php	19.94 KB	-rw-r--r--
accessmanager_form.php	2.42 KB	-rw-r--r--
addrandom.php	4.93 KB	-rw-rw-r--
addrandomform.php	5.66 KB	-rw-rw-r--
attempt.php	5.11 KB	-rw-rw-r--
attemptlib.php	105.77 KB	-rw-rw-r--
autosave.ajax.php	2.48 KB	-rw-r--r--
comment.php	5.11 KB	-rw-r--r--
cronlib.php	4.73 KB	-rw-r--r--
deprecatedlib.php	4.88 KB	-rw-rw-r--
edit.php	7.94 KB	-rw-rw-r--
edit_rest.php	9.22 KB	-rw-r--r--
editrandom.php	6.11 KB	-rw-rw-r--
grade.php	3.52 KB	-rw-r--r--
index.php	5.88 KB	-rw-r--r--
lib.php	89.25 KB	-rw-rw-r--
locallib.php	100.59 KB	-rw-rw-r--
mod_form.php	31.04 KB	-rw-rw-r--
module.js	11.33 KB	-rw-rw-r--
override_form.php	11.36 KB	-rw-rw-r--
overridedelete.php	3.94 KB	-rw-rw-r--
overrideedit.php	8.06 KB	-rw-rw-r--
overrides.php	12.49 KB	-rw-rw-r--
processattempt.php	3.51 KB	-rw-r--r--
renderer.php	57.42 KB	-rw-rw-r--
repaginate.php	1.94 KB	-rw-r--r--
report.php	3.5 KB	-rw-rw-r--
review.php	9.53 KB	-rw-rw-r--
reviewquestion.php	4.35 KB	-rw-r--r--
settings.php	12.49 KB	-rw-rw-r--
startattempt.php	4.33 KB	-rw-r--r--
styles.css	24.91 KB	-rw-rw-r--
summary.php	3.54 KB	-rw-rw-r--
upgrade.txt	9.35 KB	-rw-rw-r--
version.php	1.02 KB	-rw-rw-r--
view.php	9.85 KB	-rw-rw-r--

Code Editor : addrandomform.php

<?php
// This file is part of Moodle - http://moodle.org/
//
// Moodle is free software: you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation, either version 3 of the License, or
// (at your option) any later version.
//
// Moodle is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with Moodle.  If not, see <http://www.gnu.org/licenses/>.

/**
 * Defines the Moodle forum used to add random questions to the quiz.
 *
 * @package   mod_quiz
 * @copyright 2008 Olli Savolainen
 * @license   http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
 */

defined('MOODLE_INTERNAL') || die();

require_once($CFG->libdir.'/formslib.php');

/**
 * The add random questions form.
 *
 * @copyright  1999 onwards Martin Dougiamas and others {@link http://moodle.com}
 * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
 */
class quiz_add_random_form extends moodleform {

protected function definition() {
        global $OUTPUT, $PAGE, $CFG;

$mform = $this->_form;
        $mform->setDisableShortforms();

$contexts = $this->_customdata['contexts'];
        $usablecontexts = $contexts->having_cap('moodle/question:useall');

// Random from existing category section.
        $mform->addElement('header', 'existingcategoryheader',
                get_string('randomfromexistingcategory', 'quiz'));

$mform->addElement('questioncategory', 'category', get_string('category'),
                array('contexts' => $usablecontexts, 'top' => true));
        $mform->setDefault('category', $this->_customdata['cat']);

$mform->addElement('checkbox', 'includesubcategories', '', get_string('recurse', 'quiz'));

$tops = question_get_top_categories_for_contexts(array_column($contexts->all(), 'id'));
        $mform->hideIf('includesubcategories', 'category', 'in', $tops);

if ($CFG->usetags) {
            $tagstrings = array();
            $tags = core_tag_tag::get_tags_by_area_in_contexts('core_question', 'question', $usablecontexts);
            foreach ($tags as $tag) {
                $tagstrings["{$tag->id},{$tag->name}"] = $tag->name;
            }
            $options = array(
                'multiple' => true,
                'noselectionstring' => get_string('anytags', 'quiz'),
            );
            $mform->addElement('autocomplete', 'fromtags', get_string('randomquestiontags', 'mod_quiz'), $tagstrings, $options);
            $mform->addHelpButton('fromtags', 'randomquestiontags', 'mod_quiz');
        }

// TODO: in the past, the drop-down used to only show sensible choices for
        // number of questions to add. That is, if the currently selected filter
        // only matched 9 questions (not already in the quiz), then the drop-down would
        // only offer choices 1..9. This nice UI hint got lost when the UI became Ajax-y.
        // We should add it back.
        $mform->addElement('select', 'numbertoadd', get_string('randomnumber', 'quiz'),
                $this->get_number_of_questions_to_add_choices());

$previewhtml = $OUTPUT->render_from_template('mod_quiz/random_question_form_preview', []);
        $mform->addElement('html', $previewhtml);

$mform->addElement('submit', 'existingcategory', get_string('addrandomquestion', 'quiz'));

// Random from a new category section.
        $mform->addElement('header', 'newcategoryheader',
                get_string('randomquestionusinganewcategory', 'quiz'));

$mform->addElement('text', 'name', get_string('name'), 'maxlength="254" size="50"');
        $mform->setType('name', PARAM_TEXT);

$mform->addElement('questioncategory', 'parent', get_string('parentcategory', 'question'),
                array('contexts' => $usablecontexts, 'top' => true));
        $mform->addHelpButton('parent', 'parentcategory', 'question');

$mform->addElement('submit', 'newcategory',
                get_string('createcategoryandaddrandomquestion', 'quiz'));

// Cancel button.
        $mform->addElement('cancel');
        $mform->closeHeaderBefore('cancel');

$mform->addElement('hidden', 'addonpage', 0, 'id="rform_qpage"');
        $mform->setType('addonpage', PARAM_SEQUENCE);
        $mform->addElement('hidden', 'cmid', 0);
        $mform->setType('cmid', PARAM_INT);
        $mform->addElement('hidden', 'returnurl', 0);
        $mform->setType('returnurl', PARAM_LOCALURL);

// Add the javascript required to enhance this mform.
        $PAGE->requires->js_call_amd('mod_quiz/add_random_form', 'init', [
            $mform->getAttribute('id'),
            $contexts->lowest()->id,
            $tops,
            $CFG->usetags
        ]);
    }

public function validation($fromform, $files) {
        $errors = parent::validation($fromform, $files);

if (!empty($fromform['newcategory']) && trim($fromform['name']) == '') {
            $errors['name'] = get_string('categorynamecantbeblank', 'question');
        }

return $errors;
    }

/**
     * Return an arbitrary array for the dropdown menu
     *
     * @param int $maxrand
     * @return array of integers [1, 2, ..., 100] (or to the smaller of $maxrand and 100.)
     */
    private function get_number_of_questions_to_add_choices($maxrand = 100) {
        $randomcount = array();
        for ($i = 1; $i <= min(100, $maxrand); $i++) {
            $randomcount[$i] = $i;
        }
        return $randomcount;
    }
}

${this.title}

Code Editor : addrandomform.php