sptests/sp60/init.c

0001 /* SPDX-License-Identifier: BSD-2-Clause */
0002
0003 /*
0004  *  COPYRIGHT (c) 1989-2012.
0005  *  On-Line Applications Research Corporation (OAR).
0006  *
0007  * Redistribution and use in source and binary forms, with or without
0008  * modification, are permitted provided that the following conditions
0009  * are met:
0010  * 1. Redistributions of source code must retain the above copyright
0011  *    notice, this list of conditions and the following disclaimer.
0012  * 2. Redistributions in binary form must reproduce the above copyright
0013  *    notice, this list of conditions and the following disclaimer in the
0014  *    documentation and/or other materials provided with the distribution.
0015  *
0016  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
0017  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
0018  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
0019  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
0020  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
0021  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
0022  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
0023  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
0024  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
0025  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
0026  * POSSIBILITY OF SUCH DAMAGE.
0027  */
0028
0029 #ifdef HAVE_CONFIG_H
0030 #include "config.h"
0031 #endif
0032
0033 #include <tmacros.h>
0034
0035 const char rtems_test_name[] = "SP 60";
0036
0037 /* forward declarations to avoid warnings */
0038 rtems_task Init(rtems_task_argument argument);
0039
0040 rtems_task Init(
0041   rtems_task_argument ignored
0042 )
0043 {
0044   rtems_status_code     sc;
0045   rtems_id              period1;
0046   rtems_id              period2;
0047
0048   TEST_BEGIN();
0049
0050   puts( "Init - rtems_rate_monotonic_create - first period" );
0051   sc = rtems_rate_monotonic_create(
0052     rtems_build_name( 'P', 'E', 'R', '1' ),
0053     &period1
0054   );
0055   directive_failed( sc, "rtems_rate_monotonic_create 1" );
0056
0057   puts( "Init - rtems_rate_monotonic_create - second period" );
0058   sc = rtems_rate_monotonic_create(
0059     rtems_build_name( 'P', 'E', 'R', '2' ),
0060     &period2
0061   );
0062   directive_failed( sc, "rtems_rate_monotonic_create 1" );
0063
0064   puts( "Init - rtems_rate_monotonic_period - short period" );
0065   sc = rtems_rate_monotonic_period(period1, RTEMS_MILLISECONDS_TO_TICKS(200) );
0066   directive_failed( sc, "rtems_rate_monotonic_period" );
0067
0068   puts( "Init - rtems_rate_monotonic_period - long period initiated" );
0069   sc = rtems_rate_monotonic_period(period2, RTEMS_MILLISECONDS_TO_TICKS(1000) );
0070   directive_failed( sc, "rtems_rate_monotonic_period" );
0071
0072   puts( "Init - rtems_rate_monotonic_period - long period block" );
0073   sc = rtems_rate_monotonic_period(period2, RTEMS_MILLISECONDS_TO_TICKS(1000) );
0074   directive_failed( sc, "rtems_rate_monotonic_period" );
0075
0076   puts( "Init - rtems_rate_monotonic_period - verify long period expired" );
0077   sc = rtems_rate_monotonic_period(period1, RTEMS_PERIOD_STATUS );
0078   fatal_directive_status(sc, RTEMS_TIMEOUT, "rtems_task_period status");
0079
0080   TEST_END();
0081   rtems_test_exit(0);
0082 }
0083
0084 /* configuration information */
0085
0086 #define CONFIGURE_APPLICATION_NEEDS_SIMPLE_CONSOLE_DRIVER
0087 #define CONFIGURE_APPLICATION_NEEDS_CLOCK_DRIVER
0088
0089 #define CONFIGURE_MAXIMUM_TASKS         1
0090 #define CONFIGURE_MAXIMUM_PERIODS       2
0091 #define CONFIGURE_INITIAL_EXTENSIONS RTEMS_TEST_INITIAL_EXTENSION
0092
0093 #define CONFIGURE_RTEMS_INIT_TASKS_TABLE
0094
0095 #define CONFIGURE_INIT
0096 #include <rtems/confdefs.h>
0097
0098 /* global variables */