libavformat/riffdec.c

   1 /*
   2  * RIFF demuxing functions and data
   3  * Copyright (c) 2000 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 "libavutil/avassert.h"
  23 #include "libavutil/dict.h"
  24 #include "libavutil/error.h"
  25 #include "libavutil/intreadwrite.h"
  26 #include "libavutil/log.h"
  27 #include "libavutil/mem.h"
  28 #include "avformat.h"
  29 #include "avio_internal.h"
  30 #include "demux.h"
  31 #include "riff.h"
  32
  33 int ff_get_guid(AVIOContext *s, ff_asf_guid *g)
  34 {
  35     int ret;
  36     av_assert0(sizeof(*g) == 16); //compiler will optimize this out
  37     ret = ffio_read_size(s, *g, sizeof(*g));
  38     if (ret < 0) {
  39         memset(*g, 0, sizeof(*g));
  40         return ret;
  41     }
  42     return 0;
  43 }
  44
  45 enum AVCodecID ff_codec_guid_get_id(const AVCodecGuid *guids, ff_asf_guid guid)
  46 {
  47     int i;
  48     for (i = 0; guids[i].id != AV_CODEC_ID_NONE; i++)
  49         if (!ff_guidcmp(guids[i].guid, guid))
  50             return guids[i].id;
  51     return AV_CODEC_ID_NONE;
  52 }
  53
  54 /* We could be given one of the three possible structures here:
  55  * WAVEFORMAT, PCMWAVEFORMAT or WAVEFORMATEX. Each structure
  56  * is an expansion of the previous one with the fields added
  57  * at the bottom. PCMWAVEFORMAT adds 'WORD wBitsPerSample' and
  58  * WAVEFORMATEX adds 'WORD  cbSize' and basically makes itself
  59  * an openended structure.
  60  */
  61
  62 static void parse_waveformatex(void *logctx, AVIOContext *pb, AVCodecParameters *par)
  63 {
  64     ff_asf_guid subformat;
  65     int bps;
  66     uint64_t mask;
  67
  68     bps = avio_rl16(pb);
  69     if (bps)
  70         par->bits_per_coded_sample = bps;
  71
  72     mask = avio_rl32(pb); /* dwChannelMask */
  73     av_channel_layout_from_mask(&par->ch_layout, mask);
  74
  75     ff_get_guid(pb, &subformat);
  76     if (!memcmp(subformat + 4,
  77                 (const uint8_t[]){ FF_AMBISONIC_BASE_GUID }, 12) ||
  78         !memcmp(subformat + 4,
  79                 (const uint8_t[]){ FF_BROKEN_BASE_GUID }, 12) ||
  80         !memcmp(subformat + 4,
  81                 (const uint8_t[]){ FF_MEDIASUBTYPE_BASE_GUID }, 12)) {
  82         par->codec_tag = AV_RL32(subformat);
  83         par->codec_id  = ff_wav_codec_get_id(par->codec_tag,
  84                                              par->bits_per_coded_sample);
  85     } else {
  86         par->codec_id = ff_codec_guid_get_id(ff_codec_wav_guids, subformat);
  87         if (!par->codec_id)
  88             av_log(logctx, AV_LOG_WARNING,
  89                    "unknown subformat:"FF_PRI_GUID"\n",
  90                    FF_ARG_GUID(subformat));
  91     }
  92 }
  93
  94 /* "big_endian" values are needed for RIFX file format */
  95 int ff_get_wav_header(AVFormatContext *s, AVIOContext *pb,
  96                       AVCodecParameters *par, int size, int big_endian)
  97 {
  98     int id, channels = 0, ret;
  99     uint64_t bitrate = 0;
 100
 101     if (size < 14) {
 102         avpriv_request_sample(s, "wav header size < 14");
 103         return AVERROR_INVALIDDATA;
 104     }
 105
 106     av_channel_layout_uninit(&par->ch_layout);
 107
 108     par->codec_type  = AVMEDIA_TYPE_AUDIO;
 109     if (!big_endian) {
 110         id                 = avio_rl16(pb);
 111         if (id != 0x0165) {
 112             channels         = avio_rl16(pb);
 113             par->sample_rate = avio_rl32(pb);
 114             bitrate            = avio_rl32(pb) * 8LL;
 115             par->block_align = avio_rl16(pb);
 116         }
 117     } else {
 118         id                 = avio_rb16(pb);
 119         channels           = avio_rb16(pb);
 120         par->sample_rate = avio_rb32(pb);
 121         bitrate            = avio_rb32(pb) * 8LL;
 122         par->block_align = avio_rb16(pb);
 123     }
 124     if (size == 14) {  /* We're dealing with plain vanilla WAVEFORMAT */
 125         par->bits_per_coded_sample = 8;
 126     } else {
 127         if (!big_endian) {
 128             par->bits_per_coded_sample = avio_rl16(pb);
 129         } else {
 130             par->bits_per_coded_sample = avio_rb16(pb);
 131         }
 132     }
 133     if (id == 0xFFFE) {
 134         par->codec_tag = 0;
 135     } else {
 136         par->codec_tag = id;
 137         par->codec_id  = ff_wav_codec_get_id(id,
 138                                              par->bits_per_coded_sample);
 139     }
 140     if (size >= 18 && id != 0x0165) {  /* We're obviously dealing with WAVEFORMATEX */
 141         int cbSize = avio_rl16(pb); /* cbSize */
 142         if (big_endian) {
 143             avpriv_report_missing_feature(s, "WAVEFORMATEX support for RIFX files");
 144             return AVERROR_PATCHWELCOME;
 145         }
 146         size  -= 18;
 147         cbSize = FFMIN(size, cbSize);
 148         if (cbSize >= 22 && id == 0xfffe) { /* WAVEFORMATEXTENSIBLE */
 149             parse_waveformatex(s, pb, par);
 150             cbSize -= 22;
 151             size   -= 22;
 152         } else if (cbSize >= 12 && id == 0x1610) { /* HEAACWAVEFORMAT */
 153             int wPayloadType = avio_rl16(pb);
 154             if (wPayloadType == 3)
 155                 par->codec_id = AV_CODEC_ID_AAC_LATM;
 156             avio_skip(pb, 2); // wAudioProfileLevelIndication
 157             int wStructType = avio_rl16(pb);
 158             if (wStructType) {
 159                 avpriv_report_missing_feature(s, "HEAACWAVEINFO wStructType \"%d\"", wStructType);
 160                 return AVERROR_PATCHWELCOME;
 161             }
 162             avio_skip(pb, 2); // wReserved1
 163             avio_skip(pb, 4); // dwReserved2
 164             cbSize -= 12;
 165             size   -= 12;
 166         }
 167         if (cbSize > 0) {
 168             ret = ff_get_extradata(s, par, pb, cbSize);
 169             if (ret < 0)
 170                 return ret;
 171             size -= cbSize;
 172         }
 173
 174         /* It is possible for the chunk to contain garbage at the end */
 175         if (size > 0)
 176             avio_skip(pb, size);
 177     } else if (id == 0x0165 && size >= 32) {
 178         int nb_streams, i;
 179
 180         size -= 4;
 181         ret = ff_get_extradata(s, par, pb, size);
 182         if (ret < 0)
 183             return ret;
 184         nb_streams         = AV_RL16(par->extradata + 4);
 185         par->sample_rate   = AV_RL32(par->extradata + 12);
 186         channels           = 0;
 187         bitrate            = 0;
 188         if (size < 8 + nb_streams * 20)
 189             return AVERROR_INVALIDDATA;
 190         for (i = 0; i < nb_streams; i++)
 191             channels += par->extradata[8 + i * 20 + 17];
 192     }
 193
 194     par->bit_rate = bitrate;
 195
 196     if (par->sample_rate <= 0) {
 197         av_log(s, AV_LOG_ERROR,
 198                "Invalid sample rate: %d\n", par->sample_rate);
 199         return AVERROR_INVALIDDATA;
 200     }
 201     if (par->codec_id == AV_CODEC_ID_AAC_LATM) {
 202         /* Channels and sample_rate values are those prior to applying SBR
 203          * and/or PS. */
 204         channels         = 0;
 205         par->sample_rate = 0;
 206     }
 207     /* override bits_per_coded_sample for G.726 */
 208     if (par->codec_id == AV_CODEC_ID_ADPCM_G726 && par->sample_rate)
 209         par->bits_per_coded_sample = par->bit_rate / par->sample_rate;
 210
 211     /* ignore WAVEFORMATEXTENSIBLE layout if different from channel count */
 212     if (channels != par->ch_layout.nb_channels) {
 213         av_channel_layout_uninit(&par->ch_layout);
 214         par->ch_layout.order       = AV_CHANNEL_ORDER_UNSPEC;
 215         par->ch_layout.nb_channels = channels;
 216     }
 217
 218     return 0;
 219 }
 220
 221 enum AVCodecID ff_wav_codec_get_id(unsigned int tag, int bps)
 222 {
 223     enum AVCodecID id;
 224     id = ff_codec_get_id(ff_codec_wav_tags, tag);
 225     if (id <= 0)
 226         return id;
 227
 228     if (id == AV_CODEC_ID_PCM_S16LE)
 229         id = ff_get_pcm_codec_id(bps, 0, 0, ~1);
 230     else if (id == AV_CODEC_ID_PCM_F32LE)
 231         id = ff_get_pcm_codec_id(bps, 1, 0,  0);
 232
 233     if (id == AV_CODEC_ID_ADPCM_IMA_WAV && bps == 8)
 234         id = AV_CODEC_ID_ADPCM_ZORK;
 235     return id;
 236 }
 237
 238 int ff_get_bmp_header(AVIOContext *pb, AVStream *st, uint32_t *size)
 239 {
 240     int tag1;
 241     uint32_t size_ = avio_rl32(pb);
 242     if (size)
 243         *size = size_;
 244     st->codecpar->width  = avio_rl32(pb);
 245     st->codecpar->height = (int32_t)avio_rl32(pb);
 246     avio_rl16(pb); /* planes */
 247     st->codecpar->bits_per_coded_sample = avio_rl16(pb); /* depth */
 248     tag1                                = avio_rl32(pb);
 249     avio_rl32(pb); /* ImageSize */
 250     avio_rl32(pb); /* XPelsPerMeter */
 251     avio_rl32(pb); /* YPelsPerMeter */
 252     avio_rl32(pb); /* ClrUsed */
 253     avio_rl32(pb); /* ClrImportant */
 254     return tag1;
 255 }
 256
 257 int ff_read_riff_info(AVFormatContext *s, int64_t size)
 258 {
 259     int64_t start, end, cur;
 260     AVIOContext *pb = s->pb;
 261
 262     start = avio_tell(pb);
 263     end   = start + size;
 264
 265     while ((cur = avio_tell(pb)) >= 0 &&
 266            cur <= end - 8 /* = tag + size */) {
 267         uint32_t chunk_code;
 268         int64_t chunk_size;
 269         char key[5] = { 0 };
 270         char *value;
 271
 272         chunk_code = avio_rl32(pb);
 273         chunk_size = avio_rl32(pb);
 274         if (avio_feof(pb)) {
 275             if (chunk_code || chunk_size) {
 276                 av_log(s, AV_LOG_WARNING, "INFO subchunk truncated\n");
 277                 return AVERROR_INVALIDDATA;
 278             }
 279             return AVERROR_EOF;
 280         }
 281         if (chunk_size > end ||
 282             end - chunk_size < cur ||
 283             chunk_size == UINT_MAX) {
 284             avio_seek(pb, -9, SEEK_CUR);
 285             chunk_code = avio_rl32(pb);
 286             chunk_size = avio_rl32(pb);
 287             if (chunk_size > end || end - chunk_size < cur || chunk_size == UINT_MAX) {
 288                 av_log(s, AV_LOG_WARNING, "too big INFO subchunk\n");
 289                 return AVERROR_INVALIDDATA;
 290             }
 291         }
 292
 293         chunk_size += (chunk_size & 1);
 294
 295         if (!chunk_code) {
 296             if (chunk_size)
 297                 avio_skip(pb, chunk_size);
 298             else if (pb->eof_reached) {
 299                 av_log(s, AV_LOG_WARNING, "truncated file\n");
 300                 return AVERROR_EOF;
 301             }
 302             continue;
 303         }
 304
 305         value = av_mallocz(chunk_size + 1);
 306         if (!value) {
 307             av_log(s, AV_LOG_ERROR,
 308                    "out of memory, unable to read INFO tag\n");
 309             return AVERROR(ENOMEM);
 310         }
 311
 312         AV_WL32(key, chunk_code);
 313         // Work around VC++ 2015 Update 1 code-gen bug:
 314         // https://connect.microsoft.com/VisualStudio/feedback/details/2291638
 315         key[4] = 0;
 316
 317         if (avio_read(pb, value, chunk_size) != chunk_size) {
 318             av_log(s, AV_LOG_WARNING,
 319                    "premature end of file while reading INFO tag\n");
 320         }
 321
 322         av_dict_set(&s->metadata, key, value, AV_DICT_DONT_STRDUP_VAL);
 323     }
 324
 325     return 0;
 326 }