| /* | |
| * WavPack demuxer | |
| * Copyright (c) 2006,2011 Konstantin Shishkov | |
| * | |
| * This file is part of FFmpeg. | |
| * | |
| * FFmpeg is free software; you can redistribute it and/or | |
| * modify it under the terms of the GNU Lesser General Public | |
| * License as published by the Free Software Foundation; either | |
| * version 2.1 of the License, or (at your option) any later version. | |
| * | |
| * FFmpeg is distributed in the hope that it will be useful, | |
| * but WITHOUT ANY WARRANTY; without even the implied warranty of | |
| * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | |
| * Lesser General Public License for more details. | |
| * | |
| * You should have received a copy of the GNU Lesser General Public | |
| * License along with FFmpeg; if not, write to the Free Software | |
| * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA | |
| */ | |
| #include "libavutil/channel_layout.h" | |
| #include "libavutil/intreadwrite.h" | |
| #include "libavutil/dict.h" | |
| #include "avformat.h" | |
| #include "demux.h" | |
| #include "internal.h" | |
| #include "apetag.h" | |
| #include "id3v1.h" | |
| #include "wv.h" | |
| enum WV_FLAGS { | |
| WV_MONO = 0x0004, | |
| WV_HYBRID = 0x0008, | |
| WV_JOINT = 0x0010, | |
| WV_CROSSD = 0x0020, | |
| WV_HSHAPE = 0x0040, | |
| WV_FLOAT = 0x0080, | |
| WV_INT32 = 0x0100, | |
| WV_HBR = 0x0200, | |
| WV_HBAL = 0x0400, | |
| WV_MCINIT = 0x0800, | |
| WV_MCEND = 0x1000, | |
| WV_DSD = 0x80000000, | |
| }; | |
| static const int wv_rates[16] = { | |
| 6000, 8000, 9600, 11025, 12000, 16000, 22050, 24000, | |
| 32000, 44100, 48000, 64000, 88200, 96000, 192000, -1 | |
| }; | |
| typedef struct WVContext { | |
| uint8_t block_header[WV_HEADER_SIZE]; | |
| WvHeader header; | |
| int rate, chan, bpp; | |
| uint32_t chmask; | |
| int multichannel; | |
| int block_parsed; | |
| int64_t pos; | |
| int64_t apetag_start; | |
| } WVContext; | |
| static int wv_probe(const AVProbeData *p) | |
| { | |
| /* check file header */ | |
| if (p->buf_size <= 32) | |
| return 0; | |
| if (AV_RL32(&p->buf[0]) == MKTAG('w', 'v', 'p', 'k') && | |
| AV_RL32(&p->buf[4]) >= 24 && | |
| AV_RL32(&p->buf[4]) <= WV_BLOCK_LIMIT && | |
| AV_RL16(&p->buf[8]) >= 0x402 && | |
| AV_RL16(&p->buf[8]) <= 0x410) | |
| return AVPROBE_SCORE_MAX; | |
| else | |
| return 0; | |
| } | |
| static int wv_read_block_header(AVFormatContext *ctx, AVIOContext *pb) | |
| { | |
| WVContext *wc = ctx->priv_data; | |
| int ret; | |
| int rate, bpp, chan; | |
| uint32_t chmask, flags; | |
| unsigned rate_x; | |
| wc->pos = avio_tell(pb); | |
| /* don't return bogus packets with the ape tag data */ | |
| if (wc->apetag_start && wc->pos >= wc->apetag_start) | |
| return AVERROR_EOF; | |
| ret = avio_read(pb, wc->block_header, WV_HEADER_SIZE); | |
| if (ret != WV_HEADER_SIZE) | |
| return (ret < 0) ? ret : AVERROR_EOF; | |
| ret = ff_wv_parse_header(&wc->header, wc->block_header); | |
| if (ret < 0) { | |
| av_log(ctx, AV_LOG_ERROR, "Invalid block header.\n"); | |
| return ret; | |
| } | |
| if (wc->header.version < 0x402 || wc->header.version > 0x410) { | |
| avpriv_report_missing_feature(ctx, "WV version 0x%03X", | |
| wc->header.version); | |
| return AVERROR_PATCHWELCOME; | |
| } | |
| /* Blocks with zero samples don't contain actual audio information | |
| * and should be ignored */ | |
| if (!wc->header.samples) | |
| return 0; | |
| // parse flags | |
| flags = wc->header.flags; | |
| rate_x = (flags & WV_DSD) ? 4 : 1; | |
| bpp = (flags & WV_DSD) ? 0 : ((flags & 3) + 1) << 3; | |
| chan = 1 + !(flags & WV_MONO); | |
| chmask = flags & WV_MONO ? AV_CH_LAYOUT_MONO : AV_CH_LAYOUT_STEREO; | |
| rate = wv_rates[(flags >> 23) & 0xF]; | |
| wc->multichannel = !(wc->header.initial && wc->header.final); | |
| if (wc->multichannel) { | |
| chan = wc->chan; | |
| chmask = wc->chmask; | |
| } | |
| if ((rate == -1 || !chan || flags & WV_DSD) && !wc->block_parsed) { | |
| int64_t block_end = avio_tell(pb) + wc->header.blocksize; | |
| if (!(pb->seekable & AVIO_SEEKABLE_NORMAL)) { | |
| av_log(ctx, AV_LOG_ERROR, | |
| "Cannot determine additional parameters\n"); | |
| return AVERROR_INVALIDDATA; | |
| } | |
| while (avio_tell(pb) < block_end && !avio_feof(pb)) { | |
| int id, size; | |
| id = avio_r8(pb); | |
| size = (id & 0x80) ? avio_rl24(pb) : avio_r8(pb); | |
| size <<= 1; | |
| if (id & 0x40) | |
| size--; | |
| switch (id & 0x3F) { | |
| case 0xD: | |
| if (size <= 1) { | |
| av_log(ctx, AV_LOG_ERROR, | |
| "Insufficient channel information\n"); | |
| return AVERROR_INVALIDDATA; | |
| } | |
| chan = avio_r8(pb); | |
| switch (size - 2) { | |
| case 0: | |
| chmask = avio_r8(pb); | |
| break; | |
| case 1: | |
| chmask = avio_rl16(pb); | |
| break; | |
| case 2: | |
| chmask = avio_rl24(pb); | |
| break; | |
| case 3: | |
| chmask = avio_rl32(pb); | |
| break; | |
| case 4: | |
| avio_skip(pb, 1); | |
| chan |= (avio_r8(pb) & 0xF) << 8; | |
| chan += 1; | |
| chmask = avio_rl24(pb); | |
| break; | |
| case 5: | |
| avio_skip(pb, 1); | |
| chan |= (avio_r8(pb) & 0xF) << 8; | |
| chan += 1; | |
| chmask = avio_rl32(pb); | |
| break; | |
| default: | |
| av_log(ctx, AV_LOG_ERROR, | |
| "Invalid channel info size %d\n", size); | |
| return AVERROR_INVALIDDATA; | |
| } | |
| break; | |
| case 0xE: | |
| if (size <= 1) { | |
| av_log(ctx, AV_LOG_ERROR, | |
| "Invalid DSD block\n"); | |
| return AVERROR_INVALIDDATA; | |
| } | |
| rate_x = 1U << (avio_r8(pb) & 0x1f); | |
| if (size) | |
| avio_skip(pb, size-1); | |
| break; | |
| case 0x27: | |
| rate = avio_rl24(pb); | |
| break; | |
| default: | |
| avio_skip(pb, size); | |
| } | |
| if (id & 0x40) | |
| avio_skip(pb, 1); | |
| } | |
| if (rate == -1 || rate * (uint64_t)rate_x >= INT_MAX) { | |
| av_log(ctx, AV_LOG_ERROR, | |
| "Cannot determine custom sampling rate\n"); | |
| return AVERROR_INVALIDDATA; | |
| } | |
| avio_seek(pb, block_end - wc->header.blocksize, SEEK_SET); | |
| } | |
| if (!wc->bpp) | |
| wc->bpp = bpp; | |
| if (!wc->chan) | |
| wc->chan = chan; | |
| if (!wc->chmask) | |
| wc->chmask = chmask; | |
| if (!wc->rate) | |
| wc->rate = rate * rate_x; | |
| if (flags && bpp != wc->bpp) { | |
| av_log(ctx, AV_LOG_ERROR, | |
| "Bits per sample differ, this block: %i, header block: %i\n", | |
| bpp, wc->bpp); | |
| return AVERROR_INVALIDDATA; | |
| } | |
| if (flags && !wc->multichannel && chan != wc->chan) { | |
| av_log(ctx, AV_LOG_ERROR, | |
| "Channels differ, this block: %i, header block: %i\n", | |
| chan, wc->chan); | |
| return AVERROR_INVALIDDATA; | |
| } | |
| if (flags && rate != -1 && !(flags & WV_DSD) && rate * rate_x != wc->rate) { | |
| av_log(ctx, AV_LOG_ERROR, | |
| "Sampling rate differ, this block: %i, header block: %i\n", | |
| rate * rate_x, wc->rate); | |
| return AVERROR_INVALIDDATA; | |
| } | |
| return 0; | |
| } | |
| static int wv_read_header(AVFormatContext *s) | |
| { | |
| AVIOContext *pb = s->pb; | |
| WVContext *wc = s->priv_data; | |
| AVStream *st; | |
| int ret; | |
| wc->block_parsed = 0; | |
| for (;;) { | |
| if ((ret = wv_read_block_header(s, pb)) < 0) | |
| return ret; | |
| if (!wc->header.samples) | |
| avio_skip(pb, wc->header.blocksize); | |
| else | |
| break; | |
| } | |
| /* now we are ready: build format streams */ | |
| st = avformat_new_stream(s, NULL); | |
| if (!st) | |
| return AVERROR(ENOMEM); | |
| if ((ret = ff_alloc_extradata(st->codecpar, 2)) < 0) | |
| return ret; | |
| AV_WL16(st->codecpar->extradata, wc->header.version); | |
| st->codecpar->codec_type = AVMEDIA_TYPE_AUDIO; | |
| st->codecpar->codec_id = AV_CODEC_ID_WAVPACK; | |
| av_channel_layout_from_mask(&st->codecpar->ch_layout, wc->chmask); | |
| st->codecpar->sample_rate = wc->rate; | |
| st->codecpar->bits_per_coded_sample = wc->bpp; | |
| avpriv_set_pts_info(st, 64, 1, wc->rate); | |
| st->start_time = 0; | |
| if (wc->header.total_samples != 0xFFFFFFFFu) | |
| st->duration = wc->header.total_samples; | |
| if (s->pb->seekable & AVIO_SEEKABLE_NORMAL) { | |
| int64_t cur = avio_tell(s->pb); | |
| wc->apetag_start = ff_ape_parse_tag(s); | |
| if (!av_dict_get(s->metadata, "", NULL, AV_DICT_IGNORE_SUFFIX)) | |
| ff_id3v1_read(s); | |
| avio_seek(s->pb, cur, SEEK_SET); | |
| } | |
| return 0; | |
| } | |
| static int wv_read_packet(AVFormatContext *s, AVPacket *pkt) | |
| { | |
| WVContext *wc = s->priv_data; | |
| int ret; | |
| int off; | |
| int64_t pos; | |
| uint32_t block_samples; | |
| if (avio_feof(s->pb)) | |
| return AVERROR_EOF; | |
| if (wc->block_parsed) { | |
| if ((ret = wv_read_block_header(s, s->pb)) < 0) | |
| return ret; | |
| } | |
| pos = wc->pos; | |
| if ((ret = av_new_packet(pkt, wc->header.blocksize + WV_HEADER_SIZE)) < 0) | |
| return ret; | |
| memcpy(pkt->data, wc->block_header, WV_HEADER_SIZE); | |
| ret = avio_read(s->pb, pkt->data + WV_HEADER_SIZE, wc->header.blocksize); | |
| if (ret != wc->header.blocksize) { | |
| return AVERROR(EIO); | |
| } | |
| while (!(wc->header.flags & WV_FLAG_FINAL_BLOCK)) { | |
| if ((ret = wv_read_block_header(s, s->pb)) < 0) { | |
| return ret; | |
| } | |
| off = pkt->size; | |
| if ((ret = av_grow_packet(pkt, WV_HEADER_SIZE + wc->header.blocksize)) < 0) { | |
| return ret; | |
| } | |
| memcpy(pkt->data + off, wc->block_header, WV_HEADER_SIZE); | |
| ret = avio_read(s->pb, pkt->data + off + WV_HEADER_SIZE, wc->header.blocksize); | |
| if (ret != wc->header.blocksize) { | |
| return (ret < 0) ? ret : AVERROR_EOF; | |
| } | |
| } | |
| pkt->stream_index = 0; | |
| pkt->pos = pos; | |
| wc->block_parsed = 1; | |
| pkt->pts = wc->header.block_idx; | |
| block_samples = wc->header.samples; | |
| if (block_samples > INT32_MAX) | |
| av_log(s, AV_LOG_WARNING, | |
| "Too many samples in block: %"PRIu32"\n", block_samples); | |
| else | |
| pkt->duration = block_samples; | |
| return 0; | |
| } | |
| const FFInputFormat ff_wv_demuxer = { | |
| .p.name = "wv", | |
| .p.long_name = NULL_IF_CONFIG_SMALL("WavPack"), | |
| .p.flags = AVFMT_GENERIC_INDEX, | |
| .priv_data_size = sizeof(WVContext), | |
| .read_probe = wv_probe, | |
| .read_header = wv_read_header, | |
| .read_packet = wv_read_packet, | |
| }; |