X-Git-Url: https://git.llucax.com/z.facultad/75.06/emufs.git/blobdiff_plain/866ee030a930b725a701bd35445b1bcd82506a87..439bc9dba0fb23fa34afeebb80e1288d9f8d39f4:/emufs/tipo1.c

diff --git a/emufs/tipo1.c b/emufs/tipo1.c
index 4e72fee..fb21da5 100644
--- a/emufs/tipo1.c
+++ b/emufs/tipo1.c
@@ -994,7 +994,7 @@ int emufs_tipo1_eliminar_ordenado(EMUFS *emu, CLAVE clave, INDICE_DATO dato)
 	INDEX_DAT query;
 	int result, iter, cant_reg, leidos;
 	EMUFS_REG_SIZE tam_reg;
-	CLAVE clave_ajena;
+	CLAVE clave_ajena, ancla;
 	int err = 0;
 	
 	/*cargo el query para buscar*/
@@ -1016,18 +1016,13 @@ int emufs_tipo1_eliminar_ordenado(EMUFS *emu, CLAVE clave, INDICE_DATO dato)
 		PERR("NO SE CARGO EL BLOQUE");
 		return -1;
 	}
+	/*me fijo si el que tengo que eliminar es el ancla del bloque*/
+	ancla = emufs_indice_generar_clave(emu->indices, bloque+sizeof(EMUFS_TIPO1_REG_HEADER));
 	/*leo la cantidad de registros en el bloque*/
 	memcpy(&cant_reg, bloque+emu->tam_bloque-sizeof(int), sizeof(int));
 	/*busco y elimino*/
 	iter = 0;
 	aux = bloque;
-	/*me fijo si el que tengo que eliminar es el ancla del bloque*/
-	clave_ajena = emufs_indice_generar_clave(emu->indices, bloque+sizeof(EMUFS_TIPO1_REG_HEADER));
-	if ( emufs_indice_es_igual(emu->indices, clave, clave_ajena) ){
-		/* TENGOQ QUE BORRAR LA CLAVE DEL ARBOL !!!!*/
-		/* Y HAY QUE BORRAR EL BLOQUE DEL ARCHIVO*/
-	}
-	leidos = 0;
 	while ( iter < emu->tam_bloque /*&& leidos < cant_reg*/){
 		memcpy(&tam_reg, aux+sizeof(EMUFS_REG_ID), sizeof(EMUFS_REG_SIZE));
 		clave_ajena = emufs_indice_generar_clave(emu->indices, aux+sizeof(EMUFS_TIPO1_REG_HEADER));
@@ -1040,7 +1035,6 @@ int emufs_tipo1_eliminar_ordenado(EMUFS *emu, CLAVE clave, INDICE_DATO dato)
 			iter += tam_reg+sizeof(EMUFS_TIPO1_REG_HEADER);
 			break;/*ya borre, corto aca*/
 		}
-		leidos++;
 		iter += tam_reg+sizeof(EMUFS_TIPO1_REG_HEADER);
 		aux += tam_reg+sizeof(EMUFS_TIPO1_REG_HEADER);
 	}
@@ -1055,6 +1049,16 @@ int emufs_tipo1_eliminar_ordenado(EMUFS *emu, CLAVE clave, INDICE_DATO dato)
 		free(bloque);
 		return -1;
 	}
+	/*me fijo si el que tengo que eliminar es el ancla del bloque*/
+	if ( emufs_indice_es_igual(emu->indices, clave, ancla) ){
+		if ( cant_reg == 0 )
+			emufs_b_plus_eliminar(emu->indices, clave, 0);
+		else {
+			/*obtengo la nueva ancla del bloque*/
+			query.clave = emufs_indice_generar_clave(emu->indices, bloque+sizeof(EMUFS_TIPO1_REG_HEADER));
+			emufs_b_plus_reemplazar_clave(emu->indices, ancla, query, 0);
+		}
+	}
 	free(bloque);
 	return 0;
 }