//
// GtkTheme.cs
//
// Author:
//   Aaron Bockover <abockover@novell.com>
//
// Copyright (C) 2007-2008 Novell, Inc.
//
// Permission is hereby granted, free of charge, to any person obtaining
// a copy of this software and associated documentation files (the
// "Software"), to deal in the Software without restriction, including
// without limitation the rights to use, copy, modify, merge, publish,
// distribute, sublicense, and/or sell copies of the Software, and to
// permit persons to whom the Software is furnished to do so, subject to
// the following conditions:
//
// The above copyright notice and this permission notice shall be
// included in all copies or substantial portions of the Software.
//
// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
// EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
// MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
// NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
// LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
// OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
// WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
//

using System;
using Cairo;
using Gtk;

namespace MonoDevelop.Components.Theming
{
	public class GtkTheme : Theme
	{
		private Cairo.Color rule_color;
		private Cairo.Color border_color;

		public GtkTheme (Widget widget) : base(widget)
		{
		}

		public static Cairo.Color GetCairoTextMidColor (Widget widget)
		{
			Cairo.Color text_color = CairoExtensions.GdkColorToCairoColor (widget.Style.Foreground (StateType.Normal));
			Cairo.Color background_color = CairoExtensions.GdkColorToCairoColor (widget.Style.Background (StateType.Normal));
			return CairoExtensions.AlphaBlend (text_color, background_color, 0.5);
		}

		public static Gdk.Color GetGdkTextMidColor (Widget widget)
		{
			Cairo.Color color = GetCairoTextMidColor (widget);
			Gdk.Color gdk_color = new Gdk.Color ((byte)(color.R * 255), (byte)(color.G * 255), (byte)(color.B * 255));
			Gdk.Colormap.System.AllocColor (ref gdk_color, true, true);
			return gdk_color;
		}

		protected override void OnColorsRefreshed ()
		{
			base.OnColorsRefreshed ();
			
			rule_color = CairoExtensions.ColorShade (ViewFill, 0.95);
			border_color = Colors.GetWidgetColor (GtkColorClass.Dark, StateType.Active);
		}

		public override void DrawPie (double fraction)
		{
			// Calculate the pie path
			fraction = Theme.Clamp (0.0, 1.0, fraction);
			double a1 = 3.0 * Math.PI / 2.0;
			double a2 = a1 + 2.0 * Math.PI * fraction;
			
			if (fraction == 0.0) {
				return;
			}
			
			Context.Cairo.MoveTo (Context.X, Context.Y);
			Context.Cairo.Arc (Context.X, Context.Y, Context.Radius, a1, a2);
			Context.Cairo.LineTo (Context.X, Context.Y);
			
			// Fill the pie
			Color color_a = Colors.GetWidgetColor (GtkColorClass.Background, StateType.Selected);
			Color color_b = CairoExtensions.ColorShade (color_a, 1.4);
			
			RadialGradient fill = new RadialGradient (Context.X, Context.Y, 0, Context.X, Context.Y, 2.0 * Context.Radius);
			fill.AddColorStop (0, color_a);
			fill.AddColorStop (1, color_b);
			Context.Cairo.Pattern = fill;
			
			Context.Cairo.FillPreserve ();
			fill.Destroy ();
			
			// Stroke the pie
			Context.Cairo.Color = CairoExtensions.ColorShade (color_a, 0.8);
			Context.Cairo.LineWidth = Context.LineWidth;
			Context.Cairo.Stroke ();
		}

		public override void DrawArrow (Context cr, Gdk.Rectangle alloc, SortType type)
		{
			cr.LineWidth = 1;
			cr.Translate (0.5, 0.5);
			double x1 = alloc.X;
			double x3 = alloc.X + alloc.Width / 2.0;
			double x2 = x3 + (x3 - x1);
			double y1 = alloc.Y;
			double y2 = alloc.Bottom;
			
			if (type == SortType.Ascending) {
				cr.MoveTo (x1, y1);
				cr.LineTo (x2, y1);
				cr.LineTo (x3, y2);
				cr.LineTo (x1, y1);
			} else {
				cr.MoveTo (x3, y1);
				cr.LineTo (x2, y2);
				cr.LineTo (x1, y2);
				cr.LineTo (x3, y1);
			}
			
			cr.Color = Colors.GetWidgetColor (GtkColorClass.Base, StateType.Normal);
			cr.FillPreserve ();
			cr.Color = Colors.GetWidgetColor (GtkColorClass.Text, StateType.Normal);
			cr.Stroke ();
			cr.Translate (-0.5, -0.5);
		}

