/*
Copyright (c) OpenSim project, http://sim.opensecondlife.org/
* All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions are met:
*     * Redistributions of source code must retain the above copyright
*       notice, this list of conditions and the following disclaimer.
*     * Redistributions in binary form must reproduce the above copyright
*       notice, this list of conditions and the following disclaimer in the
*       documentation and/or other materials provided with the distribution.
*     * Neither the name of the <organization> nor the
*       names of its contributors may be used to endorse or promote products
*       derived from this software without specific prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY <copyright holder> ``AS IS'' AND ANY
* EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
* WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
* DISCLAIMED. IN NO EVENT SHALL <copyright holder> BE LIABLE FOR ANY
* DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
* (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
* LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
* ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
* SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
*/

using System;
using System.Collections.Generic;
using libsecondlife;
using libsecondlife.Packets;
using libsecondlife.AssetSystem;
using System.IO;
using Axiom.MathLib;

namespace OpenSim
{
	/// <summary>
	/// Description of Prim_manager.
	/// </summary>
	public class PrimManager
	{
		private Server server;
		public AgentManager Agent_Manager;
		
		private uint prim_count;
		
		public libsecondlife.Packets.ObjectUpdatePacket.ObjectDataBlock PrimTemplate;
		public Dictionary<libsecondlife.LLUUID,PrimInfo> PrimList;
		
		/// <summary>
		/// 
		/// </summary>
		/// <param name="serve"></param>
		public PrimManager(Server serve)
		{
			server=serve;
			PrimList=new Dictionary<libsecondlife.LLUUID,PrimInfo> ();
			this.SetupTemplates("objectupate164.dat");
			
		}

		/// <summary>
		/// 
		/// </summary>
		/// <param name="User_info"></param>
		/// <param name="p1"></param>
		/// <param name="add_pack"></param>
		public void CreatePrim(User_Agent_info User_info, libsecondlife.LLVector3 p1, ObjectAddPacket add_pack)
		{
			ObjectUpdatePacket objupdate=new ObjectUpdatePacket();
			objupdate.RegionData.RegionHandle=Globals.Instance.RegionHandle;
			objupdate.RegionData.TimeDilation=64096;
			objupdate.ObjectData=new libsecondlife.Packets.ObjectUpdatePacket.ObjectDataBlock[1];
			PrimData PData=new PrimData();
			objupdate.ObjectData[0]=this.PrimTemplate;
			PData.OwnerID=objupdate.ObjectData[0].OwnerID=User_info.AgentID;
			PData.PCode=objupdate.ObjectData[0].PCode=add_pack.ObjectData.PCode;
			PData.PathBegin=objupdate.ObjectData[0].PathBegin=add_pack.ObjectData.PathBegin;
			PData.PathEnd=objupdate.ObjectData[0].PathEnd=add_pack.ObjectData.PathEnd;
			PData.PathScaleX=objupdate.ObjectData[0].PathScaleX=add_pack.ObjectData.PathScaleX;
			PData.PathScaleY=objupdate.ObjectData[0].PathScaleY=add_pack.ObjectData.PathScaleY;
			PData.PathShearX=objupdate.ObjectData[0].PathShearX=add_pack.ObjectData.PathShearX;
			PData.PathShearY=objupdate.ObjectData[0].PathShearY=add_pack.ObjectData.PathShearY;
			PData.PathSkew=objupdate.ObjectData[0].PathSkew=add_pack.ObjectData.PathSkew;
			PData.ProfileBegin=objupdate.ObjectData[0].ProfileBegin=add_pack.ObjectData.ProfileBegin;
			PData.ProfileEnd=objupdate.ObjectData[0].ProfileEnd=add_pack.ObjectData.ProfileEnd;
			PData.Scale=objupdate.ObjectData[0].Scale=add_pack.ObjectData.Scale;//new LLVector3(1,1,1);
			PData.PathCurve=objupdate.ObjectData[0].PathCurve=add_pack.ObjectData.PathCurve;
			PData.ProfileCurve=objupdate.ObjectData[0].ProfileCurve=add_pack.ObjectData.ProfileCurve;
			PData.ParentID=objupdate.ObjectData[0].ParentID=0;
			PData.ProfileHollow=objupdate.ObjectData[0].ProfileHollow=add_pack.ObjectData.ProfileHollow;
			//finish off copying rest of shape data
			
			objupdate.ObjectData[0].ID=(uint)(702000+prim_count);
			objupdate.ObjectData[0].FullID=new LLUUID("edba7151-5857-acc5-b30b-f01efefda"+prim_count.ToString("000"));
			
			//update position
			byte[] pb=p1.GetBytes();		
			Array.Copy(pb,0,objupdate.ObjectData[0].ObjectData,0,pb.Length);
			
			prim_count++;
			server.SendPacket(objupdate,true,User_info);
			
			//should send to all users
			foreach (KeyValuePair<libsecondlife.LLUUID,AvatarData> kp in Agent_Manager.AgentList)
			{
				if(kp.Value.NetInfo.AgentID!=User_info.AgentID)
				{
					server.SendPacket(objupdate,true,kp.Value.NetInfo);
				}
            }
			//should store this infomation 
			PrimInfo NewPrim=new PrimInfo();
			NewPrim.FullID=objupdate.ObjectData[0].FullID;
			NewPrim.LocalID=objupdate.ObjectData[0].ID;
			NewPrim.Position=p1;
			NewPrim.data=PData;
			
			this.PrimList.Add(NewPrim.FullID,NewPrim);
			
			//store rest of data
			
		}
		
