* Bugfix : se rellena con * antes de leer un registro de tipo

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

diff --git a/emufs_gui/gui.c b/emufs_gui/gui.c
index 6edd11364ba2d056538ba66660f55d457dba3efc..5346b6c9b726bb0b040b01a8226ce661d9c4461d 100644 (file)
--- a/emufs_gui/gui.c
+++ b/emufs_gui/gui.c
@@ -3,13 +3,14 @@
 #include <curses.h>
 #include <menu.h>
 #include <signal.h>
 #include <curses.h>
 #include <menu.h>
 #include <signal.h>

-#include <panel.h>

 #include <string.h>
 #include <string.h>

+#include <stdarg.h>

 
 #include "form.h"
 #include "articulos.h"
 #include "facturas.h"
 #include "emufs.h"
 
 #include "form.h"
 #include "articulos.h"
 #include "facturas.h"
 #include "emufs.h"

+#include "registros.h"

 
 #define CTRLD 4
 
 
 #define CTRLD 4
 


@@ -17,16 +18,86 @@ static void finish(int sig);
 
 int main_menu();
 void menu_articulos();
 
 int main_menu();
 void menu_articulos();

+void menu_facturas();
+void menu_mantenimiento();
+void preguntar_nuevo_tipo(int *tipo, int *tam_bloque, int *tam_reg);
+
+/* cuadro de msg. w y h son de la ventana padre */
+WINDOW *msg_box(WINDOW *win, int w, int h, const char *format, ...);
+void msg_box_free(WINDOW *padre, WINDOW *win);
+
+typedef enum {PARAM_OK, SHOW_HELP, TIPO_NO_DEFINIDO, TIPO_INVALIDO, BLOQUE_NO_DEFINIDO} t_Param;
+
+/* Verifica Argumentos */
+t_Param param_ok(int argc, char *argv[])
+{
+       int n,i;
+       for(i=1; i<argc; i++) {
+               if ((strcmp(argv[i], "-h")==0) || (strcmp(argv[i], "--help")==0)) 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;
+                       } else {
+                               /* Ops, no hay mas parametros */
+                               return TIPO_NO_DEFINIDO;
+                       }
+               }
+       }
+
+       return PARAM_OK;
+}
+
+void print_help(char *s)
+{
+       printf("EMUFS - 1v0\n");
+       printf("Modo de uso : %s [<archivo articulos XML> tipo=[1|2|3]]\n", s);
+       printf("\nSi especifica un archivo XML desde donde cargar los articulos debera tambien especificar el tipo");
+       printf(" de archivo a crear, siendo 1, 2, 3\n");
+}

 
 int main(int argc, char *argv[])
 {
        int c, fin=0;
 
 int main(int argc, char *argv[])
 {
        int c, fin=0;

-/*
-       art_cargar(argv[1]);
+       WINDOW *dialog;
+
+       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 PARAM_OK:
+                       fin = 0;
+       }
+
+#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 ");
+       printf("haciendo que el aspecto visual se vea desvirtuado.\n\n");
+       printf("Todos los mensajes de error se envian por stderr, por lo que es conveniente que vuelva a ejecutar ");
+       printf("el programa de la siguiente manera :\n");
+       printf("\t#> %s <parametros> 2> error.log\n\n", argv[0]);
+       printf("De esta forma el SO se encargaga de redirigir stderr al archivo error.log y evitar algun problema en ");
+       printf("visualizacion de la aplicacion.\n");
+       printf("Para continuar **bajo su propio riesgo** presione una tecla. Puede cancelar la ejecucion en este punto con CTRL+C\n");
+       fgetc(stdin);
+#endif

 
 

-       art_liberar(NULL);
-       return 1;
-*/

        /* Inicio Curses */
        signal(SIGINT, finish);
        initscr();
        /* Inicio Curses */
        signal(SIGINT, finish);
        initscr();


@@ -55,12 +126,6 @@ int main(int argc, char *argv[])
                return 1;
        }
 
                return 1;
        }
 

-       if (argc == 2) {
-               art_cargar(argv[1]);
-               fact_cargar(argv[1]);
-       } else
-               art_cargar(NULL);
-       

        /* Ventana, caracter para linea vertical, caracter para linea horizontal*/
        box(stdscr, ACS_VLINE, ACS_HLINE);
        /* Ventana, Y, X, Texto */
        /* Ventana, caracter para linea vertical, caracter para linea horizontal*/
        box(stdscr, ACS_VLINE, ACS_HLINE);
        /* Ventana, Y, X, Texto */


