1 /*****************************************************************************
3 *****************************************************************************
4 * Copyright (C) 2001, 2002 VideoLAN
5 * $Id: mpeg4video.c,v 1.8 2003/03/11 19:02:31 fenrir Exp $
7 * Authors: Laurent Aimar <fenrir@via.ecp.fr>
8 * Eric Petit <titer@videolan.org>
10 * This program is free software; you can redistribute it and/or modify
11 * it under the terms of the GNU General Public License as published by
12 * the Free Software Foundation; either version 2 of the License, or
13 * (at your option) any later version.
15 * This program is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 * GNU General Public License for more details.
20 * You should have received a copy of the GNU General Public License
21 * along with this program; if not, write to the Free Software
22 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111, USA.
23 *****************************************************************************/
25 /*****************************************************************************
27 *****************************************************************************/
30 #include <vlc/decoder.h>
31 #include <vlc/input.h>
34 #include <stdlib.h> /* malloc(), free() */
35 #include <string.h> /* strdup() */
39 /*****************************************************************************
41 *****************************************************************************/
42 typedef struct packetizer_thread_s
44 /* Input properties */
45 decoder_fifo_t *p_fifo;
47 /* Output properties */
48 sout_packetizer_input_t *p_sout_input;
49 sout_packet_format_t output_format;
56 } packetizer_thread_t;
58 static int Open ( vlc_object_t * );
59 static int Run ( decoder_fifo_t * );
61 static int InitThread ( packetizer_thread_t * );
62 static void PacketizeThread ( packetizer_thread_t * );
63 static void EndThread ( packetizer_thread_t * );
66 static void input_ShowPES( decoder_fifo_t *p_fifo, pes_packet_t **pp_pes );
68 /*****************************************************************************
70 *****************************************************************************/
73 set_description( _("MPEG4 Video packetizer") );
74 set_capability( "packetizer", 50 );
75 set_callbacks( Open, NULL );
78 #define VIDEO_OBJECT_MASK 0x01f
79 #define VIDEO_OBJECT_LAYER_MASK 0x00f
81 #define VIDEO_OBJECT_START_CODE 0x100
82 #define VIDEO_OBJECT_LAYER_START_CODE 0x120
83 #define VISUAL_OBJECT_SEQUENCE_START_CODE 0x1b0
84 #define VISUAL_OBJECT_SEQUENCE_END_CODE 0x1b1
85 #define USER_DATA_START_CODE 0x1b2
86 #define GROUP_OF_VOP_START_CODE 0x1b3
87 #define VIDEO_SESSION_ERROR_CODE 0x1b4
88 #define VISUAL_OBJECT_START_CODE 0x1b5
89 #define VOP_START_CODE 0x1b6
90 #define FACE_OBJECT_START_CODE 0x1ba
91 #define FACE_OBJECT_PLANE_START_CODE 0x1bb
92 #define MESH_OBJECT_START_CODE 0x1bc
93 #define MESH_OBJECT_PLANE_START_CODE 0x1bd
94 #define STILL_TEXTURE_OBJECT_START_CODE 0x1be
95 #define TEXTURE_SPATIAL_LAYER_START_CODE 0x1bf
96 #define TEXTURE_SNR_LAYER_START_CODE 0x1c0
99 /*****************************************************************************
100 * OpenDecoder: probe the packetizer and return score
101 *****************************************************************************
102 * Tries to launch a decoder and return score so that the interface is able
104 *****************************************************************************/
105 static int Open( vlc_object_t *p_this )
107 decoder_fifo_t *p_fifo = (decoder_fifo_t*) p_this;
109 p_fifo->pf_run = Run;
111 switch( p_fifo->i_fourcc )
113 case VLC_FOURCC( 'm', '4', 's', '2'):
114 case VLC_FOURCC( 'M', '4', 'S', '2'):
115 case VLC_FOURCC( 'm', 'p', '4', 's'):
116 case VLC_FOURCC( 'M', 'P', '4', 'S'):
117 case VLC_FOURCC( 'm', 'p', '4', 'v'):
118 case VLC_FOURCC( 'D', 'I', 'V', 'X'):
119 case VLC_FOURCC( 'd', 'i', 'v', 'x'):
120 case VLC_FOURCC( 'X', 'V', 'I', 'D'):
121 case VLC_FOURCC( 'X', 'v', 'i', 'D'):
122 case VLC_FOURCC( 'x', 'v', 'i', 'd'):
123 case VLC_FOURCC( 'D', 'X', '5', '0'):
124 case VLC_FOURCC( 0x04, 0, 0, 0):
125 case VLC_FOURCC( '3', 'I', 'V', '2'):
133 /*****************************************************************************
134 * RunDecoder: this function is called just after the thread is created
135 *****************************************************************************/
136 static int Run( decoder_fifo_t *p_fifo )
138 packetizer_thread_t *p_pack;
141 msg_Info( p_fifo, "Running MPEG4 Video packetizer" );
142 if( !( p_pack = malloc( sizeof( packetizer_thread_t ) ) ) )
144 msg_Err( p_fifo, "out of memory" );
145 DecoderError( p_fifo );
148 memset( p_pack, 0, sizeof( packetizer_thread_t ) );
150 p_pack->p_fifo = p_fifo;
152 if( InitThread( p_pack ) != 0 )
154 DecoderError( p_fifo );
158 while( ( !p_pack->p_fifo->b_die )&&( !p_pack->p_fifo->b_error ) )
160 PacketizeThread( p_pack );
164 if( ( b_error = p_pack->p_fifo->b_error ) )
166 DecoderError( p_pack->p_fifo );
179 #define FREE( p ) if( p ) free( p ); p = NULL
181 /*****************************************************************************
182 * InitThread: initialize data before entering main loop
183 *****************************************************************************/
185 static int InitThread( packetizer_thread_t *p_pack )
187 BITMAPINFOHEADER *p_bih;
189 p_bih = (BITMAPINFOHEADER*)p_pack->p_fifo->p_bitmapinfoheader;
191 if( p_bih && p_bih->biSize > sizeof( BITMAPINFOHEADER ) )
194 p_pack->i_vol = p_bih->biSize - sizeof( BITMAPINFOHEADER );
195 p_pack->p_vol = malloc( p_pack->i_vol );
196 memcpy( p_pack->p_vol, &p_bih[1], p_pack->i_vol );
198 /* create stream input output */
199 p_pack->output_format.i_cat = VIDEO_ES;
200 p_pack->output_format.i_fourcc = VLC_FOURCC( 'm', 'p', '4', 'v' );
201 p_pack->output_format.p_format = malloc( p_bih->biSize );
202 memcpy( p_pack->output_format.p_format, p_bih, p_bih->biSize );
204 msg_Warn( p_pack->p_fifo, "opening with vol size:%d", p_pack->i_vol );
205 p_pack->p_sout_input =
206 sout_InputNew( p_pack->p_fifo,
207 &p_pack->output_format );
213 p_pack->output_format.i_cat = UNKNOWN_ES;
214 p_pack->output_format.i_fourcc = VLC_FOURCC( 'n', 'u', 'l', 'l' );
215 p_pack->output_format.p_format = NULL;
217 p_pack->p_sout_input =
218 sout_InputNew( p_pack->p_fifo,
219 &p_pack->output_format );
222 if( !p_pack->p_sout_input )
224 msg_Err( p_pack->p_fifo, "cannot add a new stream" );
227 p_pack->i_pts_start = -1;
231 static int m4v_FindStartCode( uint8_t **pp_data, uint8_t *p_end )
233 for( ; *pp_data < p_end - 4; (*pp_data)++ )
235 if( (*pp_data)[0] == 0 && (*pp_data)[1] == 0 && (*pp_data)[2] == 1 )
240 fprintf( stderr, "\n********* cannot find startcode\n" );
243 /*****************************************************************************
244 * PacketizeThread: packetize an unit (here copy a complete pes)
245 *****************************************************************************/
246 static void PacketizeThread( packetizer_thread_t *p_pack )
248 sout_buffer_t *p_sout_buffer;
252 /* **** get samples count **** */
253 input_ExtractPES( p_pack->p_fifo, &p_pes );
256 p_pack->p_fifo->b_error = 1;
259 if( p_pack->i_pts_start < 0 )
261 p_pack->i_pts_start = p_pes->i_pts;
264 i_size = p_pes->i_pes_size;
267 pes_packet_t *p_pes_next;
268 data_packet_t *p_data;
272 sout_BufferNew( p_pack->p_sout_input->p_sout, i_size );
275 p_pack->p_fifo->b_error = 1;
278 /* TODO: memcpy of the pes packet */
279 for( i_buffer = 0, p_data = p_pes->p_first;
280 p_data != NULL && i_buffer < i_size;
281 p_data = p_data->p_next)
285 i_copy = __MIN( p_data->p_payload_end - p_data->p_payload_start,
289 p_pack->p_fifo->p_vlc->pf_memcpy( p_sout_buffer->p_buffer + i_buffer,
290 p_data->p_payload_start,
295 p_sout_buffer->i_length = 0;
296 p_sout_buffer->i_dts = p_pes->i_pts - p_pack->i_pts_start;
297 p_sout_buffer->i_pts = p_pes->i_pts - p_pack->i_pts_start;
298 p_sout_buffer->i_bitrate = 0;
300 if( p_pack->p_vol == NULL )
302 uint8_t *p_vol_begin, *p_vol_end, *p_end;
303 /* search if p_sout_buffer contains with a vol */
304 p_vol_begin = p_sout_buffer->p_buffer;
306 p_end = p_sout_buffer->p_buffer + p_sout_buffer->i_size;
310 if( m4v_FindStartCode( &p_vol_begin, p_end ) )
314 msg_Dbg( p_pack->p_fifo,
315 "starcode 0x%2.2x%2.2x%2.2x%2.2x",
316 p_vol_begin[0], p_vol_begin[1], p_vol_begin[2], p_vol_begin[3] );
318 if( ( p_vol_begin[3] & ~VIDEO_OBJECT_MASK ) == ( VIDEO_OBJECT_START_CODE&0xff ) )
320 p_vol_end = p_vol_begin + 4;
321 if( m4v_FindStartCode( &p_vol_end, p_end ) )
325 if( ( p_vol_end[3] & ~VIDEO_OBJECT_LAYER_MASK ) == ( VIDEO_OBJECT_LAYER_START_CODE&0xff ) )
328 if( m4v_FindStartCode( &p_vol_end, p_end ) )
338 else if( ( p_vol_begin[3] & ~VIDEO_OBJECT_LAYER_MASK ) == ( VIDEO_OBJECT_LAYER_START_CODE&0xff) )
340 p_vol_end = p_vol_begin + 4;
341 if( m4v_FindStartCode( &p_vol_end, p_end ) )
347 if( p_vol_end != NULL && p_vol_begin < p_vol_end )
349 BITMAPINFOHEADER *p_bih;
351 p_pack->i_vol = p_vol_end - p_vol_begin;
352 msg_Dbg( p_pack->p_fifo, "Reopening output" );
354 p_pack->p_vol = malloc( p_pack->i_vol );
355 memcpy( p_pack->p_vol, p_vol_begin, p_pack->i_vol );
357 sout_InputDelete( p_pack->p_sout_input );
359 p_pack->output_format.i_cat = VIDEO_ES;
360 p_pack->output_format.i_fourcc = VLC_FOURCC( 'm', 'p', '4', 'v' );
361 p_pack->output_format.p_format =
362 (void*)p_bih = malloc( sizeof( BITMAPINFOHEADER ) + p_pack->i_vol);
364 p_bih->biSize = sizeof( BITMAPINFOHEADER ) + p_pack->i_vol;
368 p_bih->biBitCount = 24;
369 p_bih->biCompression = VLC_FOURCC( 'd', 'i', 'v', 'x' );
370 p_bih->biSizeImage = 0;
371 p_bih->biXPelsPerMeter = 0;
372 p_bih->biYPelsPerMeter = 0;
373 p_bih->biClrUsed = 0;
374 p_bih->biClrImportant = 0;
375 memcpy( &p_bih[1], p_pack->p_vol, p_pack->i_vol );
377 p_pack->p_sout_input =
378 sout_InputNew( p_pack->p_fifo,
379 &p_pack->output_format );
380 if( !p_pack->p_sout_input )
382 p_pack->p_fifo->b_error = 1;
395 input_ShowPES( p_pack->p_fifo, &p_pes_next );
400 i_gap = p_pes_next->i_pts - p_pes->i_pts;
402 if( i_gap > 1000000 / 4 ) // too littl fps < 4 is no sense
404 i_gap = 1000000 / 25;
405 p_pack->i_pts_start =
406 - ( p_pes->i_pts - p_pack->i_pts_start ) + p_pes_next->i_pts - i_gap;
411 p_pack->i_pts_start =
412 ( p_pes->i_pts - p_pack->i_pts_start ) + p_pes_next->i_pts;
417 msg_Dbg( p_pack->p_fifo, "pts:%lld next_pts:%lld", p_pes->i_pts, p_pes_next->i_pts );
418 /* work around for seek */
419 p_pack->i_pts_start -= i_gap;
422 // msg_Dbg( p_pack->p_fifo, "gap %lld date %lld next diff %lld", i_gap, p_pes->i_pts, p_pes_next->i_pts-p_pack->i_pts_start );
424 p_sout_buffer->i_length = i_gap;
426 sout_InputSendBuffer( p_pack->p_sout_input,
430 input_DeletePES( p_pack->p_fifo->p_packets_mgt, p_pes );
434 /*****************************************************************************
435 * EndThread : packetizer thread destruction
436 *****************************************************************************/
437 static void EndThread ( packetizer_thread_t *p_pack)
439 if( p_pack->p_sout_input )
441 sout_InputDelete( p_pack->p_sout_input );
445 static void input_ShowPES( decoder_fifo_t *p_fifo, pes_packet_t **pp_pes )
449 vlc_mutex_lock( &p_fifo->data_lock );
451 if( p_fifo->p_first == NULL )
455 vlc_mutex_unlock( &p_fifo->data_lock );
456 if( pp_pes ) *pp_pes = NULL;
460 /* Signal the input thread we're waiting. This is only
461 * needed in case of slave clock (ES plug-in) but it won't
463 vlc_cond_signal( &p_fifo->data_wait );
465 /* Wait for the input to tell us when we received a packet. */
466 vlc_cond_wait( &p_fifo->data_wait, &p_fifo->data_lock );
468 p_pes = p_fifo->p_first;
469 vlc_mutex_unlock( &p_fifo->data_lock );