Me aseguro de que tengo cantidad de claves impares para el B+

[z.facultad/75.06/emufs.git] / emufs_gui / emufs_view.c

diff --git a/emufs_gui/emufs_view.c b/emufs_gui/emufs_view.c
index 571193c7f8b1eb8a3228429cd3ff8067185d65ed..fb8436ca6598037b9523c8bbf671f3b3b78c6278 100644 (file)
--- a/emufs_gui/emufs_view.c
+++ b/emufs_gui/emufs_view.c
@@ -26,8 +26,8 @@ void menu_mantenimiento();
 void menu_estadisticas();
 void menu_ver_registros();
 void menu_ver_bloques();
 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);
 void preguntar_nuevo_tipo(const char *title, int *tipo, int *tam_bloque, int *tam_reg);

-char *preguntar_file();

 
 void ver_estadisticas(EMUFS *fp);
 
 
 void ver_estadisticas(EMUFS *fp);
 


@@ -57,6 +57,110 @@ void print_help(char *s)
        printf("  tamaño bloque debe ser especificado solo en aquellos tipos que lo requiera.\n");
 }
 
        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;
+
+       /* 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;
 void leer_param_art(t_Parametros *param, xmlNode *padre)
 {
        xmlNode *node;


@@ -73,6 +177,10 @@ void leer_param_art(t_Parametros *param, xmlNode *padre)
                                tmp = xml_get_prop(node, "bloque");
                                param->tam_bloque_art = atoi(tmp);
                                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;
                        }
                }
                node = node->next;


@@ -102,6 +210,10 @@ void leer_param_fac(t_Parametros *param, xmlNode *padre)
                                tmp = xml_get_prop(nodo, "bloque");
                                param->tam_bloque_nota = atoi(tmp);
                                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;
                        }
                }
                nodo = nodo->next;


@@ -150,16 +262,18 @@ void param_xml(char *s, t_Parametros *param)
        }
 }
 
        }
 }
 

+static t_Parametros parametros;
+

 int main(int argc, char *argv[])
 {
        WINDOW *dialog;
 int main(int argc, char *argv[])
 {
        WINDOW *dialog;

-       t_Parametros parametros;

 
        if (argc != 2) {
                print_help(argv[0]);
        }
 
        if (argc != 2) {
                print_help(argv[0]);
        }

-       
-       param_xml(argv[1], &parametros);
+
+       if (argc == 2)
+               param_xml(argv[1], &parametros);

 
 #ifdef DEBUG
        printf("CUIDADO! - Uds esta a punto de ejecutar EMUFS Gui compilado con mensajes de debug (-DDEBUG). ");
 
 #ifdef DEBUG
        printf("CUIDADO! - Uds esta a punto de ejecutar EMUFS Gui compilado con mensajes de debug (-DDEBUG). ");


@@ -211,18 +325,15 @@ int main(int argc, char *argv[])
        attroff(COLOR_PAIR(2));
        wrefresh(stdscr);
 
        attroff(COLOR_PAIR(2));
        wrefresh(stdscr);
 

-       dialog = msg_box(stdscr, COLS, LINES, "Generando archivos ...");
-
-/*     if (parametros.xml_art != -1) {*/
+       if (argc == 2) {
+               dialog = msg_box(stdscr, COLS, LINES, "Generando archivos ...");

                art_cargar(&parametros);
                art_cargar(&parametros);

-/*     } else {
-               art_cargar(NULL);
-       }
-       if (parametros.xml_fact != -1) {*/

                fact_cargar(&parametros);
                fact_cargar(&parametros);

-/*     } else {
+       } else {
+               dialog = msg_box(stdscr, COLS, LINES, "Recuperando archivos ...");
+               art_cargar(NULL);

                fact_cargar(NULL);
                fact_cargar(NULL);

-       }*/
+       }

 
        msg_box_free(stdscr, dialog);
 
 
        msg_box_free(stdscr, dialog);
 


@@ -243,11 +354,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("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;
                
                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);
                switch (opt) {
                        case 0:
                                fact_agregar(NULL);


@@ -257,8 +369,12 @@ void menu_facturas()
                        break;
                        case 2:
                                fact_modificar(NULL);
                        break;
                        case 2:
                                fact_modificar(NULL);

+                       break;

                        case 3:
                                fact_consultas(NULL);
                        case 3:
                                fact_consultas(NULL);

+                       break;
+                       case 4:
+                               fact_recorrer();

                }
        }
 }
                }
        }
 }


@@ -270,11 +386,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("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;
                
                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);
                switch (opt) {
                        case 0:
                                art_agregar(NULL);


@@ -287,6 +405,12 @@ void menu_articulos()
                        break;
                        case 3:
                                art_consultas(NULL);
                        break;
                        case 3:
                                art_consultas(NULL);

+                       break;
+                       case 4:
+                               art_recorrer();
+                       break;
+                       case 5:
+                               art_ver_ventas();

                }
        }
 
                }
        }
 


@@ -377,10 +501,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;
        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."),
        MENU(mi_menu) {
                MENU_OPCION("Articulos","Alta,baja,consulta y modificacion de articulos."),
                MENU_OPCION("Facturas","Alta,baja,consulta y modificacion de facturas."),


@@ -388,7 +563,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("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.")
        };
 
                MENU_OPCION("Salir", "Salir del sistema.")
        };
 


@@ -413,11 +588,7 @@ int main_menu()
                                menu_mantenimiento();
                        break;
                        case 6:
                                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();

                }
        }
 
                }
        }
 


@@ -502,7 +673,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");
                                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(&parametros);

                                msg_box_free(stdscr, dlg);
                        break;
                        case 4:
                                msg_box_free(stdscr, dlg);
                        break;
                        case 4:


@@ -548,13 +721,15 @@ void preguntar_nuevo_tipo(const char *title, int *tipo, int *tam_bloque, int *ta
 
        mvwaddstr(win, 0, 1, title);
        form = form_crear(win);
 
        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", 3, "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;
        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);
 
 
        form_destruir(form);
 


@@ -602,6 +777,19 @@ void preguntar_nuevo_tipo(const char *title, int *tipo, int *tam_bloque, int *ta
                        if ((*tam_reg) != -1)
                                (*tam_reg) = form_obtener_valor_int(form, "Tamaño de registro");
                        form_destruir(form);
                        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);
        }
        werase(win);
        wrefresh(win);


@@ -762,3 +950,4 @@ char *preguntar_file()
        form_destruir(form);
        return t;
 }
        form_destruir(form);
        return t;
 }

+