4xm: refactor fourxm_read_header
[ffmpeg.git] / libavformat / dsicin.c
1 /*
2  * Delphine Software International CIN File Demuxer
3  * Copyright (c) 2006 Gregory Montoir (cyx@users.sourceforge.net)
4  *
5  * This file is part of Libav.
6  *
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.
11  *
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.
16  *
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
20  */
21
22 /**
23  * @file
24  * Delphine Software International CIN file demuxer
25  */
26
27 #include "libavutil/channel_layout.h"
28 #include "libavutil/intreadwrite.h"
29 #include "avformat.h"
30 #include "internal.h"
31
32
33 typedef struct CinFileHeader {
34     int video_frame_size;
35     int video_frame_width;
36     int video_frame_height;
37     int audio_frequency;
38     int audio_bits;
39     int audio_stereo;
40     int audio_frame_size;
41 } CinFileHeader;
42
43 typedef struct CinFrameHeader {
44     int audio_frame_type;
45     int video_frame_type;
46     int pal_colors_count;
47     int audio_frame_size;
48     int video_frame_size;
49 } CinFrameHeader;
50
51 typedef struct CinDemuxContext {
52     int audio_stream_index;
53     int video_stream_index;
54     CinFileHeader file_header;
55     int64_t audio_stream_pts;
56     int64_t video_stream_pts;
57     CinFrameHeader frame_header;
58     int audio_buffer_size;
59 } CinDemuxContext;
60
61
62 static int cin_probe(AVProbeData *p)
63 {
64     /* header starts with this special marker */
65     if (AV_RL32(&p->buf[0]) != 0x55AA0000)
66         return 0;
67
68     /* for accuracy, check some header field values */
69     if (AV_RL32(&p->buf[12]) != 22050 || p->buf[16] != 16 || p->buf[17] != 0)
70         return 0;
71
72     return AVPROBE_SCORE_MAX;
73 }
74
75 static int cin_read_file_header(CinDemuxContext *cin, AVIOContext *pb) {
76     CinFileHeader *hdr = &cin->file_header;
77
78     if (avio_rl32(pb) != 0x55AA0000)
79         return AVERROR_INVALIDDATA;
80
81     hdr->video_frame_size   = avio_rl32(pb);
82     hdr->video_frame_width  = avio_rl16(pb);
83     hdr->video_frame_height = avio_rl16(pb);
84     hdr->audio_frequency    = avio_rl32(pb);
85     hdr->audio_bits         = avio_r8(pb);
86     hdr->audio_stereo       = avio_r8(pb);
87     hdr->audio_frame_size   = avio_rl16(pb);
88
89     if (hdr->audio_frequency != 22050 || hdr->audio_bits != 16 || hdr->audio_stereo != 0)
90         return AVERROR_INVALIDDATA;
91
92     return 0;
93 }
94
95 static int cin_read_header(AVFormatContext *s)
96 {
97     int rc;
98     CinDemuxContext *cin = s->priv_data;
99     CinFileHeader *hdr = &cin->file_header;
100     AVIOContext *pb = s->pb;
101     AVStream *st;
102
103     rc = cin_read_file_header(cin, pb);
104     if (rc)
105         return rc;
106
107     cin->video_stream_pts = 0;
108     cin->audio_stream_pts = 0;
109     cin->audio_buffer_size = 0;
110
111     /* initialize the video decoder stream */
112     st = avformat_new_stream(s, NULL);
113     if (!st)
114         return AVERROR(ENOMEM);
115
116     avpriv_set_pts_info(st, 32, 1, 12);
117     cin->video_stream_index = st->index;
118     st->codec->codec_type = AVMEDIA_TYPE_VIDEO;
119     st->codec->codec_id = AV_CODEC_ID_DSICINVIDEO;
120     st->codec->codec_tag = 0;  /* no fourcc */
121     st->codec->width = hdr->video_frame_width;
122     st->codec->height = hdr->video_frame_height;
123
124     /* initialize the audio decoder stream */
125     st = avformat_new_stream(s, NULL);
126     if (!st)
127         return AVERROR(ENOMEM);
128
129     avpriv_set_pts_info(st, 32, 1, 22050);
130     cin->audio_stream_index = st->index;
131     st->codec->codec_type = AVMEDIA_TYPE_AUDIO;
132     st->codec->codec_id = AV_CODEC_ID_DSICINAUDIO;
133     st->codec->codec_tag = 0;  /* no tag */
134     st->codec->channels = 1;
135     st->codec->channel_layout = AV_CH_LAYOUT_MONO;
136     st->codec->sample_rate = 22050;
137     st->codec->bits_per_coded_sample = 8;
138     st->codec->bit_rate = st->codec->sample_rate * st->codec->bits_per_coded_sample * st->codec->channels;
139
140     return 0;
141 }
142
143 static int cin_read_frame_header(CinDemuxContext *cin, AVIOContext *pb) {
144     CinFrameHeader *hdr = &cin->frame_header;
145
146     hdr->video_frame_type = avio_r8(pb);
147     hdr->audio_frame_type = avio_r8(pb);
148     hdr->pal_colors_count = avio_rl16(pb);
149     hdr->video_frame_size = avio_rl32(pb);
150     hdr->audio_frame_size = avio_rl32(pb);
151
152     if (pb->eof_reached || pb->error)
153         return AVERROR(EIO);
154
155     if (avio_rl32(pb) != 0xAA55AA55)
156         return AVERROR_INVALIDDATA;
157
158     return 0;
159 }
160
161 static int cin_read_packet(AVFormatContext *s, AVPacket *pkt)
162 {
163     CinDemuxContext *cin = s->priv_data;
164     AVIOContext *pb = s->pb;
165     CinFrameHeader *hdr = &cin->frame_header;
166     int rc, palette_type, pkt_size;
167     int ret;
168
169     if (cin->audio_buffer_size == 0) {
170         rc = cin_read_frame_header(cin, pb);
171         if (rc)
172             return rc;
173
174         if ((int16_t)hdr->pal_colors_count < 0) {
175             hdr->pal_colors_count = -(int16_t)hdr->pal_colors_count;
176             palette_type = 1;
177         } else {
178             palette_type = 0;
179         }
180
181         /* palette and video packet */
182         pkt_size = (palette_type + 3) * hdr->pal_colors_count + hdr->video_frame_size;
183
184         ret = av_new_packet(pkt, 4 + pkt_size);
185         if (ret < 0)
186             return ret;
187
188         pkt->stream_index = cin->video_stream_index;
189         pkt->pts = cin->video_stream_pts++;
190
191         pkt->data[0] = palette_type;
192         pkt->data[1] = hdr->pal_colors_count & 0xFF;
193         pkt->data[2] = hdr->pal_colors_count >> 8;
194         pkt->data[3] = hdr->video_frame_type;
195
196         ret = avio_read(pb, &pkt->data[4], pkt_size);
197         if (ret < 0) {
198             av_free_packet(pkt);
199             return ret;
200         }
201         if (ret < pkt_size)
202             av_shrink_packet(pkt, 4 + ret);
203
204         /* sound buffer will be processed on next read_packet() call */
205         cin->audio_buffer_size = hdr->audio_frame_size;
206         return 0;
207     }
208
209     /* audio packet */
210     ret = av_get_packet(pb, pkt, cin->audio_buffer_size);
211     if (ret < 0)
212         return ret;
213
214     pkt->stream_index = cin->audio_stream_index;
215     pkt->pts = cin->audio_stream_pts;
216     pkt->duration = cin->audio_buffer_size - (pkt->pts == 0);
217     cin->audio_stream_pts += pkt->duration;
218     cin->audio_buffer_size = 0;
219     return 0;
220 }
221
222 AVInputFormat ff_dsicin_demuxer = {
223     .name           = "dsicin",
224     .long_name      = NULL_IF_CONFIG_SMALL("Delphine Software International CIN"),
225     .priv_data_size = sizeof(CinDemuxContext),
226     .read_probe     = cin_probe,
227     .read_header    = cin_read_header,
228     .read_packet    = cin_read_packet,
229 };