ref: c8b187f9db503465460d8bafa2d7a758bbcf59ca
dir: /libfreetype/ftexcept.c/
#include <ft2build.h> #include FT_EXCEPT_H FT_BASE_DEF( void ) ft_cleanup_stack_init( FT_CleanupStack stack, FT_Memory memory ) { stack->chunk = &stack->chunk_0; stack->top = stack->chunk->items; stack->limit = stack->top + FT_CLEANUP_CHUNK_SIZE; stack->chunk_0.link = NULL; stack->memory = memory; } FT_BASE_DEF( void ) ft_cleanup_stack_done( FT_CleanupStack stack ) { FT_Memory memory = stack->memory; FT_CleanupChunk chunk, next; for (;;) { chunk = stack->chunk; if ( chunk == &stack->chunk_0 ) break; stack->chunk = chunk->link; FT_Free( chunk, memory ); } stack->memory = NULL; } FT_BASE_DEF( void ) ft_cleanup_stack_push( FT_CleanupStack stack, FT_Pointer item, FT_CleanupFunc item_func, FT_Pointer item_data ) { FT_CleanupItem top; FT_ASSERT( stack && stack->chunk && stack->top ); FT_ASSERT( item && item_func ); top = stack->top; top->item = item; top->item_func = item_func; top->item_data = item_data; top ++; if ( top == stack->limit ) { FT_CleanupChunk chunk; chunk = FT_QAlloc( sizeof(*chunk), stack->memory ); chunk->link = stack->chunk; stack->chunk = chunk; stack->limit = chunk->items + FT_CLEANUP_CHUNK_SIZE; top = chunk->items; } stack->top = top; } FT_BASE_DEF( void ) ft_cleanup_stack_pop( FT_CleanupStack stack, FT_Int destroy ) { FT_CleanupItem top; FT_ASSERT( stack && stack->chunk && stack->top ); top = stack->top; if ( top == stack->chunk->items ) { FT_CleanupChunk chunk; chunk = stack->chunk; if ( chunk == &stack->chunk_0 ) { FT_ERROR(( "cleanup.pop: empty cleanup stack !!\n" )); ft_cleanup_throw( stack, FT_Err_EmptyCleanupStack ); } chunk = chunk->link; FT_QFree( stack->chunk, stack->memory ); stack->chunk = chunk; stack->limit = chunk->items + FT_CLEANUP_CHUNK_SIZE; top = stack->limit; } top --; if ( destroy ) top->item_func( top->item, top->item_data ); top->item = NULL; top->item_func = NULL; top->item_data = NULL; stack->top = top; } FT_BASE_DEF( FT_CleanupItem ) ft_cleanup_stack_peek( FT_CleanupStack stack ) { FT_CleanupItem top; FT_CleanupChunk chunk; FT_ASSERT( stack && stack->chunk && stack->top ); top = stack->top; chunk = stack->chunk; if ( top > chunk->items ) top--; else { chunk = chunk->link; top = NULL; if ( chunk != NULL ) top = chunk->items + FT_CLEANUP_CHUNK_SIZE - 1; } return top; } FT_BASE_DEF( void ) ft_xhandler_enter( FT_XHandler xhandler, FT_Memory memory ) { FT_CleanupStack stack = FT_MEMORY__CLEANUP(memory); xhandler->previous = stack->xhandler; xhandler->cleanup = stack->top; xhandler->error = 0; stack->xhandler = xhandler; } FT_BASE_DEF( void ) ft_xhandler_exit( FT_XHandler xhandler ) { FT_CleanupStack stack = FT_MEMORY__CLEANUP(memory); stack->xhandler = xhandler->previous; xhandler->previous = NULL; xhandler->error = error; xhandler->cleanup = NULL; } FT_BASE_DEF( void ) ft_cleanup_throw( FT_CleanupStack stack, FT_Error error ) { FT_XHandler xhandler = stack->xhandler; if ( xhandler == NULL ) { /* no exception handler was registered. this */ /* means that we have an un-handled exception */ /* the only thing we can do is _PANIC_ and */ /* halt the current program.. */ /* */ FT_ERROR(( "FREETYPE PANIC: An un-handled exception occured. Program aborted" )); ft_exit(1); } /* cleanup the stack until we reach the handler's */ /* starting stack location.. */ xhandler->error = error; longmp( xhandler->jump_buffer, 1 ); }