xref: /freebsd/lib/libc/stdtime/timelocal.c (revision 38a52bd3)
1 /*-
2  * SPDX-License-Identifier: BSD-2-Clause-FreeBSD
3  *
4  * Copyright (c) 2001 Alexey Zelkin <phantom@FreeBSD.org>
5  * Copyright (c) 1997 FreeBSD Inc.
6  * All rights reserved.
7  *
8  * Copyright (c) 2011 The FreeBSD Foundation
9  *
10  * Portions of this software were developed by David Chisnall
11  * under sponsorship from the FreeBSD Foundation.
12  *
13  * Redistribution and use in source and binary forms, with or without
14  * modification, are permitted provided that the following conditions
15  * are met:
16  * 1. Redistributions of source code must retain the above copyright
17  *    notice, this list of conditions and the following disclaimer.
18  * 2. Redistributions in binary form must reproduce the above copyright
19  *    notice, this list of conditions and the following disclaimer in the
20  *    documentation and/or other materials provided with the distribution.
21  *
22  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
23  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
26  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
27  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
28  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32  * SUCH DAMAGE.
33  */
34 
35 #include <sys/cdefs.h>
36 __FBSDID("$FreeBSD$");
37 
38 #include <stddef.h>
39 
40 #include "ldpart.h"
41 #include "timelocal.h"
42 
43 struct xlocale_time {
44 	struct xlocale_component header;
45 	char *buffer;
46 	struct lc_time_T locale;
47 };
48 
49 struct xlocale_time __xlocale_global_time;
50 
51 #define	LCTIME_SIZE (sizeof(struct lc_time_T) / sizeof(char *))
52 
53 static const struct lc_time_T	_C_time_locale = {
54 	{
55 		"Jan", "Feb", "Mar", "Apr", "May", "Jun",
56 		"Jul", "Aug", "Sep", "Oct", "Nov", "Dec"
57 	}, {
58 		"January", "February", "March", "April", "May", "June",
59 		"July", "August", "September", "October", "November", "December"
60 	}, {
61 		"Sun", "Mon", "Tue", "Wed",
62 		"Thu", "Fri", "Sat"
63 	}, {
64 		"Sunday", "Monday", "Tuesday", "Wednesday",
65 		"Thursday", "Friday", "Saturday"
66 	},
67 
68 	/* X_fmt */
69 	"%H:%M:%S",
70 
71 	/*
72 	 * x_fmt
73 	 * Since the C language standard calls for
74 	 * "date, using locale's date format," anything goes.
75 	 * Using just numbers (as here) makes Quakers happier;
76 	 * it's also compatible with SVR4.
77 	 */
78 	"%m/%d/%y",
79 
80 	/*
81 	 * c_fmt
82 	 */
83 	"%a %b %e %H:%M:%S %Y",
84 
85 	/* am */
86 	"AM",
87 
88 	/* pm */
89 	"PM",
90 
91 	/* date_fmt */
92 	"%a %b %e %H:%M:%S %Z %Y",
93 
94 	/* alt_month
95 	 * Standalone months forms for %OB
96 	 */
97 	{
98 		"January", "February", "March", "April", "May", "June",
99 		"July", "August", "September", "October", "November", "December"
100 	},
101 
102 	/* md_order
103 	 * Month / day order in dates
104 	 */
105 	"md",
106 
107 	/* ampm_fmt
108 	 * To determine 12-hour clock format time (empty, if N/A)
109 	 */
110 	"%I:%M:%S %p"
111 };
112 
113 static void destruct_time(void *v)
114 {
115 	struct xlocale_time *l = v;
116 	if (l->buffer)
117 		free(l->buffer);
118 	free(l);
119 }
120 
121 #include <stdio.h>
122 struct lc_time_T *
123 __get_current_time_locale(locale_t loc)
124 {
125 	return (loc->using_time_locale
126 		? &((struct xlocale_time *)loc->components[XLC_TIME])->locale
127 		: (struct lc_time_T *)&_C_time_locale);
128 }
129 
130 static int
131 time_load_locale(struct xlocale_time *l, int *using_locale, const char *name)
132 {
133 	struct lc_time_T *time_locale = &l->locale;
134 	return (__part_load_locale(name, using_locale,
135 			&l->buffer, "LC_TIME",
136 			LCTIME_SIZE, LCTIME_SIZE,
137 			(const char **)time_locale));
138 }
139 int
140 __time_load_locale(const char *name)
141 {
142 	return time_load_locale(&__xlocale_global_time,
143 			&__xlocale_global_locale.using_time_locale, name);
144 }
145 void* __time_load(const char* name, locale_t loc)
146 {
147 	struct xlocale_time *new = calloc(sizeof(struct xlocale_time), 1);
148 	new->header.header.destructor = destruct_time;
149 	if (time_load_locale(new, &loc->using_time_locale, name) == _LDP_ERROR)
150 	{
151 		xlocale_release(new);
152 		return NULL;
153 	}
154 	return new;
155 }
156 
157