Se arregla memory leak (aunque en el ejemplo no importe demasiado :)

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

diff --git a/emufs/tipo2.c b/emufs/tipo2.c
index 2bdb6e95ebeac7a36a839e3ead10b6415de2c002..92cb2a4a61347f0888dede0f2b46a184d345d958 100644 (file)
--- a/emufs/tipo2.c
+++ b/emufs/tipo2.c
@@ -41,6 +41,11 @@
 #include "idx.h"
 #include "fsc.h"
 #include "did.h"
 #include "idx.h"
 #include "fsc.h"
 #include "did.h"

+#include "error.h"
+#include <unistd.h>
+#include <sys/types.h>
+#include <stdio.h>
+#include <string.h>

 
 /* Asigna los punteros a las funciones apropiadas para el Tipo2 */
 int emufs_tipo2_inicializar(EMUFS* efs)
 
 /* Asigna los punteros a las funciones apropiadas para el Tipo2 */
 int emufs_tipo2_inicializar(EMUFS* efs)


@@ -50,6 +55,7 @@ int emufs_tipo2_inicializar(EMUFS* efs)
        efs->leer_registro = emufs_tipo2_leer_registro;
        efs->modificar_registro = emufs_tipo2_modificar_registro;
        efs->leer_estadisticas = emufs_tipo2_leer_estadisticas;
        efs->leer_registro = emufs_tipo2_leer_registro;
        efs->modificar_registro = emufs_tipo2_modificar_registro;
        efs->leer_estadisticas = emufs_tipo2_leer_estadisticas;

+       efs->compactar = emufs_tipo2_compactar;

        
        return 0;
 }
        
        return 0;
 }


