[Summary view]

   1  <?php
   2  // This file is part of Moodle - http://moodle.org/
   3  //
   4  // Moodle is free software: you can redistribute it and/or modify
   5  // it under the terms of the GNU General Public License as published by
   6  // the Free Software Foundation, either version 3 of the License, or
   7  // (at your option) any later version.
   8  //
   9  // Moodle is distributed in the hope that it will be useful,
  10  // but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  // GNU General Public License for more details.
  13  //
  14  // You should have received a copy of the GNU General Public License
  15  // along with Moodle.  If not, see <http://www.gnu.org/licenses/>.
  16  
  17  
  18  /**
  19   * XML-RPC web service entry point. The authentication is done via tokens.
  20   *
  21   * @package    webservice_xmlrpc
  22   * @copyright  2009 Jerome Mouneyrac
  23   * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
  24   */
  25  
  26  /**
  27   * NO_DEBUG_DISPLAY - disable moodle specific debug messages and any errors in output
  28   */
  29  define('NO_DEBUG_DISPLAY', true);
  30  
  31  define('WS_SERVER', true);
  32  
  33  require('../../config.php');
  34  require_once("$CFG->dirroot/webservice/xmlrpc/locallib.php");
  35  
  36  if (!webservice_protocol_is_enabled('xmlrpc')) {
  37      debugging('The server died because the web services or the XMLRPC protocol are not enable',
  38          DEBUG_DEVELOPER);
  39      die;
  40  }
  41  
  42  $server = new webservice_xmlrpc_server(WEBSERVICE_AUTHMETHOD_PERMANENT_TOKEN);
  43  $server->run();
  44  die;
  45  
  46  /**
  47   * Raises Early WS Exception in XMLRPC format.
  48   *
  49   * @param  Exception $ex Raised exception.
  50   */
  51  function raise_early_ws_exception(Exception $ex): void {
  52      global $CFG;
  53      require_once("$CFG->dirroot/webservice/xmlrpc/locallib.php");
  54      $server = new webservice_xmlrpc_server(WEBSERVICE_AUTHMETHOD_PERMANENT_TOKEN);
  55      $server->exception_handler($ex);
  56  }
  57