#include "stdfx.h"

//#include "tsystem.h"

#include "tfxparam.h"

#include "tpixelutils.h"

#include "tparamset.h"

#include "trop.h"

//===================================================================

class AdjustLevelsFx final : public TStandardRasterFx {

  FX_PLUGIN_DECLARATION(AdjustLevelsFx)

  TRasterFxPort m_input;

  TRangeParamP m_in_rgb;

  TRangeParamP m_in_r;

  TRangeParamP m_in_g;

  TRangeParamP m_in_b;

  TRangeParamP m_in_m;

  TRangeParamP m_out_rgb;

  TRangeParamP m_out_r;

  TRangeParamP m_out_g;

  TRangeParamP m_out_b;

  TRangeParamP m_out_m;

  TDoubleParamP m_gamma_rgb;

  TDoubleParamP m_gamma_r;

  TDoubleParamP m_gamma_g;

  TDoubleParamP m_gamma_b;

  TDoubleParamP m_gamma_m;

public:

  AdjustLevelsFx()

      : m_in_rgb(DoublePair(0.0, 255.0))

      , m_in_r(DoublePair(0.0, 255.0))

      , m_in_g(DoublePair(0.0, 255.0))

      , m_in_b(DoublePair(0.0, 255.0))

      , m_in_m(DoublePair(0.0, 255.0))

      , m_out_rgb(DoublePair(0.0, 255.0))

      , m_out_r(DoublePair(0.0, 255.0))

      , m_out_g(DoublePair(0.0, 255.0))

      , m_out_b(DoublePair(0.0, 255.0))

      , m_out_m(DoublePair(0.0, 255.0))

      , m_gamma_rgb(1.0)

      , m_gamma_r(1.0)

      , m_gamma_g(1.0)

      , m_gamma_b(1.0)

      , m_gamma_m(1.0) {

    bindParam(this, "in_rgb", m_in_rgb);

    bindParam(this, "in_r", m_in_r);

    bindParam(this, "in_g", m_in_g);

    bindParam(this, "in_b", m_in_b);

    bindParam(this, "in_m", m_in_m);

    bindParam(this, "out_rgb", m_out_rgb);

    bindParam(this, "out_r", m_out_r);

    bindParam(this, "out_g", m_out_g);

    bindParam(this, "out_b", m_out_b);

    bindParam(this, "out_m", m_out_m);

    bindParam(this, "gamma_rgb", m_gamma_rgb);

    bindParam(this, "gamma_r", m_gamma_r);

    bindParam(this, "gamma_g", m_gamma_g);

    bindParam(this, "gamma_b", m_gamma_b);

    bindParam(this, "gamma_m", m_gamma_m);

    addInputPort("Source", m_input);

    m_in_rgb->getMin()->setValueRange(0, 255);

    m_in_rgb->getMax()->setValueRange(0, 255);

    m_in_r->getMin()->setValueRange(0, 255);

    m_in_r->getMax()->setValueRange(0, 255);

    m_in_g->getMin()->setValueRange(0, 255);

    m_in_g->getMax()->setValueRange(0, 255);

    m_in_b->getMin()->setValueRange(0, 255);

    m_in_b->getMax()->setValueRange(0, 255);

    m_in_m->getMin()->setValueRange(0, 255);

    m_in_m->getMax()->setValueRange(0, 255);

    m_out_rgb->getMin()->setValueRange(0, 255);

    m_out_rgb->getMax()->setValueRange(0, 255);

    m_out_r->getMin()->setValueRange(0, 255);

    m_out_r->getMax()->setValueRange(0, 255);

    m_out_g->getMin()->setValueRange(0, 255);

    m_out_g->getMax()->setValueRange(0, 255);

    m_out_b->getMin()->setValueRange(0, 255);

    m_out_b->getMax()->setValueRange(0, 255);

    m_out_m->getMin()->setValueRange(0, 255);

    m_out_m->getMax()->setValueRange(0, 255);

    m_gamma_rgb->setValueRange(0.0, 200.0);

    m_gamma_r->setValueRange(0.0, 200.0);

    m_gamma_g->setValueRange(0.0, 200.0);

    m_gamma_b->setValueRange(0.0, 200.0);

    m_gamma_m->setValueRange(0.0, 200.0);

  }

  ~AdjustLevelsFx(){};

  bool canHandle(const TRenderSettings &info, double frame) override {

    return true;

  }

  bool doGetBBox(double frame, TRectD &bBox,

                 const TRenderSettings &info) override {

    if (m_input.isConnected())

      return m_input->doGetBBox(frame, bBox, info);

    else {

      bBox = TRectD();

      return false;

    }

  }

  void doCompute(TTile &tile, double frame, const TRenderSettings &ri) override;

};

//------------------------------------------------------------------

void AdjustLevelsFx::doCompute(TTile &tile, double frame,

                               const TRenderSettings &ri) {

  if (!m_input.isConnected()) return;

  m_input->compute(tile, frame, ri);

  double gamma_rgb = m_gamma_rgb->getValue(frame);

  double gamma_r   = m_gamma_r->getValue(frame);

  double gamma_g   = m_gamma_g->getValue(frame);

  double gamma_b   = m_gamma_b->getValue(frame);

  double gamma_m   = m_gamma_m->getValue(frame);

  DoublePair vin_rgb  = m_in_rgb->getValue(frame);

  DoublePair vin_r    = m_in_r->getValue(frame);

  DoublePair vin_g    = m_in_g->getValue(frame);

  DoublePair vin_b    = m_in_b->getValue(frame);

  DoublePair vin_m    = m_in_m->getValue(frame);

  DoublePair vout_rgb = m_out_rgb->getValue(frame);

  DoublePair vout_r   = m_out_r->getValue(frame);

  DoublePair vout_g   = m_out_g->getValue(frame);

  DoublePair vout_b   = m_out_b->getValue(frame);

  DoublePair vout_m   = m_out_m->getValue(frame);

  int in0[5], in1[5], out0[5], out1[5];

  in0[0] = vin_rgb.first, in1[0] = vin_rgb.second;

  out0[0] = vout_rgb.first, out1[0] = vout_rgb.second;

  in0[1] = vin_r.first, in1[1] = vin_r.second;

  out0[1] = vout_r.first, out1[1] = vout_r.second;

  in0[2] = vin_g.first, in1[2] = vin_g.second;

  out0[2] = vout_g.first, out1[2] = vout_g.second;

  in0[3] = vin_b.first, in1[3] = vin_b.second;

  out0[3] = vout_b.first, out1[3] = vout_b.second;

  in0[4] = vin_m.first, in1[4] = vin_m.second;

  out0[4] = vout_m.first, out1[4] = vout_m.second;

  TRasterP ras = tile.getRaster();

  TRop::rgbmAdjust(ras, ras, in0, in1, out0, out1);

  TRop::gammaCorrect(ras, gamma_rgb);

  TRop::gammaCorrectRGBM(ras, gamma_r, gamma_g, gamma_b, gamma_m);

}

FX_PLUGIN_IDENTIFIER(AdjustLevelsFx, "adjustLevelsFx");