You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
69 lines
1.5 KiB
69 lines
1.5 KiB
16 years ago
|
/* A simple synchronous XML-RPC client written in C. */
|
||
|
|
|
||
|
|
#include <stdio.h>
|
||
|
|
#include <stdlib.h>
|
||
|
|
|
||
|
|
#include <xmlrpc.h>
|
||
|
|
#include <xmlrpc_client.h>
|
||
|
|
|
||
|
|
#define NAME "XML-RPC C Test Client"
|
||
|
|
#define VERSION "0.1"
|
||
|
|
|
||
|
|
static 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 const argc,
|
||
|
|
const char ** const argv ATTR_UNUSED) {
|
||
|
|
|
||
|
|
xmlrpc_env env;
|
||
|
|
char *state_name;
|
||
|
|
int cc;
|
||
|
|
|
||
|
|
if (argc-1 > 0) {
|
||
|
|
fprintf(stderr, "No arguments");
|
||
|
|
exit(0);
|
||
|
|
}
|
||
|
|
|
||
|
|
/* 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. */
|
||
|
|
for ( cc = 30; cc < 35; cc ++ )
|
||
|
|
{
|
||
|
|
xmlrpc_value *result;
|
||
|
|
result = xmlrpc_client_call(&env, "http://betty.userland.com/RPC2",
|
||
|
|
"examples.getStateName",
|
||
|
|
"(i)", (xmlrpc_int32) cc);
|
||
|
|
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("%d: %s\n", cc, 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;
|
||
|
|
}
|