summaryrefslogtreecommitdiffstats
path: root/testsuites/mptests/mp13
diff options
context:
space:
mode:
Diffstat (limited to 'testsuites/mptests/mp13')
-rw-r--r--testsuites/mptests/mp13/init.c115
-rw-r--r--testsuites/mptests/mp13/node1/mp13.doc48
-rw-r--r--testsuites/mptests/mp13/node1/mp13.scn14
-rw-r--r--testsuites/mptests/mp13/node2/mp13.doc13
-rw-r--r--testsuites/mptests/mp13/node2/mp13.scn16
-rw-r--r--testsuites/mptests/mp13/system.h58
-rw-r--r--testsuites/mptests/mp13/task1.c73
-rw-r--r--testsuites/mptests/mp13/task2.c106
8 files changed, 0 insertions, 443 deletions
diff --git a/testsuites/mptests/mp13/init.c b/testsuites/mptests/mp13/init.c
deleted file mode 100644
index 1e96d5c69e..0000000000
--- a/testsuites/mptests/mp13/init.c
+++ /dev/null
@@ -1,115 +0,0 @@
-/* Init
- *
- * This routine is the initialization task for this test program.
- * It is a user initialization task and has the responsibility for creating
- * and starting the tasks that make up the test. If the time of day
- * clock is required for the test, it should also be set to a known
- * value by this function.
- *
- * Input parameters:
- * argument - task argument
- *
- * Output parameters: NONE
- *
- * COPYRIGHT (c) 1989, 1990, 1991, 1992, 1993, 1994.
- * On-Line Applications Research Corporation (OAR).
- * All rights assigned to U.S. Government, 1994.
- *
- * This material may be reproduced by or for the U.S. Government pursuant
- * to the copyright license under the clause at DFARS 252.227-7013. This
- * notice must appear in all copies of this file and its derivatives.
- *
- * $Id$
- */
-
-#define TEST_INIT
-#include "system.h"
-
-rtems_task Init(
- rtems_task_argument argument
-)
-{
- rtems_status_code status;
-
- printf(
- "\n\n*** TEST 13 -- NODE %d ***\n",
- Multiprocessing_configuration.node
- );
-
- Task_name[ 1 ] = rtems_build_name( '1', '1', '1', ' ' );
- Task_name[ 2 ] = rtems_build_name( '2', '2', '2', ' ' );
-
- Queue_name[ 1 ] = rtems_build_name( 'M', 'S', 'G', ' ' );
-
- Semaphore_name[ 1 ] = rtems_build_name( 'S', 'E', 'M', ' ' );
-
- if ( Multiprocessing_configuration.node == 1 ) {
- puts( "Creating Message Queue (Global)" );
- status = rtems_message_queue_create(
- Queue_name[ 1 ],
- 3,
- 16,
- RTEMS_GLOBAL,
- &Queue_id[ 1 ]
- );
- directive_failed( status, "rtems_message_queue_create" );
-
- puts( "Creating Semaphore (Global)" );
- status = rtems_semaphore_create(
- Semaphore_name[ 1 ],
- 1,
- RTEMS_GLOBAL | RTEMS_PRIORITY,
- RTEMS_NO_PRIORITY,
- &Semaphore_id[ 1 ]
- );
- directive_failed( status, "rtems_semaphore_create" );
-
- status = rtems_semaphore_obtain(
- Semaphore_id[ 1 ],
- RTEMS_DEFAULT_OPTIONS,
- RTEMS_NO_TIMEOUT
- );
- directive_failed( status, "rtems_semaphore_obtain" );
- }
-
- puts( "Creating Test_task 1 (local)" );
- status = rtems_task_create(
- Task_name[ 1 ],
- 1,
- RTEMS_MINIMUM_STACK_SIZE,
- RTEMS_TIMESLICE,
- RTEMS_DEFAULT_ATTRIBUTES,
- &Task_id[ 1 ]
- );
- directive_failed( status, "rtems_task_create" );
-
- puts( "Starting Test_task 1 (local)" );
- status = rtems_task_start( Task_id[ 1 ], Test_task1, 0 );
- directive_failed( status, "rtems_task_start" );
-
- puts( "Creating Test_task 2 (local)" );
- status = rtems_task_create(
- Task_name[ 2 ],
- 1,
- RTEMS_MINIMUM_STACK_SIZE,
- RTEMS_TIMESLICE,
- RTEMS_DEFAULT_ATTRIBUTES,
- &Task_id[ 2 ]
- );
- directive_failed( status, "rtems_task_create" );
-
- puts( "Starting Test_task 2 (local)" );
- status = rtems_task_start( Task_id[ 2 ], Test_task2, 0 );
- directive_failed( status, "rtems_task_start" );
-
- if ( Multiprocessing_configuration.node == 1 ) {
- status = rtems_task_wake_after( 5 * TICKS_PER_SECOND );
- directive_failed( status, "rtems_task_wake_after" );
-
- puts( "*** END OF TEST 13 ***" );
- exit( 0 );
- }
- puts( "Deleting initialization task" );
- status = rtems_task_delete( RTEMS_SELF );
- directive_failed( status, "rtems_task_delete of RTEMS_SELF" );
-}
diff --git a/testsuites/mptests/mp13/node1/mp13.doc b/testsuites/mptests/mp13/node1/mp13.doc
deleted file mode 100644
index abf558b443..0000000000
--- a/testsuites/mptests/mp13/node1/mp13.doc
+++ /dev/null
@@ -1,48 +0,0 @@
-#
-# $Id$
-#
-# COPYRIGHT (c) 1989, 1990, 1991, 1992, 1993, 1994.
-# On-Line Applications Research Corporation (OAR).
-# All rights assigned to U.S. Government, 1994.
-#
-# This material may be reproduced by or for the U.S. Government pursuant
-# to the copyright license under the clause at DFARS 252.227-7013. This
-# notice must appear in all copies of this file and its derivatives.
-#
-
-This file describes the directives and concepts tested by this test set.
-
-test set name: test62
-
-GLOBAL SEMAPHORE TEST
-
-directives:
- ex_init, ex_start, t_create, t_start, tm_tick, i_return, tm_wkafter,
- sm_create, q_create, sm_p, q_receive
-
-concepts:
-
- a. Verifies system can create and start both the executive's system
- initialization and idle task.
-
- b. Verifies executive can swap between three application tasks at the
- same priority and the executive's internal idle task.
-
- c. Verifies can print strings to the CRT on port 2 of the mvme136 board
- using Print and Println in the board support package.
-
- d. Verifies interrupt handler can handler a task switch from an interrupt
- as specified with the i_return directive.
-
- e. Verifies executive initialization performed correctly.
-
- f. Verifies the executive trap handler except for the halt function.
-
- g. Verifies the Shared Memory Locked Queue Driver.
-
- h. Verifies that E_MESSAGETIMEOUT is when waiting on a
- remote message queue.
-
- i. Verifies that E_SEMTIMEOUT is when waiting on a remote semaphore.
-
- j. Verifies that a task can delete itself.
diff --git a/testsuites/mptests/mp13/node1/mp13.scn b/testsuites/mptests/mp13/node1/mp13.scn
deleted file mode 100644
index d3bd11f65e..0000000000
--- a/testsuites/mptests/mp13/node1/mp13.scn
+++ /dev/null
@@ -1,14 +0,0 @@
-*** TEST 13 -- NODE 1 ***
-Creating Message Queue (Global)
-Creating Semaphore (Global)
-Creating Test_task 1 (local)
-Starting Test_task 1 (local)
-Creating Test_task 2 (local)
-Starting Test_task 2 (local)
-Getting QID of message queue
-Receiving message ...
-Getting SMID of semaphore
-Releasing semaphore ...
-Getting semaphore ...
-Getting semaphore ...
-*** END OF TEST 13 ***
diff --git a/testsuites/mptests/mp13/node2/mp13.doc b/testsuites/mptests/mp13/node2/mp13.doc
deleted file mode 100644
index 0de40191c6..0000000000
--- a/testsuites/mptests/mp13/node2/mp13.doc
+++ /dev/null
@@ -1,13 +0,0 @@
-#
-# $Id$
-#
-# COPYRIGHT (c) 1989, 1990, 1991, 1992, 1993, 1994.
-# On-Line Applications Research Corporation (OAR).
-# All rights assigned to U.S. Government, 1994.
-#
-# This material may be reproduced by or for the U.S. Government pursuant
-# to the copyright license under the clause at DFARS 252.227-7013. This
-# notice must appear in all copies of this file and its derivatives.
-#
-
-
diff --git a/testsuites/mptests/mp13/node2/mp13.scn b/testsuites/mptests/mp13/node2/mp13.scn
deleted file mode 100644
index e9df202a94..0000000000
--- a/testsuites/mptests/mp13/node2/mp13.scn
+++ /dev/null
@@ -1,16 +0,0 @@
-*** TEST 13 -- NODE 2 ***
-Creating Test_task 1 (local)
-Starting Test_task 1 (local)
-Creating Test_task 2 (local)
-Starting Test_task 2 (local)
-Deleting initialization task
-Getting QID of message queue
-Getting SMID of semaphore
-Getting semaphore ...
-Receiving message ...
-Releasing semaphore ...
-Getting semaphore ...
-rtems_message_queue_receive correctly returned RTEMS_TIMEOUT
-Deleting self
-rtems_semaphore_obtain correctly returned RTEMS_TIMEOUT
-*** END OF TEST 13 ***
diff --git a/testsuites/mptests/mp13/system.h b/testsuites/mptests/mp13/system.h
deleted file mode 100644
index c3b0924a18..0000000000
--- a/testsuites/mptests/mp13/system.h
+++ /dev/null
@@ -1,58 +0,0 @@
-/* system.h
- *
- * This include file contains information that is included in every
- * function in the test set.
- *
- * COPYRIGHT (c) 1989, 1990, 1991, 1992, 1993, 1994.
- * On-Line Applications Research Corporation (OAR).
- * All rights assigned to U.S. Government, 1994.
- *
- * This material may be reproduced by or for the U.S. Government pursuant
- * to the copyright license under the clause at DFARS 252.227-7013. This
- * notice must appear in all copies of this file and its derivatives.
- *
- * $Id$
- */
-
-#include <tmacros.h>
-
-/* functions */
-
-rtems_task Init(
- rtems_task_argument argument
-);
-
-rtems_task Test_task1(
- rtems_task_argument argument
-);
-
-rtems_task Test_task2(
- rtems_task_argument argument
-);
-
-/* configuration information */
-
-#define CONFIGURE_MPTEST
-
-#define CONFIGURE_TEST_NEEDS_CONSOLE_DRIVER
-#define CONFIGURE_TEST_NEEDS_CLOCK_DRIVER
-
-#if ( NODE_NUMBER == 1 )
-#define CONFIGURE_MAXIMUM_SEMAPHORES 1
-#define CONFIGURE_MAXIMUM_MESSAGE_QUEUES 1
-#endif
-
-#include <confdefs.h>
-
-/* variables */
-
-TEST_EXTERN rtems_id Task_id[ 4 ]; /* array of task ids */
-TEST_EXTERN rtems_name Task_name[ 4 ]; /* array of task names */
-
-TEST_EXTERN rtems_id Queue_id[ 2 ]; /* array of message queue ids */
-TEST_EXTERN rtems_name Queue_name[ 2 ]; /* array of message queue names */
-
-TEST_EXTERN rtems_id Semaphore_id[ 2 ]; /* array of semaphore ids */
-TEST_EXTERN rtems_name Semaphore_name[ 2 ]; /* array of semaphore names */
-
-/* end of include file */
diff --git a/testsuites/mptests/mp13/task1.c b/testsuites/mptests/mp13/task1.c
deleted file mode 100644
index 6b599f971a..0000000000
--- a/testsuites/mptests/mp13/task1.c
+++ /dev/null
@@ -1,73 +0,0 @@
-/* Test_task1
- *
- * This task attempts to receive a message from a global message queue.
- * If running on the node on which the queue resides, the wait is
- * forever, otherwise it times out on a remote message queue.
- *
- * Input parameters:
- * argument - task argument
- *
- * Output parameters: NONE
- *
- * COPYRIGHT (c) 1989, 1990, 1991, 1992, 1993, 1994.
- * On-Line Applications Research Corporation (OAR).
- * All rights assigned to U.S. Government, 1994.
- *
- * This material may be reproduced by or for the U.S. Government pursuant
- * to the copyright license under the clause at DFARS 252.227-7013. This
- * notice must appear in all copies of this file and its derivatives.
- *
- * $Id$
- */
-
-#include "system.h"
-
-rtems_task Test_task1(
- rtems_task_argument argument
-)
-{
- char receive_buffer[16];
- rtems_unsigned32 size;
- rtems_status_code status;
-
- puts( "Getting QID of message queue" );
-
- do {
- status = rtems_message_queue_ident(
- Queue_name[ 1 ],
- RTEMS_SEARCH_ALL_NODES,
- &Queue_id[ 1 ]
- );
- } while ( !rtems_is_status_successful( status ) );
-
- if ( Multiprocessing_configuration.node == 1 ) {
- puts( "Receiving message ..." );
- status = rtems_message_queue_receive(
- Queue_id[ 1 ],
- (long (*)[4])receive_buffer,
- &size,
- RTEMS_DEFAULT_OPTIONS,
- RTEMS_NO_TIMEOUT
- );
- puts( "How did I get back from here????" );
- directive_failed( status, "rtems_message_queue_receive" );
- }
-
- status = rtems_task_wake_after( TICKS_PER_SECOND );
- directive_failed( status, "rtems_task_wake_after" );
-
- puts( "Receiving message ..." );
- status = rtems_message_queue_receive(
- Queue_id[ 1 ],
- (long (*)[4])receive_buffer,
- &size,
- RTEMS_DEFAULT_OPTIONS,
- 2 * TICKS_PER_SECOND
- );
- fatal_directive_status(status, RTEMS_TIMEOUT, "rtems_message_queue_receive");
- puts( "rtems_message_queue_receive correctly returned RTEMS_TIMEOUT" );
-
- puts( "Deleting self" );
- status = rtems_task_delete( RTEMS_SELF );
- directive_failed( status, "rtems_task_delete of RTEMS_SELF" );
-}
diff --git a/testsuites/mptests/mp13/task2.c b/testsuites/mptests/mp13/task2.c
deleted file mode 100644
index a43b64d3cf..0000000000
--- a/testsuites/mptests/mp13/task2.c
+++ /dev/null
@@ -1,106 +0,0 @@
-/* Test_task2
- *
- * This task attempts to receive control of a global semaphore.
- * If running on the node on which the semaphore resides, the wait is
- * forever, otherwise it times out on a remote semaphore.
- *
- * Input parameters:
- * argument - task argument
- *
- * Output parameters: NONE
- *
- * COPYRIGHT (c) 1989, 1990, 1991, 1992, 1993, 1994.
- * On-Line Applications Research Corporation (OAR).
- * All rights assigned to U.S. Government, 1994.
- *
- * This material may be reproduced by or for the U.S. Government pursuant
- * to the copyright license under the clause at DFARS 252.227-7013. This
- * notice must appear in all copies of this file and its derivatives.
- *
- * $Id$
- */
-
-#include "system.h"
-
-rtems_task Test_task2(
- rtems_task_argument argument
-)
-{
- rtems_status_code status;
-
- puts( "Getting SMID of semaphore" );
- do {
- status = rtems_semaphore_ident(
- Semaphore_name[ 1 ],
- RTEMS_SEARCH_ALL_NODES,
- &Semaphore_id[ 1 ]
- );
- } while ( !rtems_is_status_successful( status ) );
-
- directive_failed( status, "rtems_semaphore_ident" );
-
- if ( Multiprocessing_configuration.node == 1 ) {
- status = rtems_task_wake_after( TICKS_PER_SECOND );
- directive_failed( status, "rtems_task_wake_after" );
-
- puts( "Releasing semaphore ..." );
- status = rtems_semaphore_release( Semaphore_id[ 1 ] );
- directive_failed( status, "rtems_semaphore_release" );
-
- status = rtems_task_wake_after( TICKS_PER_SECOND / 2 );
- directive_failed( status, "rtems_task_wake_after" );
-
- puts( "Getting semaphore ..." );
- status = rtems_semaphore_obtain(
- Semaphore_id[ 1 ],
- RTEMS_DEFAULT_OPTIONS,
- RTEMS_NO_TIMEOUT
- );
- directive_failed( status, "rtems_semaphore_obtain" );
-
- puts( "Getting semaphore ..." );
- status = rtems_semaphore_obtain(
- Semaphore_id[ 1 ],
- RTEMS_DEFAULT_OPTIONS,
- RTEMS_NO_TIMEOUT
- );
- puts( "How did I get back from here????" );
- directive_failed( status, "rtems_semaphore_obtain" );
- }
-
-/*
- status = rtems_task_wake_after( TICKS_PER_SECOND / 2 );
- directive_failed( status, "rtems_task_wake_after" );
-*/
-
- puts( "Getting semaphore ..." );
- status = rtems_semaphore_obtain(
- Semaphore_id[ 1 ],
- RTEMS_DEFAULT_OPTIONS,
- RTEMS_NO_TIMEOUT
- );
- directive_failed( status, "rtems_semaphore_obtain" );
-
- puts( "Releasing semaphore ..." );
- status = rtems_semaphore_release( Semaphore_id[ 1 ] );
- directive_failed( status, "rtems_semaphore_release" );
-
- status = rtems_task_wake_after( TICKS_PER_SECOND );
- directive_failed( status, "rtems_task_wake_after" );
-
- puts( "Getting semaphore ..." );
- status = rtems_semaphore_obtain(
- Semaphore_id[ 1 ],
- RTEMS_DEFAULT_OPTIONS,
- 2 * TICKS_PER_SECOND
- );
- fatal_directive_status(
- status,
- RTEMS_TIMEOUT,
- "rtems_semaphore_obtain"
- );
- puts( "rtems_semaphore_obtain correctly returned RTEMS_TIMEOUT" );
-
- puts( "*** END OF TEST 13 ***" );
- exit( 0 );
-}
generated by cgit v1.2.3 (git 2.25.1) at 2024-04-27 10:21:29 +0000