source: trunk/src/gdi32/objhandle.cpp@ 4145

/* $Id: objhandle.cpp,v 1.2 2000-08-18 18:14:57 sandervl Exp $ */
/*
 * Win32 Handle Management Code for OS/2
 *
 *
 * Copyright 2000 Sander van Leeuwen (sandervl@xs4all.nl)
 *
 *
 * TODO: The table should be dynamically increased when necessary
 *       This is just a quick and dirty implementation 
 * 
 * Project Odin Software License can be found in LICENSE.TXT
 *
 */

#include <os2win.h>
#include <vmutex.h>
#include <objhandle.h>
#include "dibsect.h"
#include "region.h"

#define DBG_LOCALLOG    DBG_objhandle
#include "dbglocal.h"

//******************************************************************************

static ULONG  objHandleTable[MAX_OBJECT_HANDLES] = {0};
static ULONG  lowestFreeIndex = 0;
static VMutex objTableMutex;

//******************************************************************************
//******************************************************************************
BOOL ObjAllocateHandle(HANDLE *hObject, DWORD dwUserData, ObjectType type)
{
  objTableMutex.enter(VMUTEX_WAIT_FOREVER);
  if(lowestFreeIndex == -1) {
        //oops, out of handles
        dprintf(("ERROR: GDI: HwAllocateWindowHandle OUT OF GDI OBJECT HANDLES!!"));
        objTableMutex.leave();
        DebugInt3();
        return FALSE;
  }
  *hObject  = lowestFreeIndex;
  *hObject |= MAKE_HANDLE(type);
  objHandleTable[lowestFreeIndex] = dwUserData;

  lowestFreeIndex = -1;

  //find next free handle
  for(int i=0;i<MAX_OBJECT_HANDLES;i++) {
        if(objHandleTable[i] == 0) {
                lowestFreeIndex = i;
                break;
        }
  }
  objTableMutex.leave();
  return TRUE;
}
//******************************************************************************
//******************************************************************************
void ObjFreeHandle(HANDLE hObject)
{
  hObject &= OBJHANDLE_MAGIC_MASK;
  if(hObject < MAX_OBJECT_HANDLES) {
        objTableMutex.enter(VMUTEX_WAIT_FOREVER);
        objHandleTable[hObject] = 0;
        if(lowestFreeIndex == -1 || hObject < lowestFreeIndex) 
                lowestFreeIndex = hObject;

        objTableMutex.leave();
  }
}
//******************************************************************************
//******************************************************************************
DWORD ObjGetHandleData(HANDLE hObject)
{
  switch(GET_OBJTYPE(hObject))
  {
  case GDIOBJ_REGION:
        break;
  //case GDIOBJ_BITMAP
  //case GDIOBJ_BRUSH
  //case GDIOBJ_PALETTE
  //case GDIOBJ_FONT
  default:
        return HANDLE_OBJ_ERROR;
  }

  hObject &= OBJHANDLE_MAGIC_MASK;
  if(hObject < MAX_OBJECT_HANDLES) {
        return objHandleTable[hObject];
  }
  return HANDLE_OBJ_ERROR;
}
//******************************************************************************
//******************************************************************************
ObjectType ObjGetHandleType(HANDLE hObject)
{
  switch(GET_OBJTYPE(hObject))
  {
  case GDIOBJ_REGION:
        return GDIOBJ_REGION;
  //case GDIOBJ_BITMAP
  //case GDIOBJ_BRUSH
  //case GDIOBJ_PALETTE
  //case GDIOBJ_FONT
  default:
        return GDIOBJ_ERROR;
  }
}
//******************************************************************************
//******************************************************************************
int WIN32API GetObjectA( HGDIOBJ hObject, int size, void *lpBuffer)
{
 int rc;

  if(size == 0 || lpBuffer == NULL) {
        SetLastError(ERROR_INVALID_PARAMETER);
        return 0;
  }

  if(ObjGetHandleType(hObject) == GDIOBJ_REGION) {
        SetLastError(ERROR_SUCCESS);
        return 0;
  }
  dprintf(("GDI32: GetObject %X %X %X\n", hObject, size, lpBuffer));
  if(DIBSection::getSection() != NULL)
  {
        DIBSection *dsect = DIBSection::find(hObject);
        if(dsect)
        {
                rc = dsect->GetDIBSection(size, lpBuffer);
                if(rc == 0) {
                        SetLastError(ERROR_INVALID_PARAMETER);
                        return 0;
                }
                SetLastError(ERROR_SUCCESS);
                return rc;
        }
  }

  return O32_GetObject(hObject, size, lpBuffer);
}
//******************************************************************************
//******************************************************************************
int WIN32API GetObjectW( HGDIOBJ arg1, int arg2, void *  arg3)
{
  dprintf(("GDI32: GetObjectW %X, %d %X not complete!", arg1, arg2, arg3));
  return GetObjectA(arg1, arg2, arg3);
}
//******************************************************************************
//******************************************************************************
HGDIOBJ WIN32API SelectObject(HDC hdc, HGDIOBJ hObj)
{
 HGDIOBJ rc;

    dprintf2(("GDI32: SelectObject %x %x", hdc, hObj));

    if(ObjGetHandleType(hObj) == GDIOBJ_REGION) {
        //Return complexity here; not previously selected clip region
        return (HGDIOBJ)SelectClipRgn(hdc, hObj);
    }

    if(DIBSection::getSection() != NULL)
    {
      DIBSection *dsect;

      dsect = DIBSection::find(hdc);
      if(dsect)
      {
        //remove previously selected dibsection
        dsect->UnSelectDIBObject();
      }
      dsect = DIBSection::find((DWORD)hObj);
      if(dsect)
      {
        dsect->SelectDIBObject(hdc);
      }
    }
    rc = O32_SelectObject(hdc, hObj);
    if(rc != 0 && DIBSection::getSection != NULL)
    {
      DIBSection *dsect = DIBSection::find((DWORD)rc);
      if(dsect)
      {
        dsect->UnSelectDIBObject();
      }
    }
    return(rc);
}
//******************************************************************************
//******************************************************************************
DWORD WIN32API GetObjectType( HGDIOBJ hObj)
{
  dprintf2(("GDI32: GetObjectType\n"));
  if(ObjGetHandleType(hObj) == GDIOBJ_REGION) {
        SetLastError(ERROR_SUCCESS);
        return OBJ_REGION;
  }
  return O32_GetObjectType(hObj);
}
//******************************************************************************
//******************************************************************************
BOOL WIN32API DeleteObject(HANDLE hObj)
{
  dprintf(("GDI32: DeleteObject %x", hObj));
  if(ObjGetHandleType(hObj) == GDIOBJ_REGION) {
        OSLibDeleteRegion(ObjGetHandleData(hObj));
        ObjFreeHandle(hObj);
        SetLastError(ERROR_SUCCESS);
        return OBJ_REGION;
  }
  DIBSection::deleteSection((DWORD)hObj);
  return O32_DeleteObject(hObj);
}
//******************************************************************************
//******************************************************************************
BOOL WIN32API SetObjectOwner( HGDIOBJ arg1, int arg2 )
{
  // Here is a guess for a undocumented entry
  dprintf(("WARNING: GDI32: SetObjectOwner - stub (TRUE)\n"));
  return TRUE;
}
//******************************************************************************
//******************************************************************************