The CDSSpec checker's benchmarks
[model-checker-benchmarks.git] / ms-queue / testcase1.c
1 #include <stdlib.h>
2 #include <stdio.h>
3 #include <threads.h>
4
5 #include "queue.h"
6 #include "model-assert.h"
7
8 static queue_t *queue;
9 static thrd_t *threads;
10 static unsigned int *input;
11 static unsigned int *output;
12 static int num_threads;
13
14 int get_thread_num()
15 {
16         thrd_t curr = thrd_current();
17         int i;
18         for (i = 0; i < num_threads; i++)
19                 if (curr.priv == threads[i].priv)
20                         return i;
21         MODEL_ASSERT(0);
22         return -1;
23 }
24
25 bool succ1, succ2;
26 atomic_int x[3];
27 unsigned int idx1, idx2;
28 unsigned int reclaimNode;
29
30 static int procs = 2;
31 static void main_task(void *param)
32 {
33         unsigned int val;
34         int pid = *((int *)param);
35         if (pid % procs == 0) {
36                 //atomic_store_explicit(&x[0], 1, memory_order_relaxed);
37                 enqueue(queue, 0, 0);
38         } else if (pid % procs == 1) {
39                 //atomic_store_explicit(&x[1], 1, memory_order_relaxed);
40                 succ1 = dequeue(queue, &idx1, &reclaimNode);
41                 if (succ1) {
42                         //atomic_load_explicit(&x[idx1], memory_order_relaxed);
43                 }
44         }
45 }
46
47 int user_main(int argc, char **argv)
48 {
49         int i;
50         int *param;
51         unsigned int in_sum = 0, out_sum = 0;
52
53         /** @Entry */
54         queue = (queue_t*) calloc(1, sizeof(*queue));
55         MODEL_ASSERT(queue);
56
57         num_threads = procs;
58         threads = (thrd_t*) malloc(num_threads * sizeof(thrd_t));
59         param = (int*) malloc(num_threads * sizeof(*param));
60         input = (unsigned int *) calloc(num_threads, sizeof(*input));
61         output = (unsigned int *) calloc(num_threads, sizeof(*output));
62
63         atomic_init(&x[0], 0);
64         atomic_init(&x[1], 0);
65         atomic_init(&x[2], 0);
66         init_queue(queue, num_threads);
67         for (i = 0; i < num_threads; i++) {
68                 param[i] = i;
69                 thrd_create(&threads[i], main_task, &param[i]);
70         }
71         for (i = 0; i < num_threads; i++)
72                 thrd_join(threads[i]);
73 /*
74         for (i = 0; i < num_threads; i++) {
75                 in_sum += input[i];
76                 out_sum += output[i];
77         }
78         for (i = 0; i < num_threads; i++)
79                 printf("input[%d] = %u\n", i, input[i]);
80         for (i = 0; i < num_threads; i++)
81                 printf("output[%d] = %u\n", i, output[i]);
82         if (succ1 && succ2)
83                 MODEL_ASSERT(in_sum == out_sum);
84         else
85                 MODEL_ASSERT (false);
86 */
87         free(param);
88         free(threads);
89         free(queue);
90
91         return 0;
92 }