/*  WaveShaper Plugin Copyleft (C) 2001 Yves Usson 
 *  for SpiralSynthModular
/ *  Copyleft (C) 2000 David Griffiths <dave@pawfal.org>
 *
 *  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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
*/ 

#include "WaveShaperPluginGUI.h"
#include <FL/fl_draw.h>
#include <FL/fl_draw.H>

static const int GUI_COLOUR = 179;
static const int GUIBG_COLOUR = 144;
static const int GUIBG2_COLOUR = 145;
FunctionPlot::FunctionPlot(int ox,int oy,int ww,int hh): Fl_Widget(ox,oy,ww,hh) {
  fval = new float[256];
  for (int i=0;i<256;i++) fval[i] = i / 128.0 - 1.0;
}

FunctionPlot::~FunctionPlot() {
  delete [] fval;
}

void FunctionPlot::draw() {
  int ox = x() + 3;
int oy = y() +3;
int ww = w() - 6;
int hh = h() - 6;
float coefx,coefy;

	draw_box();
	fl_clip(ox,oy,ww,hh);
	coefx = ww / 256.0;
	coefy = hh / 2.0;
	for (int i = -5; i < 5; i++)
	{
		if (i==0) fl_color(FL_BLUE); else fl_color(FL_CYAN);
		fl_line(ox,oy+hh/2+i*hh/10,ox+ww,oy+hh/2+i*hh/10);
	}
	for (int i = -5; i < 5; i++)
	{
		if (i==0) fl_color(FL_BLUE); else fl_color(FL_CYAN);
		fl_line(ox+i*ww/10+ww/2,oy,ox+i*ww/10+ww/2,oy+hh);
	}
	fl_color(FL_RED);
	float y1 = oy+hh/2-coefy*fval[0];
	for (int i = 0; i < 255; i++)
	{
		float y2 = oy+hh/2-coefy*fval[i+1];
		fl_line((int)(ox+i*coefx),(int)y1,(int)(ox+(i+1)*coefx),(int)y2);
		y1 = y2;
	}
	fl_color(FL_BLACK);
	fl_pop_clip();
}

int FunctionPlot::handle(int event) {
  return 0;
}

void FunctionPlot::set(const int index,const float v) {
  if ((index < 0) || (index > 255)) return;
	fval[index] = v;
	if (fval[index] > 1.0f) fval[index] = 1.0f;
	if (fval[index] < -1.0f) fval[index] = -1.0f;
}
	
float FunctionPlot::get(const int index) const {
  if ((index < 0) || (index > 255)) return (-10.0f);
	return fval[index];
}


////////////////////////////////////////////

WaveShaperPluginGUI::WaveShaperPluginGUI(int w, int h,WaveShaperPlugin *o,const HostInfo *Info) :
SpiralPluginGUI(w,h,o)
{	
	m_Plugin=o;
	fplot = new FunctionPlot(3, 20, 268, 195);
    fplot->box(FL_ENGRAVED_BOX);
    fplot->color(7);
	
	radio_polynomial = new Fl_Round_Button(3, 218, 30, 20, "S");
    radio_polynomial->down_box(FL_ROUND_DOWN_BOX);
    radio_polynomial->value(1);
    radio_polynomial->type(102);
    radio_polynomial->labelfont(12);
    radio_polynomial->labelsize(12);
    radio_polynomial->callback((Fl_Callback*)cb_radio);
	
	radio_sines = new Fl_Round_Button(3, 238, 30, 20, "S");
    radio_sines->down_box(FL_ROUND_DOWN_BOX);
    radio_sines->value(0);
    radio_sines->type(102);
    radio_sines->labelfont(12);
    radio_sines->labelsize(12);
    radio_sines->callback((Fl_Callback*)cb_radio); 
	
    { Fl_Box* o = new Fl_Box(26, 218, 25, 20, "a .x");
      o->labelfont(2);
      o->labelsize(10);
    }
    { Fl_Box* o = new Fl_Box(33, 227, 10, 15, "i");
      o->labelfont(2);
      o->labelsize(10);
    }
    { Fl_Box* o = new Fl_Box(47, 217, 10, 15, "i");
      o->labelfont(2);
      o->labelsize(10);
    }
    { Fl_Box* o = new Fl_Box(31, 246, 10, 15, "i");
      o->labelfont(2);
      o->labelsize(10);
    }
    { Fl_Box* o = new Fl_Box(36, 237, 25, 20, "a .sin i x");
      o->labelfont(2);
      o->labelsize(10);
    }
	
	for (int i=0;i<6;i++)
	{
		knob[i] = new Fl_Knob(70+i*35, 220, 30, 30);
    	knob[i]->labelsize(10);
    	knob[i]->minimum(-1);
    	knob[i]->step(0.01);
    	knob[i]->value(0);
		knob[i]->color(GUI_COLOUR);
    	knob[i]->callback((Fl_Callback*)cb_knob);
    	knob[i]->type(Fl_Knob::DOTLIN);
    }
    knob[0]->value(1.0);
	end();
}



void WaveShaperPluginGUI::UpdateValues()
{
	int wt = m_Plugin->GetWaveType();
	radio_polynomial->value(wt);
	radio_sines->value(!wt);
	for (int j=0; j<6; j++) knob[j]->value(m_Plugin->GetCoef(j));
	knobCB();
}

inline void WaveShaperPluginGUI::cb_radio_i(Fl_Round_Button*, void*) {
  m_Plugin->SetWaveType(radio_polynomial->value());
  knobCB();
}
void WaveShaperPluginGUI::cb_radio(Fl_Round_Button* o, void* v) {
  ((WaveShaperPluginGUI*)(o->parent()))->cb_radio_i(o,v);
}

inline void WaveShaperPluginGUI::cb_knob_i(Fl_Knob*, void*) {
	for (int j=0; j<6; j++) m_Plugin->SetCoef(j,knob[j]->value());
  knobCB();
}
void WaveShaperPluginGUI::cb_knob(Fl_Knob* o, void* v) {
  ((WaveShaperPluginGUI*)(o->parent()))->cb_knob_i(o,v);
}

void WaveShaperPluginGUI::knobCB() {
int i;

	m_Plugin->Calc();
	for (i=0;i<256;i++)
	{
	   fplot->set(i,m_Plugin->Get(i*2));
	}
	fplot->redraw();
}