diff options
author | Michele Calgaro <michele.calgaro@yahoo.it> | 2020-12-06 21:23:48 +0900 |
---|---|---|
committer | Michele Calgaro <michele.calgaro@yahoo.it> | 2020-12-06 21:34:48 +0900 |
commit | 84498d97e27f79e7e919b42bbe54208a02856aaf (patch) | |
tree | 8a66f6e1a88bc2304b453796663ae75f20425490 /libtdemid/player.cc | |
parent | 8bc0bc7fc67437fbf757283604104e998ad2fda7 (diff) | |
download | tdelibs-84498d97e27f79e7e919b42bbe54208a02856aaf.tar.gz tdelibs-84498d97e27f79e7e919b42bbe54208a02856aaf.zip |
Renaming of files in preparation for code style tools.
Signed-off-by: Michele Calgaro <michele.calgaro@yahoo.it>
(cherry picked from commit 4f99f868f09bbffa2e15733b8b7c78eba07a199e)
Diffstat (limited to 'libtdemid/player.cc')
-rw-r--r-- | libtdemid/player.cc | 959 |
1 files changed, 0 insertions, 959 deletions
diff --git a/libtdemid/player.cc b/libtdemid/player.cc deleted file mode 100644 index ff7093496..000000000 --- a/libtdemid/player.cc +++ /dev/null @@ -1,959 +0,0 @@ -/************************************************************************** - - player.cc - class MidiPlayer. Plays a set of tracks - This file is part of LibKMid 0.9.5 - Copyright (C) 1997,98,99,2000 Antonio Larrosa Jimenez - LibKMid's homepage : http://www.arrakis.es/~rlarrosa/libtdemid.html - - This library is free software; you can redistribute it and/or - modify it under the terms of the GNU Library General Public - License as published by the Free Software Foundation; either - version 2 of the License, or (at your option) any later version. - - This library is distributed in the hope that it will be useful, - but WITHOUT ANY WARRANTY; without even the implied warranty of - MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU - Library General Public License for more details. - - You should have received a copy of the GNU Library General Public License - along with this library; see the file COPYING.LIB. If not, write to - the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, - Boston, MA 02110-1301, USA. - - $Id$ - - Send comments and bug fixes to Antonio Larrosa <larrosa@kde.org> - -***************************************************************************/ -#include "player.h" -#include "sndcard.h" -#include "midispec.h" -#include <string.h> -#include <unistd.h> -#include <sys/time.h> -#include "midistat.h" -#include "mt32togm.h" - -//#define PLAYERDEBUG -//#define GENERAL_DEBUG_MESSAGES - -#define T2MS(ticks) (((double)ticks)*(double)60000L)/((double)tempoToMetronomeTempo(tempo)*(double)info->ticksPerCuarterNote) - -#define MS2T(ms) (((ms)*(double)tempoToMetronomeTempo(tempo)*(double)info->ticksPerCuarterNote)/((double)60000L)) - -#define REMOVEDUPSTRINGS - -MidiPlayer::MidiPlayer(DeviceManager *midi_,PlayerController *pctl) -{ - midi=midi_; - info=NULL; - tracks=NULL; - songLoaded=0; - ctl=pctl; - spev=NULL; - na=NULL; - parsesong=true; - generatebeats=false; -} - -MidiPlayer::~MidiPlayer() -{ - removeSpecialEvents(); - removeSong(); -} - -void MidiPlayer::removeSong(void) -{ - if ((songLoaded)&&(tracks!=NULL)) - { -#ifdef PLAYERDEBUG - printf("Removing song from memory\n"); -#endif - int i=0; - while (i<info->ntracks) - { - if (tracks[i]!=NULL) delete tracks[i]; - i++; - } - delete tracks; - tracks=NULL; - if (info!=NULL) - { - delete info; - info=NULL; - } - } - songLoaded=0; -} - -int MidiPlayer::loadSong(const char *filename) -{ - removeSong(); -#ifdef PLAYERDEBUG - printf("Loading Song : %s\n",filename); -#endif - info=new MidiFileInfo; - int ok; - tracks=readMidiFile(filename,info,ok); - if (ok<0) return ok; - if (tracks==NULL) return -4; - - parseInfoData(info,tracks,ctl->ratioTempo); - - if (parsesong) - { - parseSpecialEvents(); - if (generatebeats) generateBeats(); - } - - songLoaded=1; - return 0; -} - -void MidiPlayer::insertBeat(SpecialEvent *ev,ulong ms,int num,int den) -{ - SpecialEvent *beat=new SpecialEvent; - beat->next=ev->next; - ev->next=beat; - beat->id=1; - beat->type=7; - beat->absmilliseconds=ms; - beat->num=num; - beat->den=den; -} - - -void MidiPlayer::generateBeats(void) -{ -#ifdef PLAYERDEBUG - printf("player::Generating Beats...\n"); -#endif - - if (spev==NULL) return; - SpecialEvent *ev=spev; - SpecialEvent *nextev=ev->next; - ulong tempo=(ulong)(500000 * ctl->ratioTempo); - int i=1; - int num=4; - int den=4; - // ulong beatstep=((double)tempo*4/(den*1000)); - // ulong beatstep=T2MS(info->ticksPerCuarterNote*(4/den)); - double ticksleft=(((double)info->ticksPerCuarterNote*4)/den); - - double beatstep=T2MS(ticksleft); - double nextbeatms=0; - double lastbeatms=0; - double measurems=0; - - while (nextev!=NULL) - { - switch (ev->type) - { - case (0): // End of list - { - };break; - case (1): // Text - case (2): // Lyrics - { - };break; - case (3): // Change Tempo - { - lastbeatms=ev->absmilliseconds; - ticksleft=MS2T(nextbeatms-lastbeatms); - tempo=ev->tempo; - nextbeatms=lastbeatms+T2MS(ticksleft); - // printf("Change at %lu to %d\n",ev->absmilliseconds,ev->tempo); - // beatstep=((double)tempo*4/(den*1000)); - beatstep=T2MS(((static_cast<double>(info->ticksPerCuarterNote)*4)/den)); - };break; - case (6): // Change number of beats per measure - { - num=ev->num; - i=1; - den=ev->den; - // printf("Change at %lu to %d/%d\n",ev->absmilliseconds,num,den); - // beatstep=((double)tempo*4/(den*1000)); - // beatstep=T2MS(info->ticksPerCuarterNote*(4/den)); - beatstep=T2MS((((double)info->ticksPerCuarterNote*4)/den)); - nextbeatms=ev->absmilliseconds; - };break; - }; - if (nextev->absmilliseconds>nextbeatms) - { - //printf("Adding %d,%d\n",num,tot); - //printf("beat at %g , %d/%d\n",nextbeatms,i,num); - //printf(" %ld %d\n",nextev->absmilliseconds,nextev->type); - if (i == 1) { - measurems=nextbeatms; - } - insertBeat(ev, static_cast<unsigned long>(nextbeatms), i++, num); - if (i > num) { - i=1; - } - lastbeatms=nextbeatms; - nextbeatms+=beatstep; - // nextbeatms=measurems+beatstep*i; - - ticksleft = ( (static_cast<double>(info->ticksPerCuarterNote)*4) / den); - - } - - ev=ev->next; - nextev=ev->next; - } - - /* ev==NULL doesn't indicate the end of the song, so continue generating beats */ - - if (ev!=NULL) - { - if (ev->type==0) - { - ev=spev; - /* Looking if ev->next is NULL is not needed because - we are sure that a ev->type == 0 exists, we just have - to assure that the first spev is not the only one */ - if (ev->next!=NULL) - while (ev->next->type!=0) ev=ev->next; - } - while (nextbeatms<info->millisecsTotal) - { - // printf("beat2 at %g , %d/%d\n",nextbeatms,i,num); - if (i==1) measurems=nextbeatms; - insertBeat(ev, static_cast<unsigned long>(nextbeatms), i++, num); - if (i>num) i=1; - nextbeatms+=beatstep; - ev=ev->next; - } - } - - /* Regenerate IDs */ - - ev=spev; - i=1; - while (ev!=NULL) - { - ev->id=i++; - ev=ev->next; - } - - -#ifdef PLAYERDEBUG - printf("player::Beats Generated\n"); -#endif - -} - -void MidiPlayer::removeSpecialEvents(void) -{ - SpecialEvent * ev=spev; - while (spev!=NULL) - { - ev=spev->next; - delete spev; - spev=ev; - } - delete na; - na=0; -} - -void MidiPlayer::parseSpecialEvents(void) -{ -#ifdef PLAYERDEBUG - printf("player::Parsing...\n"); -#endif - removeSpecialEvents(); - spev=new SpecialEvent; - if (spev==NULL) return; - SpecialEvent *pspev=spev; - pspev->type=0; - pspev->ticks=0; - if (na) delete na; - na=new NoteArray(); - if (!na) { delete spev; spev=0L; return; }; - int trk; - int minTrk; - double minTime=0; - double maxTime; - ulong tempo=(ulong)(500000 * (ctl->ratioTempo)); - ulong firsttempo=0; - for (int i=0;i<info->ntracks;i++) - { - tracks[i]->init(); - tracks[i]->changeTempo(tempo); - } - MidiEvent *ev=new MidiEvent; - //ulong mspass; - double prevms=0; - int spev_id=1; - int j; - int parsing=1; -#ifdef REMOVEDUPSTRINGS - char lasttext[1024]; - ulong lasttexttime=0; - lasttext[0]=0; - int lasttexttype=0; -#endif - while (parsing) - { - prevms=minTime; - trk=0; - minTrk=0; - maxTime=minTime + 2 * 60000L; - minTime=maxTime; - parsing=0; - while (trk<info->ntracks) - { - if (tracks[trk]->absMsOfNextEvent()<minTime) - { - minTrk=trk; - minTime=tracks[minTrk]->absMsOfNextEvent(); - parsing=1; - } - trk++; - } - // if ((minTime==maxTime)) - if (parsing==0) - { - // parsing=0; -#ifdef PLAYERDEBUG - printf("END of parsing\n"); -#endif - } - else - { - // mspass=(ulong)(minTime-prevms); - trk=0; - while (trk<info->ntracks) - { - tracks[trk]->currentMs(minTime); - trk++; - } - } - trk=minTrk; - tracks[trk]->readEvent(ev); - switch (ev->command) - { - case (MIDI_NOTEON) : - if (ev->vel==0) na->add((ulong)minTime,ev->chn,0, ev->note); - else na->add((ulong)minTime,ev->chn,1,ev->note); - break; - case (MIDI_NOTEOFF) : - na->add((ulong)minTime,ev->chn,0, ev->note); - break; - case (MIDI_PGM_CHANGE) : - na->add((ulong)minTime,ev->chn, 2,ev->patch); - break; - case (MIDI_SYSTEM_PREFIX) : - { - if ((ev->command|ev->chn)==META_EVENT) - { - switch (ev->d1) - { - case (1) : - case (5) : - { - if (pspev!=NULL) - { - pspev->absmilliseconds=(ulong)minTime; - pspev->type=ev->d1; - pspev->id=spev_id++; -#ifdef PLAYERDEBUG - printf("ev->length %ld\n",ev->length); - -#endif - strncpy(pspev->text,(char *)ev->data, - (ev->length>= sizeof(lasttext))? sizeof(lasttext)-1 : (ev->length) ); - pspev->text[(ev->length>= sizeof(lasttext))? sizeof(lasttext)-1:(ev->length)]=0; -#ifdef PLAYERDEBUG - printf("(%s)(%s)\n",pspev->text,lasttext); -#endif -#ifdef REMOVEDUPSTRINGS - if ((strcmp(pspev->text,lasttext)!=0)||(pspev->absmilliseconds!=lasttexttime)||(pspev->type!=lasttexttype)) - { - lasttexttime=pspev->absmilliseconds; - lasttexttype=pspev->type; - strncpy(lasttext, pspev->text, 1024); - lasttext[sizeof(lasttext)-1] = 0; -#endif - pspev->next=new SpecialEvent; -#ifdef PLAYERDEBUG - if (pspev->next==NULL) printf("pspev->next=NULL\n"); -#endif - pspev=pspev->next; -#ifdef REMOVEDUPSTRINGS - } -#endif - } - } - break; - case (ME_SET_TEMPO) : - { - if (pspev!=NULL) - { - pspev->absmilliseconds=(ulong)minTime; - pspev->type=3; - pspev->id=spev_id++; - tempo=(ulong)(((ev->data[0]<<16)|(ev->data[1]<<8)|(ev->data[2])) * ctl->ratioTempo); - pspev->tempo=tempo; - if (firsttempo==0) firsttempo=tempo; - for (j=0;j<info->ntracks;j++) - { - tracks[j]->changeTempo(tempo); - } - pspev->next=new SpecialEvent; - pspev=pspev->next; - } - } - break; - case (ME_TIME_SIGNATURE) : - { - if (pspev!=NULL) - { - pspev->absmilliseconds=(ulong)minTime; - pspev->type=6; - pspev->id=spev_id++; - pspev->num=ev->d2; - pspev->den=ev->d3; - pspev->next=new SpecialEvent; - pspev=pspev->next; - } - } - break; - } - } - } - break; - } - } - - delete ev; - pspev->type=0; - pspev->absmilliseconds=(ulong)prevms; - pspev->next=NULL; - if (firsttempo==0) firsttempo=tempo; - ctl->tempo=firsttempo; - - //writeSPEV(); - for (int i=0;i<info->ntracks;i++) - { - tracks[i]->init(); - } -} - -/* -NoteArray *MidiPlayer::parseNotes(void) -{ -#ifdef PLAYERDEBUG - printf("player::Parsing Notes...\n"); -#endif - NoteArray *na=new NoteArray(); - int trk; - int minTrk; - double minTime=0; - double maxTime; - for (int i=0;i<info->ntracks;i++) - { - tracks[i]->init(); - }; - ulong tempo=1000000; - ulong tmp; - Midi_event *ev=new Midi_event; - //ulong mspass; - double prevms=0; - int j; - int parsing=1; - while (parsing) - { - prevms=minTime; - trk=0; - minTrk=0; - maxTime=minTime + 2 * 60000L; - minTime=maxTime; - while (trk<info->ntracks) - { - if (tracks[trk]->absMsOfNextEvent()<minTime) - { - minTrk=trk; - minTime=tracks[minTrk]->absMsOfNextEvent(); - }; - trk++; - }; - if ((minTime==maxTime)) - { - parsing=0; -#ifdef PLAYERDEBUG - printf("END of parsing\n"); -#endif - } - else - { - // mspass=(ulong)(minTime-prevms); - trk=0; - while (trk<info->ntracks) - { - tracks[trk]->currentMs(minTime); - trk++; - }; - }; - trk=minTrk; - tracks[trk]->readEvent(ev); - if (ev->command==MIDI_NOTEON) - { - if (ev->vel==0) {printf("note off at %g\n",minTime);na->add((ulong)minTime,ev->chn,0, ev->note);} - else {printf("note on at %g\n",minTime);na->add((ulong)minTime,ev->chn,1,ev->note);} - } - else - if (ev->command==MIDI_NOTEOFF) na->add((ulong)minTime,ev->chn,0, ev->note); - if (ev->command==MIDI_PGM_CHANGE) na->add((ulong)minTime,ev->chn, 2,ev->patch); - if (ev->command==MIDI_SYSTEM_PREFIX) - { - if (((ev->command|ev->chn)==META_EVENT)&&(ev->d1==ME_SET_TEMPO)) - { - tempo=(ev->data[0]<<16)|(ev->data[1]<<8)|(ev->data[2]); - for (j=0;j<info->ntracks;j++) - { - tracks[j]->changeTempo(tempo); - }; - }; - }; - - }; - - delete ev; - for (int i=0;i<info->ntracks;i++) - { - tracks[i]->init(); - }; - return na; -}; -*/ - -void MidiPlayer::play(bool calloutput,void output(void)) -{ -#ifdef PLAYERDEBUG - printf("Playing...\n"); -#endif - - if (midi->midiPorts()+midi->synthDevices()==0) - { - fprintf(stderr,"Player :: There are no midi ports !\n"); - ctl->error=1; - return; - } - - midi->openDev(); - if (midi->ok()==0) - { - fprintf(stderr,"Player :: Couldn't play !\n"); - ctl->error=1; - return; - } - midi->setVolumePercentage(ctl->volumepercentage); - midi->initDev(); - // parsePatchesUsed(tracks,info,ctl->gm); - midi->setPatchesToUse(info->patchesUsed); - - int trk; - int minTrk; - double minTime=0; - double maxTime; - int i; - ulong tempo=(ulong)(500000 * ctl->ratioTempo); - for (i=0;i<info->ntracks;i++) - { - tracks[i]->init(); - tracks[i]->changeTempo(tempo); - } - - midi->tmrStart(info->ticksPerCuarterNote); - MidiEvent *ev=new MidiEvent; - ctl->ev=ev; - ctl->ticksTotal=info->ticksTotal; - ctl->ticksPlayed=0; - //ctl->millisecsPlayed=0; - ulong ticksplayed=0; - double absTimeAtChangeTempo=0; - double absTime=0; - double diffTime=0; - MidiStatus *midistat; - //ulong mspass; - double prevms=0; - int j; - int halt=0; - ctl->tempo=tempo; - ctl->num=4; - ctl->den=4; - int playing; - ctl->paused=0; - if ((ctl->message!=0)&&(ctl->message & PLAYER_SETPOS)) - { - ctl->moving=1; - ctl->message&=~PLAYER_SETPOS; - midi->sync(1); - midi->tmrStop(); - midi->closeDev(); - midistat = new MidiStatus(); - setPos(ctl->gotomsec,midistat); - minTime=ctl->gotomsec; - prevms=(ulong)minTime; - midi->openDev(); - midi->tmrStart(info->ticksPerCuarterNote); - diffTime=ctl->gotomsec; - midistat->sendData(midi,ctl->gm); - delete midistat; - midi->setPatchesToUse(info->patchesUsed); - ctl->moving=0; - } else - for (i=0;i<16;i++) - { - if (ctl->forcepgm[i]) - { - midi->chnPatchChange(i, ctl->pgm[i]); - } - } - - timeval begintv; - gettimeofday(&begintv, NULL); - ctl->beginmillisec=begintv.tv_sec*1000+begintv.tv_usec/1000; - ctl->OK=1; - ctl->playing=playing=1; - - while (playing) - { - /* - if (ctl->message!=0) - { - if (ctl->message & PLAYER_DOPAUSE) - { - diffTime=minTime; - ctl->message&=~PLAYER_DOPAUSE; - midi->sync(1); - midi->tmrStop(); - ctl->paused=1; - midi->closeDev(); - while ((ctl->paused)&&(!(ctl->message&PLAYER_DOSTOP)) - &&(!(ctl->message&PLAYER_HALT))) sleep(1); - midi->openDev(); - midi->tmrStart(); - ctl->OK=1; - printf("Continue playing ... \n"); - }; - if (ctl->message & PLAYER_DOSTOP) - { - ctl->message&=~PLAYER_DOSTOP; - playing=0; - }; - if (ctl->message & PLAYER_HALT) - { - ctl->message&=~PLAYER_HALT; - playing=0; - halt=1; - }; - if (ctl->message & PLAYER_SETPOS) - { - ctl->moving=1; - ctl->message&=~PLAYER_SETPOS; - midi->sync(1); - midi->tmrStop(); - midi->closeDev(); - midistat = new midiStat(); - SetPos(ctl->gotomsec,midistat); - minTime=ctl->gotomsec; - prevms=(ulong)minTime; - midi->openDev(); - midi->tmrStart(); - diffTime=ctl->gotomsec; - ctl->moving=0; - midistat->sendData(midi,ctl->gm); - delete midistat; - ctl->OK=1; - while (ctl->OK==1) ; - ctl->moving=0; - }; - }; - */ - prevms=minTime; - // ctl->millisecsPlayed=minTime; - trk=0; - minTrk=0; - maxTime=minTime + 120000L /* milliseconds */; - minTime=maxTime; - playing=0; - while (trk<info->ntracks) - { - if (tracks[trk]->absMsOfNextEvent()<minTime) - { - minTrk=trk; - minTime=tracks[minTrk]->absMsOfNextEvent(); - playing=1; - } - trk++; - } -#ifdef PLAYERDEBUG - printf("minTime %g\n",minTime); -#endif - // if ((minTime==maxTime)/* || (minTicks> 60000L)*/) - if (playing==0) - { - // playing=0; -#ifdef PLAYERDEBUG - printf("END of playing\n"); -#endif - } - else - { - // mspass=(ulong)(minTime-prevms); - trk=0; - while (trk<info->ntracks) - { - tracks[trk]->currentMs(minTime); - trk++; - } - midi->wait(minTime-diffTime); - } - trk=minTrk; - tracks[trk]->readEvent(ev); - switch (ev->command) - { - case (MIDI_NOTEON) : - midi->noteOn(ev->chn, ev->note, ev->vel);break; - case (MIDI_NOTEOFF): - midi->noteOff(ev->chn, ev->note, ev->vel);break; - case (MIDI_KEY_PRESSURE) : - midi->keyPressure(ev->chn, ev->note,ev->vel);break; - case (MIDI_PGM_CHANGE) : - if (!ctl->forcepgm[ev->chn]) - midi->chnPatchChange(ev->chn, (ctl->gm==1)?(ev->patch):(MT32toGM[ev->patch]));break; - case (MIDI_CHN_PRESSURE) : - midi->chnPressure(ev->chn, ev->vel);break; - case (MIDI_PITCH_BEND) : - midi->chnPitchBender(ev->chn, ev->d1,ev->d2);break; - case (MIDI_CTL_CHANGE) : - midi->chnController(ev->chn, ev->ctl,ev->d1);break; - case (MIDI_SYSTEM_PREFIX) : - if ((ev->command|ev->chn)==META_EVENT) - { - if ((ev->d1==5)||(ev->d1==1)) - { - ctl->SPEVplayed++; - } - if (ev->d1==ME_SET_TEMPO) - { - absTimeAtChangeTempo=absTime; - ticksplayed=0; - ctl->SPEVplayed++; - tempo=(ulong)(((ev->data[0]<<16)|(ev->data[1]<<8)|(ev->data[2]))*ctl->ratioTempo); -#ifdef PLAYERDEBUG - printf("Tempo : %ld %g (ratio : %g)\n",tempo,tempoToMetronomeTempo(tempo),ctl->ratioTempo); -#endif - midi->tmrSetTempo((int)tempoToMetronomeTempo(tempo)); - ctl->tempo=tempo; - for (j=0;j<info->ntracks;j++) - { - tracks[j]->changeTempo(tempo); - } - } - if (ev->d1==ME_TIME_SIGNATURE) - { - ctl->num=ev->d2; - ctl->den=ev->d3; - ctl->SPEVplayed++; - } - } - break; - } - if (calloutput) - { - midi->sync(); - output(); - } - - } - ctl->ev=NULL; - delete ev; -#ifdef PLAYERDEBUG - printf("Syncronizing ...\n"); -#endif - if (halt) - midi->sync(1); - else - midi->sync(); -#ifdef PLAYERDEBUG - printf("Closing device ...\n"); -#endif - midi->allNotesOff(); - midi->closeDev(); - ctl->playing=0; -#ifdef PLAYERDEBUG - printf("Bye...\n"); -#endif - ctl->OK=1; - ctl->finished=1; -} - - -void MidiPlayer::setPos(ulong gotomsec,MidiStatus *midistat) -{ - int trk,minTrk; - ulong tempo=(ulong)(500000 * ctl->ratioTempo); - double minTime=0,maxTime,prevms=0; - int i,j,likeplaying=1; - - MidiEvent *ev=new MidiEvent; - ctl->SPEVplayed=0; - for (i=0;i<info->ntracks;i++) - { - tracks[i]->init(); - tracks[i]->changeTempo(tempo); - } - - for (i=0;i<16;i++) - { - if (ctl->forcepgm[i]) midistat->chnPatchChange(i, ctl->pgm[i]); - } - - while (likeplaying) - { - trk=0; - minTrk=0; - maxTime=minTime + 120000L; /*milliseconds (2 minutes)*/ - minTime=maxTime; - while (trk<info->ntracks) - { - if (tracks[trk]->absMsOfNextEvent()<minTime) - { - minTrk=trk; - minTime=tracks[minTrk]->absMsOfNextEvent(); - } - trk++; - } - if (minTime==maxTime) - { - likeplaying=0; -#ifdef GENERAL_DEBUG_MESSAGES - printf("END of likeplaying\n"); -#endif - } - else - { - if (minTime>=gotomsec) - { - prevms=gotomsec; - likeplaying=0; -#ifdef GENERAL_DEBUG_MESSAGES - printf("Position reached !! \n"); -#endif - minTime=gotomsec; - } - else - { - prevms=minTime; - } - trk=0; - while (trk<info->ntracks) - { - tracks[trk]->currentMs(minTime); - trk++; - } - } - - if (likeplaying) - { - trk=minTrk; - tracks[trk]->readEvent(ev); - switch (ev->command) - { - /* case (MIDI_NOTEON) : - midistat->noteOn(ev->chn, ev->note, ev->vel);break; - case (MIDI_NOTEOFF): - midistat->noteOff(ev->chn, ev->note, ev->vel);break; - case (MIDI_KEY_PRESSURE) : - midistat->keyPressure(ev->chn, ev->note,ev->vel);break; - */ - case (MIDI_PGM_CHANGE) : - if (!ctl->forcepgm[ev->chn]) midistat->chnPatchChange(ev->chn, ev->patch);break; - case (MIDI_CHN_PRESSURE) : - midistat->chnPressure(ev->chn, ev->vel);break; - case (MIDI_PITCH_BEND) : - midistat->chnPitchBender(ev->chn, ev->d1,ev->d2);break; - case (MIDI_CTL_CHANGE) : - midistat->chnController(ev->chn, ev->ctl,ev->d1);break; - case (MIDI_SYSTEM_PREFIX) : - if ((ev->command|ev->chn)==META_EVENT) - { - if ((ev->d1==5)||(ev->d1==1)) - { - ctl->SPEVplayed++; - } - if (ev->d1==ME_SET_TEMPO) - { - ctl->SPEVplayed++; - tempo=(ulong)(((ev->data[0]<<16)|(ev->data[1]<<8)|(ev->data[2]))*ctl->ratioTempo); - - midistat->tmrSetTempo((int)tempoToMetronomeTempo(tempo)); - for (j=0;j<info->ntracks;j++) - { - tracks[j]->changeTempo(tempo); - } - } - if (ev->d1==ME_TIME_SIGNATURE) - { - ctl->num=ev->d2; - ctl->den=ev->d3; - ctl->SPEVplayed++; - } - } - break; - } - } - } - delete ev; - ctl->tempo=tempo; -} - - -void MidiPlayer::debugSpecialEvents(void) -{ - SpecialEvent *pspev=spev; - printf("**************************************\n"); - while ((pspev!=NULL)&&(pspev->type!=0)) - { - printf("t:%d ticks:%d diff:%ld abs:%ld s:%s tempo:%ld\n",pspev->type,pspev->ticks,pspev->diffmilliseconds,pspev->absmilliseconds,pspev->text,pspev->tempo); - pspev=pspev->next; - } - -} - -void MidiPlayer::setParseSong(bool b) -{ - parsesong=b; -} - -void MidiPlayer::setGenerateBeats(bool b) -{ - generatebeats=b; -} - -void MidiPlayer::setTempoRatio(double ratio) -{ - if (songLoaded) - { - ctl->ratioTempo=ratio; - parseInfoData(info,tracks,ctl->ratioTempo); - if (parsesong) - { - parseSpecialEvents(); - if (generatebeats) generateBeats(); - - } - } - else - { - ctl->tempo=(ulong)((ctl->tempo*ctl->ratioTempo)/ratio); - ctl->ratioTempo=ratio; - } - -} - -#undef T2MS -#undef MS2T |