//
// Border.cs
//
// Author:
//       Jean-Philippe Bruyère <jp.bruyere@hotmail.com>
//
// Copyright (c) 2013-2017 Jean-Philippe Bruyère
//
// 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 System.Xml.Serialization;
using System.ComponentModel;
using System.Diagnostics;

namespace Crow
{
	public enum BorderStyle {
		Normal,
		Raised,
		Sunken
	};

	public class Border : Container
	{
		#region CTOR
		public Border () : base(){}
		public Border (Interface iface) : base(iface){}
		#endregion

		#region private fields
		int _borderWidth;
		BorderStyle _borderStyle;
		Fill raisedColor = Color.Gray;
		Fill sunkenColor = Color.Jet;
		#endregion

		#region public properties
		[XmlAttributeAttribute]
		public virtual Fill RaisedColor {
			get { return raisedColor; }
			set {
				if (raisedColor == value)
					return;
				raisedColor = value;
				NotifyValueChanged ("RaisedColor", raisedColor);
				RegisterForRedraw ();
			}
		}
		[XmlAttributeAttribute]
		public virtual Fill SunkenColor {
			get { return sunkenColor; }
			set {
				if (sunkenColor == value)
					return;
				sunkenColor = value;
				NotifyValueChanged ("SunkenColor", sunkenColor);
				RegisterForRedraw ();
			}
		}
		[XmlAttributeAttribute()][DefaultValue(1)]
		public virtual int BorderWidth {
			get { return _borderWidth; }
			set {
				_borderWidth = value;
				RegisterForGraphicUpdate ();
			}
		}
		[XmlAttributeAttribute][DefaultValue(BorderStyle.Normal)]
		public virtual BorderStyle BorderStyle {
			get { return _borderStyle; }
			set {
				if (_borderStyle == value)
					return;
				_borderStyle = value;
				RegisterForGraphicUpdate ();
			}
		}
		#endregion

		#region GraphicObject override
		[XmlIgnore]public override Rectangle ClientRectangle {
			get {
				Rectangle cb = base.ClientRectangle;
				cb.Inflate (- BorderWidth);
				return cb;
			}
		}

