* Ver Registros muestra el primer registro de articulos en pantalla (con scrol!...

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

diff --git a/emufs_gui/articulos.c b/emufs_gui/articulos.c
index ed3c922c503caa9c5505491f33088a57d5109a46..51f2b1b17fbefb45ea9c0fb3b99e8b30282a07c0 100644 (file)
--- a/emufs_gui/articulos.c
+++ b/emufs_gui/articulos.c
@@ -1,32 +1,79 @@
 
 #include "articulos.h"
 
 #include "articulos.h"

+#include "idx.h"

 
 static t_LstArticulos *lst_articulos;
 
 static t_Articulo *art_form_buscar(WINDOW *win);
 
 
 static t_LstArticulos *lst_articulos;
 
 static t_Articulo *art_form_buscar(WINDOW *win);
 

-static void *procesar_guardar_articulo(t_Articulo *src, int *size, t_LstArticulos *lst);
-static int procesar_leer_articulo(t_Articulo *dst, void *src, int size, t_LstArticulos *lst);
+static void *procesar_guardar_articulo(t_Articulo *src, EMUFS_REG_SIZE *size, t_LstArticulos *lst);
+static int procesar_leer_articulo(t_Articulo *dst, void *src, EMUFS_REG_SIZE size, t_LstArticulos *lst);
+
+/* Manejo de la lista doble */
+static t_Reg_Articulo *crear_nodo_articulo(EMUFS_REG_ID reg, unsigned int num);
+static int agregar_nodo_articulo(t_LstArticulos *lst, t_Reg_Articulo *nodo);
+static int eliminar_nodo_articulo(t_LstArticulos *lst, t_Reg_Articulo *nodo);
+
+int eliminar_nodo_articulo(t_LstArticulos *lst, t_Reg_Articulo *nodo)
+{
+       if (nodo == NULL) return 0;
+       if (nodo->ant == NULL) {
+               /* Me piden borrar el primer nodo */
+               if (nodo->sig) {
+                       nodo->sig->ant = NULL;
+               }
+               lst->primero = nodo->sig;
+       } else {
+               if (nodo->sig) {
+                       nodo->sig->ant = nodo->ant;
+               }
+               nodo->ant->sig = nodo->sig;
+       }
+       free(nodo);
+       return 1;
+}
+
+t_Reg_Articulo *crear_nodo_articulo(EMUFS_REG_ID reg, unsigned int num)
+{
+       t_Reg_Articulo *tmp;
+       if (reg == EMUFS_NOT_FOUND) return NULL;
+       tmp = malloc(sizeof(t_Reg_Articulo));
+       if (tmp == NULL) return NULL;
+       tmp->sig = tmp->ant = NULL;
+       tmp->num_reg = reg;
+       tmp->numero = num;
+
+       return tmp;
+}
+
+int agregar_nodo_articulo(t_LstArticulos *lst, t_Reg_Articulo *nodo)
+{
+       if (nodo == NULL) return 0;
+
+       if (lst->primero) {
+               lst->primero->ant = nodo;
+               nodo->sig = lst->primero;
+               lst->primero = nodo;
+       } else {
+               lst->primero = nodo;
+       }
+       return 1;
+}

 
 t_LstArticulos *art_cargar(const char *filename)
 {
        xmlDocPtr document;
        xmlNode *node, *inicio;
 
 t_LstArticulos *art_cargar(const char *filename)
 {
        xmlDocPtr document;
        xmlNode *node, *inicio;

-       int cant, size, error;
-       void *save;
+       int cant, error = 0, i;
+       EMUFS_REG_SIZE size;

        t_LstArticulos *tmp;
        lst_articulos = NULL;
        t_LstArticulos *tmp;
        lst_articulos = NULL;

+       EMUFS_REG_ID id;

 
        tmp = (t_LstArticulos *)malloc(sizeof(t_LstArticulos));
        if (tmp == NULL) return NULL;
        lst_articulos = tmp;
 
        tmp = (t_LstArticulos *)malloc(sizeof(t_LstArticulos));
        if (tmp == NULL) return NULL;
        lst_articulos = tmp;

-       tmp->cant = 0;
-       /*      tmp->array = (t_Reg_Articulo *)malloc(sizeof(t_Reg_Articulo)*tmp->cant);*/
-
-       if (tmp->array == NULL) {
-               free(tmp);
-               return NULL;
-       }
+       tmp->primero = NULL;

 
        if (filename != NULL) {
                document = xmlReadFile(filename, "ISO-8859-1",0);
 
        if (filename != NULL) {
                document = xmlReadFile(filename, "ISO-8859-1",0);


@@ -60,11 +107,12 @@ t_LstArticulos *art_cargar(const char *filename)
                /* leo los datos y los guardo en el archivo*/
                cant = 0;
                /* FIXME : por ahora hago que entren 2 bloques y me sobre algo de espacio*/
                /* leo los datos y los guardo en el archivo*/
                cant = 0;
                /* FIXME : por ahora hago que entren 2 bloques y me sobre algo de espacio*/

-               tmp->fp = emufs_crear("articulos", T1, sizeof(t_Articulo)*2, sizeof(t_Articulo)); 
+               tmp->fp = emufs_crear("articulos", T2, sizeof(t_Articulo)*2, sizeof(t_Articulo)); 

                for (node=inicio ; node ; node = node->next) {
                        if (node->type == XML_ELEMENT_NODE) {
                                if (strcmp(node->name, "ARTICULO") == 0) {
                                        t_Articulo art;
                for (node=inicio ; node ; node = node->next) {
                        if (node->type == XML_ELEMENT_NODE) {
                                if (strcmp(node->name, "ARTICULO") == 0) {
                                        t_Articulo art;

+                                       void *save;

                                        art.numero = atoi(xmlGetProp(node, "NroArtículo"));
                                        strncpy(art.desc, xmlGetProp(node, "Descripción"), 50);
                                        strncpy(art.presentacion, xmlGetProp(node, "Presentación"), 30);
                                        art.numero = atoi(xmlGetProp(node, "NroArtículo"));
                                        strncpy(art.desc, xmlGetProp(node, "Descripción"), 50);
                                        strncpy(art.presentacion, xmlGetProp(node, "Presentación"), 30);


@@ -75,22 +123,30 @@ t_LstArticulos *art_cargar(const char *filename)
                                        /* Ya leido el articulo ahora paso a guardarlo en el archivo y agregarlo a la lista */
                                        save = procesar_guardar_articulo(&art, &size, lst_articulos);
                                        if (save != NULL) {
                                        /* Ya leido el articulo ahora paso a guardarlo en el archivo y agregarlo a la lista */
                                        save = procesar_guardar_articulo(&art, &size, lst_articulos);
                                        if (save != NULL) {

-                                               printf("MANDO A GUARDAR\n");
-                                               tmp->array[cant].num_reg = tmp->fp->grabar_registro(tmp->fp, save, size, &error);
-                                               tmp->array[cant].numero = art.numero;
-                                               printf("DONE\n");
-                                               ++cant;
+                                               id = tmp->fp->grabar_registro(tmp->fp, save, size, &error);
+                                               agregar_nodo_articulo(tmp, crear_nodo_articulo(id, art.numero));

                                                free(save);
                                        }
                                }
                        }
                }
                                                free(save);
                                        }
                                }
                        }
                }

-               tmp->cant = cant;

                xmlFreeDoc(document);
                xmlCleanupParser();
        } else {
                tmp->fp = emufs_abrir("articulos");
                xmlFreeDoc(document);
                xmlCleanupParser();
        } else {
                tmp->fp = emufs_abrir("articulos");

-               /* TODO Cargar registros desde el archivo */
+               /* Ahora trato de recuperar la info */
+               cant = emufs_idx_get_count(tmp->fp);
+               for(i=0; i<cant; i++) {
+                       t_Articulo art;
+                       void *save;
+                       id = emufs_idx_get_id_at(tmp->fp, i);
+                       /* Leo el registro */
+                       save = tmp->fp->leer_registro(tmp->fp, id, &size, &error);
+                       if (procesar_leer_articulo(&art, save, size, tmp) == 1) {
+                               agregar_nodo_articulo(tmp, crear_nodo_articulo(id, art.numero));
+                               free(save);
+                       }
+               }

        }
 
        return tmp;
        }
 
        return tmp;


@@ -101,9 +157,8 @@ int art_liberar(t_LstArticulos *l)
        if (l == NULL) l = lst_articulos;
        if (l == NULL) return 1;
 
        if (l == NULL) l = lst_articulos;
        if (l == NULL) return 1;
 

-       ver_archivo_FS(l->fp);

        emufs_destruir(l->fp);
        emufs_destruir(l->fp);

-/*     free(l->array); */
+       /* TODO : Liberar lista */

        free(l);
 
        lst_articulos = NULL;
        free(l);
 
        lst_articulos = NULL;


@@ -112,22 +167,28 @@ int art_liberar(t_LstArticulos *l)
 
 t_Articulo *art_obtener(t_LstArticulos *lst, const char *numero)
 {
 
 t_Articulo *art_obtener(t_LstArticulos *lst, const char *numero)
 {

-       /* FIXME : NO ME GUSTA :-/ */

        t_Articulo *art;
        t_Articulo *art;

+       t_Reg_Articulo *nodo;

        void *tmp;
        void *tmp;

-       int i,error;
+       int error = 0;

        EMUFS_REG_SIZE size;
        int n = atoi(numero);
 
        if (lst == NULL) lst = lst_articulos;
        if (lst == NULL) return NULL;
 
        EMUFS_REG_SIZE size;
        int n = atoi(numero);
 
        if (lst == NULL) lst = lst_articulos;
        if (lst == NULL) return NULL;
 

-       for(i=0; i<lst->cant; i++) {
-               if (n == lst->array[i].numero) {
+       nodo = lst->primero;
+       while (nodo) {
+               if (n == nodo->numero) {

                        art = (t_Articulo *)malloc(sizeof(t_Articulo));
                        /* Ya se cual tengo que retornar. Ahora veo si lo cargo desde el archivo */
                        art = (t_Articulo *)malloc(sizeof(t_Articulo));
                        /* Ya se cual tengo que retornar. Ahora veo si lo cargo desde el archivo */

-                       tmp = lst->fp->leer_registro(lst->fp, lst->array[i].num_reg, &size, &error);
+                       tmp = lst->fp->leer_registro(lst->fp, nodo->num_reg, &size, &error);

                        
                        

+                       if (error) {
+                               free(art);
+                               return NULL;
+                       }
+

                        if (procesar_leer_articulo(art, tmp, size, lst_articulos) != 1) {
                                free(art);
                                free(tmp);
                        if (procesar_leer_articulo(art, tmp, size, lst_articulos) != 1) {
                                free(art);
                                free(tmp);


@@ -136,6 +197,7 @@ t_Articulo *art_obtener(t_LstArticulos *lst, const char *numero)
                        free(tmp);
                        return art;
                }
                        free(tmp);
                        return art;
                }

+               nodo = nodo->sig;

        }
 
        return NULL;
        }
 
        return NULL;


@@ -160,7 +222,7 @@ void art_modificar(char *s)
        WINDOW *win;
        t_Form *form;
        t_Articulo *articulo;
        WINDOW *win;
        t_Form *form;
        t_Articulo *articulo;

-       char num[8];
+       char num[11];

 
        win = newwin(8, COLS-2, 13, 1);
        box(win, 0, 0);
 
        win = newwin(8, COLS-2, 13, 1);
        box(win, 0, 0);


@@ -170,7 +232,7 @@ void art_modificar(char *s)
 
        if (articulo != NULL) {
                form = form_crear(win);
 
        if (articulo != NULL) {
                form = form_crear(win);

-               sprintf(num, "%07d", articulo->numero);
+               sprintf(num, "%08d", articulo->numero);

                form_agregar_widget(form, INPUT, "Numero de Artículo", 8, num);
                form_agregar_widget(form, INPUT, "Descripción", 50, articulo->desc);
                form_agregar_widget(form, INPUT, "Presentación", 30, articulo->presentacion);
                form_agregar_widget(form, INPUT, "Numero de Artículo", 8, num);
                form_agregar_widget(form, INPUT, "Descripción", 50, articulo->desc);
                form_agregar_widget(form, INPUT, "Presentación", 30, articulo->presentacion);


@@ -199,7 +261,7 @@ void art_eliminar(char *s)
 {
        WINDOW *win;
        t_Articulo *articulo;
 {
        WINDOW *win;
        t_Articulo *articulo;

-
+       t_Reg_Articulo *nodo;

        win = newwin(8, COLS-2, 13, 1);
        box(win, 0, 0);
        wrefresh(win);
        win = newwin(8, COLS-2, 13, 1);
        box(win, 0, 0);
        wrefresh(win);


@@ -213,7 +275,16 @@ void art_eliminar(char *s)
                wrefresh(win);
                getch();
        } else {
                wrefresh(win);
                getch();
        } else {

-               /* TODO : Eliminar un registro */
+               nodo = lst_articulos->primero;
+               while (nodo) {
+                       if (nodo->numero == articulo->numero) {
+                               lst_articulos->fp->borrar_registro(lst_articulos->fp, nodo->num_reg);
+                               eliminar_nodo_articulo(lst_articulos, nodo);
+                               break;
+                       }
+                       nodo = nodo->sig;
+               }
+               free(articulo);

        }
 
        werase(win);
        }
 
        werase(win);


@@ -226,7 +297,11 @@ void art_agregar(char *s)
        WINDOW *win;
        t_Form *form;
        t_Articulo art;
        WINDOW *win;
        t_Form *form;
        t_Articulo art;

-       int error;
+       t_Reg_Articulo *nuevo;
+       void *save;
+       int error = 0, existe;
+       EMUFS_REG_SIZE size;
+       EMUFS_REG_ID id;

 
        win = newwin(8, COLS-2, 13, 1);
        box(win, 0, 0);
 
        win = newwin(8, COLS-2, 13, 1);
        box(win, 0, 0);


@@ -242,18 +317,46 @@ void art_agregar(char *s)
        form_ejecutar(form, 1,1);
        
        art.numero = atoi(form_obtener_valor_char(form, "Numero de Artículo"));
        form_ejecutar(form, 1,1);
        
        art.numero = atoi(form_obtener_valor_char(form, "Numero de Artículo"));

-       strcpy(art.desc, form_obtener_valor_char(form, "Descripción"));
-       strcpy(art.presentacion, form_obtener_valor_char(form, "Presentación"));
-       strcpy(art.existencia, form_obtener_valor_char(form, "Stock Actual"));
-                               /*strncpy(tmp->array[cant].ubicacion, xmlGetProp(node, "Ubicacion"), 30);*/
-       strcpy(art.pvu, form_obtener_valor_char(form, "PVU"));
-       strcpy(art.emin, form_obtener_valor_char(form, "Stock Mínimo"));
-
-       /* Ya leido el articulo ahora paso a guardarlo en el archivo y agregarlo a la lista */
-       lst_articulos->array[lst_articulos->cant].num_reg = lst_articulos->fp->grabar_registro(lst_articulos->fp, &art, sizeof(t_Articulo), &error);
-       lst_articulos->array[lst_articulos->cant].numero = art.numero;
-       lst_articulos->cant++;
+       existe = 0;
+       nuevo = lst_articulos->primero;
+       while (nuevo) {
+               if (art.numero == nuevo->numero) {
+                       existe = 1;
+                       break;
+               }
+               nuevo = nuevo->sig;
+       }

        
        

+       if (!existe) {
+               strcpy(art.desc, form_obtener_valor_char(form, "Descripción"));
+               strcpy(art.presentacion, form_obtener_valor_char(form, "Presentación"));
+               strcpy(art.existencia, form_obtener_valor_char(form, "Stock Actual"));
+                               /*strncpy(tmp->array[cant].ubicacion, xmlGetProp(node, "Ubicacion"), 30);*/
+               strcpy(art.pvu, form_obtener_valor_char(form, "PVU"));
+               strcpy(art.emin, form_obtener_valor_char(form, "Stock Mínimo"));
+
+               /* Ya leido el articulo ahora paso a guardarlo en el archivo y agregarlo a la lista */
+               save = procesar_guardar_articulo(&art, &size, lst_articulos);
+               if (save != NULL) {
+                       id = lst_articulos->fp->grabar_registro(lst_articulos->fp, save, size, &error);
+                       if (error) {
+                               wattron(win, COLOR_PAIR(COLOR_YELLOW));
+                               mvwaddstr(win, 6, 4, "Error al tratar de agregar el nuevo registro");
+                               wattroff(win, COLOR_PAIR(COLOR_YELLOW));
+                               wrefresh(win);
+                               getch();
+                       } else {
+                               agregar_nodo_articulo(lst_articulos, crear_nodo_articulo(id, art.numero));
+                       }
+                       free(save);
+               }
+       } else {
+               wattron(win, COLOR_PAIR(COLOR_YELLOW));
+               mvwaddstr(win, 7, 1, "El código ya existe!. Abortando.");
+               wattroff(win, COLOR_PAIR(COLOR_YELLOW));
+               wrefresh(win);
+               getch();
+       }

        form_destruir(form);
 
        werase(win);
        form_destruir(form);
 
        werase(win);


@@ -261,7 +364,7 @@ void art_agregar(char *s)
        delwin(win);
 }
 
        delwin(win);
 }
 

-int procesar_leer_articulo(t_Articulo *dst, void *src, int size, t_LstArticulos *lst)
+int procesar_leer_articulo(t_Articulo *dst, void *src, EMUFS_REG_SIZE size, t_LstArticulos *lst)

 {
        char *fin, *ini;
        switch (lst->fp->tipo) {
 {
        char *fin, *ini;
        switch (lst->fp->tipo) {


@@ -275,40 +378,36 @@ int procesar_leer_articulo(t_Articulo *dst, void *src, int size, t_LstArticulos
                        /* Los \0 son los delimitadores de campo! */
                        fin = ini;
                        while (*fin!='\0') fin++;
                        /* Los \0 son los delimitadores de campo! */
                        fin = ini;
                        while (*fin!='\0') fin++;

-                       memcpy(dst->desc, ini, fin-ini);
+                       memcpy(dst->desc, ini, fin-ini+1);

                        
                        ini = fin+1;
                        fin = ini;
                        while (*fin!='\0') fin++;
                        
                        ini = fin+1;
                        fin = ini;
                        while (*fin!='\0') fin++;

-                       memcpy(dst->presentacion, ini, fin-ini);
+                       memcpy(dst->presentacion, ini, fin-ini+1);

                        
                        ini = fin+1;
                        fin = ini;
                        while (*fin!='\0') fin++;
                        
                        ini = fin+1;
                        fin = ini;
                        while (*fin!='\0') fin++;

-                       memcpy(dst->existencia, ini, fin-ini);
+                       memcpy(dst->existencia, ini, fin-ini+1);

                        
                        ini = fin+1;
                        fin = ini;
                        while (*fin!='\0') fin++;
                        
                        ini = fin+1;
                        fin = ini;
                        while (*fin!='\0') fin++;

-                       memcpy(dst->pvu, ini, fin-ini);
+                       memcpy(dst->pvu, ini, fin-ini+1);

                        
                        ini = fin+1;
                        fin = (char *)src+size;
                        
                        ini = fin+1;
                        fin = (char *)src+size;

-                       while (*fin!='\0') fin++;
-                       memcpy(dst->pvu, ini, fin-ini);
+                       memcpy(dst->emin, ini, fin-ini+1);

 
                        break;
                case T3:
 
                        break;
                case T3:

-                       if (size != sizeof(t_Articulo)) {
-                               return 0; /* El tamaño no encaja!! */
-                       }
-                       memcpy(dst, src, size);
+                       memcpy(dst, src, sizeof(t_Articulo));

        }
 
        return 1; /* Todo ok */
 }
 
        }
 
        return 1; /* Todo ok */
 }
 

-void *procesar_guardar_articulo(t_Articulo *src, int *size, t_LstArticulos *lst)
+void *procesar_guardar_articulo(t_Articulo *src, EMUFS_REG_SIZE *size, t_LstArticulos *lst)

 {
        char *tmp=NULL;
        int i[6];
 {
        char *tmp=NULL;
        int i[6];