* agrego mas fclose faltantes

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

diff --git a/emufs/fsc.c b/emufs/fsc.c
index 465d19fe9383e7a31f579d5d6130b3328a4fb59d..344adb645c36eab8fd6d91f5e59d51c2ee206152 100644 (file)
--- a/emufs/fsc.c
+++ b/emufs/fsc.c
@@ -36,8 +36,9 @@
  */
 
 #include "fsc.h"
  */
 
 #include "fsc.h"

+#include "error.h"
+#include "common.h"

 #include <unistd.h>
 #include <unistd.h>

-#include <sys/types.h>

 #include <string.h>
 
 /* Crea un archivo de Gaps o Espacio Libre en Bloque */
 #include <string.h>
 
 /* Crea un archivo de Gaps o Espacio Libre en Bloque */


@@ -57,6 +58,7 @@ int emufs_fsc_agregar(EMUFS *emu, EMUFS_BLOCK_ID marker, EMUFS_FREE freespace)
        strcat(name_f_fsc, EMUFS_FSC_EXT);
        
        /* Lo guardo en el archivo al final "a+"*/
        strcat(name_f_fsc, EMUFS_FSC_EXT);
        
        /* Lo guardo en el archivo al final "a+"*/

+       PERR(name_f_fsc);

        if ( (f_fsc = fopen(name_f_fsc,"r+"))==NULL ) return -1;
        /* lo busco.. si esta lo modifico y si no lo agrego */
        fseek(f_fsc,0,SEEK_SET);
        if ( (f_fsc = fopen(name_f_fsc,"r+"))==NULL ) return -1;
        /* lo busco.. si esta lo modifico y si no lo agrego */
        fseek(f_fsc,0,SEEK_SET);