		protected override int measureRawSize (LayoutingType lt)
		{
			int tmp = base.measureRawSize (lt);
			return tmp < 0 ? tmp : tmp + 2 * BorderWidth;
		}
		protected override void onDraw (Cairo.Context gr)
		{
			drawborder2 (gr);

			gr.Save ();
			if (ClipToClientRect) {
				//clip to client zone
				CairoHelpers.CairoRectangle (gr, ClientRectangle,Math.Max(0.0, CornerRadius-Margin));
				gr.Clip ();
			}

			if (child != null)
				child.Paint (ref gr);
			gr.Restore ();
		}
		void drawborder2(Cairo.Context gr){
			Rectangle rBack = new Rectangle (Slot.Size);

			//rBack.Inflate (-Margin);
			//			if (BorderWidth > 0)
			//				rBack.Inflate (-BorderWidth / 2);

			Background.SetAsSource (gr, rBack);
			CairoHelpers.CairoRectangle(gr, rBack, CornerRadius);
			gr.Fill ();


			if (BorderStyle == BorderStyle.Normal) {
				if (BorderWidth > 0) {
					Foreground.SetAsSource (gr, rBack);
					CairoHelpers.CairoRectangle (gr, rBack, CornerRadius, BorderWidth);
				}
			} else {
				gr.LineWidth = 1.0;
				if (CornerRadius > 0.0) {
					double radius = CornerRadius;
					if ((radius > rBack.Height / 2.0) || (radius > rBack.Width / 2.0))
						radius = Math.Min (rBack.Height / 2.0, rBack.Width / 2.0);
					gr.SetSourceColor (sunkenColor);
					gr.MoveTo (0.5 + rBack.Left, -0.5 + rBack.Bottom - radius);
					gr.ArcNegative (0.5 + rBack.Left + radius, -0.5 + rBack.Bottom - radius, radius, Math.PI, Math.PI * 0.75);
					gr.MoveTo (0.5 + rBack.Left, -0.5 + rBack.Bottom - radius);
					gr.LineTo (0.5 + rBack.Left, 0.5 + rBack.Top + radius);
					gr.Arc (0.5 + rBack.Left + radius, 0.5 + rBack.Top + radius, radius, Math.PI, Math.PI * 1.5);
					gr.LineTo (-0.5 + rBack.Right - radius, 0.5 + rBack.Top);
					gr.Arc (-0.5 + rBack.Right - radius, 0.5 + rBack.Top + radius, radius, Math.PI * 1.5, Math.PI * 1.75);
					gr.Stroke ();
					if (BorderStyle == BorderStyle.Raised) {
						gr.MoveTo (-1.5 + rBack.Right, 1.5 + rBack.Top + radius);
						gr.ArcNegative (-0.5 + rBack.Right - radius, 0.5 + rBack.Top + radius, radius - 1.0, 0, -Math.PI * 0.25);
						gr.MoveTo (-1.5 + rBack.Right, 1.5 + rBack.Top + radius);
						gr.LineTo (-1.5 + rBack.Right, -1.5 + rBack.Bottom - radius);
						gr.Arc (-0.5 + rBack.Right - radius, -0.5 + rBack.Bottom - radius, radius - 1.0, 0, Math.PI / 2.0);
						gr.LineTo (1.5 + rBack.Left + radius, -1.5 + rBack.Bottom);
						gr.Arc (0.5 + rBack.Left + radius, -0.5 + rBack.Bottom - radius, radius - 1.0, Math.PI / 2.0, Math.PI * 0.75);
						gr.Stroke ();

						gr.SetSourceColor (raisedColor);
						gr.MoveTo (1.5 + rBack.Left, -1.5 + rBack.Bottom - radius);
						gr.ArcNegative (0.5 + rBack.Left + radius, -0.5 + rBack.Bottom - radius, radius - 1.0, Math.PI, Math.PI * 0.75);
						gr.MoveTo (1.5 + rBack.Left, -1.5 + rBack.Bottom - radius);
						gr.LineTo (1.5 + rBack.Left, 1.5 + rBack.Top + radius);
						gr.Arc (0.5 + rBack.Left + radius, 0.5 + rBack.Top + radius, radius - 1.0, Math.PI, Math.PI * 1.5);
						gr.LineTo (-1.5 + rBack.Right - radius, 1.5 + rBack.Top);
						gr.Arc (-0.5 + rBack.Right - radius, 0.5 + rBack.Top + radius, radius - 1.0, Math.PI * 1.5, Math.PI * 1.75);
					} else {
						gr.Stroke ();
						gr.SetSourceColor (raisedColor);
					}
					gr.MoveTo (-0.5 + rBack.Right, 0.5 + rBack.Top + radius);
					gr.ArcNegative (-0.5 + rBack.Right - radius, 0.5 + rBack.Top + radius, radius, 0, -Math.PI * 0.25);
					gr.MoveTo (-0.5 + rBack.Right, 0.5 + rBack.Top + radius);
					gr.LineTo (-0.5 + rBack.Right, -0.5 + rBack.Bottom - radius);
					gr.Arc (-0.5 + rBack.Right - radius, -0.5 + rBack.Bottom - radius, radius, 0, Math.PI / 2.0);
					gr.LineTo (0.5 + rBack.Left + radius, -0.5 + rBack.Bottom);
					gr.Arc (0.5 + rBack.Left + radius, -0.5 + rBack.Bottom - radius, radius, Math.PI / 2.0, Math.PI * 0.75);
					gr.Stroke ();
				} else {
					gr.SetSourceColor (sunkenColor);
					gr.MoveTo (0.5 + rBack.Left, rBack.Bottom);
					gr.LineTo (0.5 + rBack.Left, 0.5 + rBack.Y);
					gr.LineTo (rBack.Right, 0.5 + rBack.Y);
					if (BorderStyle == BorderStyle.Raised) {
						gr.MoveTo (-1.5 + rBack.Right, 2.0 + rBack.Y);
						gr.LineTo (-1.5 + rBack.Right, -1.5 + rBack.Bottom);
						gr.LineTo (2.0 + rBack.Left, -1.5 + rBack.Bottom);
						gr.Stroke ();
						gr.SetSourceColor (raisedColor);
						gr.MoveTo (1.5 + rBack.Left, -1.0 + rBack.Bottom);
						gr.LineTo (1.5 + rBack.Left, 1.5 + rBack.Y);
						gr.LineTo (rBack.Right, 1.5 + rBack.Y);
					} else {
						gr.Stroke ();
						gr.SetSourceColor (raisedColor);
					}
					gr.MoveTo (-0.5 + rBack.Right, 1.5 + rBack.Y);
					gr.LineTo (-0.5 + rBack.Right, -0.5 + rBack.Bottom);
					gr.LineTo (1.0 + rBack.Left, -0.5 + rBack.Bottom);
					gr.Stroke ();
				}
			}
		}
		void drawborder1(Cairo.Context gr){
			Rectangle rBack = new Rectangle (Slot.Size);

			//rBack.Inflate (-Margin);
			//			if (BorderWidth > 0)
			//				rBack.Inflate (-BorderWidth / 2);

			Background.SetAsSource (gr, rBack);
			CairoHelpers.CairoRectangle(gr, rBack, CornerRadius);
			gr.Fill ();

			double bw = _borderWidth;
			double crad = CornerRadius;

			if (bw > 0) {
				if (BorderStyle == BorderStyle.Normal)
					Foreground.SetAsSource (gr, rBack);
				else {
					if (BorderStyle == BorderStyle.Sunken)
						gr.SetSourceColor (raisedColor);
					else
						gr.SetSourceColor (sunkenColor);

					CairoHelpers.CairoRectangle (gr, rBack, crad, bw);

					if (BorderStyle == BorderStyle.Sunken)
						gr.SetSourceColor (sunkenColor);
					else
						gr.SetSourceColor (raisedColor);

					bw /= 2.0;
					rBack.Width -= (int)Math.Round(bw);
					rBack.Height -= (int)Math.Round(bw);
				}

				CairoHelpers.CairoRectangle (gr, rBack, crad, bw);
			}
		}
		#endregion
	}
}