* Bugfix : en procesar_leer_registro para tipo1 me estaba pasando 1 char

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

diff --git a/emufs/fsc.c b/emufs/fsc.c
index 17a7244215fc1b792b9e3dc7e328e5d2631f8633..ffcad7943ba94acd2e942263ef05874a903a5359 100644 (file)
--- a/emufs/fsc.c
+++ b/emufs/fsc.c
@@ -55,12 +55,23 @@ int emufs_fsc_agregar(EMUFS *emu, EMUFS_BLOCK_ID marker, EMUFS_FREE freespace)
        strcpy(name_f_fsc,emu->nombre);
        strcat(name_f_fsc, EMUFS_FSC_EXT);
        
+       /* Lo guardo en el archivo al final "a+"*/
+       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);
+       while ( !feof(f_fsc) ){
+               if ( fread(&reg,sizeof(EMUFS_FSC),1,f_fsc) != 1) continue;
+               if ( reg.marker == marker ){
+                       fseek(f_fsc,-sizeof(EMUFS_FSC),SEEK_CUR);
+                       reg.freespace = freespace;
+                       fwrite(&reg,sizeof(EMUFS_FSC),1,f_fsc);
+                       fclose(f_fsc);
+                       return 0;
+               }
+       }
        /* Cargo el registro */
        reg.marker = marker;
        reg.freespace = freespace;
-
-       /* Lo guardo en el archivo al final "a+"*/
-       if ( (f_fsc = fopen(name_f_fsc,"a+"))==NULL ) return -1;
        fwrite(&reg,sizeof(EMUFS_FSC),1,f_fsc);
        fclose(f_fsc);
        return 0;
@@ -73,7 +84,8 @@ int emufs_fsc_agregar_gap(EMUFS *emu, EMUFS_OFFSET marker, EMUFS_FREE freespace)
        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,file_size,reg_count = 0,cant_moved = 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);
@@ -105,11 +117,42 @@ int emufs_fsc_agregar_gap(EMUFS *emu, EMUFS_OFFSET marker, EMUFS_FREE freespace)
        
        /* Si no encontre gaps ni por delante ni por detras */
        if ((gap_before.marker == -1) && (gap_after.marker == -1)) {
-               /* Lo guardo en el archivo al final */
+               /* Lo guardo ordenado donde deba ir */
                gap_new.marker = marker;
                gap_new.freespace = freespace;
-               fseek(f_fsc,0,SEEK_END);
-               fwrite(&gap_new,sizeof(EMUFS_FSC),1,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 (gap_aux.marker > gap_new.marker) {
+                               found = 1;
+                               break;
+                       }
+               }
+               if (found == 1) {
+                       /* Movemos todos los gaps desde el sucesor hasta el final, una pos adelante */
+                       limit = ftell(f_fsc) - sizeof(EMUFS_FSC);
+                       fseek(f_fsc,0,SEEK_END);
+                       reg_count = (ftell(f_fsc) - limit) / sizeof(EMUFS_FSC);                 
+                       source = ftell(f_fsc) - sizeof(EMUFS_FSC);
+
+                       while (cant_moved < reg_count)
+                       {
+                               fseek(f_fsc,source,SEEK_SET);
+                               fread(&gap_aux,sizeof(EMUFS_FSC),1,f_fsc);
+                               fwrite(&gap_aux,sizeof(EMUFS_FSC),1,f_fsc);
+                               source -= sizeof(EMUFS_FSC);
+                               ++cant_moved;
+                       }
+                       /* Agrego el nuevo registro */
+                       fseek(f_fsc,limit,SEEK_SET);
+                       fwrite(&gap_new,sizeof(EMUFS_FSC),1,f_fsc);
+               }
+               else {
+                       fseek(f_fsc,0,SEEK_END);
+                       fwrite(&gap_new,sizeof(EMUFS_FSC),1,f_fsc);
+               }
+               
                fclose(f_fsc);          
        }
        
