X-Git-Url: https://git.llucax.com/z.facultad/75.06/emufs.git/blobdiff_plain/f5f9e412009380bc5aea316c9ff48ea379f17f0c..502a6f92fd7acf3c942a92b41bf0ed788a128515:/emufs/fsc.c

diff --git a/emufs/fsc.c b/emufs/fsc.c
index 17a7244..05e29a8 100644
--- a/emufs/fsc.c
+++ b/emufs/fsc.c
@@ -36,8 +36,10 @@
  */
 
 #include "fsc.h"
-#include <string.h>
+#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)
@@ -55,12 +57,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;
@@ -69,31 +82,32 @@ int emufs_fsc_agregar(EMUFS *emu, EMUFS_BLOCK_ID marker, EMUFS_FREE freespace)
 /* 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;
+	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,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);
-	
+
 	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;
@@ -102,76 +116,107 @@ 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 */
 	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)) {
+			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);
+		/* 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);
+		/* 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);
 	}
-	
+
 	/* Finalmente, si encuentro Justo por delante y por detras..*/
 	if ((gap_before.marker != -1) && (gap_after.marker != -1))
 	{ 
-	  /* Guardo el nuevo GAP que posee los tres espacios sumados */
-	  if (pos_gap_before < pos_gap_after) {
-		fseek(f_fsc,sizeof(EMUFS_FSC)*pos_gap_before,0);
-		destination = sizeof(EMUFS_FSC)*pos_gap_after;
-	  }
-	  else {
-	  	fseek(f_fsc,sizeof(EMUFS_FSC)*pos_gap_after,0);
-		destination = sizeof(EMUFS_FSC)*pos_gap_before;
-	  }
-      gap_new.marker = gap_before.marker;
-	  gap_new.freespace = gap_before.freespace + freespace + gap_after.freespace;
-	  fwrite(&gap_new,sizeof(EMUFS_FSC),1,f_fsc);
-		
-	  /* Preparo el escenario para la movida de registros */
-	  source = destination+sizeof(EMUFS_FSC); /* Salteo el gap que elimino! */
-	  fseek(f_fsc,0,SEEK_END);
-	  file_size = ftell(f_fsc);
-	  reg_count = (file_size - source) / sizeof(EMUFS_FSC);
-	  
-	  /* Comienzo a mover */
-	  while (cant_moved < reg_count) {
-        fseek(f_fsc,source,0);
-        fread(&gap_new,sizeof(EMUFS_FSC),1,f_fsc);
-		fseek(f_fsc,-sizeof(EMUFS_FSC)*2,SEEK_CUR);
+		/* Guardo el nuevo GAP que posee los tres espacios sumados */
+		if (pos_gap_before < pos_gap_after) {
+			fseek(f_fsc,sizeof(EMUFS_FSC)*pos_gap_before,0);
+			destination = sizeof(EMUFS_FSC)*pos_gap_after;
+		}
+		else {
+			fseek(f_fsc,sizeof(EMUFS_FSC)*pos_gap_after,0);
+			destination = sizeof(EMUFS_FSC)*pos_gap_before;
+		}
+		gap_new.marker = gap_before.marker;
+		gap_new.freespace = gap_before.freespace + freespace + gap_after.freespace;
 		fwrite(&gap_new,sizeof(EMUFS_FSC),1,f_fsc);
-		source += sizeof(EMUFS_FSC);		
-		++cant_moved;
-	  }
-	  fclose(f_fsc);
-	  truncate(name_f_fsc, file_size - sizeof(EMUFS_FSC));
+
+		/* Preparo el escenario para la movida de registros */
+		source = destination+sizeof(EMUFS_FSC); /* Salteo el gap que elimino! */
+		fseek(f_fsc,0,SEEK_END);
+		file_size = ftell(f_fsc);
+		reg_count = (file_size - source) / sizeof(EMUFS_FSC);
+
+		/* Comienzo a mover */
+		while (cant_moved < reg_count) {
+			fseek(f_fsc,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);
+			source += sizeof(EMUFS_FSC);		
+			++cant_moved;
+		}
+		fclose(f_fsc);
+		truncate(name_f_fsc, file_size - sizeof(EMUFS_FSC));
 	}	
-	
+
     return 0;
 }
 
@@ -280,6 +325,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)){
@@ -301,6 +357,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 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 = 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 = 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 = EMUFS_ERROR_FILE_READ;
+			return EMUFS_NOT_FOUND;
+		}
+		if (reg.freespace >= 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 = EMUFS_ERROR_FILE_READ;
+					return EMUFS_NOT_FOUND;
+				}
+				/* no hay otro lugar consecutivo */
+				if (reg.freespace < 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)
 {
@@ -342,29 +458,121 @@ 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) ){
+		if ( fread(&reg, sizeof(EMUFS_FSC), 1, f_fsc) != 1) continue;		
+		total_fs += reg.freespace;
+		++gap_count;
+	}
+
+	fclose(f_fsc);
+	
+	if (gap_count > 0) return total_fs/gap_count;
+	else return 0;
+}
+
+EMUFS_BLOCK_ID emufs_fsc_get_cant_bloques_vacios(EMUFS *emu)
+{
+	FILE *f_fsc;
+	EMUFS_FSC reg;
+	char name_f_fsc[255];
+	EMUFS_BLOCK_ID cant=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;
 	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 ( reg.freespace == emu->tam_bloque )
+			cant++;
 	}
+		
+	fclose(f_fsc);
+	return cant;
+}
+
+int emufs_fsc_truncate(EMUFS* efs, EMUFS_BLOCK_ID blocks)
+{
+	char name_f_fsc[255];
 
+	strcpy(name_f_fsc, efs->nombre);
+	strcat(name_f_fsc, EMUFS_FSC_EXT);
+	return truncate(name_f_fsc, blocks * sizeof(EMUFS_FSC));
+}
+
+EMUFS_BLOCK_ID emufs_fsc_get_num_blocks(EMUFS* efs)
+{
+	FILE *f_fsc;
+	char name_f_fsc[255];
+	EMUFS_BLOCK_ID cant = 0;
+	
+	strcpy(name_f_fsc, efs->nombre);
+	strcat(name_f_fsc, EMUFS_FSC_EXT);
+
+	if (!(f_fsc = fopen(name_f_fsc, "ab"))) {
+		PERR("error al abrir archivo .fsc");
+		return EMUFS_NOT_FOUND;
+	}
+	cant = ftell(f_fsc) / sizeof(EMUFS_FSC);
 	fclose(f_fsc);
-	return 0;
+	return cant;
 }
-*/
+
+long emufs_fsc_get_file_size(EMUFS* efs, int* err)
+{
+	char name[255];
+	strcpy(name, efs->nombre);
+	strcat(name, EMUFS_FSC_EXT);
+	return emufs_common_get_file_size(name, err);
+}
+