// %flair:license{
// This file is part of the Flair framework distributed under the
// CECILL-C License, Version 1.0.
// %flair:license}
#include "RangeFinderPlot.h"
#include "Layout.h"
#include <stdlib.h>
#include <qwt_plot_grid.h>
#include <qwt_plot_magnifier.h>
#include <qwt_scale_widget.h>
#include <qwt_plot_panner.h>
#include <qwt_plot_rescaler.h>
#include <qwt_plot_shapeitem.h>
#include <QMouseEvent>
#include <QMenu>
#include <QInputDialog>
#include <qendian.h>
#include <qmath.h>

RangeFinderPlot::RangeFinderPlot(Layout *parent, int row, int col, QString name,
                                 QString x_name, QString y_name, float xmin,
                                 float xmax, float ymin, float ymax,
                                 float start_angle, float end_angle,
                                 uint32_t nb_samples, QString data_type,
                                 bool invert_axis, bool enabled, int period)
    : DataRemote(name, "RangeFinderPlot", parent, enabled, period) {
  invert_axis = true;
  this->start_angle = start_angle;
  this->end_angle = end_angle;
  this->nb_samples = nb_samples;
  this->data_type = data_type;
  this->invert_axis = invert_axis;

  if (data_type == "float") {
    receivesize = nb_samples * sizeof(float);
  } else if (data_type == "int8_t") {
    receivesize = nb_samples * sizeof(int8_t);
  } else if (data_type == "int16_t") {
    receivesize = nb_samples * sizeof(int16_t);
  } else {
    fprintf(stderr,"RangeFinderPlot::RangeFinderPlot unknown type %s\n",
           data_type.toLocal8Bit().constData());
  }

  plot = new QwtPlot(NULL);
  plot->setEnabled(enabled);
  // plot->setAutoReplot( false );

  parent->addWidget(plot, row, col);
  visible_widget = plot;

  plot->setTitle(name);

  // grid
  QwtPlotGrid *grid = new QwtPlotGrid;
  grid->setPen(QPen(Qt::black, 0, Qt::DotLine));
  grid->attach(plot);

  plot->updateAxes();

  // zoomer
  QwtPlotMagnifier *zoomer = new QwtPlotMagnifier(plot->canvas());
  zoomer->setMouseButton(Qt::RightButton, Qt::ControlModifier);

  // scroller
  QwtPlotPanner *scroller = new QwtPlotPanner(plot->canvas());

  // Axis
  if (!invert_axis) {
    plot->setAxisTitle(QwtPlot::xBottom, x_name);
    setXAxisScale(xmin, xmax);

    plot->setAxisTitle(QwtPlot::yLeft, y_name);
    setYAxisScale(ymin, ymax);
  } else {
    plot->setAxisTitle(QwtPlot::xBottom, y_name);
    setXAxisScale(ymin, ymax);

    plot->setAxisTitle(QwtPlot::yLeft, x_name);
    setYAxisScale(xmin, xmax);
  }

  QwtPlotRescaler *rescaler = new QwtPlotRescaler(plot->canvas());
  rescaler->setRescalePolicy(QwtPlotRescaler::Fixed);

  //( void ) new QwtPlotMagnifier( plot->canvas() );

  plot->canvas()->installEventFilter(this);

  for (uint32_t i = 0; i < nb_samples; i++) {
    addTriangle(start_angle + i * (end_angle - start_angle + 1) / nb_samples,
                start_angle +
                    (i + 1) * (end_angle - start_angle + 1) / nb_samples);
  }
}

RangeFinderPlot::~RangeFinderPlot() { delete plot; }

void RangeFinderPlot::XmlEvent(QDomElement dom) { XmlSetup(dom); }

bool RangeFinderPlot::eventFilter(QObject *o, QEvent *e) {
  if (o == plot->canvas()) {
    switch (e->type()) {
    case QEvent::MouseButtonPress: {
      mousePressEvent((QMouseEvent *)e);
      break;
    }

    default:
      break;
    }
  }
  return plot->eventFilter(o, e);
}

