source: rtems/testsuites/mptests/mp09/sendmsg.c @ ced11f99

4.104.114.84.95
Last change on this file since ced11f99 was 3235ad9, checked in by Joel Sherrill <joel.sherrill@…>, on 08/23/95 at 19:30:23

Support for variable length names added to Object Handler. This supports
both fixed length "raw" names and strings from the API's point of view.

Both inline and macro implementations were tested.

  • Property mode set to 100644
File size: 1.7 KB
Line 
1/*  Send_messages
2 *
3 *  This routine sends a series of three messages.
4 *  an error condition.
5 *
6 *  Input parameters:  NONE
7 *
8 *  Output parameters:  NONE
9 *
10 *  COPYRIGHT (c) 1989, 1990, 1991, 1992, 1993, 1994.
11 *  On-Line Applications Research Corporation (OAR).
12 *  All rights assigned to U.S. Government, 1994.
13 *
14 *  This material may be reproduced by or for the U.S. Government pursuant
15 *  to the copyright license under the clause at DFARS 252.227-7013.  This
16 *  notice must appear in all copies of this file and its derivatives.
17 *
18 *  $Id$
19 */
20
21#include "system.h"
22
23void Send_messages()
24{
25  rtems_status_code status;
26  rtems_unsigned32  broadcast_count;
27
28  puts_nocr( "rtems_message_queue_send: " );
29  puts( buffer1 );
30
31  status = rtems_message_queue_send( Queue_id[ 1 ], (long (*)[4])buffer1, 16 );
32  directive_failed( status, "rtems_message_queue_send" );
33
34  puts( "Delaying for a second" );
35  status = rtems_task_wake_after( TICKS_PER_SECOND );
36  directive_failed( status, "rtems_task_wake_after" );
37
38  puts_nocr( "rtems_message_queue_urgent: " );
39  puts( buffer2 );
40  status = rtems_message_queue_urgent( Queue_id[ 1 ], (long (*)[4])buffer2, 16 );
41  directive_failed( status, "rtems_message_queue_urgent" );
42
43  puts( "Delaying for a second" );
44  status = rtems_task_wake_after( TICKS_PER_SECOND );
45  directive_failed( status, "rtems_task_wake_after" );
46
47  puts_nocr( "rtems_message_queue_broadcast: " );
48  puts( buffer3 );
49  status = rtems_message_queue_broadcast(
50    Queue_id[ 1 ],
51    (long (*)[4])buffer3,
52    16,
53    &broadcast_count
54  );
55  directive_failed( status, "rtems_message_queue_broadcast" );
56
57  puts( "Delaying for a second" );
58  status = rtems_task_wake_after( TICKS_PER_SECOND );
59  directive_failed( status, "rtems_task_wake_after" );
60}
Note: See TracBrowser for help on using the repository browser.