[Summary view] [Print] [Text view]

   1  <?php
   2  /**
   3  * @version        $Id: index.php 14401 2010-01-26 14:10:00Z louis $
   4  * @package        Joomla
   5  * @subpackage    Installation
   6  * @copyright    Copyright (C) 2005 - 2010 Open Source Matters. All rights reserved.
   7  * @license        GNU/GPL, see LICENSE.php
   8  * Joomla! is free software and parts of it may contain or be derived from the
   9  * GNU General Public License or other free or open source software licenses.
  10  * See COPYRIGHT.php for copyright notices and details.
  11  */
  12  
  13  // Set flag that this is a parent file
  14  define( '_JEXEC', 1 );
  15  define( 'JPATH_BASE', dirname(__FILE__) );
  16  define( 'DS', DIRECTORY_SEPARATOR );
  17  
  18  require_once  JPATH_BASE.DS.'includes'.DS.'defines.php';
  19  require_once  JPATH_BASE.DS.'includes'.DS.'framework.php';
  20  
  21  // We want to echo the errors so that the xmlrpc client has a chance to capture them in the payload
  22  JError::setErrorHandling( E_ERROR,     'die' );
  23  JError::setErrorHandling( E_WARNING, 'echo' );
  24  JError::setErrorHandling( E_NOTICE,     'echo' );
  25  
  26  // create the mainframe object
  27  $mainframe =& JFactory::getApplication('xmlrpc');
  28  
  29  // Ensure that this application is enabled
  30  if (!$mainframe->getCfg('xmlrpc_server')) {
  31      JError::raiseError(403, 'XML-RPC Server not enabled.');
  32  }
  33  
  34  // Includes the required class file for the XML-RPC Server
  35  jimport('phpxmlrpc.xmlrpc');
  36  jimport('phpxmlrpc.xmlrpcs');
  37  
  38  // load all available remote calls
  39  JPluginHelper::importPlugin( 'xmlrpc' );
  40  $allCalls = $mainframe->triggerEvent( 'onGetWebServices' );
  41  $methodsArray = array();
  42  
  43  foreach ($allCalls as $calls) {
  44      $methodsArray = array_merge($methodsArray, $calls);
  45  }
  46  
  47  $xmlrpcServer = new xmlrpc_server($methodsArray, false);
  48  // allow casting to be defined by that actual values passed
  49  $xmlrpcServer->functions_parameters_type = 'phpvals';
  50  // define UTF-8 as the internal encoding for the XML-RPC server
  51  $xmlrpcServer->xml_header($mainframe->getEncoding());
  52  $xmlrpc_internalencoding = $mainframe->getEncoding();
  53  // debug level
  54  $xmlrpcServer->setDebug(0);
  55  // start the service
  56  $xmlrpcServer->service();
  57  ?>