X-Git-Url: https://git.llucax.com/z.facultad/75.06/emufs.git/blobdiff_plain/ecddfc3161e6285cdd95ec7237d1e8e562a594a1..227ecbe0900c9eccb818b228ee9eefe57522c699:/emufs_gui/emufs_view.c diff --git a/emufs_gui/emufs_view.c b/emufs_gui/emufs_view.c index 2ce36ab..0062719 100644 --- a/emufs_gui/emufs_view.c +++ b/emufs_gui/emufs_view.c @@ -13,6 +13,7 @@ #include "facturas.h" #include "emufs.h" #include "viewer.h" +#include "tree_viewer.h" #define CTRLD 4 @@ -25,6 +26,7 @@ void menu_mantenimiento(); void menu_estadisticas(); void menu_ver_registros(); void menu_ver_bloques(); +void menu_ver_indices(); void preguntar_nuevo_tipo(const char *title, int *tipo, int *tam_bloque, int *tam_reg); char *preguntar_file(); @@ -41,111 +43,6 @@ typedef enum { NULL_BLOCK_FOUND /* Tamaño de bloque <= 0!!! */ } t_Param; -struct _mis_param_ { - int xml_fact; /* Pos en argv del archivo XML a usar para facturas */ - int xml_art; /* Pos en argv del archivo XML a usar para articulos */ - char tipo_arch_fact; /* Tipo de archivo para Facturas */ - char tipo_arch_art; /* Tipo de archivo para Articulos */ - char tipo_arch_nota; - EMUFS_BLOCK_SIZE tam_bloque_fact; - EMUFS_BLOCK_SIZE tam_bloque_art; - EMUFS_BLOCK_SIZE tam_bloque_nota; -} parametros; - -/* Verifica Argumentos */ -t_Param param_ok(int argc, char *argv[]) -{ - int n,i; - int file; - for(i=1; i= argc) return SHOW_HELP; - if (strcmp(argv[i]+strlen(argv[i])-3, "xml") == 0) { - /* Luego del archivo XML debe seguir el tipo */ - if ((i+1) 3)) return TIPO_INVALIDO; - if (((n == 1) || (n == 3)) && ((i+2)>=argc)) - return BLOQUE_NO_DEFINIDO; - parametros.tipo_arch_art = n; - if (n != 2) { - if ((i+2) >= argc) return NULL_BLOCK_FOUND; - parametros.tam_bloque_art = atoi(argv[i+2]); - if (parametros.tam_bloque_art <= 0) return NULL_BLOCK_FOUND; - } - parametros.xml_art = i; - } else { - /* Ops, no hay mas parametros */ - return TIPO_NO_DEFINIDO; - } - } else { - return NO_ART_FILE; - } - } /* Articulos */ - - if (strcmp(argv[i], "-f") == 0) { /* Facturas! */ - i++; - if (i >= argc) return SHOW_HELP; - if (strcmp(argv[i]+strlen(argv[i])-3, "xml") == 0) { - /* Luego del archivo XML debe seguir el tipo */ - file = i; - i++; - if (i 3)) return TIPO_INVALIDO; - if (((n == 1) || (n == 3)) && ((i+1)>=argc)) - return BLOQUE_NO_DEFINIDO; - parametros.tipo_arch_fact = n; - i++; - switch (n) { - case 1: - case 3: - parametros.tam_bloque_fact = atoi(argv[i]); - if (parametros.tam_bloque_fact <= 0) return NULL_BLOCK_FOUND; - i++; - if (i >= argc) return SHOW_HELP; - n = atoi(argv[i]); - if ((n<1) || (n>3)) return SHOW_HELP; - parametros.tipo_arch_nota = n; - if (((n == 1) || (n == 3)) && ((i+1)>=argc)) - return SHOW_HELP; - i++; - if (n != 2) { - parametros.tam_bloque_nota = atoi(argv[i]); - if (parametros.tam_bloque_nota <= 0) return SHOW_HELP; - } - break; - case 2: - if (i >= argc) return SHOW_HELP; - n = atoi(argv[i]); - if ((n<1) || (n>3)) return SHOW_HELP; - parametros.tipo_arch_nota = n; - if (((n == 1) || (n == 3)) && ((i+1)>=argc)) - return SHOW_HELP; - i++; - if (n != 2) { - parametros.tam_bloque_nota = atoi(argv[i]); - if (parametros.tam_bloque_nota <= 0) return SHOW_HELP; - } - } - PERR("ACA"); - parametros.xml_fact = file; - } else { - /* Ops, no hay mas parametros */ - return TIPO_NO_DEFINIDO; - } - } else { - return NO_FACT_FILE; - } - } /* Facturas */ - - } - return PARAM_OK; -} - void print_help(char *s) { printf("EMUFS - 1v0\n"); @@ -161,41 +58,225 @@ void print_help(char *s) printf(" tamaño bloque debe ser especificado solo en aquellos tipos que lo requiera.\n"); } +int leer_tipo_arbol(char *s) { + if (strcmp(s, "B") == 0) return 0; + if (strcmp(s, "BA") == 0) return 1; + if (strcmp(s, "BP") == 0) return 2; + + /* Por defecto es un B */ + return 0; +} + +void leer_param_ind_art(t_Parametros *param, xmlNode *padre) +{ + xmlNode *node; + char *tmp, *nombre; + node = padre->children; + while (node) { + if (node->type == XML_ELEMENT_NODE) { + if (strcmp(node->name, "indice")==0) { + PERR(" LEO INDICE"); + nombre = xml_get_prop(node, "nombre"); + + if (strcmp(nombre, "codigo")==0) { + tmp = xml_get_prop(node, "tipo"); + param->ind_art[0].tipo_arbol = leer_tipo_arbol(tmp); + free(tmp); + tmp = xml_get_prop(node, "bloque"); + param->ind_art[0].tam_bloque = atoi(tmp); + free(tmp); + } else if (strcmp(nombre, "desc")==0) { + tmp = xml_get_prop(node, "tipo"); + param->ind_art[1].tipo_arbol = leer_tipo_arbol(tmp); + free(tmp); + tmp = xml_get_prop(node, "bloque"); + param->ind_art[1].tam_bloque = atoi(tmp); + free(tmp); + } else if (strcmp(nombre, "presentacion")==0) { + tmp = xml_get_prop(node, "tipo"); + param->ind_art[2].tipo_arbol = leer_tipo_arbol(tmp); + free(tmp); + tmp = xml_get_prop(node, "bloque"); + param->ind_art[2].tam_bloque = atoi(tmp); + free(tmp); + } + PERR(" LISTO"); + free(nombre); + } + } + node = node->next; + } +} + +void leer_param_ind_fact(t_Parametros *param, xmlNode *padre) +{ + xmlNode *node; + char *tmp, *nombre; + node = padre->children; + while (node) { + if (node->type == XML_ELEMENT_NODE) { + if (strcmp(node->name, "indice")==0) { + PERR(" LEO INDICE"); + nombre = xml_get_prop(node, "nombre"); + + if (strcmp(nombre, "numero")==0) { + tmp = xml_get_prop(node, "tipo"); + param->ind_fac[0].tipo_arbol = leer_tipo_arbol(tmp); + free(tmp); + tmp = xml_get_prop(node, "bloque"); + param->ind_fac[0].tam_bloque = atoi(tmp); + free(tmp); + } else if (strcmp(nombre, "emision")==0) { + tmp = xml_get_prop(node, "tipo"); + param->ind_fac[1].tipo_arbol = leer_tipo_arbol(tmp); + free(tmp); + tmp = xml_get_prop(node, "bloque"); + param->ind_fac[1].tam_bloque = atoi(tmp); + free(tmp); + } else if (strcmp(nombre, "vto")==0) { + tmp = xml_get_prop(node, "tipo"); + param->ind_fac[2].tipo_arbol = leer_tipo_arbol(tmp); + free(tmp); + tmp = xml_get_prop(node, "bloque"); + param->ind_fac[2].tam_bloque = atoi(tmp); + free(tmp); + } else if (strcmp(nombre, "cheque")==0) { + tmp = xml_get_prop(node, "tipo"); + param->ind_fac[3].tipo_arbol = leer_tipo_arbol(tmp); + free(tmp); + tmp = xml_get_prop(node, "bloque"); + param->ind_fac[3].tam_bloque = atoi(tmp); + free(tmp); + } else if (strcmp(nombre, "ctacte")==0) { + tmp = xml_get_prop(node, "tipo"); + param->ind_fac[4].tipo_arbol = leer_tipo_arbol(tmp); + free(tmp); + tmp = xml_get_prop(node, "bloque"); + param->ind_fac[4].tam_bloque = atoi(tmp); + free(tmp); + } + PERR(" LISTO"); + free(nombre); + } + } + node = node->next; + } +} + +void leer_param_art(t_Parametros *param, xmlNode *padre) +{ + xmlNode *node; + char *tmp; + node = padre->children; + while (node) { + if (node->type == XML_ELEMENT_NODE) { + if (strcmp(node->name, "fuente")==0) { + strcpy(param->xml_art, XML_GET_CONTENT(node->children)); + } else if (strcmp(node->name, "datos")==0) { + tmp = xml_get_prop(node, "tipo"); + param->tipo_arch_art = atoi(tmp)-1; + free(tmp); + tmp = xml_get_prop(node, "bloque"); + param->tam_bloque_art = atoi(tmp); + free(tmp); + } else if (strcmp(node->name, "indices")==0) { + PERR("LEO INDICES") + leer_param_ind_art(param, node); + PERR("LISTO"); + } + } + node = node->next; + } +} + +void leer_param_fac(t_Parametros *param, xmlNode *padre) +{ + xmlNode *nodo; + char *tmp; + nodo = padre->children; + while (nodo) { + if (nodo->type == XML_ELEMENT_NODE) { + if (strcmp(nodo->name, "fuente")==0) { + strcpy(param->xml_fact, XML_GET_CONTENT(nodo->children)); + } else if (strcmp(nodo->name, "datos")==0) { + tmp = xml_get_prop(nodo, "tipo"); + param->tipo_arch_fact = atoi(tmp)-1; + free(tmp); + tmp = xml_get_prop(nodo, "bloque"); + param->tam_bloque_fact = atoi(tmp); + free(tmp); + } else if (strcmp(nodo->name, "datos_notas")==0) { + tmp = xml_get_prop(nodo, "tipo"); + param->tipo_arch_nota = atoi(tmp)-1; + free(tmp); + tmp = xml_get_prop(nodo, "bloque"); + param->tam_bloque_nota = atoi(tmp); + free(tmp); + } else if (strcmp(nodo->name, "indices")==0) { + PERR("LEO INDICES") + leer_param_ind_fact(param, nodo); + PERR("LISTO"); + } + } + nodo = nodo->next; + } +} + +void param_xml(char *s, t_Parametros *param) +{ + xmlDocPtr document; + xmlNode *node, *inicio; + + document = xmlReadFile(s, NULL,0); + if (document == NULL) { + return; + } + inicio = NULL; + node = xmlDocGetRootElement(document); + /* Busco el TAG principal "EMUFS" */ + while (node) { + if (node->type == XML_ELEMENT_NODE) { + PERR(node->name); + if (strcmp(node->name, "emufs") == 0) { + inicio = node->children; + break; + } + } + node = node->next; + } + if (inicio == NULL) { + PERR("NO ENCONTRE TAG PRINCIPAL"); + xmlFreeDoc(document); + xmlCleanupParser(); + return; + } + + node = inicio; + while (node) { + if (node->type == XML_ELEMENT_NODE) { + if (strcmp(node->name, "articulos")==0) { + leer_param_art(param, node); + } else if (strcmp(node->name, "facturas")==0) { + leer_param_fac(param, node); + } + } + node = node->next; + } +} + +static t_Parametros parametros; + int main(int argc, char *argv[]) { - int fin=0; WINDOW *dialog; - parametros.xml_art = parametros.xml_fact = -1; - switch (param_ok(argc, argv)) { - case SHOW_HELP: - print_help(argv[0]); - return 0; - case TIPO_NO_DEFINIDO: - printf("Falta parámetro requerido.\nLuego del nombre del archivo debe especificar el tipo de archivo\n"); - return 1; - case BLOQUE_NO_DEFINIDO: - printf("Falta parámetro requerido.\nLuego del tipo de archivo debe especificar el tamaño del bloque a utilizar\n"); - return 1; - case TIPO_INVALIDO: - printf("Tipo de archivo no valido. Los valores posibles para el tipo de archivo son:\n"); - printf("\t1 - Archivo de bloque parametrizado y registro de long. variable.\n"); - printf("\t2 - Archivo de registros variables sin bloques.\n"); - printf("\t3 - Archivos de bloque parametrizado y registro de long. parametrizada.\n"); - return 2; - case NO_ART_FILE: - printf("Falta parámetro requerido.\nHa utilizado el modificador -a para crear los articulos a partir de un XML pero no ha especificado ningún archivo XML.\n"); - return 3; - case NO_FACT_FILE: - printf("Falta parámetro requerido.\nHa utilizado el modificador -f para crear las facturas a partir de un XML pero no ha especificado ningún archivo XML.\n"); - return 3; - case NULL_BLOCK_FOUND: - printf("Error de parámerto.\nHa ingresado un valor nulo como tamaño de bloque.\n"); - return 4; - case PARAM_OK: - fin = 0; + if (argc != 2) { + print_help(argv[0]); } + if (argc == 2) + param_xml(argv[1], ¶metros); + #ifdef DEBUG printf("CUIDADO! - Uds esta a punto de ejecutar EMUFS Gui compilado con mensajes de debug (-DDEBUG). "); printf("Esto puede causar que ante un error alguna función trate de emitir un mensaje por pantalla "); @@ -246,23 +327,14 @@ int main(int argc, char *argv[]) attroff(COLOR_PAIR(2)); wrefresh(stdscr); - dialog = msg_box(stdscr, COLS, LINES, "Generando archivos ..."); - - if (parametros.xml_art != -1) { - art_cargar(argv[parametros.xml_art], parametros.tipo_arch_art, parametros.tam_bloque_art); - } else { - art_cargar(NULL, -1, -1); - } - if (parametros.xml_fact != -1) { - fact_cargar( - argv[parametros.xml_fact], - parametros.tipo_arch_fact, - parametros.tam_bloque_fact, - parametros.tipo_arch_nota, - parametros.tam_bloque_nota - ); + if (argc == 2) { + dialog = msg_box(stdscr, COLS, LINES, "Generando archivos ..."); + art_cargar(¶metros); + fact_cargar(¶metros); } else { - fact_cargar(NULL, -1, -1, -1, -1); + dialog = msg_box(stdscr, COLS, LINES, "Recuperando archivos ..."); + art_cargar(NULL); + fact_cargar(NULL); } msg_box_free(stdscr, dialog); @@ -284,11 +356,12 @@ void menu_facturas() MENU_OPCION("Baja", "Elimina una factura existente."), MENU_OPCION("Modificacion", "Modifica una factura existente."), MENU_OPCION("Consultas", "Consulta varias de articulo."), + MENU_OPCION("Recorrer", "Recorrer el archivo por alguno de sus indices."), MENU_OPCION("Volver", "Volver al menu anterior.") }; int opt; - while ((opt = menu_ejecutar(mi_menu, 5, "Menu Articulos")) != 4) { + while ((opt = menu_ejecutar(mi_menu, 6, "Menu Facturas")) != 5) { switch (opt) { case 0: fact_agregar(NULL); @@ -298,8 +371,12 @@ void menu_facturas() break; case 2: fact_modificar(NULL); + break; case 3: fact_consultas(NULL); + break; + case 4: + fact_recorrer(); } } } @@ -311,11 +388,13 @@ void menu_articulos() MENU_OPCION("Baja", "Elimina un articulo existente."), MENU_OPCION("Modificacion", "Modifica un articulo existente."), MENU_OPCION("Consultas", "Consulta varias de articulo."), + MENU_OPCION("Recorrer", "Recorrer el archivo por alguno de sus indices."), + MENU_OPCION("Ver ventas", "Ver venta de articulos entre 2 fechas."), MENU_OPCION("Volver", "Volver al menu anterior.") }; int opt; - while ((opt = menu_ejecutar(mi_menu, 5, "Menu Articulos")) != 4) { + while ((opt = menu_ejecutar(mi_menu, 7, "Menu Articulos")) != 6) { switch (opt) { case 0: art_agregar(NULL); @@ -328,6 +407,12 @@ void menu_articulos() break; case 3: art_consultas(NULL); + break; + case 4: + art_recorrer(); + break; + case 5: + art_ver_ventas(); } } @@ -418,10 +503,61 @@ void menu_ver_bloques() } } -int main_menu() +void ver_indice(int arch, char *indice) { - int c, w, h; + INDICE *idx; + int w, h; WINDOW *win; + switch (arch) { + case 0: + idx = emufs_buscar_indice_por_nombre(art_get_lst()->fp, indice); + break; + case 1: + idx = emufs_buscar_indice_por_nombre(fact_get_lst()->fp, indice); + } + h = LINES-4; + w = COLS-2; + win = newwin(h, w, 2, 1); + + if ((idx != NULL) && (idx->tipo != IND_B_PLUS)) { + emufs_indice_b_ver(idx, win, w, h, 0); + } else { + if (idx != NULL) { + WINDOW *dlg; + dlg = msg_box(win, w, h, "El tipo de arbol B+ no esta soportado en el visor"); + getch(); + msg_box_free(win, dlg); + } + } + delwin(win); +} + +void menu_ver_indices() +{ + int arch[8] = {0, 0, 0, 1, 1, 1, 1, 1}; + char *nombres[8] = {"codigo", "desc", "presentacion", + "numero", "emision", "vto", "cheque", "ctacte"}; + MENU(mi_menu) { + MENU_OPCION("Articulos->codigo",""), + MENU_OPCION("Articulos->desc",""), + MENU_OPCION("Articulos->presentacion",""), + MENU_OPCION("Facturas->numero",""), + MENU_OPCION("Facturas->emision",""), + MENU_OPCION("Facturas->vto",""), + MENU_OPCION("Facturas->cheque", ""), + MENU_OPCION("Facturas->ctacte", ""), + MENU_OPCION("Volver", "Volver al menu anterior.") + }; + int c; + + while ((c=menu_ejecutar(mi_menu, 9, "Menu Principal"))!=8) { + ver_indice(arch[c], nombres[c]); + } +} + +int main_menu() +{ + int c; MENU(mi_menu) { MENU_OPCION("Articulos","Alta,baja,consulta y modificacion de articulos."), MENU_OPCION("Facturas","Alta,baja,consulta y modificacion de facturas."), @@ -429,7 +565,7 @@ int main_menu() MENU_OPCION("Ver Bloques","Ver bloques (en su contexto) de los archivos."), MENU_OPCION("Estadisticas","Ver estadisticas de ocupacion de archivos."), MENU_OPCION("Mantenimiento","Tareas de mantenimiento de los archivos."), - MENU_OPCION("DEBUG", "Debug de Arbol B"), + MENU_OPCION("Ver Indices", "Permite ver y recorrer los indices"), MENU_OPCION("Salir", "Salir del sistema.") }; @@ -454,11 +590,7 @@ int main_menu() menu_mantenimiento(); break; case 6: - h = LINES-2; - w = COLS-2; - win = newwin(h, w, 1, 1); - emufs_indice_b_ver(art_get_lst()->fp->indices, win, w, h, 0); - delwin(win); + menu_ver_indices(); } } @@ -543,7 +675,9 @@ void menu_mantenimiento() nuevo_tam_registro = -1; /* No permito cambiar el tamaño de registro */ preguntar_nuevo_tipo("Parametros para Articulos", &nuevo_tipo, &nuevo_tam_bloque, &nuevo_tam_registro); dlg = msg_box(stdscr, COLS, LINES, "Cambiando el formato de archivo .... Aguarde"); - art_reformatear(nuevo_tipo, nuevo_tam_bloque, nuevo_tam_registro); + parametros.tipo_arch_art = nuevo_tipo; + parametros.tam_bloque_art = nuevo_tam_bloque; + art_reformatear(¶metros); msg_box_free(stdscr, dlg); break; case 4: @@ -803,3 +937,4 @@ char *preguntar_file() form_destruir(form); return t; } +