• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
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