]> git.ipfire.org Git - thirdparty/glibc.git/blobdiff - stdio-common/tstscanf.c
[powerpc] No need to enter "Ignore Exceptions Mode"
[thirdparty/glibc.git] / stdio-common / tstscanf.c
index 005dc2dfce07dc2b7959a000243e34765105f902..c30bf2eb5e825b5a13dd99f1a5d3d59d837620dc 100644 (file)
@@ -1,46 +1,63 @@
-/* Copyright (C) 1991, 1992, 1996 Free Software Foundation, Inc.
-This file is part of the GNU C Library.
+/* Copyright (C) 1991-2019 Free Software Foundation, Inc.
+   This file is part of the GNU C Library.
 
-The GNU C Library is free software; you can redistribute it and/or
-modify it under the terms of the GNU Library General Public License as
-published by the Free Software Foundation; either version 2 of the
-License, or (at your option) any later version.
+   The GNU C Library is free software; you can redistribute it and/or
+   modify it under the terms of the GNU Lesser General Public
+   License as published by the Free Software Foundation; either
+   version 2.1 of the License, or (at your option) any later version.
 
-The GNU C Library is distributed in the hope that it will be useful,
-but WITHOUT ANY WARRANTY; without even the implied warranty of
-MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
-Library General Public License for more details.
+   The GNU C Library is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+   Lesser General Public License for more details.
 
-You should have received a copy of the GNU Library General Public
-License along with the GNU C Library; see the file COPYING.LIB.  If
-not, write to the Free Software Foundation, Inc., 675 Mass Ave,
-Cambridge, MA 02139, USA.  */
+   You should have received a copy of the GNU Lesser General Public
+   License along with the GNU C Library; if not, see
+   <https://www.gnu.org/licenses/>.  */
 
-#include <ansidecl.h>
+#include <array_length.h>
 #ifdef BSD
 #include </usr/include/stdio.h>
 #else
 #include <stdio.h>
 #endif
+#include <math.h>
 #include <stdlib.h>
 #include <string.h>
 
 
 int
-DEFUN(main, (argc, argv), int argc AND char **argv)
+main (int argc, char **argv)
 {
   char buf[BUFSIZ];
   FILE *in = stdin, *out = stdout;
   int x;
+  int result = 0;
 
   if (sscanf ("0", "%d", &x) != 1)
-    exit (EXIT_FAILURE);
+    {
+      fputs ("test failed!\n", stdout);
+      result = 1;
+    }
+
+  if (sscanf ("08905x", "%9[0-9]", buf) != 1
+      || strcmp (buf, "08905") != 0)
+    {
+      fputs ("test failed!\n", stdout);
+      result = 1;
+    }
+
+  if (sscanf ("", "%10[a-z]", buf) != EOF)
+    {
+      fputs ("test failed!\n", stdout);
+      result = 1;
+    }
 
   sscanf ("conversion] Zero flag Ze]ro#\n", "%*[^]] %[^#]\n", buf);
   if (strcmp (buf, "] Zero flag Ze]ro") != 0)
     {
-      fputs ("test failed!", stderr);
-      return 1;
+      fputs ("test failed!\n", stdout);
+      result = 1;
     }
 
   if (argc == 2 && !strcmp (argv[1], "-opipe"))
@@ -49,13 +66,18 @@ DEFUN(main, (argc, argv), int argc AND char **argv)
       if (out == NULL)
        {
          perror ("popen: /bin/cat");
-         exit (EXIT_FAILURE);
+         result = 1;
        }
     }
   else if (argc == 3 && !strcmp (argv[1], "-ipipe"))
     {
       sprintf (buf, "/bin/cat %s", argv[2]);
       in = popen (buf, "r");
+      if (in == NULL)
+       {
+         perror ("popen: /bin/cat");
+         result = 1;
+       }
     }
 
   {
@@ -64,6 +86,11 @@ DEFUN(main, (argc, argv), int argc AND char **argv)
             "sscanf (\"thompson\", \"%%s\", name) == %d, name == \"%s\"\n",
             sscanf ("thompson", "%s", name),
             name);
