/*
 * prueba_codificar.c
 *
 *  Created on: 5 jun. 2018
 *      Author: alcarraz
 */

#include "libHamming.h"
#include <stdio.h>

char *entradas[] = {"ejemplos/vacio.txt","ejemplos/discurso_codificado",
        "ejemplos/letras_codificado", "ejemplos/todos_nibbles_codificado",
        "ejemplos/discurso_codificado_mod", "ejemplos/todos_hamming"
    };
char *esperados[] = {"ejemplos/vacio.txt","ejemplos/discurso.txt",
        "ejemplos/letras.txt", "ejemplos/todos_nibbles",
        "ejemplos/discurso.txt", "ejemplos/todos_hamming_decod"
    };
char *salidas[] = {"ejemplos/vacio_decod_out", "ejemplos/discurso_codificado_out",
        "ejemplos/letras_codificado_out", "ejemplos/todos_nibbles_codificado_out",
        "ejemplos/discurso_codificado_mod_out", "ejemplos/todos_hamming_out"
};

EstadisticasDecodificar estadisticas_esperadas[] = {
        {correctos:0,corregidos:0,incorrectos:0,error:0},
        {correctos:4911, corregidos:0, incorrectos:0, error: 0},
        {correctos:40, corregidos: 0, incorrectos:0, error:0},
        {correctos:8, corregidos:0, incorrectos:0, error:0},
        {correctos: 4907, corregidos: 4, incorrectos:0, error:0},
        {correctos: 256, corregidos: 20480, incorrectos:44800, error:0}
};

#define NPRUEBAS 6

int main() {
    /*aseguramos la existencia del archivo vacio*/
    FILE * vacio = fopen(entradas[0],"w");
    if (vacio == NULL) {
        fprintf(stderr, "Error al crear el archivo vacío.");
        perror(entradas[0]);
        return 1;
    }
    fclose(vacio);
    register unsigned char i, aciertos=0;
    for (i=0; i<NPRUEBAS; i++){
        FILE * entrada = fopen(entradas[i],"r");
        if (entrada == NULL) {
            fprintf(stderr, "Error al abrir archivo de entrada, ");
            perror(entradas[i]);
            continue;
        }
        FILE * salida = fopen(salidas[i],"w+");
        if (salida == NULL){
            fprintf(stderr, "Error al abrir archivo de salida, " );
            perror(salidas[i]);
            continue;
        }
        EstadisticasDecodificar estadistica = decodificar_archivo(entrada, salida);

        fclose(entrada);
        rewind(salida);
        FILE * esperado = fopen(esperados[i], "r");
        if (esperado == NULL){
            fprintf(stderr, "Error al abrir archivo con la salida esperada, ");
            perror(esperados[i]);
            continue;
        }

        int j = 0, ok;
        do {
            int s = fgetc(salida), l = fgetc(esperado);
            ok = s == l;
            if (!ok){
                printf("error en el byte %4d(%#.4x) del archivo %s, "
                        "esperado=%#.2x, leido=%#.2x, \n",  j, j,
                        salidas[i], l, s);
            }
            j++;
        } while (!feof(esperado) && !feof(salida) && ok);
        fclose(salida);
        fclose(esperado);
        ok = ok && estadisticas_esperadas[i].correctos == estadistica.correctos &&
                estadisticas_esperadas[i].corregidos == estadistica.corregidos &&
                estadisticas_esperadas[i].incorrectos == estadistica.incorrectos &&
                estadisticas_esperadas[i].error == estadistica.error;
        aciertos+=ok;
        printf("archivo %s: %s\n", entradas[i], ok ? "correcto" : "incorrecto");
        printf("estadísticas esperadas: \n\tcorrectos:%lu\n\tcorregidos:%lu\n"
                "\tincorrectos:%lu\n\terror:%d\n",
                estadisticas_esperadas[i].correctos,
                estadisticas_esperadas[i].corregidos,
                estadisticas_esperadas[i].incorrectos,
                estadisticas_esperadas[i].error);
        printf("estadísticas obtenidas: \n\tcorrectos:%lu\n\tcorregidos:%lu\n"
                "\tincorrectos:%lu\n\terror:%d\n",
                estadistica.correctos,
                estadistica.corregidos,
                estadistica.incorrectos,
                estadistica.error);
    }
    printf("Número de aciertos: %d, desaciertos %d\n", aciertos, NPRUEBAS-aciertos);
    return NPRUEBAS-aciertos;
}