* Agrego recorrido por los indices de factura

[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 be3a6a67ab5ecd730288a281a162c57f7b9d08b1..edce8e4d29ef1ee30f3af4b36c748a93a0387e39 100644 (file)
--- 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 "facturas.h"
 #include "emufs.h"
 #include "viewer.h"

+#include "tree_viewer.h"

 
 #define CTRLD 4
 
 
 #define CTRLD 4
 


@@ -41,111 +42,6 @@ typedef enum {
                NULL_BLOCK_FOUND    /* Tamaño de bloque <= 0!!! */
 } t_Param;
 
                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; i++) {
-               if ((strcmp(argv[i], "-h")==0) || (strcmp(argv[i], "--help")==0)) return SHOW_HELP;
-
-               if (strcmp(argv[i], "-a") == 0) { /* Articulos! */
-                       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)<argc) {
-                                       n = atoi(argv[i+1]);
-                                       if ((n < 1) || (n > 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<argc) {
-                                       n = atoi(argv[i]);
-                                       if ((n < 1) || (n > 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");
 void print_help(char *s)
 {
        printf("EMUFS - 1v0\n");


@@ -161,40 +57,222 @@ 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;
+       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;
+       }
+}
+

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

-       int fin=0;

        WINDOW *dialog;
        WINDOW *dialog;

+       t_Parametros parametros;

 
 

-       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]);

        }
        }

+       
+       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). ");


@@ -248,22 +326,16 @@ int main(int argc, char *argv[])
 
        dialog = msg_box(stdscr, COLS, LINES, "Generando archivos ...");
 
 
        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
-               );
-       } else {
-               fact_cargar(NULL, -1, -1, -1, -1);
+/*     if (parametros.xml_art != -1) {*/
+               art_cargar(&parametros);
+/*     } else {
+               art_cargar(NULL);

        }
        }

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

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


@@ -283,11 +355,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("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;
                
                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 Articulos")) != 5) {

                switch (opt) {
                        case 0:
                                fact_agregar(NULL);
                switch (opt) {
                        case 0:
                                fact_agregar(NULL);


@@ -297,6 +371,11 @@ void menu_facturas()
                        break;
                        case 2:
                                fact_modificar(NULL);
                        break;
                        case 2:
                                fact_modificar(NULL);

+                       break;
+                       case 3:
+                               fact_consultas(NULL);
+                       case 4:
+                               fact_recorrer();

                }
        }
 }
                }
        }
 }


@@ -308,11 +387,12 @@ 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("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 Articulos")) != 5) {

                switch (opt) {
                        case 0:
                                art_agregar(NULL);
                switch (opt) {
                        case 0:
                                art_agregar(NULL);


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

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

                }
        }
 
                }
        }
 


@@ -417,7 +500,8 @@ void menu_ver_bloques()
 
 int main_menu()
 {
 
 int main_menu()
 {

-       int c;
+       int c, w, h;
+       WINDOW *win;

        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."),


@@ -425,10 +509,11 @@ 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("Salir", "Salir del sistema.")
        };
 
                MENU_OPCION("Salir", "Salir del sistema.")
        };
 

-       while ((c=menu_ejecutar(mi_menu, 7, "Menu Principal"))!=6) {
+       while ((c=menu_ejecutar(mi_menu, 8, "Menu Principal"))!=7) {

                switch (c) {
                        case 0:
                                menu_articulos();
                switch (c) {
                        case 0:
                                menu_articulos();


@@ -447,6 +532,13 @@ int main_menu()
                        break;
                        case 5:
                                menu_mantenimiento();
                        break;
                        case 5:
                                menu_mantenimiento();

+                       break;
+                       case 6:
+                               h = LINES-2;
+                               w = COLS-2;
+                               win = newwin(h, w, 1, 1);
+                               emufs_indice_b_ver(fact_get_lst()->fp->indices, win, w, h, 0);
+                               delwin(win);

                }
        }
 
                }
        }