#include "c.h"
#include <langinfo.h>
#include <pthread.h>
#include <limits.h>

Include dependency graph for pg_localeconv_r.c:

Data Structures
struct	lconv_member_info

Macros
#define	LCONV_M(is_string, category, name, item) { is_string, category, offsetof(struct lconv, name) }

#define	LCONV_S(c, n, i) LCONV_M(true, c, n, i)

#define	LCONV_C(c, n, i) LCONV_M(false, c, n, i)

Functions
static char **	lconv_string_member (struct lconv *lconv, int i)

static char *	lconv_char_member (struct lconv *lconv, int i)

void	pg_localeconv_free (struct lconv *lconv)

static int	pg_localeconv_copy_members (struct lconv dst, struct lconv src, int category)

int	pg_localeconv_r (const char lc_monetary, const char lc_numeric, struct lconv *output)

Variables
static const struct lconv_member_info	table []

Macro Definition Documentation

◆ LCONV_C

#define LCONV_C	(	c,
		n,
		i
	)	LCONV_M(false, c, n, i)

Definition at line 52 of file pg_localeconv_r.c.

◆ LCONV_M

#define LCONV_M	(	is_string,
		category,
		name,
		item
	)	{ is_string, category, offsetof(struct lconv, name) }

Definition at line 48 of file pg_localeconv_r.c.

49 { is_string, category, offsetof(struct lconv, name) }

fb

static int fb(int x)

Definition preproc-init.c:92

name

const char * name

Definition wait_event_funcs.c:28

◆ LCONV_S

#define LCONV_S	(	c,
		n,
		i
	)	LCONV_M(true, c, n, i)

Definition at line 51 of file pg_localeconv_r.c.

Function Documentation

◆ lconv_char_member()

static char * lconv_char_member	(	struct lconv *	lconv,
		int	i
	)

inlinestatic

Definition at line 94 of file pg_localeconv_r.c.

{
    return (char *) lconv + table[i].offset;
}

References fb(), i, lconv_member_info::offset, and table.

Referenced by pg_localeconv_copy_members().

◆ lconv_string_member()

static char ** lconv_string_member	(	struct lconv *	lconv,
		int	i
	)

inlinestatic

Definition at line 88 of file pg_localeconv_r.c.

{
    return (char **) ((char *) lconv + table[i].offset);
}

References fb(), i, lconv_member_info::offset, and table.

Referenced by pg_localeconv_copy_members(), and pg_localeconv_free().

◆ pg_localeconv_copy_members()

static int pg_localeconv_copy_members	(	struct lconv *	dst,
		struct lconv *	src,
		int	category
	)

static

Definition at line 155 of file pg_localeconv_r.c.

{
    for (int i = 0; i < lengthof(table); ++i)
    {
        if (table[i].category != category)
            continue;
 
        if (table[i].is_string)
        {
            char       *string;
 
            string = *lconv_string_member(src, i);
            if (!(string = strdup(string)))
            {
                pg_localeconv_free(dst);
                errno = ENOMEM;
                return -1;
            }
            *lconv_string_member(dst, i) = string;
        }
        else
        {
            *lconv_char_member(dst, i) = *lconv_char_member(src, i);
        }
    }
 
    return 0;
}

References lconv_member_info::category, fb(), i, lconv_member_info::is_string, lconv_char_member(), lconv_string_member(), lengthof, pg_localeconv_free(), and table.

Referenced by pg_localeconv_r().

◆ pg_localeconv_free()

void pg_localeconv_free ( struct lconv * lconv )

Definition at line 104 of file pg_localeconv_r.c.

{
    for (int i = 0; i < lengthof(table); ++i)
        if (table[i].is_string)
            free(*lconv_string_member(lconv, i));
}

References fb(), free, i, lconv_member_info::is_string, lconv_string_member(), lengthof, and table.

Referenced by pg_localeconv_copy_members(), and PGLC_localeconv().

◆ pg_localeconv_r()

int pg_localeconv_r	(	const char *	lc_monetary,
		const char *	lc_numeric,
		struct lconv *	output
	)

Definition at line 231 of file pg_localeconv_r.c.

