platform/common/mp3_libavcodec.c

   1 /*
   2  * Some mp3 related code for Sega/Mega CD.
   3  * Uses Libav/FFmpeg libavcodec
   4  * (C) notaz, 2013
   5  *
   6  * This work is licensed under the terms of MAME license.
   7  * See COPYING file in the top-level directory.
   8  */
   9
  10 #include <stdio.h>
  11 #include <string.h>
  12 #include <libavcodec/avcodec.h>
  13 #include <dlfcn.h>
  14
  15 #include <pico/pico_int.h>
  16 #include "../libpicofe/lprintf.h"
  17 #include "mp3.h"
  18
  19 #if LIBAVCODEC_VERSION_MAJOR < 55
  20 #define AVCodecID CodecID
  21 #define AV_CODEC_ID_MP3 CODEC_ID_MP3
  22 #endif
  23
  24 static AVCodecContext *ctx;
  25
  26 /* avoid compile time linking to libavcodec due to huge list of it's deps..
  27  * we also use this old API as newer one is not available on pandora */
  28 void (*p_av_init_packet)(AVPacket *pkt);
  29 int (*p_avcodec_decode_audio3)(AVCodecContext *avctx, int16_t *samples,
  30         int *frame_size_ptr, AVPacket *avpkt);
  31
  32 int mp3dec_decode(FILE *f, int *file_pos, int file_len)
  33 {
  34         unsigned char input_buf[2 * 1024];
  35         int frame_size;
  36         AVPacket avpkt;
  37         int bytes_in;
  38         int bytes_out;
  39         int offset;
  40         int len;
  41
  42         p_av_init_packet(&avpkt);
  43
  44         do
  45         {
  46                 if (*file_pos >= file_len)
  47                         return 1; // EOF, nothing to do
  48
  49                 fseek(f, *file_pos, SEEK_SET);
  50                 bytes_in = fread(input_buf, 1, sizeof(input_buf), f);
  51
  52                 offset = mp3_find_sync_word(input_buf, bytes_in);
  53                 if (offset < 0) {
  54                         lprintf("find_sync_word (%i/%i) err %i\n",
  55                                 *file_pos, file_len, offset);
  56                         *file_pos = file_len;
  57                         return 1; // EOF
  58                 }
  59
  60                 // to avoid being flooded with "incorrect frame size" errors,
  61                 // we must calculate and pass exact frame size - lame
  62                 frame_size = mpeg1_l3_bitrates[input_buf[offset + 2] >> 4];
  63                 frame_size = frame_size * 144000 / 44100;
  64                 frame_size += (input_buf[offset + 2] >> 1) & 1;
  65
  66                 if (offset > 0 && bytes_in - offset < frame_size) {
  67                         // underflow
  68                         *file_pos += offset;
  69                         continue;
  70                 }
  71
  72                 avpkt.data = input_buf + offset;
  73                 avpkt.size = frame_size;
  74                 bytes_out = sizeof(cdda_out_buffer);
  75 #if LIBAVCODEC_VERSION_MAJOR < 53
  76                 // stupidity in v52: enforces this size even when
  77                 // it doesn't need/use that much at all
  78                 bytes_out = AVCODEC_MAX_AUDIO_FRAME_SIZE;
  79 #endif
  80
  81                 len = p_avcodec_decode_audio3(ctx, cdda_out_buffer,
  82                         &bytes_out, &avpkt);
  83                 if (len <= 0) {
  84                         lprintf("mp3 decode err (%i/%i) %i\n",
  85                                 *file_pos, file_len, len);
  86
  87                         // attempt to skip the offending frame..
  88                         *file_pos += offset + 1;
  89                         continue;
  90                 }
  91
  92                 *file_pos += offset + len;
  93         }
  94         while (0);
  95
  96         return 0;
  97 }
  98
  99 int mp3dec_start(FILE *f, int fpos_start)
 100 {
 101         void (*avcodec_register_all)(void);
 102         AVCodec *(*avcodec_find_decoder)(enum AVCodecID id);
 103         AVCodecContext *(*avcodec_alloc_context)(void);
 104         int (*avcodec_open)(AVCodecContext *avctx, AVCodec *codec);
 105         void (*av_free)(void *ptr);
 106         AVCodec *codec;
 107         void *soh;
 108         int ret;
 109
 110         if (ctx != NULL)
 111                 return 0;
 112
 113         // either v52 or v53 should be ok
 114         soh = dlopen("libavcodec.so.52", RTLD_NOW);
 115         if (soh == NULL)
 116                 soh = dlopen("libavcodec.so.53", RTLD_NOW);
 117         if (soh == NULL) {
 118                 lprintf("mp3dec: load libavcodec.so: %s\n", dlerror());
 119                 return -1;
 120         }
 121
 122         avcodec_register_all = dlsym(soh, "avcodec_register_all");
 123         avcodec_find_decoder = dlsym(soh, "avcodec_find_decoder");
 124         avcodec_alloc_context = dlsym(soh, "avcodec_alloc_context");
 125         avcodec_open = dlsym(soh, "avcodec_open");
 126         av_free = dlsym(soh, "av_free");
 127         p_av_init_packet = dlsym(soh, "av_init_packet");
 128         p_avcodec_decode_audio3 = dlsym(soh, "avcodec_decode_audio3");
 129
 130         if (avcodec_register_all == NULL || avcodec_find_decoder == NULL
 131             || avcodec_alloc_context == NULL || avcodec_open == NULL
 132             || av_free == NULL
 133             || p_av_init_packet == NULL || p_avcodec_decode_audio3 == NULL)
 134         {
 135                 lprintf("mp3dec: missing symbol(s) in libavcodec.so\n");
 136                 dlclose(soh);
 137                 return -1;
 138         }
 139
 140         // init decoder
 141
 142         //avcodec_init();
 143         avcodec_register_all();
 144
 145         codec = avcodec_find_decoder(AV_CODEC_ID_MP3);
 146         if (codec == NULL) {
 147                 lprintf("mp3dec: codec missing\n");
 148                 return -1;
 149         }
 150
 151         ctx = avcodec_alloc_context();
 152         if (ctx == NULL) {
 153                 lprintf("mp3dec: avcodec_alloc_context failed\n");
 154                 return -1;
 155         }
 156
 157         ret = avcodec_open(ctx, codec);
 158         if (ret < 0) {
 159                 lprintf("mp3dec: avcodec_open failed: %d\n", ret);
 160                 av_free(ctx);
 161                 ctx = NULL;
 162                 return -1;
 163         }
 164
 165         return 0;
 166 }