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