Changeset 0f88857 in rtems
- Timestamp:
- 11/15/99 21:19:58 (24 years ago)
- Branches:
- 4.10, 4.11, 4.8, 4.9, 5, master
- Children:
- 06380cfe
- Parents:
- cb193710
- Files:
-
- 1 added
- 5 edited
- 1 moved
Legend:
- Unmodified
- Added
- Removed
-
c/src/tests/itrontests/itrontask02/Makefile.in
rcb193710 r0f88857 20 20 21 21 # C source names, if any, go here -- minus the .c 22 C_PIECES = init preempt22 C_PIECES = init dormant 23 23 C_FILES = $(C_PIECES:%=%.c) 24 24 C_O_FILES = $(C_PIECES:%=${ARCH}/%.o) -
c/src/tests/itrontests/itrontask02/dormant.c
rcb193710 r0f88857 1 /* Preempt_task1 /* Dormant 2 2 * 3 * This routine serves as a test task. It verifies the task manager. 3 * This routine serves as two test tasks. 4 * It has one dormant and one sleeping tasks. 4 5 * 5 6 * Input parameters: … … 18 19 * $Id$ 19 20 */ 21 20 22 #include <assert.h> 21 23 #include "system.h" 22 24 23 void Preempt_task()25 void Dormant_task() 24 26 { 25 puts( " PREEMPT - ext_tsk - going to DORMANT state" );27 puts( "DORMANT - ext_tsk - going to DORMANT state" ); 26 28 ext_tsk( ); 27 29 28 puts( " ext_tsk of RTEMS_PREEMPT" );30 puts( "ERROR==>ext_tsk of DORMANT returned" ); 29 31 assert(0); 30 32 } 33 34 35 void Non_Dormant_task() 36 { 37 ER status; 38 39 while (TRUE) { 40 puts( "NON-DORMANT - Sleep for 2 minutes" ); 41 status = rtems_task_wake_after( 120*TICKS_PER_SECOND ); 42 directive_failed( status, "rtems_task_wake_after" ); 43 } 44 } 45 -
c/src/tests/itrontests/itrontask02/init.c
rcb193710 r0f88857 83 83 84 84 puts( "\n\n*** ITRON TASK TEST 2 ***\n" ); 85 puts( "\n*** Create Task Errors ***" );86 85 87 86 build_time( &time, 12, 31, 1988, 9, 0, 0, 0 ); … … 89 88 directive_failed( status, "rtems_clock_set" ); 90 89 90 91 /* 92 * Set My priority to 8 so that dummy tasks will be 93 * forced to run when started. 94 */ 95 96 status = chg_pri( TSK_SELF, 8 ); 97 assert( status == E_OK ); 98 status = ref_tsk( &pk_rtsk, TSK_SELF ); 99 assert( status == E_OK ); 100 assert( pk_rtsk.tskpri == 8 ); 101 102 /* 103 * Create and verify a DORMANT task. 104 */ 105 91 106 pk_ctsk.exinf = NULL; 92 107 pk_ctsk.tskatr = TA_HLNG; 93 108 pk_ctsk.itskpri = 1; 94 pk_ctsk.task = Preempt_task;109 pk_ctsk.task = Dormant_task; 95 110 pk_ctsk.stksz = RTEMS_MINIMUM_STACK_SIZE; 96 111 97 puts( "Init - cre_tsk - Preempt Task" ); 98 status = cre_tsk( PREEMPT_TASK_ID, &pk_ctsk ); 99 assert( status == E_OK ); 100 112 puts( "Init - cre_tsk - Dormant Task" ); 113 status = cre_tsk( DORMANT_TASK_ID, &pk_ctsk ); 114 assert( status == E_OK ); 115 status = ref_tsk( &pk_rtsk, DORMANT_TASK_ID ); 116 assert( status == E_OK ); 117 assert( pk_rtsk.tskstat == TTS_DMT ); 118 119 /* 120 * Create, Start and verify a not DORMANT task. 121 */ 122 123 pk_ctsk.task = Non_Dormant_task; 124 puts( "Init - cre_tsk - Non-Dormant Task" ); 125 status = cre_tsk( NON_DORMANT_TASK_ID, &pk_ctsk ); 126 assert( status == E_OK ); 127 status = sta_tsk( NON_DORMANT_TASK_ID, 1 ); 128 status = ref_tsk( &pk_rtsk, NON_DORMANT_TASK_ID ); 129 assert( status == E_OK ); 130 assert( pk_rtsk.tskstat == TTS_WAI); 131 132 101 133 /* 102 134 * Bad ID errors 103 135 */ 136 137 puts( "\n*** Create Task Errors ***" ); 104 138 105 139 puts( "Init - cre_tsk - access violation ( id less than -4) - E_OACV" ); … … 161 195 #endif 162 196 163 164 197 puts( "\n\n*** Delete Task Errors ***" ); 165 198 … … 171 204 pk_ctsk.tskatr = TA_HLNG; 172 205 pk_ctsk.itskpri = 1; 173 pk_ctsk.task = Preempt_task;206 pk_ctsk.task = Dormant_task; 174 207 pk_ctsk.stksz = RTEMS_MINIMUM_STACK_SIZE; 175 208 … … 180 213 181 214 puts( "Init - del_tsk - task is not DORMANT - E_OBJ" ); 182 status = del_tsk( PREEMPT_TASK_ID );215 status = del_tsk( NON_DORMANT_TASK_ID ); 183 216 assert( status == E_OBJ ); 184 217 … … 221 254 222 255 puts( "Init - sta_tsk - task is not DORMANT - E_OBJ" ); 223 status = sta_tsk( PREEMPT_TASK_ID, 1 );256 status = sta_tsk( NON_DORMANT_TASK_ID, 1 ); 224 257 assert( status == E_OBJ ); 225 258 … … 261 294 262 295 puts( "Init - ter_tsk - task is not DORMANT - E_OBJ" ); 263 status = ter_tsk( PREEMPT_TASK_ID );296 status = ter_tsk( DORMANT_TASK_ID ); 264 297 assert( status == E_OBJ ); 265 298 … … 302 335 /* Need a dormant task to call */ 303 336 puts( "Init - chg_pri - task is not DORMANT - E_OBJ" ); 304 status = chg_pri( PREEMPT_TASK_ID, 1 );337 status = chg_pri( DORMANT_TASK_ID, 1 ); 305 338 assert( status == E_OBJ ); 306 339 … … 437 470 438 471 puts( "Init - rsm_tsk - task is DORMANT - E_OBJ" ); 439 status = rsm_tsk( PREEMPT_TASK_ID );472 status = rsm_tsk( DORMANT_TASK_ID ); 440 473 assert( status == E_OBJ ); 441 474 … … 466 499 467 500 puts( "Init - frsm_tsk - task is DORMANT - E_OBJ" ); 468 status = frsm_tsk( PREEMPT_TASK_ID );501 status = frsm_tsk( DORMANT_TASK_ID ); 469 502 assert( status == E_OBJ ); 470 503 -
c/src/tests/itrontests/itrontask02/system.h
rcb193710 r0f88857 21 21 22 22 void ITRON_Init( void ); 23 void Preempt_task(); 23 void Dormant_task(); 24 void Non_Dormant_task(); 24 25 25 26 /* configuration information */ … … 32 33 /* global variables */ 33 34 34 #define PREEMPT_TASK_ID 2 35 #define DORMANT_TASK_ID 2 36 #define NON_DORMANT_TASK_ID 3 35 37 36 38 TEST_EXTERN rtems_id Global_variable; /* example global variable */ -
testsuites/itrontests/itrontask02/init.c
rcb193710 r0f88857 83 83 84 84 puts( "\n\n*** ITRON TASK TEST 2 ***\n" ); 85 puts( "\n*** Create Task Errors ***" );86 85 87 86 build_time( &time, 12, 31, 1988, 9, 0, 0, 0 ); … … 89 88 directive_failed( status, "rtems_clock_set" ); 90 89 90 91 /* 92 * Set My priority to 8 so that dummy tasks will be 93 * forced to run when started. 94 */ 95 96 status = chg_pri( TSK_SELF, 8 ); 97 assert( status == E_OK ); 98 status = ref_tsk( &pk_rtsk, TSK_SELF ); 99 assert( status == E_OK ); 100 assert( pk_rtsk.tskpri == 8 ); 101 102 /* 103 * Create and verify a DORMANT task. 104 */ 105 91 106 pk_ctsk.exinf = NULL; 92 107 pk_ctsk.tskatr = TA_HLNG; 93 108 pk_ctsk.itskpri = 1; 94 pk_ctsk.task = Preempt_task;109 pk_ctsk.task = Dormant_task; 95 110 pk_ctsk.stksz = RTEMS_MINIMUM_STACK_SIZE; 96 111 97 puts( "Init - cre_tsk - Preempt Task" ); 98 status = cre_tsk( PREEMPT_TASK_ID, &pk_ctsk ); 99 assert( status == E_OK ); 100 112 puts( "Init - cre_tsk - Dormant Task" ); 113 status = cre_tsk( DORMANT_TASK_ID, &pk_ctsk ); 114 assert( status == E_OK ); 115 status = ref_tsk( &pk_rtsk, DORMANT_TASK_ID ); 116 assert( status == E_OK ); 117 assert( pk_rtsk.tskstat == TTS_DMT ); 118 119 /* 120 * Create, Start and verify a not DORMANT task. 121 */ 122 123 pk_ctsk.task = Non_Dormant_task; 124 puts( "Init - cre_tsk - Non-Dormant Task" ); 125 status = cre_tsk( NON_DORMANT_TASK_ID, &pk_ctsk ); 126 assert( status == E_OK ); 127 status = sta_tsk( NON_DORMANT_TASK_ID, 1 ); 128 status = ref_tsk( &pk_rtsk, NON_DORMANT_TASK_ID ); 129 assert( status == E_OK ); 130 assert( pk_rtsk.tskstat == TTS_WAI); 131 132 101 133 /* 102 134 * Bad ID errors 103 135 */ 136 137 puts( "\n*** Create Task Errors ***" ); 104 138 105 139 puts( "Init - cre_tsk - access violation ( id less than -4) - E_OACV" ); … … 161 195 #endif 162 196 163 164 197 puts( "\n\n*** Delete Task Errors ***" ); 165 198 … … 171 204 pk_ctsk.tskatr = TA_HLNG; 172 205 pk_ctsk.itskpri = 1; 173 pk_ctsk.task = Preempt_task;206 pk_ctsk.task = Dormant_task; 174 207 pk_ctsk.stksz = RTEMS_MINIMUM_STACK_SIZE; 175 208 … … 180 213 181 214 puts( "Init - del_tsk - task is not DORMANT - E_OBJ" ); 182 status = del_tsk( PREEMPT_TASK_ID );215 status = del_tsk( NON_DORMANT_TASK_ID ); 183 216 assert( status == E_OBJ ); 184 217 … … 221 254 222 255 puts( "Init - sta_tsk - task is not DORMANT - E_OBJ" ); 223 status = sta_tsk( PREEMPT_TASK_ID, 1 );256 status = sta_tsk( NON_DORMANT_TASK_ID, 1 ); 224 257 assert( status == E_OBJ ); 225 258 … … 261 294 262 295 puts( "Init - ter_tsk - task is not DORMANT - E_OBJ" ); 263 status = ter_tsk( PREEMPT_TASK_ID );296 status = ter_tsk( DORMANT_TASK_ID ); 264 297 assert( status == E_OBJ ); 265 298 … … 302 335 /* Need a dormant task to call */ 303 336 puts( "Init - chg_pri - task is not DORMANT - E_OBJ" ); 304 status = chg_pri( PREEMPT_TASK_ID, 1 );337 status = chg_pri( DORMANT_TASK_ID, 1 ); 305 338 assert( status == E_OBJ ); 306 339 … … 437 470 438 471 puts( "Init - rsm_tsk - task is DORMANT - E_OBJ" ); 439 status = rsm_tsk( PREEMPT_TASK_ID );472 status = rsm_tsk( DORMANT_TASK_ID ); 440 473 assert( status == E_OBJ ); 441 474 … … 466 499 467 500 puts( "Init - frsm_tsk - task is DORMANT - E_OBJ" ); 468 status = frsm_tsk( PREEMPT_TASK_ID );501 status = frsm_tsk( DORMANT_TASK_ID ); 469 502 assert( status == E_OBJ ); 470 503 -
testsuites/itrontests/itrontask02/system.h
rcb193710 r0f88857 21 21 22 22 void ITRON_Init( void ); 23 void Preempt_task(); 23 void Dormant_task(); 24 void Non_Dormant_task(); 24 25 25 26 /* configuration information */ … … 32 33 /* global variables */ 33 34 34 #define PREEMPT_TASK_ID 2 35 #define DORMANT_TASK_ID 2 36 #define NON_DORMANT_TASK_ID 3 35 37 36 38 TEST_EXTERN rtems_id Global_variable; /* example global variable */
Note: See TracChangeset
for help on using the changeset viewer.