compiler/clib/gettimeofday.c

   1 /*
   2     Copyright © 1995-2012, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Query the current time and/or timezone.
   6 */
   7
   8 #include "__arosc_privdata.h"
   9
  10 #include <proto/exec.h>
  11 #include <proto/dos.h>
  12 #include <proto/timer.h>
  13 #include <proto/locale.h>
  14 #include <exec/types.h>
  15 #include <devices/timer.h>
  16 #include <aros/symbolsets.h>
  17 #include <aros/debug.h>
  18
  19 #include <time.h>
  20 #include <errno.h>
  21
  22 struct Device *TimerBase;
  23 static void __init_timerbase(void);
  24
  25 /*****************************************************************************
  26
  27     NAME */
  28 #include <sys/time.h>
  29 #include <unistd.h>
  30
  31         int gettimeofday (
  32
  33 /*  SYNOPSIS */
  34         struct timeval  * tv,
  35         struct timezone * tz)
  36
  37 /*  FUNCTION
  38         Return the current time and/or timezone.
  39
  40     INPUTS
  41         tv - If this pointer is non-NULL, the current time will be
  42                 stored here. The structure looks like this:
  43
  44                 struct timeval
  45                 {
  46                     long tv_sec;        // seconds
  47                     long tv_usec;       // microseconds
  48                 };
  49
  50         tz - If this pointer is non-NULL, the current timezone will be
  51                 stored here. The structure looks like this:
  52
  53                 struct timezone
  54                 {
  55                     int  tz_minuteswest; // minutes west of Greenwich
  56                     int  tz_dsttime;     // type of dst correction
  57                 };
  58
  59                 With daylight savings times defined as follows :
  60
  61                 DST_NONE        // not on dst
  62                 DST_USA         // USA style dst
  63                 DST_AUST        // Australian style dst
  64                 DST_WET         // Western European dst
  65                 DST_MET         // Middle European dst
  66                 DST_EET         // Eastern European dst
  67                 DST_CAN         // Canada
  68                 DST_GB          // Great Britain and Eire
  69                 DST_RUM         // Rumania
  70                 DST_TUR         // Turkey
  71                 DST_AUSTALT     // Australian style with shift in 1986
  72
  73                 And the following macros are defined to operate on this :
  74
  75                 timerisset(tv) - TRUE if tv contains a time
  76
  77                 timercmp(tv1, tv2, cmp) - Return the result of the
  78                         comparison "tv1 cmp tv2"
  79
  80                 timerclear(tv) - Clear the timeval struct
  81
  82     RESULT
  83         The number of seconds.
  84
  85     NOTES
  86         This function must not be used in a shared library or
  87         in a threaded application.
  88
  89     EXAMPLE
  90         struct timeval tv;
  91
  92         // Get the current time and print it
  93         gettimeofday (&tv, NULL);
  94
  95         printf ("Seconds = %ld, uSec = %ld\n", tv->tv_sec, tv->tv_usec);
  96
  97     BUGS
  98
  99     SEE ALSO
 100         ctime(), asctime(), localtime(), time()
 101
 102     INTERNALS
 103
 104 ******************************************************************************/
 105 {
 106     if (!TimerBase)
 107         __init_timerbase();
 108
 109     if (tv)
 110     {
 111         if (TimerBase)
 112         {
 113             GetSysTime(tv);
 114
 115             /* Adjust with the current timezone, stored in minutes west of GMT */
 116             tv->tv_sec += (2922 * 1440 + __arosc_gmtoffset()) * 60;
 117         }
 118         else
 119         {
 120             errno = EACCES;
 121             return -1;
 122         }
 123     }
 124
 125     if (tz)
 126     {
 127         tz->tz_minuteswest = __arosc_gmtoffset();
 128         /* FIXME: set tz->tz_dsttime */
 129         tz->tz_dsttime     = DST_NONE;
 130     }
 131
 132     return 0;
 133 } /* gettimeofday */
 134
 135
 136 static struct timerequest __timereq;
 137 static struct MsgPort __timeport;
 138
 139 static void __init_timerbase(void)
 140 {
 141     __timeport.mp_Node.ln_Type   = NT_MSGPORT;
 142     __timeport.mp_Node.ln_Pri    = 0;
 143     __timeport.mp_Node.ln_Name   = NULL;
 144     __timeport.mp_Flags          = PA_IGNORE;
 145     __timeport.mp_SigTask        = FindTask(NULL);
 146     __timeport.mp_SigBit         = 0;
 147     NEWLIST(&__timeport.mp_MsgList);
 148
 149     __timereq.tr_node.io_Message.mn_Node.ln_Type    = NT_MESSAGE;
 150     __timereq.tr_node.io_Message.mn_Node.ln_Pri     = 0;
 151     __timereq.tr_node.io_Message.mn_Node.ln_Name    = NULL;
 152     __timereq.tr_node.io_Message.mn_ReplyPort       = &__timeport;
 153     __timereq.tr_node.io_Message.mn_Length          = sizeof (__timereq);
 154
 155     if
 156     (
 157         OpenDevice
 158         (
 159             "timer.device",
 160             UNIT_VBLANK,
 161             (struct IORequest *)&__timereq,
 162             0
 163         )
 164         ==
 165         0
 166     )
 167     {
 168         TimerBase = (struct Device *)__timereq.tr_node.io_Device;
 169     }
 170 }
 171
 172
 173 static void __exit_timerbase(APTR dummy)
 174 {
 175     if (TimerBase != NULL)
 176         CloseDevice((struct IORequest *)&__timereq);
 177 }
 178
 179 ADD2EXIT(__exit_timerbase, 0);