/**
 * Copyright (C) 2001-2015 Klaralvdalens Datakonsult AB.  All rights reserved.
 *
 * This file is part of the KD Chart library.
 *
 * 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, see <https://www.gnu.org/licenses/>.
 */

#include "mainwindow.h"

#include <KChartChart>
#include <KChartLineDiagram>
#include <KChartTextAttributes>
#include <KChartDataValueAttributes>
#include <KChartThreeDLineAttributes>


#include <QTimer>
#include <QMouseEvent>

using namespace KChart;

MainWindow::MainWindow( QWidget* parent ) :
    QWidget( parent )
{
    setupUi( this );

    m_curColumn = -1;
    m_curOpacity = 0;

    QHBoxLayout* chartLayout = new QHBoxLayout( chartFrame );
    m_chart = new Chart();
    chartLayout->addWidget( m_chart );

    m_model.loadFromCSV( ":/data" );

    // Set up the diagram
    m_lines = new LineDiagram( this );
    m_lines->setModel( &m_model );

    CartesianAxis* xAxis = new CartesianAxis( m_lines );
    CartesianAxis* yAxis = new CartesianAxis( m_lines );
    xAxis->setPosition( KChart::CartesianAxis::Bottom );
    yAxis->setPosition( KChart::CartesianAxis::Left );
    m_lines->addAxis( xAxis );
    m_lines->addAxis( yAxis );

    m_chart->coordinatePlane()->replaceDiagram( m_lines );
    m_chart->setGlobalLeading( 20,  20,  20,  20 );
    // Instantiate the timer
    QTimer* timer = new QTimer( this );
    connect( timer, SIGNAL(timeout()), this, SLOT(slot_timerFired()) );
    timer->start( 30 );

    //Change the cursor to IBeamCursor inside Chart widget.
    m_chart->setCursor( Qt::IBeamCursor );

    //Install event filter on Chart to get the mouse position
    m_chart->installEventFilter( this );
}

/**
  Event filter for getting mouse position
*/
bool MainWindow::eventFilter(QObject* target, QEvent* event)
{
    if (target == m_chart) {
        if (event->type() == QEvent::MouseMove) {
            // When the mouse is over a data-point then fetch that data-point
            // that belongs to the mouse-position and print the data value.
            QMouseEvent* mouseEvent = static_cast< QMouseEvent* >( event );
            QPointF pos = mouseEvent->pos();
            QModelIndex index = m_lines->indexAt(pos.toPoint());
            if (index.isValid()) {
                qDebug() << "Mouse position"  << pos << "Data:" << m_model.data(index).toDouble();
            }
        }
    }
    return QWidget::eventFilter(target, event);
}

void MainWindow::on_lineTypeCB_currentIndexChanged( const QString& text )
{
    if ( text == "Normal" )
        m_lines->setType( LineDiagram::Normal );
    else if ( text == "Stacked" )
        m_lines->setType( LineDiagram::Stacked );
    else if ( text == "Percent" )
        m_lines->setType( LineDiagram::Percent );
    else
        qWarning (" Does not match any type");

    m_chart->update();
}

void MainWindow::on_paintValuesCB_toggled( bool checked )
{
    const int colCount = m_lines->model()->columnCount( m_lines->rootIndex() );
    for ( int iColumn = 0; iColumn<colCount; ++iColumn ) {
        DataValueAttributes a( m_lines->dataValueAttributes( iColumn ) );
        QBrush brush( m_lines->brush( iColumn ) );
        TextAttributes ta( a.textAttributes() );
        ta.setRotation( 0 );
        ta.setFont( QFont( "Comic", 10 ) );
        ta.setPen( QPen( brush.color() ) );

        if ( checked )
            ta.setVisible( true );
        else
            ta.setVisible( false );
        a.setVisible( true );
        a.setTextAttributes( ta );
        m_lines->setDataValueAttributes( iColumn, a );
    }
    m_chart->update();
}

void MainWindow::on_centerDataPointsCB_toggled( bool checked )
{
    m_lines->setCenterDataPoints( checked );
    m_chart->update();
}

void MainWindow::on_animateAreasCB_toggled( bool checked )
{
    if ( checked ) {
        highlightAreaCB->setCheckState( Qt::Unchecked );
        m_curRow = 0;
        m_curColumn = 0;
    } else {
        m_curColumn = -1;
    }
    highlightAreaCB->setEnabled( !checked );
    highlightAreaSB->setEnabled( !checked );
    // un-highlight all previously highlighted columns
    const int rowCount = m_lines->model()->rowCount();
    const int colCount = m_lines->model()->columnCount();
    for ( int iColumn = 0; iColumn<colCount; ++iColumn ) {
        setHighlightArea( -1, iColumn, 127, false, false );
        for ( int iRow = 0; iRow<rowCount; ++iRow )
            setHighlightArea( iRow, iColumn, 127, false, false );
    }
    m_chart->update();
    m_curOpacity = 0;
}

