path: root/src/transport-widget.c

/*
Copyright 2010 Canonical Ltd.

Authors:
    Conor Curran <conor.curran@canonical.com>
    Mirco Müller <mirco.mueller@canonical.com>

This program is free software: you can redistribute it and/or modify it 
under the terms of the GNU General Public License version 3, as published 
by the Free Software Foundation.

This program is distributed in the hope that it will be useful, but 
WITHOUT ANY WARRANTY; without even the implied warranties of 
MERCHANTABILITY, SATISFACTORY QUALITY, 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, see <http://www.gnu.org/licenses/>.

Uses code from ctk
*/

#ifdef HAVE_CONFIG_H
#include "config.h"
#endif

#include <math.h>
#include "transport-widget.h"
#include "common-defs.h"


#define RECT_WIDTH 130.0f
#define Y 7.0f
#define X 80.0f
#define INNER_RADIUS 12.5
#define	MIDDLE_RADIUS 13.5f
#define OUTER_RADIUS  14.5f
#define CIRCLE_RADIUS 21.0f
#define PREV_WIDTH  25.0f
#define PREV_HEIGHT 17.0f
#define	NEXT_WIDTH  25.0f //PREV_WIDTH
#define NEXT_HEIGHT 17.0f //PREV_HEIGHT
#define TRI_WIDTH  11.0f
#define TRI_HEIGHT 13.0f
#define TRI_OFFSET  6.0f
#define PREV_X 78.0f
#define PREV_Y 13.0f
#define NEXT_X 156.0f
#define NEXT_Y 13.0f //prev_y
#define PAUSE_WIDTH 21.0f
#define PAUSE_HEIGHT 27.0f
#define BAR_WIDTH 4.5f
#define BAR_HEIGHT 24.0f
#define BAR_OFFSET 10.0f
#define PAUSE_X 121.0f
#define	PAUSE_Y 7.0f
#define PLAY_WIDTH 28.0f
#define PLAY_HEIGHT 29.0f
#define PLAY_PADDING 5.0f
#define INNER_START_SHADE 0.98
#define INNER_END_SHADE 0.98
#define MIDDLE_START_SHADE 0.7
#define MIDDLE_END_SHADE 1.4
#define OUTER_START_SHADE 0.96
#define OUTER_END_SHADE 0.96
#define BUTTON_START_SHADE 1.1
#define BUTTON_END_SHADE 0.9
#define BUTTON_SHADOW_SHADE 0.8
#define INNER_COMPRESSED_START_SHADE 0.95
#define INNER_COMPRESSED_END_SHADE 1.05


typedef struct _TransportWidgetPrivate TransportWidgetPrivate;

struct _TransportWidgetPrivate
{
	TransportWidgetEvent current_command;
	TransportWidgetState current_state;
	GHashTable* 		 command_coordinates;	
  DbusmenuMenuitem*    twin_item;		
};

typedef struct
{
	double r;
	double g;
	double b;
} CairoColorRGB;


#define TRANSPORT_WIDGET_GET_PRIVATE(o) (G_TYPE_INSTANCE_GET_PRIVATE ((o), TRANSPORT_WIDGET_TYPE, TransportWidgetPrivate))

/* Gobject boiler plate */
static void transport_widget_class_init (TransportWidgetClass *klass);
static void transport_widget_init       (TransportWidget *self);
static void transport_widget_dispose    (GObject *object);
static void transport_widget_finalize   (GObject *object);
G_DEFINE_TYPE (TransportWidget, transport_widget, GTK_TYPE_MENU_ITEM);

/* essentials */
static void transport_widget_set_twin_item ( TransportWidget* self,
                                             DbusmenuMenuitem* twin_item);
static gboolean transport_widget_expose ( GtkWidget *button, GdkEventExpose *event);
static void draw (GtkWidget* button, cairo_t *cr);

/* UI and dbusmenu callbacks */
static gboolean transport_widget_button_press_event 	(GtkWidget      *menuitem,
                                                  		GdkEventButton  *event);
static gboolean transport_widget_button_release_event   (GtkWidget      *menuitem,
                                                    	GdkEventButton  *event);                                          
static void transport_widget_property_update ( DbusmenuMenuitem* item,
                                       	       gchar * property, 
                                       		   GValue * value,
                                       		   gpointer userdata );
static void transport_widget_menu_hidden ( GtkWidget        *menu,
                                           TransportWidget *transport);
static void transport_widget_notify ( GObject *item,
                                      GParamSpec       *pspec,
                                      gpointer          user_data );

static TransportWidgetEvent transport_widget_determine_button_event ( TransportWidget* button,
                                                                      GdkEventButton* event);
static void transport_widget_react_to_button_release ( TransportWidget* button,
                                                       TransportWidgetEvent command);
static void transport_widget_toggle_play_pause ( TransportWidget* button,
                                                 TransportWidgetState update);

/// Init functions //////////////////////////////////////////////////////////

static void
transport_widget_class_init (TransportWidgetClass *klass)
{	
	GObjectClass	*gobject_class = G_OBJECT_CLASS (klass);
 	GtkWidgetClass* widget_class = GTK_WIDGET_CLASS (klass);

	g_type_class_add_private (klass, sizeof (TransportWidgetPrivate));

  widget_class->button_press_event = transport_widget_button_press_event;
  widget_class->button_release_event = transport_widget_button_release_event;	
 	widget_class->expose_event = transport_widget_expose;
  
	gobject_class->dispose = transport_widget_dispose;
  gobject_class->finalize = transport_widget_finalize;
}

