C语言通讯录管理系统完整版

#include <stdio.h> #include <malloc.h> //得到指向大小为Size的内存区域的首字节的指针// #include <string.h> #include <stdlib.h> //标准库函数//  #define NULL 0 #define LEN sizeof(struct address_list) //计算字节// int n; struct address_list {   char name[30];   //名字   char work[30];   //职业   char handset[30]; //手机   char email[30];  //电子邮件   char address[30]; //通讯地址   struct address_list *next; }; struct address_list *shifang(struct address_list *head); // 释放内存函数声明 //创建函数，不带头结点的链表 struct address_list *creat(void)     {   struct address_list *head,*p1,*p2;   char name[20];   n=0;   p1=(struct 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=(struct 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(struct address_list *head)   {   struct address_list *p;   if(head!=NULL)   {     p=head;     printf("本通讯录现在共有%d人:/n",n);     printf("---姓名-------职业--------手机-------Email-------通讯地址/n");     printf("==================================/n");     do     {       printf("== %s",p->name); printf("    ");       printf("%s",p->work); printf("    ");       printf("%s",p->handset); printf("    ");       printf("%s",p->email); printf("    ");       printf("%s",p->address); printf("    /n");       p=p->next;     }while(p!=NULL);     printf("==================================/n");   }   else     printf("通讯录为空,无法输出!/n"); } //增加函数 struct address_list *insert(struct address_list *head)  {   struct address_list *p0,*p1,*p2;   char name[20];   p1=head;   printf("请输入增加的内容:/n");   printf("请输入姓名:"); gets(name);   if(strcmp(name,"0")==0)   {     printf("姓名不能为0,增加失败!/n");     return(head);   }   else   {     p0=(struct address_list *)malloc(LEN);     strcpy(p0->name,name);     printf("请输入职业:"); gets(p0->work);     printf("请输入手机:"); gets(p0->handset);     printf("请输入电子邮件:"); gets(p0->email);     printf("请输入通讯地址:"); gets(p0->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;     }   } } struct address_list* delete_txl(struct address_list *head) {   struct 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;     }   } } //显示函数 struct address_list *display(struct address_list *head) {   struct 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",p1->name);printf("    ");       printf("%s",p1->work);printf("    ");       printf("%s",p1->handset);printf("    ");       printf("%s",p1->email);printf("    ");       printf("%s",p1->address); printf("    /n");       printf("==================================/n");     }     p1=p1->next;   }   if(m==0)   {     printf("此人未在本通讯录中!/n");   }   return(head); }  //排序函数 struct address_list *paixu(struct address_list *head) {   struct address_list *p1,*p2;   int i,j;   struct address_list1   {     char name[30];     char work[30];     char handset[30];     char email[30];     char address[30];   };   struct address_list1 px[200];   struct address_list1 temp;   if(head==NULL)   {     printf("通讯录为空,无法排序!/n");     return(head);   }   p1=head;   for(i=0;i<n,p1!=NULL;i++)   {     strcpy(px[i].name,p1->name);     strcpy(px[i].work,p1->work);     strcpy(px[i].handset,p1->handset);     strcpy(px[i].email,p1->email);     strcpy(px[i].address,p1->address);     p2=p1;     p1=p1->next;   }   head=shifang(head);   for(j=0;j<n-1;j++)   {     for(i=j+1;i<n;i++)     {       if(strcmp(px[i].name,px[j].name)<0)       {         temp=px[i];         px[i]=px[j];         px[j]=temp;       }     }   }   p1=(struct address_list *)malloc(LEN);   p2=p1;   strcpy(p1->name,px[0].name);   strcpy(p1->work,px[0].work);   strcpy(p1->handset,px[0].handset);   strcpy(p1->email,px[0].email);   strcpy(p1->address,px[0].address);    head=p1;   for(i=1;i<n;i++)   {     p1=(struct address_list *)malloc(LEN);     strcpy(p1->name,px[i].name);     strcpy(p1->work,px[i].work);     strcpy(p1->handset,px[i].handset);     strcpy(p1->email,px[i].email);     strcpy(p1->address,px[i].address);     p2->next=p1;     p2=p1;   }   p2->next=NULL;   printf("按姓名排序后为:/n");   print(head);   return(head); } //姓名查找函数 struct address_list *search(struct address_list *head) {   struct 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    %s    %s    %s    %s/n",p1->name,p1->work,p1->handset,p1->email,p1->address);       printf("+++++++++++++++++++++++++++++++++++/n");     }     p1=p1->next;      if(m==0)     {       printf("此人未在本通讯录中!/n");     }     break;   }    return(head); }  //释放内存函数 struct address_list *shifang(struct address_list *head) {   struct address_list *p1;   while(head!=NULL)   {     p1=head;     head=head->next;     free(p1);   }   return(head); }  //文件写入函数 void save(struct address_list *head) {   FILE *fp;   struct address_list *p1;   char tong[30];   if(head==NULL)   {     printf("通讯录为空,无法存储!/n");     return;   }   printf("请输入保存后的文件名:");   gets(tong);   fp=fopen("(tong).txt","w");   if(fp==NULL)   {     printf("cannot open file/n");     return;   }   p1=head;   fprintf(fp,"姓名  职业   手机   Email   通讯地址/n");   for(;p1!=NULL;)    {     fprintf(fp,"%s    %s    %s    %s    %s/n",p1->name,p1->work,p1->handset,p1->email,p1->address);     p1=p1->next;   }   printf("保存完毕!/n");   fclose(fp); }  //文件读出函数 struct address_list *load(struct address_list *head) {   FILE *fp;   char tong[30];   struct address_list *p1,*p2;   printf("请输入要输出的文件名:");   gets(tong);   fp=fopen("(tong).txt","r");   if(fp==NULL)   {     printf("此通讯录名不存在,无法输出!/n");     return(head);   }   else   {     head=shifang(head);   }   p1=(struct 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=(struct 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); }  //综合操作函数 struct address_list *menu(struct 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(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; } //主函数 void main() {   struct 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=creat();                //创建           print(head);         }         else         {           head=shifang(head);           head=creat();                //重新创建           print(head);         }       }       break;     case '2':       {         head=paixu(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=shifang(head);       break;     default:       printf("操作错误，此项不存在!/n");       break;     }     if(strcmp(num,"7")==0)       break;   } }