git.sesse.net Git - ffmpeg/blob - libavfilter/af_headphone.c

   1 /*
   2  * Copyright (C) 2017 Paul B Mahol
   3  * Copyright (C) 2013-2015 Andreas Fuchs, Wolfgang Hrauda
   4  * This file is part of FFmpeg.
   5  *
   6  * FFmpeg is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * FFmpeg is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with FFmpeg; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
  19  */
  20
  21 #include <math.h>
  22
  23 #include "libavutil/avstring.h"
  24 #include "libavutil/channel_layout.h"
  25 #include "libavutil/float_dsp.h"
  26 #include "libavutil/intmath.h"
  27 #include "libavutil/opt.h"
  28 #include "libavcodec/avfft.h"
  29
  30 #include "avfilter.h"
  31 #include "filters.h"
  32 #include "internal.h"
  33 #include "audio.h"
  34
  35 #define TIME_DOMAIN      0
  36 #define FREQUENCY_DOMAIN 1
  37
  38 #define HRIR_STEREO 0
  39 #define HRIR_MULTI  1
  40
  41 typedef struct HeadphoneContext {
  42     const AVClass *class;
  43
  44     char *map;
  45     int type;
  46
  47     int lfe_channel;
  48
  49     int have_hrirs;
  50     int eof_hrirs;
  51
  52     int ir_len;
  53     int air_len;
  54
  55     int nb_inputs;
  56
  57     int nb_irs;
  58
  59     float gain;
  60     float lfe_gain, gain_lfe;
  61
  62     float *ringbuffer[2];
  63     int write[2];
  64
  65     int buffer_length;
  66     int n_fft;
  67     int size;
  68     int hrir_fmt;
  69
  70     float *data_ir[2];
  71     float *temp_src[2];
  72     FFTComplex *temp_fft[2];
  73     FFTComplex *temp_afft[2];
  74
  75     FFTContext *fft[2], *ifft[2];
  76     FFTComplex *data_hrtf[2];
  77
  78     AVFloatDSPContext *fdsp;
  79     struct headphone_inputs {
  80         AVFrame     *frame;
  81         int          ir_len;
  82         int          eof;
  83     } *in;
  84     uint64_t mapping[64];
  85 } HeadphoneContext;
  86
  87 static int parse_channel_name(const char *arg, uint64_t *rchannel)
  88 {
  89     uint64_t layout = av_get_channel_layout(arg);
  90
  91     if (av_get_channel_layout_nb_channels(layout) != 1)
  92         return AVERROR(EINVAL);
  93     *rchannel = layout;
  94     return 0;
  95 }
  96
  97 static void parse_map(AVFilterContext *ctx)
  98 {
  99     HeadphoneContext *s = ctx->priv;
 100     char *arg, *tokenizer, *p;
 101     uint64_t used_channels = 0;
 102
 103     s->nb_inputs = 1;
 104
 105     p = s->map;
 106     while ((arg = av_strtok(p, "|", &tokenizer))) {
 107         uint64_t out_channel;
 108
 109         p = NULL;
 110         if (parse_channel_name(arg, &out_channel)) {
 111             av_log(ctx, AV_LOG_WARNING, "Failed to parse \'%s\' as channel name.\n", arg);
 112             continue;
 113         }
 114         if (used_channels & out_channel) {
 115             av_log(ctx, AV_LOG_WARNING, "Ignoring duplicate channel '%s'.\n", arg);
 116             continue;
 117         }
 118         used_channels        |= out_channel;
 119         s->mapping[s->nb_irs] = out_channel;
 120         s->nb_irs++;
 121     }
 122
 123     if (s->hrir_fmt == HRIR_MULTI)
 124         s->nb_inputs = 2;
 125     else
 126         s->nb_inputs = s->nb_irs + 1;
 127 }
 128
 129 typedef struct ThreadData {
 130     AVFrame *in, *out;
 131     int *write;
 132     float **ir;
 133     int *n_clippings;
 134     float **ringbuffer;
 135     float **temp_src;
 136     FFTComplex **temp_fft;
 137     FFTComplex **temp_afft;
 138 } ThreadData;
 139
 140 static int headphone_convolute(AVFilterContext *ctx, void *arg, int jobnr, int nb_jobs)
 141 {
 142     HeadphoneContext *s = ctx->priv;
 143     ThreadData *td = arg;
 144     AVFrame *in = td->in, *out = td->out;
 145     int offset = jobnr;
 146     int *write = &td->write[jobnr];
 147     const float *const ir = td->ir[jobnr];
 148     int *n_clippings = &td->n_clippings[jobnr];
 149     float *ringbuffer = td->ringbuffer[jobnr];
 150     float *temp_src = td->temp_src[jobnr];
 151     const int ir_len = s->ir_len;
 152     const int air_len = s->air_len;
 153     const float *src = (const float *)in->data[0];
 154     float *dst = (float *)out->data[0];
 155     const int in_channels = in->channels;
 156     const int buffer_length = s->buffer_length;
 157     const uint32_t modulo = (uint32_t)buffer_length - 1;
 158     float *buffer[64];
 159     int wr = *write;
 160     int read;
 161     int i, l;
 162
 163     dst += offset;
 164     for (l = 0; l < in_channels; l++) {
 165         buffer[l] = ringbuffer + l * buffer_length;
 166     }
 167
 168     for (i = 0; i < in->nb_samples; i++) {
 169         const float *temp_ir = ir;
 170
 171         *dst = 0;
 172         for (l = 0; l < in_channels; l++) {
 173             *(buffer[l] + wr) = src[l];
 174         }
 175
 176         for (l = 0; l < in_channels; l++) {
 177             const float *const bptr = buffer[l];
 178
 179             if (l == s->lfe_channel) {
 180                 *dst += *(buffer[s->lfe_channel] + wr) * s->gain_lfe;
 181                 temp_ir += air_len;
 182                 continue;
 183             }
 184
 185             read = (wr - (ir_len - 1) + buffer_length) & modulo;
 186
 187             if (read + ir_len < buffer_length) {
 188                 memcpy(temp_src, bptr + read, ir_len * sizeof(*temp_src));
 189             } else {
 190                 int len = FFMIN(air_len - (read % ir_len), buffer_length - read);
 191
 192                 memcpy(temp_src, bptr + read, len * sizeof(*temp_src));
 193                 memcpy(temp_src + len, bptr, (air_len - len) * sizeof(*temp_src));
 194             }
 195
 196             dst[0] += s->fdsp->scalarproduct_float(temp_ir, temp_src, FFALIGN(ir_len, 32));
 197             temp_ir += air_len;
 198         }
 199
 200         if (fabsf(dst[0]) > 1)
 201             n_clippings[0]++;
 202
 203         dst += 2;
 204         src += in_channels;
 205         wr   = (wr + 1) & modulo;
 206     }
 207
 208     *write = wr;
 209
 210     return 0;
 211 }
 212
 213 static int headphone_fast_convolute(AVFilterContext *ctx, void *arg, int jobnr, int nb_jobs)
 214 {
 215     HeadphoneContext *s = ctx->priv;
 216     ThreadData *td = arg;
 217     AVFrame *in = td->in, *out = td->out;
 218     int offset = jobnr;
 219     int *write = &td->write[jobnr];
 220     FFTComplex *hrtf = s->data_hrtf[jobnr];
 221     int *n_clippings = &td->n_clippings[jobnr];
 222     float *ringbuffer = td->ringbuffer[jobnr];
 223     const int ir_len = s->ir_len;
 224     const float *src = (const float *)in->data[0];
 225     float *dst = (float *)out->data[0];
 226     const int in_channels = in->channels;
 227     const int buffer_length = s->buffer_length;
 228     const uint32_t modulo = (uint32_t)buffer_length - 1;
 229     FFTComplex *fft_in = s->temp_fft[jobnr];
 230     FFTComplex *fft_acc = s->temp_afft[jobnr];
 231     FFTContext *ifft = s->ifft[jobnr];
 232     FFTContext *fft = s->fft[jobnr];
 233     const int n_fft = s->n_fft;
 234     const float fft_scale = 1.0f / s->n_fft;
 235     FFTComplex *hrtf_offset;
 236     int wr = *write;
 237     int n_read;
 238     int i, j;
 239
 240     dst += offset;
 241
 242     n_read = FFMIN(ir_len, in->nb_samples);
 243     for (j = 0; j < n_read; j++) {
 244         dst[2 * j]     = ringbuffer[wr];
 245         ringbuffer[wr] = 0.0;
 246         wr  = (wr + 1) & modulo;
 247     }
 248
 249     for (j = n_read; j < in->nb_samples; j++) {
 250         dst[2 * j] = 0;
 251     }
 252
 253     memset(fft_acc, 0, sizeof(FFTComplex) * n_fft);
 254
 255     for (i = 0; i < in_channels; i++) {
 256         if (i == s->lfe_channel) {
 257             for (j = 0; j < in->nb_samples; j++) {
 258                 dst[2 * j] += src[i + j * in_channels] * s->gain_lfe;
 259             }
 260             continue;
 261         }
 262
 263         offset = i * n_fft;
 264         hrtf_offset = hrtf + offset;
 265
 266         memset(fft_in, 0, sizeof(FFTComplex) * n_fft);
 267
 268         for (j = 0; j < in->nb_samples; j++) {
 269             fft_in[j].re = src[j * in_channels + i];
 270         }
 271
 272         av_fft_permute(fft, fft_in);
 273         av_fft_calc(fft, fft_in);
 274         for (j = 0; j < n_fft; j++) {
 275             const FFTComplex *hcomplex = hrtf_offset + j;
 276             const float re = fft_in[j].re;
 277             const float im = fft_in[j].im;
 278
 279             fft_acc[j].re += re * hcomplex->re - im * hcomplex->im;
 280             fft_acc[j].im += re * hcomplex->im + im * hcomplex->re;
 281         }
 282     }
 283
 284     av_fft_permute(ifft, fft_acc);
 285     av_fft_calc(ifft, fft_acc);
 286
 287     for (j = 0; j < in->nb_samples; j++) {
 288         dst[2 * j] += fft_acc[j].re * fft_scale;
 289     }
 290
 291     for (j = 0; j < ir_len - 1; j++) {
 292         int write_pos = (wr + j) & modulo;
 293
 294         *(ringbuffer + write_pos) += fft_acc[in->nb_samples + j].re * fft_scale;
 295     }
 296
 297     for (i = 0; i < out->nb_samples; i++) {
 298         if (fabsf(dst[0]) > 1) {
 299             n_clippings[0]++;
 300         }
 301
 302         dst += 2;
 303     }
 304
 305     *write = wr;
 306
 307     return 0;
 308 }
 309
 310 static int check_ir(AVFilterLink *inlink, int input_number)
 311 {
 312     AVFilterContext *ctx = inlink->dst;
 313     HeadphoneContext *s = ctx->priv;
 314     int ir_len, max_ir_len;
 315
 316     ir_len = ff_inlink_queued_samples(inlink);
 317     max_ir_len = 65536;
 318     if (ir_len > max_ir_len) {
 319         av_log(ctx, AV_LOG_ERROR, "Too big length of IRs: %d > %d.\n", ir_len, max_ir_len);
 320         return AVERROR(EINVAL);
 321     }
 322     s->in[input_number].ir_len = ir_len;
 323     s->ir_len = FFMAX(ir_len, s->ir_len);
 324
 325     return 0;
 326 }
 327
 328 static int headphone_frame(HeadphoneContext *s, AVFrame *in, AVFilterLink *outlink)
 329 {
 330     AVFilterContext *ctx = outlink->src;
 331     int n_clippings[2] = { 0 };
 332     ThreadData td;
 333     AVFrame *out;
 334
 335     out = ff_get_audio_buffer(outlink, in->nb_samples);
 336     if (!out) {
 337         av_frame_free(&in);
 338         return AVERROR(ENOMEM);
 339     }
 340     out->pts = in->pts;
 341
 342     td.in = in; td.out = out; td.write = s->write;
 343     td.ir = s->data_ir; td.n_clippings = n_clippings;
 344     td.ringbuffer = s->ringbuffer; td.temp_src = s->temp_src;
 345     td.temp_fft = s->temp_fft;
 346     td.temp_afft = s->temp_afft;
 347
 348     if (s->type == TIME_DOMAIN) {
 349         ctx->internal->execute(ctx, headphone_convolute, &td, NULL, 2);
 350     } else {
 351         ctx->internal->execute(ctx, headphone_fast_convolute, &td, NULL, 2);
 352     }
 353     emms_c();
 354
 355     if (n_clippings[0] + n_clippings[1] > 0) {
 356         av_log(ctx, AV_LOG_WARNING, "%d of %d samples clipped. Please reduce gain.\n",
 357                n_clippings[0] + n_clippings[1], out->nb_samples * 2);
 358     }
 359
 360     av_frame_free(&in);
 361     return ff_filter_frame(outlink, out);
 362 }
 363
 364 static int convert_coeffs(AVFilterContext *ctx, AVFilterLink *inlink)
 365 {
 366     struct HeadphoneContext *s = ctx->priv;
 367     const int ir_len = s->ir_len;
 368     int nb_input_channels = ctx->inputs[0]->channels;
 369     float gain_lin = expf((s->gain - 3 * nb_input_channels) / 20 * M_LN10);
 370     int ret = 0;
 371     int n_fft;
 372     int i, j, k;
 373
 374     s->air_len = 1 << (32 - ff_clz(ir_len));
 375     if (s->type == TIME_DOMAIN) {
 376         s->air_len = FFALIGN(s->air_len, 32);
 377     }
 378     s->buffer_length = 1 << (32 - ff_clz(s->air_len));
 379     s->n_fft = n_fft = 1 << (32 - ff_clz(ir_len + s->size));
 380
 381     if (s->type == FREQUENCY_DOMAIN) {
 382         s->fft[0] = av_fft_init(av_log2(s->n_fft), 0);
 383         s->fft[1] = av_fft_init(av_log2(s->n_fft), 0);
 384         s->ifft[0] = av_fft_init(av_log2(s->n_fft), 1);
 385         s->ifft[1] = av_fft_init(av_log2(s->n_fft), 1);
 386
 387         if (!s->fft[0] || !s->fft[1] || !s->ifft[0] || !s->ifft[1]) {
 388             av_log(ctx, AV_LOG_ERROR, "Unable to create FFT contexts of size %d.\n", s->n_fft);
 389             ret = AVERROR(ENOMEM);
 390             goto fail;
 391         }
 392     }
 393
 394     if (s->type == TIME_DOMAIN) {
 395         s->ringbuffer[0] = av_calloc(s->buffer_length, sizeof(float) * nb_input_channels);
 396         s->ringbuffer[1] = av_calloc(s->buffer_length, sizeof(float) * nb_input_channels);
 397     } else {
 398         s->ringbuffer[0] = av_calloc(s->buffer_length, sizeof(float));
 399         s->ringbuffer[1] = av_calloc(s->buffer_length, sizeof(float));
 400         s->temp_fft[0] = av_calloc(s->n_fft, sizeof(FFTComplex));
 401         s->temp_fft[1] = av_calloc(s->n_fft, sizeof(FFTComplex));
 402         s->temp_afft[0] = av_calloc(s->n_fft, sizeof(FFTComplex));
 403         s->temp_afft[1] = av_calloc(s->n_fft, sizeof(FFTComplex));
 404         if (!s->temp_fft[0] || !s->temp_fft[1] ||
 405             !s->temp_afft[0] || !s->temp_afft[1]) {
 406             ret = AVERROR(ENOMEM);
 407             goto fail;
 408         }
 409     }
 410
 411     if (!s->ringbuffer[0] || !s->ringbuffer[1]) {
 412         ret = AVERROR(ENOMEM);
 413         goto fail;
 414     }
 415
 416     if (s->type == TIME_DOMAIN) {
 417         s->temp_src[0] = av_calloc(s->air_len, sizeof(float));
 418         s->temp_src[1] = av_calloc(s->air_len, sizeof(float));
 419
 420         s->data_ir[0] = av_calloc(nb_input_channels * s->air_len, sizeof(*s->data_ir[0]));
 421         s->data_ir[1] = av_calloc(nb_input_channels * s->air_len, sizeof(*s->data_ir[1]));
 422         if (!s->data_ir[0] || !s->data_ir[1] || !s->temp_src[0] || !s->temp_src[1]) {
 423             ret = AVERROR(ENOMEM);
 424             goto fail;
 425         }
 426     } else {
 427         s->data_hrtf[0] = av_calloc(n_fft, sizeof(*s->data_hrtf[0]) * nb_input_channels);
 428         s->data_hrtf[1] = av_calloc(n_fft, sizeof(*s->data_hrtf[1]) * nb_input_channels);
 429         if (!s->data_hrtf[0] || !s->data_hrtf[1]) {
 430             ret = AVERROR(ENOMEM);
 431             goto fail;
 432         }
 433     }
 434
 435     for (i = 0; i < s->nb_inputs - 1; i++) {
 436         int len = s->in[i + 1].ir_len;
 437         float *ptr;
 438
 439         ret = ff_inlink_consume_samples(ctx->inputs[i + 1], len, len, &s->in[i + 1].frame);
 440         if (ret < 0)
 441             goto fail;
 442         ptr = (float *)s->in[i + 1].frame->extended_data[0];
 443
 444         if (s->hrir_fmt == HRIR_STEREO) {
 445             int idx = av_get_channel_layout_channel_index(inlink->channel_layout,
 446                                                           s->mapping[i]);
 447             if (idx < 0)
 448                 continue;
 449             if (s->type == TIME_DOMAIN) {
 450                 float *data_ir_l = s->data_ir[0] + idx * s->air_len;
 451                 float *data_ir_r = s->data_ir[1] + idx * s->air_len;
 452
 453                 for (j = 0; j < len; j++) {
 454                     data_ir_l[j] = ptr[len * 2 - j * 2 - 2] * gain_lin;
 455                     data_ir_r[j] = ptr[len * 2 - j * 2 - 1] * gain_lin;
 456                 }
 457             } else {
 458                 FFTComplex *fft_in_l = s->data_hrtf[0] + idx * n_fft;
 459                 FFTComplex *fft_in_r = s->data_hrtf[1] + idx * n_fft;
 460
 461                 for (j = 0; j < len; j++) {
 462                     fft_in_l[j].re = ptr[j * 2    ] * gain_lin;
 463                     fft_in_r[j].re = ptr[j * 2 + 1] * gain_lin;
 464                 }
 465
 466                 av_fft_permute(s->fft[0], fft_in_l);
 467                 av_fft_calc(s->fft[0], fft_in_l);
 468                 av_fft_permute(s->fft[0], fft_in_r);
 469                 av_fft_calc(s->fft[0], fft_in_r);
 470             }
 471         } else {
 472             int I, N = ctx->inputs[1]->channels;
 473
 474             for (k = 0; k < N / 2; k++) {
 475                 int idx = av_get_channel_layout_channel_index(inlink->channel_layout,
 476                                                               s->mapping[k]);
 477                 if (idx < 0)
 478                     continue;
 479
 480                 I = k * 2;
 481                 if (s->type == TIME_DOMAIN) {
 482                     float *data_ir_l = s->data_ir[0] + idx * s->air_len;
 483                     float *data_ir_r = s->data_ir[1] + idx * s->air_len;
 484
 485                     for (j = 0; j < len; j++) {
 486                         data_ir_l[j] = ptr[len * N - j * N - N + I    ] * gain_lin;
 487                         data_ir_r[j] = ptr[len * N - j * N - N + I + 1] * gain_lin;
 488                     }
 489                 } else {
 490                     FFTComplex *fft_in_l = s->data_hrtf[0] + idx * n_fft;
 491                     FFTComplex *fft_in_r = s->data_hrtf[1] + idx * n_fft;
 492
 493                     for (j = 0; j < len; j++) {
 494                         fft_in_l[j].re = ptr[j * N + I    ] * gain_lin;
 495                         fft_in_r[j].re = ptr[j * N + I + 1] * gain_lin;
 496                     }
 497
 498                     av_fft_permute(s->fft[0], fft_in_l);
 499                     av_fft_calc(s->fft[0], fft_in_l);
 500                     av_fft_permute(s->fft[0], fft_in_r);
 501                     av_fft_calc(s->fft[0], fft_in_r);
 502                 }
 503             }
 504         }
 505
 506         av_frame_free(&s->in[i + 1].frame);
 507     }
 508
 509     s->have_hrirs = 1;
 510
 511 fail:
 512
 513     for (i = 0; i < s->nb_inputs - 1; i++)
 514         av_frame_free(&s->in[i + 1].frame);
 515
 516     return ret;
 517 }
 518
 519 static int activate(AVFilterContext *ctx)
 520 {
 521     HeadphoneContext *s = ctx->priv;
 522     AVFilterLink *inlink = ctx->inputs[0];
 523     AVFilterLink *outlink = ctx->outputs[0];
 524     AVFrame *in = NULL;
 525     int i, ret;
 526
 527     FF_FILTER_FORWARD_STATUS_BACK_ALL(ctx->outputs[0], ctx);
 528     if (!s->eof_hrirs) {
 529         int eof = 1;
 530         for (i = 1; i < s->nb_inputs; i++) {
 531             if (s->in[i].eof)
 532                 continue;
 533
 534             if ((ret = check_ir(ctx->inputs[i], i)) < 0)
 535                 return ret;
 536
 537             if (ff_outlink_get_status(ctx->inputs[i]) == AVERROR_EOF) {
 538                 if (!ff_inlink_queued_samples(ctx->inputs[i])) {
 539                     av_log(ctx, AV_LOG_ERROR, "No samples provided for "
 540                            "HRIR stream %d.\n", i - 1);
 541                     return AVERROR_INVALIDDATA;
 542                 }
 543                     s->in[i].eof = 1;
 544             } else {
 545                 if (ff_outlink_frame_wanted(ctx->outputs[0]))
 546                     ff_inlink_request_frame(ctx->inputs[i]);
 547                 eof = 0;
 548             }
 549         }
 550         if (!eof)
 551             return 0;
 552         s->eof_hrirs = 1;
 553
 554         ret = convert_coeffs(ctx, inlink);
 555         if (ret < 0)
 556             return ret;
 557     } else if (!s->have_hrirs)
 558         return AVERROR_EOF;
 559
 560     if ((ret = ff_inlink_consume_samples(ctx->inputs[0], s->size, s->size, &in)) > 0) {
 561         ret = headphone_frame(s, in, outlink);
 562         if (ret < 0)
 563             return ret;
 564     }
 565
 566     if (ret < 0)
 567         return ret;
 568
 569     FF_FILTER_FORWARD_STATUS(ctx->inputs[0], ctx->outputs[0]);
 570     if (ff_outlink_frame_wanted(ctx->outputs[0]))
 571         ff_inlink_request_frame(ctx->inputs[0]);
 572
 573     return 0;
 574 }
 575
 576 static int query_formats(AVFilterContext *ctx)
 577 {
 578     struct HeadphoneContext *s = ctx->priv;
 579     AVFilterFormats *formats = NULL;
 580     AVFilterChannelLayouts *layouts = NULL;
 581     AVFilterChannelLayouts *stereo_layout = NULL;
 582     AVFilterChannelLayouts *hrir_layouts = NULL;
 583     int ret, i;
 584
 585     ret = ff_add_format(&formats, AV_SAMPLE_FMT_FLT);
 586     if (ret)
 587         return ret;
 588     ret = ff_set_common_formats(ctx, formats);
 589     if (ret)
 590         return ret;
 591
 592     layouts = ff_all_channel_layouts();
 593     if (!layouts)
 594         return AVERROR(ENOMEM);
 595
 596     ret = ff_channel_layouts_ref(layouts, &ctx->inputs[0]->outcfg.channel_layouts);
 597     if (ret)
 598         return ret;
 599
 600     ret = ff_add_channel_layout(&stereo_layout, AV_CH_LAYOUT_STEREO);
 601     if (ret)
 602         return ret;
 603     ret = ff_channel_layouts_ref(stereo_layout, &ctx->outputs[0]->incfg.channel_layouts);
 604     if (ret)
 605         return ret;
 606
 607     if (s->hrir_fmt == HRIR_MULTI) {
 608         hrir_layouts = ff_all_channel_counts();
 609         if (!hrir_layouts)
 610             return AVERROR(ENOMEM);
 611         ret = ff_channel_layouts_ref(hrir_layouts, &ctx->inputs[1]->outcfg.channel_layouts);
 612         if (ret)
 613             return ret;
 614     } else {
 615         for (i = 1; i < s->nb_inputs; i++) {
 616             ret = ff_channel_layouts_ref(stereo_layout, &ctx->inputs[i]->outcfg.channel_layouts);
 617             if (ret)
 618                 return ret;
 619         }
 620     }
 621
 622     formats = ff_all_samplerates();
 623     if (!formats)
 624         return AVERROR(ENOMEM);
 625     return ff_set_common_samplerates(ctx, formats);
 626 }
 627
 628 static int config_input(AVFilterLink *inlink)
 629 {
 630     AVFilterContext *ctx = inlink->dst;
 631     HeadphoneContext *s = ctx->priv;
 632
 633     if (s->nb_irs < inlink->channels) {
 634         av_log(ctx, AV_LOG_ERROR, "Number of HRIRs must be >= %d.\n", inlink->channels);
 635         return AVERROR(EINVAL);
 636     }
 637
 638     s->lfe_channel = av_get_channel_layout_channel_index(inlink->channel_layout,
 639                                                          AV_CH_LOW_FREQUENCY);
 640     return 0;
 641 }
 642
 643 static av_cold int init(AVFilterContext *ctx)
 644 {
 645     HeadphoneContext *s = ctx->priv;
 646     int i, ret;
 647
 648     AVFilterPad pad = {
 649         .name         = "in0",
 650         .type         = AVMEDIA_TYPE_AUDIO,
 651         .config_props = config_input,
 652     };
 653     if ((ret = ff_insert_inpad(ctx, 0, &pad)) < 0)
 654         return ret;
 655
 656     if (!s->map) {
 657         av_log(ctx, AV_LOG_ERROR, "Valid mapping must be set.\n");
 658         return AVERROR(EINVAL);
 659     }
 660
 661     parse_map(ctx);
 662
 663     s->in = av_calloc(s->nb_inputs, sizeof(*s->in));
 664     if (!s->in)
 665         return AVERROR(ENOMEM);
 666
 667     for (i = 1; i < s->nb_inputs; i++) {
 668         char *name = av_asprintf("hrir%d", i - 1);
 669         AVFilterPad pad = {
 670             .name         = name,
 671             .type         = AVMEDIA_TYPE_AUDIO,
 672         };
 673         if (!name)
 674             return AVERROR(ENOMEM);
 675         if ((ret = ff_insert_inpad(ctx, i, &pad)) < 0) {
 676             av_freep(&pad.name);
 677             return ret;
 678         }
 679     }
 680
 681     s->fdsp = avpriv_float_dsp_alloc(0);
 682     if (!s->fdsp)
 683         return AVERROR(ENOMEM);
 684
 685     return 0;
 686 }
 687
 688 static int config_output(AVFilterLink *outlink)
 689 {
 690     AVFilterContext *ctx = outlink->src;
 691     HeadphoneContext *s = ctx->priv;
 692     AVFilterLink *inlink = ctx->inputs[0];
 693
 694     if (s->hrir_fmt == HRIR_MULTI) {
 695         AVFilterLink *hrir_link = ctx->inputs[1];
 696
 697         if (hrir_link->channels < inlink->channels * 2) {
 698             av_log(ctx, AV_LOG_ERROR, "Number of channels in HRIR stream must be >= %d.\n", inlink->channels * 2);
 699             return AVERROR(EINVAL);
 700         }
 701     }
 702
 703     s->gain_lfe = expf((s->gain - 3 * inlink->channels + s->lfe_gain) / 20 * M_LN10);
 704
 705     return 0;
 706 }
 707
 708 static av_cold void uninit(AVFilterContext *ctx)
 709 {
 710     HeadphoneContext *s = ctx->priv;
 711
 712     av_fft_end(s->ifft[0]);
 713     av_fft_end(s->ifft[1]);
 714     av_fft_end(s->fft[0]);
 715     av_fft_end(s->fft[1]);
 716     av_freep(&s->data_ir[0]);
 717     av_freep(&s->data_ir[1]);
 718     av_freep(&s->ringbuffer[0]);
 719     av_freep(&s->ringbuffer[1]);
 720     av_freep(&s->temp_src[0]);
 721     av_freep(&s->temp_src[1]);
 722     av_freep(&s->temp_fft[0]);
 723     av_freep(&s->temp_fft[1]);
 724     av_freep(&s->temp_afft[0]);
 725     av_freep(&s->temp_afft[1]);
 726     av_freep(&s->data_hrtf[0]);
 727     av_freep(&s->data_hrtf[1]);
 728     av_freep(&s->fdsp);
 729
 730     av_freep(&s->in);
 731     for (unsigned i = 1; i < ctx->nb_inputs; i++)
 732         av_freep(&ctx->input_pads[i].name);
 733 }
 734
 735 #define OFFSET(x) offsetof(HeadphoneContext, x)
 736 #define FLAGS AV_OPT_FLAG_AUDIO_PARAM|AV_OPT_FLAG_FILTERING_PARAM
 737
 738 static const AVOption headphone_options[] = {
 739     { "map",       "set channels convolution mappings",  OFFSET(map),      AV_OPT_TYPE_STRING, {.str=NULL},            .flags = FLAGS },
 740     { "gain",      "set gain in dB",                     OFFSET(gain),     AV_OPT_TYPE_FLOAT,  {.dbl=0},     -20,  40, .flags = FLAGS },
 741     { "lfe",       "set lfe gain in dB",                 OFFSET(lfe_gain), AV_OPT_TYPE_FLOAT,  {.dbl=0},     -20,  40, .flags = FLAGS },
 742     { "type",      "set processing",                     OFFSET(type),     AV_OPT_TYPE_INT,    {.i64=1},       0,   1, .flags = FLAGS, "type" },
 743     { "time",      "time domain",                        0,                AV_OPT_TYPE_CONST,  {.i64=0},       0,   0, .flags = FLAGS, "type" },
 744     { "freq",      "frequency domain",                   0,                AV_OPT_TYPE_CONST,  {.i64=1},       0,   0, .flags = FLAGS, "type" },
 745     { "size",      "set frame size",                     OFFSET(size),     AV_OPT_TYPE_INT,    {.i64=1024},1024,96000, .flags = FLAGS },
 746     { "hrir",      "set hrir format",                    OFFSET(hrir_fmt), AV_OPT_TYPE_INT,    {.i64=HRIR_STEREO}, 0, 1, .flags = FLAGS, "hrir" },
 747     { "stereo",    "hrir files have exactly 2 channels", 0,                AV_OPT_TYPE_CONST,  {.i64=HRIR_STEREO}, 0, 0, .flags = FLAGS, "hrir" },
 748     { "multich",   "single multichannel hrir file",      0,                AV_OPT_TYPE_CONST,  {.i64=HRIR_MULTI},  0, 0, .flags = FLAGS, "hrir" },
 749     { NULL }
 750 };
 751
 752 AVFILTER_DEFINE_CLASS(headphone);
 753
 754 static const AVFilterPad outputs[] = {
 755     {
 756         .name          = "default",
 757         .type          = AVMEDIA_TYPE_AUDIO,
 758         .config_props  = config_output,
 759     },
 760     { NULL }
 761 };
 762
 763 AVFilter ff_af_headphone = {
 764     .name          = "headphone",
 765     .description   = NULL_IF_CONFIG_SMALL("Apply headphone binaural spatialization with HRTFs in additional streams."),
 766     .priv_size     = sizeof(HeadphoneContext),
 767     .priv_class    = &headphone_class,
 768     .init          = init,
 769     .uninit        = uninit,
 770     .query_formats = query_formats,
 771     .activate      = activate,
 772     .inputs        = NULL,
 773     .outputs       = outputs,
 774     .flags         = AVFILTER_FLAG_SLICE_THREADS | AVFILTER_FLAG_DYNAMIC_INPUTS,
 775 };