		/// <summary>
		/// 
		/// </summary>
		/// <param name="User"></param>
		/// <param name="position"></param>
		/// <param name="LocalID"></param>
		/// <param name="setRotation"></param>
		/// <param name="rotation"></param>
		public void UpdatePrimPosition(User_Agent_info User,LLVector3 position,uint LocalID,bool setRotation, LLQuaternion rotation)
		{
			PrimInfo pri=null;
			foreach (KeyValuePair<libsecondlife.LLUUID,PrimInfo> kp in this.PrimList)
			{
				if(kp.Value.LocalID==LocalID)
				{
					pri=kp.Value;
				}
			}
			if(pri==null)
			{
				return;
			}
			uint ID=pri.LocalID;
			libsecondlife.LLVector3 pos2=new LLVector3(position.X,position.Y,position.Z);
			libsecondlife.LLQuaternion rotation2;
			if(!setRotation)
			{
				pri.Position=pos2;
				rotation2=new LLQuaternion(pri.Rotation.X,pri.Rotation.Y,pri.Rotation.Z,pri.Rotation.W);
			}
			else
			{
				rotation2=new LLQuaternion(rotation.X,rotation.Y,rotation.Z,rotation.W);
				pos2=pri.Position;
				pri.Rotation=rotation;
			}
			rotation2.W+=1;
			rotation2.X+=1;
			rotation2.Y+=1;
			rotation2.Z+=1;
			
			byte[] bytes=new byte[60];
			
			ImprovedTerseObjectUpdatePacket im=new ImprovedTerseObjectUpdatePacket();
			im.RegionData.RegionHandle=Globals.Instance.RegionHandle;
			im.RegionData.TimeDilation=64096;
			im.ObjectData=new ImprovedTerseObjectUpdatePacket.ObjectDataBlock[1];
			int i=0;
			ImprovedTerseObjectUpdatePacket.ObjectDataBlock dat=new ImprovedTerseObjectUpdatePacket.ObjectDataBlock();
			im.ObjectData[0]=dat;
			dat.TextureEntry=PrimTemplate.TextureEntry;
			
			bytes[i++] = (byte)(ID % 256);
			bytes[i++] = (byte)((ID >> 8) % 256);
			bytes[i++] = (byte)((ID >> 16) % 256);
			bytes[i++] = (byte)((ID >> 24) % 256);
			bytes[i++]=0;
			bytes[i++]=0;//1;

			byte[] pb=pos2.GetBytes();
			pri.Position=pos2;
			Array.Copy(pb,0,bytes,i,pb.Length);
			i+=12;
			ushort ac=32767;

			//vel
			bytes[i++] = (byte)(ac % 256);
			bytes[i++] = (byte)((ac >> 8) % 256);
			bytes[i++] = (byte)(ac % 256);
			bytes[i++] = (byte)((ac >> 8) % 256);
			bytes[i++] = (byte)(ac % 256);
			bytes[i++] = (byte)((ac >> 8) % 256);
			
			//accel
			bytes[i++] = (byte)(ac % 256);
			bytes[i++] = (byte)((ac >> 8) % 256);
			bytes[i++] = (byte)(ac % 256);
			bytes[i++] = (byte)((ac >> 8) % 256);
			bytes[i++] = (byte)(ac % 256);
			bytes[i++] = (byte)((ac >> 8) % 256);
			
			ushort rw, rx,ry,rz;
			rw=(ushort)(32768*rotation2.W);
			rx=(ushort)(32768*rotation2.X);
			ry=(ushort)(32768*rotation2.Y);
			rz=(ushort)(32768*rotation2.Z);
			
			//rot
			bytes[i++] = (byte)(rx % 256);
			bytes[i++] = (byte)((rx >> 8) % 256);
			bytes[i++] = (byte)(ry % 256);
			bytes[i++] = (byte)((ry >> 8) % 256);
			bytes[i++] = (byte)(rz % 256);
			bytes[i++] = (byte)((rz >> 8) % 256);
			bytes[i++] = (byte)(rw % 256);
			bytes[i++] = (byte)((rw >> 8) % 256);
			
			//rotation vel
			bytes[i++] = (byte)(ac % 256);
			bytes[i++] = (byte)((ac >> 8) % 256);
			bytes[i++] = (byte)(ac % 256);
			bytes[i++] = (byte)((ac >> 8) % 256);
			bytes[i++] = (byte)(ac % 256);
			bytes[i++] = (byte)((ac >> 8) % 256);
			
			dat.Data=bytes;
			
			foreach (KeyValuePair<libsecondlife.LLUUID,AvatarData> kp in Agent_Manager.AgentList)
			{
				if(kp.Value.NetInfo.AgentID!=User.AgentID)
				{
					server.SendPacket(im,true,kp.Value.NetInfo);
				}
            }
		}
		
