* Integro Indice B con EMUFS e Indice

[z.facultad/75.06/emufs.git] / emufs / tipo1.c

diff --git a/emufs/tipo1.c b/emufs/tipo1.c
index 73ea3e24a85d3bf42593434210cb3a66316b6eb5..a442e8d7c272a24c9a65df3fc2850620fc1e78fa 100644 (file)
--- a/emufs/tipo1.c
+++ b/emufs/tipo1.c
@@ -240,10 +240,12 @@ void* emufs_tipo1_leer_bloque(EMUFS* efs, EMUFS_BLOCK_ID block_id, int* err)
        if (block == NULL) {
                PERR("No hay memoria");
                *err = EMUFS_ERROR_OUT_OF_MEMORY;
+               fclose(file);
                return NULL;
        }
        if (fread(block, efs->tam_bloque, 1, file) != 1) {
                free(block);
+               fclose(file);
                PERR("Error al leer bloque");
                *err = EMUFS_ERROR_FILE_READ;
                return NULL;
@@ -313,7 +315,9 @@ EMUFS_REG_ID emufs_tipo1_grabar_registro(EMUFS* efs, void* reg,
                emufs_tipo1_escribir_reg_chunk_en_memoria(block + efs->tam_bloque - fs,
                                header, chunk_ptr, chunk_size);
                /* rellena el espacio libre con ceros para la GUI */
-               if (fs) memset(block + efs->tam_bloque - fs, 0, fs);
+               memset(block + efs->tam_bloque - fs + chunk_size
+                               + sizeof(EMUFS_TIPO1_REG_HEADER), 0,
+                               fs - chunk_size - sizeof(EMUFS_TIPO1_REG_HEADER));
                /* graba el bloque en el archivo */
                new_block_id = emufs_tipo1_grabar_bloque_fsc(efs, block, curr_block_id,
                                fs - sizeof(EMUFS_TIPO1_REG_HEADER) - chunk_size, err);
@@ -377,12 +381,14 @@ int emufs_tipo1_borrar_registro(EMUFS* efs, EMUFS_REG_ID reg_id)
                        /* tamaño máximo ultilizable para datos en un bloque */
                        EMUFS_BLOCK_SIZE block_space
                                        = efs->tam_bloque - sizeof(EMUFS_TIPO1_REG_HEADER);
-                       EMUFS_FREE fs; /* cantidad de espacio libre en el bloque */
+                       /* cantidad de espacio libre original del ultimo bloque */
+                       EMUFS_FREE orig_fs; 
 
                        while (1) {
+                               EMUFS_FREE fs; /* cantidad de espacio libre en el bloque */
+                               orig_fs = emufs_fsc_get_fs(efs, curr_block_id);
                                /* actualizo archivo de espacio libre por bloque */
-                               fs = emufs_fsc_get_fs(efs, curr_block_id)
-                                       + MIN(curr_reg_header.size, block_space)
+                               fs = orig_fs + MIN(curr_reg_header.size, block_space)
                                        + sizeof(EMUFS_TIPO1_REG_HEADER);
                                if ((err = emufs_fsc_actualizar(efs, curr_block_id, fs))) {
                                        PERR("no se pudo actualizar .fsc");
@@ -426,11 +432,14 @@ int emufs_tipo1_borrar_registro(EMUFS* efs, EMUFS_REG_ID reg_id)
                                /* si es necesario desplazar */
                                if (offset < offset_reg_end) {
                                        /* muevo la porción de bloque a izquierda */
+                                       /* XXX Este memcpy() puede copiar regiones de memoria que
+                                        * se superponen, si copia de principio a fin y byte a byte
+                                        * no debería haber problema */
                                        memcpy(block + offset, block + offset_reg_end,
                                                efs->tam_bloque - offset_reg_end);
                                        /* rellena el espacio libre con ceros para la GUI */
-                                       if (fs) memset(block + offset_reg_end, 0,
-                                                       efs->tam_bloque - offset_reg_end);
+                                       memset(block + efs->tam_bloque - offset_reg_end - orig_fs + offset,
+                                                       0, offset_reg_end + orig_fs - offset);
                                }
                        }
                        /* guardo el bloque en disco (actualizando espacio libre) */