| /* |
| * 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 */ |
| 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 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), BX_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"); |
| do_mscdex_dd(context,ISV86(context)); |
| break; |
| |
| #endif |
| |
| default: |
| FIXME(int, "Unimplemented MSCDEX function 0x%02X.\n", AL_reg(context)); |
| break; |
| } |
| } |