Added support for checking timezone and tm_gmtoff. Fixed
[silc.git] / lib / silcutil / silctime.c
index 13575e57ee62132c5ebdb8f1e592a7216e4b5879..3f3a2807fea4437569271eb3203b485bbfd6daae 100644 (file)
@@ -4,7 +4,7 @@
 
   Author: Pekka Riikonen <priikone@silcnet.org>
 
-  Copyright (C) 2003 - 2005 Pekka Riikonen
+  Copyright (C) 2003 - 2007 Pekka Riikonen
 
   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
 
 #include "silc.h"
 
+/* Fills the SilcTime structure with correct values */
+
+static SilcBool silc_time_fill(SilcTime time,
+                              unsigned int year,
+                              unsigned int month,
+                              unsigned int day,
+                              unsigned int hour,
+                              unsigned int minute,
+                              unsigned int second,
+                              unsigned int msec)
+{
+  if (year > (1 << 15))
+    return FALSE;
+  if (month < 1 || month > 12)
+    return FALSE;
+  if (day < 1 || day > 31)
+    return FALSE;
+  if (hour > 23)
+    return FALSE;
+  if (minute > 60)
+    return FALSE;
+  if (second > 61)
+    return FALSE;
+  if (msec > 1000)
+    return FALSE;
+
+  time->year = year;
+  time->month = month;
+  time->day = day;
+  time->hour = hour;
+  time->minute = minute;
+  time->second = second;
+  time->msecond = msec;
+
+  return TRUE;
+}
+
 /* Return time since Epoch */
 
 SilcInt64 silc_time(void)
@@ -26,17 +63,36 @@ SilcInt64 silc_time(void)
   return (SilcInt64)time(NULL);
 }
 
+/* Return time since Epoch in milliseconds */
+
+SilcInt64 silc_time_msec(void)
+{
+  struct timeval curtime;
+  silc_gettimeofday(&curtime);
+  return (curtime.tv_sec * (SilcUInt64)1000) +
+    (curtime.tv_usec / (SilcUInt64)1000);
+}
+
+/* Return time since Epoch in microseconds */
+
+SilcInt64 silc_time_usec(void)
+{
+  struct timeval curtime;
+  silc_gettimeofday(&curtime);
+  return (curtime.tv_sec * (SilcUInt64)1000000) + curtime.tv_usec;
+}
+
 /* Returns time as string */
 