static void
transport_widget_init (TransportWidget *self)
{
	TransportWidgetPrivate* priv = TRANSPORT_WIDGET_GET_PRIVATE(self);	
	priv->current_command	= TRANSPORT_NADA;
	priv->current_state = PAUSE;
	priv->command_coordinates =  g_hash_table_new_full(g_direct_hash,
	                                             				g_direct_equal,
	                                             				NULL,
	                                             				(GDestroyNotify)g_list_free);
	GList* previous_list = NULL;
	previous_list = g_list_insert(previous_list, GINT_TO_POINTER(15), 0);
	previous_list = g_list_insert(previous_list, GINT_TO_POINTER(5), 1);
	previous_list = g_list_insert(previous_list, GINT_TO_POINTER(60), 2);
	previous_list = g_list_insert(previous_list, GINT_TO_POINTER(34), 3);
  g_hash_table_insert(priv->command_coordinates,
                    GINT_TO_POINTER(TRANSPORT_PREVIOUS),
                    previous_list);
                     
	GList* play_list = NULL;
	play_list = g_list_insert(play_list, GINT_TO_POINTER(58), 0);
	play_list = g_list_insert(play_list, GINT_TO_POINTER(0), 1);
	play_list = g_list_insert(play_list, GINT_TO_POINTER(50), 2);
	play_list = g_list_insert(play_list, GINT_TO_POINTER(43), 3);

	g_hash_table_insert(priv->command_coordinates,
                      GINT_TO_POINTER(TRANSPORT_PLAY_PAUSE),
                      play_list);

	GList* next_list = NULL;
	next_list = g_list_insert(next_list, GINT_TO_POINTER(100), 0);
	next_list = g_list_insert(next_list, GINT_TO_POINTER(5), 1);
	next_list = g_list_insert(next_list, GINT_TO_POINTER(60), 2);
	next_list = g_list_insert(next_list, GINT_TO_POINTER(34), 3);

	g_hash_table_insert(priv->command_coordinates,
                      GINT_TO_POINTER(TRANSPORT_NEXT),
                      next_list);
	
	gtk_widget_set_size_request(GTK_WIDGET(self), 200, 50);
  g_signal_connect (G_OBJECT(self),
                    "notify",
                    G_CALLBACK (transport_widget_notify),
                    NULL);    
}

static void
transport_widget_dispose (GObject *object)
{
	G_OBJECT_CLASS (transport_widget_parent_class)->dispose (object);
}

static void
transport_widget_finalize (GObject *object)
{
	G_OBJECT_CLASS (transport_widget_parent_class)->finalize (object);
}

static gboolean
transport_widget_expose (GtkWidget *button, GdkEventExpose *event)
{
	cairo_t *cr;
	cr = gdk_cairo_create (button->window);

    //g_debug("In the playbutton's expose method, x = %i, y=%i and width: %i and height: %i'");
	cairo_rectangle (cr,
                     event->area.x, event->area.y,
                     event->area.width, event->area.height);

	cairo_clip(cr);
  draw (button, cr);

	cairo_destroy (cr);
	return FALSE;
}

static void
transport_widget_toggle_play_pause(TransportWidget* button,
                                   TransportWidgetState update)
{
	TransportWidgetPrivate* priv = TRANSPORT_WIDGET_GET_PRIVATE(button);
	priv->current_state = update;
	//g_debug("TransportWidget::toggle play state : %i", priv->current_state); 
	gtk_widget_queue_draw (GTK_WIDGET(button));
}

static void
transport_widget_notify ( GObject *item,
                          GParamSpec       *pspec,
                          gpointer          user_data )
{
  if (g_strcmp0 (pspec->name, "parent")){
    GtkWidget *parent = gtk_widget_get_parent (GTK_WIDGET (item));
    if (parent){
      g_signal_connect ( parent, "hide",
                         G_CALLBACK (transport_widget_menu_hidden),
                         item );
    }
  }
}

static void
transport_widget_menu_hidden ( GtkWidget        *menu,
                               TransportWidget *transport)
{
	g_return_if_fail(IS_TRANSPORT_WIDGET(transport));
	transport_widget_react_to_button_release(transport, TRANSPORT_NADA); 
}

/* keyevents */
static gboolean
transport_widget_button_press_event (GtkWidget *menuitem, 
                                  	GdkEventButton *event)
{
	g_return_val_if_fail ( IS_TRANSPORT_WIDGET(menuitem), FALSE );
	TransportWidgetPrivate* priv = TRANSPORT_WIDGET_GET_PRIVATE ( TRANSPORT_WIDGET(menuitem) );

  TransportWidgetEvent result = transport_widget_determine_button_event ( TRANSPORT_WIDGET(menuitem),
                                                                            event);
	if(result != TRANSPORT_NADA){
    priv->current_command = result;
    cairo_t *cr;
    cr = gdk_cairo_create (menuitem->window);
    draw ( menuitem, cr );
    cairo_destroy ( cr );
  }
	return TRUE;
}
                              
static gboolean
transport_widget_button_release_event (GtkWidget *menuitem, 
                                       GdkEventButton *event)
{
    //g_debug("TransportWidget::menu_release_event");
  g_return_val_if_fail(IS_TRANSPORT_WIDGET(menuitem), FALSE);
  TransportWidget* transport = TRANSPORT_WIDGET(menuitem);
  TransportWidgetPrivate * priv = TRANSPORT_WIDGET_GET_PRIVATE ( transport );	

  TransportWidgetEvent result = transport_widget_determine_button_event ( transport,
                                                                          event );
  if(result != TRANSPORT_NADA){
    GValue value = {0};
    g_value_init(&value, G_TYPE_INT);
    //g_debug("TransportWidget::menu_press_event - going to send value %i", (int)result);
    g_value_set_int(&value, (int)result);	
    dbusmenu_menuitem_handle_event ( priv->twin_item,
                                     "Transport state change",
                                     &value,
                                     0 );
  }

  transport_widget_react_to_button_release ( transport,
                                             result );
  return TRUE;
}

