4 * Copyright 1998 Ove Kåven
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
20 * Note: This XMS emulation is hooked through the DPMI interrupt.
32 #include "wine/winbase16.h"
34 #include "wine/debug.h"
36 WINE_DEFAULT_DEBUG_CHANNEL(int31);
41 } WINE_PACKED MOVEOFS;
47 } WINE_PACKED MOVESTRUCT;
49 static BYTE * XMS_Offset( MOVEOFS *ofs )
51 if (ofs->Handle) return (BYTE*)GlobalLock16(ofs->Handle)+ofs->Offset;
52 else return (BYTE*)PTR_REAL_TO_LIN(SELECTOROF(ofs->Offset),OFFSETOF(ofs->Offset));
55 /**********************************************************************
59 void WINAPI XMS_Handler( CONTEXT86 *context )
61 switch(AH_reg(context))
63 case 0x00: /* Get XMS version number */
64 TRACE("get XMS version number\n");
65 SET_AX( context, 0x0200 ); /* 2.0 */
66 SET_BX( context, 0x0000 ); /* internal revision */
67 SET_DX( context, 0x0001 ); /* HMA exists */
69 case 0x08: /* Query Free Extended Memory */
73 TRACE("query free extended memory\n");
74 GlobalMemoryStatus( &status );
75 SET_DX( context, status.dwAvailVirtual >> 10 );
76 SET_AX( context, status.dwAvailVirtual >> 10 );
77 TRACE("returning largest %dK, total %dK\n", AX_reg(context), DX_reg(context));
80 case 0x09: /* Allocate Extended Memory Block */
81 TRACE("allocate extended memory block (%dK)\n",
83 SET_DX( context, GlobalAlloc16(GMEM_MOVEABLE, (DWORD)DX_reg(context)<<10) );
84 SET_AX( context, DX_reg(context) ? 1 : 0 );
85 if (!DX_reg(context)) SET_BL( context, 0xA0 ); /* out of memory */
87 case 0x0a: /* Free Extended Memory Block */
88 TRACE("free extended memory block %04x\n",DX_reg(context));
89 if(!DX_reg(context) || GlobalFree16(DX_reg(context))) {
90 SET_AX( context, 0 ); /* failure */
91 SET_BL( context, 0xa2 ); /* invalid handle */
93 SET_AX( context, 1 ); /* success */
95 case 0x0b: /* Move Extended Memory Block */
97 MOVESTRUCT*move=CTX_SEG_OFF_TO_LIN(context,
98 context->SegDs,context->Esi);
100 TRACE("move extended memory block\n");
101 src=XMS_Offset(&move->Source);
102 dst=XMS_Offset(&move->Dest);
103 memcpy(dst,src,move->Length);
104 if (move->Source.Handle) GlobalUnlock16(move->Source.Handle);
105 if (move->Dest.Handle) GlobalUnlock16(move->Dest.Handle);
108 case 0x88: /* Query Any Free Extended Memory */
113 TRACE("query any free extended memory\n");
115 GlobalMemoryStatus( &status );
116 GetSystemInfo( &info );
117 context->Eax = status.dwAvailVirtual >> 10;
118 context->Edx = status.dwAvailVirtual >> 10;
119 context->Ecx = (DWORD)info.lpMaximumApplicationAddress;
120 SET_BL( context, 0 ); /* No errors. */
122 TRACE("returning largest %ldK, total %ldK, highest 0x%lx\n",
123 context->Eax, context->Edx, context->Ecx);
127 INT_BARF( context, 0x31 );
128 SET_AX( context, 0x0000 ); /* failure */
129 SET_BL( context, 0x80 ); /* function not implemented */