1 /*
2 * CDXL demuxer
3 * Copyright (c) 2011-2012 Paul B Mahol
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/channel_layout.h"
23 #include "libavutil/intreadwrite.h"
24 #include "libavutil/parseutils.h"
25 #include "libavutil/opt.h"
26 #include "avformat.h"
27 #include "internal.h"
28
29 #define CDXL_HEADER_SIZE 32
30
31 typedef struct CDXLDemuxContext {
32 AVClass *class;
33 int read_chunk;
34 AVRational frate;
35 int srate;
36 AVRational frame_rate;
37 int sample_rate;
38 uint8_t header[CDXL_HEADER_SIZE];
39 int video_stream_index;
40 int audio_stream_index;
41 int64_t filesize;
42 int64_t pos;
43 } CDXLDemuxContext;
44
cdxl_read_probe(const AVProbeData * p)45 static int cdxl_read_probe(const AVProbeData *p)
46 {
47 int score = AVPROBE_SCORE_EXTENSION + 10;
48 const uint8_t *buf = p->buf;
49
50 if (p->buf_size < CDXL_HEADER_SIZE)
51 return 0;
52
53 /* check type */
54 if (buf[0] > 1)
55 return 0;
56
57 /* reserved bytes should always be set to 0 */
58 if (AV_RL24(&buf[29]))
59 return 0;
60
61 /* check palette size */
62 if (!AV_RN16(&buf[20]))
63 return 0;
64 if (buf[0] == 1 && AV_RB16(&buf[20]) > 512)
65 return 0;
66 if (buf[0] == 0 && AV_RB16(&buf[20]) > 768)
67 return 0;
68
69 if (!AV_RN16(&buf[22]) && AV_RN16(&buf[24]))
70 return 0;
71
72 if (buf[0] == 0 && (!buf[26] || !AV_RB16(&buf[24])))
73 return 0;
74
75 /* check number of planes */
76 if (buf[19] != 6 && buf[19] != 8 && buf[19] != 24)
77 return 0;
78
79 if (buf[18])
80 return 0;
81
82 /* check widh and height */
83 if (AV_RB16(&buf[14]) > 640 || AV_RB16(&buf[16]) > 480 ||
84 AV_RB16(&buf[14]) == 0 || AV_RB16(&buf[16]) == 0)
85 return 0;
86
87 /* chunk size */
88 if (AV_RB32(&buf[2]) <= AV_RB16(&buf[20]) + AV_RB16(&buf[22]) * (1 + !!(buf[1] & 0x10)) + CDXL_HEADER_SIZE)
89 return 0;
90
91 /* previous chunk size */
92 if (AV_RN32(&buf[6]))
93 score /= 2;
94
95 /* current frame number, usually starts from 1 */
96 if (AV_RB32(&buf[10]) != 1)
97 score /= 2;
98
99 return score;
100 }
101
cdxl_read_header(AVFormatContext * s)102 static int cdxl_read_header(AVFormatContext *s)
103 {
104 CDXLDemuxContext *cdxl = s->priv_data;
105
106 cdxl->read_chunk = 0;
107 cdxl->video_stream_index = -1;
108 cdxl->audio_stream_index = -1;
109
110 cdxl->filesize = avio_size(s->pb);
111
112 s->ctx_flags |= AVFMTCTX_NOHEADER;
113
114 return 0;
115 }
116
cdxl_read_packet(AVFormatContext * s,AVPacket * pkt)117 static int cdxl_read_packet(AVFormatContext *s, AVPacket *pkt)
118 {
119 CDXLDemuxContext *cdxl = s->priv_data;
120 AVIOContext *pb = s->pb;
121 uint32_t current_size, video_size, image_size;
122 uint16_t audio_size, palette_size, width, height;
123 int channels, type, format, ret;
124
125 if (avio_feof(pb))
126 return AVERROR_EOF;
127
128 if (!cdxl->read_chunk) {
129 cdxl->pos = avio_tell(pb);
130 if (avio_read(pb, cdxl->header, CDXL_HEADER_SIZE) != CDXL_HEADER_SIZE)
131 return AVERROR_EOF;
132 }
133 if (cdxl->header[0] > 1) {
134 av_log(s, AV_LOG_ERROR, "unsupported cdxl file\n");
135 return AVERROR_INVALIDDATA;
136 }
137
138 type = cdxl->header[0];
139 channels = 1 + !!(cdxl->header[1] & 0x10);
140 format = cdxl->header[1] & 0xE0;
141 current_size = AV_RB32(&cdxl->header[2]);
142 width = AV_RB16(&cdxl->header[14]);
143 height = AV_RB16(&cdxl->header[16]);
144 palette_size = AV_RB16(&cdxl->header[20]);
145 audio_size = AV_RB16(&cdxl->header[22]) * channels;
146 cdxl->srate = AV_RB16(&cdxl->header[24]);
147 if (!cdxl->srate && audio_size)
148 cdxl->srate = cdxl->sample_rate;
149 cdxl->frate.num = cdxl->header[26];
150 cdxl->frate.den = 1;
151 if (cdxl->header[19] == 0 ||
152 FFALIGN(width, 16) * (uint64_t)height * cdxl->header[19] > INT_MAX)
153 return AVERROR_INVALIDDATA;
154 if (format == 0x20)
155 image_size = width * height * cdxl->header[19] / 8;
156 else
157 image_size = FFALIGN(width, 16) * height * cdxl->header[19] / 8;
158 video_size = palette_size + image_size;
159
160 if ((type == 1 && palette_size > 512) ||
161 (type == 0 && palette_size > 768))
162 return AVERROR_INVALIDDATA;
163 if (current_size < (uint64_t)audio_size + video_size + CDXL_HEADER_SIZE)
164 return AVERROR_INVALIDDATA;
165
166 if (!cdxl->frate.num && audio_size && cdxl->srate > 0) {
167 cdxl->frate = (AVRational){ cdxl->srate, audio_size };
168 } else if (!cdxl->frate.num) {
169 cdxl->frate = cdxl->frame_rate;
170 }
171
172 if (cdxl->read_chunk && audio_size) {
173 if (cdxl->audio_stream_index == -1) {
174 AVStream *st = avformat_new_stream(s, NULL);
175 if (!st)
176 return AVERROR(ENOMEM);
177
178 st->codecpar->codec_type = AVMEDIA_TYPE_AUDIO;
179 st->codecpar->codec_tag = 0;
180 st->codecpar->codec_id = AV_CODEC_ID_PCM_S8_PLANAR;
181 st->codecpar->channels = channels;
182 st->codecpar->channel_layout = channels == 2 ? AV_CH_LAYOUT_STEREO : AV_CH_LAYOUT_MONO;
183 st->codecpar->sample_rate= cdxl->srate;
184 st->start_time = 0;
185 cdxl->audio_stream_index = st->index;
186 avpriv_set_pts_info(st, 64, 1, cdxl->srate);
187 if (current_size && cdxl->filesize > 0 && audio_size > 0)
188 st->duration = (cdxl->filesize / current_size) * audio_size / channels;
189 }
190
191 ret = av_get_packet(pb, pkt, audio_size);
192 if (ret < 0)
193 return ret;
194 pkt->stream_index = cdxl->audio_stream_index;
195 pkt->pos = cdxl->pos;
196 pkt->duration = audio_size / channels;
197 cdxl->read_chunk = 0;
198 } else {
199 if (cdxl->video_stream_index == -1) {
200 AVStream *st = avformat_new_stream(s, NULL);
201 if (!st)
202 return AVERROR(ENOMEM);
203
204 st->codecpar->codec_type = AVMEDIA_TYPE_VIDEO;
205 st->codecpar->codec_tag = 0;
206 st->codecpar->codec_id = AV_CODEC_ID_CDXL;
207 st->codecpar->width = width;
208 st->codecpar->height = height;
209
210 if (current_size && cdxl->filesize > 0)
211 st->nb_frames = cdxl->filesize / current_size;
212 st->start_time = 0;
213 cdxl->video_stream_index = st->index;
214 avpriv_set_pts_info(st, 64, cdxl->frate.den, cdxl->frate.num);
215 }
216
217 if ((ret = av_new_packet(pkt, video_size + CDXL_HEADER_SIZE)) < 0)
218 return ret;
219 memcpy(pkt->data, cdxl->header, CDXL_HEADER_SIZE);
220 ret = avio_read(pb, pkt->data + CDXL_HEADER_SIZE, video_size);
221 if (ret < 0) {
222 return ret;
223 }
224 av_shrink_packet(pkt, CDXL_HEADER_SIZE + ret);
225 pkt->stream_index = cdxl->video_stream_index;
226 pkt->flags |= AV_PKT_FLAG_KEY;
227 pkt->pos = cdxl->pos;
228 pkt->duration = 1;
229 cdxl->read_chunk = audio_size;
230 }
231
232 if (!cdxl->read_chunk)
233 avio_skip(pb, current_size - audio_size - video_size - CDXL_HEADER_SIZE);
234 return ret;
235 }
236
read_seek(AVFormatContext * s,int stream_index,int64_t timestamp,int flags)237 static int read_seek(AVFormatContext *s, int stream_index,
238 int64_t timestamp, int flags)
239 {
240 CDXLDemuxContext *cdxl = s->priv_data;
241
242 cdxl->read_chunk = 0;
243
244 return -1;
245 }
246
247 #define OFFSET(x) offsetof(CDXLDemuxContext, x)
248 static const AVOption cdxl_options[] = {
249 { "sample_rate", "", OFFSET(sample_rate), AV_OPT_TYPE_INT, { .i64=11025 }, 8000, INT_MAX, AV_OPT_FLAG_DECODING_PARAM },
250 { "frame_rate", "", OFFSET(frame_rate), AV_OPT_TYPE_VIDEO_RATE, { .str="15" }, 1, INT_MAX, AV_OPT_FLAG_DECODING_PARAM },
251 { NULL },
252 };
253
254 static const AVClass cdxl_demuxer_class = {
255 .class_name = "CDXL demuxer",
256 .item_name = av_default_item_name,
257 .option = cdxl_options,
258 .version = LIBAVUTIL_VERSION_INT,
259 };
260
261 AVInputFormat ff_cdxl_demuxer = {
262 .name = "cdxl",
263 .long_name = NULL_IF_CONFIG_SMALL("Commodore CDXL video"),
264 .priv_data_size = sizeof(CDXLDemuxContext),
265 .priv_class = &cdxl_demuxer_class,
266 .read_probe = cdxl_read_probe,
267 .read_header = cdxl_read_header,
268 .read_packet = cdxl_read_packet,
269 .read_seek = read_seek,
270 .extensions = "cdxl,xl",
271 .flags = AVFMT_GENERIC_INDEX,
272 };
273