#include <stdio.h>
#include <stdlib.h>
#include <string.h>
 
#define MAX 80
 
void copiaDeSeguridad( FILE *ptrGuiaTel, FILE *ptrGtTemp );		//GT0001
void ingresarFrase( char frase[] );								//GT0002
void copiar( FILE *ptrGuiaTel, FILE *ptrGtTemp, char frase[] );	//GT0003
void errorEscritura( FILE *ptrGuiaTel, FILE *ptrGtTemp );		//GT0004
void mensaje( void );
 
 
int main( int argc,char **argv ){
	FILE *ptrGuiaTel = NULL, *ptrGtTemp = NULL; 
	char frase[MAX];
 
	copiaDeSeguridad( ptrGuiaTel, ptrGtTemp );					//GT0001
	ingresarFrase( frase );										//GT0002
	copiar( ptrGuiaTel, ptrGtTemp, frase );						//GT0003	
 
	return EXIT_SUCCESS;
}
 
 
void copiaDeSeguridad( FILE *ptrGuiaTel, FILE *ptrGtTemp ){		//GT0001
	char c, x;
 
	if( !( ptrGuiaTel = fopen( "archGuiaTel.txt", "r" ))){
		mensaje();
		exit(1);				
	}
	if( !( ptrGtTemp = fopen( "archGtTemp.txt", "w" ))){
		mensaje();
		exit(1);				
	}
 
	c = fgetc( ptrGuiaTel );
	while ( c != EOF ){
		x = fputc( c, ptrGtTemp );
		if (x != c){
			mensaje();
			exit(1);				
		}
		c = fgetc( ptrGuiaTel );
	}
 
	if( ( fclose( ptrGuiaTel ) ) ){
		mensaje();
		exit(1);				
	}
	if( ( fclose( ptrGtTemp ) ) ){
		mensaje();
		exit(1);				
	}
}
 
void ingresarFrase( char frase[] ){		//GT0002
	int ok=0;
 
	do{	
		printf( "\n Ingrese frase.....:" );
		fgets( frase, MAX, stdin );
		ok = strlen( frase );
	}while( ok <= 1 );
}
 
void copiar( FILE *ptrGuiaTel, FILE *ptrGtTemp, char frase[] ){		//GT0003
 
	if( !(ptrGuiaTel = fopen( "archGuiaTel.txt", "a" ))){
		mensaje();
		exit(1);				
	}
 
	fprintf( ptrGuiaTel, "%s", frase );
 
	if( fflush( ptrGuiaTel ) != 0){
		mensaje();
		fclose( ptrGuiaTel );
		errorEscritura( ptrGuiaTel, ptrGtTemp );	//GT0004
		exit(1);				
	}
 
	if( ( fclose( ptrGuiaTel ) ) ){
		mensaje();
		exit(1);				
	}
}
 
void errorEscritura( FILE *ptrGuiaTel, FILE *ptrGtTemp ){	//GT0004
 
	if( rename("archGtTemp.txt","archGuiaTel.txt") !=0 ){
		mensaje();
		exit(1);				
	}
 
	if(remove( "archGuiaTel.txt") !=0 ){
		mensaje();
		exit(1);				
	}
}
 
void mensaje( void ){
	int ch, a;
 
	printf( "\n Ha ocurrido un error y el programa finaliza sin cambios en el archivo." );
	printf( "\n Pulse una tecla para continuar..."); a = getchar();
	if( a != '\n') while ((ch = getchar()) != EOF && ch != '\n');
}
 
