ENH: Remove Utilities/cmxmlrpc source tree

We never build this source tree anymore, so remove it.

1 files changed, 0 insertions, 295 deletions

diff --git a/Utilities/cmxmlrpc/xmlrpc_cgi.c b/Utilities/cmxmlrpc/xmlrpc_cgi.c
deleted file mode 100644
index e3a8b42..0000000
--- a/Utilities/cmxmlrpc/xmlrpc_cgi.c
+++ /dev/null
@@ -1,295 +0,0 @@
-/* Copyright (C) 2001 by Eric Kidd. All rights reserved.
-**
-** Redistribution and use in source and binary forms, with or without
-** modification, are permitted provided that the following conditions
-** are met:
-** 1. Redistributions of source code must retain the above copyright
-**    notice, this list of conditions and the following disclaimer.
-** 2. Redistributions in binary form must reproduce the above copyright
-**    notice, this list of conditions and the following disclaimer in the
-**    documentation and/or other materials provided with the distribution.
-** 3. The name of the author may not be used to endorse or promote products
-**    derived from this software without specific prior written permission. 
-**  
-** THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
-** ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
-** IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
-** ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
-** FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
-** DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
-** OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
-** HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
-** LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
-** OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
-** SUCH DAMAGE. */
-
-
-#include "xmlrpc_config.h"
-
-#include <stdlib.h>
-#include <stdio.h>
-#include <string.h>
-
-/* Windows NT stdout binary mode fix. */
-#ifdef _WIN32 
-#include <io.h> 
-#include <fcntl.h> 
-#endif 
-
-#include "xmlrpc.h"
-#include "xmlrpc_server.h"
-#include "xmlrpc_cgi.h"
-
-
-/*=========================================================================
-**  Output Routines
-**=========================================================================
-**  These routines send various kinds of responses to the server.
-*/
-
-static void send_xml (char *xml_data, size_t xml_len)
-{
-    /* Send our CGI headers back to the server.
-    ** XXX - Coercing 'size_t' to 'unsigned long' might be unsafe under
-    ** really weird circumstances. */
-    fprintf(stdout, "Status: 200 OK\n");
-    /* Handle authentication cookie being sent back. */
-    if (getenv("HTTP_COOKIE_AUTH") != NULL)
-        fprintf(stdout, "Set-Cookie: auth=%s\n", getenv("HTTP_COOKIE_AUTH"));
-    fprintf(stdout, "Content-type: text/xml; charset=\"utf-8\"\n");
-    fprintf(stdout, "Content-length: %ld\n\n", (unsigned long) xml_len);
-
-    /* Blast out our data. */
-    fwrite(xml_data, sizeof(char), xml_len, stdout);
-}
-
-static void send_error (int code, char *message, xmlrpc_env *env)
-{
-    /* Send an error header. */
-    fprintf(stdout, "Status: %d %s\n", code, message);
-    fprintf(stdout, "Content-type: text/html\n\n");
-    
-    /* Send an error message. */
-    fprintf(stdout, "<title>%d %s</title>\n", code, message);
-    fprintf(stdout, "<h1>%d %s</h1>\n", code, message);
-    fprintf(stdout, "<p>An error occurred processing your request.</p>\n");
-
-    /* Print out the XML-RPC fault, if present. */
-    if (env && env->fault_occurred)
-        fprintf(stdout, "<p>XML-RPC Fault #%d: %s</p>\n",
-                env->fault_code, env->fault_string);
-}
-
-
-/*=========================================================================
-**  die_if_fault_occurred
-**=========================================================================
-**  Certain kinds of errors aren't worth the trouble of generating
-**  an XML-RPC fault. For these, we just send status 500 to our web server
-**  and log the fault to our server log.
-*/
-
-static void die_if_fault_occurred (xmlrpc_env *env)
-{
-    if (env->fault_occurred) {
-        fprintf(stderr, "Unexpected XML-RPC fault: %s (%d)\n",
-                env->fault_string, env->fault_code);
-        send_error(500, "Internal Server Error", env);
-        exit(1);
-    }
-}
-
-
-/*=========================================================================
-**  Initialization, Cleanup & Method Registry
-**=========================================================================
-**  These are all related, so we group them together.
-*/
-
-static xmlrpc_registry *registry;
-
-void xmlrpc_cgi_init (int flags ATTR_UNUSED)
-{
-    xmlrpc_env env;
-
-    xmlrpc_env_init(&env);
-    registry = xmlrpc_registry_new(&env);
-    die_if_fault_occurred(&env);
-    xmlrpc_env_clean(&env);    
-
-#ifdef _WIN32 
-    /* Fix from Jeff Stewart: NT opens stdin and stdout in text mode
-    ** by default, badly confusing our length calculations.  So we need
-    ** to set these file handles to binary. */
-    _setmode(_fileno(stdout), _O_BINARY); 
-    _setmode(_fileno(stdin), _O_BINARY); 
-#endif 
-}
-
-void xmlrpc_cgi_cleanup (void)
-{
-    xmlrpc_registry_free(registry);
-}
-
-xmlrpc_registry *xmlrpc_cgi_registry (void)
-{
-    return registry;
-}
-
-void xmlrpc_cgi_add_method (char *method_name,
-                            xmlrpc_method method,
-                            void *user_data)
-{
-    xmlrpc_env env;
-    xmlrpc_env_init(&env);
-    xmlrpc_registry_add_method(&env, registry, NULL, method_name,
-                               method, user_data);
-    die_if_fault_occurred(&env);
-    xmlrpc_env_clean(&env);    
-}
-
-extern void
-xmlrpc_cgi_add_method_w_doc (char *method_name,
-                             xmlrpc_method method,
-                             void *user_data,
-                             char *signature,
-                             char *help)
-{
-    xmlrpc_env env;
-    xmlrpc_env_init(&env);
-    xmlrpc_registry_add_method_w_doc(&env, registry, NULL, method_name,
-                                     method, user_data, signature, help);
-    die_if_fault_occurred(&env);
-    xmlrpc_env_clean(&env);    
-}
-
-
-/*=========================================================================
-**  get_body
-**=========================================================================
-**  Slurp the body of the request into an xmlrpc_mem_block.
-*/
-
-static xmlrpc_mem_block *get_body (xmlrpc_env *env, size_t length)
-{
-    xmlrpc_mem_block *result;
-    char *contents;
-    size_t count;
-
-    XMLRPC_ASSERT_ENV_OK(env);
-
-    /* Error-handling preconditions. */
-    result = NULL;
-
-    /* XXX - Puke if length is too big. */
-
-    /* Allocate our memory block. */
-    result = xmlrpc_mem_block_new(env, length);
-    XMLRPC_FAIL_IF_FAULT(env);
-    contents = XMLRPC_TYPED_MEM_BLOCK_CONTENTS(char, result);
-
-    /* Get our data off the network.
-    ** XXX - Coercing 'size_t' to 'unsigned long' might be unsafe under
-    ** really weird circumstances. */
-    count = fread(contents, sizeof(char), length, stdin);
-    if (count < length)
-        XMLRPC_FAIL2(env, XMLRPC_INTERNAL_ERROR,
-                     "Expected %ld bytes, received %ld",
-                     (unsigned long) length, (unsigned long) count);
-
- cleanup:
-    if (env->fault_occurred) {
-        if (result)
-            xmlrpc_mem_block_free(result);
-        return NULL;
-    }
-    return result;
-}
-
-
-/*=========================================================================
-**  xmlrpc_cgi_process_call
-**=========================================================================
-**  Parse the incoming XML-RPC call, find the right method, call it, and
-**  serialize our response.
-*/
-
-void xmlrpc_cgi_process_call (void)
-{
-    xmlrpc_env env;
-    char *method, *type, *length_str;
-    int length;
-    xmlrpc_mem_block *input, *output;
-    char *input_data, *output_data;
-    size_t input_size, output_size;
-    int code;
-    char *message;
-
-    /* Error-handling preconditions. */
-    xmlrpc_env_init(&env);
-    input = output = NULL;
-
-    /* Set up a default error message. */
-    code = 500; message = "Internal Server Error";
-
-    /* Get our HTTP information from the environment. */
-    method = getenv("REQUEST_METHOD");
-    type = getenv("CONTENT_TYPE");
-    length_str = getenv("CONTENT_LENGTH");
-
-    /* Perform some sanity checks. */
-    if (!method || 0 != strcmp(method, "POST")) {
-        code = 405; message = "Method Not Allowed";
-        XMLRPC_FAIL(&env, XMLRPC_INTERNAL_ERROR, "Expected HTTP method POST");
-    }
-    if (!type || 0 != strcmp(type, "text/xml")) {
-        code = 400; message = "Bad Request";
-        XMLRPC_FAIL(&env, XMLRPC_INTERNAL_ERROR, "Expected text/xml content");
-    }
-    if (!length_str) {
-        code = 411; message = "Length Required";
-        XMLRPC_FAIL(&env, XMLRPC_INTERNAL_ERROR, "Content-length required");
-    }
-
-    /* Get our content length. */
-    length = atoi(length_str);
-    if (length <= 0) {
-        code = 400; message = "Bad Request";
-        XMLRPC_FAIL(&env, XMLRPC_INTERNAL_ERROR, "Content-length must be > 0");
-    }
-
-    /* SECURITY: Make sure our content length is legal.
-    ** XXX - We can cast 'input_len' because we know it's >= 0, yes? */
-    if ((size_t) length > xmlrpc_limit_get(XMLRPC_XML_SIZE_LIMIT_ID)) {
-        code = 400; message = "Bad Request";
-        XMLRPC_FAIL(&env, XMLRPC_LIMIT_EXCEEDED_ERROR,
-                    "XML-RPC request too large");
-    }
-
-    /* Get our body. */
-    input = get_body(&env, length);
-    XMLRPC_FAIL_IF_FAULT(&env);
-    input_data = XMLRPC_TYPED_MEM_BLOCK_CONTENTS(char, input);
-    input_size = XMLRPC_TYPED_MEM_BLOCK_SIZE(char, input);
-
-    /* Process our call. */
-    output = xmlrpc_registry_process_call(&env, registry, NULL,
-                                          input_data, input_size);
-    XMLRPC_FAIL_IF_FAULT(&env);
-    output_data = XMLRPC_TYPED_MEM_BLOCK_CONTENTS(char, output);
-    output_size = XMLRPC_TYPED_MEM_BLOCK_SIZE(char, output);
-
-    /* Send our data. */
-    send_xml(output_data, output_size);
-    
- cleanup:
-    if (input)
-        xmlrpc_mem_block_free(input);
-    if (output)
-        xmlrpc_mem_block_free(output);
-    
-    if (env.fault_occurred)
-        send_error(code, message, &env);
-
-    xmlrpc_env_clean(&env);
-}