Proyectos de Subversion Moodle

<?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/>.

namespace core_badges\form;

use core_badges\backpack_api;

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

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

/**

 * Backpack form class.

 *

 * @package    core_badges

 * @copyright  2019 Damyon Wiese

 * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later

 */

class external_backpack extends \moodleform {

    /**

     * Create the form.

     *

     */

    public function definition() {

        global $CFG;

        $mform = $this->_form;

        $backpack = $this->_customdata['externalbackpack'] ?? null;

        $mform->addElement('hidden', 'action', 'edit');

        $mform->setType('action', PARAM_ALPHA);

        $apiversions = badges_get_badge_api_versions();

        $mform->addElement('select', 'apiversion', get_string('apiversion', 'core_badges'), $apiversions);

        $mform->setType('apiversion', PARAM_RAW);

        $mform->setDefault('apiversion', OPEN_BADGES_V2P1);

        $mform->addRule('apiversion', null, 'required', null, 'client');

        $this->add_provider_fields();

        $mform->addElement('text', 'backpackweburl', get_string('backpackweburl', 'core_badges'));

        $mform->setType('backpackweburl', PARAM_URL);

        $mform->addRule('backpackweburl', get_string('maximumchars', '', 255), 'maxlength', 255, 'client');

        $mform->hideIf('backpackweburl', 'apiversion', 'ne', OPEN_BADGES_V2);

        $mform->addElement('text', 'backpackapiurl',  get_string('backpackapiurl', 'core_badges'));

        $mform->setType('backpackapiurl', PARAM_URL);

        $mform->addRule('backpackapiurl', get_string('maximumchars', '', 255), 'maxlength', 255, 'client');

        $mform->hideIf('backpackapiurl', 'apiversion', 'ne', OPEN_BADGES_V2);

        $mform->addElement('text', 'backpackweburlv2p1', get_string('backpackweburl', 'core_badges'));

        $mform->setType('backpackweburlv2p1', PARAM_URL);

        $mform->addRule('backpackweburlv2p1', get_string('maximumchars', '', 255), 'maxlength', 255, 'client');

        $mform->hideIf('backpackweburlv2p1', 'apiversion', 'ne', (string) OPEN_BADGES_V2P1);

        $mform->addElement('hidden', 'id', ($backpack->id ?? null));

        $mform->setType('id', PARAM_INT);

        $mform->addElement('hidden', 'badgebackpack', 0);

        $mform->setType('badgebackpack', PARAM_INT);

        $mform->addElement('hidden', 'userid', 0);

        $mform->setType('userid', PARAM_INT);

        $mform->addElement('hidden', 'backpackuid', 0);

        $mform->setType('backpackuid', PARAM_INT);

        // Add rules for backpack URL fields.

        if (backpack_api::display_canvas_credentials_fields()) {

            $mform->hideIf('backpackweburl', 'provider', 'ne', backpack_api::PROVIDER_OTHER);

            $mform->hideIf('backpackapiurl', 'provider', 'ne', backpack_api::PROVIDER_OTHER);

        }

        $issueremail = $CFG->badges_defaultissuercontact;

        // Connect to a Canvas Credentials provider.

        $this->add_connect_issuer_canvas_fields($issueremail);

        // Connect to another provider.

        $this->add_connect_issuer_fields($backpack, $issueremail);

        if ($backpack) {

            $this->set_data($backpack);

        }

        // Disable short forms.

        $mform->setDisableShortforms();

        $this->add_action_buttons();

    }

    #[\Override]

