/*

 *   HDSPMixer

 *    

 *   Copyright (C) 2003 Thomas Charbonnel (thomas@undata.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., 675 Mass Ave, Cambridge, MA 02139, USA.

 */

#pragma implementation

#include "HDSPMixerFader.h"

HDSPMixerFader::HDSPMixerFader(int x, int y, double r, int id, int src):Fl_Widget(x, y, 13, 153)

{

    index = id;

    source = src;

    ndb = (int)(CF*(double)(log(0.5*(exp(3.0)-1)+1)*(double)(FADER_HEIGHT)/3.0));

    non_submix_dest = 0;

    dest = 0;

    ref = r;

    basew = (HDSPMixerWindow *)window();

    anchor = lastpos = lasty = drag = shift_orig = y_orig = 0;

    for (int i = 0; i < HDSP_MAX_DEST; i++) {

	pos[i] = 0;

    }

}

void HDSPMixerFader::draw()

{

    fl_draw_pixmap(Slider1_xpm, x(), y()+139-(int)(pos[dest]/CF));

}

int HDSPMixerFader::handle(int e)

{

    int button3 = Fl::event_button3();

    int shift = Fl::event_shift();

    int ctrl = Fl::event_ctrl();

    int ypos = Fl::event_y()-y();

    switch (e) {

	case FL_PUSH:

	    if (onSlider(ypos)) {

		anchor = 144-ypos-(int)(pos[dest]/CF);

		if (button3) relative->set(pos[dest]);

		return 1;

	    }

	    anchor = 0;

	    if (ctrl) {

		pos[dest] = ndb;

	    } else if (ypos < 7) {

		pos[dest] = 137*CF;

	    } else if (ypos > 6 && ypos < 146) {

		pos[dest] = (144-ypos)*CF;

	    } else if (ypos > 145) {

		pos[dest] = 0;

	    } 

	    if (lastpos != pos[dest]) {

		basew->setMixer(index, source, dest);

		sendGain();

		lastpos = pos[dest];

	    }

	    if (lasty != (int)(pos[dest]/CF)) {

		redraw();

		lasty = (int)(pos[dest]/CF);

	    }

	    if (button3) relative->set(pos[dest]);

	    shift_orig = pos[dest];

	    y_orig = ypos;

	    basew->checkState();

	    return 1;

	case FL_DRAG:

	    ypos += anchor;

	    if (ctrl) {

		pos[dest] = ndb;

		shift_orig = pos[dest];

		y_orig = ypos;

	    } else if ((ypos > 6 && ypos < 146) || drag) {

		drag = 1;

		if (shift) {

		    pos[dest] = (y_orig-ypos)+shift_orig;

		    if (pos[dest] < 0) pos[dest] = 0;

		    if (pos[dest] > 137*CF) pos[dest] = 137*CF;

		} else {

		    if (ypos < 7) {

			pos[dest] = 137*CF;

		    } else if (ypos > 144) {

			pos[dest] = 0;

		    } else {

			pos[dest] = (144-ypos)*CF;

		    }

		    shift_orig = pos[dest];   

		    y_orig = ypos;

		}

	    }

	    if (lastpos != pos[dest]) {

		basew->setMixer(index, source, dest);

		sendGain();

		lastpos = pos[dest];

	    }

	    if (lasty != (int)(pos[dest]/CF)) {

		redraw();

		lasty = (int)(pos[dest]/CF);

	    }

	    if (button3) relative->set(pos[dest]);

	    basew->checkState();

	    return 1;

	case FL_RELEASE:

	    drag = 0;

	    anchor = 0;

	    return 1;   

	default :

	    return Fl_Widget::handle(e);

    }

}

int HDSPMixerFader::onSlider(int ypos)

{

    if (ypos > (139-(int)(pos[dest]/CF)) && ypos < (151-(int)(pos[dest]/CF))) {

	return 1;

    }

    return 0;

}

void HDSPMixerFader::set(int p)

{

    if (p != pos[dest]) {

	pos[dest] = lastpos = p;

	basew->setMixer(index, source, dest);

	sendGain();

    }

    if (lasty != (int)(pos[dest]/CF)) {

	lasty = (int)(pos[dest]/CF);

	redraw();

    }

}

int HDSPMixerFader::posToInt(int p) {

    double x, y;

    if (p == ndb) return 32768;

    if (p == 137*CF) return 65535;

    if (p == 0) return 0;

    x = ((double)(p)) / (double)(137*CF);

    y = 65535.0 * (exp(3.0 * x) - 1.0) / (exp(3.0) - 1.0);

    if (y > 65535.0) y = 65535.0;

    if (y < 0.0) y = 0.0;

    return (int)y;

}

void HDSPMixerFader::posToLog(char *s)

{

    double db, fpos;

    if (posToInt(pos[dest]) == 0) {

	snprintf(s, 10, "-oo");

	return;

    }    

    fpos = (double)posToInt(pos[dest]) / ref;

    db = 20.0 * log10(fpos);

    snprintf(s, 10, "%.1f", db);

}

void HDSPMixerFader::sendGain()

{

    char buf[10];

    posToLog(buf);

    gain->setText(buf);

}