shared/shmdr/shmdr-send.c

0001 /* SPDX-License-Identifier: BSD-2-Clause */
0002
0003 /**
0004  * @file
0005  */
0006
0007 /*
0008  *  COPYRIGHT (c) 1989-1999, 2016.
0009  *  On-Line Applications Research Corporation (OAR).
0010  *
0011  * Redistribution and use in source and binary forms, with or without
0012  * modification, are permitted provided that the following conditions
0013  * are met:
0014  * 1. Redistributions of source code must retain the above copyright
0015  *    notice, this list of conditions and the following disclaimer.
0016  * 2. Redistributions in binary form must reproduce the above copyright
0017  *    notice, this list of conditions and the following disclaimer in the
0018  *    documentation and/or other materials provided with the distribution.
0019  *
0020  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
0021  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
0022  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
0023  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
0024  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
0025  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
0026  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
0027  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
0028  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
0029  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
0030  * POSSIBILITY OF SUCH DAMAGE.
0031  */
0032
0033 #include <rtems.h>
0034 #include "shm_driver.h"
0035
0036 struct pkt_cpy {
0037   uint32_t   packet[MAX_PACKET_SIZE/4];
0038 };
0039
0040 /**
0041  * This routine is the shared memory driver locked queue write
0042  * MPCI driver routine.  This routine sends the specified packet
0043  * to the destination specified by "node".  A "node" value of
0044  * zero designates that this packet is to be broadcasted.
0045  *
0046  * @param node is the destination of this packet (0 = broadcast)
0047  * @param packet is the address of packet
0048  *
0049  * @return NONE
0050  */
0051 rtems_mpci_entry Shm_Send_packet(
0052   uint32_t   node,
0053   rtems_packet_prefix *packet
0054 )
0055 {
0056   Shm_Envelope_control *ecb, *tmp_ecb;
0057   uint32_t   nnum;
0058
0059   ecb = Shm_Packet_prefix_to_envelope_control_pointer( packet );
0060   if ( node ) {
0061     Shm_Build_preamble( ecb, node );
0062     Shm_Build_postamble( ecb );
0063     Shm_Append_to_receive_queue( node, ecb );
0064     (*Shm_Configuration->cause_intr)( node );
0065   }
0066   else {
0067     for( nnum = SHM_FIRST_NODE ; nnum <= SHM_MAXIMUM_NODES ; nnum++ )
0068       if ( rtems_object_get_local_node() != nnum ) {
0069         struct pkt_cpy *pkt;
0070
0071         tmp_ecb = Shm_Allocate_envelope();
0072         if ( !tmp_ecb )
0073           rtems_fatal_error_occurred( SHM_NO_FREE_PKTS );
0074         Shm_Build_preamble( tmp_ecb, nnum );
0075         pkt = (struct pkt_cpy *)tmp_ecb->packet;
0076         *pkt = *((struct pkt_cpy *)packet);
0077         Shm_Build_postamble( tmp_ecb );
0078         Shm_Append_to_receive_queue( nnum, tmp_ecb );
0079         (*Shm_Configuration->cause_intr)( nnum );
0080       }
0081     Shm_Free_envelope( ecb );
0082   }
0083 }