ms-queue/testcase2.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 int idx1, idx2;
  28
  29 static int procs = 4;
  30 static void main_task(void *param)
  31 {
  32         unsigned int val;
  33         int pid = *((int *)param);
  34         if (pid % 4 == 0) {
  35                 /*
  36                 atomic_store_explicit(&x[0], 1, memory_order_relaxed);
  37                 enqueue(queue, 0);
  38                 */
  39         } else if (pid % 4 == 1) {
  40                 atomic_store_explicit(&x[1], 1, memory_order_relaxed);
  41                 enqueue(queue, 1);
  42         } else if (pid % 4 == 2) {
  43                 succ1 = dequeue(queue, &idx1);
  44                 if (succ1) {
  45                         atomic_load_explicit(&x[idx1], memory_order_relaxed);
  46                 }
  47         } else if (pid % 4 == 3) {
  48                 succ2 = dequeue(queue, &idx2);
  49                 if (succ2) {
  50                         atomic_load_explicit(&x[idx2], memory_order_relaxed);
  51                 }
  52         }
  53 }
  54
  55 int user_main(int argc, char **argv)
  56 {
  57         int i;
  58         int *param;
  59         unsigned int in_sum = 0, out_sum = 0;
  60
  61         queue = calloc(1, sizeof(*queue));
  62         MODEL_ASSERT(queue);
  63
  64         num_threads = procs;
  65         threads = malloc(num_threads * sizeof(thrd_t));
  66         param = malloc(num_threads * sizeof(*param));
  67         input = calloc(num_threads, sizeof(*input));
  68         output = calloc(num_threads, sizeof(*output));
  69
  70         atomic_init(&x[0], 0);
  71         atomic_init(&x[1], 0);
  72         atomic_init(&x[2], 0);
  73         init_queue(queue, num_threads);
  74         for (i = 0; i < num_threads; i++) {
  75                 param[i] = i;
  76                 thrd_create(&threads[i], main_task, &param[i]);
  77         }
  78         for (i = 0; i < num_threads; i++)
  79                 thrd_join(threads[i]);
  80 /*
  81         for (i = 0; i < num_threads; i++) {
  82                 in_sum += input[i];
  83                 out_sum += output[i];
  84         }
  85         for (i = 0; i < num_threads; i++)
  86                 printf("input[%d] = %u\n", i, input[i]);
  87         for (i = 0; i < num_threads; i++)
  88                 printf("output[%d] = %u\n", i, output[i]);
  89         if (succ1 && succ2)
  90                 MODEL_ASSERT(in_sum == out_sum);
  91         else
  92                 MODEL_ASSERT (false);
  93 */
  94         free(param);
  95         free(threads);
  96         free(queue);
  97
  98         return 0;
  99 }