stdlib/tst-strfrom.h

   1 /* Tests for strfromf, strfromd, strfroml functions.
   2    Copyright (C) 2016-2023 Free Software Foundation, Inc.
   3    This file is part of the GNU C Library.
   4
   5    The GNU C Library is free software; you can redistribute it and/or
   6    modify it under the terms of the GNU Lesser General Public
   7    License as published by the Free Software Foundation; either
   8    version 2.1 of the License, or (at your option) any later version.
   9
  10    The GNU C Library is distributed in the hope that it will be useful,
  11    but WITHOUT ANY WARRANTY; without even the implied warranty of
  12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13    Lesser General Public License for more details.
  14
  15    You should have received a copy of the GNU Lesser General Public
  16    License along with the GNU C Library; if not, see
  17    <https://www.gnu.org/licenses/>.  */
  18
  19 #include <stdio.h>
  20 #include <stdlib.h>
  21 #include <string.h>
  22 #include <float.h>
  23 #include <math.h>
  24 #include <locale.h>
  25
  26 #include "tst-strtod.h"
  27
  28 #define _CONCAT(a, b) a ## b
  29 #define CONCAT(a, b) _CONCAT (a, b)
  30
  31 /* Generator to create an FTYPE member variabled named FSUF
  32  *    used to populate struct member variables.  */
  33 #define FTYPE_MEMBER(FSUF, FTYPE, FTOSTR, LSUF, CSUF)  \
  34        FTYPE FSUF;
  35
  36 #define STRUCT_FOREACH_FLOAT_FTYPE GEN_TEST_STRTOD_FOREACH (FTYPE_MEMBER)
  37
  38 #define ENTRY(FSUF, FTYPE, FTOSTR, LSUF, CSUF, ...)  \
  39    CONCAT (__VA_ARGS__, LSUF),
  40 /* This is hacky way around the seemingly unavoidable macro
  41  * expansion of the INFINITY or HUGE_VAL like macros in the
  42  * above.  It is assumed the compiler will implicitly convert
  43  * the infinity correctly.  */
  44 #define INF INFINITY + 0.0
  45 #define NAN_ NAN + 0.0
  46
  47 struct test_input
  48 {
  49   STRUCT_FOREACH_FLOAT_FTYPE
  50 };
  51 struct test {
  52   const char *s;
  53   const char *fmt;
  54   int size;
  55   int rc;
  56   struct test_input t;
  57 };
  58 #define TEST(s, fmt, size, rc, val)                             \
  59   {                                                             \
  60     s, fmt, size, rc, { GEN_TEST_STRTOD_FOREACH (ENTRY, val) }  \
  61   }
  62 /* Hexadecimal tests.  */
  63 struct htests
  64 {
  65   const char *fmt;
  66   const char *exp[4];
  67   struct test_input t;
  68 };
  69 #define HTEST(fmt, exp1, exp2, exp3, exp4, val)                           \
  70   {                                                                       \
  71     fmt, exp1, exp2, exp3, exp4, { GEN_TEST_STRTOD_FOREACH (ENTRY, val) } \
  72   }
  73
  74 #define TEST_STRFROM(FSUF, FTYPE, FTOSTR, LSUF, CSUF)                   \
  75 static int                                                              \
  76 test_ ## FSUF (void)                                                    \
  77 {                                                                       \
  78   char buf[50], sbuf[5];                                                \
  79   int status = 0;                                                       \
  80   int i, rc = 0, rc1 = 0;                                               \
  81   for (i = 0; i < sizeof (stest) / sizeof (stest[0]); i++)              \
  82     {                                                                   \
  83       rc = FTOSTR (sbuf, stest[i].size, stest[i].fmt, stest[i].t.FSUF); \
  84       rc1 = (strcmp (sbuf, stest[i].s) != 0) || (rc != stest[i].rc);    \
  85       if (rc1)                                                          \
  86         {                                                               \
  87           printf (#FTOSTR ": got %s (%d), expected %s (%d)\n",          \
  88                   sbuf, rc, stest[i].s, stest[i].rc);                   \
  89           status++;                                                     \
  90         }                                                               \
  91     }                                                                   \
  92   for (i = 0; i < sizeof (tests) / sizeof (tests[0]); i++)              \
  93     {                                                                   \
  94       rc = FTOSTR (buf, tests[i].size, tests[i].fmt, tests[i].t.FSUF);  \
  95       rc1 = (strcmp (buf, tests[i].s) != 0) || (rc != tests[i].rc);     \
  96       if (rc1)                                                          \
  97         {                                                               \
  98           printf (#FTOSTR ": got %s (%d), expected %s (%d)\n",          \
  99                   buf, rc, tests[i].s, tests[i].rc);                    \
 100           status++;                                                     \
 101         }                                                               \
 102     }                                                                   \
 103   for (i = 0; i < sizeof (htest) / sizeof (htest[0]); i++)              \
 104     {                                                                   \
 105       rc = FTOSTR (buf, 50, htest[i].fmt, htest[i].t.FSUF);             \
 106       if (strcmp (buf, htest[i].exp[0]) == 0                            \
 107           || strcmp (buf, htest[i].exp[1]) == 0                         \
 108           || strcmp (buf, htest[i].exp[2]) == 0                         \
 109           || strcmp (buf, htest[i].exp[3]) == 0)                        \
 110         continue;                                                       \
 111       else                                                              \
 112         {                                                               \
 113           printf (#FTOSTR ": got %s (%d), expected %s or %s or %s "     \
 114                   "or %s\n", buf, rc, htest[i].exp[0], htest[i].exp[1], \
 115                   htest[i].exp[2], htest[i].exp[3]);                    \
 116           status++;                                                     \
 117         }                                                               \
 118     }                                                                   \
 119   return status;                                                        \
 120 }