treeview.c

Go to the documentation of this file.

/* Treeview control
 *
 * Copyright 1998 Eric Kohl <ekohl@abo.rhein-zeitung.de>
 * Copyright 1998,1999 Alex Priem <alexp@sci.kun.nl>
 * Copyright 1999 Sylvain St-Germain
 * Copyright 2002 CodeWeavers, Aric Stewart
 *
 * This library is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation; either
 * version 2.1 of the License, or (at your option) any later version.
 *
 * This library is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * Lesser General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public
 * License along with this library; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
 *
 * NOTES
 *
 * Note that TREEVIEW_INFO * and HTREEITEM are the same thing.
 *
 * Note2: If item's text == LPSTR_TEXTCALLBACKA we allocate buffer
 *      of size TEXT_CALLBACK_SIZE in DoSetItem.
 *      We use callbackMask to keep track of fields to be updated.
 *
 * TODO:
 *   missing notifications: TVN_GETINFOTIP, TVN_KEYDOWN,
 *      TVN_SETDISPINFO
 *
 *   missing styles: TVS_INFOTIP, TVS_RTLREADING,
 *
 *   missing item styles: TVIS_EXPANDPARTIAL, TVIS_EX_FLAT,
 *      TVIS_EX_DISABLED
 *
 *   Make the insertion mark look right.
 *   Scroll (instead of repaint) as much as possible.
 */
 
#include "config.h"
#include "wine/port.h"
 
#include <assert.h>
#include <ctype.h>
#include <stdarg.h>
#include <string.h>
#include <limits.h>
#include <stdlib.h>
 
#define NONAMELESSUNION
 
#include "windef.h"
#include "winbase.h"
#include "wingdi.h"
#include "winuser.h"
#include "winnls.h"
#include "commctrl.h"
#include "comctl32.h"
#include "uxtheme.h"
#include "vssym32.h"
#include "wine/unicode.h"
#include "wine/debug.h"
#include "wine/exception.h"
#include "wine/heap.h"
 
WINE_DEFAULT_DEBUG_CHANNEL(treeview);
 
/* internal structures */
typedef struct tagTREEVIEW_INFO
{
  HWND          hwnd;
  HWND          hwndNotify;     /* Owner window to send notifications to */
  DWORD         dwStyle;
  HTREEITEM     root;
  UINT          uInternalStatus;
  INT           Timer;
  UINT          uNumItems;      /* number of valid TREEVIEW_ITEMs */
  INT           cdmode;         /* last custom draw setting */
  UINT          uScrollTime;    /* max. time for scrolling in milliseconds */
  BOOL          bRedraw;        /* if FALSE we validate but don't redraw in TREEVIEW_Paint() */
 
  UINT          uItemHeight;    /* item height */
  BOOL          bHeightSet;
 
  LONG          clientWidth;    /* width of control window */
  LONG          clientHeight;   /* height of control window */
 
  LONG          treeWidth;      /* width of visible tree items */
  LONG          treeHeight;     /* height of visible tree items */
 
  UINT          uIndent;        /* indentation in pixels */
  HTREEITEM     selectedItem;   /* handle to selected item or 0 if none */
  HTREEITEM     hotItem;        /* handle currently under cursor, 0 if none */
  HTREEITEM focusedItem;    /* item that was under the cursor when WM_LBUTTONDOWN was received */
  HTREEITEM     editItem;       /* item being edited with builtin edit box */
 
  HTREEITEM     firstVisible;   /* handle to item whose top edge is at y = 0 */
  LONG          maxVisibleOrder;
  HTREEITEM     dropItem;       /* handle to item selected by drag cursor */
  HTREEITEM     insertMarkItem; /* item after which insertion mark is placed */
  BOOL          insertBeforeorAfter; /* flag used by TVM_SETINSERTMARK */
  HIMAGELIST    dragList;       /* Bitmap of dragged item */
  LONG          scrollX;
  INT           wheelRemainder;
  COLORREF      clrBk;
  COLORREF      clrText;
  COLORREF      clrLine;
  COLORREF      clrInsertMark;
  HFONT         hFont;
  HFONT         hDefaultFont;
  HFONT         hBoldFont;
  HFONT         hUnderlineFont;
  HFONT         hBoldUnderlineFont;
  HCURSOR       hcurHand;
  HWND          hwndToolTip;
 
  HWND          hwndEdit;
  WNDPROC       wpEditOrig;     /* orig window proc for subclassing edit */
  BOOL          bIgnoreEditKillFocus;
  BOOL          bLabelChanged;
 
  BOOL          bNtfUnicode;    /* TRUE if should send NOTIFY with W */
  HIMAGELIST    himlNormal;
  int           normalImageHeight;
  int           normalImageWidth;
  HIMAGELIST    himlState;
  int           stateImageHeight;
  int           stateImageWidth;
  HDPA          items;
 
  DWORD lastKeyPressTimestamp;
  WPARAM charCode;
  INT nSearchParamLength;
  WCHAR szSearchParam[ MAX_PATH ];
} TREEVIEW_INFO;
 
typedef struct _TREEITEM    /* HTREEITEM is a _TREEINFO *. */
{
  HTREEITEM parent;         /* handle to parent or 0 if at root */
  HTREEITEM nextSibling;    /* handle to next item in list, 0 if last */
  HTREEITEM firstChild;     /* handle to first child or 0 if no child */
 
  UINT      callbackMask;
  UINT      state;
  UINT      stateMask;
  LPWSTR    pszText;
  int       cchTextMax;
  int       iImage;
  int       iSelectedImage;
  int       iExpandedImage;
  int       cChildren;
  LPARAM    lParam;
  int       iIntegral;      /* item height multiplier (1 is normal) */
  int       iLevel;         /* indentation level:0=root level */
  HTREEITEM lastChild;
  HTREEITEM prevSibling;    /* handle to prev item in list, 0 if first */
  RECT      rect;
  LONG      linesOffset;
  LONG      stateOffset;
  LONG      imageOffset;
  LONG      textOffset;
  LONG      textWidth;      /* horizontal text extent for pszText */
  LONG      visibleOrder;   /* Depth-first numbering of the items whose ancestors are all expanded,
                               corresponding to a top-to-bottom ordering in the tree view.
                               Each item takes up "item.iIntegral" spots in the visible order.
                               0 is the root's first child. */
  const TREEVIEW_INFO *infoPtr; /* tree data this item belongs to */
} TREEVIEW_ITEM;
 
/******** Defines that TREEVIEW_ProcessLetterKeys uses ****************/
#define KEY_DELAY       450
 
/* bitflags for infoPtr->uInternalStatus */
 
#define TV_HSCROLL  0x01    /* treeview too large to fit in window */
#define TV_VSCROLL  0x02    /* (horizontal/vertical) */
#define TV_LDRAG        0x04    /* Lbutton pushed to start drag */
#define TV_LDRAGGING    0x08    /* Lbutton pushed, mouse moved. */
#define TV_RDRAG        0x10    /* ditto Rbutton */
#define TV_RDRAGGING    0x20
 
/* bitflags for infoPtr->timer */
 
#define TV_EDIT_TIMER    2
#define TV_EDIT_TIMER_SET 2
 
#define TEXT_CALLBACK_SIZE 260
 
#define TREEVIEW_LEFT_MARGIN 8
 
#define MINIMUM_INDENT 19
 
#define CALLBACK_MASK_ALL (TVIF_TEXT|TVIF_CHILDREN|TVIF_IMAGE|TVIF_SELECTEDIMAGE)
 
#define STATEIMAGEINDEX(x) (((x) >> 12) & 0x0f)
#define OVERLAYIMAGEINDEX(x) (((x) >> 8) & 0x0f)
#define ISVISIBLE(x)         ((x)->visibleOrder >= 0)
 
#define GETLINECOLOR(x) ((x) == CLR_DEFAULT ? comctl32_color.clrGrayText   : (x))
#define GETBKCOLOR(x)   ((x) == CLR_NONE    ? comctl32_color.clrWindow     : (x))
#define GETTXTCOLOR(x)  ((x) == CLR_NONE    ? comctl32_color.clrWindowText : (x))
#define GETINSCOLOR(x)  ((x) == CLR_DEFAULT ? comctl32_color.clrBtnText    : (x))
 
static const WCHAR themeClass[] = { 'T','r','e','e','v','i','e','w',0 };
 
 
typedef VOID (*TREEVIEW_ItemEnumFunc)(TREEVIEW_INFO *, TREEVIEW_ITEM *,LPVOID);
 
 
static VOID TREEVIEW_Invalidate(const TREEVIEW_INFO *, const TREEVIEW_ITEM *);
 
static LRESULT TREEVIEW_DoSelectItem(TREEVIEW_INFO *, INT, HTREEITEM, INT);
static VOID TREEVIEW_SetFirstVisible(TREEVIEW_INFO *, TREEVIEW_ITEM *, BOOL);
static LRESULT TREEVIEW_EnsureVisible(TREEVIEW_INFO *, HTREEITEM, BOOL);
static LRESULT TREEVIEW_EndEditLabelNow(TREEVIEW_INFO *infoPtr, BOOL bCancel);
static VOID TREEVIEW_UpdateScrollBars(TREEVIEW_INFO *infoPtr);
static LRESULT TREEVIEW_HScroll(TREEVIEW_INFO *, WPARAM);
 
/* Random Utilities *****************************************************/
static void TREEVIEW_VerifyTree(TREEVIEW_INFO *infoPtr);
 
/* Returns the treeview private data if hwnd is a treeview.
 * Otherwise returns an undefined value. */
static inline TREEVIEW_INFO *
TREEVIEW_GetInfoPtr(HWND hwnd)
{
    return (TREEVIEW_INFO *)GetWindowLongPtrW(hwnd, 0);
}
 
/* Don't call this. Nothing wants an item index. */
static inline int
TREEVIEW_GetItemIndex(const TREEVIEW_INFO *infoPtr, HTREEITEM handle)
{
    return DPA_GetPtrIndex(infoPtr->items, handle);
}
 
/* Checks if item has changed and needs to be redrawn */
static inline BOOL item_changed (const TREEVIEW_ITEM *tiOld, const TREEVIEW_ITEM *tiNew,
                                 const TVITEMEXW *tvChange)
{
    /* Number of children has changed */
    if ((tvChange->mask & TVIF_CHILDREN) && (tiOld->cChildren != tiNew->cChildren))
    return TRUE;
 
    /* Image has changed and it's not a callback */
    if ((tvChange->mask & TVIF_IMAGE) && (tiOld->iImage != tiNew->iImage) &&
    tiNew->iImage != I_IMAGECALLBACK)
    return TRUE;
 
    /* Selected image has changed and it's not a callback */
    if ((tvChange->mask & TVIF_SELECTEDIMAGE) && (tiOld->iSelectedImage != tiNew->iSelectedImage) &&
    tiNew->iSelectedImage != I_IMAGECALLBACK)
    return TRUE;
 
    if ((tvChange->mask & TVIF_EXPANDEDIMAGE) && (tiOld->iExpandedImage != tiNew->iExpandedImage) &&
    tiNew->iExpandedImage != I_IMAGECALLBACK)
    return TRUE;
 
    /* Text has changed and it's not a callback */
    if ((tvChange->mask & TVIF_TEXT) && (tiOld->pszText != tiNew->pszText) &&
    tiNew->pszText != LPSTR_TEXTCALLBACKW)
    return TRUE;
 
    /* Indent has changed */
    if ((tvChange->mask & TVIF_INTEGRAL) && (tiOld->iIntegral != tiNew->iIntegral))
    return TRUE;
 
    /* Item state has changed */
    if ((tvChange->mask & TVIF_STATE) && ((tiOld->state ^ tiNew->state) & tvChange->stateMask ))
    return TRUE;
 
    return FALSE;
}
 
/***************************************************************************
 * This method checks that handle is an item for this tree.
 */
static BOOL
TREEVIEW_ValidItem(const TREEVIEW_INFO *infoPtr, HTREEITEM handle)
{
    if (TREEVIEW_GetItemIndex(infoPtr, handle) == -1)
    {
    TRACE("invalid item %p\n", handle);
    return FALSE;
    }
    else
    return TRUE;
}
 
static HFONT
TREEVIEW_CreateBoldFont(HFONT hOrigFont)
{
    LOGFONTW font;
 
    GetObjectW(hOrigFont, sizeof(font), &font);
    font.lfWeight = FW_BOLD;
    return CreateFontIndirectW(&font);
}
 
static HFONT
TREEVIEW_CreateUnderlineFont(HFONT hOrigFont)
{
    LOGFONTW font;
 
    GetObjectW(hOrigFont, sizeof(font), &font);
    font.lfUnderline = TRUE;
    return CreateFontIndirectW(&font);
}
 
static HFONT
TREEVIEW_CreateBoldUnderlineFont(HFONT hfont)
{
    LOGFONTW font;
 
    GetObjectW(hfont, sizeof(font), &font);
    font.lfWeight = FW_BOLD;
    font.lfUnderline = TRUE;
    return CreateFontIndirectW(&font);
}
 
static inline HFONT
TREEVIEW_FontForItem(const TREEVIEW_INFO *infoPtr, const TREEVIEW_ITEM *item)
{
    if ((infoPtr->dwStyle & TVS_TRACKSELECT) && (item == infoPtr->hotItem))
        return item->state & TVIS_BOLD ? infoPtr->hBoldUnderlineFont : infoPtr->hUnderlineFont;
    if (item->state & TVIS_BOLD)
        return infoPtr->hBoldFont;
    return infoPtr->hFont;
}
 
/* for trace/debugging purposes only */
static const char *
TREEVIEW_ItemName(const TREEVIEW_ITEM *item)
{
    if (item == NULL) return "<null item>";
    if (item->pszText == LPSTR_TEXTCALLBACKW) return "<callback>";
    if (item->pszText == NULL) return "<null>";
    return debugstr_w(item->pszText);
}
 
/* An item is not a child of itself. */
static BOOL
TREEVIEW_IsChildOf(const TREEVIEW_ITEM *parent, const TREEVIEW_ITEM *child)
{
    do
    {
    child = child->parent;
    if (child == parent) return TRUE;
    } while (child != NULL);
 
    return FALSE;
}
 
static BOOL
TREEVIEW_IsFullRowSelect(const TREEVIEW_INFO *infoPtr)
{
    return !(infoPtr->dwStyle & TVS_HASLINES) && (infoPtr->dwStyle & TVS_FULLROWSELECT);
}
 
static BOOL
TREEVIEW_IsItemHit(const TREEVIEW_INFO *infoPtr, const TVHITTESTINFO *ht)
{
    if (TREEVIEW_IsFullRowSelect(infoPtr))
        return ht->flags & (TVHT_ONITEMINDENT | TVHT_ONITEMBUTTON | TVHT_ONITEM | TVHT_ONITEMRIGHT);
    else
        return ht->flags & TVHT_ONITEM;
}
 
/* Tree Traversal *******************************************************/
 
/***************************************************************************
 * This method returns the last expanded sibling or child child item
 * of a tree node
 */
static TREEVIEW_ITEM *
TREEVIEW_GetLastListItem(const TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item)
{
    if (!item) return NULL;
 
    while (item->lastChild)
    {
       if (item->state & TVIS_EXPANDED)
          item = item->lastChild;
       else
          break;
    }
 
    if (item == infoPtr->root)
        return NULL;
 
    return item;
}
 
/***************************************************************************
 * This method returns the previous non-hidden item in the list not
 * considering the tree hierarchy.
 */
static TREEVIEW_ITEM *
TREEVIEW_GetPrevListItem(const TREEVIEW_INFO *infoPtr, const TREEVIEW_ITEM *tvItem)
{
    if (tvItem->prevSibling)
    {
    /* This item has a prevSibling, get the last item in the sibling's tree. */
    TREEVIEW_ITEM *upItem = tvItem->prevSibling;
 
    if ((upItem->state & TVIS_EXPANDED) && upItem->lastChild != NULL)
        return TREEVIEW_GetLastListItem(infoPtr, upItem->lastChild);
    else
        return upItem;
    }
    else
    {
    /* this item does not have a prevSibling, get the parent */
    return (tvItem->parent != infoPtr->root) ? tvItem->parent : NULL;
    }
}
 
 
/***************************************************************************
 * This method returns the next physical item in the treeview not
 * considering the tree hierarchy.
 */
static TREEVIEW_ITEM *
TREEVIEW_GetNextListItem(const TREEVIEW_INFO *infoPtr, const TREEVIEW_ITEM *tvItem)
{
    /*
     * If this item has children and is expanded, return the first child
     */
    if ((tvItem->state & TVIS_EXPANDED) && tvItem->firstChild != NULL)
    {
    return tvItem->firstChild;
    }
 
 
    /*
     * try to get the sibling
     */
    if (tvItem->nextSibling)
    return tvItem->nextSibling;
 
    /*
     * Otherwise, get the parent's sibling.
     */
    while (tvItem->parent)
    {
    tvItem = tvItem->parent;
 
    if (tvItem->nextSibling)
        return tvItem->nextSibling;
    }
 
    return NULL;
}
 
/***************************************************************************
 * This method returns the nth item starting at the given item.  It returns
 * the last item (or first) we we run out of items.
 *
 * Will scroll backward if count is <0.
 *             forward if count is >0.
 */
static TREEVIEW_ITEM *
TREEVIEW_GetListItem(const TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item,
             LONG count)
{
    TREEVIEW_ITEM *(*next_item)(const TREEVIEW_INFO *, const TREEVIEW_ITEM *);
    TREEVIEW_ITEM *previousItem;
 
    assert(item != NULL);
 
    if (count > 0)
    {
    next_item = TREEVIEW_GetNextListItem;
    }
    else if (count < 0)
    {
    count = -count;
    next_item = TREEVIEW_GetPrevListItem;
    }
    else
    return item;
 
    do
    {
    previousItem = item;
    item = next_item(infoPtr, item);
 
    } while (--count && item != NULL);
 
 
    return item ? item : previousItem;
}
 
