X-Git-Url: https://git.llucax.com/z.facultad/75.06/emufs.git/blobdiff_plain/fe7cadabd775ddd59714749b7dfe31a578c6ecca..a559d9c266c7120220093b1e918a2473a62eccb0:/emufs_gui/emufs_view.c?ds=sidebyside

diff --git a/emufs_gui/emufs_view.c b/emufs_gui/emufs_view.c
index be6bb29..98acbe8 100644
--- a/emufs_gui/emufs_view.c
+++ b/emufs_gui/emufs_view.c
@@ -26,8 +26,8 @@ void menu_mantenimiento();
 void menu_estadisticas();
 void menu_ver_registros();
 void menu_ver_bloques();
+void menu_ver_indices();
 void preguntar_nuevo_tipo(const char *title, int *tipo, int *tam_bloque, int *tam_reg);
-char *preguntar_file();
 
 void ver_estadisticas(EMUFS *fp);
 
@@ -44,23 +44,15 @@ typedef enum {
 
 void print_help(char *s)
 {
-	printf("EMUFS - 1v0\n");
-	printf("Modo de uso :%s -a <archivo XML> tipo -f <archivo XML> tipo [tam_bloque] tipo_n [tam_bloque_n]\n", s);
-	printf("  -f indica que lo que está a continuación seran los datos para generar el archivo de facturas.\n");
-	printf("     tipo_n == Tipo de archivo para el archivo de notas\n");
-	printf("     tam_bloque_n == Tamaño de bloque para el archivo de notas (si corresponde)\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");
+	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, "B*") == 0) return 1;
-	if (strcmp(s, "B+") == 0) return 2;
+	if (strcmp(s, "BA") == 0) return 1;
 
 	/* Por defecto es un B */
 	return 0;
@@ -73,32 +65,37 @@ void leer_param_ind_art(t_Parametros *param, xmlNode *padre)
 	node = padre->children;
 	while (node) {
 		if (node->type == XML_ELEMENT_NODE) {
-			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")) {
-				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);
+			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);
+				}
+				PERR("  LISTO");
+				free(nombre);
 			}
-			free(nombre);
 		}
+		node = node->next;
 	}
 }
 
@@ -109,25 +106,51 @@ void leer_param_ind_fact(t_Parametros *param, xmlNode *padre)
 	node = padre->children;
 	while (node) {
 		if (node->type == XML_ELEMENT_NODE) {
-			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);
+			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);
+				}
+				PERR("  LISTO");
+				free(nombre);
 			}
-			free(nombre);
 		}
+		node = node->next;
 	}
 }
 
@@ -147,8 +170,10 @@ void leer_param_art(t_Parametros *param, xmlNode *padre)
 				tmp = xml_get_prop(node, "bloque");
 				param->tam_bloque_art = atoi(tmp);
 				free(tmp);
-			} else if (strcmp(node->name, "indices")) {
+			} else if (strcmp(node->name, "indices")==0) {
+				PERR("LEO INDICES")
 				leer_param_ind_art(param, node);
+				PERR("LISTO");
 			}
 		}
 		node = node->next;
@@ -178,6 +203,10 @@ void leer_param_fac(t_Parametros *param, xmlNode *padre)
 				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;
@@ -226,16 +255,66 @@ void param_xml(char *s, t_Parametros *param)
 	}
 }
 
+static t_Parametros parametros;
+
 int main(int argc, char *argv[])
 {
 	WINDOW *dialog;
-	t_Parametros parametros;
 
-	if (argc != 2) {
+	if (argc > 2) {
 		print_help(argv[0]);
+		exit(0);
+	}
+
+	if (argc == 2) {
+		if (strcmp(argv[1], "-h")==0) {
+			print_help(argv[0]);
+			exit(0);
+		}
+		param_xml(argv[1], &parametros);
+
+		/* 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);
+		}
 	}
-	
-	param_xml(argv[1], &parametros);
 
 #ifdef DEBUG
 	printf("CUIDADO! - Uds esta a punto de ejecutar EMUFS Gui compilado con mensajes de debug (-DDEBUG). ");
@@ -287,18 +366,15 @@ int main(int argc, char *argv[])
 	attroff(COLOR_PAIR(2));
 	wrefresh(stdscr);
 
-	dialog = msg_box(stdscr, COLS, LINES, "Generando archivos ...");
-
-/*	if (parametros.xml_art != -1) {*/
+	if (argc == 2) {
+		dialog = msg_box(stdscr, COLS, LINES, "Generando archivos ...");
 		art_cargar(&parametros);
-/*	} else {
-		art_cargar(NULL);
-	}
-	if (parametros.xml_fact != -1) {*/
 		fact_cargar(&parametros);
-/*	} else {
+	} else {
+		dialog = msg_box(stdscr, COLS, LINES, "Recuperando archivos ...");
+		art_cargar(NULL);
 		fact_cargar(NULL);
-	}*/
+	}
 
 	msg_box_free(stdscr, dialog);
 
@@ -319,11 +395,12 @@ void menu_facturas()
 		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, 5, "Menu Articulos")) != 4) {
+	while ((opt = menu_ejecutar(mi_menu, 6, "Menu Facturas")) != 5) {
 		switch (opt) {
 			case 0:
 				fact_agregar(NULL);
@@ -333,8 +410,12 @@ void menu_facturas()
 			break;
 			case 2:
 				fact_modificar(NULL);
+			break;
 			case 3:
 				fact_consultas(NULL);
+			break;
+			case 4:
+				fact_recorrer();
 		}
 	}
 }
@@ -346,11 +427,13 @@ void menu_articulos()
 		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, 5, "Menu Articulos")) != 4) {
+	while ((opt = menu_ejecutar(mi_menu, 7, "Menu Articulos")) != 6) {
 		switch (opt) {
 			case 0:
 				art_agregar(NULL);
@@ -363,6 +446,12 @@ void menu_articulos()
 			break;
 			case 3:
 				art_consultas(NULL);
+			break;
+			case 4:
+				art_recorrer();
+			break;
+			case 5:
+				art_ver_ventas();
 		}
 	}
 
@@ -453,10 +542,61 @@ void menu_ver_bloques()
 	}
 }
 
-int main_menu()
+void ver_indice(int arch, char *indice)
 {
-	int c, w, h;
+	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."),
@@ -464,7 +604,7 @@ int main_menu()
 		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("DEBUG", "Debug de Arbol B"),
+		MENU_OPCION("Ver Indices", "Permite ver y recorrer los indices"),
 		MENU_OPCION("Salir", "Salir del sistema.")
 	};
 
@@ -489,11 +629,7 @@ int main_menu()
 				menu_mantenimiento();
 			break;
 			case 6:
-				h = LINES-2;
-				w = COLS-2;
-				win = newwin(h, w, 1, 1);
-				emufs_indice_b_ver(art_get_lst()->fp->indices, win, w, h, 0);
-				delwin(win);
+				menu_ver_indices();
 		}
 	}
 
@@ -578,7 +714,9 @@ void menu_mantenimiento()
 				nuevo_tam_registro = -1; /* No permito cambiar el tamaño de 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(&parametros);
 				msg_box_free(stdscr, dlg);
 			break;
 			case 4:
@@ -624,13 +762,15 @@ void preguntar_nuevo_tipo(const char *title, int *tipo, int *tam_bloque, int *ta
 
 	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", 3, "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);
 
@@ -678,6 +818,19 @@ void preguntar_nuevo_tipo(const char *title, int *tipo, int *tam_bloque, int *ta
 			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);
@@ -838,3 +991,4 @@ char *preguntar_file()
 	form_destruir(form);
 	return t;
 }
+