*----------------------------------------------------------------------------
* Creado: vie abr 9 16:17:50 ART 2004
* Autores: Nicolás Dimov <sagardua@uolsinectis.com.ar>
+ * Leandro Lucarella <llucare@fi.uba.ar>
*----------------------------------------------------------------------------
*
* $Id$
#include <string.h>
#include <unistd.h>
-int emufs_fsc_agregar(EMUFS *emu, int num_bloque, int fs)
+/* Crea un archivo de Gaps o Espacio Libre en Bloque */
+int emufs_fsc_crear(EMUFS* efs)
+{
+ return emufs_crear_archivo_auxiliar(efs->nombre, EMUFS_FSC_EXT);
+}
+
+/* Agrega un registro al archivo de espacio libre en bloque. */
+int emufs_fsc_agregar(EMUFS *emu, EMUFS_BLOCK_ID n_marker, EMUFS_FREE n_freespace)
{
FILE *f_fsc;
EMUFS_FSC reg;
strcpy(name_f_fsc,emu->nombre);
strcat(name_f_fsc, EMUFS_FSC_EXT);
- /*cargo el registro*/
- reg.block = num_bloque;
- reg.free_space = fs;
- /*lo guardo en el archivo al final "a+"*/
+ /* Cargo el registro */
+ reg.n_marker = n_marker;
+ reg.n_freespace = n_freespace;
+
+ /* Lo guardo en el archivo al final "a+"*/
if ( (f_fsc = fopen(name_f_fsc,"a+"))==NULL ) return -1;
fwrite(®,sizeof(EMUFS_FSC),1,f_fsc);
fclose(f_fsc);
return 0;
}
-/* busca el bloque y le resta fs de espacio libre */
-int emufs_fsc_actualizar(EMUFS *emu, int num_bloque, int fs)
+/* Agrega un GAP en el archivo de Gaps para Filetype 2 */
+int emufs_fsc_agregar_gap(EMUFS *emu, EMUFS_OFFSET n_marker, EMUFS_FREE n_freespace)
+{
+ FILE *f_fsc;
+ EMUFS_FSC gap_aux,gap_before,gap_after,gap_new;
+ char name_f_fsc[255];
+ EMUFS_REG_ID n_gap_before = 0, n_gap_after = 0;
+ unsigned long n_source,n_destination,n_filesize,n_reg_count = 0,n_moved = 0;
+
+
+ strcpy(name_f_fsc,emu->nombre);
+ strcat(name_f_fsc, EMUFS_FSC_EXT);
+
+ gap_before.n_marker = -1;
+ gap_after.n_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;
+
+ /* Chequeo si es un gap justo anterior al nuestro */
+ if (gap_aux.n_marker+gap_aux.n_freespace == n_marker) {
+ gap_before.n_marker = gap_aux.n_marker;
+ gap_before.n_freespace = gap_aux.n_freespace;
+ n_gap_before = n_reg_count;
+ }
+
+ /* Chequeo si es un gap justo posterior al nuestro */
+ if (gap_aux.n_marker == n_marker+n_freespace) {
+ gap_after.n_marker = gap_aux.n_marker;
+ gap_after.n_freespace = gap_aux.n_freespace;
+ n_gap_after = n_reg_count;
+ }
+ n_reg_count += 1;
+ }
+
+ /* Si no encontre gaps ni por delante ni por detras */
+ if ((gap_before.n_marker == -1) && (gap_after.n_marker == -1)) {
+ /* Lo guardo en el archivo al final */
+ gap_new.n_marker = n_marker;
+ gap_new.n_freespace = n_freespace;
+ fseek(f_fsc,0,SEEK_END);
+ fwrite(&gap_new,sizeof(EMUFS_FSC),1,f_fsc);
+ fclose(f_fsc);
+ }
+
+ /* Si encuentro un GAP Justo por delante pero no por detras */
+ if ((gap_before.n_marker != -1) && (gap_after.n_marker == -1))
+ {
+ printf("fsc.c >> Found GAP justo por Delante pero no por Detras!!\n");
+ printf("fsc.c >> Gap found is reg number %lu in .fsc file\n",n_gap_before);
+ /* 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)*n_gap_before,0);
+ gap_new.n_marker = gap_before.n_marker;
+ gap_new.n_freespace = gap_before.n_freespace + n_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.n_marker == -1) && (gap_after.n_marker != -1))
+ {
+ printf("fsc.c >> Found GAP justo por Detras pero no por Delante!!\n");
+ printf("fsc.c >> Gap found is reg number %lu in .fsc file\n",n_gap_after);
+ /* 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)*n_gap_after,0);
+ gap_new.n_marker = gap_after.n_marker - n_freespace;
+ gap_new.n_freespace = gap_after.n_freespace + n_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.n_marker != -1) && (gap_after.n_marker != -1))
+ {
+ printf("fsc.c >> Found GAP justo por Delante y por Detras!!\n");
+ printf("fsc.c >> Pre Gap found is reg number %lu in .fsc file\n",n_gap_before);
+ printf("fsc.c >> Post Gap found is reg number %lu in .fsc file\n",n_gap_after);
+ /* Guardo el nuevo GAP que posee los tres espacios sumados */
+ fseek(f_fsc,sizeof(EMUFS_FSC)*n_gap_before,0);
+ gap_new.n_marker = gap_before.n_marker;
+ gap_new.n_freespace = gap_before.n_freespace + n_freespace + gap_after.n_freespace;
+ fwrite(&gap_new,sizeof(EMUFS_FSC),1,f_fsc);
+
+ /* Guardamos la posicion actual del fpi pues sera en donde comenzaremos */
+ /* a mover los registros a recompactar. Ademas, calculo cuantos regs mover */
+ n_destination = sizeof(EMUFS_FSC)*n_gap_after;
+ n_source = n_destination+sizeof(EMUFS_FSC); /* Salteo el gap_after! */
+ fseek(f_fsc,0,SEEK_END);
+ n_filesize = ftell(f_fsc);
+ n_reg_count = (n_filesize - n_source) / sizeof(EMUFS_FSC);
+ printf("Destination: %lu Source: %lu Cant Regs a Mover: %lu\n",n_destination,n_source,n_reg_count);
+
+ /* Comienzo a mover */
+ while (n_moved < n_reg_count) {
+ fseek(f_fsc,n_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);
+ n_source += sizeof(EMUFS_FSC);
+ ++n_moved;
+ }
+ fclose(f_fsc);
+ truncate(name_f_fsc, n_filesize - sizeof(EMUFS_FSC));
+ }
+
+ return 0;
+}
+
+/* Objetivo: Actualiza un registro de espacio libre de acorde al FType */
+int emufs_fsc_actualizar(EMUFS *emu, EMUFS_BLOCK_ID n_marker, EMUFS_FREE n_freespace)
{
FILE *f_fsc;
EMUFS_FSC reg;
strcpy(name_f_fsc,emu->nombre);
strcat(name_f_fsc, EMUFS_FSC_EXT);
- /*busco el bloque que modifique*/
+ /*busco el bloque o gap que modifique*/
if ( (f_fsc = fopen(name_f_fsc,"r+")) == NULL) return -1;
while ( !feof(f_fsc) ){
if ( fread(®,sizeof(EMUFS_FSC),1,f_fsc) != 1) continue;
- if ( reg.block == num_bloque ){
- reg.free_space = fs;
+ if ( reg.n_marker == n_marker ){
+ reg.n_freespace = n_freespace;
fseek(f_fsc,-sizeof(EMUFS_FSC),SEEK_CUR);
fwrite(®,sizeof(EMUFS_FSC),1,f_fsc);
break;
return 0;
}
-/* me devuelve el ID del bloque donde quepa un registro, y guarda en fs el espacio libre que queda en el bloque */
-int emufs_fsc_buscar_lugar(EMUFS *emu, unsigned long tam, int *fs)
+/* Me devuelve el ID del bloque u Offset del Gap donde quepa un registro, y guarda en n_freespace el espacio libre actualizado */
+EMUFS_BLOCK_ID emufs_fsc_buscar_lugar(EMUFS *emu, EMUFS_FREE regsize, EMUFS_FREE *freespace)
{
FILE *f_fsc;
EMUFS_FSC reg;
char name_f_fsc[255];
+ char found = 0;
strcpy(name_f_fsc,emu->nombre);
strcat(name_f_fsc, EMUFS_FSC_EXT);
- if ( (f_fsc = fopen(name_f_fsc,"r"))==NULL ) return -1;
+ if ( (f_fsc = fopen(name_f_fsc,"r"))==NULL ) return EMUFS_NOT_FOUND;
- /* Inicializo la estructura para evitar que si el archivo esta vacio
- * el resultado sea correcto
- */
- reg.block = -1;
- *fs = emu->tam_bloque;
- while( !feof(f_fsc) ){
+ /* Inicializamos la estructura para devolver algun valor en concreto */
+ /* en caso de que no se halle un espacio libre apropiado */
+ while(!feof(f_fsc)){
if (fread(®,sizeof(EMUFS_FSC),1,f_fsc) != 1) continue;
- if (reg.free_space >= tam) {
+ if (reg.n_freespace >= regsize) {
+ found = 1;
break;
- } else {
- reg.block = -1;
- *fs = emu->tam_bloque;
}
}
+ /* Si salio por error o por fin de archivo y no encontro space... */
+ if (!found) {
+ reg.n_marker = EMUFS_NOT_FOUND;
+ *freespace = emu->tam_bloque;
+ }
+ else *freespace = reg.n_freespace;
+
fclose(f_fsc);
- if (reg.block != -1)
- *fs = reg.free_space;
- return reg.block;
+ return reg.n_marker;
}
-int emufs_fsc_get_fs(EMUFS *emu, int num_bloque)
+/* Devuelve el espacio libre de un Bloque o Gap dado */
+EMUFS_FREE emufs_fsc_get_fs(EMUFS *emu, EMUFS_BLOCK_ID n_marker)
{
FILE *f_fsc;
EMUFS_FSC reg;
strcpy(name_f_fsc,emu->nombre);
strcat(name_f_fsc, EMUFS_FSC_EXT);
+ /* Busco el Bloque o Gap pedido y obtengo su espacio libre */
if ( (f_fsc = fopen(name_f_fsc,"r"))==NULL ) return -1;
-
while ( !feof(f_fsc) ){
if ( fread(®,sizeof(EMUFS_FSC),1,f_fsc) != 1 ) continue;
- if ( reg.block == num_bloque )
+ if ( reg.n_marker == n_marker )
break;
}
fclose(f_fsc);
- return reg.free_space;
+ return reg.n_freespace;
}
-