usr/src/lib/libc/port/gen/ctime.c

   1 /*
   2  * CDDL HEADER START
   3  *
   4  * The contents of this file are subject to the terms of the
   5  * Common Development and Distribution License (the "License").
   6  * You may not use this file except in compliance with the License.
   7  *
   8  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
   9  * or http://www.opensolaris.org/os/licensing.
  10  * See the License for the specific language governing permissions
  11  * and limitations under the License.
  12  *
  13  * When distributing Covered Code, include this CDDL HEADER in each
  14  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
  15  * If applicable, add the following below this CDDL HEADER, with the
  16  * fields enclosed by brackets "[]" replaced with your own identifying
  17  * information: Portions Copyright [yyyy] [name of copyright owner]
  18  *
  19  * CDDL HEADER END
  20  */
  21
  22 /*
  23  * Copyright 2008 Sun Microsystems, Inc.  All rights reserved.
  24  * Use is subject to license terms.
  25  */
  26
  27 /*      Copyright (c) 1988 AT&T */
  28 /*        All Rights Reserved   */
  29
  30 #pragma ident   "%Z%%M% %I%     %E% SMI"
  31
  32 /*
  33  * This routine converts time as follows.
  34  * The epoch is 0000 Jan 1 1970 GMT.
  35  * The argument time is in seconds since then.
  36  * The localtime(t) entry returns a pointer to an array
  37  * containing
  38  *  seconds (0-59)
  39  *  minutes (0-59)
  40  *  hours (0-23)
  41  *  day of month (1-31)
  42  *  month (0-11)
  43  *  year-1970
  44  *  weekday (0-6, Sun is 0)
  45  *  day of the year
  46  *  daylight savings flag
  47  *
  48  * The routine corrects for daylight saving
  49  * time and will work in any time zone provided
  50  * "timezone" is adjusted to the difference between
  51  * Greenwich and local standard time (measured in seconds).
  52  * In places like Michigan "daylight" must
  53  * be initialized to 0 to prevent the conversion
  54  * to daylight time.
  55  * There is a table which accounts for the peculiarities
  56  * undergone by daylight time in 1974-1975.
  57  *
  58  * The routine does not work
  59  * in Saudi Arabia which runs on Solar time.
  60  *
  61  * asctime(tvec)
  62  * where tvec is produced by localtime
  63  * returns a ptr to a character string
  64  * that has the ascii time in the form
  65  *      Thu Jan 01 00:00:00 1970\n\0
  66  *      01234567890123456789012345
  67  *      0         1         2
  68  *
  69  * ctime(t) just calls localtime, then asctime.
  70  *
  71  * tzset() looks for an environment variable named
  72  * TZ.
  73  * If the variable is present, it will set the external
  74  * variables "timezone", "altzone", "daylight", and "tzname"
  75  * appropriately. It is called by localtime, and
  76  * may also be called explicitly by the user.
  77  */
  78
  79 #include "lint.h"
  80 #include <mtlib.h>
  81 #include <sys/types.h>
  82 #include <time.h>
  83 #include <errno.h>
  84 #include <thread.h>
  85 #include <synch.h>
  86 #include "libc.h"
  87 #include "tsd.h"
  88
  89 #define dysize(A) (((A)%4)? 365: 366)
  90 #define CBUFSIZ 26
  91
  92 static char *
  93 ct_numb(char *cp, int n, char pad)
  94 {
  95         cp++;
  96         if (n >= 10)
  97                 *cp++ = (n / 10) % 10 + '0';
  98         else
  99                 *cp++ = pad;
 100         *cp++ = n % 10 + '0';
 101         return (cp);
 102 }
 103
 104 /*
 105  * Compatibility aliases: Solaris/illumos have the POSIX.1c Draft versions in
 106  * libc with the regular name and the standard versions with mangled names. We
 107  * only have the standard versions but keep the mangled symbols here for a
 108  * smoother transition.
 109  */
 110 #pragma weak __posix_asctime_r = asctime_r
 111 #pragma weak __posix_ctime_r = ctime_r
 112
 113 char *
 114 asctime_r(const struct tm *t, char *cbuf)
 115 {
 116         char *cp;
 117         const char *ncp;
 118         const char *Date = "Day Mon 00 00:00:00 YYYY\n";
 119         const char *Day  = "SunMonTueWedThuFriSat";
 120         const char *Month = "JanFebMarAprMayJunJulAugSepOctNovDec";
 121
 122         int year = t->tm_year + 1900;
 123
 124         cp = cbuf;
 125         for (ncp = Date; *cp++ = *ncp++; /* */)
 126                 ;
 127         ncp = Day + (3 * t->tm_wday);
 128         cp = cbuf;
 129         *cp++ = *ncp++;
 130         *cp++ = *ncp++;
 131         *cp++ = *ncp++;
 132         cp++;
 133         ncp = Month + (3 * t->tm_mon);
 134         *cp++ = *ncp++;
 135         *cp++ = *ncp++;
 136         *cp++ = *ncp++;
 137         cp = ct_numb(cp, t->tm_mday, ' ');
 138         cp = ct_numb(cp, t->tm_hour, '0');
 139         cp = ct_numb(cp, t->tm_min, '0');
 140         cp = ct_numb(cp, t->tm_sec, '0');
 141
 142         if (year < 0 || year >= 10000) {
 143                 /* Only positive, 4-digit years are supported */
 144                 errno = EOVERFLOW;
 145                 return (NULL);
 146         }
 147         cp = ct_numb(cp, year / 100, '0');
 148         cp--;
 149         (void) ct_numb(cp, year, '0');
 150         return (cbuf);
 151 }
 152
 153 char *
 154 ctime_r(const time_t *t, char *buffer)
 155 {
 156         struct tm res;
 157
 158         if (localtime_r(t, &res) == NULL)
 159                 return (NULL);
 160
 161         if (asctime_r(&res, buffer) == NULL)
 162                 return (NULL);
 163
 164         return (buffer);
 165 }
 166
 167 char *
 168 ctime(const time_t *t)
 169 {
 170         char *cbuf = tsdalloc(_T_CTIME, CBUFSIZ, NULL);
 171         struct tm *p;
 172
 173         if (cbuf == NULL)
 174                 return (NULL);
 175         p = localtime(t);
 176         if (p == NULL)
 177                 return (NULL);
 178         return (asctime_r(p, cbuf));
 179 }
 180
 181 char *
 182 asctime(const struct tm *t)
 183 {
 184         char *cbuf = tsdalloc(_T_CTIME, CBUFSIZ, NULL);
 185
 186         if (cbuf == NULL)
 187                 return (NULL);
 188         return (asctime_r(t, cbuf));
 189 }