1 files changed, 429 insertions, 0 deletions
diff --git a/testsuites/validation/tc-task-is-suspended.c b/testsuites/validation/tc-task-is-suspended.c
new file mode 100644
index 0000000000..d61c14f560
--- /dev/null
+++ b/testsuites/validation/tc-task-is-suspended.c
@@ -0,0 +1,429 @@
+/* SPDX-License-Identifier: BSD-2-Clause */
+
+/**
+ * @file
+ *
+ * @ingroup RtemsTaskReqIsSuspended
+ */
+
+/*
+ * Copyright (C) 2021 embedded brains GmbH & Co. KG
+ *
+ * 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.
+ */
+
+/*
+ * This file is part of the RTEMS quality process and was automatically
+ * generated.  If you find something that needs to be fixed or
+ * worded better please post a report or patch to an RTEMS mailing list
+ * or raise a bug report:
+ *
+ * https://www.rtems.org/bugs.html
+ *
+ * For information on updating and regenerating please refer to the How-To
+ * section in the Software Requirements Engineering chapter of the
+ * RTEMS Software Engineering manual.  The manual is provided as a part of
+ * a release.  For development sources please refer to the online
+ * documentation at:
+ *
+ * https://docs.rtems.org
+ */
+
+#ifdef HAVE_CONFIG_H
+#include "config.h"
+#endif
+
+#include <rtems.h>
+
+#include "tx-support.h"
+
+#include <rtems/test.h>
+
+/**
+ * @defgroup RtemsTaskReqIsSuspended spec:/rtems/task/req/is-suspended
+ *
+ * @ingroup TestsuitesValidationNoClock0
+ *
+ * @{
+ */
+
+typedef enum {
+  RtemsTaskReqIsSuspended_Pre_Id_Invalid,
+  RtemsTaskReqIsSuspended_Pre_Id_Task,
+  RtemsTaskReqIsSuspended_Pre_Id_NA
+} RtemsTaskReqIsSuspended_Pre_Id;
+
+typedef enum {
+  RtemsTaskReqIsSuspended_Pre_Suspended_Yes,
+  RtemsTaskReqIsSuspended_Pre_Suspended_No,
+  RtemsTaskReqIsSuspended_Pre_Suspended_NA
+} RtemsTaskReqIsSuspended_Pre_Suspended;
+
+typedef enum {
+  RtemsTaskReqIsSuspended_Post_Status_Ok,
+  RtemsTaskReqIsSuspended_Post_Status_InvId,
+  RtemsTaskReqIsSuspended_Post_Status_AlrdySus,
+  RtemsTaskReqIsSuspended_Post_Status_NA
+} RtemsTaskReqIsSuspended_Post_Status;
+
+typedef struct {
+  uint8_t Skip : 1;
+  uint8_t Pre_Id_NA : 1;
+  uint8_t Pre_Suspended_NA : 1;
+  uint8_t Post_Status : 2;
+} RtemsTaskReqIsSuspended_Entry;
+
+/**
+ * @brief Test context for spec:/rtems/task/req/is-suspended test case.
+ */
+typedef struct {
+  /**
+   * @brief This member contains the identifier of a task.
+   */
+  rtems_id worker_id;
+
+  /**
+   * @brief If this member is true, then the worker is suspended before the
+   *   rtems_task_is_suspended() call.
+   */
+  bool suspend;
+
+  /**
+   * @brief This member contains the return value of the
+   *   rtems_task_is_suspended() call.
+   */
+  rtems_status_code status;
+
+  /**
+   * @brief This member specifies if the ``id`` parameter value.
+   */
+  rtems_id id;
+
+  struct {
+    /**
+     * @brief This member defines the pre-condition indices for the next
+     *   action.
+     */
+    size_t pci[ 2 ];
+
+    /**
+     * @brief This member defines the pre-condition states for the next action.
+     */
+    size_t pcs[ 2 ];
+
+    /**
+     * @brief If this member is true, then the test action loop is executed.
+     */
+    bool in_action_loop;
+
+    /**
+     * @brief This member contains the next transition map index.
+     */
+    size_t index;
+
+    /**
+     * @brief This member contains the current transition map entry.
+     */
+    RtemsTaskReqIsSuspended_Entry entry;
+
+    /**
+     * @brief If this member is true, then the current transition variant
+     *   should be skipped.
+     */
+    bool skip;
+  } Map;
+} RtemsTaskReqIsSuspended_Context;
+
+static RtemsTaskReqIsSuspended_Context
+  RtemsTaskReqIsSuspended_Instance;
+
+static const char * const RtemsTaskReqIsSuspended_PreDesc_Id[] = {
+  "Invalid",
+  "Task",
+  "NA"
+};
+
+static const char * const RtemsTaskReqIsSuspended_PreDesc_Suspended[] = {
+  "Yes",
+  "No",
+  "NA"
+};
+
+static const char * const * const RtemsTaskReqIsSuspended_PreDesc[] = {
+  RtemsTaskReqIsSuspended_PreDesc_Id,
+  RtemsTaskReqIsSuspended_PreDesc_Suspended,
+  NULL
+};
+
+static void Worker( rtems_task_argument arg )
+{
+  while ( true ) {
+    /* Do nothing */
+  }
+}
+
+static void RtemsTaskReqIsSuspended_Pre_Id_Prepare(
+  RtemsTaskReqIsSuspended_Context *ctx,
+  RtemsTaskReqIsSuspended_Pre_Id   state
+)
+{
+  switch ( state ) {
+    case RtemsTaskReqIsSuspended_Pre_Id_Invalid: {
+      /*
+       * While the ``id`` parameter is not associated with a task.
+       */
+      ctx->id = INVALID_ID;
+      break;
+    }
+
+    case RtemsTaskReqIsSuspended_Pre_Id_Task: {
+      /*
+       * While the ``id`` parameter is associated with a task.
+       */
+      ctx->id = ctx->worker_id;
+      break;
+    }
+
+    case RtemsTaskReqIsSuspended_Pre_Id_NA:
+      break;
+  }
+}
+
+static void RtemsTaskReqIsSuspended_Pre_Suspended_Prepare(
+  RtemsTaskReqIsSuspended_Context      *ctx,
+  RtemsTaskReqIsSuspended_Pre_Suspended state
+)
+{
+  switch ( state ) {
+    case RtemsTaskReqIsSuspended_Pre_Suspended_Yes: {
+      /*
+       * While the task specified by the ``id`` parameter is suspended.
+       */
+      ctx->suspend = true;
+      break;
+    }
+
+    case RtemsTaskReqIsSuspended_Pre_Suspended_No: {
+      /*
+       * While the task specified by the ``id`` parameter is not suspended.
+       */
+      ctx->suspend = false;
+      break;
+    }
+
+    case RtemsTaskReqIsSuspended_Pre_Suspended_NA:
+      break;
+  }
+}
+
+static void RtemsTaskReqIsSuspended_Post_Status_Check(
+  RtemsTaskReqIsSuspended_Context    *ctx,
+  RtemsTaskReqIsSuspended_Post_Status state
+)
+{
+  switch ( state ) {
+    case RtemsTaskReqIsSuspended_Post_Status_Ok: {
+      /*
+       * The return status of rtems_task_is_suspended() shall be
+       * RTEMS_SUCCESSFUL.
+       */
+      T_rsc_success( ctx->status );
+      break;
+    }
+
+    case RtemsTaskReqIsSuspended_Post_Status_InvId: {
+      /*
+       * The return status of rtems_task_is_suspended() shall be
+       * RTEMS_INVALID_ID.
+       */
+      T_rsc( ctx->status, RTEMS_INVALID_ID );
+      break;
+    }
+
+    case RtemsTaskReqIsSuspended_Post_Status_AlrdySus: {
+      /*
+       * The return status of rtems_task_is_suspended() shall be
+       * RTEMS_ALREADY_SUSPENDED.
+       */
+      T_rsc( ctx->status, RTEMS_ALREADY_SUSPENDED );
+      break;
+    }
+
+    case RtemsTaskReqIsSuspended_Post_Status_NA:
+      break;
+  }
+}
+
+static void RtemsTaskReqIsSuspended_Setup(
+  RtemsTaskReqIsSuspended_Context *ctx
+)
+{
+  ctx->worker_id = CreateTask( "WORK", PRIO_LOW );
+  StartTask( ctx->worker_id, Worker, ctx );
+}
+
+static void RtemsTaskReqIsSuspended_Setup_Wrap( void *arg )
+{
+  RtemsTaskReqIsSuspended_Context *ctx;
+
+  ctx = arg;
+  ctx->Map.in_action_loop = false;
+  RtemsTaskReqIsSuspended_Setup( ctx );
+}
+
+static void RtemsTaskReqIsSuspended_Teardown(
+  RtemsTaskReqIsSuspended_Context *ctx
+)
+{
+  DeleteTask( ctx->worker_id );
+}
+
+static void RtemsTaskReqIsSuspended_Teardown_Wrap( void *arg )
+{
+  RtemsTaskReqIsSuspended_Context *ctx;
+
+  ctx = arg;
+  ctx->Map.in_action_loop = false;
+  RtemsTaskReqIsSuspended_Teardown( ctx );
+}
+
+static void RtemsTaskReqIsSuspended_Action(
+  RtemsTaskReqIsSuspended_Context *ctx
+)
+{
+  if ( ctx->suspend ) {
+    SuspendTask( ctx->worker_id );
+  }
+
+  ctx->status = rtems_task_is_suspended( ctx->id );
+
+  if ( ctx->suspend ) {
+    ResumeTask( ctx->worker_id );
+  }
+}
+
+static const RtemsTaskReqIsSuspended_Entry
+RtemsTaskReqIsSuspended_Entries[] = {
+  { 0, 0, 1, RtemsTaskReqIsSuspended_Post_Status_InvId },
+  { 0, 0, 0, RtemsTaskReqIsSuspended_Post_Status_AlrdySus },
+  { 0, 0, 0, RtemsTaskReqIsSuspended_Post_Status_Ok }
+};
+
+static const uint8_t
+RtemsTaskReqIsSuspended_Map[] = {
+  0, 0, 1, 2
+};
+
+static size_t RtemsTaskReqIsSuspended_Scope( void *arg, char *buf, size_t n )
+{
+  RtemsTaskReqIsSuspended_Context *ctx;
+
+  ctx = arg;
+
+  if ( ctx->Map.in_action_loop ) {
+    return T_get_scope(
+      RtemsTaskReqIsSuspended_PreDesc,
+      buf,
+      n,
+      ctx->Map.pcs
+    );
+  }
+
+  return 0;
+}
+
+static T_fixture RtemsTaskReqIsSuspended_Fixture = {
+  .setup = RtemsTaskReqIsSuspended_Setup_Wrap,
+  .stop = NULL,
+  .teardown = RtemsTaskReqIsSuspended_Teardown_Wrap,
+  .scope = RtemsTaskReqIsSuspended_Scope,
+  .initial_context = &RtemsTaskReqIsSuspended_Instance
+};
+
+static inline RtemsTaskReqIsSuspended_Entry RtemsTaskReqIsSuspended_PopEntry(
+  RtemsTaskReqIsSuspended_Context *ctx
+)
+{
+  size_t index;
+
+  index = ctx->Map.index;
+  ctx->Map.index = index + 1;
+  return RtemsTaskReqIsSuspended_Entries[
+    RtemsTaskReqIsSuspended_Map[ index ]
+  ];
+}
+
+static void RtemsTaskReqIsSuspended_SetPreConditionStates(
+  RtemsTaskReqIsSuspended_Context *ctx
+)
+{
+  ctx->Map.pcs[ 0 ] = ctx->Map.pci[ 0 ];
+
+  if ( ctx->Map.entry.Pre_Suspended_NA ) {
+    ctx->Map.pcs[ 1 ] = RtemsTaskReqIsSuspended_Pre_Suspended_NA;
+  } else {
+    ctx->Map.pcs[ 1 ] = ctx->Map.pci[ 1 ];
+  }
+}
+
+static void RtemsTaskReqIsSuspended_TestVariant(
+  RtemsTaskReqIsSuspended_Context *ctx
+)
+{
+  RtemsTaskReqIsSuspended_Pre_Id_Prepare( ctx, ctx->Map.pcs[ 0 ] );
+  RtemsTaskReqIsSuspended_Pre_Suspended_Prepare( ctx, ctx->Map.pcs[ 1 ] );
+  RtemsTaskReqIsSuspended_Action( ctx );
+  RtemsTaskReqIsSuspended_Post_Status_Check( ctx, ctx->Map.entry.Post_Status );
+}
+
+/**
+ * @fn void T_case_body_RtemsTaskReqIsSuspended( void )
+ */
+T_TEST_CASE_FIXTURE(
+  RtemsTaskReqIsSuspended,
+  &RtemsTaskReqIsSuspended_Fixture
+)
+{
+  RtemsTaskReqIsSuspended_Context *ctx;
+
+  ctx = T_fixture_context();
+  ctx->Map.in_action_loop = true;
+  ctx->Map.index = 0;
+
+  for (
+    ctx->Map.pci[ 0 ] = RtemsTaskReqIsSuspended_Pre_Id_Invalid;
+    ctx->Map.pci[ 0 ] < RtemsTaskReqIsSuspended_Pre_Id_NA;
+    ++ctx->Map.pci[ 0 ]
+  ) {
+    for (
+      ctx->Map.pci[ 1 ] = RtemsTaskReqIsSuspended_Pre_Suspended_Yes;
+      ctx->Map.pci[ 1 ] < RtemsTaskReqIsSuspended_Pre_Suspended_NA;
+      ++ctx->Map.pci[ 1 ]
+    ) {
+      ctx->Map.entry = RtemsTaskReqIsSuspended_PopEntry( ctx );
+      RtemsTaskReqIsSuspended_SetPreConditionStates( ctx );
+      RtemsTaskReqIsSuspended_TestVariant( ctx );
+    }
+  }
+}
+
+/** @} */