| // Locale support (codecvt) -*- C++ -*- |
| |
| // Copyright (C) 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2009 |
| // Free Software Foundation, Inc. |
| // |
| // This file is part of the GNU ISO C++ Library. This library 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 3, or (at your option) |
| // any later version. |
| |
| // This library 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. |
| |
| // Under Section 7 of GPL version 3, you are granted additional |
| // permissions described in the GCC Runtime Library Exception, version |
| // 3.1, as published by the Free Software Foundation. |
| |
| // You should have received a copy of the GNU General Public License and |
| // a copy of the GCC Runtime Library Exception along with this program; |
| // see the files COPYING3 and COPYING.RUNTIME respectively. If not, see |
| // <http://www.gnu.org/licenses/>. |
| |
| // |
| // ISO C++ 14882: 22.2.1.5 Template class codecvt |
| // |
| |
| // Written by Benjamin Kosnik <bkoz@redhat.com> |
| |
| /** @file ext/codecvt_specializations.h |
| * This file is a GNU extension to the Standard C++ Library. |
| */ |
| |
| #ifndef _EXT_CODECVT_SPECIALIZATIONS_H |
| #define _EXT_CODECVT_SPECIALIZATIONS_H 1 |
| |
| #include <bits/c++config.h> |
| #include <locale> |
| #include <iconv.h> |
| |
| _GLIBCXX_BEGIN_NAMESPACE(__gnu_cxx) |
| |
| /// Extension to use iconv for dealing with character encodings. |
| // This includes conversions and comparisons between various character |
| // sets. This object encapsulates data that may need to be shared between |
| // char_traits, codecvt and ctype. |
| class encoding_state |
| { |
| public: |
| // Types: |
| // NB: A conversion descriptor subsumes and enhances the |
| // functionality of a simple state type such as mbstate_t. |
| typedef iconv_t descriptor_type; |
| |
| protected: |
| // Name of internal character set encoding. |
| std::string _M_int_enc; |
| |
| // Name of external character set encoding. |
| std::string _M_ext_enc; |
| |
| // Conversion descriptor between external encoding to internal encoding. |
| descriptor_type _M_in_desc; |
| |
| // Conversion descriptor between internal encoding to external encoding. |
| descriptor_type _M_out_desc; |
| |
| // The byte-order marker for the external encoding, if necessary. |
| int _M_ext_bom; |
| |
| // The byte-order marker for the internal encoding, if necessary. |
| int _M_int_bom; |
| |
| // Number of external bytes needed to construct one complete |
| // character in the internal encoding. |
| // NB: -1 indicates variable, or stateful, encodings. |
| int _M_bytes; |
| |
| public: |
| explicit |
| encoding_state() |
| : _M_in_desc(0), _M_out_desc(0), _M_ext_bom(0), _M_int_bom(0), _M_bytes(0) |
| { } |
| |
| explicit |
| encoding_state(const char* __int, const char* __ext, |
| int __ibom = 0, int __ebom = 0, int __bytes = 1) |
| : _M_int_enc(__int), _M_ext_enc(__ext), _M_in_desc(0), _M_out_desc(0), |
| _M_ext_bom(__ebom), _M_int_bom(__ibom), _M_bytes(__bytes) |
| { init(); } |
| |
| // 21.1.2 traits typedefs |
| // p4 |
| // typedef STATE_T state_type |
| // requires: state_type shall meet the requirements of |
| // CopyConstructible types (20.1.3) |
| // NB: This does not preserve the actual state of the conversion |
| // descriptor member, but it does duplicate the encoding |
| // information. |
| encoding_state(const encoding_state& __obj) : _M_in_desc(0), _M_out_desc(0) |
| { construct(__obj); } |
| |
| // Need assignment operator as well. |
| encoding_state& |
| operator=(const encoding_state& __obj) |
| { |
| construct(__obj); |
| return *this; |
| } |
| |
| ~encoding_state() |
| { destroy(); } |
| |
| bool |
| good() const throw() |
| { |
| const descriptor_type __err = (iconv_t)(-1); |
| bool __test = _M_in_desc && _M_in_desc != __err; |
| __test &= _M_out_desc && _M_out_desc != __err; |
| return __test; |
| } |
| |
| int |
| character_ratio() const |
| { return _M_bytes; } |
| |
| const std::string |
| internal_encoding() const |
| { return _M_int_enc; } |
| |
| int |
| internal_bom() const |
| { return _M_int_bom; } |
| |
| const std::string |
| external_encoding() const |
| { return _M_ext_enc; } |
| |
| int |
| external_bom() const |
| { return _M_ext_bom; } |
| |
| const descriptor_type& |
| in_descriptor() const |
| { return _M_in_desc; } |
| |
| const descriptor_type& |
| out_descriptor() const |
| { return _M_out_desc; } |
| |
| protected: |
| void |
| init() |
| { |
| const descriptor_type __err = (iconv_t)(-1); |
| const bool __have_encodings = _M_int_enc.size() && _M_ext_enc.size(); |
| if (!_M_in_desc && __have_encodings) |
| { |
| _M_in_desc = iconv_open(_M_int_enc.c_str(), _M_ext_enc.c_str()); |
| if (_M_in_desc == __err) |
| std::__throw_runtime_error(__N("encoding_state::_M_init " |
| "creating iconv input descriptor failed")); |
| } |
| if (!_M_out_desc && __have_encodings) |
| { |
| _M_out_desc = iconv_open(_M_ext_enc.c_str(), _M_int_enc.c_str()); |
| if (_M_out_desc == __err) |
| std::__throw_runtime_error(__N("encoding_state::_M_init " |
| "creating iconv output descriptor failed")); |
| } |
| } |
| |
| void |
| construct(const encoding_state& __obj) |
| { |
| destroy(); |
| _M_int_enc = __obj._M_int_enc; |
| _M_ext_enc = __obj._M_ext_enc; |
| _M_ext_bom = __obj._M_ext_bom; |
| _M_int_bom = __obj._M_int_bom; |
| _M_bytes = __obj._M_bytes; |
| init(); |
| } |
| |
| void |
| destroy() throw() |
| { |
| const descriptor_type __err = (iconv_t)(-1); |
| if (_M_in_desc && _M_in_desc != __err) |
| { |
| iconv_close(_M_in_desc); |
| _M_in_desc = 0; |
| } |
| if (_M_out_desc && _M_out_desc != __err) |
| { |
| iconv_close(_M_out_desc); |
| _M_out_desc = 0; |
| } |
| } |
| }; |
| |
| /// encoding_char_traits |
| // Custom traits type with encoding_state for the state type, and the |
| // associated fpos<encoding_state> for the position type, all other |
| // bits equivalent to the required char_traits instantiations. |
| template<typename _CharT> |
| struct encoding_char_traits : public std::char_traits<_CharT> |
| { |
| typedef encoding_state state_type; |
| typedef typename std::fpos<state_type> pos_type; |
| }; |
| |
| _GLIBCXX_END_NAMESPACE |
| |
| |
| _GLIBCXX_BEGIN_NAMESPACE(std) |
| |
| using __gnu_cxx::encoding_state; |
| |
| /// codecvt<InternT, _ExternT, encoding_state> specialization. |
| // This partial specialization takes advantage of iconv to provide |
| // code conversions between a large number of character encodings. |
| template<typename _InternT, typename _ExternT> |
| class codecvt<_InternT, _ExternT, encoding_state> |
| : public __codecvt_abstract_base<_InternT, _ExternT, encoding_state> |
| { |
| public: |
| // Types: |
| typedef codecvt_base::result result; |
| typedef _InternT intern_type; |
| typedef _ExternT extern_type; |
| typedef __gnu_cxx::encoding_state state_type; |
| typedef state_type::descriptor_type descriptor_type; |
| |
| // Data Members: |
| static locale::id id; |
| |
| explicit |
| codecvt(size_t __refs = 0) |
| : __codecvt_abstract_base<intern_type, extern_type, state_type>(__refs) |
| { } |
| |
| explicit |
| codecvt(state_type& __enc, size_t __refs = 0) |
| : __codecvt_abstract_base<intern_type, extern_type, state_type>(__refs) |
| { } |
| |
| protected: |
| virtual |
| ~codecvt() { } |
| |
| virtual result |
| do_out(state_type& __state, const intern_type* __from, |
| const intern_type* __from_end, const intern_type*& __from_next, |
| extern_type* __to, extern_type* __to_end, |
| extern_type*& __to_next) const; |
| |
| virtual result |
| do_unshift(state_type& __state, extern_type* __to, |
| extern_type* __to_end, extern_type*& __to_next) const; |
| |
| virtual result |
| do_in(state_type& __state, const extern_type* __from, |
| const extern_type* __from_end, const extern_type*& __from_next, |
| intern_type* __to, intern_type* __to_end, |
| intern_type*& __to_next) const; |
| |
| virtual int |
| do_encoding() const throw(); |
| |
| virtual bool |
| do_always_noconv() const throw(); |
| |
| virtual int |
| do_length(state_type&, const extern_type* __from, |
| const extern_type* __end, size_t __max) const; |
| |
| virtual int |
| do_max_length() const throw(); |
| }; |
| |
| template<typename _InternT, typename _ExternT> |
| locale::id |
| codecvt<_InternT, _ExternT, encoding_state>::id; |
| |
| // This adaptor works around the signature problems of the second |
| // argument to iconv(): SUSv2 and others use 'const char**', but glibc 2.2 |
| // uses 'char**', which matches the POSIX 1003.1-2001 standard. |
| // Using this adaptor, g++ will do the work for us. |
| template<typename _Tp> |
| inline size_t |
| __iconv_adaptor(size_t(*__func)(iconv_t, _Tp, size_t*, char**, size_t*), |
| iconv_t __cd, char** __inbuf, size_t* __inbytes, |
| char** __outbuf, size_t* __outbytes) |
| { return __func(__cd, (_Tp)__inbuf, __inbytes, __outbuf, __outbytes); } |
| |
| template<typename _InternT, typename _ExternT> |
| codecvt_base::result |
| codecvt<_InternT, _ExternT, encoding_state>:: |
| do_out(state_type& __state, const intern_type* __from, |
| const intern_type* __from_end, const intern_type*& __from_next, |
| extern_type* __to, extern_type* __to_end, |
| extern_type*& __to_next) const |
| { |
| result __ret = codecvt_base::error; |
| if (__state.good()) |
| { |
| const descriptor_type& __desc = __state.out_descriptor(); |
| const size_t __fmultiple = sizeof(intern_type); |
| size_t __fbytes = __fmultiple * (__from_end - __from); |
| const size_t __tmultiple = sizeof(extern_type); |
| size_t __tbytes = __tmultiple * (__to_end - __to); |
| |
| // Argument list for iconv specifies a byte sequence. Thus, |
| // all to/from arrays must be brutally casted to char*. |
| char* __cto = reinterpret_cast<char*>(__to); |
| char* __cfrom; |
| size_t __conv; |
| |
| // Some encodings need a byte order marker as the first item |
| // in the byte stream, to designate endian-ness. The default |
| // value for the byte order marker is NULL, so if this is |
| // the case, it's not necessary and we can just go on our |
| // merry way. |
| int __int_bom = __state.internal_bom(); |
| if (__int_bom) |
| { |
| size_t __size = __from_end - __from; |
| intern_type* __cfixed = static_cast<intern_type*> |
| (__builtin_alloca(sizeof(intern_type) * (__size + 1))); |
| __cfixed[0] = static_cast<intern_type>(__int_bom); |
| char_traits<intern_type>::copy(__cfixed + 1, __from, __size); |
| __cfrom = reinterpret_cast<char*>(__cfixed); |
| __conv = __iconv_adaptor(iconv, __desc, &__cfrom, |
| &__fbytes, &__cto, &__tbytes); |
| } |
| else |
| { |
| intern_type* __cfixed = const_cast<intern_type*>(__from); |
| __cfrom = reinterpret_cast<char*>(__cfixed); |
| __conv = __iconv_adaptor(iconv, __desc, &__cfrom, &__fbytes, |
| &__cto, &__tbytes); |
| } |
| |
| if (__conv != size_t(-1)) |
| { |
| __from_next = reinterpret_cast<const intern_type*>(__cfrom); |
| __to_next = reinterpret_cast<extern_type*>(__cto); |
| __ret = codecvt_base::ok; |
| } |
| else |
| { |
| if (__fbytes < __fmultiple * (__from_end - __from)) |
| { |
| __from_next = reinterpret_cast<const intern_type*>(__cfrom); |
| __to_next = reinterpret_cast<extern_type*>(__cto); |
| __ret = codecvt_base::partial; |
| } |
| else |
| __ret = codecvt_base::error; |
| } |
| } |
| return __ret; |
| } |
| |
| template<typename _InternT, typename _ExternT> |
| codecvt_base::result |
| codecvt<_InternT, _ExternT, encoding_state>:: |
| do_unshift(state_type& __state, extern_type* __to, |
| extern_type* __to_end, extern_type*& __to_next) const |
| { |
| result __ret = codecvt_base::error; |
| if (__state.good()) |
| { |
| const descriptor_type& __desc = __state.in_descriptor(); |
| const size_t __tmultiple = sizeof(intern_type); |
| size_t __tlen = __tmultiple * (__to_end - __to); |
| |
| // Argument list for iconv specifies a byte sequence. Thus, |
| // all to/from arrays must be brutally casted to char*. |
| char* __cto = reinterpret_cast<char*>(__to); |
| size_t __conv = __iconv_adaptor(iconv,__desc, NULL, NULL, |
| &__cto, &__tlen); |
| |
| if (__conv != size_t(-1)) |
| { |
| __to_next = reinterpret_cast<extern_type*>(__cto); |
| if (__tlen == __tmultiple * (__to_end - __to)) |
| __ret = codecvt_base::noconv; |
| else if (__tlen == 0) |
| __ret = codecvt_base::ok; |
| else |
| __ret = codecvt_base::partial; |
| } |
| else |
| __ret = codecvt_base::error; |
| } |
| return __ret; |
| } |
| |
| template<typename _InternT, typename _ExternT> |
| codecvt_base::result |
| codecvt<_InternT, _ExternT, encoding_state>:: |
| do_in(state_type& __state, const extern_type* __from, |
| const extern_type* __from_end, const extern_type*& __from_next, |
| intern_type* __to, intern_type* __to_end, |
| intern_type*& __to_next) const |
| { |
| result __ret = codecvt_base::error; |
| if (__state.good()) |
| { |
| const descriptor_type& __desc = __state.in_descriptor(); |
| const size_t __fmultiple = sizeof(extern_type); |
| size_t __flen = __fmultiple * (__from_end - __from); |
| const size_t __tmultiple = sizeof(intern_type); |
| size_t __tlen = __tmultiple * (__to_end - __to); |
| |
| // Argument list for iconv specifies a byte sequence. Thus, |
| // all to/from arrays must be brutally casted to char*. |
| char* __cto = reinterpret_cast<char*>(__to); |
| char* __cfrom; |
| size_t __conv; |
| |
| // Some encodings need a byte order marker as the first item |
| // in the byte stream, to designate endian-ness. The default |
| // value for the byte order marker is NULL, so if this is |
| // the case, it's not necessary and we can just go on our |
| // merry way. |
| int __ext_bom = __state.external_bom(); |
| if (__ext_bom) |
| { |
| size_t __size = __from_end - __from; |
| extern_type* __cfixed = static_cast<extern_type*> |
| (__builtin_alloca(sizeof(extern_type) * (__size + 1))); |
| __cfixed[0] = static_cast<extern_type>(__ext_bom); |
| char_traits<extern_type>::copy(__cfixed + 1, __from, __size); |
| __cfrom = reinterpret_cast<char*>(__cfixed); |
| __conv = __iconv_adaptor(iconv, __desc, &__cfrom, |
| &__flen, &__cto, &__tlen); |
| } |
| else |
| { |
| extern_type* __cfixed = const_cast<extern_type*>(__from); |
| __cfrom = reinterpret_cast<char*>(__cfixed); |
| __conv = __iconv_adaptor(iconv, __desc, &__cfrom, |
| &__flen, &__cto, &__tlen); |
| } |
| |
| |
| if (__conv != size_t(-1)) |
| { |
| __from_next = reinterpret_cast<const extern_type*>(__cfrom); |
| __to_next = reinterpret_cast<intern_type*>(__cto); |
| __ret = codecvt_base::ok; |
| } |
| else |
| { |
| if (__flen < static_cast<size_t>(__from_end - __from)) |
| { |
| __from_next = reinterpret_cast<const extern_type*>(__cfrom); |
| __to_next = reinterpret_cast<intern_type*>(__cto); |
| __ret = codecvt_base::partial; |
| } |
| else |
| __ret = codecvt_base::error; |
| } |
| } |
| return __ret; |
| } |
| |
| template<typename _InternT, typename _ExternT> |
| int |
| codecvt<_InternT, _ExternT, encoding_state>:: |
| do_encoding() const throw() |
| { |
| int __ret = 0; |
| if (sizeof(_ExternT) <= sizeof(_InternT)) |
| __ret = sizeof(_InternT) / sizeof(_ExternT); |
| return __ret; |
| } |
| |
| template<typename _InternT, typename _ExternT> |
| bool |
| codecvt<_InternT, _ExternT, encoding_state>:: |
| do_always_noconv() const throw() |
| { return false; } |
| |
| template<typename _InternT, typename _ExternT> |
| int |
| codecvt<_InternT, _ExternT, encoding_state>:: |
| do_length(state_type&, const extern_type* __from, |
| const extern_type* __end, size_t __max) const |
| { return std::min(__max, static_cast<size_t>(__end - __from)); } |
| |
| // _GLIBCXX_RESOLVE_LIB_DEFECTS |
| // 74. Garbled text for codecvt::do_max_length |
| template<typename _InternT, typename _ExternT> |
| int |
| codecvt<_InternT, _ExternT, encoding_state>:: |
| do_max_length() const throw() |
| { return 1; } |
| |
| _GLIBCXX_END_NAMESPACE |
| |
| #endif |