Interrupts / Move int2f to winedos

Jukka Heinonen jhei at iki.fi
Fri Nov 22 13:55:23 CST 2002


Surprisingly int2f handler is one of the easiest handlers
to migrate to winedos even though it is quite big. This patch
also cleans up dosexe.h a bit and moves 48-bit pointer stuff
there because no other part of Wine should know anything about 
those.



Changelog:
  Move int2f handler to winedos.
  Clean winedos headers a bit.




Index: dlls/ntdll/Makefile.in
===================================================================
RCS file: /home/wine/wine/dlls/ntdll/Makefile.in,v
retrieving revision 1.45
diff -u -r1.45 Makefile.in
--- dlls/ntdll/Makefile.in      21 Nov 2002 03:45:03 -0000      1.45
+++ dlls/ntdll/Makefile.in      22 Nov 2002 19:40:30 -0000
@@ -55,7 +55,6 @@
        $(TOPOBJDIR)/msdos/int21.c \
        $(TOPOBJDIR)/msdos/int25.c \
        $(TOPOBJDIR)/msdos/int26.c \
-       $(TOPOBJDIR)/msdos/int2f.c \
        $(TOPOBJDIR)/msdos/int5c.c \
        $(TOPOBJDIR)/msdos/ioports.c \
        $(TOPOBJDIR)/msdos/ppdev.c \




Index: dlls/kernel/kernel32.spec
===================================================================
RCS file: /home/wine/wine/dlls/kernel/kernel32.spec,v
retrieving revision 1.74
diff -u -r1.74 kernel32.spec
--- dlls/kernel/kernel32.spec   21 Nov 2002 00:02:10 -0000      1.74
+++ dlls/kernel/kernel32.spec   22 Nov 2002 19:40:48 -0000
@@ -999,6 +999,8 @@
 @ stdcall GetSelectorBase(long) GetSelectorBase
 @ stdcall GetSelectorLimit16(long) GetSelectorLimit16
 @ stdcall GetThreadQueue16(long) GetThreadQueue16
+@ stdcall GetVersion16() GetVersion16
+@ stdcall GetWinFlags16() GetWinFlags16
 @ stdcall GlobalDOSAlloc16(long) GlobalDOSAlloc16
 @ stdcall GlobalDOSFree16(long) GlobalDOSFree16
 @ stdcall GlobalFlags16(long) GlobalFlags16
@@ -1053,7 +1055,6 @@
 @ stdcall INT_Int15Handler(ptr) INT_Int15Handler
 @ stdcall INT_Int25Handler(ptr) INT_Int25Handler
 @ stdcall INT_Int26Handler(ptr) INT_Int26Handler  
-@ stdcall INT_Int2fHandler(ptr) INT_Int2fHandler
 @ stdcall NetBIOSCall16(ptr) NetBIOSCall16
 @ cdecl LOCAL_Alloc(long long long) LOCAL_Alloc
 @ cdecl LOCAL_Compact(long long long) LOCAL_Compact




Index: include/miscemu.h
===================================================================
RCS file: /home/wine/wine/include/miscemu.h,v
retrieving revision 1.58
diff -u -r1.58 miscemu.h
--- include/miscemu.h   20 Nov 2002 19:39:11 -0000      1.58
+++ include/miscemu.h   22 Nov 2002 19:41:13 -0000
@@ -175,12 +175,6 @@
     WORD int48_sel;
 };
 
-/* 48-bit segmented pointers for DOS DPMI32 */
-typedef struct {
-  WORD  selector;
-  DWORD offset;
-} SEGPTR48, FARPROC48;
-
 extern struct DPMI_segments DOSMEM_dpmi_segments;
 extern const struct DPMI_segments *DOSMEM_GetDPMISegments(void);
 
@@ -198,13 +192,6 @@
 /* memory/instr.c */
 extern BOOL INSTR_EmulateInstruction( CONTEXT86 *context );
 
-/* msdos/interrupts.c */
-typedef void (WINAPI *INTPROC)(CONTEXT86*);
-extern FARPROC16 INT_GetPMHandler( BYTE intnum );
-extern void INT_SetPMHandler( BYTE intnum, FARPROC16 handler );
-extern FARPROC48 INT_GetPMHandler48( BYTE intnum );
-extern void INT_SetPMHandler48( BYTE intnum, FARPROC48 handler );
-
 /* msdos/ioports.c */
 extern DWORD IO_inport( int port, int count );
 extern void IO_outport( int port, int count, DWORD value );
@@ -220,9 +207,6 @@
 
 /* msdos/int26.c */
 extern void WINAPI INT_Int26Handler(CONTEXT86*);
-
-/* msdos/int2f.c */
-extern void WINAPI INT_Int2fHandler(CONTEXT86*);
 
 /* msdos/int5c.c */
 extern void WINAPI NetBIOSCall16(CONTEXT86*);




