tal-reent.c
上传用户:qaz666999
上传日期:2022-08-06
资源大小:2570k
文件大小:2k
源码类别:

数学计算

开发平台:

Unix_Linux

  1. /* TMP_ALLOC routines using malloc in a reentrant fashion.
  2. Copyright 2000, 2001 Free Software Foundation, Inc.
  3. This file is part of the GNU MP Library.
  4. The GNU MP Library is free software; you can redistribute it and/or modify
  5. it under the terms of the GNU Lesser General Public License as published by
  6. the Free Software Foundation; either version 3 of the License, or (at your
  7. option) any later version.
  8. The GNU MP Library is distributed in the hope that it will be useful, but
  9. WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
  10. or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU Lesser General Public
  11. License for more details.
  12. You should have received a copy of the GNU Lesser General Public License
  13. along with the GNU MP Library.  If not, see http://www.gnu.org/licenses/.  */
  14. #include <stdio.h>
  15. #include "gmp.h"
  16. #include "gmp-impl.h"
  17. /* Each TMP_ALLOC uses __gmp_allocate_func to get a block of memory of the
  18.    size requested, plus a header at the start which is used to hold the
  19.    blocks on a linked list in the marker variable, ready for TMP_FREE to
  20.    release.
  21.    Callers should try to do multiple allocs with one call, in the style of
  22.    TMP_ALLOC_LIMBS_2 if it's easy to arrange, since that will keep down the
  23.    number of separate malloc calls.
  24.    Enhancements:
  25.    Could inline both TMP_ALLOC and TMP_FREE, though TMP_ALLOC would need the
  26.    compiler to have "inline" since it returns a value.  The calls to malloc
  27.    will be slow though, so it hardly seems worth worrying about one extra
  28.    level of function call.  */
  29. #define HSIZ   ROUND_UP_MULTIPLE (sizeof (struct tmp_reentrant_t), __TMP_ALIGN)
  30. void *
  31. __gmp_tmp_reentrant_alloc (struct tmp_reentrant_t **markp, size_t size)
  32. {
  33.   char    *p;
  34.   size_t  total_size;
  35. #define P   ((struct tmp_reentrant_t *) p)
  36.   total_size = size + HSIZ;
  37.   p = (*__gmp_allocate_func) (total_size);
  38.   P->size = total_size;
  39.   P->next = *markp;
  40.   *markp = P;
  41.   return p + HSIZ;
  42. }
  43. void
  44. __gmp_tmp_reentrant_free (struct tmp_reentrant_t *mark)
  45. {
  46.   struct tmp_reentrant_t  *next;
  47.   while (mark != NULL)
  48.     {
  49.       next = mark->next;
  50.       (*__gmp_free_func) ((char *) mark, mark->size);
  51.       mark = next;
  52.     }
  53. }