diff options
Diffstat (limited to 'libcsoap/soap-call.c')
| -rw-r--r-- | libcsoap/soap-call.c | 227 |
1 files changed, 227 insertions, 0 deletions
diff --git a/libcsoap/soap-call.c b/libcsoap/soap-call.c new file mode 100644 index 0000000..31ec597 --- /dev/null +++ b/libcsoap/soap-call.c @@ -0,0 +1,227 @@ +/****************************************************************** + * $Id: soap-call.c,v 1.1 2004/01/30 16:39:34 snowdrop Exp $ + * + * CSOAP Project: A SOAP client/server library in C + * Copyright (C) 2003 Ferhat Ayaz + * + * This library is free software; you can redistribute it and/or + * modify it under the terms of the GNU Library General Public + * License as published by the Free Software Foundation; either + * version 2 of the License, or (at your option) any later version. + * + * This library is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + * Library General Public License for more details. + * + * You should have received a copy of the GNU Library General Public + * License along with this library; if not, write to the + * Free Software Foundation, Inc., 59 Temple Place - Suite 330, + * Boston, MA 02111-1307, USA. + * + * Email: ayaz@jprogrammer.net + ******************************************************************/ +#include <libcsoap/soap-call.h> +#include <libcsoap/soap-xml.h> +#include <libcsoap/soap-fault.h> +#include <nanohttp/nanohttp-client.h> +#include <stdarg.h> + + +static char *soap_env_ns = "http://schemas.xmlsoap.org/soap/envelope/"; +static char *soap_env_enc = "http://schemas.xmlsoap.org/soap/encoding/"; +static char *soap_xsi_ns = "http://www.w3.org/1999/XMLSchema-instance"; +static char *soap_xsd_ns = "http://www.w3.org/1999/XMLSchema"; + +/* + Parameters: + 1- soap_env_ns + 2- soap_env_enc + 3- xsi_ns + 4- xsd_ns + 3- method name + 4- uri + 5- method name(again) + */ +#define _SOAP_MSG_TEMPLATE_ \ + "<SOAP-ENV:Envelope xmlns:SOAP-ENV=\"%s\" SOAP-ENV:encoding=\"%s\"" \ + " xmlns:xsi=\"%s\"" \ + " xmlns:xsd=\"%s\">" \ + " <SOAP-ENV:Body>"\ + " <m:%s xmlns:m=\"%s\">"\ + " </m:%s>" \ + " </SOAP-ENV:Body>"\ + "</SOAP-ENV:Envelope>" + + +/*--------------------------------- */ +static +xmlDocPtr _soap_call_build_result(hresponse_t *res); +/*--------------------------------- */ + + +SoapCall* soap_call_new(const char *urn, const char *method) +{ + xmlDocPtr env; + xmlNodePtr node; + SoapCall *call; + char buffer[1054]; + + + log_verbose3("URN = '%s'\nMethod = '%s'\n", urn, method); + + sprintf(buffer, _SOAP_MSG_TEMPLATE_, + soap_env_ns, soap_env_enc, soap_xsi_ns, + soap_xsd_ns, method, urn, method); + + env = xmlParseDoc(buffer); + if (env == NULL) { + log_error1("Can not create xml document!"); + return NULL; + } + + node = xmlDocGetRootElement(env); + if (node == NULL) { + log_error1("xml document is empty!"); + return NULL; + } + + call = (SoapCall*)malloc(sizeof(SoapCall)); + + /* set root */ + call->root = node; + + /* set method root + set call->cur (current node) to <method>. + xpath: //Envelope/Body/ + */ + node = soap_xml_get_children(call->root); + call->cur = soap_xml_get_children(node); + + return call; +} + + + +xmlNodePtr +soap_call_add_param(SoapCall *call, const char *type, + const char *name, const char *value) +{ + + xmlNodePtr newnode; + + newnode = xmlNewTextChild(call->cur, NULL, name, value); + + if (newnode == NULL) { + log_error1("Can not create new xml node"); + return NULL; + } + + if (type) { + if (!xmlNewProp(newnode, "xsi:type", type)) { + log_error1("Can not create new xml attribute"); + return NULL; + } + } + + return newnode; +} + + +xmlNodePtr +soap_call_add_paramf(SoapCall *call, const char *type, + const char *name, const char *format, ...) +{ + + va_list ap; + char buffer[1054]; + xmlNodePtr newnode; + + + va_start(ap, format); + vsprintf(buffer, format, ap); + va_end(ap); + + return soap_call_add_param(call, type, name, buffer); +} + +xmlNodePtr +soap_call_push_param(SoapCall *call, const char *type, + const char *name) +{ + + xmlNodePtr node; + + node = soap_call_add_param(call, type, name, ""); + + if (node) { + call->cur = node; + } + + return node; +} + + +void +soap_call_pop_param(SoapCall *call) +{ + call->cur = call->cur->parent; +} + + +xmlDocPtr +soap_call_invoke(SoapCall *call, const char *url) +{ + /* Result document */ + xmlDocPtr doc; + + /* Buffer variables*/ + xmlBufferPtr buffer; + char *content; + + /* Transport variables */ + httpc_conn_t *conn; + hresponse_t *res; + + /* Create buffer */ + buffer = xmlBufferCreate(); + xmlNodeDump(buffer, call->root->doc,call->root, 1 ,2); + content = (char*)xmlBufferContent(buffer); + + /* Transport via HTTP */ + conn = httpc_new(); + res = httpc_post(conn, url, strlen(content), content); + + /* Free buffer */ + xmlBufferFree(buffer); + + /* Build result */ + doc = _soap_call_build_result(res); + + return doc; +} + + +static +xmlDocPtr _soap_call_build_result(hresponse_t *res) +{ + xmlDocPtr doc; + + if (res == NULL) + return soap_fault_build(Fault_Client, + "Response is NULL","",""); + + if (res->body) + return soap_fault_build(Fault_Client, + "Empty response from server!","",""); + + + doc = xmlParseDoc(res->body); + if (doc == NULL) { + return soap_fault_build(Fault_Client, + "Response is not in XML format!","",""); + } + + return doc; +} + |