1 /* Copyright (C) 1991, 1992, 1995, 1996 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
4 The GNU C Library is free software; you can redistribute it and/or
5 modify it under the terms of the GNU Library General Public License as
6 published by the Free Software Foundation; either version 2 of the
7 License, or (at your option) any later version.
9 The GNU C Library is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 Library General Public License for more details.
14 You should have received a copy of the GNU Library General Public
15 License along with the GNU C Library; see the file COPYING.LIB. If
16 not, write to the Free Software Foundation, Inc., 675 Mass Ave,
17 Cambridge, MA 02139, USA. */
25 #ifndef COMPILE_WPRINTF
27 # define UCHAR_T unsigned char
30 # define ISDIGIT(Ch) isdigit (Ch)
33 # define PUT(F, S, N) _IO_sputn (F, S, N)
34 # define PAD(Padchar) \
36 done += _IO_padn (s, Padchar, width)
38 # define PUTC(C, F) putc (C, F)
39 ssize_t __printf_pad
__P ((FILE *, char pad
, size_t n
));
40 # define PAD(Padchar) \
42 { if (__printf_pad (s, Padchar, width) == -1) \
43 return -1; else done += width; }
46 # define vfprintf vfwprintf
47 # define CHAR_T wchar_t
48 # define UCHAR_T uwchar_t
50 # define L_(Str) L##Str
51 # define ISDIGIT(Ch) iswdigit (Ch)
54 # define PUT(F, S, N) _IO_sputn (F, S, N)
55 # define PAD(Padchar) \
57 done += _IO_wpadn (s, Padchar, width)
59 # define PUTC(C, F) wputc (C, F)
60 ssize_t __wprintf_pad
__P ((FILE *, wchar_t pad
, size_t n
));
61 # define PAD(Padchar) \
63 { if (__wprintf_pad (s, Padchar, width) == -1) \
64 return -1; else done += width; }
68 #include "printf-parse.h"
72 parse_printf_format (fmt
, n
, argtypes
)
77 size_t nargs
; /* Number of arguments. */
78 size_t max_ref_arg
; /* Highest index used in a positional arg. */
79 struct printf_spec spec
;
86 /* Search for format specifications. */
87 for (fmt
= find_spec (fmt
, &mbstate
); *fmt
!= '\0'; fmt
= spec
.next_fmt
)
89 /* Parse this spec. */
90 nargs
+= parse_one_spec (fmt
, nargs
, &spec
, &max_ref_arg
, &mbstate
);
92 /* If the width is determined by an argument this is an int. */
93 if (spec
.width_arg
!= -1 && spec
.width_arg
< n
)
94 argtypes
[spec
.width_arg
] = PA_INT
;
96 /* If the precision is determined by an argument this is an int. */
97 if (spec
.prec_arg
!= -1 && spec
.prec_arg
< n
)
98 argtypes
[spec
.prec_arg
] = PA_INT
;
100 if (spec
.data_arg
< n
)
101 switch (spec
.ndata_args
)
103 case 0: /* No arguments. */
105 case 1: /* One argument; we already have the type. */
106 argtypes
[spec
.data_arg
] = spec
.data_arg_type
;
109 /* We have more than one argument for this format spec. We must
110 call the arginfo function again to determine all the types. */
111 (void) (*__printf_arginfo_table
[spec
.info
.spec
])
112 (&spec
.info
, n
- spec
.data_arg
, &argtypes
[spec
.data_arg
]);
117 return MAX (nargs
, max_ref_arg
);