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

int idx =0;

typedef struct telInfo{
    char name[10];
    char tel[10];
} telInfo;

void insertInfo(telInfo * arr){
    puts("[ INSERT ]");
    printf("Input Name: ");
    scanf("%s",arr[idx].name);
    printf("Input Tel Number: ");
    scanf("%s",arr[idx].tel);
    printf("%30s\n\n","Data Inserted");
    idx++;
    arr = (telInfo*)realloc(arr,sizeof(telInfo)*(idx+1));
    strcpy(arr[idx].name,"");
    strcpy(arr[idx].tel,"");
}

void delInfo(telInfo * arr){
    char name[10];
    int i=0,j=0,k=0;
    puts("[ DELETE ]");
    if (idx==0){
        puts("[ No Data ]\n");
        return;
    }
    printf("Input name: ");
    scanf("%s",name);
    for(i=0;i<idx;i++){
        if(!strcmp(arr[i].name,name)){
            for(j=i;j<idx;j++){
                strcpy(arr[j].name,arr[j+1].name);
                strcpy(arr[j].tel,arr[j+1].tel);
            }
            idx--;
            arr = (telInfo*)realloc(arr,sizeof(telInfo)*(idx+1));
            k=1;
            puts("[ Deleted ]");
        }
    }
    if (k==0)
        puts("[ Not Found ]");
    puts("");
}

void showInfo(telInfo * arr){
    puts("[ Print All Data ]");
    if (idx==0){
        puts("[ No Data ]\n");
        return;
    }
    for(int i=0;i<idx;i++){
        printf("Name: %-10sTel: %-10s\n",arr[i].name,arr[i].tel);
    }
    puts("");
}

void searchInfo(telInfo * arr){
    char name[10];
    int i=0,j=0;
    puts("[ SEARCH ]");
    if (idx==0){
        puts("[ No Data ]\n");
        return;
    }
    printf("Input name: ");
    scanf("%s",name);
    for(i=0;i<idx;i++){
        if(!strcmp(arr[i].name,name)){
            printf("Name: %-10sTel: %-10s\n",arr[i].name,arr[i].tel);
            j=1;
        }
    }
    if (j==0)
        puts("[ Not Found ]");
    puts("");
}

void printMenu(void){
    puts("***** MENU *****");
    puts("1. Insert");
    puts("2. Delete");
    puts("3. Search");
    puts("4. Print All");
    puts("5. Exit");
    printf("Choose the item: ");
}

void saveFile(telInfo * arr){
    FILE * fp = fopen("TEST.txt","wt");
    for(int i=0;i<idx;i++){
        fprintf(fp,"%s %s\n",arr[i].name,arr[i].tel);
    }
    fclose(fp);
}

void loadFile(telInfo *arr){
    int num;
    printf("%p\n",arr);
    FILE * lp = fopen("TEST.txt","rt");
    if (lp==NULL){
        return;
    }
    for(int i=0;;i++){
        num = fscanf(lp,"%s %s ",arr[i].name,arr[i].tel);
        if(num==EOF)
            break;
        idx++;
        arr = (telInfo*)realloc(arr,sizeof(telInfo)*(idx+1));
        strcpy(arr[idx].name,"");
        strcpy(arr[idx].tel,"");
    }
    fclose(lp);
}

int main(void){
    int choice;
    telInfo * arr = (telInfo*)calloc(idx+1,sizeof(telInfo));
    loadFile(arr);
    while (choice != 5){
        printMenu();
        scanf("%d",&choice); getchar();
        switch(choice){
            case 1:
                insertInfo(arr);
                break;
            case 2:
                delInfo(arr);
                break;
            case 3:
                searchInfo(arr);
                break;
            case 4:
                showInfo(arr);
                break;
            case 5:
                puts("[ EXIT ]");
                break;
            default:
                puts("Wrong choice");
        }
    }
    saveFile(arr);
    free(arr);
    return 0;
}