/* Notifications ************************************************************/
 
static INT get_notifycode(const TREEVIEW_INFO *infoPtr, INT code)
{
    if (!infoPtr->bNtfUnicode) {
    switch (code) {
    case TVN_SELCHANGINGW:    return TVN_SELCHANGINGA;
    case TVN_SELCHANGEDW:     return TVN_SELCHANGEDA;
    case TVN_GETDISPINFOW:    return TVN_GETDISPINFOA;
    case TVN_SETDISPINFOW:    return TVN_SETDISPINFOA;
    case TVN_ITEMEXPANDINGW:  return TVN_ITEMEXPANDINGA;
    case TVN_ITEMEXPANDEDW:   return TVN_ITEMEXPANDEDA;
    case TVN_BEGINDRAGW:      return TVN_BEGINDRAGA;
    case TVN_BEGINRDRAGW:     return TVN_BEGINRDRAGA;
    case TVN_DELETEITEMW:     return TVN_DELETEITEMA;
    case TVN_BEGINLABELEDITW: return TVN_BEGINLABELEDITA;
    case TVN_ENDLABELEDITW:   return TVN_ENDLABELEDITA;
    case TVN_GETINFOTIPW:     return TVN_GETINFOTIPA;
    }
    }
    return code;
}
 
static inline BOOL
TREEVIEW_SendRealNotify(const TREEVIEW_INFO *infoPtr, UINT code, NMHDR *hdr)
{
    TRACE("code=%d, hdr=%p\n", code, hdr);
 
    hdr->hwndFrom = infoPtr->hwnd;
    hdr->idFrom = GetWindowLongPtrW(infoPtr->hwnd, GWLP_ID);
    hdr->code = get_notifycode(infoPtr, code);
 
    return SendMessageW(infoPtr->hwndNotify, WM_NOTIFY, hdr->idFrom, (LPARAM)hdr);
}
 
static BOOL
TREEVIEW_SendSimpleNotify(const TREEVIEW_INFO *infoPtr, UINT code)
{
    NMHDR hdr;
    return TREEVIEW_SendRealNotify(infoPtr, code, &hdr);
}
 
static VOID
TREEVIEW_TVItemFromItem(const TREEVIEW_INFO *infoPtr, UINT mask, TVITEMW *tvItem, TREEVIEW_ITEM *item)
{
    tvItem->mask = mask;
    tvItem->hItem = item;
    tvItem->state = item->state;
    tvItem->stateMask = 0;
    tvItem->iImage = item->iImage;
    tvItem->iSelectedImage = item->iSelectedImage;
    tvItem->cChildren = item->cChildren;
    tvItem->lParam = item->lParam;
 
    if(mask & TVIF_TEXT)
    {
        if (!infoPtr->bNtfUnicode)
        {
            tvItem->cchTextMax = WideCharToMultiByte( CP_ACP, 0, item->pszText, -1, NULL, 0, NULL, NULL );
            tvItem->pszText = heap_alloc (tvItem->cchTextMax);
            WideCharToMultiByte( CP_ACP, 0, item->pszText, -1, (LPSTR)tvItem->pszText, tvItem->cchTextMax, 0, 0 );
    }
        else
        {
            tvItem->cchTextMax = item->cchTextMax;
            tvItem->pszText = item->pszText;
        }
    }
    else
    {
        tvItem->cchTextMax = 0;
        tvItem->pszText = NULL;
    }
}
 
static BOOL
TREEVIEW_SendTreeviewNotify(const TREEVIEW_INFO *infoPtr, UINT code, UINT action,
                UINT mask, HTREEITEM oldItem, HTREEITEM newItem)
{
    NMTREEVIEWW nmhdr;
    BOOL ret;
 
    TRACE("code:%d action:0x%x olditem:%p newitem:%p\n",
      code, action, oldItem, newItem);
 
    memset(&nmhdr, 0, sizeof(NMTREEVIEWW));
    nmhdr.action = action;
 
    if (oldItem)
    TREEVIEW_TVItemFromItem(infoPtr, mask, &nmhdr.itemOld, oldItem);
 
    if (newItem)
    TREEVIEW_TVItemFromItem(infoPtr, mask, &nmhdr.itemNew, newItem);
 
    nmhdr.ptDrag.x = 0;
    nmhdr.ptDrag.y = 0;
 
    ret = TREEVIEW_SendRealNotify(infoPtr, code, &nmhdr.hdr);
    if (!infoPtr->bNtfUnicode)
    {
        heap_free(nmhdr.itemOld.pszText);
        heap_free(nmhdr.itemNew.pszText);
    }
    return ret;
}
 
static BOOL
TREEVIEW_SendTreeviewDnDNotify(const TREEVIEW_INFO *infoPtr, UINT code,
                   HTREEITEM dragItem, POINT pt)
{
    NMTREEVIEWW nmhdr;
 
    TRACE("code:%d dragitem:%p\n", code, dragItem);
 
    nmhdr.action = 0;
    nmhdr.itemNew.mask = TVIF_STATE | TVIF_PARAM | TVIF_HANDLE;
    nmhdr.itemNew.hItem = dragItem;
    nmhdr.itemNew.state = dragItem->state;
    nmhdr.itemNew.lParam = dragItem->lParam;
 
    nmhdr.ptDrag.x = pt.x;
    nmhdr.ptDrag.y = pt.y;
 
    return TREEVIEW_SendRealNotify(infoPtr, code, &nmhdr.hdr);
}
 
 
static BOOL
TREEVIEW_SendCustomDrawNotify(const TREEVIEW_INFO *infoPtr, DWORD dwDrawStage,
                  HDC hdc, RECT rc)
{
    NMTVCUSTOMDRAW nmcdhdr;
    NMCUSTOMDRAW *nmcd;
 
    TRACE("drawstage:0x%x hdc:%p\n", dwDrawStage, hdc);
 
    nmcd = &nmcdhdr.nmcd;
    nmcd->dwDrawStage = dwDrawStage;
    nmcd->hdc = hdc;
    nmcd->rc = rc;
    nmcd->dwItemSpec = 0;
    nmcd->uItemState = 0;
    nmcd->lItemlParam = 0;
    nmcdhdr.clrText = infoPtr->clrText;
    nmcdhdr.clrTextBk = infoPtr->clrBk;
    nmcdhdr.iLevel = 0;
 
    return TREEVIEW_SendRealNotify(infoPtr, NM_CUSTOMDRAW, &nmcdhdr.nmcd.hdr);
}
 
/* FIXME: need to find out when the flags in uItemState need to be set */
 
static BOOL
TREEVIEW_SendCustomDrawItemNotify(const TREEVIEW_INFO *infoPtr, HDC hdc,
                  TREEVIEW_ITEM *item, UINT uItemDrawState,
                  NMTVCUSTOMDRAW *nmcdhdr)
{
    NMCUSTOMDRAW *nmcd;
    DWORD dwDrawStage;
    DWORD_PTR dwItemSpec;
    UINT uItemState;
 
    dwDrawStage = CDDS_ITEM | uItemDrawState;
    dwItemSpec = (DWORD_PTR)item;
    uItemState = 0;
    if (item->state & TVIS_SELECTED)
    uItemState |= CDIS_SELECTED;
    if (item == infoPtr->selectedItem)
    uItemState |= CDIS_FOCUS;
    if (item == infoPtr->hotItem)
    uItemState |= CDIS_HOT;
 
    nmcd = &nmcdhdr->nmcd;
    nmcd->dwDrawStage = dwDrawStage;
    nmcd->hdc = hdc;
    nmcd->rc = item->rect;
    nmcd->dwItemSpec = dwItemSpec;
    nmcd->uItemState = uItemState;
    nmcd->lItemlParam = item->lParam;
    nmcdhdr->iLevel = item->iLevel;
 
    TRACE("drawstage:0x%x hdc:%p item:%lx, itemstate:0x%x, lItemlParam:0x%lx\n",
      nmcd->dwDrawStage, nmcd->hdc, nmcd->dwItemSpec,
      nmcd->uItemState, nmcd->lItemlParam);
 
    return TREEVIEW_SendRealNotify(infoPtr, NM_CUSTOMDRAW, &nmcdhdr->nmcd.hdr);
}
 
static BOOL
TREEVIEW_BeginLabelEditNotify(const TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *editItem)
{
    NMTVDISPINFOW tvdi;
    BOOL ret;
 
    TREEVIEW_TVItemFromItem(infoPtr, TVIF_HANDLE | TVIF_STATE | TVIF_PARAM | TVIF_TEXT,
                            &tvdi.item, editItem);
 
    ret = TREEVIEW_SendRealNotify(infoPtr, TVN_BEGINLABELEDITW, &tvdi.hdr);
 
    if (!infoPtr->bNtfUnicode)
        heap_free(tvdi.item.pszText);
 
    return ret;
}
 
static void
TREEVIEW_UpdateDispInfo(const TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item,
            UINT mask)
{
    NMTVDISPINFOEXW callback;
 
    TRACE("mask=0x%x, callbackmask=0x%x\n", mask, item->callbackMask);
    mask &= item->callbackMask;
 
    if (mask == 0) return;
 
    /* 'state' always contains valid value, as well as 'lParam'.
     * All other parameters are uninitialized.
     */
    callback.item.pszText         = item->pszText;
    callback.item.cchTextMax      = item->cchTextMax;
    callback.item.mask            = mask;
    callback.item.hItem           = item;
    callback.item.state           = item->state;
    callback.item.lParam          = item->lParam;
 
    /* If text is changed we need to recalculate textWidth */
    if (mask & TVIF_TEXT)
       item->textWidth = 0;
 
    TREEVIEW_SendRealNotify(infoPtr, TVN_GETDISPINFOW, &callback.hdr);
    TRACE("resulting code 0x%08x\n", callback.hdr.code);
 
    /* It may have changed due to a call to SetItem. */
    mask &= item->callbackMask;
 
    if ((mask & TVIF_TEXT) && callback.item.pszText != item->pszText)
    {
    /* Instead of copying text into our buffer user specified his own */
    if (!infoPtr->bNtfUnicode && (callback.hdr.code == TVN_GETDISPINFOA)) {
        LPWSTR newText;
        int buflen;
            int len = MultiByteToWideChar( CP_ACP, 0,
                       (LPSTR)callback.item.pszText, -1,
                                           NULL, 0);
        buflen = max((len)*sizeof(WCHAR), TEXT_CALLBACK_SIZE);
            newText = heap_realloc(item->pszText, buflen);
 
        TRACE("returned str %s, len=%d, buflen=%d\n",
          debugstr_a((LPSTR)callback.item.pszText), len, buflen);
 
        if (newText)
        {
        item->pszText = newText;
        MultiByteToWideChar( CP_ACP, 0,
                     (LPSTR)callback.item.pszText, -1,
                     item->pszText, buflen/sizeof(WCHAR));
        item->cchTextMax = buflen/sizeof(WCHAR);
        }
        /* If realloc fails we have nothing to do, but keep original text */
    }
    else {
        int len = max(lstrlenW(callback.item.pszText) + 1,
              TEXT_CALLBACK_SIZE);
        LPWSTR newText = heap_realloc(item->pszText, len);
 
        TRACE("returned wstr %s, len=%d\n",
          debugstr_w(callback.item.pszText), len);
 
        if (newText)
        {
        item->pszText = newText;
        strcpyW(item->pszText, callback.item.pszText);
        item->cchTextMax = len;
        }
        /* If realloc fails we have nothing to do, but keep original text */
    }
    }
    else if (mask & TVIF_TEXT) {
    /* User put text into our buffer, that is ok unless A string */
    if (!infoPtr->bNtfUnicode && (callback.hdr.code == TVN_GETDISPINFOA)) {
        LPWSTR newText;
        int buflen;
            int len = MultiByteToWideChar( CP_ACP, 0,
                      (LPSTR)callback.item.pszText, -1,
                                           NULL, 0);
        buflen = max((len)*sizeof(WCHAR), TEXT_CALLBACK_SIZE);
            newText = heap_alloc(buflen);
 
        TRACE("same buffer str %s, len=%d, buflen=%d\n",
          debugstr_a((LPSTR)callback.item.pszText), len, buflen);
 
        if (newText)
        {
        LPWSTR oldText = item->pszText;
        item->pszText = newText;
        MultiByteToWideChar( CP_ACP, 0,
                     (LPSTR)callback.item.pszText, -1,
                     item->pszText, buflen/sizeof(WCHAR));
        item->cchTextMax = buflen/sizeof(WCHAR);
        heap_free(oldText);
        }
    }
    }
 
    if (mask & TVIF_IMAGE)
    item->iImage = callback.item.iImage;
 
    if (mask & TVIF_SELECTEDIMAGE)
    item->iSelectedImage = callback.item.iSelectedImage;
 
    if (mask & TVIF_EXPANDEDIMAGE)
    item->iExpandedImage = callback.item.iExpandedImage;
 
    if (mask & TVIF_CHILDREN)
    item->cChildren = callback.item.cChildren;
 
    if (callback.item.mask & TVIF_STATE)
    {
        item->state &= ~callback.item.stateMask;
        item->state |= (callback.item.state & callback.item.stateMask);
    }
 
    /* These members are now permanently set. */
    if (callback.item.mask & TVIF_DI_SETITEM)
    item->callbackMask &= ~callback.item.mask;
}
 
/***************************************************************************
 * This function uses cChildren field to decide whether the item has
 * children or not.
 * Note: if this returns TRUE, the child items may not actually exist,
 * they could be virtual.
 *
 * Just use item->firstChild to check for physical children.
 */
static BOOL
TREEVIEW_HasChildren(const TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item)
{
    TREEVIEW_UpdateDispInfo(infoPtr, item, TVIF_CHILDREN);
    /* Protect for a case when callback field is not changed by a host,
       otherwise negative values trigger normal notifications. */
    return item->cChildren != 0 && item->cChildren != I_CHILDRENCALLBACK;
}
 
static INT TREEVIEW_NotifyFormat (TREEVIEW_INFO *infoPtr, HWND hwndFrom, UINT nCommand)
{
    INT format;
 
    TRACE("(hwndFrom=%p, nCommand=%d)\n", hwndFrom, nCommand);
 
    if (nCommand != NF_REQUERY) return 0;
 
    format = SendMessageW(hwndFrom, WM_NOTIFYFORMAT, (WPARAM)infoPtr->hwnd, NF_QUERY);
    TRACE("format=%d\n", format);
 
    /* Invalid format returned by NF_QUERY defaults to ANSI*/
    if (format != NFR_ANSI && format != NFR_UNICODE)
        format = NFR_ANSI;
 
    infoPtr->bNtfUnicode = (format == NFR_UNICODE);
 
    return format;
}
 
/* Item Position ********************************************************/
 
/* Compute linesOffset, stateOffset, imageOffset, textOffset of an item. */
static VOID
TREEVIEW_ComputeItemInternalMetrics(const TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item)
{
    /* has TVS_LINESATROOT and (TVS_HASLINES|TVS_HASBUTTONS) */
    BOOL lar = ((infoPtr->dwStyle & (TVS_LINESATROOT|TVS_HASLINES|TVS_HASBUTTONS))
        > TVS_LINESATROOT);
 
    item->linesOffset = infoPtr->uIndent * (lar ? item->iLevel : item->iLevel - 1)
    - infoPtr->scrollX;
    item->stateOffset = item->linesOffset + infoPtr->uIndent;
    item->imageOffset = item->stateOffset
    + (STATEIMAGEINDEX(item->state) ? infoPtr->stateImageWidth : 0);
    item->textOffset  = item->imageOffset + infoPtr->normalImageWidth;
}
 
static VOID
TREEVIEW_ComputeTextWidth(const TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item, HDC hDC)
{
    HDC hdc;
    HFONT hOldFont=0;
    SIZE sz;
 
    /* DRAW's OM docker creates items like this */
    if (item->pszText == NULL)
    {
    item->textWidth = 0;
    return;
    }
 
    if (hDC != 0)
    {
    hdc = hDC;
    }
    else
    {
    hdc = GetDC(infoPtr->hwnd);
    hOldFont = SelectObject(hdc, TREEVIEW_FontForItem(infoPtr, item));
    }
 
    GetTextExtentPoint32W(hdc, item->pszText, strlenW(item->pszText), &sz);
    item->textWidth = sz.cx;
 
    if (hDC == 0)
    {
    SelectObject(hdc, hOldFont);
    ReleaseDC(0, hdc);
    }
}
 
static VOID
TREEVIEW_ComputeItemRect(const TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item)
{
    item->rect.top = infoPtr->uItemHeight *
    (item->visibleOrder - infoPtr->firstVisible->visibleOrder);
 
    item->rect.bottom = item->rect.top
    + infoPtr->uItemHeight * item->iIntegral - 1;
 
    item->rect.left = 0;
    item->rect.right = infoPtr->clientWidth;
}
 
/* We know that only items after start need their order updated. */
static void
TREEVIEW_RecalculateVisibleOrder(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *start)
{
    TREEVIEW_ITEM *item;
    int order;
 
    if (!start)
    {
    start = infoPtr->root->firstChild;
    order = 0;
    }
    else
    order = start->visibleOrder;
 
    for (item = start; item != NULL;
         item = TREEVIEW_GetNextListItem(infoPtr, item))
    {
    if (!ISVISIBLE(item) && order > 0)
        TREEVIEW_ComputeItemInternalMetrics(infoPtr, item);
    item->visibleOrder = order;
    order += item->iIntegral;
    }
 
    infoPtr->maxVisibleOrder = order;
 
    for (item = start; item != NULL;
     item = TREEVIEW_GetNextListItem(infoPtr, item))
    {
    TREEVIEW_ComputeItemRect(infoPtr, item);
    }
}
 
 
/* Update metrics of all items in selected subtree.
 * root must be expanded
 */