+    if (strcmp (name, "thompson") != 0)
+      {
+       fputs ("test failed!\n", stdout);
+       result = 1;
+      }
   }
 
   fputs ("Testing scanf (vfscanf)\n", out);
@@ -76,8 +103,18 @@ DEFUN(main, (argc, argv), int argc AND char **argv)
     n = fscanf (in, "%d%f%s", &i, &x, name);
     fprintf (out, "n = %d, i = %d, x = %f, name = \"%.50s\"\n",
             n, i, x, name);
+    if (n != 3 || i != 25 || x != 5.432F || strcmp (name, "thompson"))
+      {
+       fputs ("test failed!\n", stdout);
+       result = 1;
+      }
   }
   fprintf (out, "Residual: \"%s\"\n", fgets (buf, sizeof (buf), in));
+  if (strcmp (buf, "\n"))
+    {
+      fputs ("test failed!\n", stdout);
+      result = 1;
+    }
   fputs ("Test 2:\n", out);
   {
     int i;
@@ -85,27 +122,235 @@ DEFUN(main, (argc, argv), int argc AND char **argv)
     char name[50];
     (void) fscanf (in, "%2d%f%*d %[0123456789]", &i, &x, name);
     fprintf (out, "i = %d, x = %f, name = \"%.50s\"\n", i, x, name);
+    if (i != 56 || x != 789.0F || strcmp (name, "56"))
+      {
+       fputs ("test failed!\n", stdout);
+       result = 1;
+      }
   }
   fprintf (out, "Residual: \"%s\"\n", fgets (buf, sizeof (buf), in));
+  if (strcmp (buf, "a72\n"))
+    {
+      fputs ("test failed!\n", stdout);
+      result = 1;
+    }
   fputs ("Test 3:\n", out);
   {
+    static struct {
+      int count;
+      float quant;
+      const char *units;
+      const char *item;
+    } ok[] = {
+      { 3, 2.0F, "quarts", "oil" },
+      { 2, -12.8F, "degrees", "" },
+      { 0, 0.0F, "", "" },
+      { 3, 10.0F, "LBS", "fertilizer" },
+      { 3, 100.0F, "rgs", "energy" },
+      { -1, 0.0F, "", "" }};
+    size_t rounds = 0;
     float quant;
     char units[21], item[21];
     while (!feof (in) && !ferror (in))
       {
        int count;
+
+       if (rounds++ >= array_length (ok))
+         {
+           fputs ("test failed!\n", stdout);
+           result = 1;
+         }
+
        quant = 0.0;
        units[0] = item[0] = '\0';
        count = fscanf (in, "%f%20s of %20s", &quant, units, item);
        (void) fscanf (in, "%*[^\n]");
        fprintf (out, "count = %d, quant = %f, item = %.21s, units = %.21s\n",
                 count, quant, item, units);
+       if (count != ok[rounds-1].count || quant != ok[rounds-1].quant
+           || strcmp (item, ok[rounds-1].item)
+           || strcmp (units, ok[rounds-1].units))
+         {
+           fputs ("test failed!\n", stdout);
+           result = 1;
+         }
       }
   }
+  buf[0] = '\0';
   fprintf (out, "Residual: \"%s\"\n", fgets (buf, sizeof (buf), in));
+  if (strcmp (buf, ""))
+    {
+      fputs ("test failed!\n", stdout);
+      result = 1;
+    }
 
   if (out != stdout)
     pclose (out);
 
