forked from Imagelibrary/rtems
86 lines
2.0 KiB
C
86 lines
2.0 KiB
C
/* Task_1
|
|
*
|
|
* This test serves as a test task. It creates and deletes
|
|
* the remaining tasks, twice so that the tasks displayed by
|
|
* the top command grow past the max tasks displayed then shrink
|
|
* back down.
|
|
*
|
|
* Input parameters:
|
|
* argument - task argument
|
|
*
|
|
* Output parameters: NONE
|
|
*
|
|
* COPYRIGHT (c) 2014.
|
|
* On-Line Applications Research Corporation (OAR).
|
|
*
|
|
* The license and distribution terms for this file may be
|
|
* found in the file LICENSE in this distribution or at
|
|
* http://www.rtems.org/license/LICENSE.
|
|
*/
|
|
|
|
#ifdef HAVE_CONFIG_H
|
|
#include "config.h"
|
|
#endif
|
|
|
|
#include "system.h"
|
|
|
|
static void create_and_start( uint32_t i )
|
|
{
|
|
rtems_status_code status;
|
|
char str[30];
|
|
char name[5];
|
|
|
|
sprintf(name, "TA%02" PRId32 " ", i);
|
|
|
|
Task_name[ i ] = rtems_build_name(
|
|
name[0], name[1], name[2], name[3]
|
|
);
|
|
|
|
status = rtems_task_create(
|
|
Task_name[ i ],
|
|
1,
|
|
RTEMS_MINIMUM_STACK_SIZE,
|
|
RTEMS_TIMESLICE,
|
|
RTEMS_FLOATING_POINT,
|
|
&Task_id[ i ]
|
|
);
|
|
sprintf(str,"rtems_task_create of %s", name);
|
|
directive_failed( status, str );
|
|
|
|
status = rtems_task_start( Task_id[ i ], Task_3, i );
|
|
sprintf(str, "rtems_task_start of %s", name);
|
|
directive_failed( status, str);
|
|
}
|
|
|
|
rtems_task Task_1(
|
|
rtems_task_argument argument
|
|
)
|
|
{
|
|
rtems_status_code status;
|
|
char str[80];
|
|
uint32_t i,j;
|
|
|
|
for(j=0; j<2; j++) {
|
|
|
|
for( i=3; i<TASK_COUNT; i++) {
|
|
create_and_start(i);
|
|
status = rtems_task_wake_after (TicksPerSecond * 5);
|
|
directive_failed( status, "rtems_task_wake_after" );
|
|
}
|
|
|
|
status = rtems_task_wake_after (TicksPerSecond * 10);
|
|
directive_failed( status, "rtems_task_wake_after" );
|
|
|
|
for( i=3; i<TASK_COUNT; i++) {
|
|
status = rtems_task_delete( Task_id[i] );
|
|
sprintf(str, "task delete TA%02" PRId32 "", i);
|
|
directive_failed( status, str );
|
|
status = rtems_task_wake_after (TicksPerSecond * 5);
|
|
directive_failed( status, "rtems_task_wake_after" );
|
|
}
|
|
}
|
|
|
|
TEST_END();
|
|
rtems_test_exit( 0 );
|
|
}
|