    public function definition_after_data(): void {

        parent::definition_after_data();

        $mform = $this->_form;

        if ($this->is_submitted()) {

            if (!$mform->elementExists('apiversion')) {

                return;

            }

            $apiversion = $mform->getElement('apiversion')->getValue();

            $apiversion = $apiversion ? array_pop($apiversion) : null;

            $provider = $mform->elementExists('provider') ? $mform->getElement('provider')->getValue() : null;

            $provider = $provider ? array_pop($provider) : null;

            $region = $mform->elementExists('region') ? $mform->getElement('region')->getValue() : null;

            $region = $region ? array_pop($region) : null;

            if ($apiversion == OPEN_BADGES_V2) {

                if (

                    $provider == backpack_api::PROVIDER_CANVAS_CREDENTIALS

                    && isset($region) && $region != backpack_api::REGION_EMPTY

                ) {

                    $mform->getElement('backpackweburl')->setValue(

                        backpack_api::get_region_url($region),

                    );

                    $mform->getElement('backpackapiurl')->setValue(

                        backpack_api::get_region_api_url($region),

                    );

                    if ($mform->getElement('includeauthdetailscanvas')->getValue()) {

                        $mform->getElement('backpackemail')->setValue(

                            $mform->getElement('backpackemailcanvas')->getValue(),

                        );

                        $mform->getElement('password')->setValue(

                            $mform->getElement('backpackpasswordcanvas')->getValue(),

                        );

                    }

                } else if (is_null($provider) || $provider == backpack_api::PROVIDER_OTHER) {

                    if ($mform->getElement('includeauthdetails')->getValue() == 0) {

                        // Clear backpack issuer fields when authentication details checkbox is not checked.

                        $mform->getElement('backpackemail')->setValue('');

                        $mform->getElement('password')->setValue('');

                    }

                }

            } else if ($apiversion == OPEN_BADGES_V2P1) {

                if (!empty($mform->getElement('backpackweburlv2p1')->getValue())) {

                    $mform->getElement('backpackweburl')->setValue(

                        $mform->getElement('backpackweburlv2p1')->getValue(),

                    );

                }

                // Clear backpack issuer fields when OBv2.1 is selected.

                $mform->getElement('includeauthdetails')->setValue(0);

                $mform->getElement('backpackemail')->setValue('');

                $mform->getElement('password')->setValue('');

            }

        }

    }

    #[\Override]

    public function set_data($backpack) {

        if ($backpack->apiversion == OPEN_BADGES_V2) {

            if (backpack_api::is_canvas_credentials_region($backpack->backpackweburl)) {

                // Calculate provider and region fields based on backpack URLs.

                $backpack->provider = backpack_api::PROVIDER_CANVAS_CREDENTIALS;

                $backpack->region = backpack_api::get_regionid_from_url($backpack->backpackweburl);

                $backpack->backpackweburl = '';

                $backpack->backpackapiurl = '';

                if (isset($backpack->backpackemail) && !empty($backpack->backpackemail)) {

                    // Update Canvas Credentials fields.

                    $backpack->includeauthdetailscanvas = 1;

                    $backpack->backpackemailcanvas = $backpack->backpackemail;

                    $backpack->backpackpasswordcanvas = $backpack->password;

                    // Clear email and password fields for another providers.

                    $backpack->includeauthdetails = 0;

                    $backpack->backpackemail = '';

                    $backpack->password = '';

                }

            } else {

                $backpack->provider = backpack_api::PROVIDER_OTHER;

            }

        } else if ($backpack->apiversion == OPEN_BADGES_V2P1) {

            $backpack->backpackweburlv2p1 = $backpack->backpackweburl;

            $backpack->backpackweburl = '';

            $backpack->backpackapiurl = '';

        }

        parent::set_data($backpack);

    }

    /**

     * Validate the data from the form.

     *

     * @param  array $data form data

     * @param  array $files form files

     * @return array An array of error messages.

     */

    public function validation($data, $files) {

        $errors = parent::validation($data, $files);

        // Ensure backpackapiurl and backpackweburl are valid URLs.

        $isobv20 = isset($data['apiversion']) && $data['apiversion'] == OPEN_BADGES_V2;

        $isobv2p1 = isset($data['apiversion']) && $data['apiversion'] == OPEN_BADGES_V2P1;

        if ($isobv20) {

            $errors = array_merge($errors, $this->validate_obv20($data));

        } else if ($isobv2p1) {

            $errors = array_merge($errors, $this->validate_obv2p1($data));

        }

        // Check email and password are not empty when including auth details.

        if (!empty($data['includeauthdetails']) && empty($data['backpackemail'])) {

            $errors['backpackemail'] = get_string('err_required', 'form');

        }

        if (!empty($data['includeauthdetails']) && empty($data['password'])) {

            $errors['password'] = get_string('err_required', 'form');

        }

        return $errors;

    }

    /**

     * Validate the data for Open Badges v2.0.

     *

     * @param array $data Form data.

     * @return string[] An array of error messages.

     */

