/*
 * This file is part of the DSLogic-gui project.
 * DSLogic-gui is based on PulseView.
 *
 * Copyright (C) 2013 DreamSourceLab <dreamsourcelab@dreamsourcelab.com>
 *
 * 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 St, Fifth Floor, Boston, MA  02110-1301 USA
 */


#include <extdef.h>

#include <math.h>

#include "dsosignal.h"
#include "pv/data/dso.h"
#include "pv/data/dsosnapshot.h"
#include "view.h"
#include "../sigsession.h"
#include "../device/devinst.h"

#include <QDebug>

using namespace boost;
using namespace std;

namespace pv {
namespace view {

const uint64_t DsoSignal::vDialValue[DsoSignal::vDialValueCount] = {
    5,
    10,
    20,
    50,
    100,
    200,
    500,
    1000,
    2000,
    5000,
};
const QString DsoSignal::vDialUnit[DsoSignal::vDialUnitCount] = {
    "mv",
    "v",
};

const uint64_t DsoSignal::hDialValue[DsoSignal::hDialValueCount] = {
    10,
    20,
    50,
    100,
    200,
    500,
    1000,
    2000,
    5000,
    10000,
    20000,
    50000,
    100000,
    200000,
    500000,
    1000000,
    2000000,
    5000000,
    10000000,
    20000000,
    50000000,
    100000000,
};

const QString DsoSignal::hDialUnit[DsoSignal::hDialUnitCount] = {
    "ns",
    "us",
    "ms",
    "s",
};

const QColor DsoSignal::SignalColours[4] = {
    QColor(238, 178, 17, 200),  // dsYellow
    QColor(0, 153, 37, 200),    // dsGreen
    QColor(213, 15, 37, 200),   // dsRed
    QColor(17, 133, 209, 200)  // dsBlue

};

const float DsoSignal::EnvelopeThreshold = 256.0f;

const int DsoSignal::UpMargin = 30;
const int DsoSignal::DownMargin = 30;
const int DsoSignal::RightMargin = 30;

DsoSignal::DsoSignal(boost::shared_ptr<pv::device::DevInst> dev_inst,
                     shared_ptr<data::Dso> data,
                     const sr_channel * const probe):
    Signal(dev_inst, probe, DS_DSO),
    _data(data),
    _scale(0),
    _vDialActive(false),
    _hDialActive(false),
    _trig_vpos(probe->index * 0.5 + 0.25),
    _zeroPos(probe->index * 0.5 + 0.25)
{
    QVector<uint64_t> vValue;
    QVector<QString> vUnit;
    QVector<uint64_t> hValue;
    QVector<QString> hUnit;
    for(quint64 i = 0; i < vDialValueCount; i++)
        vValue.append(vDialValue[i]);
    for(quint64 i = 0; i < vDialUnitCount; i++)
        vUnit.append(vDialUnit[i]);

    for(quint64 i = 0; i < hDialValueCount; i++)
        hValue.append(hDialValue[i]);
    for(quint64 i = 0; i < hDialUnitCount; i++)
        hUnit.append(hDialUnit[i]);

    _vDial = new dslDial(vDialValueCount, vDialValueStep, vValue, vUnit);
    _hDial = new dslDial(hDialValueCount, hDialValueStep, hValue, hUnit);

    _colour = SignalColours[probe->index % countof(SignalColours)];

    GVariant* gvar;

    gvar = dev_inst->get_config(probe, NULL, SR_CONF_VDIV);
    if (gvar != NULL) {
        _vDial->set_value(g_variant_get_uint64(gvar));
        g_variant_unref(gvar);
    } else {
        qDebug() << "ERROR: config_get SR_CONF_VDIV failed.";
    }

    gvar = dev_inst->get_config(NULL, NULL, SR_CONF_TIMEBASE);
    if (gvar != NULL) {
        _hDial->set_value(g_variant_get_uint64(gvar));
        g_variant_unref(gvar);
    } else {
        qDebug() << "ERROR: config_get SR_CONF_TIMEBASE failed.";
    }

    gvar = dev_inst->get_config(probe, NULL, SR_CONF_COUPLING);
    if (gvar != NULL) {
        _acCoupling = g_variant_get_boolean(gvar);
        g_variant_unref(gvar);
    } else {
        qDebug() << "ERROR: config_get SR_CONF_COUPLING failed.";
    }
}

DsoSignal::~DsoSignal()
{
}

shared_ptr<pv::data::SignalData> DsoSignal::data() const
{
    return _data;
}

void DsoSignal::set_scale(float scale)
{
	_scale = scale;
}

void DsoSignal::set_enable(bool enable)
{
    _dev_inst->set_config(_probe, NULL, SR_CONF_EN_CH,
                          g_variant_new_boolean(enable));
    _view->set_need_update(true);
    _view->update();
}

bool DsoSignal::get_vDialActive() const
{
    return _vDialActive;
}

void DsoSignal::set_vDialActive(bool active)
{
    if (enabled())
        _vDialActive = active;
}

bool DsoSignal::go_vDialPre()
{
    if (enabled() && !_vDial->isMin()) {
        _vDial->set_sel(_vDial->get_sel() - 1);
        _dev_inst->set_config(_probe, NULL, SR_CONF_VDIV,
                              g_variant_new_uint64(_vDial->get_value()));
        return true;
    } else {
        return false;
    }
}

bool DsoSignal::go_vDialNext()
{
    if (enabled() && !_vDial->isMax()) {
        _vDial->set_sel(_vDial->get_sel() + 1);
        _dev_inst->set_config(_probe, NULL, SR_CONF_VDIV,
                              g_variant_new_uint64(_vDial->get_value()));
        return true;
    } else {
        return false;
    }
}

bool DsoSignal::get_hDialActive() const
{
    return _hDialActive;
}

void DsoSignal::set_hDialActive(bool active)
{
    if (enabled())
        _hDialActive = active;
}

bool DsoSignal::go_hDialPre()
{
    if (!_hDial->isMin()) {
        _hDial->set_sel(_hDial->get_sel() - 1);
        int ch_num = _view->session().get_dso_ch_num();
        uint64_t sample_limit = _view->session().get_device()->get_sample_limit();
        uint64_t sample_rate = min((uint64_t)(sample_limit * pow(10, 9) / (_hDial->get_value() * DS_CONF_DSO_HDIVS)),
                                   (uint64_t)(DS_MAX_DSO_SAMPLERATE / ch_num));
        _view->session().set_sample_rate(sample_rate);
        const double scale = _hDial->get_value() * pow(10, -9) * DS_CONF_DSO_HDIVS / get_view_rect().width();
        _view->set_scale_offset(scale, _view->offset());
        _dev_inst->set_config(_probe, NULL, SR_CONF_TIMEBASE,
                              g_variant_new_uint64(_hDial->get_value()));
        return true;
    } else {
        return false;
    }
}

bool DsoSignal::go_hDialNext()
{
    if (!_hDial->isMax()) {
        _hDial->set_sel(_hDial->get_sel() + 1);
        int ch_num = _view->session().get_dso_ch_num();
        uint64_t sample_limit = _view->session().get_device()->get_sample_limit();
        uint64_t sample_rate = min((uint64_t)(sample_limit * pow(10, 9) / (_hDial->get_value() * DS_CONF_DSO_HDIVS)),
                                   (uint64_t)(DS_MAX_DSO_SAMPLERATE / ch_num));
        _view->session().set_sample_rate(sample_rate);
        const double scale = _hDial->get_value() * pow(10, -9) * DS_CONF_DSO_HDIVS / get_view_rect().width();
        _view->set_scale_offset(scale, _view->offset());
        _dev_inst->set_config(_probe, NULL, SR_CONF_TIMEBASE,
                              g_variant_new_uint64(_hDial->get_value()));
        return true;
    } else {
        return false;
    }
}

uint64_t DsoSignal::get_vDialValue() const
{
    return _vDial->get_value();
}

uint64_t DsoSignal::get_hDialValue() const
{
    return _hDial->get_value();
}

uint16_t DsoSignal::get_vDialSel() const
{
    return _vDial->get_sel();
}

uint16_t DsoSignal::get_hDialSel() const
{
    return _hDial->get_sel();
}

bool DsoSignal::get_acCoupling() const
{
    return _acCoupling;
}

void DsoSignal::set_acCoupling(bool coupling)
{
    if (enabled()) {
        _acCoupling = coupling;
        _dev_inst->set_config(_probe, NULL, SR_CONF_COUPLING,
                              g_variant_new_boolean(_acCoupling));
    }
}

int DsoSignal::get_trig_vpos() const
{
    return _trig_vpos * get_view_rect().height() + UpMargin;
}

void DsoSignal::set_trig_vpos(int pos)
{
    assert(_view);
    if (enabled()) {
        double delta = min((double)max(pos - UpMargin, 0), get_view_rect().height()) * 1.0f / get_view_rect().height() - _zeroPos;
        delta = min(delta, 0.5);
        delta = max(delta, -0.5);
        _trig_vpos = _zeroPos + delta;

        int trig_value = (-delta * 255.0f + 0x80);

        _dev_inst->set_config(_probe, NULL, SR_CONF_TRIGGER_VALUE,
                              g_variant_new_uint16(trig_value));
    }
}

int DsoSignal::get_zeroPos()
{
    return _zeroPos * get_view_rect().height() + UpMargin;
}

void DsoSignal::set_zeroPos(int pos)
{
    if (enabled()) {
        double delta = _trig_vpos - _zeroPos;
        _zeroPos = min((double)max(pos - UpMargin, 0), get_view_rect().height()) * 1.0f / get_view_rect().height();
        _trig_vpos = min(max(_zeroPos + delta, 0.0), 1.0);
    }
}

QRectF DsoSignal::get_view_rect() const
{
    assert(_view);
    return QRectF(0, UpMargin,
                  _view->viewport()->width() - RightMargin,
                  _view->viewport()->height() - UpMargin - DownMargin);
}

void DsoSignal::paint_back(QPainter &p, int left, int right)
{
    assert(_view);

    int i, j;
    const int height = _view->viewport()->height() - UpMargin - DownMargin;
    const int width = right - left - RightMargin;

    p.setPen(Qt::NoPen);
    p.setBrush(Trace::dsBack);
    p.drawRect(left, UpMargin, width, height);

    p.setPen(Trace::dsLightBlue);
    p.drawLine(left, UpMargin/2, left + width, UpMargin/2);
    const uint64_t sample_len = _dev_inst->get_sample_limit();
    const double samplerate = _dev_inst->get_sample_rate();
    const double samples_per_pixel = samplerate * _view->scale();
    const double shown_rate = min(samples_per_pixel * width * 1.0f / sample_len, 1.0);
    const double start_time = _data->get_start_time();
    const double start = samplerate * (_view->offset() - start_time);
    const double shown_offset = min(start / sample_len, 1.0) * width;
    const double shown_len = shown_rate * width;
    const QPointF left_edge[] =  {QPoint(shown_offset + 3, UpMargin/2 - 6),
                                  QPoint(shown_offset, UpMargin/2 - 6),
                                  QPoint(shown_offset, UpMargin/2 + 6),
                                  QPoint(shown_offset + 3, UpMargin/2 + 6)};
    const QPointF right_edge[] = {QPoint(shown_offset + shown_len - 3, UpMargin/2 - 6),
                                  QPoint(shown_offset + shown_len , UpMargin/2 - 6),
                                  QPoint(shown_offset + shown_len , UpMargin/2 + 6),
                                  QPoint(shown_offset + shown_len - 3, UpMargin/2 + 6)};
    p.drawPolyline(left_edge, countof(left_edge));
    p.drawPolyline(right_edge, countof(right_edge));
    p.setBrush(Trace::dsBlue);
    p.drawRect(shown_offset, UpMargin/2 - 3, shown_len, 6);

    QPen pen(Signal::dsFore);
    pen.setStyle(Qt::DotLine);
    p.setPen(pen);
    const double spanY =height * 1.0f / 10;
    for (i = 1; i <= DS_CONF_DSO_VDIVS; i++) {
        const double posY = spanY * i + UpMargin;
        p.drawLine(left, posY, right - RightMargin, posY);
        const double miniSpanY = spanY / 5;
        for (j = 1; j < 5; j++) {
            p.drawLine(width / 2.0f - 10, posY - miniSpanY * j,
                       width / 2.0f + 10, posY - miniSpanY * j);
        }
    }
    const double spanX = width * 1.0f / 10;
    for (i = 1; i <= DS_CONF_DSO_HDIVS; i++) {
        const double posX = spanX * i;
        p.drawLine(posX, UpMargin,
                   posX, height + UpMargin);
        const double miniSpanX = spanX / 5;
        for (j = 1; j < 5; j++) {
            p.drawLine(posX - miniSpanX * j, height / 2.0f + UpMargin - 10,
                       posX - miniSpanX * j, height / 2.0f + UpMargin + 10);
        }
    }
}

void DsoSignal::paint_mid(QPainter &p, int left, int right)
{
    assert(_data);
    assert(_view);
    assert(right >= left);

    if (enabled()) {
        const int height = _view->viewport()->height() - UpMargin - DownMargin;
        const int width = right - left - RightMargin;

        const int y = get_zeroPos() + height * 0.5;
        const double scale = _view->scale();
        assert(scale > 0);
        const double offset = _view->offset();

        const deque< boost::shared_ptr<pv::data::DsoSnapshot> > &snapshots =
            _data->get_snapshots();
        if (snapshots.empty())
            return;

        _scale = height * 1.0f / 256;
        const shared_ptr<pv::data::DsoSnapshot> &snapshot =
            snapshots.front();

        const uint16_t number_channels = snapshot->get_channel_num();
        if ((unsigned int)get_index() >= number_channels)
            return;

        const double pixels_offset = offset / scale;
        //const double samplerate = _data->samplerate();
        const double samplerate = _dev_inst->get_sample_rate();
        const double start_time = _data->get_start_time();
        const int64_t last_sample = max((int64_t)(snapshot->get_sample_count() - 1), (int64_t)0);
        const double samples_per_pixel = samplerate * scale;
        const double start = samplerate * (offset - start_time);
        const double end = start + samples_per_pixel * width;

        const int64_t start_sample = min(max((int64_t)floor(start),
            (int64_t)0), last_sample);
        const int64_t end_sample = min(max((int64_t)ceil(end) + 1,
            (int64_t)0), last_sample);

        if (samples_per_pixel < EnvelopeThreshold)
            paint_trace(p, snapshot, y, left,
                start_sample, end_sample,
                pixels_offset, samples_per_pixel, number_channels);
        else
            paint_envelope(p, snapshot, y, left,
                start_sample, end_sample,
                pixels_offset, samples_per_pixel);
    }
}

void DsoSignal::paint_fore(QPainter &p, int left, int right)
{
    assert(_view);

    QPen pen(Signal::dsGray);
    pen.setStyle(Qt::DotLine);
    p.setPen(pen);
    p.drawLine(left, get_zeroPos(), right - RightMargin, get_zeroPos());

    if(enabled()) {
        const QPointF mouse_point = _view->hover_point();
        const QRectF label_rect = get_trig_rect(left, right);
        const bool hover = label_rect.contains(mouse_point);

        // Paint the trig line
        const QPointF points[] = {
            QPointF(right - label_rect.width()*1.5, get_trig_vpos()),
            label_rect.topLeft(),
            label_rect.topRight(),
            label_rect.bottomRight(),
            label_rect.bottomLeft()
        };

        p.setPen(Qt::transparent);
        p.setBrush(hover ? _colour.dark() : _colour);
        p.drawPolygon(points, countof(points));

        // paint the _trig_vpos line
        p.setPen(QPen(_colour, 1, Qt::DashLine));
        p.drawLine(left, get_trig_vpos(), right - label_rect.width()*1.5, get_trig_vpos());

        // Paint the text
        p.setPen(Qt::white);
        p.drawText(label_rect, Qt::AlignCenter | Qt::AlignVCenter, "T");
    }
}

QRectF DsoSignal::get_trig_rect(int left, int right) const
{
    (void)left;

    return QRectF(right - SquareWidth,
                  get_trig_vpos() - SquareWidth / 2,
                  SquareWidth, SquareWidth);
}

void DsoSignal::paint_trace(QPainter &p,
    const boost::shared_ptr<pv::data::DsoSnapshot> &snapshot,
    int y, int left, const int64_t start, const int64_t end,
    const double pixels_offset, const double samples_per_pixel, uint64_t num_channels)
{
    const int64_t sample_count = end - start;

    if (sample_count > 0) {
        const uint8_t *const samples = snapshot->get_samples(start, end, get_index());
        assert(samples);

        p.setPen(_colour);
        //p.setPen(QPen(_colour, 3, Qt::SolidLine));

        QPointF *points = new QPointF[sample_count];
        QPointF *point = points;

        float top = get_view_rect().top();
        float bottom = get_view_rect().bottom();
        for (int64_t sample = start; sample < end; sample++) {
            const float x = (sample / samples_per_pixel - pixels_offset) + left;
            uint8_t offset = samples[(sample - start)*num_channels];
            if (offset >0 && offset < 0xff) {
                const float yp = min(bottom, max(top, y - offset * _scale));
                *point++ = QPointF(x, yp);
            }
        }

        p.drawPolyline(points, point - points);

        //delete[] samples;
        delete[] points;
    }
}

void DsoSignal::paint_envelope(QPainter &p,
    const boost::shared_ptr<pv::data::DsoSnapshot> &snapshot,
	int y, int left, const int64_t start, const int64_t end,
	const double pixels_offset, const double samples_per_pixel)
{
	using namespace Qt;
    using pv::data::DsoSnapshot;

    DsoSnapshot::EnvelopeSection e;
    snapshot->get_envelope_section(e, start, end, samples_per_pixel, get_index());

	if (e.length < 2)
		return;

    p.setPen(QPen(NoPen));
    //p.setPen(QPen(_colour, 2, Qt::SolidLine));
    p.setBrush(_colour);

	QRectF *const rects = new QRectF[e.length];
	QRectF *rect = rects;

	for(uint64_t sample = 0; sample < e.length-1; sample++) {
		const float x = ((e.scale * sample + e.start) /
			samples_per_pixel - pixels_offset) + left;
        const DsoSnapshot::EnvelopeSample *const s =
			e.samples + sample;

		// We overlap this sample with the next so that vertical
		// gaps do not appear during steep rising or falling edges
		const float b = y - max(s->max, (s+1)->min) * _scale;
		const float t = y - min(s->min, (s+1)->max) * _scale;

		float h = b - t;
		if(h >= 0.0f && h <= 1.0f)
			h = 1.0f;
		if(h <= 0.0f && h >= -1.0f)
			h = -1.0f;

		*rect++ = QRectF(x, t, 1.0f, h);
	}

	p.drawRects(rects, e.length);

	delete[] rects;
    //delete[] e.samples;
}

const std::vector< std::pair<uint64_t, bool> > DsoSignal::cur_edges() const
{

}

void DsoSignal::paint_type_options(QPainter &p, int right, bool hover, int action)
{
    int y = get_y();
    const QRectF vDial_rect = get_rect("vDial", y, right);
    const QRectF hDial_rect = get_rect("hDial", y, right);
    const QRectF acdc_rect = get_rect("acdc", y, right);
    const QRectF chEn_rect = get_rect("chEn", y, right);

    QColor vDial_color = _vDialActive ? dsActive : dsDisable;
    QColor hDial_color = _hDialActive ? dsActive : dsDisable;
    _vDial->paint(p, vDial_rect, vDial_color);
    _hDial->paint(p, hDial_rect, hDial_color);

    p.setPen(Qt::transparent);
    p.setBrush((hover && action == CHEN) ? _colour.darker() : _colour);
    p.drawRect(chEn_rect);
    p.setPen(Qt::white);
    p.drawText(chEn_rect, Qt::AlignCenter | Qt::AlignVCenter, enabled() ? "EN" : "DIS");

    p.setPen(Qt::transparent);
    p.setBrush(enabled() ? ((hover && action == ACDC) ? _colour.darker() : _colour) : dsDisable);
    p.drawRect(acdc_rect);
    p.setPen(Qt::white);
    p.drawText(acdc_rect, Qt::AlignCenter | Qt::AlignVCenter, _acCoupling ? "AC" : "DC");
}

} // namespace view
} // namespace pv