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

454 lines
12 KiB
C
Raw Normal View History

2023-09-30 01:17:40 +00:00
/***
*xtoa.c - convert integers/longs to ASCII string
*
* Copyright (c) Microsoft Corporation. All rights reserved.
*
*Purpose:
* The module has code to convert integers/longs to ASCII strings. See
*
*******************************************************************************/
#include <cruntime.h>
#include <stdlib.h>
#include <limits.h>
#include <tchar.h>
#include <internal.h>
#include <internal_securecrt.h>
#ifdef _UNICODE
#define xtox_s xtow_s
#define _itox_s _itow_s
#define _ltox_s _ltow_s
#define _ultox_s _ultow_s
#define x64tox_s x64tow_s
#define _i64tox_s _i64tow_s
#define _ui64tox_s _ui64tow_s
#define xtox xtow
#define _itox _itow
#define _ltox _ltow
#define _ultox _ultow
#define x64tox x64tow
#define _i64tox _i64tow
#define _ui64tox _ui64tow
#else /* _UNICODE */
#define xtox_s xtoa_s
#define _itox_s _itoa_s
#define _ltox_s _ltoa_s
#define _ultox_s _ultoa_s
#define x64tox_s x64toa_s
#define _i64tox_s _i64toa_s
#define _ui64tox_s _ui64toa_s
#define xtox xtoa
#define _itox _itoa
#define _ltox _ltoa
#define _ultox _ultoa
#define x64tox x64toa
#define _i64tox _i64toa
#define _ui64tox _ui64toa
#endif /* _UNICODE */
/***
*char *_itoa_s, *_ltoa_s, *_ultoa_s(val, buf, sizeInTChars, radix) - convert binary int to ASCII
* string
*
*Purpose:
* Converts an int to a character string.
*
*Entry:
* val - number to be converted (int, long or unsigned long)
* char *buf - ptr to buffer to place result
* size_t sizeInTChars - size of the destination buffer
* int radix - base to convert into
*
*Exit:
* Fills in space pointed to by buf with string result.
* Returns the errno_t: err != 0 means that something went wrong, and
* an empty string (buf[0] = 0) is returned.
*
*Exceptions:
* Input parameters and buffer length are validated.
* Refer to the validation section of the function.
*
*******************************************************************************/
/* helper routine that does the main job. */
#ifdef _SECURE_ITOA
static errno_t __stdcall xtox_s
(
unsigned long val,
TCHAR *buf,
size_t sizeInTChars,
unsigned radix,
int is_neg
)
#else /* _SECURE_ITOA */
static void __stdcall xtox
(
unsigned long val,
TCHAR *buf,
unsigned radix,
int is_neg
)
#endif /* _SECURE_ITOA */
{
TCHAR *p; /* pointer to traverse string */
TCHAR *firstdig; /* pointer to first digit */
TCHAR temp; /* temp char */
unsigned digval; /* value of digit */
#ifdef _SECURE_ITOA
size_t length; /* current length of the string */
/* validation section */
_VALIDATE_RETURN_ERRCODE(buf != NULL, EINVAL);
_VALIDATE_RETURN_ERRCODE(sizeInTChars > 0, EINVAL);
_RESET_STRING(buf, sizeInTChars);
_VALIDATE_RETURN_ERRCODE(sizeInTChars > (size_t)(is_neg ? 2 : 1), ERANGE);
_VALIDATE_RETURN_ERRCODE(2 <= radix && radix <= 36, EINVAL);
length = 0;
#endif /* _SECURE_ITOA */
p = buf;
if (is_neg) {
/* negative, so output '-' and negate */
*p++ = _T('-');
#ifdef _SECURE_ITOA
length++;
#endif /* _SECURE_ITOA */
val = (unsigned long)(-(long)val);
}
firstdig = p; /* save pointer to first digit */
do {
digval = (unsigned) (val % radix);
val /= radix; /* get next digit */
/* convert to ascii and store */
if (digval > 9)
*p++ = (TCHAR) (digval - 10 + _T('a')); /* a letter */
else
*p++ = (TCHAR) (digval + _T('0')); /* a digit */
#ifndef _SECURE_ITOA
} while (val > 0);
#else /* _SECURE_ITOA */
length++;
} while (val > 0 && length < sizeInTChars);
/* Check for buffer overrun */
if (length >= sizeInTChars)
{
buf[0] = '\0';
_VALIDATE_RETURN_ERRCODE(length < sizeInTChars, ERANGE);
}
#endif /* _SECURE_ITOA */
/* We now have the digit of the number in the buffer, but in reverse
order. Thus we reverse them now. */
*p-- = _T('\0'); /* terminate string; p points to last digit */
do {
temp = *p;
*p = *firstdig;
*firstdig = temp; /* swap *p and *firstdig */
--p;
++firstdig; /* advance to next two digits */
} while (firstdig < p); /* repeat until halfway */
#ifdef _SECURE_ITOA
return 0;
#endif /* _SECURE_ITOA */
}
/* Actual functions just call conversion helper with neg flag set correctly,
and return pointer to buffer. */
#ifdef _SECURE_ITOA
errno_t __cdecl _itox_s (
int val,
TCHAR *buf,
size_t sizeInTChars,
int radix
)
{
errno_t e = 0;
if (radix == 10 && val < 0)
e = xtox_s((unsigned long)val, buf, sizeInTChars, radix, 1);
else
e = xtox_s((unsigned long)(unsigned int)val, buf, sizeInTChars, radix, 0);
return e;
}
errno_t __cdecl _ltox_s (
long val,
TCHAR *buf,
size_t sizeInTChars,
int radix
)
{
return xtox_s((unsigned long)val, buf, sizeInTChars, radix, (radix == 10 && val < 0));
}
errno_t __cdecl _ultox_s (
unsigned long val,
TCHAR *buf,
size_t sizeInTChars,
int radix
)
{
return xtox_s(val, buf, sizeInTChars, radix, 0);
}
#else /* _SECURE_ITOA */
/***
*char *_itoa, *_ltoa, *_ultoa(val, buf, radix) - convert binary int to ASCII
* string
*
*Purpose:
* Converts an int to a character string.
*
*Entry:
* val - number to be converted (int, long or unsigned long)
* int radix - base to convert into
* char *buf - ptr to buffer to place result
*
*Exit:
* fills in space pointed to by buf with string result
* returns a pointer to this buffer
*
*Exceptions:
* Input parameters are validated. The buffer is assumed to be big enough to
* contain the string. Refer to the validation section of the function.
*
*******************************************************************************/
/* Actual functions just call conversion helper with neg flag set correctly,
and return pointer to buffer. */
TCHAR * __cdecl _itox (
int val,
TCHAR *buf,
int radix
)
{
if (radix == 10 && val < 0)
xtox((unsigned long)val, buf, radix, 1);
else
xtox((unsigned long)(unsigned int)val, buf, radix, 0);
return buf;
}
TCHAR * __cdecl _ltox (
long val,
TCHAR *buf,
int radix
)
{
xtox((unsigned long)val, buf, radix, (radix == 10 && val < 0));
return buf;
}
TCHAR * __cdecl _ultox (
unsigned long val,
TCHAR *buf,
int radix
)
{
xtox(val, buf, radix, 0);
return buf;
}
#endif /* _SECURE_ITOA */
#ifndef _NO_INT64
/***
*char *_i64toa_s(val, buf, sizeInTChars, radix) - convert binary int to ASCII
* string
*
*Purpose:
* Converts an int64 to a character string.
*
*Entry:
* val - number to be converted
* char *buf - ptr to buffer to place result
* size_t sizeInTChars - size of the destination buffer
* int radix - base to convert into
*
*Exit:
* Fills in space pointed to by buf with string result.
* Returns the errno_t: err != 0 means that something went wrong, and
* an empty string (buf[0] = 0) is returned.
*
*Exceptions:
* Input parameters and buffer length are validated.
* Refer to the validation section of the function.
*
*******************************************************************************/
#ifdef _SECURE_ITOA
static errno_t __fastcall x64tox_s
(/* stdcall is faster and smaller... Might as well use it for the helper. */
unsigned __int64 val,
TCHAR *buf,
size_t sizeInTChars,
unsigned radix,
int is_neg
)
#else /* _SECURE_ITOA */
static void __fastcall x64tox
(/* stdcall is faster and smaller... Might as well use it for the helper. */
unsigned __int64 val,
TCHAR *buf,
unsigned radix,
int is_neg
)
#endif /* _SECURE_ITOA */
{
TCHAR *p; /* pointer to traverse string */
TCHAR *firstdig; /* pointer to first digit */
TCHAR temp; /* temp char */
unsigned digval; /* value of digit */
#ifdef _SECURE_ITOA
size_t length; /* current length of the string */
/* validation section */
_VALIDATE_RETURN_ERRCODE(buf != NULL, EINVAL);
_VALIDATE_RETURN_ERRCODE(sizeInTChars > 0, EINVAL);
_RESET_STRING(buf, sizeInTChars);
_VALIDATE_RETURN_ERRCODE(sizeInTChars > (size_t)(is_neg ? 2 : 1), ERANGE);
_VALIDATE_RETURN_ERRCODE(2 <= radix && radix <= 36, EINVAL);
length = 0;
#endif /* _SECURE_ITOA */
p = buf;
if ( is_neg )
{
*p++ = _T('-'); /* negative, so output '-' and negate */
#ifdef _SECURE_ITOA
length++;
#endif /* _SECURE_ITOA */
val = (unsigned __int64)(-(__int64)val);
}
firstdig = p; /* save pointer to first digit */
do {
digval = (unsigned) (val % radix);
val /= radix; /* get next digit */
/* convert to ascii and store */
if (digval > 9)
*p++ = (TCHAR) (digval - 10 + _T('a')); /* a letter */
else
*p++ = (TCHAR) (digval + _T('0')); /* a digit */
#ifndef _SECURE_ITOA
} while (val > 0);
#else /* _SECURE_ITOA */
length++;
} while (val > 0 && length < sizeInTChars);
/* Check for buffer overrun */
if (length >= sizeInTChars)
{
buf[0] = '\0';
_VALIDATE_RETURN_ERRCODE(length < sizeInTChars, ERANGE);
}
#endif /* _SECURE_ITOA */
/* We now have the digit of the number in the buffer, but in reverse
order. Thus we reverse them now. */
*p-- = _T('\0'); /* terminate string; p points to last digit */
do {
temp = *p;
*p = *firstdig;
*firstdig = temp; /* swap *p and *firstdig */
--p;
++firstdig; /* advance to next two digits */
} while (firstdig < p); /* repeat until halfway */
#ifdef _SECURE_ITOA
return 0;
#endif /* _SECURE_ITOA */
}
#ifdef _SECURE_ITOA
/* Actual functions just call conversion helper with neg flag set correctly,
and return pointer to buffer. */
errno_t __cdecl _i64tox_s (
__int64 val,
TCHAR *buf,
size_t sizeInTChars,
int radix
)
{
return x64tox_s((unsigned __int64)val, buf, sizeInTChars, radix, (radix == 10 && val < 0));
}
errno_t __cdecl _ui64tox_s (
unsigned __int64 val,
TCHAR *buf,
size_t sizeInTChars,
int radix
)
{
return x64tox_s(val, buf, sizeInTChars, radix, 0);
}
#else /* _SECURE_ITOA */
/***
*char *_i64toa(val, buf, radix) - convert binary int to ASCII
* string
*
*Purpose:
* Converts an int64 to a character string.
*
*Entry:
* val - number to be converted
* int radix - base to convert into
* char *buf - ptr to buffer to place result
*
*Exit:
* fills in space pointed to by buf with string result
* returns a pointer to this buffer
*
*Exceptions:
* Input parameters are validated. The buffer is assumed to be big enough to
* contain the string. Refer to the validation section of the function.
*
*******************************************************************************/
/* Actual functions just call conversion helper with neg flag set correctly,
and return pointer to buffer. */
TCHAR * __cdecl _i64tox (
__int64 val,
TCHAR *buf,
int radix
)
{
x64tox((unsigned __int64)val, buf, radix, (radix == 10 && val < 0));
return buf;
}
TCHAR * __cdecl _ui64tox (
unsigned __int64 val,
TCHAR *buf,
int radix
)
{
x64tox(val, buf, radix, 0);
return buf;
}
#endif /* _SECURE_ITOA */
#endif /* _NO_INT64 */