Respect album-art for CDDB request.
[vlc.git] / 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_dialog.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         dialog_Fatal( p_access, _("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", 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",
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         free( psz_source );
601         /* No device/track given. Continue only when this plugin was
602            selected */
603         if( !p_this->b_force )
604             return VLC_EGENERIC;
605
606         psz_source = var_CreateGetString( p_this, "cd-audio" );
607         if( !psz_source || !*psz_source )
608         {
609             free( psz_source );
610             /* Scan for a CD-ROM drive with a CD-DA in it. */
611             char **ppsz_drives =
612                     cdio_get_devices_with_cap( NULL,  CDIO_FS_AUDIO, false );
613
614             if( (NULL == ppsz_drives) || (NULL == ppsz_drives[0]) )
615             {
616                 msg_Err( p_access,
617                          "libcdio couldn't find something with a CD-DA in it" );
618                 if( ppsz_drives )
619                     cdio_free_device_list( ppsz_drives );
620                 return VLC_EGENERIC;
621             }
622             psz_source = strdup( ppsz_drives[0] );
623             cdio_free_device_list( ppsz_drives );
624         }
625     }
626     cdio_log_set_handler( cdio_log_handler );
627
628     /* Open CDDA */
629     if( !(p_cdio = cdio_open( psz_source, DRIVER_UNKNOWN )) )
630     {
631         msg_Warn( p_access, "could not open %s", psz_source );
632         free( psz_source );
633         return VLC_EGENERIC;
634     }
635
636     p_cdda = calloc( 1, sizeof(cdda_data_t) );
637     if( p_cdda == NULL )
638     {
639         free( psz_source );
640         return VLC_ENOMEM;
641     }
642
643 #ifdef HAVE_LIBCDDB
644     cddb_log_set_handler ( cddb_log_handler );
645     p_cdda->cddb.disc = NULL;
646     p_cdda->b_cddb_enabled =
647         var_CreateGetInteger( p_access, "album-art" ) != ALBUM_ART_WHEN_ASKED &&
648         config_GetInt( p_access, MODULE_STRING "-cddb-enabled" );
649 #endif
650     p_cdda->b_cdtext =
651         config_GetInt( p_access, MODULE_STRING "-cdtext-enabled" );
652     p_cdda->b_cdtext_prefer =
653         config_GetInt( p_access, MODULE_STRING "-cdtext-prefer" );
654 #if LIBCDIO_VERSION_NUM >= 73
655     p_cdda->b_audio_ctl =
656         config_GetInt( p_access, MODULE_STRING "-analog-output" );
657 #endif
658
659     p_cdda->psz_source = strdup( psz_source );
660     p_cdda->b_header   = false;
661     p_cdda->p_cdio     = p_cdio;
662     p_cdda->i_tracks   = 0;
663     p_cdda->i_titles   = 0;
664     p_cdda->i_debug    = config_GetInt( p_this, MODULE_STRING "-debug" );
665     p_cdda->b_nav_mode = config_GetInt(p_this, MODULE_STRING "-navigation-mode" );
666     p_cdda->i_blocks_per_read =
667             config_GetInt( p_this, MODULE_STRING "-blocks-per-read" );
668     p_cdda->last_disc_frame =
669             cdio_get_track_lsn( p_cdio, CDIO_CDROM_LEADOUT_TRACK );
670     p_cdda->p_input = vlc_object_find( p_access, VLC_OBJECT_INPUT,
671                                        FIND_PARENT );
672
673     if( 0 == p_cdda->i_blocks_per_read )
674         p_cdda->i_blocks_per_read = DEFAULT_BLOCKS_PER_READ;
675
676     if( (p_cdda->i_blocks_per_read < MIN_BLOCKS_PER_READ)
677          || (p_cdda->i_blocks_per_read > MAX_BLOCKS_PER_READ) )
678     {
679         msg_Warn( p_cdda_input,
680                   "number of blocks (%d) has to be between %d and %d. "
681                   "Using %d.",
682                   p_cdda->i_blocks_per_read,
683                   MIN_BLOCKS_PER_READ, MAX_BLOCKS_PER_READ,
684                   DEFAULT_BLOCKS_PER_READ );
685         p_cdda->i_blocks_per_read = DEFAULT_BLOCKS_PER_READ;
686     }
687
688     dbg_print( (INPUT_DBG_CALL|INPUT_DBG_EXT), "%s", psz_source );
689
690     /* Set up p_access */
691     if( p_cdda->b_audio_ctl )
692     {
693         p_access->pf_read  = CDDARead;
694         p_access->pf_block = NULL;
695     }
696     else
697     {
698         p_access->pf_read  = NULL;
699         p_access->pf_block = CDDAReadBlocks;
700     }
701
702     p_access->pf_control = CDDAControl;
703     p_access->pf_seek    = CDDASeek;
704
705     {
706         lsn_t i_last_lsn;
707
708         if( p_cdda->b_nav_mode )
709             i_last_lsn = p_cdda->last_disc_frame;
710         else
711             i_last_lsn = cdio_get_track_last_lsn( p_cdio, i_track );
712
713         if( CDIO_INVALID_LSN != i_last_lsn )
714             p_access->info.i_size = i_last_lsn * (uint64_t) CDIO_CD_FRAMESIZE_RAW;
715         else
716             p_access->info.i_size = 0;
717     }
718
719     p_access->info.i_update    = 0;
720     p_access->info.b_eof       = false;
721     p_access->info.i_title     = 0;
722     p_access->info.i_seekpoint = 0;
723
724     p_access->p_sys     = (access_sys_t *) p_cdda;
725
726     /* We read the Table Of Content information */
727     i_rc = CDDAInit( p_access, p_cdda );
728     if( VLC_SUCCESS != i_rc )
729         goto error;
730
731     cdda_play_track( p_access, i_track );
732     CDDAFixupPlaylist( p_access, p_cdda, b_single_track );
733
734 #if LIBCDIO_VERSION_NUM >= 72
735     {
736         char *psz_paranoia = config_GetPsz( p_access,
737                                 MODULE_STRING "-paranoia" );
738
739         p_cdda->e_paranoia = PARANOIA_MODE_DISABLE;
740         if( psz_paranoia && *psz_paranoia )
741         {
742             if( !strncmp( psz_paranoia, "full", strlen("full") ) )
743                 p_cdda->e_paranoia = PARANOIA_MODE_FULL;
744             else if( !strncmp(psz_paranoia, "overlap", strlen("overlap")) )
745                 p_cdda->e_paranoia = PARANOIA_MODE_OVERLAP;
746
747             /* Use CD Paranoia? */
748             if( p_cdda->e_paranoia )
749             {
750                 p_cdda->paranoia_cd =
751                             cdio_cddap_identify_cdio( p_cdio, 1, NULL );
752                 /* We'll set for verbose paranoia messages. */
753                 cdio_cddap_verbose_set( p_cdda->paranoia_cd,
754                                         CDDA_MESSAGE_PRINTIT,
755                                         CDDA_MESSAGE_PRINTIT );
756                 if ( 0 != cdio_cddap_open(p_cdda->paranoia_cd) )
757                 {
758                     msg_Warn( p_cdda_input, "unable to get paranoia support - "
759                                 "continuing without it." );
760                     p_cdda->e_paranoia = PARANOIA_MODE_DISABLE;
761                 }
762                 else
763                 {
764                     p_cdda->paranoia = cdio_paranoia_init(p_cdda->paranoia_cd);
765                     cdio_paranoia_seek( p_cdda->paranoia, p_cdda->i_lsn,
766                                         SEEK_SET);
767
768                     /* Set reading mode for full or overlap paranoia,
769                      * but allow skipping sectors. */
770                     cdio_paranoia_modeset( p_cdda->paranoia,
771                             PARANOIA_MODE_FULL == p_cdda->e_paranoia ?
772                             PARANOIA_MODE_FULL^PARANOIA_MODE_NEVERSKIP :
773                             PARANOIA_MODE_OVERLAP^PARANOIA_MODE_NEVERSKIP );
774                 }
775             }
776         }
777         free( psz_paranoia );
778     }
779 #endif
780
781     /* Build a WAV header to put in front of the output data.
782        This gets sent back in the Block (read) routine.
783      */
784     memset( &p_cdda->waveheader, 0, sizeof(WAVEHEADER) );
785
786     SetWLE( &p_cdda->waveheader.Format, 1 ); /*WAVE_FORMAT_PCM*/
787     SetWLE( &p_cdda->waveheader.BitsPerSample, 16);
788
789     p_cdda->waveheader.MainChunkID = VLC_FOURCC('R', 'I', 'F', 'F');
790     p_cdda->waveheader.Length = 0;                     /* we just don't know */
791     p_cdda->waveheader.ChunkTypeID = VLC_FOURCC('W', 'A', 'V', 'E');
792     p_cdda->waveheader.SubChunkID  = VLC_FOURCC('f', 'm', 't', ' ');
793
794     SetDWLE( &p_cdda->waveheader.SubChunkLength, 16);
795     SetWLE( &p_cdda->waveheader.Modus, 2);
796     SetDWLE( &p_cdda->waveheader.SampleFreq, CDDA_FREQUENCY_SAMPLE);
797     SetWLE( &p_cdda->waveheader.BytesPerSample,
798             2 /*Modus*/ * 16 /*BitsPerSample*/ / 8 );
799     SetDWLE( &p_cdda->waveheader.BytesPerSec,
800              2*16/8 /*BytesPerSample*/ * CDDA_FREQUENCY_SAMPLE );
801
802     p_cdda->waveheader.DataChunkID = VLC_FOURCC('d', 'a', 't', 'a');
803     p_cdda->waveheader.DataLength  = 0;    /* we just don't know */
804
805     /* PTS delay */
806     var_Create( p_access, MODULE_STRING "-caching",
807                 VLC_VAR_INTEGER|VLC_VAR_DOINHERIT );
808     vlc_object_release( p_cdda->p_input );
809     free( psz_source );
810     return VLC_SUCCESS;
811
812  error:
813     cdio_destroy( p_cdda->p_cdio );
814     free( psz_source );
815     if( p_cdda )
816     {
817         if ( p_cdda->p_input )
818             vlc_object_release( p_cdda->p_input );
819         free(p_cdda);
820     }
821     return i_rc;
822 }
823
824 /*****************************************************************************
825  * CDDAClose: closes cdda and frees any resources associded with it.
826  *****************************************************************************/
827 void CDDAClose (vlc_object_t *p_this )
828 {
829     access_t    *p_access = (access_t *) p_this;
830     cdda_data_t *p_cdda   = (cdda_data_t *) p_access->p_sys;
831     track_t      i;
832
833 #if LIBCDIO_VERSION_NUM >= 73
834     if( p_cdda->b_audio_ctl )
835         cdio_audio_stop(p_cdda->p_cdio);
836 #endif
837
838     dbg_print( (INPUT_DBG_CALL|INPUT_DBG_EXT), "" );
839
840     /* Remove playlist titles */
841     for( i = 0; i < p_cdda->i_titles; i++ )
842     {
843         vlc_input_title_Delete( p_cdda->p_title[i] );
844     }
845
846 #ifdef HAVE_LIBCDDB
847     cddb_log_set_handler( (cddb_log_handler_t) uninit_log_handler );
848     if( p_cdda->b_cddb_enabled )
849         cddb_disc_destroy( p_cdda->cddb.disc );
850 #endif
851
852     cdio_destroy( p_cdda->p_cdio );
853     cdio_log_set_handler( uninit_log_handler );
854
855 #if LIBCDIO_VERSION_NUM >= 72
856     if( p_cdda->paranoia )
857         cdio_paranoia_free(p_cdda->paranoia);
858     if( p_cdda->paranoia_cd )
859         cdio_cddap_close_no_free_cdio( p_cdda->paranoia_cd );
860 #endif
861
862     free( p_cdda->psz_mcn );
863     free( p_cdda->psz_source );
864
865 #if LIBCDDB_VERSION_NUM >= 1
866     libcddb_shutdown();
867 #endif
868     free( p_cdda );
869     p_cdda = NULL;
870     p_cdda_input = NULL;
871 }
872
873 /*****************************************************************************
874  * Control: The front-end or vlc engine calls here to ether get
875  * information such as meta information or plugin capabilities or to
876  * issue miscellaneous "set" requests.
877  *****************************************************************************/
878 static int CDDAControl( access_t *p_access, int i_query, va_list args )
879 {
880     cdda_data_t  *p_cdda = (cdda_data_t *) p_access->p_sys;
881     int          *pi_int;
882     int i;
883
884     dbg_print( (INPUT_DBG_CALL|INPUT_DBG_EXT|INPUT_DBG_EVENT),
885                "query %d", i_query );
886
887     switch( i_query )
888     {
889         /* Pass back a copy of meta information that was gathered when we
890            during the Open/Initialize call.
891          */
892         case ACCESS_GET_META:
893         {
894 #if 0
895             vlc_meta_t **pp_meta = (vlc_meta_t**)va_arg( args, vlc_meta_t** );
896             if( p_cdda->p_meta )
897             {
898                 *pp_meta = vlc_meta_Duplicate( p_cdda->p_meta );
899                 dbg_print( INPUT_DBG_META, "%s", "Meta copied" );
900                 return VLC_SUCCESS;
901             }
902             else
903 #endif
904             {
905                 msg_Warn( p_access, "tried to copy NULL meta info" );
906                 return VLC_EGENERIC;
907             }
908         }
909
910         case ACCESS_CAN_CONTROL_PACE:
911         {
912             bool *pb_bool = (bool*)va_arg( args, bool* );
913             *pb_bool = p_cdda->b_audio_ctl ? false : true;
914             dbg_print( INPUT_DBG_META, "can control pace? %d", *pb_bool);
915             return VLC_SUCCESS;
916         }
917
918         case ACCESS_CAN_FASTSEEK:
919             dbg_print( INPUT_DBG_META, "can fast seek?");
920             goto common;
921         case ACCESS_CAN_SEEK:
922             dbg_print( INPUT_DBG_META, "can seek?");
923             goto common;
924         case ACCESS_CAN_PAUSE:
925             dbg_print( INPUT_DBG_META, "can pause?");
926  common:
927             {
928                 bool *pb_bool = (bool*)va_arg( args, bool* );
929                 *pb_bool = true;
930                 return VLC_SUCCESS;
931             }
932
933         case ACCESS_GET_PTS_DELAY:
934         {
935             int64_t *pi_64 = (int64_t*)va_arg( args, int64_t * );
936             *pi_64 = var_GetInteger( p_access, MODULE_STRING "-caching" )
937               * MILLISECONDS_PER_SEC;
938             break;
939         }
940
941         case ACCESS_GET_TITLE_INFO:
942         {
943             input_title_t ***ppp_title =
944              (input_title_t***)va_arg( args, input_title_t*** );
945
946             pi_int    = (int*)va_arg( args, int* );
947             *((int*)va_arg( args, int* )) = 1; /* Title offset */
948
949             dbg_print ( INPUT_DBG_EVENT,
950                         "GET TITLE: i_tracks %d, i_tracks %d",
951                         p_cdda->i_tracks, p_cdda->i_tracks );
952
953             CDDAMetaInfo( p_access, CDIO_INVALID_TRACK );
954
955             if( p_cdda->b_nav_mode)
956             {
957                 char *psz_title = CDDAFormatTitle( p_access, p_cdda->i_track );
958                 input_Control( p_cdda->p_input, INPUT_SET_NAME, psz_title );
959                 free(psz_title);
960             }
961
962             /* Duplicate title info */
963             if( p_cdda->i_titles == 0 )
964             {
965                 *pi_int = 0; ppp_title = NULL;
966                 return VLC_SUCCESS;
967             }
968             *pi_int = p_cdda->i_titles;
969             *ppp_title = calloc(1, sizeof( input_title_t **)
970                                            * p_cdda->i_titles );
971
972             if (!*ppp_title)
973                 return VLC_ENOMEM;
974
975             for( i = 0; i < p_cdda->i_titles; i++ )
976             {
977                 if ( p_cdda->p_title[i] )
978                 {
979                     (*ppp_title)[i] =
980                         vlc_input_title_Duplicate( p_cdda->p_title[i] );
981                 }
982             }
983             break;
984         }
985
986         case ACCESS_SET_TITLE:
987         {
988             i = (int)va_arg( args, int );
989
990             dbg_print( INPUT_DBG_EVENT, "set title %d", i );
991             if( i != p_access->info.i_title )
992             {
993                 const track_t i_track = p_cdda->i_first_track + i;
994                 /* Update info */
995                 p_access->info.i_title = i;
996                 if( p_cdda->b_nav_mode)
997                 {
998                     lsn_t i_last_lsn;
999                     char *psz_title = CDDAFormatTitle( p_access, i_track );
1000                     input_Control( p_cdda->p_input, INPUT_SET_NAME,
1001                                    psz_title );
1002                     free( psz_title );
1003                     p_cdda->i_track = i_track;
1004                     i_last_lsn = cdio_get_track_lsn( p_cdda->p_cdio,
1005                                                 CDIO_CDROM_LEADOUT_TRACK );
1006                     if( CDIO_INVALID_LSN != i_last_lsn )
1007                         p_access->info.i_size = (int64_t) CDIO_CD_FRAMESIZE_RAW
1008                                                             * i_last_lsn ;
1009                     p_access->info.i_pos = (int64_t)
1010                                     cdio_get_track_lsn( p_cdda->p_cdio, i_track )
1011                                                         * CDIO_CD_FRAMESIZE_RAW;
1012                 }
1013                 else
1014                 {
1015                     p_access->info.i_size = p_cdda->p_title[i]->i_size;
1016                     p_access->info.i_pos  = 0;
1017                 }
1018                 p_access->info.i_update = INPUT_UPDATE_TITLE|INPUT_UPDATE_SIZE;
1019
1020                 /* Next sector to read */
1021                 p_cdda->i_lsn = cdio_get_track_lsn( p_cdda->p_cdio, i_track );
1022             }
1023             break;
1024         }
1025
1026         case ACCESS_SET_PAUSE_STATE:
1027             dbg_print( INPUT_DBG_META, "Pause");
1028             if( p_cdda->b_audio_ctl )
1029                 cdda_audio_pause( p_cdda->p_cdio );
1030             break;
1031
1032         case ACCESS_SET_SEEKPOINT:
1033             dbg_print( INPUT_DBG_META, "set seekpoint");
1034             return VLC_EGENERIC;
1035
1036         case ACCESS_SET_PRIVATE_ID_STATE:
1037             dbg_print( INPUT_DBG_META, "set private id state");
1038             return VLC_EGENERIC;
1039
1040         default:
1041             msg_Warn( p_access, "unimplemented query in control" );
1042             return VLC_EGENERIC;
1043
1044     }
1045     return VLC_SUCCESS;
1046 }
1047
1048 /*****************************************************************************
1049   CDDAInit:
1050
1051  Initialize information pertaining to the CD: the number of tracks,
1052  first track number, LSNs for each track and the leadout. The leadout
1053  information is stored after the last track. The LSN array is
1054  0-origin, same as p_access->info.  Add first_track to get what track
1055  number this is on the CD. Note: libcdio uses the real track number.
1056
1057  On input we assume p_cdda->p_cdio and p_cdda->i_track have been set.
1058
1059  We return the VLC-type status, e.g. VLC_SUCCESS, VLC_ENOMEM, etc.
1060  *****************************************************************************/
1061 static int CDDAInit( access_t *p_access, cdda_data_t *p_cdda )
1062 {
1063     discmode_t  discmode = CDIO_DISC_MODE_NO_INFO;
1064
1065     p_cdda->i_tracks       = cdio_get_num_tracks( p_cdda->p_cdio );
1066     p_cdda->i_first_track  = cdio_get_first_track_num( p_cdda->p_cdio );
1067
1068     discmode = cdio_get_discmode( p_cdda->p_cdio );
1069     switch( discmode )
1070     {
1071         case CDIO_DISC_MODE_CD_DA:
1072         case CDIO_DISC_MODE_CD_MIXED:
1073             /* These are possible for CD-DA */
1074             break;
1075         default:
1076             /* These are not possible for CD-DA */
1077             msg_Err( p_access,
1078                 "Disc seems not to be CD-DA. libcdio reports it is %s",
1079                 discmode2str[discmode]
1080                 );
1081             return VLC_EGENERIC;
1082     }
1083
1084     /* Set reading start LSN. */
1085     p_cdda->i_lsn = cdio_get_track_lsn(p_cdda->p_cdio, p_cdda->i_track);
1086
1087     return VLC_SUCCESS;
1088 }
1089
1090 /*
1091  * Local variables:
1092  *  mode: C
1093  *  style: gnu
1094  * End:
1095  */