396 lines
11 KiB
C
396 lines
11 KiB
C
/*
|
|
* DOS interrupt 2fh handler
|
|
*/
|
|
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <unistd.h>
|
|
|
|
#include "ldt.h"
|
|
#include "drive.h"
|
|
#include "msdos.h"
|
|
#include "miscemu.h"
|
|
#include "module.h"
|
|
#include "task.h"
|
|
#include "dosexe.h"
|
|
/* #define DEBUG_INT */
|
|
#include "debug.h"
|
|
|
|
/* base WPROCS.DLL ordinal number for VxDs */
|
|
#define VXD_BASE 400
|
|
|
|
static void do_int2f_16( CONTEXT *context );
|
|
|
|
/**********************************************************************
|
|
* INT_Int2fHandler
|
|
*
|
|
* Handler for int 2fh (multiplex).
|
|
*/
|
|
void WINAPI INT_Int2fHandler( CONTEXT *context )
|
|
{
|
|
TRACE(int,"Subfunction 0x%X\n", AH_reg(context));
|
|
|
|
switch(AH_reg(context))
|
|
{
|
|
case 0x10:
|
|
AL_reg(context) = 0xff; /* share is installed */
|
|
break;
|
|
|
|
case 0x11: /* Network Redirector / IFSFUNC */
|
|
switch (AL_reg(context))
|
|
{
|
|
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 (AL_reg(context))
|
|
{
|
|
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:
|
|
ES_reg(context) = 0x0001;
|
|
DI_reg(context) = 0x0000;
|
|
break;
|
|
case 0x08:
|
|
FIXME(int, "No real-mode handler for errors yet! (bye!)");
|
|
break;
|
|
default:
|
|
INT_BARF(context, 0x2f);
|
|
}
|
|
break;
|
|
default:
|
|
INT_BARF(context, 0x2f);
|
|
}
|
|
break;
|
|
|
|
case 0x15: /* mscdex */
|
|
do_mscdex(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 (AL_reg(context))
|
|
{
|
|
case 0x00: /* XMS v2+ installation check */
|
|
WARN(int,"XMS is not fully implemented\n");
|
|
AL_reg(context) = 0x80;
|
|
break;
|
|
case 0x10: /* XMS v2+ get driver address */
|
|
{
|
|
TDB *pTask = (TDB *)GlobalLock16( GetCurrentTask() );
|
|
NE_MODULE *pModule = pTask ? NE_GetPtr( pTask->hModule ) : NULL;
|
|
GlobalUnlock16( GetCurrentTask() );
|
|
#ifdef MZ_SUPPORTED
|
|
if (pModule && pModule->lpDosTask)
|
|
ES_reg(context) = pModule->lpDosTask->xms_seg;
|
|
else
|
|
#endif
|
|
ES_reg(context) = 0;
|
|
BX_reg(context) = 0;
|
|
break;
|
|
}
|
|
default:
|
|
INT_BARF( context, 0x2f );
|
|
}
|
|
#else
|
|
FIXME(int,"check for XMS (not supported)\n");
|
|
AL_reg(context) = 0x42; /* != 0x80 */
|
|
#endif
|
|
break;
|
|
|
|
case 0x45:
|
|
switch (AL_reg(context))
|
|
{
|
|
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(AL_reg(context))
|
|
{
|
|
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 0x56: /* INTERLNK */
|
|
switch(AL_reg(context))
|
|
{
|
|
case 0x01: /* check if redirected drive */
|
|
AL_reg(context) = 0; /* not redirected */
|
|
break;
|
|
default:
|
|
INT_BARF( context, 0x2f );
|
|
}
|
|
break;
|
|
case 0x7a: /* NOVELL NetWare */
|
|
switch (AL_reg(context))
|
|
{
|
|
case 0x20: /* Get VLM Call Address */
|
|
/* return nothing -> NetWare not installed */
|
|
break;
|
|
default:
|
|
INT_BARF( context, 0x2f );
|
|
break;
|
|
}
|
|
break;
|
|
case 0xb7: /* append */
|
|
AL_reg(context) = 0; /* not installed */
|
|
break;
|
|
case 0xb8: /* network */
|
|
switch (AL_reg(context))
|
|
{
|
|
case 0x00: /* Install check */
|
|
/* not installed */
|
|
break;
|
|
default:
|
|
INT_BARF( context, 0x2f );
|
|
break;
|
|
}
|
|
break;
|
|
case 0xbd: /* some Novell network install check ??? */
|
|
AX_reg(context) = 0xa5a5; /* pretend to have Novell IPX installed */
|
|
break;
|
|
case 0xbf: /* REDIRIFS.EXE */
|
|
switch (AL_reg(context))
|
|
{
|
|
case 0x00: /* Install check */
|
|
/* not installed */
|
|
break;
|
|
default:
|
|
INT_BARF( context, 0x2f );
|
|
break;
|
|
}
|
|
break;
|
|
case 0xd7: /* Banyan Vines */
|
|
switch (AL_reg(context))
|
|
{
|
|
case 0x01: /* Install check - Get Int Number */
|
|
/* not installed */
|
|
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(AL_reg(context))
|
|
{
|
|
case 0x00: /* Windows enhanced mode installation check */
|
|
AX_reg(context) = (GetWinFlags() & WF_ENHANCED) ?
|
|
LOWORD(GetVersion16()) : 0;
|
|
break;
|
|
|
|
case 0x0a: /* Get Windows version and type */
|
|
AX_reg(context) = 0;
|
|
BX_reg(context) = (LOWORD(GetVersion16()) << 8) |
|
|
(LOWORD(GetVersion16()) >> 8);
|
|
CX_reg(context) = (GetWinFlags() & 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(int, "Get Shell Parameters\n");
|
|
break;
|
|
|
|
case 0x80: /* Release time-slice */
|
|
AL_reg(context) = 0;
|
|
/* FIXME: We need to do something that lets some other process run
|
|
here. */
|
|
sleep(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.
|
|
*/
|
|
BX_reg(context) = 1; /* VM 1 is probably the System VM */
|
|
break;
|
|
|
|
case 0x84: /* Get device API entry point */
|
|
addr = (DWORD)NE_GetEntryPoint( GetModuleHandle16("WPROCS"),
|
|
VXD_BASE + BX_reg(context) );
|
|
if (!addr) /* not supported */
|
|
{
|
|
ERR(int,"Accessing unknown VxD %04x - Expect a failure now.\n",
|
|
BX_reg(context) );
|
|
}
|
|
ES_reg(context) = SELECTOROF(addr);
|
|
DI_reg(context) = OFFSETOF(addr);
|
|
break;
|
|
|
|
case 0x86: /* DPMI detect mode */
|
|
AX_reg(context) = 0; /* Running under DPMI */
|
|
break;
|
|
|
|
case 0x87: /* DPMI installation check */
|
|
#if 1 /* DPMI still breaks pkunzip */
|
|
if (ISV86(context)) break; /* so bail out for now if in v86 mode */
|
|
#endif
|
|
{
|
|
TDB *pTask = (TDB *)GlobalLock16( GetCurrentTask() );
|
|
NE_MODULE *pModule = pTask ? NE_GetPtr( pTask->hModule ) : NULL;
|
|
SYSTEM_INFO si;
|
|
|
|
GlobalUnlock16( GetCurrentTask() );
|
|
GetSystemInfo(&si);
|
|
AX_reg(context) = 0x0000; /* DPMI Installed */
|
|
BX_reg(context) = 0x0001; /* 32bits available */
|
|
CL_reg(context) = si.wProcessorLevel;
|
|
DX_reg(context) = 0x005a; /* DPMI major/minor 0.90 */
|
|
SI_reg(context) = 0; /* # of para. of DOS extended private data */
|
|
#ifdef MZ_SUPPORTED /* ES:DI is DPMI switch entry point */
|
|
if (pModule && pModule->lpDosTask)
|
|
ES_reg(context) = pModule->lpDosTask->dpmi_seg;
|
|
else
|
|
#endif
|
|
ES_reg(context) = 0;
|
|
DI_reg(context) = 0;
|
|
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 );
|
|
}
|
|
}
|
|
|
|
void do_mscdex( CONTEXT *context )
|
|
{
|
|
int drive, count;
|
|
char *p;
|
|
|
|
switch(AL_reg(context))
|
|
{
|
|
case 0x00: /* Installation check */
|
|
/* Count the number of contiguous CDROM drives
|
|
*/
|
|
for (drive = count = 0; drive < MAX_DOS_DRIVES; drive++)
|
|
{
|
|
if (DRIVE_GetType(drive) == TYPE_CDROM)
|
|
{
|
|
while (DRIVE_GetType(drive + count) == TYPE_CDROM) count++;
|
|
break;
|
|
}
|
|
}
|
|
|
|
BX_reg(context) = count;
|
|
CX_reg(context) = (drive < MAX_DOS_DRIVES) ? drive : 0;
|
|
break;
|
|
|
|
case 0x0B: /* drive check */
|
|
AX_reg(context) = (DRIVE_GetType(CX_reg(context)) == TYPE_CDROM);
|
|
BX_reg(context) = 0xADAD;
|
|
break;
|
|
|
|
case 0x0C: /* get version */
|
|
BX_reg(context) = 0x020a;
|
|
break;
|
|
|
|
case 0x0D: /* get drive letters */
|
|
p = CTX_SEG_OFF_TO_LIN(context, ES_reg(context), EBX_reg(context));
|
|
memset( p, 0, MAX_DOS_DRIVES );
|
|
for (drive = 0; drive < MAX_DOS_DRIVES; drive++)
|
|
{
|
|
if (DRIVE_GetType(drive) == TYPE_CDROM) *p++ = drive;
|
|
}
|
|
break;
|
|
|
|
#ifdef linux
|
|
/* FIXME: why a new linux-only CDROM drive access, for crying out loud?
|
|
* There are pretty complete routines in multimedia/mcicda.c already! */
|
|
case 0x10: /* direct driver acces */
|
|
FIXME(cdaudio,"mscdex should use multimedia/mcicda.c\n");
|
|
do_mscdex_dd(context,ISV86(context));
|
|
break;
|
|
|
|
#endif
|
|
|
|
default:
|
|
FIXME(int, "Unimplemented MSCDEX function 0x%02X.\n", AL_reg(context));
|
|
break;
|
|
}
|
|
}
|