Imported Debian version 2.4.3~trusty1
[deb_ffmpeg.git] / ffmpeg / libavformat / nuv.c
CommitLineData
2ba45a60
DM
1/*
2 * NuppelVideo demuxer.
3 * Copyright (c) 2006 Reimar Doeffinger
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/intfloat.h"
25#include "avformat.h"
26#include "internal.h"
27#include "riff.h"
28
29static const AVCodecTag nuv_audio_tags[] = {
30 { AV_CODEC_ID_PCM_S16LE, MKTAG('R', 'A', 'W', 'A') },
31 { AV_CODEC_ID_MP3, MKTAG('L', 'A', 'M', 'E') },
32 { AV_CODEC_ID_NONE, 0 },
33};
34
35typedef struct {
36 int v_id;
37 int a_id;
38 int rtjpg_video;
39} NUVContext;
40
41typedef enum {
42 NUV_VIDEO = 'V',
43 NUV_EXTRADATA = 'D',
44 NUV_AUDIO = 'A',
45 NUV_SEEKP = 'R',
46 NUV_MYTHEXT = 'X'
47} nuv_frametype;
48
49static int nuv_probe(AVProbeData *p)
50{
51 if (!memcmp(p->buf, "NuppelVideo", 12))
52 return AVPROBE_SCORE_MAX;
53 if (!memcmp(p->buf, "MythTVVideo", 12))
54 return AVPROBE_SCORE_MAX;
55 return 0;
56}
57
58/// little macro to sanitize packet size
59#define PKTSIZE(s) (s & 0xffffff)
60
61/**
62 * @brief read until we found all data needed for decoding
63 * @param vst video stream of which to change parameters
64 * @param ast video stream of which to change parameters
65 * @param myth set if this is a MythTVVideo format file
66 * @return 0 or AVERROR code
67 */
68static int get_codec_data(AVIOContext *pb, AVStream *vst,
69 AVStream *ast, int myth)
70{
71 nuv_frametype frametype;
72
73 if (!vst && !myth)
74 return 1; // no codec data needed
75 while (!avio_feof(pb)) {
76 int size, subtype;
77
78 frametype = avio_r8(pb);
79 switch (frametype) {
80 case NUV_EXTRADATA:
81 subtype = avio_r8(pb);
82 avio_skip(pb, 6);
83 size = PKTSIZE(avio_rl32(pb));
84 if (vst && subtype == 'R') {
85 if (vst->codec->extradata) {
86 av_freep(&vst->codec->extradata);
87 vst->codec->extradata_size = 0;
88 }
89 if (ff_get_extradata(vst->codec, pb, size) < 0)
90 return AVERROR(ENOMEM);
91 size = 0;
92 if (!myth)
93 return 0;
94 }
95 break;
96 case NUV_MYTHEXT:
97 avio_skip(pb, 7);
98 size = PKTSIZE(avio_rl32(pb));
99 if (size != 128 * 4)
100 break;
101 avio_rl32(pb); // version
102 if (vst) {
103 vst->codec->codec_tag = avio_rl32(pb);
104 vst->codec->codec_id =
105 ff_codec_get_id(ff_codec_bmp_tags, vst->codec->codec_tag);
106 if (vst->codec->codec_tag == MKTAG('R', 'J', 'P', 'G'))
107 vst->codec->codec_id = AV_CODEC_ID_NUV;
108 } else
109 avio_skip(pb, 4);
110
111 if (ast) {
112 int id;
113
114 ast->codec->codec_tag = avio_rl32(pb);
115 ast->codec->sample_rate = avio_rl32(pb);
116 ast->codec->bits_per_coded_sample = avio_rl32(pb);
117 ast->codec->channels = avio_rl32(pb);
118 ast->codec->channel_layout = 0;
119
120 id = ff_wav_codec_get_id(ast->codec->codec_tag,
121 ast->codec->bits_per_coded_sample);
122 if (id == AV_CODEC_ID_NONE) {
123 id = ff_codec_get_id(nuv_audio_tags, ast->codec->codec_tag);
124 if (id == AV_CODEC_ID_PCM_S16LE)
125 id = ff_get_pcm_codec_id(ast->codec->bits_per_coded_sample,
126 0, 0, ~1);
127 }
128 ast->codec->codec_id = id;
129
130 ast->need_parsing = AVSTREAM_PARSE_FULL;
131 } else
132 avio_skip(pb, 4 * 4);
133
134 size -= 6 * 4;
135 avio_skip(pb, size);
136 return 0;
137 case NUV_SEEKP:
138 size = 11;
139 break;
140 default:
141 avio_skip(pb, 7);
142 size = PKTSIZE(avio_rl32(pb));
143 break;
144 }
145 avio_skip(pb, size);
146 }
147
148 return 0;
149}
150
151static int nuv_header(AVFormatContext *s)
152{
153 NUVContext *ctx = s->priv_data;
154 AVIOContext *pb = s->pb;
155 char id_string[12];
156 double aspect, fps;
157 int is_mythtv, width, height, v_packs, a_packs, ret;
158 AVStream *vst = NULL, *ast = NULL;
159
160 avio_read(pb, id_string, 12);
161 is_mythtv = !memcmp(id_string, "MythTVVideo", 12);
162 avio_skip(pb, 5); // version string
163 avio_skip(pb, 3); // padding
164 width = avio_rl32(pb);
165 height = avio_rl32(pb);
166 avio_rl32(pb); // unused, "desiredwidth"
167 avio_rl32(pb); // unused, "desiredheight"
168 avio_r8(pb); // 'P' == progressive, 'I' == interlaced
169 avio_skip(pb, 3); // padding
170 aspect = av_int2double(avio_rl64(pb));
171 if (aspect > 0.9999 && aspect < 1.0001)
172 aspect = 4.0 / 3.0;
173 fps = av_int2double(avio_rl64(pb));
174
175 // number of packets per stream type, -1 means unknown, e.g. streaming
176 v_packs = avio_rl32(pb);
177 a_packs = avio_rl32(pb);
178 avio_rl32(pb); // text
179
180 avio_rl32(pb); // keyframe distance (?)
181
182 if (v_packs) {
183 vst = avformat_new_stream(s, NULL);
184 if (!vst)
185 return AVERROR(ENOMEM);
186 ctx->v_id = vst->index;
187
188 vst->codec->codec_type = AVMEDIA_TYPE_VIDEO;
189 vst->codec->codec_id = AV_CODEC_ID_NUV;
190 vst->codec->width = width;
191 vst->codec->height = height;
192 vst->codec->bits_per_coded_sample = 10;
193 vst->sample_aspect_ratio = av_d2q(aspect * height / width,
194 10000);
195#if FF_API_R_FRAME_RATE
196 vst->r_frame_rate =
197#endif
198 vst->avg_frame_rate = av_d2q(fps, 60000);
199 avpriv_set_pts_info(vst, 32, 1, 1000);
200 } else
201 ctx->v_id = -1;
202
203 if (a_packs) {
204 ast = avformat_new_stream(s, NULL);
205 if (!ast)
206 return AVERROR(ENOMEM);
207 ctx->a_id = ast->index;
208
209 ast->codec->codec_type = AVMEDIA_TYPE_AUDIO;
210 ast->codec->codec_id = AV_CODEC_ID_PCM_S16LE;
211 ast->codec->channels = 2;
212 ast->codec->channel_layout = AV_CH_LAYOUT_STEREO;
213 ast->codec->sample_rate = 44100;
214 ast->codec->bit_rate = 2 * 2 * 44100 * 8;
215 ast->codec->block_align = 2 * 2;
216 ast->codec->bits_per_coded_sample = 16;
217 avpriv_set_pts_info(ast, 32, 1, 1000);
218 } else
219 ctx->a_id = -1;
220
221 if ((ret = get_codec_data(pb, vst, ast, is_mythtv)) < 0)
222 return ret;
223
224 ctx->rtjpg_video = vst && vst->codec->codec_id == AV_CODEC_ID_NUV;
225
226 return 0;
227}
228
229#define HDRSIZE 12
230
231static int nuv_packet(AVFormatContext *s, AVPacket *pkt)
232{
233 NUVContext *ctx = s->priv_data;
234 AVIOContext *pb = s->pb;
235 uint8_t hdr[HDRSIZE];
236 nuv_frametype frametype;
237 int ret, size;
238
239 while (!avio_feof(pb)) {
240 int copyhdrsize = ctx->rtjpg_video ? HDRSIZE : 0;
241 uint64_t pos = avio_tell(pb);
242
243 ret = avio_read(pb, hdr, HDRSIZE);
244 if (ret < HDRSIZE)
245 return ret < 0 ? ret : AVERROR(EIO);
246
247 frametype = hdr[0];
248 size = PKTSIZE(AV_RL32(&hdr[8]));
249
250 switch (frametype) {
251 case NUV_EXTRADATA:
252 if (!ctx->rtjpg_video) {
253 avio_skip(pb, size);
254 break;
255 }
256 case NUV_VIDEO:
257 if (ctx->v_id < 0) {
258 av_log(s, AV_LOG_ERROR, "Video packet in file without video stream!\n");
259 avio_skip(pb, size);
260 break;
261 }
262 ret = av_new_packet(pkt, copyhdrsize + size);
263 if (ret < 0)
264 return ret;
265
266 pkt->pos = pos;
267 pkt->flags |= hdr[2] == 0 ? AV_PKT_FLAG_KEY : 0;
268 pkt->pts = AV_RL32(&hdr[4]);
269 pkt->stream_index = ctx->v_id;
270 memcpy(pkt->data, hdr, copyhdrsize);
271 ret = avio_read(pb, pkt->data + copyhdrsize, size);
272 if (ret < 0) {
273 av_free_packet(pkt);
274 return ret;
275 }
276 if (ret < size)
277 av_shrink_packet(pkt, copyhdrsize + ret);
278 return 0;
279 case NUV_AUDIO:
280 if (ctx->a_id < 0) {
281 av_log(s, AV_LOG_ERROR, "Audio packet in file without audio stream!\n");
282 avio_skip(pb, size);
283 break;
284 }
285 ret = av_get_packet(pb, pkt, size);
286 pkt->flags |= AV_PKT_FLAG_KEY;
287 pkt->pos = pos;
288 pkt->pts = AV_RL32(&hdr[4]);
289 pkt->stream_index = ctx->a_id;
290 if (ret < 0)
291 return ret;
292 return 0;
293 case NUV_SEEKP:
294 // contains no data, size value is invalid
295 break;
296 default:
297 avio_skip(pb, size);
298 break;
299 }
300 }
301
302 return AVERROR(EIO);
303}
304
305/**
306 * \brief looks for the string RTjjjjjjjjjj in the stream too resync reading
307 * \return 1 if the syncword is found 0 otherwise.
308 */
309static int nuv_resync(AVFormatContext *s, int64_t pos_limit) {
310 AVIOContext *pb = s->pb;
311 uint32_t tag = 0;
312 while(!avio_feof(pb) && avio_tell(pb) < pos_limit) {
313 tag = (tag << 8) | avio_r8(pb);
314 if (tag == MKBETAG('R','T','j','j') &&
315 (tag = avio_rb32(pb)) == MKBETAG('j','j','j','j') &&
316 (tag = avio_rb32(pb)) == MKBETAG('j','j','j','j'))
317 return 1;
318 }
319 return 0;
320}
321
322/**
323 * \brief attempts to read a timestamp from stream at the given stream position
324 * \return timestamp if successful and AV_NOPTS_VALUE if failure
325 */
326static int64_t nuv_read_dts(AVFormatContext *s, int stream_index,
327 int64_t *ppos, int64_t pos_limit)
328{
329 NUVContext *ctx = s->priv_data;
330 AVIOContext *pb = s->pb;
331 uint8_t hdr[HDRSIZE];
332 nuv_frametype frametype;
333 int size, key, idx;
334 int64_t pos, dts;
335
336 if (avio_seek(pb, *ppos, SEEK_SET) < 0)
337 return AV_NOPTS_VALUE;
338
339 if (!nuv_resync(s, pos_limit))
340 return AV_NOPTS_VALUE;
341
342 while (!avio_feof(pb) && avio_tell(pb) < pos_limit) {
343 if (avio_read(pb, hdr, HDRSIZE) < HDRSIZE)
344 return AV_NOPTS_VALUE;
345 frametype = hdr[0];
346 size = PKTSIZE(AV_RL32(&hdr[8]));
347 switch (frametype) {
348 case NUV_SEEKP:
349 break;
350 case NUV_AUDIO:
351 case NUV_VIDEO:
352 if (frametype == NUV_VIDEO) {
353 idx = ctx->v_id;
354 key = hdr[2] == 0;
355 } else {
356 idx = ctx->a_id;
357 key = 1;
358 }
359 if (stream_index == idx) {
360
361 pos = avio_tell(s->pb) - HDRSIZE;
362 dts = AV_RL32(&hdr[4]);
363
364 // TODO - add general support in av_gen_search, so it adds positions after reading timestamps
365 av_add_index_entry(s->streams[stream_index], pos, dts, size + HDRSIZE, 0,
366 key ? AVINDEX_KEYFRAME : 0);
367
368 *ppos = pos;
369 return dts;
370 }
371 default:
372 avio_skip(pb, size);
373 break;
374 }
375 }
376 return AV_NOPTS_VALUE;
377}
378
379
380AVInputFormat ff_nuv_demuxer = {
381 .name = "nuv",
382 .long_name = NULL_IF_CONFIG_SMALL("NuppelVideo"),
383 .priv_data_size = sizeof(NUVContext),
384 .read_probe = nuv_probe,
385 .read_header = nuv_header,
386 .read_packet = nuv_packet,
387 .read_timestamp = nuv_read_dts,
388 .flags = AVFMT_GENERIC_INDEX,
389};