mirror of
https://github.com/joncampbell123/dosbox-x.git
synced 2025-05-08 19:32:39 +08:00
268 lines
9.0 KiB
C++
268 lines
9.0 KiB
C++
/*
|
|
* Copyright (C) 2002-2021 The DOSBox Team
|
|
*
|
|
* 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.
|
|
* ListAll function by the DOSBox Staging Team, cleaned up by Wengier
|
|
*/
|
|
|
|
|
|
#define ALSA_PCM_OLD_HW_PARAMS_API
|
|
#define ALSA_PCM_OLD_SW_PARAMS_API
|
|
#include <alsa/asoundlib.h>
|
|
#include <ctype.h>
|
|
#include <string>
|
|
#include <sstream>
|
|
#define ADDR_DELIM ".:"
|
|
|
|
#if ((SND_LIB_MINOR >= 6) && (SND_LIB_MAJOR == 0)) || (SND_LIB_MAJOR >= 1)
|
|
#define snd_seq_flush_output(x) snd_seq_drain_output(x)
|
|
#define snd_seq_set_client_group(x,name) /*nop */
|
|
#define my_snd_seq_open(seqp) snd_seq_open(seqp, "hw", SND_SEQ_OPEN_OUTPUT, 0)
|
|
#else
|
|
/* SND_SEQ_OPEN_OUT causes oops on early version of ALSA */
|
|
#define my_snd_seq_open(seqp) snd_seq_open(seqp, SND_SEQ_OPEN)
|
|
#endif
|
|
|
|
struct alsa_address {
|
|
int client;
|
|
int port;
|
|
};
|
|
|
|
class MidiHandler_alsa : public MidiHandler {
|
|
private:
|
|
snd_seq_event_t ev;
|
|
snd_seq_t *seq_handle;
|
|
alsa_address seq = {-1, -1}; // address of input port we're connected to
|
|
int seq_client, seq_port;
|
|
int my_client, my_port;
|
|
|
|
using port_action_t = std::function<void(snd_seq_client_info_t *client_info, snd_seq_port_info_t *port_info)>;
|
|
|
|
static void for_each_alsa_seq_port(port_action_t action) {
|
|
// We can't reuse the sequencer from midi handler, as the function might
|
|
// be called before that sequencer is created.
|
|
snd_seq_t *seq = nullptr;
|
|
if (snd_seq_open(&seq, "default", SND_SEQ_OPEN_OUTPUT, 0) != 0) {
|
|
LOG_MSG("ALSA: Error: Can't open MIDI sequencer");
|
|
return;
|
|
}
|
|
assert(seq);
|
|
|
|
snd_seq_client_info_t *client_info = nullptr;
|
|
snd_seq_client_info_malloc(&client_info);
|
|
assert(client_info);
|
|
|
|
snd_seq_port_info_t *port_info = nullptr;
|
|
snd_seq_port_info_malloc(&port_info);
|
|
assert(port_info);
|
|
|
|
snd_seq_client_info_set_client(client_info, -1);
|
|
while (snd_seq_query_next_client(seq, client_info) >= 0) {
|
|
const int client_id = snd_seq_client_info_get_client(client_info);
|
|
snd_seq_port_info_set_client(port_info, client_id);
|
|
snd_seq_port_info_set_port(port_info, -1);
|
|
while (snd_seq_query_next_port(seq, port_info) >= 0)
|
|
action(client_info, port_info);
|
|
}
|
|
|
|
snd_seq_port_info_free(port_info);
|
|
snd_seq_client_info_free(client_info);
|
|
snd_seq_close(seq);
|
|
}
|
|
|
|
static bool port_is_writable(const unsigned int port_caps) {
|
|
constexpr unsigned int mask = SND_SEQ_PORT_CAP_WRITE | SND_SEQ_PORT_CAP_SUBS_WRITE;
|
|
return (port_caps & mask) == mask;
|
|
}
|
|
|
|
void send_event(int do_flush) {
|
|
snd_seq_ev_set_direct(&ev);
|
|
snd_seq_ev_set_source(&ev, my_port);
|
|
snd_seq_ev_set_dest(&ev, seq_client, seq_port);
|
|
|
|
snd_seq_event_output(seq_handle, &ev);
|
|
if (do_flush)
|
|
snd_seq_flush_output(seq_handle);
|
|
}
|
|
|
|
bool parse_addr(const char *arg, int *client, int *port) {
|
|
std::string in(arg);
|
|
if(in.empty()) return false;
|
|
|
|
if(in[0] == 's' || in[0] == 'S') {
|
|
*client = SND_SEQ_ADDRESS_SUBSCRIBERS;
|
|
*port = 0;
|
|
return true;
|
|
}
|
|
|
|
if(in.find_first_of(ADDR_DELIM) == std::string::npos) return false;
|
|
std::istringstream inp(in);
|
|
int val1, val2; char c;
|
|
if(!(inp >> val1)) return false;
|
|
if(!(inp >> c )) return false;
|
|
if(!(inp >> val2)) return false;
|
|
*client = val1; *port = val2;
|
|
return true;
|
|
}
|
|
public:
|
|
MidiHandler_alsa() : MidiHandler() {};
|
|
const char* GetName(void) override { return "alsa"; }
|
|
void PlaySysex(uint8_t * sysex,Bitu len) override {
|
|
snd_seq_ev_set_sysex(&ev, len, sysex);
|
|
send_event(1);
|
|
}
|
|
|
|
void PlayMsg(uint8_t * msg) override {
|
|
ev.type = SND_SEQ_EVENT_OSS;
|
|
|
|
ev.data.raw32.d[0] = msg[0];
|
|
ev.data.raw32.d[1] = msg[1];
|
|
ev.data.raw32.d[2] = msg[2];
|
|
|
|
unsigned char chanID = msg[0] & 0x0F;
|
|
switch (msg[0] & 0xF0) {
|
|
case 0x80:
|
|
snd_seq_ev_set_noteoff(&ev, chanID, msg[1], msg[2]);
|
|
send_event(1);
|
|
break;
|
|
case 0x90:
|
|
snd_seq_ev_set_noteon(&ev, chanID, msg[1], msg[2]);
|
|
send_event(1);
|
|
break;
|
|
case 0xA0:
|
|
snd_seq_ev_set_keypress(&ev, chanID, msg[1], msg[2]);
|
|
send_event(1);
|
|
break;
|
|
case 0xB0:
|
|
snd_seq_ev_set_controller(&ev, chanID, msg[1], msg[2]);
|
|
send_event(1);
|
|
break;
|
|
case 0xC0:
|
|
snd_seq_ev_set_pgmchange(&ev, chanID, msg[1]);
|
|
send_event(0);
|
|
break;
|
|
case 0xD0:
|
|
snd_seq_ev_set_chanpress(&ev, chanID, msg[1]);
|
|
send_event(0);
|
|
break;
|
|
case 0xE0:{
|
|
long theBend = ((long)msg[1] + (long)(msg[2] << 7)) - 0x2000;
|
|
snd_seq_ev_set_pitchbend(&ev, chanID, theBend);
|
|
send_event(1);
|
|
}
|
|
break;
|
|
default:
|
|
//Maybe filter out FC as it leads for at least one user to crash, but the entire midi stream has not yet been checked.
|
|
LOG(LOG_MISC,LOG_DEBUG)("ALSA:Unknown Command: %02X %02X %02X", msg[0],msg[1],msg[2]);
|
|
send_event(1);
|
|
break;
|
|
}
|
|
}
|
|
|
|
void Close(void) override {
|
|
if (seq_handle)
|
|
snd_seq_close(seq_handle);
|
|
}
|
|
|
|
bool Open(const char * conf) override {
|
|
char var[10];
|
|
unsigned int caps;
|
|
bool defaultport = true; //try 17:0. Seems to be default nowadays
|
|
|
|
// try to use port specified in config file
|
|
if (conf && conf[0]) {
|
|
safe_strncpy(var, conf, 10);
|
|
if (!parse_addr(var, &seq_client, &seq_port)) {
|
|
LOG(LOG_MISC,LOG_WARN)("ALSA:Invalid alsa port %s", var);
|
|
return false;
|
|
}
|
|
defaultport = false;
|
|
}
|
|
// default port if none specified
|
|
else if (!parse_addr("65:0", &seq_client, &seq_port)) {
|
|
LOG(LOG_MISC,LOG_WARN)("ALSA:Invalid alsa port 65:0");
|
|
return false;
|
|
}
|
|
|
|
if (my_snd_seq_open(&seq_handle)) {
|
|
LOG(LOG_MISC,LOG_WARN)("ALSA:Can't open sequencer");
|
|
return false;
|
|
}
|
|
|
|
my_client = snd_seq_client_id(seq_handle);
|
|
snd_seq_set_client_name(seq_handle, "DOSBOX-X");
|
|
snd_seq_set_client_group(seq_handle, "input");
|
|
|
|
caps = SND_SEQ_PORT_CAP_READ;
|
|
if (seq_client == SND_SEQ_ADDRESS_SUBSCRIBERS)
|
|
caps |= SND_SEQ_PORT_CAP_SUBS_READ;
|
|
my_port = snd_seq_create_simple_port(seq_handle, "DOSBOX-X", caps, SND_SEQ_PORT_TYPE_MIDI_GENERIC | SND_SEQ_PORT_TYPE_APPLICATION);
|
|
if (my_port < 0) {
|
|
snd_seq_close(seq_handle);
|
|
LOG(LOG_MISC,LOG_WARN)("ALSA:Can't create ALSA port");
|
|
return false;
|
|
}
|
|
|
|
if (seq_client != SND_SEQ_ADDRESS_SUBSCRIBERS) {
|
|
/* subscribe to MIDI port */
|
|
if (snd_seq_connect_to(seq_handle, my_port, seq_client, seq_port) < 0) {
|
|
if (defaultport) { //if port "65:0" (default) try "17:0" as well
|
|
seq_client = 17; seq_port = 0; //Update reported values
|
|
if(snd_seq_connect_to(seq_handle,my_port,seq_client,seq_port) < 0) { //Try 128:0 Timidity port as well
|
|
// seq_client = 128; seq_port = 0; //Update reported values
|
|
// if(snd_seq_connect_to(seq_handle,my_port,seq_client,seq_port) < 0) {
|
|
snd_seq_close(seq_handle);
|
|
LOG(LOG_MISC,LOG_WARN)("ALSA:Can't subscribe to MIDI port (65:0) nor (17:0)");
|
|
return false;
|
|
// }
|
|
}
|
|
} else {
|
|
snd_seq_close(seq_handle);
|
|
LOG(LOG_MISC,LOG_WARN)("ALSA:Can't subscribe to MIDI port (%d:%d)", seq_client, seq_port);
|
|
return false;
|
|
}
|
|
}
|
|
}
|
|
|
|
LOG(LOG_MISC,LOG_DEBUG)("ALSA:Client initialised [%d:%d]", seq_client, seq_port);
|
|
return true;
|
|
}
|
|
|
|
void ListAll(Program* base) override {
|
|
#if __cplusplus <= 201103L // C++11 compliant code not tested
|
|
auto print_port = [base, this](snd_seq_client_info_t *client_info, snd_seq_port_info_t *port_info) {
|
|
const auto* addr = snd_seq_port_info_get_addr(port_info);
|
|
const unsigned int type = snd_seq_port_info_get_type(port_info);
|
|
const unsigned int caps = snd_seq_port_info_get_capability(port_info);
|
|
#else
|
|
auto print_port = [base, this](auto* client_info, auto* port_info) {
|
|
const auto* addr = snd_seq_port_info_get_addr(port_info);
|
|
const unsigned int type = snd_seq_port_info_get_type(port_info);
|
|
const unsigned int caps = snd_seq_port_info_get_capability(port_info);
|
|
#endif
|
|
if ((type & SND_SEQ_PORT_TYPE_SYNTHESIZER) || port_is_writable(caps)) {
|
|
const bool selected = (addr->client == this->seq.client && addr->port == this->seq.port);
|
|
const char esc_color[] = "\033[32;1m";
|
|
const char esc_nocolor[] = "\033[0m";
|
|
base->WriteOut("%c %s%3d:%d - %s - %s%s\n", selected?'*':' ', selected?esc_color : "", addr->client, addr->port, snd_seq_client_info_get_name(client_info), snd_seq_port_info_get_name(port_info), selected?esc_nocolor:"");
|
|
}
|
|
};
|
|
for_each_alsa_seq_port(print_port);
|
|
}
|
|
|
|
};
|
|
|
|
MidiHandler_alsa Midi_alsa;
|