初学链表改进通讯录
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#define X 20
#define TRUE 1
#define FALSE 0
typedef struct
{
char year[5];
char month[3];
char day[3];
}DATE;
typedef struct
{
char name[12];
DATE date;
char address[40];
char phone[10];
}DataType;
typedef struct node
{
DataType txl;
struct node *next;
}Node;
typedef Node * Llist;
char *zhucaidan[]={
"************主菜单************\n",
"1.添加记录\n",
"2.查询记录\n",
"3.修改记录\n",
"4.删除记录\n",
"0.退出\n",
"******************************\n"
};
char *menucha[]={
"**********查询菜单************\n",
"1.按姓名查询\n",
"2.按手机号码查询\n",
"3.按出生日期查询\n",
"4.显示全部\n",
"0.退回主菜单\n",
"******************************\n"
};
char *menushan[]={
"**********删除菜单************\n",
"1.按姓名删除\n",
"2.按手机号码删除\n",
"3.按出生日期删除\n",
"4.全部删除\n",
"0.退回主菜单\n",
"******************************\n"
};
char *menugai[]={
"**********修改菜单************\n",
"1.按姓名修改\n",
"2.按手机号码修改\n",
"3.按出生日期修改\n",
"0.退回主菜单\n",
"******************************\n"
};
int InitList(Llist *L)
{
*L=(Llist)malloc(sizeof(Node));
if(NULL==*L)
return FALSE;
else
{
(*L)->next=NULL;
return TRUE;
}
}
int ListLength(Llist L)
{
int i=0;
Llist p;
p=L->next;
while(p!=NULL)
{
i++;
p=p->next;
}
return i;
}
int ListEmpty(Llist L)
{
if(ListLength(L)==0)
return TRUE;
else
return FALSE;
}
int ClearList(Llist *L)
{
Llist q,p;
int i;
if((*L)->next==NULL)
return TRUE;
p=q=(*L)->next;
for(i=0;;i++)
{
p=p->next;
free(q);
q=p;
if(p==NULL)
break;
}
(*L)->next=NULL;
return TRUE;
}
int GetElem(Llist L,int i,DataType *e)
{
int j=1;
Llist p;
if(i<1||i>ListLength(L))
return FALSE;
p = L;
while(NULL!=p&&j<i)
{
p=p->next;
j++;
}
p = p->next;
*e = p->txl;
return TRUE;
}
int LocateElem(Llist L,int j,char *sqr)
{
int i;
Llist p;
char str[10];
p=L->next;
if(NULL==p)
return FALSE;
switch(j)
{
case 1:
{
for(i=1;i<ListLength(L)+1;i++)
{
if(0==strcmp(sqr,p->txl.name))
return i;
p=p->next;
}
return FALSE;
}break;
case 2:
{
for(i=1;i<ListLength(L)+1;i++)
{
if(0==strcmp(sqr,p->txl.phone))
return i;
p=p->next;
}
return FALSE;
}break;
case 3:
{
for(i=1;i<ListLength(L)+1;i++)
{
strcpy(str,p->txl.date.year);
strcat(str,p->txl.date.month);
strcat(str,p->txl.date.day);
if(0==strcmp(sqr,str))
return i;
p=p->next;
}
return FALSE;
}break;
}
}
int ListInsert(Llist *L,int i,DataType e)
{
int j=1;
Llist q,p;
if(i<1||i>ListLength(*L)+1)
return FALSE;
p=(*L);
for(j=1;j<i;j++)
{
if(p==NULL)
break;
p=p->next;
}
q=(Llist)malloc(sizeof(Node));
if(NULL==q)
{
printf("内存分配失败!即将退出程序!\n");
exit(0);
}
q->txl=e;
q->next=p->next;
p->next=q;
return TRUE;
}
int ListDelete(Llist *L,int i,DataType *e)
{
int j;
Llist q,p;
if(i<1||i>ListLength(*L))
return FALSE;
p=(*L);
for(j=1;j<i;j++)
{
if(NULL==p)
break;
p=p->next;
}
q=p->next;
p->next=q->next;
*e=q->txl;
free(q);
return TRUE;
}
int caidan(char *ch[],int len)
{
int i;
char x;
for(i=0;i<len;i++)
{
printf("%s",ch[i]);
}
printf("\n请输入选项:");
scanf(" %c",&x);
getchar();
return x;
}
void input(DataType *e)
{
printf("请输入姓名:\n");
scanf(" %s",e->name);
printf("请输入出生日期(空格隔开):\n");
scanf(" %s%s%s",e->date.year,e->date.month,e->date.day);
printf("请输入地址:\n");
scanf(" %s",e->address);
printf("请输入手机号码:\n");
scanf(" %s",e->phone);
}
void output(DataType e,int i)
{
printf("查询到第%d条记录\n",i);
printf("姓名:%s\n",e.name);
printf("出生日期:%s,%s,%s\n",e.date.year,e.date.month,e.date.day);
printf("地址:%s\n",e.address);
printf("手机号码:%s\n",e.phone);
printf("\n");
}
int jilu(Llist *L)
{
DataType e;
memset(&e,0,sizeof(DataType));
input(&e);
ListInsert(L,1,e);
return TRUE;
}
int chaxun(Llist L)
{
char name[12],phone[12],year[10]={0},month[3]={0},day[3]={0};
DataType e;
int j;
char i='1';
while(i!='0')
{
i=caidan(menucha,7);
switch(i)
{
case '1':{
if(ListLength(L)==0)
{
printf("\n当前无任何记录!\n");
break;
}
printf("\n请输入名字:\n");
scanf(" %s",name);
j=LocateElem(L,1,name);
if(j==0)
printf("\n查无此人!\n");
else
{
GetElem(L,j,&e);
output(e,j);
}
};break;
case '2':{
if(ListLength(L)==0)
{
printf("\n当前无任何记录!\n");
break;
}
printf("\n请输入手机号:\n");
scanf(" %s",phone);
j=LocateElem(L,2,phone);
if(j==0)
printf("\n查无此人!\n");
else
{
GetElem(L,j,&e);
output(e,j);
}
};break;
case '3':{
if(ListLength(L)==0)
{
printf("\n当前无任何记录!\n");
break;
}
printf("\n请输入出生日期(空格隔开):\n");
scanf(" %s%s%s",year,month,day);
strcat(year,month);
strcat(year,day);
j=LocateElem(L,3,year);
if(j==0)
printf("\n查无此人!\n");
else
{
GetElem(L,j,&e);
output(e,j);
}
};break;
case '4':{
if(ListLength(L)==0)
printf("\n当前无任何记录!\n");
for(j=1;j<ListLength(L)+1;j++)
{
GetElem(L,j,&e);
output(e,j);
}
};break;
case '0':break;
default:printf("\n输入错误请重新输入!\n");break;
}
}
return 1;
}
int shanchu(Llist *L)
{
char name[12],phone[12],s,year[10],month[3],day[3];
int j;
DataType e;
char i='1';
while(i!='0')
{
i=caidan(menushan,7);
switch(i)
{
case '1':{
if(ListLength(*L)==0)
{
printf("\n当前无任何记录!\n");
break;
}
printf("\n请输入名字:\n");
scanf(" %s",name);
j=LocateElem(*L,1,name);
if(j==0)
printf("\n查无此人!\n");
else
{
GetElem(*L,j,&e);
output(e,j);
printf("\n确认删除这条记录吗?(y/n)\n");
scanf(" %c",&s);
if('y'==s)
{
printf("\n %s已删除!\n",e.name);
ListDelete(L,j,&e);
}
}
};break;
case '2':{
if(ListLength(*L)==0)
{
printf("\n当前无任何记录!\n");
break;
}
printf("\n请输入手机号:\n");
scanf(" %s",phone);
j=LocateElem(*L,2,phone);
if(j==0)
printf("\n查无此人!\n");
else
{
GetElem(*L,j,&e);
output(e,j);
printf("\n确认删除这条记录吗?(y/n)\n");
scanf(" %c",&s);
if('y'==s)
{
printf("\n %s已删除!\n",e.name);
ListDelete(L,j,&e);
}
}
};break;
case '3':{
if(ListLength(*L)==0)
{
printf("\n当前无任何记录!\n");
break;
}
printf("\n请输入出生日期(空格隔开):\n");
scanf(" %s%s%s",year,month,day);
strcat(year,month);
strcat(year,day);
j=LocateElem(*L,3,year);
if(j==0)
printf("\n查无此人!\n");
else
{
GetElem(*L,j,&e);
output(e,j);
printf("\n确认删除这条记录吗?(y/n)\n");
scanf(" %c",&s);
if('y'==s)
{
printf("\n %s已删除!\n",e.name);
ListDelete(L,j,&e);
}
}
};break;
case '4':{
if(ListLength(*L)==0)
{
printf("\n当前无任何记录!");
break;
}
printf("\n确认全部删除吗?(y/n)\n");
scanf(" %c",&s);
if('y'==s)
{
ClearList(L);
if(ListEmpty(*L))
printf("\n已全部删除!\n");
else
printf("\n删除失败!\n");
}
};break;
case '0':break;
default:printf("\n输入错误请重新输入\n");break;
}
}
return 1;
}
int xiugai(Llist *L)
{
char name[12],phone[12],year[10],month[3],day[3];
int j;
DataType e;
char i='1';
while(i!='0')
{
i=caidan(menugai,6);
switch(i)
{
case '1':{
if(ListLength(*L)==0)
{
printf("\n当前无任何记录!\n");
break;
}
printf("\n请输入要修改的名字:\n");
scanf(" %s",name);
j=LocateElem(*L,1,name);
if(j==0)
printf("\n查无此人!\n");
else
{
GetElem(*L,j,&e);
output(e,j);
ListDelete(L,j,&e);
printf("\n请输入修改后的信息:\n");
input(&e);
ListInsert(L,j,e);
printf("\n修改成功!\n");
}
};break;
case '2':{
if(ListLength(*L)==0)
{
printf("\n当前无任何记录!\n");
break;
}
printf("\n请输入要修改的手机号:\n");
scanf(" %s",phone);
j=LocateElem(*L,2,phone);
if(j==0)
printf("\n查无此人!\n");
else
{
GetElem(*L,j,&e);
output(e,j);
ListDelete(L,j,&e);
printf("\n请输入修改后的信息:\n");
input(&e);
ListInsert(L,j,e);
printf("\n修改成功!\n");
}
};break;
case '3':{
if(ListLength(*L)==0)
{
printf("\n当前无任何记录!\n");
break;
}
printf("\n请输入要修改的出生日期(空格隔开):\n");
scanf(" %s%s%s",year,month,day);
strcat(year,month);
strcat(year,day);
j=LocateElem(*L,3,year);
if(j==0)
printf("\n查无此人!\n");
else
{
GetElem(*L,j,&e);
output(e,j);
ListDelete(L,j,&e);
printf("\n请输入修改后的信息:\n");
input(&e);
ListInsert(L,j,e);
printf("\n修改成功!\n");
}
};break;
case '0':break;
default:printf("\n输入错误请重新输入!\n");break;
}
}
}
int main()
{
char i;
Llist P;
if(!InitList(&P))
{
printf("内存分配失败,即将退出!\n");
exit(0);
}
while(1)
{
i=caidan(zhucaidan,7);
switch(i)
{
case '1':jilu(&P);break;
case '2':chaxun(P);break;
case '3':xiugai(&P);break;
case '4':shanchu(&P);break;
case '0': printf("\n感谢使用本程序~\n");exit(0);break;
default:printf("\n错误选项请重新输入!\n");break;
}
}
return 0;
}