[apple/libc.git] / locale / xlocale_private.h

/*
 * Copyright (c) 2005, 2008 Apple Inc. All rights reserved.
 *
 * @APPLE_LICENSE_HEADER_START@
 * 
 * This file contains Original Code and/or Modifications of Original Code
 * as defined in and that are subject to the Apple Public Source License
 * Version 2.0 (the 'License'). You may not use this file except in
 * compliance with the License. Please obtain a copy of the License at
 * http://www.opensource.apple.com/apsl/ and read it before using this
 * file.
 * 
 * The Original Code and all software distributed under the License are
 * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
 * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
 * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
 * Please see the License for the specific language governing rights and
 * limitations under the License.
 * 
 * @APPLE_LICENSE_HEADER_END@
 */

#ifndef _XLOCALE_PRIVATE_H_
#define _XLOCALE_PRIVATE_H_

#include <sys/cdefs.h>
#define __DARWIN_XLOCALE_PRIVATE
#include <xlocale.h>
#undef __DARWIN_XLOCALE_PRIVATE
#include <stdlib.h>
#include <locale.h>
#include <libkern/OSAtomic.h>
#include <pthread.h>
#include <pthread_spinlock.h>
#include <limits.h>
#include "setlocale.h"
#include "collate.h"
#include "runetype.h"
#include "lmessages.h"
#include "lmonetary.h"
#include "lnumeric.h"
#include "timelocal.h"
#include <TargetConditionals.h>

#undef MB_CUR_MAX
#define MB_CUR_MAX	(__current_locale()->__lc_ctype->__mb_cur_max)
#undef MB_CUR_MAX_L
#define MB_CUR_MAX_L(x)	((x)->__lc_ctype->__mb_cur_max)

typedef void (*__free_extra_t)(void *);

#define XPERMANENT	((__free_extra_t)-1)
#define XMAGIC		0x786c6f63616c6530LL	/* 'xlocale0' */

#define	__STRUCT_COMMON	\
	int32_t __refcount; \
	__free_extra_t __free_extra;

struct __xlocale_st_collate {
	__STRUCT_COMMON
	char __encoding[ENCODING_LEN + 1];
	struct __collate_st_info __info;
	struct __collate_st_subst *__substitute_table[COLL_WEIGHTS_MAX];
	struct __collate_st_chain_pri *__chain_pri_table;
	struct __collate_st_large_char_pri *__large_char_pri_table;
	struct __collate_st_char_pri __char_pri_table[UCHAR_MAX + 1];
};
struct __xlocale_st_runelocale {
	__STRUCT_COMMON
	char __ctype_encoding[ENCODING_LEN + 1];
	int __mb_cur_max;
	int __mb_sb_limit;
	size_t (*__mbrtowc)(wchar_t * __restrict, const char * __restrict,
	    size_t, __darwin_mbstate_t * __restrict, struct _xlocale *);
	int (*__mbsinit)(const __darwin_mbstate_t *, struct _xlocale *);
	size_t (*__mbsnrtowcs)(wchar_t * __restrict, const char ** __restrict,
	    size_t, size_t, __darwin_mbstate_t * __restrict, struct _xlocale *);
	size_t (*__wcrtomb)(char * __restrict, wchar_t,
	    __darwin_mbstate_t * __restrict, struct _xlocale *);
	size_t (*__wcsnrtombs)(char * __restrict, const wchar_t ** __restrict,
	    size_t, size_t, __darwin_mbstate_t * __restrict, struct _xlocale *);
	int __datasize;
	_RuneLocale _CurrentRuneLocale;
};
struct __xlocale_st_ldpart {
	__STRUCT_COMMON
	char *_locale_buf;
};
/*
 * the next four structures must have the first three fields of the same
 * as the _xlocale_st_ldpart structure above.
 */
