git.sesse.net Git - vlc/blob - modules/access/bluray.c

   1 /*****************************************************************************
   2  * bluray.c: Blu-ray disc support plugin
   3  *****************************************************************************
   4  * Copyright © 2010-2012 VideoLAN, VLC authors and libbluray AUTHORS
   5  *
   6  * Authors: Jean-Baptiste Kempf <jb@videolan.org>
   7  *          Hugo Beauzée-Luyssen <hugo@videolan.org>
   8  *
   9  * This program is free software; you can redistribute it and/or modify it
  10  * under the terms of the GNU Lesser General Public License as published by
  11  * the Free Software Foundation; either version 2.1 of the License, or
  12  * (at your option) any later version.
  13  *
  14  * This program is distributed in the hope that it will be useful,
  15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  17  * GNU Lesser General Public License for more details.
  18  *
  19  * You should have received a copy of the GNU Lesser General Public License
  20  * along with this program; if not, write to the Free Software Foundation,
  21  * Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
  22  *****************************************************************************/
  23
  24 #ifdef HAVE_CONFIG_H
  25 # include "config.h"
  26 #endif
  27
  28 #include <assert.h>
  29
  30 #if defined (HAVE_MNTENT_H) && defined(HAVE_SYS_STAT_H)
  31 # include <mntent.h>
  32 # include <sys/stat.h>
  33 #endif
  34
  35 #ifdef __APPLE__
  36 # include <sys/stat.h>
  37 # include <sys/param.h>
  38 # include <sys/ucred.h>
  39 # include <sys/mount.h>
  40 #endif
  41
  42 #include <vlc_common.h>
  43 #include <vlc_plugin.h>
  44 #include <vlc_demux.h>                      /* demux_t */
  45 #include <vlc_input.h>                      /* Seekpoints, chapters */
  46 #include <vlc_atomic.h>
  47 #include <vlc_dialog.h>                     /* BD+/AACS warnings */
  48 #include <vlc_vout.h>                       /* vout_PutSubpicture / subpicture_t */
  49 #include <vlc_url.h>                        /* vlc_path2uri */
  50 #include <vlc_iso_lang.h>
  51
  52 /* FIXME we should find a better way than including that */
  53 #include "../../src/text/iso-639_def.h"
  54
  55
  56 #include <libbluray/bluray.h>
  57 #include <libbluray/bluray-version.h>
  58 #include <libbluray/keys.h>
  59 #include <libbluray/meta_data.h>
  60 #include <libbluray/overlay.h>
  61
  62 /*****************************************************************************
  63  * Module descriptor
  64  *****************************************************************************/
  65
  66 #define BD_MENU_TEXT        N_("Blu-ray menus")
  67 #define BD_MENU_LONGTEXT    N_("Use Blu-ray menus. If disabled, "\
  68                                 "the movie will start directly")
  69 #define BD_REGION_TEXT      N_("Region code")
  70 #define BD_REGION_LONGTEXT  N_("Blu-Ray player region code. "\
  71                                 "Some discs can be played only with a correct region code.")
  72
  73 static const char *const ppsz_region_code[] = {
  74     "A", "B", "C" };
  75 static const char *const ppsz_region_code_text[] = {
  76     "Region A", "Region B", "Region C" };
  77
  78 #define REGION_DEFAULT   1   /* Index to region list. Actual region code is (1<<REGION_DEFAULT) */
  79 #define LANGUAGE_DEFAULT ("eng")
  80
  81 /* Callbacks */
  82 static int  blurayOpen (vlc_object_t *);
  83 static void blurayClose(vlc_object_t *);
  84
  85 vlc_module_begin ()
  86     set_shortname(N_("Blu-ray"))
  87     set_description(N_("Blu-ray Disc support (libbluray)"))
  88
  89     set_category(CAT_INPUT)
  90     set_subcategory(SUBCAT_INPUT_ACCESS)
  91     set_capability("access_demux", 200)
  92     add_bool("bluray-menu", false, BD_MENU_TEXT, BD_MENU_LONGTEXT, false)
  93     add_string("bluray-region", ppsz_region_code[REGION_DEFAULT], BD_REGION_TEXT, BD_REGION_LONGTEXT, false)
  94         change_string_list(ppsz_region_code, ppsz_region_code_text)
  95
  96     add_shortcut("bluray", "file")
  97
  98     set_callbacks(blurayOpen, blurayClose)
  99 vlc_module_end ()
 100
 101 /* libbluray's overlay.h defines 2 types of overlay (bd_overlay_plane_e). */
 102 #define MAX_OVERLAY 2
 103
 104 typedef enum OverlayStatus {
 105     Closed = 0,
 106     ToDisplay,  //Used to mark the overlay to be displayed the first time.
 107     Displayed,
 108     Outdated    //used to update the overlay after it has been sent to the vout
 109 } OverlayStatus;
 110
 111 typedef struct bluray_overlay_t
 112 {
 113     atomic_flag         released_once;
 114     vlc_mutex_t         lock;
 115     subpicture_t        *p_pic;
 116     OverlayStatus       status;
 117     subpicture_region_t *p_regions;
 118 } bluray_overlay_t;
 119
 120 struct  demux_sys_t
 121 {
 122     BLURAY              *bluray;
 123
 124     /* Titles */
 125     unsigned int        i_title;
 126     unsigned int        i_longest_title;
 127     input_title_t       **pp_title;
 128
 129     vlc_mutex_t             pl_info_lock;
 130     BLURAY_TITLE_INFO      *p_pl_info;
 131     const BLURAY_CLIP_INFO *p_clip_info;
 132
 133     /* Meta information */
 134     const META_DL       *p_meta;
 135
 136     /* Menus */
 137     bluray_overlay_t    *p_overlays[MAX_OVERLAY];
 138     int                 current_overlay; // -1 if no current overlay;
 139     bool                b_menu;
 140     bool                b_menu_open;
 141     bool                b_popup_available;
 142     mtime_t             i_still_end_time;
 143
 144     /* */
 145     input_thread_t      *p_input;
 146     vout_thread_t       *p_vout;
 147
 148     /* TS stream */
 149     es_out_t            *p_out;
 150     vlc_array_t         es;
 151     int                 i_audio_stream; /* Selected audio stream. -1 if default */
 152     int                 i_spu_stream;   /* Selected subtitle stream. -1 if default */
 153     int                 i_video_stream;
 154     stream_t            *p_parser;
 155     bool                b_flushed;
 156
 157     /* Used to store bluray disc path */
 158     char                *psz_bd_path;
 159 };
 160
 161 struct subpicture_updater_sys_t
 162 {
 163     bluray_overlay_t    *p_overlay;
 164 };
 165
 166 /* Get a 3 char code
 167  * FIXME: partiallyy duplicated from src/input/es_out.c
 168  */
 169 static const char *DemuxGetLanguageCode( demux_t *p_demux, const char *psz_var )
 170 {
 171     const iso639_lang_t *pl;
 172     char *psz_lang;
 173     char *p;
 174
 175     psz_lang = var_CreateGetString( p_demux, psz_var );
 176     if( !psz_lang )
 177         return LANGUAGE_DEFAULT;
 178
 179     /* XXX: we will use only the first value
 180      * (and ignore other ones in case of a list) */
 181     if( ( p = strchr( psz_lang, ',' ) ) )
 182         *p = '\0';
 183
 184     for( pl = p_languages; pl->psz_eng_name != NULL; pl++ )
 185     {
 186         if( *psz_lang == '\0' )
 187             continue;
 188         if( !strcasecmp( pl->psz_eng_name, psz_lang ) ||
 189             !strcasecmp( pl->psz_iso639_1, psz_lang ) ||
 190             !strcasecmp( pl->psz_iso639_2T, psz_lang ) ||
 191             !strcasecmp( pl->psz_iso639_2B, psz_lang ) )
 192             break;
 193     }
 194
 195     free( psz_lang );
 196
 197     if( pl->psz_eng_name != NULL )
 198         return pl->psz_iso639_2T;
 199
 200     return LANGUAGE_DEFAULT;
 201 }
 202
 203 /*****************************************************************************
 204  * Local prototypes
 205  *****************************************************************************/
 206 static es_out_t *esOutNew(demux_t *p_demux);
 207
 208 static int   blurayControl(demux_t *, int, va_list);
 209 static int   blurayDemux(demux_t *);
 210
 211 static void  blurayInitTitles(demux_t *p_demux, int menu_titles);
 212 static int   bluraySetTitle(demux_t *p_demux, int i_title);
 213
 214 static void  blurayOverlayProc(void *ptr, const BD_OVERLAY * const overlay);
 215 static void  blurayArgbOverlayProc(void *ptr, const BD_ARGB_OVERLAY * const overlay);
 216
 217 static int   onMouseEvent(vlc_object_t *p_vout, const char *psz_var,
 218                           vlc_value_t old, vlc_value_t val, void *p_data);
 219
 220 static void  blurayResetParser(demux_t *p_demux);
 221
 222 #define FROM_TICKS(a) (a*CLOCK_FREQ / INT64_C(90000))
 223 #define TO_TICKS(a)   (a*INT64_C(90000)/CLOCK_FREQ)
 224 #define CUR_LENGTH    p_sys->pp_title[p_demux->info.i_title]->i_length
 225
 226 /* */
 227 static void FindMountPoint(char **file)
 228 {
 229     char *device = *file;
 230 #if defined (HAVE_MNTENT_H) && defined (HAVE_SYS_STAT_H)
 231     /* bd path may be a symlink (e.g. /dev/dvd -> /dev/sr0), so make sure
 232      * we look up the real device */
 233     char *bd_device = realpath(device, NULL);
 234     if (bd_device == NULL)
 235         return;
 236
 237     struct stat st;
 238     if (lstat (bd_device, &st) == 0 && S_ISBLK (st.st_mode)) {
 239         FILE *mtab = setmntent ("/proc/self/mounts", "r");
 240         struct mntent *m, mbuf;
 241         char buf [8192];
 242
 243         while ((m = getmntent_r (mtab, &mbuf, buf, sizeof(buf))) != NULL) {
 244             if (!strcmp (m->mnt_fsname, bd_device)) {
 245                 free(device);
 246                 *file = strdup(m->mnt_dir);
 247                 break;
 248             }
 249         }
 250         endmntent (mtab);
 251     }
 252     free(bd_device);
 253
 254 #elif defined(__APPLE__)
 255     struct stat st;
 256     if (!stat (device, &st) && S_ISBLK (st.st_mode)) {
 257         int fs_count = getfsstat (NULL, 0, MNT_NOWAIT);
 258         if (fs_count > 0) {
 259             struct statfs mbuf[128];
 260             getfsstat (mbuf, fs_count * sizeof(mbuf[0]), MNT_NOWAIT);
 261             for (int i = 0; i < fs_count; ++i)
 262                 if (!strcmp (mbuf[i].f_mntfromname, device)) {
 263                     free(device);
 264                     *file = strdup(mbuf[i].f_mntonname);
 265                     return;
 266                 }
 267         }
 268     }
 269 #else
 270 # warning Disc device to mount point not implemented
 271 #endif
 272 }
 273
 274 /*****************************************************************************
 275  * cache current playlist (title) information
 276  *****************************************************************************/
 277
 278 static void setTitleInfo(demux_sys_t *p_sys, BLURAY_TITLE_INFO *info)
 279 {
 280     vlc_mutex_lock(&p_sys->pl_info_lock);
 281
 282     if (p_sys->p_pl_info) {
 283         bd_free_title_info(p_sys->p_pl_info);
 284     }
 285     p_sys->p_pl_info   = info;
 286     p_sys->p_clip_info = NULL;
 287
 288     if (p_sys->p_pl_info && p_sys->p_pl_info->clip_count) {
 289         p_sys->p_clip_info = &p_sys->p_pl_info->clips[0];
 290     }
 291
 292     vlc_mutex_unlock(&p_sys->pl_info_lock);
 293 }
 294
 295 /*****************************************************************************
 296  * blurayOpen: module init function
 297  *****************************************************************************/
 298 static int blurayOpen(vlc_object_t *object)
 299 {
 300     demux_t *p_demux = (demux_t*)object;
 301     demux_sys_t *p_sys;
 302
 303     const char *error_msg = NULL;
 304 #define BLURAY_ERROR(s) do { error_msg = s; goto error; } while(0)
 305
 306     if (strcmp(p_demux->psz_access, "bluray")) {
 307         // TODO BDMV support, once we figure out what to do in libbluray
 308         return VLC_EGENERIC;
 309     }
 310
 311     /* */
 312     p_demux->p_sys = p_sys = calloc(1, sizeof(*p_sys));
 313     if (unlikely(!p_sys))
 314         return VLC_ENOMEM;
 315
 316     p_sys->current_overlay = -1;
 317     p_sys->i_audio_stream = -1;
 318     p_sys->i_spu_stream = -1;
 319     p_sys->i_video_stream = -1;
 320     p_sys->i_still_end_time = 0;
 321
 322     /* init demux info fields */
 323     p_demux->info.i_update    = 0;
 324     p_demux->info.i_title     = 0;
 325     p_demux->info.i_seekpoint = 0;
 326
 327     TAB_INIT(p_sys->i_title, p_sys->pp_title);
 328
 329     /* store current bd path */
 330     if (p_demux->psz_file)
 331         p_sys->psz_bd_path = strdup(p_demux->psz_file);
 332
 333     /* If we're passed a block device, try to convert it to the mount point. */
 334     FindMountPoint(&p_sys->psz_bd_path);
 335
 336     p_sys->bluray = bd_open(p_sys->psz_bd_path, NULL);
 337     if (!p_sys->bluray) {
 338         free(p_sys->psz_bd_path);
 339         free(p_sys);
 340         return VLC_EGENERIC;
 341     }
 342
 343     vlc_mutex_init(&p_sys->pl_info_lock);
 344
 345     /* Warning the user about AACS/BD+ */
 346     const BLURAY_DISC_INFO *disc_info = bd_get_disc_info(p_sys->bluray);
 347
 348     /* Is it a bluray? */
 349     if (!disc_info->bluray_detected)
 350         BLURAY_ERROR(_("Path doesn't appear to be a Blu-ray"));
 351
 352     msg_Info(p_demux, "First play: %i, Top menu: %i\n"
 353                       "HDMV Titles: %i, BD-J Titles: %i, Other: %i",
 354              disc_info->first_play_supported, disc_info->top_menu_supported,
 355              disc_info->num_hdmv_titles, disc_info->num_bdj_titles,
 356              disc_info->num_unsupported_titles);
 357
 358     /* AACS */
 359     if (disc_info->aacs_detected) {
 360         msg_Dbg(p_demux, "Disc is using AACS");
 361         if (!disc_info->libaacs_detected)
 362             BLURAY_ERROR(_("This Blu-ray Disc needs a library for AACS decoding"
 363                       ", and your system does not have it."));
 364         if (!disc_info->aacs_handled) {
 365             if (disc_info->aacs_error_code) {
 366                 switch (disc_info->aacs_error_code) {
 367                 case BD_AACS_CORRUPTED_DISC:
 368                     BLURAY_ERROR(_("Blu-ray Disc is corrupted."));
 369                 case BD_AACS_NO_CONFIG:
 370                     BLURAY_ERROR(_("Missing AACS configuration file!"));
 371                 case BD_AACS_NO_PK:
 372                     BLURAY_ERROR(_("No valid processing key found in AACS config file."));
 373                 case BD_AACS_NO_CERT:
 374                     BLURAY_ERROR(_("No valid host certificate found in AACS config file."));
 375                 case BD_AACS_CERT_REVOKED:
 376                     BLURAY_ERROR(_("AACS Host certificate revoked."));
 377                 case BD_AACS_MMC_FAILED:
 378                     BLURAY_ERROR(_("AACS MMC failed."));
 379                 }
 380             }
 381         }
 382     }
 383
 384     /* BD+ */
 385     if (disc_info->bdplus_detected) {
 386         msg_Dbg(p_demux, "Disc is using BD+");
 387         if (!disc_info->libbdplus_detected)
 388             BLURAY_ERROR(_("This Blu-ray Disc needs a library for BD+ decoding"
 389                       ", and your system does not have it."));
 390         if (!disc_info->bdplus_handled)
 391             BLURAY_ERROR(_("Your system BD+ decoding library does not work. "
 392                       "Missing configuration?"));
 393     }
 394
 395     /* set player region code */
 396     char *psz_region = var_InheritString(p_demux, "bluray-region");
 397     unsigned int region = psz_region ? (psz_region[0] - 'A') : REGION_DEFAULT;
 398     free(psz_region);
 399     bd_set_player_setting(p_sys->bluray, BLURAY_PLAYER_SETTING_REGION_CODE, 1<<region);
 400
 401     /* set preferred languages */
 402     const char *psz_code = DemuxGetLanguageCode( p_demux, "audio-language" );
 403     bd_set_player_setting_str(p_sys->bluray, BLURAY_PLAYER_SETTING_AUDIO_LANG, psz_code);
 404     psz_code = DemuxGetLanguageCode( p_demux, "sub-language" );
 405     bd_set_player_setting_str(p_sys->bluray, BLURAY_PLAYER_SETTING_PG_LANG,    psz_code);
 406     psz_code = DemuxGetLanguageCode( p_demux, "menu-language" );
 407     bd_set_player_setting_str(p_sys->bluray, BLURAY_PLAYER_SETTING_MENU_LANG,  psz_code);
 408
 409     /* Get titles and chapters */
 410     p_sys->p_meta = bd_get_meta(p_sys->bluray);
 411     if (!p_sys->p_meta)
 412         msg_Warn(p_demux, "Failed to get meta info.");
 413
 414     p_sys->b_menu = var_InheritBool(p_demux, "bluray-menu");
 415
 416     blurayInitTitles(p_demux, disc_info->num_hdmv_titles + disc_info->num_bdj_titles + 1/*Top Menu*/ + 1/*First Play*/);
 417
 418     /*
 419      * Initialize the event queue, so we can receive events in blurayDemux(Menu).
 420      */
 421     bd_get_event(p_sys->bluray, NULL);
 422
 423     /* Registering overlay event handler */
 424     bd_register_overlay_proc(p_sys->bluray, p_demux, blurayOverlayProc);
 425     p_sys->p_input = demux_GetParentInput(p_demux);
 426     if (unlikely(!p_sys->p_input)) {
 427         msg_Err(p_demux, "Could not get parent input");
 428         goto error;
 429     }
 430
 431     if (p_sys->b_menu) {
 432
 433         /* Register ARGB overlay handler for BD-J */
 434         if (disc_info->num_bdj_titles)
 435             bd_register_argb_overlay_proc(p_sys->bluray, p_demux, blurayArgbOverlayProc, NULL);
 436
 437         /* libbluray will start playback from "First-Title" title */
 438         if (bd_play(p_sys->bluray) == 0)
 439             BLURAY_ERROR(_("Failed to start bluray playback. Please try without menu support."));
 440
 441     } else {
 442         /* set start title number */
 443         if (bluraySetTitle(p_demux, p_sys->i_longest_title) != VLC_SUCCESS) {
 444             msg_Err(p_demux, "Could not set the title %d", p_sys->i_longest_title);
 445             goto error;
 446         }
 447     }
 448
 449     vlc_array_init(&p_sys->es);
 450     p_sys->p_out = esOutNew(p_demux);
 451     if (unlikely(p_sys->p_out == NULL))
 452         goto error;
 453
 454     blurayResetParser(p_demux);
 455     if (!p_sys->p_parser) {
 456         msg_Err(p_demux, "Failed to create TS demuxer");
 457         goto error;
 458     }
 459
 460     p_demux->pf_control = blurayControl;
 461     p_demux->pf_demux   = blurayDemux;
 462
 463     return VLC_SUCCESS;
 464
 465 error:
 466     if (error_msg)
 467         dialog_Fatal(p_demux, _("Blu-ray error"), "%s", error_msg);
 468     blurayClose(object);
 469     return VLC_EGENERIC;
 470 #undef BLURAY_ERROR
 471 }
 472
 473
 474 /*****************************************************************************
 475  * blurayClose: module destroy function
 476  *****************************************************************************/
 477 static void blurayClose(vlc_object_t *object)
 478 {
 479     demux_t *p_demux = (demux_t*)object;
 480     demux_sys_t *p_sys = p_demux->p_sys;
 481
 482     setTitleInfo(p_sys, NULL);
 483
 484     /*
 485      * Close libbluray first.
 486      * This will close all the overlays before we release p_vout
 487      * bd_close(NULL) can crash
 488      */
 489     assert(p_sys->bluray);
 490     bd_close(p_sys->bluray);
 491
 492     if (p_sys->p_vout != NULL) {
 493         var_DelCallback(p_sys->p_vout, "mouse-moved", onMouseEvent, p_demux);
 494         var_DelCallback(p_sys->p_vout, "mouse-clicked", onMouseEvent, p_demux);
 495         vlc_object_release(p_sys->p_vout);
 496     }
 497     if (p_sys->p_input != NULL)
 498         vlc_object_release(p_sys->p_input);
 499     if (p_sys->p_parser)
 500         stream_Delete(p_sys->p_parser);
 501     if (p_sys->p_out != NULL)
 502         es_out_Delete(p_sys->p_out);
 503     assert(vlc_array_count(&p_sys->es) == 0);
 504     vlc_array_clear(&p_sys->es);
 505
 506     /* Titles */
 507     for (unsigned int i = 0; i < p_sys->i_title; i++)
 508         vlc_input_title_Delete(p_sys->pp_title[i]);
 509     TAB_CLEAN(p_sys->i_title, p_sys->pp_title);
 510
 511     vlc_mutex_destroy(&p_sys->pl_info_lock);
 512
 513     free(p_sys->psz_bd_path);
 514     free(p_sys);
 515 }
 516
 517 /*****************************************************************************
 518  * Elementary streams handling
 519  *****************************************************************************/
 520
 521 struct es_out_sys_t {
 522     demux_t *p_demux;
 523 };
 524
 525 typedef struct  fmt_es_pair {
 526     int         i_id;
 527     es_out_id_t *p_es;
 528 }               fmt_es_pair_t;
 529
 530 static int  findEsPairIndex(demux_sys_t *p_sys, int i_id)
 531 {
 532     for (int i = 0; i < vlc_array_count(&p_sys->es); ++i)
 533         if (((fmt_es_pair_t*)vlc_array_item_at_index(&p_sys->es, i))->i_id == i_id)
 534             return i;
 535
 536     return -1;
 537 }
 538
 539 static int  findEsPairIndexByEs(demux_sys_t *p_sys, es_out_id_t *p_es)
 540 {
 541     for (int i = 0; i < vlc_array_count(&p_sys->es); ++i)
 542         if (((fmt_es_pair_t*)vlc_array_item_at_index(&p_sys->es, i))->p_es == p_es)
 543             return i;
 544
 545     return -1;
 546 }
 547
 548 static void setStreamLang(es_format_t *p_fmt,
 549                           const BLURAY_STREAM_INFO *p_streams, int i_stream_count)
 550 {
 551     for (int i = 0; i < i_stream_count; i++) {
 552         if (p_fmt->i_id == p_streams[i].pid) {
 553             free(p_fmt->psz_language);
 554             p_fmt->psz_language = strndup((const char *)p_streams[i].lang, 3);
 555             return;
 556         }
 557     }
 558 }
 559
 560 static es_out_id_t *esOutAdd(es_out_t *p_out, const es_format_t *p_fmt)
 561 {
 562     demux_sys_t *p_sys = p_out->p_sys->p_demux->p_sys;
 563     es_format_t fmt;
 564
 565     es_format_Copy(&fmt, p_fmt);
 566
 567     vlc_mutex_lock(&p_sys->pl_info_lock);
 568
 569     switch (fmt.i_cat) {
 570     case VIDEO_ES:
 571         if (p_sys->i_video_stream != -1 && p_sys->i_video_stream != p_fmt->i_id)
 572             fmt.i_priority = ES_PRIORITY_NOT_SELECTABLE;
 573         break ;
 574     case AUDIO_ES:
 575         if (p_sys->i_audio_stream != -1 && p_sys->i_audio_stream != p_fmt->i_id)
 576             fmt.i_priority = ES_PRIORITY_NOT_SELECTABLE;
 577         if (p_sys->p_clip_info)
 578             setStreamLang(&fmt, p_sys->p_clip_info->audio_streams, p_sys->p_clip_info->audio_stream_count);
 579         break ;
 580     case SPU_ES:
 581         if (p_sys->i_spu_stream != -1 && p_sys->i_spu_stream != p_fmt->i_id)
 582             fmt.i_priority = ES_PRIORITY_NOT_SELECTABLE;
 583         if (p_sys->p_clip_info)
 584             setStreamLang(&fmt, p_sys->p_clip_info->pg_streams, p_sys->p_clip_info->pg_stream_count);
 585         break ;
 586     }
 587
 588     vlc_mutex_unlock(&p_sys->pl_info_lock);
 589
 590     es_out_id_t *p_es = es_out_Add(p_out->p_sys->p_demux->out, &fmt);
 591     if (p_fmt->i_id >= 0) {
 592         /* Ensure we are not overriding anything */
 593         int idx = findEsPairIndex(p_sys, p_fmt->i_id);
 594         if (idx == -1) {
 595             fmt_es_pair_t *p_pair = malloc(sizeof(*p_pair));
 596             if (likely(p_pair != NULL)) {
 597                 p_pair->i_id = p_fmt->i_id;
 598                 p_pair->p_es = p_es;
 599                 msg_Info(p_out->p_sys->p_demux, "Adding ES %d", p_fmt->i_id);
 600                 vlc_array_append(&p_sys->es, p_pair);
 601             }
 602         }
 603     }
 604     es_format_Clean(&fmt);
 605     return p_es;
 606 }
 607
 608 static int esOutSend(es_out_t *p_out, es_out_id_t *p_es, block_t *p_block)
 609 {
 610     return es_out_Send(p_out->p_sys->p_demux->out, p_es, p_block);
 611 }
 612
 613 static void esOutDel(es_out_t *p_out, es_out_id_t *p_es)
 614 {
 615     int idx = findEsPairIndexByEs(p_out->p_sys->p_demux->p_sys, p_es);
 616     if (idx >= 0) {
 617         free(vlc_array_item_at_index(&p_out->p_sys->p_demux->p_sys->es, idx));
 618         vlc_array_remove(&p_out->p_sys->p_demux->p_sys->es, idx);
 619     }
 620     es_out_Del(p_out->p_sys->p_demux->out, p_es);
 621 }
 622
 623 static int esOutControl(es_out_t *p_out, int i_query, va_list args)
 624 {
 625     return es_out_vaControl(p_out->p_sys->p_demux->out, i_query, args);
 626 }
 627
 628 static void esOutDestroy(es_out_t *p_out)
 629 {
 630     for (int i = 0; i < vlc_array_count(&p_out->p_sys->p_demux->p_sys->es); ++i)
 631         free(vlc_array_item_at_index(&p_out->p_sys->p_demux->p_sys->es, i));
 632     vlc_array_clear(&p_out->p_sys->p_demux->p_sys->es);
 633     free(p_out->p_sys);
 634     free(p_out);
 635 }
 636
 637 static es_out_t *esOutNew(demux_t *p_demux)
 638 {
 639     assert(vlc_array_count(&p_demux->p_sys->es) == 0);
 640     es_out_t    *p_out = malloc(sizeof(*p_out));
 641     if (unlikely(p_out == NULL))
 642         return NULL;
 643
 644     p_out->pf_add       = esOutAdd;
 645     p_out->pf_control   = esOutControl;
 646     p_out->pf_del       = esOutDel;
 647     p_out->pf_destroy   = esOutDestroy;
 648     p_out->pf_send      = esOutSend;
 649
 650     p_out->p_sys = malloc(sizeof(*p_out->p_sys));
 651     if (unlikely(p_out->p_sys == NULL)) {
 652         free(p_out);
 653         return NULL;
 654     }
 655     p_out->p_sys->p_demux = p_demux;
 656     return p_out;
 657 }
 658
 659 /*****************************************************************************
 660  * subpicture_updater_t functions:
 661  *****************************************************************************/
 662 static int subpictureUpdaterValidate(subpicture_t *p_subpic,
 663                                       bool b_fmt_src, const video_format_t *p_fmt_src,
 664                                       bool b_fmt_dst, const video_format_t *p_fmt_dst,
 665                                       mtime_t i_ts)
 666 {
 667     VLC_UNUSED(b_fmt_src);
 668     VLC_UNUSED(b_fmt_dst);
 669     VLC_UNUSED(p_fmt_src);
 670     VLC_UNUSED(p_fmt_dst);
 671     VLC_UNUSED(i_ts);
 672
 673     subpicture_updater_sys_t *p_upd_sys = p_subpic->updater.p_sys;
 674     bluray_overlay_t         *p_overlay = p_upd_sys->p_overlay;
 675
 676     vlc_mutex_lock(&p_overlay->lock);
 677     int res = p_overlay->status == Outdated;
 678     vlc_mutex_unlock(&p_overlay->lock);
 679     return res;
 680 }
 681
 682 /* This should probably be moved to subpictures.c afterward */
 683 static subpicture_region_t* subpicture_region_Clone(subpicture_region_t *p_region_src)
 684 {
 685     if (!p_region_src)
 686         return NULL;
 687     subpicture_region_t *p_region_dst = subpicture_region_New(&p_region_src->fmt);
 688     if (unlikely(!p_region_dst))
 689         return NULL;
 690
 691     p_region_dst->i_x      = p_region_src->i_x;
 692     p_region_dst->i_y      = p_region_src->i_y;
 693     p_region_dst->i_align  = p_region_src->i_align;
 694     p_region_dst->i_alpha  = p_region_src->i_alpha;
 695
 696     p_region_dst->psz_text = p_region_src->psz_text ? strdup(p_region_src->psz_text) : NULL;
 697     p_region_dst->psz_html = p_region_src->psz_html ? strdup(p_region_src->psz_html) : NULL;
 698     if (p_region_src->p_style != NULL) {
 699         p_region_dst->p_style = malloc(sizeof(*p_region_dst->p_style));
 700         p_region_dst->p_style = text_style_Copy(p_region_dst->p_style,
 701                                                 p_region_src->p_style);
 702     }
 703
 704     //Palette is already copied by subpicture_region_New, we just have to duplicate p_pixels
 705     for (int i = 0; i < p_region_src->p_picture->i_planes; i++)
 706         memcpy(p_region_dst->p_picture->p[i].p_pixels,
 707                p_region_src->p_picture->p[i].p_pixels,
 708                p_region_src->p_picture->p[i].i_lines * p_region_src->p_picture->p[i].i_pitch);
 709     return p_region_dst;
 710 }
 711
 712 static void subpictureUpdaterUpdate(subpicture_t *p_subpic,
 713                                     const video_format_t *p_fmt_src,
 714                                     const video_format_t *p_fmt_dst,
 715                                     mtime_t i_ts)
 716 {
 717     VLC_UNUSED(p_fmt_src);
 718     VLC_UNUSED(p_fmt_dst);
 719     VLC_UNUSED(i_ts);
 720     subpicture_updater_sys_t *p_upd_sys = p_subpic->updater.p_sys;
 721     bluray_overlay_t         *p_overlay = p_upd_sys->p_overlay;
 722
 723     /*
 724      * When this function is called, all p_subpic regions are gone.
 725      * We need to duplicate our regions (stored internaly) to this subpic.
 726      */
 727     vlc_mutex_lock(&p_overlay->lock);
 728
 729     subpicture_region_t *p_src = p_overlay->p_regions;
 730     if (!p_src) {
 731         vlc_mutex_unlock(&p_overlay->lock);
 732         return;
 733     }
 734
 735     subpicture_region_t **p_dst = &p_subpic->p_region;
 736     while (p_src != NULL) {
 737         *p_dst = subpicture_region_Clone(p_src);
 738         if (*p_dst == NULL)
 739             break;
 740         p_dst = &(*p_dst)->p_next;
 741         p_src = p_src->p_next;
 742     }
 743     if (*p_dst != NULL)
 744         (*p_dst)->p_next = NULL;
 745     p_overlay->status = Displayed;
 746     vlc_mutex_unlock(&p_overlay->lock);
 747 }
 748
 749 static void blurayCleanOverlayStruct(bluray_overlay_t *);
 750
 751 static void subpictureUpdaterDestroy(subpicture_t *p_subpic)
 752 {
 753     blurayCleanOverlayStruct(p_subpic->updater.p_sys->p_overlay);
 754     free(p_subpic->updater.p_sys);
 755 }
 756
 757 /*****************************************************************************
 758  * User input events:
 759  *****************************************************************************/
 760 static int onMouseEvent(vlc_object_t *p_vout, const char *psz_var, vlc_value_t old,
 761                         vlc_value_t val, void *p_data)
 762 {
 763     demux_t     *p_demux = (demux_t*)p_data;
 764     demux_sys_t *p_sys   = p_demux->p_sys;
 765     mtime_t     now      = mdate();
 766     VLC_UNUSED(old);
 767     VLC_UNUSED(p_vout);
 768
 769     if (psz_var[6] == 'm')   //Mouse moved
 770         bd_mouse_select(p_sys->bluray, now, val.coords.x, val.coords.y);
 771     else if (psz_var[6] == 'c') {
 772         bd_mouse_select(p_sys->bluray, now, val.coords.x, val.coords.y);
 773         bd_user_input(p_sys->bluray, now, BD_VK_MOUSE_ACTIVATE);
 774     } else {
 775         vlc_assert_unreachable();
 776     }
 777     return VLC_SUCCESS;
 778 }
 779
 780 static int sendKeyEvent(demux_sys_t *p_sys, unsigned int key)
 781 {
 782     mtime_t now = mdate();
 783     if (bd_user_input(p_sys->bluray, now, key) < 0)
 784         return VLC_EGENERIC;
 785
 786     return VLC_SUCCESS;
 787 }
 788
 789 /*****************************************************************************
 790  * libbluray overlay handling:
 791  *****************************************************************************/
 792 static void blurayCleanOverlayStruct(bluray_overlay_t *p_overlay)
 793 {
 794     if (!atomic_flag_test_and_set(&p_overlay->released_once))
 795         return;
 796     /*
 797      * This will be called when destroying the picture.
 798      * Don't delete it again from here!
 799      */
 800     vlc_mutex_destroy(&p_overlay->lock);
 801     subpicture_region_ChainDelete(p_overlay->p_regions);
 802     free(p_overlay);
 803 }
 804
 805 static void blurayCloseOverlay(demux_t *p_demux, int plane)
 806 {
 807     demux_sys_t *p_sys = p_demux->p_sys;
 808     bluray_overlay_t *ov = p_sys->p_overlays[plane];
 809
 810     if (ov != NULL) {
 811         if (p_sys->p_vout)
 812             vout_FlushSubpictureChannel(p_sys->p_vout, ov->p_pic->i_channel);
 813         blurayCleanOverlayStruct(ov);
 814         if (p_sys->current_overlay == plane)
 815             p_sys->current_overlay = -1;
 816
 817         p_sys->p_overlays[plane] = NULL;
 818     }
 819
 820     for (int i = 0; i < MAX_OVERLAY; i++)
 821         if (p_sys->p_overlays[i])
 822             return;
 823
 824     /* All overlays have been closed */
 825     if (p_sys->p_vout != NULL) {
 826         var_DelCallback(p_sys->p_vout, "mouse-moved", onMouseEvent, p_demux);
 827         var_DelCallback(p_sys->p_vout, "mouse-clicked", onMouseEvent, p_demux);
 828         vlc_object_release(p_sys->p_vout);
 829         p_sys->p_vout = NULL;
 830     }
 831 }
 832
 833 /*
 834  * Mark the overlay as "ToDisplay" status.
 835  * This will not send the overlay to the vout instantly, as the vout
 836  * may not be acquired (not acquirable) yet.
 837  * If is has already been acquired, the overlay has already been sent to it,
 838  * therefore, we only flag the overlay as "Outdated"
 839  */
 840 static void blurayActivateOverlay(demux_t *p_demux, int plane)
 841 {
 842     demux_sys_t *p_sys = p_demux->p_sys;
 843     bluray_overlay_t *ov = p_sys->p_overlays[plane];
 844
 845     /*
 846      * If the overlay is already displayed, mark the picture as outdated.
 847      * We must NOT use vout_PutSubpicture if a picture is already displayed.
 848      */
 849     vlc_mutex_lock(&ov->lock);
 850     if (ov->status >= Displayed && p_sys->p_vout) {
 851         ov->status = Outdated;
 852         vlc_mutex_unlock(&ov->lock);
 853         return;
 854     }
 855
 856     /*
 857      * Mark the overlay as available, but don't display it right now.
 858      * the blurayDemuxMenu will send it to vout, as it may be unavailable when
 859      * the overlay is computed
 860      */
 861     p_sys->current_overlay = plane;
 862     ov->status = ToDisplay;
 863     vlc_mutex_unlock(&ov->lock);
 864 }
 865
 866 static void blurayInitOverlay(demux_t *p_demux, int plane, int width, int height)
 867 {
 868     demux_sys_t *p_sys = p_demux->p_sys;
 869
 870     assert(p_sys->p_overlays[plane] == NULL);
 871
 872     bluray_overlay_t *ov = calloc(1, sizeof(*ov));
 873     if (unlikely(ov == NULL))
 874         return;
 875
 876     subpicture_updater_sys_t *p_upd_sys = malloc(sizeof(*p_upd_sys));
 877     if (unlikely(p_upd_sys == NULL)) {
 878         free(ov);
 879         return;
 880     }
 881     /* two references: vout + demux */
 882     atomic_flag_clear(&ov->released_once);
 883
 884     p_upd_sys->p_overlay = ov;
 885     subpicture_updater_t updater = {
 886         .pf_validate = subpictureUpdaterValidate,
 887         .pf_update   = subpictureUpdaterUpdate,
 888         .pf_destroy  = subpictureUpdaterDestroy,
 889         .p_sys       = p_upd_sys,
 890     };
 891
 892     ov->p_pic = subpicture_New(&updater);
 893     if (ov->p_pic == NULL) {
 894         free(p_upd_sys);
 895         free(ov);
 896         return;
 897     }
 898
 899     ov->p_pic->i_original_picture_width = width;
 900     ov->p_pic->i_original_picture_height = height;
 901     ov->p_pic->b_ephemer = true;
 902     ov->p_pic->b_absolute = true;
 903
 904     vlc_mutex_init(&ov->lock);
 905
 906     p_sys->p_overlays[plane] = ov;
 907 }
 908
 909 /**
 910  * Destroy every regions in the subpicture.
 911  * This is done in two steps:
 912  * - Wiping our private regions list
 913  * - Flagging the overlay as outdated, so the changes are replicated from
 914  *   the subpicture_updater_t::pf_update
 915  * This doesn't destroy the subpicture, as the overlay may be used again by libbluray.
 916  */
 917 static void blurayClearOverlay(demux_t *p_demux, int plane)
 918 {
 919     demux_sys_t *p_sys = p_demux->p_sys;
 920     bluray_overlay_t *ov = p_sys->p_overlays[plane];
 921
 922     vlc_mutex_lock(&ov->lock);
 923
 924     subpicture_region_ChainDelete(ov->p_regions);
 925     ov->p_regions = NULL;
 926     ov->status = Outdated;
 927
 928     vlc_mutex_unlock(&ov->lock);
 929 }
 930
 931 /*
 932  * This will draw to the overlay by adding a region to our region list
 933  * This will have to be copied to the subpicture used to render the overlay.
 934  */
 935 static void blurayDrawOverlay(demux_t *p_demux, const BD_OVERLAY* const ov)
 936 {
 937     demux_sys_t *p_sys = p_demux->p_sys;
 938
 939     /*
 940      * Compute a subpicture_region_t.
 941      * It will be copied and sent to the vout later.
 942      */
 943     if (!ov->img)
 944         return;
 945
 946     vlc_mutex_lock(&p_sys->p_overlays[ov->plane]->lock);
 947
 948     /* Find a region to update */
 949     subpicture_region_t *p_reg = p_sys->p_overlays[ov->plane]->p_regions;
 950     subpicture_region_t *p_last = NULL;
 951     while (p_reg != NULL) {
 952         p_last = p_reg;
 953         if (p_reg->i_x == ov->x && p_reg->i_y == ov->y &&
 954                 p_reg->fmt.i_width == ov->w && p_reg->fmt.i_height == ov->h)
 955             break;
 956         p_reg = p_reg->p_next;
 957     }
 958
 959     /* If there is no region to update, create a new one. */
 960     if (!p_reg) {
 961         video_format_t fmt;
 962         video_format_Init(&fmt, 0);
 963         video_format_Setup(&fmt, VLC_CODEC_YUVP, ov->w, ov->h, ov->w, ov->h, 1, 1);
 964
 965         p_reg = subpicture_region_New(&fmt);
 966         p_reg->i_x = ov->x;
 967         p_reg->i_y = ov->y;
 968         /* Append it to our list. */
 969         if (p_last != NULL)
 970             p_last->p_next = p_reg;
 971         else /* If we don't have a last region, then our list empty */
 972             p_sys->p_overlays[ov->plane]->p_regions = p_reg;
 973     }
 974
 975     /* Now we can update the region, regardless it's an update or an insert */
 976     const BD_PG_RLE_ELEM *img = ov->img;
 977     for (int y = 0; y < ov->h; y++)
 978         for (int x = 0; x < ov->w;) {
 979             plane_t *p = &p_reg->p_picture->p[0];
 980             memset(&p->p_pixels[y * p->i_pitch + x], img->color, img->len);
 981             x += img->len;
 982             img++;
 983         }
 984
 985     if (ov->palette) {
 986         p_reg->fmt.p_palette->i_entries = 256;
 987         for (int i = 0; i < 256; ++i) {
 988             p_reg->fmt.p_palette->palette[i][0] = ov->palette[i].Y;
 989             p_reg->fmt.p_palette->palette[i][1] = ov->palette[i].Cb;
 990             p_reg->fmt.p_palette->palette[i][2] = ov->palette[i].Cr;
 991             p_reg->fmt.p_palette->palette[i][3] = ov->palette[i].T;
 992         }
 993     }
 994
 995     vlc_mutex_unlock(&p_sys->p_overlays[ov->plane]->lock);
 996     /*
 997      * /!\ The region is now stored in our internal list, but not in the subpicture /!\
 998      */
 999 }