@@ -70,16 +135,37 @@ 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 (argc == 4) {
+               art_cargar(argv[1], atoi(argv[2]), atoi(argv[3]));
+               if (!fact_cargar("facturas.xml", 1, 400))
+                       fprintf(stderr, "ERROR CARGANDO FACTURAS\n");
+       } else
+               art_cargar(NULL, -1, -1);
+
+       msg_box_free(stdscr, dialog);
+

        /* CICLO PRINCIPAL DE LA APLICACION */
        while ((c = main_menu()) != -1) {
                switch (c) {
                        case 0:
                                menu_articulos();
                        break;
        /* CICLO PRINCIPAL DE LA APLICACION */
        while ((c = main_menu()) != -1) {
                switch (c) {
                        case 0:
                                menu_articulos();
                        break;

-               //      case 1:
-               //      case 2:
-               //      case 3:
-                       case 4:
+                       case 1:
+                               menu_facturas();
+                       break;
+                       case 2:
+                               dialog = derwin(stdscr, LINES-4, COLS-2, 2, 1);
+                               ver_registros(dialog, COLS-2, LINES-4);
+                               werase(dialog);
+                               wrefresh(dialog);
+                               delwin(dialog);
+                               refresh();
+                       break;
+                       case 5:
+                               menu_mantenimiento();
+                       break;
+                       case 6:

                                fin = 1;
                        break;
                }
                                fin = 1;
                        break;
                }


@@ -94,6 +180,93 @@ int main(int argc, char *argv[])
        return 0;
 }
 
        return 0;
 }
 

+void menu_facturas()
+{
+       WINDOW *menu_win;
+       MENU *menu;
+       ITEM **items;
+       int c, salir;
+       char *opciones[] = {
+                                       "Alta",
+                                       "Baja",
+                                       "Modificacion",
+                                       "Volver"
+       };
+
+       items = (ITEM **)calloc(5, sizeof(ITEM *));
+
+       items[0] = new_item(opciones[0], "Crear una nueva factura.");
+       set_item_userptr(items[0], fact_agregar);
+       items[1] = new_item(opciones[1], "Eliminar una factura existente.");
+       set_item_userptr(items[1], fact_eliminar);
+       items[2] = new_item(opciones[2], "Modificar una factura existente.");
+       set_item_userptr(items[2], fact_modificar); 
+       items[3] = new_item(opciones[3], "Volver al menu anterior.");
+       items[4] = NULL;
+
+       menu = new_menu((ITEM **)items);
+       menu_win = newwin(8, COLS-2, 3, 1);
+       keypad(menu_win, TRUE);
+       set_menu_mark(menu, " > ");
+       set_menu_win(menu, menu_win);
+       set_menu_sub(menu, derwin(menu_win, 5, COLS-4, 3, 1));
+
+       box(menu_win, 0, 0);
+       mvwaddch(menu_win, 2, 0, ACS_LTEE);
+       mvwhline(menu_win, 2, 1, ACS_HLINE, COLS-3);
+       mvwaddch(menu_win, 2, COLS-3, ACS_RTEE);
+       wattron(menu_win, COLOR_PAIR(COLOR_RED));
+       mvwaddstr(menu_win, 1, 1, "Menu Facturas");
+       wattroff(menu_win, COLOR_PAIR(COLOR_RED));
+       post_menu(menu);
+       wrefresh(menu_win);
+
+       curs_set(0);
+       salir = 0;
+       while((!salir) && (c = getch()) != KEY_F(3)) {
+               switch(c) {
+                       case KEY_DOWN:
+                               menu_driver(menu, REQ_DOWN_ITEM);
+                               break;
+                       case KEY_UP:
+                               menu_driver(menu, REQ_UP_ITEM);
+                       break;
+                       case 13:
+                       case 10: {
+                               ITEM *cur;
+                               void (*p)(char *);
+
+                               cur = current_item(menu);
+                               if (strcmp(item_name(cur), opciones[3]) == 0) {
+                                       salir = 1;
+                               } else {
+                                       p = item_userptr(cur);
+                                       unpost_menu(menu);
+                                       refresh();
+                                       p(NULL); /* Paso NULL para que ejecute la accion por defecto */
+                                       post_menu(menu);
+                                       box(menu_win,0,0);
+                                       mvwaddch(menu_win, 2, 0, ACS_LTEE);
+                                       mvwhline(menu_win, 2, 1, ACS_HLINE, 67);
+                                       mvwaddch(menu_win, 2, 67, ACS_RTEE);
+                                       wrefresh(menu_win);
+                               }
+                               pos_menu_cursor(menu);
+                       }
+               }
+               wrefresh(menu_win);
+       }       
+       curs_set(1);
+       
+       unpost_menu(menu);
+       delwin(menu_win);
+       free_item(items[0]);
+       free_item(items[1]);
+       free_item(items[2]);
+       free_item(items[3]);
+       free_menu(menu);
+       free(items);
+}

 void menu_articulos()
 {
        WINDOW *menu_win;
 void menu_articulos()
 {
        WINDOW *menu_win;


@@ -157,7 +330,7 @@ void menu_articulos()
                                        p = item_userptr(cur);
                                        unpost_menu(menu);
                                        refresh();
                                        p = item_userptr(cur);
                                        unpost_menu(menu);
                                        refresh();

-                                       p((char *)item_name(cur));
+                                       p(NULL); /* Paso NULL para que ejecute la accion por defecto */

                                        post_menu(menu);
                                        box(menu_win,0,0);
                                        mvwaddch(menu_win, 2, 0, ACS_LTEE);
                                        post_menu(menu);
                                        box(menu_win,0,0);
                                        mvwaddch(menu_win, 2, 0, ACS_LTEE);


@@ -179,6 +352,7 @@ void menu_articulos()
        free_item(items[2]);
        free_item(items[3]);
        free_menu(menu);
        free_item(items[2]);
        free_item(items[3]);
        free_menu(menu);

+       free(items);

 }
 
 int main_menu()
 }
 
 int main_menu()


