DSPLIB_qrd_inverse.cpp

Go to the documentation of this file.

/******************************************************************************
 *                                                                             *
 * module name       :DSPLIB                                                   *
 *                                                                             *
 * module descripton :Digital Signal Processing Library module for C7x+MMA   *
 *                                                                             *
 * Copyright (C) 2017-2018 Texas Instruments Incorporated - https://www.ti.com/ *
 * ALL RIGHTS RESERVED                                                         *
 *                                                                             *
 ******************************************************************************/
 
#include "DSPLIB_qrd_inverse_priv.h"
 
int32_t DSPLIB_qrd_inverse_getHandleSize(DSPLIB_qrdInvInitArgs *pKerInitArgs)
{
   int32_t privBufSize = sizeof(DSPLIB_qrd_inverse_PrivArgs);
 
   DSPLIB_DEBUGPRINTFN(0, "privBufSize: %d\n", privBufSize);
 
   return privBufSize;
}
 
DSPLIB_STATUS DSPLIB_qrd_inverse_init_checkParams(DSPLIB_kernelHandle          handle,
                                                  DSPLIB_bufParams2D_t        *bufParamsQ,
                                                  DSPLIB_bufParams2D_t        *bufParamsR,
                                                  DSPLIB_bufParams2D_t        *bufParamsInvA,
                                                  DSPLIB_bufParams2D_t        *bufParamsInvAFinal,
                                                  const DSPLIB_qrdInvInitArgs *pKerInitArgs)
{
   DSPLIB_DEBUGPRINTFN(0, "%s\n", "Entering Function");
 
   DSPLIB_STATUS status = DSPLIB_SUCCESS;
 
   if (handle == NULL) {
      status = DSPLIB_ERR_NULL_POINTER;
   }
 
   if (status == DSPLIB_SUCCESS) {
 
      /* Condition change */
      if (((bufParamsQ->data_type != DSPLIB_FLOAT32) && (bufParamsQ->data_type != DSPLIB_FLOAT64)) ||
          ((bufParamsR->data_type != DSPLIB_FLOAT32) && (bufParamsR->data_type != DSPLIB_FLOAT64))) {
         status = DSPLIB_ERR_INVALID_TYPE;
      }
      else if (bufParamsQ->data_type != bufParamsInvA->data_type || bufParamsR->data_type != bufParamsInvA->data_type) {
         status = DSPLIB_ERR_INVALID_TYPE;
      }
 
      else {
         /* Do nothing */
      }
   }
   if (status == DSPLIB_SUCCESS)
 
   {
      if ((bufParamsR->dim_x != bufParamsR->dim_y) || (bufParamsQ->dim_x != bufParamsQ->dim_y)) {
         status = DSPLIB_ERR_INVALID_DIMENSION;
      }
   }
 
   DSPLIB_DEBUGPRINTFN(0, "Exiting function with return status: %d\n", status);
 
   return status;
}
 
DSPLIB_STATUS
DSPLIB_qrd_inverse_exec_checkParams(DSPLIB_kernelHandle handle,
                                    void *restrict pQ,
                                    void *restrict pR,
                                    void *restrict pInvA,
                                    void *restrict pInvAScratch,
                                    void *restrict pScratch)
{
   DSPLIB_DEBUGPRINTFN(0, "%s\n", "Entering function");
 
   DSPLIB_STATUS status = DSPLIB_SUCCESS;
 
   if ((pQ == NULL) || (pR == NULL) || (pInvA == NULL) || (pInvAScratch == NULL) || (pScratch == NULL)) {
      status = DSPLIB_ERR_NULL_POINTER;
   }
   else {
      status = DSPLIB_SUCCESS;
   }
   DSPLIB_DEBUGPRINTFN(0, "Exiting function with return status: %d\n", status);
 
   return status;
}
 
