aboutsummaryrefslogtreecommitdiff
path: root/stdio-common
diff options
context:
space:
mode:
Diffstat (limited to 'stdio-common')
-rw-r--r--stdio-common/printf.h5
-rw-r--r--stdio-common/printf_fp.c56
-rw-r--r--stdio-common/vfprintf.c105
3 files changed, 119 insertions, 47 deletions
diff --git a/stdio-common/printf.h b/stdio-common/printf.h
index dfd96be..c84978c 100644
--- a/stdio-common/printf.h
+++ b/stdio-common/printf.h
@@ -34,11 +34,7 @@ struct printf_info
{
int prec; /* Precision. */
int width; /* Width. */
-#ifdef THIS_IS_INCOMPATIBLE_WITH_LINUX_LIBC
wchar_t spec; /* Format letter. */
-#else
- char spec; /* Format letter. */
-#endif
unsigned int is_long_double:1;/* L flag. */
unsigned int is_short:1; /* h flag. */
unsigned int is_long:1; /* l flag. */
@@ -47,6 +43,7 @@ struct printf_info
unsigned int left:1; /* - flag. */
unsigned int showsign:1; /* + flag. */
unsigned int group:1; /* ' flag. */
+ unsigned int extra:1; /* For special use. */
char pad; /* Padding character. */
};
diff --git a/stdio-common/printf_fp.c b/stdio-common/printf_fp.c
index 9e14b67..9112d46 100644
--- a/stdio-common/printf_fp.c
+++ b/stdio-common/printf_fp.c
@@ -121,10 +121,10 @@ extern mp_size_t __mpn_extract_double (mp_ptr res_ptr, mp_size_t size,
extern mp_size_t __mpn_extract_long_double (mp_ptr res_ptr, mp_size_t size,
int *expt, int *is_neg,
long double value);
+extern unsigned int __guess_grouping (unsigned int intdig_max,
+ const char *grouping, wchar_t sepchar);
-static unsigned int guess_grouping (unsigned int intdig_max,
- const char *grouping, wchar_t sepchar);
static char *group_number (char *buf, char *bufend, unsigned int intdig_no,
const char *grouping, wchar_t thousands_sep);
@@ -229,22 +229,51 @@ __printf_fp (FILE *fp,
/* Figure out the decimal point character. */
- if (mbtowc (&decimal, _NL_CURRENT (LC_NUMERIC, DECIMAL_POINT),
- strlen (_NL_CURRENT (LC_NUMERIC, DECIMAL_POINT))) <= 0)
- decimal = (wchar_t) *_NL_CURRENT (LC_NUMERIC, DECIMAL_POINT);
+ if (info->extra == 0)
+ {
+ if (mbtowc (&decimal, _NL_CURRENT (LC_NUMERIC, DECIMAL_POINT),
+ strlen (_NL_CURRENT (LC_NUMERIC, DECIMAL_POINT))) <= 0)
+ decimal = (wchar_t) *_NL_CURRENT (LC_NUMERIC, DECIMAL_POINT);
+ }
+ else
+ {
+ if (mbtowc (&decimal, _NL_CURRENT (LC_MONETARY, MON_DECIMAL_POINT),
+ strlen (_NL_CURRENT (LC_MONETARY, MON_DECIMAL_POINT))) <= 0)
+ decimal = (wchar_t) *_NL_CURRENT (LC_MONETARY, MON_DECIMAL_POINT);
+ }
if (info->group)
{
- grouping = _NL_CURRENT (LC_NUMERIC, GROUPING);
+ if (info->extra == 0)
+ grouping = _NL_CURRENT (LC_NUMERIC, GROUPING);
+ else
+ grouping = _NL_CURRENT (LC_MONETARY, MON_GROUPING);
+
if (*grouping <= 0 || *grouping == CHAR_MAX)
grouping = NULL;
else
{
/* Figure out the thousands seperator character. */
- if (mbtowc (&thousands_sep, _NL_CURRENT (LC_NUMERIC, THOUSANDS_SEP),
- strlen (_NL_CURRENT (LC_NUMERIC, THOUSANDS_SEP))) <= 0)
- thousands_sep = (wchar_t) *_NL_CURRENT (LC_NUMERIC, THOUSANDS_SEP);
+ if (info->extra == 0)
+ {
+ if (mbtowc (&thousands_sep, _NL_CURRENT (LC_NUMERIC,
+ THOUSANDS_SEP),
+ strlen (_NL_CURRENT (LC_NUMERIC, THOUSANDS_SEP)))
+ <= 0)
+ thousands_sep = (wchar_t) *_NL_CURRENT (LC_NUMERIC,
+ THOUSANDS_SEP);
+ }
+ else
+ {
+ if (mbtowc (&thousands_sep, _NL_CURRENT (LC_MONETARY,
+ MON_THOUSANDS_SEP),
+ strlen (_NL_CURRENT (LC_MONETARY,
+ MON_THOUSANDS_SEP))) <= 0)
+ thousands_sep = (wchar_t) *_NL_CURRENT (LC_MONETARY,
+ MON_THOUSANDS_SEP);
+ }
+
if (thousands_sep == L'\0')
grouping = NULL;
}
@@ -726,7 +755,7 @@ __printf_fp (FILE *fp,
if (grouping)
/* Guess the number of groups we will make, and thus how
many spaces we need for separator characters. */
- chars_needed += guess_grouping (intdig_max, grouping, thousands_sep);
+ chars_needed += __guess_grouping (intdig_max, grouping, thousands_sep);
/* Allocate buffer for output. We need two more because while rounding
it is possible that we need two more characters in front of all the
@@ -933,8 +962,9 @@ __printf_fp (FILE *fp,
/* Return the number of extra grouping characters that will be inserted
into a number with INTDIG_MAX integer digits. */
-static unsigned int
-guess_grouping (unsigned int intdig_max, const char *grouping, wchar_t sepchar)
+unsigned int
+__guess_grouping (unsigned int intdig_max, const char *grouping,
+ wchar_t sepchar)
{
unsigned int groups;
@@ -972,7 +1002,7 @@ static char *
group_number (char *buf, char *bufend, unsigned int intdig_no,
const char *grouping, wchar_t thousands_sep)
{
- unsigned int groups = guess_grouping (intdig_no, grouping, thousands_sep);
+ unsigned int groups = __guess_grouping (intdig_no, grouping, thousands_sep);
char *p;
if (groups == 0)
diff --git a/stdio-common/vfprintf.c b/stdio-common/vfprintf.c
index 1643f37..b27bc49 100644
--- a/stdio-common/vfprintf.c
+++ b/stdio-common/vfprintf.c
@@ -414,7 +414,10 @@ vfprintf (FILE *s, const CHAR_T *format, va_list ap)
{ \
long long int signed_number; \
\
- signed_number = va_arg (ap, long long int); \
+ if (fspec == NULL) \
+ signed_number = va_arg (ap, long long int); \
+ else \
+ signed_number = args_value[fspec->data_arg].pa_long_long_int; \
\
is_negative = signed_number < 0; \
number.longlong = is_negative ? (- signed_number) : signed_number; \
@@ -425,10 +428,16 @@ vfprintf (FILE *s, const CHAR_T *format, va_list ap)
{ \
long int signed_number; \
\
- if (is_long) \
- signed_number = va_arg (ap, long int); \
- else /* `short int' will be promoted to `int'. */ \
- signed_number = va_arg (ap, int); \
+ if (fspec == NULL) \
+ if (is_long) \
+ signed_number = va_arg (ap, long int); \
+ else /* `short int' will be promoted to `int'. */ \
+ signed_number = va_arg (ap, int); \
+ else \
+ if (is_long) \
+ signed_number = args_value[fspec->data_arg].pa_long_int; \
+ else \
+ signed_number = args_value[fspec->data_arg].pa_int; \
\
is_negative = signed_number < 0; \
number.word = is_negative ? (- signed_number) : signed_number; \
@@ -463,7 +472,10 @@ vfprintf (FILE *s, const CHAR_T *format, va_list ap)
\
if (is_longlong) \
{ \
- number.longlong = va_arg (ap, unsigned long long int); \
+ if (fspec == NULL) \
+ number.longlong = va_arg (ap, unsigned long long int); \
+ else \
+ number.longlong = args_value[fspec->data_arg].pa_u_long_long_int; \
\
LABEL (longlong_number): \
if (prec < 0) \
@@ -493,12 +505,21 @@ vfprintf (FILE *s, const CHAR_T *format, va_list ap)
} \
else \
{ \
- if (is_long) \
- number.word = va_arg (ap, unsigned long int); \
- else if (!is_short) \
- number.word = va_arg (ap, unsigned int); \
+ if (fspec == NULL) \
+ if (is_long) \
+ number.word = va_arg (ap, unsigned long int); \
+ else if (!is_short) \
+ number.word = va_arg (ap, unsigned int); \
+ else \
+ number.word = (unsigned short int) va_arg (ap, unsigned int); \
else \
- number.word = (unsigned short int) va_arg (ap, unsigned int); \
+ if (is_long) \
+ number.word = args_value[fspec->data_arg].pa_u_long_int; \
+ else if (!is_short) \
+ number.word = args_value[fspec->data_arg].pa_u_int; \
+ else \
+ number.word = (unsigned short int) \
+ args_value[fspec->data_arg].pa_u_short_int; \
\
LABEL (number): \
if (prec < 0) \
@@ -617,13 +638,6 @@ vfprintf (FILE *s, const CHAR_T *format, va_list ap)
const void *ptr; \
int function_done; \
\
- if (is_long_double) \
- the_arg.pa_long_double = va_arg (ap, long double); \
- else \
- the_arg.pa_double = va_arg (ap, double); \
- \
- ptr = (const void *) &the_arg; \
- \
if (fspec == NULL) \
{ \
struct printf_info info = { prec: prec, \
@@ -637,12 +651,23 @@ vfprintf (FILE *s, const CHAR_T *format, va_list ap)
left: left, \
showsign: showsign, \
group: group, \
- pad: pad }; \
+ pad: pad, \
+ extra: 0 }; \
+ \
+ if (is_long_double) \
+ the_arg.pa_long_double = va_arg (ap, long double); \
+ else \
+ the_arg.pa_double = va_arg (ap, double); \
+ ptr = (const void *) &the_arg; \
\
function_done = __printf_fp (s, &info, &ptr); \
} \
else \
- function_done = __printf_fp (s, &fspec->info, &ptr); \
+ { \
+ ptr = (const void *) &args_value[fspec->data_arg]; \
+ \
+ function_done = __printf_fp (s, &fspec->info, &ptr); \
+ } \
\
if (function_done < 0) \
/* Error in print handler. */ \
@@ -657,7 +682,10 @@ vfprintf (FILE *s, const CHAR_T *format, va_list ap)
--width; /* Account for the character itself. */ \
if (!left) \
PAD (' '); \
- outchar ((unsigned char) va_arg (ap, int)); /* Promoted. */ \
+ if (fspec == NULL) \
+ outchar ((unsigned char) va_arg (ap, int)); /* Promoted. */ \
+ else \
+ outchar ((unsigned char) args_value[fspec->data_arg].pa_char); \
if (left) \
PAD (' '); \
break; \
@@ -668,7 +696,10 @@ vfprintf (FILE *s, const CHAR_T *format, va_list ap)
\
/* The string argument could in fact be `char *' or `wchar_t *'. \
But this should not make a difference here. */ \
- string = (char *) va_arg (ap, const char *); \
+ if (fspec == NULL) \
+ string = (char *) va_arg (ap, const char *); \
+ else \
+ string = (char *) args_value[fspec->data_arg].pa_string; \
\
/* Entry point for printing other strings. */ \
LABEL (print_string): \
@@ -738,7 +769,10 @@ vfprintf (FILE *s, const CHAR_T *format, va_list ap)
/* Generic pointer. */ \
{ \
const void *ptr; \
- ptr = va_arg (ap, void *); \
+ if (fspec == NULL) \
+ ptr = va_arg (ap, void *); \
+ else \
+ ptr = args_value[fspec->data_arg].pa_pointer; \
if (ptr != NULL) \
{ \
/* If the pointer is not NULL, write it as a %#x spec. */ \
@@ -765,14 +799,24 @@ vfprintf (FILE *s, const CHAR_T *format, va_list ap)
\
LABEL (form_number): \
/* Answer the count of characters written. */ \
- if (is_longlong) \
- *(long long int *) va_arg (ap, void *) = done; \
- else if (is_long) \
- *(long int *) va_arg (ap, void *) = done; \
- else if (!is_short) \
- *(int *) va_arg (ap, void *) = done; \
+ if (fspec == NULL) \
+ if (is_longlong) \
+ *(long long int *) va_arg (ap, void *) = done; \
+ else if (is_long) \
+ *(long int *) va_arg (ap, void *) = done; \
+ else if (!is_short) \
+ *(int *) va_arg (ap, void *) = done; \
+ else \
+ *(short int *) va_arg (ap, void *) = done; \
else \
- *(short int *) va_arg (ap, void *) = done; \
+ if (is_longlong) \
+ *(long long int *) args_value[fspec->data_arg].pa_pointer = done; \
+ else if (is_long) \
+ *(long int *) args_value[fspec->data_arg].pa_pointer = done; \
+ else if (!is_short) \
+ *(int *) args_value[fspec->data_arg].pa_pointer = done; \
+ else \
+ *(short int *) args_value[fspec->data_arg].pa_pointer = done; \
break; \
\
LABEL (form_strerror): \
@@ -827,6 +871,7 @@ vfprintf (FILE *s, const CHAR_T *format, va_list ap)
STEP0_3_TABLE;
STEP4_TABLE;
+ union printf_arg *args_value; /* This is not used here but ... */
int is_negative; /* Flag for negative number. */
union
{
generated by cgit v1.1 at 2024-11-03 21:08:39 +0000