@@ -192,24 +366,28 @@ int main_menu()
                                        "Facturas",
                                        "Ver Registros",
                                        "Ver Bloques",
                                        "Facturas",
                                        "Ver Registros",
                                        "Ver Bloques",

+                                       "Estadisticas",
+                                       "Mantenimiento",

                                        "Salir"
        };
 
                                        "Salir"
        };
 

-       items = (ITEM **)calloc(5, sizeof(ITEM *));
+       items = (ITEM **)calloc(8, sizeof(ITEM *));

 
        items[0] = new_item(opciones[0], "Alta,baja,consulta y modificacion de articulos.");
        items[1] = new_item(opciones[1], "Alta,baja,consulta y modificacion de facturas.");
        items[2] = new_item(opciones[2], "Ver registros de un archivo.");
        items[3] = new_item(opciones[3], "Ver bloques de un archivo.");
 
        items[0] = new_item(opciones[0], "Alta,baja,consulta y modificacion de articulos.");
        items[1] = new_item(opciones[1], "Alta,baja,consulta y modificacion de facturas.");
        items[2] = new_item(opciones[2], "Ver registros de un archivo.");
        items[3] = new_item(opciones[3], "Ver bloques de un archivo.");

-       items[4] = new_item(opciones[4], "Salir del sistema.");
-       items[5] = NULL;
+       items[4] = new_item(opciones[4], "Ver estadisticas de ocupacion de archivos.");
+       items[5] = new_item(opciones[5], "Tareas de mantenimiento de los archivos.");
+       items[6] = new_item(opciones[6], "Salir del sistema.");
+       items[7] = NULL;

 
        menu = new_menu((ITEM **)items);
 
        menu = new_menu((ITEM **)items);

-       menu_win = newwin(9, COLS-2, 3, 1);
+       menu_win = newwin(14, COLS-2, 3, 1);

        keypad(menu_win, TRUE);
        set_menu_mark(menu, " > ");
        set_menu_win(menu, menu_win);
        keypad(menu_win, TRUE);
        set_menu_mark(menu, " > ");
        set_menu_win(menu, menu_win);

-       set_menu_sub(menu, derwin(menu_win, 6, COLS-4, 3, 1));
+       set_menu_sub(menu, derwin(menu_win, 10, COLS-4, 3, 1));

 
        box(menu_win, 0, 0);
        mvwaddch(menu_win, 2, 0, ACS_LTEE);
 
        box(menu_win, 0, 0);
        mvwaddch(menu_win, 2, 0, ACS_LTEE);


