/* Copyright information is at the end of the file */ #include "xmlrpc_config.h" #include #include #include #include "mallocvar.h" #include "xmlrpc-c/abyss.h" #include "xmlrpc-c/base.h" #include "xmlrpc-c/server.h" #include "xmlrpc-c/base_int.h" #include "xmlrpc-c/server_abyss.h" /*========================================================================= ** die_if_fault_occurred **========================================================================= ** If certain kinds of out-of-memory errors occur during server setup, ** we want to quit and print an error. */ 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); exit(1); } } /*========================================================================= ** send_xml_data **========================================================================= ** Blast some XML data back to the client. */ static void sendXmlData(xmlrpc_env * const envP, TSession * const r, char * const buffer, size_t const len) { const char * http_cookie = NULL; /* This used to set http_cookie to getenv("HTTP_COOKIE"), but that doesn't make any sense -- environment variables are not appropriate for this. So for now, cookie code is disabled. - Bryan 2004.10.03. */ /* fwrite(buffer, sizeof(char), len, stderr); */ /* XXX - Is it safe to chunk our response? */ ResponseChunked(r); ResponseStatus(r, 200); if (http_cookie) { /* There's an auth cookie, so pass it back in the response. */ char *cookie_response; cookie_response = malloc(10+strlen(http_cookie)); sprintf(cookie_response, "auth=%s", http_cookie); /* Return abyss response. */ ResponseAddField(r, "Set-Cookie", cookie_response); free(cookie_response); } if ((size_t)(uint32_t)len != len) xmlrpc_env_set_fault_formatted( envP, XMLRPC_INTERNAL_ERROR, "XML-RPC method generated a response too " "large for Abyss to send"); else { uint32_t const abyssLen = (uint32_t)len; ResponseContentType(r, "text/xml; charset=\"utf-8\""); ResponseContentLength(r, abyssLen); ResponseWrite(r); HTTPWrite(r, buffer, abyssLen); HTTPWriteEnd(r); } } /*========================================================================= ** send_error **========================================================================= ** Send an error back to the client. */ static void send_error(TSession * const abyssSessionP, unsigned int const status) { ResponseStatus(abyssSessionP, (uint16_t) status); ResponseError(abyssSessionP); } static void traceChunkRead(TSession * const abyssSessionP) { fprintf(stderr, "XML-RPC handler got a chunk of %u bytes\n", abyssSessionP->conn->buffersize - abyssSessionP->conn->bufferpos); } /*========================================================================= ** get_buffer_data **========================================================================= ** Extract some data from the TConn's underlying input buffer. Do not ** extract more than 'max'. */ static void get_buffer_data(TSession * const r, size_t const max, char ** const out_start, size_t * const out_len) { /* Point to the start of our data. */ *out_start = &r->conn->buffer[r->conn->bufferpos]; /* Decide how much data to retrieve. */ *out_len = r->conn->buffersize - r->conn->bufferpos; if (*out_len > max) *out_len = max; /* Update our buffer position. */ r->conn->bufferpos += *out_len; } static void refillBufferFromConnection(xmlrpc_env * const envP, TSession * const abyssSessionP, const char * const trace) { /*---------------------------------------------------------------------------- Get the next chunk of data from the connection into the buffer. -----------------------------------------------------------------------------*/ abyss_bool succeeded; /* Reset our read buffer & flush data from previous reads. */ ConnReadInit(abyssSessionP->conn); /* Read more network data into our buffer. If we encounter a timeout, exit immediately. We're very forgiving about the timeout here. We allow a full timeout per network read, which would allow somebody to keep a connection alive nearly indefinitely. But it's hard to do anything intelligent here without very complicated code. */ succeeded = ConnRead(abyssSessionP->conn, abyssSessionP->server->timeout); if (!succeeded) xmlrpc_env_set_fault_formatted( envP, XMLRPC_TIMEOUT_ERROR, "Timed out waiting for " "client to send its POST data"); else { if (trace) traceChunkRead(abyssSessionP); } } static void getBody(xmlrpc_env * const envP, TSession * const abyssSessionP, size_t const contentSize, const char * const trace, xmlrpc_mem_block ** const bodyP) { /*---------------------------------------------------------------------------- Get the entire body, which is of size 'contentSize' bytes, from the Abyss session and return it as the new memblock *bodyP. The first chunk of the body may already be in Abyss's buffer. We retrieve that before reading more. -----------------------------------------------------------------------------*/ xmlrpc_mem_block * body; if (trace) fprintf(stderr, "XML-RPC handler processing body. " "Content Size = %u bytes\n", contentSize); body = xmlrpc_mem_block_new(envP, 0); if (!envP->fault_occurred) { size_t bytesRead; char * chunkPtr; size_t chunkLen; bytesRead = 0; while (!envP->fault_occurred && bytesRead < contentSize) { get_buffer_data(abyssSessionP, contentSize - bytesRead, &chunkPtr, &chunkLen); bytesRead += chunkLen; XMLRPC_MEMBLOCK_APPEND(char, envP, body, chunkPtr, chunkLen); if (bytesRead < contentSize) refillBufferFromConnection(envP, abyssSessionP, trace); } if (envP->fault_occurred) xmlrpc_mem_block_free(body); else *bodyP = body; } } static void storeCookies(TSession * const httpRequestP, unsigned int * const httpErrorP) { /*---------------------------------------------------------------------------- Get the cookie settings from the HTTP headers and remember them for use in responses. -----------------------------------------------------------------------------*/ const char * const cookie = RequestHeaderValue(httpRequestP, "cookie"); if (cookie) { /* Setting the value in an environment variable doesn't make any sense. So for now, cookie code is disabled. -Bryan 04.10.03. setenv("HTTP_COOKIE", cookie, 1); */ } /* TODO: parse HTTP_COOKIE to find auth pair, if there is one */ *httpErrorP = 0; } static void validateContentType(TSession * const httpRequestP, unsigned int * const httpErrorP) { /*---------------------------------------------------------------------------- If the client didn't specify a content-type of "text/xml", return "400 Bad Request". We can't allow the client to default this header, because some firewall software may rely on all XML-RPC requests using the POST method and a content-type of "text/xml". -----------------------------------------------------------------------------*/ const char * const content_type = RequestHeaderValue(httpRequestP, "content-type"); if (content_type == NULL) *httpErrorP = 400; else { const char * const sempos = strchr(content_type, ';'); unsigned int baselen; /* Length of the base portion of the content type, e.g. "text/xml" int "text/xml;charset=utf-8" */ if (sempos) baselen = sempos - content_type; else baselen = strlen(content_type); if (strncmp(content_type, "text/xml", baselen) != 0) *httpErrorP = 400; else *httpErrorP = 0; } } static void processContentLength(TSession * const httpRequestP, size_t * const inputLenP, unsigned int * const httpErrorP) { /*---------------------------------------------------------------------------- Make sure the content length is present and non-zero. This is technically required by XML-RPC, but we only enforce it because we don't want to figure out how to safely handle HTTP < 1.1 requests without it. If the length is missing, return "411 Length Required". -----------------------------------------------------------------------------*/ const char * const content_length = RequestHeaderValue(httpRequestP, "content-length"); if (content_length == NULL) *httpErrorP = 411; else { if (content_length[0] == '\0') *httpErrorP = 400; else { unsigned long contentLengthValue; char * tail; contentLengthValue = strtoul(content_length, &tail, 10); if (*tail != '\0') /* There's non-numeric crap in the length */ *httpErrorP = 400; else if (contentLengthValue < 1) *httpErrorP = 400; else if ((unsigned long)(size_t)contentLengthValue != contentLengthValue) *httpErrorP = 400; else { *httpErrorP = 0; *inputLenP = (size_t)contentLengthValue; } } } } static void traceHandlerCalled(TSession * const abyssSessionP) { const char * methodDesc; fprintf(stderr, "xmlrpc_server_abyss RPC2 handler called.\n"); fprintf(stderr, "URI = '%s'\n", abyssSessionP->uri); switch (abyssSessionP->method) { case m_unknown: methodDesc = "unknown"; break; case m_get: methodDesc = "get"; break; case m_put: methodDesc = "put"; break; case m_head: methodDesc = "head"; break; case m_post: methodDesc = "post"; break; case m_delete: methodDesc = "delete"; break; case m_trace: methodDesc = "trace"; break; case m_options: methodDesc = "m_options"; break; default: methodDesc = "?"; } fprintf(stderr, "HTTP method = '%s'\n", methodDesc); if (abyssSessionP->query) fprintf(stderr, "query (component of URL)='%s'\n", abyssSessionP->query); else fprintf(stderr, "URL has no query component\n"); } static void processCall(TSession * const abyssSessionP, size_t const contentSize, xmlrpc_registry * const registryP, const char * const trace) { /*---------------------------------------------------------------------------- Handle an RPC request. This is an HTTP request that has the proper form to be one of our RPCs. Its content length is 'contentSize' bytes. -----------------------------------------------------------------------------*/ xmlrpc_env env; if (trace) fprintf(stderr, "xmlrpc_server_abyss RPC2 handler processing RPC.\n"); xmlrpc_env_init(&env); if (contentSize > xmlrpc_limit_get(XMLRPC_XML_SIZE_LIMIT_ID)) xmlrpc_env_set_fault_formatted( &env, XMLRPC_LIMIT_EXCEEDED_ERROR, "XML-RPC request too large (%d bytes)", contentSize); else { xmlrpc_mem_block *body; /* Read XML data off the wire. */ getBody(&env, abyssSessionP, contentSize, trace, &body); if (!env.fault_occurred) { xmlrpc_mem_block * output; /* Process the RPC. */ output = xmlrpc_registry_process_call( &env, registryP, NULL, XMLRPC_MEMBLOCK_CONTENTS(char, body), XMLRPC_MEMBLOCK_SIZE(char, body)); if (!env.fault_occurred) { /* Send out the result. */ sendXmlData(&env, abyssSessionP, XMLRPC_MEMBLOCK_CONTENTS(char, output), XMLRPC_MEMBLOCK_SIZE(char, output)); XMLRPC_MEMBLOCK_FREE(char, output); } XMLRPC_MEMBLOCK_FREE(char, body); } } if (env.fault_occurred) { if (env.fault_code == XMLRPC_TIMEOUT_ERROR) send_error(abyssSessionP, 408); /* 408 Request Timeout */ else send_error(abyssSessionP, 500); /* 500 Internal Server Error */ } xmlrpc_env_clean(&env); } /**************************************************************************** Abyss handlers (to be registered with and called by Abyss) ****************************************************************************/ static const char * trace_abyss; struct uriHandlerXmlrpc { /*---------------------------------------------------------------------------- This is the part of an Abyss HTTP request handler (aka URI handler) that is specific to the Xmlrpc-c handler. -----------------------------------------------------------------------------*/ xmlrpc_registry * registryP; const char * filename; /* malloc'ed */ }; static void termUriHandler(URIHandler2 * const this) { struct uriHandlerXmlrpc * const uriHandlerXmlrpcP = this->userdata; free((void*)uriHandlerXmlrpcP->filename); free(uriHandlerXmlrpcP); free(this); } static void handleXmlrpcReq(URIHandler2 * const this, TSession * const abyssSessionP, abyss_bool * const handledP) { /*---------------------------------------------------------------------------- Our job is to look at this HTTP request that the Abyss server is trying to process and see if we can handle it. If it's an XML-RPC call for this XML-RPC server, we handle it. If it's not, we refuse it and Abyss can try some other handler. Our return code is TRUE to mean we handled it; FALSE to mean we didn't. Note that failing the request counts as handling it, and not handling it does not mean we failed it. This is an Abyss HTTP Request handler -- type URIHandler2. -----------------------------------------------------------------------------*/ struct uriHandlerXmlrpc * const uriHandlerXmlrpcP = this->userdata; if (trace_abyss) traceHandlerCalled(abyssSessionP); /* Note that abyssSessionP->uri is not the whole URI. It is just the "file name" part of it. */ if (strcmp(abyssSessionP->uri, uriHandlerXmlrpcP->filename) != 0) /* It's for the filename (e.g. "/RPC2") that we're supposed to handle. */ *handledP = FALSE; else { *handledP = TRUE; /* We understand only the POST HTTP method. For anything else, return "405 Method Not Allowed". */ if (abyssSessionP->method != m_post) send_error(abyssSessionP, 405); else { unsigned int httpError; storeCookies(abyssSessionP, &httpError); if (httpError) send_error(abyssSessionP, httpError); else { unsigned int httpError; validateContentType(abyssSessionP, &httpError); if (httpError) send_error(abyssSessionP, httpError); else { unsigned int httpError; size_t contentSize; processContentLength(abyssSessionP, &contentSize, &httpError); if (httpError) send_error(abyssSessionP, httpError); else processCall(abyssSessionP, contentSize, uriHandlerXmlrpcP->registryP, trace_abyss); } } } } if (trace_abyss) fprintf(stderr, "xmlrpc_server_abyss RPC2 handler returning.\n"); } /*========================================================================= ** xmlrpc_server_abyss_default_handler **========================================================================= ** This handler returns a 404 Not Found for all requests. See the header ** for more documentation. */ static xmlrpc_bool xmlrpc_server_abyss_default_handler (TSession * const r) { if (trace_abyss) fprintf(stderr, "xmlrpc_server_abyss default handler called.\n"); send_error(r, 404); return TRUE; } /************************************************************************** ** ** The code below was adapted from the main.c file of the Abyss webserver ** project. In addition to the other copyrights on this file, the following ** code is also under this copyright: ** ** Copyright (C) 2000 by Moez Mahfoudh . ** 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 #include #ifdef _WIN32 #include #else #include #include #include #endif /* _WIN32 */ static void sigterm(int const sig) { TraceExit("Signal %d received. Exiting...\n",sig); } static void sigchld(int const sig ATTR_UNUSED) { /*---------------------------------------------------------------------------- This is a signal handler for a SIGCHLD signal (which informs us that one of our child processes has terminated). We respond by reaping the zombie process. Implementation note: In some systems, just setting the signal handler to SIG_IGN (ignore signal) does this. In others, it doesn't. -----------------------------------------------------------------------------*/ #ifndef _WIN32 pid_t pid; int status; /* Reap defunct children until there aren't any more. */ for (;;) { pid = waitpid( (pid_t) -1, &status, WNOHANG ); /* none left */ if (pid==0) break; if (pid<0) { /* because of ptrace */ if (errno==EINTR) continue; break; } } #endif /* _WIN32 */ } static TServer globalSrv; /* When you use the old interface (xmlrpc_server_abyss_init(), etc.), this is the Abyss server to which they refer. Obviously, there can be only one Abyss server per program using this interface. */ void xmlrpc_server_abyss_init(int const flags ATTR_UNUSED, const char * const config_file) { DateInit(); MIMETypeInit(); ServerCreate(&globalSrv, "XmlRpcServer", 8080, DEFAULT_DOCS, NULL); ConfReadServerFile(config_file, &globalSrv); xmlrpc_server_abyss_init_registry(); /* Installs /RPC2 handler and default handler that use the built-in registry. */ ServerInit(&globalSrv); } static void setupSignalHandlers(void) { #ifndef _WIN32 struct sigaction mysigaction; sigemptyset(&mysigaction.sa_mask); mysigaction.sa_flags = 0; /* These signals abort the program, with tracing */ mysigaction.sa_handler = sigterm; sigaction(SIGTERM, &mysigaction, NULL); sigaction(SIGINT, &mysigaction, NULL); sigaction(SIGHUP, &mysigaction, NULL); sigaction(SIGUSR1, &mysigaction, NULL); /* This signal indicates connection closed in the middle */ mysigaction.sa_handler = SIG_IGN; sigaction(SIGPIPE, &mysigaction, NULL); /* This signal indicates a child process (request handler) has died */ mysigaction.sa_handler = sigchld; sigaction(SIGCHLD, &mysigaction, NULL); #endif } static void setGroups(void) { #ifdef HAVE_SETGROUPS if (setgroups(0, NULL) == (-1)) TraceExit("Failed to setup the group."); #endif } static void daemonize(TServer * const srvP) { /*---------------------------------------------------------------------------- Turn Caller into a daemon (i.e. fork a child, then exit; the child returns to Caller). NOTE: It's ridiculous, but conventional, for us to do this. It's ridiculous because the task of daemonizing is not something particular to Xmlrpc-c. It ought to be done by a higher level. In fact, it should be done before the Xmlrpc-c server program is even execed. The user should run a "daemonize" program that creates a daemon which execs the Xmlrpc-c server program. -----------------------------------------------------------------------------*/ #ifndef _WIN32 /* Become a daemon */ switch (fork()) { case 0: break; case -1: TraceExit("Unable to become a daemon"); default: /* We are the parent */ exit(0); }; setsid(); /* Change the current user if we are root */ if (getuid()==0) { if (srvP->uid == (uid_t)-1) TraceExit("Can't run under root privileges. " "Please add a User option in your " "Abyss configuration file."); setGroups(); if (srvP->gid != (gid_t)-1) if (setgid(srvP->gid)==(-1)) TraceExit("Failed to change the group."); if (setuid(srvP->uid) == -1) TraceExit("Failed to change the user."); }; if (srvP->pidfile!=(-1)) { char z[16]; sprintf(z,"%d",getpid()); FileWrite(&srvP->pidfile,z,strlen(z)); FileClose(&srvP->pidfile); }; #endif /* _WIN32 */ } static void runServerDaemon(TServer * const srvP, runfirstFn const runfirst, void * const runfirstArg) { setupSignalHandlers(); daemonize(srvP); /* We run the user supplied runfirst after forking, but before accepting connections (helpful when running with threads) */ if (runfirst) runfirst(runfirstArg); ServerRun(srvP); /* We can't exist here because ServerRun doesn't return */ XMLRPC_ASSERT(FALSE); } void xmlrpc_server_abyss_run_first(runfirstFn const runfirst, void * const runfirstArg) { runServerDaemon(&globalSrv, runfirst, runfirstArg); } void xmlrpc_server_abyss_run(void) { runServerDaemon(&globalSrv, NULL, NULL); } void xmlrpc_server_abyss_set_handler(xmlrpc_env * const envP, TServer * const srvP, const char * const filename, xmlrpc_registry * const registryP) { struct uriHandlerXmlrpc * uriHandlerXmlrpcP; URIHandler2 * uriHandlerP; abyss_bool success; trace_abyss = getenv("XMLRPC_TRACE_ABYSS"); MALLOCVAR_NOFAIL(uriHandlerP); uriHandlerP->handleReq2 = handleXmlrpcReq; uriHandlerP->handleReq1 = NULL; uriHandlerP->init = NULL; uriHandlerP->term = &termUriHandler; MALLOCVAR_NOFAIL(uriHandlerXmlrpcP); uriHandlerXmlrpcP->registryP = registryP; uriHandlerXmlrpcP->filename = strdup(filename); uriHandlerP->userdata = uriHandlerXmlrpcP; ServerAddHandler2(srvP, uriHandlerP, &success); free(uriHandlerP); if (!success) xmlrpc_faultf(envP, "Abyss failed to register the Xmlrpc-c request " "handler. ServerAddHandler2() failed."); } void xmlrpc_server_abyss_set_handlers(TServer * const srvP, xmlrpc_registry * const registryP) { xmlrpc_env env; xmlrpc_env_init(&env); trace_abyss = getenv("XMLRPC_TRACE_ABYSS"); xmlrpc_server_abyss_set_handler(&env, srvP, "/RPC2", registryP); if (env.fault_occurred) abort(); ServerDefaultHandler(srvP, xmlrpc_server_abyss_default_handler); } static void oldHighLevelAbyssRun(xmlrpc_env * const envP ATTR_UNUSED, const xmlrpc_server_abyss_parms * const parmsP, unsigned int const parm_size) { /*---------------------------------------------------------------------------- This is the old deprecated interface, where the caller of the xmlrpc_server_abyss API supplies an Abyss configuration file and we use it to daemonize (fork into the background, chdir, set uid, etc.) and run the Abyss server. The new preferred interface, implemented by normalLevelAbyssRun(), instead lets Caller set up the process environment himself and pass Abyss parameters in memory. That's a more conventional and flexible API. -----------------------------------------------------------------------------*/ TServer srv; runfirstFn runfirst; void * runfirstArg; DateInit(); MIMETypeInit(); ServerCreate(&srv, "XmlRpcServer", 8080, DEFAULT_DOCS, NULL); ConfReadServerFile(parmsP->config_file_name, &srv); xmlrpc_server_abyss_set_handlers(&srv, parmsP->registryP); ServerInit(&srv); if (parm_size >= XMLRPC_APSIZE(runfirst_arg)) { runfirst = parmsP->runfirst; runfirstArg = parmsP->runfirst_arg; } else { runfirst = NULL; runfirstArg = NULL; } runServerDaemon(&srv, runfirst, runfirstArg); } static void setAdditionalServerParms(const xmlrpc_server_abyss_parms * const parmsP, unsigned int const parm_size, TServer * const srvP) { /* The following ought to be parameters on ServerCreate(), but it looks like plugging them straight into the TServer structure is the only way to set them. */ if (parm_size >= XMLRPC_APSIZE(keepalive_timeout) && parmsP->keepalive_timeout > 0) srvP->keepalivetimeout = parmsP->keepalive_timeout; if (parm_size >= XMLRPC_APSIZE(keepalive_max_conn) && parmsP->keepalive_max_conn > 0) srvP->keepalivemaxconn = parmsP->keepalive_max_conn; if (parm_size >= XMLRPC_APSIZE(timeout) && parmsP->timeout > 0) srvP->timeout = parmsP->timeout; if (parm_size >= XMLRPC_APSIZE(dont_advertise)) srvP->advertise = !parmsP->dont_advertise; } static void normalLevelAbyssRun(xmlrpc_env * const envP ATTR_UNUSED, const xmlrpc_server_abyss_parms * const parmsP, unsigned int const parm_size) { unsigned int portNumber; DateInit(); MIMETypeInit(); if (parm_size >= XMLRPC_APSIZE(port_number)) portNumber = parmsP->port_number; else portNumber = 8080; if (portNumber > 0xffff) xmlrpc_env_set_fault_formatted( envP, XMLRPC_INTERNAL_ERROR, "TCP port number %u exceeds the maximum possible " "TCP port number (65535)", portNumber); else { TServer srv; const char * logFileName; if (parm_size >= XMLRPC_APSIZE(log_file_name)) logFileName = parmsP->log_file_name; else logFileName = NULL; ServerCreate(&srv, "XmlRpcServer", portNumber, DEFAULT_DOCS, logFileName); setAdditionalServerParms(parmsP, parm_size, &srv); xmlrpc_server_abyss_set_handlers(&srv, parmsP->registryP); ServerInit(&srv); setupSignalHandlers(); ServerRun(&srv); /* We can't exist here because ServerRun doesn't return */ XMLRPC_ASSERT(FALSE); } } void xmlrpc_server_abyss(xmlrpc_env * const envP, const xmlrpc_server_abyss_parms * const parmsP, unsigned int const parm_size) { XMLRPC_ASSERT_ENV_OK(envP); if (parm_size < XMLRPC_APSIZE(registryP)) xmlrpc_env_set_fault_formatted( envP, XMLRPC_INTERNAL_ERROR, "You must specify members at least up through " "'registryP' in the server parameters argument. " "That would mean the parameter size would be >= %u " "but you specified a size of %u", XMLRPC_APSIZE(registryP), parm_size); else { if (parmsP->config_file_name) oldHighLevelAbyssRun(envP, parmsP, parm_size); else normalLevelAbyssRun(envP, parmsP, parm_size); } } /*========================================================================= ** XML-RPC Server Method Registry **========================================================================= ** A simple front-end to our method registry. */ /* XXX - This variable is *not* currently threadsafe. Once the server has ** been started, it must be treated as read-only. */ static xmlrpc_registry *builtin_registryP; void xmlrpc_server_abyss_init_registry(void) { /* This used to just create the registry and Caller would be responsible for adding the handlers that use it. But that isn't very modular -- the handlers and registry go together; there's no sense in using the built-in registry and not the built-in handlers because if you're custom building something, you can just make your own regular registry. So now we tie them together, and we don't export our handlers. */ xmlrpc_env env; xmlrpc_env_init(&env); builtin_registryP = xmlrpc_registry_new(&env); die_if_fault_occurred(&env); xmlrpc_env_clean(&env); xmlrpc_server_abyss_set_handlers(&globalSrv, builtin_registryP); } xmlrpc_registry * xmlrpc_server_abyss_registry(void) { /* This is highly deprecated. If you want to mess with a registry, make your own with xmlrpc_registry_new() -- don't mess with the internal one. */ return builtin_registryP; } /* A quick & easy shorthand for adding a method. */ void xmlrpc_server_abyss_add_method (char * const method_name, xmlrpc_method const method, void * const user_data) { xmlrpc_env env; xmlrpc_env_init(&env); xmlrpc_registry_add_method(&env, builtin_registryP, NULL, method_name, method, user_data); die_if_fault_occurred(&env); xmlrpc_env_clean(&env); } void xmlrpc_server_abyss_add_method_w_doc (char * const method_name, xmlrpc_method const method, void * const user_data, char * const signature, char * const help) { xmlrpc_env env; xmlrpc_env_init(&env); xmlrpc_registry_add_method_w_doc( &env, builtin_registryP, NULL, method_name, method, user_data, signature, help); die_if_fault_occurred(&env); xmlrpc_env_clean(&env); } /* ** Copyright (C) 2001 by First Peer, Inc. 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. ** ** There is more copyright information in the bottom half of this file. ** Please see it for more details. */