cambio los printf por PERR

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

diff --git a/emufs/tipo2.c b/emufs/tipo2.c
index 70d889d98d509994b1ec4e6b0e12f1e7888b1170..5b0ebdf7dcc69941ca3cbad2039f31c4f7cfdda7 100644 (file)
--- a/emufs/tipo2.c
+++ b/emufs/tipo2.c
@@ -36,6 +36,57 @@
 #include "fsc.h"
 #include "did.h"
 
 #include "fsc.h"
 #include "did.h"
 

+/* Asigna los punteros a las funciones apropiadas para el Tipo2 */
+int emufs_tipo2_inicializar(EMUFS* efs)
+{
+       efs->grabar_registro = emufs_tipo2_grabar_registro;           
+    efs->borrar_registro = emufs_tipo2_borrar_registro;
+       efs->leer_registro = emufs_tipo2_leer_registro;
+}
+
+/**********************************************************************/
+/* EMUFS_REG_ID emufs_tipo2_grabar_registro(EMUFS *efs, void *ptr,    */
+/*                                 EMUFS_REG_SIZE n_RegSize)          */
+/* Objetivo: Grabar un registro en un archivo del Tipo 2.             */
+/* Parametros: EMUFS *efs // Struct con handlers + info del openfile. */
+/*             void *ptr // Puntero al buffer (registro) a guardar    */
+/*             EMUFS_REG_SIZE n_RegSize // Size del reg en cuestion   */
+/**********************************************************************/
+void *emufs_tipo2_leer_registro(EMUFS* efs, EMUFS_REG_ID reg_id,
+                       EMUFS_REG_SIZE* reg_size, int *err)
+{
+       FILE* f_data;
+       char *registro; /* registro a leer */
+       char  name_f[255];      
+       EMUFS_OFFSET reg_offset; /* offset donde se encuentra el registro */
+       
+       strcpy(name_f,efs->nombre);
+       strcat(name_f,".dat");
+
+       /* Obtenemos la posicion del registro en el .dat */
+       reg_offset = emufs_idx_buscar_registro(efs, reg_id);
+       if (reg_offset == EMUFS_NOT_FOUND) {
+               /* TODO Manejo de errores */
+               PERR("Registro no encontrado");
+               *err = EMUFS_NOT_FOUND;
+               return NULL;
+       }
+       
+       /* 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 */
+       }
+       fseek(f_data,reg_offset+sizeof(EMUFS_REG_ID),0);
+       fread(reg_size,sizeof(EMUFS_REG_SIZE),1,f_data);
+       registro = (char*)malloc(*reg_size);
+       fread(registro,*reg_size,1,f_data);
+       fclose(f_data);
+       
+       return registro;
+}
+

 /**********************************************************************/
 /* EMUFS_REG_ID emufs_tipo2_grabar_registro(EMUFS *efs, void *ptr,    */
 /*                                 EMUFS_REG_SIZE n_RegSize)          */
 /**********************************************************************/
 /* EMUFS_REG_ID emufs_tipo2_grabar_registro(EMUFS *efs, void *ptr,    */
 /*                                 EMUFS_REG_SIZE n_RegSize)          */


