Intento de buscar el numero de bloque donde deberia ir una clave nueva, no esta teste...

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

diff --git a/emufs/fsc.c b/emufs/fsc.c
index 73f043d6a9b258daac482c0370e58ebdd87e33f8..84746a80e4e9f698b6e0f6ed91c22870b4e1be36 100644 (file)
--- a/emufs/fsc.c
+++ b/emufs/fsc.c
@@ -387,6 +387,7 @@ EMUFS_BLOCK_ID emufs_fsc_buscar_n_lugares(EMUFS* efs, size_t n,
                        if (feof(f_fsc)) break;
                        PERR("No se puede leer el archivo");
                        *err = EMUFS_ERROR_FILE_READ;
+                       fclose(f_fsc);
                        return EMUFS_NOT_FOUND;
                }
                if (reg.freespace >= size) {
@@ -398,6 +399,7 @@ EMUFS_BLOCK_ID emufs_fsc_buscar_n_lugares(EMUFS* efs, size_t n,
                                        if (feof(f_fsc)) break;
                                        PERR("No se puede leer el archivo");
                                        *err = EMUFS_ERROR_FILE_READ;
+                                       fclose(f_fsc);
                                        return EMUFS_NOT_FOUND;
                                }
                                /* no hay otro lugar consecutivo */