12 #include "articulos.h"
15 #include "registros.h"
19 static void finish(int sig);
22 void menu_articulos();
24 void menu_mantenimiento();
25 void menu_estadisticas();
26 void preguntar_nuevo_tipo(int *tipo, int *tam_bloque, int *tam_reg);
28 void ver_estadisticas(EMUFS *fp);
30 /* cuadro de msg. w y h son de la ventana padre */
31 WINDOW *msg_box(WINDOW *win, int w, int h, const char *format, ...);
32 void msg_box_free(WINDOW *padre, WINDOW *win);
35 PARAM_OK, /* Parametros estan ok */
36 NO_ART_FILE, /* No se especifico nombre de archivo Articulos */
37 NO_FACT_FILE, /* No se especifico nombre de archivo Facturas */
38 SHOW_HELP, /* Mostrar ayuda encontrado */
39 TIPO_NO_DEFINIDO, /* No se definio tipo de archivo */
40 TIPO_INVALIDO, /* El valor de tipo de archivo no es valido */
41 BLOQUE_NO_DEFINIDO, /* No se especifico tamaño de bloque */
42 NULL_BLOCK_FOUND /* Tamaño de bloque <= 0!!! */
46 int xml_fact; /* Pos en argv del archivo XML a usar para facturas */
47 int xml_art; /* Pos en argv del archivo XML a usar para articulos */
48 char tipo_arch_fact; /* Tipo de archivo para Facturas */
49 char tipo_arch_art; /* Tipo de archivo para Articulos */
50 EMUFS_BLOCK_SIZE tam_bloque_fact;
51 EMUFS_BLOCK_SIZE tam_bloque_art;
54 /* Verifica Argumentos */
55 t_Param param_ok(int argc, char *argv[])
58 for(i=1; i<argc; i++) {
59 if ((strcmp(argv[i], "-h")==0) || (strcmp(argv[i], "--help")==0)) return SHOW_HELP;
61 if (strcmp(argv[i], "-a") == 0) { /* Articulos! */
63 if (i >= argc) return SHOW_HELP;
64 if (strcmp(argv[i]+strlen(argv[i])-3, "xml") == 0) {
65 /* Luego del archivo XML debe seguir el tipo */
68 if ((n < 1) || (n > 3)) return TIPO_INVALIDO;
69 if (((n == 1) || (n == 3)) && ((i+2)>=argc))
70 return BLOQUE_NO_DEFINIDO;
71 parametros.tipo_arch_art = n;
72 parametros.tam_bloque_art = atoi(argv[i+2]);
73 if (parametros.tam_bloque_art <= 0) return NULL_BLOCK_FOUND;
74 parametros.xml_art = i;
76 /* Ops, no hay mas parametros */
77 return TIPO_NO_DEFINIDO;
84 if (strcmp(argv[i], "-f") == 0) { /* Facturas! */
86 if (i >= argc) return SHOW_HELP;
87 if (strcmp(argv[i]+strlen(argv[i])-3, "xml") == 0) {
88 /* Luego del archivo XML debe seguir el tipo */
91 if ((n < 1) || (n > 3)) return TIPO_INVALIDO;
92 if (((n == 1) || (n == 3)) && ((i+2)>=argc))
93 return BLOQUE_NO_DEFINIDO;
94 parametros.tipo_arch_fact = n;
95 parametros.tam_bloque_fact = atoi(argv[i+2]);
96 if (parametros.tam_bloque_fact <= 0) return NULL_BLOCK_FOUND;
97 parametros.xml_fact = i;
99 /* Ops, no hay mas parametros */
100 return TIPO_NO_DEFINIDO;
111 void print_help(char *s)
113 printf("EMUFS - 1v0\n");
114 printf("Modo de uso : %s [-[f|a] <archivo articulos XML> tipo [tamaño bloque]] \n", s);
115 printf(" -f indica que lo que está a continuación seran los datos para generar el archivo de facturas.\n");
116 printf(" -a indica que lo que está a continuación seran los datos para generar el archivo de articulos.\n");
117 printf(" 'tipo' es el modo de archivo. Siendo :\n");
118 printf(" 1 - Registros long. variables con bloque parametrizado\n");
119 printf(" 2 - Registros long. variables sin bloque\n");
120 printf(" 3 - Registros long fija con bloque parametrizado\n");
121 printf(" tamaño bloque debe ser especificado solo en aquellos tipos que lo requiera.\n");
124 int main(int argc, char *argv[])
129 parametros.xml_art = parametros.xml_fact = -1;
130 switch (param_ok(argc, argv)) {
134 case TIPO_NO_DEFINIDO:
135 printf("Falta parámetro requerido.\nLuego del nombre del archivo debe especificar el tipo de archivo\n");
137 case BLOQUE_NO_DEFINIDO:
138 printf("Falta parámetro requerido.\nLuego del tipo de archivo debe especificar el tamaño del bloque a utilizar\n");
141 printf("Tipo de archivo no valido. Los valores posibles para el tipo de archivo son:\n");
142 printf("\t1 - Archivo de bloque parametrizado y registro de long. variable.\n");
143 printf("\t2 - Archivo de registros variables sin bloques.\n");
144 printf("\t3 - Archivos de bloque parametrizado y registro de long. parametrizada.\n");
147 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");
150 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");
152 case NULL_BLOCK_FOUND:
153 printf("Error de parámerto.\nHa ingresado un valor nulo como tamaño de bloque.\n");
160 printf("CUIDADO! - Uds esta a punto de ejecutar EMUFS Gui compilado con mensajes de debug (-DDEBUG). ");
161 printf("Esto puede causar que ante un error alguna función trate de emitir un mensaje por pantalla ");
162 printf("haciendo que el aspecto visual se vea desvirtuado.\n\n");
163 printf("Todos los mensajes de error se envian por stderr, por lo que es conveniente que vuelva a ejecutar ");
164 printf("el programa de la siguiente manera :\n");
165 printf("\t#> %s <parametros> 2> error.log\n\n", argv[0]);
166 printf("De esta forma el SO se encargaga de redirigir stderr al archivo error.log y evitar algun problema en ");
167 printf("visualizacion de la aplicacion.\n");
168 printf("Para continuar **bajo su propio riesgo** presione una tecla. Puede cancelar la ejecucion en este punto con CTRL+C\n");
173 signal(SIGINT, finish);
175 keypad(stdscr, TRUE);
179 /* Si se soporta color, los inicializo */
182 /* Simple color assignment, often all we need. */
183 init_pair(COLOR_BLACK, COLOR_BLACK, COLOR_BLACK); /* COLOR_PAIR(1) */
184 init_pair(COLOR_GREEN, COLOR_GREEN, COLOR_BLACK);
185 init_pair(COLOR_RED, COLOR_RED, COLOR_BLACK);
186 init_pair(COLOR_CYAN, COLOR_CYAN, COLOR_BLACK);
187 init_pair(COLOR_WHITE, COLOR_WHITE, COLOR_BLACK);
188 init_pair(COLOR_MAGENTA, COLOR_MAGENTA, COLOR_BLACK);
189 init_pair(COLOR_BLUE, COLOR_BLUE, COLOR_BLACK);
190 init_pair(COLOR_YELLOW, COLOR_YELLOW, COLOR_BLACK);
193 /* Verifico un tamaño minimo de consola */
194 if ((LINES < 25) || (COLS < 80)) {
196 printf("El tamaño de la consola debe ser de por lo menos 80x25!\n");
200 /* Ventana, caracter para linea vertical, caracter para linea horizontal*/
201 box(stdscr, ACS_VLINE, ACS_HLINE);
202 /* Ventana, Y, X, Texto */
203 mvwaddstr(stdscr, 1, 1, "EMUFS");
204 attron(COLOR_PAIR(2));
205 mvwaddstr(stdscr, LINES-2, 1, "EMUFS (c) The EMUFS Team - Bajo Licencia GNU/GPL");
206 attroff(COLOR_PAIR(2));
209 dialog = msg_box(stdscr, COLS, LINES, "Generando archivos ...");
211 if (parametros.xml_art != -1) {
212 art_cargar(argv[parametros.xml_art], parametros.tipo_arch_art, parametros.tam_bloque_art);
214 art_cargar(NULL, -1, -1);
216 if (parametros.xml_fact != -1) {
217 fact_cargar(argv[parametros.xml_fact], parametros.tipo_arch_fact, parametros.tam_bloque_fact);
219 fact_cargar(NULL, -1, -1);
222 msg_box_free(stdscr, dialog);
224 /* CICLO PRINCIPAL DE LA APLICACION */
225 while ((c = main_menu()) != -1) {
234 dialog = derwin(stdscr, LINES-4, COLS-2, 2, 1);
235 ver_registros(dialog, COLS-2, LINES-4, 0);
242 dialog = derwin(stdscr, LINES-4, COLS-2, 2, 1);
243 ver_registros(dialog, COLS-2, LINES-4, 1);
253 menu_mantenimiento();
273 MENU_OPCION("Alta", "Crear una nueva factura."),
274 MENU_OPCION("Baja", "Elimina una factura existente."),
275 MENU_OPCION("Modificacion", "Modifica una factura existente."),
276 MENU_OPCION("Volver", "Volver al menu anterior.")
280 while ((opt = menu_ejecutar(mi_menu, 4, "Menu Articulos")) != 3) {
289 fact_modificar(NULL);
294 void menu_articulos()
297 MENU_OPCION("Alta", "Crear un nuevo articulo."),
298 MENU_OPCION("Baja", "Elimina un articulo existente."),
299 MENU_OPCION("Modificacion", "Modifica un articulo existente."),
300 MENU_OPCION("Volver", "Volver al menu anterior.")
304 while ((opt = menu_ejecutar(mi_menu, 4, "Menu Articulos")) != 3) {
319 void menu_estadisticas()
322 MENU_OPCION("Articulos", "Ver datos del archivo de Articulos."),
323 MENU_OPCION("Facturas", "Ver datos del archivo de Facturas."),
324 MENU_OPCION("Notas", "Ver datos del archivo de Notas."),
325 MENU_OPCION("Volver", "Ir al menu anterior.")
329 while ((opt = menu_ejecutar(mi_menu, 4, "Menu Estadisticas")) != 3) {
332 ver_estadisticas( art_get_lst()->fp );
335 ver_estadisticas( fact_get_lst()->fp );
338 ver_estadisticas( fact_get_lst()->fp_texto );
346 MENU_OPCION("Articulos","Alta,baja,consulta y modificacion de articulos."),
347 MENU_OPCION("Facturas","Alta,baja,consulta y modificacion de facturas."),
348 MENU_OPCION("Ver Registros","Ver registros/bloques de archivo Articulos."),
349 MENU_OPCION("Ver Facturas","Ver registros/bloques de archivo Facturas."),
350 MENU_OPCION("Ver Notas","Ver registros/bloques de archivo Notas."),
351 MENU_OPCION("Estadisticas","Ver estadisticas de ocupacion de archivos."),
352 MENU_OPCION("Mantenimiento","Tareas de mantenimiento de los archivos."),
353 MENU_OPCION("Salir", "Salir del sistema.")
356 return menu_ejecutar(mi_menu, 8, "Menu Principal");
360 static void finish(int sig)
364 /* do your non-curses wrapup here */
368 WINDOW *msg_box(WINDOW *win, int w, int h, const char *format, ...)
374 va_start(ap, format);
375 vsprintf(txt, format, ap);
380 dialog = derwin(win, mh, mw, h/2-mh/2, w/2-mw/2);
382 mvwaddstr(dialog, 1, 1, txt);
388 void msg_box_free(WINDOW *padre, WINDOW *win)
397 void menu_mantenimiento()
400 MENU_OPCION("Compactar Articulos","Elimina espacio no utilizado."),
401 MENU_OPCION("Compactar Facturas","Elimina espacio no utilizado."),
402 MENU_OPCION("Compactar Notas","Elimina espacio no utilizado."),
403 MENU_OPCION("Cambiar tipo Archivo Articulos","Permite cambiar el tipo del archivo."),
404 MENU_OPCION("Cambiar tipo Archivo Facturas","Permite cambiar el tipo del archivo."),
405 MENU_OPCION("Cambiar tipo Archivo Notas","Permite cambiar el tipo del archivo."),
406 MENU_OPCION("Volver", "Volver al menu anterior.")
410 int nuevo_tam_registro, nuevo_tam_bloque;
414 while ((opt = menu_ejecutar(mi_menu, 7, "Menu Mantenimiento")) != 6) {
417 dlg = msg_box(stdscr, COLS, LINES, "Compactando archivo.... Aguarde");
418 art_get_lst()->fp->compactar(art_get_lst()->fp);
419 msg_box_free(stdscr, dlg);
422 dlg = msg_box(stdscr, COLS, LINES, "Compactando archivo.... Aguarde");
423 fact_get_lst()->fp->compactar(fact_get_lst()->fp);
424 msg_box_free(stdscr, dlg);
427 dlg = msg_box(stdscr, COLS, LINES, "Compactando archivo.... Aguarde");
428 fact_get_lst()->fp_texto->compactar(fact_get_lst()->fp_texto);
429 msg_box_free(stdscr, dlg);
432 nuevo_tam_registro = -1; /* No permito cambiar el tamaño de registro */
433 preguntar_nuevo_tipo(&nuevo_tipo, &nuevo_tam_bloque, &nuevo_tam_registro);
434 dlg = msg_box(stdscr, COLS, LINES, "Cambiando el formato de archivo .... Aguarde");
435 art_reformatear(nuevo_tipo, nuevo_tam_bloque, nuevo_tam_registro);
436 msg_box_free(stdscr, dlg);
439 nuevo_tam_registro = 0;
440 preguntar_nuevo_tipo(&nuevo_tipo, &nuevo_tam_bloque, &nuevo_tam_registro);
443 nuevo_tam_registro = -2;
444 preguntar_nuevo_tipo(&nuevo_tipo, &nuevo_tam_bloque, &nuevo_tam_registro);
449 void preguntar_nuevo_tipo(int *tipo, int *tam_bloque, int *tam_reg)
456 win = newwin(LINES/2, COLS/2, LINES/4, COLS/4);
459 form = form_crear(win);
460 form_agregar_widget(form, RADIO, "Tipo de archivo", 3, "T1,T2,T3");
461 form_ejecutar(form, 1,1);
463 s = form_obtener_valor_char(form, "Tipo de archivo");
464 if (strcmp(s, "T1") == 0) n = T1;
465 if (strcmp(s, "T2") == 0) n = T2;
466 if (strcmp(s, "T3") == 0) n = T3;
477 form = form_crear(win);
478 form_agregar_widget(form, INPUT, "Tamaño de bloque", 8, "");
481 form_set_valor(form, "Tamaño de bloque", "");
482 form_ejecutar(form, 1,1);
483 if (form_obtener_valor_int(form, "Tamaño de bloque") > 0) is_ok = 1;
485 (*tam_bloque) = form_obtener_valor_int(form, "Tamaño de bloque");
491 if (((*tam_reg) != -1) && ((*tam_reg) != -2)) {
492 mvwaddstr(win, LINES/2-3, 1, "Nota: El tamaño de registro puede");
493 mvwaddstr(win, LINES/2-2, 1, "llegar a ser redondeado por el sistema.");
495 form = form_crear(win);
496 form_agregar_widget(form, INPUT, "Tamaño de bloque", 8, "");
497 if ((*tam_reg) != -1)
498 form_agregar_widget(form, INPUT, "Tamaño de registro", 8, "");
501 form_set_valor(form, "Tamaño de bloque", "");
502 if ((*tam_reg) != -1)
503 form_set_valor(form, "Tamaño de registro", "");
504 form_ejecutar(form, 1,1);
505 if (form_obtener_valor_int(form, "Tamaño de bloque") > 0) is_ok = 1;
506 if ((*tam_reg) != -1) {
507 if (form_obtener_valor_int(form, "Tamaño de registro") > 0) is_ok = 1; else is_ok = 0;
510 (*tam_bloque) = form_obtener_valor_int(form, "Tamaño de bloque");
511 if ((*tam_reg) != -1)
512 (*tam_reg) = form_obtener_valor_int(form, "Tamaño de registro");
520 void ver_estadisticas(EMUFS *fp)
523 EMUFS_Estadisticas stats;
527 stats = fp->leer_estadisticas(fp);
529 win = newwin(LINES-4, COLS-2, 2, 1);
532 wattron(win, COLOR_PAIR(COLOR_YELLOW));
533 wattron(win, A_BOLD);
534 mvwaddstr(win, 1, 1, "Tipo de Archivo : ");
535 wattroff(win, A_BOLD);
536 wattroff(win, COLOR_PAIR(COLOR_YELLOW));
539 waddstr(win, "Registro long. variable con bloque parametrizado");
540 wattron(win, A_BOLD);
541 mvwaddstr(win, i++, 1, "Tamaño de bloque : ");
542 wattroff(win, A_BOLD);
543 sprintf(s, "%lu bytes", fp->tam_bloque);
547 waddstr(win, "Registro long. variable sin bloques");
550 waddstr(win, "Registro long. fija con bloque parametrizado");
551 wattron(win, A_BOLD);
552 mvwaddstr(win, i++, 1, "Tamaño de bloque : ");
553 wattroff(win, A_BOLD);
554 sprintf(s, "%lu bytes", fp->tam_bloque);
556 wattron(win, A_BOLD);
557 mvwaddstr(win, i++, 1, "Tamaño de registro : ");
558 wattroff(win, A_BOLD);
559 sprintf(s, "%lu bytes", fp->tam_reg);
563 wattron(win, A_BOLD);
564 mvwaddstr(win, i++, 1, "Cant. Registros : ");
565 wattroff(win, A_BOLD);
566 sprintf(s, "%lu", stats.tam_archivo);
569 wattron(win, A_BOLD);
570 mvwaddstr(win, i++, 1, "Tamaño de Archivo : ");
571 wattroff(win, A_BOLD);
572 sprintf(s, "%lu bytes", stats.tam_archivo_bytes);
575 wattron(win, A_BOLD);
576 mvwaddstr(win, i++, 1, "Tamaño de Info de Control : ");
577 wattroff(win, A_BOLD);
578 sprintf(s, "%lu bytes", stats.info_control);
581 wattron(win, A_BOLD);
582 mvwaddstr(win, i++, 1, "Media de espacio libre : ");
583 wattroff(win, A_BOLD);
584 sprintf(s, "%lu bytes/bloque", stats.media_fs);
587 wattron(win, A_BOLD);
588 mvwaddstr(win, i++, 1, "Espacio Libre : ");
589 wattroff(win, A_BOLD);
590 sprintf(s, "%lu bytes", stats.total_fs);
593 wattron(win, A_BOLD);
594 mvwaddstr(win, i++, 1, "Maximo de Espacio libre : ");
595 wattroff(win, A_BOLD);
596 sprintf(s, "%lu bytes", stats.max_fs);
599 wattron(win, A_BOLD);
600 mvwaddstr(win, i++, 1, "Minimo de Espacio libre : ");
601 wattroff(win, A_BOLD);
602 sprintf(s, "%lu bytes", stats.min_fs);
605 wattron(win, A_BOLD);
606 mvwaddstr(win, i++, 1, "Cantidad de bloques : ");
607 wattroff(win, A_BOLD);
608 sprintf(s, "%lu", stats.cant_bloques);
611 wattron(win, A_BLINK);
612 mvwaddstr(win, i+2, 1, "Presione una tecla para continuar.");
613 wattroff(win, A_BLINK);