|
Packit |
5c3484 |
/* Test mpq_inp_str.
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
Copyright 2001, 2002 Free Software Foundation, Inc.
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
This file is part of the GNU MP Library test suite.
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
The GNU MP Library test suite is free software; you can redistribute it
|
|
Packit |
5c3484 |
and/or modify it under the terms of the GNU General Public License as
|
|
Packit |
5c3484 |
published by the Free Software Foundation; either version 3 of the License,
|
|
Packit |
5c3484 |
or (at your option) any later version.
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
The GNU MP Library test suite is distributed in the hope that it will be
|
|
Packit |
5c3484 |
useful, but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
Packit |
5c3484 |
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General
|
|
Packit |
5c3484 |
Public License for more details.
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
You should have received a copy of the GNU General Public License along with
|
|
Packit |
5c3484 |
the GNU MP Library test suite. If not, see https://www.gnu.org/licenses/. */
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
#include "config.h"
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
#include <stdio.h>
|
|
Packit |
5c3484 |
#include <stdlib.h>
|
|
Packit |
5c3484 |
#include <string.h>
|
|
Packit |
5c3484 |
#if HAVE_UNISTD_H
|
|
Packit |
5c3484 |
#include <unistd.h> /* for unlink */
|
|
Packit |
5c3484 |
#endif
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
#include "gmp.h"
|
|
Packit |
5c3484 |
#include "gmp-impl.h"
|
|
Packit |
5c3484 |
#include "tests.h"
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
#define FILENAME "t-inp_str.tmp"
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
void
|
|
Packit |
5c3484 |
check_data (void)
|
|
Packit |
5c3484 |
{
|
|
Packit |
5c3484 |
static const struct {
|
|
Packit |
5c3484 |
const char *inp;
|
|
Packit |
5c3484 |
int base;
|
|
Packit |
5c3484 |
const char *want;
|
|
Packit |
5c3484 |
int want_nread;
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
} data[] = {
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
{ "0", 10, "0", 1 },
|
|
Packit |
5c3484 |
{ "0/1", 10, "0", 3 },
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
{ "0/", 10, "0", 0 },
|
|
Packit |
5c3484 |
{ "/123", 10, "0", 0 },
|
|
Packit |
5c3484 |
{ "blah", 10, "0", 0 },
|
|
Packit |
5c3484 |
{ "123/blah", 10, "0", 0 },
|
|
Packit |
5c3484 |
{ "5 /8", 10, "5", 1 },
|
|
Packit |
5c3484 |
{ "5/ 8", 10, "0", 0 },
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
{ "ff", 16, "255", 2 },
|
|
Packit |
5c3484 |
{ "-ff", 16, "-255", 3 },
|
|
Packit |
5c3484 |
{ "FF", 16, "255", 2 },
|
|
Packit |
5c3484 |
{ "-FF", 16, "-255", 3 },
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
{ "z", 36, "35", 1 },
|
|
Packit |
5c3484 |
{ "Z", 36, "35", 1 },
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
{ "0x0", 0, "0", 3 },
|
|
Packit |
5c3484 |
{ "0x10", 0, "16", 4 },
|
|
Packit |
5c3484 |
{ "-0x0", 0, "0", 4 },
|
|
Packit |
5c3484 |
{ "-0x10", 0, "-16", 5 },
|
|
Packit |
5c3484 |
{ "-0x10/5", 0, "-16/5", 7 },
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
{ "00", 0, "0", 2 },
|
|
Packit |
5c3484 |
{ "010", 0, "8", 3 },
|
|
Packit |
5c3484 |
{ "-00", 0, "0", 3 },
|
|
Packit |
5c3484 |
{ "-010", 0, "-8", 4 },
|
|
Packit |
5c3484 |
};
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
mpq_t got, want;
|
|
Packit |
5c3484 |
long ftell_nread;
|
|
Packit |
5c3484 |
int i, post, j, got_nread;
|
|
Packit |
5c3484 |
FILE *fp;
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
mpq_init (got);
|
|
Packit |
5c3484 |
mpq_init (want);
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
for (i = 0; i < numberof (data); i++)
|
|
Packit |
5c3484 |
{
|
|
Packit |
5c3484 |
for (post = 0; post <= 2; post++)
|
|
Packit |
5c3484 |
{
|
|
Packit |
5c3484 |
mpq_set_str_or_abort (want, data[i].want, 0);
|
|
Packit |
5c3484 |
MPQ_CHECK_FORMAT (want);
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
fp = fopen (FILENAME, "w+");
|
|
Packit |
5c3484 |
ASSERT_ALWAYS (fp != NULL);
|
|
Packit |
5c3484 |
fputs (data[i].inp, fp);
|
|
Packit |
5c3484 |
for (j = 0; j < post; j++)
|
|
Packit |
5c3484 |
putc (' ', fp);
|
|
Packit |
5c3484 |
fflush (fp);
|
|
Packit |
5c3484 |
ASSERT_ALWAYS (! ferror(fp));
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
rewind (fp);
|
|
Packit |
5c3484 |
got_nread = mpq_inp_str (got, fp, data[i].base);
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
if (got_nread != 0)
|
|
Packit |
5c3484 |
{
|
|
Packit |
5c3484 |
ftell_nread = ftell (fp);
|
|
Packit |
5c3484 |
if (got_nread != ftell_nread)
|
|
Packit |
5c3484 |
{
|
|
Packit |
5c3484 |
printf ("mpq_inp_str nread wrong\n");
|
|
Packit |
5c3484 |
printf (" inp \"%s\"\n", data[i].inp);
|
|
Packit |
5c3484 |
printf (" base %d\n", data[i].base);
|
|
Packit |
5c3484 |
printf (" got_nread %d\n", got_nread);
|
|
Packit |
5c3484 |
printf (" ftell_nread %ld\n", ftell_nread);
|
|
Packit |
5c3484 |
abort ();
|
|
Packit |
5c3484 |
}
|
|
Packit |
5c3484 |
}
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
if (post == 0 && data[i].want_nread == strlen(data[i].inp))
|
|
Packit |
5c3484 |
{
|
|
Packit |
5c3484 |
int c = getc(fp);
|
|
Packit |
5c3484 |
if (c != EOF)
|
|
Packit |
5c3484 |
{
|
|
Packit |
5c3484 |
printf ("mpq_inp_str didn't read to EOF\n");
|
|
Packit |
5c3484 |
printf (" inp \"%s\"\n", data[i].inp);
|
|
Packit |
5c3484 |
printf (" base %d\n", data[i].base);
|
|
Packit |
5c3484 |
printf (" c '%c' %#x\n", c, c);
|
|
Packit |
5c3484 |
abort ();
|
|
Packit |
5c3484 |
}
|
|
Packit |
5c3484 |
}
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
if (got_nread != data[i].want_nread)
|
|
Packit |
5c3484 |
{
|
|
Packit |
5c3484 |
printf ("mpq_inp_str nread wrong\n");
|
|
Packit |
5c3484 |
printf (" inp \"%s\"\n", data[i].inp);
|
|
Packit |
5c3484 |
printf (" base %d\n", data[i].base);
|
|
Packit |
5c3484 |
printf (" got_nread %d\n", got_nread);
|
|
Packit |
5c3484 |
printf (" want_nread %d\n", data[i].want_nread);
|
|
Packit |
5c3484 |
abort ();
|
|
Packit |
5c3484 |
}
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
MPQ_CHECK_FORMAT (got);
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
if (! mpq_equal (got, want))
|
|
Packit |
5c3484 |
{
|
|
Packit |
5c3484 |
printf ("mpq_inp_str wrong result\n");
|
|
Packit |
5c3484 |
printf (" inp \"%s\"\n", data[i].inp);
|
|
Packit |
5c3484 |
printf (" base %d\n", data[i].base);
|
|
Packit |
5c3484 |
mpq_trace (" got ", got);
|
|
Packit |
5c3484 |
mpq_trace (" want", want);
|
|
Packit |
5c3484 |
abort ();
|
|
Packit |
5c3484 |
}
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
ASSERT_ALWAYS (fclose (fp) == 0);
|
|
Packit |
5c3484 |
}
|
|
Packit |
5c3484 |
}
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
mpq_clear (got);
|
|
Packit |
5c3484 |
mpq_clear (want);
|
|
Packit |
5c3484 |
}
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
int
|
|
Packit |
5c3484 |
main (void)
|
|
Packit |
5c3484 |
{
|
|
Packit |
5c3484 |
tests_start ();
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
check_data ();
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
unlink (FILENAME);
|
|
Packit |
5c3484 |
tests_end ();
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
exit (0);
|
|
Packit |
5c3484 |
}
|