开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 数值算法/人工智能 > 数学计算 > 查看源码
t-export.c
资源名称：gmp-5.0.1.tar.gz　[点击查看]
上传用户：qaz666999
上传日期：2022-08-06
资源大小：2570k
文件大小：7k
源码类别：

数学计算

开发平台：

Unix_Linux

t-export.c：源码内容
  1. /* Test mpz_export.
  3. Copyright 2002, 2003 Free Software Foundation, Inc.
  5. This file is part of the GNU MP Library.
  7. The GNU MP Library is free software; you can redistribute it and/or modify
  8. it under the terms of the GNU Lesser General Public License as published by
  9. the Free Software Foundation; either version 3 of the License, or (at your
  10. option) any later version.
  12. The GNU MP Library is distributed in the hope that it will be useful, but
  13. WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
  14. or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU Lesser General Public
  15. License for more details.
  17. You should have received a copy of the GNU Lesser General Public License
  18. along with the GNU MP Library.  If not, see http://www.gnu.org/licenses/.  */
  20. #include <stdio.h>
  21. #include <stdlib.h>
  22. #include <string.h>
  23. #include "gmp.h"
  24. #include "gmp-impl.h"
  25. #include "tests.h"
  28. void
  29. check_data (void)
  30. {
  31.   static const struct {
  32.     const char  *src;
  33.     size_t      want_count;
  34.     int         order;
  35.     size_t      size;
  36.     int         endian;
  37.     int         nail;
  38.     char        want_data[64];
  40.   } data[] = {
  42.     { "0", 0,1, 1,1, 0 },
  43.     { "0", 0,1, 2,1, 0 },
  44.     { "0", 0,1, 3,1, 0 },
  46.     { "0x12345678", 4,1,  1,1, 0, { '22', '64', '126', '170' } },
  47.     { "0x12345678", 1,1,  4,1, 0, { '22', '64', '126', '170' } },
  48.     { "0x12345678", 1,-1, 4,1, 0, { '22', '64', '126', '170' } },
  50.     { "0x12345678", 4,-1, 1,-1, 0, { '170', '126', '64', '22' } },
  51.     { "0x12345678", 1,1,  4,-1, 0, { '170', '126', '64', '22' } },
  52.     { "0x12345678", 1,-1, 4,-1, 0, { '170', '126', '64', '22' } },
  54.     { "0x15", 5,1,  1,1, 7, { '01', '00', '01', '00', '01' } },
  56.     { "0x1FFFFFFFFFFF", 3,1,  2,1,   1, {
  57. '177','377', '177','377', '177','377' } },
  58.     { "0x1FFFFFFFFFFF", 3,1,  2,-1,  1, {
  59. '377','177', '377','177', '377','177' } },
  60.     { "0x7",            3,1,  2,1,  15, {
  61. '00','01', '00','01', '00','01' } },
  62.     { "0x7",            3,1,  2,-1, 15, {
  63. '01','00', '01','00', '01','00' } },
  65.     { "0x24", 3,1,  2,1,  14, { '00','02', '00','01', '00','00' }},
  66.     { "0x24", 3,1,  2,-1, 14, { '02','00', '01','00', '00','00' }},
  67.     { "0x24", 3,-1, 2,-1, 14, { '00','00', '01','00', '02','00' }},
  68.     { "0x24", 3,-1, 2,1,  14, { '00','00', '00','01', '00','02' }},
  70.     { "0x123456789ABC", 3,1,  2,1,  0, {
  71. '22','64', '126','170', '232','274' } },
  72.     { "0x123456789ABC", 3,-1, 2,1,  0, {
  73. '232','274', '126','170', '22','64' } },
  74.     { "0x123456789ABC", 3,1,  2,-1, 0, {
  75. '64','22', '170','126', '274','232' } },
  76.     { "0x123456789ABC", 3,-1, 2,-1, 0, {
  77. '274','232', '170','126', '64','22' } },
  79.     { "0x112233445566778899AABBCC", 3,1,  4,1,  0,
  80.       { '21','42','63','104',
  81. '125','146','167','210',
  82. '231','252','273','314' } },
  83.     { "0x112233445566778899AABBCC", 3,-1, 4,1,  0,
  84.       { '231','252','273','314',
  85. '125','146','167','210',
  86. '21','42','63','104' } },
  87.     { "0x112233445566778899AABBCC", 3,1,  4,-1, 0,
  88.       { '104','63','42','21',
  89. '210','167','146','125',
  90. '314','273','252','231' } },
  91.     { "0x112233445566778899AABBCC", 3,-1, 4,-1, 0,
  92.       { '314','273','252','231',
  93. '210','167','146','125',
  94. '104','63','42','21' } },
  96.     { "0x100120023003400450056006700780089009A00AB00BC00C", 3,1,  8,1,  0,
  97.       { '20','01','40','02','60','03','100','04',
  98. '120','05','140','06','160','07','200','10',
  99. '220','11','240','12','260','13','300','14' } },
  100.     { "0x100120023003400450056006700780089009A00AB00BC00C", 3,-1, 8,1,  0,
  101.       { '220','11','240','12','260','13','300','14',
  102. '120','05','140','06','160','07','200','10',
  103. '20','01','40','02','60','03','100','04' } },
  104.     { "0x100120023003400450056006700780089009A00AB00BC00C", 3,1,  8,-1, 0,
  105.       { '04','100','03','60','02','40','01','20',
  106. '10','200','07','160','06','140','05','120',
  107. '14','300','13','260','12','240','11','220' } },
  108.     { "0x100120023003400450056006700780089009A00AB00BC00C", 3,-1, 8,-1, 0,
  109.       { '14','300','13','260','12','240','11','220',
  110. '10','200','07','160','06','140','05','120',
  111. '04','100','03','60','02','40','01','20' } },
  113.     { "0x155555555555555555555555", 3,1,  4,1,  1,
  114.       { '125','125','125','125',
  115. '52','252','252','252',
  116. '125','125','125','125' } },
  117.     { "0x155555555555555555555555", 3,-1,  4,1,  1,
  118.       { '125','125','125','125',
  119. '52','252','252','252',
  120. '125','125','125','125' } },
  121.     { "0x155555555555555555555555", 3,1,  4,-1,  1,
  122.       { '125','125','125','125',
  123. '252','252','252','52',
  124. '125','125','125','125' } },
  125.     { "0x155555555555555555555555", 3,-1,  4,-1,  1,
  126.       { '125','125','125','125',
  127. '252','252','252','52',
  128. '125','125','125','125' } },
  129.   };
  131.   char    buf[sizeof(data[0].src) + sizeof (mp_limb_t) + 128];
  132.   char    *got_data;
  133.   void    *ret;
  134.   size_t  align, got_count, j;
  135.   int     i, error = 0;
  136.   mpz_t   src;
  138.   mpz_init (src);
  140.   for (i = 0; i < numberof (data); i++)
  141.     {
  142.       for (align = 0; align < sizeof (mp_limb_t); align++)
  143. {
  144.   mpz_set_str_or_abort (src, data[i].src, 0);
  145.   MPZ_CHECK_FORMAT (src);
  146.   got_data = buf + align;
  148.   ASSERT_ALWAYS (data[i].want_count * data[i].size + align
  149.  <= sizeof (buf));
  151.   memset (got_data, '', data[i].want_count * data[i].size);
  152.   ret = mpz_export (got_data, &got_count, data[i].order,
  153.     data[i].size, data[i].endian, data[i].nail, src);
  155.   if (ret != got_data)
  156.     {
  157.       printf ("return doesn't equal given pointern");
  158.       error = 1;
  159.     }
  160.   if (got_count != data[i].want_count)
  161.     {
  162.       printf ("wrong countn");
  163.       error = 1;
  164.     }
  165.   if (memcmp (got_data, data[i].want_data, got_count * data[i].size) != 0)
  166.     {
  167.       printf ("wrong result datan");
  168.       error = 1;
  169.     }
  170.   if (error)
  171.     {
  172.       printf ("    at data[%d]  align=%dn", i, (int) align);
  173.       printf ("    src "%s"n", data[i].src);
  174.       mpz_trace ("    src", src);
  175.       printf ("    order=%d  size=%lu endian=%d nail=%un",
  176.       data[i].order,
  177.       (unsigned long) data[i].size, data[i].endian, data[i].nail);
  178.       printf ("    want count %lun", (unsigned long) data[i].want_count);
  179.       printf ("    got count  %lun", (unsigned long) got_count);
  180.       printf ("    want");
  181.       for (j = 0; j < data[i].want_count*data[i].size; j++)
  182. printf (" 0x%02X,", (unsigned) (unsigned char) data[i].want_data[j]);
  183.       printf ("n");
  184.       printf ("    got ");
  185.       for (j = 0; j < got_count*data[i].size; j++)
  186. printf (" 0x%02X,", (unsigned) (unsigned char) got_data[j]);
  187.       printf ("n");
  188.       abort ();
  189.     }
  190. }
  191.     }
  192.   mpz_clear (src);
  193. }
  196. int
  197. main (void)
  198. {
  199.   tests_start ();
  201.   mp_trace_base = -16;
  202.   check_data ();
  204.   tests_end ();
  205.   exit (0);
  206. }