    private function validate_obv20(array $data): array {

        $errors = [];

        $displaycanvasfields = backpack_api::display_canvas_credentials_fields();

        if (

            $displaycanvasfields

            && (!array_key_exists('provider', $data) || $data['provider'] == backpack_api::PROVIDER_EMPTY)

        ) {

            // Check provider is set.

            $errors['provider'] = get_string('err_required', 'form');

        } else if (

            $displaycanvasfields

            && ($data['provider'] == backpack_api::PROVIDER_CANVAS_CREDENTIALS)

        ) {

            // Check region is set.

            if (!array_key_exists('region', $data) || $data['region'] == backpack_api::REGION_EMPTY) {

                $errors['region'] = get_string('err_required', 'form');

            }

        } else {

            if (empty($data['backpackweburl'])) {

                $errors['backpackweburl'] = get_string('err_required', 'form');

            } else if (!preg_match('@^https?://.+@', $data['backpackweburl'])) {

                $errors['backpackweburl'] = get_string('invalidurl', 'badges');

            }

            if (empty($data['backpackapiurl'])) {

                $errors['backpackapiurl'] = get_string('err_required', 'form');

            } else if (!preg_match('@^https?://.+@', $data['backpackapiurl'])) {

                $errors['backpackapiurl'] = get_string('invalidurl', 'badges');

            }

        }

        if ($displaycanvasfields) {

            if (!empty($data['includeauthdetailscanvas']) && empty($data['backpackemailcanvas'])) {

                $errors['backpackemailcanvas'] = get_string('err_required', 'form');

            }

            if (!empty($data['includeauthdetailscanvas']) && empty($data['backpackpasswordcanvas'])) {

                $errors['backpackpasswordcanvas'] = get_string('err_required', 'form');

            }

        }

        return $errors;

    }

    /**

     * Validate the data for Open Badges v2.1.

     *

     * @param array $data Form data.

     * @return string[] An array of error messages.

     */

    private function validate_obv2p1(array $data): array {

        $errors = [];

        if (empty($data['backpackweburlv2p1'])) {

            $errors['backpackweburlv2p1'] = get_string('err_required', 'form');

        } else if (!preg_match('@^https?://.+@', $data['backpackweburlv2p1'])) {

            $errors['backpackweburlv2p1'] = get_string('invalidurl', 'badges');

        }

        return $errors;

    }

    /**

     * Add provider fields to the form.

     */

    protected function add_provider_fields(): void {

        $mform = $this->_form;

        if (!backpack_api::display_canvas_credentials_fields()) {

            // If canvas credentials fields are not to be displayed, return early.

            return;

        }

        // Add an empty option at the start.

        $providers = backpack_api::get_providers();

        $providers = [backpack_api::PROVIDER_EMPTY => ''] + $providers;

        $mform->addElement('select', 'provider', get_string('provider', 'core_badges'), $providers);

        $mform->setType('provider', PARAM_RAW);

        $mform->hideIf('provider', 'apiversion', 'ne', OPEN_BADGES_V2);

        // Add an empty option at the start.

        $regions = backpack_api::get_regions();

        $regions = [backpack_api::REGION_EMPTY => ''] + array_column($regions, 'name');

        $mform->addElement('select', 'region', get_string('region', 'core_badges'), $regions);

        $mform->setType('region', PARAM_RAW);

        $mform->hideIf('region', 'provider', 'ne', backpack_api::PROVIDER_CANVAS_CREDENTIALS);

        $mform->hideIf('region', 'apiversion', 'ne', OPEN_BADGES_V2);

    }

    /**

     * Add Canvas backpack specific issuer auth details.

     *

     * @param string|null $email The email addressed provided or null if it's new.

     */

