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);
245 menu_mantenimiento();
265 MENU_OPCION("Alta", "Crear una nueva factura."),
266 MENU_OPCION("Baja", "Elimina una factura existente."),
267 MENU_OPCION("Modificacion", "Modifica una factura existente."),
268 MENU_OPCION("Volver", "Volver al menu anterior.")
272 while ((opt = menu_ejecutar(mi_menu, 4, "Menu Articulos")) != 3) {
281 fact_modificar(NULL);
286 void menu_articulos()
289 MENU_OPCION("Alta", "Crear un nuevo articulo."),
290 MENU_OPCION("Baja", "Elimina un articulo existente."),
291 MENU_OPCION("Modificacion", "Modifica un articulo existente."),
292 MENU_OPCION("Volver", "Volver al menu anterior.")
296 while ((opt = menu_ejecutar(mi_menu, 4, "Menu Articulos")) != 3) {
311 void menu_estadisticas()
314 MENU_OPCION("Articulos", "Ver datos del archivo de Articulos."),
315 MENU_OPCION("Facturas", "Ver datos del archivo de Facturas."),
316 MENU_OPCION("Notas", "Ver datos del archivo de Notas."),
317 MENU_OPCION("Volver", "Ir al menu anterior.")
321 while ((opt = menu_ejecutar(mi_menu, 4, "Menu Estadisticas")) != 3) {
324 ver_estadisticas( art_get_lst()->fp );
327 ver_estadisticas( fact_get_lst()->fp );
330 ver_estadisticas( fact_get_lst()->fp_texto );
338 MENU_OPCION("Articulos","Alta,baja,consulta y modificacion de articulos."),
339 MENU_OPCION("Facturas","Alta,baja,consulta y modificacion de facturas."),
340 MENU_OPCION("Ver Registros","Ver registros/bloques de archivo Articulos."),
341 MENU_OPCION("Ver Facturas","Ver registros/bloques de archivo Facturas."),
342 MENU_OPCION("Ver Notas","Ver registros/bloques de archivo Notas."),
343 MENU_OPCION("Estadisticas","Ver estadisticas de ocupacion de archivos."),
344 MENU_OPCION("Mantenimiento","Tareas de mantenimiento de los archivos."),
345 MENU_OPCION("Salir", "Salir del sistema.")
348 return menu_ejecutar(mi_menu, 8, "Menu Principal");
352 static void finish(int sig)
356 /* do your non-curses wrapup here */
360 WINDOW *msg_box(WINDOW *win, int w, int h, const char *format, ...)
366 va_start(ap, format);
367 vsprintf(txt, format, ap);
372 dialog = derwin(win, mh, mw, h/2-mh/2, w/2-mw/2);
374 mvwaddstr(dialog, 1, 1, txt);
380 void msg_box_free(WINDOW *padre, WINDOW *win)
389 void menu_mantenimiento()
392 MENU_OPCION("Compactar Articulos","Elimina espacio no utilizado."),
393 MENU_OPCION("Compactar Facturas","Elimina espacio no utilizado."),
394 MENU_OPCION("Compactar Notas","Elimina espacio no utilizado."),
395 MENU_OPCION("Cambiar tipo Archivo Articulos","Permite cambiar el tipo del archivo."),
396 MENU_OPCION("Cambiar tipo Archivo Facturas","Permite cambiar el tipo del archivo."),
397 MENU_OPCION("Cambiar tipo Archivo Notas","Permite cambiar el tipo del archivo."),
398 MENU_OPCION("Volver", "Volver al menu anterior.")
402 int nuevo_tam_registro, nuevo_tam_bloque;
406 while ((opt = menu_ejecutar(mi_menu, 7, "Menu Mantenimiento")) != 6) {
409 dlg = msg_box(stdscr, COLS, LINES, "Compactando archivo.... Aguarde");
410 art_get_lst()->fp->compactar(art_get_lst()->fp);
411 msg_box_free(stdscr, dlg);
414 dlg = msg_box(stdscr, COLS, LINES, "Compactando archivo.... Aguarde");
415 fact_get_lst()->fp->compactar(fact_get_lst()->fp);
416 msg_box_free(stdscr, dlg);
419 dlg = msg_box(stdscr, COLS, LINES, "Compactando archivo.... Aguarde");
420 fact_get_lst()->fp_texto->compactar(fact_get_lst()->fp_texto);
421 msg_box_free(stdscr, dlg);
424 nuevo_tam_registro = -1; /* No permito cambiar el tamaño de registro */
425 preguntar_nuevo_tipo(&nuevo_tipo, &nuevo_tam_bloque, &nuevo_tam_registro);
426 dlg = msg_box(stdscr, COLS, LINES, "Cambiando el formato de archivo .... Aguarde");
427 art_reformatear(nuevo_tipo, nuevo_tam_bloque, nuevo_tam_registro);
428 msg_box_free(stdscr, dlg);
431 nuevo_tam_registro = 0;
432 preguntar_nuevo_tipo(&nuevo_tipo, &nuevo_tam_bloque, &nuevo_tam_registro);
435 nuevo_tam_registro = -2;
436 preguntar_nuevo_tipo(&nuevo_tipo, &nuevo_tam_bloque, &nuevo_tam_registro);
441 void preguntar_nuevo_tipo(int *tipo, int *tam_bloque, int *tam_reg)
448 win = newwin(LINES/2, COLS/2, LINES/4, COLS/4);
451 form = form_crear(win);
452 form_agregar_widget(form, RADIO, "Tipo de archivo", 3, "T1,T2,T3");
453 form_ejecutar(form, 1,1);
455 s = form_obtener_valor_char(form, "Tipo de archivo");
456 if (strcmp(s, "T1") == 0) n = T1;
457 if (strcmp(s, "T2") == 0) n = T2;
458 if (strcmp(s, "T3") == 0) n = T3;
469 form = form_crear(win);
470 form_agregar_widget(form, INPUT, "Tamaño de bloque", 8, "");
473 form_set_valor(form, "Tamaño de bloque", "");
474 form_ejecutar(form, 1,1);
475 if (form_obtener_valor_int(form, "Tamaño de bloque") > 0) is_ok = 1;
477 (*tam_bloque) = form_obtener_valor_int(form, "Tamaño de bloque");
483 if (((*tam_reg) != -1) && ((*tam_reg) != -2)) {
484 mvwaddstr(win, LINES/2-3, 1, "Nota: El tamaño de registro puede");
485 mvwaddstr(win, LINES/2-2, 1, "llegar a ser redondeado por el sistema.");
487 form = form_crear(win);
488 form_agregar_widget(form, INPUT, "Tamaño de bloque", 8, "");
489 if ((*tam_reg) != -1)
490 form_agregar_widget(form, INPUT, "Tamaño de registro", 8, "");
493 form_set_valor(form, "Tamaño de bloque", "");
494 if ((*tam_reg) != -1)
495 form_set_valor(form, "Tamaño de registro", "");
496 form_ejecutar(form, 1,1);
497 if (form_obtener_valor_int(form, "Tamaño de bloque") > 0) is_ok = 1;
498 if ((*tam_reg) != -1) {
499 if (form_obtener_valor_int(form, "Tamaño de registro") > 0) is_ok = 1; else is_ok = 0;
502 (*tam_bloque) = form_obtener_valor_int(form, "Tamaño de bloque");
503 if ((*tam_reg) != -1)
504 (*tam_reg) = form_obtener_valor_int(form, "Tamaño de registro");
512 void ver_estadisticas(EMUFS *fp)
515 EMUFS_Estadisticas stats;
519 stats = fp->leer_estadisticas(fp);
521 win = newwin(LINES-4, COLS-2, 2, 1);
524 wattron(win, COLOR_PAIR(COLOR_YELLOW));
525 wattron(win, A_BOLD);
526 mvwaddstr(win, 1, 1, "Tipo de Archivo : ");
527 wattroff(win, A_BOLD);
528 wattroff(win, COLOR_PAIR(COLOR_YELLOW));
531 waddstr(win, "Registro long. variable con bloque parametrizado");
532 wattron(win, A_BOLD);
533 mvwaddstr(win, i++, 1, "Tamaño de bloque : ");
534 wattroff(win, A_BOLD);
535 sprintf(s, "%lu bytes", fp->tam_bloque);
539 waddstr(win, "Registro long. variable sin bloques");
542 waddstr(win, "Registro long. fija con bloque parametrizado");
543 wattron(win, A_BOLD);
544 mvwaddstr(win, i++, 1, "Tamaño de bloque : ");
545 wattroff(win, A_BOLD);
546 sprintf(s, "%lu bytes", fp->tam_bloque);
548 wattron(win, A_BOLD);
549 mvwaddstr(win, i++, 1, "Tamaño de registro : ");
550 wattroff(win, A_BOLD);
551 sprintf(s, "%lu bytes", fp->tam_reg);
555 wattron(win, A_BOLD);
556 mvwaddstr(win, i++, 1, "Cant. Registros : ");
557 wattroff(win, A_BOLD);
558 sprintf(s, "%lu", stats.tam_archivo);
561 wattron(win, A_BOLD);
562 mvwaddstr(win, i++, 1, "Tamaño de Archivo : ");
563 wattroff(win, A_BOLD);
564 sprintf(s, "%lu bytes", stats.tam_archivo_bytes);
567 wattron(win, A_BOLD);
568 mvwaddstr(win, i++, 1, "Tamaño de Info de Control : ");
569 wattroff(win, A_BOLD);
570 sprintf(s, "%lu bytes", stats.info_control);
573 wattron(win, A_BOLD);
574 mvwaddstr(win, i++, 1, "Media de espacio libre : ");
575 wattroff(win, A_BOLD);
576 sprintf(s, "%lu bytes/bloque", stats.media_fs);
579 wattron(win, A_BOLD);
580 mvwaddstr(win, i++, 1, "Espacio Libre : ");
581 wattroff(win, A_BOLD);
582 sprintf(s, "%lu bytes", stats.total_fs);
585 wattron(win, A_BOLD);
586 mvwaddstr(win, i++, 1, "Maximo de Espacio libre : ");
587 wattroff(win, A_BOLD);
588 sprintf(s, "%lu bytes", stats.max_fs);
591 wattron(win, A_BOLD);
592 mvwaddstr(win, i++, 1, "Minimo de Espacio libre : ");
593 wattroff(win, A_BOLD);
594 sprintf(s, "%lu bytes", stats.min_fs);
597 wattron(win, A_BOLD);
598 mvwaddstr(win, i++, 1, "Cantidad de bloques : ");
599 wattroff(win, A_BOLD);
600 sprintf(s, "%lu", stats.cant_bloques);
603 wattron(win, A_BLINK);
604 mvwaddstr(win, i+2, 1, "Presione una tecla para continuar.");
605 wattroff(win, A_BLINK);