158 lines
4.4 KiB
C
158 lines
4.4 KiB
C
|
/***
|
||
|
|
*wcsftime.c - String Format Time
|
||
|
|
*
|
||
|
|
* Copyright (c) 1993-2001, Microsoft Corporation. All rights reserved.
|
||
|
|
*
|
||
|
|
*Purpose:
|
||
|
|
*
|
||
|
|
*Revision History:
|
||
|
|
* 03-08-93 CFW Module Created.
|
||
|
|
* 03-10-93 CFW Fixed up properly.
|
||
|
|
* 04-06-93 SKS Replace _CRTAPI* with __cdecl
|
||
|
|
* 02-07-94 CFW POSIXify.
|
||
|
|
* 12-16-94 CFW Format must be wchar_t!
|
||
|
|
* 01-10-95 CFW Debug CRT allocs.
|
||
|
|
* 08-27-98 GJF Revised multithread support based on threadlocinfo
|
||
|
|
* struct. Also, use _alloca rather than malloc/free,
|
||
|
|
* when possible.
|
||
|
|
* 01-06-99 GJF Changes for 64-bit size_t.
|
||
|
|
* 12-10-99 GB Added support for recovery from stack overflow around
|
||
|
|
* _alloca().
|
||
|
|
*
|
||
|
|
*******************************************************************************/
|
||
|
|
|
||
|
|
#ifndef _POSIX_
|
||
|
|
|
||
|
|
#include <cruntime.h>
|
||
|
|
#include <internal.h>
|
||
|
|
#include <mtdll.h>
|
||
|
|
#include <stdlib.h>
|
||
|
|
#include <string.h>
|
||
|
|
#include <wchar.h>
|
||
|
|
#include <time.h>
|
||
|
|
#include <dbgint.h>
|
||
|
|
#include <malloc.h>
|
||
|
|
#include <excpt.h>
|
||
|
|
|
||
|
|
#ifdef _MT
|
||
|
|
size_t __cdecl _Strftime_mt (pthreadlocinfo ptloci, char *string, size_t maxsize,
|
||
|
|
const char *format, const struct tm *timeptr, void *lc_time_arg);
|
||
|
|
#else
|
||
|
|
size_t __cdecl _Strftime (char *string, size_t maxsize, const char *format,
|
||
|
|
const struct tm *timeptr, void *lc_time_arg);
|
||
|
|
#endif
|
||
|
|
|
||
|
|
|
||
|
|
/***
|
||
|
|
*size_t wcsftime(wstring, maxsize, format, timeptr) - Format a time string
|
||
|
|
*
|
||
|
|
*Purpose:
|
||
|
|
* The wcsftime functions is equivalent to to the strftime function, except
|
||
|
|
* that the argument 'wstring' specifies an array of a wide string into
|
||
|
|
* which the generated output is to be placed. The wcsftime acts as if
|
||
|
|
* strftime were called and the result string converted by mbstowcs().
|
||
|
|
* [ISO]
|
||
|
|
*
|
||
|
|
*Entry:
|
||
|
|
* wchar_t *wstring = pointer to output string
|
||
|
|
* size_t maxsize = max length of string
|
||
|
|
* const wchar_t *format = format control string
|
||
|
|
* const struct tm *timeptr = pointer to tb data structure
|
||
|
|
*
|
||
|
|
*Exit:
|
||
|
|
* !0 = If the total number of resulting characters including the
|
||
|
|
* terminating null is not more than 'maxsize', then return the
|
||
|
|
* number of wide chars placed in the 'wstring' array (not including the
|
||
|
|
* null terminator).
|
||
|
|
*
|
||
|
|
* 0 = Otherwise, return 0 and the contents of the string are
|
||
|
|
* indeterminate.
|
||
|
|
*
|
||
|
|
*Exceptions:
|
||
|
|
*
|
||
|
|
*******************************************************************************/
|
||
|
|
|
||
|
|
size_t __cdecl wcsftime (
|
||
|
|
wchar_t *wstring,
|
||
|
|
size_t maxsize,
|
||
|
|
const wchar_t *wformat,
|
||
|
|
const struct tm *timeptr
|
||
|
|
)
|
||
|
|
{
|
||
|
|
size_t retval = 0;
|
||
|
|
char *format = NULL;
|
||
|
|
char *string = NULL;
|
||
|
|
size_t flen = wcslen(wformat) + 1;
|
||
|
|
int malloc_flag1 = 0;
|
||
|
|
int malloc_flag2 = 0;
|
||
|
|
#ifdef _MT
|
||
|
|
pthreadlocinfo ptloci = _getptd()->ptlocinfo;
|
||
|
|
|
||
|
|
if ( ptloci != __ptlocinfo )
|
||
|
|
ptloci = __updatetlocinfo();
|
||
|
|
#endif
|
||
|
|
|
||
|
|
__try {
|
||
|
|
string = (char *)_alloca(sizeof(char) * maxsize * 2);
|
||
|
|
}
|
||
|
|
__except( EXCEPTION_EXECUTE_HANDLER ) {
|
||
|
|
_resetstkoflw();
|
||
|
|
string = NULL;
|
||
|
|
}
|
||
|
|
|
||
|
|
if ( string == NULL ) {
|
||
|
|
if ((string = (char *)_malloc_crt(sizeof(char) * maxsize * 2)) == NULL)
|
||
|
|
return 0;
|
||
|
|
else
|
||
|
|
malloc_flag1++;
|
||
|
|
}
|
||
|
|
|
||
|
|
__try {
|
||
|
|
format = (char *)_alloca(sizeof(char) * flen * 2);
|
||
|
|
}
|
||
|
|
__except( EXCEPTION_EXECUTE_HANDLER ) {
|
||
|
|
_resetstkoflw();
|
||
|
|
format = NULL;
|
||
|
|
}
|
||
|
|
|
||
|
|
if ( format == NULL ) {
|
||
|
|
if ((format = (char *)_malloc_crt(sizeof(char) * flen * 2)) == NULL)
|
||
|
|
goto done;
|
||
|
|
else
|
||
|
|
malloc_flag2++;
|
||
|
|
}
|
||
|
|
|
||
|
|
#ifdef _MT
|
||
|
|
if (__wcstombs_mt(ptloci, format, wformat, flen * 2) == -1)
|
||
|
|
#else
|
||
|
|
if (wcstombs(format, wformat, flen * 2) == -1)
|
||
|
|
#endif
|
||
|
|
goto done;
|
||
|
|
|
||
|
|
#ifdef _MT
|
||
|
|
if (_Strftime_mt(ptloci, string, maxsize * 2, format, timeptr, 0))
|
||
|
|
#else
|
||
|
|
if (_Strftime(string, maxsize * 2, format, timeptr, 0))
|
||
|
|
#endif
|
||
|
|
{
|
||
|
|
#ifdef _MT
|
||
|
|
if ((retval = __mbstowcs_mt(ptloci, wstring, string, maxsize))
|
||
|
|
== -1)
|
||
|
|
#else
|
||
|
|
if ((retval = mbstowcs(wstring, string, maxsize)) == -1)
|
||
|
|
#endif
|
||
|
|
retval = 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
done:
|
||
|
|
if ( malloc_flag1 )
|
||
|
|
_free_crt(string);
|
||
|
|
|
||
|
|
if ( malloc_flag2 )
|
||
|
|
_free_crt(format);
|
||
|
|
|
||
|
|
return retval;
|
||
|
|
}
|
||
|
|
|
||
|
|
#endif /* _POSIX_ */
|