//
//  Set a plain canvas frame and align the scales to it
//
void RangeFinderPlot::alignScales(void) {
  // The code below shows how to align the scales to
  // the canvas frame, but is also a good example demonstrating
  // why the spreaded API needs polishing.
  /*
      plot->canvas()->setFrameStyle(QFrame::Box | QFrame::Plain );
      plot->canvas()->setLineWidth(1);
  */
  for (int i = 0; i < QwtPlot::axisCnt; i++) {
    QwtScaleWidget *scaleWidget = (QwtScaleWidget *)plot->axisWidget(i);
    if (scaleWidget)
      scaleWidget->setMargin(0);

    QwtScaleDraw *scaleDraw = (QwtScaleDraw *)plot->axisScaleDraw(i);
    if (scaleDraw)
      scaleDraw->enableComponent(QwtAbstractScaleDraw::Backbone, false);
  }
}

void RangeFinderPlot::setXAxisScale(float xmin, float xmax) {
  xmin_orig = xmin;
  xmax_orig = xmax;
  plot->setAxisScale(QwtPlot::xBottom, xmin_orig, xmax_orig);
}

void RangeFinderPlot::setYAxisScale(float ymin, float ymax) {
  ymin_orig = ymin;
  ymax_orig = ymax;
  plot->setAxisScale(QwtPlot::yLeft, ymin_orig, ymax_orig);
}

void RangeFinderPlot::BufEvent(char **buf, int *buf_size, uint16_t period,
                               bool big_endian) {
  plot->setEnabled(IsEnabled());
  if (IsEnabled() == false || RefreshRate_ms() != period)
    return;

  for (uint32_t i = 0; i < nb_samples; i++) {
    if (data_type == "float") {
      uint32_t data_raw;
      float *data = (float *)&data_raw;

      memcpy((void *)&data_raw, *buf, sizeof(uint32_t));
      *buf += sizeof(uint32_t);
      if (big_endian == true)
        data_raw = qFromBigEndian(data_raw);
      SetTriangle(i, *data);
    } else if (data_type == "int8_t") {
      int8_t data;
      memcpy((void *)&data, *buf, sizeof(data));
      *buf += sizeof(data);
      SetTriangle(i, data);
    } else if (data_type == "int16_t") {
      int16_t data;
      memcpy((void *)&data, *buf, sizeof(data));
      *buf += sizeof(data);
      if (big_endian == true)
        data = qFromBigEndian(data);
      SetTriangle(i, data);
    } else {
      fprintf(stderr,"RangeFinderPlot::BufEvent unknown type %s\n",
             data_type.toLocal8Bit().constData());
    }
  }

  plot->replot();
}

void RangeFinderPlot::addTriangle(float angle_min, float angle_max) {
  QwtPlotShapeItem *item = new QwtPlotShapeItem();

  item->setRenderHint(QwtPlotItem::RenderAntialiased, true);
  item->attach(plot);
  triangles.append(item);
}

void RangeFinderPlot::SetTriangle(uint32_t id, float length) {
  QPainterPath path;
  QPolygonF triangle;
  float angle_min =
      start_angle + id * (end_angle - start_angle + 1) / nb_samples;
  float angle_max =
      start_angle + (id + 1) * (end_angle - start_angle + 1) / nb_samples;

  if (invert_axis) {
    angle_min = 90 - angle_min;
    angle_max = 90 - angle_max;
  }

  triangle += QPointF(0, 0);
  triangle += QPointF(length * cos(angle_min * M_PI / 180.),
                      length * sin(angle_min * M_PI / 180.));
  triangle += QPointF(length * cos(angle_max * M_PI / 180.),
                      length * sin(angle_max * M_PI / 180.));

  path.addPolygon(triangle);

  path.closeSubpath();
  triangles.at(id)->setShape(path);

  QColor fillColor = "SandyBrown";
  fillColor.setAlpha(200);

  QPen pen(QColor("SandyBrown"), 1);
  pen.setJoinStyle(Qt::MiterJoin);
  triangles.at(id)->setPen(pen);
  triangles.at(id)->setBrush(fillColor);
}

// context menu
void RangeFinderPlot::mousePressEvent(QMouseEvent *event) {
  if (event->button() == Qt::RightButton) {
    QMenu *menu = new QMenu("nom", plot);
    // ajout des actions
    QAction *a, *z;

    a = menu->addAction("reset y zoom");

    appendmenu(menu);
    z = execmenu(plot, menu, event->globalPos());
    delete menu;

    if (z == a) {
      // zoom to original size
      if (!invert_axis) {
        plot->setAxisScale(QwtPlot::yLeft, ymin_orig, ymax_orig);
      } else {
        plot->setAxisScale(QwtPlot::yLeft, xmin_orig, xmax_orig);
      }
      plot->replot();
    }
  }
}