+
+/* 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 n_RegSize, EMUFS_FREE *n_FreeSpace)
+{
+ FILE *f_fsc;
+ EMUFS_FSC reg;
+ char name_f_fsc[255];
+ unsigned short int b_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;
+
+ /* Inicializamos la estructura para devolver algun valor en concreto */
+ /* en caso de que no se halle un espacio libre apropiado */
+ while(!feof(f_fsc) && !b_Found){
+ if (fread(®,sizeof(EMUFS_FSC),1,f_fsc) != 1) continue;
+ if (reg.n_FreeSpace >= n_RegSize) b_Found = 1;
+ }
+
+ /* Si salio por error o por fin de archivo y no encontro space... */
+ if (!b_Found) {
+ reg.n_Marker = -1;
+ *n_FreeSpace = emu->tam_bloque;
+ }
+ else *n_FreeSpace = reg.n_FreeSpace;
+
+ fclose(f_fsc);
+ return reg.n_Marker;
+}
+
+/* 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;
+ char name_f_fsc[255];
+
+ 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.n_Marker == n_Marker )
+ break;
+ }
+
+ fclose(f_fsc);
+ return reg.n_FreeSpace;
+}