aboutsummaryrefslogtreecommitdiff
path: root/time
diff options
context:
space:
mode:
Diffstat (limited to 'time')
-rw-r--r--time/Makefile1
-rw-r--r--time/alt_digit.c193
-rw-r--r--time/era.c177
-rw-r--r--time/lc-time-cleanup.c41
-rw-r--r--time/strftime.c20
5 files changed, 426 insertions, 6 deletions
diff --git a/time/Makefile b/time/Makefile
index 246b9803fa..da51316069 100644
--- a/time/Makefile
+++ b/time/Makefile
@@ -30,6 +30,7 @@ routines := offtime asctime clock ctime ctime_r difftime \
stime dysize timegm ftime \
getdate strptime strptime_l \
strftime wcsftime strftime_l wcsftime_l
+aux := era alt_digit lc-time-cleanup
distribute := datemsk
tests := test_time clocktest tst-posixtz tst-strptime tst_wcsftime \
diff --git a/time/alt_digit.c b/time/alt_digit.c
new file mode 100644
index 0000000000..1a81ba1254
--- /dev/null
+++ b/time/alt_digit.c
@@ -0,0 +1,193 @@
+/* Helper functions used by strftime/strptime to handle alternate digits.
+ Copyright (C) 1995-2001,02 Free Software Foundation, Inc.
+ This file is part of the GNU C Library.
+
+ The GNU C Library is free software; you can redistribute it and/or
+ modify it under the terms of the GNU Lesser General Public
+ License as published by the Free Software Foundation; either
+ version 2.1 of the License, or (at your option) any later version.
+
+ The GNU C Library is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ Lesser General Public License for more details.
+
+ You should have received a copy of the GNU Lesser General Public
+ License along with the GNU C Library; if not, write to the Free
+ Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
+ 02111-1307 USA. */
+
+#include "../locale/localeinfo.h"
+#include <bits/libc-lock.h>
+#include <stdlib.h>
+#include <wchar.h>
+#include <string.h>
+
+/* Some of the functions here must not be used while setlocale is called. */
+__libc_lock_define (extern, __libc_setlocale_lock attribute_hidden)
+
+#define CURRENT(item) (current->values[_NL_ITEM_INDEX (item)].string)
+#define CURRENT_WSTR(item) \
+ ((wchar_t *) current->values[_NL_ITEM_INDEX (item)].wstr)
+
+static void
+_nl_init_alt_digit (struct locale_data *current)
+{
+ struct lc_time_data *data;
+
+ if (current->private.time == NULL)
+ {
+ current->private.time = malloc (sizeof *current->private.time);
+ if (current->private.time == NULL)
+ return;
+ memset (current->private.time, 0, sizeof *current->private.time);
+ current->private.cleanup = &_nl_cleanup_time;
+ }
+ data = current->private.time;
+
+ if (! data->alt_digits_initialized)
+ {
+ const char *ptr = CURRENT (ALT_DIGITS);
+ size_t cnt;
+
+ data->alt_digits_initialized = 1;
+
+ if (ptr != NULL)
+ {
+ data->alt_digits = malloc (100 * sizeof (const char *));
+ if (data->alt_digits != NULL)
+ for (cnt = 0; cnt < 100; ++cnt)
+ {
+ data->alt_digits[cnt] = ptr;
+
+ /* Skip digit format. */
+ ptr = strchr (ptr, '\0') + 1;
+ }
+ }
+ }
+
+}
+
+const char *
+internal_function
+_nl_get_alt_digit (unsigned int number, struct locale_data *current)
+{
+ const char *result;
+
+ if (number >= 100 || CURRENT (ALT_DIGITS)[0] == '\0')
+ return NULL;
+
+ __libc_lock_lock (__libc_setlocale_lock);
+
+ if (current->private.time == NULL
+ || ! current->private.time->alt_digits_initialized)
+ _nl_init_alt_digit (current);
+
+ result = ((current->private.time != NULL
+ && current->private.time->alt_digits != NULL)
+ ? current->private.time->alt_digits[number]
+ : NULL);
+
+ __libc_lock_unlock (__libc_setlocale_lock);
+
+ return result;
+}
+
+
+const wchar_t *
+internal_function
+_nl_get_walt_digit (unsigned int number, struct locale_data *current)
+{
+ const wchar_t *result = NULL;
+ struct lc_time_data *data;
+
+ if (number >= 100 || CURRENT_WSTR (_NL_WALT_DIGITS)[0] == L'\0')
+ return NULL;
+
+ __libc_lock_lock (__libc_setlocale_lock);
+
+ if (current->private.time == NULL)
+ {
+ current->private.time = malloc (sizeof *current->private.time);
+ if (current->private.time == NULL)
+ goto out;
+ memset (current->private.time, 0, sizeof *current->private.time);
+ current->private.cleanup = &_nl_cleanup_time;
+ }
+ data = current->private.time;
+
+ if (! data->walt_digits_initialized)
+ {
+ const wchar_t *ptr = CURRENT_WSTR (_NL_WALT_DIGITS);
+ size_t cnt;
+
+ data->walt_digits_initialized = 1;
+
+ if (ptr != NULL)
+ {
+ data->walt_digits = malloc (100 * sizeof (const uint32_t *));
+ if (data->walt_digits != NULL)
+ for (cnt = 0; cnt < 100; ++cnt)
+ {
+ data->walt_digits[cnt] = ptr;
+
+ /* Skip digit format. */
+ ptr = wcschr (ptr, L'\0') + 1;
+ }
+ }
+ }
+
+ if (data->walt_digits != NULL)
+ result = data->walt_digits[number];
+
+ out:
+ __libc_lock_unlock (__libc_setlocale_lock);
+
+ return (wchar_t *) result;
+}
+
+
+int
+internal_function
+_nl_parse_alt_digit (const char **strp, struct locale_data *current)
+{
+ const char *str = *strp;
+ int result = -1;
+ size_t cnt;
+ size_t maxlen = 0;
+
+ if (CURRENT_WSTR (_NL_WALT_DIGITS)[0] == L'\0')
+ return result;
+
+ __libc_lock_lock (__libc_setlocale_lock);
+
+ if (current->private.time == NULL
+ || ! current->private.time->alt_digits_initialized)
+ _nl_init_alt_digit (current);
+
+ if (current->private.time != NULL &&
+ current->private.time->alt_digits != NULL)
+ /* Matching is not unambiguous. The alternative digits could be like
+ I, II, III, ... and the first one is a substring of the second
+ and third. Therefore we must keep on searching until we found
+ the longest possible match. Note that this is not specified in
+ the standard. */
+ for (cnt = 0; cnt < 100; ++cnt)
+ {
+ const char *const dig = current->private.time->alt_digits[cnt];
+ size_t len = strlen (dig);
+
+ if (len > maxlen && strncmp (dig, str, len) == 0)
+ {
+ maxlen = len;
+ result = (int) cnt;
+ }
+ }
+
+ __libc_lock_unlock (__libc_setlocale_lock);
+
+ if (result != -1)
+ *strp += maxlen;
+
+ return result;
+}
diff --git a/time/era.c b/time/era.c
new file mode 100644
index 0000000000..a8d2237338
--- /dev/null
+++ b/time/era.c
@@ -0,0 +1,177 @@
+/* Helper functions used by strftime/strptime to handle locale-specific "eras".
+ Copyright (C) 1995-2001,02 Free Software Foundation, Inc.
+ This file is part of the GNU C Library.
+
+ The GNU C Library is free software; you can redistribute it and/or
+ modify it under the terms of the GNU Lesser General Public
+ License as published by the Free Software Foundation; either
+ version 2.1 of the License, or (at your option) any later version.
+
+ The GNU C Library is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ Lesser General Public License for more details.
+
+ You should have received a copy of the GNU Lesser General Public
+ License along with the GNU C Library; if not, write to the Free
+ Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
+ 02111-1307 USA. */
+
+#include "../locale/localeinfo.h"
+#include <bits/libc-lock.h>
+#include <stdlib.h>
+#include <wchar.h>
+#include <string.h>
+
+/* Some of the functions here must not be used while setlocale is called. */
+__libc_lock_define (extern, __libc_setlocale_lock attribute_hidden)
+
+#define CURRENT(item) (current->values[_NL_ITEM_INDEX (item)].string)
+#define CURRENT_WORD(item) (current->values[_NL_ITEM_INDEX (item)].word)
+
+#define ERA_DATE_CMP(a, b) \
+ (a[0] < b[0] || (a[0] == b[0] && (a[1] < b[1] \
+ || (a[1] == b[1] && a[2] <= b[2]))))
+
+/* Look up the era information in CURRENT's locale strings and
+ cache it in CURRENT->private. */
+static void internal_function
+_nl_init_era_entries (struct locale_data *current)
+{
+ size_t cnt;
+ struct lc_time_data *data;
+
+ /* Avoid touching CURRENT if there is no data at all, for _nl_C_LC_TIME. */
+ if (CURRENT_WORD (_NL_TIME_ERA_NUM_ENTRIES) == 0)
+ return;
+
+ __libc_lock_lock (__libc_setlocale_lock);
+
+ if (current->private.time == NULL)
+ {
+ current->private.time = malloc (sizeof *current->private.time);
+ if (current->private.time == NULL)
+ goto out;
+ memset (current->private.time, 0, sizeof *current->private.time);
+ current->private.cleanup = &_nl_cleanup_time;
+ }
+ data = current->private.time;
+
+ if (! data->era_initialized)
+ {
+ size_t new_num_eras = CURRENT_WORD (_NL_TIME_ERA_NUM_ENTRIES);
+ if (new_num_eras == 0)
+ {
+ if (data->eras != NULL)
+ {
+ free (data->eras);
+ data->eras = NULL;
+ }
+ }
+ else
+ {
+ struct era_entry *new_eras = data->eras;
+
+ if (data->num_eras != new_num_eras)
+ new_eras =
+ (struct era_entry *) realloc (data->eras,
+ new_num_eras
+ * sizeof (struct era_entry));
+ if (new_eras == NULL)
+ {
+ free (data->eras);
+ data->num_eras = 0;
+ data->eras = NULL;
+ }
+ else
+ {
+ const char *ptr = CURRENT (_NL_TIME_ERA_ENTRIES);
+ data->num_eras = new_num_eras;
+ data->eras = new_eras;
+
+ for (cnt = 0; cnt < new_num_eras; ++cnt)
+ {
+ const char *base_ptr = ptr;
+ memcpy ((void *) (new_eras + cnt), (const void *) ptr,
+ sizeof (uint32_t) * 8);
+
+ if (ERA_DATE_CMP(new_eras[cnt].start_date,
+ new_eras[cnt].stop_date))
+ if (new_eras[cnt].direction == (uint32_t) '+')
+ new_eras[cnt].absolute_direction = 1;
+ else
+ new_eras[cnt].absolute_direction = -1;
+ else
+ if (new_eras[cnt].direction == (uint32_t) '+')
+ new_eras[cnt].absolute_direction = -1;
+ else
+ new_eras[cnt].absolute_direction = 1;
+
+ /* Skip numeric values. */
+ ptr += sizeof (uint32_t) * 8;
+
+ /* Set and skip era name. */
+ new_eras[cnt].era_name = ptr;
+ ptr = strchr (ptr, '\0') + 1;
+
+ /* Set and skip era format. */
+ new_eras[cnt].era_format = ptr;
+ ptr = strchr (ptr, '\0') + 1;
+
+ ptr += 3 - (((ptr - (const char *) base_ptr) + 3) & 3);
+
+ /* Set and skip wide era name. */
+ new_eras[cnt].era_wname = (wchar_t *) ptr;
+ ptr = (char *) (wcschr ((wchar_t *) ptr, L'\0') + 1);
+
+ /* Set and skip wide era format. */
+ new_eras[cnt].era_wformat = (wchar_t *) ptr;
+ ptr = (char *) (wcschr ((wchar_t *) ptr, L'\0') + 1);
+ }
+ }
+ }
+
+ data->era_initialized = 1;
+ }
+
+ out:
+ __libc_lock_unlock (__libc_setlocale_lock);
+}
+
+struct era_entry *
+internal_function
+_nl_get_era_entry (const struct tm *tp, struct locale_data *current)
+{
+ if (current->private.time == NULL || !current->private.time->era_initialized)
+ _nl_init_era_entries (current);
+
+ if (current->private.time != NULL)
+ {
+ /* Now compare date with the available eras. */
+ const int32_t tdate[3] = { tp->tm_year, tp->tm_mon, tp->tm_mday };
+ size_t cnt;
+ for (cnt = 0; cnt < current->private.time->num_eras; ++cnt)
+ if ((ERA_DATE_CMP (current->private.time->eras[cnt].start_date, tdate)
+ && ERA_DATE_CMP (tdate,
+ current->private.time->eras[cnt].stop_date))
+ || (ERA_DATE_CMP (current->private.time->eras[cnt].stop_date,
+ tdate)
+ && ERA_DATE_CMP (tdate,
+ current->private.time->eras[cnt].start_date)))
+ return &current->private.time->eras[cnt];
+ }
+
+ return NULL;
+}
+
+
+struct era_entry *
+internal_function
+_nl_select_era_entry (int cnt, struct locale_data *current)
+{
+ if (current->private.time == NULL || !current->private.time->era_initialized)
+ _nl_init_era_entries (current);
+
+ return (current->private.time == NULL
+ ? NULL : &current->private.time->eras[cnt]);
+}
diff --git a/time/lc-time-cleanup.c b/time/lc-time-cleanup.c
new file mode 100644
index 0000000000..7972700686
--- /dev/null
+++ b/time/lc-time-cleanup.c
@@ -0,0 +1,41 @@
+/* Cleanup code for data structures kept by strftime/strptime helper functions.
+ Copyright (C) 2002 Free Software Foundation, Inc.
+ This file is part of the GNU C Library.
+
+ The GNU C Library is free software; you can redistribute it and/or
+ modify it under the terms of the GNU Lesser General Public
+ License as published by the Free Software Foundation; either
+ version 2.1 of the License, or (at your option) any later version.
+
+ The GNU C Library is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ Lesser General Public License for more details.
+
+ You should have received a copy of the GNU Lesser General Public
+ License along with the GNU C Library; if not, write to the Free
+ Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
+ 02111-1307 USA. */
+
+#include "../locale/localeinfo.h"
+#include <stdlib.h>
+
+void internal_function
+_nl_cleanup_time (struct locale_data *locale)
+{
+ struct lc_time_data *const data = locale->private.time;
+ if (data != NULL)
+ {
+ locale->private.time = NULL;
+ locale->private.cleanup = NULL;
+
+ if (data->eras != NULL)
+ free (data->eras);
+ if (data->alt_digits != NULL)
+ free (data->alt_digits);
+ if (data->walt_digits != NULL)
+ free (data->walt_digits);
+
+ free (data);
+ }
+}
diff --git a/time/strftime.c b/time/strftime.c
index 986124399b..5215f567f0 100644
--- a/time/strftime.c
+++ b/time/strftime.c
@@ -315,10 +315,16 @@ static const CHAR_T zeroes[16] = /* "0000000000000000" */
# define LOCALE_PARAM , loc
# define LOCALE_ARG , loc
# define LOCALE_PARAM_DECL __locale_t loc;
+# define HELPER_LOCALE_ARG , current
#else
# define LOCALE_PARAM
# define LOCALE_ARG
# define LOCALE_PARAM_DECL
+# ifdef _LIBC
+# define HELPER_LOCALE_ARG , _NL_CURRENT_DATA (LC_TIME)
+# else
+# define HELPER_LOCALE_ARG
+# endif
#endif
#ifdef COMPILE_WIDE
@@ -494,7 +500,7 @@ my_strftime (s, maxsize, format, tp ut_argument LOCALE_PARAM)
LOCALE_PARAM_DECL
{
#if defined _LIBC && defined USE_IN_EXTENDED_LOCALE_MODEL
- const struct locale_data *const current = loc->__locales[LC_TIME];
+ struct locale_data *const current = loc->__locales[LC_TIME];
#endif
int hour12 = tp->tm_hour;
@@ -880,7 +886,7 @@ my_strftime (s, maxsize, format, tp ut_argument LOCALE_PARAM)
if (modifier == L_('E'))
{
#if HAVE_STRUCT_ERA_ENTRY
- struct era_entry *era = _nl_get_era_entry (tp);
+ struct era_entry *era = _nl_get_era_entry (tp HELPER_LOCALE_ARG);
if (era)
{
# ifdef COMPILE_WIDE
@@ -956,9 +962,11 @@ my_strftime (s, maxsize, format, tp ut_argument LOCALE_PARAM)
/* Get the locale specific alternate representation of
the number NUMBER_VALUE. If none exist NULL is returned. */
# ifdef COMPILE_WIDE
- const wchar_t *cp = _nl_get_walt_digit (number_value);
+ const wchar_t *cp = _nl_get_walt_digit (number_value
+ HELPER_LOCALE_ARG);
# else
- const char *cp = _nl_get_alt_digit (number_value);
+ const char *cp = _nl_get_alt_digit (number_value
+ HELPER_LOCALE_ARG);
# endif
if (cp != NULL)
@@ -1238,7 +1246,7 @@ my_strftime (s, maxsize, format, tp ut_argument LOCALE_PARAM)
if (modifier == 'E')
{
#if HAVE_STRUCT_ERA_ENTRY
- struct era_entry *era = _nl_get_era_entry (tp);
+ struct era_entry *era = _nl_get_era_entry (tp HELPER_LOCALE_ARG);
if (era)
{
# ifdef COMPILE_WIDE
@@ -1263,7 +1271,7 @@ my_strftime (s, maxsize, format, tp ut_argument LOCALE_PARAM)
if (modifier == L_('E'))
{
#if HAVE_STRUCT_ERA_ENTRY
- struct era_entry *era = _nl_get_era_entry (tp);
+ struct era_entry *era = _nl_get_era_entry (tp HELPER_LOCALE_ARG);
if (era)
{
int delta = tp->tm_year - era->start_date[0];