| /* |
| * XMS v2+ emulation |
| * |
| * Copyright 1998 Ove Kåven |
| * |
| * 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 |
| * |
| * Note: This XMS emulation is hooked through the DPMI interrupt. |
| */ |
| |
| #include "config.h" |
| |
| #ifdef HAVE_UNISTD_H |
| # include <unistd.h> |
| #endif |
| #include <stdarg.h> |
| #include <string.h> |
| #include "windef.h" |
| #include "winbase.h" |
| #include "wine/winbase16.h" |
| #include "dosexe.h" |
| #include "wine/debug.h" |
| |
| WINE_DEFAULT_DEBUG_CHANNEL(int31); |
| |
| #include "pshpack1.h" |
| |
| typedef struct { |
| WORD Handle; |
| DWORD Offset; |
| } MOVEOFS; |
| |
| typedef struct { |
| DWORD Length; |
| MOVEOFS Source; |
| MOVEOFS Dest; |
| } MOVESTRUCT; |
| |
| #include "poppack.h" |
| |
| static BYTE * XMS_Offset( MOVEOFS *ofs ) |
| { |
| if (ofs->Handle) return (BYTE*)GlobalLock16(ofs->Handle)+ofs->Offset; |
| else return (BYTE*)PTR_REAL_TO_LIN(SELECTOROF(ofs->Offset),OFFSETOF(ofs->Offset)); |
| } |
| |
| /********************************************************************** |
| * XMS_Handler |
| */ |
| |
| void WINAPI XMS_Handler( CONTEXT86 *context ) |
| { |
| switch(AH_reg(context)) |
| { |
| case 0x00: /* Get XMS version number */ |
| TRACE("get XMS version number\n"); |
| SET_AX( context, 0x0200 ); /* 2.0 */ |
| SET_BX( context, 0x0000 ); /* internal revision */ |
| SET_DX( context, 0x0001 ); /* HMA exists */ |
| break; |
| case 0x08: /* Query Free Extended Memory */ |
| { |
| MEMORYSTATUS status; |
| |
| TRACE("query free extended memory\n"); |
| GlobalMemoryStatus( &status ); |
| SET_DX( context, status.dwAvailVirtual >> 10 ); |
| SET_AX( context, status.dwAvailVirtual >> 10 ); |
| TRACE("returning largest %dK, total %dK\n", AX_reg(context), DX_reg(context)); |
| } |
| break; |
| case 0x09: /* Allocate Extended Memory Block */ |
| TRACE("allocate extended memory block (%dK)\n", |
| DX_reg(context)); |
| SET_DX( context, GlobalAlloc16(GMEM_MOVEABLE, (DWORD)DX_reg(context)<<10) ); |
| SET_AX( context, DX_reg(context) ? 1 : 0 ); |
| if (!DX_reg(context)) SET_BL( context, 0xA0 ); /* out of memory */ |
| break; |
| case 0x0a: /* Free Extended Memory Block */ |
| TRACE("free extended memory block %04x\n",DX_reg(context)); |
| if(!DX_reg(context) || GlobalFree16(DX_reg(context))) { |
| SET_AX( context, 0 ); /* failure */ |
| SET_BL( context, 0xa2 ); /* invalid handle */ |
| } else |
| SET_AX( context, 1 ); /* success */ |
| break; |
| case 0x0b: /* Move Extended Memory Block */ |
| { |
| MOVESTRUCT*move=CTX_SEG_OFF_TO_LIN(context, |
| context->SegDs,context->Esi); |
| BYTE*src,*dst; |
| TRACE("move extended memory block\n"); |
| src=XMS_Offset(&move->Source); |
| dst=XMS_Offset(&move->Dest); |
| memcpy(dst,src,move->Length); |
| if (move->Source.Handle) GlobalUnlock16(move->Source.Handle); |
| if (move->Dest.Handle) GlobalUnlock16(move->Dest.Handle); |
| break; |
| } |
| case 0x88: /* Query Any Free Extended Memory */ |
| { |
| MEMORYSTATUS status; |
| SYSTEM_INFO info; |
| |
| TRACE("query any free extended memory\n"); |
| |
| GlobalMemoryStatus( &status ); |
| GetSystemInfo( &info ); |
| context->Eax = status.dwAvailVirtual >> 10; |
| context->Edx = status.dwAvailVirtual >> 10; |
| context->Ecx = (DWORD)info.lpMaximumApplicationAddress; |
| SET_BL( context, 0 ); /* No errors. */ |
| |
| TRACE("returning largest %dK, total %dK, highest 0x%x\n", |
| context->Eax, context->Edx, context->Ecx); |
| } |
| break; |
| default: |
| INT_BARF( context, 0x31 ); |
| SET_AX( context, 0x0000 ); /* failure */ |
| SET_BL( context, 0x80 ); /* function not implemented */ |
| break; |
| } |
| } |