home *** CD-ROM | disk | FTP | other *** search
/ Geek Gadgets 1 / ADE-1.bin / ade-dist / gettext-0.10.24-src.tgz / tar.out / fsf / gettext / lib / printf-prs.c < prev    next >
C/C++ Source or Header  |  1996-09-28  |  2KB  |  76 lines
  1. /* Copyright (C) 1991, 1992, 1995, 1996 Free Software Foundation, Inc.
  2.  
  3. This program is free software; you can redistribute it and/or modify
  4. it under the terms of the GNU General Public License as published by
  5. the Free Software Foundation; either version 2, or (at your option)
  6. any later version.
  7.  
  8. This program is distributed in the hope that it will be useful,
  9. but WITHOUT ANY WARRANTY; without even the implied warranty of
  10. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  11. GNU General Public License for more details.
  12.  
  13. You should have received a copy of the GNU General Public License
  14. along with this program; if not, write to the Free Software
  15. Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
  16.  
  17. #ifdef HAVE_CONFIG_H
  18. # include <config.h>
  19. #endif
  20.  
  21. #include <stdio.h>
  22. #include <printf.h>
  23. #ifdef STDC_HEADERS
  24. # include <stdlib.h>
  25. #endif
  26.  
  27. #include "printf-parse.h"
  28.  
  29.  
  30. size_t
  31. parse_printf_format (fmt, n, argtypes)
  32.       const char *fmt;
  33.       size_t n;
  34.       int *argtypes;
  35. {
  36.   size_t nargs;            /* Number of arguments.  */
  37.   size_t max_ref_arg;        /* Highest index used in a positional arg.  */
  38.   struct printf_spec spec;
  39.  
  40.   nargs = 0;
  41.   max_ref_arg = 0;
  42.  
  43.   /* Search for format specifications.  */
  44.   for (fmt = find_spec (fmt); *fmt != '\0'; fmt = spec.next_fmt)
  45.     {
  46.       /* Parse this spec.  */
  47.       nargs += parse_one_spec (fmt, nargs, &spec, &max_ref_arg);
  48.  
  49.       /* If the width is determined by an argument this is an int.  */
  50.       if (spec.width_arg != -1 && spec.width_arg < (int) n)
  51.     argtypes[spec.width_arg] = PA_INT;
  52.  
  53.       /* If the precision is determined by an argument this is an int.  */
  54.       if (spec.prec_arg != -1 && spec.prec_arg < (int) n)
  55.     argtypes[spec.prec_arg] = PA_INT;
  56.  
  57.       if (spec.data_arg < (int) n)
  58.     switch (spec.ndata_args)
  59.       {
  60.       case 0:        /* No arguments.  */
  61.         break;
  62.       case 1:        /* One argument; we already have the type.  */
  63.         argtypes[spec.data_arg] = spec.data_arg_type;
  64.         break;
  65.       default:
  66.         /* We don't handle this here.  Beside GNU libc no other
  67.            libc provides printf function registration.  But while
  68.            having this feature it also provides this function, so
  69.            that using *this* file is not needed.  */
  70.         break;
  71.       }
  72.     }
  73.  
  74.   return MAX (nargs, max_ref_arg);
  75. }
  76.