initial load of upstream version 1.06.32

[xmlrpc-c] / examples / xmlrpc_sample_add_server_cgi.c

diff --git a/examples/xmlrpc_sample_add_server_cgi.c b/examples/xmlrpc_sample_add_server_cgi.c
new file mode 100644 (file)
index 0000000..18374a1
--- /dev/null
+++ b/examples/xmlrpc_sample_add_server_cgi.c
@@ -0,0 +1,57 @@
+/* A simple standalone XML-RPC server written in C. */
+
+#include <stdlib.h>
+#include <stdio.h>
+
+#include <xmlrpc-c/base.h>
+#include <xmlrpc-c/server.h>
+#include <xmlrpc-c/server_cgi.h>
+
+#include "config.h"  /* information about this build environment */
+
+static xmlrpc_value *
+sample_add(xmlrpc_env *   const env, 
+           xmlrpc_value * const param_array, 
+           void *         const user_data ATTR_UNUSED) {
+
+    xmlrpc_int32 x, y, z;
+
+    /* Parse our argument array. */
+    xmlrpc_decompose_value(env, param_array, "(ii)", &x, &y);
+    if (env->fault_occurred)
+        return NULL;
+
+    /* Add our two numbers. */
+    z = x + y;
+
+    /* Return our result. */
+    return xmlrpc_build_value(env, "i", z);
+}
+
+
+
+int 
+main(int           const argc, 
+     const char ** const argv) {
+
+    xmlrpc_registry * registryP;
+    xmlrpc_env env;
+
+    if (argc-1 > 0 && argv==argv) {
+        fprintf(stderr, "There are no arguments to a CGI script\n");
+        exit(1);
+    }
+
+    xmlrpc_env_init(&env);
+
+    registryP = xmlrpc_registry_new(&env);
+
+    xmlrpc_registry_add_method(
+        &env, registryP, NULL, "sample.add", &sample_add, NULL);
+
+    xmlrpc_server_cgi_process_call(registryP);
+
+    xmlrpc_registry_free(registryP);
+
+    return 0;
+}