void MainWindow::slot_timerFired()
{
    if ( m_curColumn < 0 ) {
        return;
    }
    m_curOpacity += 8;
    if ( m_curOpacity > 255 ) {
        setHighlightArea( m_curRow, m_curColumn, 127, false, false );
        m_curOpacity = 5;
        ++m_curRow;
        if ( m_curRow >= m_lines->model()->rowCount( m_lines->rootIndex() ) ) {
            m_curRow = 0;
            ++m_curColumn;
            if ( m_curColumn >= m_lines->model()->columnCount( m_lines->rootIndex() ) )
                m_curColumn = 0;
        }
    }
    setHighlightArea( m_curRow, m_curColumn, m_curOpacity, true, true );
}

void MainWindow::setHighlightArea( int row, int column, int opacity,
                                   bool checked, bool doUpdate )
{
    if ( row < 0 ) {
        // highlight a complete dataset
        LineAttributes la = m_lines->lineAttributes( column );
        if ( checked ) {
            la.setDisplayArea( true );
            la.setTransparency( opacity );
        } else {
            la.setDisplayArea( false );
        }
        m_lines->setLineAttributes( column, la );
    } else {
        // highlight two segments only
        if ( row ) {
            QModelIndex cellIndex( m_lines->model()->index( row - 1, column,
                                                            m_lines->rootIndex() ) );
            if ( checked ) {
                LineAttributes la( m_lines->lineAttributes( cellIndex ) );
                la.setDisplayArea( true );
                la.setTransparency( 255 - opacity );
                // set specific line attribute settings for this cell
                m_lines->setLineAttributes( cellIndex, la );
            }  else {
                // remove any cell-specific line attribute settings
                // from the indexed cell
                m_lines->resetLineAttributes( cellIndex );
            }
        }
        if ( row < m_lines->model()->rowCount(m_lines->rootIndex() ) ) {
            QModelIndex cellIndex( m_lines->model()->index( row, column, m_lines->rootIndex() ) );
            if ( checked ) {
                LineAttributes la( m_lines->lineAttributes( cellIndex ) );
                la.setDisplayArea( true );
                la.setTransparency( opacity );
                // set specific line attribute settings for this cell
                m_lines->setLineAttributes( cellIndex, la );
            } else {
                // remove any cell-specific line attribute settings
                // from the indexed cell
                m_lines->resetLineAttributes( cellIndex );
            }
        }
    }
    if ( doUpdate )
        m_chart->update();
}

void MainWindow::on_highlightAreaCB_toggled( bool checked )
{
    setHighlightArea( -1, highlightAreaSB->value(), 127, checked, true );
}

void MainWindow::on_highlightAreaSB_valueChanged( int i )
{
    Q_UNUSED( i );
    if ( highlightAreaCB->isChecked() )
        on_highlightAreaCB_toggled( true );
    else
        on_highlightAreaCB_toggled( false );
}

void MainWindow::on_threeDModeCB_toggled( bool checked )
{
    ThreeDLineAttributes td( m_lines->threeDLineAttributes() );
    td.setDepth( depthSB->value() );
    if ( checked )
        td.setEnabled(  true );
    else
        td.setEnabled(  false );

    m_lines->setThreeDLineAttributes( td );

    m_chart->update();
}

void MainWindow::on_depthSB_valueChanged( int i )
{
    Q_UNUSED( i );
    if ( threeDModeCB->isChecked() )
        on_threeDModeCB_toggled( true );
}

void MainWindow::on_trackAreasCB_toggled( bool checked )
{
    setTrackedArea( trackAreasSB->value(), checked, true );
}

void MainWindow::on_trackAreasSB_valueChanged( int i )
{
    Q_UNUSED( i );
    on_trackAreasCB_toggled( trackAreasCB->isChecked() );
}

void MainWindow::setTrackedArea( int column, bool checked, bool doUpdate )
{
    const int rowCount = m_model.rowCount( m_lines->rootIndex() );
    const int columnCount = m_model.columnCount( m_lines->rootIndex() );
    for ( int i = 0; i < rowCount; ++i ) {
        for ( int j = 0; j < columnCount; ++j ) {
            QModelIndex cellIndex( m_model.index( i, j,
                                   m_lines->rootIndex() ) );
            ValueTrackerAttributes va( m_lines->valueTrackerAttributes( cellIndex ) );
            va.setEnabled( checked && j == column );
            va.setAreaBrush( QColor( 255, 255, 0, 50 ) );
            va.setOrientations( Qt::Horizontal | Qt::Vertical );
            QColor color = Qt::cyan;
            color.setAlphaF( 0.5 );
            va.setAreaBrush( color );
            m_lines->setValueTrackerAttributes( cellIndex, va );
        }
    }
    if ( doUpdate )
        m_chart->update();
}

void MainWindow::on_reverseHorizontalCB_toggled( bool checked )
{
    static_cast< KChart::CartesianCoordinatePlane* >( m_chart->coordinatePlane() )
        ->setHorizontalRangeReversed( checked );
}

void MainWindow::on_reverseVerticalCB_toggled( bool checked )
{
    static_cast< KChart::CartesianCoordinatePlane* >( m_chart->coordinatePlane() )
        ->setVerticalRangeReversed( checked );
}
