#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;
}
projects / z.facultad / 75.06 / emufs.git / blobdiff