284 lines
7.9 KiB
C
284 lines
7.9 KiB
C
/*
|
|
******************************************************************************
|
|
*
|
|
* Copyright (C) 2001-2003, International Business Machines
|
|
* Corporation and others. All Rights Reserved.
|
|
*
|
|
******************************************************************************
|
|
*
|
|
* File sprintf.c
|
|
*
|
|
* Modification History:
|
|
*
|
|
* Date Name Description
|
|
* 02/08/2001 george Creation. Copied from uprintf.c
|
|
* 03/27/2002 Mark Schneckloth Many fixes regarding alignment, null termination
|
|
* (mschneckloth@atomz.com) and other various problems.
|
|
* 08/07/2003 george Reunify printf implementations
|
|
*******************************************************************************
|
|
*/
|
|
|
|
#include "unicode/utypes.h"
|
|
|
|
#if !UCONFIG_NO_FORMATTING
|
|
|
|
#include "unicode/ustdio.h"
|
|
#include "unicode/ustring.h"
|
|
|
|
#include "uprintf.h"
|
|
#include "locbund.h"
|
|
|
|
#include "cmemory.h"
|
|
#include <ctype.h>
|
|
|
|
typedef struct u_localized_print_string {
|
|
UChar *str; /* Place to write the string */
|
|
int32_t available;/* Number of codeunits available to write to */
|
|
int32_t len; /* Maximum number of code units that can be written to output */
|
|
|
|
ULocaleBundle fBundle; /* formatters */
|
|
} u_localized_print_string;
|
|
|
|
/* u_minstrncpy copies the minimum number of code units of (count or output->available) */
|
|
static int32_t
|
|
u_sprintf_write(void *context,
|
|
const UChar *str,
|
|
int32_t count)
|
|
{
|
|
u_localized_print_string *output = (u_localized_print_string *)context;
|
|
int32_t size = ufmt_min(count, output->available);
|
|
|
|
u_strncpy(output->str + (output->len - output->available), str, size);
|
|
output->available -= size;
|
|
return size;
|
|
}
|
|
|
|
static int32_t
|
|
u_sprintf_pad_and_justify(void *context,
|
|
const u_printf_spec_info *info,
|
|
const UChar *result,
|
|
int32_t resultLen)
|
|
{
|
|
u_localized_print_string *output = (u_localized_print_string *)context;
|
|
int32_t written = 0;
|
|
|
|
resultLen = ufmt_min(resultLen, output->available);
|
|
|
|
/* pad and justify, if needed */
|
|
if(info->fWidth != -1 && resultLen < info->fWidth) {
|
|
int32_t paddingLeft = info->fWidth - resultLen;
|
|
int32_t outputPos = output->len - output->available;
|
|
|
|
if (paddingLeft + resultLen > output->available) {
|
|
paddingLeft = output->available - resultLen;
|
|
if (paddingLeft < 0) {
|
|
paddingLeft = 0;
|
|
}
|
|
/* paddingLeft = output->available - resultLen;*/
|
|
}
|
|
written += paddingLeft;
|
|
|
|
/* left justify */
|
|
if(info->fLeft) {
|
|
written += u_sprintf_write(output, result, resultLen);
|
|
u_memset(&output->str[outputPos + resultLen], info->fPadChar, paddingLeft);
|
|
output->available -= paddingLeft;
|
|
}
|
|
/* right justify */
|
|
else {
|
|
u_memset(&output->str[outputPos], info->fPadChar, paddingLeft);
|
|
output->available -= paddingLeft;
|
|
written += u_sprintf_write(output, result, resultLen);
|
|
}
|
|
}
|
|
/* just write the formatted output */
|
|
else {
|
|
written = u_sprintf_write(output, result, resultLen);
|
|
}
|
|
|
|
return written;
|
|
}
|
|
|
|
U_CAPI int32_t U_EXPORT2
|
|
u_sprintf(UChar *buffer,
|
|
const char *patternSpecification,
|
|
... )
|
|
{
|
|
va_list ap;
|
|
int32_t written;
|
|
|
|
va_start(ap, patternSpecification);
|
|
written = u_vsnprintf(buffer, INT32_MAX, patternSpecification, ap);
|
|
va_end(ap);
|
|
|
|
return written;
|
|
}
|
|
|
|
U_CAPI int32_t U_EXPORT2
|
|
u_sprintf_u(UChar *buffer,
|
|
const UChar *patternSpecification,
|
|
... )
|
|
{
|
|
va_list ap;
|
|
int32_t written;
|
|
|
|
va_start(ap, patternSpecification);
|
|
written = u_vsnprintf_u(buffer, INT32_MAX, patternSpecification, ap);
|
|
va_end(ap);
|
|
|
|
return written;
|
|
}
|
|
|
|
U_CAPI int32_t U_EXPORT2 /* U_CAPI ... U_EXPORT2 added by Peter Kirk 17 Nov 2001 */
|
|
u_vsprintf(UChar *buffer,
|
|
const char *patternSpecification,
|
|
va_list ap)
|
|
{
|
|
return u_vsnprintf(buffer, INT32_MAX, patternSpecification, ap);
|
|
}
|
|
|
|
U_CAPI int32_t U_EXPORT2
|
|
u_snprintf(UChar *buffer,
|
|
int32_t count,
|
|
const char *patternSpecification,
|
|
... )
|
|
{
|
|
va_list ap;
|
|
int32_t written;
|
|
|
|
va_start(ap, patternSpecification);
|
|
written = u_vsnprintf(buffer, count, patternSpecification, ap);
|
|
va_end(ap);
|
|
|
|
return written;
|
|
}
|
|
|
|
U_CAPI int32_t U_EXPORT2
|
|
u_snprintf_u(UChar *buffer,
|
|
int32_t count,
|
|
const UChar *patternSpecification,
|
|
... )
|
|
{
|
|
va_list ap;
|
|
int32_t written;
|
|
|
|
va_start(ap, patternSpecification);
|
|
written = u_vsnprintf_u(buffer, count, patternSpecification, ap);
|
|
va_end(ap);
|
|
|
|
return written;
|
|
}
|
|
|
|
U_CAPI int32_t U_EXPORT2 /* U_CAPI ... U_EXPORT2 added by Peter Kirk 17 Nov 2001 */
|
|
u_vsnprintf(UChar *buffer,
|
|
int32_t count,
|
|
const char *patternSpecification,
|
|
va_list ap)
|
|
{
|
|
int32_t written;
|
|
UChar *pattern;
|
|
UChar patBuffer[UFMT_DEFAULT_BUFFER_SIZE];
|
|
int32_t size = (int32_t)strlen(patternSpecification) + 1;
|
|
|
|
/* convert from the default codepage to Unicode */
|
|
if (size >= MAX_UCHAR_BUFFER_SIZE(patBuffer)) {
|
|
pattern = (UChar *)uprv_malloc(size * sizeof(UChar));
|
|
if(pattern == 0) {
|
|
return 0;
|
|
}
|
|
}
|
|
else {
|
|
pattern = patBuffer;
|
|
}
|
|
u_charsToUChars(patternSpecification, pattern, size);
|
|
|
|
/* do the work */
|
|
written = u_vsnprintf_u(buffer, count, pattern, ap);
|
|
|
|
/* clean up */
|
|
if (pattern != patBuffer) {
|
|
uprv_free(pattern);
|
|
}
|
|
|
|
return written;
|
|
}
|
|
|
|
U_CAPI int32_t U_EXPORT2
|
|
u_vsprintf_u(UChar *buffer,
|
|
const UChar *patternSpecification,
|
|
va_list ap)
|
|
{
|
|
return u_vsnprintf_u(buffer, INT32_MAX, patternSpecification, ap);
|
|
}
|
|
|
|
static const u_printf_stream_handler g_sprintf_stream_handler = {
|
|
u_sprintf_write,
|
|
u_sprintf_pad_and_justify
|
|
};
|
|
|
|
U_CAPI int32_t U_EXPORT2 /* U_CAPI ... U_EXPORT2 added by Peter Kirk 17 Nov 2001 */
|
|
u_vsnprintf_u(UChar *buffer,
|
|
int32_t count,
|
|
const UChar *patternSpecification,
|
|
va_list ap)
|
|
{
|
|
const UChar *alias = patternSpecification; /* alias the pattern */
|
|
const UChar *lastAlias;
|
|
int32_t patCount;
|
|
int32_t written = 0; /* haven't written anything yet */
|
|
|
|
u_localized_print_string outStr;
|
|
|
|
if (count < 0) {
|
|
count = INT32_MAX;
|
|
}
|
|
|
|
outStr.str = buffer;
|
|
outStr.len = count;
|
|
outStr.available = count;
|
|
|
|
if(u_locbund_init(&outStr.fBundle, "en_US_POSIX") == 0) {
|
|
return 0;
|
|
}
|
|
|
|
/* iterate through the pattern */
|
|
while(outStr.available > 0) {
|
|
|
|
/* find the next '%' */
|
|
lastAlias = alias;
|
|
while(*alias != UP_PERCENT && *alias != 0x0000) {
|
|
alias++;
|
|
}
|
|
|
|
/* write any characters before the '%' */
|
|
if(alias > lastAlias) {
|
|
written += (*g_sprintf_stream_handler.write)(&outStr, lastAlias, (int32_t)(alias - lastAlias));
|
|
}
|
|
|
|
/* break if at end of string */
|
|
if(*alias == 0x0000) {
|
|
break;
|
|
}
|
|
|
|
/* parse and print the specifier */
|
|
patCount = u_printf_print_spec(&g_sprintf_stream_handler, alias, &outStr, &outStr.fBundle, (int32_t)(alias - lastAlias), &written, (va_list*)&ap);
|
|
|
|
/* update the pointer in pattern and continue */
|
|
alias += patCount;
|
|
}
|
|
|
|
/* Terminate the buffer, if there's room. */
|
|
if (outStr.available > 0) {
|
|
buffer[outStr.len - outStr.available] = 0x0000;
|
|
}
|
|
|
|
/* Release the cloned bundle, if we cloned it. */
|
|
u_locbund_close(&outStr.fBundle);
|
|
|
|
/* return # of UChars written */
|
|
return written;
|
|
}
|
|
|
|
#endif /* #if !UCONFIG_NO_FORMATTING */
|
|
|