X-Git-Url: https://git.llucax.com/z.facultad/75.06/emufs.git/blobdiff_plain/a8dad3d5bafadb9bca3335952462f05192a5059c..75028f5b72eb2614fb73428e02250328863d9934:/emufs_gui/viewer.c diff --git a/emufs_gui/viewer.c b/emufs_gui/viewer.c index bcae4bd..17ee34a 100644 --- a/emufs_gui/viewer.c +++ b/emufs_gui/viewer.c @@ -5,16 +5,23 @@ #include "facturas.h" #include "gui.h" #include "common.h" +#include /* 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_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); -static char *procesar_registro_factura_tipo1(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *size, int *pos_actual, int *ancho); +static char *procesar_registro_tipo2(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *size, int *pos_actual, int *ancho); +static char *procesar_registro_tipo3(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *size, int *pos_actual, int *ancho); +static char *procesar_registro_tipo1(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *size, int *pos_actual, int *ancho); 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 */ @@ -72,9 +79,9 @@ char *juntar_memoria(char *s1, char *s2, char *s3, int size1, int size2, int siz return NULL; } - if (s1) memcpy(salida, s1, size1); - if (s2) memcpy(salida+size2, s2, size2); - if (s3) memcpy(salida+size2+size3, s3, size3); + if (s1) memcpy(salida, s1, size1); else size1 = 0; + if (s2) memcpy(salida+size1, s2, size2); else size2 = 0; + if (s3) memcpy(salida+size1+size2, s3, size3); if (s1) free(s1); if (s2) free(s2); if (s3) free(s3); @@ -112,10 +119,7 @@ void ver_bloques(WINDOW *padre, int w, int h, int cual) switch (fp->tipo) { case T1: waddstr(padre, "Registro variable con bloque parametrizado."); - if (cual == 0) - procesar = procesar_registro_articulo_tipo1; - else - procesar = procesar_registro_factura_tipo1; + procesar = procesar_registro_tipo1; break; case T2: waddstr(padre, "Registro variable sin bloques."); @@ -125,10 +129,7 @@ void ver_bloques(WINDOW *padre, int w, int h, int cual) return; break; case T3: - if (cual == 0) - procesar = procesar_registro_articulo_tipo3; - else - procesar = procesar_registro_factura_tipo3; + procesar = procesar_registro_tipo3; waddstr(padre, "Registro fijo con bloque parametrizado."); } @@ -285,18 +286,15 @@ 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; + procesar = procesar_registro_tipo1; + break; + case T2: + waddstr(padre, "Registro variable con sin bloques."); + procesar = procesar_registro_tipo2; break; case T3: - if (cual == 0) - procesar = procesar_registro_articulo_tipo3; - else - procesar = procesar_registro_factura_tipo3; + procesar = procesar_registro_tipo3; waddstr(padre, "Registro fijo con bloque parametrizado."); } @@ -452,172 +450,6 @@ void ver_registros(WINDOW *padre, int w, int h, int cual) curs_set(1); } -char *procesar_registro_articulo_tipo3(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *size, int *pos_actual, int *ancho) -{ - char *tmp, *salida, *tmp1, pos_actualizada, ant; - int cant_header, i=0, j, tam_data; - 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); - } - - /* 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); - if (salida == NULL) { - return NULL; - } - tmp = ptr; - tmp1 = salida; - pos_actualizada = 0; - while (itam_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'; - - return salida; -} - -char *procesar_registro_articulo_tipo1(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *size, int *pos_actual, int *ancho) -{ - EMUFS_REG_SIZE offset, curr_size; - char *tmp, *salida, *tmp1, pos_actualizada, ant; - int cant_header, i=0, j; - if (ptr == NULL) return NULL; - - /* Cuento la cantidad de registros en este bloque */ - cant_header = 0; - offset = 0; - do { - /* Me salto el ID, que no me interesa saber su valor */ - offset += sizeof(EMUFS_REG_ID); - /* Copio el tamaño del registro de la cabecera. */ - memcpy(&curr_size, ptr + offset, sizeof(EMUFS_REG_SIZE)); - offset += sizeof(EMUFS_REG_SIZE); - - /* Desplazo el offset */ - if (curr_size == 0) { - /* Si el tamaño de registro es 0, quiere decir que llegue a la - * parte que esta vacia */ - break; - } else { - cant_header++; - offset += curr_size; - } - } 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); - tmp = ptr; - tmp1 = salida; - pos_actualizada = 0; - while (itam_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); - } - - /* 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);*/ + 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; + if (tam_data > (*size - sizeof(EMUFS_REG_ID))) + tam_data = *size - sizeof(EMUFS_REG_ID); + + (*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 +504,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 +517,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 +526,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,24 +533,16 @@ 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; } -char *procesar_registro_factura_tipo1(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *size, int *pos_actual, int *ancho) +char *procesar_registro_tipo1(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *size, int *pos_actual, int *ancho) { 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_items; + EMUFS_REG_SIZE offset, curr_size, size_acumulado, old_size; + int cant_header, i=0, j, tam_data; if (ptr == NULL) return NULL; PERR("Empieza el baile"); @@ -788,6 +556,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 = %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 */ @@ -798,18 +569,30 @@ char *procesar_registro_factura_tipo1(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *siz } } while (offset+sizeof(EMUFS_REG_SIZE)+sizeof(EMUFS_REG_ID) < (*size)); + if (cant_header == 0) { + PERR("NO TENGO ITEMS"); + memset(ptr, '.', *size); + (*ancho) = (*size); + (*pos_actual) = 0; + return ptr; + } + /* 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);*/ + old_size = (*size); + (*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; i = 0; + size_acumulado = 0; while (i old_size) { + tam_data = old_size - size_acumulado; + } 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))) { + ant = -1; + while (j < tam_data) { if (*tmp == '\0') { if (ant == (*tmp)){ (*tmp1) = '.'; @@ -863,7 +628,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 +637,64 @@ 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++; - } + size_acumulado += tam_data; 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_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"); + + free(ptr); + PERR("LISTO"); + salida[*size-1] = '\0'; + return salida; +} +