lib/libc/stdtime/timelocal.c

   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