aboutsummaryrefslogtreecommitdiff
path: root/stdlib/strfmon.c
diff options
context:
space:
mode:
authorUlrich Drepper <drepper@redhat.com>2000-03-26 18:48:26 +0000
committerUlrich Drepper <drepper@redhat.com>2000-03-26 18:48:26 +0000
commit4fcddf8e57fa96dcf8759d95b5e427bd0cff69b5 (patch)
treed005a27000ed5f9b00c2830541f21690a7887eaa /stdlib/strfmon.c
parent0efadcd9ac89b3a914926b2078d6840176b119d7 (diff)
downloadglibc-4fcddf8e57fa96dcf8759d95b5e427bd0cff69b5.zip
glibc-4fcddf8e57fa96dcf8759d95b5e427bd0cff69b5.tar.gz
glibc-4fcddf8e57fa96dcf8759d95b5e427bd0cff69b5.tar.bz2
Update.
2000-03-24 Andreas Jaeger <aj@suse.de> * Makefile (postclean): Added soversions.i. 2000-03-24 Scott Bambrough <scottb@netwinder.org> * sysdeps/arm/fpu/fpu_control.h: Define _FPU_MASK_IM, _FPU_MASK_ZM, _FPU_MASK_OM, _FPU_MASK_UM, _FPU_MASK_PM, _FPU_MASK_DM, _FPU_DEFAULT, and _FPU_IEEE. Change _FPU_RESERVED. 2000-03-24 Scott Bambrough <scottb@netwinder.org> * sysdeps/unix/sysv/linux/arm/sys/ucontext.h: New file. 2000-03-24 Roland McGrath <roland@baalperazim.frob.com> * sysdeps/posix/getaddrinfo.c: Include <net/if.h> for if_nametoindex. (gaih_inet): Remove unused duplicate variable. * inet/getnameinfo.c (getnameinfo): Use IFNAMSIZ, not MAXHOSTNAMELEN. Don't use __libc_sa_len, which only exists for Linux. Just handle AF_INET and AF_INET6 directly as well as AF_LOCAL, since those are the only flavors supported by this function anyway. 2000-03-24 Geoff Clare <gwc@unisoft.com> * stdlib/strfmon.c: corrected problems with missing signs and missing or extra spaces; allow for sign strings longer than one character; add padding to ensure positive and negative formats are aligned when a left precision is used. 2000-03-26 Ulrich Drepper <drepper@redhat.com> * stdlib/random_r.c (__setstate_r): Allow RNGs of type 4. Patch by John Mizel <John.Mizel@msdw.com>.
Diffstat (limited to 'stdlib/strfmon.c')
-rw-r--r--stdlib/strfmon.c137
1 files changed, 110 insertions, 27 deletions
diff --git a/stdlib/strfmon.c b/stdlib/strfmon.c
index ac6b8b6..d7213ca 100644
--- a/stdlib/strfmon.c
+++ b/stdlib/strfmon.c
@@ -117,6 +117,7 @@ __strfmon_l (char *s, size_t maxsize, __locale_t loc, const char *format, ...)
fpnum;
int print_curr_symbol;
int left_prec;
+ int left_pad;
int right_prec;
int group;
char pad;
@@ -124,11 +125,15 @@ __strfmon_l (char *s, size_t maxsize, __locale_t loc, const char *format, ...)
int p_sign_posn;
int n_sign_posn;
int sign_posn;
+ int other_sign_posn;
int left;
int is_negative;
int sep_by_space;
+ int other_sep_by_space;
int cs_precedes;
- char sign_char;
+ int other_cs_precedes;
+ const char *sign_string;
+ const char *other_sign_string;
int done;
const char *currency_symbol;
int width;
@@ -346,35 +351,102 @@ __strfmon_l (char *s, size_t maxsize, __locale_t loc, const char *format, ...)
/* We now know the sign of the value and can determine the format. */
if (is_negative)
{
- sign_char = *_NL_CURRENT (LC_MONETARY, NEGATIVE_SIGN);
+ sign_string = _NL_CURRENT (LC_MONETARY, NEGATIVE_SIGN);
/* If the locale does not specify a character for the
negative sign we use a '-'. */
- if (sign_char == '\0')
- sign_char = '-';
+ if (*sign_string == '\0')
+ sign_string = (const char *) "-";
cs_precedes = *_NL_CURRENT (LC_MONETARY, N_CS_PRECEDES);
sep_by_space = *_NL_CURRENT (LC_MONETARY, N_SEP_BY_SPACE);
sign_posn = n_sign_posn;
+
+ other_sign_string = _NL_CURRENT (LC_MONETARY, POSITIVE_SIGN);
+ other_cs_precedes = *_NL_CURRENT (LC_MONETARY, P_CS_PRECEDES);
+ other_sep_by_space = *_NL_CURRENT (LC_MONETARY, P_SEP_BY_SPACE);
+ other_sign_posn = p_sign_posn;
}
else
{
- sign_char = *_NL_CURRENT (LC_MONETARY, POSITIVE_SIGN);
- /* If the locale does not specify a character for the
- positive sign we use a <SP>. */
- if (sign_char == '\0')
- sign_char = ' ';
+ sign_string = _NL_CURRENT (LC_MONETARY, POSITIVE_SIGN);
cs_precedes = *_NL_CURRENT (LC_MONETARY, P_CS_PRECEDES);
sep_by_space = *_NL_CURRENT (LC_MONETARY, P_SEP_BY_SPACE);
sign_posn = p_sign_posn;
+
+ other_sign_string = _NL_CURRENT (LC_MONETARY, NEGATIVE_SIGN);
+ if (*other_sign_string == '\0')
+ other_sign_string = (const char *) "-";
+ other_cs_precedes = *_NL_CURRENT (LC_MONETARY, N_CS_PRECEDES);
+ other_sep_by_space = *_NL_CURRENT (LC_MONETARY, N_SEP_BY_SPACE);
+ other_sign_posn = n_sign_posn;
}
/* Set default values for unspecified information. */
if (cs_precedes != 0)
cs_precedes = 1;
+ if (other_cs_precedes != 0)
+ other_cs_precedes = 1;
if (sep_by_space == 127)
sep_by_space = 0;
+ if (other_sep_by_space == 127)
+ other_sep_by_space = 0;
+
+ /* Set the left precision and padding needed for alignment */
if (left_prec == -1)
- left_prec = 0;
+ {
+ left_prec = 0;
+ left_pad = 0;
+ }
+ else
+ {
+ /* Set left_pad to number of spaces needed to align positive
+ and negative formats */
+ int sign_precedes = 0;
+ int other_sign_precedes = 0;
+
+ left_pad = 0;
+
+ if (!cs_precedes && other_cs_precedes)
+ {
+ /* The other format has currency symbol preceding value,
+ but this format doesn't, so pad by the relevant amount */
+ left_pad += strlen (currency_symbol);
+ if (other_sep_by_space != 0)
+ ++left_pad;
+ }
+
+ /* Work out for each format whether a sign (or left parenthesis)
+ precedes the value */
+ if (sign_posn == 0 || sign_posn == 1)
+ sign_precedes = 1;
+ if (other_sign_posn == 0 || other_sign_posn == 1)
+ other_sign_precedes = 1;
+ if (cs_precedes && (sign_posn == 3 || sign_posn == 4))
+ sign_precedes = 1;
+ if (other_cs_precedes
+ && (other_sign_posn == 3 || other_sign_posn == 4))
+ other_sign_precedes = 1;
+
+ if (!sign_precedes && other_sign_precedes)
+ {
+ /* The other format has a sign (or left parenthesis) preceding
+ the value, but this format doesn't */
+ if (other_sign_posn == 0)
+ ++left_pad;
+ else
+ left_pad += strlen (other_sign_string);
+ }
+ else if (sign_precedes && other_sign_precedes)
+ {
+ /* Both formats have a sign (or left parenthesis) preceding
+ the value, so compare their lengths */
+ int len_diff =
+ ((other_sign_posn == 0 ? 1 : (int) strlen (other_sign_string))
+ - (sign_posn == 0 ? 1 : (int) strlen (sign_string)));
+ if (len_diff > 0)
+ left_pad += len_diff;
+ }
+ }
/* Perhaps we'll someday make these things configurable so
better start using symbolic names now. */
@@ -383,15 +455,18 @@ __strfmon_l (char *s, size_t maxsize, __locale_t loc, const char *format, ...)
startp = dest; /* Remember start so we can compute length. */
- if (sign_posn == 0)
- out_char (is_negative ? left_paren : ' ');
+ while (left_pad-- > 0)
+ out_char (' ');
+
+ if (sign_posn == 0 && is_negative)
+ out_char (left_paren);
if (cs_precedes)
{
if (sign_posn != 0 && sign_posn != 2 && sign_posn != 4
&& sign_posn != 5)
{
- out_char (sign_char);
+ out_string (sign_string);
if (sep_by_space == 2)
out_char (' ');
}
@@ -404,7 +479,7 @@ __strfmon_l (char *s, size_t maxsize, __locale_t loc, const char *format, ...)
{
if (sep_by_space == 2)
out_char (' ');
- out_char (sign_char);
+ out_string (sign_string);
}
else
if (sep_by_space == 1)
@@ -414,7 +489,7 @@ __strfmon_l (char *s, size_t maxsize, __locale_t loc, const char *format, ...)
else
if (sign_posn != 0 && sign_posn != 2 && sign_posn != 3
&& sign_posn != 4 && sign_posn != 5)
- out_char (sign_char);
+ out_string (sign_string);
/* Print the number. */
#ifdef USE_IN_LIBIO
@@ -422,7 +497,7 @@ __strfmon_l (char *s, size_t maxsize, __locale_t loc, const char *format, ...)
_IO_JUMPS ((_IO_FILE *) &f) = &_IO_str_jumps;
_IO_str_init_static ((_IO_FILE *) &f, dest, (s + maxsize) - dest, dest);
#else
- memset((void *) &f, 0, sizeof(f));
+ memset ((void *) &f, 0, sizeof (f));
f.__magic = _IOMAGIC;
f.__mode.__write = 1;
/* The buffer size is one less than MAXLEN
@@ -478,26 +553,34 @@ __strfmon_l (char *s, size_t maxsize, __locale_t loc, const char *format, ...)
{
if (sep_by_space == 1)
out_char (' ');
- out_char (sign_char);
+ out_string (sign_string);
}
if (print_curr_symbol)
{
- if (sign_posn == 3 && sep_by_space == 2)
+ if ((sign_posn == 3 && sep_by_space == 2)
+ || (sign_posn == 2 && sep_by_space == 1)
+ || (sign_posn == 0 && sep_by_space == 1))
out_char (' ');
out_string (currency_symbol);
+ if (sign_posn == 4)
+ {
+ if (sep_by_space == 2)
+ out_char (' ');
+ out_string (sign_string);
+ }
}
}
- else
- if (sign_posn == 2)
- {
- if (sep_by_space == 2)
- out_char (' ');
- out_char (sign_char);
- }
- if (sign_posn == 0)
- out_char (is_negative ? right_paren : ' ');
+ if (sign_posn == 2)
+ {
+ if (sep_by_space == 2)
+ out_char (' ');
+ out_string (sign_string);
+ }
+
+ if (sign_posn == 0 && is_negative)
+ out_char (right_paren);
/* Now test whether the output width is filled. */
if (dest - startp < width)