-const char *silc_time_string(SilcInt64 timeval)
+const char *silc_time_string(SilcInt64 time_val)
 {
   time_t curtime;
   char *return_time;
 
-  if (!timeval)
-    curtime = time(NULL);
+  if (!time_val)
+    curtime = silc_time();
   else
-    curtime = (time_t)timeval;
+    curtime = (time_t)time_val;
   return_time = ctime(&curtime);
   if (!return_time)
     return NULL;
@@ -47,28 +103,32 @@ const char *silc_time_string(SilcInt64 timeval)
 
 /* Returns time as SilcTime structure */
 
-SilcBool silc_time_value(SilcInt64 timeval, SilcTime ret_time)
+SilcBool silc_time_value(SilcInt64 time_val, SilcTime ret_time)
 {
-  struct tm *time;
+  struct tm *t;
+  unsigned int msec = 0;
+  time_t timeval;
 
   if (!ret_time)
     return TRUE;
 
-  if (!timeval)
-    timeval = silc_time();
+  if (!time_val)
+    time_val = silc_time_msec();
 
-  time = localtime((time_t *)&timeval);
-  if (!time)
+  msec = (SilcUInt64)time_val % (SilcUInt64)1000;
+  timeval = (time_t)((SilcUInt64)time_val / (SilcUInt64)1000);
+
+  t = localtime(&timeval);
+  if (!t)
     return FALSE;
 
   memset(ret_time, 0, sizeof(*ret_time));
-  ret_time->year    = time->tm_year + 1900;
-  ret_time->month   = time->tm_mon + 1;
-  ret_time->day     = time->tm_mday;
-  ret_time->hour    = time->tm_hour;
-  ret_time->minute  = time->tm_min;
-  ret_time->second  = time->tm_sec;
-  ret_time->dst     = time->tm_isdst ? 1 : 0;
+  if (!silc_time_fill(ret_time, t->tm_year + 1900, t->tm_mon + 1,
+                     t->tm_mday, t->tm_hour, t->tm_min,
+                     t->tm_sec, msec))
+    return FALSE;
+
+  ret_time->dst        = t->tm_isdst ? 1 : 0;
 
 #ifdef SILC_WIN32
   ret_time->utc_east   = _timezone < 0 ? 1 : 0;
@@ -77,47 +137,60 @@ SilcBool silc_time_value(SilcInt64 timeval, SilcTime ret_time)
   ret_time->utc_minute = (ret_time->utc_east ? (-(_timezone)) % 3600 :
                          _timezone % 3600);
 #else
-#if defined(HAVE_TZSET)
+#if defined(HAVE_TIMEZONE)
   ret_time->utc_east   = timezone < 0 ? 1 : 0;
+#elif defined(HAVE_TM_GMTOFF)
+  ret_time->utc_east   = t->tm_gmtoff > 0 ? 1 : 0;
+#elif defined(HAVE___TM_GMTOFF)
+  ret_time->utc_east   = t->__tm_gmtoff > 0 ? 1 : 0;
+#elif defined(HAVE___TM_GMTOFF__)
+  ret_time->utc_east   = t->__tm_gmtoff__ > 0 ? 1 : 0;
+#endif /* HAVE_TIMEZONE */
+
+#if defined(HAVE_TIMEZONE)
   ret_time->utc_hour   = (ret_time->utc_east ? (-(timezone)) / 3600 :
                          timezone / 3600);
+  if (ret_time->dst)
+    ret_time->utc_hour++;
   ret_time->utc_minute = (ret_time->utc_east ? (-(timezone)) % 3600 :
                          timezone % 3600);
-#endif /* HAVE_TZSET */
+#elif defined(HAVE_GMTIME)
+  t = gmtime(&timeval);
+  if (t) {
+    ret_time->utc_hour   = (ret_time->utc_east
+                           ? ret_time->hour - t->tm_hour
+                           : ret_time->hour + t->tm_hour);
+    ret_time->utc_minute = (ret_time->utc_east
+                           ? ret_time->minute - t->tm_min
+                           : ret_time->minute + t->tm_min);
+  }
+#endif /* HAVE_TIMEZONE */
 #endif /* SILC_WIN32 */
 
   return TRUE;
 }
 
-/* Fills the SilcTime structure with correct values */
+/* Returns timezone */
 
-static SilcBool silc_time_fill(SilcTime time,
-                              unsigned int year,
-                              unsigned int month,
-                              unsigned int day,
-                              unsigned int hour,
-                              unsigned int minute,
-                              unsigned int second)
+SilcBool silc_timezone(char *timezone, SilcUInt32 timezone_size)
 {
-  if (year > 8191)
-    return FALSE;
-  if (month < 1 || month > 12)
-    return FALSE;
-  if (day < 1 || day > 31)
-    return FALSE;
-  if (hour > 23)
-    return FALSE;
-  if (minute > 60)
+  SilcTimeStruct curtime;
+
+  if (timezone_size < 6)
     return FALSE;
-  if (second > 61)
+
+  if (!silc_time_value(0, &curtime))
     return FALSE;
 
-  time->year = year;
-  time->month = month;
-  time->day = day;
-  time->hour = hour;
-  time->minute = minute;
-  time->second = second;
+  if (!curtime.utc_hour && curtime.utc_minute)
+    silc_snprintf(timezone, timezone_size, "Z");
+  else if (curtime.utc_minute)
+    silc_snprintf(timezone, timezone_size, "%c%02d:%02d",
+                 curtime.utc_east ? '+' : '-', curtime.utc_hour,
+                 curtime.utc_minute);
+  else
+    silc_snprintf(timezone, timezone_size, "%c%02d",
+                 curtime.utc_east ? '+' : '-', curtime.utc_hour);
 
   return TRUE;
 }
@@ -143,7 +216,7 @@ SilcBool silc_time_universal(const char *universal_time, SilcTime ret_time)
   }
 
   /* Fill the SilcTime structure */
