git.sesse.net Git - vlc/blob - modules/codec/libmpeg2.c

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