X-Git-Url: https://git.llucax.com/z.facultad/75.06/emufs.git/blobdiff_plain/f84d04a91b1f48afe019f1477b87a22a516ef888..9be3cef1df309cc384c37af980d379d465ab25e9:/emufs_gui/viewer.c diff --git a/emufs_gui/viewer.c b/emufs_gui/viewer.c index c2b2e1d..403c3b4 100644 --- a/emufs_gui/viewer.c +++ b/emufs_gui/viewer.c @@ -5,17 +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_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); -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 */ @@ -52,10 +58,9 @@ void mostrar_info(WINDOW *padre, int h, int offset_alto, int opt) wattroff(padre, A_BOLD); wattroff(padre, COLOR_PAIR(COLOR_RED)); mvwaddstr(padre, h-offset_alto+2, 48, " | = Separador de campo"); - mvwaddstr(padre, h-offset_alto+3, 48, "[XXX] = Campo numerico"); - mvwaddstr(padre, h-offset_alto+4, 48, "(XXX) = ID de registro"); - mvwaddstr(padre, h-offset_alto+5, 48, "{XXX} = Tam. de registro"); - mvwaddstr(padre, h-offset_alto+6, 48, " . = Esp. Libre"); + mvwaddstr(padre, h-offset_alto+3, 48, "(XXX) = ID de registro"); + mvwaddstr(padre, h-offset_alto+4, 48, "{XXX} = Tam. de registro"); + mvwaddstr(padre, h-offset_alto+5, 48, " . = Esp. Libre"); } char *juntar_memoria(char *s1, char *s2, char *s3, int size1, int size2, int size3) @@ -105,6 +110,10 @@ void ver_bloques(WINDOW *padre, int w, int h, int cual) else if (cual == 2) fp = emufs_abrir("notas"); + if (fp == NULL) { + return; + } + stats = fp->leer_estadisticas(fp); wattron(padre, COLOR_PAIR(COLOR_BLUE)); @@ -113,10 +122,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."); @@ -126,10 +132,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."); } @@ -188,12 +191,20 @@ void ver_bloques(WINDOW *padre, int w, int h, int cual) box(dlg, 0, 0); indices_actual = preguntar_id(dlg, fp); if (indices_actual < 0) indices_actual = 0; - if (indices_actual > indices_total) indices_actual = indices_total-1; + if (indices_actual >= indices_total) indices_actual = indices_total-1; werase(dlg); wrefresh(dlg); delwin(dlg); wrefresh(padre); curs_set(0); + if (data) free(data); + fp->leer_bloque_raw(fp, indices_actual, &bloque_actual, &bloque_anterior, &bloque_siguiente, &size_actual, &size_anterior, &size_siguiete); + bloque_actual = procesar(fp, bloque_actual, &size_actual, &pos_actual, &ancho_registro); + bloque_siguiente = procesar(fp, bloque_siguiente, &size_siguiete, &pos_actual, &ancho_registro); + bloque_anterior = procesar(fp, bloque_anterior, &size_anterior, &pos_actual, &ancho_registro); + pos_actual = size_anterior; /* Resalta desde el fin del bloque anterior */ + ancho_registro = size_actual; + data = juntar_memoria(bloque_anterior, bloque_actual, bloque_siguiente, size_anterior, size_actual, size_siguiete); break; case 'a': /* Scroll */ scroll--; @@ -274,12 +285,16 @@ void ver_registros(WINDOW *padre, int w, int h, int cual) char *data; /* Registros a mostrar en pantalla */ char codigo[50]; /* Variable para guardar el codigo actual para mandar a modificar */ EMUFS *fp; - int pos_actual, ancho_registro, offset, pos; + int pos_actual, ancho_registro, offset, pos, n, i; if (cual == 0) fp = emufs_abrir("articulos"); - else - fp = emufs_abrir("facturas"); + else if (cual == 1) fp = emufs_abrir("facturas"); + else if (cual == 2) fp = emufs_abrir("notas"); + + if (fp == NULL) { + return; + } wattron(padre, COLOR_PAIR(COLOR_BLUE)); mvwaddstr(padre, 0, 0, "Tipo de archivo : "); @@ -287,23 +302,14 @@ void ver_registros(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 con sin bloques."); - if (cual == 0) - procesar = procesar_registro_articulo_tipo2; - else - procesar = procesar_registro_factura_tipo1; + waddstr(padre, "Registro variable 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."); } @@ -347,7 +353,20 @@ void ver_registros(WINDOW *padre, int w, int h, int cual) case 'B': dlg = newwin(4, 50, h/2-2, w/2-25); box(dlg, 0, 0); - preguntar_id(dlg, fp); + n = preguntar_id(dlg, fp); + /* Busco la posicion dentro del id */ + for(i=0; i< indices_total; i++) { + if (indices[i] == n) { + n = -1; /* LO ENCONTRE! */ + indices_actual = i; + break; + } + } + if (n == -1) { + if (data) free(data); + data = (char *)fp->leer_registro_raw(fp, indices[indices_actual], &size, &pos_actual); + data = procesar(fp, data, &size, &pos_actual, &ancho_registro); + } werase(dlg); wrefresh(dlg); delwin(dlg); @@ -459,172 +478,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 (i0); + } while (n<0); form_destruir(form); return n; } -char *procesar_registro_factura_tipo3(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *size, int *pos_actual, int *ancho) +char *procesar_registro_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); - } - - /* 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; @@ -685,34 +532,13 @@ 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))) { + ant = -1; + while (j < (tam_data)) { if (*tmp == '\0') { if (ant == (*tmp)){ (*tmp1) = '.'; @@ -720,7 +546,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++; @@ -729,34 +555,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++; @@ -764,24 +562,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"); @@ -795,6 +585,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 */ @@ -805,18 +598,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) = '.'; @@ -870,7 +657,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++; @@ -879,60 +666,20 @@ 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_articulo_tipo2(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *size, int *pos_actual, int *ancho) +char *procesar_registro_tipo2(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *size, int *pos_actual, int *ancho) { char *salida, *tmp; char *in; @@ -946,13 +693,16 @@ char *procesar_registro_articulo_tipo2(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *si memset(salida, '.', *size); PERR("Voy por el espacio antes"); +#ifdef DEBUG + fprintf(stderr, "Pos Inicial %d\n", *pos_actual); +#endif + tmp = salida; + in = ptr; for(i=0; i < *pos_actual; i++) { - /* Los datos que tengo por ahora los pongo enmascarados! */ - salida[i] = ((*in)=='\0')?'*':(*in); + copy_char(tmp, in); in++; + tmp++; } - tmp = salida + *pos_actual; - in = ptr + *pos_actual; PERR("Voy por el header"); /* ID de registro */ @@ -967,16 +717,16 @@ char *procesar_registro_articulo_tipo2(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *si PERR("Voy por la data"); i = 0; while (i < tam_data) { - (*tmp) = ((*in)=='\0')?'*':(*in); + copy_char(tmp, in); tmp++; in++; i++; } PERR("Voy por el espacio despues"); for(i=0; i < 100-*pos_actual; i++) { - (*tmp) = ((*in)=='\0')?'*':(*in); - tmp++; + copy_char(tmp, in); in++; + tmp++; } free(ptr);