fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
Files
a48321cf39300d34d28811451928063b7c12e8fc
harbour-core/harbour/source/rtl/lang.c
Viktor Szakats 0ea981e9c4 2009-06-03 12:20 UTC+0200 Viktor Szakats (harbour.01 syenar.hu) 
* tests/langapi.prg
  * tests/rto_get.prg
  * tests/lnlenli2.prg
  * tests/fortest.prg
  * tests/memory.prg
  * tests/rto_tb.prg
  * tests/statinit.prg
  * tests/memfile.prg
  * tests/vec1.prg
  * tests/lnlenli1.prg
  * doc/cmdline.txt
  * doc/en-EN/hb_date.txt
  * doc/en-EN/terminal.txt
  * doc/en-EN/hb_apiln.txt
  * doc/en-EN/hb_compa.txt
  * doc/howtosvn.txt
  * INSTALL
  * bin/postinst.cmd
  * bin/postinst.bat
  * include/hbvmpub.h
  * include/vm.api
  * include/extend.api
  * include/item.api
  * include/hbapilng.h
  * include/rdd.api
  * include/gt.api
  * include/hbundoc.api
  * include/error.api
  * include/hbsetup.ch
  * include/hblang.ch
  * include/hbsetup.h
  * include/hbapigt.h
  * include/hbmemory.ch
  * include/clipdefs.h
  * include/hboo.ch
  * include/hbver.ch
  * include/hbzlib.h
  * include/fm.api
  * include/hbdate.h
  * include/extend.h
  * ChangeLog
  * harbour.spec
  * make_gnu.bat
  * make_gnu.sh
  * contrib/hbmysql/mysqlold.c
  * contrib/hbct/charmix.c
  * contrib/hbct/charevod.c
  * contrib/hbct/ctchksum.c
  * contrib/hbct/pos1.c
  * contrib/hbct/ctmisc.prg
  * contrib/hbct/ctcrypt.c
  * contrib/hbct/getinfo.prg
  * contrib/hbct/ctdummy.prg
  * contrib/hbct/readme.txt
  * contrib/hbodbc/odbcold.c
  * contrib/hbodbc/browodbc.prg
  * contrib/hbodbc/odbc.c
  * contrib/xhb/datesxhb.c
  * contrib/xhb/xhbat.c
  * contrib/xhb/xhbver.prg
  * contrib/xhb/xhbcomp.prg
  * contrib/hbziparc/hbziparc.prg
  * contrib/hbnf/iamidle.c
  * contrib/hbnf/fttext.c
  * contrib/hbnf/setkeys.c
  * contrib/hbnf/ftisprn.c
  * contrib/hbnf/setlastk.c
  * contrib/hbcurl/hbcurl.c
  * contrib/hbcurl/hbcurl.ch
  * contrib/hbcurl/hbcurlm.c
  * contrib/rddads/adsextrn.ch
  * contrib/rddads/adsmgmnt.c
  * contrib/hbmisc/strfmt.c
  * contrib/hbmisc/numtxthu.prg
  * contrib/hbmisc/doc/en/ht_str.txt
  * contrib/hbtip/utils.c
  * contrib/hbwin/win_reg.prg
  * contrib/hbwin/legacyc.c
  * contrib/hbwin/win_misc.c
  * contrib/hbwin/wapi_winbase.c
  * contrib/hbwin/wapi_winuser.c
  * contrib/hbwin/hbwinole.h
  * contrib/hbwin/hbwin.ch
  * contrib/hbwin/tests/testdll.prg
  * contrib/hbwin/tests/testole.prg
  * contrib/hbwin/win_regc.c
  * contrib/hbvpdf/hbvpsup.prg
  * contrib/hbssl/sslsess.c
  * contrib/hbssl/hbssl.h
  * contrib/hbssl/sslctx.c
  * contrib/hbssl/tests/test.prg
  * contrib/hbssl/ssl.c
  * contrib/hbssl/hbssl.ch
  * contrib/hbssl/sslciph.c
  * contrib/hbssl/sslrand.c
  * contrib/hbcrypt/tests/testsha2.prg
  * contrib/hbcrypt/hbsha2.c
  * contrib/hbcrypt/hbsha2hm.c
  * source/lang/msghuiso.c
  * source/lang/msghuwin.c
  * source/lang/msgro.c
  * source/lang/msghriso.c
  * source/lang/msghrwin.c
  * source/lang/msghe862.c
  * source/lang/msgcskam.c
  * source/lang/msgbgiso.c
  * source/lang/msgbgwin.c
  * source/lang/msgcs852.c
  * source/lang/msgfr.c
  * source/lang/msgis850.c
  * source/lang/msghu852.c
  * source/lang/msgbg866.c
  * source/lang/msghr852.c
  * source/lang/msghewin.c
  * source/lang/msghucwi.c
  * source/lang/msgcsiso.c
  * source/lang/msgcswin.c
  * source/vm/harbinit.prg
  * source/vm/asort.c
  * source/vm/itemapi.c
  * source/vm/hvm.c
  * source/vm/cmdarg.c
  * source/vm/arrays.c
  * source/vm/fm.c
  * source/vm/extrap.c
  * source/vm/proc.c
  * source/vm/memvars.c
  * source/vm/memvclip.c
  * source/vm/main.c
  * source/vm/eval.c
  * source/vm/extend.c
  * source/vm/set.c
  * source/vm/classes.c
  * source/common/hbver.c
  * source/common/hbfsapi.c
  * source/common/hbstr.c
  * source/common/hbdate.c
  * source/rtl/lennum.c
  * source/rtl/gtdos/gtdos.c
  * source/rtl/diskspac.c
  * source/rtl/setposbs.c
  * source/rtl/mousehb.c
  * source/rtl/console.c
  * source/rtl/fscopy.c
  * source/rtl/gtwin/gtwin.c
  * source/rtl/mousex.c
  * source/rtl/philes.c
  * source/rtl/adir.prg
  * source/rtl/oldclear.c
  * source/rtl/tbcolumn.prg
  * source/rtl/hbgtcore.c
  * source/rtl/fieldbl.prg
  * source/rtl/dirdrive.c
  * source/rtl/dateshb.c
  * source/rtl/philesx.c
  * source/rtl/fnsplit.c
  * source/rtl/box.c
  * source/rtl/datesx.c
  * source/rtl/filehb.c
  * source/rtl/hbfile.c
  * source/rtl/gtapiu.c
  * source/rtl/fstemp.c
  * source/rtl/accept.c
  * source/rtl/radiobhb.prg
  * source/rtl/tgethb.prg
  * source/rtl/oemansix.c
  * source/rtl/strmatch.c
  * source/rtl/readkey.prg
  * source/rtl/ampm.c
  * source/rtl/oemansi.c
  * source/rtl/xsavescr.c
  * source/rtl/gtstd/gtstd.c
  * source/rtl/gtsln/mousesln.c
  * source/rtl/disksphb.c
  * source/rtl/xhelp.c
  * source/rtl/getlist.prg
  * source/rtl/net.c
  * source/rtl/hbntos.c
  * source/rtl/tgetx.prg
  * source/rtl/samples.c
  * source/rtl/idlex.c
  * source/rtl/tget.prg
  * source/rtl/alert.prg
  * source/rtl/inkey.c
  * source/rtl/gete.c
  * source/rtl/readvar.prg
  * source/rtl/fkmax.c
  * source/rtl/strzero.c
  * source/rtl/typefilx.prg
  * source/rtl/langapi.c
  * source/rtl/word.c
  * source/rtl/gtcgi/gtcgi.c
  * source/rtl/fmhb.c
  * source/rtl/natmsgu.c
  * source/rtl/errapi.c
  * source/rtl/version.c
  * source/rtl/natmsg.c
  * source/rtl/mouse53.c
  * source/rtl/errint.c
  * source/rtl/fssize.c
  * source/rtl/errapiu.c
  * source/rtl/colorind.c
  * source/rtl/gt.c
  * source/rtl/gx.c
  * source/rtl/binnumx.c
  * source/rtl/mouseapi.c
  * source/rtl/soundex.c
  * source/rtl/memofile.c
  * source/rtl/errintlo.c
  * source/rtl/hbffind.c
  * source/rtl/gtapi.c
  * source/rtl/pad.c
  * source/rtl/hbstrsh.c
  * source/rtl/filesys.c
  * source/rtl/file.c
  * source/rtl/lang.c
  * source/rtl/val.c
  * source/rtl/isprint.c
  * source/rtl/tbrowse.prg
  * source/codepage/ucmacce.c
  * source/codepage/uc885910.c
  * source/codepage/ucmacice.c
  * source/codepage/uc885914.c
  * source/codepage/uc874.c
  * source/codepage/cpes850.c
  * source/codepage/uc1258.c
  * source/codepage/cphu852.c
  * source/codepage/cpsk852.c
  * source/codepage/uc424.c
  * source/codepage/ucmacrom.c
  * source/codepage/uc862.c
  * source/codepage/cpesisoc.c
  * source/codepage/cpbg866.c
  * source/codepage/cphu852s.c
  * source/codepage/uc8859_3.c
  * source/codepage/uc8859_7.c
  * source/codepage/ucmacgrk.c
  * source/codepage/uc037.c
  * source/codepage/cpesiso.c
  * source/codepage/uc885911.c
  * source/codepage/uc885915.c
  * source/codepage/uc875.c
  * source/codepage/uc1255.c
  * source/codepage/cphuisos.c
  * source/codepage/cpfriso.c
  * source/codepage/uc863.c
  * source/codepage/cpfrwin.c
  * source/codepage/uc1026.c
  * source/codepage/cpbgiso.c
  * source/codepage/uc8859_4.c
  * source/codepage/cpskkam.c
  * source/codepage/cpbgwin.c
  * source/codepage/uc8859_8.c
  * source/codepage/uc855.c
  * source/codepage/uc885916.c
  * source/codepage/cproiso.c
  * source/codepage/ucascii.c
  * source/codepage/cprowin.c
  * source/codepage/uc1256.c
  * source/codepage/ucatari.c
  * source/codepage/uc860.c
  * source/codepage/ucmaccyr.c
  * source/codepage/uc864.c
  * source/codepage/uc1006.c
  * source/codepage/cpsviso.c
  * source/codepage/uc8859_5.c
  * source/codepage/uc8859_9.c
  * source/codepage/cphuwins.c
  * source/codepage/ucnext.c
  * source/codepage/ucmactrk.c
  * source/codepage/uc885913.c
  * source/codepage/cphuiso.c
  * source/codepage/uc775.c
  * source/codepage/uc856.c
  * source/codepage/cpskiso.c
  * source/codepage/cphuwin.c
  * source/codepage/cpskwin.c
  * source/codepage/uc500.c
  * source/codepage/cpro852.c
  * source/codepage/uc861.c
  * source/codepage/uc865.c
  * source/codepage/cpitwin.c
  * source/codepage/uc869.c
  * source/codepage/uc8859_6.c
  * source/rdd/dbjoinx.prg
  * source/rdd/dbnubs.c
  * source/rdd/dblistx.prg
  * source/rdd/dbtotalx.prg
  * source/rdd/dbstruxx.prg
  * source/rdd/dbsortx.prg
  * source/rdd/dbupdatx.prg
  * source/rdd/dbfuncsx.prg
  * source/rdd/dbcmdhb.c
  * source/compiler/cmdcheck.c
  * source/compiler/hbusage.c
  * source/hbzlib/ChangeLog
  * utils/hbmk2/hbmk2.prg
  * utils/hbtest/rt_main.h
  * utils/hbtest/hbtest.prg
  * utils/hbtest/rt_main.ch
  * utils/hbtest/rt_trans.prg
  * utils/hbtest/rt_miscc.c
  * utils/hbtest/rt_math.prg
  * utils/hbtest/rt_hvm.prg
  * utils/hbtest/rt_hvma.prg
  * utils/hbtest/rt_misc.prg
  * utils/hbtest/make_c5x.bat
  * utils/hbtest/rt_init.ch
  * utils/hbtest/rt_str.prg
  * utils/hbtest/rt_stra.prg
  * utils/hbtest/rt_date.prg
  * utils/hbtest/rt_vars.ch
  * utils/hbtest/rt_array.prg
  * utils/hbtest/rt_file.prg
  * examples/pp/hbppcore.c
  * examples/superlib/hbsuper.prg
    * My e-mail address corrected to the same one using the
      same format in all files. Corrected mistyped ones.
