emufs_gui/registros.c

   1
   2 #include "registros.h"
   3 #include "idx.h"
   4 #include "articulos.h"
   5
   6 /* Se encarga de reemplazar los \0 un caracter visual, y segurar un \0 al final */
   7 static char *procesar_registro_articulo(char *ptr, EMUFS_REG_SIZE *size);
   8
   9 #define ACT 0
  10 #define ANT 1
  11 #define SIG 2
  12
  13 void ver_registros(WINDOW *padre, int w, int h)
  14 {
  15         /* Ventanas donde mostrar las cosas */
  16         WINDOW *actual[2], *ant[2], *sig[2];
  17         EMUFS_REG_SIZE size;
  18         int scroll, actual_ancho;
  19         int max_scroll, c;
  20         EMUFS_REG_ID ant_indice, total_indice; /* Indice de registro que tengo en ANT */
  21         char *data[3]; /* Registros a mostrar en pantalla */
  22         char codigo[50]; /* Variable para guardar el codigo actual para mandar a modificar */
  23         EMUFS *fp;
  24         int error;
  25         fp = emufs_abrir("articulos");
  26
  27         total_indice = emufs_idx_get_count(fp);
  28
  29         ant_indice = 0;
  30         data[ANT] = (char *)fp->leer_registro(fp, ant_indice, &size, &error);
  31         data[ANT] = procesar_registro_articulo(data[ANT], &size);
  32
  33         data[ACT] = (char *)fp->leer_registro(fp, ant_indice+1, &size, &error);
  34         data[ACT] = procesar_registro_articulo(data[ACT], &size);
  35
  36         data[SIG] = (char *)fp->leer_registro(fp, ant_indice+2, &size, &error);
  37         data[SIG] = procesar_registro_articulo(data[SIG], &size);
  38
  39         max_scroll = size / (w/3-2) - (h-8);
  40         if (max_scroll < 0) max_scroll = 0;
  41
  42         actual[0] = derwin(padre, h-6, w/3, 1, w/3);
  43         actual_ancho = w/3-2;
  44         actual[1] = derwin(actual[0], h-8, w/3-2, 1, 1);
  45         box(actual[0], 0, 0);
  46         ant[0] = derwin(padre, h-6, w/3, 1, 0);
  47         ant[1] = derwin(ant[0], h-8, w/3-2, 1, 1);
  48         box(ant[0], 0, 0);
  49         sig[0] = derwin(padre, h-6, w/3, 1, w/3*2);
  50         sig[1] = derwin(sig[0], h-8, w/3-2, 1, 1);
  51         box(sig[0], 0, 0);
  52
  53         curs_set(0);
  54         /* Pongo algunos titulos */
  55         mvwaddstr(actual[0], 0, w/6-3, "Actual");
  56         mvwaddstr(ant[0], 0, w/6-4, "Anterior");
  57         mvwaddstr(sig[0], 0, w/6-4, "Siguiente");
  58
  59         /* Info de teclas */
  60         wattron(padre, A_BOLD);
  61         wattron(padre, COLOR_PAIR(COLOR_RED));
  62         mvwaddstr(padre, h-5, 5, "Teclas :");
  63         wattroff(padre, A_BOLD);
  64         wattroff(padre, COLOR_PAIR(COLOR_RED));
  65         mvwaddstr(padre, h-4, 8, "Salir = ENTER");
  66         mvwaddstr(padre, h-3, 8, "Scroll = A/Z");
  67         mvwaddstr(padre, h-2, 8, "Mover registros = K/L");
  68         mvwaddstr(padre, h-1, 8, "Editar Actual = e");
  69
  70         /* Info de leyenda */
  71         wattron(padre, A_BOLD);
  72         wattron(padre, COLOR_PAIR(COLOR_RED));
  73         mvwaddstr(padre, h-5, 35, "Leyenda :");
  74         wattroff(padre, A_BOLD);
  75         wattroff(padre, COLOR_PAIR(COLOR_RED));
  76         mvwaddstr(padre, h-4, 38, "| = Separador de campos");
  77         mvwaddstr(padre, h-3, 38, "(XXX) = Campo numerico");
  78         mvwaddstr(padre, h-2, 38, "* = Relleno en registros fijos");
  79
  80
  81         wattron(actual[1], A_BOLD);
  82         mvwaddstr(actual[1], 0, 0, data[ACT]);
  83         wattroff(actual[1], A_BOLD);
  84
  85         mvwaddstr(sig[1], 0, 0, data[SIG]);
  86         mvwaddstr(ant[1], 0, 0, data[ANT]);
  87
  88         wrefresh(padre);
  89         scroll = 0;
  90         while ((c=getch()) != 13) {
  91                 switch (c) {
  92                         case 'e': /* Quiero editar !!! */
  93                                 sprintf(codigo, "%lu", ant_indice+1);
  94                                 art_modificar(codigo);
  95                                 /* Vuelvo a cargar el articulo actual */
  96                                 free(data[ACT]);
  97                                 data[ACT] = (char *)fp->leer_registro(fp, ant_indice+1, &size, &error);
  98                                 data[ACT] = procesar_registro_articulo(data[ACT], &size);
  99
 100                                 /* Tengo que re-pintar algunas cosas */
 101                                 box(actual[0], 0, 0);
 102                                 box(sig[0], 0, 0);
 103                                 box(ant[0], 0, 0);
 104                                 mvwaddstr(actual[0], 0, w/6-3, "Actual");
 105                                 mvwaddstr(ant[0], 0, w/6-4, "Anterior");
 106                                 mvwaddstr(sig[0], 0, w/6-4, "Siguiente");
 107                                 wrefresh(actual[0]);
 108                                 wrefresh(sig[0]);
 109                                 wrefresh(ant[0]);
 110                         break;
 111                         case 'a': /* Scroll */
 112                                 scroll--;
 113                                 if (scroll < 0) scroll = 0;
 114                         break;
 115                         case 'z': /* Scroll */
 116                                 scroll++;
 117                                 if (scroll > max_scroll) scroll = max_scroll;
 118                         case 'k': /* Desplano los registros a derecha! */
 119                                 if (ant_indice != EMUFS_NOT_FOUND) {
 120                                         if (data[ANT]) free(data[ANT]);
 121                                         if (data[ACT]) free(data[ACT]);
 122                                         if (data[SIG]) free(data[SIG]);
 123                                         ant_indice--;
 124
 125                                         data[ANT] = (char *)fp->leer_registro(fp, ant_indice, &size, &error);
 126                                         data[ANT] = procesar_registro_articulo(data[ANT], &size);
 127                                         data[ACT] = (char *)fp->leer_registro(fp, ant_indice+1, &size, &error);
 128                                         data[ACT] = procesar_registro_articulo(data[ACT], &size);
 129                                         data[SIG] = (char *)fp->leer_registro(fp, ant_indice+2, &size, &error);
 130                                         data[SIG] = procesar_registro_articulo(data[SIG], &size);
 131                                 }
 132                         break;
 133                         case 'l': /* Desplazo los registros a izquieda!! */
 134                                 if (ant_indice+1 < total_indice-1) {
 135                                         if (data[ANT]) free(data[ANT]);
 136                                         if (data[ACT]) free(data[ACT]);
 137                                         if (data[SIG]) free(data[SIG]);
 138                                         ant_indice++;
 139
 140                                         data[ANT] = (char *)fp->leer_registro(fp, ant_indice, &size, &error);
 141                                         data[ANT] = procesar_registro_articulo(data[ANT], &size);
 142                                         data[ACT] = (char *)fp->leer_registro(fp, ant_indice+1, &size, &error);
 143                                         data[ACT] = procesar_registro_articulo(data[ACT], &size);
 144                                         data[SIG] = (char *)fp->leer_registro(fp, ant_indice+2, &size, &error);
 145                                         data[SIG] = procesar_registro_articulo(data[SIG], &size);
 146                                 }
 147                 }
 148                 /* Borro las ventanas */
 149                 werase(actual[1]);
 150                 werase(sig[1]);
 151                 werase(ant[1]);
 152
 153                 /* Imprimo los registros */
 154                 wattron(actual[1], A_BOLD);
 155                 if (data[ACT]) mvwaddstr(actual[1], 0, 0, data[ACT]+actual_ancho*scroll);
 156                 wattroff(actual[1], A_BOLD);
 157                 if (data[SIG]) mvwaddstr(sig[1], 0, 0, data[SIG]);
 158                 if (data[ANT]) mvwaddstr(ant[1], 0, 0, data[ANT]);
 159
 160                 wrefresh(actual[1]);
 161                 wrefresh(sig[1]);
 162                 wrefresh(ant[1]);
 163                 wrefresh(padre);
 164         }
 165         delwin(actual[1]);
 166         delwin(ant[1]);
 167         delwin(sig[1]);
 168         delwin(actual[0]);
 169         delwin(sig[0]);
 170         delwin(ant[0]);
 171         wrefresh(padre);
 172         curs_set(1);
 173 }
 174
 175 static char *procesar_registro_articulo(char *ptr, EMUFS_REG_SIZE *size)
 176 {
 177         char *tmp, *salida, *tmp1;
 178         if (ptr == NULL) return NULL;
 179         salida = (char *)malloc((*size)-sizeof(unsigned int)+11);
 180         sprintf(salida, "(%08d)", *((unsigned int *)ptr));
 181         tmp1 = salida+10;
 182         tmp = ptr+sizeof(unsigned int);
 183         while (tmp < (ptr + (*size))) {
 184                 if (*tmp == '\0') {
 185                         (*tmp1) = '|';
 186                 } else {
 187                         (*tmp1) = (*tmp);
 188                 }
 189                 tmp++;
 190                 tmp1++;
 191         }
 192         free(ptr);
 193         (*tmp1) = '\0';
 194         (*size) = (*size)-sizeof(unsigned int)+11;
 195         return salida;
 196 }
 197