| /** @file | |
| stringlib: locale related helpers implementation. | |
| Copyright (c) 2011, Intel Corporation. All rights reserved.<BR> | |
| This program and the accompanying materials are licensed and made available under | |
| the terms and conditions of the BSD License that accompanies this distribution. | |
| The full text of the license may be found at | |
| http://opensource.org/licenses/bsd-license. | |
| THE PROGRAM IS DISTRIBUTED UNDER THE BSD LICENSE ON AN "AS IS" BASIS, | |
| WITHOUT WARRANTIES OR REPRESENTATIONS OF ANY KIND, EITHER EXPRESS OR IMPLIED. | |
| **/ | |
| #ifndef STRINGLIB_LOCALEUTIL_H | |
| #define STRINGLIB_LOCALEUTIL_H | |
| #include <locale.h> | |
| // Prevent conflicts with EFI | |
| #undef MAX | |
| #undef MIN | |
| #define MAX(x, y) ((x) < (y) ? (y) : (x)) | |
| #define MIN(x, y) ((x) < (y) ? (x) : (y)) | |
| typedef struct { | |
| const char *grouping; | |
| char previous; | |
| Py_ssize_t i; /* Where we're currently pointing in grouping. */ | |
| } GroupGenerator; | |
| static void | |
| _GroupGenerator_init(GroupGenerator *self, const char *grouping) | |
| { | |
| self->grouping = grouping; | |
| self->i = 0; | |
| self->previous = 0; | |
| } | |
| /* Returns the next grouping, or 0 to signify end. */ | |
| static Py_ssize_t | |
| _GroupGenerator_next(GroupGenerator *self) | |
| { | |
| /* Note that we don't really do much error checking here. If a | |
| grouping string contains just CHAR_MAX, for example, then just | |
| terminate the generator. That shouldn't happen, but at least we | |
| fail gracefully. */ | |
| switch (self->grouping[self->i]) { | |
| case 0: | |
| return self->previous; | |
| case CHAR_MAX: | |
| /* Stop the generator. */ | |
| return 0; | |
| default: { | |
| char ch = self->grouping[self->i]; | |
| self->previous = ch; | |
| self->i++; | |
| return (Py_ssize_t)ch; | |
| } | |
| } | |
| } | |
| /* Fill in some digits, leading zeros, and thousands separator. All | |
| are optional, depending on when we're called. */ | |
| static void | |
| fill(STRINGLIB_CHAR **digits_end, STRINGLIB_CHAR **buffer_end, | |
| Py_ssize_t n_chars, Py_ssize_t n_zeros, const char* thousands_sep, | |
| Py_ssize_t thousands_sep_len) | |
| { | |
| #if STRINGLIB_IS_UNICODE | |
| Py_ssize_t i; | |
| #endif | |
| if (thousands_sep) { | |
| *buffer_end -= thousands_sep_len; | |
| /* Copy the thousands_sep chars into the buffer. */ | |
| #if STRINGLIB_IS_UNICODE | |
| /* Convert from the char's of the thousands_sep from | |
| the locale into unicode. */ | |
| for (i = 0; i < thousands_sep_len; ++i) | |
| (*buffer_end)[i] = thousands_sep[i]; | |
| #else | |
| /* No conversion, just memcpy the thousands_sep. */ | |
| memcpy(*buffer_end, thousands_sep, thousands_sep_len); | |
| #endif | |
| } | |
| *buffer_end -= n_chars; | |
| *digits_end -= n_chars; | |
| memcpy(*buffer_end, *digits_end, n_chars * sizeof(STRINGLIB_CHAR)); | |
| *buffer_end -= n_zeros; | |
| STRINGLIB_FILL(*buffer_end, '0', n_zeros); | |
| } | |
| /** | |
| * _Py_InsertThousandsGrouping: | |
| * @buffer: A pointer to the start of a string. | |
| * @n_buffer: Number of characters in @buffer. | |
| * @digits: A pointer to the digits we're reading from. If count | |
| * is non-NULL, this is unused. | |
| * @n_digits: The number of digits in the string, in which we want | |
| * to put the grouping chars. | |
| * @min_width: The minimum width of the digits in the output string. | |
| * Output will be zero-padded on the left to fill. | |
| * @grouping: see definition in localeconv(). | |
| * @thousands_sep: see definition in localeconv(). | |
| * | |
| * There are 2 modes: counting and filling. If @buffer is NULL, | |
| * we are in counting mode, else filling mode. | |
| * If counting, the required buffer size is returned. | |
| * If filling, we know the buffer will be large enough, so we don't | |
| * need to pass in the buffer size. | |
| * Inserts thousand grouping characters (as defined by grouping and | |
| * thousands_sep) into the string between buffer and buffer+n_digits. | |
| * | |
| * Return value: 0 on error, else 1. Note that no error can occur if | |
| * count is non-NULL. | |
| * | |
| * This name won't be used, the includer of this file should define | |
| * it to be the actual function name, based on unicode or string. | |
| * | |
| * As closely as possible, this code mimics the logic in decimal.py's | |
| _insert_thousands_sep(). | |
| **/ | |
| Py_ssize_t | |
| _Py_InsertThousandsGrouping(STRINGLIB_CHAR *buffer, | |
| Py_ssize_t n_buffer, | |
| STRINGLIB_CHAR *digits, | |
| Py_ssize_t n_digits, | |
| Py_ssize_t min_width, | |
| const char *grouping, | |
| const char *thousands_sep) | |
| { | |
| Py_ssize_t count = 0; | |
| Py_ssize_t n_zeros; | |
| int loop_broken = 0; | |
| int use_separator = 0; /* First time through, don't append the | |
| separator. They only go between | |
| groups. */ | |
| STRINGLIB_CHAR *buffer_end = NULL; | |
| STRINGLIB_CHAR *digits_end = NULL; | |
| Py_ssize_t l; | |
| Py_ssize_t n_chars; | |
| Py_ssize_t thousands_sep_len = strlen(thousands_sep); | |
| Py_ssize_t remaining = n_digits; /* Number of chars remaining to | |
| be looked at */ | |
| /* A generator that returns all of the grouping widths, until it | |
| returns 0. */ | |
| GroupGenerator groupgen; | |
| _GroupGenerator_init(&groupgen, grouping); | |
| if (buffer) { | |
| buffer_end = buffer + n_buffer; | |
| digits_end = digits + n_digits; | |
| } | |
| while ((l = _GroupGenerator_next(&groupgen)) > 0) { | |
| l = MIN(l, MAX(MAX(remaining, min_width), 1)); | |
| n_zeros = MAX(0, l - remaining); | |
| n_chars = MAX(0, MIN(remaining, l)); | |
| /* Use n_zero zero's and n_chars chars */ | |
| /* Count only, don't do anything. */ | |
| count += (use_separator ? thousands_sep_len : 0) + n_zeros + n_chars; | |
| if (buffer) { | |
| /* Copy into the output buffer. */ | |
| fill(&digits_end, &buffer_end, n_chars, n_zeros, | |
| use_separator ? thousands_sep : NULL, thousands_sep_len); | |
| } | |
| /* Use a separator next time. */ | |
| use_separator = 1; | |
| remaining -= n_chars; | |
| min_width -= l; | |
| if (remaining <= 0 && min_width <= 0) { | |
| loop_broken = 1; | |
| break; | |
| } | |
| min_width -= thousands_sep_len; | |
| } | |
| if (!loop_broken) { | |
| /* We left the loop without using a break statement. */ | |
| l = MAX(MAX(remaining, min_width), 1); | |
| n_zeros = MAX(0, l - remaining); | |
| n_chars = MAX(0, MIN(remaining, l)); | |
| /* Use n_zero zero's and n_chars chars */ | |
| count += (use_separator ? thousands_sep_len : 0) + n_zeros + n_chars; | |
| if (buffer) { | |
| /* Copy into the output buffer. */ | |
| fill(&digits_end, &buffer_end, n_chars, n_zeros, | |
| use_separator ? thousands_sep : NULL, thousands_sep_len); | |
| } | |
| } | |
| return count; | |
| } | |
| /** | |
| * _Py_InsertThousandsGroupingLocale: | |
| * @buffer: A pointer to the start of a string. | |
| * @n_digits: The number of digits in the string, in which we want | |
| * to put the grouping chars. | |
| * | |
| * Reads thee current locale and calls _Py_InsertThousandsGrouping(). | |
| **/ | |
| Py_ssize_t | |
| _Py_InsertThousandsGroupingLocale(STRINGLIB_CHAR *buffer, | |
| Py_ssize_t n_buffer, | |
| STRINGLIB_CHAR *digits, | |
| Py_ssize_t n_digits, | |
| Py_ssize_t min_width) | |
| { | |
| struct lconv *locale_data = localeconv(); | |
| const char *grouping = locale_data->grouping; | |
| const char *thousands_sep = locale_data->thousands_sep; | |
| return _Py_InsertThousandsGrouping(buffer, n_buffer, digits, n_digits, | |
| min_width, grouping, thousands_sep); | |
| } | |
| #endif /* STRINGLIB_LOCALEUTIL_H */ |