X-Git-Url: https://git.llucax.com/z.facultad/75.06/emufs.git/blobdiff_plain/f00458382f8b687eeef68f9f5fe9e9245a4d5fb5..d101c74c73c56c192e5650936ebcd73607974a95:/emufs_gui/viewer.c

diff --git a/emufs_gui/viewer.c b/emufs_gui/viewer.c
index 8905fa3..41f0df8 100644
--- a/emufs_gui/viewer.c
+++ b/emufs_gui/viewer.c
@@ -5,9 +5,11 @@
 #include "facturas.h"
 #include "gui.h"
 #include "common.h"
+#include <ctype.h>
 
 /* Se encarga de reemplazar los \0 un caracter visual, y segurar un \0 al final */
 static char *procesar_registro_articulo_tipo3(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *size, int *pos_actual, int *ancho);
+static char *procesar_registro_articulo_tipo2(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *size, int *pos_actual, int *ancho);
 static char *procesar_registro_articulo_tipo1(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *size, int *pos_actual, int *ancho);
 
 static char *procesar_registro_factura_tipo3(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *size, int *pos_actual, int *ancho);
@@ -15,6 +17,14 @@ static char *procesar_registro_factura_tipo1(EMUFS *emu, char *ptr, EMUFS_REG_SI
 
 static int preguntar_id(WINDOW *win, EMUFS *fp);
 
+void copy_char(char *dst, char *src)
+{
+	/* Todos los espacidores los pongo iguales */
+	if (isspace(*src)) *dst = ' ';
+	else if (iscntrl(*src)) *dst = '*';
+	else *dst = *src;
+}
+
 void mostrar_info(WINDOW *padre, int h, int offset_alto, int opt)
 {
 	/* Info de teclas */
@@ -285,13 +295,19 @@ void ver_registros(WINDOW *padre, int w, int h, int cual)
 	wattroff(padre, COLOR_PAIR(COLOR_BLUE));
 	switch (fp->tipo) {
 		case T1:
-		case T2:
 			waddstr(padre, "Registro variable con bloque parametrizado.");
 			if (cual == 0)
 				procesar = procesar_registro_articulo_tipo1;
 			else
 				procesar = procesar_registro_factura_tipo1;
 		break;
+		case T2:
+			waddstr(padre, "Registro variable con sin bloques.");
+			if (cual == 0)
+				procesar = procesar_registro_articulo_tipo2;
+			else
+				procesar = procesar_registro_factura_tipo1;
+		break;
 		case T3:
 			if (cual == 0)
 				procesar = procesar_registro_articulo_tipo3;
@@ -459,25 +475,19 @@ char *procesar_registro_articulo_tipo3(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *si
 	if (ptr == NULL) return NULL;
 
 	/* Calculo cuantos headers de registros va a haber en el archivo */
-	if (emu->tam_bloque > emu->tam_reg) {
-		cant_header = emu->tam_bloque / (emu->tam_reg+sizeof(EMUFS_REG_ID));
-		if (cant_header == 0) cant_header++; /* Si tam_reg > tam_bloque, voy a tener solo 1 header */
-		tam_data = sizeof(t_Articulo)-sizeof(unsigned int);
-	} else {
-		cant_header = 1;
-		tam_data = *size - sizeof(EMUFS_REG_ID)-sizeof(unsigned int);
-	}
+	cant_header = emu->tam_bloque / (emu->tam_reg+sizeof(EMUFS_REG_ID));
+	if (cant_header == 0) cant_header++; /* Si tam_reg > tam_bloque, voy a tener solo 1 header */
+	tam_data = sizeof(t_Articulo);
 
-	/* El tamaño del nuevo array lo calculo asi :
-	 *   
-	 *   tamañoviejo - tamaño_headers_en_int - tamaño_ints_en_registro
-	 *               + 10*(cant_headers+cant_registros) +1
-	 *
-	 *   En tipo3, la cantidad de headers y cant de registros es la misma
-	 *   El 10 es por : (XXXXXXXX)
-	 *   +1 == Por el \0
-	 */
-	salida = (char *)malloc((*size)-sizeof(unsigned int)*cant_header*2 + 2*cant_header*10+1);
+	(*size) = (*size)-sizeof(EMUFS_REG_ID)*cant_header*2 + 2*cant_header*10+1;
+	(*ancho) = sizeof(t_Articulo)-sizeof(EMUFS_REG_ID)+10;
+	if ((*ancho) > (*size))
+		(*ancho) = (*size);
+	if ((tam_data) > ((*size)-sizeof(EMUFS_REG_ID))) {
+		tam_data = (*size) - sizeof(EMUFS_REG_ID);
+	}
+	salida = (char *)malloc(*size);
+	memset(salida, '.', *size);
 	if (salida == NULL) {
 		return NULL;
 	}
@@ -496,10 +506,6 @@ char *procesar_registro_articulo_tipo3(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *si
 		sprintf(tmp1, "(%08lu)", *((EMUFS_REG_ID *)tmp));
 		tmp1 += 10;
 		tmp += sizeof(EMUFS_REG_ID);
-		/* Pongo el campo numero del registro */
-		sprintf(tmp1, "[%08d]", *((unsigned int *)tmp));
-		tmp1 += 10;
-		tmp += sizeof(unsigned int);
 		j = 0;
 		while (j < (tam_data)) {
 			if (*tmp == '\0') {
@@ -508,7 +514,7 @@ char *procesar_registro_articulo_tipo3(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *si
 				else
 					(*tmp1) = '|';
 			} else {
-				(*tmp1) = (*tmp);
+				copy_char(tmp1, tmp);
 			}
 			ant = (*tmp);
 			tmp++;
@@ -519,15 +525,7 @@ char *procesar_registro_articulo_tipo3(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *si
 	}
 	free(ptr);
 	
-	if (emu->tam_bloque > emu->tam_reg) {
-		(*size) = (*size)-sizeof(unsigned int)*cant_header*2+2*cant_header*10+1;
-		(*ancho) = sizeof(t_Articulo)-sizeof(unsigned int)*2+20+1;
-	} else {
-		(*size) = (*size)-sizeof(EMUFS_REG_ID)-sizeof(unsigned int)+21;
-		(*ancho) = (*size);
-	}
-	memset(tmp1, '.', (*size)-(tmp1-salida)); 
-	salida[*size-2] = '\0';
+	salida[*size-1] = '\0';
 
 	return salida;
 }
@@ -542,6 +540,7 @@ char *procesar_registro_articulo_tipo1(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *si
 	/* Cuento la cantidad de registros en este bloque */
 	cant_header = 0;
 	offset = 0;
+	PERR("Voy a contar la cantidad de headers");
 	do {
 		/* Me salto el ID, que no me interesa saber su valor */
 		offset += sizeof(EMUFS_REG_ID);
@@ -550,6 +549,9 @@ char *procesar_registro_articulo_tipo1(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *si
 		offset += sizeof(EMUFS_REG_SIZE);
 
 		/* Desplazo el offset */
+#ifdef DEBUG
+		fprintf(stderr, "Tamaño Registro = %lu\n", curr_size);
+#endif
 		if (curr_size == 0) {
 			/* Si el tamaño de registro es 0, quiere decir que llegue a la
 			 * parte que esta vacia */
@@ -561,7 +563,8 @@ char *procesar_registro_articulo_tipo1(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *si
 	} while (offset+sizeof(EMUFS_REG_SIZE)+sizeof(EMUFS_REG_ID) < (*size));
 
 	/* Proceso */
-	salida = (char *)malloc((*size)-sizeof(unsigned int)*cant_header*3 + 3*cant_header*10+1);
+	salida = (char *)malloc((*size)-sizeof(unsigned int)*cant_header*2 + 2*cant_header*10+1);
+	memset(salida, '.',(*size)-sizeof(unsigned int)*cant_header*2 + 2*cant_header*10+1);
 	tmp = ptr;
 	tmp1 = salida;
 	pos_actualizada = 0;
@@ -581,17 +584,13 @@ char *procesar_registro_articulo_tipo1(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *si
 		sprintf(tmp1, "{%08lu}", *((EMUFS_REG_SIZE *)tmp));
 		curr_size = *((EMUFS_REG_SIZE *)tmp);
 		if (pos_actualizada == 1) {
-			(*ancho) = curr_size-sizeof(unsigned int)+30;
+			(*ancho) = curr_size+20;
 			pos_actualizada = 2;
 		}
 		tmp1 += 10;
 		tmp += sizeof(EMUFS_REG_SIZE);
-		/* Pongo el campo numero del registro */
-		sprintf(tmp1, "[%08d]", *((unsigned int *)tmp));
-		tmp1 += 10;
-		tmp += sizeof(unsigned int);
-		j = sizeof(unsigned int);
 		PERR("Voy aca");
+		j = 0;
 		while (j < curr_size) {
 			if (*tmp == '\0') {
 				if (ant == (*tmp))
@@ -599,7 +598,7 @@ char *procesar_registro_articulo_tipo1(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *si
 				else
 					(*tmp1) = '|';
 			} else {
-				(*tmp1) = (*tmp);
+				copy_char(tmp1, tmp);
 			}
 			ant = (*tmp);
 			tmp++;
@@ -610,10 +609,9 @@ char *procesar_registro_articulo_tipo1(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *si
 		i++;
 	}
 	/* Tengo que trabajar sobre lo que me falte (seguro es espacio libre) */
-	(*size) = (*size)-sizeof(unsigned int)*cant_header*3+3*cant_header*10+1;
-	memset(tmp1, '.', (*size)-(tmp1-salida)); 
+	(*size) = (*size)-sizeof(unsigned int)*cant_header*2+2*cant_header*10+1;
 	free(ptr);
-	salida[*size-2] = '\0';
+	salida[*size-1] = '\0';
 	
 	return salida;
 }
@@ -638,27 +636,19 @@ int preguntar_id(WINDOW *win, EMUFS *fp)
 char *procesar_registro_factura_tipo3(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *size, int *pos_actual, int *ancho)
 {
 	char *tmp, *salida, *tmp1, pos_actualizada, ant;
-	char flotante[10];
-	int cant_header, i=0, j, tam_data, k;
-	int cant_items;
+	int cant_header, i=0, j, tam_data;
 	if (ptr == NULL) return NULL;
 
 	PERR("Empieza el baile");
 
 	/* Calculo cuantos headers de registros va a haber en el archivo */
-	if (emu->tam_bloque > emu->tam_reg) {
-		cant_header = emu->tam_bloque / (emu->tam_reg+sizeof(EMUFS_REG_ID));
-		if (cant_header == 0) cant_header++; /* Si tam_reg > tam_bloque, voy a tener solo 1 header */
-		tam_data = emu->tam_reg-sizeof(int)*3-sizeof(float)-sizeof(EMUFS_BLOCK_ID);
-	} else {
-		cant_header = 1;
-		tam_data = (*size) - sizeof(EMUFS_REG_ID)-sizeof(int)*3-sizeof(float)-sizeof(EMUFS_BLOCK_ID);
-	}
+	cant_header = emu->tam_bloque / (emu->tam_reg+sizeof(EMUFS_REG_ID));
+	if (cant_header == 0) cant_header++; /* Si tam_reg > tam_bloque, voy a tener solo 1 header */
+	tam_data = emu->tam_reg;
 
-	/* El tamaño del nuevo array lo calculo asi :
-	 *   
-	 */
-	tmp1 = salida = (char *)malloc(1000000); /*(*size)-(sizeof(char *)+sizeof(t_Item *)+sizeof(EMUFS_REG_ID)+sizeof(int)*3+sizeof(float)+sizeof(EMUFS_BLOCK_ID))*cant_header + 5*cant_header*10+1);*/
+	(*size) = (*size) - cant_header*sizeof(EMUFS_REG_ID)+cant_header*10+1;
+	tmp1 = salida = (char *)malloc(*size);
+	memset(salida, '.', *size);
 	if (salida == NULL) {
 		PERR("Error de malloc en salida");
 		return NULL;
@@ -678,34 +668,12 @@ char *procesar_registro_factura_tipo3(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *siz
 		sprintf(tmp1, "(%08lu)", *((EMUFS_REG_ID *)tmp));
 		tmp1 += 10;
 		tmp += sizeof(EMUFS_REG_ID);
-		/* Pongo el campo numero */
-		sprintf(tmp1, "[%08d]", *((int *)tmp));
-		tmp1 += 10;
-		tmp += sizeof(int);
-		/* Pongo campo procdoi */
-		sprintf(flotante, "[%5.2f]", *((float *)tmp));
-		memcpy(tmp1, flotante, strlen(flotante));
-		tmp1 += strlen(flotante);
-		tmp += sizeof(float);
-		/* Pongo campo numero_remito */
-		sprintf(tmp1, "[%08d]", *((int *)tmp));
-		tmp1 += 10;
-		tmp += sizeof(int);
-		/* Pongo numero de items */
-		sprintf(tmp1, "[%08d]", *((int *)tmp));
-		cant_items = *((int *)tmp);
-		tmp1 += 10;
-		tmp += sizeof(int);
-		/* Pongo reg_nota */
-		sprintf(tmp1, "(%08lu)", *((EMUFS_BLOCK_ID*)tmp));
-		tmp1 += 10;
-		tmp += sizeof(EMUFS_BLOCK_ID);
 
 		if (pos_actualizada == 1) {
-			(*ancho) = 50+strlen(flotante);
+			(*ancho) = 10;
 		}
 		j = 0;
-		while (j < (tam_data-10*sizeof(t_Item))) {
+		while (j < (tam_data)) {
 			if (*tmp == '\0') {
 				if (ant == (*tmp)){
 					(*tmp1) = '.';
@@ -713,7 +681,7 @@ char *procesar_registro_factura_tipo3(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *siz
 					(*tmp1) = '|';
 				}
 			} else {
-				(*tmp1) = (*tmp);
+				copy_char(tmp1, tmp);
 			}
 			ant = (*tmp);
 			tmp++;
@@ -722,34 +690,6 @@ char *procesar_registro_factura_tipo3(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *siz
 				(*ancho)++;
 			j++;
 		}
-		/* Ahora proceso los items */
-		k = 0;
-		while (k < 10) {
-			sprintf(tmp1, "[%08d]", *((int *)tmp));
-			tmp1 += 10;
-			tmp += sizeof(int);
-			if (pos_actualizada == 1)
-				(*ancho)+=10;
-			j = 0;
-			while (j < (sizeof(t_Item)-sizeof(int))) {
-				if (*tmp == '\0') {
-					if (ant == (*tmp)){
-						(*tmp1) = '.';
-					} else {
-						(*tmp1) = '|';
-					}
-				} else {
-					(*tmp1) = (*tmp);
-				}
-				ant = (*tmp);
-				tmp++;
-				tmp1++;
-				if (pos_actualizada == 1)
-					(*ancho)++;
-				j++;
-			}
-			k++;
-		}
 		if (pos_actualizada == 1)
 			pos_actualizada = 2;
 		i++;
@@ -757,12 +697,6 @@ char *procesar_registro_factura_tipo3(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *siz
 	free(ptr);
 
 	PERR("Termine");
-	if (emu->tam_bloque > emu->tam_reg) {
-		(*size) = tmp1-salida;
-	} else {
-		(*size) = tmp1-salida;
-		(*ancho) = tmp1-salida;
-	}
 	salida[*size-1] = '\0';
 
 	return salida;
@@ -772,8 +706,7 @@ char *procesar_registro_factura_tipo1(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *siz
 {
 	char *tmp, *salida, *tmp1, pos_actualizada, ant;
 	EMUFS_REG_SIZE offset, curr_size;
-	char flotante[10];
-	int cant_header, i=0, j, tam_data, k;
+	int cant_header, i=0, j, tam_data;
 	int cant_items;
 	if (ptr == NULL) return NULL;
 
@@ -788,6 +721,9 @@ char *procesar_registro_factura_tipo1(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *siz
 		offset += sizeof(EMUFS_REG_SIZE);
 
 		/* Desplazo el offset */
+#ifdef DEBUG
+		fprintf(stderr, "Tam = %d\n", curr_size);
+#endif
 		if (curr_size == 0) {
 			/* Si el tamaño de registro es 0, quiere decir que llegue a la
 			 * parte que esta vacia */
@@ -801,11 +737,13 @@ char *procesar_registro_factura_tipo1(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *siz
 	/* El tamaño del nuevo array lo calculo asi :
 	 *   
 	 */
-	tmp1 = salida = (char *)malloc(1000000); /*(*size)-(sizeof(char *)+sizeof(t_Item *)+sizeof(EMUFS_REG_ID)+sizeof(int)*3+sizeof(float)+sizeof(EMUFS_BLOCK_ID))*cant_header + 5*cant_header*10+1);*/
+	(*size) = (*size) - sizeof(EMUFS_REG_ID)*cant_header - sizeof(EMUFS_REG_SIZE)*cant_header + cant_header*20+1;
+	tmp1 = salida = (char *)malloc(*size);
 	if (salida == NULL) {
 		PERR("Error de malloc en salida");
 		return NULL;
 	}
+	memset(salida, '.', *size);
 	tmp = ptr;
 	pos_actualizada = 0;
 	(*ancho) = 0;
@@ -824,38 +762,16 @@ char *procesar_registro_factura_tipo1(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *siz
 		tmp += sizeof(EMUFS_REG_ID);
 		/* Cantidad de espacio que ocupa la data */
 		sprintf(tmp1, "{%08lu}", *((EMUFS_REG_SIZE *)tmp));
-		tam_data = *((EMUFS_REG_SIZE *)tmp) - sizeof(int)*3 - sizeof(float) - sizeof(EMUFS_BLOCK_ID);
+		tam_data = *((EMUFS_REG_SIZE *)tmp);
 		tmp1 += 10;
 		tmp += sizeof(EMUFS_REG_SIZE);
-		/* Pongo el campo numero */
-		sprintf(tmp1, "[%08d]", *((int *)tmp));
-		tmp1 += 10;
-		tmp += sizeof(int);
-		/* Pongo campo procdoi */
-		sprintf(flotante, "[%5.2f]", *((float *)tmp));
-		memcpy(tmp1, flotante, strlen(flotante));
-		tmp1 += strlen(flotante);
-		tmp += sizeof(float);
-		/* Pongo campo numero_remito */
-		sprintf(tmp1, "[%08d]", *((int *)tmp));
-		tmp1 += 10;
-		tmp += sizeof(int);
-		/* Pongo numero de items */
-		sprintf(tmp1, "[%08d]", *((int *)tmp));
-		cant_items = *((int *)tmp);
-		tmp1 += 10;
-		tmp += sizeof(int);
-		/* Pongo reg_nota */
-		sprintf(tmp1, "(%08lu)", *((EMUFS_BLOCK_ID*)tmp));
-		tmp1 += 10;
-		tmp += sizeof(EMUFS_BLOCK_ID);
 
 		if (pos_actualizada == 1) {
-			(*ancho) = 60+strlen(flotante);
+			(*ancho) = 20;
 		}
 		j = 0;
 		PERR("Voy por la data");
-		while (j < (tam_data-cant_items*sizeof(t_Item))) {
+		while (j < tam_data) {
 			if (*tmp == '\0') {
 				if (ant == (*tmp)){
 					(*tmp1) = '.';
@@ -863,7 +779,7 @@ char *procesar_registro_factura_tipo1(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *siz
 					(*tmp1) = '|';
 				}
 			} else {
-				(*tmp1) = (*tmp);
+				copy_char(tmp1, tmp);
 			}
 			ant = (*tmp);
 			tmp++;
@@ -872,56 +788,68 @@ char *procesar_registro_factura_tipo1(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *siz
 				(*ancho)++;
 			j++;
 		}
-		/* Ahora proceso los items */
-		k = 0;
-		while (k < cant_items) {
-			sprintf(tmp1, "[%08d]", *((int *)tmp));
-			tmp1 += 10;
-			tmp += sizeof(int);
-			if (pos_actualizada == 1)
-				(*ancho)+=10;
-			j = 0;
-			while (j < (sizeof(t_Item)-sizeof(int))) {
-				if (*tmp == '\0') {
-					if (ant == (*tmp)){
-						(*tmp1) = '.';
-					} else {
-						(*tmp1) = '|';
-					}
-				} else {
-					(*tmp1) = (*tmp);
-				}
-				ant = (*tmp);
-				tmp++;
-				tmp1++;
-				if (pos_actualizada == 1)
-					(*ancho)++;
-				j++;
-			}
-			k++;
-		}
 		if (pos_actualizada == 1)
 			pos_actualizada = 2;
-		PERR(salida);
 		i++;
 	}
-	/* llego no . hasta el final */
-	while (tmp < (ptr+(*size))) {
-		(*tmp1) = '.';
-		tmp1++;
-		tmp++;
-	}
 	free(ptr);
 
 	PERR("Termine");
-	if (emu->tam_bloque > emu->tam_reg) {
-		(*size) = tmp1-salida;
-	} else {
-		(*size) = tmp1-salida;
-		(*ancho) = tmp1-salida;
-	}
 	salida[*size-1] = '\0';
 
 	return salida;
 }
 
+char *procesar_registro_articulo_tipo2(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *size, int *pos_actual, int *ancho)
+{
+	char *salida, *tmp;
+	char *in;
+	int i;
+	EMUFS_REG_SIZE tam_data;
+	if (ptr == NULL) return NULL;
+
+	(*size) = *size - sizeof(EMUFS_REG_SIZE) - sizeof(EMUFS_REG_ID) + 21;
+	(*ancho) = *size-101;
+	salida = (char *)malloc(*size);
+	memset(salida, '.', *size);
+
+	PERR("Voy por el espacio antes");
+	for(i=0; i < *pos_actual; i++) {
+		/* Los datos que tengo por ahora los pongo enmascarados! */
+		copy_char(&salida[i], in);
+		in++;
+	}
+	tmp = salida + *pos_actual;
+	in = ptr + *pos_actual;
+
+	PERR("Voy por el header");
+	/* ID de registro */
+	sprintf(tmp, "(%08lu)", *((EMUFS_REG_ID *)in));
+	tmp += 10;
+	in += sizeof(EMUFS_REG_ID);
+	/* Tamaño de registro */
+	sprintf(tmp, "{%08lu}", *((EMUFS_REG_SIZE *)in));
+	tam_data = *((EMUFS_REG_SIZE *)in);
+	tmp += 10;
+	in += sizeof(EMUFS_REG_SIZE);
+	PERR("Voy por la data");
+	i = 0;
+	while (i < tam_data) {
+		copy_char(tmp, in);
+		tmp++;
+		in++;
+		i++;
+	}
+	PERR("Voy por el espacio despues");
+	for(i=0; i < 100-*pos_actual; i++) {
+		copy_char(tmp, in);
+		tmp++;
+		in++;
+	}
+
+	free(ptr);
+	PERR("LISTO");
+	salida[*size-1] = '\0';
+	return salida;
+}
+