-<?php if ( ! defined('BASEPATH')) exit('No direct script access allowed');\r
-/**\r
- * CodeIgniter\r
- *\r
- * An open source application development framework for PHP 4.3.2 or newer\r
- *\r
- * @package CodeIgniter\r
- * @author ExpressionEngine Dev Team\r
- * @copyright Copyright (c) 2008, EllisLab, Inc.\r
- * @license http://codeigniter.com/user_guide/license.html\r
- * @link http://codeigniter.com\r
- * @since Version 1.0\r
- * @filesource\r
- */\r
-\r
-if ( ! function_exists('xml_parser_create'))\r
-{ \r
- show_error('Your PHP installation does not support XML');\r
-}\r
-\r
-if ( ! class_exists('CI_Xmlrpc'))\r
-{\r
- show_error('You must load the Xmlrpc class before loading the Xmlrpcs class in order to create a server.');\r
-}\r
-\r
-// ------------------------------------------------------------------------\r
-\r
-/**\r
- * XML-RPC server class\r
- *\r
- * @package CodeIgniter\r
- * @subpackage Libraries\r
- * @category XML-RPC\r
- * @author ExpressionEngine Dev Team\r
- * @link http://codeigniter.com/user_guide/libraries/xmlrpc.html\r
- */\r
-class CI_Xmlrpcs extends CI_Xmlrpc\r
-{\r
- var $methods = array(); //array of methods mapped to function names and signatures\r
- var $debug_msg = ''; // Debug Message\r
- var $system_methods = array(); // XML RPC Server methods\r
- var $controller_obj;\r
-\r
- var $object = FALSE;\r
- \r
- \r
- //-------------------------------------\r
- // Constructor, more or less\r
- //-------------------------------------\r
-\r
- function CI_Xmlrpcs($config=array())\r
- { \r
- parent::CI_Xmlrpc();\r
- $this->set_system_methods();\r
- \r
- if (isset($config['functions']) && is_array($config['functions']))\r
- {\r
- $this->methods = array_merge($this->methods, $config['functions']);\r
- }\r
- \r
- log_message('debug', "XML-RPC Server Class Initialized");\r
- }\r
- \r
- //-------------------------------------\r
- // Initialize Prefs and Serve\r
- //-------------------------------------\r
- \r
- function initialize($config=array())\r
- { \r
- if (isset($config['functions']) && is_array($config['functions']))\r
- {\r
- $this->methods = array_merge($this->methods, $config['functions']);\r
- }\r
- \r
- if (isset($config['debug']))\r
- {\r
- $this->debug = $config['debug'];\r
- }\r
- \r
- if (isset($config['object']) && is_object($config['object']))\r
- {\r
- $this->object = $config['object'];\r
- }\r
- }\r
- \r
- //-------------------------------------\r
- // Setting of System Methods\r
- //-------------------------------------\r
- \r
- function set_system_methods ()\r
- {\r
- $this->methods = array(\r
- 'system.listMethods' => array(\r
- 'function' => 'this.listMethods',\r
- 'signature' => array(array($this->xmlrpcArray, $this->xmlrpcString), array($this->xmlrpcArray)),\r
- 'docstring' => 'Returns an array of available methods on this server'),\r
- 'system.methodHelp' => array(\r
- 'function' => 'this.methodHelp',\r
- 'signature' => array(array($this->xmlrpcString, $this->xmlrpcString)),\r
- 'docstring' => 'Returns a documentation string for the specified method'),\r
- 'system.methodSignature' => array(\r
- 'function' => 'this.methodSignature',\r
- 'signature' => array(array($this->xmlrpcArray, $this->xmlrpcString)),\r
- 'docstring' => 'Returns an array describing the return type and required parameters of a method'),\r
- 'system.multicall' => array(\r
- 'function' => 'this.multicall',\r
- 'signature' => array(array($this->xmlrpcArray, $this->xmlrpcArray)),\r
- 'docstring' => 'Combine multiple RPC calls in one request. See http://www.xmlrpc.com/discuss/msgReader$1208 for details')\r
- );\r
- }\r
-\r
-\r
- //-------------------------------------\r
- // Main Server Function\r
- //-------------------------------------\r
- \r
- function serve()\r
- {\r
- $r = $this->parseRequest();\r
- $payload = '<?xml version="1.0" encoding="'.$this->xmlrpc_defencoding.'"?'.'>'."\n";\r
- $payload .= $this->debug_msg;\r
- $payload .= $r->prepare_response();\r
- \r
- header("Content-Type: text/xml");\r
- header("Content-Length: ".strlen($payload));\r
- echo $payload;\r
- }\r
-\r
- //-------------------------------------\r
- // Add Method to Class\r
- //-------------------------------------\r
- \r
- function add_to_map($methodname,$function,$sig,$doc)\r
- {\r
- $this->methods[$methodname] = array(\r
- 'function' => $function,\r
- 'signature' => $sig,\r
- 'docstring' => $doc\r
- );\r
- }\r
-\r
-\r
- //-------------------------------------\r
- // Parse Server Request\r
- //-------------------------------------\r
- \r
- function parseRequest($data='')\r
- {\r
- global $HTTP_RAW_POST_DATA;\r
- \r
- //-------------------------------------\r
- // Get Data\r
- //-------------------------------------\r
-\r
- if ($data == '')\r
- {\r
- $data = $HTTP_RAW_POST_DATA;\r
- }\r
-\r
- //-------------------------------------\r
- // Set up XML Parser\r
- //-------------------------------------\r
- \r
- $parser = xml_parser_create($this->xmlrpc_defencoding);\r
- $parser_object = new XML_RPC_Message("filler");\r
- \r
- $parser_object->xh[$parser] = array();\r
- $parser_object->xh[$parser]['isf'] = 0;\r
- $parser_object->xh[$parser]['isf_reason'] = '';\r
- $parser_object->xh[$parser]['params'] = array();\r
- $parser_object->xh[$parser]['stack'] = array();\r
- $parser_object->xh[$parser]['valuestack'] = array();\r
- $parser_object->xh[$parser]['method'] = '';\r
-\r
- xml_set_object($parser, $parser_object);\r
- xml_parser_set_option($parser, XML_OPTION_CASE_FOLDING, true);\r
- xml_set_element_handler($parser, 'open_tag', 'closing_tag');\r
- xml_set_character_data_handler($parser, 'character_data');\r
- //xml_set_default_handler($parser, 'default_handler');\r
- \r
- \r
- //-------------------------------------\r
- // PARSE + PROCESS XML DATA\r
- //------------------------------------- \r
- \r
- if ( ! xml_parse($parser, $data, 1))\r
- {\r
- // return XML error as a faultCode\r
- $r = new XML_RPC_Response(0,\r
- $this->xmlrpcerrxml + xml_get_error_code($parser),\r
- sprintf('XML error: %s at line %d',\r
- xml_error_string(xml_get_error_code($parser)),\r
- xml_get_current_line_number($parser)));\r
- xml_parser_free($parser);\r
- }\r
- elseif($parser_object->xh[$parser]['isf'])\r
- {\r
- return new XML_RPC_Response(0, $this->xmlrpcerr['invalid_return'], $this->xmlrpcstr['invalid_return']);\r
- }\r
- else\r
- {\r
- xml_parser_free($parser);\r
- \r
- $m = new XML_RPC_Message($parser_object->xh[$parser]['method']);\r
- $plist='';\r
- \r
- for($i=0; $i < sizeof($parser_object->xh[$parser]['params']); $i++)\r
- {\r
- if ($this->debug === TRUE)\r
- {\r
- $plist .= "$i - " . print_r(get_object_vars($parser_object->xh[$parser]['params'][$i]), TRUE). ";\n";\r
- }\r
- \r
- $m->addParam($parser_object->xh[$parser]['params'][$i]);\r
- }\r
- \r
- if ($this->debug === TRUE)\r
- {\r
- echo "<pre>";\r
- echo "---PLIST---\n" . $plist . "\n---PLIST END---\n\n";\r
- echo "</pre>";\r
- }\r
- \r
- $r = $this->_execute($m);\r
- }\r
- \r
- //-------------------------------------\r
- // SET DEBUGGING MESSAGE\r
- //------------------------------------- \r
- \r
- if ($this->debug === TRUE)\r
- {\r
- $this->debug_msg = "<!-- DEBUG INFO:\n\n".$plist."\n END DEBUG-->\n";\r
- }\r
- \r
- return $r;\r
- }\r
-\r
- //-------------------------------------\r
- // Executes the Method\r
- //-------------------------------------\r
- \r
- function _execute($m)\r
- {\r
- $methName = $m->method_name;\r
- \r
- // Check to see if it is a system call\r
- $system_call = (strncmp($methName, 'system', 5) == 0) ? TRUE : FALSE;\r
- \r
- //-------------------------------------\r
- // Valid Method\r
- //-------------------------------------\r
- \r
- if ( ! isset($this->methods[$methName]['function']))\r
- {\r
- return new XML_RPC_Response(0, $this->xmlrpcerr['unknown_method'], $this->xmlrpcstr['unknown_method']);\r
- }\r
- \r
- //-------------------------------------\r
- // Check for Method (and Object)\r
- //-------------------------------------\r
- \r
- $method_parts = explode(".", $this->methods[$methName]['function']);\r
- $objectCall = (isset($method_parts['1']) && $method_parts['1'] != "") ? TRUE : FALSE;\r
- \r
- if ($system_call === TRUE)\r
- {\r
- if ( ! is_callable(array($this,$method_parts['1'])))\r
- {\r
- return new XML_RPC_Response(0, $this->xmlrpcerr['unknown_method'], $this->xmlrpcstr['unknown_method']);\r
- }\r
- }\r
- else\r
- {\r
- if ($objectCall && ! is_callable(array($method_parts['0'],$method_parts['1'])))\r
- {\r
- return new XML_RPC_Response(0, $this->xmlrpcerr['unknown_method'], $this->xmlrpcstr['unknown_method']);\r
- }\r
- elseif ( ! $objectCall && ! is_callable($this->methods[$methName]['function']))\r
- {\r
- return new XML_RPC_Response(0, $this->xmlrpcerr['unknown_method'], $this->xmlrpcstr['unknown_method']);\r
- }\r
- }\r
- \r
- //-------------------------------------\r
- // Checking Methods Signature\r
- //-------------------------------------\r
- \r
- if (isset($this->methods[$methName]['signature']))\r
- {\r
- $sig = $this->methods[$methName]['signature'];\r
- for($i=0; $i<sizeof($sig); $i++)\r
- {\r
- $current_sig = $sig[$i];\r
- \r
- if (sizeof($current_sig) == sizeof($m->params)+1)\r
- {\r
- for($n=0; $n < sizeof($m->params); $n++)\r
- {\r
- $p = $m->params[$n];\r
- $pt = ($p->kindOf() == 'scalar') ? $p->scalarval() : $p->kindOf();\r
- \r
- if ($pt != $current_sig[$n+1])\r
- {\r
- $pno = $n+1;\r
- $wanted = $current_sig[$n+1];\r
- \r
- return new XML_RPC_Response(0,\r
- $this->xmlrpcerr['incorrect_params'],\r
- $this->xmlrpcstr['incorrect_params'] .\r
- ": Wanted {$wanted}, got {$pt} at param {$pno})");\r
- }\r
- }\r
- }\r
- }\r
- }\r
-\r
- //-------------------------------------\r
- // Calls the Function\r
- //-------------------------------------\r
-\r
- if ($objectCall === TRUE)\r
- {\r
- if ($method_parts[0] == "this" && $system_call == TRUE)\r
- {\r
- return call_user_func(array($this, $method_parts[1]), $m);\r
- }\r
- else\r
- {\r
- if ($this->object === FALSE)\r
- {\r
- $CI =& get_instance();\r
- return $CI->$method_parts['1']($m);\r
- }\r
- else\r
- {\r
- return $this->object->$method_parts['1']($m);\r
- //return call_user_func(array(&$method_parts['0'],$method_parts['1']), $m);\r
- }\r
- }\r
- }\r
- else\r
- {\r
- return call_user_func($this->methods[$methName]['function'], $m);\r
- }\r
- }\r
- \r
- \r
- //-------------------------------------\r
- // Server Function: List Methods\r
- //-------------------------------------\r
- \r
- function listMethods($m)\r
- {\r
- $v = new XML_RPC_Values();\r
- $output = array();\r
- \r
- foreach($this->methods as $key => $value)\r
- {\r
- $output[] = new XML_RPC_Values($key, 'string');\r
- }\r
- \r
- foreach($this->system_methods as $key => $value)\r
- {\r
- $output[]= new XML_RPC_Values($key, 'string');\r
- }\r
-\r
- $v->addArray($output);\r
- return new XML_RPC_Response($v);\r
- }\r
- \r
- //-------------------------------------\r
- // Server Function: Return Signature for Method\r
- //-------------------------------------\r
- \r
- function methodSignature($m)\r
- {\r
- $parameters = $m->output_parameters();\r
- $method_name = $parameters[0];\r
- \r
- if (isset($this->methods[$method_name]))\r
- {\r
- if ($this->methods[$method_name]['signature'])\r
- {\r
- $sigs = array();\r
- $signature = $this->methods[$method_name]['signature'];\r
- \r
- for($i=0; $i < sizeof($signature); $i++)\r
- {\r
- $cursig = array();\r
- $inSig = $signature[$i];\r
- for($j=0; $j<sizeof($inSig); $j++)\r
- {\r
- $cursig[]= new XML_RPC_Values($inSig[$j], 'string');\r
- }\r
- $sigs[]= new XML_RPC_Values($cursig, 'array');\r
- }\r
- $r = new XML_RPC_Response(new XML_RPC_Values($sigs, 'array'));\r
- }\r
- else\r
- {\r
- $r = new XML_RPC_Response(new XML_RPC_Values('undef', 'string'));\r
- }\r
- }\r
- else\r
- {\r
- $r = new XML_RPC_Response(0,$this->xmlrpcerr['introspect_unknown'], $this->xmlrpcstr['introspect_unknown']);\r
- }\r
- return $r;\r
- }\r
- \r
- //-------------------------------------\r
- // Server Function: Doc String for Method\r
- //-------------------------------------\r
- \r
- function methodHelp($m)\r
- {\r
- $parameters = $m->output_parameters();\r
- $method_name = $parameters[0];\r
- \r
- if (isset($this->methods[$method_name]))\r
- {\r
- $docstring = isset($this->methods[$method_name]['docstring']) ? $this->methods[$method_name]['docstring'] : '';\r
- \r
- return new XML_RPC_Response(new XML_RPC_Values($docstring, 'string'));\r
- }\r
- else\r
- {\r
- return new XML_RPC_Response(0, $this->xmlrpcerr['introspect_unknown'], $this->xmlrpcstr['introspect_unknown']);\r
- }\r
- }\r
-\r
- //-------------------------------------\r
- // Server Function: Multi-call\r
- //-------------------------------------\r
-\r
- function multicall($m)\r
- {\r
- // Disabled\r
- return new XML_RPC_Response(0, $this->xmlrpcerr['unknown_method'], $this->xmlrpcstr['unknown_method']);\r
- \r
- $parameters = $m->output_parameters();\r
- $calls = $parameters[0];\r
-\r
- $result = array();\r
-\r
- foreach ($calls as $value)\r
- {\r
- //$attempt = $this->_execute(new XML_RPC_Message($value[0], $value[1]));\r
- \r
- $m = new XML_RPC_Message($value[0]);\r
- $plist='';\r
- \r
- for($i=0; $i < sizeof($value[1]); $i++)\r
- {\r
- $m->addParam(new XML_RPC_Values($value[1][$i], 'string'));\r
- }\r
- \r
- $attempt = $this->_execute($m);\r
-\r
- if ($attempt->faultCode() != 0)\r
- {\r
- return $attempt;\r
- }\r
-\r
- $result[] = new XML_RPC_Values(array($attempt->value()), 'array');\r
- }\r
-\r
- return new XML_RPC_Response(new XML_RPC_Values($result, 'array'));\r
- }\r
- \r
- \r
- //-------------------------------------\r
- // Multi-call Function: Error Handling\r
- //-------------------------------------\r
-\r
- function multicall_error($err)\r
- {\r
- $str = is_string($err) ? $this->xmlrpcstr["multicall_${err}"] : $err->faultString();\r
- $code = is_string($err) ? $this->xmlrpcerr["multicall_${err}"] : $err->faultCode();\r
- \r
- $struct['faultCode'] = new XML_RPC_Values($code, 'int');\r
- $struct['faultString'] = new XML_RPC_Values($str, 'string');\r
- \r
- return new XML_RPC_Values($struct, 'struct');\r
- }\r
- \r
- \r
- //-------------------------------------\r
- // Multi-call Function: Processes method\r
- //-------------------------------------\r
- \r
- function do_multicall($call)\r
- {\r
- if ($call->kindOf() != 'struct')\r
- return $this->multicall_error('notstruct');\r
- elseif ( ! $methName = $call->me['struct']['methodName'])\r
- return $this->multicall_error('nomethod');\r
- \r
- list($scalar_type,$scalar_value)=each($methName->me);\r
- $scalar_type = $scalar_type == $this->xmlrpcI4 ? $this->xmlrpcInt : $scalar_type;\r
- \r
- if ($methName->kindOf() != 'scalar' OR $scalar_type != 'string')\r
- return $this->multicall_error('notstring');\r
- elseif ($scalar_value == 'system.multicall')\r
- return $this->multicall_error('recursion');\r
- elseif ( ! $params = $call->me['struct']['params'])\r
- return $this->multicall_error('noparams');\r
- elseif ($params->kindOf() != 'array')\r
- return $this->multicall_error('notarray');\r
- \r
- list($a,$b)=each($params->me);\r
- $numParams = sizeof($b);\r
-\r
- $msg = new XML_RPC_Message($scalar_value);\r
- for ($i = 0; $i < $numParams; $i++)\r
- {\r
- $msg->params[] = $params->me['array'][$i];\r
- }\r
-\r
- $result = $this->_execute($msg);\r
-\r
- if ($result->faultCode() != 0)\r
- {\r
- return $this->multicall_error($result);\r
- }\r
-\r
- return new XML_RPC_Values(array($result->value()), 'array');\r
- } \r
- \r
-}\r
-// END XML_RPC_Server class\r
-\r
-\r
-/* End of file Xmlrpcs.php */\r
+<?php if ( ! defined('BASEPATH')) exit('No direct script access allowed');
+/**
+ * CodeIgniter
+ *
+ * An open source application development framework for PHP 4.3.2 or newer
+ *
+ * @package CodeIgniter
+ * @author ExpressionEngine Dev Team
+ * @copyright Copyright (c) 2008, EllisLab, Inc.
+ * @license http://codeigniter.com/user_guide/license.html
+ * @link http://codeigniter.com
+ * @since Version 1.0
+ * @filesource
+ */
+
+if ( ! function_exists('xml_parser_create'))
+{
+ show_error('Your PHP installation does not support XML');
+}
+
+if ( ! class_exists('CI_Xmlrpc'))
+{
+ show_error('You must load the Xmlrpc class before loading the Xmlrpcs class in order to create a server.');
+}
+
+// ------------------------------------------------------------------------
+
+/**
+ * XML-RPC server class
+ *
+ * @package CodeIgniter
+ * @subpackage Libraries
+ * @category XML-RPC
+ * @author ExpressionEngine Dev Team
+ * @link http://codeigniter.com/user_guide/libraries/xmlrpc.html
+ */
+class CI_Xmlrpcs extends CI_Xmlrpc
+{
+ var $methods = array(); //array of methods mapped to function names and signatures
+ var $debug_msg = ''; // Debug Message
+ var $system_methods = array(); // XML RPC Server methods
+ var $controller_obj;
+
+ var $object = FALSE;
+
+
+ //-------------------------------------
+ // Constructor, more or less
+ //-------------------------------------
+
+ function CI_Xmlrpcs($config=array())
+ {
+ parent::CI_Xmlrpc();
+ $this->set_system_methods();
+
+ if (isset($config['functions']) && is_array($config['functions']))
+ {
+ $this->methods = array_merge($this->methods, $config['functions']);
+ }
+
+ log_message('debug', "XML-RPC Server Class Initialized");
+ }
+
+ //-------------------------------------
+ // Initialize Prefs and Serve
+ //-------------------------------------
+
+ function initialize($config=array())
+ {
+ if (isset($config['functions']) && is_array($config['functions']))
+ {
+ $this->methods = array_merge($this->methods, $config['functions']);
+ }
+
+ if (isset($config['debug']))
+ {
+ $this->debug = $config['debug'];
+ }
+
+ if (isset($config['object']) && is_object($config['object']))
+ {
+ $this->object = $config['object'];
+ }
+ }
+
+ //-------------------------------------
+ // Setting of System Methods
+ //-------------------------------------
+
+ function set_system_methods ()
+ {
+ $this->methods = array(
+ 'system.listMethods' => array(
+ 'function' => 'this.listMethods',
+ 'signature' => array(array($this->xmlrpcArray, $this->xmlrpcString), array($this->xmlrpcArray)),
+ 'docstring' => 'Returns an array of available methods on this server'),
+ 'system.methodHelp' => array(
+ 'function' => 'this.methodHelp',
+ 'signature' => array(array($this->xmlrpcString, $this->xmlrpcString)),
+ 'docstring' => 'Returns a documentation string for the specified method'),
+ 'system.methodSignature' => array(
+ 'function' => 'this.methodSignature',
+ 'signature' => array(array($this->xmlrpcArray, $this->xmlrpcString)),
+ 'docstring' => 'Returns an array describing the return type and required parameters of a method'),
+ 'system.multicall' => array(
+ 'function' => 'this.multicall',
+ 'signature' => array(array($this->xmlrpcArray, $this->xmlrpcArray)),
+ 'docstring' => 'Combine multiple RPC calls in one request. See http://www.xmlrpc.com/discuss/msgReader$1208 for details')
+ );
+ }
+
+
+ //-------------------------------------
+ // Main Server Function
+ //-------------------------------------
+
+ function serve()
+ {
+ $r = $this->parseRequest();
+ $payload = '<?xml version="1.0" encoding="'.$this->xmlrpc_defencoding.'"?'.'>'."\n";
+ $payload .= $this->debug_msg;
+ $payload .= $r->prepare_response();
+
+ header("Content-Type: text/xml");
+ header("Content-Length: ".strlen($payload));
+ echo $payload;
+ }
+
+ //-------------------------------------
+ // Add Method to Class
+ //-------------------------------------
+
+ function add_to_map($methodname,$function,$sig,$doc)
+ {
+ $this->methods[$methodname] = array(
+ 'function' => $function,
+ 'signature' => $sig,
+ 'docstring' => $doc
+ );
+ }
+
+
+ //-------------------------------------
+ // Parse Server Request
+ //-------------------------------------
+
+ function parseRequest($data='')
+ {
+ global $HTTP_RAW_POST_DATA;
+
+ //-------------------------------------
+ // Get Data
+ //-------------------------------------
+
+ if ($data == '')
+ {
+ $data = $HTTP_RAW_POST_DATA;
+ }
+
+ //-------------------------------------
+ // Set up XML Parser
+ //-------------------------------------
+
+ $parser = xml_parser_create($this->xmlrpc_defencoding);
+ $parser_object = new XML_RPC_Message("filler");
+
+ $parser_object->xh[$parser] = array();
+ $parser_object->xh[$parser]['isf'] = 0;
+ $parser_object->xh[$parser]['isf_reason'] = '';
+ $parser_object->xh[$parser]['params'] = array();
+ $parser_object->xh[$parser]['stack'] = array();
+ $parser_object->xh[$parser]['valuestack'] = array();
+ $parser_object->xh[$parser]['method'] = '';
+
+ xml_set_object($parser, $parser_object);
+ xml_parser_set_option($parser, XML_OPTION_CASE_FOLDING, true);
+ xml_set_element_handler($parser, 'open_tag', 'closing_tag');
+ xml_set_character_data_handler($parser, 'character_data');
+ //xml_set_default_handler($parser, 'default_handler');
+
+
+ //-------------------------------------
+ // PARSE + PROCESS XML DATA
+ //-------------------------------------
+
+ if ( ! xml_parse($parser, $data, 1))
+ {
+ // return XML error as a faultCode
+ $r = new XML_RPC_Response(0,
+ $this->xmlrpcerrxml + xml_get_error_code($parser),
+ sprintf('XML error: %s at line %d',
+ xml_error_string(xml_get_error_code($parser)),
+ xml_get_current_line_number($parser)));
+ xml_parser_free($parser);
+ }
+ elseif($parser_object->xh[$parser]['isf'])
+ {
+ return new XML_RPC_Response(0, $this->xmlrpcerr['invalid_return'], $this->xmlrpcstr['invalid_return']);
+ }
+ else
+ {
+ xml_parser_free($parser);
+
+ $m = new XML_RPC_Message($parser_object->xh[$parser]['method']);
+ $plist='';
+
+ for($i=0; $i < sizeof($parser_object->xh[$parser]['params']); $i++)
+ {
+ if ($this->debug === TRUE)
+ {
+ $plist .= "$i - " . print_r(get_object_vars($parser_object->xh[$parser]['params'][$i]), TRUE). ";\n";
+ }
+
+ $m->addParam($parser_object->xh[$parser]['params'][$i]);
+ }
+
+ if ($this->debug === TRUE)
+ {
+ echo "<pre>";
+ echo "---PLIST---\n" . $plist . "\n---PLIST END---\n\n";
+ echo "</pre>";
+ }
+
+ $r = $this->_execute($m);
+ }
+
+ //-------------------------------------
+ // SET DEBUGGING MESSAGE
+ //-------------------------------------
+
+ if ($this->debug === TRUE)
+ {
+ $this->debug_msg = "<!-- DEBUG INFO:\n\n".$plist."\n END DEBUG-->\n";
+ }
+
+ return $r;
+ }
+
+ //-------------------------------------
+ // Executes the Method
+ //-------------------------------------
+
+ function _execute($m)
+ {
+ $methName = $m->method_name;
+
+ // Check to see if it is a system call
+ $system_call = (strncmp($methName, 'system', 5) == 0) ? TRUE : FALSE;
+
+ //-------------------------------------
+ // Valid Method
+ //-------------------------------------
+
+ if ( ! isset($this->methods[$methName]['function']))
+ {
+ return new XML_RPC_Response(0, $this->xmlrpcerr['unknown_method'], $this->xmlrpcstr['unknown_method']);
+ }
+
+ //-------------------------------------
+ // Check for Method (and Object)
+ //-------------------------------------
+
+ $method_parts = explode(".", $this->methods[$methName]['function']);
+ $objectCall = (isset($method_parts['1']) && $method_parts['1'] != "") ? TRUE : FALSE;
+
+ if ($system_call === TRUE)
+ {
+ if ( ! is_callable(array($this,$method_parts['1'])))
+ {
+ return new XML_RPC_Response(0, $this->xmlrpcerr['unknown_method'], $this->xmlrpcstr['unknown_method']);
+ }
+ }
+ else
+ {
+ if ($objectCall && ! is_callable(array($method_parts['0'],$method_parts['1'])))
+ {
+ return new XML_RPC_Response(0, $this->xmlrpcerr['unknown_method'], $this->xmlrpcstr['unknown_method']);
+ }
+ elseif ( ! $objectCall && ! is_callable($this->methods[$methName]['function']))
+ {
+ return new XML_RPC_Response(0, $this->xmlrpcerr['unknown_method'], $this->xmlrpcstr['unknown_method']);
+ }
+ }
+
+ //-------------------------------------
+ // Checking Methods Signature
+ //-------------------------------------
+
+ if (isset($this->methods[$methName]['signature']))
+ {
+ $sig = $this->methods[$methName]['signature'];
+ for($i=0; $i<sizeof($sig); $i++)
+ {
+ $current_sig = $sig[$i];
+
+ if (sizeof($current_sig) == sizeof($m->params)+1)
+ {
+ for($n=0; $n < sizeof($m->params); $n++)
+ {
+ $p = $m->params[$n];
+ $pt = ($p->kindOf() == 'scalar') ? $p->scalarval() : $p->kindOf();
+
+ if ($pt != $current_sig[$n+1])
+ {
+ $pno = $n+1;
+ $wanted = $current_sig[$n+1];
+
+ return new XML_RPC_Response(0,
+ $this->xmlrpcerr['incorrect_params'],
+ $this->xmlrpcstr['incorrect_params'] .
+ ": Wanted {$wanted}, got {$pt} at param {$pno})");
+ }
+ }
+ }
+ }
+ }
+
+ //-------------------------------------
+ // Calls the Function
+ //-------------------------------------
+
+ if ($objectCall === TRUE)
+ {
+ if ($method_parts[0] == "this" && $system_call == TRUE)
+ {
+ return call_user_func(array($this, $method_parts[1]), $m);
+ }
+ else
+ {
+ if ($this->object === FALSE)
+ {
+ $CI =& get_instance();
+ return $CI->$method_parts['1']($m);
+ }
+ else
+ {
+ return $this->object->$method_parts['1']($m);
+ //return call_user_func(array(&$method_parts['0'],$method_parts['1']), $m);
+ }
+ }
+ }
+ else
+ {
+ return call_user_func($this->methods[$methName]['function'], $m);
+ }
+ }
+
+
+ //-------------------------------------
+ // Server Function: List Methods
+ //-------------------------------------
+
+ function listMethods($m)
+ {
+ $v = new XML_RPC_Values();
+ $output = array();
+
+ foreach($this->methods as $key => $value)
+ {
+ $output[] = new XML_RPC_Values($key, 'string');
+ }
+
+ foreach($this->system_methods as $key => $value)
+ {
+ $output[]= new XML_RPC_Values($key, 'string');
+ }
+
+ $v->addArray($output);
+ return new XML_RPC_Response($v);
+ }
+
+ //-------------------------------------
+ // Server Function: Return Signature for Method
+ //-------------------------------------
+
+ function methodSignature($m)
+ {
+ $parameters = $m->output_parameters();
+ $method_name = $parameters[0];
+
+ if (isset($this->methods[$method_name]))
+ {
+ if ($this->methods[$method_name]['signature'])
+ {
+ $sigs = array();
+ $signature = $this->methods[$method_name]['signature'];
+
+ for($i=0; $i < sizeof($signature); $i++)
+ {
+ $cursig = array();
+ $inSig = $signature[$i];
+ for($j=0; $j<sizeof($inSig); $j++)
+ {
+ $cursig[]= new XML_RPC_Values($inSig[$j], 'string');
+ }
+ $sigs[]= new XML_RPC_Values($cursig, 'array');
+ }
+ $r = new XML_RPC_Response(new XML_RPC_Values($sigs, 'array'));
+ }
+ else
+ {
+ $r = new XML_RPC_Response(new XML_RPC_Values('undef', 'string'));
+ }
+ }
+ else
+ {
+ $r = new XML_RPC_Response(0,$this->xmlrpcerr['introspect_unknown'], $this->xmlrpcstr['introspect_unknown']);
+ }
+ return $r;
+ }
+
+ //-------------------------------------
+ // Server Function: Doc String for Method
+ //-------------------------------------
+
+ function methodHelp($m)
+ {
+ $parameters = $m->output_parameters();
+ $method_name = $parameters[0];
+
+ if (isset($this->methods[$method_name]))
+ {
+ $docstring = isset($this->methods[$method_name]['docstring']) ? $this->methods[$method_name]['docstring'] : '';
+
+ return new XML_RPC_Response(new XML_RPC_Values($docstring, 'string'));
+ }
+ else
+ {
+ return new XML_RPC_Response(0, $this->xmlrpcerr['introspect_unknown'], $this->xmlrpcstr['introspect_unknown']);
+ }
+ }
+
+ //-------------------------------------
+ // Server Function: Multi-call
+ //-------------------------------------
+
+ function multicall($m)
+ {
+ // Disabled
+ return new XML_RPC_Response(0, $this->xmlrpcerr['unknown_method'], $this->xmlrpcstr['unknown_method']);
+
+ $parameters = $m->output_parameters();
+ $calls = $parameters[0];
+
+ $result = array();
+
+ foreach ($calls as $value)
+ {
+ //$attempt = $this->_execute(new XML_RPC_Message($value[0], $value[1]));
+
+ $m = new XML_RPC_Message($value[0]);
+ $plist='';
+
+ for($i=0; $i < sizeof($value[1]); $i++)
+ {
+ $m->addParam(new XML_RPC_Values($value[1][$i], 'string'));
+ }
+
+ $attempt = $this->_execute($m);
+
+ if ($attempt->faultCode() != 0)
+ {
+ return $attempt;
+ }
+
+ $result[] = new XML_RPC_Values(array($attempt->value()), 'array');
+ }
+
+ return new XML_RPC_Response(new XML_RPC_Values($result, 'array'));
+ }
+
+
+ //-------------------------------------
+ // Multi-call Function: Error Handling
+ //-------------------------------------
+
+ function multicall_error($err)
+ {
+ $str = is_string($err) ? $this->xmlrpcstr["multicall_${err}"] : $err->faultString();
+ $code = is_string($err) ? $this->xmlrpcerr["multicall_${err}"] : $err->faultCode();
+
+ $struct['faultCode'] = new XML_RPC_Values($code, 'int');
+ $struct['faultString'] = new XML_RPC_Values($str, 'string');
+
+ return new XML_RPC_Values($struct, 'struct');
+ }
+
+
+ //-------------------------------------
+ // Multi-call Function: Processes method
+ //-------------------------------------
+
+ function do_multicall($call)
+ {
+ if ($call->kindOf() != 'struct')
+ return $this->multicall_error('notstruct');
+ elseif ( ! $methName = $call->me['struct']['methodName'])
+ return $this->multicall_error('nomethod');
+
+ list($scalar_type,$scalar_value)=each($methName->me);
+ $scalar_type = $scalar_type == $this->xmlrpcI4 ? $this->xmlrpcInt : $scalar_type;
+
+ if ($methName->kindOf() != 'scalar' OR $scalar_type != 'string')
+ return $this->multicall_error('notstring');
+ elseif ($scalar_value == 'system.multicall')
+ return $this->multicall_error('recursion');
+ elseif ( ! $params = $call->me['struct']['params'])
+ return $this->multicall_error('noparams');
+ elseif ($params->kindOf() != 'array')
+ return $this->multicall_error('notarray');
+
+ list($a,$b)=each($params->me);
+ $numParams = sizeof($b);
+
+ $msg = new XML_RPC_Message($scalar_value);
+ for ($i = 0; $i < $numParams; $i++)
+ {
+ $msg->params[] = $params->me['array'][$i];
+ }
+
+ $result = $this->_execute($msg);
+
+ if ($result->faultCode() != 0)
+ {
+ return $this->multicall_error($result);
+ }
+
+ return new XML_RPC_Values(array($result->value()), 'array');
+ }
+
+}
+// END XML_RPC_Server class
+
+
+/* End of file Xmlrpcs.php */
/* Location: ./system/libraries/Xmlrpcs.php */
\ No newline at end of file