using System;
using System.Collections.Generic;
using System.Linq;

using Server.Accounting;
using Server.Items;
using Server.ContextMenus;
using Server.Misc;
using Server.Network;

namespace Server.Mobiles
{
	public class Banker : BaseVendor
	{
		private List<SBInfo> m_SBInfos = new List<SBInfo>();
		protected override List<SBInfo> SBInfos{ get { return m_SBInfos; } }

		public override NpcGuild NpcGuild{ get{ return NpcGuild.MerchantsGuild; } }

		[Constructable]
		public Banker() : base( "the banker" )
		{
		}

		public override void InitSBInfo()
		{
			m_SBInfos.Add( new SBBanker() );
		}

		public static int GetBalance(Mobile m)
		{
			double balance = 0;

			if (AccountGold.Enabled && m.Account != null)
			{
				int goldStub;
				m.Account.GetGoldBalance(out goldStub, out balance);

				if (balance > Int32.MaxValue)
				{
					return Int32.MaxValue;
				}
			}

			Container bank = m.FindBankNoCreate();

			if (bank != null)
			{
				var gold = bank.FindItemsByType<Gold>();
				var checks = bank.FindItemsByType<BankCheck>();

				balance += gold.Aggregate(0.0, (c, t) => c + t.Amount);
				balance += checks.Aggregate(0.0, (c, t) => c + t.Worth);
			}

			return (int)Math.Max(0, Math.Min(Int32.MaxValue, balance));
		}

		public static int GetBalance(Mobile m, out Item[] gold, out Item[] checks)
		{
			double balance = 0;

			if (AccountGold.Enabled && m.Account != null)
			{
				int goldStub;

				m.Account.GetGoldBalance(out goldStub, out balance);

				if (balance > Int32.MaxValue)
				{
					gold = checks = new Item[0];

					return Int32.MaxValue;
				}
			}

			Container bank = m.FindBankNoCreate();

			if (bank != null)
			{
				gold = bank.FindItemsByType(typeof(Gold));
				checks = bank.FindItemsByType(typeof(BankCheck));

				balance += gold.OfType<Gold>().Aggregate(0.0, (c, t) => c + t.Amount);
				balance += checks.OfType<BankCheck>().Aggregate(0.0, (c, t) => c + t.Worth);
			}
			else
			{
				gold = checks = new Item[0];
			}

			return (int)Math.Max(0, Math.Min(Int32.MaxValue, balance));
		}

		public static bool Withdraw(Mobile from, int amount)
		{
			// If for whatever reason the TOL checks fail, we should still try old methods for withdrawing currency.
			if (AccountGold.Enabled && from.Account != null && from.Account.WithdrawGold(amount))
			{
				return true;
			}

			Item[] gold, checks;
			var balance = GetBalance(from, out gold, out checks);

			if (balance < amount)
			{
				return false;
			}

			for (var i = 0; amount > 0 && i < gold.Length; ++i)
			{
				if (gold[i].Amount <= amount)
				{
					amount -= gold[i].Amount;
					gold[i].Delete();
				}
				else
				{
					gold[i].Amount -= amount;
					amount = 0;
				}
			}

			for (var i = 0; amount > 0 && i < checks.Length; ++i)
			{
				var check = (BankCheck)checks[i];

				if (check.Worth <= amount)
				{
					amount -= check.Worth;
					check.Delete();
				}
				else
				{
					check.Worth -= amount;
					amount = 0;
				}
			}

			return true;
		}

		public static bool Deposit(Mobile from, int amount)
		{
			// If for whatever reason the TOL checks fail, we should still try old methods for depositing currency.
			if (AccountGold.Enabled && from.Account != null && from.Account.DepositGold(amount))
			{
				return true;
			}

			var box = from.FindBankNoCreate();

			if (box == null)
			{
				return false;
			}

			var items = new List<Item>();

			while (amount > 0)
			{
				Item item;
				if (amount < 5000)
				{
					item = new Gold(amount);
					amount = 0;
				}
				else if (amount <= 1000000)
				{
					item = new BankCheck(amount);
					amount = 0;
				}
				else
				{
					item = new BankCheck(1000000);
					amount -= 1000000;
				}

				if (box.TryDropItem(from, item, false))
				{
					items.Add(item);
				}
				else
				{
					item.Delete();

					foreach (var curItem in items)
					{
						curItem.Delete();
					}

					return false;
				}
			}

			return true;
		}

		public static int DepositUpTo(Mobile from, int amount)
		{
			// If for whatever reason the TOL checks fail, we should still try old methods for depositing currency.
			if (AccountGold.Enabled && from.Account != null && from.Account.DepositGold(amount))
			{
				return amount;
			}

			var box = from.FindBankNoCreate();

			if (box == null)
			{
				return 0;
			}

			var amountLeft = amount;

			while (amountLeft > 0)
			{
				Item item;
				int amountGiven;

				if (amountLeft < 5000)
				{
					item = new Gold(amountLeft);
					amountGiven = amountLeft;
				}
				else if (amountLeft <= 1000000)
				{
					item = new BankCheck(amountLeft);
					amountGiven = amountLeft;
				}
				else
				{
					item = new BankCheck(1000000);
					amountGiven = 1000000;
				}

				if (box.TryDropItem(from, item, false))
				{
					amountLeft -= amountGiven;
				}
				else
				{
					item.Delete();
					break;
				}
			}

			return amount - amountLeft;
		}

