yading@11: /*
yading@11:  * Raw FLAC demuxer
yading@11:  * Copyright (c) 2001 Fabrice Bellard
yading@11:  *
yading@11:  * This file is part of FFmpeg.
yading@11:  *
yading@11:  * FFmpeg is free software; you can redistribute it and/or
yading@11:  * modify it under the terms of the GNU Lesser General Public
yading@11:  * License as published by the Free Software Foundation; either
yading@11:  * version 2.1 of the License, or (at your option) any later version.
yading@11:  *
yading@11:  * FFmpeg is distributed in the hope that it will be useful,
yading@11:  * but WITHOUT ANY WARRANTY; without even the implied warranty of
yading@11:  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
yading@11:  * Lesser General Public License for more details.
yading@11:  *
yading@11:  * You should have received a copy of the GNU Lesser General Public
yading@11:  * License along with FFmpeg; if not, write to the Free Software
yading@11:  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
yading@11:  */
yading@11: 
yading@11: #include "libavcodec/flac.h"
yading@11: #include "avformat.h"
yading@11: #include "id3v2.h"
yading@11: #include "internal.h"
yading@11: #include "rawdec.h"
yading@11: #include "oggdec.h"
yading@11: #include "vorbiscomment.h"
yading@11: #include "libavcodec/bytestream.h"
yading@11: 
yading@11: #define RETURN_ERROR(code) do { ret = (code); goto fail; } while (0)
yading@11: 
yading@11: static int parse_picture(AVFormatContext *s, uint8_t *buf, int buf_size)
yading@11: {
yading@11:     const CodecMime *mime = ff_id3v2_mime_tags;
yading@11:     enum  AVCodecID      id = AV_CODEC_ID_NONE;
yading@11:     AVBufferRef *data = NULL;
yading@11:     uint8_t mimetype[64], *desc = NULL;
yading@11:     AVIOContext *pb = NULL;
yading@11:     AVStream *st;
yading@11:     int type, width, height;
yading@11:     int len, ret = 0;
yading@11: 
yading@11:     pb = avio_alloc_context(buf, buf_size, 0, NULL, NULL, NULL, NULL);
yading@11:     if (!pb)
yading@11:         return AVERROR(ENOMEM);
yading@11: 
yading@11:     /* read the picture type */
yading@11:     type      = avio_rb32(pb);
yading@11:     if (type >= FF_ARRAY_ELEMS(ff_id3v2_picture_types) || type < 0) {
yading@11:         av_log(s, AV_LOG_ERROR, "Invalid picture type: %d.\n", type);
yading@11:         if (s->error_recognition & AV_EF_EXPLODE) {
yading@11:             RETURN_ERROR(AVERROR_INVALIDDATA);
yading@11:         }
yading@11:         type = 0;
yading@11:     }
yading@11: 
yading@11:     /* picture mimetype */
yading@11:     len  = avio_rb32(pb);
yading@11:     if (len <= 0 ||
yading@11:         avio_read(pb, mimetype, FFMIN(len, sizeof(mimetype) - 1)) != len) {
yading@11:         av_log(s, AV_LOG_ERROR, "Could not read mimetype from an attached "
yading@11:                "picture.\n");
yading@11:         if (s->error_recognition & AV_EF_EXPLODE)
yading@11:             ret = AVERROR_INVALIDDATA;
yading@11:         goto fail;
yading@11:     }
yading@11:     mimetype[len] = 0;
yading@11: 
yading@11:     while (mime->id != AV_CODEC_ID_NONE) {
yading@11:         if (!strncmp(mime->str, mimetype, sizeof(mimetype))) {
yading@11:             id = mime->id;
yading@11:             break;
yading@11:         }
yading@11:         mime++;
yading@11:     }
yading@11:     if (id == AV_CODEC_ID_NONE) {
yading@11:         av_log(s, AV_LOG_ERROR, "Unknown attached picture mimetype: %s.\n",
yading@11:                mimetype);
yading@11:         if (s->error_recognition & AV_EF_EXPLODE)
yading@11:             ret = AVERROR_INVALIDDATA;
yading@11:         goto fail;
yading@11:     }
yading@11: 
yading@11:     /* picture description */
yading@11:     len = avio_rb32(pb);
yading@11:     if (len > 0) {
yading@11:         if (!(desc = av_malloc(len + 1))) {
yading@11:             RETURN_ERROR(AVERROR(ENOMEM));
yading@11:         }
yading@11: 
yading@11:         if (avio_read(pb, desc, len) != len) {
yading@11:             av_log(s, AV_LOG_ERROR, "Error reading attached picture description.\n");
yading@11:             if (s->error_recognition & AV_EF_EXPLODE)
yading@11:                 ret = AVERROR(EIO);
yading@11:             goto fail;
yading@11:         }
yading@11:         desc[len] = 0;
yading@11:     }
yading@11: 
yading@11:     /* picture metadata */
yading@11:     width  = avio_rb32(pb);
yading@11:     height = avio_rb32(pb);
yading@11:     avio_skip(pb, 8);
yading@11: 
yading@11:     /* picture data */
yading@11:     len = avio_rb32(pb);
yading@11:     if (len <= 0) {
yading@11:         av_log(s, AV_LOG_ERROR, "Invalid attached picture size: %d.\n", len);
yading@11:         if (s->error_recognition & AV_EF_EXPLODE)
yading@11:             ret = AVERROR_INVALIDDATA;
yading@11:         goto fail;
yading@11:     }
yading@11:     if (!(data = av_buffer_alloc(len))) {
yading@11:         RETURN_ERROR(AVERROR(ENOMEM));
yading@11:     }
yading@11:     if (avio_read(pb, data->data, len) != len) {
yading@11:         av_log(s, AV_LOG_ERROR, "Error reading attached picture data.\n");
yading@11:         if (s->error_recognition & AV_EF_EXPLODE)
yading@11:             ret = AVERROR(EIO);
yading@11:         goto fail;
yading@11:     }
yading@11: 
yading@11:     st = avformat_new_stream(s, NULL);
yading@11:     if (!st) {
yading@11:         RETURN_ERROR(AVERROR(ENOMEM));
yading@11:     }
yading@11: 
yading@11:     av_init_packet(&st->attached_pic);
yading@11:     st->attached_pic.buf          = data;
yading@11:     st->attached_pic.data         = data->data;
yading@11:     st->attached_pic.size         = len;
yading@11:     st->attached_pic.stream_index = st->index;
yading@11:     st->attached_pic.flags       |= AV_PKT_FLAG_KEY;
yading@11: 
yading@11:     st->disposition      |= AV_DISPOSITION_ATTACHED_PIC;
yading@11:     st->codec->codec_type = AVMEDIA_TYPE_VIDEO;
yading@11:     st->codec->codec_id   = id;
yading@11:     st->codec->width      = width;
yading@11:     st->codec->height     = height;
yading@11:     av_dict_set(&st->metadata, "comment", ff_id3v2_picture_types[type], 0);
yading@11:     if (desc)
yading@11:         av_dict_set(&st->metadata, "title",   desc, AV_DICT_DONT_STRDUP_VAL);
yading@11: 
yading@11:     av_freep(&pb);
yading@11: 
yading@11:     return 0;
yading@11: 
yading@11: fail:
yading@11:     av_buffer_unref(&data);
yading@11:     av_freep(&desc);
yading@11:     av_freep(&pb);
yading@11:     return ret;
yading@11: 
yading@11: }
yading@11: 
yading@11: static int flac_read_header(AVFormatContext *s)
yading@11: {
yading@11:     int ret, metadata_last=0, metadata_type, metadata_size, found_streaminfo=0;
yading@11:     uint8_t header[4];
yading@11:     uint8_t *buffer=NULL;
yading@11:     AVStream *st = avformat_new_stream(s, NULL);
yading@11:     if (!st)
yading@11:         return AVERROR(ENOMEM);
yading@11:     st->codec->codec_type = AVMEDIA_TYPE_AUDIO;
yading@11:     st->codec->codec_id = AV_CODEC_ID_FLAC;
yading@11:     st->need_parsing = AVSTREAM_PARSE_FULL_RAW;
yading@11:     /* the parameters will be extracted from the compressed bitstream */
yading@11: 
yading@11:     /* if fLaC marker is not found, assume there is no header */
yading@11:     if (avio_rl32(s->pb) != MKTAG('f','L','a','C')) {
yading@11:         avio_seek(s->pb, -4, SEEK_CUR);
yading@11:         return 0;
yading@11:     }
yading@11: 
yading@11:     /* process metadata blocks */
yading@11:     while (!url_feof(s->pb) && !metadata_last) {
yading@11:         avio_read(s->pb, header, 4);
yading@11:         avpriv_flac_parse_block_header(header, &metadata_last, &metadata_type,
yading@11:                                    &metadata_size);
yading@11:         switch (metadata_type) {
yading@11:         /* allocate and read metadata block for supported types */
yading@11:         case FLAC_METADATA_TYPE_STREAMINFO:
yading@11:         case FLAC_METADATA_TYPE_CUESHEET:
yading@11:         case FLAC_METADATA_TYPE_PICTURE:
yading@11:         case FLAC_METADATA_TYPE_VORBIS_COMMENT:
yading@11:             buffer = av_mallocz(metadata_size + FF_INPUT_BUFFER_PADDING_SIZE);
yading@11:             if (!buffer) {
yading@11:                 return AVERROR(ENOMEM);
yading@11:             }
yading@11:             if (avio_read(s->pb, buffer, metadata_size) != metadata_size) {
yading@11:                 RETURN_ERROR(AVERROR(EIO));
yading@11:             }
yading@11:             break;
yading@11:         /* skip metadata block for unsupported types */
yading@11:         default:
yading@11:             ret = avio_skip(s->pb, metadata_size);
yading@11:             if (ret < 0)
yading@11:                 return ret;
yading@11:         }
yading@11: 
yading@11:         if (metadata_type == FLAC_METADATA_TYPE_STREAMINFO) {
yading@11:             FLACStreaminfo si;
yading@11:             /* STREAMINFO can only occur once */
yading@11:             if (found_streaminfo) {
yading@11:                 RETURN_ERROR(AVERROR_INVALIDDATA);
yading@11:             }
yading@11:             if (metadata_size != FLAC_STREAMINFO_SIZE) {
yading@11:                 RETURN_ERROR(AVERROR_INVALIDDATA);
yading@11:             }
yading@11:             found_streaminfo = 1;
yading@11:             st->codec->extradata      = buffer;
yading@11:             st->codec->extradata_size = metadata_size;
yading@11:             buffer = NULL;
yading@11: 
yading@11:             /* get codec params from STREAMINFO header */
yading@11:             avpriv_flac_parse_streaminfo(st->codec, &si, st->codec->extradata);
yading@11: 
yading@11:             /* set time base and duration */
yading@11:             if (si.samplerate > 0) {
yading@11:                 avpriv_set_pts_info(st, 64, 1, si.samplerate);
yading@11:                 if (si.samples > 0)
yading@11:                     st->duration = si.samples;
yading@11:             }
yading@11:         } else if (metadata_type == FLAC_METADATA_TYPE_CUESHEET) {
yading@11:             uint8_t isrc[13];
yading@11:             uint64_t start;
yading@11:             const uint8_t *offset;
yading@11:             int i, chapters, track, ti;
yading@11:             if (metadata_size < 431)
yading@11:                 RETURN_ERROR(AVERROR_INVALIDDATA);
yading@11:             offset = buffer + 395;
yading@11:             chapters = bytestream_get_byte(&offset) - 1;
yading@11:             if (chapters <= 0)
yading@11:                 RETURN_ERROR(AVERROR_INVALIDDATA);
yading@11:             for (i = 0; i < chapters; i++) {
yading@11:                 if (offset + 36 - buffer > metadata_size)
yading@11:                     RETURN_ERROR(AVERROR_INVALIDDATA);
yading@11:                 start = bytestream_get_be64(&offset);
yading@11:                 track = bytestream_get_byte(&offset);
yading@11:                 bytestream_get_buffer(&offset, isrc, 12);
yading@11:                 isrc[12] = 0;
yading@11:                 offset += 14;
yading@11:                 ti = bytestream_get_byte(&offset);
yading@11:                 if (ti <= 0) RETURN_ERROR(AVERROR_INVALIDDATA);
yading@11:                 offset += ti * 12;
yading@11:                 avpriv_new_chapter(s, track, st->time_base, start, AV_NOPTS_VALUE, isrc);
yading@11:             }
yading@11:             av_freep(&buffer);
yading@11:         } else if (metadata_type == FLAC_METADATA_TYPE_PICTURE) {
yading@11:             ret = parse_picture(s, buffer, metadata_size);
yading@11:             av_freep(&buffer);
yading@11:             if (ret < 0) {
yading@11:                 av_log(s, AV_LOG_ERROR, "Error parsing attached picture.\n");
yading@11:                 return ret;
yading@11:             }
yading@11:         } else {
yading@11:             /* STREAMINFO must be the first block */
yading@11:             if (!found_streaminfo) {
yading@11:                 RETURN_ERROR(AVERROR_INVALIDDATA);
yading@11:             }
yading@11:             /* process supported blocks other than STREAMINFO */
yading@11:             if (metadata_type == FLAC_METADATA_TYPE_VORBIS_COMMENT) {
yading@11:                 if (ff_vorbis_comment(s, &s->metadata, buffer, metadata_size)) {
yading@11:                     av_log(s, AV_LOG_WARNING, "error parsing VorbisComment metadata\n");
yading@11:                 }
yading@11:             }
yading@11:             av_freep(&buffer);
yading@11:         }
yading@11:     }
yading@11: 
yading@11:     return 0;
yading@11: 
yading@11: fail:
yading@11:     av_free(buffer);
yading@11:     return ret;
yading@11: }
yading@11: 
yading@11: static int flac_probe(AVProbeData *p)
yading@11: {
yading@11:     if (p->buf_size < 4 || memcmp(p->buf, "fLaC", 4))
yading@11:         return 0;
yading@11:     return AVPROBE_SCORE_MAX/2;
yading@11: }
yading@11: 
yading@11: AVInputFormat ff_flac_demuxer = {
yading@11:     .name           = "flac",
yading@11:     .long_name      = NULL_IF_CONFIG_SMALL("raw FLAC"),
yading@11:     .read_probe     = flac_probe,
yading@11:     .read_header    = flac_read_header,
yading@11:     .read_packet    = ff_raw_read_partial_packet,
yading@11:     .flags          = AVFMT_GENERIC_INDEX,
yading@11:     .extensions     = "flac",
yading@11:     .raw_codec_id   = AV_CODEC_ID_FLAC,
yading@11: };