#include "DistrhoPlugin.hpp"
#include <math.h>
extern "C" void adainit(void);
extern "C" void adafinal(void);
extern "C" void Add_Note(float);
extern "C" void Remove_Note(float);
extern "C" float Super_Saw(float,float,float,float,float);
extern "C" float Compute_Polyphony(float,float,float,float);

START_NAMESPACE_DISTRHO
class SuperSaw : public Plugin
{
public:
  SuperSaw() : Plugin(2,0,0){
        adainit();
  }

  ~SuperSaw() {
    adafinal();
  }

protected:
  const char* getLabel() const override
  {
    return "Super Saw";
  }

  const char* getDescription() const override
  {
    return "Roland JP-8000 Super Saw emulator";
    }
  const char* getMaker() const override
  {
    return "Cranix";
  }

  /**
     Get the plugin homepage.
  */
  const char* getHomePage() const override
  {
    return "http://example.org/Super_Saw";
  }

  /**
     Get the plugin license name (a single line of text).
     For commercial plugins this should return some short copyright information.
  */
  const char* getLicense() const override
  {
    return "GPL";
  }

  /**
     Get the plugin version, in hexadecimal.
  */
  uint32_t getVersion() const override
  {
    return d_version(1, 0, 0);
  }

  /**
     Get the plugin unique Id.
     This value is used by LADSPA, DSSI and VST plugin formats.
  */
  int64_t getUniqueId() const override
  {
    return d_cconst('d', 'N', 'f', 'o');
  }
  void setParameterValue(uint32_t index, float value) override
  {
    if (index == 0) {
      detune = value;
    } else if (index == 1) {
      mix = value;
    }
  }

  float getParameterValue(uint32_t index) const override
  {
    if (index == 0) {
      return detune;
    } else if (index == 1) {
      return mix;
    }
  }

  void initParameter(uint32_t index, Parameter& parameter) override {
    if (index == 0) { /*Detune*/
      parameter.hints      = kParameterIsAutomable;
      parameter.name       = "Detune";
      parameter.symbol     = "detune";
      parameter.ranges.min = 0.0f;
      parameter.ranges.max = 0.9f;
      parameter.ranges.def = 0.5f;
    } else if (index == 1) { /*Mix*/
      parameter.hints      = kParameterIsAutomable;
      parameter.name       = "Mix";
      parameter.symbol     = "mix";
      parameter.ranges.min = 0.0f;
      parameter.ranges.max = 0.9f;
      parameter.ranges.def = 0.5f;
    }
  }


  void run(const float** inputs, float** outputs, uint32_t frames, const MidiEvent* midiEvents,
           uint32_t midiEventCount) override {
    const uint8_t*  data;
    uint8_t status;
    uint8_t note;
    float frequency;
    uint32_t framesDone=0;
    uint32_t curEventIndex=0;

    while (framesDone < frames) {
      while (curEventIndex < midiEventCount && framesDone == midiEvents[curEventIndex].frame) {
        if ( midiEvents[curEventIndex].size > MidiEvent::kDataSize )
          continue;
        data=midiEvents[curEventIndex].data;
        status=data[0]&0xFF;
        if ( ! ( ( status == 0x80 || status == 0x90))) {
          curEventIndex++;
          continue;
        }
        note=data[1];
        if (status == 0x90) {
          frequency=pow(2.0,(note-57.0)/12.0)*440.0;
          Add_Note(frequency);
        } else if (status == 0x80) {
          //          frequency = 0.0;
          frequency=pow(2.0,(note-57.0)/12.0)*440.0;
          Remove_Note(frequency);
        }
        curEventIndex++;
      }
      //outputs[0][framesDone]=sin(phase*frequency/44100.0*2.0*3.14);
      //outputs[0][framesDone]=sin(phase*frequency/44100.0*2.0*3.14);
      outputs[0][framesDone]=Compute_Polyphony(phase,detune,mix,getSampleRate());
      phase++;
      framesDone++;
    }
    /*data=midiEvents[0].data;
    status=data[0]&0xFF;
     if (status == 0x90){
      note=data[1];
      frequency=pow(2.0,(note-57.0)/12.0)*440.0;
      for (i=0;i<frames;i++){
        outputs[0][i] = sin(phase*2.0*3.14*frequency);
        phase++;
      }
      }*/
  } //run

private:
  float phase=0;
  float detune;
  float mix;
};

Plugin* createPlugin()
{
   return new SuperSaw();
}


END_NAMESPACE_DISTRHO