git.sesse.net Git - vlc/blob - modules/access/cdda/access.c

   1 /*****************************************************************************
   2  * access.c : CD digital audio input module for vlc using libcdio
   3  *****************************************************************************
   4  * Copyright (C) 2000, 2003, 2004, 2005 the VideoLAN team
   5  * $Id$
   6  *
   7  * Authors: Rocky Bernstein <rocky@panix.com>
   8  *          Laurent Aimar <fenrir@via.ecp.fr>
   9  *          Gildas Bazin <gbazin@netcourrier.com>
  10  *
  11  * This program is free software; you can redistribute it and/or modify
  12  * it under the terms of the GNU General Public License as published by
  13  * the Free Software Foundation; either version 2 of the License, or
  14  * (at your option) any later version.
  15  *
  16  * This program is distributed in the hope that it will be useful,
  17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  19  * GNU General Public License for more details.
  20  *
  21  * You should have received a copy of the GNU General Public License
  22  * along with this program; if not, write to the Free Software
  23  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
  24  *****************************************************************************/
  25
  26 /*****************************************************************************
  27  * Preamble
  28  *****************************************************************************/
  29 #include "callback.h"      /* FIXME - reorganize callback.h, cdda.h better */
  30 #include "cdda.h"          /* private structures. Also #includes vlc things */
  31 #include "info.h"          /* headers for meta info retrieval */
  32 #include "access.h"
  33 #include "vlc_keys.h"
  34 #include <vlc_interface.h>
  35
  36 #include <cdio/cdio.h>
  37 #include <cdio/logging.h>
  38 #include <cdio/cd_types.h>
  39
  40
  41 /* #ifdef variables below are defined via config.h via #include vlc above. */
  42
  43 #ifdef HAVE_SYS_TYPES_H
  44 #include <sys/types.h>
  45 #endif
  46
  47 #ifdef HAVE_UNISTD_H
  48 #   include <unistd.h>
  49 #endif
  50
  51 /* FIXME: This variable is a hack. Would be nice to eliminate. */
  52 access_t *p_cdda_input = NULL;
  53
  54 /*****************************************************************************
  55  * Local prototypes
  56  *****************************************************************************/
  57 static ssize_t  CDDARead( access_t *, uint8_t *, size_t );
  58 static block_t *CDDAReadBlocks( access_t * p_access );
  59 static int      CDDASeek( access_t * p_access, int64_t i_pos );
  60 static int      CDDAControl( access_t *p_access, int i_query,
  61                              va_list args );
  62
  63 static int      CDDAInit( access_t *p_access, cdda_data_t *p_cdda ) ;
  64
  65
  66 /****************************************************************************
  67  * Private functions
  68  ****************************************************************************/
  69
  70 /* process messages that originate from libcdio.
  71    called by CDDAOpen
  72 */
  73 static void
  74 cdio_log_handler( cdio_log_level_t level, const char message[] )
  75 {
  76     cdda_data_t *p_cdda = (cdda_data_t *)p_cdda_input->p_sys;
  77
  78     if( p_cdda == NULL )
  79         return;
  80
  81     switch( level )
  82     {
  83         case CDIO_LOG_DEBUG:
  84         case CDIO_LOG_INFO:
  85             if (p_cdda->i_debug & INPUT_DBG_CDIO)
  86             msg_Dbg( p_cdda_input, "%s", message);
  87             break;
  88         case CDIO_LOG_WARN:
  89             msg_Warn( p_cdda_input, "%s", message);
  90             break;
  91         case CDIO_LOG_ERROR:
  92         case CDIO_LOG_ASSERT:
  93             msg_Err( p_cdda_input, "%s", message);
  94             break;
  95         default:
  96             msg_Warn( p_cdda_input, "%s\n%s %d", message,
  97                     "the above message had unknown cdio log level",
  98                     level);
  99             break;
 100     }
 101 }
 102
 103 #ifdef HAVE_LIBCDDB
 104 /*! This routine is called by libcddb routines on error.
 105    called by CDDAOpen
 106 */
 107 static void
 108 cddb_log_handler( cddb_log_level_t level, const char message[] )
 109 {
 110     cdda_data_t *p_cdda = (cdda_data_t *)p_cdda_input->p_sys;
 111     switch( level )
 112     {
 113         case CDDB_LOG_DEBUG:
 114         case CDDB_LOG_INFO:
 115             if( !(p_cdda->i_debug & INPUT_DBG_CDDB) )
 116                 return;
 117         /* Fall through if to warn case */
 118         default:
 119             cdio_log_handler( level, message );
 120             break;
 121     }
 122 }
 123 #endif /*HAVE_LIBCDDB*/
 124
 125
 126 /*! This routine is when vlc is not fully set up (before full initialization)
 127   or is not around (before finalization).
 128 */
 129 static void
 130 uninit_log_handler( cdio_log_level_t level, const char message[] )
 131 {
 132     cdda_data_t *p_cdda = NULL;
 133
 134     if( p_cdda_input )
 135         p_cdda = (cdda_data_t *)p_cdda_input->p_sys;
 136
 137      switch( level )
 138      {
 139         case CDIO_LOG_DEBUG:
 140         case CDIO_LOG_INFO:
 141             if( !p_cdda || !(p_cdda->i_debug & (INPUT_DBG_CDIO|INPUT_DBG_CDDB)) )
 142                 return;
 143         /* Fall through if to warn case */
 144         case CDIO_LOG_WARN:
 145             fprintf( stderr, "WARN: %s\n", message );
 146             break;
 147         case CDIO_LOG_ERROR:
 148             fprintf( stderr, "ERROR: %s\n", message );
 149             break;
 150         case CDIO_LOG_ASSERT:
 151             fprintf( stderr, "ASSERT ERROR: %s\n", message );
 152             break;
 153         default:
 154             fprintf( stderr, "UNKNOWN ERROR: %s\n%s %d\n", message,
 155                             "The above message had unknown cdio log level",
 156                             level );
 157         break;
 158     }
 159     /* gl_default_cdio_log_handler (level, message); */
 160 }
 161
 162 /* Only used in audio control mode. Gets the current LSN from the
 163    CD-ROM drive. */
 164 static int64_t get_audio_position ( access_t *p_access )
 165 {
 166     cdda_data_t *p_cdda   = (cdda_data_t *) p_access->p_sys;
 167     lsn_t i_offset;
 168
 169 #if LIBCDIO_VERSION_NUM >= 73
 170     if( p_cdda->b_audio_ctl )
 171     {
 172         cdio_subchannel_t sub;
 173         CdIo_t *p_cdio = p_cdda->p_cdio;
 174
 175         if( DRIVER_OP_SUCCESS == cdio_audio_read_subchannel(p_cdio, &sub) )
 176         {
 177             if( (sub.audio_status != CDIO_MMC_READ_SUB_ST_PAUSED) &&
 178                 (sub.audio_status != CDIO_MMC_READ_SUB_ST_PLAY) )
 179                 return CDIO_INVALID_LSN;
 180
 181             if( ! p_cdda->b_nav_mode )
 182             {
 183                 i_offset = cdio_msf_to_lba( (&sub.abs_addr) );
 184             }
 185             else
 186             {
 187                 i_offset = cdio_msf_to_lba( (&sub.rel_addr) );
 188             }
 189         }
 190         else
 191         {
 192             i_offset = p_cdda->i_lsn;
 193         }
 194     }
 195     else
 196     {
 197         i_offset = p_cdda->i_lsn;
 198     }
 199 #else
 200         i_offset = p_cdda->i_lsn;
 201 #endif
 202     return i_offset;
 203 }
 204
 205 /*****************************************************************************
 206  * CDDAReadBlocks: reads a group of blocks from the CD-DA and returns
 207  * an allocated pointer to the data. NULL is returned if no data
 208  * read. It is also possible if we haven't read a RIFF header in which
 209  * case one that we creaded during Open/Initialization is returned.
 210  *****************************************************************************/
 211 static block_t * CDDAReadBlocks( access_t * p_access )
 212 {
 213     block_t     *p_block;
 214     cdda_data_t *p_cdda   = (cdda_data_t *) p_access->p_sys;
 215     int          i_blocks = p_cdda->i_blocks_per_read;
 216
 217     dbg_print( (INPUT_DBG_CALL|INPUT_DBG_EXT|INPUT_DBG_LSN),
 218                 "called i_lsn: %d i_pos: %lld, size: %lld",
 219                 p_cdda->i_lsn, p_access->info.i_pos, p_access->info.i_size );
 220
 221     /* Check end of file */
 222     if( p_access->info.b_eof )
 223         return NULL;
 224
 225     if( !p_cdda->b_header )
 226       {
 227         /* Return only the dummy RIFF header we created in Open/Init */
 228         p_block = block_New( p_access, sizeof( WAVEHEADER ) );
 229         memcpy( p_block->p_buffer, &p_cdda->waveheader, sizeof(WAVEHEADER) );
 230         p_cdda->b_header = true;
 231         return p_block;
 232     }
 233
 234     /* Check end of track */
 235     while( p_cdda->i_lsn > cdio_get_track_last_lsn(p_cdda->p_cdio,
 236            p_cdda->i_track) )
 237     {
 238         bool go_on;
 239
 240         if( p_cdda->b_nav_mode )
 241             go_on = p_cdda->i_lsn > p_cdda->last_disc_frame;
 242         else
 243             go_on = p_cdda->i_track >= p_cdda->i_first_track+p_cdda->i_titles-1 ;
 244
 245         if( go_on )
 246         {
 247             dbg_print( (INPUT_DBG_LSN), "EOF");
 248                         p_access->info.b_eof = true;
 249             return NULL;
 250         }
 251
 252         p_access->info.i_update |= INPUT_UPDATE_TITLE | INPUT_UPDATE_META;
 253         p_access->info.i_title++;
 254         p_cdda->i_track++;
 255
 256         if( p_cdda-> b_nav_mode )
 257         {
 258             char *psz_title = CDDAFormatTitle( p_access, p_cdda->i_track );
 259             input_Control( p_cdda->p_input, INPUT_SET_NAME, psz_title );
 260             free(psz_title);
 261         }
 262         else
 263         {
 264             p_access->info.i_size =
 265                     p_cdda->p_title[p_access->info.i_title]->i_size;
 266             p_access->info.i_pos = 0;
 267             p_access->info.i_update |= INPUT_UPDATE_SIZE;
 268         }
 269     }
 270
 271     /* Possibly adjust i_blocks so we don't read past the end of a track. */
 272     if( p_cdda->i_lsn + i_blocks >=
 273         cdio_get_track_lsn(p_cdda->p_cdio, p_cdda->i_track+1) )
 274     {
 275         i_blocks = cdio_get_track_lsn( p_cdda->p_cdio, p_cdda->i_track+1 )
 276                     - p_cdda->i_lsn;
 277     }
 278
 279     /* Do the actual reading */
 280     p_block = block_New( p_access, i_blocks * CDIO_CD_FRAMESIZE_RAW );
 281     if( !p_block)
 282     {
 283         msg_Err( p_access, "cannot get a new block of size: %i",
 284                 i_blocks * CDIO_CD_FRAMESIZE_RAW );
 285         intf_UserFatal( p_access, false, _("CD reading failed"),
 286                         _("VLC could not get a new block of size: %i."),
 287                         i_blocks * CDIO_CD_FRAMESIZE_RAW );
 288         return NULL;
 289     }
 290
 291     {
 292 #if LIBCDIO_VERSION_NUM >= 72
 293         driver_return_code_t rc = DRIVER_OP_SUCCESS;
 294
 295         if( p_cdda->e_paranoia && p_cdda->paranoia )
 296         {
 297             int i;
 298             for( i = 0; i < i_blocks; i++ )
 299             {
 300                 int16_t *p_readbuf = cdio_paranoia_read( p_cdda->paranoia, NULL );
 301                 char *psz_err = cdio_cddap_errors( p_cdda->paranoia_cd );
 302                 char *psz_mes = cdio_cddap_messages( p_cdda->paranoia_cd );
 303
 304                 if( psz_mes || psz_err )
 305                     msg_Err( p_access, "%s%s\n", psz_mes ? psz_mes: "",
 306                              psz_err ? psz_err: "" );
 307
 308                 free( psz_err );
 309                 free( psz_mes );
 310                 if( !p_readbuf )
 311                 {
 312                     msg_Err( p_access, "paranoia read error on frame %i\n",
 313                     p_cdda->i_lsn+i );
 314                 }
 315                 else
 316                     memcpy( p_block->p_buffer + i * CDIO_CD_FRAMESIZE_RAW,
 317                             p_readbuf, CDIO_CD_FRAMESIZE_RAW );
 318             }
 319         }
 320         else
 321         {
 322             rc = cdio_read_audio_sectors( p_cdda->p_cdio, p_block->p_buffer,
 323                                           p_cdda->i_lsn, i_blocks );
 324 #else
 325 #define DRIVER_OP_SUCCESS 0
 326             int rc;
 327             rc = cdio_read_audio_sectors( p_cdda->p_cdio, p_block->p_buffer,
 328                                           p_cdda->i_lsn, i_blocks);
 329 #endif
 330         }
 331         if( rc != DRIVER_OP_SUCCESS )
 332         {
 333             msg_Err( p_access, "could not read %d sectors starting from %lu",
 334                      i_blocks, (long unsigned int) p_cdda->i_lsn );
 335             block_Release( p_block );
 336
 337             /* If we had problems above, assume the problem is with
 338                 the first sector of the read and set to skip it.  In
 339                 the future libcdio may have cdparanoia support.
 340             */
 341             p_cdda->i_lsn++;
 342             p_access->info.i_pos += CDIO_CD_FRAMESIZE_RAW;
 343             return NULL;
 344         }
 345     }
 346
 347     p_cdda->i_lsn        += i_blocks;
 348     p_access->info.i_pos += i_blocks * CDIO_CD_FRAMESIZE_RAW;
 349
 350     return p_block;
 351 }
 352
 353 /*****************************************************************************
 354  * CDDARead: Handler for audio control reads the CD-DA.
 355  *****************************************************************************/
 356 static ssize_t
 357 CDDARead( access_t * p_access, uint8_t *p_buffer, size_t i_len )
 358 {
 359     cdda_data_t *p_cdda   = (cdda_data_t *) p_access->p_sys;
 360
 361     dbg_print( (INPUT_DBG_CALL|INPUT_DBG_EXT|INPUT_DBG_LSN),
 362                "called lsn: %d pos: %lld, size: %lld",
 363                 p_cdda->i_lsn, p_access->info.i_pos, p_access->info.i_size);
 364
 365     /* Check end of file */
 366     if( p_access->info.b_eof )
 367         return 0;
 368
 369     {
 370         lsn_t i_lsn = get_audio_position(p_access);
 371         if( CDIO_INVALID_LSN == i_lsn )
 372         {
 373             dbg_print( (INPUT_DBG_LSN), "invalid lsn" );
 374             memset( p_buffer, 0, i_len );
 375             return i_len;
 376         }
 377
 378         p_cdda->i_lsn = i_lsn;
 379         p_access->info.i_pos = p_cdda->i_lsn * CDIO_CD_FRAMESIZE_RAW;
 380     }
 381
 382     dbg_print( (INPUT_DBG_LSN), "updated lsn: %d", p_cdda->i_lsn );
 383
 384     /* Check end of track */
 385     while( p_cdda->i_lsn > cdio_get_track_last_lsn( p_cdda->p_cdio,
 386                                                     p_cdda->i_track) )
 387     {
 388         if( p_cdda->i_track >= p_cdda->i_first_track + p_cdda->i_titles - 1 )
 389         {
 390             dbg_print( (INPUT_DBG_LSN), "EOF");
 391             p_access->info.b_eof = true;
 392             return 0;
 393         }
 394         p_access->info.i_update |= INPUT_UPDATE_TITLE;
 395         p_access->info.i_title++;
 396         p_cdda->i_track++;
 397
 398         if( p_cdda-> b_nav_mode )
 399         {
 400             char *psz_title = CDDAFormatTitle( p_access, p_cdda->i_track );
 401             input_Control( p_cdda->p_input, INPUT_SET_NAME, psz_title );
 402             free( psz_title );
 403         }
 404         else
 405         {
 406             p_access->info.i_size =
 407                 p_cdda->p_title[p_access->info.i_title]->i_size;
 408             p_access->info.i_pos = 0;
 409             p_access->info.i_update |= INPUT_UPDATE_SIZE;
 410         }
 411     }
 412     memset( p_buffer, 0, i_len );
 413     return i_len;
 414 }
 415
 416 /*! Pause CD playing via audio control */
 417 static bool cdda_audio_pause( CdIo_t *p_cdio )
 418 {
 419     bool b_ok = true;
 420 #if LIBCDIO_VERSION_NUM >= 73
 421     cdio_subchannel_t sub;
 422
 423     if( DRIVER_OP_SUCCESS == cdio_audio_read_subchannel( p_cdio, &sub ) )
 424     {
 425         if( sub.audio_status == CDIO_MMC_READ_SUB_ST_PLAY )
 426         {
 427             b_ok = DRIVER_OP_SUCCESS == cdio_audio_pause(p_cdio);
 428         }
 429     }
 430     else
 431         b_ok = false;
 432 #endif
 433     return b_ok;
 434 }
 435
 436 #if LIBCDIO_VERSION_NUM >= 73
 437 /*! play CD using audio controls */
 438 static driver_return_code_t
 439 cdda_audio_play( CdIo_t *p_cdio, lsn_t start_lsn, lsn_t end_lsn )
 440 {
 441     msf_t start_msf;
 442     msf_t last_msf;
 443     cdio_lsn_to_msf( start_lsn, &start_msf );
 444     cdio_lsn_to_msf( end_lsn, &last_msf );
 445     cdda_audio_pause( p_cdio );
 446     return cdio_audio_play_msf( p_cdio, &start_msf, &last_msf );
 447 }
 448 #endif
 449
 450 /****************************************************************************
 451  * CDDASeek - change position for subsequent reads. For example, this
 452  * can happen if the user moves a position slider bar in a GUI.
 453  ****************************************************************************/
 454 static int CDDASeek( access_t * p_access, int64_t i_pos )
 455 {
 456     cdda_data_t *p_cdda = (cdda_data_t *) p_access->p_sys;
 457
 458     dbg_print( (INPUT_DBG_CALL|INPUT_DBG_EXT|INPUT_DBG_SEEK),
 459                "lsn %lu, offset: %lld",
 460                (long unsigned int) p_cdda->i_lsn, i_pos );
 461
 462     p_cdda->i_lsn = (i_pos / CDIO_CD_FRAMESIZE_RAW);
 463
 464 #if LIBCDIO_VERSION_NUM >= 72
 465     if( p_cdda->e_paranoia && p_cdda->paranoia )
 466          cdio_paranoia_seek( p_cdda->paranoia, p_cdda->i_lsn, SEEK_SET );
 467 #endif
 468
 469 #if LIBCDIO_VERSION_NUM >= 73
 470     if( p_cdda->b_audio_ctl )
 471     {
 472         track_t i_track = cdio_get_track( p_cdda->p_cdio, p_cdda->i_lsn );
 473         lsn_t i_last_lsn;
 474
 475         if( p_cdda->b_nav_mode )
 476             i_last_lsn = p_cdda->last_disc_frame;
 477         else
 478             i_last_lsn = cdio_get_track_last_lsn( p_cdda->p_cdio, i_track );
 479
 480         cdda_audio_play( p_cdda->p_cdio, p_cdda->i_lsn, i_last_lsn );
 481     }
 482 #endif
 483
 484     if( ! p_cdda->b_nav_mode )
 485         p_cdda->i_lsn += cdio_get_track_lsn( p_cdda->p_cdio, p_cdda->i_track );
 486
 487     /* Seeked backwards and we are doing disc mode. */
 488     if( p_cdda->b_nav_mode && p_access->info.i_pos > i_pos )
 489     {
 490         track_t i_track;
 491         char *psz_title;
 492
 493         for( i_track = p_cdda->i_track; i_track > 1 &&
 494              p_cdda->i_lsn < cdio_get_track_lsn( p_cdda->p_cdio, i_track );
 495              i_track--, p_access->info.i_title-- )
 496             ;
 497
 498         p_cdda->i_track = i_track;
 499         p_access->info.i_update |= INPUT_UPDATE_TITLE | INPUT_UPDATE_META ;
 500         psz_title  = CDDAFormatTitle( p_access, p_cdda->i_track );
 501         input_Control( p_cdda->p_input, INPUT_SET_NAME,
 502                         psz_title );
 503         free( psz_title );
 504     }
 505
 506     p_access->info.i_pos = i_pos;
 507     p_access->info.b_eof = false;
 508     return VLC_SUCCESS;
 509 }
 510
 511 /*
 512   Set up internal state so that we play a given track.
 513   If we are using audio-ctl mode we also activate CD-ROM
 514   to play.
 515  */
 516 static bool cdda_play_track( access_t *p_access, track_t i_track )
 517 {
 518     cdda_data_t *p_cdda = (cdda_data_t *) p_access->p_sys;
 519
 520     dbg_print( (INPUT_DBG_CALL), "called track: %d\n", i_track );
 521
 522     if( i_track > p_cdda->i_tracks )
 523     {
 524         msg_Err( p_access, "CD has %d tracks, and you requested track %d",
 525                  p_cdda->i_tracks, i_track );
 526         return false;
 527     }
 528     p_cdda->i_track = i_track;
 529
 530     /* set up the frame boundaries for this particular track */
 531     p_cdda->first_frame = p_cdda->i_lsn =
 532     cdio_get_track_lsn( p_cdda->p_cdio, i_track );
 533
 534     p_cdda->last_frame  = cdio_get_track_lsn( p_cdda->p_cdio, i_track+1 ) - 1;
 535
 536 #if LIBCDIO_VERSION_NUM >= 73
 537     if( p_cdda->b_audio_ctl )
 538     {
 539         lsn_t i_last_lsn;
 540         if( p_cdda->b_nav_mode )
 541             i_last_lsn = p_cdda->last_disc_frame;
 542         else
 543             i_last_lsn = cdio_get_track_last_lsn( p_cdda->p_cdio, i_track );
 544         cdda_audio_play( p_cdda->p_cdio, p_cdda->i_lsn, i_last_lsn );
 545     }
 546 #endif
 547     return true;
 548 }
 549
 550 /****************************************************************************
 551  * Public functions
 552  ****************************************************************************/
 553
 554 /*****************************************************************************
 555  * Open: open cdda device or image file and initialize structures
 556  *       for subsequent operations.
 557  *****************************************************************************/
 558 int CDDAOpen( vlc_object_t *p_this )
 559 {
 560     access_t    *p_access = (access_t*)p_this;
 561     char *      psz_source = NULL;
 562     cdda_data_t *p_cdda    = NULL;
 563     CdIo_t      *p_cdio;
 564     track_t     i_track = 1;
 565     bool  b_single_track = false;
 566     int         i_rc = VLC_EGENERIC;
 567
 568     p_access->p_sys = NULL;
 569
 570     /* Set where to log errors messages from libcdio. */
 571     p_cdda_input = p_access;
 572
 573     /* parse the options passed in command line : */
 574     if( p_access->psz_path && *p_access->psz_path )
 575     {
 576         char *psz_parser = psz_source = strdup( p_access->psz_path );
 577
 578         while( *psz_parser && *psz_parser != '@' )
 579         {
 580             psz_parser++;
 581         }
 582
 583         if( *psz_parser == '@' )
 584         {
 585             /* Found options */
 586             *psz_parser = '\0';
 587             ++psz_parser;
 588
 589             if ('T' == *psz_parser || 't' == *psz_parser )
 590             ++psz_parser;
 591
 592             i_track = (int)strtol( psz_parser, NULL, 10 );
 593             i_track = i_track ? i_track : 1;
 594             b_single_track = true;
 595         }
 596     }
 597
 598     if( !psz_source || !*psz_source )
 599     {
 600         /* No device/track given. Continue only when this plugin was
 601            selected */
 602         if( !p_this->b_force )
 603             return VLC_EGENERIC;
 604
 605         psz_source = var_CreateGetString( p_this, "cd-audio" );
 606         if( !psz_source || !*psz_source )
 607         {
 608             free( psz_source );
 609             /* Scan for a CD-ROM drive with a CD-DA in it. */
 610             char **ppsz_drives =
 611                     cdio_get_devices_with_cap( NULL,  CDIO_FS_AUDIO, false );
 612
 613             if( (NULL == ppsz_drives) || (NULL == ppsz_drives[0]) )
 614             {
 615                 msg_Err( p_access,
 616                          "libcdio couldn't find something with a CD-DA in it" );
 617                 if( ppsz_drives )
 618                     cdio_free_device_list( ppsz_drives );
 619                 return VLC_EGENERIC;
 620             }
 621             psz_source = strdup( ppsz_drives[0] );
 622             cdio_free_device_list( ppsz_drives );
 623         }
 624     }
 625     cdio_log_set_handler( cdio_log_handler );
 626
 627     /* Open CDDA */
 628     if( !(p_cdio = cdio_open( psz_source, DRIVER_UNKNOWN )) )
 629     {
 630         msg_Warn( p_access, "could not open %s", psz_source );
 631         free( psz_source );
 632         return VLC_EGENERIC;
 633     }
 634
 635     p_cdda = calloc( 1, sizeof(cdda_data_t) );
 636     if( p_cdda == NULL )
 637     {
 638         free( psz_source );
 639         return VLC_ENOMEM;
 640     }
 641
 642 #ifdef HAVE_LIBCDDB
 643     cddb_log_set_handler ( cddb_log_handler );
 644     p_cdda->cddb.disc = NULL;
 645     p_cdda->b_cddb_enabled =
 646         config_GetInt( p_access, MODULE_STRING "-cddb-enabled" );
 647 #endif
 648     p_cdda->b_cdtext =
 649         config_GetInt( p_access, MODULE_STRING "-cdtext-enabled" );
 650     p_cdda->b_cdtext_prefer =
 651         config_GetInt( p_access, MODULE_STRING "-cdtext-prefer" );
 652 #if LIBCDIO_VERSION_NUM >= 73
 653     p_cdda->b_audio_ctl =
 654         config_GetInt( p_access, MODULE_STRING "-analog-output" );
 655 #endif
 656
 657     p_cdda->psz_source = strdup( psz_source );
 658     p_cdda->b_header   = false;
 659     p_cdda->p_cdio     = p_cdio;
 660     p_cdda->i_tracks   = 0;
 661     p_cdda->i_titles   = 0;
 662     p_cdda->i_debug    = config_GetInt( p_this, MODULE_STRING "-debug" );
 663     p_cdda->b_nav_mode = config_GetInt(p_this, MODULE_STRING "-navigation-mode" );
 664     p_cdda->i_blocks_per_read =
 665             config_GetInt( p_this, MODULE_STRING "-blocks-per-read" );
 666     p_cdda->last_disc_frame =
 667             cdio_get_track_lsn( p_cdio, CDIO_CDROM_LEADOUT_TRACK );
 668     p_cdda->p_input = vlc_object_find( p_access, VLC_OBJECT_INPUT,
 669                                        FIND_PARENT );
 670
 671     if( 0 == p_cdda->i_blocks_per_read )
 672         p_cdda->i_blocks_per_read = DEFAULT_BLOCKS_PER_READ;
 673
 674     if( (p_cdda->i_blocks_per_read < MIN_BLOCKS_PER_READ)
 675          || (p_cdda->i_blocks_per_read > MAX_BLOCKS_PER_READ) )
 676     {
 677         msg_Warn( p_cdda_input,
 678                   "number of blocks (%d) has to be between %d and %d. "
 679                   "Using %d.",
 680                   p_cdda->i_blocks_per_read,
 681                   MIN_BLOCKS_PER_READ, MAX_BLOCKS_PER_READ,
 682                   DEFAULT_BLOCKS_PER_READ );
 683         p_cdda->i_blocks_per_read = DEFAULT_BLOCKS_PER_READ;
 684     }
 685
 686     dbg_print( (INPUT_DBG_CALL|INPUT_DBG_EXT), "%s", psz_source );
 687
 688     /* Set up p_access */
 689     if( p_cdda->b_audio_ctl )
 690     {
 691         p_access->pf_read  = CDDARead;
 692         p_access->pf_block = NULL;
 693     }
 694     else
 695     {
 696         p_access->pf_read  = NULL;
 697         p_access->pf_block = CDDAReadBlocks;
 698     }
 699
 700     p_access->pf_control = CDDAControl;
 701     p_access->pf_seek    = CDDASeek;
 702
 703     {
 704         lsn_t i_last_lsn;
 705
 706         if( p_cdda->b_nav_mode )
 707             i_last_lsn = p_cdda->last_disc_frame;
 708         else
 709             i_last_lsn = cdio_get_track_last_lsn( p_cdio, i_track );
 710
 711         if( CDIO_INVALID_LSN != i_last_lsn )
 712             p_access->info.i_size = i_last_lsn * (uint64_t) CDIO_CD_FRAMESIZE_RAW;
 713         else
 714             p_access->info.i_size = 0;
 715     }
 716
 717     p_access->info.i_update    = 0;
 718     p_access->info.b_eof       = false;
 719     p_access->info.i_title     = 0;
 720     p_access->info.i_seekpoint = 0;
 721
 722     p_access->p_sys     = (access_sys_t *) p_cdda;
 723
 724     /* We read the Table Of Content information */
 725     i_rc = CDDAInit( p_access, p_cdda );
 726     if( VLC_SUCCESS != i_rc )
 727         goto error;
 728
 729     cdda_play_track( p_access, i_track );
 730     CDDAFixupPlaylist( p_access, p_cdda, b_single_track );
 731
 732 #if LIBCDIO_VERSION_NUM >= 72
 733     {
 734         char *psz_paranoia = config_GetPsz( p_access,
 735                                 MODULE_STRING "-paranoia" );
 736
 737         p_cdda->e_paranoia = PARANOIA_MODE_DISABLE;
 738         if( psz_paranoia && *psz_paranoia )
 739         {
 740             if( !strncmp( psz_paranoia, "full", strlen("full") ) )
 741                 p_cdda->e_paranoia = PARANOIA_MODE_FULL;
 742             else if( !strncmp(psz_paranoia, "overlap", strlen("overlap")) )
 743                 p_cdda->e_paranoia = PARANOIA_MODE_OVERLAP;
 744
 745             /* Use CD Paranoia? */
 746             if( p_cdda->e_paranoia )
 747             {
 748                 p_cdda->paranoia_cd =
 749                             cdio_cddap_identify_cdio( p_cdio, 1, NULL );
 750                 /* We'll set for verbose paranoia messages. */
 751                 cdio_cddap_verbose_set( p_cdda->paranoia_cd,
 752                                         CDDA_MESSAGE_PRINTIT,
 753                                         CDDA_MESSAGE_PRINTIT );
 754                 if ( 0 != cdio_cddap_open(p_cdda->paranoia_cd) )
 755                 {
 756                     msg_Warn( p_cdda_input, "unable to get paranoia support - "
 757                                 "continuing without it." );
 758                     p_cdda->e_paranoia = PARANOIA_MODE_DISABLE;
 759                 }
 760                 else
 761                 {
 762                     p_cdda->paranoia = cdio_paranoia_init(p_cdda->paranoia_cd);
 763                     cdio_paranoia_seek( p_cdda->paranoia, p_cdda->i_lsn,
 764                                         SEEK_SET);
 765
 766                     /* Set reading mode for full or overlap paranoia,
 767                      * but allow skipping sectors. */
 768                     cdio_paranoia_modeset( p_cdda->paranoia,
 769                             PARANOIA_MODE_FULL == p_cdda->e_paranoia ?
 770                             PARANOIA_MODE_FULL^PARANOIA_MODE_NEVERSKIP :
 771                             PARANOIA_MODE_OVERLAP^PARANOIA_MODE_NEVERSKIP );
 772                 }
 773             }
 774         }
 775         free( psz_paranoia );
 776     }
 777 #endif
 778
 779     /* Build a WAV header to put in front of the output data.
 780        This gets sent back in the Block (read) routine.
 781      */
 782     memset( &p_cdda->waveheader, 0, sizeof(WAVEHEADER) );
 783
 784     SetWLE( &p_cdda->waveheader.Format, 1 ); /*WAVE_FORMAT_PCM*/
 785     SetWLE( &p_cdda->waveheader.BitsPerSample, 16);
 786
 787     p_cdda->waveheader.MainChunkID = VLC_FOURCC('R', 'I', 'F', 'F');
 788     p_cdda->waveheader.Length = 0;                     /* we just don't know */
 789     p_cdda->waveheader.ChunkTypeID = VLC_FOURCC('W', 'A', 'V', 'E');
 790     p_cdda->waveheader.SubChunkID  = VLC_FOURCC('f', 'm', 't', ' ');
 791
 792     SetDWLE( &p_cdda->waveheader.SubChunkLength, 16);
 793     SetWLE( &p_cdda->waveheader.Modus, 2);
 794     SetDWLE( &p_cdda->waveheader.SampleFreq, CDDA_FREQUENCY_SAMPLE);
 795     SetWLE( &p_cdda->waveheader.BytesPerSample,
 796             2 /*Modus*/ * 16 /*BitsPerSample*/ / 8 );
 797     SetDWLE( &p_cdda->waveheader.BytesPerSec,
 798              2*16/8 /*BytesPerSample*/ * CDDA_FREQUENCY_SAMPLE );
 799
 800     p_cdda->waveheader.DataChunkID = VLC_FOURCC('d', 'a', 't', 'a');
 801     p_cdda->waveheader.DataLength  = 0;    /* we just don't know */
 802
 803     /* PTS delay */
 804     var_Create( p_access, MODULE_STRING "-caching",
 805                 VLC_VAR_INTEGER|VLC_VAR_DOINHERIT );
 806     vlc_object_release( p_cdda->p_input );
 807     return VLC_SUCCESS;
 808
 809  error:
 810     cdio_destroy( p_cdda->p_cdio );
 811     free( psz_source );
 812     if( p_cdda )
 813     {
 814         if ( p_cdda->p_input )
 815             vlc_object_release( p_cdda->p_input );
 816         free(p_cdda);
 817     }
 818     return i_rc;
 819 }
 820
 821 /*****************************************************************************
 822  * CDDAClose: closes cdda and frees any resources associded with it.
 823  *****************************************************************************/
 824 void CDDAClose (vlc_object_t *p_this )
 825 {
 826     access_t    *p_access = (access_t *) p_this;
 827     cdda_data_t *p_cdda   = (cdda_data_t *) p_access->p_sys;
 828     track_t      i;
 829
 830 #if LIBCDIO_VERSION_NUM >= 73
 831     if( p_cdda->b_audio_ctl )
 832         cdio_audio_stop(p_cdda->p_cdio);
 833 #endif
 834
 835     dbg_print( (INPUT_DBG_CALL|INPUT_DBG_EXT), "" );
 836
 837     /* Remove playlist titles */
 838     for( i = 0; i < p_cdda->i_titles; i++ )
 839     {
 840         vlc_input_title_Delete( p_cdda->p_title[i] );
 841     }
 842
 843 #ifdef HAVE_LIBCDDB
 844     cddb_log_set_handler( (cddb_log_handler_t) uninit_log_handler );
 845     if( p_cdda->b_cddb_enabled )
 846         cddb_disc_destroy( p_cdda->cddb.disc );
 847 #endif
 848
 849     cdio_destroy( p_cdda->p_cdio );
 850     cdio_log_set_handler( uninit_log_handler );
 851
 852 #if LIBCDIO_VERSION_NUM >= 72
 853     if( p_cdda->paranoia )
 854         cdio_paranoia_free(p_cdda->paranoia);
 855     if( p_cdda->paranoia_cd )
 856         cdio_cddap_close_no_free_cdio( p_cdda->paranoia_cd );
 857 #endif
 858
 859     free( p_cdda->psz_mcn );
 860     free( p_cdda->psz_source );
 861
 862 #if LIBCDDB_VERSION_NUM >= 1
 863     libcddb_shutdown();
 864 #endif
 865     free( p_cdda );
 866     p_cdda = NULL;
 867     p_cdda_input = NULL;
 868 }
 869
 870 /*****************************************************************************
 871  * Control: The front-end or vlc engine calls here to ether get
 872  * information such as meta information or plugin capabilities or to
 873  * issue miscellaneous "set" requests.
 874  *****************************************************************************/
 875 static int CDDAControl( access_t *p_access, int i_query, va_list args )
 876 {
 877     cdda_data_t  *p_cdda = (cdda_data_t *) p_access->p_sys;
 878     int          *pi_int;
 879     int i;
 880
 881     dbg_print( (INPUT_DBG_CALL|INPUT_DBG_EXT|INPUT_DBG_EVENT),
 882                "query %d", i_query );
 883
 884     switch( i_query )
 885     {
 886         /* Pass back a copy of meta information that was gathered when we
 887            during the Open/Initialize call.
 888          */
 889         case ACCESS_GET_META:
 890         {
 891 #if 0
 892             vlc_meta_t **pp_meta = (vlc_meta_t**)va_arg( args, vlc_meta_t** );
 893             if( p_cdda->p_meta )
 894             {
 895                 *pp_meta = vlc_meta_Duplicate( p_cdda->p_meta );
 896                 dbg_print( INPUT_DBG_META, "%s", "Meta copied" );
 897                 return VLC_SUCCESS;
 898             }
 899             else
 900 #endif
 901             {
 902                 msg_Warn( p_access, "tried to copy NULL meta info" );
 903                 return VLC_EGENERIC;
 904             }
 905         }
 906
 907         case ACCESS_CAN_CONTROL_PACE:
 908         {
 909             bool *pb_bool = (bool*)va_arg( args, bool* );
 910             *pb_bool = p_cdda->b_audio_ctl ? false : true;
 911             dbg_print( INPUT_DBG_META, "can control pace? %d", *pb_bool);
 912             return VLC_SUCCESS;
 913         }
 914
 915         case ACCESS_CAN_FASTSEEK:
 916             dbg_print( INPUT_DBG_META, "can fast seek?");
 917             goto common;
 918         case ACCESS_CAN_SEEK:
 919             dbg_print( INPUT_DBG_META, "can seek?");
 920             goto common;
 921         case ACCESS_CAN_PAUSE:
 922             dbg_print( INPUT_DBG_META, "can pause?");
 923  common:
 924             {
 925                 bool *pb_bool = (bool*)va_arg( args, bool* );
 926                 *pb_bool = true;
 927                 return VLC_SUCCESS;
 928             }
 929
 930         /* */
 931         case ACCESS_GET_MTU:
 932         {
 933             pi_int = (int*)va_arg( args, int * );
 934             *pi_int = p_cdda-> i_blocks_per_read * CDIO_CD_FRAMESIZE_RAW;
 935             dbg_print( INPUT_DBG_META, "Get MTU %d", *pi_int);
 936             break;
 937         }
 938
 939         case ACCESS_GET_PTS_DELAY:
 940         {
 941             int64_t *pi_64 = (int64_t*)va_arg( args, int64_t * );
 942             *pi_64 = var_GetInteger( p_access, MODULE_STRING "-caching" )
 943               * MILLISECONDS_PER_SEC;
 944             break;
 945         }
 946
 947         case ACCESS_GET_TITLE_INFO:
 948         {
 949             input_title_t ***ppp_title =
 950              (input_title_t***)va_arg( args, input_title_t*** );
 951
 952             pi_int    = (int*)va_arg( args, int* );
 953             *((int*)va_arg( args, int* )) = 1; /* Title offset */
 954
 955             dbg_print ( INPUT_DBG_EVENT,
 956                         "GET TITLE: i_tracks %d, i_tracks %d",
 957                         p_cdda->i_tracks, p_cdda->i_tracks );
 958
 959             CDDAMetaInfo( p_access, CDIO_INVALID_TRACK );
 960
 961             if( p_cdda->b_nav_mode)
 962             {
 963                 char *psz_title = CDDAFormatTitle( p_access, p_cdda->i_track );
 964                 input_Control( p_cdda->p_input, INPUT_SET_NAME, psz_title );
 965                 free(psz_title);
 966             }
 967
 968             /* Duplicate title info */
 969             if( p_cdda->i_titles == 0 )
 970             {
 971                 *pi_int = 0; ppp_title = NULL;
 972                 return VLC_SUCCESS;
 973             }
 974             *pi_int = p_cdda->i_titles;
 975             *ppp_title = calloc(1, sizeof( input_title_t **)
 976                                            * p_cdda->i_titles );
 977
 978             if (!*ppp_title)
 979                 return VLC_ENOMEM;
 980
 981             for( i = 0; i < p_cdda->i_titles; i++ )
 982             {
 983                 if ( p_cdda->p_title[i] )
 984                 {
 985                     (*ppp_title)[i] =
 986                         vlc_input_title_Duplicate( p_cdda->p_title[i] );
 987                 }
 988             }
 989             break;
 990         }
 991
 992         case ACCESS_SET_TITLE:
 993         {
 994             i = (int)va_arg( args, int );
 995
 996             dbg_print( INPUT_DBG_EVENT, "set title %d", i );
 997             if( i != p_access->info.i_title )
 998             {
 999                 const track_t i_track = p_cdda->i_first_track + i;
1000                 /* Update info */
1001                 p_access->info.i_title = i;
1002                 if( p_cdda->b_nav_mode)
1003                 {
1004                     lsn_t i_last_lsn;
1005                     char *psz_title = CDDAFormatTitle( p_access, i_track );
1006                     input_Control( p_cdda->p_input, INPUT_SET_NAME,
1007                                    psz_title );
1008                     free( psz_title );
1009                     p_cdda->i_track = i_track;
1010                     i_last_lsn = cdio_get_track_lsn( p_cdda->p_cdio,
1011                                                 CDIO_CDROM_LEADOUT_TRACK );
1012                     if( CDIO_INVALID_LSN != i_last_lsn )
1013                         p_access->info.i_size = (int64_t) CDIO_CD_FRAMESIZE_RAW
1014                                                             * i_last_lsn ;
1015                     p_access->info.i_pos = (int64_t)
1016                                     cdio_get_track_lsn( p_cdda->p_cdio, i_track )
1017                                                         * CDIO_CD_FRAMESIZE_RAW;
1018                 }
1019                 else
1020                 {
1021                     p_access->info.i_size = p_cdda->p_title[i]->i_size;
1022                     p_access->info.i_pos  = 0;
1023                 }
1024                 p_access->info.i_update = INPUT_UPDATE_TITLE|INPUT_UPDATE_SIZE;
1025
1026                 /* Next sector to read */
1027                 p_cdda->i_lsn = cdio_get_track_lsn( p_cdda->p_cdio, i_track );
1028             }
1029             break;
1030         }
1031
1032         case ACCESS_SET_PAUSE_STATE:
1033             dbg_print( INPUT_DBG_META, "Pause");
1034             if( p_cdda->b_audio_ctl )
1035                 cdda_audio_pause( p_cdda->p_cdio );
1036             break;
1037
1038         case ACCESS_SET_SEEKPOINT:
1039             dbg_print( INPUT_DBG_META, "set seekpoint");
1040             return VLC_EGENERIC;
1041
1042         case ACCESS_SET_PRIVATE_ID_STATE:
1043             dbg_print( INPUT_DBG_META, "set private id state");
1044             return VLC_EGENERIC;
1045
1046         default:
1047             msg_Warn( p_access, "unimplemented query in control" );
1048             return VLC_EGENERIC;
1049
1050     }
1051     return VLC_SUCCESS;
1052 }
1053
1054 /*****************************************************************************
1055   CDDAInit:
1056
1057  Initialize information pertaining to the CD: the number of tracks,
1058  first track number, LSNs for each track and the leadout. The leadout
1059  information is stored after the last track. The LSN array is
1060  0-origin, same as p_access->info.  Add first_track to get what track
1061  number this is on the CD. Note: libcdio uses the real track number.
1062
1063  On input we assume p_cdda->p_cdio and p_cdda->i_track have been set.
1064
1065  We return the VLC-type status, e.g. VLC_SUCCESS, VLC_ENOMEM, etc.
1066  *****************************************************************************/
1067 static int CDDAInit( access_t *p_access, cdda_data_t *p_cdda )
1068 {
1069     discmode_t  discmode = CDIO_DISC_MODE_NO_INFO;
1070
1071     p_cdda->i_tracks       = cdio_get_num_tracks( p_cdda->p_cdio );
1072     p_cdda->i_first_track  = cdio_get_first_track_num( p_cdda->p_cdio );
1073
1074     discmode = cdio_get_discmode( p_cdda->p_cdio );
1075     switch( discmode )
1076     {
1077         case CDIO_DISC_MODE_CD_DA:
1078         case CDIO_DISC_MODE_CD_MIXED:
1079             /* These are possible for CD-DA */
1080             break;
1081         default:
1082             /* These are not possible for CD-DA */
1083             msg_Err( p_access,
1084                 "Disc seems not to be CD-DA. libcdio reports it is %s",
1085                 discmode2str[discmode]
1086                 );
1087             return VLC_EGENERIC;
1088     }
1089
1090     /* Set reading start LSN. */
1091     p_cdda->i_lsn = cdio_get_track_lsn(p_cdda->p_cdio, p_cdda->i_track);
1092
1093     return VLC_SUCCESS;
1094 }
1095
1096 /*
1097  * Local variables:
1098  *  mode: C
1099  *  style: gnu
1100  * End:
1101  */