static VOID
TREEVIEW_UpdateSubTree(const TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *root)
{
   TREEVIEW_ITEM *sibling;
   HDC hdc;
   HFONT hOldFont;
 
   if (!root->firstChild || !(root->state & TVIS_EXPANDED))
      return;
 
   root->state &= ~TVIS_EXPANDED;
   sibling = TREEVIEW_GetNextListItem(infoPtr, root);
   root->state |= TVIS_EXPANDED;
 
   hdc = GetDC(infoPtr->hwnd);
   hOldFont = SelectObject(hdc, infoPtr->hFont);
 
   for (; root != sibling;
        root = TREEVIEW_GetNextListItem(infoPtr, root))
   {
      TREEVIEW_ComputeItemInternalMetrics(infoPtr, root);
 
      if (root->callbackMask & TVIF_TEXT)
         TREEVIEW_UpdateDispInfo(infoPtr, root, TVIF_TEXT);
 
      if (root->textWidth == 0)
      {
         SelectObject(hdc, TREEVIEW_FontForItem(infoPtr, root));
         TREEVIEW_ComputeTextWidth(infoPtr, root, hdc);
      }
   }
 
   SelectObject(hdc, hOldFont);
   ReleaseDC(infoPtr->hwnd, hdc);
}
 
/* Item Allocation **********************************************************/
 
static TREEVIEW_ITEM *
TREEVIEW_AllocateItem(const TREEVIEW_INFO *infoPtr)
{
    TREEVIEW_ITEM *newItem = heap_alloc_zero(sizeof(*newItem));
 
    if (!newItem)
    return NULL;
 
    /* I_IMAGENONE would make more sense but this is neither what is
     * documented (MSDN doesn't specify) nor what Windows actually does
     * (it sets it to zero)... and I can so imagine an application using
     * inc/dec to toggle the images. */
    newItem->iImage = 0;
    newItem->iSelectedImage = 0;
    newItem->iExpandedImage = (WORD)I_IMAGENONE;
    newItem->infoPtr = infoPtr;
 
    if (DPA_InsertPtr(infoPtr->items, INT_MAX, newItem) == -1)
    {
        heap_free(newItem);
        return NULL;
    }
 
    return newItem;
}
 
/* Exact opposite of TREEVIEW_AllocateItem. In particular, it does not
 * free item->pszText. */
static void
TREEVIEW_FreeItem(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item)
{
    DPA_DeletePtr(infoPtr->items, DPA_GetPtrIndex(infoPtr->items, item));
    if (infoPtr->selectedItem == item)
        infoPtr->selectedItem = NULL;
    if (infoPtr->hotItem == item)
        infoPtr->hotItem = NULL;
    if (infoPtr->focusedItem == item)
        infoPtr->focusedItem = NULL;
    if (infoPtr->firstVisible == item)
        infoPtr->firstVisible = NULL;
    if (infoPtr->dropItem == item)
        infoPtr->dropItem = NULL;
    if (infoPtr->insertMarkItem == item)
        infoPtr->insertMarkItem = NULL;
    heap_free(item);
}
 
 
/* Item Insertion *******************************************************/
 
/***************************************************************************
 * This method inserts newItem before sibling as a child of parent.
 * sibling can be NULL, but only if parent has no children.
 */
static void
TREEVIEW_InsertBefore(TREEVIEW_ITEM *newItem, TREEVIEW_ITEM *sibling,
              TREEVIEW_ITEM *parent)
{
    assert(parent != NULL);
 
    if (sibling != NULL)
    {
    assert(sibling->parent == parent);
 
    if (sibling->prevSibling != NULL)
        sibling->prevSibling->nextSibling = newItem;
 
    newItem->prevSibling = sibling->prevSibling;
    sibling->prevSibling = newItem;
    }
    else
       newItem->prevSibling = NULL;
 
    newItem->nextSibling = sibling;
 
    if (parent->firstChild == sibling)
    parent->firstChild = newItem;
 
    if (parent->lastChild == NULL)
    parent->lastChild = newItem;
}
 
/***************************************************************************
 * This method inserts newItem after sibling as a child of parent.
 * sibling can be NULL, but only if parent has no children.
 */
static void
TREEVIEW_InsertAfter(TREEVIEW_ITEM *newItem, TREEVIEW_ITEM *sibling,
             TREEVIEW_ITEM *parent)
{
    assert(parent != NULL);
 
    if (sibling != NULL)
    {
    assert(sibling->parent == parent);
 
    if (sibling->nextSibling != NULL)
        sibling->nextSibling->prevSibling = newItem;
 
    newItem->nextSibling = sibling->nextSibling;
    sibling->nextSibling = newItem;
    }
    else
       newItem->nextSibling = NULL;
 
    newItem->prevSibling = sibling;
 
    if (parent->lastChild == sibling)
    parent->lastChild = newItem;
 
    if (parent->firstChild == NULL)
    parent->firstChild = newItem;
}
 
static BOOL
TREEVIEW_DoSetItemT(const TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item,
           const TVITEMEXW *tvItem, BOOL isW)
{
    UINT callbackClear = 0;
    UINT callbackSet = 0;
 
    TRACE("item %p\n", item);
    /* Do this first in case it fails. */
    if (tvItem->mask & TVIF_TEXT)
    {
        item->textWidth = 0; /* force width recalculation */
    if (tvItem->pszText != LPSTR_TEXTCALLBACKW && tvItem->pszText != NULL) /* covers != TEXTCALLBACKA too, and undocumented: pszText of NULL also means TEXTCALLBACK */
    {
            int len;
            LPWSTR newText;
            if (isW)
                len = lstrlenW(tvItem->pszText) + 1;
            else
                len = MultiByteToWideChar(CP_ACP, 0, (LPSTR)tvItem->pszText, -1, NULL, 0);
 
            newText  = heap_realloc(item->pszText, len * sizeof(WCHAR));
 
            if (newText == NULL) return FALSE;
 
            callbackClear |= TVIF_TEXT;
 
            item->pszText = newText;
            item->cchTextMax = len;
            if (isW)
                lstrcpynW(item->pszText, tvItem->pszText, len);
            else
                MultiByteToWideChar(CP_ACP, 0, (LPSTR)tvItem->pszText, -1,
                                    item->pszText, len);
 
            TRACE("setting text %s, item %p\n", debugstr_w(item->pszText), item);
        }
    else
    {
            callbackSet |= TVIF_TEXT;
            item->pszText = heap_realloc(item->pszText, TEXT_CALLBACK_SIZE * sizeof(WCHAR));
        item->cchTextMax = TEXT_CALLBACK_SIZE;
        TRACE("setting callback, item %p\n", item);
    }
    }
 
    if (tvItem->mask & TVIF_CHILDREN)
    {
    item->cChildren = tvItem->cChildren;
 
    if (item->cChildren == I_CHILDRENCALLBACK)
        callbackSet |= TVIF_CHILDREN;
    else
        callbackClear |= TVIF_CHILDREN;
    }
 
    if (tvItem->mask & TVIF_IMAGE)
    {
    item->iImage = tvItem->iImage;
 
    if (item->iImage == I_IMAGECALLBACK)
        callbackSet |= TVIF_IMAGE;
    else
        callbackClear |= TVIF_IMAGE;
    }
 
    if (tvItem->mask & TVIF_SELECTEDIMAGE)
    {
    item->iSelectedImage = tvItem->iSelectedImage;
 
    if (item->iSelectedImage == I_IMAGECALLBACK)
        callbackSet |= TVIF_SELECTEDIMAGE;
    else
        callbackClear |= TVIF_SELECTEDIMAGE;
    }
 
    if (tvItem->mask & TVIF_EXPANDEDIMAGE)
    {
    item->iExpandedImage = tvItem->iExpandedImage;
 
    if (item->iExpandedImage == I_IMAGECALLBACK)
        callbackSet |= TVIF_EXPANDEDIMAGE;
    else
        callbackClear |= TVIF_EXPANDEDIMAGE;
    }
 
    if (tvItem->mask & TVIF_PARAM)
    item->lParam = tvItem->lParam;
 
    /* If the application sets TVIF_INTEGRAL without
     * supplying a TVITEMEX structure, it's toast. */
    if (tvItem->mask & TVIF_INTEGRAL)
    item->iIntegral = tvItem->iIntegral;
 
    if (tvItem->mask & TVIF_STATE)
    {
    TRACE("prevstate 0x%x, state 0x%x, mask 0x%x\n", item->state, tvItem->state,
          tvItem->stateMask);
    item->state &= ~tvItem->stateMask;
    item->state |= (tvItem->state & tvItem->stateMask);
    }
 
    if (tvItem->mask & TVIF_STATEEX)
    {
        FIXME("New extended state: 0x%x\n", tvItem->uStateEx);
    }
 
    item->callbackMask |= callbackSet;
    item->callbackMask &= ~callbackClear;
 
    return TRUE;
}
 
/* Note that the new item is pre-zeroed. */
static LRESULT
TREEVIEW_InsertItemT(TREEVIEW_INFO *infoPtr, const TVINSERTSTRUCTW *ptdi, BOOL isW)
{
    const TVITEMEXW *tvItem = &ptdi->u.itemex;
    HTREEITEM insertAfter;
    TREEVIEW_ITEM *newItem, *parentItem;
    BOOL bTextUpdated = FALSE;
 
    if (ptdi->hParent == TVI_ROOT || ptdi->hParent == 0)
    {
    parentItem = infoPtr->root;
    }
    else
    {
    parentItem = ptdi->hParent;
 
    if (!TREEVIEW_ValidItem(infoPtr, parentItem))
    {
        WARN("invalid parent %p\n", parentItem);
            return 0;
    }
    }
 
    insertAfter = ptdi->hInsertAfter;
 
    /* Validate this now for convenience. */
    switch ((DWORD_PTR)insertAfter)
    {
    case (DWORD_PTR)TVI_FIRST:
    case (DWORD_PTR)TVI_LAST:
    case (DWORD_PTR)TVI_SORT:
    break;
 
    default:
    if (!TREEVIEW_ValidItem(infoPtr, insertAfter) ||
            insertAfter->parent != parentItem)
    {
        WARN("invalid insert after %p\n", insertAfter);
        insertAfter = TVI_LAST;
    }
    }
 
    TRACE("parent %p position %p: %s\n", parentItem, insertAfter,
      (tvItem->mask & TVIF_TEXT)
      ? ((tvItem->pszText == LPSTR_TEXTCALLBACKW) ? "<callback>"
         : (isW ? debugstr_w(tvItem->pszText) : debugstr_a((LPSTR)tvItem->pszText)))
      : "<no label>");
 
    newItem = TREEVIEW_AllocateItem(infoPtr);
    if (newItem == NULL)
        return 0;
 
    newItem->parent = parentItem;
    newItem->iIntegral = 1;
    newItem->visibleOrder = -1;
 
    if (!TREEVIEW_DoSetItemT(infoPtr, newItem, tvItem, isW))
        return 0;
 
    /* After this point, nothing can fail. (Except for TVI_SORT.) */
 
    infoPtr->uNumItems++;
 
    switch ((DWORD_PTR)insertAfter)
    {
    case (DWORD_PTR)TVI_FIRST:
        {
           TREEVIEW_ITEM *originalFirst = parentItem->firstChild;
           TREEVIEW_InsertBefore(newItem, parentItem->firstChild, parentItem);
           if (infoPtr->firstVisible == originalFirst)
              TREEVIEW_SetFirstVisible(infoPtr, newItem, TRUE);
        }
    break;
 
    case (DWORD_PTR)TVI_LAST:
    TREEVIEW_InsertAfter(newItem, parentItem->lastChild, parentItem);
    break;
 
    /* hInsertAfter names a specific item we want to insert after */
    default:
    TREEVIEW_InsertAfter(newItem, insertAfter, insertAfter->parent);
    break;
 
    case (DWORD_PTR)TVI_SORT:
    {
        TREEVIEW_ITEM *aChild;
        TREEVIEW_ITEM *previousChild = NULL;
            TREEVIEW_ITEM *originalFirst = parentItem->firstChild;
        BOOL bItemInserted = FALSE;
 
        aChild = parentItem->firstChild;
 
        bTextUpdated = TRUE;
        TREEVIEW_UpdateDispInfo(infoPtr, newItem, TVIF_TEXT);
 
        /* Iterate the parent children to see where we fit in */
        while (aChild != NULL)
        {
        INT comp;
 
        TREEVIEW_UpdateDispInfo(infoPtr, aChild, TVIF_TEXT);
        comp = lstrcmpW(newItem->pszText, aChild->pszText);
 
        if (comp < 0)   /* we are smaller than the current one */
        {
            TREEVIEW_InsertBefore(newItem, aChild, parentItem);
                    if (infoPtr->firstVisible == originalFirst &&
                        aChild == originalFirst)
                        TREEVIEW_SetFirstVisible(infoPtr, newItem, TRUE);
            bItemInserted = TRUE;
            break;
        }
        else if (comp > 0)  /* we are bigger than the current one */
        {
            previousChild = aChild;
 
            /* This will help us to exit if there is no more sibling */
            aChild = (aChild->nextSibling == 0)
            ? NULL
            : aChild->nextSibling;
 
            /* Look at the next item */
            continue;
        }
        else if (comp == 0)
        {
            /*
             * An item with this name is already existing, therefore,
             * we add after the one we found
             */
            TREEVIEW_InsertAfter(newItem, aChild, parentItem);
            bItemInserted = TRUE;
            break;
        }
        }
 
        /*
         * we reach the end of the child list and the item has not
         * yet been inserted, therefore, insert it after the last child.
         */
        if ((!bItemInserted) && (aChild == NULL))
        TREEVIEW_InsertAfter(newItem, previousChild, parentItem);
 
        break;
    }
    }
 
 
    TRACE("new item %p; parent %p, mask 0x%x\n", newItem,
      newItem->parent, tvItem->mask);
 
    newItem->iLevel = newItem->parent->iLevel + 1;
 
    if (newItem->parent->cChildren == 0)
    newItem->parent->cChildren = 1;
 
    if (infoPtr->dwStyle & TVS_CHECKBOXES)
    {
    if (STATEIMAGEINDEX(newItem->state) == 0)
        newItem->state |= INDEXTOSTATEIMAGEMASK(1);
    }
 
    if (infoPtr->firstVisible == NULL)
    infoPtr->firstVisible = newItem;
 
    TREEVIEW_VerifyTree(infoPtr);
 
    if (!infoPtr->bRedraw) return (LRESULT)newItem;
 
    if (parentItem == infoPtr->root ||
        (ISVISIBLE(parentItem) && parentItem->state & TVIS_EXPANDED))
    {
       TREEVIEW_ITEM *item;
       TREEVIEW_ITEM *prev = TREEVIEW_GetPrevListItem(infoPtr, newItem);
 
       TREEVIEW_RecalculateVisibleOrder(infoPtr, prev);
       TREEVIEW_ComputeItemInternalMetrics(infoPtr, newItem);
 
       if (!bTextUpdated)
          TREEVIEW_UpdateDispInfo(infoPtr, newItem, TVIF_TEXT);
 
       TREEVIEW_ComputeTextWidth(infoPtr, newItem, 0);
       TREEVIEW_UpdateScrollBars(infoPtr);
    /*
     * if the item was inserted in a visible part of the tree,
     * invalidate it, as well as those after it
     */
       for (item = newItem;
            item != NULL;
        item = TREEVIEW_GetNextListItem(infoPtr, item))
          TREEVIEW_Invalidate(infoPtr, item);
    }
    else
    {
       /* refresh treeview if newItem is the first item inserted under parentItem */
       if (ISVISIBLE(parentItem) && newItem->prevSibling == newItem->nextSibling)
       {
          /* parent got '+' - update it */
          TREEVIEW_Invalidate(infoPtr, parentItem);
       }
    }
 
    return (LRESULT)newItem;
}
 
/* Item Deletion ************************************************************/
static void
TREEVIEW_RemoveItem(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item);
 
static void
TREEVIEW_RemoveAllChildren(TREEVIEW_INFO *infoPtr, const TREEVIEW_ITEM *parentItem)
{
    TREEVIEW_ITEM *kill = parentItem->firstChild;
 
    while (kill != NULL)
    {
    TREEVIEW_ITEM *next = kill->nextSibling;
 
    TREEVIEW_RemoveItem(infoPtr, kill);
 
    kill = next;
    }
 
    assert(parentItem->cChildren <= 0); /* I_CHILDRENCALLBACK or 0 */
    assert(parentItem->firstChild == NULL);
    assert(parentItem->lastChild == NULL);
}
 
static void
TREEVIEW_UnlinkItem(const TREEVIEW_ITEM *item)
{
    TREEVIEW_ITEM *parentItem;
 
    assert(item != NULL);
    assert(item->parent != NULL); /* i.e. it must not be the root */
 
    parentItem = item->parent;
 
    if (parentItem->firstChild == item)
    parentItem->firstChild = item->nextSibling;
 
    if (parentItem->lastChild == item)
    parentItem->lastChild = item->prevSibling;
 
    if (parentItem->firstChild == NULL && parentItem->lastChild == NULL
    && parentItem->cChildren > 0)
    parentItem->cChildren = 0;
 
    if (item->prevSibling)
    item->prevSibling->nextSibling = item->nextSibling;
 
    if (item->nextSibling)
    item->nextSibling->prevSibling = item->prevSibling;
}
 
