summaryrefslogtreecommitdiffstats
path: root/testsuites/sptests/sp22
diff options
context:
space:
mode:
Diffstat (limited to 'testsuites/sptests/sp22')
-rw-r--r--testsuites/sptests/sp22/delay.c32
-rw-r--r--testsuites/sptests/sp22/init.c69
-rw-r--r--testsuites/sptests/sp22/prtime.c32
-rw-r--r--testsuites/sptests/sp22/sp22.doc20
-rw-r--r--testsuites/sptests/sp22/sp22.scn29
-rw-r--r--testsuites/sptests/sp22/system.h30
-rw-r--r--testsuites/sptests/sp22/task1.c164
7 files changed, 0 insertions, 376 deletions
diff --git a/testsuites/sptests/sp22/delay.c b/testsuites/sptests/sp22/delay.c
deleted file mode 100644
index bcf9e014a7..0000000000
--- a/testsuites/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/testsuites/sptests/sp22/init.c b/testsuites/sptests/sp22/init.c
deleted file mode 100644
index 820fac81e3..0000000000
--- a/testsuites/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/testsuites/sptests/sp22/prtime.c b/testsuites/sptests/sp22/prtime.c
deleted file mode 100644
index f3871eb9fd..0000000000
--- a/testsuites/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/testsuites/sptests/sp22/sp22.doc b/testsuites/sptests/sp22/sp22.doc
deleted file mode 100644
index 9208d7a695..0000000000
--- a/testsuites/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/testsuites/sptests/sp22/sp22.scn b/testsuites/sptests/sp22/sp22.scn
deleted file mode 100644
index 6402ab4482..0000000000
--- a/testsuites/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/testsuites/sptests/sp22/system.h b/testsuites/sptests/sp22/system.h
deleted file mode 100644
index aa2c6d17e4..0000000000
--- a/testsuites/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/testsuites/sptests/sp22/task1.c b/testsuites/sptests/sp22/task1.c
deleted file mode 100644
index 240a1972cc..0000000000
--- a/testsuites/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 );
-}
generated by cgit v1.2.3 (git 2.25.1) at 2024-04-30 22:41:44 +0000