/*
Dada una lista circular de caracteres con 2 punteros
-defina las estructuras de datos que permitan representarla e
-implemente las operaciones iniciar_lista, agregar_inicio, quitar_nodo (según un valor específico)
 y mostrar_lista.

*/

#include <iostream>
#include <stdio.h>
#include <stdlib.h>
using namespace std;

typedef struct tnodo *pnodo;

typedef struct tnodo{
                    char dato;
                    pnodo sig;
                    };

typedef struct tlista{
          pnodo inicio;
          pnodo fin;
};
//Inicialización de la lista
void iniciar_lista(tlista &lis);

//Creación del nodo
void crear(pnodo &nuevo);
void agregar_inicio(tlista &lis, pnodo nuevo);
pnodo quitar_especifico(tlista &lis, char valor);
void mostrar_lista(tlista lis);
void menu(int &op);

main()
{
    tlista lista;
    pnodo nuevo, eliminado;
    int op;
    char valor;
    iniciar_lista(lista);
    do{ system("cls");
        menu(op);
        switch(op)
        {
            case 1: cout<<".....Agregar valor ......"<<endl;
                    crear(nuevo);
                    if(nuevo!=NULL)
                      agregar_inicio(lista, nuevo);
                    else
                        cout<<"Memoria llena"<<endl;
                    break;

            case 2: cout<<".....Quitar valor ......"<<endl;
                    cout<<"Ingrese valor: ";
                    cin>>valor;
                    eliminado=quitar_especifico(lista, valor);
                    if(eliminado!=NULL)
                    {
                      cout<<"Eliminado "<<eliminado->dato<<endl;
                      delete(eliminado);
                    }
                    else
                       cout<<" No se puede eliminar, lista vacia"<<endl;

                    break;

            case 3: cout<<"..........Lista.........."<<endl;
                    mostrar_lista(lista);

                    break;
            case 4: cout<<"...........FIN DEL PROGRAMA..........."<<endl;

                    break;
            default : cout<<" OPCION INCORRECTA"<<endl;
        }
        system("pause");

    }while(op!=4);


}
//Inicialización
void iniciar_lista(tlista &lis)
{
    lis.inicio=NULL;
    lis.fin=NULL;
}

//Creación del nodo
void crear(pnodo &nuevo)
{
    nuevo=new tnodo;
    if(nuevo!=NULL)
    {
        cout<<"Ingrese valor: ";
        cin>> nuevo->dato;
        nuevo->sig=NULL;
    }
    else
        cout<<"Memoria llena"<<endl;
}

//Agregar elemento
void agregar_inicio(tlista &lis, pnodo nuevo)
{   //pnodo i;
    if(lis.inicio==NULL)
    {
      lis.inicio=nuevo;
      lis.fin=nuevo;
      //lis.fin->sig=lis.inicio;
    }
    else
    { //for(i=lis;i->sig!=lis;i=i->sig); i=lis.fin

      nuevo->sig=lis.inicio;
      lis.inicio=nuevo;
      //lis.fin->sig=lis.inicio;
    }
    lis.fin->sig=lis.inicio;
}

//quita un nodo que coincide con un valor ingresado por el usuario
pnodo quitar_especifico(tlista &lis, char borrado)
{
    pnodo i, aux;
    if(lis.inicio==NULL)
        aux=NULL;
    else
        {if(lis.inicio->dato==borrado)//si es el primero
          { if(lis.inicio==lis.fin) //unico elemento
            { aux=lis.inicio;
              lis.inicio=NULL;
              lis.fin=NULL;
              aux->sig=NULL;
            }
            else //mas de un elemento
            {
              //for(i=lis;i->sig!=lis;i=i->sig);
              aux=lis.inicio;
              lis.inicio=aux->sig;
              lis.fin->sig=lis.inicio;//engancha el ultimo con el primero
              aux->sig=NULL;
            }
          }
        else//no es el primero
        {
            for(i=lis.inicio; i!=lis.fin && (i->sig)->dato != borrado; i=i->sig);
            if((i->sig)->dato==borrado)
            {  //if(i->sig==lis.fin) lis.fin=i;
                aux=i->sig;
                i->sig=aux->sig;
                aux->sig=NULL;
                if(aux==lis.fin)
                  lis.fin=i;
            }
            else
                aux=NULL;
        }
        }
        return aux;
}

//Mostrar los elementos de la lista
void mostrar_lista(tlista lis)
{
    pnodo i;
    for(i=lis.inicio; i!=lis.fin; i=i->sig)
        cout<<i->dato<<endl;
    cout<<lis.fin->dato<<endl;
}

void menu(int &op)
{
    cout<<"****MENU****"<<endl;
    cout<<"1-agregar"<<endl;
    cout<<"2-eliminar valor"<<endl;
    cout<<"3-mostrar"<<endl;
    cout<<"4-salir"<<endl;
    cout<<"elija opcion: ";
    cin>>op;
}