* Se agregan leyendas a "Ver Registro" para que sea mas facil adivinar

[z.facultad/75.06/emufs.git] / emufs_gui / registros.c

diff --git a/emufs_gui/registros.c b/emufs_gui/registros.c
index 778f52dc429e92f68e6a50bd6788b07e2d22e6d2..bb8194cc3bfbe484724cfa73813b656133ae6b7c 100644 (file)
--- a/emufs_gui/registros.c
+++ b/emufs_gui/registros.c
@@ -1,53 +1,175 @@
 
 #include "registros.h"
 
 #include "registros.h"

+#include "idx.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 */
 
 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];
+       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);
        wrefresh(padre);

-       scrollok(actual, 1);
+       scroll = 0;

        while ((c=getch()) != 13) {
                switch (c) {
                        case 'a':
        while ((c=getch()) != 13) {
                switch (c) {
                        case 'a':

-                               wscrl(actual, -1);
+                               scroll--;
+                               if (scroll < 0) scroll = 0;

                        break;
                        case 'z':
                        break;
                        case 'z':

-                               wscrl(actual, 1);
+                               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 '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);
        }
                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);
        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;

 }
 
 }