#include <stdio.h>
#include <windows.h>
#include <string.h>
 
typedef struct{
	int orden;
	char nombre[30];
	char apellido[30];
	char direccion[30];
	int numCalle;
	char ciudad[30];
	char provincia[30];
}Cliente;
 
void mosDtos(Cliente *ptrCliente);
void ingDtos(Cliente *ptrCliente);
void opciones(Cliente *ptrCliente);
void graDtos(Cliente *ptrCliente);
 
int main(void){
	FILE *ptrCte;
	Cliente datos  = {0, "\0", "\0", "\0", 0, "\0", "\0"};
 
	if(( ptrCte = fopen( "archivo.txt", "w" )) == NULL ){
		perror(" archivo.txt ");
	}
	else{
		ingDtos(&datos);
		fclose(ptrCte);
	}
 
	getchar();
	return 0;
}
 
void mosDtos(Cliente *ptrCliente){
	system("cls");
 
	printf("\n\n == Introduzca datos del cliente \"Ningun campo puede permanecer vacio\" ==");
	printf( "\n\n =========================================================================\n" );
	printf("\n Orden...............: %d", ptrCliente->orden);
	printf("\n Nombre..............: %s", ptrCliente->nombre);
	printf("\n Apellido............: %s", ptrCliente->apellido);
	printf("\n Direccion...........: %s", ptrCliente->direccion);
	printf("\n Altura de la calle..: %d", ptrCliente->numCalle);
	printf("\n Ciudad..............: %s", ptrCliente->ciudad);
	printf("\n Provincia...........: %s", ptrCliente->provincia);
	printf( "\n\n =========================================================================\n" );
}
 
void ingDtos(Cliente *ptrCliente){
	int ok, ch;
	char *p = NULL;
 
	do{
		mosDtos(ptrCliente);
		printf("\n Orden...............: ");
		ok = scanf("%d", &ptrCliente->orden) == 1 && ptrCliente->orden >= 1;
		while ((ch = getchar()) != EOF && ch != '\n');
	}while(!ok);	
 
	do{
		mosDtos(ptrCliente);
		printf("\n Nombre..............: ");
		fgets(ptrCliente->nombre, 30, stdin);
		if((p=strchr(ptrCliente->nombre, '\n'))){
			*p='\0';
		}
		else{
			while((ch = getchar()) !='\n' && ch!=EOF);
		}
		ok = strlen(ptrCliente->nombre); 
	}while(!ok);	
 
	do{
		mosDtos(ptrCliente);
		printf("\n Apellido............: ");
		fgets(ptrCliente->apellido, 30, stdin);
		if((p=strchr(ptrCliente->apellido, '\n'))){
			*p='\0';
		}
		else{
			while((ch = getchar()) !='\n' && ch!=EOF);
		}
		ok = strlen(ptrCliente->apellido); 
	}while(!ok);
 
	do{
		mosDtos(ptrCliente);
		printf("\n Direccion...........: ");
		fgets(ptrCliente->direccion, 30, stdin);
		if((p=strchr(ptrCliente->direccion, '\n'))){
			*p='\0';
		}
		else{
			while((ch = getchar()) !='\n' && ch!=EOF);
		}
		ok = strlen(ptrCliente->direccion); 
	}while(!ok);
 
	do{
		mosDtos(ptrCliente);
		printf("\n Altura de la calle..: ");
		ok = scanf( "%d", &ptrCliente->numCalle ) == 1 && ptrCliente->numCalle >= 1;
		while ((ch = getchar()) != EOF && ch != '\n');
	}while(!ok);	
 
	do{
		mosDtos(ptrCliente);
		printf("\n Ciudad..............: ");
		fgets(ptrCliente->ciudad, 30, stdin);
		if((p=strchr(ptrCliente->ciudad, '\n'))){
			*p='\0';
		}
		else{
			while((ch = getchar()) !='\n' && ch!=EOF);
		}
		ok = strlen(ptrCliente->ciudad); 
	}while(!ok);	
 
	do{
		mosDtos(ptrCliente);
		printf("\n Provincia...........: ");
		fgets(ptrCliente->provincia, 30, stdin);
		if((p=strchr(ptrCliente->provincia, '\n'))){
			*p='\0';
		}
		else{
			while((ch = getchar()) !='\n' && ch!=EOF);
		}
		ok = strlen(ptrCliente->provincia); 
	}while(!ok);	
	mosDtos(ptrCliente);
 
	opciones(ptrCliente);
}
 
void opciones(Cliente *ptrCliente){
	int opcion, ok;
	char ch;
 
	do{
		mosDtos(ptrCliente);
		printf("\n ========= Opciones =========");	
		printf("\n 1 - Grabar en disco.");
		printf("\n 2 - Introducir nuevamente los datos.");
		printf("\n 3 - Finalizar.");
 
		printf("\n\n Ingrece opci%cn....: ", 162);
		ok = scanf("%d", &opcion) == 1 && opcion >= 1 && opcion <= 3;
		while ((ch = getchar()) != EOF && ch != '\n');
	}while(!ok);
 
	if(opcion == 1){
		graDtos(ptrCliente);		
	}
	else if(opcion == 2){
		ptrCliente->orden = 0;
		strcpy(ptrCliente->nombre, "\0");
		strcpy(ptrCliente->apellido, "\0");
		strcpy(ptrCliente->direccion, "\0");
		ptrCliente->numCalle = 0;
		strcpy(ptrCliente->ciudad, "\0");
		strcpy(ptrCliente->provincia, "\0");
 
		mosDtos(ptrCliente); 
		ingDtos(ptrCliente);
	}	
 
}
 
void graDtos(Cliente *ptrCliente){
 
}
 
 

FILE *ptrCte;//Archivo ya abierto
int graDtos(Cliente *ptrCliente)
{
    return fwrite(ptrCliente,sizeof(Cliente),1,ptrCte);
}
 
int leerDatos(Cliente *ptrCliente)
{
    return fread(ptrCliente,sizeof(Cliente),1,ptrCte);
}
 
char *szClave="unaClave";
int graDtosCifrados(Cliente *ptrCliente)
{
    Cliente clienteCifrado;
    memcpy(&clienteCifrado,ptrCliente,sizeof(Cliente));
    //No cifro la estructura original por si la necesito luego
    RutinaParaCifrar(&clienteCifrado,sizeof(Cliente),szClave,strlen(szClave));
    return fwrite(clienteCifrado,sizeof(Cliente),1,ptrCte);
}
 
int leerDatosCifrados(Cliente *ptrCliente)
{
    int bytesleidos;
    Cliente clienteDescifrado;
    byteleidos=fread(clienteDescifrado,sizeof(Cliente),1,ptrCte);
    RutinaParaCifrar(&clienteDescifrado,sizeof(Cliente),szClave,strlen(szClave));
    memcpy(ptrCliente,&clienteDescifrado,sizeof(Cliente));
    return bytesleidos;
}

//Asumiendo que tenés al menos una entrada de estructura ya previamente guardada...
int ultimaMatricula;
fseek(ptrEst,(-1)*sizeof(int), SEEK_END);
fread(&ultimaMatricula,sizeof(int),1,ptrEst);

printf( "\n\n Listado completo\n" );
fread(&est, sizeof(est), 1, ptrEst);
while( !feof(ptrEst) )
	printf( " %d - %s \n", est.matricula, est.nombre ),
	fread(&est, sizeof(est), 1, ptrEst);