//
// System.Runtime.Remoting.Metadata.W3cXsd2001.SoapDuration.cs
//
// Authors:
//      Martin Willemoes Hansen (mwh@sysrq.dk)
//      Lluis Sanchez Gual (lluis@ximian.com)
//
// (C) 2003 Martin Willemoes Hansen
//

//
// Copyright (C) 2004 Novell, Inc (http://www.novell.com)
//
// 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.Text;
using System.Globalization;

namespace System.Runtime.Remoting.Metadata.W3cXsd2001 
{
	[System.Runtime.InteropServices.ComVisible (true)]
	public sealed class SoapDuration
	{
		public SoapDuration()
		{
		}
		
		public static string XsdType {
			get { return "duration"; }
		}

		public static TimeSpan Parse (string value)
		{
			if (value.Length == 0)
				throw new ArgumentException ("Invalid format string for duration schema datatype.");

			int start = 0;
			if (value [0] == '-')
				start = 1;
			bool minusValue = (start == 1);

			if (value [start] != 'P')
				throw new ArgumentException ("Invalid format string for duration schema datatype.");
			start++;

			int parseStep = 0;
			int days = 0;
			bool isTime = false;
			int hours = 0;
			int minutes = 0;
			double seconds = 0;

			bool error = false;

			int i = start;
			while (i < value.Length) {
				if (value [i] == 'T') {
					isTime = true;
					parseStep = 4;
					i++;
					start = i;
					continue;
				}
				bool isIntegerValue = true;
				int dotOccurence = 0;
				for (; i < value.Length; i++) 
				{
					if (!Char.IsDigit (value [i]))
					{
						//check if it is a non integer value.
						if (value[i] == '.') 
						{
							isIntegerValue = false;
							dotOccurence++;
							//if there is more than one dot in the number 
							//than its an error
							if (dotOccurence > 1 )
							{
								error = true;
								break;
							}
						}
						else
							break;
					}
				}

				int intValue = -1;
				double doubleValue = -1;
				if (isIntegerValue)
					intValue = int.Parse (value.Substring (start, i - start));
				else
					doubleValue = double.Parse (value.Substring (start, i - start), CultureInfo.InvariantCulture);
				switch (value [i]) {
				case 'Y':
					days += intValue * 365;
					if (parseStep > 0 || !isIntegerValue)
						error = true;
					else
						parseStep = 1;
					break;
				case 'M':
					if (parseStep < 2 && isIntegerValue) {
						days += 365 * (intValue / 12) + 30 * (intValue % 12);
						parseStep = 2;
					} else if (isTime && parseStep < 6 && isIntegerValue) {
						minutes = intValue;
						parseStep = 6;
					}
					else
						error = true;
					break;
				case 'D':
					days += intValue;
					if (parseStep > 2 || !isIntegerValue)
						error = true;
					else
						parseStep = 3;
					break;
				case 'H':
					hours = intValue;
					if (!isTime || parseStep > 4 || !isIntegerValue)
						error = true;
					else
						parseStep = 5;
					break;
				case 'S':
					if (isIntegerValue)
						seconds = intValue;
					else
						seconds = doubleValue;
					if (!isTime || parseStep > 6)
						error = true;
					else
						parseStep = 7;
					break;
				default:
					error = true;
					break;
				}
				if (error)
					break;
				++i;
				start = i;
			}
			if (error)
				throw new ArgumentException ("Invalid format string for duration schema datatype.");
			TimeSpan ts = new TimeSpan (days, hours, minutes, 0) + TimeSpan.FromSeconds (seconds);
			return minusValue ? -ts : ts;
		}

		public static string ToString (TimeSpan timeSpan)
		{
			StringBuilder builder = new StringBuilder();
			if (timeSpan.Ticks < 0) {
				builder.Append('-');
				timeSpan = timeSpan.Negate();
			}
			builder.Append('P');
			if (timeSpan.Days > 0) builder.Append(timeSpan.Days).Append('D');
			if (timeSpan.Days > 0 || timeSpan.Minutes > 0 || timeSpan.Seconds > 0 || timeSpan.Milliseconds > 0) {
				builder.Append('T');
				if (timeSpan.Hours > 0) builder.Append(timeSpan.Hours).Append('H');
				if (timeSpan.Minutes > 0) builder.Append(timeSpan.Minutes).Append('M');
				if (timeSpan.Seconds > 0 || timeSpan.Milliseconds > 0) {
					double secs = (double) timeSpan.Seconds;
					if (timeSpan.Milliseconds > 0)
						secs += ((double)timeSpan.Milliseconds) / 1000.0;
					builder.Append(String.Format(CultureInfo.InvariantCulture, "{0:0.0000000}", secs));
					builder.Append('S');
				}
			}
			return builder.ToString();
		}
	}
}
