pith/adjtime.c

   1 #if !defined(lint) && !defined(DOS)
   2 static char rcsid[] = "$Id: adjtime.c 761 2007-10-23 22:35:18Z hubert@u.washington.edu $";
   3 #endif
   4
   5 /*
   6  * ========================================================================
   7  * Copyright 2013-2020 Eduardo Chappa
   8  * Copyright 2006 University of Washington
   9  *
  10  * Licensed under the Apache License, Version 2.0 (the "License");
  11  * you may not use this file except in compliance with the License.
  12  * You may obtain a copy of the License at
  13  *
  14  *     http://www.apache.org/licenses/LICENSE-2.0
  15  *
  16  * ========================================================================
  17  */
  18
  19 #include "../pith/headers.h"
  20 #include "../pith/adjtime.h"
  21
  22
  23 /*
  24  * MSC ver 7.0 and less times are since 1900, everybody else's time so far
  25  * is since 1970. sheesh.
  26  */
  27 #if     defined(DOS) && (_MSC_VER == 700)
  28 #define EPOCH_ADJ       ((time_t)((time_t)(70*365 + 18) * (time_t)86400))
  29 #endif
  30
  31 /*
  32  * Adjust the mtime to return time since Unix epoch.  DOS is off by 70 years.
  33  */
  34 time_t
  35 get_adj_time(void)
  36 {
  37     time_t tt;
  38
  39     tt = time((time_t *)0);
  40
  41 #ifdef EPOCH_ADJ
  42     tt -= EPOCH_ADJ;
  43 #endif
  44
  45     return(tt);
  46 }
  47
  48
  49 time_t
  50 get_adj_name_file_mtime(char *name)
  51 {
  52     time_t mtime;
  53
  54     mtime = name_file_mtime(name);
  55
  56 #ifdef EPOCH_ADJ
  57     if(mtime != (time_t)(-1))
  58       mtime -= EPOCH_ADJ;
  59 #endif
  60
  61     return(mtime);
  62 }