		public override void DrawFrameBackground (Cairo.Context cr, Gdk.Rectangle alloc, Cairo.Color color, Cairo.Pattern pattern)
		{
			color.A = Context.FillAlpha;
			if (pattern != null) {
				cr.Pattern = pattern;
			} else {
				cr.Color = color;
			}
			CairoExtensions.RoundedRectangle (cr, alloc.X, alloc.Y, alloc.Width, alloc.Height, Context.Radius, CairoCorners.All);
			cr.Fill ();
		}

		public override void DrawFrameBorder (Cairo.Context cr, Gdk.Rectangle alloc)
		{
			cr.LineWidth = BorderWidth;
			cr.Color = border_color;
			double offset = (double)cr.LineWidth / 2.0;
			CairoExtensions.RoundedRectangle (cr, alloc.X + offset, alloc.Y + offset, alloc.Width - cr.LineWidth, alloc.Height - cr.LineWidth, Context.Radius, CairoCorners.All);
			cr.Stroke ();
		}

		public override void DrawFrameBorderFocused (Cairo.Context cr, Gdk.Rectangle alloc)
		{
			cr.LineWidth = BorderWidth * 1.5;
			cr.Color = CairoExtensions.ColorShade (border_color, 0.8);
			double offset = (double)cr.LineWidth / 2.0;
			CairoExtensions.RoundedRectangle (cr, alloc.X + offset, alloc.Y + offset, alloc.Width - cr.LineWidth, alloc.Height - cr.LineWidth, Context.Radius, CairoCorners.All);
			cr.Stroke ();
		}

		public override void DrawColumnHighlight (Cairo.Context cr, Gdk.Rectangle alloc, Cairo.Color color)
		{
			Cairo.Color light_color = CairoExtensions.ColorShade (color, 1.6);
			Cairo.Color dark_color = CairoExtensions.ColorShade (color, 1.3);
			
			LinearGradient grad = new LinearGradient (alloc.X, alloc.Y, alloc.X, alloc.Bottom - 1);
			grad.AddColorStop (0, light_color);
			grad.AddColorStop (1, dark_color);
			
			cr.Pattern = grad;
			cr.Rectangle (alloc.X + 1.5, alloc.Y + 1.5, alloc.Width - 3, alloc.Height - 2);
			cr.Fill ();
			grad.Destroy ();
		}

		public override void DrawHeaderBackground (Cairo.Context cr, Gdk.Rectangle alloc)
		{
			Cairo.Color gtk_background_color = Colors.GetWidgetColor (GtkColorClass.Background, StateType.Normal);
			Cairo.Color light_color = CairoExtensions.ColorShade (gtk_background_color, 1.1);
			Cairo.Color dark_color = CairoExtensions.ColorShade (gtk_background_color, 0.95);
			
			CairoCorners corners = CairoCorners.TopLeft | CairoCorners.TopRight;
			
			LinearGradient grad = new LinearGradient (alloc.X, alloc.Y, alloc.X, alloc.Bottom);
			grad.AddColorStop (0, light_color);
			grad.AddColorStop (0.75, dark_color);
			grad.AddColorStop (0, light_color);
			
			cr.Pattern = grad;
			CairoExtensions.RoundedRectangle (cr, alloc.X, alloc.Y, alloc.Width, alloc.Height, Context.Radius, corners);
			cr.Fill ();
			
			cr.Color = border_color;
			cr.Rectangle (alloc.X, alloc.Bottom, alloc.Width, BorderWidth);
			cr.Fill ();
			grad.Destroy ();
		}

		public override void DrawColumnHeaderFocus (Cairo.Context cr, Gdk.Rectangle alloc)
		{
			double top_offset = 2.0;
			double right_offset = 2.0;
			
			double margin = 0.5;
			double line_width = 0.7;
			
			Cairo.Color stroke_color = CairoExtensions.ColorShade (Colors.GetWidgetColor (GtkColorClass.Background, StateType.Selected), 0.8);
			
			stroke_color.A = 0.1;
			cr.Color = stroke_color;
			
			CairoExtensions.RoundedRectangle (cr, alloc.X + margin + line_width + right_offset, alloc.Y + margin + line_width + top_offset, alloc.Width - (margin + line_width) * 2.0 - right_offset, alloc.Height - (margin + line_width) * 2.0 - top_offset, Context.Radius / 2.0, CairoCorners.None);
			
			cr.Fill ();
			
			stroke_color.A = 1.0;
			cr.LineWidth = line_width;
			cr.Color = stroke_color;
			CairoExtensions.RoundedRectangle (cr, alloc.X + margin + line_width + right_offset, alloc.Y + margin + line_width + top_offset, alloc.Width - (line_width + margin) * 2.0 - right_offset, alloc.Height - (line_width + margin) * 2.0 - right_offset, Context.Radius / 2.0, CairoCorners.All);
			cr.Stroke ();
		}

