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


/*
PROGRAM: tablas_hash
DESCRIPCION: Implementar una tabla hash deacuerdo a la clave elegida (entera, flotante, cadena)
AUTOR: Francisco J. Hernández López
FECHA_INICIO: 02/Octubre/2014
FECHA_ACTUALIZACION:03/Octubre/2014
*/

/*PARAMETROS*/
#define M 10

typedef struct _tabla{
	int ocupado;
	char clave_cadena[50];
	int dia;
	int mes;
	int anhio;
	char nombre[100];
}tipoTabla; 


int funcion_hash_cadena(char *clave_k);
void Insertar(tipoTabla *Tabla,char *clave_k,char *nombre_k,int indice);
void Desplegar(tipoTabla *Tabla);
int funcion_hash_compuesta(int clave_dia_k,int clave_mes_k,int clave_anhio_k);
void Insertar_compuesta(tipoTabla *Tabla,int clave_dia_k,int clave_mes_k,int clave_anhio_k,char *nombre_k,int indice);
void Desplegar_compuesta(tipoTabla *Tabla);

int main(void){
	tipoTabla Tabla[M];
	int indice;
	//Inicializar el campo ocupado
	for(int i=0;i<M;i++)
		Tabla[i].ocupado=0;

	char clave_k[50];//Clave de entrada
	int clave_dia_k;
	int clave_mes_k;
	int clave_anhio_k;
	char nombre_k[100];//Valor de entrada
	int op;
	
	do{
		system("cls");
		printf("\n1. ALTAS");
		printf("\n2. CONSULTAR TABLA");
		printf("\n3. BAJAS");
		printf("\n6. Salir...");

		printf("\n\nElige una op: ");
		fflush(stdin);//Limpia el buffer utilizado por el teclado. 
		scanf("%d",&op);

		switch(op){
			case 1:
				//Clave cadena
				/*printf("\nIngresa tu IFE: ");
				fflush(stdin);
				gets(clave_k);*/

				//Clave compuesta
				printf("\nIngresa dd, mm, aaaa: ");
				scanf("%d,%d,%d",&clave_dia_k,&clave_mes_k,&clave_anhio_k);
				
				printf("\nIngresa tu nombre: ");
				fflush(stdin);
				gets(nombre_k);
				//scanf("%s",nombre_k);
				//indice=funcion_hash_cadena(clave_k);
				//Insertar(Tabla,clave_k,nombre_k,indice);

				indice=funcion_hash_compuesta(clave_dia_k,clave_mes_k,clave_anhio_k);
				Insertar_compuesta(Tabla,clave_dia_k,clave_mes_k,clave_anhio_k,nombre_k,indice);

				break;
			case 2:
				//Desplegar(Tabla);
				Desplegar_compuesta(Tabla);
				printf("\n\n");
				system("pause");
				break;
			/*case 3:
				//Clave compuesta
				printf("\nIngresa la clave a eliminar dd, mm, aaaa: ");
				scanf("%d,%d,%d",&clave_dia_k,&clave_mes_k,&clave_anhio_k);

				indice=funcion_hash_compuesta(clave_dia_k,clave_mes_k,clave_anhio_k);
				Eliminar_compuesta(Tabla,);
				*/

			case 6:
				printf("\nPrograma finalizado...");
				break;
			default:
				printf("\nIngresa un numero valido...");
				break;
		}
	}while(op!=6);
	printf("\n\n");
	system("pause");
	return(0);
}

int funcion_hash_cadena(char *clave_k){
	int hash=0;
	int R=31;//Numero primo
	for(int i=0;i<strlen(clave_k);i++){
		hash=(R*hash + clave_k[i]) % M;
	}
	return(hash);
}

int funcion_hash_compuesta(int clave_dia_k,int clave_mes_k,int clave_anhio_k){
	int hash;
	int R=31;//Numero primo
	hash=(((clave_dia_k*R + clave_mes_k) % M)*R + clave_anhio_k) % M;
	return(hash);
}

void Insertar(tipoTabla *Tabla,char *clave_k,char *nombre_k,int indice){
	//Hay que ver si el indice no está ocupado
	if(Tabla[indice].ocupado==0){
		Tabla[indice].ocupado=1;
		strcpy(Tabla[indice].clave_cadena,clave_k);
		strcpy(Tabla[indice].nombre,nombre_k);
	}
	else{
		printf("\nLa posición ha sido ocupada...");
		printf("\n\n");
		system("pause");
	}
}

void Insertar_compuesta(tipoTabla *Tabla,int clave_dia_k,int clave_mes_k,int clave_anhio_k,char *nombre_k,int indice){
	//Hay que ver si el indice no está ocupado
	if(Tabla[indice].ocupado==0){
		Tabla[indice].ocupado=1;
		//strcpy(Tabla[indice].clave_cadena,clave_k);
		Tabla[indice].dia=clave_dia_k;
		Tabla[indice].mes=clave_mes_k;
		Tabla[indice].anhio=clave_anhio_k;
		strcpy(Tabla[indice].nombre,nombre_k);
	}
	else{
		printf("\nLa posición ha sido ocupada...");
		printf("\n\n");
		system("pause");
	}
}


void Desplegar(tipoTabla *Tabla){
	printf("\nTabla Completa\n");
	for(int i=0;i<M;i++){
		if(Tabla[i].ocupado==1)
			printf("\n<Ocupado: 1><Clave: %s><Valor: %s>",Tabla[i].clave_cadena,Tabla[i].nombre);
		else
			printf("\n<Ocupado: 0><Clave: --><Valor: -->");
	}
}

void Desplegar_compuesta(tipoTabla *Tabla){
	printf("\nTabla Completa\n");
	for(int i=0;i<M;i++){
		if(Tabla[i].ocupado==1)
			printf("\n<Ocupado: 1><Clave: %d,%d,%d><Valor: %s>",Tabla[i].dia,Tabla[i].mes,Tabla[i].anhio,Tabla[i].nombre);
		else
			printf("\n<Ocupado: 0><Clave: --,--,--><Valor: -->");
	}
}