@@ -81,32 +83,32 @@ int emufs_fsc_agregar(EMUFS *emu, EMUFS_BLOCK_ID marker, EMUFS_FREE freespace)
 /* Agrega un GAP en el archivo de Gaps para Filetype 2 */
 int emufs_fsc_agregar_gap(EMUFS *emu, EMUFS_OFFSET marker, EMUFS_FREE freespace)
 {
 /* Agrega un GAP en el archivo de Gaps para Filetype 2 */
 int emufs_fsc_agregar_gap(EMUFS *emu, EMUFS_OFFSET marker, EMUFS_FREE freespace)
 {

-       FILE *f_fsc;
+       FILE *f_fsc;

        EMUFS_FSC gap_aux,gap_before,gap_after,gap_new;
        char name_f_fsc[255];
        EMUFS_REG_ID pos_gap_before = 0, pos_gap_after = 0;
        unsigned long source,destination,limit,file_size,reg_count = 0,cant_moved = 0;
        char found = 0;
        EMUFS_FSC gap_aux,gap_before,gap_after,gap_new;
        char name_f_fsc[255];
        EMUFS_REG_ID pos_gap_before = 0, pos_gap_after = 0;
        unsigned long source,destination,limit,file_size,reg_count = 0,cant_moved = 0;
        char found = 0;

-               
+

        strcpy(name_f_fsc,emu->nombre);
        strcat(name_f_fsc, EMUFS_FSC_EXT);
        strcpy(name_f_fsc,emu->nombre);
        strcat(name_f_fsc, EMUFS_FSC_EXT);

-       
+

        gap_before.marker = -1;
        gap_after.marker = -1;
        gap_before.marker = -1;
        gap_after.marker = -1;

-       
+

        /* Busco si hay un GAP por delante y/o por detras del que se esta por crear */
        /* para en dicho caso realizar un merge! */
        if ( (f_fsc = fopen(name_f_fsc,"r+")) == NULL) return -1; 
        while ( !feof(f_fsc) ){
                if ( fread(&gap_aux,sizeof(EMUFS_FSC),1,f_fsc) != 1) continue;
        /* Busco si hay un GAP por delante y/o por detras del que se esta por crear */
        /* para en dicho caso realizar un merge! */
        if ( (f_fsc = fopen(name_f_fsc,"r+")) == NULL) return -1; 
        while ( !feof(f_fsc) ){
                if ( fread(&gap_aux,sizeof(EMUFS_FSC),1,f_fsc) != 1) continue;

-               
+

                /* Chequeo si es un gap justo anterior al nuestro */
                if (gap_aux.marker+gap_aux.freespace == marker) {
                        gap_before.marker = gap_aux.marker;
                        gap_before.freespace = gap_aux.freespace;
                        pos_gap_before = reg_count;
                }
                /* Chequeo si es un gap justo anterior al nuestro */
                if (gap_aux.marker+gap_aux.freespace == marker) {
                        gap_before.marker = gap_aux.marker;
                        gap_before.freespace = gap_aux.freespace;
                        pos_gap_before = reg_count;
                }

-               
+

                /* Chequeo si es un gap justo posterior al nuestro */           
                if (gap_aux.marker == marker+freespace) {
                        gap_after.marker = gap_aux.marker;
                /* Chequeo si es un gap justo posterior al nuestro */           
                if (gap_aux.marker == marker+freespace) {
                        gap_after.marker = gap_aux.marker;


@@ -115,8 +117,8 @@ int emufs_fsc_agregar_gap(EMUFS *emu, EMUFS_OFFSET marker, EMUFS_FREE freespace)
                }               
                reg_count += 1;
        }
                }               
                reg_count += 1;
        }

-       
-/* Si no encontre gaps ni por delante ni por detras */
+
+       /* Si no encontre gaps ni por delante ni por detras */

        if ((gap_before.marker == -1) && (gap_after.marker == -1)) {
                /* Lo guardo ordenado donde deba ir */
                gap_new.marker = marker;
        if ((gap_before.marker == -1) && (gap_after.marker == -1)) {
                /* Lo guardo ordenado donde deba ir */
                gap_new.marker = marker;


@@ -124,7 +126,7 @@ int emufs_fsc_agregar_gap(EMUFS *emu, EMUFS_OFFSET marker, EMUFS_FREE freespace)
                /* Busco el gap que sucede a este */
                fseek(f_fsc,0,SEEK_SET);
                while (!feof(f_fsc)) {
                /* Busco el gap que sucede a este */
                fseek(f_fsc,0,SEEK_SET);
                while (!feof(f_fsc)) {

-                       fread(&gap_aux,sizeof(EMUFS_FSC),1,f_fsc);
+                       if (fread(&gap_aux,sizeof(EMUFS_FSC),1,f_fsc) != 1) continue;

                        if (gap_aux.marker > gap_new.marker) {
                                found = 1;
                                break;
                        if (gap_aux.marker > gap_new.marker) {
                                found = 1;
                                break;


@@ -153,69 +155,69 @@ int emufs_fsc_agregar_gap(EMUFS *emu, EMUFS_OFFSET marker, EMUFS_FREE freespace)
                        fseek(f_fsc,0,SEEK_END);
                        fwrite(&gap_new,sizeof(EMUFS_FSC),1,f_fsc);
                }
                        fseek(f_fsc,0,SEEK_END);
                        fwrite(&gap_new,sizeof(EMUFS_FSC),1,f_fsc);
                }

-               
+

                fclose(f_fsc);          
        }
                fclose(f_fsc);          
        }

-       
+

        /* Si encuentro un GAP Justo por delante pero no por detras */
        if ((gap_before.marker != -1) && (gap_after.marker == -1))
        {
        /* Si encuentro un GAP Justo por delante pero no por detras */
        if ((gap_before.marker != -1) && (gap_after.marker == -1))
        {

-         /* Me posiciono en el registro que indica dicho gap y lo reescribo con */
-         /* la suma de los espacios libres */    
-         fseek(f_fsc,sizeof(EMUFS_FSC)*pos_gap_before,0);
-      gap_new.marker = gap_before.marker;
-         gap_new.freespace = gap_before.freespace + freespace;
-         fwrite(&gap_new,sizeof(EMUFS_FSC),1,f_fsc);
-         fclose(f_fsc);
+               /* Me posiciono en el registro que indica dicho gap y lo reescribo con */
+               /* la suma de los espacios libres */      
+               fseek(f_fsc,sizeof(EMUFS_FSC)*pos_gap_before,0);
+               gap_new.marker = gap_before.marker;
+               gap_new.freespace = gap_before.freespace + freespace;
+               fwrite(&gap_new,sizeof(EMUFS_FSC),1,f_fsc);
+               fclose(f_fsc);

        }
        }

-       
+

        /* Si encuentro un GAP Justo por detras pero no por delante */
        if ((gap_before.marker == -1) && (gap_after.marker != -1))
        {  
        /* Si encuentro un GAP Justo por detras pero no por delante */
        if ((gap_before.marker == -1) && (gap_after.marker != -1))
        {  

-         /* Me posiciono en el registro que indica dicho gap y lo reescribo con */
-         /* los datos actualizados de offset y espacio */
-         fseek(f_fsc,sizeof(EMUFS_FSC)*pos_gap_after,0);
-      gap_new.marker = gap_after.marker - freespace;
-         gap_new.freespace = gap_after.freespace + freespace;
-         fwrite(&gap_new,sizeof(EMUFS_FSC),1,f_fsc);
-         fclose(f_fsc);
+               /* Me posiciono en el registro que indica dicho gap y lo reescribo con */
+               /* los datos actualizados de offset y espacio */
+               fseek(f_fsc,sizeof(EMUFS_FSC)*pos_gap_after,0);
+               gap_new.marker = gap_after.marker - freespace;
+               gap_new.freespace = gap_after.freespace + freespace;
+               fwrite(&gap_new,sizeof(EMUFS_FSC),1,f_fsc);
+               fclose(f_fsc);

        }
        }

-       
+

        /* Finalmente, si encuentro Justo por delante y por detras..*/
        if ((gap_before.marker != -1) && (gap_after.marker != -1))
        { 
        /* Finalmente, si encuentro Justo por delante y por detras..*/
        if ((gap_before.marker != -1) && (gap_after.marker != -1))
        { 

-         /* Guardo el nuevo GAP que posee los tres espacios sumados */
-         if (pos_gap_before < pos_gap_after) {
-               fseek(f_fsc,sizeof(EMUFS_FSC)*pos_gap_before,0);
-               destination = sizeof(EMUFS_FSC)*pos_gap_after;
-         }
-         else {
-               fseek(f_fsc,sizeof(EMUFS_FSC)*pos_gap_after,0);
-               destination = sizeof(EMUFS_FSC)*pos_gap_before;
-         }
-      gap_new.marker = gap_before.marker;
-         gap_new.freespace = gap_before.freespace + freespace + gap_after.freespace;
-         fwrite(&gap_new,sizeof(EMUFS_FSC),1,f_fsc);
-               
-         /* Preparo el escenario para la movida de registros */
-         source = destination+sizeof(EMUFS_FSC); /* Salteo el gap que elimino! */
-         fseek(f_fsc,0,SEEK_END);
-         file_size = ftell(f_fsc);
-         reg_count = (file_size - source) / sizeof(EMUFS_FSC);
-         
-         /* Comienzo a mover */
-         while (cant_moved < reg_count) {
-        fseek(f_fsc,source,0);
-        fread(&gap_new,sizeof(EMUFS_FSC),1,f_fsc);
-               fseek(f_fsc,-sizeof(EMUFS_FSC)*2,SEEK_CUR);
+               /* Guardo el nuevo GAP que posee los tres espacios sumados */
+               if (pos_gap_before < pos_gap_after) {
+                       fseek(f_fsc,sizeof(EMUFS_FSC)*pos_gap_before,0);
+                       destination = sizeof(EMUFS_FSC)*pos_gap_after;
+               }
+               else {
+                       fseek(f_fsc,sizeof(EMUFS_FSC)*pos_gap_after,0);
+                       destination = sizeof(EMUFS_FSC)*pos_gap_before;
+               }
+               gap_new.marker = gap_before.marker;
+               gap_new.freespace = gap_before.freespace + freespace + gap_after.freespace;

                fwrite(&gap_new,sizeof(EMUFS_FSC),1,f_fsc);
                fwrite(&gap_new,sizeof(EMUFS_FSC),1,f_fsc);

-               source += sizeof(EMUFS_FSC);            
-               ++cant_moved;
-         }
-         fclose(f_fsc);
-         truncate(name_f_fsc, file_size - sizeof(EMUFS_FSC));
+
+               /* Preparo el escenario para la movida de registros */
+               source = destination+sizeof(EMUFS_FSC); /* Salteo el gap que elimino! */
+               fseek(f_fsc,0,SEEK_END);
+               file_size = ftell(f_fsc);
+               reg_count = (file_size - source) / sizeof(EMUFS_FSC);
+
+               /* Comienzo a mover */
+               while (cant_moved < reg_count) {
+                       fseek(f_fsc,source,0);
+                       fread(&gap_new,sizeof(EMUFS_FSC),1,f_fsc);
+                       fseek(f_fsc,-sizeof(EMUFS_FSC)*2,SEEK_CUR);
+                       fwrite(&gap_new,sizeof(EMUFS_FSC),1,f_fsc);
+                       source += sizeof(EMUFS_FSC);            
+                       ++cant_moved;
+               }
+               fclose(f_fsc);
+               truncate(name_f_fsc, file_size - sizeof(EMUFS_FSC));

        }       
        }       

-       
+

     return 0;
 }
 
     return 0;
 }
 


@@ -358,7 +360,7 @@ EMUFS_BLOCK_ID emufs_fsc_buscar_lugar(EMUFS *emu, EMUFS_FREE reg_size, EMUFS_FRE
 
 /** Busca n lugares consecutivos devolviendo el id del primer bloque. */
 EMUFS_BLOCK_ID emufs_fsc_buscar_n_lugares(EMUFS* efs, size_t n,
 
 /** Busca n lugares consecutivos devolviendo el id del primer bloque. */
 EMUFS_BLOCK_ID emufs_fsc_buscar_n_lugares(EMUFS* efs, size_t n,

-               EMUFS_FREE reg_size, EMUFS_FREE *freespace, int* err)
+               EMUFS_FREE size, EMUFS_FREE *freespace, int* err)

 {
        FILE *f_fsc;
        EMUFS_FSC reg;
 {
        FILE *f_fsc;
        EMUFS_FSC reg;


@@ -367,7 +369,7 @@ EMUFS_BLOCK_ID emufs_fsc_buscar_n_lugares(EMUFS* efs, size_t n,
        /* chequeo que al menos se busque un lugar */
        if (!n) {
                PERR("Se debe buscar al menos un lugar");
        /* chequeo que al menos se busque un lugar */
        if (!n) {
                PERR("Se debe buscar al menos un lugar");

-               *err = 13; /* EMUFS_ERROR_WRONG_ARGUMENT */
+               *err = EMUFS_ERROR_WRONG_ARGUMENT;

                return EMUFS_NOT_FOUND;
        }
 
                return EMUFS_NOT_FOUND;
        }
 


@@ -376,7 +378,7 @@ EMUFS_BLOCK_ID emufs_fsc_buscar_n_lugares(EMUFS* efs, size_t n,
        strcat(name_f_fsc, EMUFS_FSC_EXT);
        if (!(f_fsc = fopen(name_f_fsc, "rb"))) {
                PERR("No se puede abrir archivo");
        strcat(name_f_fsc, EMUFS_FSC_EXT);
        if (!(f_fsc = fopen(name_f_fsc, "rb"))) {
                PERR("No se puede abrir archivo");

-               *err = 4; /* EMUFS_ERROR_CANT_OPEN_FILE */
+               *err = EMUFS_ERROR_CANT_OPEN_FILE;

                return EMUFS_NOT_FOUND;
        }
 
                return EMUFS_NOT_FOUND;
        }
 


@@ -385,10 +387,11 @@ EMUFS_BLOCK_ID emufs_fsc_buscar_n_lugares(EMUFS* efs, size_t n,
                if ((fread(&reg, sizeof(EMUFS_FSC), 1, f_fsc) != 1)) {
                        if (feof(f_fsc)) break;
                        PERR("No se puede leer el archivo");
                if ((fread(&reg, sizeof(EMUFS_FSC), 1, f_fsc) != 1)) {
                        if (feof(f_fsc)) break;
                        PERR("No se puede leer el archivo");

-                       *err = 3; /* EMUFS_ERROR_FILE_READ */
+                       *err = EMUFS_ERROR_FILE_READ;
+                       fclose(f_fsc);

                        return EMUFS_NOT_FOUND;
                }
                        return EMUFS_NOT_FOUND;
                }

-               if (reg.freespace >= reg_size) {
+               if (reg.freespace >= size) {

                        int found = 1;
                        EMUFS_BLOCK_ID first_id = reg.marker;
                        *freespace = reg.freespace;
                        int found = 1;
                        EMUFS_BLOCK_ID first_id = reg.marker;
                        *freespace = reg.freespace;


@@ -396,11 +399,12 @@ EMUFS_BLOCK_ID emufs_fsc_buscar_n_lugares(EMUFS* efs, size_t n,
                                if (fread(&reg, sizeof(EMUFS_FSC), 1, f_fsc) != 1) {
                                        if (feof(f_fsc)) break;
                                        PERR("No se puede leer el archivo");
                                if (fread(&reg, sizeof(EMUFS_FSC), 1, f_fsc) != 1) {
                                        if (feof(f_fsc)) break;
                                        PERR("No se puede leer el archivo");

-                                       *err = 3; /* EMUFS_ERROR_FILE_READ */
+                                       *err = EMUFS_ERROR_FILE_READ;
+                                       fclose(f_fsc);

                                        return EMUFS_NOT_FOUND;
                                }
                                /* no hay otro lugar consecutivo */
                                        return EMUFS_NOT_FOUND;
                                }
                                /* no hay otro lugar consecutivo */

-                               if (reg.freespace < reg_size) {
+                               if (reg.freespace < size) {

                                        found = 0;
                                        break;
                                }
                                        found = 0;
                                        break;
                                }


@@ -452,7 +456,8 @@ EMUFS_FREE emufs_fsc_get_total_fs(EMUFS *emu)
        total = 0;
        while ( !feof(f_fsc) ){
                if ( fread(&reg, sizeof(EMUFS_FSC), 1, f_fsc) != 1) continue;
        total = 0;
        while ( !feof(f_fsc) ){
                if ( fread(&reg, sizeof(EMUFS_FSC), 1, f_fsc) != 1) continue;

-               total += reg.freespace;
+               if ( reg.freespace > 0 )
+                       total += reg.freespace;

        }
        fclose(f_fsc);
        return total;
        }
        fclose(f_fsc);
        return total;


@@ -519,12 +524,12 @@ EMUFS_FREE emufs_fsc_get_media_fs(EMUFS *emu)
        else return 0;
 }
 
        else return 0;
 }
 

-int emufs_fsc_get_cant_bloques_vacios(EMUFS *emu)
+EMUFS_BLOCK_ID emufs_fsc_get_cant_bloques_vacios(EMUFS *emu)

 {
        FILE *f_fsc;
        EMUFS_FSC reg;
        char name_f_fsc[255];
 {
        FILE *f_fsc;
        EMUFS_FSC reg;
        char name_f_fsc[255];

-       int cant=0;
+       EMUFS_BLOCK_ID cant=0;

        
        strcpy(name_f_fsc,emu->nombre);
        strcat(name_f_fsc, EMUFS_FSC_EXT);
        
        strcpy(name_f_fsc,emu->nombre);
        strcat(name_f_fsc, EMUFS_FSC_EXT);


@@ -548,3 +553,29 @@ int emufs_fsc_truncate(EMUFS* efs, EMUFS_BLOCK_ID blocks)
        strcat(name_f_fsc, EMUFS_FSC_EXT);
        return truncate(name_f_fsc, blocks * sizeof(EMUFS_FSC));
 }
        strcat(name_f_fsc, EMUFS_FSC_EXT);
        return truncate(name_f_fsc, blocks * sizeof(EMUFS_FSC));
 }

+
+EMUFS_BLOCK_ID emufs_fsc_get_num_blocks(EMUFS* efs)
+{
+       FILE *f_fsc;
+       char name_f_fsc[255];
+       EMUFS_BLOCK_ID cant = 0;
+       
+       strcpy(name_f_fsc, efs->nombre);
+       strcat(name_f_fsc, EMUFS_FSC_EXT);
+
+       if (!(f_fsc = fopen(name_f_fsc, "ab"))) {
+               PERR("error al abrir archivo .fsc");
+               return EMUFS_NOT_FOUND;
+       }
+       cant = ftell(f_fsc) / sizeof(EMUFS_FSC);
+       fclose(f_fsc);
+       return cant;
+}
+
+long emufs_fsc_get_file_size(EMUFS* efs, int* err)
+{
+       char name[255];
+       strcpy(name, efs->nombre);
+       strcat(name, EMUFS_FSC_EXT);
+       return emufs_common_get_file_size(name, err);
+}