+
+void nuevo_arbol ()
+{
+ real_canvas->set_scroll_region (0, 0, 5000, 5000);
+
+ NewTreeDialog d;
+ if (d.run () == Gtk::RESPONSE_OK) {
+ uint altas = d.getAdds ();
+ uint bajas = d.getDels ();
+
+ double paltas = bajas / (double)altas;
+
+ int type = d.getKeyType ();
+ int atype = d.getTreeType ();
+ tree = Glib::RefPtr<ViewBTree>(new ViewBTree (real_canvas->root(), "test.idx", d.getBlockSize (), atype, type));
+ tree->signal_selected ().connect ( sigc::mem_fun (*real_frame, &ViewProperties::ShowItem) );
+ if (type == BTree::KEY_FIXED) {
+ std::list<int> lst;
+ std::list<int>::iterator it;
+ Random::Init ();
+ Random::Ints (lst, altas);
+
+ it = lst.begin ();
+ uint i = 0;
+ while (it != lst.end ()) {
+ ClaveFija c(*it);
+
+ double l = Random::Double (0.0f, 1.0f);
+ std::cout << l << " >= " << paltas << std::endl;
+ if (l >= paltas) {
+ try {
+ tree->AddKey (c);
+ } catch (Exception *e) {
+ std::cout << "====== " << (std::string)c << e->Message () << std::endl;
+ }
+ i++;
+ } else {
+ /* Tengo que borrar una clave entre 0 e "i" de la lista
+ * porque son las que ya agregue. */
+ int aborrar = (int)Random::Double (0, i);
+ std::list<int>::iterator otro = lst.begin ();
+ int j = 0;
+ while (j < aborrar) {
+ otro++;
+ j++;
+ }
+ ClaveFija c(*otro);
+
+ tree->DelKey (c);
+ std::string sss = c;
+ std::cout << "Clave Borrada " << sss << std::endl;
+ }
+
+ it++;
+ }
+ } else {
+ std::list<std::string> lst;
+ std::list<std::string>::iterator it;
+ Random::Init ();
+ Random::Strings (lst, altas);
+
+ it = lst.begin ();
+ while (it != lst.end ()) {
+ ClaveVariable c(*it);
+
+ try {
+ tree->AddKey (c);
+ } catch (Exception *e) {
+ std::cout << "====== " << (std::string)c << e->Message () << std::endl;
+ }
+ it++;
+ }
+ }
+ tree->AddNode (0);
+ double x1, x2, y1, y2;
+ tree->get_bounds (x1, y1, x2, y2);
+ real_canvas->scroll_to (0, 0);
+ }
+}
+
+void agregar_clave ()
+{
+ if (!tree)
+ {
+ Gtk::MessageDialog d("No hay un arbol creado, por favor primero cree un arbol!",
+ false, Gtk::MESSAGE_ERROR, Gtk::BUTTONS_OK, true);
+ d.run();
+ return;
+ }
+ KeyDialog d("Agregar");
+ if (d.run () == Gtk::RESPONSE_OK)
+ {
+ Glib::ustring str_key = d.key();
+ Glib::ustring str_val = d.val();
+ if (tree->type() == BTree::KEY_FIXED)
+ {
+ ClaveFija c(atoi(str_key.c_str()));
+ tree->AddKey(c);
+ }
+ else
+ {
+ ClaveVariable c(str_key);
+ tree->AddKey(c);
+ }
+
+ /* Muestro la clave agregada */
+ BTreeFindResult* result = 0;
+ Clave *c = NULL;
+ if (tree->type() == BTree::KEY_FIXED) {
+ c = new ClaveFija (atoi(str_key.c_str()));
+ result = tree->FindKey(*c);
+ } else {
+ c = new ClaveVariable (str_key);
+ result = tree->FindKey(*c);
+ }
+ if (result) {
+ tree->Clear ();
+ tree->AddNode(result->node);
+ tree->HighliteKey (*c);
+ delete result;
+ } else {
+ delete tree->last_selected;
+ tree->last_selected = NULL;
+ tree->AddNode (0);
+ }
+ if (c) delete c;
+ real_canvas->scroll_to (0, 0);
+ }
+}
+
+void borrar_clave ()
+{
+ if (!tree)
+ {
+ Gtk::MessageDialog d("No hay un arbol creado, por favor primero cree un arbol!",
+ false, Gtk::MESSAGE_ERROR, Gtk::BUTTONS_OK, true);
+ d.run();
+ return;
+ }
+ KeyDialog d("Borrar");
+ if (d.run () == Gtk::RESPONSE_OK)
+ {
+ Glib::ustring str_key = d.key();
+ if (tree->type() == BTree::KEY_FIXED)
+ {
+ ClaveFija c(atoi(str_key.c_str()));
+ tree->DelKey(c);
+ }
+ else
+ {
+ ClaveVariable c(str_key);
+ tree->DelKey(c);
+ }
+ delete tree->last_selected;
+ tree->AddNode (0);
+ }
+}
+
+void ir_al_padre ()
+{
+ if (!tree)
+ {
+ Gtk::MessageDialog d("No hay un arbol creado, por favor primero cree un arbol!",
+ false, Gtk::MESSAGE_ERROR, Gtk::BUTTONS_OK, true);
+ d.run();
+ return;
+ }
+ tree->GoBack ();
+}
+
+void buscar_clave ()
+{
+ if (!tree)
+ {
+ Gtk::MessageDialog d("No hay un arbol creado, por favor primero cree un arbol!",
+ false, Gtk::MESSAGE_ERROR, Gtk::BUTTONS_OK, true);
+ d.run();
+ return;
+ }
+ KeyDialog d("Buscar");
+ while (true) // Repite hasta que se encuentre algo o se cancele
+ {
+ if (d.run () == Gtk::RESPONSE_OK)
+ {
+ BTreeFindResult* result = 0;
+ Clave *c = NULL;
+ Glib::ustring str_key = d.key();
+ if (tree->type() == BTree::KEY_FIXED)
+ {
+ c = new ClaveFija (atoi(str_key.c_str()));
+ result = tree->FindKey(*c);
+ }
+ else
+ {
+ c = new ClaveVariable (str_key);
+ result = tree->FindKey(*c);
+ }
+ if (result)
+ {
+ tree->Clear ();
+ tree->AddNode(result->node);
+ tree->HighliteKey (*c);
+ delete result;
+ delete c;
+ real_canvas->scroll_to (0, 0);
+ return; // Encontramos, salimos
+ }
+ if (c) delete c;
+ Gtk::MessageDialog msg("Clave no encontrada!", false,
+ Gtk::MESSAGE_ERROR, Gtk::BUTTONS_OK, true);
+ msg.run();
+ // Seguimos intentando
+ }
+ else return; // Cancelaron, salimos
+ }
+}
+
+void zoom_out ()
+{
+ double r = real_canvas->get_pixels_per_unit ();
+ r *= 0.9f;
+ if (r < 0.0001)
+ r = 0.0001;
+ real_canvas->set_pixels_per_unit (r);
+}
+
+void zoom_in ()
+{
+ double r = real_canvas->get_pixels_per_unit ();
+ r *= 1.1f;
+ if (r > 10)
+ r = 10;
+ real_canvas->set_pixels_per_unit (r);
+}
+
+void zoom_normal ()
+{
+ real_canvas->set_pixels_per_unit (1.0f);
+}
+