scummvm/sound/mpu401.cpp

143 lines
3.6 KiB
C++
Raw Normal View History

/* ScummVM - Scumm Interpreter
2006-01-18 17:39:49 +00:00
* Copyright (C) 2001-2006 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., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
*
* $URL$
* $Id$
*/
#include "common/stdafx.h"
#include "sound/mpu401.h"
#include "common/timer.h"
#include "common/util.h" // for ARRAYSIZE
void MidiChannel_MPU401::init(MidiDriver *owner, byte channel) {
_owner = owner;
_channel = channel;
_allocated = false;
}
bool MidiChannel_MPU401::allocate() {
if (_allocated)
return false;
return (_allocated = true);
}
2003-03-06 18:30:44 +00:00
MidiDriver *MidiChannel_MPU401::device() {
return _owner;
}
void MidiChannel_MPU401::send(uint32 b) {
_owner->send(b & 0xFFFFFFF0 | (_channel & 0xF));
}
void MidiChannel_MPU401::noteOff(byte note) {
2003-03-06 18:30:44 +00:00
_owner->send(note << 8 | 0x80 | _channel);
}
void MidiChannel_MPU401::noteOn(byte note, byte velocity) {
_owner->send(velocity << 16 | note << 8 | 0x90 | _channel);
2003-03-06 18:30:44 +00:00
}
2003-03-06 18:30:44 +00:00
void MidiChannel_MPU401::programChange(byte program) {
_owner->send(program << 8 | 0xC0 | _channel);
}
void MidiChannel_MPU401::pitchBend(int16 bend) {
_owner->send((((bend + 0x2000) >> 7) & 0x7F) << 16 | ((bend + 0x2000) & 0x7F) << 8 | 0xE0 | _channel);
}
void MidiChannel_MPU401::controlChange(byte control, byte value) {
_owner->send(value << 16 | control << 8 | 0xB0 | _channel);
}
2003-03-06 18:30:44 +00:00
void MidiChannel_MPU401::pitchBendFactor(byte value) {
_owner->setPitchBendRange(_channel, value);
2003-03-06 18:30:44 +00:00
}
void MidiChannel_MPU401::sysEx_customInstrument(uint32 type, const byte *instr) {
_owner->sysEx_customInstrument(_channel, type, instr);
2003-03-06 18:30:44 +00:00
}
const char *MidiDriver::getErrorName(int error_code) {
static const char *const midi_errors[] = {
"No error",
"Cannot connect",
"Streaming not available",
"Device not available",
"Driver already open"
};
if ((uint)error_code >= ARRAYSIZE(midi_errors))
return "Unknown Error";
return midi_errors[error_code];
}
MidiDriver_MPU401::MidiDriver_MPU401() :
MidiDriver(),
_timer_proc(0),
_channel_mask(0xFFFF) // Permit all 16 channels by default
{
uint i;
for (i = 0; i < ARRAYSIZE(_midi_channels); ++i) {
_midi_channels[i].init(this, i);
}
}
void MidiDriver_MPU401::close() {
if (_timer_proc)
Common::g_timer->removeTimerProc(_timer_proc);
_timer_proc = 0;
for (int i = 0; i < 16; ++i)
send(0x7B << 8 | 0xB0 | i);
}
uint32 MidiDriver_MPU401::property(int prop, uint32 param) {
switch (prop) {
2006-08-01 14:05:18 +00:00
case PROP_CHANNEL_MASK:
_channel_mask = param & 0xFFFF;
return 1;
}
return 0;
}
2003-03-06 18:30:44 +00:00
MidiChannel *MidiDriver_MPU401::allocateChannel() {
MidiChannel_MPU401 *chan;
uint i;
2003-03-06 18:30:44 +00:00
for (i = 0; i < ARRAYSIZE(_midi_channels); ++i) {
if (i == 9 || !(_channel_mask & (1 << i)))
2003-03-06 18:30:44 +00:00
continue;
chan = &_midi_channels[i];
if (chan->allocate()) {
return chan;
}
}
return NULL;
}
void MidiDriver_MPU401::setTimerCallback(void *timer_param, Common::TimerManager::TimerProc timer_proc) {
if (!_timer_proc || !timer_proc) {
if (_timer_proc)
Common::g_timer->removeTimerProc(_timer_proc);
_timer_proc = timer_proc;
if (timer_proc)
Common::g_timer->installTimerProc(timer_proc, 10000, timer_param);
}
}