]>
git.saurik.com Git - wxWidgets.git/blob - src/common/wxcrt.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: src/common/wxcrt.cpp
3 // Purpose: wxChar CRT wrappers implementation
5 // Modified by: Ron Lee, Francesco Montorsi
8 // Copyright: (c) wxWidgets copyright
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
12 // ===========================================================================
13 // headers, declarations, constants
14 // ===========================================================================
16 // For compilers that support precompilation, includes "wx.h".
17 #include "wx/wxprec.h"
25 #define _ISOC9X_SOURCE 1 // to get vsscanf()
26 #define _BSD_SOURCE 1 // to still get strdup()
36 #include "wx/msw/wince/time.h"
40 #include "wx/string.h"
42 #include "wx/utils.h" // for wxMin and wxMax
47 // there is no errno.h under CE apparently
48 #define wxSET_ERRNO(value)
52 #define wxSET_ERRNO(value) errno = value
55 #if defined(__MWERKS__) && __MSL__ >= 0x6000
61 WXDLLIMPEXP_BASE
size_t wxMB2WC(wchar_t *buf
, const char *psz
, size_t n
)
63 // assume that we have mbsrtowcs() too if we have wcsrtombs()
66 memset(&mbstate
, 0, sizeof(mbstate_t));
71 if (n
) *buf
= wxT('\0');
75 return mbsrtowcs(buf
, &psz
, n
, &mbstate
);
77 return wxMbstowcs(buf
, psz
, n
);
81 // note that we rely on common (and required by Unix98 but unfortunately not
82 // C99) extension which allows to call mbs(r)towcs() with NULL output pointer
83 // to just get the size of the needed buffer -- this is needed as otherwise
84 // we have no idea about how much space we need and if the CRT doesn't
85 // support it (the only currently known example being Metrowerks, see
86 // wx/crt.h) we don't use its mbstowcs() at all
88 return mbsrtowcs((wchar_t *) NULL
, &psz
, 0, &mbstate
);
90 return wxMbstowcs((wchar_t *) NULL
, psz
, 0);
94 WXDLLIMPEXP_BASE
size_t wxWC2MB(char *buf
, const wchar_t *pwz
, size_t n
)
98 memset(&mbstate
, 0, sizeof(mbstate_t));
103 // glibc2.1 chokes on null input
107 #ifdef HAVE_WCSRTOMBS
108 return wcsrtombs(buf
, &pwz
, n
, &mbstate
);
110 return wxWcstombs(buf
, pwz
, n
);
114 #ifdef HAVE_WCSRTOMBS
115 return wcsrtombs((char *) NULL
, &pwz
, 0, &mbstate
);
117 return wxWcstombs((char *) NULL
, pwz
, 0);
120 #endif // wxUSE_WCHAR_T
122 WXDLLIMPEXP_BASE
bool wxOKlibc()
124 #if wxUSE_WCHAR_T && defined(__UNIX__) && defined(__GLIBC__) && !defined(__WINE__)
125 // glibc 2.0 uses UTF-8 even when it shouldn't
127 if ((MB_CUR_MAX
== 2) &&
128 (wxMB2WC(&res
, "\xdd\xa5", 1) == 1) &&
130 // this is UTF-8 allright, check whether that's what we want
131 char *cur_locale
= setlocale(LC_CTYPE
, NULL
);
132 if ((strlen(cur_locale
) < 4) ||
133 (strcasecmp(cur_locale
+ strlen(cur_locale
) - 4, "utf8")) ||
134 (strcasecmp(cur_locale
+ strlen(cur_locale
) - 5, "utf-8"))) {
135 // nope, don't use libc conversion
143 char* wxSetlocale(int category
, const char *locale
)
146 // FIXME-CE: there is no setlocale() in CE CRT, use SetThreadLocale()?
147 wxUnusedVar(category
);
151 #else // !__WXWINCE__
152 char *rv
= setlocale(category
, locale
);
153 if ( locale
!= NULL
/* setting locale, not querying */ &&
154 rv
/* call was successful */ )
156 wxUpdateLocaleIsUtf8();
159 #endif // __WXWINCE__/!__WXWINCE__
162 // ============================================================================
163 // printf() functions business
164 // ============================================================================
166 // special test mode: define all functions below even if we don't really need
167 // them to be able to test them
177 #define wxNEED_WPRINTF
179 int wxCRT_VfprintfW( FILE *stream
, const wchar_t *format
, va_list argptr
);
183 /* Digital Mars adds count to _stprintf (C99) so convert */
184 int wxCRT_SprintfW (wchar_t * __RESTRICT s
, const wchar_t * __RESTRICT format
, ... )
188 va_start( arglist
, format
);
189 int iLen
= swprintf ( s
, -1, format
, arglist
);
195 // ----------------------------------------------------------------------------
196 // implement the standard IO functions for wide char if libc doesn't have them
197 // ----------------------------------------------------------------------------
200 int wxCRT_FputsW(const wchar_t *ws
, FILE *stream
)
202 wxCharBuffer
buf(wxConvLibc
.cWC2MB(ws
));
206 // counting the number of wide characters written isn't worth the trouble,
207 // simply distinguish between ok and error
208 return wxCRT_FputsA(buf
, stream
) == -1 ? -1 : 0;
210 #endif // !wxCRT_FputsW
213 int wxCRT_PutsW(const wchar_t *ws
)
215 int rc
= wxCRT_FputsW(ws
, stdout
);
218 if ( wxCRT_FputsW(L
"\n", stdout
) == -1 )
226 #endif // !wxCRT_PutsW
229 int /* not wint_t */ wxCRT_FputcW(wchar_t wc
, FILE *stream
)
231 wchar_t ws
[2] = { wc
, L
'\0' };
233 return wxCRT_FputsW(ws
, stream
);
235 #endif // !wxCRT_FputcW
237 // NB: we only implement va_list functions here, the ones taking ... are
238 // defined below for wxNEED_PRINTF_CONVERSION case anyhow and we reuse
239 // the definitions there to avoid duplicating them here
240 #ifdef wxNEED_WPRINTF
242 // TODO: implement the scanf() functions
243 static int vwscanf(const wchar_t *format
, va_list argptr
)
245 wxFAIL_MSG( _T("TODO") );
250 static int vswscanf(const wchar_t *ws
, const wchar_t *format
, va_list argptr
)
252 // The best we can do without proper Unicode support in glibc is to
253 // convert the strings into MB representation and run ANSI version
254 // of the function. This doesn't work with %c and %s because of difference
255 // in size of char and wchar_t, though.
257 wxCHECK_MSG( wxStrstr(format
, _T("%s")) == NULL
, -1,
258 _T("incomplete vswscanf implementation doesn't allow %s") );
259 wxCHECK_MSG( wxStrstr(format
, _T("%c")) == NULL
, -1,
260 _T("incomplete vswscanf implementation doesn't allow %c") );
262 return vsscanf(wxConvLibc
.cWX2MB(ws
), wxConvLibc
.cWX2MB(format
), argptr
);
265 static int vfwscanf(FILE *stream
, const wchar_t *format
, va_list argptr
)
267 wxFAIL_MSG( _T("TODO") );
272 #define vswprintf wxCRT_VsnprintfW
274 static int vfwprintf(FILE *stream
, const wchar_t *format
, va_list argptr
)
277 int rc
= s
.PrintfV(format
, argptr
);
281 // we can't do much better without Unicode support in libc...
282 if ( fprintf(stream
, "%s", (const char*)s
.mb_str() ) == -1 )
289 static int vwprintf(const wchar_t *format
, va_list argptr
)
291 return wxCRT_VfprintfW(stdout
, format
, argptr
);
294 #endif // wxNEED_WPRINTF
296 // ----------------------------------------------------------------------------
297 // wxPrintf(), wxScanf() and relatives
298 // ----------------------------------------------------------------------------
300 // FIXME-UTF8: do format conversion using (modified) wxFormatConverter in
301 // template wrappers, not here; note that it will needed to
302 // translate all forms of string specifiers to %(l)s for wxPrintf(),
303 // but it only should do what it did in 2.8 for wxScanf()!
305 #ifndef wxCRT_PrintfW
306 int wxCRT_PrintfW( const wchar_t *format
, ... )
309 va_start(argptr
, format
);
311 int ret
= vwprintf( format
, argptr
);
319 #ifndef wxCRT_FprintfW
320 int wxCRT_FprintfW( FILE *stream
, const wchar_t *format
, ... )
323 va_start( argptr
, format
);
325 int ret
= vfwprintf( stream
, format
, argptr
);
333 #ifndef wxCRT_VfprintfW
334 int wxCRT_VfprintfW( FILE *stream
, const wchar_t *format
, va_list argptr
)
336 return vfwprintf( stream
, format
, argptr
);
340 #ifndef wxCRT_VprintfW
341 int wxCRT_VprintfW( const wchar_t *format
, va_list argptr
)
343 return vwprintf( format
, argptr
);
347 #ifndef wxCRT_VsprintfW
348 int wxCRT_VsprintfW( wchar_t *str
, const wchar_t *format
, va_list argptr
)
350 // same as for wxSprintf()
351 return vswprintf(str
, INT_MAX
/ 4, format
, argptr
);
356 int wxCRT_ScanfW(const wchar_t *format
, ...)
359 va_start(argptr
, format
);
362 #if (__DECCXX_VER >= 70100000) && !defined(__STD_CFRONT) && !defined( __NONAMESPACE_STD )
363 int ret
= std::vwscanf(format
, argptr
);
365 int ret
= vwscanf(format
, argptr
);
368 int ret
= vwscanf(format
, argptr
);
377 #ifndef wxCRT_SscanfW
378 int wxCRT_SscanfW(const wchar_t *str
, const wchar_t *format
, ...)
381 va_start(argptr
, format
);
384 #if (__DECCXX_VER >= 70100000) && !defined(__STD_CFRONT) && !defined( __NONAMESPACE_STD )
385 int ret
= std::vswscanf(str
, format
, argptr
);
387 int ret
= vswscanf(str
, format
, argptr
);
390 int ret
= vswscanf(str
, format
, argptr
);
399 #ifndef wxCRT_FscanfW
400 int wxCRT_FscanfW(FILE *stream
, const wchar_t *format
, ...)
403 va_start(argptr
, format
);
405 #if (__DECCXX_VER >= 70100000) && !defined(__STD_CFRONT) && !defined( __NONAMESPACE_STD )
406 int ret
= std::vfwscanf(stream
, format
, argptr
);
408 int ret
= vfwscanf(stream
, format
, argptr
);
411 int ret
= vfwscanf(stream
, format
, argptr
);
420 #ifndef wxCRT_VsscanfW
421 int wxCRT_VsscanfW(const wchar_t *str
, const wchar_t *format
, va_list argptr
)
424 #if (__DECCXX_VER >= 70100000) && !defined(__STD_CFRONT) && !defined( __NONAMESPACE_STD )
425 return std::vswscanf(str
, format
, argptr
);
427 return vswscanf(str
, format
, argptr
);
430 return vswscanf(str
, format
, argptr
);
436 // ----------------------------------------------------------------------------
437 // wrappers to printf and scanf function families
438 // ----------------------------------------------------------------------------
440 #if !wxUSE_UTF8_LOCALE_ONLY
441 int wxDoSprintfWchar(char *str
, const wxChar
*format
, ...)
444 va_start(argptr
, format
);
446 int rv
= wxVsprintf(str
, format
, argptr
);
451 #endif // !wxUSE_UTF8_LOCALE_ONLY
453 #if wxUSE_UNICODE_UTF8
454 int wxDoSprintfUtf8(char *str
, const char *format
, ...)
457 va_start(argptr
, format
);
459 int rv
= wxVsprintf(str
, format
, argptr
);
464 #endif // wxUSE_UNICODE_UTF8
468 #if !wxUSE_UTF8_LOCALE_ONLY
469 int wxDoSprintfWchar(wchar_t *str
, const wxChar
*format
, ...)
472 va_start(argptr
, format
);
474 int rv
= wxVsprintf(str
, format
, argptr
);
479 #endif // !wxUSE_UTF8_LOCALE_ONLY
481 #if wxUSE_UNICODE_UTF8
482 int wxDoSprintfUtf8(wchar_t *str
, const char *format
, ...)
485 va_start(argptr
, format
);
487 int rv
= wxVsprintf(str
, format
, argptr
);
492 #endif // wxUSE_UNICODE_UTF8
494 #endif // wxUSE_UNICODE
496 #if !wxUSE_UTF8_LOCALE_ONLY
497 int wxDoSnprintfWchar(char *str
, size_t size
, const wxChar
*format
, ...)
500 va_start(argptr
, format
);
502 int rv
= wxVsnprintf(str
, size
, format
, argptr
);
507 #endif // !wxUSE_UTF8_LOCALE_ONLY
509 #if wxUSE_UNICODE_UTF8
510 int wxDoSnprintfUtf8(char *str
, size_t size
, const char *format
, ...)
513 va_start(argptr
, format
);
515 int rv
= wxVsnprintf(str
, size
, format
, argptr
);
520 #endif // wxUSE_UNICODE_UTF8
524 #if !wxUSE_UTF8_LOCALE_ONLY
525 int wxDoSnprintfWchar(wchar_t *str
, size_t size
, const wxChar
*format
, ...)
528 va_start(argptr
, format
);
530 int rv
= wxVsnprintf(str
, size
, format
, argptr
);
535 #endif // !wxUSE_UTF8_LOCALE_ONLY
537 #if wxUSE_UNICODE_UTF8
538 int wxDoSnprintfUtf8(wchar_t *str
, size_t size
, const char *format
, ...)
541 va_start(argptr
, format
);
543 int rv
= wxVsnprintf(str
, size
, format
, argptr
);
548 #endif // wxUSE_UNICODE_UTF8
550 #endif // wxUSE_UNICODE
553 #ifdef HAVE_BROKEN_VSNPRINTF_DECL
554 #define vsnprintf wx_fixed_vsnprintf
562 #if !wxUSE_UTF8_LOCALE_ONLY
563 int ConvertStringToBuf(const wxString
& s
, char *out
, size_t outsize
)
565 const wxWX2WCbuf buf
= s
.wc_str();
567 size_t len
= wxConvLibc
.FromWChar(out
, outsize
, buf
);
568 if ( len
!= wxCONV_FAILED
)
571 return wxConvLibc
.FromWChar(NULL
, 0, buf
);
573 #endif // !wxUSE_UTF8_LOCALE_ONLY
575 #if wxUSE_UNICODE_UTF8
576 int ConvertStringToBuf(const wxString
& s
, wchar_t *out
, size_t outsize
)
578 const wxWX2WCbuf
buf(s
.wc_str());
579 size_t len
= s
.length(); // same as buf length for wchar_t*
582 memcpy(out
, buf
, (len
+1) * sizeof(wchar_t));
584 else // not enough space
586 memcpy(out
, buf
, (outsize
-1) * sizeof(wchar_t));
591 #endif // wxUSE_UNICODE_UTF8
593 } // anonymous namespace
596 static size_t PrintfViaString(T
*out
, size_t outsize
,
597 const wxString
& format
, va_list argptr
)
600 s
.PrintfV(format
, argptr
);
602 return ConvertStringToBuf(s
, out
, outsize
);
604 #endif // wxUSE_UNICODE
606 int wxVsprintf(char *str
, const wxString
& format
, va_list argptr
)
608 #if wxUSE_UTF8_LOCALE_ONLY
609 return wxCRT_VsprintfA(str
, format
.wx_str(), argptr
);
611 #if wxUSE_UNICODE_UTF8
612 if ( wxLocaleIsUtf8
)
613 return wxCRT_VsprintfA(str
, format
.wx_str(), argptr
);
617 return PrintfViaString(str
, wxNO_LEN
, format
, argptr
);
619 return wxCRT_VsprintfA(str
, format
.mb_str(), argptr
);
625 int wxVsprintf(wchar_t *str
, const wxString
& format
, va_list argptr
)
627 #if wxUSE_UNICODE_WCHAR
630 This fails with a bug similar to
631 http://www.digitalmars.com/pnews/read.php?server=news.digitalmars.com&group=c++.beta&artnum=680
633 I don't see it being used in the wxWidgets sources at present (oct 2007) CE
635 #pragma message ( "warning ::::: wxVsprintf(wchar_t *str, const wxString& format, va_list argptr) not yet implemented" )
636 wxFAIL_MSG( _T("TODO") );
640 return wxCRT_VsprintfW(str
, format
.wc_str(), argptr
);
642 #else // wxUSE_UNICODE_UTF8
643 #if !wxUSE_UTF8_LOCALE_ONLY
644 if ( !wxLocaleIsUtf8
)
645 return wxCRT_VsprintfW(str
, format
.wc_str(), argptr
);
648 return PrintfViaString(str
, wxNO_LEN
, format
, argptr
);
649 #endif // wxUSE_UNICODE_UTF8
651 #endif // wxUSE_UNICODE
653 int wxVsnprintf(char *str
, size_t size
, const wxString
& format
, va_list argptr
)
656 #if wxUSE_UTF8_LOCALE_ONLY
657 rv
= wxCRT_VsnprintfA(str
, size
, format
.wx_str(), argptr
);
659 #if wxUSE_UNICODE_UTF8
660 if ( wxLocaleIsUtf8
)
661 rv
= wxCRT_VsnprintfA(str
, size
, format
.wx_str(), argptr
);
666 // NB: if this code is called, then wxString::PrintV() would use the
667 // wchar_t* version of wxVsnprintf(), so it's safe to use PrintV()
669 rv
= PrintfViaString(str
, size
, format
, argptr
);
672 rv
= wxCRT_VsnprintfA(str
, size
, format
.mb_str(), argptr
);
676 // VsnprintfTestCase reveals that glibc's implementation of vswprintf
677 // doesn't nul terminate on truncation.
684 int wxVsnprintf(wchar_t *str
, size_t size
, const wxString
& format
, va_list argptr
)
688 #if wxUSE_UNICODE_WCHAR
689 rv
= wxCRT_VsnprintfW(str
, size
, format
.wc_str(), argptr
);
690 #else // wxUSE_UNICODE_UTF8
691 #if !wxUSE_UTF8_LOCALE_ONLY
692 if ( !wxLocaleIsUtf8
)
693 rv
= wxCRT_VsnprintfW(str
, size
, format
.wc_str(), argptr
);
697 // NB: if this code is called, then wxString::PrintV() would use the
698 // char* version of wxVsnprintf(), so it's safe to use PrintV()
700 rv
= PrintfViaString(str
, size
, format
, argptr
);
702 #endif // wxUSE_UNICODE_UTF8
704 // VsnprintfTestCase reveals that glibc's implementation of vswprintf
705 // doesn't nul terminate on truncation.
710 #endif // wxUSE_UNICODE
714 // ----------------------------------------------------------------------------
715 // ctype.h stuff (currently unused)
716 // ----------------------------------------------------------------------------
718 #ifdef wxNEED_WX_MBSTOWCS
720 WXDLLIMPEXP_BASE
size_t wxMbstowcs (wchar_t * out
, const char * in
, size_t outlen
)
730 const char* origin
= in
;
732 while (outlen
-- && *in
)
734 *out
++ = (wchar_t) *in
++;
742 WXDLLIMPEXP_BASE
size_t wxWcstombs (char * out
, const wchar_t * in
, size_t outlen
)
752 const wchar_t* origin
= in
;
754 while (outlen
-- && *in
)
756 *out
++ = (char) *in
++;
764 #endif // wxNEED_WX_MBSTOWCS
766 #ifndef wxCRT_StrdupA
767 WXDLLIMPEXP_BASE
char *wxCRT_StrdupA(const char *s
)
769 return strcpy((char *)malloc(strlen(s
) + 1), s
);
771 #endif // wxCRT_StrdupA
773 #ifndef wxCRT_StrdupW
774 WXDLLIMPEXP_BASE
wchar_t * wxCRT_StrdupW(const wchar_t *pwz
)
776 size_t size
= (wxWcslen(pwz
) + 1) * sizeof(wchar_t);
777 wchar_t *ret
= (wchar_t *) malloc(size
);
778 memcpy(ret
, pwz
, size
);
781 #endif // wxCRT_StrdupW
783 #ifndef wxCRT_StricmpA
784 WXDLLIMPEXP_BASE
int wxCRT_StricmpA(const char *psz1
, const char *psz2
)
786 register char c1
, c2
;
788 c1
= wxTolower(*psz1
++);
789 c2
= wxTolower(*psz2
++);
790 } while ( c1
&& (c1
== c2
) );
793 #endif // !defined(wxCRT_StricmpA)
795 #ifndef wxCRT_StricmpW
796 WXDLLIMPEXP_BASE
int wxCRT_StricmpW(const wchar_t *psz1
, const wchar_t *psz2
)
798 register wchar_t c1
, c2
;
800 c1
= wxTolower(*psz1
++);
801 c2
= wxTolower(*psz2
++);
802 } while ( c1
&& (c1
== c2
) );
805 #endif // !defined(wxCRT_StricmpW)
807 #ifndef wxCRT_StrnicmpA
808 WXDLLIMPEXP_BASE
int wxCRT_StrnicmpA(const char *s1
, const char *s2
, size_t n
)
810 // initialize the variables just to suppress stupid gcc warning
811 register char c1
= 0, c2
= 0;
812 while (n
&& ((c1
= wxTolower(*s1
)) == (c2
= wxTolower(*s2
)) ) && c1
) n
--, s1
++, s2
++;
814 if (c1
< c2
) return -1;
815 if (c1
> c2
) return 1;
819 #endif // !defined(wxCRT_StrnicmpA)
821 #ifndef wxCRT_StrnicmpW
822 WXDLLIMPEXP_BASE
int wxCRT_StrnicmpW(const wchar_t *s1
, const wchar_t *s2
, size_t n
)
824 // initialize the variables just to suppress stupid gcc warning
825 register wchar_t c1
= 0, c2
= 0;
826 while (n
&& ((c1
= wxTolower(*s1
)) == (c2
= wxTolower(*s2
)) ) && c1
) n
--, s1
++, s2
++;
828 if (c1
< c2
) return -1;
829 if (c1
> c2
) return 1;
833 #endif // !defined(wxCRT_StrnicmpW)
835 // ----------------------------------------------------------------------------
836 // string.h functions
837 // ----------------------------------------------------------------------------
839 // this (and wxCRT_StrncmpW below) are extern "C" because they are needed
840 // by regex code, the rest isn't needed, so it's not declared as extern "C"
841 #ifndef wxCRT_StrlenW
842 extern "C" WXDLLIMPEXP_BASE
size_t wxCRT_StrlenW(const wchar_t *s
)
852 // ----------------------------------------------------------------------------
853 // stdlib.h functions
854 // ----------------------------------------------------------------------------
856 #ifndef wxCRT_GetenvW
857 WXDLLIMPEXP_BASE
wchar_t* wxCRT_GetenvW(const wchar_t *name
)
859 // NB: buffer returned by getenv() is allowed to be overwritten next
860 // time getenv() is called, so it is OK to use static string
861 // buffer to hold the data.
862 static wxWCharBuffer
value((wchar_t*)NULL
);
863 value
= wxConvLibc
.cMB2WC(getenv(wxConvLibc
.cWC2MB(name
)));
866 #endif // !wxCRT_GetenvW
868 #ifndef wxCRT_StrftimeW
869 WXDLLIMPEXP_BASE
size_t
870 wxCRT_StrftimeW(wchar_t *s
, size_t maxsize
, const wchar_t *fmt
, const struct tm
*tm
)
875 wxCharBuffer
buf(maxsize
);
877 wxCharBuffer
bufFmt(wxConvLibc
.cWX2MB(fmt
));
881 size_t ret
= strftime(buf
.data(), maxsize
, bufFmt
, tm
);
885 wxWCharBuffer wbuf
= wxConvLibc
.cMB2WX(buf
);
889 wxCRT_StrncpyW(s
, wbuf
, maxsize
);
890 return wxCRT_StrlenW(s
);
892 #endif // !wxCRT_StrftimeW
894 #endif // wxUSE_WCHAR_T
899 wxCRT_StrtoullBase(const T
* nptr
, T
** endptr
, int base
, T
* sign
)
901 wxULongLong_t sum
= 0;
902 wxString
wxstr(nptr
);
903 wxString::const_iterator i
= wxstr
.begin();
904 wxString::const_iterator end
= wxstr
.end();
907 while ( i
!= end
&& wxIsspace(*i
) ) ++i
;
914 if ( c
== wxT('+') || c
== wxT('-') )
922 if ( i
!= end
&& *i
== wxT('0') )
927 if ( *i
== wxT('x') && (base
== 16 || base
== 0) )
947 for ( ; i
!= end
; ++i
)
957 n
= wxTolower(c
) - wxT('a') + 10;
962 if ( n
>= (unsigned int)base
)
963 // Invalid character (for this base)
966 wxULongLong_t prevsum
= sum
;
967 sum
= (sum
* base
) + n
;
978 *endptr
= (T
*)(nptr
+ (i
- wxstr
.begin()));
985 static wxULongLong_t
wxCRT_DoStrtoull(const T
* nptr
, T
** endptr
, int base
)
988 wxULongLong_t uval
= ::wxCRT_StrtoullBase(nptr
, endptr
, base
, &sign
);
990 if ( sign
== wxT('-') )
1000 static wxLongLong_t
wxCRT_DoStrtoll(const T
* nptr
, T
** endptr
, int base
)
1003 wxULongLong_t uval
= ::wxCRT_StrtoullBase(nptr
, endptr
, base
, &sign
);
1004 wxLongLong_t val
= 0;
1006 if ( sign
== wxT('-') )
1008 if ( uval
<= wxULL(wxINT64_MAX
+1) )
1010 if ( uval
== wxULL(wxINT64_MAX
+1))
1011 val
= -((wxLongLong_t
)wxINT64_MAX
) - 1;
1013 val
= -((wxLongLong_t
)uval
);
1017 wxSET_ERRNO(ERANGE
);
1020 else if ( uval
<= wxINT64_MAX
)
1026 wxSET_ERRNO(ERANGE
);
1032 #ifndef wxCRT_StrtollA
1033 wxLongLong_t
wxCRT_StrtollA(const char* nptr
, char** endptr
, int base
)
1034 { return wxCRT_DoStrtoll(nptr
, endptr
, base
); }
1036 #ifndef wxCRT_StrtollW
1037 wxLongLong_t
wxCRT_StrtollW(const wchar_t* nptr
, wchar_t** endptr
, int base
)
1038 { return wxCRT_DoStrtoll(nptr
, endptr
, base
); }
1041 #ifndef wxCRT_StrtoullA
1042 wxULongLong_t
wxCRT_StrtoullA(const char* nptr
, char** endptr
, int base
)
1043 { return wxCRT_DoStrtoull(nptr
, endptr
, base
); }
1045 #ifndef wxCRT_StrtoullW
1046 wxULongLong_t
wxCRT_StrtoullW(const wchar_t* nptr
, wchar_t** endptr
, int base
)
1047 { return wxCRT_DoStrtoull(nptr
, endptr
, base
); }
1050 #endif // wxLongLong_t
1052 // ----------------------------------------------------------------------------
1053 // functions which we may need even if !wxUSE_WCHAR_T
1054 // ----------------------------------------------------------------------------
1056 template<typename T
>
1057 static T
*wxCRT_DoStrtok(T
*psz
, const T
*delim
, T
**save_ptr
)
1066 psz
+= wxStrspn(psz
, delim
);
1069 *save_ptr
= (T
*)NULL
;
1074 psz
= wxStrpbrk(psz
, delim
);
1077 *save_ptr
= (T
*)NULL
;
1082 *save_ptr
= psz
+ 1;
1088 #ifndef wxCRT_StrtokA
1089 char *wxCRT_StrtokA(char *psz
, const char *delim
, char **save_ptr
)
1090 { return wxCRT_DoStrtok(psz
, delim
, save_ptr
); }
1092 #ifndef wxCRT_StrtokW
1093 wchar_t *wxCRT_StrtokW(wchar_t *psz
, const wchar_t *delim
, wchar_t **save_ptr
)
1094 { return wxCRT_DoStrtok(psz
, delim
, save_ptr
); }
1097 // ----------------------------------------------------------------------------
1098 // missing C RTL functions
1099 // ----------------------------------------------------------------------------
1101 #ifdef wxNEED_STRDUP
1103 char *strdup(const char *s
)
1105 char *dest
= (char*) malloc( strlen( s
) + 1 ) ;
1107 strcpy( dest
, s
) ;
1110 #endif // wxNEED_STRDUP
1112 #if defined(__WXWINCE__) && (_WIN32_WCE <= 211)
1114 void *calloc( size_t num
, size_t size
)
1116 void** ptr
= (void **)malloc(num
* size
);
1117 memset( ptr
, 0, num
* size
);
1121 #endif // __WXWINCE__ <= 211
1123 // ============================================================================
1125 // ============================================================================
1127 #if wxUSE_UNICODE_UTF8
1129 #if !wxUSE_UTF8_LOCALE_ONLY
1130 bool wxLocaleIsUtf8
= false; // the safer setting if not known
1133 static bool wxIsLocaleUtf8()
1135 // NB: we intentionally don't use wxLocale::GetSystemEncodingName(),
1136 // because a) it may be unavailable in some builds and b) has slightly
1137 // different semantics (default locale instead of current)
1139 #if defined(HAVE_LANGINFO_H) && defined(CODESET)
1140 // GNU libc provides current character set this way (this conforms to
1142 const char *charset
= nl_langinfo(CODESET
);
1145 // "UTF-8" is used by modern glibc versions, but test other variants
1146 // as well, just in case:
1147 if ( strcmp(charset
, "UTF-8") == 0 ||
1148 strcmp(charset
, "utf-8") == 0 ||
1149 strcmp(charset
, "UTF8") == 0 ||
1150 strcmp(charset
, "utf8") == 0 )
1157 // check if we're running under the "C" locale: it is 7bit subset
1158 // of UTF-8, so it can be safely used with the UTF-8 build:
1159 const char *lc_ctype
= setlocale(LC_CTYPE
, NULL
);
1161 (strcmp(lc_ctype
, "C") == 0 || strcmp(lc_ctype
, "POSIX") == 0) )
1166 // we don't know what charset libc is using, so assume the worst
1171 void wxUpdateLocaleIsUtf8()
1173 #if wxUSE_UTF8_LOCALE_ONLY
1174 if ( !wxIsLocaleUtf8() )
1176 wxLogFatalError(_T("This program requires UTF-8 locale to run."));
1178 #else // !wxUSE_UTF8_LOCALE_ONLY
1179 wxLocaleIsUtf8
= wxIsLocaleUtf8();
1183 #endif // wxUSE_UNICODE_UTF8
1185 // ============================================================================
1186 // wx wrappers for CRT functions
1187 // ============================================================================
1189 #if wxUSE_UNICODE_WCHAR
1190 #define CALL_ANSI_OR_UNICODE(return_kw, callA, callW) return_kw callW
1191 #elif wxUSE_UNICODE_UTF8 && !wxUSE_UTF8_LOCALE_ONLY
1192 #define CALL_ANSI_OR_UNICODE(return_kw, callA, callW) \
1193 return_kw wxLocaleIsUtf8 ? callA : callW
1194 #else // ANSI or UTF8 only
1195 #define CALL_ANSI_OR_UNICODE(return_kw, callA, callW) return_kw callA
1198 int wxPuts(const wxString
& s
)
1200 CALL_ANSI_OR_UNICODE(return,
1201 wxCRT_PutsA(s
.mb_str()),
1202 wxCRT_PutsW(s
.wc_str()));
1205 int wxFputs(const wxString
& s
, FILE *stream
)
1207 CALL_ANSI_OR_UNICODE(return,
1208 wxCRT_FputsA(s
.mb_str(), stream
),
1209 wxCRT_FputsW(s
.wc_str(), stream
));
1212 int wxFputc(const wxUniChar
& c
, FILE *stream
)
1214 #if !wxUSE_UNICODE // FIXME-UTF8: temporary, remove this with ANSI build
1215 return wxCRT_FputcA((char)c
, stream
);
1217 CALL_ANSI_OR_UNICODE(return,
1218 wxCRT_FputsA(c
.AsUTF8(), stream
),
1219 wxCRT_FputcW((wchar_t)c
, stream
));
1223 #ifdef wxCRT_PerrorA
1225 void wxPerror(const wxString
& s
)
1227 #ifdef wxCRT_PerrorW
1228 CALL_ANSI_OR_UNICODE(wxEMPTY_PARAMETER_VALUE
,
1229 wxCRT_PerrorA(s
.mb_str()),
1230 wxCRT_PerrorW(s
.wc_str()));
1232 wxCRT_PerrorA(s
.mb_str());
1236 #endif // wxCRT_PerrorA
1238 wchar_t *wxFgets(wchar_t *s
, int size
, FILE *stream
)
1240 wxCHECK_MSG( s
, NULL
, "empty buffer passed to wxFgets()" );
1242 wxCharBuffer
buf(size
- 1);
1243 // FIXME: this reads too little data if wxConvLibc uses UTF-8 ('size' wide
1244 // characters may be encoded by up to 'size'*4 bytes), but what
1246 if ( wxFgets(buf
.data(), size
, stream
) == NULL
)
1249 if ( wxConvLibc
.ToWChar(s
, size
, buf
, wxNO_LEN
) == wxCONV_FAILED
)
1255 // ----------------------------------------------------------------------------
1256 // wxScanf() and friends
1257 // ----------------------------------------------------------------------------
1259 #ifndef HAVE_NO_VSSCANF // __VISUALC__ and __DMC__ see wx/crt.h
1260 int wxVsscanf(const char *str
, const char *format
, va_list ap
)
1261 { return wxCRT_VsscanfA(str
, format
, ap
); }
1262 int wxVsscanf(const wchar_t *str
, const wchar_t *format
, va_list ap
)
1263 { return wxCRT_VsscanfW(str
, format
, ap
); }
1264 int wxVsscanf(const wxCharBuffer
& str
, const char *format
, va_list ap
)
1265 { return wxCRT_VsscanfA(str
, format
, ap
); }
1266 int wxVsscanf(const wxWCharBuffer
& str
, const wchar_t *format
, va_list ap
)
1267 { return wxCRT_VsscanfW(str
, format
, ap
); }
1268 int wxVsscanf(const wxString
& str
, const char *format
, va_list ap
)
1269 { return wxCRT_VsscanfA(str
.mb_str(), format
, ap
); }
1270 int wxVsscanf(const wxString
& str
, const wchar_t *format
, va_list ap
)
1271 { return wxCRT_VsscanfW(str
.wc_str(), format
, ap
); }
1272 int wxVsscanf(const wxCStrData
& str
, const char *format
, va_list ap
)
1273 { return wxCRT_VsscanfA(str
.AsCharBuf(), format
, ap
); }
1274 int wxVsscanf(const wxCStrData
& str
, const wchar_t *format
, va_list ap
)
1275 { return wxCRT_VsscanfW(str
.AsWCharBuf(), format
, ap
); }
1276 #endif // HAVE_NO_VSSCANF