+ 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 && 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]);
+ else {
+ /* Vemos si estamos en caso 3a o 3b, mirando cant_claves de sus siblings */
+ if (i < nodo->cant_claves) cant_claves_rsibling = b_plus_cant_claves_nodo(idx,nodo->hijos[i+1]);
+ if (i > 0) cant_claves_lsibling = b_plus_cant_claves_nodo(idx,nodo->hijos[i-1]);
+ /*printf ("El sibling derecho si existe tiene %i claves\n", cant_claves_rsibling);
+ printf ("El sibling izquierdo si existe tiene %i claves\n", cant_claves_lsibling); */
+ if (cant_claves_rsibling > minclaves) {
+ /* El sibling derecho me dara una key mediante rotacion. Caso 3a */
+ PERR("Entre caso 3a right sibling del eliminar");
+ node_y = b_plus_leer_nodo(idx,nodo->hijos[i]);
+ node_z = b_plus_leer_nodo(idx,nodo->hijos[i+1]);
+ if (node_z->nivel == 0) es_hoja = 1;
+ /* Le bajo la del padre a NodeY y muevo el apropiado child de NodoZ a NodoY */
+ node_y->claves[cant_claves_child] = nodo->claves[i];
+ node_y->hijos[cant_claves_child+1] = node_y->hijos[cant_claves_child];
+ node_y->hijos[cant_claves_child+1-es_hoja] = node_z->hijos[0];
+ node_y->cant_claves++;
+ /* Le subo al padre desde el NodoZ, teniendo en cuenta si es hoja o no */
+ nodo->claves[i] = node_z->claves[es_hoja];
+ /* Hago shifting en el sibling para quitar la que subio */
+ for (j = 0; j < node_z->cant_claves-1; ++j) {
+ node_z->claves[j] = node_z->claves[j+1];
+ node_z->hijos[j] = node_z->hijos[j+1];
+ }
+ node_z->hijos[j] = node_z->hijos[j+1];
+ node_z->cant_claves--;
+ /* Grabo los cambios */
+ b_plus_grabar_nodo(idx,node_z,nodo->hijos[i+1]);
+ 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);
+ /* Borro recursivamente KEY entrando por Child que ahora tiene minclaves+1 */
+ emufs_b_plus_eliminar(idx,key,nodo->hijos[i]);
+ }
+ else if (cant_claves_lsibling > minclaves) {
+ /* el sibling izquierdo me dara una key mediante rotacion Caso 3a */
+ PERR("Entre caso 3a left sibling del eliminar");
+ node_z = b_plus_leer_nodo(idx,nodo->hijos[i]);
+ node_y = b_plus_leer_nodo(idx,nodo->hijos[i-1]);
+ if (node_z->nivel == 0) es_hoja = 1;
+ /* Hago lugar en NodoZ para la clave que bajara desde el padre */
+ /* Muevo el ultimo y restantes claves/punteros */
+ j = node_z->cant_claves - 1;
+ node_z->hijos[j+2] = node_z->hijos[j+1];
+ while (j >= 0){
+ node_z->claves[j+1] = node_z->claves[j];
+ node_z->hijos[j+1] = node_z->hijos[j];
+ j--;
+ }
+ /* Hago la rotacion final segun sea hoja o no */
+ if (es_hoja) {
+ nodo->claves[i-1] = node_y->claves[cant_claves_lsibling-1];
+ node_z->claves[0] = node_y->claves[cant_claves_lsibling-1];
+ node_z->hijos[0] = node_y->hijos[cant_claves_lsibling-1];
+ node_y->hijos[cant_claves_lsibling-1] = node_y->hijos[cant_claves_lsibling]; /* cadena */
+ node_y->cant_claves--;
+ node_z->cant_claves++;
+ } else {
+ node_z->claves[0] = nodo->claves[i-1];
+ node_z->hijos[0] = node_y->hijos[cant_claves_lsibling];
+ nodo->claves[i-1] = node_y->claves[cant_claves_lsibling-1];
+ node_y->cant_claves--;
+ node_z->cant_claves++;
+ }
+ /* Grabo los cambios */
+ b_plus_grabar_nodo(idx,node_y,nodo->hijos[i-1]);
+ b_plus_grabar_nodo(idx,node_z,nodo->hijos[i]);
+ b_plus_grabar_nodo(idx,nodo,num_node);
+ b_plus_destruir_nodo(node_y);
+ 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]);
+ } else {
+ /* Caso 3b, debo bajar una clave y unificar con sibling disponible */
+ PERR("Entre caso 3b del eliminar");
+ if (cant_claves_lsibling == minclaves) {
+ PERR("Hago merge con sibling izquierdo");
+ leftoffset = 1;
+ siblingnode = b_plus_leer_nodo(idx,nodo->hijos[i]); /* Este es el root de la rama! */
+ mergenode = b_plus_leer_nodo(idx,nodo->hijos[i-1]); /* Aca va todo */
+ } else {
+ PERR("Hago merge con sibling derecho");
+ leftoffset = 0;
+ mergenode = b_plus_leer_nodo(idx,nodo->hijos[i]);
+ siblingnode = b_plus_leer_nodo(idx,nodo->hijos[i+1]);
+ }
+
+ /* Bajo una clave del Padre Nodo a MergeNode y muevo todo lo SiblingNode a MergeNode */
+ /* Si es nivel mayor a 1, bajo clave, otherwise no bajo pues se repetiria */
+ nivel_mayor1 = 0;
+ if (nodo->nivel > 1) {
+ nivel_mayor1 = 1;
+ mergenode->claves[minclaves] = nodo->claves[i-leftoffset];
+ }
+ for (j = 0; j < minclaves; ++j) mergenode->claves[j+minclaves+nivel_mayor1] = siblingnode->claves[j];
+ for (j = 0; j < minclaves+1; ++j) mergenode->hijos[j+minclaves+nivel_mayor1] = siblingnode->hijos[j];
+ mergenode->cant_claves = minclaves*2+nivel_mayor1;
+
+ /* Shifteo en el nodo padre NODO, para quitar la que bajo */
+ for (j = i-leftoffset; j < nodo->cant_claves-1; ++j) {
+ nodo->claves[j] = nodo->claves[j+1];
+ nodo->hijos[j+1] = nodo->hijos[j+2];
+ }
+ nodo->cant_claves--;
+ b_plus_grabar_nodo(idx,nodo,num_node);
+ b_plus_grabar_nodo(idx,mergenode,nodo->hijos[i-leftoffset]);
+ b_plus_destruir_nodo(mergenode);
+ b_plus_destruir_nodo(siblingnode);
+ /* Elimino recursivamente Key de la rama apropiada segun el Merge que se hizo */
+ emufs_b_plus_eliminar(idx,key,nodo->hijos[i-leftoffset]);
+ /* Caso muy particular, si hize un merge de la unica clave de una raiz con sus hijos */
+ if ((nodo->nivel == 1) && (nodo->cant_claves == 0)) {
+ /* Debo establecer como nueva raiz, el NodoY */
+ mergenode = b_plus_leer_nodo(idx,nodo->hijos[i-leftoffset]);
+ b_plus_grabar_nodo(idx,mergenode,0);
+ truncate(idx->filename,SIZE_B_PLUS_HEADER+idx->size_claves+idx->size_hijos);
+ }
+ /* End 3b */
+ }
+ }
projects / z.facultad / 75.06 / emufs.git / blobdiff