X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~mdw/git/disorder/blobdiff_plain/1c3f1e73710d27fb5ae5b4c15798d03e89e74363..eb5dc014179415a0e5476e986519ac96c36221f9:/server/speaker.c?ds=sidebyside diff --git a/server/speaker.c b/server/speaker.c index 1dc90e4..d21ad7c 100644 --- a/server/speaker.c +++ b/server/speaker.c @@ -1,6 +1,7 @@ /* * This file is part of DisOrder * Copyright (C) 2005, 2006, 2007 Richard Kettlewell + * Portions (C) 2007 Mark Wooding * * 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 @@ -22,22 +23,17 @@ * * This program is responsible for transmitting a single coherent audio stream * to its destination (over the network, to some sound API, to some - * subprocess). It receives connections from decoders via file descriptor - * passing from the main server and plays them in the right order. + * subprocess). It receives connections from decoders (or rather from the + * process that is about to become disorder-normalize) and plays them in the + * right order. * * @b Encodings. For the ALSA API, * 8- and 16- bit stereo and mono are supported, with any sample rate (within * the limits that ALSA can deal with.) * - * When communicating with a subprocess, sox is invoked to convert the inbound - * data to a single consistent format. The same applies for network (RTP) - * play, though in that case currently only 44.1KHz 16-bit stereo is supported. - * - * The inbound data starts with a structure defining the data format. Note - * that this is NOT portable between different platforms or even necessarily - * between versions; the speaker is assumed to be built from the same source - * and run on the same host as the main server. + * Inbound data is expected to match @c config->sample_format. In normal use + * this is arranged by the @c disorder-normalize program (see @ref + * server/normalize.c). * * @b Garbage @b Collection. This program deliberately does not use the * garbage collector even though it might be convenient to do so. This is for @@ -72,6 +68,7 @@ #include #include #include +#include #include "configuration.h" #include "syscalls.h" @@ -89,7 +86,7 @@ struct track *tracks; struct track *playing; /** @brief Number of bytes pre frame */ -size_t device_bpf; +size_t bpf; /** @brief Array of file descriptors for poll() */ struct pollfd fds[NFDS]; @@ -97,20 +94,15 @@ struct pollfd fds[NFDS]; /** @brief Next free slot in @ref fds */ int fdno; +/** @brief Listen socket */ +static int listenfd; + static time_t last_report; /* when we last reported */ static int paused; /* pause status */ /** @brief The current device state */ enum device_states device_state; -/** @brief The current device sample format - * - * Only meaningful if @ref device_state = @ref device_open or perhaps @ref - * device_error. For @ref FIXED_FORMAT backends, this should always match @c - * config->sample_format. - */ -ao_sample_format device_format; - /** @brief Set when idled * * This is set when the sound device is deliberately closed by idle(). @@ -126,6 +118,8 @@ static const struct option options[] = { { "config", required_argument, 0, 'c' }, { "debug", no_argument, 0, 'd' }, { "no-debug", no_argument, 0, 'D' }, + { "syslog", no_argument, 0, 's' }, + { "no-syslog", no_argument, 0, 'S' }, { 0, 0, 0, 0 } }; @@ -138,6 +132,7 @@ static void help(void) { " --version, -V Display version number\n" " --config PATH, -c PATH Set configuration file\n" " --debug, -d Turn on debugging\n" + " --[no-]syslog Force logging\n" "\n" "Speaker process for DisOrder. Not intended to be run\n" "directly.\n"); @@ -147,13 +142,13 @@ static void help(void) { /* Display version number and terminate. */ static void version(void) { - xprintf("disorder-speaker version %s\n", disorder_version_string); + xprintf("%s", disorder_version_string); xfclose(stdout); exit(0); } /** @brief Return the number of bytes per frame in @p format */ -static size_t bytes_per_frame(const ao_sample_format *format) { +static size_t bytes_per_frame(const struct stream_header *format) { return format->channels * format->bits / 8; } @@ -170,9 +165,6 @@ static struct track *findtrack(const char *id, int create) { strcpy(t->id, id); t->fd = -1; tracks = t; - /* The initial input buffer will be the sample format. */ - t->buffer = (void *)&t->format; - t->size = sizeof t->format; } return t; } @@ -193,109 +185,9 @@ static struct track *removetrack(const char *id) { static void destroy(struct track *t) { D(("destroy %s", t->id)); if(t->fd != -1) xclose(t->fd); - if(t->buffer != (void *)&t->format) free(t->buffer); free(t); } -/** @brief Notice a new connection */ -static void acquire(struct track *t, int fd) { - D(("acquire %s %d", t->id, fd)); - if(t->fd != -1) - xclose(t->fd); - t->fd = fd; - nonblock(fd); -} - -/** @brief Return true if A and B denote identical libao formats, else false */ -int formats_equal(const ao_sample_format *a, - const ao_sample_format *b) { - return (a->bits == b->bits - && a->rate == b->rate - && a->channels == b->channels - && a->byte_format == b->byte_format); -} - -/** @brief Compute arguments to sox */ -static void soxargs(const char ***pp, char **qq, ao_sample_format *ao) { - int n; - - *(*pp)++ = "-t.raw"; - *(*pp)++ = "-s"; - *(*pp)++ = *qq; n = sprintf(*qq, "-r%d", ao->rate); *qq += n + 1; - *(*pp)++ = *qq; n = sprintf(*qq, "-c%d", ao->channels); *qq += n + 1; - /* sox 12.17.9 insists on -b etc; CVS sox insists on - etc; both are - * deployed! */ - switch(config->sox_generation) { - case 0: - if(ao->bits != 8 - && ao->byte_format != AO_FMT_NATIVE - && ao->byte_format != MACHINE_AO_FMT) { - *(*pp)++ = "-x"; - } - switch(ao->bits) { - case 8: *(*pp)++ = "-b"; break; - case 16: *(*pp)++ = "-w"; break; - case 32: *(*pp)++ = "-l"; break; - case 64: *(*pp)++ = "-d"; break; - default: fatal(0, "cannot handle sample size %d", (int)ao->bits); - } - break; - case 1: - switch(ao->byte_format) { - case AO_FMT_NATIVE: break; - case AO_FMT_BIG: *(*pp)++ = "-B"; break; - case AO_FMT_LITTLE: *(*pp)++ = "-L"; break; - } - *(*pp)++ = *qq; n = sprintf(*qq, "-%d", ao->bits/8); *qq += n + 1; - break; - } -} - -/** @brief Enable format translation - * - * If necessary, replaces a tracks inbound file descriptor with one connected - * to a sox invocation, which performs the required translation. - */ -static void enable_translation(struct track *t) { - if((backend->flags & FIXED_FORMAT) - && !formats_equal(&t->format, &config->sample_format)) { - char argbuf[1024], *q = argbuf; - const char *av[18], **pp = av; - int soxpipe[2]; - pid_t soxkid; - - *pp++ = "sox"; - soxargs(&pp, &q, &t->format); - *pp++ = "-"; - soxargs(&pp, &q, &config->sample_format); - *pp++ = "-"; - *pp++ = 0; - if(debugging) { - for(pp = av; *pp; pp++) - D(("sox arg[%d] = %s", pp - av, *pp)); - D(("end args")); - } - xpipe(soxpipe); - soxkid = xfork(); - if(soxkid == 0) { - signal(SIGPIPE, SIG_DFL); - xdup2(t->fd, 0); - xdup2(soxpipe[1], 1); - fcntl(0, F_SETFL, fcntl(0, F_GETFL) & ~O_NONBLOCK); - close(soxpipe[0]); - close(soxpipe[1]); - close(t->fd); - execvp("sox", (char **)av); - _exit(1); - } - D(("forking sox for format conversion (kid = %d)", soxkid)); - close(t->fd); - close(soxpipe[1]); - t->fd = soxpipe[0]; - t->format = config->sample_format; - } -} - /** @brief Read data into a sample buffer * @param t Pointer to track * @return 0 on success, -1 on EOF @@ -304,23 +196,19 @@ static void enable_translation(struct track *t) { * main loop whenever the track's file descriptor is readable, assuming the * buffer has not reached the maximum allowed occupancy. */ -static int fill(struct track *t) { +static int speaker_fill(struct track *t) { size_t where, left; int n; - D(("fill %s: eof=%d used=%zu size=%zu got_format=%d", - t->id, t->eof, t->used, t->size, t->got_format)); + D(("fill %s: eof=%d used=%zu", + t->id, t->eof, t->used)); if(t->eof) return -1; - if(t->used < t->size) { + if(t->used < sizeof t->buffer) { /* there is room left in the buffer */ - where = (t->start + t->used) % t->size; - if(t->got_format) { - /* We are reading audio data, get as much as we can */ - if(where >= t->start) left = t->size - where; - else left = t->start - where; - } else - /* We are still waiting for the format, only get that */ - left = sizeof (ao_sample_format) - t->used; + where = (t->start + t->used) % sizeof t->buffer; + /* Get as much data as we can */ + if(where >= t->start) left = (sizeof t->buffer) - where; + else left = t->start - where; do { n = read(t->fd, t->buffer + where, left); } while(n < 0 && errno == EINTR); @@ -331,23 +219,12 @@ static int fill(struct track *t) { if(n == 0) { D(("fill %s: eof detected", t->id)); t->eof = 1; + t->playable = 1; return -1; } t->used += n; - if(!t->got_format && t->used >= sizeof (ao_sample_format)) { - assert(t->used == sizeof (ao_sample_format)); - /* Check that our assumptions are met. */ - if(t->format.bits & 7) - fatal(0, "bits per sample not a multiple of 8"); - /* If the input format is unsuitable, arrange to translate it */ - enable_translation(t); - /* Make a new buffer for audio data. */ - t->size = bytes_per_frame(&t->format) * t->format.rate * BUFFER_SECONDS; - t->buffer = xmalloc(t->size); - t->used = 0; - t->got_format = 1; - D(("got format for %s", t->id)); - } + if(t->used == sizeof t->buffer) + t->playable = 1; } return 0; } @@ -375,7 +252,7 @@ void abandon(void) { memset(&sm, 0, sizeof sm); sm.type = SM_FINISHED; strcpy(sm.id, playing->id); - speaker_send(1, &sm, 0); + speaker_send(1, &sm); removetrack(playing->id); destroy(playing); playing = 0; @@ -387,22 +264,10 @@ void abandon(void) { * 0 on success and -1 on error. */ static void activate(void) { - /* If we don't know the format yet we cannot start. */ - if(!playing->got_format) { - D((" - not got format for %s", playing->id)); - return; - } - if(backend->flags & FIXED_FORMAT) - device_format = config->sample_format; - if(backend->activate) { + if(backend->activate) backend->activate(); - } else { - assert(backend->flags & FIXED_FORMAT); - /* ...otherwise device_format not set */ + else device_state = device_open; - } - if(device_state == device_open) - device_bpf = bytes_per_frame(&device_format); } /** @brief Check whether the current track has finished @@ -415,11 +280,21 @@ static void activate(void) { static void maybe_finished(void) { if(playing && playing->eof - && (!playing->got_format - || playing->used < bytes_per_frame(&playing->format))) + && playing->used < bytes_per_frame(&config->sample_format)) abandon(); } +/** @brief Return nonzero if we want to play some audio + * + * We want to play audio if there is a current track; and it is not paused; and + * it is playable according to the rules for @ref track::playable. + */ +static int playable(void) { + return playing + && !paused + && playing->playable; +} + /** @brief Play up to @p frames frames of audio * * It is always safe to call this function. @@ -430,36 +305,35 @@ static void maybe_finished(void) { * - If there is not enough audio to play then it play what is available. * * If there are not enough frames to play then whatever is available is played - * instead. It is up to mainloop() to ensure that play() is not called when - * unreasonably only an small amounts of data is available to play. + * instead. It is up to mainloop() to ensure that speaker_play() is not called + * when unreasonably only an small amounts of data is available to play. */ -static void play(size_t frames) { +static void speaker_play(size_t frames) { size_t avail_frames, avail_bytes, written_frames; ssize_t written_bytes; - /* Make sure there's a track to play and it is not pasued */ - if(!playing || paused) + /* Make sure there's a track to play and it is not paused */ + if(!playable()) return; - /* Make sure the output device is open and has the right sample format */ - if(device_state != device_open - || !formats_equal(&device_format, &playing->format)) { + /* Make sure the output device is open */ + if(device_state != device_open) { activate(); if(device_state != device_open) return; } - D(("play: play %zu/%zu%s %dHz %db %dc", frames, playing->used / device_bpf, + D(("play: play %zu/%zu%s %dHz %db %dc", frames, playing->used / bpf, playing->eof ? " EOF" : "", - playing->format.rate, - playing->format.bits, - playing->format.channels)); + config->sample_format.rate, + config->sample_format.bits, + config->sample_format.channels)); /* Figure out how many frames there are available to write */ - if(playing->start + playing->used > playing->size) + if(playing->start + playing->used > sizeof playing->buffer) /* The ring buffer is currently wrapped, only play up to the wrap point */ - avail_bytes = playing->size - playing->start; + avail_bytes = (sizeof playing->buffer) - playing->start; else /* The ring buffer is not wrapped, can play the lot */ avail_bytes = playing->used; - avail_frames = avail_bytes / device_bpf; + avail_frames = avail_bytes / bpf; /* Only play up to the requested amount */ if(avail_frames > frames) avail_frames = frames; @@ -467,7 +341,7 @@ static void play(size_t frames) { return; /* Play it, Sam */ written_frames = backend->play(avail_frames); - written_bytes = written_frames * device_bpf; + written_bytes = written_frames * bpf; /* written_bytes and written_frames had better both be set and correct by * this point */ playing->start += written_bytes; @@ -475,8 +349,13 @@ static void play(size_t frames) { playing->played += written_frames; /* If the pointer is at the end of the buffer (or the buffer is completely * empty) wrap it back to the start. */ - if(!playing->used || playing->start == playing->size) + if(!playing->used || playing->start == (sizeof playing->buffer)) playing->start = 0; + /* If the buffer emptied out mark the track as unplayably */ + if(!playing->used && !playing->eof) { + error(0, "track buffer emptied"); + playing->playable = 0; + } frames -= written_frames; return; } @@ -485,12 +364,12 @@ static void play(size_t frames) { static void report(void) { struct speaker_message sm; - if(playing && playing->buffer != (void *)&playing->format) { + if(playing) { memset(&sm, 0, sizeof sm); sm.type = paused ? SM_PAUSED : SM_PLAYING; strcpy(sm.id, playing->id); - sm.data = playing->played / playing->format.rate; - speaker_send(1, &sm, 0); + sm.data = playing->played / config->sample_format.rate; + speaker_send(1, &sm); } time(&last_report); } @@ -516,31 +395,25 @@ int addfd(int fd, int events) { /** @brief Table of speaker backends */ static const struct speaker_backend *backends[] = { -#if API_ALSA +#if HAVE_ALSA_ASOUNDLIB_H &alsa_backend, #endif &command_backend, &network_backend, +#if HAVE_COREAUDIO_AUDIOHARDWARE_H + &coreaudio_backend, +#endif +#if HAVE_SYS_SOUNDCARD_H + &oss_backend, +#endif 0 }; -/** @brief Return nonzero if we want to play some audio - * - * We want to play audio if there is a current track; and it is not paused; and - * there are at least @ref FRAMES frames of audio to play, or we are in sight - * of the end of the current track. - */ -static int playable(void) { - return playing - && !paused - && (playing->used >= FRAMES || playing->eof); -} - /** @brief Main event loop */ static void mainloop(void) { struct track *t; struct speaker_message sm; - int n, fd, stdin_slot, timeout; + int n, fd, stdin_slot, timeout, listen_slot; while(getppid() != 1) { fdno = 0; @@ -549,9 +422,14 @@ static void mainloop(void) { timeout = 1000; /* Always ready for commands from the main server. */ stdin_slot = addfd(0, POLLIN); + /* Also always ready for inbound connections */ + listen_slot = addfd(listenfd, POLLIN); /* Try to read sample data for the currently playing track if there is * buffer space. */ - if(playing && !playing->eof && playing->used < playing->size) + if(playing + && playing->fd >= 0 + && !playing->eof + && playing->used < (sizeof playing->buffer)) playing->slot = addfd(playing->fd, POLLIN); else if(playing) playing->slot = -1; @@ -565,14 +443,16 @@ static void mainloop(void) { * instead, but the post-poll code will cope even if it's * device_closed. */ if(device_state == device_open) - backend->beforepoll(); + backend->beforepoll(&timeout); } /* If any other tracks don't have a full buffer, try to read sample data * from them. We do this last of all, so that if we run out of slots, * nothing important can't be monitored. */ for(t = tracks; t; t = t->next) if(t != playing) { - if(!t->eof && t->used < t->size) { + if(t->fd >= 0 + && !t->eof + && t->used < sizeof t->buffer) { t->slot = addfd(t->fd, POLLIN | POLLHUP); } else t->slot = -1; @@ -588,41 +468,71 @@ static void mainloop(void) { /* We want to play some audio */ if(device_state == device_open) { if(backend->ready()) - play(3 * FRAMES); + speaker_play(3 * FRAMES); } else { /* We must be in _closed or _error, and it should be the latter, but we * cope with either. * - * We most likely timed out, so now is a good time to retry. play() - * knows to re-activate the device if necessary. + * We most likely timed out, so now is a good time to retry. + * speaker_play() knows to re-activate the device if necessary. */ - play(3 * FRAMES); + speaker_play(3 * FRAMES); } } + /* Perhaps a connection has arrived */ + if(fds[listen_slot].revents & POLLIN) { + struct sockaddr_un addr; + socklen_t addrlen = sizeof addr; + uint32_t l; + char id[24]; + + if((fd = accept(listenfd, (struct sockaddr *)&addr, &addrlen)) >= 0) { + blocking(fd); + if(read(fd, &l, sizeof l) < 4) { + error(errno, "reading length from inbound connection"); + xclose(fd); + } else if(l >= sizeof id) { + error(0, "id length too long"); + xclose(fd); + } else if(read(fd, id, l) < (ssize_t)l) { + error(errno, "reading id from inbound connection"); + xclose(fd); + } else { + id[l] = 0; + D(("id %s fd %d", id, fd)); + t = findtrack(id, 1/*create*/); + write(fd, "", 1); /* write an ack */ + if(t->fd != -1) { + error(0, "%s: already got a connection", id); + xclose(fd); + } else { + nonblock(fd); + t->fd = fd; /* yay */ + } + } + } else + error(errno, "accept"); + } /* Perhaps we have a command to process */ if(fds[stdin_slot].revents & POLLIN) { /* There might (in theory) be several commands queued up, but in general * this won't be the case, so we don't bother looping around to pick them * all up. */ - n = speaker_recv(0, &sm, &fd); + n = speaker_recv(0, &sm); + /* TODO */ if(n > 0) switch(sm.type) { - case SM_PREPARE: - D(("SM_PREPARE %s %d", sm.id, fd)); - if(fd == -1) fatal(0, "got SM_PREPARE but no file descriptor"); - t = findtrack(sm.id, 1); - acquire(t, fd); - break; case SM_PLAY: - D(("SM_PLAY %s %d", sm.id, fd)); if(playing) fatal(0, "got SM_PLAY but already playing something"); t = findtrack(sm.id, 1); - if(fd != -1) acquire(t, fd); + D(("SM_PLAY %s fd %d", t->id, t->fd)); + if(t->fd == -1) + error(0, "cannot play track because no connection arrived"); playing = t; /* We attempt to play straight away rather than going round the loop. - * play() is clever enough to perform any activation that is + * speaker_play() is clever enough to perform any activation that is * required. */ - play(3 * FRAMES); + speaker_play(3 * FRAMES); report(); break; case SM_PAUSE: @@ -636,7 +546,7 @@ static void mainloop(void) { paused = 0; /* As for SM_PLAY we attempt to play straight away. */ if(playing) - play(3 * FRAMES); + speaker_play(3 * FRAMES); } report(); break; @@ -647,7 +557,7 @@ static void mainloop(void) { if(t == playing) { sm.type = SM_FINISHED; strcpy(sm.id, playing->id); - speaker_send(1, &sm, 0); + speaker_send(1, &sm); playing = 0; } destroy(t); @@ -657,7 +567,7 @@ static void mainloop(void) { break; case SM_RELOAD: D(("SM_RELOAD")); - if(config_read()) error(0, "cannot read configuration"); + if(config_read(1)) error(0, "cannot read configuration"); info("reloaded configuration"); break; default: @@ -666,8 +576,10 @@ static void mainloop(void) { } /* Read in any buffered data */ for(t = tracks; t; t = t->next) - if(t->slot != -1 && (fds[t->slot].revents & (POLLIN | POLLHUP))) - fill(t); + if(t->fd != -1 + && t->slot != -1 + && (fds[t->slot].revents & (POLLIN | POLLHUP))) + speaker_fill(t); /* Maybe we finished playing a track somewhere in the above */ maybe_finished(); /* If we don't need the sound device for now then close it for the benefit @@ -681,27 +593,33 @@ static void mainloop(void) { } int main(int argc, char **argv) { - int n; + int n, logsyslog = !isatty(2); + struct sockaddr_un addr; + static const int one = 1; + struct speaker_message sm; + const char *d; set_progname(argv); if(!setlocale(LC_CTYPE, "")) fatal(errno, "error calling setlocale"); - while((n = getopt_long(argc, argv, "hVc:dD", options, 0)) >= 0) { + while((n = getopt_long(argc, argv, "hVc:dDSs", options, 0)) >= 0) { switch(n) { case 'h': help(); case 'V': version(); case 'c': configfile = optarg; break; case 'd': debugging = 1; break; case 'D': debugging = 0; break; + case 'S': logsyslog = 0; break; + case 's': logsyslog = 1; break; default: fatal(0, "invalid option"); } } - if(getenv("DISORDER_DEBUG_SPEAKER")) debugging = 1; - /* If stderr is a TTY then log there, otherwise to syslog. */ - if(!isatty(2)) { + if((d = getenv("DISORDER_DEBUG_SPEAKER"))) debugging = atoi(d); + if(logsyslog) { openlog(progname, LOG_PID, LOG_DAEMON); log_default = &log_syslog; } - if(config_read()) fatal(0, "cannot read configuration"); + if(config_read(1)) fatal(0, "cannot read configuration"); + bpf = bytes_per_frame(&config->sample_format); /* ignore SIGPIPE */ signal(SIGPIPE, SIG_IGN); /* reap kids */ @@ -721,6 +639,23 @@ int main(int argc, char **argv) { backend = backends[n]; /* backend-specific initialization */ backend->init(); + /* set up the listen socket */ + listenfd = xsocket(PF_UNIX, SOCK_STREAM, 0); + memset(&addr, 0, sizeof addr); + addr.sun_family = AF_UNIX; + snprintf(addr.sun_path, sizeof addr.sun_path, "%s/speaker", + config->home); + if(unlink(addr.sun_path) < 0 && errno != ENOENT) + error(errno, "removing %s", addr.sun_path); + xsetsockopt(listenfd, SOL_SOCKET, SO_REUSEADDR, &one, sizeof one); + if(bind(listenfd, (const struct sockaddr *)&addr, sizeof addr) < 0) + fatal(errno, "error binding socket to %s", addr.sun_path); + xlisten(listenfd, 128); + nonblock(listenfd); + info("listening on %s", addr.sun_path); + memset(&sm, 0, sizeof sm); + sm.type = SM_READY; + speaker_send(1, &sm); mainloop(); info("stopped (parent terminated)"); exit(0);