memory/global.c

   1 /*
   2  * Global heap functions
   3  *
   4  * Copyright 1995 Alexandre Julliard
   5  *
   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.
  10  *
  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.
  15  *
  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
  19  */
  20 /* 0xffff sometimes seems to mean: CURRENT_DS */
  21
  22 #include "config.h"
  23 #include "wine/port.h"
  24
  25 #include <sys/types.h>
  26 #include <stdlib.h>
  27 #include <time.h>
  28 #include <stdio.h>
  29 #ifdef HAVE_UNISTD_H
  30 # include <unistd.h>
  31 #endif
  32 #include <string.h>
  33 #ifdef HAVE_SYS_PARAM_H
  34 #include <sys/param.h>
  35 #endif
  36 #ifdef HAVE_SYS_SYSCTL_H
  37 #include <sys/sysctl.h>
  38 #endif
  39
  40 #include "wine/winbase16.h"
  41 #include "ntstatus.h"
  42 #include "global.h"
  43 #include "toolhelp.h"
  44 #include "selectors.h"
  45 #include "miscemu.h"
  46 #include "stackframe.h"
  47 #include "wine/debug.h"
  48 #include "winerror.h"
  49
  50 WINE_DEFAULT_DEBUG_CHANNEL(global);
  51
  52   /* Global arena block */
  53 typedef struct
  54 {
  55     DWORD     base;          /* Base address (0 if discarded) */
  56     DWORD     size;          /* Size in bytes (0 indicates a free block) */
  57     HGLOBAL16 handle;        /* Handle for this block */
  58     HGLOBAL16 hOwner;        /* Owner of this block */
  59     BYTE      lockCount;     /* Count of GlobalFix() calls */
  60     BYTE      pageLockCount; /* Count of GlobalPageLock() calls */
  61     BYTE      flags;         /* Allocation flags */
  62     BYTE      selCount;      /* Number of selectors allocated for this block */
  63 } GLOBALARENA;
  64
  65   /* Arena array */
  66 /*static*/ GLOBALARENA *pGlobalArena = NULL;
  67 /*static*/ int globalArenaSize = 0;
  68
  69 #define VALID_HANDLE(handle) (((handle)>>__AHSHIFT)<globalArenaSize)
  70 #define GET_ARENA_PTR(handle)  (pGlobalArena + ((handle) >> __AHSHIFT))
  71
  72
  73 /***********************************************************************
  74  *           GlobalLock16   (KERNEL32.25)
  75  *
  76  * This is the GlobalLock16() function used by 32-bit code.
  77  *
  78  * RETURNS
  79  *      Pointer to first byte of memory block
  80  *      NULL: Failure
  81  */
  82 LPVOID WINAPI GlobalLock16(
  83               HGLOBAL16 handle /* [in] Handle of global memory object */
  84 ) {
  85     if (!handle) return 0;
  86     if (!VALID_HANDLE(handle))
  87         return 0;
  88     GET_ARENA_PTR(handle)->lockCount++;
  89     return (LPVOID)GET_ARENA_PTR(handle)->base;
  90 }
  91
  92
  93 /***********************************************************************
  94  *           FarGetOwner   (KERNEL.404)
  95  */
  96 HANDLE16 WINAPI FarGetOwner16( HGLOBAL16 handle )
  97 {
  98     if (!VALID_HANDLE(handle)) {
  99         WARN("Invalid handle 0x%04x passed to FarGetOwner!\n",handle);
 100         return 0;
 101     }
 102     return GET_ARENA_PTR(handle)->hOwner;
 103 }