static TransportWidgetEvent
transport_widget_determine_button_event( TransportWidget* button,
                                         GdkEventButton* event )
{
	//g_debug("event x coordinate = %f", event->x);
	//g_debug("event y coordinate = %f", event->y);
	TransportWidgetEvent button_event = TRANSPORT_NADA;
	// For now very simple rectangular collision detection
	if(event->x > 67 && event->x < 112
	   && event->y > 12 && event->y < 40){
		button_event = TRANSPORT_PREVIOUS;
	}
	else if(event->x > 111 && event->x < 153
	   && event->y > 5 && event->y < 47){
		button_event = TRANSPORT_PLAY_PAUSE;	
	}
	else if(event->x > 152 && event->x < 197
	   && event->y > 12 && event->y < 40){
		button_event = TRANSPORT_NEXT;
	}	
	return button_event;  
}


static void 
transport_widget_react_to_button_release ( TransportWidget* button,
                                           TransportWidgetEvent command )
{
	g_return_if_fail(IS_TRANSPORT_WIDGET(button));
	TransportWidgetPrivate* priv = TRANSPORT_WIDGET_GET_PRIVATE(button);	
	if(priv->current_command == TRANSPORT_NADA){
		//g_debug("returning from the playbutton release because my previous command was nada");
		return;
	}
	else if(priv->current_command != TRANSPORT_NADA &&
	        command != TRANSPORT_NADA){						
		priv->current_command = command;
	}
	cairo_t *cr;	
	cr = gdk_cairo_create ( GTK_WIDGET(button)->window );
	priv->current_command = TRANSPORT_NADA;

	draw ( GTK_WIDGET(button), cr );
	cairo_destroy (cr);
}    

/// internal helper functions //////////////////////////////////////////////////

static void
draw_gradient (cairo_t* cr,
               double   x,
               double   y,
               double   w,
               double   r,
               double*  rgba_start,
               double*  rgba_end)
{
	cairo_pattern_t* pattern = NULL;

	cairo_move_to (cr, x, y);
	cairo_line_to (cr, x + w - 2.0f * r, y);
	cairo_arc (cr,
		   x + w - 2.0f * r,
		   y + r,
		   r,
		   -90.0f * G_PI / 180.0f,
		   90.0f * G_PI / 180.0f);
	cairo_line_to (cr, x, y + 2.0f * r);
	cairo_arc (cr,
		   x,
		   y + r,
		   r,
		   90.0f * G_PI / 180.0f,
		   270.0f * G_PI / 180.0f);
	cairo_close_path (cr);

	pattern = cairo_pattern_create_linear (x, y, x, y + 2.0f * r);
	cairo_pattern_add_color_stop_rgba (pattern,
	                                   0.0f,
	                                   rgba_start[0],
	                                   rgba_start[1],
	                                   rgba_start[2],
	                                   rgba_start[3]);
	cairo_pattern_add_color_stop_rgba (pattern,
	                                   1.0f,
	                                   rgba_end[0],
	                                   rgba_end[1],
	                                   rgba_end[2],
	                                   rgba_end[3]);
	cairo_set_source (cr, pattern);
	cairo_fill (cr);
	cairo_pattern_destroy (pattern);
}

static void
draw_circle (cairo_t* cr,
	     double   x,
	     double   y,
	     double   r,
	     double*  rgba_start,
	     double*  rgba_end)
{
	cairo_pattern_t* pattern = NULL;

	cairo_move_to (cr, x, y);
	cairo_arc (cr,
		   x + r,
		   y + r,
		   r,
		   0.0f * G_PI / 180.0f,
		   360.0f * G_PI / 180.0f);

	pattern = cairo_pattern_create_linear (x, y, x, y + 2.0f * r);
	cairo_pattern_add_color_stop_rgba (pattern,
	                                   0.0f,
	                                   rgba_start[0],
	                                   rgba_start[1],
	                                   rgba_start[2],
	                                   rgba_start[3]);
	cairo_pattern_add_color_stop_rgba (pattern,
	                                   1.0f,
	                                   rgba_end[0],
	                                   rgba_end[1],
	                                   rgba_end[2],
	                                   rgba_end[3]);
	cairo_set_source (cr, pattern);
	cairo_fill (cr);
	cairo_pattern_destroy (pattern);
}

static void
_setup (cairo_t**         cr,
	cairo_surface_t** surf,
	gint              width,
	gint              height)
{
	if (!cr || !surf)
		return;

	*surf = cairo_image_surface_create (CAIRO_FORMAT_ARGB32, width, height);
	*cr = cairo_create (*surf);
	cairo_scale (*cr, 1.0f, 1.0f);
	cairo_set_operator (*cr, CAIRO_OPERATOR_CLEAR);
	cairo_paint (*cr);
	cairo_set_operator (*cr, CAIRO_OPERATOR_OVER);
}

static void
_mask_prev (cairo_t* cr,
	    double   x,
	    double   y,
	    double   tri_width,
	    double   tri_height,
	    double   tri_offset)
{
	if (!cr)
		return;

	cairo_move_to (cr, x,             y + tri_height / 2.0f);
	cairo_line_to (cr, x + tri_width, y);
	cairo_line_to (cr, x + tri_width, y + tri_height);
	x += tri_offset;
	cairo_move_to (cr, x,             y + tri_height / 2.0f);
	cairo_line_to (cr, x + tri_width, y);
	cairo_line_to (cr, x + tri_width, y + tri_height);
	x -= tri_offset;
	cairo_rectangle (cr, x, y, 2.5f, tri_height);
	cairo_close_path (cr);	
}