static void
TREEVIEW_RemoveItem(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item)
{
    TRACE("%p, (%s)\n", item, TREEVIEW_ItemName(item));
 
    if (item->firstChild)
    TREEVIEW_RemoveAllChildren(infoPtr, item);
 
    TREEVIEW_SendTreeviewNotify(infoPtr, TVN_DELETEITEMW, TVC_UNKNOWN,
                TVIF_HANDLE | TVIF_PARAM, item, 0);
 
    TREEVIEW_UnlinkItem(item);
 
    infoPtr->uNumItems--;
 
    if (item->pszText != LPSTR_TEXTCALLBACKW)
        heap_free(item->pszText);
 
    TREEVIEW_FreeItem(infoPtr, item);
}
 
 
/* Empty out the tree. */
static void
TREEVIEW_RemoveTree(TREEVIEW_INFO *infoPtr)
{
    TREEVIEW_RemoveAllChildren(infoPtr, infoPtr->root);
 
    assert(infoPtr->uNumItems == 0);    /* root isn't counted in uNumItems */
}
 
static LRESULT
TREEVIEW_DeleteItem(TREEVIEW_INFO *infoPtr, HTREEITEM item)
{
    TREEVIEW_ITEM *newSelection = NULL;
    TREEVIEW_ITEM *newFirstVisible = NULL;
    TREEVIEW_ITEM *parent, *prev = NULL;
    BOOL visible = FALSE;
 
    if (item == TVI_ROOT || !item)
    {
    TRACE("TVI_ROOT\n");
    parent = infoPtr->root;
    newSelection = NULL;
    visible = TRUE;
    TREEVIEW_RemoveTree(infoPtr);
    }
    else
    {
    if (!TREEVIEW_ValidItem(infoPtr, item))
        return FALSE;
 
    TRACE("%p (%s)\n", item, TREEVIEW_ItemName(item));
    parent = item->parent;
 
        if (ISVISIBLE(item))
        {
            prev = TREEVIEW_GetPrevListItem(infoPtr, item);
            visible = TRUE;
        }
 
    if (infoPtr->selectedItem != NULL
        && (item == infoPtr->selectedItem
        || TREEVIEW_IsChildOf(item, infoPtr->selectedItem)))
    {
        if (item->nextSibling)
        newSelection = item->nextSibling;
        else if (item->parent != infoPtr->root)
        newSelection = item->parent;
            else
                newSelection = item->prevSibling;
            TRACE("newSelection = %p\n", newSelection);
    }
 
    if (infoPtr->firstVisible == item)
    {
        visible = TRUE;
        if (item->nextSibling)
           newFirstVisible = item->nextSibling;
        else if (item->prevSibling)
           newFirstVisible = item->prevSibling;
        else if (item->parent != infoPtr->root)
           newFirstVisible = item->parent;
        TREEVIEW_SetFirstVisible(infoPtr, NULL, TRUE);
    }
    else
        newFirstVisible = infoPtr->firstVisible;
 
    TREEVIEW_RemoveItem(infoPtr, item);
    }
 
    /* Don't change if somebody else already has (infoPtr->selectedItem is cleared by FreeItem). */
    if (!infoPtr->selectedItem && newSelection)
    {
    if (TREEVIEW_ValidItem(infoPtr, newSelection))
        TREEVIEW_DoSelectItem(infoPtr, TVGN_CARET, newSelection, TVC_UNKNOWN);
    }
 
    /* Validate insertMark dropItem.
     * hotItem ??? - used for comparison only.
     */
    if (!TREEVIEW_ValidItem(infoPtr, infoPtr->insertMarkItem))
    infoPtr->insertMarkItem = 0;
 
    if (!TREEVIEW_ValidItem(infoPtr, infoPtr->dropItem))
    infoPtr->dropItem = 0;
 
    if (!TREEVIEW_ValidItem(infoPtr, newFirstVisible))
        newFirstVisible = infoPtr->root->firstChild;
 
    TREEVIEW_VerifyTree(infoPtr);
 
    if (visible)
        TREEVIEW_SetFirstVisible(infoPtr, newFirstVisible, TRUE);
 
    if (!infoPtr->bRedraw) return TRUE;
 
    if (visible)
    {
       TREEVIEW_RecalculateVisibleOrder(infoPtr, prev);
       TREEVIEW_UpdateScrollBars(infoPtr);
       TREEVIEW_Invalidate(infoPtr, NULL);
    }
    else if (ISVISIBLE(parent) && !TREEVIEW_HasChildren(infoPtr, parent))
    {
       /* parent lost '+/-' - update it */
       TREEVIEW_Invalidate(infoPtr, parent);
    }
 
    return TRUE;
}
 
 
/* Get/Set Messages *********************************************************/
static LRESULT
TREEVIEW_SetRedraw(TREEVIEW_INFO* infoPtr, WPARAM wParam)
{
    infoPtr->bRedraw = wParam != 0;
 
    if (infoPtr->bRedraw)
    {
        TREEVIEW_UpdateSubTree(infoPtr, infoPtr->root);
        TREEVIEW_RecalculateVisibleOrder(infoPtr, NULL);
        TREEVIEW_UpdateScrollBars(infoPtr);
        TREEVIEW_Invalidate(infoPtr, NULL);
    }
    return 0;
}
 
static LRESULT
TREEVIEW_GetIndent(const TREEVIEW_INFO *infoPtr)
{
    TRACE("\n");
    return infoPtr->uIndent;
}
 
static LRESULT
TREEVIEW_SetIndent(TREEVIEW_INFO *infoPtr, UINT newIndent)
{
    TRACE("\n");
 
    if (newIndent < MINIMUM_INDENT)
    newIndent = MINIMUM_INDENT;
 
    if (infoPtr->uIndent != newIndent)
    {
    infoPtr->uIndent = newIndent;
    TREEVIEW_UpdateSubTree(infoPtr, infoPtr->root);
    TREEVIEW_UpdateScrollBars(infoPtr);
    TREEVIEW_Invalidate(infoPtr, NULL);
    }
 
    return 0;
}
 
 
static LRESULT
TREEVIEW_GetToolTips(const TREEVIEW_INFO *infoPtr)
{
    TRACE("\n");
    return (LRESULT)infoPtr->hwndToolTip;
}
 
static LRESULT
TREEVIEW_SetToolTips(TREEVIEW_INFO *infoPtr, HWND hwndTT)
{
    HWND prevToolTip;
 
    TRACE("\n");
    prevToolTip = infoPtr->hwndToolTip;
    infoPtr->hwndToolTip = hwndTT;
 
    return (LRESULT)prevToolTip;
}
 
static LRESULT
TREEVIEW_SetUnicodeFormat(TREEVIEW_INFO *infoPtr, BOOL fUnicode)
{
    BOOL rc = infoPtr->bNtfUnicode;
    infoPtr->bNtfUnicode = fUnicode;
    return rc;
}
 
static LRESULT
TREEVIEW_GetUnicodeFormat(const TREEVIEW_INFO *infoPtr)
{
     return infoPtr->bNtfUnicode;
}
 
static LRESULT
TREEVIEW_GetScrollTime(const TREEVIEW_INFO *infoPtr)
{
    return infoPtr->uScrollTime;
}
 
static LRESULT
TREEVIEW_SetScrollTime(TREEVIEW_INFO *infoPtr, UINT uScrollTime)
{
    UINT uOldScrollTime = infoPtr->uScrollTime;
 
    infoPtr->uScrollTime = min(uScrollTime, 100);
 
    return uOldScrollTime;
}
 
 
static LRESULT
TREEVIEW_GetImageList(const TREEVIEW_INFO *infoPtr, WPARAM wParam)
{
    TRACE("\n");
 
    switch (wParam)
    {
    case TVSIL_NORMAL:
    return (LRESULT)infoPtr->himlNormal;
 
    case TVSIL_STATE:
    return (LRESULT)infoPtr->himlState;
 
    default:
    return 0;
    }
}
 
#define TVHEIGHT_MIN         16
#define TVHEIGHT_FONT_ADJUST 3 /* 2 for focus border + 1 for margin some apps assume */
 
/* Compute the natural height for items. */
static UINT
TREEVIEW_NaturalHeight(const TREEVIEW_INFO *infoPtr)
{
    TEXTMETRICW tm;
    HDC hdc = GetDC(0);
    HFONT hOldFont = SelectObject(hdc, infoPtr->hFont);
    UINT height;
 
    /* Height is the maximum of:
     * 16 (a hack because our fonts are tiny), and
     * The text height + border & margin, and
     * The size of the normal image list
     */
    GetTextMetricsW(hdc, &tm);
    SelectObject(hdc, hOldFont);
    ReleaseDC(0, hdc);
 
    height = TVHEIGHT_MIN;
    if (height < tm.tmHeight + tm.tmExternalLeading + TVHEIGHT_FONT_ADJUST)
        height = tm.tmHeight + tm.tmExternalLeading + TVHEIGHT_FONT_ADJUST;
    if (height < infoPtr->normalImageHeight)
        height = infoPtr->normalImageHeight;
 
    /* Round down, unless we support odd ("non even") heights. */
    if (!(infoPtr->dwStyle & TVS_NONEVENHEIGHT))
        height &= ~1;
 
    return height;
}
 
static LRESULT
TREEVIEW_SetImageList(TREEVIEW_INFO *infoPtr, UINT type, HIMAGELIST himlNew)
{
    HIMAGELIST himlOld = 0;
    int oldWidth  = infoPtr->normalImageWidth;
    int oldHeight = infoPtr->normalImageHeight;
 
    TRACE("%u,%p\n", type, himlNew);
 
    switch (type)
    {
    case TVSIL_NORMAL:
    himlOld = infoPtr->himlNormal;
    infoPtr->himlNormal = himlNew;
 
    if (himlNew)
        ImageList_GetIconSize(himlNew, &infoPtr->normalImageWidth,
                  &infoPtr->normalImageHeight);
    else
    {
        infoPtr->normalImageWidth = 0;
        infoPtr->normalImageHeight = 0;
    }
 
    break;
 
    case TVSIL_STATE:
    himlOld = infoPtr->himlState;
    infoPtr->himlState = himlNew;
 
    if (himlNew)
        ImageList_GetIconSize(himlNew, &infoPtr->stateImageWidth,
                  &infoPtr->stateImageHeight);
    else
    {
        infoPtr->stateImageWidth = 0;
        infoPtr->stateImageHeight = 0;
    }
 
    break;
 
    default:
        ERR("unknown imagelist type %u\n", type);
    }
 
    if (oldWidth != infoPtr->normalImageWidth ||
        oldHeight != infoPtr->normalImageHeight)
    {
        BOOL bRecalcVisible = FALSE;
 
        if (oldHeight != infoPtr->normalImageHeight &&
            !infoPtr->bHeightSet)
        {
            infoPtr->uItemHeight = TREEVIEW_NaturalHeight(infoPtr);
            bRecalcVisible = TRUE;
        }
 
        if (infoPtr->normalImageWidth > MINIMUM_INDENT &&
            infoPtr->normalImageWidth != infoPtr->uIndent)
        {
            infoPtr->uIndent = infoPtr->normalImageWidth;
            bRecalcVisible = TRUE;
        }
 
        if (bRecalcVisible)
            TREEVIEW_RecalculateVisibleOrder(infoPtr, NULL);
 
       TREEVIEW_UpdateSubTree(infoPtr, infoPtr->root);
       TREEVIEW_UpdateScrollBars(infoPtr);
    }
 
    TREEVIEW_Invalidate(infoPtr, NULL);
 
    return (LRESULT)himlOld;
}
 
static LRESULT
TREEVIEW_SetItemHeight(TREEVIEW_INFO *infoPtr, INT newHeight)
{
    INT prevHeight = infoPtr->uItemHeight;
 
    TRACE("new=%d, old=%d\n", newHeight, prevHeight);
    if (newHeight == -1)
    {
    infoPtr->uItemHeight = TREEVIEW_NaturalHeight(infoPtr);
    infoPtr->bHeightSet = FALSE;
    }
    else
    {
        if (newHeight == 0) newHeight = 1;
        infoPtr->uItemHeight = newHeight;
        infoPtr->bHeightSet = TRUE;
    }
 
    /* Round down, unless we support odd ("non even") heights. */
    if (!(infoPtr->dwStyle & TVS_NONEVENHEIGHT) && infoPtr->uItemHeight != 1)
    {
        infoPtr->uItemHeight &= ~1;
        TRACE("after rounding=%d\n", infoPtr->uItemHeight);
    }
 
    if (infoPtr->uItemHeight != prevHeight)
    {
    TREEVIEW_RecalculateVisibleOrder(infoPtr, NULL);
    TREEVIEW_UpdateScrollBars(infoPtr);
    TREEVIEW_Invalidate(infoPtr, NULL);
    }
 
    return prevHeight;
}
 
static LRESULT
TREEVIEW_GetItemHeight(const TREEVIEW_INFO *infoPtr)
{
    TRACE("\n");
    return infoPtr->uItemHeight;
}
 
 
static LRESULT
TREEVIEW_GetFont(const TREEVIEW_INFO *infoPtr)
{
    TRACE("%p\n", infoPtr->hFont);
    return (LRESULT)infoPtr->hFont;
}
 
 
static INT CALLBACK
TREEVIEW_ResetTextWidth(LPVOID pItem, LPVOID unused)
{
    (void)unused;
 
    ((TREEVIEW_ITEM *)pItem)->textWidth = 0;
 
    return 1;
}
 
static LRESULT
TREEVIEW_SetFont(TREEVIEW_INFO *infoPtr, HFONT hFont, BOOL bRedraw)
{
    UINT uHeight = infoPtr->uItemHeight;
 
    TRACE("%p %i\n", hFont, bRedraw);
 
    infoPtr->hFont = hFont ? hFont : infoPtr->hDefaultFont;
 
    DeleteObject(infoPtr->hBoldFont);
    DeleteObject(infoPtr->hUnderlineFont);
    DeleteObject(infoPtr->hBoldUnderlineFont);
    infoPtr->hBoldFont = TREEVIEW_CreateBoldFont(infoPtr->hFont);
    infoPtr->hUnderlineFont = TREEVIEW_CreateUnderlineFont(infoPtr->hFont);
    infoPtr->hBoldUnderlineFont = TREEVIEW_CreateBoldUnderlineFont(infoPtr->hFont);
 
    if (!infoPtr->bHeightSet)
    infoPtr->uItemHeight = TREEVIEW_NaturalHeight(infoPtr);
 
    if (uHeight != infoPtr->uItemHeight)
       TREEVIEW_RecalculateVisibleOrder(infoPtr, NULL);
 
    DPA_EnumCallback(infoPtr->items, TREEVIEW_ResetTextWidth, 0);
 
    TREEVIEW_UpdateSubTree(infoPtr, infoPtr->root);
    TREEVIEW_UpdateScrollBars(infoPtr);
 
    if (bRedraw)
    TREEVIEW_Invalidate(infoPtr, NULL);
 
    return 0;
}
 
 
static LRESULT
TREEVIEW_GetLineColor(const TREEVIEW_INFO *infoPtr)
{
    TRACE("\n");
    return (LRESULT)infoPtr->clrLine;
}
 
static LRESULT
TREEVIEW_SetLineColor(TREEVIEW_INFO *infoPtr, COLORREF color)
{
    COLORREF prevColor = infoPtr->clrLine;
 
    TRACE("\n");
    infoPtr->clrLine = color;
    return (LRESULT)prevColor;
}
 
 
static LRESULT
TREEVIEW_GetTextColor(const TREEVIEW_INFO *infoPtr)
{
    TRACE("\n");
    return (LRESULT)infoPtr->clrText;
}
 
static LRESULT
TREEVIEW_SetTextColor(TREEVIEW_INFO *infoPtr, COLORREF color)
{
    COLORREF prevColor = infoPtr->clrText;
 
    TRACE("\n");
    infoPtr->clrText = color;
 
    if (infoPtr->clrText != prevColor)
    TREEVIEW_Invalidate(infoPtr, NULL);
 
    return (LRESULT)prevColor;
}
 
 
static LRESULT
TREEVIEW_GetBkColor(const TREEVIEW_INFO *infoPtr)
{
    TRACE("\n");
    return (LRESULT)infoPtr->clrBk;
}
 
static LRESULT
TREEVIEW_SetBkColor(TREEVIEW_INFO *infoPtr, COLORREF newColor)
{
    COLORREF prevColor = infoPtr->clrBk;
 
    TRACE("\n");
    infoPtr->clrBk = newColor;
 
    if (newColor != prevColor)
    TREEVIEW_Invalidate(infoPtr, NULL);
 
    return (LRESULT)prevColor;
}
 
 
static LRESULT
TREEVIEW_GetInsertMarkColor(const TREEVIEW_INFO *infoPtr)
{
    TRACE("\n");
    return (LRESULT)infoPtr->clrInsertMark;
}
 
static LRESULT
TREEVIEW_SetInsertMarkColor(TREEVIEW_INFO *infoPtr, COLORREF color)
{
    COLORREF prevColor = infoPtr->clrInsertMark;
 
    TRACE("0x%08x\n", color);
    infoPtr->clrInsertMark = color;
 
    return (LRESULT)prevColor;
}
 
 
static LRESULT
TREEVIEW_SetInsertMark(TREEVIEW_INFO *infoPtr, BOOL wParam, HTREEITEM item)
{
    TRACE("%d %p\n", wParam, item);
 
    if (!TREEVIEW_ValidItem(infoPtr, item))
    return 0;
 
    infoPtr->insertBeforeorAfter = wParam;
    infoPtr->insertMarkItem = item;
 
    TREEVIEW_Invalidate(infoPtr, NULL);
 
    return 1;
}
 
 
/************************************************************************
 * Some serious braindamage here. lParam is a pointer to both the
 * input HTREEITEM and the output RECT.
 */
