使用纯C语言实现异常处理

#include <malloc.h> #include <string.h> #include <stdio.h> #include <stdlib.h> #include "excp.h" static char* excp_get_msg(void); static excpt_t* excp_get_excption(void); int excp_create(excpt_list_t* pel) { pel->excp_ptr = NULL; return 0; } void excp_set_try(void) { int stat = 0; excpt_event_t* pev; pev = (excpt_event_t*)malloc(sizeof(excpt_event_t)); if(stat != 0){ printf("Set Try Error.\n"); return; } memset(pev, 0, sizeof(excpt_event_t)); pev->prev = excp_list.excp_ptr; excp_list.excp_ptr = pev; } void excp_clear(void) { excpt_event_t* ev; if (excp_list.excp_ptr) { ev = excp_list.excp_ptr; excp_list.excp_ptr = excp_list.excp_ptr->prev; free(ev->excpt.msg); free(ev); } } void excp_throw(int type, const char* message, char* file, int line) { int stat = 0; int len = 0; int size = 0; #ifndef NOEBUG char buf[100]; #endif #ifndef NOEBUG if(type == 0){ return; } sprintf(buf, MESSAGE_FORMAT, file, line); len = strlen(buf); #endif if(excp_list.excp_ptr == NULL || (excp_list.excp_ptr && excp_list.excp_ptr->excpt.msg != NULL)){ return; } size = strlen(message) + len +1; excp_msg = (char*)malloc(sizeof(char) * EXCP_DEF_MSG_LEN); if(excp_msg == NULL){ printf("Throw Error.\n"); return; } #ifndef NDEBUG strcpy(excp_msg, buf); strcat(excp_msg, message); #else strcpy(excp_msg, message); #endif if (excp_list.excp_ptr) { excp_list.excp_ptr->excpt.type = type; excp_list.excp_ptr->excpt.msg = excp_msg; excp_list.excp_ptr->excpt.srcfile = file; excp_list.excp_ptr->excpt.line = line; excp_list.excp_ptr->ev_idx = evThrow; longjmp(excp_list.excp_ptr->buf, evThrow); } else { fprintf(stderr, excp_msg); //abort(); } } void excp_throw_again(void) { excpt_t e; if (excp_list.excp_ptr) { e = excp_list.excp_ptr->excpt; if (excp_list.excp_ptr->prev) { excp_clear(); excp_list.excp_ptr->excpt = e; longjmp(excp_list.excp_ptr->buf, evThrow); } else { fprintf(stderr, excp_msg); abort(); } } } int excp_get_error(int type) { if (excp_list.excp_ptr->ev_idx == evThrow && (type == EXCEPT_ALL || type == excp_list.excp_ptr->excpt.type)) { excp_list.excp_ptr->ev_idx = evExcept; return 1; } return 0; } void excp_set_end(void) { if (excp_list.excp_ptr && excp_list.excp_ptr->ev_idx == evThrow){ excp_throw_again(); } excp_clear(); } jmp_buf* excp_get_buf(void) { return &excp_list.excp_ptr->buf; } int excp_set_num(int idx) { excp_list.excp_ptr->ev_idx = idx; return excp_list.excp_ptr->ev_idx; } static char* excp_get_msg(void) { return excp_msg; } // 获取当前异常结构 static excpt_t* excp_get_excption(void) { return &excp_list.excp_ptr->excpt; } static void fun(void* p){ if(p == NULL) Throw(1, "这个指针是空的呀！！！"); else printf("神马都是浮云！\n"); } int main(){ void* p = NULL; Try{ fun(p); } OnExcept(1){ printf("%s\n", Message); } Finally{ printf("这个指针是空的我有啥用呀？\n"); } return 0; }