Cosmetics.
[vlc.git] / modules / access / vcd / cdrom.c
1 /****************************************************************************
2  * cdrom.c: cdrom tools
3  *****************************************************************************
4  * Copyright (C) 1998-2001 the VideoLAN team
5  * $Id$
6  *
7  * Authors: Johan Bilien <jobi@via.ecp.fr>
8  *          Gildas Bazin <gbazin@netcourrier.com>
9  *          Jon Lech Johansen <jon-vl@nanocrew.net>
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 #ifdef HAVE_CONFIG_H
30 # include "config.h"
31 #endif
32
33 #include <vlc_common.h>
34 #include <vlc_access.h>
35
36 #ifdef HAVE_UNISTD_H
37 #   include <unistd.h>
38 #endif
39
40 #include <errno.h>
41 #ifdef HAVE_SYS_TYPES_H
42 #   include <sys/types.h>
43 #endif
44 #ifdef HAVE_SYS_STAT_H
45 #   include <sys/stat.h>
46 #endif
47 #ifdef HAVE_FCNTL_H
48 #   include <fcntl.h>
49 #endif
50
51 #if defined( SYS_BSDI )
52 #   include <dvd.h>
53 #elif defined ( __APPLE__ )
54 #   include <CoreFoundation/CFBase.h>
55 #   include <IOKit/IOKitLib.h>
56 #   include <IOKit/storage/IOCDTypes.h>
57 #   include <IOKit/storage/IOCDMedia.h>
58 #   include <IOKit/storage/IOCDMediaBSDClient.h>
59 #elif defined( HAVE_SCSIREQ_IN_SYS_SCSIIO_H )
60 #   include <sys/inttypes.h>
61 #   include <sys/cdio.h>
62 #   include <sys/scsiio.h>
63 #elif defined( HAVE_IOC_TOC_HEADER_IN_SYS_CDIO_H )
64 #   include <sys/cdio.h>
65 #   include <sys/cdrio.h>
66 #elif defined( WIN32 )
67 #   include <windows.h>
68 #   include <winioctl.h>
69 #elif defined (__linux__)
70 #   include <sys/ioctl.h>
71 #   include <linux/cdrom.h>
72 #else
73 #   error FIXME
74 #endif
75
76 #include "cdrom_internals.h"
77 #include "cdrom.h"
78 #include <vlc_charset.h>
79
80 /*****************************************************************************
81  * ioctl_Open: Opens a VCD device or file and returns an opaque handle
82  *****************************************************************************/
83 vcddev_t *ioctl_Open( vlc_object_t *p_this, const char *psz_dev )
84 {
85     int i_ret;
86     int b_is_file;
87     vcddev_t *p_vcddev;
88 #ifndef WIN32
89     struct stat fileinfo;
90 #endif
91
92     if( !psz_dev ) return NULL;
93
94     /*
95      *  Initialize structure with default values
96      */
97     p_vcddev = malloc( sizeof(*p_vcddev) );
98     if( p_vcddev == NULL )
99         return NULL;
100     p_vcddev->i_vcdimage_handle = -1;
101     p_vcddev->psz_dev = NULL;
102     b_is_file = 1;
103
104     /*
105      *  Check if we are dealing with a device or a file (vcd image)
106      */
107 #ifdef WIN32
108     if( (strlen( psz_dev ) == 2 && psz_dev[1] == ':') )
109     {
110         b_is_file = 0;
111     }
112
113 #else
114     if( stat( psz_dev, &fileinfo ) < 0 )
115     {
116         free( p_vcddev );
117         return NULL;
118     }
119
120     /* Check if this is a block/char device */
121     if( S_ISBLK( fileinfo.st_mode ) || S_ISCHR( fileinfo.st_mode ) )
122         b_is_file = 0;
123 #endif
124
125     if( b_is_file )
126     {
127         i_ret = OpenVCDImage( p_this, psz_dev, p_vcddev );
128     }
129     else
130     {
131         /*
132          *  open the vcd device
133          */
134
135 #ifdef WIN32
136         i_ret = win32_vcd_open( p_this, psz_dev, p_vcddev );
137 #else
138         p_vcddev->i_device_handle = -1;
139         p_vcddev->i_device_handle = open( psz_dev, O_RDONLY | O_NONBLOCK );
140         i_ret = (p_vcddev->i_device_handle == -1) ? -1 : 0;
141 #endif
142     }
143
144     if( i_ret == 0 )
145     {
146         p_vcddev->psz_dev = (char *)strdup( psz_dev );
147     }
148     else
149     {
150         free( p_vcddev );
151         p_vcddev = NULL;
152     }
153
154     return p_vcddev;
155 }
156
157 /*****************************************************************************
158  * ioctl_Close: Closes an already opened VCD device or file.
159  *****************************************************************************/
160 void ioctl_Close( vlc_object_t * p_this, vcddev_t *p_vcddev )
161 {
162     free( p_vcddev->psz_dev );
163
164     if( p_vcddev->i_vcdimage_handle != -1 )
165     {
166         /*
167          *  vcd image mode
168          */
169
170         CloseVCDImage( p_this, p_vcddev );
171         return;
172     }
173
174     /*
175      *  vcd device mode
176      */
177
178 #ifdef WIN32
179     if( p_vcddev->h_device_handle )
180         CloseHandle( p_vcddev->h_device_handle );
181     if( p_vcddev->hASPI )
182         FreeLibrary( (HMODULE)p_vcddev->hASPI );
183 #else
184     if( p_vcddev->i_device_handle != -1 )
185         close( p_vcddev->i_device_handle );
186 #endif
187     free( p_vcddev );
188 }
189
190 /*****************************************************************************
191  * ioctl_GetTracksMap: Read the Table of Content, fill in the pp_sectors map
192  *                     if pp_sectors is not null and return the number of
193  *                     tracks available.
194  *****************************************************************************/
195 int ioctl_GetTracksMap( vlc_object_t *p_this, const vcddev_t *p_vcddev,
196                         int **pp_sectors )
197 {
198     int i_tracks = 0;
199
200     if( p_vcddev->i_vcdimage_handle != -1 )
201     {
202         /*
203          *  vcd image mode
204          */
205
206         i_tracks = p_vcddev->i_tracks;
207
208         if( pp_sectors )
209         {
210             *pp_sectors = malloc( (i_tracks + 1) * sizeof(**pp_sectors) );
211             if( *pp_sectors == NULL )
212                 return 0;
213             memcpy( *pp_sectors, p_vcddev->p_sectors,
214                     (i_tracks + 1) * sizeof(**pp_sectors) );
215         }
216
217         return i_tracks;
218     }
219     else
220     {
221
222         /*
223          *  vcd device mode
224          */
225
226 #if defined( __APPLE__ )
227
228         CDTOC *pTOC;
229         int i_descriptors;
230
231         if( ( pTOC = darwin_getTOC( p_this, p_vcddev ) ) == NULL )
232         {
233             msg_Err( p_this, "failed to get the TOC" );
234             return 0;
235         }
236
237         i_descriptors = CDTOCGetDescriptorCount( pTOC );
238         i_tracks = darwin_getNumberOfTracks( pTOC, i_descriptors );
239
240         if( pp_sectors )
241         {
242             int i, i_leadout = -1;
243             CDTOCDescriptor *pTrackDescriptors;
244             u_char track;
245
246             *pp_sectors = malloc( (i_tracks + 1) * sizeof(**pp_sectors) );
247             if( *pp_sectors == NULL )
248             {
249                 darwin_freeTOC( pTOC );
250                 return 0;
251             }
252
253             pTrackDescriptors = pTOC->descriptors;
254
255             for( i_tracks = 0, i = 0; i < i_descriptors; i++ )
256             {
257                 track = pTrackDescriptors[i].point;
258
259                 if( track == 0xA2 )
260                     i_leadout = i;
261
262                 if( track > CD_MAX_TRACK_NO || track < CD_MIN_TRACK_NO )
263                     continue;
264
265                 (*pp_sectors)[i_tracks++] =
266                     CDConvertMSFToLBA( pTrackDescriptors[i].p );
267             }
268
269             if( i_leadout == -1 )
270             {
271                 msg_Err( p_this, "leadout not found" );
272                 free( *pp_sectors );
273                 darwin_freeTOC( pTOC );
274                 return 0;
275             }
276
277             /* set leadout sector */
278             (*pp_sectors)[i_tracks] =
279                 CDConvertMSFToLBA( pTrackDescriptors[i_leadout].p );
280         }
281
282         darwin_freeTOC( pTOC );
283
284 #elif defined( WIN32 )
285         if( p_vcddev->hASPI )
286         {
287             HANDLE hEvent;
288             struct SRB_ExecSCSICmd ssc;
289             uint8_t p_tocheader[ 4 ];
290
291             /* Create the transfer completion event */
292             hEvent = CreateEvent( NULL, TRUE, FALSE, NULL );
293             if( hEvent == NULL )
294             {
295                 return -1;
296             }
297
298             memset( &ssc, 0, sizeof( ssc ) );
299
300             ssc.SRB_Cmd         = SC_EXEC_SCSI_CMD;
301             ssc.SRB_Flags       = SRB_DIR_IN | SRB_EVENT_NOTIFY;
302             ssc.SRB_HaId        = LOBYTE( p_vcddev->i_sid );
303             ssc.SRB_Target      = HIBYTE( p_vcddev->i_sid );
304             ssc.SRB_SenseLen    = SENSE_LEN;
305
306             ssc.SRB_PostProc = (LPVOID) hEvent;
307             ssc.SRB_CDBLen      = 10;
308
309             /* Operation code */
310             ssc.CDBByte[ 0 ] = READ_TOC;
311
312             /* Format */
313             ssc.CDBByte[ 2 ] = READ_TOC_FORMAT_TOC;
314
315             /* Starting track */
316             ssc.CDBByte[ 6 ] = 0;
317
318             /* Allocation length and buffer */
319             ssc.SRB_BufLen = sizeof( p_tocheader );
320             ssc.SRB_BufPointer  = p_tocheader;
321             ssc.CDBByte[ 7 ] = ( ssc.SRB_BufLen >>  8 ) & 0xff;
322             ssc.CDBByte[ 8 ] = ( ssc.SRB_BufLen       ) & 0xff;
323
324             /* Initiate transfer */
325             ResetEvent( hEvent );
326             p_vcddev->lpSendCommand( (void*) &ssc );
327
328             /* If the command has still not been processed, wait until it's
329              * finished */
330             if( ssc.SRB_Status == SS_PENDING )
331                 WaitForSingleObject( hEvent, INFINITE );
332
333             /* check that the transfer went as planned */
334             if( ssc.SRB_Status != SS_COMP )
335             {
336                 CloseHandle( hEvent );
337                 return 0;
338             }
339
340             i_tracks = p_tocheader[3] - p_tocheader[2] + 1;
341
342             if( pp_sectors )
343             {
344                 int i, i_toclength;
345                 uint8_t *p_fulltoc;
346
347                 i_toclength = 4 /* header */ + p_tocheader[0] +
348                               ((unsigned int)p_tocheader[1] << 8);
349
350                 p_fulltoc = malloc( i_toclength );
351                 *pp_sectors = malloc( (i_tracks + 1) * sizeof(**pp_sectors) );
352
353                 if( *pp_sectors == NULL || p_fulltoc == NULL )
354                 {
355                     free( *pp_sectors );
356                     free( p_fulltoc );
357                     CloseHandle( hEvent );
358                     return 0;
359                 }
360
361                 /* Allocation length and buffer */
362                 ssc.SRB_BufLen = i_toclength;
363                 ssc.SRB_BufPointer  = p_fulltoc;
364                 ssc.CDBByte[ 7 ] = ( ssc.SRB_BufLen >>  8 ) & 0xff;
365                 ssc.CDBByte[ 8 ] = ( ssc.SRB_BufLen       ) & 0xff;
366
367                 /* Initiate transfer */
368                 ResetEvent( hEvent );
369                 p_vcddev->lpSendCommand( (void*) &ssc );
370
371                 /* If the command has still not been processed, wait until it's
372                  * finished */
373                 if( ssc.SRB_Status == SS_PENDING )
374                     WaitForSingleObject( hEvent, INFINITE );
375
376                 /* check that the transfer went as planned */
377                 if( ssc.SRB_Status != SS_COMP )
378                     i_tracks = 0;
379
380                 for( i = 0 ; i <= i_tracks ; i++ )
381                 {
382                     int i_index = 8 + 8 * i;
383                     (*pp_sectors)[ i ] = ((int)p_fulltoc[ i_index ] << 24) +
384                                          ((int)p_fulltoc[ i_index+1 ] << 16) +
385                                          ((int)p_fulltoc[ i_index+2 ] << 8) +
386                                          (int)p_fulltoc[ i_index+3 ];
387
388                     msg_Dbg( p_this, "p_sectors: %i, %i", i, (*pp_sectors)[i]);
389                 }
390
391                 free( p_fulltoc );
392             }
393
394             CloseHandle( hEvent );
395
396         }
397         else
398         {
399             DWORD dwBytesReturned;
400             CDROM_TOC cdrom_toc;
401
402             if( DeviceIoControl( p_vcddev->h_device_handle,
403                                  IOCTL_CDROM_READ_TOC,
404                                  NULL, 0, &cdrom_toc, sizeof(CDROM_TOC),
405                                  &dwBytesReturned, NULL ) == 0 )
406             {
407                 msg_Err( p_this, "could not read TOCHDR" );
408                 return 0;
409             }
410
411             i_tracks = cdrom_toc.LastTrack - cdrom_toc.FirstTrack + 1;
412
413             if( pp_sectors )
414             {
415                 int i;
416
417                 *pp_sectors = malloc( (i_tracks + 1) * sizeof(**pp_sectors) );
418                 if( *pp_sectors == NULL )
419                     return 0;
420
421                 for( i = 0 ; i <= i_tracks ; i++ )
422                 {
423                     (*pp_sectors)[ i ] = MSF_TO_LBA2(
424                                            cdrom_toc.TrackData[i].Address[1],
425                                            cdrom_toc.TrackData[i].Address[2],
426                                            cdrom_toc.TrackData[i].Address[3] );
427                     msg_Dbg( p_this, "p_sectors: %i, %i", i, (*pp_sectors)[i]);
428                 }
429             }
430         }
431
432 #elif defined( HAVE_IOC_TOC_HEADER_IN_SYS_CDIO_H ) \
433        || defined( HAVE_SCSIREQ_IN_SYS_SCSIIO_H )
434         struct ioc_toc_header tochdr;
435         struct ioc_read_toc_entry toc_entries;
436
437         if( ioctl( p_vcddev->i_device_handle, CDIOREADTOCHEADER, &tochdr )
438             == -1 )
439         {
440             msg_Err( p_this, "could not read TOCHDR" );
441             return 0;
442         }
443
444         i_tracks = tochdr.ending_track - tochdr.starting_track + 1;
445
446         if( pp_sectors )
447         {
448              int i;
449
450              *pp_sectors = malloc( (i_tracks + 1) * sizeof(**pp_sectors) );
451              if( *pp_sectors == NULL )
452                  return 0;
453
454              toc_entries.address_format = CD_LBA_FORMAT;
455              toc_entries.starting_track = 0;
456              toc_entries.data_len = ( i_tracks + 1 ) *
457                                         sizeof( struct cd_toc_entry );
458              toc_entries.data = (struct cd_toc_entry *)
459                                     malloc( toc_entries.data_len );
460              if( toc_entries.data == NULL )
461              {
462                  free( *pp_sectors );
463                  return 0;
464              }
465
466              /* Read the TOC */
467              if( ioctl( p_vcddev->i_device_handle, CDIOREADTOCENTRYS,
468                         &toc_entries ) == -1 )
469              {
470                  msg_Err( p_this, "could not read the TOC" );
471                  free( *pp_sectors );
472                  free( toc_entries.data );
473                  return 0;
474              }
475
476              /* Fill the p_sectors structure with the track/sector matches */
477              for( i = 0 ; i <= i_tracks ; i++ )
478              {
479 #if defined( HAVE_SCSIREQ_IN_SYS_SCSIIO_H )
480                  /* FIXME: is this ok? */
481                  (*pp_sectors)[ i ] = toc_entries.data[i].addr.lba;
482 #else
483                  (*pp_sectors)[ i ] = ntohl( toc_entries.data[i].addr.lba );
484 #endif
485              }
486         }
487 #else
488         struct cdrom_tochdr   tochdr;
489         struct cdrom_tocentry tocent;
490
491         /* First we read the TOC header */
492         if( ioctl( p_vcddev->i_device_handle, CDROMREADTOCHDR, &tochdr )
493             == -1 )
494         {
495             msg_Err( p_this, "could not read TOCHDR" );
496             return 0;
497         }
498
499         i_tracks = tochdr.cdth_trk1 - tochdr.cdth_trk0 + 1;
500
501         if( pp_sectors )
502         {
503             int i;
504
505             *pp_sectors = malloc( (i_tracks + 1) * sizeof(**pp_sectors) );
506             if( *pp_sectors == NULL )
507                 return 0;
508
509             /* Fill the p_sectors structure with the track/sector matches */
510             for( i = 0 ; i <= i_tracks ; i++ )
511             {
512                 tocent.cdte_format = CDROM_LBA;
513                 tocent.cdte_track =
514                     ( i == i_tracks ) ? CDROM_LEADOUT : tochdr.cdth_trk0 + i;
515
516                 if( ioctl( p_vcddev->i_device_handle, CDROMREADTOCENTRY,
517                            &tocent ) == -1 )
518                 {
519                     msg_Err( p_this, "could not read TOCENTRY" );
520                     free( *pp_sectors );
521                     return 0;
522                 }
523
524                 (*pp_sectors)[ i ] = tocent.cdte_addr.lba;
525             }
526         }
527 #endif
528
529         return i_tracks;
530     }
531 }
532
533 /****************************************************************************
534  * ioctl_ReadSector: Read VCD or CDDA sectors
535  ****************************************************************************/
536 int ioctl_ReadSectors( vlc_object_t *p_this, const vcddev_t *p_vcddev,
537                        int i_sector, uint8_t *p_buffer, int i_nb, int i_type )
538 {
539     uint8_t *p_block;
540     int i;
541
542     if( i_type == VCD_TYPE )
543         p_block = malloc( VCD_SECTOR_SIZE * i_nb );
544     else
545         p_block = p_buffer;
546
547     if( p_vcddev->i_vcdimage_handle != -1 )
548     {
549         /*
550          *  vcd image mode
551          */
552         if( lseek( p_vcddev->i_vcdimage_handle, i_sector * VCD_SECTOR_SIZE,
553                    SEEK_SET ) == -1 )
554         {
555             msg_Err( p_this, "Could not lseek to sector %d", i_sector );
556             if( i_type == VCD_TYPE ) free( p_block );
557             return -1;
558         }
559
560         if( read( p_vcddev->i_vcdimage_handle, p_block, VCD_SECTOR_SIZE * i_nb)
561             == -1 )
562         {
563             msg_Err( p_this, "Could not read sector %d", i_sector );
564             if( i_type == VCD_TYPE ) free( p_block );
565             return -1;
566         }
567
568     }
569     else
570     {
571
572         /*
573          *  vcd device mode
574          */
575
576 #if defined( __APPLE__ )
577         dk_cd_read_t cd_read;
578
579         memset( &cd_read, 0, sizeof(cd_read) );
580
581         cd_read.offset = i_sector * VCD_SECTOR_SIZE;
582         cd_read.sectorArea = kCDSectorAreaSync | kCDSectorAreaHeader |
583                              kCDSectorAreaSubHeader | kCDSectorAreaUser |
584                              kCDSectorAreaAuxiliary;
585         cd_read.sectorType = kCDSectorTypeUnknown;
586
587         cd_read.buffer = p_block;
588         cd_read.bufferLength = VCD_SECTOR_SIZE * i_nb;
589
590         if( ioctl( p_vcddev->i_device_handle, DKIOCCDREAD, &cd_read ) == -1 )
591         {
592             msg_Err( p_this, "could not read block %d", i_sector );
593             if( i_type == VCD_TYPE ) free( p_block );
594             return -1;
595         }
596
597 #elif defined( WIN32 )
598         if( p_vcddev->hASPI )
599         {
600             HANDLE hEvent;
601             struct SRB_ExecSCSICmd ssc;
602
603             /* Create the transfer completion event */
604             hEvent = CreateEvent( NULL, TRUE, FALSE, NULL );
605             if( hEvent == NULL )
606             {
607                 if( i_type == VCD_TYPE ) free( p_block );
608                 return -1;
609             }
610
611             memset( &ssc, 0, sizeof( ssc ) );
612
613             ssc.SRB_Cmd         = SC_EXEC_SCSI_CMD;
614             ssc.SRB_Flags       = SRB_DIR_IN | SRB_EVENT_NOTIFY;
615             ssc.SRB_HaId        = LOBYTE( p_vcddev->i_sid );
616             ssc.SRB_Target      = HIBYTE( p_vcddev->i_sid );
617             ssc.SRB_SenseLen    = SENSE_LEN;
618
619             ssc.SRB_PostProc = (LPVOID) hEvent;
620             ssc.SRB_CDBLen      = 12;
621
622             /* Operation code */
623             ssc.CDBByte[ 0 ] = READ_CD;
624
625             /* Sector type */
626             ssc.CDBByte[ 1 ] = i_type == VCD_TYPE ? SECTOR_TYPE_MODE2_FORM2 :
627                                                     SECTOR_TYPE_CDDA;
628
629             /* Start of LBA */
630             ssc.CDBByte[ 2 ] = ( i_sector >> 24 ) & 0xff;
631             ssc.CDBByte[ 3 ] = ( i_sector >> 16 ) & 0xff;
632             ssc.CDBByte[ 4 ] = ( i_sector >>  8 ) & 0xff;
633             ssc.CDBByte[ 5 ] = ( i_sector       ) & 0xff;
634
635             /* Transfer length */
636             ssc.CDBByte[ 6 ] = ( i_nb >> 16 ) & 0xff;
637             ssc.CDBByte[ 7 ] = ( i_nb >> 8  ) & 0xff;
638             ssc.CDBByte[ 8 ] = ( i_nb       ) & 0xff;
639
640             /* Data selection */
641             ssc.CDBByte[ 9 ] = i_type == VCD_TYPE ? READ_CD_RAW_MODE2 :
642                                                     READ_CD_USERDATA;
643
644             /* Result buffer */
645             ssc.SRB_BufPointer  = p_block;
646             ssc.SRB_BufLen = VCD_SECTOR_SIZE * i_nb;
647
648             /* Initiate transfer */
649             ResetEvent( hEvent );
650             p_vcddev->lpSendCommand( (void*) &ssc );
651
652             /* If the command has still not been processed, wait until it's
653              * finished */
654             if( ssc.SRB_Status == SS_PENDING )
655             {
656                 WaitForSingleObject( hEvent, INFINITE );
657             }
658             CloseHandle( hEvent );
659
660             /* check that the transfer went as planned */
661             if( ssc.SRB_Status != SS_COMP )
662             {
663                 if( i_type == VCD_TYPE ) free( p_block );
664                 return -1;
665             }
666         }
667         else
668         {
669             DWORD dwBytesReturned;
670             RAW_READ_INFO cdrom_raw;
671
672             /* Initialize CDROM_RAW_READ structure */
673             cdrom_raw.DiskOffset.QuadPart = CD_SECTOR_SIZE * i_sector;
674             cdrom_raw.SectorCount = i_nb;
675             cdrom_raw.TrackMode =  i_type == VCD_TYPE ? XAForm2 : CDDA;
676
677             if( DeviceIoControl( p_vcddev->h_device_handle,
678                                  IOCTL_CDROM_RAW_READ, &cdrom_raw,
679                                  sizeof(RAW_READ_INFO), p_block,
680                                  VCD_SECTOR_SIZE * i_nb, &dwBytesReturned,
681                                  NULL ) == 0 )
682             {
683                 if( i_type == VCD_TYPE )
684                 {
685                     /* Retry in YellowMode2 */
686                     cdrom_raw.TrackMode = YellowMode2;
687                     if( DeviceIoControl( p_vcddev->h_device_handle,
688                                  IOCTL_CDROM_RAW_READ, &cdrom_raw,
689                                  sizeof(RAW_READ_INFO), p_block,
690                                  VCD_SECTOR_SIZE * i_nb, &dwBytesReturned,
691                                  NULL ) == 0 )
692                     {
693                         free( p_block );
694                         return -1;
695                     }
696                 }
697                 else return -1;
698             }
699         }
700
701 #elif defined( HAVE_SCSIREQ_IN_SYS_SCSIIO_H )
702         struct scsireq  sc;
703         int i_ret;
704
705         memset( &sc, 0, sizeof(sc) );
706         sc.cmd[0] = 0xBE;
707         sc.cmd[1] = i_type == VCD_TYPE ? SECTOR_TYPE_MODE2_FORM2:
708                                          SECTOR_TYPE_CDDA;
709         sc.cmd[2] = (i_sector >> 24) & 0xff;
710         sc.cmd[3] = (i_sector >> 16) & 0xff;
711         sc.cmd[4] = (i_sector >>  8) & 0xff;
712         sc.cmd[5] = (i_sector >>  0) & 0xff;
713         sc.cmd[6] = (i_nb >> 16) & 0xff;
714         sc.cmd[7] = (i_nb >>  8) & 0xff;
715         sc.cmd[8] = (i_nb      ) & 0xff;
716         sc.cmd[9] = i_type == VCD_TYPE ? READ_CD_RAW_MODE2 : READ_CD_USERDATA;
717         sc.cmd[10] = 0; /* sub channel */
718         sc.cmdlen = 12;
719         sc.databuf = (caddr_t)p_block;
720         sc.datalen = VCD_SECTOR_SIZE * i_nb;
721         sc.senselen = sizeof( sc.sense );
722         sc.flags = SCCMD_READ;
723         sc.timeout = 10000;
724
725         i_ret = ioctl( i_fd, SCIOCCOMMAND, &sc );
726         if( i_ret == -1 )
727         {
728             msg_Err( p_this, "SCIOCCOMMAND failed" );
729             if( i_type == VCD_TYPE ) free( p_block );
730             return -1;
731         }
732         if( sc.retsts || sc.error )
733         {
734             msg_Err( p_this, "SCSI command failed: status %d error %d",
735                              sc.retsts, sc.error );
736             if( i_type == VCD_TYPE ) free( p_block );
737            return -1;
738         }
739
740 #elif defined( HAVE_IOC_TOC_HEADER_IN_SYS_CDIO_H )
741         int i_size = VCD_SECTOR_SIZE;
742
743         if( ioctl( p_vcddev->i_device_handle, CDRIOCSETBLOCKSIZE, &i_size )
744             == -1 )
745         {
746             msg_Err( p_this, "Could not set block size" );
747             if( i_type == VCD_TYPE ) free( p_block );
748             return( -1 );
749         }
750
751         if( lseek( p_vcddev->i_device_handle,
752                    i_sector * VCD_SECTOR_SIZE, SEEK_SET ) == -1 )
753         {
754             msg_Err( p_this, "Could not lseek to sector %d", i_sector );
755             if( i_type == VCD_TYPE ) free( p_block );
756             return( -1 );
757         }
758
759         if( read( p_vcddev->i_device_handle,
760                   p_block, VCD_SECTOR_SIZE * i_nb ) == -1 )
761         {
762             msg_Err( p_this, "Could not read sector %d", i_sector );
763             if( i_type == VCD_TYPE ) free( p_block );
764             return( -1 );
765         }
766
767 #else
768         for( i = 0; i < i_nb; i++ )
769         {
770             int i_dummy = i_sector + i + 2 * CD_FRAMES;
771
772 #define p_msf ((struct cdrom_msf0 *)(p_block + i * VCD_SECTOR_SIZE))
773             p_msf->minute =   i_dummy / (CD_FRAMES * CD_SECS);
774             p_msf->second = ( i_dummy % (CD_FRAMES * CD_SECS) ) / CD_FRAMES;
775             p_msf->frame =  ( i_dummy % (CD_FRAMES * CD_SECS) ) % CD_FRAMES;
776 #undef p_msf
777
778             if( ioctl( p_vcddev->i_device_handle, CDROMREADRAW,
779                        p_block + i * VCD_SECTOR_SIZE ) == -1 )
780             {
781                 msg_Err( p_this, "could not read block %i from disc",
782                          i_sector );
783
784                 if( i == 0 )
785                 {
786                     if( i_type == VCD_TYPE ) free( p_block );
787                     return( -1 );
788                 }
789                 else break;
790             }
791         }
792 #endif
793     }
794
795     /* For VCDs, we don't want to keep the header and footer of the
796      * sectors read */
797     if( i_type == VCD_TYPE )
798     {
799         for( i = 0; i < i_nb; i++ )
800         {
801             memcpy( p_buffer + i * VCD_DATA_SIZE,
802                     p_block + i * VCD_SECTOR_SIZE + VCD_DATA_START,
803                     VCD_DATA_SIZE );
804         }
805         free( p_block );
806     }
807
808     return( 0 );
809 }
810
811 /****************************************************************************
812  * Private functions
813  ****************************************************************************/
814
815 /****************************************************************************
816  * OpenVCDImage: try to open a vcd image from a .cue file
817  ****************************************************************************/
818 static int OpenVCDImage( vlc_object_t * p_this, const char *psz_dev,
819                          vcddev_t *p_vcddev )
820 {
821     int i_ret = -1;
822     char *p_pos;
823     char *psz_vcdfile = NULL;
824     char *psz_cuefile = NULL;
825     FILE *cuefile     = NULL;
826     int *p_sectors    = NULL;
827     char line[1024];
828     bool b_found      = false;
829
830     /* Check if we are dealing with a .cue file */
831     p_pos = strrchr( psz_dev, '.' );
832     if( p_pos && !strcmp( p_pos, ".cue" ) )
833     {
834         /* psz_dev must be the cue file. Let's assume there's a .bin
835          * file with the same filename */
836         psz_vcdfile = malloc( p_pos - psz_dev + 5 /* ".bin" */ );
837         strncpy( psz_vcdfile, psz_dev, p_pos - psz_dev );
838         strcpy( psz_vcdfile + (p_pos - psz_dev), ".bin");
839         psz_cuefile = strdup( psz_dev );
840     }
841     else
842     {
843         /* psz_dev must be the actual vcd file. Let's assume there's a .cue
844          * file with the same filename */
845         if( p_pos )
846         {
847             psz_cuefile = malloc( p_pos - psz_dev + 5 /* ".cue" */ );
848             strncpy( psz_cuefile, psz_dev, p_pos - psz_dev );
849             strcpy( psz_cuefile + (p_pos - psz_dev), ".cue");
850         }
851         else
852         {
853             if( asprintf( &psz_cuefile, "%s.cue", psz_dev ) == -1 )
854                 psz_cuefile = NULL;
855         }
856         /* If we need to look up the .cue file, then we don't have to look for the vcd */
857         psz_vcdfile = strdup( psz_dev );
858     }
859
860     /* Open the cue file and try to parse it */
861     msg_Dbg( p_this,"trying .cue file: %s", psz_cuefile );
862     cuefile = utf8_fopen( psz_cuefile, "rt" );
863     if( cuefile == NULL )
864     {
865         msg_Dbg( p_this, "could not find .cue file" );
866         goto error;
867     }
868
869     msg_Dbg( p_this,"guessing vcd image file: %s", psz_vcdfile );
870     p_vcddev->i_vcdimage_handle = utf8_open( psz_vcdfile,
871                                     O_RDONLY | O_NONBLOCK | O_BINARY, 0666 );
872  
873     while( fgets( line, 1024, cuefile ) && !b_found )
874     {
875         /* We have a cue file, but no valid vcd file yet */
876         char filename[1024];
877         char type[16];
878         int i_temp = sscanf( line, "FILE \"%1023[^\"]\" %15s", filename, type );
879         *p_pos = 0;
880         switch( i_temp )
881         {
882             case 2:
883                 msg_Dbg( p_this, "the cue file says the data file is %s", type );
884                 if( strcasecmp( type, "BINARY" ) )
885                     goto error; /* Error if not binary, otherwise treat as case 1 */
886             case 1:
887                 if( p_vcddev->i_vcdimage_handle == -1 )
888                 {
889                     msg_Dbg( p_this, "we could not find the data file, but we found a new path" );
890                     free( psz_vcdfile);
891                     if( *filename != '/' && ((p_pos = strrchr( psz_cuefile, '/' ))
892                         || (p_pos = strrchr( psz_cuefile, '\\' ) )) )
893                     {
894                         psz_vcdfile = malloc( strlen(filename) +
895                                       (p_pos - psz_cuefile + 1) + 1 );
896                         strncpy( psz_vcdfile, psz_cuefile, (p_pos - psz_cuefile + 1) );
897                         strcpy( psz_vcdfile + (p_pos - psz_cuefile + 1), filename );
898                     } else psz_vcdfile = strdup( filename );
899                     msg_Dbg( p_this,"using vcd image file: %s", psz_vcdfile );
900                     p_vcddev->i_vcdimage_handle = utf8_open( psz_vcdfile,
901                                         O_RDONLY | O_NONBLOCK | O_BINARY, 0666 );
902                 }
903                 b_found = true;
904             default:
905                 break;
906         }
907     }
908
909     if( p_vcddev->i_vcdimage_handle == -1)
910         goto error;
911
912     /* Try to parse the i_tracks and p_sectors info so we can just forget
913      * about the cuefile */
914     size_t i_tracks = 0;
915
916     while( fgets( line, 1024, cuefile ) )
917     {
918         /* look for a TRACK line */
919         char psz_dummy[9];
920         if( !sscanf( line, "%9s", psz_dummy ) || strcmp(psz_dummy, "TRACK") )
921             continue;
922
923         /* look for an INDEX line */
924         while( fgets( line, 1024, cuefile ) )
925         {
926             int i_num, i_min, i_sec, i_frame;
927
928             if( (sscanf( line, "%*9s %2u %2u:%2u:%2u", &i_num,
929                          &i_min, &i_sec, &i_frame ) != 4) || (i_num != 1) )
930                 continue;
931
932             int *buf = realloc (p_sectors, (i_tracks + 1) * sizeof (int));
933             if (buf == NULL)
934                 goto error;
935             p_sectors = buf;
936             p_sectors[i_tracks] = MSF_TO_LBA(i_min, i_sec, i_frame);
937             msg_Dbg( p_this, "vcd track %i begins at sector:%i",
938                      (int)i_tracks, (int)p_sectors[i_tracks] );
939             i_tracks++;
940             break;
941         }
942     }
943
944     /* fill in the last entry */
945     int *buf = realloc (p_sectors, (i_tracks + 1) * sizeof (int));
946     if (buf == NULL)
947         goto error;
948     p_sectors = buf;
949     p_sectors[i_tracks] = lseek(p_vcddev->i_vcdimage_handle, 0, SEEK_END)
950                                  / VCD_SECTOR_SIZE;
951     msg_Dbg( p_this, "vcd track %i, begins at sector:%i",
952              (int)i_tracks, (int)p_sectors[i_tracks] );
953     p_vcddev->i_tracks = ++i_tracks;
954     p_vcddev->p_sectors = p_sectors;
955     i_ret = 0;
956
957 error:
958     if( cuefile ) fclose( cuefile );
959     free( p_sectors );
960     free( psz_cuefile );
961     free( psz_vcdfile );
962
963     return i_ret;
964 }
965
966 /****************************************************************************
967  * CloseVCDImage: closes a vcd image opened by OpenVCDImage
968  ****************************************************************************/
969 static void CloseVCDImage( vlc_object_t * p_this, vcddev_t *p_vcddev )
970 {
971     VLC_UNUSED( p_this );
972     if( p_vcddev->i_vcdimage_handle != -1 )
973         close( p_vcddev->i_vcdimage_handle );
974     else
975         return;
976
977     free( p_vcddev->p_sectors );
978 }
979
980 #if defined( __APPLE__ )
981 /****************************************************************************
982  * darwin_getTOC: get the TOC
983  ****************************************************************************/
984 static CDTOC *darwin_getTOC( vlc_object_t * p_this, const vcddev_t *p_vcddev )
985 {
986     mach_port_t port;
987     char *psz_devname;
988     kern_return_t ret;
989     CDTOC *pTOC = NULL;
990     io_iterator_t iterator;
991     io_registry_entry_t service;
992     CFMutableDictionaryRef properties;
993     CFDataRef data;
994
995     /* get the device name */
996     if( ( psz_devname = strrchr( p_vcddev->psz_dev, '/') ) != NULL )
997         ++psz_devname;
998     else
999         psz_devname = p_vcddev->psz_dev;
1000
1001     /* unraw the device name */
1002     if( *psz_devname == 'r' )
1003         ++psz_devname;
1004
1005     /* get port for IOKit communication */
1006     if( ( ret = IOMasterPort( MACH_PORT_NULL, &port ) ) != KERN_SUCCESS )
1007     {
1008         msg_Err( p_this, "IOMasterPort: 0x%08x", ret );
1009         return( NULL );
1010     }
1011
1012     /* get service iterator for the device */
1013     if( ( ret = IOServiceGetMatchingServices(
1014                     port, IOBSDNameMatching( port, 0, psz_devname ),
1015                     &iterator ) ) != KERN_SUCCESS )
1016     {
1017         msg_Err( p_this, "IOServiceGetMatchingServices: 0x%08x", ret );
1018         return( NULL );
1019     }
1020
1021     /* first service */
1022     service = IOIteratorNext( iterator );
1023     IOObjectRelease( iterator );
1024
1025     /* search for kIOCDMediaClass */
1026     while( service && !IOObjectConformsTo( service, kIOCDMediaClass ) )
1027     {
1028         if( ( ret = IORegistryEntryGetParentIterator( service,
1029                         kIOServicePlane, &iterator ) ) != KERN_SUCCESS )
1030         {
1031             msg_Err( p_this, "IORegistryEntryGetParentIterator: 0x%08x", ret );
1032             IOObjectRelease( service );
1033             return( NULL );
1034         }
1035
1036         IOObjectRelease( service );
1037         service = IOIteratorNext( iterator );
1038         IOObjectRelease( iterator );
1039     }
1040
1041     if( service == NULL )
1042     {
1043         msg_Err( p_this, "search for kIOCDMediaClass came up empty" );
1044         return( NULL );
1045     }
1046
1047     /* create a CF dictionary containing the TOC */
1048     if( ( ret = IORegistryEntryCreateCFProperties( service, &properties,
1049                     kCFAllocatorDefault, kNilOptions ) ) != KERN_SUCCESS )
1050     {
1051         msg_Err( p_this, "IORegistryEntryCreateCFProperties: 0x%08x", ret );
1052         IOObjectRelease( service );
1053         return( NULL );
1054     }
1055
1056     /* get the TOC from the dictionary */
1057     if( ( data = (CFDataRef) CFDictionaryGetValue( properties,
1058                                     CFSTR(kIOCDMediaTOCKey) ) ) != NULL )
1059     {
1060         CFRange range;
1061         CFIndex buf_len;
1062
1063         buf_len = CFDataGetLength( data ) + 1;
1064         range = CFRangeMake( 0, buf_len );
1065
1066         if( ( pTOC = malloc( buf_len ) ) != NULL )
1067         {
1068             CFDataGetBytes( data, range, (u_char *)pTOC );
1069         }
1070     }
1071     else
1072     {
1073         msg_Err( p_this, "CFDictionaryGetValue failed" );
1074     }
1075
1076     CFRelease( properties );
1077     IOObjectRelease( service );
1078
1079     return( pTOC );
1080 }
1081
1082 /****************************************************************************
1083  * darwin_getNumberOfTracks: get number of tracks in TOC
1084  ****************************************************************************/
1085 static int darwin_getNumberOfTracks( CDTOC *pTOC, int i_descriptors )
1086 {
1087     u_char track;
1088     int i, i_tracks = 0;
1089     CDTOCDescriptor *pTrackDescriptors = NULL;
1090
1091     pTrackDescriptors = (CDTOCDescriptor *)pTOC->descriptors;
1092
1093     for( i = i_descriptors; i > 0; i-- )
1094     {
1095         track = pTrackDescriptors[i].point;
1096
1097         if( track > CD_MAX_TRACK_NO || track < CD_MIN_TRACK_NO )
1098             continue;
1099
1100         i_tracks++;
1101     }
1102
1103     return( i_tracks );
1104 }
1105 #endif /* __APPLE__ */
1106
1107 #if defined( WIN32 )
1108 /*****************************************************************************
1109  * win32_vcd_open: open vcd drive
1110  *****************************************************************************
1111  * Load and use aspi if it is available, otherwise use IOCTLs on WinNT/2K/XP.
1112  *****************************************************************************/
1113 static int win32_vcd_open( vlc_object_t * p_this, const char *psz_dev,
1114                            vcddev_t *p_vcddev )
1115 {
1116     /* Initializations */
1117     p_vcddev->h_device_handle = NULL;
1118     p_vcddev->i_sid = 0;
1119     p_vcddev->hASPI = 0;
1120     p_vcddev->lpSendCommand = 0;
1121
1122     if( WIN_NT )
1123     {
1124         char psz_win32_drive[7];
1125
1126         msg_Dbg( p_this, "using winNT/2K/XP ioctl layer" );
1127
1128         sprintf( psz_win32_drive, "\\\\.\\%c:", psz_dev[0] );
1129
1130         p_vcddev->h_device_handle = CreateFile( psz_win32_drive, GENERIC_READ,
1131                                             FILE_SHARE_READ | FILE_SHARE_WRITE,
1132                                             NULL, OPEN_EXISTING,
1133                                             FILE_FLAG_NO_BUFFERING |
1134                                             FILE_FLAG_RANDOM_ACCESS, NULL );
1135         return (p_vcddev->h_device_handle == NULL) ? -1 : 0;
1136     }
1137     else
1138     {
1139         HMODULE hASPI = NULL;
1140         long (*lpGetSupport)( void ) = NULL;
1141         long (*lpSendCommand)( void* ) = NULL;
1142         DWORD dwSupportInfo;
1143         int i, j, i_hostadapters;
1144         char c_drive = psz_dev[0];
1145
1146         hASPI = LoadLibrary( "wnaspi32.dll" );
1147         if( hASPI != NULL )
1148         {
1149             lpGetSupport = (void *)GetProcAddress( hASPI, "GetASPI32SupportInfo" );
1150             lpSendCommand = (void *)GetProcAddress( hASPI, "SendASPI32Command" );
1151         }
1152
1153         if( hASPI == NULL || lpGetSupport == NULL || lpSendCommand == NULL )
1154         {
1155             msg_Dbg( p_this,
1156                      "unable to load aspi or get aspi function pointers" );
1157             if( hASPI ) FreeLibrary( hASPI );
1158             return -1;
1159         }
1160
1161         /* ASPI support seems to be there */
1162
1163         dwSupportInfo = lpGetSupport();
1164
1165         if( HIBYTE( LOWORD ( dwSupportInfo ) ) == SS_NO_ADAPTERS )
1166         {
1167             msg_Dbg( p_this, "no host adapters found (aspi)" );
1168             FreeLibrary( hASPI );
1169             return -1;
1170         }
1171
1172         if( HIBYTE( LOWORD ( dwSupportInfo ) ) != SS_COMP )
1173         {
1174             msg_Dbg( p_this, "unable to initalize aspi layer" );
1175             FreeLibrary( hASPI );
1176             return -1;
1177         }
1178
1179         i_hostadapters = LOBYTE( LOWORD( dwSupportInfo ) );
1180         if( i_hostadapters == 0 )
1181         {
1182             FreeLibrary( hASPI );
1183             return -1;
1184         }
1185
1186         c_drive = c_drive > 'Z' ? c_drive - 'a' : c_drive - 'A';
1187
1188         for( i = 0; i < i_hostadapters; i++ )
1189         {
1190           for( j = 0; j < 15; j++ )
1191           {
1192               struct SRB_GetDiskInfo srbDiskInfo;
1193
1194               srbDiskInfo.SRB_Cmd         = SC_GET_DISK_INFO;
1195               srbDiskInfo.SRB_HaId        = i;
1196               srbDiskInfo.SRB_Flags       = 0;
1197               srbDiskInfo.SRB_Hdr_Rsvd    = 0;
1198               srbDiskInfo.SRB_Target      = j;
1199               srbDiskInfo.SRB_Lun         = 0;
1200
1201               lpSendCommand( (void*) &srbDiskInfo );
1202
1203               if( (srbDiskInfo.SRB_Status == SS_COMP) &&
1204                   (srbDiskInfo.SRB_Int13HDriveInfo == c_drive) )
1205               {
1206                   /* Make sure this is a cdrom device */
1207                   struct SRB_GDEVBlock   srbGDEVBlock;
1208
1209                   memset( &srbGDEVBlock, 0, sizeof(struct SRB_GDEVBlock) );
1210                   srbGDEVBlock.SRB_Cmd    = SC_GET_DEV_TYPE;
1211                   srbGDEVBlock.SRB_HaId   = i;
1212                   srbGDEVBlock.SRB_Target = j;
1213
1214                   lpSendCommand( (void*) &srbGDEVBlock );
1215
1216                   if( ( srbGDEVBlock.SRB_Status == SS_COMP ) &&
1217                       ( srbGDEVBlock.SRB_DeviceType == DTYPE_CDROM ) )
1218                   {
1219                       p_vcddev->i_sid = MAKEWORD( i, j );
1220                       p_vcddev->hASPI = (long)hASPI;
1221                       p_vcddev->lpSendCommand = lpSendCommand;
1222                       msg_Dbg( p_this, "using aspi layer" );
1223
1224                       return 0;
1225                   }
1226                   else
1227                   {
1228                       FreeLibrary( hASPI );
1229                       msg_Dbg( p_this, "%c: is not a cdrom drive",
1230                                psz_dev[0] );
1231                       return -1;
1232                   }
1233               }
1234           }
1235         }
1236
1237         FreeLibrary( hASPI );
1238         msg_Dbg( p_this, "unable to get haid and target (aspi)" );
1239
1240     }
1241
1242     return -1;
1243 }
1244
1245 #endif /* WIN32 */