X-Git-Url: http://git.tuebingen.mpg.de/?p=paraslash.git;a=blobdiff_plain;f=alsa_write.c;h=e1c5ce312e6ce8f6af6d81c9070b5899e40f1398;hp=cf0f335bebc7426c9b24aad7537601be3dbb0dd7;hb=cc2a6158eef6957769fd5739446916d3e5413ae1;hpb=e7b866a338a22ad07c8e60d405616a8065be89b1 diff --git a/alsa_write.c b/alsa_write.c index cf0f335b..e1c5ce31 100644 --- a/alsa_write.c +++ b/alsa_write.c @@ -12,9 +12,12 @@ * based on the vplay program by Michael Beck. */ +#include #include #include #include +#include +#include #include "para.h" #include "fd.h" @@ -22,6 +25,7 @@ #include "list.h" #include "sched.h" #include "ggo.h" +#include "buffer_tree.h" #include "write.h" #include "alsa_write.cmdline.h" #include "error.h" @@ -35,10 +39,10 @@ struct private_alsa_write_data { snd_pcm_t *handle; /** Determined and set by alsa_open(). */ int bytes_per_frame; - /** Don't write anything until this time. */ - struct timeval next_chunk; /** The approximate maximum buffer duration in us. */ unsigned buffer_time; + /* Number of frames that fit into the buffer. */ + unsigned buffer_frames; /** * The samplerate given by command line option or the decoder * of the writer node group. @@ -79,18 +83,19 @@ static int alsa_init(struct private_alsa_write_data *pad, pad->channels) < 0) return -E_CHANNEL_COUNT; if (snd_pcm_hw_params_set_rate_near(pad->handle, hwparams, - &pad->samplerate, 0) < 0) + &pad->samplerate, NULL) < 0) return -E_SET_RATE; - err = snd_pcm_hw_params_get_buffer_time_max(hwparams, &pad->buffer_time, 0); + err = snd_pcm_hw_params_get_buffer_time_max(hwparams, + &pad->buffer_time, NULL); if (err < 0 || !pad->buffer_time) return -E_GET_BUFFER_TIME; PARA_INFO_LOG("buffer time: %d\n", pad->buffer_time); if (snd_pcm_hw_params_set_buffer_time_near(pad->handle, hwparams, - &pad->buffer_time, 0) < 0) + &pad->buffer_time, NULL) < 0) return -E_SET_BUFFER_TIME; if (snd_pcm_hw_params(pad->handle, hwparams) < 0) return -E_HW_PARAMS; - snd_pcm_hw_params_get_period_size(hwparams, &period_size, 0); + snd_pcm_hw_params_get_period_size(hwparams, &period_size, NULL); snd_pcm_hw_params_get_buffer_size(hwparams, &buffer_size); PARA_INFO_LOG("buffer size: %lu, period_size: %lu\n", buffer_size, period_size); @@ -119,11 +124,13 @@ static int alsa_init(struct private_alsa_write_data *pad, PARA_INFO_LOG("bytes per frame: %d\n", pad->bytes_per_frame); if (snd_pcm_nonblock(pad->handle, 1)) PARA_ERROR_LOG("failed to set nonblock mode\n"); + pad->buffer_frames = 1000 * pad->buffer_time / pad->samplerate; + PARA_INFO_LOG("max buffered frames: %d\n", pad->buffer_frames); return 1; } /* Open an instance of the alsa writer. */ -static int alsa_open(struct writer_node *wn) +static int alsa_open_nobtr(struct writer_node *wn) { struct alsa_write_args_info *conf = wn->conf; struct writer_node_group *wng = wn->wng; @@ -139,28 +146,132 @@ static int alsa_open(struct writer_node *wn) else pad->channels = conf->channels_arg; PARA_INFO_LOG("%d channel(s), %dHz\n", pad->channels, pad->samplerate); - tv_add(now, &(struct timeval){0, 100 * 1000}, &pad->next_chunk); return 1; } +static int alsa_open_btr(struct writer_node *wn) +{ + struct alsa_write_args_info *conf = wn->conf; + struct private_alsa_write_data *pad = para_calloc(sizeof(*pad)); + int ret; + char *buf = NULL; + + sprintf(wn->task.status, "alsa writer"); + wn->private_data = pad; + + /* defaults */ + pad->samplerate = conf->samplerate_arg; + pad->channels = conf->channels_arg; + + if (!conf->samplerate_given) { /* config option trumps btr_exec */ + /* ask parent btr nodes */ + ret = btr_exec_up(wn->btrn, "samplerate", &buf); + if (ret >= 0) { + int32_t rate; + ret = para_atoi32(buf, &rate); + if (ret < 0) /* should not happen */ + goto out; + pad->samplerate = rate; + } + freep(&buf); + } + + if (!conf->channels_given) { + ret = btr_exec_up(wn->btrn, "channels", &buf); + if (ret >= 0) { + int32_t ch; + ret = para_atoi32(buf, &ch); + if (ret < 0) + goto out; + pad->channels = ch; + } + freep(&buf); + } + PARA_INFO_LOG("%d channel(s), %dHz\n", pad->channels, pad->samplerate); + ret = 1; +out: + freep(&buf); + if (ret < 0) + free(pad); + return ret; +} +static int alsa_open(struct writer_node *wn) +{ + struct alsa_write_args_info *conf = wn->conf; + + if (conf->buffer_tree_given) + return alsa_open_btr(wn); + else + return alsa_open_nobtr(wn); + +} + static int alsa_write_pre_select(struct sched *s, struct writer_node *wn) { + struct alsa_write_args_info *conf = wn->conf; struct private_alsa_write_data *pad = wn->private_data; struct writer_node_group *wng = wn->wng; - struct timeval diff; + struct timeval tv; + snd_pcm_sframes_t avail, underrun; - if (!*wng->loaded) + if (!pad->handle) return 1; - if (tv_diff(now, &pad->next_chunk, &diff) < 0) { - if (tv_diff(&s->timeout, &diff, NULL) > 0) - s->timeout = diff; + if (conf->buffer_tree_given) { + size_t sz = btr_get_input_queue_size(wn->btrn); + if (sz < pad->bytes_per_frame) + return 1; } else { - s->timeout.tv_sec = 0; - s->timeout.tv_usec = 1; + if (*wng->loaded - wn->written < pad->bytes_per_frame) + return 1; } + /* + * Data is available to be written to the alsa handle. Compute number + * of milliseconds until next buffer underrun would occur. + * + * snd_pcm_avail_update() updates the current available count of + * samples for writing. It is a light method to obtain current stream + * position, because it does not require the user <-> kernel context + * switch, but the value is less accurate, because ring buffer pointers + * are updated in kernel drivers only when an interrupt occurs. + */ + avail = snd_pcm_avail_update(pad->handle); + if (avail < 0) + avail = 0; + underrun = (pad->buffer_frames - avail) * pad->buffer_time + / pad->buffer_frames / 1000; + if (underrun < 50) + underrun = 50; + underrun -= 50; + ms2tv(underrun, &tv); + if (tv_diff(&s->timeout, &tv, NULL) > 0) + s->timeout = tv; + //PARA_CRIT_LOG("timout: %lu\n", tv2ms(&s->timeout)); return 1; } +static void alsa_write_pre_select_btr(struct sched *s, struct task *t) +{ + struct writer_node *wn = container_of(t, struct writer_node, task); + t->error = alsa_write_pre_select(s, wn); +} + +static void xrun(snd_pcm_t *handle) +{ + snd_pcm_status_t *status; + int ret; + struct timeval tv, diff; + + snd_pcm_status_alloca(&status); + ret = snd_pcm_status(handle, status); + if (ret < 0) + return; + if (snd_pcm_status_get_state(status) != SND_PCM_STATE_XRUN) + return; + snd_pcm_status_get_trigger_tstamp(status, &tv); + tv_diff(now, &tv, &diff); + PARA_WARNING_LOG("underrun: %lums\n", tv2ms(&diff)); +} + static int alsa_write_post_select(__a_unused struct sched *s, struct writer_node *wn) { @@ -168,7 +279,6 @@ static int alsa_write_post_select(__a_unused struct sched *s, struct writer_node_group *wng = wn->wng; size_t bytes = *wng->loaded - wn->written; unsigned char *data = (unsigned char*)*wng->bufp + wn->written; - struct timeval tv; snd_pcm_sframes_t ret, frames, avail; if (*wng->input_error < 0 && (!pad->handle || bytes < pad->bytes_per_frame)) { @@ -177,8 +287,6 @@ static int alsa_write_post_select(__a_unused struct sched *s, } if (!bytes) /* no data available */ return 0; - if (tv_diff(now, &pad->next_chunk, NULL) < 0) - return 0; if (!pad->handle) { int err = alsa_init(pad, wn->conf); if (err < 0) @@ -189,26 +297,22 @@ static int alsa_write_post_select(__a_unused struct sched *s, return 0; avail = snd_pcm_avail_update(pad->handle); if (avail <= 0) - goto delay; + return 0; frames = PARA_MIN(frames, avail); ret = snd_pcm_writei(pad->handle, data, frames); - if (ret < 0) { - PARA_WARNING_LOG("%s\n", snd_strerror(-ret)); - if (ret == -EPIPE) { - snd_pcm_prepare(pad->handle); - return 0; - } - if (ret == -EAGAIN) - goto delay; - return -E_ALSA_WRITE; + if (ret >= 0) { + wn->written += ret * pad->bytes_per_frame; + return 1; } - wn->written += ret * pad->bytes_per_frame; - return 1; -delay: - /* wait until 50% buffer space is available */ - ms2tv(pad->buffer_time / 2000, &tv); - tv_add(now, &tv, &pad->next_chunk); - return 0; + if (ret == -EPIPE) { + xrun(pad->handle); + snd_pcm_prepare(pad->handle); + return 0; + } + PARA_WARNING_LOG("%s\n", snd_strerror(-ret)); + if (ret == -EAGAIN) + return 0; + return -E_ALSA_WRITE; } static void alsa_close(struct writer_node *wn) @@ -224,6 +328,69 @@ static void alsa_close(struct writer_node *wn) free(pad); } +static void alsa_write_post_select_btr(__a_unused struct sched *s, + struct task *t) +{ + struct writer_node *wn = container_of(t, struct writer_node, task); + struct private_alsa_write_data *pad = wn->private_data; + char *data; + size_t bytes; + snd_pcm_sframes_t frames, avail; + int ret; + +again: + bytes = btr_next_buffer(wn->btrn, &data); + //PARA_CRIT_LOG("have: %zu\n", bytes); + t->error = 0; + ret = -E_ALSA_ORPHAN; + if (btr_no_parent(wn->btrn) && (!pad->handle || bytes < pad->bytes_per_frame)) + goto err; + if (!pad->handle) { + if (bytes == 0) /* no data available */ + return; + PARA_CRIT_LOG("alsa init\n"); + ret = alsa_init(pad, wn->conf); + if (ret < 0) + goto err; + } + for (;;) { + if (bytes == 0) + return; + if (bytes >= pad->bytes_per_frame) + break; + /* should not be possible to reach this */ + PARA_CRIT_LOG("dropping %zu byte buffer\n", bytes); + btr_consume(wn->btrn, bytes); + bytes = btr_next_buffer(wn->btrn, &data); + } + frames = bytes / pad->bytes_per_frame; + avail = snd_pcm_avail_update(pad->handle); + if (avail <= 0) + return; + frames = PARA_MIN(frames, avail); + //PARA_CRIT_LOG("writing %ld frames\n", frames); + frames = snd_pcm_writei(pad->handle, data, frames); + if (frames >= 0) { + btr_consume(wn->btrn, frames * pad->bytes_per_frame); + goto again; + } + if (frames == -EPIPE) { + xrun(pad->handle); + snd_pcm_prepare(pad->handle); + return; + } + PARA_WARNING_LOG("%s\n", snd_strerror(-frames)); + if (frames == -EAGAIN) + return; + ret = -E_ALSA_WRITE; +err: + assert(ret < 0); + alsa_close(wn); + btr_del_node(wn->btrn); + wn->btrn = NULL; + t->error = ret; +} + __malloc static void *alsa_parse_config(const char *options) { int ret; @@ -256,11 +423,14 @@ void alsa_write_init(struct writer *w) w->open = alsa_open; w->close = alsa_close; w->pre_select = alsa_write_pre_select; + w->pre_select_btr = alsa_write_pre_select_btr; w->post_select = alsa_write_post_select; + w->post_select_btr = alsa_write_post_select_btr; w->parse_config = alsa_parse_config; w->shutdown = NULL; /* nothing to do */ w->help = (struct ggo_help) { .short_help = alsa_write_args_info_help, .detailed_help = alsa_write_args_info_detailed_help }; + alsa_cmdline_parser_free(&dummy); }