]> git.sesse.net Git - ffmpeg/blob - libavformat/argo_asf.c
94d3ae3e091a83e5ca9ba794ef156daf404a3bd3
[ffmpeg] / libavformat / argo_asf.c
1 /*
2  * Argonaut Games ASF (de)muxer
3  *
4  * Copyright (C) 2020 Zane van Iperen (zane@zanevaniperen.com)
5  *
6  * This file is part of FFmpeg.
7  *
8  * FFmpeg is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU Lesser General Public
10  * License as published by the Free Software Foundation; either
11  * version 2.1 of the License, or (at your option) any later version.
12  *
13  * FFmpeg is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
16  * Lesser General Public License for more details.
17  *
18  * You should have received a copy of the GNU Lesser General Public
19  * License along with FFmpeg; if not, write to the Free Software
20  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
21  */
22 #include "avformat.h"
23 #include "internal.h"
24 #include "libavutil/intreadwrite.h"
25 #include "libavutil/avassert.h"
26
27 #define ASF_TAG                 MKTAG('A', 'S', 'F', '\0')
28 #define ASF_FILE_HEADER_SIZE    24
29 #define ASF_CHUNK_HEADER_SIZE   20
30 #define ASF_SAMPLE_COUNT        32
31
32 typedef struct ArgoASFFileHeader {
33     uint32_t    magic;          /*< Magic Number, {'A', 'S', 'F', '\0'} */
34     uint16_t    version_major;  /*< File Major Version. */
35     uint16_t    version_minor;  /*< File Minor Version. */
36     uint32_t    num_chunks;     /*< No. chunks in the file. */
37     uint32_t    chunk_offset;   /*< Offset to the first chunk from the start of the file. */
38     int8_t      name[8];        /*< Name. */
39 } ArgoASFFileHeader;
40
41 typedef struct ArgoASFChunkHeader {
42     uint32_t    num_blocks;     /*< No. blocks in the chunk. */
43     uint32_t    num_samples;    /*< No. samples per channel in a block. Always 32. */
44     uint32_t    unk1;           /*< Unknown */
45     uint16_t    sample_rate;    /*< Sample rate. */
46     uint16_t    unk2;           /*< Unknown. */
47     uint32_t    flags;          /*< Stream flags. */
48 } ArgoASFChunkHeader;
49
50 enum {
51     ASF_CF_BITS_PER_SAMPLE  = (1 << 0), /*< 16-bit if set, 8 otherwise.      */
52     ASF_CF_STEREO           = (1 << 1), /*< Stereo if set, mono otherwise.   */
53     ASF_CF_ALWAYS1_1        = (1 << 2), /*< Unknown, always seems to be set. */
54     ASF_CF_ALWAYS1_2        = (1 << 3), /*< Unknown, always seems to be set. */
55
56     ASF_CF_ALWAYS1          = ASF_CF_ALWAYS1_1 | ASF_CF_ALWAYS1_2,
57     ASF_CF_ALWAYS0          = ~(ASF_CF_BITS_PER_SAMPLE | ASF_CF_STEREO | ASF_CF_ALWAYS1)
58 };
59
60 typedef struct ArgoASFDemuxContext {
61     ArgoASFFileHeader   fhdr;
62     ArgoASFChunkHeader  ckhdr;
63     uint32_t            blocks_read;
64 } ArgoASFDemuxContext;
65
66 #if CONFIG_ARGO_ASF_DEMUXER
67 static void argo_asf_parse_file_header(ArgoASFFileHeader *hdr, const uint8_t *buf)
68 {
69     hdr->magic          = AV_RL32(buf + 0);
70     hdr->version_major  = AV_RL16(buf + 4);
71     hdr->version_minor  = AV_RL16(buf + 6);
72     hdr->num_chunks     = AV_RL32(buf + 8);
73     hdr->chunk_offset   = AV_RL32(buf + 12);
74     for (int i = 0; i < FF_ARRAY_ELEMS(hdr->name); i++)
75         hdr->name[i]    = AV_RL8(buf + 16 + i);
76 }
77
78 static void argo_asf_parse_chunk_header(ArgoASFChunkHeader *hdr, const uint8_t *buf)
79 {
80     hdr->num_blocks     = AV_RL32(buf + 0);
81     hdr->num_samples    = AV_RL32(buf + 4);
82     hdr->unk1           = AV_RL32(buf + 8);
83     hdr->sample_rate    = AV_RL16(buf + 12);
84     hdr->unk2           = AV_RL16(buf + 14);
85     hdr->flags          = AV_RL32(buf + 16);
86 }
87
88 /*
89  * Known versions:
90  * 1.1: https://samples.ffmpeg.org/game-formats/brender/part2.zip
91  *      FX Fighter
92  * 1.2: Croc! Legend of the Gobbos
93  * 2.1: Croc 2
94  *      The Emperor's New Groove
95  *      Disney's Aladdin in Nasira's Revenge
96  */
97 static int argo_asf_is_known_version(const ArgoASFFileHeader *hdr)
98 {
99     return (hdr->version_major == 1 && hdr->version_minor == 1) ||
100            (hdr->version_major == 1 && hdr->version_minor == 2) ||
101            (hdr->version_major == 2 && hdr->version_minor == 1);
102 }
103
104 static int argo_asf_probe(const AVProbeData *p)
105 {
106     ArgoASFFileHeader hdr;
107
108     av_assert0(AVPROBE_PADDING_SIZE >= ASF_FILE_HEADER_SIZE);
109
110     argo_asf_parse_file_header(&hdr, p->buf);
111
112     if (hdr.magic != ASF_TAG)
113         return 0;
114
115     if (!argo_asf_is_known_version(&hdr))
116         return AVPROBE_SCORE_EXTENSION / 2;
117
118     return AVPROBE_SCORE_EXTENSION + 1;
119 }
120
121 static int argo_asf_read_header(AVFormatContext *s)
122 {
123     int64_t ret;
124     AVIOContext *pb = s->pb;
125     AVStream *st;
126     ArgoASFDemuxContext *asf = s->priv_data;
127     uint8_t buf[FFMAX(ASF_FILE_HEADER_SIZE, ASF_CHUNK_HEADER_SIZE)];
128
129     if (!(st = avformat_new_stream(s, NULL)))
130         return AVERROR(ENOMEM);
131
132     if ((ret = avio_read(pb, buf, ASF_FILE_HEADER_SIZE)) < 0)
133         return ret;
134     else if (ret != ASF_FILE_HEADER_SIZE)
135         return AVERROR(EIO);
136
137     argo_asf_parse_file_header(&asf->fhdr, buf);
138
139     if (!argo_asf_is_known_version(&asf->fhdr)) {
140         avpriv_request_sample(s, "Version %hu.%hu",
141             asf->fhdr.version_major, asf->fhdr.version_minor
142         );
143         return AVERROR_PATCHWELCOME;
144     }
145
146     if (asf->fhdr.num_chunks == 0) {
147         return AVERROR_INVALIDDATA;
148     } else if (asf->fhdr.num_chunks > 1) {
149         avpriv_request_sample(s, ">1 chunk");
150         return AVERROR_PATCHWELCOME;
151     }
152
153     if (asf->fhdr.chunk_offset < ASF_FILE_HEADER_SIZE)
154         return AVERROR_INVALIDDATA;
155
156     if ((ret = avio_skip(pb, asf->fhdr.chunk_offset - ASF_FILE_HEADER_SIZE)) < 0)
157         return ret;
158
159     if ((ret = avio_read(pb, buf, ASF_CHUNK_HEADER_SIZE)) < 0)
160         return ret;
161     else if (ret != ASF_CHUNK_HEADER_SIZE)
162         return AVERROR(EIO);
163
164     argo_asf_parse_chunk_header(&asf->ckhdr, buf);
165
166     if (asf->ckhdr.num_samples != ASF_SAMPLE_COUNT) {
167         av_log(s, AV_LOG_ERROR, "Invalid sample count. Got %u, expected %d\n",
168                asf->ckhdr.num_samples, ASF_SAMPLE_COUNT);
169         return AVERROR_INVALIDDATA;
170     }
171
172     if ((asf->ckhdr.flags & ASF_CF_ALWAYS1) != ASF_CF_ALWAYS1 || (asf->ckhdr.flags & ASF_CF_ALWAYS0) != 0) {
173         avpriv_request_sample(s, "Nonstandard flags (0x%08X)", asf->ckhdr.flags);
174         return AVERROR_PATCHWELCOME;
175     }
176
177     st->codecpar->codec_type                = AVMEDIA_TYPE_AUDIO;
178     st->codecpar->codec_id                  = AV_CODEC_ID_ADPCM_ARGO;
179     st->codecpar->format                    = AV_SAMPLE_FMT_S16P;
180
181     if (asf->ckhdr.flags & ASF_CF_STEREO) {
182         st->codecpar->channel_layout        = AV_CH_LAYOUT_STEREO;
183         st->codecpar->channels              = 2;
184     } else {
185         st->codecpar->channel_layout        = AV_CH_LAYOUT_MONO;
186         st->codecpar->channels              = 1;
187     }
188
189     st->codecpar->sample_rate               = asf->ckhdr.sample_rate;
190
191     st->codecpar->bits_per_coded_sample     = 4;
192
193     if (asf->ckhdr.flags & ASF_CF_BITS_PER_SAMPLE)
194         st->codecpar->bits_per_raw_sample   = 16;
195     else
196         st->codecpar->bits_per_raw_sample   = 8;
197
198     if (st->codecpar->bits_per_raw_sample != 16) {
199         /* The header allows for these, but I've never seen any files with them. */
200         avpriv_request_sample(s, "Non 16-bit samples");
201         return AVERROR_PATCHWELCOME;
202     }
203
204     /*
205      * (nchannel control bytes) + ((bytes_per_channel) * nchannel)
206      * For mono, this is 17. For stereo, this is 34.
207      */
208     st->codecpar->frame_size            = st->codecpar->channels +
209                                           (asf->ckhdr.num_samples / 2) *
210                                           st->codecpar->channels;
211
212     st->codecpar->block_align           = st->codecpar->frame_size;
213
214     st->codecpar->bit_rate              = st->codecpar->channels *
215                                           st->codecpar->sample_rate *
216                                           st->codecpar->bits_per_coded_sample;
217
218     avpriv_set_pts_info(st, 64, 1, st->codecpar->sample_rate);
219     st->start_time      = 0;
220     st->duration        = asf->ckhdr.num_blocks * asf->ckhdr.num_samples;
221     st->nb_frames       = asf->ckhdr.num_blocks;
222     return 0;
223 }
224
225 static int argo_asf_read_packet(AVFormatContext *s, AVPacket *pkt)
226 {
227     ArgoASFDemuxContext *asf = s->priv_data;
228
229     AVStream *st = s->streams[0];
230     AVIOContext *pb = s->pb;
231     int ret;
232
233     if (asf->blocks_read >= asf->ckhdr.num_blocks)
234         return AVERROR_EOF;
235
236     if ((ret = av_get_packet(pb, pkt, st->codecpar->frame_size)) < 0)
237         return ret;
238     else if (ret != st->codecpar->frame_size)
239         return AVERROR_INVALIDDATA;
240
241     pkt->stream_index   = st->index;
242     pkt->duration       = asf->ckhdr.num_samples;
243
244     ++asf->blocks_read;
245     return 0;
246 }
247
248 /*
249  * Not actually sure what ASF stands for.
250  * - Argonaut Sound File?
251  * - Audio Stream File?
252  */
253 AVInputFormat ff_argo_asf_demuxer = {
254     .name           = "argo_asf",
255     .long_name      = NULL_IF_CONFIG_SMALL("Argonaut Games ASF"),
256     .priv_data_size = sizeof(ArgoASFDemuxContext),
257     .read_probe     = argo_asf_probe,
258     .read_header    = argo_asf_read_header,
259     .read_packet    = argo_asf_read_packet
260 };
261 #endif
262
263 #if CONFIG_ARGO_ASF_MUXER
264 static int argo_asf_write_init(AVFormatContext *s)
265 {
266     const AVCodecParameters *par;
267
268     if (s->nb_streams != 1) {
269         av_log(s, AV_LOG_ERROR, "ASF files have exactly one stream\n");
270         return AVERROR(EINVAL);
271     }
272
273     par = s->streams[0]->codecpar;
274
275     if (par->codec_id != AV_CODEC_ID_ADPCM_ARGO) {
276         av_log(s, AV_LOG_ERROR, "%s codec not supported\n",
277                avcodec_get_name(par->codec_id));
278         return AVERROR(EINVAL);
279     }
280
281     if (par->channels > 2) {
282         av_log(s, AV_LOG_ERROR, "ASF files only support up to 2 channels\n");
283         return AVERROR(EINVAL);
284     }
285
286     if (par->sample_rate > UINT16_MAX) {
287         av_log(s, AV_LOG_ERROR, "Sample rate too large\n");
288         return AVERROR(EINVAL);
289     }
290
291     if (!(s->pb->seekable & AVIO_SEEKABLE_NORMAL)) {
292         av_log(s, AV_LOG_ERROR, "Stream not seekable, unable to write output file\n");
293         return AVERROR(EINVAL);
294     }
295
296     return 0;
297 }
298
299 static void argo_asf_write_file_header(const ArgoASFFileHeader *fhdr, AVIOContext *pb)
300 {
301     avio_wl32( pb, fhdr->magic);
302     avio_wl16( pb, fhdr->version_major);
303     avio_wl16( pb, fhdr->version_minor);
304     avio_wl32( pb, fhdr->num_chunks);
305     avio_wl32( pb, fhdr->chunk_offset);
306     avio_write(pb, fhdr->name, sizeof(fhdr->name));
307 }
308
309 static void argo_asf_write_chunk_header(const ArgoASFChunkHeader *ckhdr, AVIOContext *pb)
310 {
311     avio_wl32(pb, ckhdr->num_blocks);
312     avio_wl32(pb, ckhdr->num_samples);
313     avio_wl32(pb, ckhdr->unk1);
314     avio_wl16(pb, ckhdr->sample_rate);
315     avio_wl16(pb, ckhdr->unk2);
316     avio_wl32(pb, ckhdr->flags);
317 }
318
319 static int argo_asf_write_header(AVFormatContext *s)
320 {
321     const AVCodecParameters  *par = s->streams[0]->codecpar;
322     ArgoASFFileHeader  fhdr;
323     ArgoASFChunkHeader chdr;
324
325     fhdr.magic         = ASF_TAG;
326     fhdr.version_major = 2;
327     fhdr.version_minor = 1;
328     fhdr.num_chunks    = 1;
329     fhdr.chunk_offset  = ASF_FILE_HEADER_SIZE;
330     strncpy(fhdr.name, av_basename(s->url), FF_ARRAY_ELEMS(fhdr.name));
331
332     chdr.num_blocks    = 0;
333     chdr.num_samples   = ASF_SAMPLE_COUNT;
334     chdr.unk1          = 0;
335     chdr.sample_rate   = par->sample_rate;
336     chdr.unk2          = ~0;
337     chdr.flags         = ASF_CF_BITS_PER_SAMPLE | ASF_CF_ALWAYS1;
338
339     if (par->channels == 2)
340         chdr.flags |= ASF_CF_STEREO;
341
342     argo_asf_write_file_header(&fhdr, s->pb);
343     argo_asf_write_chunk_header(&chdr, s->pb);
344     return 0;
345 }
346
347 static int argo_asf_write_packet(AVFormatContext *s, AVPacket *pkt)
348 {
349     if (pkt->size != 17 * s->streams[0]->codecpar->channels)
350         return AVERROR_INVALIDDATA;
351
352     if (s->streams[0]->nb_frames >= UINT32_MAX)
353         return AVERROR_INVALIDDATA;
354
355     avio_write(s->pb, pkt->data, pkt->size);
356     return 0;
357 }
358
359 static int argo_asf_write_trailer(AVFormatContext *s)
360 {
361     int64_t ret;
362
363     if ((ret = avio_seek(s->pb, ASF_FILE_HEADER_SIZE, SEEK_SET) < 0))
364         return ret;
365
366     avio_wl32(s->pb, (uint32_t)s->streams[0]->nb_frames);
367     return 0;
368 }
369
370 AVOutputFormat ff_argo_asf_muxer = {
371     .name           = "argo_asf",
372     .long_name      = NULL_IF_CONFIG_SMALL("Argonaut Games ASF"),
373     /*
374      * NB: Can't do this as it conflicts with the actual ASF format.
375      * .extensions  = "asf",
376      */
377     .audio_codec    = AV_CODEC_ID_ADPCM_ARGO,
378     .video_codec    = AV_CODEC_ID_NONE,
379     .init           = argo_asf_write_init,
380     .write_header   = argo_asf_write_header,
381     .write_packet   = argo_asf_write_packet,
382     .write_trailer  = argo_asf_write_trailer
383 };
384 #endif