Se termina el fatidico tipo1.

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

diff --git a/emufs/fsc.c b/emufs/fsc.c
index 562ae32fa2bd905b597718761a15cd1a6733365e..9063c81ebdbdd78f86377bf166fed803443bcda7 100644 (file)
--- a/emufs/fsc.c
+++ b/emufs/fsc.c
@@ -84,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);
@@ -114,13 +115,44 @@ int emufs_fsc_agregar_gap(EMUFS *emu, EMUFS_OFFSET marker, EMUFS_FREE freespace)
                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 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);          
        }
        
@@ -323,6 +355,66 @@ EMUFS_BLOCK_ID emufs_fsc_buscar_lugar(EMUFS *emu, EMUFS_FREE reg_size, EMUFS_FRE
        return reg.marker;
 }
 
+/** 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)
+{
+       FILE *f_fsc;
+       EMUFS_FSC reg;
+       char name_f_fsc[255];
+
+       /* chequeo que al menos se busque un lugar */
+       if (!n) {
+               PERR("Se debe buscar al menos un lugar");
+               *err = 13; /* EMUFS_ERROR_WRONG_ARGUMENT */
+               return EMUFS_NOT_FOUND;
+       }
+
+       /* abre archivo */
+       strcpy(name_f_fsc, efs->nombre);
+       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 */
+               return EMUFS_NOT_FOUND;
+       }
+
+       /* busca el espacio libre */
+       while(!feof(f_fsc)) {
+               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 */
+                       return EMUFS_NOT_FOUND;
+               }
+               if (reg.freespace >= reg_size) {
+                       int found = 1;
+                       EMUFS_BLOCK_ID first_id = reg.marker;
+                       *freespace = reg.freespace;
+                       while (--n) {
+                               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 */
+                                       return EMUFS_NOT_FOUND;
+                               }
+                               /* no hay otro lugar consecutivo */
+                               if (reg.freespace < reg_size) {
+                                       found = 0;
+                                       break;
+                               }
+                       }
+                       if (found) {
+                               fclose(f_fsc);
+                               return first_id;
+                       }
+               }
+       }
+       /* no se encontró espacio libre */
+       *freespace = efs->tam_bloque;
+       return EMUFS_NOT_FOUND;
+}
+
 /* Devuelve el espacio libre de un Bloque o Gap dado */
 EMUFS_FREE emufs_fsc_get_fs(EMUFS *emu, EMUFS_BLOCK_ID marker)
 {