X-Git-Url: https://git.llucax.com/z.facultad/75.06/emufs.git/blobdiff_plain/f550fc16b14c5a2f4f936359b48cb7cf1c06dc52..925614222efcf0d79b24563577c712ff14e25312:/emufs_gui/viewer.c diff --git a/emufs_gui/viewer.c b/emufs_gui/viewer.c index 5d325da..1290631 100644 --- a/emufs_gui/viewer.c +++ b/emufs_gui/viewer.c @@ -8,12 +8,9 @@ #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); @@ -61,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) @@ -114,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)); @@ -122,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."); @@ -135,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."); } @@ -197,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--; @@ -245,17 +247,14 @@ void ver_bloques(WINDOW *padre, int w, int h, int cual) /* Imprimo los registros */ if (data) { - offset = scroll*actual_ancho; /* Cantidad de caracteres que tengo que saltar */ - pos = pos_actual - offset; /* Cantidad de caracteres que hay antes de mi a imprimir */ + offset = scroll*actual_ancho; + pos = pos_actual - offset; mvwaddnstr(actual[1], 0, 0, data+offset, pos); - if (pos > 0) - offset += pos; - else - offset -= pos; + offset += pos; wattron(actual[1], A_BOLD); - waddnstr(actual[1], data+offset, ancho_registro+((pos<0)?pos:0)); + waddnstr(actual[1], data+offset, ancho_registro); wattroff(actual[1], A_BOLD); - offset += ancho_registro+((pos<0)?pos:0); + offset += ancho_registro; waddnstr(actual[1], data+offset, size-offset); } @@ -283,12 +282,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 : "); @@ -296,23 +299,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."); } @@ -356,7 +350,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); @@ -366,7 +373,7 @@ void ver_registros(WINDOW *padre, int w, int h, int cual) case 'e': case 'E': if (indices_actual != EMUFS_NOT_FOUND) - fp->borrar_registro(fp, indices[indices_actual]); + /*fp->borrar_registro(fp, indices[indices_actual]); XXX*/ free(indices); indices = emufs_idx_get(fp, &indices_total); @@ -379,6 +386,7 @@ void ver_registros(WINDOW *padre, int w, int h, int cual) break; case 'g': case 'G': + if (cual == 2) break; if (cual == 0) art_agregar(NULL); else @@ -397,6 +405,7 @@ void ver_registros(WINDOW *padre, int w, int h, int cual) break; case 'M': case 'm': /* Quiero editar !!! */ + if (cual == 2) break; sprintf(codigo, "%lu", indices[indices_actual]); if (cual == 0) art_modificar(codigo); @@ -468,154 +477,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 */ - 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); - - (*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; - } - 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); - } + 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); - /* 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; @@ -676,34 +531,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) = '.'; @@ -711,7 +545,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++; @@ -720,34 +554,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++; @@ -755,24 +561,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"); @@ -786,6 +584,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 */ @@ -796,18 +597,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) = '.'; @@ -861,7 +656,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++; @@ -870,60 +665,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; @@ -937,13 +692,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! */ - copy_char(&salida[i], in); + copy_char(tmp, in); in++; + tmp++; } - tmp = salida + *pos_actual; - in = ptr + *pos_actual; PERR("Voy por el header"); /* ID de registro */ @@ -966,8 +724,8 @@ char *procesar_registro_articulo_tipo2(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *si PERR("Voy por el espacio despues"); for(i=0; i < 100-*pos_actual; i++) { copy_char(tmp, in); - tmp++; in++; + tmp++; } free(ptr);