+ Added check that a task could be sent to a dormant state

then sta_tsk used to restart the task to its initial state.
+ Added calls to ref_tsk to yellow paths for suspended and
  ready but not running tasks.
+ Fixed output file to correctly state test name
+ Added priority of preempt to the header file.  Allows ref_tsk verification.
This commit is contained in:
Jennifer Averett
1999-11-15 21:25:53 +00:00
parent 0f88857a3a
commit 06380cfeac
8 changed files with 192 additions and 28 deletions

View File

@@ -20,28 +20,64 @@
#define TEST_INIT #define TEST_INIT
#include "system.h" #include "system.h"
#include <stdio.h> #include <stdio.h>
#include <assert.h>
void ITRON_Init( void ) void ITRON_Init( void )
{ {
ER status; ER status;
T_CTSK pk_ctsk; T_CTSK pk_ctsk;
T_RTSK pk_rtsk;
puts( "\n\n*** ITRON TASK TEST 3 ***" );
pk_ctsk.exinf = NULL; pk_ctsk.exinf = NULL;
pk_ctsk.tskatr = TA_HLNG; pk_ctsk.tskatr = TA_HLNG;
pk_ctsk.stksz = RTEMS_MINIMUM_STACK_SIZE; pk_ctsk.stksz = RTEMS_MINIMUM_STACK_SIZE;
pk_ctsk.itskpri = PREEMPT_PRIORITY;
pk_ctsk.itskpri = 1;
pk_ctsk.task = Preempt_task; pk_ctsk.task = Preempt_task;
puts( "\n\n*** ITRON TASK TEST 3 ***" );
/*
* Create and start the Preempt task the first time.
* Verify that it is dormant when it comes back.
*/
puts( "INIT - Create and Start PREEMPT" );
status = chg_pri( TSK_SELF, (PREEMPT_PRIORITY+2) );
directive_failed( status, "chg_pri of SELF" );
status = cre_tsk( PREEMPT_TASK_ID, &pk_ctsk ); status = cre_tsk( PREEMPT_TASK_ID, &pk_ctsk );
directive_failed( status, "cre_tsk of RTEMS_PREEMPT" ); directive_failed( status, "cre_tsk of RTEMS_PREEMPT" );
status = sta_tsk( PREEMPT_TASK_ID, 0 ); status = sta_tsk( PREEMPT_TASK_ID, 0 );
directive_failed( status, "sta_tsk of RTEMS_PREEMPT" ); directive_failed( status, "sta_tsk of RTEMS_PREEMPT" );
puts( "INIT - rot_rdq - no tasks at this priority" );
status = rot_rdq( 1 );
directive_failed( status, "rot_rdq" );
puts( "INIT - ref_tsk PREEMPT - Validate DORMANT STATE" );
status = ref_tsk( &pk_rtsk, PREEMPT_TASK_ID );
directive_failed( status, "INIT - ref_tsk of RTEMS_PREEMPT");
assert( pk_rtsk.tskstat == TTS_DMT );
/*
* Restart the Preempt Task.
*/
status = sta_tsk( PREEMPT_TASK_ID, 0 );
directive_failed( status, "sta_tsk of RTEMS_PREEMPT" );
puts( "INIT - rot_rdq - yielding processor" ); puts( "INIT - rot_rdq - yielding processor" );
status = rot_rdq( 1 ); status = rot_rdq( 1 );
directive_failed( status, "rot_rdq" ); directive_failed( status, "rot_rdq" );
puts( "INIT - ref_tsk PREEMPT - Validate no longer exists" );
status = ref_tsk( &pk_rtsk, PREEMPT_TASK_ID );
assert( status == E_NOEXS );
status = chg_pri( TSK_SELF, PREEMPT_PRIORITY );
directive_failed( status, "chg_pri of SELF" );
/*
* XXX
*/
pk_ctsk.itskpri = 3; pk_ctsk.itskpri = 3;
pk_ctsk.task = Task_1; pk_ctsk.task = Task_1;
@@ -62,10 +98,17 @@ void ITRON_Init( void )
directive_failed( status, "sta_tsk of TA2" ); directive_failed( status, "sta_tsk of TA2" );
status = sta_tsk( TA3_ID, 0 ); status = sta_tsk( TA3_ID, 0 );
directive_failed( status, "sta_tsk of TA3" ); directive_failed( status, "sta_tsk of TA3" );
puts( "INIT - ref_tsk TA1 - Validate READY STATE" );
status = ref_tsk( &pk_rtsk, TA1_ID);
directive_failed( status, "INIT - ref_tsk of TA1");
assert( pk_rtsk.tskstat == TTS_RDY );
puts( "INIT - suspending TA2 while middle task on a ready chain" ); puts( "INIT - suspending TA2 while middle task on a ready chain" );
status = sus_tsk( TA2_ID ); status = sus_tsk( TA2_ID );
directive_failed( status, "sus_tsk of TA2" ); directive_failed( status, "sus_tsk of TA2" );
status = ref_tsk( &pk_rtsk, TA2_ID);
directive_failed( status, "INIT - ref_tsk of TA2");
assert( pk_rtsk.tskstat == TTS_SUS );
status = ter_tsk( TA1_ID ); status = ter_tsk( TA1_ID );
directive_failed( status, "ter_tsk of TA1" ); directive_failed( status, "ter_tsk of TA1" );
@@ -89,6 +132,11 @@ void ITRON_Init( void )
directive_failed( status, "sta_tsk of TA3" ); directive_failed( status, "sta_tsk of TA3" );
exd_tsk(); exd_tsk();
directive_failed( 0, "exd_tsk" ); assert(0);
} }