    protected function add_connect_issuer_canvas_fields(?string $email): void {

        $mform = $this->_form;

        if (!backpack_api::display_canvas_credentials_fields()) {

            // If canvas credentials fields are not to be displayed, return early.

            return;

        }

        $providers = backpack_api::get_providers();

        $regions = backpack_api::get_regions();

        if (empty($providers) || empty($regions)) {

            // If no providers or regions are available, return early.

            return;

        }

        // Checkbox and information to enable/disable issuer account.

        $mform->addElement('static', '', null, '');

        $mform->addElement(

            'advcheckbox',

            'includeauthdetailscanvas',

            null,

            '<strong>' . get_string('includeauthdetailscanvas', 'core_badges') . '</strong> '

            . get_string('includeauthdetailscanvas_subtitle', 'core_badges'),

        );

        if (!empty($backpack->backpackemail) || !empty($backpack->password)) {

            $mform->setDefault('includeauthdetailscanvas', 1);

        }

        $mform->addHelpButton('includeauthdetailscanvas', 'includeauthdetailscanvas', 'core_badges');

        $mform->hideIf('includeauthdetailscanvas', 'apiversion', 'ne', OPEN_BADGES_V2);

        $mform->hideIf('includeauthdetailscanvas', 'region', 'eq', backpack_api::REGION_EMPTY);

        $mform->hideIf('includeauthdetailscanvas', 'provider', 'ne', backpack_api::PROVIDER_CANVAS_CREDENTIALS);

        $mform->addElement(

            'static',

            'includeauthdetailscanvasdesc',

            null,

            get_string('includeauthdetailscanvas_desc', 'core_badges'),

        );

        $mform->hideIf('includeauthdetailscanvasdesc', 'includeauthdetailscanvas');

        $mform->hideIf('includeauthdetailscanvasdesc', 'region', 'eq', backpack_api::REGION_EMPTY);

        $mform->hideIf('includeauthdetailscanvasdesc', 'provider', 'ne', backpack_api::PROVIDER_CANVAS_CREDENTIALS);

        $mform->hideIf('includeauthdetailscanvasdesc', 'apiversion', 'ne', OPEN_BADGES_V2);

        // Email.

        $mform->addElement('text', 'backpackemailcanvas', get_string('issueremail', 'core_badges'));

        $mform->setType('backpackemailcanvas', PARAM_EMAIL);

        $mform->setDefault('backpackemailcanvas', $email);

        $mform->hideIf('backpackemailcanvas', 'includeauthdetailscanvas');

        $mform->hideIf('backpackemailcanvas', 'apiversion', 'ne', OPEN_BADGES_V2);

        $mform->hideIf('backpackemailcanvas', 'provider', 'ne', backpack_api::PROVIDER_CANVAS_CREDENTIALS);

        // Password.

        $mform->addElement('passwordunmask', 'backpackpasswordcanvas', get_string('password'));

        $mform->setType('backpackpasswordcanvas', PARAM_RAW);

        $mform->hideIf('backpackpasswordcanvas', 'includeauthdetailscanvas');

        $mform->hideIf('backpackpasswordcanvas', 'apiversion', 'ne', OPEN_BADGES_V2);

        $mform->hideIf('backpackpasswordcanvas', 'provider', 'ne', backpack_api::PROVIDER_CANVAS_CREDENTIALS);

    }

    /**

     * Add generic backpack issuer auth details.

     *

     * @param \stdClass|null $backpack The backpack instance.

     * @param string|null $email The issuer email or null if it's new.

     */

    protected function add_connect_issuer_fields(?\stdClass $backpack, ?string $email): void {

        $mform = $this->_form;

        // Checkbox and information to enable/disable issuer account.

        $mform->addElement(

            'advcheckbox',

            'includeauthdetails',

            null,

            '<strong>' . get_string('includeauthdetails', 'core_badges') . '</strong>',

        );

        if ($backpack && (!empty($backpack->backpackemail) || !empty($backpack->password))) {

            $mform->setDefault('includeauthdetails', 1);

        }

        $mform->addHelpButton('includeauthdetails', 'includeauthdetails', 'core_badges');

        $mform->hideIf('includeauthdetails', 'provider', 'eq', backpack_api::PROVIDER_CANVAS_CREDENTIALS);

        $mform->hideIf('includeauthdetails', 'apiversion', 'ne', OPEN_BADGES_V2);

        $mform->addElement('static', 'includeauthdetailsdesc', null, get_string('includeauthdetails_desc', 'core_badges'));

        $mform->hideIf('includeauthdetailsdesc', 'includeauthdetails');

        $mform->hideIf('includeauthdetailsdesc', 'provider', 'eq', backpack_api::PROVIDER_CANVAS_CREDENTIALS);

        // Email and password fields.

        $this->add_auth_fields($email);

    }

    /**

     * Add backpack specific auth details.

     *

     * @param string|null $email The email addressed provided or null if it's new.

     * @param bool $includepassword Include the password field. Defaults to true

     * @throws \coding_exception

     */

    protected function add_auth_fields(?string $email, bool $includepassword = true) {

        $mform = $this->_form;

        // Email.

        $mform->addElement('text', 'backpackemail', get_string('issueremail', 'core_badges'));

        $mform->setType('backpackemail', PARAM_EMAIL);

        $mform->setDefault('backpackemail', $email);

        $mform->hideIf('backpackemail', 'includeauthdetails');

        $mform->hideIf('backpackemail', 'apiversion', 'ne', OPEN_BADGES_V2);

        $mform->hideIf('backpackemail', 'provider', 'eq', backpack_api::PROVIDER_CANVAS_CREDENTIALS);

        // Password.

        if ($includepassword) {

            $mform->addElement('passwordunmask', 'password', get_string('password'));

            $mform->setType('password', PARAM_RAW);

        }

        $mform->hideIf('password', 'includeauthdetails');

        $mform->hideIf('password', 'apiversion', 'ne', OPEN_BADGES_V2);

        $mform->hideIf('password', 'provider', 'eq', backpack_api::PROVIDER_CANVAS_CREDENTIALS);

    }

}