@@ -68,7 +74,6 @@ void *emufs_tipo2_leer_registro(EMUFS* efs, EMUFS_REG_ID id_reg, EMUFS_REG_SIZE*
        /* Obtenemos la posicion del registro en el .dat */
        reg_offset = emufs_idx_buscar_registro(efs, id_reg);
        if (reg_offset == EMUFS_NOT_FOUND) {
        /* Obtenemos la posicion del registro en el .dat */
        reg_offset = emufs_idx_buscar_registro(efs, id_reg);
        if (reg_offset == EMUFS_NOT_FOUND) {

-               /* TODO Manejo de errores */

                PERR("Registro no encontrado");
                *err = EMUFS_NOT_FOUND;
                return NULL;
                PERR("Registro no encontrado");
                *err = EMUFS_NOT_FOUND;
                return NULL;


@@ -77,8 +82,8 @@ void *emufs_tipo2_leer_registro(EMUFS* efs, EMUFS_REG_ID id_reg, EMUFS_REG_SIZE*
        /* Levantamos el registro */
        if ((f_data = fopen(name_f, "rb")) == NULL) {
                PERR("No se puede abrir archivo");
        /* Levantamos el registro */
        if ((f_data = fopen(name_f, "rb")) == NULL) {
                PERR("No se puede abrir archivo");

-               *err = 4; /* EMUFS_ERROR_CANT_OPEN_FILE */
-               return NULL; /* FIXME ERROR */
+               *err = EMUFS_ERROR_CANT_OPEN_FILE;
+               return NULL;

        }
        fseek(f_data,reg_offset+sizeof(EMUFS_REG_ID),0);
        fread(reg_size,sizeof(EMUFS_REG_SIZE),1,f_data);
        }
        fseek(f_data,reg_offset+sizeof(EMUFS_REG_ID),0);
        fread(reg_size,sizeof(EMUFS_REG_SIZE),1,f_data);


@@ -209,8 +214,7 @@ int emufs_tipo2_dummyfill(EMUFS *efs, EMUFS_OFFSET reg_pos, EMUFS_REG_SIZE amoun
        FILE *f_data;
        char name_f[255];
        char *dummyfill;
        FILE *f_data;
        char name_f[255];
        char *dummyfill;

-       char *ptr_cur;
-       unsigned long fill_size,byte_count;
+       unsigned long fill_size;

        
        /* Armamos el filename del archivo de datos */
        strcpy(name_f,efs->nombre);
        
        /* Armamos el filename del archivo de datos */
        strcpy(name_f,efs->nombre);


@@ -222,8 +226,6 @@ int emufs_tipo2_dummyfill(EMUFS *efs, EMUFS_OFFSET reg_pos, EMUFS_REG_SIZE amoun
        fill_size = amount+sizeof(EMUFS_REG_ID)+sizeof(EMUFS_REG_SIZE);
        dummyfill = (char*)malloc(fill_size);
        memset(dummyfill, 0, fill_size);
        fill_size = amount+sizeof(EMUFS_REG_ID)+sizeof(EMUFS_REG_SIZE);
        dummyfill = (char*)malloc(fill_size);
        memset(dummyfill, 0, fill_size);

-       ptr_cur = dummyfill;
-       for (byte_count = 0; byte_count < fill_size; ++byte_count) memcpy(ptr_cur+byte_count,0,1);

        fseek(f_data,reg_pos,SEEK_SET);
        fwrite(dummyfill,fill_size,1,f_data);
        fclose(f_data);
        fseek(f_data,reg_pos,SEEK_SET);
        fwrite(dummyfill,fill_size,1,f_data);
        fclose(f_data);


@@ -304,8 +306,8 @@ EMUFS_Estadisticas emufs_tipo2_leer_estadisticas(EMUFS *efs)
        return(stats);  
 }
 
        return(stats);  
 }
 

-/* Recompila y devuelve ciertas estadisticas del archivo indicado */
-int emufs_tipo2_recompactar(EMUFS *efs)
+/* Compacta el archivo eliminando espacios libres, alineando a izquierda */
+void emufs_tipo2_compactar(EMUFS *efs)

 {
        char name_fdat[255],name_ffsc[255];
        FILE *datfile;
 {
        char name_fdat[255],name_ffsc[255];
        FILE *datfile;


@@ -313,7 +315,7 @@ int emufs_tipo2_recompactar(EMUFS *efs)
        EMUFS_FSC reg1,reg2;
        unsigned long cant_gaps = 0,mustmove_bytes = 0,source = 0,
                                  destination = 0,datsize = 0,totalfsc = 0;
        EMUFS_FSC reg1,reg2;
        unsigned long cant_gaps = 0,mustmove_bytes = 0,source = 0,
                                  destination = 0,datsize = 0,totalfsc = 0;

-       
+               

        strcpy(name_fdat,efs->nombre);
        strcpy(name_ffsc,efs->nombre);
        strcat(name_fdat,".dat");
        strcpy(name_fdat,efs->nombre);
        strcpy(name_ffsc,efs->nombre);
        strcat(name_fdat,".dat");


@@ -322,7 +324,7 @@ int emufs_tipo2_recompactar(EMUFS *efs)
        /* Obtengo el tamanio del .dat */
        if ( (datfile = fopen(name_fdat,"rb+")) == NULL){
                        PERR("No se pudo abrir el archivo");
        /* Obtengo el tamanio del .dat */
        if ( (datfile = fopen(name_fdat,"rb+")) == NULL){
                        PERR("No se pudo abrir el archivo");

-                       return -1;      
+                       return;

        }
        fseek(datfile,0,SEEK_END);
        datsize = ftell(datfile);
        }
        fseek(datfile,0,SEEK_END);
        datsize = ftell(datfile);


@@ -330,12 +332,16 @@ int emufs_tipo2_recompactar(EMUFS *efs)
        /* Obtengo la cantidad de gaps */
        if ( (fscfile = fopen(name_ffsc,"rb")) == NULL){
                        PERR("No se pudo abrir el archivo");
        /* Obtengo la cantidad de gaps */
        if ( (fscfile = fopen(name_ffsc,"rb")) == NULL){
                        PERR("No se pudo abrir el archivo");

-                       return -1;      
+                       return;

        }
        fseek(fscfile,0,SEEK_END);
        cant_gaps = ftell(fscfile)/sizeof(EMUFS_FSC);
        
        }
        fseek(fscfile,0,SEEK_END);
        cant_gaps = ftell(fscfile)/sizeof(EMUFS_FSC);
        

-       if (cant_gaps == 0) return 0;
+       if (cant_gaps == 0) {
+               fclose(datfile);
+               fclose(fscfile);
+               return;
+       }

        if (cant_gaps == 1) {
                /* Un solo gap, muevo toda la data luego del gap y trunco */
                fseek(fscfile,0,SEEK_SET);
        if (cant_gaps == 1) {
                /* Un solo gap, muevo toda la data luego del gap y trunco */
                fseek(fscfile,0,SEEK_SET);


@@ -386,12 +392,15 @@ int emufs_tipo2_recompactar(EMUFS *efs)
        totalfsc = emufs_fsc_get_total_fs(efs);
        truncate(name_fdat,datsize - totalfsc);
        truncate(name_ffsc,0);
        totalfsc = emufs_fsc_get_total_fs(efs);
        truncate(name_fdat,datsize - totalfsc);
        truncate(name_ffsc,0);

-       return 0;
+       
+       /* Recreo el Indice con los nuevos offsets */
+       emufs_tipo2_updateidx(efs);

 }
 
 }
 

+/* Mueve data desde un source a un destination, de a chunks */

 void emufs_tipo2_movedata(FILE *datfile,EMUFS_OFFSET *source, EMUFS_OFFSET *destination, EMUFS_BLOCK_SIZE mustmove_bytes)
 {
 void emufs_tipo2_movedata(FILE *datfile,EMUFS_OFFSET *source, EMUFS_OFFSET *destination, EMUFS_BLOCK_SIZE mustmove_bytes)
 {

-    int chunksize = 9;
+    int chunksize = 25;

        char *chunk = malloc(chunksize*sizeof(char));
        unsigned long cant_chunks = 0,left_chunk = 0;
        
        char *chunk = malloc(chunksize*sizeof(char));
        unsigned long cant_chunks = 0,left_chunk = 0;
        


@@ -423,3 +432,37 @@ void emufs_tipo2_movedata(FILE *datfile,EMUFS_OFFSET *source, EMUFS_OFFSET *dest
        
        free(chunk);
 }
        
        free(chunk);
 }

+
+/* Sincroniza el Index con las posiciones de los datos, luego de un recompactar */
+int emufs_tipo2_updateidx(EMUFS *efs)
+{
+       char name_fdat[255];
+       FILE *datfile;
+       EMUFS_REG_ID reg_id = -1;
+       EMUFS_OFFSET reg_offset = -1;
+       EMUFS_REG_SIZE reg_size = -1;
+               
+       strcpy(name_fdat,efs->nombre);
+       strcat(name_fdat,".dat");
+               
+       /* Obtengo el tamanio del .dat */
+       if ( (datfile = fopen(name_fdat,"rb+")) == NULL){
+                       PERR("No se pudo abrir el archivo");
+                       return -1;      
+       }
+       
+       /* Recorremos el archivo y actualizamos el .idx */
+       fseek(datfile,sizeof(EMUFS_Tipo),SEEK_SET);
+       while (!feof(datfile))
+       {
+               /* Leo un ID y actualizo el offset en el .idx */
+               reg_offset = ftell(datfile);
+               if (fread(&reg_id,sizeof(EMUFS_REG_ID),1,datfile) != 1) continue;
+               emufs_idx_actualizar(efs,reg_id,reg_offset);
+               /* Salteo la data del registro, para leer el proximo header */
+               fread(&reg_size,sizeof(EMUFS_REG_SIZE),1,datfile);
+               fseek(datfile,reg_size,SEEK_CUR);
+       }               
+       
+       return 0;       
+}