diff options
Diffstat (limited to 'c/src/tests/sptests')
191 files changed, 0 insertions, 13967 deletions
diff --git a/c/src/tests/sptests/README b/c/src/tests/sptests/README deleted file mode 100644 index 2843063c31..0000000000 --- a/c/src/tests/sptests/README +++ /dev/null @@ -1,9 +0,0 @@ -# -# $Id$ -# - -This directory contains the RTEMS Single Processor Test Suite. -The tests in this directory provide near complete (98%+) test -coverage of the non-multiprocessor code in RTEMS. - - diff --git a/c/src/tests/sptests/sp01/init.c b/c/src/tests/sptests/sp01/init.c deleted file mode 100644 index 82ffd0015c..0000000000 --- a/c/src/tests/sptests/sp01/init.c +++ /dev/null @@ -1,89 +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$ - */ - -#include "system.h" -#undef EXTERN -#define EXTERN -#include "conftbl.h" -#include "gvar.h" - -rtems_task Init( - rtems_task_argument argument -) -{ - rtems_time_of_day time; - rtems_status_code status; - - puts( "\n\n*** TEST 1 ***" ); - - build_time( &time, 12, 31, 1988, 9, 0, 0, 0 ); - status = rtems_clock_set( &time ); - directive_failed( status, "rtems_clock_set" ); - - Task_name[ 1 ] = rtems_build_name( 'T', 'A', '1', ' ' ); - Task_name[ 2 ] = rtems_build_name( 'T', 'A', '2', ' ' ); - Task_name[ 3 ] = rtems_build_name( 'T', 'A', '3', ' ' ); - - status = rtems_task_create( - Task_name[ 1 ], - 1, - 2 * 1024, - RTEMS_INTERRUPT_LEVEL(31), - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 1 ] - ); - directive_failed( status, "rtems_task_create of TA1" ); - - status = rtems_task_create( - Task_name[ 2 ], - 1, - 2 * 1024, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 2 ] - ); - directive_failed( status, "rtems_task_create of TA2" ); - - status = rtems_task_create( - Task_name[ 3 ], - 1, - 2 * 1024, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 3 ] - ); - directive_failed( status, "rtems_task_create of TA3" ); - - status = rtems_task_start( Task_id[ 1 ], Task_1_through_3, 0 ); - directive_failed( status, "rtems_task_start of TA1" ); - - status = rtems_task_start( Task_id[ 2 ], Task_1_through_3, 0 ); - directive_failed( status, "rtems_task_start of TA2" ); - - status = rtems_task_start( Task_id[ 3 ], Task_1_through_3, 0 ); - directive_failed( status, "rtems_task_start of TA3" ); - - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of RTEMS_SELF" ); -} diff --git a/c/src/tests/sptests/sp01/sp01.doc b/c/src/tests/sptests/sp01/sp01.doc deleted file mode 100644 index 79b1aaaa87..0000000000 --- a/c/src/tests/sptests/sp01/sp01.doc +++ /dev/null @@ -1,43 +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: test1 - -directives: - ex_init, ex_start, t_create, t_start, tm_tick, i_return, t_ident, - tm_set, tm_get, tm_wkafter - -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 handle 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 that a task can get the task identification number of itself. - -output: - "TA1" is printed once every 5 seconds. "TA2" is printed once - every 10 seconds. "TA3" is printed once every 15 seconds. diff --git a/c/src/tests/sptests/sp01/sp01.scn b/c/src/tests/sptests/sp01/sp01.scn deleted file mode 100644 index d4fcc4561b..0000000000 --- a/c/src/tests/sptests/sp01/sp01.scn +++ /dev/null @@ -1,18 +0,0 @@ -*** TEST 1 *** -TA1 - rtems_clock_get - 09:00:00 12/31/1988 -TA2 - rtems_clock_get - 09:00:00 12/31/1988 -TA3 - rtems_clock_get - 09:00:00 12/31/1988 -TA1 - rtems_clock_get - 09:00:05 12/31/1988 -TA2 - rtems_clock_get - 09:00:10 12/31/1988 -TA1 - rtems_clock_get - 09:00:10 12/31/1988 -TA3 - rtems_clock_get - 09:00:15 12/31/1988 -TA1 - rtems_clock_get - 09:00:15 12/31/1988 -TA2 - rtems_clock_get - 09:00:20 12/31/1988 -TA1 - rtems_clock_get - 09:00:20 12/31/1988 -TA1 - rtems_clock_get - 09:00:25 12/31/1988 -TA3 - rtems_clock_get - 09:00:30 12/31/1988 -TA1 - rtems_clock_get - 09:00:30 12/31/1988 -TA2 - rtems_clock_get - 09:00:30 12/31/1988 -*** END OF TEST 1 *** - -NOTE: The order of the prints at each time interval is irrelevant. diff --git a/c/src/tests/sptests/sp01/system.h b/c/src/tests/sptests/sp01/system.h deleted file mode 100644 index aa2c6d17e4..0000000000 --- a/c/src/tests/sptests/sp01/system.h +++ /dev/null @@ -1,30 +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 <rtems.h> -#include "tmacros.h" - -/* Miscellaneous */ - -#define EXTERN extern /* external definition */ - -/* macros */ - -/* structures */ - -#include "gvar.h" - -/* end of include file */ diff --git a/c/src/tests/sptests/sp01/task1.c b/c/src/tests/sptests/sp01/task1.c deleted file mode 100644 index b45d3abce6..0000000000 --- a/c/src/tests/sptests/sp01/task1.c +++ /dev/null @@ -1,50 +0,0 @@ -/* Task_1_through_3 - * - * This routine serves as a test task. It verifies the basic task - * switching capabilities of the executive. - * - * 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 Task_1_through_3( - rtems_task_argument argument -) -{ - rtems_id tid; - rtems_time_of_day time; - rtems_status_code status; - - status = rtems_task_ident( RTEMS_SELF, RTEMS_SEARCH_ALL_NODES, &tid ); - directive_failed( status, "rtems_task_ident" ); - - while( FOREVER ) { - status = rtems_clock_get( RTEMS_CLOCK_GET_TOD, &time ); - directive_failed( status, "rtems_clock_get" ); - - if ( time.second >= 35 ) { - puts( "*** END OF TEST 1 ***" ); - exit( 0 ); - } - - put_name( Task_name[ task_number( tid ) ], FALSE ); - print_time( " - rtems_clock_get - ", &time, "\n" ); - - status = rtems_task_wake_after( task_number( tid ) * 5 * TICKS_PER_SECOND ); - directive_failed( status, "rtems_task_wake_after" ); - } -} diff --git a/c/src/tests/sptests/sp02/init.c b/c/src/tests/sptests/sp02/init.c deleted file mode 100644 index b3ada92914..0000000000 --- a/c/src/tests/sptests/sp02/init.c +++ /dev/null @@ -1,155 +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$ - */ - -#include "system.h" -#undef EXTERN -#define EXTERN -#include "conftbl.h" -#include "gvar.h" - -rtems_task Init( - rtems_task_argument argument -) -{ - rtems_status_code status; - - puts( "\n\n*** TEST 2 ***" ); - - Preempt_task_name = rtems_build_name( 'P', 'R', 'M', 'T' ); - - status = rtems_task_create( - Preempt_task_name, - 1, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Preempt_task_id - ); - directive_failed( status, "rtems_task_create of RTEMS_PREEMPT" ); - - status = rtems_task_start( Preempt_task_id, Preempt_task, 0 ); - directive_failed( status, "rtems_task_start of RTEMS_PREEMPT" ); - - puts( "INIT - rtems_task_wake_after - yielding processor" ); - status = rtems_task_wake_after( RTEMS_YIELD_PROCESSOR ); - directive_failed( status, "rtems_task_wake_after" ); - - Task_name[ 1 ] = rtems_build_name( 'T', 'A', '1', ' ' ); - Task_name[ 2 ] = rtems_build_name( 'T', 'A', '2', ' ' ); - Task_name[ 3 ] = rtems_build_name( 'T', 'A', '3', ' ' ); - - status = rtems_task_create( - Task_name[ 1 ], - 3, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 1 ] - ); - directive_failed( status, "rtems_task_create of TA1" ); - - status = rtems_task_create( - Task_name[ 2 ], - 3, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 2 ] - ); - directive_failed( status, "rtems_task_create of TA2" ); - - status = rtems_task_create( - Task_name[ 3 ], - 3, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 3 ] - ); - directive_failed( status, "rtems_task_create of TA3" ); - - status = rtems_task_start( Task_id[ 1 ], Task_1, 0 ); - directive_failed( status, "rtems_task_start of TA1" ); - - status = rtems_task_start( Task_id[ 2 ], Task_2, 0 ); - directive_failed( status, "rtems_task_start of TA2" ); - - status = rtems_task_start( Task_id[ 3 ], Task_3, 0 ); - directive_failed( status, "rtems_task_start of TA3" ); - - puts( "INIT - suspending TA2 while middle task on a ready chain" ); - status = rtems_task_suspend( Task_id[ 2 ] ); - directive_failed( status, "rtems_task_suspend of TA2" ); - - status = rtems_task_delete( Task_id[ 1 ] ); - directive_failed( status, "rtems_task_delete of TA1" ); - - status = rtems_task_delete( Task_id[ 2 ] ); - directive_failed( status, "rtems_task_delete of TA2" ); - - status = rtems_task_delete( Task_id[ 3 ] ); - directive_failed( status, "rtems_task_delete of TA3" ); - - status = rtems_task_create( - Task_name[ 1 ], - 1, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 1 ] - ); - directive_failed( status, "rtems_task_create of TA1" ); - - status = rtems_task_create( - Task_name[ 2 ], - 3, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 2 ] - ); - directive_failed( status, "rtems_task_create of TA2" ); - - status = rtems_task_create( - Task_name[ 3 ], - 3, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 3 ] - ); - directive_failed( status, "rtems_task_create of TA3" ); - - status = rtems_task_start( Task_id[ 1 ], Task_1, 0 ); - directive_failed( status, "rtems_task_start of TA1" ); - - status = rtems_task_start( Task_id[ 2 ], Task_2, 0 ); - directive_failed( status, "rtems_task_start of TA2" ); - - status = rtems_task_start( Task_id[ 3 ], Task_3, 0 ); - directive_failed( status, "rtems_task_start of TA3" ); - - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of RTEMS_SELF" ); -} diff --git a/c/src/tests/sptests/sp02/preempt.c b/c/src/tests/sptests/sp02/preempt.c deleted file mode 100644 index 7e93f7af57..0000000000 --- a/c/src/tests/sptests/sp02/preempt.c +++ /dev/null @@ -1,32 +0,0 @@ -/* Preempt_task - * - * This routine serves as a test task. It verifies the task manager. - * - * 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 Preempt_task( - rtems_task_argument argument -) -{ - rtems_status_code status; - - puts( "PREEMPT - rtems_task_delete - deleting self" ); - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of RTEMS_PREEMPT" ); -} diff --git a/c/src/tests/sptests/sp02/sp02.doc b/c/src/tests/sptests/sp02/sp02.doc deleted file mode 100644 index 00f2e0e7b3..0000000000 --- a/c/src/tests/sptests/sp02/sp02.doc +++ /dev/null @@ -1,37 +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: test2 - -directives: - ex_init, ex_start, t_create, t_start, tm_tick, i_return, t_ident, - t_delete, tm_wkafter, t_setpri, t_suspend - -concepts: - - a. Verifies that a task can delete another task and also delete itself. - - b. Verifies that memory is freed back to the heap correctly. - - c. Verifies that TCBs are freed back to the inactive chain correctly. - - d. Verifies that a task can get the task identification number of - another task. - - e. Verifies the _Set_state routine where the task is not READY. - - f. Verifies the break statement in the _Block_activate routine. - - g. Verifies the while loop in the _Prev_tcb routine. diff --git a/c/src/tests/sptests/sp02/sp02.scn b/c/src/tests/sptests/sp02/sp02.scn deleted file mode 100644 index 57a4627284..0000000000 --- a/c/src/tests/sptests/sp02/sp02.scn +++ /dev/null @@ -1,15 +0,0 @@ -*** TEST 2 *** -INIT - rtems_task_wake_after - yielding processor -PREEMPT - rtems_task_delete - deleting self -INIT - suspending TA2 while middle task on a ready chain -TA1 - rtems_task_wake_after - sleep 1 second -TA2 - rtems_task_wake_after - sleep 1 minute -TA3 - rtems_task_wake_after - sleep 5 seconds -TA1 - rtems_task_ident - tid of TA2 (0x00010007) -TA1 - rtems_task_ident - tid of TA3 (0x00010008) -TA1 - rtems_task_set_priority - set TA3's priority to 2 -TA1 - rtems_task_suspend - suspend TA2 -TA1 - rtems_task_delete - delete TA2 -TA1 - rtems_task_wake_after - sleep for 5 seconds -TA3 - rtems_task_delete - delete self -*** END OF TEST 2 *** diff --git a/c/src/tests/sptests/sp02/system.h b/c/src/tests/sptests/sp02/system.h deleted file mode 100644 index c9d89a1e8b..0000000000 --- a/c/src/tests/sptests/sp02/system.h +++ /dev/null @@ -1,31 +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 <rtems.h> -#include "tmacros.h" - -/* Miscellaneous */ - -#define EXTERN extern /* external definition */ - -/* macros */ - - -/* structures */ - -#include "gvar.h" - -/* end of include file */ diff --git a/c/src/tests/sptests/sp02/task1.c b/c/src/tests/sptests/sp02/task1.c deleted file mode 100644 index 0f6152dbb2..0000000000 --- a/c/src/tests/sptests/sp02/task1.c +++ /dev/null @@ -1,66 +0,0 @@ -/* Task_1 - * - * This routine serves as a test task. It verifies the task manager. - * - * 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 Task_1( - rtems_task_argument argument -) -{ - rtems_id tid2; - rtems_id tid3; - rtems_status_code status; - rtems_unsigned32 previous_priority; - - puts( "TA1 - rtems_task_wake_after - sleep 1 second" ); - status = rtems_task_wake_after( 1*TICKS_PER_SECOND ); - directive_failed( status, "rtems_task_wake_after" ); - - status = rtems_task_ident( Task_name[ 2 ], RTEMS_SEARCH_ALL_NODES, &tid2 ); - directive_failed( status, "rtems_task_ident of TA2" ); - - printf( "TA1 - rtems_task_ident - tid of TA2 (0x%.8x)\n", tid2 ); - - status = rtems_task_ident( Task_name[ 3 ], RTEMS_SEARCH_ALL_NODES, &tid3 ); - directive_failed( status, "rtems_task_ident of TA3" ); - - printf( "TA1 - rtems_task_ident - tid of TA3 (0x%.8x)\n", tid3 ); - - status = rtems_task_set_priority( tid3, 2, &previous_priority ); - directive_failed( status, "rtems_task_set_priority" ); - - puts( "TA1 - rtems_task_set_priority - set TA3's priority to 2" ); - - - puts( "TA1 - rtems_task_suspend - suspend TA2" ); - status = rtems_task_suspend( tid2 ); - directive_failed( status, "rtems_task_suspend of TA2" ); - - puts( "TA1 - rtems_task_delete - delete TA2" ); - status = rtems_task_delete( tid2 ); - directive_failed( status, "rtems_task_delete of TA2" ); - - puts( "TA1 - rtems_task_wake_after - sleep for 5 seconds" ); - status = rtems_task_wake_after( 5*TICKS_PER_SECOND ); - directive_failed( status, "rtems_task_wake_after" ); - - puts( "*** END OF TEST 2 ***" ); - exit( 0 ); -} diff --git a/c/src/tests/sptests/sp02/task2.c b/c/src/tests/sptests/sp02/task2.c deleted file mode 100644 index f39cc5b9fc..0000000000 --- a/c/src/tests/sptests/sp02/task2.c +++ /dev/null @@ -1,34 +0,0 @@ -/* Task_2 - * - * This routine serves as a test task. It sleeps for 1 minute but - * does not expect to wake up. Task 1 should suspend then delete it - * so that it appears to never wake up. - * - * 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 Task_2( - rtems_task_argument argument -) -{ - rtems_status_code status; - - puts( "TA2 - rtems_task_wake_after - sleep 1 minute" ); - status = rtems_task_wake_after( 60*TICKS_PER_SECOND ); - directive_failed( status, "rtems_task_wake_after in TA2" ); -} diff --git a/c/src/tests/sptests/sp02/task3.c b/c/src/tests/sptests/sp02/task3.c deleted file mode 100644 index 89bda38b7c..0000000000 --- a/c/src/tests/sptests/sp02/task3.c +++ /dev/null @@ -1,37 +0,0 @@ -/* Task_3 - * - * This routine serves as a test task. It simply sleeps for 5 seconds - * and then deletes itself. - * - * 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 Task_3( - rtems_task_argument argument -) -{ - rtems_status_code status; - - puts( "TA3 - rtems_task_wake_after - sleep 5 seconds" ); - status = rtems_task_wake_after( 5*TICKS_PER_SECOND ); - directive_failed( status, "rtems_task_wake_after in TA3" ); - - puts( "TA3 - rtems_task_delete - delete self" ); - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of TA3" ); -} diff --git a/c/src/tests/sptests/sp03/init.c b/c/src/tests/sptests/sp03/init.c deleted file mode 100644 index 962d434284..0000000000 --- a/c/src/tests/sptests/sp03/init.c +++ /dev/null @@ -1,70 +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$ - */ - -#include "system.h" -#undef EXTERN -#define EXTERN -#include "conftbl.h" -#include "gvar.h" - -rtems_task Init( - rtems_task_argument argument -) -{ - rtems_status_code status; - - puts( "\n\n*** TEST 3 ***" ); - - Task_name[ 1 ] = rtems_build_name( 'T', 'A', '1', ' ' ); - Task_name[ 2 ] = rtems_build_name( 'T', 'A', '2', ' ' ); - - status = rtems_task_create( - Task_name[ 1 ], - 1, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 1 ] - ); - directive_failed( status, "rtems_task_create of TA1" ); - - status = rtems_task_create( - Task_name[ 2 ], - 1, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 2 ] - ); - directive_failed( status, "rtems_task_create of TA2" ); - - status = rtems_task_start( Task_id[ 1 ], Task_1, 0 ); - directive_failed( status, "rtems_task_start of TA1" ); - - status = rtems_task_start( Task_id[ 2 ], Task_2, 0 ); - directive_failed( status, "rtems_task_start of TA2" ); - - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of RTEMS_SELF" ); -} diff --git a/c/src/tests/sptests/sp03/sp03.doc b/c/src/tests/sptests/sp03/sp03.doc deleted file mode 100644 index 96d6d41d94..0000000000 --- a/c/src/tests/sptests/sp03/sp03.doc +++ /dev/null @@ -1,24 +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: test3 - -directives: - ex_init, ex_start, t_create, t_start, tm_tick, i_return, tm_wkafter, - tm_wkwhen, tm_set, tm_get - -concepts: - - a. Verifies conversion routines - _Utd_to_etd and _Etd_to_utd diff --git a/c/src/tests/sptests/sp03/sp03.scn b/c/src/tests/sptests/sp03/sp03.scn deleted file mode 100644 index 496982e86f..0000000000 --- a/c/src/tests/sptests/sp03/sp03.scn +++ /dev/null @@ -1,26 +0,0 @@ -*** TEST 3 *** -TA1 sets clock: 09:15:00 12/31/1988 -TA1 going to sleep: 09:15:00 12/31/1988 -TA2 09:15:01 12/31/1988 -TA2 09:15:02 12/31/1988 -TA2 09:15:03 12/31/1988 -TA2 09:15:04 12/31/1988 -TA1 awakened: 09:15:05 12/31/1988 -TA1 going to sleep: 09:15:05 12/31/1988 -TA2 09:15:05 12/31/1988 -TA2 09:15:06 12/31/1988 -TA2 09:15:07 12/31/1988 -TA2 09:15:08 12/31/1988 -TA2 09:15:09 12/31/1988 -TA1 awakened: 09:15:10 12/31/1988 -TA1 going to sleep: 09:15:10 12/31/1988 -TA2 09:15:10 12/31/1988 -TA2 09:15:11 12/31/1988 -TA2 09:15:12 12/31/1988 -TA2 09:15:13 12/31/1988 -TA2 09:15:14 12/31/1988 -TA1 awakened: 09:15:15 12/31/1988 -TA1 going to sleep: 09:15:15 12/31/1988 -TA2 09:15:15 12/31/1988 -TA2 09:15:16 12/31/1988 -*** END OF TEST 3 *** diff --git a/c/src/tests/sptests/sp03/system.h b/c/src/tests/sptests/sp03/system.h deleted file mode 100644 index aa2c6d17e4..0000000000 --- a/c/src/tests/sptests/sp03/system.h +++ /dev/null @@ -1,30 +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 <rtems.h> -#include "tmacros.h" - -/* Miscellaneous */ - -#define EXTERN extern /* external definition */ - -/* macros */ - -/* structures */ - -#include "gvar.h" - -/* end of include file */ diff --git a/c/src/tests/sptests/sp03/task1.c b/c/src/tests/sptests/sp03/task1.c deleted file mode 100644 index e59fad45cf..0000000000 --- a/c/src/tests/sptests/sp03/task1.c +++ /dev/null @@ -1,59 +0,0 @@ -/* Task_1 - * - * This routine serves as a test task. It verifies the capability to - * set and read the executives calender and clock. - * - * 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 Task_1( - rtems_task_argument argument -) -{ - rtems_status_code status; - rtems_time_of_day time; - - build_time( &time, 12, 31, 1988, 9, 15, 0, 0 ); - - status = rtems_clock_set( &time ); - directive_failed( status, "rtems_clock_set" ); - - put_name( Task_name[ 1 ], FALSE ); - print_time( " sets clock: ", &time, "\n" ); - - while( FOREVER ) { - status = rtems_clock_get( RTEMS_CLOCK_GET_TOD, &time ); - directive_failed( status, "rtems_clock_get" ); - - put_name( Task_name[ 1 ], FALSE ); - print_time( " going to sleep: ", &time, "\n" ); - - time.second += 5; - time.minute += ( time.second / 60 ); - time.second %= 60; - time.hour += ( time.minute / 60 ); - time.minute %= 60; - time.hour %= 24; - - status = rtems_task_wake_when( &time ); - directive_failed( status, "rtems_task_wake_when" ); - - put_name( Task_name[ 1 ], FALSE ); - print_time( " awakened: ", &time, "\n" ); - } -} diff --git a/c/src/tests/sptests/sp03/task2.c b/c/src/tests/sptests/sp03/task2.c deleted file mode 100644 index 8838c1db67..0000000000 --- a/c/src/tests/sptests/sp03/task2.c +++ /dev/null @@ -1,46 +0,0 @@ -/* Task_2 - * - * This routine serves as a test task. It repeatedly gets the system time - * and date, converts it to printable form, and print it. - * - * 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 Task_2( - rtems_task_argument argument -) -{ - rtems_status_code status; - rtems_time_of_day time; - - while( FOREVER ) { - status = rtems_task_wake_after( 1*TICKS_PER_SECOND ); - directive_failed( status, "rtems_task_wake_after" ); - - status = rtems_clock_get( RTEMS_CLOCK_GET_TOD, &time ); - directive_failed( status, "rtems_clock_get" ); - - if ( time.second >= 17 ) { - puts( "*** END OF TEST 3 *** " ); - exit( 0 ); - } - - put_name( Task_name[ 2 ], FALSE ); - print_time( " ", &time, "\n" ); - } -} diff --git a/c/src/tests/sptests/sp04/init.c b/c/src/tests/sptests/sp04/init.c deleted file mode 100644 index b9fd541103..0000000000 --- a/c/src/tests/sptests/sp04/init.c +++ /dev/null @@ -1,113 +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$ - */ - -#include "system.h" -#undef EXTERN -#define EXTERN -#include "conftbl.h" -#include "gvar.h" - -rtems_extensions_table Extensions = { - NULL, /* task create user extension */ - NULL, /* task start user extension */ - NULL, /* task restart user extension */ - NULL, /* task delete user extension */ - Task_switch, /* task switch user extension */ - NULL, /* task begin user extension */ - NULL, /* task exitted user extension */ - NULL /* fatal error user extension */ -}; - -rtems_task Init( - rtems_task_argument argument -) -{ - rtems_status_code status; - rtems_time_of_day time; - - puts( "\n\n*** TEST 4 ***" ); - build_time( &time, 12, 31, 1988, 9, 15, 0, 0 ); - - status = rtems_clock_set( &time ); - directive_failed( status, "rtems_clock_set" ); - - Extension_name[ 1 ] = rtems_build_name( 'E', 'X', 'T', ' ' ); - - status = rtems_extension_create( - Extension_name[ 1 ], - &Extensions, - &Extension_id[ 1 ] - ); - directive_failed( status, "rtems_extension_create" ); - - Task_name[ 1 ] = rtems_build_name( 'T', 'A', '1', ' ' ); - Task_name[ 2 ] = rtems_build_name( 'T', 'A', '2', ' ' ); - Task_name[ 3 ] = rtems_build_name( 'T', 'A', '3', ' ' ); - - Run_count[ 1 ] = 0; - Run_count[ 2 ] = 0; - Run_count[ 3 ] = 0; - - status = rtems_task_create( - Task_name[ 1 ], - 1, - 2048, - RTEMS_TIMESLICE, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 1 ] - ); - directive_failed( status, "rtems_task_create of TA1" ); - - status = rtems_task_create( - Task_name[ 2 ], - 1, - 2048, - RTEMS_TIMESLICE, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 2 ] - ); - directive_failed( status, "rtems_task_create of TA2" ); - - status = rtems_task_create( - Task_name[ 3 ], - 1, - 2048, - RTEMS_TIMESLICE, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 3 ] - ); - directive_failed( status, "rtems_task_create of TA3" ); - - status = rtems_task_start( Task_id[ 1 ], Task_1, 0 ); - directive_failed( status, "rtems_task_start of TA1" ); - - status = rtems_task_start( Task_id[ 2 ], Task_2, 0 ); - directive_failed( status, "rtems_task_start of TA2" ); - - status = rtems_task_start( Task_id[ 3 ], Task_3, 0 ); - directive_failed( status, "rtems_task_start of TA3" ); - - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of RTEMS_SELF" ); -} diff --git a/c/src/tests/sptests/sp04/sp04.doc b/c/src/tests/sptests/sp04/sp04.doc deleted file mode 100644 index 6f6355abfa..0000000000 --- a/c/src/tests/sptests/sp04/sp04.doc +++ /dev/null @@ -1,38 +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: test4 - -directives: - ex_init, ex_start, t_create, t_start, tm_tick, i_return, - tm_set, tm_get, ev_receive, t_mode - -concepts: - - a. Verifies timeslicing ( all tasks are in timeslice mode ). - - b. Verifies the tswitch user extension. - - c. Verifies the no preemption mode. - - d. Verifies time-slice gets reset even if only one task ready. - -output: - The task name and the current time are printed out each time that a new - task is being dispatched. The configured timeslice is 100 ticks - ( 1 second ); therefore, a task name and the time are printed once - every second. After each task runs 3 times, task 1 changes its mode to - no preempt and runs for about 6 seconds and then changes its mode back to - preempt mode. diff --git a/c/src/tests/sptests/sp04/sp04.scn b/c/src/tests/sptests/sp04/sp04.scn deleted file mode 100644 index f104c0c482..0000000000 --- a/c/src/tests/sptests/sp04/sp04.scn +++ /dev/null @@ -1,24 +0,0 @@ -*** TEST 4 *** -TA1 - 09:15:00 12/31/1988 -TA1 - rtems_task_suspend - on Task 2 -TA1 - rtems_task_suspend - on Task 3 -TA1 - killing time -TA1 - rtems_task_resume - on Task 2 -TA1 - rtems_task_resume - on Task 3 -TA2 - 09:15:03 12/31/1988 -TA3 - 09:15:04 12/31/1988 -TA1 - 09:15:05 12/31/1988 -TA2 - 09:15:06 12/31/1988 -TA3 - 09:15:07 12/31/1988 -TA1 - 09:15:08 12/31/1988 -TA1 - rtems_task_mode - change mode to NO RTEMS_PREEMPT -TA1 - 09:15:09 12/31/1988 -TA1 - 09:15:10 12/31/1988 -TA1 - 09:15:11 12/31/1988 -TA1 - 09:15:12 12/31/1988 -TA1 - 09:15:13 12/31/1988 -TA1 - 09:15:14 12/31/1988 -TA1 - rtems_task_mode - change mode to RTEMS_PREEMPT -TA2 - 09:15:15 12/31/1988 -TA3 - 09:15:16 12/31/1988 -*** END OF TEST 4 *** diff --git a/c/src/tests/sptests/sp04/system.h b/c/src/tests/sptests/sp04/system.h deleted file mode 100644 index aa2c6d17e4..0000000000 --- a/c/src/tests/sptests/sp04/system.h +++ /dev/null @@ -1,30 +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 <rtems.h> -#include "tmacros.h" - -/* Miscellaneous */ - -#define EXTERN extern /* external definition */ - -/* macros */ - -/* structures */ - -#include "gvar.h" - -/* end of include file */ diff --git a/c/src/tests/sptests/sp04/task1.c b/c/src/tests/sptests/sp04/task1.c deleted file mode 100644 index 8d0a620ec3..0000000000 --- a/c/src/tests/sptests/sp04/task1.c +++ /dev/null @@ -1,104 +0,0 @@ -/* Task_1 - * - * This test serves as a test task. It verifies timeslicing activities - * and tswitch extension processing. - * - * 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" -#include "clockdrv.h" - -rtems_task Task_1( - rtems_task_argument argument -) -{ - rtems_unsigned32 seconds; - rtems_unsigned32 old_seconds; - rtems_mode previous_mode; - rtems_time_of_day time; - rtems_status_code status; - rtems_unsigned32 start; - rtems_unsigned32 end; - - puts( "TA1 - rtems_task_suspend - on Task 2" ); - status = rtems_task_suspend( Task_id[ 2 ] ); - directive_failed( status, "rtems_task_suspend of TA2" ); - - puts( "TA1 - rtems_task_suspend - on Task 3" ); - status = rtems_task_suspend( Task_id[ 3 ] ); - directive_failed( status, "rtems_task_suspend of TA3" ); - - status = rtems_clock_get( RTEMS_CLOCK_GET_SECONDS_SINCE_EPOCH, &start ); - directive_failed( status, "rtems_clock_get" ); - - puts( "TA1 - killing time" ); - - for ( ; ; ) { - status = rtems_clock_get( RTEMS_CLOCK_GET_SECONDS_SINCE_EPOCH, &end ); - directive_failed( status, "rtems_clock_get" ); - - if ( end > (start + 2) ) - break; - } - - puts( "TA1 - rtems_task_resume - on Task 2" ); - status = rtems_task_resume( Task_id[ 2 ] ); - directive_failed( status, "rtems_task_resume of TA2" ); - - puts( "TA1 - rtems_task_resume - on Task 3" ); - status = rtems_task_resume( Task_id[ 3 ] ); - directive_failed( status, "rtems_task_resume of TA3" ); - - while ( FOREVER ) { - if ( Run_count[ 1 ] == 3 ) { - puts( "TA1 - rtems_task_mode - change mode to NO RTEMS_PREEMPT" ); - - status = rtems_task_mode( - RTEMS_NO_PREEMPT, - RTEMS_PREEMPT_MASK, - &previous_mode - ); - directive_failed( status, "rtems_task_mode" ); - - status = rtems_clock_get( RTEMS_CLOCK_GET_TOD, &time ); - directive_failed( status, "rtems_clock_get" ); - - old_seconds = time.second; - - for ( seconds = 0 ; seconds < 6 ; ) { - status = rtems_clock_get( RTEMS_CLOCK_GET_TOD, &time ); - directive_failed( status, "rtems_clock_get" ); - - if ( time.second != old_seconds ) { - old_seconds = time.second; - seconds++; - print_time( "TA1 - ", &time, "\n" ); - } - } - - puts( "TA1 - rtems_task_mode - change mode to RTEMS_PREEMPT" ); - status = rtems_task_mode( - RTEMS_PREEMPT, - RTEMS_PREEMPT_MASK, - &previous_mode - ); - directive_failed( status, "rtems_task_mode" ); - - while ( FOREVER ); - } - } -} diff --git a/c/src/tests/sptests/sp04/task2.c b/c/src/tests/sptests/sp04/task2.c deleted file mode 100644 index 7574e7dc9f..0000000000 --- a/c/src/tests/sptests/sp04/task2.c +++ /dev/null @@ -1,29 +0,0 @@ -/* Task_2 - * - * This routine serves as a test task. It is just a CPU bound task - * requiring timesliced operation. - * - * 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 Task_2( - rtems_task_argument argument -) -{ - while( FOREVER ); -} diff --git a/c/src/tests/sptests/sp04/task3.c b/c/src/tests/sptests/sp04/task3.c deleted file mode 100644 index a0e7482944..0000000000 --- a/c/src/tests/sptests/sp04/task3.c +++ /dev/null @@ -1,29 +0,0 @@ -/* Task_3 - * - * This routine serves as a test task. It is just a CPU bound task - * requiring timesliced operation. - * - * 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 Task_3( - rtems_task_argument argument -) -{ - while( FOREVER ); -} diff --git a/c/src/tests/sptests/sp04/tswitch.c b/c/src/tests/sptests/sp04/tswitch.c deleted file mode 100644 index 3f0c2047bc..0000000000 --- a/c/src/tests/sptests/sp04/tswitch.c +++ /dev/null @@ -1,59 +0,0 @@ -/* Task_switch - * - * This routine is the tswitch user extension. It determines which - * task is being switched to and displays a message indicating the - * time and date that it gained control. - * - * Input parameters: - * unused - pointer to currently running TCB - * heir - pointer to heir TCB - * - * 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_extension Task_switch( - rtems_tcb *unused, - rtems_tcb *heir -) -{ - rtems_unsigned32 index; - rtems_time_of_day time; - rtems_status_code status; - - index = task_number( heir->Object.id ); - - switch( index ) { - case 1: - case 2: - case 3: - Run_count[ index ] += 1; - - status = rtems_clock_get( RTEMS_CLOCK_GET_TOD, &time ); - directive_failed( status, "rtems_clock_get" ); - - put_name( Task_name[ index ], FALSE ); - print_time( " - ", &time, "\n" ); - - if ( time.second >= 16 ) { - puts( "*** END OF TEST 4 ***" ); - exit( 0 ); - } - break; - - case 0: - default: - break; - } -} diff --git a/c/src/tests/sptests/sp05/init.c b/c/src/tests/sptests/sp05/init.c deleted file mode 100644 index 2f6b8a6eac..0000000000 --- a/c/src/tests/sptests/sp05/init.c +++ /dev/null @@ -1,84 +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$ - */ - -#include "system.h" -#undef EXTERN -#define EXTERN -#include "conftbl.h" -#include "gvar.h" - -rtems_task Init( - rtems_task_argument argument -) -{ - rtems_status_code status; - - puts( "\n\n*** TEST 5 ***" ); - - Task_name[ 1 ] = rtems_build_name( 'T', 'A', '1', ' ' ); - Task_name[ 2 ] = rtems_build_name( 'T', 'A', '2', ' ' ); - Task_name[ 3 ] = rtems_build_name( 'T', 'A', '3', ' ' ); - - status = rtems_task_create( - Task_name[ 1 ], - 1, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 1 ] - ); - directive_failed( status, "rtems_task_create of TA1" ); - - status = rtems_task_create( - Task_name[ 2 ], - 1, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 2 ] - ); - directive_failed( status, "rtems_task_create of TA2" ); - - status = rtems_task_create( - Task_name[ 3 ], - 1, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 3 ] - ); - directive_failed( status, "rtems_task_create of TA3" ); - - status = rtems_task_start( Task_id[ 1 ], Task_1, 0 ); - directive_failed( status, "rtems_task_start of TA1" ); - - status = rtems_task_start( Task_id[ 2 ], Task_2, 0 ); - directive_failed( status, "rtems_task_start of TA2" ); - - status = rtems_task_start( Task_id[ 3 ], Task_3, 0 ); - directive_failed( status, "rtems_task_start of TA3" ); - - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of RTEMS_SELF" ); -} diff --git a/c/src/tests/sptests/sp05/sp05.doc b/c/src/tests/sptests/sp05/sp05.doc deleted file mode 100644 index 583381a37e..0000000000 --- a/c/src/tests/sptests/sp05/sp05.doc +++ /dev/null @@ -1,26 +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: test5 - -directives: - ex_init, ex_start, t_create, t_start, tm_tick, i_return, t_ident - tm_wkafter, t_suspend, t_resume - -concepts: - - a. Verifies that a task can be suspended and resumed. - - b. Verifies that a task can suspend itself. diff --git a/c/src/tests/sptests/sp05/sp05.scn b/c/src/tests/sptests/sp05/sp05.scn deleted file mode 100644 index 40afb2d4b2..0000000000 --- a/c/src/tests/sptests/sp05/sp05.scn +++ /dev/null @@ -1,47 +0,0 @@ -*** TEST 5 *** -TA1 - rtems_task_wake_after - sleep 5 seconds -TA2 - rtems_task_suspend - suspend self -TA3 - rtems_task_suspend - suspend self -TA1 - rtems_task_suspend - suspend TA3 -TA1 - rtems_task_resume - resume TA2 -TA1 - rtems_task_wake_after - sleep 5 seconds -TA2 - rtems_task_wake_after - sleep 1 second -TA2 - rtems_task_wake_after - sleep 1 second -TA2 - rtems_task_wake_after - sleep 1 second -TA2 - rtems_task_wake_after - sleep 1 second -TA2 - rtems_task_wake_after - sleep 1 second -TA1 - rtems_task_suspend - suspend TA2 -TA1 - rtems_task_resume - resume TA3 -TA1 - rtems_task_wake_after - sleep 5 seconds -TA3 - rtems_task_wake_after - sleep 1 second -TA3 - rtems_task_wake_after - sleep 1 second -TA3 - rtems_task_wake_after - sleep 1 second -TA3 - rtems_task_wake_after - sleep 1 second -TA3 - rtems_task_wake_after - sleep 1 second -TA1 - rtems_task_suspend - suspend TA3 -TA1 - rtems_task_resume - resume TA2 -TA1 - rtems_task_wake_after - sleep 5 seconds -TA2 - rtems_task_wake_after - sleep 1 second -TA2 - rtems_task_wake_after - sleep 1 second -TA2 - rtems_task_wake_after - sleep 1 second -TA2 - rtems_task_wake_after - sleep 1 second -TA2 - rtems_task_wake_after - sleep 1 second -TA1 - rtems_task_suspend - suspend TA2 -TA1 - rtems_task_resume - resume TA3 -TA1 - rtems_task_wake_after - sleep 5 seconds -TA3 - rtems_task_wake_after - sleep 1 second -TA3 - rtems_task_wake_after - sleep 1 second -TA3 - rtems_task_wake_after - sleep 1 second -TA3 - rtems_task_wake_after - sleep 1 second -TA3 - rtems_task_wake_after - sleep 1 second -TA1 - rtems_task_suspend - suspend TA3 -TA1 - rtems_task_resume - resume TA2 -TA1 - rtems_task_wake_after - sleep 5 seconds -TA2 - rtems_task_wake_after - sleep 1 second -TA2 - rtems_task_wake_after - sleep 1 second -TA2 - rtems_task_wake_after - sleep 1 second -TA2 - rtems_task_wake_after - sleep 1 second -TA2 - rtems_task_wake_after - sleep 1 second -TA1 - rtems_task_suspend - suspend TA2 -TA1 - rtems_task_resume - resume TA3 -*** END OF TEST 5 *** diff --git a/c/src/tests/sptests/sp05/system.h b/c/src/tests/sptests/sp05/system.h deleted file mode 100644 index aa2c6d17e4..0000000000 --- a/c/src/tests/sptests/sp05/system.h +++ /dev/null @@ -1,30 +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 <rtems.h> -#include "tmacros.h" - -/* Miscellaneous */ - -#define EXTERN extern /* external definition */ - -/* macros */ - -/* structures */ - -#include "gvar.h" - -/* end of include file */ diff --git a/c/src/tests/sptests/sp05/task1.c b/c/src/tests/sptests/sp05/task1.c deleted file mode 100644 index 9b99586fc8..0000000000 --- a/c/src/tests/sptests/sp05/task1.c +++ /dev/null @@ -1,78 +0,0 @@ -/* Task_1 - * - * This routine serves as a test task. It verifies that tasks can - * be suspended and resumed. - * - * Input parameters: - * argument - task argument - * - * Output parameters: NONE - * - * NOTE: The rtems_task_suspend() directives fail on the first iteration. - * - * 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 Task_1( - rtems_task_argument argument -) -{ - rtems_id tid2; - rtems_id tid3; - rtems_unsigned32 pass; - rtems_status_code status; - - status = rtems_task_ident( Task_name[ 2 ], 1, &tid2 ); - directive_failed( status, "rtems_task_ident of TA2" ); - - status = rtems_task_ident( Task_name[ 3 ], 1, &tid3 ); - directive_failed( status, "rtems_task_ident of TA3" ); - - for ( pass=1 ; pass <= 3 ; pass++ ) { - - puts( "TA1 - rtems_task_wake_after - sleep 5 seconds" ); - status = rtems_task_wake_after( 5*TICKS_PER_SECOND ); - directive_failed( status, "rtems_task_wake_after of TA1" ); - - puts( "TA1 - rtems_task_suspend - suspend TA3" ); - status = rtems_task_suspend( tid3 ); - if ( pass == 1 ) { - fatal_directive_status( - status, - RTEMS_ALREADY_SUSPENDED, - "rtems_task_suspend of TA3" - ); - } else { - directive_failed( status, "rtems_task_suspend of TA3" ); - } - - puts( "TA1 - rtems_task_resume - resume TA2" ); - status = rtems_task_resume( tid2 ); - directive_failed( status, "rtems_task_resume of TA2" ); - - puts( "TA1 - rtems_task_wake_after - sleep 5 seconds" ); - status = rtems_task_wake_after( 5*TICKS_PER_SECOND ); - directive_failed( status, "rtems_task_wake_after" ); - - puts( "TA1 - rtems_task_suspend - suspend TA2" ); - status = rtems_task_suspend( tid2 ); - directive_failed( status, "rtems_task_suspend of TA2" ); - - puts( "TA1 - rtems_task_resume - resume TA3" ); - status = rtems_task_resume( tid3 ); - directive_failed( status, "rtems_task_resume" ); - } - - puts( "*** END OF TEST 5 ***" ); - exit( 0 ); -} diff --git a/c/src/tests/sptests/sp05/task2.c b/c/src/tests/sptests/sp05/task2.c deleted file mode 100644 index 3878d8106d..0000000000 --- a/c/src/tests/sptests/sp05/task2.c +++ /dev/null @@ -1,39 +0,0 @@ -/* Task_2 - * - * This routine serves as a test task. Makes sure a task can suspend - * itself. - * - * 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 Task_2( - rtems_task_argument argument -) -{ - rtems_status_code status; - - puts( "TA2 - rtems_task_suspend - suspend self" ); - status = rtems_task_suspend( RTEMS_SELF ); - directive_failed( status, "rtems_task_suspend of TA2" ); - - while( FOREVER ) { - puts( "TA2 - rtems_task_wake_after - sleep 1 second" ); - status = rtems_task_wake_after( 1*TICKS_PER_SECOND ); - directive_failed( status, "rtems_task_wake_after of TA2" ); - } -} diff --git a/c/src/tests/sptests/sp05/task3.c b/c/src/tests/sptests/sp05/task3.c deleted file mode 100644 index c03c6de75b..0000000000 --- a/c/src/tests/sptests/sp05/task3.c +++ /dev/null @@ -1,39 +0,0 @@ -/* Task_3 - * - * This routine serves as a test task. Makes sure a task can suspend - * itself. - * - * 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 Task_3( - rtems_task_argument argument -) -{ - rtems_status_code status; - - puts( "TA3 - rtems_task_suspend - suspend self" ); - status = rtems_task_suspend( RTEMS_SELF ); - directive_failed( status, "rtems_task_suspend of TA3" ); - - while( FOREVER ) { - puts( "TA3 - rtems_task_wake_after - sleep 1 second" ); - status = rtems_task_wake_after( 1*TICKS_PER_SECOND ); - directive_failed( status, "rtems_task_wake_after of TA3" ); - } -} diff --git a/c/src/tests/sptests/sp06/init.c b/c/src/tests/sptests/sp06/init.c deleted file mode 100644 index 08bab06594..0000000000 --- a/c/src/tests/sptests/sp06/init.c +++ /dev/null @@ -1,90 +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$ - */ - -#include "system.h" -#undef EXTERN -#define EXTERN -#include "conftbl.h" -#include "gvar.h" - -rtems_task Init( - rtems_task_argument argument -) -{ - rtems_status_code status; - rtems_task_priority previous_priority; - - puts( "\n\n*** TEST 6 ***" ); - - Task_name[ 1 ] = rtems_build_name( 'T', 'A', '1', ' ' ); - Task_name[ 2 ] = rtems_build_name( 'T', 'A', '2', ' ' ); - Task_name[ 3 ] = rtems_build_name( 'T', 'A', '3', ' ' ); - - Argument = 0; - Restart_argument = 1; - - status = rtems_task_create( - Task_name[ 1 ], - 1, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 1 ] - ); - directive_failed( status, "rtems_task_create of TA1" ); - - status = rtems_task_create( - Task_name[ 2 ], - 1, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 2 ] - ); - directive_failed( status, "rtems_task_create of TA2" ); - - status = rtems_task_create( - Task_name[ 3 ], - 10, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 3 ] - ); - directive_failed( status, "rtems_task_create of TA3" ); - - status = rtems_task_start( Task_id[ 1 ], Task_1, 0 ); - directive_failed( status, "rtems_task_start of TA1" ); - - status = rtems_task_start( Task_id[ 2 ], Task_2, Argument ); - directive_failed( status, "rtems_task_start of TA2" ); - - status = rtems_task_start( Task_id[ 3 ], Task_3, Argument ); - directive_failed( status, "rtems_task_start of TA3" ); - - status = rtems_task_set_priority( Task_id[ 3 ], 5, &previous_priority ); - - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of RTEMS_SELF" ); -} diff --git a/c/src/tests/sptests/sp06/sp06.doc b/c/src/tests/sptests/sp06/sp06.doc deleted file mode 100644 index e8b96f1f6b..0000000000 --- a/c/src/tests/sptests/sp06/sp06.doc +++ /dev/null @@ -1,26 +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: test6 - -directives: - ex_init, ex_start, t_create, t_start, tm_tick, i_return, - tm_wkafter, t_restart - -concepts: - - a. Verifies that a task can restart a task other than itself. - - b. Verifies that a task can restart itself. diff --git a/c/src/tests/sptests/sp06/sp06.scn b/c/src/tests/sptests/sp06/sp06.scn deleted file mode 100644 index 64f6489dc8..0000000000 --- a/c/src/tests/sptests/sp06/sp06.scn +++ /dev/null @@ -1,40 +0,0 @@ -*** TEST 6 *** -TA1 - is beginning to run -TA1 - restarting TA3 -TA2 - is beginning to run -TA2 - rtems_task_wake_after - sleep 1/2 second -TA2 - rtems_task_wake_after - sleep 1/2 second -TA1 - rtems_task_restart - restarting TA2 -TA2 - is beginning to run -TA2 - rtems_task_wake_after - sleep 1/2 second -TA2 - rtems_task_wake_after - sleep 1/2 second -TA1 - rtems_task_restart - restarting self -TA1 - is beginning to run -TA2 - rtems_task_wake_after - sleep 1/2 second -TA2 - rtems_task_wake_after - sleep 1/2 second -TA1 - rtems_task_restart - restarting TA2 -TA2 - is beginning to run -TA2 - rtems_task_wake_after - sleep 1/2 second -TA2 - rtems_task_wake_after - sleep 1/2 second -TA1 - rtems_task_restart - restarting self -TA1 - is beginning to run -TA2 - rtems_task_wake_after - sleep 1/2 second -TA2 - rtems_task_wake_after - sleep 1/2 second -TA1 - rtems_task_restart - restarting TA2 -TA2 - is beginning to run -TA2 - rtems_task_wake_after - sleep 1/2 second -TA2 - rtems_task_wake_after - sleep 1/2 second -TA1 - rtems_task_restart - restarting self -TA1 - is beginning to run -TA2 - rtems_task_wake_after - sleep 1/2 second -TA2 - rtems_task_wake_after - sleep 1/2 second -TA1 - rtems_task_restart - restarting TA2 -TA2 - is beginning to run -TA2 - rtems_task_wake_after - sleep 1/2 second -TA2 - rtems_task_wake_after - sleep 1/2 second -TA1 - rtems_task_restart - restarting self -TA1 - is beginning to run -*** END OF TEST 6 *** - -NOTE: The prints from TA2 may not be as regular as indicated in the screen. - The important point is that TA2 is running and gets restarted. diff --git a/c/src/tests/sptests/sp06/system.h b/c/src/tests/sptests/sp06/system.h deleted file mode 100644 index aa2c6d17e4..0000000000 --- a/c/src/tests/sptests/sp06/system.h +++ /dev/null @@ -1,30 +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 <rtems.h> -#include "tmacros.h" - -/* Miscellaneous */ - -#define EXTERN extern /* external definition */ - -/* macros */ - -/* structures */ - -#include "gvar.h" - -/* end of include file */ diff --git a/c/src/tests/sptests/sp06/task1.c b/c/src/tests/sptests/sp06/task1.c deleted file mode 100644 index 6d0f67f395..0000000000 --- a/c/src/tests/sptests/sp06/task1.c +++ /dev/null @@ -1,61 +0,0 @@ -/* Task_1 - * - * This task serves as a test task. Verifies that a task can restart - * both itself and other tasks. - * - * 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 Task_1( argument ) -rtems_unsigned32 argument; -{ - rtems_unsigned32 pass; - rtems_status_code status; - - puts( "TA1 - is beginning to run" ); - - pass = argument + 1; - - if ( pass == 5 ) { - puts( "*** END OF TEST 6 ***" ); - exit( 0 ); - } - - if ( pass == 1 ) { - puts( "TA1 - restarting TA3" ); - status = rtems_task_restart( Task_id[ 3 ], Restart_argument ); - directive_failed( status, "rtems_task_restart of TA3" ); - - status = rtems_task_wake_after( 2 * TICKS_PER_SECOND ); - directive_failed( status, "rtems_task_wake_after" ); - } - - status = rtems_task_wake_after( TICKS_PER_SECOND ); - directive_failed( status, "rtems_task_wake_after" ); - - puts( "TA1 - rtems_task_restart - restarting TA2" ); - status = rtems_task_restart( Task_id[ 2 ], Restart_argument ); - directive_failed( status, "rtems_task_restart TA2" ); - - status = rtems_task_wake_after( 1*TICKS_PER_SECOND ); - directive_failed( status, "rtems_task_wake_after" ); - - puts( "TA1 - rtems_task_restart - restarting self" ); - status = rtems_task_restart( Task_id[ 1 ], pass ); - directive_failed( status, "rtems_task_restart of RTEMS_SELF" ); -} diff --git a/c/src/tests/sptests/sp06/task2.c b/c/src/tests/sptests/sp06/task2.c deleted file mode 100644 index 0c9e10bc07..0000000000 --- a/c/src/tests/sptests/sp06/task2.c +++ /dev/null @@ -1,40 +0,0 @@ -/* Task_2 - * - * This routine serves as a test task. It simply runs forever so - * another task can restart it. - * - * 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 Task_2( argument ) -rtems_task_argument argument; -{ - rtems_status_code status; - - puts( "TA2 - is beginning to run" ); - if ( argument == Argument ) { - status = rtems_task_wake_after( 2 * TICKS_PER_SECOND ); - directive_failed( status, "rtems_task_wake_after" ); - } - - while( FOREVER ) { - puts( "TA2 - rtems_task_wake_after - sleep 1/2 second" ); - status = rtems_task_wake_after( TICKS_PER_SECOND / 2 ); - directive_failed( status, "rtems_task_wake_after" ); - } -} diff --git a/c/src/tests/sptests/sp06/task3.c b/c/src/tests/sptests/sp06/task3.c deleted file mode 100644 index 379ef8de92..0000000000 --- a/c/src/tests/sptests/sp06/task3.c +++ /dev/null @@ -1,32 +0,0 @@ -/* Task_3 - * - * This routine serves as a test task. It is started, has its priority - * changed, and when it runs it deletes itself. - * - * 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 Task_3( - rtems_task_argument argument -) -{ - rtems_status_code status; - - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of RTEMS_SELF" ); -} diff --git a/c/src/tests/sptests/sp07/init.c b/c/src/tests/sptests/sp07/init.c deleted file mode 100644 index f5d00eae8e..0000000000 --- a/c/src/tests/sptests/sp07/init.c +++ /dev/null @@ -1,131 +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$ - */ - -#include "system.h" -#undef EXTERN -#define EXTERN -#include "conftbl.h" -#include "gvar.h" - -rtems_extensions_table Extensions = { - Task_create_extension, /* task create user extension */ - Task_start_extension, /* task start user extension */ - Task_restart_extension, /* task restart user extension */ - Task_delete_extension, /* task delete user extension */ - NULL, /* task switch user extension */ - NULL, /* begin user extension */ - Task_exit_extension, /* task exitted user extension */ - NULL /* fatal error extension */ -}; - -rtems_task Init( - rtems_task_argument argument -) -{ - rtems_status_code status; - - puts( "\n\n*** TEST 7 ***" ); - - Extension_name[ 1 ] = rtems_build_name( 'E', 'X', 'T', ' ' ); - - status = rtems_extension_create( - Extension_name[ 1 ], - &Extensions, - &Extension_id[ 1 ] - ); - directive_failed( status, "rtems_extension_create" ); - - Task_name[ 1 ] = rtems_build_name( 'T', 'A', '1', ' ' ); - Task_name[ 2 ] = rtems_build_name( 'T', 'A', '2', ' ' ); - Task_name[ 3 ] = rtems_build_name( 'T', 'A', '3', ' ' ); - Task_name[ 4 ] = rtems_build_name( 'T', 'A', '4', ' ' ); - - status = rtems_task_create( - Task_name[ 1 ], - 4, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 1 ] - ); - directive_failed( status, "rtems_task_create of TA1" ); - - status = rtems_task_create( - Task_name[ 2 ], - 4, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 2 ] - ); - directive_failed( status, "rtems_task_create of TA2" ); - - status = rtems_task_create( - Task_name[ 3 ], - 250, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 3 ] - ); - directive_failed( status, "rtems_task_create of TA3" ); - - status = rtems_task_create( - Task_name[ 4 ], - 254, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 4 ] - ); - directive_failed( status, "rtems_task_create of TA4" ); - - status = rtems_task_start( Task_id[ 1 ], Task_1, 0 ); - directive_failed( status, "rtems_task_start of TA1" ); - - status = rtems_task_start( Task_id[ 2 ], Task_2, 0 ); - directive_failed( status, "rtems_task_start of TA2" ); - - status = rtems_task_start( Task_id[ 3 ], Task_3, 0 ); - directive_failed( status, "rtems_task_start of TA3" ); - - status = rtems_task_start( Task_id[ 4 ], Task_4, 0 ); - directive_failed( status, "rtems_task_start of TA4" ); - - status = rtems_task_restart( Task_id[ 3 ], 0 ); - directive_failed( status, "rtems_task_restart of TA3" ); - - status = rtems_task_set_note( Task_id[ 1 ], RTEMS_NOTEPAD_8, 4 ); - directive_failed( status, "task_set_node of TA1" ); - printf( "INIT - rtems_task_set_note - set TA1's RTEMS_NOTEPAD_8 " ); - puts ( "to TA1's priority: 04" ); - - status = rtems_task_set_note( Task_id[ 2 ], RTEMS_NOTEPAD_8, 4 ); - directive_failed( status, "task_set_node of TA2" ); - printf( "INIT - rtems_task_set_note - set TA2's RTEMS_NOTEPAD_8 " ); - puts ( "to TA2's priority: 04"); - - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of RTEMS_SELF" ); -} diff --git a/c/src/tests/sptests/sp07/sp07.doc b/c/src/tests/sptests/sp07/sp07.doc deleted file mode 100644 index 47411194c6..0000000000 --- a/c/src/tests/sptests/sp07/sp07.doc +++ /dev/null @@ -1,37 +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: test7 - -directives: - ex_init, ex_start, t_create, t_start, tm_tick, i_return, - t_delete, t_setreg, t_getreg, t_setpri, t_suspend - -concepts: - - a. Verifies that tasks can communicate with each other via the - t_setreg and t_getreg directives. - - b. Verifies that the highest priority task is dispatched to execute. - - c. Verifies setting the priority of both a ready and a blocked task. - - d. Verifies the deletion of ready and blocked tasks. - - e. Verifies the tcreate user extension. - - f. Verifies the tstart user extension. - - g. Verifies the tdelete user extension. diff --git a/c/src/tests/sptests/sp07/sp07.scn b/c/src/tests/sptests/sp07/sp07.scn deleted file mode 100644 index 1f6de2d93d..0000000000 --- a/c/src/tests/sptests/sp07/sp07.scn +++ /dev/null @@ -1,33 +0,0 @@ -*** TEST 7 *** -TASK_CREATE - TA1 - created. -TASK_CREATE - TA2 - created. -TASK_CREATE - TA3 - created. -TASK_CREATE - TA4 - created. -TASK_START - TA1 - started. -TASK_START - TA2 - started. -TASK_START - TA3 - started. -TASK_START - TA4 - started. -TASK_RESTART - TA3 - restarted. -INIT - rtems_task_set_note - set TA1's RTEMS_NOTEPAD_8 to TA1's priority: 04 -INIT - rtems_task_set_note - set TA2's RTEMS_NOTEPAD_8 to TA2's priority: 04 -<pause> -TA1 - rtems_task_set_priority - get initial priority of self: 04 -TA1 - rtems_task_get_note - get RTEMS_NOTEPAD_8 - current priority: 04 -TA1 - rtems_task_set_note - set TA2's RTEMS_NOTEPAD_8: 03 -TA1 - rtems_task_set_priority - set TA2's priority: 03 -TA2 - rtems_task_get_note - get RTEMS_NOTEPAD_8 - current priority: 03 -TA2 - rtems_task_set_note - set TA1's RTEMS_NOTEPAD_8: 02 -TA2 - rtems_task_set_priority - set TA1's priority: 02 -TA1 - rtems_task_get_note - get RTEMS_NOTEPAD_8 - current priority: 02 -TA1 - rtems_task_set_note - set TA2's RTEMS_NOTEPAD_8: 01 -TA1 - rtems_task_set_priority - set TA2's priority: 01 -TA2 - rtems_task_get_note - get RTEMS_NOTEPAD_8 - current priority: 01 -TA2 - rtems_task_suspend - suspend TA1 -TA2 - rtems_task_set_priority - set priority of TA1 ( blocked ) -TASK_DELETE - TA2 deleting TA1 -TASK_DELETE - TA2 deleting TA3 -TASK_DELETE - TA2 deleting TA2 -TA4 - exitting task -RTEMS_TASK_EXITTED - extension invoked for TA4 -*** END OF TEST 7 *** -TASK_DELETE - TA4 deleting TA4 <---- may not appear diff --git a/c/src/tests/sptests/sp07/system.h b/c/src/tests/sptests/sp07/system.h deleted file mode 100644 index 01a3e7f765..0000000000 --- a/c/src/tests/sptests/sp07/system.h +++ /dev/null @@ -1,35 +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 <rtems.h> -#include "tmacros.h" - -/* constants */ - -#define SI_NAME 0x53595349 /* name - "SYSI" */ -#define I_NAME 0x49444c45 /* name - "IDLE" */ - -/* Miscellaneous */ - -#define EXTERN extern /* external definition */ - -/* macros */ - -/* structures */ - -#include "gvar.h" - -/* end of include file */ diff --git a/c/src/tests/sptests/sp07/task1.c b/c/src/tests/sptests/sp07/task1.c deleted file mode 100644 index 62fa35cee9..0000000000 --- a/c/src/tests/sptests/sp07/task1.c +++ /dev/null @@ -1,85 +0,0 @@ -/* Task_1 - * - * This routine serves as a test task. It verifies intertask communication - * using task notepads and verifies the the user extensions (tcreate, etc). - * - * 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 Task_1( - rtems_task_argument argument -) -{ - rtems_status_code status; - rtems_task_priority the_priority; - rtems_task_priority previous_priority; - - pause(); - - status = rtems_task_set_priority( - RTEMS_SELF, - RTEMS_CURRENT_PRIORITY, - &the_priority - ); - directive_failed( status, "rtems_task_set_priority" ); - printf( - "TA1 - rtems_task_set_priority - get initial priority of self: %02d\n", - the_priority - ); - - while( FOREVER ) { - status = rtems_task_get_note( RTEMS_SELF, RTEMS_NOTEPAD_8, &the_priority ); - directive_failed( status, "rtems_task_get_note" ); - printf( -"TA1 - rtems_task_get_note - get RTEMS_NOTEPAD_8 - current priority: %02d\n", - the_priority - ); - - if ( --the_priority == 0 ) { - puts( "TA1 - rtems_task_suspend - suspend TA2" ); - status = rtems_task_suspend( Task_id[ 2 ] ); - directive_failed( status, "rtems_task_suspend" ); - - puts( "TA1 - rtems_task_set_priority - set priority of TA2 ( blocked )" ); - status = rtems_task_set_priority( Task_id[ 2 ], 5, &previous_priority ); - directive_failed( status, "rtems_task_set_priority" ); - - status = rtems_task_delete( Task_id[ 2 ] ); - directive_failed( status, "rtems_task_delete of TA2" ); - - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of RTEMS_SELF" ); - } - - printf( "TA1 - rtems_task_set_note - set TA2's RTEMS_NOTEPAD_8: %02d\n", - the_priority - ); - status = rtems_task_set_note( Task_id[ 2 ], RTEMS_NOTEPAD_8, the_priority ); - directive_failed( status, "rtems_task_set_note" ); - - printf( "TA1 - rtems_task_set_priority - set TA2's priority: %02d\n", - the_priority - ); - status = rtems_task_set_priority( - Task_id[ 2 ], - the_priority, - &previous_priority - ); - directive_failed( status, "rtems_task_set_priority" ); - } -} diff --git a/c/src/tests/sptests/sp07/task2.c b/c/src/tests/sptests/sp07/task2.c deleted file mode 100644 index 622bdd8e3d..0000000000 --- a/c/src/tests/sptests/sp07/task2.c +++ /dev/null @@ -1,78 +0,0 @@ -/* Task_2 - * - * This routine serves as a test task. Plays with priorities to verify - * that the highest priority task is always executed. - * - * 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 Task_2( - rtems_task_argument argument -) -{ - rtems_status_code status; - rtems_task_priority the_priority; - rtems_task_priority previous_priority; - - while( FOREVER ) { - - status = rtems_task_get_note( RTEMS_SELF, RTEMS_NOTEPAD_8, &the_priority ); - directive_failed( status, "rtems_task_get_note" ); - printf( -"TA2 - rtems_task_get_note - get RTEMS_NOTEPAD_8 - current priority: %02d\n", - the_priority - ); - - if ( --the_priority == 0 ) { - puts( "TA2 - rtems_task_suspend - suspend TA1" ); - status = rtems_task_suspend( Task_id[ 1 ] ); - directive_failed( status, "rtems_task_suspend" ); - - puts( "TA2 - rtems_task_set_priority - set priority of TA1 ( blocked )" ); - status = rtems_task_set_priority( Task_id[ 1 ], 5, &previous_priority ); - directive_failed( status, "rtems_task_set_priority" ); - - status = rtems_task_delete( Task_id[ 1 ] ); /* TA1 is blocked */ - directive_failed( status, "rtems_task_delete of TA1" ); - - status = rtems_task_delete( Task_id[ 3 ] ); /* TA3 is ready */ - directive_failed( status, "rtems_task_delete of TA3" ); - - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of SELD" ); - - } else { - - printf( "TA2 - rtems_task_set_note - set TA1's RTEMS_NOTEPAD_8: %02d\n", - the_priority - ); - status = rtems_task_set_note(Task_id[ 1 ], RTEMS_NOTEPAD_8, the_priority); - directive_failed( status, "rtems_task_set_note" ); - - printf( "TA2 - rtems_task_set_priority - set TA1's priority: %02d\n", - the_priority - ); - status = rtems_task_set_priority( - Task_id[ 1 ], - the_priority, - &previous_priority - ); - directive_failed( status, "rtems_task_set_priority" ); - } - } -} diff --git a/c/src/tests/sptests/sp07/task3.c b/c/src/tests/sptests/sp07/task3.c deleted file mode 100644 index dce44b283b..0000000000 --- a/c/src/tests/sptests/sp07/task3.c +++ /dev/null @@ -1,34 +0,0 @@ -/* Task_3 - * - * This routine serves as a low priority test task that should never - * execute. - * - * 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 Task_3( - rtems_task_argument argument -) -{ - rtems_status_code status; - - while( FOREVER ) { - status = rtems_task_wake_after( RTEMS_YIELD_PROCESSOR ); - directive_failed( status, "rtems_task_wake_after" ); - } -} diff --git a/c/src/tests/sptests/sp07/task4.c b/c/src/tests/sptests/sp07/task4.c deleted file mode 100644 index cc9de6d4c3..0000000000 --- a/c/src/tests/sptests/sp07/task4.c +++ /dev/null @@ -1,30 +0,0 @@ -/* Task_4 - * - * This routine serves as a low priority test task that should exit - * a soon as it runs to test the taskexitted user extension. - * execute. - * - * 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 Task_4( - rtems_task_argument argument -) -{ - puts( "TA4 - exitting task" ); -} diff --git a/c/src/tests/sptests/sp07/taskexit.c b/c/src/tests/sptests/sp07/taskexit.c deleted file mode 100644 index ad52d1f3a7..0000000000 --- a/c/src/tests/sptests/sp07/taskexit.c +++ /dev/null @@ -1,33 +0,0 @@ -/* Task_exit_extension - * - * This routine is the task exitted user extension. - * - * Input parameters: NONE - * - * 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_extension Task_exit_extension( - rtems_tcb *running_task -) -{ - if ( task_number( running_task->Object.id ) > 0 ) { - puts_nocr( "RTEMS_TASK_EXITTED - extension invoked for " ); - put_name( Task_name[ task_number( running_task->Object.id ) ], TRUE ); - } - - puts("*** END OF TEST 7 ***" ); - exit( 0 ); -} diff --git a/c/src/tests/sptests/sp07/tcreate.c b/c/src/tests/sptests/sp07/tcreate.c deleted file mode 100644 index 7b066630f0..0000000000 --- a/c/src/tests/sptests/sp07/tcreate.c +++ /dev/null @@ -1,34 +0,0 @@ -/* Task_create_extension - * - * This routine is the tcreate user extension. - * - * Input parameters: - * unused - pointer to currently running TCB - * created_task - pointer to new TCB being created - * - * 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_extension Task_create_extension( - rtems_tcb *unused, - rtems_tcb *created_task -) -{ - if ( task_number( created_task->Object.id ) > 0 ) { - puts_nocr( "TASK_CREATE - " ); - put_name( Task_name[ task_number( created_task->Object.id ) ], FALSE ); - puts( " - created." ); - } -} diff --git a/c/src/tests/sptests/sp07/tdelete.c b/c/src/tests/sptests/sp07/tdelete.c deleted file mode 100644 index 9d7c5749c1..0000000000 --- a/c/src/tests/sptests/sp07/tdelete.c +++ /dev/null @@ -1,37 +0,0 @@ -/* Task_delete_extension - * - * This routine is the delete user extension. - * - * Input parameters: - * running_task - pointer to running TCB - * deleted_task - pointer to TCB deleted - * - * 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_extension Task_delete_extension( - rtems_tcb *running_task, - rtems_tcb *deleted_task -) -{ - if ( task_number( running_task->Object.id ) > 0 ) { - puts_nocr( "TASK_DELETE - " ); - put_name( Task_name[ task_number( running_task->Object.id ) ], FALSE ); - } - if ( task_number( deleted_task->Object.id ) > 0 ) { - puts_nocr( " deleting " ); - put_name( Task_name[ task_number( deleted_task->Object.id ) ], TRUE ); - } -} diff --git a/c/src/tests/sptests/sp07/trestart.c b/c/src/tests/sptests/sp07/trestart.c deleted file mode 100644 index 6cefb485a6..0000000000 --- a/c/src/tests/sptests/sp07/trestart.c +++ /dev/null @@ -1,34 +0,0 @@ -/* Task_restart_extension - * - * This routine is the trestart user extension. - * - * Input parameters: - * unused - pointer to currently running TCB - * restarted_task - pointer to new TCB being started - * - * 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" - -void Task_restart_extension( - rtems_tcb *unused, - rtems_tcb *restarted_task -) -{ - if ( task_number( restarted_task->Object.id ) > 0 ) { - puts_nocr( "TASK_RESTART - " ); - put_name( Task_name[ task_number( restarted_task->Object.id ) ], FALSE ); - puts( " - restarted." ); - } -} diff --git a/c/src/tests/sptests/sp07/tstart.c b/c/src/tests/sptests/sp07/tstart.c deleted file mode 100644 index 1b1fc795b7..0000000000 --- a/c/src/tests/sptests/sp07/tstart.c +++ /dev/null @@ -1,34 +0,0 @@ -/* Task_start_extension - * - * This routine is the tstart user extension. - * - * Input parameters: - * unused - pointer to currently running TCB - * started_task - pointer to new TCB being started - * - * 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_extension Task_start_extension( - rtems_tcb *unused, - rtems_tcb *started_task -) -{ - if ( task_number( started_task->Object.id ) > 0 ) { - puts_nocr( "TASK_START - " ); - put_name( Task_name[ task_number( started_task->Object.id ) ], FALSE ); - puts( " - started." ); - } -} diff --git a/c/src/tests/sptests/sp08/init.c b/c/src/tests/sptests/sp08/init.c deleted file mode 100644 index e3020035ce..0000000000 --- a/c/src/tests/sptests/sp08/init.c +++ /dev/null @@ -1,56 +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$ - */ - -#include "system.h" -#undef EXTERN -#define EXTERN -#include "conftbl.h" -#include "gvar.h" - -rtems_task Init( - rtems_task_argument argument -) -{ - rtems_status_code status; - - puts( "\n\n*** TEST 8 ***" ); - - Task_name[ 1 ] = rtems_build_name( 'T', 'A', '1', ' ' ); - - status = rtems_task_create( - Task_name[ 1 ], - 1, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 1 ] - ); - directive_failed( status, "rtems_task_create of TA1" ); - - status = rtems_task_start( Task_id[ 1 ], Task_1, 0 ); - directive_failed( status, "rtems_task_start of TA1" ); - - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of RTEMS_SELF" ); -} diff --git a/c/src/tests/sptests/sp08/sp08.doc b/c/src/tests/sptests/sp08/sp08.doc deleted file mode 100644 index 2b152779d7..0000000000 --- a/c/src/tests/sptests/sp08/sp08.doc +++ /dev/null @@ -1,26 +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: test8 - -directives: - ex_init, ex_start, t_create, t_start, tm_tick, i_return, - t_mode - -concepts: - - a. Verifies every mode change possible. - - b. Verifies the fatal error handler. diff --git a/c/src/tests/sptests/sp08/sp08.scn b/c/src/tests/sptests/sp08/sp08.scn deleted file mode 100644 index d85ccc384f..0000000000 --- a/c/src/tests/sptests/sp08/sp08.scn +++ /dev/null @@ -1,22 +0,0 @@ -*** TEST 8 *** -TA1 - rtems_task_mode - RTEMS_ASR - previous mode: 00000000 -TA1 - rtems_task_mode - RTEMS_NO_ASR - previous mode: 00000000 -TA1 - rtems_task_mode - RTEMS_NO_ASR - previous mode: 00000400 -TA1 - rtems_task_mode - RTEMS_ASR - previous mode: 00000400 -TA1 - rtems_task_mode - RTEMS_NO_TIMESLICE - previous mode: 00000000 -TA1 - rtems_task_mode - RTEMS_TIMESLICE - previous mode: 00000000 -TA1 - rtems_task_mode - RTEMS_TIMESLICE - previous mode: 00000200 -TA1 - rtems_task_mode - RTEMS_NO_TIMESLICE - previous mode: 00000200 -TA1 - rtems_task_mode - RTEMS_PREEMPT - previous mode: 00000000 -TA1 - rtems_task_mode - RTEMS_NO_PREEMPT - previous mode: 00000000 -TA1 - rtems_task_mode - RTEMS_NO_PREEMPT - previous mode: 00000100 -TA1 - rtems_task_mode - RTEMS_PREEMPT - previous mode: 00000100 -TA1 - rtems_task_mode - RTEMS_INTERRUPT_LEVEL( 3 ) - previous mode: 00000000 -TA1 - rtems_task_mode - RTEMS_INTERRUPT_LEVEL( 5 ) - previous mode: 00000003 -TA1 - rtems_task_mode - set all modes - previous mode: 00000005 -TA1 - rtems_task_mode - set all modes - previous mode: 00000703 -TA1 - rtems_task_mode - clear all modes - previous mode: 00000703 -TA1 - rtems_task_mode - get current mode - previous mode: 00000000 -*** END OF TEST 8 *** - -NOTE: The interrupt level lines will be different on CPUs with few levels. diff --git a/c/src/tests/sptests/sp08/system.h b/c/src/tests/sptests/sp08/system.h deleted file mode 100644 index dec5151b46..0000000000 --- a/c/src/tests/sptests/sp08/system.h +++ /dev/null @@ -1,33 +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 <rtems.h> -#include "tmacros.h" - -/* Miscellaneous */ - -#define EXTERN extern /* external definition */ - -/* macros */ - -#define put_mode( _comment, _output_mode ) \ - printf( "%s %08x\n", _comment, _output_mode ); - -/* structures */ - -#include "gvar.h" - -/* end of include file */ diff --git a/c/src/tests/sptests/sp08/task1.c b/c/src/tests/sptests/sp08/task1.c deleted file mode 100644 index eddcb11191..0000000000 --- a/c/src/tests/sptests/sp08/task1.c +++ /dev/null @@ -1,256 +0,0 @@ -/* Task_1 - * - * This routine serves as a test task. It verifies all combinations of - * task mode changes. - * - * 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 Task_1( - rtems_task_argument argument -) -{ - rtems_mode previous_mode; - rtems_status_code status; - -/* BEGINNING OF RTEMS_ASR */ - - status = rtems_task_mode( RTEMS_ASR, RTEMS_ASR_MASK, &previous_mode ); - directive_failed( status, "rtems_task_mode" ); - put_mode( - "TA1 - rtems_task_mode - RTEMS_ASR - previous mode: ", - previous_mode - ); - - status = rtems_task_mode( - RTEMS_NO_ASR, - RTEMS_ASR_MASK, - &previous_mode - ); - directive_failed( status, "rtems_task_mode" ); - put_mode( - "TA1 - rtems_task_mode - RTEMS_NO_ASR - previous mode: ", - previous_mode - ); - - status = rtems_task_mode( - RTEMS_NO_ASR, - RTEMS_ASR_MASK, - &previous_mode - ); - directive_failed( status, "rtems_task_mode" ); - put_mode( - "TA1 - rtems_task_mode - RTEMS_NO_ASR - previous mode: ", - previous_mode - ); - - status = rtems_task_mode( - RTEMS_ASR, - RTEMS_ASR_MASK, - &previous_mode - ); - directive_failed( status, "rtems_task_mode" ); - put_mode( - "TA1 - rtems_task_mode - RTEMS_ASR - previous mode: ", - previous_mode - ); - -/* END OF RTEMS_ASR */ - -/* BEGINNING OF RTEMS_TIMESLICE */ - - status = rtems_task_mode( - RTEMS_NO_TIMESLICE, - RTEMS_TIMESLICE_MASK, - &previous_mode - ); - directive_failed( status, "rtems_task_mode" ); - put_mode( - "TA1 - rtems_task_mode - RTEMS_NO_TIMESLICE - previous mode: ", - previous_mode - ); - - status = rtems_task_mode( - RTEMS_TIMESLICE, - RTEMS_TIMESLICE_MASK, - &previous_mode - ); - directive_failed( status, "rtems_task_mode" ); - put_mode( - "TA1 - rtems_task_mode - RTEMS_TIMESLICE - previous mode: ", - previous_mode - ); - - status = rtems_task_mode( - RTEMS_TIMESLICE, - RTEMS_TIMESLICE_MASK, - &previous_mode - ); - directive_failed( status, "rtems_task_mode" ); - put_mode( - "TA1 - rtems_task_mode - RTEMS_TIMESLICE - previous mode: ", - previous_mode - ); - - status = rtems_task_mode( - RTEMS_NO_TIMESLICE, - RTEMS_TIMESLICE_MASK, - &previous_mode - ); - directive_failed( status, "rtems_task_mode" ); - put_mode( - "TA1 - rtems_task_mode - RTEMS_NO_TIMESLICE - previous mode: ", - previous_mode - ); - -/* END OF RTEMS_TIMESLICE */ - -/* BEGINNING OF RTEMS_PREEMPT */ - - status = rtems_task_mode( - RTEMS_PREEMPT, - RTEMS_PREEMPT_MASK, - &previous_mode - ); - directive_failed( status, "rtems_task_mode" ); - put_mode( - "TA1 - rtems_task_mode - RTEMS_PREEMPT - previous mode: ", - previous_mode - ); - - status = rtems_task_mode( - RTEMS_NO_PREEMPT, - RTEMS_PREEMPT_MASK, - &previous_mode - ); - directive_failed( status, "rtems_task_mode" ); - put_mode( - "TA1 - rtems_task_mode - RTEMS_NO_PREEMPT - previous mode: ", - previous_mode - ); - - status = rtems_task_mode( - RTEMS_NO_PREEMPT, - RTEMS_PREEMPT_MASK, - &previous_mode - ); - directive_failed( status, "rtems_task_mode" ); - put_mode( - "TA1 - rtems_task_mode - RTEMS_NO_PREEMPT - previous mode: ", - previous_mode - ); - - status = rtems_task_mode( - RTEMS_PREEMPT, - RTEMS_PREEMPT_MASK, - &previous_mode - ); - directive_failed( status, "rtems_task_mode" ); - put_mode( - "TA1 - rtems_task_mode - RTEMS_PREEMPT - previous mode: ", - previous_mode - ); - -/* END OF RTEMS_PREEMPT */ - -/* BEGINNING OF RTEMS_INTERRUPT_LEVEL */ - - status = rtems_task_mode( - RTEMS_INTERRUPT_LEVEL(3), - RTEMS_INTERRUPT_MASK, - &previous_mode - ); - directive_failed( status, "rtems_task_mode" ); - put_mode( - "TA1 - rtems_task_mode - RTEMS_INTERRUPT_LEVEL( 3 ) - previous mode: ", - previous_mode - ); - - status = rtems_task_mode( - RTEMS_INTERRUPT_LEVEL(5), - RTEMS_INTERRUPT_MASK, - &previous_mode - ); - directive_failed( status, "rtems_task_mode" ); - put_mode( - "TA1 - rtems_task_mode - RTEMS_INTERRUPT_LEVEL( 5 ) - previous mode: ", - previous_mode - ); - -/* END OF RTEMS_INTERRUPT_LEVEL */ - -/* BEGINNING OF COMBINATIONS */ - - status = rtems_task_mode( - RTEMS_INTERRUPT_LEVEL(3) | RTEMS_NO_ASR | - RTEMS_TIMESLICE | RTEMS_NO_PREEMPT, - RTEMS_INTERRUPT_MASK | RTEMS_ASR_MASK | - RTEMS_TIMESLICE_MASK | RTEMS_PREEMPT_MASK, - &previous_mode - ); - directive_failed( status, "rtems_task_mode" ); - put_mode( - "TA1 - rtems_task_mode - set all modes - previous mode: ", - previous_mode - ); - - status = rtems_task_mode( - RTEMS_INTERRUPT_LEVEL(3) | RTEMS_NO_ASR | - RTEMS_TIMESLICE | RTEMS_NO_PREEMPT, - RTEMS_INTERRUPT_MASK | RTEMS_ASR_MASK | - RTEMS_TIMESLICE_MASK | RTEMS_PREEMPT_MASK, - &previous_mode - ); - directive_failed( status, "rtems_task_mode" ); - put_mode( - "TA1 - rtems_task_mode - set all modes - previous mode: ", - previous_mode - ); - - status = rtems_task_mode( - RTEMS_INTERRUPT_LEVEL(0) | RTEMS_ASR | RTEMS_NO_TIMESLICE | RTEMS_PREEMPT, - RTEMS_INTERRUPT_MASK | RTEMS_ASR_MASK | - RTEMS_TIMESLICE_MASK | RTEMS_PREEMPT_MASK, - &previous_mode - ); - directive_failed( status, "rtems_task_mode" ); - put_mode( - "TA1 - rtems_task_mode - clear all modes - previous mode: ", - previous_mode - ); - -/* END OF COMBINATIONS */ - -/* BEGINNING OF CURRENT MODE */ - - status = rtems_task_mode( - RTEMS_CURRENT_MODE, - RTEMS_CURRENT_MODE, - &previous_mode - ); - directive_failed( status, "rtems_task_mode" ); - put_mode( - "TA1 - rtems_task_mode - get current mode - previous mode: ", - previous_mode - ); - -/* END OF CURRENT MODE */ - - puts( "*** END OF TEST 8 ***" ); - exit( 0 ); -} diff --git a/c/src/tests/sptests/sp09/delay.c b/c/src/tests/sptests/sp09/delay.c deleted file mode 100644 index dd78610be8..0000000000 --- a/c/src/tests/sptests/sp09/delay.c +++ /dev/null @@ -1,28 +0,0 @@ -/* Delayed_routine - * - * This routine is used as the timer routine for Timer Manager tests. - * - * Input parameters: - * ignored - this parameter is ignored - * - * 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_timer_service_routine Delayed_routine( - rtems_id ignored_id, - void *ignored_address -) -{ -} diff --git a/c/src/tests/sptests/sp09/init.c b/c/src/tests/sptests/sp09/init.c deleted file mode 100644 index 3ca4b62404..0000000000 --- a/c/src/tests/sptests/sp09/init.c +++ /dev/null @@ -1,123 +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$ - */ - -#include "system.h" -#undef EXTERN -#define EXTERN -#include "conftbl.h" -#include "gvar.h" - -rtems_task Init( - rtems_task_argument argument -) -{ - rtems_status_code status; - - puts( "\n\n*** TEST 9 ***" ); - - Task_name[ 1 ] = rtems_build_name( 'T', 'A', '1', ' ' ); - Task_name[ 2 ] = rtems_build_name( 'T', 'A', '2', ' ' ); - Task_name[ 3 ] = rtems_build_name( 'T', 'A', '3', ' ' ); - Task_name[ 4 ] = rtems_build_name( 'T', 'A', '4', ' ' ); - Task_name[ 5 ] = rtems_build_name( 'T', 'A', '5', ' ' ); - Task_name[ 6 ] = rtems_build_name( 'T', 'A', '6', ' ' ); - Task_name[ 7 ] = rtems_build_name( 'T', 'A', '7', ' ' ); - Task_name[ 8 ] = rtems_build_name( 'T', 'A', '8', ' ' ); - Task_name[ 9 ] = rtems_build_name( 'T', 'A', '9', ' ' ); - Task_name[ 10 ] = rtems_build_name( 'T', 'A', 'A', ' ' ); - - Timer_name[ 1 ] = rtems_build_name( 'T', 'M', '1', ' ' ); - - Semaphore_name[ 1 ] = rtems_build_name( 'S', 'M', '1', ' ' ); - Semaphore_name[ 2 ] = rtems_build_name( 'S', 'M', '2', ' ' ); - Semaphore_name[ 3 ] = rtems_build_name( 'S', 'M', '3', ' ' ); - - Queue_name[ 1 ] = rtems_build_name( 'M', 'Q', '1', ' ' ); - Queue_name[ 2 ] = rtems_build_name( 'M', 'Q', '2', ' ' ); - - Partition_name[ 1 ] = rtems_build_name( 'P', 'T', '1', ' ' ); - - Region_name[ 1 ] = rtems_build_name( 'R', 'N', '1', ' ' ); - - Port_name[ 1 ] = rtems_build_name( 'D', 'P', '1', ' ' ); - - Period_name[ 1 ] = rtems_build_name( 'T', 'M', '1', ' ' ); - -#if 0 - status = rtems_task_create( - Task_name[1], - 4, - 10, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 1 ] - ); - fatal_directive_status( - status, - RTEMS_INVALID_SIZE, - "rtems_task_create with illegal stack size" - ); - puts( "INIT - rtems_task_create - RTEMS_INVALID_SIZE" ); -#endif - puts( "INIT - rtems_task_create - RTEMS_INVALID_SIZE -- NOT CHECKED" ); - - status = rtems_task_create( - Task_name[1], - 0, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 1 ] - ); - fatal_directive_status( - status, - RTEMS_INVALID_PRIORITY, - "rtems_task_create with illegal priority" - ); - puts( "INIT - rtems_task_create - RTEMS_INVALID_PRIORITY" ); - - status = rtems_task_create( - Task_name[ 1 ], - 4, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 1 ] - ); - directive_failed( status, "rtems_task_create of TA1" ); - - status = rtems_task_restart( Task_id[ 1 ], 0 ); - fatal_directive_status( - status, - RTEMS_INCORRECT_STATE, - "rtems_task_restart of DORMANT task" - ); - puts( "INIT - rtems_task_restart - RTEMS_INCORRECT_STATE" ); - - status = rtems_task_start( Task_id[ 1 ], Task_1, 0 ); - directive_failed( status, "rtems_task_start of TA1" ); - - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of RTEMS_SELF" ); -} diff --git a/c/src/tests/sptests/sp09/isr.c b/c/src/tests/sptests/sp09/isr.c deleted file mode 100644 index 292e9c0225..0000000000 --- a/c/src/tests/sptests/sp09/isr.c +++ /dev/null @@ -1,27 +0,0 @@ -/* Service_routine - * - * This routine is used as the timer routine for Interrupt Manager tests. - * - * Input parameters: - * ignored - this parameter is ignored - * - * 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_isr Service_routine( - rtems_vector_number ignored -) -{ -} diff --git a/c/src/tests/sptests/sp09/screen01.c b/c/src/tests/sptests/sp09/screen01.c deleted file mode 100644 index 39012f5051..0000000000 --- a/c/src/tests/sptests/sp09/screen01.c +++ /dev/null @@ -1,168 +0,0 @@ -/* Screen1 - * - * This routine generates error screen 1 for test 9. - * - * Input parameters: NONE - * - * 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" - -void Screen1() -{ - rtems_unsigned32 notepad_value; - rtems_id self_id; - rtems_task_priority previous_priority; - rtems_status_code status; - - status = rtems_task_delete( 100 ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_task_delete with illegal id" - ); - puts( "TA1 - rtems_task_delete - RTEMS_INVALID_ID" ); - - status = rtems_task_get_note( RTEMS_SELF, 100, ¬epad_value ); - fatal_directive_status( - status, - RTEMS_INVALID_NUMBER, - "rtems_task_get_note with illegal notepad" - ); - puts( "TA1 - rtems_task_get_note - RTEMS_INVALID_NUMBER" ); - - status = rtems_task_get_note( 100, RTEMS_NOTEPAD_LAST, ¬epad_value ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_task_get_note with illegal id" - ); - puts( "TA1 - rtems_task_get_note - RTEMS_INVALID_ID" ); - - status = rtems_task_ident( RTEMS_SELF, RTEMS_SEARCH_ALL_NODES, &self_id ); - directive_failed( status, "rtems_task_ident of self" ); - - if ( self_id != Task_id[ 1 ] ) { - puts( "ERROR - rtems_task_ident - incorrect ID returned!" ); - } - puts( "TA1 - rtems_task_ident - current task RTEMS_SUCCESSFUL" ); - - status = rtems_task_ident( 100, RTEMS_SEARCH_ALL_NODES, &Junk_id ); - fatal_directive_status( - status, - RTEMS_INVALID_NAME, - "rtems_task_ident with illegal name (local)" - ); - puts( "TA1 - rtems_task_ident - global RTEMS_INVALID_NAME" ); - - status = rtems_task_ident( 100, 1, &Junk_id ); - fatal_directive_status( - status, - RTEMS_INVALID_NAME, - "rtems_task_ident with illegal name (global)" - ); - puts( "TA1 - rtems_task_ident - local RTEMS_INVALID_NAME" ); - - status = rtems_task_ident( 100, 2, &Junk_id ); - fatal_directive_status( - status, - RTEMS_INVALID_NODE, - "rtems_task_ident with illegal node" - ); - puts( "TA1 - rtems_task_ident - RTEMS_INVALID_NODE" ); - - status = rtems_task_restart( 100, 0 ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_task_restart with illegal id" - ); - puts( "TA1 - rtems_task_restart - RTEMS_INVALID_ID" ); - - status = rtems_task_resume( 100 ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_task_resume with illegal id" - ); - puts( "TA1 - rtems_task_resume - RTEMS_INVALID_ID" ); - - status = rtems_task_resume( RTEMS_SELF ); - fatal_directive_status( - status, - RTEMS_INCORRECT_STATE, - "rtems_task_resume of ready task" - ); - puts( "TA1 - rtems_task_resume - RTEMS_INCORRECT_STATE" ); - - status = rtems_task_set_priority( RTEMS_SELF, 512, &previous_priority ); - fatal_directive_status( - status, - RTEMS_INVALID_PRIORITY, - "rtems_task_set_priority with illegal priority" - ); - puts( "TA1 - rtems_task_set_priority - RTEMS_INVALID_PRIORITY" ); - - status = rtems_task_set_priority( 100, 8, &previous_priority ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_task_set_priority with illegal id" - ); - puts( "TA1 - rtems_task_set_priority - RTEMS_INVALID_ID" ); - - status = rtems_task_set_note( - RTEMS_SELF, - RTEMS_NOTEPAD_LAST+10, - notepad_value - ); - fatal_directive_status( - status, - RTEMS_INVALID_NUMBER, - "rtems_task_set_note with illegal notepad" - ); - puts( "TA1 - rtems_task_set_note - RTEMS_INVALID_NUMBER" ); - - status = rtems_task_set_note( 100, RTEMS_NOTEPAD_LAST, notepad_value ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_task_set_note with illegal id" - ); - puts( "TA1 - rtems_task_set_note - RTEMS_INVALID_ID" ); - - status = rtems_task_start( 100, Task_1, 0 ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_task_start with illegal id" - ); - puts( "TA1 - rtems_task_start - RTEMS_INVALID_ID" ); - - status = rtems_task_start( 0, Task_1, 0 ); - fatal_directive_status( - status, - RTEMS_INCORRECT_STATE, - "rtems_task_start of ready task" - ); - puts( "TA1 - rtems_task_start - RTEMS_INCORRECT_STATE" ); - - status = rtems_task_suspend( 100 ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_task_suspend with illegal id" - ); - puts( "TA1 - rtems_task_suspend - RTEMS_INVALID_ID" ); -} diff --git a/c/src/tests/sptests/sp09/screen02.c b/c/src/tests/sptests/sp09/screen02.c deleted file mode 100644 index 02eb5e4498..0000000000 --- a/c/src/tests/sptests/sp09/screen02.c +++ /dev/null @@ -1,192 +0,0 @@ -/* Screen2 - * - * This routine generates error screen 2 for test 9. - * - * Input parameters: NONE - * - * 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" - -void Screen2() -{ - rtems_time_of_day time; - rtems_status_code status; - -/* errors before clock is set */ - - status = rtems_clock_get( RTEMS_CLOCK_GET_TOD, &time ); - if ( status == RTEMS_SUCCESSFUL ) { - puts( - "TA1 - rtems_clock_get - RTEMS_NOT_DEFINED -- DID BSP SET THE TIME OF DAY?" - ); - } else { - fatal_directive_status( - status, - RTEMS_NOT_DEFINED, - "rtems_clock_get before clock is set" - ); - puts( "TA1 - rtems_clock_get - RTEMS_NOT_DEFINED" ); - } - - status = rtems_task_wake_when( &time ); - if ( status == RTEMS_SUCCESSFUL ) { - puts( -"TA1 - rtems_task_wake_when - RTEMS_NOT_DEFINED -- DID BSP SET THE TIME OF DAY?" - ); - } else { - fatal_directive_status( - status, - RTEMS_NOT_DEFINED, - "rtems_task_wake_when before clock is set" - ); - puts( "TA1 - rtems_task_wake_when - RTEMS_NOT_DEFINED" ); - } - - status = rtems_timer_fire_when( 0, &time, Delayed_routine, NULL ); - if ( status == RTEMS_SUCCESSFUL ) { - puts( - "TA1 - timer_wake_when - RTEMS_NOT_DEFINED -- DID BSP SET THE TIME OF DAY?" - ); - } else { - fatal_directive_status( - status, - RTEMS_NOT_DEFINED, - "task_fire_when before clock is set" - ); - puts( "TA1 - rtems_timer_fire_when - RTEMS_NOT_DEFINED" ); - } - - build_time( &time, 2, 5, 1987, 8, 30, 45, 0 ); - print_time( "TA1 - rtems_clock_set - ", &time, "" ); - status = rtems_clock_set( &time ); - fatal_directive_status( - status, - RTEMS_INVALID_CLOCK, - "rtems_clock_set with invalid year" - ); - puts( " - RTEMS_INVALID_CLOCK" ); - - build_time( &time, 15, 5, 1988, 8, 30, 45, 0 ); - print_time( "TA1 - rtems_clock_set - ", &time, "" ); - status = rtems_clock_set( &time ); - fatal_directive_status( - status, - RTEMS_INVALID_CLOCK, - "rtems_clock_set with invalid month" - ); - puts( " - RTEMS_INVALID_CLOCK" ); - - build_time( &time, 2, 32, 1988, 8, 30, 45, 0 ); - print_time( "TA1 - rtems_clock_set - ", &time, "" ); - status = rtems_clock_set( &time ); - fatal_directive_status( - status, - RTEMS_INVALID_CLOCK, - "rtems_clock_set with invalid day" - ); - puts( " - RTEMS_INVALID_CLOCK" ); - - build_time( &time, 2, 5, 1988, 25, 30, 45, 0 ); - print_time( "TA1 - rtems_clock_set - ", &time, "" ); - status = rtems_clock_set( &time ); - fatal_directive_status( - status, - RTEMS_INVALID_CLOCK, - "rtems_clock_set with invalid hour" - ); - puts( " - RTEMS_INVALID_CLOCK" ); - - build_time( &time, 2, 5, 1988, 8, 61, 45, 0 ); - print_time( "TA1 - rtems_clock_set - ", &time, "" ); - status = rtems_clock_set( &time ); - fatal_directive_status( - status, - RTEMS_INVALID_CLOCK, - "rtems_clock_set with invalid minute" - ); - puts( " - RTEMS_INVALID_CLOCK" ); - - build_time( &time, 2, 5, 1988, 8, 30, 61, 0 ); - print_time( "TA1 - rtems_clock_set - ", &time, "" ); - status = rtems_clock_set( &time ); - fatal_directive_status( - status, - RTEMS_INVALID_CLOCK, - "rtems_clock_set with invalid second" - ); - puts( " - RTEMS_INVALID_CLOCK" ); - - build_time( &time, 2, 5, 1988, 8, 30, 45, TICKS_PER_SECOND + 1 ); - print_time( "TA1 - rtems_clock_set - ", &time, "" ); - status = rtems_clock_set( &time ); - fatal_directive_status( - status, - RTEMS_INVALID_CLOCK, - "rtems_clock_set with invalid ticks per second" - ); - puts( " - RTEMS_INVALID_CLOCK" ); - - build_time( &time, 2, 5, 1988, 8, 30, 45, 0 ); - print_time( "TA1 - rtems_clock_set - ", &time, "" ); - status = rtems_clock_set( &time ); - directive_failed( status, "rtems_clock_set successful" ); - puts( " - RTEMS_SUCCESSFUL" ); - -/* rtems_task_wake_when */ - - build_time( &time, 2, 5, 1988, 8, 30, 48, TICKS_PER_SECOND + 1 ); - time.second += 3; - puts( "TA1 - rtems_task_wake_when - TICKINVALID - sleep about 3 seconds" ); - - status = rtems_task_wake_when( &time ); - directive_failed( - status, - "rtems_task_wake_when with invalid ticks per second" - ); - puts( "TA1 - rtems_task_wake_when - TICKINVALID - woke up RTEMS_SUCCESSFUL" ); - - build_time( &time, 2, 5, 1961, 8, 30, 48, 0 ); - print_time( "TA1 - rtems_task_wake_when - ", &time, "" ); - status = rtems_task_wake_when( &time ); - fatal_directive_status( - status, - RTEMS_INVALID_CLOCK, - "rtems_task_wake_when with invalid year" - ); - puts( " - RTEMS_INVALID_CLOCK" ); - - build_time( &time, 2, 5, 1988, 25, 30, 48, 0 ); - print_time( "TA1 - rtems_task_wake_when - ", &time, "" ); - status = rtems_task_wake_when( &time ); - fatal_directive_status( - status, - RTEMS_INVALID_CLOCK, - "rtems_task_wake_when with invalid hour" - ); - puts( " - RTEMS_INVALID_CLOCK" ); - - rtems_clock_get( RTEMS_CLOCK_GET_TOD, &time ); - print_time( "TA1 - current time - ", &time, "\n" ); - - time.month = 1; - print_time( "TA1 - rtems_task_wake_when - ", &time, "" ); - status = rtems_task_wake_when( &time ); - fatal_directive_status( - status, - RTEMS_INVALID_CLOCK, - "rtems_task_wake_when before current time" - ); - puts( " - RTEMS_INVALID_CLOCK" ); -} diff --git a/c/src/tests/sptests/sp09/screen03.c b/c/src/tests/sptests/sp09/screen03.c deleted file mode 100644 index 7f431c45df..0000000000 --- a/c/src/tests/sptests/sp09/screen03.c +++ /dev/null @@ -1,204 +0,0 @@ -/* Screen3 - * - * This routine generates error screen 3 for test 9. - * - * Input parameters: NONE - * - * 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" - -extern rtems_configuration_table BSP_Configuration; - -void Screen3() -{ - rtems_name task_name; - rtems_status_code status; - - task_name = 1; - status = rtems_task_create( - 0, - 1, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Junk_id - ); - fatal_directive_status( - status, - RTEMS_INVALID_NAME, - "rtems_task_create with illegal name" - ); - puts( "TA1 - rtems_task_create - RTEMS_INVALID_NAME" ); - - status = rtems_task_create( - task_name, - 1, - BSP_Configuration.work_space_size, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Junk_id - ); - fatal_directive_status( - status, - RTEMS_UNSATISFIED, - "rtems_task_create with a stack size larger than the workspace" - ); - puts( "TA1 - rtems_task_create - stack size - RTEMS_UNSATISFIED" ); - - status = rtems_task_create( - Task_name[ 2 ], - 4, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 2 ] - ); - directive_failed( status, "rtems_task_create of TA2" ); - puts( "TA1 - rtems_task_create - TA2 created - RTEMS_SUCCESSFUL" ); - - status = rtems_task_suspend( Task_id[ 2 ] ); - directive_failed( status, "rtems_task_suspend of TA2" ); - puts( "TA1 - rtems_task_suspend - suspend TA2 - RTEMS_SUCCESSFUL" ); - - status = rtems_task_suspend( Task_id[ 2 ] ); - fatal_directive_status( - status, - RTEMS_ALREADY_SUSPENDED, - "rtems_task_suspend of suspended TA2" - ); - puts( "TA1 - rtems_task_suspend - suspend TA2 - RTEMS_ALREADY_SUSPENDED" ); - - status = rtems_task_resume( Task_id[ 2 ] ); - directive_failed( status, "rtems_task_resume of TA2" ); - puts( "TA1 - rtems_task_resume - TA2 resumed - RTEMS_SUCCESSFUL" ); - - status = rtems_task_create( - Task_name[ 3 ], - 4, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 3 ] - ); - directive_failed( status, "rtems_task_create of TA3" ); - puts( "TA1 - rtems_task_create - TA3 created - RTEMS_SUCCESSFUL" ); - - status = rtems_task_create( - Task_name[ 4 ], - 4, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 4 ] - ); - directive_failed( status, "rtems_task_create of TA4" ); - puts( "TA1 - rtems_task_create - 4 created - RTEMS_SUCCESSFUL" ); - - status = rtems_task_create( - Task_name[ 5 ], - 4, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 5 ] - ); - directive_failed( status, "rtems_task_create of TA5" ); - puts( "TA1 - rtems_task_create - 5 created - RTEMS_SUCCESSFUL" ); - - status = rtems_task_create( - Task_name[ 6 ], - 4, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 6 ] - ); - directive_failed( status, "rtems_task_create of TA6" ); - puts( "TA1 - rtems_task_create - 6 created - RTEMS_SUCCESSFUL" ); - - status = rtems_task_create( - Task_name[ 7 ], - 4, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 7 ] - ); - directive_failed( status, "rtems_task_create of TA7" ); - puts( "TA1 - rtems_task_create - 7 created - RTEMS_SUCCESSFUL" ); - - status = rtems_task_create( - Task_name[ 8 ], - 4, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 8 ] - ); - directive_failed( status, "rtems_task_create of TA8" ); - puts( "TA1 - rtems_task_create - 8 created - RTEMS_SUCCESSFUL" ); - - status = rtems_task_create( - Task_name[ 9 ], - 4, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 9 ] - ); - directive_failed( status, "rtems_task_create of TA9" ); - puts( "TA1 - rtems_task_create - 9 created - RTEMS_SUCCESSFUL" ); - - status = rtems_task_create( - Task_name[ 10 ], - 4, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 10 ] - ); - directive_failed( status, "rtems_task_create of TA10" ); - puts( "TA1 - rtems_task_create - 10 created - RTEMS_SUCCESSFUL" ); - - status = rtems_task_create( - task_name, - 4, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Junk_id - ); - fatal_directive_status( - status, - RTEMS_TOO_MANY, - "rtems_task_create for too many tasks" - ); - puts( "TA1 - rtems_task_create - 11 - RTEMS_TOO_MANY" ); - - status = rtems_task_create( - task_name, - 4, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_GLOBAL, - &Junk_id - ); - fatal_directive_status( - status, - RTEMS_MP_NOT_CONFIGURED, - "rtems_task_create of global task in a single cpu system" - ); - puts( "TA1 - rtems_task_create - RTEMS_MP_NOT_CONFIGURED" ); -} diff --git a/c/src/tests/sptests/sp09/screen04.c b/c/src/tests/sptests/sp09/screen04.c deleted file mode 100644 index 6e3866cb05..0000000000 --- a/c/src/tests/sptests/sp09/screen04.c +++ /dev/null @@ -1,85 +0,0 @@ -/* Screen4 - * - * This routine generates error screen 4 for test 9. - * - * Input parameters: NONE - * - * 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" - -void Screen4() -{ - rtems_event_set event_out; - rtems_time_of_day time; - rtems_status_code status; - - status = rtems_event_receive( - RTEMS_EVENT_16, - RTEMS_NO_WAIT, - RTEMS_NO_TIMEOUT, - &event_out - ); - fatal_directive_status( - status, - RTEMS_UNSATISFIED, - "rtems_event_receive unsatisfied (ALL)" - ); - puts( "TA1 - rtems_event_receive - RTEMS_UNSATISFIED ( all conditions )" ); - - status = rtems_event_receive( - RTEMS_EVENT_16, - RTEMS_EVENT_ANY | RTEMS_NO_WAIT, - RTEMS_NO_TIMEOUT, - &event_out - ); - fatal_directive_status( - status, - RTEMS_UNSATISFIED, - "rtems_event_receive unsatisfied (ANY)" - ); - puts( "TA1 - rtems_event_receive - RTEMS_UNSATISFIED ( any condition )" ); - - puts( "TA1 - rtems_event_receive - timeout in 3 seconds" ); - status = rtems_event_receive( - RTEMS_EVENT_16, - RTEMS_DEFAULT_OPTIONS, - 3 * TICKS_PER_SECOND, - &event_out - ); - fatal_directive_status( - status, - RTEMS_TIMEOUT, - "rtems_event_receive" - ); - puts( "TA1 - rtems_event_receive - woke up with RTEMS_TIMEOUT" ); - - status = rtems_event_send( 100, RTEMS_EVENT_16 ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_event_send with illegal id" - ); - puts( "TA1 - rtems_event_send - RTEMS_INVALID_ID" ); - - puts( "TA1 - rtems_task_wake_after - sleep 1 second - RTEMS_SUCCESSFUL" ); - status = rtems_task_wake_after( TICKS_PER_SECOND ); - directive_failed( status, "rtems_task_wake_after" ); - - build_time( &time, 2, 5, 1988, 8, 30, 45, 0 ); - print_time( "TA1 - rtems_clock_set - ", &time, "" ); - status = rtems_clock_set( &time ); - directive_failed( status, "rtems_clock_set" ); - puts( " - RTEMS_SUCCESSFUL" ); -} diff --git a/c/src/tests/sptests/sp09/screen05.c b/c/src/tests/sptests/sp09/screen05.c deleted file mode 100644 index 9b091a407a..0000000000 --- a/c/src/tests/sptests/sp09/screen05.c +++ /dev/null @@ -1,148 +0,0 @@ -/* Screen5 - * - * This routine generates error screen 5 for test 9. - * - * Input parameters: NONE - * - * 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" - -void Screen5() -{ - rtems_status_code status; - - status = rtems_semaphore_create( 0, 1, RTEMS_DEFAULT_ATTRIBUTES, &Junk_id ); - fatal_directive_status( - status, - RTEMS_INVALID_NAME, - "rtems_semaphore_create with illegal name" - ); - puts( "TA1 - rtems_semaphore_create - RTEMS_INVALID_NAME" ); - - status = rtems_semaphore_create( - Semaphore_name[ 1 ], - 1, - RTEMS_DEFAULT_ATTRIBUTES, - &Semaphore_id[ 1 ] - ); - directive_failed( status, "rtems_semaphore_create" ); - puts( "TA1 - rtems_semaphore_create - 1 - RTEMS_SUCCESSFUL" ); - - status = rtems_semaphore_create( - Semaphore_name[ 2 ], - 1, - RTEMS_BINARY_SEMAPHORE, - &Semaphore_id[ 2 ] - ); - directive_failed( status, "rtems_semaphore_create" ); - puts( "TA1 - rtems_semaphore_create - 2 - RTEMS_SUCCESSFUL" ); - - status = rtems_semaphore_create( - Semaphore_name[ 3 ], - 1, - RTEMS_DEFAULT_ATTRIBUTES, - &Junk_id - ); - fatal_directive_status( - status, - RTEMS_TOO_MANY, - "rtems_semaphore_create of too many" - ); - puts( "TA1 - rtems_semaphore_create - 3 - RTEMS_TOO_MANY" ); - - status = rtems_semaphore_create( - Semaphore_name[ 1 ], - 1, - RTEMS_INHERIT_PRIORITY | RTEMS_BINARY_SEMAPHORE | RTEMS_FIFO, - &Junk_id - ); - fatal_directive_status( - status, - RTEMS_NOT_DEFINED, - "rtems_semaphore_create of RTEMS_FIFO RTEMS_INHERIT_PRIORITY" - ); - puts( "TA1 - rtems_semaphore_create - RTEMS_NOT_DEFINED" ); - - status = rtems_semaphore_create( - Semaphore_name[ 1 ], - 1, - RTEMS_INHERIT_PRIORITY | RTEMS_COUNTING_SEMAPHORE | RTEMS_PRIORITY, - &Junk_id - ); - fatal_directive_status( - status, - RTEMS_NOT_DEFINED, - "rtems_semaphore_create of RTEMS_COUNTING_SEMAPHORE RTEMS_INHERIT_PRIORITY" - ); - puts( "TA1 - rtems_semaphore_create - RTEMS_NOT_DEFINED" ); - - status = rtems_semaphore_create( - Semaphore_name[ 1 ], - 2, - RTEMS_BINARY_SEMAPHORE, - &Junk_id - ); - fatal_directive_status( - status, - RTEMS_INVALID_NUMBER, - "rtems_semaphore_create of binary semaphore with count > 1" - ); - puts( "TA1 - rtems_semaphore_create - RTEMS_INVALID_NUMBER" ); - - status = rtems_semaphore_create( - Semaphore_name[ 3 ], - 1, - RTEMS_GLOBAL, - &Junk_id - ); - fatal_directive_status( - status, - RTEMS_MP_NOT_CONFIGURED, - "rtems_semaphore_create of mp not configured" - ); - puts( "TA1 - rtems_semaphore_create - RTEMS_MP_NOT_CONFIGURED" ); - - status = rtems_semaphore_delete( 100 ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_semaphore_delete with illegal id" - ); - puts( "TA1 - rtems_semaphore_delete - unknown RTEMS_INVALID_ID" ); - - status = rtems_semaphore_delete( 0x010100 ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_semaphore_delete with local illegal id" - ); - puts( "TA1 - rtems_semaphore_delete - local RTEMS_INVALID_ID" ); - - status = rtems_semaphore_ident( 100, RTEMS_SEARCH_ALL_NODES, &Junk_id ); - fatal_directive_status( - status, - RTEMS_INVALID_NAME, - "rtems_semaphore_ident will illegal name (local)" - ); - puts( "TA1 - rtems_semaphore_ident - global RTEMS_INVALID_NAME" ); - - status = rtems_semaphore_ident( 100, 1, &Junk_id ); - fatal_directive_status( - status, - RTEMS_INVALID_NAME, - "rtems_semaphore_ident will illegal name (global)" - ); - puts( "TA1 - rtems_semaphore_ident - local RTEMS_INVALID_NAME" ); -} diff --git a/c/src/tests/sptests/sp09/screen06.c b/c/src/tests/sptests/sp09/screen06.c deleted file mode 100644 index 40ad75d606..0000000000 --- a/c/src/tests/sptests/sp09/screen06.c +++ /dev/null @@ -1,125 +0,0 @@ -/* Screen6 - * - * This routine generates error screen 6 for test 9. - * - * Input parameters: NONE - * - * 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" - -void Screen6() -{ - rtems_status_code status; - - status = rtems_semaphore_obtain( - 100, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT - ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_semaphore_obtain with illegal id" - ); - puts( "TA1 - rtems_semaphore_obtain - RTEMS_INVALID_ID" ); - - status = rtems_semaphore_obtain( - Semaphore_id[ 1 ], - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT - ); - directive_failed( status, "rtems_semaphore_obtain successful" ); - puts( "TA1 - rtems_semaphore_obtain - got sem 1 - RTEMS_SUCCESSFUL" ); - - status = rtems_semaphore_obtain( - Semaphore_id[ 1 ], - RTEMS_NO_WAIT, - RTEMS_NO_TIMEOUT - ); - fatal_directive_status( - status, - RTEMS_UNSATISFIED, - "rtems_semaphore_obtain not available" - ); - puts( "TA1 - rtems_semaphore_obtain - RTEMS_UNSATISFIED" ); - - puts( "TA1 - rtems_semaphore_obtain - timeout in 3 seconds" ); - status = rtems_semaphore_obtain( - Semaphore_id[ 1 ], - RTEMS_DEFAULT_OPTIONS, - 3 * TICKS_PER_SECOND - ); - fatal_directive_status( - status, - RTEMS_TIMEOUT, - "rtems_semaphore_obtain timeout" - ); - puts( "TA1 - rtems_semaphore_obtain - woke up with RTEMS_TIMEOUT" ); - - status = rtems_semaphore_release( Semaphore_id[ 2 ] ); - fatal_directive_status( - status, - RTEMS_NOT_OWNER_OF_RESOURCE, - "rtems_semaphore_release and not owner" - ); - puts( "TA1 - rtems_semaphore_release - RTEMS_NOT_OWNER_OF_RESOURCE" ); - - status = rtems_semaphore_release( 100 ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_semaphore_release with illegal id" - ); - puts( "TA1 - rtems_semaphore_release - RTEMS_INVALID_ID" ); - - puts( "TA1 - rtems_task_start - start TA2 - RTEMS_SUCCESSFUL" ); - status = rtems_task_start( Task_id[ 2 ], Task_2, 0 ); - directive_failed( status, "rtems_task_start of TA2" ); - - puts( "TA1 - rtems_task_wake_after - yield processor - RTEMS_SUCCESSFUL" ); - status = rtems_task_wake_after( RTEMS_YIELD_PROCESSOR ); - directive_failed( status, "rtems_task_wake_after (yield)" ); - - puts( "TA1 - rtems_semaphore_delete - delete sem 1 - RTEMS_SUCCESSFUL" ); - status = rtems_semaphore_delete( Semaphore_id[ 1 ] ); - directive_failed( status, "rtems_semaphore_delete of SM1" ); - - puts( "TA1 - rtems_semaphore_obtain - binary semaphore" ); - status = rtems_semaphore_obtain( - Semaphore_id[ 2 ], - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT - ); - directive_failed( status, "rtems_semaphore_obtain"); - - puts( "TA1 - rtems_semaphore_delete - delete sem 2 - RTEMS_RESOURCE_IN_USE" ); - status = rtems_semaphore_delete( Semaphore_id[ 2 ] ); - fatal_directive_status( - status, - RTEMS_RESOURCE_IN_USE, - "rtems_semaphore_delete of SM2" - ); - - puts( "TA1 - rtems_task_wake_after - yield processor - RTEMS_SUCCESSFUL" ); - status = rtems_task_wake_after( RTEMS_YIELD_PROCESSOR ); - directive_failed( status, "rtems_task_wake_after (yield)" ); - - status = rtems_task_delete( Task_id[ 2 ] ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_task_delete after the task has been deleted" - ); -} diff --git a/c/src/tests/sptests/sp09/screen07.c b/c/src/tests/sptests/sp09/screen07.c deleted file mode 100644 index fd808f833d..0000000000 --- a/c/src/tests/sptests/sp09/screen07.c +++ /dev/null @@ -1,184 +0,0 @@ -/* Screen7 - * - * This routine generates error screen 7 for test 9. - * - * Input parameters: NONE - * - * 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" - -void Screen7() -{ - long buffer[ 4 ]; - rtems_unsigned32 count; - rtems_status_code status; - - status = rtems_message_queue_broadcast( 100, (long (*)[4]) buffer, &count ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_message_queue_broadcast with illegal id" - ); - puts( "TA1 - rtems_message_queue_broadcast - RTEMS_INVALID_ID" ); - - status = rtems_message_queue_create( - 0, - 3, - RTEMS_DEFAULT_ATTRIBUTES, - &Junk_id - ); - fatal_directive_status( - status, - RTEMS_INVALID_NAME, - "rtems_message_queue_create with illegal name" - ); - - puts( "TA1 - rtems_message_queue_create - Q 1 - RTEMS_INVALID_NAME" ); - status = rtems_message_queue_create( - Queue_name[ 1 ], - 1, - RTEMS_GLOBAL, - &Junk_id - ); - fatal_directive_status( - status, - RTEMS_MP_NOT_CONFIGURED, - "rtems_message_queue_create of mp not configured" - ); - puts( "TA1 - rtems_message_queue_create - Q 1 - RTEMS_MP_NOT_CONFIGURED" ); - - status = rtems_message_queue_create( - Queue_name[ 1 ], - 2, - RTEMS_LIMIT, - &Queue_id[ 1 ] - ); - directive_failed( status, "rtems_message_queue_create successful" ); - puts( - "TA1 - rtems_message_queue_create - Q 1 - RTEMS_LIMIT - RTEMS_SUCCESSFUL" - ); - - status = rtems_message_queue_create( - Queue_name[ 2 ], - 1, - RTEMS_DEFAULT_ATTRIBUTES, - &Junk_id - ); - fatal_directive_status( - status, - RTEMS_TOO_MANY, - "rtems_message_queue_create of too many" - ); - puts( "TA1 - rtems_message_queue_create - Q 2 - RTEMS_TOO_MANY" ); - - status = rtems_message_queue_delete( 100 ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_message_queue_create with illegal id" - ); - puts( "TA1 - rtems_message_queue_delete - unknown RTEMS_INVALID_ID" ); - - status = rtems_message_queue_delete( 0x10100 ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_message_queue_delete with local illegal id" - ); - puts( "TA1 - rtems_message_queue_delete - local RTEMS_INVALID_ID" ); - - status = rtems_message_queue_ident( 100, RTEMS_SEARCH_ALL_NODES, &Junk_id ); - fatal_directive_status( - status, - RTEMS_INVALID_NAME, - "rtems_message_queue_ident with illegal name" - ); - puts( "TA1 - rtems_message_queue_ident - RTEMS_INVALID_NAME" ); - - status = rtems_message_queue_flush( 100, &count ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_message_queue_flush with illegal id" - ); - puts( "TA1 - rtems_message_queue_flush - RTEMS_INVALID_ID" ); - - status = rtems_message_queue_receive( - 100, - (long (*)[4]) buffer, - RTEMS_DEFAULT_OPTIONS, - 0 - ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_message_queue_receive wit illegal id" - ); - puts( "TA1 - rtems_message_queue_receive - RTEMS_INVALID_ID" ); - - status = rtems_message_queue_receive( - Queue_id[ 1 ], - (long (*)[4]) buffer, - RTEMS_NO_WAIT, - RTEMS_NO_TIMEOUT - ); - fatal_directive_status( - status, - RTEMS_UNSATISFIED, - "rtems_message_queue_receive unsatisfied" - ); - puts( "TA1 - rtems_message_queue_receive - Q 1 - RTEMS_UNSATISFIED" ); - - puts( "TA1 - rtems_message_queue_receive - Q 1 - timeout in 3 seconds" ); - status = rtems_message_queue_receive( - Queue_id[ 1 ], - (long (*)[4]) buffer, - RTEMS_DEFAULT_OPTIONS, - 3 * TICKS_PER_SECOND - ); - fatal_directive_status( - status, - RTEMS_TIMEOUT, - "rtems_message_queue_receive 3 second timeout" - ); - - puts( - "TA1 - rtems_message_queue_receive - Q 1 - woke up with RTEMS_TIMEOUT" - ); - - status = rtems_message_queue_send( 100, (long (*)[4]) buffer ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_message_queue_send with illegal id" - ); - puts( "TA1 - rtems_message_queue_send - RTEMS_INVALID_ID" ); - - status = rtems_message_queue_send( Queue_id[ 1 ], (long (*)[4]) buffer ); - directive_failed( status, "rtems_message_queue_send" ); - puts( "TA1 - rtems_message_queue_send - BUFFER 1 TO Q 1 - RTEMS_SUCCESSFUL" ); - - status = rtems_message_queue_send( Queue_id[ 1 ], (long (*)[4]) buffer ); - directive_failed( status, "rtems_message_queue_send" ); - puts( "TA1 - rtems_message_queue_send - BUFFER 2 TO Q 1 - RTEMS_SUCCESSFUL" ); - - status = rtems_message_queue_send( Queue_id[ 1 ], (long (*)[4]) buffer ); - fatal_directive_status( - status, - RTEMS_TOO_MANY, - "rtems_message_queue_send too many to a limited queue" - ); - puts( "TA1 - rtems_message_queue_send - BUFFER 3 TO Q 1 - RTEMS_TOO_MANY" ); -} diff --git a/c/src/tests/sptests/sp09/screen08.c b/c/src/tests/sptests/sp09/screen08.c deleted file mode 100644 index 18c9b8d2d8..0000000000 --- a/c/src/tests/sptests/sp09/screen08.c +++ /dev/null @@ -1,121 +0,0 @@ -/* Screen8 - * - * This routine generates error screen 8 for test 9. - * - * Input parameters: NONE - * - * 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" - -void Screen8() -{ - long buffer[ 4 ]; - rtems_status_code status; - - status = rtems_message_queue_delete( Queue_id[ 1 ] ); - directive_failed( status, "rtems_message_queue_delete successful" ); - puts( "TA1 - rtems_message_queue_delete - Q 1 - RTEMS_SUCCESSFUL" ); - - status = rtems_message_queue_create( - Queue_name[ 1 ], - 2, - RTEMS_LIMIT, - &Queue_id[ 1 ] - ); - directive_failed( status, "rtems_message_queue_create successful" ); - puts( - "TA1 - rtems_message_queue_create - Q 1 - RTEMS_LIMIT - RTEMS_SUCCESSFUL" - ); - - status = rtems_message_queue_send( Queue_id[ 1 ], (long (*)[4])buffer ); - directive_failed( status, "rtems_message_queue_send successful" ); - puts( "TA1 - rtems_message_queue_send - BUFFER 1 TO Q 1 - RTEMS_SUCCESSFUL" ); - - status = rtems_message_queue_send( Queue_id[ 1 ], (long (*)[4])buffer ); - directive_failed( status, "rtems_message_queue_send successful" ); - puts( "TA1 - rtems_message_queue_send - BUFFER 2 TO Q 1 - RTEMS_SUCCESSFUL" ); - - status = rtems_message_queue_send( Queue_id[ 1 ], (long (*)[4])buffer ); - fatal_directive_status( - status, - RTEMS_TOO_MANY, - "rtems_message_queue_send too many to limited queue" - ); - puts( "TA1 - rtems_message_queue_send - BUFFER 3 TO Q 1 - RTEMS_TOO_MANY" ); - - status = rtems_message_queue_delete( Queue_id[ 1 ] ); - directive_failed( status, "rtems_message_queue_delete successful" ); - puts( "TA1 - rtems_message_queue_delete - Q 1 - RTEMS_SUCCESSFUL" ); - - status = rtems_message_queue_create( - Queue_name[ 1 ], - 3, - RTEMS_LIMIT, - &Queue_id[ 1 ] - ); - directive_failed( status, "rtems_message_queue_create successful" ); - puts( - "TA1 - rtems_message_queue_create - Q 1 - RTEMS_LIMIT - RTEMS_SUCCESSFUL" - ); - - status = rtems_message_queue_send( Queue_id[ 1 ], (long (*)[4])buffer ); - directive_failed( status, "rtems_message_queue_send successful" ); - puts( "TA1 - rtems_message_queue_send - BUFFER 1 TO Q 1 - RTEMS_SUCCESSFUL" ); - - status = rtems_message_queue_send( Queue_id[ 1 ], (long (*)[4])buffer ); - directive_failed( status, "rtems_message_queue_send successful" ); - puts( "TA1 - rtems_message_queue_send - BUFFER 2 TO Q 1 - RTEMS_SUCCESSFUL" ); - - status = rtems_message_queue_send( Queue_id[ 1 ], (long (*)[4])buffer ); - fatal_directive_status( - status, - RTEMS_UNSATISFIED, - "rtems_message_queue_send too many to limited queue" - ); - puts( - "TA1 - rtems_message_queue_send - BUFFER 3 TO Q 1 - RTEMS_UNSATISFIED" - ); - - status = rtems_message_queue_delete( Queue_id[ 1 ] ); - directive_failed( status, "rtems_message_queue_delete successful" ); - puts( "TA1 - rtems_message_queue_delete - Q 1 - RTEMS_SUCCESSFUL" ); - - status = rtems_message_queue_create( - Queue_name[ 1 ], - 3, - RTEMS_LIMIT, - &Queue_id[ 1 ] - ); - directive_failed( status, "rtems_message_queue_create successful" ); - puts( - "TA1 - rtems_message_queue_create - Q 1 - RTEMS_LIMIT - RTEMS_SUCCESSFUL" - ); - - puts( "TA1 - rtems_task_start - start TA3 - RTEMS_SUCCESSFUL" ); - status = rtems_task_start( Task_id[ 3 ], Task_3, 0 ); - directive_failed( status, "rtems_task_start of TA3" ); - - puts( "TA1 - rtems_task_wake_after - yield processor - RTEMS_SUCCESSFUL" ); - status = rtems_task_wake_after( RTEMS_YIELD_PROCESSOR ); - directive_failed( status, "rtems_task_wake_after (yield)" ); - - puts( "TA1 - rtems_message_queue_delete - delete Q 1 - RTEMS_SUCCESSFUL" ); - status = rtems_message_queue_delete( Queue_id[ 1 ] ); - directive_failed( status, "rtems_message_queue_delete successful" ); - - puts( "TA1 - rtems_task_wake_after - yield processor - RTEMS_SUCCESSFUL" ); - status = rtems_task_wake_after( RTEMS_YIELD_PROCESSOR ); - directive_failed( status, "rtems_task_wake_after (yield)" ); -} diff --git a/c/src/tests/sptests/sp09/screen09.c b/c/src/tests/sptests/sp09/screen09.c deleted file mode 100644 index 5c6eece679..0000000000 --- a/c/src/tests/sptests/sp09/screen09.c +++ /dev/null @@ -1,140 +0,0 @@ -/* Screen9 - * - * This routine generates error screen 9 for test 9. - * - * Input parameters: NONE - * - * 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" - -void Screen9() -{ - void *converted; - rtems_status_code status; - rtems_isr_entry old_service_routine; - - status = rtems_interrupt_catch( Service_routine, 500, &old_service_routine ); - fatal_directive_status( - status, - RTEMS_INVALID_NUMBER, - "rtems_interrupt_catch with invalid vector" - ); - puts( "TA1 - rtems_interrupt_catch - RTEMS_INVALID_NUMBER" ); - - status = rtems_interrupt_catch( NULL, 3, &old_service_routine ); - fatal_directive_status( - status, - RTEMS_INVALID_ADDRESS, - "rtems_interrupt_catch with invalid handler" - ); - puts( "TA1 - rtems_interrupt_catch - RTEMS_INVALID_ADDRESS" ); - - status = rtems_signal_send( 100, RTEMS_SIGNAL_1 ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_signal_send with illegal id" - ); - puts( "TA1 - rtems_signal_send - RTEMS_INVALID_ID" ); - - status = rtems_signal_send( RTEMS_SELF, RTEMS_SIGNAL_16 ); - fatal_directive_status( - status, - RTEMS_NOT_DEFINED, - "rtems_signal_send with no handler" - ); - puts( "TA1 - rtems_signal_send - RTEMS_NOT_DEFINED" ); - - status = rtems_port_create( - 0, - Internal_port_area, - External_port_area, - sizeof( Internal_port_area ), - &Junk_id - ); - fatal_directive_status( - status, - RTEMS_INVALID_NAME, - "rtems_port_create with illegal name" - ); - puts( "TA1 - rtems_port_create - RTEMS_INVALID_NAME" ); - - status = rtems_port_create( - Port_name[ 1 ], - &((char *)Internal_port_area)[ 1 ], - External_port_area, - sizeof( Internal_port_area ), - &Junk_id - ); - fatal_directive_status( - status, - RTEMS_INVALID_ADDRESS, - "rtems_port_create with illegal address" - ); - puts( "TA1 - rtems_port_create - RTEMS_INVALID_ADDRESS" ); - - status = rtems_port_create( - Port_name[ 1 ], - Internal_port_area, - External_port_area, - sizeof( Internal_port_area ), - &Junk_id - ); - fatal_directive_status( - status, - RTEMS_TOO_MANY, - "rtems_port_create of too many" - ); - puts( "TA1 - rtems_port_create - RTEMS_TOO_MANY" ); - - status = rtems_port_delete( 0 ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_port_delete with illegal id" - ); - puts( "TA1 - rtems_port_delete - RTEMS_INVALID_ID" ); - - status = rtems_port_ident( 0, &Junk_id ); - fatal_directive_status( - status, - RTEMS_INVALID_NAME, - "rtems_port_ident with illegal name" - ); - puts( "TA1 - rtems_port_ident - RTEMS_INVALID_NAME" ); - - status = rtems_port_external_to_internal( - 100, - Internal_port_area, - &converted - ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_port_external_to_internal with illegal id" - ); - puts( "TA1 - rtems_port_external_to_internal - RTEMS_INVALID_ID" ); - status = rtems_port_internal_to_external( - 100, - Internal_port_area, - &converted - ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_port_internal_to_external with illegal id" - ); - puts( "TA1 - rtems_port_internal_to_external - RTEMS_INVALID_ID" ); -} diff --git a/c/src/tests/sptests/sp09/screen10.c b/c/src/tests/sptests/sp09/screen10.c deleted file mode 100644 index 53a5a8d6dc..0000000000 --- a/c/src/tests/sptests/sp09/screen10.c +++ /dev/null @@ -1,164 +0,0 @@ -/* Screen10 - * - * This routine generates error screen 10 for test 9. - * - * Input parameters: NONE - * - * 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" - -void Screen10() -{ - rtems_status_code status; - - status = rtems_rate_monotonic_create( 0, &Junk_id ); - fatal_directive_status( - status, - RTEMS_INVALID_NAME, - "rtems_rate_monotonic_create with illegal name" - ); - puts( "TA1 - rtems_rate_monotonic_create - RTEMS_INVALID_NAME" ); - - status = rtems_rate_monotonic_create( Period_name[ 1 ], &Period_id[ 1 ] ); - directive_failed( status, "rtems_rate_monotonic_create successful" ); - puts( "TA1 - rtems_rate_monotonic_create - RTEMS_SUCCESSFUL" ); - - status = rtems_rate_monotonic_create( Period_name[ 1 ], &Junk_id ); - fatal_directive_status( - status, - RTEMS_TOO_MANY, - "rtems_rate_monotonic_create of too many" - ); - puts( "TA1 - rtems_rate_monotonic_create - RTEMS_TOO_MANY" ); - - status = rtems_rate_monotonic_ident( 0, &Junk_id ); - fatal_directive_status( - status, - RTEMS_INVALID_NAME, - "rtems_rate_monotonic_ident with illegal name" - ); - puts( "TA1 - rtems_rate_monotonic_ident - RTEMS_INVALID_NAME" ); - - status = rtems_rate_monotonic_period( 100, 5 ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_rate_monotonic_period with illegal id" - ); - puts( "TA1 - rtems_rate_monotonic_period - unknown RTEMS_INVALID_ID" ); - - status = rtems_rate_monotonic_period( 0x10100, 5 ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_rate_monotonic_period with illegal id" - ); - puts( "TA1 - rtems_rate_monotonic_period - local RTEMS_INVALID_ID" ); - - status = rtems_rate_monotonic_period( Period_id[ 1 ], RTEMS_PERIOD_STATUS ); - fatal_directive_status( - status, - RTEMS_NOT_DEFINED, - "rtems_rate_monotonic_period status not defined" - ); - puts( - "TA1 - rtems_rate_monotonic_period(RTEMS_PERIOD_STATUS) - RTEMS_NOT_DEFINED" - ); - - status = rtems_rate_monotonic_period( Period_id[ 1 ], 100 ); - directive_failed( status, "rtems_rate_monotonic_period successful" ); - puts( "TA1 - rtems_rate_monotonic_period - 100 ticks - RTEMS_SUCCESSFUL" ); - - status = rtems_rate_monotonic_period( Period_id[ 1 ], RTEMS_PERIOD_STATUS ); - directive_failed( status, "rtems_rate_monotonic_period status" ); - puts( - "TA1 - rtems_rate_monotonic_period(RTEMS_PERIOD_STATUS) - RTEMS_SUCCESSFUL" - ); - - while ( FOREVER ) { - - status = rtems_rate_monotonic_period(Period_id[ 1 ], RTEMS_PERIOD_STATUS); - - if ( status == RTEMS_TIMEOUT ) break; - - directive_failed( - status, - "rtems_rate_monotonic_period waiting for timeout" - ); - } - puts( - "TA1 - rtems_rate_monotonic_period(RTEMS_PERIOD_STATUS) - RTEMS_TIMEOUT" - ); - - status = rtems_rate_monotonic_cancel( 100 ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_rate_monotonic_cancel with illegal id" - ); - puts( "TA1 - rtems_rate_monotonic_cancel - unknown RTEMS_INVALID_ID" ); - - status = rtems_rate_monotonic_cancel( 0x10100 ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_rate_monotonic_cancel will illegal id" - ); - puts( "TA1 - rtems_rate_monotonic_cancel - local RTEMS_INVALID_ID" ); - - status = rtems_rate_monotonic_cancel( Period_id[ 1 ] ); - directive_failed( status, "rtems_rate_monotonic_cancel" ); - puts( "TA1 - rtems_rate_monotonic_cancel - RTEMS_SUCCESSFUL" ); - - status = rtems_rate_monotonic_period( Period_id[ 1 ], 5 ); - directive_failed( status, "rtems_rate_monotonic_period restart" ); - - status = rtems_task_wake_after( 1 * TICKS_PER_SECOND ); - directive_failed( status, "rtems_task_wake_after" ); - - status = rtems_rate_monotonic_period( Period_id[ 1 ], 5 ); - fatal_directive_status( - status, - RTEMS_TIMEOUT, - "rtems_rate_monotonic_period" - ); - puts( "TA1 - rtems_rate_monotonic_period - 5 ticks - RTEMS_TIMEOUT" ); - - status = rtems_task_start( Task_id[ 4 ], Task_4, 0 ); - directive_failed( status, "rtems_task_start of TA4" ); - - puts( "TA1 - yielding to TA4" ); - status = rtems_task_wake_after( RTEMS_YIELD_PROCESSOR ); - - status = rtems_rate_monotonic_delete( 100 ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_rate_monotonic_delete with illegal id" - ); - puts( "TA1 - rtems_rate_monotonic_delete - unknown RTEMS_INVALID_ID" ); - - status = rtems_rate_monotonic_delete( 0x10100 ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_rate_monotonic_delete with illegal id" - ); - puts( "TA1 - rtems_rate_monotonic_delete - local RTEMS_INVALID_ID" ); - - status = rtems_rate_monotonic_delete( Period_id[ 1 ] ); - directive_failed( status, "rtems_rate_monotonic_delete" ); - puts( "TA1 - rtems_rate_monotonic_delete - RTEMS_SUCCESSFUL" ); -} diff --git a/c/src/tests/sptests/sp09/screen11.c b/c/src/tests/sptests/sp09/screen11.c deleted file mode 100644 index 8c13cd2490..0000000000 --- a/c/src/tests/sptests/sp09/screen11.c +++ /dev/null @@ -1,250 +0,0 @@ -/* Screen11 - * - * This routine generates error screen 11 for test 9. - * - * Input parameters: NONE - * - * 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" - -void Screen11() -{ - void *buffer_address_1; - void *buffer_address_2; - void *buffer_address_3; - rtems_status_code status; - - status = rtems_partition_create( - 0, - Partition_good_area, - 128, - 40, - RTEMS_DEFAULT_ATTRIBUTES, - &Junk_id - ); - fatal_directive_status( - status, - RTEMS_INVALID_NAME, - "rtems_partition_create with illegal name" - ); - puts( "TA1 - rtems_partition_create - RTEMS_INVALID_NAME" ); - - status = rtems_partition_create( - Partition_name[ 1 ], - Partition_good_area, - 0, - 80, - RTEMS_DEFAULT_ATTRIBUTES, - &Junk_id - ); - fatal_directive_status( - status, - RTEMS_INVALID_SIZE, - "rtems_partition_create with illegal length" - ); - puts( "TA1 - rtems_partition_create - length - RTEMS_INVALID_SIZE" ); - - status = rtems_partition_create( - Partition_name[ 1 ], - Partition_good_area, - 128, - 0, - RTEMS_DEFAULT_ATTRIBUTES, - &Junk_id - ); - fatal_directive_status( - status, - RTEMS_INVALID_SIZE, - "rtems_partition_create with illegal buffer size" - ); - puts( "TA1 - rtems_partition_create - buffer size - RTEMS_INVALID_SIZE" ); - - status = rtems_partition_create( - Partition_name[ 1 ], - Partition_good_area, - 128, - 256, - RTEMS_DEFAULT_ATTRIBUTES, - &Junk_id - ); - fatal_directive_status( - status, - RTEMS_INVALID_SIZE, - "rtems_partition_create with buffer_size > length" - ); - puts( - "TA1 - rtems_partition_create - length < buffer size - RTEMS_INVALID_SIZE" - ); - - status = rtems_partition_create( - Partition_name[ 1 ], - Partition_good_area, - 128, - 64, - RTEMS_GLOBAL, - &Junk_id - ); - fatal_directive_status( - status, - RTEMS_MP_NOT_CONFIGURED, - "rtems_partition_create of global" - ); - puts( "TA1 - rtems_partition_create - RTEMS_MP_NOT_CONFIGURED" ); - - status = rtems_partition_create( - Partition_name[ 1 ], - Partition_bad_area, - 128, - 64, - RTEMS_GLOBAL, - &Junk_id - ); - fatal_directive_status( - status, - RTEMS_INVALID_ADDRESS, - "rtems_partition_create with bad address" - ); - puts( "TA1 - rtems_partition_create - RTEMS_INVALID_ADDRESS" ); - - status = rtems_partition_create( - Partition_name[ 1 ], - Partition_good_area, - 128, - 34, - RTEMS_DEFAULT_ATTRIBUTES, - &Junk_id - ); - fatal_directive_status( - status, - RTEMS_INVALID_SIZE, - "rtems_partition_create with unaligned buffer_size" - ); - puts( "TA1 - rtems_partition_create - RTEMS_INVALID_SIZE" ); - - status = rtems_partition_delete( 100 ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_partition_delete with illegal id" - ); - puts( "TA1 - rtems_partition_delete - unknown RTEMS_INVALID_ID" ); - - status = rtems_partition_delete( 0x10100 ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_partition_delete with illegal id" - ); - puts( "TA1 - rtems_partition_delete - local RTEMS_INVALID_ID" ); - - status = rtems_partition_get_buffer( 100, &buffer_address_1 ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_partition_get_buffer with illegal id" - ); - puts( "TA1 - rtems_partition_get_buffer - RTEMS_INVALID_ID" ); - - status = rtems_partition_ident( 0, RTEMS_SEARCH_ALL_NODES, &Junk_id ); - fatal_directive_status( - status, - RTEMS_INVALID_NAME, - "rtems_partition_ident with illegal name" - ); - puts( "TA1 - rtems_partition_ident - RTEMS_INVALID_NAME" ); - - status = rtems_partition_return_buffer( 100, buffer_address_1 ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_partition_return_buffer with illegal id" - ); - puts( "TA1 - rtems_partition_return_buffer - RTEMS_INVALID_ID" ); - - status = rtems_partition_create( - Partition_name[ 1 ], - Partition_good_area, - 128, - 64, - RTEMS_DEFAULT_ATTRIBUTES, - &Partition_id[ 1 ] - ); - directive_failed( status, "rtems_partition_create" ); - puts( "TA1 - rtems_partition_create - RTEMS_SUCCESSFUL" ); - - status = rtems_partition_create( - Partition_name[ 1 ], - Partition_good_area, - 128, - 32, - RTEMS_DEFAULT_ATTRIBUTES, - &Junk_id - ); - fatal_directive_status( - status, - RTEMS_TOO_MANY, - "rtems_partition_create of too many" - ); - puts( "TA1 - rtems_partition_create - RTEMS_TOO_MANY" ); - - status = rtems_partition_get_buffer( Partition_id[ 1 ], &buffer_address_1 ); - directive_failed( status, "rtems_partition_get_buffer"); - puts( "TA1 - rtems_partition_get_buffer - RTEMS_SUCCESSFUL" ); - - status = rtems_partition_get_buffer( Partition_id[ 1 ], &buffer_address_2 ); - directive_failed( status, "rtems_partition_get_buffer" ); - puts( "TA1 - rtems_partition_get_buffer - RTEMS_SUCCESSFUL" ); - - status = rtems_partition_get_buffer( Partition_id[ 1 ], &buffer_address_3 ); - fatal_directive_status( - status, - RTEMS_UNSATISFIED, - "rtems_partition_get_buffer unsatisfied" - ); - puts( "TA1 - rtems_partition_get_buffer - RTEMS_UNSATISFIED" ); - - status = rtems_partition_delete( Partition_id[ 1 ] ); - fatal_directive_status( - status, - RTEMS_RESOURCE_IN_USE, - "rtems_partition_delete with buffers in use" - ); - puts( "TA1 - rtems_partition_delete - RTEMS_RESOURCE_IN_USE" ); - - status = rtems_partition_return_buffer( - Partition_id[ 1 ], - Region_good_area /* NOTE: Region Memory */ - ); - fatal_directive_status( - status, - RTEMS_INVALID_ADDRESS, - "rtems_partition_return_buffer with buffer address out of partition" - ); - puts( - "TA1 - rtems_partition_return_buffer - RTEMS_INVALID_ADDRESS - out of range" - ); - - status = rtems_partition_return_buffer( - Partition_id[ 1 ], - &Partition_good_area[ 7 ] - ); - fatal_directive_status( - status, - RTEMS_INVALID_ADDRESS, - "rtems_partition_return_buffer with buffer address not on boundary" - ); - puts_nocr( "TA1 - rtems_partition_return_buffer - " ); - puts ( "RTEMS_INVALID_ADDRESS - not on boundary"); -} diff --git a/c/src/tests/sptests/sp09/screen12.c b/c/src/tests/sptests/sp09/screen12.c deleted file mode 100644 index 300d54043a..0000000000 --- a/c/src/tests/sptests/sp09/screen12.c +++ /dev/null @@ -1,327 +0,0 @@ -/* Screen12 - * - * This routine generates error screen 12 for test 9. - * - * Input parameters: NONE - * - * 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" - -void Screen12() -{ - void *segment_address_1; - void *segment_address_2; - void *segment_address_3; - rtems_unsigned32 offset; - rtems_unsigned32 good_front_flag; - rtems_unsigned32 good_back_flag; - rtems_status_code status; - - status = rtems_region_create( - 0, - Region_good_area, - 128, - 32, - RTEMS_DEFAULT_ATTRIBUTES, - &Junk_id - ); - fatal_directive_status( - status, - RTEMS_INVALID_NAME, - "rtems_region_create with illegal name" - ); - puts( "TA1 - rtems_region_create - RTEMS_INVALID_NAME" ); - - status = rtems_region_create( - Region_name[ 1 ], - Region_bad_area, - 128, - 32, - RTEMS_DEFAULT_ATTRIBUTES, - &Junk_id - ); - fatal_directive_status( - status, - RTEMS_INVALID_ADDRESS, - "rtems_region_create with illegal address" - ); - puts( "TA1 - rtems_region_create - RTEMS_INVALID_ADDRESS" ); - - status = rtems_region_create( - Region_name[ 1 ], - Region_good_area, - 128, - 34, - RTEMS_DEFAULT_ATTRIBUTES, - &Junk_id - ); - fatal_directive_status( - status, - RTEMS_INVALID_SIZE, - "rtems_region_create with illegal size" - ); - puts( "TA1 - rtems_region_create - RTEMS_INVALID_SIZE" ); - - status = rtems_region_create( - Region_name[ 1 ], - &Region_good_area[ REGION_START_OFFSET ], - REGION_LENGTH, - 128, - RTEMS_DEFAULT_ATTRIBUTES, - &Region_id[ 1 ] - ); - directive_failed( status, "rtems_region_create" ); - puts( "TA1 - rtems_region_create - RTEMS_SUCCESSFUL" ); - - status = rtems_region_create( - Region_name[ 1 ], - Region_good_area, - 512, - 128, - RTEMS_DEFAULT_ATTRIBUTES, - &Junk_id - ); - fatal_directive_status( - status, - RTEMS_TOO_MANY, - "rtems_region_create of too many" - ); - puts( "TA1 - rtems_region_create - RTEMS_TOO_MANY" ); - - status = rtems_region_delete( 100 ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_region_delete with illegal id" - ); - puts( "TA1 - rtems_region_delete - unknown RTEMS_INVALID_ID" ); - - status = rtems_region_delete( 0x10100 ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_region_delete with illegal id" - ); - puts( "TA1 - rtems_region_delete - local RTEMS_INVALID_ID" ); - - status = rtems_region_ident( 0, &Junk_id ); - fatal_directive_status( - status, - RTEMS_INVALID_NAME, - "rtems_region_ident with illegal name" - ); - puts( "TA1 - rtems_region_ident - RTEMS_INVALID_NAME" ); - - status = rtems_region_get_segment( - 100, - 128, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT, - &segment_address_1 - ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_region_get_segment with illegal id" - ); - puts( "TA1 - rtems_region_get_segment - RTEMS_INVALID_ID" ); - - status = rtems_region_get_segment( - Region_id[ 1 ], - sizeof( Region_good_area ) * 2, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT, - &segment_address_1 - ); - fatal_directive_status( - status, - RTEMS_INVALID_SIZE, - "rtems_region_get_segment with illegal size" - ); - puts( "TA1 - rtems_region_get_segment - RTEMS_INVALID_SIZE" ); - - status = rtems_region_get_segment( - Region_id[ 1 ], - 384, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT, - &segment_address_1 - ); - directive_failed( status, "rtems_region_get_segment" ); - puts( "TA1 - rtems_region_get_segment - RTEMS_SUCCESSFUL" ); - - status = rtems_region_get_segment( - Region_id[ 1 ], - 384, - RTEMS_NO_WAIT, - RTEMS_NO_TIMEOUT, - &segment_address_2 - ); - fatal_directive_status( - status, - RTEMS_UNSATISFIED, - "rtems_region_get_segment unsatisfied" - ); - puts( "TA1 - rtems_region_get_segment - RTEMS_UNSATISFIED" ); - - puts( "TA1 - rtems_region_get_segment - timeout in 3 seconds" ); - status = rtems_region_get_segment( - Region_id[ 1 ], - 128, - RTEMS_DEFAULT_OPTIONS, - 3 * TICKS_PER_SECOND, - &segment_address_3 - ); - fatal_directive_status( - status, - RTEMS_TIMEOUT, - "rtems_region_get_segment timeout" - ); - puts( "TA1 - rtems_region_get_segment - woke up with RTEMS_TIMEOUT" ); - - status = rtems_region_delete( Region_id[ 1 ] ); - fatal_directive_status( - status, - RTEMS_RESOURCE_IN_USE, - "rtems_region_delete with buffers in use" - ); - puts( "TA1 - rtems_region_delete - RTEMS_RESOURCE_IN_USE" ); - - status = rtems_region_return_segment( 100, segment_address_1 ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_region_return_segment with illegal id" - ); - puts( "TA1 - rtems_region_return_segment - RTEMS_INVALID_ID" ); - - status = rtems_region_return_segment( Region_id[ 1 ], Region_good_area ); - fatal_directive_status( - status, - RTEMS_INVALID_ADDRESS, - "rtems_region_return_segment with illegal segment" - ); - puts( "TA1 - rtems_region_return_segment - RTEMS_INVALID_ADDRESS" ); - -/* - * The following generate internal heap errors. Thus this code - * is subject to change if the heap code changes. - */ - - puts( "TA1 - rtems_debug_disable - RTEMS_DEBUG_REGION" ); - rtems_debug_disable( RTEMS_DEBUG_REGION ); - - offset = (segment_address_1 - (void *)Region_good_area) / 4; - -/* bad FRONT_FLAG error */ - - good_front_flag = Region_good_area[ offset - 1 ]; - Region_good_area[ offset - 1 ] = good_front_flag + 2; - - status = rtems_region_return_segment( Region_id[ 1 ], segment_address_1 ); - fatal_directive_status( - status, - RTEMS_INVALID_ADDRESS, - "rtems_region_return_segment with back_flag != front_flag" - ); - puts( "TA1 - rtems_region_return_segment - RTEMS_INVALID_ADDRESS" ); - - Region_good_area[ offset - 1 ] = good_front_flag; - -/* bad FRONT_FLAG error */ - - good_back_flag = Region_good_area[ offset - 2 ]; - Region_good_area[ offset - 2 ] = 1024; - - status = rtems_region_return_segment( Region_id[ 1 ], segment_address_1 ); - fatal_directive_status( - status, - RTEMS_INVALID_ADDRESS, - "rtems_region_return_segment with back_flag != front_flag" - ); - puts( "TA1 - rtems_region_return_segment - RTEMS_INVALID_ADDRESS" ); - - Region_good_area[ offset - 2 ] = good_back_flag; - - puts( "TA1 - rtems_debug_enable - RTEMS_DEBUG_REGION" ); - rtems_debug_enable( RTEMS_DEBUG_REGION ); - - status = rtems_region_extend( - 100, - Region_good_area, - 128 - ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_region_extend with illegal id" - ); - puts( "TA1 - rtems_region_extend - RTEMS_INVALID_ID" ); - - status = rtems_region_extend( - Region_id[ 1 ], - &Region_good_area[ REGION_START_OFFSET + 16 ], - 128 - ); - fatal_directive_status( - status, - RTEMS_INVALID_ADDRESS, - "rtems_region_extend with illegal starting address" - ); - puts( "TA1 - rtems_region_extend - within heap - RTEMS_INVALID_ADDRESS" ); - - status = rtems_region_extend( - Region_id[ 1 ], - Region_bad_area, - 128 - ); - fatal_directive_status( - status, - RTEMS_NOT_IMPLEMENTED, - "rtems_region_extend with unsupported starting address" - ); - puts( - "TA1 - rtems_region_extend - non-contiguous lower - RTEMS_NOT_IMPLEMENTED" - ); - - status = rtems_region_extend( - Region_id[ 1 ], - &Region_good_area[ REGION_START_OFFSET - REGION_LENGTH ], - 128 - ); - fatal_directive_status( - status, - RTEMS_NOT_IMPLEMENTED, - "rtems_region_extend with unsupported starting address" - ); - puts( - "TA1 - rtems_region_extend - contiguous lower - RTEMS_NOT_IMPLEMENTED" - ); - - status = rtems_region_extend( - Region_id[ 1 ], - &Region_good_area[ REGION_START_OFFSET + REGION_LENGTH + 16 ], - 128 - ); - fatal_directive_status( - status, - RTEMS_NOT_IMPLEMENTED, - "rtems_region_extend with unsupported starting address" - ); - puts( - "TA1 - rtems_region_extend - non-contiguous higher - RTEMS_NOT_IMPLEMENTED" - ); - -} diff --git a/c/src/tests/sptests/sp09/screen13.c b/c/src/tests/sptests/sp09/screen13.c deleted file mode 100644 index c96adeec40..0000000000 --- a/c/src/tests/sptests/sp09/screen13.c +++ /dev/null @@ -1,115 +0,0 @@ -/* Screen13 - * - * This routine generates error screen 13 for test 9. - * - * Input parameters: NONE - * - * 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" - -void Screen13() -{ - rtems_unsigned32 result; - rtems_time_of_day time; - rtems_status_code status; - - status = rtems_io_close( 0xffff, 0x0000, NULL, &result ); - fatal_directive_status( - status, - RTEMS_INVALID_NUMBER, - "rtems_io_close with bad major number" - ); - puts( "TA1 - rtems_io_close - RTEMS_INVALID_NUMBER" ); - status = rtems_io_control( 0xffff, 0x00000, NULL, &result ); - fatal_directive_status( - status, - RTEMS_INVALID_NUMBER, - "rtems_io_close with bad major number" - ); - puts( "TA1 - rtems_io_control - RTEMS_INVALID_NUMBER" ); - status = rtems_io_initialize( 0xffff, 0x00000, NULL, &result ); - fatal_directive_status( - status, - RTEMS_INVALID_NUMBER, - "rtems_io_initialize with bad major number" - ); - puts( "TA1 - rtems_io_initialize - RTEMS_INVALID_NUMBER" ); - status = rtems_io_open( 0xffff, 0x00000, NULL, &result ); - fatal_directive_status( - status, - RTEMS_INVALID_NUMBER, - "rtems_io_open with bad major number" - ); - puts( "TA1 - rtems_io_open - RTEMS_INVALID_NUMBER" ); - status = rtems_io_read( 0xffff, 0x00000, NULL, &result ); - fatal_directive_status( - status, - RTEMS_INVALID_NUMBER, - "rtems_io_read with bad major number" - ); - puts( "TA1 - rtems_io_read - RTEMS_INVALID_NUMBER" ); - status = rtems_io_write( 0xffff, 0x0ffff, NULL, &result ); - fatal_directive_status( - status, - RTEMS_INVALID_NUMBER, - "rtems_io_write with bad major number" - ); - puts( "TA1 - rtems_io_write - RTEMS_INVALID_NUMBER" ); - - build_time( &time, 12, 31, 2000, 23, 59, 59, 0 ); - status = rtems_clock_set( &time ); - directive_failed( status, "rtems_clock_set" ); - print_time( "TA1 - rtems_clock_set - ", &time, " - RTEMS_SUCCESSFUL\n" ); - status = rtems_task_wake_after( 1 * TICKS_PER_SECOND ); - status = rtems_clock_get( RTEMS_CLOCK_GET_TOD, &time ); - directive_failed( status, "rtems_clock_set" ); - print_time( "TA1 - rtems_clock_get - ", &time, " - RTEMS_SUCCESSFUL\n" ); - - build_time( &time, 12, 31, 1999, 23, 59, 59, 0 ); - status = rtems_clock_set( &time ); - directive_failed( status, "rtems_clock_set" ); - print_time( "TA1 - rtems_clock_set - ", &time, " - RTEMS_SUCCESSFUL\n" ); - status = rtems_task_wake_after( 1 * TICKS_PER_SECOND ); - status = rtems_clock_get( RTEMS_CLOCK_GET_TOD, &time ); - directive_failed( status, "rtems_clock_set" ); - print_time( "TA1 - rtems_clock_get - ", &time, " - RTEMS_SUCCESSFUL\n" ); - - build_time( &time, 12, 31, 2100, 23, 59, 59, 0 ); - status = rtems_clock_set( &time ); - directive_failed( status, "rtems_clock_set" ); - print_time( "TA1 - rtems_clock_set - ", &time, " - RTEMS_SUCCESSFUL\n" ); - status = rtems_task_wake_after( 1 * TICKS_PER_SECOND ); - status = rtems_clock_get( RTEMS_CLOCK_GET_TOD, &time ); - directive_failed( status, "rtems_clock_set" ); - print_time( "TA1 - rtems_clock_get - ", &time, " - RTEMS_SUCCESSFUL\n" ); - - build_time( &time, 12, 31, 2099, 23, 59, 59, 0 ); - status = rtems_clock_set( &time ); - directive_failed( status, "rtems_clock_set" ); - print_time( "TA1 - rtems_clock_set - ", &time, " - RTEMS_SUCCESSFUL\n" ); - status = rtems_task_wake_after( 1 * TICKS_PER_SECOND ); - status = rtems_clock_get( RTEMS_CLOCK_GET_TOD, &time ); - directive_failed( status, "rtems_clock_set" ); - print_time( "TA1 - rtems_clock_get - ", &time, " - RTEMS_SUCCESSFUL\n" ); - - build_time( &time, 12, 31, 1991, 23, 59, 59, 0 ); - status = rtems_clock_set( &time ); - directive_failed( status, "rtems_clock_set" ); - print_time( "TA1 - rtems_clock_set - ", &time, " - RTEMS_SUCCESSFUL\n" ); - status = rtems_task_wake_after( 1 * TICKS_PER_SECOND ); - status = rtems_clock_get( RTEMS_CLOCK_GET_TOD, &time ); - directive_failed( status, "rtems_clock_set" ); - print_time( "TA1 - rtems_clock_get - ", &time, " - RTEMS_SUCCESSFUL\n" ); -} diff --git a/c/src/tests/sptests/sp09/screen14.c b/c/src/tests/sptests/sp09/screen14.c deleted file mode 100644 index bf80f04c3c..0000000000 --- a/c/src/tests/sptests/sp09/screen14.c +++ /dev/null @@ -1,162 +0,0 @@ -/* Screen14 - * - * This routine generates error screen 14 for test 9. - * - * Input parameters: NONE - * - * 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" - -void Screen14() -{ - rtems_status_code status; - rtems_time_of_day time; - - status = rtems_timer_create( 0, &Junk_id ); - fatal_directive_status( - status, - RTEMS_INVALID_NAME, - "rtems_timer_create with illegal name" - ); - puts( "TA1 - rtems_timer_create - RTEMS_INVALID_NAME" ); - - status = rtems_timer_create( Timer_name[ 1 ], &Timer_id[ 1 ] ); - directive_failed( status, "rtems_timer_create" ); - puts( "TA1 - rtems_timer_create - 1 - RTEMS_SUCCESSFUL" ); - - status = rtems_timer_create( 2, &Junk_id ); - fatal_directive_status( - status, - RTEMS_TOO_MANY, - "rtems_timer_create for too many" - ); - puts( "TA1 - rtems_timer_create - 2 - RTEMS_TOO_MANY" ); - - status = rtems_timer_delete( 100 ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_timer_delete with illegal id" - ); - puts( "TA1 - rtems_timer_delete - local RTEMS_INVALID_ID" ); - - status = rtems_timer_delete( 0x010100 ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_timer_delete with illegal id" - ); - puts( "TA1 - rtems_timer_delete - global RTEMS_INVALID_ID" ); - - status = rtems_timer_ident( 0, &Junk_id ); - fatal_directive_status( - status, - RTEMS_INVALID_NAME, - "rtems_timer_ident with illegal name" - ); - puts( "TA1 - rtems_timer_ident - RTEMS_INVALID_NAME" ); - - status = rtems_timer_cancel( 0x010100 ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_timer_cancel with illegal id" - ); - puts( "TA1 - rtems_timer_cancel - RTEMS_INVALID_ID" ); - - status = rtems_timer_cancel( Timer_id[ 1 ] ); - fatal_directive_status( - status, - RTEMS_INCORRECT_STATE, - "rtems_timer_cancel before initiated" - ); - puts( "TA1 - rtems_timer_cancel - RTEMS_INCORRECT_STATE" ); - - status = rtems_timer_reset( 0x010100 ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_timer_reset with illegal id" - ); - puts( "TA1 - rtems_timer_reset - RTEMS_INVALID_ID" ); - - status = rtems_timer_reset( Timer_id[ 1 ] ); - fatal_directive_status( - status, - RTEMS_NOT_DEFINED, - "rtems_timer_reset before initiated" - ); - puts( "TA1 - rtems_timer_reset - RTEMS_NOT_DEFINED" ); - - status = rtems_timer_fire_after( - 0x010100, - 5 * TICKS_PER_SECOND, - Delayed_routine, - NULL - ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_timer_fire_after illegal id" - ); - puts( "TA1 - rtems_timer_fire_after - RTEMS_INVALID_ID" ); - - build_time( &time, 12, 31, 1994, 9, 0, 0, 0 ); - status = rtems_timer_fire_when( 0x010100, &time, Delayed_routine, NULL ); - fatal_directive_status( - status, - RTEMS_INVALID_ID, - "rtems_timer_fire_when with illegal id" - ); - puts( "TA1 - rtems_timer_fire_when - RTEMS_INVALID_ID" ); - - status = rtems_timer_fire_after( Timer_id[ 1 ], 0, Delayed_routine, NULL ); - fatal_directive_status( - status, - RTEMS_INVALID_NUMBER, - "rtems_timer_fire_after with 0 ticks" - ); - puts( "TA1 - rtems_timer_fire_after - RTEMS_INVALID_NUMBER" ); - - build_time( &time, 2, 5, 1987, 8, 30, 45, 0 ); - status = rtems_timer_fire_when( Timer_id[ 1 ], &time, Delayed_routine, NULL ); - fatal_directive_status( - status, - RTEMS_INVALID_CLOCK, - "rtems_timer_fire_when with illegal time" - ); - print_time( - "TA1 - rtems_timer_fire_when - ", - &time, - " - RTEMS_INVALID_CLOCK\n" - ); - - status = rtems_clock_get( RTEMS_CLOCK_GET_TOD, &time ); - directive_failed( status, "rtems_clock_set" ); - print_time( "TA1 - rtems_clock_get - ", &time, "\n" ); - - build_time( &time, 2, 5, 1990, 8, 30, 45, 0 ); - status = rtems_timer_fire_when( Timer_id[ 1 ], &time, Delayed_routine, NULL ); - fatal_directive_status( - status, - RTEMS_INVALID_CLOCK, - "rtems_timer_fire_when before current time" - ); - print_time( - "TA1 - rtems_timer_fire_when - ", - &time, - " - before RTEMS_INVALID_CLOCK\n" - ); -} diff --git a/c/src/tests/sptests/sp09/sp09.doc b/c/src/tests/sptests/sp09/sp09.doc deleted file mode 100644 index f4e8391c47..0000000000 --- a/c/src/tests/sptests/sp09/sp09.doc +++ /dev/null @@ -1,36 +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: test9 - -directives: - ex_init, ex_start, tm_tick, i_return, - t_create,t_delete, t_getreg, t_ident, t_restart, t_resume, t_setpri, - t_setreg, t_start, t_suspend, tm_delete, tm_get, - tm_set, tm_wkafter, tm_wkwhen, ev_receive, ev_send, sm_create, sm_delete, - sm_ident, sm_p, sm_v, q_broadcast, q_create, q_delete, q_ident, q_receive, - q_send, q_urgent, as_catch, as_send, as_return, rn_create, rn_delete, - rn_getseg, rn_ident, rn_retseg, pt_create, pt_delete, pt_getbug, pt_ident, - pt_retbuf, de_close, de_cntrl, de_init, de_open, de_read, de_write - -concepts: - - a. Verifies all error codes returned by the executive in single - processor configurations. - - b. Verifies error conditions in the following kernel routines or macros: - _Ck_date_time, _Expired, _Q_submit, _Get_mnodes, _Get_node, - _Free_mem, _Get_mem, _Valid_block, _Set_tcb, _Set_resource, - _In_range, _On_boundary diff --git a/c/src/tests/sptests/sp09/sp09.scn b/c/src/tests/sptests/sp09/sp09.scn deleted file mode 100644 index 534fc47e09..0000000000 --- a/c/src/tests/sptests/sp09/sp09.scn +++ /dev/null @@ -1,249 +0,0 @@ -*** TEST 9 *** -INIT - rtems_task_create - RTEMS_INVALID_SIZE -- NOT CHECKED -INIT - rtems_task_create - RTEMS_INVALID_PRIORITY -INIT - rtems_task_restart - RTEMS_INCORRECT_STATE -TA1 - rtems_task_delete - RTEMS_INVALID_ID -TA1 - rtems_task_get_note - RTEMS_INVALID_NUMBER -TA1 - rtems_task_get_note - RTEMS_INVALID_ID -TA1 - rtems_task_ident - current task RTEMS_SUCCESSFUL -TA1 - rtems_task_ident - global RTEMS_INVALID_NAME -TA1 - rtems_task_ident - local RTEMS_INVALID_NAME -TA1 - rtems_task_ident - RTEMS_INVALID_NODE -TA1 - rtems_task_restart - RTEMS_INVALID_ID -TA1 - rtems_task_resume - RTEMS_INVALID_ID -TA1 - rtems_task_resume - RTEMS_INCORRECT_STATE -TA1 - rtems_task_set_priority - RTEMS_INVALID_PRIORITY -TA1 - rtems_task_set_priority - RTEMS_INVALID_ID -TA1 - rtems_task_set_note - RTEMS_INVALID_NUMBER -TA1 - rtems_task_set_note - RTEMS_INVALID_ID -TA1 - rtems_task_start - RTEMS_INVALID_ID -TA1 - rtems_task_start - RTEMS_INCORRECT_STATE -TA1 - rtems_task_suspend - RTEMS_INVALID_ID -<pause - screen 2> -TA1 - rtems_clock_get - RTEMS_NOT_DEFINED -TA1 - rtems_task_wake_when - RTEMS_NOT_DEFINED -TA1 - rtems_timer_fire_when - RTEMS_NOT_DEFINED -TA1 - rtems_clock_set - 08:30:45 02/05/1987 - RTEMS_INVALID_CLOCK -TA1 - rtems_clock_set - 08:30:45 15/05/1988 - RTEMS_INVALID_CLOCK -TA1 - rtems_clock_set - 08:30:45 02/32/1988 - RTEMS_INVALID_CLOCK -TA1 - rtems_clock_set - 25:30:45 02/05/1988 - RTEMS_INVALID_CLOCK -TA1 - rtems_clock_set - 08:61:45 02/05/1988 - RTEMS_INVALID_CLOCK -TA1 - rtems_clock_set - 08:30:61 02/05/1988 - RTEMS_INVALID_CLOCK -TA1 - rtems_clock_set - 08:30:45 02/05/1988 - RTEMS_INVALID_CLOCK -TA1 - rtems_clock_set - 08:30:45 02/05/1988 - RTEMS_SUCCESSFUL -TA1 - rtems_task_wake_when - TICKINVALID - sleep about 3 seconds -TA1 - rtems_task_wake_when - TICKINVALID - woke up RTEMS_SUCCESSFUL -TA1 - rtems_task_wake_when - 08:30:48 02/05/1961 - RTEMS_INVALID_CLOCK -TA1 - rtems_task_wake_when - 25:30:48 02/05/1988 - RTEMS_INVALID_CLOCK -TA1 - current time - 08:30:51 02/05/1988 -TA1 - rtems_task_wake_when - 08:30:51 01/05/1988 - RTEMS_INVALID_CLOCK -<pause - screen 3> -TA1 - rtems_task_create - RTEMS_INVALID_NAME -TA1 - rtems_task_create - stack size - RTEMS_UNSATISFIED -TA1 - rtems_task_create - TA2 created - RTEMS_SUCCESSFUL -TA1 - rtems_task_suspend - suspend TA2 - RTEMS_SUCCESSFUL -TA1 - rtems_task_suspend - suspend TA2 - RTEMS_ALREADY_SUSPENDED -TA1 - rtems_task_resume - TA2 resumed - RTEMS_SUCCESSFUL -TA1 - rtems_task_create - TA3 created - RTEMS_SUCCESSFUL -TA1 - rtems_task_create - 4 created - RTEMS_SUCCESSFUL -TA1 - rtems_task_create - 5 created - RTEMS_SUCCESSFUL -TA1 - rtems_task_create - 6 created - RTEMS_SUCCESSFUL -TA1 - rtems_task_create - 7 created - RTEMS_SUCCESSFUL -TA1 - rtems_task_create - 8 created - RTEMS_SUCCESSFUL -TA1 - rtems_task_create - 9 created - RTEMS_SUCCESSFUL -TA1 - rtems_task_create - 10 created - RTEMS_SUCCESSFUL -TA1 - rtems_task_create - 11 - RTEMS_TOO_MANY -TA1 - rtems_task_create - RTEMS_MP_NOT_CONFIGURED -<pause - screen 4> -TA1 - rtems_event_receive - RTEMS_UNSATISFIED ( all conditions ) -TA1 - rtems_event_receive - RTEMS_UNSATISFIED ( any condition ) -TA1 - rtems_event_receive - timeout in 3 seconds -TA1 - rtems_event_receive - woke up with RTEMS_TIMEOUT -TA1 - rtems_event_send - RTEMS_INVALID_ID -TA1 - rtems_task_wake_after - sleep 1 second - RTEMS_SUCCESSFUL -TA1 - rtems_clock_set - 08:30:45 02/05/1988 - RTEMS_SUCCESSFUL -<pause - screen 5> -TA1 - rtems_semaphore_create - RTEMS_INVALID_NAME -TA1 - rtems_semaphore_create - 1 - RTEMS_SUCCESSFUL -TA1 - rtems_semaphore_create - 2 - RTEMS_SUCCESSFUL -TA1 - rtems_semaphore_create - 3 - RTEMS_TOO_MANY -TA1 - rtems_semaphore_create - RTEMS_NOT_DEFINED -TA1 - rtems_semaphore_create - RTEMS_NOT_DEFINED -TA1 - rtems_semaphore_create - RTEMS_INVALID_NUMBER -TA1 - rtems_semaphore_create - RTEMS_MP_NOT_CONFIGURED -TA1 - rtems_semaphore_delete - unknown RTEMS_INVALID_ID -TA1 - rtems_semaphore_delete - local RTEMS_INVALID_ID -TA1 - rtems_semaphore_ident - global RTEMS_INVALID_NAME -TA1 - rtems_semaphore_ident - local RTEMS_INVALID_NAME -<pause - screen 6> -TA1 - rtems_semaphore_obtain - RTEMS_INVALID_ID -TA1 - rtems_semaphore_obtain - got sem 1 - RTEMS_SUCCESSFUL -TA1 - rtems_semaphore_obtain - RTEMS_UNSATISFIED -TA1 - rtems_semaphore_obtain - timeout in 3 seconds -TA1 - rtems_semaphore_obtain - woke up with RTEMS_TIMEOUT -TA1 - rtems_semaphore_release - RTEMS_NOT_OWNER_OF_RESOURCE -TA1 - rtems_semaphore_release - RTEMS_INVALID_ID -TA1 - rtems_task_start - start TA2 - RTEMS_SUCCESSFUL -TA1 - rtems_task_wake_after - yield processor - RTEMS_SUCCESSFUL -TA2 - rtems_semaphore_obtain - sem 1 - RTEMS_WAIT FOREVER -TA1 - rtems_semaphore_delete - delete sem 1 - RTEMS_SUCCESSFUL -TA1 - rtems_semaphore_obtain - binary semaphore -TA1 - rtems_semaphore_delete - delete sem 2 - RTEMS_RESOURCE_IN_USE -TA1 - rtems_task_wake_after - yield processor - RTEMS_SUCCESSFUL -TA2 - rtems_semaphore_obtain - woke up with RTEMS_OBJECT_WAS_DELETED -TA2 - rtems_task_delete - delete self - RTEMS_SUCCESSFUL -<pause - screen 7> -TA1 - rtems_message_queue_broadcast - RTEMS_INVALID_ID -TA1 - rtems_message_queue_create - Q 1 - RTEMS_INVALID_NAME -TA1 - rtems_message_queue_create - Q 1 - RTEMS_MP_NOT_CONFIGURED -TA1 - rtems_message_queue_create - Q 1 - RTEMS_LIMIT - RTEMS_SUCCESSFUL -TA1 - rtems_message_queue_create - Q 2 - RTEMS_TOO_MANY -TA1 - rtems_message_queue_delete - unknown RTEMS_INVALID_ID -TA1 - rtems_message_queue_delete - local RTEMS_INVALID_ID -TA1 - rtems_message_queue_ident - RTEMS_INVALID_NAME -TA1 - rtems_message_queue_flush - RTEMS_INVALID_ID -TA1 - rtems_message_queue_receive - RTEMS_INVALID_ID -TA1 - rtems_message_queue_receive - Q 1 - RTEMS_UNSATISFIED -TA1 - rtems_message_queue_receive - Q 1 - timeout in 3 seconds -TA1 - rtems_message_queue_receive - Q 1 - woke up with RTEMS_TIMEOUT -TA1 - rtems_message_queue_send - RTEMS_INVALID_ID -TA1 - rtems_message_queue_send - BUFFER 1 TO Q 1 - RTEMS_SUCCESSFUL -TA1 - rtems_message_queue_send - BUFFER 2 TO Q 1 - RTEMS_SUCCESSFUL -TA1 - rtems_message_queue_send - BUFFER 3 TO Q 1 - RTEMS_TOO_MANY -<pause - screen 8> -TA1 - rtems_message_queue_delete - Q 1 - RTEMS_SUCCESSFUL -TA1 - rtems_message_queue_create - Q 1 - RTEMS_LIMIT - RTEMS_SUCCESSFUL -TA1 - rtems_message_queue_send - BUFFER 1 TO Q 1 - RTEMS_SUCCESSFUL -TA1 - rtems_message_queue_send - BUFFER 2 TO Q 1 - RTEMS_SUCCESSFUL -TA1 - rtems_message_queue_send - BUFFER 3 TO Q 1 - RTEMS_TOO_MANY -TA1 - rtems_message_queue_delete - Q 1 - RTEMS_SUCCESSFUL -TA1 - rtems_message_queue_create - Q 1 - RTEMS_LIMIT - RTEMS_SUCCESSFUL -TA1 - rtems_message_queue_send - BUFFER 1 TO Q 1 - RTEMS_SUCCESSFUL -TA1 - rtems_message_queue_send - BUFFER 2 TO Q 1 - RTEMS_SUCCESSFUL -TA1 - rtems_message_queue_send - BUFFER 3 TO Q 1 - RTEMS_UNSATISFIED -TA1 - rtems_message_queue_delete - Q 1 - RTEMS_SUCCESSFUL -TA1 - rtems_message_queue_create - Q 1 - RTEMS_LIMIT - RTEMS_SUCCESSFUL -TA1 - rtems_task_start - start TA3 - RTEMS_SUCCESSFUL -TA1 - rtems_task_wake_after - yield processor - RTEMS_SUCCESSFUL -TA3 - rtems_message_queue_receive - Q 1 - RTEMS_WAIT FOREVER -TA1 - rtems_message_queue_delete - delete Q 1 - RTEMS_SUCCESSFUL -TA1 - rtems_task_wake_after - yield processor - RTEMS_SUCCESSFUL -TA3 - rtems_message_queue_receive - woke up with RTEMS_OBJECT_WAS_DELETED -TA3 - rtems_task_delete - delete self - RTEMS_SUCCESSFUL -<pause - screen 9> -TA1 - rtems_interrupt_catch - RTEMS_INVALID_NUMBER -TA1 - rtems_interrupt_catch - RTEMS_INVALID_ADDRESS -TA1 - rtems_signal_send - RTEMS_INVALID_ID -TA1 - rtems_signal_send - RTEMS_NOT_DEFINED -TA1 - rtems_port_create - RTEMS_INVALID_NAME -TA1 - rtems_port_create - RTEMS_INVALID_ADDRESS -TA1 - rtems_port_create - RTEMS_TOO_MANY -TA1 - rtems_port_delete - RTEMS_INVALID_ID -TA1 - rtems_port_ident - RTEMS_INVALID_NAME -TA1 - rtems_port_external_to_internal - RTEMS_INVALID_ID -TA1 - rtems_port_internal_to_external - RTEMS_INVALID_ID -<pause - screen 10> -TA1 - rtems_rate_monotonic_create - RTEMS_INVALID_NAME -TA1 - rtems_rate_monotonic_create - RTEMS_SUCCESSFUL -TA1 - rtems_rate_monotonic_create - RTEMS_TOO_MANY -TA1 - rtems_rate_monotonic_ident - RTEMS_INVALID_NAME -TA1 - rtems_rate_monotonic_period - unknown RTEMS_INVALID_ID -TA1 - rtems_rate_monotonic_period - local RTEMS_INVALID_ID -TA1 - rtems_rate_monotonic_period(RTEMS_PERIOD_STATUS) - RTEMS_NOT_DEFINED -TA1 - rtems_rate_monotonic_period - 100 ticks - RTEMS_SUCCESSFUL -TA1 - rtems_rate_monotonic_period(RTEMS_PERIOD_STATUS) - RTEMS_SUCCESSFUL -TA1 - rtems_rate_monotonic_period(RTEMS_PERIOD_STATUS) - RTEMS_TIMEOUT -TA1 - rtems_rate_monotonic_cancel - unknown RTEMS_INVALID_ID -TA1 - rtems_rate_monotonic_cancel - local RTEMS_INVALID_ID -TA1 - rtems_rate_monotonic_cancel - RTEMS_SUCCESSFUL -TA1 - rtems_rate_monotonic_period - 5 ticks - RTEMS_TIMEOUT -TA1 - yielding to TA4 -TA4 - rtems_rate_monotonic_cancel - RTEMS_NOT_OWNER_OF_RESOURCE -TA4 - rtems_rate_monotonic_period - RTEMS_NOT_OWNER_OF_RESOURCE -TA4 - rtems_task_delete - delete self - RTEMS_SUCCESSFUL -TA1 - rtems_rate_monotonic_delete - unknown RTEMS_INVALID_ID -TA1 - rtems_rate_monotonic_delete - local RTEMS_INVALID_ID -TA1 - rtems_rate_monotonic_delete - RTEMS_SUCCESSFUL -<pause - screen 11> -TA1 - rtems_partition_create - RTEMS_INVALID_NAME -TA1 - rtems_partition_create - length - RTEMS_INVALID_SIZE -TA1 - rtems_partition_create - buffer size - RTEMS_INVALID_SIZE -TA1 - rtems_partition_create - length < buffer size - RTEMS_INVALID_SIZE -TA1 - rtems_partition_create - RTEMS_MP_NOT_CONFIGURED -TA1 - rtems_partition_create - RTEMS_INVALID_ADDRESS -TA1 - rtems_partition_create - RTEMS_INVALID_SIZE -TA1 - rtems_partition_delete - unknown RTEMS_INVALID_ID -TA1 - rtems_partition_delete - local RTEMS_INVALID_ID -TA1 - rtems_partition_get_buffer - RTEMS_INVALID_ID -TA1 - rtems_partition_ident - RTEMS_INVALID_NAME -TA1 - rtems_partition_return_buffer - RTEMS_INVALID_ID -TA1 - rtems_partition_create - RTEMS_SUCCESSFUL -TA1 - rtems_partition_create - RTEMS_TOO_MANY -TA1 - rtems_partition_get_buffer - RTEMS_SUCCESSFUL -TA1 - rtems_partition_get_buffer - RTEMS_SUCCESSFUL -TA1 - rtems_partition_get_buffer - RTEMS_UNSATISFIED -TA1 - rtems_partition_delete - RTEMS_RESOURCE_IN_USE -TA1 - rtems_partition_return_buffer - RTEMS_INVALID_ADDRESS - out of range -TA1 - rtems_partition_return_buffer - RTEMS_INVALID_ADDRESS - not on boundary -<pause - screen 12> -TA1 - rtems_region_create - RTEMS_INVALID_NAME -TA1 - rtems_region_create - RTEMS_INVALID_ADDRESS -TA1 - rtems_region_create - RTEMS_INVALID_SIZE -TA1 - rtems_region_create - RTEMS_SUCCESSFUL -TA1 - rtems_region_create - RTEMS_TOO_MANY -TA1 - rtems_region_delete - unknown RTEMS_INVALID_ID -TA1 - rtems_region_delete - local RTEMS_INVALID_ID -TA1 - rtems_region_ident - RTEMS_INVALID_NAME -TA1 - rtems_region_get_segment - RTEMS_INVALID_ID -TA1 - rtems_region_get_segment - RTEMS_INVALID_SIZE -TA1 - rtems_region_get_segment - RTEMS_SUCCESSFUL -TA1 - rtems_region_get_segment - RTEMS_UNSATISFIED -TA1 - rtems_region_get_segment - timeout in 3 seconds -TA1 - rtems_region_get_segment - woke up with RTEMS_TIMEOUT -TA1 - rtems_region_delete - RTEMS_RESOURCE_IN_USE -TA1 - rtems_region_return_segment - RTEMS_INVALID_ID -TA1 - rtems_region_return_segment - RTEMS_INVALID_ADDRESS -TA1 - rtems_debug_disable - RTEMS_DEBUG_REGION -TA1 - rtems_region_return_segment - RTEMS_INVALID_ADDRESS -TA1 - rtems_region_return_segment - RTEMS_INVALID_ADDRESS -TA1 - rtems_debug_enable - RTEMS_DEBUG_REGION -TA1 - rtems_region_extend - RTEMS_INVALID_ID -TA1 - rtems_region_extend - within heap - RTEMS_INVALID_ADDRESS -TA1 - rtems_region_extend - non-contiguous lower - RTEMS_NOT_IMPLEMENTED -TA1 - rtems_region_extend - contiguous lower - RTEMS_NOT_IMPLEMENTED -TA1 - rtems_region_extend - non-contiguous higher - RTEMS_NOT_IMPLEMENTED -<pause - screen 13> -TA1 - rtems_io_close - RTEMS_INVALID_NUMBER -TA1 - rtems_io_control - RTEMS_INVALID_NUMBER -TA1 - rtems_io_initialize - RTEMS_INVALID_NUMBER -TA1 - rtems_io_open - RTEMS_INVALID_NUMBER -TA1 - rtems_io_read - RTEMS_INVALID_NUMBER -TA1 - rtems_io_write - RTEMS_INVALID_NUMBER -TA1 - rtems_clock_set - 23:59:59 12/31/2000 - RTEMS_SUCCESSFUL -TA1 - rtems_clock_get - 00:00:00 01/01/2001 - RTEMS_SUCCESSFUL -TA1 - rtems_clock_set - 23:59:59 12/31/1999 - RTEMS_SUCCESSFUL -TA1 - rtems_clock_get - 00:00:00 01/01/2000 - RTEMS_SUCCESSFUL -TA1 - rtems_clock_set - 23:59:59 12/31/2100 - RTEMS_SUCCESSFUL -TA1 - rtems_clock_get - 00:00:00 01/01/2101 - RTEMS_SUCCESSFUL -TA1 - rtems_clock_set - 23:59:59 12/31/2099 - RTEMS_SUCCESSFUL -TA1 - rtems_clock_get - 00:00:00 01/01/2100 - RTEMS_SUCCESSFUL -TA1 - rtems_clock_set - 23:59:59 12/31/1991 - RTEMS_SUCCESSFUL -TA1 - rtems_clock_get - 00:00:00 01/01/1992 - RTEMS_SUCCESSFUL -<pause - screen 14> -TA1 - rtems_timer_create - RTEMS_INVALID_NAME -TA1 - rtems_timer_create - 1 - RTEMS_SUCCESSFUL -TA1 - rtems_timer_create - 2 - RTEMS_TOO_MANY -TA1 - rtems_timer_delete - local RTEMS_INVALID_ID -TA1 - rtems_timer_delete - global RTEMS_INVALID_ID -TA1 - rtems_timer_ident - RTEMS_INVALID_NAME -TA1 - rtems_timer_cancel - RTEMS_INVALID_ID -TA1 - rtems_timer_cancel - RTEMS_INCORRECT_STATE -TA1 - rtems_timer_reset - RTEMS_INVALID_ID -TA1 - rtems_timer_reset - RTEMS_NOT_DEFINED -TA1 - rtems_timer_fire_after - RTEMS_INVALID_ID -TA1 - rtems_timer_fire_when - RTEMS_INVALID_ID -TA1 - rtems_timer_fire_after - RTEMS_INVALID_NUMBER -TA1 - rtems_timer_fire_when - 08:30:45 02/05/1987 - RTEMS_INVALID_CLOCK -TA1 - rtems_clock_get - 00:00:00 01/01/1992 -TA1 - rtems_timer_fire_when - 08:30:45 02/05/1990 - before RTEMS_INVALID_CLOCK -*** END OF TEST 9 *** diff --git a/c/src/tests/sptests/sp09/system.h b/c/src/tests/sptests/sp09/system.h deleted file mode 100644 index aa2c6d17e4..0000000000 --- a/c/src/tests/sptests/sp09/system.h +++ /dev/null @@ -1,30 +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 <rtems.h> -#include "tmacros.h" - -/* Miscellaneous */ - -#define EXTERN extern /* external definition */ - -/* macros */ - -/* structures */ - -#include "gvar.h" - -/* end of include file */ diff --git a/c/src/tests/sptests/sp09/task1.c b/c/src/tests/sptests/sp09/task1.c deleted file mode 100644 index dbf28f57a8..0000000000 --- a/c/src/tests/sptests/sp09/task1.c +++ /dev/null @@ -1,74 +0,0 @@ -/* Task_1 - * - * This task generates all possible errors for the RTEMS executive. - * - * 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" - -#ifdef pause -#undef pause -#endif - -rtems_task Task_1( - rtems_task_argument argument -) -{ - Screen1(); - pause_and_screen_number( 2 ); - - Screen2(); - pause_and_screen_number( 3 ); - - Screen3(); - pause_and_screen_number( 4 ); - - Screen4(); - pause_and_screen_number( 5 ); - - Screen5(); - pause_and_screen_number( 6 ); - - Screen6(); - pause_and_screen_number( 7 ); - - Screen7(); - pause_and_screen_number( 8 ); - - Screen8(); - pause_and_screen_number( 9 ); - - Screen9(); - pause_and_screen_number( 10 ); - - Screen10(); - pause_and_screen_number( 11 ); - - Screen11(); - pause_and_screen_number( 12 ); - - Screen12(); - pause_and_screen_number( 13 ); - - Screen13(); - pause_and_screen_number( 14 ); - - Screen14(); - - puts( "*** END OF TEST 9 ***" ); - exit( 0 ); -} diff --git a/c/src/tests/sptests/sp09/task2.c b/c/src/tests/sptests/sp09/task2.c deleted file mode 100644 index e9bda81fa3..0000000000 --- a/c/src/tests/sptests/sp09/task2.c +++ /dev/null @@ -1,48 +0,0 @@ -/* Task_2 - * - * This routine serves as a test task. Its only purpose is to generate the - * error where a semaphore is deleted while a task is waiting for it. - * - * 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 Task_2( - rtems_task_argument argument -) -{ - rtems_status_code status; - - puts( "TA2 - rtems_semaphore_obtain - sem 1 - RTEMS_WAIT FOREVER" ); - status = rtems_semaphore_obtain( - Semaphore_id[ 1 ], - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT - ); - fatal_directive_status( - status, - RTEMS_OBJECT_WAS_DELETED, - "rtems_semaphore_obtain waiting to be deleted" - ); - puts( - "TA2 - rtems_semaphore_obtain - woke up with RTEMS_OBJECT_WAS_DELETED" - ); - - puts( "TA2 - rtems_task_delete - delete self - RTEMS_SUCCESSFUL" ); - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of TA2" ); -} diff --git a/c/src/tests/sptests/sp09/task3.c b/c/src/tests/sptests/sp09/task3.c deleted file mode 100644 index 8420c51f4d..0000000000 --- a/c/src/tests/sptests/sp09/task3.c +++ /dev/null @@ -1,51 +0,0 @@ -/* Task_3 - * - * This routine serves as a test task. Its only purpose in life is to - * generate the error where a message queue is deleted while a task - * is waiting there for a message. - * - * 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 Task_3( - rtems_task_argument argument -) -{ - rtems_status_code status; - long buffer[ 4 ]; - - puts( "TA3 - rtems_message_queue_receive - Q 1 - RTEMS_WAIT FOREVER" ); - status = rtems_message_queue_receive( - Queue_id[ 1 ], - (long (*)[4])buffer, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT - ); - fatal_directive_status( - status, - RTEMS_OBJECT_WAS_DELETED, - "rtems_message_queue_receive waiting to be deleted" - ); - puts( - "TA3 - rtems_message_queue_receive - woke up with RTEMS_OBJECT_WAS_DELETED" - ); - - puts( "TA3 - rtems_task_delete - delete self - RTEMS_SUCCESSFUL" ); - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of TA3" ); -} diff --git a/c/src/tests/sptests/sp09/task4.c b/c/src/tests/sptests/sp09/task4.c deleted file mode 100644 index 73cd63373c..0000000000 --- a/c/src/tests/sptests/sp09/task4.c +++ /dev/null @@ -1,50 +0,0 @@ -/* Task_4 - * - * This routine serves as a test task. Its only purpose in life is to - * generate the error where a rate monotonic period is accessed by a - * task other than its creator. - * - * 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 Task_4( - rtems_task_argument argument -) -{ - rtems_status_code status; - - status = rtems_rate_monotonic_cancel( Period_id[ 1 ] ); - fatal_directive_status( - status, - RTEMS_NOT_OWNER_OF_RESOURCE, - "rtems_rate_monotonic_cancel not the owner" - ); - puts( "TA4 - rtems_rate_monotonic_cancel - RTEMS_NOT_OWNER_OF_RESOURCE" ); - - status = rtems_rate_monotonic_period( Period_id[ 1 ], 5 ); - fatal_directive_status( - status, - RTEMS_NOT_OWNER_OF_RESOURCE, - "rtems_rate_monotonic_period not the owner" - ); - puts( "TA4 - rtems_rate_monotonic_period - RTEMS_NOT_OWNER_OF_RESOURCE" ); - - puts( "TA4 - rtems_task_delete - delete self - RTEMS_SUCCESSFUL" ); - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of TA4" ); -} diff --git a/c/src/tests/sptests/sp11/init.c b/c/src/tests/sptests/sp11/init.c deleted file mode 100644 index 99ef1d55a0..0000000000 --- a/c/src/tests/sptests/sp11/init.c +++ /dev/null @@ -1,95 +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$ - */ - -#include "system.h" -#undef EXTERN -#define EXTERN -#include "conftbl.h" -#include "gvar.h" - -rtems_task Init( - rtems_task_argument argument -) -{ - rtems_status_code status; - - puts( "\n\n*** TEST 11 ***" ); - - Task_name[ 1 ] = rtems_build_name( 'T', 'A', '1', ' ' ); - Task_name[ 2 ] = rtems_build_name( 'T', 'A', '2', ' ' ); - - status = rtems_task_create( - Task_name[ 1 ], - 4, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 1 ] - ); - directive_failed( status, "rtems_task_create of TA1" ); - - status = rtems_task_create( - Task_name[ 2 ], - 4, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 2 ] - ); - directive_failed( status, "rtems_task_create of TA2" ); - - status = rtems_task_start( Task_id[ 1 ], Task_1, 0 ); - directive_failed( status, "rtems_task_start of TA1" ); - - status = rtems_task_start( Task_id[ 2 ], Task_2, 0 ); - directive_failed( status, "rtems_task_start of TA2" ); - - Timer_name[ 1 ] = rtems_build_name( 'T', 'M', '1', ' ' ); - Timer_name[ 2 ] = rtems_build_name( 'T', 'M', '2', ' ' ); - Timer_name[ 3 ] = rtems_build_name( 'T', 'M', '3', ' ' ); - Timer_name[ 4 ] = rtems_build_name( 'T', 'M', '4', ' ' ); - Timer_name[ 5 ] = rtems_build_name( 'T', 'M', '5', ' ' ); - Timer_name[ 6 ] = rtems_build_name( 'T', 'M', '6', ' ' ); - - status = rtems_timer_create( Timer_name[ 1 ], &Timer_id[ 1 ] ); - directive_failed( status, "rtems_timer_create of TM1" ); - - status = rtems_timer_create( Timer_name[ 2 ], &Timer_id[ 2 ] ); - directive_failed( status, "rtems_timer_create of TM2" ); - - status = rtems_timer_create( Timer_name[ 3 ], &Timer_id[ 3 ] ); - directive_failed( status, "rtems_timer_create of TM3" ); - - status = rtems_timer_create( Timer_name[ 4 ], &Timer_id[ 4 ] ); - directive_failed( status, "rtems_timer_create of TM4" ); - - status = rtems_timer_create( Timer_name[ 5 ], &Timer_id[ 5 ] ); - directive_failed( status, "rtems_timer_create of TM5" ); - - status = rtems_timer_create( Timer_name[ 6 ], &Timer_id[ 6 ] ); - directive_failed( status, "rtems_timer_create of TM6" ); - - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of RTEMS_SELF" ); -} diff --git a/c/src/tests/sptests/sp11/sp11.doc b/c/src/tests/sptests/sp11/sp11.doc deleted file mode 100644 index d88f5eb86d..0000000000 --- a/c/src/tests/sptests/sp11/sp11.doc +++ /dev/null @@ -1,26 +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: test11 - -directives: - ex_init, ex_start, t_create, t_start, t_delete, tm_tick, i_return, - ev_send, ev_receive - tm_wkafter, tm_set, tm_get - -concepts: - - a. This test checks out the event manager along with the associated - event directives contained in the time manager. diff --git a/c/src/tests/sptests/sp11/sp11.scn b/c/src/tests/sptests/sp11/sp11.scn deleted file mode 100644 index 7abb8afe45..0000000000 --- a/c/src/tests/sptests/sp11/sp11.scn +++ /dev/null @@ -1,74 +0,0 @@ -*** TEST 11 *** -TA1 - rtems_event_send - send RTEMS_EVENT_16 to TA2 -TA1 - rtems_event_receive - waiting forever on RTEMS_EVENT_14 and RTEMS_EVENT_15 -TA2 - rtems_event_receive - waiting forever on RTEMS_EVENT_16 -TA2 - RTEMS_EVENT_16 received - eventout => 00010000 -TA2 - rtems_event_send - send RTEMS_EVENT_14 and RTEMS_EVENT_15 to TA1 -TA2 - rtems_event_receive - RTEMS_EVENT_17 or RTEMS_EVENT_18 - forever and ANY -TA1 - RTEMS_EVENT_14 and RTEMS_EVENT_15 received - eventout => 0000c000 -TA1 - rtems_event_send - send RTEMS_EVENT_18 to TA2 -TA1 - rtems_event_receive - waiting with 10 second timeout on RTEMS_EVENT_14 -TA2 - RTEMS_EVENT_17 or RTEMS_EVENT_18 received - eventout => 00040000 -TA2 - rtems_event_send - send RTEMS_EVENT_14 to TA1 -TA2 - rtems_clock_set - 08:15:00 02/12/1988 -TA2 - rtems_event_send - sending RTEMS_EVENT_10 to self after 5 seconds -TA2 - rtems_event_receive - waiting forever on RTEMS_EVENT_10 -TA1 - RTEMS_EVENT_14 received - eventout => 00004000 -TA1 - rtems_event_send - send RTEMS_EVENT_19 to TA2 -TA1 - rtems_clock_get - 08:15:00 02/12/1988 -<pause> -TA1 - rtems_event_send - send RTEMS_EVENT_18 to self after 5 seconds -TA1 - rtems_event_receive - waiting forever on RTEMS_EVENT_18 -TA2 - RTEMS_EVENT_10 received - eventout => 00000400 -TA2 - rtems_clock_get - 08:15:05 02/12/1988 -TA2 - rtems_event_receive - RTEMS_PENDING_EVENTS -TA2 - eventout => 00080000 -TA2 - rtems_event_receive - RTEMS_EVENT_19 - RTEMS_NO_WAIT -TA2 - RTEMS_EVENT_19 received - eventout => 00080000 -TA2 - rtems_task_delete - deletes self -TA1 - RTEMS_EVENT_18 received - eventout => 00040000 -TA1 - rtems_clock_get - 08:15:05 02/12/1988 -TA1 - rtems_event_send - send RTEMS_EVENT_3 to self -TA1 - rtems_event_receive - RTEMS_EVENT_3 or RTEMS_EVENT_22 - NO_WAIT and ANY -TA1 - RTEMS_EVENT_3 received - eventout => 00000008 -TA1 - rtems_event_send - send RTEMS_EVENT_4 to self -TA1 - rtems_event_receive - RTEMS_EVENT_4 or RTEMS_EVENT_5 - forever and ANY -TA1 - RTEMS_EVENT_4 received - eventout => 00000010 -<pause> -TA1 - rtems_event_send - send RTEMS_EVENT_18 to self after 5 seconds -TA1 - rtems_timer_cancel - cancelling timer for event RTEMS_EVENT_18 -TA1 - rtems_event_send - send RTEMS_EVENT_8 to self after 60 seconds -TA1 - rtems_event_send - send RTEMS_EVENT_9 to self after 60 seconds -TA1 - rtems_event_send - send RTEMS_EVENT_10 to self after 60 seconds -TA1 - rtems_timer_cancel - cancelling timer for event RTEMS_EVENT_8 -TA1 - rtems_clock_set - 08:15:00 02/12/1988 -TA1 - rtems_event_send - send RTEMS_EVENT_1 every second -TA1 - RTEMS_EVENT_1 received - eventout => 00000002 - at 08:15:01 02/12/1988 -TA1 - RTEMS_EVENT_1 received - eventout => 00000002 - at 08:15:02 02/12/1988 -TA1 - RTEMS_EVENT_1 received - eventout => 00000002 - at 08:15:03 02/12/1988 -TA1 - rtems_timer_cancel - cancelling timer for event RTEMS_EVENT_1 -<pause> -TA1 - rtems_event_send - sending RTEMS_EVENT_11 to self in 1 day -TA1 - rtems_event_send - sending RTEMS_EVENT_11 to self in 1 day -TA1 - rtems_event_send - sending RTEMS_EVENT_11 to self in 2 days -TA1 - rtems_timer_cancel - cancelling RTEMS_EVENT_11 to self in 1 day -TA1 - rtems_timer_cancel - cancelling RTEMS_EVENT_11 to self in 2 days -TA1 - rtems_event_send - resending RTEMS_EVENT_11 to self in 2 days -TA1 - rtems_clock_set - 08:15:03 02/15/1988 -TA1 - rtems_event_receive - waiting forever on RTEMS_EVENT_11 -TA1 - RTEMS_EVENT_11 received - eventout => 00000800 -<pause> -TA1 - rtems_event_send/rtems_event_receive combination -TA1 - rtems_clock_set - 08:15:00 02/12/1988 -TA1 - rtems_event_receive all outstanding events -TA1 - rtems_event_send - sending RTEMS_EVENT_10 to self in 1 day -TA1 - rtems_event_send - sending RTEMS_EVENT_11 to self in 2 days -TA1 - rtems_clock_set - 07:15:00 02/12/1988 -TA1 - set time backwards -TA1 - no events received -TA1 - rtems_clock_set - 07:15:00 02/14/1988 -TA1 - set time forwards (leave a timer) -TA1 - RTEMS_EVENT_10 received -TA1 - rtems_event_send - sending RTEMS_EVENT_11 to self in 100 ticks -TA1 - rtems_event_send - sending RTEMS_EVENT_11 to self in 200 ticks -*** END OF TEST 11 *** diff --git a/c/src/tests/sptests/sp11/system.h b/c/src/tests/sptests/sp11/system.h deleted file mode 100644 index aa2c6d17e4..0000000000 --- a/c/src/tests/sptests/sp11/system.h +++ /dev/null @@ -1,30 +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 <rtems.h> -#include "tmacros.h" - -/* Miscellaneous */ - -#define EXTERN extern /* external definition */ - -/* macros */ - -/* structures */ - -#include "gvar.h" - -/* end of include file */ diff --git a/c/src/tests/sptests/sp11/task1.c b/c/src/tests/sptests/sp11/task1.c deleted file mode 100644 index 1b2fc86040..0000000000 --- a/c/src/tests/sptests/sp11/task1.c +++ /dev/null @@ -1,410 +0,0 @@ -/* Task_1 - * - * This routine serves as a test task. It verifies the event maager. - * - * 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 Task_1( - rtems_task_argument argument -) -{ - rtems_event_set eventout; - rtems_time_of_day time; - rtems_status_code status; - rtems_unsigned32 index; - - puts( "TA1 - rtems_event_send - send RTEMS_EVENT_16 to TA2" ); - status = rtems_event_send( Task_id[ 2 ], RTEMS_EVENT_16 ); - directive_failed( status, "rtems_event_send" ); - - puts( - "TA1 - rtems_event_receive - waiting forever on " - "RTEMS_EVENT_14 and RTEMS_EVENT_15" - ); - status = rtems_event_receive( - RTEMS_EVENT_14 | RTEMS_EVENT_15, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT, - &eventout - ); - directive_failed( status, "rtems_event_receive" ); - printf( - "TA1 - RTEMS_EVENT_14 and RTEMS_EVENT_15 received - eventout => %08x\n", - eventout - ); - - puts( "TA1 - rtems_event_send - send RTEMS_EVENT_18 to TA2" ); - status = rtems_event_send( Task_id[ 2 ], RTEMS_EVENT_18 ); - directive_failed( status, "rtems_event_send" ); - - puts( - "TA1 - rtems_event_receive - waiting with 10 second timeout on RTEMS_EVENT_14" - ); - status = rtems_event_receive( - RTEMS_EVENT_14, - RTEMS_DEFAULT_OPTIONS, - 10 * TICKS_PER_SECOND, - &eventout - ); - directive_failed( status, "rtems_event_receive" ); - printf( "TA1 - RTEMS_EVENT_14 received - eventout => %08x\n", eventout ); - - puts( "TA1 - rtems_event_send - send RTEMS_EVENT_19 to TA2" ); - status = rtems_event_send( Task_id[ 2 ], RTEMS_EVENT_19 ); - directive_failed( status, "rtems_event_send" ); - - status = rtems_clock_get( RTEMS_CLOCK_GET_TOD, &time ); - directive_failed( status, "rtems_clock_get" ); - print_time( "TA1 - rtems_clock_get - ", &time, "\n" ); - -pause(); - - puts( "TA1 - rtems_event_send - send RTEMS_EVENT_18 to self after 5 seconds"); - status = rtems_timer_fire_after( - Timer_id[ 1 ], - 5 * TICKS_PER_SECOND, - TA1_send_18_to_self_5_seconds, - NULL - ); - directive_failed( status, "rtems_timer_fire_after 5 seconds" ); - - puts( "TA1 - rtems_event_receive - waiting forever on RTEMS_EVENT_18" ); - status = rtems_event_receive( - RTEMS_EVENT_18, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT, - &eventout - ); - directive_failed( status, "rtems_event_receive of 18" ); - printf( "TA1 - RTEMS_EVENT_18 received - eventout => %08x\n", eventout ); - - status = rtems_clock_get( RTEMS_CLOCK_GET_TOD, &time ); - directive_failed( status, "TA1 rtems_clock_get" ); - print_time( "TA1 - rtems_clock_get - ", &time, "\n" ); - - puts( "TA1 - rtems_event_send - send RTEMS_EVENT_3 to self" ); - status = rtems_event_send( RTEMS_SELF, RTEMS_EVENT_3 ); - directive_failed( status, "rtems_event_send" ); - - puts( - "TA1 - rtems_event_receive - RTEMS_EVENT_3 or " - "RTEMS_EVENT_22 - NO_WAIT and ANY" - ); - status = rtems_event_receive( - RTEMS_EVENT_3 | RTEMS_EVENT_22, - RTEMS_NO_WAIT | RTEMS_EVENT_ANY, - RTEMS_NO_TIMEOUT, - &eventout - ); - directive_failed( status, "rtems_event_receive of 3 and 22" ); - printf( "TA1 - RTEMS_EVENT_3 received - eventout => %08x\n", eventout ); - - puts( "TA1 - rtems_event_send - send RTEMS_EVENT_4 to self" ); - status = rtems_event_send( RTEMS_SELF, RTEMS_EVENT_4 ); - directive_failed( status, "rtems_event_send" ); - - puts ( - "TA1 - rtems_event_receive - RTEMS_EVENT_4 or " - "RTEMS_EVENT_5 - forever and ANY" - ); - status = rtems_event_receive( - RTEMS_EVENT_4 | RTEMS_EVENT_5, - RTEMS_EVENT_ANY, - RTEMS_NO_TIMEOUT, - &eventout - ); - directive_failed( status, "rtems_event_receive" ); - printf( "TA1 - RTEMS_EVENT_4 received - eventout => %08x\n", eventout ); - -pause(); - - puts( "TA1 - rtems_event_send - send RTEMS_EVENT_18 to self after 5 seconds"); - status = rtems_timer_fire_after( - Timer_id[ 1 ], - 5 * TICKS_PER_SECOND, - TA1_send_18_to_self_5_seconds, - NULL - ); - directive_failed( status, "rtems_timer_fire_after 5 seconds" ); - - puts( "TA1 - rtems_timer_cancel - cancelling timer for event RTEMS_EVENT_18"); - status = rtems_timer_cancel( Timer_id[ 1 ] ); - directive_failed( status, "rtems_timer_cancel" ); - - puts( "TA1 - rtems_event_send - send RTEMS_EVENT_8 to self after 60 seconds"); - status = rtems_timer_fire_after( - Timer_id[ 1 ], - 60 * TICKS_PER_SECOND, - TA1_send_8_to_self_60_seconds, - NULL - ); - directive_failed( status, "rtems_timer_fire_after 60 seconds" ); - - puts( "TA1 - rtems_event_send - send RTEMS_EVENT_9 to self after 60 seconds"); - status = rtems_timer_fire_after( - Timer_id[ 2 ], - 60 * TICKS_PER_SECOND, - TA1_send_9_to_self_60_seconds, - NULL - ); - directive_failed( status, "rtems_timer_fire_after 60 seconds" ); - - puts( - "TA1 - rtems_event_send - send RTEMS_EVENT_10 to self after 60 seconds" - ); - status = rtems_timer_fire_after( - Timer_id[ 3 ], - 60 * TICKS_PER_SECOND, - TA1_send_10_to_self, - NULL - ); - directive_failed( status, "rtems_timer_fire_after 60 seconds" ); - - puts( "TA1 - rtems_timer_cancel - cancelling timer for event RTEMS_EVENT_8" ); - status = rtems_timer_cancel( Timer_id[ 1 ] ); - directive_failed( status, "rtems_timer_cancel" ); - - build_time( &time, 2, 12, 1988, 8, 15, 0, 0 ); - - print_time( "TA1 - rtems_clock_set - ", &time, "\n" ); - status = rtems_clock_set( &time ); - directive_failed( status, "rtems_clock_set" ); - - puts( "TA1 - rtems_event_send - send RTEMS_EVENT_1 every second" ); - status = rtems_timer_fire_after( - Timer_id[ 1 ], - TICKS_PER_SECOND, - TA1_send_1_to_self_every_second, - NULL - ); - directive_failed( status, "rtems_timer_fire_after 1 second" ); - - for ( index = 0; index < 3; index++ ) { - - status = rtems_event_receive( - RTEMS_EVENT_1, - RTEMS_EVENT_ANY, - RTEMS_NO_TIMEOUT, - &eventout - ); - directive_failed( status, "rtems_event_receive" ); - - status = rtems_clock_get( RTEMS_CLOCK_GET_TOD, &time ); - directive_failed( status, "rtems_clock_get" ); - - printf( "TA1 - RTEMS_EVENT_1 received - eventout => %08x - ", eventout ); - print_time( "at ", &time, "\n" ); - - if ( index < 2 ) { - status = rtems_timer_reset( Timer_id[ 1 ] ); - directive_failed( status, "rtems_timer_reset" ); - }; - - } - - puts( "TA1 - rtems_timer_cancel - cancelling timer for event RTEMS_EVENT_1" ); - status = rtems_timer_cancel( Timer_id[ 1 ] ); - directive_failed( status, "rtems_timer_cancel" ); - -pause(); - - time.day = 13; - puts( "TA1 - rtems_event_send - sending RTEMS_EVENT_11 to self in 1 day" ); - status = rtems_timer_fire_when( - Timer_id[ 1 ], - &time, - TA1_send_11_to_self, - NULL - ); - directive_failed( status, "rtems_timer_fire_when 1 day" ); - - time.hour = 7; - puts( "TA1 - rtems_event_send - sending RTEMS_EVENT_11 to self in 1 day" ); - status = rtems_timer_fire_when( - Timer_id[ 2 ], - &time, - TA1_send_11_to_self, - NULL - ); - directive_failed( status, "rtems_timer_fire_when 1 day" ); - - time.hour = 8; /* so code below has correct time/date */ - time.day = 14; - puts( "TA1 - rtems_event_send - sending RTEMS_EVENT_11 to self in 2 days" ); - status = rtems_timer_fire_when( - Timer_id[ 3 ], - &time, - TA1_send_11_to_self, - NULL - ); - directive_failed( status, "rtems_timer_fire_when 2 days" ); - - puts("TA1 - rtems_timer_cancel - cancelling RTEMS_EVENT_11 to self in 1 day"); - status = rtems_timer_cancel( Timer_id[ 1 ] ); - directive_failed( status, "rtems_timer_cancel" ); - - puts( - "TA1 - rtems_timer_cancel - cancelling RTEMS_EVENT_11 to self in 2 days" - ); - status = rtems_timer_cancel( Timer_id[ 3 ] ); - directive_failed( status, "rtems_timer_cancel" ); - - puts( - "TA1 - rtems_event_send - resending RTEMS_EVENT_11 to self in 2 days" - ); - status = rtems_timer_fire_when( - Timer_id[ 3 ], - &time, - TA1_send_11_to_self, - NULL - ); - directive_failed( status, "rtems_timer_fire_when 2 days" ); - - time.day = 15; - print_time( "TA1 - rtems_clock_set - ", &time, "\n" ); - status = rtems_clock_set( &time ); - directive_failed( status, "TA1 rtems_clock_set" ); - - puts( "TA1 - rtems_event_receive - waiting forever on RTEMS_EVENT_11" ); - status = rtems_event_receive( - RTEMS_EVENT_11, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT, - &eventout - ); - directive_failed( status, "rtems_event_receive" ); - printf( "TA1 - RTEMS_EVENT_11 received - eventout => %08x\n", eventout ); - -pause(); - - puts( "TA1 - rtems_event_send/rtems_event_receive combination" ); - status = rtems_timer_fire_after( - Timer_id[ 1 ], - 10, - TA1_send_11_to_self, - NULL - ); - directive_failed( status, "rtems_timer_fire_after 10 ticks" ); - - status = rtems_event_receive( - RTEMS_EVENT_11, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT, - &eventout - ); - directive_failed( status, "rtems_event_receive" ); - - build_time( &time, 2, 12, 1988, 8, 15, 0, 0 ); - - print_time( "TA1 - rtems_clock_set - ", &time, "\n" ); - status = rtems_clock_set( &time ); - directive_failed( status, "rtems_clock_set" ); - - time.day = 13; - puts( "TA1 - rtems_event_receive all outstanding events" ); - status = rtems_event_receive( - RTEMS_ALL_EVENTS, - RTEMS_NO_WAIT | RTEMS_EVENT_ANY, - 0, - &eventout - ); - fatal_directive_status( - status, - RTEMS_UNSATISFIED, - "rtems_event_receive all events" - ); - - puts( "TA1 - rtems_event_send - sending RTEMS_EVENT_10 to self in 1 day" ); - status = rtems_timer_fire_when( - Timer_id[ 1 ], - &time, - TA1_send_10_to_self, - NULL - ); - directive_failed( status, "rtems_timer_fire_when 1 day" ); - - time.day = 14; - puts( "TA1 - rtems_event_send - sending RTEMS_EVENT_11 to self in 2 days" ); - status = rtems_timer_fire_when( - Timer_id[ 2 ], - &time, - TA1_send_11_to_self, - NULL - ); - directive_failed( status, "rtems_timer_fire_when 2 days" ); - - build_time( &time, 2, 12, 1988, 7, 15, 0, 0 ); - - print_time( "TA1 - rtems_clock_set - ", &time, "\n" ); - puts( "TA1 - set time backwards" ); - status = rtems_clock_set( &time ); - directive_failed( status, "rtems_clock_set" ); - - status = rtems_event_receive( - RTEMS_ALL_EVENTS, - RTEMS_NO_WAIT | RTEMS_EVENT_ANY, - RTEMS_NO_TIMEOUT, - &eventout - ); - if ( eventout ) printf( "ERROR -0x%08x events received\n", eventout ); - else puts( "TA1 - no events received" ); - fatal_directive_status( - status, - RTEMS_UNSATISFIED, - "rtems_event_receive all events" - ); - - build_time( &time, 2, 14, 1988, 7, 15, 0, 0 ); - - print_time( "TA1 - rtems_clock_set - ", &time, "\n" ); - puts( "TA1 - set time forwards (leave a timer)" ); - status = rtems_clock_set( &time ); - directive_failed( status, "rtems_clock_set" ); - - status = rtems_event_receive( - RTEMS_ALL_EVENTS, - RTEMS_NO_WAIT | RTEMS_EVENT_ANY, - RTEMS_NO_TIMEOUT, - &eventout - ); - if ( eventout == RTEMS_EVENT_10 ) puts( "TA1 - RTEMS_EVENT_10 received" ); - else printf( "ERROR -0x%08x events received\n", eventout ); - directive_failed( status, "rtems_event_receive all events" ); - - puts( "TA1 - rtems_event_send - sending RTEMS_EVENT_11 to self in 100 ticks"); - status = rtems_timer_fire_after( - Timer_id[ 1 ], - 100, - TA1_send_11_to_self, - NULL - ); - directive_failed( status, "rtems_timer_fire_after 100 ticks" ); - - puts( "TA1 - rtems_event_send - sending RTEMS_EVENT_11 to self in 200 ticks"); - status = rtems_timer_fire_after( - Timer_id[ 1 ], - 200, - TA1_send_11_to_self, - NULL - ); - directive_failed( status, "rtems_timer_fire_after 200 ticks" ); - - puts( "*** END OF TEST 11 ***" ); - exit( 0 ); -} diff --git a/c/src/tests/sptests/sp11/task2.c b/c/src/tests/sptests/sp11/task2.c deleted file mode 100644 index 176582bc36..0000000000 --- a/c/src/tests/sptests/sp11/task2.c +++ /dev/null @@ -1,126 +0,0 @@ -/* Task_2 - * - * This routine serves as a test task. Multiple tasks are required to - * verify all capabilities of the event manager. - * - * 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 Task_2( - rtems_task_argument argument -) -{ - rtems_event_set eventout; - rtems_time_of_day time; - rtems_status_code status; - - status = rtems_task_wake_after( 1*TICKS_PER_SECOND ); - directive_failed( status, "rtems_task_wake_after" ); - - puts( "TA2 - rtems_event_receive - waiting forever on RTEMS_EVENT_16" ); - status = rtems_event_receive( - RTEMS_EVENT_16, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT, - &eventout - ); - directive_failed( status, "rtems_event_receive" ); - printf( "TA2 - RTEMS_EVENT_16 received - eventout => %08x\n", eventout ); - - puts( - "TA2 - rtems_event_send - send RTEMS_EVENT_14 and RTEMS_EVENT_15 to TA1" - ); - status = rtems_event_send( Task_id[ 1 ], RTEMS_EVENT_14 | RTEMS_EVENT_15 ); - directive_failed( status, "rtems_event_send" ); - - puts( - "TA2 - rtems_event_receive - RTEMS_EVENT_17 or " - "RTEMS_EVENT_18 - forever and ANY" - ); - status = rtems_event_receive( - RTEMS_EVENT_17 | RTEMS_EVENT_18, - RTEMS_EVENT_ANY, - RTEMS_NO_TIMEOUT, - &eventout - ); - directive_failed( status, "rtems_event_receive" ); - printf( - "TA2 - RTEMS_EVENT_17 or RTEMS_EVENT_18 received - eventout => %08x\n", - eventout - ); - - puts( "TA2 - rtems_event_send - send RTEMS_EVENT_14 to TA1" ); - status = rtems_event_send( Task_id[ 1 ], RTEMS_EVENT_14 ); - directive_failed( status, "rtems_event_send" ); - - build_time( &time, 2, 12, 1988, 8, 15, 0, 0 ); - print_time( "TA2 - rtems_clock_set - ", &time, "\n" ); - status = rtems_clock_set( &time ); - directive_failed( status, "TA2 rtems_clock_set" ); - - time.second += 5; - puts( - "TA2 - rtems_event_send - sending RTEMS_EVENT_10 to self after 5 seconds" - ); - status = rtems_timer_fire_when( - Timer_id[ 5 ], - &time, - TA2_send_10_to_self, - NULL - ); - directive_failed( status, "rtems_timer_fire_when after 5 seconds" ); - - puts( "TA2 - rtems_event_receive - waiting forever on RTEMS_EVENT_10" ); - status = rtems_event_receive( - RTEMS_EVENT_10, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT, - &eventout - ); - directive_failed( status, "rtems_event_receive" ); - - status = rtems_clock_get( RTEMS_CLOCK_GET_TOD, &time ); - directive_failed( status, "rtems_clock_get" ); - - printf( "TA2 - RTEMS_EVENT_10 received - eventout => %08x\n", eventout ); - print_time( "TA2 - rtems_clock_get - ", &time, "\n" ); - - puts( "TA2 - rtems_event_receive - RTEMS_PENDING_EVENTS" ); - status = rtems_event_receive( - RTEMS_PENDING_EVENTS, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT, - &eventout - ); - directive_failed( status, "rtems_event_receive" ); - printf( "TA2 - eventout => %08x\n", eventout ); - - puts( "TA2 - rtems_event_receive - RTEMS_EVENT_19 - RTEMS_NO_WAIT" ); - status = rtems_event_receive( - RTEMS_EVENT_19, - RTEMS_NO_WAIT, - RTEMS_NO_TIMEOUT, - &eventout - ); - directive_failed( status, "rtems_event_receive" ); - printf( "TA2 - RTEMS_EVENT_19 received - eventout => %08x\n", eventout ); - - puts( "TA2 - rtems_task_delete - deletes self" ); - status = rtems_task_delete( Task_id[ 2 ] ); - directive_failed( status, "rtems_task_delete of TA2" ); -} diff --git a/c/src/tests/sptests/sp11/timer.c b/c/src/tests/sptests/sp11/timer.c deleted file mode 100644 index 3ec11b7345..0000000000 --- a/c/src/tests/sptests/sp11/timer.c +++ /dev/null @@ -1,97 +0,0 @@ -/* Timer_functions - * - * These routines are the timer service routines used by this test. - * - * Input parameters: NONE - * - * 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_timer_service_routine TA1_send_18_to_self_5_seconds( - rtems_id ignored_id, - void *ignored_address -) -{ - rtems_status_code status; - - status = rtems_event_send( Task_id[ 1 ], RTEMS_EVENT_18 ); - directive_failed( status, "rtems_event_send of 18" ); -} - -rtems_timer_service_routine TA1_send_8_to_self_60_seconds( - rtems_id ignored_id, - void *ignored_address -) -{ - rtems_status_code status; - - status = rtems_event_send( Task_id[ 1 ], RTEMS_EVENT_8 ); - directive_failed( status, "rtems_event_send of 8" ); -} - -rtems_timer_service_routine TA1_send_9_to_self_60_seconds( - rtems_id ignored_id, - void *ignored_address -) -{ - rtems_status_code status; - - status = rtems_event_send( Task_id[ 1 ], RTEMS_EVENT_9 ); - directive_failed( status, "rtems_event_send of 9" ); -} - -rtems_timer_service_routine TA1_send_10_to_self( - rtems_id ignored_id, - void *ignored_address -) -{ - rtems_status_code status; - - status = rtems_event_send( Task_id[ 1 ], RTEMS_EVENT_10 ); - directive_failed( status, "rtems_event_send of 10" ); -} - -rtems_timer_service_routine TA1_send_1_to_self_every_second( - rtems_id ignored_id, - void *ignored_address -) -{ - rtems_status_code status; - - status = rtems_event_send( Task_id[ 1 ], RTEMS_EVENT_1 ); - directive_failed( status, "rtems_event_send of 1" ); -} - -rtems_timer_service_routine TA1_send_11_to_self( - rtems_id ignored_id, - void *ignored_address -) -{ - rtems_status_code status; - - status = rtems_event_send( Task_id[ 1 ], RTEMS_EVENT_11 ); - directive_failed( status, "rtems_event_send of 11" ); -} - -rtems_timer_service_routine TA2_send_10_to_self( - rtems_id ignored_id, - void *ignored_address -) -{ - rtems_status_code status; - - status = rtems_event_send( Task_id[ 2 ], RTEMS_EVENT_10 ); - directive_failed( status, "rtems_event_send of 10" ); -} diff --git a/c/src/tests/sptests/sp12/init.c b/c/src/tests/sptests/sp12/init.c deleted file mode 100644 index dd702ca75e..0000000000 --- a/c/src/tests/sptests/sp12/init.c +++ /dev/null @@ -1,176 +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$ - */ - -#include "system.h" -#undef EXTERN -#define EXTERN -#include "conftbl.h" -#include "gvar.h" - -rtems_task Init( - rtems_task_argument argument -) -{ - rtems_status_code status; - - puts( "\n\n*** TEST 12 ***" ); - - Task_name[ 1 ] = rtems_build_name( 'T', 'A', '1', ' ' ); - Task_name[ 2 ] = rtems_build_name( 'T', 'A', '2', ' ' ); - Task_name[ 3 ] = rtems_build_name( 'T', 'A', '3', ' ' ); - Task_name[ 4 ] = rtems_build_name( 'T', 'A', '4', ' ' ); - Task_name[ 5 ] = rtems_build_name( 'T', 'A', '5', ' ' ); - - Priority_task_name[ 1 ] = rtems_build_name( 'P', 'R', 'I', '1' ); - Priority_task_name[ 2 ] = rtems_build_name( 'P', 'R', 'I', '2' ); - Priority_task_name[ 3 ] = rtems_build_name( 'P', 'R', 'I', '3' ); - Priority_task_name[ 4 ] = rtems_build_name( 'P', 'R', 'I', '4' ); - Priority_task_name[ 5 ] = rtems_build_name( 'P', 'R', 'I', '5' ); - - Semaphore_name[ 1 ] = rtems_build_name( 'S', 'M', '1', ' ' ); - Semaphore_name[ 2 ] = rtems_build_name( 'S', 'M', '2', ' ' ); - Semaphore_name[ 3 ] = rtems_build_name( 'S', 'M', '3', ' ' ); - - status = rtems_semaphore_create( - Semaphore_name[ 1 ], - 1, - RTEMS_DEFAULT_ATTRIBUTES, - &Semaphore_id[ 1 ] - ); - directive_failed( status, "rtems_semaphore_create of SM1" ); - - status = rtems_semaphore_create( - Semaphore_name[ 2 ], - 0, - RTEMS_PRIORITY, - &Semaphore_id[ 2 ] - ); - directive_failed( status, "rtems_semaphore_create of SM2" ); - - status = rtems_semaphore_create( - Semaphore_name[ 3 ], - 1, - RTEMS_DEFAULT_ATTRIBUTES, - &Semaphore_id[ 3 ] - ); - directive_failed( status, "rtems_semaphore_create of SM3" ); - - puts( "INIT - Forward priority queue test" ); - Priority_test_driver( 0 ); - - puts( "INIT - Backward priority queue test" ); - Priority_test_driver( 32 ); - -pause(); - - puts( "INIT - Binary Semaphore and Priority Inheritance Test" ); - - status = rtems_semaphore_delete( Semaphore_id[ 2 ] ); - directive_failed( status, "rtems_semaphore_delete of SM2" ); - - puts( "INIT - rtems_semaphore_create - allocated binary semaphore" ); - status = rtems_semaphore_create( - Semaphore_name[ 2 ], - 0, - RTEMS_BINARY_SEMAPHORE | RTEMS_PRIORITY | RTEMS_INHERIT_PRIORITY, - &Semaphore_id[ 2 ] - ); - directive_failed( status, "rtems_semaphore_create of priority inherit SM2" ); - - puts( "INIT - rtems_semaphore_release - allocated binary semaphore" ); - status = rtems_semaphore_release( Semaphore_id[ 2 ] ); - directive_failed( status, "rtems_semaphore_release of SM2" ); - - puts( "INIT - rtems_semaphore_delete - allocated binary semaphore" ); - status = rtems_semaphore_delete( Semaphore_id[ 2 ] ); - directive_failed( status, "rtems_semaphore_delete of SM2" ); - - status = rtems_semaphore_create( - Semaphore_name[ 2 ], - 1, - RTEMS_BINARY_SEMAPHORE | RTEMS_PRIORITY | RTEMS_INHERIT_PRIORITY, - &Semaphore_id[ 2 ] - ); - directive_failed( status, "rtems_semaphore_create of priority inherit SM2" ); - - Priority_test_driver( 64 ); - -pause(); - - status = rtems_semaphore_delete( Semaphore_id[ 2 ] ); - directive_failed( status, "rtems_semaphore_delete of SM2" ); - - status = rtems_semaphore_create( - Semaphore_name[ 2 ], - 0, - RTEMS_PRIORITY, - &Semaphore_id[ 2 ] - ); - directive_failed( status, "rtems_semaphore_create of priority SM2" ); - - status = rtems_semaphore_release( Semaphore_id[ 2 ] ); - directive_failed( status, "rtems_semaphore_release of SM2" ); - - status = rtems_task_create( - Task_name[ 1 ], - 4, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 1 ] - ); - directive_failed( status, "rtems_task_create of TA1" ); - - status = rtems_task_create( - Task_name[ 2 ], - 4, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 2 ] - ); - directive_failed( status, "rtems_task_create of TA2" ); - - status = rtems_task_create( - Task_name[ 3 ], - 4, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 3 ] - ); - directive_failed( status, "rtems_task_create of TA3" ); - - status = rtems_task_start( Task_id[ 1 ], Task_1, 0 ); - directive_failed( status, "rtems_task_start of TA1" ); - - status = rtems_task_start( Task_id[ 2 ], Task_2, 0 ); - directive_failed( status, "rtems_task_start of TA2" ); - - status = rtems_task_start( Task_id[ 3 ], Task_3, 0 ); - directive_failed( status, "rtems_task_start of TA3" ); - - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of RTEMS_SELF" ); -} diff --git a/c/src/tests/sptests/sp12/pridrv.c b/c/src/tests/sptests/sp12/pridrv.c deleted file mode 100644 index 7174faf784..0000000000 --- a/c/src/tests/sptests/sp12/pridrv.c +++ /dev/null @@ -1,131 +0,0 @@ -/* Priority_test_driver - * - * 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: - * priority_base - priority_base switch - * - * 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" - -void Priority_test_driver( - rtems_unsigned32 priority_base -) -{ - rtems_task_priority previous_priority; - rtems_unsigned32 index; - rtems_status_code status; - - for ( index = 1 ; index <= 5 ; index++ ) { - switch ( index ) { - case 1: - case 2: - case 3: - Task_priority[ index ] = priority_base + index; - break; - default: - Task_priority[ index ] = priority_base + 3; - break; - } - - status = rtems_task_create( - Priority_task_name[ index ], - Task_priority[ index ], - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Priority_task_id[ index ] - ); - directive_failed( status, "rtems_task_create loop" ); - - } - - if ( priority_base == 0 ) { - for ( index = 1 ; index <= 5 ; index++ ) { - status = rtems_task_start( - Priority_task_id[ index ], - Priority_task, - index - ); - directive_failed( status, "rtems_task_start loop" ); - } - } else { - for ( index = 5 ; index >= 1 ; index-- ) { - status = rtems_task_start( - Priority_task_id[ index ], - Priority_task, - index - ); - directive_failed( status, "rtems_task_start loop" ); - - status = rtems_task_wake_after( TICKS_PER_SECOND ); - directive_failed( status, "rtems_task_wake_after loop" ); - - if ( priority_base == 64 ) { - if ( index == 4 ) { - status = rtems_task_set_priority( - Priority_task_id[ 5 ], - priority_base + 4, - &previous_priority - ); - printf( "PDRV - change priority of PRI5 from %d to %d\n", - previous_priority, - priority_base + 4 - ); - directive_failed( status, "PDRV rtems_task_set_priority" ); - } - status = rtems_task_set_priority( - Priority_task_id[ 5 ], - RTEMS_CURRENT_PRIORITY, - &previous_priority - ); - directive_failed( status, "PDRV rtems_task_set_priority CURRENT" ); - printf( "PDRV - priority of PRI5 is %d\n", previous_priority ); - } - } - } - - status = rtems_task_wake_after( TICKS_PER_SECOND ); - directive_failed( status, "rtems_task_wake_after after loop" ); - - if ( priority_base == 0 ) { - for ( index = 1 ; index <= 5 ; index++ ) { - status = rtems_semaphore_release( Semaphore_id[ 2 ] ); - directive_failed( status, "rtems_semaphore_release loop" ); - } - } - - if ( priority_base == 64 ) { - puts( "PDRV - rtems_task_resume - PRI5" ); - status = rtems_task_resume( Priority_task_id[ 5 ] ); - directive_failed( status, "rtems_task_resume" ); - - status = rtems_task_wake_after( 1 * TICKS_PER_SECOND ); - directive_failed( status, "rtems_task_wake_after so PRI5 can run" ); - - status = rtems_task_delete( Priority_task_id[ 5 ] ); - directive_failed( status, "rtems_task_delete of PRI5" ); - } - else { - for ( index = 1 ; index <= 5 ; index++ ) { - status = rtems_task_delete( Priority_task_id[ index ] ); - directive_failed( status, "rtems_task_delete loop" ); - } - } -} diff --git a/c/src/tests/sptests/sp12/pritask.c b/c/src/tests/sptests/sp12/pritask.c deleted file mode 100644 index 155ef345cd..0000000000 --- a/c/src/tests/sptests/sp12/pritask.c +++ /dev/null @@ -1,91 +0,0 @@ -/* Priority_task - * - * This routine serves as a test task. It verifies the semaphore manager. - * - * Input parameters: - * its_index - priority index - * - * 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 Priority_task( - rtems_task_argument its_index -) -{ - rtems_interval timeout; - rtems_task_priority its_priority; - rtems_task_priority current_priority; - rtems_status_code status; - rtems_unsigned32 index; - - its_priority = Task_priority[ its_index ]; - - if ( its_priority < 3 ) - timeout = 5 * TICKS_PER_SECOND; - else - timeout = RTEMS_NO_TIMEOUT; - - put_name( Priority_task_name[ its_index ], FALSE ); - puts( " - rtems_semaphore_obtain - wait forever on SM2" ); - - status = rtems_semaphore_obtain( - Semaphore_id[ 2 ], - RTEMS_DEFAULT_OPTIONS, - timeout - ); - directive_failed( status, "rtems_semaphore_obtain of SM2" ); - - if ( its_priority < 64 ) { - printf( "PRI%d - WHY AM I HERE? (pri=%d)", its_index, its_priority ); - exit( 0 ); - } - - if ( its_index == 5 ) - puts( "PRI5 - rtems_task_suspend - until all priority tasks blocked" ); - status = rtems_task_suspend( RTEMS_SELF ); - directive_failed( status, "rtems_task_suspend" ); - - puts( "PRI5 - rtems_task_delete - all tasks waiting on SM2" ); - for ( index = 1 ; index < 5 ; index++ ) { - status = rtems_task_delete( Priority_task_id[ index ] ); - directive_failed( status, "rtems_task_delete loop" ); - } - - puts( "PRI5 - rtems_semaphore_obtain - nested" ); - status = rtems_semaphore_obtain( - Semaphore_id[ 2 ], - RTEMS_DEFAULT_OPTIONS, - timeout - ); - directive_failed( status, "rtems_semaphore_obtain nested" ); - - puts( "PRI5 - rtems_semaphore_release - nested" ); - status = rtems_semaphore_release( Semaphore_id[ 2 ] ); - directive_failed( status, "rtems_semaphore_release nested " ); - - puts( "PRI5 - rtems_semaphore_release - restore priority" ); - status = rtems_semaphore_release( Semaphore_id[ 2 ] ); - directive_failed( status, "rtems_semaphore_release" ); - - status = rtems_task_set_priority( - RTEMS_SELF, - RTEMS_CURRENT_PRIORITY, - ¤t_priority - ); - directive_failed( status, "PRI5 rtems_task_set_priority CURRENT" ); - printf( "PRI5 - priority of PRI5 is %d\n", current_priority ); - - (void) rtems_task_suspend( RTEMS_SELF ); -} diff --git a/c/src/tests/sptests/sp12/sp12.doc b/c/src/tests/sptests/sp12/sp12.doc deleted file mode 100644 index fc19d92ed7..0000000000 --- a/c/src/tests/sptests/sp12/sp12.doc +++ /dev/null @@ -1,27 +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: test12 - -directives: - ex_init, ex_start, t_create, t_start, t_delete, tm_tick, i_return, - sm_create, sm_ident, sm_delete, sm_p, sm_v, tm_wkafter, t_setpri - -concepts: - - a. This test checks out the semaphore manager. - - b. This test forces _Flush_taskq() to unblock a task waiting - on a deleted object. diff --git a/c/src/tests/sptests/sp12/sp12.scn b/c/src/tests/sptests/sp12/sp12.scn deleted file mode 100644 index 82ceca3c6e..0000000000 --- a/c/src/tests/sptests/sp12/sp12.scn +++ /dev/null @@ -1,78 +0,0 @@ -*** TEST 12 *** -INIT - Forward priority queue test -PRI1 - rtems_semaphore_obtain - wait forever on SM2 -PRI2 - rtems_semaphore_obtain - wait forever on SM2 -PRI3 - rtems_semaphore_obtain - wait forever on SM2 -PRI4 - rtems_semaphore_obtain - wait forever on SM2 -PRI5 - rtems_semaphore_obtain - wait forever on SM2 -INIT - Backward priority queue test -PRI5 - rtems_semaphore_obtain - wait forever on SM2 -PRI4 - rtems_semaphore_obtain - wait forever on SM2 -PRI3 - rtems_semaphore_obtain - wait forever on SM2 -PRI2 - rtems_semaphore_obtain - wait forever on SM2 -PRI1 - rtems_semaphore_obtain - wait forever on SM2 -<pause> -INIT - Binary Semaphore and Priority Inheritance Test -INIT - rtems_semaphore_create - allocated binary semaphore -INIT - rtems_semaphore_release - allocated binary semaphore -INIT - rtems_semaphore_delete - allocated binary semaphore -PRI5 - rtems_semaphore_obtain - wait forever on SM2 -PRI5 - rtems_task_suspend - until all priority tasks blocked -PDRV - priority of PRI5 is 67 -PRI4 - rtems_semaphore_obtain - wait forever on SM2 -PDRV - change priority of PRI5 from 67 to 68 -PDRV - priority of PRI5 is 67 -PRI3 - rtems_semaphore_obtain - wait forever on SM2 -PDRV - priority of PRI5 is 67 -PRI2 - rtems_semaphore_obtain - wait forever on SM2 -PDRV - priority of PRI5 is 66 -PRI1 - rtems_semaphore_obtain - wait forever on SM2 -PDRV - priority of PRI5 is 65 -PDRV - rtems_task_resume - PRI5 -PRI5 - rtems_task_delete - all tasks waiting on SM2 -PRI5 - rtems_semaphore_obtain - nested -PRI5 - rtems_semaphore_release - nested -PRI5 - rtems_semaphore_release - restore priority -PRI5 - priority of PRI5 is 68 -<pause> -TA1 - rtems_semaphore_ident - smid => 00010001 -TA1 - rtems_semaphore_obtain - wait forever on SM2 -TA1 - got SM2 -TA1 - rtems_semaphore_obtain - wait forever on SM3 -TA1 - got SM3 -TA1 - rtems_semaphore_obtain - get SM1 - RTEMS_NO_WAIT -TA1 - got SM1 -TA1 - rtems_task_wake_after - sleep 5 seconds -TA2 - rtems_semaphore_obtain - wait forever on SM1 -TA3 - rtems_semaphore_obtain - wait forever on SM2 -<pause> -TA1 - rtems_semaphore_release - release SM1 -TA1 - rtems_semaphore_obtain - waiting for SM1 with 10 second timeout -TA2 - got SM1 -TA2 - rtems_semaphore_release - release SM1 -TA2 - rtems_task_set_priority - make self highest priority task -TA2 - rtems_semaphore_obtain - wait forever on SM2 -TA1 - got SM1 -TA1 - rtems_semaphore_release - release SM2 -TA2 - got SM2 -TA2 - rtems_semaphore_release - release SM2 -TA2 - rtems_task_delete - delete self -TA1 - rtems_task_wake_after - sleep 5 seconds -TA3 - got SM2 -TA3 - rtems_semaphore_release - release SM2 -TA3 - rtems_semaphore_obtain - wait forever on SM3 -<pause> -TA1 - rtems_task_delete - delete TA3 -TA1 - rtems_task_wake_after - sleep 5 seconds -TA4 - rtems_semaphore_obtain - wait forever on SM1 -TA5 - rtems_semaphore_obtain - wait forever on SM1 -TA1 - rtems_task_delete - delete TA4 -TA1 - rtems_semaphore_release - release SM1 -TA1 - rtems_task_wake_after - sleep 5 seconds -TA5 - got SM1 -TA5 - rtems_semaphore_obtain - wait forever on SM1 -TA1 - rtems_semaphore_delete - delete SM1 -TA1 - rtems_semaphore_delete - delete SM3 -TA1 - rtems_task_delete - delete self -TA5 - SM1 deleted by TA1 -*** END OF TEST 12 *** diff --git a/c/src/tests/sptests/sp12/system.h b/c/src/tests/sptests/sp12/system.h deleted file mode 100644 index aa2c6d17e4..0000000000 --- a/c/src/tests/sptests/sp12/system.h +++ /dev/null @@ -1,30 +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 <rtems.h> -#include "tmacros.h" - -/* Miscellaneous */ - -#define EXTERN extern /* external definition */ - -/* macros */ - -/* structures */ - -#include "gvar.h" - -/* end of include file */ diff --git a/c/src/tests/sptests/sp12/task1.c b/c/src/tests/sptests/sp12/task1.c deleted file mode 100644 index d3d7f3ed15..0000000000 --- a/c/src/tests/sptests/sp12/task1.c +++ /dev/null @@ -1,153 +0,0 @@ -/* Task_1 - * - * This routine serves as a test task. It verifies the semaphore manager. - * - * 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 Task_1( - rtems_task_argument argument -) -{ - rtems_id smid; - rtems_status_code status; - - status = rtems_semaphore_ident( - Semaphore_name[ 1 ], - RTEMS_SEARCH_ALL_NODES, - &smid - ); - printf( "TA1 - rtems_semaphore_ident - smid => %08x\n", smid ); - directive_failed( status, "rtems_semaphore_ident of SM1" ); - - puts( "TA1 - rtems_semaphore_obtain - wait forever on SM2" ); - status = rtems_semaphore_obtain( - Semaphore_id[ 2 ], - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT - ); - directive_failed( status, "rtems_semaphore_obtain of SM2" ); - puts( "TA1 - got SM2" ); - - puts( "TA1 - rtems_semaphore_obtain - wait forever on SM3" ); - status = rtems_semaphore_obtain( - Semaphore_id[ 3 ], - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT - ); - directive_failed( status, "rtems_semaphore_obtain of SM3" ); - puts( "TA1 - got SM3" ); - - puts( "TA1 - rtems_semaphore_obtain - get SM1 - RTEMS_NO_WAIT" ); - status = rtems_semaphore_obtain( - Semaphore_id[ 1 ], - RTEMS_NO_WAIT, - RTEMS_NO_TIMEOUT - ); - directive_failed( status, "rtems_semaphore_obtain of SM1" ); - puts( "TA1 - got SM1" ); - - puts( "TA1 - rtems_task_wake_after - sleep 5 seconds" ); - status = rtems_task_wake_after( 5*TICKS_PER_SECOND ); - directive_failed( status, "rtems_task_wake_after" ); - -pause(); - - puts( "TA1 - rtems_semaphore_release - release SM1" ); - status = rtems_semaphore_release( Semaphore_id[ 1 ] ); - directive_failed( status, "rtems_semaphore_release of SM1" ); - - puts( - "TA1 - rtems_semaphore_obtain - waiting for SM1 with 10 second timeout" - ); - status = rtems_semaphore_obtain( - Semaphore_id[ 1 ], - RTEMS_DEFAULT_OPTIONS, - 10 * TICKS_PER_SECOND - ); - directive_failed( status, "rtems_semaphore_obtain of SM1" ); - puts( "TA1 - got SM1" ); - - puts( "TA1 - rtems_semaphore_release - release SM2" ); - status = rtems_semaphore_release( Semaphore_id[ 2 ] ); - directive_failed( status, "rtems_semaphore_release of SM2" ); - - puts( "TA1 - rtems_task_wake_after - sleep 5 seconds" ); - status = rtems_task_wake_after( 5*TICKS_PER_SECOND ); - directive_failed( status, "rtems_task_wake_after" ); - -pause(); - - puts( "TA1 - rtems_task_delete - delete TA3" ); - status = rtems_task_delete( Task_id[ 3 ] ); - directive_failed( status, "rtems_task_delete of TA3" ); - - status = rtems_task_create( - Task_name[ 4 ], - 4, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 4 ] - ); - directive_failed( status, "rtems_task_create of TA4" ); - - status = rtems_task_create( - Task_name[ 5 ], - 4, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 5 ] - ); - directive_failed( status, "rtems_task_create of TA5" ); - - status = rtems_task_start( Task_id[ 4 ], Task_4, 0 ); - directive_failed( status, "rtems_task_start of TA4" ); - - status = rtems_task_start( Task_id[ 5 ], Task5, 0 ); - directive_failed( status, "rtems_task_start of TA5" ); - - puts( "TA1 - rtems_task_wake_after - sleep 5 seconds" ); - status = rtems_task_wake_after( 5*TICKS_PER_SECOND ); - directive_failed( status, "rtems_task_wake_after" ); - - puts( "TA1 - rtems_task_delete - delete TA4" ); - status = rtems_task_delete( Task_id[ 4 ] ); - directive_failed( status, "rtems_task_delete of TA4" ); - - puts( "TA1 - rtems_semaphore_release - release SM1" ); - status = rtems_semaphore_release( Semaphore_id[ 1 ] ); - directive_failed( status, "rtems_semaphore_release on SM1" ); - - puts( "TA1 - rtems_task_wake_after - sleep 5 seconds" ); - status = rtems_task_wake_after( 5*TICKS_PER_SECOND ); - directive_failed( status, "rtems_task_wake_after" ); - - puts( "TA1 - rtems_semaphore_delete - delete SM1" ); - status = rtems_semaphore_delete( Semaphore_id[ 1 ] ); - directive_failed( status, "rtems_semaphore_delete of SM1" ); - - puts( "TA1 - rtems_semaphore_delete - delete SM3" ); - status = rtems_semaphore_delete( Semaphore_id[ 3 ] ); - directive_failed( status, "rtems_semaphore_delete of SM3" ); - - puts( "TA1 - rtems_task_delete - delete self" ); - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of TA1" ); -} diff --git a/c/src/tests/sptests/sp12/task2.c b/c/src/tests/sptests/sp12/task2.c deleted file mode 100644 index 41d6735162..0000000000 --- a/c/src/tests/sptests/sp12/task2.c +++ /dev/null @@ -1,65 +0,0 @@ -/* Task_2 - * - * This routine serves as a test task. It simply obtains semaphores - * 1 and 2, the later when it is a high priority task. - * - * 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 Task_2( - rtems_task_argument argument -) -{ - rtems_status_code status; - rtems_task_priority previous_priority; - - puts( "TA2 - rtems_semaphore_obtain - wait forever on SM1" ); - status = rtems_semaphore_obtain( - Semaphore_id[ 1 ], - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT - ); - puts( "TA2 - got SM1" ); - directive_failed( status, "rtems_semaphore_obtain on SM1" ); - - puts( "TA2 - rtems_semaphore_release - release SM1" ); - status = rtems_semaphore_release( Semaphore_id[ 1 ] ); - directive_failed( status, "rtems_semaphore_release on SM1" ); - - puts( "TA2 - rtems_task_set_priority - make self highest priority task" ); - status = rtems_task_set_priority( RTEMS_SELF, 3, &previous_priority ); - directive_failed( status, "rtems_task_set_priority on TA2" ); - - puts( "TA2 - rtems_semaphore_obtain - wait forever on SM2" ); - status = rtems_semaphore_obtain( - Semaphore_id[ 2 ], - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT - ); - puts( "TA2 - got SM2" ); - directive_failed( status, "rtems_semaphore_obtain on SM2" ); - - puts( "TA2 - rtems_semaphore_release - release SM2" ); - status = rtems_semaphore_release( Semaphore_id[ 2 ] ); - directive_failed( status, "rtems_semaphore_release on SM2" ); - - puts( "TA2 - rtems_task_delete - delete self" ); - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of TA2" ); -} diff --git a/c/src/tests/sptests/sp12/task3.c b/c/src/tests/sptests/sp12/task3.c deleted file mode 100644 index 7340b84ce6..0000000000 --- a/c/src/tests/sptests/sp12/task3.c +++ /dev/null @@ -1,50 +0,0 @@ -/* Task_3 - * - * This routine serves as a test task. It simply obtains semaphore - * 2 and waits forever attempting to obtain semaphore 3. - * - * 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 Task_3( - rtems_task_argument argument -) -{ - rtems_status_code status; - - puts( "TA3 - rtems_semaphore_obtain - wait forever on SM2" ); - status = rtems_semaphore_obtain( - Semaphore_id[ 2 ], - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT - ); - directive_failed( status, "rtems_semaphore_obtain on SM2" ); - puts( "TA3 - got SM2" ); - - puts( "TA3 - rtems_semaphore_release - release SM2" ); - status = rtems_semaphore_release( Semaphore_id[ 2 ] ); - directive_failed( status, "rtems_semaphore_release on SM2" ); - - puts( "TA3 - rtems_semaphore_obtain - wait forever on SM3" ); - status = rtems_semaphore_obtain( - Semaphore_id[ 3 ], - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT - ); - directive_failed( status, "rtems_semaphore_obtain on SM3" ); -} diff --git a/c/src/tests/sptests/sp12/task4.c b/c/src/tests/sptests/sp12/task4.c deleted file mode 100644 index 9a0e952613..0000000000 --- a/c/src/tests/sptests/sp12/task4.c +++ /dev/null @@ -1,37 +0,0 @@ -/* Task_4 - * - * This routine serves as a test task. It waits forever attempting - * to obtain semaphore 1. However, it should never get the 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 Task_4( - rtems_task_argument argument -) -{ - rtems_status_code status; - - puts( "TA4 - rtems_semaphore_obtain - wait forever on SM1" ); - status = rtems_semaphore_obtain( - Semaphore_id[ 1 ], - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT - ); - directive_failed( status, "rtems_semaphore_obtain on SM1" ); -} diff --git a/c/src/tests/sptests/sp12/task5.c b/c/src/tests/sptests/sp12/task5.c deleted file mode 100644 index ccf10cd11a..0000000000 --- a/c/src/tests/sptests/sp12/task5.c +++ /dev/null @@ -1,55 +0,0 @@ -/* Task5 - * - * This routine serves as a test task. It obtains semaphore 1 correctly - * once, then waits for semaphore 1 again. Task 1 should delete the - * semaphore, thus waking this task up. - * - * 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 Task5( - rtems_task_argument argument -) -{ - rtems_status_code status; - - puts( "TA5 - rtems_semaphore_obtain - wait forever on SM1" ); - status = rtems_semaphore_obtain( - Semaphore_id[ 1 ], - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT - ); - directive_failed( status, "rtems_semaphore_obtain on SM1" ); - puts( "TA5 - got SM1" ); - - puts( "TA5 - rtems_semaphore_obtain - wait forever on SM1" ); - status = rtems_semaphore_obtain( - Semaphore_id[ 1 ], - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT - ); - fatal_directive_status( - status, - RTEMS_OBJECT_WAS_DELETED, - "rtems_semaphore_obtain on SM1" - ); - puts( "TA5 - SM1 deleted by TA1" ); - - puts( "*** END OF TEST 12 ***" ); - exit( 0 ); -} diff --git a/c/src/tests/sptests/sp13/fillbuff.c b/c/src/tests/sptests/sp13/fillbuff.c deleted file mode 100644 index 43ccd86803..0000000000 --- a/c/src/tests/sptests/sp13/fillbuff.c +++ /dev/null @@ -1,31 +0,0 @@ -/* Fill_buffer - * - * This test routine copies a given source string to a given destination - * buffer. - * - * Input parameters: - * source - pointer to string to be copied - * buffer - pointer to message buffer to be filled - * - * 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" - -void Fill_buffer( - char *source, - long *buffer -) -{ - memcpy( buffer, source, 16 ); -} diff --git a/c/src/tests/sptests/sp13/init.c b/c/src/tests/sptests/sp13/init.c deleted file mode 100644 index 0629cdff21..0000000000 --- a/c/src/tests/sptests/sp13/init.c +++ /dev/null @@ -1,112 +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$ - */ - -#include "system.h" -#undef EXTERN -#define EXTERN -#include "conftbl.h" -#include "gvar.h" - -rtems_task Init( - rtems_task_argument argument -) -{ - rtems_status_code status; - - puts( "\n\n*** TEST 13 ***" ); - - Task_name[ 1 ] = rtems_build_name( 'T', 'A', '1', ' ' ); - Task_name[ 2 ] = rtems_build_name( 'T', 'A', '2', ' ' ); - Task_name[ 3 ] = rtems_build_name( 'T', 'A', '3', ' ' ); - - status = rtems_task_create( - Task_name[ 1 ], - 4, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 1 ] - ); - directive_failed( status, "rtems_task_create of TA1" ); - - status = rtems_task_create( - Task_name[ 2 ], - 4, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 2 ] - ); - directive_failed( status, "rtems_task_create of TA2" ); - - status = rtems_task_create( - Task_name[ 3 ], - 4, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 3 ] - ); - directive_failed( status, "rtems_task_create of TA3" ); - - status = rtems_task_start( Task_id[ 1 ], Task_1, 0 ); - directive_failed( status, "rtems_task_start of TA1" ); - - status = rtems_task_start( Task_id[ 2 ], Task_2, 0 ); - directive_failed( status, "rtems_task_start of TA2" ); - - status = rtems_task_start( Task_id[ 3 ], Task_3, 0 ); - directive_failed( status, "rtems_task_start of TA3" ); - - Queue_name[ 1 ] = rtems_build_name( 'Q', '1', ' ', ' ' ); - Queue_name[ 2 ] = rtems_build_name( 'Q', '2', ' ', ' ' ); - Queue_name[ 3 ] = rtems_build_name( 'Q', '3', ' ', ' ' ); - - status = rtems_message_queue_create( - Queue_name[ 1 ], - 0, - RTEMS_DEFAULT_ATTRIBUTES, - &Queue_id[ 1 ] - ); - directive_failed( status, "rtems_message_queue_create of Q1" ); - - status = rtems_message_queue_create( - Queue_name[ 2 ], - 10, - RTEMS_PRIORITY | RTEMS_LIMIT, - &Queue_id[ 2 ] - ); - directive_failed( status, "rtems_message_queue_create of Q2" ); - - status = rtems_message_queue_create( - Queue_name[ 3 ], - 0, - RTEMS_DEFAULT_ATTRIBUTES, - &Queue_id[ 3 ] - ); - directive_failed( status, "rtems_message_queue_create of Q3" ); - - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of RTEMS_SELF" ); -} diff --git a/c/src/tests/sptests/sp13/putbuff.c b/c/src/tests/sptests/sp13/putbuff.c deleted file mode 100644 index e0bbfa4d7f..0000000000 --- a/c/src/tests/sptests/sp13/putbuff.c +++ /dev/null @@ -1,31 +0,0 @@ -/* Put_buffer - * - * This test routine prints the given buffer. - * buffer. - * - * Input parameters: - * buffer - pointer to message buffer to be printer - * - * 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" - -#define BUFFER_LENGTH 16 - -void Put_buffer( - long *buffer -) -{ - printf( "%16s", (char *)buffer ); -} diff --git a/c/src/tests/sptests/sp13/sp13.doc b/c/src/tests/sptests/sp13/sp13.doc deleted file mode 100644 index 4a0c9d24a0..0000000000 --- a/c/src/tests/sptests/sp13/sp13.doc +++ /dev/null @@ -1,25 +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: test13 - -directives: - ex_init, ex_start, t_create, t_start, t_delete, tm_tick, i_return, - q_create, q_ident, q_delete, q_send, q_urgent, q_broadcast, q_receive, - tm_wkafter, t_setpri - -concepts: - - a. This test checks out the message manager. diff --git a/c/src/tests/sptests/sp13/sp13.scn b/c/src/tests/sptests/sp13/sp13.scn deleted file mode 100644 index bd3af7da48..0000000000 --- a/c/src/tests/sptests/sp13/sp13.scn +++ /dev/null @@ -1,66 +0,0 @@ -*** TEST 13 *** -TA1 - rtems_message_queue_ident - qid => 00010001 -TA1 - rtems_message_queue_send - BUFFER 1 TO Q 1 -TA1 - rtems_message_queue_send - BUFFER 2 TO Q 1 -TA1 - rtems_task_wake_after - sleep 5 seconds -TA2 - rtems_message_queue_receive - receive from queue 1 - RTEMS_NO_WAIT -TA2 - buffer received: BUFFER 1 TO Q 1 -TA2 - rtems_message_queue_receive - receive from queue 1 - RTEMS_WAIT FOREVER -TA2 - buffer received: BUFFER 2 TO Q 1 -TA2 - rtems_message_queue_receive - receive from queue 1 - RTEMS_WAIT FOREVER -TA3 - rtems_message_queue_receive - receive from queue 2 - RTEMS_WAIT FOREVER -TA1 - rtems_message_queue_send - BUFFER 3 TO Q 1 -TA1 - rtems_task_wake_after - sleep 5 seconds -TA2 - buffer received: BUFFER 3 TO Q 1 -TA2 - rtems_task_set_priority - make self highest priority task -TA2 - rtems_message_queue_receive - receive from queue 2 - RTEMS_WAIT FOREVER -<pause> -TA1 - rtems_message_queue_send - BUFFER 1 TO Q 2 -TA2 - buffer received: BUFFER 1 TO Q 2 -TA2 - rtems_message_queue_send - BUFFER 2 TO Q 2 -TA2 - rtems_message_queue_receive - receive from queue 1 - 10 second timeout -TA1 - rtems_message_queue_receive - receive from queue 1 - 10 second timeout -TA3 - buffer received: BUFFER 2 TO Q 2 -TA3 - rtems_message_queue_broadcast - BUFFER 3 TO Q 1 -TA2 - buffer received: BUFFER 3 TO Q 1 -TA2 - rtems_message_queue_receive - receive from queue 3 - RTEMS_WAIT FOREVER -TA3 - number of tasks awakened = 02 -TA3 - rtems_message_queue_receive - receive from queue 3 - RTEMS_WAIT FOREVER -TA1 - buffer received: BUFFER 3 TO Q 1 -TA1 - rtems_task_delete - delete TA2 -TA1 - rtems_message_queue_send - BUFFER 1 TO Q 3 -TA1 - rtems_task_wake_after - sleep 5 seconds -TA3 - buffer received: BUFFER 1 TO Q 3 -TA3 - rtems_task_delete - delete self -<pause> -TA1 - rtems_message_queue_send - BUFFER 2 TO Q 3 -TA1 - rtems_message_queue_send - BUFFER 3 TO Q 3 -TA1 - rtems_message_queue_send - BUFFER 4 TO Q 3 -TA1 - rtems_message_queue_urgent - BUFFER 5 TO Q 3 -TA1 - rtems_message_queue_receive - receive from queue 3 - RTEMS_WAIT FOREVER -TA1 - buffer received: BUFFER 5 TO Q 3 -TA1 - rtems_message_queue_receive - receive from queue 3 - RTEMS_WAIT FOREVER -TA1 - buffer received: BUFFER 2 TO Q 3 -TA1 - rtems_message_queue_receive - receive from queue 3 - RTEMS_WAIT FOREVER -TA1 - buffer received: BUFFER 3 TO Q 3 -TA1 - rtems_message_queue_receive - receive from queue 3 - RTEMS_WAIT FOREVER -TA1 - buffer received: BUFFER 4 TO Q 3 -TA1 - rtems_message_queue_urgent - BUFFER 3 TO Q 2 -TA1 - rtems_message_queue_receive - receive from queue 2 - RTEMS_WAIT FOREVER -TA1 - buffer received: BUFFER 3 TO Q 2 -<pause> -TA1 - rtems_message_queue_delete - delete queue 1 -TA1 - rtems_message_queue_urgent - BUFFER 3 TO Q 2 -TA1 - rtems_message_queue_delete - delete queue 2 -TA1 - rtems_message_queue_flush - empty Q 3 -TA1 - 0 messages were flushed from Q 3 -TA1 - rtems_message_queue_send - BUFFER 1 TO Q 3 -TA1 - rtems_message_queue_send - BUFFER 2 TO Q 3 -TA1 - rtems_message_queue_send - BUFFER 3 TO Q 3 -TA1 - rtems_message_queue_flush - Q 3 -TA1 - 3 messages were flushed from Q 3 -TA1 - rtems_message_queue_send until all message buffers consumed -TA1 - all message buffers consumed -TA1 - rtems_message_queue_flush - Q 3 -TA1 - 100 messages were flushed from Q 3 -*** END OF TEST 13 *** diff --git a/c/src/tests/sptests/sp13/system.h b/c/src/tests/sptests/sp13/system.h deleted file mode 100644 index aa2c6d17e4..0000000000 --- a/c/src/tests/sptests/sp13/system.h +++ /dev/null @@ -1,30 +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 <rtems.h> -#include "tmacros.h" - -/* Miscellaneous */ - -#define EXTERN extern /* external definition */ - -/* macros */ - -/* structures */ - -#include "gvar.h" - -/* end of include file */ diff --git a/c/src/tests/sptests/sp13/task1.c b/c/src/tests/sptests/sp13/task1.c deleted file mode 100644 index 89c0619025..0000000000 --- a/c/src/tests/sptests/sp13/task1.c +++ /dev/null @@ -1,213 +0,0 @@ -/* Task_1 - * - * This routine serves as a test task. It verifies the message manager. - * - * 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" - -extern rtems_configuration_table BSP_Configuration; - -rtems_task Task_1( - rtems_task_argument argument -) -{ - rtems_id qid; - long buffer[ 4 ]; - rtems_unsigned32 index; - rtems_unsigned32 count; - rtems_status_code status; - - status = rtems_message_queue_ident( - Queue_name[ 1 ], - RTEMS_SEARCH_ALL_NODES, - &qid - ); - printf( "TA1 - rtems_message_queue_ident - qid => %08x\n", qid ); - directive_failed( status, "rtems_message_queue_ident" ); - - Fill_buffer( "BUFFER 1 TO Q 1", buffer ); - puts( "TA1 - rtems_message_queue_send - BUFFER 1 TO Q 1" ); - status = rtems_message_queue_send( Queue_id[ 1 ], (long (*)[4])buffer ); - directive_failed( status, "rtems_message_queue_send" ); - - Fill_buffer( "BUFFER 2 TO Q 1", buffer ); - puts( "TA1 - rtems_message_queue_send - BUFFER 2 TO Q 1" ); - status = rtems_message_queue_send( Queue_id[ 1 ], (long (*)[4])buffer ); - directive_failed( status, "rtems_message_queue_send" ); - - puts( "TA1 - rtems_task_wake_after - sleep 5 seconds" ); - status = rtems_task_wake_after( 5*TICKS_PER_SECOND ); - directive_failed( status, "rtems_task_wake_after" ); - - Fill_buffer( "BUFFER 3 TO Q 1", buffer ); - puts( "TA1 - rtems_message_queue_send - BUFFER 3 TO Q 1" ); - status = rtems_message_queue_send( Queue_id[ 1 ], (long (*)[4])buffer ); - directive_failed( status, "rtems_message_queue_send" ); - - puts( "TA1 - rtems_task_wake_after - sleep 5 seconds" ); - status = rtems_task_wake_after( 5*TICKS_PER_SECOND ); - directive_failed( status, "rtems_task_wake_after" ); - -pause(); - - Fill_buffer( "BUFFER 1 TO Q 2", buffer ); - puts( "TA1 - rtems_message_queue_send - BUFFER 1 TO Q 2" ); - status = rtems_message_queue_send( Queue_id[ 2 ], (long (*)[4])buffer ); - directive_failed( status, "rtems_message_queue_send" ); - - puts_nocr( "TA1 - rtems_message_queue_receive - receive from queue 1 - " ); - puts ( "10 second timeout" ); - status = rtems_message_queue_receive( - Queue_id[ 1 ], - (long (*)[4])buffer, - RTEMS_DEFAULT_OPTIONS, - 10 * TICKS_PER_SECOND - ); - directive_failed( status, "rtems_message_queue_receive" ); - puts_nocr( "TA1 - buffer received: " ); - Put_buffer( buffer ); - new_line; - - puts( "TA1 - rtems_task_delete - delete TA2" ); - status = rtems_task_delete( Task_id[ 2 ] ); - directive_failed( status, "rtems_task_delete" ); - - Fill_buffer( "BUFFER 1 TO Q 3", buffer ); - puts( "TA1 - rtems_message_queue_send - BUFFER 1 TO Q 3" ); - status = rtems_message_queue_send( Queue_id[ 3 ], (long (*)[4])buffer ); - directive_failed( status, "rtems_message_queue_send" ); - - puts( "TA1 - rtems_task_wake_after - sleep 5 seconds" ); - status = rtems_task_wake_after( 5*TICKS_PER_SECOND ); - directive_failed( status, "rtems_task_wake_after" ); - -pause(); - - Fill_buffer( "BUFFER 2 TO Q 3", buffer ); - puts( "TA1 - rtems_message_queue_send - BUFFER 2 TO Q 3" ); - status = rtems_message_queue_send( Queue_id[ 3 ], (long (*)[4])buffer ); - directive_failed( status, "rtems_message_queue_send" ); - - Fill_buffer( "BUFFER 3 TO Q 3", buffer ); - puts( "TA1 - rtems_message_queue_send - BUFFER 3 TO Q 3" ); - status = rtems_message_queue_send( Queue_id[ 3 ], (long (*)[4])buffer ); - directive_failed( status, "rtems_message_queue_send" ); - - Fill_buffer( "BUFFER 4 TO Q 3", buffer ); - puts( "TA1 - rtems_message_queue_send - BUFFER 4 TO Q 3" ); - status = rtems_message_queue_send( Queue_id[ 3 ], (long (*)[4])buffer ); - directive_failed( status, "rtems_message_queue_send" ); - - Fill_buffer( "BUFFER 5 TO Q 3", buffer ); - puts( "TA1 - rtems_message_queue_urgent - BUFFER 5 TO Q 3" ); - status = rtems_message_queue_urgent( Queue_id[ 3 ], (long (*)[4])buffer ); - directive_failed( status, "rtems_message_queue_urgent" ); - - for ( index = 1 ; index <= 4 ; index++ ) { - puts( - "TA1 - rtems_message_queue_receive - receive from queue 3 - " - "RTEMS_WAIT FOREVER" - ); - status = rtems_message_queue_receive( - Queue_id[ 3 ], - (long (*)[4])buffer, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT - ); - directive_failed( status, "rtems_message_queue_receive" ); - puts_nocr( "TA1 - buffer received: " ); - Put_buffer( buffer ); - new_line; - } - - Fill_buffer( "BUFFER 3 TO Q 2", buffer ); - puts( "TA1 - rtems_message_queue_urgent - BUFFER 3 TO Q 2" ); - status = rtems_message_queue_urgent( Queue_id[ 2 ], (long (*)[4])buffer ); - directive_failed( status, "rtems_message_queue_urgent" ); - - puts( - "TA1 - rtems_message_queue_receive - receive from queue 2 - " - "RTEMS_WAIT FOREVER" - ); - status = rtems_message_queue_receive( - Queue_id[ 2 ], - (long (*)[4])buffer, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT - ); - directive_failed( status, "rtems_message_queue_receive" ); - puts_nocr( "TA1 - buffer received: " ); - Put_buffer( buffer ); - new_line; - -pause(); - - puts( "TA1 - rtems_message_queue_delete - delete queue 1" ); - status = rtems_message_queue_delete( Queue_id[ 1 ] ); - directive_failed( status, "rtems_message_queue_delete" ); - - Fill_buffer( "BUFFER 3 TO Q 2", buffer ); - puts( "TA1 - rtems_message_queue_urgent - BUFFER 3 TO Q 2" ); - status = rtems_message_queue_urgent( Queue_id[ 2 ], (long (*)[4])buffer ); - directive_failed( status, "rtems_message_queue_urgent" ); - - puts( "TA1 - rtems_message_queue_delete - delete queue 2" ); - status = rtems_message_queue_delete( Queue_id[ 2 ] ); - directive_failed( status, "rtems_message_queue_delete" ); - - puts( "TA1 - rtems_message_queue_flush - empty Q 3" ); - status = rtems_message_queue_flush( Queue_id[ 3 ], &count ); - printf( "TA1 - %d messages were flushed from Q 3\n", count ); - - Fill_buffer( "BUFFER 1 TO Q 3", buffer ); - puts( "TA1 - rtems_message_queue_send - BUFFER 1 TO Q 3" ); - status = rtems_message_queue_send( Queue_id[ 3 ], (long (*)[4])buffer ); - directive_failed( status, "rtems_message_queue_send" ); - - Fill_buffer( "BUFFER 2 TO Q 3", buffer ); - puts( "TA1 - rtems_message_queue_send - BUFFER 2 TO Q 3" ); - status = rtems_message_queue_send( Queue_id[ 3 ], (long (*)[4])buffer ); - directive_failed( status, "rtems_message_queue_send" ); - - Fill_buffer( "BUFFER 3 TO Q 3", buffer ); - puts( "TA1 - rtems_message_queue_send - BUFFER 3 TO Q 3" ); - status = rtems_message_queue_send( Queue_id[ 3 ], (long (*)[4])buffer ); - directive_failed( status, "rtems_message_queue_send" ); - - puts( "TA1 - rtems_message_queue_flush - Q 3" ); - status = rtems_message_queue_flush( Queue_id[ 3 ], &count ); - printf( "TA1 - %d messages were flushed from Q 3\n", count ); - - puts( "TA1 - rtems_message_queue_send until all message buffers consumed" ); - while ( FOREVER ) { - status = rtems_message_queue_send( Queue_id[ 3 ], (long (*)[4])buffer ); - if ( status == RTEMS_UNSATISFIED ) break; - directive_failed( status, "rtems_message_queue_send loop" ); - } - - puts( "TA1 - all message buffers consumed" ); - puts( "TA1 - rtems_message_queue_flush - Q 3" ); - status = rtems_message_queue_flush( Queue_id[ 3 ], &count ); - printf( "TA1 - %d messages were flushed from Q 3\n", count ); - - if ( count != BSP_Configuration.maximum_messages ) - printf( "TA1 - ERROR - %d messages flushed!!!", count ); - - puts( "*** END OF TEST 13 ***" ); - exit( 0 ); -} diff --git a/c/src/tests/sptests/sp13/task2.c b/c/src/tests/sptests/sp13/task2.c deleted file mode 100644 index 7d6438312c..0000000000 --- a/c/src/tests/sptests/sp13/task2.c +++ /dev/null @@ -1,132 +0,0 @@ -/* Task_2 - * - * This routine serves as a test task. Multiple tasks are required to - * verify all message manager capabilities. - * - * 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 Task_2( - rtems_task_argument argument -) -{ - long buffer[ 4 ]; - rtems_task_priority previous_priority; - rtems_status_code status; - - puts( - "TA2 - rtems_message_queue_receive - receive from queue 1 - RTEMS_NO_WAIT" - ); - status = rtems_message_queue_receive( - Queue_id[ 1 ], - (long (*)[4])buffer, - RTEMS_NO_WAIT, - RTEMS_NO_TIMEOUT - ); - directive_failed( status, "rtems_message_queue_receive" ); - puts_nocr( "TA2 - buffer received: " ); - Put_buffer( buffer ); - new_line; - - puts( - "TA2 - rtems_message_queue_receive - receive from queue 1 - " - "RTEMS_WAIT FOREVER" - ); - status = rtems_message_queue_receive( - Queue_id[ 1 ], - (long (*)[4])buffer, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT - ); - directive_failed( status, "rtems_message_queue_receive" ); - puts_nocr( "TA2 - buffer received: " ); - Put_buffer( buffer ); - new_line; - - puts( - "TA2 - rtems_message_queue_receive - receive from queue 1 - " - "RTEMS_WAIT FOREVER" - ); - status = rtems_message_queue_receive( - Queue_id[ 1 ], - (long (*)[4])buffer, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT - ); - directive_failed( status, "rtems_message_queue_receive" ); - puts_nocr( "TA2 - buffer received: " ); - Put_buffer( buffer ); - new_line; - - puts( "TA2 - rtems_task_set_priority - make self highest priority task" ); - status = rtems_task_set_priority( RTEMS_SELF, 3, &previous_priority ); - directive_failed( status, "rtems_task_set_priority" ); - - puts( - "TA2 - rtems_message_queue_receive - receive from queue 2 - " - "RTEMS_WAIT FOREVER" - ); - status = rtems_message_queue_receive( - Queue_id[ 2 ], - (long (*)[4])buffer, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT - ); - directive_failed( status, "rtems_message_queue_receive" ); - puts_nocr( "TA2 - buffer received: " ); - Put_buffer( buffer ); - new_line; - - Fill_buffer( "BUFFER 2 TO Q 2", (long *)buffer ); - puts( "TA2 - rtems_message_queue_send - BUFFER 2 TO Q 2" ); - directive_failed( status, "rtems_message_queue_send" ); - - status = rtems_message_queue_send( Queue_id[ 2 ], (long (*)[4])buffer ); - directive_failed( status, "rtems_message_queue_send" ); - - puts( - "TA2 - rtems_message_queue_receive - receive from queue 1 - " - "10 second timeout" - ); - status = rtems_message_queue_receive( - Queue_id[ 1 ], - (long (*)[4])buffer, - RTEMS_DEFAULT_OPTIONS, - 10 * TICKS_PER_SECOND - ); - directive_failed( status, "rtems_message_queue_receive" ); - puts_nocr( "TA2 - buffer received: " ); - Put_buffer( buffer ); - new_line; - - puts( - "TA2 - rtems_message_queue_receive - receive from queue 3 - " - "RTEMS_WAIT FOREVER" - ); - status = rtems_message_queue_receive( - Queue_id[ 3 ], - (long (*)[4])buffer, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT - ); - directive_failed( status, "rtems_message_queue_receive" ); - puts_nocr( "TA2 - buffer received: " ); - Put_buffer( buffer ); - new_line; - -} diff --git a/c/src/tests/sptests/sp13/task3.c b/c/src/tests/sptests/sp13/task3.c deleted file mode 100644 index 3ba7b61728..0000000000 --- a/c/src/tests/sptests/sp13/task3.c +++ /dev/null @@ -1,74 +0,0 @@ -/* Task_3 - * - * This routine serves as a test task. Its major function is to - * broadcast a messge to all the other tasks. - * - * 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 Task_3( - rtems_task_argument argument -) -{ - long buffer[ 4 ]; - rtems_unsigned32 count; - rtems_status_code status; - - puts( - "TA3 - rtems_message_queue_receive - receive from queue 2 - " - "RTEMS_WAIT FOREVER" - ); - status = rtems_message_queue_receive( - Queue_id[ 2 ], - (long (*)[4])buffer, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT - ); - directive_failed( status, "rtems_message_queue_receive" ); - puts_nocr( "TA3 - buffer received: " ); - Put_buffer( buffer ); - new_line; - - Fill_buffer( "BUFFER 3 TO Q 1", (long *)buffer ); - puts( "TA3 - rtems_message_queue_broadcast - BUFFER 3 TO Q 1" ); - status = rtems_message_queue_broadcast( - Queue_id[ 1 ], - (long (*)[4])buffer, - &count - ); - printf( "TA3 - number of tasks awakened = %02d\n", count ); - puts( - "TA3 - rtems_message_queue_receive - receive from queue 3 - " - "RTEMS_WAIT FOREVER" - ); - - status = rtems_message_queue_receive( - Queue_id[ 3 ], - (long (*)[4])buffer, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT - ); - directive_failed( status, "rtems_message_queue_receive" ); - puts_nocr( "TA3 - buffer received: " ); - Put_buffer( buffer ); - new_line; - - puts( "TA3 - rtems_task_delete - delete self" ); - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of RTEMS_SELF" ); -} diff --git a/c/src/tests/sptests/sp14/asr.c b/c/src/tests/sptests/sp14/asr.c deleted file mode 100644 index af7e212877..0000000000 --- a/c/src/tests/sptests/sp14/asr.c +++ /dev/null @@ -1,47 +0,0 @@ -/* Process_asr - * - * This is the asynchronous signal routine (asr) for task 1. - * It demonstrates that ASRs can block execute and block. - * - * Input parameters: - * the_signal_set - signal set - * - * 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_asr Process_asr( - rtems_signal_set the_signal_set -) -{ - rtems_status_code status; - - printf( "ASR - ENTRY - signal => %08x\n", the_signal_set ); - switch( the_signal_set ) { - case RTEMS_SIGNAL_16: - case RTEMS_SIGNAL_17: - case RTEMS_SIGNAL_18 | RTEMS_SIGNAL_19: - break; - case RTEMS_SIGNAL_0: - case RTEMS_SIGNAL_1: - puts( "ASR - rtems_task_wake_after - yield processor" ); - status = rtems_task_wake_after( RTEMS_YIELD_PROCESSOR ); - directive_failed( status, "rtems_task_wake_after yield" ); - break; - case RTEMS_SIGNAL_3: - Asr_fired = TRUE; - break; - } - printf( "ASR - EXIT - signal => %08x\n", the_signal_set ); -} diff --git a/c/src/tests/sptests/sp14/init.c b/c/src/tests/sptests/sp14/init.c deleted file mode 100644 index 627295c03e..0000000000 --- a/c/src/tests/sptests/sp14/init.c +++ /dev/null @@ -1,75 +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$ - */ - -#include "system.h" -#undef EXTERN -#define EXTERN -#include "conftbl.h" -#include "gvar.h" - -rtems_task Init( - rtems_task_argument argument -) -{ - rtems_status_code status; - - puts( "\n\n*** TEST 14 ***" ); - - Task_name[ 1 ] = rtems_build_name( 'T', 'A', '1', ' ' ); - Task_name[ 2 ] = rtems_build_name( 'T', 'A', '2', ' ' ); - - status = rtems_task_create( - Task_name[ 1 ], - 4, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 1 ] - ); - directive_failed( status, "rtems_task_create of TA1" ); - - status = rtems_task_create( - Task_name[ 2 ], - 4, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 2 ] - ); - directive_failed( status, "rtems_task_create of TA2" ); - - status = rtems_task_start( Task_id[ 1 ], Task_1, 0 ); - directive_failed( status, "rtems_task_start of TA1" ); - - status = rtems_task_start( Task_id[ 2 ], Task_2, 0 ); - directive_failed( status, "rtems_task_start of TA2" ); - - Timer_name[ 1 ] = rtems_build_name( 'T', 'M', '1', ' ' ); - - status = rtems_timer_create( Timer_name[ 1 ], &Timer_id[ 1 ] ); - directive_failed( status, "rtems_timer_create of TM1" ); - - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of RTEMS_SELF" ); -} diff --git a/c/src/tests/sptests/sp14/sp14.doc b/c/src/tests/sptests/sp14/sp14.doc deleted file mode 100644 index 16aa420183..0000000000 --- a/c/src/tests/sptests/sp14/sp14.doc +++ /dev/null @@ -1,24 +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: test14 - -directives: - ex_init, ex_start, t_create, t_start, t_delete, tm_tick, i_return, - as_catch, as_return, as_send, tm_wkafter - -concepts: - - a. This test checks out the signal manager. diff --git a/c/src/tests/sptests/sp14/sp14.scn b/c/src/tests/sptests/sp14/sp14.scn deleted file mode 100644 index 31e6d067d2..0000000000 --- a/c/src/tests/sptests/sp14/sp14.scn +++ /dev/null @@ -1,33 +0,0 @@ -*** TEST 14 *** -TA1 - rtems_signal_catch - RTEMS_INTERRUPT_LEVEL( 3 ) -TA1 - rtems_signal_send - RTEMS_SIGNAL_16 to self -ASR - ENTRY - signal => 00010000 -ASR - EXIT - signal => 00010000 -TA1 - rtems_signal_send - RTEMS_SIGNAL_0 to self -ASR - ENTRY - signal => 00000001 -ASR - rtems_task_wake_after - yield processor -TA2 - rtems_signal_send - RTEMS_SIGNAL_17 to TA1 -TA2 - rtems_task_wake_after - yield processor -ASR - ENTRY - signal => 00020000 -ASR - EXIT - signal => 00020000 -ASR - EXIT - signal => 00000001 -TA1 - rtems_signal_catch - RTEMS_NO_ASR -<pause> -TA1 - rtems_signal_send - RTEMS_SIGNAL_1 to self -ASR - ENTRY - signal => 00000002 -ASR - rtems_task_wake_after - yield processor -TA2 - rtems_signal_send - RTEMS_SIGNAL_18 and RTEMS_SIGNAL_19 to TA1 -TA2 - rtems_task_wake_after - yield processor -ASR - EXIT - signal => 00000002 -ASR - ENTRY - signal => 000c0000 -ASR - EXIT - signal => 000c0000 -TA1 - rtems_task_mode - disable ASRs -TA1 - sending signal to RTEMS_SELF from timer -TA1 - waiting for signal to arrive -TA1 - timer routine got the correct arguments -TA1 - rtems_task_mode - enable ASRs -ASR - ENTRY - signal => 00000008 -ASR - EXIT - signal => 00000008 -TA1 - rtems_signal_catch - asraddr of NULL -TA1 - rtems_task_delete - delete self -*** END OF TEST 14 *** diff --git a/c/src/tests/sptests/sp14/system.h b/c/src/tests/sptests/sp14/system.h deleted file mode 100644 index aa2c6d17e4..0000000000 --- a/c/src/tests/sptests/sp14/system.h +++ /dev/null @@ -1,30 +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 <rtems.h> -#include "tmacros.h" - -/* Miscellaneous */ - -#define EXTERN extern /* external definition */ - -/* macros */ - -/* structures */ - -#include "gvar.h" - -/* end of include file */ diff --git a/c/src/tests/sptests/sp14/task1.c b/c/src/tests/sptests/sp14/task1.c deleted file mode 100644 index ac8feed71f..0000000000 --- a/c/src/tests/sptests/sp14/task1.c +++ /dev/null @@ -1,116 +0,0 @@ -/* Task_1 - * - * This routine serves as a test task. It establishes an RTEMS_ASR and - * sends signal to itself to determine if the RTEMS_ASR gets to execute. - * - * 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_timer_service_routine Signal_3_to_task_1( - rtems_id id, - void *pointer -) -{ - rtems_status_code status; - - status = rtems_signal_send( Task_id[ 1 ], RTEMS_SIGNAL_3 ); - directive_failed( status, "rtems_signal_send of 3" ); - - Timer_got_this_id = id; - Timer_got_this_pointer = pointer; - - Signals_sent = TRUE; -} - -rtems_task Task_1( - rtems_task_argument argument -) -{ - rtems_mode previous_mode; - rtems_status_code status; - - puts( "TA1 - rtems_signal_catch - RTEMS_INTERRUPT_LEVEL( 3 )" ); - status = rtems_signal_catch( Process_asr, RTEMS_INTERRUPT_LEVEL(3) ); - directive_failed( status, "rtems_signal_catch" ); - - puts( "TA1 - rtems_signal_send - RTEMS_SIGNAL_16 to self" ); - status = rtems_signal_send( RTEMS_SELF, RTEMS_SIGNAL_16 ); - directive_failed( status, "rtems_signal_send" ); - - puts( "TA1 - rtems_signal_send - RTEMS_SIGNAL_0 to self" ); - status = rtems_signal_send( RTEMS_SELF, RTEMS_SIGNAL_0 ); - directive_failed( status, "rtems_signal_send" ); - - puts( "TA1 - rtems_signal_catch - RTEMS_NO_ASR" ); - status = rtems_signal_catch( Process_asr, RTEMS_NO_ASR ); - directive_failed( status, "rtems_signal_catch" ); - -pause(); - - puts( "TA1 - rtems_signal_send - RTEMS_SIGNAL_1 to self" ); - status = rtems_signal_send( RTEMS_SELF, RTEMS_SIGNAL_1 ); - directive_failed( status, "rtems_signal_send" ); - - puts( "TA1 - rtems_task_mode - disable ASRs" ); - status = rtems_task_mode( RTEMS_NO_ASR, RTEMS_ASR_MASK, &previous_mode ); - directive_failed( status, "rtems_task_mode" ); - - Timer_got_this_id = 0; - Timer_got_this_pointer = NULL; - - puts( "TA1 - sending signal to RTEMS_SELF from timer" ); - status = rtems_timer_fire_after( - Timer_id[ 1 ], - TICKS_PER_SECOND / 2, - Signal_3_to_task_1, - Task_1 - ); - directive_failed( status, "rtems_timer_fire_after" ); - - puts( "TA1 - waiting for signal to arrive" ); - - Signals_sent = FALSE; - Asr_fired = FALSE; - - while ( Signals_sent == FALSE ) - ; - - if ( Timer_got_this_id == Timer_id[ 1 ] && - Timer_got_this_pointer == Task_1 ) - puts( "TA1 - timer routine got the correct arguments" ); - else - printf( - "TA1 - timer got (0x%x, %p) instead of (0x%x, %p)!!!!\n", - Timer_got_this_id, - Timer_got_this_pointer, - Timer_id[ 1 ], - Task_1 - ); - - puts( "TA1 - rtems_task_mode - enable ASRs" ); - status = rtems_task_mode( RTEMS_ASR, RTEMS_ASR_MASK, &previous_mode ); - directive_failed( status, "rtems_task_mode" ); - - puts( "TA1 - rtems_signal_catch - asraddr of NULL" ); - status = rtems_signal_catch( NULL, RTEMS_DEFAULT_MODES ); - directive_failed( status, "rtems_signal_catch" ); - - puts( "TA1 - rtems_task_delete - delete self" ); - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of RTEMS_SELF" ); -} diff --git a/c/src/tests/sptests/sp14/task2.c b/c/src/tests/sptests/sp14/task2.c deleted file mode 100644 index bf1e7cc224..0000000000 --- a/c/src/tests/sptests/sp14/task2.c +++ /dev/null @@ -1,48 +0,0 @@ -/* Task_2 - * - * This routine serves as a test task. It verifies that one task can - * send signals to another task ( invoking the other task's RTEMS_ASR ). - * - * 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 Task_2( - rtems_task_argument argument -) -{ - rtems_status_code status; - - puts( "TA2 - rtems_signal_send - RTEMS_SIGNAL_17 to TA1" ); - status = rtems_signal_send( Task_id[ 1 ], RTEMS_SIGNAL_17 ); - directive_failed( status, "rtems_signal_send" ); - - puts( "TA2 - rtems_task_wake_after - yield processor" ); - status = rtems_task_wake_after( RTEMS_YIELD_PROCESSOR ); - directive_failed( status, "rtems_task_wake_after" ); - - puts("TA2 - rtems_signal_send - RTEMS_SIGNAL_18 and RTEMS_SIGNAL_19 to TA1"); - status = rtems_signal_send( Task_id[ 1 ], RTEMS_SIGNAL_18 | RTEMS_SIGNAL_19 ); - directive_failed( status, "rtems_signal_send" ); - - puts( "TA2 - rtems_task_wake_after - yield processor" ); - status = rtems_task_wake_after( RTEMS_YIELD_PROCESSOR ); - directive_failed( status, "rtems_task_wake_after" ); - - puts( "*** END OF TEST 14 ***" ); - exit( 0 ); -} diff --git a/c/src/tests/sptests/sp15/init.c b/c/src/tests/sptests/sp15/init.c deleted file mode 100644 index 4bee311714..0000000000 --- a/c/src/tests/sptests/sp15/init.c +++ /dev/null @@ -1,81 +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$ - */ - -#include "system.h" -#undef EXTERN -#define EXTERN -#include "conftbl.h" -#include "gvar.h" - -rtems_task Init( - rtems_task_argument argument -) -{ - rtems_status_code status; - - puts( "\n\n*** TEST 15 ***" ); - - Task_name[ 1 ] = rtems_build_name( 'T', 'A', '1', ' ' ); - - Partition_name[ 1 ] = rtems_build_name( 'P', 'T', '1', ' ' ); - Partition_name[ 2 ] = rtems_build_name( 'P', 'T', '2', ' ' ); - - status = rtems_task_create( - Task_name[ 1 ], - 4, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 1 ] - ); - directive_failed( status, "rtems_task_create of TA1" ); - - status = rtems_task_start( Task_id[ 1 ], Task_1, 0 ); - directive_failed( status, "rtems_task_start of TA1" ); - - puts("INIT - rtems_partition_create - partition 1"); - status = rtems_partition_create( - Partition_name[ 1 ], - Area_1, - 4096, - 512, - RTEMS_DEFAULT_ATTRIBUTES, - &Partition_id[ 1 ] - ); - directive_failed( status, "rtems_partition_create of PT1" ); - - puts("INIT - rtems_partition_create - partition 2"); - status = rtems_partition_create( - Partition_name[ 2 ], - Area_2, - 274, - 128, - RTEMS_DEFAULT_ATTRIBUTES, - &Partition_id[ 2 ] - ); - directive_failed( status, "rtems_partition_create of PT2" ); - - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of RTEMS_SELF" ); -} diff --git a/c/src/tests/sptests/sp15/sp15.doc b/c/src/tests/sptests/sp15/sp15.doc deleted file mode 100644 index 3ec20ae92b..0000000000 --- a/c/src/tests/sptests/sp15/sp15.doc +++ /dev/null @@ -1,24 +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: test15 - -directives: - ex_init, ex_start, t_create, t_start, t_delete, tm_tick, i_return, - pt_create, pt_ident, pt_getbuf, pt_retbuf, pt_delete - -concepts: - - a. This test checks out the partition manager. diff --git a/c/src/tests/sptests/sp15/sp15.scn b/c/src/tests/sptests/sp15/sp15.scn deleted file mode 100644 index acddd5b5e9..0000000000 --- a/c/src/tests/sptests/sp15/sp15.scn +++ /dev/null @@ -1,16 +0,0 @@ -*** TEST 15 *** -INIT - rtems_partition_create - partition 1 -INIT - rtems_partition_create - partition 2 -TA1 - rtems_partition_ident - partition 1 id = 00010001 -TA1 - rtems_partition_ident - partition 2 id = 00010002 -TA1 - rtems_partition_get_buffer - buffer 1 from partition 1 - 0x00000000 -TA1 - rtems_partition_get_buffer - buffer 2 from partition 1 - 0x00000200 -TA1 - rtems_partition_get_buffer - buffer 1 from partition 2 - 0x00000000 -TA1 - rtems_partition_get_buffer - buffer 2 from partition 2 - 0x00000080 -TA1 - rtems_partition_return_buffer - buffer 1 to partition 1 - 0x00000000 -TA1 - rtems_partition_return_buffer - buffer 2 to partition 1 - 0x00000200 -TA1 - rtems_partition_return_buffer - buffer 1 to partition 2 - 0x00000000 -TA1 - rtems_partition_return_buffer - buffer 2 to partition 2 - 0x00000080 -TA1 - rtems_partition_delete - delete partition 1 -TA1 - rtems_partition_delete - delete partition 2 -*** END OF TEST 15 *** diff --git a/c/src/tests/sptests/sp15/system.h b/c/src/tests/sptests/sp15/system.h deleted file mode 100644 index aa2c6d17e4..0000000000 --- a/c/src/tests/sptests/sp15/system.h +++ /dev/null @@ -1,30 +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 <rtems.h> -#include "tmacros.h" - -/* Miscellaneous */ - -#define EXTERN extern /* external definition */ - -/* macros */ - -/* structures */ - -#include "gvar.h" - -/* end of include file */ diff --git a/c/src/tests/sptests/sp15/task1.c b/c/src/tests/sptests/sp15/task1.c deleted file mode 100644 index f22d27efe3..0000000000 --- a/c/src/tests/sptests/sp15/task1.c +++ /dev/null @@ -1,129 +0,0 @@ -/* Task_1 - * - * This routine serves as a test task. It tests the partition manager. - * - * 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 Task_1( - rtems_task_argument argument -) -{ - rtems_id ptid_1; - rtems_id ptid_2; - void *buffer_address_1; - void *buffer_address_2; - void *buffer_address_3; - void *buffer_address_4; - rtems_status_code status; - - puts_nocr( "TA1 - rtems_partition_ident - partition 1 id = " ); - status = rtems_partition_ident( - Partition_name[ 1 ], - RTEMS_SEARCH_ALL_NODES, - &ptid_1 - ); - directive_failed( status, "rtems_partition_ident of PT1" ); - printf( "%08x\n", ptid_1 ); - - puts_nocr( "TA1 - rtems_partition_ident - partition 2 id = " ); - status = rtems_partition_ident( - Partition_name[ 2 ], - RTEMS_SEARCH_ALL_NODES, - &ptid_2 - ); - directive_failed( status, "rtems_partition_ident of PT2" ); - printf( "%08x\n", ptid_2 ); - - puts_nocr( - "TA1 - rtems_partition_get_buffer - buffer 1 from partition 1 - " - ); - status = rtems_partition_get_buffer( ptid_1, &buffer_address_1 ); - directive_failed( status, "rtems_partition_get_buffer" ); - Put_address_from_area_1( buffer_address_1 ); - new_line; - - puts_nocr( - "TA1 - rtems_partition_get_buffer - buffer 2 from partition 1 - " - ); - status = rtems_partition_get_buffer( ptid_1, &buffer_address_2 ); - directive_failed( status, "rtems_partition_get_buffer" ); - Put_address_from_area_1( buffer_address_2 ); - new_line; - - puts_nocr( - "TA1 - rtems_partition_get_buffer - buffer 1 from partition 2 - " - ); - status = rtems_partition_get_buffer( ptid_2, &buffer_address_3 ); - directive_failed( status, "rtems_partition_get_buffer" ); - Put_address_from_area_2( buffer_address_3 ); - new_line; - - puts_nocr( - "TA1 - rtems_partition_get_buffer - buffer 2 from partition 2 - " - ); - status = rtems_partition_get_buffer( ptid_2, &buffer_address_4 ); - directive_failed( status, "rtems_partition_get_buffer" ); - Put_address_from_area_2( buffer_address_4 ); - new_line; - - puts_nocr( - "TA1 - rtems_partition_return_buffer - buffer 1 to partition 1 - " - ); - Put_address_from_area_1( buffer_address_1 ); - new_line; - status = rtems_partition_return_buffer( ptid_1, buffer_address_1 ); - directive_failed( status, "rtems_partition_return_buffer" ); - - puts_nocr( - "TA1 - rtems_partition_return_buffer - buffer 2 to partition 1 - " - ); - Put_address_from_area_1( buffer_address_2 ); - new_line; - status = rtems_partition_return_buffer( ptid_1, buffer_address_2 ); - directive_failed( status, "rtems_partition_return_buffer" ); - - puts_nocr( - "TA1 - rtems_partition_return_buffer - buffer 1 to partition 2 - " - ); - Put_address_from_area_2( buffer_address_3 ); - new_line; - status = rtems_partition_return_buffer( ptid_2, buffer_address_3 ); - directive_failed( status, "rtems_partition_return_buffer" ); - - puts_nocr( - "TA1 - rtems_partition_return_buffer - buffer 2 to partition 2 - " - ); - Put_address_from_area_2( buffer_address_4 ); - new_line; - status = rtems_partition_return_buffer( ptid_2, buffer_address_4 ); - directive_failed( status, "rtems_partition_return_buffer" ); - - puts( "TA1 - rtems_partition_delete - delete partition 1" - ); - status = rtems_partition_delete( ptid_1 ); - directive_failed( status, "rtems_partition_delete" ); - - puts( "TA1 - rtems_partition_delete - delete partition 2" - ); - status = rtems_partition_delete( ptid_2 ); - directive_failed( status, "rtems_partition_delete" ); - - puts( "*** END OF TEST 15 ***" ); - exit( 0 ); -} diff --git a/c/src/tests/sptests/sp16/init.c b/c/src/tests/sptests/sp16/init.c deleted file mode 100644 index a5b1163b13..0000000000 --- a/c/src/tests/sptests/sp16/init.c +++ /dev/null @@ -1,131 +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$ - */ - -#include "system.h" -#undef EXTERN -#define EXTERN -#include "conftbl.h" -#include "gvar.h" - -rtems_task Init( - rtems_task_argument argument -) -{ - rtems_status_code status; - - puts( "\n\n*** TEST 16 ***" ); - - Task_name[ 1 ] = rtems_build_name( 'T', 'A', '1', ' ' ); - Task_name[ 2 ] = rtems_build_name( 'T', 'A', '2', ' ' ); - Task_name[ 3 ] = rtems_build_name( 'T', 'A', '3', ' ' ); - Task_name[ 4 ] = rtems_build_name( 'T', 'A', '4', ' ' ); - Task_name[ 5 ] = rtems_build_name( 'T', 'A', '5', ' ' ); - - status = rtems_task_create( - Task_name[ 1 ], - BASE_PRIORITY, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 1 ] - ); - directive_failed( status, "rtems_task_create of TA1" ); - - status = rtems_task_create( - Task_name[ 2 ], - BASE_PRIORITY, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 2 ] - ); - directive_failed( status, "rtems_task_create of TA2" ); - - status = rtems_task_create( - Task_name[ 3 ], - BASE_PRIORITY, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 3 ] - ); - directive_failed( status, "rtems_task_create of TA3" ); - - status = rtems_task_start( Task_id[ 1 ], Task_1, 0 ); - directive_failed( status, "rtems_task_start of TA1" ); - - status = rtems_task_start( Task_id[ 2 ], Task_2, 0 ); - directive_failed( status, "rtems_task_start of TA2" ); - - status = rtems_task_start( Task_id[ 3 ], Task_3, 0 ); - directive_failed( status, "rtems_task_start of TA3" ); - - Region_name[ 1 ] = rtems_build_name( 'R', 'N', '1', ' ' ); - Region_name[ 2 ] = rtems_build_name( 'R', 'N', '2', ' ' ); - Region_name[ 3 ] = rtems_build_name( 'R', 'N', '3', ' ' ); - Region_name[ 4 ] = rtems_build_name( 'R', 'N', '4', ' ' ); - - status = rtems_region_create( - Region_name[ 1 ], - Area_1, - 4096, - 128, - RTEMS_DEFAULT_ATTRIBUTES, - &Region_id[ 1 ] - ); - directive_failed( status, "rtems_region_create of RN1" ); - - status = rtems_region_create( - Region_name[ 2 ], - Area_2, - 4096, - 128, - RTEMS_PRIORITY, - &Region_id[ 2 ] - ); - directive_failed( status, "rtems_region_create of RN2" ); - - status = rtems_region_create( - Region_name[ 3 ], - Area_3, - 4096, - 128, - RTEMS_DEFAULT_ATTRIBUTES, - &Region_id[ 3 ] - ); - directive_failed( status, "rtems_region_create of RN3" ); - - status = rtems_region_create( - Region_name[ 4 ], - Area_4, - 4096, - 128, - RTEMS_DEFAULT_ATTRIBUTES, - &Region_id[ 4 ] - ); - directive_failed( status, "rtems_region_create of RN4" ); - - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of RTEMS_SELF" ); -} diff --git a/c/src/tests/sptests/sp16/sp16.doc b/c/src/tests/sptests/sp16/sp16.doc deleted file mode 100644 index c5512af051..0000000000 --- a/c/src/tests/sptests/sp16/sp16.doc +++ /dev/null @@ -1,24 +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: test16 - -directives: - ex_init, ex_start, t_create, t_start, t_delete, tm_tick, i_return, - rn_create, rn_ident, rn_getbuf, rn_retbuf, rn_delete - -concepts: - - a. This test checks out the region manager. diff --git a/c/src/tests/sptests/sp16/sp16.scn b/c/src/tests/sptests/sp16/sp16.scn deleted file mode 100644 index a1a27cb9ad..0000000000 --- a/c/src/tests/sptests/sp16/sp16.scn +++ /dev/null @@ -1,58 +0,0 @@ -*** TEST 16 *** -TA1 - rtems_region_ident - rnid => 00010002 -TA1 - rtems_region_get_segment - wait on 100 byte segment from region 2 -TA1 - got segment from region 2 - 0x00000f78 -TA1 - rtems_region_get_segment - wait on 3K segment from region 3 -TA1 - got segment from region 3 - 0x000003f8 -TA1 - rtems_region_get_segment - get 3080 byte segment from region 1 - NO_WAIT -TA1 - got segment from region 1 - 0x00000378 -TA1 - rtems_task_wake_after - yield processor -TA2 - rtems_region_get_segment - wait on 2K segment from region 1 -TA3 - rtems_region_get_segment - wait on 3968 byte segment from region 2 -<pause> -TA1 - rtems_region_return_segment - return segment to region 1 - 0x00000378 -TA1 - rtems_region_get_segment - wait 10 seconds for 3K segment from region 1 -TA2 - got segment from region 1 - 0x000007f8 -TA2 - rtems_region_return_segment - return segment to region 1 - 0x000007f8 -TA2 - rtems_task_set_priority - make self highest priority task -TA2 - rtems_region_get_segment - wait on 3968 byte segment -TA1 - got segment from region 1 - 0x000003f8 -TA1 - rtems_region_return_segment - return segment to region 2 - 0x00000f78 -TA2 - got segment from region 2 - 0x00000008 -TA2 - rtems_region_return_segment - return segment to region 2 - 0x00000008 -TA2 - rtems_task_delete - delete self -TA1 - rtems_task_wake_after - yield processor -TA3 - got segment from region 2 - 0x00000008 -TA3 - rtems_region_get_segment - wait on 2K segment from region 3 -TA1 - rtems_task_delete - delete TA3 -<pause> -TA1 - rtems_task_wake_after - yield processor -TA4 - rtems_region_get_segment - wait on 1.5K segment from region 1 -TA5 - rtems_region_get_segment - wait on 1.5K segment from region 1 -TA1 - rtems_region_return_segment - return segment to region 1 - 0x000003f8 -TA1 - rtems_task_wake_after - yield processor -TA4 - got and returned 0x000009f8 -TA5 - got and returned 0x000003f0 -TA1 - rtems_region_get_segment - wait 10 seconds for 3K segment from region 1 -TA1 - got segment from region 1 - 0x000003f8 -TA1 - rtems_task_wake_after - yield processor -TA4 - rtems_region_get_segment - wait on 3K segment from region 1 -TA5 - rtems_region_get_segment - wait on 3K segment from region 1 -TA1 - rtems_task_delete - delete TA4 -TA1 - rtems_region_return_segment - return segment to region 1 - 0x000003f8 -TA1 - rtems_task_wake_after - yield processor -TA5 - got segment from region 1 - 0x000003f8 -TA5 - rtems_region_return_segment - return segment to region 1 - 0x000003f8 -TA5 - rtems_task_delete - delete self -TA1 - rtems_region_delete - delete region 1 -TA1 - rtems_region_get_segment - get 3K segment from region 4 -TA1 - got segment from region 4 - 0x000003f8 -TA1 - rtems_region_get_segment - attempt to get 3K segment from region 4 -TA1 - rtems_task_get_note - RTEMS_UNSATISFIED -TA1 - rtems_region_extend - extend region 4 by 4K -TA1 - rtems_region_get_segment - attempt to get 3K segment from region 4 -TA1 - got 3K segment from region 4 - 0x00001400 -TA1 - rtems_region_return_segment - return segment to region 4 - 0x000003f8 -TA1 - rtems_region_return_segment - return segment to region 4 - 0x00001400 -TA1 - rtems_region_delete - delete region 4 -*** END OF TEST 16 *** diff --git a/c/src/tests/sptests/sp16/system.h b/c/src/tests/sptests/sp16/system.h deleted file mode 100644 index 9e2b748a85..0000000000 --- a/c/src/tests/sptests/sp16/system.h +++ /dev/null @@ -1,32 +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 <rtems.h> -#include "tmacros.h" - -/* Miscellaneous */ - -#define EXTERN extern /* external definition */ - -#define BASE_PRIORITY 140 /* all tasks priority */ - -/* macros */ - -/* structures */ - -#include "gvar.h" - -/* end of include file */ diff --git a/c/src/tests/sptests/sp16/task1.c b/c/src/tests/sptests/sp16/task1.c deleted file mode 100644 index 25f90aca00..0000000000 --- a/c/src/tests/sptests/sp16/task1.c +++ /dev/null @@ -1,282 +0,0 @@ -/* Task_1 - * - * This routine serves as a test task. It tests the region manager. - * - * 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 Task_1( - rtems_task_argument argument -) -{ - rtems_id rnid; - void *segment_address_1; - void *segment_address_2; - void *segment_address_3; - void *segment_address_4; - rtems_status_code status; - - status = rtems_region_ident( Region_name[ 1 ], &rnid ); - printf( "TA1 - rtems_region_ident - rnid => %08x\n", rnid ); - directive_failed( status, "rtems_region_ident of RN1" ); - - puts( - "TA1 - rtems_region_get_segment - wait on 100 byte segment from region 2" - ); - status = rtems_region_get_segment( - Region_id[ 2 ], - 100, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT, - &segment_address_1 - ); - directive_failed( status, "rtems_region_get_segment" ); - puts_nocr( "TA1 - got segment from region 2 - " ); - Put_address_from_area_2( segment_address_1 ); - new_line; - - puts( "TA1 - rtems_region_get_segment - wait on 3K segment from region 3" ); - status = rtems_region_get_segment( - Region_id[ 3 ], - 3072, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT, - &segment_address_2 - ); - directive_failed( status, "rtems_region_get_segment" ); - puts_nocr( "TA1 - got segment from region 3 - " ); - Put_address_from_area_3( segment_address_2 ); - new_line; - - puts_nocr( "TA1 - rtems_region_get_segment - get 3080 byte segment " ); - puts ( "from region 1 - NO_WAIT" ); - status = rtems_region_get_segment( - Region_id[ 1 ], - 3080, - RTEMS_NO_WAIT, - RTEMS_NO_TIMEOUT, - &segment_address_3 - ); - directive_failed( status, "rtems_region_get_segment" ); - puts_nocr( "TA1 - got segment from region 1 - " ); - Put_address_from_area_1( segment_address_3 ); - new_line; - - puts( "TA1 - rtems_task_wake_after - yield processor" ); - status = rtems_task_wake_after( RTEMS_YIELD_PROCESSOR ); - directive_failed( status, "rtems_task_wake_after" ); - -pause(); - - puts_nocr( - "TA1 - rtems_region_return_segment - return segment to region 1 - " - ); - Put_address_from_area_1( segment_address_3 ); - status = rtems_region_return_segment( Region_id[ 1 ], segment_address_3 ); - directive_failed( status, "rtems_region_return_segment" ); - new_line; - - puts( - "TA1 - rtems_region_get_segment - wait 10 seconds for 3K " - "segment from region 1" - ); - status = rtems_region_get_segment( - Region_id[ 1 ], - 3072, - RTEMS_DEFAULT_OPTIONS, - 10 * TICKS_PER_SECOND, - &segment_address_4 - ); - directive_failed( status, "rtems_region_get_segment" ); - puts_nocr( "TA1 - got segment from region 1 - " ); - Put_address_from_area_1( segment_address_4 ); - new_line; - - puts_nocr( - "TA1 - rtems_region_return_segment - return segment to region 2 - " - ); - Put_address_from_area_2( segment_address_1 ); - new_line; - status = rtems_region_return_segment( Region_id[ 2 ], segment_address_1 ); - directive_failed( status, "rtems_region_return_segment" ); - - puts( "TA1 - rtems_task_wake_after - yield processor" ); - status = rtems_task_wake_after( RTEMS_YIELD_PROCESSOR ); - directive_failed( status, "rtems_task_wake_after" ); - - puts( "TA1 - rtems_task_delete - delete TA3" ); - status = rtems_task_delete( Task_id[ 3 ] ); - directive_failed( status, "rtems_task_delete of TA3" ); - -pause(); - - status = rtems_task_create( - Task_name[ 4 ], - BASE_PRIORITY, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 4 ] - ); - directive_failed( status, "rtems_task_create of TA4" ); - - status = rtems_task_create( - Task_name[ 5 ], - BASE_PRIORITY, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 5 ] - ); - directive_failed( status, "rtems_task_create of TA5" ); - - status = rtems_task_start( Task_id[ 4 ], Task_4, 0 ); - directive_failed( status, "rtems_task_start of TA4" ); - - status = rtems_task_start( Task_id[ 5 ], Task5, 0 ); - directive_failed( status, "rtems_task_start of TA5" ); - - puts( "TA1 - rtems_task_wake_after - yield processor" ); - status = rtems_task_wake_after( 1 * TICKS_PER_SECOND ); - directive_failed( status, "rtems_task_wake_after" ); - - puts_nocr( - "TA1 - rtems_region_return_segment - return segment to region 1 - " - ); - Put_address_from_area_1( segment_address_4 ); - status = rtems_region_return_segment( Region_id[ 1 ], segment_address_4 ); - directive_failed( status, "rtems_region_return_segment" ); - new_line; - - puts( "TA1 - rtems_task_wake_after - yield processor" ); - status = rtems_task_wake_after( 1 * TICKS_PER_SECOND ); - directive_failed( status, "rtems_task_wake_after" ); - - puts_nocr( "TA1 - rtems_region_get_segment - wait 10 seconds for 3K " ); - puts ( "segment from region 1"); - status = rtems_region_get_segment( - Region_id[ 1 ], - 3072, - RTEMS_DEFAULT_OPTIONS, - 10 * TICKS_PER_SECOND, - &segment_address_4 - ); - directive_failed( status, "rtems_region_get_segment" ); - puts_nocr( "TA1 - got segment from region 1 - " ); - Put_address_from_area_1( segment_address_4 ); - new_line; - - puts( "TA1 - rtems_task_wake_after - yield processor" ); - status = rtems_task_wake_after( 1 * TICKS_PER_SECOND ); - directive_failed( status, "rtems_task_wake_after" ); - - puts( "TA1 - rtems_task_delete - delete TA4" ); - status = rtems_task_delete( Task_id[ 4 ] ); - directive_failed( status, "rtems_task_delete of TA4" ); - - puts_nocr( - "TA1 - rtems_region_return_segment - return segment to region 1 - " - ); - Put_address_from_area_1( segment_address_4 ); - status = rtems_region_return_segment( Region_id[ 1 ], segment_address_4 ); - directive_failed( status, "rtems_region_return_segment" ); - new_line; - - puts( "TA1 - rtems_task_wake_after - yield processor" ); - status = rtems_task_wake_after( RTEMS_YIELD_PROCESSOR ); - - puts( "TA1 - rtems_region_delete - delete region 1" ); - status = rtems_region_delete( Region_id[ 1 ] ); - directive_failed( status, "rtems_region_delete" ); - - puts( "TA1 - rtems_region_get_segment - get 3K segment from region 4" ); - status = rtems_region_get_segment( - Region_id[ 4 ], - 3072, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT, - &segment_address_1 - ); - directive_failed( status, "rtems_region_get_segment" ); - puts_nocr( "TA1 - got segment from region 4 - " ); - Put_address_from_area_4( segment_address_1 ); - new_line; - - puts( - "TA1 - rtems_region_get_segment - attempt to get 3K segment from region 4" - ); - status = rtems_region_get_segment( - Region_id[ 4 ], - 3072, - RTEMS_NO_WAIT, - RTEMS_NO_TIMEOUT, - &segment_address_2 - ); - fatal_directive_status( - status, - RTEMS_UNSATISFIED, - "rtems_task_get_segment with no memory left" - ); - puts( "TA1 - rtems_task_get_note - RTEMS_UNSATISFIED" ); - - puts( "TA1 - rtems_region_extend - extend region 4 by 4K" ); - status = rtems_region_extend( - Region_id[ 4 ], - &Area_4[4096], - 4096 - ); - directive_failed( status, "rtems_region_extend" ); - - puts( - "TA1 - rtems_region_get_segment - attempt to get 3K segment from region 4" - ); - status = rtems_region_get_segment( - Region_id[ 4 ], - 3072, - RTEMS_NO_WAIT, - RTEMS_NO_TIMEOUT, - &segment_address_3 - ); - directive_failed( status, "rtems_region_get_segment" ); - puts_nocr( "TA1 - got 3K segment from region 4 - " ); - Put_address_from_area_4( segment_address_3 ); - new_line; - - puts_nocr( - "TA1 - rtems_region_return_segment - return segment to region 4 - " - ); - Put_address_from_area_4( segment_address_1 ); - status = rtems_region_return_segment( Region_id[ 4 ], segment_address_1 ); - directive_failed( status, "rtems_region_return_segment" ); - new_line; - - puts_nocr( - "TA1 - rtems_region_return_segment - return segment to region 4 - " - ); - Put_address_from_area_4( segment_address_3 ); - status = rtems_region_return_segment( Region_id[ 4 ], segment_address_3 ); - directive_failed( status, "rtems_region_return_segment" ); - new_line; - - puts( "TA1 - rtems_region_delete - delete region 4" ); - status = rtems_region_delete( Region_id[ 4 ] ); - directive_failed( status, "rtems_region_delete" ); - - puts( "*** END OF TEST 16 ***" ); - exit( 0 ); -} diff --git a/c/src/tests/sptests/sp16/task2.c b/c/src/tests/sptests/sp16/task2.c deleted file mode 100644 index d5bc312b27..0000000000 --- a/c/src/tests/sptests/sp16/task2.c +++ /dev/null @@ -1,86 +0,0 @@ -/* Task_2 - * - * This routine serves as a test task. It competes with the other tasks - * for region resources. - * - * 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 Task_2( - rtems_task_argument argument -) -{ - rtems_status_code status; - rtems_task_priority previous_priority; - void *segment_address_1; - void *segment_address_2; - - puts( "TA2 - rtems_region_get_segment - wait on 2K segment from region 1" ); - status = rtems_region_get_segment( - Region_id[ 1 ], - 2048, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT, - &segment_address_1 - ); - directive_failed( status, "rtems_region_get_segment" ); - puts_nocr( "TA2 - got segment from region 1 - " ); - Put_address_from_area_1( segment_address_1 ); - new_line; - - puts_nocr( - "TA2 - rtems_region_return_segment - return segment to region 1 - " - ); - Put_address_from_area_1( segment_address_1 ); - status = rtems_region_return_segment( Region_id[ 1 ], segment_address_1 ); - directive_failed( status, "rtems_region_return_segment" ); - new_line; - - puts( "TA2 - rtems_task_set_priority - make self highest priority task" ); - status = rtems_task_set_priority( - RTEMS_SELF, - BASE_PRIORITY-1, - &previous_priority - ); - directive_failed( status, "rtems_task_set_priority" ); - - puts("TA2 - rtems_region_get_segment - wait on 3968 byte segment"); - status = rtems_region_get_segment( - Region_id[ 2 ], - 3968, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT, - &segment_address_2 - ); - directive_failed( status, "rtems_region_get_segment" ); - puts_nocr( "TA2 - got segment from region 2 - "); - Put_address_from_area_2( segment_address_2 ); - new_line; - - puts_nocr( - "TA2 - rtems_region_return_segment - return segment to region 2 - " - ); - Put_address_from_area_2( segment_address_2 ); - status = rtems_region_return_segment( Region_id[ 2 ], segment_address_2 ); - directive_failed( status, "rtems_region_return_segment" ); - new_line; - - puts( "TA2 - rtems_task_delete - delete self" ); - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of RTEMS_SELF" ); -} diff --git a/c/src/tests/sptests/sp16/task3.c b/c/src/tests/sptests/sp16/task3.c deleted file mode 100644 index 292e5824f6..0000000000 --- a/c/src/tests/sptests/sp16/task3.c +++ /dev/null @@ -1,57 +0,0 @@ -/* Task_3 - * - * This routine serves as a test task. It competes with the other tasks - * for region resources. - * - * 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 Task_3( - rtems_task_argument argument -) -{ - rtems_status_code status; - void *segment_address_1; - void *segment_address_2; - - puts( - "TA3 - rtems_region_get_segment - wait on 3968 byte segment from region 2" - ); - status = rtems_region_get_segment( - Region_id[ 2 ], - 3968, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT, - &segment_address_1 - ); - directive_failed( status, "rtems_region_get_segment" ); - puts_nocr( "TA3 - got segment from region 2 - " ); - Put_address_from_area_2( segment_address_1 ); - new_line; - directive_failed( status, "rtems_region_return_segment" ); - - puts( "TA3 - rtems_region_get_segment - wait on 2K segment from region 3" ); - status = rtems_region_get_segment( - Region_id[ 3 ], - 2048, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT, - &segment_address_2 - ); - directive_failed( status, "rtems_region_get_segment" ); -} diff --git a/c/src/tests/sptests/sp16/task4.c b/c/src/tests/sptests/sp16/task4.c deleted file mode 100644 index f3da89b72e..0000000000 --- a/c/src/tests/sptests/sp16/task4.c +++ /dev/null @@ -1,60 +0,0 @@ -/* Task_4 - * - * This routine serves as a test task. It competes with the other tasks - * for region resources. - * - * 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 Task_4( - rtems_task_argument argument -) -{ - rtems_status_code status; - void *segment_address_1; - void *segment_address_2; - - puts( "TA4 - rtems_region_get_segment - wait on 1.5K segment from region 1" ); - status = rtems_region_get_segment( - Region_id[ 1 ], - 1536, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT, - &segment_address_1 - ); - directive_failed( status, "rtems_region_get_segment" ); - - status = rtems_region_return_segment( Region_id[ 1 ], segment_address_1 ); - directive_failed( status, "rtems_region_return_segment" ); - puts_nocr( "TA4 - got and returned " ); - Put_address_from_area_1( segment_address_1 ); - new_line; - - status = rtems_task_wake_after( TICKS_PER_SECOND ); - directive_failed( status, "rtems_task_wake_after" ); - - puts( "TA4 - rtems_region_get_segment - wait on 3K segment from region 1" ); - status = rtems_region_get_segment( - Region_id[ 1 ], - 3072, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT, - &segment_address_2 - ); - directive_failed( status, "rtems_region_get_segment" ); -} diff --git a/c/src/tests/sptests/sp16/task5.c b/c/src/tests/sptests/sp16/task5.c deleted file mode 100644 index 5defa75f9c..0000000000 --- a/c/src/tests/sptests/sp16/task5.c +++ /dev/null @@ -1,73 +0,0 @@ -/* Task5 - * - * This routine serves as a test task. It competes with the other tasks - * for region resources. - * - * 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 Task5( - rtems_task_argument argument -) -{ - void *segment_address_1; - void *segment_address_2; - rtems_status_code status; - - puts( "TA5 - rtems_region_get_segment - wait on 1.5K segment from region 1" ); - status = rtems_region_get_segment( - Region_id[ 1 ], - 1536, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT, - &segment_address_1 - ); - directive_failed( status, "rtems_region_get_segment" ); - - status = rtems_region_return_segment( Region_id[ 1 ], segment_address_1 ); - directive_failed( status, "rtems_region_return_segment" ); - puts_nocr( "TA5 - got and returned " ); - Put_address_from_area_1( segment_address_1 ); - new_line; - - status = rtems_task_wake_after( TICKS_PER_SECOND ); - directive_failed( status, "rtems_task_wake_after" ); - - puts( "TA5 - rtems_region_get_segment - wait on 3K segment from region 1" ); - status = rtems_region_get_segment( - Region_id[ 1 ], - 3072, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT, - &segment_address_2 - ); - puts_nocr( "TA5 - got segment from region 1 - " ); - Put_address_from_area_1( segment_address_2 ); - new_line; - - status = rtems_region_return_segment( Region_id[ 1 ], segment_address_2 ); - puts_nocr( - "TA5 - rtems_region_return_segment - return segment to region 1 - " - ); - Put_address_from_area_1( segment_address_2 ); - new_line; - - puts( "TA5 - rtems_task_delete - delete self" ); - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of RTEMS_SELF" ); -} diff --git a/c/src/tests/sptests/sp17/asr.c b/c/src/tests/sptests/sp17/asr.c deleted file mode 100644 index 1795bbd522..0000000000 --- a/c/src/tests/sptests/sp17/asr.c +++ /dev/null @@ -1,32 +0,0 @@ -/* Process_asr - * - * This routine performs the processing for task 1's RTEMS_ASR. It is called - * by an assembly routine which saves the necessary registers. - * - * Input parameters: - * signal - signal set - * - * 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_asr Process_asr( - rtems_signal_set signal_set -) -{ - rtems_status_code status; - - status = rtems_task_resume( Task_id[ 2 ] ); - directive_failed( status, "RTEMS_ASR - rtems_task_resume of TA2" ); -} diff --git a/c/src/tests/sptests/sp17/init.c b/c/src/tests/sptests/sp17/init.c deleted file mode 100644 index 5527e80c9c..0000000000 --- a/c/src/tests/sptests/sp17/init.c +++ /dev/null @@ -1,72 +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$ - */ - -#include "system.h" -#undef EXTERN -#define EXTERN -#include "conftbl.h" -#include "gvar.h" - -rtems_task Init( - rtems_task_argument argument -) -{ - rtems_status_code status; - - puts( "\n\n*** TEST 17 ***" ); - - Task_name[ 1 ] = rtems_build_name( 'T', 'A', '1', ' ' ); - Task_name[ 2 ] = rtems_build_name( 'T', 'A', '2', ' ' ); - - Task_2_preempted = FALSE; - - status = rtems_task_create( - Task_name[ 1 ], - 2, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 1 ] - ); - directive_failed( status, "rtems_task_create of TA1" ); - - status = rtems_task_start( Task_id[ 1 ], Task_1, 0 ); - directive_failed( status, "rtems_task_start of TA1" ); - - status = rtems_task_create( - Task_name[ 2 ], - 1, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 2 ] - ); - directive_failed( status, "rtems_task_create of TA2" ); - - status = rtems_task_start( Task_id[ 2 ], Task_2, 0 ); - directive_failed( status, "rtems_task_start of TA2" ); - - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of RTEMS_SELF" ); -} diff --git a/c/src/tests/sptests/sp17/sp17.doc b/c/src/tests/sptests/sp17/sp17.doc deleted file mode 100644 index b4258461cf..0000000000 --- a/c/src/tests/sptests/sp17/sp17.doc +++ /dev/null @@ -1,35 +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: test17 - -directives: - ex_init, ex_start, t_create, t_start, tm_tick, i_return, t_ident, - as_catch, as_return - -concepts: - - a. Verifies system can create and start both the executive's system - initialization and idle task. - - b. Verifies can print strings to the CRT on port 2 of the mvme136 board - using Print and Println in the board support package. - - c. Verifies executive initialization performed correctly. - - d. Verifies that a task can get the task identification number - of another task. - - e. Verifies that a signal can be sent to a remote task. diff --git a/c/src/tests/sptests/sp17/sp17.scn b/c/src/tests/sptests/sp17/sp17.scn deleted file mode 100644 index 47fd140e2a..0000000000 --- a/c/src/tests/sptests/sp17/sp17.scn +++ /dev/null @@ -1,8 +0,0 @@ -*** TEST 17 *** -TA2 - Suspending self -TA1 - rtems_signal_catch: initializing signal catcher -TA1 - Sending signal to self -TA2 - signal_return preempted correctly -TA1 - TA2 correctly preempted me -TA1 - Got Back!!! -*** END OF TEST 17 *** diff --git a/c/src/tests/sptests/sp17/system.h b/c/src/tests/sptests/sp17/system.h deleted file mode 100644 index aa2c6d17e4..0000000000 --- a/c/src/tests/sptests/sp17/system.h +++ /dev/null @@ -1,30 +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 <rtems.h> -#include "tmacros.h" - -/* Miscellaneous */ - -#define EXTERN extern /* external definition */ - -/* macros */ - -/* structures */ - -#include "gvar.h" - -/* end of include file */ diff --git a/c/src/tests/sptests/sp17/task1.c b/c/src/tests/sptests/sp17/task1.c deleted file mode 100644 index 282c161a39..0000000000 --- a/c/src/tests/sptests/sp17/task1.c +++ /dev/null @@ -1,48 +0,0 @@ -/* Task_1 - * - * This task initializes the signal catcher, sends the first signal - * if running on the first node, and loops while waiting for signals. - * - * NOTE: The signal catcher is not reentrant and hence RTEMS_NO_ASR must - * be a part of its execution mode. - * - * 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 Task_1( - rtems_task_argument argument -) -{ - rtems_status_code status; - - puts( "TA1 - rtems_signal_catch: initializing signal catcher" ); - status = rtems_signal_catch( Process_asr, RTEMS_NO_ASR | RTEMS_NO_PREEMPT ); - directive_failed( status, "rtems_signal_catch" ); - - puts( "TA1 - Sending signal to self" ); - status = rtems_signal_send( Task_id[ 1 ], RTEMS_SIGNAL_16 ); - directive_failed( status, "rtems_signal_send" ); - - if ( Task_2_preempted == TRUE ) - puts( "TA1 - TA2 correctly preempted me" ); - - puts("TA1 - Got Back!!!"); - - puts( "*** END OF TEST 17 ***" ); - exit( 0 ); -} diff --git a/c/src/tests/sptests/sp17/task2.c b/c/src/tests/sptests/sp17/task2.c deleted file mode 100644 index cd3e16c7c0..0000000000 --- a/c/src/tests/sptests/sp17/task2.c +++ /dev/null @@ -1,45 +0,0 @@ -/* Task_2 - * - * This task initializes the signal catcher, sends the first signal - * if running on the first node, and loops while waiting for signals. - * - * NOTE: The signal catcher is not reentrant and hence RTEMS_NO_ASR must - * be a part of its execution mode. - * - * 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 Task_2( - rtems_task_argument argument -) -{ - rtems_status_code status; - - Task_2_preempted = FALSE; - - puts( "TA2 - Suspending self" ); - status = rtems_task_suspend( RTEMS_SELF ); - directive_failed( status, "rtems_task_suspend of TA2" ); - - puts( "TA2 - signal_return preempted correctly" ); - - Task_2_preempted = TRUE; - - status = rtems_task_suspend( RTEMS_SELF ); - directive_failed( status, "rtems_task_suspend of TA2" ); -} diff --git a/c/src/tests/sptests/sp19/first.c b/c/src/tests/sptests/sp19/first.c deleted file mode 100644 index 94bdedd5ad..0000000000 --- a/c/src/tests/sptests/sp19/first.c +++ /dev/null @@ -1,66 +0,0 @@ -/* First_FP_task - * - * This routine serves as a floating point test task. It verifies the - * basic task switching capabilities of the executive when floating - * point is configured. - * - * 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" -#include "fptest.h" -#include "inttest.h" - -rtems_task First_FP_task( - rtems_task_argument argument -) -{ - rtems_status_code status; - rtems_id tid; - rtems_time_of_day time; - rtems_unsigned32 task_index; - INTEGER_DECLARE; - FP_DECLARE; - - status = rtems_task_ident( RTEMS_SELF, RTEMS_SEARCH_ALL_NODES, &tid ); - directive_failed( status, "rtems_task_ident" ); - - task_index = task_number( tid ); - - INTEGER_LOAD( INTEGER_factors[ task_index ] ); - FP_LOAD( FP_factors[ task_index ] ); - - put_name( Task_name[ task_index ], FALSE ); - printf( " - integer base = (0x%x)\n", INTEGER_factors[ task_index ] ); - put_name( Task_name[ task_index ], FALSE ); -#if ( RTEMS_HAS_HARDWARE_FP == 1 ) - printf( " - float base = (%g)\n", FP_factors[ task_index ] ); -#else - printf( " - float base = (NA)\n" ); -#endif - - if ( argument == 0 ) { - status = rtems_task_restart( RTEMS_SELF, 1 ); - directive_failed( status, "rtems_task_restart of RTEMS_SELF" ); - } else { - build_time( &time, 12, 31, 1988, 9, 0, 0, 0 ); - status = rtems_clock_set( &time ); - directive_failed( status, "rtems_clock_set" ); - - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of RTEMS_SELF" ); - } -} diff --git a/c/src/tests/sptests/sp19/fptask.c b/c/src/tests/sptests/sp19/fptask.c deleted file mode 100644 index b8e881e6cd..0000000000 --- a/c/src/tests/sptests/sp19/fptask.c +++ /dev/null @@ -1,98 +0,0 @@ -/* FP_task - * - * This routine serves as a floating point test task. It verifies the - * basic task switching capabilities of the executive when floating - * point is configured. - * - * 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" -#include "fptest.h" -#include "inttest.h" - -rtems_task FP_task( - rtems_task_argument argument -) -{ - rtems_status_code status; - rtems_id tid; - rtems_time_of_day time; - rtems_unsigned32 task_index; - rtems_unsigned32 previous_seconds; - INTEGER_DECLARE; - FP_DECLARE; - - status = rtems_task_ident( RTEMS_SELF, RTEMS_SEARCH_ALL_NODES, &tid ); - directive_failed( status, "rtems_task_ident of self" ); - - task_index = task_number( tid ); - - INTEGER_LOAD( INTEGER_factors[ task_index ] ); - FP_LOAD( FP_factors[ task_index ] ); - - put_name( Task_name[ task_index ], FALSE ); - printf( " - integer base = (0x%x)\n", INTEGER_factors[ task_index ] ); - put_name( Task_name[ task_index ], FALSE ); -#if ( RTEMS_HAS_HARDWARE_FP == 1 ) - printf( " - float base = (%g)\n", FP_factors[ task_index ] ); -#else - printf( " - float base = (NA)\n" ); -#endif - - previous_seconds = -1; - - while( FOREVER ) { - - status = rtems_clock_get( RTEMS_CLOCK_GET_TOD, &time ); - directive_failed( status, "rtems_clock_get" ); - - if ( time.second >= 16 ) { - - if ( task_number( tid ) == 4 ) { - puts( "TA4 - rtems_task_delete - self" ); - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of TA4" ); - } - puts( "TA5 - rtems_task_delete - TA3" ); - status = rtems_task_delete( Task_id[ 3 ] ); - directive_failed( status, "rtems_task_delete of TA3" ); - - puts( "*** END OF TEST 19 *** " ); - exit( 0 ); - } - - if (previous_seconds != time.second) - { - put_name( Task_name[ task_index ], FALSE ); - print_time( " - rtems_clock_get - ", &time, "\n" ); - previous_seconds = time.second; - } - - INTEGER_CHECK( INTEGER_factors[ task_index ] ); - FP_CHECK( FP_factors[ task_index ] ); - - /* for the first 4 seconds we spin as fast as possible - * so that we likely are interrupted - * After that, we go to sleep for a second at a time - */ - if (time.second >= 4) - { - status = rtems_task_wake_after( TICKS_PER_SECOND ); - directive_failed( status, "rtems_task_wake_after" ); - } - } -} diff --git a/c/src/tests/sptests/sp19/fptest.h b/c/src/tests/sptests/sp19/fptest.h deleted file mode 100644 index a8f3a925cb..0000000000 --- a/c/src/tests/sptests/sp19/fptest.h +++ /dev/null @@ -1,165 +0,0 @@ -/* fptest.h - * - * This include file contains the CPU dependent implementation - * of the following routines needed to test RTEMS floating - * point support: - * FP_load( &context ) - * FP_check( &context ) - * - * FP_load - loads the specified floating point context - * FP_check - checks the specified floating point context - * - * NOTE: These routines are VERY CPU dependent and are thus - * located in in the CPU dependent include file - * fptest.h. These routines form the core of the - * floating point context switch test. - * - * 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$ - */ - - -#ifndef __FPTEST_h -#define __FPTEST_h - -#include <stdio.h> - -#ifndef RTEMS_HAS_HARDWARE_FP -#error "This CPU does not have RTEMS_HAS_HARDWARE_FP defined" -#endif - -#if ( RTEMS_HAS_HARDWARE_FP == FALSE ) - -#define FP_DECLARE ; -#define FP_LOAD( _factor ) -#define FP_CHECK( _factor ) 0 - -#else - -#define FP_DECLARE \ - double fp01 = 1.0; \ - double fp02 = 2.0; \ - double fp03 = 3.0; \ - double fp04 = 4.0; \ - double fp05 = 5.0; \ - double fp06 = 6.0; \ - double fp07 = 7.0; \ - double fp08 = 8.0; \ - double fp09 = 9.0; \ - double fp10 = 10.0; \ - double fp11 = 11.0; \ - double fp12 = 12.0; \ - double fp13 = 13.0; \ - double fp14 = 14.0; \ - double fp15 = 15.0; \ - double fp16 = 16.0; \ - double fp17 = 17.0; \ - double fp18 = 18.0; \ - double fp19 = 19.0; \ - double fp20 = 20.0; \ - double fp21 = 21.0; \ - double fp22 = 22.0; \ - double fp23 = 23.0; \ - double fp24 = 24.0; \ - double fp25 = 25.0; \ - double fp26 = 26.0; \ - double fp27 = 27.0; \ - double fp28 = 28.0; \ - double fp29 = 29.0; \ - double fp30 = 30.0; \ - double fp31 = 31.0; \ - double fp32 = 32.0 - -#define FP_LOAD( _factor ) \ - do { \ - fp01 += _factor; \ - fp02 += _factor; \ - fp03 += _factor; \ - fp04 += _factor; \ - fp05 += _factor; \ - fp06 += _factor; \ - fp07 += _factor; \ - fp08 += _factor; \ - fp09 += _factor; \ - fp10 += _factor; \ - fp11 += _factor; \ - fp12 += _factor; \ - fp13 += _factor; \ - fp14 += _factor; \ - fp15 += _factor; \ - fp16 += _factor; \ - fp17 += _factor; \ - fp18 += _factor; \ - fp19 += _factor; \ - fp20 += _factor; \ - fp21 += _factor; \ - fp22 += _factor; \ - fp23 += _factor; \ - fp24 += _factor; \ - fp25 += _factor; \ - fp26 += _factor; \ - fp27 += _factor; \ - fp28 += _factor; \ - fp29 += _factor; \ - fp30 += _factor; \ - fp31 += _factor; \ - fp32 += _factor; \ - } while (0) - -#define EPSILON (0.0005) -#define FPABS(d) (((d) < 0.0) ? -(d) : (d)) -#define FPNEQ(a,b) (FPABS((a)-(b)) > EPSILON) - -#define FP_CHECK_ONE( _v, _base, _factor ) \ - if ( FPNEQ( (_v), ((_base) + (_factor)) ) ) { \ - printf("%d: " #_v " wrong -- (%g not %g)\n", \ - task_index, (_v), (_base + _factor)); \ - } - - -#define FP_CHECK( _factor ) \ - do { \ - FP_CHECK_ONE( fp01, 1.0, (_factor) ); \ - FP_CHECK_ONE( fp02, 2.0, (_factor) ); \ - FP_CHECK_ONE( fp03, 3.0, (_factor) ); \ - FP_CHECK_ONE( fp04, 4.0, (_factor) ); \ - FP_CHECK_ONE( fp05, 5.0, (_factor) ); \ - FP_CHECK_ONE( fp06, 6.0, (_factor) ); \ - FP_CHECK_ONE( fp07, 7.0, (_factor) ); \ - FP_CHECK_ONE( fp08, 8.0, (_factor) ); \ - FP_CHECK_ONE( fp09, 9.0, (_factor) ); \ - FP_CHECK_ONE( fp10, 10.0, (_factor) ); \ - FP_CHECK_ONE( fp11, 11.0, (_factor) ); \ - FP_CHECK_ONE( fp12, 12.0, (_factor) ); \ - FP_CHECK_ONE( fp13, 13.0, (_factor) ); \ - FP_CHECK_ONE( fp14, 14.0, (_factor) ); \ - FP_CHECK_ONE( fp15, 15.0, (_factor) ); \ - FP_CHECK_ONE( fp16, 16.0, (_factor) ); \ - FP_CHECK_ONE( fp17, 17.0, (_factor) ); \ - FP_CHECK_ONE( fp18, 18.0, (_factor) ); \ - FP_CHECK_ONE( fp19, 19.0, (_factor) ); \ - FP_CHECK_ONE( fp20, 20.0, (_factor) ); \ - FP_CHECK_ONE( fp21, 21.0, (_factor) ); \ - FP_CHECK_ONE( fp22, 22.0, (_factor) ); \ - FP_CHECK_ONE( fp23, 23.0, (_factor) ); \ - FP_CHECK_ONE( fp24, 24.0, (_factor) ); \ - FP_CHECK_ONE( fp25, 25.0, (_factor) ); \ - FP_CHECK_ONE( fp26, 26.0, (_factor) ); \ - FP_CHECK_ONE( fp27, 27.0, (_factor) ); \ - FP_CHECK_ONE( fp28, 28.0, (_factor) ); \ - FP_CHECK_ONE( fp29, 29.0, (_factor) ); \ - FP_CHECK_ONE( fp30, 30.0, (_factor) ); \ - FP_CHECK_ONE( fp31, 31.0, (_factor) ); \ - FP_CHECK_ONE( fp32, 32.0, (_factor) ); \ - } while (0) - -#endif - -#endif diff --git a/c/src/tests/sptests/sp19/init.c b/c/src/tests/sptests/sp19/init.c deleted file mode 100644 index 477ec4ef43..0000000000 --- a/c/src/tests/sptests/sp19/init.c +++ /dev/null @@ -1,153 +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$ - */ - -#include "system.h" -#undef EXTERN -#define EXTERN -#include "conftbl.h" -#include "gvar.h" - -rtems_task Init( - rtems_task_argument argument -) -{ - rtems_status_code status; - - puts( "\n\n*** TEST 19 ***" ); - - Task_name[ 1 ] = rtems_build_name( 'T', 'A', '1', ' ' ); - Task_name[ 2 ] = rtems_build_name( 'T', 'A', '2', ' ' ); - Task_name[ 3 ] = rtems_build_name( 'T', 'A', '3', ' ' ); - Task_name[ 4 ] = rtems_build_name( 'T', 'A', '4', ' ' ); - Task_name[ 5 ] = rtems_build_name( 'T', 'A', '5', ' ' ); - Task_name[ 6 ] = rtems_build_name( 'F', 'P', '1', ' ' ); - - status = rtems_task_create( - Task_name[ 1 ], - 2, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_FLOATING_POINT, - &Task_id[ 1 ] - ); - directive_failed( status, "rtems_task_create of TA1" ); - - status = rtems_task_create( - Task_name[ 2 ], - 2, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 2 ] - ); - directive_failed( status, "rtems_task_create of TA2" ); - - status = rtems_task_create( - Task_name[ 3 ], - 2, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 3 ] - ); - directive_failed( status, "rtems_task_create of TA3" ); - - status = rtems_task_create( - Task_name[ 4 ], - 2, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_FLOATING_POINT, - &Task_id[ 4 ] - ); - directive_failed( status, "rtems_task_create of TA4" ); - - status = rtems_task_create( - Task_name[ 5 ], - 2, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_FLOATING_POINT, - &Task_id[ 5 ] - ); - directive_failed( status, "rtems_task_create of TA5" ); - - status = rtems_task_create( - Task_name[ 6 ], - 1, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_FLOATING_POINT, - &Task_id[ 6 ] - ); - directive_failed( status, "rtems_task_create of FP1" ); - - status = rtems_task_start( Task_id[ 6 ], First_FP_task, 0 ); - directive_failed( status, "rtems_task_start of FP1" ); - - status = rtems_task_start( Task_id[ 1 ], Task_1, 0 ); - directive_failed( status, "rtems_task_start of TA1" ); - - status = rtems_task_start( Task_id[ 2 ], Task_1, 0 ); - directive_failed( status, "rtems_task_start of TA2" ); - - status = rtems_task_start( Task_id[ 3 ], Task_1, 0 ); - directive_failed( status, "rtems_task_start of TA3" ); - - status = rtems_task_start( Task_id[ 4 ], FP_task, 0 ); - directive_failed( status, "rtems_task_start of TA4" ); - - status = rtems_task_start( Task_id[ 5 ], FP_task, 0 ); - directive_failed( status, "rtems_task_create of TA5" ); - - /* - * Load "task dependent factors" in the context areas - */ - - - FP_factors[0] = 0.0; - FP_factors[1] = 1000.1; - FP_factors[2] = 2000.2; - FP_factors[3] = 3000.3; - FP_factors[4] = 4000.4; - FP_factors[5] = 5000.5; - FP_factors[6] = 6000.6; - FP_factors[7] = 7000.7; - FP_factors[8] = 8000.8; - FP_factors[9] = 9000.9; - - INTEGER_factors[0] = 0x0000; - INTEGER_factors[1] = 0x1000; - INTEGER_factors[2] = 0x2000; - INTEGER_factors[3] = 0x3000; - INTEGER_factors[4] = 0x4000; - INTEGER_factors[5] = 0x5000; - INTEGER_factors[6] = 0x6000; - INTEGER_factors[7] = 0x7000; - INTEGER_factors[8] = 0x8000; - INTEGER_factors[9] = 0x9000; - - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of TA1" ); -} diff --git a/c/src/tests/sptests/sp19/inttest.h b/c/src/tests/sptests/sp19/inttest.h deleted file mode 100644 index 5dfb0af636..0000000000 --- a/c/src/tests/sptests/sp19/inttest.h +++ /dev/null @@ -1,149 +0,0 @@ -/* inttest.h - * - * XXX: ??? - * This include file contains the CPU dependent implementation - * of the following routines needed to test RTEMS floating - * point support: - * INTEGER_load( &context ) - * INTEGER_check( &context ) - * - * INTEGER_load - loads the specified floating point context - * INTEGER_check - checks the specified floating point context - * - * NOTE: These routines are VERY CPU dependent and are thus - * located in in the CPU dependent include file - * inttest.h. These routines form the core of the - * floating point context switch test. - * - * 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$ - */ - - -#ifndef __INTEGER_TEST_h -#define __INTEGER_TEST_h - -#include <stdio.h> -#define REG_VARIABLE rtems_unsigned32 - -#define INTEGER_DECLARE \ - REG_VARIABLE int01 = 1; \ - REG_VARIABLE int02 = 2; \ - REG_VARIABLE int03 = 3; \ - REG_VARIABLE int04 = 4; \ - REG_VARIABLE int05 = 5; \ - REG_VARIABLE int06 = 6; \ - REG_VARIABLE int07 = 7; \ - REG_VARIABLE int08 = 8; \ - REG_VARIABLE int09 = 9; \ - REG_VARIABLE int10 = 10; \ - REG_VARIABLE int11 = 11; \ - REG_VARIABLE int12 = 12; \ - REG_VARIABLE int13 = 13; \ - REG_VARIABLE int14 = 14; \ - REG_VARIABLE int15 = 15; \ - REG_VARIABLE int16 = 16; \ - REG_VARIABLE int17 = 17; \ - REG_VARIABLE int18 = 18; \ - REG_VARIABLE int19 = 19; \ - REG_VARIABLE int20 = 20; \ - REG_VARIABLE int21 = 21; \ - REG_VARIABLE int22 = 22; \ - REG_VARIABLE int23 = 23; \ - REG_VARIABLE int24 = 24; \ - REG_VARIABLE int25 = 25; \ - REG_VARIABLE int26 = 26; \ - REG_VARIABLE int27 = 27; \ - REG_VARIABLE int28 = 28; \ - REG_VARIABLE int29 = 29; \ - REG_VARIABLE int30 = 30; \ - REG_VARIABLE int31 = 31; \ - REG_VARIABLE int32 = 32 - -#define INTEGER_LOAD( _factor ) \ - do { \ - int01 += _factor; \ - int02 += _factor; \ - int03 += _factor; \ - int04 += _factor; \ - int05 += _factor; \ - int06 += _factor; \ - int07 += _factor; \ - int08 += _factor; \ - int09 += _factor; \ - int10 += _factor; \ - int11 += _factor; \ - int12 += _factor; \ - int13 += _factor; \ - int14 += _factor; \ - int15 += _factor; \ - int16 += _factor; \ - int17 += _factor; \ - int18 += _factor; \ - int19 += _factor; \ - int20 += _factor; \ - int21 += _factor; \ - int22 += _factor; \ - int23 += _factor; \ - int24 += _factor; \ - int25 += _factor; \ - int26 += _factor; \ - int27 += _factor; \ - int28 += _factor; \ - int29 += _factor; \ - int30 += _factor; \ - int31 += _factor; \ - int32 += _factor; \ - } while (0) - -#define INTEGER_CHECK_ONE( _v, _base, _factor ) \ - if ( (_v) != ((_base) + (_factor)) ) { \ - printf("%d: " #_v " wrong -- (0x%x not 0x%x)\n", \ - task_index, (_v), (_base + _factor)); \ - } - - -#define INTEGER_CHECK( _factor ) \ - do { \ - INTEGER_CHECK_ONE( int01, 1, (_factor) ); \ - INTEGER_CHECK_ONE( int02, 2, (_factor) ); \ - INTEGER_CHECK_ONE( int03, 3, (_factor) ); \ - INTEGER_CHECK_ONE( int04, 4, (_factor) ); \ - INTEGER_CHECK_ONE( int05, 5, (_factor) ); \ - INTEGER_CHECK_ONE( int06, 6, (_factor) ); \ - INTEGER_CHECK_ONE( int07, 7, (_factor) ); \ - INTEGER_CHECK_ONE( int08, 8, (_factor) ); \ - INTEGER_CHECK_ONE( int09, 9, (_factor) ); \ - INTEGER_CHECK_ONE( int10, 10, (_factor) ); \ - INTEGER_CHECK_ONE( int11, 11, (_factor) ); \ - INTEGER_CHECK_ONE( int12, 12, (_factor) ); \ - INTEGER_CHECK_ONE( int13, 13, (_factor) ); \ - INTEGER_CHECK_ONE( int14, 14, (_factor) ); \ - INTEGER_CHECK_ONE( int15, 15, (_factor) ); \ - INTEGER_CHECK_ONE( int16, 16, (_factor) ); \ - INTEGER_CHECK_ONE( int17, 17, (_factor) ); \ - INTEGER_CHECK_ONE( int18, 18, (_factor) ); \ - INTEGER_CHECK_ONE( int19, 19, (_factor) ); \ - INTEGER_CHECK_ONE( int20, 20, (_factor) ); \ - INTEGER_CHECK_ONE( int21, 21, (_factor) ); \ - INTEGER_CHECK_ONE( int22, 22, (_factor) ); \ - INTEGER_CHECK_ONE( int23, 23, (_factor) ); \ - INTEGER_CHECK_ONE( int24, 24, (_factor) ); \ - INTEGER_CHECK_ONE( int25, 25, (_factor) ); \ - INTEGER_CHECK_ONE( int26, 26, (_factor) ); \ - INTEGER_CHECK_ONE( int27, 27, (_factor) ); \ - INTEGER_CHECK_ONE( int28, 28, (_factor) ); \ - INTEGER_CHECK_ONE( int29, 29, (_factor) ); \ - INTEGER_CHECK_ONE( int30, 30, (_factor) ); \ - INTEGER_CHECK_ONE( int31, 31, (_factor) ); \ - INTEGER_CHECK_ONE( int32, 32, (_factor) ); \ - } while (0) - -#endif diff --git a/c/src/tests/sptests/sp19/sp19.doc b/c/src/tests/sptests/sp19/sp19.doc deleted file mode 100644 index 78ac463c9f..0000000000 --- a/c/src/tests/sptests/sp19/sp19.doc +++ /dev/null @@ -1,23 +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: test19 - -directives: - -concepts: - - a. Verifies system can dispatch a mixture of floating point and - non-floating point tasks. diff --git a/c/src/tests/sptests/sp19/sp19.scn b/c/src/tests/sptests/sp19/sp19.scn deleted file mode 100644 index 76ded9f7d0..0000000000 --- a/c/src/tests/sptests/sp19/sp19.scn +++ /dev/null @@ -1,55 +0,0 @@ -*** TEST 19 *** -FP1 - integer base = (0x6000) -FP1 - float base = (6000.6) -FP1 - integer base = (0x6000) -FP1 - float base = (6000.6) -TA1 - integer base = (0x1000) -TA1 - rtems_clock_get - 09:00:00 12/31/1988 -TA2 - integer base = (0x2000) -TA2 - rtems_clock_get - 09:00:00 12/31/1988 -TA3 - integer base = (0x3000) -TA3 - rtems_clock_get - 09:00:00 12/31/1988 -TA4 - integer base = (0x4000) -TA4 - float base = (4000.4) -TA4 - rtems_clock_get - 09:00:00 12/31/1988 -TA5 - integer base = (0x5000) -TA5 - float base = (5000.5) -TA5 - rtems_clock_get - 09:00:00 12/31/1988 -TA4 - rtems_clock_get - 09:00:01 12/31/1988 -TA5 - rtems_clock_get - 09:00:01 12/31/1988 -TA4 - rtems_clock_get - 09:00:02 12/31/1988 -TA5 - rtems_clock_get - 09:00:02 12/31/1988 -TA4 - rtems_clock_get - 09:00:03 12/31/1988 -TA5 - rtems_clock_get - 09:00:03 12/31/1988 -TA4 - rtems_clock_get - 09:00:04 12/31/1988 -TA5 - rtems_clock_get - 09:00:04 12/31/1988 -TA1 - rtems_clock_get - 09:00:05 12/31/1988 -TA4 - rtems_clock_get - 09:00:05 12/31/1988 -TA5 - rtems_clock_get - 09:00:05 12/31/1988 -TA4 - rtems_clock_get - 09:00:06 12/31/1988 -TA5 - rtems_clock_get - 09:00:06 12/31/1988 -TA4 - rtems_clock_get - 09:00:07 12/31/1988 -TA5 - rtems_clock_get - 09:00:07 12/31/1988 -TA4 - rtems_clock_get - 09:00:08 12/31/1988 -TA5 - rtems_clock_get - 09:00:08 12/31/1988 -TA4 - rtems_clock_get - 09:00:09 12/31/1988 -TA5 - rtems_clock_get - 09:00:09 12/31/1988 -TA1 - rtems_clock_get - 09:00:10 12/31/1988 -TA2 - rtems_clock_get - 09:00:10 12/31/1988 -TA4 - rtems_clock_get - 09:00:10 12/31/1988 -TA5 - rtems_clock_get - 09:00:10 12/31/1988 -TA4 - rtems_clock_get - 09:00:11 12/31/1988 -TA5 - rtems_clock_get - 09:00:11 12/31/1988 -TA4 - rtems_clock_get - 09:00:12 12/31/1988 -TA5 - rtems_clock_get - 09:00:12 12/31/1988 -TA4 - rtems_clock_get - 09:00:13 12/31/1988 -TA5 - rtems_clock_get - 09:00:13 12/31/1988 -TA4 - rtems_clock_get - 09:00:14 12/31/1988 -TA5 - rtems_clock_get - 09:00:14 12/31/1988 -TA1 - rtems_clock_get - 09:00:15 12/31/1988 -TA3 - rtems_clock_get - 09:00:15 12/31/1988 -TA4 - rtems_clock_get - 09:00:15 12/31/1988 -TA5 - rtems_clock_get - 09:00:15 12/31/1988 -TA4 - rtems_task_delete - self -TA5 - rtems_task_delete - TA3 -*** END OF TEST 19 *** diff --git a/c/src/tests/sptests/sp19/system.h b/c/src/tests/sptests/sp19/system.h deleted file mode 100644 index aa2c6d17e4..0000000000 --- a/c/src/tests/sptests/sp19/system.h +++ /dev/null @@ -1,30 +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 <rtems.h> -#include "tmacros.h" - -/* Miscellaneous */ - -#define EXTERN extern /* external definition */ - -/* macros */ - -/* structures */ - -#include "gvar.h" - -/* end of include file */ diff --git a/c/src/tests/sptests/sp19/task1.c b/c/src/tests/sptests/sp19/task1.c deleted file mode 100644 index 874fbcc614..0000000000 --- a/c/src/tests/sptests/sp19/task1.c +++ /dev/null @@ -1,59 +0,0 @@ -/* Task_1 - * - * This routine serves as a test task. It verifies the basic task - * switching capabilities of the executive. - * - * 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" -#include "inttest.h" - -rtems_task Task_1( - rtems_task_argument argument -) -{ - rtems_status_code status; - rtems_id tid; - rtems_time_of_day time; - rtems_unsigned32 task_index; - INTEGER_DECLARE; - - status = rtems_task_ident( RTEMS_SELF, RTEMS_SEARCH_ALL_NODES, &tid ); - directive_failed( status, "rtems_task_ident" ); - - task_index = task_number( tid ); - - INTEGER_LOAD( INTEGER_factors[ task_index ] ); - - put_name( Task_name[ task_index ], FALSE ); - printf( " - integer base = (0x%x)\n", INTEGER_factors[ task_index ] ); - - while( FOREVER ) { - status = rtems_clock_get( RTEMS_CLOCK_GET_TOD, &time ); - directive_failed( status, "rtems_clock_get" ); - - put_name( Task_name[ task_number( tid ) ], FALSE ); - print_time( " - rtems_clock_get - ", &time, "\n" ); - - INTEGER_CHECK( INTEGER_factors[ task_index ] ); - - status = rtems_task_wake_after( - ( task_number( tid ) ) * 5 * TICKS_PER_SECOND - ); - directive_failed( status, "rtems_task_wake_after" ); - } -} diff --git a/c/src/tests/sptests/sp20/getall.c b/c/src/tests/sptests/sp20/getall.c deleted file mode 100644 index cff3841dff..0000000000 --- a/c/src/tests/sptests/sp20/getall.c +++ /dev/null @@ -1,43 +0,0 @@ -/* Get_all_counters - * - * This routine allows TA5 to atomically obtain the iteration counters. - * - * Input parameters: NONE - * - * 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" - -void Get_all_counters() -{ - rtems_mode previous_mode; - rtems_status_code status; - - status = rtems_task_mode( - RTEMS_NO_PREEMPT, - RTEMS_PREEMPT_MASK, - &previous_mode - ); - directive_failed( status, "rtems_task_mode to RTEMS_NO_PREEMPT" ); - - Temporary_count = Count; - Count.count[ 1 ] = 0; - Count.count[ 2 ] = 0; - Count.count[ 3 ] = 0; - Count.count[ 4 ] = 0; - Count.count[ 5 ] = 0; - - status = rtems_task_mode( RTEMS_PREEMPT, RTEMS_PREEMPT_MASK, &previous_mode ); - directive_failed( status, "rtems_task_mode to RTEMS_PREEMPT" ); -} diff --git a/c/src/tests/sptests/sp20/init.c b/c/src/tests/sptests/sp20/init.c deleted file mode 100644 index 95bdc3e728..0000000000 --- a/c/src/tests/sptests/sp20/init.c +++ /dev/null @@ -1,71 +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$ - */ - -#include "system.h" -#undef EXTERN -#define EXTERN -#include "conftbl.h" -#include "gvar.h" - -rtems_task Init( - rtems_task_argument argument -) -{ - rtems_unsigned32 index; - rtems_status_code status; - - puts( "\n\n*** TEST 20 ***" ); - - Task_name[ 1 ] = rtems_build_name( 'T', 'A', '1', ' ' ); - Task_name[ 2 ] = rtems_build_name( 'T', 'A', '2', ' ' ); - Task_name[ 3 ] = rtems_build_name( 'T', 'A', '3', ' ' ); - Task_name[ 4 ] = rtems_build_name( 'T', 'A', '4', ' ' ); - Task_name[ 5 ] = rtems_build_name( 'T', 'A', '5', ' ' ); - - for ( index = 1 ; index <= 5 ; index++ ) { - status = rtems_task_create( - Task_name[ index ], - Priorities[ index ], - 4096, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ index ] - ); - directive_failed( status, "rtems_task_create loop" ); - } - - for ( index = 1 ; index <= 5 ; index++ ) { - status = rtems_task_start( Task_id[ index ], Task_1_through_5, index ); - directive_failed( status, "rtems_task_start loop" ); - } - - Count.count[ 1 ] = 0; - Count.count[ 2 ] = 0; - Count.count[ 3 ] = 0; - Count.count[ 4 ] = 0; - Count.count[ 5 ] = 0; - - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of RTEMS_SELF" ); -} diff --git a/c/src/tests/sptests/sp20/sp20.doc b/c/src/tests/sptests/sp20/sp20.doc deleted file mode 100644 index 4a029a4b89..0000000000 --- a/c/src/tests/sptests/sp20/sp20.doc +++ /dev/null @@ -1,24 +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: test20 - -directives: - - rm_create, rm_period - -concepts: - - a. Verifies Rate Monotonic Manager behavior. diff --git a/c/src/tests/sptests/sp20/sp20.scn b/c/src/tests/sptests/sp20/sp20.scn deleted file mode 100644 index 1de3c18db8..0000000000 --- a/c/src/tests/sptests/sp20/sp20.scn +++ /dev/null @@ -1,27 +0,0 @@ -*** TEST 20 *** -TA1 - rtems_rate_monotonic_create id = 0x00010001 -TA1 - rtems_rate_monotonic_ident id = 0x00010001 -TA1 - (0x00010001) period 2 -TA2 - rtems_rate_monotonic_create id = 0x00010002 -TA2 - rtems_rate_monotonic_ident id = 0x00010002 -TA2 - (0x00010002) period 2 -TA3 - rtems_rate_monotonic_create id = 0x00010003 -TA3 - rtems_rate_monotonic_ident id = 0x00010003 -TA3 - (0x00010003) period 2 -TA4 - rtems_rate_monotonic_create id = 0x00010004 -TA4 - rtems_rate_monotonic_ident id = 0x00010004 -TA4 - (0x00010004) period 2 -TA5 - rtems_rate_monotonic_create id = 0x00010005 -TA5 - rtems_rate_monotonic_ident id = 0x00010005 -TA5 - (0x00010005) period 50 -TA5 - PERIODS CHECK OK (1) -TA5 - PERIODS CHECK OK (2) -TA5 - PERIODS CHECK OK (3) -TA5 - PERIODS CHECK OK (4) -TA5 - PERIODS CHECK OK (5) -TA5 - PERIODS CHECK OK (6) -TA5 - PERIODS CHECK OK (7) -TA5 - PERIODS CHECK OK (8) -TA5 - PERIODS CHECK OK (9) -TA5 - PERIODS CHECK OK (10) -*** END OF TEST 20 *** diff --git a/c/src/tests/sptests/sp20/system.h b/c/src/tests/sptests/sp20/system.h deleted file mode 100644 index 98d52a20cc..0000000000 --- a/c/src/tests/sptests/sp20/system.h +++ /dev/null @@ -1,34 +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 <rtems.h> -#include "tmacros.h" - -/* Miscellaneous */ - -#define EXTERN extern /* external definition */ - -/* macros */ - -/* structures */ - -struct counters { - rtems_unsigned32 count[6]; -}; - -#include "gvar.h" - -/* end of include file */ diff --git a/c/src/tests/sptests/sp20/task1.c b/c/src/tests/sptests/sp20/task1.c deleted file mode 100644 index c5eda1a9ae..0000000000 --- a/c/src/tests/sptests/sp20/task1.c +++ /dev/null @@ -1,116 +0,0 @@ -/* Task_1_through_5 - * - * This routine serves as a test task for the period capabilities of the - * Rate Monotonic Manager. - * - * 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_unsigned32 Periods[6] = { 0, 2, 2, 2, 2, 100 }; -rtems_unsigned32 Iterations[6] = { 0, 50, 50, 50, 50, 1 }; -rtems_task_priority Priorities[6] = { 0, 1, 1, 3, 4, 5 }; - -rtems_task Task_1_through_5( - rtems_unsigned32 argument -) -{ - rtems_id rmid; - rtems_id test_rmid; - rtems_unsigned32 index; - rtems_unsigned32 pass; - rtems_unsigned32 failed; - rtems_status_code status; - - status = rtems_rate_monotonic_create( argument, &rmid ); - directive_failed( status, "rtems_rate_monotonic_create" ); - put_name( Task_name[ argument ], FALSE ); - printf( "- rtems_rate_monotonic_create id = 0x%08x\n", rmid ); - - status = rtems_rate_monotonic_ident( argument, &test_rmid ); - directive_failed( status, "rtems_rate_monotonic_ident" ); - put_name( Task_name[ argument ], FALSE ); - printf( "- rtems_rate_monotonic_ident id = 0x%08x\n", test_rmid ); - - if ( rmid != test_rmid ) { - printf( "RMID's DO NOT MATCH (0x%x and 0x%x)\n", rmid, test_rmid ); - exit( 0 ); - } - - put_name( Task_name[ argument ], FALSE ); - printf( "- (0x%08x) period %d\n", rmid, Periods[ argument ] ); - - status = rtems_task_wake_after( 2 ); - directive_failed( status, "rtems_task_wake_after" ); - - switch ( argument ) { - case 1: - case 2: - case 3: - case 4: - while ( FOREVER ) { - status = rtems_rate_monotonic_period( rmid, Periods[ argument ] ); - directive_failed( status, "rtems_rate_monotonic_period" ); - Count.count[ argument ]++; - } - break; - case 5: - pass = 0; - failed = 0; - - status = rtems_rate_monotonic_period( rmid, Periods[ argument ] ); - directive_failed( status, "rtems_rate_monotonic_period 1 of TA5" ); - - Get_all_counters(); - - while ( FOREVER ) { - - status = rtems_rate_monotonic_period( rmid, Periods[ argument ] ); - directive_failed( status, "rtems_rate_monotonic_period 2 of TA5" ); - - Get_all_counters(); - - for( index = 1 ; index <= 4 ; index++ ) { - if ( Temporary_count.count[ index ] != Iterations[ index ] ) { - puts_nocr( "FAIL -- " ); - put_name ( Task_name[ index ], FALSE ); - printf ( " Actual=%d, Expected=%d\n", - Temporary_count.count[ index ], - Iterations[ index ] - ); - failed += 1; - } - } - - if ( failed == 5 ) - exit( 0 ); - - pass += 1; - - printf( "TA5 - PERIODS CHECK OK (%d)\n", pass ); - - fflush( stdout ); - - if ( pass == 10 ) { - puts( "*** END OF TEST 20 ***" ); - exit( 0 ); - } - - } - break; - } -} diff --git a/c/src/tests/sptests/sp21/init.c b/c/src/tests/sptests/sp21/init.c deleted file mode 100644 index bee9b931fc..0000000000 --- a/c/src/tests/sptests/sp21/init.c +++ /dev/null @@ -1,56 +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$ - */ - -#include "system.h" -#undef EXTERN -#define EXTERN -#include "conftbl.h" -#include "gvar.h" - -rtems_task Init( - rtems_task_argument argument -) -{ - rtems_status_code status; - - puts( "\n\n*** TEST 21 ***" ); - - Task_name[ 1 ] = rtems_build_name( 'T', 'A', '1', ' ' ); - - status = rtems_task_create( - Task_name[ 1 ], - 1, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 1 ] - ); - directive_failed( status, "rtems_task_create of TA1" ); - - status = rtems_task_start( Task_id[ 1 ], Task_1, 0 ); - directive_failed( status, "rtems_task_start of TA1" ); - - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of RTEMS_SELF" ); -} diff --git a/c/src/tests/sptests/sp21/sp21.doc b/c/src/tests/sptests/sp21/sp21.doc deleted file mode 100644 index 55ed6282bc..0000000000 --- a/c/src/tests/sptests/sp21/sp21.doc +++ /dev/null @@ -1,28 +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: test21 - -directives: - ex_init, ex_start, t_create, t_start, tm_tick, i_return, t_delete - de_init, de_open, de_close, de_read, de_write, de_cntrl - -concepts: - - a. Verifies all I/O manager directives always return successful for - null drivers. - - b. Verifies all I/O manager directives call and return from the driver - entry points in the driver address table. diff --git a/c/src/tests/sptests/sp21/sp21.scn b/c/src/tests/sptests/sp21/sp21.scn deleted file mode 100644 index c6392e3ea3..0000000000 --- a/c/src/tests/sptests/sp21/sp21.scn +++ /dev/null @@ -1,19 +0,0 @@ -*** TEST 21 *** ------ TESTING THE NULL DRIVER CHECKS ----- -TA1 - rtems_io_initialize - NULL DRIVER RTEMS_SUCCESSFUL -TA1 - rtems_io_open - NULL DRIVER RTEMS_SUCCESSFUL -TA1 - rtems_io_close - NULL DRIVER RTEMS_SUCCESSFUL -TA1 - rtems_io_read - NULL DRIVER RTEMS_SUCCESSFUL -TA1 - rtems_io_write - NULL DRIVER RTEMS_SUCCESSFUL -TA1 - rtems_io_control - NULL DRIVER RTEMS_SUCCESSFUL ------ TESTING THE I/O MANAGER DIRECTIVES ----- -TA1 - rtems_io_initialize - STUB DRIVER RTEMS_SUCCESSFUL -TA1 - rtems_io_open - STUB DRIVER RTEMS_SUCCESSFUL -TA1 - rtems_io_close - STUB DRIVER RTEMS_SUCCESSFUL -TA1 - rtems_io_read - STUB DRIVER RTEMS_SUCCESSFUL -TA1 - rtems_io_write - STUB DRIVER RTEMS_SUCCESSFUL -TA1 - rtems_io_control - STUB DRIVER RTEMS_SUCCESSFUL ------ RETURNING INVALID MAJOR NUMBER ----- -TA1 - rtems_io_initialize - RTEMS_INVALID_NUMBER -TA1 - rtems_io_open - RTEMS_INVALID_NUMBER -*** END OF TEST 21 *** diff --git a/c/src/tests/sptests/sp21/system.h b/c/src/tests/sptests/sp21/system.h deleted file mode 100644 index aa2c6d17e4..0000000000 --- a/c/src/tests/sptests/sp21/system.h +++ /dev/null @@ -1,30 +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 <rtems.h> -#include "tmacros.h" - -/* Miscellaneous */ - -#define EXTERN extern /* external definition */ - -/* macros */ - -/* structures */ - -#include "gvar.h" - -/* end of include file */ diff --git a/c/src/tests/sptests/sp21/task1.c b/c/src/tests/sptests/sp21/task1.c deleted file mode 100644 index 3c4b284a97..0000000000 --- a/c/src/tests/sptests/sp21/task1.c +++ /dev/null @@ -1,106 +0,0 @@ -/* Task_1 - * - * This routine serves as a test task. It tests the I/O manager. - * - * 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" - -#define STUB_DRIVER_MAJOR 0x2 -#define NO_DRIVER_MAJOR 0x1 -#define INVALID_DRIVER_MAJOR 0x5 - -rtems_task Task_1( - rtems_task_argument argument -) -{ - rtems_status_code status; - rtems_status_code return_value; - - puts( "----- TESTING THE NULL DRIVER CHECKS -----" ); - - status = rtems_io_initialize( NO_DRIVER_MAJOR, 0, NULL, &return_value ); - directive_failed( status, "rtems_io_initialize" ); - puts( "TA1 - rtems_io_initialize - NULL DRIVER RTEMS_SUCCESSFUL" ); - - status = rtems_io_open( NO_DRIVER_MAJOR, 0, NULL, &return_value ); - directive_failed( status, "rtems_io_open" ); - puts( "TA1 - rtems_io_open - NULL DRIVER RTEMS_SUCCESSFUL" ); - - status = rtems_io_close( NO_DRIVER_MAJOR, 0, NULL, &return_value ); - directive_failed( status, "rtems_io_close" ); - puts( "TA1 - rtems_io_close - NULL DRIVER RTEMS_SUCCESSFUL" ); - - status = rtems_io_read( NO_DRIVER_MAJOR, 0, NULL, &return_value ); - directive_failed( status, "rtems_io_read" ); - puts( "TA1 - rtems_io_read - NULL DRIVER RTEMS_SUCCESSFUL" ); - - status = rtems_io_write( NO_DRIVER_MAJOR, 0, NULL, &return_value ); - directive_failed( status, "rtems_io_write" ); - puts( "TA1 - rtems_io_write - NULL DRIVER RTEMS_SUCCESSFUL" ); - - status = rtems_io_control( NO_DRIVER_MAJOR, 0, NULL, &return_value ); - directive_failed( status, "rtems_io_control" ); - puts( "TA1 - rtems_io_control - NULL DRIVER RTEMS_SUCCESSFUL" ); - - puts( "----- TESTING THE I/O MANAGER DIRECTIVES -----" ); - - status = rtems_io_initialize( STUB_DRIVER_MAJOR, 0, NULL, &return_value ); - directive_failed( status, "rtems_io_initialize" ); - puts( "TA1 - rtems_io_initialize - STUB DRIVER RTEMS_SUCCESSFUL" ); - - status = rtems_io_open( STUB_DRIVER_MAJOR, 0, NULL, &return_value ); - directive_failed( status, "rtems_io_open" ); - puts( "TA1 - rtems_io_open - STUB DRIVER RTEMS_SUCCESSFUL" ); - - status = rtems_io_close( STUB_DRIVER_MAJOR, 0, NULL, &return_value ); - directive_failed( status, "rtems_io_close" ); - puts( "TA1 - rtems_io_close - STUB DRIVER RTEMS_SUCCESSFUL" ); - - status = rtems_io_read( STUB_DRIVER_MAJOR, 0, NULL, &return_value ); - directive_failed( status, "rtems_io_read" ); - puts( "TA1 - rtems_io_read - STUB DRIVER RTEMS_SUCCESSFUL" ); - - status = rtems_io_write( STUB_DRIVER_MAJOR, 0, NULL, &return_value ); - directive_failed( status, "rtems_io_write" ); - puts( "TA1 - rtems_io_write - STUB DRIVER RTEMS_SUCCESSFUL" ); - - status = rtems_io_control( STUB_DRIVER_MAJOR, 0, NULL, &return_value ); - directive_failed( status, "rtems_io_control" ); - puts( "TA1 - rtems_io_control - STUB DRIVER RTEMS_SUCCESSFUL" ); - - puts( "----- RETURNING INVALID MAJOR NUMBER -----" ); - - status = rtems_io_initialize( INVALID_DRIVER_MAJOR, 0, NULL, &return_value ); - fatal_directive_status( - status, - RTEMS_INVALID_NUMBER, - "rtems_io_initialize" - ); - puts( "TA1 - rtems_io_initialize - RTEMS_INVALID_NUMBER" ); - - status = rtems_io_open( INVALID_DRIVER_MAJOR, 0, NULL, &return_value ); - fatal_directive_status( - status, - RTEMS_INVALID_NUMBER, - "rtems_io_open" - ); - puts( "TA1 - rtems_io_open - RTEMS_INVALID_NUMBER" ); - - puts( "*** END OF TEST 21 ***" ); - exit( 0 ); -} diff --git a/c/src/tests/sptests/sp22/delay.c b/c/src/tests/sptests/sp22/delay.c deleted file mode 100644 index bcf9e014a7..0000000000 --- a/c/src/tests/sptests/sp22/delay.c +++ /dev/null @@ -1,32 +0,0 @@ -/* Delayed_resume - * - * This routine is scheduled to be fired as a timer service routine. - * When fired this subprogram resumes Task_1. - * - * Input parameters: NONE - * - * 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_timer_service_routine Delayed_resume( - rtems_id ignored_id, - void *ignored_address -) -{ - rtems_status_code status; - - status = rtems_task_resume( Task_id[ 1 ] ); - directive_failed( status, "rtems_task_resume of self" ); -} diff --git a/c/src/tests/sptests/sp22/init.c b/c/src/tests/sptests/sp22/init.c deleted file mode 100644 index 820fac81e3..0000000000 --- a/c/src/tests/sptests/sp22/init.c +++ /dev/null @@ -1,69 +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$ - */ - -#include "system.h" -#undef EXTERN -#define EXTERN -#include "conftbl.h" -#include "gvar.h" - -rtems_task Init( - rtems_task_argument argument -) -{ - rtems_time_of_day time; - rtems_status_code status; - - puts( "\n\n*** TEST 22 ***" ); - - build_time( &time, 12, 31, 1988, 9, 0, 0, 0 ); - - status = rtems_clock_set( &time ); - directive_failed( status, "rtems_clock_set" ); - - Task_name[ 1 ] = rtems_build_name( 'T', 'A', '1', ' ' ); - Timer_name[ 1 ] = rtems_build_name( 'T', 'M', '1', ' ' ); - - status = rtems_task_create( - Task_name[ 1 ], - 1, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 1 ] - ); - directive_failed( status, "rtems_task_create of TA1" ); - - status = rtems_task_start( Task_id[ 1 ], Task_1, 0 ); - directive_failed( status, "rtems_task_start of TA1" ); - - puts( "INIT - rtems_timer_create - creating timer 1" ); - status = rtems_timer_create( Timer_name[ 1 ], &Timer_id[ 1 ] ); - directive_failed( status, "rtems_timer_create" ); - - printf( "INIT - timer 1 has id (0x%x)\n", Timer_id[ 1 ] ); - - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of RTEMS_SELF" ); -} diff --git a/c/src/tests/sptests/sp22/prtime.c b/c/src/tests/sptests/sp22/prtime.c deleted file mode 100644 index f3871eb9fd..0000000000 --- a/c/src/tests/sptests/sp22/prtime.c +++ /dev/null @@ -1,32 +0,0 @@ -/* Print_time - * - * This routine prints the name of Task_1 and the current time of day. - * - * Input parameters: NONE - * - * 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" - -void Print_time( void ) -{ - rtems_time_of_day time; - rtems_status_code status; - - status = rtems_clock_get( RTEMS_CLOCK_GET_TOD, &time ); - directive_failed( status, "rtems_clock_get" ); - - put_name( Task_name[ 1 ], FALSE ); - print_time( "- rtems_clock_get - ", &time, "\n" ); -} diff --git a/c/src/tests/sptests/sp22/sp22.doc b/c/src/tests/sptests/sp22/sp22.doc deleted file mode 100644 index 9208d7a695..0000000000 --- a/c/src/tests/sptests/sp22/sp22.doc +++ /dev/null @@ -1,20 +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: test22 - -directives: - -concepts: diff --git a/c/src/tests/sptests/sp22/sp22.scn b/c/src/tests/sptests/sp22/sp22.scn deleted file mode 100644 index 6402ab4482..0000000000 --- a/c/src/tests/sptests/sp22/sp22.scn +++ /dev/null @@ -1,29 +0,0 @@ -*** TEST 22 *** -INIT - rtems_timer_create - creating timer 1 -INIT - timer 1 has id (0x10001) -TA1 - rtems_timer_ident - identing timer 1 -TA1 - timer 1 has id (0x10001) -TA1 - rtems_clock_get - 09:00:00 12/31/1988 -TA1 - rtems_timer_fire_after - timer 1 in 3 seconds -TA1 - rtems_task_suspend( RTEMS_SELF ) -TA1 - rtems_clock_get - 09:00:03 12/31/1988 -TA1 - rtems_timer_fire_after - timer 1 in 3 seconds -TA1 - rtems_task_wake_after - 1 second -TA1 - rtems_clock_get - 09:00:04 12/31/1988 -TA1 - rtems_timer_reset - timer 1 -TA1 - rtems_task_suspend( RTEMS_SELF ) -TA1 - rtems_clock_get - 09:00:07 12/31/1988 -<pause> -TA1 - rtems_timer_fire_after - timer 1 in 3 seconds -TA1 - rtems_timer_cancel - timer 1 -TA1 - rtems_clock_get - 09:00:07 12/31/1988 -TA1 - rtems_timer_fire_when - timer 1 in 3 seconds -TA1 - rtems_task_suspend( RTEMS_SELF ) -TA1 - rtems_clock_get - 09:00:10 12/31/1988 -TA1 - rtems_timer_fire_when - timer 1 in 3 seconds -TA1 - rtems_task_wake_after - 1 second -TA1 - rtems_clock_get - 09:00:11 12/31/1988 -TA1 - rtems_timer_cancel - timer 1 -TA1 - rtems_task_wake_after - YIELD (only task at priority) -TA1 - timer_deleting - timer 1 -*** END OF TEST 22 *** diff --git a/c/src/tests/sptests/sp22/system.h b/c/src/tests/sptests/sp22/system.h deleted file mode 100644 index aa2c6d17e4..0000000000 --- a/c/src/tests/sptests/sp22/system.h +++ /dev/null @@ -1,30 +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 <rtems.h> -#include "tmacros.h" - -/* Miscellaneous */ - -#define EXTERN extern /* external definition */ - -/* macros */ - -/* structures */ - -#include "gvar.h" - -/* end of include file */ diff --git a/c/src/tests/sptests/sp22/task1.c b/c/src/tests/sptests/sp22/task1.c deleted file mode 100644 index 240a1972cc..0000000000 --- a/c/src/tests/sptests/sp22/task1.c +++ /dev/null @@ -1,164 +0,0 @@ -/* Task_1 - * - * This routine serves as a test task. It verifies the basic task - * switching capabilities of the executive. - * - * 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 Task_1( - rtems_task_argument argument -) -{ - rtems_id tmid; - rtems_time_of_day time; - rtems_status_code status; - -/* Get id */ - - puts( "TA1 - rtems_timer_ident - identing timer 1" ); - status = rtems_timer_ident( Timer_name[ 1 ], &tmid ); - directive_failed( status, "rtems_timer_ident" ); - printf( "TA1 - timer 1 has id (0x%x)\n", tmid ); - -/* after which is allowed to fire */ - - Print_time(); - - puts( "TA1 - rtems_timer_fire_after - timer 1 in 3 seconds" ); - status = rtems_timer_fire_after( - tmid, - 3 * TICKS_PER_SECOND, - Delayed_resume, - NULL - ); - directive_failed( status, "rtems_timer_fire_after" ); - - puts( "TA1 - rtems_task_suspend( RTEMS_SELF )" ); - status = rtems_task_suspend( RTEMS_SELF ); - directive_failed( status, "rtems_task_suspend" ); - - Print_time(); - -/* after which is reset and allowed to fire */ - - puts( "TA1 - rtems_timer_fire_after - timer 1 in 3 seconds" ); - status = rtems_timer_fire_after( - tmid, - 3 * TICKS_PER_SECOND, - Delayed_resume, - NULL - ); - directive_failed( status, "rtems_timer_fire_after" ); - - puts( "TA1 - rtems_task_wake_after - 1 second" ); - status = rtems_task_wake_after( 1 * TICKS_PER_SECOND ); - directive_failed( status, "rtems_task_wake_after" ); - - Print_time(); - - puts( "TA1 - rtems_timer_reset - timer 1" ); - status = rtems_timer_reset( tmid ); - directive_failed( status, "rtems_timer_reset" ); - - puts( "TA1 - rtems_task_suspend( RTEMS_SELF )" ); - status = rtems_task_suspend( RTEMS_SELF ); - directive_failed( status, "rtems_task_suspend" ); - - Print_time(); - - pause(); - - /* - * Reset the time since we do not know how long the user waited - * before pressing <cr> at the pause. This insures that the - * actual output matches the screen. - */ - - build_time( &time, 12, 31, 1988, 9, 0, 7, 0 ); - - status = rtems_clock_set( &time ); - directive_failed( status, "rtems_clock_set" ); - -/* after which is canceled */ - - puts( "TA1 - rtems_timer_fire_after - timer 1 in 3 seconds" ); - status = rtems_timer_fire_after( - tmid, - 3 * TICKS_PER_SECOND, - Delayed_resume, - NULL - ); - directive_failed( status, "rtems_timer_fire_after" ); - - puts( "TA1 - rtems_timer_cancel - timer 1" ); - status = rtems_timer_cancel( tmid ); - directive_failed( status, "rtems_timer_cancel" ); - -/* when which is allowed to fire */ - - Print_time(); - - status = rtems_clock_get( RTEMS_CLOCK_GET_TOD, &time ); - directive_failed( status, "rtems_clock_get" ); - - time.second += 3; - - puts( "TA1 - rtems_timer_fire_when - timer 1 in 3 seconds" ); - status = rtems_timer_fire_when( tmid, &time, Delayed_resume, NULL ); - directive_failed( status, "rtems_timer_fire_when" ); - - puts( "TA1 - rtems_task_suspend( RTEMS_SELF )" ); - status = rtems_task_suspend( RTEMS_SELF ); - directive_failed( status, "rtems_task_suspend" ); - - Print_time(); - -/* when which is canceled */ - - status = rtems_clock_get( RTEMS_CLOCK_GET_TOD, &time ); - directive_failed( status, "rtems_clock_get" ); - - time.second += 3; - - puts( "TA1 - rtems_timer_fire_when - timer 1 in 3 seconds" ); - status = rtems_timer_fire_when( tmid, &time, Delayed_resume, NULL ); - directive_failed( status, "rtems_timer_fire_when" ); - - puts( "TA1 - rtems_task_wake_after - 1 second" ); - status = rtems_task_wake_after( 1 * TICKS_PER_SECOND ); - directive_failed( status, "rtems_task_wake_after" ); - - Print_time(); - - puts( "TA1 - rtems_timer_cancel - timer 1" ); - status = rtems_timer_cancel( tmid ); - directive_failed( status, "rtems_timer_cancel" ); - -/* delete */ - puts( "TA1 - rtems_task_wake_after - YIELD (only task at priority)" ); - status = rtems_task_wake_after( RTEMS_YIELD_PROCESSOR ); - directive_failed( status, "rtems_task_wake_after" ); - - puts( "TA1 - timer_deleting - timer 1" ); - status = rtems_timer_delete( tmid ); - directive_failed( status, "rtems_timer_delete" ); - - puts( "*** END OF TEST 22 *** " ); - exit( 0 ); -} diff --git a/c/src/tests/sptests/sp23/init.c b/c/src/tests/sptests/sp23/init.c deleted file mode 100644 index 5acaf67e42..0000000000 --- a/c/src/tests/sptests/sp23/init.c +++ /dev/null @@ -1,72 +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$ - */ - -#include "system.h" -#undef EXTERN -#define EXTERN -#include "conftbl.h" -#include "gvar.h" - -rtems_task Init( - rtems_task_argument argument -) -{ - rtems_status_code status; - - puts( "\n\n*** TEST 23 ***" ); - - Task_name[ 1 ] = rtems_build_name( 'T', 'A', '1', ' ' ); - - status = rtems_task_create( - Task_name[ 1 ], - 1, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 1 ] - ); - directive_failed( status, "rtems_task_create of TA1" ); - - status = rtems_task_start( Task_id[ 1 ], Task_1, 0 ); - directive_failed( status, "rtems_task_start of TA1" ); - - Port_name[ 1 ] = rtems_build_name( 'D', 'P', '1', ' ' ); - - status = rtems_port_create( - Port_name[ 1 ], - Internal_port_area, - External_port_area, - 0xff, - &Port_id[ 1 ] - ); - directive_failed( status, "rtems_port_create of DP1" ); - - printf( "INIT - rtems_port_create - DP1 - int = %p ext = %p\n", - Internal_port_area, - External_port_area - ); - - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of RTEMS_SELF" ); -} diff --git a/c/src/tests/sptests/sp23/sp23.doc b/c/src/tests/sptests/sp23/sp23.doc deleted file mode 100644 index 485a4ec466..0000000000 --- a/c/src/tests/sptests/sp23/sp23.doc +++ /dev/null @@ -1,26 +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: test23 - -directives: - ex_init, ex_start, t_create, t_start, tm_tick, i_return, t_delete, - m_ext2int, m_int2ext - -concepts: - - a. Verifies the dual ported RAM directives work correctly. - -output: diff --git a/c/src/tests/sptests/sp23/sp23.scn b/c/src/tests/sptests/sp23/sp23.scn deleted file mode 100644 index 7529abd4c4..0000000000 --- a/c/src/tests/sptests/sp23/sp23.scn +++ /dev/null @@ -1,9 +0,0 @@ -*** TEST 23 *** -INIT - rtems_port_create - DP1 - int = 0x00001000 ext = 0x00002000 -TA1 - rtems_port_ident - 00010001 -TA1 - rtems_port_external_to_internal - 0x0000200e => 0x0000100e -TA1 - rtems_port_internal_to_external - 0x0000100e => 0x0000200e -TA1 - rtems_port_external_to_internal - 0x0000300e => 0x0000300e -TA1 - rtems_port_internal_to_external - 0x0000050e => 0x0000050e -TA1 - rtems_port_delete - DP1 -*** END OF TEST 23 *** diff --git a/c/src/tests/sptests/sp23/system.h b/c/src/tests/sptests/sp23/system.h deleted file mode 100644 index aa2c6d17e4..0000000000 --- a/c/src/tests/sptests/sp23/system.h +++ /dev/null @@ -1,30 +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 <rtems.h> -#include "tmacros.h" - -/* Miscellaneous */ - -#define EXTERN extern /* external definition */ - -/* macros */ - -/* structures */ - -#include "gvar.h" - -/* end of include file */ diff --git a/c/src/tests/sptests/sp23/task1.c b/c/src/tests/sptests/sp23/task1.c deleted file mode 100644 index 5012616131..0000000000 --- a/c/src/tests/sptests/sp23/task1.c +++ /dev/null @@ -1,96 +0,0 @@ -/* Task_1 - * - * This task verifies that the dual ported RAM directives work - * correctly by converting external addresses to internal addresses and - * internal addresses to external addresses. - * - * 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 Task_1( - rtems_task_argument argument -) -{ - rtems_id dpid; - void *to_be_converted; - void *converted; - rtems_status_code status; - - status = rtems_port_ident( Port_name[ 1 ], &dpid ); - directive_failed( status, "rtems_port_ident" ); - printf( "TA1 - rtems_port_ident - %08x\n", dpid ); - - to_be_converted = &External_port_area[ 0xe ]; - status = rtems_port_external_to_internal( - Port_id[ 1 ], - to_be_converted, - &converted - ); - directive_failed( status, "rtems_port_external_to_internal" ); - printf( - "TA1 - rtems_port_external_to_internal - %p => %p\n", - to_be_converted, - converted - ); - - to_be_converted = &Internal_port_area[ 0xe ]; - status = rtems_port_internal_to_external( - Port_id[ 1 ], - to_be_converted, - &converted - ); - directive_failed( status, "rtems_port_internal_to_external" ); - printf( - "TA1 - rtems_port_internal_to_external - %p => %p\n", - to_be_converted, - converted - ); - - to_be_converted = &Above_port_area[ 0xe ]; - status = rtems_port_external_to_internal( - Port_id[ 1 ], - to_be_converted, - &converted - ); - directive_failed( status, "rtems_port_external_to_internal" ); - printf( - "TA1 - rtems_port_external_to_internal - %p => %p\n", - to_be_converted, - converted - ); - - to_be_converted = &Below_port_area[ 0xe ]; - status = rtems_port_internal_to_external( - Port_id[ 1 ], - to_be_converted, - &converted - ); - directive_failed( status, "rtems_port_internal_to_external" ); - printf( - "TA1 - rtems_port_internal_to_external - %p => %p\n", - to_be_converted, - converted - ); - - status = rtems_port_delete( Port_id[ 1 ] ); - directive_failed( status, "rtems_port_delete" ); - puts( "TA1 - rtems_port_delete - DP1" ); - - puts( "*** END OF TEST 23 ***" ); - exit( 0 ); -} diff --git a/c/src/tests/sptests/sp24/init.c b/c/src/tests/sptests/sp24/init.c deleted file mode 100644 index c73830a6df..0000000000 --- a/c/src/tests/sptests/sp24/init.c +++ /dev/null @@ -1,79 +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$ - */ - -#include "system.h" -#undef EXTERN -#define EXTERN -#include "conftbl.h" -#include "gvar.h" - -rtems_task Init( - rtems_task_argument argument -) -{ - rtems_time_of_day time; - rtems_unsigned32 index; - rtems_status_code status; - - puts( "\n\n*** TEST 24 ***" ); - - build_time( &time, 12, 31, 1988, 9, 0, 0, 0 ); - - status = rtems_clock_set( &time ); - directive_failed( status, "rtems_clock_set" ); - - Task_name[ 1 ] = rtems_build_name( 'T', 'A', '1', ' ' ); - Task_name[ 2 ] = rtems_build_name( 'T', 'A', '2', ' ' ); - Task_name[ 3 ] = rtems_build_name( 'T', 'A', '3', ' ' ); - - Timer_name[ 1 ] = rtems_build_name( 'T', 'M', '1', ' ' ); - Timer_name[ 2 ] = rtems_build_name( 'T', 'M', '2', ' ' ); - Timer_name[ 3 ] = rtems_build_name( 'T', 'M', '3', ' ' ); - - for ( index = 1 ; index <= 3 ; index++ ) { - status = rtems_task_create( - Task_name[ index ], - 1, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ index ] - ); - directive_failed( status, "rtems_task_create loop" ); - - status = rtems_timer_create( - Timer_name[ index ], - &Timer_id[ index ] - ); - directive_failed( status, "rtems_timer_create loop" ); - } - - for ( index = 1 ; index <= 3 ; index++ ) { - status = rtems_task_start( Task_id[ index ], Task_1_through_3, index ); - directive_failed( status, "rtems_task_start loop" ); - } - - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of RTEMS_SELF" ); -} diff --git a/c/src/tests/sptests/sp24/resume.c b/c/src/tests/sptests/sp24/resume.c deleted file mode 100644 index c73696c109..0000000000 --- a/c/src/tests/sptests/sp24/resume.c +++ /dev/null @@ -1,34 +0,0 @@ -/* Resume_task - * - * This subprogram is scheduled as a timer service routine. When - * it fires it resumes the task which is mapped to this timer. - * - * Input parameters: NONE - * - * 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_timer_service_routine Resume_task( - rtems_id timer_id, - void *ignored_address -) -{ - rtems_id task_to_resume; - rtems_status_code status; - - task_to_resume = Task_id[ rtems_get_index( timer_id ) ]; - status = rtems_task_resume( task_to_resume ); - directive_failed( status, "rtems_task_resume" ); -} diff --git a/c/src/tests/sptests/sp24/sp24.doc b/c/src/tests/sptests/sp24/sp24.doc deleted file mode 100644 index 14b743d588..0000000000 --- a/c/src/tests/sptests/sp24/sp24.doc +++ /dev/null @@ -1,51 +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: test24 - -directives: - ex_init, ex_start, t_create, t_start, tm_tick, i_return, t_ident, - ev_receive - -concepts: - - a. This test is a cyclic version of test1. The times printed by - each test should not skew as in test1 (see output section). - - b. Verifies system can create and start both the executive's system - initialization and idle task. - - c. Verifies executive can swap between three application tasks at the - same priority and the executive's internal idle task. - - d. Verifies can print strings to the CRT on port 2 of the mvme136 board - using Print and Println in the board support package. - - e. Verifies interrupt handler can handler a task switch from an interrupt - as specified with the i_return directive. - - f. Verifies executive initialization performed correctly. - - g. Verifies the executive trap handler except for the halt function. - - h. Verifies that a task can get the task identification number of itself. - -output: - "TA1" is printed once every 5 seconds. "TA2" is printed once - every 10 seconds. "TA3" is printed once every 15 seconds. - - The times printed should be multiples of 5 seconds for TA1, 10 seconds - for TA2, and 15 seconds for TA3. If this does not happen, the calendar - time does not correspond correctly to the number of ticks. diff --git a/c/src/tests/sptests/sp24/system.h b/c/src/tests/sptests/sp24/system.h deleted file mode 100644 index aa2c6d17e4..0000000000 --- a/c/src/tests/sptests/sp24/system.h +++ /dev/null @@ -1,30 +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 <rtems.h> -#include "tmacros.h" - -/* Miscellaneous */ - -#define EXTERN extern /* external definition */ - -/* macros */ - -/* structures */ - -#include "gvar.h" - -/* end of include file */ diff --git a/c/src/tests/sptests/sp24/task1.c b/c/src/tests/sptests/sp24/task1.c deleted file mode 100644 index bb3540acee..0000000000 --- a/c/src/tests/sptests/sp24/task1.c +++ /dev/null @@ -1,58 +0,0 @@ -/* Task_1_through_3 - * - * This task is a cyclic version of test1 to asssure that the times - * displayed are not skewed as in test1. "TA1" is printed once every - * 5 seconds, "TA2" is printed once every 10 seconds, and "TA3" is - * printed once every 15 seconds. The times displayed should be - * in multiples of 5, 10, and 15 for TA1, TA2, and TA3 respectively. - * If the times are skewed from these values, then the calendar time - * does not correspond correctly with the number of ticks. - * - * 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 Task_1_through_3( - rtems_task_argument argument -) -{ - rtems_id tid; - rtems_time_of_day time; - rtems_status_code status; - - status = rtems_task_ident( RTEMS_SELF, RTEMS_SEARCH_ALL_NODES, &tid ); - directive_failed( status, "rtems_task_ident of self" ); - - while ( FOREVER ) { - status = rtems_timer_fire_after( - Timer_id[ argument ], - task_number( tid ) * 5 * TICKS_PER_SECOND, - Resume_task, - NULL - ); - directive_failed( status, "tm_fire_after failed" ); - - status = rtems_clock_get( RTEMS_CLOCK_GET_TOD, &time ); - directive_failed( status, "rtems_clock_get failed" ); - - if ( time.second >= 35 ) { - puts( "*** END OF TEST 24 ***" ); - exit( 0 ); - } - - put_name( Task_name[ task_number( tid ) ], FALSE ); - print_time( " - rtems_clock_get - ", &time, "\n" ); - - status = rtems_task_suspend( RTEMS_SELF ); - directive_failed( status, "rtems_task_suspend" ); - } -} diff --git a/c/src/tests/sptests/sp25/init.c b/c/src/tests/sptests/sp25/init.c deleted file mode 100644 index fcd5b3dfd6..0000000000 --- a/c/src/tests/sptests/sp25/init.c +++ /dev/null @@ -1,69 +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$ - */ - -#include "system.h" -#undef EXTERN -#define EXTERN -#include "conftbl.h" -#include "gvar.h" - -rtems_task Init( - rtems_task_argument argument -) -{ - rtems_status_code status; - - puts( "\n\n*** TEST 25 ***" ); - - Task_name[ 1 ] = rtems_build_name( 'T', 'A', '1', ' ' ); - - status = rtems_task_create( - Task_name[ 1 ], - BASE_PRIORITY, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 1 ] - ); - directive_failed( status, "rtems_task_create of TA1" ); - - status = rtems_task_start( Task_id[ 1 ], Task_1, 0 ); - directive_failed( status, "rtems_task_start of TA1" ); - - Region_name[ 1 ] = rtems_build_name('R', 'N', '0', '1'); - - - status = rtems_region_create( - Region_name[ 1 ], - Area_1, - sizeof( Area_1 ), - 64, - RTEMS_DEFAULT_ATTRIBUTES, - &Region_id[ 1 ] - ); - directive_failed( status, "rtems_region_create of RN1" ); - - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of RTEMS_SELF" ); -} diff --git a/c/src/tests/sptests/sp25/sp25.doc b/c/src/tests/sptests/sp25/sp25.doc deleted file mode 100644 index 98684f53b3..0000000000 --- a/c/src/tests/sptests/sp25/sp25.doc +++ /dev/null @@ -1,32 +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: test25 - -directives: - task_create - task_start - task_delete - region_create - region_ident - region_get_segment - region_return_segment - region_delete - -concepts: - - a. Verifies that the heap maintains it's integrity trhough a series - on region_get_segments and region_return_segments. - diff --git a/c/src/tests/sptests/sp25/sp25.scn b/c/src/tests/sptests/sp25/sp25.scn deleted file mode 100644 index 1944f18f4b..0000000000 --- a/c/src/tests/sptests/sp25/sp25.scn +++ /dev/null @@ -1,29 +0,0 @@ -*** TEST 25 *** -TA1 - rtems_region_ident - 00010002 -TA1 - rtems_region_get_segment - wait on 64 byte segment from region 1 -TA1 - got segment from region 1 - 0x0000f9b8 -TA1 - rtems_region_get_segment - wait on 128 byte segment from region 1 -TA1 - got segment from region 1 - 0x0000f930 -TA1 - rtems_region_get_segment - wait on 256 byte segment from region 1 -TA1 - got segment from region 1 - 0x0000f828 -TA1 - rtems_region_get_segment - wait on 512 byte segment from region 1 -TA1 - got segment from region 1 - 0x0000f620 -TA1 - rtems_region_get_segment - wait on 1024 byte segment from region 1 -TA1 - got segment from region 1 - 0x0000f218 -TA1 - rtems_region_get_segment - wait on 2048 byte segment from region 1 -TA1 - got segment from region 1 - 0x0000ea10 -TA1 - rtems_region_get_segment - wait on 4096 byte segment from region 1 -TA1 - got segment from region 1 - 0x0000da08 -TA1 - rtems_region_get_segment - wait on 8192 byte segment from region 1 -TA1 - got segment from region 1 - 0x0000ba00 -<pause> -TA1 - rtems_region_return_segment - return segment to region 1 - 0x0000f828 -TA1 - rtems_region_return_segment - return segment to region 1 - 0x0000f620 -TA1 - rtems_region_return_segment - return segment to region 1 - 0x0000f9b8 -TA1 - rtems_region_return_segment - return segment to region 1 - 0x0000f930 -TA1 - rtems_region_return_segment - return segment to region 1 - 0x0000da08 -TA1 - rtems_region_return_segment - return segment to region 1 - 0x0000ea10 -TA1 - rtems_region_return_segment - return segment to region 1 - 0x0000ba00 -TA1 - rtems_region_return_segment - return segment to region 1 - 0x0000f218 -TA1 - rtems_region_delete - walks heap if debug enabled -*** END OF TEST 25 *** diff --git a/c/src/tests/sptests/sp25/system.h b/c/src/tests/sptests/sp25/system.h deleted file mode 100644 index 9e2b748a85..0000000000 --- a/c/src/tests/sptests/sp25/system.h +++ /dev/null @@ -1,32 +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 <rtems.h> -#include "tmacros.h" - -/* Miscellaneous */ - -#define EXTERN extern /* external definition */ - -#define BASE_PRIORITY 140 /* all tasks priority */ - -/* macros */ - -/* structures */ - -#include "gvar.h" - -/* end of include file */ diff --git a/c/src/tests/sptests/sp25/task1.c b/c/src/tests/sptests/sp25/task1.c deleted file mode 100644 index 6222c4e734..0000000000 --- a/c/src/tests/sptests/sp25/task1.c +++ /dev/null @@ -1,241 +0,0 @@ -/* Task_1 - * - * This routine serves as a test task. It tests the region manager. - * - * 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 Task_1( - rtems_task_argument argument -) -{ - void *address_1; - void *address_2; - void *address_3; - void *address_4; - void *address_5; - void *address_6; - void *address_7; - void *address_8; - rtems_status_code status; - rtems_id region_id; - - status = rtems_region_ident(Region_name[ 1 ], ®ion_id); - printf( "TA1 - rtems_region_ident - %08x\n", region_id ); - directive_failed(status, "rtems_region_ident of RN01"); - - puts( - "TA1 - rtems_region_get_segment - wait on 64 byte segment from region 1" - ); - rtems_region_get_segment( - Region_id[ 1 ], - 64, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT, - &address_1 - ); - directive_failed( status, "rtems_region_get_segment" ); - puts_nocr( "TA1 - got segment from region 1 - " ); - Put_address_from_area_1( address_1 ); - new_line; - - puts( - "TA1 - rtems_region_get_segment - wait on 128 byte segment from region 1" - ); - rtems_region_get_segment( - Region_id[ 1 ], - 128, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT, - &address_2 - ); - directive_failed( status, "rtems_region_get_segment" ); - puts_nocr( "TA1 - got segment from region 1 - " ); - Put_address_from_area_1( address_2 ); - new_line; - - puts( - "TA1 - rtems_region_get_segment - wait on 256 byte segment from region 1" - ); - rtems_region_get_segment( - Region_id[ 1 ], - 256, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT, - &address_3 - ); - directive_failed( status, "rtems_region_get_segment" ); - puts_nocr( "TA1 - got segment from region 1 - " ); - Put_address_from_area_1( address_3 ); - new_line; - - puts( - "TA1 - rtems_region_get_segment - wait on 512 byte segment from region 1" - ); - rtems_region_get_segment( - Region_id[ 1 ], - 512, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT, - &address_4 - ); - directive_failed( status, "rtems_region_get_segment" ); - puts_nocr( "TA1 - got segment from region 1 - " ); - Put_address_from_area_1( address_4 ); - new_line; - - puts( - "TA1 - rtems_region_get_segment - wait on 1024 byte segment from region 1" - ); - rtems_region_get_segment( - Region_id[ 1 ], - 1024, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT, - &address_5 - ); - directive_failed( status, "rtems_region_get_segment" ); - puts_nocr( "TA1 - got segment from region 1 - " ); - Put_address_from_area_1( address_5 ); - new_line; - - puts( - "TA1 - rtems_region_get_segment - wait on 2048 byte segment from region 1" - ); - rtems_region_get_segment( - Region_id[ 1 ], - 2048, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT, - &address_6 - ); - directive_failed( status, "rtems_region_get_segment" ); - puts_nocr( "TA1 - got segment from region 1 - " ); - Put_address_from_area_1( address_6 ); - new_line; - - puts( - "TA1 - rtems_region_get_segment - wait on 4096 byte segment from region 1" - ); - rtems_region_get_segment( - Region_id[ 1 ], - 4096, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT, - &address_7 - ); - directive_failed( status, "rtems_region_get_segment" ); - puts_nocr( "TA1 - got segment from region 1 - " ); - Put_address_from_area_1( address_7 ); - new_line; - - puts( - "TA1 - rtems_region_get_segment - wait on 8192 byte segment from region 1" - ); - rtems_region_get_segment( - Region_id[ 1 ], - 8192, - RTEMS_DEFAULT_OPTIONS, - RTEMS_NO_TIMEOUT, - &address_8 - ); - directive_failed( status, "rtems_region_get_segment" ); - puts_nocr( "TA1 - got segment from region 1 - " ); - Put_address_from_area_1( address_8 ); - new_line; - -pause(); - - puts_nocr( - "TA1 - rtems_region_return_segment - return segment to region 1 - " - ); - Put_address_from_area_1( address_3 ); - status = rtems_region_return_segment( Region_id[ 1 ], address_3 ); - directive_failed( status, "rtems_region_return_segment" ); - new_line; - address_3 = 0; - - puts_nocr( - "TA1 - rtems_region_return_segment - return segment to region 1 - " - ); - Put_address_from_area_1( address_4 ); - status = rtems_region_return_segment( Region_id[ 1 ], address_4 ); - directive_failed( status, "rtems_region_return_segment" ); - new_line; - address_4 = 0; - - puts_nocr( - "TA1 - rtems_region_return_segment - return segment to region 1 - " - ); - Put_address_from_area_1( address_1 ); - status = rtems_region_return_segment( Region_id[ 1 ], address_1 ); - directive_failed( status, "rtems_region_return_segment" ); - new_line; - address_1 = 0; - - puts_nocr( - "TA1 - rtems_region_return_segment - return segment to region 1 - " - ); - Put_address_from_area_1( address_2 ); - status = rtems_region_return_segment( Region_id[ 1 ], address_2 ); - directive_failed( status, "rtems_region_return_segment" ); - new_line; - address_2 = 0; - - puts_nocr( - "TA1 - rtems_region_return_segment - return segment to region 1 - " - ); - Put_address_from_area_1( address_7 ); - status = rtems_region_return_segment( Region_id[ 1 ], address_7 ); - directive_failed( status, "rtems_region_return_segment" ); - new_line; - address_7 = 0; - - puts_nocr( - "TA1 - rtems_region_return_segment - return segment to region 1 - " - ); - Put_address_from_area_1( address_6 ); - status = rtems_region_return_segment( Region_id[ 1 ], address_6 ); - directive_failed( status, "rtems_region_return_segment" ); - new_line; - address_6 = 0; - - puts_nocr( - "TA1 - rtems_region_return_segment - return segment to region 1 - " - ); - Put_address_from_area_1( address_8 ); - status = rtems_region_return_segment( Region_id[ 1 ], address_8 ); - directive_failed( status, "rtems_region_return_segment" ); - new_line; - address_8 = 0; - - puts_nocr( - "TA1 - rtems_region_return_segment - return segment to region 1 - " - ); - Put_address_from_area_1( address_5 ); - status = rtems_region_return_segment( Region_id[ 1 ], address_5 ); - directive_failed( status, "rtems_region_return_segment" ); - new_line; - address_5 = 0; - - puts( "TA1 - rtems_region_delete - walks heap if debug enabled" ); - rtems_region_delete(Region_id[ 1 ]); - - puts( "*** END OF TEST 25 ***" ); - exit( 0 ); -} diff --git a/c/src/tests/sptests/spfatal/fatal.c b/c/src/tests/sptests/spfatal/fatal.c deleted file mode 100644 index 3b2228bffd..0000000000 --- a/c/src/tests/sptests/spfatal/fatal.c +++ /dev/null @@ -1,134 +0,0 @@ -/* Fatal Error Test - * - * NOTE: - * - * This test actually modifies the Configuration table and restarts - * the executive. It is very carefully constructed to do this and - * uses the Configuration very carefully. - * - * 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" - -#include <setjmp.h> - -char Workspace[ 64 * 1024 ] CPU_STRUCTURE_ALIGNMENT; - -typedef enum { - FATAL_WORKSPACE_OF_ZERO, - FATAL_NULL_WORKSPACE, - FATAL_WORKSPACE_TOO_SMALL, - FATAL_TASK_CREATE, - FATAL_TASK_START -} Fatal_errors_t; - -#define FATAL_LAST FATAL_TASK_START - -volatile Fatal_errors_t Case_in_switch; - -rtems_status_code Expected_Errors[] = { - RTEMS_UNSATISFIED, - RTEMS_INVALID_ADDRESS, - RTEMS_UNSATISFIED, - RTEMS_INVALID_PRIORITY, - RTEMS_TASK_EXITTED -}; - -rtems_status_code Error_Happened[ FATAL_LAST + 1]; - -jmp_buf Restart_Context; - -/* - * We depend on this being zeroed during initialization. This - * occurs automatically because this is part of the BSS. - */ - -rtems_unsigned32 First_Time_Through; - -void Process_case(); - -rtems_extension Fatal_extension( - rtems_unsigned32 error -) -{ - int index; - - Error_Happened[ Case_in_switch ] = error; - - if ( First_Time_Through == 0 ) { - Case_in_switch = FATAL_WORKSPACE_OF_ZERO; - First_Time_Through = 1; - setjmp( Restart_Context ); - } else if ( Case_in_switch == FATAL_LAST ) { - - /* - * Depending on the C library we use, we cannot get the - * task exitted error so do not check for it. - */ - - puts( "*** TEST FATAL ***" ); - for ( index=0 ; index< FATAL_LAST ; index++ ) - put_error( Error_Happened[ index ], Expected_Errors[ index ] ); - puts( "NOT TESTING FATAL ERROR WHEN TASK EXITS -- C LIBRARY CATCHES THIS" ); - puts( "*** END OF TEST FATAL ***" ); - - /* - * returns to the default fatal error handler instead of - * calling rtems_shutdown_executive - */ - return; - - } else { - - longjmp( Restart_Context, 1 ); - } - - Process_case(); -} - - - -void Process_case() -{ - switch ( Case_in_switch ) { - case FATAL_WORKSPACE_OF_ZERO: - New_Configuration = BSP_Configuration; - New_Configuration.work_space_start = NULL; - Case_in_switch = FATAL_NULL_WORKSPACE; - break; - - case FATAL_NULL_WORKSPACE: - New_Configuration.work_space_start = Workspace; - New_Configuration.work_space_size = 256; - Case_in_switch = FATAL_WORKSPACE_TOO_SMALL; - break; - - case FATAL_WORKSPACE_TOO_SMALL: - Initialization_tasks[ 0 ].initial_priority = RTEMS_CURRENT_PRIORITY; - New_Configuration.work_space_size = sizeof( Workspace ); - Case_in_switch = FATAL_TASK_CREATE; - break; - - case FATAL_TASK_CREATE: - Initialization_tasks[ 0 ].initial_priority = 1; - Initialization_tasks[ 0 ].entry_point = NULL; - Case_in_switch = FATAL_TASK_START; - break; - - case FATAL_TASK_START: - /* this extension exits the test */ - Initialization_tasks[ 0 ].entry_point = Init; - break; - } - rtems_initialize_executive( &New_Configuration, &Cpu_table ); -} - diff --git a/c/src/tests/sptests/spfatal/init.c b/c/src/tests/sptests/spfatal/init.c deleted file mode 100644 index a50c6101f5..0000000000 --- a/c/src/tests/sptests/spfatal/init.c +++ /dev/null @@ -1,54 +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$ - */ - -#include "system.h" -#undef EXTERN -#define EXTERN -#include "conftbl.h" -#include "gvar.h" - -rtems_task Init( - rtems_task_argument argument -) -{ - rtems_status_code status; - - Task_name[ 1 ] = rtems_build_name( 'T', 'A', '1', ' ' ); - - status = rtems_task_create( - Task_name[ 1 ], - 1, - 2048, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &Task_id[ 1 ] - ); - directive_failed( status, "rtems_task_create of TA1" ); - - status = rtems_task_start( Task_id[ 1 ], Task_1, 0 ); - directive_failed( status, "rtems_task_start of TA1" ); - - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of RTEMS_SELF" ); -} diff --git a/c/src/tests/sptests/spfatal/puterr.c b/c/src/tests/sptests/spfatal/puterr.c deleted file mode 100644 index f7d79e5f34..0000000000 --- a/c/src/tests/sptests/spfatal/puterr.c +++ /dev/null @@ -1,68 +0,0 @@ -/* put_error - * - * This routine verifies that the given error is the expected error. - * - * Input parameters: - * error - actual error code - * expected - expected error code - * - * 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" - -char *Errors[] = { - "RTEMS_SUCCESSFUL", /* successful completion */ - "RTEMS_TASK_EXITTED", /* returned from a task */ - "RTEMS_MP_NOT_CONFIGURED", /* multiprocessing not configured */ - "RTEMS_INVALID_NAME", /* invalid object name */ - "RTEMS_INVALID_ID", /* invalid object id */ - "RTEMS_TOO_MANY", /* too many */ - "RTEMS_TIMEOUT", /* timed out waiting */ - "RTEMS_OBJECT_WAS_DELETED", /* object was deleted while waiting */ - "RTEMS_INVALID_SIZE", /* specified size was invalid */ - "RTEMS_INVALID_ADDRESS", /* address specified is invalid */ - "RTEMS_INVALID_NUMBER", /* number was invalid */ - "RTEMS_NOT_DEFINED", /* item has not been initialized */ - "RTEMS_RESOURCE_IN_USE", /* resources still outstanding */ - "RTEMS_UNSATISFIED", /* request not satisfied */ - "RTEMS_INCORRECT_STATE", /* task is in wrong state */ - "RTEMS_ALREADY_SUSPENDED", /* task already in state */ - "RTEMS_ILLEGAL_ON_SELF", /* illegal operation on calling task */ - "RTEMS_ILLEGAL_ON_REMOTE_OBJECT", /* illegal operation for remote object */ - "RTEMS_CALLED_FROM_ISR", /* called from ISR */ - "RTEMS_INVALID_PRIORITY", /* invalid task priority */ - "RTEMS_INVALID_CLOCK", /* invalid date/time */ - "RTEMS_INVALID_NODE", /* invalid node id */ - "RTEMS_NOT_OWNER_OF_RESOURCE", /* not owner of resource */ - "RTEMS_NOT_CONFIGURED", /* directive not configured */ - "RTEMS_NOT_IMPLEMENTED" /* directive not implemented */ -}; - -/* Task states */ - -void put_error( - rtems_unsigned32 error, - rtems_status_code expected -) -{ - - if ( error <= RTEMS_NOT_IMPLEMENTED ) - printf( "EXPECTED FATAL - error code is correctly %s\n", Errors[ error ] ); - else - printf( "ERROR - out of range error code is %d\n", error ); - - if ( error != expected ) { - printf( "ERROR - did not get expected code of %d\n", expected ); - } -} diff --git a/c/src/tests/sptests/spfatal/spfatal.doc b/c/src/tests/sptests/spfatal/spfatal.doc deleted file mode 100644 index 501f278670..0000000000 --- a/c/src/tests/sptests/spfatal/spfatal.doc +++ /dev/null @@ -1,28 +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: testfatal - -directives: none - -concepts: - - a. Verifies that the proper error is reported by k_fatal when a task - exits. - - b. Verifies that the task exitted extension works correctly. - - c. Verifies that the fatal error extension works corectly. - diff --git a/c/src/tests/sptests/spfatal/spfatal.scn b/c/src/tests/sptests/spfatal/spfatal.scn deleted file mode 100644 index ecb9f63597..0000000000 --- a/c/src/tests/sptests/spfatal/spfatal.scn +++ /dev/null @@ -1,8 +0,0 @@ -*** TEST FATAL *** -EXPECTED FATAL - error code is correctly RTEMS_UNSATISFIED -EXPECTED FATAL - error code is correctly RTEMS_INVALID_ADDRESS -EXPECTED FATAL - error code is correctly RTEMS_UNSATISFIED -EXPECTED FATAL - error code is correctly RTEMS_INVALID_PRIORITY -EXPECTED FATAL - error code is correctly RTEMS_TASK_EXITTED -NOT TESTING FATAL ERROR WHEN TASK EXITS -- C LIBRARY CATCHES THIS -*** END OF TEST FATAL *** diff --git a/c/src/tests/sptests/spfatal/system.h b/c/src/tests/sptests/spfatal/system.h deleted file mode 100644 index aa2c6d17e4..0000000000 --- a/c/src/tests/sptests/spfatal/system.h +++ /dev/null @@ -1,30 +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 <rtems.h> -#include "tmacros.h" - -/* Miscellaneous */ - -#define EXTERN extern /* external definition */ - -/* macros */ - -/* structures */ - -#include "gvar.h" - -/* end of include file */ diff --git a/c/src/tests/sptests/spfatal/task1.c b/c/src/tests/sptests/spfatal/task1.c deleted file mode 100644 index d06d25e690..0000000000 --- a/c/src/tests/sptests/spfatal/task1.c +++ /dev/null @@ -1,29 +0,0 @@ -/* Task_1 - * - * This routine serves as a test task. It verifies the task manager. - * - * 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 Task_1( - rtems_task_argument argument -) -{ - puts( "\n\n*** TEST FATAL ***" ); - puts( "TA1 - exitting task" ); -} diff --git a/c/src/tests/sptests/spsize/getint.c b/c/src/tests/sptests/spsize/getint.c deleted file mode 100644 index 43d1f695c9..0000000000 --- a/c/src/tests/sptests/spsize/getint.c +++ /dev/null @@ -1,32 +0,0 @@ -/* getint - * - * This routine reads and returns an integer. - * It assumes decimal. - * - * Input parameters: NONE - * - * Output parameters: - * returns - number read - * - * 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 <rtems.h> -#include <stdio.h> -#include <stdlib.h> - -int getint( void ) -{ - char buff[16]; - - gets(buff); - return atoi(buff); -} diff --git a/c/src/tests/sptests/spsize/init.c b/c/src/tests/sptests/spsize/init.c deleted file mode 100644 index e15e7b40fb..0000000000 --- a/c/src/tests/sptests/spsize/init.c +++ /dev/null @@ -1,58 +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$ - */ - -#include "apps.h" -#undef EXTERN -#define EXTERN -#include "conftbl.h" -#include "gvar.h" - -rtems_task Test_task(); -void size_rtems( int mode ); - -rtems_task Init( - rtems_task_argument argument -) -{ - int choice; - - setvbuf(stdout, 0, _IONBF, 0); - - do { - puts( "\n*** RTEMS SIZE PROGRAM ***" ); - printf( "\n\nPlease select program mode:\n" ); - printf( " 1) Print Formulas\n" ); - printf( " 2) Determine Workspace Size\n" ); - printf( " 3) Exit\n" ); - printf( "Enter number of choice (1,2,3) : " ); - - choice = getint(); - switch( choice ) { - case 1: size_rtems( 1 ); break; - case 2: size_rtems( 0 ); break; - case 3: exit( 0 ); - default: continue; - } - } while ( FOREVER ); -} diff --git a/c/src/tests/sptests/spsize/size.c b/c/src/tests/sptests/spsize/size.c deleted file mode 100644 index 52404272fd..0000000000 --- a/c/src/tests/sptests/spsize/size.c +++ /dev/null @@ -1,601 +0,0 @@ -/* main - * - * This program is run to determine the data space and work space - * requirements of the current version of RTEMS. - * - * 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 <stdlib.h> - -#include <rtems/system.h> -#include <rtems/config.h> -#include <rtems/copyrt.h> -#include <rtems/clock.h> -#include <rtems/tasks.h> -#include <rtems/dpmem.h> -#include <rtems/event.h> -#include <rtems/extension.h> -#include <rtems/fatal.h> -#include <rtems/init.h> -#include <rtems/intthrd.h> -#include <rtems/isr.h> -#include <rtems/intr.h> -#include <rtems/io.h> -#include <rtems/message.h> -#include <rtems/mp.h> -#include <rtems/mpci.h> -#include <rtems/part.h> -#include <rtems/priority.h> -#include <rtems/ratemon.h> -#include <rtems/region.h> -#include <rtems/sem.h> -#include <rtems/signal.h> -#include <rtems/sysstate.h> -#include <rtems/thread.h> -#include <rtems/timer.h> -#include <rtems/tod.h> -#include <rtems/userext.h> -#include <rtems/wkspace.h> -#include <rtems/mp.h> - -/* These are always defined by the executive. - * - * #include <rtems/copyrt.h> - * #include <rtems/tables.h> - * #include <rtems/sptables.h> - */ -#define HEAP_OVHD 16 /* wasted heap space per task stack */ -#define NAME_PTR_SIZE 8 /* size of name and pointer table entries */ -#define READYCHAINS_SIZE \ - ((RTEMS_MAXIMUM_PRIORITY + 1) * sizeof(Chain_Control )) - -#define PER_TASK \ - (sizeof (Thread_Control) + NAME_PTR_SIZE + HEAP_OVHD) -#define PER_SEMAPHORE \ - (sizeof (Semaphore_Control) + NAME_PTR_SIZE) -#define PER_TIMER \ - (sizeof (Timer_Control) + NAME_PTR_SIZE) -#define PER_MSGQ \ - (sizeof (Message_queue_Control) + NAME_PTR_SIZE) -#define PER_MSG \ - (sizeof (Message_queue_Buffer_control)) -#define PER_REGN \ - (sizeof (Region_Control) + NAME_PTR_SIZE) -#define PER_PART \ - (sizeof (Partition_Control) + NAME_PTR_SIZE) -#define PER_PERIOD \ - (sizeof (Rate_monotonic_Control) + NAME_PTR_SIZE) -#define PER_PORT \ - (sizeof (Dual_ported_memory_Control) + NAME_PTR_SIZE) -#define PER_EXTENSION \ - (sizeof (Extension_Control) + NAME_PTR_SIZE) - -#define PER_DRV (0) -#define PER_FPTASK (CONTEXT_FP_SIZE) -#define PER_GOBTBL (sizeof (Chain_Control)*4) -#define PER_NODE PER_GOBTBL -#define PER_GOBJECT (sizeof (Objects_MP_Control)) -#define PER_PROXY (sizeof (Thread_Proxy_control)) - -#if (CPU_ALL_TASKS_ARE_FP == TRUE) -#define SYSTEM_INITIALIZATION_FP (sizeof( Context_Control_fp )) -#else -#define SYSTEM_INITIALIZATION_FP 0 -#endif - -#if (CPU_IDLE_TASK_IS_FP == TRUE) -#define SYSTEM_IDLE_FP (sizeof( Context_Control_fp )) -#else -#define SYSTEM_IDLE_FP 0 -#endif - -#define SYSTEM_TASKS \ - (INTERNAL_THREADS_IDLE_THREAD_STACK_SIZE + \ - INTERNAL_THREADS_SYSTEM_INITIALIZATION_THREAD_STACK_SIZE + \ - (2*sizeof(Thread_Control))) + \ - SYSTEM_INITIALIZATION_FP + \ - SYSTEM_IDLE_FP - -#define rtems_unsigned32 unsigned32 - -rtems_unsigned32 sys_req; - -/* to avoid warnings */ -int puts(); -int printf(); -int getint(); -#undef getchar -int getchar(); -void help_size(); -void print_formula(); - -void size_rtems( - int mode -) -{ -int uninitialized = 0; -int initialized = 0; - -/* - * The following data is allocated for each Manager: - * - * + Per Manager Object Information - * - local pointer table - * - local name table - * - the object's control blocks - * - global name chains - * - * The following is the data allocate from the RTEMS Workspace Area. - * The order indicates the order in which RTEMS allocates it. - * - * + Object MP - * - Global Object CB's - * + Thread - * - Ready Chain - * + Thread MP - * - Proxies Chain - * + Interrupt Manager - * - Interrupt Stack - * + Timer Manager - * - per Manager Object Data - * + Extension Manager - * - per Manager Object Data - * + Message Queue Manager - * - per Manager Object Data - * - Message Buffers - * + Semaphore Manager - * - per Manager Object Data - * + Partition Manager - * - per Manager Object Data - * + Region Manager - * - per Manager Object Data - * + Dual Ported Memory Manager - * - per Manager Object Data - * + Rate Monotonic Manager - * - per Manager Object Data - * + Internal Threads Handler - * - SYSI Thread TCB - * - IDLE Thread TCB - * - SYSI Thread stack - * - SYSI Thread FP area (if CPU requires this) - * - IDLE Thread stack - * - IDLE Thread FP area (if CPU requires this) - * - * This does not take into account any CPU dependent alignment requirements. - * - * The following calculates the overhead needed by RTEMS from the - * Workspace Area. - */ -sys_req = SYSTEM_TASKS + /* SYSI and IDLE */ - NAME_PTR_SIZE + /* Task Overhead */ - READYCHAINS_SIZE + /* Ready Chains */ - NAME_PTR_SIZE + /* Timer Overhead */ - NAME_PTR_SIZE + /* Semaphore Overhead */ - NAME_PTR_SIZE + /* Message Queue Overhead */ - NAME_PTR_SIZE + /* Region Overhead */ - NAME_PTR_SIZE + /* Partition Overhead */ - NAME_PTR_SIZE + /* Dual-Ported Memory Overhead */ - NAME_PTR_SIZE + /* Rate Monotonic Overhead */ - NAME_PTR_SIZE + /* Extension Overhead */ - PER_NODE; /* Extra Gobject Table */ - -uninitialized = -/*address.h*/ 0 + - -/*asr.h*/ 0 + - -/*attr.h*/ 0 + - -/*bitfield.h*/ 0 + - -/*chain.h*/ 0 + - -/*clock.h*/ 0 + - -/*config.h*/ (sizeof _Configuration_Table) + - (sizeof _Configuration_MP_table) + - (sizeof _Configuration_MPCI_table) + - -/*context.h*/ (sizeof _Context_Switch_necessary) + - -/*copyrt.h*/ 0 + - -/*dpmem.h*/ (sizeof _Dual_ported_memory_Information) + - -/*event.h*/ (sizeof _Event_Sync) + - -/*eventmp.h*/ 0 + - -/*eventset.h*/ 0 + - -/*extension.h*/ (sizeof _Extension_Information) + - -/*fatal.h*/ 0 + - -/*heap.h*/ 0 + - -/*init.h*/ 0 + - -/*inthrdmp.h*/ 0 + - -/*intr.h*/ 0 + - -/*intthrd.h*/ (sizeof _Internal_threads_System_initialization_thread) + - (sizeof _Internal_threads_Idle_thread) + - (sizeof _Internal_threads_MP_Receive_server_entry) + - -/*io.h*/ (sizeof _IO_Number_of_drivers) + - (sizeof _IO_Driver_address_table) + - -/*isr.h*/ (sizeof _ISR_Nest_level) + - (sizeof _ISR_Vector_table) + - (sizeof _ISR_Signals_to_thread_executing) + - -/*message.h*/ (sizeof _Message_queue_Inactive_messages) + - (sizeof _Message_queue_Information) + - -/*modes.h*/ 0 + - -/*mp.h*/ 0 + - -/*mpci.h*/ (sizeof _MPCI_Remote_blocked_threads) + - -/*mppkt.h*/ 0 + - -/*mptables.h*/ 0 + - -/*msgmp.h*/ 0 + - -/*object.h*/ (sizeof _Objects_Local_node) + - -/*objectmp.h*/ (sizeof _Objects_MP_Inactive_global_objects) + - -/*options.h*/ 0 + - -/*part.h*/ (sizeof _Partition_Information) + - -/*partmp.h*/ 0 + - -/*priority.h*/ (sizeof _Priority_Major_bit_map) + - (sizeof _Priority_Bit_map) + - -/*ratemon.h*/ (sizeof _Rate_monotonic_Information) + - -/*region.h*/ (sizeof _Region_Information) + - -/*regionmp.h*/ 0 + - -/*rtems.h*/ /* Not applicable */ - -/*sem.h*/ (sizeof _Semaphore_Information) + - -/*semmp.h*/ 0 + - -/*signal.h*/ 0 + - -/*signalmp.h*/ 0 + - -/*stack.h*/ 0 + - -/*states.h*/ 0 + - -/*status.h*/ 0 + - -/*system.h*/ (sizeof _CPU_Table) + - -/*sysstate.h*/ (sizeof _System_state_Current) + - -/*taskmp.h*/ 0 + - -/*tasks.h*/ 0 + - -/*thread.h*/ (sizeof _Thread_Dispatch_disable_level) + - (sizeof _Thread_Ticks_remaining_in_timeslice) + - (sizeof _Thread_Ticks_per_timeslice) + - (sizeof _Thread_Ready_chain) + - (sizeof _Thread_Executing) + - (sizeof _Thread_Heir) + - (sizeof _Thread_Allocated_fp) + - (sizeof _Thread_Information) + - (sizeof _Thread_BSP_context) + - -/*threadmp.h*/ (sizeof _Thread_MP_Receive) + - (sizeof _Thread_MP_Active_proxies) + - (sizeof _Thread_MP_Inactive_proxies) + - -/*threadq.h*/ 0 + - -/*timer.h*/ (sizeof _Timer_Information) + - -/*tod.h*/ (sizeof _TOD_Current) + - (sizeof _TOD_Seconds_since_epoch) + - (sizeof _TOD_Ticks_since_boot) + - (sizeof _TOD_Microseconds_per_tick) + - (sizeof _TOD_Ticks_per_second) + - (sizeof _TOD_Seconds_watchdog) + - -/*tqdata.h*/ 0 + - -/*types.h*/ 0 + - -/*userext.h*/ (sizeof _User_extensions_Initial) + - (sizeof _User_extensions_List) + - -/*watchdog.h*/ (sizeof _Watchdog_Ticks_chain) + - (sizeof _Watchdog_Seconds_chain) + - (sizeof _Watchdog_Sync) + - -/*wkspace.h*/ (sizeof _Workspace_Area); - -uninitialized = 0; - -#ifdef i386 - -/* cpu.h */ -uninitialized += (sizeof _CPU_Null_fp_context) + - (sizeof _CPU_Interrupt_stack_low) + - (sizeof _CPU_Interrupt_stack_high); - -#endif - -#ifdef i960 - -/* cpu.h */ -uninitialized += (sizeof _CPU_Interrupt_stack_low) + - (sizeof _CPU_Interrupt_stack_high); - -#endif - -#ifdef hppa1_1 - -/* cpu.h */ -uninitialized += (sizeof _CPU_Null_fp_context) + - (sizeof _CPU_Default_gr27) + - (sizeof _CPU_Interrupt_stack_low) + - (sizeof _CPU_Interrupt_stack_high); -#endif - -#ifdef m68k - -/* cpu.h */ -uninitialized += (sizeof _CPU_Interrupt_stack_low) + - (sizeof _CPU_Interrupt_stack_high); - -#endif - -#ifdef no_cpu - -/* cpu.h */ -uninitialized += (sizeof _CPU_Null_fp_context) + - (sizeof _CPU_Interrupt_stack_low) + - (sizeof _CPU_Interrupt_stack_high) + - (sizeof _CPU_Thread_dispatch_pointer); - -#endif - -initialized += -/*copyrt.h*/ (strlen(_Copyright_Notice)+1) + - -/*sptables.h*/ (sizeof _Configuration_Default_multiprocessing_table) + - (strlen(_RTEMS_version)+1) + - (sizeof _Entry_points) + - - -/*tod.h*/ (sizeof _TOD_Days_per_month) + - (sizeof _TOD_Days_to_date) + - (sizeof _TOD_Days_since_last_leap_year); - -puts( "" ); -#ifdef i960CA - print_formula(); -#else - if ( mode == 0 ) help_size(); - else print_formula(); -#endif - -printf( "\n" ); -printf( "RTEMS uninitialized data consumes %d bytes\n", uninitialized ); -printf( "RTEMS intialized data consumes %d bytes\n", initialized ); - -} - -void help_size() -{ -int c = '\0'; -int break_loop; -int total_size; -int task_stacks; -int interrupt_stack; -int maximum_tasks, size_tasks; -int maximum_sems, size_sems; -int maximum_timers, size_timers; -int maximum_msgqs, size_msgqs; -int maximum_msgs, size_msgs; -int maximum_regns, size_regns; -int maximum_parts, size_parts; -int maximum_ports, size_ports; -int maximum_periods, size_periods; -int maximum_extensions, size_extensions; -int maximum_drvs, size_drvs; -int maximum_fps, size_fps; -int maximum_nodes, size_nodes; -int maximum_gobjs, size_gobjs; -int maximum_proxies, size_proxies; - -total_size = sys_req; /* Fixed Overhead */ -printf( "What is maximum_tasks? " ); -maximum_tasks = getint(); -size_tasks = PER_TASK * maximum_tasks; -total_size += size_tasks; - -printf( "What is maximum_semaphores? " ); -maximum_sems = getint(); -size_sems = PER_SEMAPHORE * maximum_sems; -total_size += size_sems; - -printf( "What is maximum_timers? " ); -maximum_timers = getint(); -size_timers = PER_TIMER * maximum_timers; -total_size += size_timers; - -printf( "What is maximum_message_queues? " ); -maximum_msgqs = getint(); -size_msgqs = PER_MSGQ * maximum_msgqs; -total_size += size_msgqs; - -printf( "What is maximum_messages? " ); -maximum_msgs = getint(); -size_msgs = PER_MSG * maximum_msgs; -total_size += size_msgs; - -printf( "What is maximum_regions? " ); -maximum_regns = getint(); -size_regns = PER_REGN * maximum_regns; -total_size += size_regns; - -printf( "What is maximum_partitions? " ); -maximum_parts = getint(); -size_parts = PER_PART * maximum_parts; -total_size += size_parts; - -printf( "What is maximum_ports? " ); -maximum_ports = getint(); -size_ports = PER_PORT * maximum_ports; -total_size += size_ports; - -printf( "What is maximum_periods? " ); -maximum_periods = getint(); -size_periods = PER_PORT * maximum_periods; -total_size += size_periods; - -printf( "What is maximum_extensions? " ); -maximum_extensions = getint(); -size_extensions = PER_EXTENSION * maximum_extensions; -total_size += size_extensions; - -printf( "What is number_of_device_drivers? " ); -maximum_drvs = getint(); -size_drvs = PER_DRV * maximum_drvs; -total_size += size_drvs; - -printf( "What will be total stack requirement for all tasks? " ); -task_stacks = getint(); -total_size += task_stacks; - -printf( "What is the size of the interrupt stack? " ); -interrupt_stack = getint(); -total_size += interrupt_stack; - -printf( "How many tasks will be created with the FP flag? " ); -maximum_fps = getint(); -size_fps = PER_FPTASK * maximum_fps; -total_size += size_fps; - -printf( "Is this a single processor system? " ); -for ( break_loop=0 ; !break_loop; c = getchar() ) { - switch ( c ) { - case 'Y': case 'y': - case 'N': case 'n': - break_loop = 1; - break; - } -} -printf( "%c\n", c ); -if ( c == 'n' || c == 'N' ) { - printf( "What is maximum_nodes? " ); - maximum_nodes = getint(); - size_nodes = PER_NODE * maximum_nodes; - total_size += size_nodes; - printf( "What is maximum_global_objects? " ); - maximum_gobjs = getint(); - size_gobjs = PER_GOBJECT * maximum_gobjs; - total_size += size_gobjs; - printf( "What is maximum_proxies? " ); - maximum_proxies = getint(); - size_proxies = PER_PROXY * maximum_proxies; - total_size += size_proxies; -} else { - maximum_nodes = 0; - size_nodes = PER_NODE * 0; - maximum_gobjs = 0; - size_gobjs = PER_GOBJECT * 0; - maximum_proxies = 0; - size_proxies = PER_PROXY * 0; -} - -printf( "\n\n" ); -printf( " ************** EXECUTIVE WORK SPACE REQUIRED **************\n" ); -printf( " Tasks - %03d * %03d = %d\n", - maximum_tasks, PER_TASK, size_tasks ); -printf( " Semaphores - %03d * %03d = %d\n", - maximum_sems, PER_SEMAPHORE, size_sems ); -printf( " Timers - %03d * %03d = %d\n", - maximum_timers, PER_TIMER, size_timers ); -printf( " Msg Queues - %03d * %03d = %d\n", - maximum_msgqs, PER_MSGQ, size_msgqs ); -printf( " Messages - %03d * %03d = %d\n", - maximum_msgs, PER_MSG, size_msgs ); -printf( " Regions - %03d * %03d = %d\n", - maximum_regns, PER_REGN, size_regns); -printf( " Partitions - %03d * %03d = %d\n", - maximum_parts, PER_PART, size_parts ); -printf( " Periods - %03d * %03d = %d\n", - maximum_periods, PER_PERIOD, size_periods ); -printf( " Extensions - %03d * %03d = %d\n", - maximum_extensions, PER_EXTENSION, size_extensions ); -printf( " Device Drivers - %03d * %03d = %d\n", - maximum_drvs, PER_DRV, size_drvs ); - -printf( " System Requirements - %04d = %d\n", - sys_req, sys_req ); - -printf( " Floating Point Tasks - %03d * %03d = %d\n", - maximum_fps, PER_FPTASK, size_fps ); -printf( " Application Task Stacks - = %d\n", - task_stacks ); -printf( " Interrupt Stacks - = %d\n", - task_stacks ); -printf( " \n" ); -printf( " Global object tables - %03d * %03d = %d\n", - maximum_nodes, PER_NODE, size_nodes ); -printf( " Global objects - %03d * %03d = %d\n", - maximum_gobjs, PER_GOBJECT, size_gobjs ); -printf( " Proxies - %03d * %03d = %d\n", - maximum_proxies, PER_PROXY, size_proxies ); -printf( "\n\n" ); -printf( " TOTAL = %d bytes\n", - total_size ); -} - -void print_formula() -{ -printf( " ************** EXECUTIVE WORK SPACE FORMULA **************\n" ); -printf( " Tasks - maximum_tasks * %d\n", PER_TASK ); -printf( " Timers - maximum_timers * %d\n", PER_TIMER ); -printf( " Semaphores - maximum_semaphores * %d\n", PER_SEMAPHORE); -printf( " Message Queues - maximum_message_queues * %d\n", PER_MSGQ ); -printf( " Messages - maximum_messages * %d\n", PER_MSG ); -printf( " Regions - maximum_regions * %d\n", PER_REGN ); -printf( " Partitions - maximum_partitions * %d\n", PER_PART ); -printf( " Ports - maximum_ports * %d\n", PER_PORT ); -printf( " Periods - maximum_periods * %d\n", PER_PORT ); -printf( " Extensions - maximum_extensions * %d\n", PER_EXTENSION ); -printf( " Device Drivers - number_of_device_drivers * %d\n", PER_DRV); -printf( " System Requirements - %d\n", sys_req ); -printf( " Floating Point Tasks - FPMASK Tasks * %d\n", CONTEXT_FP_SIZE ); -printf( " User's Tasks' Stacks -\n" ); -printf( " Interrupt Stack -\n" ); -printf( " \n" ); -printf( " Global object tables - maximum_nodes * %d\n", PER_NODE ); -printf( " Global objects - maximum_global_objects * %d\n", PER_GOBJECT ); -printf( " Proxies - maximum_proxies * %d\n", PER_PROXY ); -} |