X-Git-Url: https://git.llucax.com/z.facultad/75.06/emufs.git/blobdiff_plain/381a5f98d66c8a3847d9918077a351b4813558fd..e1b83d7a86a1982cf9936cc354a969d68303d351:/emufs/tipo2.c

diff --git a/emufs/tipo2.c b/emufs/tipo2.c
index 40ff8d2..e5b2632 100644
--- a/emufs/tipo2.c
+++ b/emufs/tipo2.c
@@ -62,18 +62,31 @@ int emufs_tipo2_inicializar(EMUFS* efs)
 }
 
 /* Lee y devuelve un registro de un archivo del Tipo 2. */
-void *emufs_tipo2_leer_registro(EMUFS* efs, EMUFS_REG_ID id_reg, EMUFS_REG_SIZE* reg_size, int *err)
+void *emufs_tipo2_leer_registro(EMUFS* efs, CLAVE clave, EMUFS_REG_SIZE* reg_size, int *err)
 {
 	FILE* f_data;
 	char *registro; /* registro a leer */
 	char  name_f[255];	
 	EMUFS_OFFSET reg_offset; /* offset donde se encuentra el registro */
-	
+	EMUFS_REG_ID id_reg;
+	INDICE_DATO dato;
+
 	strcpy(name_f,efs->nombre);
 	strcat(name_f,".dat");
 
 	/* Obtenemos la posicion del registro en el .dat */
-	reg_offset = emufs_idx_buscar_registro(efs, id_reg);
+	/*si existe, lo busco en el archivo de bloques*/
+	/* TODO VER COMO SACAR EL ERROR!=1 por otra cosa!! XXX */
+	if ((efs->indices != NULL) && (*err != 1)) {
+		/* TODO : Verificar donde esta el indice primario */
+		dato = efs->indices->existe_entrada(efs->indices, clave);
+		reg_offset = dato.bloque;
+		id_reg = dato.id;
+	} else {
+		id_reg = clave.i_clave;
+		reg_offset = emufs_idx_buscar_registro(efs, id_reg);
+		(*err) = 0;
+	}
 	if (reg_offset == EMUFS_NOT_FOUND) {
 		PERR("Registro no encontrado");
 		*err = EMUFS_NOT_FOUND;
@@ -86,7 +99,7 @@ void *emufs_tipo2_leer_registro(EMUFS* efs, EMUFS_REG_ID id_reg, EMUFS_REG_SIZE*
 		*err = EMUFS_ERROR_CANT_OPEN_FILE;
 		return NULL;
 	}
-	fseek(f_data,reg_offset+sizeof(EMUFS_REG_ID),0);
+	fseek(f_data,reg_offset+sizeof(EMUFS_REG_ID),SEEK_SET);
 	fread(reg_size,sizeof(EMUFS_REG_SIZE),1,f_data);
 	registro = (char*)malloc(*reg_size);
 	fread(registro,*reg_size,1,f_data);
@@ -98,6 +111,7 @@ void *emufs_tipo2_leer_registro(EMUFS* efs, EMUFS_REG_ID id_reg, EMUFS_REG_SIZE*
 /* Grabar un registro en un archivo del Tipo 2. */
 EMUFS_REG_ID emufs_tipo2_grabar_registro(EMUFS *efs, void *ptr, EMUFS_REG_SIZE reg_size, int* err)
 {
+	INDICE_DATO idx_data;
 	EMUFS_REG_ID id_reg;
 	EMUFS_FREE freespace;
 	EMUFS_OFFSET wrt_offset,reg_offset;
@@ -109,13 +123,15 @@ EMUFS_REG_ID emufs_tipo2_grabar_registro(EMUFS *efs, void *ptr, EMUFS_REG_SIZE r
 	strcpy(name_f,efs->nombre);
 	strcat(name_f,".dat");
 	
-	if ( (f_data = fopen(name_f,"r+"))==NULL ) return -1; /*ERROR*/
+	if ( (f_data = fopen(name_f,"r+"))==NULL ) {
+		PERR("ERROR AL ABRIR EL ARCHIVO");
+		return -1; /*ERROR*/
+	}
 	
 	/* Obtengo un offset en donde iniciar la escritura de mi registro */
 	/* de manera segura (habra espacio suficiente) */
 	fisic_size = sizeof(EMUFS_REG_ID)+sizeof(EMUFS_REG_SIZE)+reg_size;
 	wrt_offset = emufs_fsc_buscar_lugar(efs,fisic_size,&freespace);
-	/*printf("tipo2.c >> Recording Reg > Searching FSC: Offset = %lu FSpace: %lu\n", n_WrtOffset, n_FreeSpace);*/
 	
 	/* Si no encontre un gap, entonces escribo el registro al final */
 	if (wrt_offset == -1) {		       
@@ -157,21 +173,34 @@ EMUFS_REG_ID emufs_tipo2_grabar_registro(EMUFS *efs, void *ptr, EMUFS_REG_SIZE r
 		
 	/* Finalmente, actualizamos el indice de registros (offsets) */
 	emufs_idx_agregar(efs,id_reg,reg_offset);
-		
+	idx_data.id = id_reg;
+	idx_data.bloque = reg_offset;
+	emufs_indice_agregar(efs->indices, (char *)ptr, idx_data);
+
 	return id_reg;
 }
 
 /* Borra un registro determinado y actualiza los archivos de Posicion Relativa (Indice-Offset) y el de Gaps */
-int emufs_tipo2_borrar_registro(EMUFS *efs, EMUFS_REG_ID id_reg)
+int emufs_tipo2_borrar_registro(EMUFS *efs, CLAVE k)
 {	
 	EMUFS_OFFSET reg_offset,reg_size;
-	 
-	/* Obtenemos el offset donde arranca el registro */
-	if ((reg_offset = emufs_idx_buscar_registro(efs,id_reg)) == EMUFS_NOT_FOUND) {
-		/* TODO Manejo de errores */
-		PERR("Registro no encontrado");
+	EMUFS_REG_ID id_reg;
+	INDICE_DATO dato; 
+
+	if (efs->indices != NULL) {
+		dato = efs->indices->existe_entrada(efs->indices, k);
+		id_reg = dato.id;
+		reg_offset = dato.bloque;
+	} else {
+		/* Obtenemos el offset donde arranca el registro */
+		id_reg = k.i_clave;
+		if ((reg_offset = emufs_idx_buscar_registro(efs,id_reg)) == EMUFS_NOT_FOUND) {
+			PERR("Registro no encontrado");
 	  	return EMUFS_NOT_FOUND;
+		}
 	}
+
+	if (id_reg == -1) return EMUFS_NOT_FOUND;
 	
 	/* Obtenemos el Size del Registro en cuestion y hacemos un dummyfill*/
 	emufs_tipo2_get_regsize(efs,reg_offset,&reg_size);	
@@ -236,9 +265,9 @@ int emufs_tipo2_dummyfill(EMUFS *efs, EMUFS_OFFSET reg_pos, EMUFS_REG_SIZE amoun
 }
 
 /* Realiza la actualizacin de un registro ya existente */
-EMUFS_REG_ID emufs_tipo2_modificar_registro(EMUFS *efs, EMUFS_REG_ID id, void *data, EMUFS_REG_SIZE size, int *error)
+EMUFS_REG_ID emufs_tipo2_modificar_registro(EMUFS *efs, CLAVE k, void *data, EMUFS_REG_SIZE size, int *error)
 {
-	emufs_tipo2_borrar_registro(efs, id);
+	emufs_tipo2_borrar_registro(efs, k);
 	return emufs_tipo2_grabar_registro(efs, data, size, error);
 }
 
@@ -247,23 +276,28 @@ EMUFS_Estadisticas emufs_tipo2_leer_estadisticas(EMUFS *efs)
 {
     EMUFS_Estadisticas stats;
 	EMUFS_REG_ID *tmp;
-	unsigned long fsc_size = 0,idx_size = 0;
+	int err = 0, err1 = 0, err2 = 0, err3 = 0;
 	char name_f[255];
-	FILE *file;
-
-	strcpy(name_f,efs->nombre);
-	strcat(name_f,".dat");
 	
 	/* Inicializo las stats por si hay error somewhere */
 	stats.tam_archivo = 0;
-	stats.tam_archivo_bytes = 0;
-	stats.tam_datos_bytes = 0;
-	stats.info_control = 0;
+	stats.tam_archivos_aux = 0;
+	stats.tam_info_control_dat = 0;
 	stats.media_fs = 0;
 	stats.total_fs = 0;
 	stats.max_fs = 0;
 	stats.min_fs = 0;
 	stats.cant_bloques = 0;
+	stats.cant_registros = 0;	
+	
+	/* Obtengo el tamaño del .dat */
+	strcpy(name_f,efs->nombre);
+	strcat(name_f,".dat");
+	stats.tam_archivo = emufs_common_get_file_size(name_f,&err);	
+	if (err) {
+		PERR("no se pudo obtener el tamaño del archivo");
+		return stats;
+	}	
 	
 	/* Obtengo las stats de FSC */
 	stats.total_fs = emufs_fsc_get_total_fs(efs);
@@ -271,43 +305,19 @@ EMUFS_Estadisticas emufs_tipo2_leer_estadisticas(EMUFS *efs)
 	emufs_fsc_get_max_min_fs(efs,&stats.min_fs,&stats.max_fs);
 	
 	/* Cant registros */
-	tmp = emufs_idx_get(efs,&stats.tam_archivo);
-	free(tmp);
-	
-	/* Size del archivo de datos */
-	if ( (file = fopen(name_f,"ab")) == NULL){
-			PERR("No se pudo abrir el archivo");
-			return stats;	
-	}
-	stats.tam_archivo_bytes = ftell(file);
-	fclose(file);
-
- 	/* Size del archivo de Espacio Libre */	
-	strcpy(name_f,efs->nombre);
-	strcat(name_f,EMUFS_FSC_EXT);
-	if ( (file = fopen(name_f,"ab")) == NULL){
-	    PERR("No se pudo abrir el archivo");
-		return stats;	
-	}
-	fsc_size = ftell(file);
-	fclose(file);
-	
- 	/* Size del archivo Indice */	
-	strcpy(name_f,efs->nombre);
-	strcat(name_f,EMUFS_IDX_EXT);
-	if ( (file = fopen(name_f,"ab")) == NULL){
-	    PERR("No se pudo abrir el archivo");
-		return stats;	
-	}
-	idx_size = ftell(file);
-	fclose(file);
-	
-	/* Cantidad de Bytes en info de control */
-	stats.info_control = idx_size + fsc_size + sizeof(EMUFS_REG_ID)*stats.tam_archivo + sizeof(EMUFS_REG_SIZE)*stats.tam_archivo + sizeof(EMUFS_Tipo);
-	
-	/* Cantida de Bytes en Datos */
-	stats.tam_datos_bytes = stats.tam_archivo_bytes - sizeof(EMUFS_Tipo) - (sizeof(EMUFS_REG_ID) + sizeof(EMUFS_REG_SIZE)) * stats.tam_archivo;
-	
+	tmp = emufs_idx_get(efs,&stats.cant_registros);
+	if (tmp) free(tmp);
+	
+	/* Cantidad de bytes de info de control del .dat */
+	stats.tam_info_control_dat = (sizeof(EMUFS_REG_ID) + sizeof(EMUFS_REG_SIZE)) * stats.cant_registros + sizeof(EMUFS_Tipo);
+	
+	/* Cantidad de bytes en info de control archivos auxiliares */
+	stats.tam_archivos_aux = emufs_idx_get_file_size(efs,&err1) + emufs_fsc_get_file_size(efs,&err2) + emufs_did_get_file_size(efs,&err3);
+	if (err1 || err2 || err3) {
+		PERR("Hubo problemas en lectura de filesize archivos auxiliares");
+		return stats;
+	}	
+		
 	return(stats);	
 }
 
@@ -337,6 +347,7 @@ void emufs_tipo2_compactar(EMUFS *efs)
 	/* Obtengo la cantidad de gaps */
 	if ( (fscfile = fopen(name_ffsc,"rb")) == NULL){
 			PERR("No se pudo abrir el archivo");
+			fclose(datfile);
 			return;
 	}
 	fseek(fscfile,0,SEEK_END);
@@ -472,10 +483,42 @@ int emufs_tipo2_updateidx(EMUFS *efs)
 	return 0;	
 }
 
-void* emufs_tipo2_leer_registro_raw(EMUFS *emu, EMUFS_REG_ID id, EMUFS_REG_SIZE *size, int *pos)
+void* emufs_tipo2_leer_registro_raw(EMUFS *efs, EMUFS_REG_ID id, EMUFS_REG_SIZE *size, int *pos)
 {
-	(*size) = 0;
-	(*pos) = 0;
-	PERR("IMPLEMENTAME CABRON");
-	return NULL;
+	FILE* f_data;
+	char *registro; /* registro a leer */
+	char  name_f[255];	
+	EMUFS_OFFSET reg_offset; /* offset donde se encuentra el registro */
+	
+	strcpy(name_f,efs->nombre);
+	strcat(name_f,".dat");
+
+	/* Obtenemos la posicion del registro en el .dat */
+	reg_offset = emufs_idx_buscar_registro(efs, id);
+	if (reg_offset == EMUFS_NOT_FOUND) {
+		PERR("Registro no encontrado");
+		return NULL;
+	}
+	
+	/* Levantamos el registro */
+	if ((f_data = fopen(name_f, "rb")) == NULL) {
+		PERR("No se puede abrir archivo");
+		return NULL;
+	}
+	fseek(f_data,reg_offset+sizeof(EMUFS_REG_ID), SEEK_SET);
+	fread(size,sizeof(EMUFS_REG_SIZE),1,f_data);
+	registro = (char*)malloc(*size+sizeof(EMUFS_REG_ID)+sizeof(EMUFS_REG_SIZE)+100);
+	if (reg_offset >= 50) {
+		fseek(f_data, reg_offset - 50, SEEK_SET);
+		(*pos) = 50;
+	} else {
+		/* Si no hay 50 antes mio, estoy cerca del 0! */
+		(*pos) = reg_offset;
+		fseek(f_data, 0, SEEK_SET);
+	}
+	(*size) += sizeof(EMUFS_REG_ID)+sizeof(EMUFS_REG_SIZE)+100;
+	fread(registro,*size, 1,f_data);
+	fclose(f_data);
+	
+	return registro;
 }