{
#ifdef WIN32
    wchar_t    *save_lc_ctype = NULL;
    wchar_t    *save_lc_monetary = NULL;
    wchar_t    *save_lc_numeric = NULL;
    int         save_config_thread_locale;
    int         result = -1;
 
    /* Put setlocale() into thread-local mode. */
    save_config_thread_locale = _configthreadlocale(_ENABLE_PER_THREAD_LOCALE);
 
    /*
     * Capture the current values as wide strings.  Otherwise, we might not be
     * able to restore them if their names contain non-ASCII characters and
     * the intermediate locale changes the expected encoding.  We don't want
     * to leave the caller in an unexpected state by failing to restore, or
     * crash the runtime library.
     */
    save_lc_ctype = _wsetlocale(LC_CTYPE, NULL);
    if (!save_lc_ctype || !(save_lc_ctype = wcsdup(save_lc_ctype)))
        goto exit;
    save_lc_monetary = _wsetlocale(LC_MONETARY, NULL);
    if (!save_lc_monetary || !(save_lc_monetary = wcsdup(save_lc_monetary)))
        goto exit;
    save_lc_numeric = _wsetlocale(LC_NUMERIC, NULL);
    if (!save_lc_numeric || !(save_lc_numeric = wcsdup(save_lc_numeric)))
        goto exit;
 
    memset(output, 0, sizeof(*output));
 
    /* Copy the LC_MONETARY members. */
    if (!setlocale(LC_ALL, lc_monetary))
        goto exit;
    result = pg_localeconv_copy_members(output, localeconv(), LC_MONETARY);
    if (result != 0)
        goto exit;
 
    /* Copy the LC_NUMERIC members. */
    if (!setlocale(LC_ALL, lc_numeric))
        goto exit;
    result = pg_localeconv_copy_members(output, localeconv(), LC_NUMERIC);
 
exit:
    /* Restore everything we changed. */
    if (save_lc_ctype)
    {
        _wsetlocale(LC_CTYPE, save_lc_ctype);
        free(save_lc_ctype);
    }
    if (save_lc_monetary)
    {
        _wsetlocale(LC_MONETARY, save_lc_monetary);
        free(save_lc_monetary);
    }
    if (save_lc_numeric)
    {
        _wsetlocale(LC_NUMERIC, save_lc_numeric);
        free(save_lc_numeric);
    }
    _configthreadlocale(save_config_thread_locale);
 
    return result;
 
#else                           /* !WIN32 */
    locale_t    monetary_locale;
    locale_t    numeric_locale;
    int         result;
 
    /*
     * All variations on Unix require locale_t objects for LC_MONETARY and
     * LC_NUMERIC.  We'll set all locale categories, so that we can don't have
     * to worry about POSIX's undefined behavior if LC_CTYPE's encoding
     * doesn't match.
     */
    errno = ENOENT;
    monetary_locale = newlocale(LC_ALL_MASK, lc_monetary, 0);
    if (monetary_locale == 0)
        return -1;
    numeric_locale = newlocale(LC_ALL_MASK, lc_numeric, 0);
    if (numeric_locale == 0)
    {
        freelocale(monetary_locale);
        return -1;
    }
 
    memset(output, 0, sizeof(*output));
#if defined(TRANSLATE_FROM_LANGINFO)
    /* Copy from non-standard nl_langinfo_l() extended items. */
    result = pg_localeconv_from_langinfo(output,
                                         monetary_locale,
                                         numeric_locale);
#elif defined(HAVE_LOCALECONV_L)
    /* Copy the LC_MONETARY members from a thread-safe lconv object. */
    result = pg_localeconv_copy_members(output,
                                        localeconv_l(monetary_locale),
                                        LC_MONETARY);
    if (result == 0)
    {
        /* Copy the LC_NUMERIC members from a thread-safe lconv object. */
        result = pg_localeconv_copy_members(output,
                                            localeconv_l(numeric_locale),
                                            LC_NUMERIC);
    }
#else
    /* We have nothing better than standard POSIX facilities. */
    {
        static pthread_mutex_t big_lock = PTHREAD_MUTEX_INITIALIZER;
        locale_t    save_locale;
 
        pthread_mutex_lock(&big_lock);
        /* Copy the LC_MONETARY members. */
        save_locale = uselocale(monetary_locale);
        result = pg_localeconv_copy_members(output,
                                            localeconv(),
                                            LC_MONETARY);
        if (result == 0)
        {
            /* Copy the LC_NUMERIC members. */
            uselocale(numeric_locale);
            result = pg_localeconv_copy_members(output,
                                                localeconv(),
                                                LC_NUMERIC);
        }
        pthread_mutex_unlock(&big_lock);
 
        uselocale(save_locale);
    }
#endif
 
    freelocale(monetary_locale);
    freelocale(numeric_locale);
 
    return result;
#endif                          /* !WIN32 */
}

References fb(), free, lc_monetary, lc_numeric, locale_t, output, pg_localeconv_copy_members(), PTHREAD_MUTEX_INITIALIZER, pthread_mutex_lock(), pthread_mutex_unlock(), and setlocale.

Referenced by PGLC_localeconv().

Variable Documentation

◆ table

const struct lconv_member_info table[]

static

Initial value:

