/*
    Copyright (C) 2003 Paul Davis 

    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.

    $Id$
*/

#include <iostream>
#include <cmath>
#include <algorithm>
#include <gdkmm/rectangle.h>
#include <gtkmm2ext/fastmeter.h>
#include <gtkmm/style.h>

using namespace Gtk;
using namespace Gdk;
using namespace Glib;
using namespace Gtkmm2ext;
using namespace std;

RefPtr<Pixmap> FastMeter::v_pixmap;
RefPtr<Bitmap> FastMeter::v_mask;
gint       FastMeter::v_pixheight = 0;
gint       FastMeter::v_pixwidth = 0;

RefPtr<Pixmap> FastMeter::h_pixmap;
RefPtr<Bitmap> FastMeter::h_mask;
gint       FastMeter::h_pixheight = 0;
gint       FastMeter::h_pixwidth = 0;

FastMeter::FastMeter (long hold, unsigned long dimen, Orientation o)
{
	orientation = o;
	hold_cnt = hold;
	hold_state = 0;
	current_peak = 0;
	current_level = 0;
	current_user_level = -100.0f;
	
	set_events (BUTTON_PRESS_MASK|BUTTON_RELEASE_MASK);

	pixrect.x = 0;
	pixrect.y = 0;

	if (orientation == Vertical) {
		pixrect.width = min (v_pixwidth, (gint) dimen);
		pixrect.height = v_pixheight;
	} else {
		pixrect.width = h_pixwidth;
		pixrect.height = min (h_pixheight, (gint) dimen);
	}

	request_width = pixrect.width;
	request_height= pixrect.height;
}

FastMeter::~FastMeter ()
{
}

void
FastMeter::on_realize ()
{
	DrawingArea::on_realize();

	RefPtr<Style> style = get_style();
	Color black = style->get_black();

	style->set_bg (STATE_NORMAL, black);
	style->set_bg (STATE_ACTIVE, black);
	style->set_bg (STATE_SELECTED, black);
	style->set_bg (STATE_INSENSITIVE, black);
}

void
FastMeter::set_vertical_xpm (const char **xpm)
{
	if (v_pixmap == 0) {
		gint w, h;

		v_pixmap = Pixmap::create_from_xpm(Colormap::get_system(), v_mask, xpm);
		v_pixmap->get_size(w, h);
		
		v_pixheight = h;
		v_pixwidth = w;
	}
}

void
FastMeter::set_horizontal_xpm (const char **xpm)
{
	if (h_pixmap == 0) {
		gint w, h;
		
		h_pixmap = Pixmap::create_from_xpm(Colormap::get_system(), h_mask, xpm);
		h_pixmap->get_size(w, h);
		
		h_pixheight = h;
		h_pixwidth = w;
	}
}

void
FastMeter::set_hold_count (long val)
{
	if (val < 1) {
		val = 1;
	}
	
	hold_cnt = val;
	hold_state = 0;
	current_peak = 0;
	
	queue_draw ();
}

void
FastMeter::on_size_request (GtkRequisition* req)
{
	req->width = request_width;
	req->height = request_height;
}

bool
FastMeter::on_expose_event (GdkEventExpose* ev)
{
	if (orientation == Vertical) {
		return vertical_expose (ev);
	} else {
		return horizontal_expose (ev);
	}
}

bool
FastMeter::vertical_expose (GdkEventExpose* ev)
{
	gint top_of_meter;
	GdkRectangle intersection;

	top_of_meter = (gint) floor (v_pixheight * current_level);
	pixrect.height = top_of_meter;

        if (gdk_rectangle_intersect (&pixrect, &ev->area, &intersection)) {
		/* draw the part of the meter image that we need. the area we draw is bounded "in reverse" (top->bottom)
		 */

		get_window()->draw_drawable(get_style()->get_fg_gc(get_state()), v_pixmap, 
					    intersection.x, v_pixheight - top_of_meter,
					    intersection.x, v_pixheight - top_of_meter,
					    intersection.width, intersection.height);
	}

	/* draw peak bar */
		
	if (hold_state) {
		get_window()->draw_drawable(get_style()->get_fg_gc(get_state()), v_pixmap,
					    intersection.x, v_pixheight - (gint) floor (v_pixheight * current_peak),
					    intersection.x, v_pixheight - (gint) floor (v_pixheight * current_peak),
					    intersection.width, 3);
	}

	return true;
}

bool
FastMeter::horizontal_expose (GdkEventExpose* ev)
{
	GdkRectangle intersection;
	gint right_of_meter;

	right_of_meter = (gint) floor (h_pixwidth * current_level);
	pixrect.width = right_of_meter;

	if (gdk_rectangle_intersect (&pixrect, &ev->area, &intersection)) {

		/* draw the part of the meter image that we need. 
		 */

		get_window()->draw_drawable(get_style()->get_fg_gc(get_state()), h_pixmap,
					    intersection.x, intersection.y,
					    intersection.x, intersection.y,
					    intersection.width, intersection.height);
	}
	
	/* draw peak bar */
	
	if (hold_state) {
		get_window()->draw_drawable(get_style()->get_fg_gc(get_state()), h_pixmap,
					    right_of_meter, intersection.y,
					    right_of_meter, intersection.y,
					    3, intersection.height);
	}

	return true;
}

void
FastMeter::set (float lvl, float usrlvl)
{
	current_level = lvl;
	current_user_level = usrlvl;
	
	if (lvl > current_peak) {
		current_peak = lvl;
		hold_state = hold_cnt;
	}
	
	if (hold_state > 0) {
		if (--hold_state == 0) {
			current_peak = lvl;
		}
	}

	queue_draw ();
}

void
FastMeter::clear ()
{
	current_level = 0;
	current_peak = 0;
	hold_state = 0;
	queue_draw ();
}