X-Git-Url: https://git.llucax.com/z.facultad/75.06/emufs.git/blobdiff_plain/3ff4788e11c87e1e6c9f43fef629f6079415f548..8637995cdbd1c7d71825cc2e5e8d874de10135f6:/emufs/tipo3.c

diff --git a/emufs/tipo3.c b/emufs/tipo3.c
index 5ce17d5..52e182d 100644
--- a/emufs/tipo3.c
+++ b/emufs/tipo3.c
@@ -59,13 +59,18 @@ void* emufs_tipo3_leer_registro(EMUFS *emu, CLAVE clave,
 		cant_bloques = 1;
 	
 	/*si existe, lo busco en el archivo de bloques*/
-	if (emu->indices != NULL) {
+	if ((emu->indices != NULL) && (*err != 1)) {
 		/* TODO : Verificar donde esta el indice primario */
 		dato = emu->indices->existe_entrada(emu->indices, clave);
 		block = dato.bloque;
 		ID = dato.id;
+		PERR("Use indice");
 	} else {
-		/* TODO ID de donde lo puedo sacar :-) , lo cargo en CLAVE ? */
+		/* Si no tengo claves, uso el campo entero para pasar un ID
+		 * directamente.
+		 */
+		PERR("Use directo");
+		ID = clave.i_clave;
 		block = emufs_idx_buscar_registro(emu,ID); /*me devuelve el nro de bloque al que pertenece el registro*/
 	}
 	if ( block == EMUFS_NOT_FOUND ){
@@ -332,13 +337,14 @@ int emufs_tipo3_grabar_bloque(EMUFS *emu, void *ptr, EMUFS_BLOCK_ID num)
 }
 
 /*borra un registro de un bloque y acomoda los registros que quedan*/
-int emufs_tipo3_borrar_registro(EMUFS *emu, EMUFS_REG_ID ID)
+int emufs_tipo3_borrar_registro(EMUFS *emu, CLAVE k)
 {
 	EMUFS_BLOCK_SIZE num_bloque;
 	EMUFS_BLOCK_SIZE ptr_elim;
 	EMUFS_BLOCK_SIZE ptr_mov;
-	EMUFS_REG_ID ID_aux;
+	EMUFS_REG_ID ID_aux, ID;
 	EMUFS_FREE fs;
+	INDICE_DATO dato;
 	char *bloque;
 	int err = 0, i, cant_bloques;
 
@@ -346,14 +352,26 @@ int emufs_tipo3_borrar_registro(EMUFS *emu, EMUFS_REG_ID ID)
 	cant_bloques = emu->tam_reg/(emu->tam_bloque-sizeof(EMUFS_REG_ID))+1;
 	if ( emu->tam_reg+sizeof(EMUFS_REG_ID) == emu->tam_bloque ) 
 		cant_bloques = 1;
-	
-	num_bloque = emufs_idx_buscar_registro(emu, ID);
+
+	PERR("Buscando datos del registro en el indice");
+	if (emu->indices != NULL) {
+		dato = emu->indices->existe_entrada(emu->indices, k);
+		num_bloque = dato.bloque;
+		ID = dato.id;
+	} else {
+		ID = k.i_clave;
+		num_bloque = emufs_idx_buscar_registro(emu, ID);
+	}
+
 	if (!(bloque = emufs_tipo3_leer_bloque(emu, num_bloque, &err))) {
 		/* TODO Manejo de errores */
 		PERR("no se pudo leer el bloque");
 		return -1;
 	}
 
+	PERR("Borrando clave");
+	/* TODO Borrar en todos los indices!! */
+	emu->indices->borrar_entrada(emu->indices, k);
 	/*apunto al registro que voy a eliminar*/
 	ptr_elim = 0;
 	while ( ptr_elim < emu->tam_bloque ){
@@ -464,9 +482,9 @@ EMUFS_Estadisticas emufs_tipo3_leer_estadisticas(EMUFS *emu)
 	return stats;	
 }
 
-EMUFS_REG_ID emufs_tipo3_modificar_registro(EMUFS *emu, EMUFS_REG_ID id, void *data, EMUFS_REG_SIZE size, int *error)
+EMUFS_REG_ID emufs_tipo3_modificar_registro(EMUFS *emu, CLAVE k, void *data, EMUFS_REG_SIZE size, int *error)
 {
-	emufs_tipo3_borrar_registro(emu, id);
+	emufs_tipo3_borrar_registro(emu, k);
 	return emufs_tipo3_grabar_registro(emu, data, size, error);
 }
 
@@ -567,16 +585,37 @@ void emufs_tipo3_leer_bloque_raw(EMUFS *efs, EMUFS_BLOCK_ID id, char **actual, c
 	(*size1) = (*size2) = (*size3) = efs->tam_bloque;
 }
 
-int emufs_tipo3_insertar_ordenado(EMUFS *emu, void *ptr, CLAVE clave, int *err)
+int emufs_tipo3_insertar_ordenado(EMUFS *emu, void *ptr, EMUFS_REG_SIZE size, int *err)
 {
-	FILE *f;
-	char f_name[255];
-	char *bloque;
+	#ifdef ESTO_NO_ANDA_TODAVIA
+	CLAVE clave, clave_aux;
+	EMUFS_BLOCK_ID num_bloque = get_new_block_number(emu); /*implementar esto*/
+	INDEX_DAT query;
+	char *bloque, *new_bloque, *registro;
+	
+	/*le asigno un posible numero de bloque para el caso en que no encuentre donde meterlo*/
+	query.num_bloque = num_bloque;	
+	/*saco la clave del stream*/
+	query.clave = emufs_indice_generar_clave(emu->indices, ptr);
+	/*mando a buscar en el arbol el bloque correspondiente a esa clave*/
+	emu->indices->emufs_b_plus_get_bloque(ind, &query);
+	/*en query->num_bloque tengo el bloque donde debo meter el registro*/
+	
+	/*cargo el bloque*/
+	bloque = emufs_tipo3_leer_bloque(emu, query.num_bloque, err);
+	if (err != 0){
+		PERR("NO SE PUDO LEER EL BLOQUE");
+		return -1;
+	}
+	
+	/*debo insertar el reg en el bloque en forma ordenada*/
+	/*si es el menor de todos tengo que cambiar el ancla en el arbol*/
+	/*si no entra, tengo que insertar una nueva clave en el arbol y separar los registros en 2 bloques*/
+	
 	
-	strcpy(f_name, emu->nombre);
-	strcat(f_name, ".dat");
 	
 	
 	
+	#endif /*ESTO_NO_ANDA_TODAVIA*/
 	return 0;
 }