Imported Upstream version 2.9.0
[debian/cc1111] / device / lib / pic16 / libc / stdlib / memfree.c
1 /*
2  * memfree.c - return size of all unallocated heap
3  *
4  * written by Vangelis Rokas <vrokas AT otenet.gr> 2005
5  *
6  * This program is free software; you can redistribute it and/or modify it
7  * under the terms of the GNU General Public License as published by the
8  * Free Software Foundation; either version 2, or (at your option) any
9  * later version.
10  *  
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  * 
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, write to the Free Software
18  * Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
19  * 
20  * In other words, you are welcome to use, share and improve this program.
21  * You are forbidden to forbid anyone else to use, share and improve
22  * what you give them.   Help stamp out software-hoarding!  
23  *
24  * $Id: memfree.c 3835 2005-08-07 20:09:11Z tecodev $
25  */
26
27 #include <malloc.h>
28
29 extern unsigned char _MALLOC_SPEC *heap;
30
31 unsigned int memfree(void)
32 {
33   _malloc_rec _MALLOC_SPEC *pHeap;
34   unsigned int hsize=0;
35   unsigned char bLen;
36   
37   pHeap = (_malloc_rec _MALLOC_SPEC *)&heap;
38   
39   while ((bLen = pHeap->bits.count)) {
40     if(!pHeap->bits.alloc)
41       hsize += bLen - 1;
42     
43     pHeap = (_malloc_rec _MALLOC_SPEC *)((unsigned int)pHeap + bLen);
44   }
45   
46   return (hsize);
47 }