Merge remote-tracking branch 'qatar/master'
[ffmpeg.git] / libavfilter / asrc_aevalsrc.c
1 /*
2  * Copyright (c) 2011 Stefano Sabatini
3  *
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 /**
22  * @file
23  * eval audio source
24  */
25
26 #include "libavutil/audioconvert.h"
27 #include "libavutil/avassert.h"
28 #include "libavutil/avstring.h"
29 #include "libavutil/eval.h"
30 #include "libavutil/opt.h"
31 #include "libavutil/parseutils.h"
32 #include "avfilter.h"
33 #include "audio.h"
34 #include "internal.h"
35
36 static const char * const var_names[] = {
37     "n",            ///< number of frame
38     "t",            ///< timestamp expressed in seconds
39     "s",            ///< sample rate
40     NULL
41 };
42
43 enum var_name {
44     VAR_N,
45     VAR_T,
46     VAR_S,
47     VAR_VARS_NB
48 };
49
50 typedef struct {
51     const AVClass *class;
52     char *sample_rate_str;
53     int sample_rate;
54     int64_t chlayout;
55     int nb_channels;
56     int64_t pts;
57     AVExpr *expr[8];
58     char *expr_str[8];
59     int nb_samples;             ///< number of samples per requested frame
60     char *duration_str;         ///< total duration of the generated audio
61     double duration;
62     uint64_t n;
63     double var_values[VAR_VARS_NB];
64 } EvalContext;
65
66 #define OFFSET(x) offsetof(EvalContext, x)
67
68 static const AVOption eval_options[]= {
69     { "nb_samples",  "set the number of samples per requested frame", OFFSET(nb_samples),      AV_OPT_TYPE_INT,    {.dbl = 1024},    0,        INT_MAX },
70     { "n",           "set the number of samples per requested frame", OFFSET(nb_samples),      AV_OPT_TYPE_INT,    {.dbl = 1024},    0,        INT_MAX },
71     { "sample_rate", "set the sample rate",                           OFFSET(sample_rate_str), AV_OPT_TYPE_STRING, {.str = "44100"}, CHAR_MIN, CHAR_MAX },
72     { "s",           "set the sample rate",                           OFFSET(sample_rate_str), AV_OPT_TYPE_STRING, {.str = "44100"}, CHAR_MIN, CHAR_MAX },
73     { "duration",    "set audio duration", OFFSET(duration_str), AV_OPT_TYPE_STRING, {.str = NULL}, 0, 0 },
74     { "d",           "set audio duration", OFFSET(duration_str), AV_OPT_TYPE_STRING, {.str = NULL}, 0, 0 },
75 {NULL},
76 };
77
78 static const char *eval_get_name(void *ctx)
79 {
80     return "aevalsrc";
81 }
82
83 static const AVClass eval_class = {
84     "AEvalSrcContext",
85     eval_get_name,
86     eval_options
87 };
88
89 static int init(AVFilterContext *ctx, const char *args, void *opaque)
90 {
91     EvalContext *eval = ctx->priv;
92     char *args1 = av_strdup(args);
93     char *expr, *buf, *bufptr;
94     int ret, i;
95
96     eval->class = &eval_class;
97     av_opt_set_defaults(eval);
98
99     /* parse expressions */
100     buf = args1;
101     i = 0;
102     while (expr = av_strtok(buf, ":", &bufptr)) {
103         if (i >= 8) {
104             av_log(ctx, AV_LOG_ERROR,
105                    "More than 8 expressions provided, unsupported.\n");
106             ret = AVERROR(EINVAL);
107             return ret;
108         }
109         ret = av_expr_parse(&eval->expr[i], expr, var_names,
110                             NULL, NULL, NULL, NULL, 0, ctx);
111         if (ret < 0)
112             goto end;
113         i++;
114         if (bufptr && *bufptr == ':') { /* found last expression */
115             bufptr++;
116             break;
117         }
118         buf = NULL;
119     }
120
121     /* guess channel layout from nb expressions/channels */
122     eval->nb_channels = i;
123     eval->chlayout = av_get_default_channel_layout(eval->nb_channels);
124     if (!eval->chlayout) {
125         av_log(ctx, AV_LOG_ERROR, "Invalid number of channels '%d' provided\n",
126                eval->nb_channels);
127         ret = AVERROR(EINVAL);
128         goto end;
129     }
130
131     if (bufptr && (ret = av_set_options_string(eval, bufptr, "=", ":")) < 0)
132         goto end;
133
134     if ((ret = ff_parse_sample_rate(&eval->sample_rate, eval->sample_rate_str, ctx)))
135         goto end;
136
137     eval->duration = -1;
138     if (eval->duration_str) {
139         int64_t us = -1;
140         if ((ret = av_parse_time(&us, eval->duration_str, 1)) < 0) {
141             av_log(ctx, AV_LOG_ERROR, "Invalid duration: '%s'\n", eval->duration_str);
142             goto end;
143         }
144         eval->duration = (double)us / 1000000;
145     }
146     eval->n = 0;
147
148 end:
149     av_free(args1);
150     return ret;
151 }
152
153 static void uninit(AVFilterContext *ctx)
154 {
155     EvalContext *eval = ctx->priv;
156     int i;
157
158     for (i = 0; i < 8; i++) {
159         av_expr_free(eval->expr[i]);
160         eval->expr[i] = NULL;
161     }
162     av_freep(&eval->duration_str);
163     av_freep(&eval->sample_rate_str);
164 }
165
166 static int config_props(AVFilterLink *outlink)
167 {
168     EvalContext *eval = outlink->src->priv;
169     char buf[128];
170
171     outlink->time_base = (AVRational){1, eval->sample_rate};
172     outlink->sample_rate = eval->sample_rate;
173
174     eval->var_values[VAR_S] = eval->sample_rate;
175
176     av_get_channel_layout_string(buf, sizeof(buf), 0, eval->chlayout);
177
178     av_log(outlink->src, AV_LOG_INFO,
179            "sample_rate:%d chlayout:%s duration:%f\n",
180            eval->sample_rate, buf, eval->duration);
181
182     return 0;
183 }
184
185 static int query_formats(AVFilterContext *ctx)
186 {
187     EvalContext *eval = ctx->priv;
188     enum AVSampleFormat sample_fmts[] = { AV_SAMPLE_FMT_DBL, AV_SAMPLE_FMT_NONE };
189     int64_t chlayouts[] = { eval->chlayout, -1 };
190     int packing_fmts[] = { AVFILTER_PLANAR, -1 };
191
192     avfilter_set_common_sample_formats (ctx, avfilter_make_format_list(sample_fmts));
193     avfilter_set_common_channel_layouts(ctx, avfilter_make_format64_list(chlayouts));
194     avfilter_set_common_packing_formats(ctx, avfilter_make_format_list(packing_fmts));
195
196     return 0;
197 }
198
199 static int request_frame(AVFilterLink *outlink)
200 {
201     EvalContext *eval = outlink->src->priv;
202     AVFilterBufferRef *samplesref;
203     int i, j;
204     double t = eval->var_values[VAR_N] * (double)1/eval->sample_rate;
205
206     if (eval->duration >= 0 && t > eval->duration)
207         return AVERROR_EOF;
208
209     samplesref = ff_get_audio_buffer(outlink, AV_PERM_WRITE, eval->nb_samples);
210
211     /* evaluate expression for each single sample and for each channel */
212     for (i = 0; i < eval->nb_samples; i++, eval->n++) {
213         eval->var_values[VAR_N] = eval->n;
214         eval->var_values[VAR_T] = eval->var_values[VAR_N] * (double)1/eval->sample_rate;
215
216         for (j = 0; j < eval->nb_channels; j++) {
217             *((double *) samplesref->data[j] + i) =
218                 av_expr_eval(eval->expr[j], eval->var_values, NULL);
219         }
220     }
221
222     samplesref->pts = eval->pts;
223     samplesref->pos = -1;
224     samplesref->audio->sample_rate = eval->sample_rate;
225     eval->pts += eval->nb_samples;
226
227     ff_filter_samples(outlink, samplesref);
228
229     return 0;
230 }
231
232 AVFilter avfilter_asrc_aevalsrc = {
233     .name        = "aevalsrc",
234     .description = NULL_IF_CONFIG_SMALL("Generate an audio signal generated by an expression."),
235
236     .query_formats = query_formats,
237     .init        = init,
238     .uninit      = uninit,
239     .priv_size   = sizeof(EvalContext),
240
241     .inputs      = (const AVFilterPad[]) {{ .name = NULL}},
242
243     .outputs     = (const AVFilterPad[]) {{ .name = "default",
244                                       .type = AVMEDIA_TYPE_AUDIO,
245                                       .config_props = config_props,
246                                       .request_frame = request_frame, },
247                                     { .name = NULL}},
248 };