Please note that diffs are not public domain; they are subject to the copyright notices on the relevant files. =================================================================== RCS file: /ftp/cvs/cvsroot/src/lib/libc/stdlib/strfmon.c,v rcsdiff: /ftp/cvs/cvsroot/src/lib/libc/stdlib/strfmon.c,v: warning: Unknown phrases like `commitid ...;' are present. retrieving revision 1.9 retrieving revision 1.11 diff -u -p -r1.9 -r1.11 --- src/lib/libc/stdlib/strfmon.c 2012/03/13 21:13:48 1.9 +++ src/lib/libc/stdlib/strfmon.c 2017/08/16 13:53:20 1.11 @@ -1,4 +1,4 @@ -/* $NetBSD: strfmon.c,v 1.9 2012/03/13 21:13:48 christos Exp $ */ +/* $NetBSD: strfmon.c,v 1.11 2017/08/16 13:53:20 joerg Exp $ */ /*- * Copyright (c) 2001 Alexey Zelkin @@ -32,14 +32,11 @@ #if 0 __FBSDID("$FreeBSD: src/lib/libc/stdlib/strfmon.c,v 1.14 2003/03/20 08:18:55 ache Exp $"); #else -__RCSID("$NetBSD: strfmon.c,v 1.9 2012/03/13 21:13:48 christos Exp $"); +__RCSID("$NetBSD: strfmon.c,v 1.11 2017/08/16 13:53:20 joerg Exp $"); #endif #endif /* LIBC_SCCS and not lint */ -#if defined(__NetBSD__) #include "namespace.h" -#include -#endif #include #include @@ -47,11 +44,14 @@ __RCSID("$NetBSD: strfmon.c,v 1.9 2012/0 #include #include #include +#include #include +#include #include #include #include -#include + +#include "setlocale_local.h" /* internal flags */ #define NEED_GROUPING 0x01 /* print digits grouped (default) */ @@ -63,6 +63,10 @@ __RCSID("$NetBSD: strfmon.c,v 1.9 2012/0 #define USE_INTL_CURRENCY 0x40 /* use international currency symbol */ #define IS_NEGATIVE 0x80 /* is argument value negative ? */ +#ifndef NBCHAR_MAX +#define NBCHAR_MAX ((unsigned char)CHAR_MAX) +#endif + /* internal macros */ #define PRINT(CH) do { \ if (dst >= s + maxsize) \ @@ -100,15 +104,14 @@ __RCSID("$NetBSD: strfmon.c,v 1.9 2012/0 groups++; \ } while (/* CONSTCOND */ 0) -static void __setup_vars(int, char *, char *, char *, const char **); -static int __calc_left_pad(int, char *); -static char *__format_grouped_double(double, int *, int, int, int); - -ssize_t -strfmon(char * __restrict s, size_t maxsize, const char * __restrict format, - ...) +static void __setup_vars(struct lconv *, int, char *, char *, char *, const char **); +static int __calc_left_pad(struct lconv *, int, char *); +static char *__format_grouped_double(struct lconv *, double, int *, int, int, int); + +static ssize_t +vstrfmon_l(char * __restrict s, size_t maxsize, locale_t loc, + const char * __restrict format, va_list ap) { - va_list ap; char *dst; /* output destination pointer */ const char *fmt; /* current format poistion pointer */ struct lconv *lc; /* pointer to lconv structure */ @@ -132,9 +135,7 @@ strfmon(char * __restrict s, size_t maxs char *tmpptr; /* temporary vars */ int sverrno; - va_start(ap, format); - - lc = localeconv(); + lc = localeconv_l(loc); dst = s; fmt = format; asciivalue = NULL; @@ -259,21 +260,21 @@ strfmon(char * __restrict s, size_t maxs /* fill left_prec with amount of padding chars */ if (left_prec >= 0) { - pad_size = __calc_left_pad((flags ^ IS_NEGATIVE), + pad_size = __calc_left_pad(lc, (flags ^ IS_NEGATIVE), currency_symbol) - - __calc_left_pad(flags, currency_symbol); + __calc_left_pad(lc, flags, currency_symbol); if (pad_size < 0) pad_size = 0; } - asciivalue = __format_grouped_double(value, &flags, + asciivalue = __format_grouped_double(lc, value, &flags, left_prec, right_prec, pad_char); if (asciivalue == NULL) goto end_error; /* errno already set */ /* to ENOMEM by malloc() */ /* set some variables for later use */ - __setup_vars(flags, &cs_precedes, &sep_by_space, + __setup_vars(lc, flags, &cs_precedes, &sep_by_space, &sign_posn, &signstr); /* @@ -388,7 +389,6 @@ strfmon(char * __restrict s, size_t maxs } PRINT('\0'); - va_end(ap); free(asciivalue); free(currency_symbol); return (dst - s - 1); /* return size of put data except trailing '\0' */ @@ -407,14 +407,12 @@ end_error: if (currency_symbol != NULL) free(currency_symbol); errno = sverrno; - va_end(ap); return (-1); } static void -__setup_vars(int flags, char *cs_precedes, char *sep_by_space, +__setup_vars(struct lconv *lc, int flags, char *cs_precedes, char *sep_by_space, char *sign_posn, const char **signstr) { - struct lconv *lc = localeconv(); if ((flags & IS_NEGATIVE) && (flags & USE_INTL_CURRENCY)) { *cs_precedes = lc->int_n_cs_precedes; @@ -443,20 +441,20 @@ __setup_vars(int flags, char *cs_precede /* Set defult values for unspecified information. */ if (*cs_precedes != 0) *cs_precedes = 1; - if (*sep_by_space == CHAR_MAX) + if ((unsigned char)*sep_by_space == NBCHAR_MAX) *sep_by_space = 0; - if (*sign_posn == CHAR_MAX) + if ((unsigned char)*sign_posn == NBCHAR_MAX) *sign_posn = 0; } static int -__calc_left_pad(int flags, char *cur_symb) { +__calc_left_pad(struct lconv *lc, int flags, char *cur_symb) { char cs_precedes, sep_by_space, sign_posn; const char *signstr; size_t left_chars = 0; - __setup_vars(flags, &cs_precedes, &sep_by_space, &sign_posn, &signstr); + __setup_vars(lc, flags, &cs_precedes, &sep_by_space, &sign_posn, &signstr); if (cs_precedes != 0) { left_chars += strlen(cur_symb); @@ -482,14 +480,14 @@ get_groups(int size, char *grouping) { int chars = 0; - if (*grouping == CHAR_MAX || *grouping <= 0) /* no grouping ? */ + if ((unsigned char)*grouping == NBCHAR_MAX || *grouping <= 0) /* no grouping ? */ return (0); while (size > (int)*grouping) { chars++; size -= (int)*grouping++; /* no more grouping ? */ - if (*grouping == CHAR_MAX) + if ((unsigned char)*grouping == NBCHAR_MAX) break; /* rest grouping with same value ? */ if (*grouping == 0) { @@ -502,7 +500,7 @@ get_groups(int size, char *grouping) { /* convert double to ASCII */ static char * -__format_grouped_double(double value, int *flags, +__format_grouped_double(struct lconv *lc, double value, int *flags, int left_prec, int right_prec, int pad_char) { char *rslt; @@ -514,7 +512,6 @@ __format_grouped_double(double value, in int padded; - struct lconv *lc = localeconv(); char *grouping; char decimal_point; char thousands_sep; @@ -581,7 +578,7 @@ __format_grouped_double(double value, in /* XXX: Why not use %' instead? */ if ((*flags & NEED_GROUPING) && thousands_sep != '\0' && /* XXX: need investigation */ - *grouping != CHAR_MAX && + (unsigned char)*grouping != NBCHAR_MAX && *grouping > 0) { while (avalue_size > (int)*grouping) { GRPCPY(*grouping); @@ -589,7 +586,7 @@ __format_grouped_double(double value, in grouping++; /* no more grouping ? */ - if (*grouping == CHAR_MAX) + if ((unsigned char)*grouping == NBCHAR_MAX) break; /* rest grouping with same value ? */ @@ -623,3 +620,31 @@ __format_grouped_double(double value, in free(avalue); return (rslt); } + +ssize_t +strfmon(char * __restrict s, size_t maxsize, const char * __restrict format, + ...) +{ + ssize_t rv; + va_list ap; + + va_start(ap, format); + rv = vstrfmon_l(s, maxsize, _current_locale(), format, ap); + va_end(ap); + + return rv; +} + +ssize_t +strfmon_l(char * __restrict s, size_t maxsize, locale_t loc, + const char * __restrict format, ...) +{ + ssize_t rv; + va_list ap; + + va_start(ap, format); + rv = vstrfmon_l(s, maxsize, loc, format, ap); + va_end(ap); + + return rv; +}