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 * All rights reserved. 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