1.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000
1.2 +++ b/os/ossrv/genericopenlibs/openenvcore/libc/src/setlocale.cpp Fri Jun 15 03:10:57 2012 +0200
1.3 @@ -0,0 +1,413 @@
1.4 +/*
1.5 +* Copyright (c) 2006-2009 Nokia Corporation and/or its subsidiary(-ies).
1.6 +* All rights reserved.
1.7 +* This component and the accompanying materials are made available
1.8 +* under the terms of "Eclipse Public License v1.0"
1.9 +* which accompanies this distribution, and is available
1.10 +* at the URL "http://www.eclipse.org/legal/epl-v10.html".
1.11 +*
1.12 +* Initial Contributors:
1.13 +* Nokia Corporation - initial contribution.
1.14 +*
1.15 +* Contributors:
1.16 +*
1.17 +* Description: Contains the source for setting the locale
1.18 + *
1.19 + *
1.20 +*/
1.21 +
1.22 +
1.23 +#include <errno.h>
1.24 +#include <locale.h>
1.25 +#include <stdlib.h>
1.26 +#include <string.h>
1.27 +#include <sys/cdefs.h>
1.28 +#include <_ansi.h>
1.29 +#include "lmonetary.h"
1.30 +#include "lnumeric.h"
1.31 +#include "timelocal.h"
1.32 +#include "localeinfo.h"
1.33 +
1.34 +#if (defined(__SYMBIAN32__) && (defined(__WINSCW__) || defined(__WINS__)))
1.35 +#include "libc_wsd_defs.h"
1.36 +#endif
1.37 +
1.38 +#define LOCALE_LENGTH 30
1.39 +extern int _time_using_locale;
1.40 +extern int _numeric_using_locale;
1.41 +extern int _monetary_using_locale;
1.42 +extern int __nlocale_changed;
1.43 +extern int __mlocale_changed;
1.44 +#ifdef SYMBIAN_OE_ENHANCED_LOCALE_SUPPORT
1.45 +extern unsigned char __clocale_set;
1.46 +extern unsigned char __applocale_changed;
1.47 +#endif
1.48 +
1.49 +#ifdef EMULATOR
1.50 +int *GET_WSD_VAR_NAME(_monetary_using_locale, g)();
1.51 +int *GET_WSD_VAR_NAME(_numeric_using_locale, g)();
1.52 +int *GET_WSD_VAR_NAME(_time_using_locale, g)();
1.53 +GET_GLOBAL_VAR_FROM_TLS(__mlocale_changed, int)
1.54 +GET_GLOBAL_VAR_FROM_TLS(__nlocale_changed, int)
1.55 +#ifdef SYMBIAN_OE_ENHANCED_LOCALE_SUPPORT
1.56 +GET_GLOBAL_VAR_FROM_TLS(__clocale_set, unsigned char)
1.57 +GET_GLOBAL_VAR_FROM_TLS(__applocale_changed, unsigned char)
1.58 +#endif
1.59 +
1.60 +#define _monetary_using_locale (*GET_WSD_VAR_NAME(_monetary_using_locale, g)())
1.61 +#define _numeric_using_locale (*GET_WSD_VAR_NAME(_numeric_using_locale, g)())
1.62 +#define _time_using_locale (*GET_WSD_VAR_NAME(_time_using_locale, g)())
1.63 +#define __mlocale_changed (*GET_WSD_VAR_NAME(__mlocale_changed, g)())
1.64 +#define __nlocale_changed (*GET_WSD_VAR_NAME(__nlocale_changed, g)())
1.65 +#ifdef SYMBIAN_OE_ENHANCED_LOCALE_SUPPORT
1.66 +#define __clocale_set (*GET_WSD_VAR_NAME(__clocale_set, g)())
1.67 +#define __applocale_changed (*GET_WSD_VAR_NAME(__applocale_changed, g)())
1.68 +#endif
1.69 +#endif //EMULATOR
1.70 +
1.71 +__BEGIN_DECLS
1.72 +#ifndef EMULATOR
1.73 +char LC_CTYPE_LocaleName[LOCALE_LENGTH] = {'\0'};
1.74 +char LC_COLLATE_LocaleName[LOCALE_LENGTH] = {'\0'};
1.75 +char LC_NUMERIC_LocaleName[LOCALE_LENGTH] = {'\0'};
1.76 +char LC_MONETARY_LocaleName[LOCALE_LENGTH] = {'\0'};
1.77 +char LC_TIME_LocaleName[LOCALE_LENGTH] ={'\0'};
1.78 +char LC_ALL_LocaleName[LOCALE_LENGTH] = {'\0'};
1.79 +
1.80 +#else //EMULATOR
1.81 +
1.82 +GET_GLOBAL_ARRAY_FROM_TLS(LC_CTYPE_LocaleName, char)
1.83 +GET_GLOBAL_ARRAY_FROM_TLS(LC_COLLATE_LocaleName, char)
1.84 +GET_GLOBAL_ARRAY_FROM_TLS(LC_NUMERIC_LocaleName, char)
1.85 +GET_GLOBAL_ARRAY_FROM_TLS(LC_MONETARY_LocaleName, char)
1.86 +GET_GLOBAL_ARRAY_FROM_TLS(LC_TIME_LocaleName, char)
1.87 +GET_GLOBAL_ARRAY_FROM_TLS(LC_ALL_LocaleName, char)
1.88 +
1.89 +#define LC_CTYPE_LocaleName (GET_WSD_VAR_NAME(LC_CTYPE_LocaleName, g)())
1.90 +#define LC_COLLATE_LocaleName (GET_WSD_VAR_NAME(LC_COLLATE_LocaleName, g)())
1.91 +#define LC_NUMERIC_LocaleName (GET_WSD_VAR_NAME(LC_NUMERIC_LocaleName, g)())
1.92 +#define LC_MONETARY_LocaleName (GET_WSD_VAR_NAME(LC_MONETARY_LocaleName, g)())
1.93 +#define LC_TIME_LocaleName (GET_WSD_VAR_NAME(LC_TIME_LocaleName, g)())
1.94 +#define LC_ALL_LocaleName (GET_WSD_VAR_NAME(LC_ALL_LocaleName, g)())
1.95 +#endif //EMULATOR
1.96 +
1.97 +
1.98 +__END_DECLS
1.99 +
1.100 +extern "C" {
1.101 +
1.102 +EXPORT_C char * setlocale(int category, const char* locale)
1.103 +{
1.104 + CLocale* loc = CLocale::GetInstance();
1.105 +
1.106 + //Query the current locale
1.107 + if(NULL == locale)
1.108 + {
1.109 + char* ret = NULL;
1.110 + switch(category)
1.111 + {
1.112 + case LC_CTYPE: if(!*LC_CTYPE_LocaleName)
1.113 + {
1.114 + LC_CTYPE_LocaleName[0] = 'C';
1.115 + LC_CTYPE_LocaleName[1] = '\0';
1.116 + }
1.117 + ret = (char*) LC_CTYPE_LocaleName;
1.118 + break;
1.119 +
1.120 + case LC_COLLATE:if(!*LC_COLLATE_LocaleName)
1.121 + {
1.122 + LC_COLLATE_LocaleName[0] = 'C';
1.123 + LC_COLLATE_LocaleName[1] = '\0';
1.124 + }
1.125 + ret = (char*) LC_COLLATE_LocaleName;
1.126 + break;
1.127 +
1.128 + case LC_TIME: if(!*LC_TIME_LocaleName)
1.129 + {
1.130 + LC_TIME_LocaleName[0] = 'C';
1.131 + LC_TIME_LocaleName[1] = '\0';
1.132 + _time_using_locale = 0;
1.133 + }
1.134 + ret = (char*) LC_TIME_LocaleName;
1.135 + break;
1.136 +
1.137 + case LC_NUMERIC:if(!*LC_NUMERIC_LocaleName)
1.138 + {
1.139 + LC_NUMERIC_LocaleName[0] = 'C';
1.140 + LC_NUMERIC_LocaleName[1] = '\0';
1.141 + _numeric_using_locale = 0;
1.142 + }
1.143 + ret = (char*) LC_NUMERIC_LocaleName;
1.144 + break;
1.145 +
1.146 + case LC_MONETARY:if(!*LC_MONETARY_LocaleName)
1.147 + {
1.148 + LC_MONETARY_LocaleName[0] = 'C';
1.149 + LC_MONETARY_LocaleName[1] = '\0';
1.150 + _monetary_using_locale = 0;
1.151 + }
1.152 + ret = (char*) LC_MONETARY_LocaleName;
1.153 + break;
1.154 +
1.155 + case LC_MESSAGES:
1.156 + break;
1.157 +
1.158 + case LC_ALL :if(!*LC_ALL_LocaleName)
1.159 + {
1.160 + _time_using_locale = 0;
1.161 + _numeric_using_locale = 0;
1.162 + _monetary_using_locale = 0;
1.163 +
1.164 + LC_CTYPE_LocaleName[0] = 'C';
1.165 + LC_CTYPE_LocaleName[1] = '\0';
1.166 + LC_COLLATE_LocaleName[0] = 'C';
1.167 + LC_COLLATE_LocaleName[1] = '\0';
1.168 + LC_TIME_LocaleName[0] = 'C';
1.169 + LC_TIME_LocaleName[1] = '\0';
1.170 + LC_NUMERIC_LocaleName[0] = 'C';
1.171 + LC_NUMERIC_LocaleName[1] = '\0';
1.172 + LC_MONETARY_LocaleName[0] = 'C';
1.173 + LC_MONETARY_LocaleName[1] = '\0';
1.174 + LC_ALL_LocaleName[0] = 'C';
1.175 + LC_ALL_LocaleName[1] = '\0';
1.176 + }
1.177 + ret = (char*) LC_ALL_LocaleName;
1.178 + break;
1.179 + default:
1.180 + errno = EINVAL;
1.181 + return (NULL);
1.182 + }
1.183 + return ret;
1.184 + }
1.185 +
1.186 + //If locale is "" set each category(LC_CTYPE, LC_COLLATE, LC_NUMERIC, LC_TIME, LC_MONETARY) to C locale
1.187 + if(strcmp(locale, "") == 0 )
1.188 + {
1.189 + _time_using_locale = 0;
1.190 + _numeric_using_locale = 0;
1.191 + _monetary_using_locale = 0;
1.192 + __nlocale_changed = 1;
1.193 + __mlocale_changed = 1;
1.194 +#ifdef SYMBIAN_OE_ENHANCED_LOCALE_SUPPORT
1.195 + __clocale_set = 1;
1.196 + __applocale_changed = 1;
1.197 +#endif
1.198 +
1.199 + LC_CTYPE_LocaleName[0] = 'C';
1.200 + LC_CTYPE_LocaleName[1] = '\0';
1.201 + LC_COLLATE_LocaleName[0] = 'C';
1.202 + LC_COLLATE_LocaleName[1] = '\0';
1.203 + LC_TIME_LocaleName[0] = 'C';
1.204 + LC_TIME_LocaleName[1] = '\0';
1.205 + LC_NUMERIC_LocaleName[0] = 'C';
1.206 + LC_NUMERIC_LocaleName[1] = '\0';
1.207 + LC_MONETARY_LocaleName[0] = 'C';
1.208 + LC_MONETARY_LocaleName[1] = '\0';
1.209 + LC_ALL_LocaleName[0] = 'C';
1.210 + LC_ALL_LocaleName[1] = '\0';
1.211 +
1.212 + return "C";
1.213 + }
1.214 +
1.215 + if (strcmp(locale, "C") == 0 || strcmp(locale, "POSIX") == 0)
1.216 + {
1.217 + if(LC_ALL == category)
1.218 + {
1.219 + _time_using_locale = 0;
1.220 + _numeric_using_locale = 0;
1.221 + _monetary_using_locale = 0;
1.222 + __nlocale_changed = 1;
1.223 + __mlocale_changed = 1;
1.224 +#ifdef SYMBIAN_OE_ENHANCED_LOCALE_SUPPORT
1.225 + __clocale_set = 1;
1.226 + __applocale_changed = 1;
1.227 +#endif
1.228 +
1.229 + strcpy((char*) LC_ALL_LocaleName, locale);
1.230 + LC_ALL_LocaleName[strlen(locale)] = '\0';
1.231 + strcpy((char*) LC_CTYPE_LocaleName, locale);
1.232 + LC_CTYPE_LocaleName[strlen(locale)] = '\0';
1.233 + strcpy((char*) LC_COLLATE_LocaleName, locale);
1.234 + LC_COLLATE_LocaleName[strlen(locale)] = '\0';
1.235 + strcpy((char*) LC_NUMERIC_LocaleName, locale);
1.236 + LC_NUMERIC_LocaleName[strlen(locale)] = '\0';
1.237 + strcpy((char*) LC_MONETARY_LocaleName, locale);
1.238 + LC_MONETARY_LocaleName[strlen(locale)] = '\0';
1.239 + strcpy((char*) LC_TIME_LocaleName, locale);
1.240 + LC_TIME_LocaleName[strlen(locale)] = '\0';
1.241 + return (char*) locale;
1.242 + }
1.243 +
1.244 + switch(category)
1.245 + {
1.246 + case LC_CTYPE: strcpy((char*) LC_CTYPE_LocaleName, locale);
1.247 + LC_CTYPE_LocaleName[strlen(locale)] = '\0';
1.248 + break;
1.249 +
1.250 + case LC_COLLATE: strcpy((char*) LC_COLLATE_LocaleName, locale);
1.251 + LC_COLLATE_LocaleName[strlen(locale)] = '\0';
1.252 + break;
1.253 +
1.254 + case LC_TIME: _time_using_locale = 0;
1.255 + strcpy((char*) LC_TIME_LocaleName, locale);
1.256 + LC_TIME_LocaleName[strlen(locale)] = '\0';
1.257 + break;
1.258 +
1.259 + case LC_NUMERIC: _numeric_using_locale = 0;
1.260 + __nlocale_changed = 1;
1.261 +#ifdef SYMBIAN_OE_ENHANCED_LOCALE_SUPPORT
1.262 + __applocale_changed = 1;
1.263 +#endif
1.264 + strcpy((char*) LC_NUMERIC_LocaleName, locale);
1.265 + LC_NUMERIC_LocaleName[strlen(locale)] = '\0';
1.266 + break;
1.267 +
1.268 + case LC_MONETARY: _monetary_using_locale = 0;
1.269 + __mlocale_changed = 1;
1.270 +#ifdef SYMBIAN_OE_ENHANCED_LOCALE_SUPPORT
1.271 + __applocale_changed = 1;
1.272 +#endif
1.273 + strcpy((char*) LC_MONETARY_LocaleName, locale);
1.274 + LC_MONETARY_LocaleName[strlen(locale)] = '\0';
1.275 + break;
1.276 +
1.277 + case LC_MESSAGES:
1.278 + default:
1.279 + errno = EINVAL;
1.280 + return (NULL);
1.281 + }
1.282 + return ((char*) locale);
1.283 + }
1.284 +
1.285 + //If locale is other than C or POSIX
1.286 + TPtrC8 src((const TUint8*)locale);
1.287 + TBuf16 <LOCALE_LENGTH> localeString;
1.288 + localeString.Copy(src);
1.289 + TText* retVal = loc->SetLocale(localeString);
1.290 + if(NULL == retVal)
1.291 + {
1.292 + return NULL;
1.293 + }
1.294 +
1.295 + if(LC_ALL == category)
1.296 + {
1.297 + TInt retVal =0;
1.298 +
1.299 + if( __numeric_load_locale(locale) == -1)
1.300 + {
1.301 + retVal = -1;
1.302 + }
1.303 + if(__monetary_load_locale(locale) == -1)
1.304 + {
1.305 + retVal = -1;
1.306 + }
1.307 + if (__time_load_locale(locale) == -1)
1.308 + {
1.309 + retVal = -1;
1.310 + }
1.311 +
1.312 + if(!retVal)
1.313 + {
1.314 + strcpy((char*) LC_ALL_LocaleName, locale);
1.315 + LC_ALL_LocaleName[strlen(locale)] = '\0';
1.316 + strcpy((char*) LC_CTYPE_LocaleName, locale);
1.317 + LC_CTYPE_LocaleName[strlen(locale)] = '\0';
1.318 + strcpy((char*) LC_COLLATE_LocaleName, locale);
1.319 + LC_COLLATE_LocaleName[strlen(locale)] = '\0';
1.320 + strcpy((char*) LC_NUMERIC_LocaleName, locale);
1.321 + LC_NUMERIC_LocaleName[strlen(locale)] = '\0';
1.322 + strcpy((char*) LC_MONETARY_LocaleName, locale);
1.323 + LC_MONETARY_LocaleName[strlen(locale)] = '\0';
1.324 + strcpy((char*) LC_TIME_LocaleName, locale);
1.325 + LC_TIME_LocaleName[strlen(locale)] = '\0';
1.326 + return (char*) locale;
1.327 + }
1.328 + else
1.329 + {
1.330 + return NULL;
1.331 + }
1.332 + }
1.333 +
1.334 + switch (category)
1.335 + {
1.336 + case LC_CTYPE: strcpy((char*) LC_CTYPE_LocaleName, locale);
1.337 + LC_CTYPE_LocaleName[strlen(locale)] = '\0';
1.338 + break;
1.339 +
1.340 + case LC_COLLATE: strcpy((char*) LC_COLLATE_LocaleName, locale);
1.341 + LC_COLLATE_LocaleName[strlen(locale)] = '\0';
1.342 + break;
1.343 +
1.344 + case LC_TIME: if(!__time_load_locale(locale))
1.345 + {
1.346 + strcpy((char*) LC_TIME_LocaleName, locale);
1.347 + LC_TIME_LocaleName[strlen(locale)] = '\0';
1.348 + }
1.349 + else
1.350 + {
1.351 + return NULL;
1.352 + }
1.353 + break;
1.354 +
1.355 + case LC_NUMERIC: if(!__numeric_load_locale(locale))
1.356 + {
1.357 + strcpy((char*) LC_NUMERIC_LocaleName, locale);
1.358 + LC_NUMERIC_LocaleName[strlen(locale)] = '\0';
1.359 + }
1.360 + else
1.361 + {
1.362 + return NULL;
1.363 + }
1.364 + break;
1.365 +
1.366 + case LC_MONETARY: if(!__monetary_load_locale(locale))
1.367 + {
1.368 + strcpy((char*) LC_MONETARY_LocaleName, locale);
1.369 + LC_MONETARY_LocaleName[strlen(locale)] = '\0';
1.370 + }
1.371 + else
1.372 + {
1.373 + return NULL;
1.374 + }
1.375 + break;
1.376 +
1.377 + case LC_MESSAGES:
1.378 + default:
1.379 + errno = EINVAL;
1.380 + return (NULL);
1.381 + }
1.382 + return ((char*) locale);
1.383 +}
1.384 +
1.385 +
1.386 +EXPORT_C wchar_t* wsetlocale(int category, const wchar_t* locale)
1.387 +{
1.388 + char LocaleName[LOCALE_LENGTH];
1.389 + wchar_t *wideLocaleName = new wchar_t[LOCALE_LENGTH + 1];
1.390 + char *result = NULL;
1.391 +
1.392 + if (locale != NULL)
1.393 + {
1.394 + if ((size_t)-1 != (wcstombs((char*)LocaleName, locale, LOCALE_LENGTH*sizeof(wchar_t))))
1.395 + {
1.396 + result = setlocale(category, LocaleName);
1.397 + }
1.398 + }
1.399 + else
1.400 + {
1.401 + result = setlocale(category, NULL);
1.402 + }
1.403 +
1.404 + if (result != NULL)
1.405 + {
1.406 + if ((size_t)-1 != (mbstowcs(wideLocaleName, result, LOCALE_LENGTH*sizeof(wchar_t))))
1.407 + {
1.408 + return wideLocaleName;
1.409 + }
1.410 + }
1.411 +
1.412 + delete []wideLocaleName;
1.413 + return NULL;
1.414 +}
1.415 +
1.416 +} //extern "C"