src/gras/Virtu/rl_time.c

   1 /* $Id$ */
   2
   3 /* time - time related syscal wrappers                                      */
   4
   5 /* Copyright (c) 2003, 2004 Martin Quinson. All rights reserved.            */
   6
   7 /* This program is free software; you can redistribute it and/or modify it
   8  * under the terms of the license (GNU LGPL) which comes with this package. */
   9
  10 #include "math.h" /* floor */
  11
  12 #include "portable.h"
  13
  14 #include "xbt/sysdep.h"
  15 #include "gras/virtu.h"
  16 #include "xbt/xbt_portability.h" /* private */
  17
  18 XBT_LOG_EXTERNAL_CATEGORY(virtu);
  19 XBT_LOG_DEFAULT_CATEGORY(virtu);
  20
  21 double gras_os_time() {
  22   return xbt_os_time();
  23 }
  24
  25 void gras_os_sleep(double sec) {
  26   DEBUG1("Do sleep %d sec", (int)sec);
  27   sleep(sec);
  28
  29 #ifdef HAVE_USLEEP
  30   DEBUG1("Do sleep %d usec", (int) ((sec - floor(sec)) * 1000000 ));
  31   (void)usleep( (sec - floor(sec)) * 1000000);
  32 #else
  33   if ( ((int) sec) == 0) {
  34      WARN0("This platform does not implement usleep. Cannot sleep less than one second");
  35   }
  36 #endif /* ! HAVE_USLEEP */
  37 }