		public override void DrawHeaderSeparator (Cairo.Context cr, Gdk.Rectangle alloc, int x)
		{
			Cairo.Color gtk_background_color = Colors.GetWidgetColor (GtkColorClass.Background, StateType.Normal);
			Cairo.Color dark_color = CairoExtensions.ColorShade (gtk_background_color, 0.8);
			Cairo.Color light_color = CairoExtensions.ColorShade (gtk_background_color, 1.1);
			
			int y_1 = alloc.Top + 4;
			int y_2 = alloc.Bottom - 3;
			
			cr.LineWidth = 1;
			cr.Antialias = Cairo.Antialias.None;
			
			cr.Color = dark_color;
			cr.MoveTo (x, y_1);
			cr.LineTo (x, y_2);
			cr.Stroke ();
			
			cr.Color = light_color;
			cr.MoveTo (x + 1, y_1);
			cr.LineTo (x + 1, y_2);
			cr.Stroke ();
			
			cr.Antialias = Cairo.Antialias.Default;
		}

		public override void DrawListBackground (Context cr, Gdk.Rectangle alloc, Color color)
		{
			color.A = Context.FillAlpha;
			cr.Color = color;
			cr.Rectangle (alloc.X, alloc.Y, alloc.Width, alloc.Height);
			cr.Fill ();
		}

		public override void DrawRowCursor (Cairo.Context cr, int x, int y, int width, int height, Cairo.Color color, CairoCorners corners)
		{
			cr.LineWidth = 1.25;
			cr.Color = color;
			CairoExtensions.RoundedRectangle (cr, x + cr.LineWidth / 2.0, y + cr.LineWidth / 2.0, width - cr.LineWidth, height - cr.LineWidth, Context.Radius, corners, true);
			cr.Stroke ();
		}

		public override void DrawRowSelection (Cairo.Context cr, int x, int y, int width, int height, bool filled, bool stroked, Cairo.Color color, CairoCorners corners)
		{
			Cairo.Color selection_color = color;
			Cairo.Color selection_highlight = CairoExtensions.ColorShade (selection_color, 1.24);
			Cairo.Color selection_stroke = CairoExtensions.ColorShade (selection_color, 0.85);
			selection_highlight.A = 0.5;
			selection_stroke.A = color.A;
			
			if (filled) {
				Cairo.Color selection_fill_light = CairoExtensions.ColorShade (selection_color, 1.12);
				Cairo.Color selection_fill_dark = selection_color;
				
				selection_fill_light.A = color.A;
				selection_fill_dark.A = color.A;
				
				LinearGradient grad = new LinearGradient (x, y, x, y + height);
				grad.AddColorStop (0, selection_fill_light);
				grad.AddColorStop (0.4, selection_fill_dark);
				grad.AddColorStop (1, selection_fill_light);
				
				cr.Pattern = grad;
				CairoExtensions.RoundedRectangle (cr, x, y, width, height, Context.Radius, corners, true);
				cr.Fill ();
				grad.Destroy ();
			}
			
			if (filled && stroked) {
				cr.LineWidth = 1.0;
				cr.Color = selection_highlight;
				CairoExtensions.RoundedRectangle (cr, x + 1.5, y + 1.5, width - 3, height - 3, Context.Radius - 1, corners, true);
				cr.Stroke ();
			}
			
			if (stroked) {
				cr.LineWidth = 1.0;
				cr.Color = selection_stroke;
				CairoExtensions.RoundedRectangle (cr, x + 0.5, y + 0.5, width - 1, height - 1, Context.Radius, corners, true);
				cr.Stroke ();
			}
		}

		public override void DrawRowRule (Cairo.Context cr, int x, int y, int width, int height)
		{
			cr.Color = new Cairo.Color (rule_color.R, rule_color.G, rule_color.B, Context.FillAlpha);
			cr.Rectangle (x, y, width, height);
			cr.Fill ();
		}
	}
}
