+
#include <stdlib.h>
#include <curses.h>
#include <menu.h>
#include <string.h>
#include <stdarg.h>
+#include "gui.h"
+#include "menu.h"
#include "form.h"
#include "articulos.h"
#include "facturas.h"
int main_menu();
void menu_articulos();
void menu_facturas();
-
-/* 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;
+void menu_mantenimiento();
+void menu_estadisticas();
+void menu_ver_registros();
+void menu_ver_bloques();
+void preguntar_nuevo_tipo(int *tipo, int *tam_bloque, int *tam_reg);
+
+void ver_estadisticas(EMUFS *fp);
+
+typedef enum {
+ PARAM_OK, /* Parametros estan ok */
+ NO_ART_FILE, /* No se especifico nombre de archivo Articulos */
+ NO_FACT_FILE, /* No se especifico nombre de archivo Facturas */
+ SHOW_HELP, /* Mostrar ayuda encontrado */
+ TIPO_NO_DEFINIDO, /* No se definio tipo de archivo */
+ TIPO_INVALIDO, /* El valor de tipo de archivo no es valido */
+ BLOQUE_NO_DEFINIDO, /* No se especifico tamaño de bloque */
+ 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 */
+ EMUFS_BLOCK_SIZE tam_bloque_fact;
+ EMUFS_BLOCK_SIZE tam_bloque_art;
+} parametros;
/* Verifica Argumentos */
t_Param param_ok(int argc, char *argv[])
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;
+ 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;
+ 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 {
- /* Ops, no hay mas parametros */
- return TIPO_NO_DEFINIDO;
+ 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 */
+ 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_fact = n;
+ parametros.tam_bloque_fact = atoi(argv[i+2]);
+ if (parametros.tam_bloque_fact <= 0) return NULL_BLOCK_FOUND;
+ parametros.xml_fact = i;
+ } 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");
- 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");
+ printf("Modo de uso : %s [-[f|a] <archivo articulos XML> tipo [tamaño bloque]] \n", s);
+ printf(" -f indica que lo que está a continuación seran los datos para generar el archivo de facturas.\n");
+ printf(" -a indica que lo que está a continuación seran los datos para generar el archivo de articulos.\n");
+ printf(" 'tipo' es el modo de archivo. Siendo :\n");
+ printf(" 1 - Registros long. variables con bloque parametrizado\n");
+ printf(" 2 - Registros long. variables sin bloque\n");
+ printf(" 3 - Registros long fija con bloque parametrizado\n");
+ printf(" tamaño bloque debe ser especificado solo en aquellos tipos que lo requiera.\n");
}
int main(int argc, char *argv[])
int c, fin=0;
WINDOW *dialog;
+ parametros.xml_art = parametros.xml_fact = -1;
switch (param_ok(argc, argv)) {
case SHOW_HELP:
print_help(argv[0]);
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;
}
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", 3, 100))
- fprintf(stderr, "ERROR CARGANDO FACTURAS\n");
- } else
+
+ 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);
+ } else {
+ fact_cargar(NULL, -1, -1);
+ }
msg_box_free(stdscr, dialog);
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();
+ menu_ver_registros();
+ break;
+ case 3:
+ menu_ver_bloques();
+ break;
+ case 4:
+ menu_estadisticas();
+ break;
+ case 5:
+ menu_mantenimiento();
break;
- // case 3:
case 6:
fin = 1;
break;
void menu_facturas()
{
- WINDOW *menu_win;
- MENU *menu;
- ITEM **items;
- int c, salir;
- char *opciones[] = {
- "Alta",
- "Baja",
- "Modificacion",
- "Volver"
+ MENU(mi_menu) {
+ MENU_OPCION("Alta", "Crear una nueva factura."),
+ MENU_OPCION("Baja", "Elimina una factura existente."),
+ MENU_OPCION("Modificacion", "Modifica una factura existente."),
+ MENU_OPCION("Volver", "Volver al menu anterior.")
};
-
- 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], art_eliminar); */
- items[2] = new_item(opciones[2], "Modificar una factura existente.");
-/* set_item_userptr(items[2], art_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);
+ int opt;
+
+ while ((opt = menu_ejecutar(mi_menu, 4, "Menu Articulos")) != 3) {
+ switch (opt) {
+ case 0:
+ fact_agregar(NULL);
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);
- }
+ case 1:
+ fact_eliminar(NULL);
+ break;
+ case 2:
+ fact_modificar(NULL);
}
- 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);
+ }
}
+
void menu_articulos()
{
- WINDOW *menu_win;
- MENU *menu;
- ITEM **items;
- int c, salir;
- char *opciones[] = {
- "Alta",
- "Baja",
- "Modificacion",
- "Volver"
+ MENU(mi_menu) {
+ MENU_OPCION("Alta", "Crear un nuevo articulo."),
+ MENU_OPCION("Baja", "Elimina un articulo existente."),
+ MENU_OPCION("Modificacion", "Modifica un articulo existente."),
+ MENU_OPCION("Volver", "Volver al menu anterior.")
};
+ int opt;
+
+ while ((opt = menu_ejecutar(mi_menu, 4, "Menu Articulos")) != 3) {
+ switch (opt) {
+ case 0:
+ art_agregar(NULL);
+ break;
+ case 1:
+ art_eliminar(NULL);
+ break;
+ case 2:
+ art_modificar(NULL);
+ }
+ }
- items = (ITEM **)calloc(5, sizeof(ITEM *));
-
- items[0] = new_item(opciones[0], "Crear un nuevo articulo.");
- set_item_userptr(items[0], art_agregar);
- items[1] = new_item(opciones[1], "Eliminar un articulo existente.");
- set_item_userptr(items[1], art_eliminar);
- items[2] = new_item(opciones[2], "Modificar un articulo existente.");
- set_item_userptr(items[2], art_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 Articulos");
- 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);
+void menu_estadisticas()
+{
+ MENU(mi_menu) {
+ MENU_OPCION("Articulos", "Ver datos del archivo de Articulos."),
+ MENU_OPCION("Facturas", "Ver datos del archivo de Facturas."),
+ MENU_OPCION("Notas", "Ver datos del archivo de Notas."),
+ MENU_OPCION("Volver", "Ir al menu anterior.")
+ };
+ int opt;
+
+ while ((opt = menu_ejecutar(mi_menu, 4, "Menu Estadisticas")) != 3) {
+ switch (opt) {
+ case 0:
+ ver_estadisticas( art_get_lst()->fp );
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);
- }
+ case 1:
+ ver_estadisticas( fact_get_lst()->fp );
+ break;
+ case 2:
+ ver_estadisticas( fact_get_lst()->fp_texto );
}
- 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);
+ }
}
-int main_menu()
+void menu_ver_registros()
{
- WINDOW *menu_win;
- MENU *menu;
- ITEM **items;
- int c, salir, opcion;
- char *opciones[] = {
- "Articulos",
- "Facturas",
- "Ver Registros",
- "Ver Bloques",
- "Estadisticas",
- "Mantenimiento",
- "Salir"
+ MENU(mi_menu) {
+ MENU_OPCION("Articulos", "Ver registros del archivo de Articulos."),
+ MENU_OPCION("Facturas", "Ver registros del archivo de Facturas."),
+ MENU_OPCION("Notas", "Ver registros del archivo de Notas."),
+ MENU_OPCION("Volver", "Ir al menu anterior.")
};
+ int opt;
+ WINDOW *dialog;
- 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], "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(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, 10, 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 Principal");
- wattroff(menu_win, COLOR_PAIR(COLOR_RED));
- post_menu(menu);
- wrefresh(menu_win);
+ while ((opt = menu_ejecutar(mi_menu, 4, "Menu Ver Registros")) != 3) {
+ switch (opt) {
+ case 0:
+ dialog = derwin(stdscr, LINES-4, COLS-2, 2, 1);
+ ver_registros(dialog, COLS-2, LINES-4, 0);
+ werase(dialog);
+ wrefresh(dialog);
+ delwin(dialog);
+ refresh();
+ break;
+ case 1:
+ dialog = derwin(stdscr, LINES-4, COLS-2, 2, 1);
+ ver_registros(dialog, COLS-2, LINES-4, 1);
+ werase(dialog);
+ wrefresh(dialog);
+ delwin(dialog);
+ refresh();
+ /* break; */
+ /* case 2: */
+ }
+ }
+}
- curs_set(0);
- opcion = -1;
- salir = 0;
- while((!salir) && (c = getch())) {
- switch(c) {
- case KEY_DOWN:
- menu_driver(menu, REQ_DOWN_ITEM);
- break;
- case KEY_UP:
- menu_driver(menu, REQ_UP_ITEM);
+void menu_ver_bloques()
+{
+ MENU(mi_menu) {
+ MENU_OPCION("Articulos", "Ver bloques del archivo de Articulos."),
+ MENU_OPCION("Facturas", "Ver bloques del archivo de Facturas."),
+ MENU_OPCION("Notas", "Ver bloques del archivo de Notas."),
+ MENU_OPCION("Volver", "Ir al menu anterior.")
+ };
+ int opt;
+ WINDOW *dialog;
+
+ while ((opt = menu_ejecutar(mi_menu, 4, "Menu Ver Bloques")) != 3) {
+ switch (opt) {
+ case 0:
+ dialog = derwin(stdscr, LINES-4, COLS-2, 2, 1);
+ ver_bloques(dialog, COLS-2, LINES-4, 0);
+ werase(dialog);
+ wrefresh(dialog);
+ delwin(dialog);
+ refresh();
break;
- case 13:
- case 10:
- {
- ITEM *cur;
- int i;
-
- cur = current_item(menu);
- for(i=0; i<7; ++i) {
- if (strcmp(item_name(cur), opciones[i]) == 0)
- opcion = i;
- }
- pos_menu_cursor(menu);
- salir = 1;
- }
+ case 1:
+ dialog = derwin(stdscr, LINES-4, COLS-2, 2, 1);
+ ver_bloques(dialog, COLS-2, LINES-4, 1);
+ werase(dialog);
+ wrefresh(dialog);
+ delwin(dialog);
+ refresh();
+ break;
+ case 2:
+ dialog = derwin(stdscr, LINES-4, COLS-2, 2, 1);
+ ver_bloques(dialog, COLS-2, LINES-4, 2);
+ werase(dialog);
+ wrefresh(dialog);
+ delwin(dialog);
+ refresh();
}
- wrefresh(menu_win);
- }
- curs_set(1);
-
- unpost_menu(menu);
- werase(menu_win);
- wrefresh(menu_win);
- delwin(menu_win);
- free_item(items[0]);
- 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);
-
- return opcion;
+ }
+}
+
+int main_menu()
+{
+ MENU(mi_menu) {
+ MENU_OPCION("Articulos","Alta,baja,consulta y modificacion de articulos."),
+ MENU_OPCION("Facturas","Alta,baja,consulta y modificacion de facturas."),
+ MENU_OPCION("Ver Registros","Ver registros (en su contexto) 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("Salir", "Salir del sistema.")
+ };
+
+ return menu_ejecutar(mi_menu, 7, "Menu Principal");
}
wrefresh(padre);
}
+void menu_mantenimiento()
+{
+ MENU(mi_menu) {
+ MENU_OPCION("Compactar Articulos","Elimina espacio no utilizado."),
+ MENU_OPCION("Compactar Facturas","Elimina espacio no utilizado."),
+ MENU_OPCION("Compactar Notas","Elimina espacio no utilizado."),
+ MENU_OPCION("Cambiar tipo Archivo Articulos","Permite cambiar el tipo del archivo."),
+ MENU_OPCION("Cambiar tipo Archivo Facturas","Permite cambiar el tipo del archivo."),
+ MENU_OPCION("Cambiar tipo Archivo Notas","Permite cambiar el tipo del archivo."),
+ MENU_OPCION("Volver", "Volver al menu anterior.")
+ };
+
+ int opt;
+ int nuevo_tam_registro, nuevo_tam_bloque;
+ int nuevo_tipo;
+ WINDOW *dlg;
+
+ while ((opt = menu_ejecutar(mi_menu, 7, "Menu Mantenimiento")) != 6) {
+ switch (opt) {
+ case 0:
+ dlg = msg_box(stdscr, COLS, LINES, "Compactando archivo.... Aguarde");
+ art_get_lst()->fp->compactar(art_get_lst()->fp);
+ msg_box_free(stdscr, dlg);
+ break;
+ case 1:
+ dlg = msg_box(stdscr, COLS, LINES, "Compactando archivo.... Aguarde");
+ fact_get_lst()->fp->compactar(fact_get_lst()->fp);
+ msg_box_free(stdscr, dlg);
+ break;
+ case 2:
+ dlg = msg_box(stdscr, COLS, LINES, "Compactando archivo.... Aguarde");
+ fact_get_lst()->fp_texto->compactar(fact_get_lst()->fp_texto);
+ msg_box_free(stdscr, dlg);
+ break;
+ case 3:
+ 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);
+ break;
+ case 4:
+ nuevo_tam_registro = 0;
+ preguntar_nuevo_tipo(&nuevo_tipo, &nuevo_tam_bloque, &nuevo_tam_registro);
+ break;
+ case 5:
+ nuevo_tam_registro = -2;
+ preguntar_nuevo_tipo(&nuevo_tipo, &nuevo_tam_bloque, &nuevo_tam_registro);
+ }
+ }
+}
+
+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);
+}
+
+void ver_estadisticas(EMUFS *fp)
+{
+ WINDOW *win;
+ EMUFS_Estadisticas stats;
+ char s[40];
+ int i=3;
+
+ stats = fp->leer_estadisticas(fp);
+
+ win = newwin(LINES-4, COLS-2, 2, 1);
+ curs_set(0);
+
+ wattron(win, COLOR_PAIR(COLOR_YELLOW));
+ wattron(win, A_BOLD);
+ mvwaddstr(win, 1, 1, "Tipo de Archivo : ");
+ wattroff(win, A_BOLD);
+ wattroff(win, COLOR_PAIR(COLOR_YELLOW));
+ switch (fp->tipo) {
+ case T1:
+ waddstr(win, "Registro long. variable con bloque parametrizado");
+ wattron(win, A_BOLD);
+ mvwaddstr(win, i++, 1, "Tamaño de bloque : ");
+ wattroff(win, A_BOLD);
+ sprintf(s, "%lu bytes", fp->tam_bloque);
+ waddstr(win, s);
+ break;
+ case T2:
+ waddstr(win, "Registro long. variable sin bloques");
+ break;
+ case T3:
+ waddstr(win, "Registro long. fija con bloque parametrizado");
+ wattron(win, A_BOLD);
+ mvwaddstr(win, i++, 1, "Tamaño de bloque : ");
+ wattroff(win, A_BOLD);
+ sprintf(s, "%lu bytes", fp->tam_bloque);
+ waddstr(win, s);
+ wattron(win, A_BOLD);
+ mvwaddstr(win, i++, 1, "Tamaño de registro : ");
+ wattroff(win, A_BOLD);
+ sprintf(s, "%lu bytes", fp->tam_reg);
+ waddstr(win, s);
+ }
+
+ wattron(win, A_BOLD);
+ mvwaddstr(win, i++, 1, "Cant. Registros : ");
+ wattroff(win, A_BOLD);
+ sprintf(s, "%lu", stats.tam_archivo);
+ waddstr(win, s);
+
+ wattron(win, A_BOLD);
+ mvwaddstr(win, i++, 1, "Tamaño de Archivo : ");
+ wattroff(win, A_BOLD);
+ sprintf(s, "%lu bytes", stats.tam_archivo_bytes);
+ waddstr(win, s);
+
+ wattron(win, A_BOLD);
+ mvwaddstr(win, i++, 1, "Tamaño de Info de Control : ");
+ wattroff(win, A_BOLD);
+ sprintf(s, "%lu bytes", stats.info_control);
+ waddstr(win, s);
+
+ wattron(win, A_BOLD);
+ mvwaddstr(win, i++, 1, "Media de espacio libre : ");
+ wattroff(win, A_BOLD);
+ sprintf(s, "%lu bytes/bloque", stats.media_fs);
+ waddstr(win, s);
+
+ wattron(win, A_BOLD);
+ mvwaddstr(win, i++, 1, "Espacio Libre : ");
+ wattroff(win, A_BOLD);
+ sprintf(s, "%lu bytes", stats.total_fs);
+ waddstr(win, s);
+
+ wattron(win, A_BOLD);
+ mvwaddstr(win, i++, 1, "Maximo de Espacio libre : ");
+ wattroff(win, A_BOLD);
+ sprintf(s, "%lu bytes", stats.max_fs);
+ waddstr(win, s);
+
+ wattron(win, A_BOLD);
+ mvwaddstr(win, i++, 1, "Minimo de Espacio libre : ");
+ wattroff(win, A_BOLD);
+ sprintf(s, "%lu bytes", stats.min_fs);
+ waddstr(win, s);
+
+ wattron(win, A_BOLD);
+ mvwaddstr(win, i++, 1, "Cantidad de bloques : ");
+ wattroff(win, A_BOLD);
+ sprintf(s, "%lu", stats.cant_bloques);
+ waddstr(win, s);
+
+ wattron(win, A_BLINK);
+ mvwaddstr(win, i+2, 1, "Presione una tecla para continuar.");
+ wattroff(win, A_BLINK);
+
+ wrefresh(win);
+
+ getch();
+ werase(win);
+ wrefresh(win);
+ delwin(win);
+}
+