/*
 * prueba_ver_binario.c
 *
 *  Created on: 5 abr. 2018
 *      Author: alcarraz
 */

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

#define BUFF_SIZE 18
#define NPRUEBAS 17
int main() {
    char buffer[BUFF_SIZE];
    char *esperados[] = {
        "\n",
        "0\n",
        "01\n",
        "011\n",
        "0010\n",
        "01010\n",
        "001000\n",
        "1010111\n",
        "01111100\n",
        "001111010\n",
        "1001011010\n",
        "10001100101\n",
        "110100101010\n",
        "1100100100010\n",
        "10111110011010\n",
        "001110010111011\n",
        "0000000100011110\n"
    };
    unsigned int entradas[] = {
            0b1010110111111111,
            0b1100110110011000,
            0b1110100101011101,
            0b1110111010010011,
            0b1001111100010010,
            0b0111101000001010,
            0b1100111100001000,
            0b1100011001010111,
            0b1101011101111100,
            0b1010111001111010,
            0b1101011001011010,
            0b0000110001100101,
            0b1111110100101010,
            0b0011100100100010,
            0b0010111110011010,
            0b0001110010111011,
            0b0000000100011110
    };
    /*nombre de archivo temporal*/
    char * tmpfname = "/tmp/asd";/*tmpnam(NULL);*/
    int nb, aciertos=0;
    for(nb=0; nb<NPRUEBAS; nb++){
        FILE temp=*stdout; /*donde guardamos *stdout temporalmente*/
        FILE *fout = fopen(tmpfname,"w"), *fin;
        char * esperado = esperados[nb];
        unsigned entrada = entradas[nb];
        /*engañamos al sistema para que la salida estandar vaya al archivo*/
        *stdout = *fout;
        ver_binario(entrada, nb);
        fflush(stdout);

        fin = fopen (tmpfname,"r");
        /*leemos nb+1 caracteres, el último debe ser el salto de línea*/
        int largo = fread(buffer, 1, nb+1, fin);

        /*terminamos el string leído*/
        buffer[nb+1]=0;
        int ok = (
                largo == nb+1 /*el archivo contenía al menos nb+1 caracteres*/
                && strncmp(buffer,esperado,nb+1) == 0 /*y los caracteres leidos son iguales a los esperados*/
                && fgetc(fin) == EOF /*y leímos el contenido completo del archivo*/
                ) ;
        aciertos += ok;
        /*recuperamos la salida estandar para imprimir los resultados*/
        *stdout=temp;
        printf("nb=%d,buffer=%#4x: %s\n\t esperado=\t%s\t resultado=\t%s\n",
                nb, entrada, ok ? "correcto" : "incorrecto",
                                           esperado, buffer);
        fclose(fout);
        fclose(fin);
    }
    printf("Número de aciertos: %d, desaciertos %d\n", aciertos, NPRUEBAS-aciertos);
	return NPRUEBAS-aciertos;
}