git.sesse.net Git - vlc/blob - plugins/dvd/input_dvd.c

   1 /*****************************************************************************
   2  * input_dvd.c: DVD raw reading plugin.
   3  * ---
   4  * This plugins should handle all the known specificities of the DVD format,
   5  * especially the 2048 bytes logical block size.
   6  * It depends on:
   7  *  -input_netlist used to read packets
   8  *  -dvd_ifo for ifo parsing and analyse
   9  *  -dvd_css for unscrambling
  10  *  -dvd_udf to find files
  11  *****************************************************************************
  12  * Copyright (C) 1998-2001 VideoLAN
  13  * $Id: input_dvd.c,v 1.29 2001/03/05 00:40:06 stef Exp $
  14  *
  15  * Author: Stéphane Borel <stef@via.ecp.fr>
  16  *
  17  * This program is free software; you can redistribute it and/or modify
  18  * it under the terms of the GNU General Public License as published by
  19  * the Free Software Foundation; either version 2 of the License, or
  20  * (at your option) any later version.
  21  *
  22  * This program is distributed in the hope that it will be useful,
  23  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  24  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  25  * GNU General Public License for more details.
  26  *
  27  * You should have received a copy of the GNU General Public License
  28  * along with this program; if not, write to the Free Software
  29  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111, USA.
  30  *****************************************************************************/
  31
  32 /*****************************************************************************
  33  * Preamble
  34  *****************************************************************************/
  35 #include "defs.h"
  36
  37 #ifdef HAVE_CSS
  38 #define MODULE_NAME dvd-css
  39 #else /* HAVE_CSS */
  40 #define MODULE_NAME dvd-nocss
  41 #endif /* HAVE_CSS */
  42 #include "modules_inner.h"
  43
  44 #include <stdio.h>
  45 #include <stdlib.h>
  46 #include <unistd.h>
  47 #include <netinet/in.h>
  48
  49 #include <fcntl.h>
  50 #include <sys/types.h>
  51 #include <sys/uio.h>
  52
  53 #include <string.h>
  54 #include <errno.h>
  55 #include <malloc.h>
  56
  57 #include "config.h"
  58 #include "common.h"
  59 #include "threads.h"
  60 #include "mtime.h"
  61 #include "tests.h"
  62
  63 #include "intf_msg.h"
  64
  65 #include "main.h"
  66
  67 #include "stream_control.h"
  68 #include "input_ext-intf.h"
  69 #include "input_ext-dec.h"
  70
  71 #include "input.h"
  72
  73 #include "dvd_netlist.h"
  74 #include "dvd_ifo.h"
  75 #include "dvd_css.h"
  76 #include "input_dvd.h"
  77 #include "mpeg_system.h"
  78
  79 #include "debug.h"
  80
  81 #include "modules.h"
  82
  83 /*****************************************************************************
  84  * Local tables
  85  *****************************************************************************/
  86 static struct
  87 {
  88     char    p_code[3];
  89     char    p_lang_long[20];
  90 }
  91
  92 lang_tbl[] =
  93 {
  94     /* The ISO 639 language codes.
  95      * Language names with * prefix are not spelled in their own language
  96      */
  97     { "  ", "Not Specified" },
  98     { "aa", "*Afar" },
  99     { "ab", "*Abkhazian" },
 100     { "af", "*Afrikaans" },
 101     { "am", "*Amharic" },
 102     { "ar", "*Arabic" },
 103     { "as", "*Assamese" },
 104     { "ay", "*Aymara" },
 105     { "az", "*Azerbaijani" },
 106     { "ba", "*Bashkir" },
 107     { "be", "*Byelorussian" },
 108     { "bg", "*Bulgarian" },
 109     { "bh", "*Bihari" },
 110     { "bi", "*Bislama" },
 111     { "bn", "*Bengali; Bangla" },
 112     { "bo", "*Tibetan" },
 113     { "br", "*Breton" },
 114     { "ca", "*Catalan" },
 115     { "co", "*Corsican" },
 116     { "cs", "*Czech(Ceske)" },
 117     { "cy", "*Welsh" },
 118     { "da", "Dansk" },
 119     { "de", "Deutsch" },
 120     { "dz", "*Bhutani" },
 121     { "el", "*Greek" },
 122     { "en", "English" },
 123     { "eo", "*Esperanto" },
 124     { "es", "Espanol" },
 125     { "et", "*Estonian" },
 126     { "eu", "*Basque" },
 127     { "fa", "*Persian" },
 128     { "fi", "Suomi" },
 129     { "fj", "*Fiji" },
 130     { "fo", "*Faroese" },
 131     { "fr", "Francais" },
 132     { "fy", "*Frisian" },
 133     { "ga", "*Irish" },
 134     { "gd", "*Scots Gaelic" },
 135     { "gl", "*Galician" },
 136     { "gn", "*Guarani" },
 137     { "gu", "*Gujarati" },
 138     { "ha", "*Hausa" },
 139     { "he", "*Hebrew" },                                      /* formerly iw */
 140     { "hi", "*Hindi" },
 141     { "hr", "Hrvatski" },                                        /* Croatian */
 142     { "hu", "Magyar" },
 143     { "hy", "*Armenian" },
 144     { "ia", "*Interlingua" },
 145     { "id", "*Indonesian" },                                  /* formerly in */
 146     { "ie", "*Interlingue" },
 147     { "ik", "*Inupiak" },
 148     { "in", "*Indonesian" },                               /* replaced by id */
 149     { "is", "Islenska" },
 150     { "it", "Italiano" },
 151     { "iu", "*Inuktitut" },
 152     { "iw", "*Hebrew" },                                   /* replaced by he */
 153     { "ja", "*Japanese" },
 154     { "ji", "*Yiddish" },                                  /* replaced by yi */
 155     { "jw", "*Javanese" },
 156     { "ka", "*Georgian" },
 157     { "kk", "*Kazakh" },
 158     { "kl", "*Greenlandic" },
 159     { "km", "*Cambodian" },
 160     { "kn", "*Kannada" },
 161     { "ko", "*Korean" },
 162     { "ks", "*Kashmiri" },
 163     { "ku", "*Kurdish" },
 164     { "ky", "*Kirghiz" },
 165     { "la", "*Latin" },
 166     { "ln", "*Lingala" },
 167     { "lo", "*Laothian" },
 168     { "lt", "*Lithuanian" },
 169     { "lv", "*Latvian, Lettish" },
 170     { "mg", "*Malagasy" },
 171     { "mi", "*Maori" },
 172     { "mk", "*Macedonian" },
 173     { "ml", "*Malayalam" },
 174     { "mn", "*Mongolian" },
 175     { "mo", "*Moldavian" },
 176     { "mr", "*Marathi" },
 177     { "ms", "*Malay" },
 178     { "mt", "*Maltese" },
 179     { "my", "*Burmese" },
 180     { "na", "*Nauru" },
 181     { "ne", "*Nepali" },
 182     { "nl", "Nederlands" },
 183     { "no", "Norsk" },
 184     { "oc", "*Occitan" },
 185     { "om", "*(Afan) Oromo" },
 186     { "or", "*Oriya" },
 187     { "pa", "*Punjabi" },
 188     { "pl", "*Polish" },
 189     { "ps", "*Pashto, Pushto" },
 190     { "pt", "Portugues" },
 191     { "qu", "*Quechua" },
 192     { "rm", "*Rhaeto-Romance" },
 193     { "rn", "*Kirundi" },
 194     { "ro", "*Romanian"  },
 195     { "ru", "*Russian" },
 196     { "rw", "*Kinyarwanda" },
 197     { "sa", "*Sanskrit" },
 198     { "sd", "*Sindhi" },
 199     { "sg", "*Sangho" },
 200     { "sh", "*Serbo-Croatian" },
 201     { "si", "*Sinhalese" },
 202     { "sk", "*Slovak" },
 203     { "sl", "*Slovenian" },
 204     { "sm", "*Samoan" },
 205     { "sn", "*Shona"  },
 206     { "so", "*Somali" },
 207     { "sq", "*Albanian" },
 208     { "sr", "*Serbian" },
 209     { "ss", "*Siswati" },
 210     { "st", "*Sesotho" },
 211     { "su", "*Sundanese" },
 212     { "sv", "Svenska" },
 213     { "sw", "*Swahili" },
 214     { "ta", "*Tamil" },
 215     { "te", "*Telugu" },
 216     { "tg", "*Tajik" },
 217     { "th", "*Thai" },
 218     { "ti", "*Tigrinya" },
 219     { "tk", "*Turkmen" },
 220     { "tl", "*Tagalog" },
 221     { "tn", "*Setswana" },
 222     { "to", "*Tonga" },
 223     { "tr", "*Turkish" },
 224     { "ts", "*Tsonga" },
 225     { "tt", "*Tatar" },
 226     { "tw", "*Twi" },
 227     { "ug", "*Uighur" },
 228     { "uk", "*Ukrainian" },
 229     { "ur", "*Urdu" },
 230     { "uz", "*Uzbek" },
 231     { "vi", "*Vietnamese" },
 232     { "vo", "*Volapuk" },
 233     { "wo", "*Wolof" },
 234     { "xh", "*Xhosa" },
 235     { "yi", "*Yiddish" },                                     /* formerly ji */
 236     { "yo", "*Yoruba" },
 237     { "za", "*Zhuang" },
 238     { "zh", "*Chinese" },
 239     { "zu", "*Zulu" },
 240     { "\0", "" }
 241 };
 242
 243 /*****************************************************************************
 244  * Local prototypes
 245  *****************************************************************************/
 246 static int  DVDProbe    ( probedata_t *p_data );
 247 static int  DVDCheckCSS ( struct input_thread_s * );
 248 static int  DVDRead     ( struct input_thread_s *, data_packet_t ** );
 249 static void DVDInit     ( struct input_thread_s * );
 250 static void DVDEnd      ( struct input_thread_s * );
 251 static void DVDSeek     ( struct input_thread_s *, off_t );
 252 static int  DVDSetArea  ( struct input_thread_s *, int, int, int, int );
 253 static int  DVDRewind   ( struct input_thread_s * );
 254
 255 /*****************************************************************************
 256  * Functions exported as capabilities. They are declared as static so that
 257  * we don't pollute the namespace too much.
 258  *****************************************************************************/
 259 void _M( input_getfunctions )( function_list_t * p_function_list )
 260 {
 261 #define input p_function_list->functions.input
 262     p_function_list->pf_probe = DVDProbe;
 263     input.pf_init             = DVDInit;
 264     input.pf_open             = input_FileOpen;
 265     input.pf_close            = input_FileClose;
 266     input.pf_end              = DVDEnd;
 267     input.pf_read             = DVDRead;
 268     input.pf_set_area         = DVDSetArea;
 269     input.pf_demux            = input_DemuxPS;
 270     input.pf_new_packet       = DVDNewPacket;
 271     input.pf_new_pes          = DVDNewPES;
 272     input.pf_delete_packet    = DVDDeletePacket;
 273     input.pf_delete_pes       = DVDDeletePES;
 274     input.pf_rewind           = DVDRewind;
 275     input.pf_seek             = DVDSeek;
 276 #undef input
 277 }
 278
 279 /*
 280  * Local tools to decode some data in ifo
 281  */
 282
 283 /*****************************************************************************
 284  * Language: gives the long language name from the two-letters ISO-639 code
 285  *****************************************************************************/
 286 static char * Language( u16 i_code )
 287 {
 288     int     i = 0;
 289
 290     while( memcmp( lang_tbl[i].p_code, &i_code, 2 ) &&
 291            lang_tbl[i].p_lang_long[0] )
 292     {
 293         i++;
 294     }
 295
 296     return lang_tbl[i].p_lang_long;
 297 }
 298
 299 /*
 300  * Data reading functions
 301  */
 302
 303 /*****************************************************************************
 304  * DVDProbe: verifies that the stream is a PS stream
 305  *****************************************************************************/
 306 static int DVDProbe( probedata_t *p_data )
 307 {
 308     input_thread_t * p_input = (input_thread_t *)p_data;
 309
 310     char * psz_name = p_input->p_source;
 311     int i_handle;
 312     int i_score = 5;
 313
 314     if( TestMethod( INPUT_METHOD_VAR, "dvd" ) )
 315     {
 316 #ifdef HAVE_CSS
 317         return( 999 );
 318 #else /* HAVE_CSS */
 319         return( 998 );
 320 #endif /* HAVE_CSS */
 321     }
 322
 323     if( ( strlen(psz_name) > 4 ) && !strncasecmp( psz_name, "dvd:", 4 ) )
 324     {
 325         /* If the user specified "dvd:" then it's probably a DVD */
 326 #ifdef HAVE_CSS
 327         i_score = 100;
 328 #else /* HAVE_CSS */
 329         i_score = 90;
 330 #endif /* HAVE_CSS */
 331         psz_name += 4;
 332     }
 333
 334     i_handle = open( psz_name, 0 );
 335     if( i_handle == -1 )
 336     {
 337         return( 0 );
 338     }
 339     close( i_handle );
 340
 341     return( i_score );
 342 }
 343
 344 /*****************************************************************************
 345  * DVDCheckCSS: check the stream
 346  *****************************************************************************/
 347 static int DVDCheckCSS( input_thread_t * p_input )
 348 {
 349     return CSSTest( p_input->i_handle );
 350 }
 351
 352
 353 /*****************************************************************************
 354  * DVDFindSector: find cell index in adress map from index in
 355  * information table program map and give corresponding sectors.
 356  *****************************************************************************/
 357 static int DVDFindSector( thread_dvd_data_t * p_dvd )
 358 {
 359     pgc_t *              p_pgc;
 360     int                  i_cell;
 361     int                  i_index;
 362
 363     p_pgc = &p_dvd->ifo.vts.pgci_ti.p_srp[p_dvd->i_vts_title-1].pgc;
 364
 365     i_index = p_dvd->i_prg_cell - 1;
 366
 367     do {
 368         if( i_index++ > p_dvd->i_prg_cell )
 369         {
 370             return -1;
 371         }
 372
 373         i_cell = p_dvd->i_cell + 1;
 374
 375         while( ( ( p_pgc->p_cell_pos_inf[i_index].i_vob_id !=
 376                    p_dvd->ifo.vts.c_adt.p_cell_inf[i_cell].i_vob_id ) ||
 377                  ( p_pgc->p_cell_pos_inf[i_index].i_cell_id !=
 378                    p_dvd->ifo.vts.c_adt.p_cell_inf[i_cell].i_cell_id ) ) &&
 379                  ( i_cell < ( p_dvd->ifo.vts.c_adt.i_cell_nb ) ) )
 380         {
 381             i_cell++;
 382         }
 383
 384     } while( i_cell == ( p_dvd->ifo.vts.c_adt.i_cell_nb ) );
 385
 386     p_dvd->i_cell = i_cell;
 387     p_dvd->i_prg_cell = i_index;
 388
 389     /* Find start and end sectors of new cell */
 390     p_dvd->i_sector = MAX(
 391             p_dvd->ifo.vts.c_adt.p_cell_inf[i_cell].i_ssector,
 392             p_pgc->p_cell_play_inf[i_index].i_entry_sector );
 393     p_dvd->i_end_sector = MIN(
 394             p_dvd->ifo.vts.c_adt.p_cell_inf[i_cell].i_esector,
 395             p_pgc->p_cell_play_inf[i_index].i_lsector );
 396
 397 //intf_WarnMsg( 3, "cell: %d index: %d sector1: %x sector2: %x end1: %x end2: %x", i_cell, i_index, p_dvd->ifo.vts.c_adt.p_cell_inf[i_cell].i_ssector, p_pgc->p_cell_play_inf[i_index].i_entry_sector, p_dvd->ifo.vts.c_adt.p_cell_inf[i_cell].i_esector,p_pgc->p_cell_play_inf[i_index].i_lsector  );
 398
 399     return 0;
 400 }
 401
 402 /*****************************************************************************
 403  * DVDChapterSelect: find the cell corresponding to requested chapter
 404  * When called to find chapter 1, also sets title size and end.
 405  *****************************************************************************/
 406 static int DVDChapterSelect( thread_dvd_data_t * p_dvd, int i_chapter )
 407 {
 408     pgc_t *              p_pgc;
 409
 410     p_pgc = &p_dvd->ifo.vts.pgci_ti.p_srp[p_dvd->i_vts_title-1].pgc;
 411
 412     /* Find cell index in Program chain for current chapter */
 413     p_dvd->i_prg_cell = p_pgc->prg_map.pi_entry_cell[i_chapter-1] - 1;
 414     p_dvd->i_cell = -1;
 415
 416     /* Search for cell_index in cell adress_table */
 417     DVDFindSector( p_dvd );
 418
 419     /* initialize  navigation parameters */
 420     p_dvd->i_sector = p_dvd->ifo.vts.c_adt.p_cell_inf[p_dvd->i_cell].i_ssector;
 421     p_dvd->i_end_sector =
 422                       p_dvd->ifo.vts.c_adt.p_cell_inf[p_dvd->i_cell].i_esector;
 423
 424     /* start is : beginning of vts vobs + offset to vob x */
 425     p_dvd->i_start = p_dvd->i_title_start +
 426                      DVD_LB_SIZE * (off_t)( p_dvd->i_sector );
 427
 428     /* Position the fd pointer on the right address */
 429     p_dvd->i_start = lseek( p_dvd->i_fd, p_dvd->i_start, SEEK_SET );
 430
 431     p_dvd->i_chapter = i_chapter;
 432
 433     return 0;
 434 }
 435
 436 /*****************************************************************************
 437  * DVDSetArea: initialize input data for title x, chapter y.
 438  * It should be called for each user navigation request, and to change
 439  * audio or sub-picture streams.
 440  * ---
 441  * Take care that i_title starts from 0 (vmg) and i_chapter start from 1.
 442  * i_audio, i_spu start from 1 ; 0 means off.
 443  * A negative value for an argument means it does not change
 444  *****************************************************************************/
 445 static int DVDSetArea( input_thread_t * p_input,
 446                        int i_title, int i_chapter,
 447                        int i_audio, int i_spu )
 448 {
 449     thread_dvd_data_t *  p_dvd;
 450     es_descriptor_t *    p_es;
 451     int                  i_index;
 452     int                  i_nb;
 453     u16                  i_id;
 454     u8                   i_ac3;
 455     u8                   i_mpeg;
 456     u8                   i_sub_pic;
 457     u8                   i;
 458     boolean_t            b_last;
 459
 460     p_dvd = (thread_dvd_data_t*)p_input->p_plugin_data;
 461
 462     vlc_mutex_lock( &p_input->stream.stream_lock );
 463
 464     if( i_title >= 0 )
 465     {
 466
 467         /*
 468          *  We have to load all title information
 469          */
 470
 471         /* Change the default area */
 472         p_input->stream.p_selected_area = p_input->stream.pp_areas[i_title];
 473
 474         /* title number: it is not vts nb! */
 475         p_dvd->i_title = i_title;
 476
 477         /* title position inside the selected vts */
 478         p_dvd->i_vts_title =
 479                     p_dvd->ifo.vmg.ptt_srpt.p_tts[i_title-1].i_vts_ttn;
 480
 481         /* vts number */
 482         p_dvd->ifo.i_title = i_title;
 483
 484         /* ifo vts */
 485         IfoReadVTS( &(p_dvd->ifo) );
 486         intf_WarnMsg( 2, "ifo info: vts initialized" );
 487
 488         /* css title key for current vts */
 489         if( p_dvd->b_encrypted )
 490         {
 491             p_dvd->p_css->i_title =
 492                     p_dvd->ifo.vmg.ptt_srpt.p_tts[i_title-1].i_tts_nb;
 493             p_dvd->p_css->i_title_pos =
 494                     p_dvd->ifo.vts.i_pos +
 495                     p_dvd->ifo.vts.mat.i_tt_vobs_ssector * DVD_LB_SIZE;
 496             CSSGetKey( p_dvd->p_css );
 497             intf_WarnMsg( 2, "css info: vts key initialized" );
 498         }
 499
 500         /*
 501          * Set selected title start and size
 502          */
 503
 504         /* title set offset */
 505         p_dvd->i_title_start = p_dvd->ifo.vts.i_pos + DVD_LB_SIZE *
 506                       (off_t)( p_dvd->ifo.vts.mat.i_tt_vobs_ssector );
 507
 508         /* last video cell */
 509         p_dvd->i_cell = -1;
 510         p_dvd->i_prg_cell = -1 +
 511             p_dvd->ifo.vts.pgci_ti.p_srp[p_dvd->i_vts_title-1].pgc.i_cell_nb;
 512         DVDFindSector( p_dvd );
 513
 514         /* temporary hack to fix size in some dvds */
 515         if( p_dvd->i_cell >= p_dvd->ifo.vts.c_adt.i_cell_nb )
 516         {
 517             p_dvd->i_cell = p_dvd->ifo.vts.c_adt.i_cell_nb - 1;
 518         }
 519
 520         p_dvd->i_size = DVD_LB_SIZE *
 521           (off_t)( p_dvd->ifo.vts.c_adt.p_cell_inf[p_dvd->i_cell].i_esector );
 522
 523         DVDChapterSelect( p_dvd, 1 );
 524
 525         p_dvd->i_size -= (off_t)( p_dvd->i_sector + 1 ) *DVD_LB_SIZE;
 526
 527         lseek( p_input->i_handle, p_dvd->i_start, SEEK_SET );
 528
 529
 530         intf_WarnMsg( 2, "dvd info: title: %d", i_title );
 531         intf_WarnMsg( 2, "dvd info: vobstart at: %lld", p_dvd->i_start );
 532         intf_WarnMsg( 2, "dvd info: stream size: %lld", p_dvd->i_size );
 533         intf_WarnMsg( 2, "dvd info: number of chapters: %d",
 534                         p_dvd->ifo.vmg.ptt_srpt.p_tts[i_title-1].i_ptt_nb );
 535
 536 /*        intf_WarnMsg( 3, "last: %d index: %d", i_last_chapter, i_index );*/
 537
 538
 539 /*        intf_WarnMsg( 3, "DVD: Cell: %d vob id: %d cell id: %d", i_end_cell, p_dvd->ifo.vts.c_adt.p_cell_inf[i_end_cell].i_vob_id, p_dvd->ifo.vts.c_adt.p_cell_inf[i_end_cell].i_cell_id );*/
 540
 541         /* Area definition */
 542         p_input->stream.p_selected_area->i_start = p_dvd->i_start;
 543         p_input->stream.p_selected_area->i_size = p_dvd->i_size;
 544
 545         /*
 546          * Destroy obsolete ES by reinitializing program 0
 547          * and find all ES in title with ifo data
 548          */
 549         if( p_input->stream.pp_programs != NULL )
 550         {
 551             input_DelProgram( p_input, p_input->stream.pp_programs[0] );
 552         }
 553
 554         input_AddProgram( p_input, 0, sizeof( stream_ps_data_t ) );
 555
 556         p_es = NULL;
 557
 558         /* ES 0 -> video MPEG2 */
 559         p_es = input_AddES( p_input, p_input->stream.pp_programs[0], 0xe0, 0 );
 560         p_es->i_stream_id = 0xe0;
 561         p_es->i_type = MPEG2_VIDEO_ES;
 562         input_SelectES( p_input, p_es );
 563         intf_WarnMsg( 1, "dvd info: video MPEG2 stream" );
 564
 565         /* Audio ES, in the order they appear in .ifo */
 566         i_nb = p_dvd->ifo.vts.mat.i_audio_nb;
 567
 568         i_ac3 = 0x7f;
 569         i_mpeg = 0xc0;
 570
 571         for( i = 1 ; i <= i_nb ; i++ )
 572         {
 573
 574 #if 0
 575     fprintf( stderr, "Audio %d: %x %x %x %x %x %x %x %x %x %x %x %x\n", i,
 576             p_dvd->ifo.vts.mat.p_audio_atrt[i-1].i_num_channels,
 577             p_dvd->ifo.vts.mat.p_audio_atrt[i-1].i_coding_mode,
 578             p_dvd->ifo.vts.mat.p_audio_atrt[i-1].i_multichannel_extension,
 579             p_dvd->ifo.vts.mat.p_audio_atrt[i-1].i_type,
 580             p_dvd->ifo.vts.mat.p_audio_atrt[i-1].i_appl_mode,
 581             p_dvd->ifo.vts.mat.p_audio_atrt[i-1].i_foo,
 582             p_dvd->ifo.vts.mat.p_audio_atrt[i-1].i_bar,
 583             p_dvd->ifo.vts.mat.p_audio_atrt[i-1].i_appl_mode,
 584             p_dvd->ifo.vts.mat.p_audio_atrt[i-1].i_quantization,
 585             p_dvd->ifo.vts.mat.p_audio_atrt[i-1].i_sample_freq,
 586             p_dvd->ifo.vts.mat.p_audio_atrt[i-1].i_lang_code,
 587             p_dvd->ifo.vts.mat.p_audio_atrt[i-1].i_caption );
 588 #endif
 589
 590             switch( p_dvd->ifo.vts.mat.p_audio_atrt[i-1].i_coding_mode )
 591             {
 592             case 0x00:              /* AC3 */
 593                 i_id = ( ( i_ac3 + i ) << 8 ) | 0xbd;
 594                 p_es = input_AddES( p_input,
 595                                     p_input->stream.pp_programs[0], i_id, 0 );
 596                 p_es->i_stream_id = 0xbd;
 597                 p_es->i_type = AC3_AUDIO_ES;
 598                 p_es->b_audio = 1;
 599                 strcpy( p_es->psz_desc, Language( hton16(
 600                     p_dvd->ifo.vts.mat.p_audio_atrt[i-1].i_lang_code ) ) );
 601
 602                 intf_WarnMsg( 1, "dvd info: audio stream %d %s\t(0x%x)",
 603                               i, p_es->psz_desc, i_id );
 604
 605                 break;
 606             case 0x02:
 607             case 0x03:              /* MPEG audio */
 608                 i_id = 0xbf + i;
 609                 p_es = input_AddES( p_input,
 610                                     p_input->stream.pp_programs[0], i_id, 0 );
 611                 p_es->i_stream_id = i_id;
 612                 p_es->i_type = MPEG2_AUDIO_ES;
 613                 p_es->b_audio = 1;
 614                 strcpy( p_es->psz_desc, Language( hton16(
 615                     p_dvd->ifo.vts.mat.p_audio_atrt[i-1].i_lang_code ) ) );
 616
 617                 intf_WarnMsg( 1, "dvd info: audio stream %d %s\t(0x%x)",
 618                               i, p_es->psz_desc, i_id );
 619
 620                 break;
 621             case 0x04:              /* LPCM */
 622                 i_id = 0;
 623                 intf_ErrMsg( "dvd warning: LPCM audio not handled yet" );
 624                 break;
 625             case 0x06:              /* DTS */
 626                 i_id = 0;
 627                 i_ac3--;
 628                 intf_ErrMsg( "dvd warning: DTS audio not handled yet" );
 629                 break;
 630             default:
 631                 i_id = 0;
 632                 intf_ErrMsg( "dvd warning: unknown audio type %.2x",
 633                          p_dvd->ifo.vts.mat.p_audio_atrt[i-1].i_coding_mode );
 634             }
 635
 636         }
 637
 638         /* Sub Picture ES */
 639         i_nb = p_dvd->ifo.vts.mat.i_subpic_nb;
 640
 641         b_last = 0;
 642         i_sub_pic = 0x20;
 643         for( i = 1 ; i <= i_nb ; i++ )
 644         {
 645             if( !b_last )
 646             {
 647                 i_id = ( i_sub_pic++ << 8 ) | 0xbd;
 648                 p_es = input_AddES( p_input,
 649                                     p_input->stream.pp_programs[0], i_id, 0 );
 650                 p_es->i_stream_id = 0xbd;
 651                 p_es->i_type = DVD_SPU_ES;
 652                 strcpy( p_es->psz_desc, Language( hton16(
 653                     p_dvd->ifo.vts.mat.p_subpic_atrt[i-1].i_lang_code ) ) );
 654                 intf_WarnMsg( 1, "dvd info: spu stream %d %s\t(0x%x)",
 655                               i, p_es->psz_desc, i_id );
 656
 657                 /* The before the last spu has a 0x0 prefix */
 658                 b_last =
 659                     ( p_dvd->ifo.vts.mat.p_subpic_atrt[i].i_prefix == 0 );
 660             }
 661         }
 662
 663     } // i_title >= 0
 664
 665     /*
 666      * Select requested ES
 667      */
 668     if( ( i_audio >= 0 ) || ( i_title >= 0 ) )
 669     {
 670
 671         /* Audio: we check it is in the range and
 672          * default it to the first if not */
 673         if( i_audio > p_dvd->ifo.vts.mat.i_audio_nb )
 674         {
 675             i_audio = 1;
 676         }
 677
 678         p_es = p_input->stream.pp_programs[0]->pp_es[i_audio];
 679
 680         /* We can only have one audio channel */
 681         /* Look for a preselected one */
 682         i_index = -1;
 683         for( i = 0 ; i < p_input->stream.i_selected_es_number ; i++ )
 684         {
 685             if( p_input->stream.pp_selected_es[i]->b_audio )
 686             {
 687                 i_index = i;
 688                 break;
 689             }
 690         }
 691
 692         if( i_index != -1 )
 693         {
 694
 695             if( p_input->stream.pp_selected_es[i_index] != p_es )
 696             {
 697                 input_UnselectES( p_input,
 698                                   p_input->stream.pp_selected_es[i_index] );
 699                 input_SelectES( p_input, p_es );
 700                 intf_WarnMsg( 1, "dvd info: audio %d selected -> %s (0x%x)",
 701                               i_audio, p_es->psz_desc, p_es->i_id );
 702             }
 703         }
 704         else
 705         {
 706             input_SelectES( p_input, p_es );
 707             intf_WarnMsg( 1, "dvd info: audio %d selected -> %s (0x%x)",
 708                           i_audio, p_es->psz_desc, p_es->i_id );
 709         }
 710     }
 711
 712     if( ( i_spu >= 0 ) || ( i_title >= 0 ) )
 713     {
 714         /* For spu: no one if none or a not existing one requested */
 715         if( ( i_spu <= p_dvd->ifo.vts.mat.i_subpic_nb ) && ( i_spu > 0 ) )
 716         {
 717             input_SelectES( p_input, ( p_es = p_input->stream.pp_programs[0]->
 718                 pp_es[ i_spu + p_dvd->ifo.vts.mat.i_audio_nb ] ) );
 719
 720             intf_WarnMsg( 1, "dvd info: spu   %d selected -> %s (0x%x)",
 721                           i_spu, p_es->psz_desc, p_es->i_id );
 722         }
 723     }
 724
 725     /*
 726      * Chapter selection
 727      */
 728
 729     if( ( i_chapter > 0 ) &&
 730         ( i_chapter <= p_input->stream.p_selected_area->i_part_nb ) )
 731     {
 732         DVDChapterSelect( p_dvd, i_chapter );
 733
 734         p_input->stream.p_selected_area->i_tell = p_dvd->i_start -
 735                                 p_input->stream.p_selected_area->i_start;
 736         p_input->stream.p_selected_area->i_part = p_dvd->i_chapter;
 737
 738         intf_WarnMsg( 2, "dvd info: chapter %d start at: %lld", i_chapter,
 739                                     p_input->stream.p_selected_area->i_tell );
 740     }
 741
 742     /* No PSM to read in DVD mode, we already have all information */
 743     p_input->stream.pp_programs[0]->b_is_ok = 1;
 744
 745     vlc_mutex_unlock( &p_input->stream.stream_lock );
 746
 747     return 0;
 748 }
 749
 750 /*****************************************************************************
 751  * DVDInit: initializes DVD structures
 752  *****************************************************************************/
 753 static void DVDInit( input_thread_t * p_input )
 754 {
 755     thread_dvd_data_t *  p_dvd;
 756     int                  i_title;
 757     int                  i_chapter;
 758     int                  i_audio;
 759     int                  i_spu;
 760     int                  i;
 761
 762     if( (p_dvd = malloc( sizeof(thread_dvd_data_t) )) == NULL )
 763     {
 764         intf_ErrMsg( "Out of memory" );
 765         p_input->b_error = 1;
 766         return;
 767     }
 768
 769     p_input->p_plugin_data = (void *)p_dvd;
 770     p_input->p_method_data = NULL;
 771
 772     p_dvd->i_fd = p_input->i_handle;
 773
 774     p_dvd->i_block_once = 1;
 775     p_input->i_read_once = 8;
 776
 777     p_dvd->b_encrypted = DVDCheckCSS( p_input );
 778
 779     lseek( p_input->i_handle, 0, SEEK_SET );
 780
 781     /* Reading structures initialisation */
 782     p_input->p_method_data =
 783     DVDNetlistInit( 4096, 8192, 4096, DVD_LB_SIZE, p_dvd->i_block_once );
 784     intf_WarnMsg( 2, "dvd info: netlist initialized" );
 785
 786     /* Ifo initialisation */
 787     p_dvd->ifo = IfoInit( p_input->i_handle );
 788     intf_WarnMsg( 2, "ifo info: vmg initialized" );
 789
 790     /* CSS initialisation */
 791     if( p_dvd->b_encrypted )
 792     {
 793         p_dvd->p_css = CSSInit( p_input->i_handle );
 794
 795         if( p_dvd->p_css == NULL )
 796         {
 797             intf_ErrMsg( "css error: fatal failure" );
 798             p_input->b_error = 1;
 799             return;
 800         }
 801
 802         intf_WarnMsg( 2, "css info: initialized" );
 803     }
 804
 805     /* Initialize ES structures */
 806     input_InitStream( p_input, sizeof( stream_ps_data_t ) );
 807
 808     /* Set stream and area data */
 809     vlc_mutex_lock( &p_input->stream.stream_lock );
 810
 811 #define srpt p_dvd->ifo.vmg.ptt_srpt
 812     intf_WarnMsg( 2, "dvd info: number of titles: %d", srpt.i_ttu_nb );
 813
 814 #define area p_input->stream.pp_areas
 815     /* We start from 1 here since area 0 is reserved for video_ts.vob */
 816     for( i = 1 ; i <= srpt.i_ttu_nb ; i++ )
 817     {
 818         input_AddArea( p_input );
 819
 820         /* Should not be so simple eventually :
 821          * are title Program Chains, or still something else ? */
 822         area[i]->i_id = i;
 823
 824         /* Absolute start offset and size
 825          * We can only set that with vts ifo, so we do it during the
 826          * first call to DVDSetArea */
 827         area[i]->i_start = 0;
 828         area[i]->i_size = 0;
 829
 830         /* Number of chapter */
 831         area[i]->i_part_nb = srpt.p_tts[i-1].i_ptt_nb;
 832         area[i]->i_part = 1;
 833
 834         /* Offset to vts_i_0.ifo */
 835         area[i]->i_plugin_data = p_dvd->ifo.i_off +
 836                                ( srpt.p_tts[i-1].i_ssector * DVD_LB_SIZE );
 837     }
 838 #undef area
 839
 840     vlc_mutex_unlock( &p_input->stream.stream_lock );
 841
 842     /* Get requested title - if none try to find one where is the movie */
 843     i_title = main_GetIntVariable( INPUT_TITLE_VAR, 1 );
 844     if( i_title <= 0 || i_title > srpt.i_ttu_nb )
 845     {
 846         i_title = 1;
 847     }
 848 #undef srpt
 849
 850     /* Get requested chapter - if none defaults to first one */
 851     i_chapter = main_GetIntVariable( INPUT_CHAPTER_VAR, 1 );
 852     if( i_chapter <= 0 )
 853     {
 854         i_chapter = 1;
 855     }
 856
 857     /* For audio: first one if none or a not existing one specified */
 858     i_audio = main_GetIntVariable( INPUT_CHANNEL_VAR, 1 );
 859     if( i_audio <= 0 )
 860     {
 861         main_PutIntVariable( INPUT_CHANNEL_VAR, 1 );
 862         i_audio = 1;
 863     }
 864
 865     i_spu = main_GetIntVariable( INPUT_SUBTITLE_VAR, 0 );
 866
 867     DVDSetArea( p_input, i_title, i_chapter, i_audio, i_spu );
 868
 869     return;
 870 }
 871
 872 /*****************************************************************************
 873  * DVDEnd: frees unused data
 874  *****************************************************************************/
 875 static void DVDEnd( input_thread_t * p_input )
 876 {
 877     thread_dvd_data_t *     p_dvd;
 878     dvd_netlist_t *         p_netlist;
 879
 880     p_dvd = (thread_dvd_data_t*)p_input->p_plugin_data;
 881     p_netlist = (dvd_netlist_t *)p_input->p_method_data;
 882
 883     CSSEnd( p_dvd->p_css );
 884 //    IfoEnd( p_dvd->p_ifo ) );
 885     free( p_dvd );
 886     DVDNetlistEnd( p_netlist );
 887 }
 888
 889 /*****************************************************************************
 890  * DVDRead: reads data packets into the netlist.
 891  *****************************************************************************
 892  * Returns -1 in case of error, 0 if everything went well, and 1 in case of
 893  * EOF.
 894  *****************************************************************************/
 895 static int DVDRead( input_thread_t * p_input,
 896                     data_packet_t ** pp_packets )
 897 {
 898     thread_dvd_data_t *     p_dvd;
 899     dvd_netlist_t *         p_netlist;
 900     pgc_t *                 p_pgc;
 901     struct iovec *          p_vec;
 902     struct data_packet_s *  pp_data[p_input->i_read_once];
 903     u8 *                    pi_cur;
 904     int                     i_packet_size;
 905     int                     i_iovec;
 906     int                     i_packet;
 907     int                     i_pos;
 908     int                     i_read_bytes;
 909     int                     i_read_blocks;
 910     int                     i_chapter;
 911     off_t                   i_off;
 912     boolean_t               b_eof;
 913
 914     p_dvd = (thread_dvd_data_t *)p_input->p_plugin_data;
 915     p_netlist = (dvd_netlist_t *)p_input->p_method_data;
 916     p_pgc = &p_dvd->ifo.vts.pgci_ti.p_srp[p_dvd->i_vts_title-1].pgc;
 917
 918     /* Get an iovec pointer */
 919     if( ( p_vec = DVDGetiovec( p_netlist ) ) == NULL )
 920     {
 921         intf_ErrMsg( "DVD: read error" );
 922         return -1;
 923     }
 924
 925     /* Get the position of the next cell if we're at cell end */
 926
 927     if( p_dvd->i_sector > p_dvd->i_end_sector )
 928     {
 929         /* Find cell index in adress map */
 930         if( DVDFindSector( p_dvd ) < 0 )
 931         {
 932             pp_packets[0] = NULL;
 933             return 1;
 934         }
 935
 936         /* Position the fd pointer on the right address */
 937         i_off = lseek( p_dvd->i_fd,
 938                        p_dvd->i_title_start +
 939                        (off_t)( p_dvd->i_sector ) *DVD_LB_SIZE,
 940                SEEK_SET );
 941
 942         i_chapter = 0;
 943
 944         /* update chapter */
 945         while( p_pgc->prg_map.pi_entry_cell[i_chapter-1] - 1 <
 946                p_dvd->i_prg_cell )
 947         {
 948             i_chapter++;
 949         }
 950
 951         p_dvd->i_chapter = i_chapter;
 952
 953         vlc_mutex_lock( &p_input->stream.stream_lock );
 954
 955         p_input->stream.p_selected_area->i_tell = i_off -
 956                                     p_input->stream.p_selected_area->i_start;
 957         p_input->stream.p_selected_area->i_part = p_dvd->i_chapter;
 958
 959         vlc_mutex_unlock( &p_input->stream.stream_lock );
 960
 961     }
 962
 963     /* Reads from DVD */
 964     i_read_bytes = readv( p_dvd->i_fd, p_vec, p_dvd->i_block_once );
 965     i_read_blocks = ( i_read_bytes + 0x7ff ) >> 11;
 966
 967     /* Update netlist indexes */
 968     DVDMviovec( p_netlist, i_read_blocks, pp_data );
 969
 970     /* Update global position */
 971     p_dvd->i_sector += i_read_blocks;
 972
 973     i_packet = 0;
 974
 975     /* Read headers to compute payload length */
 976     for( i_iovec = 0 ; i_iovec < i_read_blocks ; i_iovec++ )
 977     {
 978         if( p_dvd->b_encrypted )
 979         {
 980             CSSDescrambleSector( p_dvd->p_css->pi_title_key,
 981                                  p_vec[i_iovec].iov_base );
 982             ((u8*)(p_vec[i_iovec].iov_base))[0x14] &= 0x8F;
 983         }
 984
 985         i_pos = 0;
 986
 987         while( i_pos < p_netlist->i_buffer_size )
 988         {
 989             pi_cur = (u8*)(p_vec[i_iovec].iov_base + i_pos);
 990
 991             /*default header */
 992             if( U32_AT( pi_cur ) != 0x1BA )
 993             {
 994                 /* That's the case for all packets, except pack header. */
 995                 i_packet_size = U16_AT( pi_cur + 4 );
 996                 pp_packets[i_packet] = DVDNewPtr( p_netlist );
 997             }
 998             else
 999             {
1000                 /* Pack header. */
1001                 if( ( pi_cur[4] & 0xC0 ) == 0x40 )
1002                 {
1003                     /* MPEG-2 */
1004                     i_packet_size = 8;
1005                 }
1006                 else if( ( pi_cur[4] & 0xF0 ) == 0x20 )
1007                 {
1008                     /* MPEG-1 */
1009                     i_packet_size = 6;
1010                 }
1011                 else
1012                 {
1013                     intf_ErrMsg( "Unable to determine stream type" );
1014                     return( -1 );
1015                 }
1016
1017                 pp_packets[i_packet] = pp_data[i_iovec];
1018
1019             }
1020
1021             (*pp_data[i_iovec]->pi_refcount)++;
1022
1023             pp_packets[i_packet]->pi_refcount = pp_data[i_iovec]->pi_refcount;
1024
1025             pp_packets[i_packet]->p_buffer = pp_data[i_iovec]->p_buffer;
1026
1027             pp_packets[i_packet]->p_payload_start =
1028                     pp_packets[i_packet]->p_buffer + i_pos;
1029
1030             pp_packets[i_packet]->p_payload_end =
1031                     pp_packets[i_packet]->p_payload_start + i_packet_size + 6;
1032
1033             i_packet++;
1034             i_pos += i_packet_size + 6;
1035         }
1036     }
1037
1038     pp_packets[i_packet] = NULL;
1039
1040     vlc_mutex_lock( &p_input->stream.stream_lock );
1041
1042     p_input->stream.p_selected_area->i_tell +=
1043                                         p_dvd->i_block_once *DVD_LB_SIZE;
1044     b_eof = p_input->stream.p_selected_area->i_tell < p_dvd->i_size ? 0 : 1;
1045
1046     vlc_mutex_unlock( &p_input->stream.stream_lock );
1047
1048     if( ( i_read_blocks == p_dvd->i_block_once ) && ( !b_eof ) )
1049     {
1050         return 0;
1051     }
1052     else
1053     {
1054         return 1;
1055     }
1056 }
1057
1058
1059 /*****************************************************************************
1060  * DVDRewind : reads a stream backward
1061  *****************************************************************************/
1062 static int DVDRewind( input_thread_t * p_input )
1063 {
1064     return( -1 );
1065 }
1066
1067 /*****************************************************************************
1068  * DVDSeek : Goes to a given position on the stream ; this one is used by the
1069  * input and translate chronological position from input to logical postion
1070  * on the device
1071  * ---
1072  * The lock should be taken before calling this function.
1073  *****************************************************************************/
1074 static void DVDSeek( input_thread_t * p_input, off_t i_off )
1075 {
1076     thread_dvd_data_t *     p_dvd;
1077     pgc_t *                 p_pgc;
1078     off_t                   i_pos;
1079     int                     i_prg_cell;
1080     int                     i_cell;
1081     int                     i_chapter;
1082
1083     p_dvd = ( thread_dvd_data_t * )p_input->p_plugin_data;
1084     p_pgc = &p_dvd->ifo.vts.pgci_ti.p_srp[p_dvd->i_vts_title-1].pgc;
1085
1086     /* update navigation data */
1087     p_dvd->i_sector = i_off >> 11;
1088
1089     i_prg_cell = 0;
1090     i_cell = 0;
1091     i_chapter = 1;
1092
1093     /* parse vobu address map to find program cell */
1094     while( p_pgc->p_cell_play_inf[i_prg_cell].i_lsector < p_dvd->i_sector  )
1095     {
1096         i_prg_cell++;
1097     }
1098     /* parse cell address map to find cell */
1099     while( p_dvd->ifo.vts.c_adt.p_cell_inf[i_cell].i_esector <=
1100            p_dvd->i_sector + 1 )
1101     {
1102         i_cell++;
1103     }
1104
1105     p_dvd->i_prg_cell = i_prg_cell;
1106     p_dvd->i_cell = i_cell - 1;             /* DVDFindSector will add one */
1107
1108     /* check coherence of data */
1109     DVDFindSector( p_dvd );
1110
1111     /* update chapter */
1112     while( p_pgc->prg_map.pi_entry_cell[i_chapter-1] - 1 < p_dvd->i_prg_cell )
1113     {
1114         i_chapter++;
1115     }
1116
1117     p_dvd->i_chapter = i_chapter;
1118
1119     /* we have to take care of offset of beginning of title */
1120     i_pos = i_off + p_input->stream.p_selected_area->i_start;
1121
1122     /* with DVD, we have to be on a sector boundary */
1123     i_pos = i_pos & (~0x7ff);
1124
1125     i_pos = lseek( p_dvd->i_fd, i_pos, SEEK_SET );
1126
1127     p_input->stream.p_selected_area->i_tell = i_pos -
1128                                     p_input->stream.p_selected_area->i_start;
1129     p_input->stream.p_selected_area->i_part = p_dvd->i_chapter;
1130
1131     return;
1132 }