dlls/comctl32/nativefont.c

   1 /*
   2  * Native Font control
   3  *
   4  * Copyright 1998, 1999 Eric Kohl
   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  * NOTES
  21  *   This is just a dummy control. An author is needed! Any volunteers?
  22  *   I will only improve this control once in a while.
  23  *     Eric <ekohl@abo.rhein-zeitung.de>
  24  *
  25  * TODO:
  26  *   - All messages.
  27  *   - All notifications.
  28  */
  29
  30 #include <stdarg.h>
  31 #include <string.h>
  32 #include "windef.h"
  33 #include "winbase.h"
  34 #include "wingdi.h"
  35 #include "winuser.h"
  36 #include "winnls.h"
  37 #include "commctrl.h"
  38 #include "comctl32.h"
  39 #include "wine/debug.h"
  40
  41 WINE_DEFAULT_DEBUG_CHANNEL(nativefont);
  42
  43 typedef struct
  44 {
  45     DWORD  dwDummy;   /* just to keep the compiler happy ;-) */
  46 } NATIVEFONT_INFO;
  47
  48 #define NATIVEFONT_GetInfoPtr(hwnd) ((NATIVEFONT_INFO *)GetWindowLongA (hwnd, 0))
  49
  50
  51 static LRESULT
  52 NATIVEFONT_Create (HWND hwnd, WPARAM wParam, LPARAM lParam)
  53 {
  54     NATIVEFONT_INFO *infoPtr;
  55
  56     /* allocate memory for info structure */
  57     infoPtr = (NATIVEFONT_INFO *)Alloc (sizeof(NATIVEFONT_INFO));
  58     SetWindowLongA (hwnd, 0, (DWORD)infoPtr);
  59
  60
  61     /* initialize info structure */
  62
  63
  64     return 0;
  65 }
  66
  67
  68 static LRESULT
  69 NATIVEFONT_Destroy (HWND hwnd, WPARAM wParam, LPARAM lParam)
  70 {
  71     NATIVEFONT_INFO *infoPtr = NATIVEFONT_GetInfoPtr (hwnd);
  72
  73
  74
  75
  76     /* free comboex info data */
  77     Free (infoPtr);
  78     SetWindowLongA( hwnd, 0, 0 );
  79
  80     return 0;
  81 }
  82
  83
  84
  85 static LRESULT WINAPI
  86 NATIVEFONT_WindowProc (HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
  87 {
  88     if (!NATIVEFONT_GetInfoPtr(hwnd) && (uMsg != WM_CREATE))
  89         return DefWindowProcA( hwnd, uMsg, wParam, lParam );
  90
  91     switch (uMsg)
  92     {
  93
  94         case WM_CREATE:
  95             return NATIVEFONT_Create (hwnd, wParam, lParam);
  96
  97         case WM_DESTROY:
  98             return NATIVEFONT_Destroy (hwnd, wParam, lParam);
  99
 100         case WM_MOVE:
 101         case WM_SIZE:
 102         case WM_SHOWWINDOW:
 103         case WM_WINDOWPOSCHANGING:
 104         case WM_WINDOWPOSCHANGED:
 105         case WM_SETFONT:
 106         case WM_GETDLGCODE:
 107             /* FIXME("message %04x seen but stubbed\n", uMsg); */
 108             return DefWindowProcA (hwnd, uMsg, wParam, lParam);
 109
 110         default:
 111             ERR("unknown msg %04x wp=%08x lp=%08lx\n",
 112                      uMsg, wParam, lParam);
 113             return DefWindowProcA (hwnd, uMsg, wParam, lParam);
 114     }
 115     return 0;
 116 }
 117
 118
 119 VOID
 120 NATIVEFONT_Register (void)
 121 {
 122     WNDCLASSA wndClass;
 123
 124     ZeroMemory (&wndClass, sizeof(WNDCLASSA));
 125     wndClass.style         = CS_GLOBALCLASS;
 126     wndClass.lpfnWndProc   = (WNDPROC)NATIVEFONT_WindowProc;
 127     wndClass.cbClsExtra    = 0;
 128     wndClass.cbWndExtra    = sizeof(NATIVEFONT_INFO *);
 129     wndClass.hCursor       = LoadCursorA (0, (LPSTR)IDC_ARROW);
 130     wndClass.hbrBackground = (HBRUSH)(COLOR_WINDOW + 1);
 131     wndClass.lpszClassName = WC_NATIVEFONTCTLA;
 132
 133     RegisterClassA (&wndClass);
 134 }
 135
 136
 137 VOID
 138 NATIVEFONT_Unregister (void)
 139 {
 140     UnregisterClassA (WC_NATIVEFONTCTLA, NULL);
 141 }