dlls/comctl32/ipaddress.c

   1 /*
   2  * IP Address control
   3  *
   4  * Copyright 2002 Dimitrie O. Paun
   5  * Copyright 1999 Chris Morgan<cmorgan@wpi.edu>
   6  * Copyright 1999 James Abbatiello<abbeyj@wpi.edu>
   7  * Copyright 1998, 1999 Eric Kohl
   8  * Copyright 1998 Alex Priem <alexp@sci.kun.nl>
   9  *
  10  * This library is free software; you can redistribute it and/or
  11  * modify it under the terms of the GNU Lesser General Public
  12  * License as published by the Free Software Foundation; either
  13  * version 2.1 of the License, or (at your option) any later version.
  14  *
  15  * This library is distributed in the hope that it will be useful,
  16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  18  * Lesser General Public License for more details.
  19  *
  20  * You should have received a copy of the GNU Lesser General Public
  21  * License along with this library; if not, write to the Free Software
  22  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  23  */
  24
  25 #include <ctype.h>
  26 #include <stdlib.h>
  27 #include <stdarg.h>
  28 #include <stdio.h>
  29 #include <string.h>
  30
  31 #include "windef.h"
  32 #include "winbase.h"
  33 #include "wingdi.h"
  34 #include "winuser.h"
  35 #include "winnls.h"
  36 #include "commctrl.h"
  37 #include "comctl32.h"
  38 #include "uxtheme.h"
  39 #include "vsstyle.h"
  40 #include "vssym32.h"
  41 #include "wine/debug.h"
  42 #include "wine/heap.h"
  43
  44 WINE_DEFAULT_DEBUG_CHANNEL(ipaddress);
  45
  46 typedef struct
  47 {
  48     HWND     EditHwnd;
  49     INT      LowerLimit;
  50     INT      UpperLimit;
  51     WNDPROC  OrigProc;
  52 } IPPART_INFO;
  53
  54 typedef struct
  55 {
  56     HWND        Self;
  57     HWND        Notify;
  58     BOOL        Enabled;
  59     IPPART_INFO Part[4];
  60 } IPADDRESS_INFO;
  61
  62 static const WCHAR IP_SUBCLASS_PROP[] = L"CCIP32SubclassInfo";
  63
  64 #define POS_DEFAULT     0
  65 #define POS_LEFT        1
  66 #define POS_RIGHT       2
  67 #define POS_SELALL      3
  68
  69 static LRESULT CALLBACK
  70 IPADDRESS_SubclassProc (HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam);
  71
  72 static void IPADDRESS_UpdateText (const IPADDRESS_INFO *infoPtr)
  73 {
  74     WCHAR field[4];
  75     WCHAR ip[16];
  76     INT i;
  77
  78     ip[0] = 0;
  79
  80     for (i = 0; i < 4; i++) {
  81         if (GetWindowTextW (infoPtr->Part[i].EditHwnd, field, 4))
  82             lstrcatW(ip, field);
  83         else
  84             /* empty edit treated as zero */
  85             lstrcatW(ip, L"0");
  86         if (i != 3)
  87             lstrcatW(ip, L".");
  88     }
  89
  90     SetWindowTextW(infoPtr->Self, ip);
  91 }
  92
  93 static LRESULT IPADDRESS_Notify (const IPADDRESS_INFO *infoPtr, UINT command)
  94 {
  95     HWND hwnd = infoPtr->Self;
  96
  97     TRACE("(command=%x)\n", command);
  98
  99     return SendMessageW (infoPtr->Notify, WM_COMMAND,
 100              MAKEWPARAM (GetWindowLongPtrW (hwnd, GWLP_ID), command), (LPARAM)hwnd);
 101 }
 102
 103 static INT IPADDRESS_IPNotify (const IPADDRESS_INFO *infoPtr, INT field, INT value)
 104 {
 105     NMIPADDRESS nmip;
 106
 107     TRACE("(field=%x, value=%d)\n", field, value);
 108
 109     nmip.hdr.hwndFrom = infoPtr->Self;
 110     nmip.hdr.idFrom   = GetWindowLongPtrW (infoPtr->Self, GWLP_ID);
 111     nmip.hdr.code     = IPN_FIELDCHANGED;
 112
 113     nmip.iField = field;
 114     nmip.iValue = value;
 115
 116     SendMessageW (infoPtr->Notify, WM_NOTIFY, nmip.hdr.idFrom, (LPARAM)&nmip);
 117
 118     TRACE("<-- %d\n", nmip.iValue);
 119
 120     return nmip.iValue;
 121 }
 122
 123
 124 static int IPADDRESS_GetPartIndex(const IPADDRESS_INFO *infoPtr, HWND hwnd)
 125 {
 126     int i;
 127
 128     TRACE("(hwnd=%p)\n", hwnd);
 129
 130     for (i = 0; i < 4; i++)
 131         if (infoPtr->Part[i].EditHwnd == hwnd) return i;
 132
 133     return -1;
 134 }
 135
 136
 137 static LRESULT IPADDRESS_Draw (const IPADDRESS_INFO *infoPtr, HDC hdc)
 138 {
 139     RECT rect, rcPart;
 140     COLORREF bgCol, fgCol;
 141     HTHEME theme;
 142     int i, state = ETS_NORMAL;
 143
 144     TRACE("\n");
 145
 146     GetClientRect (infoPtr->Self, &rect);
 147
 148     theme = GetWindowTheme (infoPtr->Self);
 149
 150     if (theme) {
 151         DWORD dwStyle = GetWindowLongW (infoPtr->Self, GWL_STYLE);
 152
 153         if (!infoPtr->Enabled)
 154             state = ETS_DISABLED;
 155         else if (dwStyle & ES_READONLY)
 156             state = ETS_READONLY;
 157         else if (GetFocus() == infoPtr->Self)
 158             state = ETS_FOCUSED;
 159
 160         GetThemeColor(theme, EP_EDITTEXT, state, TMT_FILLCOLOR, &bgCol);
 161         GetThemeColor(theme, EP_EDITTEXT, state, TMT_TEXTCOLOR, &fgCol);
 162
 163         if (IsThemeBackgroundPartiallyTransparent (theme, EP_EDITTEXT, state))
 164             DrawThemeParentBackground(infoPtr->Self, hdc, &rect);
 165         DrawThemeBackground (theme, hdc, EP_EDITTEXT, state, &rect, 0);
 166     } else {
 167         if (infoPtr->Enabled) {
 168             bgCol = comctl32_color.clrWindow;
 169             fgCol = comctl32_color.clrWindowText;
 170         } else {
 171             bgCol = comctl32_color.clr3dFace;
 172             fgCol = comctl32_color.clrGrayText;
 173         }
 174
 175         FillRect (hdc, &rect, (HBRUSH)(DWORD_PTR)(bgCol+1));
 176         DrawEdge (hdc, &rect, EDGE_SUNKEN, BF_RECT | BF_ADJUST);
 177     }
 178
 179     SetBkColor  (hdc, bgCol);
 180     SetTextColor(hdc, fgCol);
 181
 182     for (i = 0; i < 3; i++) {
 183         GetWindowRect (infoPtr->Part[i].EditHwnd, &rcPart);
 184         MapWindowPoints( 0, infoPtr->Self, (POINT *)&rcPart, 2 );
 185         rect.left = rcPart.right;
 186         GetWindowRect (infoPtr->Part[i+1].EditHwnd, &rcPart);
 187         MapWindowPoints( 0, infoPtr->Self, (POINT *)&rcPart, 2 );
 188         rect.right = rcPart.left;
 189
 190         if (theme)
 191             DrawThemeText(theme, hdc, EP_EDITTEXT, state, L".", 1, DT_SINGLELINE | DT_CENTER | DT_BOTTOM, 0, &rect);
 192         else
 193             DrawTextW(hdc, L".", 1, &rect, DT_SINGLELINE | DT_CENTER | DT_BOTTOM);
 194     }
 195
 196     return 0;
 197 }
 198
 199
 200 static LRESULT IPADDRESS_Create (HWND hwnd, const CREATESTRUCTA *lpCreate)
 201 {
 202     IPADDRESS_INFO *infoPtr;
 203     RECT rcClient, edit;
 204     int i, fieldsize;
 205     HFONT hFont, hSysFont;
 206     LOGFONTW logFont, logSysFont;
 207
 208     TRACE("\n");
 209
 210     SetWindowLongW (hwnd, GWL_STYLE,
 211                     GetWindowLongW(hwnd, GWL_STYLE) & ~WS_BORDER);
 212
 213     infoPtr = heap_alloc_zero (sizeof(*infoPtr));
 214     if (!infoPtr) return -1;
 215     SetWindowLongPtrW (hwnd, 0, (DWORD_PTR)infoPtr);
 216
 217     GetClientRect (hwnd, &rcClient);
 218
 219     fieldsize = (rcClient.right - rcClient.left) / 4;
 220
 221     edit.top    = rcClient.top + 2;
 222     edit.bottom = rcClient.bottom - 2;
 223
 224     infoPtr->Self = hwnd;
 225     infoPtr->Enabled = TRUE;
 226     infoPtr->Notify = lpCreate->hwndParent;
 227
 228     hSysFont = GetStockObject(ANSI_VAR_FONT);
 229     GetObjectW(hSysFont, sizeof(LOGFONTW), &logSysFont);
 230     SystemParametersInfoW(SPI_GETICONTITLELOGFONT, 0, &logFont, 0);
 231     lstrcpyW(logFont.lfFaceName, logSysFont.lfFaceName);
 232     hFont = CreateFontIndirectW(&logFont);
 233
 234     for (i = 0; i < 4; i++) {
 235         IPPART_INFO* part = &infoPtr->Part[i];
 236
 237         part->LowerLimit = 0;
 238         part->UpperLimit = 255;
 239         edit.left = rcClient.left + i*fieldsize + 6;
 240         edit.right = rcClient.left + (i+1)*fieldsize - 2;
 241         part->EditHwnd =
 242                 CreateWindowW (WC_EDITW, NULL, WS_CHILD | WS_VISIBLE | ES_CENTER,
 243                                edit.left, edit.top, edit.right - edit.left,
 244                                edit.bottom - edit.top, hwnd, (HMENU) 1,
 245                                (HINSTANCE)GetWindowLongPtrW(hwnd, GWLP_HINSTANCE), NULL);
 246         SendMessageW(part->EditHwnd, WM_SETFONT, (WPARAM) hFont, FALSE);
 247         SetPropW(part->EditHwnd, IP_SUBCLASS_PROP, hwnd);
 248         part->OrigProc = (WNDPROC)
 249                 SetWindowLongPtrW (part->EditHwnd, GWLP_WNDPROC,
 250                                 (DWORD_PTR)IPADDRESS_SubclassProc);
 251         EnableWindow(part->EditHwnd, infoPtr->Enabled);
 252     }
 253
 254     IPADDRESS_UpdateText (infoPtr);
 255     OpenThemeData (infoPtr->Self, WC_EDITW);
 256
 257     return 0;
 258 }
 259
 260
 261 static LRESULT IPADDRESS_Destroy (IPADDRESS_INFO *infoPtr)
 262 {
 263     HTHEME theme;
 264     int i;
 265
 266     TRACE("\n");
 267
 268     for (i = 0; i < 4; i++) {
 269         IPPART_INFO* part = &infoPtr->Part[i];
 270         SetWindowLongPtrW (part->EditHwnd, GWLP_WNDPROC, (DWORD_PTR)part->OrigProc);
 271     }
 272
 273     SetWindowLongPtrW (infoPtr->Self, 0, 0);
 274     theme = GetWindowTheme (infoPtr->Self);
 275     CloseThemeData (theme);
 276     heap_free (infoPtr);
 277     return 0;
 278 }
 279
 280
 281 static LRESULT IPADDRESS_Enable (IPADDRESS_INFO *infoPtr, BOOL enabled)
 282 {
 283     int i;
 284
 285     infoPtr->Enabled = enabled;
 286
 287     for (i = 0; i < 4; i++)
 288         EnableWindow(infoPtr->Part[i].EditHwnd, enabled);
 289
 290     InvalidateRgn(infoPtr->Self, NULL, FALSE);
 291     return 0;
 292 }
 293
 294
 295 static LRESULT IPADDRESS_Paint (const IPADDRESS_INFO *infoPtr, HDC hdc)
 296 {
 297     PAINTSTRUCT ps;
 298
 299     TRACE("\n");
 300
 301     if (hdc) return IPADDRESS_Draw (infoPtr, hdc);
 302
 303     hdc = BeginPaint (infoPtr->Self, &ps);
 304     IPADDRESS_Draw (infoPtr, hdc);
 305     EndPaint (infoPtr->Self, &ps);
 306     return 0;
 307 }
 308
 309
 310 static BOOL IPADDRESS_IsBlank (const IPADDRESS_INFO *infoPtr)
 311 {
 312     int i;
 313
 314     TRACE("\n");
 315
 316     for (i = 0; i < 4; i++)
 317         if (GetWindowTextLengthW (infoPtr->Part[i].EditHwnd)) return FALSE;
 318
 319     return TRUE;
 320 }
 321
 322
 323 static int IPADDRESS_GetAddress (const IPADDRESS_INFO *infoPtr, LPDWORD ip_address)
 324 {
 325     WCHAR field[5];
 326     int i, invalid = 0;
 327     DWORD ip_addr = 0;
 328
 329     TRACE("\n");
 330
 331     for (i = 0; i < 4; i++) {
 332         ip_addr *= 256;
 333         if (GetWindowTextW (infoPtr->Part[i].EditHwnd, field, 4))
 334             ip_addr += wcstol(field, NULL, 10);
 335         else
 336             invalid++;
 337     }
 338     *ip_address = ip_addr;
 339
 340     return 4 - invalid;
 341 }
 342
 343
 344 static BOOL IPADDRESS_SetRange (IPADDRESS_INFO *infoPtr, int index, WORD range)
 345 {
 346     TRACE("\n");
 347
 348     if ( (index < 0) || (index > 3) ) return FALSE;
 349
 350     infoPtr->Part[index].LowerLimit = range & 0xFF;
 351     infoPtr->Part[index].UpperLimit = (range >> 8)  & 0xFF;
 352
 353     return TRUE;
 354 }
 355
 356
 357 static LRESULT IPADDRESS_ClearAddress (const IPADDRESS_INFO *infoPtr)
 358 {
 359     int i;
 360
 361     TRACE("\n");
 362
 363     for (i = 0; i < 4; i++)
 364         SetWindowTextW (infoPtr->Part[i].EditHwnd, L"");
 365
 366     return 1;
 367 }
 368
 369
 370 static LRESULT IPADDRESS_SetAddress (const IPADDRESS_INFO *infoPtr, DWORD ip_address)
 371 {
 372     WCHAR buf[20];
 373     int i;
 374
 375     TRACE("\n");
 376
 377     for (i = 3; i >= 0; i--) {
 378         const IPPART_INFO* part = &infoPtr->Part[i];
 379         int value = ip_address & 0xff;
 380         if ( (value >= part->LowerLimit) && (value <= part->UpperLimit) ) {
 381             wsprintfW (buf, L"%d", value);
 382             SetWindowTextW (part->EditHwnd, buf);
 383             IPADDRESS_Notify (infoPtr, EN_CHANGE);
 384         }
 385         ip_address >>= 8;
 386     }
 387
 388     return TRUE;
 389 }
 390
 391
 392 static LRESULT IPADDRESS_SetFocusToField (const IPADDRESS_INFO *infoPtr, INT index)
 393 {
 394     TRACE("%d\n", index);
 395
 396     if (index > 3 || index < 0) index=0;
 397
 398     SendMessageW (infoPtr->Part[index].EditHwnd, EM_SETSEL, 0, -1);
 399     SetFocus (infoPtr->Part[index].EditHwnd);
 400
 401     return 1;
 402 }
 403
 404
 405 static BOOL IPADDRESS_ConstrainField (const IPADDRESS_INFO *infoPtr, int currentfield)
 406 {
 407     const IPPART_INFO *part;
 408     int curValue, newValue;
 409     WCHAR field[10];
 410
 411     TRACE("(currentfield=%d)\n", currentfield);
 412
 413     if (currentfield < 0 || currentfield > 3) return FALSE;
 414
 415     part = &infoPtr->Part[currentfield];
 416     if (!GetWindowTextW (part->EditHwnd, field, 4)) return FALSE;
 417
 418     curValue = wcstol(field, NULL, 10);
 419     TRACE("  curValue=%d\n", curValue);
 420
 421     newValue = IPADDRESS_IPNotify(infoPtr, currentfield, curValue);
 422     TRACE("  newValue=%d\n", newValue);
 423
 424     if (newValue < part->LowerLimit) newValue = part->LowerLimit;
 425     if (newValue > part->UpperLimit) newValue = part->UpperLimit;
 426
 427     if (newValue == curValue) return FALSE;
 428
 429     wsprintfW (field, L"%d", newValue);
 430     TRACE("  field=%s\n", debugstr_w(field));
 431     return SetWindowTextW (part->EditHwnd, field);
 432 }
 433
 434
 435 static BOOL IPADDRESS_GotoNextField (const IPADDRESS_INFO *infoPtr, int cur, int sel)
 436 {
 437     TRACE("\n");
 438
 439     if(cur >= -1 && cur < 4) {
 440         IPADDRESS_ConstrainField(infoPtr, cur);
 441
 442         if(cur < 3) {
 443             const IPPART_INFO *next = &infoPtr->Part[cur + 1];
 444             int start = 0, end = 0;
 445             SetFocus (next->EditHwnd);
 446             if (sel != POS_DEFAULT) {
 447                 if (sel == POS_RIGHT)
 448                     start = end = GetWindowTextLengthW(next->EditHwnd);
 449                 else if (sel == POS_SELALL)
 450                     end = -1;
 451                 SendMessageW(next->EditHwnd, EM_SETSEL, start, end);
 452             }
 453             return TRUE;
 454         }
 455
 456     }
 457     return FALSE;
 458 }
 459
 460 static LRESULT IPADDRESS_ThemeChanged (const IPADDRESS_INFO *infoPtr)
 461 {
 462     HTHEME theme = GetWindowTheme (infoPtr->Self);
 463     CloseThemeData (theme);
 464     theme = OpenThemeData (theme, WC_EDITW);
 465     InvalidateRect (infoPtr->Self, NULL, TRUE);
 466     return 0;
 467 }
 468
 469 /*
 470  * period: move and select the text in the next field to the right if
 471  *         the current field is not empty(l!=0), we are not in the
 472  *         left most position, and nothing is selected(startsel==endsel)
 473  *
 474  * spacebar: same behavior as period
 475  *
 476  * alpha characters: completely ignored
 477  *
 478  * digits: accepted when field text length < 2 ignored otherwise.
 479  *         when 3 numbers have been entered into the field the value
 480  *         of the field is checked, if the field value exceeds the
 481  *         maximum value and is changed the field remains the current
 482  *         field, otherwise focus moves to the field to the right
 483  *
 484  * tab: change focus from the current ipaddress control to the next
 485  *      control in the tab order
 486  *
 487  * right arrow: move to the field on the right to the left most
 488  *              position in that field if no text is selected,
 489  *              we are in the right most position in the field,
 490  *              we are not in the right most field
 491  *
 492  * left arrow: move to the field on the left to the right most
 493  *             position in that field if no text is selected,
 494  *             we are in the left most position in the current field
 495  *             and we are not in the left most field
 496  *
 497  * backspace: delete the character to the left of the cursor position,
 498  *            if none are present move to the field on the left if
 499  *            we are not in the left most field and delete the right
 500  *            most digit in that field while keeping the cursor
 501  *            on the right side of the field
 502  */
 503 LRESULT CALLBACK
 504 IPADDRESS_SubclassProc (HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
 505 {
 506     HWND Self = GetPropW (hwnd, IP_SUBCLASS_PROP);
 507     IPADDRESS_INFO *infoPtr = (IPADDRESS_INFO *)GetWindowLongPtrW (Self, 0);
 508     CHAR c = (CHAR)wParam;
 509     INT index, len = 0, startsel, endsel;
 510     IPPART_INFO *part;
 511
 512     TRACE("hwnd %p, msg 0x%x, wparam %#Ix, lparam %#Ix\n", hwnd, uMsg, wParam, lParam);
 513
 514     if ((index = IPADDRESS_GetPartIndex(infoPtr, hwnd)) < 0)
 515     {
 516         ERR("We subclassed the wrong window! (hwnd=%p)\n", hwnd);
 517         return 0;
 518     }
 519     part = &infoPtr->Part[index];
 520
 521     if (uMsg == WM_CHAR || uMsg == WM_KEYDOWN) {
 522         len = GetWindowTextLengthW (hwnd);
 523         SendMessageW(hwnd, EM_GETSEL, (WPARAM)&startsel, (LPARAM)&endsel);
 524     }
 525     switch (uMsg) {
 526         case WM_CHAR:
 527             if(isdigit(c)) {
 528                 if(len == 2 && startsel==endsel && endsel==len) {
 529                     /* process the digit press before we check the field */
 530                     int return_val = CallWindowProcW (part->OrigProc, hwnd, uMsg, wParam, lParam);
 531
 532                     /* if the field value was changed stay at the current field */
 533                     if(!IPADDRESS_ConstrainField(infoPtr, index))
 534                         IPADDRESS_GotoNextField (infoPtr, index, POS_DEFAULT);
 535
 536                     return return_val;
 537                 } else if (len == 3 && startsel==endsel && endsel==len)
 538                     IPADDRESS_GotoNextField (infoPtr, index, POS_SELALL);
 539                 else if (len < 3 || startsel != endsel) break;
 540             } else if(c == '.' || c == ' ') {
 541                 if(len && startsel==endsel && startsel != 0) {
 542                     IPADDRESS_GotoNextField(infoPtr, index, POS_SELALL);
 543                 }
 544             } else if (c == VK_BACK) break;
 545             return 0;
 546
 547         case WM_KEYDOWN:
 548             switch(c) {
 549                 case VK_RIGHT:
 550                     if(startsel==endsel && startsel==len) {
 551                         IPADDRESS_GotoNextField(infoPtr, index, POS_LEFT);
 552                         return 0;
 553                     }
 554                     break;
 555                 case VK_LEFT:
 556                     if(startsel==0 && startsel==endsel && index > 0) {
 557                         IPADDRESS_GotoNextField(infoPtr, index - 2, POS_RIGHT);
 558                         return 0;
 559                     }
 560                     break;
 561                 case VK_BACK:
 562                     if(startsel==endsel && startsel==0 && index > 0) {
 563                         IPPART_INFO *prev = &infoPtr->Part[index-1];
 564                         WCHAR val[10];
 565
 566                         if(GetWindowTextW(prev->EditHwnd, val, 5)) {
 567                             val[lstrlenW(val) - 1] = 0;
 568                             SetWindowTextW(prev->EditHwnd, val);
 569                         }
 570
 571                         IPADDRESS_GotoNextField(infoPtr, index - 2, POS_RIGHT);
 572                         return 0;
 573                     }
 574                     break;
 575             }
 576             break;
 577         case WM_KILLFOCUS:
 578             if (IPADDRESS_GetPartIndex(infoPtr, (HWND)wParam) < 0)
 579                 IPADDRESS_Notify(infoPtr, EN_KILLFOCUS);
 580             break;
 581         case WM_SETFOCUS:
 582             if (IPADDRESS_GetPartIndex(infoPtr, (HWND)wParam) < 0)
 583                 IPADDRESS_Notify(infoPtr, EN_SETFOCUS);
 584             break;
 585     }
 586     return CallWindowProcW (part->OrigProc, hwnd, uMsg, wParam, lParam);
 587 }
 588
 589
 590 static LRESULT WINAPI
 591 IPADDRESS_WindowProc (HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
 592 {
 593     IPADDRESS_INFO *infoPtr = (IPADDRESS_INFO *)GetWindowLongPtrW (hwnd, 0);
 594
 595     TRACE("hwnd %p, msg 0x%x, wparam %#Ix, lparam %#Ix\n", hwnd, uMsg, wParam, lParam);
 596
 597     if (!infoPtr && (uMsg != WM_CREATE))
 598         return DefWindowProcW (hwnd, uMsg, wParam, lParam);
 599
 600     switch (uMsg)
 601     {
 602         case WM_CREATE:
 603             return IPADDRESS_Create (hwnd, (LPCREATESTRUCTA)lParam);
 604
 605         case WM_DESTROY:
 606             return IPADDRESS_Destroy (infoPtr);
 607
 608         case WM_ENABLE:
 609             return IPADDRESS_Enable (infoPtr, (BOOL)wParam);
 610
 611         case WM_PAINT:
 612             return IPADDRESS_Paint (infoPtr, (HDC)wParam);
 613
 614         case WM_COMMAND:
 615             switch(wParam >> 16) {
 616                 case EN_CHANGE:
 617                     IPADDRESS_UpdateText(infoPtr);
 618                     IPADDRESS_Notify(infoPtr, EN_CHANGE);
 619                     break;
 620                 case EN_KILLFOCUS:
 621                     IPADDRESS_ConstrainField(infoPtr, IPADDRESS_GetPartIndex(infoPtr, (HWND)lParam));
 622                     break;
 623             }
 624             break;
 625
 626         case WM_SYSCOLORCHANGE:
 627             COMCTL32_RefreshSysColors();
 628             return 0;
 629
 630         case WM_THEMECHANGED:
 631             return IPADDRESS_ThemeChanged (infoPtr);
 632
 633         case IPM_CLEARADDRESS:
 634             return IPADDRESS_ClearAddress (infoPtr);
 635
 636         case IPM_SETADDRESS:
 637             return IPADDRESS_SetAddress (infoPtr, (DWORD)lParam);
 638
 639         case IPM_GETADDRESS:
 640             return IPADDRESS_GetAddress (infoPtr, (LPDWORD)lParam);
 641
 642         case IPM_SETRANGE:
 643             return IPADDRESS_SetRange (infoPtr, (int)wParam, (WORD)lParam);
 644
 645         case IPM_SETFOCUS:
 646             return IPADDRESS_SetFocusToField (infoPtr, (int)wParam);
 647
 648         case IPM_ISBLANK:
 649             return IPADDRESS_IsBlank (infoPtr);
 650
 651         case WM_SETFOCUS:
 652             IPADDRESS_SetFocusToField (infoPtr, 0);
 653             break;
 654
 655         default:
 656             if ((uMsg >= WM_USER) && (uMsg < WM_APP) && !COMCTL32_IsReflectedMessage(uMsg))
 657                 ERR("unknown msg %04x, wp %Ix, lp %Ix\n", uMsg, wParam, lParam);
 658             return DefWindowProcW (hwnd, uMsg, wParam, lParam);
 659     }
 660     return 0;
 661 }
 662
 663
 664 void IPADDRESS_Register (void)
 665 {
 666     WNDCLASSW wndClass;
 667
 668     ZeroMemory (&wndClass, sizeof(WNDCLASSW));
 669     wndClass.style         = CS_GLOBALCLASS | CS_DBLCLKS | CS_HREDRAW | CS_VREDRAW;
 670     wndClass.lpfnWndProc   = IPADDRESS_WindowProc;
 671     wndClass.cbClsExtra    = 0;
 672     wndClass.cbWndExtra    = sizeof(IPADDRESS_INFO *);
 673     wndClass.hCursor       = LoadCursorW (0, (LPWSTR)IDC_IBEAM);
 674     wndClass.hbrBackground = (HBRUSH)(COLOR_WINDOW+1);
 675     wndClass.lpszClassName = WC_IPADDRESSW;
 676
 677     RegisterClassW (&wndClass);
 678 }
 679
 680
 681 void IPADDRESS_Unregister (void)
 682 {
 683     UnregisterClassW (WC_IPADDRESSW, NULL);
 684 }