= {
    
    LCONV_S(LC_NUMERIC, decimal_point, DECIMAL_POINT),
    LCONV_S(LC_NUMERIC, thousands_sep, THOUSANDS_SEP),
    LCONV_S(LC_NUMERIC, grouping, GROUPING),
    LCONV_S(LC_MONETARY, int_curr_symbol, INT_CURR_SYMBOL),
    LCONV_S(LC_MONETARY, currency_symbol, CURRENCY_SYMBOL),
    LCONV_S(LC_MONETARY, mon_decimal_point, MON_DECIMAL_POINT),
    LCONV_S(LC_MONETARY, mon_thousands_sep, MON_THOUSANDS_SEP),
    LCONV_S(LC_MONETARY, mon_grouping, MON_GROUPING),
    LCONV_S(LC_MONETARY, positive_sign, POSITIVE_SIGN),
    LCONV_S(LC_MONETARY, negative_sign, NEGATIVE_SIGN),
 
    
    LCONV_C(LC_MONETARY, int_frac_digits, INT_FRAC_DIGITS),
    LCONV_C(LC_MONETARY, frac_digits, FRAC_DIGITS),
    LCONV_C(LC_MONETARY, p_cs_precedes, P_CS_PRECEDES),
    LCONV_C(LC_MONETARY, p_sep_by_space, P_SEP_BY_SPACE),
    LCONV_C(LC_MONETARY, n_cs_precedes, N_CS_PRECEDES),
    LCONV_C(LC_MONETARY, n_sep_by_space, N_SEP_BY_SPACE),
    LCONV_C(LC_MONETARY, p_sign_posn, P_SIGN_POSN),
    LCONV_C(LC_MONETARY, n_sign_posn, N_SIGN_POSN),
}

Definition at line 63 of file pg_localeconv_r.c.

                                                {
    /* String fields. */
    LCONV_S(LC_NUMERIC, decimal_point, DECIMAL_POINT),
    LCONV_S(LC_NUMERIC, thousands_sep, THOUSANDS_SEP),
    LCONV_S(LC_NUMERIC, grouping, GROUPING),
    LCONV_S(LC_MONETARY, int_curr_symbol, INT_CURR_SYMBOL),
    LCONV_S(LC_MONETARY, currency_symbol, CURRENCY_SYMBOL),
    LCONV_S(LC_MONETARY, mon_decimal_point, MON_DECIMAL_POINT),
    LCONV_S(LC_MONETARY, mon_thousands_sep, MON_THOUSANDS_SEP),
    LCONV_S(LC_MONETARY, mon_grouping, MON_GROUPING),
    LCONV_S(LC_MONETARY, positive_sign, POSITIVE_SIGN),
    LCONV_S(LC_MONETARY, negative_sign, NEGATIVE_SIGN),
 
    /* Character fields. */
    LCONV_C(LC_MONETARY, int_frac_digits, INT_FRAC_DIGITS),
    LCONV_C(LC_MONETARY, frac_digits, FRAC_DIGITS),
    LCONV_C(LC_MONETARY, p_cs_precedes, P_CS_PRECEDES),
    LCONV_C(LC_MONETARY, p_sep_by_space, P_SEP_BY_SPACE),
    LCONV_C(LC_MONETARY, n_cs_precedes, N_CS_PRECEDES),
    LCONV_C(LC_MONETARY, n_sep_by_space, N_SEP_BY_SPACE),
    LCONV_C(LC_MONETARY, p_sign_posn, P_SIGN_POSN),
    LCONV_C(LC_MONETARY, n_sign_posn, N_SIGN_POSN),
};

Referenced by afterTriggerDeleteHeadEventChunk(), AfterTriggerFreeQuery(), appendQualifiedRelation(), before_stmt_triggers_fired(), byword(), cancel_prior_stmt_triggers(), check_selective_binary_conversion(), cluster_one_database(), convert_int_from_base_unit(), convert_real_from_base_unit(), convert_to_base_unit(), create_foreign_modify(), deparseRelation(), fileGetOptions(), get_batch_size_option(), get_table_relkind(), GetAfterTriggersStoreSlot(), GetAfterTriggersTableData(), initCreateTables(), initialize_worker_spi(), initPopulateTable(), lconv_char_member(), lconv_string_member(), mbbisearch(), pg_localeconv_copy_members(), pg_localeconv_free(), postgresAcquireSampleRowsFunc(), postgresAnalyzeForeignTable(), postgresBeginDirectModify(), postgresBeginForeignScan(), postgresExecForeignTruncate(), postgresGetAnalyzeInfoForForeignTable(), postgresIsForeignRelUpdatable(), prepare_vacuum_command(), run_vacuum_command(), splitTableColumnsSpec(), TransitionTableAddTuple(), vacuumlo(), and worker_spi_main().

Data Structures

Macros

Functions

Variables