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