-
#include <stdlib.h>
#include <curses.h>
#include <menu.h>
#include "facturas.h"
#include "emufs.h"
#include "viewer.h"
+#include "tree_viewer.h"
#define CTRLD 4
void menu_estadisticas();
void menu_ver_registros();
void menu_ver_bloques();
-void preguntar_nuevo_tipo(int *tipo, int *tam_bloque, int *tam_reg);
+void menu_ver_indices();
+void preguntar_nuevo_tipo(const char *title, int *tipo, int *tam_bloque, int *tam_reg);
void ver_estadisticas(EMUFS *fp);
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[])
+void print_help(char *s)
{
- 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], "-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;
+ printf("EMUFS - 2v0\n");
+ printf("Modo de uso :%s [<emufs.xml>|-h] \n", s);
+ printf("\temufs.xml es el archivo XML que cumple con emufs.dtd con la configuracion a usar.\n");
+ printf("\t-h Muestra este msg de ayuda.\n");
+}
+
+int leer_tipo_arbol(char *s) {
+ if (strcmp(s, "B") == 0) return 0;
+ if (strcmp(s, "BA") == 0) return 1;
+
+ /* Por defecto es un B */
+ return 0;
+}
+
+void leer_param_ind_art(t_Parametros *param, xmlNode *padre)
+{
+ xmlNode *node;
+ char *tmp, *nombre;
+ node = padre->children;
+ while (node) {
+ if (node->type == XML_ELEMENT_NODE) {
+ if (strcmp(node->name, "indice")==0) {
+ PERR(" LEO INDICE");
+ nombre = xml_get_prop(node, "nombre");
+
+ if (strcmp(nombre, "codigo")==0) {
+ tmp = xml_get_prop(node, "tipo");
+ param->ind_art[0].tipo_arbol = leer_tipo_arbol(tmp);
+ free(tmp);
+ tmp = xml_get_prop(node, "bloque");
+ param->ind_art[0].tam_bloque = atoi(tmp);
+ free(tmp);
+ } else if (strcmp(nombre, "desc")==0) {
+ tmp = xml_get_prop(node, "tipo");
+ param->ind_art[1].tipo_arbol = leer_tipo_arbol(tmp);
+ free(tmp);
+ tmp = xml_get_prop(node, "bloque");
+ param->ind_art[1].tam_bloque = atoi(tmp);
+ free(tmp);
+ } else if (strcmp(nombre, "presentacion")==0) {
+ tmp = xml_get_prop(node, "tipo");
+ param->ind_art[2].tipo_arbol = leer_tipo_arbol(tmp);
+ free(tmp);
+ tmp = xml_get_prop(node, "bloque");
+ param->ind_art[2].tam_bloque = atoi(tmp);
+ free(tmp);
}
- } else {
- return NO_ART_FILE;
+ PERR(" LISTO");
+ free(nombre);
}
- } /* 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;
+ }
+ node = node->next;
+ }
+}
+
+void leer_param_ind_fact(t_Parametros *param, xmlNode *padre)
+{
+ xmlNode *node;
+ char *tmp, *nombre;
+ node = padre->children;
+ while (node) {
+ if (node->type == XML_ELEMENT_NODE) {
+ if (strcmp(node->name, "indice")==0) {
+ PERR(" LEO INDICE");
+ nombre = xml_get_prop(node, "nombre");
+
+ if (strcmp(nombre, "numero")==0) {
+ tmp = xml_get_prop(node, "tipo");
+ param->ind_fac[0].tipo_arbol = leer_tipo_arbol(tmp);
+ free(tmp);
+ tmp = xml_get_prop(node, "bloque");
+ param->ind_fac[0].tam_bloque = atoi(tmp);
+ free(tmp);
+ } else if (strcmp(nombre, "emision")==0) {
+ tmp = xml_get_prop(node, "tipo");
+ param->ind_fac[1].tipo_arbol = leer_tipo_arbol(tmp);
+ free(tmp);
+ tmp = xml_get_prop(node, "bloque");
+ param->ind_fac[1].tam_bloque = atoi(tmp);
+ free(tmp);
+ } else if (strcmp(nombre, "vto")==0) {
+ tmp = xml_get_prop(node, "tipo");
+ param->ind_fac[2].tipo_arbol = leer_tipo_arbol(tmp);
+ free(tmp);
+ tmp = xml_get_prop(node, "bloque");
+ param->ind_fac[2].tam_bloque = atoi(tmp);
+ free(tmp);
+ } else if (strcmp(nombre, "cheque")==0) {
+ tmp = xml_get_prop(node, "tipo");
+ param->ind_fac[3].tipo_arbol = leer_tipo_arbol(tmp);
+ free(tmp);
+ tmp = xml_get_prop(node, "bloque");
+ param->ind_fac[3].tam_bloque = atoi(tmp);
+ free(tmp);
+ } else if (strcmp(nombre, "ctacte")==0) {
+ tmp = xml_get_prop(node, "tipo");
+ param->ind_fac[4].tipo_arbol = leer_tipo_arbol(tmp);
+ free(tmp);
+ tmp = xml_get_prop(node, "bloque");
+ param->ind_fac[4].tam_bloque = atoi(tmp);
+ free(tmp);
}
- } else {
- return NO_FACT_FILE;
+ PERR(" LISTO");
+ free(nombre);
}
- } /* Facturas */
-
+ }
+ node = node->next;
}
- return PARAM_OK;
}
-void print_help(char *s)
+void leer_param_art(t_Parametros *param, xmlNode *padre)
+{
+ xmlNode *node;
+ char *tmp;
+ node = padre->children;
+ while (node) {
+ if (node->type == XML_ELEMENT_NODE) {
+ if (strcmp(node->name, "fuente")==0) {
+ strcpy(param->xml_art, XML_GET_CONTENT(node->children));
+ } else if (strcmp(node->name, "datos")==0) {
+ tmp = xml_get_prop(node, "tipo");
+ param->tipo_arch_art = atoi(tmp)-1;
+ free(tmp);
+ tmp = xml_get_prop(node, "bloque");
+ param->tam_bloque_art = atoi(tmp);
+ free(tmp);
+ } else if (strcmp(node->name, "indices")==0) {
+ PERR("LEO INDICES")
+ leer_param_ind_art(param, node);
+ PERR("LISTO");
+ }
+ }
+ node = node->next;
+ }
+}
+
+void leer_param_fac(t_Parametros *param, xmlNode *padre)
{
- printf("EMUFS - 1v0\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");
+ xmlNode *nodo;
+ char *tmp;
+ nodo = padre->children;
+ while (nodo) {
+ if (nodo->type == XML_ELEMENT_NODE) {
+ if (strcmp(nodo->name, "fuente")==0) {
+ strcpy(param->xml_fact, XML_GET_CONTENT(nodo->children));
+ } else if (strcmp(nodo->name, "datos")==0) {
+ tmp = xml_get_prop(nodo, "tipo");
+ param->tipo_arch_fact = atoi(tmp)-1;
+ free(tmp);
+ tmp = xml_get_prop(nodo, "bloque");
+ param->tam_bloque_fact = atoi(tmp);
+ free(tmp);
+ } else if (strcmp(nodo->name, "datos_notas")==0) {
+ tmp = xml_get_prop(nodo, "tipo");
+ param->tipo_arch_nota = atoi(tmp)-1;
+ free(tmp);
+ tmp = xml_get_prop(nodo, "bloque");
+ param->tam_bloque_nota = atoi(tmp);
+ free(tmp);
+ } else if (strcmp(nodo->name, "indices")==0) {
+ PERR("LEO INDICES")
+ leer_param_ind_fact(param, nodo);
+ PERR("LISTO");
+ }
+ }
+ nodo = nodo->next;
+ }
}
+void param_xml(char *s, t_Parametros *param)
+{
+ xmlDocPtr document;
+ xmlNode *node, *inicio;
+
+ document = xmlReadFile(s, NULL,0);
+ if (document == NULL) {
+ return;
+ }
+ inicio = NULL;
+ node = xmlDocGetRootElement(document);
+ /* Busco el TAG principal "EMUFS" */
+ while (node) {
+ if (node->type == XML_ELEMENT_NODE) {
+ PERR(node->name);
+ if (strcmp(node->name, "emufs") == 0) {
+ inicio = node->children;
+ break;
+ }
+ }
+ node = node->next;
+ }
+ if (inicio == NULL) {
+ PERR("NO ENCONTRE TAG PRINCIPAL");
+ xmlFreeDoc(document);
+ xmlCleanupParser();
+ return;
+ }
+
+ node = inicio;
+ while (node) {
+ if (node->type == XML_ELEMENT_NODE) {
+ if (strcmp(node->name, "articulos")==0) {
+ leer_param_art(param, node);
+ } else if (strcmp(node->name, "facturas")==0) {
+ leer_param_fac(param, node);
+ }
+ }
+ node = node->next;
+ }
+}
+
+static t_Parametros parametros;
+
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:
+ if (argc > 2) {
+ print_help(argv[0]);
+ exit(0);
+ }
+
+ if (argc == 2) {
+ if (strcmp(argv[1], "-h")==0) {
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 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;
+ exit(0);
+ }
+ param_xml(argv[1], ¶metros);
+
+ /* Valido que los tamaños de los bloques sean multiplos de 512 */
+ if ((parametros.tam_bloque_art%512) != 0) {
+ PERR("Los tamaños de bloque deben ser multiplos de 512!!");
+ exit(1);
+ }
+ if ((parametros.tam_bloque_fact%512) != 0) {
+ PERR("Los tamaños de bloque deben ser multiplos de 512!!");
+ exit(1);
+ }
+ if ((parametros.ind_art[0].tam_bloque%512) != 0) {
+ PERR("Los tamaños de bloque deben ser multiplos de 512!!");
+ exit(1);
+ }
+ if ((parametros.ind_art[1].tam_bloque%512) != 0) {
+ PERR("Los tamaños de bloque deben ser multiplos de 512!!");
+ exit(1);
+ }
+ if ((parametros.ind_art[2].tam_bloque%512) != 0) {
+ PERR("Los tamaños de bloque deben ser multiplos de 512!!");
+ exit(1);
+ }
+ if ((parametros.ind_fac[0].tam_bloque%512) != 0) {
+ PERR("Los tamaños de bloque deben ser multiplos de 512!!");
+ exit(1);
+ }
+ if ((parametros.ind_fac[1].tam_bloque%512) != 0) {
+ PERR("Los tamaños de bloque deben ser multiplos de 512!!");
+ exit(1);
+ }
+ if ((parametros.ind_fac[2].tam_bloque%512) != 0) {
+ PERR("Los tamaños de bloque deben ser multiplos de 512!!");
+ exit(1);
+ }
+ if ((parametros.ind_fac[3].tam_bloque%512) != 0) {
+ PERR("Los tamaños de bloque deben ser multiplos de 512!!");
+ exit(1);
+ }
+ if ((parametros.ind_fac[4].tam_bloque%512) != 0) {
+ PERR("Los tamaños de bloque deben ser multiplos de 512!!");
+ exit(1);
+ }
}
#ifdef DEBUG
attroff(COLOR_PAIR(2));
wrefresh(stdscr);
- dialog = msg_box(stdscr, COLS, LINES, "Generando archivos ...");
-
- 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);
+ if (argc == 2) {
+ dialog = msg_box(stdscr, COLS, LINES, "Generando archivos ...");
+ art_cargar(¶metros);
+ fact_cargar(¶metros);
} else {
- fact_cargar(NULL, -1, -1);
+ dialog = msg_box(stdscr, COLS, LINES, "Recuperando archivos ...");
+ art_cargar(NULL);
+ fact_cargar(NULL);
}
msg_box_free(stdscr, dialog);
- /* CICLO PRINCIPAL DE LA APLICACION */
- while ((c = main_menu()) != -1) {
- switch (c) {
- case 0:
- menu_articulos();
- break;
- case 1:
- menu_facturas();
- break;
- case 2:
- menu_ver_registros();
- break;
- case 3:
- menu_ver_bloques();
- break;
- case 4:
- menu_estadisticas();
- break;
- case 5:
- menu_mantenimiento();
- break;
- case 6:
- fin = 1;
- break;
- }
- if (fin == 1) break;
- }
+ main_menu();
endwin();
MENU_OPCION("Alta", "Crear una nueva factura."),
MENU_OPCION("Baja", "Elimina una factura existente."),
MENU_OPCION("Modificacion", "Modifica una factura existente."),
+ MENU_OPCION("Consultas", "Consulta varias de articulo."),
+ MENU_OPCION("Recorrer", "Recorrer el archivo por alguno de sus indices."),
MENU_OPCION("Volver", "Volver al menu anterior.")
};
int opt;
- while ((opt = menu_ejecutar(mi_menu, 4, "Menu Articulos")) != 3) {
+ while ((opt = menu_ejecutar(mi_menu, 6, "Menu Facturas")) != 5) {
switch (opt) {
case 0:
fact_agregar(NULL);
break;
case 2:
fact_modificar(NULL);
+ break;
+ case 3:
+ fact_consultas(NULL);
+ break;
+ case 4:
+ fact_recorrer();
}
}
}
MENU_OPCION("Alta", "Crear un nuevo articulo."),
MENU_OPCION("Baja", "Elimina un articulo existente."),
MENU_OPCION("Modificacion", "Modifica un articulo existente."),
+ MENU_OPCION("Consultas", "Consulta varias de articulo."),
+ MENU_OPCION("Recorrer", "Recorrer el archivo por alguno de sus indices."),
+ MENU_OPCION("Ver ventas", "Ver venta de articulos entre 2 fechas."),
MENU_OPCION("Volver", "Volver al menu anterior.")
};
int opt;
- while ((opt = menu_ejecutar(mi_menu, 4, "Menu Articulos")) != 3) {
+ while ((opt = menu_ejecutar(mi_menu, 7, "Menu Articulos")) != 6) {
switch (opt) {
case 0:
art_agregar(NULL);
break;
case 2:
art_modificar(NULL);
+ break;
+ case 3:
+ art_consultas(NULL);
+ break;
+ case 4:
+ art_recorrer();
+ break;
+ case 5:
+ art_ver_ventas();
}
}
WINDOW *dialog;
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: */
- }
+ dialog = derwin(stdscr, LINES-4, COLS-2, 2, 1);
+ ver_registros(dialog, COLS-2, LINES-4, opt);
+ werase(dialog);
+ wrefresh(dialog);
+ delwin(dialog);
+ refresh();
}
}
}
}
+void ver_indice(int arch, char *indice)
+{
+ INDICE *idx;
+ int w, h;
+ WINDOW *win;
+ switch (arch) {
+ case 0:
+ idx = emufs_buscar_indice_por_nombre(art_get_lst()->fp, indice);
+ break;
+ case 1:
+ idx = emufs_buscar_indice_por_nombre(fact_get_lst()->fp, indice);
+ }
+ h = LINES-4;
+ w = COLS-2;
+ win = newwin(h, w, 2, 1);
+
+ if ((idx != NULL) && (idx->tipo != IND_B_PLUS)) {
+ emufs_indice_b_ver(idx, win, w, h, 0);
+ } else {
+ if (idx != NULL) {
+ WINDOW *dlg;
+ dlg = msg_box(win, w, h, "El tipo de arbol B+ no esta soportado en el visor");
+ getch();
+ msg_box_free(win, dlg);
+ }
+ }
+ delwin(win);
+}
+
+void menu_ver_indices()
+{
+ int arch[8] = {0, 0, 0, 1, 1, 1, 1, 1};
+ char *nombres[8] = {"codigo", "desc", "presentacion",
+ "numero", "emision", "vto", "cheque", "ctacte"};
+ MENU(mi_menu) {
+ MENU_OPCION("Articulos->codigo",""),
+ MENU_OPCION("Articulos->desc",""),
+ MENU_OPCION("Articulos->presentacion",""),
+ MENU_OPCION("Facturas->numero",""),
+ MENU_OPCION("Facturas->emision",""),
+ MENU_OPCION("Facturas->vto",""),
+ MENU_OPCION("Facturas->cheque", ""),
+ MENU_OPCION("Facturas->ctacte", ""),
+ MENU_OPCION("Volver", "Volver al menu anterior.")
+ };
+ int c;
+
+ while ((c=menu_ejecutar(mi_menu, 9, "Menu Principal"))!=8) {
+ ver_indice(arch[c], nombres[c]);
+ }
+}
+
int main_menu()
{
+ int c;
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 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("Ver Indices", "Permite ver y recorrer los indices"),
MENU_OPCION("Salir", "Salir del sistema.")
};
- return menu_ejecutar(mi_menu, 7, "Menu Principal");
+ while ((c=menu_ejecutar(mi_menu, 8, "Menu Principal"))!=7) {
+ switch (c) {
+ case 0:
+ menu_articulos();
+ break;
+ case 1:
+ menu_facturas();
+ break;
+ case 2:
+ menu_ver_registros();
+ break;
+ case 3:
+ menu_ver_bloques();
+ break;
+ case 4:
+ menu_estadisticas();
+ break;
+ case 5:
+ menu_mantenimiento();
+ break;
+ case 6:
+ menu_ver_indices();
+ }
+ }
+
+ return 0;
}
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("Exportar Articulos", "Genera un archivo XML con los articulos."),
+ MENU_OPCION("Expostar Facturas", "Genera un archivo XML con las facturas."),
MENU_OPCION("Volver", "Volver al menu anterior.")
};
int opt;
- int nuevo_tam_registro, nuevo_tam_bloque;
- int nuevo_tipo;
+ int nuevo_tam_registro, nuevo_tam_bloque, nuevo_tipo;
+ int nuevo_tam_registro1, nuevo_tam_bloque1, nuevo_tipo1;
WINDOW *dlg;
+ char *s;
- while ((opt = menu_ejecutar(mi_menu, 7, "Menu Mantenimiento")) != 6) {
+ while ((opt = menu_ejecutar(mi_menu, 8, "Menu Mantenimiento")) != 7) {
switch (opt) {
case 0:
dlg = msg_box(stdscr, COLS, LINES, "Compactando archivo.... Aguarde");
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);
+ preguntar_nuevo_tipo("Parametros para Articulos", &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);
+ parametros.tipo_arch_art = nuevo_tipo;
+ parametros.tam_bloque_art = nuevo_tam_bloque;
+ art_reformatear(¶metros);
msg_box_free(stdscr, dlg);
break;
case 4:
nuevo_tam_registro = 0;
- preguntar_nuevo_tipo(&nuevo_tipo, &nuevo_tam_bloque, &nuevo_tam_registro);
+ preguntar_nuevo_tipo("Parametros para Facturas", &nuevo_tipo, &nuevo_tam_bloque, &nuevo_tam_registro);
+ preguntar_nuevo_tipo("Parametros para Notas", &nuevo_tipo1, &nuevo_tam_bloque1, &nuevo_tam_registro1);
+ dlg = msg_box(stdscr, COLS, LINES, "Cambiando el formato de archivo .... Aguarde");
+ parametros.tipo_arch_fact = nuevo_tipo;
+ parametros.tam_bloque_fact = nuevo_tam_bloque;
+ parametros.tipo_arch_nota = nuevo_tipo1;
+ parametros.tam_bloque_nota = nuevo_tam_bloque1;
+ fact_reformatear(¶metros);
+ msg_box_free(stdscr, dlg);
break;
case 5:
- nuevo_tam_registro = -2;
- preguntar_nuevo_tipo(&nuevo_tipo, &nuevo_tam_bloque, &nuevo_tam_registro);
+ s = preguntar_file();
+ if (s) {
+ dlg = msg_box(stdscr, COLS, LINES, "Exportando .... Aguarde");
+ PERR("Exportando");
+ art_exportar_xml(s);
+ msg_box_free(stdscr, dlg);
+ free(s);
+ }
+ break;
+ case 6:
+ s = preguntar_file();
+ if (s) {
+ dlg = msg_box(stdscr, COLS, LINES, "Exportando .... Aguarde");
+ PERR("Exportando");
+ fact_exportar_xml(s);
+ msg_box_free(stdscr, dlg);
+ free(s);
+ }
}
}
}
-void preguntar_nuevo_tipo(int *tipo, int *tam_bloque, int *tam_reg)
+void preguntar_nuevo_tipo(const char *title, 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);
+ win = newwin(LINES/2, 2*COLS/3, LINES/4, 2*COLS/6);
box(win, 0, 0);
+ mvwaddstr(win, 0, 1, title);
form = form_crear(win);
- form_agregar_widget(form, RADIO, "Tipo de archivo", 3, "T1,T2,T3");
+ form_agregar_widget(form, RADIO, "Tipo de archivo", 5, "T1,T2,T3,T4,T5");
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;
+ if (strcmp(s, "T4") == 0) n = T4;
+ if (strcmp(s, "T5") == 0) n = T5;
form_destruir(form);
if ((*tam_reg) != -1)
(*tam_reg) = form_obtener_valor_int(form, "Tamaño de registro");
form_destruir(form);
+ break;
+ case T4:
+ case T5:
+ 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);
}
werase(win);
wrefresh(win);
wattroff(win, A_BOLD);
sprintf(s, "%lu bytes", fp->tam_reg);
waddstr(win, s);
+ break;
+ case T5:
+ waddstr(win, "Registro long. fija con bloque parametrizado (Seq. Indexado)");
+ 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);
+ break;
+ case T4:
+ waddstr(win, "Registro long. variable con bloque parametrizado (Seq. Indexado)");
+ 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, "Cant. Registros : ");
+ mvwaddstr(win, i++, 1, "Tamaño ocupado por datos / Tamaño archivo : ");
wattroff(win, A_BOLD);
- sprintf(s, "%lu", stats.tam_archivo);
+ sprintf(s, "%lu/%lu bytes (%.2f %%)",
+ stats.tam_archivo - stats.tam_info_control_dat - stats.total_fs,stats.tam_archivo,
+ (stats.tam_archivo-stats.tam_info_control_dat-stats.total_fs)*100.0f/(float)stats.tam_archivo);
waddstr(win, s);
-
+
wattron(win, A_BOLD);
- mvwaddstr(win, i++, 1, "Tamaño de Archivo : ");
+ mvwaddstr(win, i++, 1, "Tamaño info de control(1) / Tamaño archivo : ");
wattroff(win, A_BOLD);
- sprintf(s, "%lu bytes", stats.tam_archivo_bytes);
+ sprintf(s, "%lu/%lu bytes (%.2f %%)", stats.tam_info_control_dat+stats.tam_archivos_aux, stats.tam_archivo, (stats.tam_info_control_dat+stats.tam_archivos_aux)*100.0f/(float)stats.tam_archivo);
waddstr(win, s);
wattron(win, A_BOLD);
- mvwaddstr(win, i++, 1, "Tamaño de Datos : ");
+ mvwaddstr(win, i++, 1, "Espacio Libre / Tamaño archivo : ");
wattroff(win, A_BOLD);
- sprintf(s, "%lu bytes (%.2f %%)", stats.tam_archivo_bytes-stats.info_control, (stats.tam_archivo_bytes-stats.info_control)*100.0f/(float)stats.tam_archivo_bytes);
+ sprintf(s, "%lu/%lu bytes (%.2f %%)", stats.total_fs, stats.tam_archivo, stats.total_fs*100.0f/(float)stats.tam_archivo);
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 (%.2f %%)", stats.info_control, stats.info_control*100.0f/(float)stats.tam_archivo_bytes);
- 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);
waddstr(win, s);
wattron(win, A_BOLD);
- mvwaddstr(win, i++, 1, "Cantidad de bloques : ");
+ mvwaddstr(win, i++, 1, "Tamaño de Archivo de datos : ");
wattroff(win, A_BOLD);
- sprintf(s, "%lu", stats.cant_bloques);
+ sprintf(s, "%lu bytes", stats.tam_archivo);
waddstr(win, s);
+ wattron(win, A_BOLD);
+ mvwaddstr(win, i++, 1, "Tamaño de Archivos auxiliares : ");
+ wattroff(win, A_BOLD);
+ sprintf(s, "%lu bytes", stats.tam_archivos_aux);
+ waddstr(win, s);
+
+ wattron(win, A_BOLD);
+ mvwaddstr(win, i++, 1, "Información de control en el .dat : ");
+ wattroff(win, A_BOLD);
+ sprintf(s, "%lu bytes", stats.tam_info_control_dat);
+ waddstr(win, s);
+
+ if ((fp->tipo == T1) || (fp->tipo == T3)) {
+ 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_BOLD);
+ mvwaddstr(win, i++, 1, "Cant. Registros : ");
+ wattroff(win, A_BOLD);
+ sprintf(s, "%lu", stats.cant_registros);
+ waddstr(win, s);
+
+ wattron(win, A_BOLD);
+ mvwaddstr(win, i++, 1, "(1) Info control del .dat + los archivos auxiliares!.");
+ wattroff(win, A_BOLD);
+
wattron(win, A_BLINK);
mvwaddstr(win, i+2, 1, "Presione una tecla para continuar.");
wattroff(win, A_BLINK);
delwin(win);
}
+char *preguntar_file()
+{
+ WINDOW *win;
+ t_Form *form;
+ char *s, *t;
+
+ win = newwin(LINES/2, COLS/2, LINES/4, COLS/4);
+ box(win, 0, 0);
+
+ form = form_crear(win);
+ form_agregar_widget(form, INPUT, "Nombre de archivo", 30, "");
+ form_ejecutar(form, 1,1);
+
+ s = form_obtener_valor_char(form, "Nombre de archivo");
+
+ if (strlen(s) == 0) {
+ form_destruir(form);
+ return NULL;
+ }
+ t = (char *)malloc(sizeof(char*)*(strlen(s)+1));
+ strcpy(t, s);
+ form_destruir(form);
+ return t;
+}
+
projects / z.facultad / 75.06 / emufs.git / blobdiff