diff GEMBASSY-1.0.3/gsoap/custom/struct_tm.c @ 0:8300eb051bea draft

Initial upload
author ktnyt
date Fri, 26 Jun 2015 05:19:29 -0400
parents
children
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/GEMBASSY-1.0.3/gsoap/custom/struct_tm.c	Fri Jun 26 05:19:29 2015 -0400
@@ -0,0 +1,180 @@
+/*
+	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;
+}