/** Arbol B+ */
+#include "tipo1.h"
+#include "tipo3.h"
#include "indices.h"
#include "indice_bplus.h"
/* Si es un hoja, busco dentro de la hoja, otherwise, busco la hoja */
if (nodo->nivel == 0) {
/* Vemos en que bloque deberia ir */
- while ( i >= 0 && query->clave.i_clave < nodo->claves[i].i_clave ) i--;
+ while ( i >= 0 && emufs_indice_es_menor(idx,query->clave,nodo->claves[i])) i--;
if (i < 0) {
/* La clave es menor que todas, debo insertarla */
b_plus_destruir_nodo(nodo);
}
else {
/* Buscamos por donde descender al siguiente nivel */
- while ( i >= 0 && query->clave.i_clave < nodo->claves[i].i_clave ) i--;
+ while ( i >= 0 && emufs_indice_es_menor(idx,query->clave,nodo->claves[i])) i--;
i++;
num_node = nodo->hijos[i];
b_plus_destruir_nodo(nodo);
/* Muevo siempre el encadenamiento */
nodo->hijos[i+2] = nodo->hijos[i+1];
/* Ahora muevo las claves y sus punteros a bloques del dat */
- while ( i >= 0 && query->clave.i_clave < nodo->claves[i].i_clave ){
+ while ( i >= 0 && emufs_indice_es_menor(idx,query->clave,nodo->claves[i])){
nodo->claves[i+1] = nodo->claves[i];
nodo->hijos[i+1] = nodo->hijos[i];
i--;
nodo->cant_claves++;
b_plus_grabar_nodo(idx, nodo, num_nodo);
} else {
- while ( i >= 0 && query->clave.i_clave < nodo->claves[i].i_clave )
+ while ( i >= 0 && emufs_indice_es_menor(idx,query->clave,nodo->claves[i]))
i--;
i++;
num_nodo_hijo = nodo->hijos[i];
hijo = b_plus_leer_nodo(idx, num_nodo_hijo);
if ( hijo->cant_claves == idx->size_claves/sizeof(CLAVE) ) {
b_plus_split_child(idx, num_nodo, nodo, i, hijo);
- if ( query->clave.i_clave > nodo->claves[i].i_clave )
+ /* OjO Utilizo el menor pero con el proposito de clave > nodo->clave) */
+ if (emufs_indice_es_menor(idx,nodo->claves[i],query->clave))
i++;
}
if (hijo) b_plus_destruir_nodo(hijo);
/* Si es un hoja, busco dentro de la hoja, otherwise, busco la hoja */
if (nodo->nivel == 0) {
/* Vemos si esta la clave */
- while ( i >= 0 && query->clave.i_clave != nodo->claves[i].i_clave ) i--;
+ while ( i >= 0 && !emufs_indice_es_igual(idx,query->clave,nodo->claves[i])) i--;
if (i < 0)
{
b_plus_destruir_nodo(nodo);
}
else {
/* Buscamos por donde descender al siguiente nivel */
- while ( i >= 0 && query->clave.i_clave < nodo->claves[i].i_clave ) i--;
+ while ( i >= 0 && emufs_indice_es_menor(idx,query->clave,nodo->claves[i])) i--;
i++;
num_node = nodo->hijos[i];
b_plus_destruir_nodo(nodo);
int b_plus_buscar_prepost(INDICE *idx, CLAVE key, int num_node, INDEX_DAT *prepostkey, int search_type)
{
int i = 0, exitcode = 0;
- NODO_B_PLUS *nodo = b_plus_leer_nodo(idx,num_node);
+ NODO_B_PLUS *child = NULL;
+ NODO_B_PLUS *nodo = b_plus_leer_nodo(idx,num_node);
if (nodo == NULL) return -1;
i = nodo->cant_claves - 1;
if (nodo->nivel == 0) {
- while ( i >= 0 && key.i_clave < nodo->claves[i].i_clave ) --i;
+ while ( i >= 0 && emufs_indice_es_menor(idx,key,nodo->claves[i])) --i;
switch (search_type) {
/* Busco predecesor en la hoja */
case 0: if (i <= 0) exitcode = 0;
else {
- if (nodo->claves[i].i_clave == key.i_clave) {
+ if (emufs_indice_es_igual(idx,nodo->claves[i],key)) {
prepostkey->clave = nodo->claves[i-1];
prepostkey->num_bloque = nodo->hijos[i-1];
} else {
}
break;
/* Busco sucesor en la hoja */
- case 1: if ((nodo->claves[i].i_clave == key.i_clave) && (i == nodo->cant_claves-1)) exitcode = 0;
+ case 1: if (i == nodo->cant_claves-1) exitcode = 0;
else {
- prepostkey->clave = nodo->claves[i+1];
+ prepostkey->clave = nodo->claves[i+1];
prepostkey->num_bloque = nodo->hijos[i+1];
exitcode = 1;
}
}
} else {
/* Veo por que rama debo seguir buscando el pre o post */
- while ( i >= 0 && key.i_clave < nodo->claves[i].i_clave ) --i;
+ while ( i >= 0 && emufs_indice_es_menor(idx,key,nodo->claves[i])) --i;
if (search_type == 0) {
if (i < 0) exitcode = b_plus_buscar_prepost(idx,key,nodo->hijos[i+1],prepostkey,search_type);
else {
/* Handleo busqueda de clave menor o igual que todas */
if (exitcode == 0) exitcode = -1;
} else {
- /* Busco un sucesor, y funciona como getbloque... */
+ /* Busco un sucesor como get bloque */
exitcode = b_plus_buscar_prepost(idx,key,nodo->hijos[i+1],prepostkey,search_type);
/* Veo si tengo que devolver la clave izquierda del padre del que acabo de buscar */
- if (exitcode == 0) {
+ if (exitcode == 0)
+ {
if (i < nodo->cant_claves-1) {
- prepostkey->clave = nodo->claves[i+1];
+ child = b_plus_leer_nodo(idx,nodo->hijos[i+2]);
+ prepostkey->clave = child->claves[0];
+ prepostkey->num_bloque = child->hijos[0];
exitcode = 1;
} else exitcode = -1;
}
i = nodo->cant_claves - 1;
/* Busco la clave y reemplazo */
- while ( i >= 0 && key.i_clave != nodo->claves[i].i_clave ) --i;
+ while ( i >= 0 && !emufs_indice_es_igual(idx,key,nodo->claves[i])) --i;
if (i < 0) return -1; /* Error, no esta la clave */
/* Cheque por las dudas si es hoja o interno, aunque deberia ser hoja */
/* Si es hoja, borro directamente la clave. No se producira underflow
pues lo asegura la recursividad del delete */
if (nodo->nivel == 0) {
- while ( i >= 0 && key.i_clave != nodo->claves[i].i_clave ) --i;
+ while ( i >= 0 && !emufs_indice_es_igual(idx,key,nodo->claves[i])) --i;
if (i < 0) return -1;
/* Encontre la clave en la pos i, la borro */
for (j = i; j < nodo->cant_claves-1; ++j) {
return 0;
} else {
/* Me debo fijar si esta la clave en este nodo interno, sino busco */
- while ( i >= 0 && key.i_clave != nodo->claves[i].i_clave ) --i;
+ while ( i >= 0 && !emufs_indice_es_igual(idx,key,nodo->claves[i])) --i;
if (i < 0) {
PERR("Entre caso 3 del eliminar");
/* No esta en este nodo interno, caso 3. Determino en que rama debe estar */
i = nodo->cant_claves - 1;
- while ( i >= 0 && key.i_clave < nodo->claves[i].i_clave ) --i;
+ while ( i >= 0 && emufs_indice_es_menor(idx,key,nodo->claves[i])) --i;
i++;
cant_claves_child = b_plus_cant_claves_nodo(idx,nodo->hijos[i]);
if (cant_claves_child > minclaves) emufs_b_plus_eliminar(idx,key,nodo->hijos[i]);
b_plus_grabar_nodo(idx,node_y,nodo->hijos[i]);
b_plus_grabar_nodo(idx,nodo,num_node);
b_plus_destruir_nodo(node_y);
- b_plus_destruir_nodo(node_z);
+ b_plus_destruir_nodo(node_z);
/* Borro recursivamente KEY entrando por Child que ahora tiene minclaves+1 */
emufs_b_plus_eliminar(idx,key,nodo->hijos[i]);
}
fclose(fp);
return num;
}
+
+CLAVE emufs_b_plus_obtener_menor_clave(INDICE *idx) {
+
+ CLAVE key;
+ NODO_B_PLUS *node;
+ int num_child = 0;
+ node = b_plus_leer_nodo(idx,0);
+ if (node == NULL) {
+ key.i_clave = -1;
+ return key;
+ }
+
+ while (node->nivel > 0) {
+ /* Deciendo por la rama de mas hacia la izquierda */
+ if (node->cant_claves > 0) {
+ num_child = node->hijos[0];
+ b_plus_destruir_nodo(node);
+ node = b_plus_leer_nodo(idx,num_child);
+ }
+ else break;
+ }
+
+ /* Ahora estoy en la primer hoja del arbol, devuelvo la primer clave */
+ key = node->claves[0];
+ b_plus_destruir_nodo(node);
+
+ return key;
+}
+
+CLAVE emufs_b_plus_obtener_mayor_clave(INDICE *idx) {
+
+ CLAVE key;
+ NODO_B_PLUS *node;
+ int num_child = 0, cant_claves = 0;
+ node = b_plus_leer_nodo(idx,0);
+ if (node == NULL) {
+ key.i_clave = -1;
+ return key;
+ }
+
+ cant_claves = node->cant_claves;
+ while (node->nivel > 0) {
+ /* Deciendo por la rama de mas hacia la derecha */
+ if (node->cant_claves > 0) {
+ num_child = node->hijos[cant_claves];
+ b_plus_destruir_nodo(node);
+ node = b_plus_leer_nodo(idx,num_child);
+ cant_claves = node->cant_claves;
+ }
+ else return key;
+ }
+
+ /* Ahora estoy en la primer hoja del arbol, devuelvo la ultima clave */
+ key = node->claves[cant_claves-1];
+ b_plus_destruir_nodo(node);
+
+ return key;
+}
+
+CLAVE emufs_b_plus_obtener_sig_clave(EMUFS *emu, CLAVE key) {
+
+ INDICE *idx = emu->indices;
+ INDEX_DAT query;
+ int i = 0;
+ query.clave = key;
+
+ /* Si aun no tengo un array, obtengo uno */
+ if (emu->indices->keybucket == NULL) {
+ /* Busco el ancla para esta key */
+ emufs_b_plus_get_bloque(idx,&query,0);
+ idx->keybucket = emufs_tipo3_obtener_claves_raw(emu,query.num_bloque);
+ printf ("\nLevante bloque nro: %li y obtuve un bucket con %i keys\n",query.num_bloque,idx->keybucket->cant_keys);
+ return (idx->keybucket->claves[0]);
+ }
+ else {
+ /* Veo si la ultima clave retornada es la ultima del array */
+ if (idx->keybucket->current_key == idx->keybucket->cant_keys-1) {
+ /* Debo obtener un nuevo bucket de claves */
+ if (b_plus_buscar_prepost(idx,idx->keybucket->claves[0],0,&query,1) != -1) {
+ idx->keybucket = emufs_tipo3_obtener_claves_raw(emu,query.num_bloque);
+ printf ("\nLevante bloque nro: %li y obtuve un bucket con %i keys\n",query.num_bloque,idx->keybucket->cant_keys);
+ printf ("\nLa primera clave del bucket que devuelvo es: %i\n",idx->keybucket->claves[0]);
+ }
+ else return key;
+ }
+ }
+
+ /* Busco la clave en el array de atras hacia adelante. */
+ if (idx->keybucket->current_key < idx->keybucket->cant_keys-1) {
+ i = idx->keybucket->cant_keys - 1;
+ while (i >= 0 && emufs_indice_es_menor(idx,key,idx->keybucket->claves[i])) --i;
+ ++i;
+ idx->keybucket->current_key = i;
+ return (idx->keybucket->claves[i]);
+ }
+ else return key;
+}
projects / z.facultad / 75.06 / emufs.git / blobdiff