273 lines
		
	
	
		
			7.0 KiB
		
	
	
	
		
			C
		
	
	
	
			
		
		
	
	
			273 lines
		
	
	
		
			7.0 KiB
		
	
	
	
		
			C
		
	
	
	
/* ----------------------------------------------------------------------
 | 
						|
 * Project:      CMSIS DSP Library
 | 
						|
 * Title:        arm_mat_trans_q15.c
 | 
						|
 * Description:  Q15 matrix transpose
 | 
						|
 *
 | 
						|
 * $Date:        27. January 2017
 | 
						|
 * $Revision:    V.1.5.1
 | 
						|
 *
 | 
						|
 * Target Processor: Cortex-M cores
 | 
						|
 * -------------------------------------------------------------------- */
 | 
						|
/*
 | 
						|
 * Copyright (C) 2010-2017 ARM Limited or its affiliates. All rights reserved.
 | 
						|
 *
 | 
						|
 * SPDX-License-Identifier: Apache-2.0
 | 
						|
 *
 | 
						|
 * Licensed under the Apache License, Version 2.0 (the License); you may
 | 
						|
 * not use this file except in compliance with the License.
 | 
						|
 * You may obtain a copy of the License at
 | 
						|
 *
 | 
						|
 * www.apache.org/licenses/LICENSE-2.0
 | 
						|
 *
 | 
						|
 * Unless required by applicable law or agreed to in writing, software
 | 
						|
 * distributed under the License is distributed on an AS IS BASIS, WITHOUT
 | 
						|
 * WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 | 
						|
 * See the License for the specific language governing permissions and
 | 
						|
 * limitations under the License.
 | 
						|
 */
 | 
						|
 | 
						|
#include "arm_math.h"
 | 
						|
 | 
						|
/**
 | 
						|
 * @ingroup groupMatrix
 | 
						|
 */
 | 
						|
 | 
						|
/**
 | 
						|
 * @addtogroup MatrixTrans
 | 
						|
 * @{
 | 
						|
 */
 | 
						|
 | 
						|
/*
 | 
						|
 * @brief Q15 matrix transpose.
 | 
						|
 * @param[in]  *pSrc points to the input matrix
 | 
						|
 * @param[out] *pDst points to the output matrix
 | 
						|
 * @return 	The function returns either  <code>ARM_MATH_SIZE_MISMATCH</code>
 | 
						|
 * or <code>ARM_MATH_SUCCESS</code> based on the outcome of size checking.
 | 
						|
 */
 | 
						|
 | 
						|
