X-Git-Url: https://git.llucax.com/z.facultad/75.06/emufs.git/blobdiff_plain/f68323b8913e191679584b23568aa162760bbd64..771d5d90ad3fa04217d2f517a79bea62f2c4e9e1:/emufs_gui/registros.c diff --git a/emufs_gui/registros.c b/emufs_gui/registros.c index 778f52d..65f8070 100644 --- a/emufs_gui/registros.c +++ b/emufs_gui/registros.c @@ -1,53 +1,741 @@ #include "registros.h" +#include "idx.h" +#include "articulos.h" +#include "facturas.h" -void ver_registros(WINDOW *padre, int w, int 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_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 int preguntar_id(WINDOW *win, EMUFS *fp); + +void mostrar_info(WINDOW *padre, int h, int offset_alto) +{ + /* Info de teclas */ + wattron(padre, A_BOLD); + wattron(padre, COLOR_PAIR(COLOR_RED)); + mvwaddstr(padre, h-offset_alto+1, 5, "Teclas :"); + wattroff(padre, A_BOLD); + wattroff(padre, COLOR_PAIR(COLOR_RED)); + mvwaddstr(padre, h-offset_alto+2, 8, "Salir = ENTER"); + mvwaddstr(padre, h-offset_alto+3, 8, "Scroll = A/Z"); + mvwaddstr(padre, h-offset_alto+4, 8, "Seleccionar registros = K/L"); + mvwaddstr(padre, h-offset_alto+5, 8, "Acciones: "); + waddstr(padre, "A"); + wattron(padre, A_BOLD); + waddch(padre, 'g'); + wattroff(padre, A_BOLD); + waddstr(padre, "regar "); + wattron(padre, A_BOLD); + waddstr(padre, "M"); + wattroff(padre, A_BOLD); + waddstr(padre, "ofidicar "); + wattron(padre, A_BOLD); + waddstr(padre, "E"); + wattroff(padre, A_BOLD); + waddstr(padre, "liminar "); + mvwaddstr(padre, h-offset_alto+6, 8, "Buscar ID : B"); + + /* Info de leyenda */ + wattron(padre, A_BOLD); + wattron(padre, COLOR_PAIR(COLOR_RED)); + mvwaddstr(padre, h-offset_alto+1, 45, "Leyenda :"); + 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+7, 48, " < > = Separador Bloques"); +} + +void ver_registros(WINDOW *padre, int w, int h, int cual) { /* Ventanas donde mostrar las cosas */ - WINDOW *actual, *ant, *sig; - int c; - char *reg = "asdlñnfajfnsadlkñfnasdlfñnasdlfasnñas oin2o4nr hf hfh 1ehjr 093r 3908rhj 0e98fj 2 0rj 9fj 2 rh 0hf 20rh 0 fh 230rh 8y f128n r`0vnew 80fh 4+9vj ¡9023j f'49j ¡09yuf 3'vkj'9 f294ug 0r \ - 13i qe \ - hjwgi`rg`hjg0934jgt 39gu ¡q9gj 3¡9gu ¡q09gj ¡95gj hj9g 35+9'gj 0¡39g 5¡09 3q0¡h j1111111111111111111111111111111111111111111111111\ - 2222222222222222222222222222222222222222222222222222222222222222222222222222222222\ - 333333333333333333333333333333333333333333333333333333333333333333333333333333333333\ - 44444444444444444444444444444444444444444444444444444444444444444444444444444444444444\ - 555555555555555555555555555555555555555555555555555555555555555555555555555555555555\ - 66666666666666666666666666666666666666666666666666666666666"; - - actual = derwin(padre, h-2, w/3, 1, w/3); - box(actual, 0, 0); - ant = derwin(padre, h-2, w/3, 1, 0); - box(ant, 0, 0); - sig = derwin(padre, h-2, w/3, 1, w/3*2); - box(sig, 0, 0); - - wattron(actual, A_BOLD); - mvwaddstr(actual, 1, 1, reg); - wattroff(actual, A_BOLD); - - wrefresh(sig); - wrefresh(ant); - wrefresh(actual); + char *(*procesar)(EMUFS*, char*, EMUFS_REG_SIZE*, int*, int*); + WINDOW *actual[2], *dlg; + EMUFS_REG_SIZE size; + int scroll, actual_ancho; + int max_scroll, c, offset_alto; + /* Indices que hay validos en IDX */ + EMUFS_REG_ID *indices, indices_total, indices_actual; + 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; + + if (cual == 0) + fp = emufs_abrir("articulos"); + else + fp = emufs_abrir("facturas"); + + wattron(padre, COLOR_PAIR(COLOR_BLUE)); + mvwaddstr(padre, 0, 0, "Tipo de archivo : "); + wattroff(padre, COLOR_PAIR(COLOR_BLUE)); + 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; + break; + case T2: + waddstr(padre, "Registro variable sin bloques."); + break; + case T3: + if (cual == 0) + procesar = procesar_registro_articulo_tipo3; + else + procesar = procesar_registro_factura_tipo3; + waddstr(padre, "Registro fijo con bloque parametrizado."); + } + + indices = emufs_idx_get(fp, &indices_total); + + indices_actual = 0; + if (indices) { + data = (char *)fp->leer_registro_raw(fp, indices[indices_actual], &size, &pos_actual); + data = procesar(fp, data, &size, &pos_actual, &ancho_registro); + } + + + offset_alto = 8; + max_scroll = size / (w-4) - (h-offset_alto-2); + if (max_scroll < 0) max_scroll = 0; + + actual[0] = derwin(padre, h-offset_alto, w-2, 1, 1); + actual_ancho = w-4; + actual[1] = derwin(actual[0], h-offset_alto-2, w-4, 1, 1); + box(actual[0], 0, 0); + + curs_set(0); + + mostrar_info(padre, h, offset_alto); + + mvwaddnstr(actual[1], 0, 0, data, pos_actual); + wattron(actual[1], A_BOLD); + waddnstr(actual[1], data+pos_actual, ancho_registro); + wattroff(actual[1], A_BOLD); + waddnstr(actual[1], data+pos_actual+ancho_registro, size-(pos_actual+ancho_registro)); + + wrefresh(actual[1]); + wrefresh(actual[0]); wrefresh(padre); - scrollok(actual, 1); + scroll = 0; while ((c=getch()) != 13) { switch (c) { - case 'a': - wscrl(actual, -1); + case 'b': + case 'B': + dlg = newwin(4, 50, h/2-2, w/2-25); + box(dlg, 0, 0); + preguntar_id(dlg, fp); + werase(dlg); + wrefresh(dlg); + delwin(dlg); + wrefresh(padre); + curs_set(0); + break; + case 'e': + case 'E': + if (indices_actual != EMUFS_NOT_FOUND) + fp->borrar_registro(fp, indices[indices_actual]); + + free(indices); + indices = emufs_idx_get(fp, &indices_total); + if (indices_actual >= indices_total) { + indices_actual = indices_total - 1; + } + + data = (char *)fp->leer_registro_raw(fp, indices[indices_actual], &size, &pos_actual); + data = procesar(fp, data, &size, &pos_actual, &ancho_registro); + break; + case 'g': + case 'G': + if (cual == 0) + art_agregar(NULL); + else + fact_agregar(NULL); + free(data); + data = (char *)fp->leer_registro_raw(fp, indices[indices_actual], &size, &pos_actual); + data = procesar(fp, data, &size, &pos_actual, &ancho_registro); + + free(indices); + indices = emufs_idx_get(fp, &indices_total); + + /* Tengo que re-pintar algunas cosas */ + mostrar_info(padre, h, offset_alto); + box(actual[0], 0, 0); + wrefresh(actual[0]); + break; + case 'M': + case 'm': /* Quiero editar !!! */ + sprintf(codigo, "%lu", indices[indices_actual]); + if (cual == 0) + art_modificar(codigo); + else + fact_modificar(codigo); + /* Vuelvo a cargar el articulo actual */ + + free(data); + data = (char *)fp->leer_registro_raw(fp, indices[indices_actual], &size, &pos_actual); + data = procesar(fp, data, &size, &pos_actual, &ancho_registro); + + /* Tengo que re-pintar algunas cosas */ + mostrar_info(padre, h, offset_alto); + box(actual[0], 0, 0); + wrefresh(actual[0]); break; - case 'z': - wscrl(actual, 1); + case 'a': /* Scroll */ + scroll--; + if (scroll < 0) scroll = 0; + break; + case 'z': /* Scroll */ + scroll++; + if (scroll > max_scroll) scroll = max_scroll; + break; + case 'l': + if (indices_actual < indices_total) { + indices_actual++; + if (indices_actual >= indices_total) indices_actual = indices_total-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); + } + break; + case 'k': + if (indices_actual != EMUFS_NOT_FOUND) { + indices_actual--; + if (indices_actual == EMUFS_NOT_FOUND) indices_actual = 0; + 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); + } + } - wrefresh(actual); + /* Borro las ventanas */ + werase(actual[1]); + + /* Imprimo los registros */ + if (data) { + offset = scroll*actual_ancho; + pos = pos_actual - offset; + mvwaddnstr(actual[1], 0, 0, data+offset, pos); + offset += pos; + wattron(actual[1], A_BOLD); + waddnstr(actual[1], data+offset, ancho_registro); + wattroff(actual[1], A_BOLD); + offset += ancho_registro; + waddnstr(actual[1], data+offset, size-offset); + } + + wrefresh(actual[1]); wrefresh(padre); } - werase(actual); - delwin(actual); - werase(sig); - delwin(sig); - werase(ant); - delwin(ant); + if (indices) free(indices); + if (data) free(data); + + emufs_destruir(fp); + delwin(actual[0]); wrefresh(padre); + 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) { + fprintf(stderr, "Error de malloc en salida\n"); + 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-1] = '\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; + fprintf(stderr, "Tam = %lu\n", *size); + 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; + fprintf(stderr, "Sume %lu\n", curr_size); + } + } while (offset+sizeof(EMUFS_REG_SIZE)+sizeof(EMUFS_REG_ID) < (*size)); + + /* Proceso */ + fprintf(stderr, "Cantidad de headers = %d\n", cant_header); + 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); + } + + fprintf(stderr, "Tengo %d headers\n", cant_header); + /* 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);*/ + if (salida == NULL) { + PERR("Error de malloc en salida"); + return NULL; + } + tmp = ptr; + pos_actualizada = 0; + (*ancho) = 0; + while (itam_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 *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; + if (ptr == NULL) return NULL; + + PERR("Empieza el baile"); + 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)); + + fprintf(stderr, "Tengo %d headers\n", cant_header); + /* 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);*/ + if (salida == NULL) { + PERR("Error de malloc en salida"); + return NULL; + } + tmp = ptr; + pos_actualizada = 0; + (*ancho) = 0; + i = 0; + while (itam_bloque > emu->tam_reg) { + (*size) = tmp1-salida; + } else { + (*size) = tmp1-salida; + (*ancho) = tmp1-salida; + } + salida[*size-1] = '\0'; + + return salida; }