/* $Id: _cdio_win32.c,v 1.1 2003/10/13 11:47:11 f1rmb Exp $ Copyright (C) 2003 Rocky Bernstein This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ /* This file contains Win32-specific code and implements low-level control of the CD drive. Inspired by vlc's cdrom.h code */ #ifdef HAVE_CONFIG_H # include "config.h" #endif static const char _rcsid[] = "$Id: _cdio_win32.c,v 1.1 2003/10/13 11:47:11 f1rmb Exp $"; #include #include #include #include "cdio_assert.h" #include "cdio_private.h" #include "scsi_mmc.h" /* LBA = msf.frame + 75 * ( msf.second - 2 + 60 * msf.minute ) */ #define MSF_TO_LBA2(min, sec, frame) ((int)frame + 75 * (sec -2 + 60 * min)) #include #ifdef HAVE_WIN32_CDROM #include #include #include #include #include #include #include #include #include #include /* Win32 DeviceIoControl specifics */ #ifndef MAXIMUM_NUMBER_TRACKS # define MAXIMUM_NUMBER_TRACKS 100 #endif typedef struct _TRACK_DATA { UCHAR Reserved; UCHAR Control : 4; UCHAR Adr : 4; UCHAR TrackNumber; UCHAR Reserved1; UCHAR Address[4]; } TRACK_DATA, *PTRACK_DATA; typedef struct _CDROM_TOC { UCHAR Length[2]; UCHAR FirstTrack; UCHAR LastTrack; TRACK_DATA TrackData[MAXIMUM_NUMBER_TRACKS]; } CDROM_TOC, *PCDROM_TOC; typedef enum _TRACK_MODE_TYPE { YellowMode2, XAForm2, CDDA } TRACK_MODE_TYPE, *PTRACK_MODE_TYPE; typedef struct __RAW_READ_INFO { LARGE_INTEGER DiskOffset; ULONG SectorCount; TRACK_MODE_TYPE TrackMode; } RAW_READ_INFO, *PRAW_READ_INFO; #ifndef IOCTL_CDROM_BASE # define IOCTL_CDROM_BASE FILE_DEVICE_CD_ROM #endif #ifndef IOCTL_CDROM_READ_TOC # define IOCTL_CDROM_READ_TOC CTL_CODE(IOCTL_CDROM_BASE, 0x0000, \ METHOD_BUFFERED, FILE_READ_ACCESS) #endif #ifndef IOCTL_CDROM_RAW_READ #define IOCTL_CDROM_RAW_READ CTL_CODE(IOCTL_CDROM_BASE, 0x000F, \ METHOD_OUT_DIRECT, FILE_READ_ACCESS) #endif /* Win32 aspi specific */ #define WIN_NT ( GetVersion() < 0x80000000 ) #define ASPI_HAID 0 #define ASPI_TARGET 0 #define DTYPE_CDROM 0x05 #define SENSE_LEN 0x0E #define SC_GET_DEV_TYPE 0x01 #define SC_EXEC_SCSI_CMD 0x02 #define SC_GET_DISK_INFO 0x06 #define SS_COMP 0x01 #define SS_PENDING 0x00 #define SS_NO_ADAPTERS 0xE8 #define SRB_DIR_IN 0x08 #define SRB_DIR_OUT 0x10 #define SRB_EVENT_NOTIFY 0x40 #define SECTOR_TYPE_MODE2 0x14 #define READ_CD_USERDATA_MODE2 0x10 #define READ_TOC 0x43 #define READ_TOC_FORMAT_TOC 0x0 #pragma pack(1) struct SRB_GetDiskInfo { unsigned char SRB_Cmd; unsigned char SRB_Status; unsigned char SRB_HaId; unsigned char SRB_Flags; unsigned long SRB_Hdr_Rsvd; unsigned char SRB_Target; unsigned char SRB_Lun; unsigned char SRB_DriveFlags; unsigned char SRB_Int13HDriveInfo; unsigned char SRB_Heads; unsigned char SRB_Sectors; unsigned char SRB_Rsvd1[22]; }; struct SRB_GDEVBlock { unsigned char SRB_Cmd; unsigned char SRB_Status; unsigned char SRB_HaId; unsigned char SRB_Flags; unsigned long SRB_Hdr_Rsvd; unsigned char SRB_Target; unsigned char SRB_Lun; unsigned char SRB_DeviceType; unsigned char SRB_Rsvd1; }; struct SRB_ExecSCSICmd { unsigned char SRB_Cmd; unsigned char SRB_Status; unsigned char SRB_HaId; unsigned char SRB_Flags; unsigned long SRB_Hdr_Rsvd; unsigned char SRB_Target; unsigned char SRB_Lun; unsigned short SRB_Rsvd1; unsigned long SRB_BufLen; unsigned char *SRB_BufPointer; unsigned char SRB_SenseLen; unsigned char SRB_CDBLen; unsigned char SRB_HaStat; unsigned char SRB_TargStat; unsigned long *SRB_PostProc; unsigned char SRB_Rsvd2[20]; unsigned char CDBByte[16]; unsigned char SenseArea[SENSE_LEN+2]; }; #pragma pack() typedef struct { lsn_t start_lsn; } track_info_t; typedef struct { /* Things common to all drivers like this. This must be first. */ generic_img_private_t gen; HANDLE h_device_handle; /* device descriptor */ long hASPI; short i_sid; long (*lpSendCommand)( void* ); /* Track information */ bool toc_init; /* if true, info below is valid. */ track_info_t tocent[100]; /* entry info for each track */ track_t total_tracks; /* number of tracks in image */ track_t first_track_num; /* track number of first track */ } _img_private_t; /* General ioctl() CD-ROM command function */ static bool _cdio_mciSendCommand(int id, UINT msg, DWORD flags, void *arg) { MCIERROR mci_error; mci_error = mciSendCommand(id, msg, flags, (DWORD)arg); if ( mci_error ) { char error[256]; mciGetErrorString(mci_error, error, 256); cdio_error("mciSendCommand() error: %s", error); } return(mci_error == 0); } static const char * cdio_is_cdrom(const char drive_letter) { static char psz_win32_drive[7]; static char root_path_name[8]; _img_private_t obj; /* Initializations */ obj.h_device_handle = NULL; obj.i_sid = 0; obj.hASPI = 0; obj.lpSendCommand = 0; if ( WIN_NT ) { sprintf( psz_win32_drive, "\\\\.\\%c:", drive_letter ); sprintf( root_path_name, "\\\\.\\%c:\\", drive_letter ); obj.h_device_handle = CreateFile( psz_win32_drive, GENERIC_READ, FILE_SHARE_READ | FILE_SHARE_WRITE, NULL, OPEN_EXISTING, FILE_FLAG_NO_BUFFERING | FILE_FLAG_RANDOM_ACCESS, NULL ); if (obj.h_device_handle != NULL && (DRIVE_CDROM == GetDriveType(root_path_name))) { CloseHandle(obj.h_device_handle); return strdup(psz_win32_drive); } else { CloseHandle(obj.h_device_handle); return NULL; } } else { HMODULE hASPI = NULL; long (*lpGetSupport)( void ) = NULL; long (*lpSendCommand)( void* ) = NULL; DWORD dwSupportInfo; int j, i_hostadapters; char c_drive; hASPI = LoadLibrary( "wnaspi32.dll" ); if( hASPI != NULL ) { (FARPROC) lpGetSupport = GetProcAddress( hASPI, "GetASPI32SupportInfo" ); (FARPROC) lpSendCommand = GetProcAddress( hASPI, "SendASPI32Command" ); } if( hASPI == NULL || lpGetSupport == NULL || lpSendCommand == NULL ) { cdio_debug("Unable to load ASPI or get ASPI function pointers"); if( hASPI ) FreeLibrary( hASPI ); return NULL; } /* ASPI support seems to be there */ dwSupportInfo = lpGetSupport(); if( HIBYTE( LOWORD ( dwSupportInfo ) ) == SS_NO_ADAPTERS ) { cdio_debug("no host adapters found (ASPI)"); FreeLibrary( hASPI ); return NULL; } if( HIBYTE( LOWORD ( dwSupportInfo ) ) != SS_COMP ) { cdio_debug("Unable to initalize ASPI layer"); FreeLibrary( hASPI ); return NULL; } i_hostadapters = LOBYTE( LOWORD( dwSupportInfo ) ); if( i_hostadapters == 0 ) { FreeLibrary( hASPI ); return NULL; } c_drive = toupper(drive_letter) - 'A'; for( j = 0; j < 15; j++ ) { struct SRB_GetDiskInfo srbDiskInfo; srbDiskInfo.SRB_Cmd = SC_GET_DISK_INFO; srbDiskInfo.SRB_HaId = 0; srbDiskInfo.SRB_Flags = 0; srbDiskInfo.SRB_Hdr_Rsvd = 0; srbDiskInfo.SRB_Target = j; srbDiskInfo.SRB_Lun = 0; lpSendCommand( (void*) &srbDiskInfo ); if( (srbDiskInfo.SRB_Status == SS_COMP) && (srbDiskInfo.SRB_Int13HDriveInfo == c_drive) ) { /* Make sure this is a cdrom device */ struct SRB_GDEVBlock srbGDEVBlock; memset( &srbGDEVBlock, 0, sizeof(struct SRB_GDEVBlock) ); srbGDEVBlock.SRB_Cmd = SC_GET_DEV_TYPE; srbGDEVBlock.SRB_HaId = 0; srbGDEVBlock.SRB_Target = j; lpSendCommand( (void*) &srbGDEVBlock ); if( ( srbGDEVBlock.SRB_Status == SS_COMP ) && ( srbGDEVBlock.SRB_DeviceType == DTYPE_CDROM ) ) { sprintf( psz_win32_drive, "%c:", drive_letter ); FreeLibrary( hASPI ); return(psz_win32_drive); } } } FreeLibrary( hASPI ); } return NULL; } /*! Initialize CD device. */ static bool _cdio_init_win32 (void *user_data) { _img_private_t *_obj = user_data; if (_obj->gen.init) { cdio_error ("init called more than once"); return false; } _obj->gen.init = true; _obj->toc_init = false; /* Initializations */ _obj->h_device_handle = NULL; _obj->i_sid = 0; _obj->hASPI = 0; _obj->lpSendCommand = 0; if ( WIN_NT ) { char psz_win32_drive[7]; unsigned int len=strlen(_obj->gen.source_name); cdio_debug("using winNT/2K/XP ioctl layer"); if (cdio_is_device_win32(_obj->gen.source_name)) { sprintf( psz_win32_drive, "\\\\.\\%c:", _obj->gen.source_name[len-2] ); _obj->h_device_handle = CreateFile( psz_win32_drive, GENERIC_READ, FILE_SHARE_READ | FILE_SHARE_WRITE, NULL, OPEN_EXISTING, FILE_FLAG_NO_BUFFERING | FILE_FLAG_RANDOM_ACCESS, NULL ); return (_obj->h_device_handle == NULL) ? false : true; } else return false; } else { HMODULE hASPI = NULL; long (*lpGetSupport)( void ) = NULL; long (*lpSendCommand)( void* ) = NULL; DWORD dwSupportInfo; int i, j, i_hostadapters; char c_drive = _obj->gen.source_name[0]; hASPI = LoadLibrary( "wnaspi32.dll" ); if( hASPI != NULL ) { (FARPROC) lpGetSupport = GetProcAddress( hASPI, "GetASPI32SupportInfo" ); (FARPROC) lpSendCommand = GetProcAddress( hASPI, "SendASPI32Command" ); } if( hASPI == NULL || lpGetSupport == NULL || lpSendCommand == NULL ) { cdio_debug("Unable to load ASPI or get ASPI function pointers"); if( hASPI ) FreeLibrary( hASPI ); return false; } /* ASPI support seems to be there */ dwSupportInfo = lpGetSupport(); if( HIBYTE( LOWORD ( dwSupportInfo ) ) == SS_NO_ADAPTERS ) { cdio_debug("no host adapters found (ASPI)"); FreeLibrary( hASPI ); return -1; } if( HIBYTE( LOWORD ( dwSupportInfo ) ) != SS_COMP ) { cdio_debug("unable to initalize ASPI layer"); FreeLibrary( hASPI ); return -1; } i_hostadapters = LOBYTE( LOWORD( dwSupportInfo ) ); if( i_hostadapters == 0 ) { FreeLibrary( hASPI ); return -1; } c_drive = toupper(c_drive) - 'A'; for( i = 0; i < i_hostadapters; i++ ) { for( j = 0; j < 15; j++ ) { struct SRB_GetDiskInfo srbDiskInfo; srbDiskInfo.SRB_Cmd = SC_GET_DISK_INFO; srbDiskInfo.SRB_HaId = i; srbDiskInfo.SRB_Flags = 0; srbDiskInfo.SRB_Hdr_Rsvd = 0; srbDiskInfo.SRB_Target = j; srbDiskInfo.SRB_Lun = 0; lpSendCommand( (void*) &srbDiskInfo ); if( (srbDiskInfo.SRB_Status == SS_COMP) && (srbDiskInfo.SRB_Int13HDriveInfo == c_drive) ) { /* Make sure this is a cdrom device */ struct SRB_GDEVBlock srbGDEVBlock; memset( &srbGDEVBlock, 0, sizeof(struct SRB_GDEVBlock) ); srbGDEVBlock.SRB_Cmd = SC_GET_DEV_TYPE; srbGDEVBlock.SRB_HaId = i; srbGDEVBlock.SRB_Target = j; lpSendCommand( (void*) &srbGDEVBlock ); if( ( srbGDEVBlock.SRB_Status == SS_COMP ) && ( srbGDEVBlock.SRB_DeviceType == DTYPE_CDROM ) ) { _obj->i_sid = MAKEWORD( i, j ); _obj->hASPI = (long)hASPI; _obj->lpSendCommand = lpSendCommand; cdio_debug("Using ASPI layer"); return true; } else { FreeLibrary( hASPI ); cdio_debug( "%c: is not a CD-ROM drive", _obj->gen.source_name[0] ); return false; } } } } FreeLibrary( hASPI ); cdio_debug( "Unable to get HaId and target (ASPI)" ); } return false; } /*! Release and free resources associated with cd. */ static void _cdio_win32_free (void *user_data) { _img_private_t *_obj = user_data; if (NULL == _obj) return; free (_obj->gen.source_name); if( _obj->h_device_handle ) CloseHandle( _obj->h_device_handle ); if( _obj->hASPI ) FreeLibrary( (HMODULE)_obj->hASPI ); free (_obj); } /*! Reads a single mode2 sector from cd device into data starting from lsn. Returns 0 if no error. */ static int _cdio_mmc_read_sectors (void *user_data, void *data, lsn_t lsn, int sector_type, unsigned int nblocks) { _img_private_t *_obj = user_data; unsigned char buf[CDIO_CD_FRAMESIZE_RAW] = { 0, }; if( _obj->hASPI ) { HANDLE hEvent; struct SRB_ExecSCSICmd ssc; /* Create the transfer completion event */ hEvent = CreateEvent( NULL, TRUE, FALSE, NULL ); if( hEvent == NULL ) { return 1; } /* Data selection */ memset( &ssc, 0, sizeof( ssc ) ); ssc.SRB_Cmd = SC_EXEC_SCSI_CMD; ssc.SRB_Flags = SRB_DIR_IN | SRB_EVENT_NOTIFY; ssc.SRB_HaId = LOBYTE( _obj->i_sid ); ssc.SRB_Target = HIBYTE( _obj->i_sid ); ssc.SRB_SenseLen = SENSE_LEN; ssc.SRB_PostProc = (LPVOID) hEvent; ssc.SRB_CDBLen = 12; /* Operation code */ ssc.CDBByte[ 0 ] = CDIO_MMC_GPCMD_READ_CD; CDIO_MMC_SET_READ_TYPE(ssc.CDBByte, sector_type); CDIO_MMC_SET_READ_LBA(ssc.CDBByte, lsn); CDIO_MMC_SET_READ_LENGTH(ssc.CDBByte, nblocks); CDIO_MMC_SET_MAIN_CHANNEL_SELECTION_BITS(ssc.CDBByte, CDIO_MMC_MCSB_ALL_HEADERS); /* Result buffer */ ssc.SRB_BufPointer = buf; ssc.SRB_BufLen = CDIO_CD_FRAMESIZE_RAW; /* Initiate transfer */ ResetEvent( hEvent ); _obj->lpSendCommand( (void*) &ssc ); /* If the command has still not been processed, wait until it's * finished */ if( ssc.SRB_Status == SS_PENDING ) { WaitForSingleObject( hEvent, INFINITE ); } CloseHandle( hEvent ); /* check that the transfer went as planned */ if( ssc.SRB_Status != SS_COMP ) { return 1; } } else { DWORD dwBytesReturned; RAW_READ_INFO cdrom_raw; /* Initialize CDROM_RAW_READ structure */ cdrom_raw.DiskOffset.QuadPart = CDIO_CD_FRAMESIZE * lsn; cdrom_raw.SectorCount = 1; cdrom_raw.TrackMode = XAForm2; if( DeviceIoControl( _obj->h_device_handle, IOCTL_CDROM_RAW_READ, &cdrom_raw, sizeof(RAW_READ_INFO), buf, sizeof(buf), &dwBytesReturned, NULL ) == 0 ) { return 1; } } /* FIXME! remove the 8 (SUBHEADER size) below... */ memcpy (data, buf, CDIO_CD_FRAMESIZE_RAW); return 0; } /*! Reads an audio device into data starting from lsn. Returns 0 if no error. */ static int _cdio_read_audio_sectors (void *user_data, void *data, lsn_t lsn, unsigned int nblocks) { return _cdio_mmc_read_sectors( user_data, data, lsn, CDIO_MMC_READ_TYPE_CDDA, nblocks ); } /*! Reads a single mode2 sector from cd device into data starting from lsn. Returns 0 if no error. */ static int _cdio_read_mode2_sector (void *user_data, void *data, lsn_t lsn, bool mode2_form2) { char buf[CDIO_CD_FRAMESIZE_RAW] = { 0, }; _img_private_t *_obj = user_data; int ret; if (_obj->gen.ioctls_debugged == 75) cdio_debug ("only displaying every 75th ioctl from now on"); if (_obj->gen.ioctls_debugged == 30 * 75) cdio_debug ("only displaying every 30*75th ioctl from now on"); if (_obj->gen.ioctls_debugged < 75 || (_obj->gen.ioctls_debugged < (30 * 75) && _obj->gen.ioctls_debugged % 75 == 0) || _obj->gen.ioctls_debugged % (30 * 75) == 0) cdio_debug ("reading %lu", (unsigned long int) lsn); _obj->gen.ioctls_debugged++; ret = _cdio_mmc_read_sectors(user_data, buf, lsn, CDIO_MMC_READ_TYPE_ANY, 1); if( ret != 0 ) return ret; if (mode2_form2) memcpy (data, buf, M2RAW_SECTOR_SIZE); else memcpy (((char *)data), buf + CDIO_CD_SUBHEADER_SIZE, CDIO_CD_FRAMESIZE); return 0; } /*! Reads nblocks of mode2 sectors from cd device into data starting from lsn. Returns 0 if no error. */ static int _cdio_read_mode2_sectors (void *user_data, void *data, lsn_t lsn, bool mode2_form2, unsigned int nblocks) { _img_private_t *_obj = user_data; int i; int retval; for (i = 0; i < nblocks; i++) { if (mode2_form2) { if ( (retval = _cdio_read_mode2_sector (_obj, ((char *)data) + (M2RAW_SECTOR_SIZE * i), lsn + i, true)) ) return retval; } else { char buf[M2RAW_SECTOR_SIZE] = { 0, }; if ( (retval = _cdio_read_mode2_sector (_obj, buf, lsn + i, true)) ) return retval; memcpy (((char *)data) + (CDIO_CD_FRAMESIZE * i), buf + CDIO_CD_SUBHEADER_SIZE, CDIO_CD_FRAMESIZE); } } return 0; } /*! Return the size of the CD in logical block address (LBA) units. */ static uint32_t _cdio_stat_size (void *user_data) { _img_private_t *_obj = user_data; return _obj->tocent[_obj->total_tracks].start_lsn; } /*! Set the key "arg" to "value" in source device. */ static int _cdio_set_arg (void *user_data, const char key[], const char value[]) { _img_private_t *_obj = user_data; if (!strcmp (key, "source")) { if (!value) return -2; free (_obj->gen.source_name); _obj->gen.source_name = strdup (value); } else return -1; return 0; } /*! Read and cache the CD's Track Table of Contents and track info. Return true if successful or false if an error. */ static bool _cdio_read_toc (_img_private_t *_obj) { if( _obj->hASPI ) { HANDLE hEvent; struct SRB_ExecSCSICmd ssc; unsigned char p_tocheader[ 4 ]; /* Create the transfer completion event */ hEvent = CreateEvent( NULL, TRUE, FALSE, NULL ); if( hEvent == NULL ) { return false; } memset( &ssc, 0, sizeof( ssc ) ); ssc.SRB_Cmd = SC_EXEC_SCSI_CMD; ssc.SRB_Flags = SRB_DIR_IN | SRB_EVENT_NOTIFY; ssc.SRB_HaId = LOBYTE( _obj->i_sid ); ssc.SRB_Target = HIBYTE( _obj->i_sid ); ssc.SRB_SenseLen = SENSE_LEN; ssc.SRB_PostProc = (LPVOID) hEvent; ssc.SRB_CDBLen = 10; /* Operation code */ ssc.CDBByte[ 0 ] = READ_TOC; /* Format */ ssc.CDBByte[ 2 ] = READ_TOC_FORMAT_TOC; /* Starting track */ ssc.CDBByte[ 6 ] = 0; /* Allocation length and buffer */ ssc.SRB_BufLen = sizeof( p_tocheader ); ssc.SRB_BufPointer = p_tocheader; ssc.CDBByte[ 7 ] = ( ssc.SRB_BufLen >> 8 ) & 0xff; ssc.CDBByte[ 8 ] = ( ssc.SRB_BufLen ) & 0xff; /* Initiate transfer */ ResetEvent( hEvent ); _obj->lpSendCommand( (void*) &ssc ); /* If the command has still not been processed, wait until it's * finished */ if( ssc.SRB_Status == SS_PENDING ) WaitForSingleObject( hEvent, INFINITE ); /* check that the transfer went as planned */ if( ssc.SRB_Status != SS_COMP ) { CloseHandle( hEvent ); return false; } _obj->first_track_num = p_tocheader[2]; _obj->total_tracks = p_tocheader[3] - p_tocheader[2] + 1; { int i, i_toclength; unsigned char *p_fulltoc; i_toclength = 4 /* header */ + p_tocheader[0] + ((unsigned int)p_tocheader[1] << 8); p_fulltoc = malloc( i_toclength ); if( p_fulltoc == NULL ) { cdio_error( "out of memory" ); CloseHandle( hEvent ); return false; } /* Allocation length and buffer */ ssc.SRB_BufLen = i_toclength; ssc.SRB_BufPointer = p_fulltoc; ssc.CDBByte[ 7 ] = ( ssc.SRB_BufLen >> 8 ) & 0xff; ssc.CDBByte[ 8 ] = ( ssc.SRB_BufLen ) & 0xff; /* Initiate transfer */ ResetEvent( hEvent ); _obj->lpSendCommand( (void*) &ssc ); /* If the command has still not been processed, wait until it's * finished */ if( ssc.SRB_Status == SS_PENDING ) WaitForSingleObject( hEvent, INFINITE ); /* check that the transfer went as planned */ if( ssc.SRB_Status != SS_COMP ) _obj->total_tracks = 0; for( i = 0 ; i <= _obj->total_tracks ; i++ ) { int i_index = 8 + 8 * i; _obj->tocent[ i ].start_lsn = ((int)p_fulltoc[ i_index ] << 24) + ((int)p_fulltoc[ i_index+1 ] << 16) + ((int)p_fulltoc[ i_index+2 ] << 8) + (int)p_fulltoc[ i_index+3 ]; cdio_debug( "p_sectors: %i %lu", i, (unsigned long int) _obj->tocent[i].start_lsn ); } free( p_fulltoc ); } CloseHandle( hEvent ); return true; } else { DWORD dwBytesReturned; CDROM_TOC cdrom_toc; int i; if( DeviceIoControl( _obj->h_device_handle, IOCTL_CDROM_READ_TOC, NULL, 0, &cdrom_toc, sizeof(CDROM_TOC), &dwBytesReturned, NULL ) == 0 ) { cdio_debug( "could not read TOCHDR" ); return false; } _obj->first_track_num = cdrom_toc.FirstTrack; _obj->total_tracks = cdrom_toc.LastTrack - cdrom_toc.FirstTrack + 1; for( i = 0 ; i <= _obj->total_tracks ; i++ ) { _obj->tocent[ i ].start_lsn = MSF_TO_LBA2( cdrom_toc.TrackData[i].Address[1], cdrom_toc.TrackData[i].Address[2], cdrom_toc.TrackData[i].Address[3] ); cdio_debug("p_sectors: %i, %lu", i, (unsigned long int) (_obj->tocent[i].start_lsn)); } } return true; } /*! Eject media. Return 1 if successful, 0 otherwise. */ static int _cdio_eject_media (void *user_data) { _img_private_t *_obj = user_data; MCI_OPEN_PARMS op; MCI_STATUS_PARMS st; DWORD i_flags; char psz_drive[4]; int ret; memset( &op, 0, sizeof(MCI_OPEN_PARMS) ); op.lpstrDeviceType = (LPCSTR)MCI_DEVTYPE_CD_AUDIO; strcpy( psz_drive, "X:" ); psz_drive[0] = _obj->gen.source_name[0]; op.lpstrElementName = psz_drive; /* Set the flags for the device type */ i_flags = MCI_OPEN_TYPE | MCI_OPEN_TYPE_ID | MCI_OPEN_ELEMENT | MCI_OPEN_SHAREABLE; if( !mciSendCommand( 0, MCI_OPEN, i_flags, (unsigned long)&op ) ) { st.dwItem = MCI_STATUS_READY; /* Eject disc */ ret = mciSendCommand( op.wDeviceID, MCI_SET, MCI_SET_DOOR_OPEN, 0 ) != 0; /* Release access to the device */ mciSendCommand( op.wDeviceID, MCI_CLOSE, MCI_WAIT, 0 ); } else ret = 0; return ret; } /*! Return the value associated with the key "arg". */ static const char * _cdio_get_arg (void *user_data, const char key[]) { _img_private_t *_obj = user_data; if (!strcmp (key, "source")) { return _obj->gen.source_name; } else if (!strcmp (key, "access-mode")) { if ( WIN_NT ) return "winNT/2K/XP ioctl"; else if (_obj->hASPI) return "ASPI"; else return "undefined WIN32"; } return NULL; } /*! Return the number of of the first track. CDIO_INVALID_TRACK is returned on error. */ static track_t _cdio_get_first_track_num(void *user_data) { _img_private_t *_obj = user_data; if (!_obj->toc_init) _cdio_read_toc (_obj) ; return _obj->first_track_num; } /*! Return the number of tracks in the current medium. CDIO_INVALID_TRACK is returned on error. */ static track_t _cdio_get_num_tracks(void *user_data) { _img_private_t *_obj = user_data; if (!_obj->toc_init) _cdio_read_toc (_obj) ; return _obj->total_tracks; } /*! Get format of track. */ static track_format_t _cdio_get_track_format(void *user_data, track_t track_num) { _img_private_t *_obj = user_data; MCI_OPEN_PARMS op; MCI_STATUS_PARMS st; DWORD i_flags; int ret; memset( &op, 0, sizeof(MCI_OPEN_PARMS) ); op.lpstrDeviceType = (LPCSTR)MCI_DEVTYPE_CD_AUDIO; op.lpstrElementName = _obj->gen.source_name; /* Set the flags for the device type */ i_flags = MCI_OPEN_TYPE | MCI_OPEN_TYPE_ID | MCI_OPEN_ELEMENT | MCI_OPEN_SHAREABLE; if( !mciSendCommand( 0, MCI_OPEN, i_flags, (unsigned long)&op ) ) { st.dwItem = MCI_CDA_STATUS_TYPE_TRACK; st.dwTrack = track_num; i_flags = MCI_TRACK | MCI_STATUS_ITEM ; ret = mciSendCommand( op.wDeviceID, MCI_STATUS, i_flags, (unsigned long) &st ); /* Release access to the device */ mciSendCommand( op.wDeviceID, MCI_CLOSE, MCI_WAIT, 0 ); switch(st.dwReturn) { case MCI_CDA_TRACK_AUDIO: return TRACK_FORMAT_AUDIO; case MCI_CDA_TRACK_OTHER: return TRACK_FORMAT_DATA; default: return TRACK_FORMAT_XA; } } return TRACK_FORMAT_ERROR; } /*! Return true if we have XA data (green, mode2 form1) or XA data (green, mode2 form2). That is track begins: sync - header - subheader 12 4 - 8 FIXME: there's gotta be a better design for this and get_track_format? */ static bool _cdio_get_track_green(void *user_data, track_t track_num) { _img_private_t *_obj = user_data; if (!_obj->toc_init) _cdio_read_toc (_obj) ; if (track_num == CDIO_CDROM_LEADOUT_TRACK) track_num = _obj->total_tracks+1; if (track_num > _obj->total_tracks+1 || track_num == 0) return false; /* FIXME! */ return true; } /*! Return the starting MSF (minutes/secs/frames) for track number track_num in obj. Track numbers start at 1. The "leadout" track is specified either by using track_num LEADOUT_TRACK or the total tracks+1. False is returned if there is no track entry. */ static bool _cdio_get_track_msf(void *user_data, track_t track_num, msf_t *msf) { _img_private_t *_obj = user_data; if (NULL == msf) return false; if (!_obj->toc_init) _cdio_read_toc (_obj) ; if (track_num == CDIO_CDROM_LEADOUT_TRACK) track_num = _obj->total_tracks+1; if (track_num > _obj->total_tracks+1 || track_num == 0) { return false; } else { cdio_lsn_to_msf(_obj->tocent[track_num-1].start_lsn, msf); return true; } } #endif /* HAVE_WIN32_CDROM */ /*! Return an array of strings giving possible CD devices. */ char ** cdio_get_devices_win32 (void) { #ifndef HAVE_WIN32_CDROM return NULL; #else char **drives = NULL; unsigned int num_drives=0; char drive_letter; /* Scan the system for CD-ROM drives. */ #if FINISHED /* Now check the currently mounted CD drives */ if (NULL != (ret_drive = cdio_check_mounts("/etc/mtab"))) { cdio_add_device_list(&drives, drive, &num_drives); } /* Finally check possible mountable drives in /etc/fstab */ if (NULL != (ret_drive = cdio_check_mounts("/etc/fstab"))) { cdio_add_device_list(&drives, drive, &num_drives); } #endif /* Scan the system for CD-ROM drives. Not always 100% reliable, so use the USE_MNTENT code above first. */ for (drive_letter='A'; drive_letter <= 'Z'; drive_letter++) { const char *drive_str=cdio_is_cdrom(drive_letter); if (drive_str != NULL) { cdio_add_device_list(&drives, drive_str, &num_drives); } } cdio_add_device_list(&drives, NULL, &num_drives); return drives; #endif /*HAVE_WIN32_CDROM*/ } /*! Return a string containing the default CD device if none is specified. if CdIo is NULL (we haven't initialized a specific device driver), then find a suitable one and return the default device for that. NULL is returned if we couldn't get a default device. */ char * cdio_get_default_device_win32(void) { #ifdef HAVE_WIN32_CDROM char drive_letter; for (drive_letter='A'; drive_letter <= 'Z'; drive_letter++) { const char *drive_str=cdio_is_cdrom(drive_letter); if (drive_str != NULL) { return strdup(drive_str); } } #endif return NULL; } /*! Return true if source_name could be a device containing a CD-ROM. */ bool cdio_is_device_win32(const char *source_name) { unsigned int len; len = strlen(source_name); if (NULL == source_name) return false; #ifdef HAVE_WIN32_CDROM if ( WIN_NT ) /* Really should test to see if of form: \\.\x: */ return ((len == 6) && isalpha(source_name[len-2]) && (source_name[len-1] == ':')); else /* See if is of form: x: */ return ((len == 2) && isalpha(source_name[0]) && (source_name[len-1] == ':')); #else return false; #endif } /*! Initialization routine. This is the only thing that doesn't get called via a function pointer. In fact *we* are the ones to set that up. */ CdIo * cdio_open_win32 (const char *source_name) { #ifdef HAVE_WIN32_CDROM CdIo *ret; _img_private_t *_data; cdio_funcs _funcs = { .eject_media = _cdio_eject_media, .free = _cdio_win32_free, .get_arg = _cdio_get_arg, .get_default_device = cdio_get_default_device_win32, .get_devices = cdio_get_devices_win32, .get_first_track_num= _cdio_get_first_track_num, .get_mcn = NULL, .get_num_tracks = _cdio_get_num_tracks, .get_track_format = _cdio_get_track_format, .get_track_green = _cdio_get_track_green, .get_track_lba = NULL, /* This could be implemented if need be. */ .get_track_msf = _cdio_get_track_msf, .lseek = NULL, .read = NULL, .read_audio_sectors = _cdio_read_audio_sectors, .read_mode2_sector = _cdio_read_mode2_sector, .read_mode2_sectors = _cdio_read_mode2_sectors, .set_arg = _cdio_set_arg, .stat_size = _cdio_stat_size }; _data = _cdio_malloc (sizeof (_img_private_t)); _data->gen.init = false; _data->gen.fd = -1; _cdio_set_arg(_data, "source", (NULL == source_name) ? cdio_get_default_device_win32(): source_name); ret = cdio_new (_data, &_funcs); if (ret == NULL) return NULL; if (_cdio_init_win32(_data)) return ret; else { _cdio_win32_free (_data); return NULL; } #else return NULL; #endif /* HAVE_WIN32_CDROM */ } bool cdio_have_win32 (void) { #ifdef HAVE_WIN32_CDROM return true; #else return false; #endif /* HAVE_WIN32_CDROM */ }