struct __xlocale_st_messages {
	__STRUCT_COMMON
	char *_messages_locale_buf;
	struct lc_messages_T _messages_locale;
};
struct __xlocale_st_monetary {
	__STRUCT_COMMON
	char *_monetary_locale_buf;
	struct lc_monetary_T _monetary_locale;
};
struct __xlocale_st_numeric {
	__STRUCT_COMMON
	char *_numeric_locale_buf;
	struct lc_numeric_T _numeric_locale;
};
struct __xlocale_st_time {
	__STRUCT_COMMON
	char *_time_locale_buf;
	struct lc_time_T _time_locale;
};

/* the extended locale structure */
    /* values for __numeric_fp_cvt */
#define	LC_NUMERIC_FP_UNINITIALIZED	0
#define	LC_NUMERIC_FP_SAME_LOCALE	1
#define	LC_NUMERIC_FP_USE_LOCALE	2

struct _xlocale {
/* The item(s) before __magic are not copied when duplicating locale_t's */
	__STRUCT_COMMON	/* only used for locale_t's in __lc_numeric_loc */
	/* 10 independent mbstate_t buffers! */
	__darwin_mbstate_t __mbs_mblen;
	__darwin_mbstate_t __mbs_mbrlen;
	__darwin_mbstate_t __mbs_mbrtowc;
	__darwin_mbstate_t __mbs_mbsnrtowcs;
	__darwin_mbstate_t __mbs_mbsrtowcs;
	__darwin_mbstate_t __mbs_mbtowc;
	__darwin_mbstate_t __mbs_wcrtomb;
	__darwin_mbstate_t __mbs_wcsnrtombs;
	__darwin_mbstate_t __mbs_wcsrtombs;
	__darwin_mbstate_t __mbs_wctomb;
	pthread_lock_t __lock;
/* magic (Here up to the end is copied when duplicating locale_t's) */
	int64_t __magic;
/* flags */
	unsigned char __collate_load_error;
	unsigned char __collate_substitute_nontrivial;
	unsigned char _messages_using_locale;
	unsigned char _monetary_using_locale;
	unsigned char _numeric_using_locale;
	unsigned char _time_using_locale;
	unsigned char __mlocale_changed;
	unsigned char __nlocale_changed;
	unsigned char __numeric_fp_cvt;
/* collate */
	struct __xlocale_st_collate *__lc_collate;
/* ctype */
	struct __xlocale_st_runelocale *__lc_ctype;
/* messages */
	struct __xlocale_st_messages *__lc_messages;
/* monetary */
	struct __xlocale_st_monetary *__lc_monetary;
/* numeric */
	struct __xlocale_st_numeric *__lc_numeric;
	struct _xlocale *__lc_numeric_loc;
/* time */
	struct __xlocale_st_time *__lc_time;
/* localeconv */
	struct lconv __lc_localeconv;
};

#define DEFAULT_CURRENT_LOCALE(x)	\
				if ((x) == NULL) { \
					(x) = __current_locale(); \
				} else if ((x) == LC_GLOBAL_LOCALE) { \
					(x) = &__global_locale; \
				}

#define NORMALIZE_LOCALE(x)	if ((x) == NULL) { \
					(x) = _c_locale; \
				} else if ((x) == LC_GLOBAL_LOCALE) { \
					(x) = &__global_locale; \
				}

#define XL_LOCK(x)	LOCK((x)->__lock);
#define	XL_RELEASE(x)	if ((x) && (x)->__free_extra != XPERMANENT && OSAtomicDecrement32Barrier(&(x)->__refcount) == 0) { \
				if ((x)->__free_extra) \
					(*(x)->__free_extra)((x)); \
				free((x)); \
				(x) = NULL; \
			}
#define	XL_RETAIN(x)	if ((x) && (x)->__free_extra != XPERMANENT) { OSAtomicIncrement32Barrier(&(x)->__refcount); }
#define XL_UNLOCK(x)	UNLOCK((x)->__lock);

__attribute__((visibility("hidden")))
extern struct __xlocale_st_runelocale _DefaultRuneXLocale;

__attribute__((visibility("hidden")))
extern struct _xlocale	__global_locale;

__attribute__((visibility("hidden")))
extern pthread_key_t	__locale_key;

__BEGIN_DECLS