Index: dlls/winedos/Makefile.in
===================================================================
RCS file: /home/wine/wine/dlls/winedos/Makefile.in,v
retrieving revision 1.17
diff -u -r1.17 Makefile.in
--- dlls/winedos/Makefile.in    12 Nov 2002 23:29:48 -0000      1.17
+++ dlls/winedos/Makefile.in    22 Nov 2002 19:42:07 -0000
@@ -28,6 +28,7 @@
        int21.c \
        int29.c \
        int2a.c \
+        int2f.c \
        int31.c \
        int33.c \
        int41.c \




Index: dlls/winedos/dosexe.h
===================================================================
RCS file: /home/wine/wine/dlls/winedos/dosexe.h,v
retrieving revision 1.15
diff -u -r1.15 dosexe.h
--- dlls/winedos/dosexe.h       18 Nov 2002 22:53:39 -0000      1.15
+++ dlls/winedos/dosexe.h       22 Nov 2002 19:42:53 -0000
@@ -30,7 +30,15 @@
 struct _DOSEVENT;
 struct DPMI_segments;
 
+/* 48-bit segmented pointers for DOS DPMI32 */
+typedef struct {
+  WORD  selector;
+  DWORD offset;
+} SEGPTR48, FARPROC48;
+
 typedef void (*DOSRELAY)(CONTEXT86*,void*);
+typedef void (WINAPI *RMCBPROC)(CONTEXT86*);
+typedef void (WINAPI *INTPROC)(CONTEXT86*);
 
 #define DOS_PRIORITY_REALTIME 0  /* IRQ0 */
 #define DOS_PRIORITY_KEYBOARD 1  /* IRQ1 */
@@ -51,12 +59,16 @@
 
 #define BIOS_DATA ((void *)0x400)
 
+/* module.c */
 extern void WINAPI MZ_LoadImage( LPCSTR filename, HANDLE hFile );
 extern BOOL WINAPI MZ_Exec( CONTEXT86 *context, LPCSTR filename, BYTE func, LPVOID paramblk );
 extern void WINAPI MZ_Exit( CONTEXT86 *context, BOOL cs_psp, WORD retval );
 extern BOOL WINAPI MZ_Current( void );
 extern void WINAPI MZ_AllocDPMITask( void );
 extern void WINAPI MZ_RunInThread( PAPCFUNC proc, ULONG_PTR arg );
+extern BOOL DOSVM_IsWin16(void);
+
+/* dosvm.c */
 extern INT WINAPI DOSVM_Enter( CONTEXT86 *context );
 extern void WINAPI DOSVM_Wait( INT read_pipe, HANDLE hObject );
 extern DWORD WINAPI DOSVM_Loop( HANDLE hThread );
@@ -65,7 +77,6 @@
 extern void WINAPI DOSVM_SetTimer( UINT ticks );
 extern UINT WINAPI DOSVM_GetTimer( void );
 extern void DOSVM_RealModeInterrupt( BYTE intnum, CONTEXT86 *context );
-extern BOOL DOSVM_IsWin16(void);
 
 /* devices.c */
 extern void DOSDEV_InstallDOSDevices(void);
@@ -137,8 +148,10 @@
 /* int2a.c */
 extern void WINAPI DOSVM_Int2aHandler(CONTEXT86*);
 
+/* int2f.c */
+extern void WINAPI DOSVM_Int2fHandler(CONTEXT86*);
+
 /* int31.c */
-typedef void (WINAPI *RMCBPROC)(CONTEXT86*);
 extern void WINAPI DOSVM_Int31Handler(CONTEXT86*);
 extern BOOL DOSVM_IsDos32(void);
 extern FARPROC16 WINAPI DPMI_AllocInternalRMCB(RMCBPROC);




Index: dlls/winedos/interrupts.c
===================================================================
RCS file: /home/wine/wine/dlls/winedos/interrupts.c,v
retrieving revision 1.8
diff -u -r1.8 interrupts.c
--- dlls/winedos/interrupts.c   15 Nov 2002 01:35:52 -0000      1.8
+++ dlls/winedos/interrupts.c   22 Nov 2002 19:44:30 -0000
@@ -29,7 +29,6 @@
  *             DOSVM_Int15Handler (WINEDOS16.121)
  *             DOSVM_Int25Handler (WINEDOS16.137)
  *             DOSVM_Int26Handler (WINEDOS16.138)
- *             DOSVM_Int2fHandler (WINEDOS16.147)
  *             DOSVM_Int5cHandler (WINEDOS16.192)
  *
  * FIXME: Interrupt handlers for interrupts implemented in other DLLs.