View File

@@ -1,6 +1,14 @@
*** ITRON TASK TEST 3 *** *** ITRON TASK TEST 3 ***
INIT - Create and Start PREEMPT
PREEMPT - ref_tsk validation
PREEMPT - chg_pri increment priority
PREEMPT - ext_tsk - going to DORMANT state
INIT - rot_rdq - no tasks at this priority
INIT - ref_tsk PREEMPT - Validate DORMANT STATE
PREEMPT - ref_tsk validation
PREEMPT - exd_tsk - Exit and Delete task
INIT - rot_rdq - yielding processor INIT - rot_rdq - yielding processor
PREEMPT - exd_tsk INIT - ref_tsk PREEMPT - Validate no longer exists
INIT - suspending TA2 while middle task on a ready chain INIT - suspending TA2 while middle task on a ready chain
TA1 - rtems_task_wake_after - sleep 1 second TA1 - rtems_task_wake_after - sleep 1 second
TA2 - rtems_task_wake_after - sleep 1 minute TA2 - rtems_task_wake_after - sleep 1 minute
@@ -10,4 +18,4 @@ TA1 - sus_tsk - suspend TA2
TA1 - - delete TA2 TA1 - - delete TA2
TA1 - rtems_task_wake_after - sleep for 5 seconds TA1 - rtems_task_wake_after - sleep for 5 seconds
TA3 - exd_tsk - exit and delete self TA3 - exd_tsk - exit and delete self
*** END OF ITRON TASK TEST 3 *** *** ITRON TASK TEST 3 ***

View File

@@ -21,11 +21,35 @@
#include <assert.h> #include <assert.h>
#include "system.h" #include "system.h"
int Preempt_task_Count;
void Preempt_task() void Preempt_task()
{ {
ER status; ER status;
T_RTSK pk_rtsk;
puts( "PREEMPT - exd_tsk" ); puts( "PREEMPT - ref_tsk validation" );
status = ref_tsk( &pk_rtsk, PREEMPT_TASK_ID );
assert( status == E_OK );
assert( pk_rtsk.tskpri == PREEMPT_PRIORITY );
assert( pk_rtsk.itskpri == PREEMPT_PRIORITY );
assert( pk_rtsk.task == Preempt_task );
assert( pk_rtsk.stksz >= RTEMS_MINIMUM_STACK_SIZE );
assert( pk_rtsk.tskstat == (TTS_RUN | TTS_RDY) );
if ( Preempt_task_Count == 0 ) {
Preempt_task_Count ++;
puts( "PREEMPT - chg_pri increment priority ");
status = chg_pri( PREEMPT_TASK_ID, (PREEMPT_PRIORITY+1) );
directive_failed( status, "chg_pri" );
puts( "PREEMPT - ext_tsk - going to DORMANT state" );
ext_tsk( );
assert( 0 );
} else {
Preempt_task_Count ++;
puts( "PREEMPT - exd_tsk - Exit and Delete task" );
exd_tsk( ); exd_tsk( );
assert( 0 ); assert( 0 );
} }
}

View File

