src/xbt/sysdep.c

   1 /* $Id$ */
   2
   3 /* sysdep.c -- all system dependency                                        */
   4 /*  no system header should be loaded out of this file so that we have only */
   5 /*  one file to check when porting to another OS                            */
   6
   7 /* Copyright (c) 2004 Martin Quinson. All rights reserved.                  */
   8
   9 /* This program is free software; you can redistribute it and/or modify it
  10  * under the terms of the license (GNU LGPL) which comes with this package. */
  11
  12 #include "xbt/sysdep.h"
  13 #include "xbt/xbt_portability.h" /* private */
  14 #include "xbt/log.h"
  15 #include "portable.h"
  16
  17
  18 /** @brief like free
  19     @hideinitializer */
  20 XBT_PUBLIC(void) xbt_free_f(void* p)
  21 {
  22         free(p);
  23 }
  24
  25
  26 /* TSC (tick-level) timers are said to be unreliable on SMP hosts and thus
  27    disabled in SDL source code */
  28
  29
  30 /* \defgroup XBT_sysdep All system dependency
  31  * \brief This section describes many macros/functions that can serve as
  32  *  an OS abstraction.
  33  */
  34
  35 double xbt_os_time(void) {
  36 #ifdef HAVE_GETTIMEOFDAY
  37   struct timeval tv;
  38
  39   gettimeofday(&tv, NULL);
  40
  41   return (double)(tv.tv_sec + tv.tv_usec / 1000000.0);
  42 #else
  43   /* Poor resolution */
  44   return (double)(time(NULL));
  45 #endif /* HAVE_GETTIMEOFDAY? */
  46 }
  47
  48 /*XBT_LOG_NEW_DEFAULT_SUBCATEGORY(sysdep, xbt, "System dependency");*/
  49
  50
  51 struct s_xbt_os_timer {
  52 #ifdef HAVE_GETTIMEOFDAY
  53    struct timeval start,stop;
  54 #else
  55    unsigned long int start,stop;
  56 #endif
  57 };
  58
  59 xbt_os_timer_t xbt_os_timer_new(void) {
  60    return xbt_new0(struct s_xbt_os_timer,1);
  61 }
  62 void xbt_os_timer_free(xbt_os_timer_t timer) {
  63    free (timer);
  64 }
  65 void xbt_os_timer_start(xbt_os_timer_t timer) {
  66 #ifdef HAVE_GETTIMEOFDAY
  67   gettimeofday(&(timer->start), NULL);
  68 #else
  69   timer->start = (unsigned long int)(time(NULL));
  70 #endif
  71 }
  72 void xbt_os_timer_stop(xbt_os_timer_t timer) {
  73 #ifdef HAVE_GETTIMEOFDAY
  74   gettimeofday(&(timer->stop), NULL);
  75 #else
  76   timer->stop = (unsigned long int)(time(NULL));
  77 #endif
  78 }
  79 double xbt_os_timer_elapsed(xbt_os_timer_t timer) {
  80 #ifdef HAVE_GETTIMEOFDAY
  81    return  ((double)timer->stop.tv_sec)  - ((double)timer->start.tv_sec) +
  82          ((((double)timer->stop.tv_usec) - ((double)timer->start.tv_usec)) / 1000000.0);
  83 #else
  84    return  (double)timer->stop  - (double)timer->start;
  85 #endif
  86 }
  87