modules/codec/libmpeg2.c

   1 /*****************************************************************************
   2  * libmpeg2.c: mpeg2 video decoder module making use of libmpeg2.
   3  *****************************************************************************
   4  * Copyright (C) 1999-2001 VLC authors and VideoLAN
   5  * $Id$
   6  *
   7  * Authors: Gildas Bazin <gbazin@videolan.org>
   8  *          Christophe Massiot <massiot@via.ecp.fr>
   9  *
  10  * This program is free software; you can redistribute it and/or modify it
  11  * under the terms of the GNU Lesser General Public License as published by
  12  * the Free Software Foundation; either version 2.1 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 Lesser General Public License for more details.
  19  *
  20  * You should have received a copy of the GNU Lesser General Public License
  21  * along with this program; if not, write to the Free Software Foundation,
  22  * Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
  23  *****************************************************************************/
  24
  25 /*****************************************************************************
  26  * NOTA BENE: this module requires the linking against a library which is
  27  * known to require licensing under the GNU General Public License version 2
  28  * (or later). Therefore, the result of compiling this module will normally
  29  * be subject to the terms of that later license.
  30  *****************************************************************************/
  31
  32
  33 /*****************************************************************************
  34  * Preamble
  35  *****************************************************************************/
  36 #ifdef HAVE_CONFIG_H
  37 # include "config.h"
  38 #endif
  39 #include <assert.h>
  40
  41 #include <vlc_common.h>
  42 #include <vlc_plugin.h>
  43 #include <vlc_codec.h>
  44 #include <vlc_block_helper.h>
  45 #include <vlc_cpu.h>
  46 #include "../codec/cc.h"
  47
  48 #include <mpeg2.h>
  49
  50 #include <vlc_codec_synchro.h>
  51
  52 /*****************************************************************************
  53  * decoder_sys_t : libmpeg2 decoder descriptor
  54  *****************************************************************************/
  55 #define DPB_COUNT (3+1)
  56 typedef struct
  57 {
  58     picture_t *p_picture;
  59     bool      b_linked;
  60     bool      b_displayed;
  61 } picture_dpb_t;
  62
  63 struct decoder_sys_t
  64 {
  65     /*
  66      * libmpeg2 properties
  67      */
  68     mpeg2dec_t          *p_mpeg2dec;
  69     const mpeg2_info_t  *p_info;
  70     bool                b_skip;
  71
  72     /*
  73      * Input properties
  74      */
  75     mtime_t          i_previous_pts;
  76     mtime_t          i_current_pts;
  77     mtime_t          i_previous_dts;
  78     mtime_t          i_current_dts;
  79     bool             b_garbage_pic;
  80     bool             b_after_sequence_header; /* is it the next frame after
  81                                                * the sequence header ?    */
  82     bool             b_slice_i;             /* intra-slice refresh stream */
  83     bool             b_second_field;
  84
  85     bool             b_preroll;
  86
  87     /* */
  88     picture_dpb_t        p_dpb[DPB_COUNT];
  89
  90     /*
  91      * Output properties
  92      */
  93     decoder_synchro_t *p_synchro;
  94     int             i_sar_num;
  95     int             i_sar_den;
  96     mtime_t         i_last_frame_pts;
  97
  98     /* Closed captioning support */
  99     uint32_t        i_cc_flags;
 100     mtime_t         i_cc_pts;
 101     mtime_t         i_cc_dts;
 102     cc_data_t       cc;
 103     uint8_t        *p_gop_user_data;
 104     uint32_t        i_gop_user_data;
 105 };
 106
 107 /*****************************************************************************
 108  * Local prototypes
 109  *****************************************************************************/
 110 static int  OpenDecoder( vlc_object_t * );
 111 static void CloseDecoder( vlc_object_t * );
 112
 113 static int DecodeVideo( decoder_t *, block_t *);
 114 #if MPEG2_RELEASE >= MPEG2_VERSION (0, 5, 0)
 115 #endif
 116
 117 static picture_t *GetNewPicture( decoder_t * );
 118 static void PutPicture( decoder_t *, picture_t * );
 119
 120 static void GetAR( decoder_t *p_dec );
 121
 122 static void Reset( decoder_t *p_dec );
 123
 124 /* */
 125 static void DpbInit( decoder_t * );
 126 static void DpbClean( decoder_t * );
 127 static picture_t *DpbNewPicture( decoder_t * );
 128 static void DpbUnlinkPicture( decoder_t *, picture_t * );
 129 static int DpbDisplayPicture( decoder_t *, picture_t * );
 130
 131 /*****************************************************************************
 132  * Module descriptor
 133  *****************************************************************************/
 134 vlc_module_begin ()
 135     set_description( N_("MPEG I/II video decoder (using libmpeg2)") )
 136     set_capability( "decoder", 50 )
 137     set_category( CAT_INPUT )
 138     set_subcategory( SUBCAT_INPUT_VCODEC )
 139     set_callbacks( OpenDecoder, CloseDecoder )
 140     add_shortcut( "libmpeg2" )
 141 vlc_module_end ()
 142
 143 /*****************************************************************************
 144  * OpenDecoder: probe the decoder and return score
 145  *****************************************************************************/
 146 static int OpenDecoder( vlc_object_t *p_this )
 147 {
 148     decoder_t *p_dec = (decoder_t*)p_this;
 149     decoder_sys_t *p_sys;
 150     uint32_t i_accel = 0;
 151
 152     if( p_dec->fmt_in.i_codec != VLC_CODEC_MPGV )
 153         return VLC_EGENERIC;
 154
 155     /* Select onl recognized original format (standard mpeg video) */
 156     switch( p_dec->fmt_in.i_original_fourcc )
 157     {
 158     case VLC_FOURCC('m','p','g','1'):
 159     case VLC_FOURCC('m','p','g','2'):
 160     case VLC_FOURCC('m','p','g','v'):
 161     case VLC_FOURCC('P','I','M','1'):
 162     case VLC_FOURCC('h','d','v','2'):
 163         break;
 164     default:
 165         if( p_dec->fmt_in.i_original_fourcc )
 166             return VLC_EGENERIC;
 167         break;
 168     }
 169
 170     /* Allocate the memory needed to store the decoder's structure */
 171     if( ( p_dec->p_sys = p_sys = calloc( 1, sizeof(*p_sys)) ) == NULL )
 172         return VLC_ENOMEM;
 173
 174     /* Initialize the thread properties */
 175     p_sys->p_mpeg2dec = NULL;
 176     p_sys->p_synchro  = NULL;
 177     p_sys->p_info     = NULL;
 178     p_sys->i_current_pts  = 0;
 179     p_sys->i_previous_pts = 0;
 180     p_sys->i_current_dts  = 0;
 181     p_sys->i_previous_dts = 0;
 182     p_sys->i_sar_num = 0;
 183     p_sys->i_sar_den = 0;
 184     p_sys->b_garbage_pic = false;
 185     p_sys->b_slice_i  = false;
 186     p_sys->b_second_field = false;
 187     p_sys->b_skip     = false;
 188     p_sys->b_preroll = false;
 189     DpbInit( p_dec );
 190
 191     p_sys->i_cc_pts = 0;
 192     p_sys->i_cc_dts = 0;
 193     p_sys->i_cc_flags = 0;
 194 #if MPEG2_RELEASE >= MPEG2_VERSION (0, 5, 0)
 195     cc_Init( &p_sys->cc );
 196 #endif
 197     p_sys->p_gop_user_data = NULL;
 198     p_sys->i_gop_user_data = 0;
 199
 200 #if defined( __i386__ ) || defined( __x86_64__ )
 201     if( vlc_CPU_MMX() )
 202         i_accel |= MPEG2_ACCEL_X86_MMX;
 203     if( vlc_CPU_3dNOW() )
 204         i_accel |= MPEG2_ACCEL_X86_3DNOW;
 205     if( vlc_CPU_MMXEXT() )
 206         i_accel |= MPEG2_ACCEL_X86_MMXEXT;
 207 #elif defined( __powerpc__ ) || defined( __ppc__ ) || defined( __ppc64__ )
 208     if( vlc_CPU_ALTIVEC() )
 209         i_accel |= MPEG2_ACCEL_PPC_ALTIVEC;
 210
 211 #elif defined(__arm__)
 212 # ifdef MPEG2_ACCEL_ARM
 213     i_accel |= MPEG2_ACCEL_ARM;
 214 # endif
 215 # ifdef MPEG2_ACCEL_ARM_NEON
 216     if( vlc_CPU_ARM_NEON() )
 217         i_accel |= MPEG2_ACCEL_ARM_NEON;
 218 # endif
 219
 220     /* TODO: sparc */
 221 #else
 222     /* If we do not know this CPU, trust libmpeg2's feature detection */
 223     i_accel = MPEG2_ACCEL_DETECT;
 224
 225 #endif
 226
 227     /* Set CPU acceleration features */
 228     mpeg2_accel( i_accel );
 229
 230     /* Initialize decoder */
 231     p_sys->p_mpeg2dec = mpeg2_init();
 232     if( p_sys->p_mpeg2dec == NULL)
 233     {
 234         msg_Err( p_dec, "mpeg2_init() failed" );
 235         free( p_sys );
 236         return VLC_EGENERIC;
 237     }
 238
 239     p_sys->p_info = mpeg2_info( p_sys->p_mpeg2dec );
 240
 241     p_dec->pf_decode = DecodeVideo;
 242     p_dec->pf_flush  = Reset;
 243     p_dec->fmt_out.i_cat = VIDEO_ES;
 244     p_dec->fmt_out.i_codec = 0;
 245
 246     return VLC_SUCCESS;
 247 }
 248
 249 /*****************************************************************************
 250  * RunDecoder: the libmpeg2 decoder
 251  *****************************************************************************/
 252 static picture_t *DecodeBlock( decoder_t *p_dec, block_t **pp_block )
 253 {
 254     decoder_sys_t   *p_sys = p_dec->p_sys;
 255     mpeg2_state_t   state;
 256
 257     block_t *p_block;
 258
 259     if( !pp_block || !*pp_block )
 260         return NULL;
 261
 262     p_block = *pp_block;
 263     if( p_block->i_flags & (BLOCK_FLAG_CORRUPTED) )
 264         Reset( p_dec );
 265
 266     while( 1 )
 267     {
 268         state = mpeg2_parse( p_sys->p_mpeg2dec );
 269
 270         switch( state )
 271         {
 272         case STATE_SEQUENCE:
 273         {
 274             /* */
 275             DpbClean( p_dec );
 276
 277             /* */
 278             mpeg2_custom_fbuf( p_sys->p_mpeg2dec, 1 );
 279
 280             /* Set the first 2 reference frames */
 281             GetAR( p_dec );
 282             for( int i = 0; i < 2; i++ )
 283             {
 284                 picture_t *p_picture = DpbNewPicture( p_dec );
 285                 if( !p_picture )
 286                 {
 287                     Reset( p_dec );
 288                     block_Release( p_block );
 289                     return NULL;
 290                 }
 291                 PutPicture( p_dec, p_picture );
 292             }
 293
 294             if( p_sys->p_synchro )
 295                 decoder_SynchroRelease( p_sys->p_synchro );
 296
 297             if( p_sys->p_info->sequence->frame_period <= 0 )
 298                 p_sys->p_synchro = NULL;
 299             else
 300                 p_sys->p_synchro =
 301                 decoder_SynchroInit( p_dec, (uint32_t)(UINT64_C(1001000000) *
 302                                 27 / p_sys->p_info->sequence->frame_period) );
 303             p_sys->b_after_sequence_header = true;
 304             break;
 305         }
 306
 307         case STATE_GOP:
 308             /* There can be userdata in a GOP. It needs to be remembered for the next picture. */
 309             if( p_sys->p_info->user_data_len > 2 )
 310             {
 311                 free( p_sys->p_gop_user_data );
 312                 p_sys->p_gop_user_data = calloc( p_sys->p_info->user_data_len, sizeof(uint8_t) );
 313                 if( p_sys->p_gop_user_data )
 314                 {
 315                     p_sys->i_gop_user_data = p_sys->p_info->user_data_len;
 316                     memcpy( p_sys->p_gop_user_data, p_sys->p_info->user_data, p_sys->p_info->user_data_len );
 317                 }
 318             }
 319             break;
 320
 321         case STATE_PICTURE:
 322         {
 323             const mpeg2_info_t *p_info = p_sys->p_info;
 324             const mpeg2_picture_t *p_current = p_info->current_picture;
 325
 326             mtime_t i_pts, i_dts;
 327
 328             if( p_sys->b_after_sequence_header &&
 329                 (p_current->flags &
 330                     PIC_MASK_CODING_TYPE) == PIC_FLAG_CODING_TYPE_P )
 331             {
 332                 /* Intra-slice refresh. Simulate a blank I picture. */
 333                 msg_Dbg( p_dec, "intra-slice refresh stream" );
 334                 decoder_SynchroNewPicture( p_sys->p_synchro,
 335                                            I_CODING_TYPE, 2, 0, 0,
 336                                            p_info->sequence->flags & SEQ_FLAG_LOW_DELAY );
 337                 decoder_SynchroDecode( p_sys->p_synchro );
 338                 decoder_SynchroEnd( p_sys->p_synchro, I_CODING_TYPE, 0 );
 339                 p_sys->b_slice_i = true;
 340             }
 341             p_sys->b_after_sequence_header = false;
 342
 343 #ifdef PIC_FLAG_PTS
 344             i_pts = p_current->flags & PIC_FLAG_PTS ?
 345                 ( ( p_current->pts ==
 346                     (uint32_t)p_sys->i_current_pts ) ?
 347                   p_sys->i_current_pts : p_sys->i_previous_pts ) : 0;
 348             i_dts = 0;
 349
 350             /* Hack to handle demuxers which only have DTS timestamps */
 351             if( !i_pts && !p_block->i_pts && p_block->i_dts > 0 )
 352             {
 353                 if( p_info->sequence->flags & SEQ_FLAG_LOW_DELAY ||
 354                     (p_current->flags &
 355                       PIC_MASK_CODING_TYPE) == PIC_FLAG_CODING_TYPE_B )
 356                 {
 357                     i_pts = p_block->i_dts;
 358                 }
 359             }
 360             p_block->i_pts = p_block->i_dts = 0;
 361             /* End hack */
 362
 363 #else /* New interface */
 364
 365             i_pts = p_current->flags & PIC_FLAG_TAGS ?
 366                 ( ( p_current->tag == (uint32_t)p_sys->i_current_pts ) ?
 367                             p_sys->i_current_pts : p_sys->i_previous_pts ) : 0;
 368             i_dts = p_current->flags & PIC_FLAG_TAGS ?
 369                 ( ( p_current->tag2 == (uint32_t)p_sys->i_current_dts ) ?
 370                             p_sys->i_current_dts : p_sys->i_previous_dts ) : 0;
 371 #endif
 372
 373             /* If nb_fields == 1, it is a field picture, and it will be
 374              * followed by another field picture for which we won't call
 375              * decoder_SynchroNewPicture() because this would have other
 376              * problems, so we take it into account here.
 377              * This kind of sucks, but I didn't think better. --Meuuh
 378              */
 379             decoder_SynchroNewPicture( p_sys->p_synchro,
 380                                        p_current->flags & PIC_MASK_CODING_TYPE,
 381                                        p_current->nb_fields == 1 ? 2 :
 382                                        p_current->nb_fields, i_pts, i_dts,
 383                                        p_info->sequence->flags & SEQ_FLAG_LOW_DELAY );
 384
 385
 386             picture_t *p_pic;
 387
 388             if( p_dec->b_frame_drop_allowed && !p_sys->b_preroll &&
 389                 !(p_sys->b_slice_i
 390                    && ((p_current->flags
 391                          & PIC_MASK_CODING_TYPE) == PIC_FLAG_CODING_TYPE_P))
 392                    && !decoder_SynchroChoose( p_sys->p_synchro,
 393                               p_current->flags
 394                                 & PIC_MASK_CODING_TYPE,
 395                               /*p_sys->p_vout->render_time*/ 0 /*FIXME*/,
 396                               p_info->sequence->flags & SEQ_FLAG_LOW_DELAY ) )
 397                 p_pic = NULL;
 398             else
 399             {
 400                 p_pic = DpbNewPicture( p_dec );
 401                 if( !p_pic )
 402                 {
 403                     Reset( p_dec );
 404
 405                     p_pic = DpbNewPicture( p_dec );
 406                     if( !p_pic )
 407                     {
 408                         mpeg2_reset( p_sys->p_mpeg2dec, 1 );
 409                         block_Release( p_block );
 410                         return NULL;
 411                     }
 412                 }
 413             }
 414
 415             mpeg2_skip( p_sys->p_mpeg2dec, p_pic == NULL );
 416             p_sys->b_skip = p_pic == NULL;
 417             if( p_pic != NULL )
 418                 decoder_SynchroDecode( p_sys->p_synchro );
 419             else
 420                 decoder_SynchroTrash( p_sys->p_synchro );
 421
 422             PutPicture( p_dec, p_pic );
 423
 424             if( p_info->user_data_len > 2 || p_sys->i_gop_user_data > 2 )
 425             {
 426                 p_sys->i_cc_pts = i_pts;
 427                 p_sys->i_cc_dts = i_dts;
 428                 if( (p_current->flags
 429                              & PIC_MASK_CODING_TYPE) == PIC_FLAG_CODING_TYPE_P )
 430                     p_sys->i_cc_flags = BLOCK_FLAG_TYPE_P;
 431                 else if( (p_current->flags
 432                              & PIC_MASK_CODING_TYPE) == PIC_FLAG_CODING_TYPE_B )
 433                     p_sys->i_cc_flags = BLOCK_FLAG_TYPE_B;
 434                 else p_sys->i_cc_flags = BLOCK_FLAG_TYPE_I;
 435                 bool b_top_field_first = p_sys->p_info->current_picture->flags
 436                                            & PIC_FLAG_TOP_FIELD_FIRST;
 437
 438                 if( p_sys->i_gop_user_data > 2 )
 439                 {
 440                     /* We now have picture info for any cached user_data out of the gop */
 441                     cc_ProbeAndExtract( &p_sys->cc, b_top_field_first,
 442                                 &p_sys->p_gop_user_data[0], p_sys->i_gop_user_data );
 443                     p_sys->i_gop_user_data = 0;
 444                 }
 445
 446                 /* Extract the CC from the user_data of the picture */
 447                 if( p_info->user_data_len > 2 )
 448                     cc_ProbeAndExtract( &p_sys->cc, b_top_field_first,
 449                                 &p_info->user_data[0], p_info->user_data_len );
 450             }
 451         }
 452         break;
 453
 454
 455         case STATE_BUFFER:
 456             if( !p_block->i_buffer )
 457             {
 458                 block_Release( p_block );
 459                 return NULL;
 460             }
 461
 462             if( (p_block->i_flags & (BLOCK_FLAG_DISCONTINUITY
 463                                       | BLOCK_FLAG_CORRUPTED)) &&
 464                 p_sys->p_synchro &&
 465                 p_sys->p_info->sequence &&
 466                 p_sys->p_info->sequence->width != (unsigned)-1 )
 467             {
 468                 decoder_SynchroReset( p_sys->p_synchro );
 469                 if( p_sys->p_info->current_fbuf != NULL &&
 470                     p_sys->p_info->current_fbuf->id != NULL )
 471                 {
 472                     p_sys->b_garbage_pic = true;
 473                 }
 474                 if( p_sys->b_slice_i )
 475                 {
 476                     decoder_SynchroNewPicture( p_sys->p_synchro,
 477                                                I_CODING_TYPE, 2, 0, 0,
 478                                                p_sys->p_info->sequence->flags &
 479                                                             SEQ_FLAG_LOW_DELAY );
 480                     decoder_SynchroDecode( p_sys->p_synchro );
 481                     decoder_SynchroEnd( p_sys->p_synchro, I_CODING_TYPE, 0 );
 482                 }
 483             }
 484
 485             if( p_block->i_flags & BLOCK_FLAG_PREROLL )
 486             {
 487                 p_sys->b_preroll = true;
 488             }
 489             else if( p_sys->b_preroll )
 490             {
 491                 p_sys->b_preroll = false;
 492                 if( p_sys->p_synchro )
 493                     decoder_SynchroReset( p_sys->p_synchro );
 494             }
 495
 496 #ifdef PIC_FLAG_PTS
 497             if( p_block->i_pts )
 498             {
 499                 mpeg2_pts( p_sys->p_mpeg2dec, (uint32_t)p_block->i_pts );
 500
 501 #else /* New interface */
 502             if( p_block->i_pts || p_block->i_dts )
 503             {
 504                 mpeg2_tag_picture( p_sys->p_mpeg2dec,
 505                                    (uint32_t)p_block->i_pts,
 506                                    (uint32_t)p_block->i_dts );
 507 #endif
 508                 p_sys->i_previous_pts = p_sys->i_current_pts;
 509                 p_sys->i_current_pts = p_block->i_pts;
 510                 p_sys->i_previous_dts = p_sys->i_current_dts;
 511                 p_sys->i_current_dts = p_block->i_dts;
 512             }
 513
 514             mpeg2_buffer( p_sys->p_mpeg2dec, p_block->p_buffer,
 515                           p_block->p_buffer + p_block->i_buffer );
 516
 517             p_block->i_buffer = 0;
 518             break;
 519
 520 #if MPEG2_RELEASE >= MPEG2_VERSION (0, 5, 0)
 521
 522         case STATE_SEQUENCE_MODIFIED:
 523             GetAR( p_dec );
 524             break;
 525 #endif
 526         case STATE_PICTURE_2ND:
 527             p_sys->b_second_field = true;
 528             break;
 529
 530
 531         case STATE_INVALID_END:
 532         case STATE_END:
 533         case STATE_SLICE:
 534         {
 535             picture_t *p_pic = NULL;
 536
 537             if( p_sys->p_info->display_fbuf &&
 538                 p_sys->p_info->display_fbuf->id )
 539             {
 540                 p_pic = p_sys->p_info->display_fbuf->id;
 541                 if( DpbDisplayPicture( p_dec, p_pic ) )
 542                     p_pic = NULL;
 543
 544                 decoder_SynchroEnd( p_sys->p_synchro,
 545                                     p_sys->p_info->display_picture->flags & PIC_MASK_CODING_TYPE,
 546                                     p_sys->b_garbage_pic );
 547
 548                 if( p_pic )
 549                 {
 550                     p_pic->date = decoder_SynchroDate( p_sys->p_synchro );
 551                     if( p_sys->b_garbage_pic )
 552                         p_pic->date = 0; /* ??? */
 553                     p_sys->b_garbage_pic = false;
 554                 }
 555             }
 556
 557             if( p_sys->p_info->discard_fbuf &&
 558                 p_sys->p_info->discard_fbuf->id )
 559             {
 560                 DpbUnlinkPicture( p_dec, p_sys->p_info->discard_fbuf->id );
 561             }
 562
 563             if( p_pic )
 564             {
 565                 if( state == STATE_END )
 566                     p_pic->b_force = true; /* For still frames */
 567
 568                 /* Avoid frames with identical timestamps.
 569                  * Especially needed for still frames in DVD menus. */
 570                 if( p_sys->i_last_frame_pts == p_pic->date )
 571                     p_pic->date++;
 572                 p_sys->i_last_frame_pts = p_pic->date;
 573                 return p_pic;
 574             }
 575             break;
 576         }
 577
 578         case STATE_INVALID:
 579         {
 580             msg_Err( p_dec, "invalid picture encountered" );
 581             /* I don't think we have anything to do, but well without
 582              * docs ... */
 583             break;
 584         }
 585
 586         default:
 587             break;
 588         }
 589     }
 590
 591     /* Never reached */
 592     return NULL;
 593 }
 594
 595 static int DecodeVideo( decoder_t *p_dec, block_t *p_block)
 596 {
 597     decoder_sys_t *p_sys = p_dec->p_sys;
 598
 599     if( p_block == NULL ) /* No Drain */
 600         return VLCDEC_SUCCESS;
 601
 602     block_t **pp_block = &p_block;
 603     picture_t *p_pic;
 604     while( ( p_pic = DecodeBlock( p_dec, pp_block ) ) != NULL )
 605     {
 606         block_t *p_cc = NULL;
 607         bool *pb_present = NULL;
 608 #if MPEG2_RELEASE >= MPEG2_VERSION (0, 5, 0)
 609         pb_present = p_sys->cc.pb_present;
 610         if( p_sys->cc.i_data > 0 )
 611         {
 612             p_cc = block_Alloc( p_sys->cc.i_data);
 613             if( p_cc )
 614             {
 615                 memcpy( p_cc->p_buffer, p_sys->cc.p_data, p_sys->cc.i_data );
 616                 p_cc->i_dts =
 617                 p_cc->i_pts = p_sys->cc.b_reorder ? p_sys->i_cc_pts : p_sys->i_cc_dts;
 618                 p_cc->i_flags = ( p_sys->cc.b_reorder  ? p_sys->i_cc_flags : BLOCK_FLAG_TYPE_P ) & ( BLOCK_FLAG_TYPE_I|BLOCK_FLAG_TYPE_P|BLOCK_FLAG_TYPE_B);
 619             }
 620             cc_Flush( &p_sys->cc );
 621         }
 622 #endif
 623         decoder_QueueVideoWithCc( p_dec, p_pic, p_cc, pb_present );
 624     }
 625     return VLCDEC_SUCCESS;
 626 }
 627
 628 /*****************************************************************************
 629  * CloseDecoder: libmpeg2 decoder destruction
 630  *****************************************************************************/
 631 static void CloseDecoder( vlc_object_t *p_this )
 632 {
 633     decoder_t *p_dec = (decoder_t *)p_this;
 634     decoder_sys_t *p_sys = p_dec->p_sys;
 635
 636     DpbClean( p_dec );
 637
 638     free( p_sys->p_gop_user_data );
 639
 640     if( p_sys->p_synchro ) decoder_SynchroRelease( p_sys->p_synchro );
 641
 642     if( p_sys->p_mpeg2dec ) mpeg2_close( p_sys->p_mpeg2dec );
 643
 644     free( p_sys );
 645 }
 646
 647 /*****************************************************************************
 648  * Reset: reset the decoder state
 649  *****************************************************************************/
 650 static void Reset( decoder_t *p_dec )
 651 {
 652     decoder_sys_t *p_sys = p_dec->p_sys;
 653
 654     cc_Flush( &p_sys->cc );
 655     mpeg2_reset( p_sys->p_mpeg2dec, 0 );
 656     DpbClean( p_dec );
 657 }
 658
 659 /*****************************************************************************
 660  * GetNewPicture: Get a new picture from the vout and set the buf struct
 661  *****************************************************************************/
 662 static picture_t *GetNewPicture( decoder_t *p_dec )
 663 {
 664     decoder_sys_t *p_sys = p_dec->p_sys;
 665     picture_t *p_pic;
 666
 667     p_dec->fmt_out.video.i_width = p_sys->p_info->sequence->width;
 668     p_dec->fmt_out.video.i_visible_width =
 669         p_sys->p_info->sequence->picture_width;
 670     p_dec->fmt_out.video.i_height = p_sys->p_info->sequence->height;
 671     p_dec->fmt_out.video.i_visible_height =
 672         p_sys->p_info->sequence->picture_height;
 673     p_dec->fmt_out.video.i_sar_num = p_sys->i_sar_num;
 674     p_dec->fmt_out.video.i_sar_den = p_sys->i_sar_den;
 675
 676     if( p_sys->p_info->sequence->frame_period > 0 )
 677     {
 678         p_dec->fmt_out.video.i_frame_rate =
 679             (uint32_t)( (uint64_t)1001000000 * 27 /
 680                         p_sys->p_info->sequence->frame_period );
 681         p_dec->fmt_out.video.i_frame_rate_base = 1001;
 682     }
 683
 684     p_dec->fmt_out.i_codec =
 685         ( p_sys->p_info->sequence->chroma_height <
 686           p_sys->p_info->sequence->height ) ?
 687         VLC_CODEC_I420 : VLC_CODEC_I422;
 688
 689     /* Get a new picture */
 690     if( decoder_UpdateVideoFormat( p_dec ) )
 691         return NULL;
 692     p_pic = decoder_NewPicture( p_dec );
 693
 694     if( p_pic == NULL )
 695         return NULL;
 696
 697     p_pic->b_progressive = p_sys->p_info->current_picture != NULL ?
 698         p_sys->p_info->current_picture->flags & PIC_FLAG_PROGRESSIVE_FRAME : 1;
 699     p_pic->b_top_field_first = p_sys->p_info->current_picture != NULL ?
 700         p_sys->p_info->current_picture->flags & PIC_FLAG_TOP_FIELD_FIRST : 1;
 701     p_pic->i_nb_fields = p_sys->p_info->current_picture != NULL ?
 702         p_sys->p_info->current_picture->nb_fields : 2;
 703
 704     return p_pic;
 705 }
 706
 707 /*****************************************************************************
 708  * GetAR: Get aspect ratio
 709  *****************************************************************************/
 710 static void GetAR( decoder_t *p_dec )
 711 {
 712     decoder_sys_t *p_sys = p_dec->p_sys;
 713     int i_old_sar_num = p_sys->i_sar_num;
 714     int i_old_sar_den = p_sys->i_sar_den;
 715
 716     /* Check whether the input gave a particular aspect ratio */
 717     if( p_dec->fmt_in.video.i_sar_num > 0 &&
 718         p_dec->fmt_in.video.i_sar_den > 0 )
 719     {
 720         p_sys->i_sar_num = p_dec->fmt_in.video.i_sar_num;
 721         p_sys->i_sar_den = p_dec->fmt_in.video.i_sar_den;
 722     }
 723     /* Use the value provided in the MPEG sequence header */
 724     else if( p_sys->p_info->sequence->pixel_height > 0 )
 725     {
 726         p_sys->i_sar_num = p_sys->p_info->sequence->pixel_width;
 727         p_sys->i_sar_den = p_sys->p_info->sequence->pixel_height;
 728     }
 729     else
 730     {
 731         /* Invalid aspect, assume 4:3.
 732          * This shouldn't happen and if it does it is a bug
 733          * in libmpeg2 (likely triggered by an invalid stream) */
 734         p_sys->i_sar_num = p_sys->p_info->sequence->picture_height * 4;
 735         p_sys->i_sar_den = p_sys->p_info->sequence->picture_width * 3;
 736     }
 737
 738     if( p_sys->i_sar_num == i_old_sar_num &&
 739         p_sys->i_sar_den == i_old_sar_den )
 740         return;
 741
 742     if( p_sys->p_info->sequence->frame_period > 0 )
 743         msg_Dbg( p_dec,
 744                  "%dx%d (display %d,%d), sar %i:%i, %u.%03u fps",
 745                  p_sys->p_info->sequence->picture_width,
 746                  p_sys->p_info->sequence->picture_height,
 747                  p_sys->p_info->sequence->display_width,
 748                  p_sys->p_info->sequence->display_height,
 749                  p_sys->i_sar_num, p_sys->i_sar_den,
 750                  (uint32_t)((uint64_t)1001000000 * 27 /
 751                      p_sys->p_info->sequence->frame_period / 1001),
 752                  (uint32_t)((uint64_t)1001000000 * 27 /
 753                      p_sys->p_info->sequence->frame_period % 1001) );
 754     else
 755         msg_Dbg( p_dec, "bad frame period" );
 756 }
 757
 758 /*****************************************************************************
 759  * PutPicture: Put a picture_t in mpeg2 context
 760  *****************************************************************************/
 761 static void PutPicture( decoder_t *p_dec, picture_t *p_picture )
 762 {
 763     decoder_sys_t *p_sys = p_dec->p_sys;
 764
 765     /* */
 766     uint8_t *pp_buf[3];
 767     for( int j = 0; j < 3; j++ )
 768         pp_buf[j] = p_picture ? p_picture->p[j].p_pixels : NULL;
 769     mpeg2_set_buf( p_sys->p_mpeg2dec, pp_buf, p_picture );
 770
 771     /* Completly broken API, why the hell does it suppose
 772      * the stride of the chroma planes ! */
 773     if( p_picture )
 774         mpeg2_stride( p_sys->p_mpeg2dec, p_picture->p[Y_PLANE].i_pitch );
 775 }
 776
 777
 778 /**
 779  * Initialize a virtual Decoded Picture Buffer to workaround
 780  * libmpeg2 deficient API
 781  */
 782 static void DpbInit( decoder_t *p_dec )
 783 {
 784     decoder_sys_t *p_sys = p_dec->p_sys;
 785
 786     for( int i = 0; i < DPB_COUNT; i++ )
 787         p_sys->p_dpb[i].p_picture = NULL;
 788 }
 789 /**
 790  * Empty and reset the current DPB
 791  */
 792 static void DpbClean( decoder_t *p_dec )
 793 {
 794     decoder_sys_t *p_sys = p_dec->p_sys;
 795
 796     for( int i = 0; i < DPB_COUNT; i++ )
 797     {
 798         picture_dpb_t *p = &p_sys->p_dpb[i];
 799         if( !p->p_picture )
 800             continue;
 801         if( p->b_linked )
 802             picture_Release( p->p_picture );
 803         if( !p->b_displayed )
 804             picture_Release( p->p_picture );
 805
 806         p->p_picture = NULL;
 807     }
 808 }
 809 /**
 810  * Retreive a picture and reserve a place in the DPB
 811  */
 812 static picture_t *DpbNewPicture( decoder_t *p_dec )
 813 {
 814     decoder_sys_t *p_sys = p_dec->p_sys;
 815
 816     picture_dpb_t *p;
 817     int i;
 818
 819     for( i = 0; i < DPB_COUNT; i++ )
 820     {
 821         p = &p_sys->p_dpb[i];
 822         if( !p->p_picture )
 823             break;
 824     }
 825     if( i >= DPB_COUNT )
 826     {
 827         msg_Err( p_dec, "Leaking picture" );
 828         return NULL;
 829     }
 830
 831     p->p_picture = GetNewPicture( p_dec );
 832     if( p->p_picture )
 833     {
 834         picture_Hold( p->p_picture );
 835         p->b_linked = true;
 836         p->b_displayed = false;
 837
 838         p->p_picture->date = 0;
 839     }
 840     return p->p_picture;
 841 }
 842 static picture_dpb_t *DpbFindPicture( decoder_t *p_dec, picture_t *p_picture )
 843 {
 844     decoder_sys_t *p_sys = p_dec->p_sys;
 845
 846     for( int i = 0; i < DPB_COUNT; i++ )
 847     {
 848         picture_dpb_t *p = &p_sys->p_dpb[i];
 849         if( p->p_picture == p_picture )
 850             return p;
 851     }
 852     return NULL;
 853 }
 854 /**
 855  * Unlink the provided picture and ensure that the decoder
 856  * does not own it anymore.
 857  */
 858 static void DpbUnlinkPicture( decoder_t *p_dec, picture_t *p_picture )
 859 {
 860     picture_dpb_t *p = DpbFindPicture( p_dec, p_picture );
 861
 862     /* XXX it is needed to workaround libmpeg2 bugs */
 863     if( !p || !p->b_linked )
 864     {
 865         msg_Err( p_dec, "DpbUnlinkPicture called on an invalid picture" );
 866         return;
 867     }
 868
 869     assert( p && p->b_linked );
 870
 871     picture_Release( p->p_picture );
 872     p->b_linked = false;
 873
 874     if( !p->b_displayed )
 875         picture_Release( p->p_picture );
 876     p->p_picture = NULL;
 877 }
 878 /**
 879  * Mark the provided picture as displayed.
 880  */
 881 static int DpbDisplayPicture( decoder_t *p_dec, picture_t *p_picture )
 882 {
 883     picture_dpb_t *p = DpbFindPicture( p_dec, p_picture );
 884
 885     /* XXX it is needed to workaround libmpeg2 bugs */
 886     if( !p || p->b_displayed || !p->b_linked )
 887     {
 888         msg_Err( p_dec, "DpbDisplayPicture called on an invalid picture" );
 889         return VLC_EGENERIC;
 890     }
 891
 892     assert( p && !p->b_displayed && p->b_linked );
 893
 894     p->b_displayed = true;
 895     return VLC_SUCCESS;
 896 }
 897
 898