@@ -40,6 +40,8 @@ void Task_3();
#define TA2_ID 4 #define TA2_ID 4
#define TA3_ID 5 #define TA3_ID 5
#define PREEMPT_PRIORITY 1
TEST_EXTERN rtems_id Global_variable; /* example global variable */ TEST_EXTERN rtems_id Global_variable; /* example global variable */
/* end of include file */ /* end of include file */

View File

@@ -20,28 +20,64 @@
#define TEST_INIT #define TEST_INIT
#include "system.h" #include "system.h"
#include <stdio.h> #include <stdio.h>
#include <assert.h>
void ITRON_Init( void ) void ITRON_Init( void )
{ {
ER status; ER status;
T_CTSK pk_ctsk; T_CTSK pk_ctsk;
T_RTSK pk_rtsk;
puts( "\n\n*** ITRON TASK TEST 3 ***" );
pk_ctsk.exinf = NULL; pk_ctsk.exinf = NULL;
pk_ctsk.tskatr = TA_HLNG; pk_ctsk.tskatr = TA_HLNG;
pk_ctsk.stksz = RTEMS_MINIMUM_STACK_SIZE; pk_ctsk.stksz = RTEMS_MINIMUM_STACK_SIZE;
pk_ctsk.itskpri = PREEMPT_PRIORITY;
pk_ctsk.itskpri = 1;
pk_ctsk.task = Preempt_task; pk_ctsk.task = Preempt_task;
puts( "\n\n*** ITRON TASK TEST 3 ***" );
/*
* Create and start the Preempt task the first time.
* Verify that it is dormant when it comes back.
*/
puts( "INIT - Create and Start PREEMPT" );
status = chg_pri( TSK_SELF, (PREEMPT_PRIORITY+2) );
directive_failed( status, "chg_pri of SELF" );
status = cre_tsk( PREEMPT_TASK_ID, &pk_ctsk ); status = cre_tsk( PREEMPT_TASK_ID, &pk_ctsk );
directive_failed( status, "cre_tsk of RTEMS_PREEMPT" ); directive_failed( status, "cre_tsk of RTEMS_PREEMPT" );
status = sta_tsk( PREEMPT_TASK_ID, 0 ); status = sta_tsk( PREEMPT_TASK_ID, 0 );
directive_failed( status, "sta_tsk of RTEMS_PREEMPT" ); directive_failed( status, "sta_tsk of RTEMS_PREEMPT" );
puts( "INIT - rot_rdq - no tasks at this priority" );
status = rot_rdq( 1 );
directive_failed( status, "rot_rdq" );
puts( "INIT - ref_tsk PREEMPT - Validate DORMANT STATE" );
status = ref_tsk( &pk_rtsk, PREEMPT_TASK_ID );
directive_failed( status, "INIT - ref_tsk of RTEMS_PREEMPT");
assert( pk_rtsk.tskstat == TTS_DMT );
/*
* Restart the Preempt Task.
*/
status = sta_tsk( PREEMPT_TASK_ID, 0 );
directive_failed( status, "sta_tsk of RTEMS_PREEMPT" );
puts( "INIT - rot_rdq - yielding processor" ); puts( "INIT - rot_rdq - yielding processor" );
status = rot_rdq( 1 ); status = rot_rdq( 1 );
directive_failed( status, "rot_rdq" ); directive_failed( status, "rot_rdq" );
puts( "INIT - ref_tsk PREEMPT - Validate no longer exists" );
status = ref_tsk( &pk_rtsk, PREEMPT_TASK_ID );
assert( status == E_NOEXS );
status = chg_pri( TSK_SELF, PREEMPT_PRIORITY );
directive_failed( status, "chg_pri of SELF" );
/*
* XXX
*/
pk_ctsk.itskpri = 3; pk_ctsk.itskpri = 3;
pk_ctsk.task = Task_1; pk_ctsk.task = Task_1;
@@ -62,10 +98,17 @@ void ITRON_Init( void )
directive_failed( status, "sta_tsk of TA2" ); directive_failed( status, "sta_tsk of TA2" );
status = sta_tsk( TA3_ID, 0 ); status = sta_tsk( TA3_ID, 0 );
directive_failed( status, "sta_tsk of TA3" ); directive_failed( status, "sta_tsk of TA3" );
puts( "INIT - ref_tsk TA1 - Validate READY STATE" );
status = ref_tsk( &pk_rtsk, TA1_ID);
directive_failed( status, "INIT - ref_tsk of TA1");
assert( pk_rtsk.tskstat == TTS_RDY );
puts( "INIT - suspending TA2 while middle task on a ready chain" ); puts( "INIT - suspending TA2 while middle task on a ready chain" );
status = sus_tsk( TA2_ID ); status = sus_tsk( TA2_ID );
directive_failed( status, "sus_tsk of TA2" ); directive_failed( status, "sus_tsk of TA2" );
status = ref_tsk( &pk_rtsk, TA2_ID);
directive_failed( status, "INIT - ref_tsk of TA2");
assert( pk_rtsk.tskstat == TTS_SUS );
status = ter_tsk( TA1_ID ); status = ter_tsk( TA1_ID );
directive_failed( status, "ter_tsk of TA1" ); directive_failed( status, "ter_tsk of TA1" );
@@ -89,6 +132,11 @@ void ITRON_Init( void )
directive_failed( status, "sta_tsk of TA3" ); directive_failed( status, "sta_tsk of TA3" );
exd_tsk(); exd_tsk();
directive_failed( 0, "exd_tsk" ); assert(0);
} }

