xref: /dragonfly/lib/libc/locale/localeconv.c (revision 984263bc)
1 /*
2  * Copyright (c) 2001 Alexey Zelkin <phantom@FreeBSD.org>
3  * Copyright (c) 1991, 1993
4  *	The Regents of the University of California.  All rights reserved.
5  *
6  * Redistribution and use in source and binary forms, with or without
7  * modification, are permitted provided that the following conditions
8  * are met:
9  * 1. Redistributions of source code must retain the above copyright
10  *    notice, this list of conditions and the following disclaimer.
11  * 2. Redistributions in binary form must reproduce the above copyright
12  *    notice, this list of conditions and the following disclaimer in the
13  *    documentation and/or other materials provided with the distribution.
14  * 3. All advertising materials mentioning features or use of this software
15  *    must display the following acknowledgement:
16  *	This product includes software developed by the University of
17  *	California, Berkeley and its contributors.
18  * 4. Neither the name of the University nor the names of its contributors
19  *    may be used to endorse or promote products derived from this software
20  *    without specific prior written permission.
21  *
22  * THIS SOFTWARE IS PROVIDED BY THE REGENTS 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 REGENTS 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 #if defined(LIBC_SCCS) && !defined(lint)
36 #if 0
37 static char sccsid[] = "@(#)localeconv.c	8.1 (Berkeley) 6/4/93";
38 #endif
39 static char rcsid[] =
40   "$FreeBSD: src/lib/libc/locale/localeconv.c,v 1.1.1.1.14.2 2002/03/12 17:17:48 phantom Exp $";
41 #endif /* LIBC_SCCS and not lint */
42 
43 #include <locale.h>
44 #include "lmonetary.h"
45 #include "lnumeric.h"
46 
47 /*
48  * The localeconv() function constructs a struct lconv from the current
49  * monetary and numeric locales.
50  *
51  * Because localeconv() may be called many times (especially by library
52  * routines like printf() & strtod()), the approprate members of the
53  * lconv structure are computed only when the monetary or numeric
54  * locale has been changed.
55  */
56 int __mlocale_changed = 1;
57 int __nlocale_changed = 1;
58 
59 /*
60  * Return the current locale conversion.
61  */
62 struct lconv *
63 localeconv()
64 {
65     static struct lconv ret;
66 
67     if (__mlocale_changed) {
68 	/* LC_MONETARY part */
69         struct lc_monetary_T * mptr;
70 
71 #define M_ASSIGN_STR(NAME) (ret.NAME = (char*)mptr->NAME)
72 #define M_ASSIGN_CHAR(NAME) (ret.NAME = mptr->NAME[0])
73 
74 	mptr = __get_current_monetary_locale();
75 	M_ASSIGN_STR(int_curr_symbol);
76 	M_ASSIGN_STR(currency_symbol);
77 	M_ASSIGN_STR(mon_decimal_point);
78 	M_ASSIGN_STR(mon_thousands_sep);
79 	M_ASSIGN_STR(mon_grouping);
80 	M_ASSIGN_STR(positive_sign);
81 	M_ASSIGN_STR(negative_sign);
82 	M_ASSIGN_CHAR(int_frac_digits);
83 	M_ASSIGN_CHAR(frac_digits);
84 	M_ASSIGN_CHAR(p_cs_precedes);
85 	M_ASSIGN_CHAR(p_sep_by_space);
86 	M_ASSIGN_CHAR(n_cs_precedes);
87 	M_ASSIGN_CHAR(n_sep_by_space);
88 	M_ASSIGN_CHAR(p_sign_posn);
89 	M_ASSIGN_CHAR(n_sign_posn);
90 	__mlocale_changed = 0;
91     }
92 
93     if (__nlocale_changed) {
94 	/* LC_NUMERIC part */
95         struct lc_numeric_T * nptr;
96 
97 #define N_ASSIGN_STR(NAME) (ret.NAME = (char*)nptr->NAME)
98 
99 	nptr = __get_current_numeric_locale();
100 	N_ASSIGN_STR(decimal_point);
101 	N_ASSIGN_STR(thousands_sep);
102 	N_ASSIGN_STR(grouping);
103 	__nlocale_changed = 0;
104     }
105 
106     return (&ret);
107 }
108