/*
	GT0001 - Funcion copiaDeSeguridad
		Efectuo una copia del archivo original por si fallara la escritura en el mismo, si esto
		ocurriera renombro la copia con el mismo nombre que el archivo original y a este lo borro,
		con esto me aseguro que el archivo en disco no quede corrupto. -
		Si fallara la apertura de los archivos archGuiaTel.txt o archGtTemp.txt imprimo un mensaje
		y cierro el programa (mensaje y exit(1)), lo mismo ocurrira si falla la escritura en el archivo 	temporal (if (x != c){).- 
		Si la apertura de los 2 archivos es correcta como asi la escritura, solo queda constatar si
		el cierre de los mismos ocurre sin errores, de lo contrario se procedera de la misma manera que en la apertura de los mismos (mensaje y exit (1). -
		Nota: En esta funcion se abre y se cierra el archivo "archGtTemp.txt".	
	//GT0002 - Funcion ingresarFrase   
		El do-while es para que no se pueda salir de la funcion si no se ha ingresado por lo menos
		un dígito.-	
	//GT0003 - Funcion copiar 
		Con fprintf( ptrGuiaTel, "%s", frase ); copio la frase en el buffer intermedio y con fflush
		copio la frase desde el buffer al disco rigido(archGuiaTel.txt).- 		 
		Verifico si la apertura y cierre del archivo ocurre sin errores.-
		En el caso de que fallara fflush llamo a la (//GT0004) funcion errorEscritura para renombrar el archivo archGtTemp.txt por archGuiaTel.txt para luego borrar el 
                archivo original que 	seguramente si no se pudo escribir es porque está corrupto(al final con remove lo borro). - 
*/

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
 
#define MAX 80
 
void ingresarFrase( char frase[] );
void copiar( char frase[] );
void errorEscritura( void );
void copiaDeSeguridad( const char *GtTxt, const char *GtBak );
void mensaje( void );
 
int main( void ){
	char frase[MAX];
 
	ingresarFrase( frase );
	copiar( frase );
	copiaDeSeguridad( "archGuiaTel.txt","archGuiaTel.bak" );
 
	return EXIT_SUCCESS;
}
 
void ingresarFrase( char frase[] ){
	int ok=0;
 
	do{
		printf( "\n Ingrese frase.....:" );
		fgets( frase, MAX, stdin );
		ok = strlen( frase );
	}while( ok <= 1 );
}
 
void copiar( char frase[] ){
	FILE *ptrGtTxt;
 
	if( !(ptrGtTxt = fopen( "archGuiaTel.txt", "a" ))){
		mensaje();
		exit(1);
    }
 
	fprintf( ptrGtTxt, "%s", frase );
 
	if( fflush( ptrGtTxt ) != 0){
		mensaje();
		fclose( ptrGtTxt );
		errorEscritura( );
		exit(1);
	}
 
	if( ( fclose( ptrGtTxt ) ) ){
		mensaje();
		exit(1);
	}
}
 
void errorEscritura( void ){
	if(remove( "archGuiaTel.txt" ) !=0 ){
		mensaje();
		exit(1);
	}
 
	if( rename( "archGuiaTel.bak","archGuiaTel.txt") !=0 ){
		mensaje();
		exit(1);
	}
}
 
void copiaDeSeguridad( const char *GtTxt, const char *GtBak ){
	FILE *ptrGtTxt, *ptrGtBak;  
	char c, x;
 
	if( !( ptrGtTxt = fopen( GtTxt, "a" ))){
		mensaje();
		exit(1);                                
	}
	if( !( ptrGtBak = fopen( GtBak, "w" ))){
		mensaje();
		exit(1);                                
	}
 
	c = fgetc( ptrGtTxt );
	while ( c != EOF ){
		x = fputc( c, ptrGtBak );
		if (x != c){
			mensaje();
			exit(1);                                
		}
		c = fgetc( ptrGtTxt );
	}
 
	if( ( fclose( ptrGtTxt ) ) ){
		mensaje();
		exit(1);                                
	}
	if( ( fclose( ptrGtBak ) ) ){
		mensaje();
		exit(1);                                
	}
}
 
void mensaje( void ){
	int ch, a;
 
	printf( "\n Ha ocurrido un error y el programa finaliza sin cambios en el archivo." );
	printf( "\n Pulse una tecla para continuar..."); a = getchar();
    if( a != '\n') while ((ch = getchar()) != EOF && ch != '\n');
 }