@@ -280,6 +323,17 @@ EMUFS_BLOCK_ID emufs_fsc_buscar_lugar(EMUFS *emu, EMUFS_FREE reg_size, EMUFS_FRE
 
        if ( (f_fsc = fopen(name_f_fsc,"r"))==NULL ) return EMUFS_NOT_FOUND;
 
+       if ( emu->tam_reg > emu->tam_bloque-sizeof(EMUFS_REG_ID) ){
+               fseek(f_fsc,0,SEEK_SET);
+               while(!feof(f_fsc)){
+                       if (fread(&reg,sizeof(EMUFS_FSC),1,f_fsc) != 1) continue;
+                       if (reg.freespace == emu->tam_bloque) {
+                               fclose(f_fsc);
+                               *freespace = reg.freespace;
+                               return reg.marker;
+                       }
+               }
+       }       
        /* Inicializamos la estructura para devolver algun valor en concreto */
        /* en caso de que no se halle un espacio libre apropiado */
        while(!feof(f_fsc)){
@@ -342,29 +396,64 @@ EMUFS_FREE emufs_fsc_get_total_fs(EMUFS *emu)
        fclose(f_fsc);
        return total;
 }
-/*
-EMUFS_FREE emufs_fsc_get_max_min_fs(EMUFS *emu, int *min, int *max)
+
+int emufs_fsc_get_max_min_fs(EMUFS *emu, EMUFS_FREE *min, EMUFS_FREE *max)
+{
+       FILE *f_fsc;
+       EMUFS_FSC reg;
+       char name_f_fsc[255];
+       
+       strcpy(name_f_fsc,emu->nombre);
+       strcat(name_f_fsc, EMUFS_FSC_EXT);
+
+       if ( (f_fsc = fopen(name_f_fsc,"r"))==NULL ) return -1;
+               
+       /* Si el file esta vacio, devuelvo valores nulos */
+       fseek(f_fsc,0,SEEK_END);
+       if (ftell(f_fsc) == 0) {
+               *min = 0;
+               *max = 0;
+               return 0;               
+       }
+       else
+       {
+               /* Busco Min y Max */
+               *min = ULONG_MAX;
+               *max = 0;               
+               fseek(f_fsc,0,SEEK_SET);                
+               while ( !feof(f_fsc) ){
+                       if ( fread(&reg, sizeof(EMUFS_FSC), 1, f_fsc) != 1) continue;
+                       if (  reg.freespace < *min )
+                               *min = reg.freespace;
+                       if ( reg.freespace > *max )
+                               *max = reg.freespace;
+               }
+               fclose(f_fsc);
+               return 0;               
+       }
+}
+
+EMUFS_FREE emufs_fsc_get_media_fs(EMUFS *emu)
 {
        FILE *f_fsc;
        EMUFS_FSC reg;
        char name_f_fsc[255];
+       EMUFS_FREE total_fs = 0;
+       EMUFS_REG_ID gap_count = 0;
        
        strcpy(name_f_fsc,emu->nombre);
        strcat(name_f_fsc, EMUFS_FSC_EXT);
 
-       *min = emu->tam_bloque;
-       *max = 0;
        if ( (f_fsc = fopen(name_f_fsc,"r"))==NULL ) return -1;
        
        while ( !feof(f_fsc) ){
-               fread(&reg, sizeof(EMUFS_FSC), 1, f_fsc);
-               if (  reg.freespace < *min )
-                       *min = reg.freespace;
-               if ( reg.freespace > *max )
-                       *max = reg.freespace;
+               if ( fread(&reg, sizeof(EMUFS_FSC), 1, f_fsc) != 1) continue;           
+               total_fs += reg.freespace;
+               ++gap_count;
        }
 
        fclose(f_fsc);
-       return 0;
+       
+       if (gap_count > 0) return total_fs/gap_count;
+       else return 0;
 }
-*/