92 lines
2.1 KiB
Mathematica
92 lines
2.1 KiB
Mathematica
|
// 4 december 2014
|
||
|
|
#import <stdlib.h>
|
||
|
|
#import "uipriv_darwin.h"
|
||
|
|
|
||
|
|
NSMutableArray *allocations;
|
||
|
|
NSMutableArray *delegates;
|
||
|
|
|
||
|
|
void initAlloc(void)
|
||
|
|
{
|
||
|
|
allocations = [NSMutableArray new];
|
||
|
|
delegates = [NSMutableArray new];
|
||
|
|
}
|
||
|
|
|
||
|
|
#define UINT8(p) ((uint8_t *) (p))
|
||
|
|
#define PVOID(p) ((void *) (p))
|
||
|
|
#define EXTRA (sizeof (size_t) + sizeof (const char **))
|
||
|
|
#define DATA(p) PVOID(UINT8(p) + EXTRA)
|
||
|
|
#define BASE(p) PVOID(UINT8(p) - EXTRA)
|
||
|
|
#define SIZE(p) ((size_t *) (p))
|
||
|
|
#define CCHAR(p) ((const char **) (p))
|
||
|
|
#define TYPE(p) CCHAR(UINT8(p) + sizeof (size_t))
|
||
|
|
|
||
|
|
void uninitAlloc(void)
|
||
|
|
{
|
||
|
|
if ([allocations count] == 0) {
|
||
|
|
NSUInteger i;
|
||
|
|
|
||
|
|
for (i = 0; i < [delegates count]; i++)
|
||
|
|
[[delegates objectAtIndex:i] release];
|
||
|
|
[delegates release];
|
||
|
|
[allocations release];
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
fprintf(stderr, "[libui] leaked allocations:\n");
|
||
|
|
[allocations enumerateObjectsUsingBlock:^(id obj, NSUInteger index, BOOL *stop) {
|
||
|
|
NSValue *v;
|
||
|
|
void *ptr;
|
||
|
|
|
||
|
|
v = (NSValue *) obj;
|
||
|
|
ptr = [v pointerValue];
|
||
|
|
fprintf(stderr, "[libui] %p %s\n", ptr, *TYPE(ptr));
|
||
|
|
}];
|
||
|
|
complain("either you left something around or there's a bug in libui");
|
||
|
|
}
|
||
|
|
|
||
|
|
void *uiAlloc(size_t size, const char *type)
|
||
|
|
{
|
||
|
|
void *out;
|
||
|
|
|
||
|
|
out = malloc(EXTRA + size);
|
||
|
|
if (out == NULL) {
|
||
|
|
fprintf(stderr, "memory exhausted in uiAlloc()\n");
|
||
|
|
abort();
|
||
|
|
}
|
||
|
|
memset(DATA(out), 0, size);
|
||
|
|
*SIZE(out) = size;
|
||
|
|
*TYPE(out) = type;
|
||
|
|
[allocations addObject:[NSValue valueWithPointer:out]];
|
||
|
|
return DATA(out);
|
||
|
|
}
|
||
|
|
|
||
|
|
void *uiRealloc(void *p, size_t new, const char *type)
|
||
|
|
{
|
||
|
|
void *out;
|
||
|
|
size_t *s;
|
||
|
|
|
||
|
|
if (p == NULL)
|
||
|
|
return uiAlloc(new, type);
|
||
|
|
p = BASE(p);
|
||
|
|
out = realloc(p, EXTRA + new);
|
||
|
|
if (out == NULL) {
|
||
|
|
fprintf(stderr, "memory exhausted in uiRealloc()\n");
|
||
|
|
abort();
|
||
|
|
}
|
||
|
|
s = SIZE(out);
|
||
|
|
if (new <= *s)
|
||
|
|
memset(((uint8_t *) DATA(out)) + *s, 0, new - *s);
|
||
|
|
*s = new;
|
||
|
|
[allocations removeObject:[NSValue valueWithPointer:p]];
|
||
|
|
[allocations addObject:[NSValue valueWithPointer:out]];
|
||
|
|
return DATA(out);
|
||
|
|
}
|
||
|
|
|
||
|
|
void uiFree(void *p)
|
||
|
|
{
|
||
|
|
if (p == NULL)
|
||
|
|
complain("attempt to uiFree(NULL); there's a bug somewhere");
|
||
|
|
p = BASE(p);
|
||
|
|
free(p);
|
||
|
|
[allocations removeObject:[NSValue valueWithPointer:p]];
|
||
|
|
}
|