score: Use processor mask in _SMP_Multicast_action

Processor_mask is the internal data type to deal with processor sets.

1 files changed, 288 insertions, 0 deletions

diff --git a/testsuites/smptests/smpmulticast01/init.c b/testsuites/smptests/smpmulticast01/init.c
new file mode 100644
index 0000000000..2319582ab6
--- /dev/null
+++ b/testsuites/smptests/smpmulticast01/init.c
@@ -0,0 +1,288 @@
+/*
+ * SPDX-License-Identifier: BSD-2-Clause
+ *
+ * Copyright (C) 2019 embedded brains GmbH
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+ * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
+ * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
+ * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
+ * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+ * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
+ * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
+ * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
+ * POSSIBILITY OF SUCH DAMAGE.
+ */
+
+#include <rtems/score/smpimpl.h>
+#include <rtems/score/atomic.h>
+#include <rtems/score/threaddispatch.h>
+#include <rtems/sysinit.h>
+#include <rtems.h>
+
+#include <string.h>
+
+#include <t.h>
+#include <tmacros.h>
+
+#define CPU_COUNT 32
+
+const char rtems_test_name[] = "SMPMULTICAST 1";
+
+static const T_config config = {
+  .name = "SMPMultiCast",
+  .putchar = T_putchar_default,
+  .verbosity = T_VERBOSE,
+  .now = T_now
+};
+
+typedef struct {
+  Atomic_Uint id[CPU_COUNT];
+} test_context;
+
+static test_context test_instance;
+
+static void multicast_action_irq_disabled(
+  const Processor_mask *targets,
+  SMP_Action_handler handler,
+  void *arg
+)
+{
+  rtems_interrupt_level level;
+
+  rtems_interrupt_local_disable(level);
+  _SMP_Multicast_action(targets, handler, arg);
+  rtems_interrupt_local_enable(level);
+}
+
+static void multicast_action_dispatch_disabled(
+  const Processor_mask *targets,
+  SMP_Action_handler handler,
+  void *arg
+)
+{
+  Per_CPU_Control *cpu_self;
+
+  cpu_self = _Thread_Dispatch_disable();
+  _SMP_Multicast_action(targets, handler, arg);
+  _Thread_Dispatch_enable(cpu_self);
+}
+
+static void action(void *arg)
+{
+  test_context *ctx;
+  uint32_t self;
+  unsigned expected;
+  bool success;
+
+  ctx = arg;
+  self = rtems_scheduler_get_processor();
+  expected = 0;
+  success = _Atomic_Compare_exchange_uint(
+    &ctx->id[self],
+    &expected,
+    self + 1,
+    ATOMIC_ORDER_RELAXED,
+    ATOMIC_ORDER_RELAXED
+  );
+  T_quiet_true(success, "set CPU identifier failed");
+}
+
+static void test_unicast(
+  test_context *ctx,
+  void (*multicast_action)(const Processor_mask *, SMP_Action_handler, void *),
+  bool before_multitasking
+)
+{
+  uint32_t step;
+  uint32_t i;
+  uint32_t n;
+  uint32_t self;
+
+  T_plan(1);
+  step = 0;
+  self = rtems_scheduler_get_processor();
+  n = rtems_scheduler_get_processor_maximum();
+
+  for (i = 0; i < n; ++i) {
+    Processor_mask cpus;
+    uint32_t j;
+
+    memset(ctx, 0, sizeof(*ctx));
+
+    _Processor_mask_Zero(&cpus);
+    _Processor_mask_Set(&cpus, i);
+    (*multicast_action)(&cpus, action, ctx);
+
+    for (j = 0; j < n; ++j) {
+      unsigned id;
+
+      ++step;
+      id = _Atomic_Load_uint(&ctx->id[j], ATOMIC_ORDER_RELAXED);
+
+      if (before_multitasking) {
+        if (j == self) {
+          T_quiet_eq_uint(j + 1, id);
+        } else {
+          T_quiet_eq_uint(0, id);
+        }
+      } else {
+        if (j == i) {
+          T_quiet_eq_uint(j + 1, id);
+        } else {
+          T_quiet_eq_uint(0, id);
+        }
+      }
+    }
+  }
+
+  T_step_eq_u32(0, step, n * n);
+}
+
+static void test_broadcast(
+  test_context *ctx,
+  void (*multicast_action)(const Processor_mask *, SMP_Action_handler, void *),
+  bool before_multitasking
+)
+{
+  uint32_t step;
+  uint32_t i;
+  uint32_t n;
+  uint32_t self;
+
+  T_plan(1);
+  step = 0;
+  self = rtems_scheduler_get_processor();
+  n = rtems_scheduler_get_processor_maximum();
+
+  for (i = 0; i < n; ++i) {
+    uint32_t j;
+
+    memset(ctx, 0, sizeof(*ctx));
+
+    (*multicast_action)(NULL, action, ctx);
+
+    for (j = 0; j < n; ++j) {
+      unsigned id;
+
+      ++step;
+      id = _Atomic_Load_uint(&ctx->id[j], ATOMIC_ORDER_RELAXED);
+
+      if (before_multitasking) {
+        if (j == self) {
+          T_quiet_eq_uint(j + 1, id);
+        } else {
+          T_quiet_eq_uint(0, id);
+        }
+      } else {
+        T_quiet_eq_uint(j + 1, id);
+      }
+    }
+  }
+
+  T_step_eq_u32(0, step, n * n);
+}
+
+static void test_before_multitasking(void)
+{
+  test_context *ctx;
+
+  ctx = &test_instance;
+
+  T_case_begin("UnicastBeforeMultitasking", NULL);
+  test_unicast(ctx, _SMP_Multicast_action, true);
+  T_case_end();
+
+  T_case_begin("UnicastBeforeMultitaskingIRQDisabled", NULL);
+  test_unicast(ctx, multicast_action_irq_disabled, true);
+  T_case_end();
+
+  T_case_begin("UnicastBeforeMultitaskingDispatchDisabled", NULL);
+  test_unicast(ctx, multicast_action_dispatch_disabled, true);
+  T_case_end();
+
+  T_case_begin("BroadcastBeforeMultitasking", NULL);
+  test_broadcast(ctx, _SMP_Multicast_action, true);
+  T_case_end();
+
+  T_case_begin("BroadcastBeforeMultitaskingIRQDisabled", NULL);
+  test_broadcast(ctx, multicast_action_irq_disabled, true);
+  T_case_end();
+
+  T_case_begin("BroadcastBeforeMultitaskingDispatchDisabled", NULL);
+  test_broadcast(ctx, multicast_action_dispatch_disabled, true);
+  T_case_end();
+}
+
+static void after_drivers(void)
+{
+  TEST_BEGIN();
+  T_run_initialize(&config);
+  test_before_multitasking();
+}
+
+RTEMS_SYSINIT_ITEM(
+  after_drivers,
+  RTEMS_SYSINIT_DEVICE_DRIVERS,
+  RTEMS_SYSINIT_ORDER_LAST
+);
+
+static void Init(rtems_task_argument arg)
+{
+  test_context *ctx;
+  bool ok;
+
+  ctx = &test_instance;
+
+  T_case_begin("UnicastDuringMultitasking", NULL);
+  test_unicast(ctx, _SMP_Multicast_action, false);
+  T_case_end();
+
+  T_case_begin("UnicastDuringMultitaskingIRQDisabled", NULL);
+  test_unicast(ctx, multicast_action_irq_disabled, false);
+  T_case_end();
+
+  T_case_begin("UnicastDuringMultitaskingDispatchDisabled", NULL);
+  test_unicast(ctx, multicast_action_dispatch_disabled, false);
+  T_case_end();
+
+  T_case_begin("BroadcastDuringMultitasking", NULL);
+  test_broadcast(ctx, _SMP_Multicast_action, false);
+  T_case_end();
+
+  T_case_begin("BroadcastDuringMultitaskingIRQDisabled", NULL);
+  test_broadcast(ctx, multicast_action_irq_disabled, false);
+  T_case_end();
+
+  T_case_begin("BroadcastDuringMultitaskingDispatchDisabled", NULL);
+  test_broadcast(ctx, multicast_action_dispatch_disabled, false);
+  T_case_end();
+
+  ok = T_run_finalize();
+  rtems_test_assert(ok);
+  TEST_END();
+  rtems_test_exit(0);
+}
+
+#define CONFIGURE_APPLICATION_NEEDS_CLOCK_DRIVER
+
+#define CONFIGURE_MAXIMUM_TASKS 1
+
+#define CONFIGURE_MAXIMUM_PROCESSORS CPU_COUNT
+
+#define CONFIGURE_RTEMS_INIT_TASKS_TABLE
+
+#define CONFIGURE_INIT
+
+#include <rtems/confdefs.h>