compiler/clib/free.c

   1 /*
   2     Copyright © 1995-2007, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     ANSI C function free().
   6 */
   7
   8 #include "__arosc_privdata.h"
   9 #include "__memalign.h"
  10
  11 #include <exec/memory.h>
  12 #include <proto/exec.h>
  13
  14 /*****************************************************************************
  15
  16     NAME */
  17 #include <stdlib.h>
  18
  19         void free (
  20
  21 /*  SYNOPSIS */
  22         void * memory)
  23
  24 /*  FUNCTION
  25         Return memory allocated with malloc() or a similar function to the
  26         system.
  27
  28     INPUTS
  29         memory - The result of the previous call to malloc(), etc. or
  30                 NULL.
  31
  32     RESULT
  33         None.
  34
  35     NOTES
  36         This function must not be used in a shared library or in a threaded
  37         application.
  38
  39     EXAMPLE
  40
  41     BUGS
  42
  43     SEE ALSO
  44         malloc()
  45
  46     INTERNALS
  47
  48 ******************************************************************************/
  49 {
  50     if (memory)
  51     {
  52         unsigned char *mem;
  53         size_t         size;
  54
  55         mem = ((UBYTE *)memory) - AROS_ALIGN(sizeof(size_t));
  56
  57         size = *((size_t *) mem);
  58         if (size == MEMALIGN_MAGIC)
  59             free(((void **) mem)[-1]);
  60         else {
  61             size += AROS_ALIGN(sizeof(size_t));
  62             FreePooled (__startup_mempool, mem, size);
  63         }
  64     }
  65
  66 } /* free */
  67