X-Git-Url: https://git.sesse.net/?a=blobdiff_plain;f=src%2Finput%2Fmpeg_system.c;h=a630f8bb62e77946c9458020b45f79df74c9c258;hb=495436e7e14ef7a692124ce9ec8d1016a7dc18e1;hp=a4158dad38ecad68c0f9872823ae4eb0abc41005;hpb=ecff1e713f6962d45ff9a397e11410066eaa0ebe;p=vlc diff --git a/src/input/mpeg_system.c b/src/input/mpeg_system.c index a4158dad38..a630f8bb62 100644 --- a/src/input/mpeg_system.c +++ b/src/input/mpeg_system.c @@ -2,9 +2,13 @@ * mpeg_system.c: TS, PS and PES management ***************************************************************************** * Copyright (C) 1998, 1999, 2000 VideoLAN - * $Id: mpeg_system.c,v 1.26 2001/01/10 19:22:11 massiot Exp $ + * $Id: mpeg_system.c,v 1.54 2001/05/07 03:14:09 stef Exp $ * - * Authors: + * Authors: Christophe Massiot + * Michel Lespinasse + * BenoƮt Steiner + * Samuel Hocevar + * Henri Fallon * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by @@ -27,6 +31,8 @@ #include "defs.h" #include +#include /* memcpy(), memset() */ +#include /* off_t */ #include "config.h" #include "common.h" @@ -48,6 +54,8 @@ * Local prototypes *****************************************************************************/ +static void input_DecodePAT( input_thread_t *, es_descriptor_t *); +static void input_DecodePMT( input_thread_t *, es_descriptor_t *); /* * PES Packet management @@ -58,6 +66,7 @@ ***************************************************************************** * Small utility function used to parse discontinuous headers safely. Copies * i_buf_len bytes of data to a buffer and returns the size copied. + * It also solves some alignment problems on non-IA-32, non-PPC processors. * This is a variation on the theme of input_ext-dec.h:GetChunk(). *****************************************************************************/ static __inline__ size_t MoveChunk( byte_t * p_dest, @@ -133,14 +142,16 @@ void input_ParsePES( input_thread_t * p_input, es_descriptor_t * p_es ) if( MoveChunk( p_header, &p_data, &p_byte, PES_HEADER_SIZE ) != PES_HEADER_SIZE ) { - intf_WarnMsg( 3, "PES packet too short to have a header" ); - p_input->p_plugin->pf_delete_pes( p_input->p_method_data, p_pes ); + intf_WarnMsg( 1, "PES packet too short to have a header" ); + p_input->pf_delete_pes( p_input->p_method_data, p_pes ); p_pes = NULL; return; } /* Get the PES size if defined */ - p_es->i_pes_real_size = U16_AT(p_header + 4) + 6; + p_es->i_pes_real_size = U16_AT(p_header + 4); + if( p_es->i_pes_real_size ) + p_es->i_pes_real_size += 6; /* First read the 6 header bytes common to all PES packets: * use them to test the PES validity */ @@ -148,7 +159,7 @@ void input_ParsePES( input_thread_t * p_input, es_descriptor_t * p_es ) { /* packet_start_code_prefix != 0x000001 */ intf_ErrMsg( "PES packet doesn't start with 0x000001 : data loss" ); - p_input->p_plugin->pf_delete_pes( p_input->p_method_data, p_pes ); + p_input->pf_delete_pes( p_input->p_method_data, p_pes ); p_pes = NULL; } else @@ -160,8 +171,7 @@ void input_ParsePES( input_thread_t * p_input, es_descriptor_t * p_es ) { /* PES_packet_length is set and != total received payload */ /* Warn the decoder that the data may be corrupt. */ - intf_WarnMsg( 3, "PES sizes do not match : packet corrupted" ); - p_pes->b_messed_up = 1; + intf_WarnMsg( 1, "PES sizes do not match : packet corrupted" ); } switch( p_es->i_stream_id ) @@ -192,10 +202,10 @@ void input_ParsePES( input_thread_t * p_input, es_descriptor_t * p_es ) i_max_len = MoveChunk( p_full_header, &p_data, &p_byte, 12 ); if( i_max_len < 2 ) { - intf_WarnMsg( 3, + intf_WarnMsg( 1, "PES packet too short to have a MPEG-2 header" ); - p_input->p_plugin->pf_delete_pes( p_input->p_method_data, - p_pes ); + p_input->pf_delete_pes( p_input->p_method_data, + p_pes ); p_pes = NULL; return; } @@ -209,38 +219,36 @@ void input_ParsePES( input_thread_t * p_input, es_descriptor_t * p_es ) { if( i_max_len < 7 ) { - intf_WarnMsg( 3, + intf_WarnMsg( 1, "PES packet too short to have a MPEG-2 header" ); - p_input->p_plugin->pf_delete_pes( - p_input->p_method_data, - p_pes ); + p_input->pf_delete_pes( p_input->p_method_data, + p_pes ); p_pes = NULL; return; } - p_pes->i_pts = + p_pes->i_pts = input_ClockGetTS( p_input, p_es->p_pgrm, ( ((mtime_t)(p_full_header[2] & 0x0E) << 29) | - (((mtime_t)U16_AT(p_full_header + 3) << 14) - (1 << 14)) | - ((mtime_t)U16_AT(p_full_header + 5) >> 1) ) * 300; - p_pes->i_pts /= 27; + ((mtime_t)(p_full_header[3]) << 22) | + ((mtime_t)(p_full_header[4] & 0xFE) << 14) | + ((mtime_t)p_full_header[5] << 7) | + ((mtime_t)p_full_header[6] >> 1) ) ); if( b_has_dts ) { if( i_max_len < 12 ) { - intf_WarnMsg( 3, + intf_WarnMsg( 1, "PES packet too short to have a MPEG-2 header" ); - p_input->p_plugin->pf_delete_pes( - p_input->p_method_data, - p_pes ); + p_input->pf_delete_pes( p_input->p_method_data, + p_pes ); p_pes = NULL; return; } - p_pes->i_dts = + p_pes->i_dts = input_ClockGetTS( p_input, p_es->p_pgrm, ( ((mtime_t)(p_full_header[7] & 0x0E) << 29) | (((mtime_t)U16_AT(p_full_header + 8) << 14) - (1 << 14)) | - ((mtime_t)U16_AT(p_full_header + 10) >> 1) ) * 300; - p_pes->i_dts /= 27; + ((mtime_t)U16_AT(p_full_header + 10) >> 1) ) ); } } } @@ -255,22 +263,22 @@ void input_ParsePES( input_thread_t * p_input, es_descriptor_t * p_es ) /* Cannot fail because the previous one succeeded. */ MoveChunk( NULL, &p_data, &p_byte, 6 ); - while( *p_byte == 0xFF && i_pes_header_size < 22 ) + while( *p_byte == 0xFF && i_pes_header_size < 23 ) { i_pes_header_size++; if( MoveChunk( NULL, &p_data, &p_byte, 1 ) != 1 ) { - intf_WarnMsg( 3, + intf_WarnMsg( 1, "PES packet too short to have a MPEG-1 header" ); - p_input->p_plugin->pf_delete_pes( p_input->p_method_data, p_pes ); + p_input->pf_delete_pes( p_input->p_method_data, p_pes ); p_pes = NULL; return; } } - if( i_pes_header_size == 22 ) + if( i_pes_header_size == 23 ) { intf_ErrMsg( "Too much MPEG-1 stuffing" ); - p_input->p_plugin->pf_delete_pes( p_input->p_method_data, p_pes ); + p_input->pf_delete_pes( p_input->p_method_data, p_pes ); p_pes = NULL; return; } @@ -284,9 +292,9 @@ void input_ParsePES( input_thread_t * p_input, es_descriptor_t * p_es ) i_pes_header_size += 2; if( MoveChunk( NULL, &p_data, &p_byte, 2 ) != 2 ) { - intf_WarnMsg( 3, + intf_WarnMsg( 1, "PES packet too short to have a MPEG-1 header" ); - p_input->p_plugin->pf_delete_pes( p_input->p_method_data, p_pes ); + p_input->pf_delete_pes( p_input->p_method_data, p_pes ); p_pes = NULL; return; } @@ -304,71 +312,42 @@ void input_ParsePES( input_thread_t * p_input, es_descriptor_t * p_es ) i_pes_header_size += 4; if( MoveChunk( p_ts, &p_data, &p_byte, 5 ) != 5 ) { - intf_WarnMsg( 3, + intf_WarnMsg( 1, "PES packet too short to have a MPEG-1 header" ); - p_input->p_plugin->pf_delete_pes( - p_input->p_method_data, p_pes ); + p_input->pf_delete_pes( p_input->p_method_data, p_pes ); p_pes = NULL; return; } - p_pes->i_pts = - ( ((mtime_t)(p_ts[0] & 0x0E) << 29) | - (((mtime_t)U16_AT(p_ts + 1) << 14) - (1 << 14)) | - ((mtime_t)U16_AT(p_ts + 3) >> 1) ) * 300; - p_pes->i_pts /= 27; + p_pes->i_pts = input_ClockGetTS( p_input, p_es->p_pgrm, + ( ((mtime_t)(p_ts[0] & 0x0E) << 29) | + (((mtime_t)U32_AT(p_ts) & 0xFFFE00) << 6) | + ((mtime_t)p_ts[3] << 7) | + ((mtime_t)p_ts[4] >> 1) ) ); if( b_has_dts ) { i_pes_header_size += 5; if( MoveChunk( p_ts, &p_data, &p_byte, 5 ) != 5 ) { - intf_WarnMsg( 3, + intf_WarnMsg( 1, "PES packet too short to have a MPEG-1 header" ); - p_input->p_plugin->pf_delete_pes( - p_input->p_method_data, p_pes ); + p_input->pf_delete_pes( p_input->p_method_data, + p_pes ); p_pes = NULL; return; } - p_pes->i_dts = + p_pes->i_dts = input_ClockGetTS( p_input, + p_es->p_pgrm, ( ((mtime_t)(p_ts[0] & 0x0E) << 29) | - (((mtime_t)U16_AT(p_ts + 1) << 14) - (1 << 14)) | - ((mtime_t)U16_AT(p_ts + 3) >> 1) ) * 300; - p_pes->i_dts /= 27; + (((mtime_t)U32_AT(p_ts) & 0xFFFE00) << 6) | + ((mtime_t)p_ts[3] << 7) | + ((mtime_t)p_ts[4] >> 1) ) ); } } } - /* PTS management */ - if( p_pes->i_pts ) - { - //intf_Msg("%lld", p_pes->i_pts); - switch( p_es->p_pgrm->i_synchro_state ) - { - case SYNCHRO_NOT_STARTED: - case SYNCHRO_START: - p_pes->i_pts = p_pes->i_dts = 0; - break; - - case SYNCHRO_REINIT: /* We skip a PES | Why ?? --Meuuh */ - p_pes->i_pts = p_pes->i_dts = 0; - p_es->p_pgrm->i_synchro_state = SYNCHRO_START; - break; - - case SYNCHRO_OK: - p_pes->i_pts += p_es->p_pgrm->delta_cr - + p_es->p_pgrm->delta_absolute - + DEFAULT_PTS_DELAY; - if( p_pes->i_dts ) - { - p_pes->i_dts += p_es->p_pgrm->delta_cr - + p_es->p_pgrm->delta_absolute - + DEFAULT_PTS_DELAY; - } - break; - } - } break; } @@ -395,8 +374,7 @@ void input_ParsePES( input_thread_t * p_input, es_descriptor_t * p_es ) if( (p_data = p_data->p_next) == NULL ) { intf_ErrMsg( "PES header bigger than payload" ); - p_input->p_plugin->pf_delete_pes( p_input->p_method_data, - p_pes ); + p_input->pf_delete_pes( p_input->p_method_data, p_pes ); p_pes = NULL; return; } @@ -407,7 +385,7 @@ void input_ParsePES( input_thread_t * p_input, es_descriptor_t * p_es ) if( i_payload_size < i_pes_header_size ) { intf_ErrMsg( "PES header bigger than payload" ); - p_input->p_plugin->pf_delete_pes( p_input->p_method_data, p_pes ); + p_input->pf_delete_pes( p_input->p_method_data, p_pes ); p_pes = NULL; return; } @@ -423,11 +401,12 @@ void input_ParsePES( input_thread_t * p_input, es_descriptor_t * p_es ) { intf_ErrMsg("No fifo to receive PES %p (who wrote this damn code ?)", p_pes); - p_input->p_plugin->pf_delete_pes( p_input->p_method_data, p_pes ); + p_input->pf_delete_pes( p_input->p_method_data, p_pes ); } p_pes = NULL; } #undef p_pes + } /***************************************************************************** @@ -446,7 +425,7 @@ void input_GatherPES( input_thread_t * p_input, data_packet_t * p_data, /* If we lost data, insert a NULL data packet (philosophy : 0 is quite * often an escape sequence in decoders, so that should make them wait * for the next start code). */ - if( b_packet_lost || p_es->b_discontinuity ) + if( b_packet_lost ) { input_NullPacket( p_input, p_es ); } @@ -462,7 +441,7 @@ void input_GatherPES( input_thread_t * p_input, data_packet_t * p_data, if( !b_unit_start && p_pes == NULL ) { /* Random access... */ - p_input->p_plugin->pf_delete_packet( p_input->p_method_data, p_data ); + p_input->pf_delete_packet( p_input->p_method_data, p_data ); } else { @@ -473,15 +452,15 @@ void input_GatherPES( input_thread_t * p_input, data_packet_t * p_data, * packet. This is also here that we can synchronize with the * stream if we lost packets or if the decoder has just * started. */ - if( (p_pes = p_input->p_plugin->pf_new_pes( p_input->p_method_data ) ) == NULL ) + if( (p_pes = p_input->pf_new_pes( p_input->p_method_data ) ) == NULL ) { intf_ErrMsg("Out of memory"); p_input->b_error = 1; return; } - //intf_DbgMsg("New PES packet %p (first data: %p)", p_pes, p_data); + p_pes->i_rate = p_input->stream.control.i_rate; p_pes->p_first = p_data; - + /* If the PES header fits in the first data packet, we can * already set p_gather->i_pes_real_size. */ if( p_data->p_payload_end - p_data->p_payload_start @@ -489,11 +468,12 @@ void input_GatherPES( input_thread_t * p_input, data_packet_t * p_data, { p_es->i_pes_real_size = U16_AT(p_data->p_payload_start + 4) + 6; + } else - { + { p_es->i_pes_real_size = 0; - } + } } else { @@ -518,138 +498,6 @@ void input_GatherPES( input_thread_t * p_input, data_packet_t * p_data, } -/* - * Pace control - */ - -/* - * DISCUSSION : SYNCHRONIZATION METHOD - * - * In some cases we can impose the pace of reading (when reading from a - * file or a pipe), and for the synchronization we simply sleep() until - * it is time to deliver the packet to the decoders. When reading from - * the network, we must be read at the same pace as the server writes, - * otherwise the kernel's buffer will trash packets. The risk is now to - * overflow the input buffers in case the server goes too fast, that is - * why we do these calculations : - * - * We compute an average for the pcr because we want to eliminate the - * network jitter and keep the low frequency variations. The average is - * in fact a low pass filter and the jitter is a high frequency signal - * that is why it is eliminated by the filter/average. - * - * The low frequency variations enable us to synchronize the client clock - * with the server clock because they represent the time variation between - * the 2 clocks. Those variations (ie the filtered pcr) are used to compute - * the presentation dates for the audio and video frames. With those dates - * we can decode (or trash) the MPEG2 stream at "exactly" the same rate - * as it is sent by the server and so we keep the synchronization between - * the server and the client. - * - * It is a very important matter if you want to avoid underflow or overflow - * in all the FIFOs, but it may be not enough. - */ - -/***************************************************************************** - * Constants - *****************************************************************************/ - -/* Maximum number of samples used to compute the dynamic average value, - * it is also the maximum of c_average_count in pgrm_ts_data_t. - * We use the following formula : - * new_average = (old_average * c_average + new_sample_value) / (c_average +1) */ -#define CR_MAX_AVERAGE_COUNTER 40 - -/* Maximum gap allowed between two CRs. */ -#define CR_MAX_GAP 1000000 - -/***************************************************************************** - * CRReInit : Reinitialize the clock reference - *****************************************************************************/ -static void CRReInit( pgrm_descriptor_t * p_pgrm ) -{ - p_pgrm->delta_cr = 0; - p_pgrm->last_cr = 0; - p_pgrm->c_average_count = 0; -} - -/* FIXME: find a better name */ -/***************************************************************************** - * CRDecode : Decode a clock reference - *****************************************************************************/ -static void CRDecode( input_thread_t * p_input, pgrm_descriptor_t * p_pgrm, - mtime_t cr_time ) -{ - if( p_pgrm->i_synchro_state != SYNCHRO_OK ) - { - switch( p_pgrm->i_synchro_state ) - { - case SYNCHRO_START: - p_pgrm->delta_absolute = mdate() - cr_time; - p_pgrm->i_synchro_state = SYNCHRO_OK; - break; - - case SYNCHRO_NOT_STARTED: - p_pgrm->i_synchro_state = SYNCHRO_START; - break; - - default: - break; - } - } - else - { - if( p_pgrm->b_discontinuity || - ( p_pgrm->last_cr != 0 && - ( (p_pgrm->last_cr - cr_time) > CR_MAX_GAP - || (p_pgrm->last_cr - cr_time) < - CR_MAX_GAP ) ) ) - { - int i_es; - - /* Stream discontinuity. */ - intf_WarnMsg( 3, "CR re-initialiazed" ); - CRReInit( p_pgrm ); - p_pgrm->i_synchro_state = SYNCHRO_REINIT; - p_pgrm->b_discontinuity = 0; - - /* Warn all the elementary streams */ - for( i_es = 0; i_es < p_pgrm->i_es_number; i_es++ ) - { - p_pgrm->pp_es[i_es]->b_discontinuity = 1; - } - } - p_pgrm->last_cr = cr_time; - - if( p_input->stream.b_pace_control ) - { - /* Wait a while before delivering the packets to the decoder. */ - mwait( cr_time + p_pgrm->delta_absolute ); - } - else - { - mtime_t sys_time, delta_cr; - - sys_time = mdate(); - delta_cr = sys_time - cr_time; - - if( p_pgrm->c_average_count == CR_MAX_AVERAGE_COUNTER ) - { - p_pgrm->delta_cr = ( delta_cr + (p_pgrm->delta_cr - * (CR_MAX_AVERAGE_COUNTER - 1)) ) - / CR_MAX_AVERAGE_COUNTER; - } - else - { - p_pgrm->delta_cr = ( delta_cr + (p_pgrm->delta_cr - * p_pgrm->c_average_count) ) - / ( p_pgrm->c_average_count + 1 ); - p_pgrm->c_average_count++; - } - } - } -} - - /* * PS Demultiplexing */ @@ -661,17 +509,21 @@ static u16 GetID( data_packet_t * p_data ) { u16 i_id; - i_id = p_data->p_buffer[3]; /* stream_id */ + i_id = p_data->p_payload_start[3]; /* stream_id */ if( i_id == 0xBD ) { + /* FIXME : this is not valid if the header is split in multiple + * packets */ /* stream_private_id */ - i_id |= p_data->p_buffer[ 9 + p_data->p_buffer[8] ] << 8; + i_id |= p_data->p_payload_start[ 9 + p_data->p_payload_start[8] ] << 8; } return( i_id ); } /***************************************************************************** * DecodePSM: Decode the Program Stream Map information + ***************************************************************************** + * FIXME : loads are not aligned in this function *****************************************************************************/ static void DecodePSM( input_thread_t * p_input, data_packet_t * p_data ) { @@ -682,9 +534,6 @@ static void DecodePSM( input_thread_t * p_input, data_packet_t * p_data ) int i; int i_new_es_number = 0; - intf_Msg("input info: Your stream contains Program Stream Map information"); - intf_Msg("input info: Please send a mail to "); - if( p_data->p_payload_start + 10 > p_data->p_payload_end ) { intf_ErrMsg( "PSM too short : packet corrupt" ); @@ -692,7 +541,7 @@ static void DecodePSM( input_thread_t * p_input, data_packet_t * p_data ) } if( p_demux->b_has_PSM - && p_demux->i_PSM_version == (p_data->p_buffer[6] & 0x1F) ) + && p_demux->i_PSM_version == (p_data->p_payload_start[6] & 0x1F) ) { /* Already got that one. */ return; @@ -700,7 +549,7 @@ static void DecodePSM( input_thread_t * p_input, data_packet_t * p_data ) intf_DbgMsg( "Building PSM" ); p_demux->b_has_PSM = 1; - p_demux->i_PSM_version = p_data->p_buffer[6] & 0x1F; + p_demux->i_PSM_version = p_data->p_payload_start[6] & 0x1F; /* Go to elementary_stream_map_length, jumping over * program_stream_info. */ @@ -767,6 +616,11 @@ static void DecodePSM( input_thread_t * p_input, data_packet_t * p_data ) p_es = input_AddES( p_input, p_input->stream.pp_programs[0], i_stream_id, 0 ); p_es->i_type = p_byte[0]; + p_es->b_audio = ( p_es->i_type == MPEG1_AUDIO_ES + || p_es->i_type == MPEG2_AUDIO_ES + || p_es->i_type == AC3_AUDIO_ES + || p_es->i_type == LPCM_AUDIO_ES + ); /* input_AddES has inserted the new element at the end. */ p_input->stream.pp_programs[0]->pp_es[ @@ -806,8 +660,9 @@ es_descriptor_t * input_ParsePS( input_thread_t * p_input, u32 i_code; es_descriptor_t * p_es = NULL; - i_code = U32_AT( p_data->p_buffer ); - if( i_code > 0x1BC ) /* ES start code */ + i_code = p_data->p_payload_start[3]; + + if( i_code > 0xBC ) /* ES start code */ { u16 i_id; int i_dummy; @@ -844,13 +699,14 @@ es_descriptor_t * input_ParsePS( input_thread_t * p_input, i_id, 0 ); if( p_es != NULL ) { - p_es->i_stream_id = p_data->p_buffer[3]; + p_es->i_stream_id = p_data->p_payload_start[3]; /* Set stream type and auto-spawn. */ if( (i_id & 0xF0) == 0xE0 ) { /* MPEG video */ p_es->i_type = MPEG2_VIDEO_ES; + p_es->i_cat = VIDEO_ES; #ifdef AUTO_SPAWN if( !p_input->stream.b_seekable ) input_SelectES( p_input, p_es ); @@ -860,14 +716,19 @@ es_descriptor_t * input_ParsePS( input_thread_t * p_input, { /* MPEG audio */ p_es->i_type = MPEG2_AUDIO_ES; + p_es->b_audio = 1; + p_es->i_cat = AUDIO_ES; #ifdef AUTO_SPAWN - if( main_GetIntVariable( INPUT_DVD_AUDIO_VAR, 0 ) - == REQUESTED_MPEG - && main_GetIntVariable( INPUT_DVD_CHANNEL_VAR, 0 ) + if( !p_input->stream.b_seekable ) + if( main_GetIntVariable( INPUT_CHANNEL_VAR, 0 ) == (p_es->i_id & 0x1F) ) + switch( main_GetIntVariable( INPUT_AUDIO_VAR, 0 ) ) { - if( !p_input->stream.b_seekable ) - input_SelectES( p_input, p_es ); + case 0: + main_PutIntVariable( INPUT_CHANNEL_VAR, + REQUESTED_MPEG ); + case REQUESTED_MPEG: + input_SelectES( p_input, p_es ); } #endif } @@ -875,14 +736,19 @@ es_descriptor_t * input_ParsePS( input_thread_t * p_input, { /* AC3 audio (0x80->0x8F) */ p_es->i_type = AC3_AUDIO_ES; + p_es->b_audio = 1; + p_es->i_cat = AUDIO_ES; #ifdef AUTO_SPAWN - if( main_GetIntVariable( INPUT_DVD_AUDIO_VAR, 0 ) - == REQUESTED_AC3 - && main_GetIntVariable( INPUT_DVD_CHANNEL_VAR, 0 ) + if( !p_input->stream.b_seekable ) + if( main_GetIntVariable( INPUT_CHANNEL_VAR, 0 ) == ((p_es->i_id & 0xF00) >> 8) ) + switch( main_GetIntVariable( INPUT_AUDIO_VAR, 0 ) ) { - if( !p_input->stream.b_seekable ) - input_SelectES( p_input, p_es ); + case 0: + main_PutIntVariable( INPUT_CHANNEL_VAR, + REQUESTED_AC3 ); + case REQUESTED_AC3: + input_SelectES( p_input, p_es ); } #endif } @@ -890,8 +756,9 @@ es_descriptor_t * input_ParsePS( input_thread_t * p_input, { /* Subtitles video (0x20->0x3F) */ p_es->i_type = DVD_SPU_ES; + p_es->i_cat = SPU_ES; #ifdef AUTO_SPAWN - if( main_GetIntVariable( INPUT_DVD_SUBTITLE_VAR, -1 ) + if( main_GetIntVariable( INPUT_SUBTITLE_VAR, -1 ) == ((p_es->i_id & 0x1F00) >> 8) ) { if( !p_input->stream.b_seekable ) @@ -903,6 +770,8 @@ es_descriptor_t * input_ParsePS( input_thread_t * p_input, { /* LPCM audio (0xA0->0xAF) */ p_es->i_type = LPCM_AUDIO_ES; + p_es->b_audio = 1; + p_es->i_cat = AUDIO_ES; /* FIXME : write the decoder */ } else @@ -927,41 +796,76 @@ void input_DemuxPS( input_thread_t * p_input, data_packet_t * p_data ) boolean_t b_trash = 0; es_descriptor_t * p_es = NULL; - i_code = U32_AT( p_data->p_buffer ); + i_code = U32_AT( p_data->p_payload_start ); if( i_code <= 0x1BC ) { switch( i_code ) { case 0x1BA: /* PACK_START_CODE */ { - /* Convert the SCR in microseconds. */ + /* Read the SCR. */ mtime_t scr_time; + u32 i_mux_rate; - if( (p_data->p_buffer[4] & 0xC0) == 0x40 ) + if( (p_data->p_payload_start[4] & 0xC0) == 0x40 ) { /* MPEG-2 */ + byte_t p_header[14]; + byte_t * p_byte; + p_byte = p_data->p_payload_start; + + if( MoveChunk( p_header, &p_data, &p_byte, 14 ) != 14 ) + { + intf_WarnMsg( 1, "Packet too short to have a header" ); + b_trash = 1; + break; + } scr_time = - (( ((mtime_t)(p_data->p_buffer[4] & 0x38) << 27) | - ((mtime_t)(U32_AT(p_data->p_buffer + 4) & 0x03FFF800) + ((mtime_t)(p_header[4] & 0x38) << 27) | + ((mtime_t)(U32_AT(p_header + 4) & 0x03FFF800) << 4) | - ((mtime_t)(U32_AT(p_data->p_buffer + 6) & 0x03FFF800) - >> 11) - ) * 300) / 27; + ((( ((mtime_t)U16_AT(p_header + 6) << 16) + | (mtime_t)U16_AT(p_header + 8) ) & 0x03FFF800) + >> 11); + + /* mux_rate */ + i_mux_rate = ((u32)U16_AT(p_header + 10) << 6) + | (p_header[12] >> 2); } else { - /* MPEG-1 SCR is like PTS */ + /* MPEG-1 SCR is like PTS. */ + byte_t p_header[12]; + byte_t * p_byte; + p_byte = p_data->p_payload_start; + + if( MoveChunk( p_header, &p_data, &p_byte, 12 ) != 12 ) + { + intf_WarnMsg( 1, "Packet too short to have a header" ); + b_trash = 1; + break; + } scr_time = - (( ((mtime_t)(p_data->p_buffer[4] & 0x0E) << 29) | - (((mtime_t)U16_AT(p_data->p_buffer + 5) << 14) - - (1 << 14)) | - ((mtime_t)U16_AT(p_data->p_buffer + 7) >> 1) - ) * 300) / 27; + ((mtime_t)(p_header[4] & 0x0E) << 29) | + (((mtime_t)U32_AT(p_header + 4) & 0xFFFE00) << 6) | + ((mtime_t)p_header[7] << 7) | + ((mtime_t)p_header[8] >> 1); + + /* mux_rate */ + i_mux_rate = (U32_AT(p_header + 8) & 0x7FFFFE) >> 1; } /* Call the pace control. */ - //intf_Msg("+%lld", scr_time); - CRDecode( p_input, p_input->stream.pp_programs[0], - scr_time ); + input_ClockManageRef( p_input, p_input->stream.pp_programs[0], + scr_time ); + + if( i_mux_rate != p_input->stream.i_mux_rate + && p_input->stream.i_mux_rate ) + { + intf_WarnMsg(2, + "Mux_rate changed - expect cosmetic errors"); + } + p_input->stream.i_mux_rate = i_mux_rate; + b_trash = 1; } break; @@ -982,7 +886,7 @@ void input_DemuxPS( input_thread_t * p_input, data_packet_t * p_data ) default: /* This should not happen */ b_trash = 1; - intf_WarnMsg( 1, "Unwanted packet received with start code %x", + intf_WarnMsg( 3, "Unwanted packet received with start code 0x%.8x", i_code ); } } @@ -990,8 +894,11 @@ void input_DemuxPS( input_thread_t * p_input, data_packet_t * p_data ) { p_es = input_ParsePS( p_input, p_data ); - if( p_es != NULL && p_es->p_decoder_fifo != NULL ) + vlc_mutex_lock( &p_input->stream.control.control_lock ); + if( p_es != NULL && p_es->p_decoder_fifo != NULL + && (!p_es->b_audio || !p_input->stream.control.b_mute) ) { + vlc_mutex_unlock( &p_input->stream.control.control_lock ); #ifdef STATS p_es->c_packets++; #endif @@ -999,6 +906,7 @@ void input_DemuxPS( input_thread_t * p_input, data_packet_t * p_data ) } else { + vlc_mutex_unlock( &p_input->stream.control.control_lock ); b_trash = 1; } } @@ -1006,14 +914,14 @@ void input_DemuxPS( input_thread_t * p_input, data_packet_t * p_data ) /* Trash the packet if it has no payload or if it isn't selected */ if( b_trash ) { - p_input->p_plugin->pf_delete_packet( p_input, p_data ); + p_input->pf_delete_packet( p_input->p_method_data, p_data ); #ifdef STATS p_input->c_packets_trashed++; #endif } } - + /* * TS Demultiplexing */ @@ -1023,21 +931,19 @@ void input_DemuxPS( input_thread_t * p_input, data_packet_t * p_data ) *****************************************************************************/ void input_DemuxTS( input_thread_t * p_input, data_packet_t * p_data ) { - int i_pid, i_dummy; + u16 i_pid; + int i_dummy; boolean_t b_adaptation; /* Adaptation field is present */ boolean_t b_payload; /* Packet carries payload */ boolean_t b_unit_start; /* A PSI or a PES start in the packet */ boolean_t b_trash = 0; /* Is the packet unuseful ? */ boolean_t b_lost = 0; /* Was there a packet loss ? */ + boolean_t b_psi = 0; /* Is this a PSI ? */ es_descriptor_t * p_es = NULL; es_ts_data_t * p_es_demux = NULL; pgrm_ts_data_t * p_pgrm_demux = NULL; -#define p (p_data->p_buffer) - - //intf_DbgMsg("input debug: TS-demultiplexing packet %p, pid %d", - // p_ts_packet, U16_AT(&p[1]) & 0x1fff); - + #define p (p_data->p_buffer) /* Extract flags values from TS common header. */ i_pid = U16_AT(&p[1]) & 0x1fff; b_unit_start = (p[1] & 0x40); @@ -1046,22 +952,44 @@ void input_DemuxTS( input_thread_t * p_input, data_packet_t * p_data ) /* Find out the elementary stream. */ vlc_mutex_lock( &p_input->stream.stream_lock ); - p_es = input_FindES( p_input, i_pid ); - vlc_mutex_unlock( &p_input->stream.stream_lock ); + + p_es= input_FindES( p_input, i_pid ); + + if( (p_es != NULL) && (p_es->p_demux_data != NULL) ) + { + p_es_demux = (es_ts_data_t *)p_es->p_demux_data; + + if( p_es_demux->b_psi ) + b_psi = 1; + else + p_pgrm_demux = (pgrm_ts_data_t *)p_es->p_pgrm->p_demux_data; + } - if( p_es == NULL || p_es->p_decoder_fifo == NULL ) + vlc_mutex_lock( &p_input->stream.control.control_lock ); + if( ( p_es == NULL ) || (p_es->b_audio && p_input->stream.control.b_mute) ) { /* Not selected. Just read the adaptation field for a PCR. */ b_trash = 1; } + else if( p_es->p_decoder_fifo == NULL && !b_psi ) + b_trash =1; + + vlc_mutex_unlock( &p_input->stream.control.control_lock ); + vlc_mutex_unlock( &p_input->stream.stream_lock ); - if( (p_es->p_decoder_fifo != NULL) || (p_pgrm_demux->i_pcr_pid == i_pid) ) + + /* Don't change the order of the tests : if b_psi then p_pgrm_demux + * may still be null. Who said it was ugly ? */ + if( ( p_es != NULL ) && + ((p_es->p_decoder_fifo != NULL) || b_psi + || (p_pgrm_demux->i_pcr_pid == i_pid) ) ) { #ifdef STATS p_es->c_packets++; #endif /* Extract adaptation field information if any */ + if( !b_adaptation ) { /* We don't have any adaptation_field, so payload starts @@ -1109,7 +1037,7 @@ void input_DemuxTS( input_thread_t * p_input, data_packet_t * p_data ) /* If the PID carries the PCR, there will be a system * time-based discontinuity. We let the PCR decoder * handle that. */ - p_es->p_pgrm->b_discontinuity = 1; + p_es->p_pgrm->i_synchro_state = SYNCHRO_REINIT; /* There also may be a continuity_counter * discontinuity: resynchronise our counter with @@ -1119,34 +1047,33 @@ void input_DemuxTS( input_thread_t * p_input, data_packet_t * p_data ) /* If this is a PCR_PID, and this TS packet contains a * PCR, we pass it along to the PCR decoder. */ - if( (p_pgrm_demux->i_pcr_pid == i_pid) && (p[5] & 0x10) ) + + if( !b_psi && (p_pgrm_demux->i_pcr_pid == i_pid) && (p[5] & 0x10) ) { /* There should be a PCR field in the packet, check * if the adaptation field is long enough to carry * it. */ if( p[4] >= 7 ) { - /* Convert the PCR in microseconds. - * WARNING: do not remove the casts in the - * following calculation ! */ + /* Read the PCR. */ mtime_t pcr_time; pcr_time = - ( (( (mtime_t)U32_AT((u32*)&p[6]) << 1 ) - | ( p[10] >> 7 )) * 300 ) / 27; + ( (mtime_t)U32_AT((u32*)&p[6]) << 1 ) + | ( p[10] >> 7 ); /* Call the pace control. */ - CRDecode( p_input, p_es->p_pgrm, pcr_time ); + input_ClockManageRef( p_input, p_es->p_pgrm, + pcr_time ); } } /* PCR ? */ } /* valid TS adaptation field ? */ } /* length > 0 */ } /* has adaptation field */ - /* Check the continuity of the stream. */ i_dummy = ((p[3] & 0x0f) - p_es_demux->i_continuity_counter) & 0x0f; if( i_dummy == 1 ) { /* Everything is ok, just increase our counter */ - p_es_demux->i_continuity_counter++; + (p_es_demux->i_continuity_counter)++; } else { @@ -1156,7 +1083,7 @@ void input_DemuxTS( input_thread_t * p_input, data_packet_t * p_data ) * draft. As there is nothing interesting in this packet * (except PCR that have already been handled), we can trash * the packet. */ - intf_WarnMsg( 1, + intf_WarnMsg( 3, "Packet without payload received by TS demux" ); b_trash = 1; } @@ -1164,7 +1091,7 @@ void input_DemuxTS( input_thread_t * p_input, data_packet_t * p_data ) { /* FIXME: this can never happen, can it ? --Meuuh */ /* Duplicate packet: mark it as being to be trashed. */ - intf_WarnMsg( 1, "Duplicate packet received by TS demux" ); + intf_WarnMsg( 3, "Duplicate packet received by TS demux" ); b_trash = 1; } else if( p_es_demux->i_continuity_counter == 0xFF ) @@ -1192,32 +1119,420 @@ void input_DemuxTS( input_thread_t * p_input, data_packet_t * p_data ) } /* not continuous */ } /* continuity */ } /* if selected or PCR */ - + /* Trash the packet if it has no payload or if it isn't selected */ if( b_trash ) { - p_input->p_plugin->pf_delete_packet( p_input, p_data ); + p_input->pf_delete_packet( p_input->p_method_data, p_data ); #ifdef STATS p_input->c_packets_trashed++; #endif } else { - if( p_es_demux->b_psi ) + if( b_psi ) { /* The payload contains PSI tables */ -#if 0 input_DemuxPSI( p_input, p_data, p_es, b_unit_start, b_lost ); -#endif + } else { /* The payload carries a PES stream */ - if( b_unit_start ) - input_GatherPES( p_input, p_data, p_es, b_unit_start, b_lost ); + input_GatherPES( p_input, p_data, p_es, b_unit_start, b_lost ); } + } #undef p + +} + +/* + * PSI demultiplexing and decoding + */ + +/***************************************************************************** + * DemuxPSI : makes up complete PSI data + *****************************************************************************/ +void input_DemuxPSI( input_thread_t * p_input, data_packet_t * p_data, + es_descriptor_t * p_es, boolean_t b_unit_start, boolean_t b_lost ) +{ + es_ts_data_t * p_demux_data; + + p_demux_data = (es_ts_data_t *)p_es->p_demux_data; + +#define p_psi (p_demux_data->p_psi_section) +#define p (p_data->p_payload_start) + + if( b_unit_start ) + { + /* unit_start set to 1 -> presence of a pointer field + * (see ISO/IEC 13818 (2.4.4.2) which should be set to 0x00 */ + if( (u8)p[0] != 0x00 ) + { + intf_WarnMsg( 2, + "Non zero pointer field found. Trying to continue" ); + p+=(u8)p[0]; + } + else + p++; + + /* This is the begining of a new section */ + + if( ((u8)(p[1]) & 0xc0) != 0x80 ) + { + intf_WarnMsg( 2, "Invalid PSI packet" ); + p_psi->b_trash = 1; + } + else + { + p_psi->i_section_length = U16_AT(p+1) & 0x0fff; + p_psi->b_section_complete = 0; + p_psi->i_read_in_section = 0; + p_psi->i_section_number = (u8)p[6]; + + if( p_psi->b_is_complete || p_psi->i_section_number == 0 ) + { + /* This is a new PSI packet */ + p_psi->b_is_complete = 0; + p_psi->b_trash = 0; + p_psi->i_version_number = ( p[5] >> 1 ) & 0x1f; + p_psi->i_last_section_number = (u8)p[7]; + + /* We'll write at the begining of the buffer */ + p_psi->p_current = p_psi->buffer; + } + else + { + if( p_psi->b_section_complete ) + { + /* New Section of an already started PSI */ + p_psi->b_section_complete = 0; + + if( p_psi->i_version_number != (( p[5] >> 1 ) & 0x1f) ) + { + intf_WarnMsg( 2,"PSI version differs inside same PAT" ); + p_psi->b_trash = 1; + } + if( p_psi->i_section_number + 1 != (u8)p[6] ) + { + intf_WarnMsg( 2, + "PSI Section discontinuity. Packet lost ?"); + p_psi->b_trash = 1; + } + else + p_psi->i_section_number++; + } + else + { + intf_WarnMsg( 2, "Received unexpected new PSI section" ); + p_psi->b_trash = 1; + } + } + } + } /* b_unit_start */ + + if( !p_psi->b_trash ) + { + /* read */ + if( (p_data->p_payload_end - p) >= + ( p_psi->i_section_length - p_psi->i_read_in_section ) ) + { + /* The end of the section is in this TS packet */ + memcpy( p_psi->p_current, p, + (p_psi->i_section_length - p_psi->i_read_in_section) ); + + p_psi->b_section_complete = 1; + p_psi->p_current += + (p_psi->i_section_length - p_psi->i_read_in_section); + + if( p_psi->i_section_number == p_psi->i_last_section_number ) + { + /* This was the last section of PSI */ + p_psi->b_is_complete = 1; + } + } + else + { + memcpy( p_psi->buffer, p, p_data->p_payload_end - p ); + p_psi->i_read_in_section+= p_data->p_payload_end - p; + + p_psi->p_current += p_data->p_payload_end - p; + } + } + + if ( p_psi->b_is_complete ) + { + switch( p_demux_data->i_psi_type) + { + case PSI_IS_PAT: + input_DecodePAT( p_input, p_es ); + break; + case PSI_IS_PMT: + input_DecodePMT( p_input, p_es ); + break; + default: + intf_WarnMsg(2, "Received unknown PSI in demuxPSI"); + } + } +#undef p_psi +#undef p + + return ; +} + +/***************************************************************************** + * DecodePAT : Decodes Programm association table and deal with it + *****************************************************************************/ +static void input_DecodePAT( input_thread_t * p_input, es_descriptor_t * p_es ) +{ + + stream_ts_data_t * p_stream_data; + es_ts_data_t * p_demux_data; + + p_demux_data = (es_ts_data_t *)p_es->p_demux_data; + p_stream_data = (stream_ts_data_t *)p_input->stream.p_demux_data; + +#define p_psi (p_demux_data->p_psi_section) + + if( p_stream_data->i_pat_version != p_psi->i_version_number ) + { + /* PAT has changed. We are going to delete all programms and + * create new ones. We chose not to only change what was needed + * as a PAT change may mean the stream is radically changing and + * this is a secure method to avoid krashes */ + pgrm_descriptor_t * p_pgrm; + es_descriptor_t * p_current_es; + es_ts_data_t * p_es_demux; + pgrm_ts_data_t * p_pgrm_demux; + byte_t * p_current_data; + + int i_section_length,i_program_id,i_pmt_pid; + int i_loop, i_current_section; + + p_current_data = p_psi->buffer; + + + for( i_loop = 0; i_loop < p_input->stream.i_pgrm_number; i_loop++ ) + { + input_DelProgram( p_input, p_input->stream.pp_programs[i_loop] ); + } + + do + { + i_section_length = U16_AT(p_current_data+1) & 0x0fff; + i_current_section = (u8)p_current_data[6]; + + for( i_loop = 0; i_loop < (i_section_length-9)/4 ; i_loop++ ) + { + i_program_id = U16_AT(p_current_data + i_loop*4 + 8); + i_pmt_pid = U16_AT( p_current_data + i_loop*4 + 10) & 0x1fff; + + /* If program = 0, we're having info about NIT not PMT */ + if( i_program_id ) + { + /* Add this program */ + p_pgrm = input_AddProgram( p_input, i_program_id, + sizeof( pgrm_ts_data_t ) ); + + /* whatis the PID of the PMT of this program */ + p_pgrm_demux = (pgrm_ts_data_t *)p_pgrm->p_demux_data; + p_pgrm_demux->i_pmt_version = PMT_UNINITIALIZED; + + /* Add the PMT ES to this program */ + p_current_es = input_AddES( p_input, p_pgrm,(u16)i_pmt_pid, + sizeof( es_ts_data_t) ); + p_es_demux = (es_ts_data_t *)p_current_es->p_demux_data; + p_es_demux->b_psi = 1; + p_es_demux->i_psi_type = PSI_IS_PMT; + + p_es_demux->p_psi_section = + malloc( sizeof( psi_section_t ) ); + p_es_demux->p_psi_section->b_is_complete = 0; + } + } + + p_current_data+=3+i_section_length; + + } while( i_current_section < p_psi->i_last_section_number ); + + /* Go to the beginning of the next section*/ + p_stream_data->i_pat_version = p_psi->i_version_number; + + } +#undef p_psi + +} + +/***************************************************************************** + * DecodePMT : decode a given Program Stream Map + * *************************************************************************** + * When the PMT changes, it may mean a deep change in the stream, and it is + * careful to delete the ES and add them again. If the PMT doesn't change, + * there no need to do anything. + *****************************************************************************/ +static void input_DecodePMT( input_thread_t * p_input, es_descriptor_t * p_es ) +{ + + pgrm_ts_data_t * p_pgrm_data; + es_ts_data_t * p_demux_data; + + p_demux_data = (es_ts_data_t *)p_es->p_demux_data; + p_pgrm_data = (pgrm_ts_data_t *)p_es->p_pgrm->p_demux_data; + +#define p_psi (p_demux_data->p_psi_section) + + if( p_psi->i_version_number != p_pgrm_data->i_pmt_version ) + { + es_descriptor_t * p_new_es; + es_ts_data_t * p_es_demux; + byte_t * p_current_data, * p_current_section; + int i_section_length,i_current_section; + int i_prog_info_length, i_loop; + int i_es_info_length, i_pid, i_stream_type; + int i_audio_es, i_spu_es; + int i_required_audio_es, i_required_spu_es; + + p_current_section = p_psi->buffer; + p_current_data = p_psi->buffer; + + p_pgrm_data->i_pcr_pid = U16_AT(p_current_section + 8) & 0x1fff; + + i_audio_es = 0; + i_spu_es = 0; + + /* Lock stream information */ + vlc_mutex_lock( &p_input->stream.stream_lock ); + + /* Get the number of the required audio stream */ + if( p_main->b_audio ) + { + /* Default is the first one */ + i_required_audio_es = main_GetIntVariable( INPUT_CHANNEL_VAR, 1 ); + if( i_required_audio_es < 0 ) + { + main_PutIntVariable( INPUT_CHANNEL_VAR, 1 ); + i_required_audio_es = 1; + } + } + else + { + i_required_audio_es = 0; + } + + /* Same thing for subtitles */ + if( p_main->b_video ) + { + /* for spu, default is none */ + i_required_spu_es = main_GetIntVariable( INPUT_SUBTITLE_VAR, 0 ); + if( i_required_spu_es < 0 ) + { + main_PutIntVariable( INPUT_SUBTITLE_VAR, 0 ); + i_required_spu_es = 0; + } + } + else + { + i_required_spu_es = 0; + } + + /* Delete all ES in this program except the PSI */ + for( i_loop=0; i_loop < p_es->p_pgrm->i_es_number; i_loop++ ) + { + p_es_demux = (es_ts_data_t *) + p_es->p_pgrm->pp_es[i_loop]->p_demux_data; + if ( ! p_es_demux->b_psi ) + input_DelES( p_input, p_es->p_pgrm->pp_es[i_loop] ); + } + + /* Then add what we received in this PMT */ + do + { + + i_section_length = U16_AT(p_current_data+1) & 0x0fff; + i_current_section = (u8)p_current_data[6]; + i_prog_info_length = U16_AT(p_current_data+10) & 0x0fff; + + /* For the moment we ignore program descriptors */ + p_current_data += 12+i_prog_info_length; + + /* The end of the section, before the CRC is at + * p_current_section + i_section_length -1 */ + while( p_current_data < p_current_section + i_section_length -1 ) + { + i_stream_type = (int)p_current_data[0]; + i_pid = U16_AT( p_current_data + 1 ) & 0x1fff; + i_es_info_length = U16_AT( p_current_data + 3 ) & 0x0fff; + + /* Add this ES to the program */ + p_new_es = input_AddES( p_input, p_es->p_pgrm, + (u16)i_pid, sizeof( es_ts_data_t ) ); + + /* Tell the decoders what kind of stream it is */ + p_new_es->i_type = i_stream_type; + + /* Tell the interface what kind of stream it is and select + * the required ones */ + switch( i_stream_type ) + { + case MPEG1_VIDEO_ES: + case MPEG2_VIDEO_ES: + p_new_es->i_cat = VIDEO_ES; + input_SelectES( p_input, p_new_es ); + break; + case MPEG1_AUDIO_ES: + case MPEG2_AUDIO_ES: + case LPCM_AUDIO_ES : + p_new_es->i_cat = AUDIO_ES; + i_audio_es += 1; + if( i_audio_es == i_required_audio_es ) + input_SelectES( p_input, p_new_es ); + break; + case AC3_AUDIO_ES : + p_new_es->i_stream_id = 0xBD; + p_new_es->i_cat = AUDIO_ES; + i_audio_es += 1; + if( i_audio_es == i_required_audio_es ) + input_SelectES( p_input, p_new_es ); + break; + /* Not sure this one is fully norm-compliant */ + case DVD_SPU_ES : + p_new_es->i_cat = SPU_ES; + i_spu_es += 1; + if( i_spu_es == i_required_spu_es ) + input_SelectES( p_input, p_new_es ); + break; + default : + p_new_es->i_cat = UNKNOWN_ES; + break; + } + + p_current_data += 5 + i_es_info_length; + } + + /* Go to the beginning of the next section*/ + p_current_data += 3+i_section_length; + + p_current_section+=1; + + } while( i_current_section < p_psi->i_last_section_number ); + + if( i_required_audio_es > i_audio_es ) + intf_WarnMsg( 2, "TS input: Non-existing audio es required." ); + + if( i_required_spu_es > i_spu_es ) + intf_WarnMsg( 2, "TS input: Non-existing subtitles es required." ); + + p_pgrm_data->i_pmt_version = p_psi->i_version_number; + + /* inform interface that stream has changed */ + p_input->stream.b_changed = 1; + } + +#undef p_psi + + /* Remove lock */ + vlc_mutex_unlock( &p_input->stream.stream_lock ); }