#define LOCAL_DEBUG
#include <ucw/lib.h>
-#include <ucw/bitops.h>
-#include <ucw/gary.h>
+#include <ucw/clists.h>
#include <ucw/mainloop.h>
-#include <ucw/string.h>
+#include <ucw/stkstring.h>
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
-#include <sys/poll.h>
-#include <libusb.h>
+#include <pulse/pulseaudio.h>
+
+#include "ursaryd.h"
/*
- * Interface to Novation Nocturn
- *
- * Protocol reverse-engineered by De Wet van Niekerk <dewert@gmail.com>,
- * see https://github.com/dewert/nocturn-linux-midi for inspiration.
+ * Interface to PulseAudio
*/
-static libusb_context *usb_ctx;
-static libusb_device_handle *usb_dev;
+static pa_context *pulse_ctx;
+
+static void pulse_dump(void);
+static void pulse_schedule_update(void);
+
+enum pulse_state {
+ PS_OFFLINE,
+ PS_SUBSCRIBE,
+ PS_GET_CLIENTS,
+ PS_GET_SINKS,
+ PS_GET_SINK_INPUTS,
+ PS_ONLINE,
+};
+
+static enum pulse_state pulse_state;
+#define PULSE_STATE(s) do { pulse_state = s; DBG("Pulse: " #s); } while (0)
-static struct main_file **usb_fds;
+// Tracking of currently running asynchronous operations
+struct pulse_op {
+ cnode n;
+ pa_operation *o;
+ bool is_init;
+};
+
+static clist pulse_op_list;
-static int usb_fd_ready(struct main_file *f UNUSED)
+static struct pulse_op *pulse_op_new(void)
{
- DBG("USB: Handling events (ready on fd %d)", f->fd);
- struct timeval tv = { 0, 0 };
- int comp = 0;
- int err = libusb_handle_events_timeout_completed(usb_ctx, &tv, &comp);
- if (err < 0)
- msg(L_ERROR, "libusb_handle_events: error %d", err);
- return HOOK_IDLE;
+ struct pulse_op *op = xmalloc_zero(sizeof(*op));
+ clist_add_tail(&pulse_op_list, &op->n);
+ return op;
}
-static void usb_added_fd(int fd, short events, void *user_data UNUSED)
+static void pulse_op_done(struct pulse_op *op)
{
- if (fd >= (int) GARY_SIZE(usb_fds))
- GARY_RESIZE(usb_fds, fd + 1);
+ if (op->o)
+ pa_operation_unref(op->o);
+ clist_remove(&op->n);
+ xfree(op);
+}
- struct main_file *f = usb_fds[fd];
- if (!f)
- {
- f = xmalloc_zero(sizeof(*f));
- usb_fds[fd] = f;
- }
- else if (file_is_active(f))
+static void pulse_op_cancel_all(void)
+{
+ struct pulse_op *op;
+ while (op = (struct pulse_op *) clist_head(&pulse_op_list))
{
- DBG("USB: Releasing fd %d", fd);
- file_del(f);
+ DBG("Pulse: Cancelling pending operation");
+ pa_operation_cancel(op->o);
+ pulse_op_done(op);
}
-
- DBG("USB: Adding fd %d with event mask %u", fd, events);
- f->fd = fd;
- f->read_handler = (events & POLLIN) ? usb_fd_ready : NULL;
- f->write_handler = (events & POLLOUT) ? usb_fd_ready : NULL;
- file_add(f);
}
-static void usb_removed_fd(int fd, void *user_data UNUSED)
+#define PULSE_ASYNC_RUN(name, ...) do { struct pulse_op *_op = pulse_op_new(); _op->o = name(__VA_ARGS__, _op); } while (0)
+#define PULSE_ASYNC_INIT_RUN(name, ...) do { struct pulse_op *_op = pulse_op_new(); _op->is_init = 1; _op->o = name(__VA_ARGS__, _op); } while (0)
+
+static void pulse_dump_proplist(pa_proplist *pl UNUSED)
{
- DBG("USB: Releasing fd %d", fd);
- ASSERT(fd < (int) GARY_SIZE(usb_fds));
- struct main_file *f = usb_fds[fd];
- ASSERT(f);
- ASSERT(file_is_active(f));
- file_del(f);
+#ifdef LOCAL_DEBUG
+ void *iterator = NULL;
+ const char *key;
+
+ while (key = pa_proplist_iterate(pl, &iterator))
+ {
+ const char *val = pa_proplist_gets(pl, key);
+ DBG(" %s = %s", key, val);
+ }
+#endif
}
-static const char noct_init[4][9] = {
- { 3, 0xb0, 0x00, 0x00 },
- { 8, 0x28, 0x00, 0x2b, 0x4a, 0x2c, 0x00, 0x2e, 0x35 },
- { 6, 0x2a, 0x02, 0x2c, 0x72, 0x2e, 0x30 },
- { 2, 0x7f, 0x00 },
+struct pulse_sink_input {
+ int idx;
+ char *name;
+ int client_idx;
+ int sink_idx;
+ uns volume;
+ uns mute;
};
-static void noct_read_done(struct libusb_transfer *xfer)
-{
- byte *pkt = xfer->buffer;
- int len = xfer->actual_length;
- DBG("USB: Read done: status %d, length %d", xfer->status, len);
+#define HASH_NODE struct pulse_sink_input
+#define HASH_PREFIX(x) pulse_sink_input_##x
+#define HASH_KEY_ATOMIC idx
+// #define HASH_WANT_CLEANUP
+#define HASH_WANT_LOOKUP
+#define HASH_WANT_REMOVE
+#define HASH_ZERO_FILL
+#include <ucw/hashtable.h>
- if (xfer->status != LIBUSB_TRANSFER_COMPLETED)
- {
- msg(L_ERROR, "USB read failed with status %d, not submitting again", xfer->status);
- return;
- }
+#define SET_STRING(_field, _val) do { if (!_field || strcmp(_field, _val)) { xfree(_field); _field = xstrdup(_val); } } while (0)
-#ifdef LOCAL_DEBUG
- char buf[256];
- mem_to_hex(buf, pkt, len, ' ');
- DBG("USB: Read <%s>", buf);
-#endif
+static void pulse_sink_input_cb(pa_context *ctx UNUSED, const pa_sink_input_info *i, int eol, void *userdata)
+{
+ struct pulse_op *op = userdata;
- int i = 0;
- while (i < len)
+ if (eol)
{
- if (i + 3 > len)
+ if (op->is_init)
{
- msg(L_ERROR, "Unknown USB packet: length %d not divisible by 3", len);
- break;
+ PULSE_STATE(PS_ONLINE);
+ pulse_schedule_update();
}
- if (pkt[i] != 0xb0)
- {
- msg(L_ERROR, "Unknown USB packet: expected 0xb0 at position %d", i);
- break;
- }
- int cmd = pkt[i+1];
- int arg = pkt[i+2];
- i += 3;
- switch (cmd)
- {
- case 0x30:
- // Unknown packet sent during init
- continue;
- case 0x40 ... 0x47:
- if (arg < 0x80)
- {
- int r = cmd - 0x40;
- int delta = (arg < 0x40 ? arg : arg - 0x80);
- DBG("Noct: Rotary %d = %d", r, delta);
- continue;
- }
- break;
- case 0x48:
- if (arg < 0x80)
- {
- DBG("Noct: Slider value = %d", arg);
- continue;
- }
- break;
- case 0x49:
- // Unknown packet, maybe least significant bit of slider
- continue;
- case 0x4a:
- if (arg < 0x80)
- {
- int delta = (arg < 0x40 ? arg : arg - 0x80);
- DBG("Noct: Center = %d", delta);
- continue;
- }
- break;
- case 0x52:
- if (arg == 0x00 || arg == 0x7f)
- {
- int state = !!arg;
- DBG("Noct: Center touch = %d", state);
- continue;
- }
- break;
- case 0x53:
- if (arg == 0x00 || arg == 0x7f)
- {
- int state = !!arg;
- DBG("Noct: Slider touch = %d", state);
- continue;
- }
- break;
- case 0x60 ... 0x67:
- if (arg == 0x00 || arg == 0x7f)
- {
- int r = cmd - 0x60;
- int state = !!arg;
- DBG("Noct: Rotary %d touch = %d", r, state);
- continue;
- }
- break;
- case 0x70 ... 0x7f:
- if (arg == 0x00 || arg == 0x7f)
- {
- int b = cmd - 0x70;
- int state = !!arg;
- DBG("Noct: Button %d = %d", b, state);
- continue;
- }
- break;
- }
- msg(L_ERROR, "Unknown USB packet: unrecognized cmd=%02x arg=%02x", cmd, arg);
+ pulse_op_done(op);
+ return;
}
- int err;
- if ((err = libusb_submit_transfer(xfer)) < 0)
- die("Cannot submit transfer: error %d", err);
+ DBG("Pulse: SINK INPUT #%u: %s client=%d sink=%d has_vol=%d vol_rw=%d volume=%u mute=%d",
+ i->index, i->name, i->client, i->sink, i->has_volume, i->volume_writable, i->volume.values[0], i->mute);
+ pulse_dump_proplist(i->proplist);
+
+ struct pulse_sink_input *s = pulse_sink_input_lookup(i->index);
+ SET_STRING(s->name, i->name);
+ s->client_idx = i->client;
+ s->sink_idx = i->sink;
+ s->volume = pa_cvolume_avg(&i->volume);
+ s->mute = i->mute;
+ pulse_schedule_update();
}
-static void noct_read_init(void)
+static void pulse_sink_input_gone(int idx)
{
- DBG("Noct: Read init");
-
- struct libusb_transfer *xfer = libusb_alloc_transfer(0);
- libusb_fill_interrupt_transfer(xfer, usb_dev, 0x81, xmalloc(8), 8, noct_read_done, NULL, 0);
-
- int err;
- if ((err = libusb_submit_transfer(xfer)) < 0)
- die("Cannot submit transfer: error %d", err);
+ DBG("Pulse: REMOVE SINK INPUT #%d", idx);
+ struct pulse_sink_input *s = pulse_sink_input_lookup(idx);
+ pulse_sink_input_remove(s);
+ pulse_schedule_update();
}
-static byte noct_button_state[16];
-static byte noct_ring_mode[8]; // 0=from-min, 1=from-max, 2=from-mid-right, 3=from-mid-both, 4=single-on, 5=single-off
-static byte noct_ring_val[9];
-
-static uns noct_dirty_button;
-static uns noct_dirty_ring_mode;
-static uns noct_dirty_ring_val;
+struct pulse_sink {
+ int idx;
+ char *name;
+ uns volume;
+ uns base_volume;
+ int mute;
+};
-static struct libusb_transfer *noct_write_xfer;
-static uns noct_write_pending;
-static void noct_sched_write(void);
+#define HASH_NODE struct pulse_sink
+#define HASH_PREFIX(x) pulse_sink_##x
+#define HASH_KEY_ATOMIC idx
+// #define HASH_WANT_CLEANUP
+#define HASH_WANT_LOOKUP
+#define HASH_WANT_REMOVE
+#define HASH_ZERO_FILL
+#include <ucw/hashtable.h>
-static void noct_write_done(struct libusb_transfer *xfer)
+static void pulse_sink_cb(pa_context *ctx, const pa_sink_info *i, int eol, void *userdata)
{
- int len = xfer->actual_length;
- DBG("USB: Write done: status %d, length %d", xfer->status, len);
+ struct pulse_op *op = userdata;
- if (xfer->status != LIBUSB_TRANSFER_COMPLETED)
+ if (eol)
{
- msg(L_ERROR, "USB write failed with status %d", xfer->status);
+ if (op->is_init)
+ {
+ PULSE_STATE(PS_GET_SINK_INPUTS);
+ PULSE_ASYNC_INIT_RUN(pa_context_get_sink_input_info_list, ctx, pulse_sink_input_cb);
+ }
+ pulse_op_done(op);
return;
}
- noct_write_pending = 0;
- noct_sched_write();
+ DBG("Pulse: SINK #%u: %s (%s) flags=%08x volume=%u mute=%d base_vol=%u state=%u",
+ i->index, i->name, i->description, i->flags, i->volume.values[0], i->mute, i->base_volume, i->state);
+ pulse_dump_proplist(i->proplist);
+
+ struct pulse_sink *s = pulse_sink_lookup(i->index);
+ SET_STRING(s->name, i->name);
+ s->volume = pa_cvolume_avg(&i->volume);
+ s->base_volume = i->base_volume;
+ s->mute = i->mute;
+ pulse_schedule_update();
}
-static void noct_do_write(uns cmd, uns arg)
+static void pulse_sink_gone(int idx)
{
- DBG("USB: Submitting write %02x %02x", cmd, arg);
- ASSERT(!noct_write_pending);
- noct_write_pending = 1;
-
- struct libusb_transfer *xfer = noct_write_xfer;
- byte *pkt = xfer->buffer;
- pkt[0] = cmd;
- pkt[1] = arg;
- xfer->length = 2;
-
- int err;
- if ((err = libusb_submit_transfer(xfer)) < 0)
- die("Cannot submit transfer: error %d", err);
+ DBG("Pulse: REMOVE SINK #%d", idx);
+ struct pulse_sink *s = pulse_sink_lookup(idx);
+ pulse_sink_remove(s);
+ pulse_schedule_update();
}
-static void noct_sched_write(void)
+struct pulse_client {
+ int idx;
+ char *name;
+ char *host;
+};
+
+#define HASH_NODE struct pulse_client
+#define HASH_PREFIX(x) pulse_client_##x
+#define HASH_KEY_ATOMIC idx
+// #define HASH_WANT_CLEANUP
+#define HASH_WANT_LOOKUP
+#define HASH_WANT_REMOVE
+#define HASH_ZERO_FILL
+#include <ucw/hashtable.h>
+
+static void pulse_client_cb(pa_context *ctx, const pa_client_info *i, int eol, void *userdata)
{
- if (noct_write_pending)
- return;
+ struct pulse_op *op = userdata;
- if (noct_dirty_button)
+ if (eol)
{
- int i = bit_fls(noct_dirty_button);
- noct_dirty_button ^= 1U << i;
- noct_do_write(0x70 + i, noct_button_state[i]);
- }
- else if (noct_dirty_ring_mode)
- {
- int i = bit_fls(noct_dirty_ring_mode);
- noct_dirty_ring_mode ^= 1U << i;
- noct_do_write(0x48 + i, noct_ring_mode[i] << 4);
- }
- else if (noct_dirty_ring_val)
- {
- int i = bit_fls(noct_dirty_ring_val);
- noct_dirty_ring_val ^= 1U << i;
- if (i == 8)
- noct_do_write(0x50 + i, noct_ring_val[i]);
- else
- noct_do_write(0x40 + i, noct_ring_val[i]);
+ if (op->is_init)
+ {
+ PULSE_STATE(PS_GET_SINKS);
+ PULSE_ASYNC_INIT_RUN(pa_context_get_sink_info_list, ctx, pulse_sink_cb);
+ }
+ pulse_op_done(op);
+ return;
}
+
+ char *host = stk_strdup(pa_proplist_gets(i->proplist, "application.process.host") ? : "?");
+ DBG("Pulse: CLIENT #%u: %s mod=%u drv=%s host=%s",
+ i->index, i->name, i->owner_module, i->driver, host);
+ pulse_dump_proplist(i->proplist);
+
+ struct pulse_client *c = pulse_client_lookup(i->index);
+ SET_STRING(c->name, i->name);
+ SET_STRING(c->host, host);
+ pulse_schedule_update();
}
-static void noct_write_init(void)
+static void pulse_client_gone(int idx)
{
- DBG("Noct: Write init");
+ DBG("Pulse: REMOVE CLIENT #%d", idx);
+ struct pulse_client *c = pulse_client_lookup(idx);
+ pulse_client_remove(c);
+ pulse_schedule_update();
+}
- noct_write_xfer = libusb_alloc_transfer(0);
- libusb_fill_interrupt_transfer(noct_write_xfer, usb_dev, 0x02, xmalloc(8), 0, noct_write_done, NULL, 1000);
+static void pulse_subscribe_done_cb(pa_context *ctx, int success, void *userdata)
+{
+ pulse_op_done(userdata);
-#if 0 // FIXME
- noct_button_state[2] = 1;
- noct_ring_mode[0] = 4;
- noct_ring_val[0] = 0x40;
-#endif
+ if (!success)
+ msg(L_ERROR, "pa_context_subscribe failed: success=%d", success);
- noct_dirty_button = 0xffff;
- noct_dirty_ring_mode = 0xff;
- noct_dirty_ring_val = 0x1ff;
- noct_sched_write();
+ PULSE_STATE(PS_GET_CLIENTS);
+ PULSE_ASYNC_INIT_RUN(pa_context_get_client_info_list, ctx, pulse_client_cb);
}
-static void usb_init(void)
+static void pulse_event_cb(pa_context *ctx, pa_subscription_event_type_t type, uint32_t idx, void *userdata UNUSED)
{
- int err;
+ DBG("Pulse: SUBSCRIBE EVENT type=%08x idx=%u", type, idx);
- if ((err = libusb_init(&usb_ctx)) < 0)
- die("libusb_init failed: error %d", err);
- libusb_set_debug(usb_ctx, 3);
+ uns object = type & PA_SUBSCRIPTION_EVENT_FACILITY_MASK;
+ uns action = type & PA_SUBSCRIPTION_EVENT_TYPE_MASK;
+ switch (object)
+ {
+ case PA_SUBSCRIPTION_EVENT_CLIENT:
+ if (action == PA_SUBSCRIPTION_EVENT_NEW || action == PA_SUBSCRIPTION_EVENT_CHANGE)
+ PULSE_ASYNC_RUN(pa_context_get_client_info, ctx, idx, pulse_client_cb);
+ else if (action == PA_SUBSCRIPTION_EVENT_REMOVE)
+ pulse_client_gone(idx);
+ break;
+ case PA_SUBSCRIPTION_EVENT_SINK:
+ if (action == PA_SUBSCRIPTION_EVENT_NEW || action == PA_SUBSCRIPTION_EVENT_CHANGE)
+ PULSE_ASYNC_RUN(pa_context_get_sink_info_by_index, ctx, idx, pulse_sink_cb);
+ else if (action == PA_SUBSCRIPTION_EVENT_REMOVE)
+ pulse_sink_gone(idx);
+ break;
+ case PA_SUBSCRIPTION_EVENT_SINK_INPUT:
+ if (action == PA_SUBSCRIPTION_EVENT_NEW || action == PA_SUBSCRIPTION_EVENT_CHANGE)
+ PULSE_ASYNC_RUN(pa_context_get_sink_input_info, ctx, idx, pulse_sink_input_cb);
+ else if (action == PA_SUBSCRIPTION_EVENT_REMOVE)
+ pulse_sink_input_gone(idx);
+ break;
+ }
+}
- libusb_device **dev_list;
- libusb_device *found_dev = NULL;
- ssize_t len = libusb_get_device_list(usb_ctx, &dev_list);
- for (ssize_t i=0; i < len; i++)
+static void pulse_state_cb(pa_context *ctx, void *userdata UNUSED)
+{
+ int state = pa_context_get_state(ctx);
+ DBG("Pulse: State callback, new state = %d", state);
+ if (state == PA_CONTEXT_READY)
{
- libusb_device *dev = dev_list[i];
- struct libusb_device_descriptor desc;
- if (libusb_get_device_descriptor(dev, &desc) >= 0 &&
- desc.idVendor == 0x1235 &&
- desc.idProduct == 0x000a)
+ if (pulse_state == PS_OFFLINE)
{
- msg(L_DEBUG, "Found device: bus %d, addr %d", libusb_get_bus_number(dev), libusb_get_device_address(dev));
- if (found_dev)
- die("Multiple Nocturn devices found. Please fix me to handle it.");
- found_dev = libusb_ref_device(dev);
+ PULSE_STATE(PS_SUBSCRIBE);
+ pa_context_set_subscribe_callback(ctx, pulse_event_cb, NULL);
+ PULSE_ASYNC_INIT_RUN(pa_context_subscribe, ctx, PA_SUBSCRIPTION_MASK_ALL, pulse_subscribe_done_cb);
}
}
- libusb_free_device_list(dev_list, 1);
-
- if (!found_dev)
- die("No Nocturn device found");
-
- msg(L_DEBUG, "Initializing device");
-
- if ((err = libusb_open(found_dev, &usb_dev)) < 0)
- die("libusb_open failed: error %d", err);
-
- // There exist configurations 1 (high brightness) and 2 (power-save)
- if ((err = libusb_set_configuration(usb_dev, 1)) < 0)
- die("libusb_set_configuration: error %d", err);
-
- if ((err = libusb_claim_interface(usb_dev, 0)) < 0)
- die("libusb_claim_interface: error %d", err);
+ else
+ {
+ if (pulse_state != PS_OFFLINE)
+ {
+ PULSE_STATE(PS_OFFLINE);
+ pulse_op_cancel_all();
+ }
+ }
+}
- for (int i=0; i<4; i++)
+static void pulse_dump(void)
+{
+ HASH_FOR_ALL(pulse_client, c)
{
- int done;
- if ((err = libusb_interrupt_transfer(usb_dev, 0x02, (byte *) noct_init[i] + 1, noct_init[i][0], &done, 5000)) < 0)
- die("Cannot send init packets: error %d", err);
- if (done != noct_init[i][0])
- die("Partial send of init packet: %d < %d", done, noct_init[i][0]);
+ DBG("## Client #%d: %s host=%s", c->idx, c->name, c->host);
}
+ HASH_END_FOR;
-#if 0
- byte xxx[] = { 0x7f, 0x01 };
- int done;
- libusb_interrupt_transfer(usb_dev, 0x02, xxx, 2, &done, 5000);
-#endif
+ HASH_FOR_ALL(pulse_sink, s)
+ {
+ DBG("## Sink #%d: %s volume=%u base_vol=%u mute=%u",
+ s->idx, s->name, s->volume, s->base_volume, s->mute);
+ }
+ HASH_END_FOR;
- DBG("USB: Connecting libusb to mainloop");
+ HASH_FOR_ALL(pulse_sink_input, s)
+ {
+ DBG("## Sink input #%d: %s client=%d sink=%d volume=%u mute=%u",
+ s->idx, s->name, s->client_idx, s->sink_idx, s->volume, s->mute);
+ }
+ HASH_END_FOR;
+}
- if (!libusb_pollfds_handle_timeouts(usb_ctx))
- die("Unsupported version of libusb, please fix me");
+static struct main_timer pulse_update_timer;
- GARY_INIT_ZERO(usb_fds, 0);
- libusb_set_pollfd_notifiers(usb_ctx, usb_added_fd, usb_removed_fd, NULL);
+static void pulse_update(struct main_timer *t)
+{
+ timer_del(t);
+ DBG("## UPDATE");
+ pulse_dump();
+}
- const struct libusb_pollfd **fds = libusb_get_pollfds(usb_ctx);
- ASSERT(fds);
- for (int i=0; fds[i]; i++)
- usb_added_fd(fds[i]->fd, fds[i]->events, NULL);
- free(fds);
+static void pulse_schedule_update(void)
+{
+ timer_add_rel(&pulse_update_timer, 500);
+}
- noct_read_init();
- noct_write_init();
+static void pulse_init(void)
+{
+ pmain_init();
+ clist_init(&pulse_op_list);
+ pulse_client_init();
+ pulse_sink_init();
+ pulse_sink_input_init();
+ pulse_update_timer.handler = pulse_update;
+
+ pulse_ctx = pa_context_new(&pmain_api, "ursaryd");
+ pa_context_set_state_callback(pulse_ctx, pulse_state_cb, NULL);
+ pa_context_connect(pulse_ctx, NULL, PA_CONTEXT_NOAUTOSPAWN, NULL);
}
int main(int argc UNUSED, char **argv)
log_init(argv[0]);
main_init();
- msg(L_INFO, "Initializing USB");
- usb_init();
+ // msg(L_INFO, "Initializing Nocturn");
+ // noct_init();
+
+ msg(L_INFO, "Initializing PulseAudio");
+ pulse_init();
msg(L_INFO, "Entering main loop");
main_loop();
projects / ursary.git / blobdiff