public T ReturnValor(T valor)
{
Raiz = BReader <T> .LeerRaiz(RutaArbol);
if (Raiz != int.MinValue)
{
T objeto = default(T);
int posicionNodo = BuscarPosicionValor(GuardarNodo(BReader <T> .LeerNodo(RutaArbol, Raiz)), valor);
if (posicionNodo != int.MaxValue)
{
NodoB <T> nodo = GuardarNodo(BReader <T> .LeerNodo(RutaArbol, posicionNodo));
for (int i = 0; i < nodo.Valores.Length - 1; i++)
{
if ((int)comparador1.DynamicInvoke(valor, nodo.Valores[i]) == 0 && (int)comparador2.DynamicInvoke(valor, nodo.Valores[i]) == 0)
{
objeto = nodo.Valores[i];
break;
}
}
}
return(objeto);
}
else
{
return(default(T));
}
}
public void Insertar(T valor)
{
Raiz = BReader <T> .LeerRaiz(RutaArbol);
if (Raiz == int.MinValue)
{
NodoB <T> nodo = new NodoB <T>(TamañoT, Grado, PosicionDisponible);
nodo.Valores[0] = valor;
BWriter <T> .EscribirNodo(RutaArbol, nodo, PosicionDisponible);
Raiz = nodo.posicion;
BWriter <T> .EscribirRaiz(RutaArbol, Raiz);
PosicionDisponible++;
BWriter <T> .EscribirPosicionDisponible(RutaArbol, PosicionDisponible);
}
else
{
int posicionNodo = BuscarPosicion(valor, GuardarNodo(BReader <T> .LeerNodo(RutaArbol, Raiz)));
if (posicionNodo != int.MaxValue)
{
NodoB <T> Nodo = GuardarNodo(BReader <T> .LeerNodo(RutaArbol, posicionNodo));
InsertarValor(valor, ref Nodo);
BWriter <T> .EscribirNodo(RutaArbol, Nodo, Nodo.posicion);
if (Nodo.Valores[Grado - 1] != null)
{
SepararNodo(Nodo);
}
}
}
}
public void Insertar(T valor, Delegate delegado)
{
BReader <T> .LeerEncabezado(RutaArbol, ref Raiz, ref PosicionDisponible);
if (Raiz == int.MinValue)
{
NodoB <T> nuevo = new NodoB <T>(valor.FixedSizeText, Grado);
nuevo.Valores.Add(valor);
BWriter.Escribir()
}
else
{
NodoB <T> aux = Raiz;
for (int i = 0; i < Grado - 1; i++)
{
if ((int)delegado.DynamicInvoke(aux.Valores[i], valor) == -1)
{
}
else if ((int)delegado.DynamicInvoke(aux.Valores[i], valor) == 1)
{
}
}
if (nuevo.Valores.Count == Grado)
{
Ordenar
}
}
}
public List <T> ToList()
{
List <T> lista = new List <T>();
ToList(ref lista, BReader <T> .LeerRaiz(RutaArbol));
return(lista);
}
public int BuscarPosicionValor(NodoB <T> nodo, T valor)
{
int posicion = int.MinValue;
int hijo = int.MinValue;
for (int i = 0; i < nodo.Valores.Length - 1; i++)
{
if (nodo.Valores[i] != null)
{
if ((int)comparador1.DynamicInvoke(valor, nodo.Valores[i]) == 0 && (int)comparador2.DynamicInvoke(valor, nodo.Valores[i]) == 0)
{
posicion = nodo.posicion;
}
}
}
if (posicion == int.MinValue && !VerSiEsHoja(nodo))
{
for (int i = 0; i < nodo.Valores.Length - 1; i++)
{
if ((int)comparador1.DynamicInvoke(valor, nodo.Valores[i]) == -1)
{
hijo = i;
}
else if ((int)comparador1.DynamicInvoke(valor, nodo.Valores[i]) == 1 && i == nodo.GetCantidadValores() - 1)
{
hijo = i + 1;
}
else if ((int)comparador1.DynamicInvoke(valor, nodo.Valores[i]) == 0)
{
if ((int)comparador2.DynamicInvoke(valor, nodo.Valores[i]) == -1)
{
hijo = i;
}
else if ((int)comparador2.DynamicInvoke(valor, nodo.Valores[i]) == 1 && i == nodo.GetCantidadValores() - 1)
{
hijo = i + 1;
}
}
if (hijo != int.MinValue)
{
break;
}
}
return(BuscarPosicionValor(GuardarNodo(BReader <T> .LeerNodo(RutaArbol, hijo)), valor));
}
else if (VerSiEsHoja(nodo) && posicion == int.MinValue)
{
posicion = int.MaxValue;
return(posicion);
}
else
{
return(posicion);
}
}
public int BuscarPosicion(T valor, NodoB <T> nodo)
{
int hijo = int.MinValue;
bool repite = VerSiRepite(valor, nodo);
bool hoja = VerSiEsHoja(nodo);
if (!hoja && !repite)
{
for (int i = 0; i < nodo.Valores.Length - 1; i++)
{
if ((int)comparador1.DynamicInvoke(valor, nodo.Valores[i]) == -1)
{
hijo = i;
}
else if ((int)comparador1.DynamicInvoke(valor, nodo.Valores[i]) == 1 && i == nodo.GetCantidadValores() - 1)
{
hijo = i + 1;
}
else if ((int)comparador1.DynamicInvoke(valor, nodo.Valores[i]) == 0)
{
if ((int)comparador2.DynamicInvoke(valor, nodo.Valores[i]) == -1)
{
hijo = i;
}
else if ((int)comparador2.DynamicInvoke(valor, nodo.Valores[i]) == 1 && i == nodo.GetCantidadValores() - 1)
{
hijo = i + 1;
}
}
if (hijo != int.MinValue)
{
break;
}
}
}
else if (repite)
{
hijo = int.MaxValue;
}
if (hijo == int.MaxValue)
{
return(hijo);
}
else if (!hoja)
{
return(BuscarPosicion(valor, GuardarNodo(BReader <T> .LeerNodo(RutaArbol, nodo.hijos[hijo]))));
}
else
{
return(nodo.posicion);
}
}
public void ToList(ref List <T> lista, int posicionNodo)
{
if (posicionNodo != int.MinValue)
{
NodoB <T> nodo = GuardarNodo(BReader <T> .LeerNodo(RutaArbol, posicionNodo));
for (int i = 0; i < nodo.Valores.Length; i++)
{
if (nodo.Valores[i] != null)
{
lista.Add(nodo.Valores[i]);
}
}
for (int i = 0; i < nodo.hijos.Length - 1; i++)
{
ToList(ref lista, nodo.hijos[i]);
}
}
}
public void RepartirHijos(NodoB <T> nodo, NodoB <T> hermano, int posicionMedia)
{
int x = 0;
for (int i = posicionMedia + 1; i < nodo.hijos.Length; i++)
{
hermano.hijos[x] = nodo.hijos[i];
nodo.hijos[i] = int.MinValue;
x++;
}
for (int i = 0; i < hermano.hijos.Length; i++)
{
if (hermano.hijos[i] != int.MinValue)
{
NodoB <T> temp = GuardarNodo(BReader <T> .LeerNodo(RutaArbol, hermano.hijos[i]));
temp.Padre = hermano.posicion;
BWriter <T> .EscribirNodo(RutaArbol, temp, temp.posicion);
}
}
}
public void SepararNodo(NodoB <T> nodo)
{
if (nodo.Valores[Grado - 1] != null)
{
if (nodo.Padre == int.MinValue)
{
int posicionMedia = Grado / 2;
T valorASubir = nodo.Valores[posicionMedia];
NodoB <T> hermano = new NodoB <T>(TamañoT, Grado, PosicionDisponible);
PosicionDisponible++;
BWriter <T> .EscribirPosicionDisponible(RutaArbol, PosicionDisponible);
NodoB <T> padre = new NodoB <T>(TamañoT, Grado, PosicionDisponible);
PosicionDisponible++;
BWriter <T> .EscribirPosicionDisponible(RutaArbol, PosicionDisponible);
Raiz = padre.posicion;
BWriter <T> .EscribirRaiz(RutaArbol, Raiz);
hermano.Padre = padre.posicion;
nodo.Padre = padre.posicion;
RepartirValores(posicionMedia, ref nodo, ref hermano);
if (!VerSiEsHoja(nodo))
{
RepartirHijos(nodo, hermano, posicionMedia);
}
BWriter <T> .EscribirNodo(RutaArbol, hermano, hermano.posicion);
BWriter <T> .EscribirNodo(RutaArbol, nodo, nodo.posicion);
InsertarValor(valorASubir, ref padre);
padre.hijos[0] = nodo.posicion;
padre.hijos[1] = hermano.posicion;
BWriter <T> .EscribirNodo(RutaArbol, padre, padre.posicion);
}
else
{
int posicionMedia = Grado / 2;
T valorASubir = nodo.Valores[posicionMedia];
NodoB <T> hermano = new NodoB <T>(TamañoT, Grado, PosicionDisponible);
PosicionDisponible++;
BWriter <T> .EscribirPosicionDisponible(RutaArbol, PosicionDisponible);
NodoB <T> padre = GuardarNodo(BReader <T> .LeerNodo(RutaArbol, nodo.Padre));
hermano.Padre = padre.posicion;
RepartirValores(posicionMedia, ref nodo, ref hermano);
if (!VerSiEsHoja(nodo))
{
RepartirHijos(nodo, hermano, posicionMedia);
}
BWriter <T> .EscribirNodo(RutaArbol, hermano, hermano.posicion);
BWriter <T> .EscribirNodo(RutaArbol, nodo, nodo.posicion);
InsertarValor(valorASubir, ref padre);
bool hijoEncontrado = false;
int posicionHijo = int.MinValue;
int temp = int.MinValue;
for (int i = 0; i < padre.hijos.Length; i++)
{
if (hijoEncontrado)
{
if (i == posicionHijo + 1)
{
temp = padre.hijos[i];
padre.hijos[i] = hermano.posicion;
}
else
{
int temp2 = padre.hijos[i];
padre.hijos[i] = temp;
temp = temp2;
}
}
else
{
if (padre.hijos[i] == nodo.posicion)
{
hijoEncontrado = true;
posicionHijo = i;
}
}
}
if (padre.hijos[Grado] != int.MinValue)
{
SepararNodo(padre);
}
else
{
BWriter <T> .EscribirNodo(RutaArbol, padre, padre.posicion);
}
}
}
}
