1 /*****************************************************************************
2 * mpegvideo.c: parse and packetize an MPEG1/2 video stream
3 *****************************************************************************
4 * Copyright (C) 2001, 2002 VideoLAN
7 * Authors: Laurent Aimar <fenrir@via.ecp.fr>
8 * Eric Petit <titer@videolan.org>
9 * Gildas Bazin <gbazin@netcourrier.com>
11 * This program is free software; you can redistribute it and/or modify
12 * it under the terms of the GNU General Public License as published by
13 * the Free Software Foundation; either version 2 of the License, or
14 * (at your option) any later version.
16 * This program is distributed in the hope that it will be useful,
17 * but WITHOUT ANY WARRANTY; without even the implied warranty of
18 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
19 * GNU General Public License for more details.
21 * You should have received a copy of the GNU General Public License
22 * along with this program; if not, write to the Free Software
23 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111, USA.
24 *****************************************************************************/
26 /*****************************************************************************
27 * Problem with this implementation:
29 * Although we should time-stamp each picture with a PTS, this isn't possible
30 * with the current implementation.
31 * The problem comes from the fact that for non-low-delay streams we can't
32 * calculate the PTS of pictures used as backward reference. Even the temporal
33 * reference number doesn't help here because all the pictures don't
34 * necessarily have the same duration (eg. 3:2 pulldown).
36 * However this doesn't really matter as far as the MPEG muxers are concerned
37 * because they allow having empty PTS fields. --gibalou
38 *****************************************************************************/
40 /*****************************************************************************
42 *****************************************************************************/
43 #include <stdlib.h> /* malloc(), free() */
46 #include <vlc/decoder.h>
47 #include <vlc/input.h>
49 #include "vlc_block_helper.h"
51 /*****************************************************************************
53 *****************************************************************************/
54 static int Open ( vlc_object_t * );
55 static void Close( vlc_object_t * );
58 set_description( _("MPEG-I/II video packetizer") );
59 set_capability( "packetizer", 50 );
60 set_callbacks( Open, Close );
63 /*****************************************************************************
65 *****************************************************************************/
66 static block_t *Packetize( decoder_t *, block_t ** );
67 static block_t *ParseMPEGBlock( decoder_t *, block_t * );
74 block_bytestream_t bytestream;
77 uint8_t p_startcode[3];
79 /* Sequence header and extension */
83 /* Current frame being built */
85 vlc_bool_t b_frame_slice;
89 /* Sequence properties */
91 int i_frame_rate_base;
92 vlc_bool_t b_seq_progressive;
93 vlc_bool_t b_low_delay;
94 int i_aspect_ratio_info;
97 /* Picture properties */
100 int i_picture_structure;
101 int i_top_field_first;
102 int i_repeat_first_field;
103 int i_progressive_frame;
105 mtime_t i_interpolated_dts;
106 mtime_t i_old_duration;
107 mtime_t i_last_ref_pts;
109 /* Number of pictures since last sequence header */
119 /*****************************************************************************
121 *****************************************************************************/
122 static int Open( vlc_object_t *p_this )
124 decoder_t *p_dec = (decoder_t*)p_this;
125 decoder_sys_t *p_sys;
127 if( p_dec->fmt_in.i_codec != VLC_FOURCC( 'm', 'p', 'g', '1' ) &&
128 p_dec->fmt_in.i_codec != VLC_FOURCC( 'm', 'p', 'g', '2' ) &&
129 p_dec->fmt_in.i_codec != VLC_FOURCC( 'm', 'p', 'g', 'v' ) )
134 es_format_Init( &p_dec->fmt_out, VIDEO_ES, VLC_FOURCC('m','p','g','v') );
135 p_dec->pf_packetize = Packetize;
137 p_dec->p_sys = p_sys = malloc( sizeof( decoder_sys_t ) );
140 p_sys->i_state = STATE_NOSYNC;
141 p_sys->bytestream = block_BytestreamInit( p_dec );
142 p_sys->p_startcode[0] = 0;
143 p_sys->p_startcode[1] = 0;
144 p_sys->p_startcode[2] = 1;
149 p_sys->p_frame = NULL;
150 p_sys->b_frame_slice = VLC_FALSE;
152 p_sys->i_dts = p_sys->i_pts = 0;
154 p_sys->i_frame_rate = 1;
155 p_sys->i_frame_rate_base = 1;
156 p_sys->b_seq_progressive = VLC_TRUE;
157 p_sys->b_low_delay = VLC_TRUE;
158 p_sys->i_seq_old = 0;
160 p_sys->i_temporal_ref = 0;
161 p_sys->i_picture_type = 0;
162 p_sys->i_picture_structure = 0x03; /* frame */
163 p_sys->i_top_field_first = 0;
164 p_sys->i_repeat_first_field = 0;
165 p_sys->i_progressive_frame = 0;
168 p_sys->i_interpolated_dts = 0;
169 p_sys->i_old_duration = 0;
170 p_sys->i_last_ref_pts = 0;
175 /*****************************************************************************
177 *****************************************************************************/
178 static void Close( vlc_object_t *p_this )
180 decoder_t *p_dec = (decoder_t*)p_this;
181 decoder_sys_t *p_sys = p_dec->p_sys;
183 block_BytestreamRelease( &p_sys->bytestream );
187 block_Release( p_sys->p_seq );
191 block_Release( p_sys->p_ext );
195 block_ChainRelease( p_sys->p_frame );
201 /*****************************************************************************
203 *****************************************************************************/
204 static block_t *Packetize( decoder_t *p_dec, block_t **pp_block )
206 decoder_sys_t *p_sys = p_dec->p_sys;
209 if( pp_block == NULL || *pp_block == NULL )
214 if( (*pp_block)->i_flags & BLOCK_FLAG_DISCONTINUITY )
216 p_sys->i_state = STATE_NOSYNC;
217 if( p_sys->p_frame ) block_ChainRelease( p_sys->p_frame );
218 p_sys->p_frame = NULL;
219 p_sys->b_frame_slice = VLC_FALSE;
220 block_Release( *pp_block );
224 block_BytestreamPush( &p_sys->bytestream, *pp_block );
228 switch( p_sys->i_state )
232 if( block_FindStartcodeFromOffset( &p_sys->bytestream,
233 &p_sys->i_offset, p_sys->p_startcode, 3 ) == VLC_SUCCESS )
235 p_sys->i_state = STATE_NEXT_SYNC;
238 if( p_sys->i_offset )
240 block_SkipBytes( &p_sys->bytestream, p_sys->i_offset );
242 block_BytestreamFlush( &p_sys->bytestream );
245 if( p_sys->i_state != STATE_NEXT_SYNC )
251 p_sys->i_offset = 1; /* To find next startcode */
253 case STATE_NEXT_SYNC:
254 /* TODO: If p_block == NULL, flush the buffer without checking the
257 /* Find the next startcode */
258 if( block_FindStartcodeFromOffset( &p_sys->bytestream,
259 &p_sys->i_offset, p_sys->p_startcode, 3 ) != VLC_SUCCESS )
265 /* Get the new fragment and set the pts/dts */
266 p_pic = block_New( p_dec, p_sys->i_offset );
267 p_pic->i_pts = p_sys->bytestream.p_block->i_pts;
268 p_pic->i_dts = p_sys->bytestream.p_block->i_dts;
270 block_GetBytes( &p_sys->bytestream, p_pic->p_buffer,
273 /* don't reuse the same timestamps several times */
274 if( p_pic->i_buffer >= 4 && p_pic->p_buffer[3] == 0x00 )
276 /* We have a picture start code */
277 p_sys->bytestream.p_block->i_pts = 0;
278 p_sys->bytestream.p_block->i_dts = 0;
283 /* Get picture if any */
284 if( !( p_pic = ParseMPEGBlock( p_dec, p_pic ) ) )
286 p_sys->i_state = STATE_NOSYNC;
290 /* We've just started the stream, wait for the first PTS.
291 * We discard here so we can still get the sequence header. */
292 if( p_sys->i_dts <= 0 && p_sys->i_pts <= 0 &&
293 p_sys->i_interpolated_dts <= 0 )
295 msg_Dbg( p_dec, "need a starting pts/dts" );
296 p_sys->i_state = STATE_NOSYNC;
297 block_Release( p_pic );
301 /* When starting the stream we can have the first frame with
302 * a null DTS (i_interpolated_pts is initialized to 0) */
303 if( !p_pic->i_dts ) p_pic->i_dts = p_pic->i_pts;
305 /* So p_block doesn't get re-added several times */
306 *pp_block = block_BytestreamPop( &p_sys->bytestream );
308 p_sys->i_state = STATE_NOSYNC;
315 /*****************************************************************************
316 * ParseMPEGBlock: Re-assemble fragments into a block containing a picture
317 *****************************************************************************/
318 static block_t *ParseMPEGBlock( decoder_t *p_dec, block_t *p_frag )
320 decoder_sys_t *p_sys = p_dec->p_sys;
321 block_t *p_pic = NULL;
324 * Check if previous picture is finished
326 if( ( p_sys->b_frame_slice &&
327 (p_frag->p_buffer[3] == 0x00 || p_frag->p_buffer[3] > 0xaf) ) &&
328 p_sys->p_seq == NULL )
330 /* We have a picture but without a sequence header we can't
332 msg_Dbg( p_dec, "waiting for sequence start" );
333 if( p_sys->p_frame ) block_ChainRelease( p_sys->p_frame );
334 p_sys->p_frame = NULL;
335 p_sys->b_frame_slice = VLC_FALSE;
338 else if( p_sys->b_frame_slice &&
339 (p_frag->p_buffer[3] == 0x00 || p_frag->p_buffer[3] > 0xaf) )
343 p_pic = block_ChainGather( p_sys->p_frame );
345 i_duration = (mtime_t)( 1000000 * p_sys->i_frame_rate_base /
346 p_sys->i_frame_rate );
348 if( !p_sys->b_seq_progressive && p_sys->i_picture_structure != 0x03 )
353 if( p_sys->b_seq_progressive )
355 if( p_sys->i_top_field_first == 0 &&
356 p_sys->i_repeat_first_field == 1 )
360 else if( p_sys->i_top_field_first == 1 &&
361 p_sys->i_repeat_first_field == 1 )
368 if( p_sys->i_picture_structure == 0x03 )
370 if( p_sys->i_progressive_frame && p_sys->i_repeat_first_field )
372 i_duration += i_duration / 2;
377 if( p_sys->b_low_delay || p_sys->i_picture_type == 0x03 )
379 /* Trivial case (DTS == PTS) */
380 /* Correct interpolated dts when we receive a new pts/dts */
381 if( p_sys->i_pts > 0 ) p_sys->i_interpolated_dts = p_sys->i_pts;
382 if( p_sys->i_dts > 0 ) p_sys->i_interpolated_dts = p_sys->i_dts;
386 /* Correct interpolated dts when we receive a new pts/dts */
387 if( p_sys->i_last_ref_pts > 0 )
388 p_sys->i_interpolated_dts = p_sys->i_last_ref_pts;
389 if( p_sys->i_dts > 0 ) p_sys->i_interpolated_dts = p_sys->i_dts;
391 p_sys->i_last_ref_pts = p_sys->i_pts;
394 p_pic->i_dts = p_sys->i_interpolated_dts;
396 /* Set PTS only if we have a B frame or if it comes from the stream */
397 if( p_sys->i_pts > 0 )
399 p_pic->i_pts = p_sys->i_pts;
401 else if( p_sys->i_picture_type == 0x03 )
403 p_pic->i_pts = p_pic->i_dts;
410 if( p_sys->b_low_delay || p_sys->i_picture_type == 0x03 )
412 /* Trivial case (DTS == PTS) */
413 p_sys->i_interpolated_dts += i_duration;
417 p_sys->i_interpolated_dts += p_sys->i_old_duration;
418 p_sys->i_old_duration = i_duration;
421 switch ( p_sys->i_picture_type )
424 p_pic->i_flags |= BLOCK_FLAG_TYPE_I;
427 p_pic->i_flags |= BLOCK_FLAG_TYPE_P;
430 p_pic->i_flags |= BLOCK_FLAG_TYPE_B;
434 p_pic->i_length = p_sys->i_interpolated_dts - p_pic->i_dts;
437 msg_Dbg( p_dec, "pic: type=%d dts="I64Fd" pts-dts="I64Fd,
438 p_sys->i_picture_type, p_pic->i_dts, p_pic->i_pts - p_pic->i_dts);
442 p_sys->p_frame = NULL;
443 p_sys->b_frame_slice = VLC_FALSE;
447 * Check info of current fragment
449 if( p_frag->p_buffer[3] == 0xb8 )
451 /* Group start code */
453 p_sys->i_seq_old > p_sys->i_frame_rate/p_sys->i_frame_rate_base )
455 /* Usefull for mpeg1: repeat sequence header every second */
456 block_ChainAppend( &p_sys->p_frame,
457 block_Duplicate( p_sys->p_seq ) );
460 block_ChainAppend( &p_sys->p_frame,
461 block_Duplicate( p_sys->p_ext ) );
464 p_sys->i_seq_old = 0;
467 else if( p_frag->p_buffer[3] == 0xb3 && p_frag->i_buffer >= 8 )
469 /* Sequence header code */
470 static const int code_to_frame_rate[16][2] =
472 { 1, 1 }, /* invalid */
473 { 24000, 1001 }, { 24, 1 }, { 25, 1 }, { 30000, 1001 },
474 { 30, 1 }, { 50, 1 }, { 60000, 1001 }, { 60, 1 },
475 /* Unofficial 15fps from Xing*/
477 /* Unofficial economy rates from libmpeg3 */
478 { 5, 1001 }, { 10, 1001 }, { 12, 1001 }, { 15, 1001 },
479 { 1, 1 }, { 1, 1 } /* invalid */
482 if( p_sys->p_seq ) block_Release( p_sys->p_seq );
483 if( p_sys->p_ext ) block_Release( p_sys->p_ext );
485 p_sys->p_seq = block_Duplicate( p_frag );
486 p_sys->i_seq_old = 0;
489 p_dec->fmt_out.video.i_width =
490 ( p_frag->p_buffer[4] << 4)|(p_frag->p_buffer[5] >> 4 );
491 p_dec->fmt_out.video.i_height =
492 ( (p_frag->p_buffer[5]&0x0f) << 8 )|p_frag->p_buffer[6];
493 p_sys->i_aspect_ratio_info = p_frag->p_buffer[7] >> 4;
495 /* TODO: MPEG1 aspect ratio */
497 p_sys->i_frame_rate = code_to_frame_rate[p_frag->p_buffer[7]&0x0f][0];
498 p_sys->i_frame_rate_base =
499 code_to_frame_rate[p_frag->p_buffer[7]&0x0f][1];
501 p_sys->b_seq_progressive = VLC_TRUE;
502 p_sys->b_low_delay = VLC_TRUE;
504 if ( !p_sys->b_inited )
506 msg_Dbg( p_dec, "Size %dx%d fps=%.3f",
507 p_dec->fmt_out.video.i_width, p_dec->fmt_out.video.i_height,
508 p_sys->i_frame_rate / (float)p_sys->i_frame_rate_base );
512 else if( p_frag->p_buffer[3] == 0xb5 )
514 int i_type = p_frag->p_buffer[4] >> 4;
516 /* Extention start code */
519 static const int mpeg2_aspect[16][2] =
521 {0,1}, {1,1}, {4,3}, {16,9}, {221,100},
522 {0,1}, {0,1}, {0,1}, {0,1}, {0,1}, {0,1}, {0,1}, {0,1}, {0,1},
526 /* sequence extention */
527 if( p_sys->p_ext) block_Release( p_sys->p_ext );
528 p_sys->p_ext = block_Duplicate( p_frag );
530 if( p_frag->i_buffer >= 10 )
532 p_sys->b_seq_progressive =
533 p_frag->p_buffer[5]&0x08 ? VLC_TRUE : VLC_FALSE;
535 p_frag->p_buffer[9]&0x80 ? VLC_TRUE : VLC_FALSE;
538 p_dec->fmt_out.video.i_aspect =
539 mpeg2_aspect[p_sys->i_aspect_ratio_info][0] *
541 mpeg2_aspect[p_sys->i_aspect_ratio_info][1];
544 else if( i_type == 0x08 )
546 /* picture extention */
547 p_sys->i_picture_structure = p_frag->p_buffer[6]&0x03;
548 p_sys->i_top_field_first = p_frag->p_buffer[7] >> 7;
549 p_sys->i_repeat_first_field= (p_frag->p_buffer[7]>>1)&0x01;
550 p_sys->i_progressive_frame = p_frag->p_buffer[8] >> 7;
553 else if( p_frag->p_buffer[3] == 0x00 )
555 /* Picture start code */
558 if( p_frag->i_buffer >= 6 )
560 p_sys->i_temporal_ref =
561 ( p_frag->p_buffer[4] << 2 )|(p_frag->p_buffer[5] >> 6);
562 p_sys->i_picture_type = ( p_frag->p_buffer[5] >> 3 ) & 0x03;
565 p_sys->i_dts = p_frag->i_dts;
566 p_sys->i_pts = p_frag->i_pts;
568 else if( p_frag->p_buffer[3] >= 0x01 && p_frag->p_buffer[3] <= 0xaf )
570 /* Slice start code */
571 p_sys->b_frame_slice = VLC_TRUE;
574 /* Append the block */
575 block_ChainAppend( &p_sys->p_frame, p_frag );