@@ -40,7 +39,6 @@
 void WINAPI DOSVM_Int15Handler( CONTEXT86 *context ) { INT_Int15Handler(context); }
 void WINAPI DOSVM_Int25Handler( CONTEXT86 *context ) { INT_Int25Handler(context); }
 void WINAPI DOSVM_Int26Handler( CONTEXT86 *context ) { INT_Int26Handler(context); }
-void WINAPI DOSVM_Int2fHandler( CONTEXT86 *context ) { INT_Int2fHandler(context); }
 void WINAPI DOSVM_Int5cHandler( CONTEXT86 *context ) { NetBIOSCall16(context); }
 
 static FARPROC16     DOSVM_Vectors16[256];




--- /dev/null   Thu Jan  1 02:00:00 1970
+++ dlls/winedos/int2f.c        Fri Nov 22 21:33:42 2002
@@ -0,0 +1,938 @@
+/* -*- tab-width: 8; c-basic-offset: 4 -*- */
+/*
+ * DOS interrupt 2fh handler
+ *
+ *  Cdrom - device driver emulation - Audio features.
+ *     Copyright (c) 1998 Petr Tomasek <tomasek at 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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+ */
+
+#include "config.h"
+
+#include <string.h>
+#include "wine/winbase16.h"
+#include "miscemu.h"
+#include "module.h"
+/* #define DEBUG_INT */
+#include "wine/debug.h"
+#include "winioctl.h"
+#include "ntddstor.h"
+#include "ntddcdrm.h"
+#include "dosexe.h"
+
+WINE_DEFAULT_DEBUG_CHANNEL(int);
+
+/* base WPROCS.DLL ordinal number for VxDs */
+#define VXD_BASE 400
+
+static void do_int2f_16( CONTEXT86 *context );
+static void MSCDEX_Handler( CONTEXT86 *context );
+
+/**********************************************************************
+ *          DOSVM_Int2fHandler (WINEDOS16.147)
+ *
+ * Handler for int 2fh (multiplex).
+ */
+void WINAPI DOSVM_Int2fHandler( CONTEXT86 *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 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( CONTEXT86 *context )
+{
+    DWORD addr;
+
+    switch(LOBYTE(context->Eax))
+    {
+    case 0x00:  /* Windows enhanced mode installation check */
+        SET_AX( context, (GetWinFlags16() & WF_ENHANCED) ? LOWORD(GetVersion16()) : 0 );
+        break;
+
+    case 0x0a:  /* Get Windows version and type */
+        SET_AX( context, 0 );
+        SET_BX( context, (LOWORD(GetVersion16()) << 8) | (LOWORD(GetVersion16()) >> 8) );
+        SET_CX( context, (GetWinFlags16() & WF_ENHANCED) ? 3 : 2 );
+        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("wprocs");
+            if (mod < 32) mod = LoadLibrary16( "wprocs" );
+            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 int is_cdrom( int drive)
+{
+    char root[] = "A:\\";
+    root[0] += drive;
+    return (GetDriveTypeA(root) == DRIVE_CDROM);
+}
+
+static void MSCDEX_Handler(CONTEXT86* 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 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;
+           BYTE*       io_stru;
+           BYTE        Error = 255; /* No Error */
+           int         dorealmode = ISV86(context);
+            char        devName[] = "\\\\.\\@:";
+           HANDLE      h;
+            CDROM_TOC                   toc;
+            CDROM_SUB_Q_DATA_FORMAT     fmt;
+            SUB_Q_CHANNEL_DATA          data;
+            DWORD                       br;
+            DWORD                       present = TRUE;
+
+           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%04lx, DS=0x%04lx, 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;
+           }
+           /* 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", (unsigned char)driver_request[2]);
+
+           if (!is_cdrom(CX_reg(context))) {
+               WARN("Request made doesn't match a CD ROM drive (%d)\n", CX_reg(context));
+               driver_request[4] |= 0x80;
+               driver_request[3] = 1;  /* unknown unit */
+               return;
+           }
+
+           MSCDEX_Dump("Beg", driver_request, dorealmode);
+
+           /* set status to 0 */
+           PTR_AT(driver_request, 3, WORD) = 0;
+            devName[4] = 'A' + CX_reg(context);
+            h = CreateFileA(devName, GENERIC_READ, FILE_SHARE_READ, NULL, OPEN_EXISTING, 0, 0);
+            if (!h) {
+               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 <%ld>\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%08lx>\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 <%ld>\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/%08lx>\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] = [%08lx:%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=%ld endLoc=%ld\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.s.HighPart = 0;
+                            rri.DiskOffset.s.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>, [%ld]\n",
+                         (BYTE)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>, [%ld-%ld]\n",
+                         (BYTE)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);
+       }
+       break;
+    default:
+       FIXME("Unimplemented MSCDEX function 0x%02X.\n", LOBYTE(context->Eax));
+       break;
+    }
+}




-- 
Jukka Heinonen <http://www.iki.fi/jhei/>



More information about the wine-patches mailing list