0ffaa98f48b469481279310911d8173d3fb1a873
[vlc.git] / src / video_parser / video_parser.c
1 /*****************************************************************************
2  * video_parser.c : video parser thread
3  *****************************************************************************
4  * Copyright (C) 1999, 2000 VideoLAN
5  * $Id: video_parser.c,v 1.82 2001/05/01 04:18:18 sam Exp $
6  *
7  * Authors: Christophe Massiot <massiot@via.ecp.fr>
8  *          Samuel Hocevar <sam@via.ecp.fr>
9  *
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.
14  * 
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.
19  *
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  *****************************************************************************/
24
25 /*****************************************************************************
26  * Preamble
27  *****************************************************************************/
28 #include "defs.h"
29
30 #include <stdlib.h>                                      /* malloc(), free() */
31 #include <unistd.h>                                              /* getpid() */
32 #include <errno.h>
33 #include <string.h>
34
35 #ifdef STATS
36 #  include <sys/times.h>
37 #endif
38
39 #include "config.h"
40 #include "common.h"
41 #include "threads.h"
42 #include "mtime.h"
43 #include "modules.h"
44
45 #include "intf_msg.h"
46
47 #include "stream_control.h"
48 #include "input_ext-dec.h"
49
50 #include "video.h"
51 #include "video_output.h"
52
53 #include "video_decoder.h"
54 #include "vdec_motion.h"
55 #include "../video_decoder/vdec_idct.h"
56
57 #include "vpar_blocks.h"
58 #include "../video_decoder/vpar_headers.h"
59 #include "../video_decoder/vpar_synchro.h"
60 #include "../video_decoder/video_parser.h"
61 #include "../video_decoder/video_fifo.h"
62
63 /*
64  * Local prototypes
65  */
66 static int      InitThread          ( vpar_thread_t * );
67 static void     RunThread           ( vpar_thread_t * );
68 static void     ErrorThread         ( vpar_thread_t * );
69 static void     EndThread           ( vpar_thread_t * );
70 static void     BitstreamCallback   ( bit_stream_t *, boolean_t );
71
72 /*****************************************************************************
73  * vpar_CreateThread: create a generic parser thread
74  *****************************************************************************
75  * This function creates a new video parser thread, and returns a pointer
76  * to its description. On error, it returns NULL.
77  *****************************************************************************/
78 vlc_thread_t vpar_CreateThread( vdec_config_t * p_config )
79 {
80     vpar_thread_t *     p_vpar;
81
82     intf_DbgMsg( "vpar debug: creating video parser thread" );
83
84     /* Allocate the memory needed to store the thread's structure */
85     if ( (p_vpar = (vpar_thread_t *)malloc( sizeof(vpar_thread_t) )) == NULL )
86     {
87         intf_ErrMsg( "vpar error: not enough memory "
88                      "for vpar_CreateThread() to create the new thread");
89         return( 0 );
90     }
91
92     /*
93      * Initialize the thread properties
94      */
95     p_vpar->p_fifo = p_config->decoder_config.p_decoder_fifo;
96     p_vpar->p_config = p_config;
97
98     p_vpar->p_vout = p_config->p_vout;
99
100     /*
101      * Choose the best motion compensation module
102      */
103     p_vpar->p_motion_module = module_Need( MODULE_CAPABILITY_MOTION, NULL );
104
105     if( p_vpar->p_motion_module == NULL )
106     {
107         intf_ErrMsg( "vpar error: no suitable motion compensation module" );
108         free( p_vpar );
109         return( 0 );
110     }
111
112 #define M ( p_vpar->pppf_motion )
113 #define S ( p_vpar->ppf_motion_skipped )
114 #define F ( p_vpar->p_motion_module->p_functions->motion.functions.motion )
115     M[0][0][0] = M[0][0][1] = M[0][0][2] = M[0][0][3] = NULL;
116     M[0][1][0] = M[0][1][1] = M[0][1][2] = M[0][1][3] = NULL;
117     M[1][0][0] = NULL;
118     M[1][1][0] = NULL;
119     M[2][0][0] = NULL;
120     M[2][1][0] = NULL;
121     M[3][0][0] = NULL;
122     M[3][1][0] = NULL;
123
124     M[1][0][1] = F.pf_field_field_420;
125     M[1][1][1] = F.pf_frame_field_420;
126     M[2][0][1] = F.pf_field_field_422;
127     M[2][1][1] = F.pf_frame_field_422;
128     M[3][0][1] = F.pf_field_field_444;
129     M[3][1][1] = F.pf_frame_field_444;
130
131     M[1][0][2] = F.pf_field_16x8_420;
132     M[1][1][2] = F.pf_frame_frame_420;
133     M[2][0][2] = F.pf_field_16x8_422;
134     M[2][1][2] = F.pf_frame_frame_422;
135     M[3][0][2] = F.pf_field_16x8_444;
136     M[3][1][2] = F.pf_frame_frame_444;
137
138     M[1][0][3] = F.pf_field_dmv_420;
139     M[1][1][3] = F.pf_frame_dmv_420;
140     M[2][0][3] = F.pf_field_dmv_422;
141     M[2][1][3] = F.pf_frame_dmv_422;
142     M[3][0][3] = F.pf_field_dmv_444;
143     M[3][1][3] = F.pf_frame_dmv_444;
144
145     S[0][0] = S[0][1] = S[0][2] = S[0][3] = NULL;
146     S[1][0] = NULL;
147     S[2][0] = NULL;
148     S[3][0] = NULL;
149
150     S[1][1] = F.pf_field_field_420;
151     S[2][1] = F.pf_field_field_422;
152     S[3][1] = F.pf_field_field_444;
153
154     S[1][2] = F.pf_field_field_420;
155     S[2][2] = F.pf_field_field_422;
156     S[3][2] = F.pf_field_field_444;
157
158     S[1][3] = F.pf_frame_frame_420;
159     S[2][3] = F.pf_frame_frame_422;
160     S[3][3] = F.pf_frame_frame_444;
161 #undef F
162 #undef S
163 #undef M
164
165      /*
166       * Choose the best IDCT module
167       */
168     p_vpar->p_idct_module = module_Need( MODULE_CAPABILITY_IDCT, NULL );
169
170     if( p_vpar->p_idct_module == NULL )
171     {
172         intf_ErrMsg( "vpar error: no suitable IDCT module" );
173         module_Unneed( p_vpar->p_motion_module );
174         free( p_vpar );
175         return( 0 );
176     }
177
178 #define f p_vpar->p_idct_module->p_functions->idct.functions.idct
179     p_vpar->pf_init         = f.pf_init;
180     p_vpar->pf_sparse_idct  = f.pf_sparse_idct;
181     p_vpar->pf_idct         = f.pf_idct;
182     p_vpar->pf_norm_scan    = f.pf_norm_scan;
183 #undef f
184
185     /* Spawn the video parser thread */
186     if ( vlc_thread_create( &p_vpar->thread_id, "video parser",
187                             (vlc_thread_func_t)RunThread, (void *)p_vpar ) )
188     {
189         intf_ErrMsg("vpar error: can't spawn video parser thread");
190         module_Unneed( p_vpar->p_idct_module );
191         module_Unneed( p_vpar->p_motion_module );
192         free( p_vpar );
193         return( 0 );
194     }
195
196     intf_DbgMsg("vpar debug: video parser thread (%p) created", p_vpar);
197     return( p_vpar->thread_id );
198 }
199
200 /* following functions are local */
201
202 /*****************************************************************************
203  * InitThread: initialize vpar output thread
204  *****************************************************************************
205  * This function is called from RunThread and performs the second step of the
206  * initialization. It returns 0 on success. Note that the thread's flag are not
207  * modified inside this function.
208  *****************************************************************************/
209 static int InitThread( vpar_thread_t *p_vpar )
210 {
211 #ifdef VDEC_SMP
212     int i_dummy;
213 #endif
214
215     intf_DbgMsg("vpar debug: initializing video parser thread %p", p_vpar);
216
217     p_vpar->p_config->decoder_config.pf_init_bit_stream( &p_vpar->bit_stream,
218         p_vpar->p_config->decoder_config.p_decoder_fifo, BitstreamCallback,
219         (void *)p_vpar );
220
221     /* Initialize parsing data */
222     p_vpar->sequence.p_forward = NULL;
223     p_vpar->sequence.p_backward = NULL;
224     p_vpar->sequence.intra_quant.b_allocated = 0;
225     p_vpar->sequence.nonintra_quant.b_allocated = 0;
226     p_vpar->sequence.chroma_intra_quant.b_allocated = 0;
227     p_vpar->sequence.chroma_nonintra_quant.b_allocated = 0;
228     p_vpar->sequence.i_matrix_coefficients = 1;
229     p_vpar->sequence.next_pts = p_vpar->sequence.next_dts = 0;
230     p_vpar->sequence.b_expect_discontinuity = 0;
231
232     /* Initialize copyright information */
233     p_vpar->sequence.b_copyright_flag = 0;
234     p_vpar->sequence.b_original = 0;
235     p_vpar->sequence.i_copyright_id = 0;
236     p_vpar->sequence.i_copyright_nb = 0;
237
238     p_vpar->picture.p_picture = NULL;
239     p_vpar->picture.i_current_structure = 0;
240
241     /* Initialize other properties */
242 #ifdef STATS
243     p_vpar->c_loops = 0;
244     p_vpar->c_sequences = 0;
245     memset(p_vpar->pc_pictures, 0, sizeof(p_vpar->pc_pictures));
246     memset(p_vpar->pc_decoded_pictures, 0, sizeof(p_vpar->pc_decoded_pictures));
247     memset(p_vpar->pc_malformed_pictures, 0,
248            sizeof(p_vpar->pc_malformed_pictures));
249 #endif
250
251     /* Initialize video FIFO */
252     vpar_InitFIFO( p_vpar );
253
254     memset( p_vpar->pp_vdec, 0, NB_VDEC*sizeof(vdec_thread_t *) );
255
256 #ifdef VDEC_SMP
257     /* Spawn video_decoder threads */
258     /* FIXME: modify the number of vdecs at runtime ?? */
259     for( i_dummy = 0; i_dummy < NB_VDEC; i_dummy++ )
260     {
261         if( (p_vpar->pp_vdec[i_dummy] = vdec_CreateThread( p_vpar )) == NULL )
262         {
263             return( 1 );
264         }
265     }
266 #else
267     /* Fake a video_decoder thread */
268     if( (p_vpar->pp_vdec[0] = (vdec_thread_t *)malloc(sizeof( vdec_thread_t )))
269          == NULL || vdec_InitThread( p_vpar->pp_vdec[0] ) )
270     {
271         return( 1 );
272     }
273     p_vpar->pp_vdec[0]->b_die = 0;
274     p_vpar->pp_vdec[0]->b_error = 0;
275     p_vpar->pp_vdec[0]->p_vpar = p_vpar;
276
277 #   if !defined(SYS_BEOS) && !defined(WIN32)
278 #       if VDEC_NICE
279     /* Re-nice ourself */
280     if( nice(VDEC_NICE) == -1 )
281     {
282         intf_WarnMsg( 2, "vpar warning : couldn't nice() (%s)",
283                       strerror(errno) );
284     }
285 #       endif
286 #   endif
287 #endif
288
289     /* Initialize lookup tables */
290     vpar_InitMbAddrInc( p_vpar );
291     vpar_InitDCTTables( p_vpar );
292     vpar_InitPMBType( p_vpar );
293     vpar_InitBMBType( p_vpar );
294     vpar_InitDCTTables( p_vpar );
295     vpar_InitScanTable( p_vpar );
296
297     /*
298      * Initialize the synchro properties
299      */
300     vpar_SynchroInit( p_vpar );
301
302     /* Mark thread as running and return */
303     intf_DbgMsg("vpar debug: InitThread(%p) succeeded", p_vpar);
304     return( 0 );
305 }
306
307 /*****************************************************************************
308  * RunThread: generic parser thread
309  *****************************************************************************
310  * Video parser thread. This function only returns when the thread is
311  * terminated.
312  *****************************************************************************/
313 static void RunThread( vpar_thread_t *p_vpar )
314 {
315     intf_DbgMsg("vpar debug: running video parser thread (%p) (pid == %i)", p_vpar, getpid());
316
317     /*
318      * Initialize thread
319      */
320     p_vpar->p_fifo->b_error = InitThread( p_vpar );
321
322     /*
323      * Main loop - it is not executed if an error occured during
324      * initialization
325      */
326     while( (!p_vpar->p_fifo->b_die) && (!p_vpar->p_fifo->b_error) )
327     {
328         /* Find the next sequence header in the stream */
329         p_vpar->p_fifo->b_error = vpar_NextSequenceHeader( p_vpar );
330
331         while( (!p_vpar->p_fifo->b_die) && (!p_vpar->p_fifo->b_error) )
332         {
333 #ifdef STATS
334             p_vpar->c_loops++;
335 #endif
336             /* Parse the next sequence, group or picture header */
337             if( vpar_ParseHeader( p_vpar ) )
338             {
339                 /* End of sequence */
340                 break;
341             };
342         }
343     }
344
345     /*
346      * Error loop
347      */
348     if( p_vpar->p_fifo->b_error )
349     {
350         ErrorThread( p_vpar );
351     }
352
353     /* End of thread */
354     EndThread( p_vpar );
355 }
356
357 /*****************************************************************************
358  * ErrorThread: RunThread() error loop
359  *****************************************************************************
360  * This function is called when an error occured during thread main's loop. The
361  * thread can still receive feed, but must be ready to terminate as soon as
362  * possible.
363  *****************************************************************************/
364 static void ErrorThread( vpar_thread_t *p_vpar )
365 {
366     /* We take the lock, because we are going to read/write the start/end
367      * indexes of the decoder fifo */
368     vlc_mutex_lock( &p_vpar->p_fifo->data_lock );
369
370     /* Wait until a `die' order is sent */
371     while( !p_vpar->p_fifo->b_die )
372     {
373         /* Trash all received PES packets */
374         while( !DECODER_FIFO_ISEMPTY(*p_vpar->p_fifo) )
375         {
376             p_vpar->p_fifo->pf_delete_pes( p_vpar->p_fifo->p_packets_mgt,
377                                   DECODER_FIFO_START(*p_vpar->p_fifo) );
378             DECODER_FIFO_INCSTART( *p_vpar->p_fifo );
379         }
380
381         /* Waiting for the input thread to put new PES packets in the fifo */
382         vlc_cond_wait( &p_vpar->p_fifo->data_wait, &p_vpar->p_fifo->data_lock );
383     }
384
385     /* We can release the lock before leaving */
386     vlc_mutex_unlock( &p_vpar->p_fifo->data_lock );
387 }
388
389 /*****************************************************************************
390  * EndThread: thread destruction
391  *****************************************************************************
392  * This function is called when the thread ends after a sucessful
393  * initialization.
394  *****************************************************************************/
395 static void EndThread( vpar_thread_t *p_vpar )
396 {
397 #ifdef VDEC_SMP
398     int i_dummy;
399 #endif
400
401     intf_DbgMsg("vpar debug: destroying video parser thread %p", p_vpar);
402
403     /* Release used video buffers. */
404     if( p_vpar->sequence.p_forward != NULL )
405     {
406         vout_UnlinkPicture( p_vpar->p_vout, p_vpar->sequence.p_forward );
407     }
408     if( p_vpar->sequence.p_backward != NULL )
409     {
410         vout_DatePicture( p_vpar->p_vout, p_vpar->sequence.p_backward,
411                           vpar_SynchroDate( p_vpar ) );
412         vout_UnlinkPicture( p_vpar->p_vout, p_vpar->sequence.p_backward );
413     }
414     if( p_vpar->picture.p_picture != NULL )
415     {
416         vout_DestroyPicture( p_vpar->p_vout, p_vpar->picture.p_picture );
417     }
418
419 #ifdef STATS
420     intf_Msg("vpar stats: %d loops among %d sequence(s)",
421              p_vpar->c_loops, p_vpar->c_sequences);
422
423     {
424         struct tms cpu_usage;
425         times( &cpu_usage );
426
427         intf_Msg("vpar stats: cpu usage (user: %d, system: %d)",
428                  cpu_usage.tms_utime, cpu_usage.tms_stime);
429     }
430
431     intf_Msg("vpar stats: Read %d frames/fields (I %d/P %d/B %d)",
432              p_vpar->pc_pictures[I_CODING_TYPE]
433              + p_vpar->pc_pictures[P_CODING_TYPE]
434              + p_vpar->pc_pictures[B_CODING_TYPE],
435              p_vpar->pc_pictures[I_CODING_TYPE],
436              p_vpar->pc_pictures[P_CODING_TYPE],
437              p_vpar->pc_pictures[B_CODING_TYPE]);
438     intf_Msg("vpar stats: Decoded %d frames/fields (I %d/P %d/B %d)",
439              p_vpar->pc_decoded_pictures[I_CODING_TYPE]
440              + p_vpar->pc_decoded_pictures[P_CODING_TYPE]
441              + p_vpar->pc_decoded_pictures[B_CODING_TYPE],
442              p_vpar->pc_decoded_pictures[I_CODING_TYPE],
443              p_vpar->pc_decoded_pictures[P_CODING_TYPE],
444              p_vpar->pc_decoded_pictures[B_CODING_TYPE]);
445     intf_Msg("vpar stats: Read %d malformed frames/fields (I %d/P %d/B %d)",
446              p_vpar->pc_malformed_pictures[I_CODING_TYPE]
447              + p_vpar->pc_malformed_pictures[P_CODING_TYPE]
448              + p_vpar->pc_malformed_pictures[B_CODING_TYPE],
449              p_vpar->pc_malformed_pictures[I_CODING_TYPE],
450              p_vpar->pc_malformed_pictures[P_CODING_TYPE],
451              p_vpar->pc_malformed_pictures[B_CODING_TYPE]);
452 #define S   p_vpar->sequence
453     intf_Msg("vpar info: %s stream (%dx%d), %d.%d pi/s",
454              S.b_mpeg2 ? "MPEG-2" : "MPEG-1",
455              S.i_width, S.i_height, S.i_frame_rate/1001, S.i_frame_rate % 1001);
456     intf_Msg("vpar info: %s, %s, matrix_coeff: %d",
457              S.b_progressive ? "Progressive" : "Non-progressive",
458              S.i_scalable_mode ? "scalable" : "non-scalable",
459              S.i_matrix_coefficients);
460 #endif
461
462     /* Dispose of matrices if they have been allocated. */
463     if( p_vpar->sequence.intra_quant.b_allocated )
464     {
465         free( p_vpar->sequence.intra_quant.pi_matrix );
466     }
467     if( p_vpar->sequence.nonintra_quant.b_allocated )
468     {
469         free( p_vpar->sequence.nonintra_quant.pi_matrix) ;
470     }
471     if( p_vpar->sequence.chroma_intra_quant.b_allocated )
472     {
473         free( p_vpar->sequence.chroma_intra_quant.pi_matrix );
474     }
475     if( p_vpar->sequence.chroma_nonintra_quant.b_allocated )
476     {
477         free( p_vpar->sequence.chroma_nonintra_quant.pi_matrix );
478     }
479
480 #ifdef VDEC_SMP
481     /* Destroy vdec threads */
482     for( i_dummy = 0; i_dummy < NB_VDEC; i_dummy++ )
483     {
484         if( p_vpar->pp_vdec[i_dummy] != NULL )
485             vdec_DestroyThread( p_vpar->pp_vdec[i_dummy] );
486         else
487             break;
488     }
489 #else
490     free( p_vpar->pp_vdec[0] );
491 #endif
492
493     free( p_vpar->p_config );
494
495 #ifdef VDEC_SMP
496     /* Destroy lock and cond */
497     vlc_mutex_destroy( &(p_vpar->vbuffer.lock) );
498     vlc_cond_destroy( &(p_vpar->vfifo.wait) );
499     vlc_mutex_destroy( &(p_vpar->vfifo.lock) );
500 #endif
501     
502     vlc_mutex_destroy( &(p_vpar->synchro.fifo_lock) );
503     
504     module_Unneed( p_vpar->p_idct_module );
505     module_Unneed( p_vpar->p_motion_module );
506
507     free( p_vpar );
508
509     intf_DbgMsg("vpar debug: EndThread(%p)", p_vpar);
510 }
511
512 /*****************************************************************************
513  * BitstreamCallback: Import parameters from the new data/PES packet
514  *****************************************************************************
515  * This function is called by input's NextDataPacket.
516  *****************************************************************************/
517 static void BitstreamCallback ( bit_stream_t * p_bit_stream,
518                                 boolean_t b_new_pes )
519 {
520     vpar_thread_t * p_vpar = (vpar_thread_t *)p_bit_stream->p_callback_arg;
521
522     if( b_new_pes )
523     {
524         p_vpar->sequence.next_pts =
525             DECODER_FIFO_START( *p_bit_stream->p_decoder_fifo )->i_pts;
526         p_vpar->sequence.next_dts =
527             DECODER_FIFO_START( *p_bit_stream->p_decoder_fifo )->i_dts;
528         p_vpar->sequence.i_current_rate =
529             DECODER_FIFO_START( *p_bit_stream->p_decoder_fifo )->i_rate;
530
531         if( DECODER_FIFO_START( *p_bit_stream->p_decoder_fifo )->b_discontinuity )
532         {
533 #ifdef TRACE_VPAR
534             intf_DbgMsg( "Discontinuity in BitstreamCallback" );
535 #endif
536             /* Escape the current picture and reset the picture predictors. */
537             p_vpar->sequence.b_expect_discontinuity = 1;
538             p_vpar->picture.b_error = 1;
539         }
540     }
541
542     if( p_bit_stream->p_data->b_discard_payload )
543     {
544 #ifdef TRACE_VPAR
545         intf_DbgMsg( "Discard payload in BitstreamCallback" );
546 #endif
547         /* 1 packet messed up, trash the slice. */
548         p_vpar->picture.b_error = 1;
549     }
550 }