Blame tests/t-printf.c

Packit fc043f
/* t-printf.c - Check the estream printf fucntions.
Packit fc043f
 * Copyright (C) 2013 g10 Code GmbH
Packit fc043f
 *
Packit fc043f
 * This file is part of libgpg-error.
Packit fc043f
 *
Packit fc043f
 * libgpg-error is free software; you can redistribute it and/or
Packit fc043f
 * modify it under the terms of the GNU Lesser General Public License
Packit fc043f
 * as published by the Free Software Foundation; either version 2.1 of
Packit fc043f
 * the License, or (at your option) any later version.
Packit fc043f
 *
Packit fc043f
 * libgpg-error is distributed in the hope that it will be useful, but
Packit fc043f
 * WITHOUT ANY WARRANTY; without even the implied warranty of
Packit fc043f
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
Packit fc043f
 * Lesser General Public License for more details.
Packit fc043f
 *
Packit fc043f
 * You should have received a copy of the GNU Lesser General Public
Packit fc043f
 * License along with this program; if not, see <https://www.gnu.org/licenses/>.
Packit fc043f
 */
Packit fc043f
Packit fc043f
/* Note that these tests check against glibc behaviour.  On non glibc
Packit fc043f
   systems expect non matching return codes in some border cases.  */
Packit fc043f
Packit fc043f
Packit fc043f
#if HAVE_CONFIG_H
Packit fc043f
# include <config.h>
Packit fc043f
#endif
Packit fc043f
Packit fc043f
#include <stdio.h>
Packit fc043f
#include <stdlib.h>
Packit fc043f
#include <string.h>
Packit fc043f
#include <assert.h>
Packit fc043f
#include <errno.h>
Packit fc043f
#include <locale.h>
Packit fc043f
Packit fc043f
#define PGM "t-printf"
Packit fc043f
Packit fc043f
#include "t-common.h"
Packit fc043f
Packit fc043f
Packit fc043f
static char *one_test_buf1;
Packit fc043f
static int   one_test_rc1;
Packit fc043f
Packit fc043f
static void
Packit fc043f
one_test_x0 (const char *format, ...)
Packit fc043f
{
Packit fc043f
  va_list arg_ptr;
Packit fc043f
Packit fc043f
  show ("format: ->%s<-\n", format);
Packit fc043f
Packit fc043f
  errno = ENOENT; /* For the "%m" test.  */
Packit fc043f
  va_start (arg_ptr, format);
Packit fc043f
#ifdef HAVE_VASPRINTF
Packit fc043f
  one_test_rc1 = vasprintf (&one_test_buf1, format, arg_ptr);
Packit fc043f
#else
Packit fc043f
  one_test_rc1 = -1;
Packit fc043f
#endif
Packit fc043f
  va_end (arg_ptr);
Packit fc043f
  if (one_test_rc1 == -1)
Packit fc043f
    {
Packit fc043f
      fail ("   sys: errno=%d (%s)\n", errno, strerror (errno));
Packit fc043f
      one_test_buf1 = NULL;
Packit fc043f
    }
Packit fc043f
  else
Packit fc043f
    show ("   sys: ->%s<-\n", one_test_buf1);
Packit fc043f
}
Packit fc043f
Packit fc043f
static void
Packit fc043f
one_test_x1 (const char *format, ...)
Packit fc043f
{
Packit fc043f
  int rc2;
Packit fc043f
  va_list arg_ptr;
Packit fc043f
  char *buf2;
Packit fc043f
Packit fc043f
  errno = ENOENT;
Packit fc043f
  va_start (arg_ptr, format);
Packit fc043f
  rc2 = gpgrt_vasprintf (&buf2, format, arg_ptr);
Packit fc043f
  va_end (arg_ptr);
Packit fc043f
  if (rc2 == -1)
Packit fc043f
    {
Packit fc043f
      fail ("   our: errno=%d (%s)\n", errno, strerror (errno));
Packit fc043f
    }
Packit fc043f
  else
Packit fc043f
    show ("   our: ->%s<-\n", buf2);
Packit fc043f
Packit fc043f
  if (one_test_rc1 != -1 && rc2 != -1 && strcmp (one_test_buf1, buf2))
Packit fc043f
    {
Packit fc043f
      fail ("error: output does not match\n"
Packit fc043f
            "format: ->%s<-\n   sys: ->%s<-\n   our: ->%s<-\n",
Packit fc043f
            format, one_test_buf1, buf2);
Packit fc043f
    }
Packit fc043f
  else if ( one_test_rc1 != rc2 )
Packit fc043f
    {
Packit fc043f
      fail ("error: return codes are different: sys_rc=%d our_rc=%d\n",
Packit fc043f
            one_test_rc1, rc2);
Packit fc043f
    }
Packit fc043f
Packit fc043f
  free (buf2);
Packit fc043f
}
Packit fc043f
Packit fc043f
static void
Packit fc043f
one_test_x2 (const char *format, ...)
Packit fc043f
{
Packit fc043f
  va_list arg_ptr;
Packit fc043f
  char *buf2;
Packit fc043f
Packit fc043f
  /* Test once more using the bsprintf variant.  */
Packit fc043f
  errno = ENOENT;
Packit fc043f
  va_start (arg_ptr, format);
Packit fc043f
  buf2 = gpgrt_vbsprintf (format, arg_ptr);
Packit fc043f
  va_end (arg_ptr);
Packit fc043f
  if (!buf2)
Packit fc043f
    {
Packit fc043f
      fail ("   our(2): errno=%d (%s)\n", errno, strerror (errno));
Packit fc043f
    }
Packit fc043f
  else if (verbose)
Packit fc043f
    show ("   our: ->%s<-\n", buf2);
Packit fc043f
Packit fc043f
  if (one_test_rc1 != -1 && buf2 && strcmp (one_test_buf1, buf2))
Packit fc043f
    {
Packit fc043f
      fail ("error: output does not match\n"
Packit fc043f
            "format(2): ->%s<-\n   sys: ->%s<-\n   our: ->%s<-\n",
Packit fc043f
            format, one_test_buf1, buf2);
Packit fc043f
    }
Packit fc043f
  es_free (buf2);
Packit fc043f
Packit fc043f
  free (one_test_buf1);
Packit fc043f
  one_test_buf1 = NULL;
Packit fc043f
}
Packit fc043f
Packit fc043f
Packit fc043f
#define one_test_0(a)                              \
Packit fc043f
  one_test_x0 (a);                                 \
