3 * Copyright (c) 2007 Konstantin Shishkov
5 * This file is part of Libav.
7 * Libav 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.
12 * Libav 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.
17 * You should have received a copy of the GNU Lesser General Public
18 * License along with Libav; if not, write to the Free Software
19 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
22 #include "libavutil/intreadwrite.h"
27 #define DXA_EXTRA_SIZE 9
34 int64_t wavpos, vidpos;
38 static int dxa_probe(AVProbeData *p)
43 w = AV_RB16(p->buf + 11);
44 h = AV_RB16(p->buf + 13);
45 /* check file header */
46 if (p->buf[0] == 'D' && p->buf[1] == 'E' &&
47 p->buf[2] == 'X' && p->buf[3] == 'A' &&
48 w && w <= 2048 && h && h <= 2048)
49 return AVPROBE_SCORE_MAX;
54 static int dxa_read_header(AVFormatContext *s, AVFormatParameters *ap)
56 AVIOContext *pb = s->pb;
57 DXAContext *c = s->priv_data;
67 if (tag != MKTAG('D', 'E', 'X', 'A'))
70 c->frames = avio_rb16(pb);
72 av_log(s, AV_LOG_ERROR, "File contains no frames ???\n");
91 st = avformat_new_stream(s, NULL);
95 // Parse WAV data header
96 if(avio_rl32(pb) == MKTAG('W', 'A', 'V', 'E')){
100 c->vidpos = avio_tell(pb) + size;
102 fsize = avio_rl32(pb);
104 ast = avformat_new_stream(s, NULL);
107 ret = ff_get_wav_header(pb, ast->codec, fsize);
111 while(avio_tell(pb) < c->vidpos && !pb->eof_reached){
113 fsize = avio_rl32(pb);
114 if(tag == MKTAG('d', 'a', 't', 'a')) break;
115 avio_skip(pb, fsize);
117 c->bpc = (fsize + c->frames - 1) / c->frames;
118 if(ast->codec->block_align)
119 c->bpc = ((c->bpc + ast->codec->block_align - 1) / ast->codec->block_align) * ast->codec->block_align;
120 c->bytes_left = fsize;
121 c->wavpos = avio_tell(pb);
122 avio_seek(pb, c->vidpos, SEEK_SET);
125 /* now we are ready: build format streams */
126 st->codec->codec_type = AVMEDIA_TYPE_VIDEO;
127 st->codec->codec_id = CODEC_ID_DXA;
128 st->codec->width = w;
129 st->codec->height = h;
130 av_reduce(&den, &num, den, num, (1UL<<31)-1);
131 avpriv_set_pts_info(st, 33, num, den);
132 /* flags & 0x80 means that image is interlaced,
133 * flags & 0x40 means that image has double height
134 * either way set true height
137 st->codec->height >>= 1;
139 c->readvid = !c->has_sound;
140 c->vidpos = avio_tell(pb);
142 s->duration = (int64_t)c->frames * AV_TIME_BASE * num / den;
143 av_log(s, AV_LOG_DEBUG, "%d frame(s)\n",c->frames);
148 static int dxa_read_packet(AVFormatContext *s, AVPacket *pkt)
150 DXAContext *c = s->priv_data;
153 uint8_t buf[DXA_EXTRA_SIZE], pal[768+4];
156 if(!c->readvid && c->has_sound && c->bytes_left){
158 avio_seek(s->pb, c->wavpos, SEEK_SET);
159 size = FFMIN(c->bytes_left, c->bpc);
160 ret = av_get_packet(s->pb, pkt, size);
161 pkt->stream_index = 1;
164 c->bytes_left -= size;
165 c->wavpos = avio_tell(s->pb);
168 avio_seek(s->pb, c->vidpos, SEEK_SET);
169 while(!s->pb->eof_reached && c->frames){
170 avio_read(s->pb, buf, 4);
171 switch(AV_RL32(buf)){
172 case MKTAG('N', 'U', 'L', 'L'):
173 if(av_new_packet(pkt, 4 + pal_size) < 0)
174 return AVERROR(ENOMEM);
175 pkt->stream_index = 0;
176 if(pal_size) memcpy(pkt->data, pal, pal_size);
177 memcpy(pkt->data + pal_size, buf, 4);
179 c->vidpos = avio_tell(s->pb);
182 case MKTAG('C', 'M', 'A', 'P'):
185 avio_read(s->pb, pal + 4, 768);
187 case MKTAG('F', 'R', 'A', 'M'):
188 avio_read(s->pb, buf + 4, DXA_EXTRA_SIZE - 4);
189 size = AV_RB32(buf + 5);
191 av_log(s, AV_LOG_ERROR, "Frame size is too big: %d\n", size);
194 if(av_new_packet(pkt, size + DXA_EXTRA_SIZE + pal_size) < 0)
195 return AVERROR(ENOMEM);
196 memcpy(pkt->data + pal_size, buf, DXA_EXTRA_SIZE);
197 ret = avio_read(s->pb, pkt->data + DXA_EXTRA_SIZE + pal_size, size);
202 if(pal_size) memcpy(pkt->data, pal, pal_size);
203 pkt->stream_index = 0;
205 c->vidpos = avio_tell(s->pb);
209 av_log(s, AV_LOG_ERROR, "Unknown tag %c%c%c%c\n", buf[0], buf[1], buf[2], buf[3]);
216 AVInputFormat ff_dxa_demuxer = {
218 .long_name = NULL_IF_CONFIG_SMALL("DXA"),
219 .priv_data_size = sizeof(DXAContext),
220 .read_probe = dxa_probe,
221 .read_header = dxa_read_header,
222 .read_packet = dxa_read_packet,