/* Estimate the length of the string generated by a vprintf-like   function.  Used by vasprintf and xvasprintf.   Copyright (C) 1994-2026 Free Software Foundation, Inc. This file is part of the libiberty library.Libiberty is free software; you can redistribute it and/ormodify it under the terms of the GNU Library General PublicLicense as published by the Free Software Foundation; eitherversion 2 of the License, or (at your option) any later version. Libiberty is distributed in the hope that it will be useful,but WITHOUT ANY WARRANTY; without even the implied warranty ofMERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNULibrary General Public License for more details. You should have received a copy of the GNU Library General PublicLicense along with libiberty; see the file COPYING.LIB.  If not, writeto the Free Software Foundation, Inc., 51 Franklin Street - FifthFloor, Boston, MA 02110-1301, USA.  */ #ifdef HAVE_CONFIG_H#include "config.h"#endif#include <ansidecl.h>#include <stdarg.h>#if !defined (va_copy) && defined (__va_copy)# define va_copy(d,s)  __va_copy((d),(s))#endif#include <stdio.h>#ifdef HAVE_STRING_H#include <string.h>#endif#ifdef HAVE_STDLIB_H#include <stdlib.h>#elseextern unsigned long strtoul ();#endif#include "libiberty.h" intlibiberty_vprintf_buffer_size (const char *format, va_list args){  const char *p = format;  /* Add one to make sure that it is never zero, which might cause malloc     to return NULL.  */  int total_width = strlen (format) + 1;  va_list ap; #ifdef va_copy  va_copy (ap, args);#else  memcpy ((void *) &ap, (void *) &args, sizeof (va_list));#endif   while (*p != '\0')    {      if (*p++ == '%')	{	  int prec = 0;	  while (strchr ("-+ #0", *p))	    ++p;	  if (*p == '*')	    {	      ++p;	      total_width += abs (va_arg (ap, int));	    }	  else	    total_width += strtoul (p, (char **) &p, 10);	  if (*p == '.')	    {	      ++p;	      if (*p == '*')		{		  ++p;		  total_width += abs (va_arg (ap, int));		}	      else	      total_width += strtoul (p, (char **) &p, 10);	    }	  do	    {	      switch (*p)		{		case 'h':		  ++p;		  continue;		case 'l':		case 'L':		  ++prec;		  ++p;		  continue;		case 'z':		  prec = 3;		  ++p;		  continue;		case 't':		  prec = 4;		  ++p;		  continue;#ifdef _WIN32		case 'I':		  if (p[1] == '6' && p[2] == '4')		    {		      prec = 2;		      p += 3;		      continue;		    }		  break;#endif		default:		  break;		}	      break;	    }	  while (1); 	  /* Should be big enough for any format specifier except %s and floats.  */	  total_width += 30;	  switch (*p)	    {	    case 'd':	    case 'i':	    case 'o':	    case 'u':	    case 'x':	    case 'X':	      switch (prec)		{		case 0: (void) va_arg (ap, int); break;		case 1: (void) va_arg (ap, long int); break;		case 2: (void) va_arg (ap, long long int); break;		case 3: (void) va_arg (ap, size_t); break;		case 4: (void) va_arg (ap, ptrdiff_t); break;		}	      break;	    case 'c':	      (void) va_arg (ap, int);	      break;	    case 'f':	    case 'e':	    case 'E':	    case 'g':	    case 'G':	      if (!prec)		{		  (void) va_arg (ap, double);		  /* Since an ieee double can have an exponent of 308, we'll		     make the buffer wide enough to cover the gross case. */		  total_width += 308;		}	      else		{		  (void) va_arg (ap, long double);		  total_width += 4932;		}	      break;	    case 's':	      total_width += strlen (va_arg (ap, char *));	      break;	    case 'p':	    case 'n':	      (void) va_arg (ap, char *);	      break;	    }	  p++;	}    }#ifdef va_copy  va_end (ap);#endif  return total_width;}