Packit fc043f
  one_test_x1 (a);                                 \
Packit fc043f
  one_test_x2 (a)
Packit fc043f
#define one_test_1(a, b)                           \
Packit fc043f
  one_test_x0 (a, b);                              \
Packit fc043f
  one_test_x1 (a, b);                              \
Packit fc043f
  one_test_x2 (a, b)
Packit fc043f
#define one_test_2(a, b, c)                        \
Packit fc043f
  one_test_x0 (a, b, c);                           \
Packit fc043f
  one_test_x1 (a, b, c);                           \
Packit fc043f
  one_test_x2 (a, b, c)
Packit fc043f
#define one_test_3(a, b, c, d)                     \
Packit fc043f
  one_test_x0 (a, b, c, d);                        \
Packit fc043f
  one_test_x1 (a, b, c, d);                        \
Packit fc043f
  one_test_x2 (a, b, c, d)
Packit fc043f
Packit fc043f
static void
Packit fc043f
run_tests (void)
Packit fc043f
{
Packit fc043f
#ifndef HAVE_VASPRINTF
Packit fc043f
  /* We do not have a system vasprintf.  */
Packit fc043f
  show ("run-tests: disabled due to missing vasprintf.\n");
Packit fc043f
#else /*HAVE_VASPRINTF */
Packit fc043f
Packit fc043f
  /*one_test ("%d %% %'d", 17, 19681977);*/
Packit fc043f
Packit fc043f
  one_test_2 ("%d %% %d", 17, 768114563);
Packit fc043f
  one_test_2 ("%d %% %d", 17, -768114563);
Packit fc043f
Packit fc043f
  one_test_1 ("%d", 17);
Packit fc043f
  one_test_1 ("%4d", 17);
Packit fc043f
  one_test_1 ("%40d", 17);
Packit fc043f
  one_test_1 ("%-d", 17);
Packit fc043f
  one_test_1 ("%-4d", 17);
Packit fc043f
  one_test_1 ("%-140d", 17);
Packit fc043f
  one_test_1 ("%d", -17);
Packit fc043f
  one_test_1 ("%4d", -17);
Packit fc043f
  one_test_1 ("%40d", -17);
Packit fc043f
  one_test_1 ("%-d", -17);
Packit fc043f
  one_test_1 ("%-4d", -17);
Packit fc043f
  one_test_1 ("%-40d", -17);
Packit fc043f
Packit fc043f
  one_test_1 ("%+4d", 17);
Packit fc043f
  one_test_1 ("%+4d", -17);
Packit fc043f
  one_test_1 ("%-+4d", 17);
Packit fc043f
  one_test_1 ("%-+4d", -17);
Packit fc043f
  one_test_1 ("% 4d", 17);
Packit fc043f
  one_test_1 ("% 4d", -17);
Packit fc043f
  one_test_1 ("%- +4d", 17);
Packit fc043f
  one_test_1 ("%- +4d", -17);
Packit fc043f
Packit fc043f
  one_test_1 ("%.4d", 17);
Packit fc043f
  one_test_1 ("%.0d", 17);
Packit fc043f
  one_test_1 ("%.0d", 0);
Packit fc043f
  one_test_1 ("%.4d", -17);
Packit fc043f
  one_test_1 ("%.0d", -17);
Packit fc043f
  one_test_1 ("%6.4d", 17);
Packit fc043f
  one_test_1 ("%6.4d", -17);
Packit fc043f
  one_test_1 ("%6.0d", 0);
Packit fc043f
  one_test_1 ("%4.6d", 17);
Packit fc043f
  one_test_1 ("%4.6d", -17);
Packit fc043f
Packit fc043f
  one_test_1 ("% 4.6d", 17);
Packit fc043f
  one_test_1 ("% 6.0d", 0);
Packit fc043f
Packit fc043f
  one_test_1 ("%.4d", 17);
Packit fc043f
  one_test_1 ("%04d", 17);
Packit fc043f
  one_test_1 ("%.4d", -17);
Packit fc043f
  one_test_1 ("%04d", -17);
Packit fc043f
  one_test_1 ("%0.d", 0);
Packit fc043f
Packit fc043f
  one_test_2 ("%*d", 7, 42);
Packit fc043f
  one_test_2 ("%*d", -7, 42);
Packit fc043f
  one_test_2 ("%.*d", 7, 42);
Packit fc043f
  one_test_2 ("%.*d", -7, 42);
Packit fc043f
  one_test_3 ("%*.*d", 10, 7, 42);
Packit fc043f
  one_test_3 ("%*.*d", 10, -7, 42);
Packit fc043f
  one_test_3 ("%*.*d", -10, 7, 42);
Packit fc043f
  one_test_3 ("%*.*d", -10, -7, 42);
Packit fc043f
Packit fc043f
  one_test_2 ("%*x", 7, 42);
Packit fc043f
  one_test_2 ("%*x", -7, 42);
Packit fc043f
  one_test_2 ("%.*x", 7, 42);
Packit fc043f
  one_test_2 ("%.*x", -7, 42);
Packit fc043f
  one_test_3 ("%*.*x", 10, 7, 42);
Packit fc043f
  one_test_3 ("%*.*x", 10, -7, 42);
Packit fc043f
  one_test_3 ("%*.*x", -10, 7, 42);
Packit fc043f
  one_test_3 ("%*.*x", -10, -7, 42);
Packit fc043f
  one_test_2 ("%#*x", 7, 42);
Packit fc043f
  one_test_2 ("%#*x", -7, 42);
Packit fc043f
  one_test_2 ("%#.*x", 7, 42);
Packit fc043f
  one_test_2 ("%#.*x", -7, 42);
Packit fc043f
  one_test_3 ("%#*.*x", 10, 7, 42);
Packit fc043f
  one_test_3 ("%#*.*x", 10, -7, 42);
Packit fc043f
  one_test_3 ("%#*.*x", -10, 7, 42);
Packit fc043f
  one_test_3 ("%#*.*x", -10, -7, 42);
Packit fc043f
Packit fc043f
  one_test_2 ("%*X", 7, 42);
Packit fc043f
  one_test_2 ("%*X", -7, 42);
Packit fc043f
  one_test_2 ("%.*X", 7, 42);
Packit fc043f
  one_test_2 ("%.*X", -7, 42);
Packit fc043f
  one_test_3 ("%*.*X", 10, 7, 42);
Packit fc043f
  one_test_3 ("%*.*X", 10, -7, 42);
Packit fc043f
  one_test_3 ("%*.*X", -10, 7, 42);
Packit fc043f
  one_test_3 ("%*.*X", -10, -7, 42);
Packit fc043f
  one_test_2 ("%#*X", 7, 42);
Packit fc043f
  one_test_2 ("%#*X", -7, 42);
Packit fc043f
  one_test_2 ("%#.*X", 7, 42);
Packit fc043f
  one_test_2 ("%#.*X", -7, 42);
Packit fc043f
  one_test_3 ("%#*.*X", 10, 7, 42);
Packit fc043f
  one_test_3 ("%#*.*X", 10, -7, 42);
Packit fc043f
  one_test_3 ("%#*.*X", -10, 7, 42);
Packit fc043f
  one_test_3 ("%#*.*X", -10, -7, 42);
Packit fc043f
Packit fc043f
  one_test_2 ("%*o", 7, 42);
Packit fc043f
  one_test_2 ("%*o", -7, 42);
Packit fc043f
  one_test_2 ("%.*o", 7, 42);
Packit fc043f
  one_test_2 ("%.*o", -7, 42);
Packit fc043f
  one_test_3 ("%*.*o", 10, 7, 42);
Packit fc043f
  one_test_3 ("%*.*o", 10, -7, 42);
Packit fc043f
  one_test_3 ("%*.*o", -10, 7, 42);
Packit fc043f
  one_test_3 ("%*.*o", -10, -7, 42);
Packit fc043f
  one_test_2 ("%#*o", 7, 42);
Packit fc043f
  one_test_2 ("%#*o", -7, 42);
Packit fc043f
  one_test_2 ("%#.*o", 7, 42);
Packit fc043f
  one_test_2 ("%#.*o", -7, 42);
Packit fc043f
  one_test_3 ("%#*.*o", 10, 7, 42);
Packit fc043f
  one_test_3 ("%#*.*o", 10, -7, 42);
Packit fc043f
  one_test_3 ("%#*.*o", -10, 7, 42);
Packit fc043f
  one_test_3 ("%#*.*o", -10, -7, 42);
Packit fc043f
Packit fc043f
  one_test_1 ("%s", "the quick brown fox jumps over the lazy dogs back");
Packit fc043f
  one_test_1 ("%.0s", "the quick brown fox jumps over the lazy dogs back");
Packit fc043f
  one_test_1 ("%.10s", "the quick brown fox jumps over the lazy dogs back");
Packit fc043f
  one_test_1 ("%.48s", "the quick brown fox jumps over the lazy dogs back");
Packit fc043f
  one_test_1 ("%.49s", "the quick brown fox jumps over the lazy dogs back");
Packit fc043f
  one_test_1 ("%.50s", "the quick brown fox jumps over the lazy dogs back");
Packit fc043f
  one_test_1 ("%.51s", "the quick brown fox jumps over the lazy dogs back");
Packit fc043f
  one_test_1 ("%48s", "the quick brown fox jumps over the lazy dogs back");
Packit fc043f
  one_test_1 ("%49s", "the quick brown fox jumps over the lazy dogs back");
Packit fc043f
  one_test_1 ("%50s", "the quick brown fox jumps over the lazy dogs back");
Packit fc043f
  one_test_1 ("%51s", "the quick brown fox jumps over the lazy dogs back");
Packit fc043f
  one_test_1 ("%-51s", "the quick brown fox jumps over the lazy dogs back");
Packit fc043f
Packit fc043f
  one_test_1 ("/%s=", "CN");
Packit fc043f
Packit fc043f
  one_test_1 ("%f", 3.1415926535);
Packit fc043f
  one_test_1 ("%f", -3.1415926535);
Packit fc043f
  one_test_1 ("%.10f", 3.1415926535);
Packit fc043f
  one_test_1 ("%.2f", 3.1415926535);
Packit fc043f
  one_test_1 ("%.1f", 3.1415926535);
Packit fc043f
  one_test_1 ("%.0f", 3.1415926535);
Packit fc043f
  one_test_1 ("%.20f", 3.1415926535);
Packit fc043f
  one_test_1 ("%10.10f", 3.1415926535);
Packit fc043f
  one_test_1 ("%10.2f", 3.1415926535);
Packit fc043f
  one_test_1 ("%10.1f", 3.1415926535);
Packit fc043f
  one_test_1 ("%10.0f", 3.1415926535);
Packit fc043f
  one_test_1 ("%30.20f", 3.1415926535);
Packit fc043f
  one_test_1 ("%10.10f", -3.1415926535);
Packit fc043f
  one_test_1 ("%10.2f", -3.1415926535);
Packit fc043f
  one_test_1 ("%10.1f", -3.1415926535);
Packit fc043f
  one_test_1 ("%10.0f", -3.1415926535);
Packit fc043f
  one_test_1 ("%30.20f", -3.1415926535);
Packit fc043f
Packit fc043f
  one_test_1 ("%-10f", 3.1415926535);
Packit fc043f
  one_test_1 ("%-10.10f", 3.1415926535);
Packit fc043f
  one_test_1 ("%-10.2f", 3.1415926535);
Packit fc043f
  one_test_1 ("%-10.1f", 3.1415926535);
Packit fc043f
  one_test_1 ("%-10.0f", 3.1415926535);
Packit fc043f
  one_test_1 ("%-30.20f", 3.1415926535);
Packit fc043f
  one_test_1 ("%-10f", -3.1415926535);
Packit fc043f
  one_test_1 ("%-10.10f", -3.1415926535);
Packit fc043f
  one_test_1 ("%-10.2f", -3.1415926535);
Packit fc043f
  one_test_1 ("%-10.1f", -3.1415926535);
Packit fc043f
  one_test_1 ("%-10.0f", -3.1415926535);
Packit fc043f
  one_test_1 ("%-30.20f", -3.1415926535);
Packit fc043f
Packit fc043f
  one_test_1 ("%#.0f",  3.1415926535);
Packit fc043f
  one_test_1 ("%#10.0f",  3.1415926535);
Packit fc043f
  one_test_1 ("%#10.0f", -3.1415926535);
Packit fc043f
  one_test_1 ("%-#10.0f",  3.1415926535);
Packit fc043f
  one_test_1 ("%-#10.0f", -3.1415926535);
Packit fc043f
Packit fc043f
  one_test_1 ("%e", 3.1415926535);
Packit fc043f
  one_test_1 ("%g", 3.1415926535);
Packit fc043f
Packit fc043f
  one_test_1 ("%a", 1.0);
Packit fc043f
  one_test_1 ("%a", -1.0);
Packit fc043f
  one_test_1 ("%a", 3.1415926535);
Packit fc043f
Packit fc043f
#ifdef HAVE_LONG_DOUBLE
Packit fc043f
  one_test_1 ("%La", (long double)1.0);
Packit fc043f
  one_test_1 ("%La", (long double)-1.0);
Packit fc043f
  one_test_1 ("%La", (long double)3.1415926535);
Packit fc043f
#endif
Packit fc043f
Packit fc043f
#ifdef __GLIBC__
Packit fc043f
  /* "%m" is a glibc extension so this _test_ will only work on such a
Packit fc043f
     system.  */
Packit fc043f
  one_test_0 ("%m");
Packit fc043f
  one_test_1 ("%d=%m", 17);
Packit fc043f
  one_test_2 ("%2$d:%m:%1$d", 42, 17);
Packit fc043f
#endif /*__GLIBC__*/
Packit fc043f
Packit fc043f
#endif /*HAVE_VASPRINTF */
Packit fc043f
}
Packit fc043f
Packit fc043f
static void
Packit fc043f
check_snprintf (void)
Packit fc043f
{
Packit fc043f
  char buffer[20];
Packit fc043f
  int rc, rc2;
Packit fc043f
  size_t tmplen, blen, blen2;
Packit fc043f
Packit fc043f
  rc = gpgrt_snprintf (buffer, 0, "%*s", 18, "");
Packit fc043f
  if (rc != 18)
Packit fc043f
    printf ("rc=%d\n", rc );
Packit fc043f
  rc = gpgrt_snprintf (buffer, sizeof buffer, "%*s", 18, "");
Packit fc043f
  if (rc != 18)
Packit fc043f
    printf ("rc=%d, strlen(buffer)=%d\n", rc, (int)strlen (buffer));
Packit fc043f
  rc = gpgrt_snprintf (buffer, sizeof buffer, "%*s", 19, "");
Packit fc043f
  if (rc != 19)
Packit fc043f
    printf ("rc=%d, strlen(buffer)=%d\n", rc, (int)strlen (buffer));
Packit fc043f
  rc = gpgrt_snprintf (buffer, sizeof buffer, "%*s", 20, "");
Packit fc043f
  if (rc != 20)
Packit fc043f
    printf ("rc=%d, strlen(buffer)=%d\n", rc, (int)strlen (buffer));
Packit fc043f
  rc = gpgrt_snprintf (buffer, sizeof buffer, "%*s", 21, "");
Packit fc043f
  if (rc != 21)
Packit fc043f
    printf ("rc=%d, strlen(buffer)=%d\n", rc, (int)strlen (buffer));
Packit fc043f
Packit fc043f
  for (tmplen = 0; tmplen <= sizeof buffer; tmplen++)
Packit fc043f
    {
Packit fc043f
      rc = gpgrt_snprintf (buffer, tmplen, "%04d%02d%02dT%02d%02d%02d",
Packit fc043f
                             1998, 9, 7, 16, 56, 05);
Packit fc043f
      blen = strlen (buffer);
Packit fc043f
      rc2 = snprintf (buffer, tmplen, "%04d%02d%02dT%02d%02d%02d",
Packit fc043f
                     1998, 9, 7, 16, 56, 05);
Packit fc043f
      blen2 = strlen (buffer);
Packit fc043f
      if (rc != rc2 || blen != blen2)
Packit fc043f
        printf ("snprintf test with len %u gives %d instead of %d (%u,%u)\n",
Packit fc043f
                (unsigned int)tmplen, rc, rc2,
Packit fc043f
                (unsigned int)blen, (unsigned int)blen2);
Packit fc043f
    }
Packit fc043f
}
Packit fc043f
Packit fc043f
Packit fc043f
Packit fc043f
int
Packit fc043f
main (int argc, char **argv)
Packit fc043f
{
Packit fc043f
  int last_argc = -1;
Packit fc043f
Packit fc043f
  if (argc)
Packit fc043f
    {
Packit fc043f
      argc--; argv++;
Packit fc043f
    }
Packit fc043f
  while (argc && last_argc != argc )
Packit fc043f
    {
Packit fc043f
      last_argc = argc;
Packit fc043f
      if (!strcmp (*argv, "--help"))
Packit fc043f
        {
Packit fc043f
          puts (
Packit fc043f
"usage: ./" PGM " [options]\n"
Packit fc043f
"\n"
Packit fc043f
"Options:\n"
Packit fc043f
"  --verbose      Show what is going on\n"
Packit fc043f
"  --debug        Flyswatter\n"
Packit fc043f
);
Packit fc043f
          exit (0);
Packit fc043f
        }
Packit fc043f
      if (!strcmp (*argv, "--verbose"))
Packit fc043f
        {
Packit fc043f
          verbose = 1;
Packit fc043f
          argc--; argv++;
Packit fc043f
        }
Packit fc043f
      else if (!strcmp (*argv, "--debug"))
Packit fc043f
        {
Packit fc043f
          verbose = debug = 1;
Packit fc043f
          argc--; argv++;
Packit fc043f
        }
Packit fc043f
    }
Packit fc043f
Packit fc043f
  setlocale (LC_NUMERIC, "");
Packit fc043f
  if (!gpg_error_check_version (GPG_ERROR_VERSION))
Packit fc043f
    {
Packit fc043f
      die ("gpg_error_check_version returned an error");
Packit fc043f
      errorcount++;
Packit fc043f
    }
Packit fc043f
Packit fc043f
  run_tests ();
Packit fc043f
  check_snprintf ();
Packit fc043f
Packit fc043f
#ifdef __GLIBC__
Packit fc043f
  return !!errorcount;
Packit fc043f
#else
Packit fc043f
  return 0;
Packit fc043f
#endif
Packit fc043f
}