It's not currently used in hengband, but bring over the change to mouse event handlin...

[hengbandforosx/hengbandosx.git] / src / sort.c

diff --git a/src/sort.c b/src/sort.c
index 53b7d4d..45a8a36 100644 (file)
--- a/src/sort.c
+++ b/src/sort.c
@@ -1,7 +1,6 @@
 #include "angband.h"
 #include "sort.h"
 
-
 /*
  * Angband sorting algorithm -- quick sort in place
  *
@@ -10,7 +9,8 @@
  * function hooks to interact with the data, which is given as
  * two pointers, and which may have any user-defined form.
  */
-void ang_sort_aux(vptr u, vptr v, int p, int q)
+void ang_sort_aux(vptr u, vptr v, int p, int q,
+       bool(*ang_sort_comp)(vptr u, vptr v, int a, int b), void(*ang_sort_swap)(vptr u, vptr v, int a, int b))
 {
        int z, a, b;
 
@@ -44,10 +44,10 @@ void ang_sort_aux(vptr u, vptr v, int p, int q)
        }
 
        /* Recurse left side */
-       ang_sort_aux(u, v, p, b);
+       ang_sort_aux(u, v, p, b, ang_sort_comp, ang_sort_swap);
 
        /* Recurse right side */
-       ang_sort_aux(u, v, b + 1, q);
+       ang_sort_aux(u, v, b + 1, q, ang_sort_comp, ang_sort_swap);
 }
 
 
@@ -59,14 +59,14 @@ void ang_sort_aux(vptr u, vptr v, int p, int q)
  * function hooks to interact with the data, which is given as
  * two pointers, and which may have any user-defined form.
  */
-void ang_sort(vptr u, vptr v, int n)
+void ang_sort(vptr u, vptr v, int n,
+       bool(*ang_sort_comp)(vptr u, vptr v, int a, int b) , void(*ang_sort_swap)(vptr u, vptr v, int a, int b))
 {
        /* Sort the array */
-       ang_sort_aux(u, v, 0, n - 1);
+       ang_sort_aux(u, v, 0, n - 1, ang_sort_comp, ang_sort_swap);
 }
 
 
-
 /*
  * Sorting hook -- comp function -- by "distance to player"
  *
@@ -515,3 +515,109 @@ bool ang_sort_comp_pet_dismiss(vptr u, vptr v, int a, int b)
        return w1 <= w2;
 }
 
+
+/*!
+ * @brief フロア保存時のcurrent_floor_ptr->grid_array情報テンプレートをソートするための比較処理
+ * @param u current_floor_ptr->grid_arrayテンプレートの参照ポインタ
+ * @param v 未使用
+ * @param a スワップするモンスター種族のID1
+ * @param b スワップするモンスター種族のID2
+ * @return aの方が大きければtrue
+ */
+bool ang_sort_comp_cave_temp(vptr u, vptr v, int a, int b)
+{
+       cave_template_type *who = (cave_template_type *)(u);
+
+       u16b o1 = who[a].occurrence;
+       u16b o2 = who[b].occurrence;
+
+       /* Unused */
+       (void)v;
+
+       return o2 <= o1;
+}
+
+
+/*!
+ * @brief フロア保存時のcurrent_floor_ptr->grid_array情報テンプレートをソートするためのスワップ処理 / Sorting hook -- Swap function
+ * @param u current_floor_ptr->grid_arrayテンプレートの参照ポインタ
+ * @param v 未使用
+ * @param a スワップするモンスター種族のID1
+ * @param b スワップするモンスター種族のID2
+ * @return なし
+ */
+void ang_sort_swap_cave_temp(vptr u, vptr v, int a, int b)
+{
+       cave_template_type *who = (cave_template_type *)(u);
+
+       cave_template_type holder;
+
+       /* Unused */
+       (void)v;
+
+       /* Swap */
+       holder = who[a];
+       who[a] = who[b];
+       who[b] = holder;
+}
+
+
+/*!
+ * @brief 進化ツリーをソートするためモンスター種族の判定関数 /
+ * Sorting hook -- Comp function
+ * @param u 進化木構造データ
+ * @param v 未使用
+ * @param a 比較したいモンスター種族ID1
+ * @param b 比較したいモンスター種族ID2
+ * @return 2が大きければTRUEを返す
+ */
+bool ang_sort_comp_evol_tree(vptr u, vptr v, int a, int b)
+{
+       int **evol_tree = (int **)u;
+
+       int w1 = evol_tree[a][0];
+       int w2 = evol_tree[b][0];
+       monster_race *r1_ptr = &r_info[w1];
+       monster_race *r2_ptr = &r_info[w2];
+
+       /* Unused */
+       (void)v;
+
+       /* Used tree first */
+       if (w1 && !w2) return TRUE;
+       if (!w1 && w2) return FALSE;
+
+       /* Sort by monster level */
+       if (r1_ptr->level < r2_ptr->level) return TRUE;
+       if (r1_ptr->level > r2_ptr->level) return FALSE;
+
+       /* Sort by monster experience */
+       if (r1_ptr->mexp < r2_ptr->mexp) return TRUE;
+       if (r1_ptr->mexp > r2_ptr->mexp) return FALSE;
+
+       /* Compare indexes */
+       return w1 <= w2;
+}
+
+/*!
+ * @brief 進化ツリーをソートするため木構造のスワップ関数 /
+ * Sorting hook -- Swap function
+ * @param u 進化木構造データ
+ * @param v 未使用
+ * @param a スワップしたい木構造1
+ * @param b スワップしたい木構造2
+ * @return 2が大きければTRUEを返す
+ */
+void ang_sort_swap_evol_tree(vptr u, vptr v, int a, int b)
+{
+       int **evol_tree = (int **)u;
+       int *holder;
+
+       /* Unused */
+       (void)v;
+
+       /* Swap */
+       holder = evol_tree[a];
+       evol_tree[a] = evol_tree[b];
+       evol_tree[b] = holder;
+}