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

/**

 * A curl wrapper for bbb.

 *

 * @package   mod_bigbluebuttonbn

 * @copyright 2021 Andrew Lyons <andrew@nicols.co.uk>

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

 */

namespace mod_bigbluebuttonbn\local\proxy;

use SimpleXMLElement;

defined('MOODLE_INTERNAL') || die;

global $CFG;

require_once("{$CFG->libdir}/filelib.php");

/**

 * A curl wrapper for bbb.

 *

 * @package   mod_bigbluebuttonbn

 * @copyright 2021 Andrew Lyons <andrew@nicols.co.uk>

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

 */

class curl extends \curl {

    /** @var string */

    protected $contenttype;

    /**

     * Constructor for the class.

     */

    public function __construct() {

        $settings = [];

        if (debugging()) {

            $settings = ['ignoresecurity' => true];

        }

        parent::__construct($settings);

        $this->setopt(['SSL_VERIFYPEER' => true]);

        $this->set_content_type('application/xml');

    }

    /**

     * Fetch the content type.

     */

    public function get_content_type(): string {

        return $this->contenttype;

    }

    /**

     * Set the desired current content type.

     *

     * @param string $type

     * @return self

     */

    public function set_content_type(string $type): self {

        $this->contenttype = $type;

        return $this;

    }

    /**

     * HTTP POST method

     *

     * @param string $url

     * @param array|string $params

     * @param array $options

     * @return null|SimpleXMLElement Null on error

     */

    public function post($url, $params = '', $options = []) {

        if (!is_string($params)) {

            debugging('Only string parameters are supported', DEBUG_DEVELOPER);

            $params = '';

        }

        $options = array_merge($options, [

            'CURLOPT_HTTPHEADER' => [

                'Content-Type: ' . $this->get_content_type(),

                'Content-Length: ' . strlen($params),

                'Content-Language: en-US',

            ]

        ]);

        return $this->handle_response(parent::post($url, $params, $options));

    }

    /**

     * Fetch the specified URL via a HEAD request.

     *

     * @param string $url

     * @param array $options

     */

    public function head($url, $options = []) {

        $options['followlocation'] = true;

        $options['timeout'] = 1;

        parent::head($url, $options);

        return $this->get_info();

    }

    /**

     * Fetch the specified URL via a GET request.

     *

     * @param string $url

     * @param string $params

     * @param array $options

     */

    public function get($url, $params = [], $options = []) {

        return $this->handle_response(parent::get($url, $params, $options));

    }

    /**

     * Handle the response.

     *

     * @param mixed $response

     * @return null|SimpleXMLElement Null on error

     */

    protected function handle_response($response): ?SimpleXMLElement {

        if (!$response) {

            debugging('No response returned for call', DEBUG_DEVELOPER);

            return null;

        }

        $previous = libxml_use_internal_errors(true);

        try {

            $xml = simplexml_load_string($response, 'SimpleXMLElement', LIBXML_NOCDATA | LIBXML_NOBLANKS);

        } catch (Exception $e) {

            libxml_use_internal_errors($previous);

            debugging('Caught exception: ' . $e->getMessage(), DEBUG_DEVELOPER);

            return null;

        }

        if ($xml instanceof SimpleXMLElement) {

            return $xml;

        }

        $debugabstract = html_to_text($response);

        $debugabstract = substr($debugabstract, 0, 1024); // Limit to small amount of info so we do not overload logs.

        debugging('Issue retrieving information from the server: ' . $debugabstract, DEBUG_DEVELOPER);

        return null;

    }

}