static void
_mask_next (cairo_t* cr,
	    double   x,
	    double   y,
	    double   tri_width,
	    double   tri_height,
	    double   tri_offset)
{
	if (!cr)
		return;

	cairo_move_to (cr, x,             y);
	cairo_line_to (cr, x + tri_width, y + tri_height / 2.0f);
	cairo_line_to (cr, x,             y + tri_height);
	x += tri_offset;
	cairo_move_to (cr, x,             y);
	cairo_line_to (cr, x + tri_width, y + tri_height / 2.0f);
	cairo_line_to (cr, x,             y + tri_height);
	x -= tri_offset;
	x += 2.0f * tri_width - tri_offset - 1.0f;
	cairo_rectangle (cr, x, y, 2.5f, tri_height);

	cairo_close_path (cr);	
}

static void
_mask_pause (cairo_t* cr,
	     double   x,
	     double   y,
	     double   bar_width,
	     double   bar_height,
	     double   bar_offset)
{
	if (!cr)
		return;

	cairo_set_line_width (cr, bar_width);
	cairo_set_line_cap (cr, CAIRO_LINE_CAP_ROUND);

	x += bar_width;
	y += bar_width;
	cairo_move_to (cr, x,              y);
	cairo_line_to (cr, x,              y + bar_height);
	cairo_move_to (cr, x + bar_offset, y);
	cairo_line_to (cr, x + bar_offset, y + bar_height);

}

static void
_mask_play (cairo_t* cr,
	     double   x,
	     double   y,
	     double   tri_width,
	     double   tri_height
	     /*double   tri_offset*/)
{
	if (!cr)
		return;

	cairo_move_to (cr, x,             y);
	cairo_line_to (cr, x + tri_width, y + tri_height / 2.0f);
	cairo_line_to (cr, x,             y + tri_height);
	cairo_close_path (cr);	
	
}

static void
_fill (cairo_t* cr,
       double   x_start,
       double   y_start,
       double   x_end,
       double   y_end,
       double*  rgba_start,
       double*  rgba_end,
       gboolean stroke)
{
	cairo_pattern_t* pattern = NULL;

	if (!cr || !rgba_start || !rgba_end)
		return;

	pattern = cairo_pattern_create_linear (x_start, y_start, x_end, y_end);
	cairo_pattern_add_color_stop_rgba (pattern,
					   0.0f,
					   rgba_start[0],
					   rgba_start[1],
					   rgba_start[2],
					   rgba_start[3]);
	cairo_pattern_add_color_stop_rgba (pattern,
					   1.0f,
					   rgba_end[0],
					   rgba_end[1],
					   rgba_end[2],
					   rgba_end[3]);
	cairo_set_source (cr, pattern);
	if (stroke)
		cairo_stroke (cr);
	else
		cairo_fill (cr);
	cairo_pattern_destroy (pattern);
}

static void
_finalize (cairo_t*          cr,
	   cairo_t**         cr_surf,
	   cairo_surface_t** surf,
	   double            x,
	   double            y)
{
	if (!cr || !cr_surf || !surf)
		return;

	cairo_set_source_surface (cr, *surf, x, y);
	cairo_paint (cr);
	cairo_surface_destroy (*surf);
	cairo_destroy (*cr_surf);
}

static void
_color_rgb_to_hls (gdouble *r,
                   gdouble *g,
                   gdouble *b)
{
	gdouble min;
	gdouble max;
	gdouble red;
	gdouble green;
	gdouble blue;
	gdouble h, l, s;
	gdouble delta;

	red = *r;
	green = *g;
	blue = *b;

	if (red > green)
	{
		if (red > blue)
			max = red;
		else
			max = blue;

		if (green < blue)
			min = green;
		else
		min = blue;
	}
	else
	{
		if (green > blue)
			max = green;
		else
		max = blue;

		if (red < blue)
			min = red;
		else
			min = blue;
	}
	l = (max+min)/2;
  if (fabs (max-min) < 0.0001)
  {
		h = 0;
		s = 0;
	}
	else
  {
		if (l <= 0.5)
		s = (max-min)/(max+min);
		else
		s = (max-min)/(2-max-min);

		delta = (max -min) != 0 ? (max -min) : 1;
    
    if(delta == 0)
      delta = 1;
  	if (red == max)
			h = (green-blue)/delta;
		else if (green == max)
			h = 2+(blue-red)/delta;
		else if (blue == max)
			h = 4+(red-green)/delta;

		h *= 60;
		if (h < 0.0)
			h += 360;
	}

	*r = h;
	*g = l;
	*b = s;
}

static void
_color_hls_to_rgb (gdouble *h,
                   gdouble *l,
                   gdouble *s)
{
	gdouble hue;
	gdouble lightness;
	gdouble saturation;
	gdouble m1, m2;
	gdouble r, g, b;

	lightness = *l;
	saturation = *s;

	if (lightness <= 0.5)
		m2 = lightness*(1+saturation);
	else
		m2 = lightness+saturation-lightness*saturation;

	m1 = 2*lightness-m2;

	if (saturation == 0)
	{
		*h = lightness;
		*l = lightness;
		*s = lightness;
	}
	else
	{
		hue = *h+120;
		while (hue > 360)
			hue -= 360;
		while (hue < 0)
			hue += 360;

		if (hue < 60)
			r = m1+(m2-m1)*hue/60;
		else if (hue < 180)
			r = m2;
		else if (hue < 240)
  		r = m1+(m2-m1)*(240-hue)/60;
		else
			r = m1;

		hue = *h;
		while (hue > 360)
			hue -= 360;
		while (hue < 0)
			hue += 360;

		if (hue < 60)
			g = m1+(m2-m1)*hue/60;
		else if (hue < 180)
			g = m2;
		else if (hue < 240)
			g = m1+(m2-m1)*(240-hue)/60;
		else
			g = m1;

		hue = *h-120;
		while (hue > 360)
			hue -= 360;
		while (hue < 0)
			hue += 360;

		if (hue < 60)
			b = m1+(m2-m1)*hue/60;
		else if (hue < 180)
			b = m2;
		else if (hue < 240)
			b = m1+(m2-m1)*(240-hue)/60;
		else
			b = m1;

		*h = r;
		*l = g;
		*s = b;
	}
}

