mirror of
https://gitlab.rtems.org/rtems/rtos/rtems.git
synced 2025-12-28 07:20:16 +00:00
f691e0a09f
* Makefile.am, configure.ac: Add sp60 to exercise case where a task is blocked on one period while another expires. Add sp61 which exercises the case where a call is made to rtems_shutdown_executive when the system is not up. * sp60/.cvsignore, sp60/Makefile.am, sp60/init.c, sp60/sp60.doc, sp60/sp60.scn, sp61/.cvsignore, sp61/Makefile.am, sp61/init.c, sp61/sp61.doc, sp61/sp61.scn: New files.
71 lines
2.1 KiB
C
71 lines
2.1 KiB
C
/*
|
|
* COPYRIGHT (c) 1989-2009.
|
|
* 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.com/license/LICENSE.
|
|
*
|
|
* $Id$
|
|
*/
|
|
|
|
#include <tmacros.h>
|
|
|
|
rtems_task Init(
|
|
rtems_task_argument ignored
|
|
)
|
|
{
|
|
rtems_status_code sc;
|
|
rtems_id period1;
|
|
rtems_id period2;
|
|
|
|
puts( "\n\n*** TEST 60 ***" );
|
|
|
|
puts( "Init - rtems_rate_monotonic_create - first period" );
|
|
sc = rtems_rate_monotonic_create(
|
|
rtems_build_name( 'P', 'E', 'R', '1' ),
|
|
&period1
|
|
);
|
|
directive_failed( sc, "rtems_rate_monotonic_create 1" );
|
|
|
|
puts( "Init - rtems_rate_monotonic_create - second period" );
|
|
sc = rtems_rate_monotonic_create(
|
|
rtems_build_name( 'P', 'E', 'R', '2' ),
|
|
&period2
|
|
);
|
|
directive_failed( sc, "rtems_rate_monotonic_create 1" );
|
|
|
|
puts( "Init - rtems_rate_monotonic_period - short period" );
|
|
sc = rtems_rate_monotonic_period(period1, RTEMS_MILLISECONDS_TO_TICKS(200) );
|
|
directive_failed( sc, "rtems_rate_monotonic_period" );
|
|
|
|
puts( "Init - rtems_rate_monotonic_period - long period initiated" );
|
|
sc = rtems_rate_monotonic_period(period2, RTEMS_MILLISECONDS_TO_TICKS(1000) );
|
|
directive_failed( sc, "rtems_rate_monotonic_period" );
|
|
|
|
puts( "Init - rtems_rate_monotonic_period - long period block" );
|
|
sc = rtems_rate_monotonic_period(period2, RTEMS_MILLISECONDS_TO_TICKS(1000) );
|
|
directive_failed( sc, "rtems_rate_monotonic_period" );
|
|
|
|
puts( "Init - rtems_rate_monotonic_period - verify long period expired" );
|
|
sc = rtems_rate_monotonic_period(period1, RTEMS_PERIOD_STATUS );
|
|
fatal_directive_status(sc, RTEMS_TIMEOUT, "rtems_task_period status");
|
|
|
|
puts( "*** END OF TEST 60 ***" );
|
|
rtems_test_exit(0);
|
|
}
|
|
|
|
/* configuration information */
|
|
|
|
#define CONFIGURE_APPLICATION_NEEDS_CONSOLE_DRIVER
|
|
#define CONFIGURE_APPLICATION_NEEDS_CLOCK_DRIVER
|
|
|
|
#define CONFIGURE_MAXIMUM_TASKS 1
|
|
#define CONFIGURE_MAXIMUM_PERIODS 2
|
|
#define CONFIGURE_RTEMS_INIT_TASKS_TABLE
|
|
|
|
#define CONFIGURE_INIT
|
|
#include <rtems/confdefs.h>
|
|
|
|
/* global variables */
|