/* Task_2
|
/* Task_2
|
*
|
*
|
* This routine serves as a test task. Multiple tasks are required to
|
* This routine serves as a test task. Multiple tasks are required to
|
* verify all message manager capabilities.
|
* verify all message manager capabilities.
|
*
|
*
|
* Input parameters:
|
* Input parameters:
|
* argument - task argument
|
* argument - task argument
|
*
|
*
|
* Output parameters: NONE
|
* Output parameters: NONE
|
*
|
*
|
* COPYRIGHT (c) 1989-1999.
|
* COPYRIGHT (c) 1989-1999.
|
* On-Line Applications Research Corporation (OAR).
|
* On-Line Applications Research Corporation (OAR).
|
*
|
*
|
* The license and distribution terms for this file may be
|
* The license and distribution terms for this file may be
|
* found in the file LICENSE in this distribution or at
|
* found in the file LICENSE in this distribution or at
|
* http://www.OARcorp.com/rtems/license.html.
|
* http://www.OARcorp.com/rtems/license.html.
|
*
|
*
|
* $Id: task2.c,v 1.2 2001-09-27 12:02:32 chris Exp $
|
* $Id: task2.c,v 1.2 2001-09-27 12:02:32 chris Exp $
|
*/
|
*/
|
|
|
#include "system.h"
|
#include "system.h"
|
|
|
#define MESSAGE_SIZE (sizeof(long) * 4)
|
#define MESSAGE_SIZE (sizeof(long) * 4)
|
|
|
rtems_task Task_2(
|
rtems_task Task_2(
|
rtems_task_argument argument
|
rtems_task_argument argument
|
)
|
)
|
{
|
{
|
long buffer[ 4 ];
|
long buffer[ 4 ];
|
rtems_unsigned32 size;
|
rtems_unsigned32 size;
|
rtems_task_priority previous_priority;
|
rtems_task_priority previous_priority;
|
rtems_status_code status;
|
rtems_status_code status;
|
|
|
puts(
|
puts(
|
"TA2 - rtems_message_queue_receive - receive from queue 1 - RTEMS_NO_WAIT"
|
"TA2 - rtems_message_queue_receive - receive from queue 1 - RTEMS_NO_WAIT"
|
);
|
);
|
status = rtems_message_queue_receive(
|
status = rtems_message_queue_receive(
|
Queue_id[ 1 ],
|
Queue_id[ 1 ],
|
buffer,
|
buffer,
|
&size,
|
&size,
|
RTEMS_NO_WAIT,
|
RTEMS_NO_WAIT,
|
RTEMS_NO_TIMEOUT
|
RTEMS_NO_TIMEOUT
|
);
|
);
|
directive_failed( status, "rtems_message_queue_receive" );
|
directive_failed( status, "rtems_message_queue_receive" );
|
puts_nocr( "TA2 - buffer received: " );
|
puts_nocr( "TA2 - buffer received: " );
|
Put_buffer( buffer );
|
Put_buffer( buffer );
|
new_line;
|
new_line;
|
|
|
puts(
|
puts(
|
"TA2 - rtems_message_queue_receive - receive from queue 1 - "
|
"TA2 - rtems_message_queue_receive - receive from queue 1 - "
|
"RTEMS_WAIT FOREVER"
|
"RTEMS_WAIT FOREVER"
|
);
|
);
|
status = rtems_message_queue_receive(
|
status = rtems_message_queue_receive(
|
Queue_id[ 1 ],
|
Queue_id[ 1 ],
|
buffer,
|
buffer,
|
&size,
|
&size,
|
RTEMS_DEFAULT_OPTIONS,
|
RTEMS_DEFAULT_OPTIONS,
|
RTEMS_NO_TIMEOUT
|
RTEMS_NO_TIMEOUT
|
);
|
);
|
directive_failed( status, "rtems_message_queue_receive" );
|
directive_failed( status, "rtems_message_queue_receive" );
|
puts_nocr( "TA2 - buffer received: " );
|
puts_nocr( "TA2 - buffer received: " );
|
Put_buffer( buffer );
|
Put_buffer( buffer );
|
new_line;
|
new_line;
|
|
|
puts(
|
puts(
|
"TA2 - rtems_message_queue_receive - receive from queue 1 - "
|
"TA2 - rtems_message_queue_receive - receive from queue 1 - "
|
"RTEMS_WAIT FOREVER"
|
"RTEMS_WAIT FOREVER"
|
);
|
);
|
status = rtems_message_queue_receive(
|
status = rtems_message_queue_receive(
|
Queue_id[ 1 ],
|
Queue_id[ 1 ],
|
buffer,
|
buffer,
|
&size,
|
&size,
|
RTEMS_DEFAULT_OPTIONS,
|
RTEMS_DEFAULT_OPTIONS,
|
RTEMS_NO_TIMEOUT
|
RTEMS_NO_TIMEOUT
|
);
|
);
|
directive_failed( status, "rtems_message_queue_receive" );
|
directive_failed( status, "rtems_message_queue_receive" );
|
puts_nocr( "TA2 - buffer received: " );
|
puts_nocr( "TA2 - buffer received: " );
|
Put_buffer( buffer );
|
Put_buffer( buffer );
|
new_line;
|
new_line;
|
|
|
puts( "TA2 - rtems_task_set_priority - make self highest priority task" );
|
puts( "TA2 - rtems_task_set_priority - make self highest priority task" );
|
status = rtems_task_set_priority( RTEMS_SELF, 3, &previous_priority );
|
status = rtems_task_set_priority( RTEMS_SELF, 3, &previous_priority );
|
directive_failed( status, "rtems_task_set_priority" );
|
directive_failed( status, "rtems_task_set_priority" );
|
|
|
puts(
|
puts(
|
"TA2 - rtems_message_queue_receive - receive from queue 2 - "
|
"TA2 - rtems_message_queue_receive - receive from queue 2 - "
|
"RTEMS_WAIT FOREVER"
|
"RTEMS_WAIT FOREVER"
|
);
|
);
|
status = rtems_message_queue_receive(
|
status = rtems_message_queue_receive(
|
Queue_id[ 2 ],
|
Queue_id[ 2 ],
|
buffer,
|
buffer,
|
&size,
|
&size,
|
RTEMS_DEFAULT_OPTIONS,
|
RTEMS_DEFAULT_OPTIONS,
|
RTEMS_NO_TIMEOUT
|
RTEMS_NO_TIMEOUT
|
);
|
);
|
directive_failed( status, "rtems_message_queue_receive" );
|
directive_failed( status, "rtems_message_queue_receive" );
|
puts_nocr( "TA2 - buffer received: " );
|
puts_nocr( "TA2 - buffer received: " );
|
Put_buffer( buffer );
|
Put_buffer( buffer );
|
new_line;
|
new_line;
|
|
|
Fill_buffer( "BUFFER 2 TO Q 2", (long *)buffer );
|
Fill_buffer( "BUFFER 2 TO Q 2", (long *)buffer );
|
puts( "TA2 - rtems_message_queue_send - BUFFER 2 TO Q 2" );
|
puts( "TA2 - rtems_message_queue_send - BUFFER 2 TO Q 2" );
|
directive_failed( status, "rtems_message_queue_send" );
|
directive_failed( status, "rtems_message_queue_send" );
|
|
|
status = rtems_message_queue_send( Queue_id[ 2 ], buffer, MESSAGE_SIZE );
|
status = rtems_message_queue_send( Queue_id[ 2 ], buffer, MESSAGE_SIZE );
|
directive_failed( status, "rtems_message_queue_send" );
|
directive_failed( status, "rtems_message_queue_send" );
|
|
|
puts(
|
puts(
|
"TA2 - rtems_message_queue_receive - receive from queue 1 - "
|
"TA2 - rtems_message_queue_receive - receive from queue 1 - "
|
"10 second timeout"
|
"10 second timeout"
|
);
|
);
|
status = rtems_message_queue_receive(
|
status = rtems_message_queue_receive(
|
Queue_id[ 1 ],
|
Queue_id[ 1 ],
|
buffer,
|
buffer,
|
&size,
|
&size,
|
RTEMS_DEFAULT_OPTIONS,
|
RTEMS_DEFAULT_OPTIONS,
|
10 * TICKS_PER_SECOND
|
10 * TICKS_PER_SECOND
|
);
|
);
|
directive_failed( status, "rtems_message_queue_receive" );
|
directive_failed( status, "rtems_message_queue_receive" );
|
puts_nocr( "TA2 - buffer received: " );
|
puts_nocr( "TA2 - buffer received: " );
|
Put_buffer( buffer );
|
Put_buffer( buffer );
|
new_line;
|
new_line;
|
|
|
puts(
|
puts(
|
"TA2 - rtems_message_queue_receive - receive from queue 3 - "
|
"TA2 - rtems_message_queue_receive - receive from queue 3 - "
|
"RTEMS_WAIT FOREVER"
|
"RTEMS_WAIT FOREVER"
|
);
|
);
|
status = rtems_message_queue_receive(
|
status = rtems_message_queue_receive(
|
Queue_id[ 3 ],
|
Queue_id[ 3 ],
|
buffer,
|
buffer,
|
&size,
|
&size,
|
RTEMS_DEFAULT_OPTIONS,
|
RTEMS_DEFAULT_OPTIONS,
|
RTEMS_NO_TIMEOUT
|
RTEMS_NO_TIMEOUT
|
);
|
);
|
directive_failed( status, "rtems_message_queue_receive" );
|
directive_failed( status, "rtems_message_queue_receive" );
|
puts_nocr( "TA2 - buffer received: " );
|
puts_nocr( "TA2 - buffer received: " );
|
Put_buffer( buffer );
|
Put_buffer( buffer );
|
new_line;
|
new_line;
|
|
|
}
|
}
|
|
|