libavformat/mp3.c

   1 /*
   2  * MP3 muxer and demuxer
   3  * Copyright (c) 2003 Fabrice Bellard
   4  *
   5  * This file is part of FFmpeg.
   6  *
   7  * FFmpeg is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU Lesser General Public
   9  * License as published by the Free Software Foundation; either
  10  * version 2.1 of the License, or (at your option) any later version.
  11  *
  12  * FFmpeg is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * Lesser General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Lesser General Public
  18  * License along with FFmpeg; if not, write to the Free Software
  19  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
  20  */
  21
  22 #include <strings.h>
  23 #include "libavutil/avstring.h"
  24 #include "libavutil/intreadwrite.h"
  25 #include "avformat.h"
  26 #include "id3v2.h"
  27 #include "id3v1.h"
  28
  29 #if CONFIG_MP3_DEMUXER
  30
  31 #include "libavcodec/mpegaudio.h"
  32 #include "libavcodec/mpegaudiodecheader.h"
  33
  34 /* mp3 read */
  35
  36 static int mp3_read_probe(AVProbeData *p)
  37 {
  38     int max_frames, first_frames = 0;
  39     int fsize, frames, sample_rate;
  40     uint32_t header;
  41     uint8_t *buf, *buf0, *buf2, *end;
  42     AVCodecContext avctx;
  43
  44     buf0 = p->buf;
  45     if(ff_id3v2_match(buf0)) {
  46         buf0 += ff_id3v2_tag_len(buf0);
  47     }
  48
  49     max_frames = 0;
  50     buf = buf0;
  51     end = p->buf + p->buf_size - sizeof(uint32_t);
  52
  53     for(; buf < end; buf= buf2+1) {
  54         buf2 = buf;
  55
  56         for(frames = 0; buf2 < end; frames++) {
  57             header = AV_RB32(buf2);
  58             fsize = ff_mpa_decode_header(&avctx, header, &sample_rate, &sample_rate, &sample_rate, &sample_rate);
  59             if(fsize < 0)
  60                 break;
  61             buf2 += fsize;
  62         }
  63         max_frames = FFMAX(max_frames, frames);
  64         if(buf == buf0)
  65             first_frames= frames;
  66     }
  67     // keep this in sync with ac3 probe, both need to avoid
  68     // issues with MPEG-files!
  69     if   (first_frames>=4) return AVPROBE_SCORE_MAX/2+1;
  70     else if(max_frames>500)return AVPROBE_SCORE_MAX/2;
  71     else if(max_frames>=4) return AVPROBE_SCORE_MAX/4;
  72     else if(buf0!=p->buf)  return AVPROBE_SCORE_MAX/4-1;
  73     else if(max_frames>=1) return 1;
  74     else                   return 0;
  75 //mpegps_mp3_unrecognized_format.mpg has max_frames=3
  76 }
  77
  78 /**
  79  * Try to find Xing/Info/VBRI tags and compute duration from info therein
  80  */
  81 static int mp3_parse_vbr_tags(AVFormatContext *s, AVStream *st, int64_t base)
  82 {
  83     uint32_t v, spf;
  84     int frames = -1; /* Total number of frames in file */
  85     const int64_t xing_offtbl[2][2] = {{32, 17}, {17,9}};
  86     MPADecodeHeader c;
  87     int vbrtag_size = 0;
  88
  89     v = get_be32(s->pb);
  90     if(ff_mpa_check_header(v) < 0)
  91       return -1;
  92
  93     if (ff_mpegaudio_decode_header(&c, v) == 0)
  94         vbrtag_size = c.frame_size;
  95     if(c.layer != 3)
  96         return -1;
  97
  98     /* Check for Xing / Info tag */
  99     url_fseek(s->pb, xing_offtbl[c.lsf == 1][c.nb_channels == 1], SEEK_CUR);
 100     v = get_be32(s->pb);
 101     if(v == MKBETAG('X', 'i', 'n', 'g') || v == MKBETAG('I', 'n', 'f', 'o')) {
 102         v = get_be32(s->pb);
 103         if(v & 0x1)
 104             frames = get_be32(s->pb);
 105     }
 106
 107     /* Check for VBRI tag (always 32 bytes after end of mpegaudio header) */
 108     url_fseek(s->pb, base + 4 + 32, SEEK_SET);
 109     v = get_be32(s->pb);
 110     if(v == MKBETAG('V', 'B', 'R', 'I')) {
 111         /* Check tag version */
 112         if(get_be16(s->pb) == 1) {
 113             /* skip delay, quality and total bytes */
 114             url_fseek(s->pb, 8, SEEK_CUR);
 115             frames = get_be32(s->pb);
 116         }
 117     }
 118
 119     if(frames < 0)
 120         return -1;
 121
 122     /* Skip the vbr tag frame */
 123     url_fseek(s->pb, base + vbrtag_size, SEEK_SET);
 124
 125     spf = c.lsf ? 576 : 1152; /* Samples per frame, layer 3 */
 126     st->duration = av_rescale_q(frames, (AVRational){spf, c.sample_rate},
 127                                 st->time_base);
 128     return 0;
 129 }
 130
 131 static int mp3_read_header(AVFormatContext *s,
 132                            AVFormatParameters *ap)
 133 {
 134     AVStream *st;
 135     int64_t off;
 136
 137     st = av_new_stream(s, 0);
 138     if (!st)
 139         return AVERROR(ENOMEM);
 140
 141     st->codec->codec_type = CODEC_TYPE_AUDIO;
 142     st->codec->codec_id = CODEC_ID_MP3;
 143     st->need_parsing = AVSTREAM_PARSE_FULL;
 144     st->start_time = 0;
 145
 146     // lcm of all mp3 sample rates
 147     av_set_pts_info(st, 64, 1, 14112000);
 148
 149     ff_id3v2_read(s);
 150     if (!av_metadata_get(s->metadata, "", NULL, AV_METADATA_IGNORE_SUFFIX))
 151         ff_id3v1_read(s);
 152
 153     off = url_ftell(s->pb);
 154     if (mp3_parse_vbr_tags(s, st, off) < 0)
 155         url_fseek(s->pb, off, SEEK_SET);
 156
 157     /* the parameters will be extracted from the compressed bitstream */
 158     return 0;
 159 }
 160
 161 #define MP3_PACKET_SIZE 1024
 162
 163 static int mp3_read_packet(AVFormatContext *s, AVPacket *pkt)
 164 {
 165     int ret, size;
 166     //    AVStream *st = s->streams[0];
 167
 168     size= MP3_PACKET_SIZE;
 169
 170     ret= av_get_packet(s->pb, pkt, size);
 171
 172     pkt->stream_index = 0;
 173     if (ret <= 0) {
 174         return AVERROR(EIO);
 175     }
 176     /* note: we need to modify the packet size here to handle the last
 177        packet */
 178     pkt->size = ret;
 179     return ret;
 180 }
 181
 182 AVInputFormat mp3_demuxer = {
 183     "mp3",
 184     NULL_IF_CONFIG_SMALL("MPEG audio layer 2/3"),
 185     0,
 186     mp3_read_probe,
 187     mp3_read_header,
 188     mp3_read_packet,
 189     .flags= AVFMT_GENERIC_INDEX,
 190     .extensions = "mp2,mp3,m2a", /* XXX: use probe */
 191     .metadata_conv = ff_id3v2_metadata_conv,
 192 };
 193 #endif
 194
 195 #if CONFIG_MP2_MUXER || CONFIG_MP3_MUXER
 196 static int id3v1_set_string(AVFormatContext *s, const char *key,
 197                             uint8_t *buf, int buf_size)
 198 {
 199     AVMetadataTag *tag;
 200     if ((tag = av_metadata_get(s->metadata, key, NULL, 0)))
 201         strncpy(buf, tag->value, buf_size);
 202     return !!tag;
 203 }
 204
 205 static int id3v1_create_tag(AVFormatContext *s, uint8_t *buf)
 206 {
 207     AVMetadataTag *tag;
 208     int i, count = 0;
 209
 210     memset(buf, 0, ID3v1_TAG_SIZE); /* fail safe */
 211     buf[0] = 'T';
 212     buf[1] = 'A';
 213     buf[2] = 'G';
 214     count += id3v1_set_string(s, "title",   buf +  3, 30);
 215     count += id3v1_set_string(s, "author",  buf + 33, 30);
 216     count += id3v1_set_string(s, "album",   buf + 63, 30);
 217     count += id3v1_set_string(s, "year",    buf + 93,  4);
 218     count += id3v1_set_string(s, "comment", buf + 97, 30);
 219     if ((tag = av_metadata_get(s->metadata, "track", NULL, 0))) {
 220         buf[125] = 0;
 221         buf[126] = atoi(tag->value);
 222         count++;
 223     }
 224     buf[127] = 0xFF; /* default to unknown genre */
 225     if ((tag = av_metadata_get(s->metadata, "genre", NULL, 0))) {
 226         for(i = 0; i <= ID3v1_GENRE_MAX; i++) {
 227             if (!strcasecmp(tag->value, ff_id3v1_genre_str[i])) {
 228                 buf[127] = i;
 229                 count++;
 230                 break;
 231             }
 232         }
 233     }
 234     return count;
 235 }
 236
 237 /* simple formats */
 238
 239 static void id3v2_put_size(AVFormatContext *s, int size)
 240 {
 241     put_byte(s->pb, size >> 21 & 0x7f);
 242     put_byte(s->pb, size >> 14 & 0x7f);
 243     put_byte(s->pb, size >> 7  & 0x7f);
 244     put_byte(s->pb, size       & 0x7f);
 245 }
 246
 247 static void id3v2_put_ttag(AVFormatContext *s, const char *buf, int len,
 248                            uint32_t tag)
 249 {
 250     put_be32(s->pb, tag);
 251     id3v2_put_size(s, len + 1);
 252     put_be16(s->pb, 0);
 253     put_byte(s->pb, 3); /* UTF-8 */
 254     put_buffer(s->pb, buf, len);
 255 }
 256
 257
 258 static int mp3_write_packet(struct AVFormatContext *s, AVPacket *pkt)
 259 {
 260     put_buffer(s->pb, pkt->data, pkt->size);
 261     put_flush_packet(s->pb);
 262     return 0;
 263 }
 264
 265 static int mp3_write_trailer(struct AVFormatContext *s)
 266 {
 267     uint8_t buf[ID3v1_TAG_SIZE];
 268
 269     /* write the id3v1 tag */
 270     if (id3v1_create_tag(s, buf) > 0) {
 271         put_buffer(s->pb, buf, ID3v1_TAG_SIZE);
 272         put_flush_packet(s->pb);
 273     }
 274     return 0;
 275 }
 276 #endif /* CONFIG_MP2_MUXER || CONFIG_MP3_MUXER */
 277
 278 #if CONFIG_MP2_MUXER
 279 AVOutputFormat mp2_muxer = {
 280     "mp2",
 281     NULL_IF_CONFIG_SMALL("MPEG audio layer 2"),
 282     "audio/x-mpeg",
 283     "mp2,m2a",
 284     0,
 285     CODEC_ID_MP2,
 286     CODEC_ID_NONE,
 287     NULL,
 288     mp3_write_packet,
 289     mp3_write_trailer,
 290 };
 291 #endif
 292
 293 #if CONFIG_MP3_MUXER
 294 /**
 295  * Write an ID3v2.4 header at beginning of stream
 296  */
 297
 298 static int mp3_write_header(struct AVFormatContext *s)
 299 {
 300     AVMetadataTag *t = NULL;
 301     int totlen = 0;
 302     int64_t size_pos, cur_pos;
 303
 304     put_be32(s->pb, MKBETAG('I', 'D', '3', 0x04)); /* ID3v2.4 */
 305     put_byte(s->pb, 0);
 306     put_byte(s->pb, 0); /* flags */
 307
 308     /* reserve space for size */
 309     size_pos = url_ftell(s->pb);
 310     put_be32(s->pb, 0);
 311
 312     while ((t = av_metadata_get(s->metadata, "", t, AV_METADATA_IGNORE_SUFFIX))) {
 313         uint32_t tag = 0;
 314
 315         if (t->key[0] == 'T' && strcmp(t->key, "TSSE")) {
 316             int i;
 317             for (i = 0; *ff_id3v2_tags[i]; i++)
 318                 if (AV_RB32(t->key) == AV_RB32(ff_id3v2_tags[i])) {
 319                     int len = strlen(t->value);
 320                     tag = AV_RB32(t->key);
 321                     totlen += len + ID3v2_HEADER_SIZE + 2;
 322                     id3v2_put_ttag(s, t->value, len + 1, tag);
 323                     break;
 324                 }
 325         }
 326
 327         if (!tag) { /* unknown tag, write as TXXX frame */
 328             int   len = strlen(t->key), len1 = strlen(t->value);
 329             char *buf = av_malloc(len + len1 + 2);
 330             if (!buf)
 331                 return AVERROR(ENOMEM);
 332             tag = MKBETAG('T', 'X', 'X', 'X');
 333             strcpy(buf,           t->key);
 334             strcpy(buf + len + 1, t->value);
 335             id3v2_put_ttag(s, buf, len + len1 + 2, tag);
 336             totlen += len + len1 + ID3v2_HEADER_SIZE + 3;
 337             av_free(buf);
 338         }
 339     }
 340     if(!(s->streams[0]->codec->flags & CODEC_FLAG_BITEXACT)) {
 341         totlen += strlen(LIBAVFORMAT_IDENT) + ID3v2_HEADER_SIZE + 2;
 342         id3v2_put_ttag(s, LIBAVFORMAT_IDENT, strlen(LIBAVFORMAT_IDENT) + 1,
 343                        MKBETAG('T', 'S', 'S', 'E'));
 344     }
 345
 346     cur_pos = url_ftell(s->pb);
 347     url_fseek(s->pb, size_pos, SEEK_SET);
 348     id3v2_put_size(s, totlen);
 349     url_fseek(s->pb, cur_pos, SEEK_SET);
 350
 351     return 0;
 352 }
 353
 354 AVOutputFormat mp3_muxer = {
 355     "mp3",
 356     NULL_IF_CONFIG_SMALL("MPEG audio layer 3"),
 357     "audio/x-mpeg",
 358     "mp3",
 359     0,
 360     CODEC_ID_MP3,
 361     CODEC_ID_NONE,
 362     mp3_write_header,
 363     mp3_write_packet,
 364     mp3_write_trailer,
 365     .metadata_conv = ff_id3v2_metadata_conv,
 366 };
 367 #endif