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