@@ -57,19 +108,19 @@ EMUFS_REG_ID emufs_tipo2_grabar_registro(EMUFS *efs, void *ptr, EMUFS_REG_SIZE n
        strcpy(name_f,efs->nombre);
        strcat(name_f,".dat");
        
        strcpy(name_f,efs->nombre);
        strcat(name_f,".dat");
        

-       if ( (f_data = fopen(name_f,"a+"))==NULL ) return -1; /*ERROR*/
+       if ( (f_data = fopen(name_f,"r+"))==NULL ) return -1; /*ERROR*/

        
        /* Obtengo un offset en donde iniciar la escritura de mi registro */
        /* de manera segura (habra espacio suficiente) */
        n_FisicSize = sizeof(EMUFS_REG_ID)+sizeof(EMUFS_REG_SIZE)+n_RegSize;
        n_WrtOffset = emufs_fsc_buscar_lugar(efs,n_FisicSize,&n_FreeSpace);
        
        /* Obtengo un offset en donde iniciar la escritura de mi registro */
        /* de manera segura (habra espacio suficiente) */
        n_FisicSize = sizeof(EMUFS_REG_ID)+sizeof(EMUFS_REG_SIZE)+n_RegSize;
        n_WrtOffset = emufs_fsc_buscar_lugar(efs,n_FisicSize,&n_FreeSpace);

-       printf("tipo2.c >> Searching FSC: Offset = %lu FSpace: %lu\n", n_WrtOffset, n_FreeSpace);
+       printf("tipo2.c >> Recording Reg > Searching FSC: Offset = %lu FSpace: %lu\n", n_WrtOffset, n_FreeSpace);

        
        /* Si no encontre un gap, entonces escribo el registro al final */
        if (n_WrtOffset == -1) {                       
                
                /* Obtengo un ID libre para el registro y luego grabo a disco */
        
        /* Si no encontre un gap, entonces escribo el registro al final */
        if (n_WrtOffset == -1) {                       
                
                /* Obtengo un ID libre para el registro y luego grabo a disco */

-        n_IdReg = emufs_tipo2_get_id(efs);
+        n_IdReg = emufs_idx_get_new_id(efs, err);

                fseek(f_data, 0, SEEK_END);
                n_RegOffset = ftell(f_data);
 
                fseek(f_data, 0, SEEK_END);
                n_RegOffset = ftell(f_data);
 


@@ -84,6 +135,23 @@ EMUFS_REG_ID emufs_tipo2_grabar_registro(EMUFS *efs, void *ptr, EMUFS_REG_SIZE n
                
        } else {
                
                
        } else {
                

+               /* Obtengo un ID libre para el registro y luego grabo en disco */
+        n_IdReg = emufs_idx_get_new_id(efs, err);
+               n_RegOffset = n_WrtOffset;
+               fseek(f_data,n_RegOffset,0);
+               
+        /* Escribo [RegId]|[RegSize]|[RegData] */
+               fwrite(&n_IdReg,sizeof(EMUFS_REG_ID),1,f_data);
+               fwrite(&n_RegSize,sizeof(EMUFS_REG_SIZE),1,f_data);
+               fwrite(ptr,n_RegSize,1,f_data);
+                               
+               /* Bye */
+               printf("Tipo2.c >> RegNr: %lu with FisicSize: %lu inserted at Offset: %lu\n",n_IdReg,n_FisicSize,n_RegOffset);
+               fclose(f_data);
+               
+               /* Actualizo el espacio libre en el GAP donde puse el registro */
+               if ((n_FreeSpace-n_FisicSize) == 0) emufs_fsc_remove_gap(efs,n_RegOffset);
+               else emufs_fsc_actualizar_gap(efs,n_RegOffset,n_FreeSpace-n_FisicSize);         

        }
                
        /* Finalmente, actualizamos el indice de registros (offsets) */
        }
                
        /* Finalmente, actualizamos el indice de registros (offsets) */


@@ -101,8 +169,6 @@ EMUFS_REG_ID emufs_tipo2_grabar_registro(EMUFS *efs, void *ptr, EMUFS_REG_SIZE n
 /**********************************************************************/
 int emufs_tipo2_borrar_registro(EMUFS *efs, EMUFS_REG_ID n_IdReg)
 {      
 /**********************************************************************/
 int emufs_tipo2_borrar_registro(EMUFS *efs, EMUFS_REG_ID n_IdReg)
 {      

-       FILE *f_data;
-       char name_f[255];

        EMUFS_OFFSET n_RegOffset,n_RegSize;
         
        /* Obtenemos el offset donde arranca el registro */
        EMUFS_OFFSET n_RegOffset,n_RegSize;
         
        /* Obtenemos el offset donde arranca el registro */


@@ -111,11 +177,21 @@ int emufs_tipo2_borrar_registro(EMUFS *efs, EMUFS_REG_ID n_IdReg)
        else 
          return -1;
        
        else 
          return -1;
        

-       /* Obtenemos el Size del Registro en cuestion y hacemos un dummfill*/
+       /* Obtenemos el Size del Registro en cuestion y hacemos un dummyfill*/

        emufs_tipo2_get_regsize(efs,n_RegOffset,&n_RegSize);
        printf ("tipo2.c >> About to delete Reg %lu of Size: %lu\n",n_IdReg,n_RegSize);
        emufs_tipo2_dummyfill(efs,n_RegOffset,n_RegSize);
        
        emufs_tipo2_get_regsize(efs,n_RegOffset,&n_RegSize);
        printf ("tipo2.c >> About to delete Reg %lu of Size: %lu\n",n_IdReg,n_RegSize);
        emufs_tipo2_dummyfill(efs,n_RegOffset,n_RegSize);
        

+       /* Agregamos el GAP en el archivo de FSC, el cual hara un merge con */
+       /* otro GAP por delante y/o por detras en caso de hallarlo. */
+       emufs_fsc_agregar_gap(efs,n_RegOffset,n_RegSize+sizeof(EMUFS_REG_ID)+sizeof(EMUFS_REG_SIZE));
+       
+       /* Agrego el ID que se ha liberado al archivo de ID's Libres */
+       emufs_did_agregar(efs,n_IdReg); 
+       
+       /* Borramos el registro del indice de posiciones relativas */
+       emufs_idx_borrar(efs,n_IdReg);
+       

        return(0);
 }
 
        return(0);
 }
 


@@ -157,8 +233,8 @@ int emufs_tipo2_dummyfill(EMUFS *efs, EMUFS_OFFSET n_RegPos, EMUFS_REG_SIZE n_Am
 {
     FILE *f_data;
        char name_f[255];
 {
     FILE *f_data;
        char name_f[255];

-    void *dummyfill;
-       void *ptr_cur;
+    char *dummyfill;
+       char *ptr_cur;

        unsigned long n_FillSize,n_count;
        
     /* Armamos el filename del archivo de datos */
        unsigned long n_FillSize,n_count;
        
     /* Armamos el filename del archivo de datos */


@@ -177,22 +253,6 @@ int emufs_tipo2_dummyfill(EMUFS *efs, EMUFS_OFFSET n_RegPos, EMUFS_REG_SIZE n_Am
        fclose(f_data);
        
        /* printf("Dummy Fill: %s\n",dummyfill); */ /*Uncomment to check */
        fclose(f_data);
        
        /* printf("Dummy Fill: %s\n",dummyfill); */ /*Uncomment to check */

-       
+       free(dummyfill);

        return (0);
 }
        return (0);
 }

-
-/**********************************************************************/
-/* EMUFS_REG_ID emufs_tipo2_get_id(EMUFS *efs)                        */
-/* Objetivo: Devuelve un Id apropiado y disponible para un nuevo reg  */
-/* Parametros: EMUFS *emu // Struct con handlers + info del openfile. */
-/**********************************************************************/
-EMUFS_REG_ID emufs_tipo2_get_id(EMUFS *efs)
-{
-       EMUFS_REG_ID n_RegId;
-
-       /* Si no se hallo un id libre, entonces debo usar el maximo + 1 */
-       if ( (n_RegId = emufs_did_get_last(efs)) == -1 )
-               n_RegId = emufs_idx_buscar_mayor_id(efs);
-       
-       return n_RegId; 
-}