系统级编程lab7 第七次实验 四川大学 内存管理

#include 
#include 
#include “debugmalloc.h“
#include “dmhelper.h“
#include 



#define CHECKSUM_PL（pptr）		*（（int*）（pptr） - 5）
#define LINENUMB_PL（pptr）		*（（int*）（pptr） - 4）
#define SIZE_PL（pptr）			*（（int*）（pptr） - 3）
#define FIFENAME_PL（pptr）       *（（int*）（pptr） - 2）
#define FSTFENCE_PL（pptr）		*（（int*）（pptr） - 1）
                //payload pointer       
#define ENDFENCE_PL（pptrsize）	*（int*）（（char*）（pptr） + （size）） 



//dual list node
typedef struct DuLNode{
	void * pptr;  //PayloadPoinTeR
	struct DuLNode * prior;
	struct DuLNode * next;
}DuLNode DuLList;




DuLList list = {NULL NULL NULL};
int allocated_size = 0;



DuLNode* get_last_node（DuLList *L）
{
	DuLNode* temp = L;
	while（temp->next != NULL）
		temp = temp->next;
	return temp;
}


DuLNode* get_specify_node（DuLList *L void* e）
{
	DuLNode* temp = L;
	
	
	while（temp->pptr != e）
		temp = temp->next;
	if（temp->pptr != e）
		return NULL;
	else
		return temp;
}


int  insert_node（DuLList* L void* e）
{
	DuLNode* new_node;
	DuLNode* last = get_last_node（L）;
	
	if（!（new_node = （DuLNode*）malloc（sizeof（DuLNode））））
		return 0;
	new_node->pptr = e;
	new_node->prior = last;  new_node->next = NULL;
	last->next = new_node;
	
	
	return 1;
}



int delete_node（DuLList* L void* e）
{
	DuLNode* specify;
	if（NULL != （specify = get_specify_node（L e）））
	{
		
		
		specify->prior->next = specify->next;
		if（specify->next != NULL）
			specify->next->prior = specify->prior;
		free（specify）;
		return 1;
	}
	
	return 0;
}



//mprt: MallocPoinTeR
void initialize_raw_memory（void* mptr int sizechar *filenameint linenumber）
{
	*（int*）mptr = （int）linenumber + （int）filename + （int）size;//checksum
	*（（int*）mptr+1） = linenumber; 
	*（（int*）mptr+2） = size;
	*（（int*）mptr+3） = （int）filename;
	*（（int*）mptr+4） = 0xCCDEADCC; //start fence
	*（int*）（（char*）mptr + size + 20） = 0xCCDEADCC; //end fence;
}


//pprt: PayloadPoinTeR
void error_check（void* pptr char *filename_free int linenumber_free）
{
	DuLNode* node = list.next;
	int size = SIZE_PL（pptr）;
	int checksum =  LINENUMB_PL（pptr） + SIZE_PL（pptr） + FIFENAME_PL（pptr）;

	while（node != NULL）{
		if（node->pptr == pptr）
			break;
		node = node->next;
	}
	if（node == NULL）		
		error（4 filename_free