emufs_gui/registros.c

   1
   2 #include "registros.h"
   3 #include "idx.h"
   4
   5 /* Se encarga de reemplazar los \0 un caracter visual, y segurar un \0 al final */
   6 static char *procesar_registro(char *ptr, EMUFS_REG_SIZE *size);
   7
   8 #define ACT 0
   9 #define ANT 1
  10 #define SIG 2
  11
  12 void ver_registros(WINDOW *padre, int w, int h)
  13 {
  14         /* Ventanas donde mostrar las cosas */
  15         WINDOW *actual[2], *ant[2], *sig[2];
  16         EMUFS_REG_SIZE size;
  17         int scroll, actual_ancho;
  18         int max_scroll, c;
  19         EMUFS_REG_ID ant_indice, total_indice; /* Indice de registro que tengo en ANT */
  20         char *data[3];
  21         EMUFS *fp;
  22         int error;
  23         fp = emufs_abrir("articulos");
  24
  25         total_indice = emufs_idx_get_count(fp);
  26
  27         ant_indice = 0;
  28         data[ANT] = (char *)fp->leer_registro(fp, ant_indice, &size, &error);
  29         data[ANT] = procesar_registro(data[ANT], &size);
  30
  31         data[ACT] = (char *)fp->leer_registro(fp, ant_indice+1, &size, &error);
  32         data[ACT] = procesar_registro(data[ACT], &size);
  33
  34         data[SIG] = (char *)fp->leer_registro(fp, ant_indice+2, &size, &error);
  35         data[SIG] = procesar_registro(data[SIG], &size);
  36
  37         max_scroll = size / (w/3-2) - (h-4);
  38         if (max_scroll < 0) max_scroll = 0;
  39
  40         actual[0] = derwin(padre, h-2, w/3, 1, w/3);
  41         actual_ancho = w/3-2;
  42         actual[1] = derwin(actual[0], h-4, w/3-2, 1, 1);
  43         box(actual[0], 0, 0);
  44         ant[0] = derwin(padre, h-2, w/3, 1, 0);
  45         ant[1] = derwin(ant[0], h-4, w/3-2, 1, 1);
  46         box(ant[0], 0, 0);
  47         sig[0] = derwin(padre, h-2, w/3, 1, w/3*2);
  48         sig[1] = derwin(sig[0], h-4, w/3-2, 1, 1);
  49         box(sig[0], 0, 0);
  50
  51         wattron(actual[1], A_BOLD);
  52         mvwaddstr(actual[1], 0, 0, data[ACT]);
  53         wattroff(actual[1], A_BOLD);
  54
  55         mvwaddstr(sig[1], 0, 0, data[SIG]);
  56         mvwaddstr(ant[1], 0, 0, data[ANT]);
  57
  58         wrefresh(sig[0]);
  59         wrefresh(ant[0]);
  60         wrefresh(actual[0]);
  61         wrefresh(actual[1]);
  62         wrefresh(padre);
  63         scroll = 0;
  64         while ((c=getch()) != 13) {
  65                 switch (c) {
  66                         case 'a':
  67                                 scroll--;
  68                                 if (scroll < 0) scroll = 0;
  69                         break;
  70                         case 'z':
  71                                 scroll++;
  72                                 if (scroll > max_scroll) scroll = max_scroll;
  73                         case 'k': /* Desplano los registros a derecha! */
  74                                 if (ant_indice != EMUFS_NOT_FOUND) {
  75                                         if (data[ANT]) free(data[ANT]);
  76                                         if (data[ACT]) free(data[ACT]);
  77                                         if (data[SIG]) free(data[SIG]);
  78                                         ant_indice--;
  79
  80                                         data[ANT] = (char *)fp->leer_registro(fp, ant_indice, &size, &error);
  81                                         data[ANT] = procesar_registro(data[ANT], &size);
  82                                         data[ACT] = (char *)fp->leer_registro(fp, ant_indice+1, &size, &error);
  83                                         data[ACT] = procesar_registro(data[ACT], &size);
  84                                         data[SIG] = (char *)fp->leer_registro(fp, ant_indice+2, &size, &error);
  85                                         data[SIG] = procesar_registro(data[SIG], &size);
  86                                 }
  87                         break;
  88                         case 'l': /* Desplazo los registros a izquieda!! */
  89                                 if (ant_indice+1 < total_indice-1) {
  90                                         if (data[ANT]) free(data[ANT]);
  91                                         if (data[ACT]) free(data[ACT]);
  92                                         if (data[SIG]) free(data[SIG]);
  93                                         ant_indice++;
  94
  95                                         data[ANT] = (char *)fp->leer_registro(fp, ant_indice, &size, &error);
  96                                         data[ANT] = procesar_registro(data[ANT], &size);
  97                                         data[ACT] = (char *)fp->leer_registro(fp, ant_indice+1, &size, &error);
  98                                         data[ACT] = procesar_registro(data[ACT], &size);
  99                                         data[SIG] = (char *)fp->leer_registro(fp, ant_indice+2, &size, &error);
 100                                         data[SIG] = procesar_registro(data[SIG], &size);
 101                                 }
 102                 }
 103                 /* Borro las ventanas */
 104                 werase(actual[1]);
 105                 werase(sig[1]);
 106                 werase(ant[1]);
 107
 108                 /* Imprimo los registros */
 109                 wattron(actual[1], A_BOLD);
 110                 if (data[ACT]) mvwaddstr(actual[1], 0, 0, data[ACT]+actual_ancho*scroll);
 111                 wattroff(actual[1], A_BOLD);
 112                 if (data[SIG]) mvwaddstr(sig[1], 0, 0, data[SIG]);
 113                 if (data[ANT]) mvwaddstr(ant[1], 0, 0, data[ANT]);
 114
 115                 /* Refrescos para todos!! */
 116                 wrefresh(sig[1]);
 117                 wrefresh(ant[1]);
 118                 wrefresh(actual[1]);
 119                 wrefresh(actual[0]);
 120                 wrefresh(padre);
 121         }
 122         werase(actual[1]);
 123         delwin(actual[1]);
 124         werase(actual[0]);
 125         delwin(actual[0]);
 126         delwin(ant[1]);
 127         delwin(sig[1]);
 128         werase(sig[0]);
 129         delwin(sig[0]);
 130         werase(ant[0]);
 131         delwin(ant[0]);
 132         wrefresh(padre);
 133 }
 134
 135 static char *procesar_registro(char *ptr, EMUFS_REG_SIZE *size)
 136 {
 137         char *tmp, *salida, *tmp1;
 138         if (ptr == NULL) return NULL;
 139         salida = (char *)malloc((*size)-sizeof(unsigned int)+11);
 140         sprintf(salida, "(%08d)", *((unsigned int *)ptr));
 141         tmp1 = salida+10;
 142         tmp = ptr+sizeof(unsigned int);
 143         while (tmp < (ptr + (*size))) {
 144                 if (*tmp == '\0') {
 145                         (*tmp1) = '|';
 146                 } else {
 147                         (*tmp1) = (*tmp);
 148                 }
 149                 tmp++;
 150                 tmp1++;
 151         }
 152         free(ptr);
 153         (*tmp1) = '\0';
 154         (*size) = (*size)-sizeof(unsigned int)+11;
 155         return salida;
 156 }
 157