| Index: gcc/gmp/tests/mpz/t-export.c
|
| diff --git a/gcc/gmp/tests/mpz/t-export.c b/gcc/gmp/tests/mpz/t-export.c
|
| deleted file mode 100644
|
| index f2fb3bd3a7b98616741cff2491a628246d331b2d..0000000000000000000000000000000000000000
|
| --- a/gcc/gmp/tests/mpz/t-export.c
|
| +++ /dev/null
|
| @@ -1,206 +0,0 @@
|
| -/* Test mpz_export.
|
| -
|
| -Copyright 2002, 2003 Free Software Foundation, Inc.
|
| -
|
| -This file is part of the GNU MP Library.
|
| -
|
| -The GNU MP 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 3 of the License, or (at your
|
| -option) any later version.
|
| -
|
| -The GNU MP 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 MP Library. If not, see http://www.gnu.org/licenses/. */
|
| -
|
| -#include <stdio.h>
|
| -#include <stdlib.h>
|
| -#include <string.h>
|
| -#include "gmp.h"
|
| -#include "gmp-impl.h"
|
| -#include "tests.h"
|
| -
|
| -
|
| -void
|
| -check_data (void)
|
| -{
|
| - static const struct {
|
| - const char *src;
|
| - size_t want_count;
|
| - int order;
|
| - size_t size;
|
| - int endian;
|
| - int nail;
|
| - char want_data[64];
|
| -
|
| - } data[] = {
|
| -
|
| - { "0", 0,1, 1,1, 0 },
|
| - { "0", 0,1, 2,1, 0 },
|
| - { "0", 0,1, 3,1, 0 },
|
| -
|
| - { "0x12345678", 4,1, 1,1, 0, { '\022', '\064', '\126', '\170' } },
|
| - { "0x12345678", 1,1, 4,1, 0, { '\022', '\064', '\126', '\170' } },
|
| - { "0x12345678", 1,-1, 4,1, 0, { '\022', '\064', '\126', '\170' } },
|
| -
|
| - { "0x12345678", 4,-1, 1,-1, 0, { '\170', '\126', '\064', '\022' } },
|
| - { "0x12345678", 1,1, 4,-1, 0, { '\170', '\126', '\064', '\022' } },
|
| - { "0x12345678", 1,-1, 4,-1, 0, { '\170', '\126', '\064', '\022' } },
|
| -
|
| - { "0x15", 5,1, 1,1, 7, { '\001', '\000', '\001', '\000', '\001' } },
|
| -
|
| - { "0x1FFFFFFFFFFF", 3,1, 2,1, 1, {
|
| - '\177','\377', '\177','\377', '\177','\377' } },
|
| - { "0x1FFFFFFFFFFF", 3,1, 2,-1, 1, {
|
| - '\377','\177', '\377','\177', '\377','\177' } },
|
| - { "0x7", 3,1, 2,1, 15, {
|
| - '\000','\001', '\000','\001', '\000','\001' } },
|
| - { "0x7", 3,1, 2,-1, 15, {
|
| - '\001','\000', '\001','\000', '\001','\000' } },
|
| -
|
| - { "0x24", 3,1, 2,1, 14, { '\000','\002', '\000','\001', '\000','\000' }},
|
| - { "0x24", 3,1, 2,-1, 14, { '\002','\000', '\001','\000', '\000','\000' }},
|
| - { "0x24", 3,-1, 2,-1, 14, { '\000','\000', '\001','\000', '\002','\000' }},
|
| - { "0x24", 3,-1, 2,1, 14, { '\000','\000', '\000','\001', '\000','\002' }},
|
| -
|
| - { "0x123456789ABC", 3,1, 2,1, 0, {
|
| - '\022','\064', '\126','\170', '\232','\274' } },
|
| - { "0x123456789ABC", 3,-1, 2,1, 0, {
|
| - '\232','\274', '\126','\170', '\022','\064' } },
|
| - { "0x123456789ABC", 3,1, 2,-1, 0, {
|
| - '\064','\022', '\170','\126', '\274','\232' } },
|
| - { "0x123456789ABC", 3,-1, 2,-1, 0, {
|
| - '\274','\232', '\170','\126', '\064','\022' } },
|
| -
|
| - { "0x112233445566778899AABBCC", 3,1, 4,1, 0,
|
| - { '\021','\042','\063','\104',
|
| - '\125','\146','\167','\210',
|
| - '\231','\252','\273','\314' } },
|
| - { "0x112233445566778899AABBCC", 3,-1, 4,1, 0,
|
| - { '\231','\252','\273','\314',
|
| - '\125','\146','\167','\210',
|
| - '\021','\042','\063','\104' } },
|
| - { "0x112233445566778899AABBCC", 3,1, 4,-1, 0,
|
| - { '\104','\063','\042','\021',
|
| - '\210','\167','\146','\125',
|
| - '\314','\273','\252','\231' } },
|
| - { "0x112233445566778899AABBCC", 3,-1, 4,-1, 0,
|
| - { '\314','\273','\252','\231',
|
| - '\210','\167','\146','\125',
|
| - '\104','\063','\042','\021' } },
|
| -
|
| - { "0x100120023003400450056006700780089009A00AB00BC00C", 3,1, 8,1, 0,
|
| - { '\020','\001','\040','\002','\060','\003','\100','\004',
|
| - '\120','\005','\140','\006','\160','\007','\200','\010',
|
| - '\220','\011','\240','\012','\260','\013','\300','\014' } },
|
| - { "0x100120023003400450056006700780089009A00AB00BC00C", 3,-1, 8,1, 0,
|
| - { '\220','\011','\240','\012','\260','\013','\300','\014',
|
| - '\120','\005','\140','\006','\160','\007','\200','\010',
|
| - '\020','\001','\040','\002','\060','\003','\100','\004' } },
|
| - { "0x100120023003400450056006700780089009A00AB00BC00C", 3,1, 8,-1, 0,
|
| - { '\004','\100','\003','\060','\002','\040','\001','\020',
|
| - '\010','\200','\007','\160','\006','\140','\005','\120',
|
| - '\014','\300','\013','\260','\012','\240','\011','\220' } },
|
| - { "0x100120023003400450056006700780089009A00AB00BC00C", 3,-1, 8,-1, 0,
|
| - { '\014','\300','\013','\260','\012','\240','\011','\220',
|
| - '\010','\200','\007','\160','\006','\140','\005','\120',
|
| - '\004','\100','\003','\060','\002','\040','\001','\020' } },
|
| -
|
| - { "0x155555555555555555555555", 3,1, 4,1, 1,
|
| - { '\125','\125','\125','\125',
|
| - '\052','\252','\252','\252',
|
| - '\125','\125','\125','\125' } },
|
| - { "0x155555555555555555555555", 3,-1, 4,1, 1,
|
| - { '\125','\125','\125','\125',
|
| - '\052','\252','\252','\252',
|
| - '\125','\125','\125','\125' } },
|
| - { "0x155555555555555555555555", 3,1, 4,-1, 1,
|
| - { '\125','\125','\125','\125',
|
| - '\252','\252','\252','\052',
|
| - '\125','\125','\125','\125' } },
|
| - { "0x155555555555555555555555", 3,-1, 4,-1, 1,
|
| - { '\125','\125','\125','\125',
|
| - '\252','\252','\252','\052',
|
| - '\125','\125','\125','\125' } },
|
| - };
|
| -
|
| - char buf[sizeof(data[0].src) + sizeof (mp_limb_t) + 128];
|
| - char *got_data;
|
| - void *ret;
|
| - size_t align, got_count, j;
|
| - int i, error = 0;
|
| - mpz_t src;
|
| -
|
| - mpz_init (src);
|
| -
|
| - for (i = 0; i < numberof (data); i++)
|
| - {
|
| - for (align = 0; align < sizeof (mp_limb_t); align++)
|
| - {
|
| - mpz_set_str_or_abort (src, data[i].src, 0);
|
| - MPZ_CHECK_FORMAT (src);
|
| - got_data = buf + align;
|
| -
|
| - ASSERT_ALWAYS (data[i].want_count * data[i].size + align
|
| - <= sizeof (buf));
|
| -
|
| - memset (got_data, '\0', data[i].want_count * data[i].size);
|
| - ret = mpz_export (got_data, &got_count, data[i].order,
|
| - data[i].size, data[i].endian, data[i].nail, src);
|
| -
|
| - if (ret != got_data)
|
| - {
|
| - printf ("return doesn't equal given pointer\n");
|
| - error = 1;
|
| - }
|
| - if (got_count != data[i].want_count)
|
| - {
|
| - printf ("wrong count\n");
|
| - error = 1;
|
| - }
|
| - if (memcmp (got_data, data[i].want_data, got_count * data[i].size) != 0)
|
| - {
|
| - printf ("wrong result data\n");
|
| - error = 1;
|
| - }
|
| - if (error)
|
| - {
|
| - printf (" at data[%d] align=%d\n", i, (int) align);
|
| - printf (" src \"%s\"\n", data[i].src);
|
| - mpz_trace (" src", src);
|
| - printf (" order=%d size=%lu endian=%d nail=%u\n",
|
| - data[i].order,
|
| - (unsigned long) data[i].size, data[i].endian, data[i].nail);
|
| - printf (" want count %lu\n", (unsigned long) data[i].want_count);
|
| - printf (" got count %lu\n", (unsigned long) got_count);
|
| - printf (" want");
|
| - for (j = 0; j < data[i].want_count*data[i].size; j++)
|
| - printf (" 0x%02X,", (unsigned) (unsigned char) data[i].want_data[j]);
|
| - printf ("\n");
|
| - printf (" got ");
|
| - for (j = 0; j < got_count*data[i].size; j++)
|
| - printf (" 0x%02X,", (unsigned) (unsigned char) got_data[j]);
|
| - printf ("\n");
|
| - abort ();
|
| - }
|
| - }
|
| - }
|
| - mpz_clear (src);
|
| -}
|
| -
|
| -
|
| -int
|
| -main (void)
|
| -{
|
| - tests_start ();
|
| -
|
| - mp_trace_base = -16;
|
| - check_data ();
|
| -
|
| - tests_end ();
|
| - exit (0);
|
| -}
|
|
|