/*
Copyright (c) OpenGrid project, http://osgrid.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.Text;
using System.Collections;
using System.Collections.Generic;
using libsecondlife;
using OpenSim.Framework.Utilities;
using OpenSim.Framework.Console;
using OpenSim.Framework.Sims;
using Db4objects.Db4o;
using Nwc.XmlRpc;
using System.Xml;

namespace OpenGridServices.GridServer
{
	/// <summary>
	/// </summary>
	public class SimProfileManager {
	
		public Dictionary<LLUUID, SimProfileBase> SimProfiles = new Dictionary<LLUUID, SimProfileBase>();
	    private OpenGrid_Main m_gridManager;

	    public SimProfileManager(OpenGrid_Main gridManager) {
	        m_gridManager = gridManager;
	    }
		
		public void LoadProfiles() {		// should abstract this out
			IObjectContainer db;
			db = Db4oFactory.OpenFile("simprofiles.yap");
                        IObjectSet result = db.Get(typeof(SimProfileBase));
			foreach (SimProfileBase simprof in result) {
				SimProfiles.Add(simprof.UUID, simprof);
			}
			MainConsole.Instance.WriteLine("SimProfiles.Cs:LoadProfiles() - Successfully loaded " + result.Count.ToString() + " from database");
			db.Close();
		}

		public SimProfileBase GetProfileByHandle(ulong reqhandle) {
			foreach (libsecondlife.LLUUID UUID in SimProfiles.Keys) {
				if(SimProfiles[UUID].regionhandle==reqhandle) return SimProfiles[UUID];
			}
			return null;
		}

		public SimProfileBase GetProfileByLLUUID(LLUUID ProfileLLUUID) {
			foreach (libsecondlife.LLUUID UUID in SimProfiles.Keys) {
				if(SimProfiles[UUID].UUID==ProfileLLUUID) return SimProfiles[UUID];
			}
			return null;
		}
	
		public bool AuthenticateSim(LLUUID RegionUUID, uint regionhandle, string simrecvkey) {
			SimProfileBase TheSim=GetProfileByHandle(regionhandle);
			if(TheSim != null) 
			if(TheSim.recvkey==simrecvkey) {
				return true;
			} else {
				return false;
			} else return false;
			
		}

		public string GetXMLNeighbours(ulong reqhandle) {
			string response="";
			SimProfileBase central_region = GetProfileByHandle(reqhandle);
			SimProfileBase neighbour;
			for(int x=-1; x<2; x++) for(int y=-1; y<2; y++) {
				if(GetProfileByHandle(Util.UIntsToLong((uint)((central_region.RegionLocX+x)*256), (uint)(central_region.RegionLocY+y)*256))!=null) {
					neighbour=GetProfileByHandle(Util.UIntsToLong((uint)((central_region.RegionLocX+x)*256), (uint)(central_region.RegionLocY+y)*256));
					response+="<neighbour>";
					response+="<sim_ip>" + neighbour.sim_ip + "</sim_ip>";
					response+="<sim_port>" + neighbour.sim_port.ToString() + "</sim_port>";
					response+="<locx>" + neighbour.RegionLocX.ToString() + "</locx>";
					response+="<locy>" + neighbour.RegionLocY.ToString() + "</locy>";
					response+="<regionhandle>" + neighbour.regionhandle.ToString() + "</regionhandle>";
					response+="</neighbour>";

				}
			}
			return response;
		}

		public SimProfileBase CreateNewProfile(string regionname, string caps_url, string sim_ip, uint sim_port, uint RegionLocX, uint RegionLocY, string sendkey, string recvkey) {
			SimProfileBase newprofile = new SimProfileBase();
			newprofile.regionname=regionname;
			newprofile.sim_ip=sim_ip;
			newprofile.sim_port=sim_port;
			newprofile.RegionLocX=RegionLocX;
			newprofile.RegionLocY=RegionLocY;
			newprofile.caps_url="http://" + sim_ip + ":9000/";
			newprofile.sendkey=sendkey;
			newprofile.recvkey=recvkey;
			newprofile.regionhandle=Util.UIntsToLong((RegionLocX*256), (RegionLocY*256));
			newprofile.UUID=LLUUID.Random();
			this.SimProfiles.Add(newprofile.UUID,newprofile);
			return newprofile;
		}

        public XmlRpcResponse XmlRpcLoginToSimulatorMethod(XmlRpcRequest request)
        {
            XmlRpcResponse response = new XmlRpcResponse();
            Hashtable responseData = new Hashtable();
            response.Value = responseData;

            SimProfileBase TheSim = null;
            Hashtable requestData = (Hashtable)request.Params[0];

            if (requestData.ContainsKey("UUID"))
            {
                TheSim = GetProfileByLLUUID(new LLUUID((string)requestData["UUID"]));
            }
            else if (requestData.ContainsKey("region_handle"))
            {
                TheSim = GetProfileByHandle((ulong)Convert.ToUInt64(requestData["region_handle"]));
            }

            if (TheSim == null)
            {
                responseData["error"] = "sim not found";
            }
            else
            {

                ArrayList SimNeighboursData = new ArrayList();

                SimProfileBase neighbour;
                Hashtable NeighbourBlock;
                for (int x = -1; x < 2; x++) for (int y = -1; y < 2; y++)
                    {
                        if (GetProfileByHandle(Helpers.UIntsToLong((uint)((TheSim.RegionLocX + x) * 256), (uint)(TheSim.RegionLocY + y) * 256)) != null)
                        {
                            neighbour = GetProfileByHandle(Helpers.UIntsToLong((uint)((TheSim.RegionLocX + x) * 256), (uint)(TheSim.RegionLocY + y) * 256));

                            NeighbourBlock = new Hashtable();
                            NeighbourBlock["sim_ip"] = neighbour.sim_ip;
                            NeighbourBlock["sim_port"] = neighbour.sim_port.ToString();
                            NeighbourBlock["region_locx"] = neighbour.RegionLocX.ToString();
                            NeighbourBlock["region_locy"] = neighbour.RegionLocY.ToString();
                            NeighbourBlock["UUID"] = neighbour.UUID.ToString();

			    if(neighbour.UUID!=TheSim.UUID) SimNeighboursData.Add(NeighbourBlock);
                        }
                    }

                responseData["UUID"] = TheSim.UUID.ToString();
                responseData["region_locx"] = TheSim.RegionLocX.ToString();
                responseData["region_locy"] = TheSim.RegionLocY.ToString();
                responseData["regionname"] = TheSim.regionname;
                responseData["estate_id"] = "1";
                responseData["neighbours"] = SimNeighboursData;

		responseData["sim_ip"] = TheSim.sim_ip;
		responseData["sim_port"] = TheSim.sim_port.ToString();
                responseData["asset_url"] = m_gridManager.Cfg.DefaultAssetServer;
                responseData["asset_sendkey"] = m_gridManager.Cfg.AssetSendKey;
                responseData["asset_recvkey"] = m_gridManager.Cfg.AssetRecvKey;
                responseData["user_url"] = m_gridManager.Cfg.DefaultUserServer;
                responseData["user_sendkey"] = m_gridManager.Cfg.UserSendKey;
                responseData["user_recvkey"] = m_gridManager.Cfg.UserRecvKey;
                responseData["authkey"] = m_gridManager.Cfg.SimSendKey;
            }

            return response;
        }

        public string RestSetSimMethod(string request, string path, string param)
        {
	    Console.WriteLine("SimProfiles.cs:RestSetSimMethod() - processing request......");
            SimProfileBase TheSim;
            TheSim = GetProfileByLLUUID(new LLUUID(param));
	    if ((TheSim) == null) {
		TheSim = new SimProfileBase();
	        LLUUID UUID = new LLUUID(param);
	        TheSim.UUID=UUID;
	    }
         
            XmlDocument doc = new XmlDocument();
            doc.LoadXml(request);
	    XmlNode rootnode=doc.FirstChild;
            XmlNode authkeynode = rootnode.ChildNodes[0];
            if (authkeynode.Name != "authkey")
                {
                    return "ERROR! bad XML - expected authkey tag";
                }

            XmlNode simnode = rootnode.ChildNodes[1];
            if (simnode.Name != "sim")
                {
                    return "ERROR! bad XML - expected sim tag";
                }
        
            if (authkeynode.InnerText != m_gridManager.Cfg.SimRecvKey)
                {
                    return "ERROR! invalid key";
                }
            for (int i = 0; i < simnode.ChildNodes.Count; i++) {
                  switch (simnode.ChildNodes[i].Name) {
                      case "regionname":
                          TheSim.regionname = simnode.ChildNodes[i].InnerText;
                      break;

                      case "sim_ip":
                          TheSim.sim_ip = simnode.ChildNodes[i].InnerText;
                      break;

                      case "sim_port":
                          TheSim.sim_port = Convert.ToUInt32(simnode.ChildNodes[i].InnerText);
                      break;

                      case "region_locx":
                          TheSim.RegionLocX = Convert.ToUInt32((string)simnode.ChildNodes[i].InnerText);
                          TheSim.regionhandle = Helpers.UIntsToLong((TheSim.RegionLocX * 256), (TheSim.RegionLocY * 256));
                      break;

                      case "region_locy":
                        TheSim.RegionLocY = Convert.ToUInt32((string)simnode.ChildNodes[i].InnerText);
                        TheSim.regionhandle = Helpers.UIntsToLong((TheSim.RegionLocX * 256), (TheSim.RegionLocY * 256));
                      break;
                   }
	    }
	    
	    try {
		    SimProfiles.Add(TheSim.UUID, TheSim);
	            IObjectContainer db;
	            db = Db4oFactory.OpenFile("simprofiles.yap");
		    db.Set(TheSim);
	            db.Close();
	    	    return "OK";
	    } catch(Exception e) {
		    return "ERROR! could not save to database!";
	    }

        }

        public string RestGetRegionMethod(string request, string path, string param )
	{
		SimProfileBase TheSim = GetProfileByHandle((ulong)Convert.ToUInt64(param));
		return RestGetSimMethod("", "/sims/", param);
	}

        public string RestSetRegionMethod(string request, string path, string param )
	{
		SimProfileBase TheSim = GetProfileByHandle((ulong)Convert.ToUInt64(param));
		return RestSetSimMethod("", "/sims/", param);
	}

        public string RestGetSimMethod(string request, string path, string param )
        {
            string respstring = String.Empty;

            SimProfileBase TheSim;
            LLUUID UUID = new LLUUID(param);
            TheSim = GetProfileByLLUUID(UUID);
            
            if (!(TheSim == null))
            {
		respstring = "<Root>";                
		respstring += "<authkey>" + m_gridManager.Cfg.SimSendKey + "</authkey>";
                respstring += "<sim>";
                respstring += "<uuid>" + TheSim.UUID.ToString() + "</uuid>";
                respstring += "<regionname>" + TheSim.regionname + "</regionname>";
                respstring += "<sim_ip>" + TheSim.sim_ip + "</sim_ip>";
                respstring += "<sim_port>" + TheSim.sim_port.ToString() + "</sim_port>";
                respstring += "<region_locx>" + TheSim.RegionLocX.ToString() + "</region_locx>";
                respstring += "<region_locy>" + TheSim.RegionLocY.ToString() + "</region_locy>";
                respstring += "<estate_id>1</estate_id>";
                respstring += "</sim>";
		respstring += "</Root>";
            }
            
            return respstring;
        }

	}


}