mirror of
https://github.com/edeproject/ede.git
synced 2023-08-10 21:13:03 +03:00
Copying ede-bug-report from branches in trunk
This commit is contained in:
Sanel Zukan
414
ede-bug-tools/ede-bug-report/xmlrpc-c/src/xmlrpc_client_global.c
Normal file
414
ede-bug-tools/ede-bug-report/xmlrpc-c/src/xmlrpc_client_global.c
Normal file
@@ -0,0 +1,414 @@
|
||||
#include <stdarg.h>
|
||||
|
||||
#include "xmlrpc_config.h"
|
||||
|
||||
#include "bool.h"
|
||||
|
||||
#include <xmlrpc-c/base.h>
|
||||
#include <xmlrpc-c/client.h>
|
||||
#include <xmlrpc-c/client_int.h>
|
||||
#include <xmlrpc-c/client_global.h>
|
||||
|
||||
/*=========================================================================
|
||||
Global Client
|
||||
=========================================================================*/
|
||||
|
||||
static struct xmlrpc_client * globalClientP;
|
||||
static bool globalClientExists = false;
|
||||
|
||||
|
||||
void
|
||||
xmlrpc_client_init2(xmlrpc_env * const envP,
|
||||
int const flags,
|
||||
const char * const appname,
|
||||
const char * const appversion,
|
||||
const struct xmlrpc_clientparms * const clientparmsP,
|
||||
unsigned int const parmSize) {
|
||||
/*----------------------------------------------------------------------------
|
||||
This function is not thread-safe.
|
||||
-----------------------------------------------------------------------------*/
|
||||
if (globalClientExists)
|
||||
xmlrpc_faultf(
|
||||
envP,
|
||||
"Xmlrpc-c global client instance has already been created "
|
||||
"(need to call xmlrpc_client_cleanup() before you can "
|
||||
"reinitialize).");
|
||||
else {
|
||||
/* The following call is not thread-safe */
|
||||
xmlrpc_client_setup_global_const(envP);
|
||||
if (!envP->fault_occurred) {
|
||||
xmlrpc_client_create(envP, flags, appname, appversion,
|
||||
clientparmsP, parmSize, &globalClientP);
|
||||
if (!envP->fault_occurred)
|
||||
globalClientExists = true;
|
||||
|
||||
if (envP->fault_occurred)
|
||||
xmlrpc_client_teardown_global_const();
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
|
||||
void
|
||||
xmlrpc_client_init(int const flags,
|
||||
const char * const appname,
|
||||
const char * const appversion) {
|
||||
/*----------------------------------------------------------------------------
|
||||
This function is not thread-safe.
|
||||
-----------------------------------------------------------------------------*/
|
||||
struct xmlrpc_clientparms clientparms;
|
||||
|
||||
/* As our interface does not allow for failure, we just fail silently ! */
|
||||
|
||||
xmlrpc_env env;
|
||||
xmlrpc_env_init(&env);
|
||||
|
||||
clientparms.transport = NULL;
|
||||
|
||||
/* The following call is not thread-safe */
|
||||
xmlrpc_client_init2(&env, flags,
|
||||
appname, appversion,
|
||||
&clientparms, XMLRPC_CPSIZE(transport));
|
||||
|
||||
xmlrpc_env_clean(&env);
|
||||
}
|
||||
|
||||
|
||||
|
||||
void
|
||||
xmlrpc_client_cleanup() {
|
||||
/*----------------------------------------------------------------------------
|
||||
This function is not thread-safe
|
||||
-----------------------------------------------------------------------------*/
|
||||
XMLRPC_ASSERT(globalClientExists);
|
||||
|
||||
xmlrpc_client_destroy(globalClientP);
|
||||
|
||||
globalClientExists = false;
|
||||
|
||||
/* The following call is not thread-safe */
|
||||
xmlrpc_client_teardown_global_const();
|
||||
}
|
||||
|
||||
|
||||
|
||||
static void
|
||||
validateGlobalClientExists(xmlrpc_env * const envP) {
|
||||
|
||||
if (!globalClientExists)
|
||||
xmlrpc_faultf(envP,
|
||||
"Xmlrpc-c global client instance "
|
||||
"has not been created "
|
||||
"(need to call xmlrpc_client_init2()).");
|
||||
}
|
||||
|
||||
|
||||
|
||||
void
|
||||
xmlrpc_client_transport_call(
|
||||
xmlrpc_env * const envP,
|
||||
void * const reserved ATTR_UNUSED,
|
||||
/* for client handle */
|
||||
const xmlrpc_server_info * const serverP,
|
||||
xmlrpc_mem_block * const callXmlP,
|
||||
xmlrpc_mem_block ** const respXmlPP) {
|
||||
|
||||
validateGlobalClientExists(envP);
|
||||
if (!envP->fault_occurred)
|
||||
xmlrpc_client_transport_call2(envP, globalClientP, serverP,
|
||||
callXmlP, respXmlPP);
|
||||
}
|
||||
|
||||
|
||||
|
||||
static void
|
||||
clientCall_va(xmlrpc_env * const envP,
|
||||
const xmlrpc_server_info * const serverInfoP,
|
||||
const char * const methodName,
|
||||
const char * const format,
|
||||
va_list args,
|
||||
xmlrpc_value ** const resultPP) {
|
||||
|
||||
validateGlobalClientExists(envP);
|
||||
if (!envP->fault_occurred) {
|
||||
xmlrpc_value * paramArrayP;
|
||||
const char * suffix;
|
||||
|
||||
xmlrpc_build_value_va(envP, format, args, ¶mArrayP, &suffix);
|
||||
|
||||
if (!envP->fault_occurred) {
|
||||
if (*suffix != '\0')
|
||||
xmlrpc_faultf(envP, "Junk after the argument "
|
||||
"specifier: '%s'. "
|
||||
"There must be exactly one arument.",
|
||||
suffix);
|
||||
else
|
||||
xmlrpc_client_call2(envP, globalClientP, serverInfoP,
|
||||
methodName, paramArrayP, resultPP);
|
||||
|
||||
xmlrpc_DECREF(paramArrayP);
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
|
||||
xmlrpc_value *
|
||||
xmlrpc_client_call(xmlrpc_env * const envP,
|
||||
const char * const serverUrl,
|
||||
const char * const methodName,
|
||||
const char * const format,
|
||||
...) {
|
||||
|
||||
xmlrpc_value * resultP;
|
||||
|
||||
xmlrpc_server_info * serverInfoP;
|
||||
|
||||
serverInfoP = xmlrpc_server_info_new(envP, serverUrl);
|
||||
|
||||
if (!envP->fault_occurred) {
|
||||
va_list args;
|
||||
va_start(args, format);
|
||||
|
||||
clientCall_va(envP, serverInfoP, methodName, format, args, &resultP);
|
||||
|
||||
va_end(args);
|
||||
xmlrpc_server_info_free(serverInfoP);
|
||||
}
|
||||
|
||||
return resultP;
|
||||
}
|
||||
|
||||
|
||||
|
||||
xmlrpc_value *
|
||||
xmlrpc_client_call_server(xmlrpc_env * const envP,
|
||||
const xmlrpc_server_info * const serverP,
|
||||
const char * const methodName,
|
||||
const char * const format,
|
||||
...) {
|
||||
|
||||
va_list args;
|
||||
xmlrpc_value * resultP;
|
||||
|
||||
va_start(args, format);
|
||||
clientCall_va(envP, serverP, methodName, format, args, &resultP);
|
||||
va_end(args);
|
||||
|
||||
return resultP;
|
||||
}
|
||||
|
||||
|
||||
|
||||
xmlrpc_value *
|
||||
xmlrpc_client_call_server_params(
|
||||
xmlrpc_env * const envP,
|
||||
const xmlrpc_server_info * const serverInfoP,
|
||||
const char * const methodName,
|
||||
xmlrpc_value * const paramArrayP) {
|
||||
|
||||
xmlrpc_value * resultP;
|
||||
|
||||
validateGlobalClientExists(envP);
|
||||
|
||||
if (!envP->fault_occurred)
|
||||
xmlrpc_client_call2(envP, globalClientP,
|
||||
serverInfoP, methodName, paramArrayP,
|
||||
&resultP);
|
||||
|
||||
return resultP;
|
||||
}
|
||||
|
||||
|
||||
|
||||
xmlrpc_value *
|
||||
xmlrpc_client_call_params(xmlrpc_env * const envP,
|
||||
const char * const serverUrl,
|
||||
const char * const methodName,
|
||||
xmlrpc_value * const paramArrayP) {
|
||||
|
||||
xmlrpc_value * resultP;
|
||||
|
||||
validateGlobalClientExists(envP);
|
||||
|
||||
if (!envP->fault_occurred) {
|
||||
xmlrpc_server_info * serverInfoP;
|
||||
|
||||
serverInfoP = xmlrpc_server_info_new(envP, serverUrl);
|
||||
|
||||
if (!envP->fault_occurred) {
|
||||
xmlrpc_client_call2(envP, globalClientP,
|
||||
serverInfoP, methodName, paramArrayP,
|
||||
&resultP);
|
||||
|
||||
xmlrpc_server_info_free(serverInfoP);
|
||||
}
|
||||
}
|
||||
return resultP;
|
||||
}
|
||||
|
||||
|
||||
|
||||
void
|
||||
xmlrpc_client_call_server_asynch_params(
|
||||
xmlrpc_server_info * const serverInfoP,
|
||||
const char * const methodName,
|
||||
xmlrpc_response_handler responseHandler,
|
||||
void * const userData,
|
||||
xmlrpc_value * const paramArrayP) {
|
||||
|
||||
xmlrpc_env env;
|
||||
|
||||
xmlrpc_env_init(&env);
|
||||
|
||||
validateGlobalClientExists(&env);
|
||||
|
||||
if (!env.fault_occurred)
|
||||
xmlrpc_client_start_rpc(&env, globalClientP,
|
||||
serverInfoP, methodName, paramArrayP,
|
||||
responseHandler, userData);
|
||||
|
||||
if (env.fault_occurred) {
|
||||
/* Unfortunately, we have no way to return an error and the
|
||||
regular callback for a failed RPC is designed to have the
|
||||
parameter array passed to it. This was probably an oversight
|
||||
of the original asynch design, but now we have to be as
|
||||
backward compatible as possible, so we do this:
|
||||
*/
|
||||
(*responseHandler)(serverInfoP->serverUrl,
|
||||
methodName, paramArrayP, userData,
|
||||
&env, NULL);
|
||||
}
|
||||
xmlrpc_env_clean(&env);
|
||||
}
|
||||
|
||||
|
||||
|
||||
void
|
||||
xmlrpc_client_call_asynch(const char * const serverUrl,
|
||||
const char * const methodName,
|
||||
xmlrpc_response_handler responseHandler,
|
||||
void * const userData,
|
||||
const char * const format,
|
||||
...) {
|
||||
|
||||
xmlrpc_env env;
|
||||
|
||||
xmlrpc_env_init(&env);
|
||||
|
||||
validateGlobalClientExists(&env);
|
||||
|
||||
if (!env.fault_occurred) {
|
||||
xmlrpc_value * paramArrayP;
|
||||
const char * suffix;
|
||||
va_list args;
|
||||
|
||||
va_start(args, format);
|
||||
xmlrpc_build_value_va(&env, format, args, ¶mArrayP, &suffix);
|
||||
va_end(args);
|
||||
|
||||
if (!env.fault_occurred) {
|
||||
if (*suffix != '\0')
|
||||
xmlrpc_faultf(&env, "Junk after the argument "
|
||||
"specifier: '%s'. "
|
||||
"There must be exactly one arument.",
|
||||
suffix);
|
||||
else
|
||||
xmlrpc_client_call_asynch_params(
|
||||
serverUrl, methodName, responseHandler, userData,
|
||||
paramArrayP);
|
||||
}
|
||||
}
|
||||
if (env.fault_occurred)
|
||||
(*responseHandler)(serverUrl, methodName, NULL, userData, &env, NULL);
|
||||
|
||||
xmlrpc_env_clean(&env);
|
||||
}
|
||||
|
||||
|
||||
|
||||
void
|
||||
xmlrpc_client_call_asynch_params(const char * const serverUrl,
|
||||
const char * const methodName,
|
||||
xmlrpc_response_handler responseHandler,
|
||||
void * const userData,
|
||||
xmlrpc_value * const paramArrayP) {
|
||||
xmlrpc_env env;
|
||||
xmlrpc_server_info * serverInfoP;
|
||||
|
||||
xmlrpc_env_init(&env);
|
||||
|
||||
serverInfoP = xmlrpc_server_info_new(&env, serverUrl);
|
||||
|
||||
if (!env.fault_occurred) {
|
||||
xmlrpc_client_call_server_asynch_params(
|
||||
serverInfoP, methodName, responseHandler, userData, paramArrayP);
|
||||
|
||||
xmlrpc_server_info_free(serverInfoP);
|
||||
}
|
||||
if (env.fault_occurred)
|
||||
(*responseHandler)(serverUrl, methodName, paramArrayP, userData,
|
||||
&env, NULL);
|
||||
xmlrpc_env_clean(&env);
|
||||
}
|
||||
|
||||
|
||||
|
||||
void
|
||||
xmlrpc_client_call_server_asynch(xmlrpc_server_info * const serverInfoP,
|
||||
const char * const methodName,
|
||||
xmlrpc_response_handler responseHandler,
|
||||
void * const userData,
|
||||
const char * const format,
|
||||
...) {
|
||||
|
||||
xmlrpc_env env;
|
||||
xmlrpc_value * paramArrayP;
|
||||
const char * suffix;
|
||||
va_list args;
|
||||
|
||||
xmlrpc_env_init(&env);
|
||||
|
||||
va_start(args, format);
|
||||
xmlrpc_build_value_va(&env, format, args, ¶mArrayP, &suffix);
|
||||
va_end(args);
|
||||
|
||||
if (!env.fault_occurred) {
|
||||
if (*suffix != '\0')
|
||||
xmlrpc_faultf(&env, "Junk after the argument "
|
||||
"specifier: '%s'. "
|
||||
"There must be exactly one arument.",
|
||||
suffix);
|
||||
else
|
||||
xmlrpc_client_call_server_asynch_params(
|
||||
serverInfoP, methodName, responseHandler, userData,
|
||||
paramArrayP);
|
||||
|
||||
xmlrpc_DECREF(paramArrayP);
|
||||
}
|
||||
if (env.fault_occurred)
|
||||
(*responseHandler)(serverInfoP->serverUrl, methodName, NULL,
|
||||
userData, &env, NULL);
|
||||
|
||||
xmlrpc_env_clean(&env);
|
||||
}
|
||||
|
||||
|
||||
|
||||
void
|
||||
xmlrpc_client_event_loop_finish_asynch(void) {
|
||||
|
||||
XMLRPC_ASSERT(globalClientExists);
|
||||
xmlrpc_client_event_loop_finish(globalClientP);
|
||||
}
|
||||
|
||||
|
||||
|
||||
void
|
||||
xmlrpc_client_event_loop_finish_asynch_timeout(
|
||||
unsigned long const milliseconds) {
|
||||
|
||||
XMLRPC_ASSERT(globalClientExists);
|
||||
xmlrpc_client_event_loop_finish_timeout(globalClientP, milliseconds);
|
||||
}
|
||||
Reference in New Issue
Block a user