139 lines
3.1 KiB
C
139 lines
3.1 KiB
C
/**********************************************************************
|
|
|
|
localeinit.c -
|
|
|
|
$Author$
|
|
created at: Thu Jul 11 22:09:57 JST 2013
|
|
|
|
Copyright (C) 2013 Yukihiro Matsumoto
|
|
|
|
**********************************************************************/
|
|
|
|
#include "ruby/encoding.h"
|
|
#include "internal.h"
|
|
#include "encindex.h"
|
|
#ifdef __CYGWIN__
|
|
#include <windows.h>
|
|
#endif
|
|
#ifdef HAVE_LANGINFO_H
|
|
#include <langinfo.h>
|
|
#endif
|
|
|
|
#if defined _WIN32 || defined __CYGWIN__
|
|
#define SIZEOF_CP_NAME ((sizeof(UINT) * 8 / 3) + 4)
|
|
#define CP_FORMAT(buf, codepage) snprintf(buf, sizeof(buf), "CP%u", (codepage))
|
|
|
|
extern UINT ruby_w32_codepage[2];
|
|
#endif
|
|
|
|
#ifndef NO_LOCALE_CHARMAP
|
|
# if defined _WIN32 || defined __CYGWIN__ || defined HAVE_LANGINFO_H
|
|
# define NO_LOCALE_CHARMAP 0
|
|
# else
|
|
# define NO_LOCALE_CHARMAP 1
|
|
# endif
|
|
#endif
|
|
|
|
#if !NO_LOCALE_CHARMAP
|
|
static VALUE
|
|
locale_charmap(VALUE (*conv)(const char *))
|
|
{
|
|
const char *codeset = 0;
|
|
#if defined _WIN32 || defined __CYGWIN__
|
|
char cp[SIZEOF_CP_NAME];
|
|
# ifdef __CYGWIN__
|
|
const char *nl_langinfo_codeset(void);
|
|
codeset = nl_langinfo_codeset();
|
|
# endif
|
|
if (!codeset) {
|
|
UINT codepage = ruby_w32_codepage[0];
|
|
if (!codepage) codepage = GetConsoleCP();
|
|
if (!codepage) codepage = GetACP();
|
|
CP_FORMAT(cp, codepage);
|
|
codeset = cp;
|
|
}
|
|
#elif defined HAVE_LANGINFO_H
|
|
codeset = nl_langinfo(CODESET);
|
|
ASSUME(codeset);
|
|
#else
|
|
# error locale_charmap() is not implemented
|
|
#endif
|
|
return (*conv)(codeset);
|
|
}
|
|
#endif
|
|
|
|
/*
|
|
* call-seq:
|
|
* Encoding.locale_charmap -> string
|
|
*
|
|
* Returns the locale charmap name.
|
|
* It returns nil if no appropriate information.
|
|
*
|
|
* Debian GNU/Linux
|
|
* LANG=C
|
|
* Encoding.locale_charmap #=> "ANSI_X3.4-1968"
|
|
* LANG=ja_JP.EUC-JP
|
|
* Encoding.locale_charmap #=> "EUC-JP"
|
|
*
|
|
* SunOS 5
|
|
* LANG=C
|
|
* Encoding.locale_charmap #=> "646"
|
|
* LANG=ja
|
|
* Encoding.locale_charmap #=> "eucJP"
|
|
*
|
|
* The result is highly platform dependent.
|
|
* So Encoding.find(Encoding.locale_charmap) may cause an error.
|
|
* If you need some encoding object even for unknown locale,
|
|
* Encoding.find("locale") can be used.
|
|
*
|
|
*/
|
|
VALUE
|
|
rb_locale_charmap(VALUE klass)
|
|
{
|
|
#if NO_LOCALE_CHARMAP
|
|
return rb_usascii_str_new_cstr("US-ASCII");
|
|
#else
|
|
return locale_charmap(rb_usascii_str_new_cstr);
|
|
#endif
|
|
}
|
|
|
|
#if !NO_LOCALE_CHARMAP
|
|
static VALUE
|
|
enc_find_index(const char *name)
|
|
{
|
|
return (VALUE)rb_enc_find_index(name);
|
|
}
|
|
#endif
|
|
|
|
int
|
|
rb_locale_charmap_index(void)
|
|
{
|
|
#if NO_LOCALE_CHARMAP
|
|
return ENCINDEX_US_ASCII;
|
|
#else
|
|
return (int)locale_charmap(enc_find_index);
|
|
#endif
|
|
}
|
|
|
|
int
|
|
Init_enc_set_filesystem_encoding(void)
|
|
{
|
|
int idx;
|
|
#if NO_LOCALE_CHARMAP
|
|
idx = ENCINDEX_US_ASCII;
|
|
#elif defined _WIN32
|
|
char cp[SIZEOF_CP_NAME];
|
|
const UINT codepage = ruby_w32_codepage[1];
|
|
if (!codepage) return ENCINDEX_UTF_8;
|
|
/* for debugging */
|
|
CP_FORMAT(cp, codepage);
|
|
idx = rb_enc_find_index(cp);
|
|
if (idx < 0) idx = ENCINDEX_ASCII_8BIT;
|
|
#elif defined __CYGWIN__
|
|
idx = ENCINDEX_UTF_8;
|
|
#else
|
|
idx = rb_enc_to_index(rb_default_external_encoding());
|
|
#endif
|
|
return idx;
|
|
}
|