aboutsummaryrefslogtreecommitdiffstats
path: root/test/monniaux/binary_search/binary_search.c
blob: 41638def4485cdb262572360d1d6b506c44162d9 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
#include <stdio.h>
#include <stdlib.h>
#include <inttypes.h>
#include "../clock.h"
#include "../ternary.h"

typedef int data;
typedef unsigned index;

/* from Rosetta code */
int my_bsearch (data *a, index n, data x) {
    index i = 0, j = n - 1;
    while (i <= j) {
        index k = (i + j) / 2;
        if (a[k] == x) {
            return k;
        }
        else if (a[k] < x) {
            i = k + 1;
        }
        else {
            j = k - 1;
        }
    }
    return -1;
}

int my_bsearch2 (data *a, index n, data x) {
    index i = 0, j = n - 1;
    while (i <= j) {
        index k = (i + j) / 2;
	index kp1 = k+1, km1 = k-1;
	data ak = a[k];
	i = TERNARY32(ak < x, kp1, i);
	j = TERNARY32(ak > x, km1, j);
        if (ak == x) {
            return k;
        }
    }
    return -1;
}

int my_bsearch3 (data *a, index n, data x) {
    index i = 0, j = n - 1;
    while (i <= j) {
        index k = (i + j) / 2;
	index kp1 = k+1, km1 = k-1;
	data ak = a[k];
	_Bool lt = ak < x, gt = ak > x;
	i = TERNARY32(lt, kp1, i);
	j = TERNARY32(gt, km1, j);
        if (ak == x) {
            return k;
        }
    }
    return -1;
}

int my_bsearch4 (data *a, index n, data x) {
  index i = 0, j = n - 1, k;
  k = (i + j) / 2;
  while (i <= j) {
    index kp1 = k+1, km1 = k-1;
    data ak = a[k];
    _Bool lt = ak < x, gt = ak > x;
    i = TERNARY32(lt, kp1, i);
    j = TERNARY32(gt, km1, j);
    if (ak == x) {
      goto end;
    }
    k = (i + j) / 2;
  }
  k=-1;
 end:
  return k;
}

void random_ascending_fill(data *a, index n) {
  unsigned r = 41;
  data v = 0;
  for(index i=0; i<n; i++) {
    a[i] = v;
    v++;
    v = TERNARY32(r & 0x40000000, v+1, v);
    r = r * 97 + 5;
  }
}

int main () {
  index n=25000;
  data v=1502;
  data *buf=malloc(n*sizeof(data));
  
  cycle_t timestamp0 = get_current_cycle();
  random_ascending_fill(buf, n);
  timestamp0 = get_current_cycle()-timestamp0;

  my_bsearch(buf, n, v);
  cycle_t timestamp1 = get_current_cycle();
  index pos1 = my_bsearch(buf, n, v);
  timestamp1 = get_current_cycle()-timestamp1;

  cycle_t timestamp2 = get_current_cycle();
  index pos2 = my_bsearch2(buf, n, v);
  timestamp2 = get_current_cycle()-timestamp2;

  cycle_t timestamp3 = get_current_cycle();
  index pos3 = my_bsearch3(buf, n, v);
  timestamp3 = get_current_cycle()-timestamp3;

  cycle_t timestamp4 = get_current_cycle();
  index pos4 = my_bsearch4(buf, n, v);
  timestamp4 = get_current_cycle()-timestamp4;

  printf("position1: %d\n"
	 "position2: %d\n"
	 "position3: %d\n"
	 "position4: %d\n"
	 "random fill cycles: %" PRIu64 "\n"
	 "search1 cycles: %" PRIu64 "\n"
	 "search2 cycles: %" PRIu64 "\n"
	 "search3 cycles: %" PRIu64 "\n"
	 "search4 cycles: %" PRIu64 "\n",
	 pos1, pos2, pos3, pos4,
	 timestamp0, timestamp1, timestamp2, timestamp3, timestamp4);
  
  free(buf);
}