X-Git-Url: https://git.llucax.com/z.facultad/75.06/emufs.git/blobdiff_plain/f68323b8913e191679584b23568aa162760bbd64..3f9973797bd5e6552493d2c2c4e1b94b23f9a636:/emufs_gui/registros.c?ds=sidebyside

diff --git a/emufs_gui/registros.c b/emufs_gui/registros.c
index 778f52d..2ec0871 100644
--- a/emufs_gui/registros.c
+++ b/emufs_gui/registros.c
@@ -1,53 +1,192 @@
 
 #include "registros.h"
+#include "idx.h"
+#include "articulos.h"
+
+/* Se encarga de reemplazar los \0 un caracter visual, y segurar un \0 al final */
+static char *procesar_registro_articulo(char *ptr, EMUFS_REG_SIZE *size);
+
+#define ACT 0
+#define ANT 1
+#define SIG 2
 
 void ver_registros(WINDOW *padre, int w, int h)
 {
 	/* Ventanas donde mostrar las cosas */
-	WINDOW *actual, *ant, *sig;
-	int c;
-	char *reg = "asdlñnfajfnsadlkñfnasdlfñnasdlfasnñas oin2o4nr hf	 hfh 	1ehjr 093r 3908rhj 0e98fj 2	0rj 9fj 2	rh 0hf	20rh 0 fh	230rh	 8y f128n r`0vnew 80fh 4+9vj ¡9023j f'49j ¡09yuf 3'vkj'9 f294ug 0r \
-					13i qe \
-					hjwgi`rg`hjg0934jgt 39gu ¡q9gj 3¡9gu ¡q09gj ¡95gj hj9g 35+9'gj 0¡39g 5¡09 3q0¡h j1111111111111111111111111111111111111111111111111\
-					2222222222222222222222222222222222222222222222222222222222222222222222222222222222\
-					333333333333333333333333333333333333333333333333333333333333333333333333333333333333\
-					44444444444444444444444444444444444444444444444444444444444444444444444444444444444444\
-					555555555555555555555555555555555555555555555555555555555555555555555555555555555555\
-					66666666666666666666666666666666666666666666666666666666666";
-
-	actual = derwin(padre, h-2, w/3, 1, w/3);
-	box(actual, 0, 0);
-	ant = derwin(padre, h-2, w/3, 1, 0);
-	box(ant, 0, 0);
-	sig = derwin(padre, h-2, w/3, 1, w/3*2);
-	box(sig, 0, 0);
-
-	wattron(actual, A_BOLD);
-	mvwaddstr(actual, 1, 1, reg);
-	wattroff(actual, A_BOLD);
+	WINDOW *actual[2], *ant[2], *sig[2];
+	EMUFS_REG_SIZE size;
+	int scroll, actual_ancho;
+	int max_scroll, c;
+	EMUFS_REG_ID ant_indice, total_indice; /* Indice de registro que tengo en ANT */
+	char *data[3]; /* Registros a mostrar en pantalla */
+	char codigo[50]; /* Variable para guardar el codigo actual para mandar a modificar */
+	EMUFS *fp;
+	int error;
+	fp = emufs_abrir("articulos");
+
+	total_indice = emufs_idx_get_count(fp);
+
+	ant_indice = 0;
+	data[ANT] = (char *)fp->leer_registro(fp, ant_indice, &size, &error);
+	data[ANT] = procesar_registro_articulo(data[ANT], &size);
+	
+	data[ACT] = (char *)fp->leer_registro(fp, ant_indice+1, &size, &error);
+	data[ACT] = procesar_registro_articulo(data[ACT], &size);
+	
+	data[SIG] = (char *)fp->leer_registro(fp, ant_indice+2, &size, &error);
+	data[SIG] = procesar_registro_articulo(data[SIG], &size);
+
+	max_scroll = size / (w/3-2) - (h-7);
+	if (max_scroll < 0) max_scroll = 0;
+
+	actual[0] = derwin(padre, h-5, w/3, 1, w/3);
+	actual_ancho = w/3-2;
+	actual[1] = derwin(actual[0], h-7, w/3-2, 1, 1);
+	box(actual[0], 0, 0);
+	ant[0] = derwin(padre, h-5, w/3, 1, 0);
+	ant[1] = derwin(ant[0], h-7, w/3-2, 1, 1);
+	box(ant[0], 0, 0);
+	sig[0] = derwin(padre, h-5, w/3, 1, w/3*2);
+	sig[1] = derwin(sig[0], h-7, w/3-2, 1, 1);
+	box(sig[0], 0, 0);
+
+	curs_set(0);
+	/* Pongo algunos titulos */
+	mvwaddstr(actual[0], 0, w/6-3, "Actual");
+	mvwaddstr(ant[0], 0, w/6-4, "Anterior");
+	mvwaddstr(sig[0], 0, w/6-4, "Siguiente");
+
+	/* Info de teclas */
+	wattron(padre, A_BOLD);
+	wattron(padre, COLOR_PAIR(COLOR_RED));
+	mvwaddstr(padre, h-4, 5, "Teclas :");
+	wattroff(padre, A_BOLD);
+	wattroff(padre, COLOR_PAIR(COLOR_RED));
+	mvwaddstr(padre, h-3, 8, "Salir = ENTER");
+	mvwaddstr(padre, h-2, 8, "Scroll = A/Z");
+	mvwaddstr(padre, h-1, 8, "Mover registros = K/L");
+	
+	/* Info de leyenda */
+	wattron(padre, A_BOLD);
+	wattron(padre, COLOR_PAIR(COLOR_RED));
+	mvwaddstr(padre, h-4, 35, "Leyenda :");
+	wattroff(padre, A_BOLD);
+	wattroff(padre, COLOR_PAIR(COLOR_RED));
+	mvwaddstr(padre, h-3, 38, "| = Separador de campos");
+	mvwaddstr(padre, h-2, 38, "(XXX) = Campo numerico");
+	mvwaddstr(padre, h-1, 38, "* = Relleno en registros fijos");
+	
+	
+	wattron(actual[1], A_BOLD);
+	mvwaddstr(actual[1], 0, 0, data[ACT]);
+	wattroff(actual[1], A_BOLD);
+	
+	mvwaddstr(sig[1], 0, 0, data[SIG]);
+	mvwaddstr(ant[1], 0, 0, data[ANT]);
 	
-	wrefresh(sig);
-	wrefresh(ant);
-	wrefresh(actual);
 	wrefresh(padre);
-	scrollok(actual, 1);
+	scroll = 0;
 	while ((c=getch()) != 13) {
 		switch (c) {
-			case 'a':
-				wscrl(actual, -1);
+			case 'e': /* Quiero editar !!! */
+				sprintf(codigo, "%lu", ant_indice+1);
+				fprintf(stderr, "%s", codigo);
+				art_modificar(codigo);	
+				/* Tengo que re-pintar algunas cosas */
+				box(actual[0], 0, 0);
+				box(sig[0], 0, 0);
+				box(ant[0], 0, 0);
+				mvwaddstr(actual[0], 0, w/6-3, "Actual");
+				mvwaddstr(ant[0], 0, w/6-4, "Anterior");
+				mvwaddstr(sig[0], 0, w/6-4, "Siguiente");
+				wrefresh(actual[0]);
+				wrefresh(sig[0]);
+				wrefresh(ant[0]);
+			break;
+			case 'a': /* Scroll */
+				scroll--;
+				if (scroll < 0) scroll = 0;
+			break;
+			case 'z': /* Scroll */
+				scroll++;
+				if (scroll > max_scroll) scroll = max_scroll;
+			case 'k': /* Desplano los registros a derecha! */
+				if (ant_indice != EMUFS_NOT_FOUND) {
+					if (data[ANT]) free(data[ANT]);
+					if (data[ACT]) free(data[ACT]);
+					if (data[SIG]) free(data[SIG]);
+					ant_indice--;
+
+					data[ANT] = (char *)fp->leer_registro(fp, ant_indice, &size, &error);
+					data[ANT] = procesar_registro_articulo(data[ANT], &size);
+					data[ACT] = (char *)fp->leer_registro(fp, ant_indice+1, &size, &error);
+					data[ACT] = procesar_registro_articulo(data[ACT], &size);
+					data[SIG] = (char *)fp->leer_registro(fp, ant_indice+2, &size, &error);
+					data[SIG] = procesar_registro_articulo(data[SIG], &size);
+				}
 			break;
-			case 'z':
-				wscrl(actual, 1);
+			case 'l': /* Desplazo los registros a izquieda!! */
+				if (ant_indice+1 < total_indice-1) {
+					if (data[ANT]) free(data[ANT]);
+					if (data[ACT]) free(data[ACT]);
+					if (data[SIG]) free(data[SIG]);
+					ant_indice++;
+
+					data[ANT] = (char *)fp->leer_registro(fp, ant_indice, &size, &error);
+					data[ANT] = procesar_registro_articulo(data[ANT], &size);
+					data[ACT] = (char *)fp->leer_registro(fp, ant_indice+1, &size, &error);
+					data[ACT] = procesar_registro_articulo(data[ACT], &size);
+					data[SIG] = (char *)fp->leer_registro(fp, ant_indice+2, &size, &error);
+					data[SIG] = procesar_registro_articulo(data[SIG], &size);
+				}
 		}
-		wrefresh(actual);
+		/* Borro las ventanas */
+		werase(actual[1]);
+		werase(sig[1]);
+		werase(ant[1]);
+
+		/* Imprimo los registros */
+		wattron(actual[1], A_BOLD);
+		if (data[ACT]) mvwaddstr(actual[1], 0, 0, data[ACT]+actual_ancho*scroll);
+		wattroff(actual[1], A_BOLD);
+		if (data[SIG]) mvwaddstr(sig[1], 0, 0, data[SIG]);
+		if (data[ANT]) mvwaddstr(ant[1], 0, 0, data[ANT]);
+
+		wrefresh(actual[1]);
+		wrefresh(sig[1]);
+		wrefresh(ant[1]);
 		wrefresh(padre);
 	}
-	werase(actual);
-	delwin(actual);
-	werase(sig);
-	delwin(sig);
-	werase(ant);
-	delwin(ant);
+	delwin(actual[1]);
+	delwin(ant[1]);
+	delwin(sig[1]);
+	delwin(actual[0]);
+	delwin(sig[0]);
+	delwin(ant[0]);
 	wrefresh(padre);
+	curs_set(1);
+}
+
+static char *procesar_registro_articulo(char *ptr, EMUFS_REG_SIZE *size)
+{
+	char *tmp, *salida, *tmp1;
+	if (ptr == NULL) return NULL;
+	salida = (char *)malloc((*size)-sizeof(unsigned int)+11);
+	sprintf(salida, "(%08d)", *((unsigned int *)ptr));
+	tmp1 = salida+10;
+	tmp = ptr+sizeof(unsigned int);
+	while (tmp < (ptr + (*size))) {
+		if (*tmp == '\0') {
+			(*tmp1) = '|';
+		} else {
+			(*tmp1) = (*tmp);
+		}
+		tmp++;
+		tmp1++;
+	}
+	free(ptr);
+	(*tmp1) = '\0';
+	(*size) = (*size)-sizeof(unsigned int)+11;
+	return salida;
 }