Two fixes:
[platform/upstream/libvorbis.git] / lib / misc.c
1 /********************************************************************
2  *                                                                  *
3  * THIS FILE IS PART OF THE OggVorbis SOFTWARE CODEC SOURCE CODE.   *
4  * USE, DISTRIBUTION AND REPRODUCTION OF THIS SOURCE IS GOVERNED BY *
5  * THE GNU LESSER/LIBRARY PUBLIC LICENSE, WHICH IS INCLUDED WITH    *
6  * THIS SOURCE. PLEASE READ THESE TERMS BEFORE DISTRIBUTING.        *
7  *                                                                  *
8  * THE OggVorbis SOURCE CODE IS (C) COPYRIGHT 1994-2000             *
9  * by Monty <monty@xiph.org> and the XIPHOPHORUS Company            *
10  * http://www.xiph.org/                                             *
11  *                                                                  *
12  ********************************************************************/
13
14 #define HEAD_ALIGN 32
15 #include <pthread.h>
16 #include <stdlib.h>
17 #include <stdio.h>
18 #include "vorbis/codec.h"
19 #define MISC_C
20 #include "misc.h"
21
22 static pthread_mutex_t memlock=PTHREAD_MUTEX_INITIALIZER;
23 void **pointers=NULL;
24 long *insertlist=NULL; /* We can't embed this in the pointer list;
25                           a pointer can have any value... */
26 int ptop=0;
27 int palloced=0;
28 int pinsert=0;
29
30 typedef struct {
31   char *file;
32   long line;
33   long ptr;
34 } head;
35
36 static void *_insert(void *ptr,char *file,long line){
37   ((head *)ptr)->file=file;
38   ((head *)ptr)->line=line;
39   ((head *)ptr)->ptr=pinsert;
40
41   pthread_mutex_lock(&memlock);
42   if(pinsert>=palloced){
43     palloced+=64;
44     if(pointers){
45       pointers=(void **)realloc(pointers,sizeof(void **)*palloced);
46       insertlist=(long *)realloc(insertlist,sizeof(long *)*palloced);
47     }else{
48       pointers=(void **)malloc(sizeof(void **)*palloced);
49       insertlist=(long *)malloc(sizeof(long *)*palloced);
50     }
51   }
52
53   pointers[pinsert]=ptr;
54
55   if(pinsert==ptop)
56     pinsert=++ptop;
57   else
58     pinsert=insertlist[pinsert];
59   
60   pthread_mutex_unlock(&memlock);
61   return(ptr+HEAD_ALIGN);
62 }
63
64 static void _ripremove(void *ptr){
65   int insert;
66   pthread_mutex_lock(&memlock);
67   insert=((head *)ptr)->ptr;
68   insertlist[insert]=pinsert;
69   pinsert=insert;
70   pointers[insert]=NULL;
71   pthread_mutex_unlock(&memlock);
72 }
73
74 void _VDBG_dump(void){
75   int i;
76   pthread_mutex_lock(&memlock);
77   for(i=0;i<ptop;i++){
78     head *ptr=pointers[i];
79     if(ptr)
80       fprintf(stderr,"unfreed bytes from %s:%ld\n",
81               ptr->file,ptr->line);
82   }
83
84   pthread_mutex_unlock(&memlock);
85 }
86
87 extern void *_VDBG_malloc(void *ptr,long bytes,char *file,long line){
88   bytes+=HEAD_ALIGN;
89   if(ptr){
90     ptr-=HEAD_ALIGN;
91     _ripremove(ptr);
92     ptr=realloc(ptr,bytes);
93   }else{
94     ptr=malloc(bytes);
95     memset(ptr,0,bytes);
96   }
97   return _insert(ptr,file,line);
98 }
99
100 extern void _VDBG_free(void *ptr,char *file,long line){
101   if(ptr){
102     ptr-=HEAD_ALIGN;
103     _ripremove(ptr);
104     free(ptr);
105   }
106 }
107