static LRESULT
TREEVIEW_GetItemRect(const TREEVIEW_INFO *infoPtr, BOOL fTextRect, LPRECT lpRect)
{
    TREEVIEW_ITEM *item;
    const HTREEITEM *pItem = (HTREEITEM *)lpRect;
 
    TRACE("\n");
 
    if (pItem == NULL)
    return FALSE;
 
    item = *pItem;
    if (!TREEVIEW_ValidItem(infoPtr, item) || !ISVISIBLE(item))
    return FALSE;
 
    /*
     * If wParam is TRUE return the text size otherwise return
     * the whole item size
     */
    if (fTextRect)
    {
    /* Windows does not send TVN_GETDISPINFO here. */
 
    lpRect->top = item->rect.top;
    lpRect->bottom = item->rect.bottom;
 
    lpRect->left = item->textOffset;
    if (!item->textWidth)
        TREEVIEW_ComputeTextWidth(infoPtr, item, 0);
 
    lpRect->right = item->textOffset + item->textWidth + 4;
    }
    else
    {
    *lpRect = item->rect;
    }
 
    TRACE("%s [%s]\n", fTextRect ? "text" : "item", wine_dbgstr_rect(lpRect));
 
    return TRUE;
}
 
static inline LRESULT
TREEVIEW_GetVisibleCount(const TREEVIEW_INFO *infoPtr)
{
    /* Surprise! This does not take integral height into account. */
    TRACE("client=%d, item=%d\n", infoPtr->clientHeight, infoPtr->uItemHeight);
    return infoPtr->clientHeight / infoPtr->uItemHeight;
}
 
 
static LRESULT
TREEVIEW_GetItemT(const TREEVIEW_INFO *infoPtr, LPTVITEMEXW tvItem, BOOL isW)
{
    TREEVIEW_ITEM *item = tvItem->hItem;
 
    if (!TREEVIEW_ValidItem(infoPtr, item))
    {
        BOOL valid_item = FALSE;
        if (!item) return FALSE;
 
        __TRY
        {
            infoPtr = item->infoPtr;
            TRACE("got item from different tree %p, called from %p\n", item->infoPtr, infoPtr);
            valid_item = TREEVIEW_ValidItem(infoPtr, item);
        }
        __EXCEPT_PAGE_FAULT
        {
        }
        __ENDTRY
        if (!valid_item) return FALSE;
    }
 
    TREEVIEW_UpdateDispInfo(infoPtr, item, tvItem->mask);
 
    if (tvItem->mask & TVIF_CHILDREN)
    {
        if (item->cChildren==I_CHILDRENCALLBACK)
            FIXME("I_CHILDRENCALLBACK not supported\n");
    tvItem->cChildren = item->cChildren;
    }
 
    if (tvItem->mask & TVIF_HANDLE)
    tvItem->hItem = item;
 
    if (tvItem->mask & TVIF_IMAGE)
    tvItem->iImage = item->iImage;
 
    if (tvItem->mask & TVIF_INTEGRAL)
    tvItem->iIntegral = item->iIntegral;
 
    /* undocumented: (mask & TVIF_PARAM) ignored and lParam is always set */
    tvItem->lParam = item->lParam;
 
    if (tvItem->mask & TVIF_SELECTEDIMAGE)
    tvItem->iSelectedImage = item->iSelectedImage;
 
    if (tvItem->mask & TVIF_EXPANDEDIMAGE)
    tvItem->iExpandedImage = item->iExpandedImage;
 
    /* undocumented: stateMask and (state & TVIF_STATE) ignored, so state is always set */
    tvItem->state = item->state;
 
    if (tvItem->mask & TVIF_TEXT)
    {
        if (item->pszText == NULL)
        {
            if (tvItem->cchTextMax > 0)
                tvItem->pszText[0] = '\0';
        }
        else if (isW)
        {
            if (item->pszText == LPSTR_TEXTCALLBACKW)
            {
                tvItem->pszText = LPSTR_TEXTCALLBACKW;
                FIXME(" GetItem called with LPSTR_TEXTCALLBACK\n");
            }
            else
            {
                lstrcpynW(tvItem->pszText, item->pszText, tvItem->cchTextMax);
            }
        }
        else
        {
            if (item->pszText == LPSTR_TEXTCALLBACKW)
            {
                tvItem->pszText = (LPWSTR)LPSTR_TEXTCALLBACKA;
                FIXME(" GetItem called with LPSTR_TEXTCALLBACK\n");
            }
            else
            {
                WideCharToMultiByte(CP_ACP, 0, item->pszText, -1,
                                    (LPSTR)tvItem->pszText, tvItem->cchTextMax, NULL, NULL);
            }
        }
    }
 
    if (tvItem->mask & TVIF_STATEEX)
    {
        FIXME("Extended item state not supported, returning 0.\n");
        tvItem->uStateEx = 0;
    }
 
    TRACE("item <%p>, txt %p, img %d, mask 0x%x\n",
      item, tvItem->pszText, tvItem->iImage, tvItem->mask);
 
    return TRUE;
}
 
/* Beware MSDN Library Visual Studio 6.0. It says -1 on failure, 0 on success,
 * which is wrong. */
static LRESULT
TREEVIEW_SetItemT(TREEVIEW_INFO *infoPtr, const TVITEMEXW *tvItem, BOOL isW)
{
    TREEVIEW_ITEM *item;
    TREEVIEW_ITEM originalItem;
 
    item = tvItem->hItem;
 
    TRACE("item %d, mask 0x%x\n", TREEVIEW_GetItemIndex(infoPtr, item),
      tvItem->mask);
 
    if (!TREEVIEW_ValidItem(infoPtr, item))
    return FALSE;
 
    /* store the original item values */
    originalItem = *item;
 
    if (!TREEVIEW_DoSetItemT(infoPtr, item, tvItem, isW))
    return FALSE;
 
    /* If the text or TVIS_BOLD was changed, and it is visible, recalculate. */
    if ((tvItem->mask & TVIF_TEXT
     || (tvItem->mask & TVIF_STATE && tvItem->stateMask & TVIS_BOLD))
    && ISVISIBLE(item))
    {
    TREEVIEW_UpdateDispInfo(infoPtr, item, TVIF_TEXT);
    TREEVIEW_ComputeTextWidth(infoPtr, item, 0);
    }
 
    if (tvItem->mask != 0 && ISVISIBLE(item))
    {
    /* The refresh updates everything, but we can't wait until then. */
    TREEVIEW_ComputeItemInternalMetrics(infoPtr, item);
 
        /* if any of the item's values changed and it's not a callback, redraw the item */
        if (item_changed(&originalItem, item, tvItem))
        {
            if (tvItem->mask & TVIF_INTEGRAL)
        {
            TREEVIEW_RecalculateVisibleOrder(infoPtr, item);
            TREEVIEW_UpdateScrollBars(infoPtr);
 
            TREEVIEW_Invalidate(infoPtr, NULL);
        }
        else
        {
            TREEVIEW_UpdateScrollBars(infoPtr);
            TREEVIEW_Invalidate(infoPtr, item);
        }
        }
    }
 
    return TRUE;
}
 
static LRESULT
TREEVIEW_GetItemState(const TREEVIEW_INFO *infoPtr, HTREEITEM item, UINT mask)
{
    TRACE("\n");
 
    if (!item || !TREEVIEW_ValidItem(infoPtr, item))
    return 0;
 
    return (item->state & mask);
}
 
static LRESULT
TREEVIEW_GetNextItem(const TREEVIEW_INFO *infoPtr, UINT which, HTREEITEM item)
{
    TREEVIEW_ITEM *retval;
 
    retval = 0;
 
    /* handle all the global data here */
    switch (which)
    {
    case TVGN_CHILD:        /* Special case: child of 0 is root */
    if (item)
        break;
    /* fall through */
    case TVGN_ROOT:
    retval = infoPtr->root->firstChild;
    break;
 
    case TVGN_CARET:
    retval = infoPtr->selectedItem;
    break;
 
    case TVGN_FIRSTVISIBLE:
    retval = infoPtr->firstVisible;
    break;
 
    case TVGN_DROPHILITE:
    retval = infoPtr->dropItem;
    break;
 
    case TVGN_LASTVISIBLE:
    retval = TREEVIEW_GetLastListItem(infoPtr, infoPtr->root);
    break;
    }
 
    if (retval)
    {
    TRACE("flags:0x%x, returns %p\n", which, retval);
    return (LRESULT)retval;
    }
 
    if (item == TVI_ROOT) item = infoPtr->root;
 
    if (!TREEVIEW_ValidItem(infoPtr, item))
    return FALSE;
 
    switch (which)
    {
    case TVGN_NEXT:
    retval = item->nextSibling;
    break;
    case TVGN_PREVIOUS:
    retval = item->prevSibling;
    break;
    case TVGN_PARENT:
    retval = (item->parent != infoPtr->root) ? item->parent : NULL;
    break;
    case TVGN_CHILD:
    retval = item->firstChild;
    break;
    case TVGN_NEXTVISIBLE:
    retval = TREEVIEW_GetNextListItem(infoPtr, item);
    break;
    case TVGN_PREVIOUSVISIBLE:
    retval = TREEVIEW_GetPrevListItem(infoPtr, item);
    break;
    default:
    TRACE("Unknown msg 0x%x, item %p\n", which, item);
    break;
    }
 
    TRACE("flags: 0x%x, item %p;returns %p\n", which, item, retval);
    return (LRESULT)retval;
}
 
 
static LRESULT
TREEVIEW_GetCount(const TREEVIEW_INFO *infoPtr)
{
    TRACE(" %d\n", infoPtr->uNumItems);
    return (LRESULT)infoPtr->uNumItems;
}
 
static VOID
TREEVIEW_ToggleItemState(const TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item)
{
    if (infoPtr->dwStyle & TVS_CHECKBOXES)
    {
    static const unsigned int state_table[] = { 0, 2, 1 };
 
    unsigned int state;
 
    state = STATEIMAGEINDEX(item->state);
    TRACE("state: 0x%x\n", state);
    item->state &= ~TVIS_STATEIMAGEMASK;
 
    if (state < 3)
        state = state_table[state];
 
    item->state |= INDEXTOSTATEIMAGEMASK(state);
 
    TRACE("state: 0x%x\n", state);
    TREEVIEW_Invalidate(infoPtr, item);
    }
}
 
 
/* Painting *************************************************************/
 
/* Draw the lines and expand button for an item. Also draws one section
 * of the line from item's parent to item's parent's next sibling. */
static void
TREEVIEW_DrawItemLines(const TREEVIEW_INFO *infoPtr, HDC hdc, const TREEVIEW_ITEM *item)
{
    LONG centerx, centery;
    BOOL lar = ((infoPtr->dwStyle
         & (TVS_LINESATROOT|TVS_HASLINES|TVS_HASBUTTONS))
        > TVS_LINESATROOT);
    HBRUSH hbr, hbrOld;
    COLORREF clrBk = GETBKCOLOR(infoPtr->clrBk);
 
    if (!lar && item->iLevel == 0)
    return;
 
    hbr    = CreateSolidBrush(clrBk);
    hbrOld = SelectObject(hdc, hbr);
 
    centerx = (item->linesOffset + item->stateOffset) / 2;
    centery = (item->rect.top + item->rect.bottom) / 2;
 
    if (infoPtr->dwStyle & TVS_HASLINES)
    {
    HPEN hOldPen, hNewPen;
    HTREEITEM parent;
        LOGBRUSH lb;
 
    /* Get a dotted grey pen */
        lb.lbStyle = BS_SOLID;
        lb.lbColor = GETLINECOLOR(infoPtr->clrLine);
        hNewPen = ExtCreatePen(PS_COSMETIC|PS_ALTERNATE, 1, &lb, 0, NULL);
    hOldPen = SelectObject(hdc, hNewPen);
 
        /* Make sure the center is on a dot (using +2 instead
         * of +1 gives us pixel-by-pixel compat with native) */
        centery = (centery + 2) & ~1;
 
    MoveToEx(hdc, item->stateOffset, centery, NULL);
    LineTo(hdc, centerx - 1, centery);
 
    if (item->prevSibling || item->parent != infoPtr->root)
    {
        MoveToEx(hdc, centerx, item->rect.top, NULL);
        LineTo(hdc, centerx, centery);
    }
 
    if (item->nextSibling)
    {
        MoveToEx(hdc, centerx, centery, NULL);
        LineTo(hdc, centerx, item->rect.bottom + 1);
    }
 
    /* Draw the line from our parent to its next sibling. */
    parent = item->parent;
    while (parent != infoPtr->root)
    {
        int pcenterx = (parent->linesOffset + parent->stateOffset) / 2;
 
        if (parent->nextSibling
        /* skip top-levels unless TVS_LINESATROOT */
        && parent->stateOffset > parent->linesOffset)
        {
        MoveToEx(hdc, pcenterx, item->rect.top, NULL);
        LineTo(hdc, pcenterx, item->rect.bottom + 1);
        }
 
        parent = parent->parent;
    }
 
    SelectObject(hdc, hOldPen);
    DeleteObject(hNewPen);
    }
 
    /*
     * Display the (+/-) signs
     */
 
    if (infoPtr->dwStyle & TVS_HASBUTTONS)
    {
    if (item->cChildren)
    {
            HTHEME theme = GetWindowTheme(infoPtr->hwnd);
            if (theme)
            {
                RECT glyphRect = item->rect;
                glyphRect.left = item->linesOffset;
                glyphRect.right = item->stateOffset;
                DrawThemeBackground (theme, hdc, TVP_GLYPH,
                    (item->state & TVIS_EXPANDED) ? GLPS_OPENED : GLPS_CLOSED,
                    &glyphRect, NULL);
            }
            else
            {
                LONG height = item->rect.bottom - item->rect.top;
                LONG width  = item->stateOffset - item->linesOffset;
                LONG rectsize = min(height, width) / 4;
                /* plussize = ceil(rectsize * 3/4) */
                LONG plussize = (rectsize + 1) * 3 / 4;
 
                HPEN new_pen  = CreatePen(PS_SOLID, 0, GETLINECOLOR(infoPtr->clrLine));
                HPEN old_pen  = SelectObject(hdc, new_pen);
 
                Rectangle(hdc, centerx - rectsize - 1, centery - rectsize - 1,
                          centerx + rectsize + 2, centery + rectsize + 2);
 
                SelectObject(hdc, old_pen);
                DeleteObject(new_pen);
 
                /* draw +/- signs with current text color */
                new_pen = CreatePen(PS_SOLID, 0, GETTXTCOLOR(infoPtr->clrText));
                old_pen = SelectObject(hdc, new_pen);
 
                if (height < 18 || width < 18)
                {
                    MoveToEx(hdc, centerx - plussize + 1, centery, NULL);
                    LineTo(hdc, centerx + plussize, centery);
    
                    if (!(item->state & TVIS_EXPANDED) ||
                         (item->state & TVIS_EXPANDPARTIAL))
                    {
                        MoveToEx(hdc, centerx, centery - plussize + 1, NULL);
                        LineTo(hdc, centerx, centery + plussize);
                    }
                }
                else
                {
                    Rectangle(hdc, centerx - plussize + 1, centery - 1,
                    centerx + plussize, centery + 2);
 
                    if (!(item->state & TVIS_EXPANDED) ||
                         (item->state & TVIS_EXPANDPARTIAL))
                    {
                        Rectangle(hdc, centerx - 1, centery - plussize + 1,
                        centerx + 2, centery + plussize);
                        SetPixel(hdc, centerx - 1, centery, clrBk);
                        SetPixel(hdc, centerx + 1, centery, clrBk);
                    }
                }
 
                SelectObject(hdc, old_pen);
                DeleteObject(new_pen);
            }
    }
    }
    SelectObject(hdc, hbrOld);
    DeleteObject(hbr);
}
 