void	__ldpart_free_extra(struct __xlocale_st_ldpart *);
locale_t __numeric_ctype(locale_t);
void	__xlocale_init(void);

static inline __attribute__((always_inline)) locale_t
__current_locale(void)
{
#if TARGET_IPHONE_SIMULATOR
	/* <rdar://problem/14136256> Crash in _objc_inform for duplicate class name during simulator launch
	 * TODO: Remove after the simulator's libSystem is initialized properly.
	 */
	if (__locale_key == (pthread_key_t)-1) {
		return &__global_locale;
	}
#endif

	locale_t __locale = (locale_t)pthread_getspecific(__locale_key);
	return (__locale ? __locale : &__global_locale);
}

static inline __attribute__((always_inline)) locale_t
__locale_ptr(locale_t __loc)
{
	NORMALIZE_LOCALE(__loc);
	return __loc;
}

__END_DECLS

#endif /* _XLOCALE_PRIVATE_H_ */
Commit	Line	Data
3d9156a7	1	/*
34e8f829	2	* Copyright (c) 2005, 2008 Apple Inc. All rights reserved.
3d9156a7 A	3	*
	4	* @APPLE_LICENSE_HEADER_START@
	5	*
	6	* This file contains Original Code and/or Modifications of Original Code
	7	* as defined in and that are subject to the Apple Public Source License
	8	* Version 2.0 (the 'License'). You may not use this file except in
	9	* compliance with the License. Please obtain a copy of the License at
	10	* http://www.opensource.apple.com/apsl/ and read it before using this
	11	* file.
	12	*
	13	* The Original Code and all software distributed under the License are
	14	* distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
	15	* EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
	16	* INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
	17	* FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
	18	* Please see the License for the specific language governing rights and
	19	* limitations under the License.
	20	*
	21	* @APPLE_LICENSE_HEADER_END@
	22	*/
	23
	24	#ifndef _XLOCALE_PRIVATE_H_
	25	#define _XLOCALE_PRIVATE_H_
	26
	27	#include <sys/cdefs.h>
224c7076	28	#define __DARWIN_XLOCALE_PRIVATE
3d9156a7	29	#include <xlocale.h>
224c7076	30	#undef __DARWIN_XLOCALE_PRIVATE
3d9156a7 A	31	#include <stdlib.h>
	32	#include <locale.h>
	33	#include <libkern/OSAtomic.h>
	34	#include <pthread.h>
34e8f829	35	#include <pthread_spinlock.h>
224c7076	36	#include <limits.h>
3d9156a7 A	37	#include "setlocale.h"
	38	#include "collate.h"
	39	#include "runetype.h"
	40	#include "lmessages.h"
	41	#include "lmonetary.h"
	42	#include "lnumeric.h"
	43	#include "timelocal.h"
23e20b00	44	#include <TargetConditionals.h>
3d9156a7 A	45
	46	#undef MB_CUR_MAX
	47	#define MB_CUR_MAX (__current_locale()->__lc_ctype->__mb_cur_max)
	48	#undef MB_CUR_MAX_L
	49	#define MB_CUR_MAX_L(x) ((x)->__lc_ctype->__mb_cur_max)
	50
