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;  } }