summaryrefslogtreecommitdiff
path: root/portmidi/pm_sndio/pmsndio.c
diff options
context:
space:
mode:
authorMitja Felicijan <mitja.felicijan@gmail.com>2024-10-07 19:30:56 +0200
committerMitja Felicijan <mitja.felicijan@gmail.com>2024-10-07 19:30:56 +0200
commit40a899bd6ee536eae093337bf2d0dcc8db4e46f1 (patch)
tree485ace3e6fd28b91f394efd277732651e10824d8 /portmidi/pm_sndio/pmsndio.c
parent6fc4bddfdf8e056469f316c1a0fe488efbb4253a (diff)
downloadttdaw-40a899bd6ee536eae093337bf2d0dcc8db4e46f1.tar.gz
Moved example code examples folder
Diffstat (limited to 'portmidi/pm_sndio/pmsndio.c')
-rw-r--r--portmidi/pm_sndio/pmsndio.c365
1 files changed, 0 insertions, 365 deletions
diff --git a/portmidi/pm_sndio/pmsndio.c b/portmidi/pm_sndio/pmsndio.c
deleted file mode 100644
index 0c1ea11..0000000
--- a/portmidi/pm_sndio/pmsndio.c
+++ /dev/null
@@ -1,365 +0,0 @@
-/* pmsndio.c -- PortMidi os-dependent code */
-
-#include <stdlib.h>
-#include <stdio.h>
-#include <sndio.h>
-#include <string.h>
-#include <poll.h>
-#include <errno.h>
-#include <pthread.h>
-#include "portmidi.h"
-#include "pmutil.h"
-#include "pminternal.h"
-#include "porttime.h"
-
-#define NDEVS 9
-#define SYSEX_MAXLEN 1024
-
-#define SYSEX_START 0xf0
-#define SYSEX_END 0xf7
-
-extern pm_fns_node pm_sndio_in_dictionary;
-extern pm_fns_node pm_sndio_out_dictionary;
-
-/* length of voice and common messages (status byte included) */
-unsigned int voice_len[] = { 3, 3, 3, 3, 2, 2, 3 };
-unsigned int common_len[] = { 0, 2, 3, 2, 0, 0, 1, 1 };
-
-struct mio_dev {
- char name[16];
- struct mio_hdl *hdl;
- int mode;
- char errmsg[PM_HOST_ERROR_MSG_LEN];
- pthread_t thread;
-} devs[NDEVS];
-
-static void set_mode(struct mio_dev *, unsigned int);
-
-void pm_init()
-{
- int i, j, k = 0;
- char devices[][16] = {"midithru", "rmidi", "midi", "snd"};
-
- /* default */
- strcpy(devs[0].name, MIO_PORTANY);
- pm_add_device("SNDIO", devs[k].name, TRUE, FALSE, (void *) &devs[k],
- &pm_sndio_in_dictionary);
- pm_add_device("SNDIO", devs[k].name, FALSE, FALSE, (void *) &devs[k],
- &pm_sndio_out_dictionary);
- k++;
-
- for (i = 0; i < 4; i++) {
- for (j = 0; j < 2; j++) {
- sprintf(devs[k].name, "%s/%d", devices[i], j);
- pm_add_device("SNDIO", devs[k].name, TRUE, FALSE, (void *) &devs[k],
- &pm_sndio_in_dictionary);
- pm_add_device("SNDIO", devs[k].name, FALSE, FALSE, (void *) &devs[k],
- &pm_sndio_out_dictionary);
- k++;
- }
- }
-
- // this is set when we return to Pm_Initialize, but we need it
- // now in order to (successfully) call Pm_CountDevices()
- pm_initialized = TRUE;
- pm_default_input_device_id = 0;
- pm_default_output_device_id = 1;
-}
-
-void pm_term(void)
-{
- int i;
- for(i = 0; i < NDEVS; i++) {
- if (devs[i].mode != 0) {
- set_mode(&devs[i], 0);
- if (devs[i].thread) {
- pthread_join(devs[i].thread, NULL);
- devs[i].thread = NULL;
- }
- }
- }
-}
-
-PmDeviceID Pm_GetDefaultInputDeviceID() {
- Pm_Initialize();
- return pm_default_input_device_id;
-}
-
-PmDeviceID Pm_GetDefaultOutputDeviceID() {
- Pm_Initialize();
- return pm_default_output_device_id;
-}
-
-void *pm_alloc(size_t s) { return malloc(s); }
-
-void pm_free(void *ptr) { free(ptr); }
-
-/* midi_message_length -- how many bytes in a message? */
-static int midi_message_length(PmMessage message)
-{
- unsigned char st = message & 0xff;
- if (st >= 0xf8)
- return 1;
- else if (st >= 0xf0)
- return common_len[st & 7];
- else if (st >= 0x80)
- return voice_len[(st >> 4) & 7];
- else
- return 0;
-}
-
-void* input_thread(void *param)
-{
- PmInternal *midi = (PmInternal*)param;
- struct mio_dev *dev = pm_descriptors[midi->device_id].descriptor;
- struct pollfd pfd[1];
- nfds_t nfds;
- unsigned char st = 0, c = 0;
- int rc, revents, idx = 0, len = 0;
- size_t todo = 0;
- unsigned char buf[0x200], *p;
- PmEvent pm_ev, pm_ev_rt;
- unsigned char sysex_data[SYSEX_MAXLEN];
-
- while(dev->mode & MIO_IN) {
- if (todo == 0) {
- nfds = mio_pollfd(dev->hdl, pfd, POLLIN);
- rc = poll(pfd, nfds, 100);
- if (rc < 0) {
- if (errno == EINTR)
- continue;
- break;
- }
- revents = mio_revents(dev->hdl, pfd);
- if (!(revents & POLLIN))
- continue;
-
- todo = mio_read(dev->hdl, buf, sizeof(buf));
- if (todo == 0)
- continue;
- p = buf;
- }
- c = *p++;
- todo--;
-
- if (c >= 0xf8) {
- pm_ev_rt.message = c;
- pm_ev_rt.timestamp = Pt_Time();
- pm_read_short(midi, &pm_ev_rt);
- } else if (c == SYSEX_END) {
- /* note: PortMidi is designed to avoid the need for SYSEX_MAXLEN.
- With the new implementation of pm_read_bytes, it would be
- better to simply call pm_read_bytes() and let it parse buf,
- which can contain any number of whole or partial messages with
- interleaved realtime messages. I did not change the code because
- I cannot test it. -RBD */
- if (st == SYSEX_START) {
- sysex_data[idx++] = c;
- pm_read_bytes(midi, sysex_data, idx, Pt_Time());
- }
- st = 0;
- idx = 0;
- } else if (c == SYSEX_START) {
- st = c;
- idx = 0;
- sysex_data[idx++] = c;
- } else if (c >= 0xf0) {
- pm_ev.message = c;
- len = common_len[c & 7];
- st = c;
- idx = 1;
- } else if (c >= 0x80) {
- pm_ev.message = c;
- len = voice_len[(c >> 4) & 7];
- st = c;
- idx = 1;
- } else if (st == SYSEX_START) {
- if (idx == SYSEX_MAXLEN) {
- fprintf(stderr, "the message is too long\n");
- idx = st = 0;
- } else {
- sysex_data[idx++] = c;
- }
- } else if (st) {
- if (idx == 0 && st != SYSEX_START)
- pm_ev.message |= (c << (8 * idx++));
- pm_ev.message |= (c << (8 * idx++));
- if (idx == len) {
- pm_read_short(midi, &pm_ev);
- if (st >= 0xf0)
- st = 0;
- idx = 0;
- }
- }
- }
-
- pthread_exit(NULL);
- return NULL;
-}
-
-static void set_mode(struct mio_dev *dev, unsigned int mode) {
- if (dev->mode != 0)
- mio_close(dev->hdl);
- dev->mode = 0;
- if (mode != 0)
- dev->hdl = mio_open(dev->name, mode, 0);
- if (dev->hdl)
- dev->mode = mode;
-}
-
-static PmError sndio_out_open(PmInternal *midi, void *driverInfo)
-{
- struct mio_dev *dev = pm_descriptors[midi->device_id].descriptor;
-
- if (dev->mode & MIO_OUT)
- return pmNoError;
-
- set_mode(dev, dev->mode | MIO_OUT);
- if (!(dev->mode & MIO_OUT)) {
- snprintf(dev->errmsg, PM_HOST_ERROR_MSG_LEN,
- "mio_open (output) failed: %s\n", dev->name);
- return pmHostError;
- }
-
- return pmNoError;
-}
-
-static PmError sndio_in_open(PmInternal *midi, void *driverInfo)
-{
- struct mio_dev *dev = pm_descriptors[midi->device_id].descriptor;
-
- if (dev->mode & MIO_IN)
- return pmNoError;
-
- set_mode(dev, dev->mode | MIO_IN);
- if (!(dev->mode & MIO_IN)) {
- snprintf(dev->errmsg, PM_HOST_ERROR_MSG_LEN,
- "mio_open (input) failed: %s\n", dev->name);
- return pmHostError;
- }
- pthread_attr_t attr;
- pthread_attr_init(&attr);
- pthread_create(&dev->thread, &attr, input_thread, ( void* )midi);
- return pmNoError;
-}
-
-static PmError sndio_out_close(PmInternal *midi)
-{
- struct mio_dev *dev = pm_descriptors[midi->device_id].descriptor;
-
- if (dev->mode & MIO_OUT)
- set_mode(dev, dev->mode & ~MIO_OUT);
- return pmNoError;
-}
-
-static PmError sndio_in_close(PmInternal *midi)
-{
- struct mio_dev *dev = pm_descriptors[midi->device_id].descriptor;
-
- if (dev->mode & MIO_IN) {
- set_mode(dev, dev->mode & ~MIO_IN);
- pthread_join(dev->thread, NULL);
- dev->thread = NULL;
- }
- return pmNoError;
-}
-
-static PmError sndio_abort(PmInternal *midi)
-{
- return pmNoError;
-}
-
-static PmTimestamp sndio_synchronize(PmInternal *midi)
-{
- return 0;
-}
-
-static PmError do_write(struct mio_dev *dev, const void *addr, size_t nbytes)
-{
- size_t w = mio_write(dev->hdl, addr, nbytes);
-
- if (w != nbytes) {
- snprintf(dev->errmsg, PM_HOST_ERROR_MSG_LEN,
- "mio_write failed, bytes written:%zu\n", w);
- return pmHostError;
- }
- return pmNoError;
-}
-
-static PmError sndio_write_byte(PmInternal *midi, unsigned char byte,
- PmTimestamp timestamp)
-{
- struct mio_dev *dev = pm_descriptors[midi->device_id].descriptor;
-
- return do_write(dev, &byte, 1);
-}
-
-static PmError sndio_write_short(PmInternal *midi, PmEvent *event)
-{
- struct mio_dev *dev = pm_descriptors[midi->device_id].descriptor;
- int nbytes = midi_message_length(event->message);
-
- if (midi->latency > 0) {
- /* XXX the event should be queued for later playback */
- return do_write(dev, &event->message, nbytes);
- } else {
- return do_write(dev, &event->message, nbytes);
- }
- return pmNoError;
-}
-
-static PmError sndio_write_flush(PmInternal *midi, PmTimestamp timestamp)
-{
- return pmNoError;
-}
-
-PmError sndio_sysex(PmInternal *midi, PmTimestamp timestamp)
-{
- return pmNoError;
-}
-
-static unsigned int sndio_has_host_error(PmInternal *midi)
-{
- struct mio_dev *dev = pm_descriptors[midi->device_id].descriptor;
-
- return (dev->errmsg[0] != '\0');
-}
-
-static void sndio_get_host_error(PmInternal *midi, char *msg, unsigned int len)
-{
- struct mio_dev *dev = pm_descriptors[midi->device_id].descriptor;
-
- strlcpy(msg, dev->errmsg, len);
- dev->errmsg[0] = '\0';
-}
-
-pm_fns_node pm_sndio_in_dictionary = {
- none_write_short,
- none_sysex,
- none_sysex,
- none_write_byte,
- none_write_short,
- none_write_flush,
- sndio_synchronize,
- sndio_in_open,
- sndio_abort,
- sndio_in_close,
- success_poll,
- sndio_has_host_error,
-};
-
-pm_fns_node pm_sndio_out_dictionary = {
- sndio_write_short,
- sndio_sysex,
- sndio_sysex,
- sndio_write_byte,
- sndio_write_short,
- sndio_write_flush,
- sndio_synchronize,
- sndio_out_open,
- sndio_abort,
- sndio_out_close,
- none_poll,
- sndio_has_host_error,
-};
-