compat.h

#ifndef WREPORT_COMPAT_H
#define WREPORT_COMPAT_H
 
#include "config.h"
#include <cstdarg>
#include <cstring>
#include <cstdlib>
#include <cmath>
 
#if USE_OWN_VASPRINTF
static int vasprintf (char **result, 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;
 
  memcpy ((void *)&ap, (void *)&args, sizeof (va_list));
 
  while (*p != '\0')
    {
      if (*p++ == '%')
    {
      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);
        }
      while (strchr ("hlL", *p))
        ++p;
      /* 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':
        case 'c':
          (void) va_arg (ap, int);
          break;
        case 'f':
        case 'e':
        case 'E':
        case 'g':
        case 'G':
          (void) va_arg (ap, double);
          /* Since an ieee double can have an exponent of 307, we'll
         make the buffer wide enough to cover the gross case. */
          total_width += 307;
          break;
        case 's':
          total_width += strlen (va_arg (ap, char *));
          break;
        case 'p':
        case 'n':
          (void) va_arg (ap, char *);
          break;
        }
      p++;
    }
    }
  *result = (char*)malloc (total_width);
  if (*result != NULL) {
    return vsprintf (*result, format, args);}
  else {
    return 0;
  }
}
static int asprintf (char **result, const char *format, ...)
{
    va_list ap;
    va_start(ap, format);
    int res = vasprintf(result, format, ap);
    va_end(ap);
    return res;
}
#endif
 
#endif