319 lines
10 KiB
C++
319 lines
10 KiB
C++
#include <cerrno>
|
||
#include <cstring> /* memset */
|
||
#include <vector>
|
||
#include <stdexcept> // std::domain_error(-)
|
||
#include <locale>
|
||
#include <iconv.h>
|
||
#include "igs_resource_msg_from_err.h"
|
||
|
||
/*------ localeを日本に設定し日本語を扱うことを指示(必須)
|
||
使う文字コードは"locale -a"で調べる */
|
||
void igs::resource::locale_to_jp(void) { setlocale(LC_CTYPE, "ja_JP.utf8"); }
|
||
#if 0 //------
|
||
/*
|
||
リサーチ中
|
||
日本語環境を環境変数から取ってくる場合のルーチン
|
||
deamonの場合これでいいのか???
|
||
さらに調査が必要
|
||
2013-02-18
|
||
*/
|
||
#include <X11/Xlib.h>
|
||
#include <X11/Xlocale.h>
|
||
void igs::resource::locale_to_jp(void) {
|
||
/*
|
||
Software Design 1993年3月号
|
||
"SPECIAL ISSUE どうする?UNIXの日本語環境"
|
||
稚内北星短期大学 丸山 不二夫
|
||
Page14 リスト4 より
|
||
|
||
X11R5での日本語処理 - ロケールの設定
|
||
標準的な処理手順
|
||
全てのX(lib)プログラムの先頭で行う
|
||
*/
|
||
|
||
/* 次の場合、環境変数 LANG から、地域名を得ます
|
||
引数locale が "" の場合、
|
||
ロケールの各部分の設定には環境変数が参照される。
|
||
その詳細は実装依存である。
|
||
Linux Programmer’s Manual July 4, 1999より
|
||
*/
|
||
if ( ::setlocale( LC_ALL ,"" ) == NULL ) {
|
||
throw std::domain_error( "Can not set locale." );
|
||
}
|
||
|
||
/* Xlibが、現在の地域をサポートしているかチェックします */
|
||
if ( !::XSupportsLocale() ) {
|
||
std::string msg("X is not support locale ");
|
||
msg += setlocale( LC_ALL ,NULL );
|
||
msg += ".\n";
|
||
throw std::domain_error( msg.c_str() );
|
||
}
|
||
|
||
/* 次の場合、環境変数 XMODIFIERS から修飾子が得られます
|
||
この修飾子は。入力メソッド (IM) の指定に使われます */
|
||
if ( ::XSetLocaleModifiers("") == NULL ) {
|
||
throw std::domain_error( "Can not set locale modifiers." );
|
||
}
|
||
}
|
||
/*
|
||
#g++ -L/usr/X11R6/lib/ -lXmu -lXext -lX11 -lgthread -lglib -lm tes82.cxx
|
||
g++ tes82.cxx -L/usr/X11R6/lib/ -lX11
|
||
*/
|
||
#endif //------
|
||
/*------ マルチバイト文字列 --> ワイド文字文字列 ------*/
|
||
void igs::resource::mbs_to_wcs(const std::string &mbs, std::wstring &wcs) {
|
||
size_t length = 0;
|
||
{
|
||
const char *src_ptr = mbs.c_str();
|
||
mbstate_t ss;
|
||
::memset(&ss, 0, sizeof(ss));
|
||
length = ::mbsrtowcs(NULL, &src_ptr, 0, &ss);
|
||
if (length == (size_t)(-1)) { /* 不正なマルチバイト列に遭遇した */
|
||
throw std::domain_error(
|
||
"mbstowcs(-) got bad multi byte character,when size");
|
||
}
|
||
if (length <= 0) {
|
||
return;
|
||
} /* 文字がないなら何もしない */
|
||
++length;
|
||
}
|
||
// std::vector<wchar_t> dst(length);
|
||
wcs.resize(length);
|
||
{
|
||
const char *src_ptr = mbs.c_str();
|
||
mbstate_t ss;
|
||
::memset(&ss, 0, sizeof(ss));
|
||
// length = ::mbsrtowcs(&dst.at(0) ,&src_ptr ,length ,&ss);
|
||
length =
|
||
::mbsrtowcs(const_cast<wchar_t *>(wcs.c_str()), &src_ptr, length, &ss);
|
||
if (length == (size_t)(-1)) { /* 不正なマルチバイト列に遭遇した */
|
||
throw std::domain_error(
|
||
"mbstowcs(-) got bad multi byte character,when conv");
|
||
}
|
||
if (length <= 0) {
|
||
throw std::domain_error("mbstowcs(-) got zero or under equal -2 ");
|
||
}
|
||
}
|
||
// wcs = std::wstring(dst.begin() ,dst.end()-1);/* 終端以外を */
|
||
wcs.erase(wcs.end() - 1); /* 終端文字を消す */
|
||
}
|
||
/*------ ワイド文字文字列 --> マルチバイト文字列 ------*/
|
||
void igs::resource::wcs_to_mbs(const std::wstring &wcs, std::string &mbs) {
|
||
size_t length = 0;
|
||
{
|
||
const wchar_t *src_ptr = wcs.c_str();
|
||
mbstate_t ss;
|
||
::memset(&ss, 0, sizeof(ss));
|
||
length = ::wcsrtombs(NULL, &src_ptr, 0, &ss);
|
||
if (length <= 0) {
|
||
return;
|
||
} /* 文字がないなら何もしない */
|
||
++length;
|
||
}
|
||
// std::vector<char> dst(length);
|
||
mbs.resize(length);
|
||
{
|
||
const wchar_t *src_ptr = wcs.c_str();
|
||
mbstate_t ss;
|
||
::memset(&ss, 0, sizeof(ss));
|
||
// length = ::wcsrtombs(&dst.at(0) ,&src_ptr ,length ,&ss);
|
||
length =
|
||
::wcsrtombs(const_cast<char *>(mbs.c_str()), &src_ptr, length, &ss);
|
||
if (length <= 0) {
|
||
throw std::domain_error("wcstombs(-) got bad wide character");
|
||
}
|
||
}
|
||
// mbs = std::string(dst.begin() ,dst.end()-1);/* 終端以外を */
|
||
mbs.erase(mbs.end() - 1); /* 終端文字を消す */
|
||
}
|
||
/*------ UNICODE宣言ならマルチバイト文字列をワイド文字文字列に変換 ------*/
|
||
const std::basic_string<TCHAR> igs::resource::ts_from_mbs(
|
||
const std::string &mbs) {
|
||
#if defined UNICODE
|
||
std::wstring wcs;
|
||
igs::resource::mbs_to_wcs(mbs, wcs);
|
||
return wcs;
|
||
#else
|
||
/* MBCSの場合のsize()は文字数ではなくchar(byte)数,2bytes文字は2 */
|
||
return mbs;
|
||
#endif
|
||
}
|
||
/*------ UNICODE宣言ならワイド文字文字列をマルチバイト文字列に変換 ------*/
|
||
const std::string igs::resource::mbs_from_ts(
|
||
const std::basic_string<TCHAR> &ts) {
|
||
#if defined UNICODE
|
||
std::string mbs;
|
||
igs::resource::wcs_to_mbs(ts, mbs);
|
||
return mbs;
|
||
#else
|
||
/* MBCSの場合のsize()は文字数ではなくchar(byte)数,2bytes文字は2 */
|
||
return ts;
|
||
#endif
|
||
}
|
||
/*------ cp932を含む文字列をutf-8に変換(マルチバイト文字列) ------*/
|
||
namespace {
|
||
const std::string iconv_to_from_(const std::string &text, const char *tocode,
|
||
const char *fromcode) {
|
||
iconv_t icd = ::iconv_open(tocode, fromcode); // "iconv --list"
|
||
if (reinterpret_cast<iconv_t>(-1) == icd) {
|
||
throw std::domain_error(
|
||
igs_resource_msg_from_err(TEXT("iconv_open(-)"), errno));
|
||
}
|
||
|
||
std::vector<char> dst(text.size() * 4);
|
||
char *inbuf = const_cast<char *>(text.c_str());
|
||
char *outbuf = &dst.at(0);
|
||
size_t inbytesleft = text.size();
|
||
size_t outbytesleft = dst.size();
|
||
size_t ret = ::iconv(icd, &inbuf, &inbytesleft, &outbuf, &outbytesleft);
|
||
*outbuf = '\0';
|
||
|
||
/*
|
||
retに処理した数が入るはずだが、rhel5ではゼロが帰るので、
|
||
処理数を別途計算する
|
||
*/
|
||
ret = dst.size() - outbytesleft;
|
||
if (ret <= 0) {
|
||
// if (static_cast<size_t>(-1) == ret) {
|
||
::iconv_close(icd);
|
||
|
||
throw std::domain_error(igs_resource_msg_from_err(TEXT("iconv(-)"), errno));
|
||
}
|
||
|
||
if (-1 == ::iconv_close(icd)) {
|
||
throw std::domain_error(
|
||
igs_resource_msg_from_err(TEXT("iconv_close(-)"), errno));
|
||
}
|
||
|
||
std::string mbs(std::string(dst.begin(), dst.begin() + ret));
|
||
return mbs;
|
||
}
|
||
}
|
||
const std::string igs::resource::utf8_from_cp932_mb(const std::string &text) {
|
||
return iconv_to_from_(text, "UTF-8", "CP932"); // "iconv --list"
|
||
}
|
||
const std::string igs::resource::cp932_from_utf8_mb(const std::string &text) {
|
||
return iconv_to_from_(text, "CP932", "UTF-8"); // "iconv --list"
|
||
}
|
||
/*------ エラーメッセージ表示の元関数、直接呼び出すことはしない ------*/
|
||
#include <cerrno> // errno
|
||
#include <cstring> // strerror_r()
|
||
#include <sstream> // std::istringstream
|
||
#include "igs_resource_msg_from_err.h"
|
||
|
||
const std::string igs::resource::msg_from_err_(
|
||
const std::basic_string<TCHAR> &tit, const int erno,
|
||
const std::string &file, const std::string &line,
|
||
const std::string &pretty_function, const std::string &comp_type,
|
||
const std::string &gnuc, const std::string &gnuc_minor,
|
||
const std::string &gnuc_patchlevel, const std::string &gnuc_rh_release,
|
||
const std::string &date, const std::string &time) {
|
||
std::string errmsg;
|
||
errmsg += '\"';
|
||
|
||
/* フルパスで入ってきた場合ファイル名だけにする */
|
||
std::string::size_type index = file.find_last_of("/\\");
|
||
if (std::basic_string<TCHAR>::npos != index) {
|
||
errmsg += file.substr(index + 1);
|
||
} else {
|
||
errmsg += file;
|
||
}
|
||
|
||
errmsg += ':';
|
||
errmsg += line;
|
||
errmsg += ':';
|
||
errmsg += comp_type;
|
||
errmsg += ':';
|
||
errmsg += gnuc;
|
||
errmsg += '.';
|
||
errmsg += gnuc_minor;
|
||
errmsg += '.';
|
||
errmsg += gnuc_patchlevel;
|
||
errmsg += '-';
|
||
errmsg += gnuc_rh_release;
|
||
{
|
||
std::istringstream ist(date);
|
||
std::string month, day, year;
|
||
ist >> month;
|
||
ist >> day;
|
||
ist >> year;
|
||
errmsg += ':';
|
||
errmsg += year;
|
||
errmsg += ':';
|
||
errmsg += month;
|
||
errmsg += ':';
|
||
errmsg += day;
|
||
}
|
||
errmsg += ':';
|
||
errmsg += time;
|
||
errmsg += '\"';
|
||
errmsg += ' ';
|
||
errmsg += '\"';
|
||
errmsg += pretty_function;
|
||
errmsg += '\"';
|
||
errmsg += ' ';
|
||
errmsg += '\"';
|
||
if (0 < tit.size()) {
|
||
errmsg += igs::resource::mbs_from_ts(tit);
|
||
}
|
||
if (0 != erno) {
|
||
errmsg += ':';
|
||
|
||
#if defined __HP_aCC
|
||
/*
|
||
HP-UX(v11.23)では、strerror_r()をサポートしない。
|
||
注意::strerror()はThread SafeではなくMulti Threadでは正常動作しない
|
||
*/
|
||
errmsg += ::strerror(erno);
|
||
#elif ((_POSIX_C_SOURCE >= 200112L || _XOPEN_SOURCE >= 600) && !_GNU_SOURCE)
|
||
/*
|
||
http://japanese-linux-man-pages.coding-school.com/man/X_strerror_r-3
|
||
より、POSIX.1.2002で規定されたXSI準拠のバージョンのstrerror_r()
|
||
*/
|
||
char buff[4096];
|
||
const int ret = ::strerror_r(erno, buff, sizeof(buff));
|
||
if (0 == ret) {
|
||
errmsg += buff;
|
||
} else if (-1 == ret) {
|
||
swtich(errno) {
|
||
case EINVAL:
|
||
errmsg +=
|
||
"strerror_r() gets Error : The value of errnum is not a "
|
||
"valid error number.";
|
||
/* errnum の値が有効なエラー番号ではない */
|
||
break;
|
||
case ERANGE:
|
||
errmsg +=
|
||
"strerror_r() gets Error : Insufficient storage was "
|
||
"supplied via strerrbuf and buflen to contain the "
|
||
"generated message string.";
|
||
/* エラーコードを説明する文字列のために、
|
||
充分な領域が確保できな かった */
|
||
break;
|
||
deatult:
|
||
errmsg += "strerror_r() gets Error and Returns bad errno";
|
||
break;
|
||
}
|
||
} else {
|
||
errmsg += "strerror_r() returns bad value";
|
||
}
|
||
#elif defined(__APPLE__)
|
||
char buff[4096];
|
||
int ret = ::strerror_r(erno, buff, sizeof(buff));
|
||
if (!ret) {
|
||
errmsg += buff;
|
||
}
|
||
#else
|
||
/* linuxはここに来る?
|
||
http://japanese-linux-man-pages.coding-school.com/man/X_strerror_r-3
|
||
より、GNU仕様のバージョンのstrerror_r()。非標準の拡張
|
||
これはThread Safeか??????
|
||
*/
|
||
char buff[4096];
|
||
const char *ret = ::strerror_r(erno, buff, sizeof(buff));
|
||
errmsg += ret;
|
||
#endif
|
||
}
|
||
errmsg += '\"';
|
||
return errmsg;
|
||
}
|