php xml-rpc远程调用

<div class="codetitle"><a style="CURSOR: pointer" data="30576" class="copybut" id="copybut30576" onclick="doCopy('code30576')"> 代码如下:<div class="codebody" id="code30576">
<?php
/
从网上找来的XML-RPC库，对于开发小型的外部通讯接口很有用
/ function & XML_serialize($data,$level = 0,$prior_key = NULL){
#assumes a hash,keys are the variable names
$xml_serialized_string = "";
while(list($key,$value) = each($data)){
$inline = false;
$numeric_array = false;
$attributes = "";
#echo "My current key is '$key',called with prior key '$prior_key'
";
if(!strstr($key," attr")){ #if it's not an attribute
if(array_key_exists("$key attr",$data)){
while(list($attr_name,$attr_value) = each($data["$key attr"])){
#echo "Found attribute $attribute_name with value $attribute_value
";
$attr_value = &htmlspecialchars($attr_value,ENT_QUOTES);
$attributes .= " $attr_name="$attr_value"";
}
} if(is_numeric($key)){
#echo "My current key ($key) is numeric. My parent key is '$prior_key'
";
$key = $prior_key;
}else{
#you can't have numeric keys at two levels in a row,so this is ok
#echo "Checking to see if a numeric key exists in data.";
if(is_array($value) and array_key_exists(0,$value)){
# echo " It does! Calling myself as a result of a numeric array.
";
$numeric_array = true;
$xml_serialized_string .= XML_serialize($value,$level,$key);
}
#echo "
";
} if(!$numeric_array){
$xml_serialized_string .= str_repeat("t",$level) . "<$key$attributes>"; if(is_array($value)){
$xml_serialized_string .= "rn" . XML_serialize($value,$level+1);
}else{
$inline = true;
$xml_serialized_string .= htmlspecialchars($value);
} $xml_serialized_string .= (!$inline ? str_repeat("t",$level) : "") . "</$key>rn";
}
}else{
#echo "Skipping attribute record for key $key
";
}
}
if($level == 0){
$xml_serialized_string = "<?xml version="1.0" ?>rn" . $xml_serialized_string;
return $xml_serialized_string;
}else{
return $xml_serialized_string;
}
} class XML {
var $parser; #a reference to the XML parser
var $document; #the entire XML structure built up so far
var $current; #a pointer to the current item - what is this
var $parent; #a pointer to the current parent - the parent will be an array
var $parents; #an array of the most recent parent at each level var $last_opened_tag; function XML($data=null){
$this->parser = xml_parser_create(); xml_parser_set_option ($this->parser,XML_OPTION_CASE_FOLDING,0);
xml_set_object($this->parser,$this);
xml_set_element_handler($this->parser,"open","close");
xml_set_character_data_handler($this->parser,"data");
# register_shutdown_function(array($this,'destruct'));
} function destruct(){
xml_parser_free($this->parser);
} function parse($data){
$this->document = array();
$this->parent = $this->document;
$this->parents = array();
$this->last_opened_tag = NULL;
xml_parse($this->parser,$data);
return $this->document;
} function open($parser,$tag,$attributes){
#echo "Opening tag $tag
n";
$this->data = "";
$this->last_opened_tag = $tag; #tag is a string
if(array_key_exists($tag,$this->parent)){
#echo "There's already an instance of '$tag' at the current level ($level)
n";
if(is_array($this->parent[$tag]) and array_key_exists(0,$this->parent[$tag])){ #if the keys are numeric
#need to make sure they're numeric (account for attributes)
$key = count_numeric_items($this->parent[$tag]);
#echo "There are $key instances: the keys are numeric.
n";
}else{
#echo "There is only one instance. Shifting everything around
n";
$temp = $this->parent[$tag];
unset($this->parent[$tag]);
$this->parent[$tag][0] = $temp; if(array_key_exists("$tag attr",$this->parent)){
#shift the attributes around too if they exist
$temp = $this->parent["$tag attr"];
unset($this->parent["$tag attr"]);
$this->parent[$tag]["0 attr"] = $temp;
}
$key = 1;
}
$this->parent = $this->parent[$tag];
}else{
$key = $tag;
}
if($attributes){
$this->parent["$key attr"] = $attributes;
} $this->parent[$key] = array();
$this->parent = $this->parent[$key];
array_unshift($this->parents,$this->parent);
} function data($parser,$data){
#echo "Data is '",htmlspecialchars($data),"'
n";
if($this->last_opened_tag != NULL){
$this->data .= $data;
}
} function close($parser,$tag){
#echo "Close tag $tag
n";
if($this->last_opened_tag == $tag){
$this->parent = $this->data;
$this->last_opened_tag = NULL;
}
array_shift($this->parents);
$this->parent = $this->parents[0];
}
} function & XML_unserialize($xml){
$xml_parser = new XML();
$data = $xml_parser->parse($xml);
$xml_parser->destruct();
return $data;
} function & XMLRPC_parse($request){
if(defined('XMLRPC_DEBUG') and XMLRPC_DEBUG){
XMLRPC_debug('XMLRPC_parse',"

Received the following raw request:

Returning the following parsed request:

Received the following parameter list to send:

Connection failed: Couldn't make the connection to $site.

Sent the following request:

Received the following response:

Which was serialized into the following data:

Returning:

Received the following data to return:

Sent the following response:

Sent the following error response:

No debugging information available yet.

" . htmlspecialchars($output) . "

",htmlspecialchars($output),"