arm_status arm_mat_trans_q15(
 | 
						|
  const arm_matrix_instance_q15 * pSrc,
 | 
						|
  arm_matrix_instance_q15 * pDst)
 | 
						|
{
 | 
						|
  q15_t *pSrcA = pSrc->pData;                    /* input data matrix pointer */
 | 
						|
  q15_t *pOut = pDst->pData;                     /* output data matrix pointer */
 | 
						|
  uint16_t nRows = pSrc->numRows;                /* number of nRows */
 | 
						|
  uint16_t nColumns = pSrc->numCols;             /* number of nColumns */
 | 
						|
  uint16_t col, row = nRows, i = 0U;             /* row and column loop counters */
 | 
						|
  arm_status status;                             /* status of matrix transpose */
 | 
						|
 | 
						|
#if defined (ARM_MATH_DSP)
 | 
						|
 | 
						|
  /* Run the below code for Cortex-M4 and Cortex-M3 */
 | 
						|
#ifndef UNALIGNED_SUPPORT_DISABLE
 | 
						|
 | 
						|
  q31_t in;                                      /* variable to hold temporary output  */
 | 
						|
 | 
						|
#else
 | 
						|
 | 
						|
  q15_t in;
 | 
						|
 | 
						|
#endif	/*	#ifndef UNALIGNED_SUPPORT_DISABLE	*/
 | 
						|
 | 
						|
#ifdef ARM_MATH_MATRIX_CHECK
 | 
						|
 | 
						|
 | 
						|
  /* Check for matrix mismatch condition */
 | 
						|
  if ((pSrc->numRows != pDst->numCols) || (pSrc->numCols != pDst->numRows))
 | 
						|
  {
 | 
						|
    /* Set status as ARM_MATH_SIZE_MISMATCH */
 | 
						|
    status = ARM_MATH_SIZE_MISMATCH;
 | 
						|
  }
 | 
						|
  else
 | 
						|
#endif /*      #ifdef ARM_MATH_MATRIX_CHECK    */
 | 
						|
 | 
						|
  {
 | 
						|
    /* Matrix transpose by exchanging the rows with columns */
 | 
						|
    /* row loop     */
 | 
						|
    do
 | 
						|
    {
 | 
						|
 | 
						|
      /* Apply loop unrolling and exchange the columns with row elements */
 | 
						|
      col = nColumns >> 2U;
 | 
						|
 | 
						|
      /* The pointer pOut is set to starting address of the column being processed */
 | 
						|
      pOut = pDst->pData + i;
 | 
						|
 | 
						|
      /* First part of the processing with loop unrolling.  Compute 4 outputs at a time.
 | 
						|
       ** a second loop below computes the remaining 1 to 3 samples. */
 | 
						|
      while (col > 0U)
 | 
						|
      {
 | 
						|
#ifndef UNALIGNED_SUPPORT_DISABLE
 | 
						|
 | 
						|
        /* Read two elements from the row */
 | 
						|
        in = *__SIMD32(pSrcA)++;
 | 
						|
 | 
						|
        /* Unpack and store one element in the destination */
 | 
						|
#ifndef ARM_MATH_BIG_ENDIAN
 | 
						|
 | 
						|
        *pOut = (q15_t) in;
 | 
						|
 | 
						|
#else
 | 
						|
 | 
						|
        *pOut = (q15_t) ((in & (q31_t) 0xffff0000) >> 16);
 | 
						|
 | 
						|
#endif /*    #ifndef ARM_MATH_BIG_ENDIAN    */
 | 
						|
 | 
						|
        /* Update the pointer pOut to point to the next row of the transposed matrix */
 | 
						|
        pOut += nRows;
 | 
						|
 | 
						|
        /* Unpack and store the second element in the destination */
 | 
						|
 | 
						|
#ifndef ARM_MATH_BIG_ENDIAN
 | 
						|
 | 
						|
        *pOut = (q15_t) ((in & (q31_t) 0xffff0000) >> 16);
 | 
						|
 | 
						|
#else
 | 
						|
 | 
						|
        *pOut = (q15_t) in;
 | 
						|
 | 
						|
#endif /*    #ifndef ARM_MATH_BIG_ENDIAN    */
 | 
						|
 | 
						|
        /* Update the pointer pOut to point to the next row of the transposed matrix */
 | 
						|
        pOut += nRows;
 | 
						|
 | 
						|
        /* Read two elements from the row */
 | 
						|
#ifndef ARM_MATH_BIG_ENDIAN
 | 
						|
 | 
						|
        in = *__SIMD32(pSrcA)++;
 | 
						|
 | 
						|
#else
 | 
						|
 | 
						|
        in = *__SIMD32(pSrcA)++;
 | 
						|
 | 
						|
#endif /*    #ifndef ARM_MATH_BIG_ENDIAN    */
 | 
						|
 | 
						|
        /* Unpack and store one element in the destination */
 | 
						|
#ifndef ARM_MATH_BIG_ENDIAN
 | 
						|
 | 
						|
        *pOut = (q15_t) in;
 | 
						|
 | 
						|
#else
 | 
						|
 | 
						|
        *pOut = (q15_t) ((in & (q31_t) 0xffff0000) >> 16);
 | 
						|
 | 
						|
#endif /*    #ifndef ARM_MATH_BIG_ENDIAN    */
 | 
						|
 | 
						|
        /* Update the pointer pOut to point to the next row of the transposed matrix */
 | 
						|
        pOut += nRows;
 | 
						|
 | 
						|
        /* Unpack and store the second element in the destination */
 | 
						|
#ifndef ARM_MATH_BIG_ENDIAN
 | 
						|
 | 
						|
        *pOut = (q15_t) ((in & (q31_t) 0xffff0000) >> 16);
 | 
						|
 | 
						|
#else
 | 
						|
 | 
						|
        *pOut = (q15_t) in;
 | 
						|
 | 
						|
#endif /*    #ifndef ARM_MATH_BIG_ENDIAN    */
 | 
						|
 | 
						|
#else
 | 
						|
        /* Read one element from the row */
 | 
						|
        in = *pSrcA++;
 | 
						|
 | 
						|
        /* Store one element in the destination */
 | 
						|
        *pOut = in;
 | 
						|
 | 
						|
        /* Update the pointer px to point to the next row of the transposed matrix */
 | 
						|
        pOut += nRows;
 | 
						|
 | 
						|
        /* Read one element from the row */
 | 
						|
        in = *pSrcA++;
 | 
						|
 | 
						|
        /* Store one element in the destination */
 | 
						|
        *pOut = in;
 | 
						|
 | 
						|
        /* Update the pointer px to point to the next row of the transposed matrix */
 | 
						|
        pOut += nRows;
 | 
						|
 | 
						|
        /* Read one element from the row */
 | 
						|
        in = *pSrcA++;
 | 
						|
 | 
						|
        /* Store one element in the destination */
 | 
						|
        *pOut = in;
 | 
						|
 | 
						|
        /* Update the pointer px to point to the next row of the transposed matrix */
 | 
						|
        pOut += nRows;
 | 
						|
 | 
						|
        /* Read one element from the row */
 | 
						|
        in = *pSrcA++;
 | 
						|
 | 
						|
        /* Store one element in the destination */
 | 
						|
        *pOut = in;
 | 
						|
 | 
						|
#endif	/*	#ifndef UNALIGNED_SUPPORT_DISABLE	*/
 | 
						|
 | 
						|
        /* Update the pointer pOut to point to the next row of the transposed matrix */
 | 
						|
        pOut += nRows;
 | 
						|
 | 
						|
        /* Decrement the column loop counter */
 | 
						|
        col--;
 | 
						|
      }
 | 
						|
 | 
						|
      /* Perform matrix transpose for last 3 samples here. */
 | 
						|
      col = nColumns % 0x4U;
 | 
						|
 | 
						|
#else
 | 
						|
 | 
						|
  /* Run the below code for Cortex-M0 */
 | 
						|
 | 
						|
#ifdef ARM_MATH_MATRIX_CHECK
 | 
						|
 | 
						|
  /* Check for matrix mismatch condition */
 | 
						|
  if ((pSrc->numRows != pDst->numCols) || (pSrc->numCols != pDst->numRows))
 | 
						|
  {
 | 
						|
    /* Set status as ARM_MATH_SIZE_MISMATCH */
 | 
						|
    status = ARM_MATH_SIZE_MISMATCH;
 | 
						|
  }
 | 
						|
  else
 | 
						|
#endif /*    #ifdef ARM_MATH_MATRIX_CHECK    */
 | 
						|
 | 
						|
  {
 | 
						|
    /* Matrix transpose by exchanging the rows with columns */
 | 
						|
    /* row loop     */
 | 
						|
    do
 | 
						|
    {
 | 
						|
      /* The pointer pOut is set to starting address of the column being processed */
 | 
						|
      pOut = pDst->pData + i;
 | 
						|
 | 
						|
      /* Initialize column loop counter */
 | 
						|
      col = nColumns;
 | 
						|
 | 
						|
#endif /* #if defined (ARM_MATH_DSP) */
 | 
						|
 | 
						|
      while (col > 0U)
 | 
						|
      {
 | 
						|
        /* Read and store the input element in the destination */
 | 
						|
        *pOut = *pSrcA++;
 | 
						|
 | 
						|
        /* Update the pointer pOut to point to the next row of the transposed matrix */
 | 
						|
        pOut += nRows;
 | 
						|
 | 
						|
        /* Decrement the column loop counter */
 | 
						|
        col--;
 | 
						|
      }
 | 
						|
 | 
						|
      i++;
 | 
						|
 | 
						|
      /* Decrement the row loop counter */
 | 
						|
      row--;
 | 
						|
 | 
						|
    } while (row > 0U);
 | 
						|
 | 
						|
    /* set status as ARM_MATH_SUCCESS */
 | 
						|
    status = ARM_MATH_SUCCESS;
 | 
						|
  }
 | 
						|
  /* Return to application */
 | 
						|
  return (status);
 | 
						|
}
 | 
						|
 | 
						|
/**
 | 
						|
 * @} end of MatrixTrans group
 | 
						|
 */
 |