1000
1001 static void blurayOverlayProc(void *ptr, const BD_OVERLAY *const overlay)
1002 {
1003     demux_t *p_demux = (demux_t*)ptr;
1004     demux_sys_t *p_sys = p_demux->p_sys;
1005
1006     if (!overlay) {
1007         msg_Info(p_demux, "Closing overlays.");
1008         p_sys->current_overlay = -1;
1009         if (p_sys->p_vout)
1010             for (int i = 0; i < MAX_OVERLAY; i++)
1011                 blurayCloseOverlay(p_demux, i);
1012         return;
1013     }
1014
1015     switch (overlay->cmd) {
1016     case BD_OVERLAY_INIT:
1017         msg_Info(p_demux, "Initializing overlay");
1018         blurayInitOverlay(p_demux, overlay->plane, overlay->w, overlay->h);
1019         break;
1020     case BD_OVERLAY_CLOSE:
1021         blurayClearOverlay(p_demux, overlay->plane);
1022         blurayCloseOverlay(p_demux, overlay->plane);
1023         break;
1024     case BD_OVERLAY_CLEAR:
1025         blurayClearOverlay(p_demux, overlay->plane);
1026         break;
1027     case BD_OVERLAY_FLUSH:
1028         blurayActivateOverlay(p_demux, overlay->plane);
1029         break;
1030     case BD_OVERLAY_DRAW:
1031         blurayDrawOverlay(p_demux, overlay);
1032         break;
1033     default:
1034         msg_Warn(p_demux, "Unknown BD overlay command: %u", overlay->cmd);
1035         break;
1036     }
1037 }
1038
1039 /*
1040  * ARGB overlay (BD-J)
1041  */
1042 static void blurayInitArgbOverlay(demux_t *p_demux, int plane, int width, int height)
1043 {
1044     demux_sys_t *p_sys = p_demux->p_sys;
1045
1046     blurayInitOverlay(p_demux, plane, width, height);
1047
1048     if (!p_sys->p_overlays[plane]->p_regions) {
1049         video_format_t fmt;
1050         video_format_Init(&fmt, 0);
1051         video_format_Setup(&fmt, VLC_CODEC_RGBA, width, height, width, height, 1, 1);
1052
1053         p_sys->p_overlays[plane]->p_regions = subpicture_region_New(&fmt);
1054     }
1055 }
1056
1057 static void blurayDrawArgbOverlay(demux_t *p_demux, const BD_ARGB_OVERLAY* const ov)
1058 {
1059     demux_sys_t *p_sys = p_demux->p_sys;
1060
1061     vlc_mutex_lock(&p_sys->p_overlays[ov->plane]->lock);
1062
1063     /* Find a region to update */
1064     subpicture_region_t *p_reg = p_sys->p_overlays[ov->plane]->p_regions;
1065     if (!p_reg) {
1066         vlc_mutex_unlock(&p_sys->p_overlays[ov->plane]->lock);
1067         return;
1068     }
1069
1070     /* Now we can update the region */
1071     const uint32_t *src0 = ov->argb;
1072     uint8_t        *dst0 = p_reg->p_picture->p[0].p_pixels +
1073                            p_reg->p_picture->p[0].i_pitch * ov->y +
1074                            ov->x * 4;
1075
1076     for (int y = 0; y < ov->h; y++) {
1077         // XXX: add support for this format ? Should be possible with OPENGL/VDPAU/...
1078         // - or add libbluray option to select the format ?
1079         for (int x = 0; x < ov->w; x++) {
1080             dst0[x*4  ] = src0[x]>>16; /* R */
1081             dst0[x*4+1] = src0[x]>>8;  /* G */
1082             dst0[x*4+2] = src0[x];     /* B */
1083             dst0[x*4+3] = src0[x]>>24; /* A */
1084         }
1085
1086         src0 += ov->stride;
1087         dst0 += p_reg->p_picture->p[0].i_pitch;
1088     }
1089
1090     vlc_mutex_unlock(&p_sys->p_overlays[ov->plane]->lock);
1091     /*
1092      * /!\ The region is now stored in our internal list, but not in the subpicture /!\
1093      */
1094 }
1095
1096 static void blurayArgbOverlayProc(void *ptr, const BD_ARGB_OVERLAY *const overlay)
1097 {
1098     demux_t *p_demux = (demux_t*)ptr;
1099
1100     switch (overlay->cmd) {
1101     case BD_ARGB_OVERLAY_INIT:
1102         blurayInitArgbOverlay(p_demux, overlay->plane, overlay->w, overlay->h);
1103         break;
1104     case BD_ARGB_OVERLAY_CLOSE:
1105         blurayClearOverlay(p_demux, overlay->plane);
1106         blurayCloseOverlay(p_demux, overlay->plane);
1107         break;
1108     case BD_ARGB_OVERLAY_FLUSH:
1109         blurayActivateOverlay(p_demux, overlay->plane);
1110         break;
1111     case BD_ARGB_OVERLAY_DRAW:
1112         blurayDrawArgbOverlay(p_demux, overlay);
1113         break;
1114     default:
1115         msg_Warn(p_demux, "Unknown BD ARGB overlay command: %u", overlay->cmd);
1116         break;
1117     }
1118 }
1119
1120 static void bluraySendOverlayToVout(demux_t *p_demux)
1121 {
1122     demux_sys_t *p_sys = p_demux->p_sys;
1123
1124     assert(p_sys->current_overlay >= 0 &&
1125            p_sys->p_overlays[p_sys->current_overlay] != NULL &&
1126            p_sys->p_overlays[p_sys->current_overlay]->p_pic != NULL);
1127
1128     p_sys->p_overlays[p_sys->current_overlay]->p_pic->i_start =
1129         p_sys->p_overlays[p_sys->current_overlay]->p_pic->i_stop = mdate();
1130     p_sys->p_overlays[p_sys->current_overlay]->p_pic->i_channel =
1131         vout_RegisterSubpictureChannel(p_sys->p_vout);
1132     /*
1133      * After this point, the picture should not be accessed from the demux thread,
1134      * as it is held by the vout thread.
1135      * This must be done only once per subpicture, ie. only once between each
1136      * blurayInitOverlay & blurayCloseOverlay call.
1137      */
1138     vout_PutSubpicture(p_sys->p_vout, p_sys->p_overlays[p_sys->current_overlay]->p_pic);
1139     /*
1140      * Mark the picture as Outdated, as it contains no region for now.
1141      * This will make the subpicture_updater_t call pf_update
1142      */
1143     p_sys->p_overlays[p_sys->current_overlay]->status = Outdated;
1144 }
1145
1146 static void blurayUpdateTitleInfo(input_title_t *t, BLURAY_TITLE_INFO *title_info)
1147 {
1148     t->i_length = FROM_TICKS(title_info->duration);
1149
1150     if (!t->i_seekpoint) {
1151         for (unsigned int j = 0; j < title_info->chapter_count; j++) {
1152             seekpoint_t *s = vlc_seekpoint_New();
1153             if (!s) {
1154                 break;
1155             }
1156             s->i_time_offset = title_info->chapters[j].offset;
1157
1158             TAB_APPEND(t->i_seekpoint, t->seekpoint, s);
1159         }
1160     }
1161 }
1162
1163 static void blurayInitTitles(demux_t *p_demux, int menu_titles)
1164 {
1165     demux_sys_t *p_sys = p_demux->p_sys;
1166
1167     /* get and set the titles */
1168     unsigned i_title = menu_titles;
1169
1170     if (!p_sys->b_menu) {
1171         i_title = bd_get_titles(p_sys->bluray, TITLES_RELEVANT, 60);
1172         p_sys->i_longest_title = bd_get_main_title(p_sys->bluray);
1173     }
1174
1175     for (unsigned int i = 0; i < i_title; i++) {
1176         input_title_t *t = vlc_input_title_New();
1177         if (!t)
1178             break;
1179
1180         if (!p_sys->b_menu) {
1181             BLURAY_TITLE_INFO *title_info = bd_get_title_info(p_sys->bluray, i, 0);
1182             blurayUpdateTitleInfo(t, title_info);
1183             bd_free_title_info(title_info);
1184
1185         } else if (i == 0) {
1186             t->psz_name = strdup(_("Top Menu"));
1187         } else if (i == i_title - 1) {
1188             t->psz_name = strdup(_("First Play"));
1189         }
1190
1191         TAB_APPEND(p_sys->i_title, p_sys->pp_title, t);
1192     }
1193 }
1194
1195 static void blurayResetParser(demux_t *p_demux)
1196 {
1197     /*
1198      * This is a hack and will have to be removed.
1199      * The parser should be flushed, and not destroy/created each time
1200      * we are changing title.
1201      */
1202     demux_sys_t *p_sys = p_demux->p_sys;
1203     if (p_sys->p_parser)
1204         stream_Delete(p_sys->p_parser);
1205
1206     p_sys->p_parser = stream_DemuxNew(p_demux, "ts", p_sys->p_out);
1207
1208     if (!p_sys->p_parser)
1209         msg_Err(p_demux, "Failed to create TS demuxer");
1210 }
1211
1212 /*****************************************************************************
1213  * bluraySetTitle: select new BD title
1214  *****************************************************************************/
1215 static int bluraySetTitle(demux_t *p_demux, int i_title)
1216 {
1217     demux_sys_t *p_sys = p_demux->p_sys;
1218
1219     if (p_sys->b_menu) {
1220         if (i_title <= 0) {
1221             msg_Dbg(p_demux, "Playing TopMenu Title");
1222         } else if (i_title >= (int)p_sys->i_title - 1) {
1223             msg_Dbg(p_demux, "Playing FirstPlay Title");
1224             i_title = BLURAY_TITLE_FIRST_PLAY;
1225         } else {
1226             msg_Dbg(p_demux, "Playing Title %i", i_title);
1227         }
1228
1229         if (bd_play_title(p_sys->bluray, i_title) == 0) {
1230             msg_Err(p_demux, "cannot play bd title '%d'", i_title);
1231             return VLC_EGENERIC;
1232         }
1233
1234         return VLC_SUCCESS;
1235     }
1236
1237     /* Looking for the main title, ie the longest duration */
1238     if (i_title < 0)
1239         i_title = p_sys->i_longest_title;
1240     else if ((unsigned)i_title > p_sys->i_title)
1241         return VLC_EGENERIC;
1242
1243     msg_Dbg(p_demux, "Selecting Title %i", i_title);
1244
1245     if (bd_select_title(p_sys->bluray, i_title) == 0) {
1246         msg_Err(p_demux, "cannot select bd title '%d'", i_title);
1247         return VLC_EGENERIC;
1248     }
1249
1250     blurayResetParser(p_demux);
1251
1252     return VLC_SUCCESS;
1253 }
1254
1255 /*****************************************************************************
1256  * blurayControl: handle the controls
1257  *****************************************************************************/
1258 static int blurayControl(demux_t *p_demux, int query, va_list args)
1259 {
1260     demux_sys_t *p_sys = p_demux->p_sys;
1261     bool     *pb_bool;
1262     int64_t  *pi_64;
1263
1264     switch (query) {
1265     case DEMUX_CAN_SEEK:
1266     case DEMUX_CAN_PAUSE:
1267     case DEMUX_CAN_CONTROL_PACE:
1268          pb_bool = (bool*)va_arg(args, bool *);
1269          *pb_bool = true;
1270          break;
1271
1272     case DEMUX_GET_PTS_DELAY:
1273         pi_64 = (int64_t*)va_arg(args, int64_t *);
1274         *pi_64 = INT64_C(1000) * var_InheritInteger(p_demux, "disc-caching");
1275         break;
1276
1277     case DEMUX_SET_PAUSE_STATE:
1278         /* Nothing to do */
1279         break;
1280
1281     case DEMUX_SET_TITLE:
1282     {
1283         int i_title = (int)va_arg(args, int);
1284         if (bluraySetTitle(p_demux, i_title) != VLC_SUCCESS)
1285             return VLC_EGENERIC;
1286         break;
1287     }
1288     case DEMUX_SET_SEEKPOINT:
1289     {
1290         int i_chapter = (int)va_arg(args, int);
1291         bd_seek_chapter(p_sys->bluray, i_chapter);
1292         p_demux->info.i_update = INPUT_UPDATE_SEEKPOINT;
1293         break;
1294     }
1295
1296     case DEMUX_GET_TITLE_INFO:
1297     {
1298         input_title_t ***ppp_title = (input_title_t***)va_arg(args, input_title_t***);
1299         int *pi_int             = (int*)va_arg(args, int*);
1300         int *pi_title_offset    = (int*)va_arg(args, int*);
1301         int *pi_chapter_offset  = (int*)va_arg(args, int*);
1302
1303         /* */
1304         *pi_title_offset   = 0;
1305         *pi_chapter_offset = 0;
1306
1307         /* Duplicate local title infos */
1308         *pi_int = p_sys->i_title;
1309         *ppp_title = malloc(p_sys->i_title * sizeof(input_title_t *));
1310         for (unsigned int i = 0; i < p_sys->i_title; i++)
1311             (*ppp_title)[i] = vlc_input_title_Duplicate(p_sys->pp_title[i]);
1312
1313         return VLC_SUCCESS;
1314     }
1315
1316     case DEMUX_GET_LENGTH:
1317     {
1318         int64_t *pi_length = (int64_t*)va_arg(args, int64_t *);
1319         *pi_length = p_demux->info.i_title < (int)p_sys->i_title ? CUR_LENGTH : 0;
1320         return VLC_SUCCESS;
1321     }
1322     case DEMUX_SET_TIME:
1323     {
1324         int64_t i_time = (int64_t)va_arg(args, int64_t);
1325         bd_seek_time(p_sys->bluray, TO_TICKS(i_time));
1326         return VLC_SUCCESS;
1327     }
1328     case DEMUX_GET_TIME:
1329     {
1330         int64_t *pi_time = (int64_t*)va_arg(args, int64_t *);
1331         *pi_time = (int64_t)FROM_TICKS(bd_tell_time(p_sys->bluray));
1332         return VLC_SUCCESS;
1333     }
1334
1335     case DEMUX_GET_POSITION:
1336     {
1337         double *pf_position = (double*)va_arg(args, double *);
1338         *pf_position = p_demux->info.i_title < (int)p_sys->i_title && CUR_LENGTH > 0 ?
1339                       (double)FROM_TICKS(bd_tell_time(p_sys->bluray))/CUR_LENGTH : 0.0;
1340         return VLC_SUCCESS;
1341     }
1342     case DEMUX_SET_POSITION:
1343     {
1344         double f_position = (double)va_arg(args, double);
1345         bd_seek_time(p_sys->bluray, TO_TICKS(f_position*CUR_LENGTH));
1346         return VLC_SUCCESS;
1347     }
1348
1349     case DEMUX_GET_META:
1350     {
1351         vlc_meta_t *p_meta = (vlc_meta_t *) va_arg (args, vlc_meta_t*);
1352         const META_DL *meta = p_sys->p_meta;
1353         if (meta == NULL)
1354             return VLC_EGENERIC;
1355
1356         if (!EMPTY_STR(meta->di_name)) vlc_meta_SetTitle(p_meta, meta->di_name);
1357
1358         if (!EMPTY_STR(meta->language_code)) vlc_meta_AddExtra(p_meta, "Language", meta->language_code);
1359         if (!EMPTY_STR(meta->filename)) vlc_meta_AddExtra(p_meta, "Filename", meta->filename);
1360         if (!EMPTY_STR(meta->di_alternative)) vlc_meta_AddExtra(p_meta, "Alternative", meta->di_alternative);
1361
1362         // if (meta->di_set_number > 0) vlc_meta_SetTrackNum(p_meta, meta->di_set_number);
1363         // if (meta->di_num_sets > 0) vlc_meta_AddExtra(p_meta, "Discs numbers in Set", meta->di_num_sets);
1364
1365         if (meta->thumb_count > 0 && meta->thumbnails) {
1366             char *psz_thumbpath;
1367             if (asprintf(&psz_thumbpath, "%s" DIR_SEP "BDMV" DIR_SEP "META" DIR_SEP "DL" DIR_SEP "%s",
1368                           p_sys->psz_bd_path, meta->thumbnails[0].path) > 0) {
1369                 char *psz_thumburl = vlc_path2uri(psz_thumbpath, "file");
1370                 if (unlikely(psz_thumburl == NULL)) {
1371                     free(psz_thumbpath);
1372                     return VLC_ENOMEM;
1373                 }
1374
1375                 vlc_meta_SetArtURL(p_meta, psz_thumburl);
1376                 free(psz_thumburl);
1377             }
1378             free(psz_thumbpath);
1379         }
1380
1381         return VLC_SUCCESS;
1382     }
1383
1384     case DEMUX_NAV_ACTIVATE:
1385         if (p_sys->b_popup_available && !p_sys->b_menu_open) {
1386             return sendKeyEvent(p_sys, BD_VK_POPUP);
1387         }
1388         return sendKeyEvent(p_sys, BD_VK_ENTER);
1389     case DEMUX_NAV_UP:
1390         return sendKeyEvent(p_sys, BD_VK_UP);
1391     case DEMUX_NAV_DOWN:
1392         return sendKeyEvent(p_sys, BD_VK_DOWN);
1393     case DEMUX_NAV_LEFT:
1394         return sendKeyEvent(p_sys, BD_VK_LEFT);
1395     case DEMUX_NAV_RIGHT:
1396         return sendKeyEvent(p_sys, BD_VK_RIGHT);
1397
1398     case DEMUX_CAN_RECORD:
1399     case DEMUX_GET_FPS:
1400     case DEMUX_SET_GROUP:
1401     case DEMUX_HAS_UNSUPPORTED_META:
1402     case DEMUX_GET_ATTACHMENTS:
1403         return VLC_EGENERIC;
1404     default:
1405         msg_Warn(p_demux, "unimplemented query (%d) in control", query);
1406         return VLC_EGENERIC;
1407     }
1408     return VLC_SUCCESS;
1409 }
1410
1411 /*****************************************************************************
1412  * libbluray event handling
1413  *****************************************************************************/
1414
1415 static void streamFlush( demux_sys_t *p_sys )
1416 {
1417     /*
1418      * MPEG-TS demuxer does not flush last video frame if size of PES packet is unknown.
1419      * Packet is flushed only when TS packet with PUSI flag set is received.
1420      *
1421      * Fix this by emitting (video) ts packet with PUSI flag set.
1422      * Add video sequence end code to payload so that also video decoder is flushed.
1423      * Set PES packet size in the payload so that it will be sent to decoder immediately.
1424      */
1425
1426     if (p_sys->b_flushed)
1427         return;
1428
1429     block_t *p_block = block_Alloc(192);
1430     if (!p_block)
1431         return;
1432
1433     static const uint8_t seq_end_pes[] = {
1434         0x00, 0x00, 0x01, 0xe0, 0x00, 0x07, 0x80, 0x00, 0x00,  /* PES header */
1435         0x00, 0x00, 0x01, 0xb7,                                /* PES payload: sequence end */
1436     };
1437     static const uint8_t vid_pusi_ts[] = {
1438         0x00, 0x00, 0x00, 0x00,                /* TP extra header (ATC) */
1439         0x47, 0x50, 0x11, 0x30,                /* TP header */
1440         (192 - (4 + 5) - sizeof(seq_end_pes)), /* adaptation field length */
1441         0x80,                                  /* adaptation field: discontinuity indicator */
1442     };
1443
1444     memset(p_block->p_buffer, 0, 192);
1445     memcpy(p_block->p_buffer, vid_pusi_ts, sizeof(vid_pusi_ts));
1446     memcpy(p_block->p_buffer + 192 - sizeof(seq_end_pes), seq_end_pes, sizeof(seq_end_pes));
1447     p_block->i_buffer = 192;
1448
1449     /* set correct sequence end code */
1450     vlc_mutex_lock(&p_sys->pl_info_lock);
1451     if (p_sys->p_clip_info != NULL) {
1452         if (p_sys->p_clip_info->video_streams[0].coding_type > 2) {
1453             /* VC1 / H.264 sequence end */
1454             p_block->p_buffer[191] = 0x0a;
1455         }
1456     }
1457     vlc_mutex_unlock(&p_sys->pl_info_lock);
1458
1459     stream_DemuxSend(p_sys->p_parser, p_block);
1460     p_sys->b_flushed = true;
1461 }
1462
1463 static void blurayResetStillImage( demux_t *p_demux )
1464 {
1465     demux_sys_t *p_sys = p_demux->p_sys;
1466
1467     if (p_sys->i_still_end_time) {
1468         p_sys->i_still_end_time = 0;
1469
1470         blurayResetParser(p_demux);
1471         es_out_Control( p_demux->out, ES_OUT_RESET_PCR );
1472     }
1473 }
1474
1475 static void blurayStillImage( demux_t *p_demux, unsigned i_timeout )
1476 {
1477     demux_sys_t *p_sys = p_demux->p_sys;
1478
1479     /* time period elapsed ? */
1480     if (p_sys->i_still_end_time > 0 && p_sys->i_still_end_time <= mdate()) {
1481         msg_Dbg(p_demux, "Still image end");
1482         bd_read_skip_still(p_sys->bluray);
1483
1484         blurayResetStillImage(p_demux);
1485         return;
1486     }
1487
1488     /* show last frame as still image */
1489     if (!p_sys->i_still_end_time) {
1490         if (i_timeout) {
1491             msg_Dbg(p_demux, "Still image (%d seconds)", i_timeout);
1492             p_sys->i_still_end_time = mdate() + i_timeout * CLOCK_FREQ;
1493         } else {
1494             msg_Dbg(p_demux, "Still image (infinite)");
1495             p_sys->i_still_end_time = -1;
1496         }
1497
1498         /* flush demuxer and decoder (there won't be next video packet starting with ts PUSI) */
1499         streamFlush(p_sys);
1500
1501         /* stop buffering */
1502         bool b_empty;
1503         es_out_Control( p_demux->out, ES_OUT_GET_EMPTY, &b_empty );
1504     }
1505
1506     /* avoid busy loops (read returns no data) */
1507     msleep( 40000 );
1508 }
1509
1510 static void blurayStreamSelect(demux_t *p_demux, uint32_t i_type, uint32_t i_id)
1511 {
1512     demux_sys_t *p_sys = p_demux->p_sys;
1513     int i_pid = -1;
1514
1515     vlc_mutex_lock(&p_sys->pl_info_lock);
1516
1517     if (p_sys->p_clip_info) {
1518
1519         /* The param we get is the real stream id, not an index, ie. it starts from 1 */
1520         i_id--;
1521         if (i_type == BD_EVENT_AUDIO_STREAM) {
1522             if (i_id < p_sys->p_clip_info->audio_stream_count) {
1523                 i_pid = p_sys->p_clip_info->audio_streams[i_id].pid;
1524                 p_sys->i_audio_stream = i_pid;
1525             }
1526         } else if (i_type == BD_EVENT_PG_TEXTST_STREAM) {
1527             if (i_id < p_sys->p_clip_info->pg_stream_count) {
1528                 i_pid = p_sys->p_clip_info->pg_streams[i_id].pid;
1529                 p_sys->i_spu_stream = i_pid;
1530             }
1531         }
1532     }
1533
1534     vlc_mutex_unlock(&p_sys->pl_info_lock);
1535
1536     if (i_pid > 0) {
1537         int i_idx = findEsPairIndex(p_sys, i_pid);
1538         if (i_idx >= 0) {
1539             es_out_id_t *p_es = vlc_array_item_at_index(&p_sys->es, i_idx);
1540             es_out_Control(p_demux->out, ES_OUT_SET_ES, p_es);
1541         }
1542     }
1543 }
1544
1545 static void blurayUpdatePlaylist(demux_t *p_demux, unsigned i_playlist)
1546 {
1547     demux_sys_t *p_sys = p_demux->p_sys;
1548
1549     blurayResetParser(p_demux);
1550
1551     /* read title info and init some values */
1552     if (!p_sys->b_menu)
1553         p_demux->info.i_title = bd_get_current_title(p_sys->bluray);
1554     p_demux->info.i_seekpoint = 0;
1555     p_demux->info.i_update |= INPUT_UPDATE_TITLE | INPUT_UPDATE_SEEKPOINT;
1556
1557     BLURAY_TITLE_INFO *p_title_info = bd_get_playlist_info(p_sys->bluray, i_playlist, 0);
1558     if (p_title_info) {
1559         blurayUpdateTitleInfo(p_sys->pp_title[p_demux->info.i_title], p_title_info);
1560     }
1561     setTitleInfo(p_sys, p_title_info);
1562
1563     blurayResetStillImage(p_demux);
1564 }
1565
1566 static void blurayUpdateCurrentClip(demux_t *p_demux, uint32_t clip)
1567 {
1568     demux_sys_t *p_sys = p_demux->p_sys;
1569
1570     vlc_mutex_lock(&p_sys->pl_info_lock);
1571
1572     p_sys->p_clip_info = NULL;
1573     p_sys->i_video_stream = -1;
1574
1575     if (p_sys->p_pl_info && clip < p_sys->p_pl_info->clip_count) {
1576
1577         p_sys->p_clip_info = &p_sys->p_pl_info->clips[clip];
1578
1579     /* Let's assume a single video track for now.
1580      * This may brake later, but it's enough for now.
1581      */
1582         assert(p_sys->p_clip_info->video_stream_count >= 1);
1583         p_sys->i_video_stream = p_sys->p_clip_info->video_streams[0].pid;
1584     }
1585
1586     vlc_mutex_unlock(&p_sys->pl_info_lock);
1587
1588     blurayResetStillImage(p_demux);
1589 }
1590
1591 static void blurayHandleEvent(demux_t *p_demux, const BD_EVENT *e)
1592 {
1593     demux_sys_t *p_sys = p_demux->p_sys;
1594
1595     switch (e->event) {
1596     case BD_EVENT_TITLE:
1597         if (e->param == BLURAY_TITLE_FIRST_PLAY)
1598             p_demux->info.i_title = p_sys->i_title - 1;
1599         else
1600             p_demux->info.i_title = e->param;
1601         /* this is feature title, we don't know yet which playlist it will play (if any) */
1602         setTitleInfo(p_sys, NULL);
1603         /* reset title infos here ? */
1604         p_demux->info.i_update |= INPUT_UPDATE_TITLE | INPUT_UPDATE_SEEKPOINT; /* might be BD-J title with no video */
1605         break;
1606     case BD_EVENT_PLAYLIST:
1607         /* Start of playlist playback (?????.mpls) */
1608         blurayUpdatePlaylist(p_demux, e->param);
1609         break;
1610     case BD_EVENT_PLAYITEM:
1611         blurayUpdateCurrentClip(p_demux, e->param);
1612         break;
1613     case BD_EVENT_CHAPTER:
1614         p_demux->info.i_update |= INPUT_UPDATE_SEEKPOINT;
1615         p_demux->info.i_seekpoint = e->param;
1616         break;
1617     case BD_EVENT_ANGLE:
1618         break;
1619     case BD_EVENT_MENU:
1620         p_sys->b_menu_open = e->param;
1621         break;
1622     case BD_EVENT_POPUP:
1623         p_sys->b_popup_available = e->param;
1624         /* TODO: show / hide pop-up menu button in gui ? */
1625         break;
1626
1627     /*
1628      * stream selection events
1629      */
1630     case BD_EVENT_AUDIO_STREAM:
1631     case BD_EVENT_PG_TEXTST_STREAM:
1632         blurayStreamSelect(p_demux, e->event, e->param);
1633         break;
1634     case BD_EVENT_IG_STREAM:
1635         break;
1636
1637     /*
1638      * playback control events
1639      */
1640     case BD_EVENT_STILL_TIME:
1641         blurayStillImage(p_demux, e->param);
1642         break;
1643     case BD_EVENT_DISCONTINUITY:
1644         /* reset demuxer (partially decoded PES packets must be dropped) */
1645         blurayResetParser(p_demux);
1646         break;
1647     case BD_EVENT_IDLE:
1648         /* nothing to do (ex. BD-J is preparing menus, waiting user input or running animation) */
1649         /* avoid busy loop (bd_read() returns no data) */
1650         msleep( 40000 );
1651         break;
1652
1653     default:
1654         msg_Warn(p_demux, "event: %d param: %d", e->event, e->param);
1655         break;
1656     }
1657 }
1658
1659 #define BD_TS_PACKET_SIZE (192)
1660 #define NB_TS_PACKETS (200)
1661
1662 static int blurayDemux(demux_t *p_demux)
1663 {
1664     demux_sys_t *p_sys = p_demux->p_sys;
1665     BD_EVENT e;
1666
1667     block_t *p_block = block_Alloc(NB_TS_PACKETS * (int64_t)BD_TS_PACKET_SIZE);
1668     if (!p_block)
1669         return -1;
1670
1671     int nread;
1672
1673     if (p_sys->b_menu == false) {
1674         while (bd_get_event(p_sys->bluray, &e))
1675             blurayHandleEvent(p_demux, &e);
1676
1677         nread = bd_read(p_sys->bluray, p_block->p_buffer,
1678                         NB_TS_PACKETS * BD_TS_PACKET_SIZE);
1679     } else {
1680         nread = bd_read_ext(p_sys->bluray, p_block->p_buffer,
1681                             NB_TS_PACKETS * BD_TS_PACKET_SIZE, &e);
1682         while (e.event != BD_EVENT_NONE) {
1683             blurayHandleEvent(p_demux, &e);
1684             bd_get_event(p_sys->bluray, &e);
1685         }
1686     }
1687
1688     if (p_sys->current_overlay != -1) {
1689         bluray_overlay_t *ov = p_sys->p_overlays[p_sys->current_overlay];
1690         vlc_mutex_lock(&ov->lock);
1691         bool display = ov->status == ToDisplay;
1692         vlc_mutex_unlock(&ov->lock);
1693         if (display) {
1694             if (p_sys->p_vout == NULL)
1695                 p_sys->p_vout = input_GetVout(p_sys->p_input);
1696             if (p_sys->p_vout != NULL) {
1697                 var_AddCallback(p_sys->p_vout, "mouse-moved", onMouseEvent, p_demux);
1698                 var_AddCallback(p_sys->p_vout, "mouse-clicked", onMouseEvent, p_demux);
1699                 bluraySendOverlayToVout(p_demux);
1700             }
1701         }
1702     }
1703
1704     if (nread <= 0) {
1705         block_Release(p_block);
1706         if (nread < 0)
1707             return -1;
1708         return 1;
1709     }
1710
1711     p_block->i_buffer = nread;
1712
1713     stream_DemuxSend(p_sys->p_parser, p_block);
1714
1715     p_sys->b_flushed = false;
1716
1717     return 1;
1718 }