-  ret = silc_time_fill(ret_time, year, month, day, hour, minute, second);
+  ret = silc_time_fill(ret_time, year, month, day, hour, minute, second, 0);
   if (!ret) {
     SILC_LOG_DEBUG(("Incorrect values in UTC time string"));
     return FALSE;
@@ -180,28 +253,28 @@ SilcBool silc_time_universal(const char *universal_time, SilcTime ret_time)
 
 /* Encode universal time string. */
 
-SilcBool silc_time_universal_string(SilcTime timeval, char *ret_string,
+SilcBool silc_time_universal_string(SilcTime time_val, char *ret_string,
                                    SilcUInt32 ret_string_size)
 {
   int ret, len = 0;
   memset(ret_string, 0, ret_string_size);
-  ret = snprintf(ret_string, ret_string_size - 1,
+  ret = silc_snprintf(ret_string, ret_string_size - 1,
                 "%02u%02u%02u%02u%02u%02u",
-                timeval->year % 100, timeval->month, timeval->day,
-                timeval->hour, timeval->minute, timeval->second);
+                time_val->year % 100, time_val->month, time_val->day,
+                time_val->hour, time_val->minute, time_val->second);
   if (ret < 0)
     return FALSE;
   len += ret;
 
-  if (!timeval->utc_hour && !timeval->utc_minute) {
-    ret = snprintf(ret_string + len, ret_string_size - 1 - len, "Z");
+  if (!time_val->utc_hour && !time_val->utc_minute) {
+    ret = silc_snprintf(ret_string + len, ret_string_size - 1 - len, "Z");
     if (ret < 0)
       return FALSE;
     len += ret;
   } else {
-    ret = snprintf(ret_string + len, ret_string_size - 1 - len,
-                  "%c%02u%02u", timeval->utc_east ? '+' : '-',
-                  timeval->utc_hour, timeval->utc_minute);
+    ret = silc_snprintf(ret_string + len, ret_string_size - 1 - len,
+                  "%c%02u%02u", time_val->utc_east ? '+' : '-',
+                  time_val->utc_hour, time_val->utc_minute);
     if (ret < 0)
       return FALSE;
     len += ret;
@@ -232,7 +305,7 @@ SilcBool silc_time_generalized(const char *generalized_time, SilcTime ret_time)
   }
 
   /* Fill the SilcTime structure */
-  ret = silc_time_fill(ret_time, year, month, day, hour, minute, second);
+  ret = silc_time_fill(ret_time, year, month, day, hour, minute, second, 0);
   if (!ret) {
     SILC_LOG_DEBUG(("Incorrect values in generalized time string"));
     return FALSE;
@@ -290,36 +363,36 @@ SilcBool silc_time_generalized(const char *generalized_time, SilcTime ret_time)
 
 /* Encode generalized time string */
 
-SilcBool silc_time_generalized_string(SilcTime timeval, char *ret_string,
+SilcBool silc_time_generalized_string(SilcTime time_val, char *ret_string,
                                      SilcUInt32 ret_string_size)
 {
   int len = 0, ret;
   memset(ret_string, 0, ret_string_size);
-  ret = snprintf(ret_string, ret_string_size - 1,
+  ret = silc_snprintf(ret_string, ret_string_size - 1,
                 "%04u%02u%02u%02u%02u%02u",
-                timeval->year, timeval->month, timeval->day, timeval->hour,
-                timeval->minute, timeval->second);
+                time_val->year, time_val->month, time_val->day, time_val->hour,
+                time_val->minute, time_val->second);
   if (ret < 0)
     return FALSE;
   len += ret;
 
-  if (timeval->msecond) {
-    ret = snprintf(ret_string + len, ret_string_size - 1 - len,
-                  ".%lu", (unsigned long)timeval->msecond);
+  if (time_val->msecond) {
+    ret = silc_snprintf(ret_string + len, ret_string_size - 1 - len,
+                  ".%lu", (unsigned long)time_val->msecond);
     if (ret < 0)
       return FALSE;
     len += ret;
   }
 
-  if (!timeval->utc_hour && !timeval->utc_minute) {
-    ret = snprintf(ret_string + len, ret_string_size - 1 - len, "Z");
+  if (!time_val->utc_hour && !time_val->utc_minute) {
+    ret = silc_snprintf(ret_string + len, ret_string_size - 1 - len, "Z");
     if (ret < 0)
       return FALSE;
     len += ret;
   } else {
-    ret = snprintf(ret_string + len, ret_string_size - 1 - len,
-                  "%c%02u%02u", timeval->utc_east ? '+' : '-',
-                  timeval->utc_hour, timeval->utc_minute);
+    ret = silc_snprintf(ret_string + len, ret_string_size - 1 - len,
+                  "%c%02u%02u", time_val->utc_east ? '+' : '-',
+                  time_val->utc_hour, time_val->utc_minute);
     if (ret < 0)
       return FALSE;
     len += ret;
@@ -327,3 +400,13 @@ SilcBool silc_time_generalized_string(SilcTime timeval, char *ret_string,
 
   return TRUE;
 }
+
+/* Return TRUE if `smaller' is smaller than `bigger'. */
+
+int silc_compare_timeval(struct timeval *t1, struct timeval *t2)
+{
+  SilcInt32 s = t1->tv_sec - t2->tv_sec;
+  if (!s)
+    return t1->tv_usec - t2->tv_usec;
+  return s;
+}