View File

@@ -1,6 +1,14 @@
*** ITRON TASK TEST 3 *** *** ITRON TASK TEST 3 ***
INIT - Create and Start PREEMPT
PREEMPT - ref_tsk validation
PREEMPT - chg_pri increment priority
PREEMPT - ext_tsk - going to DORMANT state
INIT - rot_rdq - no tasks at this priority
INIT - ref_tsk PREEMPT - Validate DORMANT STATE
PREEMPT - ref_tsk validation
PREEMPT - exd_tsk - Exit and Delete task
INIT - rot_rdq - yielding processor INIT - rot_rdq - yielding processor
PREEMPT - exd_tsk INIT - ref_tsk PREEMPT - Validate no longer exists
INIT - suspending TA2 while middle task on a ready chain INIT - suspending TA2 while middle task on a ready chain
TA1 - rtems_task_wake_after - sleep 1 second TA1 - rtems_task_wake_after - sleep 1 second
TA2 - rtems_task_wake_after - sleep 1 minute TA2 - rtems_task_wake_after - sleep 1 minute
@@ -10,4 +18,4 @@ TA1 - sus_tsk - suspend TA2
TA1 - - delete TA2 TA1 - - delete TA2
TA1 - rtems_task_wake_after - sleep for 5 seconds TA1 - rtems_task_wake_after - sleep for 5 seconds
TA3 - exd_tsk - exit and delete self TA3 - exd_tsk - exit and delete self
*** END OF ITRON TASK TEST 3 *** *** ITRON TASK TEST 3 ***

View File

@@ -21,11 +21,35 @@
#include <assert.h> #include <assert.h>
#include "system.h" #include "system.h"
int Preempt_task_Count;
void Preempt_task() void Preempt_task()
{ {
ER status; ER status;
T_RTSK pk_rtsk;
puts( "PREEMPT - exd_tsk" ); puts( "PREEMPT - ref_tsk validation" );
status = ref_tsk( &pk_rtsk, PREEMPT_TASK_ID );
assert( status == E_OK );
assert( pk_rtsk.tskpri == PREEMPT_PRIORITY );
assert( pk_rtsk.itskpri == PREEMPT_PRIORITY );
assert( pk_rtsk.task == Preempt_task );
assert( pk_rtsk.stksz >= RTEMS_MINIMUM_STACK_SIZE );
assert( pk_rtsk.tskstat == (TTS_RUN | TTS_RDY) );
if ( Preempt_task_Count == 0 ) {
Preempt_task_Count ++;
puts( "PREEMPT - chg_pri increment priority ");
status = chg_pri( PREEMPT_TASK_ID, (PREEMPT_PRIORITY+1) );
directive_failed( status, "chg_pri" );
puts( "PREEMPT - ext_tsk - going to DORMANT state" );
ext_tsk( );
assert( 0 );
} else {
Preempt_task_Count ++;
puts( "PREEMPT - exd_tsk - Exit and Delete task" );
exd_tsk( ); exd_tsk( );
assert( 0 ); assert( 0 );
} }
}

View File

@@ -40,6 +40,8 @@ void Task_3();
#define TA2_ID 4 #define TA2_ID 4
#define TA3_ID 5 #define TA3_ID 5
#define PREEMPT_PRIORITY 1
TEST_EXTERN rtems_id Global_variable; /* example global variable */ TEST_EXTERN rtems_id Global_variable; /* example global variable */
/* end of include file */ /* end of include file */