avformat/rsd: XMA2 is actually stored, not XMA1
[ffmpeg.git] / libavformat / rsd.c
1 /*
2  * RSD demuxer
3  * Copyright (c) 2013 James Almer
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 "libavcodec/bytestream.h"
23 #include "libavutil/intreadwrite.h"
24 #include "avformat.h"
25 #include "avio.h"
26 #include "internal.h"
27
28 static const AVCodecTag rsd_tags[] = {
29     { AV_CODEC_ID_ADPCM_PSX,       MKTAG('V','A','G',' ') },
30     { AV_CODEC_ID_ADPCM_THP,       MKTAG('G','A','D','P') },
31     { AV_CODEC_ID_ADPCM_THP,       MKTAG('W','A','D','P') },
32     { AV_CODEC_ID_ADPCM_IMA_RAD,   MKTAG('R','A','D','P') },
33     { AV_CODEC_ID_ADPCM_IMA_WAV,   MKTAG('X','A','D','P') },
34     { AV_CODEC_ID_PCM_S16BE,       MKTAG('P','C','M','B') },
35     { AV_CODEC_ID_PCM_S16LE,       MKTAG('P','C','M',' ') },
36     { AV_CODEC_ID_XMA2,            MKTAG('X','M','A',' ') },
37     { AV_CODEC_ID_NONE, 0 },
38 };
39
40 static const uint32_t rsd_unsupported_tags[] = {
41     MKTAG('O','G','G',' '),
42 };
43
44 static int rsd_probe(AVProbeData *p)
45 {
46     if (memcmp(p->buf, "RSD", 3) || p->buf[3] - '0' < 2 || p->buf[3] - '0' > 6)
47         return 0;
48     if (AV_RL32(p->buf +  8) > 256 || !AV_RL32(p->buf +  8))
49         return AVPROBE_SCORE_MAX / 8;
50     if (AV_RL32(p->buf + 16) > 8*48000 || !AV_RL32(p->buf + 16))
51         return AVPROBE_SCORE_MAX / 8;
52     return AVPROBE_SCORE_MAX;
53 }
54
55 static int rsd_read_header(AVFormatContext *s)
56 {
57     AVIOContext *pb = s->pb;
58     int i, ret, version, start = 0x800;
59     AVCodecContext *codec;
60     AVStream *st = avformat_new_stream(s, NULL);
61
62     if (!st)
63         return AVERROR(ENOMEM);
64
65     avio_skip(pb, 3); // "RSD"
66     version = avio_r8(pb) - '0';
67
68     codec = st->codec;
69     codec->codec_type = AVMEDIA_TYPE_AUDIO;
70     codec->codec_tag  = avio_rl32(pb);
71     codec->codec_id   = ff_codec_get_id(rsd_tags, codec->codec_tag);
72     if (!codec->codec_id) {
73         char tag_buf[32];
74
75         av_get_codec_tag_string(tag_buf, sizeof(tag_buf), codec->codec_tag);
76         for (i=0; i < FF_ARRAY_ELEMS(rsd_unsupported_tags); i++) {
77             if (codec->codec_tag == rsd_unsupported_tags[i]) {
78                 avpriv_request_sample(s, "Codec tag: %s", tag_buf);
79                 return AVERROR_PATCHWELCOME;
80             }
81         }
82         av_log(s, AV_LOG_ERROR, "Unknown codec tag: %s\n", tag_buf);
83         return AVERROR_INVALIDDATA;
84     }
85
86     codec->channels = avio_rl32(pb);
87     if (!codec->channels)
88         return AVERROR_INVALIDDATA;
89
90     avio_skip(pb, 4); // Bit depth
91     codec->sample_rate = avio_rl32(pb);
92     if (!codec->sample_rate)
93         return AVERROR_INVALIDDATA;
94
95     avio_skip(pb, 4); // Unknown
96
97     switch (codec->codec_id) {
98     case AV_CODEC_ID_XMA2:
99         codec->block_align = 2048;
100         ff_alloc_extradata(codec, 34);
101         if (!codec->extradata)
102             return AVERROR(ENOMEM);
103         memset(codec->extradata, 0, 34);
104         break;
105     case AV_CODEC_ID_ADPCM_PSX:
106         codec->block_align = 16 * codec->channels;
107         if (pb->seekable)
108             st->duration = av_get_audio_frame_duration(codec, avio_size(pb) - start);
109         break;
110     case AV_CODEC_ID_ADPCM_IMA_RAD:
111         codec->block_align = 20 * codec->channels;
112         if (pb->seekable)
113             st->duration = av_get_audio_frame_duration(codec, avio_size(pb) - start);
114         break;
115     case AV_CODEC_ID_ADPCM_IMA_WAV:
116         if (version == 2)
117             start = avio_rl32(pb);
118
119         codec->bits_per_coded_sample = 4;
120         codec->block_align = 36 * codec->channels;
121         if (pb->seekable)
122             st->duration = av_get_audio_frame_duration(codec, avio_size(pb) - start);
123         break;
124     case AV_CODEC_ID_ADPCM_THP:
125         if (st->codec->codec_tag == MKTAG('G','A','D','P')) {
126             /* RSD3GADP is mono, so only alloc enough memory
127                to store the coeff table for a single channel. */
128
129             start = avio_rl32(pb);
130
131             if ((ret = ff_get_extradata(codec, s->pb, 32)) < 0)
132                 return ret;
133
134             for (i = 0; i < 16; i++)
135                 AV_WB16(codec->extradata + i * 2, AV_RL16(codec->extradata + i * 2));
136
137         } else {
138             codec->block_align = 8 * codec->channels;
139             avio_skip(s->pb, 0x1A4 - avio_tell(s->pb));
140
141             if ((ret = ff_alloc_extradata(st->codec, 32 * st->codec->channels)) < 0)
142                 return ret;
143
144             for (i = 0; i < st->codec->channels; i++) {
145                 avio_read(s->pb, st->codec->extradata + 32 * i, 32);
146                 avio_skip(s->pb, 8);
147             }
148         }
149         if (pb->seekable)
150             st->duration = (avio_size(pb) - start) / (8 * st->codec->channels) * 14;
151         break;
152     case AV_CODEC_ID_PCM_S16LE:
153     case AV_CODEC_ID_PCM_S16BE:
154         if (version != 4)
155             start = avio_rl32(pb);
156
157         if (pb->seekable)
158             st->duration = (avio_size(pb) - start) / 2 / codec->channels;
159         break;
160     }
161
162     avio_skip(pb, start - avio_tell(pb));
163     if (codec->codec_id == AV_CODEC_ID_XMA2) {
164         avio_skip(pb, avio_rb32(pb) + avio_rb32(pb));
165         st->duration = avio_rb32(pb);
166     }
167
168     avpriv_set_pts_info(st, 64, 1, codec->sample_rate);
169
170     return 0;
171 }
172
173 static int rsd_read_packet(AVFormatContext *s, AVPacket *pkt)
174 {
175     AVCodecContext *codec = s->streams[0]->codec;
176     int ret, size = 1024;
177
178     if (avio_feof(s->pb))
179         return AVERROR_EOF;
180
181     if (codec->codec_id == AV_CODEC_ID_ADPCM_IMA_RAD ||
182         codec->codec_id == AV_CODEC_ID_ADPCM_PSX     ||
183         codec->codec_id == AV_CODEC_ID_ADPCM_IMA_WAV ||
184         codec->codec_id == AV_CODEC_ID_XMA2) {
185         ret = av_get_packet(s->pb, pkt, codec->block_align);
186     } else if (codec->codec_tag == MKTAG('W','A','D','P') &&
187                codec->channels > 1) {
188         int i, ch;
189
190         ret = av_new_packet(pkt, codec->block_align);
191         if (ret < 0)
192             return ret;
193         for (i = 0; i < 4; i++) {
194             for (ch = 0; ch < codec->channels; ch++) {
195                 pkt->data[ch * 8 + i * 2 + 0] = avio_r8(s->pb);
196                 pkt->data[ch * 8 + i * 2 + 1] = avio_r8(s->pb);
197             }
198         }
199         ret = 0;
200     } else {
201         ret = av_get_packet(s->pb, pkt, size);
202     }
203
204     pkt->stream_index = 0;
205
206     return ret;
207 }
208
209 AVInputFormat ff_rsd_demuxer = {
210     .name           =   "rsd",
211     .long_name      =   NULL_IF_CONFIG_SMALL("GameCube RSD"),
212     .read_probe     =   rsd_probe,
213     .read_header    =   rsd_read_header,
214     .read_packet    =   rsd_read_packet,
215     .extensions     =   "rsd",
216     .codec_tag      =   (const AVCodecTag* const []){rsd_tags, 0},
217 };