lib/timefmt.c

   1 /*
   2    Time formatting functions
   3
   4    Copyright (C) 1994-2014
   5    Free Software Foundation, Inc.
   6
   7    Written by:
   8    Miguel de Icaza, 1994, 1995, 1996
   9    Janne Kukonlehto, 1994, 1995, 1996
  10    Dugan Porter, 1994, 1995, 1996
  11    Jakub Jelinek, 1994, 1995, 1996
  12    Mauricio Plaza, 1994, 1995, 1996
  13
  14    The file_date routine is mostly from GNU's fileutils package,
  15    written by Richard Stallman and David MacKenzie.
  16
  17    This file is part of the Midnight Commander.
  18
  19    The Midnight Commander is free software: you can redistribute it
  20    and/or modify it under the terms of the GNU General Public License as
  21    published by the Free Software Foundation, either version 3 of the License,
  22    or (at your option) any later version.
  23
  24    The Midnight Commander is distributed in the hope that it will be useful,
  25    but WITHOUT ANY WARRANTY; without even the implied warranty of
  26    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  27    GNU General Public License for more details.
  28
  29    You should have received a copy of the GNU General Public License
  30    along with this program.  If not, see <http://www.gnu.org/licenses/>.
  31  */
  32
  33 /** \file
  34  *  \brief Source: time formatting functions
  35  */
  36
  37 #include <config.h>
  38
  39 #include <stdlib.h>
  40
  41 #include "lib/global.h"
  42 #include "lib/strutil.h"
  43
  44 #include "lib/timefmt.h"
  45
  46 /*** global variables ****************************************************************************/
  47
  48 char *user_recent_timeformat = NULL;    /* time format string for recent dates */
  49 char *user_old_timeformat = NULL;       /* time format string for older dates */
  50
  51 /*** file scope macro definitions ****************************************************************/
  52
  53 /*** file scope type declarations ****************************************************************/
  54
  55 /*** file scope variables ************************************************************************/
  56
  57 /*
  58  * Cache variable for the i18n_checktimelength function,
  59  * initially set to a clearly invalid value to show that
  60  * it hasn't been initialized yet.
  61  */
  62 static size_t i18n_timelength_cache = MAX_I18NTIMELENGTH + 1;
  63
  64 /*** file scope functions ************************************************************************/
  65
  66 /*** public functions ****************************************************************************/
  67
  68 /* --------------------------------------------------------------------------------------------- */
  69 /**
  70  * Check strftime() results. Some systems (i.e. Solaris) have different
  71  *  short-month and month name sizes for different locales
  72  */
  73 size_t
  74 i18n_checktimelength (void)
  75 {
  76     size_t length = 0;
  77     const time_t testtime = time (NULL);
  78     struct tm *lt = localtime (&testtime);
  79
  80     if (i18n_timelength_cache <= MAX_I18NTIMELENGTH)
  81         return i18n_timelength_cache;
  82
  83     if (lt == NULL)
  84     {
  85         /* huh, localtime() doesnt seem to work ... falling back to "(invalid)" */
  86         length = str_term_width1 (_(INVALID_TIME_TEXT));
  87     }
  88     else
  89     {
  90         char buf[MB_LEN_MAX * MAX_I18NTIMELENGTH + 1];
  91
  92         /* We are interested in the longest possible date */
  93         lt->tm_sec = lt->tm_min = lt->tm_hour = lt->tm_mday = 10;
  94
  95         /* Loop through all months to find out the longest one */
  96         for (lt->tm_mon = 0; lt->tm_mon < 12; lt->tm_mon++)
  97         {
  98             strftime (buf, sizeof (buf) - 1, user_recent_timeformat, lt);
  99             length = max ((size_t) str_term_width1 (buf), length);
 100             strftime (buf, sizeof (buf) - 1, user_old_timeformat, lt);
 101             length = max ((size_t) str_term_width1 (buf), length);
 102         }
 103
 104         length = max ((size_t) str_term_width1 (_(INVALID_TIME_TEXT)), length);
 105     }
 106
 107     /* Don't handle big differences. Use standard value (email bug, please) */
 108     if (length > MAX_I18NTIMELENGTH || length < MIN_I18NTIMELENGTH)
 109         length = STD_I18NTIMELENGTH;
 110
 111     /* Save obtained value to the cache */
 112     i18n_timelength_cache = length;
 113
 114     return i18n_timelength_cache;
 115 }
 116
 117 /* --------------------------------------------------------------------------------------------- */
 118
 119 const char *
 120 file_date (time_t when)
 121 {
 122     static char timebuf[MB_LEN_MAX * MAX_I18NTIMELENGTH + 1];
 123     time_t current_time = time ((time_t) 0);
 124     const char *fmt;
 125
 126     if (current_time > when + 6L * 30L * 24L * 60L * 60L        /* Old. */
 127         || current_time < when - 60L * 60L)     /* In the future. */
 128         /* The file is fairly old or in the future.
 129            POSIX says the cutoff is 6 months old;
 130            approximate this by 6*30 days.
 131            Allow a 1 hour slop factor for what is considered "the future",
 132            to allow for NFS server/client clock disagreement.
 133            Show the year instead of the time of day.  */
 134
 135         fmt = user_old_timeformat;
 136     else
 137         fmt = user_recent_timeformat;
 138
 139     FMT_LOCALTIME (timebuf, sizeof (timebuf), fmt, when);
 140
 141     return timebuf;
 142 }
 143
 144 /* --------------------------------------------------------------------------------------------- */