git.oblomov.eu Git - wine/blob - dlls/comctl32/treeview.c

   1 /* Treeview control
   2  *
   3  * Copyright 1998 Eric Kohl <ekohl@abo.rhein-zeitung.de>
   4  * Copyright 1998,1999 Alex Priem <alexp@sci.kun.nl>
   5  * Copyright 1999 Sylvain St-Germain
   6  * Copyright 2002 CodeWeavers, Aric Stewart
   7  *
   8  * This library is free software; you can redistribute it and/or
   9  * modify it under the terms of the GNU Lesser General Public
  10  * License as published by the Free Software Foundation; either
  11  * version 2.1 of the License, or (at your option) any later version.
  12  *
  13  * This library is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  16  * Lesser General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU Lesser General Public
  19  * License along with this library; if not, write to the Free Software
  20  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  21  *
  22  * NOTES
  23  *
  24  * Note that TREEVIEW_INFO * and HTREEITEM are the same thing.
  25  *
  26  * Note2: If item's text == LPSTR_TEXTCALLBACKA we allocate buffer
  27  *      of size TEXT_CALLBACK_SIZE in DoSetItem.
  28  *      We use callbackMask to keep track of fields to be updated.
  29  *
  30  * TODO:
  31  *   missing notifications: NM_SETCURSOR, TVN_GETINFOTIP, TVN_KEYDOWN,
  32  *      TVN_SETDISPINFO, TVN_SINGLEEXPAND
  33  *
  34  *   missing styles: TVS_FULLROWSELECT, TVS_INFOTIP, TVS_RTLREADING,
  35  *
  36  *   missing item styles: TVIS_CUT, TVIS_EXPANDPARTIAL
  37  *
  38  *   Make the insertion mark look right.
  39  *   Scroll (instead of repaint) as much as possible.
  40  */
  41
  42 #include "config.h"
  43 #include "wine/port.h"
  44
  45 #include <assert.h>
  46 #include <ctype.h>
  47 #include <stdarg.h>
  48 #include <string.h>
  49 #include <limits.h>
  50 #include <stdlib.h>
  51
  52 #define NONAMELESSUNION
  53 #define NONAMELESSSTRUCT
  54 #include "windef.h"
  55 #include "winbase.h"
  56 #include "wingdi.h"
  57 #include "winuser.h"
  58 #include "winnls.h"
  59 #include "commctrl.h"
  60 #include "comctl32.h"
  61 #include "uxtheme.h"
  62 #include "tmschema.h"
  63 #include "wine/unicode.h"
  64 #include "wine/debug.h"
  65
  66 /* internal structures */
  67
  68 typedef struct _TREEITEM    /* HTREEITEM is a _TREEINFO *. */
  69 {
  70   UINT      callbackMask;
  71   UINT      state;
  72   UINT      stateMask;
  73   LPWSTR    pszText;
  74   int       cchTextMax;
  75   int       iImage;
  76   int       iSelectedImage;
  77   int       cChildren;
  78   LPARAM    lParam;
  79   int       iIntegral;      /* item height multiplier (1 is normal) */
  80   int       iLevel;         /* indentation level:0=root level */
  81   HTREEITEM parent;         /* handle to parent or 0 if at root */
  82   HTREEITEM firstChild;     /* handle to first child or 0 if no child */
  83   HTREEITEM lastChild;
  84   HTREEITEM prevSibling;    /* handle to prev item in list, 0 if first */
  85   HTREEITEM nextSibling;    /* handle to next item in list, 0 if last */
  86   RECT      rect;
  87   LONG      linesOffset;
  88   LONG      stateOffset;
  89   LONG      imageOffset;
  90   LONG      textOffset;
  91   LONG      textWidth;      /* horizontal text extent for pszText */
  92   LONG      visibleOrder;   /* visible ordering, 0 is first visible item */
  93 } TREEVIEW_ITEM;
  94
  95
  96 typedef struct tagTREEVIEW_INFO
  97 {
  98   HWND          hwnd;
  99   HWND          hwndNotify;     /* Owner window to send notifications to */
 100   DWORD         dwStyle;
 101   HTREEITEM     root;
 102   UINT          uInternalStatus;
 103   INT           Timer;
 104   UINT          uNumItems;      /* number of valid TREEVIEW_ITEMs */
 105   INT           cdmode;         /* last custom draw setting */
 106   UINT          uScrollTime;    /* max. time for scrolling in milliseconds */
 107   BOOL          bRedraw;        /* if FALSE we validate but don't redraw in TREEVIEW_Paint() */
 108
 109   UINT          uItemHeight;    /* item height */
 110   BOOL          bHeightSet;
 111
 112   LONG          clientWidth;    /* width of control window */
 113   LONG          clientHeight;   /* height of control window */
 114
 115   LONG          treeWidth;      /* width of visible tree items */
 116   LONG          treeHeight;     /* height of visible tree items */
 117
 118   UINT          uIndent;        /* indentation in pixels */
 119   HTREEITEM     selectedItem;   /* handle to selected item or 0 if none */
 120   HTREEITEM     hotItem;        /* handle currently under cursor, 0 if none */
 121   HTREEITEM     focusedItem;    /* item that was under the cursor when WM_LBUTTONDOWN was received */
 122
 123   HTREEITEM     firstVisible;   /* handle to first visible item */
 124   LONG          maxVisibleOrder;
 125   HTREEITEM     dropItem;       /* handle to item selected by drag cursor */
 126   HTREEITEM     insertMarkItem; /* item after which insertion mark is placed */
 127   BOOL          insertBeforeorAfter; /* flag used by TVM_SETINSERTMARK */
 128   HIMAGELIST    dragList;       /* Bitmap of dragged item */
 129   LONG          scrollX;
 130   COLORREF      clrBk;
 131   COLORREF      clrText;
 132   COLORREF      clrLine;
 133   COLORREF      clrInsertMark;
 134   HFONT         hFont;
 135   HFONT         hDefaultFont;
 136   HFONT         hBoldFont;
 137   HFONT         hUnderlineFont;
 138   HCURSOR       hcurHand;
 139   HWND          hwndToolTip;
 140
 141   HWND          hwndEdit;
 142   WNDPROC       wpEditOrig;     /* orig window proc for subclassing edit */
 143   BOOL          bIgnoreEditKillFocus;
 144   BOOL          bLabelChanged;
 145
 146   BOOL          bNtfUnicode;    /* TRUE if should send NOTIFY with W */
 147   HIMAGELIST    himlNormal;
 148   int           normalImageHeight;
 149   int           normalImageWidth;
 150   HIMAGELIST    himlState;
 151   int           stateImageHeight;
 152   int           stateImageWidth;
 153   HDPA          items;
 154
 155   DWORD lastKeyPressTimestamp; /* Added */
 156   WPARAM charCode; /* Added */
 157   INT nSearchParamLength; /* Added */
 158   WCHAR szSearchParam[ MAX_PATH ]; /* Added */
 159 } TREEVIEW_INFO;
 160
 161
 162 /******** Defines that TREEVIEW_ProcessLetterKeys uses ****************/
 163 #define KEY_DELAY       450
 164
 165 /* bitflags for infoPtr->uInternalStatus */
 166
 167 #define TV_HSCROLL      0x01    /* treeview too large to fit in window */
 168 #define TV_VSCROLL      0x02    /* (horizontal/vertical) */
 169 #define TV_LDRAG                0x04    /* Lbutton pushed to start drag */
 170 #define TV_LDRAGGING    0x08    /* Lbutton pushed, mouse moved. */
 171 #define TV_RDRAG                0x10    /* ditto Rbutton */
 172 #define TV_RDRAGGING    0x20
 173
 174 /* bitflags for infoPtr->timer */
 175
 176 #define TV_EDIT_TIMER    2
 177 #define TV_EDIT_TIMER_SET 2
 178
 179
 180 VOID TREEVIEW_Register (VOID);
 181 VOID TREEVIEW_Unregister (VOID);
 182
 183
 184 WINE_DEFAULT_DEBUG_CHANNEL(treeview);
 185
 186
 187 #define TEXT_CALLBACK_SIZE 260
 188
 189 #define TREEVIEW_LEFT_MARGIN 8
 190
 191 #define MINIMUM_INDENT 19
 192
 193 #define CALLBACK_MASK_ALL (TVIF_TEXT|TVIF_CHILDREN|TVIF_IMAGE|TVIF_SELECTEDIMAGE)
 194
 195 #define STATEIMAGEINDEX(x) (((x) >> 12) & 0x0f)
 196 #define OVERLAYIMAGEINDEX(x) (((x) >> 8) & 0x0f)
 197 #define ISVISIBLE(x)         ((x)->visibleOrder >= 0)
 198
 199
 200 static const WCHAR themeClass[] = { 'T','r','e','e','v','i','e','w',0 };
 201
 202
 203 typedef VOID (*TREEVIEW_ItemEnumFunc)(TREEVIEW_INFO *, TREEVIEW_ITEM *,LPVOID);
 204
 205
 206 static VOID TREEVIEW_Invalidate(const TREEVIEW_INFO *, const TREEVIEW_ITEM *);
 207
 208 static LRESULT TREEVIEW_DoSelectItem(TREEVIEW_INFO *, INT, HTREEITEM, INT);
 209 static VOID TREEVIEW_SetFirstVisible(TREEVIEW_INFO *, TREEVIEW_ITEM *, BOOL);
 210 static LRESULT TREEVIEW_EnsureVisible(TREEVIEW_INFO *, HTREEITEM, BOOL);
 211 static LRESULT TREEVIEW_RButtonUp(const TREEVIEW_INFO *, const POINT *);
 212 static LRESULT TREEVIEW_EndEditLabelNow(TREEVIEW_INFO *infoPtr, BOOL bCancel);
 213 static VOID TREEVIEW_UpdateScrollBars(TREEVIEW_INFO *infoPtr);
 214 static LRESULT TREEVIEW_HScroll(TREEVIEW_INFO *, WPARAM);
 215 static INT TREEVIEW_NotifyFormat (TREEVIEW_INFO *infoPtr, HWND wParam, UINT lParam);
 216
 217
 218 /* Random Utilities *****************************************************/
 219
 220 #ifndef NDEBUG
 221 static inline void
 222 TREEVIEW_VerifyTree(TREEVIEW_INFO *infoPtr)
 223 {
 224     (void)infoPtr;
 225 }
 226 #else
 227 /* The definition is at the end of the file. */
 228 static void TREEVIEW_VerifyTree(TREEVIEW_INFO *infoPtr);
 229 #endif
 230
 231 /* Returns the treeview private data if hwnd is a treeview.
 232  * Otherwise returns an undefined value. */
 233 static TREEVIEW_INFO *
 234 TREEVIEW_GetInfoPtr(HWND hwnd)
 235 {
 236     return (TREEVIEW_INFO *)GetWindowLongPtrW(hwnd, 0);
 237 }
 238
 239 /* Don't call this. Nothing wants an item index. */
 240 static inline int
 241 TREEVIEW_GetItemIndex(const TREEVIEW_INFO *infoPtr, HTREEITEM handle)
 242 {
 243     return DPA_GetPtrIndex(infoPtr->items, handle);
 244 }
 245
 246 /* Checks if item has changed and needs to be redrawn */
 247 static inline BOOL item_changed (const TREEVIEW_ITEM *tiOld, const TREEVIEW_ITEM *tiNew,
 248                                  const TVITEMEXW *tvChange)
 249 {
 250     /* Number of children has changed */
 251     if ((tvChange->mask & TVIF_CHILDREN) && (tiOld->cChildren != tiNew->cChildren))
 252         return TRUE;
 253
 254     /* Image has changed and it's not a callback */
 255     if ((tvChange->mask & TVIF_IMAGE) && (tiOld->iImage != tiNew->iImage) &&
 256         tiNew->iImage != I_IMAGECALLBACK)
 257         return TRUE;
 258
 259     /* Selected image has changed and it's not a callback */
 260     if ((tvChange->mask & TVIF_SELECTEDIMAGE) && (tiOld->iSelectedImage != tiNew->iSelectedImage) &&
 261         tiNew->iSelectedImage != I_IMAGECALLBACK)
 262         return TRUE;
 263
 264     /* Text has changed and it's not a callback */
 265     if ((tvChange->mask & TVIF_TEXT) && (tiOld->pszText != tiNew->pszText) &&
 266         tiNew->pszText != LPSTR_TEXTCALLBACKW)
 267         return TRUE;
 268
 269     /* Indent has changed */
 270     if ((tvChange->mask & TVIF_INTEGRAL) && (tiOld->iIntegral != tiNew->iIntegral))
 271         return TRUE;
 272
 273     /* Item state has changed */
 274     if ((tvChange->mask & TVIF_STATE) && ((tiOld->state ^ tiNew->state) & tvChange->stateMask ))
 275         return TRUE;
 276
 277     return FALSE;
 278 }
 279
 280 /***************************************************************************
 281  * This method checks that handle is an item for this tree.
 282  */
 283 static BOOL
 284 TREEVIEW_ValidItem(const TREEVIEW_INFO *infoPtr, HTREEITEM handle)
 285 {
 286     if (TREEVIEW_GetItemIndex(infoPtr, handle) == -1)
 287     {
 288         TRACE("invalid item %p\n", handle);
 289         return FALSE;
 290     }
 291     else
 292         return TRUE;
 293 }
 294
 295 static HFONT
 296 TREEVIEW_CreateBoldFont(HFONT hOrigFont)
 297 {
 298     LOGFONTW font;
 299
 300     GetObjectW(hOrigFont, sizeof(font), &font);
 301     font.lfWeight = FW_BOLD;
 302     return CreateFontIndirectW(&font);
 303 }
 304
 305 static HFONT
 306 TREEVIEW_CreateUnderlineFont(HFONT hOrigFont)
 307 {
 308     LOGFONTW font;
 309
 310     GetObjectW(hOrigFont, sizeof(font), &font);
 311     font.lfUnderline = TRUE;
 312     return CreateFontIndirectW(&font);
 313 }
 314
 315 static inline HFONT
 316 TREEVIEW_FontForItem(const TREEVIEW_INFO *infoPtr, const TREEVIEW_ITEM *item)
 317 {
 318     if ((infoPtr->dwStyle & TVS_TRACKSELECT) && (item == infoPtr->hotItem))
 319         return infoPtr->hUnderlineFont;
 320     if (item->state & TVIS_BOLD)
 321         return infoPtr->hBoldFont;
 322     return infoPtr->hFont;
 323 }
 324
 325 /* for trace/debugging purposes only */
 326 static const char *
 327 TREEVIEW_ItemName(const TREEVIEW_ITEM *item)
 328 {
 329     if (item == NULL) return "<null item>";
 330     if (item->pszText == LPSTR_TEXTCALLBACKW) return "<callback>";
 331     if (item->pszText == NULL) return "<null>";
 332     return debugstr_w(item->pszText);
 333 }
 334
 335 /* An item is not a child of itself. */
 336 static BOOL
 337 TREEVIEW_IsChildOf(const TREEVIEW_ITEM *parent, const TREEVIEW_ITEM *child)
 338 {
 339     do
 340     {
 341         child = child->parent;
 342         if (child == parent) return TRUE;
 343     } while (child != NULL);
 344
 345     return FALSE;
 346 }
 347
 348
 349 /* Tree Traversal *******************************************************/
 350
 351 /***************************************************************************
 352  * This method returns the last expanded sibling or child child item
 353  * of a tree node
 354  */
 355 static TREEVIEW_ITEM *
 356 TREEVIEW_GetLastListItem(const TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *wineItem)
 357 {
 358     if (!wineItem)
 359        return NULL;
 360
 361     while (wineItem->lastChild)
 362     {
 363        if (wineItem->state & TVIS_EXPANDED)
 364           wineItem = wineItem->lastChild;
 365        else
 366           break;
 367     }
 368
 369     if (wineItem == infoPtr->root)
 370         return NULL;
 371
 372     return wineItem;
 373 }
 374
 375 /***************************************************************************
 376  * This method returns the previous non-hidden item in the list not
 377  * considering the tree hierarchy.
 378  */
 379 static TREEVIEW_ITEM *
 380 TREEVIEW_GetPrevListItem(const TREEVIEW_INFO *infoPtr, const TREEVIEW_ITEM *tvItem)
 381 {
 382     if (tvItem->prevSibling)
 383     {
 384         /* This item has a prevSibling, get the last item in the sibling's tree. */
 385         TREEVIEW_ITEM *upItem = tvItem->prevSibling;
 386
 387         if ((upItem->state & TVIS_EXPANDED) && upItem->lastChild != NULL)
 388             return TREEVIEW_GetLastListItem(infoPtr, upItem->lastChild);
 389         else
 390             return upItem;
 391     }
 392     else
 393     {
 394         /* this item does not have a prevSibling, get the parent */
 395         return (tvItem->parent != infoPtr->root) ? tvItem->parent : NULL;
 396     }
 397 }
 398
 399
 400 /***************************************************************************
 401  * This method returns the next physical item in the treeview not
 402  * considering the tree hierarchy.
 403  */
 404 static TREEVIEW_ITEM *
 405 TREEVIEW_GetNextListItem(const TREEVIEW_INFO *infoPtr, const TREEVIEW_ITEM *tvItem)
 406 {
 407     /*
 408      * If this item has children and is expanded, return the first child
 409      */
 410     if ((tvItem->state & TVIS_EXPANDED) && tvItem->firstChild != NULL)
 411     {
 412         return tvItem->firstChild;
 413     }
 414
 415
 416     /*
 417      * try to get the sibling
 418      */
 419     if (tvItem->nextSibling)
 420         return tvItem->nextSibling;
 421
 422     /*
 423      * Otherwise, get the parent's sibling.
 424      */
 425     while (tvItem->parent)
 426     {
 427         tvItem = tvItem->parent;
 428
 429         if (tvItem->nextSibling)
 430             return tvItem->nextSibling;
 431     }
 432
 433     return NULL;
 434 }
 435
 436 /***************************************************************************
 437  * This method returns the nth item starting at the given item.  It returns
 438  * the last item (or first) we we run out of items.
 439  *
 440  * Will scroll backward if count is <0.
 441  *             forward if count is >0.
 442  */
 443 static TREEVIEW_ITEM *
 444 TREEVIEW_GetListItem(const TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *wineItem,
 445                      LONG count)
 446 {
 447     TREEVIEW_ITEM *(*next_item)(const TREEVIEW_INFO *, const TREEVIEW_ITEM *);
 448     TREEVIEW_ITEM *previousItem;
 449
 450     assert(wineItem != NULL);
 451
 452     if (count > 0)
 453     {
 454         next_item = TREEVIEW_GetNextListItem;
 455     }
 456     else if (count < 0)
 457     {
 458         count = -count;
 459         next_item = TREEVIEW_GetPrevListItem;
 460     }
 461     else
 462         return wineItem;
 463
 464     do
 465     {
 466         previousItem = wineItem;
 467         wineItem = next_item(infoPtr, wineItem);
 468
 469     } while (--count && wineItem != NULL);
 470
 471
 472     return wineItem ? wineItem : previousItem;
 473 }
 474
 475 /* Notifications ************************************************************/
 476
 477 static INT get_notifycode(const TREEVIEW_INFO *infoPtr, INT code)
 478 {
 479     if (!infoPtr->bNtfUnicode) {
 480         switch (code) {
 481         case TVN_SELCHANGINGW:    return TVN_SELCHANGINGA;
 482         case TVN_SELCHANGEDW:     return TVN_SELCHANGEDA;
 483         case TVN_GETDISPINFOW:    return TVN_GETDISPINFOA;
 484         case TVN_SETDISPINFOW:    return TVN_SETDISPINFOA;
 485         case TVN_ITEMEXPANDINGW:  return TVN_ITEMEXPANDINGA;
 486         case TVN_ITEMEXPANDEDW:   return TVN_ITEMEXPANDEDA;
 487         case TVN_BEGINDRAGW:      return TVN_BEGINDRAGA;
 488         case TVN_BEGINRDRAGW:     return TVN_BEGINRDRAGA;
 489         case TVN_DELETEITEMW:     return TVN_DELETEITEMA;
 490         case TVN_BEGINLABELEDITW: return TVN_BEGINLABELEDITA;
 491         case TVN_ENDLABELEDITW:   return TVN_ENDLABELEDITA;
 492         case TVN_GETINFOTIPW:     return TVN_GETINFOTIPA;
 493         }
 494     }
 495     return code;
 496 }
 497
 498 static LRESULT
 499 TREEVIEW_SendRealNotify(const TREEVIEW_INFO *infoPtr, WPARAM wParam, LPARAM lParam)
 500 {
 501     TRACE("wParam=%ld, lParam=%ld\n", wParam, lParam);
 502     return SendMessageW(infoPtr->hwndNotify, WM_NOTIFY, wParam, lParam);
 503 }
 504
 505 static BOOL
 506 TREEVIEW_SendSimpleNotify(const TREEVIEW_INFO *infoPtr, UINT code)
 507 {
 508     NMHDR nmhdr;
 509     HWND hwnd = infoPtr->hwnd;
 510
 511     TRACE("%d\n", code);
 512     nmhdr.hwndFrom = hwnd;
 513     nmhdr.idFrom = GetWindowLongPtrW(hwnd, GWLP_ID);
 514     nmhdr.code = get_notifycode(infoPtr, code);
 515
 516     return (BOOL)TREEVIEW_SendRealNotify(infoPtr, nmhdr.idFrom, (LPARAM)&nmhdr);
 517 }
 518
 519 static VOID
 520 TREEVIEW_TVItemFromItem(const TREEVIEW_INFO *infoPtr, UINT mask, TVITEMW *tvItem, TREEVIEW_ITEM *item)
 521 {
 522     tvItem->mask = mask;
 523     tvItem->hItem = item;
 524     tvItem->state = item->state;
 525     tvItem->stateMask = 0;
 526     tvItem->iImage = item->iImage;
 527     tvItem->iSelectedImage = item->iSelectedImage;
 528     tvItem->cChildren = item->cChildren;
 529     tvItem->lParam = item->lParam;
 530
 531     if(mask & TVIF_TEXT)
 532     {
 533         if (!infoPtr->bNtfUnicode)
 534         {
 535             tvItem->cchTextMax = WideCharToMultiByte( CP_ACP, 0, item->pszText, -1, NULL, 0, NULL, NULL );
 536             tvItem->pszText = Alloc (tvItem->cchTextMax);
 537             WideCharToMultiByte( CP_ACP, 0, item->pszText, -1, (LPSTR)tvItem->pszText, tvItem->cchTextMax, 0, 0 );
 538         }
 539         else
 540         {
 541             tvItem->cchTextMax = item->cchTextMax;
 542             tvItem->pszText = item->pszText;
 543         }
 544     }
 545     else
 546     {
 547         tvItem->cchTextMax = 0;
 548         tvItem->pszText = NULL;
 549     }
 550 }
 551
 552 static BOOL
 553 TREEVIEW_SendTreeviewNotify(const TREEVIEW_INFO *infoPtr, UINT code, UINT action,
 554                             UINT mask, HTREEITEM oldItem, HTREEITEM newItem)
 555 {
 556     HWND hwnd = infoPtr->hwnd;
 557     NMTREEVIEWW nmhdr;
 558     BOOL ret;
 559
 560     TRACE("code:%d action:%x olditem:%p newitem:%p\n",
 561           code, action, oldItem, newItem);
 562
 563     ZeroMemory(&nmhdr, sizeof(NMTREEVIEWW));
 564
 565     nmhdr.hdr.hwndFrom = hwnd;
 566     nmhdr.hdr.idFrom = GetWindowLongPtrW(hwnd, GWLP_ID);
 567     nmhdr.hdr.code = get_notifycode(infoPtr, code);
 568     nmhdr.action = action;
 569
 570     if (oldItem)
 571         TREEVIEW_TVItemFromItem(infoPtr, mask, &nmhdr.itemOld, oldItem);
 572
 573     if (newItem)
 574         TREEVIEW_TVItemFromItem(infoPtr, mask, &nmhdr.itemNew, newItem);
 575
 576     nmhdr.ptDrag.x = 0;
 577     nmhdr.ptDrag.y = 0;
 578
 579     ret = (BOOL)TREEVIEW_SendRealNotify(infoPtr, nmhdr.hdr.idFrom, (LPARAM)&nmhdr);
 580     if (!infoPtr->bNtfUnicode)
 581     {
 582         Free(nmhdr.itemOld.pszText);
 583         Free(nmhdr.itemNew.pszText);
 584     }
 585     return ret;
 586 }
 587
 588 static BOOL
 589 TREEVIEW_SendTreeviewDnDNotify(const TREEVIEW_INFO *infoPtr, UINT code,
 590                                HTREEITEM dragItem, POINT pt)
 591 {
 592     HWND hwnd = infoPtr->hwnd;
 593     NMTREEVIEWW nmhdr;
 594
 595     TRACE("code:%d dragitem:%p\n", code, dragItem);
 596
 597     nmhdr.hdr.hwndFrom = hwnd;
 598     nmhdr.hdr.idFrom = GetWindowLongPtrW(hwnd, GWLP_ID);
 599     nmhdr.hdr.code = get_notifycode(infoPtr, code);
 600     nmhdr.action = 0;
 601     nmhdr.itemNew.mask = TVIF_STATE | TVIF_PARAM | TVIF_HANDLE;
 602     nmhdr.itemNew.hItem = dragItem;
 603     nmhdr.itemNew.state = dragItem->state;
 604     nmhdr.itemNew.lParam = dragItem->lParam;
 605
 606     nmhdr.ptDrag.x = pt.x;
 607     nmhdr.ptDrag.y = pt.y;
 608
 609     return (BOOL)TREEVIEW_SendRealNotify(infoPtr, nmhdr.hdr.idFrom, (LPARAM)&nmhdr);
 610 }
 611
 612
 613 static BOOL
 614 TREEVIEW_SendCustomDrawNotify(const TREEVIEW_INFO *infoPtr, DWORD dwDrawStage,
 615                               HDC hdc, RECT rc)
 616 {
 617     HWND hwnd = infoPtr->hwnd;
 618     NMTVCUSTOMDRAW nmcdhdr;
 619     LPNMCUSTOMDRAW nmcd;
 620
 621     TRACE("drawstage:%x hdc:%p\n", dwDrawStage, hdc);
 622
 623     nmcd = &nmcdhdr.nmcd;
 624     nmcd->hdr.hwndFrom = hwnd;
 625     nmcd->hdr.idFrom = GetWindowLongPtrW(hwnd, GWLP_ID);
 626     nmcd->hdr.code = NM_CUSTOMDRAW;
 627     nmcd->dwDrawStage = dwDrawStage;
 628     nmcd->hdc = hdc;
 629     nmcd->rc = rc;
 630     nmcd->dwItemSpec = 0;
 631     nmcd->uItemState = 0;
 632     nmcd->lItemlParam = 0;
 633     nmcdhdr.clrText = infoPtr->clrText;
 634     nmcdhdr.clrTextBk = infoPtr->clrBk;
 635     nmcdhdr.iLevel = 0;
 636
 637     return (BOOL)TREEVIEW_SendRealNotify(infoPtr, nmcd->hdr.idFrom, (LPARAM)&nmcdhdr);
 638 }
 639
 640
 641
 642 /* FIXME: need to find out when the flags in uItemState need to be set */
 643
 644 static BOOL
 645 TREEVIEW_SendCustomDrawItemNotify(const TREEVIEW_INFO *infoPtr, HDC hdc,
 646                                   TREEVIEW_ITEM *wineItem, UINT uItemDrawState,
 647                                   NMTVCUSTOMDRAW *nmcdhdr)
 648 {
 649     HWND hwnd = infoPtr->hwnd;
 650     LPNMCUSTOMDRAW nmcd;
 651     DWORD dwDrawStage;
 652     DWORD_PTR dwItemSpec;
 653     UINT uItemState;
 654     INT retval;
 655
 656     dwDrawStage = CDDS_ITEM | uItemDrawState;
 657     dwItemSpec = (DWORD_PTR)wineItem;
 658     uItemState = 0;
 659     if (wineItem->state & TVIS_SELECTED)
 660         uItemState |= CDIS_SELECTED;
 661     if (wineItem == infoPtr->selectedItem)
 662         uItemState |= CDIS_FOCUS;
 663     if (wineItem == infoPtr->hotItem)
 664         uItemState |= CDIS_HOT;
 665
 666     nmcd = &nmcdhdr->nmcd;
 667     nmcd->hdr.hwndFrom = hwnd;
 668     nmcd->hdr.idFrom = GetWindowLongPtrW(hwnd, GWLP_ID);
 669     nmcd->hdr.code = NM_CUSTOMDRAW;
 670     nmcd->dwDrawStage = dwDrawStage;
 671     nmcd->hdc = hdc;
 672     nmcd->rc = wineItem->rect;
 673     nmcd->dwItemSpec = dwItemSpec;
 674     nmcd->uItemState = uItemState;
 675     nmcd->lItemlParam = wineItem->lParam;
 676     nmcdhdr->iLevel = wineItem->iLevel;
 677
 678     TRACE("drawstage:%x hdc:%p item:%lx, itemstate:%x, lItemlParam:%lx\n",
 679           nmcd->dwDrawStage, nmcd->hdc, nmcd->dwItemSpec,
 680           nmcd->uItemState, nmcd->lItemlParam);
 681
 682     retval = TREEVIEW_SendRealNotify(infoPtr, nmcd->hdr.idFrom, (LPARAM)nmcdhdr);
 683
 684     return retval;
 685 }
 686
 687 static BOOL
 688 TREEVIEW_BeginLabelEditNotify(const TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *editItem)
 689 {
 690     HWND hwnd = infoPtr->hwnd;
 691     NMTVDISPINFOW tvdi;
 692     BOOL ret;
 693
 694     tvdi.hdr.hwndFrom = hwnd;
 695     tvdi.hdr.idFrom = GetWindowLongPtrW(hwnd, GWLP_ID);
 696     tvdi.hdr.code = get_notifycode(infoPtr, TVN_BEGINLABELEDITW);
 697
 698     TREEVIEW_TVItemFromItem(infoPtr, TVIF_HANDLE | TVIF_STATE | TVIF_PARAM | TVIF_TEXT,
 699                             &tvdi.item, editItem);
 700
 701     ret = (BOOL)TREEVIEW_SendRealNotify(infoPtr, tvdi.hdr.idFrom, (LPARAM)&tvdi);
 702
 703     if (!infoPtr->bNtfUnicode)
 704         Free(tvdi.item.pszText);
 705
 706     return ret;
 707 }
 708
 709 static void
 710 TREEVIEW_UpdateDispInfo(const TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *wineItem,
 711                         UINT mask)
 712 {
 713     NMTVDISPINFOW callback;
 714     HWND hwnd = infoPtr->hwnd;
 715
 716     TRACE("mask %x callbackMask %x\n", mask, wineItem->callbackMask);
 717     mask &= wineItem->callbackMask;
 718
 719     if (mask == 0) return;
 720
 721     callback.hdr.hwndFrom         = hwnd;
 722     callback.hdr.idFrom           = GetWindowLongPtrW(hwnd, GWLP_ID);
 723     callback.hdr.code             = get_notifycode(infoPtr, TVN_GETDISPINFOW);
 724
 725     /* 'state' always contains valid value, as well as 'lParam'.
 726      * All other parameters are uninitialized.
 727      */
 728     callback.item.pszText         = wineItem->pszText;
 729     callback.item.cchTextMax      = wineItem->cchTextMax;
 730     callback.item.mask            = mask;
 731     callback.item.hItem           = wineItem;
 732     callback.item.state           = wineItem->state;
 733     callback.item.lParam          = wineItem->lParam;
 734
 735     /* If text is changed we need to recalculate textWidth */
 736     if (mask & TVIF_TEXT)
 737        wineItem->textWidth = 0;
 738
 739     TREEVIEW_SendRealNotify(infoPtr, callback.hdr.idFrom, (LPARAM)&callback);
 740
 741     /* It may have changed due to a call to SetItem. */
 742     mask &= wineItem->callbackMask;
 743
 744     if ((mask & TVIF_TEXT) && callback.item.pszText != wineItem->pszText)
 745     {
 746         /* Instead of copying text into our buffer user specified its own */
 747         if (!infoPtr->bNtfUnicode) {
 748             LPWSTR newText;
 749             int buflen;
 750             int len = MultiByteToWideChar( CP_ACP, 0,
 751                                            (LPSTR)callback.item.pszText, -1,
 752                                            NULL, 0);
 753             buflen = max((len)*sizeof(WCHAR), TEXT_CALLBACK_SIZE);
 754             newText = ReAlloc(wineItem->pszText, buflen);
 755
 756             TRACE("returned str %s, len=%d, buflen=%d\n",
 757                   debugstr_a((LPSTR)callback.item.pszText), len, buflen);
 758
 759             if (newText)
 760             {
 761                 wineItem->pszText = newText;
 762                 MultiByteToWideChar( CP_ACP, 0,
 763                                      (LPSTR)callback.item.pszText, -1,
 764                                      wineItem->pszText, buflen/sizeof(WCHAR));
 765                 wineItem->cchTextMax = buflen/sizeof(WCHAR);
 766             }
 767             /* If ReAlloc fails we have nothing to do, but keep original text */
 768         }
 769         else {
 770             int len = max(lstrlenW(callback.item.pszText) + 1,
 771                           TEXT_CALLBACK_SIZE);
 772             LPWSTR newText = ReAlloc(wineItem->pszText, len);
 773
 774             TRACE("returned wstr %s, len=%d\n",
 775                   debugstr_w(callback.item.pszText), len);
 776
 777             if (newText)
 778             {
 779                 wineItem->pszText = newText;
 780                 strcpyW(wineItem->pszText, callback.item.pszText);
 781                 wineItem->cchTextMax = len;
 782             }
 783             /* If ReAlloc fails we have nothing to do, but keep original text */
 784         }
 785     }
 786     else if (mask & TVIF_TEXT) {
 787         /* User put text into our buffer, that is ok unless A string */
 788         if (!infoPtr->bNtfUnicode) {
 789             LPWSTR newText;
 790             LPWSTR oldText = NULL;
 791             int buflen;
 792             int len = MultiByteToWideChar( CP_ACP, 0,
 793                                           (LPSTR)callback.item.pszText, -1,
 794                                            NULL, 0);
 795             buflen = max((len)*sizeof(WCHAR), TEXT_CALLBACK_SIZE);
 796             newText = Alloc(buflen);
 797
 798             TRACE("same buffer str %s, len=%d, buflen=%d\n",
 799                   debugstr_a((LPSTR)callback.item.pszText), len, buflen);
 800
 801             if (newText)
 802             {
 803                 oldText = wineItem->pszText;
 804                 wineItem->pszText = newText;
 805                 MultiByteToWideChar( CP_ACP, 0,
 806                                      (LPSTR)callback.item.pszText, -1,
 807                                      wineItem->pszText, buflen/sizeof(WCHAR));
 808                 wineItem->cchTextMax = buflen/sizeof(WCHAR);
 809                 Free(oldText);
 810             }
 811         }
 812     }
 813
 814     if (mask & TVIF_IMAGE)
 815         wineItem->iImage = callback.item.iImage;
 816
 817     if (mask & TVIF_SELECTEDIMAGE)
 818         wineItem->iSelectedImage = callback.item.iSelectedImage;
 819
 820     if (mask & TVIF_CHILDREN)
 821         wineItem->cChildren = callback.item.cChildren;
 822
 823     /* These members are now permanently set. */
 824     if (callback.item.mask & TVIF_DI_SETITEM)
 825         wineItem->callbackMask &= ~callback.item.mask;
 826 }
 827
 828 /***************************************************************************
 829  * This function uses cChildren field to decide whether the item has
 830  * children or not.
 831  * Note: if this returns TRUE, the child items may not actually exist,
 832  * they could be virtual.
 833  *
 834  * Just use wineItem->firstChild to check for physical children.
 835  */
 836 static BOOL
 837 TREEVIEW_HasChildren(const TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *wineItem)
 838 {
 839     TREEVIEW_UpdateDispInfo(infoPtr, wineItem, TVIF_CHILDREN);
 840
 841     return wineItem->cChildren > 0;
 842 }
 843
 844
 845 /* Item Position ********************************************************/
 846
 847 /* Compute linesOffset, stateOffset, imageOffset, textOffset of an item. */
 848 static VOID
 849 TREEVIEW_ComputeItemInternalMetrics(const TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item)
 850 {
 851     /* Same effect, different optimisation. */
 852 #if 0
 853     BOOL lar = ((infoPtr->dwStyle & TVS_LINESATROOT)
 854                 && (infoPtr->dwStyle & (TVS_HASLINES|TVS_HASBUTTONS)));
 855 #else
 856     BOOL lar = ((infoPtr->dwStyle
 857                  & (TVS_LINESATROOT|TVS_HASLINES|TVS_HASBUTTONS))
 858                 > TVS_LINESATROOT);
 859 #endif
 860
 861     item->linesOffset = infoPtr->uIndent * (lar ? item->iLevel : item->iLevel - 1)
 862         - infoPtr->scrollX;
 863     item->stateOffset = item->linesOffset + infoPtr->uIndent;
 864     item->imageOffset = item->stateOffset
 865         + (STATEIMAGEINDEX(item->state) ? infoPtr->stateImageWidth : 0);
 866     item->textOffset  = item->imageOffset + infoPtr->normalImageWidth;
 867 }
 868
 869 static VOID
 870 TREEVIEW_ComputeTextWidth(const TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item, HDC hDC)
 871 {
 872     HDC hdc;
 873     HFONT hOldFont=0;
 874     SIZE sz;
 875
 876     /* DRAW's OM docker creates items like this */
 877     if (item->pszText == NULL)
 878     {
 879         item->textWidth = 0;
 880         return;
 881     }
 882
 883     if (hDC != 0)
 884     {
 885         hdc = hDC;
 886     }
 887     else
 888     {
 889         hdc = GetDC(infoPtr->hwnd);
 890         hOldFont = SelectObject(hdc, TREEVIEW_FontForItem(infoPtr, item));
 891     }
 892
 893     GetTextExtentPoint32W(hdc, item->pszText, strlenW(item->pszText), &sz);
 894     item->textWidth = sz.cx;
 895
 896     if (hDC == 0)
 897     {
 898         SelectObject(hdc, hOldFont);
 899         ReleaseDC(0, hdc);
 900     }
 901 }
 902
 903 static VOID
 904 TREEVIEW_ComputeItemRect(const TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item)
 905 {
 906     item->rect.top = infoPtr->uItemHeight *
 907         (item->visibleOrder - infoPtr->firstVisible->visibleOrder);
 908
 909     item->rect.bottom = item->rect.top
 910         + infoPtr->uItemHeight * item->iIntegral - 1;
 911
 912     item->rect.left = 0;
 913     item->rect.right = infoPtr->clientWidth;
 914 }
 915
 916 /* We know that only items after start need their order updated. */
 917 static void
 918 TREEVIEW_RecalculateVisibleOrder(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *start)
 919 {
 920     TREEVIEW_ITEM *item;
 921     int order;
 922
 923     if (!start)
 924     {
 925         start = infoPtr->root->firstChild;
 926         order = 0;
 927     }
 928     else
 929         order = start->visibleOrder;
 930
 931     for (item = start; item != NULL;
 932          item = TREEVIEW_GetNextListItem(infoPtr, item))
 933     {
 934         if (!ISVISIBLE(item) && order > 0)
 935                 TREEVIEW_ComputeItemInternalMetrics(infoPtr, item);
 936         item->visibleOrder = order;
 937         order += item->iIntegral;
 938     }
 939
 940     infoPtr->maxVisibleOrder = order;
 941
 942     for (item = start; item != NULL;
 943          item = TREEVIEW_GetNextListItem(infoPtr, item))
 944     {
 945         TREEVIEW_ComputeItemRect(infoPtr, item);
 946     }
 947 }
 948
 949
 950 /* Update metrics of all items in selected subtree.
 951  * root must be expanded
 952  */
 953 static VOID
 954 TREEVIEW_UpdateSubTree(const TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *root)
 955 {
 956    TREEVIEW_ITEM *sibling;
 957    HDC hdc;
 958    HFONT hOldFont;
 959
 960    if (!root->firstChild || !(root->state & TVIS_EXPANDED))
 961       return;
 962
 963    root->state &= ~TVIS_EXPANDED;
 964    sibling = TREEVIEW_GetNextListItem(infoPtr, root);
 965    root->state |= TVIS_EXPANDED;
 966
 967    hdc = GetDC(infoPtr->hwnd);
 968    hOldFont = SelectObject(hdc, infoPtr->hFont);
 969
 970    for (; root != sibling;
 971         root = TREEVIEW_GetNextListItem(infoPtr, root))
 972    {
 973       TREEVIEW_ComputeItemInternalMetrics(infoPtr, root);
 974
 975       if (root->callbackMask & TVIF_TEXT)
 976          TREEVIEW_UpdateDispInfo(infoPtr, root, TVIF_TEXT);
 977
 978       if (root->textWidth == 0)
 979       {
 980          SelectObject(hdc, TREEVIEW_FontForItem(infoPtr, root));
 981          TREEVIEW_ComputeTextWidth(infoPtr, root, hdc);
 982       }
 983    }
 984
 985    SelectObject(hdc, hOldFont);
 986    ReleaseDC(infoPtr->hwnd, hdc);
 987 }
 988
 989 /* Item Allocation **********************************************************/
 990
 991 static TREEVIEW_ITEM *
 992 TREEVIEW_AllocateItem(const TREEVIEW_INFO *infoPtr)
 993 {
 994     TREEVIEW_ITEM *newItem = Alloc(sizeof(TREEVIEW_ITEM));
 995
 996     if (!newItem)
 997         return NULL;
 998
 999     /* I_IMAGENONE would make more sense but this is neither what is
1000      * documented (MSDN doesn't specify) nor what Windows actually does
1001      * (it sets it to zero)... and I can so imagine an application using
1002      * inc/dec to toggle the images. */
1003     newItem->iImage = 0;
1004     newItem->iSelectedImage = 0;
1005
1006     if (DPA_InsertPtr(infoPtr->items, INT_MAX, newItem) == -1)
1007     {
1008         Free(newItem);
1009         return NULL;
1010     }
1011
1012     return newItem;
1013 }
1014
1015 /* Exact opposite of TREEVIEW_AllocateItem. In particular, it does not
1016  * free item->pszText. */
1017 static void
1018 TREEVIEW_FreeItem(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item)
1019 {
1020     DPA_DeletePtr(infoPtr->items, DPA_GetPtrIndex(infoPtr->items, item));
1021     if (infoPtr->selectedItem == item)
1022         infoPtr->selectedItem = NULL;
1023     if (infoPtr->hotItem == item)
1024         infoPtr->hotItem = NULL;
1025     if (infoPtr->focusedItem == item)
1026         infoPtr->focusedItem = NULL;
1027     if (infoPtr->firstVisible == item)
1028         infoPtr->firstVisible = NULL;
1029     if (infoPtr->dropItem == item)
1030         infoPtr->dropItem = NULL;
1031     if (infoPtr->insertMarkItem == item)
1032         infoPtr->insertMarkItem = NULL;
1033     Free(item);
1034 }
1035
1036
1037 /* Item Insertion *******************************************************/
1038
1039 /***************************************************************************
1040  * This method inserts newItem before sibling as a child of parent.
1041  * sibling can be NULL, but only if parent has no children.
1042  */
1043 static void
1044 TREEVIEW_InsertBefore(TREEVIEW_ITEM *newItem, TREEVIEW_ITEM *sibling,
1045                       TREEVIEW_ITEM *parent)
1046 {
1047     assert(parent != NULL);
1048
1049     if (sibling != NULL)
1050     {
1051         assert(sibling->parent == parent);
1052
1053         if (sibling->prevSibling != NULL)
1054             sibling->prevSibling->nextSibling = newItem;
1055
1056         newItem->prevSibling = sibling->prevSibling;
1057         sibling->prevSibling = newItem;
1058     }
1059     else
1060        newItem->prevSibling = NULL;
1061
1062     newItem->nextSibling = sibling;
1063
1064     if (parent->firstChild == sibling)
1065         parent->firstChild = newItem;
1066
1067     if (parent->lastChild == NULL)
1068         parent->lastChild = newItem;
1069 }
1070
1071 /***************************************************************************
1072  * This method inserts newItem after sibling as a child of parent.
1073  * sibling can be NULL, but only if parent has no children.
1074  */
1075 static void
1076 TREEVIEW_InsertAfter(TREEVIEW_ITEM *newItem, TREEVIEW_ITEM *sibling,
1077                      TREEVIEW_ITEM *parent)
1078 {
1079     assert(parent != NULL);
1080
1081     if (sibling != NULL)
1082     {
1083         assert(sibling->parent == parent);
1084
1085         if (sibling->nextSibling != NULL)
1086             sibling->nextSibling->prevSibling = newItem;
1087
1088         newItem->nextSibling = sibling->nextSibling;
1089         sibling->nextSibling = newItem;
1090     }
1091     else
1092        newItem->nextSibling = NULL;
1093
1094     newItem->prevSibling = sibling;
1095
1096     if (parent->lastChild == sibling)
1097         parent->lastChild = newItem;
1098
1099     if (parent->firstChild == NULL)
1100         parent->firstChild = newItem;
1101 }
1102
1103 static BOOL
1104 TREEVIEW_DoSetItemT(const TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *wineItem,
1105                    const TVITEMEXW *tvItem, BOOL isW)
1106 {
1107     UINT callbackClear = 0;
1108     UINT callbackSet = 0;
1109
1110     TRACE("item %p\n", wineItem);
1111     /* Do this first in case it fails. */
1112     if (tvItem->mask & TVIF_TEXT)
1113     {
1114         wineItem->textWidth = 0; /* force width recalculation */
1115         if (tvItem->pszText != LPSTR_TEXTCALLBACKW && tvItem->pszText != NULL) /* covers != TEXTCALLBACKA too, and undocumented: pszText of NULL also means TEXTCALLBACK */
1116         {
1117             int len;
1118             LPWSTR newText;
1119             if (isW)
1120                 len = lstrlenW(tvItem->pszText) + 1;
1121             else
1122                 len = MultiByteToWideChar(CP_ACP, 0, (LPSTR)tvItem->pszText, -1, NULL, 0);
1123
1124             newText  = ReAlloc(wineItem->pszText, len * sizeof(WCHAR));
1125
1126             if (newText == NULL) return FALSE;
1127
1128             callbackClear |= TVIF_TEXT;
1129
1130             wineItem->pszText = newText;
1131             wineItem->cchTextMax = len;
1132             if (isW)
1133                 lstrcpynW(wineItem->pszText, tvItem->pszText, len);
1134             else
1135                 MultiByteToWideChar(CP_ACP, 0, (LPSTR)tvItem->pszText, -1,
1136                                     wineItem->pszText, len);
1137
1138             TRACE("setting text %s, item %p\n", debugstr_w(wineItem->pszText), wineItem);
1139         }
1140         else
1141         {
1142             callbackSet |= TVIF_TEXT;
1143
1144             wineItem->pszText = ReAlloc(wineItem->pszText,
1145                                         TEXT_CALLBACK_SIZE * sizeof(WCHAR));
1146             wineItem->cchTextMax = TEXT_CALLBACK_SIZE;
1147             TRACE("setting callback, item %p\n", wineItem);
1148         }
1149     }
1150
1151     if (tvItem->mask & TVIF_CHILDREN)
1152     {
1153         wineItem->cChildren = tvItem->cChildren;
1154
1155         if (wineItem->cChildren == I_CHILDRENCALLBACK)
1156             callbackSet |= TVIF_CHILDREN;
1157         else
1158             callbackClear |= TVIF_CHILDREN;
1159     }
1160
1161     if (tvItem->mask & TVIF_IMAGE)
1162     {
1163         wineItem->iImage = tvItem->iImage;
1164
1165         if (wineItem->iImage == I_IMAGECALLBACK)
1166             callbackSet |= TVIF_IMAGE;
1167         else
1168             callbackClear |= TVIF_IMAGE;
1169     }
1170
1171     if (tvItem->mask & TVIF_SELECTEDIMAGE)
1172     {
1173         wineItem->iSelectedImage = tvItem->iSelectedImage;
1174
1175         if (wineItem->iSelectedImage == I_IMAGECALLBACK)
1176             callbackSet |= TVIF_SELECTEDIMAGE;
1177         else
1178             callbackClear |= TVIF_SELECTEDIMAGE;
1179     }
1180
1181     if (tvItem->mask & TVIF_PARAM)
1182         wineItem->lParam = tvItem->lParam;
1183
1184     /* If the application sets TVIF_INTEGRAL without
1185      * supplying a TVITEMEX structure, it's toast. */
1186     if (tvItem->mask & TVIF_INTEGRAL)
1187         wineItem->iIntegral = tvItem->iIntegral;
1188
1189     if (tvItem->mask & TVIF_STATE)
1190     {
1191         TRACE("prevstate,state,mask:%x,%x,%x\n", wineItem->state, tvItem->state,
1192               tvItem->stateMask);
1193         wineItem->state &= ~tvItem->stateMask;
1194         wineItem->state |= (tvItem->state & tvItem->stateMask);
1195     }
1196
1197     wineItem->callbackMask |= callbackSet;
1198     wineItem->callbackMask &= ~callbackClear;
1199
1200     return TRUE;
1201 }
1202
1203 /* Note that the new item is pre-zeroed. */
1204 static LRESULT
1205 TREEVIEW_InsertItemT(TREEVIEW_INFO *infoPtr, const TVINSERTSTRUCTW *ptdi, BOOL isW)
1206 {
1207     const TVITEMEXW *tvItem = &ptdi->u.itemex;
1208     HTREEITEM insertAfter;
1209     TREEVIEW_ITEM *newItem, *parentItem;
1210     BOOL bTextUpdated = FALSE;
1211
1212     if (ptdi->hParent == TVI_ROOT || ptdi->hParent == 0)
1213     {
1214         parentItem = infoPtr->root;
1215     }
1216     else
1217     {
1218         parentItem = ptdi->hParent;
1219
1220         if (!TREEVIEW_ValidItem(infoPtr, parentItem))
1221         {
1222             WARN("invalid parent %p\n", parentItem);
1223             return 0;
1224         }
1225     }
1226
1227     insertAfter = ptdi->hInsertAfter;
1228
1229     /* Validate this now for convenience. */
1230     switch ((DWORD_PTR)insertAfter)
1231     {
1232     case (DWORD_PTR)TVI_FIRST:
1233     case (DWORD_PTR)TVI_LAST:
1234     case (DWORD_PTR)TVI_SORT:
1235         break;
1236
1237     default:
1238         if (!TREEVIEW_ValidItem(infoPtr, insertAfter) ||
1239             insertAfter->parent != parentItem)
1240         {
1241             WARN("invalid insert after %p\n", insertAfter);
1242             insertAfter = TVI_LAST;
1243         }
1244     }
1245
1246     TRACE("parent %p position %p: %s\n", parentItem, insertAfter,
1247           (tvItem->mask & TVIF_TEXT)
1248           ? ((tvItem->pszText == LPSTR_TEXTCALLBACKW) ? "<callback>"
1249              : (isW ? debugstr_w(tvItem->pszText) : debugstr_a((LPSTR)tvItem->pszText)))
1250           : "<no label>");
1251
1252     newItem = TREEVIEW_AllocateItem(infoPtr);
1253     if (newItem == NULL)
1254         return 0;
1255
1256     newItem->parent = parentItem;
1257     newItem->iIntegral = 1;
1258
1259     if (!TREEVIEW_DoSetItemT(infoPtr, newItem, tvItem, isW))
1260         return 0;
1261
1262     /* After this point, nothing can fail. (Except for TVI_SORT.) */
1263
1264     infoPtr->uNumItems++;
1265
1266     switch ((DWORD_PTR)insertAfter)
1267     {
1268     case (DWORD_PTR)TVI_FIRST:
1269         {
1270            TREEVIEW_ITEM *originalFirst = parentItem->firstChild;
1271            TREEVIEW_InsertBefore(newItem, parentItem->firstChild, parentItem);
1272            if (infoPtr->firstVisible == originalFirst)
1273               TREEVIEW_SetFirstVisible(infoPtr, newItem, TRUE);
1274         }
1275         break;
1276
1277     case (DWORD_PTR)TVI_LAST:
1278         TREEVIEW_InsertAfter(newItem, parentItem->lastChild, parentItem);
1279         break;
1280
1281         /* hInsertAfter names a specific item we want to insert after */
1282     default:
1283         TREEVIEW_InsertAfter(newItem, insertAfter, insertAfter->parent);
1284         break;
1285
1286     case (DWORD_PTR)TVI_SORT:
1287         {
1288             TREEVIEW_ITEM *aChild;
1289             TREEVIEW_ITEM *previousChild = NULL;
1290             TREEVIEW_ITEM *originalFirst = parentItem->firstChild;
1291             BOOL bItemInserted = FALSE;
1292
1293             aChild = parentItem->firstChild;
1294
1295             bTextUpdated = TRUE;
1296             TREEVIEW_UpdateDispInfo(infoPtr, newItem, TVIF_TEXT);
1297
1298             /* Iterate the parent children to see where we fit in */
1299             while (aChild != NULL)
1300             {
1301                 INT comp;
1302
1303                 TREEVIEW_UpdateDispInfo(infoPtr, aChild, TVIF_TEXT);
1304                 comp = lstrcmpW(newItem->pszText, aChild->pszText);
1305
1306                 if (comp < 0)   /* we are smaller than the current one */
1307                 {
1308                     TREEVIEW_InsertBefore(newItem, aChild, parentItem);
1309                     if (infoPtr->firstVisible == originalFirst &&
1310                         aChild == originalFirst)
1311                         TREEVIEW_SetFirstVisible(infoPtr, newItem, TRUE);
1312                     bItemInserted = TRUE;
1313                     break;
1314                 }
1315                 else if (comp > 0)      /* we are bigger than the current one */
1316                 {
1317                     previousChild = aChild;
1318
1319                     /* This will help us to exit if there is no more sibling */
1320                     aChild = (aChild->nextSibling == 0)
1321                         ? NULL
1322                         : aChild->nextSibling;
1323
1324                     /* Look at the next item */
1325                     continue;
1326                 }
1327                 else if (comp == 0)
1328                 {
1329                     /*
1330                      * An item with this name is already existing, therefore,
1331                      * we add after the one we found
1332                      */
1333                     TREEVIEW_InsertAfter(newItem, aChild, parentItem);
1334                     bItemInserted = TRUE;
1335                     break;
1336                 }
1337             }
1338
1339             /*
1340              * we reach the end of the child list and the item has not
1341              * yet been inserted, therefore, insert it after the last child.
1342              */
1343             if ((!bItemInserted) && (aChild == NULL))
1344                 TREEVIEW_InsertAfter(newItem, previousChild, parentItem);
1345
1346             break;
1347         }
1348     }
1349
1350
1351     TRACE("new item %p; parent %p, mask %x\n", newItem,
1352           newItem->parent, tvItem->mask);
1353
1354     newItem->iLevel = newItem->parent->iLevel + 1;
1355
1356     if (newItem->parent->cChildren == 0)
1357         newItem->parent->cChildren = 1;
1358
1359     if (infoPtr->dwStyle & TVS_CHECKBOXES)
1360     {
1361         if (STATEIMAGEINDEX(newItem->state) == 0)
1362             newItem->state |= INDEXTOSTATEIMAGEMASK(1);
1363     }
1364
1365     if (infoPtr->firstVisible == NULL)
1366         infoPtr->firstVisible = newItem;
1367
1368     TREEVIEW_VerifyTree(infoPtr);
1369
1370     if (parentItem == infoPtr->root ||
1371         (ISVISIBLE(parentItem) && parentItem->state & TVIS_EXPANDED))
1372     {
1373        TREEVIEW_ITEM *item;
1374        TREEVIEW_ITEM *prev = TREEVIEW_GetPrevListItem(infoPtr, newItem);
1375
1376        TREEVIEW_RecalculateVisibleOrder(infoPtr, prev);
1377        TREEVIEW_ComputeItemInternalMetrics(infoPtr, newItem);
1378
1379        if (!bTextUpdated)
1380           TREEVIEW_UpdateDispInfo(infoPtr, newItem, TVIF_TEXT);
1381
1382        TREEVIEW_ComputeTextWidth(infoPtr, newItem, 0);
1383        TREEVIEW_UpdateScrollBars(infoPtr);
1384     /*
1385      * if the item was inserted in a visible part of the tree,
1386      * invalidate it, as well as those after it
1387      */
1388        for (item = newItem;
1389             item != NULL;
1390             item = TREEVIEW_GetNextListItem(infoPtr, item))
1391           TREEVIEW_Invalidate(infoPtr, item);
1392     }
1393     else
1394     {
1395        newItem->visibleOrder = -1;
1396
1397        /* refresh treeview if newItem is the first item inserted under parentItem */
1398        if (ISVISIBLE(parentItem) && newItem->prevSibling == newItem->nextSibling)
1399        {
1400           /* parent got '+' - update it */
1401           TREEVIEW_Invalidate(infoPtr, parentItem);
1402        }
1403     }
1404
1405     return (LRESULT)newItem;
1406 }
1407
1408 /* Item Deletion ************************************************************/
1409 static void
1410 TREEVIEW_RemoveItem(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *wineItem);
1411
1412 static void
1413 TREEVIEW_RemoveAllChildren(TREEVIEW_INFO *infoPtr, const TREEVIEW_ITEM *parentItem)
1414 {
1415     TREEVIEW_ITEM *kill = parentItem->firstChild;
1416
1417     while (kill != NULL)
1418     {
1419         TREEVIEW_ITEM *next = kill->nextSibling;
1420
1421         TREEVIEW_RemoveItem(infoPtr, kill);
1422
1423         kill = next;
1424     }
1425
1426     assert(parentItem->cChildren <= 0); /* I_CHILDRENCALLBACK or 0 */
1427     assert(parentItem->firstChild == NULL);
1428     assert(parentItem->lastChild == NULL);
1429 }
1430
1431 static void
1432 TREEVIEW_UnlinkItem(const TREEVIEW_ITEM *item)
1433 {
1434     TREEVIEW_ITEM *parentItem = item->parent;
1435
1436     assert(item != NULL);
1437     assert(item->parent != NULL); /* i.e. it must not be the root */
1438
1439     if (parentItem->firstChild == item)
1440         parentItem->firstChild = item->nextSibling;
1441
1442     if (parentItem->lastChild == item)
1443         parentItem->lastChild = item->prevSibling;
1444
1445     if (parentItem->firstChild == NULL && parentItem->lastChild == NULL
1446         && parentItem->cChildren > 0)
1447         parentItem->cChildren = 0;
1448
1449     if (item->prevSibling)
1450         item->prevSibling->nextSibling = item->nextSibling;
1451
1452     if (item->nextSibling)
1453         item->nextSibling->prevSibling = item->prevSibling;
1454 }
1455
1456 static void
1457 TREEVIEW_RemoveItem(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *wineItem)
1458 {
1459     TRACE("%p, (%s)\n", wineItem, TREEVIEW_ItemName(wineItem));
1460
1461     TREEVIEW_SendTreeviewNotify(infoPtr, TVN_DELETEITEMW, TVC_UNKNOWN,
1462                                 TVIF_HANDLE | TVIF_PARAM, wineItem, 0);
1463
1464     if (wineItem->firstChild)
1465         TREEVIEW_RemoveAllChildren(infoPtr, wineItem);
1466
1467     TREEVIEW_UnlinkItem(wineItem);
1468
1469     infoPtr->uNumItems--;
1470
1471     if (wineItem->pszText != LPSTR_TEXTCALLBACKW)
1472         Free(wineItem->pszText);
1473
1474     TREEVIEW_FreeItem(infoPtr, wineItem);
1475 }
1476
1477
1478 /* Empty out the tree. */
1479 static void
1480 TREEVIEW_RemoveTree(TREEVIEW_INFO *infoPtr)
1481 {
1482     TREEVIEW_RemoveAllChildren(infoPtr, infoPtr->root);
1483
1484     assert(infoPtr->uNumItems == 0);    /* root isn't counted in uNumItems */
1485 }
1486
1487 static LRESULT
1488 TREEVIEW_DeleteItem(TREEVIEW_INFO *infoPtr, HTREEITEM wineItem)
1489 {
1490     TREEVIEW_ITEM *newSelection = NULL;
1491     TREEVIEW_ITEM *newFirstVisible = NULL;
1492     TREEVIEW_ITEM *parent, *prev = NULL;
1493     BOOL visible = FALSE;
1494
1495     if (wineItem == TVI_ROOT)
1496     {
1497         TRACE("TVI_ROOT\n");
1498         parent = infoPtr->root;
1499         newSelection = NULL;
1500         visible = TRUE;
1501         TREEVIEW_RemoveTree(infoPtr);
1502     }
1503     else
1504     {
1505         if (!TREEVIEW_ValidItem(infoPtr, wineItem))
1506             return FALSE;
1507
1508         TRACE("%p (%s)\n", wineItem, TREEVIEW_ItemName(wineItem));
1509         parent = wineItem->parent;
1510
1511         if (ISVISIBLE(wineItem))
1512         {
1513             prev = TREEVIEW_GetPrevListItem(infoPtr, wineItem);
1514             visible = TRUE;
1515         }
1516
1517         if (infoPtr->selectedItem != NULL
1518             && (wineItem == infoPtr->selectedItem
1519                 || TREEVIEW_IsChildOf(wineItem, infoPtr->selectedItem)))
1520         {
1521             if (wineItem->nextSibling)
1522                 newSelection = wineItem->nextSibling;
1523             else if (wineItem->parent != infoPtr->root)
1524                 newSelection = wineItem->parent;
1525             else
1526                 newSelection = wineItem->prevSibling;
1527             TRACE("newSelection = %p\n", newSelection);
1528         }
1529
1530         if (infoPtr->firstVisible == wineItem)
1531         {
1532             if (wineItem->nextSibling)
1533                newFirstVisible = wineItem->nextSibling;
1534             else if (wineItem->prevSibling)
1535                newFirstVisible = wineItem->prevSibling;
1536             else if (wineItem->parent != infoPtr->root)
1537                newFirstVisible = wineItem->parent;
1538                TREEVIEW_SetFirstVisible(infoPtr, NULL, TRUE);
1539         }
1540         else
1541             newFirstVisible = infoPtr->firstVisible;
1542
1543         TREEVIEW_RemoveItem(infoPtr, wineItem);
1544     }
1545
1546     /* Don't change if somebody else already has (infoPtr->selectedItem is cleared by FreeItem). */
1547     if (!infoPtr->selectedItem && newSelection)
1548     {
1549         if (TREEVIEW_ValidItem(infoPtr, newSelection))
1550             TREEVIEW_DoSelectItem(infoPtr, TVGN_CARET, newSelection, TVC_UNKNOWN);
1551     }
1552
1553     /* Validate insertMark dropItem.
1554      * hotItem ??? - used for comparison only.
1555      */
1556     if (!TREEVIEW_ValidItem(infoPtr, infoPtr->insertMarkItem))
1557         infoPtr->insertMarkItem = 0;
1558
1559     if (!TREEVIEW_ValidItem(infoPtr, infoPtr->dropItem))
1560         infoPtr->dropItem = 0;
1561
1562     if (!TREEVIEW_ValidItem(infoPtr, newFirstVisible))
1563         newFirstVisible = infoPtr->root->firstChild;
1564
1565     TREEVIEW_VerifyTree(infoPtr);
1566
1567
1568     if (visible)
1569     {
1570        TREEVIEW_SetFirstVisible(infoPtr, newFirstVisible, TRUE);
1571        TREEVIEW_RecalculateVisibleOrder(infoPtr, prev);
1572        TREEVIEW_UpdateScrollBars(infoPtr);
1573        TREEVIEW_Invalidate(infoPtr, NULL);
1574     }
1575     else if (ISVISIBLE(parent) && !TREEVIEW_HasChildren(infoPtr, parent))
1576     {
1577        /* parent lost '+/-' - update it */
1578        TREEVIEW_Invalidate(infoPtr, parent);
1579     }
1580
1581     return TRUE;
1582 }
1583
1584
1585 /* Get/Set Messages *********************************************************/
1586 static LRESULT
1587 TREEVIEW_SetRedraw(TREEVIEW_INFO* infoPtr, WPARAM wParam)
1588 {
1589   if(wParam)
1590     infoPtr->bRedraw = TRUE;
1591   else
1592     infoPtr->bRedraw = FALSE;
1593
1594   return 0;
1595 }
1596
1597 static LRESULT
1598 TREEVIEW_GetIndent(const TREEVIEW_INFO *infoPtr)
1599 {
1600     TRACE("\n");
1601     return infoPtr->uIndent;
1602 }
1603
1604 static LRESULT
1605 TREEVIEW_SetIndent(TREEVIEW_INFO *infoPtr, UINT newIndent)
1606 {
1607     TRACE("\n");
1608
1609     if (newIndent < MINIMUM_INDENT)
1610         newIndent = MINIMUM_INDENT;
1611
1612     if (infoPtr->uIndent != newIndent)
1613     {
1614         infoPtr->uIndent = newIndent;
1615         TREEVIEW_UpdateSubTree(infoPtr, infoPtr->root);
1616         TREEVIEW_UpdateScrollBars(infoPtr);
1617         TREEVIEW_Invalidate(infoPtr, NULL);
1618     }
1619
1620     return 0;
1621 }
1622
1623
1624 static LRESULT
1625 TREEVIEW_GetToolTips(const TREEVIEW_INFO *infoPtr)
1626 {
1627     TRACE("\n");
1628     return (LRESULT)infoPtr->hwndToolTip;
1629 }
1630
1631 static LRESULT
1632 TREEVIEW_SetToolTips(TREEVIEW_INFO *infoPtr, HWND hwndTT)
1633 {
1634     HWND prevToolTip;
1635
1636     TRACE("\n");
1637     prevToolTip = infoPtr->hwndToolTip;
1638     infoPtr->hwndToolTip = hwndTT;
1639
1640     return (LRESULT)prevToolTip;
1641 }
1642
1643 static LRESULT
1644 TREEVIEW_SetUnicodeFormat(TREEVIEW_INFO *infoPtr, BOOL fUnicode)
1645 {
1646     BOOL rc = infoPtr->bNtfUnicode;
1647     infoPtr->bNtfUnicode = fUnicode;
1648     return rc;
1649 }
1650
1651 static LRESULT
1652 TREEVIEW_GetUnicodeFormat(const TREEVIEW_INFO *infoPtr)
1653 {
1654      return infoPtr->bNtfUnicode;
1655 }
1656
1657 static LRESULT
1658 TREEVIEW_GetScrollTime(const TREEVIEW_INFO *infoPtr)
1659 {
1660     return infoPtr->uScrollTime;
1661 }
1662
1663 static LRESULT
1664 TREEVIEW_SetScrollTime(TREEVIEW_INFO *infoPtr, UINT uScrollTime)
1665 {
1666     UINT uOldScrollTime = infoPtr->uScrollTime;
1667
1668     infoPtr->uScrollTime = min(uScrollTime, 100);
1669
1670     return uOldScrollTime;
1671 }
1672
1673
1674 static LRESULT
1675 TREEVIEW_GetImageList(const TREEVIEW_INFO *infoPtr, WPARAM wParam)
1676 {
1677     TRACE("\n");
1678
1679     switch (wParam)
1680     {
1681     case (WPARAM)TVSIL_NORMAL:
1682         return (LRESULT)infoPtr->himlNormal;
1683
1684     case (WPARAM)TVSIL_STATE:
1685         return (LRESULT)infoPtr->himlState;
1686
1687     default:
1688         return 0;
1689     }
1690 }
1691
1692 #define TVHEIGHT_MIN         16
1693 #define TVHEIGHT_FONT_ADJUST 3 /* 2 for focus border + 1 for margin some apps assume */
1694
1695 /* Compute the natural height for items. */
1696 static UINT
1697 TREEVIEW_NaturalHeight(const TREEVIEW_INFO *infoPtr)
1698 {
1699     TEXTMETRICW tm;
1700     HDC hdc = GetDC(0);
1701     HFONT hOldFont = SelectObject(hdc, infoPtr->hFont);
1702     UINT height;
1703
1704     /* Height is the maximum of:
1705      * 16 (a hack because our fonts are tiny), and
1706      * The text height + border & margin, and
1707      * The size of the normal image list
1708      */
1709     GetTextMetricsW(hdc, &tm);
1710     SelectObject(hdc, hOldFont);
1711     ReleaseDC(0, hdc);
1712
1713     height = TVHEIGHT_MIN;
1714     if (height < tm.tmHeight + tm.tmExternalLeading + TVHEIGHT_FONT_ADJUST)
1715         height = tm.tmHeight + tm.tmExternalLeading + TVHEIGHT_FONT_ADJUST;
1716     if (height < infoPtr->normalImageHeight)
1717         height = infoPtr->normalImageHeight;
1718
1719     /* Round down, unless we support odd ("non even") heights. */
1720     if (!(infoPtr->dwStyle & TVS_NONEVENHEIGHT))
1721         height &= ~1;
1722
1723     return height;
1724 }
1725
1726 static LRESULT
1727 TREEVIEW_SetImageList(TREEVIEW_INFO *infoPtr, WPARAM wParam, HIMAGELIST himlNew)
1728 {
1729     HIMAGELIST himlOld = 0;
1730     int oldWidth  = infoPtr->normalImageWidth;
1731     int oldHeight = infoPtr->normalImageHeight;
1732
1733
1734     TRACE("%lx,%p\n", wParam, himlNew);
1735
1736     switch (wParam)
1737     {
1738     case (WPARAM)TVSIL_NORMAL:
1739         himlOld = infoPtr->himlNormal;
1740         infoPtr->himlNormal = himlNew;
1741
1742         if (himlNew != NULL)
1743             ImageList_GetIconSize(himlNew, &infoPtr->normalImageWidth,
1744                                   &infoPtr->normalImageHeight);
1745         else
1746         {
1747             infoPtr->normalImageWidth = 0;
1748             infoPtr->normalImageHeight = 0;
1749         }
1750
1751         break;
1752
1753     case (WPARAM)TVSIL_STATE:
1754         himlOld = infoPtr->himlState;
1755         infoPtr->himlState = himlNew;
1756
1757         if (himlNew != NULL)
1758             ImageList_GetIconSize(himlNew, &infoPtr->stateImageWidth,
1759                                   &infoPtr->stateImageHeight);
1760         else
1761         {
1762             infoPtr->stateImageWidth = 0;
1763             infoPtr->stateImageHeight = 0;
1764         }
1765
1766         break;
1767     }
1768
1769     if (oldWidth != infoPtr->normalImageWidth ||
1770         oldHeight != infoPtr->normalImageHeight)
1771     {
1772         BOOL bRecalcVisible = FALSE;
1773
1774         if (oldHeight != infoPtr->normalImageHeight &&
1775             !infoPtr->bHeightSet)
1776         {
1777             infoPtr->uItemHeight = TREEVIEW_NaturalHeight(infoPtr);
1778             bRecalcVisible = TRUE;
1779         }
1780
1781         if (infoPtr->normalImageWidth > MINIMUM_INDENT &&
1782             infoPtr->normalImageWidth != infoPtr->uIndent)
1783         {
1784             infoPtr->uIndent = infoPtr->normalImageWidth;
1785             bRecalcVisible = TRUE;
1786         }
1787
1788         if (bRecalcVisible)
1789             TREEVIEW_RecalculateVisibleOrder(infoPtr, NULL);
1790
1791        TREEVIEW_UpdateSubTree(infoPtr, infoPtr->root);
1792        TREEVIEW_UpdateScrollBars(infoPtr);
1793     }
1794
1795     TREEVIEW_Invalidate(infoPtr, NULL);
1796
1797     return (LRESULT)himlOld;
1798 }
1799
1800 static LRESULT
1801 TREEVIEW_SetItemHeight(TREEVIEW_INFO *infoPtr, INT newHeight)
1802 {
1803     INT prevHeight = infoPtr->uItemHeight;
1804
1805     TRACE("%d\n", newHeight);
1806     if (newHeight == -1)
1807     {
1808         infoPtr->uItemHeight = TREEVIEW_NaturalHeight(infoPtr);
1809         infoPtr->bHeightSet = FALSE;
1810     }
1811     else
1812     {
1813         infoPtr->uItemHeight = newHeight;
1814         infoPtr->bHeightSet = TRUE;
1815     }
1816
1817     /* Round down, unless we support odd ("non even") heights. */
1818     if (!(infoPtr->dwStyle & TVS_NONEVENHEIGHT))
1819         infoPtr->uItemHeight &= ~1;
1820
1821     if (infoPtr->uItemHeight != prevHeight)
1822     {
1823         TREEVIEW_RecalculateVisibleOrder(infoPtr, NULL);
1824         TREEVIEW_UpdateScrollBars(infoPtr);
1825         TREEVIEW_Invalidate(infoPtr, NULL);
1826     }
1827
1828     return prevHeight;
1829 }
1830
1831 static LRESULT
1832 TREEVIEW_GetItemHeight(const TREEVIEW_INFO *infoPtr)
1833 {
1834     TRACE("\n");
1835     return infoPtr->uItemHeight;
1836 }
1837
1838
1839 static LRESULT
1840 TREEVIEW_GetFont(const TREEVIEW_INFO *infoPtr)
1841 {
1842     TRACE("%p\n", infoPtr->hFont);
1843     return (LRESULT)infoPtr->hFont;
1844 }
1845
1846
1847 static INT CALLBACK
1848 TREEVIEW_ResetTextWidth(LPVOID pItem, LPVOID unused)
1849 {
1850     (void)unused;
1851
1852     ((TREEVIEW_ITEM *)pItem)->textWidth = 0;
1853
1854     return 1;
1855 }
1856
1857 static LRESULT
1858 TREEVIEW_SetFont(TREEVIEW_INFO *infoPtr, HFONT hFont, BOOL bRedraw)
1859 {
1860     UINT uHeight = infoPtr->uItemHeight;
1861
1862     TRACE("%p %i\n", hFont, bRedraw);
1863
1864     infoPtr->hFont = hFont ? hFont : infoPtr->hDefaultFont;
1865
1866     DeleteObject(infoPtr->hBoldFont);
1867     infoPtr->hBoldFont = TREEVIEW_CreateBoldFont(infoPtr->hFont);
1868     infoPtr->hUnderlineFont = TREEVIEW_CreateUnderlineFont(infoPtr->hFont);
1869
1870     if (!infoPtr->bHeightSet)
1871         infoPtr->uItemHeight = TREEVIEW_NaturalHeight(infoPtr);
1872
1873     if (uHeight != infoPtr->uItemHeight)
1874        TREEVIEW_RecalculateVisibleOrder(infoPtr, NULL);
1875
1876     DPA_EnumCallback(infoPtr->items, TREEVIEW_ResetTextWidth, 0);
1877
1878     TREEVIEW_UpdateSubTree(infoPtr, infoPtr->root);
1879     TREEVIEW_UpdateScrollBars(infoPtr);
1880
1881     if (bRedraw)
1882         TREEVIEW_Invalidate(infoPtr, NULL);
1883
1884     return 0;
1885 }
1886
1887
1888 static LRESULT
1889 TREEVIEW_GetLineColor(const TREEVIEW_INFO *infoPtr)
1890 {
1891     TRACE("\n");
1892     return (LRESULT)infoPtr->clrLine;
1893 }
1894
1895 static LRESULT
1896 TREEVIEW_SetLineColor(TREEVIEW_INFO *infoPtr, COLORREF color)
1897 {
1898     COLORREF prevColor = infoPtr->clrLine;
1899
1900     TRACE("\n");
1901     infoPtr->clrLine = color;
1902     return (LRESULT)prevColor;
1903 }
1904
1905
1906 static LRESULT
1907 TREEVIEW_GetTextColor(const TREEVIEW_INFO *infoPtr)
1908 {
1909     TRACE("\n");
1910     return (LRESULT)infoPtr->clrText;
1911 }
1912
1913 static LRESULT
1914 TREEVIEW_SetTextColor(TREEVIEW_INFO *infoPtr, COLORREF color)
1915 {
1916     COLORREF prevColor = infoPtr->clrText;
1917
1918     TRACE("\n");
1919     infoPtr->clrText = color;
1920
1921     if (infoPtr->clrText != prevColor)
1922         TREEVIEW_Invalidate(infoPtr, NULL);
1923
1924     return (LRESULT)prevColor;
1925 }
1926
1927
1928 static LRESULT
1929 TREEVIEW_GetBkColor(const TREEVIEW_INFO *infoPtr)
1930 {
1931     TRACE("\n");
1932     return (LRESULT)infoPtr->clrBk;
1933 }
1934
1935 static LRESULT
1936 TREEVIEW_SetBkColor(TREEVIEW_INFO *infoPtr, COLORREF newColor)
1937 {
1938     COLORREF prevColor = infoPtr->clrBk;
1939
1940     TRACE("\n");
1941     infoPtr->clrBk = newColor;
1942
1943     if (newColor != prevColor)
1944         TREEVIEW_Invalidate(infoPtr, NULL);
1945
1946     return (LRESULT)prevColor;
1947 }
1948
1949
1950 static LRESULT
1951 TREEVIEW_GetInsertMarkColor(const TREEVIEW_INFO *infoPtr)
1952 {
1953     TRACE("\n");
1954     return (LRESULT)infoPtr->clrInsertMark;
1955 }
1956
1957 static LRESULT
1958 TREEVIEW_SetInsertMarkColor(TREEVIEW_INFO *infoPtr, COLORREF color)
1959 {
1960     COLORREF prevColor = infoPtr->clrInsertMark;
1961
1962     TRACE("%x\n", color);
1963     infoPtr->clrInsertMark = color;
1964
1965     return (LRESULT)prevColor;
1966 }
1967
1968
1969 static LRESULT
1970 TREEVIEW_SetInsertMark(TREEVIEW_INFO *infoPtr, BOOL wParam, HTREEITEM item)
1971 {
1972     TRACE("%d %p\n", wParam, item);
1973
1974     if (!TREEVIEW_ValidItem(infoPtr, item))
1975         return 0;
1976
1977     infoPtr->insertBeforeorAfter = wParam;
1978     infoPtr->insertMarkItem = item;
1979
1980     TREEVIEW_Invalidate(infoPtr, NULL);
1981
1982     return 1;
1983 }
1984
1985
1986 /************************************************************************
1987  * Some serious braindamage here. lParam is a pointer to both the
1988  * input HTREEITEM and the output RECT.
1989  */
1990 static LRESULT
1991 TREEVIEW_GetItemRect(const TREEVIEW_INFO *infoPtr, BOOL fTextRect, LPRECT lpRect)
1992 {
1993     TREEVIEW_ITEM *wineItem;
1994     const HTREEITEM *pItem = (HTREEITEM *)lpRect;
1995
1996     TRACE("\n");
1997     /*
1998      * validate parameters
1999      */
2000     if (pItem == NULL)
2001         return FALSE;
2002
2003     wineItem = *pItem;
2004     if (!TREEVIEW_ValidItem(infoPtr, wineItem) || !ISVISIBLE(wineItem))
2005         return FALSE;
2006
2007     /*
2008      * If wParam is TRUE return the text size otherwise return
2009      * the whole item size
2010      */
2011     if (fTextRect)
2012     {
2013         /* Windows does not send TVN_GETDISPINFO here. */
2014
2015         lpRect->top = wineItem->rect.top;
2016         lpRect->bottom = wineItem->rect.bottom;
2017
2018         lpRect->left = wineItem->textOffset;
2019         if (!wineItem->textWidth)
2020                 TREEVIEW_ComputeTextWidth(infoPtr, wineItem, 0);
2021
2022         lpRect->right = wineItem->textOffset + wineItem->textWidth + 4;
2023     }
2024     else
2025     {
2026         *lpRect = wineItem->rect;
2027     }
2028
2029     TRACE("%s [%s]\n", fTextRect ? "text" : "item", wine_dbgstr_rect(lpRect));
2030
2031     return TRUE;
2032 }
2033
2034 static inline LRESULT
2035 TREEVIEW_GetVisibleCount(const TREEVIEW_INFO *infoPtr)
2036 {
2037     /* Surprise! This does not take integral height into account. */
2038     return infoPtr->clientHeight / infoPtr->uItemHeight;
2039 }
2040
2041
2042 static LRESULT
2043 TREEVIEW_GetItemT(const TREEVIEW_INFO *infoPtr, LPTVITEMEXW tvItem, BOOL isW)
2044 {
2045     TREEVIEW_ITEM *wineItem;
2046
2047     wineItem = tvItem->hItem;
2048     if (!TREEVIEW_ValidItem(infoPtr, wineItem))
2049         return FALSE;
2050
2051     TREEVIEW_UpdateDispInfo(infoPtr, wineItem, tvItem->mask);
2052
2053     if (tvItem->mask & TVIF_CHILDREN)
2054     {
2055         if (wineItem->cChildren==I_CHILDRENCALLBACK)
2056             FIXME("I_CHILDRENCALLBACK not supported\n");
2057         tvItem->cChildren = wineItem->cChildren;
2058     }
2059
2060     if (tvItem->mask & TVIF_HANDLE)
2061         tvItem->hItem = wineItem;
2062
2063     if (tvItem->mask & TVIF_IMAGE)
2064         tvItem->iImage = wineItem->iImage;
2065
2066     if (tvItem->mask & TVIF_INTEGRAL)
2067         tvItem->iIntegral = wineItem->iIntegral;
2068
2069     /* undocumented: windows ignores TVIF_PARAM and
2070      * * always sets lParam
2071      */
2072     tvItem->lParam = wineItem->lParam;
2073
2074     if (tvItem->mask & TVIF_SELECTEDIMAGE)
2075         tvItem->iSelectedImage = wineItem->iSelectedImage;
2076
2077     if (tvItem->mask & TVIF_STATE)
2078         /* Careful here - Windows ignores the stateMask when you get the state
2079             That contradicts the documentation, but makes more common sense, masking
2080             retrieval in this way seems overkill */
2081         tvItem->state = wineItem->state;
2082
2083     if (tvItem->mask & TVIF_TEXT)
2084     {
2085         if (wineItem->pszText == NULL)
2086         {
2087             if (tvItem->cchTextMax > 0)
2088                 tvItem->pszText[0] = '\0';
2089         }
2090         else if (isW)
2091         {
2092             if (wineItem->pszText == LPSTR_TEXTCALLBACKW)
2093             {
2094                 tvItem->pszText = LPSTR_TEXTCALLBACKW;
2095                 FIXME(" GetItem called with LPSTR_TEXTCALLBACK\n");
2096             }
2097             else
2098             {
2099                 lstrcpynW(tvItem->pszText, wineItem->pszText, tvItem->cchTextMax);
2100             }
2101         }
2102         else
2103         {
2104             if (wineItem->pszText == LPSTR_TEXTCALLBACKW)
2105             {
2106                 tvItem->pszText = (LPWSTR)LPSTR_TEXTCALLBACKA;
2107                 FIXME(" GetItem called with LPSTR_TEXTCALLBACK\n");
2108             }
2109             else
2110             {
2111                 WideCharToMultiByte(CP_ACP, 0, wineItem->pszText, -1,
2112                                     (LPSTR)tvItem->pszText, tvItem->cchTextMax, NULL, NULL);
2113             }
2114         }
2115     }
2116     TRACE("item <%p>, txt %p, img %p, mask %x\n",
2117           wineItem, tvItem->pszText, &tvItem->iImage, tvItem->mask);
2118
2119     return TRUE;
2120 }
2121
2122 /* Beware MSDN Library Visual Studio 6.0. It says -1 on failure, 0 on success,
2123  * which is wrong. */
2124 static LRESULT
2125 TREEVIEW_SetItemT(TREEVIEW_INFO *infoPtr, const TVITEMEXW *tvItem, BOOL isW)
2126 {
2127     TREEVIEW_ITEM *wineItem;
2128     TREEVIEW_ITEM originalItem;
2129
2130     wineItem = tvItem->hItem;
2131
2132     TRACE("item %d,mask %x\n", TREEVIEW_GetItemIndex(infoPtr, wineItem),
2133           tvItem->mask);
2134
2135     if (!TREEVIEW_ValidItem(infoPtr, wineItem))
2136         return FALSE;
2137
2138     /* store the original item values */
2139     originalItem = *wineItem;
2140
2141     if (!TREEVIEW_DoSetItemT(infoPtr, wineItem, tvItem, isW))
2142         return FALSE;
2143
2144     /* If the text or TVIS_BOLD was changed, and it is visible, recalculate. */
2145     if ((tvItem->mask & TVIF_TEXT
2146          || (tvItem->mask & TVIF_STATE && tvItem->stateMask & TVIS_BOLD))
2147         && ISVISIBLE(wineItem))
2148     {
2149         TREEVIEW_UpdateDispInfo(infoPtr, wineItem, TVIF_TEXT);
2150         TREEVIEW_ComputeTextWidth(infoPtr, wineItem, 0);
2151     }
2152
2153     if (tvItem->mask != 0 && ISVISIBLE(wineItem))
2154     {
2155         /* The refresh updates everything, but we can't wait until then. */
2156         TREEVIEW_ComputeItemInternalMetrics(infoPtr, wineItem);
2157
2158         /* if any of the item's values changed and it's not a callback, redraw the item */
2159         if (item_changed(&originalItem, wineItem, tvItem))
2160         {
2161             if (tvItem->mask & TVIF_INTEGRAL)
2162             {
2163                 TREEVIEW_RecalculateVisibleOrder(infoPtr, wineItem);
2164                 TREEVIEW_UpdateScrollBars(infoPtr);
2165
2166                 TREEVIEW_Invalidate(infoPtr, NULL);
2167             }
2168             else
2169             {
2170                 TREEVIEW_UpdateScrollBars(infoPtr);
2171                 TREEVIEW_Invalidate(infoPtr, wineItem);
2172             }
2173         }
2174     }
2175
2176     return TRUE;
2177 }
2178
2179 static LRESULT
2180 TREEVIEW_GetItemState(const TREEVIEW_INFO *infoPtr, HTREEITEM wineItem, UINT mask)
2181 {
2182     TRACE("\n");
2183
2184     if (!wineItem || !TREEVIEW_ValidItem(infoPtr, wineItem))
2185         return 0;
2186
2187     return (wineItem->state & mask);
2188 }
2189
2190 static LRESULT
2191 TREEVIEW_GetNextItem(const TREEVIEW_INFO *infoPtr, UINT which, HTREEITEM wineItem)
2192 {
2193     TREEVIEW_ITEM *retval;
2194
2195     retval = 0;
2196
2197     /* handle all the global data here */
2198     switch (which)
2199     {
2200     case TVGN_CHILD:            /* Special case: child of 0 is root */
2201         if (wineItem)
2202             break;
2203         /* fall through */
2204     case TVGN_ROOT:
2205         retval = infoPtr->root->firstChild;
2206         break;
2207
2208     case TVGN_CARET:
2209         retval = infoPtr->selectedItem;
2210         break;
2211
2212     case TVGN_FIRSTVISIBLE:
2213         retval = infoPtr->firstVisible;
2214         break;
2215
2216     case TVGN_DROPHILITE:
2217         retval = infoPtr->dropItem;
2218         break;
2219
2220     case TVGN_LASTVISIBLE:
2221         retval = TREEVIEW_GetLastListItem(infoPtr, infoPtr->root);
2222         break;
2223     }
2224
2225     if (retval)
2226     {
2227         TRACE("flags:%x, returns %p\n", which, retval);
2228         return (LRESULT)retval;
2229     }
2230
2231     if (wineItem == TVI_ROOT) wineItem = infoPtr->root;
2232
2233     if (!TREEVIEW_ValidItem(infoPtr, wineItem))
2234         return FALSE;
2235
2236     switch (which)
2237     {
2238     case TVGN_NEXT:
2239         retval = wineItem->nextSibling;
2240         break;
2241     case TVGN_PREVIOUS:
2242         retval = wineItem->prevSibling;
2243         break;
2244     case TVGN_PARENT:
2245         retval = (wineItem->parent != infoPtr->root) ? wineItem->parent : NULL;
2246         break;
2247     case TVGN_CHILD:
2248         retval = wineItem->firstChild;
2249         break;
2250     case TVGN_NEXTVISIBLE:
2251         retval = TREEVIEW_GetNextListItem(infoPtr, wineItem);
2252         break;
2253     case TVGN_PREVIOUSVISIBLE:
2254         retval = TREEVIEW_GetPrevListItem(infoPtr, wineItem);
2255         break;
2256     default:
2257         TRACE("Unknown msg %x,item %p\n", which, wineItem);
2258         break;
2259     }
2260
2261     TRACE("flags:%x, item %p;returns %p\n", which, wineItem, retval);
2262     return (LRESULT)retval;
2263 }
2264
2265
2266 static LRESULT
2267 TREEVIEW_GetCount(const TREEVIEW_INFO *infoPtr)
2268 {
2269     TRACE(" %d\n", infoPtr->uNumItems);
2270     return (LRESULT)infoPtr->uNumItems;
2271 }
2272
2273 static VOID
2274 TREEVIEW_ToggleItemState(const TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item)
2275 {
2276     if (infoPtr->dwStyle & TVS_CHECKBOXES)
2277     {
2278         static const unsigned int state_table[] = { 0, 2, 1 };
2279
2280         unsigned int state;
2281
2282         state = STATEIMAGEINDEX(item->state);
2283         TRACE("state:%x\n", state);
2284         item->state &= ~TVIS_STATEIMAGEMASK;
2285
2286         if (state < 3)
2287             state = state_table[state];
2288
2289         item->state |= INDEXTOSTATEIMAGEMASK(state);
2290
2291         TRACE("state:%x\n", state);
2292         TREEVIEW_Invalidate(infoPtr, item);
2293     }
2294 }
2295
2296
2297 /* Painting *************************************************************/
2298
2299 /* Draw the lines and expand button for an item. Also draws one section
2300  * of the line from item's parent to item's parent's next sibling. */
2301 static void
2302 TREEVIEW_DrawItemLines(const TREEVIEW_INFO *infoPtr, HDC hdc, const TREEVIEW_ITEM *item)
2303 {
2304     LONG centerx, centery;
2305     BOOL lar = ((infoPtr->dwStyle
2306                  & (TVS_LINESATROOT|TVS_HASLINES|TVS_HASBUTTONS))
2307                 > TVS_LINESATROOT);
2308     HBRUSH hbr, hbrOld;
2309     COLORREF clrBk = infoPtr->clrBk == -1 ? GetSysColor(COLOR_WINDOW):
2310                                             infoPtr->clrBk;
2311
2312     if (!lar && item->iLevel == 0)
2313         return;
2314
2315     hbr    = CreateSolidBrush(clrBk);
2316     hbrOld = SelectObject(hdc, hbr);
2317
2318     centerx = (item->linesOffset + item->stateOffset) / 2;
2319     centery = (item->rect.top + item->rect.bottom) / 2;
2320
2321     if (infoPtr->dwStyle & TVS_HASLINES)
2322     {
2323         HPEN hOldPen, hNewPen;
2324         HTREEITEM parent;
2325         LOGBRUSH lb;
2326
2327         /* Get a dotted grey pen */
2328         lb.lbStyle = BS_SOLID;
2329         lb.lbColor = infoPtr->clrLine;
2330         hNewPen = ExtCreatePen(PS_COSMETIC|PS_ALTERNATE, 1, &lb, 0, NULL);
2331         hOldPen = SelectObject(hdc, hNewPen);
2332
2333         /* Make sure the center is on a dot (using +2 instead
2334          * of +1 gives us pixel-by-pixel compat with native) */
2335         centery = (centery + 2) & ~1;
2336
2337         MoveToEx(hdc, item->stateOffset, centery, NULL);
2338         LineTo(hdc, centerx - 1, centery);
2339
2340         if (item->prevSibling || item->parent != infoPtr->root)
2341         {
2342             MoveToEx(hdc, centerx, item->rect.top, NULL);
2343             LineTo(hdc, centerx, centery);
2344         }
2345
2346         if (item->nextSibling)
2347         {
2348             MoveToEx(hdc, centerx, centery, NULL);
2349             LineTo(hdc, centerx, item->rect.bottom + 1);
2350         }
2351
2352         /* Draw the line from our parent to its next sibling. */
2353         parent = item->parent;
2354         while (parent != infoPtr->root)
2355         {
2356             int pcenterx = (parent->linesOffset + parent->stateOffset) / 2;
2357
2358             if (parent->nextSibling
2359                 /* skip top-levels unless TVS_LINESATROOT */
2360                 && parent->stateOffset > parent->linesOffset)
2361             {
2362                 MoveToEx(hdc, pcenterx, item->rect.top, NULL);
2363                 LineTo(hdc, pcenterx, item->rect.bottom + 1);
2364             }
2365
2366             parent = parent->parent;
2367         }
2368
2369         SelectObject(hdc, hOldPen);
2370         DeleteObject(hNewPen);
2371     }
2372
2373     /*
2374      * Display the (+/-) signs
2375      */
2376
2377     if (infoPtr->dwStyle & TVS_HASBUTTONS)
2378     {
2379         if (item->cChildren)
2380         {
2381             HTHEME theme = GetWindowTheme(infoPtr->hwnd);
2382             if (theme)
2383             {
2384                 RECT glyphRect = item->rect;
2385                 glyphRect.left = item->linesOffset;
2386                 glyphRect.right = item->stateOffset;
2387                 DrawThemeBackground (theme, hdc, TVP_GLYPH,
2388                     (item->state & TVIS_EXPANDED) ? GLPS_OPENED : GLPS_CLOSED,
2389                     &glyphRect, NULL);
2390             }
2391             else
2392             {
2393                 LONG height = item->rect.bottom - item->rect.top;
2394                 LONG width  = item->stateOffset - item->linesOffset;
2395                 LONG rectsize = min(height, width) / 4;
2396                 /* plussize = ceil(rectsize * 3/4) */
2397                 LONG plussize = (rectsize + 1) * 3 / 4;
2398
2399                 HPEN hNewPen  = CreatePen(PS_SOLID, 0, infoPtr->clrLine);
2400                 HPEN hOldPen  = SelectObject(hdc, hNewPen);
2401
2402                 Rectangle(hdc, centerx - rectsize - 1, centery - rectsize - 1,
2403                           centerx + rectsize + 2, centery + rectsize + 2);
2404
2405                 SelectObject(hdc, hOldPen);
2406                 DeleteObject(hNewPen);
2407
2408                 if (height < 18 || width < 18)
2409                 {
2410                     MoveToEx(hdc, centerx - plussize + 1, centery, NULL);
2411                     LineTo(hdc, centerx + plussize, centery);
2412
2413                     if (!(item->state & TVIS_EXPANDED))
2414                     {
2415                         MoveToEx(hdc, centerx, centery - plussize + 1, NULL);
2416                         LineTo(hdc, centerx, centery + plussize);
2417                     }
2418                 }
2419                 else
2420                 {
2421                     Rectangle(hdc, centerx - plussize + 1, centery - 1,
2422                     centerx + plussize, centery + 2);
2423
2424                     if (!(item->state & TVIS_EXPANDED))
2425                     {
2426                         Rectangle(hdc, centerx - 1, centery - plussize + 1,
2427                         centerx + 2, centery + plussize);
2428                         SetPixel(hdc, centerx - 1, centery, clrBk);
2429                         SetPixel(hdc, centerx + 1, centery, clrBk);
2430                     }
2431                 }
2432             }
2433         }
2434     }
2435     SelectObject(hdc, hbrOld);
2436     DeleteObject(hbr);
2437 }
2438
2439 static void
2440 TREEVIEW_DrawItem(const TREEVIEW_INFO *infoPtr, HDC hdc, TREEVIEW_ITEM *wineItem)
2441 {
2442     INT cditem;
2443     HFONT hOldFont;
2444     COLORREF oldTextColor, oldTextBkColor;
2445     int centery;
2446     BOOL inFocus = (GetFocus() == infoPtr->hwnd);
2447     NMTVCUSTOMDRAW nmcdhdr;
2448
2449     TREEVIEW_UpdateDispInfo(infoPtr, wineItem, CALLBACK_MASK_ALL);
2450
2451     /* - If item is drop target or it is selected and window is in focus -
2452      * use blue background (COLOR_HIGHLIGHT).
2453      * - If item is selected, window is not in focus, but it has style
2454      * TVS_SHOWSELALWAYS - use grey background (COLOR_BTNFACE)
2455      * - Otherwise - use background color
2456      */
2457     if ((wineItem->state & TVIS_DROPHILITED) || ((wineItem == infoPtr->focusedItem) && !(wineItem->state & TVIS_SELECTED)) ||
2458         ((wineItem->state & TVIS_SELECTED) && (!infoPtr->focusedItem) &&
2459          (inFocus || (infoPtr->dwStyle & TVS_SHOWSELALWAYS))))
2460     {
2461         if ((wineItem->state & TVIS_DROPHILITED) || inFocus)
2462         {
2463             nmcdhdr.clrTextBk = GetSysColor(COLOR_HIGHLIGHT);
2464             nmcdhdr.clrText   = GetSysColor(COLOR_HIGHLIGHTTEXT);
2465         }
2466         else
2467         {
2468             nmcdhdr.clrTextBk = GetSysColor(COLOR_BTNFACE);
2469             if (infoPtr->clrText == -1)
2470                 nmcdhdr.clrText = GetSysColor(COLOR_WINDOWTEXT);
2471             else
2472                 nmcdhdr.clrText = infoPtr->clrText;
2473         }
2474     }
2475     else
2476     {
2477         nmcdhdr.clrTextBk = infoPtr->clrBk == -1 ? GetSysColor(COLOR_WINDOW):
2478                                                    infoPtr->clrBk;
2479         if ((infoPtr->dwStyle & TVS_TRACKSELECT) && (wineItem == infoPtr->hotItem))
2480             nmcdhdr.clrText = comctl32_color.clrHighlight;
2481         else if (infoPtr->clrText == -1)
2482             nmcdhdr.clrText = GetSysColor(COLOR_WINDOWTEXT);
2483         else
2484             nmcdhdr.clrText = infoPtr->clrText;
2485     }
2486
2487     hOldFont = SelectObject(hdc, TREEVIEW_FontForItem(infoPtr, wineItem));
2488
2489     /* The custom draw handler can query the text rectangle,
2490      * so get ready. */
2491     /* should already be known, set to 0 when changed */
2492     if (!wineItem->textWidth)
2493         TREEVIEW_ComputeTextWidth(infoPtr, wineItem, hdc);
2494
2495     cditem = 0;
2496
2497     if (infoPtr->cdmode & CDRF_NOTIFYITEMDRAW)
2498     {
2499         cditem = TREEVIEW_SendCustomDrawItemNotify
2500             (infoPtr, hdc, wineItem, CDDS_ITEMPREPAINT, &nmcdhdr);
2501         TRACE("prepaint:cditem-app returns 0x%x\n", cditem);
2502
2503         if (cditem & CDRF_SKIPDEFAULT)
2504         {
2505             SelectObject(hdc, hOldFont);
2506             return;
2507         }
2508     }
2509
2510     if (cditem & CDRF_NEWFONT)
2511         TREEVIEW_ComputeTextWidth(infoPtr, wineItem, hdc);
2512
2513     TREEVIEW_DrawItemLines(infoPtr, hdc, wineItem);
2514
2515     /* Set colors. Custom draw handler can change these so we do this after it. */
2516     oldTextColor = SetTextColor(hdc, nmcdhdr.clrText);
2517     oldTextBkColor = SetBkColor(hdc, nmcdhdr.clrTextBk);
2518
2519     centery = (wineItem->rect.top + wineItem->rect.bottom) / 2;
2520
2521     /*
2522      * Display the images associated with this item
2523      */
2524     {
2525         INT imageIndex;
2526
2527         /* State images are displayed to the left of the Normal image
2528          * image number is in state; zero should be `display no image'.
2529          */
2530         imageIndex = STATEIMAGEINDEX(wineItem->state);
2531
2532         if (infoPtr->himlState && imageIndex)
2533         {
2534             ImageList_Draw(infoPtr->himlState, imageIndex, hdc,
2535                            wineItem->stateOffset,
2536                            centery - infoPtr->stateImageHeight / 2,
2537                            ILD_NORMAL);
2538         }
2539
2540         /* Now, draw the normal image; can be either selected or
2541          * non-selected image.
2542          */
2543
2544         if ((wineItem->state & TVIS_SELECTED) && (wineItem->iSelectedImage >= 0))
2545         {
2546             /* The item is currently selected */
2547             imageIndex = wineItem->iSelectedImage;
2548         }
2549         else
2550         {
2551             /* The item is not selected */
2552             imageIndex = wineItem->iImage;
2553         }
2554
2555         if (infoPtr->himlNormal)
2556         {
2557             int ovlIdx = wineItem->state & TVIS_OVERLAYMASK;
2558
2559             ImageList_Draw(infoPtr->himlNormal, imageIndex, hdc,
2560                            wineItem->imageOffset,
2561                            centery - infoPtr->normalImageHeight / 2,
2562                            ILD_NORMAL | ovlIdx);
2563         }
2564     }
2565
2566
2567     /*
2568      * Display the text associated with this item
2569      */
2570
2571     /* Don't paint item's text if it's being edited */
2572     if (!infoPtr->hwndEdit || (infoPtr->selectedItem != wineItem))
2573     {
2574         if (wineItem->pszText)
2575         {
2576             RECT rcText;
2577
2578             rcText.top = wineItem->rect.top;
2579             rcText.bottom = wineItem->rect.bottom;
2580             rcText.left = wineItem->textOffset;
2581             rcText.right = rcText.left + wineItem->textWidth + 4;
2582
2583             TRACE("drawing text %s at (%s)\n",
2584                   debugstr_w(wineItem->pszText), wine_dbgstr_rect(&rcText));
2585
2586             /* Draw it */
2587             ExtTextOutW(hdc, rcText.left + 2, rcText.top + 1,
2588                         ETO_CLIPPED | ETO_OPAQUE,
2589                         &rcText,
2590                         wineItem->pszText,
2591                         lstrlenW(wineItem->pszText),
2592                         NULL);
2593
2594             /* Draw the box around the selected item */
2595             if ((wineItem == infoPtr->selectedItem) && inFocus)
2596             {
2597                 DrawFocusRect(hdc,&rcText);
2598             }
2599
2600         }
2601     }
2602
2603     /* Draw insertion mark if necessary */
2604
2605     if (infoPtr->insertMarkItem)
2606         TRACE("item:%d,mark:%p\n",
2607               TREEVIEW_GetItemIndex(infoPtr, wineItem),
2608               infoPtr->insertMarkItem);
2609
2610     if (wineItem == infoPtr->insertMarkItem)
2611     {
2612         HPEN hNewPen, hOldPen;
2613         int offset;
2614         int left, right;
2615
2616         hNewPen = CreatePen(PS_SOLID, 2, infoPtr->clrInsertMark);
2617         hOldPen = SelectObject(hdc, hNewPen);
2618
2619         if (infoPtr->insertBeforeorAfter)
2620             offset = wineItem->rect.bottom - 1;
2621         else
2622             offset = wineItem->rect.top + 1;
2623
2624         left = wineItem->textOffset - 2;
2625         right = wineItem->textOffset + wineItem->textWidth + 2;
2626
2627         MoveToEx(hdc, left, offset - 3, NULL);
2628         LineTo(hdc, left, offset + 4);
2629
2630         MoveToEx(hdc, left, offset, NULL);
2631         LineTo(hdc, right + 1, offset);
2632
2633         MoveToEx(hdc, right, offset + 3, NULL);
2634         LineTo(hdc, right, offset - 4);
2635
2636         SelectObject(hdc, hOldPen);
2637         DeleteObject(hNewPen);
2638     }
2639
2640     if (cditem & CDRF_NOTIFYPOSTPAINT)
2641     {
2642         cditem = TREEVIEW_SendCustomDrawItemNotify
2643             (infoPtr, hdc, wineItem, CDDS_ITEMPOSTPAINT, &nmcdhdr);
2644         TRACE("postpaint:cditem-app returns 0x%x\n", cditem);
2645     }
2646
2647     /* Restore the hdc state */
2648     SetTextColor(hdc, oldTextColor);
2649     SetBkColor(hdc, oldTextBkColor);
2650     SelectObject(hdc, hOldFont);
2651 }
2652
2653 /* Computes treeHeight and treeWidth and updates the scroll bars.
2654  */
2655 static void
2656 TREEVIEW_UpdateScrollBars(TREEVIEW_INFO *infoPtr)
2657 {
2658     TREEVIEW_ITEM *wineItem;
2659     HWND hwnd = infoPtr->hwnd;
2660     BOOL vert = FALSE;
2661     BOOL horz = FALSE;
2662     SCROLLINFO si;
2663     LONG scrollX = infoPtr->scrollX;
2664
2665     infoPtr->treeWidth = 0;
2666     infoPtr->treeHeight = 0;
2667
2668     /* We iterate through all visible items in order to get the tree height
2669      * and width */
2670     wineItem = infoPtr->root->firstChild;
2671
2672     while (wineItem != NULL)
2673     {
2674         if (ISVISIBLE(wineItem))
2675         {
2676             /* actually we draw text at textOffset + 2 */
2677             if (2+wineItem->textOffset+wineItem->textWidth > infoPtr->treeWidth)
2678                 infoPtr->treeWidth = wineItem->textOffset+wineItem->textWidth+2;
2679
2680             /* This is scroll-adjusted, but we fix this below. */
2681             infoPtr->treeHeight = wineItem->rect.bottom;
2682         }
2683
2684         wineItem = TREEVIEW_GetNextListItem(infoPtr, wineItem);
2685     }
2686
2687     /* Fix the scroll adjusted treeHeight and treeWidth. */
2688     if (infoPtr->root->firstChild)
2689         infoPtr->treeHeight -= infoPtr->root->firstChild->rect.top;
2690
2691     infoPtr->treeWidth += infoPtr->scrollX;
2692
2693     if (infoPtr->dwStyle & TVS_NOSCROLL) return;
2694
2695     /* Adding one scroll bar may take up enough space that it forces us
2696      * to add the other as well. */
2697     if (infoPtr->treeHeight > infoPtr->clientHeight)
2698     {
2699         vert = TRUE;
2700
2701         if (infoPtr->treeWidth
2702             > infoPtr->clientWidth - GetSystemMetrics(SM_CXVSCROLL))
2703             horz = TRUE;
2704     }
2705     else if (infoPtr->treeWidth > infoPtr->clientWidth || infoPtr->scrollX > 0)
2706         horz = TRUE;
2707
2708     if (!vert && horz && infoPtr->treeHeight
2709         > infoPtr->clientHeight - GetSystemMetrics(SM_CYVSCROLL))
2710         vert = TRUE;
2711
2712     if (horz && (infoPtr->dwStyle & TVS_NOHSCROLL)) horz = FALSE;
2713
2714     si.cbSize = sizeof(SCROLLINFO);
2715     si.fMask  = SIF_POS|SIF_RANGE|SIF_PAGE;
2716     si.nMin   = 0;
2717
2718     if (vert)
2719     {
2720         si.nPage = TREEVIEW_GetVisibleCount(infoPtr);
2721        if ( si.nPage && NULL != infoPtr->firstVisible)
2722        {
2723            si.nPos  = infoPtr->firstVisible->visibleOrder;
2724            si.nMax  = infoPtr->maxVisibleOrder - 1;
2725
2726            SetScrollInfo(hwnd, SB_VERT, &si, TRUE);
2727
2728            if (!(infoPtr->uInternalStatus & TV_VSCROLL))
2729                ShowScrollBar(hwnd, SB_VERT, TRUE);
2730            infoPtr->uInternalStatus |= TV_VSCROLL;
2731        }
2732        else
2733        {
2734            if (infoPtr->uInternalStatus & TV_VSCROLL)
2735                ShowScrollBar(hwnd, SB_VERT, FALSE);
2736            infoPtr->uInternalStatus &= ~TV_VSCROLL;
2737        }
2738     }
2739     else
2740     {
2741         if (infoPtr->uInternalStatus & TV_VSCROLL)
2742             ShowScrollBar(hwnd, SB_VERT, FALSE);
2743         infoPtr->uInternalStatus &= ~TV_VSCROLL;
2744     }
2745
2746     if (horz)
2747     {
2748         si.nPage = infoPtr->clientWidth;
2749         si.nPos  = infoPtr->scrollX;
2750         si.nMax  = infoPtr->treeWidth - 1;
2751
2752         if (si.nPos > si.nMax - max( si.nPage-1, 0 ))
2753         {
2754            si.nPos = si.nMax - max( si.nPage-1, 0 );
2755            scrollX = si.nPos;
2756         }
2757
2758         if (!(infoPtr->uInternalStatus & TV_HSCROLL))
2759             ShowScrollBar(hwnd, SB_HORZ, TRUE);
2760         infoPtr->uInternalStatus |= TV_HSCROLL;
2761
2762         SetScrollInfo(hwnd, SB_HORZ, &si, TRUE);
2763         TREEVIEW_HScroll(infoPtr,
2764                         MAKEWPARAM(SB_THUMBPOSITION, scrollX));
2765     }
2766     else
2767     {
2768         if (infoPtr->uInternalStatus & TV_HSCROLL)
2769             ShowScrollBar(hwnd, SB_HORZ, FALSE);
2770         infoPtr->uInternalStatus &= ~TV_HSCROLL;
2771
2772         scrollX = 0;
2773         if (infoPtr->scrollX != 0)
2774         {
2775             TREEVIEW_HScroll(infoPtr,
2776                             MAKEWPARAM(SB_THUMBPOSITION, scrollX));
2777         }
2778     }
2779
2780     if (!horz)
2781         infoPtr->uInternalStatus &= ~TV_HSCROLL;
2782 }
2783
2784 /* CtrlSpy doesn't mention this, but CorelDRAW's object manager needs it. */
2785 static LRESULT
2786 TREEVIEW_EraseBackground(const TREEVIEW_INFO *infoPtr, HDC hDC)
2787 {
2788     HBRUSH hBrush;
2789     COLORREF clrBk = infoPtr->clrBk == -1 ? GetSysColor(COLOR_WINDOW):
2790                                             infoPtr->clrBk;
2791     RECT rect;
2792
2793     hBrush =  CreateSolidBrush(clrBk);
2794     GetClientRect(infoPtr->hwnd, &rect);
2795     FillRect(hDC, &rect, hBrush);
2796     DeleteObject(hBrush);
2797
2798     return 1;
2799 }
2800
2801 static void
2802 TREEVIEW_Refresh(TREEVIEW_INFO *infoPtr, HDC hdc, const RECT *rc)
2803 {
2804     HWND hwnd = infoPtr->hwnd;
2805     RECT rect = *rc;
2806     TREEVIEW_ITEM *wineItem;
2807
2808     if (infoPtr->clientHeight == 0 || infoPtr->clientWidth == 0)
2809     {
2810         TRACE("empty window\n");
2811         return;
2812     }
2813
2814     infoPtr->cdmode = TREEVIEW_SendCustomDrawNotify(infoPtr, CDDS_PREPAINT,
2815                                                     hdc, rect);
2816
2817     if (infoPtr->cdmode == CDRF_SKIPDEFAULT)
2818     {
2819         ReleaseDC(hwnd, hdc);
2820         return;
2821     }
2822
2823     for (wineItem = infoPtr->root->firstChild;
2824          wineItem != NULL;
2825          wineItem = TREEVIEW_GetNextListItem(infoPtr, wineItem))
2826     {
2827         if (ISVISIBLE(wineItem))
2828         {
2829             /* Avoid unneeded calculations */
2830             if (wineItem->rect.top > rect.bottom)
2831                 break;
2832             if (wineItem->rect.bottom < rect.top)
2833                 continue;
2834
2835             TREEVIEW_DrawItem(infoPtr, hdc, wineItem);
2836         }
2837     }
2838
2839     TREEVIEW_UpdateScrollBars(infoPtr);
2840
2841     if (infoPtr->cdmode & CDRF_NOTIFYPOSTPAINT)
2842         infoPtr->cdmode =
2843             TREEVIEW_SendCustomDrawNotify(infoPtr, CDDS_POSTPAINT, hdc, rect);
2844 }
2845
2846 static void
2847 TREEVIEW_Invalidate(const TREEVIEW_INFO *infoPtr, const TREEVIEW_ITEM *item)
2848 {
2849     if (item != NULL)
2850         InvalidateRect(infoPtr->hwnd, &item->rect, TRUE);
2851     else
2852         InvalidateRect(infoPtr->hwnd, NULL, TRUE);
2853 }
2854
2855 static LRESULT
2856 TREEVIEW_Paint(TREEVIEW_INFO *infoPtr, WPARAM wParam)
2857 {
2858     HDC hdc;
2859     PAINTSTRUCT ps;
2860     RECT rc;
2861
2862     TRACE("\n");
2863
2864     if (wParam)
2865     {
2866         hdc = (HDC)wParam;
2867         GetClientRect(infoPtr->hwnd, &rc);
2868         TREEVIEW_EraseBackground(infoPtr, hdc);
2869     }
2870     else
2871     {
2872         hdc = BeginPaint(infoPtr->hwnd, &ps);
2873         rc = ps.rcPaint;
2874     }
2875
2876     if(infoPtr->bRedraw) /* WM_SETREDRAW sets bRedraw */
2877         TREEVIEW_Refresh(infoPtr, hdc, &rc);
2878
2879     if (!wParam)
2880         EndPaint(infoPtr->hwnd, &ps);
2881
2882     return 0;
2883 }
2884
2885
2886 /* Sorting **************************************************************/
2887
2888 /***************************************************************************
2889  * Forward the DPA local callback to the treeview owner callback
2890  */
2891 static INT WINAPI
2892 TREEVIEW_CallBackCompare(const TREEVIEW_ITEM *first, const TREEVIEW_ITEM *second,
2893                          const TVSORTCB *pCallBackSort)
2894 {
2895     /* Forward the call to the client-defined callback */
2896     return pCallBackSort->lpfnCompare(first->lParam,
2897                                       second->lParam,
2898                                       pCallBackSort->lParam);
2899 }
2900
2901 /***************************************************************************
2902  * Treeview native sort routine: sort on item text.
2903  */
2904 static INT WINAPI
2905 TREEVIEW_SortOnName(TREEVIEW_ITEM *first, TREEVIEW_ITEM *second,
2906                     const TREEVIEW_INFO *infoPtr)
2907 {
2908     TREEVIEW_UpdateDispInfo(infoPtr, first, TVIF_TEXT);
2909     TREEVIEW_UpdateDispInfo(infoPtr, second, TVIF_TEXT);
2910
2911     if(first->pszText && second->pszText)
2912         return lstrcmpiW(first->pszText, second->pszText);
2913     else if(first->pszText)
2914         return -1;
2915     else if(second->pszText)
2916         return 1;
2917     else
2918         return 0;
2919 }
2920
2921 /* Returns the number of physical children belonging to item. */
2922 static INT
2923 TREEVIEW_CountChildren(const TREEVIEW_ITEM *item)
2924 {
2925     INT cChildren = 0;
2926     HTREEITEM hti;
2927
2928     for (hti = item->firstChild; hti != NULL; hti = hti->nextSibling)
2929         cChildren++;
2930
2931     return cChildren;
2932 }
2933
2934 /* Returns a DPA containing a pointer to each physical child of item in
2935  * sibling order. If item has no children, an empty DPA is returned. */
2936 static HDPA
2937 TREEVIEW_BuildChildDPA(const TREEVIEW_ITEM *item)
2938 {
2939     HTREEITEM child = item->firstChild;
2940
2941     HDPA list = DPA_Create(8);
2942     if (list == 0) return NULL;
2943
2944     for (child = item->firstChild; child != NULL; child = child->nextSibling)
2945     {
2946         if (DPA_InsertPtr(list, INT_MAX, child) == -1)
2947         {
2948             DPA_Destroy(list);
2949             return NULL;
2950         }
2951     }
2952
2953     return list;
2954 }
2955
2956 /***************************************************************************
2957  * Setup the treeview structure with regards of the sort method
2958  * and sort the children of the TV item specified in lParam
2959  * fRecurse: currently unused. Should be zero.
2960  * parent: if pSort!=NULL, should equal pSort->hParent.
2961  *         otherwise, item which child items are to be sorted.
2962  * pSort:  sort method info. if NULL, sort on item text.
2963  *         if non-NULL, sort on item's lParam content, and let the
2964  *         application decide what that means. See also TVM_SORTCHILDRENCB.
2965  */
2966
2967 static LRESULT
2968 TREEVIEW_Sort(TREEVIEW_INFO *infoPtr, HTREEITEM parent,
2969               LPTVSORTCB pSort)
2970 {
2971     INT cChildren;
2972     PFNDPACOMPARE pfnCompare;
2973     LPARAM lpCompare;
2974
2975     /* undocumented feature: TVI_ROOT or NULL means `sort the whole tree' */
2976     if (parent == TVI_ROOT || parent == NULL)
2977         parent = infoPtr->root;
2978
2979     /* Check for a valid handle to the parent item */
2980     if (!TREEVIEW_ValidItem(infoPtr, parent))
2981     {
2982         ERR("invalid item hParent=%p\n", parent);
2983         return FALSE;
2984     }
2985
2986     if (pSort)
2987     {
2988         pfnCompare = (PFNDPACOMPARE)TREEVIEW_CallBackCompare;
2989         lpCompare = (LPARAM)pSort;
2990     }
2991     else
2992     {
2993         pfnCompare = (PFNDPACOMPARE)TREEVIEW_SortOnName;
2994         lpCompare = (LPARAM)infoPtr;
2995     }
2996
2997     cChildren = TREEVIEW_CountChildren(parent);
2998
2999     /* Make sure there is something to sort */
3000     if (cChildren > 1)
3001     {
3002         /* TREEVIEW_ITEM rechaining */
3003         INT count = 0;
3004         HTREEITEM item = 0;
3005         HTREEITEM nextItem = 0;
3006         HTREEITEM prevItem = 0;
3007
3008         HDPA sortList = TREEVIEW_BuildChildDPA(parent);
3009
3010         if (sortList == NULL)
3011             return FALSE;
3012
3013         /* let DPA sort the list */
3014         DPA_Sort(sortList, pfnCompare, lpCompare);
3015
3016         /* The order of DPA entries has been changed, so fixup the
3017          * nextSibling and prevSibling pointers. */
3018
3019         item = DPA_GetPtr(sortList, count++);
3020         while ((nextItem = DPA_GetPtr(sortList, count++)) != NULL)
3021         {
3022             /* link the two current item together */
3023             item->nextSibling = nextItem;
3024             nextItem->prevSibling = item;
3025
3026             if (prevItem == NULL)
3027             {
3028                 /* this is the first item, update the parent */
3029                 parent->firstChild = item;
3030                 item->prevSibling = NULL;
3031             }
3032             else
3033             {
3034                 /* fix the back chaining */
3035                 item->prevSibling = prevItem;
3036             }
3037
3038             /* get ready for the next one */
3039             prevItem = item;
3040             item = nextItem;
3041         }
3042
3043         /* the last item is pointed to by item and never has a sibling */
3044         item->nextSibling = NULL;
3045         parent->lastChild = item;
3046
3047         DPA_Destroy(sortList);
3048
3049         TREEVIEW_VerifyTree(infoPtr);
3050
3051         if (parent->state & TVIS_EXPANDED)
3052         {
3053             int visOrder = infoPtr->firstVisible->visibleOrder;
3054
3055         if (parent == infoPtr->root)
3056             TREEVIEW_RecalculateVisibleOrder(infoPtr, NULL);
3057         else
3058             TREEVIEW_RecalculateVisibleOrder(infoPtr, parent);
3059
3060             if (TREEVIEW_IsChildOf(parent, infoPtr->firstVisible))
3061             {
3062                 TREEVIEW_ITEM *item;
3063
3064                 for (item = infoPtr->root->firstChild; item != NULL;
3065                      item = TREEVIEW_GetNextListItem(infoPtr, item))
3066                 {
3067                     if (item->visibleOrder == visOrder)
3068                         break;
3069                 }
3070
3071                 if (!item) item = parent->firstChild;
3072                 TREEVIEW_SetFirstVisible(infoPtr, item, FALSE);
3073             }
3074
3075             TREEVIEW_Invalidate(infoPtr, NULL);
3076         }
3077
3078         return TRUE;
3079     }
3080     return FALSE;
3081 }
3082
3083
3084 /***************************************************************************
3085  * Setup the treeview structure with regards of the sort method
3086  * and sort the children of the TV item specified in lParam
3087  */
3088 static LRESULT
3089 TREEVIEW_SortChildrenCB(TREEVIEW_INFO *infoPtr, LPTVSORTCB pSort)
3090 {
3091     return TREEVIEW_Sort(infoPtr, pSort->hParent, pSort);
3092 }
3093
3094
3095 /***************************************************************************
3096  * Sort the children of the TV item specified in lParam.
3097  */
3098 static LRESULT
3099 TREEVIEW_SortChildren(TREEVIEW_INFO *infoPtr, LPARAM lParam)
3100 {
3101     return TREEVIEW_Sort(infoPtr, (HTREEITEM)lParam, NULL);
3102 }
3103
3104
3105 /* Expansion/Collapse ***************************************************/
3106
3107 static BOOL
3108 TREEVIEW_SendExpanding(const TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *wineItem,
3109                        UINT action)
3110 {
3111     return !TREEVIEW_SendTreeviewNotify(infoPtr, TVN_ITEMEXPANDINGW, action,
3112                                         TVIF_HANDLE | TVIF_STATE | TVIF_PARAM
3113                                         | TVIF_IMAGE | TVIF_SELECTEDIMAGE,
3114                                         0, wineItem);
3115 }
3116
3117 static VOID
3118 TREEVIEW_SendExpanded(const TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *wineItem,
3119                       UINT action)
3120 {
3121     TREEVIEW_SendTreeviewNotify(infoPtr, TVN_ITEMEXPANDEDW, action,
3122                                 TVIF_HANDLE | TVIF_STATE | TVIF_PARAM
3123                                 | TVIF_IMAGE | TVIF_SELECTEDIMAGE,
3124                                 0, wineItem);
3125 }
3126
3127
3128 /* This corresponds to TVM_EXPAND with TVE_COLLAPSE.
3129  * bRemoveChildren corresponds to TVE_COLLAPSERESET. */
3130 static BOOL
3131 TREEVIEW_Collapse(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *wineItem,
3132                   BOOL bRemoveChildren, BOOL bUser)
3133 {
3134     UINT action = TVE_COLLAPSE | (bRemoveChildren ? TVE_COLLAPSERESET : 0);
3135     BOOL bSetSelection, bSetFirstVisible;
3136     RECT scrollRect;
3137     LONG scrollDist = 0;
3138     TREEVIEW_ITEM *nextItem = NULL, *tmpItem;
3139
3140     TRACE("TVE_COLLAPSE %p %s\n", wineItem, TREEVIEW_ItemName(wineItem));
3141
3142     if (!(wineItem->state & TVIS_EXPANDED))
3143         return FALSE;
3144
3145     if (bUser || !(wineItem->state & TVIS_EXPANDEDONCE))
3146         TREEVIEW_SendExpanding(infoPtr, wineItem, action);
3147
3148     if (wineItem->firstChild == NULL)
3149         return FALSE;
3150
3151     wineItem->state &= ~TVIS_EXPANDED;
3152
3153     if (bUser || !(wineItem->state & TVIS_EXPANDEDONCE))
3154         TREEVIEW_SendExpanded(infoPtr, wineItem, action);
3155
3156     bSetSelection = (infoPtr->selectedItem != NULL
3157                      && TREEVIEW_IsChildOf(wineItem, infoPtr->selectedItem));
3158
3159     bSetFirstVisible = (infoPtr->firstVisible != NULL
3160                         && TREEVIEW_IsChildOf(wineItem, infoPtr->firstVisible));
3161
3162     tmpItem = wineItem;
3163     while (tmpItem)
3164     {
3165         if (tmpItem->nextSibling)
3166         {
3167             nextItem = tmpItem->nextSibling;
3168             break;
3169         }
3170         tmpItem = tmpItem->parent;
3171     }
3172
3173     if (nextItem)
3174         scrollDist = nextItem->rect.top;
3175
3176     if (bRemoveChildren)
3177     {
3178         INT old_cChildren = wineItem->cChildren;
3179         TRACE("TVE_COLLAPSERESET\n");
3180         wineItem->state &= ~TVIS_EXPANDEDONCE;
3181         TREEVIEW_RemoveAllChildren(infoPtr, wineItem);
3182         wineItem->cChildren = old_cChildren;
3183     }
3184
3185     if (wineItem->firstChild)
3186     {
3187         TREEVIEW_ITEM *item, *sibling;
3188
3189         sibling = TREEVIEW_GetNextListItem(infoPtr, wineItem);
3190
3191         for (item = wineItem->firstChild; item != sibling;
3192              item = TREEVIEW_GetNextListItem(infoPtr, item))
3193         {
3194             item->visibleOrder = -1;
3195         }
3196     }
3197
3198     TREEVIEW_RecalculateVisibleOrder(infoPtr, wineItem);
3199
3200     if (nextItem)
3201         scrollDist = -(scrollDist - nextItem->rect.top);
3202
3203     if (bSetSelection)
3204     {
3205         /* Don't call DoSelectItem, it sends notifications. */
3206         if (TREEVIEW_ValidItem(infoPtr, infoPtr->selectedItem))
3207             infoPtr->selectedItem->state &= ~TVIS_SELECTED;
3208         wineItem->state |= TVIS_SELECTED;
3209         infoPtr->selectedItem = wineItem;
3210     }
3211
3212     TREEVIEW_UpdateScrollBars(infoPtr);
3213
3214     scrollRect.left = 0;
3215     scrollRect.right = infoPtr->clientWidth;
3216     scrollRect.bottom = infoPtr->clientHeight;
3217
3218     if (nextItem)
3219     {
3220         scrollRect.top = nextItem->rect.top;
3221
3222         ScrollWindowEx (infoPtr->hwnd, 0, scrollDist, &scrollRect, &scrollRect,
3223                        NULL, NULL, SW_ERASE | SW_INVALIDATE);
3224         TREEVIEW_Invalidate(infoPtr, wineItem);
3225     } else {
3226         scrollRect.top = wineItem->rect.top;
3227         InvalidateRect(infoPtr->hwnd, &scrollRect, TRUE);
3228     }
3229
3230     TREEVIEW_SetFirstVisible(infoPtr,
3231                              bSetFirstVisible ? wineItem : infoPtr->firstVisible,
3232                              TRUE);
3233
3234     return TRUE;
3235 }
3236
3237 static BOOL
3238 TREEVIEW_Expand(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *wineItem,
3239                 BOOL bExpandPartial, BOOL bUser)
3240 {
3241     LONG scrollDist;
3242     LONG orgNextTop = 0;
3243     RECT scrollRect;
3244     TREEVIEW_ITEM *nextItem, *tmpItem;
3245
3246     TRACE("\n");
3247
3248     if (wineItem->state & TVIS_EXPANDED)
3249        return TRUE;
3250
3251     tmpItem = wineItem; nextItem = NULL;
3252     while (tmpItem)
3253     {
3254         if (tmpItem->nextSibling)
3255         {
3256             nextItem = tmpItem->nextSibling;
3257             break;
3258         }
3259         tmpItem = tmpItem->parent;
3260     }
3261
3262     if (nextItem)
3263         orgNextTop = nextItem->rect.top;
3264
3265     TRACE("TVE_EXPAND %p %s\n", wineItem, TREEVIEW_ItemName(wineItem));
3266
3267     if (bUser || ((wineItem->cChildren != 0) &&
3268                   !(wineItem->state & TVIS_EXPANDEDONCE)))
3269     {
3270         if (!TREEVIEW_SendExpanding(infoPtr, wineItem, TVE_EXPAND))
3271         {
3272             TRACE("  TVN_ITEMEXPANDING returned TRUE, exiting...\n");
3273             return FALSE;
3274         }
3275
3276         if (!wineItem->firstChild)
3277             return FALSE;
3278
3279         wineItem->state |= TVIS_EXPANDED;
3280         TREEVIEW_SendExpanded(infoPtr, wineItem, TVE_EXPAND);
3281         wineItem->state |= TVIS_EXPANDEDONCE;
3282     }
3283     else
3284     {
3285         if (!wineItem->firstChild)
3286             return FALSE;
3287
3288         /* this item has already been expanded */
3289         wineItem->state |= TVIS_EXPANDED;
3290     }
3291
3292     if (bExpandPartial)
3293         FIXME("TVE_EXPANDPARTIAL not implemented\n");
3294
3295     TREEVIEW_RecalculateVisibleOrder(infoPtr, wineItem);
3296     TREEVIEW_UpdateSubTree(infoPtr, wineItem);
3297     TREEVIEW_UpdateScrollBars(infoPtr);
3298
3299     scrollRect.left = 0;
3300     scrollRect.bottom = infoPtr->treeHeight;
3301     scrollRect.right = infoPtr->clientWidth;
3302     if (nextItem)
3303     {
3304         scrollDist = nextItem->rect.top - orgNextTop;
3305         scrollRect.top = orgNextTop;
3306
3307         ScrollWindowEx (infoPtr->hwnd, 0, scrollDist, &scrollRect, NULL,
3308                        NULL, NULL, SW_ERASE | SW_INVALIDATE);
3309         TREEVIEW_Invalidate (infoPtr, wineItem);
3310     } else {
3311         scrollRect.top = wineItem->rect.top;
3312         InvalidateRect(infoPtr->hwnd, &scrollRect, FALSE);
3313     }
3314
3315     /* Scroll up so that as many children as possible are visible.
3316      * This fails when expanding causes an HScroll bar to appear, but we
3317      * don't know that yet, so the last item is obscured. */
3318     if (wineItem->firstChild != NULL)
3319     {
3320         int nChildren = wineItem->lastChild->visibleOrder
3321             - wineItem->firstChild->visibleOrder + 1;
3322
3323         int visible_pos = wineItem->visibleOrder
3324             - infoPtr->firstVisible->visibleOrder;
3325
3326         int rows_below = TREEVIEW_GetVisibleCount(infoPtr) - visible_pos - 1;
3327
3328         if (visible_pos > 0 && nChildren > rows_below)
3329         {
3330             int scroll = nChildren - rows_below;
3331
3332             if (scroll > visible_pos)
3333                 scroll = visible_pos;
3334
3335             if (scroll > 0)
3336             {
3337                 TREEVIEW_ITEM *newFirstVisible
3338                     = TREEVIEW_GetListItem(infoPtr, infoPtr->firstVisible,
3339                                            scroll);
3340
3341
3342                 TREEVIEW_SetFirstVisible(infoPtr, newFirstVisible, TRUE);
3343             }
3344         }
3345     }
3346
3347     return TRUE;
3348 }
3349
3350 static BOOL
3351 TREEVIEW_Toggle(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *wineItem, BOOL bUser)
3352 {
3353     TRACE("\n");
3354
3355     if (wineItem->state & TVIS_EXPANDED)
3356         return TREEVIEW_Collapse(infoPtr, wineItem, FALSE, bUser);
3357     else
3358         return TREEVIEW_Expand(infoPtr, wineItem, FALSE, bUser);
3359 }
3360
3361 static VOID
3362 TREEVIEW_ExpandAll(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item)
3363 {
3364     TREEVIEW_Expand(infoPtr, item, FALSE, TRUE);
3365
3366     for (item = item->firstChild; item != NULL; item = item->nextSibling)
3367     {
3368         if (TREEVIEW_HasChildren(infoPtr, item))
3369             TREEVIEW_ExpandAll(infoPtr, item);
3370     }
3371 }
3372
3373 /* Note:If the specified item is the child of a collapsed parent item,
3374    the parent's list of child items is (recursively) expanded to reveal the
3375    specified item. This is mentioned for TREEVIEW_SelectItem; don't
3376    know if it also applies here.
3377 */
3378
3379 static LRESULT
3380 TREEVIEW_ExpandMsg(TREEVIEW_INFO *infoPtr, UINT flag, HTREEITEM wineItem)
3381 {
3382     if (!TREEVIEW_ValidItem(infoPtr, wineItem))
3383         return 0;
3384
3385     TRACE("For (%s) item:%d, flags %x, state:%d\n",
3386               TREEVIEW_ItemName(wineItem), flag,
3387               TREEVIEW_GetItemIndex(infoPtr, wineItem), wineItem->state);
3388
3389     switch (flag & TVE_TOGGLE)
3390     {
3391     case TVE_COLLAPSE:
3392         return TREEVIEW_Collapse(infoPtr, wineItem, flag & TVE_COLLAPSERESET,
3393                                  FALSE);
3394
3395     case TVE_EXPAND:
3396         return TREEVIEW_Expand(infoPtr, wineItem, flag & TVE_EXPANDPARTIAL,
3397                                FALSE);
3398
3399     case TVE_TOGGLE:
3400         return TREEVIEW_Toggle(infoPtr, wineItem, TRUE);
3401
3402     default:
3403         return 0;
3404     }
3405
3406 #if 0
3407     TRACE("Exiting, Item %p state is now %d...\n", wineItem, wineItem->state);
3408 #endif
3409 }
3410
3411 /* Hit-Testing **********************************************************/
3412
3413 static TREEVIEW_ITEM *
3414 TREEVIEW_HitTestPoint(const TREEVIEW_INFO *infoPtr, POINT pt)
3415 {
3416     TREEVIEW_ITEM *wineItem;
3417     LONG row;
3418
3419     if (!infoPtr->firstVisible)
3420         return NULL;
3421
3422     row = pt.y / infoPtr->uItemHeight + infoPtr->firstVisible->visibleOrder;
3423
3424     for (wineItem = infoPtr->firstVisible; wineItem != NULL;
3425          wineItem = TREEVIEW_GetNextListItem(infoPtr, wineItem))
3426     {
3427         if (row >= wineItem->visibleOrder
3428             && row < wineItem->visibleOrder + wineItem->iIntegral)
3429             break;
3430     }
3431
3432     return wineItem;
3433 }
3434
3435 static LRESULT
3436 TREEVIEW_HitTest(const TREEVIEW_INFO *infoPtr, LPTVHITTESTINFO lpht)
3437 {
3438     TREEVIEW_ITEM *wineItem;
3439     RECT rect;
3440     UINT status;
3441     LONG x, y;
3442
3443     lpht->hItem = 0;
3444     GetClientRect(infoPtr->hwnd, &rect);
3445     status = 0;
3446     x = lpht->pt.x;
3447     y = lpht->pt.y;
3448
3449     if (x < rect.left)
3450     {
3451         status |= TVHT_TOLEFT;
3452     }
3453     else if (x > rect.right)
3454     {
3455         status |= TVHT_TORIGHT;
3456     }
3457
3458     if (y < rect.top)
3459     {
3460         status |= TVHT_ABOVE;
3461     }
3462     else if (y > rect.bottom)
3463     {
3464         status |= TVHT_BELOW;
3465     }
3466
3467     if (status)
3468     {
3469         lpht->flags = status;
3470         return 0;
3471     }
3472
3473     wineItem = TREEVIEW_HitTestPoint(infoPtr, lpht->pt);
3474     if (!wineItem)
3475     {
3476         lpht->flags = TVHT_NOWHERE;
3477         return 0;
3478     }
3479
3480     if (x >= wineItem->textOffset + wineItem->textWidth)
3481     {
3482         lpht->flags = TVHT_ONITEMRIGHT;
3483     }
3484     else if (x >= wineItem->textOffset)
3485     {
3486         lpht->flags = TVHT_ONITEMLABEL;
3487     }
3488     else if (x >= wineItem->imageOffset)
3489     {
3490         lpht->flags = TVHT_ONITEMICON;
3491     }
3492     else if (x >= wineItem->stateOffset)
3493     {
3494         lpht->flags = TVHT_ONITEMSTATEICON;
3495     }
3496     else if (x >= wineItem->linesOffset && infoPtr->dwStyle & TVS_HASBUTTONS)
3497     {
3498         lpht->flags = TVHT_ONITEMBUTTON;
3499     }
3500     else
3501     {
3502         lpht->flags = TVHT_ONITEMINDENT;
3503     }
3504
3505     lpht->hItem = wineItem;
3506     TRACE("(%d,%d):result %x\n", lpht->pt.x, lpht->pt.y, lpht->flags);
3507
3508     return (LRESULT)wineItem;
3509 }
3510
3511 /* Item Label Editing ***************************************************/
3512
3513 static LRESULT
3514 TREEVIEW_GetEditControl(const TREEVIEW_INFO *infoPtr)
3515 {
3516     return (LRESULT)infoPtr->hwndEdit;
3517 }
3518
3519 static LRESULT CALLBACK
3520 TREEVIEW_Edit_SubclassProc(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
3521 {
3522     TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(GetParent(hwnd));
3523     BOOL bCancel = FALSE;
3524     LRESULT rc;
3525
3526     switch (uMsg)
3527     {
3528     case WM_PAINT:
3529          TRACE("WM_PAINT start\n");
3530          rc = CallWindowProcW(infoPtr->wpEditOrig, hwnd, uMsg, wParam,
3531                                  lParam);
3532          TRACE("WM_PAINT done\n");
3533          return rc;
3534
3535     case WM_KILLFOCUS:
3536         if (infoPtr->bIgnoreEditKillFocus)
3537             return TRUE;
3538         break;
3539
3540     case WM_GETDLGCODE:
3541         return DLGC_WANTARROWS | DLGC_WANTALLKEYS;
3542
3543     case WM_KEYDOWN:
3544         if (wParam == (WPARAM)VK_ESCAPE)
3545         {
3546             bCancel = TRUE;
3547             break;
3548         }
3549         else if (wParam == (WPARAM)VK_RETURN)
3550         {
3551             break;
3552         }
3553
3554         /* fall through */
3555     default:
3556         return CallWindowProcW(infoPtr->wpEditOrig, hwnd, uMsg, wParam, lParam);
3557     }
3558
3559     /* Processing TVN_ENDLABELEDIT message could kill the focus       */
3560     /* eg. Using a messagebox                                         */
3561
3562     infoPtr->bIgnoreEditKillFocus = TRUE;
3563     TREEVIEW_EndEditLabelNow(infoPtr, bCancel || !infoPtr->bLabelChanged);
3564     infoPtr->bIgnoreEditKillFocus = FALSE;
3565
3566     return 0;
3567 }
3568
3569
3570 /* should handle edit control messages here */
3571
3572 static LRESULT
3573 TREEVIEW_Command(TREEVIEW_INFO *infoPtr, WPARAM wParam, LPARAM lParam)
3574 {
3575     TRACE("%lx %ld\n", wParam, lParam);
3576
3577     switch (HIWORD(wParam))
3578     {
3579     case EN_UPDATE:
3580         {
3581             /*
3582              * Adjust the edit window size
3583              */
3584             WCHAR buffer[1024];
3585             TREEVIEW_ITEM *editItem = infoPtr->selectedItem;
3586             HDC hdc = GetDC(infoPtr->hwndEdit);
3587             SIZE sz;
3588             HFONT hFont, hOldFont = 0;
3589
3590             infoPtr->bLabelChanged = TRUE;
3591
3592             GetWindowTextW(infoPtr->hwndEdit, buffer, sizeof(buffer)/sizeof(buffer[0]));
3593
3594             /* Select font to get the right dimension of the string */
3595             hFont = (HFONT)SendMessageW(infoPtr->hwndEdit, WM_GETFONT, 0, 0);
3596
3597             if (hFont != 0)
3598             {
3599                 hOldFont = SelectObject(hdc, hFont);
3600             }
3601
3602             if (GetTextExtentPoint32W(hdc, buffer, strlenW(buffer), &sz))
3603             {
3604                 TEXTMETRICW textMetric;
3605
3606                 /* Add Extra spacing for the next character */
3607                 GetTextMetricsW(hdc, &textMetric);
3608                 sz.cx += (textMetric.tmMaxCharWidth * 2);
3609
3610                 sz.cx = max(sz.cx, textMetric.tmMaxCharWidth * 3);
3611                 sz.cx = min(sz.cx,
3612                             infoPtr->clientWidth - editItem->textOffset + 2);
3613
3614                 SetWindowPos(infoPtr->hwndEdit,
3615                              HWND_TOP,
3616                              0,
3617                              0,
3618                              sz.cx,
3619                              editItem->rect.bottom - editItem->rect.top + 3,
3620                              SWP_NOMOVE | SWP_DRAWFRAME);
3621             }
3622
3623             if (hFont != 0)
3624             {
3625                 SelectObject(hdc, hOldFont);
3626             }
3627
3628             ReleaseDC(infoPtr->hwnd, hdc);
3629             break;
3630         }
3631
3632     default:
3633         return SendMessageW(infoPtr->hwndNotify, WM_COMMAND, wParam, lParam);
3634     }
3635
3636     return 0;
3637 }
3638
3639 static HWND
3640 TREEVIEW_EditLabel(TREEVIEW_INFO *infoPtr, HTREEITEM hItem)
3641 {
3642     HWND hwnd = infoPtr->hwnd;
3643     HWND hwndEdit;
3644     SIZE sz;
3645     TREEVIEW_ITEM *editItem = hItem;
3646     HINSTANCE hinst = (HINSTANCE)GetWindowLongPtrW(hwnd, GWLP_HINSTANCE);
3647     HDC hdc;
3648     HFONT hOldFont=0;
3649     TEXTMETRICW textMetric;
3650     static const WCHAR EditW[] = {'E','d','i','t',0};
3651
3652     TRACE("%p %p\n", hwnd, hItem);
3653     if (!TREEVIEW_ValidItem(infoPtr, editItem))
3654         return NULL;
3655
3656     if (infoPtr->hwndEdit)
3657         return infoPtr->hwndEdit;
3658
3659     infoPtr->bLabelChanged = FALSE;
3660
3661     /* Make sure that edit item is selected */
3662     TREEVIEW_DoSelectItem(infoPtr, TVGN_CARET, hItem, TVC_UNKNOWN);
3663     TREEVIEW_EnsureVisible(infoPtr, hItem, TRUE);
3664
3665     TREEVIEW_UpdateDispInfo(infoPtr, editItem, TVIF_TEXT);
3666
3667     hdc = GetDC(hwnd);
3668     /* Select the font to get appropriate metric dimensions */
3669     if (infoPtr->hFont != 0)
3670     {
3671         hOldFont = SelectObject(hdc, infoPtr->hFont);
3672     }
3673
3674     /* Get string length in pixels */
3675     if (editItem->pszText)
3676         GetTextExtentPoint32W(hdc, editItem->pszText, strlenW(editItem->pszText),
3677                         &sz);
3678     else
3679         GetTextExtentPoint32A(hdc, "", 0, &sz);
3680
3681     /* Add Extra spacing for the next character */
3682     GetTextMetricsW(hdc, &textMetric);
3683     sz.cx += (textMetric.tmMaxCharWidth * 2);
3684
3685     sz.cx = max(sz.cx, textMetric.tmMaxCharWidth * 3);
3686     sz.cx = min(sz.cx, infoPtr->clientWidth - editItem->textOffset + 2);
3687
3688     if (infoPtr->hFont != 0)
3689     {
3690         SelectObject(hdc, hOldFont);
3691     }
3692
3693     ReleaseDC(hwnd, hdc);
3694     hwndEdit = CreateWindowExW(WS_EX_LEFT,
3695                                EditW,
3696                                0,
3697                                WS_CHILD | WS_BORDER | ES_AUTOHSCROLL |
3698                                WS_CLIPSIBLINGS | ES_WANTRETURN |
3699                                ES_LEFT, editItem->textOffset - 2,
3700                                editItem->rect.top - 1, sz.cx + 3,
3701                                editItem->rect.bottom -
3702                                editItem->rect.top + 3, hwnd, 0, hinst, 0);
3703 /* FIXME: (HMENU)IDTVEDIT,pcs->hInstance,0); */
3704
3705     infoPtr->hwndEdit = hwndEdit;
3706
3707     /* Get a 2D border. */
3708     SetWindowLongW(hwndEdit, GWL_EXSTYLE,
3709                    GetWindowLongW(hwndEdit, GWL_EXSTYLE) & ~WS_EX_CLIENTEDGE);
3710     SetWindowLongW(hwndEdit, GWL_STYLE,
3711                    GetWindowLongW(hwndEdit, GWL_STYLE) | WS_BORDER);
3712
3713     SendMessageW(hwndEdit, WM_SETFONT,
3714                  (WPARAM)TREEVIEW_FontForItem(infoPtr, editItem), FALSE);
3715
3716     infoPtr->wpEditOrig = (WNDPROC)SetWindowLongPtrW(hwndEdit, GWLP_WNDPROC,
3717                                                   (DWORD_PTR)
3718                                                   TREEVIEW_Edit_SubclassProc);
3719
3720     if (TREEVIEW_BeginLabelEditNotify(infoPtr, editItem))
3721     {
3722         DestroyWindow(hwndEdit);
3723         infoPtr->hwndEdit = 0;
3724         return NULL;
3725     }
3726
3727     infoPtr->selectedItem = hItem;
3728
3729     if (editItem->pszText)
3730         SetWindowTextW(hwndEdit, editItem->pszText);
3731
3732     SetFocus(hwndEdit);
3733     SendMessageW(hwndEdit, EM_SETSEL, 0, -1);
3734     ShowWindow(hwndEdit, SW_SHOW);
3735
3736     return hwndEdit;
3737 }
3738
3739
3740 static LRESULT
3741 TREEVIEW_EndEditLabelNow(TREEVIEW_INFO *infoPtr, BOOL bCancel)
3742 {
3743     HWND hwnd = infoPtr->hwnd;
3744     TREEVIEW_ITEM *editedItem = infoPtr->selectedItem;
3745     NMTVDISPINFOW tvdi;
3746     BOOL bCommit;
3747     WCHAR tmpText[1024] = { '\0' };
3748     WCHAR *newText = tmpText;
3749     int iLength = 0;
3750
3751     if (!infoPtr->hwndEdit)
3752         return FALSE;
3753
3754     tvdi.hdr.hwndFrom = hwnd;
3755     tvdi.hdr.idFrom = GetWindowLongPtrW(hwnd, GWLP_ID);
3756     tvdi.hdr.code = get_notifycode(infoPtr, TVN_ENDLABELEDITW);
3757     tvdi.item.mask = 0;
3758     tvdi.item.hItem = editedItem;
3759     tvdi.item.state = editedItem->state;
3760     tvdi.item.lParam = editedItem->lParam;
3761
3762     if (!bCancel)
3763     {
3764         if (!infoPtr->bNtfUnicode)
3765             iLength = GetWindowTextA(infoPtr->hwndEdit, (LPSTR)tmpText, 1023);
3766         else
3767             iLength = GetWindowTextW(infoPtr->hwndEdit, tmpText, 1023);
3768
3769         if (iLength >= 1023)
3770         {
3771             ERR("Insufficient space to retrieve new item label\n");
3772         }
3773
3774         tvdi.item.mask = TVIF_TEXT;
3775         tvdi.item.pszText = tmpText;
3776         tvdi.item.cchTextMax = iLength + 1;
3777     }
3778     else
3779     {
3780         tvdi.item.pszText = NULL;
3781         tvdi.item.cchTextMax = 0;
3782     }
3783
3784     bCommit = (BOOL)TREEVIEW_SendRealNotify(infoPtr, tvdi.hdr.idFrom, (LPARAM)&tvdi);
3785
3786     if (!bCancel && bCommit)    /* Apply the changes */
3787     {
3788         if (!infoPtr->bNtfUnicode)
3789         {
3790             DWORD len = MultiByteToWideChar( CP_ACP, 0, (LPSTR)tmpText, -1, NULL, 0 );
3791             newText = Alloc(len * sizeof(WCHAR));
3792             MultiByteToWideChar( CP_ACP, 0, (LPSTR)tmpText, -1, newText, len );
3793             iLength = len - 1;
3794         }
3795
3796         if (strcmpW(newText, editedItem->pszText) != 0)
3797         {
3798             WCHAR *ptr = ReAlloc(editedItem->pszText, sizeof(WCHAR)*(iLength + 1));
3799             if (ptr == NULL)
3800             {
3801                 ERR("OutOfMemory, cannot allocate space for label\n");
3802                 if(newText != tmpText) Free(newText);
3803                 DestroyWindow(infoPtr->hwndEdit);
3804                 infoPtr->hwndEdit = 0;
3805                 return FALSE;
3806             }
3807             else
3808             {
3809                 editedItem->pszText = ptr;
3810                 editedItem->cchTextMax = iLength + 1;
3811                 strcpyW(editedItem->pszText, newText);
3812                 TREEVIEW_ComputeTextWidth(infoPtr, editedItem, 0);
3813             }
3814         }
3815         if(newText != tmpText) Free(newText);
3816     }
3817
3818     ShowWindow(infoPtr->hwndEdit, SW_HIDE);
3819     DestroyWindow(infoPtr->hwndEdit);
3820     infoPtr->hwndEdit = 0;
3821     return TRUE;
3822 }
3823
3824 static LRESULT
3825 TREEVIEW_HandleTimer(TREEVIEW_INFO *infoPtr, WPARAM wParam)
3826 {
3827     if (wParam != TV_EDIT_TIMER)
3828     {
3829         ERR("got unknown timer\n");
3830         return 1;
3831     }
3832
3833     KillTimer(infoPtr->hwnd, TV_EDIT_TIMER);
3834     infoPtr->Timer &= ~TV_EDIT_TIMER_SET;
3835
3836     TREEVIEW_EditLabel(infoPtr, infoPtr->selectedItem);
3837
3838     return 0;
3839 }
3840
3841
3842 /* Mouse Tracking/Drag **************************************************/
3843
3844 /***************************************************************************
3845  * This is quite unusual piece of code, but that's how it's implemented in
3846  * Windows.
3847  */
3848 static LRESULT
3849 TREEVIEW_TrackMouse(const TREEVIEW_INFO *infoPtr, POINT pt)
3850 {
3851     INT cxDrag = GetSystemMetrics(SM_CXDRAG);
3852     INT cyDrag = GetSystemMetrics(SM_CYDRAG);
3853     RECT r;
3854     MSG msg;
3855
3856     r.top = pt.y - cyDrag;
3857     r.left = pt.x - cxDrag;
3858     r.bottom = pt.y + cyDrag;
3859     r.right = pt.x + cxDrag;
3860
3861     SetCapture(infoPtr->hwnd);
3862
3863     while (1)
3864     {
3865         if (PeekMessageW(&msg, 0, 0, 0, PM_REMOVE | PM_NOYIELD))
3866         {
3867             if (msg.message == WM_MOUSEMOVE)
3868             {
3869                 pt.x = (short)LOWORD(msg.lParam);
3870                 pt.y = (short)HIWORD(msg.lParam);
3871                 if (PtInRect(&r, pt))
3872                     continue;
3873                 else
3874                 {
3875                     ReleaseCapture();
3876                     return 1;
3877                 }
3878             }
3879             else if (msg.message >= WM_LBUTTONDOWN &&
3880                      msg.message <= WM_RBUTTONDBLCLK)
3881             {
3882                 if (msg.message == WM_RBUTTONUP)
3883                     TREEVIEW_RButtonUp(infoPtr, &pt);
3884                 break;
3885             }
3886
3887             DispatchMessageW(&msg);
3888         }
3889
3890         if (GetCapture() != infoPtr->hwnd)
3891             return 0;
3892     }
3893
3894     ReleaseCapture();
3895     return 0;
3896 }
3897
3898
3899 static LRESULT
3900 TREEVIEW_LButtonDoubleClick(TREEVIEW_INFO *infoPtr, LPARAM lParam)
3901 {
3902     TREEVIEW_ITEM *wineItem;
3903     TVHITTESTINFO hit;
3904
3905     TRACE("\n");
3906     SetFocus(infoPtr->hwnd);
3907
3908     if (infoPtr->Timer & TV_EDIT_TIMER_SET)
3909     {
3910         /* If there is pending 'edit label' event - kill it now */
3911         KillTimer(infoPtr->hwnd, TV_EDIT_TIMER);
3912     }
3913
3914     hit.pt.x = (short)LOWORD(lParam);
3915     hit.pt.y = (short)HIWORD(lParam);
3916
3917     wineItem = (TREEVIEW_ITEM *)TREEVIEW_HitTest(infoPtr, &hit);
3918     if (!wineItem)
3919         return 0;
3920     TRACE("item %d\n", TREEVIEW_GetItemIndex(infoPtr, wineItem));
3921
3922     if (TREEVIEW_SendSimpleNotify(infoPtr, NM_DBLCLK) == FALSE)
3923     {                           /* FIXME! */
3924         switch (hit.flags)
3925         {
3926         case TVHT_ONITEMRIGHT:
3927             /* FIXME: we should not have sent NM_DBLCLK in this case. */
3928             break;
3929
3930         case TVHT_ONITEMINDENT:
3931             if (!(infoPtr->dwStyle & TVS_HASLINES))
3932             {
3933                 break;
3934             }
3935             else
3936             {
3937                 int level = hit.pt.x / infoPtr->uIndent;
3938                 if (!(infoPtr->dwStyle & TVS_LINESATROOT)) level++;
3939
3940                 while (wineItem->iLevel > level)
3941                 {
3942                     wineItem = wineItem->parent;
3943                 }
3944
3945                 /* fall through */
3946             }
3947
3948         case TVHT_ONITEMLABEL:
3949         case TVHT_ONITEMICON:
3950         case TVHT_ONITEMBUTTON:
3951             TREEVIEW_Toggle(infoPtr, wineItem, TRUE);
3952             break;
3953
3954         case TVHT_ONITEMSTATEICON:
3955            if (infoPtr->dwStyle & TVS_CHECKBOXES)
3956                TREEVIEW_ToggleItemState(infoPtr, wineItem);
3957            else
3958                TREEVIEW_Toggle(infoPtr, wineItem, TRUE);
3959            break;
3960         }
3961     }
3962     return TRUE;
3963 }
3964
3965
3966 static LRESULT
3967 TREEVIEW_LButtonDown(TREEVIEW_INFO *infoPtr, LPARAM lParam)
3968 {
3969     HWND hwnd = infoPtr->hwnd;
3970     TVHITTESTINFO ht;
3971     BOOL bTrack, bDoLabelEdit;
3972     HTREEITEM tempItem;
3973
3974     /* If Edit control is active - kill it and return.
3975      * The best way to do it is to set focus to itself.
3976      * Edit control subclassed procedure will automatically call
3977      * EndEditLabelNow.
3978      */
3979     if (infoPtr->hwndEdit)
3980     {
3981         SetFocus(hwnd);
3982         return 0;
3983     }
3984
3985     ht.pt.x = (short)LOWORD(lParam);
3986     ht.pt.y = (short)HIWORD(lParam);
3987
3988     TREEVIEW_HitTest(infoPtr, &ht);
3989     TRACE("item %d\n", TREEVIEW_GetItemIndex(infoPtr, ht.hItem));
3990
3991     /* update focusedItem and redraw both items */
3992     if(ht.hItem && (ht.flags & TVHT_ONITEM))
3993     {
3994         infoPtr->focusedItem = ht.hItem;
3995         InvalidateRect(hwnd, &ht.hItem->rect, TRUE);
3996
3997         if(infoPtr->selectedItem)
3998             InvalidateRect(hwnd, &(infoPtr->selectedItem->rect), TRUE);
3999     }
4000
4001     bTrack = (ht.flags & TVHT_ONITEM)
4002         && !(infoPtr->dwStyle & TVS_DISABLEDRAGDROP);
4003
4004     /*
4005      * If the style allows editing and the node is already selected
4006      * and the click occurred on the item label...
4007      */
4008     bDoLabelEdit = (infoPtr->dwStyle & TVS_EDITLABELS) &&
4009         (ht.flags & TVHT_ONITEMLABEL) && (infoPtr->selectedItem == ht.hItem);
4010
4011     /* Send NM_CLICK right away */
4012     if (!bTrack)
4013         if (TREEVIEW_SendSimpleNotify(infoPtr, NM_CLICK))
4014             goto setfocus;
4015
4016     if (ht.flags & TVHT_ONITEMBUTTON)
4017     {
4018         TREEVIEW_Toggle(infoPtr, ht.hItem, TRUE);
4019         goto setfocus;
4020     }
4021     else if (bTrack)
4022     {   /* if TREEVIEW_TrackMouse == 1 dragging occurred and the cursor left the dragged item's rectangle */
4023         if (TREEVIEW_TrackMouse(infoPtr, ht.pt))
4024         {
4025             TREEVIEW_SendTreeviewDnDNotify(infoPtr, TVN_BEGINDRAGW, ht.hItem, ht.pt);
4026             infoPtr->dropItem = ht.hItem;
4027
4028             /* clean up focusedItem as we dragged and won't select this item */
4029             if(infoPtr->focusedItem)
4030             {
4031                 /* refresh the item that was focused */
4032                 tempItem = infoPtr->focusedItem;
4033                 infoPtr->focusedItem = 0;
4034                 InvalidateRect(infoPtr->hwnd, &tempItem->rect, TRUE);
4035
4036                 /* refresh the selected item to return the filled background */
4037                 InvalidateRect(infoPtr->hwnd, &(infoPtr->selectedItem->rect), TRUE);
4038             }
4039
4040             return 0;
4041         }
4042     }
4043
4044     if (bTrack && TREEVIEW_SendSimpleNotify(infoPtr, NM_CLICK))
4045         goto setfocus;
4046
4047     if (bDoLabelEdit)
4048     {
4049         if (infoPtr->Timer & TV_EDIT_TIMER_SET)
4050             KillTimer(hwnd, TV_EDIT_TIMER);
4051
4052         SetTimer(hwnd, TV_EDIT_TIMER, GetDoubleClickTime(), 0);
4053         infoPtr->Timer |= TV_EDIT_TIMER_SET;
4054     }
4055     else if (ht.flags & (TVHT_ONITEMICON|TVHT_ONITEMLABEL)) /* select the item if the hit was inside of the icon or text */
4056     {
4057         /*
4058          * if we are TVS_SINGLEEXPAND then we want this single click to
4059          * do a bunch of things.
4060          */
4061         if((infoPtr->dwStyle & TVS_SINGLEEXPAND) &&
4062           (infoPtr->hwndEdit == 0))
4063         {
4064             TREEVIEW_ITEM *SelItem;
4065
4066             /*
4067              * Send the notification
4068              */
4069             TREEVIEW_SendTreeviewNotify(infoPtr, TVN_SINGLEEXPAND, TVC_UNKNOWN, TVIF_HANDLE | TVIF_PARAM, ht.hItem, 0);
4070
4071             /*
4072              * Close the previous selection all the way to the root
4073              * as long as the new selection is not a child
4074              */
4075             if((infoPtr->selectedItem)
4076                 && (infoPtr->selectedItem != ht.hItem))
4077             {
4078                 BOOL closeit = TRUE;
4079                 SelItem = ht.hItem;
4080
4081                 /* determine if the hitItem is a child of the currently selected item */
4082                 while(closeit && SelItem && TREEVIEW_ValidItem(infoPtr, SelItem) && (SelItem != infoPtr->root))
4083                 {
4084                     closeit = (SelItem != infoPtr->selectedItem);
4085                     SelItem = SelItem->parent;
4086                 }
4087
4088                 if(closeit)
4089                 {
4090                     if(TREEVIEW_ValidItem(infoPtr, infoPtr->selectedItem))
4091                         SelItem = infoPtr->selectedItem;
4092
4093                     while(SelItem && (SelItem != ht.hItem) && TREEVIEW_ValidItem(infoPtr, SelItem) && (SelItem != infoPtr->root))
4094                     {
4095                         TREEVIEW_Collapse(infoPtr, SelItem, FALSE, FALSE);
4096                         SelItem = SelItem->parent;
4097                     }
4098                 }
4099             }
4100
4101             /*
4102              * Expand the current item
4103              */
4104             TREEVIEW_Expand(infoPtr, ht.hItem, TVE_TOGGLE, FALSE);
4105         }
4106
4107         /* Select the current item */
4108         TREEVIEW_DoSelectItem(infoPtr, TVGN_CARET, ht.hItem, TVC_BYMOUSE);
4109     }
4110     else if (ht.flags & TVHT_ONITEMSTATEICON)
4111     {
4112         /* TVS_CHECKBOXES requires us to toggle the current state */
4113         if (infoPtr->dwStyle & TVS_CHECKBOXES)
4114             TREEVIEW_ToggleItemState(infoPtr, ht.hItem);
4115     }
4116
4117   setfocus:
4118     SetFocus(hwnd);
4119     return 0;
4120 }
4121
4122
4123 static LRESULT
4124 TREEVIEW_RButtonDown(TREEVIEW_INFO *infoPtr, LPARAM lParam)
4125 {
4126     TVHITTESTINFO ht;
4127
4128     if (infoPtr->hwndEdit)
4129     {
4130         SetFocus(infoPtr->hwnd);
4131         return 0;
4132     }
4133
4134     ht.pt.x = (short)LOWORD(lParam);
4135     ht.pt.y = (short)HIWORD(lParam);
4136
4137     TREEVIEW_HitTest(infoPtr, &ht);
4138
4139     if (TREEVIEW_TrackMouse(infoPtr, ht.pt))
4140     {
4141         if (ht.hItem)
4142         {
4143             TREEVIEW_SendTreeviewDnDNotify(infoPtr, TVN_BEGINRDRAGW, ht.hItem, ht.pt);
4144             infoPtr->dropItem = ht.hItem;
4145         }
4146     }
4147     else
4148     {
4149         SetFocus(infoPtr->hwnd);
4150         TREEVIEW_SendSimpleNotify(infoPtr, NM_RCLICK);
4151     }
4152
4153     return 0;
4154 }
4155
4156 static LRESULT
4157 TREEVIEW_RButtonUp(const TREEVIEW_INFO *infoPtr, const POINT *pPt)
4158 {
4159     TVHITTESTINFO ht;
4160
4161     ht.pt = *pPt;
4162
4163     TREEVIEW_HitTest(infoPtr, &ht);
4164
4165     if (ht.hItem)
4166     {
4167         /* Change to screen coordinate for WM_CONTEXTMENU */
4168         ClientToScreen(infoPtr->hwnd, &ht.pt);
4169
4170         /* Send a WM_CONTEXTMENU message in response to the RBUTTONUP */
4171         SendMessageW(infoPtr->hwnd, WM_CONTEXTMENU,
4172             (WPARAM)infoPtr->hwnd, MAKELPARAM(ht.pt.x, ht.pt.y));
4173     }
4174     return 0;
4175 }
4176
4177
4178 static LRESULT
4179 TREEVIEW_CreateDragImage(TREEVIEW_INFO *infoPtr, LPARAM lParam)
4180 {
4181     TREEVIEW_ITEM *dragItem = (HTREEITEM)lParam;
4182     INT cx, cy;
4183     HDC hdc, htopdc;
4184     HWND hwtop;
4185     HBITMAP hbmp, hOldbmp;
4186     SIZE size;
4187     RECT rc;
4188     HFONT hOldFont;
4189
4190     TRACE("\n");
4191
4192     if (!(infoPtr->himlNormal))
4193         return 0;
4194
4195     if (!dragItem || !TREEVIEW_ValidItem(infoPtr, dragItem))
4196         return 0;
4197
4198     TREEVIEW_UpdateDispInfo(infoPtr, dragItem, TVIF_TEXT);
4199
4200     hwtop = GetDesktopWindow();
4201     htopdc = GetDC(hwtop);
4202     hdc = CreateCompatibleDC(htopdc);
4203
4204     hOldFont = SelectObject(hdc, infoPtr->hFont);
4205
4206     if (dragItem->pszText)
4207         GetTextExtentPoint32W(hdc, dragItem->pszText, strlenW(dragItem->pszText),
4208                           &size);
4209     else
4210         GetTextExtentPoint32A(hdc, "", 0, &size);
4211
4212     TRACE("%d %d %s\n", size.cx, size.cy, debugstr_w(dragItem->pszText));
4213     hbmp = CreateCompatibleBitmap(htopdc, size.cx, size.cy);
4214     hOldbmp = SelectObject(hdc, hbmp);
4215
4216     ImageList_GetIconSize(infoPtr->himlNormal, &cx, &cy);
4217     size.cx += cx;
4218     if (cy > size.cy)
4219         size.cy = cy;
4220
4221     infoPtr->dragList = ImageList_Create(size.cx, size.cy, ILC_COLOR, 10, 10);
4222     ImageList_Draw(infoPtr->himlNormal, dragItem->iImage, hdc, 0, 0,
4223                    ILD_NORMAL);
4224
4225 /*
4226  ImageList_GetImageInfo (infoPtr->himlNormal, dragItem->hItem, &iminfo);
4227  ImageList_AddMasked (infoPtr->dragList, iminfo.hbmImage, CLR_DEFAULT);
4228 */
4229
4230 /* draw item text */
4231
4232     SetRect(&rc, cx, 0, size.cx, size.cy);
4233
4234     if (dragItem->pszText)
4235         DrawTextW(hdc, dragItem->pszText, strlenW(dragItem->pszText), &rc,
4236                   DT_LEFT);
4237
4238     SelectObject(hdc, hOldFont);
4239     SelectObject(hdc, hOldbmp);
4240
4241     ImageList_Add(infoPtr->dragList, hbmp, 0);
4242
4243     DeleteDC(hdc);
4244     DeleteObject(hbmp);
4245     ReleaseDC(hwtop, htopdc);
4246
4247     return (LRESULT)infoPtr->dragList;
4248 }
4249
4250 /* Selection ************************************************************/
4251
4252 static LRESULT
4253 TREEVIEW_DoSelectItem(TREEVIEW_INFO *infoPtr, INT action, HTREEITEM newSelect,
4254                       INT cause)
4255 {
4256     TREEVIEW_ITEM *prevSelect;
4257     RECT rcFocused;
4258
4259     assert(newSelect == NULL || TREEVIEW_ValidItem(infoPtr, newSelect));
4260
4261     TRACE("Entering item %p (%s), flag %x, cause %x, state %d\n",
4262           newSelect, TREEVIEW_ItemName(newSelect), action, cause,
4263           newSelect ? newSelect->state : 0);
4264
4265     /* reset and redraw focusedItem if focusedItem was set so we don't */
4266     /* have to worry about the previously focused item when we set a new one */
4267     if(infoPtr->focusedItem)
4268     {
4269         rcFocused = (infoPtr->focusedItem)->rect;
4270         infoPtr->focusedItem = 0;
4271         InvalidateRect(infoPtr->hwnd, &rcFocused, TRUE);
4272     }
4273
4274     switch (action)
4275     {
4276     case TVGN_CARET:
4277         prevSelect = infoPtr->selectedItem;
4278
4279         if (prevSelect == newSelect) {
4280             TREEVIEW_EnsureVisible(infoPtr, infoPtr->selectedItem, FALSE);
4281             break;
4282         }
4283
4284         if (TREEVIEW_SendTreeviewNotify(infoPtr,
4285                                         TVN_SELCHANGINGW,
4286                                         cause,
4287                                         TVIF_TEXT | TVIF_HANDLE | TVIF_STATE | TVIF_PARAM,
4288                                         prevSelect,
4289                                         newSelect))
4290             return FALSE;
4291
4292         if (prevSelect)
4293             prevSelect->state &= ~TVIS_SELECTED;
4294         if (newSelect)
4295             newSelect->state |= TVIS_SELECTED;
4296
4297         infoPtr->selectedItem = newSelect;
4298
4299         TREEVIEW_EnsureVisible(infoPtr, infoPtr->selectedItem, FALSE);
4300
4301         if (prevSelect)
4302             TREEVIEW_Invalidate(infoPtr, prevSelect);
4303         if (newSelect)
4304             TREEVIEW_Invalidate(infoPtr, newSelect);
4305
4306         TREEVIEW_SendTreeviewNotify(infoPtr,
4307                                     TVN_SELCHANGEDW,
4308                                     cause,
4309                                     TVIF_TEXT | TVIF_HANDLE | TVIF_STATE | TVIF_PARAM,
4310                                     prevSelect,
4311                                     newSelect);
4312         break;
4313
4314     case TVGN_DROPHILITE:
4315         prevSelect = infoPtr->dropItem;
4316
4317         if (prevSelect)
4318             prevSelect->state &= ~TVIS_DROPHILITED;
4319
4320         infoPtr->dropItem = newSelect;
4321
4322         if (newSelect)
4323             newSelect->state |= TVIS_DROPHILITED;
4324
4325         TREEVIEW_Invalidate(infoPtr, prevSelect);
4326         TREEVIEW_Invalidate(infoPtr, newSelect);
4327         break;
4328
4329     case TVGN_FIRSTVISIBLE:
4330         if (newSelect != NULL)
4331         {
4332             TREEVIEW_EnsureVisible(infoPtr, newSelect, FALSE);
4333             TREEVIEW_SetFirstVisible(infoPtr, newSelect, TRUE);
4334             TREEVIEW_Invalidate(infoPtr, NULL);
4335         }
4336         break;
4337     }
4338
4339     TRACE("Leaving state %d\n", newSelect ? newSelect->state : 0);
4340     return TRUE;
4341 }
4342
4343 /* FIXME: handle NM_KILLFOCUS etc */
4344 static LRESULT
4345 TREEVIEW_SelectItem(TREEVIEW_INFO *infoPtr, INT wParam, HTREEITEM item)
4346 {
4347     if (item != NULL && !TREEVIEW_ValidItem(infoPtr, item))
4348         return FALSE;
4349
4350     TRACE("%p (%s) %d\n", item, TREEVIEW_ItemName(item), wParam);
4351
4352     if (!TREEVIEW_DoSelectItem(infoPtr, wParam, item, TVC_UNKNOWN))
4353         return FALSE;
4354
4355     return TRUE;
4356 }
4357
4358 /*************************************************************************
4359  *              TREEVIEW_ProcessLetterKeys
4360  *
4361  *  Processes keyboard messages generated by pressing the letter keys
4362  *  on the keyboard.
4363  *  What this does is perform a case insensitive search from the
4364  *  current position with the following quirks:
4365  *  - If two chars or more are pressed in quick succession we search
4366  *    for the corresponding string (e.g. 'abc').
4367  *  - If there is a delay we wipe away the current search string and
4368  *    restart with just that char.
4369  *  - If the user keeps pressing the same character, whether slowly or
4370  *    fast, so that the search string is entirely composed of this
4371  *    character ('aaaaa' for instance), then we search for first item
4372  *    that starting with that character.
4373  *  - If the user types the above character in quick succession, then
4374  *    we must also search for the corresponding string ('aaaaa'), and
4375  *    go to that string if there is a match.
4376  *
4377  * RETURNS
4378  *
4379  *  Zero.
4380  *
4381  * BUGS
4382  *
4383  *  - The current implementation has a list of characters it will
4384  *    accept and it ignores everything else. In particular it will
4385  *    ignore accentuated characters which seems to match what
4386  *    Windows does. But I'm not sure it makes sense to follow
4387  *    Windows there.
4388  *  - We don't sound a beep when the search fails.
4389  *  - The search should start from the focused item, not from the selected
4390  *    item. One reason for this is to allow for multiple selections in trees.
4391  *    But currently infoPtr->focusedItem does not seem very usable.
4392  *
4393  * SEE ALSO
4394  *
4395  *  TREEVIEW_ProcessLetterKeys
4396  */
4397 static INT TREEVIEW_ProcessLetterKeys(
4398     HWND hwnd, /* handle to the window */
4399     WPARAM charCode, /* the character code, the actual character */
4400     LPARAM keyData /* key data */
4401     )
4402 {
4403     TREEVIEW_INFO *infoPtr;
4404     HTREEITEM nItem;
4405     HTREEITEM endidx,idx;
4406     TVITEMEXW item;
4407     WCHAR buffer[MAX_PATH];
4408     DWORD timestamp,elapsed;
4409
4410     /* simple parameter checking */
4411     if (!hwnd || !charCode || !keyData)
4412         return 0;
4413
4414     infoPtr=(TREEVIEW_INFO*)GetWindowLongPtrW(hwnd, 0);
4415     if (!infoPtr)
4416         return 0;
4417
4418     /* only allow the valid WM_CHARs through */
4419     if (!isalnum(charCode) &&
4420         charCode != '.' && charCode != '`' && charCode != '!' &&
4421         charCode != '@' && charCode != '#' && charCode != '$' &&
4422         charCode != '%' && charCode != '^' && charCode != '&' &&
4423         charCode != '*' && charCode != '(' && charCode != ')' &&
4424         charCode != '-' && charCode != '_' && charCode != '+' &&
4425         charCode != '=' && charCode != '\\'&& charCode != ']' &&
4426         charCode != '}' && charCode != '[' && charCode != '{' &&
4427         charCode != '/' && charCode != '?' && charCode != '>' &&
4428         charCode != '<' && charCode != ',' && charCode != '~')
4429         return 0;
4430
4431     /* compute how much time elapsed since last keypress */
4432     timestamp = GetTickCount();
4433     if (timestamp > infoPtr->lastKeyPressTimestamp) {
4434         elapsed=timestamp-infoPtr->lastKeyPressTimestamp;
4435     } else {
4436         elapsed=infoPtr->lastKeyPressTimestamp-timestamp;
4437     }
4438
4439     /* update the search parameters */
4440     infoPtr->lastKeyPressTimestamp=timestamp;
4441     if (elapsed < KEY_DELAY) {
4442         if (infoPtr->nSearchParamLength < sizeof(infoPtr->szSearchParam) / sizeof(WCHAR)) {
4443             infoPtr->szSearchParam[infoPtr->nSearchParamLength++]=charCode;
4444         }
4445         if (infoPtr->charCode != charCode) {
4446             infoPtr->charCode=charCode=0;
4447         }
4448     } else {
4449         infoPtr->charCode=charCode;
4450         infoPtr->szSearchParam[0]=charCode;
4451         infoPtr->nSearchParamLength=1;
4452         /* Redundant with the 1 char string */
4453         charCode=0;
4454     }
4455
4456     /* and search from the current position */
4457     nItem=NULL;
4458     if (infoPtr->selectedItem != NULL) {
4459         endidx=infoPtr->selectedItem;
4460         /* if looking for single character match,
4461          * then we must always move forward
4462          */
4463         if (infoPtr->nSearchParamLength == 1)
4464             idx=TREEVIEW_GetNextListItem(infoPtr,endidx);
4465         else
4466             idx=endidx;
4467     } else {
4468         endidx=NULL;
4469         idx=infoPtr->root->firstChild;
4470     }
4471     do {
4472         /* At the end point, sort out wrapping */
4473         if (idx == NULL) {
4474
4475             /* If endidx is null, stop at the last item (ie top to bottom) */
4476             if (endidx == NULL)
4477                 break;
4478
4479             /* Otherwise, start again at the very beginning */
4480             idx=infoPtr->root->firstChild;
4481
4482             /* But if we are stopping on the first child, end now! */
4483             if (idx == endidx) break;
4484         }
4485
4486         /* get item */
4487         ZeroMemory(&item, sizeof(item));
4488         item.mask = TVIF_TEXT;
4489         item.hItem = idx;
4490         item.pszText = buffer;
4491         item.cchTextMax = sizeof(buffer);
4492         TREEVIEW_GetItemT( infoPtr, &item, TRUE );
4493
4494         /* check for a match */
4495         if (strncmpiW(item.pszText,infoPtr->szSearchParam,infoPtr->nSearchParamLength) == 0) {
4496             nItem=idx;
4497             break;
4498         } else if ( (charCode != 0) && (nItem == NULL) &&
4499                     (nItem != infoPtr->selectedItem) &&
4500                     (strncmpiW(item.pszText,infoPtr->szSearchParam,1) == 0) ) {
4501             /* This would work but we must keep looking for a longer match */
4502             nItem=idx;
4503         }
4504         idx=TREEVIEW_GetNextListItem(infoPtr,idx);
4505     } while (idx != endidx);
4506
4507     if (nItem != NULL) {
4508         if (TREEVIEW_DoSelectItem(infoPtr, TVGN_CARET, nItem, TVC_BYKEYBOARD)) {
4509             TREEVIEW_EnsureVisible(infoPtr, nItem, FALSE);
4510         }
4511     }
4512
4513     return 0;
4514 }
4515
4516 /* Scrolling ************************************************************/
4517
4518 static LRESULT
4519 TREEVIEW_EnsureVisible(TREEVIEW_INFO *infoPtr, HTREEITEM item, BOOL bHScroll)
4520 {
4521     int viscount;
4522     BOOL hasFirstVisible = infoPtr->firstVisible != NULL;
4523     HTREEITEM newFirstVisible = NULL;
4524     int visible_pos = -1;
4525
4526     if (!TREEVIEW_ValidItem(infoPtr, item))
4527         return FALSE;
4528
4529     if (!ISVISIBLE(item))
4530     {
4531         /* Expand parents as necessary. */
4532         HTREEITEM parent;
4533
4534         /* see if we are trying to ensure that root is visible */
4535         if((item != infoPtr->root) && TREEVIEW_ValidItem(infoPtr, item))
4536           parent = item->parent;
4537         else
4538           parent = item; /* this item is the topmost item */
4539
4540         while (parent != infoPtr->root)
4541         {
4542             if (!(parent->state & TVIS_EXPANDED))
4543                 TREEVIEW_Expand(infoPtr, parent, FALSE, FALSE);
4544
4545             parent = parent->parent;
4546         }
4547     }
4548
4549     viscount = TREEVIEW_GetVisibleCount(infoPtr);
4550
4551     TRACE("%p (%s) %d - %d viscount(%d)\n", item, TREEVIEW_ItemName(item), item->visibleOrder,
4552         hasFirstVisible ? infoPtr->firstVisible->visibleOrder : -1, viscount);
4553
4554     if (hasFirstVisible)
4555         visible_pos = item->visibleOrder - infoPtr->firstVisible->visibleOrder;
4556
4557     if (visible_pos < 0)
4558     {
4559         /* item is before the start of the list: put it at the top. */
4560         newFirstVisible = item;
4561     }
4562     else if (visible_pos >= viscount
4563              /* Sometimes, before we are displayed, GVC is 0, causing us to
4564               * spuriously scroll up. */
4565              && visible_pos > 0 && !(infoPtr->dwStyle & TVS_NOSCROLL) )
4566     {
4567         /* item is past the end of the list. */
4568         int scroll = visible_pos - viscount;
4569
4570         newFirstVisible = TREEVIEW_GetListItem(infoPtr, infoPtr->firstVisible,
4571                                                scroll + 1);
4572     }
4573
4574     if (bHScroll)
4575     {
4576         /* Scroll window so item's text is visible as much as possible */
4577         /* Calculation of amount of extra space is taken from EditLabel code */
4578         INT pos, x;
4579         TEXTMETRICW textMetric;
4580         HDC hdc = GetWindowDC(infoPtr->hwnd);
4581
4582         x = item->textWidth;
4583
4584         GetTextMetricsW(hdc, &textMetric);
4585         ReleaseDC(infoPtr->hwnd, hdc);
4586
4587         x += (textMetric.tmMaxCharWidth * 2);
4588         x = max(x, textMetric.tmMaxCharWidth * 3);
4589
4590         if (item->textOffset < 0)
4591            pos = item->textOffset;
4592         else if (item->textOffset + x > infoPtr->clientWidth)
4593         {
4594            if (x > infoPtr->clientWidth)
4595               pos = item->textOffset;
4596            else
4597               pos = item->textOffset + x - infoPtr->clientWidth;
4598         }
4599         else
4600            pos = 0;
4601
4602         TREEVIEW_HScroll(infoPtr, MAKEWPARAM(SB_THUMBPOSITION, infoPtr->scrollX + pos));
4603     }
4604
4605     if (newFirstVisible != NULL && newFirstVisible != infoPtr->firstVisible)
4606     {
4607         TREEVIEW_SetFirstVisible(infoPtr, newFirstVisible, TRUE);
4608
4609         return TRUE;
4610     }
4611
4612     return FALSE;
4613 }
4614
4615 static VOID
4616 TREEVIEW_SetFirstVisible(TREEVIEW_INFO *infoPtr,
4617                          TREEVIEW_ITEM *newFirstVisible,
4618                          BOOL bUpdateScrollPos)
4619 {
4620     int gap_size;
4621
4622     TRACE("%p: %s\n", newFirstVisible, TREEVIEW_ItemName(newFirstVisible));
4623
4624     if (newFirstVisible != NULL)
4625     {
4626         /* Prevent an empty gap from appearing at the bottom... */
4627         gap_size = TREEVIEW_GetVisibleCount(infoPtr)
4628             - infoPtr->maxVisibleOrder + newFirstVisible->visibleOrder;
4629
4630         if (gap_size > 0)
4631         {
4632             newFirstVisible = TREEVIEW_GetListItem(infoPtr, newFirstVisible,
4633                                                    -gap_size);
4634
4635             /* ... unless we just don't have enough items. */
4636             if (newFirstVisible == NULL)
4637                 newFirstVisible = infoPtr->root->firstChild;
4638         }
4639     }
4640
4641     if (infoPtr->firstVisible != newFirstVisible)
4642     {
4643         if (infoPtr->firstVisible == NULL || newFirstVisible == NULL)
4644         {
4645             infoPtr->firstVisible = newFirstVisible;
4646             TREEVIEW_Invalidate(infoPtr, NULL);
4647         }
4648         else
4649         {
4650             TREEVIEW_ITEM *item;
4651             int scroll = infoPtr->uItemHeight *
4652                          (infoPtr->firstVisible->visibleOrder
4653                           - newFirstVisible->visibleOrder);
4654
4655             infoPtr->firstVisible = newFirstVisible;
4656
4657             for (item = infoPtr->root->firstChild; item != NULL;
4658                  item = TREEVIEW_GetNextListItem(infoPtr, item))
4659             {
4660                item->rect.top += scroll;
4661                item->rect.bottom += scroll;
4662             }
4663
4664             if (bUpdateScrollPos)
4665                 SetScrollPos(infoPtr->hwnd, SB_VERT,
4666                               newFirstVisible->visibleOrder, TRUE);
4667
4668             ScrollWindowEx(infoPtr->hwnd, 0, scroll, NULL, NULL, NULL, NULL, SW_ERASE | SW_INVALIDATE);
4669         }
4670     }
4671 }
4672
4673 /************************************************************************
4674  * VScroll is always in units of visible items. i.e. we always have a
4675  * visible item aligned to the top of the control. (Unless we have no
4676  * items at all.)
4677  */
4678 static LRESULT
4679 TREEVIEW_VScroll(TREEVIEW_INFO *infoPtr, WPARAM wParam)
4680 {
4681     TREEVIEW_ITEM *oldFirstVisible = infoPtr->firstVisible;
4682     TREEVIEW_ITEM *newFirstVisible = NULL;
4683
4684     int nScrollCode = LOWORD(wParam);
4685
4686     TRACE("wp %lx\n", wParam);
4687
4688     if (!(infoPtr->uInternalStatus & TV_VSCROLL))
4689         return 0;
4690
4691     if (!oldFirstVisible)
4692     {
4693         assert(infoPtr->root->firstChild == NULL);
4694         return 0;
4695     }
4696
4697     switch (nScrollCode)
4698     {
4699     case SB_TOP:
4700         newFirstVisible = infoPtr->root->firstChild;
4701         break;
4702
4703     case SB_BOTTOM:
4704         newFirstVisible = TREEVIEW_GetLastListItem(infoPtr, infoPtr->root);
4705         break;
4706
4707     case SB_LINEUP:
4708         newFirstVisible = TREEVIEW_GetPrevListItem(infoPtr, oldFirstVisible);
4709         break;
4710
4711     case SB_LINEDOWN:
4712         newFirstVisible = TREEVIEW_GetNextListItem(infoPtr, oldFirstVisible);
4713         break;
4714
4715     case SB_PAGEUP:
4716         newFirstVisible = TREEVIEW_GetListItem(infoPtr, oldFirstVisible,
4717                                                -max(1, TREEVIEW_GetVisibleCount(infoPtr)));
4718         break;
4719
4720     case SB_PAGEDOWN:
4721         newFirstVisible = TREEVIEW_GetListItem(infoPtr, oldFirstVisible,
4722                                                max(1, TREEVIEW_GetVisibleCount(infoPtr)));
4723         break;
4724
4725     case SB_THUMBTRACK:
4726     case SB_THUMBPOSITION:
4727         newFirstVisible = TREEVIEW_GetListItem(infoPtr,
4728                                                infoPtr->root->firstChild,
4729                                                (LONG)(SHORT)HIWORD(wParam));
4730         break;
4731
4732     case SB_ENDSCROLL:
4733         return 0;
4734     }
4735
4736     if (newFirstVisible != NULL)
4737     {
4738         if (newFirstVisible != oldFirstVisible)
4739             TREEVIEW_SetFirstVisible(infoPtr, newFirstVisible,
4740                                   nScrollCode != SB_THUMBTRACK);
4741         else if (nScrollCode == SB_THUMBPOSITION)
4742             SetScrollPos(infoPtr->hwnd, SB_VERT,
4743                          newFirstVisible->visibleOrder, TRUE);
4744     }
4745
4746     return 0;
4747 }
4748
4749 static LRESULT
4750 TREEVIEW_HScroll(TREEVIEW_INFO *infoPtr, WPARAM wParam)
4751 {
4752     int maxWidth;
4753     int scrollX = infoPtr->scrollX;
4754     int nScrollCode = LOWORD(wParam);
4755
4756     TRACE("wp %lx\n", wParam);
4757
4758     if (!(infoPtr->uInternalStatus & TV_HSCROLL))
4759         return FALSE;
4760
4761     maxWidth = infoPtr->treeWidth - infoPtr->clientWidth;
4762     /* shall never occur */
4763     if (maxWidth <= 0)
4764     {
4765        scrollX = 0;
4766        goto scroll;
4767     }
4768
4769     switch (nScrollCode)
4770     {
4771     case SB_LINELEFT:
4772         scrollX -= infoPtr->uItemHeight;
4773         break;
4774     case SB_LINERIGHT:
4775         scrollX += infoPtr->uItemHeight;
4776         break;
4777     case SB_PAGELEFT:
4778         scrollX -= infoPtr->clientWidth;
4779         break;
4780     case SB_PAGERIGHT:
4781         scrollX += infoPtr->clientWidth;
4782         break;
4783
4784     case SB_THUMBTRACK:
4785     case SB_THUMBPOSITION:
4786         scrollX = (int)(SHORT)HIWORD(wParam);
4787         break;
4788
4789     case SB_ENDSCROLL:
4790        return 0;
4791     }
4792
4793     if (scrollX > maxWidth)
4794         scrollX = maxWidth;
4795     else if (scrollX < 0)
4796         scrollX = 0;
4797
4798 scroll:
4799     if (scrollX != infoPtr->scrollX)
4800     {
4801         TREEVIEW_ITEM *item;
4802         LONG scroll_pixels = infoPtr->scrollX - scrollX;
4803
4804         for (item = infoPtr->root->firstChild; item != NULL;
4805              item = TREEVIEW_GetNextListItem(infoPtr, item))
4806         {
4807            item->linesOffset += scroll_pixels;
4808            item->stateOffset += scroll_pixels;
4809            item->imageOffset += scroll_pixels;
4810            item->textOffset  += scroll_pixels;
4811         }
4812
4813         ScrollWindow(infoPtr->hwnd, scroll_pixels, 0, NULL, NULL);
4814         infoPtr->scrollX = scrollX;
4815         UpdateWindow(infoPtr->hwnd);
4816     }
4817
4818     if (nScrollCode != SB_THUMBTRACK)
4819        SetScrollPos(infoPtr->hwnd, SB_HORZ, scrollX, TRUE);
4820
4821     return 0;
4822 }
4823
4824 static LRESULT
4825 TREEVIEW_MouseWheel(TREEVIEW_INFO *infoPtr, WPARAM wParam)
4826 {
4827     short gcWheelDelta;
4828     UINT pulScrollLines = 3;
4829
4830     if (infoPtr->firstVisible == NULL)
4831         return TRUE;
4832
4833     SystemParametersInfoW(SPI_GETWHEELSCROLLLINES, 0, &pulScrollLines, 0);
4834
4835     gcWheelDelta = -(short)HIWORD(wParam);
4836     pulScrollLines *= (gcWheelDelta / WHEEL_DELTA);
4837
4838     if (abs(gcWheelDelta) >= WHEEL_DELTA && pulScrollLines)
4839     {
4840         int newDy = infoPtr->firstVisible->visibleOrder + pulScrollLines;
4841         int maxDy = infoPtr->maxVisibleOrder;
4842
4843         if (newDy > maxDy)
4844             newDy = maxDy;
4845
4846         if (newDy < 0)
4847             newDy = 0;
4848
4849         TREEVIEW_VScroll(infoPtr, MAKEWPARAM(SB_THUMBPOSITION, newDy));
4850     }
4851     return TRUE;
4852 }
4853
4854 /* Create/Destroy *******************************************************/
4855
4856 static void
4857 initialize_checkboxes(TREEVIEW_INFO *infoPtr)
4858 {
4859     RECT rc;
4860     HBITMAP hbm, hbmOld;
4861     HDC hdc, hdcScreen;
4862     int nIndex;
4863
4864     infoPtr->himlState = ImageList_Create(16, 16, ILC_COLOR | ILC_MASK, 3, 0);
4865
4866     hdcScreen = GetDC(0);
4867
4868     hdc = CreateCompatibleDC(hdcScreen);
4869     hbm = CreateCompatibleBitmap(hdcScreen, 48, 16);
4870     hbmOld = SelectObject(hdc, hbm);
4871
4872     SetRect(&rc, 0, 0, 48, 16);
4873     FillRect(hdc, &rc, (HBRUSH)(COLOR_WINDOW+1));
4874
4875     SetRect(&rc, 18, 2, 30, 14);
4876     DrawFrameControl(hdc, &rc, DFC_BUTTON,
4877                      DFCS_BUTTONCHECK|DFCS_FLAT);
4878
4879     SetRect(&rc, 34, 2, 46, 14);
4880     DrawFrameControl(hdc, &rc, DFC_BUTTON,
4881                      DFCS_BUTTONCHECK|DFCS_FLAT|DFCS_CHECKED);
4882
4883     SelectObject(hdc, hbmOld);
4884     nIndex = ImageList_AddMasked(infoPtr->himlState, hbm,
4885                                  GetSysColor(COLOR_WINDOW));
4886     TRACE("checkbox index %d\n", nIndex);
4887
4888     DeleteObject(hbm);
4889     DeleteDC(hdc);
4890     ReleaseDC(0, hdcScreen);
4891
4892     infoPtr->stateImageWidth = 16;
4893     infoPtr->stateImageHeight = 16;
4894 }
4895
4896 static LRESULT
4897 TREEVIEW_Create(HWND hwnd, const CREATESTRUCTW *lpcs)
4898 {
4899     RECT rcClient;
4900     TREEVIEW_INFO *infoPtr;
4901     LOGFONTW lf;
4902
4903     TRACE("wnd %p, style %x\n", hwnd, GetWindowLongW(hwnd, GWL_STYLE));
4904
4905     infoPtr = Alloc(sizeof(TREEVIEW_INFO));
4906
4907     if (infoPtr == NULL)
4908     {
4909         ERR("could not allocate info memory!\n");
4910         return 0;
4911     }
4912
4913     SetWindowLongPtrW(hwnd, 0, (DWORD_PTR)infoPtr);
4914
4915     infoPtr->hwnd = hwnd;
4916     infoPtr->dwStyle = GetWindowLongW(hwnd, GWL_STYLE);
4917     infoPtr->Timer = 0;
4918     infoPtr->uNumItems = 0;
4919     infoPtr->cdmode = 0;
4920     infoPtr->uScrollTime = 300; /* milliseconds */
4921     infoPtr->bRedraw = TRUE;
4922
4923     GetClientRect(hwnd, &rcClient);
4924
4925     /* No scroll bars yet. */
4926     infoPtr->clientWidth = rcClient.right;
4927     infoPtr->clientHeight = rcClient.bottom;
4928     infoPtr->uInternalStatus = 0;
4929
4930     infoPtr->treeWidth = 0;
4931     infoPtr->treeHeight = 0;
4932
4933     infoPtr->uIndent = MINIMUM_INDENT;
4934     infoPtr->selectedItem = 0;
4935     infoPtr->focusedItem = 0;
4936     infoPtr->hotItem = 0;
4937     infoPtr->firstVisible = 0;
4938     infoPtr->maxVisibleOrder = 0;
4939     infoPtr->dropItem = 0;
4940     infoPtr->insertMarkItem = 0;
4941     infoPtr->insertBeforeorAfter = 0;
4942     /* dragList */
4943
4944     infoPtr->scrollX = 0;
4945
4946     infoPtr->clrBk   = -1; /* use system color */
4947     infoPtr->clrText = -1;      /* use system color */
4948     infoPtr->clrLine = RGB(128, 128, 128);
4949     infoPtr->clrInsertMark = GetSysColor(COLOR_BTNTEXT);
4950
4951     /* hwndToolTip */
4952
4953     infoPtr->hwndEdit = 0;
4954     infoPtr->wpEditOrig = NULL;
4955     infoPtr->bIgnoreEditKillFocus = FALSE;
4956     infoPtr->bLabelChanged = FALSE;
4957
4958     infoPtr->himlNormal = NULL;
4959     infoPtr->himlState = NULL;
4960     infoPtr->normalImageWidth = 0;
4961     infoPtr->normalImageHeight = 0;
4962     infoPtr->stateImageWidth = 0;
4963     infoPtr->stateImageHeight = 0;
4964
4965     infoPtr->items = DPA_Create(16);
4966
4967     SystemParametersInfoW(SPI_GETICONTITLELOGFONT, sizeof(lf), &lf, 0);
4968     infoPtr->hFont = infoPtr->hDefaultFont = CreateFontIndirectW(&lf);
4969     infoPtr->hBoldFont = TREEVIEW_CreateBoldFont(infoPtr->hFont);
4970     infoPtr->hUnderlineFont = TREEVIEW_CreateUnderlineFont(infoPtr->hFont);
4971     infoPtr->hcurHand = LoadCursorW(NULL, (LPWSTR)IDC_HAND);
4972
4973     infoPtr->uItemHeight = TREEVIEW_NaturalHeight(infoPtr);
4974
4975     infoPtr->root = TREEVIEW_AllocateItem(infoPtr);
4976     infoPtr->root->state = TVIS_EXPANDED;
4977     infoPtr->root->iLevel = -1;
4978     infoPtr->root->visibleOrder = -1;
4979
4980     infoPtr->hwndNotify = lpcs->hwndParent;
4981 #if 0
4982     infoPtr->bTransparent = ( GetWindowLongW( hwnd, GWL_STYLE) & TBSTYLE_FLAT);
4983 #endif
4984
4985     infoPtr->hwndToolTip = 0;
4986
4987     infoPtr->bNtfUnicode = IsWindowUnicode (hwnd);
4988
4989     /* Determine what type of notify should be issued */
4990     /* sets infoPtr->bNtfUnicode */
4991     TREEVIEW_NotifyFormat(infoPtr, infoPtr->hwndNotify, NF_REQUERY);
4992
4993     if (!(infoPtr->dwStyle & TVS_NOTOOLTIPS))
4994         infoPtr->hwndToolTip = CreateWindowExW(0, TOOLTIPS_CLASSW, NULL, WS_POPUP,
4995             CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT,
4996             hwnd, 0, 0, 0);
4997
4998     if (infoPtr->dwStyle & TVS_CHECKBOXES)
4999         initialize_checkboxes(infoPtr);
5000
5001     /* Make sure actual scrollbar state is consistent with uInternalStatus */
5002     ShowScrollBar(hwnd, SB_VERT, FALSE);
5003     ShowScrollBar(hwnd, SB_HORZ, FALSE);
5004
5005     OpenThemeData (hwnd, themeClass);
5006
5007     return 0;
5008 }
5009
5010
5011 static LRESULT
5012 TREEVIEW_Destroy(TREEVIEW_INFO *infoPtr)
5013 {
5014     TRACE("\n");
5015
5016     TREEVIEW_RemoveTree(infoPtr);
5017
5018     /* tool tip is automatically destroyed: we are its owner */
5019
5020     /* Restore original wndproc */
5021     if (infoPtr->hwndEdit)
5022         SetWindowLongPtrW(infoPtr->hwndEdit, GWLP_WNDPROC,
5023                        (DWORD_PTR)infoPtr->wpEditOrig);
5024
5025     CloseThemeData (GetWindowTheme (infoPtr->hwnd));
5026
5027     /* Deassociate treeview from the window before doing anything drastic. */
5028     SetWindowLongPtrW(infoPtr->hwnd, 0, 0);
5029
5030
5031     DeleteObject(infoPtr->hDefaultFont);
5032     DeleteObject(infoPtr->hBoldFont);
5033     DeleteObject(infoPtr->hUnderlineFont);
5034     Free(infoPtr);
5035
5036     return 0;
5037 }
5038
5039 /* Miscellaneous Messages ***********************************************/
5040
5041 static LRESULT
5042 TREEVIEW_ScrollKeyDown(TREEVIEW_INFO *infoPtr, WPARAM key)
5043 {
5044     static const struct
5045     {
5046         unsigned char code;
5047     }
5048     scroll[] =
5049     {
5050 #define SCROLL_ENTRY(dir, code) { ((dir) << 7) | (code) }
5051         SCROLL_ENTRY(SB_VERT, SB_PAGEUP),       /* VK_PRIOR */
5052         SCROLL_ENTRY(SB_VERT, SB_PAGEDOWN),     /* VK_NEXT */
5053         SCROLL_ENTRY(SB_VERT, SB_BOTTOM),       /* VK_END */
5054         SCROLL_ENTRY(SB_VERT, SB_TOP),          /* VK_HOME */
5055         SCROLL_ENTRY(SB_HORZ, SB_LINEUP),       /* VK_LEFT */
5056         SCROLL_ENTRY(SB_VERT, SB_LINEUP),       /* VK_UP */
5057         SCROLL_ENTRY(SB_HORZ, SB_LINEDOWN),     /* VK_RIGHT */
5058         SCROLL_ENTRY(SB_VERT, SB_LINEDOWN)      /* VK_DOWN */
5059 #undef SCROLL_ENTRY
5060     };
5061
5062     if (key >= VK_PRIOR && key <= VK_DOWN)
5063     {
5064         unsigned char code = scroll[key - VK_PRIOR].code;
5065
5066         (((code & (1 << 7)) == (SB_HORZ << 7))
5067          ? TREEVIEW_HScroll
5068          : TREEVIEW_VScroll)(infoPtr, code & 0x7F);
5069     }
5070
5071     return 0;
5072 }
5073
5074 /************************************************************************
5075  *        TREEVIEW_KeyDown
5076  *
5077  * VK_UP       Move selection to the previous non-hidden item.
5078  * VK_DOWN     Move selection to the next non-hidden item.
5079  * VK_HOME     Move selection to the first item.
5080  * VK_END      Move selection to the last item.
5081  * VK_LEFT     If expanded then collapse, otherwise move to parent.
5082  * VK_RIGHT    If collapsed then expand, otherwise move to first child.
5083  * VK_ADD      Expand.
5084  * VK_SUBTRACT Collapse.
5085  * VK_MULTIPLY Expand all.
5086  * VK_PRIOR    Move up GetVisibleCount items.
5087  * VK_NEXT     Move down GetVisibleCount items.
5088  * VK_BACK     Move to parent.
5089  * CTRL-Left,Right,Up,Down,PgUp,PgDown,Home,End: Scroll without changing selection
5090  */
5091 static LRESULT
5092 TREEVIEW_KeyDown(TREEVIEW_INFO *infoPtr, WPARAM wParam)
5093 {
5094     /* If it is non-NULL and different, it will be selected and visible. */
5095     TREEVIEW_ITEM *newSelection = NULL;
5096
5097     TREEVIEW_ITEM *prevItem = infoPtr->selectedItem;
5098
5099     TRACE("%lx\n", wParam);
5100
5101     if (prevItem == NULL)
5102         return FALSE;
5103
5104     if (GetAsyncKeyState(VK_CONTROL) & 0x8000)
5105         return TREEVIEW_ScrollKeyDown(infoPtr, wParam);
5106
5107     switch (wParam)
5108     {
5109     case VK_UP:
5110         newSelection = TREEVIEW_GetPrevListItem(infoPtr, prevItem);
5111         if (!newSelection)
5112             newSelection = infoPtr->root->firstChild;
5113         break;
5114
5115     case VK_DOWN:
5116         newSelection = TREEVIEW_GetNextListItem(infoPtr, prevItem);
5117         break;
5118
5119     case VK_HOME:
5120         newSelection = infoPtr->root->firstChild;
5121         break;
5122
5123     case VK_END:
5124         newSelection = TREEVIEW_GetLastListItem(infoPtr, infoPtr->root);
5125         break;
5126
5127     case VK_LEFT:
5128         if (prevItem->state & TVIS_EXPANDED)
5129         {
5130             TREEVIEW_Collapse(infoPtr, prevItem, FALSE, TRUE);
5131         }
5132         else if (prevItem->parent != infoPtr->root)
5133         {
5134             newSelection = prevItem->parent;
5135         }
5136         break;
5137
5138     case VK_RIGHT:
5139         if (TREEVIEW_HasChildren(infoPtr, prevItem))
5140         {
5141             if (!(prevItem->state & TVIS_EXPANDED))
5142                 TREEVIEW_Expand(infoPtr, prevItem, FALSE, TRUE);
5143             else
5144             {
5145                 newSelection = prevItem->firstChild;
5146             }
5147         }
5148
5149         break;
5150
5151     case VK_MULTIPLY:
5152         TREEVIEW_ExpandAll(infoPtr, prevItem);
5153         break;
5154
5155     case VK_ADD:
5156         if (!(prevItem->state & TVIS_EXPANDED))
5157             TREEVIEW_Expand(infoPtr, prevItem, FALSE, TRUE);
5158         break;
5159
5160     case VK_SUBTRACT:
5161         if (prevItem->state & TVIS_EXPANDED)
5162             TREEVIEW_Collapse(infoPtr, prevItem, FALSE, TRUE);
5163         break;
5164
5165     case VK_PRIOR:
5166         newSelection
5167             = TREEVIEW_GetListItem(infoPtr, prevItem,
5168                                    -TREEVIEW_GetVisibleCount(infoPtr));
5169         break;
5170
5171     case VK_NEXT:
5172         newSelection
5173             = TREEVIEW_GetListItem(infoPtr, prevItem,
5174                                    TREEVIEW_GetVisibleCount(infoPtr));
5175         break;
5176
5177     case VK_BACK:
5178         newSelection = prevItem->parent;
5179         if (newSelection == infoPtr->root)
5180             newSelection = NULL;
5181         break;
5182
5183     case VK_SPACE:
5184         if (infoPtr->dwStyle & TVS_CHECKBOXES)
5185             TREEVIEW_ToggleItemState(infoPtr, prevItem);
5186         break;
5187     }
5188
5189     if (newSelection && newSelection != prevItem)
5190     {
5191         if (TREEVIEW_DoSelectItem(infoPtr, TVGN_CARET, newSelection,
5192                                   TVC_BYKEYBOARD))
5193         {
5194             TREEVIEW_EnsureVisible(infoPtr, newSelection, FALSE);
5195         }
5196     }
5197
5198     return FALSE;
5199 }
5200
5201 static LRESULT
5202 TREEVIEW_MouseLeave (TREEVIEW_INFO * infoPtr)
5203 {
5204     if (infoPtr->hotItem)
5205     {
5206         /* remove hot effect from item */
5207         InvalidateRect(infoPtr->hwnd, &infoPtr->hotItem->rect, TRUE);
5208         infoPtr->hotItem = NULL;
5209     }
5210     return 0;
5211 }
5212
5213 static LRESULT
5214 TREEVIEW_MouseMove (TREEVIEW_INFO * infoPtr, LPARAM lParam)
5215 {
5216     POINT pt;
5217     TRACKMOUSEEVENT trackinfo;
5218     TREEVIEW_ITEM * item;
5219
5220     /* fill in the TRACKMOUSEEVENT struct */
5221     trackinfo.cbSize = sizeof(TRACKMOUSEEVENT);
5222     trackinfo.dwFlags = TME_QUERY;
5223     trackinfo.hwndTrack = infoPtr->hwnd;
5224     trackinfo.dwHoverTime = HOVER_DEFAULT;
5225
5226     /* call _TrackMouseEvent to see if we are currently tracking for this hwnd */
5227     _TrackMouseEvent(&trackinfo);
5228
5229     /* Make sure tracking is enabled so we receive a WM_MOUSELEAVE message */
5230     if(!(trackinfo.dwFlags & TME_LEAVE))
5231     {
5232         trackinfo.dwFlags = TME_LEAVE; /* notify upon leaving */
5233
5234         /* call TRACKMOUSEEVENT so we receive a WM_MOUSELEAVE message */
5235         /* and can properly deactivate the hot item */
5236         _TrackMouseEvent(&trackinfo);
5237     }
5238
5239     pt.x = (short)LOWORD(lParam);
5240     pt.y = (short)HIWORD(lParam);
5241
5242     item = TREEVIEW_HitTestPoint(infoPtr, pt);
5243
5244     if (item != infoPtr->hotItem)
5245     {
5246         /* redraw old hot item */
5247         if (infoPtr->hotItem)
5248             InvalidateRect(infoPtr->hwnd, &infoPtr->hotItem->rect, TRUE);
5249         infoPtr->hotItem = item;
5250         /* redraw new hot item */
5251         if (infoPtr->hotItem)
5252             InvalidateRect(infoPtr->hwnd, &infoPtr->hotItem->rect, TRUE);
5253     }
5254
5255     return 0;
5256 }
5257
5258 /* Draw themed border */
5259 static BOOL nc_paint (const TREEVIEW_INFO *infoPtr, HRGN region)
5260 {
5261     HTHEME theme = GetWindowTheme (infoPtr->hwnd);
5262     HDC dc;
5263     RECT r;
5264     HRGN cliprgn;
5265     int cxEdge = GetSystemMetrics (SM_CXEDGE),
5266         cyEdge = GetSystemMetrics (SM_CYEDGE);
5267
5268     if (!theme) return FALSE;
5269
5270     GetWindowRect(infoPtr->hwnd, &r);
5271
5272     cliprgn = CreateRectRgn (r.left + cxEdge, r.top + cyEdge,
5273         r.right - cxEdge, r.bottom - cyEdge);
5274     if (region != (HRGN)1)
5275         CombineRgn (cliprgn, cliprgn, region, RGN_AND);
5276     OffsetRect(&r, -r.left, -r.top);
5277
5278     dc = GetDCEx(infoPtr->hwnd, region, DCX_WINDOW|DCX_INTERSECTRGN);
5279     OffsetRect(&r, -r.left, -r.top);
5280
5281     if (IsThemeBackgroundPartiallyTransparent (theme, 0, 0))
5282         DrawThemeParentBackground(infoPtr->hwnd, dc, &r);
5283     DrawThemeBackground (theme, dc, 0, 0, &r, 0);
5284     ReleaseDC(infoPtr->hwnd, dc);
5285
5286     /* Call default proc to get the scrollbars etc. painted */
5287     DefWindowProcW (infoPtr->hwnd, WM_NCPAINT, (WPARAM)cliprgn, 0);
5288
5289     return TRUE;
5290 }
5291
5292 static LRESULT
5293 TREEVIEW_Notify(const TREEVIEW_INFO *infoPtr, WPARAM wParam, LPARAM lParam)
5294 {
5295     LPNMHDR lpnmh = (LPNMHDR)lParam;
5296
5297     if (lpnmh->code == PGN_CALCSIZE) {
5298         LPNMPGCALCSIZE lppgc = (LPNMPGCALCSIZE)lParam;
5299
5300         if (lppgc->dwFlag == PGF_CALCWIDTH) {
5301             lppgc->iWidth = infoPtr->treeWidth;
5302             TRACE("got PGN_CALCSIZE, returning horz size = %d, client=%d\n",
5303                   infoPtr->treeWidth, infoPtr->clientWidth);
5304         }
5305         else {
5306             lppgc->iHeight = infoPtr->treeHeight;
5307             TRACE("got PGN_CALCSIZE, returning vert size = %d, client=%d\n",
5308                   infoPtr->treeHeight, infoPtr->clientHeight);
5309         }
5310         return 0;
5311     }
5312     return DefWindowProcW(infoPtr->hwnd, WM_NOTIFY, wParam, lParam);
5313 }
5314
5315 static INT TREEVIEW_NotifyFormat (TREEVIEW_INFO *infoPtr, HWND hwndFrom, UINT nCommand)
5316 {
5317     INT format;
5318
5319     TRACE("(hwndFrom=%p, nCommand=%d)\n", hwndFrom, nCommand);
5320
5321     if (nCommand != NF_REQUERY) return 0;
5322
5323     format = SendMessageW(hwndFrom, WM_NOTIFYFORMAT, (WPARAM)infoPtr->hwnd, NF_QUERY);
5324     TRACE("format=%d\n", format);
5325
5326     if (format != NFR_ANSI && format != NFR_UNICODE) return 0;
5327
5328     infoPtr->bNtfUnicode = (format == NFR_UNICODE);
5329
5330     return format;
5331 }
5332
5333 static LRESULT
5334 TREEVIEW_Size(TREEVIEW_INFO *infoPtr, WPARAM wParam, LPARAM lParam)
5335 {
5336     if (wParam == SIZE_RESTORED)
5337     {
5338         infoPtr->clientWidth  = (short)LOWORD(lParam);
5339         infoPtr->clientHeight = (short)HIWORD(lParam);
5340
5341         TREEVIEW_RecalculateVisibleOrder(infoPtr, NULL);
5342         TREEVIEW_SetFirstVisible(infoPtr, infoPtr->firstVisible, TRUE);
5343         TREEVIEW_UpdateScrollBars(infoPtr);
5344     }
5345     else
5346     {
5347         FIXME("WM_SIZE flag %lx %lx not handled\n", wParam, lParam);
5348     }
5349
5350     TREEVIEW_Invalidate(infoPtr, NULL);
5351     return 0;
5352 }
5353
5354 static LRESULT
5355 TREEVIEW_StyleChanged(TREEVIEW_INFO *infoPtr, WPARAM wParam, LPARAM lParam)
5356 {
5357     TRACE("(%lx %lx)\n", wParam, lParam);
5358
5359     if (wParam == GWL_STYLE)
5360     {
5361         DWORD dwNewStyle = ((LPSTYLESTRUCT)lParam)->styleNew;
5362
5363         if ((infoPtr->dwStyle ^ dwNewStyle) & TVS_CHECKBOXES)
5364         {
5365             if (dwNewStyle & TVS_CHECKBOXES)
5366             {
5367                 initialize_checkboxes(infoPtr);
5368                 TRACE("checkboxes enabled\n");
5369             }
5370             else
5371             {
5372                 FIXME("tried to disable checkboxes\n");
5373             }
5374         }
5375
5376         if ((infoPtr->dwStyle ^ dwNewStyle) & TVS_NOTOOLTIPS)
5377         {
5378             if (infoPtr->dwStyle & TVS_NOTOOLTIPS)
5379             {
5380                 infoPtr->hwndToolTip = COMCTL32_CreateToolTip(infoPtr->hwnd);
5381                 TRACE("tooltips enabled\n");
5382             }
5383             else
5384             {
5385                 DestroyWindow(infoPtr->hwndToolTip);
5386                 infoPtr->hwndToolTip = 0;
5387                 TRACE("tooltips disabled\n");
5388             }
5389         }
5390
5391         infoPtr->dwStyle = dwNewStyle;
5392     }
5393
5394     TREEVIEW_UpdateSubTree(infoPtr, infoPtr->root);
5395     TREEVIEW_UpdateScrollBars(infoPtr);
5396     TREEVIEW_Invalidate(infoPtr, NULL);
5397
5398     return 0;
5399 }
5400
5401 static LRESULT
5402 TREEVIEW_SetCursor(const TREEVIEW_INFO *infoPtr, WPARAM wParam, LPARAM lParam)
5403 {
5404     POINT pt;
5405     TREEVIEW_ITEM * item;
5406
5407     GetCursorPos(&pt);
5408     ScreenToClient(infoPtr->hwnd, &pt);
5409
5410     item = TREEVIEW_HitTestPoint(infoPtr, pt);
5411
5412     /* FIXME: send NM_SETCURSOR */
5413
5414     if (item && (infoPtr->dwStyle & TVS_TRACKSELECT))
5415     {
5416         SetCursor(infoPtr->hcurHand);
5417         return 0;
5418     }
5419     else
5420         return DefWindowProcW(infoPtr->hwnd, WM_SETCURSOR, wParam, lParam);
5421 }
5422
5423 static LRESULT
5424 TREEVIEW_SetFocus(TREEVIEW_INFO *infoPtr)
5425 {
5426     TRACE("\n");
5427
5428     if (!infoPtr->selectedItem)
5429     {
5430         TREEVIEW_DoSelectItem(infoPtr, TVGN_CARET, infoPtr->firstVisible,
5431                               TVC_UNKNOWN);
5432     }
5433
5434     TREEVIEW_Invalidate(infoPtr, infoPtr->selectedItem);
5435     TREEVIEW_SendSimpleNotify(infoPtr, NM_SETFOCUS);
5436     return 0;
5437 }
5438
5439 static LRESULT
5440 TREEVIEW_KillFocus(const TREEVIEW_INFO *infoPtr)
5441 {
5442     TRACE("\n");
5443
5444     TREEVIEW_Invalidate(infoPtr, infoPtr->selectedItem);
5445     UpdateWindow(infoPtr->hwnd);
5446     TREEVIEW_SendSimpleNotify(infoPtr, NM_KILLFOCUS);
5447     return 0;
5448 }
5449
5450 /* update theme after a WM_THEMECHANGED message */
5451 static LRESULT theme_changed(const TREEVIEW_INFO *infoPtr)
5452 {
5453     HTHEME theme = GetWindowTheme (infoPtr->hwnd);
5454     CloseThemeData (theme);
5455     OpenThemeData (infoPtr->hwnd, themeClass);
5456     return 0;
5457 }
5458
5459
5460 static LRESULT WINAPI
5461 TREEVIEW_WindowProc(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
5462 {
5463     TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd);
5464
5465     TRACE("hwnd %p msg %04x wp=%08lx lp=%08lx\n", hwnd, uMsg, wParam, lParam);
5466
5467     if (infoPtr) TREEVIEW_VerifyTree(infoPtr);
5468     else
5469     {
5470         if (uMsg == WM_CREATE)
5471             TREEVIEW_Create(hwnd, (LPCREATESTRUCTW)lParam);
5472         else
5473             goto def;
5474     }
5475
5476     switch (uMsg)
5477     {
5478     case TVM_CREATEDRAGIMAGE:
5479         return TREEVIEW_CreateDragImage(infoPtr, lParam);
5480
5481     case TVM_DELETEITEM:
5482         return TREEVIEW_DeleteItem(infoPtr, (HTREEITEM)lParam);
5483
5484     case TVM_EDITLABELA:
5485         return (LRESULT)TREEVIEW_EditLabel(infoPtr, (HTREEITEM)lParam);
5486
5487     case TVM_EDITLABELW:
5488         return (LRESULT)TREEVIEW_EditLabel(infoPtr, (HTREEITEM)lParam);
5489
5490     case TVM_ENDEDITLABELNOW:
5491         return TREEVIEW_EndEditLabelNow(infoPtr, (BOOL)wParam);
5492
5493     case TVM_ENSUREVISIBLE:
5494         return TREEVIEW_EnsureVisible(infoPtr, (HTREEITEM)lParam, TRUE);
5495
5496     case TVM_EXPAND:
5497         return TREEVIEW_ExpandMsg(infoPtr, (UINT)wParam, (HTREEITEM)lParam);
5498
5499     case TVM_GETBKCOLOR:
5500         return TREEVIEW_GetBkColor(infoPtr);
5501
5502     case TVM_GETCOUNT:
5503         return TREEVIEW_GetCount(infoPtr);
5504
5505     case TVM_GETEDITCONTROL:
5506         return TREEVIEW_GetEditControl(infoPtr);
5507
5508     case TVM_GETIMAGELIST:
5509         return TREEVIEW_GetImageList(infoPtr, wParam);
5510
5511     case TVM_GETINDENT:
5512         return TREEVIEW_GetIndent(infoPtr);
5513
5514     case TVM_GETINSERTMARKCOLOR:
5515         return TREEVIEW_GetInsertMarkColor(infoPtr);
5516
5517     case TVM_GETISEARCHSTRINGA:
5518         FIXME("Unimplemented msg TVM_GETISEARCHSTRINGA\n");
5519         return 0;
5520
5521     case TVM_GETISEARCHSTRINGW:
5522         FIXME("Unimplemented msg TVM_GETISEARCHSTRINGW\n");
5523         return 0;
5524
5525     case TVM_GETITEMA:
5526         return TREEVIEW_GetItemT(infoPtr, (LPTVITEMEXW)lParam, FALSE);
5527
5528     case TVM_GETITEMW:
5529         return TREEVIEW_GetItemT(infoPtr, (LPTVITEMEXW)lParam, TRUE);
5530
5531     case TVM_GETITEMHEIGHT:
5532         return TREEVIEW_GetItemHeight(infoPtr);
5533
5534     case TVM_GETITEMRECT:
5535         return TREEVIEW_GetItemRect(infoPtr, (BOOL)wParam, (LPRECT)lParam);
5536
5537     case TVM_GETITEMSTATE:
5538         return TREEVIEW_GetItemState(infoPtr, (HTREEITEM)wParam, (UINT)lParam);
5539
5540     case TVM_GETLINECOLOR:
5541         return TREEVIEW_GetLineColor(infoPtr);
5542
5543     case TVM_GETNEXTITEM:
5544         return TREEVIEW_GetNextItem(infoPtr, (UINT)wParam, (HTREEITEM)lParam);
5545
5546     case TVM_GETSCROLLTIME:
5547         return TREEVIEW_GetScrollTime(infoPtr);
5548
5549     case TVM_GETTEXTCOLOR:
5550         return TREEVIEW_GetTextColor(infoPtr);
5551
5552     case TVM_GETTOOLTIPS:
5553         return TREEVIEW_GetToolTips(infoPtr);
5554
5555     case TVM_GETUNICODEFORMAT:
5556         return TREEVIEW_GetUnicodeFormat(infoPtr);
5557
5558     case TVM_GETVISIBLECOUNT:
5559         return TREEVIEW_GetVisibleCount(infoPtr);
5560
5561     case TVM_HITTEST:
5562         return TREEVIEW_HitTest(infoPtr, (LPTVHITTESTINFO)lParam);
5563
5564     case TVM_INSERTITEMA:
5565         return TREEVIEW_InsertItemT(infoPtr, (LPTVINSERTSTRUCTW)lParam, FALSE);
5566
5567     case TVM_INSERTITEMW:
5568         return TREEVIEW_InsertItemT(infoPtr, (LPTVINSERTSTRUCTW)lParam, TRUE);
5569
5570     case TVM_SELECTITEM:
5571         return TREEVIEW_SelectItem(infoPtr, (INT)wParam, (HTREEITEM)lParam);
5572
5573     case TVM_SETBKCOLOR:
5574         return TREEVIEW_SetBkColor(infoPtr, (COLORREF)lParam);
5575
5576     case TVM_SETIMAGELIST:
5577         return TREEVIEW_SetImageList(infoPtr, wParam, (HIMAGELIST)lParam);
5578
5579     case TVM_SETINDENT:
5580         return TREEVIEW_SetIndent(infoPtr, (UINT)wParam);
5581
5582     case TVM_SETINSERTMARK:
5583         return TREEVIEW_SetInsertMark(infoPtr, (BOOL)wParam, (HTREEITEM)lParam);
5584
5585     case TVM_SETINSERTMARKCOLOR:
5586         return TREEVIEW_SetInsertMarkColor(infoPtr, (COLORREF)lParam);
5587
5588     case TVM_SETITEMA:
5589         return TREEVIEW_SetItemT(infoPtr, (LPTVITEMEXW)lParam, FALSE);
5590
5591     case TVM_SETITEMW:
5592         return TREEVIEW_SetItemT(infoPtr, (LPTVITEMEXW)lParam, TRUE);
5593
5594     case TVM_SETLINECOLOR:
5595         return TREEVIEW_SetLineColor(infoPtr, (COLORREF)lParam);
5596
5597     case TVM_SETITEMHEIGHT:
5598         return TREEVIEW_SetItemHeight(infoPtr, (INT)(SHORT)wParam);
5599
5600     case TVM_SETSCROLLTIME:
5601         return TREEVIEW_SetScrollTime(infoPtr, (UINT)wParam);
5602
5603     case TVM_SETTEXTCOLOR:
5604         return TREEVIEW_SetTextColor(infoPtr, (COLORREF)lParam);
5605
5606     case TVM_SETTOOLTIPS:
5607         return TREEVIEW_SetToolTips(infoPtr, (HWND)wParam);
5608
5609     case TVM_SETUNICODEFORMAT:
5610         return TREEVIEW_SetUnicodeFormat(infoPtr, (BOOL)wParam);
5611
5612     case TVM_SORTCHILDREN:
5613         return TREEVIEW_SortChildren(infoPtr, lParam);
5614
5615     case TVM_SORTCHILDRENCB:
5616         return TREEVIEW_SortChildrenCB(infoPtr, (LPTVSORTCB)lParam);
5617
5618     case WM_CHAR:
5619         return TREEVIEW_ProcessLetterKeys( hwnd, wParam, lParam );
5620
5621     case WM_COMMAND:
5622         return TREEVIEW_Command(infoPtr, wParam, lParam);
5623
5624     case WM_DESTROY:
5625         return TREEVIEW_Destroy(infoPtr);
5626
5627         /* WM_ENABLE */
5628
5629     case WM_ERASEBKGND:
5630         return TREEVIEW_EraseBackground(infoPtr, (HDC)wParam);
5631
5632     case WM_GETDLGCODE:
5633         return DLGC_WANTARROWS | DLGC_WANTCHARS;
5634
5635     case WM_GETFONT:
5636         return TREEVIEW_GetFont(infoPtr);
5637
5638     case WM_HSCROLL:
5639         return TREEVIEW_HScroll(infoPtr, wParam);
5640
5641     case WM_KEYDOWN:
5642         return TREEVIEW_KeyDown(infoPtr, wParam);
5643
5644     case WM_KILLFOCUS:
5645         return TREEVIEW_KillFocus(infoPtr);
5646
5647     case WM_LBUTTONDBLCLK:
5648         return TREEVIEW_LButtonDoubleClick(infoPtr, lParam);
5649
5650     case WM_LBUTTONDOWN:
5651         return TREEVIEW_LButtonDown(infoPtr, lParam);
5652
5653         /* WM_MBUTTONDOWN */
5654
5655     case WM_MOUSELEAVE:
5656         return TREEVIEW_MouseLeave(infoPtr);
5657
5658     case WM_MOUSEMOVE:
5659         if (infoPtr->dwStyle & TVS_TRACKSELECT)
5660             return TREEVIEW_MouseMove(infoPtr, lParam);
5661         else
5662             return 0;
5663
5664     case WM_NCLBUTTONDOWN:
5665         if (infoPtr->hwndEdit)
5666             SetFocus(infoPtr->hwnd);
5667         goto def;
5668
5669     case WM_NCPAINT:
5670         if (nc_paint (infoPtr, (HRGN)wParam))
5671             return 0;
5672         goto def;
5673
5674     case WM_NOTIFY:
5675         return TREEVIEW_Notify(infoPtr, wParam, lParam);
5676
5677     case WM_NOTIFYFORMAT:
5678         return TREEVIEW_NotifyFormat(infoPtr, (HWND)wParam, (UINT)lParam);
5679
5680     case WM_PRINTCLIENT:
5681     case WM_PAINT:
5682         return TREEVIEW_Paint(infoPtr, wParam);
5683
5684     case WM_RBUTTONDOWN:
5685         return TREEVIEW_RButtonDown(infoPtr, lParam);
5686
5687     case WM_SETCURSOR:
5688         return TREEVIEW_SetCursor(infoPtr, wParam, lParam);
5689
5690     case WM_SETFOCUS:
5691         return TREEVIEW_SetFocus(infoPtr);
5692
5693     case WM_SETFONT:
5694         return TREEVIEW_SetFont(infoPtr, (HFONT)wParam, (BOOL)lParam);
5695
5696     case WM_SETREDRAW:
5697         return TREEVIEW_SetRedraw(infoPtr, wParam);
5698
5699     case WM_SIZE:
5700         return TREEVIEW_Size(infoPtr, wParam, lParam);
5701
5702     case WM_STYLECHANGED:
5703         return TREEVIEW_StyleChanged(infoPtr, wParam, lParam);
5704
5705         /* WM_SYSCOLORCHANGE */
5706
5707         /* WM_SYSKEYDOWN */
5708
5709     case WM_TIMER:
5710         return TREEVIEW_HandleTimer(infoPtr, wParam);
5711
5712     case WM_THEMECHANGED:
5713         return theme_changed (infoPtr);
5714
5715     case WM_VSCROLL:
5716         return TREEVIEW_VScroll(infoPtr, wParam);
5717
5718         /* WM_WININICHANGE */
5719
5720     case WM_MOUSEWHEEL:
5721         if (wParam & (MK_SHIFT | MK_CONTROL))
5722             goto def;
5723         return TREEVIEW_MouseWheel(infoPtr, wParam);
5724
5725     case WM_DRAWITEM:
5726         TRACE("drawItem\n");
5727         goto def;
5728
5729     default:
5730         /* This mostly catches MFC and Delphi messages. :( */
5731         if ((uMsg >= WM_USER) && (uMsg < WM_APP) && !COMCTL32_IsReflectedMessage(uMsg))
5732             TRACE("Unknown msg %04x wp=%08lx lp=%08lx\n", uMsg, wParam, lParam);
5733 def:
5734         return DefWindowProcW(hwnd, uMsg, wParam, lParam);
5735     }
5736 }
5737
5738
5739 /* Class Registration ***************************************************/
5740
5741 VOID
5742 TREEVIEW_Register(void)
5743 {
5744     WNDCLASSW wndClass;
5745
5746     TRACE("\n");
5747
5748     ZeroMemory(&wndClass, sizeof(WNDCLASSW));
5749     wndClass.style = CS_GLOBALCLASS | CS_DBLCLKS;
5750     wndClass.lpfnWndProc = TREEVIEW_WindowProc;
5751     wndClass.cbClsExtra = 0;
5752     wndClass.cbWndExtra = sizeof(TREEVIEW_INFO *);
5753
5754     wndClass.hCursor = LoadCursorW(0, (LPWSTR)IDC_ARROW);
5755     wndClass.hbrBackground = 0;
5756     wndClass.lpszClassName = WC_TREEVIEWW;
5757
5758     RegisterClassW(&wndClass);
5759 }
5760
5761
5762 VOID
5763 TREEVIEW_Unregister(void)
5764 {
5765     UnregisterClassW(WC_TREEVIEWW, NULL);
5766 }
5767
5768
5769 /* Tree Verification ****************************************************/
5770
5771 #ifdef NDEBUG
5772 static inline void
5773 TREEVIEW_VerifyChildren(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item);
5774
5775 static inline void TREEVIEW_VerifyItemCommon(TREEVIEW_INFO *infoPtr,
5776                                              TREEVIEW_ITEM *item)
5777 {
5778     assert(infoPtr != NULL);
5779     assert(item != NULL);
5780
5781     /* both NULL, or both non-null */
5782     assert((item->firstChild == NULL) == (item->lastChild == NULL));
5783
5784     assert(item->firstChild != item);
5785     assert(item->lastChild != item);
5786
5787     if (item->firstChild)
5788     {
5789         assert(item->firstChild->parent == item);
5790         assert(item->firstChild->prevSibling == NULL);
5791     }
5792
5793     if (item->lastChild)
5794     {
5795         assert(item->lastChild->parent == item);
5796         assert(item->lastChild->nextSibling == NULL);
5797     }
5798
5799     assert(item->nextSibling != item);
5800     if (item->nextSibling)
5801     {
5802         assert(item->nextSibling->parent == item->parent);
5803         assert(item->nextSibling->prevSibling == item);
5804     }
5805
5806     assert(item->prevSibling != item);
5807     if (item->prevSibling)
5808     {
5809         assert(item->prevSibling->parent == item->parent);
5810         assert(item->prevSibling->nextSibling == item);
5811     }
5812 }
5813
5814 static inline void
5815 TREEVIEW_VerifyItem(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item)
5816 {
5817     assert(item != NULL);
5818
5819     assert(item->parent != NULL);
5820     assert(item->parent != item);
5821     assert(item->iLevel == item->parent->iLevel + 1);
5822
5823     assert(DPA_GetPtrIndex(infoPtr->items, item) != -1);
5824
5825     TREEVIEW_VerifyItemCommon(infoPtr, item);
5826
5827     TREEVIEW_VerifyChildren(infoPtr, item);
5828 }
5829
5830 static inline void
5831 TREEVIEW_VerifyChildren(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item)
5832 {
5833     TREEVIEW_ITEM *child;
5834     assert(item != NULL);
5835
5836     for (child = item->firstChild; child != NULL; child = child->nextSibling)
5837         TREEVIEW_VerifyItem(infoPtr, child);
5838 }
5839
5840 static inline void
5841 TREEVIEW_VerifyRoot(TREEVIEW_INFO *infoPtr)
5842 {
5843     TREEVIEW_ITEM *root = infoPtr->root;
5844
5845     assert(root != NULL);
5846     assert(root->iLevel == -1);
5847     assert(root->parent == NULL);
5848     assert(root->prevSibling == NULL);
5849
5850     TREEVIEW_VerifyItemCommon(infoPtr, root);
5851
5852     TREEVIEW_VerifyChildren(infoPtr, root);
5853 }
5854
5855 static void
5856 TREEVIEW_VerifyTree(TREEVIEW_INFO *infoPtr)
5857 {
5858     assert(infoPtr != NULL);
5859
5860     TREEVIEW_VerifyRoot(infoPtr);
5861 }
5862 #endif