cml/libcm
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity
0d1824b9c3
libcm/app/cmSdb.c

1553 lines
38 KiB
C
Raw Blame History

#include "cmGlobal.h"
#include "cmFloatTypes.h"
#include "cmRpt.h"
#include "cmErr.h"
#include "cmCtx.h"
#include "cmMem.h"
#include "cmMallocDebug.h"
#include "cmLinkedHeap.h"
#include "cmLex.h"
#include "cmCsv.h"
#include "cmSdb.h"
#include "cmText.h"
#include "cmMath.h"
#include "cmTime.h"
#include "cmMidi.h"
#include "cmVectOpsTemplateMain.h"
#include "cmAudioFile.h"
#include "cmFileSys.h"
typedef enum
{
kUuidColIdx,
kBaseUuidColIdx,
kChIdxColIdx,
kObiColIdx,
kIbiColIdx,
kIeiColIdx,
kOeiColIdx,
kSrcColIdx,
kMidiColIdx,
kInstrColIdx,
kSrateColIdx,
kChCntColIdx,
kNotesColIdx,
kAfnColIdx,
kInvalidColIdx
} cmSdbColIdx_t;
struct cmSdb_str;
typedef struct cmSdbSeqBlk_str
{
cmSdbSeqEvent_t* eV;
unsigned cnt;
struct cmSdbSeqBlk_str* link;
} cmSdbSeqBlk_t;
typedef struct cmSdbSeq_str
{
struct cmSdb_str* p;
cmSdbSeqBlk_t* blocks;
cmSdbSeqBlk_t* ebp;
unsigned cnt; // total count of events in all blocks
unsigned chCnt; // max(chIdx)+1 of all events
double minDurSec; // min dur of all events
double maxDurSec; // max dur of all events
struct cmSdbSeq_str* link;
} cmSdbSeq_t;
typedef struct cmSdbRspBlk_str
{
unsigned* indexV; // indexV[ cmSdb_t.blkIdxAllocCnt ]
unsigned cnt; // count of indexes used
struct cmSdbRspBlk_str* link; // cmSdbRsp_t.blocks link
} cmSdbRspBlk_t;
typedef struct cmSdbRsp_str
{
struct cmSdb_str* p; //
cmSdbRspBlk_t* blocks; // first block ptr
cmSdbRspBlk_t* ebp; // end block ptr
unsigned cnt; // total count of indexes
struct cmSdbRsp_str* link; // cmSdb_t.responses link
} cmSdbRsp_t;
typedef struct cmSdb_str
{
cmCtx_t ctx;
cmLHeapH_t lhH;
cmCsvH_t csvH;
cmSdbEvent_t* eV;
unsigned eN;
cmChar_t* audioDir;
unsigned blkIdxAllocCnt;
unsigned blkEvtAllocCnt;
cmSdbRsp_t* responses;
cmSdbSeq_t* seqs;
} cmSdb_t;
cmSdbH_t cmSdbNullHandle = cmSTATIC_NULL_HANDLE;
cmSdbResponseH_t cmSdbResponseNullHandle = cmSTATIC_NULL_HANDLE;
cmSdbSeqH_t cmSdbSeqNullHandle = cmSTATIC_NULL_HANDLE;
cmSdb_t* _cmSdbHandleToPtr( cmSdbH_t h )
{
cmSdb_t* p = (cmSdb_t*)h.h;
assert( p != NULL );
return p;
}
void _cmSdbRspFree( cmSdbRsp_t* );
cmSdbRC_t _cmSdbSeqFree( cmSdbSeq_t* );
cmSdbRC_t _cmSdbDestroy( cmSdb_t* p )
{
cmSdbRC_t rc = kOkSdbRC;
if( cmCsvFinalize(&p->csvH) != kOkCsvRC )
rc = cmErrMsg(&p->ctx.err,kCsvFailSdbRC,"CSV file finalize failed.");
while( p->responses != NULL )
_cmSdbRspFree(p->responses);
while( p->seqs != NULL )
_cmSdbSeqFree(p->seqs);
cmLHeapDestroy(&p->lhH);
cmMemFree(p);
return rc;
}
cmSdbRC_t cmSdbCreate( cmCtx_t* ctx, cmSdbH_t* hp, const cmChar_t* csvFn, const cmChar_t* audioDir )
{
cmSdbRC_t rc;
if((rc = cmSdbDestroy(hp)) != kOkSdbRC )
return rc;
cmSdb_t* p = cmMemAllocZ(cmSdb_t,1);
p->ctx = *ctx;
p->blkIdxAllocCnt = 1024;
p->blkEvtAllocCnt = 1024;
cmErrSetup(&p->ctx.err,&ctx->rpt,"sdb");
if( cmLHeapIsValid( p->lhH = cmLHeapCreate(8192,ctx)) == false )
{
rc = cmErrMsg(&p->ctx.err,kLHeapFailSdbRC,"Linked heap mgr. allocation failed.");
goto errLabel;
}
hp->h = p;
if( csvFn != NULL )
if((rc = cmSdbLoad(*hp,csvFn,audioDir)) != kOkSdbRC )
goto errLabel;
errLabel:
if( rc != kOkSdbRC )
_cmSdbDestroy(p);
return rc;
}
cmSdbRC_t cmSdbDestroy( cmSdbH_t* hp )
{
cmSdbRC_t rc = kOkSdbRC;
if( hp==NULL || cmSdbIsValid(*hp)==false )
return rc;
cmSdb_t* p = _cmSdbHandleToPtr(*hp);
if((rc = _cmSdbDestroy(p)) != kOkSdbRC )
return rc;
hp->h = NULL;
return rc;
}
bool cmSdbIsValid( cmSdbH_t h )
{ return h.h != NULL; }
cmSdbRC_t _cmSdbSyntaxError(cmSdb_t* p, const cmChar_t* csvFn, unsigned rowIdx, unsigned colIdx, const cmChar_t* colLabel )
{
return cmErrMsg(&p->ctx.err,kSyntaxErrSdbRC,"A syntax error was found at row %i col %i (label:%s) in '%s'.",rowIdx+1,colIdx+1,cmStringNullGuard(colLabel),cmStringNullGuard(csvFn));
}
cmSdbRC_t cmSdbLoad( cmSdbH_t h, const cmChar_t* csvFn, const cmChar_t* audioDir )
{
cmSdbRC_t rc = kOkSdbRC;
unsigned i;
cmSdb_t* p = _cmSdbHandleToPtr(h);
if( cmCsvInitializeFromFile(&p->csvH, csvFn, 0, &p->ctx ) != kOkCsvRC )
{
rc = cmErrMsg(&p->ctx.err,kCsvFailSdbRC,"CSV file load fail on '%s'.",cmStringNullGuard(csvFn));
goto errLabel;
}
p->eN = cmCsvRowCount(p->csvH)-1;
// release all the memory held by the linked heap
cmLHeapClear(p->lhH,true);
p->eV = cmLhAllocZ(p->lhH,cmSdbEvent_t,p->eN);
for(i=0; rc==kOkSdbRC && i<p->eN; ++i)
{
unsigned rowIdx = i+1;
if((p->eV[i].uuid = cmCsvCellUInt(p->csvH,rowIdx,kUuidColIdx)) == UINT_MAX )
rc = _cmSdbSyntaxError(p,csvFn,rowIdx,kUuidColIdx,"uuid");
if((p->eV[i].baseUuid = cmCsvCellUInt(p->csvH,rowIdx,kBaseUuidColIdx)) == UINT_MAX )
rc = _cmSdbSyntaxError(p,csvFn,rowIdx,kBaseUuidColIdx,"baseUuid");
if((p->eV[i].chIdx = cmCsvCellUInt(p->csvH,rowIdx,kChIdxColIdx)) == UINT_MAX )
rc = _cmSdbSyntaxError(p,csvFn,rowIdx,kChIdxColIdx,"chIdx");
else
p->eV[i].chIdx -= 1; // CSV channel index is 1 based
if((p->eV[i].obi = cmCsvCellUInt(p->csvH,rowIdx,kObiColIdx)) == UINT_MAX )
rc = _cmSdbSyntaxError(p,csvFn,rowIdx,kObiColIdx,"obi");
else
p->eV[i].obi -= 1;
if((p->eV[i].ibi = cmCsvCellUInt(p->csvH,rowIdx,kIbiColIdx)) == UINT_MAX )
rc = _cmSdbSyntaxError(p,csvFn,rowIdx,kIbiColIdx,"ibi");
else
p->eV[i].ibi -= 1;
if((p->eV[i].iei = cmCsvCellUInt(p->csvH,rowIdx,kIeiColIdx)) == UINT_MAX )
rc = _cmSdbSyntaxError(p,csvFn,rowIdx,kIeiColIdx,"obi");
else
p->eV[i].iei -= 1;
if((p->eV[i].oei = cmCsvCellUInt(p->csvH,rowIdx,kOeiColIdx)) == UINT_MAX )
rc = _cmSdbSyntaxError(p,csvFn,rowIdx,kOeiColIdx,"ibi");
else
p->eV[i].oei -= 1;
if((p->eV[i].src = cmCsvCellText(p->csvH,rowIdx,kSrcColIdx)) == NULL )
rc = _cmSdbSyntaxError(p,csvFn,rowIdx,kSrcColIdx,"src");
if((p->eV[i].midi = cmCsvCellInt(p->csvH,rowIdx,kMidiColIdx)) == INT_MAX )
rc = _cmSdbSyntaxError(p,csvFn,rowIdx,kMidiColIdx,"midi");
if((p->eV[i].instr = cmCsvCellText(p->csvH,rowIdx,kInstrColIdx)) == NULL )
rc = _cmSdbSyntaxError(p,csvFn,rowIdx,kInstrColIdx,"instr");
if((p->eV[i].srate = cmCsvCellUInt(p->csvH,rowIdx,kSrateColIdx)) == UINT_MAX )
rc = _cmSdbSyntaxError(p,csvFn,rowIdx,kSrateColIdx,"srate");
if((p->eV[i].chCnt = cmCsvCellUInt(p->csvH,rowIdx,kChCntColIdx)) == UINT_MAX )
rc = _cmSdbSyntaxError(p,csvFn,rowIdx,kChCntColIdx,"chCnt");
cmCsvCell_t* c;
if((c = cmCsvCellPtr(p->csvH,rowIdx,kNotesColIdx)) == NULL )
{
rc = cmErrMsg(&p->ctx.err,kSyntaxErrSdbRC,"Syntax Error: No 'notes' or 'audio file name' field for row %i in '%s'.",rowIdx+1,cmStringNullGuard(csvFn));
goto errLabel;
}
// count the number of 'notes'
unsigned nn = 0;
for(; c->rowPtr != NULL; c=c->rowPtr)
++nn;
if( nn > 0 )
{
unsigned k = 0;
// allocate the 'notes' ptr array - the last entry is set to NULL.
p->eV[i].notesV = cmLhAllocZ(p->lhH,const cmChar_t*,nn+1);
// read each note
for(c=cmCsvCellPtr(p->csvH,rowIdx,kNotesColIdx); c!=NULL&&c->rowPtr!=NULL; c=c->rowPtr,++k)
if(( p->eV[i].notesV[k] = cmCsvCellText(p->csvH,rowIdx,kNotesColIdx+k)) == NULL )
rc = _cmSdbSyntaxError(p,csvFn,rowIdx,kNotesColIdx+k,"notes");
assert(k==nn);
}
// read the audio file name
if((p->eV[i].afn = cmCsvCellText(p->csvH,rowIdx,kNotesColIdx+nn)) == NULL )
rc = _cmSdbSyntaxError(p,csvFn,rowIdx,kNotesColIdx+nn,"afn");
}
// store the audio directory
if( cmTextLength(audioDir) )
p->audioDir = cmLhAllocStr(p->lhH,audioDir);
else
{
cmLhFree(p->lhH,&p->audioDir);
p->audioDir = NULL;
}
errLabel:
return rc;
}
cmSdbRC_t cmSdbSyncChPairs( cmSdbH_t h )
{
cmSdbRC_t rc = kOkSdbRC;
cmSdb_t* p = _cmSdbHandleToPtr(h);
unsigned i;
// for each multi-channel event
for(i=0; i<p->eN; ++i)
if(p->eV[i].chCnt > 1 )
{
const cmSdbEvent_t* ep = p->eV + i;
unsigned iV[ep->chCnt];
unsigned j,k;
// load iV[] with the event indexes of the channel pairs
for(j=0,k=0; j<p->eN && k<ep->chCnt; ++j)
if( p->eV[j].baseUuid == ep->baseUuid )
{
assert( p->eV[j].chIdx < ep->chCnt );
iV[p->eV[j].chIdx] = j;
++k;
}
if( k != ep->chCnt )
rc = cmErrMsg(&p->ctx.err,kChPairNotFoundSdbRC,"The channel pair associated with 'id:%i instr:%s src:%s ch index:%i could not be found.",ep->uuid,cmStringNullGuard(ep->instr),cmStringNullGuard(ep->src),ep->chIdx);
else
{
unsigned mobi = ep->obi;
unsigned mibi = ep->ibi;
unsigned miei = ep->iei;
unsigned moei = ep->oei;
// get the min onsets and max offsets
for(j=0; j<ep->chCnt; ++j)
{
mobi = cmMin(mobi,p->eV[ iV[j] ].obi);
mibi = cmMin(mibi,p->eV[ iV[j] ].ibi);
miei = cmMax(miei,p->eV[ iV[j] ].iei);
moei = cmMax(moei,p->eV[ iV[j] ].oei);
}
// set the onsets to the min onset / offsets to max offsets
for(j=0; j<ep->chCnt; ++j)
{
p->eV[ iV[j] ].obi = mobi;
p->eV[ iV[j] ].ibi = mibi;
p->eV[ iV[j] ].iei = miei;
p->eV[ iV[j] ].oei = moei;
}
}
}
return rc;
}
const cmSdbEvent_t* _cmSdbEvent( cmSdb_t* p, unsigned uuid )
{
unsigned i;
for(i=0; i<p->eN; ++i)
if( p->eV[i].uuid == uuid )
return p->eV + i;
return NULL;
}
const cmSdbEvent_t* cmSdbEvent( cmSdbH_t h, unsigned uuid )
{
cmSdb_t* p = _cmSdbHandleToPtr(h);
return _cmSdbEvent(p,uuid);
}
//================================================================================================================================
cmSdbRsp_t* _cmSdbRspHandleToPtr( cmSdbResponseH_t h )
{
cmSdbRsp_t* p = (cmSdbRsp_t*)h.h;
assert( p != NULL );
return p;
}
void _cmSdbRspBlkFree( cmSdb_t* p, cmSdbRspBlk_t* bp )
{
cmLhFree(p->lhH, bp->indexV);
cmLhFree(p->lhH, bp);
}
cmSdbRspBlk_t* _cmSdbRspBlkUnlink( cmSdbRsp_t* rp, cmSdbRspBlk_t* bp )
{
cmSdbRspBlk_t* dp = rp->blocks;
cmSdbRspBlk_t* pp = NULL;
for(; dp!=NULL; dp=dp->link)
{
if( dp == bp )
{
if( pp == NULL )
rp->blocks = dp->link;
else
pp->link = dp->link;
return bp;
}
pp = dp;
}
assert(0);
return NULL;
}
void _cmSdbRspInsertIndex( cmSdb_t* p, cmSdbRsp_t* rp, unsigned evtIndex )
{
if( rp->ebp == NULL || rp->ebp->cnt == p->blkIdxAllocCnt )
{
cmSdbRspBlk_t* bp = cmLhAllocZ(p->lhH,cmSdbRspBlk_t,1);
bp->indexV = cmLhAllocZ(p->lhH,unsigned,p->blkIdxAllocCnt);
if( rp->ebp != NULL )
rp->ebp->link = bp;
if( rp->blocks == NULL )
rp->blocks = bp;
rp->ebp = bp;
}
assert( rp->ebp!=NULL && rp->ebp->cnt < p->blkIdxAllocCnt );
rp->ebp->indexV[ rp->ebp->cnt++ ] = evtIndex;
rp->cnt += 1;
}
cmSdbRsp_t* _cmSdbRspUnlink( cmSdbRsp_t* rp )
{
cmSdb_t* p = rp->p;
cmSdbRsp_t* dp = p->responses;
cmSdbRsp_t* pp = NULL;
for(; dp!=NULL; dp=dp->link)
{
if( dp == rp )
{
if( pp == NULL )
p->responses = dp->link;
else
pp->link = dp->link;
return rp;
}
pp = dp;
}
assert( 0 );
return NULL;
}
void _cmSdbRspFree( cmSdbRsp_t* rp )
{
_cmSdbRspUnlink(rp);
while( rp->blocks != NULL )
{
cmSdbRspBlk_t* np = rp->blocks->link;
cmSdbRspBlk_t* bp;
if((bp = _cmSdbRspBlkUnlink(rp,rp->blocks)) != NULL )
_cmSdbRspBlkFree(rp->p,bp);
rp->blocks = np;
}
cmLhFree(rp->p->lhH,rp);
}
cmSdbRsp_t* _cmSdbRspAlloc( cmSdb_t* p )
{
cmSdbRsp_t* rp = cmLhAllocZ(p->lhH,cmSdbRsp_t,1);
rp->p = p;
rp->link = p->responses;
p->responses = rp;
return rp;
}
// Compare 'label' to every string in tV[i] and return true if any comparision is a match.
// If 'subFlV[i]' is set then 'label' must only contain tV[i] as a substring to match.
// If 'negFlV[i]' is set then return true if any comparision is a mismatch.
bool _cmSdbSelectText( const cmSdbEvent_t* r, const cmChar_t** tV, const bool* subFlV, const bool* negFlV, const cmChar_t* label )
{
unsigned i;
if( label == NULL )
return false;
if( tV == NULL )
return true;
for(i=0; tV[i]!=NULL; ++i)
{
bool matchFl = false;
if( subFlV[i] )
matchFl = strstr(label,tV[i]) != NULL;
else
matchFl = strcmp(tV[i],label)==0;
if( negFlV[i] )
matchFl = !matchFl;
if(matchFl)
return true;
}
return false;
}
unsigned _cmSdbStrVectCnt( const cmChar_t** v )
{
unsigned n = 0;
unsigned i = 0;
if( v == NULL )
return 0;
for(i=0; v[i]!=NULL; ++i)
++n;
return n;
}
void _cmSdbStrVectFlags( const cmChar_t** v, bool* sV, bool* nV )
{
unsigned i = 0;
if( v == NULL )
return;
for(i=0; v[i]!=NULL; ++i)
{
nV[i] = false;
sV[i] = false;
if( strncmp(v[i],"*!",2)==0 || strncmp(v[i],"!*",2)==0)
{
sV[i] = nV[i] = true;
v[i] += 2;
}
else
{
if( strncmp(v[i],"!",1)==0 )
{
nV[i] = true;
v[i] += 1;
}
if( strncmp(v[i],"*",1)==0 )
{
sV[i] = true;
v[i] += 1;
}
}
}
}
cmSdbRC_t cmSdbSelect(
cmSdbH_t h,
double srate,
const cmChar_t** instrV,
const cmChar_t** srcV,
const cmChar_t** notesV,
const unsigned* pitchV,
double minDurSec,
double maxDurSec,
unsigned minChCnt,
cmSdbResponseH_t* rhp )
{
cmSdbRC_t rc;
if((rc = cmSdbResponseFree(rhp)) != kOkSdbRC )
return rc;
cmSdb_t* p = _cmSdbHandleToPtr(h);
cmSdbRsp_t* rp = _cmSdbRspAlloc(p);
unsigned i;
// get the length of each string vector
unsigned srcN = _cmSdbStrVectCnt(srcV);
unsigned insN = _cmSdbStrVectCnt(instrV);
unsigned notN = _cmSdbStrVectCnt(notesV);
// allocate flag vectors
bool srcSubFlV[ srcN ];
bool srcNegFlV[ srcN ];
bool insSubFlV[ insN ];
bool insNegFlV[ insN ];
bool notSubFlV[ notN ];
bool notNegFlV[ notN ];
// fill the flag vectors
_cmSdbStrVectFlags(srcV, srcSubFlV,srcNegFlV);
_cmSdbStrVectFlags(instrV,insSubFlV,insNegFlV);
_cmSdbStrVectFlags(notesV,notSubFlV,notNegFlV);
for(i=0; i<p->eN; ++i)
{
const cmSdbEvent_t* r = p->eV + i;
double durSec = (double)r->srate * (r->oei - r->obi);
unsigned j;
if( srate!=0 && srate!=r->srate )
continue;
if( durSec < minDurSec || (maxDurSec!=0 && maxDurSec < durSec) )
continue;
if( minChCnt!=0 && r->chCnt > minChCnt )
continue;
if( !_cmSdbSelectText(r,srcV,srcSubFlV,srcNegFlV,r->src) )
continue;
if( !_cmSdbSelectText(r,instrV,insSubFlV,insNegFlV,r->instr) )
continue;
if( pitchV != NULL )
{
for(j=0; pitchV[j]!=kInvalidMidiPitch; ++j)
if( pitchV[j] == r->midi )
break;
if( pitchV[j] != r->midi )
continue;
}
if( r->notesV != NULL )
{
for(j=0; r->notesV[j]!=NULL; ++j)
if( _cmSdbSelectText(r,notesV,notSubFlV,notNegFlV,r->notesV[j]) == true )
break;
if( r->notesV[j]==NULL )
continue;
}
_cmSdbRspInsertIndex(p,rp,i);
}
rhp->h = rp;
if(rc != kOkSdbRC )
_cmSdbRspFree(rp);
return rc;
}
cmSdbRC_t _cmSdbSelectChPairs( cmSdb_t* p, const cmSdbEvent_t* ep, cmSdbResponseH_t* rhp )
{
cmSdbRC_t rc;
if((rc = cmSdbResponseFree(rhp)) != kOkSdbRC )
return rc;
cmSdbRsp_t* rp = _cmSdbRspAlloc(p);
unsigned i;
// for each channel of this event
for(i=0; i<ep->chCnt; ++i)
{
// if i channel is not the known events channel
if( ep->chIdx != i )
{
unsigned j;
// examine each record
for(j=0; j<p->eN; ++j)
// if eV[j] shares a baseUuid but is on a different channel than *ep ...
if( p->eV[j].baseUuid == ep->baseUuid && p->eV[j].chIdx==i )
{
// .. then a match has been found
_cmSdbRspInsertIndex(p,rp,j);
break;
}
if( j== p->eN )
{
rc = cmErrMsg(&p->ctx.err,kChPairNotFoundSdbRC,"The channel pair associated with 'id:%i instr:%s src:%s ch index:%i could not be found.",ep->uuid,cmStringNullGuard(ep->instr),cmStringNullGuard(ep->src),ep->chIdx);
}
}
}
rhp->h = rp;
return rc;
}
cmSdbRC_t cmSdbSelectChPairs( cmSdbH_t h, const cmSdbEvent_t* ep, cmSdbResponseH_t* rhp )
{
cmSdb_t* p = _cmSdbHandleToPtr(h);
return _cmSdbSelectChPairs( p, ep,rhp );
}
unsigned cmSdbResponseCount( cmSdbResponseH_t rh )
{
cmSdbRsp_t* rp = _cmSdbRspHandleToPtr(rh);
return rp->cnt;
}
const cmSdbEvent_t* cmSdbResponseEvent( cmSdbResponseH_t rh, unsigned index )
{
cmSdbRsp_t* rp = _cmSdbRspHandleToPtr(rh);
if( index >= rp->cnt )
return NULL;
cmSdbRspBlk_t* bp = rp->blocks;
unsigned i;
for(i=0; bp!=NULL; i+=bp->cnt,bp=bp->link)
if( i <= index && index < (i + bp->cnt) )
return rp->p->eV + bp->indexV[index-i];
cmErrMsg(&rp->p->ctx.err,kInvalidRspIdxSdbRC,"Invalid query response index=%i.",index);
return NULL;
}
bool cmSdbResponseIsValid( cmSdbResponseH_t rh )
{ return rh.h != NULL; }
cmSdbRC_t cmSdbResponseFree( cmSdbResponseH_t* rhp )
{
cmSdbRC_t rc = kOkSdbRC;
if( rhp == NULL || cmSdbResponseIsValid(*rhp)==false )
return rc;
cmSdbRsp_t* rp = _cmSdbRspHandleToPtr(*rhp);
_cmSdbRspFree(rp);
rhp->h = NULL;
return rc;
}
void cmSdbResponsePrint( cmSdbResponseH_t rh, cmRpt_t* rpt )
{
unsigned n = cmSdbResponseCount(rh);
unsigned i;
for(i=0; i<n; ++i)
{
const cmSdbEvent_t* e = cmSdbResponseEvent(rh,i);
if( e != NULL )
cmRptPrintf(rpt,"%6i %6i %2i %12i %12i %12i %12i %2i %6i %2i %10s %15s\n",
e->uuid,e->baseUuid,e->chIdx,e->obi,e->ibi,e->iei,e->oei,e->midi,e->srate,e->chCnt,
cmStringNullGuard(e->src), cmStringNullGuard(e->instr) );
}
}
//================================================================================================================================
cmSdbSeq_t* _cmSdbSeqHandleToPtr( cmSdbSeqH_t sh )
{
cmSdbSeq_t* sp = (cmSdbSeq_t*)sh.h;
assert(sp !=NULL );
return sp;
}
void _cmSdbSeqInsertEvent( cmSdbSeq_t* sp, unsigned uuid, unsigned chIdx, double begSecs, double durSecs )
{
cmSdb_t* p = sp->p;
// if no block has been allocated or the current block is full
if( sp->ebp == NULL || sp->ebp->cnt >= p->blkEvtAllocCnt )
{
// allocate a new seq block recd
cmSdbSeqBlk_t* bp = cmLhAllocZ(sp->p->lhH,cmSdbSeqBlk_t,1);
// allocate a seq evt array
bp->eV = cmLhAllocZ(sp->p->lhH,cmSdbSeqEvent_t,p->blkEvtAllocCnt);
// link in the block recd
if( sp->ebp != NULL )
sp->ebp->link = bp;
if( sp->blocks == NULL )
{
sp->blocks = bp;
sp->minDurSec = durSecs;
sp->maxDurSec = durSecs;
}
sp->ebp = bp;
}
assert( sp->ebp != NULL && sp->ebp->cnt < p->blkEvtAllocCnt );
// get the next seq evt recd to fill
cmSdbSeqEvent_t* ep = sp->ebp->eV + sp->ebp->cnt;
// fill the seq evt recd
ep->uuid = uuid;
ep->begSec = begSecs;
ep->durSec = durSecs;
ep->outChIdx = chIdx;
ep->gain = 1.0;
// incr the seq evt cnt
sp->ebp->cnt += 1;
sp->cnt += 1;
sp->chCnt = cmMax(sp->chCnt,chIdx+1);
sp->minDurSec = cmMin(sp->minDurSec,durSecs);
sp->maxDurSec = cmMax(sp->maxDurSec,durSecs);
}
// unlink a sequence record from p->seqs.
cmSdbSeq_t* _cmSdbSeqUnlink( cmSdbSeq_t* sp )
{
cmSdb_t* p = sp->p;
cmSdbSeq_t* cp = p->seqs;
cmSdbSeq_t* pp = NULL;
for(; cp!=NULL; cp=cp->link)
{
if( cp == sp )
{
if( pp == NULL )
p->seqs = sp->link;
else
pp->link = sp->link;
return sp;
}
pp = cp;
}
assert(0);
return NULL;
}
// free a sequence record
cmSdbRC_t _cmSdbSeqFree( cmSdbSeq_t* sp )
{
cmSdb_t* p = sp->p;
// unlink this seq. record from p->seqs
if( _cmSdbSeqUnlink(sp) == NULL )
return cmErrMsg(&p->ctx.err,kAssertFailSdbRC,"Sequence unlink failed.");
// release the seq blocks held by the sequence
while( sp->blocks != NULL )
{
cmSdbSeqBlk_t* np = sp->blocks->link;
cmLhFree(p->lhH,sp->blocks->eV);
cmLhFree(p->lhH,sp->blocks);
sp->blocks = np;
}
cmLhFree(p->lhH,sp);
return kOkSdbRC;
}
// allocate a sequence record
cmSdbSeq_t* _cmSdbSeqAlloc( cmSdb_t* p )
{
cmSdbSeq_t* sp = cmLhAllocZ(p->lhH,cmSdbSeq_t,1);
sp->p = p;
sp->link = p->seqs;
p->seqs = sp;
return sp;
}
cmSdbRC_t _cmSdbStoreSeqEvent(
cmSdb_t* p,
cmSdbSeq_t* sp,
cmSdbResponseH_t rh,
unsigned ri,
unsigned seqChCnt,
double begSecs,
double limitEvtDurSecs,
double* durSecsRef )
{
cmSdbRC_t rc = kOkSdbRC;
double maxEvtDurSecs = 0;
// retrieve the event record
const cmSdbEvent_t* ep;
if((ep = cmSdbResponseEvent(rh,ri)) == NULL )
{
rc = cmErrMsg(&p->ctx.err,kRspEvtNotFoundSdbRC,"A response event could not be found during random sequence generation.");
goto errLabel;
}
cmSdbResponseH_t rh0 = cmSdbResponseNullHandle;
unsigned rn0 = 0;
unsigned ci = 0;
// locate the channel pairs for 'ep'.
if( seqChCnt>1 && ep->chCnt>1 )
{
if( _cmSdbSelectChPairs(p, ep, &rh0 ) != kOkSdbRC )
{
rc = cmErrMsg(&p->ctx.err,kChPairNotFoundSdbRC,"A response event could not find channel pairs during random sequence generation.");
goto errLabel;
}
rn0 = cmSdbResponseCount(rh0);
}
while(1)
{
// calculate the event duration
double durSecs = (double)(ep->oei - ep->obi)/ep->srate;
// truncate the event if it is longer than limitEvtDurSecs
if( limitEvtDurSecs!=0 && durSecs>limitEvtDurSecs )
durSecs = cmMin(limitEvtDurSecs,durSecs);
// track the longest event
maxEvtDurSecs = cmMax(maxEvtDurSecs,durSecs);
// store the sequence event
_cmSdbSeqInsertEvent(sp,ep->uuid,ci,begSecs,durSecs);
// incr the output ch index
++ci;
// if all the out ch's are filled or the sample event has no more channels
if( ci >= seqChCnt || ci-1 >= rn0 )
break;
// get the next channel pair
if((ep = cmSdbResponseEvent(rh0,ci-1)) == NULL )
{
rc = cmErrMsg(&p->ctx.err,kRspEvtNotFoundSdbRC,"A channel pair response event could not be found during random sequence generation.");
goto errLabel;
}
} // for each sample event pair
errLabel:
if( durSecsRef != NULL )
*durSecsRef = maxEvtDurSecs;
cmSdbResponseFree(&rh0);
return rc;
}
cmSdbRC_t cmSdbSeqRand(
cmSdbResponseH_t rh,
unsigned seqDurSecs,
unsigned seqChCnt,
unsigned minEvtPerSec,
unsigned maxEvtPerSec,
cmSdbSeqH_t* shp )
{
cmSdbRC_t rc;
if((rc = cmSdbSeqFree(shp)) != kOkSdbRC )
return rc;
cmSdbRsp_t* rp = _cmSdbRspHandleToPtr(rh);
cmSdb_t* p = rp->p;
cmSdbSeq_t* sp = _cmSdbSeqAlloc(p);
if( seqChCnt < 1 )
return cmErrMsg(&p->ctx.err,kInvalidArgSdbRC,"The random sequence generator channel count parameter must be non-zero.");
if( seqDurSecs <= 0 )
return cmErrMsg(&p->ctx.err,kInvalidArgSdbRC,"The random sequence generator signal duration must be greater than 0.");
if( maxEvtPerSec < minEvtPerSec )
return cmErrMsg(&p->ctx.err,kInvalidArgSdbRC,"The random sequence generator max. events per second must be greater or equal to the min. events per second.");
if((rc = cmSdbSeqFree(shp)) != kOkSdbRC )
return rc;
unsigned rn = cmSdbResponseCount(rh);
unsigned sec;
for(sec=0; sec<seqDurSecs; sec+=1 )
{
// calcuate the number of events to initiate during this second
unsigned en = cmRandUInt(minEvtPerSec,maxEvtPerSec);
unsigned ei;
for(ei=0; ei<en; ++ei)
{
// select an event index
unsigned ri = cmRandUInt(0,rn-1);
// double select a start time for this event
double begSecs = sec + cmRandDouble(0.0,1.0);
double maxEvtDurSecs = 0;
if((rc = _cmSdbStoreSeqEvent(p,sp,rh,ri,seqChCnt,begSecs,maxEvtDurSecs,NULL)) != kOkSdbRC )
goto errLabel;
} // for each event init'd during this second
} // for each second
shp->h = sp;
errLabel:
if( rc != kOkSdbRC )
_cmSdbSeqFree(sp);
return rc;
}
cmSdbRC_t cmSdbSeqSerial(
cmSdbResponseH_t rh,
unsigned seqChCnt,
double gapSec,
double maxEvtDurSec,
cmSdbSeqH_t* shp )
{
cmSdbRC_t rc;
if((rc = cmSdbSeqFree(shp)) != kOkSdbRC )
return rc;
cmSdbRsp_t* rp = _cmSdbRspHandleToPtr(rh);
cmSdb_t* p = rp->p;
cmSdbSeq_t* sp = _cmSdbSeqAlloc(p);
unsigned n = cmSdbResponseCount(rh);
double begSecs = 0;
unsigned ri;
for(ri=0; ri<n; ++ri)
{
double durSecs = 0;
if((rc = _cmSdbStoreSeqEvent(p,sp,rh,ri,seqChCnt,begSecs,maxEvtDurSec,&durSecs)) != kOkSdbRC )
goto errLabel;
// offset to next event
begSecs += durSecs + gapSec;
}
shp->h = sp;
errLabel:
if(rc != kOkSdbRC )
_cmSdbSeqFree(sp);
return rc;
}
cmSdbRC_t cmSdbSeqChord(
cmSdbResponseH_t* rhp,
unsigned rn,
unsigned seqChCnt,
unsigned maxEvtDurSec,
cmSdbSeqH_t* shp )
{
cmSdbRC_t rc = kOkSdbRC;
assert( shp != NULL );
if( rn == 0 )
return rc;
cmSdbResponseH_t rh = rhp[0];
cmSdbRsp_t* rp = _cmSdbRspHandleToPtr(rh);
cmSdb_t* p = rp->p;
cmSdbSeq_t* sp = _cmSdbSeqAlloc(p);
unsigned i;
if((rc = cmSdbSeqFree(shp)) != kOkSdbRC )
return rc;
// for each chord note
for(i=0; i<rn; ++i)
{
// get the query response handle for this note
rh = rhp[i];
rp = _cmSdbRspHandleToPtr(rh);
// verify that all query responses were drawn from the same cmSdbH_t handle.
if( rp->p != p )
{
rc = cmErrMsg(&p->ctx.err,kAssertFailSdbRC,"All chord query response handle must be derived from the same cmSdbH_t handle.");
goto errLabel;
}
// pick one event at random from the response
unsigned n = cmSdbResponseCount(rh);
unsigned rei = cmRandUInt(0,n-1);
// all notes start at time: 0.0.
double begSecs = 0.0;
// store the sequence event
if((rc = _cmSdbStoreSeqEvent(p,sp,rh,rei,seqChCnt,begSecs,maxEvtDurSec,NULL)) != kOkSdbRC )
goto errLabel;
}
shp->h = sp;
errLabel:
if(rc != kOkSdbRC )
_cmSdbSeqFree(sp);
return rc;
}
bool cmSdbSeqIsValid( cmSdbSeqH_t sh )
{ return sh.h != NULL; }
cmSdbRC_t cmSdbSeqFree( cmSdbSeqH_t* shp )
{
cmSdbRC_t rc = kOkSdbRC;
if( shp==NULL || cmSdbSeqIsValid(*shp)==false )
return rc;
cmSdbSeq_t* sp = _cmSdbSeqHandleToPtr(*shp);
if((rc = _cmSdbSeqFree(sp)) != kOkSdbRC )
return rc;
shp->h = NULL;
return rc;
}
unsigned cmSdbSeqCount( cmSdbSeqH_t sh )
{
if( cmSdbSeqIsValid(sh)==false )
return 0;
cmSdbSeq_t* sp = _cmSdbSeqHandleToPtr(sh);
return sp->cnt;
}
const cmSdbSeqEvent_t* cmSdbSeqEvent( cmSdbSeqH_t sh, unsigned index )
{
cmSdbSeq_t* sp = _cmSdbSeqHandleToPtr(sh);
if( index >= sp->cnt )
return NULL;
cmSdbSeqBlk_t* bp = sp->blocks;
unsigned i;
for(i=0; bp!=NULL; i+=bp->cnt,bp=bp->link)
if( i <= index && index < (i + bp->cnt) )
return bp->eV + index-i;
cmErrMsg(&sp->p->ctx.err,kInvalidSeqIdxSdbRC,"Invalid sequence event index=%i.",index);
return NULL;
}
const cmSdbEvent_t* cmSdbSeqSdbEvent( cmSdbSeqH_t sh, unsigned index )
{
const cmSdbSeqEvent_t* ep;
if((ep = cmSdbSeqEvent(sh,index)) == NULL )
return NULL;
cmSdbSeq_t* sp = _cmSdbSeqHandleToPtr(sh);
return _cmSdbEvent(sp->p,ep->uuid);
}
double cmSdbSeqDurSeconds( cmSdbSeqH_t sh )
{
cmSdbSeq_t* sp = _cmSdbSeqHandleToPtr(sh);
cmSdbSeqBlk_t* bp = sp->blocks;
while( bp!=NULL && bp->link!=NULL )
bp=bp->link;
if( bp == NULL )
return 0;
cmSdbSeqEvent_t* ep = bp->eV + bp->cnt - 1;
return ep->begSec + ep->durSec;
}
double cmSdbSeqSampleRate( cmSdbSeqH_t sh )
{
unsigned n = cmSdbSeqCount(sh);
unsigned i;
const cmSdbEvent_t* ep;
for(i=0; i<n; ++i)
if((ep = cmSdbSeqSdbEvent(sh,i)) != NULL && ep->srate != 0 )
return ep->srate;
return 0;
}
cmSdbRC_t cmSdbSeqToAudio(
cmSdbSeqH_t sh,
unsigned decayMs,
double noiseDb,
double normFact,
cmSample_t** signalRef,
unsigned* sigSmpCntRef )
{
assert( signalRef!=NULL && sigSmpCntRef!=NULL);
*signalRef = NULL;
*sigSmpCntRef = 0;
cmSdbRC_t rc = kOkSdbRC;
cmSdbSeq_t* sp = _cmSdbSeqHandleToPtr(sh);
cmSdb_t* p = sp->p;
unsigned qN = cmSdbSeqCount(sh);
double durSecs = cmSdbSeqDurSeconds(sh);
double srate = cmSdbSeqSampleRate(sh);
assert(sp->maxDurSec>=sp->minDurSec);
// verify that sequence events exist
if( qN==0 || durSecs==0 || sp->chCnt==0 || sp->maxDurSec==0)
return rc;
// validate the sample rate
if( srate == 0 )
return cmErrMsg(&p->ctx.err,kAssertFailSdbRC,"The sample rate of the sequence could not be determined.");
unsigned sN = (unsigned)floor(srate * (durSecs + 0.25)); // output signal sample count + 1/4 second of silence
unsigned dN = (unsigned)floor(srate * decayMs / 1000.0); // decay env. sample count
unsigned tN = (unsigned)floor(srate * sp->maxDurSec); // length of longest audio event in samples
cmSample_t* s = cmMemAllocZ(cmSample_t,sN*sp->chCnt); // allocate the outputsignal buffer
cmSample_t* t = cmMemAllocZ(cmSample_t,tN*sp->chCnt); // audio event read buffer
cmSample_t* d = NULL;
cmSample_t* chBuf[ sp->chCnt ];
unsigned i;
// fill the channel buffers
for(i=0; i<sp->chCnt; ++i)
chBuf[i] = t + (i*tN);
// if a decay rate was specified
if( dN > 0 )
{
d = cmMemAllocZ(cmSample_t,dN); // allocate the decay env. buffer
cmVOS_LinSpace(d,dN,1.0,0.0); // calc. a decay envelope
cmVOS_PowVS(d,dN,4.0);
}
// if a noise floor was specified
if( noiseDb != 0 )
{
// fill the signal with low level white noise
cmVOS_Random(s,sN,-1.0,1.0);
cmVOS_MultVS(s,sN,pow(10.0,-fabs(noiseDb)/20.0));
}
// for each sequence event
for(i=0; rc==kOkSdbRC && i<qN; ++i)
{
const cmSdbSeqEvent_t* qep;
const cmSdbEvent_t* ep;
// get the sequence event record
if((qep = cmSdbSeqEvent(sh,i)) == NULL )
{
rc = cmErrMsg(&p->ctx.err,kAssertFailSdbRC,"Unable to retrieve the sequence event at index %i.",i);
goto errLabel;
}
// get the audio event record
if((ep = _cmSdbEvent(p,qep->uuid)) == NULL)
{
rc = cmErrMsg(&p->ctx.err,kAssertFailSdbRC,"Unable to retrieve the sample event with uuid:%i.",qep->uuid);
goto errLabel;
}
unsigned begFrmIdx = floor(srate * qep->begSec ); // dest. index into output signal
unsigned frmCnt = floor(srate * qep->durSec ); // seq. event dur in samples
const cmChar_t* afn = NULL; // audio event file name
unsigned actFrmCnt = 0; // actual count of samples read from the audio event file
cmAudioFileInfo_t afInfo; // audio file info. record
// form the audio event file name
if((afn = cmFsMakeFn(p->audioDir,ep->afn,NULL,NULL))==NULL)
{
rc = cmErrMsg(&p->ctx.err,kFileSysFailSdbRC,"Unable to form the file name for %s/%s.",cmStringNullGuard(p->audioDir),cmStringNullGuard(ep->afn));
goto errLabel;
}
assert(ep->oei-ep->obi>0 );
// read the audio event from the file into t[]
if( cmAudioFileGetSample(afn, ep->obi, cmMin(tN,cmMin(frmCnt,ep->oei-ep->obi)), 0, ep->chCnt, chBuf, &actFrmCnt, &afInfo, p->ctx.err.rpt ) != kOkAfRC )
{
rc = cmErrMsg(&p->ctx.err,kFileSysFailSdbRC,"Audio event read failed for event uuid:%i in '%s'.",qep->uuid,cmStringNullGuard(afn));
goto doneLabel;
}
// 'actFrmCnt' now holds the length of the event signal
// verify that the audio event sample rate matches the sequence srate
if( afInfo.srate != srate )
cmErrWarnMsg(&p->ctx.err,kAssertFailSdbRC,"The sample rate (%f) of audio event uuid:%i in '%s' does not match the sequence sample rate:%f.",afInfo.srate,qep->uuid,cmStringNullGuard(afn),srate);
// if a decay rate was specified
if( dN > 0 )
{
unsigned ti = 0; // start of decay in t[]
unsigned di = 0; // start of decay in d[]
if( actFrmCnt > dN )
ti = actFrmCnt - dN; // decay func is applied to end of audio event
else
di = dN - actFrmCnt; // decay func is longer than audio event (shorten it)
unsigned mn = dN - di; // decay function length
unsigned j;
// apply the decay function
for(j=0; j<sp->chCnt; ++j)
cmVOS_MultVV(t + (j*tN) +ti , mn, d+di);
}
// normalize the event signal
if( normFact != 0 )
cmVOS_NormToAbsMax(t,actFrmCnt,normFact);
// verify the the signal event falls inside the output signal
if( begFrmIdx >= sN )
rc = cmErrMsg(&p->ctx.err,kAssertFailSdbRC,"A sequence event start time falls after the end of the sequence signal. This should never happen.");
else
{
// if the event signal goes past the end of the signal - truncate the event
if( begFrmIdx + actFrmCnt > sN )
actFrmCnt = sN - begFrmIdx;
// sum the event signal into the output signal
cmVOS_AddVV(s + (qep->outChIdx*sN) + begFrmIdx,actFrmCnt,t);
}
doneLabel:
cmFsFreeFn(afn);
}
*signalRef = s;
*sigSmpCntRef = sN;
errLabel:
if( rc != kOkSdbRC )
cmMemFree(s);
cmMemFree(d);
cmMemFree(t);
return rc;
}
cmSdbRC_t cmSdbSeqToAudioFn(
cmSdbSeqH_t sh,
unsigned decayMs,
double noiseDb,
double evtNormFact,
double sigNormFact,
const cmChar_t* fn,
unsigned bitsPerSample
)
{
cmSdbRC_t rc = kOkSdbRC;
cmSample_t* s = NULL;
unsigned sN = 0;
cmSdbSeq_t* sp = _cmSdbSeqHandleToPtr(sh);
cmSdb_t* p = sp->p;
double srate = cmSdbSeqSampleRate(sh);
unsigned i;
// fill s[sN] with the sequence audio signal
if((rc = cmSdbSeqToAudio(sh,decayMs,noiseDb,evtNormFact,&s,&sN)) != kOkSdbRC )
return rc;
// if no audio signal was created there is nothing to do
if( sN == 0 )
return rc;
// the sample rate was already check by cmSdbSeqToAudio().
assert(srate != 0 && s != NULL);
// if requested normalize the signal
if( sigNormFact != 0 )
cmVOS_NormToAbsMax(s,sN*sp->chCnt,sigNormFact);
// fill the channel buffer
cmSample_t* chBuf[ sp->chCnt ];
for(i=0; i<sp->chCnt; ++i)
chBuf[i] = s + (i*sN);
// write the signal to an audio file
if((rc = cmAudioFileWriteFileFloat(fn, srate, bitsPerSample, sN, sp->chCnt, chBuf, p->ctx.err.rpt )) != kOkAfRC )
{
rc = cmErrMsg(&p->ctx.err,kAudioFileFailSdbRC,"The sequence audio file '%s' could not be created.",cmStringNullGuard(fn));
goto errLabel;
}
errLabel:
cmMemFree(s);
return rc;
}
void cmSdbSeqPrint( cmSdbSeqH_t sh, cmRpt_t* rpt )
{
unsigned i;
unsigned n = cmSdbSeqCount(sh);
cmSdbSeq_t* sp = _cmSdbSeqHandleToPtr(sh);
const cmSdbSeqEvent_t* ep;
cmRptPrintf(rpt,"evt cnt:%i ch cnt:%i dur min:%f max:%f \n",sp->cnt,sp->chCnt,sp->minDurSec,sp->maxDurSec);
cmRptPrintf(rpt," uuid ch beg dur gain \n");
cmRptPrintf(rpt,"------- --- ------- ------- -------\n");
for(i=0; i<n; ++i)
if((ep = cmSdbSeqEvent(sh,i)) != NULL )
cmRptPrintf(rpt,"%7i %3i %7.3f %7.3f %7.3f\n",ep->uuid,ep->outChIdx,ep->begSec,ep->durSec,ep->gain );
}
cmSdbRC_t cmSdbTest( cmCtx_t* ctx )
{
cmSdbRC_t rc = kOkSdbRC;
cmSdbH_t h = cmSdbNullHandle;
const cmChar_t* audioDir = "/home/kevin/media/audio";
const cmChar_t* csvFn = "/home/kevin/temp/sdb0/sdb_master.csv";
cmErr_t err;
cmErrSetup(&err,&ctx->rpt,"sdb test");
if((rc = cmSdbCreate(ctx, &h, csvFn, audioDir )) != kOkSdbRC )
{
rc = cmErrMsg(&err,rc,"sdb create failed.");
goto errLabel;
}
if((rc = cmSdbSyncChPairs(h)) != kOkSdbRC )
{
rc = cmErrMsg(&err,rc,"sdb sync-ch-pairs failed.");
goto errLabel;
}
if(1)
{
cmSdbResponseH_t rH = cmSdbResponseNullHandle;
cmSdbSeqH_t sH = cmSdbSeqNullHandle;
const cmChar_t* instrV[] = { "violin", NULL };
const cmChar_t* srcV[] = { "ui", NULL };
const cmChar_t* notesV[] = { "!vibrato", NULL };
if((rc = cmSdbSelect(h,0,instrV,srcV,notesV,NULL,0,0,0,&rH)) != kOkSdbRC )
{
rc = cmErrMsg(&err,rc,"sdb query failed.");
goto errLabel;
}
//cmSdbResponsePrint(rH,&ctx->rpt);
unsigned seqDurSecs = 15;
unsigned seqChCnt = 2;
unsigned sel = 2;
switch( sel )
{
case 0:
{
unsigned minEvtPerSec = 1;
unsigned maxEvtPerSec = 5;
if((rc = cmSdbSeqRand(rH,seqDurSecs,seqChCnt,minEvtPerSec,maxEvtPerSec,&sH)) != kOkSdbRC )
{
rc = cmErrMsg(&err,rc,"sdb random sequence generation failed.");
goto errLabel;
}
}
break;
case 1:
{
double gapSec = 0.1;
double maxEvtDurSec = 1.0;
if((rc = cmSdbSeqSerial(rH,seqChCnt,gapSec,maxEvtDurSec,&sH)) != kOkSdbRC )
{
rc = cmErrMsg(&err,rc,"sdb serial sequence generation failed.");
goto errLabel;
}
}
break;
case 2:
{
cmSdbResponseH_t rhV[] = { rH, rH, rH };
unsigned rN = sizeof(rhV)/sizeof(rhV[0]);
double maxEvtDurSec = 1.0;
if((rc = cmSdbSeqChord(rhV,rN,seqChCnt,maxEvtDurSec,&sH)) != kOkSdbRC )
{
rc = cmErrMsg(&err,rc,"sdb chord sequence generation failed.");
goto errLabel;
}
}
break;
}
cmSdbSeqPrint(sH,&ctx->rpt);
const cmChar_t* afn = "/home/kevin/temp/aaa.aif";
unsigned decayMs = 50;
double noiseDb = -70.0;
double evtNormFact = 0; //0.7;
double sigNormFact = 0.7; //0.7;
unsigned bitsPerSample = 16;
if((rc = cmSdbSeqToAudioFn(sH,decayMs,noiseDb,evtNormFact,sigNormFact,afn,bitsPerSample)) != kOkSdbRC )
{
rc = cmErrMsg(&err,rc,"sdb sequence audio file generation failed.");
goto errLabel;
}
cmSdbSeqFree(&sH);
cmSdbResponseFree(&rH);
}
errLabel:
if((rc = cmSdbDestroy(&h)) != kOkSdbRC )
rc = cmErrMsg(&err,rc,"sdb destroy failed.");
return rc;
}
Reference in New Issue View Git Blame Copy Permalink