|
| 1 | +#include <stdlib.h> |
| 2 | +#include <string.h> |
| 3 | +#include <stdio.h> |
| 4 | + |
| 5 | +#include "helpers.h" |
| 6 | +#include "benchmarks.h" |
| 7 | + |
| 8 | +// ----------------------------------------------------------------------------- |
| 9 | + |
| 10 | +// void quicksort_inplace_helper(void *_a, size_t n, size_t es); |
| 11 | + |
| 12 | +template<typename T> |
| 13 | +void quicksort_inplace_helper(T *_a, size_t n); |
| 14 | + |
| 15 | +// void *quicksort_glibc(void *const pbase, size_t total_elems, size_t size, __compar_fn_t cmp) |
| 16 | +// { |
| 17 | +// // Copy into a fresh array. |
| 18 | +// char *cpy = (char *) malloc(total_elems * size); |
| 19 | +// if (cpy == NULL) { |
| 20 | +// fprintf(stderr, "insertionsort: couldn't allocate"); |
| 21 | +// exit(1); |
| 22 | +// } |
| 23 | +// our_memcpy(cpy, (char *) pbase, (size * total_elems)); |
| 24 | + |
| 25 | +// // Sort "cpy" in place. |
| 26 | +// quicksort_glibc_inplace(cpy, total_elems, size, cmp); |
| 27 | +// return cpy; |
| 28 | +// } |
| 29 | + |
| 30 | +// void quicksort_glibc_inplace(void *const pbase, size_t total_elems, size_t size, __compar_fn_t cmp) |
| 31 | +// { |
| 32 | +// qsort(pbase, total_elems, size, cmp); |
| 33 | +// } |
| 34 | + |
| 35 | +// void *quicksort(void *const pbase, size_t total_elems, size_t size) |
| 36 | +// { |
| 37 | +// // Copy into a fresh array. |
| 38 | +// char *cpy = (char *) malloc(total_elems * size); |
| 39 | +// if (cpy == NULL) { |
| 40 | +// fprintf(stderr, "insertionsort: couldn't allocate"); |
| 41 | +// exit(1); |
| 42 | +// } |
| 43 | +// our_memcpy(cpy, (char *) pbase, (size * total_elems)); |
| 44 | + |
| 45 | +// // Sort "cpy" in place. |
| 46 | +// quicksort_inplace_cmp(cpy, total_elems, size, compare_int64s); |
| 47 | +// return cpy; |
| 48 | +// } |
| 49 | + |
| 50 | +// void *quicksort_cmp(void *const pbase, size_t total_elems, size_t size, __compar_fn_t cmp) |
| 51 | +// { |
| 52 | +// // Copy into a fresh array. |
| 53 | +// char *cpy = (char *) malloc(total_elems * size); |
| 54 | +// if (cpy == NULL) { |
| 55 | +// fprintf(stderr, "insertionsort: couldn't allocate"); |
| 56 | +// exit(1); |
| 57 | +// } |
| 58 | +// our_memcpy(cpy, (char *) pbase, (size * total_elems)); |
| 59 | + |
| 60 | +// // Sort "cpy" in place. |
| 61 | +// quicksort_inplace_cmp(cpy, total_elems, size, cmp); |
| 62 | +// return cpy; |
| 63 | +// } |
| 64 | + |
| 65 | +// void quicksort_inplace_cmp(void *_a, size_t n, size_t es, __compar_fn_t cmp) |
| 66 | +// { |
| 67 | +// char *a = (char *) _a; |
| 68 | +// int j; |
| 69 | +// char *pi, *pj, *pn; |
| 70 | +// if (n <= 1) return; |
| 71 | +// pi = a + (rand() % n) * es; |
| 72 | +// SWAP(a, pi, es); |
| 73 | +// pi = a; |
| 74 | +// pj = pn = a + n * es; |
| 75 | +// for (;;) { |
| 76 | +// do pi += es; while (pi < pn && cmp(pi, a) < 0); |
| 77 | +// do pj -= es; while (cmp(pj, a) > 0); |
| 78 | +// if (pj < pi) break; |
| 79 | +// SWAP(pi, pj, es); |
| 80 | +// } |
| 81 | +// SWAP(a, pj, es); |
| 82 | +// j = (pj - a) / es; |
| 83 | +// quicksort_inplace_cmp(a, j, es, cmp); |
| 84 | +// quicksort_inplace_cmp(a + (j+1)*es, n-j-1, es, cmp); |
| 85 | +// } |
| 86 | + |
| 87 | +// void *quicksort_inplace(void *_a, size_t n, size_t es){ |
| 88 | + |
| 89 | +// quicksort_inplace_helper(_a, n, es); |
| 90 | +// return _a; |
| 91 | +// } |
| 92 | + |
| 93 | +// void quicksort_inplace_helper(void *_a, size_t n, size_t es) |
| 94 | +// { |
| 95 | +// char *a = (char *) _a; |
| 96 | +// int j; |
| 97 | +// char *pi, *pj, *pn; |
| 98 | +// if (n <= 1) return; |
| 99 | +// pi = a + (rand() % n) * es; |
| 100 | +// SWAP(a, pi, es); |
| 101 | +// pi = a; |
| 102 | +// pj = pn = a + n * es; |
| 103 | +// for (;;) { |
| 104 | +// do pi += es; while (pi < pn && compare_int64s(pi, a) < 0); |
| 105 | +// do pj -= es; while (compare_int64s(pj, a) > 0); |
| 106 | +// if (pj < pi) break; |
| 107 | +// SWAP(pi, pj, es); |
| 108 | +// } |
| 109 | +// SWAP(a, pj, es); |
| 110 | +// j = (pj - a) / es; |
| 111 | +// quicksort_inplace(a, j, es); |
| 112 | +// quicksort_inplace(a + (j+1)*es, n-j-1, es); |
| 113 | +// } |
| 114 | + |
| 115 | + |
| 116 | +template<typename T> |
| 117 | +T *quicksort_inplace(T *_a, size_t n){ |
| 118 | + |
| 119 | + quicksort_inplace_helper(_a, n); |
| 120 | + return _a; |
| 121 | +} |
| 122 | + |
| 123 | +template<typename T> |
| 124 | +void quicksort_inplace_helper(T *_a, size_t n) |
| 125 | +{ |
| 126 | + T *a = (T *) _a; |
| 127 | + int j; |
| 128 | + int pi, pj, pn; |
| 129 | + if (n <= 1) return; |
| 130 | + pi = (rand() % n); |
| 131 | + SWAP2(a, 0, pi); |
| 132 | + pi = 0; |
| 133 | + pj = pn = n; |
| 134 | + for (;;) { |
| 135 | + do {pi++;} while (pi < pn && a[pi] < a[0]); |
| 136 | + do {pj--;} while (a[pj] > a[0]); |
| 137 | + if (pj < pi) break; |
| 138 | + SWAP2(a, pi, pj); |
| 139 | + } |
| 140 | + SWAP2(a, 0, pj); |
| 141 | + j = pj; |
| 142 | + quicksort_inplace_helper(a, j); |
| 143 | + quicksort_inplace_helper(&a[j+1], n-j-1); |
| 144 | +} |
0 commit comments