The CDSSpec checker's benchmarks
[model-checker-benchmarks.git] / ms-queue / testcase4.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, idx3;
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                 enqueue(queue, 1, 0);
37                 succ1 = dequeue(queue, &idx1, &reclaimNode);
38                 enqueue(queue, 2, 0);
39         } else if (pid % procs == 1) {
40                 enqueue(queue, 2, 2);
41                 succ2 = dequeue(queue, &idx2, &reclaimNode);
42         }
43 }
44
45 int user_main(int argc, char **argv)
46 {
47         int i;
48         int *param;
49         unsigned int in_sum = 0, out_sum = 0;
50
51         /** @Entry */
52         queue = (queue_t*) calloc(1, sizeof(*queue));
53         MODEL_ASSERT(queue);
54
55         num_threads = procs;
56         threads = (thrd_t*) malloc(num_threads * sizeof(thrd_t));
57         param = (int*) malloc(num_threads * sizeof(*param));
58         input = (unsigned int *) calloc(num_threads, sizeof(*input));
59         output = (unsigned int *) calloc(num_threads, sizeof(*output));
60
61         atomic_init(&x[0], 0);
62         atomic_init(&x[1], 0);
63         atomic_init(&x[2], 0);
64         init_queue(queue, num_threads);
65         for (i = 0; i < num_threads; i++) {
66                 param[i] = i;
67                 thrd_create(&threads[i], main_task, &param[i]);
68         }
69         for (i = 0; i < num_threads; i++)
70                 thrd_join(threads[i]);
71 /*
72         for (i = 0; i < num_threads; i++) {
73                 in_sum += input[i];
74                 out_sum += output[i];
75         }
76         for (i = 0; i < num_threads; i++)
77                 printf("input[%d] = %u\n", i, input[i]);
78         for (i = 0; i < num_threads; i++)
79                 printf("output[%d] = %u\n", i, output[i]);
80         if (succ1 && succ2)
81                 MODEL_ASSERT(in_sum == out_sum);
82         else
83                 MODEL_ASSERT (false);
84 */
85         free(param);
86         free(threads);
87         free(queue);
88
89         return 0;
90 }