		public static void Deposit(Container cont, int amount)
		{
			while (amount > 0)
			{
				Item item;

				if (amount < 5000)
				{
					item = new Gold(amount);
					amount = 0;
				}
				else if (amount <= 1000000)
				{
					item = new BankCheck(amount);
					amount = 0;
				}
				else
				{
					item = new BankCheck(1000000);
					amount -= 1000000;
				}

				cont.DropItem(item);
			}
		}

		public Banker( Serial serial ) : base( serial )
		{
		}

		public override bool HandlesOnSpeech( Mobile from )
		{
			if ( from.InRange( this.Location, 12 ) )
				return true;

			return base.HandlesOnSpeech( from );
		}

		public override void OnSpeech( SpeechEventArgs e )
		{
			if ( !e.Handled && e.Mobile.InRange( this.Location, 12 ) )
			{
				for ( int i = 0; i < e.Keywords.Length; ++i )
				{
					int keyword = e.Keywords[i];

					switch ( keyword )
					{
						case 0x0000: // *withdraw*
						{
							e.Handled = true;

							if ( e.Mobile.Criminal )
							{
								this.Say( 500389 ); // I will not do business with a criminal!
								break;
							}

							string[] split = e.Speech.Split( ' ' );

							if ( split.Length >= 2 )
							{
								int amount;

								Container pack = e.Mobile.Backpack;

								if ( !int.TryParse( split[1], out amount ) )
									break;

								if ( (!Core.ML && amount > 5000) || (Core.ML && amount > 60000) )
								{
									this.Say( 500381 ); // Thou canst not withdraw so much at one time!
								}
								else if (pack == null || pack.Deleted || !(pack.TotalWeight < pack.MaxWeight) || !(pack.TotalItems < pack.MaxItems))
								{
									this.Say(1048147); // Your backpack can't hold anything else.
								}
								else if (amount > 0)
								{
									BankBox box = e.Mobile.FindBankNoCreate();

									if (box == null || !Withdraw(e.Mobile, amount))
									{
										this.Say(500384); // Ah, art thou trying to fool me? Thou hast not so much gold!
									}
									else
									{
										pack.DropItem(new Gold(amount));

										this.Say(1010005); // Thou hast withdrawn gold from thy account.
									}
								}
							}

							break;
						}
						case 0x0001: // *balance*
						{
							e.Handled = true;

							if ( e.Mobile.Criminal )
							{
								this.Say( 500389 ); // I will not do business with a criminal!
								break;
							}

							if ( AccountGold.Enabled && e.Mobile.Account != null )
							{
								this.Say( 1155855, String.Format("{0:#,0}\t{1:#,0}", e.Mobile.Account.TotalPlat, e.Mobile.Account.TotalGold) ); // Thy current bank balance is ~1_AMOUNT~ platinum and ~2_AMOUNT~ gold.
							}
							else
							{
								this.Say( 1042759, GetBalance(e.Mobile).ToString("#,0") ); // Thy current bank balance is ~1_AMOUNT~ gold.
							}

							break;
						}
						case 0x0002: // *bank*
						{
							e.Handled = true;

							if ( e.Mobile.Criminal )
							{
								this.Say( 500378 ); // Thou art a criminal and cannot access thy bank box.
								break;
							}

							e.Mobile.BankBox.Open();

							break;
						}
						case 0x0003: // *check*
						{
							e.Handled = true;

							if ( AccountGold.Enabled )
								break;

							if ( e.Mobile.Criminal )
							{
								this.Say( 500389 ); // I will not do business with a criminal!
								break;
							}

							string[] split = e.Speech.Split( ' ' );

							if ( split.Length >= 2 )
							{
								int amount;

                                if ( !int.TryParse( split[1], out amount ) )
                                    break;

								if ( amount < 5000 )
								{
									this.Say( 1010006 ); // We cannot create checks for such a paltry amount of gold!
								}
								else if ( amount > 1000000 )
								{
									this.Say( 1010007 ); // Our policies prevent us from creating checks worth that much!
								}
								else
								{
									BankCheck check = new BankCheck( amount );

									BankBox box = e.Mobile.BankBox;

									if ( !box.TryDropItem( e.Mobile, check, false ) )
									{
										this.Say( 500386 ); // There's not enough room in your bankbox for the check!
										check.Delete();
									}
									else if ( !box.ConsumeTotal( typeof( Gold ), amount ) )
									{
										this.Say( 500384 ); // Ah, art thou trying to fool me? Thou hast not so much gold!
										check.Delete();
									}
									else
									{
										this.Say( 1042673, AffixType.Append, amount.ToString(), "" ); // Into your bank box I have placed a check in the amount of:
									}
								}
							}

							break;
						}
					}
				}
			}

			base.OnSpeech( e );
		}

		public override void AddCustomContextEntries( Mobile from, List<ContextMenuEntry> list )
		{
			if ( from.Alive )
				list.Add( new OpenBankEntry( from, this ) );

			base.AddCustomContextEntries( from, list );
		}

		public override void Serialize( GenericWriter writer )
		{
			base.Serialize( writer );

			writer.Write( (int) 0 ); // version
		}

		public override void Deserialize( GenericReader reader )
		{
			base.Deserialize( reader );

			int version = reader.ReadInt();
		}
	}
}
