X-Git-Url: https://git.llucax.com/z.facultad/75.06/emufs.git/blobdiff_plain/9071a01f94406f881e6bdd9f875eb926333eb81d..771d5d90ad3fa04217d2f517a79bea62f2c4e9e1:/emufs_gui/registros.c?ds=sidebyside diff --git a/emufs_gui/registros.c b/emufs_gui/registros.c index 1d244ee..65f8070 100644 --- a/emufs_gui/registros.c +++ b/emufs_gui/registros.c @@ -2,56 +2,29 @@ #include "registros.h" #include "idx.h" #include "articulos.h" +#include "facturas.h" /* Se encarga de reemplazar los \0 un caracter visual, y segurar un \0 al final */ -static char *procesar_registro_articulo(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *size, int *pos_actual); +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); -#define ACT 0 -#define ANT 1 -#define SIG 2 +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); -void ver_registros(WINDOW *padre, int w, int h) -{ - /* Ventanas donde mostrar las cosas */ - WINDOW *actual[2]; - EMUFS_REG_SIZE size; - int scroll, actual_ancho; - int max_scroll, c; - EMUFS_REG_ID ant_indice, total_indice; /* Indice de registro que tengo en ANT */ - 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; - fp = emufs_abrir("articulos"); - - total_indice = emufs_idx_get_count(fp); - - ant_indice = 1; - data = (char *)fp->leer_registro_raw(fp, emufs_idx_get_id_at(fp, ant_indice), &size, &pos_actual); - data = procesar_registro_articulo(fp, data, &size, &pos_actual); - - ancho_registro = sizeof(t_Articulo)-sizeof(unsigned int)*2+20; - - max_scroll = size / (w-4) - (h-8); - if (max_scroll < 0) max_scroll = 0; - - actual[0] = derwin(padre, h-6, w-2, 1, 1); - actual_ancho = w-4; - actual[1] = derwin(actual[0], h-8, w-4, 1, 1); - box(actual[0], 0, 0); - - curs_set(0); +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-5, 5, "Teclas :"); + mvwaddstr(padre, h-offset_alto+1, 5, "Teclas :"); wattroff(padre, A_BOLD); wattroff(padre, COLOR_PAIR(COLOR_RED)); - mvwaddstr(padre, h-4, 8, "Salir = ENTER"); - mvwaddstr(padre, h-3, 8, "Scroll = A/Z"); - mvwaddstr(padre, h-2, 8, "Seleccionar registros = K/L"); - mvwaddstr(padre, h-1, 8, "Acciones: "); + 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'); @@ -65,16 +38,85 @@ void ver_registros(WINDOW *padre, int w, int h) 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-5, 35, "Leyenda :"); + mvwaddstr(padre, h-offset_alto+1, 45, "Leyenda :"); wattroff(padre, A_BOLD); wattroff(padre, COLOR_PAIR(COLOR_RED)); - mvwaddstr(padre, h-4, 38, "| = Separador de campo"); - mvwaddstr(padre, h-3, 38, "[XXX] = Campo numerico"); - mvwaddstr(padre, h-2, 38, "(XXX) = ID de registro"); + 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 */ + 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); @@ -88,57 +130,64 @@ void ver_registros(WINDOW *padre, int w, int h) scroll = 0; while ((c=getch()) != 13) { switch (c) { + 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': - fp->borrar_registro(fp, emufs_idx_get_id_at(fp, ant_indice)); - data = (char *)fp->leer_registro_raw(fp, emufs_idx_get_id_at(fp, ant_indice), &size, &pos_actual); - data = procesar_registro_articulo(fp, data, &size, &pos_actual); + if (indices_actual != EMUFS_NOT_FOUND) + fp->borrar_registro(fp, indices[indices_actual]); - total_indice = emufs_idx_get_count(fp); - if (ant_indice >= total_indice) { - ant_indice = total_indice - 1; + 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': - art_agregar(NULL); + if (cual == 0) + art_agregar(NULL); + else + fact_agregar(NULL); free(data); - data = (char *)fp->leer_registro_raw(fp, emufs_idx_get_id_at(fp, ant_indice), &size, &pos_actual); - data = procesar_registro_articulo(fp, data, &size, &pos_actual); + data = (char *)fp->leer_registro_raw(fp, indices[indices_actual], &size, &pos_actual); + data = procesar(fp, data, &size, &pos_actual, &ancho_registro); - total_indice = emufs_idx_get_count(fp); + free(indices); + indices = emufs_idx_get(fp, &indices_total); /* Tengo que re-pintar algunas cosas */ - wattron(padre, A_BOLD); - wattron(padre, COLOR_PAIR(COLOR_RED)); - mvwaddstr(padre, h-5, 5, "Teclas :"); - mvwaddstr(padre, h-5, 35, "Leyenda :"); - wattroff(padre, A_BOLD); - wattroff(padre, COLOR_PAIR(COLOR_RED)); - mvwaddstr(padre, h-4, 38, "| = Separador de campo"); - mvwaddstr(padre, h-4, 8, "Salir = ENTER"); + mostrar_info(padre, h, offset_alto); box(actual[0], 0, 0); wrefresh(actual[0]); break; case 'M': case 'm': /* Quiero editar !!! */ - sprintf(codigo, "%lu", emufs_idx_get_id_at(fp, ant_indice)); - art_modificar(codigo); + 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, emufs_idx_get_id_at(fp, ant_indice), &size, &pos_actual); - data = procesar_registro_articulo(fp, data, &size, &pos_actual); + 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 */ - wattron(padre, A_BOLD); - wattron(padre, COLOR_PAIR(COLOR_RED)); - mvwaddstr(padre, h-5, 5, "Teclas :"); - mvwaddstr(padre, h-5, 35, "Leyenda :"); - wattroff(padre, A_BOLD); - wattroff(padre, COLOR_PAIR(COLOR_RED)); - mvwaddstr(padre, h-4, 38, "| = Separador de campo"); - mvwaddstr(padre, h-4, 8, "Salir = ENTER"); + mostrar_info(padre, h, offset_alto); box(actual[0], 0, 0); wrefresh(actual[0]); break; @@ -151,21 +200,21 @@ void ver_registros(WINDOW *padre, int w, int h) if (scroll > max_scroll) scroll = max_scroll; break; case 'l': - if (ant_indice < total_indice) { - ant_indice++; - if (ant_indice >= total_indice) ant_indice = total_indice-1; + 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, emufs_idx_get_id_at(fp, ant_indice), &size, &pos_actual); - data = procesar_registro_articulo(fp, data, &size, &pos_actual); + 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 (ant_indice != EMUFS_NOT_FOUND) { - ant_indice--; - if (ant_indice == EMUFS_NOT_FOUND) ant_indice = 0; + 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, emufs_idx_get_id_at(fp, ant_indice), &size, &pos_actual); - data = procesar_registro_articulo(fp, data, &size, &pos_actual); + data = (char *)fp->leer_registro_raw(fp, indices[indices_actual], &size, &pos_actual); + data = procesar(fp, data, &size, &pos_actual, &ancho_registro); } } @@ -188,20 +237,31 @@ void ver_registros(WINDOW *padre, int w, int h) wrefresh(actual[1]); wrefresh(padre); } - delwin(actual[1]); + if (indices) free(indices); + if (data) free(data); + + emufs_destruir(fp); delwin(actual[0]); wrefresh(padre); curs_set(1); } -static char *procesar_registro_articulo(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *size, int *pos_actual) +char *procesar_registro_articulo_tipo3(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *size, int *pos_actual, int *ancho) { - char *tmp, *salida, *tmp1, pos_actualizada; - int cant_header, i=0, j; + 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 (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 @@ -212,38 +272,470 @@ static char *procesar_registro_articulo(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *s * +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; }