Method getMatrix

src/core/dataMemoryLevel.cpp:1651–1738

TODO: add an optimized 'simple' level for high performance and low overhead wave handling no tmeta, very simple access functions etc. tmeta if accessed will be emulated?

//  no tmeta, very simple access functions etc.
//  tmeta if accessed will be emulated?
cMatrix * cDataMemoryLevel::getMatrix(long vIdx, long vIdxEnd, int special, int rdId, int *result)
{
  if (!lcfg.finalised) { COMP_ERR("cannot get matrix from non-finalised level! call finalise() first!"); }

  long vIdxold=vIdx;
//  long vIdxEndO = vIdxEnd;
  if (vIdx < 0) vIdx = 0;
  int padEnd = 0; // will be filled with the number of samples at the end of the matrix to be padded

//****** acquire read lock.... *******
  smileMutexLock(RWstatMtx);
  // check for urgent write request:
  while (writeReqFlag) { // wait until write request has been served!
    smileMutexUnlock(RWstatMtx);
    smileYield();
    smileMutexLock(RWstatMtx);
  }
  if (nCurRdr == 0) {
    smileMutexLock(RWmtx); // no other readers, so lock mutex to exclude writes...
  }
  nCurRdr++;
  smileMutexUnlock(RWstatMtx);
//****************

  smileMutexLock(RWptrMtx);
  // TODO : if EOI state, then allow vIdxEnd out of range! pad frame...
  long rIdx = validateIdxRangeR(vIdxold, &vIdx, vIdxEnd, special, rdId, 0, &padEnd);
  smileMutexUnlock(RWptrMtx);

  cMatrix *mat=NULL;
  if (rIdx>=0) {
    if (vIdxold < 0) mat = new cMatrix(lcfg.N,vIdxEnd-vIdxold);
    else mat = new cMatrix(lcfg.N,vIdxEnd-vIdx);
    SMILE_DBG(4,"creating new data matrix (%s)  vIdxold=%i , vIdx=%i, vIdxEnd=%i, lcfg.N=%i",this->getName(),vIdxold,vIdx,vIdxEnd,lcfg.N)
    if (mat == NULL) OUT_OF_MEMORY;
    long i,j;
    if (vIdxold < 0) {
      long i0 = 0-vIdxold;
      for (i=0; i<i0; i++) {
        if (special == DMEM_PAD_ZERO) for (j=0; j<mat->N; j++) mat->data[i*lcfg.N+j] = 0.0; // pad with value
        else frameRd((rIdx)%lcfg.nT, mat->data + (i*lcfg.N)); // fill with first frame
        getTimeMeta((rIdx)%lcfg.nT, vIdx + i, mat->tmeta + i);
      }
      for (i=0; i<vIdxEnd; i++) { 
        frameRd((rIdx+i)%lcfg.nT, mat->data + (i+i0)*lcfg.N);
        getTimeMeta((rIdx+i)%lcfg.nT, vIdx + i + i0, mat->tmeta + i +i0);
      }
    } else if (padEnd>0) {
      for (i=0; i<(vIdxEnd-vIdx)-padEnd; i++) {
        frameRd((rIdx+i)%lcfg.nT, mat->data + (i*lcfg.N));
        getTimeMeta((rIdx+i)%lcfg.nT, vIdx + i, mat->tmeta + i);
      }
      long i0 = i-1;
      for (; i<(vIdxEnd-vIdx); i++) {
        if (special == DMEM_PAD_ZERO) for (j=0; j<mat->N; j++) mat->data[i*lcfg.N+j] = 0.0; // pad with value
        else frameRd((rIdx+i0)%lcfg.nT, mat->data + (i*lcfg.N)); // fill with last frame
        getTimeMeta((rIdx+i0)%lcfg.nT, vIdx + i, mat->tmeta + i);
      }