]> git.saurik.com Git - wxWidgets.git/blame - src/common/strconv.cpp
don't crash when using wxHtmlWidgetCell in wxHtmlListBox
[wxWidgets.git] / src / common / strconv.cpp
CommitLineData
6001e347 1/////////////////////////////////////////////////////////////////////////////
38d4b1e4 2// Name: src/common/strconv.cpp
6001e347 3// Purpose: Unicode conversion classes
15f2ee32
RN
4// Author: Ove Kaaven, Robert Roebling, Vadim Zeitlin, Vaclav Slavik,
5// Ryan Norton, Fredrik Roubert (UTF7)
6001e347
RR
6// Modified by:
7// Created: 29/01/98
8// RCS-ID: $Id$
e95354ec
VZ
9// Copyright: (c) 1999 Ove Kaaven, Robert Roebling, Vaclav Slavik
10// (c) 2000-2003 Vadim Zeitlin
15f2ee32 11// (c) 2004 Ryan Norton, Fredrik Roubert
65571936 12// Licence: wxWindows licence
6001e347
RR
13/////////////////////////////////////////////////////////////////////////////
14
6001e347
RR
15// For compilers that support precompilation, includes "wx.h".
16#include "wx/wxprec.h"
17
480f42ec
VS
18#ifdef __BORLANDC__
19 #pragma hdrstop
20#endif //__BORLANDC__
21
373658eb
VZ
22#ifndef WX_PRECOMP
23 #include "wx/intl.h"
24 #include "wx/log.h"
de6185e2 25 #include "wx/utils.h"
df69528b 26 #include "wx/hashmap.h"
ef199164 27#endif
373658eb 28
bde4baac
VZ
29#include "wx/strconv.h"
30
31#if wxUSE_WCHAR_T
32
1c193821 33#ifndef __WXWINCE__
1cd52418 34#include <errno.h>
1c193821
JS
35#endif
36
6001e347
RR
37#include <ctype.h>
38#include <string.h>
39#include <stdlib.h>
40
e95354ec 41#if defined(__WIN32__) && !defined(__WXMICROWIN__)
a6c2e2c7
VZ
42 #include "wx/msw/private.h"
43 #include "wx/msw/missing.h"
e95354ec 44 #define wxHAVE_WIN32_MB2WC
ef199164 45#endif
e95354ec 46
6001e347 47#ifdef __SALFORDC__
373658eb 48 #include <clib.h>
6001e347
RR
49#endif
50
b040e242 51#ifdef HAVE_ICONV
373658eb 52 #include <iconv.h>
b1d547eb 53 #include "wx/thread.h"
1cd52418 54#endif
1cd52418 55
373658eb
VZ
56#include "wx/encconv.h"
57#include "wx/fontmap.h"
58
335d31e0 59#ifdef __WXMAC__
40ba2f3b 60#ifndef __DARWIN__
4227afa4
SC
61#include <ATSUnicode.h>
62#include <TextCommon.h>
63#include <TextEncodingConverter.h>
40ba2f3b 64#endif
335d31e0 65
ef199164
DS
66// includes Mac headers
67#include "wx/mac/private.h"
335d31e0 68#endif
ce6f8d6f 69
ef199164 70
ce6f8d6f
VZ
71#define TRACE_STRCONV _T("strconv")
72
467e0479
VZ
73// WC_UTF16 is defined only if sizeof(wchar_t) == 2, otherwise it's supposed to
74// be 4 bytes
4948c2b6 75#if SIZEOF_WCHAR_T == 2
ac11db3a
MW
76 #define WC_UTF16
77#endif
78
ef199164 79
373658eb
VZ
80// ============================================================================
81// implementation
82// ============================================================================
83
69373110
VZ
84// helper function of cMB2WC(): check if n bytes at this location are all NUL
85static bool NotAllNULs(const char *p, size_t n)
86{
87 while ( n && *p++ == '\0' )
88 n--;
89
90 return n != 0;
91}
92
373658eb 93// ----------------------------------------------------------------------------
467e0479 94// UTF-16 en/decoding to/from UCS-4 with surrogates handling
373658eb 95// ----------------------------------------------------------------------------
6001e347 96
c91830cb 97static size_t encode_utf16(wxUint32 input, wxUint16 *output)
1cd52418 98{
ef199164 99 if (input <= 0xffff)
4def3b35 100 {
999836aa
VZ
101 if (output)
102 *output = (wxUint16) input;
ef199164 103
4def3b35 104 return 1;
dccce9ea 105 }
ef199164 106 else if (input >= 0x110000)
4def3b35 107 {
467e0479 108 return wxCONV_FAILED;
dccce9ea
VZ
109 }
110 else
4def3b35 111 {
dccce9ea 112 if (output)
4def3b35 113 {
ef199164
DS
114 *output++ = (wxUint16) ((input >> 10) + 0xd7c0);
115 *output = (wxUint16) ((input & 0x3ff) + 0xdc00);
4def3b35 116 }
ef199164 117
4def3b35 118 return 2;
1cd52418 119 }
1cd52418
OK
120}
121
c91830cb 122static size_t decode_utf16(const wxUint16* input, wxUint32& output)
1cd52418 123{
ef199164 124 if ((*input < 0xd800) || (*input > 0xdfff))
4def3b35
VS
125 {
126 output = *input;
127 return 1;
dccce9ea 128 }
ef199164 129 else if ((input[1] < 0xdc00) || (input[1] > 0xdfff))
4def3b35
VS
130 {
131 output = *input;
467e0479 132 return wxCONV_FAILED;
dccce9ea
VZ
133 }
134 else
4def3b35
VS
135 {
136 output = ((input[0] - 0xd7c0) << 10) + (input[1] - 0xdc00);
137 return 2;
138 }
1cd52418
OK
139}
140
467e0479 141#ifdef WC_UTF16
35d11700
VZ
142 typedef wchar_t wxDecodeSurrogate_t;
143#else // !WC_UTF16
144 typedef wxUint16 wxDecodeSurrogate_t;
145#endif // WC_UTF16/!WC_UTF16
467e0479
VZ
146
147// returns the next UTF-32 character from the wchar_t buffer and advances the
148// pointer to the character after this one
149//
150// if an invalid character is found, *pSrc is set to NULL, the caller must
151// check for this
35d11700 152static wxUint32 wxDecodeSurrogate(const wxDecodeSurrogate_t **pSrc)
467e0479
VZ
153{
154 wxUint32 out;
8d3dd069
VZ
155 const size_t
156 n = decode_utf16(wx_reinterpret_cast(const wxUint16 *, *pSrc), out);
467e0479
VZ
157 if ( n == wxCONV_FAILED )
158 *pSrc = NULL;
159 else
160 *pSrc += n;
161
162 return out;
163}
164
f6bcfd97 165// ----------------------------------------------------------------------------
6001e347 166// wxMBConv
f6bcfd97 167// ----------------------------------------------------------------------------
2c53a80a 168
483b0434
VZ
169size_t
170wxMBConv::ToWChar(wchar_t *dst, size_t dstLen,
171 const char *src, size_t srcLen) const
6001e347 172{
483b0434
VZ
173 // although new conversion classes are supposed to implement this function
174 // directly, the existins ones only implement the old MB2WC() and so, to
175 // avoid to have to rewrite all conversion classes at once, we provide a
176 // default (but not efficient) implementation of this one in terms of the
177 // old function by copying the input to ensure that it's NUL-terminated and
178 // then using MB2WC() to convert it
6001e347 179
483b0434
VZ
180 // the number of chars [which would be] written to dst [if it were not NULL]
181 size_t dstWritten = 0;
eec47cc6 182
c1464d9d 183 // the number of NULs terminating this string
a78c43f1 184 size_t nulLen = 0; // not really needed, but just to avoid warnings
eec47cc6 185
c1464d9d
VZ
186 // if we were not given the input size we just have to assume that the
187 // string is properly terminated as we have no way of knowing how long it
188 // is anyhow, but if we do have the size check whether there are enough
189 // NULs at the end
483b0434
VZ
190 wxCharBuffer bufTmp;
191 const char *srcEnd;
467e0479 192 if ( srcLen != wxNO_LEN )
eec47cc6 193 {
c1464d9d 194 // we need to know how to find the end of this string
7ef3ab50 195 nulLen = GetMBNulLen();
483b0434
VZ
196 if ( nulLen == wxCONV_FAILED )
197 return wxCONV_FAILED;
e4e3bbb4 198
c1464d9d 199 // if there are enough NULs we can avoid the copy
483b0434 200 if ( srcLen < nulLen || NotAllNULs(src + srcLen - nulLen, nulLen) )
eec47cc6
VZ
201 {
202 // make a copy in order to properly NUL-terminate the string
483b0434 203 bufTmp = wxCharBuffer(srcLen + nulLen - 1 /* 1 will be added */);
c1464d9d 204 char * const p = bufTmp.data();
483b0434
VZ
205 memcpy(p, src, srcLen);
206 for ( char *s = p + srcLen; s < p + srcLen + nulLen; s++ )
c1464d9d 207 *s = '\0';
483b0434
VZ
208
209 src = bufTmp;
eec47cc6 210 }
e4e3bbb4 211
483b0434
VZ
212 srcEnd = src + srcLen;
213 }
214 else // quit after the first loop iteration
215 {
216 srcEnd = NULL;
217 }
e4e3bbb4 218
483b0434 219 for ( ;; )
eec47cc6 220 {
c1464d9d 221 // try to convert the current chunk
483b0434 222 size_t lenChunk = MB2WC(NULL, src, 0);
483b0434
VZ
223 if ( lenChunk == wxCONV_FAILED )
224 return wxCONV_FAILED;
e4e3bbb4 225
467e0479 226 lenChunk++; // for the L'\0' at the end of this chunk
e4e3bbb4 227
483b0434 228 dstWritten += lenChunk;
f5fb6871 229
467e0479
VZ
230 if ( lenChunk == 1 )
231 {
232 // nothing left in the input string, conversion succeeded
233 break;
234 }
235
483b0434
VZ
236 if ( dst )
237 {
238 if ( dstWritten > dstLen )
239 return wxCONV_FAILED;
240
830f8f11 241 if ( MB2WC(dst, src, lenChunk) == wxCONV_FAILED )
483b0434
VZ
242 return wxCONV_FAILED;
243
244 dst += lenChunk;
245 }
c1464d9d 246
483b0434 247 if ( !srcEnd )
c1464d9d 248 {
467e0479
VZ
249 // we convert just one chunk in this case as this is the entire
250 // string anyhow
c1464d9d
VZ
251 break;
252 }
eec47cc6
VZ
253
254 // advance the input pointer past the end of this chunk
483b0434 255 while ( NotAllNULs(src, nulLen) )
c1464d9d
VZ
256 {
257 // notice that we must skip over multiple bytes here as we suppose
258 // that if NUL takes 2 or 4 bytes, then all the other characters do
259 // too and so if advanced by a single byte we might erroneously
260 // detect sequences of NUL bytes in the middle of the input
483b0434 261 src += nulLen;
c1464d9d 262 }
e4e3bbb4 263
483b0434 264 src += nulLen; // skipping over its terminator as well
c1464d9d
VZ
265
266 // note that ">=" (and not just "==") is needed here as the terminator
267 // we skipped just above could be inside or just after the buffer
268 // delimited by inEnd
483b0434 269 if ( src >= srcEnd )
c1464d9d
VZ
270 break;
271 }
272
483b0434 273 return dstWritten;
e4e3bbb4
RN
274}
275
483b0434
VZ
276size_t
277wxMBConv::FromWChar(char *dst, size_t dstLen,
278 const wchar_t *src, size_t srcLen) const
e4e3bbb4 279{
483b0434
VZ
280 // the number of chars [which would be] written to dst [if it were not NULL]
281 size_t dstWritten = 0;
e4e3bbb4 282
eec47cc6
VZ
283 // make a copy of the input string unless it is already properly
284 // NUL-terminated
285 //
286 // if we don't know its length we have no choice but to assume that it is,
287 // indeed, properly terminated
288 wxWCharBuffer bufTmp;
467e0479 289 if ( srcLen == wxNO_LEN )
e4e3bbb4 290 {
483b0434 291 srcLen = wxWcslen(src) + 1;
eec47cc6 292 }
483b0434 293 else if ( srcLen != 0 && src[srcLen - 1] != L'\0' )
eec47cc6
VZ
294 {
295 // make a copy in order to properly NUL-terminate the string
483b0434 296 bufTmp = wxWCharBuffer(srcLen);
ef199164 297 memcpy(bufTmp.data(), src, srcLen * sizeof(wchar_t));
483b0434
VZ
298 src = bufTmp;
299 }
300
301 const size_t lenNul = GetMBNulLen();
302 for ( const wchar_t * const srcEnd = src + srcLen;
303 src < srcEnd;
304 src += wxWcslen(src) + 1 /* skip L'\0' too */ )
305 {
306 // try to convert the current chunk
307 size_t lenChunk = WC2MB(NULL, src, 0);
308
309 if ( lenChunk == wxCONV_FAILED )
310 return wxCONV_FAILED;
311
312 lenChunk += lenNul;
313 dstWritten += lenChunk;
314
315 if ( dst )
316 {
317 if ( dstWritten > dstLen )
318 return wxCONV_FAILED;
319
320 if ( WC2MB(dst, src, lenChunk) == wxCONV_FAILED )
321 return wxCONV_FAILED;
322
323 dst += lenChunk;
324 }
eec47cc6 325 }
e4e3bbb4 326
483b0434
VZ
327 return dstWritten;
328}
329
ef199164 330size_t wxMBConv::MB2WC(wchar_t *outBuff, const char *inBuff, size_t outLen) const
509da451 331{
ef199164 332 size_t rc = ToWChar(outBuff, outLen, inBuff);
467e0479 333 if ( rc != wxCONV_FAILED )
509da451
VZ
334 {
335 // ToWChar() returns the buffer length, i.e. including the trailing
336 // NUL, while this method doesn't take it into account
337 rc--;
338 }
339
340 return rc;
341}
342
ef199164 343size_t wxMBConv::WC2MB(char *outBuff, const wchar_t *inBuff, size_t outLen) const
509da451 344{
ef199164 345 size_t rc = FromWChar(outBuff, outLen, inBuff);
467e0479 346 if ( rc != wxCONV_FAILED )
509da451
VZ
347 {
348 rc -= GetMBNulLen();
349 }
350
351 return rc;
352}
353
483b0434
VZ
354wxMBConv::~wxMBConv()
355{
356 // nothing to do here (necessary for Darwin linking probably)
357}
e4e3bbb4 358
483b0434
VZ
359const wxWCharBuffer wxMBConv::cMB2WC(const char *psz) const
360{
361 if ( psz )
eec47cc6 362 {
483b0434
VZ
363 // calculate the length of the buffer needed first
364 const size_t nLen = MB2WC(NULL, psz, 0);
467e0479 365 if ( nLen != wxCONV_FAILED )
f5fb6871 366 {
483b0434
VZ
367 // now do the actual conversion
368 wxWCharBuffer buf(nLen /* +1 added implicitly */);
eec47cc6 369
483b0434
VZ
370 // +1 for the trailing NULL
371 if ( MB2WC(buf.data(), psz, nLen + 1) != wxCONV_FAILED )
372 return buf;
f5fb6871 373 }
483b0434 374 }
e4e3bbb4 375
483b0434
VZ
376 return wxWCharBuffer();
377}
3698ae71 378
483b0434
VZ
379const wxCharBuffer wxMBConv::cWC2MB(const wchar_t *pwz) const
380{
381 if ( pwz )
382 {
383 const size_t nLen = WC2MB(NULL, pwz, 0);
467e0479 384 if ( nLen != wxCONV_FAILED )
483b0434
VZ
385 {
386 // extra space for trailing NUL(s)
387 static const size_t extraLen = GetMaxMBNulLen();
f5fb6871 388
483b0434
VZ
389 wxCharBuffer buf(nLen + extraLen - 1);
390 if ( WC2MB(buf.data(), pwz, nLen + extraLen) != wxCONV_FAILED )
391 return buf;
392 }
393 }
394
395 return wxCharBuffer();
396}
e4e3bbb4 397
483b0434 398const wxWCharBuffer
ef199164 399wxMBConv::cMB2WC(const char *inBuff, size_t inLen, size_t *outLen) const
483b0434 400{
ef199164 401 const size_t dstLen = ToWChar(NULL, 0, inBuff, inLen);
467e0479 402 if ( dstLen != wxCONV_FAILED )
483b0434 403 {
830f8f11 404 wxWCharBuffer wbuf(dstLen - 1);
ef199164 405 if ( ToWChar(wbuf.data(), dstLen, inBuff, inLen) != wxCONV_FAILED )
483b0434
VZ
406 {
407 if ( outLen )
467e0479
VZ
408 {
409 *outLen = dstLen;
410 if ( wbuf[dstLen - 1] == L'\0' )
411 (*outLen)--;
412 }
413
483b0434
VZ
414 return wbuf;
415 }
416 }
417
418 if ( outLen )
419 *outLen = 0;
420
421 return wxWCharBuffer();
422}
423
424const wxCharBuffer
ef199164 425wxMBConv::cWC2MB(const wchar_t *inBuff, size_t inLen, size_t *outLen) const
483b0434 426{
13d92ad6 427 size_t dstLen = FromWChar(NULL, 0, inBuff, inLen);
467e0479 428 if ( dstLen != wxCONV_FAILED )
483b0434 429 {
168a76fe
VZ
430 // special case of empty input: can't allocate 0 size buffer below as
431 // wxCharBuffer insists on NUL-terminating it
432 wxCharBuffer buf(dstLen ? dstLen - 1 : 1);
ef199164 433 if ( FromWChar(buf.data(), dstLen, inBuff, inLen) != wxCONV_FAILED )
483b0434
VZ
434 {
435 if ( outLen )
467e0479
VZ
436 {
437 *outLen = dstLen;
438
439 const size_t nulLen = GetMBNulLen();
13d92ad6
VZ
440 if ( dstLen >= nulLen &&
441 !NotAllNULs(buf.data() + dstLen - nulLen, nulLen) )
467e0479
VZ
442 {
443 // in this case the output is NUL-terminated and we're not
444 // supposed to count NUL
13d92ad6 445 *outLen -= nulLen;
467e0479
VZ
446 }
447 }
d32a507d 448
483b0434
VZ
449 return buf;
450 }
e4e3bbb4
RN
451 }
452
eec47cc6
VZ
453 if ( outLen )
454 *outLen = 0;
455
456 return wxCharBuffer();
e4e3bbb4
RN
457}
458
6001e347 459// ----------------------------------------------------------------------------
bde4baac 460// wxMBConvLibc
6001e347
RR
461// ----------------------------------------------------------------------------
462
bde4baac
VZ
463size_t wxMBConvLibc::MB2WC(wchar_t *buf, const char *psz, size_t n) const
464{
465 return wxMB2WC(buf, psz, n);
466}
467
468size_t wxMBConvLibc::WC2MB(char *buf, const wchar_t *psz, size_t n) const
469{
470 return wxWC2MB(buf, psz, n);
471}
e1bfe89e
RR
472
473// ----------------------------------------------------------------------------
532d575b 474// wxConvBrokenFileNames
e1bfe89e
RR
475// ----------------------------------------------------------------------------
476
eec47cc6
VZ
477#ifdef __UNIX__
478
845905d5 479wxConvBrokenFileNames::wxConvBrokenFileNames(const wxChar *charset)
ea8ce907 480{
845905d5
MW
481 if ( !charset || wxStricmp(charset, _T("UTF-8")) == 0
482 || wxStricmp(charset, _T("UTF8")) == 0 )
5deedd6e 483 m_conv = new wxMBConvUTF8(wxMBConvUTF8::MAP_INVALID_UTF8_TO_PUA);
845905d5
MW
484 else
485 m_conv = new wxCSConv(charset);
ea8ce907
RR
486}
487
eec47cc6 488#endif // __UNIX__
c12b7f79 489
bde4baac 490// ----------------------------------------------------------------------------
3698ae71 491// UTF-7
bde4baac 492// ----------------------------------------------------------------------------
6001e347 493
15f2ee32 494// Implementation (C) 2004 Fredrik Roubert
6001e347 495
15f2ee32
RN
496//
497// BASE64 decoding table
498//
499static const unsigned char utf7unb64[] =
6001e347 500{
15f2ee32
RN
501 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
502 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
503 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
504 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
505 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
506 0xff, 0xff, 0xff, 0x3e, 0xff, 0xff, 0xff, 0x3f,
507 0x34, 0x35, 0x36, 0x37, 0x38, 0x39, 0x3a, 0x3b,
508 0x3c, 0x3d, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
509 0xff, 0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06,
510 0x07, 0x08, 0x09, 0x0a, 0x0b, 0x0c, 0x0d, 0x0e,
511 0x0f, 0x10, 0x11, 0x12, 0x13, 0x14, 0x15, 0x16,
512 0x17, 0x18, 0x19, 0xff, 0xff, 0xff, 0xff, 0xff,
513 0xff, 0x1a, 0x1b, 0x1c, 0x1d, 0x1e, 0x1f, 0x20,
514 0x21, 0x22, 0x23, 0x24, 0x25, 0x26, 0x27, 0x28,
515 0x29, 0x2a, 0x2b, 0x2c, 0x2d, 0x2e, 0x2f, 0x30,
516 0x31, 0x32, 0x33, 0xff, 0xff, 0xff, 0xff, 0xff,
517 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
518 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
519 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
520 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
521 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
522 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
523 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
524 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
525 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
526 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
527 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
528 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
529 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
530 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
531 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
532 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff
533};
534
535size_t wxMBConvUTF7::MB2WC(wchar_t *buf, const char *psz, size_t n) const
536{
15f2ee32
RN
537 size_t len = 0;
538
04a37834 539 while ( *psz && (!buf || (len < n)) )
15f2ee32
RN
540 {
541 unsigned char cc = *psz++;
542 if (cc != '+')
543 {
544 // plain ASCII char
545 if (buf)
546 *buf++ = cc;
547 len++;
548 }
549 else if (*psz == '-')
550 {
551 // encoded plus sign
552 if (buf)
553 *buf++ = cc;
554 len++;
555 psz++;
556 }
04a37834 557 else // start of BASE64 encoded string
15f2ee32 558 {
04a37834 559 bool lsb, ok;
15f2ee32 560 unsigned int d, l;
04a37834
VZ
561 for ( ok = lsb = false, d = 0, l = 0;
562 (cc = utf7unb64[(unsigned char)*psz]) != 0xff;
563 psz++ )
15f2ee32
RN
564 {
565 d <<= 6;
566 d += cc;
567 for (l += 6; l >= 8; lsb = !lsb)
568 {
04a37834 569 unsigned char c = (unsigned char)((d >> (l -= 8)) % 256);
15f2ee32
RN
570 if (lsb)
571 {
572 if (buf)
573 *buf++ |= c;
574 len ++;
575 }
576 else
04a37834 577 {
15f2ee32 578 if (buf)
6356d52a 579 *buf = (wchar_t)(c << 8);
04a37834
VZ
580 }
581
582 ok = true;
15f2ee32
RN
583 }
584 }
04a37834
VZ
585
586 if ( !ok )
587 {
588 // in valid UTF7 we should have valid characters after '+'
467e0479 589 return wxCONV_FAILED;
04a37834
VZ
590 }
591
15f2ee32
RN
592 if (*psz == '-')
593 psz++;
594 }
595 }
04a37834
VZ
596
597 if ( buf && (len < n) )
598 *buf = '\0';
599
15f2ee32 600 return len;
6001e347
RR
601}
602
15f2ee32
RN
603//
604// BASE64 encoding table
605//
606static const unsigned char utf7enb64[] =
607{
608 'A', 'B', 'C', 'D', 'E', 'F', 'G', 'H',
609 'I', 'J', 'K', 'L', 'M', 'N', 'O', 'P',
610 'Q', 'R', 'S', 'T', 'U', 'V', 'W', 'X',
611 'Y', 'Z', 'a', 'b', 'c', 'd', 'e', 'f',
612 'g', 'h', 'i', 'j', 'k', 'l', 'm', 'n',
613 'o', 'p', 'q', 'r', 's', 't', 'u', 'v',
614 'w', 'x', 'y', 'z', '0', '1', '2', '3',
615 '4', '5', '6', '7', '8', '9', '+', '/'
616};
617
618//
619// UTF-7 encoding table
620//
621// 0 - Set D (directly encoded characters)
622// 1 - Set O (optional direct characters)
623// 2 - whitespace characters (optional)
624// 3 - special characters
625//
626static const unsigned char utf7encode[128] =
6001e347 627{
15f2ee32
RN
628 3, 3, 3, 3, 3, 3, 3, 3, 3, 2, 2, 3, 3, 2, 3, 3,
629 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3,
630 2, 1, 1, 1, 1, 1, 1, 0, 0, 0, 1, 3, 0, 0, 0, 3,
631 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 0,
632 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
633 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 3, 1, 1, 1,
634 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
635 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 3, 3
636};
637
667e5b3e 638size_t wxMBConvUTF7::WC2MB(char *buf, const wchar_t *psz, size_t n) const
15f2ee32 639{
15f2ee32
RN
640 size_t len = 0;
641
642 while (*psz && ((!buf) || (len < n)))
643 {
644 wchar_t cc = *psz++;
645 if (cc < 0x80 && utf7encode[cc] < 1)
646 {
647 // plain ASCII char
648 if (buf)
649 *buf++ = (char)cc;
ef199164 650
15f2ee32
RN
651 len++;
652 }
653#ifndef WC_UTF16
79c78d42 654 else if (((wxUint32)cc) > 0xffff)
b2c13097 655 {
15f2ee32 656 // no surrogate pair generation (yet?)
467e0479 657 return wxCONV_FAILED;
15f2ee32
RN
658 }
659#endif
660 else
661 {
662 if (buf)
663 *buf++ = '+';
ef199164 664
15f2ee32
RN
665 len++;
666 if (cc != '+')
667 {
668 // BASE64 encode string
669 unsigned int lsb, d, l;
73c902d6 670 for (d = 0, l = 0; /*nothing*/; psz++)
15f2ee32
RN
671 {
672 for (lsb = 0; lsb < 2; lsb ++)
673 {
674 d <<= 8;
675 d += lsb ? cc & 0xff : (cc & 0xff00) >> 8;
676
677 for (l += 8; l >= 6; )
678 {
679 l -= 6;
680 if (buf)
681 *buf++ = utf7enb64[(d >> l) % 64];
682 len++;
683 }
684 }
ef199164 685
15f2ee32
RN
686 cc = *psz;
687 if (!(cc) || (cc < 0x80 && utf7encode[cc] < 1))
688 break;
689 }
ef199164 690
15f2ee32
RN
691 if (l != 0)
692 {
693 if (buf)
694 *buf++ = utf7enb64[((d % 16) << (6 - l)) % 64];
ef199164 695
15f2ee32
RN
696 len++;
697 }
698 }
ef199164 699
15f2ee32
RN
700 if (buf)
701 *buf++ = '-';
702 len++;
703 }
704 }
ef199164 705
15f2ee32
RN
706 if (buf && (len < n))
707 *buf = 0;
ef199164 708
15f2ee32 709 return len;
6001e347
RR
710}
711
f6bcfd97 712// ----------------------------------------------------------------------------
6001e347 713// UTF-8
f6bcfd97 714// ----------------------------------------------------------------------------
6001e347 715
dccce9ea 716static wxUint32 utf8_max[]=
4def3b35 717 { 0x7f, 0x7ff, 0xffff, 0x1fffff, 0x3ffffff, 0x7fffffff, 0xffffffff };
6001e347 718
3698ae71
VZ
719// boundaries of the private use area we use to (temporarily) remap invalid
720// characters invalid in a UTF-8 encoded string
ea8ce907
RR
721const wxUint32 wxUnicodePUA = 0x100000;
722const wxUint32 wxUnicodePUAEnd = wxUnicodePUA + 256;
723
6001e347
RR
724size_t wxMBConvUTF8::MB2WC(wchar_t *buf, const char *psz, size_t n) const
725{
4def3b35
VS
726 size_t len = 0;
727
dccce9ea 728 while (*psz && ((!buf) || (len < n)))
4def3b35 729 {
ea8ce907
RR
730 const char *opsz = psz;
731 bool invalid = false;
4def3b35
VS
732 unsigned char cc = *psz++, fc = cc;
733 unsigned cnt;
dccce9ea 734 for (cnt = 0; fc & 0x80; cnt++)
4def3b35 735 fc <<= 1;
ef199164 736
dccce9ea 737 if (!cnt)
4def3b35
VS
738 {
739 // plain ASCII char
dccce9ea 740 if (buf)
4def3b35
VS
741 *buf++ = cc;
742 len++;
561488ef
MW
743
744 // escape the escape character for octal escapes
745 if ((m_options & MAP_INVALID_UTF8_TO_OCTAL)
746 && cc == '\\' && (!buf || len < n))
747 {
748 if (buf)
749 *buf++ = cc;
750 len++;
751 }
dccce9ea
VZ
752 }
753 else
4def3b35
VS
754 {
755 cnt--;
dccce9ea 756 if (!cnt)
4def3b35
VS
757 {
758 // invalid UTF-8 sequence
ea8ce907 759 invalid = true;
dccce9ea
VZ
760 }
761 else
4def3b35
VS
762 {
763 unsigned ocnt = cnt - 1;
764 wxUint32 res = cc & (0x3f >> cnt);
dccce9ea 765 while (cnt--)
4def3b35 766 {
ea8ce907 767 cc = *psz;
dccce9ea 768 if ((cc & 0xC0) != 0x80)
4def3b35
VS
769 {
770 // invalid UTF-8 sequence
ea8ce907
RR
771 invalid = true;
772 break;
4def3b35 773 }
ef199164 774
ea8ce907 775 psz++;
4def3b35
VS
776 res = (res << 6) | (cc & 0x3f);
777 }
ef199164 778
ea8ce907 779 if (invalid || res <= utf8_max[ocnt])
4def3b35
VS
780 {
781 // illegal UTF-8 encoding
ea8ce907 782 invalid = true;
4def3b35 783 }
ea8ce907
RR
784 else if ((m_options & MAP_INVALID_UTF8_TO_PUA) &&
785 res >= wxUnicodePUA && res < wxUnicodePUAEnd)
786 {
787 // if one of our PUA characters turns up externally
788 // it must also be treated as an illegal sequence
789 // (a bit like you have to escape an escape character)
790 invalid = true;
791 }
792 else
793 {
1cd52418 794#ifdef WC_UTF16
ea8ce907
RR
795 // cast is ok because wchar_t == wxUuint16 if WC_UTF16
796 size_t pa = encode_utf16(res, (wxUint16 *)buf);
467e0479 797 if (pa == wxCONV_FAILED)
ea8ce907
RR
798 {
799 invalid = true;
800 }
801 else
802 {
803 if (buf)
804 buf += pa;
805 len += pa;
806 }
373658eb 807#else // !WC_UTF16
ea8ce907 808 if (buf)
38d4b1e4 809 *buf++ = (wchar_t)res;
ea8ce907 810 len++;
373658eb 811#endif // WC_UTF16/!WC_UTF16
ea8ce907
RR
812 }
813 }
ef199164 814
ea8ce907
RR
815 if (invalid)
816 {
817 if (m_options & MAP_INVALID_UTF8_TO_PUA)
818 {
819 while (opsz < psz && (!buf || len < n))
820 {
821#ifdef WC_UTF16
822 // cast is ok because wchar_t == wxUuint16 if WC_UTF16
823 size_t pa = encode_utf16((unsigned char)*opsz + wxUnicodePUA, (wxUint16 *)buf);
467e0479 824 wxASSERT(pa != wxCONV_FAILED);
ea8ce907
RR
825 if (buf)
826 buf += pa;
827 opsz++;
828 len += pa;
829#else
830 if (buf)
38d4b1e4 831 *buf++ = (wchar_t)(wxUnicodePUA + (unsigned char)*opsz);
ea8ce907
RR
832 opsz++;
833 len++;
834#endif
835 }
836 }
3698ae71 837 else if (m_options & MAP_INVALID_UTF8_TO_OCTAL)
ea8ce907
RR
838 {
839 while (opsz < psz && (!buf || len < n))
840 {
3698ae71
VZ
841 if ( buf && len + 3 < n )
842 {
17a1ebd1 843 unsigned char on = *opsz;
3698ae71 844 *buf++ = L'\\';
17a1ebd1
VZ
845 *buf++ = (wchar_t)( L'0' + on / 0100 );
846 *buf++ = (wchar_t)( L'0' + (on % 0100) / 010 );
847 *buf++ = (wchar_t)( L'0' + on % 010 );
3698ae71 848 }
ef199164 849
ea8ce907
RR
850 opsz++;
851 len += 4;
852 }
853 }
3698ae71 854 else // MAP_INVALID_UTF8_NOT
ea8ce907 855 {
467e0479 856 return wxCONV_FAILED;
ea8ce907 857 }
4def3b35
VS
858 }
859 }
6001e347 860 }
ef199164 861
dccce9ea 862 if (buf && (len < n))
4def3b35 863 *buf = 0;
ef199164 864
4def3b35 865 return len;
6001e347
RR
866}
867
3698ae71
VZ
868static inline bool isoctal(wchar_t wch)
869{
870 return L'0' <= wch && wch <= L'7';
871}
872
6001e347
RR
873size_t wxMBConvUTF8::WC2MB(char *buf, const wchar_t *psz, size_t n) const
874{
4def3b35 875 size_t len = 0;
6001e347 876
dccce9ea 877 while (*psz && ((!buf) || (len < n)))
4def3b35
VS
878 {
879 wxUint32 cc;
ef199164 880
1cd52418 881#ifdef WC_UTF16
b5153fd8
VZ
882 // cast is ok for WC_UTF16
883 size_t pa = decode_utf16((const wxUint16 *)psz, cc);
467e0479 884 psz += (pa == wxCONV_FAILED) ? 1 : pa;
1cd52418 885#else
ef199164 886 cc = (*psz++) & 0x7fffffff;
4def3b35 887#endif
3698ae71
VZ
888
889 if ( (m_options & MAP_INVALID_UTF8_TO_PUA)
890 && cc >= wxUnicodePUA && cc < wxUnicodePUAEnd )
4def3b35 891 {
dccce9ea 892 if (buf)
ea8ce907 893 *buf++ = (char)(cc - wxUnicodePUA);
4def3b35 894 len++;
3698ae71 895 }
561488ef
MW
896 else if ( (m_options & MAP_INVALID_UTF8_TO_OCTAL)
897 && cc == L'\\' && psz[0] == L'\\' )
898 {
899 if (buf)
900 *buf++ = (char)cc;
901 psz++;
902 len++;
903 }
3698ae71
VZ
904 else if ( (m_options & MAP_INVALID_UTF8_TO_OCTAL) &&
905 cc == L'\\' &&
906 isoctal(psz[0]) && isoctal(psz[1]) && isoctal(psz[2]) )
4def3b35 907 {
dccce9ea 908 if (buf)
3698ae71 909 {
ef199164
DS
910 *buf++ = (char) ((psz[0] - L'0') * 0100 +
911 (psz[1] - L'0') * 010 +
b2c13097 912 (psz[2] - L'0'));
3698ae71
VZ
913 }
914
915 psz += 3;
ea8ce907
RR
916 len++;
917 }
918 else
919 {
920 unsigned cnt;
ef199164
DS
921 for (cnt = 0; cc > utf8_max[cnt]; cnt++)
922 {
923 }
924
ea8ce907 925 if (!cnt)
4def3b35 926 {
ea8ce907
RR
927 // plain ASCII char
928 if (buf)
929 *buf++ = (char) cc;
930 len++;
931 }
ea8ce907
RR
932 else
933 {
934 len += cnt + 1;
935 if (buf)
936 {
937 *buf++ = (char) ((-128 >> cnt) | ((cc >> (cnt * 6)) & (0x3f >> cnt)));
938 while (cnt--)
939 *buf++ = (char) (0x80 | ((cc >> (cnt * 6)) & 0x3f));
940 }
4def3b35
VS
941 }
942 }
6001e347 943 }
4def3b35 944
ef199164 945 if (buf && (len < n))
3698ae71 946 *buf = 0;
adb45366 947
4def3b35 948 return len;
6001e347
RR
949}
950
467e0479 951// ============================================================================
c91830cb 952// UTF-16
467e0479 953// ============================================================================
c91830cb
VZ
954
955#ifdef WORDS_BIGENDIAN
bde4baac
VZ
956 #define wxMBConvUTF16straight wxMBConvUTF16BE
957 #define wxMBConvUTF16swap wxMBConvUTF16LE
c91830cb 958#else
bde4baac
VZ
959 #define wxMBConvUTF16swap wxMBConvUTF16BE
960 #define wxMBConvUTF16straight wxMBConvUTF16LE
c91830cb
VZ
961#endif
962
467e0479
VZ
963/* static */
964size_t wxMBConvUTF16Base::GetLength(const char *src, size_t srcLen)
965{
966 if ( srcLen == wxNO_LEN )
967 {
968 // count the number of bytes in input, including the trailing NULs
ef199164
DS
969 const wxUint16 *inBuff = wx_reinterpret_cast(const wxUint16 *, src);
970 for ( srcLen = 1; *inBuff++; srcLen++ )
467e0479 971 ;
c91830cb 972
467e0479
VZ
973 srcLen *= BYTES_PER_CHAR;
974 }
975 else // we already have the length
976 {
977 // we can only convert an entire number of UTF-16 characters
978 if ( srcLen % BYTES_PER_CHAR )
979 return wxCONV_FAILED;
980 }
981
982 return srcLen;
983}
984
985// case when in-memory representation is UTF-16 too
c91830cb
VZ
986#ifdef WC_UTF16
987
467e0479
VZ
988// ----------------------------------------------------------------------------
989// conversions without endianness change
990// ----------------------------------------------------------------------------
991
992size_t
993wxMBConvUTF16straight::ToWChar(wchar_t *dst, size_t dstLen,
994 const char *src, size_t srcLen) const
c91830cb 995{
467e0479
VZ
996 // set up the scene for using memcpy() (which is presumably more efficient
997 // than copying the bytes one by one)
998 srcLen = GetLength(src, srcLen);
999 if ( srcLen == wxNO_LEN )
1000 return wxCONV_FAILED;
c91830cb 1001
ef199164 1002 const size_t inLen = srcLen / BYTES_PER_CHAR;
467e0479 1003 if ( dst )
c91830cb 1004 {
467e0479
VZ
1005 if ( dstLen < inLen )
1006 return wxCONV_FAILED;
c91830cb 1007
467e0479 1008 memcpy(dst, src, srcLen);
c91830cb 1009 }
d32a507d 1010
467e0479 1011 return inLen;
c91830cb
VZ
1012}
1013
467e0479
VZ
1014size_t
1015wxMBConvUTF16straight::FromWChar(char *dst, size_t dstLen,
1016 const wchar_t *src, size_t srcLen) const
c91830cb 1017{
467e0479
VZ
1018 if ( srcLen == wxNO_LEN )
1019 srcLen = wxWcslen(src) + 1;
c91830cb 1020
467e0479
VZ
1021 srcLen *= BYTES_PER_CHAR;
1022
1023 if ( dst )
c91830cb 1024 {
467e0479
VZ
1025 if ( dstLen < srcLen )
1026 return wxCONV_FAILED;
d32a507d 1027
467e0479 1028 memcpy(dst, src, srcLen);
c91830cb 1029 }
d32a507d 1030
467e0479 1031 return srcLen;
c91830cb
VZ
1032}
1033
467e0479
VZ
1034// ----------------------------------------------------------------------------
1035// endian-reversing conversions
1036// ----------------------------------------------------------------------------
c91830cb 1037
467e0479
VZ
1038size_t
1039wxMBConvUTF16swap::ToWChar(wchar_t *dst, size_t dstLen,
1040 const char *src, size_t srcLen) const
c91830cb 1041{
467e0479
VZ
1042 srcLen = GetLength(src, srcLen);
1043 if ( srcLen == wxNO_LEN )
1044 return wxCONV_FAILED;
c91830cb 1045
467e0479
VZ
1046 srcLen /= BYTES_PER_CHAR;
1047
1048 if ( dst )
c91830cb 1049 {
467e0479
VZ
1050 if ( dstLen < srcLen )
1051 return wxCONV_FAILED;
1052
ef199164
DS
1053 const wxUint16 *inBuff = wx_reinterpret_cast(const wxUint16 *, src);
1054 for ( size_t n = 0; n < srcLen; n++, inBuff++ )
c91830cb 1055 {
ef199164 1056 *dst++ = wxUINT16_SWAP_ALWAYS(*inBuff);
c91830cb 1057 }
c91830cb 1058 }
bfab25d4 1059
467e0479 1060 return srcLen;
c91830cb
VZ
1061}
1062
467e0479
VZ
1063size_t
1064wxMBConvUTF16swap::FromWChar(char *dst, size_t dstLen,
1065 const wchar_t *src, size_t srcLen) const
c91830cb 1066{
467e0479
VZ
1067 if ( srcLen == wxNO_LEN )
1068 srcLen = wxWcslen(src) + 1;
c91830cb 1069
467e0479
VZ
1070 srcLen *= BYTES_PER_CHAR;
1071
1072 if ( dst )
c91830cb 1073 {
467e0479
VZ
1074 if ( dstLen < srcLen )
1075 return wxCONV_FAILED;
1076
ef199164 1077 wxUint16 *outBuff = wx_reinterpret_cast(wxUint16 *, dst);
467e0479 1078 for ( size_t n = 0; n < srcLen; n += BYTES_PER_CHAR, src++ )
c91830cb 1079 {
ef199164 1080 *outBuff++ = wxUINT16_SWAP_ALWAYS(*src);
c91830cb 1081 }
c91830cb 1082 }
eec47cc6 1083
467e0479 1084 return srcLen;
c91830cb
VZ
1085}
1086
467e0479 1087#else // !WC_UTF16: wchar_t is UTF-32
c91830cb 1088
467e0479
VZ
1089// ----------------------------------------------------------------------------
1090// conversions without endianness change
1091// ----------------------------------------------------------------------------
c91830cb 1092
35d11700
VZ
1093size_t
1094wxMBConvUTF16straight::ToWChar(wchar_t *dst, size_t dstLen,
1095 const char *src, size_t srcLen) const
c91830cb 1096{
35d11700
VZ
1097 srcLen = GetLength(src, srcLen);
1098 if ( srcLen == wxNO_LEN )
1099 return wxCONV_FAILED;
c91830cb 1100
ef199164 1101 const size_t inLen = srcLen / BYTES_PER_CHAR;
35d11700 1102 if ( !dst )
c91830cb 1103 {
35d11700
VZ
1104 // optimization: return maximal space which could be needed for this
1105 // string even if the real size could be smaller if the buffer contains
1106 // any surrogates
1107 return inLen;
c91830cb 1108 }
c91830cb 1109
35d11700 1110 size_t outLen = 0;
ef199164
DS
1111 const wxUint16 *inBuff = wx_reinterpret_cast(const wxUint16 *, src);
1112 for ( const wxUint16 * const inEnd = inBuff + inLen; inBuff < inEnd; )
35d11700 1113 {
ef199164
DS
1114 const wxUint32 ch = wxDecodeSurrogate(&inBuff);
1115 if ( !inBuff )
35d11700
VZ
1116 return wxCONV_FAILED;
1117
1118 if ( ++outLen > dstLen )
1119 return wxCONV_FAILED;
c91830cb 1120
35d11700
VZ
1121 *dst++ = ch;
1122 }
1123
1124
1125 return outLen;
1126}
c91830cb 1127
35d11700
VZ
1128size_t
1129wxMBConvUTF16straight::FromWChar(char *dst, size_t dstLen,
1130 const wchar_t *src, size_t srcLen) const
c91830cb 1131{
35d11700
VZ
1132 if ( srcLen == wxNO_LEN )
1133 srcLen = wxWcslen(src) + 1;
c91830cb 1134
35d11700 1135 size_t outLen = 0;
ef199164 1136 wxUint16 *outBuff = wx_reinterpret_cast(wxUint16 *, dst);
35d11700 1137 for ( size_t n = 0; n < srcLen; n++ )
c91830cb
VZ
1138 {
1139 wxUint16 cc[2];
35d11700
VZ
1140 const size_t numChars = encode_utf16(*src++, cc);
1141 if ( numChars == wxCONV_FAILED )
1142 return wxCONV_FAILED;
c91830cb 1143
ef199164
DS
1144 outLen += numChars * BYTES_PER_CHAR;
1145 if ( outBuff )
c91830cb 1146 {
35d11700
VZ
1147 if ( outLen > dstLen )
1148 return wxCONV_FAILED;
1149
ef199164 1150 *outBuff++ = cc[0];
35d11700 1151 if ( numChars == 2 )
69b80d28 1152 {
35d11700 1153 // second character of a surrogate
ef199164 1154 *outBuff++ = cc[1];
69b80d28 1155 }
c91830cb 1156 }
c91830cb 1157 }
c91830cb 1158
35d11700 1159 return outLen;
c91830cb
VZ
1160}
1161
467e0479
VZ
1162// ----------------------------------------------------------------------------
1163// endian-reversing conversions
1164// ----------------------------------------------------------------------------
c91830cb 1165
35d11700
VZ
1166size_t
1167wxMBConvUTF16swap::ToWChar(wchar_t *dst, size_t dstLen,
1168 const char *src, size_t srcLen) const
c91830cb 1169{
35d11700
VZ
1170 srcLen = GetLength(src, srcLen);
1171 if ( srcLen == wxNO_LEN )
1172 return wxCONV_FAILED;
1173
ef199164 1174 const size_t inLen = srcLen / BYTES_PER_CHAR;
35d11700
VZ
1175 if ( !dst )
1176 {
1177 // optimization: return maximal space which could be needed for this
1178 // string even if the real size could be smaller if the buffer contains
1179 // any surrogates
1180 return inLen;
1181 }
c91830cb 1182
35d11700 1183 size_t outLen = 0;
ef199164
DS
1184 const wxUint16 *inBuff = wx_reinterpret_cast(const wxUint16 *, src);
1185 for ( const wxUint16 * const inEnd = inBuff + inLen; inBuff < inEnd; )
c91830cb 1186 {
35d11700
VZ
1187 wxUint32 ch;
1188 wxUint16 tmp[2];
ef199164
DS
1189
1190 tmp[0] = wxUINT16_SWAP_ALWAYS(*inBuff);
1191 inBuff++;
1192 tmp[1] = wxUINT16_SWAP_ALWAYS(*inBuff);
c91830cb 1193
35d11700
VZ
1194 const size_t numChars = decode_utf16(tmp, ch);
1195 if ( numChars == wxCONV_FAILED )
1196 return wxCONV_FAILED;
c91830cb 1197
35d11700 1198 if ( numChars == 2 )
ef199164 1199 inBuff++;
35d11700
VZ
1200
1201 if ( ++outLen > dstLen )
1202 return wxCONV_FAILED;
c91830cb 1203
35d11700 1204 *dst++ = ch;
c91830cb 1205 }
c91830cb 1206
c91830cb 1207
35d11700
VZ
1208 return outLen;
1209}
c91830cb 1210
35d11700
VZ
1211size_t
1212wxMBConvUTF16swap::FromWChar(char *dst, size_t dstLen,
1213 const wchar_t *src, size_t srcLen) const
c91830cb 1214{
35d11700
VZ
1215 if ( srcLen == wxNO_LEN )
1216 srcLen = wxWcslen(src) + 1;
c91830cb 1217
35d11700 1218 size_t outLen = 0;
ef199164 1219 wxUint16 *outBuff = wx_reinterpret_cast(wxUint16 *, dst);
35d11700 1220 for ( const wchar_t *srcEnd = src + srcLen; src < srcEnd; src++ )
c91830cb
VZ
1221 {
1222 wxUint16 cc[2];
35d11700
VZ
1223 const size_t numChars = encode_utf16(*src, cc);
1224 if ( numChars == wxCONV_FAILED )
1225 return wxCONV_FAILED;
c91830cb 1226
ef199164
DS
1227 outLen += numChars * BYTES_PER_CHAR;
1228 if ( outBuff )
c91830cb 1229 {
35d11700
VZ
1230 if ( outLen > dstLen )
1231 return wxCONV_FAILED;
1232
ef199164 1233 *outBuff++ = wxUINT16_SWAP_ALWAYS(cc[0]);
35d11700 1234 if ( numChars == 2 )
c91830cb 1235 {
35d11700 1236 // second character of a surrogate
ef199164 1237 *outBuff++ = wxUINT16_SWAP_ALWAYS(cc[1]);
c91830cb
VZ
1238 }
1239 }
c91830cb 1240 }
c91830cb 1241
35d11700 1242 return outLen;
c91830cb
VZ
1243}
1244
467e0479 1245#endif // WC_UTF16/!WC_UTF16
c91830cb
VZ
1246
1247
35d11700 1248// ============================================================================
c91830cb 1249// UTF-32
35d11700 1250// ============================================================================
c91830cb
VZ
1251
1252#ifdef WORDS_BIGENDIAN
467e0479
VZ
1253 #define wxMBConvUTF32straight wxMBConvUTF32BE
1254 #define wxMBConvUTF32swap wxMBConvUTF32LE
c91830cb 1255#else
467e0479
VZ
1256 #define wxMBConvUTF32swap wxMBConvUTF32BE
1257 #define wxMBConvUTF32straight wxMBConvUTF32LE
c91830cb
VZ
1258#endif
1259
1260
1261WXDLLIMPEXP_DATA_BASE(wxMBConvUTF32LE) wxConvUTF32LE;
1262WXDLLIMPEXP_DATA_BASE(wxMBConvUTF32BE) wxConvUTF32BE;
1263
467e0479
VZ
1264/* static */
1265size_t wxMBConvUTF32Base::GetLength(const char *src, size_t srcLen)
1266{
1267 if ( srcLen == wxNO_LEN )
1268 {
1269 // count the number of bytes in input, including the trailing NULs
ef199164
DS
1270 const wxUint32 *inBuff = wx_reinterpret_cast(const wxUint32 *, src);
1271 for ( srcLen = 1; *inBuff++; srcLen++ )
467e0479 1272 ;
c91830cb 1273
467e0479
VZ
1274 srcLen *= BYTES_PER_CHAR;
1275 }
1276 else // we already have the length
1277 {
1278 // we can only convert an entire number of UTF-32 characters
1279 if ( srcLen % BYTES_PER_CHAR )
1280 return wxCONV_FAILED;
1281 }
1282
1283 return srcLen;
1284}
1285
1286// case when in-memory representation is UTF-16
c91830cb
VZ
1287#ifdef WC_UTF16
1288
467e0479
VZ
1289// ----------------------------------------------------------------------------
1290// conversions without endianness change
1291// ----------------------------------------------------------------------------
1292
1293size_t
1294wxMBConvUTF32straight::ToWChar(wchar_t *dst, size_t dstLen,
1295 const char *src, size_t srcLen) const
c91830cb 1296{
467e0479
VZ
1297 srcLen = GetLength(src, srcLen);
1298 if ( srcLen == wxNO_LEN )
1299 return wxCONV_FAILED;
c91830cb 1300
ef199164
DS
1301 const wxUint32 *inBuff = wx_reinterpret_cast(const wxUint32 *, src);
1302 const size_t inLen = srcLen / BYTES_PER_CHAR;
467e0479
VZ
1303 size_t outLen = 0;
1304 for ( size_t n = 0; n < inLen; n++ )
c91830cb
VZ
1305 {
1306 wxUint16 cc[2];
ef199164 1307 const size_t numChars = encode_utf16(*inBuff++, cc);
467e0479
VZ
1308 if ( numChars == wxCONV_FAILED )
1309 return wxCONV_FAILED;
c91830cb 1310
467e0479
VZ
1311 outLen += numChars;
1312 if ( dst )
c91830cb 1313 {
467e0479
VZ
1314 if ( outLen > dstLen )
1315 return wxCONV_FAILED;
d32a507d 1316
467e0479
VZ
1317 *dst++ = cc[0];
1318 if ( numChars == 2 )
1319 {
1320 // second character of a surrogate
1321 *dst++ = cc[1];
1322 }
1323 }
c91830cb 1324 }
d32a507d 1325
467e0479 1326 return outLen;
c91830cb
VZ
1327}
1328
467e0479
VZ
1329size_t
1330wxMBConvUTF32straight::FromWChar(char *dst, size_t dstLen,
1331 const wchar_t *src, size_t srcLen) const
c91830cb 1332{
467e0479
VZ
1333 if ( srcLen == wxNO_LEN )
1334 srcLen = wxWcslen(src) + 1;
c91830cb 1335
467e0479 1336 if ( !dst )
c91830cb 1337 {
467e0479
VZ
1338 // optimization: return maximal space which could be needed for this
1339 // string instead of the exact amount which could be less if there are
1340 // any surrogates in the input
1341 //
1342 // we consider that surrogates are rare enough to make it worthwhile to
1343 // avoid running the loop below at the cost of slightly extra memory
1344 // consumption
ef199164 1345 return srcLen * BYTES_PER_CHAR;
467e0479 1346 }
c91830cb 1347
ef199164 1348 wxUint32 *outBuff = wx_reinterpret_cast(wxUint32 *, dst);
467e0479
VZ
1349 size_t outLen = 0;
1350 for ( const wchar_t * const srcEnd = src + srcLen; src < srcEnd; )
1351 {
1352 const wxUint32 ch = wxDecodeSurrogate(&src);
1353 if ( !src )
1354 return wxCONV_FAILED;
c91830cb 1355
467e0479 1356 outLen += BYTES_PER_CHAR;
d32a507d 1357
467e0479
VZ
1358 if ( outLen > dstLen )
1359 return wxCONV_FAILED;
b5153fd8 1360
ef199164 1361 *outBuff++ = ch;
467e0479 1362 }
c91830cb 1363
467e0479 1364 return outLen;
c91830cb
VZ
1365}
1366
467e0479
VZ
1367// ----------------------------------------------------------------------------
1368// endian-reversing conversions
1369// ----------------------------------------------------------------------------
c91830cb 1370
467e0479
VZ
1371size_t
1372wxMBConvUTF32swap::ToWChar(wchar_t *dst, size_t dstLen,
1373 const char *src, size_t srcLen) const
c91830cb 1374{
467e0479
VZ
1375 srcLen = GetLength(src, srcLen);
1376 if ( srcLen == wxNO_LEN )
1377 return wxCONV_FAILED;
c91830cb 1378
ef199164
DS
1379 const wxUint32 *inBuff = wx_reinterpret_cast(const wxUint32 *, src);
1380 const size_t inLen = srcLen / BYTES_PER_CHAR;
467e0479 1381 size_t outLen = 0;
ef199164 1382 for ( size_t n = 0; n < inLen; n++, inBuff++ )
c91830cb 1383 {
c91830cb 1384 wxUint16 cc[2];
ef199164 1385 const size_t numChars = encode_utf16(wxUINT32_SWAP_ALWAYS(*inBuff), cc);
467e0479
VZ
1386 if ( numChars == wxCONV_FAILED )
1387 return wxCONV_FAILED;
c91830cb 1388
467e0479
VZ
1389 outLen += numChars;
1390 if ( dst )
c91830cb 1391 {
467e0479
VZ
1392 if ( outLen > dstLen )
1393 return wxCONV_FAILED;
d32a507d 1394
467e0479
VZ
1395 *dst++ = cc[0];
1396 if ( numChars == 2 )
1397 {
1398 // second character of a surrogate
1399 *dst++ = cc[1];
1400 }
1401 }
c91830cb 1402 }
b5153fd8 1403
467e0479 1404 return outLen;
c91830cb
VZ
1405}
1406
467e0479
VZ
1407size_t
1408wxMBConvUTF32swap::FromWChar(char *dst, size_t dstLen,
1409 const wchar_t *src, size_t srcLen) const
c91830cb 1410{
467e0479
VZ
1411 if ( srcLen == wxNO_LEN )
1412 srcLen = wxWcslen(src) + 1;
c91830cb 1413
467e0479 1414 if ( !dst )
c91830cb 1415 {
467e0479
VZ
1416 // optimization: return maximal space which could be needed for this
1417 // string instead of the exact amount which could be less if there are
1418 // any surrogates in the input
1419 //
1420 // we consider that surrogates are rare enough to make it worthwhile to
1421 // avoid running the loop below at the cost of slightly extra memory
1422 // consumption
1423 return srcLen*BYTES_PER_CHAR;
1424 }
c91830cb 1425
ef199164 1426 wxUint32 *outBuff = wx_reinterpret_cast(wxUint32 *, dst);
467e0479
VZ
1427 size_t outLen = 0;
1428 for ( const wchar_t * const srcEnd = src + srcLen; src < srcEnd; )
1429 {
1430 const wxUint32 ch = wxDecodeSurrogate(&src);
1431 if ( !src )
1432 return wxCONV_FAILED;
c91830cb 1433
467e0479 1434 outLen += BYTES_PER_CHAR;
d32a507d 1435
467e0479
VZ
1436 if ( outLen > dstLen )
1437 return wxCONV_FAILED;
b5153fd8 1438
ef199164 1439 *outBuff++ = wxUINT32_SWAP_ALWAYS(ch);
467e0479 1440 }
c91830cb 1441
467e0479 1442 return outLen;
c91830cb
VZ
1443}
1444
467e0479 1445#else // !WC_UTF16: wchar_t is UTF-32
c91830cb 1446
35d11700
VZ
1447// ----------------------------------------------------------------------------
1448// conversions without endianness change
1449// ----------------------------------------------------------------------------
1450
1451size_t
1452wxMBConvUTF32straight::ToWChar(wchar_t *dst, size_t dstLen,
1453 const char *src, size_t srcLen) const
c91830cb 1454{
35d11700
VZ
1455 // use memcpy() as it should be much faster than hand-written loop
1456 srcLen = GetLength(src, srcLen);
1457 if ( srcLen == wxNO_LEN )
1458 return wxCONV_FAILED;
c91830cb 1459
35d11700
VZ
1460 const size_t inLen = srcLen/BYTES_PER_CHAR;
1461 if ( dst )
c91830cb 1462 {
35d11700
VZ
1463 if ( dstLen < inLen )
1464 return wxCONV_FAILED;
b5153fd8 1465
35d11700
VZ
1466 memcpy(dst, src, srcLen);
1467 }
c91830cb 1468
35d11700 1469 return inLen;
c91830cb
VZ
1470}
1471
35d11700
VZ
1472size_t
1473wxMBConvUTF32straight::FromWChar(char *dst, size_t dstLen,
1474 const wchar_t *src, size_t srcLen) const
c91830cb 1475{
35d11700
VZ
1476 if ( srcLen == wxNO_LEN )
1477 srcLen = wxWcslen(src) + 1;
1478
1479 srcLen *= BYTES_PER_CHAR;
c91830cb 1480
35d11700 1481 if ( dst )
c91830cb 1482 {
35d11700
VZ
1483 if ( dstLen < srcLen )
1484 return wxCONV_FAILED;
c91830cb 1485
35d11700 1486 memcpy(dst, src, srcLen);
c91830cb
VZ
1487 }
1488
35d11700 1489 return srcLen;
c91830cb
VZ
1490}
1491
35d11700
VZ
1492// ----------------------------------------------------------------------------
1493// endian-reversing conversions
1494// ----------------------------------------------------------------------------
c91830cb 1495
35d11700
VZ
1496size_t
1497wxMBConvUTF32swap::ToWChar(wchar_t *dst, size_t dstLen,
1498 const char *src, size_t srcLen) const
c91830cb 1499{
35d11700
VZ
1500 srcLen = GetLength(src, srcLen);
1501 if ( srcLen == wxNO_LEN )
1502 return wxCONV_FAILED;
1503
1504 srcLen /= BYTES_PER_CHAR;
c91830cb 1505
35d11700 1506 if ( dst )
c91830cb 1507 {
35d11700
VZ
1508 if ( dstLen < srcLen )
1509 return wxCONV_FAILED;
1510
ef199164
DS
1511 const wxUint32 *inBuff = wx_reinterpret_cast(const wxUint32 *, src);
1512 for ( size_t n = 0; n < srcLen; n++, inBuff++ )
c91830cb 1513 {
ef199164 1514 *dst++ = wxUINT32_SWAP_ALWAYS(*inBuff);
c91830cb 1515 }
c91830cb 1516 }
b5153fd8 1517
35d11700 1518 return srcLen;
c91830cb
VZ
1519}
1520
35d11700
VZ
1521size_t
1522wxMBConvUTF32swap::FromWChar(char *dst, size_t dstLen,
1523 const wchar_t *src, size_t srcLen) const
c91830cb 1524{
35d11700
VZ
1525 if ( srcLen == wxNO_LEN )
1526 srcLen = wxWcslen(src) + 1;
1527
1528 srcLen *= BYTES_PER_CHAR;
c91830cb 1529
35d11700 1530 if ( dst )
c91830cb 1531 {
35d11700
VZ
1532 if ( dstLen < srcLen )
1533 return wxCONV_FAILED;
1534
ef199164 1535 wxUint32 *outBuff = wx_reinterpret_cast(wxUint32 *, dst);
35d11700 1536 for ( size_t n = 0; n < srcLen; n += BYTES_PER_CHAR, src++ )
c91830cb 1537 {
ef199164 1538 *outBuff++ = wxUINT32_SWAP_ALWAYS(*src);
c91830cb 1539 }
c91830cb 1540 }
b5153fd8 1541
35d11700 1542 return srcLen;
c91830cb
VZ
1543}
1544
467e0479 1545#endif // WC_UTF16/!WC_UTF16
c91830cb
VZ
1546
1547
36acb880
VZ
1548// ============================================================================
1549// The classes doing conversion using the iconv_xxx() functions
1550// ============================================================================
3caec1bb 1551
b040e242 1552#ifdef HAVE_ICONV
3a0d76bc 1553
b1d547eb
VS
1554// VS: glibc 2.1.3 is broken in that iconv() conversion to/from UCS4 fails with
1555// E2BIG if output buffer is _exactly_ as big as needed. Such case is
1556// (unless there's yet another bug in glibc) the only case when iconv()
1557// returns with (size_t)-1 (which means error) and says there are 0 bytes
1558// left in the input buffer -- when _real_ error occurs,
1559// bytes-left-in-input buffer is non-zero. Hence, this alternative test for
1560// iconv() failure.
3caec1bb
VS
1561// [This bug does not appear in glibc 2.2.]
1562#if defined(__GLIBC__) && __GLIBC__ == 2 && __GLIBC_MINOR__ <= 1
1563#define ICONV_FAILED(cres, bufLeft) ((cres == (size_t)-1) && \
1564 (errno != E2BIG || bufLeft != 0))
1565#else
1566#define ICONV_FAILED(cres, bufLeft) (cres == (size_t)-1)
1567#endif
1568
ab217dba 1569#define ICONV_CHAR_CAST(x) ((ICONV_CONST char **)(x))
36acb880 1570
74a7eb0b
VZ
1571#define ICONV_T_INVALID ((iconv_t)-1)
1572
1573#if SIZEOF_WCHAR_T == 4
1574 #define WC_BSWAP wxUINT32_SWAP_ALWAYS
1575 #define WC_ENC wxFONTENCODING_UTF32
1576#elif SIZEOF_WCHAR_T == 2
1577 #define WC_BSWAP wxUINT16_SWAP_ALWAYS
1578 #define WC_ENC wxFONTENCODING_UTF16
1579#else // sizeof(wchar_t) != 2 nor 4
1580 // does this ever happen?
1581 #error "Unknown sizeof(wchar_t): please report this to wx-dev@lists.wxwindows.org"
1582#endif
1583
36acb880 1584// ----------------------------------------------------------------------------
e95354ec 1585// wxMBConv_iconv: encapsulates an iconv character set
36acb880
VZ
1586// ----------------------------------------------------------------------------
1587
e95354ec 1588class wxMBConv_iconv : public wxMBConv
1cd52418
OK
1589{
1590public:
e95354ec
VZ
1591 wxMBConv_iconv(const wxChar *name);
1592 virtual ~wxMBConv_iconv();
36acb880 1593
bde4baac
VZ
1594 virtual size_t MB2WC(wchar_t *buf, const char *psz, size_t n) const;
1595 virtual size_t WC2MB(char *buf, const wchar_t *psz, size_t n) const;
36acb880 1596
d36c9347 1597 // classify this encoding as explained in wxMBConv::GetMBNulLen() comment
7ef3ab50
VZ
1598 virtual size_t GetMBNulLen() const;
1599
ba98e032
VS
1600#if wxUSE_UNICODE_UTF8
1601 virtual bool IsUTF8() const;
1602#endif
1603
d36c9347
VZ
1604 virtual wxMBConv *Clone() const
1605 {
1606 wxMBConv_iconv *p = new wxMBConv_iconv(m_name);
1607 p->m_minMBCharWidth = m_minMBCharWidth;
1608 return p;
1609 }
1610
e95354ec 1611 bool IsOk() const
74a7eb0b 1612 { return (m2w != ICONV_T_INVALID) && (w2m != ICONV_T_INVALID); }
36acb880
VZ
1613
1614protected:
ef199164
DS
1615 // the iconv handlers used to translate from multibyte
1616 // to wide char and in the other direction
36acb880
VZ
1617 iconv_t m2w,
1618 w2m;
ef199164 1619
b1d547eb
VS
1620#if wxUSE_THREADS
1621 // guards access to m2w and w2m objects
1622 wxMutex m_iconvMutex;
1623#endif
36acb880
VZ
1624
1625private:
e95354ec 1626 // the name (for iconv_open()) of a wide char charset -- if none is
36acb880 1627 // available on this machine, it will remain NULL
74a7eb0b 1628 static wxString ms_wcCharsetName;
36acb880
VZ
1629
1630 // true if the wide char encoding we use (i.e. ms_wcCharsetName) has
1631 // different endian-ness than the native one
405d8f46 1632 static bool ms_wcNeedsSwap;
eec47cc6 1633
d36c9347
VZ
1634
1635 // name of the encoding handled by this conversion
1636 wxString m_name;
1637
7ef3ab50 1638 // cached result of GetMBNulLen(); set to 0 meaning "unknown"
c1464d9d
VZ
1639 // initially
1640 size_t m_minMBCharWidth;
36acb880
VZ
1641};
1642
8f115891
MW
1643// make the constructor available for unit testing
1644WXDLLIMPEXP_BASE wxMBConv* new_wxMBConv_iconv( const wxChar* name )
1645{
1646 wxMBConv_iconv* result = new wxMBConv_iconv( name );
1647 if ( !result->IsOk() )
1648 {
1649 delete result;
1650 return 0;
1651 }
ef199164 1652
8f115891
MW
1653 return result;
1654}
1655
422e411e 1656wxString wxMBConv_iconv::ms_wcCharsetName;
e95354ec 1657bool wxMBConv_iconv::ms_wcNeedsSwap = false;
36acb880 1658
e95354ec 1659wxMBConv_iconv::wxMBConv_iconv(const wxChar *name)
d36c9347 1660 : m_name(name)
36acb880 1661{
c1464d9d 1662 m_minMBCharWidth = 0;
eec47cc6 1663
0331b385
VZ
1664 // iconv operates with chars, not wxChars, but luckily it uses only ASCII
1665 // names for the charsets
200a9923 1666 const wxCharBuffer cname(wxString(name).ToAscii());
04c79127 1667
36acb880 1668 // check for charset that represents wchar_t:
74a7eb0b 1669 if ( ms_wcCharsetName.empty() )
f1339c56 1670 {
c2b83fdd
VZ
1671 wxLogTrace(TRACE_STRCONV, _T("Looking for wide char codeset:"));
1672
74a7eb0b
VZ
1673#if wxUSE_FONTMAP
1674 const wxChar **names = wxFontMapperBase::GetAllEncodingNames(WC_ENC);
1675#else // !wxUSE_FONTMAP
91cb7f52 1676 static const wxChar *names_static[] =
36acb880 1677 {
74a7eb0b
VZ
1678#if SIZEOF_WCHAR_T == 4
1679 _T("UCS-4"),
1680#elif SIZEOF_WCHAR_T = 2
1681 _T("UCS-2"),
1682#endif
1683 NULL
1684 };
91cb7f52 1685 const wxChar **names = names_static;
74a7eb0b 1686#endif // wxUSE_FONTMAP/!wxUSE_FONTMAP
36acb880 1687
d1f024a8 1688 for ( ; *names && ms_wcCharsetName.empty(); ++names )
74a7eb0b 1689 {
17a1ebd1 1690 const wxString nameCS(*names);
74a7eb0b
VZ
1691
1692 // first try charset with explicit bytesex info (e.g. "UCS-4LE"):
17a1ebd1 1693 wxString nameXE(nameCS);
ef199164
DS
1694
1695#ifdef WORDS_BIGENDIAN
74a7eb0b 1696 nameXE += _T("BE");
ef199164 1697#else // little endian
74a7eb0b 1698 nameXE += _T("LE");
ef199164 1699#endif
74a7eb0b 1700
c2b83fdd
VZ
1701 wxLogTrace(TRACE_STRCONV, _T(" trying charset \"%s\""),
1702 nameXE.c_str());
1703
74a7eb0b
VZ
1704 m2w = iconv_open(nameXE.ToAscii(), cname);
1705 if ( m2w == ICONV_T_INVALID )
3a0d76bc 1706 {
74a7eb0b 1707 // try charset w/o bytesex info (e.g. "UCS4")
c2b83fdd
VZ
1708 wxLogTrace(TRACE_STRCONV, _T(" trying charset \"%s\""),
1709 nameCS.c_str());
17a1ebd1 1710 m2w = iconv_open(nameCS.ToAscii(), cname);
3a0d76bc 1711
74a7eb0b
VZ
1712 // and check for bytesex ourselves:
1713 if ( m2w != ICONV_T_INVALID )
3a0d76bc 1714 {
74a7eb0b
VZ
1715 char buf[2], *bufPtr;
1716 wchar_t wbuf[2], *wbufPtr;
1717 size_t insz, outsz;
1718 size_t res;
1719
1720 buf[0] = 'A';
1721 buf[1] = 0;
1722 wbuf[0] = 0;
1723 insz = 2;
1724 outsz = SIZEOF_WCHAR_T * 2;
1725 wbufPtr = wbuf;
1726 bufPtr = buf;
1727
ef199164
DS
1728 res = iconv(
1729 m2w, ICONV_CHAR_CAST(&bufPtr), &insz,
1730 (char**)&wbufPtr, &outsz);
74a7eb0b
VZ
1731
1732 if (ICONV_FAILED(res, insz))
1733 {
1734 wxLogLastError(wxT("iconv"));
422e411e 1735 wxLogError(_("Conversion to charset '%s' doesn't work."),
17a1ebd1 1736 nameCS.c_str());
74a7eb0b
VZ
1737 }
1738 else // ok, can convert to this encoding, remember it
1739 {
17a1ebd1 1740 ms_wcCharsetName = nameCS;
74a7eb0b
VZ
1741 ms_wcNeedsSwap = wbuf[0] != (wchar_t)buf[0];
1742 }
3a0d76bc
VS
1743 }
1744 }
74a7eb0b 1745 else // use charset not requiring byte swapping
36acb880 1746 {
74a7eb0b 1747 ms_wcCharsetName = nameXE;
36acb880 1748 }
3a0d76bc 1749 }
74a7eb0b 1750
0944fceb 1751 wxLogTrace(TRACE_STRCONV,
74a7eb0b 1752 wxT("iconv wchar_t charset is \"%s\"%s"),
cae8f1bf 1753 ms_wcCharsetName.empty() ? _T("<none>")
74a7eb0b
VZ
1754 : ms_wcCharsetName.c_str(),
1755 ms_wcNeedsSwap ? _T(" (needs swap)")
1756 : _T(""));
3a0d76bc 1757 }
36acb880 1758 else // we already have ms_wcCharsetName
3caec1bb 1759 {
74a7eb0b 1760 m2w = iconv_open(ms_wcCharsetName.ToAscii(), cname);
f1339c56 1761 }
dccce9ea 1762
74a7eb0b 1763 if ( ms_wcCharsetName.empty() )
f1339c56 1764 {
74a7eb0b 1765 w2m = ICONV_T_INVALID;
36acb880 1766 }
405d8f46
VZ
1767 else
1768 {
74a7eb0b
VZ
1769 w2m = iconv_open(cname, ms_wcCharsetName.ToAscii());
1770 if ( w2m == ICONV_T_INVALID )
1771 {
1772 wxLogTrace(TRACE_STRCONV,
1773 wxT("\"%s\" -> \"%s\" works but not the converse!?"),
422e411e 1774 ms_wcCharsetName.c_str(), cname.data());
74a7eb0b 1775 }
405d8f46 1776 }
36acb880 1777}
3caec1bb 1778
e95354ec 1779wxMBConv_iconv::~wxMBConv_iconv()
36acb880 1780{
74a7eb0b 1781 if ( m2w != ICONV_T_INVALID )
36acb880 1782 iconv_close(m2w);
74a7eb0b 1783 if ( w2m != ICONV_T_INVALID )
36acb880
VZ
1784 iconv_close(w2m);
1785}
3a0d76bc 1786
bde4baac 1787size_t wxMBConv_iconv::MB2WC(wchar_t *buf, const char *psz, size_t n) const
36acb880 1788{
69373110
VZ
1789 // find the string length: notice that must be done differently for
1790 // NUL-terminated strings and UTF-16/32 which are terminated with 2/4 NULs
1791 size_t inbuf;
7ef3ab50 1792 const size_t nulLen = GetMBNulLen();
69373110
VZ
1793 switch ( nulLen )
1794 {
1795 default:
467e0479 1796 return wxCONV_FAILED;
69373110
VZ
1797
1798 case 1:
1799 inbuf = strlen(psz); // arguably more optimized than our version
1800 break;
1801
1802 case 2:
1803 case 4:
1804 // for UTF-16/32 not only we need to have 2/4 consecutive NULs but
1805 // they also have to start at character boundary and not span two
1806 // adjacent characters
1807 const char *p;
1808 for ( p = psz; NotAllNULs(p, nulLen); p += nulLen )
1809 ;
1810 inbuf = p - psz;
1811 break;
1812 }
1813
b1d547eb 1814#if wxUSE_THREADS
6a17b868
SN
1815 // NB: iconv() is MT-safe, but each thread must use its own iconv_t handle.
1816 // Unfortunately there are a couple of global wxCSConv objects such as
b1d547eb
VS
1817 // wxConvLocal that are used all over wx code, so we have to make sure
1818 // the handle is used by at most one thread at the time. Otherwise
1819 // only a few wx classes would be safe to use from non-main threads
1820 // as MB<->WC conversion would fail "randomly".
1821 wxMutexLocker lock(wxConstCast(this, wxMBConv_iconv)->m_iconvMutex);
69373110
VZ
1822#endif // wxUSE_THREADS
1823
36acb880
VZ
1824 size_t outbuf = n * SIZEOF_WCHAR_T;
1825 size_t res, cres;
1826 // VS: Use these instead of psz, buf because iconv() modifies its arguments:
1827 wchar_t *bufPtr = buf;
1828 const char *pszPtr = psz;
1829
1830 if (buf)
1831 {
1832 // have destination buffer, convert there
1833 cres = iconv(m2w,
1834 ICONV_CHAR_CAST(&pszPtr), &inbuf,
1835 (char**)&bufPtr, &outbuf);
1836 res = n - (outbuf / SIZEOF_WCHAR_T);
dccce9ea 1837
36acb880 1838 if (ms_wcNeedsSwap)
3a0d76bc 1839 {
36acb880 1840 // convert to native endianness
17a1ebd1
VZ
1841 for ( unsigned i = 0; i < res; i++ )
1842 buf[n] = WC_BSWAP(buf[i]);
3a0d76bc 1843 }
adb45366 1844
69373110 1845 // NUL-terminate the string if there is any space left
49dd9820
VS
1846 if (res < n)
1847 buf[res] = 0;
36acb880
VZ
1848 }
1849 else
1850 {
1851 // no destination buffer... convert using temp buffer
1852 // to calculate destination buffer requirement
1853 wchar_t tbuf[8];
1854 res = 0;
ef199164
DS
1855
1856 do
1857 {
36acb880 1858 bufPtr = tbuf;
ef199164 1859 outbuf = 8 * SIZEOF_WCHAR_T;
36acb880
VZ
1860
1861 cres = iconv(m2w,
1862 ICONV_CHAR_CAST(&pszPtr), &inbuf,
1863 (char**)&bufPtr, &outbuf );
1864
ef199164
DS
1865 res += 8 - (outbuf / SIZEOF_WCHAR_T);
1866 }
1867 while ((cres == (size_t)-1) && (errno == E2BIG));
f1339c56 1868 }
dccce9ea 1869
36acb880 1870 if (ICONV_FAILED(cres, inbuf))
f1339c56 1871 {
36acb880 1872 //VS: it is ok if iconv fails, hence trace only
ce6f8d6f 1873 wxLogTrace(TRACE_STRCONV, wxT("iconv failed: %s"), wxSysErrorMsg(wxSysErrorCode()));
467e0479 1874 return wxCONV_FAILED;
36acb880
VZ
1875 }
1876
1877 return res;
1878}
1879
bde4baac 1880size_t wxMBConv_iconv::WC2MB(char *buf, const wchar_t *psz, size_t n) const
36acb880 1881{
b1d547eb
VS
1882#if wxUSE_THREADS
1883 // NB: explained in MB2WC
1884 wxMutexLocker lock(wxConstCast(this, wxMBConv_iconv)->m_iconvMutex);
1885#endif
3698ae71 1886
156162ec
MW
1887 size_t inlen = wxWcslen(psz);
1888 size_t inbuf = inlen * SIZEOF_WCHAR_T;
36acb880
VZ
1889 size_t outbuf = n;
1890 size_t res, cres;
3a0d76bc 1891
36acb880 1892 wchar_t *tmpbuf = 0;
3caec1bb 1893
36acb880
VZ
1894 if (ms_wcNeedsSwap)
1895 {
1896 // need to copy to temp buffer to switch endianness
74a7eb0b 1897 // (doing WC_BSWAP twice on the original buffer won't help, as it
36acb880 1898 // could be in read-only memory, or be accessed in some other thread)
74a7eb0b 1899 tmpbuf = (wchar_t *)malloc(inbuf + SIZEOF_WCHAR_T);
17a1ebd1
VZ
1900 for ( size_t i = 0; i < inlen; i++ )
1901 tmpbuf[n] = WC_BSWAP(psz[i]);
ef199164 1902
156162ec 1903 tmpbuf[inlen] = L'\0';
74a7eb0b 1904 psz = tmpbuf;
36acb880 1905 }
3a0d76bc 1906
36acb880
VZ
1907 if (buf)
1908 {
1909 // have destination buffer, convert there
1910 cres = iconv( w2m, ICONV_CHAR_CAST(&psz), &inbuf, &buf, &outbuf );
3a0d76bc 1911
ef199164 1912 res = n - outbuf;
adb45366 1913
49dd9820
VS
1914 // NB: iconv was given only wcslen(psz) characters on input, and so
1915 // it couldn't convert the trailing zero. Let's do it ourselves
1916 // if there's some room left for it in the output buffer.
1917 if (res < n)
1918 buf[0] = 0;
36acb880
VZ
1919 }
1920 else
1921 {
ef199164 1922 // no destination buffer: convert using temp buffer
36acb880
VZ
1923 // to calculate destination buffer requirement
1924 char tbuf[16];
1925 res = 0;
ef199164
DS
1926 do
1927 {
1928 buf = tbuf;
1929 outbuf = 16;
36acb880
VZ
1930
1931 cres = iconv( w2m, ICONV_CHAR_CAST(&psz), &inbuf, &buf, &outbuf );
dccce9ea 1932
36acb880 1933 res += 16 - outbuf;
ef199164
DS
1934 }
1935 while ((cres == (size_t)-1) && (errno == E2BIG));
f1339c56 1936 }
dccce9ea 1937
36acb880
VZ
1938 if (ms_wcNeedsSwap)
1939 {
1940 free(tmpbuf);
1941 }
dccce9ea 1942
36acb880
VZ
1943 if (ICONV_FAILED(cres, inbuf))
1944 {
ce6f8d6f 1945 wxLogTrace(TRACE_STRCONV, wxT("iconv failed: %s"), wxSysErrorMsg(wxSysErrorCode()));
467e0479 1946 return wxCONV_FAILED;
36acb880
VZ
1947 }
1948
1949 return res;
1950}
1951
7ef3ab50 1952size_t wxMBConv_iconv::GetMBNulLen() const
eec47cc6 1953{
c1464d9d 1954 if ( m_minMBCharWidth == 0 )
eec47cc6
VZ
1955 {
1956 wxMBConv_iconv * const self = wxConstCast(this, wxMBConv_iconv);
1957
1958#if wxUSE_THREADS
1959 // NB: explained in MB2WC
1960 wxMutexLocker lock(self->m_iconvMutex);
1961#endif
1962
356410fc 1963 wchar_t *wnul = L"";
c1464d9d 1964 char buf[8]; // should be enough for NUL in any encoding
356410fc 1965 size_t inLen = sizeof(wchar_t),
c1464d9d 1966 outLen = WXSIZEOF(buf);
ef199164
DS
1967 char *inBuff = (char *)wnul;
1968 char *outBuff = buf;
1969 if ( iconv(w2m, ICONV_CHAR_CAST(&inBuff), &inLen, &outBuff, &outLen) == (size_t)-1 )
356410fc 1970 {
c1464d9d 1971 self->m_minMBCharWidth = (size_t)-1;
356410fc
VZ
1972 }
1973 else // ok
1974 {
ef199164 1975 self->m_minMBCharWidth = outBuff - buf;
356410fc 1976 }
eec47cc6
VZ
1977 }
1978
c1464d9d 1979 return m_minMBCharWidth;
eec47cc6
VZ
1980}
1981
ba98e032
VS
1982#if wxUSE_UNICODE_UTF8
1983bool wxMBConv_iconv::IsUTF8() const
1984{
48a2e193
VS
1985 return wxStricmp(m_name, _T("UTF-8")) == 0 ||
1986 wxStricmp(m_name, _T("UTF8")) == 0;
ba98e032
VS
1987}
1988#endif
1989
b040e242 1990#endif // HAVE_ICONV
36acb880 1991
e95354ec 1992
36acb880
VZ
1993// ============================================================================
1994// Win32 conversion classes
1995// ============================================================================
1cd52418 1996
e95354ec 1997#ifdef wxHAVE_WIN32_MB2WC
373658eb 1998
8b04d4c4 1999// from utils.cpp
d775fa82 2000#if wxUSE_FONTMAP
8b04d4c4
VZ
2001extern WXDLLIMPEXP_BASE long wxCharsetToCodepage(const wxChar *charset);
2002extern WXDLLIMPEXP_BASE long wxEncodingToCodepage(wxFontEncoding encoding);
7608a683 2003#endif
373658eb 2004
e95354ec 2005class wxMBConv_win32 : public wxMBConv
1cd52418
OK
2006{
2007public:
bde4baac
VZ
2008 wxMBConv_win32()
2009 {
2010 m_CodePage = CP_ACP;
c1464d9d 2011 m_minMBCharWidth = 0;
bde4baac
VZ
2012 }
2013
d36c9347 2014 wxMBConv_win32(const wxMBConv_win32& conv)
1e1c5d62 2015 : wxMBConv()
d36c9347
VZ
2016 {
2017 m_CodePage = conv.m_CodePage;
2018 m_minMBCharWidth = conv.m_minMBCharWidth;
2019 }
2020
7608a683 2021#if wxUSE_FONTMAP
e95354ec 2022 wxMBConv_win32(const wxChar* name)
bde4baac
VZ
2023 {
2024 m_CodePage = wxCharsetToCodepage(name);
c1464d9d 2025 m_minMBCharWidth = 0;
bde4baac 2026 }
dccce9ea 2027
e95354ec 2028 wxMBConv_win32(wxFontEncoding encoding)
bde4baac
VZ
2029 {
2030 m_CodePage = wxEncodingToCodepage(encoding);
c1464d9d 2031 m_minMBCharWidth = 0;
bde4baac 2032 }
eec47cc6 2033#endif // wxUSE_FONTMAP
8b04d4c4 2034
d36c9347 2035 virtual size_t MB2WC(wchar_t *buf, const char *psz, size_t n) const
f1339c56 2036 {
02272c9c
VZ
2037 // note that we have to use MB_ERR_INVALID_CHARS flag as it without it
2038 // the behaviour is not compatible with the Unix version (using iconv)
2039 // and break the library itself, e.g. wxTextInputStream::NextChar()
2040 // wouldn't work if reading an incomplete MB char didn't result in an
2041 // error
667e5b3e 2042 //
89028980 2043 // Moreover, MB_ERR_INVALID_CHARS is only supported on Win 2K SP4 or
830f8f11
VZ
2044 // Win XP or newer and it is not supported for UTF-[78] so we always
2045 // use our own conversions in this case. See
89028980
VS
2046 // http://blogs.msdn.com/michkap/archive/2005/04/19/409566.aspx
2047 // http://msdn.microsoft.com/library/en-us/intl/unicode_17si.asp
830f8f11 2048 if ( m_CodePage == CP_UTF8 )
89028980 2049 {
5487ff0f 2050 return wxMBConvUTF8().MB2WC(buf, psz, n);
89028980 2051 }
830f8f11
VZ
2052
2053 if ( m_CodePage == CP_UTF7 )
2054 {
5487ff0f 2055 return wxMBConvUTF7().MB2WC(buf, psz, n);
830f8f11
VZ
2056 }
2057
2058 int flags = 0;
2059 if ( (m_CodePage < 50000 && m_CodePage != CP_SYMBOL) &&
2060 IsAtLeastWin2kSP4() )
89028980 2061 {
830f8f11 2062 flags = MB_ERR_INVALID_CHARS;
89028980 2063 }
667e5b3e 2064
2b5f62a0
VZ
2065 const size_t len = ::MultiByteToWideChar
2066 (
2067 m_CodePage, // code page
667e5b3e 2068 flags, // flags: fall on error
2b5f62a0
VZ
2069 psz, // input string
2070 -1, // its length (NUL-terminated)
b4da152e 2071 buf, // output string
2b5f62a0
VZ
2072 buf ? n : 0 // size of output buffer
2073 );
89028980
VS
2074 if ( !len )
2075 {
2076 // function totally failed
467e0479 2077 return wxCONV_FAILED;
89028980
VS
2078 }
2079
2080 // if we were really converting and didn't use MB_ERR_INVALID_CHARS,
2081 // check if we succeeded, by doing a double trip:
2082 if ( !flags && buf )
2083 {
53c174fc
VZ
2084 const size_t mbLen = strlen(psz);
2085 wxCharBuffer mbBuf(mbLen);
89028980
VS
2086 if ( ::WideCharToMultiByte
2087 (
2088 m_CodePage,
2089 0,
2090 buf,
2091 -1,
2092 mbBuf.data(),
53c174fc 2093 mbLen + 1, // size in bytes, not length
89028980
VS
2094 NULL,
2095 NULL
2096 ) == 0 ||
2097 strcmp(mbBuf, psz) != 0 )
2098 {
2099 // we didn't obtain the same thing we started from, hence
2100 // the conversion was lossy and we consider that it failed
467e0479 2101 return wxCONV_FAILED;
89028980
VS
2102 }
2103 }
2b5f62a0 2104
03a991bc
VZ
2105 // note that it returns count of written chars for buf != NULL and size
2106 // of the needed buffer for buf == NULL so in either case the length of
2107 // the string (which never includes the terminating NUL) is one less
89028980 2108 return len - 1;
f1339c56 2109 }
dccce9ea 2110
d36c9347 2111 virtual size_t WC2MB(char *buf, const wchar_t *pwz, size_t n) const
f1339c56 2112 {
13dd924a
VZ
2113 /*
2114 we have a problem here: by default, WideCharToMultiByte() may
2115 replace characters unrepresentable in the target code page with bad
2116 quality approximations such as turning "1/2" symbol (U+00BD) into
2117 "1" for the code pages which don't have it and we, obviously, want
2118 to avoid this at any price
d775fa82 2119
13dd924a
VZ
2120 the trouble is that this function does it _silently_, i.e. it won't
2121 even tell us whether it did or not... Win98/2000 and higher provide
2122 WC_NO_BEST_FIT_CHARS but it doesn't work for the older systems and
2123 we have to resort to a round trip, i.e. check that converting back
2124 results in the same string -- this is, of course, expensive but
2125 otherwise we simply can't be sure to not garble the data.
2126 */
2127
2128 // determine if we can rely on WC_NO_BEST_FIT_CHARS: according to MSDN
2129 // it doesn't work with CJK encodings (which we test for rather roughly
2130 // here...) nor with UTF-7/8 nor, of course, with Windows versions not
2131 // supporting it
907173e5
WS
2132 BOOL usedDef wxDUMMY_INITIALIZE(false);
2133 BOOL *pUsedDef;
13dd924a
VZ
2134 int flags;
2135 if ( CanUseNoBestFit() && m_CodePage < 50000 )
2136 {
2137 // it's our lucky day
2138 flags = WC_NO_BEST_FIT_CHARS;
2139 pUsedDef = &usedDef;
2140 }
2141 else // old system or unsupported encoding
2142 {
2143 flags = 0;
2144 pUsedDef = NULL;
2145 }
2146
2b5f62a0
VZ
2147 const size_t len = ::WideCharToMultiByte
2148 (
2149 m_CodePage, // code page
13dd924a
VZ
2150 flags, // either none or no best fit
2151 pwz, // input string
2b5f62a0
VZ
2152 -1, // it is (wide) NUL-terminated
2153 buf, // output buffer
2154 buf ? n : 0, // and its size
2155 NULL, // default "replacement" char
13dd924a 2156 pUsedDef // [out] was it used?
2b5f62a0
VZ
2157 );
2158
13dd924a
VZ
2159 if ( !len )
2160 {
2161 // function totally failed
467e0479 2162 return wxCONV_FAILED;
13dd924a
VZ
2163 }
2164
2165 // if we were really converting, check if we succeeded
2166 if ( buf )
2167 {
2168 if ( flags )
2169 {
2170 // check if the conversion failed, i.e. if any replacements
2171 // were done
2172 if ( usedDef )
467e0479 2173 return wxCONV_FAILED;
13dd924a
VZ
2174 }
2175 else // we must resort to double tripping...
2176 {
2177 wxWCharBuffer wcBuf(n);
467e0479 2178 if ( MB2WC(wcBuf.data(), buf, n) == wxCONV_FAILED ||
13dd924a
VZ
2179 wcscmp(wcBuf, pwz) != 0 )
2180 {
2181 // we didn't obtain the same thing we started from, hence
2182 // the conversion was lossy and we consider that it failed
467e0479 2183 return wxCONV_FAILED;
13dd924a
VZ
2184 }
2185 }
2186 }
2187
03a991bc 2188 // see the comment above for the reason of "len - 1"
13dd924a 2189 return len - 1;
f1339c56 2190 }
dccce9ea 2191
7ef3ab50
VZ
2192 virtual size_t GetMBNulLen() const
2193 {
2194 if ( m_minMBCharWidth == 0 )
2195 {
2196 int len = ::WideCharToMultiByte
2197 (
2198 m_CodePage, // code page
2199 0, // no flags
2200 L"", // input string
2201 1, // translate just the NUL
2202 NULL, // output buffer
2203 0, // and its size
2204 NULL, // no replacement char
2205 NULL // [out] don't care if it was used
2206 );
2207
2208 wxMBConv_win32 * const self = wxConstCast(this, wxMBConv_win32);
2209 switch ( len )
2210 {
2211 default:
2212 wxLogDebug(_T("Unexpected NUL length %d"), len);
ef199164
DS
2213 self->m_minMBCharWidth = (size_t)-1;
2214 break;
7ef3ab50
VZ
2215
2216 case 0:
2217 self->m_minMBCharWidth = (size_t)-1;
2218 break;
2219
2220 case 1:
2221 case 2:
2222 case 4:
2223 self->m_minMBCharWidth = len;
2224 break;
2225 }
2226 }
2227
2228 return m_minMBCharWidth;
2229 }
2230
d36c9347
VZ
2231 virtual wxMBConv *Clone() const { return new wxMBConv_win32(*this); }
2232
13dd924a
VZ
2233 bool IsOk() const { return m_CodePage != -1; }
2234
2235private:
2236 static bool CanUseNoBestFit()
2237 {
2238 static int s_isWin98Or2k = -1;
2239
2240 if ( s_isWin98Or2k == -1 )
2241 {
2242 int verMaj, verMin;
2243 switch ( wxGetOsVersion(&verMaj, &verMin) )
2244 {
406d283a 2245 case wxOS_WINDOWS_9X:
13dd924a
VZ
2246 s_isWin98Or2k = verMaj >= 4 && verMin >= 10;
2247 break;
2248
406d283a 2249 case wxOS_WINDOWS_NT:
13dd924a
VZ
2250 s_isWin98Or2k = verMaj >= 5;
2251 break;
2252
2253 default:
ef199164 2254 // unknown: be conservative by default
13dd924a 2255 s_isWin98Or2k = 0;
ef199164 2256 break;
13dd924a
VZ
2257 }
2258
2259 wxASSERT_MSG( s_isWin98Or2k != -1, _T("should be set above") );
2260 }
2261
2262 return s_isWin98Or2k == 1;
2263 }
f1339c56 2264
89028980
VS
2265 static bool IsAtLeastWin2kSP4()
2266 {
8942f83a
WS
2267#ifdef __WXWINCE__
2268 return false;
2269#else
89028980
VS
2270 static int s_isAtLeastWin2kSP4 = -1;
2271
2272 if ( s_isAtLeastWin2kSP4 == -1 )
2273 {
2274 OSVERSIONINFOEX ver;
2275
2276 memset(&ver, 0, sizeof(ver));
2277 ver.dwOSVersionInfoSize = sizeof(ver);
2278 GetVersionEx((OSVERSIONINFO*)&ver);
2279
2280 s_isAtLeastWin2kSP4 =
2281 ((ver.dwMajorVersion > 5) || // Vista+
2282 (ver.dwMajorVersion == 5 && ver.dwMinorVersion > 0) || // XP/2003
2283 (ver.dwMajorVersion == 5 && ver.dwMinorVersion == 0 &&
2284 ver.wServicePackMajor >= 4)) // 2000 SP4+
2285 ? 1 : 0;
2286 }
2287
2288 return s_isAtLeastWin2kSP4 == 1;
8942f83a 2289#endif
89028980
VS
2290 }
2291
eec47cc6 2292
c1464d9d 2293 // the code page we're working with
b1d66b54 2294 long m_CodePage;
c1464d9d 2295
7ef3ab50 2296 // cached result of GetMBNulLen(), set to 0 initially meaning
c1464d9d
VZ
2297 // "unknown"
2298 size_t m_minMBCharWidth;
1cd52418 2299};
e95354ec
VZ
2300
2301#endif // wxHAVE_WIN32_MB2WC
2302
f7e98dee
RN
2303// ============================================================================
2304// Cocoa conversion classes
2305// ============================================================================
2306
2307#if defined(__WXCOCOA__)
2308
ef199164
DS
2309// RN: There is no UTF-32 support in either Core Foundation or Cocoa.
2310// Strangely enough, internally Core Foundation uses
2311// UTF-32 internally quite a bit - its just not public (yet).
f7e98dee
RN
2312
2313#include <CoreFoundation/CFString.h>
2314#include <CoreFoundation/CFStringEncodingExt.h>
2315
2316CFStringEncoding wxCFStringEncFromFontEnc(wxFontEncoding encoding)
ecd9653b 2317{
638357a0 2318 CFStringEncoding enc = kCFStringEncodingInvalidId ;
ef199164
DS
2319
2320 switch (encoding)
ecd9653b 2321 {
ef199164
DS
2322 case wxFONTENCODING_DEFAULT :
2323 enc = CFStringGetSystemEncoding();
2324 break ;
2325
ecd9653b
WS
2326 case wxFONTENCODING_ISO8859_1 :
2327 enc = kCFStringEncodingISOLatin1 ;
2328 break ;
2329 case wxFONTENCODING_ISO8859_2 :
2330 enc = kCFStringEncodingISOLatin2;
2331 break ;
2332 case wxFONTENCODING_ISO8859_3 :
2333 enc = kCFStringEncodingISOLatin3 ;
2334 break ;
2335 case wxFONTENCODING_ISO8859_4 :
2336 enc = kCFStringEncodingISOLatin4;
2337 break ;
2338 case wxFONTENCODING_ISO8859_5 :
2339 enc = kCFStringEncodingISOLatinCyrillic;
2340 break ;
2341 case wxFONTENCODING_ISO8859_6 :
2342 enc = kCFStringEncodingISOLatinArabic;
2343 break ;
2344 case wxFONTENCODING_ISO8859_7 :
2345 enc = kCFStringEncodingISOLatinGreek;
2346 break ;
2347 case wxFONTENCODING_ISO8859_8 :
2348 enc = kCFStringEncodingISOLatinHebrew;
2349 break ;
2350 case wxFONTENCODING_ISO8859_9 :
2351 enc = kCFStringEncodingISOLatin5;
2352 break ;
2353 case wxFONTENCODING_ISO8859_10 :
2354 enc = kCFStringEncodingISOLatin6;
2355 break ;
2356 case wxFONTENCODING_ISO8859_11 :
2357 enc = kCFStringEncodingISOLatinThai;
2358 break ;
2359 case wxFONTENCODING_ISO8859_13 :
2360 enc = kCFStringEncodingISOLatin7;
2361 break ;
2362 case wxFONTENCODING_ISO8859_14 :
2363 enc = kCFStringEncodingISOLatin8;
2364 break ;
2365 case wxFONTENCODING_ISO8859_15 :
2366 enc = kCFStringEncodingISOLatin9;
2367 break ;
2368
2369 case wxFONTENCODING_KOI8 :
2370 enc = kCFStringEncodingKOI8_R;
2371 break ;
2372 case wxFONTENCODING_ALTERNATIVE : // MS-DOS CP866
2373 enc = kCFStringEncodingDOSRussian;
2374 break ;
2375
2376// case wxFONTENCODING_BULGARIAN :
2377// enc = ;
2378// break ;
2379
2380 case wxFONTENCODING_CP437 :
ef199164 2381 enc = kCFStringEncodingDOSLatinUS ;
ecd9653b
WS
2382 break ;
2383 case wxFONTENCODING_CP850 :
2384 enc = kCFStringEncodingDOSLatin1;
2385 break ;
2386 case wxFONTENCODING_CP852 :
2387 enc = kCFStringEncodingDOSLatin2;
2388 break ;
2389 case wxFONTENCODING_CP855 :
2390 enc = kCFStringEncodingDOSCyrillic;
2391 break ;
2392 case wxFONTENCODING_CP866 :
ef199164 2393 enc = kCFStringEncodingDOSRussian ;
ecd9653b
WS
2394 break ;
2395 case wxFONTENCODING_CP874 :
2396 enc = kCFStringEncodingDOSThai;
2397 break ;
2398 case wxFONTENCODING_CP932 :
2399 enc = kCFStringEncodingDOSJapanese;
2400 break ;
2401 case wxFONTENCODING_CP936 :
ef199164 2402 enc = kCFStringEncodingDOSChineseSimplif ;
ecd9653b
WS
2403 break ;
2404 case wxFONTENCODING_CP949 :
2405 enc = kCFStringEncodingDOSKorean;
2406 break ;
2407 case wxFONTENCODING_CP950 :
2408 enc = kCFStringEncodingDOSChineseTrad;
2409 break ;
ecd9653b
WS
2410 case wxFONTENCODING_CP1250 :
2411 enc = kCFStringEncodingWindowsLatin2;
2412 break ;
2413 case wxFONTENCODING_CP1251 :
ef199164 2414 enc = kCFStringEncodingWindowsCyrillic ;
ecd9653b
WS
2415 break ;
2416 case wxFONTENCODING_CP1252 :
ef199164 2417 enc = kCFStringEncodingWindowsLatin1 ;
ecd9653b
WS
2418 break ;
2419 case wxFONTENCODING_CP1253 :
2420 enc = kCFStringEncodingWindowsGreek;
2421 break ;
2422 case wxFONTENCODING_CP1254 :
2423 enc = kCFStringEncodingWindowsLatin5;
2424 break ;
2425 case wxFONTENCODING_CP1255 :
ef199164 2426 enc = kCFStringEncodingWindowsHebrew ;
ecd9653b
WS
2427 break ;
2428 case wxFONTENCODING_CP1256 :
ef199164 2429 enc = kCFStringEncodingWindowsArabic ;
ecd9653b
WS
2430 break ;
2431 case wxFONTENCODING_CP1257 :
2432 enc = kCFStringEncodingWindowsBalticRim;
2433 break ;
638357a0
RN
2434// This only really encodes to UTF7 (if that) evidently
2435// case wxFONTENCODING_UTF7 :
2436// enc = kCFStringEncodingNonLossyASCII ;
2437// break ;
ecd9653b
WS
2438 case wxFONTENCODING_UTF8 :
2439 enc = kCFStringEncodingUTF8 ;
2440 break ;
2441 case wxFONTENCODING_EUC_JP :
2442 enc = kCFStringEncodingEUC_JP;
2443 break ;
2444 case wxFONTENCODING_UTF16 :
f7e98dee 2445 enc = kCFStringEncodingUnicode ;
ecd9653b 2446 break ;
f7e98dee
RN
2447 case wxFONTENCODING_MACROMAN :
2448 enc = kCFStringEncodingMacRoman ;
2449 break ;
2450 case wxFONTENCODING_MACJAPANESE :
2451 enc = kCFStringEncodingMacJapanese ;
2452 break ;
2453 case wxFONTENCODING_MACCHINESETRAD :
2454 enc = kCFStringEncodingMacChineseTrad ;
2455 break ;
2456 case wxFONTENCODING_MACKOREAN :
2457 enc = kCFStringEncodingMacKorean ;
2458 break ;
2459 case wxFONTENCODING_MACARABIC :
2460 enc = kCFStringEncodingMacArabic ;
2461 break ;
2462 case wxFONTENCODING_MACHEBREW :
2463 enc = kCFStringEncodingMacHebrew ;
2464 break ;
2465 case wxFONTENCODING_MACGREEK :
2466 enc = kCFStringEncodingMacGreek ;
2467 break ;
2468 case wxFONTENCODING_MACCYRILLIC :
2469 enc = kCFStringEncodingMacCyrillic ;
2470 break ;
2471 case wxFONTENCODING_MACDEVANAGARI :
2472 enc = kCFStringEncodingMacDevanagari ;
2473 break ;
2474 case wxFONTENCODING_MACGURMUKHI :
2475 enc = kCFStringEncodingMacGurmukhi ;
2476 break ;
2477 case wxFONTENCODING_MACGUJARATI :
2478 enc = kCFStringEncodingMacGujarati ;
2479 break ;
2480 case wxFONTENCODING_MACORIYA :
2481 enc = kCFStringEncodingMacOriya ;
2482 break ;
2483 case wxFONTENCODING_MACBENGALI :
2484 enc = kCFStringEncodingMacBengali ;
2485 break ;
2486 case wxFONTENCODING_MACTAMIL :
2487 enc = kCFStringEncodingMacTamil ;
2488 break ;
2489 case wxFONTENCODING_MACTELUGU :
2490 enc = kCFStringEncodingMacTelugu ;
2491 break ;
2492 case wxFONTENCODING_MACKANNADA :
2493 enc = kCFStringEncodingMacKannada ;
2494 break ;
2495 case wxFONTENCODING_MACMALAJALAM :
2496 enc = kCFStringEncodingMacMalayalam ;
2497 break ;
2498 case wxFONTENCODING_MACSINHALESE :
2499 enc = kCFStringEncodingMacSinhalese ;
2500 break ;
2501 case wxFONTENCODING_MACBURMESE :
2502 enc = kCFStringEncodingMacBurmese ;
2503 break ;
2504 case wxFONTENCODING_MACKHMER :
2505 enc = kCFStringEncodingMacKhmer ;
2506 break ;
2507 case wxFONTENCODING_MACTHAI :
2508 enc = kCFStringEncodingMacThai ;
2509 break ;
2510 case wxFONTENCODING_MACLAOTIAN :
2511 enc = kCFStringEncodingMacLaotian ;
2512 break ;
2513 case wxFONTENCODING_MACGEORGIAN :
2514 enc = kCFStringEncodingMacGeorgian ;
2515 break ;
2516 case wxFONTENCODING_MACARMENIAN :
2517 enc = kCFStringEncodingMacArmenian ;
2518 break ;
2519 case wxFONTENCODING_MACCHINESESIMP :
2520 enc = kCFStringEncodingMacChineseSimp ;
2521 break ;
2522 case wxFONTENCODING_MACTIBETAN :
2523 enc = kCFStringEncodingMacTibetan ;
2524 break ;
2525 case wxFONTENCODING_MACMONGOLIAN :
2526 enc = kCFStringEncodingMacMongolian ;
2527 break ;
2528 case wxFONTENCODING_MACETHIOPIC :
2529 enc = kCFStringEncodingMacEthiopic ;
2530 break ;
2531 case wxFONTENCODING_MACCENTRALEUR :
2532 enc = kCFStringEncodingMacCentralEurRoman ;
2533 break ;
2534 case wxFONTENCODING_MACVIATNAMESE :
2535 enc = kCFStringEncodingMacVietnamese ;
2536 break ;
2537 case wxFONTENCODING_MACARABICEXT :
2538 enc = kCFStringEncodingMacExtArabic ;
2539 break ;
2540 case wxFONTENCODING_MACSYMBOL :
2541 enc = kCFStringEncodingMacSymbol ;
2542 break ;
2543 case wxFONTENCODING_MACDINGBATS :
2544 enc = kCFStringEncodingMacDingbats ;
2545 break ;
2546 case wxFONTENCODING_MACTURKISH :
2547 enc = kCFStringEncodingMacTurkish ;
2548 break ;
2549 case wxFONTENCODING_MACCROATIAN :
2550 enc = kCFStringEncodingMacCroatian ;
2551 break ;
2552 case wxFONTENCODING_MACICELANDIC :
2553 enc = kCFStringEncodingMacIcelandic ;
2554 break ;
2555 case wxFONTENCODING_MACROMANIAN :
2556 enc = kCFStringEncodingMacRomanian ;
2557 break ;
2558 case wxFONTENCODING_MACCELTIC :
2559 enc = kCFStringEncodingMacCeltic ;
2560 break ;
2561 case wxFONTENCODING_MACGAELIC :
2562 enc = kCFStringEncodingMacGaelic ;
2563 break ;
ecd9653b
WS
2564// case wxFONTENCODING_MACKEYBOARD :
2565// enc = kCFStringEncodingMacKeyboardGlyphs ;
2566// break ;
ef199164 2567
ecd9653b
WS
2568 default :
2569 // because gcc is picky
2570 break ;
ef199164
DS
2571 }
2572
ecd9653b 2573 return enc ;
f7e98dee
RN
2574}
2575
f7e98dee
RN
2576class wxMBConv_cocoa : public wxMBConv
2577{
2578public:
2579 wxMBConv_cocoa()
2580 {
2581 Init(CFStringGetSystemEncoding()) ;
2582 }
2583
d36c9347
VZ
2584 wxMBConv_cocoa(const wxMBConv_cocoa& conv)
2585 {
2586 m_encoding = conv.m_encoding;
2587 }
2588
a6900d10 2589#if wxUSE_FONTMAP
f7e98dee
RN
2590 wxMBConv_cocoa(const wxChar* name)
2591 {
267e11c5 2592 Init( wxCFStringEncFromFontEnc(wxFontMapperBase::Get()->CharsetToEncoding(name, false) ) ) ;
f7e98dee 2593 }
a6900d10 2594#endif
f7e98dee
RN
2595
2596 wxMBConv_cocoa(wxFontEncoding encoding)
2597 {
2598 Init( wxCFStringEncFromFontEnc(encoding) );
2599 }
2600
d3c7fc99 2601 virtual ~wxMBConv_cocoa()
f7e98dee
RN
2602 {
2603 }
2604
2605 void Init( CFStringEncoding encoding)
2606 {
638357a0 2607 m_encoding = encoding ;
f7e98dee
RN
2608 }
2609
2610 size_t MB2WC(wchar_t * szOut, const char * szUnConv, size_t nOutSize) const
2611 {
2612 wxASSERT(szUnConv);
ecd9653b 2613
638357a0
RN
2614 CFStringRef theString = CFStringCreateWithBytes (
2615 NULL, //the allocator
2616 (const UInt8*)szUnConv,
2617 strlen(szUnConv),
2618 m_encoding,
2619 false //no BOM/external representation
f7e98dee
RN
2620 );
2621
2622 wxASSERT(theString);
2623
638357a0
RN
2624 size_t nOutLength = CFStringGetLength(theString);
2625
2626 if (szOut == NULL)
f7e98dee 2627 {
f7e98dee 2628 CFRelease(theString);
638357a0 2629 return nOutLength;
f7e98dee 2630 }
ecd9653b 2631
638357a0 2632 CFRange theRange = { 0, nOutSize };
ecd9653b 2633
638357a0
RN
2634#if SIZEOF_WCHAR_T == 4
2635 UniChar* szUniCharBuffer = new UniChar[nOutSize];
2636#endif
3698ae71 2637
f7e98dee 2638 CFStringGetCharacters(theString, theRange, szUniCharBuffer);
3698ae71 2639
f7e98dee 2640 CFRelease(theString);
ecd9653b 2641
ef199164 2642 szUniCharBuffer[nOutLength] = '\0';
f7e98dee
RN
2643
2644#if SIZEOF_WCHAR_T == 4
ef199164
DS
2645 wxMBConvUTF16 converter;
2646 converter.MB2WC( szOut, (const char*)szUniCharBuffer, nOutSize );
2647 delete [] szUniCharBuffer;
f7e98dee 2648#endif
3698ae71 2649
638357a0 2650 return nOutLength;
f7e98dee
RN
2651 }
2652
2653 size_t WC2MB(char *szOut, const wchar_t *szUnConv, size_t nOutSize) const
2654 {
638357a0 2655 wxASSERT(szUnConv);
3698ae71 2656
f7e98dee 2657 size_t nRealOutSize;
638357a0 2658 size_t nBufSize = wxWcslen(szUnConv);
f7e98dee 2659 UniChar* szUniBuffer = (UniChar*) szUnConv;
ecd9653b 2660
f7e98dee 2661#if SIZEOF_WCHAR_T == 4
d9d488cf 2662 wxMBConvUTF16 converter ;
ef199164
DS
2663 nBufSize = converter.WC2MB( NULL, szUnConv, 0 );
2664 szUniBuffer = new UniChar[ (nBufSize / sizeof(UniChar)) + 1];
2665 converter.WC2MB( (char*) szUniBuffer, szUnConv, nBufSize + sizeof(UniChar));
f7e98dee 2666 nBufSize /= sizeof(UniChar);
f7e98dee
RN
2667#endif
2668
2669 CFStringRef theString = CFStringCreateWithCharactersNoCopy(
2670 NULL, //allocator
2671 szUniBuffer,
2672 nBufSize,
638357a0 2673 kCFAllocatorNull //deallocator - we want to deallocate it ourselves
f7e98dee 2674 );
ecd9653b 2675
f7e98dee 2676 wxASSERT(theString);
ecd9653b 2677
f7e98dee 2678 //Note that CER puts a BOM when converting to unicode
638357a0
RN
2679 //so we check and use getchars instead in that case
2680 if (m_encoding == kCFStringEncodingUnicode)
f7e98dee 2681 {
638357a0
RN
2682 if (szOut != NULL)
2683 CFStringGetCharacters(theString, CFRangeMake(0, nOutSize - 1), (UniChar*) szOut);
3698ae71 2684
638357a0
RN
2685 nRealOutSize = CFStringGetLength(theString) + 1;
2686 }
2687 else
2688 {
2689 CFStringGetBytes(
2690 theString,
2691 CFRangeMake(0, CFStringGetLength(theString)),
2692 m_encoding,
2693 0, //what to put in characters that can't be converted -
2694 //0 tells CFString to return NULL if it meets such a character
2695 false, //not an external representation
2696 (UInt8*) szOut,
3698ae71 2697 nOutSize,
638357a0
RN
2698 (CFIndex*) &nRealOutSize
2699 );
f7e98dee 2700 }
ecd9653b 2701
638357a0 2702 CFRelease(theString);
ecd9653b 2703
638357a0
RN
2704#if SIZEOF_WCHAR_T == 4
2705 delete[] szUniBuffer;
2706#endif
ecd9653b 2707
f7e98dee
RN
2708 return nRealOutSize - 1;
2709 }
2710
d36c9347
VZ
2711 virtual wxMBConv *Clone() const { return new wxMBConv_cocoa(*this); }
2712
f7e98dee 2713 bool IsOk() const
ecd9653b 2714 {
3698ae71 2715 return m_encoding != kCFStringEncodingInvalidId &&
638357a0 2716 CFStringIsEncodingAvailable(m_encoding);
f7e98dee
RN
2717 }
2718
2719private:
638357a0 2720 CFStringEncoding m_encoding ;
f7e98dee
RN
2721};
2722
2723#endif // defined(__WXCOCOA__)
2724
335d31e0
SC
2725// ============================================================================
2726// Mac conversion classes
2727// ============================================================================
2728
2729#if defined(__WXMAC__) && defined(TARGET_CARBON)
2730
2731class wxMBConv_mac : public wxMBConv
2732{
2733public:
2734 wxMBConv_mac()
2735 {
2736 Init(CFStringGetSystemEncoding()) ;
2737 }
2738
d36c9347
VZ
2739 wxMBConv_mac(const wxMBConv_mac& conv)
2740 {
2741 Init(conv.m_char_encoding);
2742 }
2743
2d1659cf 2744#if wxUSE_FONTMAP
335d31e0
SC
2745 wxMBConv_mac(const wxChar* name)
2746 {
ef199164 2747 Init( wxMacGetSystemEncFromFontEnc( wxFontMapperBase::Get()->CharsetToEncoding(name, false) ) );
335d31e0 2748 }
2d1659cf 2749#endif
335d31e0
SC
2750
2751 wxMBConv_mac(wxFontEncoding encoding)
2752 {
d775fa82
WS
2753 Init( wxMacGetSystemEncFromFontEnc(encoding) );
2754 }
2755
d3c7fc99 2756 virtual ~wxMBConv_mac()
d775fa82
WS
2757 {
2758 OSStatus status = noErr ;
739cb14a
SC
2759 if (m_MB2WC_converter)
2760 status = TECDisposeConverter(m_MB2WC_converter);
2761 if (m_WC2MB_converter)
2762 status = TECDisposeConverter(m_WC2MB_converter);
d775fa82
WS
2763 }
2764
739cb14a
SC
2765 void Init( TextEncodingBase encoding,TextEncodingVariant encodingVariant = kTextEncodingDefaultVariant ,
2766 TextEncodingFormat encodingFormat = kTextEncodingDefaultFormat)
d775fa82 2767 {
739cb14a
SC
2768 m_MB2WC_converter = NULL ;
2769 m_WC2MB_converter = NULL ;
2770 m_char_encoding = CreateTextEncoding(encoding, encodingVariant, encodingFormat) ;
ef199164 2771 m_unicode_encoding = CreateTextEncoding(kTextEncodingUnicodeDefault, 0, kUnicode16BitFormat) ;
739cb14a 2772 }
d775fa82 2773
739cb14a
SC
2774 virtual void CreateIfNeeded() const
2775 {
2776 if ( m_MB2WC_converter == NULL && m_WC2MB_converter == NULL )
2777 {
2778 OSStatus status = noErr ;
2779 status = TECCreateConverter(&m_MB2WC_converter,
d775fa82
WS
2780 m_char_encoding,
2781 m_unicode_encoding);
739cb14a
SC
2782 wxASSERT_MSG( status == noErr , _("Unable to create TextEncodingConverter")) ;
2783 status = TECCreateConverter(&m_WC2MB_converter,
d775fa82
WS
2784 m_unicode_encoding,
2785 m_char_encoding);
739cb14a
SC
2786 wxASSERT_MSG( status == noErr , _("Unable to create TextEncodingConverter")) ;
2787 }
d775fa82 2788 }
57bd4c60 2789
335d31e0
SC
2790 size_t MB2WC(wchar_t *buf, const char *psz, size_t n) const
2791 {
739cb14a 2792 CreateIfNeeded() ;
d775fa82
WS
2793 OSStatus status = noErr ;
2794 ByteCount byteOutLen ;
9088c87b 2795 ByteCount byteInLen = strlen(psz) + 1;
d775fa82
WS
2796 wchar_t *tbuf = NULL ;
2797 UniChar* ubuf = NULL ;
2798 size_t res = 0 ;
2799
2800 if (buf == NULL)
2801 {
ef199164
DS
2802 // Apple specs say at least 32
2803 n = wxMax( 32, byteInLen ) ;
2804 tbuf = (wchar_t*) malloc( n * SIZEOF_WCHAR_T ) ;
d775fa82 2805 }
ef199164 2806
d775fa82 2807 ByteCount byteBufferLen = n * sizeof( UniChar ) ;
ef199164 2808
f3a355ce 2809#if SIZEOF_WCHAR_T == 4
d775fa82 2810 ubuf = (UniChar*) malloc( byteBufferLen + 2 ) ;
f3a355ce 2811#else
d775fa82 2812 ubuf = (UniChar*) (buf ? buf : tbuf) ;
f3a355ce 2813#endif
ef199164
DS
2814
2815 status = TECConvertText(
2816 m_MB2WC_converter, (ConstTextPtr) psz, byteInLen, &byteInLen,
2817 (TextPtr) ubuf, byteBufferLen, &byteOutLen);
2818
f3a355ce 2819#if SIZEOF_WCHAR_T == 4
8471ea90
SC
2820 // we have to terminate here, because n might be larger for the trailing zero, and if UniChar
2821 // is not properly terminated we get random characters at the end
2822 ubuf[byteOutLen / sizeof( UniChar ) ] = 0 ;
d9d488cf 2823 wxMBConvUTF16 converter ;
ef199164 2824 res = converter.MB2WC( (buf ? buf : tbuf), (const char*)ubuf, n ) ;
d775fa82 2825 free( ubuf ) ;
f3a355ce 2826#else
d775fa82 2827 res = byteOutLen / sizeof( UniChar ) ;
f3a355ce 2828#endif
ef199164 2829
d775fa82
WS
2830 if ( buf == NULL )
2831 free(tbuf) ;
335d31e0 2832
335d31e0
SC
2833 if ( buf && res < n)
2834 buf[res] = 0;
2835
d775fa82 2836 return res ;
335d31e0
SC
2837 }
2838
2839 size_t WC2MB(char *buf, const wchar_t *psz, size_t n) const
d775fa82 2840 {
739cb14a 2841 CreateIfNeeded() ;
d775fa82
WS
2842 OSStatus status = noErr ;
2843 ByteCount byteOutLen ;
2844 ByteCount byteInLen = wxWcslen(psz) * SIZEOF_WCHAR_T ;
2845
2846 char *tbuf = NULL ;
2847
2848 if (buf == NULL)
2849 {
ef199164
DS
2850 // Apple specs say at least 32
2851 n = wxMax( 32, ((byteInLen / SIZEOF_WCHAR_T) * 8) + SIZEOF_WCHAR_T );
d775fa82
WS
2852 tbuf = (char*) malloc( n ) ;
2853 }
2854
2855 ByteCount byteBufferLen = n ;
2856 UniChar* ubuf = NULL ;
ef199164 2857
f3a355ce 2858#if SIZEOF_WCHAR_T == 4
d9d488cf 2859 wxMBConvUTF16 converter ;
ef199164 2860 size_t unicharlen = converter.WC2MB( NULL, psz, 0 ) ;
d775fa82
WS
2861 byteInLen = unicharlen ;
2862 ubuf = (UniChar*) malloc( byteInLen + 2 ) ;
ef199164 2863 converter.WC2MB( (char*) ubuf, psz, unicharlen + 2 ) ;
f3a355ce 2864#else
d775fa82 2865 ubuf = (UniChar*) psz ;
f3a355ce 2866#endif
ef199164
DS
2867
2868 status = TECConvertText(
2869 m_WC2MB_converter, (ConstTextPtr) ubuf, byteInLen, &byteInLen,
2870 (TextPtr) (buf ? buf : tbuf), byteBufferLen, &byteOutLen);
2871
f3a355ce 2872#if SIZEOF_WCHAR_T == 4
d775fa82 2873 free( ubuf ) ;
f3a355ce 2874#endif
ef199164 2875
d775fa82
WS
2876 if ( buf == NULL )
2877 free(tbuf) ;
335d31e0 2878
d775fa82 2879 size_t res = byteOutLen ;
335d31e0 2880 if ( buf && res < n)
638357a0 2881 {
335d31e0 2882 buf[res] = 0;
3698ae71 2883
638357a0
RN
2884 //we need to double-trip to verify it didn't insert any ? in place
2885 //of bogus characters
2886 wxWCharBuffer wcBuf(n);
2887 size_t pszlen = wxWcslen(psz);
467e0479 2888 if ( MB2WC(wcBuf.data(), buf, n) == wxCONV_FAILED ||
638357a0
RN
2889 wxWcslen(wcBuf) != pszlen ||
2890 memcmp(wcBuf, psz, pszlen * sizeof(wchar_t)) != 0 )
2891 {
2892 // we didn't obtain the same thing we started from, hence
2893 // the conversion was lossy and we consider that it failed
467e0479 2894 return wxCONV_FAILED;
638357a0
RN
2895 }
2896 }
335d31e0 2897
d775fa82 2898 return res ;
335d31e0
SC
2899 }
2900
d3478e2c 2901 virtual wxMBConv *Clone() const { return new wxMBConv_mac(*this); }
d36c9347 2902
335d31e0 2903 bool IsOk() const
57bd4c60 2904 {
739cb14a 2905 CreateIfNeeded() ;
57bd4c60 2906 return m_MB2WC_converter != NULL && m_WC2MB_converter != NULL;
739cb14a 2907 }
335d31e0 2908
739cb14a
SC
2909protected :
2910 mutable TECObjectRef m_MB2WC_converter;
2911 mutable TECObjectRef m_WC2MB_converter;
d775fa82 2912
ef199164
DS
2913 TextEncodingBase m_char_encoding;
2914 TextEncodingBase m_unicode_encoding;
335d31e0
SC
2915};
2916
739cb14a
SC
2917// MB is decomposed (D) normalized UTF8
2918
2919class wxMBConv_macUTF8D : public wxMBConv_mac
2920{
2921public :
57bd4c60 2922 wxMBConv_macUTF8D()
739cb14a
SC
2923 {
2924 Init( kTextEncodingUnicodeDefault , kUnicodeNoSubset , kUnicodeUTF8Format ) ;
2925 m_uni = NULL;
fbb0b8af 2926 m_uniBack = NULL ;
739cb14a 2927 }
57bd4c60 2928
d3c7fc99 2929 virtual ~wxMBConv_macUTF8D()
739cb14a 2930 {
fbb0b8af
SC
2931 if (m_uni!=NULL)
2932 DisposeUnicodeToTextInfo(&m_uni);
2933 if (m_uniBack!=NULL)
2934 DisposeUnicodeToTextInfo(&m_uniBack);
739cb14a 2935 }
57bd4c60 2936
739cb14a
SC
2937 size_t WC2MB(char *buf, const wchar_t *psz, size_t n) const
2938 {
2939 CreateIfNeeded() ;
2940 OSStatus status = noErr ;
2941 ByteCount byteOutLen ;
2942 ByteCount byteInLen = wxWcslen(psz) * SIZEOF_WCHAR_T ;
2943
2944 char *tbuf = NULL ;
2945
2946 if (buf == NULL)
2947 {
2948 // Apple specs say at least 32
2949 n = wxMax( 32, ((byteInLen / SIZEOF_WCHAR_T) * 8) + SIZEOF_WCHAR_T );
2950 tbuf = (char*) malloc( n ) ;
2951 }
2952
2953 ByteCount byteBufferLen = n ;
2954 UniChar* ubuf = NULL ;
2955
2956#if SIZEOF_WCHAR_T == 4
2957 wxMBConvUTF16 converter ;
2958 size_t unicharlen = converter.WC2MB( NULL, psz, 0 ) ;
2959 byteInLen = unicharlen ;
2960 ubuf = (UniChar*) malloc( byteInLen + 2 ) ;
2961 converter.WC2MB( (char*) ubuf, psz, unicharlen + 2 ) ;
2962#else
2963 ubuf = (UniChar*) psz ;
2964#endif
2965
57bd4c60
WS
2966 // ubuf is a non-decomposed UniChar buffer
2967
739cb14a
SC
2968 ByteCount dcubuflen = byteInLen * 2 + 2 ;
2969 ByteCount dcubufread , dcubufwritten ;
57bd4c60
WS
2970 UniChar *dcubuf = (UniChar*) malloc( dcubuflen ) ;
2971
2972 ConvertFromUnicodeToText( m_uni , byteInLen , ubuf ,
739cb14a 2973 kUnicodeDefaultDirectionMask, 0, NULL, NULL, NULL, dcubuflen , &dcubufread , &dcubufwritten , dcubuf ) ;
57bd4c60 2974
739cb14a
SC
2975 // we now convert that decomposed buffer into UTF8
2976
2977 status = TECConvertText(
2978 m_WC2MB_converter, (ConstTextPtr) dcubuf, dcubufwritten, &dcubufread,
2979 (TextPtr) (buf ? buf : tbuf), byteBufferLen, &byteOutLen);
2980
2981 free( dcubuf );
2982
2983#if SIZEOF_WCHAR_T == 4
2984 free( ubuf ) ;
2985#endif
2986
2987 if ( buf == NULL )
2988 free(tbuf) ;
2989
2990 size_t res = byteOutLen ;
2991 if ( buf && res < n)
2992 {
2993 buf[res] = 0;
2994 // don't test for round-trip fidelity yet, we cannot guarantee it yet
2995 }
2996
2997 return res ;
2998 }
57bd4c60 2999
fbb0b8af
SC
3000 size_t MB2WC(wchar_t *buf, const char *psz, size_t n) const
3001 {
3002 CreateIfNeeded() ;
3003 OSStatus status = noErr ;
3004 ByteCount byteOutLen ;
3005 ByteCount byteInLen = strlen(psz) + 1;
3006 wchar_t *tbuf = NULL ;
3007 UniChar* ubuf = NULL ;
3008 size_t res = 0 ;
57bd4c60 3009
fbb0b8af
SC
3010 if (buf == NULL)
3011 {
3012 // Apple specs say at least 32
3013 n = wxMax( 32, byteInLen ) ;
3014 tbuf = (wchar_t*) malloc( n * SIZEOF_WCHAR_T ) ;
3015 }
57bd4c60 3016
fbb0b8af 3017 ByteCount byteBufferLen = n * sizeof( UniChar ) ;
57bd4c60 3018
fbb0b8af
SC
3019#if SIZEOF_WCHAR_T == 4
3020 ubuf = (UniChar*) malloc( byteBufferLen + 2 ) ;
3021#else
3022 ubuf = (UniChar*) (buf ? buf : tbuf) ;
3023#endif
57bd4c60 3024
fbb0b8af
SC
3025 ByteCount dcubuflen = byteBufferLen * 2 + 2 ;
3026 ByteCount dcubufread , dcubufwritten ;
57bd4c60 3027 UniChar *dcubuf = (UniChar*) malloc( dcubuflen ) ;
fbb0b8af
SC
3028
3029 status = TECConvertText(
3030 m_MB2WC_converter, (ConstTextPtr) psz, byteInLen, &byteInLen,
3031 (TextPtr) dcubuf, dcubuflen, &byteOutLen);
3032 // we have to terminate here, because n might be larger for the trailing zero, and if UniChar
3033 // is not properly terminated we get random characters at the end
3034 dcubuf[byteOutLen / sizeof( UniChar ) ] = 0 ;
57bd4c60 3035
fbb0b8af 3036 // now from the decomposed UniChar to properly composed uniChar
57bd4c60 3037 ConvertFromUnicodeToText( m_uniBack , byteOutLen , dcubuf ,
fbb0b8af
SC
3038 kUnicodeDefaultDirectionMask, 0, NULL, NULL, NULL, dcubuflen , &dcubufread , &dcubufwritten , ubuf ) ;
3039
3040 free( dcubuf );
3041 byteOutLen = dcubufwritten ;
3042 ubuf[byteOutLen / sizeof( UniChar ) ] = 0 ;
57bd4c60
WS
3043
3044
fbb0b8af
SC
3045#if SIZEOF_WCHAR_T == 4
3046 wxMBConvUTF16 converter ;
3047 res = converter.MB2WC( (buf ? buf : tbuf), (const char*)ubuf, n ) ;
3048 free( ubuf ) ;
3049#else
3050 res = byteOutLen / sizeof( UniChar ) ;
3051#endif
57bd4c60 3052
fbb0b8af
SC
3053 if ( buf == NULL )
3054 free(tbuf) ;
57bd4c60 3055
fbb0b8af
SC
3056 if ( buf && res < n)
3057 buf[res] = 0;
57bd4c60 3058
fbb0b8af
SC
3059 return res ;
3060 }
3061
739cb14a
SC
3062 virtual void CreateIfNeeded() const
3063 {
3064 wxMBConv_mac::CreateIfNeeded() ;
3065 if ( m_uni == NULL )
3066 {
3067 m_map.unicodeEncoding = CreateTextEncoding(kTextEncodingUnicodeDefault,
3068 kUnicodeNoSubset, kTextEncodingDefaultFormat);
3069 m_map.otherEncoding = CreateTextEncoding(kTextEncodingUnicodeDefault,
3070 kUnicodeCanonicalDecompVariant, kTextEncodingDefaultFormat);
3071 m_map.mappingVersion = kUnicodeUseLatestMapping;
57bd4c60
WS
3072
3073 OSStatus err = CreateUnicodeToTextInfo(&m_map, &m_uni);
739cb14a 3074 wxASSERT_MSG( err == noErr , _(" Couldn't create the UnicodeConverter")) ;
57bd4c60 3075
fbb0b8af
SC
3076 m_map.unicodeEncoding = CreateTextEncoding(kTextEncodingUnicodeDefault,
3077 kUnicodeNoSubset, kTextEncodingDefaultFormat);
3078 m_map.otherEncoding = CreateTextEncoding(kTextEncodingUnicodeDefault,
3079 kUnicodeCanonicalCompVariant, kTextEncodingDefaultFormat);
3080 m_map.mappingVersion = kUnicodeUseLatestMapping;
57bd4c60 3081 err = CreateUnicodeToTextInfo(&m_map, &m_uniBack);
fbb0b8af 3082 wxASSERT_MSG( err == noErr , _(" Couldn't create the UnicodeConverter")) ;
739cb14a
SC
3083 }
3084 }
3085protected :
3086 mutable UnicodeToTextInfo m_uni;
fbb0b8af 3087 mutable UnicodeToTextInfo m_uniBack;
739cb14a 3088 mutable UnicodeMapping m_map;
57bd4c60 3089};
335d31e0 3090#endif // defined(__WXMAC__) && defined(TARGET_CARBON)
1e6feb95 3091
36acb880
VZ
3092// ============================================================================
3093// wxEncodingConverter based conversion classes
3094// ============================================================================
3095
1e6feb95 3096#if wxUSE_FONTMAP
1cd52418 3097
e95354ec 3098class wxMBConv_wxwin : public wxMBConv
1cd52418 3099{
8b04d4c4
VZ
3100private:
3101 void Init()
3102 {
3103 m_ok = m2w.Init(m_enc, wxFONTENCODING_UNICODE) &&
3104 w2m.Init(wxFONTENCODING_UNICODE, m_enc);
3105 }
3106
6001e347 3107public:
f1339c56
RR
3108 // temporarily just use wxEncodingConverter stuff,
3109 // so that it works while a better implementation is built
e95354ec 3110 wxMBConv_wxwin(const wxChar* name)
f1339c56
RR
3111 {
3112 if (name)
267e11c5 3113 m_enc = wxFontMapperBase::Get()->CharsetToEncoding(name, false);
8b04d4c4
VZ
3114 else
3115 m_enc = wxFONTENCODING_SYSTEM;
cafbf6fb 3116
8b04d4c4
VZ
3117 Init();
3118 }
3119
e95354ec 3120 wxMBConv_wxwin(wxFontEncoding enc)
8b04d4c4
VZ
3121 {
3122 m_enc = enc;
3123
3124 Init();
f1339c56 3125 }
dccce9ea 3126
bde4baac 3127 size_t MB2WC(wchar_t *buf, const char *psz, size_t WXUNUSED(n)) const
f1339c56
RR
3128 {
3129 size_t inbuf = strlen(psz);
dccce9ea 3130 if (buf)
c643a977 3131 {
ef199164 3132 if (!m2w.Convert(psz, buf))
467e0479 3133 return wxCONV_FAILED;
c643a977 3134 }
f1339c56
RR
3135 return inbuf;
3136 }
dccce9ea 3137
bde4baac 3138 size_t WC2MB(char *buf, const wchar_t *psz, size_t WXUNUSED(n)) const
f1339c56 3139 {
f8d791e0 3140 const size_t inbuf = wxWcslen(psz);
f1339c56 3141 if (buf)
c643a977 3142 {
ef199164 3143 if (!w2m.Convert(psz, buf))
467e0479 3144 return wxCONV_FAILED;
c643a977 3145 }
dccce9ea 3146
f1339c56
RR
3147 return inbuf;
3148 }
dccce9ea 3149
7ef3ab50 3150 virtual size_t GetMBNulLen() const
eec47cc6
VZ
3151 {
3152 switch ( m_enc )
3153 {
3154 case wxFONTENCODING_UTF16BE:
3155 case wxFONTENCODING_UTF16LE:
c1464d9d 3156 return 2;
eec47cc6
VZ
3157
3158 case wxFONTENCODING_UTF32BE:
3159 case wxFONTENCODING_UTF32LE:
c1464d9d 3160 return 4;
eec47cc6
VZ
3161
3162 default:
c1464d9d 3163 return 1;
eec47cc6
VZ
3164 }
3165 }
3166
d36c9347
VZ
3167 virtual wxMBConv *Clone() const { return new wxMBConv_wxwin(m_enc); }
3168
7ef3ab50
VZ
3169 bool IsOk() const { return m_ok; }
3170
3171public:
3172 wxFontEncoding m_enc;
3173 wxEncodingConverter m2w, w2m;
3174
3175private:
cafbf6fb
VZ
3176 // were we initialized successfully?
3177 bool m_ok;
fc7a2a60 3178
e95354ec 3179 DECLARE_NO_COPY_CLASS(wxMBConv_wxwin)
f6bcfd97 3180};
6001e347 3181
8f115891
MW
3182// make the constructors available for unit testing
3183WXDLLIMPEXP_BASE wxMBConv* new_wxMBConv_wxwin( const wxChar* name )
3184{
3185 wxMBConv_wxwin* result = new wxMBConv_wxwin( name );
3186 if ( !result->IsOk() )
3187 {
3188 delete result;
3189 return 0;
3190 }
ef199164 3191
8f115891
MW
3192 return result;
3193}
3194
1e6feb95
VZ
3195#endif // wxUSE_FONTMAP
3196
36acb880
VZ
3197// ============================================================================
3198// wxCSConv implementation
3199// ============================================================================
3200
8b04d4c4 3201void wxCSConv::Init()
6001e347 3202{
e95354ec
VZ
3203 m_name = NULL;
3204 m_convReal = NULL;
3205 m_deferred = true;
3206}
3207
8b04d4c4
VZ
3208wxCSConv::wxCSConv(const wxChar *charset)
3209{
3210 Init();
82713003 3211
e95354ec
VZ
3212 if ( charset )
3213 {
e95354ec
VZ
3214 SetName(charset);
3215 }
bda3d86a 3216
e4277538
VZ
3217#if wxUSE_FONTMAP
3218 m_encoding = wxFontMapperBase::GetEncodingFromName(charset);
3219#else
bda3d86a 3220 m_encoding = wxFONTENCODING_SYSTEM;
e4277538 3221#endif
6001e347
RR
3222}
3223
8b04d4c4
VZ
3224wxCSConv::wxCSConv(wxFontEncoding encoding)
3225{
bda3d86a 3226 if ( encoding == wxFONTENCODING_MAX || encoding == wxFONTENCODING_DEFAULT )
e95354ec
VZ
3227 {
3228 wxFAIL_MSG( _T("invalid encoding value in wxCSConv ctor") );
3229
3230 encoding = wxFONTENCODING_SYSTEM;
3231 }
3232
8b04d4c4
VZ
3233 Init();
3234
bda3d86a 3235 m_encoding = encoding;
8b04d4c4
VZ
3236}
3237
6001e347
RR
3238wxCSConv::~wxCSConv()
3239{
65e50848
JS
3240 Clear();
3241}
3242
54380f29 3243wxCSConv::wxCSConv(const wxCSConv& conv)
8b04d4c4 3244 : wxMBConv()
54380f29 3245{
8b04d4c4
VZ
3246 Init();
3247
54380f29 3248 SetName(conv.m_name);
8b04d4c4 3249 m_encoding = conv.m_encoding;
54380f29
GD
3250}
3251
3252wxCSConv& wxCSConv::operator=(const wxCSConv& conv)
3253{
3254 Clear();
8b04d4c4 3255
54380f29 3256 SetName(conv.m_name);
8b04d4c4
VZ
3257 m_encoding = conv.m_encoding;
3258
54380f29
GD
3259 return *this;
3260}
3261
65e50848
JS
3262void wxCSConv::Clear()
3263{
8b04d4c4 3264 free(m_name);
e95354ec 3265 delete m_convReal;
8b04d4c4 3266
65e50848 3267 m_name = NULL;
e95354ec 3268 m_convReal = NULL;
6001e347
RR
3269}
3270
3271void wxCSConv::SetName(const wxChar *charset)
3272{
f1339c56
RR
3273 if (charset)
3274 {
3275 m_name = wxStrdup(charset);
e95354ec 3276 m_deferred = true;
f1339c56 3277 }
6001e347
RR
3278}
3279
8b3eb85d 3280#if wxUSE_FONTMAP
8b3eb85d
VZ
3281
3282WX_DECLARE_HASH_MAP( wxFontEncoding, wxString, wxIntegerHash, wxIntegerEqual,
3f5c62f9 3283 wxEncodingNameCache );
8b3eb85d
VZ
3284
3285static wxEncodingNameCache gs_nameCache;
3286#endif
3287
e95354ec
VZ
3288wxMBConv *wxCSConv::DoCreate() const
3289{
ce6f8d6f
VZ
3290#if wxUSE_FONTMAP
3291 wxLogTrace(TRACE_STRCONV,
3292 wxT("creating conversion for %s"),
3293 (m_name ? m_name
c9f78968 3294 : (const wxChar*)wxFontMapperBase::GetEncodingName(m_encoding).c_str()));
ce6f8d6f
VZ
3295#endif // wxUSE_FONTMAP
3296
c547282d
VZ
3297 // check for the special case of ASCII or ISO8859-1 charset: as we have
3298 // special knowledge of it anyhow, we don't need to create a special
3299 // conversion object
e4277538
VZ
3300 if ( m_encoding == wxFONTENCODING_ISO8859_1 ||
3301 m_encoding == wxFONTENCODING_DEFAULT )
f1339c56 3302 {
e95354ec
VZ
3303 // don't convert at all
3304 return NULL;
3305 }
dccce9ea 3306
e95354ec
VZ
3307 // we trust OS to do conversion better than we can so try external
3308 // conversion methods first
3309 //
3310 // the full order is:
3311 // 1. OS conversion (iconv() under Unix or Win32 API)
3312 // 2. hard coded conversions for UTF
3313 // 3. wxEncodingConverter as fall back
3314
3315 // step (1)
3316#ifdef HAVE_ICONV
c547282d 3317#if !wxUSE_FONTMAP
e95354ec 3318 if ( m_name )
c547282d 3319#endif // !wxUSE_FONTMAP
e95354ec 3320 {
c547282d 3321 wxString name(m_name);
3ef10cfc 3322#if wxUSE_FONTMAP
8b3eb85d 3323 wxFontEncoding encoding(m_encoding);
3ef10cfc 3324#endif
8b3eb85d
VZ
3325
3326 if ( !name.empty() )
3327 {
3328 wxMBConv_iconv *conv = new wxMBConv_iconv(name);
3329 if ( conv->IsOk() )
3330 return conv;
3331
3332 delete conv;
c547282d
VZ
3333
3334#if wxUSE_FONTMAP
8b3eb85d
VZ
3335 encoding =
3336 wxFontMapperBase::Get()->CharsetToEncoding(name, false);
c547282d 3337#endif // wxUSE_FONTMAP
8b3eb85d
VZ
3338 }
3339#if wxUSE_FONTMAP
3340 {
3341 const wxEncodingNameCache::iterator it = gs_nameCache.find(encoding);
3342 if ( it != gs_nameCache.end() )
3343 {
3344 if ( it->second.empty() )
3345 return NULL;
c547282d 3346
8b3eb85d
VZ
3347 wxMBConv_iconv *conv = new wxMBConv_iconv(it->second);
3348 if ( conv->IsOk() )
3349 return conv;
e95354ec 3350
8b3eb85d
VZ
3351 delete conv;
3352 }
3353
3354 const wxChar** names = wxFontMapperBase::GetAllEncodingNames(encoding);
3c67ec06 3355 // CS : in case this does not return valid names (eg for MacRoman) encoding
57bd4c60 3356 // got a 'failure' entry in the cache all the same, although it just has to
3c67ec06
SC
3357 // be created using a different method, so only store failed iconv creation
3358 // attempts (or perhaps we shoulnd't do this at all ?)
3359 if ( names[0] != NULL )
8b3eb85d 3360 {
3c67ec06 3361 for ( ; *names; ++names )
8b3eb85d 3362 {
3c67ec06
SC
3363 wxMBConv_iconv *conv = new wxMBConv_iconv(*names);
3364 if ( conv->IsOk() )
3365 {
3366 gs_nameCache[encoding] = *names;
3367 return conv;
3368 }
3369
3370 delete conv;
8b3eb85d
VZ
3371 }
3372
3c67ec06 3373 gs_nameCache[encoding] = _T(""); // cache the failure
8b3eb85d 3374 }
8b3eb85d
VZ
3375 }
3376#endif // wxUSE_FONTMAP
e95354ec
VZ
3377 }
3378#endif // HAVE_ICONV
3379
3380#ifdef wxHAVE_WIN32_MB2WC
3381 {
7608a683 3382#if wxUSE_FONTMAP
e95354ec
VZ
3383 wxMBConv_win32 *conv = m_name ? new wxMBConv_win32(m_name)
3384 : new wxMBConv_win32(m_encoding);
3385 if ( conv->IsOk() )
3386 return conv;
3387
3388 delete conv;
7608a683
WS
3389#else
3390 return NULL;
3391#endif
e95354ec
VZ
3392 }
3393#endif // wxHAVE_WIN32_MB2WC
ef199164 3394
d775fa82
WS
3395#if defined(__WXMAC__)
3396 {
5c3c8676 3397 // leave UTF16 and UTF32 to the built-ins of wx
3698ae71 3398 if ( m_name || ( m_encoding < wxFONTENCODING_UTF16BE ||
5c3c8676 3399 ( m_encoding >= wxFONTENCODING_MACMIN && m_encoding <= wxFONTENCODING_MACMAX ) ) )
d775fa82 3400 {
2d1659cf 3401#if wxUSE_FONTMAP
d775fa82
WS
3402 wxMBConv_mac *conv = m_name ? new wxMBConv_mac(m_name)
3403 : new wxMBConv_mac(m_encoding);
2d1659cf
RN
3404#else
3405 wxMBConv_mac *conv = new wxMBConv_mac(m_encoding);
3406#endif
d775fa82 3407 if ( conv->IsOk() )
f7e98dee
RN
3408 return conv;
3409
3410 delete conv;
3411 }
3412 }
3413#endif
ef199164 3414
f7e98dee
RN
3415#if defined(__WXCOCOA__)
3416 {
3417 if ( m_name || ( m_encoding <= wxFONTENCODING_UTF16 ) )
3418 {
a6900d10 3419#if wxUSE_FONTMAP
f7e98dee
RN
3420 wxMBConv_cocoa *conv = m_name ? new wxMBConv_cocoa(m_name)
3421 : new wxMBConv_cocoa(m_encoding);
a6900d10
RN
3422#else
3423 wxMBConv_cocoa *conv = new wxMBConv_cocoa(m_encoding);
3424#endif
ef199164 3425
f7e98dee 3426 if ( conv->IsOk() )
d775fa82
WS
3427 return conv;
3428
3429 delete conv;
3430 }
335d31e0
SC
3431 }
3432#endif
e95354ec
VZ
3433 // step (2)
3434 wxFontEncoding enc = m_encoding;
3435#if wxUSE_FONTMAP
c547282d
VZ
3436 if ( enc == wxFONTENCODING_SYSTEM && m_name )
3437 {
3438 // use "false" to suppress interactive dialogs -- we can be called from
3439 // anywhere and popping up a dialog from here is the last thing we want to
3440 // do
267e11c5 3441 enc = wxFontMapperBase::Get()->CharsetToEncoding(m_name, false);
c547282d 3442 }
e95354ec
VZ
3443#endif // wxUSE_FONTMAP
3444
3445 switch ( enc )
3446 {
3447 case wxFONTENCODING_UTF7:
3448 return new wxMBConvUTF7;
3449
3450 case wxFONTENCODING_UTF8:
3451 return new wxMBConvUTF8;
3452
e95354ec
VZ
3453 case wxFONTENCODING_UTF16BE:
3454 return new wxMBConvUTF16BE;
3455
3456 case wxFONTENCODING_UTF16LE:
3457 return new wxMBConvUTF16LE;
3458
e95354ec
VZ
3459 case wxFONTENCODING_UTF32BE:
3460 return new wxMBConvUTF32BE;
3461
3462 case wxFONTENCODING_UTF32LE:
3463 return new wxMBConvUTF32LE;
3464
3465 default:
3466 // nothing to do but put here to suppress gcc warnings
ef199164 3467 break;
e95354ec
VZ
3468 }
3469
3470 // step (3)
3471#if wxUSE_FONTMAP
3472 {
3473 wxMBConv_wxwin *conv = m_name ? new wxMBConv_wxwin(m_name)
3474 : new wxMBConv_wxwin(m_encoding);
3475 if ( conv->IsOk() )
3476 return conv;
3477
3478 delete conv;
3479 }
3480#endif // wxUSE_FONTMAP
3481
a58d4f4d
VS
3482 // NB: This is a hack to prevent deadlock. What could otherwise happen
3483 // in Unicode build: wxConvLocal creation ends up being here
3484 // because of some failure and logs the error. But wxLog will try to
6a17b868
SN
3485 // attach a timestamp, for which it will need wxConvLocal (to convert
3486 // time to char* and then wchar_t*), but that fails, tries to log the
3487 // error, but wxLog has an (already locked) critical section that
3488 // guards the static buffer.
a58d4f4d
VS
3489 static bool alreadyLoggingError = false;
3490 if (!alreadyLoggingError)
3491 {
3492 alreadyLoggingError = true;
3493 wxLogError(_("Cannot convert from the charset '%s'!"),
3494 m_name ? m_name
e95354ec
VZ
3495 :
3496#if wxUSE_FONTMAP
c9f78968 3497 (const wxChar*)wxFontMapperBase::GetEncodingDescription(m_encoding).c_str()
e95354ec 3498#else // !wxUSE_FONTMAP
c9f78968 3499 (const wxChar*)wxString::Format(_("encoding %i"), m_encoding).c_str()
e95354ec
VZ
3500#endif // wxUSE_FONTMAP/!wxUSE_FONTMAP
3501 );
ef199164 3502
a58d4f4d
VS
3503 alreadyLoggingError = false;
3504 }
e95354ec
VZ
3505
3506 return NULL;
3507}
3508
3509void wxCSConv::CreateConvIfNeeded() const
3510{
3511 if ( m_deferred )
3512 {
3513 wxCSConv *self = (wxCSConv *)this; // const_cast
bda3d86a 3514
bda3d86a
VZ
3515 // if we don't have neither the name nor the encoding, use the default
3516 // encoding for this system
3517 if ( !m_name && m_encoding == wxFONTENCODING_SYSTEM )
3518 {
4c75209f 3519#if wxUSE_INTL
02c7347b 3520 self->m_encoding = wxLocale::GetSystemEncoding();
4c75209f
VS
3521#else
3522 // fallback to some reasonable default:
3523 self->m_encoding = wxFONTENCODING_ISO8859_1;
bda3d86a 3524#endif // wxUSE_INTL
4c75209f 3525 }
bda3d86a 3526
e95354ec
VZ
3527 self->m_convReal = DoCreate();
3528 self->m_deferred = false;
6001e347 3529 }
6001e347
RR
3530}
3531
0f0298b1
VZ
3532bool wxCSConv::IsOk() const
3533{
3534 CreateConvIfNeeded();
3535
3536 // special case: no convReal created for wxFONTENCODING_ISO8859_1
3537 if ( m_encoding == wxFONTENCODING_ISO8859_1 )
3538 return true; // always ok as we do it ourselves
3539
3540 // m_convReal->IsOk() is called at its own creation, so we know it must
3541 // be ok if m_convReal is non-NULL
3542 return m_convReal != NULL;
3543}
3544
1c714a5d
VZ
3545size_t wxCSConv::ToWChar(wchar_t *dst, size_t dstLen,
3546 const char *src, size_t srcLen) const
3547{
3548 CreateConvIfNeeded();
3549
2c74c558
VS
3550 if (m_convReal)
3551 return m_convReal->ToWChar(dst, dstLen, src, srcLen);
3552
3553 // latin-1 (direct)
3554 return wxMBConv::ToWChar(dst, dstLen, src, srcLen);
1c714a5d
VZ
3555}
3556
3557size_t wxCSConv::FromWChar(char *dst, size_t dstLen,
3558 const wchar_t *src, size_t srcLen) const
3559{
3560 CreateConvIfNeeded();
3561
2c74c558
VS
3562 if (m_convReal)
3563 return m_convReal->FromWChar(dst, dstLen, src, srcLen);
3564
3565 // latin-1 (direct)
3566 return wxMBConv::FromWChar(dst, dstLen, src, srcLen);
1c714a5d
VZ
3567}
3568
6001e347
RR
3569size_t wxCSConv::MB2WC(wchar_t *buf, const char *psz, size_t n) const
3570{
e95354ec 3571 CreateConvIfNeeded();
dccce9ea 3572
e95354ec
VZ
3573 if (m_convReal)
3574 return m_convReal->MB2WC(buf, psz, n);
f1339c56
RR
3575
3576 // latin-1 (direct)
4def3b35 3577 size_t len = strlen(psz);
dccce9ea 3578
f1339c56
RR
3579 if (buf)
3580 {
4def3b35 3581 for (size_t c = 0; c <= len; c++)
f1339c56
RR
3582 buf[c] = (unsigned char)(psz[c]);
3583 }
dccce9ea 3584
f1339c56 3585 return len;
6001e347
RR
3586}
3587
3588size_t wxCSConv::WC2MB(char *buf, const wchar_t *psz, size_t n) const
3589{
e95354ec 3590 CreateConvIfNeeded();
dccce9ea 3591
e95354ec
VZ
3592 if (m_convReal)
3593 return m_convReal->WC2MB(buf, psz, n);
1cd52418 3594
f1339c56 3595 // latin-1 (direct)
f8d791e0 3596 const size_t len = wxWcslen(psz);
f1339c56
RR
3597 if (buf)
3598 {
4def3b35 3599 for (size_t c = 0; c <= len; c++)
24642831
VS
3600 {
3601 if (psz[c] > 0xFF)
467e0479 3602 return wxCONV_FAILED;
ef199164 3603
907173e5 3604 buf[c] = (char)psz[c];
24642831
VS
3605 }
3606 }
3607 else
3608 {
3609 for (size_t c = 0; c <= len; c++)
3610 {
3611 if (psz[c] > 0xFF)
467e0479 3612 return wxCONV_FAILED;
24642831 3613 }
f1339c56 3614 }
dccce9ea 3615
f1339c56 3616 return len;
6001e347
RR
3617}
3618
7ef3ab50 3619size_t wxCSConv::GetMBNulLen() const
eec47cc6
VZ
3620{
3621 CreateConvIfNeeded();
3622
3623 if ( m_convReal )
3624 {
7ef3ab50 3625 return m_convReal->GetMBNulLen();
eec47cc6
VZ
3626 }
3627
ba98e032 3628 // otherwise, we are ISO-8859-1
c1464d9d 3629 return 1;
eec47cc6
VZ
3630}
3631
ba98e032
VS
3632#if wxUSE_UNICODE_UTF8
3633bool wxCSConv::IsUTF8() const
3634{
3635 CreateConvIfNeeded();
3636
3637 if ( m_convReal )
3638 {
3639 return m_convReal->IsUTF8();
3640 }
3641
3642 // otherwise, we are ISO-8859-1
3643 return false;
3644}
3645#endif
3646
69c928ef
VZ
3647
3648#if wxUSE_UNICODE
3649
3650wxWCharBuffer wxSafeConvertMB2WX(const char *s)
3651{
3652 if ( !s )
3653 return wxWCharBuffer();
3654
3655 wxWCharBuffer wbuf(wxConvLibc.cMB2WX(s));
3656 if ( !wbuf )
5487ff0f 3657 wbuf = wxMBConvUTF8().cMB2WX(s);
69c928ef
VZ
3658 if ( !wbuf )
3659 wbuf = wxConvISO8859_1.cMB2WX(s);
3660
3661 return wbuf;
3662}
3663
3664wxCharBuffer wxSafeConvertWX2MB(const wchar_t *ws)
3665{
3666 if ( !ws )
3667 return wxCharBuffer();
3668
3669 wxCharBuffer buf(wxConvLibc.cWX2MB(ws));
3670 if ( !buf )
3671 buf = wxMBConvUTF8(wxMBConvUTF8::MAP_INVALID_UTF8_TO_OCTAL).cWX2MB(ws);
3672
3673 return buf;
3674}
3675
3676#endif // wxUSE_UNICODE
f5a1953b 3677
1e50d914
VS
3678// ----------------------------------------------------------------------------
3679// globals
3680// ----------------------------------------------------------------------------
3681
3682// NB: The reason why we create converted objects in this convoluted way,
3683// using a factory function instead of global variable, is that they
3684// may be used at static initialization time (some of them are used by
3685// wxString ctors and there may be a global wxString object). In other
3686// words, possibly _before_ the converter global object would be
3687// initialized.
3688
3689#undef wxConvLibc
3690#undef wxConvUTF8
3691#undef wxConvUTF7
3692#undef wxConvLocal
3693#undef wxConvISO8859_1
3694
3695#define WX_DEFINE_GLOBAL_CONV2(klass, impl_klass, name, ctor_args) \
3696 WXDLLIMPEXP_DATA_BASE(klass*) name##Ptr = NULL; \
092ee46f 3697 WXDLLIMPEXP_BASE klass* wxGet_##name##Ptr() \
1e50d914
VS
3698 { \
3699 static impl_klass name##Obj ctor_args; \
3700 return &name##Obj; \
3701 } \
3702 /* this ensures that all global converter objects are created */ \
3703 /* by the time static initialization is done, i.e. before any */ \
3704 /* thread is launched: */ \
3705 static klass* gs_##name##instance = wxGet_##name##Ptr()
3706
3707#define WX_DEFINE_GLOBAL_CONV(klass, name, ctor_args) \
3708 WX_DEFINE_GLOBAL_CONV2(klass, klass, name, ctor_args)
3709
3710#ifdef __WINDOWS__
3711 WX_DEFINE_GLOBAL_CONV2(wxMBConv, wxMBConv_win32, wxConvLibc, wxEMPTY_PARAMETER_VALUE);
3712#elif defined(__WXMAC__) && !defined(__MACH__)
3713 WX_DEFINE_GLOBAL_CONV2(wxMBConv, wxMBConv_mac, wxConvLibc, wxEMPTY_PARAMETER_VALUE);
3714#else
3715 WX_DEFINE_GLOBAL_CONV2(wxMBConv, wxMBConvLibc, wxConvLibc, wxEMPTY_PARAMETER_VALUE);
3716#endif
3717
3718WX_DEFINE_GLOBAL_CONV(wxMBConvUTF8, wxConvUTF8, wxEMPTY_PARAMETER_VALUE);
3719WX_DEFINE_GLOBAL_CONV(wxMBConvUTF7, wxConvUTF7, wxEMPTY_PARAMETER_VALUE);
3720
3721WX_DEFINE_GLOBAL_CONV(wxCSConv, wxConvLocal, (wxFONTENCODING_SYSTEM));
3722WX_DEFINE_GLOBAL_CONV(wxCSConv, wxConvISO8859_1, (wxFONTENCODING_ISO8859_1));
3723
3724WXDLLIMPEXP_DATA_BASE(wxMBConv *) wxConvCurrent = wxGet_wxConvLibcPtr();
3725WXDLLIMPEXP_DATA_BASE(wxMBConv *) wxConvUI = wxGet_wxConvLocalPtr();
3726
3727#if defined(__WXMAC__) && defined(TARGET_CARBON)
3728static wxMBConv_macUTF8D wxConvMacUTF8DObj;
3729#endif
3730WXDLLIMPEXP_DATA_BASE(wxMBConv *) wxConvFileName =
3731#ifdef __WXOSX__
3732#if defined(__WXMAC__) && defined(TARGET_CARBON)
3733 &wxConvMacUTF8DObj;
3734#else
3735 wxGet_wxConvUTF8Ptr();
3736#endif
3737#else // !__WXOSX__
3738 wxGet_wxConvLibcPtr();
3739#endif // __WXOSX__/!__WXOSX__
3740
bde4baac
VZ
3741#else // !wxUSE_WCHAR_T
3742
1e50d914 3743// FIXME-UTF8: remove this, wxUSE_WCHAR_T is required now
bde4baac
VZ
3744// stand-ins in absence of wchar_t
3745WXDLLIMPEXP_DATA_BASE(wxMBConv) wxConvLibc,
3746 wxConvISO8859_1,
3747 wxConvLocal,
3748 wxConvUTF8;
3749
3750#endif // wxUSE_WCHAR_T/!wxUSE_WCHAR_T