static void
_color_shade (const CairoColorRGB *a, float k, CairoColorRGB *b)
{
	double red;
	double green;
	double blue;

	red   = a->r;
	green = a->g;
	blue  = a->b;

	if (k == 1.0)
	{
		b->r = red;
		b->g = green;
		b->b = blue;
		return;
	}

	_color_rgb_to_hls (&red, &green, &blue);

	green *= k;
	if (green > 1.0)
		green = 1.0;
	else if (green < 0.0)
		green = 0.0;

	blue *= k;
	if (blue > 1.0)
		blue = 1.0;
	else if (blue < 0.0)
		blue = 0.0;

	_color_hls_to_rgb (&red, &green, &blue);

	b->r = red;
	b->g = green;
	b->b = blue;
}

static inline void
_blurinner (guchar* pixel,
	    gint*   zR,
	    gint*   zG,
	    gint*   zB,
	    gint*   zA,
	    gint    alpha,
	    gint    aprec,
	    gint    zprec)
{
	gint R;
	gint G;
	gint B;
	guchar A;

	R = *pixel;
	G = *(pixel + 1);
	B = *(pixel + 2);
	A = *(pixel + 3);

	*zR += (alpha * ((R << zprec) - *zR)) >> aprec;
	*zG += (alpha * ((G << zprec) - *zG)) >> aprec;
	*zB += (alpha * ((B << zprec) - *zB)) >> aprec;
	*zA += (alpha * ((A << zprec) - *zA)) >> aprec;

	*pixel       = *zR >> zprec;
	*(pixel + 1) = *zG >> zprec;
	*(pixel + 2) = *zB >> zprec;
	*(pixel + 3) = *zA >> zprec;
}

static inline void
_blurrow (guchar* pixels,
	  gint    width,
	  gint    height,
	  gint    channels,
	  gint    line,
	  gint    alpha,
	  gint    aprec,
	  gint    zprec)
{
	gint    zR;
	gint    zG;
	gint    zB;
	gint    zA;
	gint    index;
	guchar* scanline;

	scanline = &(pixels[line * width * channels]);

	zR = *scanline << zprec;
	zG = *(scanline + 1) << zprec;
	zB = *(scanline + 2) << zprec;
	zA = *(scanline + 3) << zprec;

	for (index = 0; index < width; index ++)
		_blurinner (&scanline[index * channels],
			    &zR,
			    &zG,
			    &zB,
			    &zA,
			    alpha,
			    aprec,
			    zprec);

	for (index = width - 2; index >= 0; index--)
		_blurinner (&scanline[index * channels],
			    &zR,
			    &zG,
			    &zB,
			    &zA,
			    alpha,
			    aprec,
			    zprec);
}

static inline void
_blurcol (guchar* pixels,
	  gint    width,
	  gint    height,
	  gint    channels,
	  gint    x,
	  gint    alpha,
	  gint    aprec,
	  gint    zprec)
{
	gint zR;
	gint zG;
	gint zB;
	gint zA;
	gint index;
	guchar* ptr;

	ptr = pixels;

	ptr += x * channels;

	zR = *((guchar*) ptr    ) << zprec;
	zG = *((guchar*) ptr + 1) << zprec;
	zB = *((guchar*) ptr + 2) << zprec;
	zA = *((guchar*) ptr + 3) << zprec;

	for (index = width; index < (height - 1) * width; index += width)
		_blurinner ((guchar*) &ptr[index * channels],
			    &zR,
			    &zG,
			    &zB,
			    &zA,
			    alpha,
			    aprec,
			    zprec);

	for (index = (height - 2) * width; index >= 0; index -= width)
		_blurinner ((guchar*) &ptr[index * channels],
			    &zR,
			    &zG,
			    &zB,
			    &zA,
			    alpha,
			    aprec,
			    zprec);
}

void
_expblur (guchar* pixels,
	  gint    width,
	  gint    height,
	  gint    channels,
	  gint    radius,
	  gint    aprec,
	  gint    zprec)
{
	gint alpha;
	gint row = 0;
	gint col = 0;

	if (radius < 1)
		return;

	// calculate the alpha such that 90% of 
	// the kernel is within the radius.
	// (Kernel extends to infinity)
	alpha = (gint) ((1 << aprec) * (1.0f - expf (-2.3f / (radius + 1.f))));

	for (; row < height; row++)
		_blurrow (pixels,
			  width,
			  height,
			  channels,
			  row,
			  alpha,
			  aprec,
			  zprec);

	for(; col < width; col++)
		_blurcol (pixels,
			  width,
			  height,
			  channels,
			  col,
			  alpha,
			  aprec,
			  zprec);

	return;
}

void
_surface_blur (cairo_surface_t* surface,
               guint            radius)
{
	guchar*        pixels;
	guint          width;
	guint          height;
	cairo_format_t format;

	// before we mess with the surface execute any pending drawing
	cairo_surface_flush (surface);

	pixels = cairo_image_surface_get_data (surface);
	width  = cairo_image_surface_get_width (surface);
	height = cairo_image_surface_get_height (surface);
	format = cairo_image_surface_get_format (surface);

	switch (format)
	{
		case CAIRO_FORMAT_ARGB32:
			_expblur (pixels, width, height, 4, radius, 16, 7);
		break;

		case CAIRO_FORMAT_RGB24:
			_expblur (pixels, width, height, 3, radius, 16, 7);
		break;

		case CAIRO_FORMAT_A8:
			_expblur (pixels, width, height, 1, radius, 16, 7);
		break;

		default :
			// do nothing
		break;
	}

	// inform cairo we altered the surfaces contents
	cairo_surface_mark_dirty (surface);	
}

