/*- * Copyright (c) 2001 Alexey Zelkin * All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF * SUCH DAMAGE. * * $FreeBSD: src/lib/libc/locale/nl_langinfo.c,v 1.13.2.3 2002/03/12 17:23:24 phantom Exp $ * $DragonFly: src/lib/libcr/locale/Attic/nl_langinfo.c,v 1.2 2003/06/17 04:26:44 dillon Exp $ */ #include #include #include #include #include #include "../stdtime/timelocal.h" #include "lnumeric.h" #include "lmonetary.h" #include "lmessages.h" #define TRANSITION_PERIOD_HACK #define _REL(BASE) ((int)item-BASE) char * nl_langinfo(nl_item item) { char *ret, *s, *cs; static char *csym = NULL; #ifdef TRANSITION_PERIOD_HACK static char *cset = NULL; #endif /* TRANSITION_PERIOD_HACK */ switch (item) { case CODESET: ret = ""; if ((s = setlocale(LC_CTYPE, NULL)) != NULL) { if ((cs = strchr(s, '.')) != NULL) { ret = cs + 1; #ifdef TRANSITION_PERIOD_HACK if (strncmp(ret, "ISO_", 4) == 0) { int slen = strlen(ret); if ((cset = reallocf(cset, slen)) != NULL) { strcpy(cset, "ISO"); strcat(cset, ret + 4); ret = cset; } else ret = ""; } else if (strcmp(ret, "EUC") == 0) { if (strncmp(s, "ja_JP", 5) == 0) ret = "eucJP"; else if (strncmp(s, "ko_KR", 5) == 0) ret = "eucKR"; else if (strncmp(s, "zh_CN", 5) == 0) ret = "eucCN"; } else if (strcmp(ret, "ASCII") == 0) ret = "US-ASCII"; #endif /* TRANSITION_PERIOD_HACK */ } else if (strcmp(s, "C") == 0 || strcmp(s, "POSIX") == 0 #ifdef TRANSITION_PERIOD_HACK || strstr(s, "ASCII") != NULL #endif /* TRANSITION_PERIOD_HACK */ ) ret = "US-ASCII"; } break; case D_T_FMT: ret = (char *) __get_current_time_locale()->c_fmt; break; case D_FMT: ret = (char *) __get_current_time_locale()->x_fmt; break; case T_FMT: ret = (char *) __get_current_time_locale()->X_fmt; break; case T_FMT_AMPM: ret = (char *) __get_current_time_locale()->ampm_fmt; break; case AM_STR: ret = (char *) __get_current_time_locale()->am; break; case PM_STR: ret = (char *) __get_current_time_locale()->pm; break; case DAY_1: case DAY_2: case DAY_3: case DAY_4: case DAY_5: case DAY_6: case DAY_7: ret = (char*) __get_current_time_locale()->weekday[_REL(DAY_1)]; break; case ABDAY_1: case ABDAY_2: case ABDAY_3: case ABDAY_4: case ABDAY_5: case ABDAY_6: case ABDAY_7: ret = (char*) __get_current_time_locale()->wday[_REL(ABDAY_1)]; break; case MON_1: case MON_2: case MON_3: case MON_4: case MON_5: case MON_6: case MON_7: case MON_8: case MON_9: case MON_10: case MON_11: case MON_12: ret = (char*) __get_current_time_locale()->month[_REL(MON_1)]; break; case ABMON_1: case ABMON_2: case ABMON_3: case ABMON_4: case ABMON_5: case ABMON_6: case ABMON_7: case ABMON_8: case ABMON_9: case ABMON_10: case ABMON_11: case ABMON_12: ret = (char*) __get_current_time_locale()->mon[_REL(ABMON_1)]; break; case ERA: /* XXX: need to be implemented */ ret = ""; break; case ERA_D_FMT: /* XXX: need to be implemented */ ret = ""; break; case ERA_D_T_FMT: /* XXX: need to be implemented */ ret = ""; break; case ERA_T_FMT: /* XXX: need to be implemented */ ret = ""; break; case ALT_DIGITS: /* XXX: need to be implemented */ ret = ""; break; case RADIXCHAR: ret = (char*) __get_current_numeric_locale()->decimal_point; break; case THOUSEP: ret = (char*) __get_current_numeric_locale()->thousands_sep; break; case YESEXPR: ret = (char*) __get_current_messages_locale()->yesexpr; break; case NOEXPR: ret = (char*) __get_current_messages_locale()->noexpr; break; /* * All items marked with LEGACY are available, but not recomended * by SUSv2 to be used in portable applications since they're subject * to remove in future specification editions */ case YESSTR: /* LEGACY */ ret = (char*) __get_current_messages_locale()->yesstr; break; case NOSTR: /* LEGACY */ ret = (char*) __get_current_messages_locale()->nostr; break; case CRNCYSTR: ret = ""; cs = (char*) __get_current_monetary_locale()->currency_symbol; if (*cs != '\0') { char pos = localeconv()->p_cs_precedes; if (pos == localeconv()->n_cs_precedes) { char psn = '\0'; if (pos == CHAR_MAX) { if (strcmp(cs, __get_current_monetary_locale()->mon_decimal_point) == 0) psn = '.'; } else psn = pos ? '-' : '+'; if (psn != '\0') { int clen = strlen(cs); if ((csym = reallocf(csym, clen + 2)) != NULL) { *csym = psn; strcpy(csym + 1, cs); ret = csym; } } } } break; case D_MD_ORDER: /* local extension */ ret = (char *) __get_current_time_locale()->md_order; break; default: ret = ""; } return (ret); }