#include <stdio.h>
#include <stdlib.h>
#include <locale.h>
#include <conio.h>
#define MAX 200

typedef struct cel
{
    int cod;
    char nome[MAX];
    char cc[MAX];
    char date[MAX];
    struct cel *prox;
}celula;

 //celula* é o tipo do retorno da função
 //cria_celula, e eu ia colocar void nos parenteses da função para que a função não recebesse dados
 //coloca as variáveis a nulo
celula* cria_celula()
{
    celula *nova;
    nova = (celula*)malloc( sizeof(celula) );
    if(nova != NULL)
    {
        nova->prox = NULL;
        nova->nome[0] = '\0';
        nova->cc[0] = '\0';
        nova->date[0] = '\0';
        nova->cod = -1;
    }
    return nova;
}


 //função que só serve para ir buscar aos apontadores os dados dos utentes
void mostra(celula *x)
{
    printf("\nCódigo: %d ", x->cod);
    printf("\nNome: %s",x->nome);
    printf("\nCartão de Cidadão: %s",x->cc);
    printf("\nData: %s",x->date);
    printf("\n");
    printf("\n");
}

 //lista
void listar(celula *lista)
{
    celula *p;
    if (lista == NULL)
    {
        printf("\nnão tem nada.\n");
        getchar();
        return;
    }

    printf("\nlista: ");
    for (p = lista; p != NULL; p = p->prox)
    //chama a função anterior que mostra os dados
    {
        mostra(p);
    }
    getch();
}

//pesquisa...
celula *busca(celula *lista)
{
    int num = 0;
    celula *p;
    printf("numero para procurar: ");
    scanf("%d",&num);
    //se não fizer getchar ele não faz a pesquisa
    getchar();

    p = lista;
    while( (p != NULL) && (p->cod != num) )
        p = p->prox;
    return p;
}

//inserir
void insere(celula **lista)
{
    celula *nova = cria_celula();
    if(nova == NULL)
    {
        printf("Nao foi possivel criar uma nova celula!");
        getchar();
        return;
    }
    printf("Numero: ");
    scanf("%d",&nova->cod);
    printf("Nome: ");
    scanf(" %s",nova->nome);
    printf("Cartão de Cidadão: ");
    scanf(" %s",nova->cc);
    printf("Data: ");
    scanf(" %s",nova->date);
    nova->prox = *lista;
    *lista = nova;
    printf("Numero %d inserido.\n", nova->cod);
    getch();
    system("cls");
}


void remove(celula **lista)
{
    if (*lista == NULL)
    {
        printf("\nLista vazia. Sem itens para remover.\n");
        getchar();
        return;
    }
    else
    {
        celula *remover = *lista;
        *lista = remover->prox;
        printf("\ncodigo do paciente: %d ",remover->cod);
        printf("\nNome do Paciente : %s",remover->nome);
        printf("\nCartão de Cidadão: %s",remover->cc);
        printf("\ndata: %s",remover->date);
        free(remover);
        getchar();
    }
}
///este
void remover_p(celula **lista)
{
    if (*lista == NULL)
    {
        printf("\nLista vazia. Sem itens para remover.\n");
        getchar();
        return;
    }
    else
    {
        celula *remover = *lista;
        *lista = remover->prox;
        printf("\ncodigo do paciente: %d ",remover->cod);
        printf("\nNome do Paciente : %s",remover->nome);
        printf("\nCartão de Cidadão: %s",remover->cc);
        printf("\ndata: %s",remover->date);
        free(remover);
        getchar();
    }
}


void alterar(celula *lista)
{
    celula *cel;
    //vai buscar a busca para fazer a pesquisa
    cel = busca(lista);
    if(cel == NULL)
    {
        printf("Numero encontrou!");
        getchar();
        return;
    }

    //vai chamar a função mostrar
    mostra(cel);
 //apos mostrar
 //pede os novos valores
    printf("alterar\n");
    printf("************************\n");
    printf("Numero: ");
    scanf("%d",&cel->cod);
    printf("Nome: ");
    scanf(" %s",cel->nome);
    printf("Cartão de Cidadão: ");
    scanf(" %s",cel->cc);
    printf("Data: ");
    scanf(" %s",cel->date);
}

char menu(void)
{
    system("cls");
    char opcao;

    printf("              Menu          ");
    printf("\n*************************************");
    printf("\n*    1-Inserir paciente             *");
    printf("\n*    2-Lista de pacientes           *");
    printf("\n*    3-procurar paciente            *");
    printf("\n*    4-paciente desisitiu           *");
    printf("\n*    5-Alterar dados de paciente    *");
    printf("\n*    6-primeiro paciente desistiu   *");
    printf("\n*    0-sair                         *");
    printf("\n*************************************\n");
    printf("Opção: ");
    scanf(" %c",&opcao);
    getchar();

    return opcao;
}

int main(void)
{
    setlocale(LC_ALL, "Portuguese");

    celula *lista = NULL;
    char op;
    celula *p;

    do
    {
        op = menu();

        switch(op)
        {
            case '0':
                printf("\n\nsair...\n");
                break;
            case '1':
                insere(&lista);
                break;
            case '2':
                listar(lista);
                break;
            case '3':
                 //procura até encontrar ou não
                p = busca(lista);
                if(p == NULL)
                {
                    printf("nao encontrou...");
                    getchar();
                }
                else
                {
                    printf("\nencontrou");
                    printf("\n*******************");
                    //depois vai buscar a lista de dados que encontrou
                    mostra(p);
                    getchar();
                }
                break;
            case '4':
                remove(&lista);
                break;
            case '5':
                alterar(lista);
                break;
            case '6':
                remover_p(&lista);
                break;
            default:
                    //não está muito bem não tive tempo
                printf("Opcao invalida!");
                printf(" enter para continuar...");
                getchar();
        }

    } while (op != '0');

    return 0;
}