static void
draw (GtkWidget* button, cairo_t *cr)
{
	g_return_if_fail(IS_TRANSPORT_WIDGET(button));
	TransportWidgetPrivate* priv = TRANSPORT_WIDGET_GET_PRIVATE(button);	

	cairo_surface_t*  surf = NULL;
	cairo_t*       cr_surf = NULL;

	cairo_translate (cr, button->allocation.x, button->allocation.y);
	
	//g_debug("button x allocation = %i", button->allocation.x);
	//g_debug("button y allocation = %i", button->allocation.y);

	GtkStyle *style;

	CairoColorRGB bg_normal, fg_normal;
	CairoColorRGB color_inner[2], color_middle[2], color_outer[2], color_button[3], color_inner_compressed[2];

	style = gtk_widget_get_style (button);

	bg_normal.r = style->bg[0].red/65535.0;
	bg_normal.g = style->bg[0].green/65535.0;
	bg_normal.b = style->bg[0].blue/65535.0;

	fg_normal.r = style->fg[0].red/65535.0;
	fg_normal.g = style->fg[0].green/65535.0;
	fg_normal.b = style->fg[0].blue/65535.0;

	_color_shade (&bg_normal, INNER_START_SHADE, &color_inner[0]);
	_color_shade (&bg_normal, INNER_END_SHADE, &color_inner[1]);
	_color_shade (&bg_normal, MIDDLE_START_SHADE, &color_middle[0]);
	_color_shade (&bg_normal, MIDDLE_END_SHADE, &color_middle[1]);
	_color_shade (&bg_normal, OUTER_START_SHADE, &color_outer[0]);
	_color_shade (&bg_normal, OUTER_END_SHADE, &color_outer[1]);
	_color_shade (&fg_normal, BUTTON_START_SHADE, &color_button[0]);
	_color_shade (&fg_normal, BUTTON_END_SHADE, &color_button[1]);
	_color_shade (&bg_normal, BUTTON_SHADOW_SHADE, &color_button[2]);
	_color_shade (&bg_normal, INNER_COMPRESSED_START_SHADE, &color_inner_compressed[0]);
	_color_shade (&bg_normal, INNER_COMPRESSED_END_SHADE, &color_inner_compressed[1]);

	double MIDDLE_END[] = {color_middle[0].r, color_middle[0].g, color_middle[0].b, 1.0f};
	double MIDDLE_START[] = {color_middle[1].r, color_middle[1].g, color_middle[1].b, 1.0f};
	double OUTER_END[] = {color_outer[0].r, color_outer[0].g, color_outer[0].b, 1.0f};
	double OUTER_START[] = {color_outer[1].r, color_outer[1].g, color_outer[1].b, 1.0f};
	double BUTTON_END[] = {color_button[0].r, color_button[0].g, color_button[0].b, 1.0f};
	double BUTTON_START[] = {color_button[1].r, color_button[1].g, color_button[1].b, 1.0f};
	double BUTTON_SHADOW[] = {color_button[2].r, color_button[2].g, color_button[2].b, 0.75f};
	double INNER_COMPRESSED_END[] = {color_inner_compressed[1].r, color_inner_compressed[1].g, color_inner_compressed[1].b, 1.0f};
	double INNER_COMPRESSED_START[] = {color_inner_compressed[0].r, color_inner_compressed[0].g, color_inner_compressed[0].b, 1.0f};  
 
	// prev/next-background
	draw_gradient (cr,
		 X,
		 Y,
		 RECT_WIDTH,
		 OUTER_RADIUS,
		 OUTER_START,
		 OUTER_END);
	draw_gradient (cr,
		 X,
		 Y + 1,
		 RECT_WIDTH - 2,
		 MIDDLE_RADIUS,
		 MIDDLE_START,
		 MIDDLE_END);
	draw_gradient (cr,
               X,
               Y + 2,
               RECT_WIDTH - 4,
               MIDDLE_RADIUS,
               MIDDLE_START,
               MIDDLE_END);

	if(priv->current_command == TRANSPORT_PREVIOUS){
		draw_gradient (cr,
		               X,
		               Y + 2,
		               RECT_WIDTH/2,
		               INNER_RADIUS,
		               INNER_COMPRESSED_START,
		               INNER_COMPRESSED_END);
	}	
	else if(priv->current_command == TRANSPORT_NEXT){
		draw_gradient (cr,
		               RECT_WIDTH / 2 + X,
		               Y + 2,
		               (RECT_WIDTH - 7)/2,
		               INNER_RADIUS,
		               INNER_COMPRESSED_START,
		               INNER_COMPRESSED_END);		
	}

	// play/pause-background
	draw_circle (cr,
			X + RECT_WIDTH / 2.0f - 2.0f * OUTER_RADIUS - 5.5f,
			Y - ((CIRCLE_RADIUS - OUTER_RADIUS)),
			CIRCLE_RADIUS,
			OUTER_START,
			OUTER_END);
	draw_circle (cr,
	               X + RECT_WIDTH / 2.0f - 2.0f * OUTER_RADIUS - 5.5f + 0.5f,
	               Y - ((CIRCLE_RADIUS - OUTER_RADIUS)) + 0.5f,
	               CIRCLE_RADIUS - 0.75f,
	               MIDDLE_START,
	               MIDDLE_END);

	if(priv->current_command == TRANSPORT_PLAY_PAUSE){
	    draw_circle (cr,
			 X + RECT_WIDTH / 2.0f - 2.0f * OUTER_RADIUS - 5.5f + 1.5f,
			 Y - ((CIRCLE_RADIUS - OUTER_RADIUS)) + 1.5f,
			 CIRCLE_RADIUS - 1.5f,
		     		 INNER_COMPRESSED_START,
			 INNER_COMPRESSED_END);
	}
	else{        
		draw_circle (cr,
               X + RECT_WIDTH / 2.0f - 2.0f * OUTER_RADIUS - 5.5f + 1.5f,
               Y - ((CIRCLE_RADIUS - OUTER_RADIUS)) + 1.5f,
               CIRCLE_RADIUS - 1.5f,
               MIDDLE_START,
               MIDDLE_END);
	}					
	// draw previous-button drop-shadow
	_setup (&cr_surf, &surf, PREV_WIDTH, PREV_HEIGHT);
	_mask_prev (cr_surf,
		    (PREV_WIDTH - (2.0f * TRI_WIDTH - TRI_OFFSET)) / 2.0f,
		    (PREV_HEIGHT - TRI_HEIGHT) / 2.0f,
		    TRI_WIDTH,
		    TRI_HEIGHT,
		    TRI_OFFSET);
	_fill (cr_surf,
               (PREV_WIDTH - (2.0f * TRI_WIDTH - TRI_OFFSET)) / 2.0f,
               (PREV_HEIGHT - TRI_HEIGHT) / 2.0f,
               (PREV_WIDTH - (2.0f * TRI_WIDTH - TRI_OFFSET)) / 2.0f,
	       (double) TRI_HEIGHT,
	       BUTTON_SHADOW,
	       BUTTON_SHADOW,
	       FALSE);
	_surface_blur (surf, 1);
	_finalize (cr, &cr_surf, &surf, PREV_X, PREV_Y + 1.0f);

	// draw previous-button
	_setup (&cr_surf, &surf, PREV_WIDTH, PREV_HEIGHT);
	_mask_prev (cr_surf,
		    (PREV_WIDTH - (2.0f * TRI_WIDTH - TRI_OFFSET)) / 2.0f,
		    (PREV_HEIGHT - TRI_HEIGHT) / 2.0f,
		    TRI_WIDTH,
		    TRI_HEIGHT,
		    TRI_OFFSET);
	_fill (cr_surf,
		     (PREV_WIDTH - (2.0f * TRI_WIDTH - TRI_OFFSET)) / 2.0f,
		     (PREV_HEIGHT - TRI_HEIGHT) / 2.0f,
		     (PREV_WIDTH - (2.0f * TRI_WIDTH - TRI_OFFSET)) / 2.0f,
		     (double) TRI_HEIGHT,
		     BUTTON_START,
		     BUTTON_END,
		     FALSE);		
	_finalize (cr, &cr_surf, &surf, PREV_X, PREV_Y);

	// draw next-button drop-shadow
	_setup (&cr_surf, &surf, NEXT_WIDTH, NEXT_HEIGHT);
	_mask_next (cr_surf,
		    (NEXT_WIDTH - (2.0f * TRI_WIDTH - TRI_OFFSET)) / 2.0f,
		    (NEXT_HEIGHT - TRI_HEIGHT) / 2.0f,
		    TRI_WIDTH,
		    TRI_HEIGHT,
		    TRI_OFFSET);
	_fill (cr_surf,
	       (NEXT_WIDTH - (2.0f * TRI_WIDTH - TRI_OFFSET)) / 2.0f,
	       (NEXT_HEIGHT - TRI_HEIGHT) / 2.0f,
	       (NEXT_WIDTH - (2.0f * TRI_WIDTH - TRI_OFFSET)) / 2.0f,
	       (double) TRI_HEIGHT,
	       BUTTON_SHADOW,
	       BUTTON_SHADOW,
	       FALSE);
	_surface_blur (surf, 1);
	_finalize (cr, &cr_surf, &surf, NEXT_X, NEXT_Y + 1.0f);

	// draw next-button
	_setup (&cr_surf, &surf, NEXT_WIDTH, NEXT_HEIGHT);
	_mask_next (cr_surf,
		    (NEXT_WIDTH - (2.0f * TRI_WIDTH - TRI_OFFSET)) / 2.0f,
		    (NEXT_HEIGHT - TRI_HEIGHT) / 2.0f,
		    TRI_WIDTH,
		    TRI_HEIGHT,
		    TRI_OFFSET);
	_fill (cr_surf,
	       (NEXT_WIDTH - (2.0f * TRI_WIDTH - TRI_OFFSET)) / 2.0f,
	       (NEXT_HEIGHT - TRI_HEIGHT) / 2.0f,
	       (NEXT_WIDTH - (2.0f * TRI_WIDTH - TRI_OFFSET)) / 2.0f,
	       (double) TRI_HEIGHT,
	       BUTTON_START,
	       BUTTON_END,
	       FALSE);
	_finalize (cr, &cr_surf, &surf, NEXT_X, NEXT_Y);

	// draw pause-button drop-shadow
	if(priv->current_state == PLAY){
		_setup (&cr_surf, &surf, PAUSE_WIDTH, PAUSE_HEIGHT);
		_mask_pause (cr_surf,
				   (PAUSE_WIDTH - (2.0f * BAR_WIDTH + BAR_OFFSET)) / 2.0f,
				   (PAUSE_HEIGHT - BAR_HEIGHT) / 2.0f,
				   BAR_WIDTH,
				   BAR_HEIGHT - 2.0f * BAR_WIDTH,
				   BAR_OFFSET);
		_fill (cr_surf,
			     (PAUSE_WIDTH - (2.0f * BAR_WIDTH + BAR_OFFSET)) / 2.0f,
			     (PAUSE_HEIGHT - BAR_HEIGHT) / 2.0f,
			     (PAUSE_WIDTH - (2.0f * BAR_WIDTH + BAR_OFFSET)) / 2.0f,
			     (double) BAR_HEIGHT,
			     BUTTON_SHADOW,
			     BUTTON_SHADOW,
			     TRUE);
		_surface_blur (surf, 1);
		_finalize (cr, &cr_surf, &surf, PAUSE_X, PAUSE_Y + 1.0f);

		// draw pause-button
		_setup (&cr_surf, &surf, PAUSE_WIDTH, PAUSE_HEIGHT);
		_mask_pause (cr_surf,
				   (PAUSE_WIDTH - (2.0f * BAR_WIDTH + BAR_OFFSET)) / 2.0f,
				   (PAUSE_HEIGHT - BAR_HEIGHT) / 2.0f,
				   BAR_WIDTH,
				   BAR_HEIGHT - 2.0f * BAR_WIDTH,
				   BAR_OFFSET);
		_fill (cr_surf,
			     (PAUSE_WIDTH - (2.0f * BAR_WIDTH + BAR_OFFSET)) / 2.0f,
			     (PAUSE_HEIGHT - BAR_HEIGHT) / 2.0f,
			     (PAUSE_WIDTH - (2.0f * BAR_WIDTH + BAR_OFFSET)) / 2.0f,
			     (double) BAR_HEIGHT,
			     BUTTON_START,
			     BUTTON_END,
			     TRUE);
		_finalize (cr, &cr_surf, &surf, PAUSE_X, PAUSE_Y);
	}
	else if(priv->current_state == PAUSE){
		_setup (&cr_surf, &surf, PLAY_WIDTH, PLAY_HEIGHT);
		_mask_play (cr_surf,
		            PLAY_PADDING,
		            PLAY_PADDING,
		            PLAY_WIDTH - (2*PLAY_PADDING),
		            PLAY_HEIGHT - (2*PLAY_PADDING));		            
		_fill (cr_surf,
		       PLAY_PADDING,
		       PLAY_PADDING,
		       PLAY_WIDTH - (2*PLAY_PADDING),
		       PLAY_HEIGHT - (2*PLAY_PADDING),
			     BUTTON_SHADOW,
			     BUTTON_SHADOW,
			     FALSE);
		_surface_blur (surf, 1);
		_finalize (cr, &cr_surf, &surf, PAUSE_X-0.75f, PAUSE_Y + 1.0f);
		// draw play-button
		_setup (&cr_surf, &surf, PLAY_WIDTH, PLAY_HEIGHT);
		cairo_set_line_width (cr, 10.5);
		cairo_set_line_cap(cr, CAIRO_LINE_CAP_ROUND);
		cairo_set_line_join(cr, CAIRO_LINE_JOIN_ROUND);
		_mask_play (cr_surf,
		            PLAY_PADDING,
		            PLAY_PADDING,
		            PLAY_WIDTH - (2*PLAY_PADDING),
		            PLAY_HEIGHT - (2*PLAY_PADDING));		            
		_fill (cr_surf,
		       PLAY_PADDING,
		       PLAY_PADDING,
		       PLAY_WIDTH - (2*PLAY_PADDING),
		       PLAY_HEIGHT - (2*PLAY_PADDING),
			     BUTTON_START,
			     BUTTON_END,
			     FALSE);
		_finalize (cr, &cr_surf, &surf, PAUSE_X-0.5f, PAUSE_Y);
	}
}

