Blame tests/rand/t-urmui.c

Packit 5c3484
/* Test gmp_urandomm_ui.
Packit 5c3484
Packit 5c3484
Copyright 2003, 2005 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 <stdio.h>
Packit 5c3484
#include <stdlib.h>
Packit 5c3484
#include "gmp.h"
Packit 5c3484
#include "gmp-impl.h"
Packit 5c3484
#include "tests.h"
Packit 5c3484
Packit 5c3484
/* Expect numbers generated by rstate to obey the limit requested. */
Packit 5c3484
void
Packit 5c3484
check_one (const char *name, gmp_randstate_ptr rstate)
Packit 5c3484
{
Packit 5c3484
  static const unsigned long  n_table[] = {
Packit 5c3484
    1, 2, 3, 4, 5, 6, 7, 8,
Packit 5c3484
    123, 456, 789,
Packit 5c3484
Packit 5c3484
    255, 256, 257,
Packit 5c3484
    1023, 1024, 1025,
Packit 5c3484
    32767, 32768, 32769,
Packit 5c3484
Packit 5c3484
    ULONG_MAX/2-2, ULONG_MAX/2-1, ULONG_MAX/2, ULONG_MAX/2+1, ULONG_MAX/2+2,
Packit 5c3484
Packit 5c3484
    ULONG_MAX-2, ULONG_MAX-1, ULONG_MAX,
Packit 5c3484
  };
Packit 5c3484
Packit 5c3484
  unsigned long  got, n;
Packit 5c3484
  int    i, j;
Packit 5c3484
Packit 5c3484
  for (i = 0; i < numberof (n_table); i++)
Packit 5c3484
    {
Packit 5c3484
      n = n_table[i];
Packit 5c3484
Packit 5c3484
      for (j = 0; j < 5; j++)
Packit 5c3484
        {
Packit 5c3484
          got = gmp_urandomm_ui (rstate, n);
Packit 5c3484
          if (got >= n)
Packit 5c3484
            {
Packit 5c3484
              printf ("Return value out of range:\n");
Packit 5c3484
              printf ("  algorithm: %s\n", name);
Packit 5c3484
              printf ("  n:     %#lx\n", n);
Packit 5c3484
              printf ("  got:   %#lx\n", got);
Packit 5c3484
              abort ();
Packit 5c3484
            }
Packit 5c3484
        }
Packit 5c3484
    }
Packit 5c3484
}
Packit 5c3484
Packit 5c3484
Packit 5c3484
int
Packit 5c3484
main (int argc, char *argv[])
Packit 5c3484
{
Packit 5c3484
  tests_start ();
Packit 5c3484
Packit 5c3484
  call_rand_algs (check_one);
Packit 5c3484
Packit 5c3484
  tests_end ();
Packit 5c3484
  exit (0);
Packit 5c3484
}