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