* BUGFIX : En ver bloques la funcion que juntaba memoria estaba para el orto.

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

diff --git a/emufs_gui/viewer.c b/emufs_gui/viewer.c
index 1b4c5419f0f50e3f1000b5a6e3d154d1670feacb..8905fa3aa9cc01bf1cf507e1b0bf4a90bab3f48b 100644 (file)
--- a/emufs_gui/viewer.c
+++ b/emufs_gui/viewer.c
@@ -4,6 +4,7 @@
 #include "articulos.h"
 #include "facturas.h"
 #include "gui.h"
+#include "common.h"
 
 /* Se encarga de reemplazar los \0 un caracter visual, y segurar un \0 al final */
 static char *procesar_registro_articulo_tipo3(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *size, int *pos_actual, int *ancho);
@@ -14,7 +15,7 @@ static char *procesar_registro_factura_tipo1(EMUFS *emu, char *ptr, EMUFS_REG_SI
 
 static int preguntar_id(WINDOW *win, EMUFS *fp);
 
-void mostrar_info(WINDOW *padre, int h, int offset_alto)
+void mostrar_info(WINDOW *padre, int h, int offset_alto, int opt)
 {
        /* Info de teclas */
        wattron(padre, A_BOLD);
@@ -25,20 +26,22 @@ void mostrar_info(WINDOW *padre, int h, int offset_alto)
        mvwaddstr(padre, h-offset_alto+2, 8, "Salir = ENTER");
        mvwaddstr(padre, h-offset_alto+3, 8, "Scroll = A/Z");
        mvwaddstr(padre, h-offset_alto+4, 8, "Seleccionar registros = K/L");
-       mvwaddstr(padre, h-offset_alto+5, 8, "Acciones: ");
-       waddstr(padre, "A");
-       wattron(padre, A_BOLD);
-       waddch(padre, 'g');
-       wattroff(padre, A_BOLD);
-       waddstr(padre, "regar ");
-       wattron(padre, A_BOLD);
-       waddstr(padre, "M");
-       wattroff(padre, A_BOLD);
-       waddstr(padre, "ofidicar ");
-       wattron(padre, A_BOLD);
-       waddstr(padre, "E");
-       wattroff(padre, A_BOLD);
-       waddstr(padre, "liminar ");
+       if (opt) {
+               mvwaddstr(padre, h-offset_alto+5, 8, "Acciones: ");
+               waddstr(padre, "A");
+               wattron(padre, A_BOLD);
+               waddch(padre, 'g');
+               wattroff(padre, A_BOLD);
+               waddstr(padre, "regar ");
+               wattron(padre, A_BOLD);
+               waddstr(padre, "M");
+               wattroff(padre, A_BOLD);
+               waddstr(padre, "ofidicar ");
+               wattron(padre, A_BOLD);
+               waddstr(padre, "E");
+               wattroff(padre, A_BOLD);
+               waddstr(padre, "liminar ");
+       }
        mvwaddstr(padre, h-offset_alto+6, 8, "Buscar ID : B");
        
        /* Info de leyenda */
@@ -52,7 +55,6 @@ void mostrar_info(WINDOW *padre, int h, int offset_alto)
        mvwaddstr(padre, h-offset_alto+4, 48, "(XXX) = ID de registro");
        mvwaddstr(padre, h-offset_alto+5, 48, "{XXX} = Tam. de registro");
        mvwaddstr(padre, h-offset_alto+6, 48, "  .   = Esp. Libre");
-       mvwaddstr(padre, h-offset_alto+7, 48, " < >  = Separador Bloques");
 }
 
 char *juntar_memoria(char *s1, char *s2, char *s3, int size1, int size2, int size3)
@@ -70,9 +72,9 @@ char *juntar_memoria(char *s1, char *s2, char *s3, int size1, int size2, int siz
                        return NULL;
        }
 
-       if (s1) memcpy(salida, s1, size1);
-       if (s2) memcpy(salida+size2, s2, size2);
-       if (s3) memcpy(salida+size2+size3, s3, size3);
+       if (s1) memcpy(salida, s1, size1); else size1 = 0;
+       if (s2) memcpy(salida+size1, s2, size2); else size2 = 0;
+       if (s3) memcpy(salida+size1+size2, s3, size3);
        if (s1) free(s1);
        if (s2) free(s2);
        if (s3) free(s3);
@@ -165,7 +167,7 @@ void ver_bloques(WINDOW *padre, int w, int h, int cual)
 
        curs_set(0);
 
-       mostrar_info(padre, h, offset_alto);
+       mostrar_info(padre, h, offset_alto, 0);
        
        mvwaddnstr(actual[1], 0, 0, data, pos_actual);
        wattron(actual[1], A_BOLD);
@@ -183,7 +185,9 @@ void ver_bloques(WINDOW *padre, int w, int h, int cual)
                        case 'B':
                                dlg = newwin(4, 50, h/2-2, w/2-25);
                                box(dlg, 0, 0);
-                               preguntar_id(dlg, fp);
+                               indices_actual = preguntar_id(dlg, fp);
+                               if (indices_actual < 0) indices_actual = 0;
+                               if (indices_actual > indices_total) indices_actual = indices_total-1;
                                werase(dlg);
                                wrefresh(dlg);
                                delwin(dlg);
@@ -281,15 +285,13 @@ void ver_registros(WINDOW *padre, int w, int h, int cual)
        wattroff(padre, COLOR_PAIR(COLOR_BLUE));
        switch (fp->tipo) {
                case T1:
+               case T2:
                        waddstr(padre, "Registro variable con bloque parametrizado.");
                        if (cual == 0)
                                procesar = procesar_registro_articulo_tipo1;
                        else
                                procesar = procesar_registro_factura_tipo1;
                break;
-               case T2:
-                       waddstr(padre, "Registro variable sin bloques.");
-               break;
                case T3:
                        if (cual == 0)
                                procesar = procesar_registro_articulo_tipo3;
@@ -318,13 +320,15 @@ void ver_registros(WINDOW *padre, int w, int h, int cual)
 
        curs_set(0);
 
-       mostrar_info(padre, h, offset_alto);
-       
-       mvwaddnstr(actual[1], 0, 0, data, pos_actual);
-       wattron(actual[1], A_BOLD);
-       waddnstr(actual[1], data+pos_actual, ancho_registro);
-       wattroff(actual[1], A_BOLD);
-       waddnstr(actual[1], data+pos_actual+ancho_registro, size-(pos_actual+ancho_registro));
+       mostrar_info(padre, h, offset_alto, 1);
+
+       if (data) {
+               mvwaddnstr(actual[1], 0, 0, data, pos_actual);
+               wattron(actual[1], A_BOLD);
+               waddnstr(actual[1], data+pos_actual, ancho_registro);
+               wattroff(actual[1], A_BOLD);
+               waddnstr(actual[1], data+pos_actual+ancho_registro, size-(pos_actual+ancho_registro));
+       }
        
        wrefresh(actual[1]);
        wrefresh(actual[0]);
@@ -371,7 +375,7 @@ void ver_registros(WINDOW *padre, int w, int h, int cual)
                                indices = emufs_idx_get(fp, &indices_total);
 
                                /* Tengo que re-pintar algunas cosas */
-                               mostrar_info(padre, h, offset_alto);
+                               mostrar_info(padre, h, offset_alto, 1);
                                box(actual[0], 0, 0);
                                wrefresh(actual[0]);
                        break;                  
@@ -389,7 +393,7 @@ void ver_registros(WINDOW *padre, int w, int h, int cual)
                                data = procesar(fp, data, &size, &pos_actual, &ancho_registro);
 
                                /* Tengo que re-pintar algunas cosas */
-                               mostrar_info(padre, h, offset_alto);
+                               mostrar_info(padre, h, offset_alto, 1);
                                box(actual[0], 0, 0);
                                wrefresh(actual[0]);
                        break;
@@ -523,7 +527,7 @@ char *procesar_registro_articulo_tipo3(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *si
                (*ancho) = (*size);
        }
        memset(tmp1, '.', (*size)-(tmp1-salida)); 
-       salida[*size-1] = '\0';
+       salida[*size-2] = '\0';
 
        return salida;
 }
@@ -609,35 +613,23 @@ char *procesar_registro_articulo_tipo1(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *si
        (*size) = (*size)-sizeof(unsigned int)*cant_header*3+3*cant_header*10+1;
        memset(tmp1, '.', (*size)-(tmp1-salida)); 
        free(ptr);
-       salida[*size-1] = '\0';
+       salida[*size-2] = '\0';
        
        return salida;
 }
 
 int preguntar_id(WINDOW *win, EMUFS *fp)
 {
-       int n=-1, j=0;
+       int n=-1;
        t_Form *form = form_crear(win);
        form_agregar_widget(form, INPUT, "ID a buscar", 8, "");
 
        do {
-               if (j != 0) {
-                       curs_set(0);
-                       wattron(win, COLOR_PAIR(COLOR_YELLOW));
-                       wattron(win, A_BOLD);
-                       mvwaddstr(win, 2, 1, "Registro no encontrado!!");
-                       wattroff(win, A_BOLD);
-                       wattroff(win, COLOR_PAIR(COLOR_YELLOW));
-                       wrefresh(win);
-                       getch();
-                       werase(win);
-                       box(win, 0, 0);
-               }
+               form_set_valor(form, "ID a buscar", "");
                form_ejecutar(form, 1,1);
 
                n = form_obtener_valor_int(form, "ID a buscar");
-               j = 1;
-       } while (emufs_idx_existe_id(fp, n) != 0);
+       } while (n>0);
 
        form_destruir(form);
        return n;