diff options
Diffstat (limited to 'gsoap-palm/stockquote/src/stockquote.c')
| -rw-r--r-- | gsoap-palm/stockquote/src/stockquote.c | 58 |
1 files changed, 58 insertions, 0 deletions
diff --git a/gsoap-palm/stockquote/src/stockquote.c b/gsoap-palm/stockquote/src/stockquote.c new file mode 100644 index 0000000..8614d49 --- /dev/null +++ b/gsoap-palm/stockquote/src/stockquote.c @@ -0,0 +1,58 @@ +#include "soapH.h" + +extern int getQuote (char *symbol, char *Result); + +SOAP_NMAC struct Namespace namespaces[] = +{ + {"SOAP-ENV", "http://schemas.xmlsoap.org/soap/envelope/", "http://www.w3.org/*/soap-envelope"}, + {"SOAP-ENC", "http://schemas.xmlsoap.org/soap/encoding/", "http://www.w3.org/*/soap-encoding"}, + {"xsi", "http://www.w3.org/2001/XMLSchema-instance", "http://www.w3.org/*/XMLSchema-instance"}, + {"xsd", "http://www.w3.org/2001/XMLSchema", "http://www.w3.org/*/XMLSchema"}, + {"ns", "urn:xmethods-delayed-quotes"}, + {NULL, NULL} +}; + +void StdEtoA(char *text); + +int getQuote (char *symbol, char *Result) { + + FlpCompDouble d; + struct soap *soap; + float result; + int rc; + char *addr = "http://services.xmethods.net/soap/"; + + soap = soap_new(); + soap->namespaces = (struct Namespace *)namespaces; + rc = soap_call_ns__getQuote(soap, addr, "", (char*)symbol, &result); + soap_end(soap); + free(soap); + + if (rc==SOAP_OK) { + d.d= result; + FlpFToA (d.fd,Result); + StdEtoA(Result); + } else { + soap_set_fault(soap); + strcpy (Result, soap->msgbuf); + } + + return rc; + +} + +void StdEtoA(char *text) { + int i; + int len = strlen(text); + char *ptr=text+(len-2); + int digits=atoi(ptr); + ptr=text+1; + for (i=0; i<digits; i++) + { + *ptr = *(ptr+1); + ptr++; + } + *ptr='.'; + *(ptr+3)=0; + +}
\ No newline at end of file |