msdos/xms.c

   1 /*
   2  * XMS v2+ emulation
   3  *
   4  * Copyright 1998 Ove Kåven
   5  *
   6  * This XMS emulation is hooked through the DPMI interrupt.
   7  */
   8
   9 #include <unistd.h>
  10 #include <string.h>
  11 #include "windows.h"
  12 #include "module.h"
  13 #include "miscemu.h"
  14 #include "toolhelp.h"
  15 #include "debug.h"
  16 #include "selectors.h"
  17
  18 typedef struct {
  19  WORD Handle;
  20  DWORD Offset;
  21 } WINE_PACKED MOVEOFS;
  22
  23 typedef struct {
  24  DWORD Length;
  25  MOVEOFS Source;
  26  MOVEOFS Dest;
  27 } WINE_PACKED MOVESTRUCT;
  28
  29 static BYTE * XMS_Offset( MOVEOFS *ofs )
  30 {
  31     if (ofs->Handle) return (BYTE*)GlobalLock16(ofs->Handle)+ofs->Offset;
  32         else return (BYTE*)DOSMEM_MapRealToLinear(ofs->Offset);
  33 }
  34
  35 /**********************************************************************
  36  *          XMS_Handler
  37  */
  38
  39 void WINAPI XMS_Handler( CONTEXT *context )
  40 {
  41     switch(AH_reg(context))
  42     {
  43     case 0x00:   /* Get XMS version number */
  44         TRACE(int31, "get XMS version number\n");
  45         AX_reg(context) = 0x0200; /* 2.0 */
  46         BX_reg(context) = 0x0000; /* internal revision */
  47         DX_reg(context) = 0x0001; /* HMA exists */
  48         break;
  49     case 0x08:   /* Query Free Extended Memory */
  50     {
  51         MEMMANINFO mmi;
  52
  53         TRACE(int31, "query free extended memory\n");
  54         mmi.dwSize = sizeof(mmi);
  55         MemManInfo(&mmi);
  56         AX_reg(context) = mmi.dwFreePages>>10;
  57         DX_reg(context) = mmi.dwLargestFreeBlock>>10;
  58         break;
  59     }
  60     case 0x09:   /* Allocate Extended Memory Block */
  61         TRACE(int31, "allocate extended memory block (%dK)\n",
  62             DX_reg(context));
  63         DX_reg(context) = GlobalAlloc16(GMEM_MOVEABLE,
  64             (DWORD)DX_reg(context)<<10);
  65         AX_reg(context) = DX_reg(context) ? 1 : 0;
  66         if (!DX_reg(context)) BL_reg(context) = 0xA0; /* out of memory */
  67         break;
  68     case 0x0a:   /* Free Extended Memory Block */
  69         TRACE(int31, "free extended memory block %04x\n",DX_reg(context));
  70         GlobalFree16(DX_reg(context));
  71         break;
  72     case 0x0b:   /* Move Extended Memory Block */
  73     {
  74         MOVESTRUCT*move=CTX_SEG_OFF_TO_LIN(context,
  75             DS_reg(context),SI_reg(context));
  76         BYTE*src,*dst;
  77         TRACE(int31, "move extended memory block\n");
  78         src=XMS_Offset(&move->Source);
  79         dst=XMS_Offset(&move->Dest);
  80         memcpy(dst,src,move->Length);
  81         if (move->Source.Handle) GlobalUnlock16(move->Source.Handle);
  82         if (move->Dest.Handle) GlobalUnlock16(move->Dest.Handle);
  83         break;
  84     }
  85     default:
  86         INT_BARF( context, 0x31 );
  87         AX_reg(context) = 0x0000; /* failure */
  88         BL_reg(context) = 0x80;   /* function not implemented */
  89         break;
  90     }
  91 }