diff options
Diffstat (limited to 'libdvdcss/device.c')
-rw-r--r-- | libdvdcss/device.c | 973 |
1 files changed, 973 insertions, 0 deletions
diff --git a/libdvdcss/device.c b/libdvdcss/device.c new file mode 100644 index 0000000000..580ce3c0fe --- /dev/null +++ b/libdvdcss/device.c @@ -0,0 +1,973 @@ +/***************************************************************************** + * device.h: DVD device access + ***************************************************************************** + * Copyright (C) 1998-2006 VideoLAN + * $Id$ + * + * Authors: Stéphane Borel <stef@via.ecp.fr> + * Sam Hocevar <sam@zoy.org> + * Håkan Hjort <d95hjort@dtek.chalmers.se> + * + * 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, USA. + *****************************************************************************/ + +/***************************************************************************** + * Preamble + *****************************************************************************/ +#include "config.h" + +#include <stdio.h> +#include <stdlib.h> +#include <string.h> +#ifdef HAVE_ERRNO_H +# include <errno.h> +#endif +#include <sys/types.h> +#include <sys/stat.h> +#ifdef HAVE_SYS_PARAM_H +# include <sys/param.h> +#endif +#include <fcntl.h> + +#ifdef HAVE_UNISTD_H +# include <unistd.h> +#endif + +#ifdef HAVE_LIMITS_H +# include <limits.h> +#endif + +#if defined( WIN32 ) && !defined( SYS_CYGWIN ) +# include <io.h> /* read() */ +#else +# include <sys/uio.h> /* struct iovec */ +#endif + +#ifdef DARWIN_DVD_IOCTL +# include <paths.h> +# include <CoreFoundation/CoreFoundation.h> +# include <IOKit/IOKitLib.h> +# include <IOKit/IOBSD.h> +# include <IOKit/storage/IOMedia.h> +# include <IOKit/storage/IOCDMedia.h> +# include <IOKit/storage/IODVDMedia.h> +#endif + +#include "dvdcss/dvdcss.h" + +#include "common.h" +#include "css.h" +#include "libdvdcss.h" +#include "ioctl.h" +#include "device.h" + +/***************************************************************************** + * Device reading prototypes + *****************************************************************************/ +static int libc_open ( dvdcss_t, char const * ); +static int libc_seek ( dvdcss_t, int ); +static int libc_read ( dvdcss_t, void *, int ); +static int libc_readv ( dvdcss_t, struct iovec *, int ); + +#ifdef WIN32 +static int win2k_open ( dvdcss_t, char const * ); +static int aspi_open ( dvdcss_t, char const * ); +static int win2k_seek ( dvdcss_t, int ); +static int aspi_seek ( dvdcss_t, int ); +static int win2k_read ( dvdcss_t, void *, int ); +static int aspi_read ( dvdcss_t, void *, int ); +static int win_readv ( dvdcss_t, struct iovec *, int ); + +static int aspi_read_internal ( int, void *, int ); +#endif + +int _dvdcss_use_ioctls( dvdcss_t dvdcss ) +{ +#if defined( WIN32 ) + if( dvdcss->b_file ) + { + return 0; + } + + /* FIXME: implement this for Windows */ + if( WIN2K ) + { + return 1; + } + else + { + return 1; + } +#else + struct stat fileinfo; + int ret; + + ret = fstat( dvdcss->i_fd, &fileinfo ); + if( ret < 0 ) + { + return 1; /* What to do? Be conservative and try to use the ioctls */ + } + + /* Complete this list and check that we test for the right things + * (I've assumed for all OSs that 'r', (raw) device, are char devices + * and those that don't contain/use an 'r' in the name are block devices) + * + * Linux needs a block device + * Solaris needs a char device + * Darwin needs a char device + * OpenBSD needs a char device + * NetBSD needs a char device + * FreeBSD can use either the block or the char device + * BSD/OS can use either the block or the char device + */ + + /* Check if this is a block/char device */ + if( S_ISBLK( fileinfo.st_mode ) || + S_ISCHR( fileinfo.st_mode ) ) + { + return 1; + } + else + { + return 0; + } +#endif +} + +void _dvdcss_check ( dvdcss_t dvdcss ) +{ +#if defined( WIN32 ) + DWORD drives; + int i; +#elif defined( DARWIN_DVD_IOCTL ) + io_object_t next_media; + mach_port_t master_port; + kern_return_t kern_result; + io_iterator_t media_iterator; + CFMutableDictionaryRef classes_to_match; +#else + char *ppsz_devices[] = { "/dev/dvd", "/dev/cdrom", "/dev/hdc", NULL }; + int i, i_fd; +#endif + + /* If the device name is non-null, return */ + if( dvdcss->psz_device[0] ) + { + return; + } + +#if defined( WIN32 ) + drives = GetLogicalDrives(); + + for( i = 0; drives; i++ ) + { + char psz_device[5]; + DWORD cur = 1 << i; + UINT i_ret; + + if( (drives & cur) == 0 ) + { + continue; + } + drives &= ~cur; + + sprintf( psz_device, "%c:\\", 'A' + i ); + i_ret = GetDriveType( psz_device ); + if( i_ret != DRIVE_CDROM ) + { + continue; + } + + /* Remove trailing backslash */ + psz_device[2] = '\0'; + + /* FIXME: we want to differenciate between CD and DVD drives + * using DeviceIoControl() */ + print_debug( dvdcss, "defaulting to drive `%s'", psz_device ); + free( dvdcss->psz_device ); + dvdcss->psz_device = strdup( psz_device ); + return; + } +#elif defined( DARWIN_DVD_IOCTL ) + + kern_result = IOMasterPort( MACH_PORT_NULL, &master_port ); + if( kern_result != KERN_SUCCESS ) + { + return; + } + + classes_to_match = IOServiceMatching( kIODVDMediaClass ); + if( classes_to_match == NULL ) + { + return; + } + + CFDictionarySetValue( classes_to_match, CFSTR( kIOMediaEjectableKey ), + kCFBooleanTrue ); + + kern_result = IOServiceGetMatchingServices( master_port, classes_to_match, + &media_iterator ); + if( kern_result != KERN_SUCCESS ) + { + return; + } + + next_media = IOIteratorNext( media_iterator ); + for( ; ; ) + { + char psz_buf[0x32]; + size_t i_pathlen; + CFTypeRef psz_path; + + next_media = IOIteratorNext( media_iterator ); + if( next_media == 0 ) + { + break; + } + + psz_path = IORegistryEntryCreateCFProperty( next_media, + CFSTR( kIOBSDNameKey ), + kCFAllocatorDefault, + 0 ); + if( psz_path == NULL ) + { + IOObjectRelease( next_media ); + continue; + } + + snprintf( psz_buf, sizeof(psz_buf), "%s%c", _PATH_DEV, 'r' ); + i_pathlen = strlen( psz_buf ); + + if( CFStringGetCString( psz_path, + (char*)&psz_buf + i_pathlen, + sizeof(psz_buf) - i_pathlen, + kCFStringEncodingASCII ) ) + { + print_debug( dvdcss, "defaulting to drive `%s'", psz_buf ); + CFRelease( psz_path ); + IOObjectRelease( next_media ); + IOObjectRelease( media_iterator ); + free( dvdcss->psz_device ); + dvdcss->psz_device = strdup( psz_buf ); + return; + } + + CFRelease( psz_path ); + + IOObjectRelease( next_media ); + } + + IOObjectRelease( media_iterator ); +#else + for( i = 0; ppsz_devices[i]; i++ ) + { + i_fd = open( ppsz_devices[i], 0 ); + if( i_fd != -1 ) + { + print_debug( dvdcss, "defaulting to drive `%s'", ppsz_devices[i] ); + close( i_fd ); + free( dvdcss->psz_device ); + dvdcss->psz_device = strdup( ppsz_devices[i] ); + return; + } + } +#endif + + print_error( dvdcss, "could not find a suitable default drive" ); +} + +int _dvdcss_open ( dvdcss_t dvdcss ) +{ + char const *psz_device = dvdcss->psz_device; + + print_debug( dvdcss, "opening target `%s'", psz_device ); + +#if defined( WIN32 ) + dvdcss->b_file = 1; + /* If device is "X:" or "X:\", we are not actually opening a file. */ + if (psz_device[0] && psz_device[1] == ':' && + (!psz_device[2] || (psz_device[2] == '\\' && !psz_device[3]))) + dvdcss->b_file = 0; + + /* Initialize readv temporary buffer */ + dvdcss->p_readv_buffer = NULL; + dvdcss->i_readv_buf_size = 0; + + if( !dvdcss->b_file && WIN2K ) + { + print_debug( dvdcss, "using Win2K API for access" ); + dvdcss->pf_seek = win2k_seek; + dvdcss->pf_read = win2k_read; + dvdcss->pf_readv = win_readv; + return win2k_open( dvdcss, psz_device ); + } + else if( !dvdcss->b_file ) + { + print_debug( dvdcss, "using ASPI for access" ); + dvdcss->pf_seek = aspi_seek; + dvdcss->pf_read = aspi_read; + dvdcss->pf_readv = win_readv; + return aspi_open( dvdcss, psz_device ); + } + else +#endif + { + print_debug( dvdcss, "using libc for access" ); + dvdcss->pf_seek = libc_seek; + dvdcss->pf_read = libc_read; + dvdcss->pf_readv = libc_readv; + return libc_open( dvdcss, psz_device ); + } +} + +#ifndef WIN32 +int _dvdcss_raw_open ( dvdcss_t dvdcss, char const *psz_device ) +{ + dvdcss->i_raw_fd = open( psz_device, 0 ); + + if( dvdcss->i_raw_fd == -1 ) + { + print_debug( dvdcss, "cannot open %s (%s)", + psz_device, strerror(errno) ); + print_error( dvdcss, "failed to open raw device, but continuing" ); + return -1; + } + else + { + dvdcss->i_read_fd = dvdcss->i_raw_fd; + } + + return 0; +} +#endif + +int _dvdcss_close ( dvdcss_t dvdcss ) +{ +#if defined( WIN32 ) + if( dvdcss->b_file ) + { + close( dvdcss->i_fd ); + } + else if( WIN2K ) + { + CloseHandle( (HANDLE) dvdcss->i_fd ); + } + else /* ASPI */ + { + struct w32_aspidev *fd = (struct w32_aspidev *) dvdcss->i_fd; + + /* Unload aspi and free w32_aspidev structure */ + FreeLibrary( (HMODULE) fd->hASPI ); + free( (void*) dvdcss->i_fd ); + } + + /* Free readv temporary buffer */ + if( dvdcss->p_readv_buffer ) + { + free( dvdcss->p_readv_buffer ); + dvdcss->p_readv_buffer = NULL; + dvdcss->i_readv_buf_size = 0; + } + + return 0; +#else + close( dvdcss->i_fd ); + + if( dvdcss->i_raw_fd >= 0 ) + { + close( dvdcss->i_raw_fd ); + dvdcss->i_raw_fd = -1; + } + + return 0; +#endif +} + +/* Following functions are local */ + +/***************************************************************************** + * Open commands. + *****************************************************************************/ +static int libc_open ( dvdcss_t dvdcss, char const *psz_device ) +{ +#if !defined( WIN32 ) + dvdcss->i_fd = dvdcss->i_read_fd = open( psz_device, 0 ); +#else + dvdcss->i_fd = dvdcss->i_read_fd = open( psz_device, O_BINARY ); +#endif + + if( dvdcss->i_fd == -1 ) + { + print_debug( dvdcss, "cannot open %s (%s)", + psz_device, strerror(errno) ); + print_error( dvdcss, "failed to open device" ); + return -1; + } + + dvdcss->i_pos = 0; + + return 0; +} + +#if defined( WIN32 ) +static int win2k_open ( dvdcss_t dvdcss, char const *psz_device ) +{ + char psz_dvd[7]; + _snprintf( psz_dvd, 7, "\\\\.\\%c:", psz_device[0] ); + + /* To work around an M$ bug in IOCTL_DVD_READ_STRUCTURE, we need read + * _and_ write access to the device (so we can make SCSI Pass Through + * Requests). Unfortunately this is only allowed if you have + * administrator priviledges so we allow for a fallback method with + * only read access to the device (in this case ioctl_ReadCopyright() + * won't send back the right result). + * (See Microsoft Q241374: Read and Write Access Required for SCSI + * Pass Through Requests) */ + dvdcss->i_fd = (int) + CreateFile( psz_dvd, GENERIC_READ | GENERIC_WRITE, + FILE_SHARE_READ | FILE_SHARE_WRITE, + NULL, OPEN_EXISTING, + FILE_FLAG_RANDOM_ACCESS, NULL ); + + if( (HANDLE) dvdcss->i_fd == INVALID_HANDLE_VALUE ) + dvdcss->i_fd = (int) + CreateFile( psz_dvd, GENERIC_READ, FILE_SHARE_READ, + NULL, OPEN_EXISTING, + FILE_FLAG_RANDOM_ACCESS, NULL ); + + if( (HANDLE) dvdcss->i_fd == INVALID_HANDLE_VALUE ) + { + print_error( dvdcss, "failed opening device" ); + return -1; + } + + dvdcss->i_pos = 0; + + return 0; +} + +static int aspi_open( dvdcss_t dvdcss, char const * psz_device ) +{ + HMODULE hASPI; + DWORD dwSupportInfo; + struct w32_aspidev *fd; + int i, j, i_hostadapters; + GETASPI32SUPPORTINFO lpGetSupport; + SENDASPI32COMMAND lpSendCommand; + char c_drive = psz_device[0]; + + /* load aspi and init w32_aspidev structure */ + hASPI = LoadLibrary( "wnaspi32.dll" ); + if( hASPI == NULL ) + { + print_error( dvdcss, "unable to load wnaspi32.dll" ); + return -1; + } + + lpGetSupport = (GETASPI32SUPPORTINFO) GetProcAddress( hASPI, "GetASPI32SupportInfo" ); + lpSendCommand = (SENDASPI32COMMAND) GetProcAddress( hASPI, "SendASPI32Command" ); + + if(lpGetSupport == NULL || lpSendCommand == NULL ) + { + print_error( dvdcss, "unable to get aspi function pointers" ); + FreeLibrary( hASPI ); + return -1; + } + + dwSupportInfo = lpGetSupport(); + + if( HIBYTE( LOWORD ( dwSupportInfo ) ) == SS_NO_ADAPTERS ) + { + print_error( dvdcss, "no ASPI adapters found" ); + FreeLibrary( hASPI ); + return -1; + } + + if( HIBYTE( LOWORD ( dwSupportInfo ) ) != SS_COMP ) + { + print_error( dvdcss, "unable to initalize aspi layer" ); + FreeLibrary( hASPI ); + return -1; + } + + i_hostadapters = LOBYTE( LOWORD( dwSupportInfo ) ); + if( i_hostadapters == 0 ) + { + print_error( dvdcss, "no ASPI adapters ready" ); + FreeLibrary( hASPI ); + return -1; + } + + fd = malloc( sizeof( struct w32_aspidev ) ); + if( fd == NULL ) + { + print_error( dvdcss, "not enough memory" ); + FreeLibrary( hASPI ); + return -1; + } + + fd->i_blocks = 0; + fd->hASPI = (long) hASPI; + fd->lpSendCommand = lpSendCommand; + + c_drive = c_drive > 'Z' ? c_drive - 'a' : 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 ) ) + { + fd->i_sid = MAKEWORD( i, j ); + dvdcss->i_fd = (int) fd; + dvdcss->i_pos = 0; + return 0; + } + else + { + free( (void*) fd ); + FreeLibrary( hASPI ); + print_error( dvdcss,"this is not a cdrom drive" ); + return -1; + } + } + } + } + + free( (void*) fd ); + FreeLibrary( hASPI ); + print_error( dvdcss, "unable to get haid and target (aspi)" ); + return -1; +} +#endif + +/***************************************************************************** + * Seek commands. + *****************************************************************************/ +static int libc_seek( dvdcss_t dvdcss, int i_blocks ) +{ + off_t i_seek; + + if( dvdcss->i_pos == i_blocks ) + { + /* We are already in position */ + return i_blocks; + } + + i_seek = (off_t)i_blocks * (off_t)DVDCSS_BLOCK_SIZE; + i_seek = lseek64( dvdcss->i_read_fd, i_seek, SEEK_SET ); + + if( i_seek < 0 ) + { + print_error( dvdcss, "seek error" ); + dvdcss->i_pos = -1; + return i_seek; + } + + dvdcss->i_pos = i_seek / DVDCSS_BLOCK_SIZE; + + return dvdcss->i_pos; +} + +#if defined( WIN32 ) +static int win2k_seek( dvdcss_t dvdcss, int i_blocks ) +{ + LARGE_INTEGER li_seek; + +#ifndef INVALID_SET_FILE_POINTER +# define INVALID_SET_FILE_POINTER ((DWORD)-1) +#endif + + if( dvdcss->i_pos == i_blocks ) + { + /* We are already in position */ + return i_blocks; + } + + li_seek.QuadPart = (LONGLONG)i_blocks * DVDCSS_BLOCK_SIZE; + + li_seek.LowPart = SetFilePointer( (HANDLE) dvdcss->i_fd, + li_seek.LowPart, + &li_seek.HighPart, FILE_BEGIN ); + if( (li_seek.LowPart == INVALID_SET_FILE_POINTER) + && GetLastError() != NO_ERROR) + { + dvdcss->i_pos = -1; + return -1; + } + + dvdcss->i_pos = li_seek.QuadPart / DVDCSS_BLOCK_SIZE; + + return dvdcss->i_pos; +} + +static int aspi_seek( dvdcss_t dvdcss, int i_blocks ) +{ + int i_old_blocks; + char sz_buf[ DVDCSS_BLOCK_SIZE ]; + struct w32_aspidev *fd = (struct w32_aspidev *) dvdcss->i_fd; + + if( dvdcss->i_pos == i_blocks ) + { + /* We are already in position */ + return i_blocks; + } + + i_old_blocks = fd->i_blocks; + fd->i_blocks = i_blocks; + + if( aspi_read_internal( dvdcss->i_fd, sz_buf, 1 ) == -1 ) + { + fd->i_blocks = i_old_blocks; + dvdcss->i_pos = -1; + return -1; + } + + (fd->i_blocks)--; + + dvdcss->i_pos = fd->i_blocks; + + return dvdcss->i_pos; +} +#endif + +/***************************************************************************** + * Read commands. + *****************************************************************************/ +static int libc_read ( dvdcss_t dvdcss, void *p_buffer, int i_blocks ) +{ + off_t i_size, i_ret; + + i_size = (off_t)i_blocks * (off_t)DVDCSS_BLOCK_SIZE; + i_ret = read( dvdcss->i_read_fd, p_buffer, i_size ); + + if( i_ret < 0 ) + { + print_error( dvdcss, "read error" ); + dvdcss->i_pos = -1; + return i_ret; + } + + /* Handle partial reads */ + if( i_ret != i_size ) + { + int i_seek; + + dvdcss->i_pos = -1; + i_seek = libc_seek( dvdcss, i_ret / DVDCSS_BLOCK_SIZE ); + if( i_seek < 0 ) + { + return i_seek; + } + + /* We have to return now so that i_pos isn't clobbered */ + return i_ret / DVDCSS_BLOCK_SIZE; + } + + dvdcss->i_pos += i_ret / DVDCSS_BLOCK_SIZE; + return i_ret / DVDCSS_BLOCK_SIZE; +} + +#if defined( WIN32 ) +static int win2k_read ( dvdcss_t dvdcss, void *p_buffer, int i_blocks ) +{ + int i_bytes; + + if( !ReadFile( (HANDLE) dvdcss->i_fd, p_buffer, + i_blocks * DVDCSS_BLOCK_SIZE, + (LPDWORD)&i_bytes, NULL ) ) + { + dvdcss->i_pos = -1; + return -1; + } + + dvdcss->i_pos += i_bytes / DVDCSS_BLOCK_SIZE; + return i_bytes / DVDCSS_BLOCK_SIZE; +} + +static int aspi_read ( dvdcss_t dvdcss, void *p_buffer, int i_blocks ) +{ + int i_read = aspi_read_internal( dvdcss->i_fd, p_buffer, i_blocks ); + + if( i_read < 0 ) + { + dvdcss->i_pos = -1; + return i_read; + } + + dvdcss->i_pos += i_read; + return i_read; +} +#endif + +/***************************************************************************** + * Readv commands. + *****************************************************************************/ +static int libc_readv ( dvdcss_t dvdcss, struct iovec *p_iovec, int i_blocks ) +{ +#if defined( WIN32 ) + int i_index, i_len, i_total = 0; + unsigned char *p_base; + int i_bytes; + + for( i_index = i_blocks; + i_index; + i_index--, p_iovec++ ) + { + i_len = p_iovec->iov_len; + p_base = p_iovec->iov_base; + + if( i_len <= 0 ) + { + continue; + } + + i_bytes = read( dvdcss->i_fd, p_base, i_len ); + + if( i_bytes < 0 ) + { + /* One of the reads failed, too bad. + * We won't even bother returning the reads that went ok, + * and as in the posix spec the file postition is left + * unspecified after a failure */ + dvdcss->i_pos = -1; + return -1; + } + + i_total += i_bytes; + + if( i_bytes != i_len ) + { + /* We reached the end of the file or a signal interrupted + * the read. Return a partial read. */ + int i_seek; + + dvdcss->i_pos = -1; + i_seek = libc_seek( dvdcss, i_total / DVDCSS_BLOCK_SIZE ); + if( i_seek < 0 ) + { + return i_seek; + } + + /* We have to return now so that i_pos isn't clobbered */ + return i_total / DVDCSS_BLOCK_SIZE; + } + } + + dvdcss->i_pos += i_total / DVDCSS_BLOCK_SIZE; + return i_total / DVDCSS_BLOCK_SIZE; +#else + int i_read = readv( dvdcss->i_read_fd, p_iovec, i_blocks ); + + if( i_read < 0 ) + { + dvdcss->i_pos = -1; + return i_read; + } + + dvdcss->i_pos += i_read / DVDCSS_BLOCK_SIZE; + return i_read / DVDCSS_BLOCK_SIZE; +#endif +} + +#if defined( WIN32 ) +/***************************************************************************** + * win_readv: vectored read using ReadFile for Win2K and ASPI for win9x + *****************************************************************************/ +static int win_readv ( dvdcss_t dvdcss, struct iovec *p_iovec, int i_blocks ) +{ + int i_index; + int i_blocks_read, i_blocks_total = 0; + + /* Check the size of the readv temp buffer, just in case we need to + * realloc something bigger */ + if( dvdcss->i_readv_buf_size < i_blocks * DVDCSS_BLOCK_SIZE ) + { + dvdcss->i_readv_buf_size = i_blocks * DVDCSS_BLOCK_SIZE; + + if( dvdcss->p_readv_buffer ) free( dvdcss->p_readv_buffer ); + + /* Allocate a buffer which will be used as a temporary storage + * for readv */ + dvdcss->p_readv_buffer = malloc( dvdcss->i_readv_buf_size ); + if( !dvdcss->p_readv_buffer ) + { + print_error( dvdcss, " failed (readv)" ); + dvdcss->i_pos = -1; + return -1; + } + } + + for( i_index = i_blocks; i_index; i_index-- ) + { + i_blocks_total += p_iovec[i_index-1].iov_len; + } + + if( i_blocks_total <= 0 ) return 0; + + i_blocks_total /= DVDCSS_BLOCK_SIZE; + + if( WIN2K ) + { + unsigned long int i_bytes; + if( !ReadFile( (HANDLE)dvdcss->i_fd, dvdcss->p_readv_buffer, + i_blocks_total * DVDCSS_BLOCK_SIZE, &i_bytes, NULL ) ) + { + /* The read failed... too bad. + * As in the posix spec the file postition is left + * unspecified after a failure */ + dvdcss->i_pos = -1; + return -1; + } + i_blocks_read = i_bytes / DVDCSS_BLOCK_SIZE; + } + else /* Win9x */ + { + i_blocks_read = aspi_read_internal( dvdcss->i_fd, + dvdcss->p_readv_buffer, + i_blocks_total ); + if( i_blocks_read < 0 ) + { + /* See above */ + dvdcss->i_pos = -1; + return -1; + } + } + + /* We just have to copy the content of the temp buffer into the iovecs */ + for( i_index = 0, i_blocks_total = i_blocks_read; + i_blocks_total > 0; + i_index++ ) + { + memcpy( p_iovec[i_index].iov_base, + dvdcss->p_readv_buffer + (i_blocks_read - i_blocks_total) + * DVDCSS_BLOCK_SIZE, + p_iovec[i_index].iov_len ); + /* if we read less blocks than asked, we'll just end up copying + * garbage, this isn't an issue as we return the number of + * blocks actually read */ + i_blocks_total -= ( p_iovec[i_index].iov_len / DVDCSS_BLOCK_SIZE ); + } + + dvdcss->i_pos += i_blocks_read; + return i_blocks_read; +} + +static int aspi_read_internal( int i_fd, void *p_data, int i_blocks ) +{ + HANDLE hEvent; + struct SRB_ExecSCSICmd ssc; + struct w32_aspidev *fd = (struct w32_aspidev *) i_fd; + + /* Create the transfer completion event */ + hEvent = CreateEvent( NULL, TRUE, FALSE, NULL ); + if( hEvent == NULL ) + { + return -1; + } + + 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( fd->i_sid ); + ssc.SRB_Target = HIBYTE( fd->i_sid ); + ssc.SRB_SenseLen = SENSE_LEN; + + ssc.SRB_PostProc = (LPVOID) hEvent; + ssc.SRB_BufPointer = p_data; + ssc.SRB_CDBLen = 12; + + ssc.CDBByte[0] = 0xA8; /* RAW */ + ssc.CDBByte[2] = (UCHAR) (fd->i_blocks >> 24); + ssc.CDBByte[3] = (UCHAR) (fd->i_blocks >> 16) & 0xff; + ssc.CDBByte[4] = (UCHAR) (fd->i_blocks >> 8) & 0xff; + ssc.CDBByte[5] = (UCHAR) (fd->i_blocks) & 0xff; + + /* We have to break down the reads into 64kb pieces (ASPI restriction) */ + if( i_blocks > 32 ) + { + ssc.SRB_BufLen = 32 * DVDCSS_BLOCK_SIZE; + ssc.CDBByte[9] = 32; + fd->i_blocks += 32; + + /* Initiate transfer */ + ResetEvent( hEvent ); + fd->lpSendCommand( (void*) &ssc ); + + /* transfer the next 64kb (aspi_read_internal is called recursively) + * We need to check the status of the read on return */ + if( aspi_read_internal( i_fd, + (uint8_t*) p_data + 32 * DVDCSS_BLOCK_SIZE, + i_blocks - 32) < 0 ) + { + return -1; + } + } + else + { + /* This is the last transfer */ + ssc.SRB_BufLen = i_blocks * DVDCSS_BLOCK_SIZE; + ssc.CDBByte[9] = (UCHAR) i_blocks; + fd->i_blocks += i_blocks; + + /* Initiate transfer */ + ResetEvent( hEvent ); + fd->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; + } + + return i_blocks; +} +#endif + |