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

cmXScore.c : Added dynamic level interpolation during edit file processing via upper case dynamic markings.

Browse Source
This commit is contained in:
kevin 2017-05-06 16:43:57 -04:00
parent c1076ddf0c
commit af84645fa4
1 changed files with 176 additions and 17 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

193
app/cmXScore.c
View File

@ -65,7 +65,9 @@ enum
kSubGraceXsFl = 0x02000000, // (s) " " " " " " - subtract time kSubGraceXsFl = 0x02000000, // (s) " " " " " " - subtract time
kAFirstGraceXsFl = 0x04000000, // (A) add time after first note kAFirstGraceXsFl = 0x04000000, // (A) add time after first note
kNFirstGraceXsFl = 0x08000000, // (n) grace notes start as soon as possible after first note and add time kNFirstGraceXsFl = 0x08000000, // (n) grace notes start as soon as possible after first note and add time
kDeleteXsFl = 0x10000000 kDeleteXsFl = 0x10000000,
kDynBegForkXsFl = 0x20000000,
kDynEndForkXsFl = 0x40000000
}; };
@ -175,6 +177,8 @@ typedef struct
cmXsComplexity_t cplx_max; cmXsComplexity_t cplx_max;
} cmXScore_t; } cmXScore_t;
void _cmXScoreReport( cmXScore_t* p, cmRpt_t* rpt, bool sortFl );
cmXScore_t* _cmXScoreHandleToPtr( cmXsH_t h ) cmXScore_t* _cmXScoreHandleToPtr( cmXsH_t h )
{ {
cmXScore_t* p = (cmXScore_t*)h.h; cmXScore_t* p = (cmXScore_t*)h.h;
@ -1165,7 +1169,7 @@ bool _cmXScoreFindTiedNote( cmXScore_t* p, cmXsMeas_t* mp, cmXsNote_t* n0p, boo
} }
} }
cmErrWarnMsg(&p->err,kUnterminatedTieXsRC,"The tied %c%c%i in measure %i was not terminated.",n0p->step,acc,n0p->octave,measNumb); cmErrWarnMsg(&p->err,kUnterminatedTieXsRC,"The tied %c%c%i in measure %i (tick:%i) was not terminated.",n0p->step,acc,n0p->octave,measNumb,n0p->tick);
return false; return false;
} }
@ -1789,7 +1793,7 @@ cmXsRC_t _cmXScoreProcessGraceNotes( cmXScore_t* p )
// verify that the first note is marked with kBegGraceXsFl // verify that the first note is marked with kBegGraceXsFl
if( cmIsNotFlag(gn0p->flags,kBegGraceXsFl) ) if( cmIsNotFlag(gn0p->flags,kBegGraceXsFl) )
{ {
rc = cmErrMsg(&p->err,kSyntaxErrorXsRC,"The first note in a grace note group in meas %i is not marked with a 'b'.", gn0p->meas->number ); rc = cmErrMsg(&p->err,kSyntaxErrorXsRC,"The first note in a grace note group in meas %i tick %i groupid:%i is not marked with a 'b'.", gn0p->meas->number, gn0p->tick, graceGroupId );
break; break;
} }
@ -1876,6 +1880,88 @@ cmXsRC_t _cmXScoreProcessGraceNotes( cmXScore_t* p )
} }
cmXsNote_t* _cmXScoreDynamicForkEndNote( cmXsNote_t* bnp )
{
assert( cmIsFlag(bnp->flags,kDynBegForkXsFl) );
cmXsMeas_t* mp = bnp->meas;
cmXsNote_t* np = bnp->slink;
for(; mp!=NULL; mp=mp->link,np = mp==NULL?NULL : mp->noteL)
{
for(; np!=NULL; np=np->slink)
{
if( cmIsFlag(np->flags,kDynEndForkXsFl) && np->voice->id == bnp->voice->id )
return np;
}
}
return NULL;
}
cmXsRC_t _cmXScoreProcessDynamicFork( cmXScore_t* p, cmXsNote_t* bnp )
{
cmXsNote_t* enp;
if((enp = _cmXScoreDynamicForkEndNote(bnp)) == NULL)
return cmErrMsg(&p->err,kSyntaxErrorXsRC,"The dynamic fork beginning in measure %i at tick %i voice %i was not terminated.", bnp->meas->number,bnp->tick,bnp->voice->id);
double begDynFrac = bnp->dynamics;
double begVelFrac = bnp->vel;
double endDynFrac = enp->dynamics;
double endVelFrac = enp->vel;
cmXsMeas_t* mp = bnp->meas;
cmXsNote_t* np = bnp->slink;
for(; mp!=NULL && np!=enp; mp=mp->link,np=mp==NULL ? NULL : mp->noteL)
{
for(; np!=NULL && np!=enp; np=np->slink)
/*
Conditioning this on np->dynamics==0 will may cause 'silent' notes to be assigned
a non-zero dynamics value - this is best fixed by using a different special value
for silent notes
BUG BUG BUG BUG BUG
*/
if( np->voice == bnp->voice && np->dynamics == 0 )
{
double frac = ((double)np->tick - bnp->tick) / (enp->tick - bnp->tick);
np->dynamics = lround(begDynFrac + ((endDynFrac - begDynFrac) * frac));
np->vel = lround(begVelFrac + ((endVelFrac - begVelFrac) * frac));
}
}
return kOkXsRC;
}
cmXsRC_t _cmXScoreProcessDynamicForks( cmXScore_t* p )
{
cmXsRC_t rc = kOkXsRC;
cmXsPart_t* pp = p->partL;
for(; pp!=NULL; pp=pp->link)
{
cmXsMeas_t* mp = pp->measL;
for(; mp!=NULL; mp=mp->link)
{
cmXsNote_t* np = mp->noteL;
for(; np!=NULL; np=np->slink )
{
if( cmIsFlag(np->flags,kDynBegForkXsFl) )
if((rc = _cmXScoreProcessDynamicFork(p,np)) != kOkXsRC )
return rc;
}
}
}
return rc;
}
//------------------------------------------------------------------------------------------- //-------------------------------------------------------------------------------------------
@ -1956,7 +2042,7 @@ cmXsNote_t* _cmXsReorderFindNote( cmXScore_t* p, unsigned measNumb, const cmXsR
{ {
if( 0 /*mp->number==17*/) if( 0 /*mp->number==43*/ )
printf("voice: %i %i loc:%i %i tick:%i %i pitch:%i %i idx:%i %i\n", printf("voice: %i %i loc:%i %i tick:%i %i pitch:%i %i idx:%i %i\n",
np->voice->id, r->voice, np->voice->id, r->voice,
np->locIdx , r->locIdx , np->locIdx , r->locIdx ,
@ -1969,10 +2055,11 @@ cmXsNote_t* _cmXsReorderFindNote( cmXScore_t* p, unsigned measNumb, const cmXsR
np->locIdx == r->locIdx && np->locIdx == r->locIdx &&
np->tick == r->tick && np->tick == r->tick &&
//np->duration == r->durtn && //np->duration == r->durtn &&
//np->rvalue == r->rval && np->rvalue == r->rval &&
np->pitch == r->midi && np->pitch == r->midi &&
index == r->idx ) index == r->idx )
{ {
//printf("Found: %i \n", r->midi);
return np; return np;
} }
} }
@ -2061,6 +2148,14 @@ cmXsRC_t _cmXScoreReorderMeas( cmXScore_t* p, unsigned measNumb, cmXsReorder_t*
rV[i].note->vel = _cmXScoreDynMarkArray[ rV[i].dynIdx ].vel; rV[i].note->vel = _cmXScoreDynMarkArray[ rV[i].dynIdx ].vel;
} }
// Set the dynamic fork begin/end flags for later _cmXScoreProcessDynamicForks()
if( cmIsFlag(rV[i].newFlags,kDynBegForkXsFl) )
rV[i].note->flags = cmSetFlag(rV[i].note->flags,kDynBegForkXsFl);
if( cmIsFlag(rV[i].newFlags,kDynEndForkXsFl) )
rV[i].note->flags = cmSetFlag(rV[i].note->flags,kDynEndForkXsFl);
// if the tie end flag was set // if the tie end flag was set
if( cmIsFlag(rV[i].newFlags,kTieEndXsFl) ) if( cmIsFlag(rV[i].newFlags,kTieEndXsFl) )
{ {
@ -2106,10 +2201,13 @@ cmXsRC_t _cmXScoreReorderMeas( cmXScore_t* p, unsigned measNumb, cmXsReorder_t*
} }
cmXsRC_t _cmXScoreReorderParseDyn(cmXScore_t* p, const cmChar_t* b, unsigned lineNumb, unsigned* dynIdxRef ) cmXsRC_t _cmXScoreReorderParseDyn(cmXScore_t* p, const cmChar_t* b, unsigned lineNumb, unsigned* dynIdxRef, unsigned* flagsRef )
{ {
cmXsRC_t rc = kOkXsRC; cmXsRC_t rc = kOkXsRC;
const cmChar_t* s; const cmChar_t* s = NULL;
bool begForkFl = false;
bool endForkFl = false;
*dynIdxRef = cmInvalidIdx; *dynIdxRef = cmInvalidIdx;
@ -2126,9 +2224,28 @@ cmXsRC_t _cmXScoreReorderParseDyn(cmXScore_t* p, const cmChar_t* b, unsigned lin
if( *s == '(' ) if( *s == '(' )
++s; // skip the paren. ++s; // skip the paren.
if( *s == '!')
{
endForkFl = true;
++s;
}
if( *s == 0 ) if( *s == 0 )
return cmErrMsg(&p->err,kSyntaxErrorXsRC,"Unexpected end-of-line on dynamics parsing on line:%i.",lineNumb); return cmErrMsg(&p->err,kSyntaxErrorXsRC,"Unexpected end-of-line on dynamics parsing on line:%i.",lineNumb);
// check for beg/end fork dynamic
if( isupper(*s) )
{
if( !endForkFl)
begForkFl=true;
}
else
{
if( endForkFl )
return cmErrMsg(&p->err,kSyntaxErrorXsRC,"A double exclaimation point (end-of-dynamic fork) must always be followed by an upper case M,P, or F. See line:%i",lineNumb);
}
unsigned i = 0; unsigned i = 0;
unsigned j = 0; unsigned j = 0;
unsigned n = 6; unsigned n = 6;
@ -2138,7 +2255,9 @@ cmXsRC_t _cmXScoreReorderParseDyn(cmXScore_t* p, const cmChar_t* b, unsigned lin
for(i=0; j<n && doneFl==false; ++i) for(i=0; j<n && doneFl==false; ++i)
{ {
switch(s[i]) char c = tolower(s[i]);
switch(c)
{ {
case 's': case 's':
case 'm': case 'm':
@ -2146,7 +2265,7 @@ cmXsRC_t _cmXScoreReorderParseDyn(cmXScore_t* p, const cmChar_t* b, unsigned lin
case 'f': case 'f':
case '+': case '+':
case '-': case '-':
mark[j++] = s[i]; mark[j++] = c;
break; break;
case ')': // ending paren. case ')': // ending paren.
@ -2173,6 +2292,12 @@ cmXsRC_t _cmXScoreReorderParseDyn(cmXScore_t* p, const cmChar_t* b, unsigned lin
*dynIdxRef = j; *dynIdxRef = j;
if( begForkFl )
*flagsRef = cmSetFlag(*flagsRef,kDynBegForkXsFl);
if( endForkFl )
*flagsRef = cmSetFlag(*flagsRef,kDynEndForkXsFl);
return rc; return rc;
} }
@ -2414,14 +2539,14 @@ cmXsRC_t _cmXsApplyEditFile( cmXScore_t* p, const cmChar_t* fn )
} }
// parse the dynamic marking following a '!'
if((rc = _cmXScoreReorderParseDyn(p,b,ln+1,&r.dynIdx)) != kOkXsRC )
goto errLabel;
// parse the flag edits following a '~' // parse the flag edits following a '~'
if((rc = _cmXScoreReorderParseFlags(p,b,ln+1, &r.newFlags)) != kOkXsRC ) if((rc = _cmXScoreReorderParseFlags(p,b,ln+1, &r.newFlags)) != kOkXsRC )
goto errLabel; goto errLabel;
// parse the dynamic marking following a '!'
if((rc = _cmXScoreReorderParseDyn(p,b,ln+1,&r.dynIdx, &r.newFlags)) != kOkXsRC )
goto errLabel;
// parse the @newtick marker // parse the @newtick marker
if((rc = _cmXScoreReorderParseTick(p, b, ln+1, &r.newTick)) != kOkXsRC ) if((rc = _cmXScoreReorderParseTick(p, b, ln+1, &r.newTick)) != kOkXsRC )
goto errLabel; goto errLabel;
@ -2505,6 +2630,15 @@ cmXsRC_t _cmXsApplyEditFile( cmXScore_t* p, const cmChar_t* fn )
// inserting grace notes may have left the score unsorted // inserting grace notes may have left the score unsorted
_cmXScoreSort(p); _cmXScoreSort(p);
// process the dynamic forks
_cmXScoreProcessDynamicForks(p);
_cmXScoreReport(p, NULL, true );
errLabel: errLabel:
cmFileClose(&fH); cmFileClose(&fH);
cmMemFree(b); cmMemFree(b);
@ -3067,12 +3201,31 @@ void _cmXScoreReportNote( cmRpt_t* rpt, const cmXsNote_t* note,unsigned index )
if( note->graceGroupId != 0) if( note->graceGroupId != 0)
cmRptPrintf(rpt," g=%i",note->graceGroupId); cmRptPrintf(rpt," g=%i",note->graceGroupId);
/*
if( cmIsFlag(note->flags,kBegGraceXsFl) )
cmRptPrintf(rpt," B");
if( cmIsFlag(note->flags,kEndGraceXsFl) )
cmRptPrintf(rpt," E");
if( note->dynamics != 0)
cmRptPrintf(rpt," dyn=%i",note->dynamics);
if( cmIsFlag(note->flags,kDynBegForkXsFl) )
cmRptPrintf(rpt," B");
if( cmIsFlag(note->flags,kDynEndForkXsFl) )
cmRptPrintf(rpt," E");
*/
} }
void cmXScoreReport( cmXsH_t h, cmRpt_t* rpt, bool sortFl ) void _cmXScoreReport( cmXScore_t* p, cmRpt_t* rpt, bool sortFl )
{ {
cmXScore_t* p = _cmXScoreHandleToPtr(h); if( rpt == NULL )
rpt = p->err.rpt;
cmXsPart_t* pp = p->partL; cmXsPart_t* pp = p->partL;
for(; pp!=NULL; pp=pp->link) for(; pp!=NULL; pp=pp->link)
@ -3141,6 +3294,12 @@ void cmXScoreReport( cmXsH_t h, cmRpt_t* rpt, bool sortFl )
} }
} }
void cmXScoreReport( cmXsH_t h, cmRpt_t* rpt, bool sortFl )
{
cmXScore_t* p = _cmXScoreHandleToPtr(h);
return _cmXScoreReport(p,rpt,sortFl);
}
void _cmXScoreGenEditFileWrite( void* arg, const cmChar_t* text ) void _cmXScoreGenEditFileWrite( void* arg, const cmChar_t* text )
{ {
if( text != NULL && arg != NULL ) if( text != NULL && arg != NULL )
@ -3756,7 +3915,7 @@ cmXsRC_t cmXScoreTest(
if( editFn!=NULL && !cmFsIsFile(editFn) ) if( editFn!=NULL && !cmFsIsFile(editFn) )
{ {
cmRptPrintf(&ctx->rpt,"The edit file %s does not exist. A new edit file is therefore being created.",editFn); cmRptPrintf(&ctx->rpt,"The edit file %s does not exist. A new edit file will be created.",editFn);
cmXScoreGenEditFile(ctx,xmlFn,editFn); cmXScoreGenEditFile(ctx,xmlFn,editFn);
editFn = NULL; editFn = NULL;
} }