Home | History | Annotate | Line # | Download | only in locale
localeconv.c revision 1.8
      1  1.8  christos /*	$NetBSD: localeconv.c,v 1.8 1997/07/13 19:54:55 christos Exp $	*/
      2  1.7    kleink 
      3  1.1       cgd /*
      4  1.6       jtc  * Written by J.T. Conklin <jtc (at) netbsd.org>.
      5  1.6       jtc  * Public domain.
      6  1.1       cgd  */
      7  1.1       cgd 
      8  1.8  christos #include <sys/cdefs.h>
      9  1.1       cgd #if defined(LIBC_SCCS) && !defined(lint)
     10  1.8  christos __RCSID("$NetBSD: localeconv.c,v 1.8 1997/07/13 19:54:55 christos Exp $");
     11  1.1       cgd #endif /* LIBC_SCCS and not lint */
     12  1.1       cgd 
     13  1.5       jtc #include <sys/localedef.h>
     14  1.1       cgd #include <locale.h>
     15  1.1       cgd 
     16  1.4       jtc /*
     17  1.4       jtc  * The localeconv() function constructs a struct lconv from the current
     18  1.4       jtc  * monetary and numeric locales.
     19  1.4       jtc  *
     20  1.4       jtc  * Because localeconv() may be called many times (especially by library
     21  1.4       jtc  * routines like printf() & strtod()), the approprate members of the
     22  1.4       jtc  * lconv structure are computed only when the monetary or numeric
     23  1.4       jtc  * locale has been changed.
     24  1.4       jtc  */
     25  1.4       jtc int __mlocale_changed = 1;
     26  1.4       jtc int __nlocale_changed = 1;
     27  1.4       jtc 
     28  1.1       cgd /*
     29  1.1       cgd  * Return the current locale conversion.
     30  1.1       cgd  */
     31  1.1       cgd struct lconv *
     32  1.1       cgd localeconv()
     33  1.1       cgd {
     34  1.4       jtc     static struct lconv ret;
     35  1.4       jtc 
     36  1.4       jtc     if (__mlocale_changed) {
     37  1.4       jtc 	/* LC_MONETARY */
     38  1.4       jtc 	ret.int_curr_symbol	= _CurrentMonetaryLocale->int_curr_symbol;
     39  1.4       jtc 	ret.currency_symbol	= _CurrentMonetaryLocale->currency_symbol;
     40  1.4       jtc 	ret.mon_decimal_point	= _CurrentMonetaryLocale->mon_decimal_point;
     41  1.4       jtc 	ret.mon_thousands_sep	= _CurrentMonetaryLocale->mon_thousands_sep;
     42  1.4       jtc 	ret.mon_grouping	= _CurrentMonetaryLocale->mon_grouping;
     43  1.4       jtc 	ret.positive_sign	= _CurrentMonetaryLocale->positive_sign;
     44  1.4       jtc 	ret.negative_sign	= _CurrentMonetaryLocale->negative_sign;
     45  1.4       jtc 	ret.int_frac_digits	= _CurrentMonetaryLocale->int_frac_digits;
     46  1.4       jtc 	ret.frac_digits		= _CurrentMonetaryLocale->frac_digits;
     47  1.4       jtc 	ret.p_cs_precedes	= _CurrentMonetaryLocale->p_cs_precedes;
     48  1.4       jtc 	ret.p_sep_by_space	= _CurrentMonetaryLocale->p_sep_by_space;
     49  1.4       jtc 	ret.n_cs_precedes	= _CurrentMonetaryLocale->n_cs_precedes;
     50  1.4       jtc 	ret.n_sep_by_space	= _CurrentMonetaryLocale->n_sep_by_space;
     51  1.4       jtc 	ret.p_sign_posn		= _CurrentMonetaryLocale->p_sign_posn;
     52  1.4       jtc 	ret.n_sign_posn		= _CurrentMonetaryLocale->n_sign_posn;
     53  1.4       jtc 	__mlocale_changed = 0;
     54  1.4       jtc     }
     55  1.4       jtc 
     56  1.4       jtc     if (__nlocale_changed) {
     57  1.4       jtc 	/* LC_NUMERIC */
     58  1.4       jtc 	ret.decimal_point	= (char *) _CurrentNumericLocale->decimal_point;
     59  1.4       jtc 	ret.thousands_sep	= (char *) _CurrentNumericLocale->thousands_sep;
     60  1.4       jtc 	ret.grouping		= (char *) _CurrentNumericLocale->grouping;
     61  1.4       jtc 	__nlocale_changed = 0;
     62  1.4       jtc     }
     63  1.1       cgd 
     64  1.4       jtc     return (&ret);
     65  1.1       cgd }
     66