mirror of
https://github.com/fish-shell/fish-shell
synced 2024-12-26 21:03:12 +00:00
94 lines
1.8 KiB
C
94 lines
1.8 KiB
C
/** \file halloc.c
|
|
|
|
A hierarchical memory allocation system. Works just like talloc
|
|
used in Samba, except that an arbitrary block allocated with
|
|
malloc() can be registered to be freed by halloc_free.
|
|
|
|
*/
|
|
|
|
#include "config.h"
|
|
|
|
#include <stdlib.h>
|
|
#include <unistd.h>
|
|
#include <string.h>
|
|
|
|
#include "util.h"
|
|
#include "common.h"
|
|
#include "halloc.h"
|
|
|
|
void *global_context=0;
|
|
|
|
void halloc_util_init()
|
|
{
|
|
global_context = halloc( 0, 0 );
|
|
}
|
|
|
|
void halloc_util_destroy()
|
|
{
|
|
halloc_free( global_context );
|
|
}
|
|
|
|
array_list_t *al_halloc( void *context )
|
|
{
|
|
array_list_t *res = halloc( context, sizeof( array_list_t ) );
|
|
if( !res )
|
|
die_mem();
|
|
al_init( res );
|
|
halloc_register_function( context, (void (*)(void *)) &al_destroy, res );
|
|
return res;
|
|
}
|
|
|
|
string_buffer_t *sb_halloc( void *context )
|
|
{
|
|
string_buffer_t *res = halloc( context, sizeof( string_buffer_t ) );
|
|
if( !res )
|
|
die_mem();
|
|
sb_init( res );
|
|
halloc_register_function( context, (void (*)(void *)) &sb_destroy, res );
|
|
return res;
|
|
}
|
|
|
|
static void halloc_passthrough( void *f )
|
|
{
|
|
void (*func)() = (void (*)() )f;
|
|
func();
|
|
}
|
|
|
|
void halloc_register_function_void( void *context, void (*func)() )
|
|
{
|
|
halloc_register_function( context, &halloc_passthrough, (void *)func );
|
|
}
|
|
|
|
void *halloc_register( void *context, void *data )
|
|
{
|
|
if( !data )
|
|
return 0;
|
|
|
|
halloc_register_function( context, &free, data );
|
|
return data;
|
|
}
|
|
|
|
wchar_t *halloc_wcsdup( void *context, wchar_t *in )
|
|
{
|
|
size_t len=wcslen(in);
|
|
wchar_t *out = halloc( context, sizeof( wchar_t)*(len+1));
|
|
|
|
if( out == 0 )
|
|
{
|
|
die_mem();
|
|
}
|
|
memcpy( out, in, sizeof( wchar_t)*(len+1));
|
|
return out;
|
|
}
|
|
|
|
wchar_t *halloc_wcsndup( void * context, const wchar_t *in, int c )
|
|
{
|
|
wchar_t *res = halloc( context, sizeof(wchar_t)*(c+1) );
|
|
if( res == 0 )
|
|
{
|
|
die_mem();
|
|
}
|
|
wcslcpy( res, in, c );
|
|
res[c] = L'\0';
|
|
return res;
|
|
}
|