]> git.sesse.net Git - vlc/blob - modules/access/cdda/access.c
* ALL: playlist API changes
[vlc] / modules / access / cdda / access.c
1 /*****************************************************************************
2  * cddax.c : CD digital audio input module for vlc using libcdio
3  *****************************************************************************
4  * Copyright (C) 2000,2003 VideoLAN
5  * $Id: access.c,v 1.20 2004/01/05 13:07:02 zorglub Exp $
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., 59 Temple Place - Suite 330, Boston, MA  02111, USA.
24  *****************************************************************************/
25
26 /*****************************************************************************
27  * Preamble
28  *****************************************************************************/
29 #include <stdio.h>
30 #include <stdlib.h>
31
32 #include <vlc/vlc.h>
33 #include <vlc/intf.h>
34
35 #include <sys/types.h>
36 #include <cdio/cdio.h>
37 #include <cdio/cd_types.h>
38
39 #include "codecs.h"
40 #include "vlc_keys.h"
41
42 #ifdef HAVE_UNISTD_H
43 #   include <unistd.h>
44 #endif
45
46 #ifdef HAVE_ERRNO_H
47 #   include <errno.h>
48 #endif
49
50 #include <string.h>
51
52 #include "cdda.h"
53
54 /* how many blocks Open will read in each loop */
55 #define CDDA_BLOCKS_ONCE 1
56 #define CDDA_DATA_ONCE   (CDDA_BLOCKS_ONCE * CDIO_CD_FRAMESIZE_RAW)
57
58 #define CDDA_MRL_PREFIX "cddax://"
59
60 /* FIXME: This variable is a hack. Would be nice to eliminate. */
61 static input_thread_t *p_cdda_input = NULL;
62
63 /*****************************************************************************
64  * Local prototypes
65  *****************************************************************************/
66 static int  CDDARead         ( input_thread_t *, byte_t *, size_t );
67 static void CDDASeek         ( input_thread_t *, off_t );
68 static int  CDDASetArea      ( input_thread_t *, input_area_t * );
69 static int  CDDASetProgram   ( input_thread_t *, pgrm_descriptor_t * );
70
71 static int  CDDAFixupPlayList( input_thread_t *p_input,
72                               cdda_data_t *p_cdda, const char *psz_source,
73                               bool play_single_track);
74
75 /****************************************************************************
76  * Private functions
77  ****************************************************************************/
78
79 /* process messages that originate from libcdio. */
80 static void
81 cdio_log_handler (cdio_log_level_t level, const char message[])
82 {
83   cdda_data_t *p_cdda = (cdda_data_t *)p_cdda_input->p_access_data;
84   switch (level) {
85   case CDIO_LOG_DEBUG:
86   case CDIO_LOG_INFO:
87     if (p_cdda->i_debug & INPUT_DBG_CDIO)
88       msg_Dbg( p_cdda_input, message);
89     break;
90   case CDIO_LOG_WARN:
91     msg_Warn( p_cdda_input, message);
92     break;
93   case CDIO_LOG_ERROR:
94   case CDIO_LOG_ASSERT:
95     msg_Err( p_cdda_input, message);
96     break;
97   default:
98     msg_Warn( p_cdda_input, message,
99             _("The above message had unknown vcdimager log level"),
100             level);
101   }
102   return;
103 }
104
105
106 #ifdef HAVE_LIBCDDB
107 /*! This routine is called by libcddb routines on error.
108    Setup is done by init_input_plugin.
109 */
110 static void
111 cddb_log_handler (cddb_log_level_t level, const char message[])
112 {
113   cdda_data_t *p_cdda = (cdda_data_t *)p_cdda_input->p_access_data;
114   switch (level) {
115   case CDDB_LOG_DEBUG:
116   case CDDB_LOG_INFO:
117     if (!(p_cdda->i_debug & INPUT_DBG_CDDB)) return;
118     /* Fall through if to warn case */
119   default:
120     cdio_log_handler (level, message);
121   }
122 }
123 #endif /*HAVE_LIBCDDB*/
124
125
126 /*! This routine is when xine 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 = (cdda_data_t *)p_cdda_input->p_access_data;
133   switch (level) {
134   case CDIO_LOG_DEBUG:
135   case CDIO_LOG_INFO:
136     if (!(p_cdda->i_debug & (INPUT_DBG_CDIO|INPUT_DBG_CDDB)))
137       return;
138     /* Fall through if to warn case */
139   case CDIO_LOG_WARN:
140     fprintf(stderr, "WARN: %s\n", message);
141     break;
142   case CDIO_LOG_ERROR:
143     fprintf(stderr, "ERROR: %s\n", message);
144     break;
145   case CDIO_LOG_ASSERT:
146     fprintf(stderr, "ASSERT ERROR: %s\n", message);
147     break;
148   default:
149     fprintf(stderr, "UNKNOWN ERROR: %s\n%s %d\n",
150             message,
151             _("The above message had unknown cdio log level"),
152             level);
153   }
154
155   /* gl_default_cdio_log_handler (level, message); */
156 }
157
158 /*****************************************************************************
159  * CDDAPlay: Arrange things so we play the specified track.
160  * VLC_TRUE is returned if there was no error.
161  *****************************************************************************/
162 vlc_bool_t
163 CDDAPlay( input_thread_t *p_input, int i_track )
164 {
165   cdda_data_t *p_cdda = (cdda_data_t *) p_input->p_access_data;
166
167   if( i_track >= p_cdda->i_nb_tracks || i_track < 1 )
168     return VLC_FALSE;
169
170   CDDASetArea( p_input, p_input->stream.pp_areas[i_track] );
171   return VLC_TRUE;
172 }
173
174 /*****************************************************************************
175  * CDDARead: reads from the CDDA into PES packets.
176  *****************************************************************************
177  * Returns -1 in case of error, 0 in case of EOF, otherwise the number of
178  * bytes.
179  *****************************************************************************/
180 static int CDDARead( input_thread_t * p_input, byte_t * p_buffer,
181                      size_t i_len )
182 {
183     cdda_data_t *           p_cdda;
184     int                     i_blocks;
185     int                     i_index;
186     int                     i_read;
187
188     p_cdda = (cdda_data_t *)p_input->p_access_data;
189
190     i_read = 0;
191
192     /* Compute the number of blocks we have to read */
193
194     i_blocks = i_len / CDIO_CD_FRAMESIZE_RAW;
195
196     for ( i_index = 0; i_index < i_blocks; i_index++ )
197     {
198
199       if (cdio_read_audio_sector(p_cdda->p_cddev->cdio, p_buffer,
200                                  p_cdda->i_sector) != 0)
201         {
202           msg_Err( p_input, "could not read sector %d", p_cdda->i_sector );
203           return -1;
204         }
205
206         p_cdda->i_sector ++;
207         if ( p_cdda->i_sector == p_cdda->p_sectors[p_cdda->i_track + 1] )
208         {
209             input_area_t *p_area;
210
211             dbg_print( (INPUT_DBG_LSN|INPUT_DBG_CALL),
212                        "end of track, cur: %u", p_cdda->i_sector );
213
214             /*???? if ( p_cdda->i_track >= p_cdda->i_nb_tracks - 1 )*/
215                 return 0; /* EOF */
216
217             vlc_mutex_lock( &p_input->stream.stream_lock );
218             p_area = p_input->stream.pp_areas[
219                     p_input->stream.p_selected_area->i_id + 1 ];
220
221             p_area->i_part = 1;
222             CDDASetArea( p_input, p_area );
223             vlc_mutex_unlock( &p_input->stream.stream_lock );
224         }
225         i_read += CDIO_CD_FRAMESIZE_RAW;
226     }
227
228     if ( i_len % CDIO_CD_FRAMESIZE_RAW ) /* this should not happen */
229     {
230         msg_Err( p_input, "must read full sectors" );
231     }
232
233     return i_read;
234 }
235
236 /*****************************************************************************
237  * CDDASetProgram: Does nothing since a CDDA is mono_program
238  *****************************************************************************/
239 static int CDDASetProgram( input_thread_t * p_input,
240                            pgrm_descriptor_t * p_program)
241 {
242     cdda_data_t * p_cdda= (cdda_data_t *) p_input->p_access_data;
243     dbg_print( (INPUT_DBG_CALL|INPUT_DBG_EXT), "" );
244     return 0;
245 }
246
247 /*****************************************************************************
248  * CDDASetArea: initialize input data for title x.
249  * It should be called for each user navigation request.
250  ****************************************************************************/
251 static int CDDASetArea( input_thread_t * p_input, input_area_t * p_area )
252 {
253     cdda_data_t *p_cdda = (cdda_data_t*) p_input->p_access_data;
254     vlc_value_t val;
255
256     dbg_print( (INPUT_DBG_CALL|INPUT_DBG_EXT), "");
257
258     /* we can't use the interface slider until initilization is complete */
259     p_input->stream.b_seekable = 0;
260
261     if( p_area != p_input->stream.p_selected_area )
262     {
263         /* Change the default area */
264         p_input->stream.p_selected_area = p_area;
265
266         /* Change the current track */
267         p_cdda->i_track = p_area->i_id - 1;
268         p_cdda->i_sector = p_cdda->p_sectors[p_cdda->i_track];
269
270         /* Update the navigation variables without triggering a callback */
271         val.i_int = p_area->i_id;
272         var_Change( p_input, "title", VLC_VAR_SETVALUE, &val, NULL );
273     }
274
275     p_cdda->i_sector = p_cdda->p_sectors[p_cdda->i_track];
276
277     p_input->stream.p_selected_area->i_tell =
278         (off_t)p_cdda->i_sector * (off_t)CDIO_CD_FRAMESIZE_RAW
279          - p_input->stream.p_selected_area->i_start;
280
281     /* warn interface that something has changed */
282     p_input->stream.b_seekable = 1;
283     p_input->stream.b_changed = 1;
284
285     return 0;
286 }
287
288 /****************************************************************************
289  * CDDASeek
290  ****************************************************************************/
291 static void CDDASeek( input_thread_t * p_input, off_t i_off )
292 {
293     cdda_data_t * p_cdda;
294
295     p_cdda = (cdda_data_t *) p_input->p_access_data;
296
297     p_cdda->i_sector = p_cdda->p_sectors[p_cdda->i_track]
298                        + i_off / (off_t)CDIO_CD_FRAMESIZE_RAW;
299
300     vlc_mutex_lock( &p_input->stream.stream_lock );
301     p_input->stream.p_selected_area->i_tell =
302         (off_t)p_cdda->i_sector * (off_t)CDIO_CD_FRAMESIZE_RAW
303          - p_input->stream.p_selected_area->i_start;
304
305     vlc_mutex_unlock( &p_input->stream.stream_lock );
306
307     dbg_print( (INPUT_DBG_CALL|INPUT_DBG_EXT|INPUT_DBG_SEEK),
308     "sector %ud, offset: %lld, i_tell: %lld",  p_cdda->i_sector, i_off,
309                p_input->stream.p_selected_area->i_tell );
310
311 }
312
313 #define meta_info_add_str(title, str)                          \
314   if ( str ) {                                                 \
315     dbg_print( INPUT_DBG_META, "field %s: %s\n", title, str);  \
316     input_AddInfo( p_cat, _(title), "%s", str );               \
317     playlist_AddInfo( p_playlist, -1, p_cat->psz_name,         \
318                       _(title), "%s" , str );                  \
319   }
320
321
322 static void InformationCreate( input_thread_t *p_input  )
323 {
324   cdda_data_t *p_cdda = (cdda_data_t *) p_input->p_access_data;
325   playlist_t *p_playlist = vlc_object_find( p_input, VLC_OBJECT_PLAYLIST,
326                                             FIND_PARENT );
327   input_info_category_t *p_cat;
328
329   p_cat = input_InfoCategory( p_input, "General" );
330   
331
332 #ifdef HAVE_LIBCDDB
333   if (p_cdda->i_cddb_enabled) {
334
335     meta_info_add_str( "Title", p_cdda->cddb.disc->title );
336     meta_info_add_str( "Artist", p_cdda->cddb.disc->artist );
337     meta_info_add_str( "Genre", p_cdda->cddb.disc->genre );
338     meta_info_add_str( "Extended Data", p_cdda->cddb.disc->ext_data );
339     {
340       char year[5];
341       if (p_cdda->cddb.disc->year != 0) {
342         snprintf(year, 5, "%d", p_cdda->cddb.disc->year);
343         meta_info_add_str( "Year", year );
344       }
345       if ( p_cdda->cddb.disc->discid ) {
346         input_AddInfo( p_cat, _("CDDB Disc ID"), "%x",
347                        p_cdda->cddb.disc->discid );
348       }
349
350       if ( p_cdda->cddb.disc->category != CDDB_CAT_INVALID ) {
351         input_AddInfo( p_cat, _("CDDB Disc Category"), "%s",
352                        CDDB_CATEGORY[p_cdda->cddb.disc->category] );
353       }
354
355     }
356   }
357
358 #endif /*HAVE_LIBCDDB*/
359
360   {
361     track_t i_track = p_cdda->i_nb_tracks;
362     char psz_buffer[MSTRTIME_MAX_SIZE];
363     mtime_t i_duration =
364       (p_cdda->p_sectors[i_track] - p_cdda->p_sectors[0])
365       / CDIO_CD_FRAMES_PER_SEC;
366
367     dbg_print( INPUT_DBG_META, "Duration %ld", (long int) i_duration );
368     input_AddInfo( p_cat, _("Duration"), "%s",
369                    secstotimestr( psz_buffer, i_duration ) );
370   }
371   if( p_playlist ) vlc_object_release( p_playlist );
372 }
373
374
375 #ifdef HAVE_LIBCDDB
376
377 #define free_and_dup(var, val) \
378   if (var) free(var);          \
379   if (val) var=strdup(val);
380
381
382 static void
383 GetCDDBInfo( const input_thread_t *p_input, cdda_data_t *p_cdda )
384 {
385
386   dbg_print( (INPUT_DBG_CALL|INPUT_DBG_EXT), "" );
387
388   if (config_GetInt( p_input, MODULE_STRING "-cddb-enabled" )) {
389     int i, i_matches;
390     cddb_conn_t  *conn = cddb_new();
391     const CdIo *cdio = p_cdda->p_cddev->cdio;
392
393
394     cddb_log_set_handler (uninit_log_handler);
395
396     if (!conn) {
397       msg_Warn( p_input, "unable to initialize libcddb" );
398       goto cddb_destroy;
399     }
400
401     cddb_set_email_address( conn,
402                             config_GetPsz( p_input,
403                                            MODULE_STRING "-cddb-email") );
404
405     cddb_set_server_name( conn,
406                           config_GetPsz( p_input,
407                                          MODULE_STRING "-cddb-server") );
408
409     cddb_set_server_port(conn,
410                           config_GetInt( p_input,
411                                          MODULE_STRING "-cddb-port") );
412
413     /* Set the location of the local CDDB cache directory.
414        The default location of this directory is */
415
416     if (!config_GetInt( p_input, MODULE_STRING "-cddb-enable-cache" ))
417       cddb_cache_disable(conn);
418
419     cddb_cache_set_dir(conn,
420                        config_GetPsz( p_input,
421                                       MODULE_STRING "-cddb-cachedir") );
422
423     cddb_set_timeout(conn,
424                      config_GetInt( p_input, MODULE_STRING "-cddb-timeout") );
425
426
427     if (config_GetInt( p_input, MODULE_STRING "-cddb-httpd" )) {
428       cddb_http_enable(conn);
429     } else
430       cddb_http_disable(conn);
431
432     p_cdda->cddb.disc = cddb_disc_new();
433     if (!p_cdda->cddb.disc) {
434       msg_Err( p_input, "Unable to create CDDB disc structure." );
435       goto cddb_end;
436     }
437
438     for(i = 1; i <= p_cdda->i_nb_tracks; i++) {
439       cddb_track_t *t = cddb_track_new();
440       t->frame_offset = cdio_get_track_lba(cdio, i);
441       cddb_disc_add_track(p_cdda->cddb.disc, t);
442     }
443
444     p_cdda->cddb.disc->length =
445       cdio_get_track_lba(cdio, CDIO_CDROM_LEADOUT_TRACK)
446       / CDIO_CD_FRAMES_PER_SEC;
447
448
449     if (!cddb_disc_calc_discid(p_cdda->cddb.disc)) {
450       msg_Err( p_input, "CDDB disc calc failed" );
451       goto cddb_destroy;
452     }
453
454     i_matches = cddb_query(conn, p_cdda->cddb.disc);
455     if (i_matches > 0) {
456       if (i_matches > 1)
457         msg_Warn( p_input, "Found %d matches in CDDB. Using first one.",
458                   i_matches);
459       cddb_read(conn, p_cdda->cddb.disc);
460
461       if (p_cdda->i_debug & INPUT_DBG_CDDB)
462         cddb_disc_print(p_cdda->cddb.disc);
463
464     } else {
465       msg_Warn( p_input, "CDDB error: %s", cddb_error_str(errno));
466     }
467
468   cddb_destroy:
469     cddb_destroy(conn);
470   }
471   cddb_end: ;
472 }
473 #endif /*HAVE_LIBCDDB*/
474
475 #define add_format_str_info(val)                         \
476   {                                                      \
477     const char *str = val;                               \
478     unsigned int len;                                    \
479     if (val != NULL) {                                   \
480       len=strlen(str);                                   \
481       if (len != 0) {                                    \
482         strncat(tp, str, TEMP_STR_LEN-(tp-temp_str));    \
483         tp += len;                                       \
484       }                                                  \
485       saw_control_prefix = false;                        \
486     }                                                    \
487   }
488
489 #define add_format_num_info(val, fmt)                    \
490   {                                                      \
491     char num_str[10];                                    \
492     unsigned int len;                                    \
493     sprintf(num_str, fmt, val);                          \
494     len=strlen(num_str);                                 \
495     if (len != 0) {                                      \
496       strncat(tp, num_str, TEMP_STR_LEN-(tp-temp_str));  \
497       tp += len;                                         \
498     }                                                    \
499     saw_control_prefix = false;                          \
500   }
501
502 /*!
503    Take a format string and expand escape sequences, that is sequences that
504    begin with %, with information from the current CD.
505    The expanded string is returned. Here is a list of escape sequences:
506
507    %a : The album artist **
508    %A : The album information **
509    %C : Category **
510    %I : CDDB disk ID **
511    %G : Genre **
512    %M : The current MRL
513    %m : The CD-DA Media Catalog Number (MCN)
514    %n : The number of tracks on the CD
515    %p : The artist/performer/composer in the track **
516    %T : The track number **
517    %s : Number of seconds in this track
518    %t : The name **
519    %Y : The year 19xx or 20xx **
520    %% : a %
521 */
522 static char *
523 CDDAFormatStr(const input_thread_t *p_input, cdda_data_t *p_cdda,
524               const char format_str[], const char *mrl, int i_track)
525 {
526 #define TEMP_STR_SIZE 256
527 #define TEMP_STR_LEN (TEMP_STR_SIZE-1)
528   static char    temp_str[TEMP_STR_SIZE];
529   size_t i;
530   char * tp = temp_str;
531   bool saw_control_prefix = false;
532   size_t format_len = strlen(format_str);
533
534   bzero(temp_str, TEMP_STR_SIZE);
535
536   for (i=0; i<format_len; i++) {
537
538     if (!saw_control_prefix && format_str[i] != '%') {
539       *tp++ = format_str[i];
540       saw_control_prefix = false;
541       continue;
542     }
543
544     switch(format_str[i]) {
545     case '%':
546       if (saw_control_prefix) {
547         *tp++ = '%';
548       }
549       saw_control_prefix = !saw_control_prefix;
550       break;
551 #ifdef HAVE_LIBCDDB
552     case 'a':
553       if (!p_cdda->i_cddb_enabled) goto not_special;
554       add_format_str_info(p_cdda->cddb.disc->artist);
555       break;
556     case 'A':
557       if (!p_cdda->i_cddb_enabled) goto not_special;
558       add_format_str_info(p_cdda->cddb.disc->title);
559       break;
560     case 'C':
561       if (!p_cdda->i_cddb_enabled) goto not_special;
562       add_format_str_info(CDDB_CATEGORY[p_cdda->cddb.disc->category]);
563       break;
564     case 'G':
565       if (!p_cdda->i_cddb_enabled) goto not_special;
566       add_format_str_info(p_cdda->cddb.disc->genre);
567       break;
568     case 'I':
569       if (!p_cdda->i_cddb_enabled) goto not_special;
570       add_format_num_info(p_cdda->cddb.disc->discid, "%x");
571       break;
572     case 'Y':
573       if (!p_cdda->i_cddb_enabled) goto not_special;
574       add_format_num_info(p_cdda->cddb.disc->year, "%5d");
575       break;
576     case 't':
577       if (p_cdda->i_cddb_enabled) {
578         cddb_track_t *t=cddb_disc_get_track(p_cdda->cddb.disc,
579                                             i_track-1);
580         if (t != NULL && t->title != NULL)
581           add_format_str_info(t->title);
582       } else goto not_special;
583       break;
584     case 'p':
585       if (p_cdda->i_cddb_enabled) {
586         cddb_track_t *t=cddb_disc_get_track(p_cdda->cddb.disc,
587                                             i_track-1);
588         if (t != NULL && t->artist != NULL)
589           add_format_str_info(t->artist);
590       } else goto not_special;
591       break;
592 #endif
593
594     case 'M':
595       add_format_str_info(mrl);
596       break;
597
598 #if FINISHED
599     case 'm':
600       add_format_str_info(p_cdda->mcn);
601       break;
602 #endif
603
604     case 'n':
605       add_format_num_info(p_cdda->i_nb_tracks, "%d");
606       break;
607
608 #ifdef HAVE_LIBCDDB
609     case 's':
610       if (p_cdda->i_cddb_enabled) {
611         char psz_buffer[MSTRTIME_MAX_SIZE];
612         mtime_t i_duration =
613           (p_cdda->p_sectors[i_track] - p_cdda->p_sectors[i_track-1])
614           / CDIO_CD_FRAMES_PER_SEC;
615         add_format_str_info(secstotimestr( psz_buffer, i_duration ) );
616       } else goto not_special;
617       break;
618 #endif
619
620     case 'T':
621       add_format_num_info(i_track, "%02d");
622       break;
623 #ifdef HAVE_LIBCDDB
624     not_special:
625 #endif
626     default:
627       *tp++ = '%';
628       *tp++ = format_str[i];
629       saw_control_prefix = false;
630     }
631   }
632   return strdup(temp_str);
633 }
634
635 static void
636 CDDACreatePlayListItem(const input_thread_t *p_input, cdda_data_t *p_cdda,
637                        playlist_t *p_playlist, unsigned int i_track,
638                        char *psz_mrl, int psz_mrl_max,
639                        const char *psz_source, int playlist_operation,
640                        int i_pos)
641 {
642   mtime_t i_duration =
643     (p_cdda->p_sectors[i_track] - p_cdda->p_sectors[i_track-1])
644     / CDIO_CD_FRAMES_PER_SEC;
645   char *p_author;
646   char *p_title;
647   char *config_varname = MODULE_STRING "-title-format";
648
649 #ifdef HAVE_LIBCDDB
650   if (p_cdda->i_cddb_enabled) {
651     config_varname = MODULE_STRING "-cddb-title-format";
652   }
653 #endif
654
655   snprintf(psz_mrl, psz_mrl_max, "%s%s@T%u",
656            CDDA_MRL_PREFIX, psz_source, i_track);
657
658   p_title = CDDAFormatStr(p_input, p_cdda,
659                           config_GetPsz( p_input, config_varname ),
660                           psz_mrl, i_track);
661
662   dbg_print( INPUT_DBG_META, "mrl: %s, title: %s, duration, %ld, pos %d",
663              psz_mrl, p_title, (long int) i_duration, i_pos );
664   playlist_Add( p_playlist, psz_mrl, p_title, playlist_operation, i_pos );
665
666   /* XXX Set the duration ! */
667
668   p_author =
669     CDDAFormatStr( p_input, p_cdda,
670                    config_GetPsz( p_input, MODULE_STRING "-author-format" ),
671                    psz_mrl, i_track );
672
673   if( i_pos == PLAYLIST_END ) i_pos = p_playlist->i_size - 1;
674   playlist_AddInfo( p_playlist, i_pos, _("General"),_("Author"),p_author);
675
676 }
677
678 static int
679 CDDAFixupPlayList( input_thread_t *p_input, cdda_data_t *p_cdda,
680                    const char *psz_source, bool play_single_track)
681 {
682   int i;
683   playlist_t * p_playlist;
684   char       * psz_mrl;
685   unsigned int psz_mrl_max = strlen(CDDA_MRL_PREFIX) + strlen(psz_source) +
686     strlen("@T") + strlen("100") + 1;
687
688 #ifdef HAVE_LIBCDDB
689   p_cdda->i_cddb_enabled =
690     config_GetInt( p_input, MODULE_STRING "-cddb-enabled" );
691   if( play_single_track && !p_cdda->i_cddb_enabled ) return 0;
692 #else
693   if( play_single_track ) return 0;
694 #endif
695
696
697   psz_mrl = malloc( psz_mrl_max );
698
699   if( psz_mrl == NULL )
700     {
701       msg_Warn( p_input, "out of memory" );
702       return -1;
703     }
704
705   p_playlist = (playlist_t *) vlc_object_find( p_input, VLC_OBJECT_PLAYLIST,
706                                                FIND_ANYWHERE );
707   if( !p_playlist )
708     {
709       msg_Warn( p_input, "can't find playlist" );
710       free(psz_mrl);
711       return -1;
712     }
713
714 #ifdef HAVE_LIBCDDB
715   if (p_cdda->i_cddb_enabled)
716     GetCDDBInfo(p_input, p_cdda);
717   else
718     p_cdda->cddb.disc = NULL;
719 #endif
720
721   InformationCreate(p_input);
722
723   if (play_single_track) {
724     /* May fill out more information when the playlist user interface becomes
725        more mature.
726      */
727     CDDACreatePlayListItem(p_input, p_cdda, p_playlist, p_cdda->i_track+1,
728                            psz_mrl, psz_mrl_max, psz_source, PLAYLIST_REPLACE,
729                            p_playlist->i_index);
730   } else {
731
732     playlist_Delete( p_playlist, p_playlist->i_index);
733
734     for( i = 1 ; i <= p_cdda->i_nb_tracks ; i++ )
735       {
736         CDDACreatePlayListItem(p_input, p_cdda, p_playlist, i, psz_mrl,
737                                psz_mrl_max, psz_source, PLAYLIST_APPEND,
738                                PLAYLIST_END);
739
740       }
741
742     playlist_Command( p_playlist, PLAYLIST_GOTO, 0 );
743
744   }
745
746   vlc_object_release( p_playlist );
747   free(psz_mrl);
748   return 0;
749 }
750
751 /****************************************************************************
752  * Public functions
753  ****************************************************************************/
754 int
755 E_(DebugCB)   ( vlc_object_t *p_this, const char *psz_name,
756                 vlc_value_t oldval, vlc_value_t val, void *p_data )
757 {
758   cdda_data_t *p_cdda;
759
760   if (NULL == p_cdda_input) return VLC_EGENERIC;
761
762   p_cdda = (cdda_data_t *)p_cdda_input->p_access_data;
763
764   if (p_cdda->i_debug & (INPUT_DBG_CALL|INPUT_DBG_EXT)) {
765     msg_Dbg( p_cdda_input, "Old debug (x%0x) %d, new debug (x%0x) %d",
766              p_cdda->i_debug, p_cdda->i_debug, val.i_int, val.i_int);
767   }
768   p_cdda->i_debug = val.i_int;
769   return VLC_SUCCESS;
770 }
771
772 int
773 E_(CDDBEnabledCB)   ( vlc_object_t *p_this, const char *psz_name,
774                       vlc_value_t oldval, vlc_value_t val, void *p_data )
775 {
776   cdda_data_t *p_cdda;
777
778   if (NULL == p_cdda_input) return VLC_EGENERIC;
779
780   p_cdda = (cdda_data_t *)p_cdda_input->p_access_data;
781
782 #ifdef HAVE_LIBCDDB
783   if (p_cdda->i_debug & (INPUT_DBG_CALL|INPUT_DBG_EXT)) {
784     msg_Dbg( p_cdda_input, "Old CDDB Enabled (x%0x) %d, new (x%0x) %d",
785              p_cdda->i_cddb_enabled, p_cdda->i_cddb_enabled,
786              val.i_int, val.i_int);
787   }
788   p_cdda->i_cddb_enabled = val.i_int;
789 #endif
790   return VLC_SUCCESS;
791 }
792
793 /*FIXME*/
794 #if PLAYLIST_INTERFACE_IS_FIXED
795 int
796 E_(TitleFormatCB)   ( vlc_object_t *p_this, const char *psz_name,
797                       vlc_value_t oldval, vlc_value_t val, void *p_data )
798 {
799   cdda_data_t *p_cdda;
800
801   if (NULL == p_cdda_input) return VLC_EGENERIC;
802
803   p_cdda = (cdda_data_t *)p_cdda_input->p_access_data;
804
805   if (p_cdda->i_debug & (INPUT_DBG_CALL|INPUT_DBG_EXT)) {
806     msg_Dbg( p_cdda_input, "Old CDDB Enabled (%s), new (%s)",
807              oldval.psz_string, val.psz_string);
808   }
809   ????
810   return VLC_SUCCESS;
811 }
812 #endif
813
814 /*****************************************************************************
815  * Open: open cdda
816  *****************************************************************************/
817 int
818 E_(Open)( vlc_object_t *p_this )
819 {
820     input_thread_t *        p_input = (input_thread_t *)p_this;
821     char *                  psz_orig;
822     char *                  psz_parser;
823     char *                  psz_source;
824     cdda_data_t *           p_cdda;
825     int                     i;
826     int                     i_track = 1;
827     cddev_t                 *p_cddev;
828     bool                    play_single_track = false;
829
830     /* Set where to log errors messages from libcdio. */
831     p_cdda_input = (input_thread_t *)p_this;
832
833     /* parse the options passed in command line : */
834     psz_orig = psz_parser = psz_source = strdup( p_input->psz_name );
835
836     if( !psz_orig )
837     {
838         return( -1 );
839     }
840
841     while( *psz_parser && *psz_parser != '@' )
842     {
843         psz_parser++;
844     }
845
846     if( *psz_parser == '@' )
847     {
848         /* Found options */
849         *psz_parser = '\0';
850         ++psz_parser;
851
852         if ('T' == *psz_parser || 't' == *psz_parser )
853             ++psz_parser;
854
855         i_track = (int)strtol( psz_parser, NULL, 10 );
856         i_track = i_track ? i_track : 1;
857         play_single_track = true;
858     }
859
860     if( !*psz_source ) {
861       /* No source specified, so figure it out. */
862       if( !p_input->psz_access ) {
863         free( psz_orig );
864         return -1;
865       }
866       psz_source = config_GetPsz( p_input, "cd-audio" );
867
868       if( !psz_source || 0==strlen(psz_source) ) {
869         /* Scan for a CD-ROM drive with a CD-DA in it. */
870         char **cd_drives =
871           cdio_get_devices_with_cap(NULL,  CDIO_FS_AUDIO, false);
872         if (NULL == cd_drives) return -1;
873         if (cd_drives[0] == NULL) {
874           cdio_free_device_list(cd_drives);
875           return -1;
876         }
877         psz_source = strdup(cd_drives[0]);
878         cdio_free_device_list(cd_drives);
879       }
880     }
881
882     /* Open CDDA */
883     cdio_log_set_handler ( cdio_log_handler );
884 #ifdef HAVE_LIBCDDB
885     cddb_log_set_handler ( cddb_log_handler );
886 #endif
887
888     if( !(p_cddev = ioctl_Open( p_this, psz_source )) )
889     {
890         msg_Warn( p_input, "could not open %s", psz_source );
891         free( psz_source );
892         return -1;
893     }
894
895     p_cdda = malloc( sizeof(cdda_data_t) );
896     if( p_cdda == NULL )
897     {
898         msg_Err( p_input, "out of memory" );
899         free( psz_source );
900         return -1;
901     }
902
903     p_cdda->p_cddev        = p_cddev;
904     p_cdda->i_debug        = config_GetInt( p_this, MODULE_STRING "-debug" );
905     p_input->p_access_data = (void *)p_cdda;
906
907     dbg_print( (INPUT_DBG_CALL|INPUT_DBG_EXT), "%s", psz_source );
908
909     p_input->i_mtu = CDDA_DATA_ONCE;
910
911     /* We read the Table Of Content information */
912     p_cdda->i_nb_tracks = ioctl_GetTracksMap( VLC_OBJECT(p_input),
913                               p_cdda->p_cddev->cdio, &p_cdda->p_sectors );
914     if( p_cdda->i_nb_tracks < 0 )
915         msg_Err( p_input, "unable to count tracks" );
916     else if( p_cdda->i_nb_tracks <= 0 )
917         msg_Err( p_input, "no audio tracks found" );
918
919     if( p_cdda->i_nb_tracks <= 1)
920     {
921         ioctl_Close( p_cdda->p_cddev );
922         free( p_cdda );
923         free( psz_source );
924         return -1;
925     }
926
927     if( i_track >= p_cdda->i_nb_tracks || i_track < 1 )
928         i_track = 1;
929
930     /* Set stream and area data */
931     vlc_mutex_lock( &p_input->stream.stream_lock );
932
933     /* Initialize ES structures */
934     input_InitStream( p_input, 0 );
935
936     /* cdda input method */
937     p_input->stream.i_method = INPUT_METHOD_CDDA;
938
939     p_input->stream.b_pace_control = 1;
940     p_input->stream.b_seekable = 1;
941     p_input->stream.i_mux_rate = 44100 * 4 / 50;
942
943 #define area p_input->stream.pp_areas
944     for( i = 1 ; i <= p_cdda->i_nb_tracks ; i++ )
945     {
946         input_AddArea( p_input, i, 1 );
947
948         /* Absolute start offset and size */
949         area[i]->i_start =
950             (off_t)p_cdda->p_sectors[i-1] * (off_t)CDIO_CD_FRAMESIZE_RAW;
951         area[i]->i_size =
952             (off_t)(p_cdda->p_sectors[i] - p_cdda->p_sectors[i-1])
953             * (off_t)CDIO_CD_FRAMESIZE_RAW;
954     }
955 #undef area
956
957     CDDAPlay( p_input, i_track);
958
959     CDDAFixupPlayList(p_input, p_cdda, psz_source, play_single_track);
960
961     vlc_mutex_unlock( &p_input->stream.stream_lock );
962
963     if( !p_input->psz_demux || !*p_input->psz_demux )
964     {
965         p_input->psz_demux = "cdda";
966     }
967
968     p_input->pf_read = CDDARead;
969     p_input->pf_seek = CDDASeek;
970     p_input->pf_set_area = CDDASetArea;
971     p_input->pf_set_program = CDDASetProgram;
972
973     /* Update default_pts to a suitable value for cdda access */
974     p_input->i_pts_delay = config_GetInt( p_input,
975                                           MODULE_STRING "-caching" ) * 1000;
976
977     free( psz_source );
978
979     return 0;
980 }
981
982 /*****************************************************************************
983  * CDDAClose: closes cdda
984  *****************************************************************************/
985 void
986 E_(Close)( vlc_object_t *p_this )
987 {
988     input_thread_t *   p_input = (input_thread_t *)p_this;
989     cdda_data_t *p_cdda = (cdda_data_t *)p_input->p_access_data;
990
991     dbg_print( (INPUT_DBG_CALL|INPUT_DBG_EXT), "" );
992     ioctl_Close( p_cdda->p_cddev );
993
994     cdio_log_set_handler (uninit_log_handler);
995
996 #ifdef HAVE_LIBCDDB
997     cddb_log_set_handler (uninit_log_handler);
998     if (p_cdda->i_cddb_enabled)
999       cddb_disc_destroy(p_cdda->cddb.disc);
1000 #endif
1001
1002     free( p_cdda );
1003     p_cdda_input = NULL;
1004 }