DSPLIB_STATUS DSPLIB_qrd_inverse_init(DSPLIB_kernelHandle          handle,
                                      DSPLIB_bufParams2D_t        *bufParamsQ,
                                      DSPLIB_bufParams2D_t        *bufParamsR,
                                      DSPLIB_bufParams2D_t        *bufParamsInvA,
                                      DSPLIB_bufParams2D_t        *bufParamsInvAFinal,
                                      const DSPLIB_qrdInvInitArgs *pKerInitArgs)
{
   DSPLIB_DEBUGPRINTFN(0, "%s\n", "Entering function");
 
   DSPLIB_STATUS                status       = DSPLIB_SUCCESS;
   DSPLIB_qrd_inverse_PrivArgs *pKerPrivArgs = (DSPLIB_qrd_inverse_PrivArgs *) handle;
 
   pKerPrivArgs->widthR     = bufParamsR->dim_x;
   pKerPrivArgs->heightR    = bufParamsR->dim_y;
   pKerPrivArgs->strideQ    = bufParamsQ->stride_y;
   pKerPrivArgs->strideR    = bufParamsR->stride_y;
   pKerPrivArgs->strideInvA = bufParamsInvA->stride_y;
 
   DSPLIB_DEBUGPRINTFN(0, "pKerInitArgs->funcStyle: %d bufParamsOut->data_type: %d\n", pKerInitArgs->funcStyle,
                       bufParamsInvA->data_type);
 
   if (pKerInitArgs->funcStyle == DSPLIB_FUNCTION_NATC) {
      if ((bufParamsQ->data_type == DSPLIB_FLOAT32) || (bufParamsR->data_type == DSPLIB_FLOAT32)) {
         pKerPrivArgs->execute = DSPLIB_qrd_inverse_exec_cn<float>;
         status = DSPLIB_qrd_inverse_init_cn<float>(handle, bufParamsQ, bufParamsR, bufParamsInvA, bufParamsInvAFinal,
                                                    pKerInitArgs);
      }
      else if ((bufParamsQ->data_type == DSPLIB_FLOAT64) || (bufParamsR->data_type == DSPLIB_FLOAT64)) {
         pKerPrivArgs->execute = DSPLIB_qrd_inverse_exec_cn<double>;
         status = DSPLIB_qrd_inverse_init_cn<double>(handle, bufParamsQ, bufParamsR, bufParamsInvA, bufParamsInvAFinal,
                                                     pKerInitArgs);
      }
 
      else {
         status = DSPLIB_ERR_INVALID_TYPE;
      }
   }
   else {
      if ((bufParamsQ->data_type == DSPLIB_FLOAT32) || (bufParamsR->data_type == DSPLIB_FLOAT32)) {
         pKerPrivArgs->execute = DSPLIB_qrd_inverse_exec_ci<float>;
         status = DSPLIB_qrd_inverse_init_ci<float>(handle, bufParamsQ, bufParamsR, bufParamsInvA, bufParamsInvAFinal,
                                                    pKerInitArgs);
      }
      else if ((bufParamsQ->data_type == DSPLIB_FLOAT64) || (bufParamsR->data_type == DSPLIB_FLOAT64)) {
         pKerPrivArgs->execute = DSPLIB_qrd_inverse_exec_ci<double>;
         status = DSPLIB_qrd_inverse_init_ci<double>(handle, bufParamsQ, bufParamsR, bufParamsInvA, bufParamsInvAFinal,
                                                     pKerInitArgs);
      }
      else {
         status = DSPLIB_ERR_INVALID_TYPE;
      }
      DSPLIB_DEBUGPRINTFN(0, "Exiting function with return status: %d\n", status);
   }
   return status;
}
 
DSPLIB_STATUS
DSPLIB_qrd_inverse_exec(DSPLIB_kernelHandle handle,
                        void *restrict pQ,
                        void *restrict pR,
                        void *restrict pInvA,
                        void *restrict pInvAScratch,
                        void *restrict pScratch)
{
   DSPLIB_DEBUGPRINTFN(0, "%s\n", "Entering function");
 
   DSPLIB_STATUS status;
 
   DSPLIB_qrd_inverse_PrivArgs *pKerPrivArgs = (DSPLIB_qrd_inverse_PrivArgs *) handle;
 
   DSPLIB_DEBUGPRINTFN(0, "widthR: %d heightR: %d strideQ: %d strideR: %d strideInvA: %d\n", pKerPrivArgs->widthR,
                       pKerPrivArgs->heightR, pKerPrivArgs->strideQ, pKerPrivArgs->strideR, pKerPrivArgs->strideInvA);
 
   status = pKerPrivArgs->execute(handle, pQ, pR, pInvA, pInvAScratch, pScratch);
 
   DSPLIB_DEBUGPRINTFN(0, "Exiting function with return status: %d\n", status);
 
   return status;
}
/* ======================================================================== */
/*  End of file:  DSPLIB_qrd_inverse.cpp                                    */
/* ======================================================================== */