src/btree.cpp

   1
   2 #include "btree.h"
   3
   4 BTree::BTree (const std::string &name, unsigned int block_size, int kt, bool create_new_file)
   5 {
   6         key_type = kt;
   7         uchar *node;
   8         BTreeNodeHeader nh;
   9
  10         fp = fopen (name.c_str(), "wb+");
  11         if (!fp) {
  12                 /* TODO : mandar una exception ? */
  13                 return;
  14         }
  15
  16         /* Nombre de archivo */
  17         filename = name;
  18
  19         /* Inicializo el header */
  20         header.block_size = block_size;
  21         WriteFileHeader ();
  22
  23         /* Creo el primer bloque vacio */
  24         node = new uchar[block_size];
  25         ReadNodoHeader (node, &nh);
  26         nh.level = 0;
  27         nh.free_space = block_size - sizeof (BTreeNodeHeader);
  28         nh.item_count = 0;
  29         WriteNodoHeader (node, &nh);
  30         WriteBlock (node, 0);
  31
  32         delete [] node;
  33 }
  34
  35 BTree::~BTree ()
  36 {
  37         fclose (fp);
  38 }
  39
  40 void BTree::WriteFileHeader ()
  41 {
  42         fseek (fp, 0L, SEEK_SET);
  43         fwrite (&header, 1, sizeof (BTreeFileHeader), fp);
  44 }
  45
  46 void BTree::WriteBlock (uchar *block, uint num)
  47 {
  48         num++;
  49         fseek (fp, num*header.block_size, SEEK_SET);
  50         fwrite (block, 1, header.block_size, fp);
  51 }
  52
  53 void BTree::AddKey (const Clave &k)
  54 {
  55         uint left, right;
  56         Clave *kout = AddKeyR (k.Clone (), 0, left, right);
  57
  58         if (kout) {
  59                 unsigned short level;
  60                 /* Debo dejar la raiz en el nodo 0, por lo que paso el nodo
  61                  * que esta usando el hijo izquierdo a un nuevo nodo */
  62                 std::list<BTreeData *> node_keys;
  63                 BTreeNodeHeader node_header;
  64                 uchar *node = ReadBlock (left);
  65                 ReadNodoHeader (node, &node_header);
  66                 node_keys = ReadKeys (node, node_header);
  67                 level = node_header.level + 1;
  68
  69                 uchar *new_node = NewBlock (left);
  70                 delete [] new_node; /* No me interesa, voy a usar lo leio antes */
  71
  72                 WriteKeys (node, node_header, node_keys);
  73                 WriteNodoHeader (node, &node_header);
  74                 WriteBlock (node, left);
  75                 DeleteKeys (node_keys);
  76                 delete [] node;
  77
  78                 /* Leo y actualizo la Raiz */
  79                 node = ReadBlock (0);
  80                 ReadNodoHeader (node, &node_header);
  81                 node_keys = std::list<BTreeData *>();
  82
  83                 node_keys.push_back (new BTreeChildData (left));
  84                 node_keys.push_back (new BTreeData (kout, right));
  85
  86                 node_header.level = level;
  87                 node_header.item_count = 1;
  88
  89                 WriteKeys (node, node_header, node_keys);
  90                 WriteNodoHeader (node, &node_header);
  91                 WriteBlock (node, 0);
  92                 delete [] node;
  93                 DeleteKeys (node_keys);
  94                 PrintNode (0);
  95         }
  96 }
  97
  98 Clave* BTree::AddKeyR (const Clave *k, uint node_num, uint &left_child, uint &right_child)
  99 {
 100         uchar *node = ReadBlock (node_num);
 101         BTreeNodeHeader node_header;
 102         ReadNodoHeader (node, &node_header);
 103         delete [] node;
 104
 105         if (node_header.level == 0)
 106                 return AddKeyLeafR (k, node_num, left_child, right_child);
 107
 108         return AddKeyOtherR (k, node_num, left_child, right_child);
 109 }
 110
 111 Clave* BTree::AddKeyLeafR (const Clave *k, uint node_num, uint &left_child, uint &right_child)
 112 {
 113         Clave *kout = NULL;
 114         std::list<BTreeData *> node_keys;
 115
 116         BTreeData *data = new BTreeLeafData (k->Clone ());
 117
 118         /* Leo el nodo raiz para empezar a agregar */
 119         uchar *node = ReadBlock (node_num);
 120         BTreeNodeHeader node_header;
 121         ReadNodoHeader (node, &node_header);
 122
 123         if (node_header.free_space > data->Size ()) {
 124                 BTreeData *datait;
 125                 node_keys = ReadKeys (node, node_header);
 126                 std::list<BTreeData *>::iterator it = node_keys.begin ();
 127
 128                 while (it != node_keys.end ()) {
 129                         datait = (*it);
 130                         if ((*data) < (*datait))
 131                                 /* Me pase, lo agrego aca! */
 132                                 break;
 133                         it++;
 134                 }
 135                 node_keys.insert (it, data);
 136                 WriteKeys (node, node_header, node_keys);
 137                 WriteNodoHeader (node, &node_header);
 138                 WriteBlock (node, node_num);
 139                 DeleteKeys (node_keys);
 140                 delete [] node;
 141
 142                 PrintNode (node_num);
 143         } else {
 144                 /* Split : Creo e inicializo el nuevo nodo */
 145                 std::list<BTreeData *> new_node_keys;
 146                 std::list<BTreeData *> old_node_keys;
 147                 BTreeNodeHeader new_node_header;
 148                 uint new_node_num;
 149                 uchar *new_node = NewBlock (new_node_num);
 150                 ReadNodoHeader (new_node, &new_node_header);
 151                 new_node_header.level = node_header.level;
 152
 153                 node_keys = ReadKeys (node, node_header);
 154                 new_node_keys = ReadKeys (new_node, new_node_header);
 155
 156                 /* Agrego la clave en la lista que ya tengo de manera ordenada */
 157                 std::list<BTreeData *>::iterator it = node_keys.begin ();
 158                 std::list<BTreeData *>::iterator previt = node_keys.begin ();
 159
 160                 while (it != node_keys.end ()) {
 161                         BTreeData *datait;
 162                         datait = (*it);
 163                         if ((*data) < (*datait))
 164                                 /* Me pase, lo agrego aca! */
 165                                 break;
 166                         previt = it;
 167                         it++;
 168                 }
 169                 if (it != node_keys.end ())
 170                         node_keys.insert (it, data);
 171                 else
 172                         node_keys.push_back (data);
 173
 174                 /* Tengo que guardar claves hasta ocupar nodo size/2 en cada nodo
 175                  * y subir la clave del medio */
 176                 node_header.item_count = 0;
 177                 node_header.free_space = header.block_size - sizeof (BTreeNodeHeader);
 178
 179                 uint total_size = 0;
 180                 it = node_keys.begin ();
 181                 while (it != node_keys.end ()) {
 182                         BTreeData *datait;
 183                         datait = (*it);
 184                         total_size += datait->Size ();
 185                         it++;
 186                         /* Hack : Si me quedo con todas las claves, en el caso de ser
 187                          * del mismo tama#o se desbalancea. Hay que ver que efecto
 188                          * puede tener en el caso de claves de long. variable
 189                          */
 190                         if (it == node_keys.end ())
 191                                 total_size -= datait->Size ();
 192                 }
 193
 194                 it = node_keys.begin ();
 195                 uint used = 0;
 196                 while (used < total_size/2) {
 197                         BTreeData *d = (*it);
 198                         old_node_keys.push_back (d);
 199                         used += d->Size ();
 200                         it++;
 201                 }
 202                 kout = (*it++)->getClave (); // Esta se retorna al "padre" para que se la agregue
 203
 204                 while (it != node_keys.end ()) {
 205                         BTreeData *d = (*it);
 206                         new_node_keys.push_back (d);
 207                         it++;
 208                 }
 209
 210                 /* Guardo */
 211                 WriteKeys (node, node_header, old_node_keys);
 212                 WriteNodoHeader (node, &node_header);
 213                 WriteBlock (node, node_num);
 214                 WriteKeys (new_node, new_node_header, new_node_keys);
 215                 WriteNodoHeader (new_node, &new_node_header);
 216                 WriteBlock (new_node, new_node_num);
 217                 DeleteKeys (old_node_keys);
 218                 DeleteKeys (new_node_keys);
 219
 220                 PrintNode (node_num);
 221                 PrintNode (new_node_num);
 222
 223                 /* Paso los hijos */
 224                 left_child = node_num;
 225                 right_child = new_node_num;
 226                 delete [] new_node;
 227                 delete [] node;
 228         }
 229
 230         return kout;
 231 }
 232
 233 Clave* BTree::AddKeyOtherR (const Clave *k, uint node_num, uint &left_child, uint &right_child)
 234 {
 235         Clave *kout = NULL;
 236         std::list<BTreeData *> node_keys;
 237
 238         BTreeData *data = new BTreeLeafData (k->Clone ());
 239
 240         /* Leo el nodo raiz para empezar a agregar */
 241         uchar *node = ReadBlock (node_num);
 242         BTreeNodeHeader node_header;
 243         ReadNodoHeader (node, &node_header);
 244
 245         node_keys = ReadKeys (node, node_header);
 246
 247         std::list<BTreeData *>::iterator it = node_keys.begin ();
 248         std::list<BTreeData *>::iterator posterior;
 249         std::list<BTreeData *>::iterator ultima;
 250
 251         /* Se supone que la primera es un hijo :) */
 252         BTreeData *lchild = (*it++);
 253         posterior = it;
 254
 255         while (it != node_keys.end ()) {
 256                 if ((*data) < (*(*it)))
 257                         break;
 258                 ultima = it;
 259                 it++;
 260         }
 261
 262         if (it == posterior) {
 263                 k = AddKeyR (k, lchild->getChild (), left_child, right_child);
 264         } else {
 265                 k = AddKeyR (k, (*ultima)->getChild (), left_child, right_child);
 266         }
 267         DeleteKeys (node_keys);
 268
 269         /* Nada que hacer */
 270         if (data) delete data;
 271         if (!k) {
 272                 delete [] node;
 273                 return NULL;
 274         }
 275
 276         data = new BTreeData (k->Clone (), right_child);
 277
 278         if (node_header.free_space > data->Size ()) {
 279                 BTreeData *datait;
 280                 node_keys = ReadKeys (node, node_header);
 281                 std::list<BTreeData *>::iterator it = node_keys.begin ();
 282
 283                 while (it != node_keys.end ()) {
 284                         datait = (*it);
 285                         if ((*data) < (*datait))
 286                                 /* Me pase, lo agrego aca! */
 287                                 break;
 288                         it++;
 289                 }
 290                 node_keys.insert (it, data);
 291                 WriteKeys (node, node_header, node_keys);
 292                 WriteNodoHeader (node, &node_header);
 293                 WriteBlock (node, node_num);
 294                 DeleteKeys (node_keys);
 295                 delete [] node;
 296
 297                 PrintNode (node_num);
 298         } else {
 299                 /* Split : Creo e inicializo el nuevo nodo */
 300                 std::list<BTreeData *> new_node_keys;
 301                 std::list<BTreeData *> old_node_keys;
 302                 BTreeNodeHeader new_node_header;
 303                 uint new_node_num;
 304                 uchar *new_node = NewBlock (new_node_num);
 305                 ReadNodoHeader (new_node, &new_node_header);
 306                 new_node_header.level = node_header.level;
 307
 308                 node_keys = ReadKeys (node, node_header);
 309                 new_node_keys = ReadKeys (new_node, new_node_header);
 310
 311                 /* Agrego la clave en la lista que ya tengo de manera ordenada */
 312                 std::list<BTreeData *>::iterator it = node_keys.begin ();
 313                 std::list<BTreeData *>::iterator previt = node_keys.begin ();
 314
 315                 previt = ++it;
 316
 317                 while (it != node_keys.end ()) {
 318                         BTreeData *datait;
 319                         datait = (*it);
 320                         if ((*data) < (*datait))
 321                                 /* Me pase, lo agrego aca! */
 322                                 break;
 323                         previt = it;
 324                         it++;
 325                 }
 326                 if (it != node_keys.end ())
 327                         node_keys.insert (it, data);
 328                 else
 329                         node_keys.push_back (data);
 330
 331                 /* Tengo que guardar claves hasta ocupar nodo size/2 en cada nodo
 332                  * y subir la clave del medio */
 333                 node_header.item_count = 0;
 334                 node_header.free_space = header.block_size - sizeof (BTreeNodeHeader);
 335
 336                 uint total_size = 0;
 337                 it = node_keys.begin ();
 338                 while (it != node_keys.end ()) {
 339                         BTreeData *datait;
 340                         datait = (*it);
 341                         total_size += datait->Size ();
 342                         it++;
 343                         /* Hack : Si me quedo con todas las claves, en el caso de ser
 344                          * del mismo tama#o se desbalancea. Hay que ver que efecto
 345                          * puede tener en el caso de claves de long. variable
 346                          */
 347                         if (it == node_keys.end ())
 348                                 total_size -= datait->Size ();
 349                 }
 350
 351                 it = node_keys.begin ();
 352                 uint used = 0;
 353                 while (used < total_size/2) {
 354                         BTreeData *d = (*it);
 355                         old_node_keys.push_back (d);
 356                         used += d->Size ();
 357                         it++;
 358                 }
 359                 kout = (*it)->getClave (); // Esta se retorna al "padre" para que se la agregue
 360
 361                 new_node_keys.push_back ( new BTreeChildData ((*it)->getChild ()));
 362                 it++;
 363                 while (it != node_keys.end ()) {
 364                         BTreeData *d = (*it);
 365                         new_node_keys.push_back (d);
 366                         it++;
 367                 }
 368
 369                 /* Guardo */
 370                 WriteKeys (node, node_header, old_node_keys);
 371                 WriteNodoHeader (node, &node_header);
 372                 WriteBlock (node, node_num);
 373                 WriteKeys (new_node, new_node_header, new_node_keys);
 374                 WriteNodoHeader (new_node, &new_node_header);
 375                 WriteBlock (new_node, new_node_num);
 376                 DeleteKeys (old_node_keys);
 377                 DeleteKeys (new_node_keys);
 378
 379                 PrintNode (node_num);
 380                 PrintNode (new_node_num);
 381
 382                 /* Paso los hijos */
 383                 left_child = node_num;
 384                 right_child = new_node_num;
 385                 delete [] new_node;
 386                 delete [] node;
 387         }
 388
 389         return kout;
 390 }
 391
 392 void BTree::DelKey (const Clave &k)
 393 {
 394         DelKeyR (new BTreeLeafData (k.Clone ()), 0, 0);
 395 }
 396
 397 void BTree::DelKeyR (BTreeData *k, uint node_num, uint padre)
 398 {
 399         std::list<BTreeData *> node_keys;
 400         BTreeNodeHeader node_header;
 401         uchar *node;
 402
 403         node = ReadBlock (node_num);
 404         ReadNodoHeader (node, &node_header);
 405         node_keys = ReadKeys (node, node_header);
 406
 407         std::list<BTreeData *>::iterator it = node_keys.begin ();
 408         std::list<BTreeData *>::iterator ultima;
 409         std::list<BTreeData *>::iterator posterior;
 410
 411         BTreeData *lchild;
 412         if (node_header.level != 0) {
 413                 lchild = (*it++);
 414         }
 415         posterior = it;
 416
 417         while (it != node_keys.end ()) {
 418                 if ((*k) == (*(*it))) {
 419                         /* La encontre!, retorno */
 420                         if (node_header.level == 0) {
 421                                 DelKeyFromLeaf (k->getClave (), node_num, padre);
 422                         }
 423                         return;
 424                 }
 425
 426                 if ((*k) < (*(*it)))
 427                         break;
 428                 ultima = it;
 429                 it++;
 430         }
 431
 432         /* Si llego aca y estoy en nivel 0 (una hoja) quiere
 433          * decir que no lo encontre
 434          */
 435         if (node_header.level == 0) {
 436                 std::cout << "Clave no encontrada\n";
 437                 return;
 438         }
 439
 440         /* TODO: Aca faltaria liberar memoria */
 441         if (it == posterior) {
 442                 DelKeyR (k, lchild->getChild (), node_num);
 443         } else {
 444                 DelKeyR (k, (*ultima)->getChild (), node_num);
 445         }
 446 }
 447
 448 void BTree::DelKeyFromLeaf (Clave *k, uint node_num, uint padre)
 449 {
 450         BTreeData *data;
 451         uchar *node;
 452         BTreeNodeHeader node_header;
 453         std::list<BTreeData *> node_keys;
 454
 455         node = ReadBlock (node_num);
 456         ReadNodoHeader (node, &node_header);
 457         node_keys = ReadKeys (node, node_header);
 458
 459         data = new BTreeLeafData (k);
 460
 461         std::list<BTreeData *>::iterator it;
 462         it = node_keys.begin ();
 463         while (it != node_keys.end ()) {
 464                 if ((*data) == (*(*it))) {
 465                         node_keys.erase (it);
 466                         break;
 467                 }
 468                 it++;
 469         }
 470
 471         delete data;
 472
 473         /* TODO : que pasa cuando el nodo se queda vacio o con
 474          * muy pocas claveS??
 475          */
 476         WriteKeys (node, node_header, node_keys);
 477         WriteNodoHeader (node, &node_header);
 478         WriteBlock (node, node_num);
 479
 480         /* Veo si se cumple la condición de minimalidad */
 481         if ((node_header.free_space <= (header.block_size/2)) && (node_num != 0)) {
 482                 /* Oops! Debo pedir prestada clave */
 483                 uint hi, hd;
 484                 Clave *pedida;
 485
 486                 FindB (node_num, padre, hi, hd);
 487
 488                 if ((pedida = GetKey (hi, 1)) != NULL) {
 489                         std::string s = *pedida;
 490                         std::cout << "Clave Pedida : " << s << std::endl;
 491
 492                         node_keys.insert (node_keys.begin (), new BTreeLeafData (pedida));
 493                 } else if ((pedida = GetKey (hd, 0)) != NULL) {
 494                         std::string s = *pedida;
 495                         std::cout << "Clave Pedida : " << s << std::endl;
 496
 497                         node_keys.push_back (new BTreeLeafData (pedida));
 498                 } else {
 499                         std::cout << "NADIE ME PUEDE PRESTAR, FUNDIR NODOS\n";
 500                         return;
 501                 }
 502
 503                 WriteKeys (node, node_header, node_keys);
 504                 WriteNodoHeader (node, &node_header);
 505                 WriteBlock (node, node_num);
 506         }
 507
 508         DeleteKeys (node_keys);
 509         delete [] node;
 510         std::cout << "Borrado de una hoja listo\n";
 511 }
 512
 513 Clave *BTree::GetKey (uint node_num, char maxmin)
 514 {
 515         if (node_num == 0) return NULL;
 516
 517         uchar *node;
 518         BTreeNodeHeader node_header;
 519         std::list<BTreeData *> node_keys;
 520
 521         node = ReadBlock (node_num);
 522         ReadNodoHeader (node, &node_header);
 523         node_keys = ReadKeys (node, node_header);
 524
 525         std::list<BTreeData *>::iterator it = node_keys.begin ();
 526
 527         if (node_header.level != 0) it++;
 528
 529         Clave *k;
 530         if (maxmin == 0) {
 531                 k = (*it)->getClave ()->Clone ();
 532                 node_keys.erase (it);
 533         } else {
 534                 it = node_keys.end ();
 535                 it--;
 536                 k = (*it)->getClave ()->Clone ();
 537                 node_keys.erase (it);
 538         }
 539
 540         WriteKeys (node, node_header, node_keys);
 541         WriteNodoHeader (node, &node_header);
 542         WriteBlock (node, node_num);
 543         DeleteKeys (node_keys);
 544
 545         return k;
 546 }
 547
 548 void BTree::FindB (uint node_num, uint padre, uint &left, uint &right)
 549 {
 550         uchar *node;
 551         BTreeNodeHeader node_header;
 552         std::list<BTreeData *> node_keys;
 553
 554         node = ReadBlock (padre);
 555         ReadNodoHeader (node, &node_header);
 556         node_keys = ReadKeys (node, node_header);
 557
 558         std::list<BTreeData *>::iterator it = node_keys.begin ();
 559         std::list<BTreeData *>::iterator anterior = node_keys.begin ();
 560         std::list<BTreeData *>::iterator siguiente;
 561
 562         BTreeData *lchild = (*it++);
 563
 564         if (lchild->getChild () == node_num) {
 565                 /* Solo tengo hermano derecho */
 566                 std::cout << "Hermano Izquierdo : NO TENGO" << std::endl;
 567                 left = 0;
 568                 std::cout << "Hermano Derecho   : " << (*it)->getChild () << std::endl;
 569                 right = (*it)->getChild ();
 570                 return;
 571         }
 572
 573         while (it != node_keys.end ()) {
 574                 if ((*it)->getChild () == node_num)
 575                         break;
 576                 anterior = it;
 577                 it++;
 578         }
 579         siguiente = it++;
 580
 581         std::cout << "Hermano Izquierdo : " << (*anterior)->getChild () << std::endl;
 582         left = (*anterior)->getChild ();
 583         if (siguiente != node_keys.end ()) {
 584                 right = (*siguiente)->getChild ();
 585                 std::cout << "Hermano Derecho   : " << (*siguiente)->getChild () << std::endl;
 586         } else {
 587                 right = 0;
 588                 std::cout << "Hermano Derecho   : NO TENGO" << std::endl;
 589         }
 590 }
 591
 592 void BTree::DelKeyFromOther (const Clave &k, BTreeFindResult *r)
 593 {
 594 }
 595
 596 void BTree::ReadNodoHeader (uchar *node, BTreeNodeHeader *header)
 597 {
 598         memcpy (header, node, sizeof (BTreeNodeHeader));
 599 }
 600
 601 void BTree::WriteNodoHeader (uchar *node, BTreeNodeHeader *header)
 602 {
 603         memcpy (node, header, sizeof (BTreeNodeHeader));
 604 }
 605
 606 uchar *BTree::ReadBlock (uint num)
 607 {
 608         /* Como el bloque 0 se usa para el header, el Nodo "num"
 609          * está en el bloque "num+1"
 610          */
 611         num++;
 612
 613         uchar *out = new uchar[header.block_size];
 614
 615         fseek (fp, num*header.block_size, SEEK_SET);
 616         fread (out, 1, header.block_size, fp);
 617
 618         return out;
 619 }
 620
 621 std::list<BTreeData *> BTree::ReadKeys (uchar *node, BTreeNodeHeader &node_header)
 622 {
 623         std::list<BTreeData *> keys;
 624         node += sizeof (BTreeNodeHeader);
 625         uint count = node_header.item_count;
 626
 627         if (node_header.item_count == 0) return keys;
 628
 629         if (node_header.level != 0) {
 630                 /* Si no es una hoja, lo primero que tengo es un BTreeChildData */
 631                 BTreeChildData *d = new BTreeChildData (node);
 632                 node += d->Size ();
 633                 keys.push_back (d);
 634                 count--;
 635         }
 636
 637         for (uint i=0; i<count; i++) {
 638                 /* TODO : El tipo de clave deberia ser usado
 639                  * dependiendo de algun dato en el header del
 640                  * arbol
 641                  */
 642                 /* TODO : Detectar si estoy en una hoja */
 643                 BTreeData *data;
 644                 if (node_header.level == 0) {
 645                         data = new BTreeLeafData (node, key_type);
 646                 } else {
 647                         data = new BTreeData (node, key_type);
 648                 }
 649                 node += data->Size ();
 650                 keys.push_back (data);
 651         }
 652
 653         return keys;
 654 }
 655
 656 void BTree::WriteKeys (uchar *node, BTreeNodeHeader &node_header, std::list<BTreeData *> &keys)
 657 {
 658         std::list<BTreeData *>::iterator it = keys.begin ();
 659
 660         node += sizeof (BTreeNodeHeader);
 661
 662         node_header.item_count = 0;
 663         node_header.free_space = header.block_size - sizeof (BTreeNodeHeader);
 664
 665         while (it != keys.end ()) {
 666                 BTreeData *d = (*it);
 667                 uchar *n = d->ToArray ();
 668                 memcpy (node, n, d->Size ());
 669                 delete [] n;
 670                 node += d->Size ();
 671                 node_header.free_space -= d->Size ();
 672                 node_header.item_count++;
 673                 it++;
 674         }
 675
 676         /* TODO : incrementar node_header.item_count aca o fuera de este metodo? */
 677 }
 678
 679 void BTree::PrintNode (uint num)
 680 {
 681         uchar *node = ReadBlock (num);
 682         BTreeNodeHeader node_header;
 683         ReadNodoHeader (node, &node_header);
 684
 685         std::list<BTreeData *> node_keys = ReadKeys (node, node_header);
 686         std::list<BTreeData *>::iterator it = node_keys.begin ();
 687
 688         std::cout << "Nodo  : " << num << std::endl;
 689         std::cout << "Level : " << node_header.level << std::endl;
 690         std::cout << "Items : " << node_header.item_count << std::endl;
 691         std::cout << "Free  : " << node_header.free_space << " (" << (header.block_size - sizeof (BTreeNodeHeader)) << ")" << std::endl;
 692         while (it != node_keys.end ()) {
 693                 std::string s = *(*it);
 694                 std::cout << s << " ";
 695                 it++;
 696         }
 697         std::cout << std::endl;
 698
 699         delete [] node;
 700         DeleteKeys (node_keys);
 701 }
 702
 703 uchar *BTree::NewBlock (uint &num)
 704 {
 705         long filelen;
 706         uchar *node;
 707         BTreeNodeHeader nh;
 708
 709         fseek (fp, 0, SEEK_END);
 710         filelen = ftell (fp);
 711
 712         num = filelen/header.block_size - 1;
 713
 714         node = new uchar[header.block_size];
 715         ReadNodoHeader (node, &nh);
 716         nh.level = 0;
 717         nh.free_space = header.block_size - sizeof (BTreeNodeHeader);
 718         nh.item_count = 0;
 719         WriteNodoHeader (node, &nh);
 720         WriteBlock (node, num);
 721
 722         return node;
 723 }
 724
 725 BTreeFindResult *BTree::FindKey (const Clave &k)
 726 {
 727         return FindKeyR (&k, 0);
 728 }
 729
 730 BTreeFindResult *BTree::FindKeyR (const Clave *k, uint node_num)
 731 {
 732         std::list<BTreeData *> node_keys;
 733         BTreeNodeHeader node_header;
 734
 735         /* Leo el nodo raiz para empezar a agregar */
 736         uchar *node = ReadBlock (node_num);
 737         ReadNodoHeader (node, &node_header);
 738         node_keys = ReadKeys (node, node_header);
 739
 740         std::list<BTreeData *>::iterator it = node_keys.begin ();
 741         std::list<BTreeData *>::iterator posterior;
 742         std::list<BTreeData *>::iterator ultima;
 743
 744         /* Se supone que la primera es un hijo :) */
 745         BTreeData *lchild;
 746         if (node_header.level != 0) {
 747                 lchild = (*it++);
 748         }
 749         posterior = it;
 750
 751         BTreeData *data;
 752         if (node_header.level == 0)
 753                 data = new BTreeLeafData ((Clave *)k);
 754         else
 755                 data = new BTreeData ((Clave *)k, 0);
 756
 757         while (it != node_keys.end ()) {
 758                 if ((*data) == (*(*it))) {
 759                         /* La encontre!, retorno */
 760                         delete [] node;
 761                         DeleteKeys (node_keys);
 762                         BTreeFindResult *result = new BTreeFindResult ();
 763                         result->node = node_num;
 764                         result->header = node_header;
 765                         return result;
 766                 }
 767
 768                 if ((*data) < (*(*it)))
 769                         break;
 770                 ultima = it;
 771                 it++;
 772         }
 773
 774         /* TODO: Aca faltaria liberar memoria */
 775         if (it == posterior)
 776                 return FindKeyR (k, lchild->getChild ());
 777
 778         return FindKeyR (k, (*ultima)->getChild ());
 779 }
 780
 781 void BTree::DeleteKeys (std::list<BTreeData *> &keys)
 782 {
 783         std::list<BTreeData *>::iterator it = keys.begin ();
 784
 785         while (it != keys.end ()) {
 786                 BTreeData *d = (*it);
 787                 delete d;
 788                 it++;
 789         }
 790 }