tmtests/tm08/task1.c

0001 /* SPDX-License-Identifier: BSD-2-Clause */
0002
0003 /*
0004  *  COPYRIGHT (c) 1989-2013.
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 #if !defined(OPERATION_COUNT)
0030 #define OPERATION_COUNT 100
0031 #endif
0032
0033 #ifdef HAVE_CONFIG_H
0034 #include "config.h"
0035 #endif
0036
0037 #include <rtems/btimer.h>
0038
0039 #define CONFIGURE_INIT
0040 #include "system.h"
0041
0042 const char rtems_test_name[] = "TIME TEST 8";
0043
0044 rtems_id Test_task_id;
0045
0046 rtems_task test_task(
0047   rtems_task_argument argument
0048 );
0049 rtems_task test_task1(
0050   rtems_task_argument argument
0051 );
0052 void test_init(void);
0053
0054 rtems_task Init(
0055   rtems_task_argument argument
0056 )
0057 {
0058   Print_Warning();
0059
0060   TEST_BEGIN();
0061
0062   test_init();
0063
0064   rtems_task_exit();
0065 }
0066
0067 void test_init(void)
0068 {
0069   rtems_status_code status;
0070
0071   status = rtems_task_create(
0072     1,
0073     (RTEMS_MAXIMUM_PRIORITY / 2u) + 1u,
0074     RTEMS_MINIMUM_STACK_SIZE,
0075     RTEMS_DEFAULT_MODES,
0076     RTEMS_DEFAULT_ATTRIBUTES,
0077     &Test_task_id
0078   );
0079   directive_failed( status, "rtems_task_create" );
0080
0081   status = rtems_task_start( Test_task_id, test_task, 0 );
0082   directive_failed( status, "rtems_task_start" );
0083
0084   status = rtems_task_create(
0085     1,
0086     RTEMS_MAXIMUM_PRIORITY - 1u,
0087     RTEMS_MINIMUM_STACK_SIZE,
0088     RTEMS_DEFAULT_MODES,
0089     RTEMS_DEFAULT_ATTRIBUTES,
0090     &Test_task_id
0091   );
0092   directive_failed( status, "rtems_task_create" );
0093
0094   status = rtems_task_start( Test_task_id, test_task1, 0 );
0095   directive_failed( status, "rtems_task_start" );
0096 }
0097
0098 rtems_task test_task(
0099   rtems_task_argument argument
0100 )
0101 {
0102   rtems_status_code   status;
0103   uint32_t            index;
0104   rtems_task_priority old_priority;
0105   rtems_time_of_day   time;
0106   rtems_mode          old_mode;
0107   rtems_mode          desired_mode;
0108
0109   benchmark_timer_initialize();
0110     for ( index=1 ; index <= OPERATION_COUNT ; index++ )
0111       (void) benchmark_timer_empty_function();
0112   overhead = benchmark_timer_read();
0113
0114   benchmark_timer_initialize();
0115     for ( index=1 ; index <= OPERATION_COUNT ; index++ )
0116       (void) rtems_task_set_priority(
0117                Test_task_id,
0118                RTEMS_CURRENT_PRIORITY,
0119                &old_priority
0120              );
0121   end_time = benchmark_timer_read();
0122
0123   put_time(
0124     "rtems_task_set_priority: obtain current priority",
0125     end_time,
0126     OPERATION_COUNT,
0127     overhead,
0128     0
0129   );
0130
0131   benchmark_timer_initialize();
0132     for ( index=1 ; index <= OPERATION_COUNT ; index++ )
0133       (void) rtems_task_set_priority(
0134         Test_task_id,
0135         RTEMS_MAXIMUM_PRIORITY - 2u,
0136         &old_priority
0137       );
0138
0139   end_time = benchmark_timer_read();
0140
0141   put_time(
0142     "rtems_task_set_priority: returns to caller",
0143     end_time,
0144     OPERATION_COUNT,
0145     overhead,
0146     0
0147   );
0148
0149   benchmark_timer_initialize();
0150     for ( index=1 ; index <= OPERATION_COUNT ; index++ )
0151       (void) rtems_task_mode(
0152         RTEMS_CURRENT_MODE,
0153         RTEMS_CURRENT_MODE,
0154         &old_mode
0155       );
0156   end_time = benchmark_timer_read();
0157
0158   put_time(
0159     "rtems_task_mode: obtain current mode",
0160     end_time,
0161     OPERATION_COUNT,
0162     overhead,
0163     0
0164   );
0165
0166   desired_mode = old_mode;
0167
0168   benchmark_timer_initialize();
0169     for ( index=1 ; index <= OPERATION_COUNT ; index++ ) {
0170       (void) rtems_task_mode(
0171         RTEMS_TIMESLICE_MASK,
0172         desired_mode,
0173         &old_mode
0174       );
0175       (void) rtems_task_mode(
0176         RTEMS_TIMESLICE_MASK,
0177         desired_mode,
0178         &old_mode
0179       );
0180     }
0181   end_time = benchmark_timer_read();
0182
0183   put_time(
0184     "rtems_task_mode: no reschedule",
0185     end_time,
0186     OPERATION_COUNT * 2,
0187     overhead,
0188     0
0189   );
0190
0191   benchmark_timer_initialize();                 /* must be one host */
0192     (void) rtems_task_mode( RTEMS_NO_ASR, RTEMS_ASR_MASK, &old_mode );
0193   end_time = benchmark_timer_read();
0194
0195   put_time(
0196     "rtems_task_mode: reschedule returns to caller",
0197     end_time,
0198     1,
0199     0,
0200     0
0201   );
0202
0203   status = rtems_task_mode( RTEMS_NO_PREEMPT, RTEMS_PREEMPT_MASK, &old_mode );
0204   directive_failed( status, "rtems_task_mode" );
0205
0206   status = rtems_task_set_priority( Test_task_id, 1, &old_priority );
0207   directive_failed( status, "rtems_task_set_priority" );
0208
0209   /* preempted by test_task1 */
0210   benchmark_timer_initialize();
0211     (void) rtems_task_mode( RTEMS_PREEMPT, RTEMS_PREEMPT_MASK, &old_mode );
0212
0213   build_time( &time, 1, 1, 1988, 0, 0, 0, 0 );
0214
0215   benchmark_timer_initialize();
0216     for ( index=1 ; index <= OPERATION_COUNT ; index++ )
0217       (void) rtems_clock_set( &time );
0218   end_time = benchmark_timer_read();
0219
0220   put_time(
0221     "rtems_clock_set: only case",
0222     end_time,
0223     OPERATION_COUNT,
0224     overhead,
0225     0
0226   );
0227
0228   benchmark_timer_initialize();
0229     for ( index=1 ; index <= OPERATION_COUNT ; index++ )
0230       (void) rtems_clock_get_tod( &time );
0231   end_time = benchmark_timer_read();
0232
0233   put_time(
0234     "rtems_clock_get_tod: only case",
0235     end_time,
0236     OPERATION_COUNT,
0237     overhead,
0238     0
0239   );
0240
0241   TEST_END();
0242   rtems_test_exit( 0 );
0243 }
0244
0245 rtems_task test_task1(
0246   rtems_task_argument argument
0247 )
0248 {
0249   end_time = benchmark_timer_read();
0250
0251   put_time(
0252     "rtems_task_mode: reschedule -- preempts caller",
0253     end_time,
0254     1,
0255     0,
0256     0
0257   );
0258
0259   (void) rtems_task_suspend( RTEMS_SELF );
0260 }