Search / Sort

Sort/c_InsertionSortX.c

@@ -0,0 +1,75 @@
+#include <c_InsertionSortX.h>
+#include <c_Swap.h>
+
+void c_InsertionSortX(void* array, c_size_t array_size, c_size_t item_size, c_SortCompare_t cmp, void* args) {
+    // 边界与防御性校验：元素少于 2 个或参数非法时无需排序
+    if (!array || array_size < 2 || item_size == 0 || !cmp) {
+        return;
+    }
+
+    char* array_base = (char*)array;
+
+    // 栈上开辟 256 字节的局部单元素缓冲区，用于半交换中暂存临时变量 v
+    // 这避免了 malloc 带来的堆内存分配，同时保证线程安全
+    char v_buf[item_size];
+
+    // =================================================================
+    // 阶段 1：倒序滑窗，寻找绝对最小值推至首位（充当左边界哨兵）
+    // 为了彻底杜绝无符号整数自减至 0 导致的下溢（Underflow），此处采用向前平移法
+    // =================================================================
+    c_size_t exchanges = 0;
+    for (c_size_t i = array_size; i > 1; i--) {
+        const c_size_t current_idx = i - 1;
+        char* current = array_base + (current_idx * item_size);
+        char* previous = array_base + ((current_idx - 1) * item_size);
+
+        // 如果后面的元素比前面小，执行泛型交换（复用您的 c_Swap 思想）
+        if (cmp(current, previous, args) < 0) {
+            c_Swap(current, previous, item_size);
+            exchanges++;
+        }
+    }
+
+    // 统计学优化：如果第一轮扫描发现本来就是绝对递增的（exchanges == 0），说明完全有序，直接退出
+    if (exchanges == 0) {
+        return;
+    }
+
+    // =================================================================
+    // 阶段 2：带有半交换（单向平移）的插入排序核心
+    // 由于阶段 1 已经把全局最小值放到了 array_base[0]，后续天然具备了边界防护
+    // =================================================================
+    for (c_size_t i = 2; i < array_size; i++) {
+        const char* item_i = array_base + (i * item_size);
+
+        // 暂存当前需要插入的元素：v = a[i]
+        memcpy(v_buf, item_i, item_size);
+
+        c_size_t j = i;
+        while (1) {
+            // 哨兵边界强御：因为 j 是无符号数，在此处增加前置保护
+            // 实际上由于 array_base[0] 是最小值，理论上 cmp(v, previous) 永远不可能在 j==1 时成立
+            // 但为了防御恶意外部比对器损坏，加入 j > 0 联锁，确保绝不发生无符号下溢
+            if (j == 0) {
+                break;
+            }
+
+            char* current = array_base + (j * item_size);
+            char* previous = array_base + ((j - 1) * item_size);
+
+            // 比较暂存的 v 和前一个元素 previous。如果 v 更小，说明前面的元素需要后移
+            if (cmp(v_buf, previous, args) < 0) {
+                // 半交换核心：单向覆盖 a[j] = a[j-1]
+                memcpy(current, previous, item_size);
+                j--;
+            } else {
+                // 顺序正确，找到了插入位置，直接退出平移滑窗
+                break;
+            }
+        }
+
+        // 将暂存的元素写入最终位置：a[j] = v
+        char* item_j = array_base + (j * item_size);
+        memcpy(item_j, v_buf, item_size);
+    }
+}