Birk

<?php
/*****
 * We start witht the functions we wan't to be web services.
 * Each of them must have 3 arguments:
 * 1st: This is the method name, which the client requests.
 * 2nd: This one is the arguments, which the client sends with the request.
 * 3rd: This data is specified by the server it self.
 *****/
function xmlEcho($method, $args, $appData)
{
    return 'Come again: '. $args[0];
}
 
// Just for the fun of it, let's make 2 function:
function xmlAllToUpper($method, $args, $appData)
{
    for ($i = 0; $i < count($args); $i++) {
        $args[$i] = strToUpper($args[$i]);
    }
 
    return $args;
}
 
 
/*****
 * Next up we'll assign the XML-RPC server handle to a variable.
 * I've chosen this "sneaky" name: $xmlServer * But you can think of this
 * as any other handle, for example, when you're working with a database, 
 * you have the connection handle, it's the same thing.
 *****/
$xmlServer = xmlrpc_server_create();
 
 
/*****
 * Now that's done it's time to tell the server which functions the
 * client can request. This is done with the xmlrpc_server_register_method
 * function (why can't they come up with some short names!). This function
 * requires 3 arguments:
 * 1st: The server handle, we just specified above.
 * 2nd: The function name, which the client calls.
 * 3rd: The function name, to run.
 *
 * This means that your function dosn't have to be named the same as the
 * function the client calls.
 *****/
xmlrpc_server_register_method($server, 'echo', 'xmlEcho');
xmlrpc_server_register_method($server, 'goLarge', 'xmlAllToUpper');
 
 
/*****
 * We need to get what ever request the client send us.
 * This is done with the $HTTP_RAW_POST_DATA variable. Nothing more
 * to say about that, so I'll just give you yet another dumb ass
 * comment ... That was it.
 *****/
$xmlRequest = $HTTP_RAW_POST_DATA;
 
 
/*****
 * We have all we need now, for the server to call the function, the
 * client requested.
 * To call this function, we use this (again rediculesly long) function:
 * xmlrpc_server_call_method, which as always take 3 arguments:
 * 1st: The server handle.
 * 2nd: The client request we just got above.
 * 3rd: What ever data you (as the server) want to send, this
 *      will be passed into the $appData variable.
 *****/
$xmlResponse = xmlrpc_server_call_method($xmlServer, $xmlRequest, NULL);
 
// Prepare the header contents so it sends XML
header('Content-Type: text/xml');
 
echo $xmlResponse;
 
xmlrpc_server_destroy($xmlServer);
?>

<?php
/*****
 * First off we'll be making a function, to send our request to the
 * server.
 * This is where the feared socket programming makes it appearence,
 * take a notice at the default value for port, some people have
 * (for reasons only god may know).
 *****/
function sendRequest($host, $url, $request, $port = 80)
{
    // First off we open a connection to the server.
    if ( !$sock = fsockopen($host, $port, $errNo, $errString) ) {
        echo 'Error: '. $errNo . ' - '. $errString;
        return FALSE;
    }
 
    /*****
     * We prepare the HTTP header, in our request.
     * Notice we set the Content-Type to text/xml (just notice...).
     *****/
    $httpQuery = "POST ". $url ." HTTP/1.0\n";
    $httpQuery .= "User-Agent: xmlrpc\n";
    $httpQuery .= "Host: ". $host ."\n";
    $httpQuery .= "Content-Type: text/xml\n";
    $httpQuery .= "Content-Length: ". strlen($request) ."\n\n";
    $httpQuery .= $request ."\n";
 
    // Here we send the request to the server
    if ( !fwrite($sock, $httpQuery, strlen($httpQuery)) ) {
        echo 'Error while trying to send request';
        return FALSE;
    }
 
    // We get the response from the server
    while ( !feof($sock) ) {
        $xmlResponse .= fgets($sock);
    }
 
    // Closing the connection
    fclose($sock);
 
    // We strip the response from it's HTTP header
    $xmlResponse = substr($xmlResponse, strpos($xmlResponse, "\r\n\r\n") +4);
 
    /*****
     * To decode the XML into PHP, we use the (finaly a short function)
     * xmlrpc_decode function. And that should've done the trick.
     * We now have what ever the server function made in our $xmlRespnse
     * variable.
     *****/
    $xmlResponse = xmlrpc_decode($xmlResponse);
 
    // Returns the result.
    return $response;
}
 
/*****
 * The first thing we do, is encoding our request into an XML-RPC
 * string. This is done with the xmlrpc_encode_request function, which 
 * accepts 2 arguments:
 * 1st: Name of the function we wish to call from the server.
 * 2nd: The argument we want to parse into this function. If we
 *      wish to parse more than 1 argument, we put them into an array.
 *****/
$xmlRequest = xmlrpc_encode_request('echo', 'All hail Philip the almighty... Obey!');
 
/*****
 * Now we call the sendRequest function, with our XML request. Remember
 * to change the host if you're not on a local computer or what ever you use.
 * And remember to change the path, if you've not saved the server directly in
 * the root (which I suspect you havent). If you hav it in the "articles/php"
 * subdirectory, you use "/articles/php/xml_server.php"
 *****/
$xmlResponse = sendRequest('127.0.0.1', '/xmlrpc_server.php', $xmlRequest);
 
// And at last, we print out the response!
var_dump($xmlResponse);
?>

<?php
$xmlRequest = xmlrpc_encode_request('goLarge', array(1234, 'little', '1 small step'));
 
$xmlResponse = sendRequest('127.0.0.1', '/xmlrpc_server.php', $xmlRequest);
 
var_dump($xmlResponse);
?>

<?xml version="1.0" encoding="iso-8859-1"?>
<methodCall>
  <methodName>echo</methodName>
  <params>
   <param>
    <value>
     <string>All hail Philip the almighty... Obey!</string>
    </value>
   </param>
  </params>
</methodCall>

<?xml version="1.0" encoding="iso-8859-1"?>
<methodResponse>
  <params>
    <param>
      <value>
        <string>Come again: All hail Philip the almighty... Obey!</string>
      </value>
    </param>
  </params>
</methodResponse>

<?xml version="1.0" encoding="iso-8859-1"?>
<methodResponse>
  <fault>
    <value>
      <struct>
        <member>
          <name>faultString</name>
          <value>
            <string>server error. method not found.&#10;&#10;echos</string>
          </value>
        </member>
        <member>
          <name>faultCode</name>
          <value>
            <int>-32601</int>
          </value>
        </member>
      </struct>
    </value>
  </fault>
</methodResponse>