		/// <summary>
		/// 
		/// </summary>
		/// <param name="user"></param>
		public void SendExistingPrims(User_Agent_info user)
		{
			//send data for already created prims to a new joining user
		}

		/// <summary>
		/// 
		/// </summary>
		/// <param name="name"></param>
		public void SetupTemplates(string name)
		{
			ObjectUpdatePacket objupdate=new ObjectUpdatePacket();
			objupdate.RegionData.RegionHandle=Globals.Instance.RegionHandle;
			objupdate.RegionData.TimeDilation=64096;
			objupdate.ObjectData=new libsecondlife.Packets.ObjectUpdatePacket.ObjectDataBlock[1];
				
			int i=0;
			FileInfo fInfo = new FileInfo(name);
			long numBytes = fInfo.Length;
			FileStream fStream = new FileStream(name, FileMode.Open, FileAccess.Read);
			BinaryReader br = new BinaryReader(fStream);
			byte [] data1 = br.ReadBytes((int)numBytes);
			br.Close();
			fStream.Close();
			
			libsecondlife.Packets.ObjectUpdatePacket.ObjectDataBlock objdata=new libsecondlife.Packets.ObjectUpdatePacket.ObjectDataBlock(data1,ref i);
			objupdate.ObjectData[0]=objdata;
			this.PrimTemplate=objdata;
			objdata.UpdateFlags=objdata.UpdateFlags+12-16+32+256;
			objdata.OwnerID=new LLUUID("00000000-0000-0000-0000-000000000000");
			//test adding a new texture to object , to test image downloading
			LLObject.TextureEntry te=new LLObject.TextureEntry(objdata.TextureEntry,0,objdata.TextureEntry.Length);
			te.DefaultTexture.TextureID=new LLUUID("00000000-0000-0000-5005-000000000005");
			
			LLObject.TextureEntry ntex=new LLObject.TextureEntry(new LLUUID("00000000-0000-0000-5005-000000000005"));
			
			objdata.TextureEntry=ntex.ToBytes();
		}
		