static void
TREEVIEW_DrawItem(const TREEVIEW_INFO *infoPtr, HDC hdc, TREEVIEW_ITEM *item)
{
    INT cditem;
    HFONT hOldFont;
    COLORREF oldTextColor, oldTextBkColor;
    int centery;
    BOOL inFocus = (GetFocus() == infoPtr->hwnd);
    NMTVCUSTOMDRAW nmcdhdr;
 
    TREEVIEW_UpdateDispInfo(infoPtr, item, CALLBACK_MASK_ALL);
 
    /* - If item is drop target or it is selected and window is in focus -
     * use blue background (COLOR_HIGHLIGHT).
     * - If item is selected, window is not in focus, but it has style
     * TVS_SHOWSELALWAYS - use grey background (COLOR_BTNFACE)
     * - Otherwise - use background color
     */
    if ((item->state & TVIS_DROPHILITED) || ((item == infoPtr->focusedItem) && !(item->state & TVIS_SELECTED)) ||
    ((item->state & TVIS_SELECTED) && (!infoPtr->focusedItem || item == infoPtr->focusedItem) &&
     (inFocus || (infoPtr->dwStyle & TVS_SHOWSELALWAYS))))
    {
    if ((item->state & TVIS_DROPHILITED) || inFocus)
    {
        nmcdhdr.clrTextBk = comctl32_color.clrHighlight;
        nmcdhdr.clrText   = comctl32_color.clrHighlightText;
    }
    else
    {
        nmcdhdr.clrTextBk = comctl32_color.clrBtnFace;
        nmcdhdr.clrText   = GETTXTCOLOR(infoPtr->clrText);
    }
    }
    else
    {
    nmcdhdr.clrTextBk = GETBKCOLOR(infoPtr->clrBk);
    if ((infoPtr->dwStyle & TVS_TRACKSELECT) && (item == infoPtr->hotItem))
        nmcdhdr.clrText = comctl32_color.clrHighlight;
    else
        nmcdhdr.clrText = GETTXTCOLOR(infoPtr->clrText);
    }
 
    hOldFont = SelectObject(hdc, TREEVIEW_FontForItem(infoPtr, item));
    oldTextColor = SetTextColor(hdc, nmcdhdr.clrText);
    oldTextBkColor = SetBkColor(hdc, nmcdhdr.clrTextBk);
 
    /* The custom draw handler can query the text rectangle,
     * so get ready. */
    /* should already be known, set to 0 when changed */
    if (!item->textWidth)
        TREEVIEW_ComputeTextWidth(infoPtr, item, hdc);
 
    cditem = 0;
 
    if (infoPtr->cdmode & CDRF_NOTIFYITEMDRAW)
    {
    cditem = TREEVIEW_SendCustomDrawItemNotify
        (infoPtr, hdc, item, CDDS_ITEMPREPAINT, &nmcdhdr);
    TRACE("prepaint:cditem-app returns 0x%x\n", cditem);
 
    if (cditem & CDRF_SKIPDEFAULT)
    {
        SelectObject(hdc, hOldFont);
        return;
    }
    }
 
    if (cditem & CDRF_NEWFONT)
    TREEVIEW_ComputeTextWidth(infoPtr, item, hdc);
 
    if (TREEVIEW_IsFullRowSelect(infoPtr))
    {
        HBRUSH brush = CreateSolidBrush(nmcdhdr.clrTextBk);
        FillRect(hdc, &item->rect, brush);
        DeleteObject(brush);
    }
 
    TREEVIEW_DrawItemLines(infoPtr, hdc, item);
 
    /* reset colors. Custom draw handler can change them */
    SetTextColor(hdc, nmcdhdr.clrText);
    SetBkColor(hdc, nmcdhdr.clrTextBk);
 
    centery = (item->rect.top + item->rect.bottom) / 2;
 
    /*
     * Display the images associated with this item
     */
    {
    INT imageIndex;
 
    /* State images are displayed to the left of the Normal image
     * image number is in state; zero should be `display no image'.
     */
    imageIndex = STATEIMAGEINDEX(item->state);
 
    if (infoPtr->himlState && imageIndex)
    {
        ImageList_Draw(infoPtr->himlState, imageIndex, hdc,
               item->stateOffset,
               centery - infoPtr->stateImageHeight / 2,
               ILD_NORMAL);
    }
 
    /* Now, draw the normal image; can be either selected,
     * non-selected or expanded image.
     */
 
    if ((item->state & TVIS_SELECTED) && (item->iSelectedImage >= 0))
    {
        /* The item is currently selected */
        imageIndex = item->iSelectedImage;
    }
    else if ((item->state & TVIS_EXPANDED) && (item->iExpandedImage != (WORD)I_IMAGENONE))
    {
        /* The item is currently not selected but expanded */
        imageIndex = item->iExpandedImage;
    }
    else
    {
        /* The item is not selected and not expanded */
        imageIndex = item->iImage;
    }
 
    if (infoPtr->himlNormal)
    {
            UINT style = item->state & TVIS_CUT ? ILD_SELECTED : ILD_NORMAL;
 
            style |= item->state & TVIS_OVERLAYMASK;
 
            ImageList_DrawEx(infoPtr->himlNormal, imageIndex, hdc,
                         item->imageOffset, centery - infoPtr->normalImageHeight / 2,
                         0, 0, infoPtr->clrBk, item->state & TVIS_CUT ? GETBKCOLOR(infoPtr->clrBk) : CLR_DEFAULT,
                         style);
    }
    }
 
 
    /*
     * Display the text associated with this item
     */
 
    /* Don't paint item's text if it's being edited */
    if (!infoPtr->hwndEdit || (infoPtr->selectedItem != item))
    {
    if (item->pszText)
    {
        RECT rcText;
        UINT align;
        SIZE sz;
 
        rcText.top = item->rect.top;
        rcText.bottom = item->rect.bottom;
        rcText.left = item->textOffset;
        rcText.right = rcText.left + item->textWidth + 4;
 
            TRACE("drawing text %s at (%s)\n",
                  debugstr_w(item->pszText), wine_dbgstr_rect(&rcText));
 
        /* Draw it */
        GetTextExtentPoint32W(hdc, item->pszText, strlenW(item->pszText), &sz);
 
        align = SetTextAlign(hdc, TA_LEFT | TA_TOP);
        ExtTextOutW(hdc, rcText.left + 2, (rcText.top + rcText.bottom - sz.cy) / 2,
                ETO_CLIPPED | ETO_OPAQUE,
            &rcText,
                item->pszText,
                lstrlenW(item->pszText),
            NULL);
        SetTextAlign(hdc, align);
 
        /* Draw focus box around the selected item */
        if ((item == infoPtr->selectedItem) && inFocus)
        {
        DrawFocusRect(hdc,&rcText);
        }
    }
    }
 
    /* Draw insertion mark if necessary */
 
    if (infoPtr->insertMarkItem)
    TRACE("item:%d,mark:%p\n",
          TREEVIEW_GetItemIndex(infoPtr, item),
          infoPtr->insertMarkItem);
 
    if (item == infoPtr->insertMarkItem)
    {
    HPEN hNewPen, hOldPen;
    int offset;
    int left, right;
 
    hNewPen = CreatePen(PS_SOLID, 2, GETINSCOLOR(infoPtr->clrInsertMark));
    hOldPen = SelectObject(hdc, hNewPen);
 
    if (infoPtr->insertBeforeorAfter)
        offset = item->rect.bottom - 1;
    else
        offset = item->rect.top + 1;
 
    left = item->textOffset - 2;
    right = item->textOffset + item->textWidth + 2;
 
    MoveToEx(hdc, left, offset - 3, NULL);
    LineTo(hdc, left, offset + 4);
 
    MoveToEx(hdc, left, offset, NULL);
    LineTo(hdc, right + 1, offset);
 
    MoveToEx(hdc, right, offset + 3, NULL);
    LineTo(hdc, right, offset - 4);
 
    SelectObject(hdc, hOldPen);
    DeleteObject(hNewPen);
    }
 
    /* Restore the hdc state */
    SetTextColor(hdc, oldTextColor);
    SetBkColor(hdc, oldTextBkColor);
    SelectObject(hdc, hOldFont);
 
    if (cditem & CDRF_NOTIFYPOSTPAINT)
    {
    cditem = TREEVIEW_SendCustomDrawItemNotify
        (infoPtr, hdc, item, CDDS_ITEMPOSTPAINT, &nmcdhdr);
    TRACE("postpaint:cditem-app returns 0x%x\n", cditem);
    }
}
 
/* Computes treeHeight and treeWidth and updates the scroll bars.
 */
static void
TREEVIEW_UpdateScrollBars(TREEVIEW_INFO *infoPtr)
{
    TREEVIEW_ITEM *item;
    HWND hwnd = infoPtr->hwnd;
    BOOL vert = FALSE;
    BOOL horz = FALSE;
    SCROLLINFO si;
    LONG scrollX = infoPtr->scrollX;
 
    infoPtr->treeWidth = 0;
    infoPtr->treeHeight = 0;
 
    /* We iterate through all visible items in order to get the tree height
     * and width */
    item = infoPtr->root->firstChild;
 
    while (item != NULL)
    {
    if (ISVISIBLE(item))
    {
            /* actually we draw text at textOffset + 2 */
        if (2+item->textOffset+item->textWidth > infoPtr->treeWidth)
        infoPtr->treeWidth = item->textOffset+item->textWidth+2;
 
        /* This is scroll-adjusted, but we fix this below. */
        infoPtr->treeHeight = item->rect.bottom;
    }
 
    item = TREEVIEW_GetNextListItem(infoPtr, item);
    }
 
    /* Fix the scroll adjusted treeHeight and treeWidth. */
    if (infoPtr->root->firstChild)
    infoPtr->treeHeight -= infoPtr->root->firstChild->rect.top;
 
    infoPtr->treeWidth += infoPtr->scrollX;
 
    if (infoPtr->dwStyle & TVS_NOSCROLL) return;
 
    /* Adding one scroll bar may take up enough space that it forces us
     * to add the other as well. */
    if (infoPtr->treeHeight > infoPtr->clientHeight)
    {
    vert = TRUE;
 
    if (infoPtr->treeWidth
        > infoPtr->clientWidth - GetSystemMetrics(SM_CXVSCROLL))
        horz = TRUE;
    }
    else if (infoPtr->treeWidth > infoPtr->clientWidth || infoPtr->scrollX > 0)
    horz = TRUE;
 
    if (!vert && horz && infoPtr->treeHeight
    > infoPtr->clientHeight - GetSystemMetrics(SM_CYVSCROLL))
    vert = TRUE;
 
    if (horz && (infoPtr->dwStyle & TVS_NOHSCROLL)) horz = FALSE;
 
    si.cbSize = sizeof(SCROLLINFO);
    si.fMask  = SIF_POS|SIF_RANGE|SIF_PAGE;
    si.nMin   = 0;
 
    if (vert)
    {
    si.nPage = TREEVIEW_GetVisibleCount(infoPtr);
       if ( si.nPage && NULL != infoPtr->firstVisible)
       {
           si.nPos  = infoPtr->firstVisible->visibleOrder;
           si.nMax  = infoPtr->maxVisibleOrder - 1;
 
           SetScrollInfo(hwnd, SB_VERT, &si, TRUE);
 
           if (!(infoPtr->uInternalStatus & TV_VSCROLL))
               ShowScrollBar(hwnd, SB_VERT, TRUE);
           infoPtr->uInternalStatus |= TV_VSCROLL;
       }
       else
       {
           if (infoPtr->uInternalStatus & TV_VSCROLL)
               ShowScrollBar(hwnd, SB_VERT, FALSE);
           infoPtr->uInternalStatus &= ~TV_VSCROLL;
       }
    }
    else
    {
    if (infoPtr->uInternalStatus & TV_VSCROLL)
        ShowScrollBar(hwnd, SB_VERT, FALSE);
    infoPtr->uInternalStatus &= ~TV_VSCROLL;
    }
 
    if (horz)
    {
    si.nPage = infoPtr->clientWidth;
    si.nPos  = infoPtr->scrollX;
    si.nMax  = infoPtr->treeWidth - 1;
 
    if (si.nPos > si.nMax - max( si.nPage-1, 0 ))
        {
           si.nPos = si.nMax - max( si.nPage-1, 0 );
           scrollX = si.nPos;
        }
 
    if (!(infoPtr->uInternalStatus & TV_HSCROLL))
        ShowScrollBar(hwnd, SB_HORZ, TRUE);
    infoPtr->uInternalStatus |= TV_HSCROLL;
 
    SetScrollInfo(hwnd, SB_HORZ, &si, TRUE);
    TREEVIEW_HScroll(infoPtr,
                    MAKEWPARAM(SB_THUMBPOSITION, scrollX));
    }
    else
    {
    if (infoPtr->uInternalStatus & TV_HSCROLL)
        ShowScrollBar(hwnd, SB_HORZ, FALSE);
    infoPtr->uInternalStatus &= ~TV_HSCROLL;
 
    scrollX = 0;
        if (infoPtr->scrollX != 0)
        {
        TREEVIEW_HScroll(infoPtr,
                        MAKEWPARAM(SB_THUMBPOSITION, scrollX));
        }
    }
 
    if (!horz)
    infoPtr->uInternalStatus &= ~TV_HSCROLL;
}
 
static void
TREEVIEW_FillBkgnd(const TREEVIEW_INFO *infoPtr, HDC hdc, const RECT *rc)
{
    HBRUSH hBrush;
    COLORREF clrBk = GETBKCOLOR(infoPtr->clrBk);
 
    hBrush =  CreateSolidBrush(clrBk);
    FillRect(hdc, rc, hBrush);
    DeleteObject(hBrush);
}
 
/* CtrlSpy doesn't mention this, but CorelDRAW's object manager needs it. */
static LRESULT
TREEVIEW_EraseBackground(const TREEVIEW_INFO *infoPtr, HDC hdc)
{
    RECT rect;
 
    TRACE("%p\n", infoPtr);
 
    GetClientRect(infoPtr->hwnd, &rect);
    TREEVIEW_FillBkgnd(infoPtr, hdc, &rect);
 
    return 1;
}
 
static void
TREEVIEW_Refresh(TREEVIEW_INFO *infoPtr, HDC hdc, const RECT *rc)
{
    HWND hwnd = infoPtr->hwnd;
    RECT rect = *rc;
    TREEVIEW_ITEM *item;
 
    if (infoPtr->clientHeight == 0 || infoPtr->clientWidth == 0)
    {
    TRACE("empty window\n");
    return;
    }
 
    infoPtr->cdmode = TREEVIEW_SendCustomDrawNotify(infoPtr, CDDS_PREPAINT,
                            hdc, rect);
 
    if (infoPtr->cdmode == CDRF_SKIPDEFAULT)
    {
    ReleaseDC(hwnd, hdc);
    return;
    }
 
    for (item = infoPtr->root->firstChild;
         item != NULL;
         item = TREEVIEW_GetNextListItem(infoPtr, item))
    {
    if (ISVISIBLE(item))
    {
            /* Avoid unneeded calculations */
            if (item->rect.top > rect.bottom)
                break;
            if (item->rect.bottom < rect.top)
                continue;
 
        TREEVIEW_DrawItem(infoPtr, hdc, item);
    }
    }
 
    //
    // FIXME: This is correct, but is causes and infinite loop of WM_PAINT
    // messages, resulting in continuous painting of the scroll bar in reactos.
    // Comment out until the real bug is found. CORE-4912
    //
#ifndef __REACTOS__
    TREEVIEW_UpdateScrollBars(infoPtr);
#endif
 
    if (infoPtr->cdmode & CDRF_NOTIFYPOSTPAINT)
    infoPtr->cdmode =
        TREEVIEW_SendCustomDrawNotify(infoPtr, CDDS_POSTPAINT, hdc, rect);
}
 
static inline void
TREEVIEW_InvalidateItem(const TREEVIEW_INFO *infoPtr, const TREEVIEW_ITEM *item)
{
    if (item) InvalidateRect(infoPtr->hwnd, &item->rect, TRUE);
}
 
static void
TREEVIEW_Invalidate(const TREEVIEW_INFO *infoPtr, const TREEVIEW_ITEM *item)
{
    if (item)
    InvalidateRect(infoPtr->hwnd, &item->rect, TRUE);
    else
        InvalidateRect(infoPtr->hwnd, NULL, TRUE);
}
 
static void
TREEVIEW_InitCheckboxes(TREEVIEW_INFO *infoPtr)
{
    RECT rc;
    HBITMAP hbm, hbmOld;
    HDC hdc, hdcScreen;
    int nIndex;
 
    infoPtr->himlState = ImageList_Create(16, 16, ILC_COLOR | ILC_MASK, 3, 0);
 
    hdcScreen = GetDC(0);
 
    hdc = CreateCompatibleDC(hdcScreen);
    hbm = CreateCompatibleBitmap(hdcScreen, 48, 16);
    hbmOld = SelectObject(hdc, hbm);
 
    SetRect(&rc, 0, 0, 48, 16);
    FillRect(hdc, &rc, (HBRUSH)(COLOR_WINDOW+1));
 
    SetRect(&rc, 18, 2, 30, 14);
    DrawFrameControl(hdc, &rc, DFC_BUTTON,
                     DFCS_BUTTONCHECK|DFCS_FLAT);
 
    SetRect(&rc, 34, 2, 46, 14);
    DrawFrameControl(hdc, &rc, DFC_BUTTON,
                     DFCS_BUTTONCHECK|DFCS_FLAT|DFCS_CHECKED);
 
    SelectObject(hdc, hbmOld);
    nIndex = ImageList_AddMasked(infoPtr->himlState, hbm,
                                 comctl32_color.clrWindow);
    TRACE("checkbox index %d\n", nIndex);
 
    DeleteObject(hbm);
    DeleteDC(hdc);
    ReleaseDC(0, hdcScreen);
 
    infoPtr->stateImageWidth = 16;
    infoPtr->stateImageHeight = 16;
}
 
static void
TREEVIEW_ResetImageStateIndex(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item)
{
    TREEVIEW_ITEM *child = item->firstChild;
 
    item->state &= ~TVIS_STATEIMAGEMASK;
    item->state |= INDEXTOSTATEIMAGEMASK(1);
 
    while (child)
    {
        TREEVIEW_ITEM *next = child->nextSibling;
        TREEVIEW_ResetImageStateIndex(infoPtr, child);
        child = next;
    }
}
 
static LRESULT
TREEVIEW_Paint(TREEVIEW_INFO *infoPtr, HDC hdc_ref)
{
    HDC hdc;
    PAINTSTRUCT ps;
    RECT rc;
 
    TRACE("(%p %p)\n", infoPtr, hdc_ref);
 
    if ((infoPtr->dwStyle & TVS_CHECKBOXES) && !infoPtr->himlState)
    {
        TREEVIEW_InitCheckboxes(infoPtr);
        TREEVIEW_ResetImageStateIndex(infoPtr, infoPtr->root);
 
        TREEVIEW_EndEditLabelNow(infoPtr, TRUE);
        TREEVIEW_UpdateSubTree(infoPtr, infoPtr->root);
        TREEVIEW_UpdateScrollBars(infoPtr);
        TREEVIEW_Invalidate(infoPtr, NULL);
    }
 
    if (hdc_ref)
    {
        hdc = hdc_ref;
        GetClientRect(infoPtr->hwnd, &rc);
        TREEVIEW_FillBkgnd(infoPtr, hdc, &rc);
    }
    else
    {
        hdc = BeginPaint(infoPtr->hwnd, &ps);
        rc  = ps.rcPaint;
        if(ps.fErase)
            TREEVIEW_FillBkgnd(infoPtr, hdc, &rc);
    }
 
    if(infoPtr->bRedraw) /* WM_SETREDRAW sets bRedraw */
        TREEVIEW_Refresh(infoPtr, hdc, &rc);
 
    if (!hdc_ref)
    EndPaint(infoPtr->hwnd, &ps);
 
    return 0;
}
 
