516 lines
12 KiB
C
516 lines
12 KiB
C
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <time.h>
|
|
|
|
#ifndef LIST_H
|
|
#define LIST_H
|
|
|
|
typedef struct Node{
|
|
unsigned long long id;//唯一标识符
|
|
void *value;
|
|
int if_malloc;//记录是否已经初始化值
|
|
const char *type;//记录值的类型
|
|
struct Node *next;
|
|
struct Node *last;
|
|
}Node;
|
|
|
|
|
|
typedef struct List{
|
|
unsigned long long id;//唯一标识符
|
|
Node *head;
|
|
Node *tail;
|
|
unsigned long long length;//链表长度
|
|
}List;
|
|
|
|
int safeMode(int ifon);//安全模式确保显式声明过的内存都会被释放
|
|
int releaseSingleListForSafeMode(List *p_list);//释放list_list
|
|
int releaseSingleNodeForSafeMode(List *p_list);//释放node_list
|
|
int releaseAll(void);//安全模式最后调用的函数
|
|
|
|
List *init_list(void);
|
|
Node *init_node(void);
|
|
|
|
int initMallocValue(Node *,const char *,void *);//赋予已分配内存的值，并标明类型
|
|
|
|
/*有关id的函数*/
|
|
void init_rand(void);
|
|
unsigned long long getId(void);
|
|
|
|
/*插入函数*/
|
|
int insertInHead(List *p_list, Node *p_node);
|
|
int insertInTail(List *p_list, Node *p_node);
|
|
|
|
/*交换函数*/
|
|
int exchangeLocation(Node *p_node,Node *t_node);
|
|
|
|
/*复制函数*/
|
|
Node *copyNode(Node *);
|
|
|
|
/*移除函数*/
|
|
int removeById(List *p_list, unsigned long id);
|
|
int removeByNode(List *p_list, Node *p_node);
|
|
int popFromHead(List *p_list);
|
|
int popFromTail(List *p_list);
|
|
|
|
unsigned long long len(List *p_list);//查看链表的长度
|
|
|
|
Node *findById(List *p_list, const unsigned long long id);//通过id查找目标链表中的匹配节点
|
|
Node *findByValue(List *p_list, const char *type, const void *value);//通过值来查找目标链表中的匹配节点
|
|
List *mply_findByValue(List *p_list, const char *type, const void *value);//寻找多个值匹配的节点
|
|
|
|
int releaseList(List *p_list);//释放List并可选择是否释放中所有的其中的Node
|
|
int releaseListForSingle(List *p_list);//单独释放List
|
|
int releaseNode(Node *p_node);//释放Node
|
|
|
|
int isListEmpty(List *p_list);//判断List是否为空
|
|
List *copyList(List *p_list);//复制链表
|
|
|
|
/*有关安全模式的变量*/
|
|
int if_safeMode = 0;
|
|
List *node_list = NULL; //储存声明过的节点.
|
|
List *list_list = NULL; //储存声明过的链表.
|
|
|
|
int safeMode(int ifon){
|
|
if(ifon == 1){
|
|
if (node_list == NULL && list_list == NULL){
|
|
node_list = (List *)malloc(sizeof(List));
|
|
list_list = (List *)malloc(sizeof(List));
|
|
|
|
list_list->head = NULL;
|
|
list_list->length = 0;
|
|
list_list->tail = NULL;
|
|
|
|
node_list->head = NULL;
|
|
node_list->length = 0;
|
|
node_list->tail = NULL;
|
|
|
|
if_safeMode = 1;
|
|
}
|
|
else{
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
return ifon;
|
|
}
|
|
|
|
int releaseSingleListForSafeMode(List *p_list){
|
|
Node *p_node = p_list->head;
|
|
List *plv_node = NULL;
|
|
while(p_node != NULL){
|
|
plv_node = (List *)p_node->value;
|
|
plv_node->id = 0;
|
|
plv_node->head = NULL;
|
|
plv_node->length = 0;
|
|
plv_node->tail = NULL;
|
|
free(plv_node);
|
|
p_node = p_node->next;
|
|
}
|
|
p_list->head = NULL;
|
|
p_list->length = 0;
|
|
p_list->tail = NULL;
|
|
p_list->id = 0;
|
|
free(p_list);
|
|
return 0;
|
|
}
|
|
|
|
int releaseSingleNodeForSafeMode(List *p_list){
|
|
Node *p_node = p_list->head;
|
|
Node *pnv_node = NULL;
|
|
while(p_node != NULL){
|
|
pnv_node = (Node *)p_node->value;
|
|
pnv_node->id = 0;
|
|
pnv_node->if_malloc = 0;
|
|
pnv_node->last = NULL;
|
|
pnv_node->next = NULL;
|
|
pnv_node->type = NULL;
|
|
pnv_node->value = NULL;
|
|
free(pnv_node);
|
|
p_node = p_node->next;
|
|
}
|
|
p_list->id = 0;
|
|
p_list->head = NULL;
|
|
p_list->length = 0;
|
|
p_list->tail = NULL;
|
|
free(p_list);
|
|
return 0;
|
|
}
|
|
|
|
int releaseAll(void){
|
|
if(if_safeMode == 1){
|
|
if_safeMode = 0;
|
|
releaseSingleNodeForSafeMode(node_list);
|
|
releaseSingleListForSafeMode(list_list);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
Node *init_node(void){
|
|
Node *p_node = (Node *) malloc(sizeof(Node));
|
|
p_node->id = getId();
|
|
p_node->if_malloc = 0;
|
|
p_node->next = NULL;
|
|
p_node->last = NULL;
|
|
if(if_safeMode) {
|
|
if_safeMode = 0;
|
|
Node *prec_node = init_node();
|
|
if_safeMode = 1;
|
|
initMallocValue(prec_node, "pointer", (void *)p_node);
|
|
insertInTail(node_list,prec_node);
|
|
}
|
|
return p_node;
|
|
}
|
|
|
|
List *init_list(void){
|
|
List *p_list = (List *) malloc(sizeof(List));
|
|
p_list->id = getId();
|
|
p_list->head = NULL;
|
|
p_list->tail = NULL;
|
|
p_list->length = 0;
|
|
if(if_safeMode){
|
|
if_safeMode = 0;
|
|
Node *p_node = init_node();
|
|
if_safeMode = 1;
|
|
initMallocValue(p_node,"pointer",(void *)p_list);
|
|
insertInTail(list_list,p_node);
|
|
}
|
|
return p_list;
|
|
}
|
|
|
|
int initMallocValue(Node *p_node,const char *type,void *p_value){
|
|
p_node->if_malloc = 1;
|
|
p_node->type = type;
|
|
p_node->value = p_value;
|
|
return 0;
|
|
}
|
|
|
|
void rand_init(void){
|
|
srandom((unsigned)time(NULL));
|
|
}
|
|
|
|
unsigned long long getId(void){
|
|
unsigned long long id = 0;
|
|
id = ((random()%9)+1);
|
|
for(int i = 0; i < 15; i++){
|
|
id *= 10;
|
|
id += random()%10;
|
|
}
|
|
return id;
|
|
}
|
|
|
|
int insertInHead(List *p_list, Node *p_node){
|
|
if( isListEmpty(p_list) ){
|
|
p_list->head = p_node;
|
|
p_list->tail = p_node;
|
|
}
|
|
else{
|
|
p_list->head->last = p_node;
|
|
p_node->last = NULL;
|
|
p_node->next = p_list->head;
|
|
p_list->head = p_node;
|
|
}
|
|
p_list->length += 1;
|
|
return 0;
|
|
}
|
|
|
|
int insertInTail(List *p_list, Node *p_node){
|
|
if( isListEmpty(p_list) ){
|
|
p_list->head = p_node;
|
|
p_list->tail = p_node;
|
|
}
|
|
else{
|
|
p_list->tail->next = p_node;
|
|
p_node->next = NULL;
|
|
p_node->last = p_list->tail;
|
|
p_list->tail = p_node;
|
|
}
|
|
p_list->length += 1;
|
|
return 0;
|
|
}
|
|
|
|
int releaseNode(Node *p_node){
|
|
if(if_safeMode == 1){
|
|
removeByNode(node_list,p_node);
|
|
}
|
|
if(p_node->if_malloc == 1){
|
|
if(strcmp(p_node->type,"pointer")) {
|
|
if(!strcmp(p_node->type, "list")){
|
|
releaseList((List *)p_node->value);
|
|
}
|
|
else{
|
|
free(p_node->value);
|
|
}
|
|
}
|
|
p_node->value = NULL;
|
|
}
|
|
p_node->last = NULL;
|
|
p_node->next = NULL;
|
|
p_node->type = NULL;
|
|
p_node->value = NULL;
|
|
p_node->id = 0;
|
|
p_node->if_malloc = 0;
|
|
free(p_node);
|
|
return 0;
|
|
}
|
|
|
|
|
|
int releaseList(List *p_list){
|
|
Node *p_node, *pl_node;
|
|
p_node = p_list->head;
|
|
if(if_safeMode == 1){
|
|
Node *tar_list = findByValue(list_list,"pointer",(void *)p_list);//turn pointer in to int to compare.
|
|
removeByNode(list_list,tar_list);
|
|
}
|
|
while (p_node != NULL){
|
|
pl_node = p_node;
|
|
p_node = p_node->next;
|
|
pl_node->next = NULL;
|
|
pl_node->last = NULL;
|
|
releaseNode(pl_node);
|
|
}
|
|
p_list->head = NULL;
|
|
p_list->tail = NULL;
|
|
p_list->length = 0;
|
|
p_list->id = 0;
|
|
free(p_list);
|
|
return 0;
|
|
}
|
|
|
|
int releaseListForSingle(List *p_list){
|
|
p_list->head = NULL;
|
|
p_list->tail = NULL;
|
|
p_list->id = 0;
|
|
p_list->length = 0;
|
|
free(p_list);
|
|
return 0;
|
|
}
|
|
|
|
unsigned long long len(List *p_list){
|
|
return p_list->length;
|
|
}
|
|
|
|
int removeById(List *p_list, unsigned long id){
|
|
Node *tmp = p_list->head;
|
|
if( isListEmpty(p_list) )
|
|
return -1;
|
|
do{
|
|
if(tmp->id == id) {
|
|
tmp->last->next = tmp->next;
|
|
tmp->next->last = tmp->last;
|
|
p_list->length -= 1;
|
|
return 1;//found
|
|
}
|
|
else{
|
|
tmp = tmp->next;
|
|
}
|
|
}while(tmp != NULL);
|
|
|
|
return 0;//not find
|
|
}
|
|
|
|
int removeByNode(List *p_list, Node *p_node){
|
|
Node *tmp = p_list->head;
|
|
if( isListEmpty(p_list) )
|
|
return -1;
|
|
do{
|
|
if(tmp == p_node){
|
|
tmp->last->next = tmp->next;
|
|
tmp->next->last = tmp->last;
|
|
p_list->length -= 1;
|
|
return 1;//found
|
|
}
|
|
else{
|
|
tmp = tmp->next;
|
|
}
|
|
}while(tmp != NULL);
|
|
|
|
return 0;//not find
|
|
}
|
|
|
|
int popFromHead(List *p_list){
|
|
if( isListEmpty(p_list) )
|
|
return -1;
|
|
else{
|
|
//Node *tmp = p_list->head;
|
|
p_list->head->next->last = NULL;
|
|
p_list->head = p_list->head->next;
|
|
//releaseNode(tmp); not necessary
|
|
p_list->length -= 1;
|
|
}
|
|
|
|
if( isListEmpty(p_list) ){
|
|
p_list->head = NULL;
|
|
p_list->tail = NULL;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
int popFromTail(List *p_list){
|
|
if( isListEmpty(p_list) )
|
|
return -1;
|
|
else{
|
|
//Node *tmp = p_list->tail;
|
|
p_list->tail->last->next = NULL;
|
|
p_list->tail = p_list->tail->last;
|
|
//releaseNode(tmp); not necessary
|
|
p_list->length -= 1;
|
|
}
|
|
|
|
if( isListEmpty(p_list) ){
|
|
p_list->head = NULL;
|
|
p_list->tail = NULL;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
/*该函数算法需要改进*/
|
|
Node *findById(List *p_list, const unsigned long long id){
|
|
Node *ph_node = p_list->head;
|
|
Node *pt_node = p_list->tail;
|
|
int direction = 0;
|
|
while(ph_node != pt_node){
|
|
if (direction == 0){
|
|
if (ph_node->id == id){
|
|
return ph_node;
|
|
}
|
|
else{
|
|
ph_node = ph_node->next;
|
|
}
|
|
direction = 1;
|
|
}
|
|
else{
|
|
if (pt_node->id == id){
|
|
return pt_node;
|
|
}
|
|
else{
|
|
pt_node = pt_node->last;
|
|
}
|
|
}
|
|
}
|
|
return NULL;
|
|
}
|
|
|
|
|
|
Node *findByValue(List *p_list, const char *type, const void *value){
|
|
Node *p_node = p_list->head;
|
|
while(p_node != NULL){
|
|
if(strcmp(p_node->type,type)){
|
|
p_node = p_node->next;
|
|
continue;//跳过不合类型的节点
|
|
}
|
|
if(!strcmp(type,"int")){
|
|
if(*((int *)p_node->value) == *((int *)value)){
|
|
return copyNode(p_node);
|
|
}
|
|
}
|
|
else if(!strcmp(type,"double")){
|
|
if(*((double *)p_node->value) == *((double *)value)){
|
|
return copyNode(p_node);
|
|
}
|
|
}
|
|
else if(!strcmp (type,"string")){
|
|
if(!strcmp((char *)p_node->value,(char *)value))
|
|
{
|
|
return copyNode(p_node);
|
|
}
|
|
}
|
|
else if(!strcmp(type,"pointer")){
|
|
if(p_node->value == value){
|
|
return copyNode(p_node);
|
|
}
|
|
}
|
|
|
|
p_node = p_node->next;
|
|
|
|
}
|
|
return NULL;
|
|
}
|
|
|
|
List *mply_findByValue(List *p_list, const char *type, const void *value){
|
|
List *f_list = init_list();
|
|
Node *p_node = p_list->head;
|
|
while(p_node != NULL){
|
|
if(strcmp(p_node->type,type)){
|
|
p_node = p_node->next;
|
|
continue;
|
|
}
|
|
if(!strcmp(type,"int")){
|
|
if(*((int *)p_node->value) == *((int *)value)){
|
|
Node *f_node = copyNode(p_node);
|
|
insertInTail(f_list,f_node);
|
|
}
|
|
}
|
|
else if(!strcmp(type,"double")){
|
|
if(*((double *)p_node->value) == *((double *)value)){
|
|
Node *f_node = copyNode(p_node);
|
|
insertInTail(f_list,f_node);
|
|
}
|
|
}
|
|
else if(!strcmp (type,"string")){
|
|
if(!strcmp((char *)p_node->value,(char *)value))
|
|
{
|
|
Node *f_node = copyNode(p_node);
|
|
insertInTail(f_list,f_node);
|
|
}
|
|
}
|
|
else if(!strcmp(type,"pointer")){
|
|
if(p_node->value == value){
|
|
Node *f_node = copyNode(p_node);
|
|
insertInTail(f_list,f_node);
|
|
}
|
|
}
|
|
|
|
p_node = p_node->next;
|
|
|
|
}
|
|
return f_list;
|
|
}
|
|
|
|
int isListEmpty(List *p_list){
|
|
if(p_list->head == NULL || p_list->tail == NULL)// If its head or tail is NULL,it would be thought as empty.
|
|
return 1; // But we should ensure that both of them are NULL when we
|
|
return 0; // want to make a list empty.
|
|
}
|
|
|
|
int exchangeLocation(Node *p_node,Node *t_node){
|
|
Node *temp_next = p_node->next;
|
|
Node *temp_last = p_node->last;
|
|
p_node->last->next = t_node;
|
|
p_node->next->last = t_node;
|
|
t_node->last->next = p_node;
|
|
t_node->next->last = p_node;
|
|
p_node->next = t_node->next;
|
|
p_node->last = t_node->last;
|
|
t_node->next = temp_next;
|
|
t_node->last = temp_last;
|
|
return 0;
|
|
}
|
|
|
|
Node *copyNode(Node *p_node){
|
|
Node *t_node = init_node();
|
|
t_node->id = p_node->id;
|
|
t_node->last = p_node->last;
|
|
t_node->next = p_node->next;
|
|
t_node->if_malloc = p_node->if_malloc;
|
|
t_node->type = p_node->type;
|
|
t_node->value = p_node->value;
|
|
return t_node;
|
|
}
|
|
|
|
List *copyList(List *p_list){
|
|
List *t_list = init_list();
|
|
t_list->head = p_list->head;
|
|
t_list->tail = p_list->tail;
|
|
t_list->id = p_list->id;
|
|
Node *p_node = p_list->head;
|
|
while(p_node != NULL){
|
|
Node *t_node = copyNode(p_node);
|
|
insertInTail(t_list, t_node);
|
|
p_node = p_node->next;
|
|
}
|
|
return t_list;
|
|
}
|
|
|
|
#endif
|