mirror of
https://github.com/libretro/scummvm.git
synced 2024-12-18 15:48:48 +00:00
aa3766018f
svn-id: r6726
126 lines
2.9 KiB
C++
126 lines
2.9 KiB
C++
/* ScummVM - Scumm Interpreter
|
|
* Copyright (C) 2001-2003 The ScummVM project
|
|
*
|
|
* This program is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU General Public License
|
|
* as published by the Free Software Foundation; either version 2
|
|
* of the License, or (at your option) any later version.
|
|
|
|
* This program 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 General Public License for more details.
|
|
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this program; if not, write to the Free Software
|
|
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
|
*
|
|
* $Header$
|
|
*
|
|
*/
|
|
|
|
// #include "stdafx.h"
|
|
#include "midistreamer.h"
|
|
#include "common/util.h"
|
|
|
|
MidiStreamer::MidiStreamer (MidiDriver *target) :
|
|
_target (target),
|
|
_stream_proc (0),
|
|
_stream_param (0),
|
|
_isOpen (false),
|
|
_paused (false),
|
|
_event_count (0),
|
|
_event_index (0),
|
|
_tempo (500000), // 120 BPM = 500,000 microseconds between each beat
|
|
_ticks_per_beat (96),
|
|
_delay (0)
|
|
{ }
|
|
|
|
void MidiStreamer::set_stream_callback (void *param, StreamCallback *sc) {
|
|
_stream_param = param;
|
|
_stream_proc = sc;
|
|
|
|
if (_isOpen) {
|
|
_event_count = _stream_proc (_stream_param, _events, ARRAYSIZE (_events));
|
|
_event_index = 0;
|
|
}
|
|
}
|
|
|
|
void MidiStreamer::timer_thread (void *param) {
|
|
((MidiStreamer *) param)->on_timer();
|
|
}
|
|
|
|
void MidiStreamer::on_timer() {
|
|
if (_paused || !_stream_proc)
|
|
return;
|
|
|
|
_delay += _driver_tempo;
|
|
while (true) {
|
|
if (_event_index >= _event_count) {
|
|
_event_count = _stream_proc (_stream_param, _events, ARRAYSIZE (_events));
|
|
_event_index = 0;
|
|
}
|
|
|
|
if (!_event_count)
|
|
return;
|
|
|
|
MidiEvent *ev = &_events [_event_index];
|
|
if (_delay < _tempo * (long) ev->delta / (long) _ticks_per_beat)
|
|
return;
|
|
_delay -= _tempo * ev->delta / _ticks_per_beat;
|
|
if ((ev->event >> 24) != ME_TEMPO) {
|
|
_target->send (ev->event);
|
|
} else {
|
|
_tempo = ev->event & 0xFFFFFF;
|
|
}
|
|
|
|
++_event_index;
|
|
} // end while
|
|
}
|
|
|
|
int MidiStreamer::open() {
|
|
if (_isOpen)
|
|
close();
|
|
|
|
int res = _target->open();
|
|
if (res && res != MidiDriver::MERR_ALREADY_OPEN)
|
|
return res;
|
|
|
|
_event_index = _event_count = _delay = 0;
|
|
_isOpen = true;
|
|
_paused = false;
|
|
|
|
_driver_tempo = _target->getBaseTempo() / 500;
|
|
|
|
_target->setTimerCallback (this, &timer_thread);
|
|
return 0;
|
|
}
|
|
|
|
void MidiStreamer::close() {
|
|
if (!_isOpen)
|
|
return;
|
|
|
|
_target->setTimerCallback (NULL, NULL);
|
|
|
|
// Turn off all notes on all channels,
|
|
// just to catch anything still playing.
|
|
int i;
|
|
for (i = 0; i < 16; ++i)
|
|
_target->send ((0x7B << 8) | 0xB0 | i);
|
|
|
|
_isOpen = false;
|
|
_paused = true;
|
|
}
|
|
|
|
uint32 MidiStreamer::property (int prop, uint32 param) {
|
|
switch (prop) {
|
|
|
|
// 16-bit time division according to standard midi specification
|
|
case MidiDriver::PROP_TIMEDIV:
|
|
_ticks_per_beat = (uint16)param;
|
|
return 1;
|
|
}
|
|
|
|
return 0;
|
|
}
|