/*
 *  Copyright (c) 1999 Matthias Elter  <me@kde.org>
 *                1999 Michael Koch    <koch@kde.org>
 *                2002 Patrick Julien <freak@codepimps.org>
 *                2004 Boudewijn Rempt <boud@valdyas.org>
 *
 *  This program is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation; either version 2 of the License, or
 *  (at your option) any later version.
 *
 *  This program 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 General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with this program; if not, write to the Free Software
 *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
 */

#include <stdlib.h>
#include <tqpoint.h>
#include <tdeaction.h>
#include <tdelocale.h>
#include <tqcolor.h>
#include "kis_canvas_subject.h"
#include "kis_cursor.h"
#include "kis_image.h"
#include "kis_paint_device.h"
#include "kis_tool_move.h"
#include "kis_tool_move.moc"
#include "kis_button_press_event.h"
#include "kis_button_release_event.h"
#include "kis_move_event.h"
#include "kis_selection.h"
#include "kis_selection_manager.h"
#include "kis_layer.h"

KisToolMove::KisToolMove()
    : super(i18n("Move Tool"))
    , m_subject( 0 )
    , m_keyEvent( 0 )
{
    setName("tool_move");

    setCursor(KisCursor::moveCursor());
    m_repeatTimer = new TQTimer(this);
    connect( m_repeatTimer, TQT_SIGNAL( timeout() ), this, TQT_SLOT( slotMove() ) );
}

KisToolMove::~KisToolMove()
{
}

void KisToolMove::update(KisCanvasSubject *subject)
{
    m_subject = subject;
    m_strategy.reset(subject);
    super::update(subject);
}

void KisToolMove::buttonPress(KisButtonPressEvent *e)
{
    if (m_subject && e->button() == TQt::LeftButton) {
        TQPoint pos = e->pos().floorTQPoint();
        KisImageSP img = m_subject->currentImg();
        KisLayerSP dev;

        if (!img || !(dev = img->activeLayer()))
            return;

        m_strategy.startDrag(pos);
    }
}

void KisToolMove::move(KisMoveEvent *e)
{
    if (m_subject  && e->state() == TQt::LeftButton) {
        TQPoint pos = e->pos().floorTQPoint();
        if((e->state() & TQt::AltButton) || (e->state() & TQt::ControlButton)) {
            if(fabs(pos.x() - m_dragStart.x()) > fabs(pos.y() - m_dragStart.y()))
                pos.setY(m_dragStart.y());
            else
                pos.setX(m_dragStart.x());
        }
        m_strategy.drag(pos);
    }
}

void KisToolMove::buttonRelease(KisButtonReleaseEvent *e)
{
    if (m_subject && e->button() == TQt::LeftButton) {
        m_strategy.endDrag(e->pos().floorTQPoint());
    }
}

void KisToolMove::setup(TDEActionCollection *collection)
{
    m_action = static_cast<TDERadioAction *>(collection->action(name()));

    if (m_action == 0) {
        m_action = new TDERadioAction(i18n("&Move"),
                        "tool_move",
                        TQt::SHIFT+TQt::Key_V,
                        this,
                        TQT_SLOT(activate()),
                        collection,
                        name());
        m_action->setToolTip(i18n("Move"));
        m_action->setExclusiveGroup("tools");
        m_ownAction = true;
    }
}


void KisToolMove::keyPress( TQKeyEvent *e )
{
    m_keyEvent = e;

   if (m_subject) {

        KisImageSP img = m_subject->currentImg();
        KisLayerSP dev;

        if (!img || !(dev = img->activeLayer()))
            return;

        m_dragStart = TQPoint( 0, 0 );
        m_strategy.startDrag( m_dragStart );
        m_steps = 1;
        m_repeatTimer->start(200);

    }
}

void KisToolMove::keyRelease(TQKeyEvent *)
{
    m_repeatTimer->stop();

    if ( m_subject && m_keyEvent) {

        if ( m_keyEvent->key() == TQt::Key_Left ) {
            m_strategy.endDrag(TQPoint( -m_steps, 0 ));
        }
        else if ( m_keyEvent->key() == TQt::Key_Right ) {
            m_strategy.endDrag(TQPoint(m_steps, 0) );
        }
        else if ( m_keyEvent->key() == TQt::Key_Up ) {
            m_strategy.endDrag(TQPoint(0, -m_steps) );
        }
        else if ( m_keyEvent->key() == TQt::Key_Down ) {
            m_strategy.endDrag(TQPoint(0, m_steps) );
        }
    }
    m_steps = 0;
    m_keyEvent = 0;

}

void KisToolMove::slotMove()
{
    if (m_subject  && m_keyEvent) {

        if ( m_keyEvent->key() == TQt::Key_Left ) {
            m_strategy.drag(TQPoint(-m_steps, 0) );
        }
        else if ( m_keyEvent->key() == TQt::Key_Right ) {
            m_strategy.drag(TQPoint(m_steps, 0) );
        }
        else if ( m_keyEvent->key() == TQt::Key_Up ) {
            m_strategy.drag(TQPoint(0, -m_steps) );
        }
        else if ( m_keyEvent->key() == TQt::Key_Down ) {
            m_strategy.drag(TQPoint(0, m_steps) );
        }

        ++m_steps;
    }

}