[hbelusca] 61283: [NTVDM] Implement basic VDD support: implement the (un)register & dispatch call BOP (called BOP_3RDPARTY): see "Undocumented DOS" by Schulman et al. page 267 (as always ; ) ), as w...
17 Dec
2013
17 Dec
'13
2:19 a.m.
Author: hbelusca
Date: Tue Dec 17 02:19:52 2013
New Revision: 61283
URL: http://svn.reactos.org/svn/reactos?rev=61283&view=rev
Log:
[NTVDM]
Implement basic VDD support:
implement the (un)register & dispatch call BOP (called BOP_3RDPARTY): see
"Undocumented DOS" by Schulman et al. page 267 (as always ;) ), as well as:
http://www.ragestorm.net/tutorial?id=27 - "Tutorial - Calling Win32 from DOS"
http://www.airborn.com.au/layout/vddtest.html - "DOS to 32 bit DLL under XP - an
example" (almost the same explanations as the previous article)
http://sta.c64.org/blog/dosvddaccess.html - "Accessing Windows device drivers from
DOS programs"
and...
... your lovely Win2k / Win2k3 DDK section: "Device Technologies/Other
Devices/Devices Requiring VDDs" !!
Ready to test? :D
Added:
branches/ntvdm/subsystems/ntvdm/vddsup.c (with props)
branches/ntvdm/subsystems/ntvdm/vddsup.h (with props)
Modified:
branches/ntvdm/subsystems/ntvdm/CMakeLists.txt
branches/ntvdm/subsystems/ntvdm/emulator.c
Modified: branches/ntvdm/subsystems/ntvdm/CMakeLists.txt
URL:
http://svn.reactos.org/svn/reactos/branches/ntvdm/subsystems/ntvdm/CMakeLis…
==============================================================================
--- branches/ntvdm/subsystems/ntvdm/CMakeLists.txt [iso-8859-1] (original)
+++ branches/ntvdm/subsystems/ntvdm/CMakeLists.txt [iso-8859-1] Tue Dec 17 02:19:52 2013
@@ -16,6 +16,7 @@
registers.c
speaker.c
timer.c
+ vddsup.c
vga.c
ntvdm.c
ntvdm.rc
Modified: branches/ntvdm/subsystems/ntvdm/emulator.c
URL:
http://svn.reactos.org/svn/reactos/branches/ntvdm/subsystems/ntvdm/emulator…
==============================================================================
--- branches/ntvdm/subsystems/ntvdm/emulator.c [iso-8859-1] (original)
+++ branches/ntvdm/subsystems/ntvdm/emulator.c [iso-8859-1] Tue Dec 17 02:19:52 2013
@@ -13,6 +13,7 @@
#include "emulator.h"
#include "bios.h"
#include "bop.h"
+#include "vddsup.h"
#include "io.h"
#include "registers.h"
#include "vga.h"
@@ -122,6 +123,9 @@
/* Enable interrupts */
setIF(1);
+ /* Initialize VDD support */
+ VDDSupInitialize();
+
/* Register the DebugBreak BOP */
RegisterBop(BOP_DEBUGGER, EmulatorDebugBreak);
Added: branches/ntvdm/subsystems/ntvdm/vddsup.c
URL:
http://svn.reactos.org/svn/reactos/branches/ntvdm/subsystems/ntvdm/vddsup.c…
==============================================================================
--- branches/ntvdm/subsystems/ntvdm/vddsup.c (added)
+++ branches/ntvdm/subsystems/ntvdm/vddsup.c [iso-8859-1] Tue Dec 17 02:19:52 2013
@@ -0,0 +1,236 @@
+/*
+ * COPYRIGHT: GPL - See COPYING in the top level directory
+ * PROJECT: ReactOS Virtual DOS Machine
+ * FILE: vddsup.c
+ * PURPOSE: Virtual DOS Drivers (VDD) Support
+ * PROGRAMMERS: Hermes Belusca-Maito (hermes.belusca(a)sfr.fr)
+ */
+
+/* INCLUDES *******************************************************************/
+
+#define NDEBUG
+
+#include "emulator.h"
+#include "vddsup.h"
+
+#include "bop.h"
+#include "registers.h"
+
+typedef VOID (CDECL *VDD_INIT_PROC)(VOID);
+typedef VOID (CDECL *VDD_DISPATCH_PROC)(VOID);
+
+typedef struct _VDD_MODULE
+{
+ HMODULE hDll;
+ VDD_DISPATCH_PROC DispatchRoutine;
+} VDD_MODULE, *PVDD_MODULE;
+
+/* BOP Identifiers */
+#define BOP_3RDPARTY 0x58 // 3rd-party VDD BOP
+
+/* PRIVATE VARIABLES **********************************************************/
+
+#define MAX_VDD_MODULES 0xFF
+VDD_MODULE VDDList[MAX_VDD_MODULES] = {{NULL}}; // TODO: Maybe use a linked list.
+ // But the number of elements must be
<= MAXUSHORT
+
+/* PRIVATE FUNCTIONS **********************************************************/
+
+USHORT GetNextFreeVDDEntry(VOID)
+{
+ USHORT Entry = MAX_VDD_MODULES;
+ for (Entry = 0; Entry < sizeof(VDDList)/sizeof(VDDList[0]); ++Entry)
+ {
+ if (VDDList[Entry].hDll == NULL) break;
+ }
+ return Entry;
+}
+
+VOID WINAPI ThirdPartyVDDBop(LPWORD Stack)
+{
+ /* Get the Function Number and skip it */
+ BYTE FuncNum = *(PBYTE)SEG_OFF_TO_PTR(getCS(), getIP());
+ setIP(getIP() + 1);
+
+ switch (FuncNum)
+ {
+ /* RegisterModule */
+ case 0:
+ {
+ BOOL Success = TRUE;
+ WORD RetVal = 0;
+ WORD Entry = 0;
+ LPCSTR DllName = NULL,
+ InitRoutineName = NULL,
+ DispatchRoutineName = NULL;
+ HMODULE hDll = NULL;
+ VDD_INIT_PROC InitRoutine = NULL;
+ VDD_DISPATCH_PROC DispatchRoutine = NULL;
+
+ DPRINT1("RegisterModule() called\n");
+
+ /* Clear the Carry Flag (no error happened so far) */
+ setCF(0);
+
+ /* Retrieve the VDD name in DS:SI */
+ DllName = SEG_OFF_TO_PTR(getDS(), getSI());
+
+ /* Retrieve the initialization routine API name in ES:DI (optional -->
ES=DI=0) */
+ if (getES() != 0 || getDI() != 0)
+ InitRoutineName = SEG_OFF_TO_PTR(getES(), getDI());
+
+ /* Retrieve the dispatch routine API name in DS:BX */
+ DispatchRoutineName = SEG_OFF_TO_PTR(getDS(), getBX());
+
+ DPRINT1("DllName = '%s' - InitRoutineName = '%s' -
DispatchRoutineName = '%s'\n",
+ (DllName ? DllName : "n/a"),
+ (InitRoutineName ? InitRoutineName : "n/a"),
+ (DispatchRoutineName ? DispatchRoutineName : "n/a"));
+
+ /* Load the VDD DLL */
+ hDll = LoadLibraryA(DllName);
+ if (hDll == NULL)
+ {
+ DWORD LastError = GetLastError();
+ Success = FALSE;
+
+ if (LastError == ERROR_NOT_ENOUGH_MEMORY)
+ {
+ DPRINT1("Not enough memory to load DLL '%s'\n",
DllName);
+ RetVal = 4;
+ goto Quit;
+ }
+ else
+ {
+ DPRINT1("Failed to load DLL '%s'; last error =
%d\n", DllName, LastError);
+ RetVal = 1;
+ goto Quit;
+ }
+ }
+
+ /* Load the initialization routine if needed */
+ if (InitRoutineName)
+ {
+ InitRoutine = (VDD_INIT_PROC)GetProcAddress(hDll, InitRoutineName);
+ if (InitRoutine == NULL)
+ {
+ DPRINT1("Failed to load the initialization routine
'%s'\n", InitRoutineName);
+ Success = FALSE;
+ RetVal = 3;
+ goto Quit;
+ }
+ }
+
+ /* Load the dispatch routine */
+ DispatchRoutine = (VDD_DISPATCH_PROC)GetProcAddress(hDll,
DispatchRoutineName);
+ if (DispatchRoutine == NULL)
+ {
+ DPRINT1("Failed to load the dispatch routine '%s'\n",
DispatchRoutineName);
+ Success = FALSE;
+ RetVal = 2;
+ goto Quit;
+ }
+
+ /* If we arrived there, that means everything is OK */
+
+ /* Register the VDD DLL */
+ Entry = GetNextFreeVDDEntry();
+ if (Entry == MAX_VDD_MODULES)
+ {
+ DPRINT1("Failed to create a new VDD module entry\n");
+ Success = FALSE;
+ RetVal = 4;
+ goto Quit;
+ }
+ VDDList[Entry].hDll = hDll;
+ VDDList[Entry].DispatchRoutine = DispatchRoutine;
+
+ /* Call the initialization routine if needed */
+ if (InitRoutine) InitRoutine();
+
+ /* We succeeded */
+ Success = TRUE;
+ RetVal = Entry;
+
+Quit:
+ if (!Success)
+ {
+ /* Unload the VDD DLL */
+ if (hDll) FreeLibrary(hDll);
+
+ /* Set the Carry Flag to indicate that an error happened */
+ setCF(1);
+ }
+ // else
+ // {
+ // /* Clear the Carry Flag (success) */
+ // setCF(0);
+ // }
+ setAX(RetVal);
+ break;
+ }
+
+ /* UnRegisterModule */
+ case 1:
+ {
+ WORD Entry = getAX();
+
+ DPRINT1("UnRegisterModule() called\n");
+
+ /* Sanity checks */
+ if (Entry > MAX_VDD_MODULES || VDDList[Entry].hDll == NULL)
+ {
+ DPRINT1("Invalid VDD DLL Handle: %d\n", Entry);
+ /* Stop the VDM */
+ VdmRunning = FALSE;
+ return;
+ }
+
+ /* Unregister the VDD DLL */
+ FreeLibrary(VDDList[Entry].hDll);
+ VDDList[Entry].hDll = NULL;
+ VDDList[Entry].DispatchRoutine = NULL;
+ break;
+ }
+
+ /* DispatchCall */
+ case 2:
+ {
+ WORD Entry = getAX();
+
+ DPRINT1("DispatchCall() called\n");
+
+ /* Sanity checks */
+ if (Entry > MAX_VDD_MODULES ||
+ VDDList[Entry].hDll == NULL ||
+ VDDList[Entry].DispatchRoutine == NULL)
+ {
+ DPRINT1("Invalid VDD DLL Handle: %d\n", Entry);
+ /* Stop the VDM */
+ VdmRunning = FALSE;
+ return;
+ }
+
+ /* Call the dispatch routine */
+ VDDList[Entry].DispatchRoutine();
+ break;
+ }
+
+ default:
+ {
+ DPRINT1("Unknown 3rd-party VDD BOP Function: 0x%02X\n", FuncNum);
+ setCF(1);
+ break;
+ }
+ }
+}
+
+/* PUBLIC FUNCTIONS ***********************************************************/
+
+VOID VDDSupInitialize(VOID)
+{
+ /* Register the 3rd-party VDD BOP Handler */
+ RegisterBop(BOP_3RDPARTY, ThirdPartyVDDBop);
+}
+
+/* EOF */
Propchange: branches/ntvdm/subsystems/ntvdm/vddsup.c
------------------------------------------------------------------------------
svn:eol-style = native
Added: branches/ntvdm/subsystems/ntvdm/vddsup.h
URL:
http://svn.reactos.org/svn/reactos/branches/ntvdm/subsystems/ntvdm/vddsup.h…
==============================================================================
--- branches/ntvdm/subsystems/ntvdm/vddsup.h (added)
+++ branches/ntvdm/subsystems/ntvdm/vddsup.h [iso-8859-1] Tue Dec 17 02:19:52 2013
@@ -0,0 +1,20 @@
+/*
+ * COPYRIGHT: GPL - See COPYING in the top level directory
+ * PROJECT: ReactOS Virtual DOS Machine
+ * FILE: vddsup.h
+ * PURPOSE: Virtual DOS Drivers (VDD) Support
+ * PROGRAMMERS: Hermes Belusca-Maito (hermes.belusca(a)sfr.fr)
+ */
+
+#ifndef _VDDSUP_H_
+#define _VDDSUP_H_
+
+/* DEFINES ********************************************************************/
+
+/* FUNCTIONS ******************************************************************/
+
+VOID VDDSupInitialize(VOID);
+
+#endif // _VDDSUP_H_
+
+/* EOF */
Propchange: branches/ntvdm/subsystems/ntvdm/vddsup.h
------------------------------------------------------------------------------
svn:eol-style = native
3930
days inactive
3930
days old
0 comments
1 participants
participants (1)
-
hbelusca＠svn.reactos.org