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

cmScoreProc.c : Reorganized the score processor to support plugging in different

Browse Source 
score processing algorithms without changing the processor.
Created the shell code for generating performance editing data.
This commit is contained in:
Kevin Larke 2015-02-09 10:13:12 -08:00
parent cac6e8e974
commit 88d5d9a499
1 changed files with 321 additions and 194 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

513
app/cmScoreProc.c
View File

@ -28,19 +28,20 @@ enum
kTimeLineFailSpRC, kTimeLineFailSpRC,
kScoreMatchFailSpRC, kScoreMatchFailSpRC,
kFileFailSpRC, kFileFailSpRC,
kProcFailSpRC
}; };
typedef struct _cmScMeas_t typedef enum
{ {
cmTlMarker_t* markPtr; // time-line marker in which this 'set' exists kBeginSectionSpId,
cmScoreSet_t* setPtr; // score set on which this measurment is based kEndSectionSpId
double value; // the value of the measurement } cmScoreProcSelId_t;
double cost; // the quality of the perf->score match
struct _cmScMeas_t* link;
} _cmScMeas_t;
struct cmSp_str;
typedef struct typedef cmSpRC_t (*cmScoreProcCb_t)( void* arg, struct cmSp_str* p, cmScoreProcSelId_t id, cmTlMarker_t* curMarkPtr );
typedef struct cmSp_str
{ {
cmErr_t err; // score proc object error state cmErr_t err; // score proc object error state
cmCtx* ctx; // application context cmCtx* ctx; // application context
@ -51,13 +52,12 @@ typedef struct
unsigned* dynArray; // dynArray[dynCnt] dynamics reference array unsigned* dynArray; // dynArray[dynCnt] dynamics reference array
unsigned dynCnt; // unsigned dynCnt; //
double srate; // double srate; //
cmScMeas* meas; // performance analyzer
cmScMatcher* match; // score follower cmScMatcher* match; // score follower
cmTlMarker_t* curMarkPtr; cmScMatcherCb_t matchCb; // score follower callback
_cmScMeas_t* list_beg; cmScoreProcCb_t procCb; // score processor callback
_cmScMeas_t* list_end; void* cbArg; // callback arg. for both matchCb and procCb.
_cmScMeas_t* slist_beg;
} cmSp_t; } cmSp_t;
@ -81,15 +81,13 @@ cmSpRC_t _cmJsonReadDynArray( cmJsonH_t jsH, unsigned** dynArray, unsigned* dynC
return kOkSpRC; return kOkSpRC;
} }
cmSpRC_t _cmScoreProcInit( cmCtx_t* ctx, cmSp_t* p, const cmChar_t* rsrcFn ) cmSpRC_t _cmScoreProcInit( cmCtx_t* ctx, cmSp_t* p, const cmChar_t* rsrcFn, cmScoreProcCb_t procCb, cmScMatcherCb_t matchCb, void* cbArg )
{ {
cmSpRC_t rc = kOkSpRC; cmSpRC_t rc = kOkSpRC;
const cmChar_t* scFn = NULL; const cmChar_t* scFn = NULL;
const cmChar_t* tlFn = NULL; const cmChar_t* tlFn = NULL;
const cmChar_t* tlPrefixPath = NULL; const cmChar_t* tlPrefixPath = NULL;
p->srate = 96000;
cmErrSetup(&p->err,&ctx->rpt,"ScoreProc"); cmErrSetup(&p->err,&ctx->rpt,"ScoreProc");
// open the resource file // open the resource file
@ -129,13 +127,6 @@ cmSpRC_t _cmScoreProcInit( cmCtx_t* ctx, cmSp_t* p, const cmChar_t* rsrcFn )
} }
// load the score file
if( cmScoreInitialize(ctx, &p->scH, scFn, p->srate, NULL, 0, NULL, NULL, cmSymTblNullHandle ) != kOkScRC )
{
rc = cmErrMsg(&p->err,kScoreFailSpRC,"Score load failed for score file:%s.",cmStringNullGuard(scFn));
goto errLabel;
}
// load the time-line file // load the time-line file
if( cmTimeLineInitializeFromFile(ctx, &p->tlH, NULL, NULL, tlFn, tlPrefixPath ) != kOkTlRC ) if( cmTimeLineInitializeFromFile(ctx, &p->tlH, NULL, NULL, tlFn, tlPrefixPath ) != kOkTlRC )
{ {
@ -143,12 +134,145 @@ cmSpRC_t _cmScoreProcInit( cmCtx_t* ctx, cmSp_t* p, const cmChar_t* rsrcFn )
goto errLabel; goto errLabel;
} }
p->srate = cmTimeLineSampleRate(p->tlH);
// load the score file
if( cmScoreInitialize(ctx, &p->scH, scFn, p->srate, NULL, 0, NULL, NULL, cmSymTblNullHandle ) != kOkScRC )
{
rc = cmErrMsg(&p->err,kScoreFailSpRC,"Score load failed for score file:%s.",cmStringNullGuard(scFn));
goto errLabel;
}
p->ctx = cmCtxAlloc(NULL, &ctx->rpt, cmLHeapNullHandle, cmSymTblNullHandle ); p->ctx = cmCtxAlloc(NULL, &ctx->rpt, cmLHeapNullHandle, cmSymTblNullHandle );
p->matchCb = matchCb;
p->procCb = procCb;
p->cbArg = cbArg;
errLabel: errLabel:
return rc; return rc;
} }
cmSpRC_t _cmScoreProcProcess(cmCtx_t* ctx, cmSp_t* sp)
{
cmSpRC_t rc = kOkSpRC;
unsigned midiN = 7;
unsigned scWndN = 10;
unsigned seqN = cmTimeLineSeqCount(sp->tlH);
double srate = cmTimeLineSampleRate(sp->tlH);
unsigned seqId;
assert( sp->srate == srate);
// allocate the score matcher
sp->match = cmScMatcherAlloc(sp->ctx,NULL,sp->srate,sp->scH,scWndN,midiN,sp->matchCb,sp->cbArg);
assert(sp->match != NULL );
// for each time line sequence
for(seqId=0; seqId<seqN; ++seqId)
{
cmTlObj_t* o0p = NULL;
// for each 'marker' in this time line sequence
while( (o0p = cmTimeLineNextTypeObj(sp->tlH, o0p, seqId, kMarkerTlId)) != NULL )
{
// get the 'marker' recd
cmTlMarker_t* markPtr = cmTimeLineMarkerObjPtr(sp->tlH,o0p);
assert( markPtr != NULL );
// if the marker does not have a valid start bar location
if( markPtr->bar == 0 )
continue;
// get the end-of-marker time as a sample index
unsigned markEndSmpIdx = markPtr->obj.seqSmpIdx + markPtr->obj.durSmpCnt;
// get the score event associated with the marker's bar number.
const cmScoreEvt_t* evtPtr = cmScoreBarEvt(sp->scH,markPtr->bar);
assert( evtPtr != NULL );
// get the score location associated with the markers bar score event
const cmScoreLoc_t* locPtr = cmScoreEvtLoc(sp->scH,evtPtr);
assert( locPtr != NULL );
cmRptPrintf(&ctx->rpt,"Processing loc:%i seq:%i %s %s\n",locPtr->index,seqId,cmStringNullGuard(markPtr->obj.name),cmStringNullGuard(markPtr->text));
// inform the score processor that we are about to start a new section
if( sp->procCb( sp->cbArg, sp, kBeginSectionSpId, markPtr ) != kOkSpRC )
{
cmErrMsg(&sp->err,kProcFailSpRC,"The score process object failed on reset.");
continue;
}
// reset the score matcher to begin searching at the bar location
if( cmScMatcherReset(sp->match, locPtr->index ) != cmOkRC )
{
cmErrMsg(&sp->err,kScoreMatchFailSpRC,"The score matcher reset failed on location: %i.",locPtr->index);
continue;
}
cmTlObj_t* o1p = o0p;
// as long as more MIDI events are available get the next MIDI msg
while( (rc == kOkSpRC) && (o1p = cmTimeLineNextTypeObj(sp->tlH, o1p, seqId, kMidiEvtTlId )) != NULL )
{
cmTlMidiEvt_t* mep = cmTimeLineMidiEvtObjPtr(sp->tlH,o1p);
assert(mep != NULL );
// if the msg falls after the end of the marker then we are done
if( mep->obj.seqSmpIdx != cmInvalidIdx && mep->obj.seqSmpIdx > markEndSmpIdx )
break;
// if the time line MIDI msg a note-on
if( mep->msg->status == kNoteOnMdId )
{
cmRC_t cmRC = cmScMatcherExec(sp->match, mep->obj.seqSmpIdx, mep->msg->status, mep->msg->u.chMsgPtr->d0, mep->msg->u.chMsgPtr->d1, NULL );
switch( cmRC )
{
case cmOkRC: // continue processing MIDI events
break;
case cmEofRC: // end of the score was encountered
break;
case cmInvalidArgRC: // p->eli was not set correctly
rc = cmErrMsg(&sp->err,kScoreMatchFailSpRC,"The score matcher failed due to an invalid argument.");
goto errLabel;
break;
case cmSubSysFailRC: // scan resync failed
rc = cmErrMsg(&sp->err,kScoreMatchFailSpRC,"The score matcher failed on resync.");
cmScMatcherPrint(sp->match);
//goto errLabel;
break;
default:
{ assert(0); }
}
}
}
// inform the score processor that we done processing a section
if( sp->procCb( sp->cbArg, sp, kEndSectionSpId, NULL ) != kOkSpRC )
cmErrMsg(&sp->err,kProcFailSpRC,"The score process object failed on reset.");
rc = kOkSpRC;
}
}
errLabel:
if( cmScMatcherFree(&sp->match) != cmOkRC )
cmErrMsg(&sp->err,kScoreMatchFailSpRC,"The score matcher release failed.");
return rc;
}
cmSpRC_t _cmScoreProcFinal( cmSp_t* p ) cmSpRC_t _cmScoreProcFinal( cmSp_t* p )
{ {
cmSpRC_t rc = kOkSpRC; cmSpRC_t rc = kOkSpRC;
@ -169,17 +293,26 @@ cmSpRC_t _cmScoreProcFinal( cmSp_t* p )
return rc; return rc;
} }
unsigned _cmScMeasSectCount( cmSp_t* sp ) //==================================================================================================
typedef struct _cmSpMeas_t
{ {
const _cmScMeas_t* mp = sp->list_beg; cmTlMarker_t* markPtr; // time-line marker in which this 'set' exists
unsigned n = 0; cmScoreSet_t* setPtr; // score set on which this measurment is based
for(; mp != NULL; mp=mp->link) double value; // the value of the measurement
n += mp->setPtr->sectCnt; double cost; // the quality of the perf->score match
struct _cmSpMeas_t* link;
return n; } _cmSpMeas_t;
}
typedef struct
{
struct cmSp_str* sp;
cmScMeas* meas; // performance analyzer
cmTlMarker_t* curMarkPtr; //
_cmSpMeas_t* list_beg; //
_cmSpMeas_t* list_end; //
_cmSpMeas_t* slist_beg; //
} _cmSpMeasProc_t;
typedef struct typedef struct
{ {
@ -192,25 +325,35 @@ typedef struct
const cmChar_t* dstSectLabelStr; const cmChar_t* dstSectLabelStr;
double value; double value;
double cost; double cost;
} _cmScMeasSect_t; } _cmSpMeasSect_t;
int _cmScMeasSectCompare( const void* p0, const void* p1 ) unsigned _cmSpMeasSectCount( _cmSpMeasProc_t* m )
{ {
_cmScMeasSect_t* m0 = (_cmScMeasSect_t*)p0; const _cmSpMeas_t* mp = m->list_beg;
_cmScMeasSect_t* m1 = (_cmScMeasSect_t*)p1; unsigned n = 0;
for(; mp != NULL; mp=mp->link)
n += mp->setPtr->sectCnt;
return n;
}
int _cmSpMeasSectCompare( const void* p0, const void* p1 )
{
_cmSpMeasSect_t* m0 = (_cmSpMeasSect_t*)p0;
_cmSpMeasSect_t* m1 = (_cmSpMeasSect_t*)p1;
return (int)m0->dstScLocIdx - (int)m1->dstScLocIdx; return (int)m0->dstScLocIdx - (int)m1->dstScLocIdx;
} }
cmSpRC_t _cmScWriteMeasFile( cmCtx_t* ctx, cmSp_t* sp, const cmChar_t* outFn ) cmSpRC_t _cmScWriteMeasFile( cmCtx_t* ctx, cmSp_t* sp, _cmSpMeasProc_t* m, const cmChar_t* outFn )
{ {
cmFileH_t fH = cmFileNullHandle; cmFileH_t fH = cmFileNullHandle;
cmSpRC_t rc = kOkSpRC; cmSpRC_t rc = kOkSpRC;
unsigned i,j,k; unsigned i,j,k;
_cmScMeas_t* mp = sp->list_beg; _cmSpMeas_t* mp = m->list_beg;
unsigned scnt = _cmScMeasSectCount(sp); unsigned scnt = _cmSpMeasSectCount(m);
_cmScMeasSect_t sarray[ scnt ]; _cmSpMeasSect_t sarray[ scnt ];
for(i=0,k=0; k<scnt && mp!=NULL; ++i,mp=mp->link) for(i=0,k=0; k<scnt && mp!=NULL; ++i,mp=mp->link)
{ {
const cmChar_t* typeLabel = NULL; const cmChar_t* typeLabel = NULL;
@ -225,7 +368,7 @@ cmSpRC_t _cmScWriteMeasFile( cmCtx_t* ctx, cmSp_t* sp, const cmChar_t* outFn )
for(j=0; j<mp->setPtr->sectCnt; ++j,++k) for(j=0; j<mp->setPtr->sectCnt; ++j,++k)
{ {
_cmScMeasSect_t* r = sarray + k; _cmSpMeasSect_t* r = sarray + k;
r->srcSeqId = mp->markPtr->obj.seqId, r->srcSeqId = mp->markPtr->obj.seqId,
r->srcMarkNameStr = cmStringNullGuard(mp->markPtr->obj.name), r->srcMarkNameStr = cmStringNullGuard(mp->markPtr->obj.name),
@ -242,7 +385,7 @@ cmSpRC_t _cmScWriteMeasFile( cmCtx_t* ctx, cmSp_t* sp, const cmChar_t* outFn )
assert(mp==NULL && k==scnt); assert(mp==NULL && k==scnt);
qsort(sarray,scnt,sizeof(sarray[0]),_cmScMeasSectCompare); qsort(sarray,scnt,sizeof(sarray[0]),_cmSpMeasSectCompare);
if( cmFileOpen(&fH,outFn,kWriteFileFl,&ctx->rpt) != kOkFileRC ) if( cmFileOpen(&fH,outFn,kWriteFileFl,&ctx->rpt) != kOkFileRC )
{ {
@ -254,7 +397,7 @@ cmSpRC_t _cmScWriteMeasFile( cmCtx_t* ctx, cmSp_t* sp, const cmChar_t* outFn )
for(i=0; i<scnt; ++i) for(i=0; i<scnt; ++i)
{ {
_cmScMeasSect_t* r = sarray + i; _cmSpMeasSect_t* r = sarray + i;
cmFilePrintf(fH,"[ \"%s\" \"%s\" %f %f %i %i %i \"%s\" %i ]\n", cmFilePrintf(fH,"[ \"%s\" \"%s\" %f %f %i %i %i \"%s\" %i ]\n",
r->dstSectLabelStr, r->dstSectLabelStr,
@ -300,11 +443,11 @@ cmSpRC_t _cmScWriteMeasFile( cmCtx_t* ctx, cmSp_t* sp, const cmChar_t* outFn )
return rc; return rc;
} }
// score matcher callback
void _cmScMatchCb( cmScMatcher* p, void* arg, cmScMatcherResult_t* rp ) void _cmSpMatchMeasCb( cmScMatcher* p, void* arg, cmScMatcherResult_t* rp )
{ {
cmSp_t* sp = (cmSp_t*)arg; _cmSpMeasProc_t* m = (_cmSpMeasProc_t*)arg;
cmScMeas* sm = sp->meas; cmScMeas* sm = m->meas;
if( cmScMeasExec(sm, rp->mni, rp->locIdx, rp->scEvtIdx, rp->flags, rp->smpIdx, rp->pitch, rp->vel ) == cmOkRC ) if( cmScMeasExec(sm, rp->mni, rp->locIdx, rp->scEvtIdx, rp->flags, rp->smpIdx, rp->pitch, rp->vel ) == cmOkRC )
{ {
@ -313,190 +456,101 @@ void _cmScMatchCb( cmScMatcher* p, void* arg, cmScMatcherResult_t* rp )
// ignore set's which did not produce a valid value // ignore set's which did not produce a valid value
if(sm->set[i].value != DBL_MAX ) if(sm->set[i].value != DBL_MAX )
{ {
_cmScMeas_t* r = cmMemAllocZ(_cmScMeas_t,1); _cmSpMeas_t* r = cmMemAllocZ(_cmSpMeas_t,1);
r->markPtr = sp->curMarkPtr; r->markPtr = m->curMarkPtr;
r->setPtr = sm->set[i].sp; r->setPtr = sm->set[i].sp;
r->value = sm->set[i].value; r->value = sm->set[i].value;
r->cost = sm->set[i].match_cost; r->cost = sm->set[i].match_cost;
if( sp->list_beg == NULL ) if( m->list_beg == NULL )
{ {
sp->list_beg = r; m->list_beg = r;
sp->list_end = r; m->list_end = r;
} }
else else
{ {
sp->list_end->link = r; m->list_end->link = r;
sp->list_end = r; m->list_end = r;
} }
} }
} }
} }
// measurement proc callback
cmSpRC_t _cmScoreGenAllMeasurements(cmCtx_t* ctx, cmSp_t* sp, const cmChar_t* outFn) cmSpRC_t _cmSpProcMeasCb( void* arg, cmSp_t* sp, cmScoreProcSelId_t id, cmTlMarker_t* curMarkPtr )
{ {
cmSpRC_t rc = kOkSpRC; cmSpRC_t rc = kOkSpRC;
unsigned midiN = 7; _cmSpMeasProc_t* m = (_cmSpMeasProc_t*)arg;
unsigned scWndN = 10;
unsigned seqN = cmTimeLineSeqCount(sp->tlH);
double srate = cmTimeLineSampleRate(sp->tlH);
unsigned seqId;
assert( sp->srate == srate); switch( id )
// allocate the performance eval. object
sp->meas = cmScMeasAlloc( sp->ctx, NULL, sp->scH, sp->srate, sp->dynArray, sp->dynCnt );
assert( sp->meas != NULL );
// allocate the score matcher
sp->match = cmScMatcherAlloc(sp->ctx,NULL,sp->srate,sp->scH,scWndN,midiN,_cmScMatchCb,sp);
assert(sp->match != NULL );
// for each time line sequence
for(seqId=0; seqId<seqN; ++seqId)
{ {
cmTlObj_t* o0p = NULL; case kBeginSectionSpId:
// for each 'marker' in this time line sequence
while( (o0p = cmTimeLineNextTypeObj(sp->tlH, o0p, seqId, kMarkerTlId)) != NULL )
{
// get the 'marker' recd
cmTlMarker_t* markPtr = cmTimeLineMarkerObjPtr(sp->tlH,o0p);
assert( markPtr != NULL );
// if the marker does not have a valid start bar location
if( markPtr->bar == 0 )
continue;
// set the marker ptr (which is used in _cmScMatchCb())
sp->curMarkPtr = markPtr;
// get the end-of-marker time as a sample index
unsigned markEndSmpIdx = markPtr->obj.seqSmpIdx + markPtr->obj.durSmpCnt;
// get the score event associated with the marker's bar number.
const cmScoreEvt_t* evtPtr = cmScoreBarEvt(sp->scH,markPtr->bar);
assert( evtPtr != NULL );
// get the score location associated with the markers bar score event
const cmScoreLoc_t* locPtr = cmScoreEvtLoc(sp->scH,evtPtr);
assert( locPtr != NULL );
cmRptPrintf(&ctx->rpt,"Processing loc:%i seq:%i %s %s\n",locPtr->index,seqId,cmStringNullGuard(markPtr->obj.name),cmStringNullGuard(markPtr->text));
// reset the performance evaluation object // reset the performance evaluation object
if( cmScMeasReset(sp->meas) != cmOkRC ) if( cmScMeasReset(m->meas) != cmOkRC )
{ rc = cmErrMsg(&sp->err,kScoreMatchFailSpRC,"The score performance evaluation object failed on reset.");
cmErrMsg(&sp->err,kScoreMatchFailSpRC,"The score performance evaluation object failed on reset.");
continue;
}
// reset the score matcher to begin searching at the bar location m->curMarkPtr = curMarkPtr;
if( cmScMatcherReset(sp->match, locPtr->index ) != cmOkRC ) break;
{
cmErrMsg(&sp->err,kScoreMatchFailSpRC,"The score matcher reset failed on location: %i.",locPtr->index);
continue;
}
cmTlObj_t* o1p = o0p; case kEndSectionSpId:
break;
// as long as more MIDI events are available get the next MIDI msg
while( (rc == kOkSpRC) && (o1p = cmTimeLineNextTypeObj(sp->tlH, o1p, seqId, kMidiEvtTlId )) != NULL )
{
cmTlMidiEvt_t* mep = cmTimeLineMidiEvtObjPtr(sp->tlH,o1p);
assert(mep != NULL );
// if the msg falls after the end of the marker then we are done
if( mep->obj.seqSmpIdx != cmInvalidIdx && mep->obj.seqSmpIdx > markEndSmpIdx )
break;
// if the time line MIDI msg a note-on
if( mep->msg->status == kNoteOnMdId )
{
cmRC_t cmRC = cmScMatcherExec(sp->match, mep->obj.seqSmpIdx, mep->msg->status, mep->msg->u.chMsgPtr->d0, mep->msg->u.chMsgPtr->d1, NULL );
switch( cmRC )
{
case cmOkRC: // continue processing MIDI events
break;
case cmEofRC: // end of the score was encountered
break;
case cmInvalidArgRC: // p->eli was not set correctly
rc = cmErrMsg(&sp->err,kScoreMatchFailSpRC,"The score matcher failed due to an invalid argument.");
goto errLabel;
break;
case cmSubSysFailRC: // scan resync failed
rc = cmErrMsg(&sp->err,kScoreMatchFailSpRC,"The score matcher failed on resync.");
cmScMatcherPrint(sp->match);
//goto errLabel;
break;
default:
{ assert(0); }
}
}
}
rc = kOkSpRC;
}
} }
errLabel:
if((rc = _cmScWriteMeasFile(ctx, sp, outFn )) != kOkSpRC )
cmErrMsg(&sp->err,kFileFailSpRC,"The measurement output did not complete without errors.");
_cmScMeas_t* mp = sp->list_beg;
while(mp!=NULL)
{
_cmScMeas_t* np = mp->link;
cmMemFree(mp);
mp = np;
}
if( cmScMatcherFree(&sp->match) != cmOkRC )
cmErrMsg(&sp->err,kScoreMatchFailSpRC,"The score matcher release failed.");
if( cmScMeasFree(&sp->meas) != cmOkRC )
cmErrMsg(&sp->err,kScoreMatchFailSpRC,"The performance evaluation object failed.");
return rc; return rc;
} }
//================================================================================================== cmSpRC_t _cmScoreProcGenAllMeasurementsMain(cmCtx_t* ctx)
unsigned cmScoreProc(cmCtx_t* ctx)
{ {
cmSpRC_t rc = kOkSpRC; const cmChar_t* rsrcFn = "/home/kevin/.kc/time_line.js";
const cmChar_t* rsrcFn = "/home/kevin/.kc/time_line.js"; const cmChar_t* outFn = "/home/kevin/src/cmkc/src/kc/data/meas0.js";
const cmChar_t* outFn = "/home/kevin/src/cmkc/src/kc/data/meas0.js";
cmSp_t sp;
memset(&sp,0,sizeof(sp)); cmSpRC_t rc = kOkSpRC;
_cmSpMeasProc_t* m = cmMemAllocZ(_cmSpMeasProc_t,1);
cmSp_t s;
cmSp_t* sp = &s;
cmRptPrintf(&ctx->rpt,"Score Proc Start\n"); memset(sp,0,sizeof(s));
if((rc = _cmScoreProcInit(ctx,&sp,rsrcFn)) != kOkSpRC ) cmRptPrintf(&ctx->rpt,"Score Performance Evaluation Start\n");
// initialize the score processor
if((rc = _cmScoreProcInit(ctx,sp,rsrcFn,_cmSpProcMeasCb,_cmSpMatchMeasCb,m)) != kOkSpRC )
goto errLabel; goto errLabel;
_cmScoreGenAllMeasurements(ctx,&sp,outFn); // allocate the performance evaluation measurement object
m->meas = cmScMeasAlloc( sp->ctx, NULL, sp->scH, sp->srate, sp->dynArray, sp->dynCnt );
m->sp = sp;
// run the score processor
_cmScoreProcProcess(ctx,sp);
// write the results of the performance evaluation
if((rc = _cmScWriteMeasFile(ctx, sp, m, outFn )) != kOkSpRC )
cmErrMsg(&sp->err,kFileFailSpRC,"The measurement output did not complete without errors.");
// free the measurement linked list
_cmSpMeas_t* mp = m->list_beg;
while(mp!=NULL)
{
_cmSpMeas_t* np = mp->link;
cmMemFree(mp);
mp = np;
}
// free the performance evaluation object
if( cmScMeasFree(&m->meas) != cmOkRC )
cmErrMsg(&sp->err,kScoreMatchFailSpRC,"The performance evaluation object failed.");
//cmScorePrint(sp.scH,&ctx->rpt); //cmScorePrint(sp.scH,&ctx->rpt);
//cmScorePrintLoc(sp.scH); //cmScorePrintLoc(sp.scH);
errLabel: errLabel:
_cmScoreProcFinal(&sp); _cmScoreProcFinal(sp);
cmMemFree(m);
cmRptPrintf(&ctx->rpt,"Score Proc End\n"); cmRptPrintf(&ctx->rpt,"Score Proc End\n");
@ -504,3 +558,76 @@ unsigned cmScoreProc(cmCtx_t* ctx)
} }
//==================================================================================================
typedef struct
{
cmSp_t* sp;
} cmSpPerfProc_t;
void _cmSpMatchPerfCb( cmScMatcher* p, void* arg, cmScMatcherResult_t* rp )
{
cmSpPerfProc_t* m = (cmSpPerfProc_t*)arg;
}
cmSpRC_t _cmSpProcPerfCb( void* arg, cmSp_t* sp, cmScoreProcSelId_t id, cmTlMarker_t* curMarkPtr )
{
cmSpPerfProc_t* m = (cmSpPerfProc_t*)arg;
}
cmSpRC_t _cmScoreProcGenPerfMain(cmCtx_t* ctx)
{
const cmChar_t* rsrcFn = "/home/kevin/.kc/time_line.js";
const cmChar_t* outFn = "/home/kevin/src/cmkc/src/kc/data/meas0.js";
cmSpRC_t rc = kOkSpRC;
cmSpPerfProc_t* m = cmMemAllocZ(cmSpPerfProc_t,1);
cmSp_t s;
cmSp_t* sp = &s;
memset(sp,0,sizeof(s));
cmRptPrintf(&ctx->rpt,"Score Performance Start\n");
// initialize the score processor
if((rc = _cmScoreProcInit(ctx,sp,rsrcFn,_cmSpProcPerfCb,_cmSpMatchPerfCb,m)) != kOkSpRC )
goto errLabel;
m->sp = sp;
// run the score processor
_cmScoreProcProcess(ctx,sp);
// write the results of the performance evaluation
if((rc = _cmScWriteMeasFile(ctx, sp, m, outFn )) != kOkSpRC )
cmErrMsg(&sp->err,kFileFailSpRC,"The measurement output did not complete without errors.");
//cmScorePrint(sp.scH,&ctx->rpt);
//cmScorePrintLoc(sp.scH);
errLabel:
_cmScoreProcFinal(sp);
cmMemFree(m);
cmRptPrintf(&ctx->rpt,"Score Proc End\n");
return rc;
}
//==================================================================================================
cmSpRC_t cmScoreProc(cmCtx_t* ctx)
{
cmSpRC_t rc = kOkSpRC;
_cmScoreProcGenAllMeasurementsMain(ctx);
return rc;
}