2009-06-03 10:26:40 +00:00

299 lines
12 KiB
C
Raw Blame History

/*
* $Id$
*/
/*
* Harbour Project source code:
* Language related functions
*
* Copyright 2009 Viktor Szakats (harbour.01 syenar.hu)
* www - http://www.harbour-project.org
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2, or (at your option)
* any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this software; see the file COPYING. If not, write to
* the Free Software Foundation, Inc., 59 Temple Place, Suite 330,
* Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/).
*
* As a special exception, the Harbour Project gives permission for
* additional uses of the text contained in its release of Harbour.
*
* The exception is that, if you link the Harbour libraries with other
* files to produce an executable, this does not by itself cause the
* resulting executable to be covered by the GNU General Public License.
* Your use of that executable is in no way restricted on account of
* linking the Harbour library code into it.
*
* This exception does not however invalidate any other reasons why
* the executable file might be covered by the GNU General Public License.
*
* This exception applies only to the code released by the Harbour
* Project under the name Harbour. If you copy code from other
* Harbour Project or Free Software Foundation releases into a copy of
* Harbour, as the General Public License permits, the exception does
* not apply to the code that you add in this way. To avoid misleading
* anyone as to the status of such modified files, you must delete
* this exception notice from them.
*
* If you write modifications of your own for Harbour, it is your choice
* whether to permit this exception to apply to your modifications.
* If you do not wish that, delete this exception notice.
*
*/
#define HB_OS_WIN_USED
#include "hbapi.h"
HB_FUNC( HB_USERLANG )
{
char * ietf;
BOOL bFree;
ietf = hb_getenv( "LC_ALL" );
if( ! ietf )
{
ietf = hb_getenv( "LC_MESSAGES" );
if( ! ietf )
ietf = hb_getenv( "LANG" );
}
bFree = ( ietf != NULL );
#if defined(HB_OS_WIN)
if( ! ietf )
{
switch( GetUserDefaultLangID() )
{
case 0x0036: ietf = "af" ; break;
case 0x0436: ietf = "af-ZA" ; break;
case 0x001C: ietf = "sq" ; break;
case 0x041C: ietf = "sq-AL" ; break;
case 0x0001: ietf = "ar" ; break;
case 0x1401: ietf = "ar-DZ" ; break;
case 0x3C01: ietf = "ar-BH" ; break;
case 0x0C01: ietf = "ar-EG" ; break;
case 0x0801: ietf = "ar-IQ" ; break;
case 0x2C01: ietf = "ar-JO" ; break;
case 0x3401: ietf = "ar-KW" ; break;
case 0x3001: ietf = "ar-LB" ; break;
case 0x1001: ietf = "ar-LY" ; break;
case 0x1801: ietf = "ar-MA" ; break;
case 0x2001: ietf = "ar-OM" ; break;
case 0x4001: ietf = "ar-QA" ; break;
case 0x0401: ietf = "ar-SA" ; break;
case 0x2801: ietf = "ar-SY" ; break;
case 0x1C01: ietf = "ar-TN" ; break;
case 0x3801: ietf = "ar-AE" ; break;
case 0x2401: ietf = "ar-YE" ; break;
case 0x002B: ietf = "hy" ; break;
case 0x042B: ietf = "hy-AM" ; break;
case 0x002C: ietf = "az" ; break;
case 0x082C: ietf = "az-AZ-Cyrl" ; break;
case 0x042C: ietf = "az-AZ-Latn" ; break;
case 0x002D: ietf = "eu" ; break;
case 0x042D: ietf = "eu-ES" ; break;
case 0x0023: ietf = "be" ; break;
case 0x0423: ietf = "be-BY" ; break;
case 0x0002: ietf = "bg" ; break;
case 0x0402: ietf = "bg-BG" ; break;
case 0x0003: ietf = "ca" ; break;
case 0x0403: ietf = "ca-ES" ; break;
case 0x0452: ietf = "cy-GB" ; break;
case 0x0C04: ietf = "zh-HK" ; break;
case 0x1404: ietf = "zh-MO" ; break;
case 0x0804: ietf = "zh-CN" ; break;
case 0x0004: ietf = "zh-CHS" ; break;
case 0x1004: ietf = "zh-SG" ; break;
case 0x0404: ietf = "zh-TW" ; break;
case 0x7C04: ietf = "zh-CHT" ; break;
case 0x001A: ietf = "hr" ; break;
case 0x041A: ietf = "hr-HR" ; break;
case 0x0005: ietf = "cs" ; break;
case 0x0405: ietf = "cs-CZ" ; break;
case 0x0006: ietf = "da" ; break;
case 0x0406: ietf = "da-DK" ; break;
case 0x0065: ietf = "div" ; break;
case 0x0465: ietf = "div-MV" ; break;
case 0x0013: ietf = "nl" ; break;
case 0x0813: ietf = "nl-BE" ; break;
case 0x0413: ietf = "nl-NL" ; break;
case 0x0009: ietf = "en" ; break;
case 0x0C09: ietf = "en-AU" ; break;
case 0x2809: ietf = "en-BZ" ; break;
case 0x1009: ietf = "en-CA" ; break;
case 0x2409: ietf = "en-CB" ; break;
case 0x1809: ietf = "en-IE" ; break;
case 0x2009: ietf = "en-JM" ; break;
case 0x1409: ietf = "en-NZ" ; break;
case 0x3409: ietf = "en-PH" ; break;
case 0x1C09: ietf = "en-ZA" ; break;
case 0x2C09: ietf = "en-TT" ; break;
case 0x0809: ietf = "en-GB" ; break;
case 0x0409: ietf = "en-US" ; break;
case 0x3009: ietf = "en-ZW" ; break;
case 0x0025: ietf = "et" ; break;
case 0x0425: ietf = "et-EE" ; break;
case 0x0038: ietf = "fo" ; break;
case 0x0438: ietf = "fo-FO" ; break;
case 0x0029: ietf = "fa" ; break;
case 0x0429: ietf = "fa-IR" ; break;
case 0x000B: ietf = "fi" ; break;
case 0x040B: ietf = "fi-FI" ; break;
case 0x000C: ietf = "fr" ; break;
case 0x080C: ietf = "fr-BE" ; break;
case 0x0C0C: ietf = "fr-CA" ; break;
case 0x040C: ietf = "fr-FR" ; break;
case 0x140C: ietf = "fr-LU" ; break;
case 0x180C: ietf = "fr-MC" ; break;
case 0x100C: ietf = "fr-CH" ; break;
case 0x0056: ietf = "gl" ; break;
case 0x0456: ietf = "gl-ES" ; break;
case 0x0037: ietf = "ka" ; break;
case 0x0437: ietf = "ka-GE" ; break;
case 0x0007: ietf = "de" ; break;
case 0x0C07: ietf = "de-AT" ; break;
case 0x0407: ietf = "de-DE" ; break;
case 0x1407: ietf = "de-LI" ; break;
case 0x1007: ietf = "de-LU" ; break;
case 0x0807: ietf = "de-CH" ; break;
case 0x0008: ietf = "el" ; break;
case 0x0408: ietf = "el-GR" ; break;
case 0x0047: ietf = "gu" ; break;
case 0x0447: ietf = "gu-IN" ; break;
case 0x000D: ietf = "he" ; break;
case 0x040D: ietf = "he-IL" ; break;
case 0x0039: ietf = "hi" ; break;
case 0x0439: ietf = "hi-IN" ; break;
case 0x000E: ietf = "hu" ; break;
case 0x040E: ietf = "hu-HU" ; break;
case 0x000F: ietf = "is" ; break;
case 0x040F: ietf = "is-IS" ; break;
case 0x0021: ietf = "id" ; break;
case 0x0421: ietf = "id-ID" ; break;
case 0x0010: ietf = "it" ; break;
case 0x0410: ietf = "it-IT" ; break;
case 0x0810: ietf = "it-CH" ; break;
case 0x0011: ietf = "ja" ; break;
case 0x0411: ietf = "ja-JP" ; break;
case 0x004B: ietf = "kn" ; break;
case 0x044B: ietf = "kn-IN" ; break;
case 0x003F: ietf = "kk" ; break;
case 0x043F: ietf = "kk-KZ" ; break;
case 0x0057: ietf = "kok" ; break;
case 0x0457: ietf = "kok-IN" ; break;
case 0x0012: ietf = "ko" ; break;
case 0x0412: ietf = "ko-KR" ; break;
case 0x0040: ietf = "ky" ; break;
case 0x0440: ietf = "ky-KZ" ; break;
case 0x0026: ietf = "lv" ; break;
case 0x0426: ietf = "lv-LV" ; break;
case 0x0027: ietf = "lt" ; break;
case 0x0427: ietf = "lt-LT" ; break;
case 0x002F: ietf = "mk" ; break;
case 0x042F: ietf = "mk-MK" ; break;
case 0x003E: ietf = "ms" ; break;
case 0x083E: ietf = "ms-BN" ; break;
case 0x043E: ietf = "ms-MY" ; break;
case 0x004E: ietf = "mr" ; break;
case 0x044E: ietf = "mr-IN" ; break;
case 0x0050: ietf = "mn" ; break;
case 0x0450: ietf = "mn-MN" ; break;
case 0x0014: ietf = "no" ; break;
case 0x0414: ietf = "nb-NO" ; break;
case 0x0814: ietf = "nn-NO" ; break;
case 0x0015: ietf = "pl" ; break;
case 0x0415: ietf = "pl-PL" ; break;
case 0x0016: ietf = "pt" ; break;
case 0x0416: ietf = "pt-BR" ; break;
case 0x0816: ietf = "pt-PT" ; break;
case 0x0046: ietf = "pa" ; break;
case 0x0446: ietf = "pa-IN" ; break;
case 0x0018: ietf = "ro" ; break;
case 0x0418: ietf = "ro-RO" ; break;
case 0x0019: ietf = "ru" ; break;
case 0x0419: ietf = "ru-RU" ; break;
case 0x004F: ietf = "sa" ; break;
case 0x044F: ietf = "sa-IN" ; break;
case 0x0C1A: ietf = "sr-SP-Cyrl" ; break;
case 0x081A: ietf = "sr-SP-Latn" ; break;
case 0x001B: ietf = "sk" ; break;
case 0x041B: ietf = "sk-SK" ; break;
case 0x0024: ietf = "sl" ; break;
case 0x0424: ietf = "sl-SI" ; break;
case 0x000A: ietf = "es" ; break;
case 0x2C0A: ietf = "es-AR" ; break;
case 0x400A: ietf = "es-BO" ; break;
case 0x340A: ietf = "es-CL" ; break;
case 0x240A: ietf = "es-CO" ; break;
case 0x140A: ietf = "es-CR" ; break;
case 0x1C0A: ietf = "es-DO" ; break;
case 0x300A: ietf = "es-EC" ; break;
case 0x440A: ietf = "es-SV" ; break;
case 0x100A: ietf = "es-GT" ; break;
case 0x480A: ietf = "es-HN" ; break;
case 0x080A: ietf = "es-MX" ; break;
case 0x4C0A: ietf = "es-NI" ; break;
case 0x180A: ietf = "es-PA" ; break;
case 0x3C0A: ietf = "es-PY" ; break;
case 0x280A: ietf = "es-PE" ; break;
case 0x500A: ietf = "es-PR" ; break;
case 0x0C0A: ietf = "es-ES" ; break;
case 0x380A: ietf = "es-UY" ; break;
case 0x200A: ietf = "es-VE" ; break;
case 0x0041: ietf = "sw" ; break;
case 0x0441: ietf = "sw-KE" ; break;
case 0x001D: ietf = "sv" ; break;
case 0x081D: ietf = "sv-FI" ; break;
case 0x041D: ietf = "sv-SE" ; break;
case 0x005A: ietf = "syr" ; break;
case 0x045A: ietf = "syr-SY" ; break;
case 0x0049: ietf = "ta" ; break;
case 0x0449: ietf = "ta-IN" ; break;
case 0x0044: ietf = "tt" ; break;
case 0x0444: ietf = "tt-RU" ; break;
case 0x004A: ietf = "te" ; break;
case 0x044A: ietf = "te-IN" ; break;
case 0x001E: ietf = "th" ; break;
case 0x041E: ietf = "th-TH" ; break;
case 0x001F: ietf = "tr" ; break;
case 0x041F: ietf = "tr-TR" ; break;
case 0x0022: ietf = "uk" ; break;
case 0x0422: ietf = "uk-UA" ; break;
case 0x0020: ietf = "ur" ; break;
case 0x0420: ietf = "ur-PK" ; break;
case 0x0043: ietf = "uz" ; break;
case 0x0843: ietf = "uz-UZ-Cyrl" ; break;
case 0x0443: ietf = "uz-UZ-Latn" ; break;
case 0x002A: ietf = "vi" ; break;
case 0x042A: ietf = "vi-VN" ; break;
}
}
#endif
if( bFree )
{
long tmp, len = strlen( ietf );
for( tmp = 0; tmp < len; tmp++ )
{
if( ietf[ tmp ] == '.' )
break;
else if( ietf[ tmp ] == '_' )
ietf[ tmp ] = '-';
}
hb_retclen_buffer( ietf, tmp );
}
else
hb_retc_const( ietf );
}
Reference in New Issue View Git Blame Copy Permalink