Heap sort Sample

1. static void u32_swap(void *a, void *b, int size)
2. {
3.     u32 t = *(u32 *)a;
4.     *(u32 *)a = *(u32 *)b;
5.     *(u32 *)b = t;
6. }
8. static void generic_swap(void *a, void *b, int size)
9. {
10.     char t;
12.     do {
13.         t = *(char *)a;
14.         *(char *)a++ = *(char *)b;
15.         *(char *)b++ = t;
16.     } while (--size > 0);
17. }
20. void sort(void *base, size_t num, size_t size,
21.       int (*cmp)(const void *, const void *),
22.       void (*swap)(void *, void *, int size))
23. {
24.     /* pre-scale counters for performance */
25.     int i = (num/2 - 1) * size, n = num * size, c, r;
27.     if (!swap)
28.         swap = (size == 4 ? u32_swap : generic_swap);
30.     /* heapify */
31.     for ( ; i >= 0; i -= size) {
32.         for (r = i; r * 2 + size < n; r  = c) {
33.             c = r * 2 + size;
34.             if (c < n - size && cmp(base + c, base + c + size) < 0)
35.                 c += size;
36.             if (cmp(base + r, base + c) >= 0)
37.                 break;
38.             swap(base + r, base + c, size);
39.         }
40.     }
42.     /* sort */
43.     for (i = n - size; i > 0; i -= size) {
44.         swap(base, base + i, size);
45.         for (r = 0; r * 2 + size < i; r = c) {
46.             c = r * 2 + size;
47.             if (c < i - size && cmp(base + c, base + c + size) < 0)
48.                 c += size;
49.             if (cmp(base + r, base + c) >= 0)
50.                 break;
51.             swap(base + r, base + c, size);
52.         }
53.     }
54. }