]>
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 size_t WXDLLEXPORT
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 size_t WXDLLEXPORT
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 bool WXDLLEXPORT
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
)
145 char *rv
= setlocale(category
, locale
);
146 if ( locale
!= NULL
/* setting locale, not querying */ &&
147 rv
/* call was successful */ )
149 wxUpdateLocaleIsUtf8();
154 // ============================================================================
155 // printf() functions business
156 // ============================================================================
158 // special test mode: define all functions below even if we don't really need
159 // them to be able to test them
169 #define wxNEED_WPRINTF
171 int wxCRT_VfprintfW( FILE *stream
, const wchar_t *format
, va_list argptr
);
175 /* Digital Mars adds count to _stprintf (C99) so convert */
176 int wxCRT_SprintfW (wchar_t * __RESTRICT s
, const wchar_t * __RESTRICT format
, ... )
180 va_start( arglist
, format
);
181 int iLen
= swprintf ( s
, -1, format
, arglist
);
187 // ----------------------------------------------------------------------------
188 // implement the standard IO functions for wide char if libc doesn't have them
189 // ----------------------------------------------------------------------------
192 int wxCRT_FputsW(const wchar_t *ws
, FILE *stream
)
194 wxCharBuffer
buf(wxConvLibc
.cWC2MB(ws
));
198 // counting the number of wide characters written isn't worth the trouble,
199 // simply distinguish between ok and error
200 return wxCRT_FputsA(buf
, stream
) == -1 ? -1 : 0;
202 #endif // !wxCRT_FputsW
205 int wxCRT_PutsW(const wchar_t *ws
)
207 int rc
= wxCRT_FputsW(ws
, stdout
);
210 if ( wxCRT_FputsW(L
"\n", stdout
) == -1 )
218 #endif // !wxCRT_PutsW
221 int /* not wint_t */ wxCRT_FputcW(wchar_t wc
, FILE *stream
)
223 wchar_t ws
[2] = { wc
, L
'\0' };
225 return wxCRT_FputsW(ws
, stream
);
227 #endif // !wxCRT_FputcW
229 // NB: we only implement va_list functions here, the ones taking ... are
230 // defined below for wxNEED_PRINTF_CONVERSION case anyhow and we reuse
231 // the definitions there to avoid duplicating them here
232 #ifdef wxNEED_WPRINTF
234 // TODO: implement the scanf() functions
235 static int vwscanf(const wchar_t *format
, va_list argptr
)
237 wxFAIL_MSG( _T("TODO") );
242 static int vswscanf(const wchar_t *ws
, const wchar_t *format
, va_list argptr
)
244 // The best we can do without proper Unicode support in glibc is to
245 // convert the strings into MB representation and run ANSI version
246 // of the function. This doesn't work with %c and %s because of difference
247 // in size of char and wchar_t, though.
249 wxCHECK_MSG( wxStrstr(format
, _T("%s")) == NULL
, -1,
250 _T("incomplete vswscanf implementation doesn't allow %s") );
251 wxCHECK_MSG( wxStrstr(format
, _T("%c")) == NULL
, -1,
252 _T("incomplete vswscanf implementation doesn't allow %c") );
254 return vsscanf(wxConvLibc
.cWX2MB(ws
), wxConvLibc
.cWX2MB(format
), argptr
);
257 static int vfwscanf(FILE *stream
, const wchar_t *format
, va_list argptr
)
259 wxFAIL_MSG( _T("TODO") );
264 #define vswprintf wxCRT_VsnprintfW
266 static int vfwprintf(FILE *stream
, const wchar_t *format
, va_list argptr
)
269 int rc
= s
.PrintfV(format
, argptr
);
273 // we can't do much better without Unicode support in libc...
274 if ( fprintf(stream
, "%s", (const char*)s
.mb_str() ) == -1 )
281 static int vwprintf(const wchar_t *format
, va_list argptr
)
283 return wxCRT_VfprintfW(stdout
, format
, argptr
);
286 #endif // wxNEED_WPRINTF
288 // ----------------------------------------------------------------------------
289 // wxPrintf(), wxScanf() and relatives
290 // ----------------------------------------------------------------------------
292 // FIXME-UTF8: do format conversion using (modified) wxFormatConverter in
293 // template wrappers, not here; note that it will needed to
294 // translate all forms of string specifiers to %(l)s for wxPrintf(),
295 // but it only should do what it did in 2.8 for wxScanf()!
297 #ifndef wxCRT_PrintfW
298 int wxCRT_PrintfW( const wchar_t *format
, ... )
301 va_start(argptr
, format
);
303 int ret
= vwprintf( format
, argptr
);
311 #ifndef wxCRT_FprintfW
312 int wxCRT_FprintfW( FILE *stream
, const wchar_t *format
, ... )
315 va_start( argptr
, format
);
317 int ret
= vfwprintf( stream
, format
, argptr
);
325 #ifndef wxCRT_VfprintfW
326 int wxCRT_VfprintfW( FILE *stream
, const wchar_t *format
, va_list argptr
)
328 return vfwprintf( stream
, format
, argptr
);
332 #ifndef wxCRT_VprintfW
333 int wxCRT_VprintfW( const wchar_t *format
, va_list argptr
)
335 return vwprintf( format
, argptr
);
339 #ifndef wxCRT_VsprintfW
340 int wxCRT_VsprintfW( wchar_t *str
, const wchar_t *format
, va_list argptr
)
342 // same as for wxSprintf()
343 return vswprintf(str
, INT_MAX
/ 4, format
, argptr
);
348 int wxCRT_ScanfW(const wchar_t *format
, ...)
351 va_start(argptr
, format
);
354 #if (__DECCXX_VER >= 70100000) && !defined(__STD_CFRONT) && !defined( __NONAMESPACE_STD )
355 int ret
= std::vwscanf(format
, argptr
);
357 int ret
= vwscanf(format
, argptr
);
360 int ret
= vwscanf(format
, argptr
);
369 #ifndef wxCRT_SscanfW
370 int wxCRT_SscanfW(const wchar_t *str
, const wchar_t *format
, ...)
373 va_start(argptr
, format
);
376 #if (__DECCXX_VER >= 70100000) && !defined(__STD_CFRONT) && !defined( __NONAMESPACE_STD )
377 int ret
= std::vswscanf(str
, format
, argptr
);
379 int ret
= vswscanf(str
, format
, argptr
);
382 int ret
= vswscanf(str
, format
, argptr
);
391 #ifndef wxCRT_FscanfW
392 int wxCRT_FscanfW(FILE *stream
, const wchar_t *format
, ...)
395 va_start(argptr
, format
);
397 #if (__DECCXX_VER >= 70100000) && !defined(__STD_CFRONT) && !defined( __NONAMESPACE_STD )
398 int ret
= std::vfwscanf(stream
, format
, argptr
);
400 int ret
= vfwscanf(stream
, format
, argptr
);
403 int ret
= vfwscanf(stream
, format
, argptr
);
412 #ifndef wxCRT_VsscanfW
413 int wxCRT_VsscanfW(const wchar_t *str
, const wchar_t *format
, va_list argptr
)
416 #if (__DECCXX_VER >= 70100000) && !defined(__STD_CFRONT) && !defined( __NONAMESPACE_STD )
417 return std::vswscanf(str
, format
, argptr
);
419 return vswscanf(str
, format
, argptr
);
422 return vswscanf(str
, format
, argptr
);
428 // ----------------------------------------------------------------------------
429 // wrappers to printf and scanf function families
430 // ----------------------------------------------------------------------------
432 #if !wxUSE_UTF8_LOCALE_ONLY
433 int wxDoSprintfWchar(char *str
, const wxChar
*format
, ...)
436 va_start(argptr
, format
);
438 int rv
= wxVsprintf(str
, format
, argptr
);
443 #endif // !wxUSE_UTF8_LOCALE_ONLY
445 #if wxUSE_UNICODE_UTF8
446 int wxDoSprintfUtf8(char *str
, const char *format
, ...)
449 va_start(argptr
, format
);
451 int rv
= wxVsprintf(str
, format
, argptr
);
456 #endif // wxUSE_UNICODE_UTF8
460 #if !wxUSE_UTF8_LOCALE_ONLY
461 int wxDoSprintfWchar(wchar_t *str
, const wxChar
*format
, ...)
464 va_start(argptr
, format
);
466 int rv
= wxVsprintf(str
, format
, argptr
);
471 #endif // !wxUSE_UTF8_LOCALE_ONLY
473 #if wxUSE_UNICODE_UTF8
474 int wxDoSprintfUtf8(wchar_t *str
, const char *format
, ...)
477 va_start(argptr
, format
);
479 int rv
= wxVsprintf(str
, format
, argptr
);
484 #endif // wxUSE_UNICODE_UTF8
486 #endif // wxUSE_UNICODE
488 #if !wxUSE_UTF8_LOCALE_ONLY
489 int wxDoSnprintfWchar(char *str
, size_t size
, const wxChar
*format
, ...)
492 va_start(argptr
, format
);
494 int rv
= wxVsnprintf(str
, size
, format
, argptr
);
499 #endif // !wxUSE_UTF8_LOCALE_ONLY
501 #if wxUSE_UNICODE_UTF8
502 int wxDoSnprintfUtf8(char *str
, size_t size
, const char *format
, ...)
505 va_start(argptr
, format
);
507 int rv
= wxVsnprintf(str
, size
, format
, argptr
);
512 #endif // wxUSE_UNICODE_UTF8
516 #if !wxUSE_UTF8_LOCALE_ONLY
517 int wxDoSnprintfWchar(wchar_t *str
, size_t size
, const wxChar
*format
, ...)
520 va_start(argptr
, format
);
522 int rv
= wxVsnprintf(str
, size
, format
, argptr
);
527 #endif // !wxUSE_UTF8_LOCALE_ONLY
529 #if wxUSE_UNICODE_UTF8
530 int wxDoSnprintfUtf8(wchar_t *str
, size_t size
, const char *format
, ...)
533 va_start(argptr
, format
);
535 int rv
= wxVsnprintf(str
, size
, format
, argptr
);
540 #endif // wxUSE_UNICODE_UTF8
542 #endif // wxUSE_UNICODE
545 #ifdef HAVE_BROKEN_VSNPRINTF_DECL
546 #define vsnprintf wx_fixed_vsnprintf
554 #if !wxUSE_UTF8_LOCALE_ONLY
555 int ConvertStringToBuf(const wxString
& s
, char *out
, size_t outsize
)
557 const wxWX2WCbuf buf
= s
.wc_str();
559 size_t len
= wxConvLibc
.FromWChar(out
, outsize
, buf
);
560 if ( len
!= wxCONV_FAILED
)
563 return wxConvLibc
.FromWChar(NULL
, 0, buf
);
565 #endif // !wxUSE_UTF8_LOCALE_ONLY
567 #if wxUSE_UNICODE_UTF8
568 int ConvertStringToBuf(const wxString
& s
, wchar_t *out
, size_t outsize
)
570 const wxWX2WCbuf
buf(s
.wc_str());
571 size_t len
= s
.length(); // same as buf length for wchar_t*
574 memcpy(out
, buf
, (len
+1) * sizeof(wchar_t));
576 else // not enough space
578 memcpy(out
, buf
, (outsize
-1) * sizeof(wchar_t));
583 #endif // wxUSE_UNICODE_UTF8
585 } // anonymous namespace
588 static size_t PrintfViaString(T
*out
, size_t outsize
,
589 const wxString
& format
, va_list argptr
)
592 s
.PrintfV(format
, argptr
);
594 return ConvertStringToBuf(s
, out
, outsize
);
596 #endif // wxUSE_UNICODE
598 int wxVsprintf(char *str
, const wxString
& format
, va_list argptr
)
600 #if wxUSE_UTF8_LOCALE_ONLY
601 return wxCRT_VsprintfA(str
, format
.wx_str(), argptr
);
603 #if wxUSE_UNICODE_UTF8
604 if ( wxLocaleIsUtf8
)
605 return wxCRT_VsprintfA(str
, format
.wx_str(), argptr
);
609 return PrintfViaString(str
, wxNO_LEN
, format
, argptr
);
611 return wxCRT_VsprintfA(str
, format
.mb_str(), argptr
);
617 int wxVsprintf(wchar_t *str
, const wxString
& format
, va_list argptr
)
619 #if wxUSE_UNICODE_WCHAR
620 return wxCRT_VsprintfW(str
, format
.wc_str(), argptr
);
621 #else // wxUSE_UNICODE_UTF8
622 #if !wxUSE_UTF8_LOCALE_ONLY
623 if ( !wxLocaleIsUtf8
)
624 return wxCRT_VsprintfW(str
, format
.wc_str(), argptr
);
627 return PrintfViaString(str
, wxNO_LEN
, format
, argptr
);
628 #endif // wxUSE_UNICODE_UTF8
630 #endif // wxUSE_UNICODE
632 int wxVsnprintf(char *str
, size_t size
, const wxString
& format
, va_list argptr
)
635 #if wxUSE_UTF8_LOCALE_ONLY
636 rv
= wxCRT_VsnprintfA(str
, size
, format
.wx_str(), argptr
);
638 #if wxUSE_UNICODE_UTF8
639 if ( wxLocaleIsUtf8
)
640 rv
= wxCRT_VsnprintfA(str
, size
, format
.wx_str(), argptr
);
645 // NB: if this code is called, then wxString::PrintV() would use the
646 // wchar_t* version of wxVsnprintf(), so it's safe to use PrintV()
648 rv
= PrintfViaString(str
, size
, format
, argptr
);
651 rv
= wxCRT_VsnprintfA(str
, size
, format
.mb_str(), argptr
);
655 // VsnprintfTestCase reveals that glibc's implementation of vswprintf
656 // doesn't nul terminate on truncation.
663 int wxVsnprintf(wchar_t *str
, size_t size
, const wxString
& format
, va_list argptr
)
667 #if wxUSE_UNICODE_WCHAR
668 rv
= wxCRT_VsnprintfW(str
, size
, format
.wc_str(), argptr
);
669 #else // wxUSE_UNICODE_UTF8
670 #if !wxUSE_UTF8_LOCALE_ONLY
671 if ( !wxLocaleIsUtf8
)
672 rv
= wxCRT_VsnprintfW(str
, size
, format
.wc_str(), argptr
);
676 // NB: if this code is called, then wxString::PrintV() would use the
677 // char* version of wxVsnprintf(), so it's safe to use PrintV()
679 rv
= PrintfViaString(str
, size
, format
, argptr
);
681 #endif // wxUSE_UNICODE_UTF8
683 // VsnprintfTestCase reveals that glibc's implementation of vswprintf
684 // doesn't nul terminate on truncation.
689 #endif // wxUSE_UNICODE
693 // ----------------------------------------------------------------------------
694 // ctype.h stuff (currently unused)
695 // ----------------------------------------------------------------------------
697 #ifdef wxNEED_WX_MBSTOWCS
699 WXDLLEXPORT
size_t wxMbstowcs (wchar_t * out
, const char * in
, size_t outlen
)
709 const char* origin
= in
;
711 while (outlen
-- && *in
)
713 *out
++ = (wchar_t) *in
++;
721 WXDLLEXPORT
size_t wxWcstombs (char * out
, const wchar_t * in
, size_t outlen
)
731 const wchar_t* origin
= in
;
733 while (outlen
-- && *in
)
735 *out
++ = (char) *in
++;
743 #endif // wxNEED_WX_MBSTOWCS
745 #ifndef wxCRT_StrdupA
746 WXDLLEXPORT
char *wxCRT_StrdupA(const char *s
)
748 return strcpy((char *)malloc(strlen(s
) + 1), s
);
750 #endif // wxCRT_StrdupA
752 #ifndef wxCRT_StrdupW
753 WXDLLEXPORT
wchar_t * wxCRT_StrdupW(const wchar_t *pwz
)
755 size_t size
= (wxWcslen(pwz
) + 1) * sizeof(wchar_t);
756 wchar_t *ret
= (wchar_t *) malloc(size
);
757 memcpy(ret
, pwz
, size
);
760 #endif // wxCRT_StrdupW
762 #ifndef wxCRT_StricmpA
763 int WXDLLEXPORT
wxCRT_StricmpA(const char *psz1
, const char *psz2
)
765 register char c1
, c2
;
767 c1
= wxTolower(*psz1
++);
768 c2
= wxTolower(*psz2
++);
769 } while ( c1
&& (c1
== c2
) );
772 #endif // !defined(wxCRT_StricmpA)
774 #ifndef wxCRT_StricmpW
775 int WXDLLEXPORT
wxCRT_StricmpW(const wchar_t *psz1
, const wchar_t *psz2
)
777 register wchar_t c1
, c2
;
779 c1
= wxTolower(*psz1
++);
780 c2
= wxTolower(*psz2
++);
781 } while ( c1
&& (c1
== c2
) );
784 #endif // !defined(wxCRT_StricmpW)
786 #ifndef wxCRT_StrnicmpA
787 int WXDLLEXPORT
wxCRT_StrnicmpA(const char *s1
, const char *s2
, size_t n
)
789 // initialize the variables just to suppress stupid gcc warning
790 register char c1
= 0, c2
= 0;
791 while (n
&& ((c1
= wxTolower(*s1
)) == (c2
= wxTolower(*s2
)) ) && c1
) n
--, s1
++, s2
++;
793 if (c1
< c2
) return -1;
794 if (c1
> c2
) return 1;
798 #endif // !defined(wxCRT_StrnicmpA)
800 #ifndef wxCRT_StrnicmpW
801 int WXDLLEXPORT
wxCRT_StrnicmpW(const wchar_t *s1
, const wchar_t *s2
, size_t n
)
803 // initialize the variables just to suppress stupid gcc warning
804 register wchar_t c1
= 0, c2
= 0;
805 while (n
&& ((c1
= wxTolower(*s1
)) == (c2
= wxTolower(*s2
)) ) && c1
) n
--, s1
++, s2
++;
807 if (c1
< c2
) return -1;
808 if (c1
> c2
) return 1;
812 #endif // !defined(wxCRT_StrnicmpW)
814 // ----------------------------------------------------------------------------
815 // string.h functions
816 // ----------------------------------------------------------------------------
818 // this (and wxCRT_StrncmpW below) are extern "C" because they are needed
819 // by regex code, the rest isn't needed, so it's not declared as extern "C"
820 #ifndef wxCRT_StrlenW
821 extern "C" WXDLLEXPORT
size_t wxCRT_StrlenW(const wchar_t *s
)
831 // ----------------------------------------------------------------------------
832 // stdlib.h functions
833 // ----------------------------------------------------------------------------
835 #ifndef wxCRT_GetenvW
836 wchar_t* WXDLLEXPORT
wxCRT_GetenvW(const wchar_t *name
)
838 // NB: buffer returned by getenv() is allowed to be overwritten next
839 // time getenv() is called, so it is OK to use static string
840 // buffer to hold the data.
841 static wxWCharBuffer
value((wchar_t*)NULL
);
842 value
= wxConvLibc
.cMB2WC(getenv(wxConvLibc
.cWC2MB(name
)));
845 #endif // !wxCRT_GetenvW
847 #ifndef wxCRT_StrftimeW
849 wxCRT_StrftimeW(wchar_t *s
, size_t maxsize
, const wchar_t *fmt
, const struct tm
*tm
)
854 wxCharBuffer
buf(maxsize
);
856 wxCharBuffer
bufFmt(wxConvLibc
.cWX2MB(fmt
));
860 size_t ret
= strftime(buf
.data(), maxsize
, bufFmt
, tm
);
864 wxWCharBuffer wbuf
= wxConvLibc
.cMB2WX(buf
);
868 wxCRT_StrncpyW(s
, wbuf
, maxsize
);
869 return wxCRT_StrlenW(s
);
871 #endif // !wxCRT_StrftimeW
873 #endif // wxUSE_WCHAR_T
878 wxCRT_StrtoullBase(const T
* nptr
, T
** endptr
, int base
, T
* sign
)
880 wxULongLong_t sum
= 0;
881 wxString
wxstr(nptr
);
882 wxString::const_iterator i
= wxstr
.begin();
883 wxString::const_iterator end
= wxstr
.end();
886 while ( i
!= end
&& wxIsspace(*i
) ) i
++;
893 if ( c
== wxT('+') || c
== wxT('-') )
901 if ( i
!= end
&& *i
== wxT('0') )
906 if ( *i
== wxT('x') && (base
== 16 || base
== 0) )
926 for ( ; i
!= end
; i
++ )
936 n
= wxTolower(c
) - wxT('a') + 10;
941 if ( n
>= (unsigned int)base
)
942 // Invalid character (for this base)
945 wxULongLong_t prevsum
= sum
;
946 sum
= (sum
* base
) + n
;
957 *endptr
= (T
*)(nptr
+ (i
- wxstr
.begin()));
964 static wxULongLong_t
wxCRT_DoStrtoull(const T
* nptr
, T
** endptr
, int base
)
967 wxULongLong_t uval
= wxCRT_StrtoullBase(nptr
, endptr
, base
, &sign
);
969 if ( sign
== wxT('-') )
979 static wxLongLong_t
wxCRT_DoStrtoll(const T
* nptr
, T
** endptr
, int base
)
982 wxULongLong_t uval
= wxCRT_StrtoullBase(nptr
, endptr
, base
, &sign
);
983 wxLongLong_t val
= 0;
985 if ( sign
== wxT('-') )
987 if ( uval
<= wxULL(wxINT64_MAX
+1) )
989 if ( uval
== wxULL(wxINT64_MAX
+1))
990 val
= -((wxLongLong_t
)wxINT64_MAX
) - 1;
992 val
= -((wxLongLong_t
)uval
);
999 else if ( uval
<= wxINT64_MAX
)
1005 wxSET_ERRNO(ERANGE
);
1011 #ifndef wxCRT_StrtollA
1012 wxLongLong_t
wxCRT_StrtollA(const char* nptr
, char** endptr
, int base
)
1013 { return wxCRT_DoStrtoll(nptr
, endptr
, base
); }
1015 #ifndef wxCRT_StrtollW
1016 wxLongLong_t
wxCRT_StrtollW(const wchar_t* nptr
, wchar_t** endptr
, int base
)
1017 { return wxCRT_DoStrtoll(nptr
, endptr
, base
); }
1020 #ifndef wxCRT_StrtoullA
1021 wxULongLong_t
wxCRT_StrtoullA(const char* nptr
, char** endptr
, int base
)
1022 { return wxCRT_DoStrtoull(nptr
, endptr
, base
); }
1024 #ifndef wxCRT_StrtoullW
1025 wxULongLong_t
wxCRT_StrtoullW(const wchar_t* nptr
, wchar_t** endptr
, int base
)
1026 { return wxCRT_DoStrtoull(nptr
, endptr
, base
); }
1029 #endif // wxLongLong_t
1031 // ----------------------------------------------------------------------------
1032 // functions which we may need even if !wxUSE_WCHAR_T
1033 // ----------------------------------------------------------------------------
1035 template<typename T
>
1036 static T
*wxCRT_DoStrtok(T
*psz
, const T
*delim
, T
**save_ptr
)
1045 psz
+= wxStrspn(psz
, delim
);
1048 *save_ptr
= (T
*)NULL
;
1053 psz
= wxStrpbrk(psz
, delim
);
1056 *save_ptr
= (T
*)NULL
;
1061 *save_ptr
= psz
+ 1;
1067 #ifndef wxCRT_StrtokA
1068 char *wxCRT_StrtokA(char *psz
, const char *delim
, char **save_ptr
)
1069 { return wxCRT_DoStrtok(psz
, delim
, save_ptr
); }
1071 #ifndef wxCRT_StrtokW
1072 wchar_t *wxCRT_StrtokW(wchar_t *psz
, const wchar_t *delim
, wchar_t **save_ptr
)
1073 { return wxCRT_DoStrtok(psz
, delim
, save_ptr
); }
1076 // ----------------------------------------------------------------------------
1077 // missing C RTL functions
1078 // ----------------------------------------------------------------------------
1080 #ifdef wxNEED_STRDUP
1082 char *strdup(const char *s
)
1084 char *dest
= (char*) malloc( strlen( s
) + 1 ) ;
1086 strcpy( dest
, s
) ;
1089 #endif // wxNEED_STRDUP
1091 #if defined(__WXWINCE__) && (_WIN32_WCE <= 211)
1093 void *calloc( size_t num
, size_t size
)
1095 void** ptr
= (void **)malloc(num
* size
);
1096 memset( ptr
, 0, num
* size
);
1100 #endif // __WXWINCE__ <= 211
1103 int wxCRT_RemoveW(const wchar_t *path
)
1105 return ::DeleteFile(path
) == 0;
1111 // ============================================================================
1113 // ============================================================================
1115 #if wxUSE_UNICODE_UTF8
1117 #if !wxUSE_UTF8_LOCALE_ONLY
1118 bool wxLocaleIsUtf8
= false; // the safer setting if not known
1121 static bool wxIsLocaleUtf8()
1123 // NB: we intentionally don't use wxLocale::GetSystemEncodingName(),
1124 // because a) it may be unavailable in some builds and b) has slightly
1125 // different semantics (default locale instead of current)
1127 #if defined(HAVE_LANGINFO_H) && defined(CODESET)
1128 // GNU libc provides current character set this way (this conforms to
1130 const char *charset
= nl_langinfo(CODESET
);
1133 // "UTF-8" is used by modern glibc versions, but test other variants
1134 // as well, just in case:
1135 if ( strcmp(charset
, "UTF-8") == 0 ||
1136 strcmp(charset
, "utf-8") == 0 ||
1137 strcmp(charset
, "UTF8") == 0 ||
1138 strcmp(charset
, "utf8") == 0 )
1145 // check if we're running under the "C" locale: it is 7bit subset
1146 // of UTF-8, so it can be safely used with the UTF-8 build:
1147 const char *lc_ctype
= setlocale(LC_CTYPE
, NULL
);
1149 (strcmp(lc_ctype
, "C") == 0 || strcmp(lc_ctype
, "POSIX") == 0) )
1154 // we don't know what charset libc is using, so assume the worst
1159 void wxUpdateLocaleIsUtf8()
1161 #if wxUSE_UTF8_LOCALE_ONLY
1162 if ( !wxIsLocaleUtf8() )
1164 wxLogFatalError(_T("This program requires UTF-8 locale to run."));
1166 #else // !wxUSE_UTF8_LOCALE_ONLY
1167 wxLocaleIsUtf8
= wxIsLocaleUtf8();
1171 #endif // wxUSE_UNICODE_UTF8
1173 // ============================================================================
1174 // wx wrappers for CRT functions
1175 // ============================================================================
1177 #if wxUSE_UNICODE_WCHAR
1178 #define CALL_ANSI_OR_UNICODE(return_kw, callA, callW) return_kw callW
1179 #elif wxUSE_UNICODE_UTF8 && !wxUSE_UTF8_LOCALE_ONLY
1180 #define CALL_ANSI_OR_UNICODE(return_kw, callA, callW) \
1181 return_kw wxLocaleIsUtf8 ? callA : callW
1182 #else // ANSI or UTF8 only
1183 #define CALL_ANSI_OR_UNICODE(return_kw, callA, callW) return_kw callA
1186 int wxPuts(const wxString
& s
)
1188 CALL_ANSI_OR_UNICODE(return,
1189 wxCRT_PutsA(s
.mb_str()),
1190 wxCRT_PutsW(s
.wc_str()));
1193 int wxFputs(const wxString
& s
, FILE *stream
)
1195 CALL_ANSI_OR_UNICODE(return,
1196 wxCRT_FputsA(s
.mb_str(), stream
),
1197 wxCRT_FputsW(s
.wc_str(), stream
));
1200 int wxFputc(const wxUniChar
& c
, FILE *stream
)
1202 #if !wxUSE_UNICODE // FIXME-UTF8: temporary, remove this with ANSI build
1203 return wxCRT_FputcA((char)c
, stream
);
1205 CALL_ANSI_OR_UNICODE(return,
1206 wxCRT_FputsA(c
.AsUTF8(), stream
),
1207 wxCRT_FputcW((wchar_t)c
, stream
));
1211 void wxPerror(const wxString
& s
)
1213 #ifdef wxCRT_PerrorW
1214 CALL_ANSI_OR_UNICODE(wxEMPTY_PARAMETER_VALUE
,
1215 wxCRT_PerrorA(s
.mb_str()),
1216 wxCRT_PerrorW(s
.wc_str()));
1218 wxCRT_PerrorA(s
.mb_str());
1222 wchar_t *wxFgets(wchar_t *s
, int size
, FILE *stream
)
1224 wxCHECK_MSG( s
, NULL
, "empty buffer passed to wxFgets()" );
1226 wxCharBuffer
buf(size
- 1);
1227 // FIXME: this reads too little data if wxConvLibc uses UTF-8 ('size' wide
1228 // characters may be encoded by up to 'size'*4 bytes), but what
1230 if ( wxFgets(buf
.data(), size
, stream
) == NULL
)
1233 if ( wxConvLibc
.ToWChar(s
, size
, buf
, wxNO_LEN
) == wxCONV_FAILED
)
1239 // ----------------------------------------------------------------------------
1240 // wxScanf() and friends
1241 // ----------------------------------------------------------------------------
1244 int wxVsscanf(const char *str
, const char *format
, va_list ap
)
1245 { return wxCRT_VsscanfA(str
, format
, ap
); }
1246 int wxVsscanf(const wchar_t *str
, const wchar_t *format
, va_list ap
)
1247 { return wxCRT_VsscanfW(str
, format
, ap
); }
1248 int wxVsscanf(const wxCharBuffer
& str
, const char *format
, va_list ap
)
1249 { return wxCRT_VsscanfA(str
, format
, ap
); }
1250 int wxVsscanf(const wxWCharBuffer
& str
, const wchar_t *format
, va_list ap
)
1251 { return wxCRT_VsscanfW(str
, format
, ap
); }
1252 int wxVsscanf(const wxString
& str
, const char *format
, va_list ap
)
1253 { return wxCRT_VsscanfA(str
.mb_str(), format
, ap
); }
1254 int wxVsscanf(const wxString
& str
, const wchar_t *format
, va_list ap
)
1255 { return wxCRT_VsscanfW(str
.wc_str(), format
, ap
); }
1256 int wxVsscanf(const wxCStrData
& str
, const char *format
, va_list ap
)
1257 { return wxCRT_VsscanfA(str
.AsCharBuf(), format
, ap
); }
1258 int wxVsscanf(const wxCStrData
& str
, const wchar_t *format
, va_list ap
)
1259 { return wxCRT_VsscanfW(str
.AsWCharBuf(), format
, ap
); }
1260 #endif // !__VISUALC__