1/* Copyright (C) 1991,1992,1995,1996,1999,2000 Free Software Foundation, Inc. 2 This file is part of the GNU C Library. 3 4 The GNU C Library is free software; you can redistribute it and/or 5 modify it under the terms of the GNU Lesser General Public 6 License as published by the Free Software Foundation; either 7 version 2.1 of the License, or (at your option) any later version. 8 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 Lesser General Public License for more details. 13 14 You should have received a copy of the GNU Lesser General Public 15 License along with the GNU C Library; if not, write to the Free 16 Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 17 02111-1307 USA. */ 18 19#include <stdio.h> 20#include <printf.h> 21#include <stdlib.h> 22#include <string.h> 23#include <wchar.h> 24#include <sys/param.h> 25 26#ifndef COMPILE_WPRINTF 27# define CHAR_T char 28# define UCHAR_T unsigned char 29# define INT_T int 30# define L_(Str) Str 31# define ISDIGIT(Ch) isdigit (Ch) 32# define ISASCII(Ch) isascii (Ch) 33# define MBRLEN(Cp, L, St) __mbrlen (Cp, L, St) 34 35# ifdef USE_IN_LIBIO 36# define PUT(F, S, N) _IO_sputn (F, S, N) 37# define PAD(Padchar) \ 38 if (width > 0) \ 39 done += _IO_padn (s, Padchar, width) 40# else 41# define PUTC(C, F) putc (C, F) 42ssize_t __printf_pad __P ((FILE *, char pad, size_t n)); 43# define PAD(Padchar) \ 44 if (width > 0) \ 45 { if (__printf_pad (s, Padchar, width) == -1) \ 46 return -1; else done += width; } 47# endif 48#else 49# define vfprintf vfwprintf 50# define CHAR_T wchar_t 51# define UCHAR_T uwchar_t 52# define INT_T wint_t 53# define L_(Str) L##Str 54# define ISDIGIT(Ch) iswdigit (Ch) 55 56# ifdef USE_IN_LIBIO 57# define PUT(F, S, N) _IO_sputn (F, S, N) 58# define PAD(Padchar) \ 59 if (width > 0) \ 60 done += _IO_wpadn (s, Padchar, width) 61# else 62# define PUTC(C, F) wputc (C, F) 63ssize_t __wprintf_pad __P ((FILE *, wchar_t pad, size_t n)); 64# define PAD(Padchar) \ 65 if (width > 0) \ 66 { if (__wprintf_pad (s, Padchar, width) == -1) \ 67 return -1; else done += width; } 68# endif 69#endif 70 71#include "printf-parse.h" 72 73 74size_t 75parse_printf_format (fmt, n, argtypes) 76 const char *fmt; 77 size_t n; 78 int *argtypes; 79{ 80 size_t nargs; /* Number of arguments. */ 81 size_t max_ref_arg; /* Highest index used in a positional arg. */ 82 struct printf_spec spec; 83 mbstate_t mbstate; 84 85 nargs = 0; 86 max_ref_arg = 0; 87 88 /* Search for format specifications. */ 89 for (fmt = find_spec (fmt, &mbstate); *fmt != '\0'; fmt = spec.next_fmt) 90 { 91 /* Parse this spec. */ 92 nargs += parse_one_spec (fmt, nargs, &spec, &max_ref_arg, &mbstate); 93 94 /* If the width is determined by an argument this is an int. */ 95 if (spec.width_arg != -1 && (size_t) spec.width_arg < n) 96 argtypes[spec.width_arg] = PA_INT; 97 98 /* If the precision is determined by an argument this is an int. */ 99 if (spec.prec_arg != -1 && (size_t) spec.prec_arg < n) 100 argtypes[spec.prec_arg] = PA_INT; 101 102 if ((size_t) spec.data_arg < n) 103 switch (spec.ndata_args) 104 { 105 case 0: /* No arguments. */ 106 break; 107 case 1: /* One argument; we already have the type. */ 108 argtypes[spec.data_arg] = spec.data_arg_type; 109 break; 110 default: 111 /* We have more than one argument for this format spec. We must 112 call the arginfo function again to determine all the types. */ 113 (void) (*__printf_arginfo_table[spec.info.spec]) 114 (&spec.info, n - spec.data_arg, &argtypes[spec.data_arg]); 115 break; 116 } 117 } 118 119 return MAX (nargs, max_ref_arg); 120} 121