Update GPL to version 2.
[bpt/emacs.git] / src / systime.h
index faf5d13..e93962c 100644 (file)
@@ -1,11 +1,11 @@
 /* systime.h - System-dependent definitions for time manipulations.
-   Copyright (C) 1992 Free Software Foundation, Inc.
+   Copyright (C) 1993, 1994 Free Software Foundation, Inc.
 
 This file is part of GNU Emacs.
 
 GNU Emacs is free software; you can redistribute it and/or modify
 it under the terms of the GNU General Public License as published by
-the Free Software Foundation; either version 1, or (at your option)
+the Free Software Foundation; either version 2, or (at your option)
 any later version.
 
 GNU Emacs is distributed in the hope that it will be useful,
@@ -28,6 +28,12 @@ the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.  */
 #endif
 #endif
 
+#ifdef HAVE_TZNAME
+#ifndef tzname         /* For SGI.  */
+extern char *tzname[]; /* RS6000 and others want it this way.  */
+#endif
+#endif
+
 /* SVr4 doesn't actually declare this in its #include files.  */
 #ifdef USG5_4
 extern long timezone;
@@ -39,6 +45,15 @@ extern long timezone;
 #endif
 #endif
 
+/* On some configurations (hpux8.0, X11R4), sys/time.h and X11/Xos.h
+   disagree about the name of the guard symbol.  */
+#ifdef HPUX
+#ifdef _STRUCT_TIMEVAL
+#ifndef __TIMEVAL__
+#define __TIMEVAL__
+#endif
+#endif
+#endif
 \f
 /* EMACS_TIME is the type to use to represent temporal intervals -
    struct timeval on some systems, int on others.  It can be passed as
@@ -57,9 +72,6 @@ extern long timezone;
 
    EMACS_GET_TIME (TIME) stores the current system time in TIME, which
        should be an lvalue.
-   EMACS_SET_UTIMES (PATH, ATIME, MTIME) changes the last-access and
-       last-modification times of the file named PATH to ATIME and
-       MTIME, which are EMACS_TIMEs.
 
    EMACS_ADD_TIME (DEST, SRC1, SRC2) adds SRC1 to SRC2 and stores the
        result in DEST.  SRC should not be negative.
@@ -80,11 +92,19 @@ extern long timezone;
 #define EMACS_SET_SECS(time, seconds)      ((time).tv_sec  = (seconds))
 #define EMACS_SET_USECS(time, microseconds) ((time).tv_usec = (microseconds))
 
+/* On SVR4, the compiler may complain if given this extra BSD arg.  */
+#ifdef GETTIMEOFDAY_ONE_ARGUMENT
+#define EMACS_GET_TIME(time)                                  \
+{                                                             \
+  gettimeofday (&(time));                                     \
+}
+#else /* not GETTIMEOFDAY_ONE_ARGUMENT */
 #define EMACS_GET_TIME(time)                                   \
 {                                                              \
   struct timezone dummy;                                       \
   gettimeofday (&(time), &dummy);                              \
 }
+#endif /* not GETTIMEOFDAY_ONE_ARGUMENT */
 
 #define EMACS_ADD_TIME(dest, src1, src2)                       \
 {                                                              \
@@ -103,9 +123,9 @@ extern long timezone;
 }
 
 #define EMACS_TIME_NEG_P(time)                                 \
-  ((time).tv_sec < 0                                           \
+  ((long)(time).tv_sec < 0                                     \
    || ((time).tv_sec == 0                                      \
-       && (time).tv_usec < 0))
+       && (long)(time).tv_usec < 0))
 
 #else /* ! defined (HAVE_TIMEVAL) */
 
@@ -125,135 +145,4 @@ extern long timezone;
 #define EMACS_SET_SECS_USECS(time, secs, usecs)                \
   (EMACS_SET_SECS (time, secs), EMACS_SET_USECS (time, usecs))
 
