mptests/mp04/task1.c

0001 /* SPDX-License-Identifier: BSD-2-Clause */
0002
0003 /*  Test_task
0004  *
0005  *  This task tests the rtems_task_set_priority directive on a remote task.
0006  *
0007  *  Input parameters:
0008  *    argument - task argument
0009  *
0010  *  Output parameters:  NONE
0011  *
0012  *  COPYRIGHT (c) 1989-1999.
0013  *  On-Line Applications Research Corporation (OAR).
0014  *
0015  * Redistribution and use in source and binary forms, with or without
0016  * modification, are permitted provided that the following conditions
0017  * are met:
0018  * 1. Redistributions of source code must retain the above copyright
0019  *    notice, this list of conditions and the following disclaimer.
0020  * 2. Redistributions in binary form must reproduce the above copyright
0021  *    notice, this list of conditions and the following disclaimer in the
0022  *    documentation and/or other materials provided with the distribution.
0023  *
0024  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
0025  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
0026  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
0027  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
0028  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
0029  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
0030  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
0031  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
0032  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
0033  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
0034  * POSSIBILITY OF SUCH DAMAGE.
0035  */
0036
0037 #ifdef HAVE_CONFIG_H
0038 #include "config.h"
0039 #endif
0040
0041 #include "system.h"
0042 #include "tmacros.h"
0043
0044 rtems_task Test_task(
0045   rtems_task_argument argument
0046 )
0047 {
0048   rtems_id            tid;
0049   rtems_status_code   status;
0050   uint32_t      remote_node;
0051   rtems_id            remote_tid;
0052   rtems_task_priority previous_priority;
0053   rtems_task_priority previous_priority_1;
0054
0055   status = rtems_task_ident( RTEMS_WHO_AM_I, RTEMS_SEARCH_ALL_NODES, &tid );
0056   directive_failed( status, "rtems_task_ident" );
0057
0058   puts( "Getting TID of remote task" );
0059   remote_node = (rtems_object_get_local_node() == 1) ? 2 : 1;
0060   puts_nocr( "Remote task's name is : " );
0061   put_name( Task_name[ remote_node ], TRUE );
0062
0063   do {
0064       status = rtems_task_ident(
0065           Task_name[ remote_node ],
0066           RTEMS_SEARCH_ALL_NODES,
0067           &remote_tid
0068           );
0069   } while ( status != RTEMS_SUCCESSFUL );
0070
0071   directive_failed( status, "rtems_task_ident" );
0072
0073   status = rtems_task_set_priority(
0074     remote_tid,
0075     rtems_object_get_local_node(),
0076     &previous_priority
0077   );
0078   directive_failed( status, "rtems_task_set_priority" );
0079
0080   if ( previous_priority != remote_node ) {
0081     printf(
0082       "Remote priority (0x%" PRIxrtems_task_priority ") does not match remote node (0x%" PRIx32 ")!!!\n",
0083       previous_priority,
0084       remote_node
0085     );
0086     rtems_test_exit( 0xf0000 );
0087   }
0088
0089   do {
0090     status = rtems_task_set_priority(
0091       RTEMS_SELF,
0092       RTEMS_CURRENT_PRIORITY,
0093       &previous_priority_1
0094     );
0095     directive_failed( status, "rtems_task_set_priority" );
0096   } while ( previous_priority_1 != remote_node );
0097
0098   puts( "Local task priority has been set" );
0099
0100   puts( "*** END OF TEST 4 ***" );
0101   rtems_test_exit( 0 );
0102 }