1 /*
2 * Silicon Graphics Movie demuxer
3 * Copyright (c) 2012 Peter Ross
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 /**
23 * @file
24 * Silicon Graphics Movie demuxer
25 */
26
27 #include "libavutil/channel_layout.h"
28 #include "libavutil/eval.h"
29 #include "libavutil/intreadwrite.h"
30 #include "libavutil/rational.h"
31
32 #include "avformat.h"
33 #include "internal.h"
34
35 typedef struct MvContext {
36 int nb_video_tracks;
37 int nb_audio_tracks;
38
39 int eof_count; ///< number of streams that have finished
40 int stream_index; ///< current stream index
41 int frame[2]; ///< frame nb for current stream
42
43 int acompression; ///< compression level for audio stream
44 int aformat; ///< audio format
45 } MvContext;
46
47 #define AUDIO_FORMAT_SIGNED 401
48
mv_probe(const AVProbeData * p)49 static int mv_probe(const AVProbeData *p)
50 {
51 if (AV_RB32(p->buf) == MKBETAG('M', 'O', 'V', 'I') &&
52 AV_RB16(p->buf + 4) < 3)
53 return AVPROBE_SCORE_MAX;
54 return 0;
55 }
56
var_read_string(AVIOContext * pb,int size)57 static char *var_read_string(AVIOContext *pb, int size)
58 {
59 int n;
60 char *str;
61
62 if (size < 0 || size == INT_MAX)
63 return NULL;
64
65 str = av_malloc(size + 1);
66 if (!str)
67 return NULL;
68 n = avio_get_str(pb, size, str, size + 1);
69 if (n < size)
70 avio_skip(pb, size - n);
71 return str;
72 }
73
var_read_int(AVIOContext * pb,int size)74 static int var_read_int(AVIOContext *pb, int size)
75 {
76 int v;
77 char *s = var_read_string(pb, size);
78 if (!s)
79 return 0;
80 v = strtol(s, NULL, 10);
81 av_free(s);
82 return v;
83 }
84
var_read_float(AVIOContext * pb,int size)85 static AVRational var_read_float(AVIOContext *pb, int size)
86 {
87 AVRational v;
88 char *s = var_read_string(pb, size);
89 if (!s)
90 return (AVRational) { 0, 0 };
91 v = av_d2q(av_strtod(s, NULL), INT_MAX);
92 av_free(s);
93 return v;
94 }
95
var_read_metadata(AVFormatContext * avctx,const char * tag,int size)96 static void var_read_metadata(AVFormatContext *avctx, const char *tag, int size)
97 {
98 char *value = var_read_string(avctx->pb, size);
99 if (value)
100 av_dict_set(&avctx->metadata, tag, value, AV_DICT_DONT_STRDUP_VAL);
101 }
102
set_channels(AVFormatContext * avctx,AVStream * st,int channels)103 static int set_channels(AVFormatContext *avctx, AVStream *st, int channels)
104 {
105 if (channels <= 0) {
106 av_log(avctx, AV_LOG_ERROR, "Channel count %d invalid.\n", channels);
107 return AVERROR_INVALIDDATA;
108 }
109 st->codecpar->channels = channels;
110 st->codecpar->channel_layout = (st->codecpar->channels == 1) ? AV_CH_LAYOUT_MONO
111 : AV_CH_LAYOUT_STEREO;
112 return 0;
113 }
114
115 /**
116 * Parse global variable
117 * @return < 0 if unknown
118 */
parse_global_var(AVFormatContext * avctx,AVStream * st,const char * name,int size)119 static int parse_global_var(AVFormatContext *avctx, AVStream *st,
120 const char *name, int size)
121 {
122 MvContext *mv = avctx->priv_data;
123 AVIOContext *pb = avctx->pb;
124 if (!strcmp(name, "__NUM_I_TRACKS")) {
125 mv->nb_video_tracks = var_read_int(pb, size);
126 } else if (!strcmp(name, "__NUM_A_TRACKS")) {
127 mv->nb_audio_tracks = var_read_int(pb, size);
128 } else if (!strcmp(name, "COMMENT") || !strcmp(name, "TITLE")) {
129 var_read_metadata(avctx, name, size);
130 } else if (!strcmp(name, "LOOP_MODE") || !strcmp(name, "NUM_LOOPS") ||
131 !strcmp(name, "OPTIMIZED")) {
132 avio_skip(pb, size); // ignore
133 } else
134 return AVERROR_INVALIDDATA;
135
136 return 0;
137 }
138
139 /**
140 * Parse audio variable
141 * @return < 0 if unknown
142 */
parse_audio_var(AVFormatContext * avctx,AVStream * st,const char * name,int size)143 static int parse_audio_var(AVFormatContext *avctx, AVStream *st,
144 const char *name, int size)
145 {
146 MvContext *mv = avctx->priv_data;
147 AVIOContext *pb = avctx->pb;
148 if (!strcmp(name, "__DIR_COUNT")) {
149 st->nb_frames = var_read_int(pb, size);
150 } else if (!strcmp(name, "AUDIO_FORMAT")) {
151 mv->aformat = var_read_int(pb, size);
152 } else if (!strcmp(name, "COMPRESSION")) {
153 mv->acompression = var_read_int(pb, size);
154 } else if (!strcmp(name, "DEFAULT_VOL")) {
155 var_read_metadata(avctx, name, size);
156 } else if (!strcmp(name, "NUM_CHANNELS")) {
157 return set_channels(avctx, st, var_read_int(pb, size));
158 } else if (!strcmp(name, "SAMPLE_RATE")) {
159 int sample_rate = var_read_int(pb, size);
160 if (sample_rate <= 0)
161 return AVERROR_INVALIDDATA;
162 st->codecpar->sample_rate = sample_rate;
163 avpriv_set_pts_info(st, 33, 1, st->codecpar->sample_rate);
164 } else if (!strcmp(name, "SAMPLE_WIDTH")) {
165 uint64_t bpc = var_read_int(pb, size) * (uint64_t)8;
166 if (bpc > 16)
167 return AVERROR_INVALIDDATA;
168 st->codecpar->bits_per_coded_sample = bpc;
169 } else
170 return AVERROR_INVALIDDATA;
171
172 return 0;
173 }
174
175 /**
176 * Parse video variable
177 * @return < 0 if unknown
178 */
parse_video_var(AVFormatContext * avctx,AVStream * st,const char * name,int size)179 static int parse_video_var(AVFormatContext *avctx, AVStream *st,
180 const char *name, int size)
181 {
182 AVIOContext *pb = avctx->pb;
183 if (!strcmp(name, "__DIR_COUNT")) {
184 st->nb_frames = st->duration = var_read_int(pb, size);
185 } else if (!strcmp(name, "COMPRESSION")) {
186 char *str = var_read_string(pb, size);
187 if (!str)
188 return AVERROR_INVALIDDATA;
189 if (!strcmp(str, "1")) {
190 st->codecpar->codec_id = AV_CODEC_ID_MVC1;
191 } else if (!strcmp(str, "2")) {
192 st->codecpar->format = AV_PIX_FMT_ABGR;
193 st->codecpar->codec_id = AV_CODEC_ID_RAWVIDEO;
194 } else if (!strcmp(str, "3")) {
195 st->codecpar->codec_id = AV_CODEC_ID_SGIRLE;
196 } else if (!strcmp(str, "10")) {
197 st->codecpar->codec_id = AV_CODEC_ID_MJPEG;
198 } else if (!strcmp(str, "MVC2")) {
199 st->codecpar->codec_id = AV_CODEC_ID_MVC2;
200 } else {
201 avpriv_request_sample(avctx, "Video compression %s", str);
202 }
203 av_free(str);
204 } else if (!strcmp(name, "FPS")) {
205 AVRational fps = var_read_float(pb, size);
206 avpriv_set_pts_info(st, 64, fps.den, fps.num);
207 st->avg_frame_rate = fps;
208 } else if (!strcmp(name, "HEIGHT")) {
209 st->codecpar->height = var_read_int(pb, size);
210 } else if (!strcmp(name, "PIXEL_ASPECT")) {
211 st->sample_aspect_ratio = var_read_float(pb, size);
212 av_reduce(&st->sample_aspect_ratio.num, &st->sample_aspect_ratio.den,
213 st->sample_aspect_ratio.num, st->sample_aspect_ratio.den,
214 INT_MAX);
215 } else if (!strcmp(name, "WIDTH")) {
216 st->codecpar->width = var_read_int(pb, size);
217 } else if (!strcmp(name, "ORIENTATION")) {
218 if (var_read_int(pb, size) == 1101) {
219 if (!st->codecpar->extradata) {
220 st->codecpar->extradata = av_strdup("BottomUp");
221 if (!st->codecpar->extradata)
222 return AVERROR(ENOMEM);
223 st->codecpar->extradata_size = 9;
224 }
225 }
226 } else if (!strcmp(name, "Q_SPATIAL") || !strcmp(name, "Q_TEMPORAL")) {
227 var_read_metadata(avctx, name, size);
228 } else if (!strcmp(name, "INTERLACING") || !strcmp(name, "PACKING")) {
229 avio_skip(pb, size); // ignore
230 } else
231 return AVERROR_INVALIDDATA;
232
233 return 0;
234 }
235
read_table(AVFormatContext * avctx,AVStream * st,int (* parse)(AVFormatContext * avctx,AVStream * st,const char * name,int size))236 static int read_table(AVFormatContext *avctx, AVStream *st,
237 int (*parse)(AVFormatContext *avctx, AVStream *st,
238 const char *name, int size))
239 {
240 unsigned count;
241 int i;
242
243 AVIOContext *pb = avctx->pb;
244 avio_skip(pb, 4);
245 count = avio_rb32(pb);
246 avio_skip(pb, 4);
247 for (i = 0; i < count; i++) {
248 char name[17];
249 int size;
250
251 if (avio_feof(pb))
252 return AVERROR_EOF;
253
254 avio_read(pb, name, 16);
255 name[sizeof(name) - 1] = 0;
256 size = avio_rb32(pb);
257 if (size < 0) {
258 av_log(avctx, AV_LOG_ERROR, "entry size %d is invalid\n", size);
259 return AVERROR_INVALIDDATA;
260 }
261 if (parse(avctx, st, name, size) < 0) {
262 avpriv_request_sample(avctx, "Variable %s", name);
263 avio_skip(pb, size);
264 }
265 }
266 return 0;
267 }
268
read_index(AVIOContext * pb,AVStream * st)269 static void read_index(AVIOContext *pb, AVStream *st)
270 {
271 uint64_t timestamp = 0;
272 int i;
273 for (i = 0; i < st->nb_frames; i++) {
274 uint32_t pos = avio_rb32(pb);
275 uint32_t size = avio_rb32(pb);
276 avio_skip(pb, 8);
277 if (avio_feof(pb))
278 return ;
279 av_add_index_entry(st, pos, timestamp, size, 0, AVINDEX_KEYFRAME);
280 if (st->codecpar->codec_type == AVMEDIA_TYPE_AUDIO) {
281 timestamp += size / (st->codecpar->channels * 2LL);
282 } else {
283 timestamp++;
284 }
285 }
286 }
287
mv_read_header(AVFormatContext * avctx)288 static int mv_read_header(AVFormatContext *avctx)
289 {
290 MvContext *mv = avctx->priv_data;
291 AVIOContext *pb = avctx->pb;
292 AVStream *ast = NULL, *vst = NULL; //initialization to suppress warning
293 int version, i;
294 int ret;
295
296 avio_skip(pb, 4);
297
298 version = avio_rb16(pb);
299 if (version == 2) {
300 uint64_t timestamp;
301 int v;
302 avio_skip(pb, 22);
303
304 /* allocate audio track first to prevent unnecessary seeking
305 * (audio packet always precede video packet for a given frame) */
306 ast = avformat_new_stream(avctx, NULL);
307 if (!ast)
308 return AVERROR(ENOMEM);
309
310 vst = avformat_new_stream(avctx, NULL);
311 if (!vst)
312 return AVERROR(ENOMEM);
313 avpriv_set_pts_info(vst, 64, 1, 15);
314 vst->codecpar->codec_type = AVMEDIA_TYPE_VIDEO;
315 vst->avg_frame_rate = av_inv_q(vst->time_base);
316 vst->nb_frames = avio_rb32(pb);
317 v = avio_rb32(pb);
318 switch (v) {
319 case 1:
320 vst->codecpar->codec_id = AV_CODEC_ID_MVC1;
321 break;
322 case 2:
323 vst->codecpar->format = AV_PIX_FMT_ARGB;
324 vst->codecpar->codec_id = AV_CODEC_ID_RAWVIDEO;
325 break;
326 default:
327 avpriv_request_sample(avctx, "Video compression %i", v);
328 break;
329 }
330 vst->codecpar->codec_tag = 0;
331 vst->codecpar->width = avio_rb32(pb);
332 vst->codecpar->height = avio_rb32(pb);
333 avio_skip(pb, 12);
334
335 ast->codecpar->codec_type = AVMEDIA_TYPE_AUDIO;
336 ast->nb_frames = vst->nb_frames;
337 ast->codecpar->sample_rate = avio_rb32(pb);
338 if (ast->codecpar->sample_rate <= 0) {
339 av_log(avctx, AV_LOG_ERROR, "Invalid sample rate %d\n", ast->codecpar->sample_rate);
340 return AVERROR_INVALIDDATA;
341 }
342 avpriv_set_pts_info(ast, 33, 1, ast->codecpar->sample_rate);
343 if (set_channels(avctx, ast, avio_rb32(pb)) < 0)
344 return AVERROR_INVALIDDATA;
345
346 v = avio_rb32(pb);
347 if (v == AUDIO_FORMAT_SIGNED) {
348 ast->codecpar->codec_id = AV_CODEC_ID_PCM_S16BE;
349 } else {
350 avpriv_request_sample(avctx, "Audio compression (format %i)", v);
351 }
352
353 avio_skip(pb, 12);
354 var_read_metadata(avctx, "title", 0x80);
355 var_read_metadata(avctx, "comment", 0x100);
356 avio_skip(pb, 0x80);
357
358 timestamp = 0;
359 for (i = 0; i < vst->nb_frames; i++) {
360 uint32_t pos = avio_rb32(pb);
361 uint32_t asize = avio_rb32(pb);
362 uint32_t vsize = avio_rb32(pb);
363 if (avio_feof(pb))
364 return AVERROR_INVALIDDATA;
365 avio_skip(pb, 8);
366 av_add_index_entry(ast, pos, timestamp, asize, 0, AVINDEX_KEYFRAME);
367 av_add_index_entry(vst, pos + asize, i, vsize, 0, AVINDEX_KEYFRAME);
368 timestamp += asize / (ast->codecpar->channels * 2LL);
369 }
370 } else if (!version && avio_rb16(pb) == 3) {
371 avio_skip(pb, 4);
372
373 if ((ret = read_table(avctx, NULL, parse_global_var)) < 0)
374 return ret;
375
376 if (mv->nb_audio_tracks < 0 || mv->nb_video_tracks < 0 ||
377 (mv->nb_audio_tracks == 0 && mv->nb_video_tracks == 0)) {
378 av_log(avctx, AV_LOG_ERROR, "Stream count is invalid.\n");
379 return AVERROR_INVALIDDATA;
380 }
381
382 if (mv->nb_audio_tracks > 1) {
383 avpriv_request_sample(avctx, "Multiple audio streams support");
384 return AVERROR_PATCHWELCOME;
385 } else if (mv->nb_audio_tracks) {
386 ast = avformat_new_stream(avctx, NULL);
387 if (!ast)
388 return AVERROR(ENOMEM);
389 ast->codecpar->codec_type = AVMEDIA_TYPE_AUDIO;
390 if ((read_table(avctx, ast, parse_audio_var)) < 0)
391 return ret;
392 if (mv->acompression == 100 &&
393 mv->aformat == AUDIO_FORMAT_SIGNED &&
394 ast->codecpar->bits_per_coded_sample == 16) {
395 ast->codecpar->codec_id = AV_CODEC_ID_PCM_S16BE;
396 } else {
397 avpriv_request_sample(avctx,
398 "Audio compression %i (format %i, sr %i)",
399 mv->acompression, mv->aformat,
400 ast->codecpar->bits_per_coded_sample);
401 ast->codecpar->codec_id = AV_CODEC_ID_NONE;
402 }
403 if (ast->codecpar->channels <= 0) {
404 av_log(avctx, AV_LOG_ERROR, "No valid channel count found.\n");
405 return AVERROR_INVALIDDATA;
406 }
407 }
408
409 if (mv->nb_video_tracks > 1) {
410 avpriv_request_sample(avctx, "Multiple video streams support");
411 return AVERROR_PATCHWELCOME;
412 } else if (mv->nb_video_tracks) {
413 vst = avformat_new_stream(avctx, NULL);
414 if (!vst)
415 return AVERROR(ENOMEM);
416 vst->codecpar->codec_type = AVMEDIA_TYPE_VIDEO;
417 if ((ret = read_table(avctx, vst, parse_video_var))<0)
418 return ret;
419 }
420
421 if (mv->nb_audio_tracks)
422 read_index(pb, ast);
423
424 if (mv->nb_video_tracks)
425 read_index(pb, vst);
426 } else {
427 avpriv_request_sample(avctx, "Version %i", version);
428 return AVERROR_PATCHWELCOME;
429 }
430
431 return 0;
432 }
433
mv_read_packet(AVFormatContext * avctx,AVPacket * pkt)434 static int mv_read_packet(AVFormatContext *avctx, AVPacket *pkt)
435 {
436 MvContext *mv = avctx->priv_data;
437 AVIOContext *pb = avctx->pb;
438 AVStream *st = avctx->streams[mv->stream_index];
439 const AVIndexEntry *index;
440 int frame = mv->frame[mv->stream_index];
441 int64_t ret;
442 uint64_t pos;
443
444 if (frame < st->nb_index_entries) {
445 index = &st->index_entries[frame];
446 pos = avio_tell(pb);
447 if (index->pos > pos)
448 avio_skip(pb, index->pos - pos);
449 else if (index->pos < pos) {
450 if (!(pb->seekable & AVIO_SEEKABLE_NORMAL))
451 return AVERROR(EIO);
452 ret = avio_seek(pb, index->pos, SEEK_SET);
453 if (ret < 0)
454 return ret;
455 }
456 ret = av_get_packet(pb, pkt, index->size);
457 if (ret < 0)
458 return ret;
459
460 pkt->stream_index = mv->stream_index;
461 pkt->pts = index->timestamp;
462 pkt->flags |= AV_PKT_FLAG_KEY;
463
464 mv->frame[mv->stream_index]++;
465 mv->eof_count = 0;
466 } else {
467 mv->eof_count++;
468 if (mv->eof_count >= avctx->nb_streams)
469 return AVERROR_EOF;
470
471 // avoid returning 0 without a packet
472 return AVERROR(EAGAIN);
473 }
474
475 mv->stream_index++;
476 if (mv->stream_index >= avctx->nb_streams)
477 mv->stream_index = 0;
478
479 return 0;
480 }
481
mv_read_seek(AVFormatContext * avctx,int stream_index,int64_t timestamp,int flags)482 static int mv_read_seek(AVFormatContext *avctx, int stream_index,
483 int64_t timestamp, int flags)
484 {
485 MvContext *mv = avctx->priv_data;
486 AVStream *st = avctx->streams[stream_index];
487 int frame, i;
488
489 if ((flags & AVSEEK_FLAG_FRAME) || (flags & AVSEEK_FLAG_BYTE))
490 return AVERROR(ENOSYS);
491
492 if (!(avctx->pb->seekable & AVIO_SEEKABLE_NORMAL))
493 return AVERROR(EIO);
494
495 frame = av_index_search_timestamp(st, timestamp, flags);
496 if (frame < 0)
497 return AVERROR_INVALIDDATA;
498
499 for (i = 0; i < avctx->nb_streams; i++)
500 mv->frame[i] = frame;
501 return 0;
502 }
503
504 AVInputFormat ff_mv_demuxer = {
505 .name = "mv",
506 .long_name = NULL_IF_CONFIG_SMALL("Silicon Graphics Movie"),
507 .priv_data_size = sizeof(MvContext),
508 .read_probe = mv_probe,
509 .read_header = mv_read_header,
510 .read_packet = mv_read_packet,
511 .read_seek = mv_read_seek,
512 };
513