* BUGFIX : en buscar_lugar faltaba inicializar el valor *fs a devolver en caso de no

 encontrar el bloque.

diff --git a/tipo3/emufs.c b/tipo3/emufs.c
index 9883f70ca9cfbba1f2412be04d7e583237651010..a76974116286e2ef87a5ee299858db12722518ac 100644 (file)
--- a/tipo3/emufs.c
+++ b/tipo3/emufs.c
@@ -81,6 +81,44 @@ EMUFS *emufs_crear(const char *filename, char tipo, unsigned int tam_bloque, uns
        return tmp;
 }
 
+EMUFS *emufs_abrir(const char *filename)
+{
+       EMUFS *tmp;
+       char name[255];
+       char tipo;
+       FILE *fp;
+
+       strcpy(name, filename);
+       strcat(name, EXT_TIPO3_DATA);
+       fp = fopen(name, "r");
+       if (fp == NULL) return NULL;
+       fread(&tipo, sizeof(char), 1, fp);
+       if ((tipo < 0) || (tipo > 2)) {
+               fclose(fp);
+               return NULL;
+       }
+       
+       tmp = (EMUFS *)malloc(sizeof(EMUFS));
+       if (tmp == NULL) return NULL;
+
+       switch (tipo) {
+               case T1:
+               break;
+               case T2:
+               break;
+               case T3:
+                       tmp->tipo = tipo;
+                       fread(&tmp->tam_bloque, sizeof(int), 1, fp);
+                       tmp->leer_bloque = leer_bloque;
+                       tmp->leer_registro = leer_registro;
+                       tmp->grabar_registro = grabar_registro;
+                       tmp->borrar_registro = NULL;
+                       tmp->nombre = str_dup(filename);
+       }
+
+       fclose(fp);
+       return tmp;
+}
 
 int emufs_destruir(EMUFS *e)
 {

diff --git a/tipo3/emufs.h b/tipo3/emufs.h
index aeae57220fea1a75eda0fd41891e3ac8a60b2fe8..2cbc027dcd98f5323c3266a97ae3120f93849b5a 100644 (file)
--- a/tipo3/emufs.h
+++ b/tipo3/emufs.h
@@ -17,6 +17,7 @@ typedef struct _emu_fs_t {
 } EMUFS;
 
 EMUFS *emufs_crear(const char *filename, char tipo, unsigned int tam_bloque, unsigned int tam_reg);
+EMUFS *emufs_abrir(const char *filename);
 
 int emufs_destruir(EMUFS *e);
 #endif

diff --git a/tipo3/param_cte.c b/tipo3/param_cte.c
index 0683fc9f998b2e5d9d32fa67b21d79166a1f003a..d7d0d24104481b0da03cad25aa59d0bae807c602 100644 (file)
--- a/tipo3/param_cte.c
+++ b/tipo3/param_cte.c
@@ -142,6 +142,7 @@ int grabar_registro(EMUFS *emu, void *ptr, unsigned long tam)
        if ( (file = fopen(name_f,"a+"))==NULL ) return -1; /*ERROR*/
        /* me devuelve el ID del bloque donde quepa un registro y el espacio libre en "fs"*/
        num_bloque = buscar_lugar(emu, tam, &fs);
+       printf("Lugar %d\n", fs);
        /*si no hay bloques con suficiente espacio creo un bloque nuevo */
        if (num_bloque == -1) {
                /*crear un nuevo bloque en memoria */
@@ -187,7 +188,9 @@ int grabar_registro(EMUFS *emu, void *ptr, unsigned long tam)
        fclose(file);
        /*cargo el registro*/
        reg.block = cant; /*no incremento cant, porque grabe el nuevo bloque antes y no lo conte!!*/
-       reg.free_space = fs - tam;
+       /* GAZER */
+       printf("FS = %d\n", fs);
+       reg.free_space = fs-tam;
        /*lo guardo en el archivo al final  "a+"*/
        if ( (f_block_free = fopen(name_f_free,"a+"))==NULL ) return -1; /*ERROR*/              
        fwrite(&reg,sizeof(reg),1,f_block_free);
@@ -239,6 +242,7 @@ int buscar_lugar(EMUFS *emu, unsigned long tam, int *fs)
         * el resultado sea correcto
         */
        reg.block = -1;
+       *fs = emu->tam_bloque;
        while( !feof(f_block_free) ){
                fread(&reg,sizeof(reg),1,f_block_free);
                if ( reg.free_space >= tam ) 
@@ -250,7 +254,8 @@ int buscar_lugar(EMUFS *emu, unsigned long tam, int *fs)
        }
        
        fclose(f_block_free);
-       *fs = reg.free_space;
+       if (reg.block != -1)
+               *fs = reg.free_space;
        return reg.block;
 }