3d9156a7 A	51	typedef void (__free_extra_t)(void );
	52
	53	#define XPERMANENT ((__free_extra_t)-1)
	54	#define XMAGIC 0x786c6f63616c6530LL /* 'xlocale0' */
	55
	56	#define __STRUCT_COMMON \
	57	int32_t __refcount; \
	58	__free_extra_t __free_extra;
	59
	60	struct __xlocale_st_collate {
	61	__STRUCT_COMMON
	62	char __encoding[ENCODING_LEN + 1];
224c7076 A	63	struct __collate_st_info __info;
224c7076 A	64	struct __collate_st_subst *__substitute_table[COLL_WEIGHTS_MAX];
3d9156a7	65	struct __collate_st_chain_pri *__chain_pri_table;
224c7076 A	66	struct __collate_st_large_char_pri *__large_char_pri_table;
224c7076 A	67	struct __collate_st_char_pri __char_pri_table[UCHAR_MAX + 1];
3d9156a7 A	68	};
	69	struct __xlocale_st_runelocale {
	70	__STRUCT_COMMON
	71	char __ctype_encoding[ENCODING_LEN + 1];
	72	int __mb_cur_max;
1f2f436a	73	int __mb_sb_limit;
3d9156a7 A	74	size_t (__mbrtowc)(wchar_t __restrict, const char * __restrict,
	75	size_t, __darwin_mbstate_t * __restrict, struct _xlocale *);
	76	int (__mbsinit)(const __darwin_mbstate_t , struct _xlocale *);
	77	size_t (__mbsnrtowcs)(wchar_t __restrict, const char ** __restrict,
	78	size_t, size_t, __darwin_mbstate_t * __restrict, struct _xlocale *);
	79	size_t (__wcrtomb)(char __restrict, wchar_t,
	80	__darwin_mbstate_t * __restrict, struct _xlocale *);
	81	size_t (__wcsnrtombs)(char __restrict, const wchar_t ** __restrict,
	82	size_t, size_t, __darwin_mbstate_t * __restrict, struct _xlocale *);
	83	int __datasize;
	84	_RuneLocale _CurrentRuneLocale;
	85	};
	86	struct __xlocale_st_ldpart {
	87	__STRUCT_COMMON
	88	char *_locale_buf;
	89	};
	90	/*
	91	* the next four structures must have the first three fields of the same
	92	* as the _xlocale_st_ldpart structure above.
	93	*/
	94	struct __xlocale_st_messages {
	95	__STRUCT_COMMON
	96	char *_messages_locale_buf;
	97	struct lc_messages_T _messages_locale;
	98	};
	99	struct __xlocale_st_monetary {
	100	__STRUCT_COMMON
	101	char *_monetary_locale_buf;
	102	struct lc_monetary_T _monetary_locale;
	103	};
	104	struct __xlocale_st_numeric {
	105	__STRUCT_COMMON
	106	char *_numeric_locale_buf;
	107	struct lc_numeric_T _numeric_locale;
	108	};
	109	struct __xlocale_st_time {
	110	__STRUCT_COMMON
	111	char *_time_locale_buf;
	112	struct lc_time_T _time_locale;
	113	};
	114
3d9156a7	115	/* the extended locale structure */
224c7076 A	116	/* values for __numeric_fp_cvt */
	117	#define LC_NUMERIC_FP_UNINITIALIZED 0
	118	#define LC_NUMERIC_FP_SAME_LOCALE 1
	119	#define LC_NUMERIC_FP_USE_LOCALE 2
	120
3d9156a7 A	121	struct _xlocale {
3d9156a7 A	122	/* The item(s) before __magic are not copied when duplicating locale_t's */
224c7076	123	__STRUCT_COMMON /* only used for locale_t's in __lc_numeric_loc */
3d9156a7 A	124	/* 10 independent mbstate_t buffers! */
	125	__darwin_mbstate_t __mbs_mblen;
	126	__darwin_mbstate_t __mbs_mbrlen;
	127	__darwin_mbstate_t __mbs_mbrtowc;
	128	__darwin_mbstate_t __mbs_mbsnrtowcs;
	129	__darwin_mbstate_t __mbs_mbsrtowcs;
	130	__darwin_mbstate_t __mbs_mbtowc;
	131	__darwin_mbstate_t __mbs_wcrtomb;
	132	__darwin_mbstate_t __mbs_wcsnrtombs;
	133	__darwin_mbstate_t __mbs_wcsrtombs;
	134	__darwin_mbstate_t __mbs_wctomb;
34e8f829	135	pthread_lock_t __lock;
3d9156a7 A	136	/* magic (Here up to the end is copied when duplicating locale_t's) */
	137	int64_t __magic;
	138	/* flags */
	139	unsigned char __collate_load_error;
	140	unsigned char __collate_substitute_nontrivial;
	141	unsigned char _messages_using_locale;
	142	unsigned char _monetary_using_locale;
	143	unsigned char _numeric_using_locale;
	144	unsigned char _time_using_locale;
	145	unsigned char __mlocale_changed;
	146	unsigned char __nlocale_changed;
224c7076	147	unsigned char __numeric_fp_cvt;
3d9156a7 A	148	/* collate */
	149	struct __xlocale_st_collate *__lc_collate;
	150	/* ctype */
	151	struct __xlocale_st_runelocale *__lc_ctype;
	152	/* messages */
	153	struct __xlocale_st_messages *__lc_messages;
	154	/* monetary */
	155	struct __xlocale_st_monetary *__lc_monetary;
	156	/* numeric */
	157	struct __xlocale_st_numeric *__lc_numeric;
224c7076	158	struct _xlocale *__lc_numeric_loc;
3d9156a7 A	159	/* time */
	160	struct __xlocale_st_time *__lc_time;
	161	/* localeconv */
34e8f829	162	struct lconv __lc_localeconv;
3d9156a7 A	163	};
3d9156a7 A	164
6465356a A	165	#define DEFAULT_CURRENT_LOCALE(x) \
	166	if ((x) == NULL) { \
	167	(x) = __current_locale(); \
	168	} else if ((x) == LC_GLOBAL_LOCALE) { \
	169	(x) = &__global_locale; \
	170	}
	171
