stream/stream_dvd.c

   1 /*
   2  * This file is part of MPlayer.
   3  *
   4  * MPlayer is free software; you can redistribute it and/or modify
   5  * it under the terms of the GNU General Public License as published by
   6  * the Free Software Foundation; either version 2 of the License, or
   7  * (at your option) any later version.
   8  *
   9  * MPlayer is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  * GNU General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License along
  15  * with MPlayer; if not, write to the Free Software Foundation, Inc.,
  16  * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  17  */
  18
  19 #include <ctype.h>
  20 #include <stdio.h>
  21 #include <stdlib.h>
  22 #include <string.h>
  23 #include <unistd.h>
  24 #include <string.h>
  25
  26 #include "config.h"
  27 #include "mp_msg.h"
  28
  29 #include <libgen.h>
  30 #include <errno.h>
  31
  32 #define FIRST_AC3_AID 128
  33 #define FIRST_DTS_AID 136
  34 #define FIRST_MPG_AID 0
  35 #define FIRST_PCM_AID 160
  36
  37 #include "stream.h"
  38 #include "m_option.h"
  39 #include "m_struct.h"
  40
  41 #include "stream_dvd.h"
  42 #include "stream_dvd_common.h"
  43 #include "libmpdemux/demuxer.h"
  44
  45 static char* dvd_device_current;
  46 int dvd_angle=1;
  47
  48 #define LIBDVDREAD_VERSION(maj,min,micro)       ((maj)*10000 + (min)*100 + (micro))
  49 /*
  50  * Try to autodetect the libdvd-0.9.0 library
  51  * (0.9.0 removed the <dvdread/dvd_udf.h> header, and moved the two defines
  52  * DVD_VIDEO_LB_LEN and MAX_UDF_FILE_NAME_LEN from it to
  53  * <dvdread/dvd_reader.h>)
  54  */
  55 #ifndef DVDREAD_VERSION
  56 #if defined(DVD_VIDEO_LB_LEN) && defined(MAX_UDF_FILE_NAME_LEN)
  57 #define DVDREAD_VERSION LIBDVDREAD_VERSION(0,9,0)
  58 #else
  59 #define DVDREAD_VERSION LIBDVDREAD_VERSION(0,8,0)
  60 #endif
  61 #endif
  62
  63
  64 static struct stream_priv_s {
  65   int title;
  66   char* device;
  67 } stream_priv_dflts = {
  68   1,
  69   NULL
  70 };
  71
  72 #define ST_OFF(f) M_ST_OFF(struct stream_priv_s,f)
  73 /// URL definition
  74 static const m_option_t stream_opts_fields[] = {
  75   { "hostname", ST_OFF(title),  CONF_TYPE_INT, M_OPT_RANGE, 1, 99, NULL},
  76   { "filename", ST_OFF(device), CONF_TYPE_STRING, 0, 0 ,0, NULL},
  77   { NULL, NULL, 0, 0, 0, 0,  NULL }
  78 };
  79 static const struct m_struct_st stream_opts = {
  80   "dvd",
  81   sizeof(struct stream_priv_s),
  82   &stream_priv_dflts,
  83   stream_opts_fields
  84 };
  85
  86 int dvd_chapter_from_cell(dvd_priv_t* dvd,int title,int cell)
  87 {
  88   pgc_t * cur_pgc;
  89   ptt_info_t* ptt;
  90   int chapter = cell;
  91   int pgc_id,pgn;
  92   if(title < 0 || cell < 0){
  93     return 0;
  94   }
  95   /* for most DVD's chapter == cell */
  96   /* but there are more complecated cases... */
  97   if(chapter >= dvd->vmg_file->tt_srpt->title[title].nr_of_ptts) {
  98     chapter = dvd->vmg_file->tt_srpt->title[title].nr_of_ptts-1;
  99   }
 100   title = dvd->tt_srpt->title[title].vts_ttn-1;
 101   ptt = dvd->vts_file->vts_ptt_srpt->title[title].ptt;
 102   while(chapter >= 0) {
 103     pgc_id = ptt[chapter].pgcn;
 104     pgn = ptt[chapter].pgn;
 105     cur_pgc = dvd->vts_file->vts_pgcit->pgci_srp[pgc_id-1].pgc;
 106     if(cell >= cur_pgc->program_map[pgn-1]-1) {
 107       return chapter;
 108     }
 109     --chapter;
 110   }
 111   /* didn't find a chapter ??? */
 112   return chapter;
 113 }
 114
 115 int dvd_lang_from_aid(stream_t *stream, int id) {
 116   dvd_priv_t *d;
 117   int i;
 118   if (!stream) return 0;
 119   d = stream->priv;
 120   if (!d) return 0;
 121   for(i=0;i<d->nr_of_channels;i++) {
 122     if(d->audio_streams[i].id==id)
 123       return d->audio_streams[i].language;
 124   }
 125   return 0;
 126 }
 127
 128 int dvd_aid_from_lang(stream_t *stream, unsigned char* lang) {
 129   dvd_priv_t *d=stream->priv;
 130   int code,i;
 131   if(lang) {
 132     while(strlen(lang)>=2) {
 133       code=lang[1]|(lang[0]<<8);
 134       for(i=0;i<d->nr_of_channels;i++) {
 135         if(d->audio_streams[i].language==code) {
 136           mp_tmsg(MSGT_OPEN,MSGL_INFO,"Selected DVD audio channel: %d language: %c%c\n",
 137           d->audio_streams[i].id, lang[0],lang[1]);
 138           return d->audio_streams[i].id;
 139         }
 140         //printf("%X != %X  (%c%c)\n",code,d->audio_streams[i].language,lang[0],lang[1]);
 141       }
 142       lang+=2; while (lang[0]==',' || lang[0]==' ') ++lang;
 143     }
 144     mp_tmsg(MSGT_OPEN,MSGL_WARN,"No matching DVD audio language found!\n");
 145   }
 146   return -1;
 147 }
 148
 149 int dvd_number_of_subs(stream_t *stream) {
 150   int i;
 151   int maxid = -1;
 152   dvd_priv_t *d;
 153   if (!stream) return -1;
 154   d = stream->priv;
 155   if (!d) return -1;
 156   for (i = 0; i < d->nr_of_subtitles; i++)
 157     if (d->subtitles[i].id > maxid) maxid = d->subtitles[i].id;
 158   return maxid + 1;
 159 }
 160
 161 int dvd_lang_from_sid(stream_t *stream, int id) {
 162   int i;
 163   dvd_priv_t *d;
 164   if (!stream) return 0;
 165   d = stream->priv;
 166   if (!d) return 0;
 167   for (i = 0; i < d->nr_of_subtitles; i++)
 168     if (d->subtitles[i].id == id && d->subtitles[i].language) return d->subtitles[i].language;
 169   return 0;
 170 }
 171
 172 int dvd_sid_from_lang(stream_t *stream, unsigned char* lang) {
 173   dvd_priv_t *d=stream->priv;
 174   int code,i;
 175   while(lang && strlen(lang)>=2) {
 176     code=lang[1]|(lang[0]<<8);
 177     for(i=0;i<d->nr_of_subtitles;i++) {
 178       if(d->subtitles[i].language==code) {
 179         mp_tmsg(MSGT_OPEN,MSGL_INFO,"Selected DVD subtitle channel: %d language: %c%c\n", i, lang[0],lang[1]);
 180         return d->subtitles[i].id;
 181       }
 182     }
 183     lang+=2;
 184     while (lang[0]==',' || lang[0]==' ') ++lang;
 185   }
 186   mp_tmsg(MSGT_OPEN,MSGL_WARN,"No matching DVD subtitle language found!\n");
 187   return -1;
 188 }
 189
 190 static int dvd_next_cell(dvd_priv_t *d) {
 191   int next_cell=d->cur_cell;
 192
 193   mp_msg(MSGT_DVD,MSGL_DBG2, "dvd_next_cell: next1=0x%X  \n",next_cell);
 194   if( d->cur_pgc->cell_playback[ next_cell ].block_type == BLOCK_TYPE_ANGLE_BLOCK ) {
 195     while(next_cell<d->last_cell) {
 196       if( d->cur_pgc->cell_playback[next_cell].block_mode == BLOCK_MODE_LAST_CELL )
 197         break;
 198       ++next_cell;
 199     }
 200   }
 201   mp_msg(MSGT_DVD,MSGL_DBG2, "dvd_next_cell: next2=0x%X  \n",next_cell);
 202
 203   ++next_cell;
 204   if(next_cell>=d->last_cell)
 205     return -1; // EOF
 206   if(d->cur_pgc->cell_playback[next_cell].block_type == BLOCK_TYPE_ANGLE_BLOCK ) {
 207     next_cell+=dvd_angle;
 208     if(next_cell>=d->last_cell)
 209       return -1; // EOF
 210   }
 211   mp_msg(MSGT_DVD,MSGL_DBG2, "dvd_next_cell: next3=0x%X  \n",next_cell);
 212   return next_cell;
 213 }
 214
 215 static int dvd_read_sector(dvd_priv_t *d, unsigned char *data)
 216 {
 217   int len;
 218
 219   if(d->packs_left==0) {
 220     /**
 221      * If we're not at the end of this cell, we can determine the next
 222      * VOBU to display using the VOBU_SRI information section of the
 223      * DSI.  Using this value correctly follows the current angle,
 224      * avoiding the doubled scenes in The Matrix, and makes our life
 225      * really happy.
 226      *
 227      * Otherwise, we set our next address past the end of this cell to
 228      * force the code above to go to the next cell in the program.
 229      */
 230     if(d->dsi_pack.vobu_sri.next_vobu != SRI_END_OF_CELL) {
 231        d->cur_pack= d->dsi_pack.dsi_gi.nv_pck_lbn + ( d->dsi_pack.vobu_sri.next_vobu & 0x7fffffff );
 232        mp_msg(MSGT_DVD,MSGL_DBG2, "Navi  new pos=0x%X  \n",d->cur_pack);
 233     } else {
 234       // end of cell! find next cell!
 235       mp_msg(MSGT_DVD,MSGL_V, "--- END OF CELL !!! ---\n");
 236       d->cur_pack=d->cell_last_pack+1;
 237     }
 238   }
 239
 240 read_next:
 241   if(d->cur_pack>d->cell_last_pack) {
 242     // end of cell!
 243     int next=dvd_next_cell(d);
 244     if(next>=0) {
 245       d->cur_cell=next;
 246       // if( d->cur_pgc->cell_playback[d->cur_cell].block_type
 247       // == BLOCK_TYPE_ANGLE_BLOCK ) d->cur_cell+=dvd_angle;
 248       d->cur_pack = d->cur_pgc->cell_playback[ d->cur_cell ].first_sector;
 249       d->cell_last_pack=d->cur_pgc->cell_playback[ d->cur_cell ].last_sector;
 250       mp_msg(MSGT_DVD,MSGL_V, "DVD next cell: %d  pack: 0x%X-0x%X  \n",d->cur_cell,d->cur_pack,d->cell_last_pack);
 251     } else
 252         return -1; // EOF
 253   }
 254
 255   len = DVDReadBlocks(d->title, d->cur_pack, 1, data);
 256   // only == 0 should indicate an error, but some dvdread version are buggy when used with dvdcss
 257   if(len <= 0) return -1; //error
 258
 259   if(data[38]==0 && data[39]==0 && data[40]==1 && data[41]==0xBF &&
 260     data[1024]==0 && data[1025]==0 && data[1026]==1 && data[1027]==0xBF) {
 261        // found a Navi packet!!!
 262 #if DVDREAD_VERSION >= LIBDVDREAD_VERSION(0,9,0)
 263     navRead_DSI(&d->dsi_pack, &(data[ DSI_START_BYTE ]));
 264 #else
 265     navRead_DSI(&d->dsi_pack, &(data[ DSI_START_BYTE ]), sizeof(dsi_t));
 266 #endif
 267     if(d->cur_pack != d->dsi_pack.dsi_gi.nv_pck_lbn ) {
 268       mp_msg(MSGT_DVD,MSGL_V, "Invalid NAVI packet! lba=0x%X  navi=0x%X  \n",
 269         d->cur_pack,d->dsi_pack.dsi_gi.nv_pck_lbn);
 270     } else {
 271       // process!
 272       d->packs_left = d->dsi_pack.dsi_gi.vobu_ea;
 273       mp_msg(MSGT_DVD,MSGL_DBG2, "Found NAVI packet! lba=0x%X  len=%d  \n",d->cur_pack,d->packs_left);
 274       //navPrint_DSI(&d->dsi_pack);
 275       mp_msg(MSGT_DVD,MSGL_DBG3,"\r### CELL %d: Navi: %d/%d  IFO: %d/%d   \n",d->cur_cell,
 276         d->dsi_pack.dsi_gi.vobu_c_idn,d->dsi_pack.dsi_gi.vobu_vob_idn,
 277         d->cur_pgc->cell_position[d->cur_cell].cell_nr,
 278         d->cur_pgc->cell_position[d->cur_cell].vob_id_nr);
 279
 280       if(d->angle_seek) {
 281         int i,skip=0;
 282 #if defined(__GNUC__) && ( defined(__sparc__) || defined(hpux) )
 283         // workaround for a bug in the sparc/hpux version of gcc 2.95.X ... 3.2,
 284         // it generates incorrect code for unaligned access to a packed
 285         // structure member, resulting in an mplayer crash with a SIGBUS
 286         // signal.
 287         //
 288         // See also gcc problem report PR c/7847:
 289         // http://gcc.gnu.org/cgi-bin/gnatsweb.pl?database=gcc&cmd=view+audit-trail&pr=7847
 290         for(i=0;i<9;i++) {      // check if all values zero:
 291           __typeof__(d->dsi_pack.sml_agli.data[i].address) tmp_addr;
 292           memcpy(&tmp_addr,&d->dsi_pack.sml_agli.data[i].address,sizeof(tmp_addr));
 293           if((skip=tmp_addr)!=0) break;
 294         }
 295 #else
 296         for(i=0;i<9;i++)        // check if all values zero:
 297           if((skip=d->dsi_pack.sml_agli.data[i].address)!=0) break;
 298 #endif
 299         if(skip && skip!=0x7fffffff) {
 300           // sml_agli table has valid data (at least one non-zero):
 301          d->cur_pack=d->dsi_pack.dsi_gi.nv_pck_lbn+
 302          d->dsi_pack.sml_agli.data[dvd_angle].address;
 303          d->angle_seek=0;
 304          d->cur_pack--;
 305          mp_msg(MSGT_DVD,MSGL_V, "Angle-seek synced using sml_agli map!  new_lba=0x%X  \n",d->cur_pack);
 306         } else {
 307           // check if we're in the right cell, jump otherwise:
 308           if( (d->dsi_pack.dsi_gi.vobu_c_idn==d->cur_pgc->cell_position[d->cur_cell].cell_nr) &&
 309             (d->dsi_pack.dsi_gi.vobu_vob_idn==d->cur_pgc->cell_position[d->cur_cell].vob_id_nr) ){
 310             d->angle_seek=0;
 311             mp_msg(MSGT_DVD,MSGL_V, "Angle-seek synced by cell/vob IDN search!  \n");
 312           } else {
 313             // wrong angle, skip this vobu:
 314             d->cur_pack=d->dsi_pack.dsi_gi.nv_pck_lbn+
 315             d->dsi_pack.dsi_gi.vobu_ea;
 316             d->angle_seek=2; // DEBUG
 317           }
 318         }
 319       }
 320     }
 321     ++d->cur_pack;
 322     goto read_next;
 323   }
 324
 325   ++d->cur_pack;
 326   if(d->packs_left>=0) --d->packs_left;
 327
 328   if(d->angle_seek) {
 329     if(d->angle_seek==2) mp_msg(MSGT_DVD,MSGL_V, "!!! warning! reading packet while angle_seek !!!\n");
 330     goto read_next; // searching for Navi packet
 331   }
 332
 333   return d->cur_pack-1;
 334 }
 335
 336 static void dvd_seek(dvd_priv_t *d, int pos)
 337 {
 338   d->packs_left=-1;
 339   d->cur_pack=pos;
 340
 341   // check if we stay in current cell (speedup things, and avoid angle skip)
 342   if(d->cur_pack>d->cell_last_pack ||
 343      d->cur_pack<d->cur_pgc->cell_playback[ d->cur_cell ].first_sector) {
 344
 345     // ok, cell change, find the right cell!
 346     d->cur_cell=0;
 347     if(d->cur_pgc->cell_playback[d->cur_cell].block_type == BLOCK_TYPE_ANGLE_BLOCK )
 348       d->cur_cell+=dvd_angle;
 349
 350     while(1) {
 351       int next;
 352       d->cell_last_pack=d->cur_pgc->cell_playback[ d->cur_cell ].last_sector;
 353       if(d->cur_pack<d->cur_pgc->cell_playback[ d->cur_cell ].first_sector) {
 354         d->cur_pack=d->cur_pgc->cell_playback[ d->cur_cell ].first_sector;
 355         break;
 356       }
 357       if(d->cur_pack<=d->cell_last_pack) break; // ok, we find it! :)
 358       next=dvd_next_cell(d);
 359       if(next<0) {
 360         //d->cur_pack=d->cell_last_pack+1;
 361         break; // we're after the last cell
 362       }
 363       d->cur_cell=next;
 364     }
 365   }
 366
 367   mp_msg(MSGT_DVD,MSGL_V, "DVD Seek! lba=0x%X  cell=%d  packs: 0x%X-0x%X  \n",
 368     d->cur_pack,d->cur_cell,d->cur_pgc->cell_playback[ d->cur_cell ].first_sector,d->cell_last_pack);
 369
 370   // if we're in interleaved multi-angle cell, find the right angle chain!
 371   // (read Navi block, and use the seamless angle jump table)
 372   d->angle_seek=1;
 373 }
 374
 375 static void dvd_close(dvd_priv_t *d)
 376 {
 377   ifoClose(d->vts_file);
 378   ifoClose(d->vmg_file);
 379   DVDCloseFile(d->title);
 380   DVDClose(d->dvd);
 381   dvd_set_speed(dvd_device_current, -1); /* -1 => restore default */
 382 }
 383
 384 static int fill_buffer(stream_t *s, char *but, int len)
 385 {
 386   if(s->type == STREAMTYPE_DVD) {
 387     off_t pos=dvd_read_sector(s->priv,s->buffer);
 388     if(pos>=0) {
 389       len=2048; // full sector
 390       s->pos=2048*pos-len;
 391     } else len=-1; // error
 392   }
 393   return len;
 394 }
 395
 396 static int seek(stream_t *s, off_t newpos) {
 397   s->pos=newpos; // real seek
 398   dvd_seek(s->priv,s->pos/2048);
 399   return 1;
 400 }
 401
 402 static void stream_dvd_close(stream_t *s) {
 403   dvd_close(s->priv);
 404 }
 405
 406 static int mp_get_titleset_length(ifo_handle_t *vts_file, tt_srpt_t *tt_srpt, int title_no)
 407 {
 408     int vts_ttn;  ///< title number within video title set
 409     int pgc_no;   ///< program chain number
 410     int msec;     ///< time length in milliseconds
 411
 412     msec=0;
 413     if(!vts_file || !tt_srpt)
 414         return 0;
 415
 416     if(vts_file->vtsi_mat && vts_file->vts_pgcit)
 417     {
 418             vts_ttn = tt_srpt->title[title_no].vts_ttn - 1;
 419             pgc_no = vts_file->vts_ptt_srpt->title[vts_ttn].ptt[0].pgcn - 1;
 420             msec = mp_dvdtimetomsec(&vts_file->vts_pgcit->pgci_srp[pgc_no].pgc->playback_time);
 421     }
 422     return msec;
 423 }
 424
 425
 426 static int mp_describe_titleset(dvd_reader_t *dvd, tt_srpt_t *tt_srpt, int vts_no)
 427 {
 428     ifo_handle_t *vts_file;
 429     int title_no, msec=0;
 430
 431     vts_file = ifoOpen(dvd, vts_no);
 432     if(!vts_file)
 433         return 0;
 434
 435     if(!vts_file->vtsi_mat || !vts_file->vts_pgcit)
 436     {
 437         ifoClose(vts_file);
 438         return 0;
 439     }
 440
 441     for(title_no = 0; title_no < tt_srpt->nr_of_srpts; title_no++)
 442     {
 443         if (tt_srpt->title[title_no].title_set_nr != vts_no)
 444             continue;
 445         msec = mp_get_titleset_length(vts_file, tt_srpt, title_no);
 446         mp_msg(MSGT_IDENTIFY, MSGL_V, "ID_DVD_TITLE_%d_LENGTH=%d.%03d\n", title_no + 1, msec / 1000, msec % 1000);
 447     }
 448     ifoClose(vts_file);
 449     return 1;
 450 }
 451
 452 static int seek_to_chapter(stream_t *stream, ifo_handle_t *vts_file, tt_srpt_t *tt_srpt, int title_no, int chapter)
 453 {
 454     int cell;
 455     ptt_info_t ptt;
 456     pgc_t *pgc;
 457     off_t pos;
 458
 459     if(!vts_file || !tt_srpt)
 460        return 0;
 461
 462     if(title_no < 0 || title_no >= tt_srpt->nr_of_srpts)
 463        return 0;
 464
 465     // map global title to vts title
 466     title_no = tt_srpt->title[title_no].vts_ttn - 1;
 467
 468     if(title_no < 0 || title_no >= vts_file->vts_ptt_srpt->nr_of_srpts)
 469        return 0;
 470
 471     if(chapter < 0 || chapter > vts_file->vts_ptt_srpt->title[title_no].nr_of_ptts-1) //no such chapter
 472        return 0;
 473
 474     ptt = vts_file->vts_ptt_srpt->title[title_no].ptt[chapter];
 475     pgc = vts_file->vts_pgcit->pgci_srp[ptt.pgcn-1].pgc;
 476
 477     cell = pgc->program_map[ptt.pgn - 1] - 1;
 478     pos = (off_t) pgc->cell_playback[cell].first_sector * 2048;
 479     mp_msg(MSGT_OPEN,MSGL_V,"\r\nSTREAM_DVD, seeked to chapter: %d, cell: %u, pos: %"PRIu64"\n",
 480         chapter, pgc->cell_playback[cell].first_sector, pos);
 481     stream_seek(stream, pos);
 482
 483     return chapter;
 484 }
 485
 486 static void list_chapters(pgc_t *pgc)
 487 {
 488     unsigned int i, cell;
 489     unsigned int t=0, t2=0;
 490
 491     if(pgc->nr_of_programs < 2)
 492        return;
 493
 494     mp_msg(MSGT_IDENTIFY, MSGL_INFO, "CHAPTERS: ");
 495     for(i=0; i<pgc->nr_of_programs; i++)
 496     {
 497         cell = pgc->program_map[i]; //here the cell is 1-based
 498         t2 = t/1000;
 499         mp_msg(MSGT_IDENTIFY, MSGL_INFO, "%02d:%02d:%02d,", t2/3600, (t2/60)%60, t2%60);
 500         while(i+1<pgc->nr_of_programs && cell < pgc->program_map[i+1]) {
 501             if(!(pgc->cell_playback[cell-1].block_type == BLOCK_TYPE_ANGLE_BLOCK &&
 502                  pgc->cell_playback[cell-1].block_mode != BLOCK_MODE_FIRST_CELL)
 503             )
 504                 t += mp_dvdtimetomsec(&pgc->cell_playback[cell-1].playback_time);
 505             cell++;
 506         }
 507     }
 508     mp_msg(MSGT_IDENTIFY, MSGL_INFO, "\n");
 509 }
 510
 511 static double dvd_get_current_time(stream_t *stream, int cell)
 512 {
 513     int i, tm;
 514     dvd_priv_t *d = stream->priv;
 515
 516     tm=0;
 517     if(!cell) cell=d->cur_cell;
 518     for(i=0; i<d->cur_cell; i++) {
 519         if(d->cur_pgc->cell_playback[i].block_type == BLOCK_TYPE_ANGLE_BLOCK &&
 520            d->cur_pgc->cell_playback[i].block_mode != BLOCK_MODE_FIRST_CELL
 521         )
 522           continue;
 523         tm += d->cell_times_table[i];
 524     }
 525     tm += mp_dvdtimetomsec(&d->dsi_pack.dsi_gi.c_eltm);
 526
 527     return (double)tm/1000.0;
 528 }
 529
 530 static int dvd_seek_to_time(stream_t *stream, ifo_handle_t *vts_file, double sec)
 531 {
 532     unsigned int i, j, k, timeunit, ac_time, tmap_sector=0, cell_sector=0, vobu_sector=0;
 533     int t=0;
 534     double tm, duration;
 535     off_t pos = -1;
 536     dvd_priv_t *d = stream->priv;
 537     vts_tmapt_t *vts_tmapt = vts_file->vts_tmapt;
 538
 539     if(!vts_file->vts_tmapt || sec < 0)
 540         return 0;
 541
 542     duration = (double) mp_get_titleset_length(d->vts_file, d->tt_srpt, d->cur_title-1) / 1000.0f;
 543     if(sec > duration)
 544       return 0;
 545
 546     i=d->cur_pgc_idx;
 547     timeunit = vts_tmapt->tmap[i].tmu;
 548     for(j = 0; j < vts_tmapt->tmap[i].nr_of_entries; j++) {
 549       ac_time = timeunit * (j + 1);
 550       if(ac_time >= sec)
 551         break;
 552       tmap_sector = vts_tmapt->tmap[i].map_ent[j] & 0x7fffffff;
 553     }
 554     //search enclosing cell
 555     for(i=0; i<d->cur_pgc->nr_of_cells; i++) {
 556       if(tmap_sector >= d->cur_pgc->cell_playback[i].first_sector && tmap_sector <= d->cur_pgc->cell_playback[i].last_sector) {
 557         cell_sector = d->cur_pgc->cell_playback[i].first_sector;
 558         break;
 559       }
 560     }
 561
 562     pos = ((off_t)cell_sector)<<11;
 563     stream_seek(stream, pos);
 564     do {
 565       stream_skip(stream, 2048);
 566       t = mp_dvdtimetomsec(&d->dsi_pack.dsi_gi.c_eltm);
 567     } while(!t);
 568     tm = dvd_get_current_time(stream, 0);
 569
 570     pos = ((off_t)tmap_sector)<<11;
 571     stream_seek(stream, pos);
 572     //now get current time in terms of the cell+cell time offset
 573     memset(&d->dsi_pack.dsi_gi.c_eltm, 0, sizeof(dvd_time_t));
 574     while(tm <= sec) {
 575         if(!stream_skip(stream, 2048))
 576           break;
 577         tm = dvd_get_current_time(stream, 0);
 578     };
 579     tmap_sector = stream->pos >> 11;
 580
 581     //search closest VOBU sector
 582     k=(vts_file->vts_vobu_admap->last_byte + 1 - VOBU_ADMAP_SIZE)/4; //entries in the vobu admap
 583     for(i=1; i<k; i++) {
 584       if(vts_file->vts_vobu_admap->vobu_start_sectors[i] > tmap_sector)
 585         break;
 586     }
 587     vobu_sector = vts_file->vts_vobu_admap->vobu_start_sectors[i-1];
 588     pos = ((off_t)vobu_sector) << 11;
 589     stream_seek(stream, pos);
 590
 591     return 1;
 592 }
 593
 594 static int control(stream_t *stream,int cmd,void* arg)
 595 {
 596     dvd_priv_t *d = stream->priv;
 597     switch(cmd)
 598     {
 599         case STREAM_CTRL_GET_TIME_LENGTH:
 600         {
 601             *((double *)arg) = (double) mp_get_titleset_length(d->vts_file, d->tt_srpt, d->cur_title-1)/1000.0;
 602             return 1;
 603         }
 604         case STREAM_CTRL_GET_NUM_CHAPTERS:
 605         {
 606             if(! d->cur_pgc->nr_of_programs) return STREAM_UNSUPPORTED;
 607             *((unsigned int *)arg) = d->cur_pgc->nr_of_programs;
 608             return 1;
 609         }
 610         case STREAM_CTRL_SEEK_TO_CHAPTER:
 611         {
 612             int r;
 613             r = seek_to_chapter(stream, d->vts_file, d->tt_srpt, d->cur_title-1, *((unsigned int *)arg));
 614             if(! r) return STREAM_UNSUPPORTED;
 615
 616             return 1;
 617         }
 618         case STREAM_CTRL_GET_CURRENT_CHAPTER:
 619         {
 620             *((unsigned int *)arg) = dvd_chapter_from_cell(d, d->cur_title-1, d->cur_cell);
 621             return 1;
 622         }
 623         case STREAM_CTRL_GET_CURRENT_TIME:
 624         {
 625             double tm;
 626             tm = dvd_get_current_time(stream, 0);
 627             if(tm != -1) {
 628               *((double *)arg) = tm;
 629               return 1;
 630             }
 631             break;
 632         }
 633         case STREAM_CTRL_SEEK_TO_TIME:
 634         {
 635             if(dvd_seek_to_time(stream, d->vts_file, *((double*)arg)))
 636               return 1;
 637             break;
 638         }
 639         case STREAM_CTRL_GET_ASPECT_RATIO:
 640         {
 641             *((double *)arg) = !d->vts_file->vtsi_mat->vts_video_attr.display_aspect_ratio ? 4.0/3.0 : 16.0/9.0;
 642             return 1;
 643         }
 644         case STREAM_CTRL_GET_NUM_ANGLES:
 645         {
 646             *((int *)arg) = d->vmg_file->tt_srpt->title[dvd_title].nr_of_angles;
 647             return 1;
 648         }
 649         case STREAM_CTRL_GET_ANGLE:
 650         {
 651             *((int *)arg) = dvd_angle+1;
 652             return 1;
 653         }
 654         case STREAM_CTRL_SET_ANGLE:
 655         {
 656             int ang = *((int *)arg);
 657             if(ang>d->vmg_file->tt_srpt->title[dvd_title].nr_of_angles || ang<=0)
 658                 break;
 659             dvd_angle = ang - 1;
 660             d->angle_seek = 1;
 661             return 1;
 662         }
 663     }
 664     return STREAM_UNSUPPORTED;
 665 }
 666
 667
 668 static int open_s(stream_t *stream,int mode, void* opts, int* file_format) {
 669   struct stream_priv_s* p = (struct stream_priv_s*)opts;
 670   int k;
 671
 672   mp_msg(MSGT_OPEN,MSGL_V,"URL: %s\n", stream->url);
 673   dvd_title = p->title;
 674   if(1){
 675     //int ret,ret2;
 676     dvd_priv_t *d;
 677     int ttn,pgc_id,pgn;
 678     dvd_reader_t *dvd;
 679     dvd_file_t *title;
 680     ifo_handle_t *vmg_file;
 681     tt_srpt_t *tt_srpt;
 682     ifo_handle_t *vts_file;
 683     pgc_t *pgc;
 684     /**
 685      * Open the disc.
 686      */
 687     if(p->device)
 688       dvd_device_current = p->device;
 689     else if(dvd_device)
 690       dvd_device_current = dvd_device;
 691     else
 692       dvd_device_current = DEFAULT_DVD_DEVICE;
 693     dvd_set_speed(dvd_device_current, dvd_speed);
 694 #if defined(__APPLE__) || defined(__DARWIN__)
 695     /* Dynamic DVD drive selection on Darwin */
 696     if(!strcmp(dvd_device_current, "/dev/rdiskN")) {
 697       int i;
 698       size_t len = strlen(dvd_device_current)+1;
 699       char *temp_device = malloc(len);
 700
 701       for (i = 1; i < 10; i++) {
 702         snprintf(temp_device, len, "/dev/rdisk%d", i);
 703         dvd = DVDOpen(temp_device);
 704         if(!dvd) {
 705           mp_tmsg(MSGT_OPEN,MSGL_ERR,"Couldn't open DVD device: %s (%s)\n",temp_device, strerror(errno));
 706         } else {
 707 #if DVDREAD_VERSION <= LIBDVDREAD_VERSION(0,9,4)
 708           dvd_file_t *dvdfile = DVDOpenFile(dvd,dvd_title,DVD_READ_INFO_FILE);
 709           if(!dvdfile) {
 710             mp_tmsg(MSGT_OPEN,MSGL_ERR,"Couldn't open DVD device: %s (%s)\n",temp_device, strerror(errno));
 711             DVDClose(dvd);
 712             continue;
 713           }
 714           DVDCloseFile(dvdfile);
 715 #endif
 716           break;
 717         }
 718       }
 719       free(temp_device);
 720
 721       if(!dvd) {
 722         m_struct_free(&stream_opts,opts);
 723         return STREAM_UNSUPPORTED;
 724       }
 725     } else
 726 #endif /* defined(__APPLE__) || defined(__DARWIN__) */
 727     {
 728         dvd = DVDOpen(dvd_device_current);
 729         if(!dvd) {
 730           mp_tmsg(MSGT_OPEN,MSGL_ERR,"Couldn't open DVD device: %s (%s)\n",dvd_device_current, strerror(errno));
 731           m_struct_free(&stream_opts,opts);
 732           return STREAM_UNSUPPORTED;
 733         }
 734     }
 735
 736     mp_msg(MSGT_OPEN,MSGL_V,"Reading disc structure, please wait...\n");
 737
 738     /**
 739      * Load the video manager to find out the information about the titles on
 740      * this disc.
 741      */
 742     vmg_file = ifoOpen(dvd, 0);
 743     if(!vmg_file) {
 744       mp_tmsg(MSGT_OPEN,MSGL_ERR, "Can't open VMG info!\n");
 745       DVDClose( dvd );
 746       m_struct_free(&stream_opts,opts);
 747       return STREAM_UNSUPPORTED;
 748     }
 749     tt_srpt = vmg_file->tt_srpt;
 750     if (mp_msg_test(MSGT_IDENTIFY, MSGL_INFO))
 751     {
 752       int title_no; ///< title number
 753       mp_msg(MSGT_IDENTIFY, MSGL_INFO, "ID_DVD_TITLES=%d\n", tt_srpt->nr_of_srpts);
 754       for (title_no = 0; title_no < tt_srpt->nr_of_srpts; title_no++)
 755       {
 756         mp_msg(MSGT_IDENTIFY, MSGL_INFO, "ID_DVD_TITLE_%d_CHAPTERS=%d\n", title_no + 1, tt_srpt->title[title_no].nr_of_ptts);
 757         mp_msg(MSGT_IDENTIFY, MSGL_INFO, "ID_DVD_TITLE_%d_ANGLES=%d\n", title_no + 1, tt_srpt->title[title_no].nr_of_angles);
 758       }
 759     }
 760     if (mp_msg_test(MSGT_IDENTIFY, MSGL_V))
 761     {
 762       char volid[32];
 763       unsigned char discid [16]; ///< disk ID, a 128 bit MD5 sum
 764       int vts_no;   ///< video title set number
 765       for (vts_no = 1; vts_no <= vmg_file->vts_atrt->nr_of_vtss; vts_no++)
 766         mp_describe_titleset(dvd, tt_srpt, vts_no);
 767       if (DVDDiscID(dvd, discid) >= 0)
 768       {
 769         int i;
 770         mp_msg(MSGT_IDENTIFY, MSGL_V, "ID_DVD_DISC_ID=");
 771         for (i = 0; i < 16; i ++)
 772           mp_msg(MSGT_IDENTIFY, MSGL_V, "%02X", discid[i]);
 773         mp_msg(MSGT_IDENTIFY, MSGL_V, "\n");
 774       }
 775       if (DVDUDFVolumeInfo(dvd, volid, sizeof(volid), NULL, 0) >= 0 || DVDISOVolumeInfo(dvd, volid, sizeof(volid), NULL, 0) >= 0)
 776         mp_msg(MSGT_IDENTIFY, MSGL_V, "ID_DVD_VOLUME_ID=%s\n", volid);
 777     }
 778     /**
 779      * Make sure our title number is valid.
 780      */
 781     mp_tmsg(MSGT_OPEN,MSGL_STATUS, "There are %d titles on this DVD.\n", tt_srpt->nr_of_srpts );
 782     if(dvd_title < 1 || dvd_title > tt_srpt->nr_of_srpts) {
 783       mp_tmsg(MSGT_OPEN,MSGL_ERR, "Invalid DVD title number: %d\n", dvd_title);
 784       ifoClose( vmg_file );
 785       DVDClose( dvd );
 786       m_struct_free(&stream_opts,opts);
 787       return STREAM_UNSUPPORTED;
 788     }
 789     mp_msg(MSGT_IDENTIFY, MSGL_INFO, "ID_DVD_CURRENT_TITLE=%d\n", dvd_title);
 790     --dvd_title; // remap 1.. -> 0..
 791     /**
 792      * Make sure the angle number is valid for this title.
 793      */
 794     mp_tmsg(MSGT_OPEN,MSGL_STATUS, "There are %d angles in this DVD title.\n", tt_srpt->title[dvd_title].nr_of_angles);
 795     if(dvd_angle<1 || dvd_angle>tt_srpt->title[dvd_title].nr_of_angles) {
 796       mp_tmsg(MSGT_OPEN,MSGL_ERR, "Invalid DVD angle number: %d\n", dvd_angle);
 797       goto fail;
 798     }
 799     --dvd_angle; // remap 1.. -> 0..
 800
 801     ttn = tt_srpt->title[dvd_title].vts_ttn - 1;
 802     /**
 803      * Load the VTS information for the title set our title is in.
 804      */
 805     vts_file = ifoOpen( dvd, tt_srpt->title[dvd_title].title_set_nr );
 806     if(!vts_file) {
 807       mp_tmsg(MSGT_OPEN,MSGL_ERR, "Cannot open the IFO file for DVD title %d.\n", tt_srpt->title[dvd_title].title_set_nr );
 808       goto fail;
 809     }
 810     /**
 811      * We've got enough info, time to open the title set data.
 812      */
 813     title = DVDOpenFile(dvd, tt_srpt->title[dvd_title].title_set_nr, DVD_READ_TITLE_VOBS);
 814     if(!title) {
 815       mp_tmsg(MSGT_OPEN,MSGL_ERR, "Cannot open title VOBS (VTS_%02d_1.VOB).\n", tt_srpt->title[dvd_title].title_set_nr);
 816       ifoClose( vts_file );
 817       goto fail;
 818     }
 819
 820     mp_msg(MSGT_OPEN,MSGL_V, "DVD successfully opened.\n");
 821     // store data
 822     d=malloc(sizeof(dvd_priv_t)); memset(d,0,sizeof(dvd_priv_t));
 823     d->dvd=dvd;
 824     d->title=title;
 825     d->vmg_file=vmg_file;
 826     d->tt_srpt=tt_srpt;
 827     d->vts_file=vts_file;
 828     d->cur_title = dvd_title+1;
 829
 830     pgc = vts_file->vts_pgcit ? vts_file->vts_pgcit->pgci_srp[ttn].pgc : NULL;
 831     /**
 832      * Check number of audio channels and types
 833      */
 834     {
 835       d->nr_of_channels=0;
 836       if(vts_file->vts_pgcit) {
 837         int i;
 838         for(i=0;i<8;i++)
 839           if(pgc->audio_control[i] & 0x8000) {
 840             audio_attr_t * audio = &vts_file->vtsi_mat->vts_audio_attr[i];
 841             int language = 0;
 842             char tmp[] = "unknown";
 843             stream_language_t *audio_stream = &d->audio_streams[d->nr_of_channels];
 844
 845             if(audio->lang_type == 1) {
 846               language=audio->lang_code;
 847               tmp[0]=language>>8;
 848               tmp[1]=language&0xff;
 849               tmp[2]=0;
 850             }
 851
 852             audio_stream->language=language;
 853             audio_stream->id=pgc->audio_control[i] >> 8 & 7;
 854             switch(audio->audio_format) {
 855               case 0: // ac3
 856                 audio_stream->id+=FIRST_AC3_AID;
 857                 break;
 858               case 6: // dts
 859                 audio_stream->id+=FIRST_DTS_AID;
 860                 break;
 861               case 2: // mpeg layer 1/2/3
 862               case 3: // mpeg2 ext
 863                 audio_stream->id+=FIRST_MPG_AID;
 864                 break;
 865               case 4: // lpcm
 866                 audio_stream->id+=FIRST_PCM_AID;
 867                 break;
 868            }
 869
 870            audio_stream->type=audio->audio_format;
 871            // Pontscho: to my mind, tha channels:
 872            //  1 - stereo
 873            //  5 - 5.1
 874            audio_stream->channels=audio->channels;
 875            mp_tmsg(MSGT_OPEN,MSGL_STATUS,"audio stream: %d format: %s (%s) language: %s aid: %d.\n",
 876              d->nr_of_channels,
 877              dvd_audio_stream_types[ audio->audio_format ],
 878              dvd_audio_stream_channels[ audio->channels ],
 879              tmp,
 880              audio_stream->id
 881            );
 882            mp_msg(MSGT_IDENTIFY, MSGL_INFO, "ID_AUDIO_ID=%d\n", audio_stream->id);
 883            if(language && tmp[0])
 884              mp_msg(MSGT_IDENTIFY, MSGL_INFO, "ID_AID_%d_LANG=%s\n", audio_stream->id, tmp);
 885
 886            d->nr_of_channels++;
 887          }
 888       }
 889       mp_tmsg(MSGT_OPEN,MSGL_STATUS,"number of audio channels on disk: %d.\n",d->nr_of_channels );
 890     }
 891
 892     /**
 893      * Check number of subtitles and language
 894      */
 895     {
 896       int i;
 897
 898       d->nr_of_subtitles=0;
 899       for(i=0;i<32;i++)
 900       if(pgc->subp_control[i] & 0x80000000) {
 901         subp_attr_t * subtitle = &vts_file->vtsi_mat->vts_subp_attr[i];
 902         video_attr_t *video = &vts_file->vtsi_mat->vts_video_attr;
 903         int language = 0;
 904         char tmp[] = "unknown";
 905         stream_language_t *sub_stream = &d->subtitles[d->nr_of_subtitles];
 906
 907         if(subtitle->type == 1) {
 908           language=subtitle->lang_code;
 909           tmp[0]=language>>8;
 910           tmp[1]=language&0xff;
 911           tmp[2]=0;
 912         }
 913
 914         sub_stream->language=language;
 915         sub_stream->id=d->nr_of_subtitles;
 916         if(video->display_aspect_ratio == 0) /* 4:3 */
 917           sub_stream->id = pgc->subp_control[i] >> 24 & 31;
 918         else if(video->display_aspect_ratio == 3) /* 16:9 */
 919           sub_stream->id = pgc->subp_control[i] >> 8 & 31;
 920
 921         mp_tmsg(MSGT_OPEN,MSGL_STATUS,"subtitle ( sid ): %d language: %s\n", sub_stream->id, tmp);
 922         mp_msg(MSGT_IDENTIFY, MSGL_INFO, "ID_SUBTITLE_ID=%d\n", sub_stream->id);
 923         if(language && tmp[0])
 924           mp_msg(MSGT_IDENTIFY, MSGL_INFO, "ID_SID_%d_LANG=%s\n", sub_stream->id, tmp);
 925         d->nr_of_subtitles++;
 926       }
 927       mp_tmsg(MSGT_OPEN,MSGL_STATUS,"number of subtitles on disk: %d\n",d->nr_of_subtitles);
 928     }
 929
 930     /**
 931      * Determine which program chain we want to watch.  This is based on the
 932      * chapter number.
 933      */
 934     pgc_id = vts_file->vts_ptt_srpt->title[ttn].ptt[0].pgcn; // local
 935     pgn  = vts_file->vts_ptt_srpt->title[ttn].ptt[0].pgn;  // local
 936     d->cur_pgc_idx = pgc_id-1;
 937     d->cur_pgc = vts_file->vts_pgcit->pgci_srp[pgc_id-1].pgc;
 938     d->cur_cell = d->cur_pgc->program_map[pgn-1] - 1; // start playback here
 939     d->packs_left=-1;      // for Navi stuff
 940     d->angle_seek=0;
 941       d->last_cell=d->cur_pgc->nr_of_cells;
 942
 943     if(d->cur_pgc->cell_playback[d->cur_cell].block_type == BLOCK_TYPE_ANGLE_BLOCK )
 944       d->cur_cell+=dvd_angle;
 945     d->cur_pack = d->cur_pgc->cell_playback[ d->cur_cell ].first_sector;
 946     d->cell_last_pack=d->cur_pgc->cell_playback[ d->cur_cell ].last_sector;
 947     mp_msg(MSGT_DVD,MSGL_V, "DVD start cell: %d  pack: 0x%X-0x%X  \n",d->cur_cell,d->cur_pack,d->cell_last_pack);
 948
 949     //assign cell_times_table
 950     d->cell_times_table = malloc(sizeof(unsigned int) * d->cur_pgc->nr_of_cells);
 951     if(d->cell_times_table == NULL)
 952       return STREAM_UNSUPPORTED;
 953     for(k=0; k<d->cur_pgc->nr_of_cells; k++)
 954       d->cell_times_table[k] = mp_dvdtimetomsec(&d->cur_pgc->cell_playback[k].playback_time);
 955     list_chapters(d->cur_pgc);
 956
 957     // ... (unimplemented)
 958     //    return NULL;
 959     stream->type = STREAMTYPE_DVD;
 960     stream->sector_size = 2048;
 961     stream->flags = STREAM_READ | MP_STREAM_SEEK;
 962     stream->fill_buffer = fill_buffer;
 963     stream->seek = seek;
 964     stream->control = control;
 965     stream->close = stream_dvd_close;
 966     stream->start_pos = (off_t)d->cur_pack*2048;
 967     stream->end_pos = (off_t)(d->cur_pgc->cell_playback[d->last_cell-1].last_sector)*2048;
 968     *file_format = DEMUXER_TYPE_MPEG_PS;
 969     mp_msg(MSGT_DVD,MSGL_V,"DVD start=%d end=%d  \n",d->cur_pack,d->cur_pgc->cell_playback[d->last_cell-1].last_sector);
 970     stream->priv = (void*)d;
 971     return STREAM_OK;
 972
 973 fail:
 974       ifoClose(vmg_file);
 975       DVDClose(dvd);
 976       m_struct_free(&stream_opts, opts);
 977       return STREAM_UNSUPPORTED;
 978   }
 979   mp_tmsg(MSGT_DVD,MSGL_ERR,"MPlayer was compiled without DVD support, exiting.\n");
 980   m_struct_free(&stream_opts,opts);
 981   return STREAM_UNSUPPORTED;
 982 }
 983
 984 static int ifo_stream_open (stream_t *stream, int mode, void *opts, int *file_format)
 985 {
 986     char* filename;
 987     struct stream_priv_s *spriv;
 988     int len = strlen(stream->url);
 989
 990     if (len < 4 || strcasecmp (stream->url + len - 4, ".ifo"))
 991         return STREAM_UNSUPPORTED;
 992
 993     mp_msg(MSGT_DVD, MSGL_INFO, ".IFO detected. Redirecting to dvd://\n");
 994
 995     filename = strdup(basename(stream->url));
 996
 997     spriv=calloc(1, sizeof(struct stream_priv_s));
 998     spriv->device = strdup(dirname(stream->url));
 999     if(!strncasecmp(filename,"vts_",4))
1000     {
1001         if(sscanf(filename+3, "_%02d_", &spriv->title)!=1)
1002             spriv->title=1;
1003     }else
1004         spriv->title=1;
1005
1006     free(filename);
1007     free(stream->url);
1008     stream->url=strdup("dvd://");
1009
1010     return open_s(stream, mode, spriv, file_format);
1011 }
1012
1013 const stream_info_t stream_info_dvd = {
1014   "DVD stream",
1015   "null",
1016   "",
1017   "",
1018   open_s,
1019   { "dvd", NULL },
1020   &stream_opts,
1021   1 // Urls are an option string
1022 };
1023
1024 const stream_info_t stream_info_ifo = {
1025   "DVD IFO input",
1026   "ifo",
1027   "Benjamin Zores",
1028   "Mostly used to play DVDs on disk through OSD Menu",
1029   ifo_stream_open,
1030   { "file", "", NULL },
1031   NULL,
1032   0
1033 };