#include <stdio.h>
#include <string.h>
#include <stdlib.h>
struct node
{
    char number[50];
    char gmail[40];
    char name[30];
    struct node *prev, *next;
} *head = NULL;

void insert()
{
    char number[10];
    char gmail[100];
    char name[100];
    char ans;
    do
    {
        struct node *p;
        p = (struct node *)malloc(sizeof(struct node));
        printf("Enter The Name of The Contact: ");
        fgets(name, 100, stdin);
        fflush(stdin);
        strcpy(p->name, name);
        printf("Enter The Phone Number    :\t");
        fgets(number, 10, stdin);
        fflush(stdin);
        strcpy(p->number, number);
        while (strlen(number) != 9)
        {
            printf("ENTER A VALID 10 DIGIT NUMBER  :\t");
            fgets(number, 10, stdin);
        }
        printf("Enter The G-Mail ID  :\t");
        fgets(gmail, 100, stdin);
        strcpy(p->gmail, gmail);
        fflush(stdin);

        if (head == NULL)
        {
            p->next = NULL;
            p->prev = NULL;
            head = p;
        }
        else
        {
            struct node *tmp = head;
            while (tmp->next != NULL)
            {
                tmp = tmp->next;
            }
            p->next = NULL;
            p->prev = tmp;
            tmp->next = p;
        }
        printf("DO YOU WANT TO CONTINUE?????????\n");
        scanf("%c", &ans);
        fflush(stdin);
    } while (ans == 'y');
}
void display()
{
    struct node *tmp = head;
    while (tmp != NULL)
    {
        printf("\nNAME  ::  %s", tmp->name);
        printf("\nNUMBER::  +91-%s", tmp->number);
        printf("\nG-MAIL::  %s", tmp->gmail);
        tmp = tmp->next;
    }
}
void sort()
{
    struct node *i, *j;
    int temp;
    char a[100], b[100], c[100];
    for (i = head; i->next != NULL; i = i->next)
    {
        for (j = i->next; j != NULL; j = j->next)
        {
            temp = strcmp(i->name, j->name);
            if (temp > 0)
            {
                strcpy(a, i->name);
                strcpy(i->name, j->name);
                strcpy(j->name, a);
                strcpy(b, i->number);
                strcpy(i->number, j->number);
                strcpy(j->number, b);
                strcpy(c, i->gmail);
                strcpy(i->gmail, j->gmail);
                strcpy(j->gmail, c);
            }
        }
    }
}
void deletecontact(char *s)
{
    int c = 0;
    struct node *tmp = head;
    while (tmp != NULL)
    {
        if (strcmp(s, tmp->name) == 0)
        {
            c = 1;
            break;
        }
        else
        {
            c = 2;
        }
        tmp = tmp->next;
    }
    if (c == 1 && tmp != head && tmp->next != NULL)
    {
        tmp->prev->next = tmp->next;
        tmp->next->prev = tmp->prev;
        free(tmp);
        printf("YOUR CONTACT IS SUCCESSFULLY DELETED\n\n");
    }
    if (tmp == head)
    {
        head = head->next;
        head->prev = NULL;
        free(tmp);
        printf("YOUR CONTACT IS SUCCESSFULLY DELETED\n\n");
    }
    if (tmp->next == NULL)
    {
        tmp->prev->next = NULL;
        tmp->prev = NULL;
        free(tmp);
        printf("YOUR CONTACT IS SUCCESSFULLY DELETED\n\n");
    }
    if (c == 2)
    {
        printf("YOUR ENTERED NAME IS NOT IN THE LIST\n");
    }
}
void deletesamename()
{
    struct node *tmp1 = head;
    while (tmp1 != NULL && tmp1->next != NULL)
    {
        struct node *tmp2 = tmp1;
        while (tmp2->next != NULL)
        {
            if (strcmp(tmp1->name, tmp2->next->name) == 0)
            {
                struct node *dup = tmp2->next;
                tmp2->next = tmp2->next->next;
                free(dup);
            }
            else
            {
                tmp2 = tmp2->next;
            }
        }
        tmp1 = tmp1->next;
    }
}
void deletesamegmail()
{
    struct node *tmp1 = head;
    while (tmp1 != NULL && tmp1->next != NULL)
    {
        struct node *tmp2 = tmp1;
        while (tmp2->next != NULL)
        {
            if (strcmp(tmp1->gmail, tmp2->next->gmail) == 0)
            {
                struct node *dup = tmp2->next;
                tmp2->next = tmp2->next->next;
                free(dup);
            }
            else
            {
                tmp2 = tmp2->next;
            }
        }
        tmp1 = tmp1->next;
    }
}
void deletesamenumber()
{
    struct node *tmp1 = head;
    while (tmp1 != NULL && tmp1->next != NULL)
    {
        struct node *tmp2 = tmp1;
        while (tmp2->next != NULL)
        {
            if (strcmp(tmp1->number, tmp2->number) == 0)
            {
                struct node *dup = tmp2->next;
                tmp2->next = tmp2->next->next;
                free(dup);
            }
            else
            {
                tmp2 = tmp2->next;
            }
        }
        tmp1 = tmp1->next;
    }
}
void searchbyname(char *na)
{
    struct node *tmp = head;
    while (tmp != NULL)
    {
        if (strcmp(na, tmp->name) == 0)
        {
            printf("NAME FOUND\n");
            printf("CONTACT DETAILS ARE BELOW:\n");
            printf("\n\nNAME  ::\t%s", tmp->name);
            printf("\nNUMBER::\t+91-%s", tmp->number);
            printf("\nG-MAIL::\t%s", tmp->gmail);
        }
        tmp = tmp->next;
    }
}
void searchbynumber(char *num)
{
    struct node *tmp = head;
    while (tmp != NULL)
    {
        if (strcmp(num, tmp->number) == 0)
        {
            printf("NUMBER FOUND\n");
            printf("CONTACT DETAILS ARE BELOW:\n");
            printf("\n\nNAME  ::\t%s", tmp->name);
            printf("\nNUMBER::\t+91-%s", tmp->number);
            printf("\nG-MAIL::\t%s", tmp->gmail);
        }
        tmp = tmp->next;
    }
}
void searchbygmail(char *gm)
{
    struct node *tmp = head;
    while (tmp != NULL)
    {
        if (strcmp(gm, tmp->gmail) == 0)
        {
            printf("G-MAIL FOUND\n");
            printf("CONTACT DETAILS ARE BELOW:\n");
            printf("\n\nNAME  ::\t%s", tmp->name);
            printf("\nNUMBER::\t+91-%s", tmp->number);
            printf("\nG-MAIL::\t%s", tmp->gmail);
        }
        tmp = tmp->next;
    }
}
int main()
{
    char n[100];
    char nam[100];
    char name[100];
    char number[100];
    char gmail[100];
    char ans;
    int ch, a;
    printf("**************                                PHONE BOOK                          ********************\n");
    printf("\n\nWHAT IS YOUR NAME?\n");
    fgets(name, 100, stdin);
    printf("\n\n!!!!!!!!!!!!!!!!!!!!!!!   Welcome  !!!!!!!!!!!!!!!!!!!!!!! \n");
    printf("\n\n\nLET'S CREATE OUR PHONEBOOK \n\n");
    insert();
    sort();
    fflush(stdin);
    while (1)
    {
        printf("\n\n\n\n1) DISPLAY YOUR PHONE BOOK\n2) INSERT NEW CONTACT\n3) UPDATE DETAILS ON EXISTING CONTACT\n4) DELETE CONTACT\n5) DELETE SAME NAME IN PHONEBOOK\n6) DELETE SAME NUMBERS IN PHONEBOOK\n7) SEARCH\n");
        scanf("%d", &ch);
        fflush(stdin);
        switch (ch)
        {
        case 1:
            display();
            break;

        case 2:
            insert();
            sort();
            break;

        case 4:
            printf("\nENTER THE NAME YOU WANT TO DELETE FROM PHONEBOOK\n");
            fgets(name, 100, stdin);
            deletecontact(name);
            fflush(stdin);
            break;

        case 5:
            deletesamename();
            display();
            break;

        case 6:
            deletesamenumber();
            display();
            break;
        case 7:
            do
            {
                printf("1.SEARCH BY NAME\n2.SEARCH BY NUMBER\n3.SEARCH BY GMAIL\n");
                scanf("%d", &a);
                fflush(stdin);
                switch (a)
                {
                case 1:
                    printf("\nENTER THE NAME TO BE SEARCHED\n");
                    fgets(name, 100, stdin);
                    fflush(stdin);
                    searchbyname(name);
                    break;
                case 2:
                    printf("ENTER THE NUMBER TO BE SEARCHED\n");
                    fgets(number, 100, stdin);
                    fflush(stdin);
                    searchbynumber(number);
                    break;
                case 3:
                    printf("ENTER THE GMAIL ID TO BE SEARCHED\n");
                    fgets(gmail, 100, stdin);
                    fflush(stdin);
                    searchbygmail(gmail);
                    break;
                default:
                    printf("\nNO PROPER INPUT GIVEN.....\n");
                }
                printf("DO YOU WANT TO CONTINUE SEARCHING?????????");
                scanf("%c", &ans);
                fflush(stdin);
            } while (ans == 'y');

            break;
        }

        printf("\n\nDO YOU WANT TO CONTINUE OPERATIONS?????????\n");
        scanf("%c", &ans);
        if (ans != 'y')
            break;
        fflush(stdin);
    }
}