-  exit(EXIT_SUCCESS);
+  fputs ("Test 4:\n", out);
+  {
+    int res, val, n;
+
+    res = sscanf ("-242", "%3o%n", &val, &n);
+    printf ("res = %d, val = %d, n = %d\n", res, val, n);
+    if (res != 1 || val != -20 || n != 3)
+      {
+       fputs ("test failed!\n", stdout);
+       result = 1;
+      }
+  }
+
+  fputs ("Test 5:\n", out);
+  {
+    double a = 0, b = 0;
+    int res, n;
+
+    res = sscanf ("1234567", "%3lg%3lg%n", &a, &b, &n);
+    printf ("res = %d, a = %g, b = %g, n = %d\n", res, a, b, n);
+
+    if (res != 2 || a != 123 || b != 456 || n != 6)
+      {
+       fputs ("test failed!\n", stdout);
+       result = 1;
+      }
+
+    res = sscanf ("0", "%lg", &a);
+    printf ("res = %d, a = %g\n", res, a);
+
+    if (res != 1 || a != 0)
+      {
+       fputs ("test failed!\n", stdout);
+       result = 1;
+      }
+
+    res = sscanf ("1e3", "%lg%n", &a, &n);
+    printf ("res = %d, a = %g, n = %d\n", res, a, n);
+
+    if (res != 1 || a != 1000 || n != 3)
+      {
+       fputs ("test failed!\n", stdout);
+       result = 1;
+      }
+  }
+
+  fputs ("Test 6:\n", stdout);
+  {
+    char *p = (char *) -1;
+    int res;
+
+    sprintf (buf, "%p", NULL);
+    res = sscanf (buf, "%p", &p);
+    printf ("sscanf (\"%s\", \"%%p\", &p) = %d, p == %p\n", buf, res, p);
+
+    if (res != 1 || p != NULL)
+      {
+       fputs ("test failed!\n", stdout);
+       result = 1;
+      }
+  }
+
+  fputs ("Test 7:\n", stdout);
+  {
+    short a[2] = { -1, -1 };
+    int res;
+
+    res = sscanf ("32767 1234", "%hd %hd", &a[0], &a[1]);
+    printf ("res = %d, a[0] = %d, a[1] = %d\n", res, a[0], a[1]);
+
+    if (res != 2 || a[0] != 32767 || a[1] != 1234)
+      {
+       fputs ("test failed!\n", stdout);
+       result = 1;
+      }
+  }
+
+  fputs ("Test 8:\n", stdout);
+  {
+    double d = 123456.789;
+    int res;
+
+    res = sscanf ("0x1234", "%lf", &d);
+    printf ("res = %d, d = %f\n", res, d);
+
+    if (res != 1 || d != 4660)
+      {
+       fputs ("test failed!\n", stdout);
+       result = 1;
+      }
+  }
+
+  fputs ("Test 9:\n", stdout);
+  {
+    /* From PR libc/1313 reported by Ben Caradoc-Davies <bmcd@physics.otago.ac.nz>.  */
+    float value;
+    int res;
+
+    res = sscanf ("0123", "%2f", &value);
+    if (res != 1 || value != 1.0)
+      {
+       fputs ("test failed!\n", stdout);
+       result = 1;
+      }
+  }
+
+  fputs ("Test 10:\n", stdout);
+  {
+    float value;
+    int res;
+
+    res = sscanf ("--", "%f", &value);
+    if (res != 0)
+      {
+       fputs ("test failed!\n", stdout);
+       result = 1;
+      }
+  }
+
+  fputs ("Test 11:\n", stdout);
+  {
+    char uart[50];
+    int res;
+
+    res = sscanf ("uart:16550A tx:0", "uart:%31s tx:%*u", uart);
+    if (res != 1)
+      {
+       fputs ("test failed!\n", stdout);
+       result = 1;
+      }
+  }
+
+  fputs ("Test 12:\n", stdout);
+  {
+    char uart[50];
+    int res;
+
+    res = sscanf ("uart:16550A", "uart:%31s tx:%*u", uart);
+    if (res != 1)
+      {
+       fputs ("test failed!\n", stdout);
+       result = 1;
+      }
+  }
+
+  fputs ("Test 13:\n", stdout);
+  {
+    float value;
+    int res;
+
+    res = sscanf ("-InF", "%f", &value);
+    if (res != 1 || isinf (value) != -1)
+      {
+       fputs ("test failed!\n", stdout);
+       result = 1;
+      }
+
+    res = sscanf ("+InfiNiTY", "%f", &value);
+    if (res != 1 || isinf (value) != 1)
+      {
+       fputs ("test failed!\n", stdout);
+       result = 1;
+      }
+  }
+
+  return result;
 }