4coder-non-source/test_data/lots_of_files/asctime.c

220 lines
5.4 KiB
C
Raw Normal View History

2023-09-30 01:17:40 +00:00
/***
*asctime.c - convert date/time structure to ASCII string
*
* Copyright (c) Microsoft Corporation. All rights reserved.
*
*Purpose:
* Contains asctime() - convert a date/time structure to ASCII string.
*
*******************************************************************************/
#include <cruntime.h>
#include <time.h>
#include <internal.h>
#include <internal_securecrt.h>
#include <mtdll.h>
#include <malloc.h>
#include <stddef.h>
#include <tchar.h>
#include <dbgint.h>
#define _ASCBUFSIZE 26
static _TSCHAR buf[_ASCBUFSIZE];
/*
** This prototype must be local to this file since the procedure is static
*/
static _TSCHAR * __cdecl store_dt(_TSCHAR *, int);
static _TSCHAR * __cdecl store_dt (
_TSCHAR *p,
int val
)
{
*p++ = (_TSCHAR)(_T('0') + val / 10);
*p++ = (_TSCHAR)(_T('0') + val % 10);
return(p);
}
/***
*errno_t asctime_s(buffer, sizeInChars, time) - convert a structure time to
*ascii string
*
*Purpose:
* Converts a time stored in a struct tm to a charcater string.
* The string is always exactly 26 characters of the form
* Tue May 01 02:34:55 1984\n\0
*
*Entry:
* struct tm *time - ptr to time structure
* _TSCHAR *buffer - ptr to output buffer
* size_t sizeInChars - size of the buffer in characters including sapce for
* NULL terminator
*
*Exit:
* errno_t = 0 success
* out buffer with time string.
* errno_t = correct error code
* out buffer NULL terminated if it is at least 1 character in size
*
*Exceptions:
*
*******************************************************************************/
errno_t __cdecl _tasctime_s (
_TSCHAR *buffer,
size_t sizeInChars,
const struct tm *tb
)
{
_TSCHAR *p = buffer;
int day, mon;
int i;
_VALIDATE_RETURN_ERRCODE(
( buffer != NULL ) && ( sizeInChars > 0 ),
EINVAL
)
_RESET_STRING(buffer, sizeInChars);
_VALIDATE_RETURN_ERRCODE(
( sizeInChars >= _ASCBUFSIZE ),
EINVAL
)
_VALIDATE_RETURN_ERRCODE(
( tb != NULL ),
EINVAL
)
_VALIDATE_RETURN_ERRCODE(
( tb->tm_year >= 0 ),
EINVAL
)
// month 0 based
_VALIDATE_RETURN_ERRCODE(
( ( tb->tm_mon >= 0 ) && ( tb->tm_mon <= 11 ) ),
EINVAL
)
// hour/min/sec 0 based
_VALIDATE_RETURN_ERRCODE(
( ( tb->tm_hour >= 0 ) && ( tb->tm_hour <= 23 ) ),
EINVAL
)
_VALIDATE_RETURN_ERRCODE(
( ( tb->tm_min >= 0 ) && ( tb->tm_min <= 59 ) ),
EINVAL
)
_VALIDATE_RETURN_ERRCODE(
( ( tb->tm_sec >= 0 ) && ( tb->tm_sec <= 59 ) ),
EINVAL
)
// day 1 based
_VALIDATE_RETURN_ERRCODE(
(
( tb->tm_mday >= 1 ) &&
(
// Day is in valid range for the month
( ( _days[ tb->tm_mon + 1 ] - _days[ tb->tm_mon ] ) >=
tb->tm_mday ) ||
// Special case for Feb in a leap year
(
( IS_LEAP_YEAR( tb->tm_year + 1900 ) ) &&
( tb->tm_mon == 1 ) &&
( tb->tm_mday <= 29 )
)
)
),
EINVAL
)
// week day 0 based
_VALIDATE_RETURN_ERRCODE(
( ( tb->tm_wday >= 0 ) && ( tb->tm_wday <= 6 ) ),
EINVAL
)
/* copy day and month names into the buffer */
day = tb->tm_wday * 3; /* index to correct day string */
mon = tb->tm_mon * 3; /* index to correct month string */
for (i=0; i < 3; i++,p++) {
*p = *(__dnames + day + i);
*(p+4) = *(__mnames + mon + i);
}
*p = _T(' '); /* blank between day and month */
p += 4;
*p++ = _T(' ');
p = store_dt(p, tb->tm_mday); /* day of the month (1-31) */
*p++ = _T(' ');
p = store_dt(p, tb->tm_hour); /* hours (0-23) */
*p++ = _T(':');
p = store_dt(p, tb->tm_min); /* minutes (0-59) */
*p++ = _T(':');
p = store_dt(p, tb->tm_sec); /* seconds (0-59) */
*p++ = _T(' ');
p = store_dt(p, 19 + (tb->tm_year/100)); /* year (after 1900) */
p = store_dt(p, tb->tm_year%100);
*p++ = _T('\n');
*p = _T('\0');
return 0;
}
/***
*char *asctime(time) - convert a structure time to ascii string
*
*Purpose:
* Converts a time stored in a struct tm to a charcater string.
* The string is always exactly 26 characters of the form
* Tue May 01 02:34:55 1984\n\0
*
*Entry:
* struct tm *time - ptr to time structure
*
*Exit:
* returns pointer to static string with time string.
*
*Exceptions:
*
*******************************************************************************/
_TSCHAR * __cdecl _tasctime (
const struct tm *tb
)
{
_TSCHAR *p = buf;
errno_t e = 0;
_TSCHAR *retval; /* holds retval pointer */
_ptiddata ptd = _getptd_noexit();
/* Use per thread buffer area (malloc space, if necessary) */
if (ptd) {
#ifdef _UNICODE
if ( (ptd->_wasctimebuf != NULL) || ((ptd->_wasctimebuf =
(wchar_t *)_calloc_crt(_ASCBUFSIZE, sizeof(wchar_t))) != NULL) )
p = ptd->_wasctimebuf;
#else /* _UNICODE */
if ( (ptd->_asctimebuf != NULL) || ((ptd->_asctimebuf =
(char *)_calloc_crt(_ASCBUFSIZE, sizeof(char))) != NULL) )
p = ptd->_asctimebuf;
#endif /* _UNICODE */
}
retval = p; /* save return value for later */
e = _tasctime_s( p, _ASCBUFSIZE, tb );
if ( e != 0 )
{
return NULL;
}
return (retval);
}