xref: /netbsd-src/lib/libc/time/asctime.c (revision b1c86f5f087524e68db12794ee9c3e3da1ab17a0)
1 /*	$NetBSD: asctime.c,v 1.13 2009/12/31 22:49:16 mlelstv Exp $	*/
2 
3 /*
4 ** This file is in the public domain, so clarified as of
5 ** 1996-06-05 by Arthur David Olson.
6 */
7 
8 /*
9 ** Avoid the temptation to punt entirely to strftime;
10 ** the output of strftime is supposed to be locale specific
11 ** whereas the output of asctime is supposed to be constant.
12 */
13 
14 #include <sys/cdefs.h>
15 #if defined(LIBC_SCCS) && !defined(lint)
16 #if 0
17 static char	elsieid[] = "@(#)asctime.c	8.2";
18 #else
19 __RCSID("$NetBSD: asctime.c,v 1.13 2009/12/31 22:49:16 mlelstv Exp $");
20 #endif
21 #endif /* LIBC_SCCS and not lint */
22 
23 /*LINTLIBRARY*/
24 
25 #include "namespace.h"
26 #include "private.h"
27 #include "tzfile.h"
28 
29 #ifdef __weak_alias
30 __weak_alias(asctime_r,_asctime_r)
31 #endif
32 
33 /*
34 ** Some systems only handle "%.2d"; others only handle "%02d";
35 ** "%02.2d" makes (most) everybody happy.
36 ** At least some versions of gcc warn about the %02.2d;
37 ** we conditionalize below to avoid the warning.
38 */
39 /*
40 ** All years associated with 32-bit time_t values are exactly four digits long;
41 ** some years associated with 64-bit time_t values are not.
42 ** Vintage programs are coded for years that are always four digits long
43 ** and may assume that the newline always lands in the same place.
44 ** For years that are less than four digits, we pad the output with
45 ** leading zeroes to get the newline in the traditional place.
46 ** The -4 ensures that we get four characters of output even if
47 ** we call a strftime variant that produces fewer characters for some years.
48 ** The ISO C 1999 and POSIX 1003.1-2004 standards prohibit padding the year,
49 ** but many implementations pad anyway; most likely the standards are buggy.
50 */
51 #ifdef __GNUC__
52 #define ASCTIME_FMT	"%.3s %.3s%3d %2.2d:%2.2d:%2.2d %-4s\n"
53 #else /* !defined __GNUC__ */
54 #define ASCTIME_FMT	"%.3s %.3s%3d %02.2d:%02.2d:%02.2d %-4s\n"
55 #endif /* !defined __GNUC__ */
56 /*
57 ** For years that are more than four digits we put extra spaces before the year
58 ** so that code trying to overwrite the newline won't end up overwriting
59 ** a digit within a year and truncating the year (operating on the assumption
60 ** that no output is better than wrong output).
61 */
62 #ifdef __GNUC__
63 #define ASCTIME_FMT_B	"%.3s %.3s%3d %2.2d:%2.2d:%2.2d     %s\n"
64 #else /* !defined __GNUC__ */
65 #define ASCTIME_FMT_B	"%.3s %.3s%3d %02.2d:%02.2d:%02.2d     %s\n"
66 #endif /* !defined __GNUC__ */
67 
68 #define STD_ASCTIME_BUF_SIZE	26
69 /*
70 ** Big enough for something such as
71 ** ??? ???-2147483648 -2147483648:-2147483648:-2147483648     -2147483648\n
72 ** (two three-character abbreviations, five strings denoting integers,
73 ** seven explicit spaces, two explicit colons, a newline,
74 ** and a trailing ASCII nul).
75 ** The values above are for systems where an int is 32 bits and are provided
76 ** as an example; the define below calculates the maximum for the system at
77 ** hand.
78 */
79 #define MAX_ASCTIME_BUF_SIZE	(2*3+5*INT_STRLEN_MAXIMUM(int)+7+2+1+1)
80 
81 static char	buf_asctime[MAX_ASCTIME_BUF_SIZE];
82 
83 /*
84 ** A la ISO/IEC 9945-1, ANSI/IEEE Std 1003.1, 2004 Edition.
85 */
86 
87 /*
88 ** Big enough for something such as
89 ** ??? ???-2147483648 -2147483648:-2147483648:-2147483648 -2147483648\n
90 ** (two three-character abbreviations, five strings denoting integers,
91 ** three explicit spaces, two explicit colons, a newline,
92 ** and a trailing ASCII nul).
93 */
94 #define	ASCTIME_BUFLEN	(3 * 2 + 5 * INT_STRLEN_MAXIMUM(int) + 3 + 2 + 1 + 1)
95 
96 char *
97 asctime_r(timeptr, buf)
98 register const struct tm *	timeptr;
99 char *				buf;
100 {
101 	static const char	*wday_name[7] = {
102 		"Sun", "Mon", "Tue", "Wed", "Thu", "Fri", "Sat"
103 	};
104 	static const char	*mon_name[12] = {
105 		"Jan", "Feb", "Mar", "Apr", "May", "Jun",
106 		"Jul", "Aug", "Sep", "Oct", "Nov", "Dec"
107 	};
108 	register const char *	wn;
109 	register const char *	mn;
110 	char			year[INT_STRLEN_MAXIMUM(int) + 2];
111 	char			result[MAX_ASCTIME_BUF_SIZE];
112 
113 	if (timeptr->tm_wday < 0 || timeptr->tm_wday >= DAYSPERWEEK)
114 		wn = "???";
115 	else	wn = wday_name[timeptr->tm_wday];
116 	if (timeptr->tm_mon < 0 || timeptr->tm_mon >= MONSPERYEAR)
117 		mn = "???";
118 	else	mn = mon_name[timeptr->tm_mon];
119 	/*
120 	** Use strftime's %Y to generate the year, to avoid overflow problems
121 	** when computing timeptr->tm_year + TM_YEAR_BASE.
122 	** Assume that strftime is unaffected by other out-of-range members
123 	** (e.g., timeptr->tm_mday) when processing "%Y".
124 	*/
125 	(void) strftime(year, sizeof year, "%Y", timeptr);
126 	(void) snprintf(result,
127 		sizeof(result),
128 		((strlen(year) <= 4) ? ASCTIME_FMT : ASCTIME_FMT_B),
129 		wn, mn,
130 		timeptr->tm_mday, timeptr->tm_hour,
131 		timeptr->tm_min, timeptr->tm_sec,
132 		year);
133 	if (strlen(result) < STD_ASCTIME_BUF_SIZE || buf == buf_asctime) {
134 		(void) strcpy(buf, result);
135 		return buf;
136 	} else {
137 #ifdef EOVERFLOW
138 		errno = EOVERFLOW;
139 #else /* !defined EOVERFLOW */
140 		errno = EINVAL;
141 #endif /* !defined EOVERFLOW */
142 		return NULL;
143 	}
144 }
145 
146 /*
147 ** A la ISO/IEC 9945-1, ANSI/IEEE Std 1003.1, 2004 Edition.
148 */
149 
150 char *
151 asctime(timeptr)
152 register const struct tm *	timeptr;
153 {
154 	return asctime_r(timeptr, buf_asctime);
155 }
156