/*
* 对通讯录进行插入、删除、排序、查找、单个显示功能
*/#include <stdio.h>
#include <malloc.h>
#include <string.h>
#include <stdlib.h>int n;typedef struct _Address_List
{char name[30];            //名字char work[30];            //职业char handset[20];        //手机号码char email[30];            //电子邮件char address[30];        //地址struct _Address_List *next;
}address_List;
#define LEN sizeof(address_List)address_List *Release(address_List *head);//创建一个通讯录
address_List *Create(void)
{address_List *head,*p1,*p2;char name[30];n = 0;p1 = (address_List *)malloc(LEN);p2 = p1;printf("请输入通讯录的内容！\n姓名输入为0时表示创建完毕！\n");printf("请输入姓名：");gets(name);if(strcmp(name,"0")!=0){strcpy(p1->name,name);printf("请输入职业：");gets(p1->work);printf("请输入手机：");gets(p1->handset);printf("请输入电子邮件：");gets(p1->email);printf("请输入通讯地址：");gets(p1->address);head = NULL;while(1){n = n+1;if(n == 1){head = p1;}else{p2->next = p1;}p2 = p1;printf("请输入姓名：");gets(name);if(strcmp(name,"0") == 0){break;}else{p1 = (address_List *)malloc(LEN);strcpy(p1->name,name);printf("请输入职业：");gets(p1->work);printf("请输入手机：");gets(p1->handset);printf("请输入电子邮件：");gets(p1->email);printf("请输入通讯地址：");gets(p1->address);}}p2->next = NULL;return head;}else{return 0;}
}//打印整个通讯录
void print(address_List *head)
{address_List *p;if(head != NULL){p = head;printf("本通讯录现在共有%d人；\n",n);printf("---姓名---------职业----------手机--------Email-------------通讯地址\n");printf("====================================================================\n");do{printf("=%s\t\t",p->name);printf("=%s\t\t",p->work);printf("=%s\t\t",p->handset);printf("=%s\t\t",p->email);printf("=%s\n",p->address);p = p->next;}while(p != NULL);printf("==================================================================\n");}else{printf("通讯录为空，无法输出！\n");}
}//在通讯录插入
address_List *insert(address_List *head)
{address_List *p0,*p1,*p2;char name[20];p1 = head;printf("请输入增加的内容：\n");printf("请输入姓名：");gets(name);if(strcpy(name,"0") == 0){printf("姓名不能为0，增加失败！\n");return head;}else{p0 = (address_List *)malloc(LEN);strcpy(p0->name,name);printf("请输入职业：");gets(p1->work);printf("请输入手机：");gets(p1->handset);printf("请输入电子邮件：");gets(p1->email);printf("请输入通讯地址：");gets(p1->address);n = n+1;if(head == NULL){head = p0;p0->next = NULL;return head;}else{while(strcmp(p0->name,p1->name) > 0 && (p1->next != NULL)){p2 = p1;p1 = p1->next;}if(strcmp(p0->name,p1->name) <0 || strcmp(p0->name,p1->name) == 0){if(head == p1){head = p0;}else{p2->next = p0;}p0->next = p1;}else{p1->next = p0;p0->next = NULL;}return head;}}
}//删除通讯录中某个人
address_List *delete_txl(address_List *head)
{address_List *p,*q;char name[30];if(head == NULL){printf("通讯录为空，无法删除！\n");return head;}p = head;printf("请输入需要删除的人姓名：");gets(name);if(strcmp(head->name,name) == 0){head = head->next;free(p);printf("删除操作成功！\n");return head;}else{q = head;p = head->next;while(p != NULL){if(strcmp(p->name,name) == 0){q->next = p->next;free(p);printf("删除操作成功！\n");return head;}p = p->next;q = q->next;}}
}//显示通讯录中某个人
address_List *display(address_List *head)
{address_List *p1,*p2;char name[30];int m;if(head == NULL){printf("通讯录为空，无法显示！\n");return head;}p1 = head;m = 0;printf("请输入要显示人的姓名：");gets(name);while(p1 != NULL){while(strcmp(p1->name,name) != 0 && p1->next != NULL){p2 = p1;p1 = p1->next;}if(strcmp(p1->name,name) == 0){m++;printf("%s的通讯内容如下：\n",name);printf("---姓名---------职业----------手机--------Email-------------通讯地址\n");printf("====================================================================\n");printf("=%s=\t\t",p1->name);printf("=%s=\t\t",p1->work);printf("=%s=\t\t",p1->handset);printf("=%s=\t\t",p1->email);printf("=%s=\n",p1->address);printf("====================================================================\n");}p1 = p1->next;}if(m == 0){printf("此人不在通讯录中！\n");}return head;
}//对通讯录进行排序操作
address_List *Sort(address_List *head)
{address_List *p1,*p2;int i,j;typedef struct _Address_List1{char name[30];            //名字char work[30];            //职业char handset[20];        //手机号码char email[30];            //电子邮件char address[30];        //地址
    }address_List1;address_List1 Sort[200];address_List1 temp;if(head == NULL){printf("通讯录为空，无法排序！\n");return head;}p1 = head;for(i = 0;i < n,p1 != NULL; i++){strcpy(Sort[i].name,p1->name);strcpy(Sort[i].work,p1->work);strcpy(Sort[i].handset,p1->handset);strcpy(Sort[i].email,p1->email);strcpy(Sort[i].address,p1->address);p2 = p1;p1 = p1->next;}head = Release(head);for(j = 0; j < n-1; j++){for(i = j+1; i < n; i++){if(strcmp(Sort[i].name,Sort[j].name) < 0){Sort[i] = temp;temp = Sort[j];Sort[j] = temp;}}}p1 = (address_List *)malloc(LEN);p2 = p1;strcpy(p1->name,Sort[0].name);strcpy(p1->work,Sort[0].work);strcpy(p1->handset,Sort[0].handset);strcpy(p1->email,Sort[0].email);strcpy(p1->address,Sort[0].address);head = p1;for(i = 1; i < n; i++){p1 = (address_List *)malloc(LEN);strcpy(p1->name,Sort[i].name);strcpy(p1->work,Sort[i].work);strcpy(p1->handset,Sort[i].handset);strcpy(p1->email,Sort[i].email);strcpy(p1->address,Sort[i].address);p2->next = p1;p2 = p1;}p2->next = NULL;printf("按姓名排序后的结果是：\n");print(head);return head;
}//查找通讯录中某个人
address_List *Search_name(address_List *head)
{address_List *p1,*p2;int m;char name[30];if(head == NULL){printf("通讯录为空，无法查找！\n");return head;}p1 = head;printf("**************************\n");printf("****请输入要查找的姓名：**\n");printf("**************************\n");m = 0;gets(name);while(p1 != NULL){while(strcmp(p1->name,name) != 0 && (p1->next != NULL)){p2 = p1;p1 = p1->next;}if(strcmp(p1->name,name) == 0){m++;printf("你查找的内容是：\n");printf("++++++++++++++++++++++++++++++++\n");printf("++ %s\t%s\t%s\t%s\t%s  ++",p1->name,p1->work,p1->handset,p1->email,p1->address);printf("++++++++++++++++++++++++++++++++\n");}p1 = p1->next;if(m == 0){printf("你查找的姓名不在通讯录中！\n");}break;}return head;
}//释放整个通讯录
address_List *Release(address_List *head)
{address_List *p;while(head != NULL){p = head;head = head->next;free(p);}return head;
}//保存(以文件的形式保存)
void save(address_List *head)
{FILE *fp;address_List *p;char Filename[30];        //保存后的文件名if(head ==NULL){printf("待保存的通讯录为空，无法保存！\n");return ;}printf("请输入保存后的文件名：");gets(Filename);fp = fopen("Filename.txt","w");if(fp == NULL){printf("无法打开文件！\n");return ;}p = head;fprintf(fp,"姓名\t职业\t手机\tEmail\t地址\n");for(;p != NULL;){fprintf(fp,"姓名\t职业\t手机\tEmail\t地址",p->name,p->work,p->handset,p->email,p->address);p = p->next;}printf("保存完毕！\n");fclose(fp);
}//文件读出函数
address_List *Load(address_List *head)
{FILE *fp;char Filename[30];address_List *p1,*p2;printf("请输入要输出的文件名：");gets(Filename);fp = fopen("Filename.txt","r");if(fp == NULL){printf("此通讯录不存在，无法输出！\n");return head;}else{head = Release(head);}p1 = (address_List *)malloc(LEN);fscanf(fp,"%s%s%s%s%s",p1->name,p1->work,p1->handset,p1->email,p1->address);if(feof(fp) != 0){printf("文件为空，无法打开！\n");return head;}else{rewind(fp);p2 = p1;head = p1;n = 0;while(feof(fp) == 0){fscanf(fp,"%s%s%s%s%s",p1->name,p1->work,p1->handset,p1->email,p1->address);if(feof(fp) != 0){break;}p2->next = p1;p2 = p1;p1 = (address_List *)malloc(LEN);n = n+1;}p2->next = NULL;p1 = head;head = head->next;n = n-1;free(p1);print(head);printf("打开完毕！\n");return head;}fclose(fp);
}//菜单选择函数
address_List *menu(address_List *head)
{char num[10];while(1){printf("*******************************\n");printf("*****1. 姓名查找     **********\n");printf("*****2. 单个显示     **********\n");printf("*****3. 增加         **********\n");printf("*****4. 退出         **********\n");printf("*******************************\n");printf("请输入你选择的操作：");gets(num);switch(*num){case '1':{head = Search_name(head);print(head);}break;case '2':{head = display(head);}break;case '3':{head = insert(head);print(head);}break;case '4':return head;default:printf("操作有误，此项不存在！\n");break;}if(strcmp(num,"6") == 0){break;}}return head;
}//主函数
int main(void)
{address_List *head = NULL;char num[10];printf("*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*\n");printf("*=*=*=*=*=*=*=            程序说明        *=*=*=*=*=*=*\n");printf("*=*=*=*=*=*=*=    请及时保存创建完毕的通讯录内容        *=*=*=*=*=*=*\n");printf("*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*\n");while(1){printf("*******************************\n");printf("******    1. 创建通讯录   *******\n");printf("******    2. 按名字排序    *******\n");printf("******    3. 综合操作    *******\n");printf("******    4. 保存        *******\n");printf("******    5. 打开        *******\n");printf("******    6. 删除        *******\n");printf("******    7. 退出        *******\n");printf("*******************************\n");printf("请输入你选择的操作：");gets(num);switch(*num){case '1':{if(head == NULL){head = Create();print(head);}else{head = Release(head);head = Create();print(head);}}break;case '2':{head = Sort(head);}break;case '3':{head = menu(head);}break;case '4':{save(head);print(head);}break;case '5':{head = Load(head);}break;case '6':{head = delete_txl(head);print(head);}break;case '7':{head = Release(head);}break;default:{printf("操作有误，此项不存在！\n");}break;}if(strcmp(num,"7") == 0){break;}}return 0;
}