Mercurial > repos > ktnyt > gembassy
diff GEMBASSY-1.0.3/gsoap/custom/struct_tm.c @ 2:8947fca5f715 draft default tip
Uploaded
author | ktnyt |
---|---|
date | Fri, 26 Jun 2015 05:21:44 -0400 |
parents | 84a17b3fad1f |
children |
line wrap: on
line diff
--- a/GEMBASSY-1.0.3/gsoap/custom/struct_tm.c Fri Jun 26 05:20:29 2015 -0400 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,180 +0,0 @@ -/* - struct_tm.c - - Custom serializer for <time.h> struct tm - - Compile this file and link it with your code. - - Changes: - Feb 8, 2008: fixed local time to internal GMT conversion - -gSOAP XML Web services tools -Copyright (C) 2000-2008, Robert van Engelen, Genivia Inc., All Rights Reserved. -This part of the software is released under ONE of the following licenses: -GPL, the gSOAP public license, OR Genivia's license for commercial use. --------------------------------------------------------------------------------- -gSOAP public license. - -The contents of this file are subject to the gSOAP Public License Version 1.3 -(the "License"); you may not use this file except in compliance with the -License. You may obtain a copy of the License at -http://www.cs.fsu.edu/~engelen/soaplicense.html -Software distributed under the License is distributed on an "AS IS" basis, -WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License -for the specific language governing rights and limitations under the License. - -The Initial Developer of the Original Code is Robert A. van Engelen. -Copyright (C) 2000-2008, Robert van Engelen, Genivia, Inc., All Rights Reserved. --------------------------------------------------------------------------------- -GPL license. - -This program is free software; you can redistribute it and/or modify it under -the terms of the GNU General Public License as published by the Free Software -Foundation; either version 2 of the License, or (at your option) any later -version. - -This program 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 General Public License for more details. - -You should have received a copy of the GNU General Public License along with -this program; if not, write to the Free Software Foundation, Inc., 59 Temple -Place, Suite 330, Boston, MA 02111-1307 USA - -Author contact information: -engelen@genivia.com / engelen@acm.org - -This program is released under the GPL with the additional exemption that -compiling, linking, and/or using OpenSSL is allowed. --------------------------------------------------------------------------------- -A commercial use license is available from Genivia, Inc., contact@genivia.com --------------------------------------------------------------------------------- -*/ - -/* soapH.h generated by soapcpp2 from .h file containing #import "struct_tm.h": */ -#include "soapH.h" - -void soap_default_xsd__dateTime(struct soap *soap, struct tm *a) -{ memset(a, 0, sizeof(struct tm)); -} - -void soap_serialize_xsd__dateTime(struct soap *soap, struct tm const *a) -{ } - -const char *soap_xsd__dateTime2s(struct soap *soap, const struct tm a) -{ strftime(soap->tmpbuf, sizeof(soap->tmpbuf), "%Y-%m-%dT%H:%M:%SZ", &a); - return soap->tmpbuf; -} - -int soap_out_xsd__dateTime(struct soap *soap, const char *tag, int id, const struct tm *a, const char *type) -{ if (soap_element_begin_out(soap, tag, soap_embedded_id(soap, id, a, SOAP_TYPE_xsd__dateTime), type) - || soap_string_out(soap, soap_xsd__dateTime2s(soap, *a), 0)) - return soap->error; - return soap_element_end_out(soap, tag); -} - -int soap_s2xsd__dateTime(struct soap *soap, const char *s, struct tm *a) -{ memset((void*)a, 0, sizeof(struct tm)); - if (s) - { char zone[32]; - const char *t; - if (strchr(s, '-')) - t = "%d-%d-%dT%d:%d:%d%31s"; - else if (strchr(s, ':')) - t = "%4d%2d%2dT%d:%d:%d%31s"; - else /* parse non-XSD-standard alternative ISO 8601 format */ - t = "%4d%2d%2dT%2d%2d%2d%31s"; - if (sscanf(s, t, &a->tm_year, &a->tm_mon, &a->tm_mday, &a->tm_hour, &a->tm_min, &a->tm_sec, zone) < 6) - return soap->error = SOAP_TYPE; - a->tm_wday = -1; - a->tm_yday = -1; - if (a->tm_year == 1) - a->tm_year = 70; - else - a->tm_year -= 1900; - a->tm_mon--; - if (*zone == '.') - { for (s = zone + 1; *s; s++) - if (*s < '0' || *s > '9') - break; - } - else - s = zone; - if (*s) - { if (*s == '+' || *s == '-') - { int h = 0, m = 0; - if (s[3] == ':') - { /* +hh:mm */ - sscanf(s, "%d:%d", &h, &m); - if (h < 0) - m = -m; - } - else /* +hhmm */ - { m = (int)atol(s); - h = m / 100; - m = m % 100; - } - a->tm_hour -= h; - a->tm_min -= m; - } - } - else /* if no time zone then convert to internal GMT without considering DST */ - { int minuteswest; -#if defined(HAVE_GETTIMEOFDAY) - struct timeval tv; - struct timezone tz; - gettimeofday(&tv, &tz); - minuteswest = tz.tz_minuteswest; -#elif defined(HAVE_FTIME) - struct timeb tb; - memset((void*)&tb, 0, sizeof(tb)); -#ifdef __BORLAND__ - ::ftime(&tb); -#else - ftime(&tb); -#endif - minuteswest = tb.timezone; -#else - /* local timezone unknown */ - minuteswest = 0; -#endif - a->tm_min += minuteswest; - } - /* put hour and min in range */ - a->tm_hour += a->tm_min / 60; - a->tm_min %= 60; - if (a->tm_min < 0) - { a->tm_min += 60; - a->tm_hour--; - } - a->tm_mday += a->tm_hour / 24; - a->tm_hour %= 24; - if (a->tm_hour < 0) - { a->tm_hour += 24; - a->tm_mday--; - } - } - return soap->error; -} - -struct tm *soap_in_xsd__dateTime(struct soap *soap, const char *tag, struct tm *a, const char *type) -{ if (soap_element_begin_in(soap, tag, 0, NULL)) - return NULL; - if (*soap->type - && soap_match_tag(soap, soap->type, type) - && soap_match_tag(soap, soap->type, ":dateTime")) - { soap->error = SOAP_TYPE; - soap_revert(soap); - return NULL; - } - a = (struct tm*)soap_id_enter(soap, soap->id, a, SOAP_TYPE_xsd__dateTime, sizeof(struct tm), 0, NULL, NULL, NULL); - if (*soap->href) - a = (struct tm*)soap_id_forward(soap, soap->href, a, 0, SOAP_TYPE_xsd__dateTime, 0, sizeof(struct tm), 0, NULL); - else if (a) - { if (soap_s2xsd__dateTime(soap, soap_value(soap), a)) - return NULL; - } - if (soap->body && soap_element_end_in(soap, tag)) - return NULL; - return a; -}