-#ifdef USE_UTIME
-
-#define EMACS_SET_UTIMES(path, atime, mtime)                   \
-  {                                                            \
-    time_t tv[2];                                              \
-    tv[0] = EMACS_SECS (atime);                                        \
-    tv[1] = EMACS_SECS (mtime);                                        \
-    utime ((path), tv);                                                \
-  }
-
-#else /* ! defined (USE_UTIME) */
-
-#define EMACS_SET_UTIMES(path, atime, mtime)                   \
-  {                                                            \
-    EMACS_TIME tv[2];                                          \
-    tv[0] = atime;                                             \
-    tv[1] = mtime;                                             \
-    utimes ((path), tv);                                       \
-  }
-
-#endif /* ! defined (USE_UTIME) */
-
-\f
-
-/* EMACS_CURRENT_TIME_ZONE (int *OFFSET, int *SAVINGS_FLAG,
-                            char *STANDARD_ABBR, char *SAVINGS_ABBR);
-   expands to a statement which stores information about the current
-   time zone in its arguments.
-
-   *OFFSET is set to the number of minutes EAST of Greenwich at which
-   the site's time zone is located.  This should describe the offset
-   to standard time only; if some sort of daylight savings time is in
-   effect, that should not affect this value.  Note that the tm_gmtoff
-   member of the struct tm returned by localtime is adjusted for
-   daylight savings, so you don't want to use localtime to set
-   *OFFSET; gettimeofday does the right thing.
-
-   *SAVINGS_FLAG is set to 1 if some sort of daylight savings time is
-   currently in effect, or 0 if no seasonal adjustment is currently
-   active.
-
-   *STANDARD_ABBR points to an array of at least 10 characters, which
-   should be set to the standard abbreviation for the time zone name
-   when daylight savings time is not active.  For example, EDT would
-   be appropriate for the Eastern time zone of the USA.
-
-   *SAVINGS_ABBR points to an array of at least 10 characters, which
-   should be set to the standard abbreviation for the time zone name
-   when daylight savings time is active.  For example, EST would be
-   appropriate for the Eastern time zone of the USA.
-
-   If the operating system cannot provide all this information, then
-   this macro will not be defined.  */
-
-
-/* The operating system configuration file can define
-   EMACS_CURRENT_TIME_ZONE.   If not, we'll take a shot at it here.  */
-
-#ifndef EMACS_CURRENT_TIME_ZONE
-
-/* System V derivatives have a timezone global variable.  */
-#if defined(USG) || defined(VMS)
-#define EMACS_GET_TZ_OFFSET(offset)                                    \
-  do {                                                                 \
-    tzset ();                                                          \
-    *(offset) = timezone;                                              \
-  } while (0)
-#endif
-
-/* If we have timeval, then we have gettimeofday; that's half the battle.  */
-#if defined (HAVE_TIMEVAL) && !defined (EMACS_GET_TZ_OFFSET)
-#define EMACS_GET_TZ_OFFSET(offset)                                    \
-  do {                                                                 \
-    struct timeval dummy;                                              \
-    struct timezone zoneinfo;                                          \
-                                                                       \
-    gettimeofday (&dummy, &zoneinfo);                                  \
-    *(offset) = -zoneinfo.tz_minuteswest;                              \
-  } while (0)
-#endif /* ! defined (HAVE_TIMEVAL) */
-
-/* The following sane systems have a tzname array.  The timezone function
-   is a stupid idea; timezone names can only be determined geographically,
-   not by Greenwich offset.  */
-#if defined (ultrix) || defined (hpux) || defined (_AIX) || defined (USG) || defined(VMS)
-
-#define EMACS_GET_TZ_NAMES(standard, savings)                          \
-  do {                                                                 \
-    extern char *tzname[2];                                            \
-    strcpy ((standard), tzname[0]);                                    \
-    strcpy ((savings), tzname[1]);                                     \
-  } while (0)
-
-#else /* ! defined (ultrix) || defined (hpux) || defined (_AIX) */
-/* If we are running SunOS, Mt. Xinu BSD, or MACH 2.5, these systems have a
-   timezone function.  */
-#if (defined (hp9000) && ! defined (hpux) && defined (unix)) || defined (MACH) || defined (sun) || defined (NeXT)
-
-#define EMACS_GET_TZ_NAMES(standard, savings)                          \
-  do {                                                                 \
-    struct timeval dummy;                                              \
-    struct timezone zoneinfo;                                          \
-    extern char *timezone ();                                          \
-                                                                       \
-    gettimeofday (&dummy, &zoneinfo);                                  \
-    strcpy ((standard), timezone (zoneinfo.tz_minuteswest, 0));                \
-    strcpy ((savings),  timezone (zoneinfo.tz_minuteswest, 1));                \
-  } while (0)
-
-#endif /* ! (defined (hp9000) && ! defined (hpux) && defined (unix)) || defined (MACH) || defined (sun) */
-#endif /* ! defined (ultrix) || defined (hpux) || defined (_AIX) */
-
-/* If we can get all the information we need, let's define the macro!  */
-#if defined (EMACS_GET_TZ_OFFSET) && defined (EMACS_GET_TZ_NAMES)
-
-#define EMACS_CURRENT_TIME_ZONE(offset, savings_flag, standard, savings)\
-  do {                                                                 \
-    EMACS_TIME t;                                                      \
-    long secs;                                                         \
-    struct tm *tmp;                                                    \
-                                                                       \
-    EMACS_GET_TIME (t);                                                        \
-    secs = EMACS_SECS (t);                                             \
-    tmp = localtime (&secs);                                           \
-    *(savings_flag) = tmp->tm_isdst;                                   \
-                                                                       \
-    EMACS_GET_TZ_OFFSET (offset);                                      \
-    EMACS_GET_TZ_NAMES (standard, savings);                            \
-  } while (0)
-#endif /* ! defined (EMACS_GET_TZ_OFFSET) && defined (EMACS_GET_TZ_NAMES) */
-
-#endif /* EMACS_CURRENT_TIME_ZONE */
+extern int set_file_times ();