cml/libcm
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Added output rate control to cmDspLine().

Browse Source
This commit is contained in:
Kevin Larke 2015-04-09 13:12:04 -07:00
parent 2c1be3cf84
commit 1a6156f50a
1 changed files with 24 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

25
dsp/cmDspFx.c
View File

@ -3733,6 +3733,7 @@ enum
kEndLnId, kEndLnId,
kDurLnId, kDurLnId,
kCmdLnId, kCmdLnId,
kRateLnId,
kOutLnId, kOutLnId,
}; };
@ -3752,6 +3753,7 @@ typedef struct
unsigned offSymId; unsigned offSymId;
unsigned resetSymId; unsigned resetSymId;
unsigned curSmpIdx; unsigned curSmpIdx;
double phase;
bool onFl; bool onFl;
} cmDspLine_t; } cmDspLine_t;
@ -3762,6 +3764,7 @@ cmDspInst_t* _cmDspLineAlloc(cmDspCtx_t* ctx, cmDspClass_t* classPtr, unsigned
1, "end", kEndLnId, 0, 0, kInDsvFl | kDoubleDsvFl | kReqArgDsvFl, "End value.", 1, "end", kEndLnId, 0, 0, kInDsvFl | kDoubleDsvFl | kReqArgDsvFl, "End value.",
1, "dur", kDurLnId, 0, 0, kInDsvFl | kDoubleDsvFl | kReqArgDsvFl, "Duration (ms)", 1, "dur", kDurLnId, 0, 0, kInDsvFl | kDoubleDsvFl | kReqArgDsvFl, "Duration (ms)",
1, "cmd", kCmdLnId, 0, 0, kInDsvFl | kSymDsvFl | kOptArgDsvFl, "Command: on | off | reset", 1, "cmd", kCmdLnId, 0, 0, kInDsvFl | kSymDsvFl | kOptArgDsvFl, "Command: on | off | reset",
1, "rate", kRateLnId, 0, 0, kInDsvFl | kDoubleDsvFl | kOptArgDsvFl, "Output messages per second",
1, "out", kOutLnId, 0, 0, kOutDsvFl | kDoubleDsvFl, "Output", 1, "out", kOutLnId, 0, 0, kOutDsvFl | kDoubleDsvFl, "Output",
0 ); 0 );
@ -3769,11 +3772,13 @@ cmDspInst_t* _cmDspLineAlloc(cmDspCtx_t* ctx, cmDspClass_t* classPtr, unsigned
return NULL; return NULL;
cmDspSetDefaultDouble( ctx, &p->inst, kOutLnId, 0.0, cmDspDefaultDouble(&p->inst,kBegLnId) ); cmDspSetDefaultDouble( ctx, &p->inst, kOutLnId, 0.0, cmDspDefaultDouble(&p->inst,kBegLnId) );
cmDspSetDefaultDouble( ctx, &p->inst, kRateLnId, 0.0, 0.0 );
p->onSymId = cmSymTblRegisterStaticSymbol(ctx->stH,"on"); p->onSymId = cmSymTblRegisterStaticSymbol(ctx->stH,"on");
p->offSymId = cmSymTblRegisterStaticSymbol(ctx->stH,"off"); p->offSymId = cmSymTblRegisterStaticSymbol(ctx->stH,"off");
p->resetSymId = cmSymTblRegisterStaticSymbol(ctx->stH,"reset"); p->resetSymId = cmSymTblRegisterStaticSymbol(ctx->stH,"reset");
return &p->inst; return &p->inst;
} }
@ -3788,6 +3793,7 @@ cmDspRC_t _cmDspLineReset(cmDspCtx_t* ctx, cmDspInst_t* inst, const cmDspEvt_t*
cmDspLine_t* p = (cmDspLine_t*)inst; cmDspLine_t* p = (cmDspLine_t*)inst;
p->curSmpIdx = 0; p->curSmpIdx = 0;
p->onFl = false; p->onFl = false;
p->phase = 0;
return cmDspApplyAllDefaults(ctx,inst); return cmDspApplyAllDefaults(ctx,inst);
} }
@ -3799,11 +3805,20 @@ cmDspRC_t _cmDspLineExec( cmDspCtx_t* ctx, cmDspInst_t* inst, const cmDspEvt_t*
if( p->onFl == false ) if( p->onFl == false )
return kOkDspRC; return kOkDspRC;
unsigned sPc = cmDspSamplesPerCycle(ctx);
double beg = cmDspDouble(inst,kBegLnId); double beg = cmDspDouble(inst,kBegLnId);
double end = cmDspDouble(inst,kEndLnId); double end = cmDspDouble(inst,kEndLnId);
double rate = cmDspDouble(inst,kRateLnId);
double ms = cmDspDouble(inst,kDurLnId); double ms = cmDspDouble(inst,kDurLnId);
double durSmpCnt = floor(ms * cmDspSampleRate(ctx) / 1000); double durSmpCnt = floor(ms * cmDspSampleRate(ctx) / 1000);
double out = beg + (end - beg) * p->curSmpIdx / durSmpCnt; double out = beg + (end - beg) * p->curSmpIdx / durSmpCnt;
double phsMax = rate==0 ? sPc : cmDspSampleRate(ctx) / rate;
// we can never output with a period shorter than
// the length of one audio buffer
if( phsMax < sPc )
phsMax = sPc;
if( beg < end ) if( beg < end )
{ {
@ -3822,9 +3837,15 @@ cmDspRC_t _cmDspLineExec( cmDspCtx_t* ctx, cmDspInst_t* inst, const cmDspEvt_t*
} }
} }
cmDspSetDouble(ctx,inst,kOutLnId,out); p->phase += sPc;
p->curSmpIdx += cmDspSamplesPerCycle(ctx); if( p->phase >= sPc )
{
cmDspSetDouble(ctx,inst,kOutLnId,out);
p->phase -= sPc;
}
p->curSmpIdx += sPc;
return rc; return rc;
} }