00001
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022
00023
00024
00025
00026
00027
00028
00029
00030
00031
00032
00033
00034
00035 #ifndef STACK_ALLOC_H
00036 #define STACK_ALLOC_H
00037
00038 #ifdef USE_ALLOCA
00039 #include <alloca.h>
00040 #endif
00041
00088 #ifdef ENABLE_VALGRIND
00089
00090 #include <valgrind/memcheck.h>
00091
00092 #define ALIGN(stack, size) ((stack) += ((size) - (long)(stack)) & ((size) - 1))
00093
00094 #define PUSH(stack, size, type) (VALGRIND_MAKE_NOACCESS(stack, 1000),ALIGN((stack),sizeof(type)),VALGRIND_MAKE_WRITABLE(stack, ((size)*sizeof(type))),(stack)+=((size)*sizeof(type)),(type*)((stack)-((size)*sizeof(type))))
00095
00096 #define PUSHS(stack, type) (VALGRIND_MAKE_NOACCESS(stack, 1000),ALIGN((stack),sizeof(long)),VALGRIND_MAKE_WRITABLE(stack, (sizeof(type))),(stack)+=(sizeof(type)),(type*)((stack)-(sizeof(type))))
00097
00098 #else
00099
00100 #define ALIGN(stack, size) ((stack) += ((size) - (long)(stack)) & ((size) - 1))
00101
00102 #define PUSH(stack, size, type) (ALIGN((stack),sizeof(type)),(stack)+=((size)*sizeof(type)),(type*)((stack)-((size)*sizeof(type))))
00103
00104 #define PUSHS(stack, type) (ALIGN((stack),sizeof(long)),(stack)+=(sizeof(type)),(type*)((stack)-(sizeof(type))))
00105
00106 #endif
00107
00108 #if defined(VAR_ARRAYS)
00109 #define VARDECL(var)
00110 #define ALLOC(var, size, type) type var[size]
00111 #elif defined(USE_ALLOCA)
00112 #define VARDECL(var) var
00113 #define ALLOC(var, size, type) var = alloca(sizeof(type)*size)
00114 #else
00115 #define VARDECL(var) var
00116 #define ALLOC(var, size, type) var = PUSH(stack, size, type)
00117 #endif
00118
00119
00120 #endif