/// <summary>
/// TAXis
/// </summary>
/// <param name="obj"></param>
/// <param name="node_id"></param>
/// <returns></returns>
#region
private TAxis chooseSplitAxis(MyLib.Point obj, int node_id)
{
//Console.WriteLine("chooseSplitAxis1 work");
MyLib.Point[] arr_obj;
int i, j, k, idx;
TRNode node_1, node_2;
double perimetr_min, perimetr;
TAxis result = new TAxis();
arr_obj = new MyLib.Point[MAX_M + 1];
if (!FNodeArr[node_id].isLeaf)
{
return(0);
}
for (i = 0; i < FNodeArr[node_id].FObject.Length; i++)
{
arr_obj[i] = FNodeArr[node_id].FObject[i];
}
arr_obj[arr_obj.Length - 1] = obj;
node_1 = new TRNode();
node_2 = new TRNode();
perimetr_min = double.MaxValue;
for (i = 0; i <= 1; i++)
{
perimetr = 0;
for (j = 0; j <= 1; j++)
{
node_1.clearObjects();
node_2.clearObjects();
QuickSort(arr_obj, 0, arr_obj.Length - 1, (TAxis)i);
for (k = 1; k <= MAX_M - MIN_M * 2 + 2; k++) // высчитваем периметры
{
idx = 0;
while (idx < ((MIN_M - 1) + k))
{
node_1.setObject(idx, arr_obj[idx]);
idx++;
}
for (; idx < arr_obj.Length; idx++)
{
node_2.setObject(idx - ((MIN_M - 1) + k), arr_obj[idx]);
}
updateMBR(node_1);
updateMBR(node_2);
perimetr = perimetr + ((node_1.mbr.Right.X - node_1.mbr.Left.X) * 2 + (node_2.mbr.Left.Y - node_2.mbr.Right.Y) * 2);
}
}
if (perimetr <= perimetr_min)
{
result = (TAxis)i;
perimetr_min = perimetr;
}
}
return(result);
}
/// <summary>
/// разделяет узел на 2 в соответствии с алгоритмами R*-tree (node_id = ссылка на узел для разделения obj = обьект для вставки)
/// </summary>
#region
private void splitNodeRStar(int node_id, MyLib.Point obj)
{
//Console.WriteLine("splitNodeRStar work1 " + FHeight);
TAxis axe;
int parent_id, new_child_id;
TRNode node_1, node_2, node_1_min, node_2_min;
int i, j, k;
MyLib.Point[] arr_obj;
double area_min, Area;
if (!FNodeArr[node_id].isLeaf)
{
return;
}
if (isRoot(node_id))
{
//Console.WriteLine("it works");
parent_id = newNode();
FNodeArr[FRoot].Parent = parent_id;
FNodeArr[parent_id].setChild(0, FRoot);
FNodeArr[parent_id].Level = FNodeArr[FNodeArr[parent_id].getChild(0)].Level + 1;
FRoot = parent_id;
FHeight++;
}
else
{
parent_id = newNode();
FNodeArr[parent_id].Parent = FNodeArr[node_id].Parent;
FNodeArr[FNodeArr[parent_id].Parent].setChild(FNodeArr[FNodeArr[parent_id].Parent].FChildren.Length, parent_id);
FNodeArr[node_id].Parent = parent_id;
FNodeArr[parent_id].setChild(0, node_id);
/*
* parent_id = FNodeArr[node_id].Parent;
* Console.WriteLine("f**k); " + parent_id);
* FNodeArr[FNodeArr[node_id].Parent].FisLeaf = false;
*/
}
arr_obj = new MyLib.Point[MAX_M + 1];
for (i = 0; i < arr_obj.Length - 1; i++)
{
arr_obj[i] = FNodeArr[node_id].getObject(i);
}
arr_obj[arr_obj.Length - 1] = obj;
node_1_min = new TRNode();
node_2_min = new TRNode();
node_1 = new TRNode();
node_2 = new TRNode();
axe = chooseSplitAxis(obj, node_id);
area_min = double.MaxValue;
for (i = 0; i <= 1; i++)
{
QuickSort(arr_obj, 0, arr_obj.Length - 1, axe);
for (k = MIN_M - 1; k <= MAX_M - MIN_M; k++)
{
node_1.clearObjects();
node_2.clearObjects();
j = 0;
while (j <= k)
{
node_1.setObject(j, arr_obj[j]);
j++;
}
for (j = k; j < arr_obj.Length - 1; j++)
{
node_2.setObject(j - k, arr_obj[j + 1]);
}
updateMBR(node_1);
updateMBR(node_2);
Area = node_1.Area() + node_2.Area();
if (Area < area_min)
{
node_1_min.copy(node_1);
node_2_min.copy(node_2);
area_min = Area;
}
}
}
node_1_min.Level = 0;
node_2_min.Level = 0;
FNodeArr[node_id].copy(node_1_min);
FNodeArr[node_id].Parent = parent_id;
updateMBR(node_id);
new_child_id = newNode();
FNodeArr[new_child_id].copy(node_2_min);
FNodeArr[new_child_id].Parent = parent_id;
updateMBR(new_child_id);
if (FNodeArr[parent_id].FChildren.Length < MAX_M)
{
FNodeArr[parent_id].setChild(FNodeArr[parent_id].FChildren.Length, new_child_id);
updateMBR(parent_id);
FNodeArr[parent_id].FisLeaf = false;
}
else
{
splitNodeRStar(parent_id, new_child_id);
}
}