188 lines
4.8 KiB
C
188 lines
4.8 KiB
C
/*
|
|
* Window classes functions
|
|
*
|
|
* Copyright 1993 Alexandre Julliard
|
|
*/
|
|
|
|
static char Copyright[] = "Copyright Alexandre Julliard, 1993";
|
|
|
|
#include "class.h"
|
|
#include "user.h"
|
|
#include "win.h"
|
|
|
|
|
|
static HCLASS firstClass = 0;
|
|
|
|
|
|
/***********************************************************************
|
|
* CLASS_FindClassByName
|
|
*
|
|
* Return a handle and a pointer to the class.
|
|
*/
|
|
HCLASS CLASS_FindClassByName( char * name, CLASS **ptr )
|
|
{
|
|
HCLASS class = firstClass;
|
|
while(class)
|
|
{
|
|
*ptr = (CLASS *) USER_HEAP_ADDR(class);
|
|
if (!strcmp( (*ptr)->wc.lpszClassName, name )) return class;
|
|
class = (*ptr)->hNext;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* CLASS_FindClassPtr
|
|
*
|
|
* Return a pointer to the CLASS structure corresponding to a HCLASS.
|
|
*/
|
|
CLASS * CLASS_FindClassPtr( HCLASS hclass )
|
|
{
|
|
CLASS * ptr;
|
|
|
|
if (!hclass) return NULL;
|
|
ptr = (CLASS *) USER_HEAP_ADDR( hclass );
|
|
if (ptr->wMagic != CLASS_MAGIC) return NULL;
|
|
return ptr;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* RegisterClass (USER.57)
|
|
*/
|
|
ATOM RegisterClass( LPWNDCLASS class )
|
|
{
|
|
CLASS * newClass;
|
|
HCLASS handle;
|
|
|
|
#ifdef DEBUG_CLASS
|
|
printf( "RegisterClass: wndproc=%08x hinst=%d name='%s'\n",
|
|
class->lpfnWndProc, class->hInstance, class->lpszClassName );
|
|
#endif
|
|
|
|
handle = USER_HEAP_ALLOC( GMEM_MOVEABLE, sizeof(CLASS)+class->cbClsExtra );
|
|
if (!handle) return 0;
|
|
newClass = (CLASS *) USER_HEAP_ADDR( handle );
|
|
newClass->hNext = firstClass;
|
|
newClass->wMagic = CLASS_MAGIC;
|
|
newClass->atomName = handle; /* Should be an atom */
|
|
newClass->hDCE = 0; /* Should allocate a DCE if needed */
|
|
newClass->cWindows = 0;
|
|
newClass->wc = *class;
|
|
|
|
/* Class name should also be set to zero. For now we need the
|
|
* name because we don't have atoms.
|
|
*/
|
|
newClass->wc.lpszClassName = (char *)malloc(strlen(class->lpszClassName)+1);
|
|
strcpy( newClass->wc.lpszClassName, class->lpszClassName );
|
|
|
|
if (class->cbClsExtra) memset( newClass->wExtra, 0, class->cbClsExtra );
|
|
|
|
firstClass = handle;
|
|
return handle; /* Should be an atom */
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* UnregisterClass (USER.403)
|
|
*/
|
|
BOOL UnregisterClass( LPSTR className, HANDLE instance )
|
|
{
|
|
HANDLE class, next, prevClass;
|
|
CLASS * classPtr, * prevClassPtr;
|
|
|
|
/* Check if we can remove this class */
|
|
class = CLASS_FindClassByName( className, &classPtr );
|
|
if (!class) return FALSE;
|
|
if ((classPtr->wc.hInstance != instance) || (classPtr->cWindows > 0))
|
|
return FALSE;
|
|
|
|
/* Remove the class from the linked list */
|
|
if (firstClass == class) firstClass = classPtr->hNext;
|
|
else
|
|
{
|
|
for (prevClass = firstClass; prevClass; prevClass=prevClassPtr->hNext)
|
|
{
|
|
prevClassPtr = (CLASS *) USER_HEAP_ADDR(prevClass);
|
|
if (prevClassPtr->hNext == class) break;
|
|
}
|
|
if (!prevClass)
|
|
{
|
|
printf( "ERROR: Class list corrupted\n" );
|
|
return FALSE;
|
|
}
|
|
prevClassPtr->hNext = classPtr->hNext;
|
|
}
|
|
|
|
USER_HEAP_FREE( class );
|
|
return TRUE;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* GetClassWord (USER.129)
|
|
*/
|
|
WORD GetClassWord( HWND hwnd, short offset )
|
|
{
|
|
return (WORD)GetClassLong( hwnd, offset );
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* SetClassWord (USER.130)
|
|
*/
|
|
WORD SetClassWord( HWND hwnd, short offset, WORD newval )
|
|
{
|
|
CLASS * classPtr;
|
|
WND * wndPtr;
|
|
WORD retval = 0;
|
|
|
|
if (!(wndPtr = WIN_FindWndPtr( hwnd ))) return 0;
|
|
if ((classPtr = CLASS_FindClassPtr( wndPtr->hClass )))
|
|
{
|
|
WORD * ptr = (WORD *)(((char *)classPtr->wExtra) + offset);
|
|
retval = *ptr;
|
|
*ptr = newval;
|
|
}
|
|
GlobalUnlock( hwnd );
|
|
return retval;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* GetClassLong (USER.131)
|
|
*/
|
|
LONG GetClassLong( HWND hwnd, short offset )
|
|
{
|
|
CLASS * classPtr;
|
|
WND * wndPtr;
|
|
LONG retval = 0;
|
|
|
|
if (!(wndPtr = WIN_FindWndPtr( hwnd ))) return 0;
|
|
if ((classPtr = CLASS_FindClassPtr( wndPtr->hClass )))
|
|
retval = *(LONG *)(((char *)classPtr->wExtra) + offset);
|
|
GlobalUnlock( hwnd );
|
|
return retval;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* SetClassLong (USER.132)
|
|
*/
|
|
LONG SetClassLong( HWND hwnd, short offset, LONG newval )
|
|
{
|
|
CLASS * classPtr;
|
|
WND * wndPtr;
|
|
LONG retval = 0;
|
|
|
|
if (!(wndPtr = WIN_FindWndPtr( hwnd ))) return 0;
|
|
if ((classPtr = CLASS_FindClassPtr( wndPtr->hClass )))
|
|
{
|
|
LONG * ptr = (LONG *)(((char *)classPtr->wExtra) + offset);
|
|
retval = *ptr;
|
|
*ptr = newval;
|
|
}
|
|
GlobalUnlock( hwnd );
|
|
return retval;
|
|
}
|