static LRESULT
TREEVIEW_PrintClient(TREEVIEW_INFO *infoPtr, HDC hdc, DWORD options)
{
    FIXME("Partial Stub: (hdc=%p options=0x%08x)\n", hdc, options);
 
    if ((options & PRF_CHECKVISIBLE) && !IsWindowVisible(infoPtr->hwnd))
        return 0;
 
    if (options & PRF_ERASEBKGND)
        TREEVIEW_EraseBackground(infoPtr, hdc);
 
    if (options & PRF_CLIENT)
    {
        RECT rc;
        GetClientRect(infoPtr->hwnd, &rc);
        TREEVIEW_Refresh(infoPtr, hdc, &rc);
    }
 
    return 0;
}
 
/* Sorting **************************************************************/
 
/***************************************************************************
 * Forward the DPA local callback to the treeview owner callback
 */
static INT WINAPI
TREEVIEW_CallBackCompare(const TREEVIEW_ITEM *first, const TREEVIEW_ITEM *second,
                         const TVSORTCB *pCallBackSort)
{
    /* Forward the call to the client-defined callback */
    return pCallBackSort->lpfnCompare(first->lParam,
                      second->lParam,
                      pCallBackSort->lParam);
}
 
/***************************************************************************
 * Treeview native sort routine: sort on item text.
 */
static INT WINAPI
TREEVIEW_SortOnName(TREEVIEW_ITEM *first, TREEVIEW_ITEM *second,
                    const TREEVIEW_INFO *infoPtr)
{
    TREEVIEW_UpdateDispInfo(infoPtr, first, TVIF_TEXT);
    TREEVIEW_UpdateDispInfo(infoPtr, second, TVIF_TEXT);
 
    if(first->pszText && second->pszText)
        return lstrcmpiW(first->pszText, second->pszText);
    else if(first->pszText)
        return -1;
    else if(second->pszText)
        return 1;
    else
        return 0;
}
 
/* Returns the number of physical children belonging to item. */
static INT
TREEVIEW_CountChildren(const TREEVIEW_ITEM *item)
{
    INT cChildren = 0;
    HTREEITEM hti;
 
    for (hti = item->firstChild; hti != NULL; hti = hti->nextSibling)
    cChildren++;
 
    return cChildren;
}
 
/* Returns a DPA containing a pointer to each physical child of item in
 * sibling order. If item has no children, an empty DPA is returned. */
static HDPA
TREEVIEW_BuildChildDPA(const TREEVIEW_ITEM *item)
{
    HTREEITEM child;
 
    HDPA list = DPA_Create(8);
    if (list == 0) return NULL;
 
    for (child = item->firstChild; child != NULL; child = child->nextSibling)
    {
    if (DPA_InsertPtr(list, INT_MAX, child) == -1)
    {
        DPA_Destroy(list);
        return NULL;
    }
    }
 
    return list;
}
 
/***************************************************************************
 * Setup the treeview structure with regards of the sort method
 * and sort the children of the TV item specified in lParam
 * fRecurse: currently unused. Should be zero.
 * parent: if pSort!=NULL, should equal pSort->hParent.
 *         otherwise, item which child items are to be sorted.
 * pSort:  sort method info. if NULL, sort on item text.
 *         if non-NULL, sort on item's lParam content, and let the
 *         application decide what that means. See also TVM_SORTCHILDRENCB.
 */
 
static LRESULT
TREEVIEW_Sort(TREEVIEW_INFO *infoPtr, HTREEITEM parent,
          LPTVSORTCB pSort)
{
    INT cChildren;
    PFNDPACOMPARE pfnCompare;
    LPARAM lpCompare;
 
    /* undocumented feature: TVI_ROOT or NULL means `sort the whole tree' */
    if (parent == TVI_ROOT || parent == NULL)
    parent = infoPtr->root;
 
    /* Check for a valid handle to the parent item */
    if (!TREEVIEW_ValidItem(infoPtr, parent))
    {
    ERR("invalid item hParent=%p\n", parent);
    return FALSE;
    }
 
    if (pSort)
    {
    pfnCompare = (PFNDPACOMPARE)TREEVIEW_CallBackCompare;
    lpCompare = (LPARAM)pSort;
    }
    else
    {
    pfnCompare = (PFNDPACOMPARE)TREEVIEW_SortOnName;
    lpCompare = (LPARAM)infoPtr;
    }
 
    cChildren = TREEVIEW_CountChildren(parent);
 
    /* Make sure there is something to sort */
    if (cChildren > 1)
    {
    /* TREEVIEW_ITEM rechaining */
    INT count = 0;
    HTREEITEM item = 0;
    HTREEITEM nextItem = 0;
    HTREEITEM prevItem = 0;
 
    HDPA sortList = TREEVIEW_BuildChildDPA(parent);
 
    if (sortList == NULL)
        return FALSE;
 
    /* let DPA sort the list */
    DPA_Sort(sortList, pfnCompare, lpCompare);
 
    /* The order of DPA entries has been changed, so fixup the
     * nextSibling and prevSibling pointers. */
 
        item = DPA_GetPtr(sortList, count++);
        while ((nextItem = DPA_GetPtr(sortList, count++)) != NULL)
    {
        /* link the two current item together */
        item->nextSibling = nextItem;
        nextItem->prevSibling = item;
 
        if (prevItem == NULL)
        {
        /* this is the first item, update the parent */
        parent->firstChild = item;
        item->prevSibling = NULL;
        }
        else
        {
        /* fix the back chaining */
        item->prevSibling = prevItem;
        }
 
        /* get ready for the next one */
        prevItem = item;
        item = nextItem;
    }
 
    /* the last item is pointed to by item and never has a sibling */
    item->nextSibling = NULL;
    parent->lastChild = item;
 
    DPA_Destroy(sortList);
 
    TREEVIEW_VerifyTree(infoPtr);
 
    if (parent->state & TVIS_EXPANDED)
    {
        int visOrder = infoPtr->firstVisible->visibleOrder;
 
        if (parent == infoPtr->root)
            TREEVIEW_RecalculateVisibleOrder(infoPtr, NULL);
        else
            TREEVIEW_RecalculateVisibleOrder(infoPtr, parent);
 
        if (TREEVIEW_IsChildOf(parent, infoPtr->firstVisible))
        {
            TREEVIEW_ITEM *item;
 
            for (item = infoPtr->root->firstChild; item != NULL;
                 item = TREEVIEW_GetNextListItem(infoPtr, item))
            {
                if (item->visibleOrder == visOrder)
                    break;
            }
 
                if (!item) item = parent->firstChild;
                TREEVIEW_SetFirstVisible(infoPtr, item, FALSE);
        }
 
        TREEVIEW_Invalidate(infoPtr, NULL);
    }
 
    return TRUE;
    }
    return FALSE;
}
 
 
/***************************************************************************
 * Setup the treeview structure with regards of the sort method
 * and sort the children of the TV item specified in lParam
 */
static LRESULT
TREEVIEW_SortChildrenCB(TREEVIEW_INFO *infoPtr, LPTVSORTCB pSort)
{
    return TREEVIEW_Sort(infoPtr, pSort->hParent, pSort);
}
 
 
/***************************************************************************
 * Sort the children of the TV item specified in lParam.
 */
static LRESULT
TREEVIEW_SortChildren(TREEVIEW_INFO *infoPtr, LPARAM lParam)
{
    return TREEVIEW_Sort(infoPtr, (HTREEITEM)lParam, NULL);
}
 
 
/* Expansion/Collapse ***************************************************/
 
static BOOL
TREEVIEW_SendExpanding(const TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item,
               UINT action)
{
    return !TREEVIEW_SendTreeviewNotify(infoPtr, TVN_ITEMEXPANDINGW, action,
                    TVIF_HANDLE | TVIF_STATE | TVIF_PARAM
                    | TVIF_IMAGE | TVIF_SELECTEDIMAGE,
                    0, item);
}
 
static VOID
TREEVIEW_SendExpanded(const TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item,
              UINT action)
{
    TREEVIEW_SendTreeviewNotify(infoPtr, TVN_ITEMEXPANDEDW, action,
                TVIF_HANDLE | TVIF_STATE | TVIF_PARAM
                | TVIF_IMAGE | TVIF_SELECTEDIMAGE,
                0, item);
}
 
 
/* This corresponds to TVM_EXPAND with TVE_COLLAPSE.
 * bRemoveChildren corresponds to TVE_COLLAPSERESET. */
static BOOL
TREEVIEW_Collapse(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item,
          BOOL bRemoveChildren, BOOL bUser)
{
    UINT action = TVE_COLLAPSE | (bRemoveChildren ? TVE_COLLAPSERESET : 0);
    BOOL bSetSelection, bSetFirstVisible;
    RECT scrollRect;
    LONG scrollDist = 0;
    TREEVIEW_ITEM *nextItem = NULL, *tmpItem;
    BOOL wasExpanded;
 
    TRACE("TVE_COLLAPSE %p %s\n", item, TREEVIEW_ItemName(item));
 
    if (!TREEVIEW_HasChildren(infoPtr, item))
    return FALSE;
 
    if (bUser)
    TREEVIEW_SendExpanding(infoPtr, item, action);
 
    if (item->firstChild == NULL)
    return FALSE;
 
    wasExpanded = (item->state & TVIS_EXPANDED) != 0;
    item->state &= ~TVIS_EXPANDED;
 
    if (wasExpanded && bUser)
    TREEVIEW_SendExpanded(infoPtr, item, action);
 
    bSetSelection = (infoPtr->selectedItem != NULL
             && TREEVIEW_IsChildOf(item, infoPtr->selectedItem));
 
    bSetFirstVisible = (infoPtr->firstVisible != NULL
                        && TREEVIEW_IsChildOf(item, infoPtr->firstVisible));
 
    tmpItem = item;
    while (tmpItem)
    {
        if (tmpItem->nextSibling)
        {
            nextItem = tmpItem->nextSibling;
            break;
        }
        tmpItem = tmpItem->parent;
    }
 
    if (nextItem)
        scrollDist = nextItem->rect.top;
 
    if (bRemoveChildren)
    {
        INT old_cChildren = item->cChildren;
    TRACE("TVE_COLLAPSERESET\n");
    item->state &= ~TVIS_EXPANDEDONCE;
    TREEVIEW_RemoveAllChildren(infoPtr, item);
        item->cChildren = old_cChildren;
    }
    if (!wasExpanded)
        return FALSE;
 
    if (item->firstChild)
    {
        TREEVIEW_ITEM *i, *sibling;
 
    sibling = TREEVIEW_GetNextListItem(infoPtr, item);
 
    for (i = item->firstChild; i != sibling;
         i = TREEVIEW_GetNextListItem(infoPtr, i))
    {
        i->visibleOrder = -1;
    }
    }
 
    TREEVIEW_RecalculateVisibleOrder(infoPtr, item);
 
    if (nextItem)
        scrollDist = -(scrollDist - nextItem->rect.top);
 
    if (bSetSelection)
    {
    /* Don't call DoSelectItem, it sends notifications. */
    if (TREEVIEW_ValidItem(infoPtr, infoPtr->selectedItem))
        infoPtr->selectedItem->state &= ~TVIS_SELECTED;
    item->state |= TVIS_SELECTED;
    infoPtr->selectedItem = item;
    }
 
    TREEVIEW_UpdateScrollBars(infoPtr);
 
    scrollRect.left = 0;
    scrollRect.right = infoPtr->clientWidth;
    scrollRect.bottom = infoPtr->clientHeight;
 
    if (nextItem)
    {
        scrollRect.top = nextItem->rect.top;
 
        ScrollWindowEx (infoPtr->hwnd, 0, scrollDist, &scrollRect, &scrollRect,
                       NULL, NULL, SW_ERASE | SW_INVALIDATE);
        TREEVIEW_Invalidate(infoPtr, item);
    } else {
        scrollRect.top = item->rect.top;
        InvalidateRect(infoPtr->hwnd, &scrollRect, TRUE);
    }
 
    TREEVIEW_SetFirstVisible(infoPtr,
                             bSetFirstVisible ? item : infoPtr->firstVisible,
                             TRUE);
 
    return wasExpanded;
}
 
static BOOL
TREEVIEW_Expand(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item,
        BOOL partial, BOOL user)
{
    LONG scrollDist;
    LONG orgNextTop = 0;
    RECT scrollRect;
    TREEVIEW_ITEM *nextItem, *tmpItem;
    BOOL sendsNotifications;
 
    TRACE("(%p, %p, partial=%d, %d)\n", infoPtr, item, partial, user);
 
    if (!TREEVIEW_HasChildren(infoPtr, item))
    return FALSE;
 
    tmpItem = item; nextItem = NULL;
    while (tmpItem)
    {
        if (tmpItem->nextSibling)
        {
            nextItem = tmpItem->nextSibling;
            break;
        }
        tmpItem = tmpItem->parent;
    }
 
    if (nextItem)
        orgNextTop = nextItem->rect.top;
 
    TRACE("TVE_EXPAND %p %s\n", item, TREEVIEW_ItemName(item));
 
    sendsNotifications = user || ((item->cChildren != 0) &&
                                    !(item->state & TVIS_EXPANDEDONCE));
    if (sendsNotifications)
    {
    if (!TREEVIEW_SendExpanding(infoPtr, item, TVE_EXPAND))
    {
        TRACE("  TVN_ITEMEXPANDING returned TRUE, exiting...\n");
        return FALSE;
    }
    }
    if (!item->firstChild)
        return FALSE;
 
    item->state |= TVIS_EXPANDED;
 
    if (partial)
    FIXME("TVE_EXPANDPARTIAL not implemented\n");
 
    if (ISVISIBLE(item))
    {
        TREEVIEW_RecalculateVisibleOrder(infoPtr, item);
        TREEVIEW_UpdateSubTree(infoPtr, item);
        TREEVIEW_UpdateScrollBars(infoPtr);
 
        scrollRect.left = 0;
        scrollRect.bottom = infoPtr->treeHeight;
        scrollRect.right = infoPtr->clientWidth;
        if (nextItem)
        {
            scrollDist = nextItem->rect.top - orgNextTop;
            scrollRect.top = orgNextTop;
 
            ScrollWindowEx (infoPtr->hwnd, 0, scrollDist, &scrollRect, NULL,
                        NULL, NULL, SW_ERASE | SW_INVALIDATE);
            TREEVIEW_Invalidate (infoPtr, item);
        } else {
            scrollRect.top = item->rect.top;
            InvalidateRect(infoPtr->hwnd, &scrollRect, FALSE);
        }
 
        /* Scroll up so that as many children as possible are visible.
        * This fails when expanding causes an HScroll bar to appear, but we
        * don't know that yet, so the last item is obscured. */
        if (item->firstChild != NULL)
        {
            int nChildren = item->lastChild->visibleOrder
                - item->firstChild->visibleOrder + 1;
 
            int visible_pos = item->visibleOrder
                - infoPtr->firstVisible->visibleOrder;
 
            int rows_below = TREEVIEW_GetVisibleCount(infoPtr) - visible_pos - 1;
 
            if (visible_pos > 0 && nChildren > rows_below)
            {
                int scroll = nChildren - rows_below;
 
                if (scroll > visible_pos)
                    scroll = visible_pos;
 
                if (scroll > 0)
                {
                    TREEVIEW_ITEM *newFirstVisible
                        = TREEVIEW_GetListItem(infoPtr, infoPtr->firstVisible,
                                            scroll);
 
 
                    TREEVIEW_SetFirstVisible(infoPtr, newFirstVisible, TRUE);
                }
            }
        }
    }
 
    if (sendsNotifications) {
        TREEVIEW_SendExpanded(infoPtr, item, TVE_EXPAND);
        item->state |= TVIS_EXPANDEDONCE;
    }
 
    return TRUE;
}
 
/* Handler for TVS_SINGLEEXPAND behaviour. Used on response
   to mouse messages and TVM_SELECTITEM.
 
   selection - previously selected item, used to collapse a part of a tree
   item - new selected item
*/
static void TREEVIEW_SingleExpand(TREEVIEW_INFO *infoPtr,
    HTREEITEM selection, HTREEITEM item)
{
    TREEVIEW_ITEM *prev, *curr;
 
    if ((infoPtr->dwStyle & TVS_SINGLEEXPAND) == 0 || infoPtr->hwndEdit || !item) return;
 
    TREEVIEW_SendTreeviewNotify(infoPtr, TVN_SINGLEEXPAND, TVC_UNKNOWN, TVIF_HANDLE | TVIF_PARAM, item, 0);
 
    /*
     * Close the previous item and its ancestors as long as they are not
     * ancestors of the current item
     */
    for (prev = selection; prev && TREEVIEW_ValidItem(infoPtr, prev); prev = prev->parent)
    {
        for (curr = item; curr && TREEVIEW_ValidItem(infoPtr, curr); curr = curr->parent)
        {
            if (curr == prev)
                goto finish;
        }
        TREEVIEW_Collapse(infoPtr, prev, FALSE, TRUE);
    }
 
finish:
    /*
     * Expand the current item
     */
    TREEVIEW_Expand(infoPtr, item, FALSE, TRUE);
}
 
static BOOL
TREEVIEW_Toggle(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item, BOOL user)
{
    TRACE("item=%p, user=%d\n", item, user);
 
    if (item->state & TVIS_EXPANDED)
    return TREEVIEW_Collapse(infoPtr, item, FALSE, user);
    else
    return TREEVIEW_Expand(infoPtr, item, FALSE, user);
}
 
