+#include "error.h"
+#include "common.h"
+#include <unistd.h>
+#include <string.h>
+
+/* 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 marker, EMUFS_FREE freespace)
+{
+ FILE *f_fsc;
+ EMUFS_FSC reg;
+ char name_f_fsc[255];
+
+ 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(®,sizeof(EMUFS_FSC),1,f_fsc) != 1) continue;
+ if ( reg.marker == marker ){
+ fseek(f_fsc,-sizeof(EMUFS_FSC),SEEK_CUR);
+ reg.freespace = freespace;
+ fwrite(®,sizeof(EMUFS_FSC),1,f_fsc);
+ fclose(f_fsc);
+ return 0;
+ }
+ }
+ /* Cargo el registro */
+ reg.marker = marker;
+ reg.freespace = freespace;
+ fwrite(®,sizeof(EMUFS_FSC),1,f_fsc);
+ fclose(f_fsc);
+ return 0;
+}
+
+/* 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;
+ 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);
+
+ 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;
+
+ /* 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;
+ gap_after.freespace = gap_aux.freespace;
+ pos_gap_after = reg_count;
+ }
+ reg_count += 1;
+ }
+
+ /* 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;
+ gap_new.freespace = freespace;
+ /* Busco el gap que sucede a este */
+ fseek(f_fsc,0,SEEK_SET);
+ while (!feof(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 (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);
+ }
+
+ /* 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);
+ }
+
+ /* 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);
+ }