#include<stdio.h>
#include<string.h>
#include<stdlib.h>

typedef struct{
 char num[5];
 char name[9];
 char sex[9];
 char phone[13];
 char addr[31];
}DataType;
typedef struct node{
 DataType data;
 struct node*next;
} ListNode, *LinkList;

LinkList head;
ListNode *p;

int menu_select();
LinkList CreateList(void);
void InsertNode(LinkList head,ListNode *p);
ListNode *ListFind(LinkList head);
void DelNode(LinkList head);
void printList(LinkList head);
void ChangeNode(LinkList head);

int main(void){
 for(; ;){
  switch(menu_select()){
   case 1:
    printf("**********************\n");
    printf("* 通 訊 錄 鏈 表 建 立 *\n");
    printf("***********************\n");
    head=CreateList();
    break;
   case 2:
    printf("*********************\n");
    printf("通 訊 錄 信 息 的 插 入 *\n");
    printf("*********************\n");
    printf("請輸入編號，姓名，性別，電話和地址 \n");
    printf("**********************************\n");
    p=(ListNode*)malloc(sizeof(ListNode));
    scanf("%s%s%s%s%s",p->data.num,p->data.name,p->data.sex,p->data.phone,p->data.addr);
    InsertNode(head,p);
    break;
   case 3:
    printf("***********************\n");
    printf("通 訊 錄 的 查 詢 *\n");
    p=ListFind(head);
    if(p!=NULL){
     printf("編號 姓名 性別 電話 地址 \n");
     printf("-------------------------- \n");
     printf("%s%s%s%s%s",p->data.num,p->data.name,p->data.sex,p->data.phone,p->data.addr);
}    else
     printf("沒查到要查詢的通訊者！\n");
     break;
   case 4:
    printf("***********************\n");
    printf("* 通 訊 者 信 息 的 修 改 *\n");
    printf("**********************\n");
    ChangeNode(head);
    break;
   case 5:
    printf("************************\n");
    printf("通 訊 錄 的 信 息 刪 除 *\n");
    printf("*************************\n");
    DelNode(head);
    break;
   case 6:
    printf("************************\n");
    printf("通 訊 錄 鏈 表 的 輸 出 *\n");
    printf("*************************\n");
    printList(head);
    break;
   case 0:
    printf("\t 再 見！\n");
    return 0;
 }
 }

}
int menu_select(){
 int sn;
 printf(" 通訊錄管理系統\n");
 printf("========================\n");
 printf(" 1. 通訊錄鏈表的建立\n");
 printf(" 2. 通訊錄信息的插入\n");
 printf(" 3. 通訊錄信息的查詢\n");
 printf(" 4. 通訊錄信息的修改\n");
 printf(" 5. 通訊錄信息的刪除\n");
 printf(" 6. 通訊錄信息的輸出\n");
 printf(" 0. 退出管理系統\n");
 printf(" 請 選 擇 0—6：");
 for(; ;){
  scanf("%d",&sn);
  if(sn<0 || sn>6)
   printf("\n\t輸入錯誤，重選0-6：");
  else
   break;
}
 return sn;


}
LinkList CreateList(void){
 LinkList head=(ListNode *)malloc(sizeof(ListNode));
 ListNode *p,*rear;
 char flag='y';
 rear=head;
 while(flag=='y'){
  p=(ListNode *)malloc(sizeof(ListNode));
  printf("請順序輸入編號，姓名，性別，電話和地址\n");
  printf("--------------------------------------\n");
  scanf("%s%s%s%s%s",p->data.num,p->data.name,p->data.sex,p->data.phone,p->data.addr);
  rear->next=p;
  rear=p;
  printf("繼續輸入嗎？ （y/n）:");
  getchar();
  scanf("%c",&flag);
}

 rear->next=NULL;
 return head;

} 
void InsertNode(LinkList head,ListNode *p){
 ListNode *p1,*p2;
 p1=head;
 p2=p1->next;
 while(p2!=NULL && strcmp(p2->data.num,p->data.num)<0)
 {
  p1=p2;
  p2=p2->next;

 }

 p1->next=p;
 p->next=p2;

} 
ListNode *ListFind(LinkList head){
 ListNode *p; 
 char num[5];
 char name[9]; 
 int xz=0;
 printf("===========\n");
 printf("1. 按編號查詢 \n");
 printf("2. 按姓名查詢 \n");
 printf("===========\n");
 printf(" 請選擇：");
 p=head->next;
 scanf("%d",&xz);
 if(xz==1){
  printf("請輸入要查詢者的編號:");
  scanf("%s",num);
  while(p && strcmp(p->data.num,num)<0)
   p=p->next;
  if(p==NULL||strcmp(p->data.num,num)>0)
   p=NULL;

}
 else
  if(xz==2) {
   printf("請輸入要查詢者的姓名：");
   scanf("%s",name);
   while(p && strcmp(p->data.name,name)!=0)
    p=p->next;    
 }

 return p;
}
void DelNode(LinkList head){
 char jx;
 ListNode *p,*q;
 p=ListFind(head);
 if(p==NULL){
  printf("沒有查到要刪除的通訊者!\n");
  return;

 }
 printf("真的要刪除該節點嗎?(y/n):");
 getchar();
 scanf("%c",&jx);
 if(jx=='y'||jx=='Y'){
  q=head;
  while(q!=NULL && q->next!=p)
   q=q->next;
  q->next=p->next;
  free(p);
  printf("通訊錄已經刪除!\n");
 }
}
void printList(LinkList head){
 ListNode *p;
 p=head->next;
 printf("編號 姓名 性別 電話 地址\n");
 printf("--------------------------------------\n");
 while(p!=NULL)
 {
  printf("%s%s%s%s%s\n",p->data.num,p->data.name,p->data.sex,p->data.phone,p->data.addr);
  printf("--------------------------------\n");
  p=p->next;
 }
} 
void ChangeNode(LinkList head){
 ListNode *p;
 p=ListFind(head);
 if(p!=NULL){
  printf("編號 姓名 性別 電話 地址\n");
  printf("--------------------------------------\n");
  scanf("%s%s%s%s%s\n",p->data.num,p->data.name,p->data.sex,p->data.phone,p->data.addr);
  printf("--------------------------------------\n");
  printf("輸入該通訊錄者正確的聯系電話 通訊地址：\n中間用空格號分隔\n");
  scanf("%s%s",p->data.phone,p->data.addr);

}
 else
  printf("沒查到要查詢的通訊錄者！\n");
}