merged new xmlrpc-c revision 1472 from https://xmlrpc-c.svn.sourceforge.net/svnroot/xmlrpc-c/trunk

git-svn-id: http://svn.freeswitch.org/svn/freeswitch/trunk@8545 d0543943-73ff-0310-b7d9-9358b9ac24b2

libs/xmlrpc-c/examples/xmlrpc_socket_server.c

@@ -0,0 +1,102 @@
+/* A simple standalone XML-RPC server written in C as an example of use of
+   the Xmlrpc-c libraries.
+
+   This example expects an already bound socket on Standard Input, ready to
+   be listened on for client connections.  Also see xmlrpc_sample_add_server,
+   which is the same thing, except you tell it a TCP port number and it
+   creates the socket itself.  Also see xmlrpc_inetd_server.c, which is
+   the same thing except you give it a socket which is already connected
+   to a client.
+ */
+
+#include <stdlib.h>
+#include <stdio.h>
+#ifdef WIN32
+#  include <windows.h>
+#else
+#  include <unistd.h>
+#endif
+
+#include <xmlrpc-c/base.h>
+#include <xmlrpc-c/server.h>
+#include <xmlrpc-c/server_abyss.h>
+
+#include "config.h"  /* information about this build environment */
+
+#ifdef WIN32
+  #define SLEEP(seconds) SleepEx(seconds * 1000, 1);
+#else
+  #define SLEEP(seconds) sleep(seconds);
+#endif
+
+
+static xmlrpc_value *
+sample_add(xmlrpc_env *   const envP,
+           xmlrpc_value * const paramArrayP,
+           void *         const user_data ATTR_UNUSED) {
+
+    xmlrpc_int32 x, y, z;
+
+    /* Parse our argument array. */
+    xmlrpc_decompose_value(envP, paramArrayP, "(ii)", &x, &y);
+    if (envP->fault_occurred)
+        return NULL;
+
+    /* Add our two numbers. */
+    z = x + y;
+
+    /* Sometimes, make it look hard (so client can see what it's like
+       to do an RPC that takes a while).
+    */
+    if (y == 1)
+        SLEEP(2);
+
+    /* Return our result. */
+    return xmlrpc_build_value(envP, "i", z);
+}
+
+
+
+int 
+main(int           const argc, 
+     const char ** const argv) {
+
+    xmlrpc_server_abyss_parms serverparm;
+    xmlrpc_registry * registryP;
+    xmlrpc_env env;
+
+    if (argc-1 != 0) {
+        fprintf(stderr, "There are no arguments.  You must supply a "
+                "bound socket on which to listen for client connections "
+                "as Standard Input\n");
+        if (argv) {} /* silence unused parameter warning */
+        exit(1);
+    }
+    
+    xmlrpc_env_init(&env);
+
+    registryP = xmlrpc_registry_new(&env);
+
+    xmlrpc_registry_add_method(
+        &env, registryP, NULL, "sample.add", &sample_add, NULL);
+
+    /* In the modern form of the Abyss API, we supply parameters in memory
+       like a normal API.  We select the modern form by setting
+       config_file_name to NULL: 
+    */
+    serverparm.config_file_name   = NULL;
+    serverparm.registryP          = registryP;
+    serverparm.log_file_name      = "/tmp/xmlrpc_log";
+    serverparm.keepalive_timeout  = 0;
+    serverparm.keepalive_max_conn = 0;
+    serverparm.timeout            = 0;
+    serverparm.dont_advertise     = FALSE;
+    serverparm.socket_bound       = TRUE;
+    serverparm.socket_handle      = STDIN_FILENO;
+
+    printf("Running XML-RPC server...\n");
+
+    xmlrpc_server_abyss(&env, &serverparm, XMLRPC_APSIZE(socket_handle));
+
+    return 0;
+}