/*******************************************************************************
 * Copyright (c) 2007 IBM Corporation and others.
 * All rights reserved. This program and the accompanying materials
 * are made available under the terms of the Eclipse Public License v1.0
 * which accompanies this distribution, and is available at
 * http://www.eclipse.org/legal/epl-v10.html
 *
 * Contributors:
 *     IBM Corporation - initial API and implementation
 * Port to the D programming language:
 *     Frank Benoit <benoit@tionex.de>
 *******************************************************************************/
module dwt.dnd.TableDropTargetEffect;

import dwt.graphics.Point;
import dwt.internal.win32.OS;
import dwt.widgets.Table;
import dwt.widgets.TableItem;

/**
 * This class provides a default drag under effect (eg. select, insert and scroll)
 * when a drag occurs over a <code>Table</code>.
 *
 * <p>Classes that wish to provide their own drag under effect for a <code>Table</code>
 * can extend the <code>TableDropTargetEffect</code> and override any applicable methods
 * in <code>TableDropTargetEffect</code> to display their own drag under effect.</p>
 *
 * Subclasses that override any methods of this class must call the corresponding
 * <code>super</code> method to get the default drag under effect implementation.
 *
 * <p>The feedback value is either one of the FEEDBACK constants defined in
 * class <code>DND</code> which is applicable to instances of this class,
 * or it must be built by <em>bitwise OR</em>'ing together
 * (that is, using the <code>int</code> "|" operator) two or more
 * of those <code>DND</code> effect constants.
 * </p>
 * <p>
 * <dl>
 * <dt><b>Feedback:</b></dt>
 * <dd>FEEDBACK_SELECT, FEEDBACK_SCROLL</dd>
 * </dl>
 * </p>
 *
 * @see DropTargetAdapter
 * @see DropTargetEvent
 *
 * @since 3.3
 */
public class TableDropTargetEffect : DropTargetEffect {
    static final int SCROLL_HYSTERESIS = 200; // milli seconds

    int scrollIndex = -1;
    long scrollBeginTime;
    TableItem dropHighlight;

    /**
     * Creates a new <code>TableDropTargetEffect</code> to handle the drag under effect on the specified
     * <code>Table</code>.
     *
     * @param table the <code>Table</code> over which the user positions the cursor to drop the data
     */
    public this(Table table) {
        super(table);
    }

    int checkEffect(int effect) {
        // Some effects are mutually exclusive.  Make sure that only one of the mutually exclusive effects has been specified.
        if ((effect & DND.FEEDBACK_SELECT) !is 0) effect = effect & ~DND.FEEDBACK_INSERT_AFTER & ~DND.FEEDBACK_INSERT_BEFORE;
        if ((effect & DND.FEEDBACK_INSERT_BEFORE) !is 0) effect = effect & ~DND.FEEDBACK_INSERT_AFTER;
        return effect;
    }

    /**
     * This implementation of <code>dragEnter</code> provides a default drag under effect
     * for the feedback specified in <code>event.feedback</code>.
     *
     * For additional information see <code>DropTargetAdapter.dragEnter</code>.
     *
     * Subclasses that override this method should call <code>super.dragEnter(event)</code>
     * to get the default drag under effect implementation.
     *
     * @param event  the information associated with the drag enter event
     *
     * @see DropTargetAdapter
     * @see DropTargetEvent
     */
    public void dragEnter(DropTargetEvent event) {
        scrollBeginTime = 0;
        scrollIndex = -1;
        dropHighlight = null;
    }

    /**
     * This implementation of <code>dragLeave</code> provides a default drag under effect
     * for the feedback specified in <code>event.feedback</code>.
     *
     * For additional information see <code>DropTargetAdapter.dragLeave</code>.
     *
     * Subclasses that override this method should call <code>super.dragLeave(event)</code>
     * to get the default drag under effect implementation.
     *
     * @param event  the information associated with the drag leave event
     *
     * @see DropTargetAdapter
     * @see DropTargetEvent
     */
    public void dragLeave(DropTargetEvent event) {
        Table table = (Table) control;
        int handle = table.handle;
        if (dropHighlight !is null) {
            LVITEM lvItem = new LVITEM ();
            lvItem.stateMask = OS.LVIS_DROPHILITED;
            OS.SendMessage(handle, OS.LVM_SETITEMSTATE, -1, lvItem);
            dropHighlight = null;
        }
        scrollBeginTime = 0;
        scrollIndex = -1;
    }

