/*編程建立一通訊簿，存放有姓名、電話號碼、住址，然后對通信簿進行查找、添加、修改及刪除。*/
#include<stdio.h>
struct person
{
	char name[8];
    char tel[15];
    char addr[50];
};

char filename[20];
FILE *fp;

void creat();
void output();
void search();
void append();
void modify();
void delete();

main()
{
	int m;
  
	creat();   
	while(1)
	{
		printf("\n\n添加，請按1");
 		printf("\n查找，請按2");
		printf("\n修改，請按3");
		printf("\n刪除，請按4");
		printf("\n輸出，請按5");
		printf("\n退出，請按0\n");
		scanf("%d",&m);
		if(m>=0&&m<=5)
		{
			switch(m)
    		{
			case 1: append();
    				break;
			case 2: search();
					break;
			case 3: modify();
					break;
			case 4: delete();
					break;
			case 5: output();
					break;
			case 0: exit();
			}
		 printf("\n\n操作完畢，請再次選擇！");
		 }
		else
			printf("\n\n選擇錯誤，請再次選擇！");
	}
}


void creat()
{
	struct person one;
    long s1;

    printf("\n請輸入通訊簿名：");
    scanf("%s",filename);
    if((fp=fopen(filename,"w"))==NULL)
    {
		printf("\n不能建立通訊簿！");
		exit();
    }
    fprintf(fp,"%-10s%-20s%-50s\n","姓名","電話號碼","住址");
    printf("\n請輸入姓名、電話號碼及住址（以0結束）\n");
    scanf("%s",one.name);
    while(strcmp(one.name,"0"))
    {
		scanf("%s%s",one.tel,one.addr);
		fprintf(fp,"%-10s%-20s%-50s\n",one.name,one.tel,one.addr);
		scanf("%s",one.name);
    }
    fclose(fp);
}

void output()
{
	struct person one;

    if((fp=fopen(filename,"r"))==NULL)
    {
		printf("\n不能打開通訊簿！");
		exit();
    }
    printf("\n\n%20s\n","通 訊 簿");
    while(!feof(fp))
    {
		fscanf(fp,"%s%s%s\n",one.name,one.tel,one.addr);
		printf("%-10s%-20s%-50s",one.name,one.tel,one.addr);
    }
    fclose(fp);
}

void append()
{
	struct person one;

    if((fp=fopen(filename,"a"))==NULL)
    {
		printf("\n不能打開通訊簿！");
		exit();
    }
    printf("\n請輸入添加的姓名、電話號碼及住址\n");
    scanf("%s%s%s",one.name,one.tel,one.addr);
    fprintf(fp,"%-10s%-20s%-50s\n",one.name,one.tel,one.addr);
    fclose(fp);
}

void search()
{  
	int k=0;
    char namekey[8];
    struct person one;

    printf("\n請輸入姓名:");
    scanf("%s",namekey);

    if((fp=fopen(filename,"rb"))==NULL)
    {  
		printf("\n不能打開通訊簿！");
		exit();
    }
    while(!feof(fp))
    {  
		fscanf(fp,"%s%s%s\n",one.name,one.tel,one.addr);
		if(!strcmp(namekey,one.name))
		{
			printf("\n\n已查到，記錄為：");
			printf("\n%-10s%-18s%-50s",one.name,one.tel,one.addr);
			k=1;
        }
    }
    if(!k)  
		printf("\n\n對不起，通訊簿中沒有此人的記錄。");
    fclose(fp);
}

void modify()
{  
	int m,k=0;
    long offset;
    char namekey[8];
    struct person one;

    printf("\n請輸入姓名:");
    scanf("%s",namekey);

    if((fp=fopen(filename,"r+"))==NULL)
    {  
		printf("\n不能打開通訊簿！");
		exit();
    }
    while(!feof(fp))
    {  
		offset=ftell(fp);
		fscanf(fp,"%s%s%s\n",one.name,one.tel,one.addr);
		if(!strcmp(namekey,one.name))
		{
			k=1;
			break;  
		}
    }
    if(k)
	{  
		printf("\n已查到，記錄為：");
        printf("\n%-10s%-18s%-50s",one.name,one.tel,one.addr);
        printf("\n請輸入新姓名、電話號碼及住址：");
		scanf("%s%s%s",one.name,one.tel,one.addr);
		fseek(fp,offset,SEEK_SET);
		printf("%ld",ftell(fp));
		fprintf(fp,"%-10s%-20s%-50s\n",one.name,one.tel,one.addr);
	}
    else
		printf("\n對不起，通訊簿中沒有此人的記錄。");
    fclose(fp);
}

void delete()
{  
	int m,k=0,flag;
    long offset1,offset2;
    char namekey[8], valid[4];
    struct person one;

    printf("\n請輸入姓名:");
    scanf("%s",namekey);
    if((fp=fopen(filename,"r+"))==NULL)
    {  
		printf("\n不能打開通訊簿！");
		exit();
    }
    while(!feof(fp))
    {  
		offset1=ftell(fp);
		fscanf(fp,"%s%s%s\n",one.name,one.tel,one.addr);
		if(!strcmp(namekey,one.name))
		{   
			k=1;
			break; 
		}
    }
    if(k)
	{ 
		printf("\n已查到，記錄為");
        printf("\n%-10s%-18s%-50s",one.name,one.tel,one.addr);
        printf("\n確實要刪除,按1；不刪除，按0：");
        scanf("%d",&m);
        if(m)
		{   
			fseek(fp,offset1,SEEK_SET);
			fprintf(fp,"%-10s%-20s%-50s\n","","","");
		}
	}
    else
		printf("\n對不起，通訊簿中沒有此人的記錄。");
    fclose(fp);
}