yading@10: /*
yading@10:  * Copyright (c) 2013 Nicolas George
yading@10:  *
yading@10:  * This file is part of FFmpeg.
yading@10:  *
yading@10:  * FFmpeg is free software; you can redistribute it and/or
yading@10:  * modify it under the terms of the GNU Lesser General Public License
yading@10:  * as published by the Free Software Foundation; either
yading@10:  * version 2.1 of the License, or (at your option) any later version.
yading@10:  *
yading@10:  * FFmpeg is distributed in the hope that it will be useful,
yading@10:  * but WITHOUT ANY WARRANTY; without even the implied warranty of
yading@10:  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
yading@10:  * GNU Lesser General Public License for more details.
yading@10:  *
yading@10:  * You should have received a copy of the GNU Lesser General Public License
yading@10:  * along with FFmpeg; if not, write to the Free Software Foundation, Inc.,
yading@10:  * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
yading@10:  */
yading@10: 
yading@10: #include <float.h>
yading@10: 
yading@10: #include "libavutil/avassert.h"
yading@10: #include "libavutil/channel_layout.h"
yading@10: #include "libavutil/opt.h"
yading@10: #include "audio.h"
yading@10: #include "avfilter.h"
yading@10: #include "internal.h"
yading@10: 
yading@10: typedef struct {
yading@10:     const AVClass *class;
yading@10:     double frequency;
yading@10:     double beep_factor;
yading@10:     int samples_per_frame;
yading@10:     int sample_rate;
yading@10:     int64_t duration;
yading@10:     int16_t *sin;
yading@10:     int64_t pts;
yading@10:     uint32_t phi;  ///< current phase of the sine (2pi = 1<<32)
yading@10:     uint32_t dphi; ///< phase increment between two samples
yading@10:     unsigned beep_period;
yading@10:     unsigned beep_index;
yading@10:     unsigned beep_length;
yading@10:     uint32_t phi_beep;  ///< current phase of the beep
yading@10:     uint32_t dphi_beep; ///< phase increment of the beep
yading@10: } SineContext;
yading@10: 
yading@10: #define CONTEXT SineContext
yading@10: #define FLAGS AV_OPT_FLAG_AUDIO_PARAM|AV_OPT_FLAG_FILTERING_PARAM
yading@10: 
yading@10: #define OPT_GENERIC(name, field, def, min, max, descr, type, deffield, ...) \
yading@10:     { name, descr, offsetof(CONTEXT, field), AV_OPT_TYPE_ ## type,          \
yading@10:       { .deffield = def }, min, max, FLAGS, __VA_ARGS__ }
yading@10: 
yading@10: #define OPT_INT(name, field, def, min, max, descr, ...) \
yading@10:     OPT_GENERIC(name, field, def, min, max, descr, INT, i64, __VA_ARGS__)
yading@10: 
yading@10: #define OPT_DBL(name, field, def, min, max, descr, ...) \
yading@10:     OPT_GENERIC(name, field, def, min, max, descr, DOUBLE, dbl, __VA_ARGS__)
yading@10: 
yading@10: #define OPT_DUR(name, field, def, min, max, descr, ...) \
yading@10:     OPT_GENERIC(name, field, def, min, max, descr, DURATION, str, __VA_ARGS__)
yading@10: 
yading@10: static const AVOption sine_options[] = {
yading@10:     OPT_DBL("frequency",         frequency,            440, 0, DBL_MAX,   "set the sine frequency"),
yading@10:     OPT_DBL("f",                 frequency,            440, 0, DBL_MAX,   "set the sine frequency"),
yading@10:     OPT_DBL("beep_factor",       beep_factor,            0, 0, DBL_MAX,   "set the beep fequency factor"),
yading@10:     OPT_DBL("b",                 beep_factor,            0, 0, DBL_MAX,   "set the beep fequency factor"),
yading@10:     OPT_INT("sample_rate",       sample_rate,        44100, 1, INT_MAX,   "set the sample rate"),
yading@10:     OPT_INT("r",                 sample_rate,        44100, 1, INT_MAX,   "set the sample rate"),
yading@10:     OPT_DUR("duration",          duration,               0, 0, INT64_MAX, "set the audio duration"),
yading@10:     OPT_DUR("d",                 duration,               0, 0, INT64_MAX, "set the audio duration"),
yading@10:     OPT_INT("samples_per_frame", samples_per_frame,   1024, 0, INT_MAX,   "set the number of samples per frame"),
yading@10:     {NULL},
yading@10: };
yading@10: 
yading@10: AVFILTER_DEFINE_CLASS(sine);
yading@10: 
yading@10: #define LOG_PERIOD 15
yading@10: #define AMPLITUDE 4095
yading@10: #define AMPLITUDE_SHIFT 3
yading@10: 
yading@10: static void make_sin_table(int16_t *sin)
yading@10: {
yading@10:     unsigned half_pi = 1 << (LOG_PERIOD - 2);
yading@10:     unsigned ampls = AMPLITUDE << AMPLITUDE_SHIFT;
yading@10:     uint64_t unit2 = (uint64_t)(ampls * ampls) << 32;
yading@10:     unsigned step, i, c, s, k, new_k, n2;
yading@10: 
yading@10:     /* Principle: if u = exp(i*a1) and v = exp(i*a2), then
yading@10:        exp(i*(a1+a2)/2) = (u+v) / length(u+v) */
yading@10:     sin[0] = 0;
yading@10:     sin[half_pi] = ampls;
yading@10:     for (step = half_pi; step > 1; step /= 2) {
yading@10:         /* k = (1 << 16) * amplitude / length(u+v)
yading@10:            In exact values, k is constant at a given step */
yading@10:         k = 0x10000;
yading@10:         for (i = 0; i < half_pi / 2; i += step) {
yading@10:             s = sin[i] + sin[i + step];
yading@10:             c = sin[half_pi - i] + sin[half_pi - i - step];
yading@10:             n2 = s * s + c * c;
yading@10:             /* Newton's method to solve n² * k² = unit² */
yading@10:             while (1) {
yading@10:                 new_k = (k + unit2 / ((uint64_t)k * n2) + 1) >> 1;
yading@10:                 if (k == new_k)
yading@10:                     break;
yading@10:                 k = new_k;
yading@10:             }
yading@10:             sin[i + step / 2] = (k * s + 0x7FFF) >> 16;
yading@10:             sin[half_pi - i - step / 2] = (k * c + 0x8000) >> 16;
yading@10:         }
yading@10:     }
yading@10:     /* Unshift amplitude */
yading@10:     for (i = 0; i <= half_pi; i++)
yading@10:         sin[i] = (sin[i] + (1 << (AMPLITUDE_SHIFT - 1))) >> AMPLITUDE_SHIFT;
yading@10:     /* Use symmetries to fill the other three quarters */
yading@10:     for (i = 0; i < half_pi; i++)
yading@10:         sin[half_pi * 2 - i] = sin[i];
yading@10:     for (i = 0; i < 2 * half_pi; i++)
yading@10:         sin[i + 2 * half_pi] = -sin[i];
yading@10: }
yading@10: 
yading@10: static av_cold int init(AVFilterContext *ctx)
yading@10: {
yading@10:     SineContext *sine = ctx->priv;
yading@10: 
yading@10:     if (!(sine->sin = av_malloc(sizeof(*sine->sin) << LOG_PERIOD)))
yading@10:         return AVERROR(ENOMEM);
yading@10:     sine->dphi = ldexp(sine->frequency, 32) / sine->sample_rate + 0.5;
yading@10:     make_sin_table(sine->sin);
yading@10: 
yading@10:     if (sine->beep_factor) {
yading@10:         sine->beep_period = sine->sample_rate;
yading@10:         sine->beep_length = sine->beep_period / 25;
yading@10:         sine->dphi_beep = ldexp(sine->beep_factor * sine->frequency, 32) /
yading@10:                           sine->sample_rate + 0.5;
yading@10:     }
yading@10: 
yading@10:     return 0;
yading@10: }
yading@10: 
yading@10: static av_cold void uninit(AVFilterContext *ctx)
yading@10: {
yading@10:     SineContext *sine = ctx->priv;
yading@10: 
yading@10:     av_freep(&sine->sin);
yading@10: }
yading@10: 
yading@10: static av_cold int query_formats(AVFilterContext *ctx)
yading@10: {
yading@10:     SineContext *sine = ctx->priv;
yading@10:     static const int64_t chlayouts[] = { AV_CH_LAYOUT_MONO, -1 };
yading@10:     int sample_rates[] = { sine->sample_rate, -1 };
yading@10:     static const enum AVSampleFormat sample_fmts[] = { AV_SAMPLE_FMT_S16,
yading@10:                                                        AV_SAMPLE_FMT_NONE };
yading@10: 
yading@10:     ff_set_common_formats (ctx, ff_make_format_list(sample_fmts));
yading@10:     ff_set_common_channel_layouts(ctx, avfilter_make_format64_list(chlayouts));
yading@10:     ff_set_common_samplerates(ctx, ff_make_format_list(sample_rates));
yading@10:     return 0;
yading@10: }
yading@10: 
yading@10: static av_cold int config_props(AVFilterLink *outlink)
yading@10: {
yading@10:     SineContext *sine = outlink->src->priv;
yading@10:     sine->duration = av_rescale(sine->duration, sine->sample_rate, AV_TIME_BASE);
yading@10:     return 0;
yading@10: }
yading@10: 
yading@10: static int request_frame(AVFilterLink *outlink)
yading@10: {
yading@10:     SineContext *sine = outlink->src->priv;
yading@10:     AVFrame *frame;
yading@10:     int i, nb_samples = sine->samples_per_frame;
yading@10:     int16_t *samples;
yading@10: 
yading@10:     if (sine->duration) {
yading@10:         nb_samples = FFMIN(nb_samples, sine->duration - sine->pts);
yading@10:         av_assert1(nb_samples >= 0);
yading@10:         if (!nb_samples)
yading@10:             return AVERROR_EOF;
yading@10:     }
yading@10:     if (!(frame = ff_get_audio_buffer(outlink, nb_samples)))
yading@10:         return AVERROR(ENOMEM);
yading@10:     samples = (int16_t *)frame->data[0];
yading@10: 
yading@10:     for (i = 0; i < nb_samples; i++) {
yading@10:         samples[i] = sine->sin[sine->phi >> (32 - LOG_PERIOD)];
yading@10:         sine->phi += sine->dphi;
yading@10:         if (sine->beep_index < sine->beep_length) {
yading@10:             samples[i] += sine->sin[sine->phi_beep >> (32 - LOG_PERIOD)] << 1;
yading@10:             sine->phi_beep += sine->dphi_beep;
yading@10:         }
yading@10:         if (++sine->beep_index == sine->beep_period)
yading@10:             sine->beep_index = 0;
yading@10:     }
yading@10: 
yading@10:     frame->pts = sine->pts;
yading@10:     sine->pts += nb_samples;
yading@10:     return ff_filter_frame(outlink, frame);
yading@10: }
yading@10: 
yading@10: static const AVFilterPad sine_outputs[] = {
yading@10:     {
yading@10:         .name          = "default",
yading@10:         .type          = AVMEDIA_TYPE_AUDIO,
yading@10:         .request_frame = request_frame,
yading@10:         .config_props  = config_props,
yading@10:     },
yading@10:     { NULL }
yading@10: };
yading@10: 
yading@10: AVFilter avfilter_asrc_sine = {
yading@10:     .name          = "sine",
yading@10:     .description   = NULL_IF_CONFIG_SMALL("Generate sine wave audio signal."),
yading@10:     .query_formats = query_formats,
yading@10:     .init          = init,
yading@10:     .uninit        = uninit,
yading@10:     .priv_size     = sizeof(SineContext),
yading@10:     .inputs        = NULL,
yading@10:     .outputs       = sine_outputs,
yading@10:     .priv_class    = &sine_class,
yading@10: };