@@ -239,7 +417,7 @@ int main_menu()
                                int i;
 
                                cur = current_item(menu);
                                int i;
 
                                cur = current_item(menu);

-                               for(i=0; i<5; ++i) {
+                               for(i=0; i<7; ++i) {

                                        if (strcmp(item_name(cur), opciones[i]) == 0)
                                                opcion = i;
                                }
                                        if (strcmp(item_name(cur), opciones[i]) == 0)
                                                opcion = i;
                                }


@@ -259,7 +437,11 @@ int main_menu()
        free_item(items[1]);
        free_item(items[2]);
        free_item(items[3]);
        free_item(items[1]);
        free_item(items[2]);
        free_item(items[3]);

+       free_item(items[4]);
+       free_item(items[5]);
+       free_item(items[6]);

        free_menu(menu);
        free_menu(menu);

+       free(items);

 
        return opcion;
 }
 
        return opcion;
 }


@@ -273,3 +455,216 @@ static void finish(int sig)
        exit(0);
 }
 
        exit(0);
 }
 

+WINDOW *msg_box(WINDOW *win, int w, int h, const char *format, ...)
+{
+       va_list ap;
+       char txt[255];
+       int mw, mh;
+       WINDOW *dialog;
+       va_start(ap, format);
+       vsprintf(txt, format, ap);
+       va_end(ap);
+
+       mw = strlen(txt)+2;
+       mh = 3;
+       dialog = derwin(win, mh, mw, h/2-mh/2, w/2-mw/2);
+       box(dialog, 0 ,0);
+       mvwaddstr(dialog, 1, 1, txt);
+       wrefresh(dialog);
+       curs_set(0);
+       return dialog;
+}
+
+void msg_box_free(WINDOW *padre, WINDOW *win)
+{
+       werase(win);
+       wrefresh(win);
+       delwin(win);
+       curs_set(1);
+       wrefresh(padre);
+}
+
+void menu_mantenimiento()
+{
+       WINDOW *menu_win, *dlg;
+       MENU *menu;
+       ITEM **items;
+       int c, salir, nuevo_tipo, nuevo_tam_bloque, nuevo_tam_registro;
+       char *opciones[] = {
+                                       "Compactar Articulos",
+                                       "Compactar Facturas",
+                                       "Compactar Notas",
+                                       "Cambiar tipo Archivo Articulos",
+                                       "Cambiar tipo Archivo Facturas",
+                                       "Cambiar tipo Archivo Notas",
+                                       "Volver"
+       };
+
+       items = (ITEM **)calloc(8, sizeof(ITEM *));
+
+       items[0] = new_item(opciones[0], "Elimina espacio no utilizado.");
+       items[1] = new_item(opciones[1], "Elimina espacio no utilizado.");
+       items[2] = new_item(opciones[2], "Elimina espacio no utilizado.");
+       items[3] = new_item(opciones[3], "Permite cambiar el tipo del archivo.");
+       items[4] = new_item(opciones[4], "Permite cambiar el tipo del archivo.");
+       items[5] = new_item(opciones[5], "Permite cambiar el tipo del archivo.");
+       items[6] = new_item(opciones[6], "Volver al menu anterior.");
+       items[7] = NULL;
+
+       menu = new_menu((ITEM **)items);
+       menu_win = newwin(12, COLS-2, 3, 1);
+       keypad(menu_win, TRUE);
+       set_menu_mark(menu, " > ");
+       set_menu_win(menu, menu_win);
+       set_menu_sub(menu, derwin(menu_win, 8, COLS-4, 3, 1));
+
+       box(menu_win, 0, 0);
+       mvwaddch(menu_win, 2, 0, ACS_LTEE);
+       mvwhline(menu_win, 2, 1, ACS_HLINE, COLS-3);
+       mvwaddch(menu_win, 2, COLS-3, ACS_RTEE);
+       wattron(menu_win, COLOR_PAIR(COLOR_RED));
+       mvwaddstr(menu_win, 1, 1, "Menu Mantenimiento");
+       wattroff(menu_win, COLOR_PAIR(COLOR_RED));
+       post_menu(menu);
+       wrefresh(menu_win);
+
+       curs_set(0);
+       salir = 0;
+       while((!salir) && (c = getch()) != KEY_F(3)) {
+               switch(c) {
+                       case KEY_DOWN:
+                               menu_driver(menu, REQ_DOWN_ITEM);
+                               break;
+                       case KEY_UP:
+                               menu_driver(menu, REQ_UP_ITEM);
+                       break;
+                       case 13:
+                       case 10: 
+                       {
+                               ITEM *cur;
+
+                               cur = current_item(menu);
+                               if (strcmp(item_name(cur), opciones[6]) == 0) {
+                                       salir = 1;
+                               } else {
+                                       if (strcmp(item_name(cur), opciones[0]) == 0) {
+                                               art_get_lst()->fp->compactar(art_get_lst()->fp);
+                                       }
+                                       if (strcmp(item_name(cur), opciones[1]) == 0) {
+                                               fact_get_lst()->fp->compactar(fact_get_lst()->fp);
+                                       }
+                                       if (strcmp(item_name(cur), opciones[2]) == 0) {
+                                               fact_get_lst()->fp_texto->compactar(fact_get_lst()->fp_texto);
+                                       }
+                                       if (strcmp(item_name(cur), opciones[3]) == 0) {
+                                               unpost_menu(menu);
+                                               nuevo_tam_registro = -1; /* No permito cambiar el tamaño de registro */
+                                               preguntar_nuevo_tipo(&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);
+                                               msg_box_free(stdscr, dlg);
+                                               box(menu_win, 0, 0);
+                                               post_menu(menu);
+                                       }
+                                       if (strcmp(item_name(cur), opciones[4]) == 0) {
+                                               unpost_menu(menu);
+                                               nuevo_tam_registro = 0;
+                                               preguntar_nuevo_tipo(&nuevo_tipo, &nuevo_tam_bloque, &nuevo_tam_registro);
+                                               box(menu_win, 0, 0);
+                                               post_menu(menu);
+                                       }
+                                       if (strcmp(item_name(cur), opciones[5]) == 0) {
+                                               unpost_menu(menu);
+                                               nuevo_tam_registro = -2;
+                                               preguntar_nuevo_tipo(&nuevo_tipo, &nuevo_tam_bloque, &nuevo_tam_registro);
+                                               box(menu_win, 0, 0);
+                                               post_menu(menu);
+                                       }
+                               }
+                       }
+               }
+               wrefresh(menu_win);
+       }       
+       curs_set(1);
+       
+       unpost_menu(menu);
+       delwin(menu_win);
+       free_item(items[0]);
+       free_item(items[1]);
+       free_item(items[2]);
+       free_item(items[3]);
+       free_menu(menu);
+
+       free(items);
+}
+
+void preguntar_nuevo_tipo(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);
+       box(win, 0, 0);
+
+       form = form_crear(win);
+       form_agregar_widget(form, RADIO, "Tipo de archivo", 3, "T1,T2,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;
+
+       form_destruir(form);
+
+       werase(win);
+       box(win, 0, 0);
+       wrefresh(win);
+
+       (*tipo) = n;
+       switch (n) {
+               case T1:
+                       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);
+               break;
+               case T2:
+                       break;
+               case T3:
+                       if (((*tam_reg) != -1) && ((*tam_reg) != -2)) {
+                               mvwaddstr(win, LINES/2-3, 1, "Nota: El tamaño de registro puede");
+                               mvwaddstr(win, LINES/2-2, 1, "llegar a ser redondeado por el sistema.");
+                       }
+                       form = form_crear(win);
+                       form_agregar_widget(form, INPUT, "Tamaño de bloque", 8, "");
+                       if ((*tam_reg) != -1)
+                               form_agregar_widget(form, INPUT, "Tamaño de registro", 8, "");
+                       is_ok = 0;
+                       do {
+                               form_set_valor(form, "Tamaño de bloque", "");
+                               if ((*tam_reg) != -1)
+                                       form_set_valor(form, "Tamaño de registro", "");
+                               form_ejecutar(form, 1,1);
+                               if (form_obtener_valor_int(form, "Tamaño de bloque") > 0) is_ok = 1;
+                               if ((*tam_reg) != -1) {
+                                       if (form_obtener_valor_int(form, "Tamaño de registro") > 0) is_ok = 1; else is_ok = 0;
+                               }
+                       } while (!is_ok);
+                       (*tam_bloque) = form_obtener_valor_int(form, "Tamaño de bloque");
+                       if ((*tam_reg) != -1)
+                               (*tam_reg) = form_obtener_valor_int(form, "Tamaño de registro");
+                       form_destruir(form);
+       }
+       werase(win);
+       wrefresh(win);
+       delwin(win);
+}