Back to home page

LXR

 
 

    


File indexing completed on 2025-05-11 08:24:45

0001 /* SPDX-License-Identifier: BSD-2-Clause */
0002 
0003 /*  Task_1
0004  *
0005  *  This task verifies that the dual ported RAM directives work
0006  *  correctly by converting external addresses to internal addresses and
0007  *  internal addresses to external addresses.
0008  *
0009  *  Input parameters:
0010  *    argument - task argument
0011  *
0012  *  Output parameters:  NONE
0013  *
0014  *  COPYRIGHT (c) 1989-1999.
0015  *  On-Line Applications Research Corporation (OAR).
0016  *
0017  * Redistribution and use in source and binary forms, with or without
0018  * modification, are permitted provided that the following conditions
0019  * are met:
0020  * 1. Redistributions of source code must retain the above copyright
0021  *    notice, this list of conditions and the following disclaimer.
0022  * 2. Redistributions in binary form must reproduce the above copyright
0023  *    notice, this list of conditions and the following disclaimer in the
0024  *    documentation and/or other materials provided with the distribution.
0025  *
0026  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
0027  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
0028  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
0029  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
0030  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
0031  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
0032  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
0033  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
0034  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
0035  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
0036  * POSSIBILITY OF SUCH DAMAGE.
0037  */
0038 
0039 #ifdef HAVE_CONFIG_H
0040 #include "config.h"
0041 #endif
0042 
0043 #include "system.h"
0044 
0045 rtems_task Task_1(
0046   rtems_task_argument argument
0047 )
0048 {
0049   rtems_id           dpid;
0050   void              *to_be_converted;
0051   void              *converted;
0052   rtems_status_code  status;
0053 
0054   status = rtems_port_ident( Port_name[ 1 ], &dpid );
0055   directive_failed( status, "rtems_port_ident" );
0056   printf( "TA1 - rtems_port_ident - 0x%08" PRIxrtems_id "\n", dpid );
0057 
0058   to_be_converted = &External_port_area[ 0xe ];
0059   status = rtems_port_external_to_internal(
0060     Port_id[ 1 ],
0061     to_be_converted,
0062     &converted
0063   );
0064   directive_failed( status, "rtems_port_external_to_internal" );
0065   printf(
0066     "TA1 - rtems_port_external_to_internal - %p => %p\n",
0067     to_be_converted,
0068     converted
0069   );
0070 
0071   to_be_converted = &Internal_port_area[ 0xe ];
0072   status = rtems_port_internal_to_external(
0073     Port_id[ 1 ],
0074     to_be_converted,
0075     &converted
0076   );
0077   directive_failed( status, "rtems_port_internal_to_external" );
0078   printf(
0079     "TA1 - rtems_port_internal_to_external - %p => %p\n",
0080     to_be_converted,
0081     converted
0082   );
0083 
0084   to_be_converted = &Above_port_area[ 0xe ];
0085   status = rtems_port_external_to_internal(
0086     Port_id[ 1 ],
0087     to_be_converted,
0088     &converted
0089   );
0090   directive_failed( status, "rtems_port_external_to_internal" );
0091   printf(
0092     "TA1 - rtems_port_external_to_internal - %p => %p\n",
0093     to_be_converted,
0094     converted
0095   );
0096 
0097   to_be_converted = &Below_port_area[ 0xe ];
0098   status = rtems_port_internal_to_external(
0099     Port_id[ 1 ],
0100     to_be_converted,
0101     &converted
0102   );
0103   directive_failed( status, "rtems_port_internal_to_external" );
0104   printf(
0105     "TA1 - rtems_port_internal_to_external - %p => %p\n",
0106     to_be_converted,
0107     converted
0108   );
0109 
0110   status = rtems_port_delete( Port_id[ 1 ] );
0111   directive_failed( status, "rtems_port_delete" );
0112   puts( "TA1 - rtems_port_delete - DP1" );
0113 
0114   TEST_END();
0115   rtems_test_exit( 0 );
0116 }