diff options
Diffstat (limited to 'REORG.TODO/stdio-common/tstscanf.c')
| -rw-r--r-- | REORG.TODO/stdio-common/tstscanf.c | 355 |
1 files changed, 355 insertions, 0 deletions
diff --git a/REORG.TODO/stdio-common/tstscanf.c b/REORG.TODO/stdio-common/tstscanf.c new file mode 100644 index 0000000000..50d0f33acf --- /dev/null +++ b/REORG.TODO/stdio-common/tstscanf.c @@ -0,0 +1,355 @@ +/* Copyright (C) 1991-2017 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 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 + Lesser General Public License for more details. + + You should have received a copy of the GNU Lesser General Public + License along with the GNU C Library; if not, see + <http://www.gnu.org/licenses/>. */ + +#ifdef BSD +#include </usr/include/stdio.h> +#else +#include <stdio.h> +#endif +#include <math.h> +#include <stdlib.h> +#include <string.h> + + +int +main (int argc, char **argv) +{ + char buf[BUFSIZ]; + FILE *in = stdin, *out = stdout; + int x; + int result = 0; + + if (sscanf ("0", "%d", &x) != 1) + { + 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!\n", stdout); + result = 1; + } + + if (argc == 2 && !strcmp (argv[1], "-opipe")) + { + out = popen ("/bin/cat", "w"); + if (out == NULL) + { + perror ("popen: /bin/cat"); + 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; + } + } + + { + char name[50]; + fprintf (out, + "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); + + fputs ("Test 1:\n", out); + { + int n, i; + float x; + char name[50]; + 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; + float x; + 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++ >= sizeof (ok) / sizeof (ok[0])) + { + 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); + + 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; +} |