/* A simple synchronous XML-RPC client written in C. */

#include <stdio.h>

#include <xmlrpc.h>
#include <xmlrpc_client.h>

#define NAME "XML-RPC C Test Client"
#define VERSION "0.1"

void die_if_fault_occurred (xmlrpc_env *env)
{
   if (env->fault_occurred) {
       fprintf(stderr, "XML-RPC Fault: %s (%d)\n",
               env->fault_string, env->fault_code);
       exit(1);
   }
}

int main (int argc, char** argv)
{
   xmlrpc_env env;
   xmlrpc_value *result;
   char *state_name;
   
   /* Start up our XML-RPC client library. */
   xmlrpc_client_init(XMLRPC_CLIENT_NO_FLAGS, NAME, VERSION);

   /* Initialize our error-handling environment. */
   xmlrpc_env_init(&env);

   /* Call the famous server at UserLand. */
   result = xmlrpc_client_call(&env, "http://betty.userland.com/RPC2",
   "examples.getStateName",
   "(i)", (xmlrpc_int32) 41);
   die_if_fault_occurred(&env);
   
   /* Get our state name and print it out. */
   xmlrpc_parse_value(&env, result, "s", &state_name);
   die_if_fault_occurred(&env);
   printf("%s\n", state_name);
   
   /* Dispose of our result value. */
   xmlrpc_DECREF(result);

   /* Clean up our error-handling environment. */
   xmlrpc_env_clean(&env);

   /* Shutdown our XML-RPC client library. */
   xmlrpc_client_cleanup();

   return 0;
}

// List recently-released Linux applications. (Written in C++.)
// For more details about O'Reilly's excellent Meerkat news service, see:
// http://www.oreillynet.com/pub/a/rss/2000/11/14/meerkat_xmlrpc.html */

#include <iostream.h>
#include <strstream.h>

#include <XmlRpcCpp.h>

#define NAME           "XML-RPC C++ Meerkat Query Demo"
#define VERSION        "0.1"
#define MEERKAT_URL    "http://www.oreillynet.com/meerkat/xml-rpc/server.php"
#define SOFTWARE_LINUX (6)

static void list_apps (int hours) {

   // Build our time_period parameter.
   ostrstream time_period_stream;
   time_period_stream << hours << "HOUR";
   string time_period = time_period_stream.str();

   // Assemble our meerkat query recipe.
   XmlRpcValue recipe = XmlRpcValue::makeStruct();
   recipe.structSetValue("category", XmlRpcValue::makeInt(SOFTWARE_LINUX));
   recipe.structSetValue("time_period", XmlRpcValue::makeString(time_period));
   recipe.structSetValue("descriptions", XmlRpcValue::makeInt(76));

   // Build our parameter array.
   XmlRpcValue param_array = XmlRpcValue::makeArray();
   param_array.arrayAppendItem(recipe);

   // Create a client pointing to Meerkat.
   XmlRpcClient meerkat (MEERKAT_URL);

   // Perform the query.
   XmlRpcValue apps = meerkat.call("meerkat.getItems", param_array);

   // Print our results.
   int first = 1;
   size_t app_count = apps.arraySize();
   for (int i = 0; i < app_count; i++) {
XmlRpcValue app = apps.arrayGetItem(i);

// Get some information about our application.
string title       = app.structGetValue("title").getString();
string link        = app.structGetValue("link").getString();
string description = app.structGetValue("description").getString();

// Print a separator line if necessary.
if (first)
    first = 0;
else
    cout << endl;

// Print this application entry.
if (description.size() > 0) {
    cout << title << endl << description << endl << link << endl;
} else {
    cout << title << endl << description << endl << link << endl;
}
   }
}

// Print out a usage message.
static void usage (void)
{
   cerr << "Usage: meekat-app-list [hours]" << endl;
   cerr << "Data from <http://www.oreillynet.com/meerkat/>." << endl;
   exit(1);
}

int main (int argc, char **argv) {
   int status = 0;
   int hours = 25;

   // Parse our command-line arguments.
   if (argc == 1) {
// Use default value for hours.
   } else if (argc == 2) {
hours = atoi(argv[1]);
   }
   if (hours == 0)
usage();
   if (hours > 49) {
       cerr << "It's not nice to ask for > 49 hours at once." << endl;
       exit(1); 
   }

   // Start up our client library.
   XmlRpcClient::Initialize(NAME, VERSION);

   // Call our implementation, and watch out for faults.
   try {
list_apps(hours);
   } catch (XmlRpcFault& fault) {
cerr << argv[0] << ": XML-RPC fault #" << fault.getFaultCode()
     << ": " << fault.getFaultString() << endl;
status = 1;
   }

   // Shut down our client library.
   XmlRpcClient::Terminate();

   return status;
}

use Frontier::Client;

$server = Frontier::Client->new(url => $url);

$result = $server->call($method, @args);

  // Java example
  XmlRpcClient xmlrpc=new XmlRpcClient
    ("http://xmlrpc.emailservice.com:80/xmlrpcInterface");
  Vector params=new Vector();
  params.addElement("myUserName");
  Integer result=(Integer)xmlrpc.execute
    ("email.getNumberNewMessages", params);

[XmlRpcUrl("http://www.cookcomputing.com/sumAndDiff.rem")] 
class SumAndDiffProxy : XmlRpcClientProtocol 
{ 
  [XmlRpcMethod("samples.sumAndDifference")] 
  SumAndDiffValue SumAndDifference(int x, int y) 
  { 
    return (SumAndDiffValue)Invoke("SumAndDifference", 
                                   new Object[]{ x, y }); 
  } 
}