3 * This file is part of LyX, the document processor.
4 * Licence details can be found in the file COPYING.
6 * \author Lars Gullik Bjønnes
8 * Full author contact details are available in file CREDITS.
10 * A collection of unicode conversion functions, using iconv.
15 #include "support/unicode.h"
16 #include "support/debug.h"
20 #include <boost/cstdint.hpp>
32 #ifdef WORDS_BIGENDIAN
33 char const * utf16_codeset = "UTF16-BE";
35 char const * utf16_codeset = "UTF16-LE";
43 #ifdef WORDS_BIGENDIAN
44 char const * ucs4_codeset = "UCS-4BE";
46 char const * ucs4_codeset = "UCS-4LE";
49 static const iconv_t invalid_cd = (iconv_t)(-1);
52 struct IconvProcessor::Impl
54 Impl(string const & to, string const & from)
55 : cd(invalid_cd), tocode_(to), fromcode_(from)
60 if (cd != invalid_cd && iconv_close(cd) == -1)
61 LYXERR0("Error returned from iconv_close(" << errno << ")");
70 IconvProcessor::IconvProcessor(char const * tocode, char const * fromcode)
71 : pimpl_(new IconvProcessor::Impl(tocode, fromcode))
76 IconvProcessor::IconvProcessor(IconvProcessor const & other)
77 : pimpl_(new IconvProcessor::Impl(other.pimpl_->tocode_, other.pimpl_->fromcode_))
82 IconvProcessor::~IconvProcessor()
88 void IconvProcessor::operator=(IconvProcessor const & other)
91 pimpl_ = new Impl(other.pimpl_->tocode_, other.pimpl_->fromcode_);
95 bool IconvProcessor::init()
97 if (pimpl_->cd != invalid_cd)
100 pimpl_->cd = iconv_open(pimpl_->tocode_.c_str(), pimpl_->fromcode_.c_str());
101 if (pimpl_->cd != invalid_cd)
104 lyxerr << "Error returned from iconv_open" << endl;
107 lyxerr << "EINVAL The conversion from " << pimpl_->fromcode_
108 << " to " << pimpl_->tocode_
109 << " is not supported by the implementation."
113 lyxerr << "\tSome other error: " << errno << endl;
120 int IconvProcessor::convert(char const * buf, size_t buflen,
121 char * outbuf, size_t maxoutsize)
126 if (pimpl_->cd == invalid_cd) {
131 char ICONV_CONST * inbuf = const_cast<char ICONV_CONST *>(buf);
132 size_t inbytesleft = buflen;
133 size_t outbytesleft = maxoutsize;
135 int res = iconv(pimpl_->cd, &inbuf, &inbytesleft, &outbuf, &outbytesleft);
137 // flush out remaining data. This is needed because iconv sometimes
138 // holds back chars in the stream, waiting for a combination character
139 // (see e.g. http://sources.redhat.com/bugzilla/show_bug.cgi?id=1124)
140 iconv(pimpl_->cd, NULL, NULL, &outbuf, &outbytesleft);
143 //lyxerr << "Inbytesleft: " << inbytesleft << endl;
144 //lyxerr << "Outbytesleft: " << outbytesleft << endl;
147 // Everything went well.
148 return maxoutsize - outbytesleft;
150 // There are some errors in the conversion
151 lyxerr << "Error returned from iconv" << endl;
154 lyxerr << "E2BIG There is not sufficient room at *outbuf." << endl;
157 lyxerr << "EILSEQ An invalid multibyte sequence"
158 << " has been encountered in the input.\n"
159 << "When converting from " << pimpl_->fromcode_
160 << " to " << pimpl_->tocode_ << ".\n";
161 lyxerr << "Input:" << hex;
162 for (size_t i = 0; i < buflen; ++i) {
163 // char may be signed, avoid output of
164 // something like 0xffffffc2
165 boost::uint32_t const b =
166 *reinterpret_cast<unsigned char const *>(buf + i);
167 lyxerr << " 0x" << (unsigned int)b;
169 lyxerr << dec << endl;
172 lyxerr << "EINVAL An incomplete multibyte sequence"
173 << " has been encountered in the input.\n"
174 << "When converting from " << pimpl_->fromcode_
175 << " to " << pimpl_->tocode_ << ".\n";
176 lyxerr << "Input:" << hex;
177 for (size_t i = 0; i < buflen; ++i) {
178 // char may be signed, avoid output of
179 // something like 0xffffffc2
180 boost::uint32_t const b =
181 *reinterpret_cast<unsigned char const *>(buf + i);
182 lyxerr << " 0x" << (unsigned int)b;
184 lyxerr << dec << endl;
187 lyxerr << "\tSome other error: " << errno << endl;
190 // We got an error so we close down the conversion engine
191 if (iconv_close(pimpl_->cd) == -1) {
192 lyxerr << "Error returned from iconv_close("
193 << errno << ")" << endl;
195 pimpl_->cd = invalid_cd;
203 template<typename RetType, typename InType>
205 iconv_convert(IconvProcessor & processor, InType const * buf, size_t buflen)
208 return vector<RetType>();
210 char const * inbuf = reinterpret_cast<char const *>(buf);
211 size_t inbytesleft = buflen * sizeof(InType);
213 size_t const outsize = 32768;
214 static char out[outsize];
217 int bytes = processor.convert(inbuf, inbytesleft, outbuf, outsize);
220 // FIXME Maybe throw an exception and handle that in the caller?
221 return vector<RetType>();
223 RetType const * tmp = reinterpret_cast<RetType const *>(out);
224 return vector<RetType>(tmp, tmp + bytes / sizeof(RetType));
230 vector<char_type> utf8_to_ucs4(vector<char> const & utf8str)
233 return vector<char_type>();
235 return utf8_to_ucs4(&utf8str[0], utf8str.size());
240 utf8_to_ucs4(char const * utf8str, size_t ls)
242 static IconvProcessor processor(ucs4_codeset, "UTF-8");
243 return iconv_convert<char_type>(processor, utf8str, ls);
248 utf16_to_ucs4(unsigned short const * s, size_t ls)
250 static IconvProcessor processor(ucs4_codeset, utf16_codeset);
251 return iconv_convert<char_type>(processor, s, ls);
255 vector<unsigned short>
256 ucs4_to_utf16(char_type const * s, size_t ls)
258 static IconvProcessor processor(utf16_codeset, ucs4_codeset);
259 return iconv_convert<unsigned short>(processor, s, ls);
264 ucs4_to_utf8(char_type c)
266 static IconvProcessor processor("UTF-8", ucs4_codeset);
267 return iconv_convert<char>(processor, &c, 1);
272 ucs4_to_utf8(vector<char_type> const & ucs4str)
275 return vector<char>();
277 return ucs4_to_utf8(&ucs4str[0], ucs4str.size());
282 ucs4_to_utf8(char_type const * ucs4str, size_t ls)
284 static IconvProcessor processor("UTF-8", ucs4_codeset);
285 return iconv_convert<char>(processor, ucs4str, ls);
290 eightbit_to_ucs4(char const * s, size_t ls, string const & encoding)
292 static map<string, IconvProcessor> processors;
293 if (processors.find(encoding) == processors.end()) {
294 IconvProcessor processor(ucs4_codeset, encoding.c_str());
295 processors.insert(make_pair(encoding, processor));
297 return iconv_convert<char_type>(processors[encoding], s, ls);
302 ucs4_to_eightbit(char_type const * ucs4str, size_t ls, string const & encoding)
304 static map<string, IconvProcessor> processors;
305 if (processors.find(encoding) == processors.end()) {
306 IconvProcessor processor(encoding.c_str(), ucs4_codeset);
307 processors.insert(make_pair(encoding, processor));
309 return iconv_convert<char>(processors[encoding], ucs4str, ls);
313 char ucs4_to_eightbit(char_type ucs4, string const & encoding)
315 static map<string, IconvProcessor> processors;
316 map<string, IconvProcessor>::iterator it = processors.find(encoding);
317 if (it == processors.end()) {
318 IconvProcessor processor(encoding.c_str(), ucs4_codeset);
319 it = processors.insert(make_pair(encoding, processor)).first;
323 int const bytes = it->second.convert((char *)(&ucs4), 4, &out, 1);
330 void ucs4_to_multibytes(char_type ucs4, vector<char> & out,
331 string const & encoding)
333 static map<string, IconvProcessor> processors;
334 map<string, IconvProcessor>::iterator it = processors.find(encoding);
335 if (it == processors.end()) {
336 IconvProcessor processor(encoding.c_str(), ucs4_codeset);
337 it = processors.insert(make_pair(encoding, processor)).first;
341 int bytes = it->second.convert((char *)(&ucs4), 4, &out[0], 4);