| /* |
| * 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 (!strcasecmp( (*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->cWindows = 0; |
| newClass->wc = *class; |
| |
| if (newClass->wc.style & CS_CLASSDC) |
| newClass->hdc = CreateDC( "DISPLAY", NULL, NULL, NULL ); |
| else newClass->hdc = 0; |
| |
| /* 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; |
| } |
| |
| /* Delete the class */ |
| if (classPtr->hdc) DeleteDC( classPtr->hdc ); |
| if (classPtr->wc.hbrBackground) DeleteObject( classPtr->wc.hbrBackground ); |
| 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 *ptr, retval = 0; |
| |
| if (!(wndPtr = WIN_FindWndPtr( hwnd ))) return 0; |
| if (!(classPtr = CLASS_FindClassPtr( wndPtr->hClass ))) return 0; |
| ptr = (WORD *)(((char *)classPtr->wExtra) + offset); |
| retval = *ptr; |
| *ptr = newval; |
| return retval; |
| } |
| |
| |
| /*********************************************************************** |
| * GetClassLong (USER.131) |
| */ |
| LONG GetClassLong( HWND hwnd, short offset ) |
| { |
| CLASS * classPtr; |
| WND * wndPtr; |
| |
| if (!(wndPtr = WIN_FindWndPtr( hwnd ))) return 0; |
| if (!(classPtr = CLASS_FindClassPtr( wndPtr->hClass ))) return 0; |
| return *(LONG *)(((char *)classPtr->wExtra) + offset); |
| } |
| |
| |
| /*********************************************************************** |
| * SetClassLong (USER.132) |
| */ |
| LONG SetClassLong( HWND hwnd, short offset, LONG newval ) |
| { |
| CLASS * classPtr; |
| WND * wndPtr; |
| LONG *ptr, retval = 0; |
| |
| if (!(wndPtr = WIN_FindWndPtr( hwnd ))) return 0; |
| if (!(classPtr = CLASS_FindClassPtr( wndPtr->hClass ))) return 0; |
| ptr = (LONG *)(((char *)classPtr->wExtra) + offset); |
| retval = *ptr; |
| *ptr = newval; |
| return retval; |
| } |