		/// <summary>
		/// 
		/// </summary>
		/// <param name="name"></param>
		/// <param name="user"></param>
		public void ReadPrimDatabase(string name,User_Agent_info user)
	    {
			StreamReader SR;
			string line;
			SR=File.OpenText(name);
			string [] comp= new string[10];
			string delimStr = " ,	";
			char [] delimiter = delimStr.ToCharArray();
			
			line=SR.ReadLine();
			while(line!="end")
			{
				comp=line.Split(delimiter);
				if(comp[0]=="ObjPack")
				{
					int num=Convert.ToInt32(comp[2]);
					int start=Convert.ToInt32(comp[1]);
					ObjectUpdatePacket objupdate=new ObjectUpdatePacket();
					objupdate.RegionData.RegionHandle=Globals.Instance.RegionHandle;
					objupdate.RegionData.TimeDilation=64096;
					objupdate.ObjectData=new libsecondlife.Packets.ObjectUpdatePacket.ObjectDataBlock[num];
					
					//	int count=0;
					string data_path = System.AppDomain.CurrentDomain.BaseDirectory + @"\data\";
					for(int cc=0; cc<num; cc++)
					{
						string filenam=data_path+@"prim_updates"+start+".dat";
						int i=0;
						//FileInfo fInfo = new FileInfo("objectupate"+start+".dat");
						FileInfo fInfo = new FileInfo(filenam);
						long numBytes = fInfo.Length;
						//FileStream fStream = new FileStream("objectupate"+start+".dat", FileMode.Open, FileAccess.Read);
						FileStream fStream = new FileStream(filenam, FileMode.Open, FileAccess.Read);
						BinaryReader br = new BinaryReader(fStream);
						byte [] data1 = br.ReadBytes((int)numBytes);
						br.Close();
						fStream.Close();
						
						libsecondlife.Packets.ObjectUpdatePacket.ObjectDataBlock objdata=new libsecondlife.Packets.ObjectUpdatePacket.ObjectDataBlock(data1,ref i);
						objupdate.ObjectData[cc]=objdata;
						start++;
					}
					server.SendPacket(objupdate,true,user);
					line=SR.ReadLine();
				}
			}
			SR.Close();
	    }
	}
	
	public class PrimInfo
	{
		public LLVector3 Position;
		public LLVector3 Velocity;
		public LLQuaternion Rotation=LLQuaternion.Identity;
		public uint LocalID;
		public LLUUID FullID;
		public PrimData data;
		
		public PrimInfo()
		{
			Position=new LLVector3(0,0,0);
			Velocity=new LLVector3(0,0,0);
			//data=new PrimData();
		}
	}
	public class PrimData
	{
		public LLUUID OwnerID;
		public byte PCode;
		public byte PathBegin;
		public byte PathEnd;
		public byte PathScaleX;
		public byte PathScaleY;
		public byte PathShearX;
		public byte PathShearY;
		public sbyte PathSkew;
		public byte ProfileBegin;
		public byte ProfileEnd;
		public LLVector3 Scale;
		public byte PathCurve;
		public byte ProfileCurve;
		public uint ParentID=0;
		public byte ProfileHollow;
		
		public bool DataBaseStorage=false;
		
		public PrimData()
		{
			
		}
	}
}