3d9156a7 A	172	#define NORMALIZE_LOCALE(x) if ((x) == NULL) { \
	173	(x) = _c_locale; \
	174	} else if ((x) == LC_GLOBAL_LOCALE) { \
	175	(x) = &__global_locale; \
	176	}
	177
34e8f829 A	178	#define XL_LOCK(x) LOCK((x)->__lock);
34e8f829 A	179	#define XL_RELEASE(x) if ((x) && (x)->__free_extra != XPERMANENT && OSAtomicDecrement32Barrier(&(x)->__refcount) == 0) { \
3d9156a7 A	180	if ((x)->__free_extra) \
	181	(*(x)->__free_extra)((x)); \
	182	free((x)); \
974e3884	183	(x) = NULL; \
3d9156a7 A	184	}
3d9156a7 A	185	#define XL_RETAIN(x) if ((x) && (x)->__free_extra != XPERMANENT) { OSAtomicIncrement32Barrier(&(x)->__refcount); }
34e8f829	186	#define XL_UNLOCK(x) UNLOCK((x)->__lock);
3d9156a7	187
23e20b00 A	188	__attribute__((visibility("hidden")))
	189	extern struct __xlocale_st_runelocale _DefaultRuneXLocale;
	190
	191	__attribute__((visibility("hidden")))
	192	extern struct _xlocale __global_locale;
	193
	194	__attribute__((visibility("hidden")))
	195	extern pthread_key_t __locale_key;
3d9156a7 A	196
	197	__BEGIN_DECLS
	198
	199	void __ldpart_free_extra(struct __xlocale_st_ldpart *);
224c7076	200	locale_t __numeric_ctype(locale_t);
3d9156a7 A	201	void __xlocale_init(void);
	202
	203	static inline __attribute__((always_inline)) locale_t
	204	__current_locale(void)
	205	{
23e20b00 A	206	#if TARGET_IPHONE_SIMULATOR
	207	/* <rdar://problem/14136256> Crash in _objc_inform for duplicate class name during simulator launch
	208	* TODO: Remove after the simulator's libSystem is initialized properly.
	209	*/
	210	if (__locale_key == (pthread_key_t)-1) {
	211	return &__global_locale;
	212	}
	213	#endif
	214
3d9156a7 A	215	locale_t __locale = (locale_t)pthread_getspecific(__locale_key);
	216	return (__locale ? __locale : &__global_locale);
	217	}
	218
	219	static inline __attribute__((always_inline)) locale_t
	220	__locale_ptr(locale_t __loc)
	221	{
34e8f829 A	222	NORMALIZE_LOCALE(__loc);
34e8f829 A	223	return __loc;
3d9156a7 A	224	}
	225
	226	__END_DECLS
	227
	228	#endif /* _XLOCALE_PRIVATE_H_ */