static void 
transport_widget_set_twin_item(TransportWidget* self,
           								 DbusmenuMenuitem* twin_item)
{
    TransportWidgetPrivate* priv = TRANSPORT_WIDGET_GET_PRIVATE(self);
    priv->twin_item = twin_item;
    g_signal_connect(G_OBJECT(priv->twin_item), "property-changed", 
                              G_CALLBACK(transport_widget_property_update), self);
	  gint initial_state = dbusmenu_menuitem_property_get_int( twin_item,
                                                             DBUSMENU_TRANSPORT_MENUITEM_PLAY_STATE );
    //g_debug("TRANSPORT WIDGET - INITIAL UPDATE = %i", initial_state);
		transport_widget_toggle_play_pause( self,
                                        (TransportWidgetState)initial_state);		    
}

/**
* transport_widget_update_state()
* Callback for updates from the other side of dbus
**/
static void 
transport_widget_property_update(DbusmenuMenuitem* item, gchar* property, 
                                 GValue* value, gpointer userdata)
{
	//g_debug("transport_widget_update_state - with property  %s", property);
	TransportWidget* bar = (TransportWidget*)userdata;
	g_return_if_fail(IS_TRANSPORT_WIDGET(bar));

	if(g_ascii_strcasecmp(DBUSMENU_TRANSPORT_MENUITEM_PLAY_STATE, property) == 0)
	{
		int update_value = g_value_get_int(value);
		//g_debug("transport_widget_update_state - with value  %i", update_value);  
		transport_widget_toggle_play_pause(bar, (TransportWidgetState)update_value);		
	}
}


/**
* transport_widget_new:
* @returns: a new #TransportWidget.
**/
GtkWidget* 
transport_widget_new ( DbusmenuMenuitem *item )
{	
	GtkWidget* widget =	g_object_new(TRANSPORT_WIDGET_TYPE, NULL);
	gtk_widget_set_app_paintable (widget, TRUE);	
	transport_widget_set_twin_item((TransportWidget*)widget, item);  
	return widget;
}