1099 lines
36 KiB
C
1099 lines
36 KiB
C
/* -*- tab-width: 8; c-basic-offset: 4 -*- */
|
|
/*
|
|
* DOS interrupt 2fh handler
|
|
*
|
|
* Cdrom - device driver emulation - Audio features.
|
|
* Copyright (c) 1998 Petr Tomasek <tomasek@etf.cuni.cz>
|
|
* Copyright (c) 1999,2002 Eric Pouech
|
|
*
|
|
* This library is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU Lesser General Public
|
|
* License as published by the Free Software Foundation; either
|
|
* version 2.1 of the License, or (at your option) any later version.
|
|
*
|
|
* This library 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
|
|
* Lesser General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public
|
|
* License along with this library; if not, write to the Free Software
|
|
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
|
|
*/
|
|
|
|
#include "config.h"
|
|
|
|
#include <string.h>
|
|
|
|
#include "ntstatus.h"
|
|
#define WIN32_NO_STATUS
|
|
#define NONAMELESSUNION
|
|
#include "wine/winbase16.h"
|
|
#include "wine/debug.h"
|
|
#include "winternl.h"
|
|
#include "winioctl.h"
|
|
#include "ntddstor.h"
|
|
#include "ntddcdrm.h"
|
|
#include "dosexe.h"
|
|
|
|
WINE_DEFAULT_DEBUG_CHANNEL(int);
|
|
|
|
/* base KERNEL ordinal number for VxDs */
|
|
#define VXD_BASE 900
|
|
|
|
typedef struct
|
|
{
|
|
DOS_DEVICE_HEADER hdr;
|
|
|
|
WORD reserved; /* must be 0 */
|
|
BYTE drive; /* drive letter (0=A:, 1=B:, ...) */
|
|
BYTE units; /* number of supported units */
|
|
} CDROM_DEVICE_HEADER;
|
|
|
|
typedef struct
|
|
{
|
|
CDROM_DEVICE_HEADER hdr;
|
|
WINEDEV_THUNK thunk;
|
|
|
|
WORD cdrom_segment; /* Real mode segment for CDROM_HEAP */
|
|
WORD cdrom_selector; /* Protected mode selector for CDROM_HEAP */
|
|
} CDROM_HEAP;
|
|
|
|
static void do_int2f_16( CONTEXT *context );
|
|
static void MSCDEX_Handler( CONTEXT *context );
|
|
|
|
/**********************************************************************
|
|
* DOSVM_Int2fHandler
|
|
*
|
|
* Handler for int 2fh (multiplex).
|
|
*/
|
|
void WINAPI DOSVM_Int2fHandler( CONTEXT *context )
|
|
{
|
|
TRACE("Subfunction 0x%X\n", AX_reg(context));
|
|
|
|
switch(AH_reg(context))
|
|
{
|
|
case 0x10:
|
|
SET_AL( context, 0xff ); /* share is installed */
|
|
break;
|
|
|
|
case 0x11: /* Network Redirector / IFSFUNC */
|
|
switch (LOBYTE(context->Eax))
|
|
{
|
|
case 0x00: /* Install check */
|
|
/* not installed */
|
|
break;
|
|
case 0x80: /* Enhanced services - Install check */
|
|
/* not installed */
|
|
break;
|
|
default:
|
|
INT_BARF( context, 0x2f );
|
|
break;
|
|
}
|
|
break;
|
|
|
|
case 0x12:
|
|
switch (LOBYTE(context->Eax))
|
|
{
|
|
case 0x2e: /* get or set DOS error table address */
|
|
switch (DL_reg(context))
|
|
{
|
|
/* Four tables: even commands are 'get', odd are 'set' */
|
|
/* DOS 5.0+ ignores "set" commands */
|
|
case 0x01:
|
|
case 0x03:
|
|
case 0x05:
|
|
case 0x07:
|
|
case 0x09:
|
|
break;
|
|
/* Instead of having a message table in DOS-space, */
|
|
/* we can use a special case for MS-DOS to force */
|
|
/* the secondary interface. */
|
|
case 0x00:
|
|
case 0x02:
|
|
case 0x04:
|
|
case 0x06:
|
|
context->SegEs = 0x0001;
|
|
SET_DI( context, 0x0000 );
|
|
break;
|
|
case 0x08:
|
|
FIXME("No real-mode handler for errors yet! (bye!)\n");
|
|
break;
|
|
default:
|
|
INT_BARF(context, 0x2f);
|
|
}
|
|
break;
|
|
default:
|
|
INT_BARF(context, 0x2f);
|
|
}
|
|
break;
|
|
|
|
case 0x15: /* mscdex */
|
|
MSCDEX_Handler(context);
|
|
break;
|
|
|
|
case 0x16:
|
|
do_int2f_16( context );
|
|
break;
|
|
|
|
case 0x1a: /* ANSI.SYS / AVATAR.SYS Install Check */
|
|
/* Not supported yet, do nothing */
|
|
break;
|
|
|
|
case 0x43:
|
|
#if 1
|
|
switch (LOBYTE(context->Eax))
|
|
{
|
|
case 0x00: /* XMS v2+ installation check */
|
|
WARN("XMS is not fully implemented\n");
|
|
SET_AL( context, 0x80 );
|
|
break;
|
|
case 0x10: /* XMS v2+ get driver address */
|
|
{
|
|
context->SegEs = DOSVM_dpmi_segments->xms_seg;
|
|
SET_BX( context, 0 );
|
|
break;
|
|
}
|
|
default:
|
|
INT_BARF( context, 0x2f );
|
|
}
|
|
#else
|
|
FIXME("check for XMS (not supported)\n");
|
|
SET_AL( context, 0x42 ); /* != 0x80 */
|
|
#endif
|
|
break;
|
|
|
|
case 0x45:
|
|
switch (LOBYTE(context->Eax))
|
|
{
|
|
case 0x00:
|
|
case 0x01:
|
|
case 0x02:
|
|
case 0x03:
|
|
case 0x04:
|
|
case 0x05:
|
|
case 0x06:
|
|
case 0x07:
|
|
case 0x08:
|
|
/* Microsoft Profiler - not installed */
|
|
break;
|
|
default:
|
|
INT_BARF( context, 0x2f );
|
|
}
|
|
break;
|
|
|
|
case 0x4a:
|
|
switch(LOBYTE(context->Eax))
|
|
{
|
|
case 0x10: /* smartdrv */
|
|
break; /* not installed */
|
|
case 0x11: /* dblspace */
|
|
break; /* not installed */
|
|
case 0x12: /* realtime compression interface */
|
|
break; /* not installed */
|
|
case 0x32: /* patch IO.SYS (???) */
|
|
break; /* we have no IO.SYS, so we can't patch it :-/ */
|
|
default:
|
|
INT_BARF( context, 0x2f );
|
|
}
|
|
break;
|
|
case 0x4b:
|
|
switch(LOBYTE(context->Eax))
|
|
{
|
|
case 0x01:
|
|
case 0x02:
|
|
case 0x03:
|
|
case 0x04:
|
|
case 0x05:
|
|
FIXME("Task Switcher - not implemented\n");
|
|
break;
|
|
default:
|
|
INT_BARF( context, 0x2f );
|
|
}
|
|
break;
|
|
case 0x56: /* INTERLNK */
|
|
switch(LOBYTE(context->Eax))
|
|
{
|
|
case 0x01: /* check if redirected drive */
|
|
SET_AL( context, 0 ); /* not redirected */
|
|
break;
|
|
default:
|
|
INT_BARF( context, 0x2f );
|
|
}
|
|
break;
|
|
case 0x7a: /* NOVELL NetWare */
|
|
switch (LOBYTE(context->Eax))
|
|
{
|
|
case 0x0: /* Low-level Netware installation check AL=0 not installed.*/
|
|
SET_AL( context, 0 );
|
|
break;
|
|
case 0x20: /* Get VLM Call Address */
|
|
/* return nothing -> NetWare not installed */
|
|
break;
|
|
default:
|
|
INT_BARF( context, 0x2f );
|
|
break;
|
|
}
|
|
break;
|
|
case 0xb7: /* append */
|
|
SET_AL( context, 0 ); /* not installed */
|
|
break;
|
|
case 0xb8: /* network */
|
|
switch (LOBYTE(context->Eax))
|
|
{
|
|
case 0x00: /* Install check */
|
|
/* not installed */
|
|
break;
|
|
default:
|
|
INT_BARF( context, 0x2f );
|
|
break;
|
|
}
|
|
break;
|
|
case 0xbc:
|
|
if (AL_reg(context) == 0x00 && BX_reg(context) == 0x3f3f) {
|
|
/* MVSOUND.SYS - Install check: not installed */
|
|
} else {
|
|
INT_BARF( context, 0x2f );
|
|
}
|
|
break;
|
|
case 0xbd: /* some Novell network install check ??? */
|
|
SET_AX( context, 0xa5a5 ); /* pretend to have Novell IPX installed */
|
|
break;
|
|
case 0xbf: /* REDIRIFS.EXE */
|
|
switch (LOBYTE(context->Eax))
|
|
{
|
|
case 0x00: /* Install check */
|
|
/* not installed */
|
|
break;
|
|
default:
|
|
INT_BARF( context, 0x2f );
|
|
break;
|
|
}
|
|
break;
|
|
case 0xd2:
|
|
switch(LOBYTE(context->Eax))
|
|
{
|
|
case 0x01: /* Quarterdeck RPCI - QEMM/QRAM - PCL-838.EXE functions */
|
|
if(BX_reg(context) == 0x5145 && CX_reg(context) == 0x4D4D
|
|
&& DX_reg(context) == 0x3432)
|
|
TRACE("Check for QEMM v5.0+ (not installed)\n");
|
|
break;
|
|
default:
|
|
INT_BARF( context, 0x2f );
|
|
break;
|
|
}
|
|
break;
|
|
case 0xd7: /* Banyan Vines */
|
|
switch (LOBYTE(context->Eax))
|
|
{
|
|
case 0x01: /* Install check - Get Int Number */
|
|
/* not installed */
|
|
break;
|
|
default:
|
|
INT_BARF( context, 0x2f );
|
|
break;
|
|
}
|
|
break;
|
|
case 0xde:
|
|
switch(LOBYTE(context->Eax))
|
|
{
|
|
case 0x01: /* Quarterdeck QDPMI.SYS - DESQview */
|
|
if(BX_reg(context) == 0x4450 && CX_reg(context) == 0x4d49
|
|
&& DX_reg(context) == 0x8f4f)
|
|
TRACE("Check for QDPMI.SYS (not installed)\n");
|
|
break;
|
|
default:
|
|
INT_BARF( context, 0x2f );
|
|
break;
|
|
}
|
|
break;
|
|
case 0xfa: /* Watcom debugger check, returns 0x666 if installed */
|
|
break;
|
|
default:
|
|
INT_BARF( context, 0x2f );
|
|
break;
|
|
}
|
|
}
|
|
|
|
|
|
/**********************************************************************
|
|
* do_int2f_16
|
|
*/
|
|
static void do_int2f_16( CONTEXT *context )
|
|
{
|
|
DWORD addr;
|
|
|
|
switch(LOBYTE(context->Eax))
|
|
{
|
|
case 0x00: /* Windows enhanced mode installation check */
|
|
SET_AX( context, LOWORD(GetVersion16()) );
|
|
break;
|
|
|
|
case 0x0a: /* Get Windows version and type */
|
|
SET_AX( context, 0 );
|
|
SET_BX( context, (LOWORD(GetVersion16()) << 8) | (LOWORD(GetVersion16()) >> 8) );
|
|
SET_CX( context, 3 );
|
|
break;
|
|
|
|
case 0x0b: /* Identify Windows-aware TSRs */
|
|
/* we don't have any pre-Windows TSRs */
|
|
break;
|
|
|
|
case 0x11: /* Get Shell Parameters - (SHELL= in CONFIG.SYS) */
|
|
/* We can mock this up. But not today... */
|
|
FIXME("Get Shell Parameters\n");
|
|
break;
|
|
|
|
case 0x80: /* Release time-slice */
|
|
/* Linux sched_yield() still keeps burning CPU cycles
|
|
* if the current process is the only one in highest priority list
|
|
* (as Linux will immediately return to this process to waste
|
|
* more CPU cycles), so sched_yield() is essentially useless for us
|
|
* (poor API, if you ask me: its return code should indicate
|
|
* whether other processes did run in between, in order for us
|
|
* to be able to decide whether to do an additional Sleep() or not...)
|
|
* Thus we better unconditionally use a well-balanced Sleep()
|
|
* instead to really make sure the process calling int 0x2f/0x1680
|
|
* *doesn't* use 100% CPU...
|
|
*/
|
|
Sleep(55); /* just wait 55ms (one "timer tick") for now. */
|
|
SET_AL( context, 0 );
|
|
break;
|
|
|
|
case 0x81: /* Begin critical section. */
|
|
/* FIXME? */
|
|
break;
|
|
|
|
case 0x82: /* End critical section. */
|
|
/* FIXME? */
|
|
break;
|
|
|
|
case 0x83: /* Return Current Virtual Machine ID */
|
|
/* Virtual Machines are usually created/destroyed when Windows runs
|
|
* DOS programs. Since we never do, we are always in the System VM.
|
|
* According to Ralf Brown's Interrupt List, never return 0. But it
|
|
* seems to work okay (returning 0), just to be sure we return 1.
|
|
*/
|
|
SET_BX( context, 1 ); /* VM 1 is probably the System VM */
|
|
break;
|
|
|
|
case 0x84: /* Get device API entry point */
|
|
{
|
|
HMODULE16 mod = GetModuleHandle16("kernel");
|
|
addr = (DWORD)GetProcAddress16( mod, (LPCSTR)(VXD_BASE + BX_reg(context)) );
|
|
if (!addr) /* not supported */
|
|
ERR("Accessing unknown VxD %04x - Expect a failure now.\n", BX_reg(context) );
|
|
context->SegEs = SELECTOROF(addr);
|
|
SET_DI( context, OFFSETOF(addr) );
|
|
}
|
|
break;
|
|
|
|
case 0x86: /* DPMI detect mode */
|
|
SET_AX( context, 0 ); /* Running under DPMI */
|
|
break;
|
|
|
|
case 0x87: /* DPMI installation check */
|
|
{
|
|
SYSTEM_INFO si;
|
|
GetSystemInfo(&si);
|
|
SET_AX( context, 0x0000 ); /* DPMI Installed */
|
|
SET_BX( context, 0x0001 ); /* 32bits available */
|
|
SET_CL( context, si.wProcessorLevel );
|
|
SET_DX( context, 0x005a ); /* DPMI major/minor 0.90 */
|
|
SET_SI( context, 0 ); /* # of para. of DOS extended private data */
|
|
context->SegEs = DOSVM_dpmi_segments->dpmi_seg;
|
|
SET_DI( context, 0 ); /* ES:DI is DPMI switch entry point */
|
|
break;
|
|
}
|
|
case 0x8a: /* DPMI get vendor-specific API entry point. */
|
|
/* The 1.0 specs say this should work with all 0.9 hosts. */
|
|
break;
|
|
|
|
default:
|
|
INT_BARF( context, 0x2f );
|
|
}
|
|
}
|
|
|
|
/* FIXME: this macro may have to be changed on architectures where <size> reads/writes
|
|
* must be <size> aligned
|
|
* <size> could be WORD, DWORD...
|
|
* in this case, we would need two macros, one for read, the other one for write
|
|
* Note: PTR_AT can be used as an l-value
|
|
*/
|
|
#define PTR_AT(_ptr, _ofs, _typ) (*((_typ*)(((char*)_ptr)+(_ofs))))
|
|
|
|
/* Use #if 1 if you want full int 2f debug... normal users can leave it at 0 */
|
|
#if 0
|
|
/**********************************************************************
|
|
* MSCDEX_Dump [internal]
|
|
*
|
|
* Dumps mscdex requests to int debug channel.
|
|
*/
|
|
static void MSCDEX_Dump(char* pfx, BYTE* req, int dorealmode)
|
|
{
|
|
int i;
|
|
BYTE buf[2048];
|
|
BYTE* ptr;
|
|
BYTE* ios;
|
|
|
|
ptr = buf;
|
|
ptr += sprintf(ptr, "%s\tCommand => ", pfx);
|
|
for (i = 0; i < req[0]; i++) {
|
|
ptr += sprintf(ptr, "%02x ", req[i]);
|
|
}
|
|
|
|
switch (req[2]) {
|
|
case 3:
|
|
case 12:
|
|
ptr += sprintf(ptr, "\n\t\t\t\tIO_struct => ");
|
|
ios = (dorealmode) ? PTR_REAL_TO_LIN( PTR_AT(req, 16, WORD), PTR_AT(req, 14, WORD)) :
|
|
MapSL(MAKESEGPTR(PTR_AT(req, 16, WORD), PTR_AT(req, 14, WORD)));
|
|
|
|
for (i = 0; i < PTR_AT(req, 18, WORD); i++) {
|
|
ptr += sprintf(ptr, "%02x ", ios[i]);
|
|
if ((i & 0x1F) == 0x1F) {
|
|
*ptr++ = '\n';
|
|
*ptr = 0;
|
|
}
|
|
}
|
|
break;
|
|
}
|
|
TRACE("%s\n", buf);
|
|
}
|
|
#else
|
|
#define MSCDEX_Dump(pfx, req, drm)
|
|
#endif
|
|
|
|
#define CDFRAMES_PERSEC 75
|
|
#define CDFRAMES_PERMIN (CDFRAMES_PERSEC * 60)
|
|
#define FRAME_OF_ADDR(a) ((a)[1] * CDFRAMES_PERMIN + (a)[2] * CDFRAMES_PERSEC + (a)[3])
|
|
#define FRAME_OF_TOC(toc, idx) FRAME_OF_ADDR((toc).TrackData[idx - (toc).FirstTrack].Address)
|
|
#define CTRL_OF_TOC(toc, idx) (((toc).TrackData[idx - (toc).FirstTrack].Control << 4) | \
|
|
(toc).TrackData[idx - (toc).FirstTrack].Adr)
|
|
|
|
static void MSCDEX_StoreMSF(DWORD frame, BYTE* val)
|
|
{
|
|
val[3] = 0; /* zero */
|
|
val[2] = frame / CDFRAMES_PERMIN; /* minutes */
|
|
val[1] = (frame / CDFRAMES_PERSEC) % 60; /* seconds */
|
|
val[0] = frame % CDFRAMES_PERSEC; /* frames */
|
|
}
|
|
|
|
static BOOL is_cdrom(int drive)
|
|
{
|
|
char root[] = "A:\\";
|
|
root[0] += drive;
|
|
return (GetDriveTypeA(root) == DRIVE_CDROM);
|
|
}
|
|
|
|
/***********************************************************************
|
|
* CDROM_FillHeap
|
|
*
|
|
* Initialize CDROM heap.
|
|
*
|
|
*/
|
|
static void CDROM_FillHeap( CDROM_HEAP *heap )
|
|
{
|
|
int drive, count;
|
|
|
|
/* Count the number of contiguous CDROM drives
|
|
*/
|
|
for (drive = count = 0; drive < 26; drive++) {
|
|
if (is_cdrom(drive)) {
|
|
while (is_cdrom(drive + count)) count++;
|
|
break;
|
|
}
|
|
}
|
|
TRACE("Installation check: %d cdroms, starting at %d\n", count, drive);
|
|
heap->hdr.drive = (drive < 26) ? drive : 0;
|
|
heap->hdr.units = count;
|
|
heap->hdr.reserved = 0;
|
|
}
|
|
|
|
/**********************************************************************
|
|
* CDROM_GetHeap
|
|
*
|
|
* Get pointer for CDROM heap (CDROM_HEAP).
|
|
* Creates and initializes heap on first call.
|
|
*/
|
|
static CDROM_HEAP *CDROM_GetHeap( void )
|
|
{
|
|
static CDROM_HEAP *heap_pointer = NULL;
|
|
|
|
if ( !heap_pointer )
|
|
{
|
|
WORD heap_segment;
|
|
WORD heap_selector;
|
|
|
|
/* allocate a new DOS data segment */
|
|
heap_pointer = DOSVM_AllocDataUMB( sizeof(CDROM_HEAP),
|
|
&heap_segment,
|
|
&heap_selector );
|
|
|
|
heap_pointer->cdrom_segment = heap_segment;
|
|
heap_pointer->cdrom_selector = heap_selector;
|
|
CDROM_FillHeap( heap_pointer );
|
|
}
|
|
|
|
return heap_pointer;
|
|
}
|
|
|
|
static void MSCDEX_Request(BYTE *driver_request, BOOL dorealmode)
|
|
{
|
|
BYTE* io_stru;
|
|
BYTE Error = 255; /* No Error */
|
|
char devName[] = "\\\\.\\@:";
|
|
HANDLE h;
|
|
CDROM_TOC toc;
|
|
CDROM_SUB_Q_DATA_FORMAT fmt;
|
|
SUB_Q_CHANNEL_DATA data;
|
|
DWORD br;
|
|
BOOL present = TRUE;
|
|
|
|
/* FIXME
|
|
* the following tests are wrong because lots of functions don't require the
|
|
* tray to be closed with a CD inside
|
|
*/
|
|
TRACE("CDROM device driver -> command <%d>\n", driver_request[2]);
|
|
|
|
MSCDEX_Dump("Beg", driver_request, dorealmode);
|
|
|
|
/* set status to 0 */
|
|
PTR_AT(driver_request, 3, WORD) = 0;
|
|
devName[4] = 'A' + CDROM_GetHeap()->hdr.drive + driver_request[1];
|
|
h = CreateFileA(devName, GENERIC_READ, FILE_SHARE_READ, NULL, OPEN_EXISTING, 0, 0);
|
|
if (h == INVALID_HANDLE_VALUE) {
|
|
WARN("Couldn't open cdrom handle\n");
|
|
driver_request[4] |= 0x80;
|
|
driver_request[3] = 1; /* unknown unit */
|
|
return;
|
|
}
|
|
|
|
fmt.Format = IOCTL_CDROM_CURRENT_POSITION;
|
|
if (!DeviceIoControl(h, IOCTL_CDROM_READ_TOC, NULL, 0, &toc, sizeof(toc), &br, NULL) ||
|
|
!DeviceIoControl(h, IOCTL_CDROM_READ_Q_CHANNEL, &fmt, sizeof(fmt),
|
|
&data, sizeof(data), &br, NULL)) {
|
|
if (GetLastError() == STATUS_NO_MEDIA_IN_DEVICE)
|
|
{
|
|
if (driver_request[2] != 6 && driver_request[2] != 15)
|
|
{
|
|
driver_request[4] |= 0x80;
|
|
driver_request[3] = 2; /* drive not ready */
|
|
CloseHandle(h);
|
|
return;
|
|
}
|
|
present = FALSE;
|
|
}
|
|
else
|
|
{
|
|
driver_request[4] |= 0x80;
|
|
driver_request[3] = 1; /* unknown unit */
|
|
CloseHandle(h);
|
|
return;
|
|
}
|
|
}
|
|
|
|
switch (driver_request[2]) {
|
|
case 3:
|
|
io_stru = (dorealmode) ?
|
|
PTR_REAL_TO_LIN( PTR_AT(driver_request, 16, WORD), PTR_AT(driver_request, 14, WORD) ) :
|
|
MapSL( MAKESEGPTR(PTR_AT(driver_request, 16, WORD), PTR_AT(driver_request, 14, WORD)));
|
|
|
|
TRACE(" --> IOCTL INPUT <%d>\n", io_stru[0]);
|
|
switch (io_stru[0]) {
|
|
#if 0
|
|
case 0: /* Get device Header */
|
|
{
|
|
static LPSTR ptr = 0;
|
|
if (ptr == 0) {
|
|
ptr = SEGPTR_ALLOC(22);
|
|
PTR_AT(ptr, 0, DWORD) = ~1; /* Next Device Driver */
|
|
PTR_AT(ptr, 4, WORD) = 0xC800; /* Device attributes */
|
|
PTR_AT(ptr, 6, WORD) = 0x1234; /* Pointer to device strategy routine: FIXME */
|
|
PTR_AT(ptr, 8, WORD) = 0x3142; /* Pointer to device interrupt routine: FIXME */
|
|
PTR_AT(ptr, 10, char) = 'W'; /* 8-byte character device name field */
|
|
PTR_AT(ptr, 11, char) = 'I';
|
|
PTR_AT(ptr, 12, char) = 'N';
|
|
PTR_AT(ptr, 13, char) = 'E';
|
|
PTR_AT(ptr, 14, char) = '_';
|
|
PTR_AT(ptr, 15, char) = 'C';
|
|
PTR_AT(ptr, 16, char) = 'D';
|
|
PTR_AT(ptr, 17, char) = '_';
|
|
PTR_AT(ptr, 18, WORD) = 0; /* Reserved (must be zero) */
|
|
PTR_AT(ptr, 20, BYTE) = 0; /* Drive letter (must be zero) */
|
|
PTR_AT(ptr, 21, BYTE) = 1; /* Number of units supported (one or more) FIXME*/
|
|
}
|
|
PTR_AT(io_stru, DWORD, 0) = SEGPTR_GET(ptr);
|
|
}
|
|
break;
|
|
#endif
|
|
|
|
case 1: /* location of head */
|
|
switch (io_stru[1]) {
|
|
case 0:
|
|
PTR_AT(io_stru, 2, DWORD) =
|
|
FRAME_OF_ADDR(data.CurrentPosition.AbsoluteAddress);
|
|
break;
|
|
case 1:
|
|
MSCDEX_StoreMSF(FRAME_OF_ADDR(data.CurrentPosition.AbsoluteAddress),
|
|
io_stru + 2);
|
|
break;
|
|
default:
|
|
ERR("CD-ROM driver: unsupported addressing mode !!\n");
|
|
Error = 0x0c;
|
|
}
|
|
TRACE(" ----> HEAD LOCATION <%d>\n", PTR_AT(io_stru, 2, DWORD));
|
|
break;
|
|
|
|
case 4: /* Audio channel info */
|
|
io_stru[1] = 0;
|
|
io_stru[2] = 0xff;
|
|
io_stru[3] = 1;
|
|
io_stru[4] = 0xff;
|
|
io_stru[5] = 2;
|
|
io_stru[6] = 0;
|
|
io_stru[7] = 3;
|
|
io_stru[8] = 0;
|
|
TRACE(" ----> AUDIO CHANNEL INFO\n");
|
|
break;
|
|
|
|
case 6: /* device status */
|
|
PTR_AT(io_stru, 1, DWORD) = 0x00000290;
|
|
/* 290 =>
|
|
* 1 Supports HSG and Red Book addressing modes
|
|
* 0 Supports audio channel manipulation
|
|
*
|
|
* 1 Supports prefetching requests
|
|
* 0 Reserved
|
|
* 0 No interleaving
|
|
* 1 Data read and plays audio/video tracks
|
|
*
|
|
* 0 Read only
|
|
* 0 Supports only cooked reading
|
|
* 0 Door locked
|
|
* 0 see below (Door closed/opened)
|
|
*/
|
|
if (!present) PTR_AT(io_stru, 1, DWORD) |= 1;
|
|
TRACE(" ----> DEVICE STATUS <0x%08x>\n", PTR_AT(io_stru, 1, DWORD));
|
|
break;
|
|
|
|
case 8: /* Volume size */
|
|
PTR_AT(io_stru, 1, DWORD) = FRAME_OF_TOC(toc, toc.LastTrack + 1) -
|
|
FRAME_OF_TOC(toc, toc.FirstTrack) - 1;
|
|
TRACE(" ----> VOLUME SIZE <%d>\n", PTR_AT(io_stru, 1, DWORD));
|
|
break;
|
|
|
|
case 9: /* media changed ? */
|
|
/* answers don't know... -1/1 for yes/no would be better */
|
|
io_stru[1] = 0; /* FIXME? 1? */
|
|
TRACE(" ----> MEDIA CHANGED <%d>\n", io_stru[1]);
|
|
break;
|
|
|
|
case 10: /* audio disk info */
|
|
io_stru[1] = toc.FirstTrack; /* starting track of the disc */
|
|
io_stru[2] = toc.LastTrack; /* ending track */
|
|
MSCDEX_StoreMSF(FRAME_OF_TOC(toc, toc.LastTrack + 1) -
|
|
FRAME_OF_TOC(toc, toc.FirstTrack) - 1, io_stru + 3);
|
|
|
|
TRACE(" ----> AUDIO DISK INFO <%d-%d/%08x>\n",
|
|
io_stru[1], io_stru[2], PTR_AT(io_stru, 3, DWORD));
|
|
break;
|
|
|
|
case 11: /* audio track info */
|
|
if (io_stru[1] >= toc.FirstTrack && io_stru[1] <= toc.LastTrack) {
|
|
MSCDEX_StoreMSF(FRAME_OF_TOC(toc, io_stru[1]), io_stru + 2);
|
|
/* starting point if the track */
|
|
io_stru[6] = CTRL_OF_TOC(toc, io_stru[1]);
|
|
} else {
|
|
PTR_AT(io_stru, 2, DWORD) = 0;
|
|
io_stru[6] = 0;
|
|
}
|
|
TRACE(" ----> AUDIO TRACK INFO[%d] = [%08x:%d]\n",
|
|
io_stru[1], PTR_AT(io_stru, 2, DWORD), io_stru[6]);
|
|
break;
|
|
|
|
case 12: /* get Q-Channel info */
|
|
io_stru[1] = CTRL_OF_TOC(toc, data.CurrentPosition.TrackNumber);
|
|
io_stru[2] = data.CurrentPosition.TrackNumber;
|
|
io_stru[3] = 0; /* FIXME ?? */
|
|
|
|
/* why the heck did MS use another format for 0MSF information... sigh */
|
|
{
|
|
BYTE bTmp[4];
|
|
|
|
MSCDEX_StoreMSF(FRAME_OF_ADDR(data.CurrentPosition.TrackRelativeAddress), bTmp);
|
|
io_stru[ 4] = bTmp[2];
|
|
io_stru[ 5] = bTmp[1];
|
|
io_stru[ 6] = bTmp[0];
|
|
io_stru[ 7] = 0;
|
|
|
|
MSCDEX_StoreMSF(FRAME_OF_ADDR(data.CurrentPosition.AbsoluteAddress), bTmp);
|
|
io_stru[ 8] = bTmp[2];
|
|
io_stru[ 9] = bTmp[1];
|
|
io_stru[10] = bTmp[0];
|
|
io_stru[11] = 0;
|
|
}
|
|
TRACE("Q-Channel info: Ctrl/adr=%02x TNO=%02x X=%02x rtt=%02x:%02x:%02x rtd=%02x:%02x:%02x (cf=%08x, tp=%08x)\n",
|
|
io_stru[ 1], io_stru[ 2], io_stru[ 3],
|
|
io_stru[ 4], io_stru[ 5], io_stru[ 6],
|
|
io_stru[ 8], io_stru[ 9], io_stru[10],
|
|
FRAME_OF_ADDR(data.CurrentPosition.AbsoluteAddress),
|
|
FRAME_OF_TOC(toc, data.CurrentPosition.TrackNumber));
|
|
break;
|
|
|
|
case 15: /* Audio status info */
|
|
/* !!!! FIXME FIXME FIXME !! */
|
|
PTR_AT(io_stru, 1, WORD) = 2 | ((data.CurrentPosition.Header.AudioStatus == AUDIO_STATUS_PAUSED) ? 1 : 0);
|
|
if (!present) {
|
|
PTR_AT(io_stru, 3, DWORD) = 0;
|
|
PTR_AT(io_stru, 7, DWORD) = 0;
|
|
} else {
|
|
PTR_AT(io_stru, 3, DWORD) = FRAME_OF_TOC(toc, toc.FirstTrack);
|
|
PTR_AT(io_stru, 7, DWORD) = FRAME_OF_TOC(toc, toc.LastTrack + 1);
|
|
}
|
|
TRACE("Audio status info: status=%04x startLoc=%d endLoc=%d\n",
|
|
PTR_AT(io_stru, 1, WORD), PTR_AT(io_stru, 3, DWORD), PTR_AT(io_stru, 7, DWORD));
|
|
break;
|
|
|
|
default:
|
|
FIXME("IOCTL INPUT: Unimplemented <%d>!!\n", io_stru[0]);
|
|
Error = 0x0c;
|
|
break;
|
|
}
|
|
break;
|
|
|
|
case 12:
|
|
io_stru = (dorealmode) ?
|
|
PTR_REAL_TO_LIN( PTR_AT(driver_request, 16, WORD), PTR_AT(driver_request, 14, WORD)) :
|
|
MapSL( MAKESEGPTR(PTR_AT(driver_request, 16, WORD), PTR_AT(driver_request, 14, WORD)));
|
|
|
|
TRACE(" --> IOCTL OUTPUT <%d>\n", io_stru[0]);
|
|
switch (io_stru[0]) {
|
|
case 0: /* eject */
|
|
DeviceIoControl(h, IOCTL_STORAGE_EJECT_MEDIA, NULL, 0, NULL, 0, &br, NULL);
|
|
TRACE(" ----> EJECT\n");
|
|
break;
|
|
case 2: /* reset drive */
|
|
DeviceIoControl(h, IOCTL_STORAGE_RESET_DEVICE, NULL, 0, NULL, 0, &br, NULL);
|
|
TRACE(" ----> RESET\n");
|
|
break;
|
|
case 3: /* Audio Channel Control */
|
|
FIXME(" ----> AUDIO CHANNEL CONTROL (NIY)\n");
|
|
break;
|
|
case 5: /* close tray */
|
|
DeviceIoControl(h, IOCTL_STORAGE_LOAD_MEDIA, NULL, 0, NULL, 0, &br, NULL);
|
|
TRACE(" ----> CLOSE TRAY\n");
|
|
break;
|
|
default:
|
|
FIXME(" IOCTL OUTPUT: Unimplemented <%d>!!\n", io_stru[0]);
|
|
Error = 0x0c;
|
|
break;
|
|
}
|
|
break;
|
|
|
|
case 128: /* read long */
|
|
{
|
|
LPVOID dst = MapSL(MAKESEGPTR(PTR_AT(driver_request, 16, WORD),
|
|
PTR_AT(driver_request, 14, WORD)));
|
|
DWORD at = PTR_AT(driver_request, 20, DWORD);
|
|
WORD num = PTR_AT(driver_request, 18, WORD);
|
|
RAW_READ_INFO rri;
|
|
|
|
switch (driver_request[13]) {
|
|
case 1: /* Red book addressing mode = 0:m:s:f */
|
|
/* FIXME : frame <=> msf conversion routines could be shared
|
|
* between mscdex and mcicda
|
|
*/
|
|
at = LOBYTE(HIWORD(at)) * CDFRAMES_PERMIN +
|
|
HIBYTE(LOWORD(at)) * CDFRAMES_PERSEC +
|
|
LOBYTE(LOWORD(at));
|
|
/* fall through */
|
|
case 0: /* HSG addressing mode */
|
|
switch (PTR_AT(driver_request, 24, BYTE))
|
|
{
|
|
case 0: /* cooked */
|
|
ReadFile(h, dst, num * 2048, &br, NULL);
|
|
break;
|
|
case 1:
|
|
/* FIXME: computation is wrong */
|
|
rri.DiskOffset.u.HighPart = 0;
|
|
rri.DiskOffset.u.LowPart = at << 11;
|
|
rri.TrackMode = YellowMode2;
|
|
rri.SectorCount = num;
|
|
DeviceIoControl(h, IOCTL_CDROM_RAW_READ, &rri, sizeof(rri),
|
|
dst, num * 2352, &br, NULL);
|
|
break;
|
|
default:
|
|
ERR("Unsupported read mode !!\n");
|
|
Error = 0x0c;
|
|
break;
|
|
}
|
|
break;
|
|
default:
|
|
ERR("Unsupported address mode !!\n");
|
|
Error = 0x0c;
|
|
break;
|
|
}
|
|
}
|
|
break;
|
|
|
|
case 131: /* seek */
|
|
{
|
|
DWORD at;
|
|
CDROM_SEEK_AUDIO_MSF seek;
|
|
|
|
at = PTR_AT(driver_request, 20, DWORD);
|
|
|
|
TRACE(" --> SEEK AUDIO mode :<0x%02X>, [%d]\n", driver_request[13], at);
|
|
|
|
switch (driver_request[13]) {
|
|
case 1: /* Red book addressing mode = 0:m:s:f */
|
|
/* FIXME : frame <=> msf conversion routines could be shared
|
|
* between mscdex and mcicda
|
|
*/
|
|
at = LOBYTE(HIWORD(at)) * CDFRAMES_PERMIN +
|
|
HIBYTE(LOWORD(at)) * CDFRAMES_PERSEC +
|
|
LOBYTE(LOWORD(at));
|
|
/* fall through */
|
|
case 0: /* HSG addressing mode */
|
|
seek.M = at / CDFRAMES_PERMIN;
|
|
seek.S = (at / CDFRAMES_PERSEC) % 60;
|
|
seek.F = at % CDFRAMES_PERSEC;
|
|
DeviceIoControl(h, IOCTL_CDROM_SEEK_AUDIO_MSF, &seek, sizeof(seek),
|
|
NULL, 0, &br, NULL);
|
|
break;
|
|
default:
|
|
ERR("Unsupported address mode !!\n");
|
|
Error = 0x0c;
|
|
break;
|
|
}
|
|
}
|
|
break;
|
|
|
|
case 132: /* play */
|
|
{
|
|
DWORD beg, end;
|
|
CDROM_PLAY_AUDIO_MSF play;
|
|
|
|
beg = end = PTR_AT(driver_request, 14, DWORD);
|
|
end += PTR_AT(driver_request, 18, DWORD);
|
|
|
|
TRACE(" --> PLAY AUDIO mode :<0x%02X>, [%d-%d]\n", driver_request[13], beg, end);
|
|
|
|
switch (driver_request[13]) {
|
|
case 1:
|
|
/* Red book addressing mode = 0:m:s:f */
|
|
/* FIXME : frame <=> msf conversion routines could be shared
|
|
* between mscdex and mcicda
|
|
*/
|
|
beg = LOBYTE(LOWORD(beg)) * CDFRAMES_PERMIN +
|
|
HIBYTE(LOWORD(beg)) * CDFRAMES_PERSEC +
|
|
LOBYTE(HIWORD(beg));
|
|
end = LOBYTE(LOWORD(end)) * CDFRAMES_PERMIN +
|
|
HIBYTE(LOWORD(end)) * CDFRAMES_PERSEC +
|
|
LOBYTE(HIWORD(end));
|
|
/* fall through */
|
|
case 0: /* HSG addressing mode */
|
|
play.StartingM = beg / CDFRAMES_PERMIN;
|
|
play.StartingS = (beg / CDFRAMES_PERSEC) % 60;
|
|
play.StartingF = beg % CDFRAMES_PERSEC;
|
|
play.EndingM = end / CDFRAMES_PERMIN;
|
|
play.EndingS = (end / CDFRAMES_PERSEC) % 60;
|
|
play.EndingF = end % CDFRAMES_PERSEC;
|
|
DeviceIoControl(h, IOCTL_CDROM_PLAY_AUDIO_MSF, &play, sizeof(play),
|
|
NULL, 0, &br, NULL);
|
|
break;
|
|
default:
|
|
ERR("Unsupported address mode !!\n");
|
|
Error = 0x0c;
|
|
break;
|
|
}
|
|
}
|
|
break;
|
|
|
|
case 133:
|
|
if (data.CurrentPosition.Header.AudioStatus == AUDIO_STATUS_IN_PROGRESS) {
|
|
DeviceIoControl(h, IOCTL_CDROM_PAUSE_AUDIO, NULL, 0, NULL, 0, &br, NULL);
|
|
TRACE(" --> STOP AUDIO (Paused)\n");
|
|
} else {
|
|
DeviceIoControl(h, IOCTL_CDROM_STOP_AUDIO, NULL, 0, NULL, 0, &br, NULL);
|
|
TRACE(" --> STOP AUDIO (Stopped)\n");
|
|
}
|
|
break;
|
|
|
|
case 136:
|
|
TRACE(" --> RESUME AUDIO\n");
|
|
DeviceIoControl(h, IOCTL_CDROM_PAUSE_AUDIO, NULL, 0, NULL, 0, &br, NULL);
|
|
break;
|
|
|
|
default:
|
|
FIXME(" ioctl unimplemented <%d>\n", driver_request[2]);
|
|
Error = 0x0c;
|
|
}
|
|
|
|
/* setting error codes if any */
|
|
if (Error < 255) {
|
|
driver_request[4] |= 0x80;
|
|
driver_request[3] = Error;
|
|
}
|
|
|
|
CloseHandle(h);
|
|
/* setting status bits
|
|
* 3 == playing && done
|
|
* 1 == done
|
|
*/
|
|
driver_request[4] |=
|
|
(data.CurrentPosition.Header.AudioStatus == AUDIO_STATUS_IN_PROGRESS) ? 3 : 1;
|
|
|
|
MSCDEX_Dump("End", driver_request, dorealmode);
|
|
}
|
|
|
|
static void MSCDEX_Handler(CONTEXT* context)
|
|
{
|
|
int drive, count;
|
|
char* p;
|
|
|
|
switch (LOBYTE(context->Eax)) {
|
|
case 0x00: /* Installation check */
|
|
/* Count the number of contiguous CDROM drives
|
|
*/
|
|
for (drive = count = 0; drive < 26; drive++) {
|
|
if (is_cdrom(drive)) {
|
|
while (is_cdrom(drive + count)) count++;
|
|
break;
|
|
}
|
|
}
|
|
TRACE("Installation check: %d cdroms, starting at %d\n", count, drive);
|
|
SET_BX( context, count );
|
|
SET_CX( context, (drive < 26) ? drive : 0 );
|
|
break;
|
|
|
|
case 0x01: /* get drive device list */
|
|
{
|
|
CDROM_HEAP* cdrom_heap = CDROM_GetHeap();
|
|
CDROM_DEVICE_HEADER* dev = &cdrom_heap->hdr;
|
|
SEGPTR ptr_dev = ISV86(context)
|
|
? MAKESEGPTR( cdrom_heap->cdrom_segment,
|
|
FIELD_OFFSET(CDROM_HEAP, hdr) )
|
|
: MAKESEGPTR( cdrom_heap->cdrom_selector,
|
|
FIELD_OFFSET(CDROM_HEAP, hdr) );
|
|
|
|
p = CTX_SEG_OFF_TO_LIN(context, context->SegEs, context->Ebx);
|
|
for (drive = 0; drive < dev->units; drive++) {
|
|
*p = drive; /* subunit */
|
|
++p;
|
|
*(DWORD*)p = ptr_dev;
|
|
p += sizeof(DWORD);
|
|
}
|
|
TRACE("Get drive device list\n");
|
|
}
|
|
break;
|
|
|
|
case 0x0B: /* drive check */
|
|
SET_AX( context, is_cdrom(CX_reg(context)) );
|
|
SET_BX( context, 0xADAD );
|
|
break;
|
|
|
|
case 0x0C: /* get version */
|
|
SET_BX( context, 0x020a );
|
|
TRACE("Version number => %04x\n", BX_reg(context));
|
|
break;
|
|
|
|
case 0x0D: /* get drive letters */
|
|
p = CTX_SEG_OFF_TO_LIN(context, context->SegEs, context->Ebx);
|
|
memset(p, 0, 26);
|
|
for (drive = 0; drive < 26; drive++) {
|
|
if (is_cdrom(drive)) *p++ = drive;
|
|
}
|
|
TRACE("Get drive letters\n");
|
|
break;
|
|
|
|
case 0x10: /* direct driver access */
|
|
{
|
|
BYTE* driver_request;
|
|
CDROM_HEAP* cdrom_heap = CDROM_GetHeap();
|
|
|
|
if (!is_cdrom(CX_reg(context))) {
|
|
WARN("Request made doesn't match a CD ROM drive (%d)\n", CX_reg(context));
|
|
SET_CFLAG( context );
|
|
SET_AX( context, 0x000f ); /* invalid drive */
|
|
return;
|
|
}
|
|
|
|
driver_request = CTX_SEG_OFF_TO_LIN(context, context->SegEs, context->Ebx);
|
|
|
|
if (!driver_request) {
|
|
/* FIXME - to be deleted ?? */
|
|
ERR("ES:BX==0 ! SEGFAULT ?\n");
|
|
ERR("-->BX=0x%04x, ES=0x%04x, DS=0x%04x, CX=0x%04x\n",
|
|
BX_reg(context), context->SegEs, context->SegDs, CX_reg(context));
|
|
driver_request[4] |= 0x80;
|
|
driver_request[3] = 5; /* bad request length */
|
|
return;
|
|
}
|
|
|
|
driver_request[1] = CX_reg(context) - cdrom_heap->hdr.drive;
|
|
MSCDEX_Request(driver_request, ISV86(context));
|
|
}
|
|
break;
|
|
default:
|
|
FIXME("Unimplemented MSCDEX function 0x%02X.\n", LOBYTE(context->Eax));
|
|
break;
|
|
}
|
|
}
|
|
|
|
/* prototypes */
|
|
static void WINAPI cdrom_strategy(CONTEXT*ctx);
|
|
static void WINAPI cdrom_interrupt(CONTEXT*ctx);
|
|
|
|
/* device info */
|
|
static const WINEDEV cdromdev =
|
|
{
|
|
"WINE_CD_",
|
|
ATTR_CHAR|ATTR_REMOVABLE|ATTR_IOCTL,
|
|
cdrom_strategy, cdrom_interrupt
|
|
};
|
|
|
|
static REQUEST_HEADER *cdrom_driver_request;
|
|
|
|
/* Return to caller */
|
|
static void do_lret(CONTEXT*ctx)
|
|
{
|
|
WORD *stack = CTX_SEG_OFF_TO_LIN(ctx, ctx->SegSs, ctx->Esp);
|
|
|
|
ctx->Eip = *(stack++);
|
|
ctx->SegCs = *(stack++);
|
|
ctx->Esp += 2*sizeof(WORD);
|
|
}
|
|
|
|
static void WINAPI cdrom_strategy(CONTEXT*ctx)
|
|
{
|
|
cdrom_driver_request = CTX_SEG_OFF_TO_LIN(ctx, ctx->SegEs, ctx->Ebx);
|
|
do_lret( ctx );
|
|
}
|
|
|
|
static void WINAPI cdrom_interrupt(CONTEXT*ctx)
|
|
{
|
|
if (cdrom_driver_request->unit > CDROM_GetHeap()->hdr.units)
|
|
cdrom_driver_request->status = STAT_ERROR | 1; /* unknown unit */
|
|
else
|
|
MSCDEX_Request((BYTE*)cdrom_driver_request, ISV86(ctx));
|
|
|
|
do_lret( ctx );
|
|
}
|
|
|
|
/**********************************************************************
|
|
* MSCDEX_InstallCDROM [internal]
|
|
*
|
|
* Install the CDROM driver into the DOS device driver chain.
|
|
*/
|
|
void MSCDEX_InstallCDROM(void)
|
|
{
|
|
CDROM_HEAP *cdrom_heap = CDROM_GetHeap();
|
|
|
|
DOSDEV_SetupDevice( &cdromdev,
|
|
cdrom_heap->cdrom_segment,
|
|
FIELD_OFFSET(CDROM_HEAP, hdr),
|
|
FIELD_OFFSET(CDROM_HEAP, thunk) );
|
|
}
|