Merge branch 'master' into feature/pytest
[aubio.git] / src / io / source_avcodec.c
1 /*
2   Copyright (C) 2013 Paul Brossier <piem@aubio.org>
3
4   This file is part of aubio.
5
6   aubio is free software: you can redistribute it and/or modify
7   it under the terms of the GNU General Public License as published by
8   the Free Software Foundation, either version 3 of the License, or
9   (at your option) any later version.
10
11   aubio 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
14   GNU General Public License for more details.
15
16   You should have received a copy of the GNU General Public License
17   along with aubio.  If not, see <http://www.gnu.org/licenses/>.
18
19 */
20
21 #include "aubio_priv.h"
22
23 #ifdef HAVE_LIBAV
24
25 #include <libavcodec/avcodec.h>
26 #include <libavformat/avformat.h>
27 #if defined(HAVE_SWRESAMPLE)
28 #include <libswresample/swresample.h>
29 #elif defined(HAVE_AVRESAMPLE)
30 #include <libavresample/avresample.h>
31 #endif
32 #include <libavutil/opt.h>
33 #include <stdlib.h>
34
35 // determine whether we use libavformat from ffmpeg or from libav
36 #define FFMPEG_LIBAVFORMAT (LIBAVFORMAT_VERSION_MICRO > 99 )
37 // max_analyze_duration2 was used from ffmpeg libavformat 55.43.100 -> 57.2.100
38 #define FFMPEG_LIBAVFORMAT_MAX_DUR2 FFMPEG_LIBAVFORMAT && ( \
39       (LIBAVFORMAT_VERSION_MAJOR == 55 && LIBAVFORMAT_VERSION_MINOR >= 43) \
40       || (LIBAVFORMAT_VERSION_MAJOR == 56) \
41       || (LIBAVFORMAT_VERSION_MAJOR == 57 && LIBAVFORMAT_VERSION_MINOR < 2) \
42       )
43
44 // backward compatibility with libavcodec55
45 #if LIBAVCODEC_VERSION_INT < AV_VERSION_INT(57,0,0)
46 #define HAVE_AUBIO_LIBAVCODEC_DEPRECATED 1
47 #endif
48
49 #if LIBAVCODEC_VERSION_INT < AV_VERSION_INT(55,28,1)
50 #warning "libavcodec < 56 is deprecated"
51 #define av_frame_alloc  avcodec_alloc_frame
52 #define av_frame_free avcodec_free_frame
53 #define av_packet_unref av_free_packet
54 #endif
55
56 #include "aubio_priv.h"
57 #include "fvec.h"
58 #include "fmat.h"
59 #include "source_avcodec.h"
60
61 #if LIBAVCODEC_VERSION_INT < AV_VERSION_INT(56, 56, 0)
62 #define AUBIO_AVCODEC_MAX_BUFFER_SIZE FF_MIN_BUFFER_SIZE
63 #else
64 #define AUBIO_AVCODEC_MAX_BUFFER_SIZE AV_INPUT_BUFFER_MIN_SIZE
65 #endif
66
67 struct _aubio_source_avcodec_t {
68   uint_t hop_size;
69   uint_t samplerate;
70   uint_t channels;
71
72   // some data about the file
73   char_t *path;
74   uint_t input_samplerate;
75   uint_t input_channels;
76
77   // avcodec stuff
78   AVFormatContext *avFormatCtx;
79   AVCodecContext *avCodecCtx;
80   AVFrame *avFrame;
81   AVPacket avPacket;
82 #ifdef HAVE_AVRESAMPLE
83   AVAudioResampleContext *avr;
84 #elif defined(HAVE_SWRESAMPLE)
85   SwrContext *avr;
86 #endif
87   smpl_t *output;
88   uint_t read_samples;
89   uint_t read_index;
90   sint_t selected_stream;
91   uint_t eof;
92 };
93
94 // create or re-create the context when _do or _do_multi is called
95 void aubio_source_avcodec_reset_resampler(aubio_source_avcodec_t * s);
96 // actually read a frame
97 void aubio_source_avcodec_readframe(aubio_source_avcodec_t *s,
98     uint_t * read_samples);
99
100 uint_t aubio_source_avcodec_has_network_url(aubio_source_avcodec_t *s);
101
102 uint_t aubio_source_avcodec_has_network_url(aubio_source_avcodec_t *s) {
103   char proto[20], authorization[256], hostname[128], uripath[256];
104   int proto_size = 20, authorization_size = 256, hostname_size = 128,
105       *port_ptr = 0, path_size = 256;
106   av_url_split(proto, proto_size, authorization, authorization_size, hostname,
107       hostname_size, port_ptr, uripath, path_size, s->path);
108   if (strlen(proto)) {
109     return 1;
110   }
111   return 0;
112 }
113
114
115 aubio_source_avcodec_t * new_aubio_source_avcodec(const char_t * path,
116     uint_t samplerate, uint_t hop_size) {
117   aubio_source_avcodec_t * s = AUBIO_NEW(aubio_source_avcodec_t);
118   AVFormatContext *avFormatCtx = s->avFormatCtx;
119   AVCodecContext *avCodecCtx = s->avCodecCtx;
120   AVFrame *avFrame = s->avFrame;
121   sint_t selected_stream = -1;
122 #if FF_API_LAVF_AVCTX
123   AVCodecParameters *codecpar;
124 #endif
125   AVCodec *codec;
126   uint_t i;
127   int err;
128   if (path == NULL) {
129     AUBIO_ERR("source_avcodec: Aborted opening null path\n");
130     goto beach;
131   }
132   if ((sint_t)samplerate < 0) {
133     AUBIO_ERR("source_avcodec: Can not open %s with samplerate %d\n",
134         path, samplerate);
135     goto beach;
136   }
137   if ((sint_t)hop_size <= 0) {
138     AUBIO_ERR("source_avcodec: Can not open %s with hop_size %d\n",
139         path, hop_size);
140     goto beach;
141   }
142
143   s->hop_size = hop_size;
144   s->channels = 1;
145
146   if (s->path) AUBIO_FREE(s->path);
147   s->path = AUBIO_ARRAY(char_t, strnlen(path, PATH_MAX) + 1);
148   strncpy(s->path, path, strnlen(path, PATH_MAX) + 1);
149
150 #if LIBAVFORMAT_VERSION_INT < AV_VERSION_INT(58,0,0)
151   // register all formats and codecs
152   av_register_all();
153 #endif
154
155   if (aubio_source_avcodec_has_network_url(s)) {
156     avformat_network_init();
157   }
158
159   // try opening the file and get some info about it
160   avFormatCtx = NULL;
161   if ( (err = avformat_open_input(&avFormatCtx, s->path, NULL, NULL) ) < 0 ) {
162     char errorstr[256];
163     av_strerror (err, errorstr, sizeof(errorstr));
164     AUBIO_ERR("source_avcodec: Failed opening %s (%s)\n", s->path, errorstr);
165     goto beach;
166   }
167
168   // try to make sure max_analyze_duration is big enough for most songs
169 #if FFMPEG_LIBAVFORMAT_MAX_DUR2
170   avFormatCtx->max_analyze_duration2 *= 100;
171 #else
172   avFormatCtx->max_analyze_duration *= 100;
173 #endif
174
175   // retrieve stream information
176   if ( (err = avformat_find_stream_info(avFormatCtx, NULL)) < 0 ) {
177     char errorstr[256];
178     av_strerror (err, errorstr, sizeof(errorstr));
179     AUBIO_ERR("source_avcodec: Could not find stream information "
180         "for %s (%s)\n", s->path, errorstr);
181     goto beach;
182   }
183
184   // dump information about file onto standard error
185   //av_dump_format(avFormatCtx, 0, s->path, 0);
186
187   // look for the first audio stream
188   for (i = 0; i < avFormatCtx->nb_streams; i++) {
189 #if FF_API_LAVF_AVCTX
190     if (avFormatCtx->streams[i]->codecpar->codec_type == AVMEDIA_TYPE_AUDIO) {
191 #else
192     if (avFormatCtx->streams[i]->codec->codec_type == AVMEDIA_TYPE_AUDIO) {
193 #endif
194       if (selected_stream == -1) {
195         selected_stream = i;
196       } else {
197         AUBIO_WRN("source_avcodec: More than one audio stream in %s, "
198             "taking the first one\n", s->path);
199       }
200     }
201   }
202   if (selected_stream == -1) {
203     AUBIO_ERR("source_avcodec: No audio stream in %s\n", s->path);
204     goto beach;
205   }
206   //AUBIO_DBG("Taking stream %d in file %s\n", selected_stream, s->path);
207   s->selected_stream = selected_stream;
208
209 #if FF_API_LAVF_AVCTX
210   codecpar = avFormatCtx->streams[selected_stream]->codecpar;
211   if (codecpar == NULL) {
212     AUBIO_ERR("source_avcodec: Could not find decoder for %s", s->path);
213     goto beach;
214   }
215   codec = avcodec_find_decoder(codecpar->codec_id);
216
217   /* Allocate a codec context for the decoder */
218   avCodecCtx = avcodec_alloc_context3(codec);
219   if (!avCodecCtx) {
220     AUBIO_ERR("source_avcodec: Failed to allocate the %s codec context "
221         "for path %s\n", av_get_media_type_string(AVMEDIA_TYPE_AUDIO),
222         s->path);
223     goto beach;
224   }
225 #else
226   avCodecCtx = avFormatCtx->streams[selected_stream]->codec;
227   codec = avcodec_find_decoder(avCodecCtx->codec_id);
228 #endif
229   if (codec == NULL) {
230     AUBIO_ERR("source_avcodec: Could not find decoder for %s", s->path);
231     goto beach;
232   }
233
234 #if FF_API_LAVF_AVCTX
235   /* Copy codec parameters from input stream to output codec context */
236   if ((err = avcodec_parameters_to_context(avCodecCtx, codecpar)) < 0) {
237     AUBIO_ERR("source_avcodec: Failed to copy %s codec parameters to "
238         "decoder context for %s\n",
239         av_get_media_type_string(AVMEDIA_TYPE_AUDIO), s->path);
240     goto beach;
241   }
242 #endif
243
244   if ( ( err = avcodec_open2(avCodecCtx, codec, NULL) ) < 0) {
245     char errorstr[256];
246     av_strerror (err, errorstr, sizeof(errorstr));
247     AUBIO_ERR("source_avcodec: Could not load codec for %s (%s)\n", s->path,
248         errorstr);
249     goto beach;
250   }
251
252   /* get input specs */
253   s->input_samplerate = avCodecCtx->sample_rate;
254   s->input_channels   = avCodecCtx->channels;
255   //AUBIO_DBG("input_samplerate: %d\n", s->input_samplerate);
256   //AUBIO_DBG("input_channels: %d\n", s->input_channels);
257
258   if (samplerate == 0) {
259     s->samplerate = s->input_samplerate;
260   } else {
261     s->samplerate = samplerate;
262   }
263
264   if (s->samplerate >  s->input_samplerate) {
265     AUBIO_WRN("source_avcodec: upsampling %s from %d to %d\n", s->path,
266         s->input_samplerate, s->samplerate);
267   }
268
269   avFrame = av_frame_alloc();
270   if (!avFrame) {
271     AUBIO_ERR("source_avcodec: Could not allocate frame for (%s)\n", s->path);
272   }
273
274   /* allocate output for avr */
275   s->output = (smpl_t *)av_malloc(AUBIO_AVCODEC_MAX_BUFFER_SIZE
276       * sizeof(smpl_t));
277
278   s->read_samples = 0;
279   s->read_index = 0;
280
281   s->avFormatCtx = avFormatCtx;
282   s->avCodecCtx = avCodecCtx;
283   s->avFrame = avFrame;
284
285   aubio_source_avcodec_reset_resampler(s);
286
287   if (s->avr == NULL) goto beach;
288
289   s->eof = 0;
290
291   //av_log_set_level(AV_LOG_QUIET);
292
293   return s;
294
295 beach:
296   //AUBIO_ERR("can not read %s at samplerate %dHz with a hop_size of %d\n",
297   //    s->path, s->samplerate, s->hop_size);
298   del_aubio_source_avcodec(s);
299   return NULL;
300 }
301
302 void aubio_source_avcodec_reset_resampler(aubio_source_avcodec_t * s)
303 {
304   // create or reset resampler to/from mono/multi-channel
305   if ( s->avr == NULL ) {
306     int err;
307     int64_t input_layout = av_get_default_channel_layout(s->input_channels);
308     int64_t output_layout = av_get_default_channel_layout(s->input_channels);
309 #ifdef HAVE_AVRESAMPLE
310     AVAudioResampleContext *avr = avresample_alloc_context();
311 #elif defined(HAVE_SWRESAMPLE)
312     SwrContext *avr = swr_alloc();
313 #endif /* HAVE_AVRESAMPLE || HAVE_SWRESAMPLE */
314
315     av_opt_set_int(avr, "in_channel_layout",  input_layout,              0);
316     av_opt_set_int(avr, "out_channel_layout", output_layout,             0);
317     av_opt_set_int(avr, "in_sample_rate",     s->input_samplerate,       0);
318     av_opt_set_int(avr, "out_sample_rate",    s->samplerate,             0);
319     av_opt_set_int(avr, "in_sample_fmt",      s->avCodecCtx->sample_fmt, 0);
320 #if HAVE_AUBIO_DOUBLE
321     av_opt_set_int(avr, "out_sample_fmt",     AV_SAMPLE_FMT_DBL,         0);
322 #else
323     av_opt_set_int(avr, "out_sample_fmt",     AV_SAMPLE_FMT_FLT,         0);
324 #endif
325     // TODO: use planar?
326     //av_opt_set_int(avr, "out_sample_fmt",     AV_SAMPLE_FMT_FLTP,      0);
327 #ifdef HAVE_AVRESAMPLE
328     if ( ( err = avresample_open(avr) ) < 0)
329 #elif defined(HAVE_SWRESAMPLE)
330     if ( ( err = swr_init(avr) ) < 0)
331 #endif /* HAVE_AVRESAMPLE || HAVE_SWRESAMPLE */
332     {
333       char errorstr[256];
334       av_strerror (err, errorstr, sizeof(errorstr));
335       AUBIO_ERR("source_avcodec: Could not open resampling context"
336          " for %s (%s)\n", s->path, errorstr);
337       return;
338     }
339     s->avr = avr;
340   }
341 }
342
343 void aubio_source_avcodec_readframe(aubio_source_avcodec_t *s,
344     uint_t * read_samples)
345 {
346   AVFormatContext *avFormatCtx = s->avFormatCtx;
347   AVCodecContext *avCodecCtx = s->avCodecCtx;
348   AVFrame *avFrame = s->avFrame;
349   AVPacket avPacket = s->avPacket;
350 #ifdef HAVE_AVRESAMPLE
351   AVAudioResampleContext *avr = s->avr;
352 #elif defined(HAVE_SWRESAMPLE)
353   SwrContext *avr = s->avr;
354 #endif /* HAVE_AVRESAMPLE || HAVE_SWRESAMPLE */
355   int got_frame = 0;
356 #ifdef HAVE_AVRESAMPLE
357   int in_linesize = 0;
358   int in_samples = avFrame->nb_samples;
359   int out_linesize = 0;
360   int max_out_samples = AUBIO_AVCODEC_MAX_BUFFER_SIZE;
361   int out_samples = 0;
362 #elif defined(HAVE_SWRESAMPLE)
363   int in_samples = avFrame->nb_samples;
364   int max_out_samples = AUBIO_AVCODEC_MAX_BUFFER_SIZE / avCodecCtx->channels;
365   int out_samples = 0;
366 #endif /* HAVE_AVRESAMPLE || HAVE_SWRESAMPLE */
367   smpl_t *output = s->output;
368 #ifndef FF_API_LAVF_AVCTX
369   int len = 0;
370 #else
371   int ret = 0;
372 #endif
373   av_init_packet (&avPacket);
374   *read_samples = 0;
375
376   do
377   {
378     int err = av_read_frame (avFormatCtx, &avPacket);
379     if (err == AVERROR_EOF) {
380       s->eof = 1;
381       goto beach;
382     }
383     if (err != 0) {
384       char errorstr[256];
385       av_strerror (err, errorstr, sizeof(errorstr));
386       AUBIO_ERR("source_avcodec: could not read frame in %s (%s)\n",
387           s->path, errorstr);
388       s->eof = 1;
389       goto beach;
390     }
391   } while (avPacket.stream_index != s->selected_stream);
392
393 #if FF_API_LAVF_AVCTX
394   ret = avcodec_send_packet(avCodecCtx, &avPacket);
395   if (ret < 0 && ret != AVERROR_EOF) {
396     AUBIO_ERR("source_avcodec: error when sending packet for %s\n", s->path);
397     goto beach;
398   }
399   ret = avcodec_receive_frame(avCodecCtx, avFrame);
400   if (ret >= 0) {
401     got_frame = 1;
402   }
403   if (ret < 0) {
404     if (ret == AVERROR(EAGAIN)) {
405       //AUBIO_WRN("source_avcodec: output is not available right now - "
406       //    "user must try to send new input\n");
407       goto beach;
408     } else if (ret == AVERROR_EOF) {
409       AUBIO_WRN("source_avcodec: the decoder has been fully flushed, "
410           "and there will be no more output frames\n");
411     } else {
412       AUBIO_ERR("source_avcodec: decoding errors on %s\n", s->path);
413       goto beach;
414     }
415   }
416 #else
417   len = avcodec_decode_audio4(avCodecCtx, avFrame, &got_frame, &avPacket);
418
419   if (len < 0) {
420     AUBIO_ERR("source_avcodec: error while decoding %s\n", s->path);
421     goto beach;
422   }
423 #endif
424   if (got_frame == 0) {
425     AUBIO_WRN("source_avcodec: did not get a frame when reading %s\n",
426         s->path);
427     goto beach;
428   }
429
430 #if LIBAVUTIL_VERSION_MAJOR > 52
431   if (avFrame->channels != (sint_t)s->input_channels) {
432     AUBIO_WRN ("source_avcodec: trying to read from %d channel(s),"
433         "but configured for %d; is '%s' corrupt?\n",
434         avFrame->channels, s->input_channels, s->path);
435     goto beach;
436   }
437 #else
438 #warning "avutil < 53 is deprecated, crashes might occur on corrupt files"
439 #endif
440
441 #ifdef HAVE_AVRESAMPLE
442   in_linesize = 0;
443   av_samples_get_buffer_size(&in_linesize, avCodecCtx->channels,
444       avFrame->nb_samples, avCodecCtx->sample_fmt, 1);
445   in_samples = avFrame->nb_samples;
446   out_linesize = 0;
447   max_out_samples = AUBIO_AVCODEC_MAX_BUFFER_SIZE;
448   out_samples = avresample_convert ( avr,
449         (uint8_t **)&output, out_linesize, max_out_samples,
450         (uint8_t **)avFrame->data, in_linesize, in_samples);
451 #elif defined(HAVE_SWRESAMPLE)
452   in_samples = avFrame->nb_samples;
453   max_out_samples = AUBIO_AVCODEC_MAX_BUFFER_SIZE / avCodecCtx->channels;
454   out_samples = swr_convert( avr,
455       (uint8_t **)&output, max_out_samples,
456       (const uint8_t **)avFrame->data, in_samples);
457 #endif /* HAVE_AVRESAMPLE || HAVE_SWRESAMPLE */
458   if (out_samples <= 0) {
459     AUBIO_WRN("source_avcodec: no sample found while converting frame (%s)\n",
460         s->path);
461     goto beach;
462   }
463
464   *read_samples = out_samples;
465
466 beach:
467   s->avFormatCtx = avFormatCtx;
468   s->avCodecCtx = avCodecCtx;
469   s->avFrame = avFrame;
470 #if defined(HAVE_AVRESAMPLE) || defined(HAVE_SWRESAMPLE)
471   s->avr = avr;
472 #endif /* HAVE_AVRESAMPLE || HAVE_SWRESAMPLE */
473   s->output = output;
474
475   av_packet_unref(&avPacket);
476 }
477
478 void aubio_source_avcodec_do(aubio_source_avcodec_t * s, fvec_t * read_data,
479     uint_t * read) {
480   uint_t i, j;
481   uint_t end = 0;
482   uint_t total_wrote = 0;
483   while (total_wrote < s->hop_size) {
484     end = MIN(s->read_samples - s->read_index, s->hop_size - total_wrote);
485     for (i = 0; i < end; i++) {
486       read_data->data[i + total_wrote] = 0.;
487       for (j = 0; j < s->input_channels; j++) {
488         read_data->data[i + total_wrote] +=
489           s->output[(i + s->read_index) * s->input_channels + j];
490       }
491       read_data->data[i + total_wrote] *= 1./s->input_channels;
492     }
493     total_wrote += end;
494     if (total_wrote < s->hop_size) {
495       uint_t avcodec_read = 0;
496       aubio_source_avcodec_readframe(s, &avcodec_read);
497       s->read_samples = avcodec_read;
498       s->read_index = 0;
499       if (s->eof) {
500         break;
501       }
502     } else {
503       s->read_index += end;
504     }
505   }
506   if (total_wrote < s->hop_size) {
507     for (i = total_wrote; i < s->hop_size; i++) {
508       read_data->data[i] = 0.;
509     }
510   }
511   *read = total_wrote;
512 }
513
514 void aubio_source_avcodec_do_multi(aubio_source_avcodec_t * s,
515     fmat_t * read_data, uint_t * read) {
516   uint_t i,j;
517   uint_t end = 0;
518   uint_t total_wrote = 0;
519   while (total_wrote < s->hop_size) {
520     end = MIN(s->read_samples - s->read_index, s->hop_size - total_wrote);
521     for (j = 0; j < read_data->height; j++) {
522       for (i = 0; i < end; i++) {
523         read_data->data[j][i + total_wrote] =
524           s->output[(i + s->read_index) * s->input_channels + j];
525       }
526     }
527     total_wrote += end;
528     if (total_wrote < s->hop_size) {
529       uint_t avcodec_read = 0;
530       aubio_source_avcodec_readframe(s, &avcodec_read);
531       s->read_samples = avcodec_read;
532       s->read_index = 0;
533       if (s->eof) {
534         break;
535       }
536     } else {
537       s->read_index += end;
538     }
539   }
540   if (total_wrote < s->hop_size) {
541     for (j = 0; j < read_data->height; j++) {
542       for (i = total_wrote; i < s->hop_size; i++) {
543         read_data->data[j][i] = 0.;
544       }
545     }
546   }
547   *read = total_wrote;
548 }
549
550 uint_t aubio_source_avcodec_get_samplerate(const aubio_source_avcodec_t * s) {
551   return s->samplerate;
552 }
553
554 uint_t aubio_source_avcodec_get_channels(const aubio_source_avcodec_t * s) {
555   return s->input_channels;
556 }
557
558 uint_t aubio_source_avcodec_seek (aubio_source_avcodec_t * s, uint_t pos) {
559   int64_t resampled_pos =
560     (uint_t)ROUND(pos * (s->input_samplerate * 1. / s->samplerate));
561   int64_t min_ts = MAX(resampled_pos - 2000, 0);
562   int64_t max_ts = MIN(resampled_pos + 2000, INT64_MAX);
563   int seek_flags = AVSEEK_FLAG_FRAME | AVSEEK_FLAG_ANY;
564   int ret = AUBIO_FAIL;
565   if (s->avFormatCtx != NULL && s->avr != NULL) {
566     ret = AUBIO_OK;
567   } else {
568     AUBIO_ERR("source_avcodec: failed seeking in %s (file not opened?)",
569         s->path);
570     return ret;
571   }
572   if ((sint_t)pos < 0) {
573     AUBIO_ERR("source_avcodec: could not seek %s at %d (seeking position"
574        " should be >= 0)\n", s->path, pos);
575     return AUBIO_FAIL;
576   }
577   ret = avformat_seek_file(s->avFormatCtx, s->selected_stream,
578       min_ts, resampled_pos, max_ts, seek_flags);
579   if (ret < 0) {
580     AUBIO_ERR("source_avcodec: failed seeking to %d in file %s",
581         pos, s->path);
582   }
583   // reset read status
584   s->eof = 0;
585   s->read_index = 0;
586   s->read_samples = 0;
587 #ifdef HAVE_AVRESAMPLE
588   // reset the AVAudioResampleContext
589   avresample_close(s->avr);
590   avresample_open(s->avr);
591 #elif defined(HAVE_SWRESAMPLE)
592   swr_close(s->avr);
593   swr_init(s->avr);
594 #endif
595   return ret;
596 }
597
598 uint_t aubio_source_avcodec_get_duration (aubio_source_avcodec_t * s) {
599   if (s && &(s->avFormatCtx) != NULL) {
600     int64_t duration = s->avFormatCtx->duration;
601     return s->samplerate * ((uint_t)duration / 1e6 );
602   }
603   return 0;
604 }
605
606 uint_t aubio_source_avcodec_close(aubio_source_avcodec_t * s) {
607   if (s->avr != NULL) {
608 #ifdef HAVE_AVRESAMPLE
609     avresample_close( s->avr );
610 #elif defined(HAVE_SWRESAMPLE)
611     swr_close ( s->avr );
612 #endif
613     av_free ( s->avr );
614   }
615   s->avr = NULL;
616   if (s->avCodecCtx != NULL) {
617 #ifndef HAVE_AUBIO_LIBAVCODEC_DEPRECATED
618     avcodec_free_context( &s->avCodecCtx );
619 #else
620     avcodec_close ( s->avCodecCtx );
621 #endif
622   }
623   s->avCodecCtx = NULL;
624   if (s->avFormatCtx != NULL) {
625     avformat_close_input(&s->avFormatCtx);
626     s->avFormatCtx = NULL;
627   }
628   av_packet_unref(&s->avPacket);
629   return AUBIO_OK;
630 }
631
632 void del_aubio_source_avcodec(aubio_source_avcodec_t * s){
633   if (!s) return;
634   aubio_source_avcodec_close(s);
635   if (s->output != NULL) {
636     av_free(s->output);
637   }
638   s->output = NULL;
639   if (s->avFrame != NULL) {
640     av_frame_free( &(s->avFrame) );
641   }
642   s->avFrame = NULL;
643   if (s->path) {
644     AUBIO_FREE(s->path);
645   }
646   s->path = NULL;
647   AUBIO_FREE(s);
648 }
649
650 #endif /* HAVE_LIBAV */