home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 5 Edit / 05-Edit.zip / e20313sr.zip / emacs / 20.3.1 / src / systime.h < prev    next >
C/C++ Source or Header  |  1999-07-31  |  5KB  |  150 lines
  1. /* systime.h - System-dependent definitions for time manipulations.
  2.    Copyright (C) 1993, 1994 Free Software Foundation, Inc.
  3.  
  4. This file is part of GNU Emacs.
  5.  
  6. GNU Emacs is free software; you can redistribute it and/or modify
  7. it under the terms of the GNU General Public License as published by
  8. the Free Software Foundation; either version 2, or (at your option)
  9. any later version.
  10.  
  11. GNU Emacs is distributed in the hope that it will be useful,
  12. but WITHOUT ANY WARRANTY; without even the implied warranty of
  13. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14. GNU General Public License for more details.
  15.  
  16. You should have received a copy of the GNU General Public License
  17. along with GNU Emacs; see the file COPYING.  If not, write to
  18. the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  19. Boston, MA 02111-1307, USA.  */
  20.  
  21. #ifdef TIME_WITH_SYS_TIME
  22. #include <sys/time.h>
  23. #include <time.h>
  24. #else
  25. #ifdef HAVE_SYS_TIME_H
  26. #include <sys/time.h>
  27. #else
  28. #include <time.h>
  29. #endif
  30. #endif
  31.  
  32. #ifdef HAVE_TZNAME
  33. #ifndef tzname        /* For SGI.  */
  34. extern char *tzname[];    /* RS6000 and others want it this way.  */
  35. #endif
  36. #endif
  37.  
  38. /* SVr4 doesn't actually declare this in its #include files.  */
  39. #ifdef USG5_4
  40. extern long timezone;
  41. #endif
  42.  
  43. #ifdef VMS
  44. #ifdef VAXC
  45. #include "vmstime.h"
  46. #endif
  47. #endif
  48.  
  49. /* On some configurations (hpux8.0, X11R4), sys/time.h and X11/Xos.h
  50.    disagree about the name of the guard symbol.  */
  51. #ifdef HPUX
  52. #ifdef _STRUCT_TIMEVAL
  53. #ifndef __TIMEVAL__
  54. #define __TIMEVAL__
  55. #endif
  56. #endif
  57. #endif
  58.  
  59. /* EMACS_TIME is the type to use to represent temporal intervals -
  60.    struct timeval on some systems, int on others.  It can be passed as
  61.    the timeout argument to the select  system call.
  62.  
  63.    EMACS_SECS (TIME) is an rvalue for the seconds component of TIME.
  64.    EMACS_SET_SECS (TIME, SECONDS) sets that to SECONDS.
  65.  
  66.    EMACS_HAS_USECS is defined iff EMACS_TIME has a usecs component.
  67.    EMACS_USECS (TIME) is an rvalue for the microseconds component of TIME.
  68.        This returns zero if EMACS_TIME doesn't have a microseconds component.
  69.    EMACS_SET_USECS (TIME, MICROSECONDS) sets that to MICROSECONDS.
  70.     This does nothing if EMACS_TIME doesn't have a microseconds component.
  71.  
  72.    EMACS_SET_SECS_USECS (TIME, SECS, USECS) sets both components of TIME.
  73.  
  74.    EMACS_GET_TIME (TIME) stores the current system time in TIME, which
  75.     should be an lvalue.
  76.  
  77.    EMACS_ADD_TIME (DEST, SRC1, SRC2) adds SRC1 to SRC2 and stores the
  78.     result in DEST.  SRC should not be negative.
  79.  
  80.    EMACS_SUB_TIME (DEST, SRC1, SRC2) subtracts SRC2 from SRC1 and
  81.     stores the result in DEST.  SRC should not be negative. 
  82.    EMACS_TIME_NEG_P (TIME) is true iff TIME is negative.
  83.  
  84. */
  85.  
  86. #ifdef HAVE_TIMEVAL
  87.  
  88. #define EMACS_HAS_USECS
  89.  
  90. #define EMACS_TIME struct timeval
  91. #define EMACS_SECS(time)            ((time).tv_sec  + 0)
  92. #define EMACS_USECS(time)            ((time).tv_usec + 0)
  93. #define EMACS_SET_SECS(time, seconds)        ((time).tv_sec  = (seconds))
  94. #define EMACS_SET_USECS(time, microseconds) ((time).tv_usec = (microseconds))
  95.  
  96. /* On SVR4, the compiler may complain if given this extra BSD arg.  */
  97. #ifdef GETTIMEOFDAY_ONE_ARGUMENT
  98. #define EMACS_GET_TIME(time)                                  \
  99. {                                                             \
  100.   gettimeofday (&(time));                                     \
  101. }
  102. #else /* not GETTIMEOFDAY_ONE_ARGUMENT */
  103. #define EMACS_GET_TIME(time)                    \
  104. {                                \
  105.   struct timezone dummy;                    \
  106.   gettimeofday (&(time), &dummy);                \
  107. }
  108. #endif /* not GETTIMEOFDAY_ONE_ARGUMENT */
  109.  
  110. #define EMACS_ADD_TIME(dest, src1, src2)            \
  111. {                                \
  112.   (dest).tv_sec  = (src1).tv_sec  + (src2).tv_sec;        \
  113.   (dest).tv_usec = (src1).tv_usec + (src2).tv_usec;        \
  114.   if ((dest).tv_usec > 1000000)                    \
  115.     (dest).tv_usec -= 1000000, (dest).tv_sec++;            \
  116. }
  117.  
  118. #define EMACS_SUB_TIME(dest, src1, src2)            \
  119. {                                \
  120.   (dest).tv_sec  = (src1).tv_sec  - (src2).tv_sec;        \
  121.   (dest).tv_usec = (src1).tv_usec - (src2).tv_usec;        \
  122.   if ((dest).tv_usec < 0)                    \
  123.     (dest).tv_usec += 1000000, (dest).tv_sec--;            \
  124. }
  125.  
  126. #define EMACS_TIME_NEG_P(time)                    \
  127.   ((long)(time).tv_sec < 0                    \
  128.    || ((time).tv_sec == 0                    \
  129.        && (long)(time).tv_usec < 0))
  130.  
  131. #else /* ! defined (HAVE_TIMEVAL) */
  132.  
  133. #define EMACS_TIME int
  134. #define EMACS_SECS(time)            (time)
  135. #define EMACS_USECS(time)            0
  136. #define EMACS_SET_SECS(time, seconds)        ((time) = (seconds))
  137. #define EMACS_SET_USECS(time, usecs)        0
  138.  
  139. #define EMACS_GET_TIME(t) ((t) = time ((long *) 0))
  140. #define EMACS_ADD_TIME(dest, src1, src2) ((dest) = (src1) + (src2))
  141. #define EMACS_SUB_TIME(dest, src1, src2) ((dest) = (src1) - (src2))
  142. #define EMACS_TIME_NEG_P(t) ((t) < 0)
  143.  
  144. #endif /* ! defined (HAVE_TIMEVAL) */
  145.  
  146. #define EMACS_SET_SECS_USECS(time, secs, usecs)         \
  147.   (EMACS_SET_SECS (time, secs), EMACS_SET_USECS (time, usecs))
  148.  
  149. extern int set_file_times ();
  150.