/*
Considerando una lista de valores enteros, con puntero inicio y final,
modifique la definición y operaciones básicas de listas de modo que sea
posible registrar la cantidad de valores. Desarrolle las operaciones
iniciar_lista, crear_nodo, agregar_inicio, quitar_final y mostrar_lista.
para un registro que guarde la información de un producto (codigo, nombre, precio)
*/

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

const int MAX=10;
typedef char tcad[30];
typedef struct tproducto{
        int codigo;
        tcad nombre;
        float precio;
};

typedef struct tnodo *pnodo;

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

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

//Creación del nodo
void crear(pnodo &nuevo);

//Agregar un elemento
void agregar_inicio(tlista &lis, pnodo nuevo);


bool lista_llena(tlista lis);

//Quitar un elemento
pnodo quitar_final(tlista &lis);


//Recorrer/Mostrar la lista

void mostrar_lista(tlista lis);
void mostrar(tproducto prod);
void mostrar_rec(pnodo lis);


void menu(int &opc);



main()
{
    tlista lista;
    pnodo nuevo, eliminado;
    int op, valor, op2;
    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;
                    eliminado=quitar_final(lista);
                    if(eliminado!=NULL)
                    {
                      //cout<<"Eliminado "<<eliminado->dato<<endl;
                      mostrar(eliminado->dato);
                      delete(eliminado);
                    }
                    else
                       cout<<" No se puede eliminar, lista vacia"<<endl;

                    break;

            case 3: cout<<"..........Lista.........."<<endl;
                    mostrar_lista(lista);
                    cout<<"\n cantidad de nodos: "<<lista.cont<<endl;
                    mostrar_rec(lista.inicio);

                    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;
    lis.cont=0;

}

//Creación del nodo
void crear(pnodo &nuevo)
{
    nuevo=new tnodo;
    if(nuevo!=NULL)
    {
        cout<<"Ingrese codigo: ";
        cin>> nuevo->dato.codigo;
        cout<<"Ingrese nombre: ";
        fflush(stdin);
        gets(nuevo->dato.nombre);
        cout<<"Ingrese precio: ";
        cin>>nuevo->dato.precio;

        nuevo->sig=NULL;
    }
    else
        cout<<"Memoria llena"<<endl;
}

//Agregar elemento
void agregar_inicio(tlista &lis, pnodo nuevo)
{
  if(lis.cont==MAX)
    { cout<<"No se puede agregar mas nodos"<<endl;
      delete(nuevo);
    }
  else{
    if(lis.inicio==NULL) //lis.cont==0 lis.fin==NULL
    {
      lis.inicio=nuevo;
      lis.fin=nuevo;
      lis.cont++;
    }
    else{
      nuevo->sig=lis.inicio;
      lis.inicio=nuevo;
      lis.cont++;
    }
  }
}

pnodo quitar_final(tlista &lis)
{ pnodo aux, i;
    if(lis.inicio==NULL)//lis.cont==0  lis.fin==NULL
        aux=NULL;
    else
    { if(lis.inicio->sig==NULL) //lis.cont==1 o lis.inicio==lis.fin
        {
            aux=lis.inicio; //aux=lis.fin
            lis.inicio=NULL;
            lis.fin=NULL;
        }
        else
        {for(i=lis.inicio; (i->sig)!=lis.fin;i=i->sig);
         aux=lis.fin;//aux=i->sig;
         lis.fin=i;
         i->sig=NULL;//lis.fin->sig=NULL;
        }
       lis.cont--;
    }
    return aux;
}


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

void mostrar(tproducto prod)
{
  cout<<"\ncodigo: "<<prod.codigo<<endl;
  cout<<"nombre: "<<prod.nombre<<endl;
  cout<<"precio: "<<prod.precio<<endl;
}
//Menus de opciones
void menu(int &opc)
{
    cout<<"..........MENU.........."<<endl;
    cout<<"1- Agregar un elemento"<<endl;
    cout<<"2- Quitar un elemento"<<endl;
    cout<<"3- Mostrar lista"<<endl;
    cout<<"4- Salir"<<endl;
    cout<<"Elija una opcion: ";
    cin>>opc;
}

bool lista_llena(tlista lis)
{
  return (lis.cont==MAX);
}

void mostrar_rec(pnodo lis)
{
  if(lis!=NULL)
  {// cout<<lis->dato<<endl;
    mostrar_rec(lis->sig);
    mostrar(lis->dato);
  }
}