#include <curses.h>
#include <menu.h>
#include <signal.h>
-#include <panel.h>
#include <string.h>
+#include <stdarg.h>
#include "form.h"
#include "articulos.h"
+#include "facturas.h"
#include "emufs.h"
+#include "registros.h"
#define CTRLD 4
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;
- if (argc != 2) {
- printf("Modo de uso : %s archivo_de_articulos.xml\n", argv[0]);
- return 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;
}
-/* art_cargar(argv[1]);
-
- art_obtener(NULL, "438");
+#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();
return 1;
}
- art_cargar(argv[1]);
-
/* Ventana, caracter para linea vertical, caracter para linea horizontal*/
box(stdscr, ACS_VLINE, ACS_HLINE);
/* Ventana, Y, X, Texto */
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;
- // 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;
}
endwin();
art_liberar(NULL);
+ fact_liberar(NULL);
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;
items[4] = NULL;
menu = new_menu((ITEM **)items);
- menu_win = newwin(8, 68, 3, 1);
+ 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, 66, 3, 1));
+ 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, 67);
- mvwaddch(menu_win, 2, 67, ACS_RTEE);
+ 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 Articulos");
wattroff(menu_win, COLOR_PAIR(COLOR_RED));
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);
free_item(items[2]);
free_item(items[3]);
free_menu(menu);
+ free(items);
}
int main_menu()
"Facturas",
"Ver Registros",
"Ver Bloques",
+ "Estadisticas",
+ "Mantenimiento",
"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[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_win = newwin(9, 68, 3, 1);
+ menu_win = newwin(14, 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, 6, 66, 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);
- mvwhline(menu_win, 2, 1, ACS_HLINE, 67);
- mvwaddch(menu_win, 2, 67, ACS_RTEE);
+ 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 Principal");
wattroff(menu_win, COLOR_PAIR(COLOR_RED));
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;
}
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(items);
return opcion;
}
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);
+}