static VOID
TREEVIEW_ExpandAll(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item)
{
    TREEVIEW_Expand(infoPtr, item, FALSE, TRUE);
 
    for (item = item->firstChild; item != NULL; item = item->nextSibling)
    {
    if (TREEVIEW_HasChildren(infoPtr, item))
        TREEVIEW_ExpandAll(infoPtr, item);
    }
}
 
/* Note:If the specified item is the child of a collapsed parent item,
   the parent's list of child items is (recursively) expanded to reveal the
   specified item. This is mentioned for TREEVIEW_SelectItem; don't
   know if it also applies here.
*/
 
static LRESULT
TREEVIEW_ExpandMsg(TREEVIEW_INFO *infoPtr, UINT flag, HTREEITEM item)
{
    if (!TREEVIEW_ValidItem(infoPtr, item))
    return 0;
 
    TRACE("For (%s) item:%d, flags 0x%x, state:%d\n",
          TREEVIEW_ItemName(item), TREEVIEW_GetItemIndex(infoPtr, item),
              flag, item->state);
 
    switch (flag & TVE_TOGGLE)
    {
    case TVE_COLLAPSE:
    return TREEVIEW_Collapse(infoPtr, item, flag & TVE_COLLAPSERESET,
                 FALSE);
 
    case TVE_EXPAND:
    return TREEVIEW_Expand(infoPtr, item, flag & TVE_EXPANDPARTIAL,
                   FALSE);
 
    case TVE_TOGGLE:
    return TREEVIEW_Toggle(infoPtr, item, FALSE);
 
    default:
    return 0;
    }
}
 
/* Hit-Testing **********************************************************/
 
static TREEVIEW_ITEM *
TREEVIEW_HitTestPoint(const TREEVIEW_INFO *infoPtr, POINT pt)
{
    TREEVIEW_ITEM *item;
    LONG row;
 
    if (!infoPtr->firstVisible)
    return NULL;
 
    row = pt.y / infoPtr->uItemHeight + infoPtr->firstVisible->visibleOrder;
 
    for (item = infoPtr->firstVisible; item != NULL;
     item = TREEVIEW_GetNextListItem(infoPtr, item))
    {
    if (row >= item->visibleOrder
        && row < item->visibleOrder + item->iIntegral)
        break;
    }
 
    return item;
}
 
static TREEVIEW_ITEM *
TREEVIEW_HitTest(const TREEVIEW_INFO *infoPtr, LPTVHITTESTINFO lpht)
{
    TREEVIEW_ITEM *item;
    RECT rect;
    UINT status;
    LONG x, y;
 
    lpht->hItem = 0;
    GetClientRect(infoPtr->hwnd, &rect);
    status = 0;
    x = lpht->pt.x;
    y = lpht->pt.y;
 
    if (x < rect.left)
    {
    status |= TVHT_TOLEFT;
    }
    else if (x > rect.right)
    {
    status |= TVHT_TORIGHT;
    }
 
    if (y < rect.top)
    {
    status |= TVHT_ABOVE;
    }
    else if (y > rect.bottom)
    {
    status |= TVHT_BELOW;
    }
 
    if (status)
    {
    lpht->flags = status;
        return NULL;
    }
 
    item = TREEVIEW_HitTestPoint(infoPtr, lpht->pt);
    if (!item)
    {
    lpht->flags = TVHT_NOWHERE;
        return NULL;
    }
 
    if (!item->textWidth)
        TREEVIEW_ComputeTextWidth(infoPtr, item, 0);
 
    if (x >= item->textOffset + item->textWidth)
    {
    lpht->flags = TVHT_ONITEMRIGHT;
    }
    else if (x >= item->textOffset)
    {
    lpht->flags = TVHT_ONITEMLABEL;
    }
    else if (x >= item->imageOffset)
    {
    lpht->flags = TVHT_ONITEMICON;
    }
    else if (x >= item->stateOffset)
    {
    lpht->flags = TVHT_ONITEMSTATEICON;
    }
    else if (x >= item->linesOffset && infoPtr->dwStyle & TVS_HASBUTTONS)
    {
    lpht->flags = TVHT_ONITEMBUTTON;
    }
    else
    {
    lpht->flags = TVHT_ONITEMINDENT;
    }
 
    lpht->hItem = item;
    TRACE("(%d,%d):result 0x%x\n", lpht->pt.x, lpht->pt.y, lpht->flags);
 
    return item;
}
 
/* Item Label Editing ***************************************************/
 
static LRESULT
TREEVIEW_GetEditControl(const TREEVIEW_INFO *infoPtr)
{
    return (LRESULT)infoPtr->hwndEdit;
}
 
static LRESULT CALLBACK
TREEVIEW_Edit_SubclassProc(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
{
    TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(GetParent(hwnd));
    BOOL bCancel = FALSE;
    LRESULT rc;
 
    switch (uMsg)
    {
    case WM_PAINT:
     TRACE("WM_PAINT start\n");
     rc = CallWindowProcW(infoPtr->wpEditOrig, hwnd, uMsg, wParam,
                 lParam);
     TRACE("WM_PAINT done\n");
     return rc;
 
    case WM_KILLFOCUS:
    if (infoPtr->bIgnoreEditKillFocus)
        return TRUE;
    break;
 
    case WM_DESTROY:
    {
    WNDPROC editProc = infoPtr->wpEditOrig;
    infoPtr->wpEditOrig = 0;
    SetWindowLongPtrW(hwnd, GWLP_WNDPROC, (DWORD_PTR)editProc);
    return CallWindowProcW(editProc, hwnd, uMsg, wParam, lParam);
    }
 
    case WM_GETDLGCODE:
    return DLGC_WANTARROWS | DLGC_WANTALLKEYS;
 
    case WM_KEYDOWN:
       if (wParam == VK_ESCAPE)
    {
        bCancel = TRUE;
        break;
    }
       else if (wParam == VK_RETURN)
    {
        break;
    }
 
    /* fall through */
    default:
    return CallWindowProcW(infoPtr->wpEditOrig, hwnd, uMsg, wParam, lParam);
    }
 
    /* Processing TVN_ENDLABELEDIT message could kill the focus       */
    /* eg. Using a messagebox                                         */
 
    infoPtr->bIgnoreEditKillFocus = TRUE;
    TREEVIEW_EndEditLabelNow(infoPtr, bCancel || !infoPtr->bLabelChanged);
    infoPtr->bIgnoreEditKillFocus = FALSE;
 
    return 0;
}
 
 
/* should handle edit control messages here */
 
static LRESULT
TREEVIEW_Command(TREEVIEW_INFO *infoPtr, WPARAM wParam, LPARAM lParam)
{
    TRACE("code=0x%x, id=0x%x, handle=0x%lx\n", HIWORD(wParam), LOWORD(wParam), lParam);
 
    switch (HIWORD(wParam))
    {
    case EN_UPDATE:
    {
        /*
         * Adjust the edit window size
         */
        WCHAR buffer[1024];
        TREEVIEW_ITEM *editItem = infoPtr->editItem;
        HDC hdc = GetDC(infoPtr->hwndEdit);
        SIZE sz;
        HFONT hFont, hOldFont = 0;
 
        TRACE("edit=%p\n", infoPtr->hwndEdit);
 
        if (!IsWindow(infoPtr->hwndEdit) || !hdc) return FALSE;
 
        infoPtr->bLabelChanged = TRUE;
 
        GetWindowTextW(infoPtr->hwndEdit, buffer, ARRAY_SIZE(buffer));
 
        /* Select font to get the right dimension of the string */
        hFont = (HFONT)SendMessageW(infoPtr->hwndEdit, WM_GETFONT, 0, 0);
 
        if (hFont != 0)
        {
        hOldFont = SelectObject(hdc, hFont);
        }
 
        if (GetTextExtentPoint32W(hdc, buffer, strlenW(buffer), &sz))
        {
        TEXTMETRICW textMetric;
 
        /* Add Extra spacing for the next character */
        GetTextMetricsW(hdc, &textMetric);
        sz.cx += (textMetric.tmMaxCharWidth * 2);
 
        sz.cx = max(sz.cx, textMetric.tmMaxCharWidth * 3);
        sz.cx = min(sz.cx,
                infoPtr->clientWidth - editItem->textOffset + 2);
 
        SetWindowPos(infoPtr->hwndEdit,
                 HWND_TOP,
                 0,
                 0,
                 sz.cx,
                 editItem->rect.bottom - editItem->rect.top + 3,
                 SWP_NOMOVE | SWP_DRAWFRAME);
        }
 
        if (hFont != 0)
        {
        SelectObject(hdc, hOldFont);
        }
 
        ReleaseDC(infoPtr->hwnd, hdc);
        break;
    }
    case EN_KILLFOCUS:
    /* apparently we should respect passed handle value */
    if (infoPtr->hwndEdit != (HWND)lParam) return FALSE;
 
    TREEVIEW_EndEditLabelNow(infoPtr, FALSE);
    break;
 
    default:
    return SendMessageW(infoPtr->hwndNotify, WM_COMMAND, wParam, lParam);
    }
 
    return 0;
}
 
static HWND
TREEVIEW_EditLabel(TREEVIEW_INFO *infoPtr, HTREEITEM hItem)
{
    HWND hwnd = infoPtr->hwnd;
    HWND hwndEdit;
    SIZE sz;
    HINSTANCE hinst = (HINSTANCE)GetWindowLongPtrW(hwnd, GWLP_HINSTANCE);
    HDC hdc;
    HFONT hOldFont=0;
    TEXTMETRICW textMetric;
 
    TRACE("%p %p\n", hwnd, hItem);
    if (!(infoPtr->dwStyle & TVS_EDITLABELS))
        return NULL;
 
    if (!TREEVIEW_ValidItem(infoPtr, hItem))
    return NULL;
 
    if (infoPtr->hwndEdit)
    return infoPtr->hwndEdit;
 
    infoPtr->bLabelChanged = FALSE;
 
    /* make edit item visible */
    TREEVIEW_EnsureVisible(infoPtr, hItem, TRUE);
 
    TREEVIEW_UpdateDispInfo(infoPtr, hItem, TVIF_TEXT);
 
    hdc = GetDC(hwnd);
    /* Select the font to get appropriate metric dimensions */
    if (infoPtr->hFont != 0)
    {
    hOldFont = SelectObject(hdc, infoPtr->hFont);
    }
 
    /* Get string length in pixels */
    if (hItem->pszText)
        GetTextExtentPoint32W(hdc, hItem->pszText, strlenW(hItem->pszText),
                        &sz);
    else
        GetTextExtentPoint32A(hdc, "", 0, &sz);
 
    /* Add Extra spacing for the next character */
    GetTextMetricsW(hdc, &textMetric);
    sz.cx += (textMetric.tmMaxCharWidth * 2);
 
    sz.cx = max(sz.cx, textMetric.tmMaxCharWidth * 3);
    sz.cx = min(sz.cx, infoPtr->clientWidth - hItem->textOffset + 2);
 
    if (infoPtr->hFont != 0)
    {
    SelectObject(hdc, hOldFont);
    }
 
    ReleaseDC(hwnd, hdc);
 
    infoPtr->editItem = hItem;
 
    hwndEdit = CreateWindowExW(WS_EX_LEFT,
                   WC_EDITW,
                   0,
                   WS_CHILD | WS_BORDER | ES_AUTOHSCROLL |
                   WS_CLIPSIBLINGS | ES_WANTRETURN |
                   ES_LEFT, hItem->textOffset - 2,
                   hItem->rect.top - 1, sz.cx + 3,
                   hItem->rect.bottom -
                   hItem->rect.top + 3, hwnd, 0, hinst, 0);
/* FIXME: (HMENU)IDTVEDIT,pcs->hInstance,0); */
 
    infoPtr->hwndEdit = hwndEdit;
 
    /* Get a 2D border. */
    SetWindowLongW(hwndEdit, GWL_EXSTYLE,
           GetWindowLongW(hwndEdit, GWL_EXSTYLE) & ~WS_EX_CLIENTEDGE);
    SetWindowLongW(hwndEdit, GWL_STYLE,
           GetWindowLongW(hwndEdit, GWL_STYLE) | WS_BORDER);
 
    SendMessageW(hwndEdit, WM_SETFONT,
         (WPARAM)TREEVIEW_FontForItem(infoPtr, hItem), FALSE);
 
    infoPtr->wpEditOrig = (WNDPROC)SetWindowLongPtrW(hwndEdit, GWLP_WNDPROC,
                          (DWORD_PTR)
                          TREEVIEW_Edit_SubclassProc);
    if (hItem->pszText)
        SetWindowTextW(hwndEdit, hItem->pszText);
 
    if (TREEVIEW_BeginLabelEditNotify(infoPtr, hItem))
    {
    DestroyWindow(hwndEdit);
    infoPtr->hwndEdit = 0;
    infoPtr->editItem = NULL;
    return NULL;
    }
 
    SetFocus(hwndEdit);
    SendMessageW(hwndEdit, EM_SETSEL, 0, -1);
    ShowWindow(hwndEdit, SW_SHOW);
 
    return hwndEdit;
}
 
 
static LRESULT
TREEVIEW_EndEditLabelNow(TREEVIEW_INFO *infoPtr, BOOL bCancel)
{
    TREEVIEW_ITEM *editedItem = infoPtr->editItem;
    NMTVDISPINFOW tvdi;
    BOOL bCommit;
    WCHAR tmpText[1024] = { '\0' };
    WCHAR *newText = tmpText;
    int iLength = 0;
 
    if (!IsWindow(infoPtr->hwndEdit)) return FALSE;
 
    tvdi.item.mask = 0;
    tvdi.item.hItem = editedItem;
    tvdi.item.state = editedItem->state;
    tvdi.item.lParam = editedItem->lParam;
 
    if (!bCancel)
    {
        if (!infoPtr->bNtfUnicode)
            iLength = GetWindowTextA(infoPtr->hwndEdit, (LPSTR)tmpText, 1023);
        else
            iLength = GetWindowTextW(infoPtr->hwndEdit, tmpText, 1023);
 
    if (iLength >= 1023)
    {
        ERR("Insufficient space to retrieve new item label\n");
    }
 
        tvdi.item.mask = TVIF_TEXT;
    tvdi.item.pszText = tmpText;
    tvdi.item.cchTextMax = iLength + 1;
    }
    else
    {
    tvdi.item.pszText = NULL;
    tvdi.item.cchTextMax = 0;
    }
 
    bCommit = TREEVIEW_SendRealNotify(infoPtr, TVN_ENDLABELEDITW, &tvdi.hdr);
 
    if (!bCancel && bCommit)    /* Apply the changes */
    {
        if (!infoPtr->bNtfUnicode)
        {
            DWORD len = MultiByteToWideChar( CP_ACP, 0, (LPSTR)tmpText, -1, NULL, 0 );
            newText = heap_alloc(len * sizeof(WCHAR));
            MultiByteToWideChar( CP_ACP, 0, (LPSTR)tmpText, -1, newText, len );
            iLength = len - 1;
        }
 
        if (strcmpW(newText, editedItem->pszText) != 0)
        {
            WCHAR *ptr = heap_realloc(editedItem->pszText, sizeof(WCHAR)*(iLength + 1));
            if (ptr == NULL)
            {
                ERR("OutOfMemory, cannot allocate space for label\n");
                if (newText != tmpText) heap_free(newText);
                DestroyWindow(infoPtr->hwndEdit);
                infoPtr->hwndEdit = 0;
                infoPtr->editItem = NULL;
                return FALSE;
            }
            else
            {
                editedItem->pszText = ptr;
                editedItem->cchTextMax = iLength + 1;
                strcpyW(editedItem->pszText, newText);
                TREEVIEW_ComputeTextWidth(infoPtr, editedItem, 0);
            }
        }
        if (newText != tmpText) heap_free(newText);
    }
 
    ShowWindow(infoPtr->hwndEdit, SW_HIDE);
    DestroyWindow(infoPtr->hwndEdit);
    infoPtr->hwndEdit = 0;
    infoPtr->editItem = NULL;
    return TRUE;
}
 
static LRESULT
TREEVIEW_HandleTimer(TREEVIEW_INFO *infoPtr, WPARAM wParam)
{
    if (wParam != TV_EDIT_TIMER)
    {
    ERR("got unknown timer\n");
    return 1;
    }
 
    KillTimer(infoPtr->hwnd, TV_EDIT_TIMER);
    infoPtr->Timer &= ~TV_EDIT_TIMER_SET;
 
    TREEVIEW_EditLabel(infoPtr, infoPtr->selectedItem);
 
    return 0;
}
 
 
/* Mouse Tracking/Drag **************************************************/
 
/***************************************************************************
 * This is quite unusual piece of code, but that's how it's implemented in
 * Windows.
 */
static LRESULT
TREEVIEW_TrackMouse(const TREEVIEW_INFO *infoPtr, POINT pt)
{
    INT cxDrag = GetSystemMetrics(SM_CXDRAG);
    INT cyDrag = GetSystemMetrics(SM_CYDRAG);
    RECT r;
    MSG msg;
 
    r.top = pt.y - cyDrag;
    r.left = pt.x - cxDrag;
    r.bottom = pt.y + cyDrag;
    r.right = pt.x + cxDrag;
 
    SetCapture(infoPtr->hwnd);
 
    while (1)
    {
    if (PeekMessageW(&msg, 0, 0, 0, PM_REMOVE | PM_NOYIELD))
    {
        if (msg.message == WM_MOUSEMOVE)
        {
        pt.x = (short)LOWORD(msg.lParam);
        pt.y = (short)HIWORD(msg.lParam);
        if (PtInRect(&r, pt))
            continue;
        else
        {
            ReleaseCapture();
            return 1;
        }
        }
        else if (msg.message >= WM_LBUTTONDOWN &&
             msg.message <= WM_RBUTTONDBLCLK)
        {