    /**
     * This implementation of <code>dragOver</code> provides a default drag under effect
     * for the feedback specified in <code>event.feedback</code>. The class description
     * lists the FEEDBACK constants that are applicable to the class.
     *
     * For additional information see <code>DropTargetAdapter.dragOver</code>.
     *
     * Subclasses that override this method should call <code>super.dragOver(event)</code>
     * to get the default drag under effect implementation.
     *
     * @param event  the information associated with the drag over event
     *
     * @see DropTargetAdapter
     * @see DropTargetEvent
     * @see DND#FEEDBACK_SELECT
     * @see DND#FEEDBACK_SCROLL
     */
    public void dragOver(DropTargetEvent event) {
        Table table = (Table) getControl();
        int effect = checkEffect(event.feedback);
        int handle = table.handle;
        Point coordinates = new Point(event.x, event.y);
        coordinates = table.toControl(coordinates);
        LVHITTESTINFO pinfo = new LVHITTESTINFO();
        pinfo.x = coordinates.x;
        pinfo.y = coordinates.y;
        OS.SendMessage(handle, OS.LVM_HITTEST, 0, pinfo);
        if ((effect & DND.FEEDBACK_SCROLL) is 0) {
            scrollBeginTime = 0;
            scrollIndex = -1;
        } else {
            if (pinfo.iItem !is -1 && scrollIndex is pinfo.iItem && scrollBeginTime !is 0) {
                if (System.currentTimeMillis() >= scrollBeginTime) {
                    int top = Math.max (0, OS.SendMessage (handle, OS.LVM_GETTOPINDEX, 0, 0));
                    int count = OS.SendMessage (handle, OS.LVM_GETITEMCOUNT, 0, 0);
                    int index = (scrollIndex - 1 < top) ? Math.max(0, scrollIndex - 1) : Math.min(count - 1, scrollIndex + 1);
                    bool scroll = true;
                    if (pinfo.iItem is top) {
                        scroll = pinfo.iItem !is index;
                    } else {
                        RECT itemRect = new RECT ();
                        itemRect.left = OS.LVIR_BOUNDS;
                        if (OS.SendMessage (handle, OS.LVM_GETITEMRECT, pinfo.iItem, itemRect) !is 0) {
                            RECT rect = new RECT ();
                            OS.GetClientRect (handle, rect);
                            POINT pt = new POINT ();
                            pt.x = itemRect.left;
                            pt.y = itemRect.top;
                            if (OS.PtInRect (rect, pt)) {
                                pt.y = itemRect.bottom;
                                if (OS.PtInRect (rect, pt)) scroll = false;
                            }
                        }
                    }
                    if (scroll) {
                        OS.SendMessage (handle, OS.LVM_ENSUREVISIBLE, index, 0);
                        table.redraw();
                    }
                    scrollBeginTime = 0;
                    scrollIndex = -1;
                }
            } else {
                scrollBeginTime = System.currentTimeMillis() + SCROLL_HYSTERESIS;
                scrollIndex = pinfo.iItem;
            }
        }

        if (pinfo.iItem !is -1 && (effect & DND.FEEDBACK_SELECT) !is 0) {
            TableItem item = table.getItem(pinfo.iItem);
            if (dropHighlight !is item) {
                LVITEM lvItem = new LVITEM();
                lvItem.stateMask = OS.LVIS_DROPHILITED;
                OS.SendMessage(handle, OS.LVM_SETITEMSTATE, -1, lvItem);
                lvItem.state = OS.LVIS_DROPHILITED;
                OS.SendMessage(handle, OS.LVM_SETITEMSTATE, pinfo.iItem, lvItem);
                dropHighlight = item;
            }
        } else {
            if (dropHighlight !is null) {
                LVITEM lvItem = new LVITEM ();
                lvItem.stateMask = OS.LVIS_DROPHILITED;
                OS.SendMessage(handle, OS.LVM_SETITEMSTATE, -1, lvItem);
                dropHighlight = null;
            }
        }
    }
}