X-Git-Url: https://git.llucax.com/z.facultad/75.06/emufs.git/blobdiff_plain/502a6f92fd7acf3c942a92b41bf0ed788a128515..4be845d676ee6fec74f785564faa7e2367a55543:/emufs_gui/emufs_view.c diff --git a/emufs_gui/emufs_view.c b/emufs_gui/emufs_view.c index f26ba48..41b1b1a 100644 --- a/emufs_gui/emufs_view.c +++ b/emufs_gui/emufs_view.c @@ -1,5 +1,4 @@ - #include #include #include @@ -14,6 +13,7 @@ #include "facturas.h" #include "emufs.h" #include "viewer.h" +#include "tree_viewer.h" #define CTRLD 4 @@ -26,7 +26,8 @@ void menu_mantenimiento(); void menu_estadisticas(); void menu_ver_registros(); void menu_ver_bloques(); -void preguntar_nuevo_tipo(int *tipo, int *tam_bloque, int *tam_reg); +void menu_ver_indices(); +void preguntar_nuevo_tipo(const char *title, int *tipo, int *tam_bloque, int *tam_reg); void ver_estadisticas(EMUFS *fp); @@ -41,123 +42,278 @@ 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 */ - EMUFS_BLOCK_SIZE tam_bloque_fact; - EMUFS_BLOCK_SIZE tam_bloque_art; -} parametros; - -/* Verifica Argumentos */ -t_Param param_ok(int argc, char *argv[]) +void print_help(char *s) +{ + printf("EMUFS - 2v0\n"); + printf("Modo de uso :%s [|-h] \n", s); + printf("\temufs.xml es el archivo XML que cumple con emufs.dtd con la configuracion a usar.\n"); + printf("\t-h Muestra este msg de ayuda.\n"); +} + +int leer_tipo_arbol(char *s) { + if (strcmp(s, "B") == 0) return 0; + if (strcmp(s, "BA") == 0) return 1; + + /* Por defecto es un B */ + return 0; +} + +void leer_param_ind_art(t_Parametros *param, xmlNode *padre) { - int n,i; - 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; + 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); } - } else { - return NO_ART_FILE; + PERR(" LISTO"); + free(nombre); } - } /* 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 */ - if ((i+1) 3)) return TIPO_INVALIDO; - if (((n == 1) || (n == 3)) && ((i+2)>=argc)) - return BLOQUE_NO_DEFINIDO; - parametros.tipo_arch_fact = n; - if (n != 2) { - parametros.tam_bloque_fact = atoi(argv[i+2]); - if (parametros.tam_bloque_fact <= 0) return NULL_BLOCK_FOUND; - } - parametros.xml_fact = i; - } else { - /* Ops, no hay mas parametros */ - return TIPO_NO_DEFINIDO; + } + 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); } - } else { - return NO_FACT_FILE; + PERR(" LISTO"); + free(nombre); } - } /* Facturas */ - + } + node = node->next; } - return PARAM_OK; } -void print_help(char *s) +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) { - printf("EMUFS - 1v0\n"); - printf("Modo de uso : %s [-[f|a] tipo [tamaño bloque]] \n", s); - printf(" -f indica que lo que está a continuación seran los datos para generar el archivo de facturas.\n"); - printf(" -a indica que lo que está a continuación seran los datos para generar el archivo de articulos.\n"); - printf(" 'tipo' es el modo de archivo. Siendo :\n"); - printf(" 1 - Registros long. variables con bloque parametrizado\n"); - printf(" 2 - Registros long. variables sin bloque\n"); - printf(" 3 - Registros long fija con bloque parametrizado\n"); - printf(" tamaño bloque debe ser especificado solo en aquellos tipos que lo requiera.\n"); + 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 c, fin=0; WINDOW *dialog; - parametros.xml_art = parametros.xml_fact = -1; - switch (param_ok(argc, argv)) { - case SHOW_HELP: + if (argc > 2) { + print_help(argv[0]); + exit(0); + } + + if (argc == 2) { + if (strcmp(argv[1], "-h")==0) { 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; + exit(0); + } + param_xml(argv[1], ¶metros); + + /* Valido que los tamaños de los bloques sean multiplos de 512 */ + if ((parametros.tam_bloque_art%512) != 0) { + PERR("Los tamaños de bloque deben ser multiplos de 512!!"); + exit(1); + } + if ((parametros.tam_bloque_fact%512) != 0) { + PERR("Los tamaños de bloque deben ser multiplos de 512!!"); + exit(1); + } + if ((parametros.ind_art[0].tam_bloque%512) != 0) { + PERR("Los tamaños de bloque deben ser multiplos de 512!!"); + exit(1); + } + if ((parametros.ind_art[1].tam_bloque%512) != 0) { + PERR("Los tamaños de bloque deben ser multiplos de 512!!"); + exit(1); + } + if ((parametros.ind_art[2].tam_bloque%512) != 0) { + PERR("Los tamaños de bloque deben ser multiplos de 512!!"); + exit(1); + } + if ((parametros.ind_fac[0].tam_bloque%512) != 0) { + PERR("Los tamaños de bloque deben ser multiplos de 512!!"); + exit(1); + } + if ((parametros.ind_fac[1].tam_bloque%512) != 0) { + PERR("Los tamaños de bloque deben ser multiplos de 512!!"); + exit(1); + } + if ((parametros.ind_fac[2].tam_bloque%512) != 0) { + PERR("Los tamaños de bloque deben ser multiplos de 512!!"); + exit(1); + } + if ((parametros.ind_fac[3].tam_bloque%512) != 0) { + PERR("Los tamaños de bloque deben ser multiplos de 512!!"); + exit(1); + } + if ((parametros.ind_fac[4].tam_bloque%512) != 0) { + PERR("Los tamaños de bloque deben ser multiplos de 512!!"); + exit(1); + } } #ifdef DEBUG @@ -210,48 +366,19 @@ 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); + if (argc == 2) { + dialog = msg_box(stdscr, COLS, LINES, "Generando archivos ..."); + art_cargar(¶metros); + fact_cargar(¶metros); } else { - fact_cargar(NULL, -1, -1); + dialog = msg_box(stdscr, COLS, LINES, "Recuperando archivos ..."); + art_cargar(NULL); + fact_cargar(NULL); } msg_box_free(stdscr, dialog); - /* CICLO PRINCIPAL DE LA APLICACION */ - while ((c = main_menu()) != -1) { - switch (c) { - case 0: - menu_articulos(); - break; - case 1: - menu_facturas(); - break; - case 2: - menu_ver_registros(); - break; - case 3: - menu_ver_bloques(); - break; - case 4: - menu_estadisticas(); - break; - case 5: - menu_mantenimiento(); - break; - case 6: - fin = 1; - break; - } - if (fin == 1) break; - } + main_menu(); endwin(); @@ -267,11 +394,13 @@ void menu_facturas() MENU_OPCION("Alta", "Crear una nueva factura."), 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, 4, "Menu Articulos")) != 3) { + while ((opt = menu_ejecutar(mi_menu, 6, "Menu Facturas")) != 5) { switch (opt) { case 0: fact_agregar(NULL); @@ -281,6 +410,12 @@ void menu_facturas() break; case 2: fact_modificar(NULL); + break; + case 3: + fact_consultas(NULL); + break; + case 4: + fact_recorrer(); } } } @@ -291,11 +426,14 @@ void menu_articulos() MENU_OPCION("Alta", "Crear un nuevo articulo."), 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, 4, "Menu Articulos")) != 3) { + while ((opt = menu_ejecutar(mi_menu, 7, "Menu Articulos")) != 6) { switch (opt) { case 0: art_agregar(NULL); @@ -305,6 +443,15 @@ void menu_articulos() break; case 2: art_modificar(NULL); + break; + case 3: + art_consultas(NULL); + break; + case 4: + art_recorrer(); + break; + case 5: + art_ver_ventas(); } } @@ -395,8 +542,61 @@ void menu_ver_bloques() } } +void ver_indice(int arch, char *indice) +{ + 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."), @@ -404,10 +604,36 @@ 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("Ver Indices", "Permite ver y recorrer los indices"), MENU_OPCION("Salir", "Salir del sistema.") }; - return menu_ejecutar(mi_menu, 7, "Menu Principal"); + while ((c=menu_ejecutar(mi_menu, 8, "Menu Principal"))!=7) { + switch (c) { + case 0: + menu_articulos(); + break; + case 1: + menu_facturas(); + break; + case 2: + menu_ver_registros(); + break; + case 3: + menu_ver_bloques(); + break; + case 4: + menu_estadisticas(); + break; + case 5: + menu_mantenimiento(); + break; + case 6: + menu_ver_indices(); + } + } + + return 0; } @@ -456,16 +682,18 @@ void menu_mantenimiento() MENU_OPCION("Compactar Notas","Elimina espacio no utilizado."), MENU_OPCION("Cambiar tipo Archivo Articulos","Permite cambiar el tipo del archivo."), MENU_OPCION("Cambiar tipo Archivo Facturas","Permite cambiar el tipo del archivo."), - MENU_OPCION("Cambiar tipo Archivo Notas","Permite cambiar el tipo del archivo."), + MENU_OPCION("Exportar Articulos", "Genera un archivo XML con los articulos."), + MENU_OPCION("Expostar Facturas", "Genera un archivo XML con las facturas."), MENU_OPCION("Volver", "Volver al menu anterior.") }; int opt; - int nuevo_tam_registro, nuevo_tam_bloque; - int nuevo_tipo; + int nuevo_tam_registro, nuevo_tam_bloque, nuevo_tipo; + int nuevo_tam_registro1, nuevo_tam_bloque1, nuevo_tipo1; WINDOW *dlg; + char *s; - while ((opt = menu_ejecutar(mi_menu, 7, "Menu Mantenimiento")) != 6) { + while ((opt = menu_ejecutar(mi_menu, 8, "Menu Mantenimiento")) != 7) { switch (opt) { case 0: dlg = msg_box(stdscr, COLS, LINES, "Compactando archivo.... Aguarde"); @@ -484,43 +712,69 @@ void menu_mantenimiento() break; case 3: nuevo_tam_registro = -1; /* No permito cambiar el tamaño de registro */ - preguntar_nuevo_tipo(&nuevo_tipo, &nuevo_tam_bloque, &nuevo_tam_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: nuevo_tam_registro = 0; - preguntar_nuevo_tipo(&nuevo_tipo, &nuevo_tam_bloque, &nuevo_tam_registro); + preguntar_nuevo_tipo("Parametros para Facturas", &nuevo_tipo, &nuevo_tam_bloque, &nuevo_tam_registro); + preguntar_nuevo_tipo("Parametros para Notas", &nuevo_tipo1, &nuevo_tam_bloque1, &nuevo_tam_registro1); dlg = msg_box(stdscr, COLS, LINES, "Cambiando el formato de archivo .... Aguarde"); - fact_reformatear(nuevo_tipo, nuevo_tam_bloque, nuevo_tam_registro); + parametros.tipo_arch_art = nuevo_tipo; + parametros.tam_bloque_fact = nuevo_tam_bloque; + parametros.tipo_arch_nota = nuevo_tipo1; + parametros.tam_bloque_nota = nuevo_tam_bloque1; + fact_reformatear(¶metros); msg_box_free(stdscr, dlg); break; case 5: - nuevo_tam_registro = -2; - preguntar_nuevo_tipo(&nuevo_tipo, &nuevo_tam_bloque, &nuevo_tam_registro); + s = preguntar_file(); + if (s) { + dlg = msg_box(stdscr, COLS, LINES, "Exportando .... Aguarde"); + PERR("Exportando"); + art_exportar_xml(s); + msg_box_free(stdscr, dlg); + free(s); + } + break; + case 6: + s = preguntar_file(); + if (s) { + dlg = msg_box(stdscr, COLS, LINES, "Exportando .... Aguarde"); + PERR("Exportando"); + fact_exportar_xml(s); + msg_box_free(stdscr, dlg); + free(s); + } } } } -void preguntar_nuevo_tipo(int *tipo, int *tam_bloque, int *tam_reg) +void preguntar_nuevo_tipo(const char *title, int *tipo, int *tam_bloque, int *tam_reg) { WINDOW *win; t_Form *form; char *s; int n, is_ok; - win = newwin(LINES/2, COLS/2, LINES/4, COLS/4); + win = newwin(LINES/2, 2*COLS/3, LINES/4, 2*COLS/6); box(win, 0, 0); + mvwaddstr(win, 0, 1, title); form = form_crear(win); - form_agregar_widget(form, RADIO, "Tipo de archivo", 3, "T1,T2,T3"); + form_agregar_widget(form, RADIO, "Tipo de archivo", 5, "T1,T2,T3,T4,T5"); form_ejecutar(form, 1,1); s = form_obtener_valor_char(form, "Tipo de archivo"); if (strcmp(s, "T1") == 0) n = T1; if (strcmp(s, "T2") == 0) n = T2; if (strcmp(s, "T3") == 0) n = T3; + if (strcmp(s, "T4") == 0) n = T4; + if (strcmp(s, "T5") == 0) n = T5; form_destruir(form); @@ -568,6 +822,19 @@ void preguntar_nuevo_tipo(int *tipo, int *tam_bloque, int *tam_reg) if ((*tam_reg) != -1) (*tam_reg) = form_obtener_valor_int(form, "Tamaño de registro"); form_destruir(form); + break; + case T4: + case T5: + form = form_crear(win); + form_agregar_widget(form, INPUT, "Tamaño de bloque", 8, ""); + is_ok = 0; + do { + form_set_valor(form, "Tamaño de bloque", ""); + form_ejecutar(form, 1,1); + if (form_obtener_valor_int(form, "Tamaño de bloque") > 0) is_ok = 1; + } while (!is_ok); + (*tam_bloque) = form_obtener_valor_int(form, "Tamaño de bloque"); + form_destruir(form); } werase(win); wrefresh(win); @@ -615,44 +882,56 @@ void ver_estadisticas(EMUFS *fp) wattroff(win, A_BOLD); sprintf(s, "%lu bytes", fp->tam_reg); waddstr(win, s); + break; + case T5: + waddstr(win, "Registro long. fija con bloque parametrizado (Seq. Indexado)"); + wattron(win, A_BOLD); + mvwaddstr(win, i++, 1, "Tamaño de bloque : "); + wattroff(win, A_BOLD); + sprintf(s, "%lu bytes", fp->tam_bloque); + waddstr(win, s); + wattron(win, A_BOLD); + mvwaddstr(win, i++, 1, "Tamaño de registro : "); + wattroff(win, A_BOLD); + sprintf(s, "%lu bytes", fp->tam_reg); + waddstr(win, s); + break; + case T4: + waddstr(win, "Registro long. variable con bloque parametrizado (Seq. Indexado)"); + wattron(win, A_BOLD); + mvwaddstr(win, i++, 1, "Tamaño de bloque : "); + wattroff(win, A_BOLD); + sprintf(s, "%lu bytes", fp->tam_bloque); + waddstr(win, s); } + wattron(win, A_BOLD); - mvwaddstr(win, i++, 1, "Cant. Registros : "); + mvwaddstr(win, i++, 1, "Tamaño ocupado por datos / Tamaño archivo : "); wattroff(win, A_BOLD); - sprintf(s, "%lu", stats.cant_registros); + sprintf(s, "%lu/%lu bytes (%.2f %%)", + stats.tam_archivo - stats.tam_info_control_dat - stats.total_fs,stats.tam_archivo, + (stats.tam_archivo-stats.tam_info_control_dat-stats.total_fs)*100.0f/(float)stats.tam_archivo); waddstr(win, s); - + wattron(win, A_BOLD); - mvwaddstr(win, i++, 1, "Tamaño de Archivo : "); + mvwaddstr(win, i++, 1, "Tamaño info de control(1) / Tamaño archivo : "); wattroff(win, A_BOLD); - sprintf(s, "%lu bytes", stats.tam_archivo); + sprintf(s, "%lu/%lu bytes (%.2f %%)", stats.tam_info_control_dat+stats.tam_archivos_aux, stats.tam_archivo, (stats.tam_info_control_dat+stats.tam_archivos_aux)*100.0f/(float)stats.tam_archivo); waddstr(win, s); wattron(win, A_BOLD); - mvwaddstr(win, i++, 1, "Tamaño de Datos : "); + mvwaddstr(win, i++, 1, "Espacio Libre / Tamaño archivo : "); wattroff(win, A_BOLD); - sprintf(s, "%lu bytes (%.2f %%)", stats.tam_archivo-stats.tam_info_control_dat, (stats.tam_archivo-stats.tam_info_control_dat)*100.0f/(float)stats.tam_archivo); + sprintf(s, "%lu/%lu bytes (%.2f %%)", stats.total_fs, stats.tam_archivo, stats.total_fs*100.0f/(float)stats.tam_archivo); waddstr(win, s); - wattron(win, A_BOLD); - mvwaddstr(win, i++, 1, "Tamaño de Info de Control : "); - wattroff(win, A_BOLD); - sprintf(s, "%lu bytes (%.2f %%)", stats.tam_info_control_dat+stats.tam_archivos_aux, (stats.tam_info_control_dat+stats.tam_archivos_aux)*100.0f/(float)stats.tam_archivo); - waddstr(win, s); - wattron(win, A_BOLD); mvwaddstr(win, i++, 1, "Media de espacio libre : "); wattroff(win, A_BOLD); sprintf(s, "%lu bytes/bloque", stats.media_fs); waddstr(win, s); - wattron(win, A_BOLD); - mvwaddstr(win, i++, 1, "Espacio Libre : "); - wattroff(win, A_BOLD); - sprintf(s, "%lu bytes", stats.total_fs); - waddstr(win, s); - wattron(win, A_BOLD); mvwaddstr(win, i++, 1, "Maximo de Espacio libre : "); wattroff(win, A_BOLD); @@ -666,11 +945,41 @@ void ver_estadisticas(EMUFS *fp) waddstr(win, s); wattron(win, A_BOLD); - mvwaddstr(win, i++, 1, "Cantidad de bloques : "); + mvwaddstr(win, i++, 1, "Tamaño de Archivo de datos : "); + wattroff(win, A_BOLD); + sprintf(s, "%lu bytes", stats.tam_archivo); + waddstr(win, s); + + wattron(win, A_BOLD); + mvwaddstr(win, i++, 1, "Tamaño de Archivos auxiliares : "); + wattroff(win, A_BOLD); + sprintf(s, "%lu bytes", stats.tam_archivos_aux); + waddstr(win, s); + + wattron(win, A_BOLD); + mvwaddstr(win, i++, 1, "Información de control en el .dat : "); wattroff(win, A_BOLD); - sprintf(s, "%lu", stats.cant_bloques); + sprintf(s, "%lu bytes", stats.tam_info_control_dat); waddstr(win, s); + if ((fp->tipo == T1) || (fp->tipo == T3)) { + wattron(win, A_BOLD); + mvwaddstr(win, i++, 1, "Cantidad de bloques : "); + wattroff(win, A_BOLD); + sprintf(s, "%lu", stats.cant_bloques); + waddstr(win, s); + } + + wattron(win, A_BOLD); + mvwaddstr(win, i++, 1, "Cant. Registros : "); + wattroff(win, A_BOLD); + sprintf(s, "%lu", stats.cant_registros); + waddstr(win, s); + + wattron(win, A_BOLD); + mvwaddstr(win, i++, 1, "(1) Info control del .dat + los archivos auxiliares!."); + wattroff(win, A_BOLD); + wattron(win, A_BLINK); mvwaddstr(win, i+2, 1, "Presione una tecla para continuar."); wattroff(win, A_BLINK); @@ -683,3 +992,28 @@ void ver_estadisticas(EMUFS *fp) delwin(win); } +char *preguntar_file() +{ + WINDOW *win; + t_Form *form; + char *s, *t; + + win = newwin(LINES/2, COLS/2, LINES/4, COLS/4); + box(win, 0, 0); + + form = form_crear(win); + form_agregar_widget(form, INPUT, "Nombre de archivo", 30, ""); + form_ejecutar(form, 1,1); + + s = form_obtener_valor_char(form, "Nombre de archivo"); + + if (strlen(s) == 0) { + form_destruir(form); + return NULL; + } + t = (char *)malloc(sizeof(char*)*(strlen(s)+1)); + strcpy(t, s); + form_destruir(form); + return t; +} +