//
// SetupDomain.cs
//  
// Author:
//       Lluis Sanchez Gual <lluis@novell.com>
// 
// Copyright (c) 2009 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.Collections.Specialized;

namespace Mono.Addins.Database
{
	class SetupDomain: ISetupHandler
	{
		AppDomain domain;
		RemoteSetupDomain remoteSetupDomain;
		int useCount;
		
		public void Scan (IProgressStatus monitor, AddinRegistry registry, string scanFolder, ScanOptions context)
		{
			RemoteProgressStatus remMonitor = new RemoteProgressStatus (monitor);
			try {
				RemoteSetupDomain rsd = GetDomain ();
				rsd.Scan (remMonitor, registry.RegistryPath, registry.StartupDirectory, registry.DefaultAddinsFolder, registry.AddinCachePath, scanFolder, context);
			} catch (Exception ex) {
				throw new ProcessFailedException (remMonitor.ProgessLog, ex);
			} finally {
				System.Runtime.Remoting.RemotingServices.Disconnect (remMonitor);
				ReleaseDomain ();
			}
		}
		
		public void GenerateScanDataFiles (IProgressStatus monitor, AddinRegistry registry, string scanFolder, bool recursive)
		{
			RemoteProgressStatus remMonitor = new RemoteProgressStatus (monitor);
			try {
				RemoteSetupDomain rsd = GetDomain ();
				rsd.PreScan (remMonitor, registry.RegistryPath, registry.StartupDirectory, registry.DefaultAddinsFolder, registry.AddinCachePath, scanFolder, recursive);
			} catch (Exception ex) {
				throw new ProcessFailedException (remMonitor.ProgessLog, ex);
			} finally {
				System.Runtime.Remoting.RemotingServices.Disconnect (remMonitor);
				ReleaseDomain ();
			}
		}
		
		public void GetAddinDescription (IProgressStatus monitor, AddinRegistry registry, string file, string outFile)
		{
			RemoteProgressStatus remMonitor = new RemoteProgressStatus (monitor);
			try {
				RemoteSetupDomain rsd = GetDomain ();
				rsd.GetAddinDescription (remMonitor, registry.RegistryPath, registry.StartupDirectory, registry.DefaultAddinsFolder, registry.AddinCachePath, file, outFile);
			} catch (Exception ex) {
				throw new ProcessFailedException (remMonitor.ProgessLog, ex);
			} finally {
				System.Runtime.Remoting.RemotingServices.Disconnect (remMonitor);
				ReleaseDomain ();
			}
		}

		// ensure types from this assembly returned to this domain from the remote domain can
		// be resolved even if we're in the LoadFrom context
		static System.Reflection.Assembly MonoAddinsAssemblyResolve(object sender, ResolveEventArgs args)
		{
			var asm = typeof(SetupDomain).Assembly;
			return args.Name == asm.FullName? asm : null;
		}

		RemoteSetupDomain GetDomain ()
		{
			lock (this) {
				if (useCount++ == 0) {
					AppDomain.CurrentDomain.AssemblyResolve += MonoAddinsAssemblyResolve;
					domain = AppDomain.CreateDomain ("SetupDomain", null, AppDomain.CurrentDomain.SetupInformation);
					var type = typeof(RemoteSetupDomain);
					remoteSetupDomain = (RemoteSetupDomain) domain.CreateInstanceFromAndUnwrap (type.Assembly.Location, type.FullName);
				}
				return remoteSetupDomain;
			}
		}
		
		void ReleaseDomain ()
		{
			lock (this) {
				if (--useCount == 0) {
					AppDomain.Unload (domain);
					domain = null;
					remoteSetupDomain = null;
					AppDomain.CurrentDomain.AssemblyResolve -= MonoAddinsAssemblyResolve;
				}
			}
		}
	}

	class RemoteSetupDomain: MarshalByRefObject
	{
		public RemoteSetupDomain ()
		{
			// ensure types from this assembly passed to this domain from the main domain
			// can be resolved even though we're in the LoadFrom context
			AppDomain.CurrentDomain.AssemblyResolve += (o, a) => {
				var asm = typeof(RemoteSetupDomain).Assembly;
				return a.Name == asm.FullName? asm : null;
			};
		}

		public override object InitializeLifetimeService ()
		{
			return null;
		}
		
		public void Scan (IProgressStatus monitor, string registryPath, string startupDir, string addinsDir, string databaseDir, string scanFolder, ScanOptions context)
		{
			AddinDatabase.RunningSetupProcess = true;
			AddinRegistry reg = new AddinRegistry (registryPath, startupDir, addinsDir, databaseDir);
			if (context.FileSystemExtension != null)
				reg.RegisterExtension (context.FileSystemExtension);
			reg.ScanFolders (monitor, scanFolder, context);
		}
		
		public void PreScan (IProgressStatus monitor, string registryPath, string startupDir, string addinsDir, string databaseDir, string scanFolder, bool recursive)
		{
			AddinDatabase.RunningSetupProcess = true;
			AddinRegistry reg = new AddinRegistry (registryPath, startupDir, addinsDir, databaseDir);
			reg.GenerateScanDataFilesInProcess (monitor, scanFolder, recursive);
		}
		
		public void GetAddinDescription (IProgressStatus monitor, string registryPath, string startupDir, string addinsDir, string databaseDir, string file, string outFile)
		{
			AddinDatabase.RunningSetupProcess = true;
			AddinRegistry reg = new AddinRegistry (registryPath, startupDir, addinsDir, databaseDir);
			reg.ParseAddin (monitor, file, outFile);
		}
	}
	
	class RemoteProgressStatus: MarshalByRefObject, IProgressStatus
	{
		IProgressStatus local;
		StringCollection progessLog = new StringCollection ();
		
		public RemoteProgressStatus (IProgressStatus local)
		{
			this.local = local;
		}
		
		public StringCollection ProgessLog {
			get { return progessLog; }
		}
		
		public override object InitializeLifetimeService ()
		{
			return null;
		}
		
		public void SetMessage (string msg)
		{
			local.SetMessage (msg);
		}
		
		public void SetProgress (double progress)
		{
			local.SetProgress (progress);
		}
		
		public void Log (string msg)
		{
			if (msg.StartsWith ("plog:"))
				progessLog.Add (msg.Substring (5));
			else
				local.Log (msg);
		}
		
		public void ReportWarning (string message)
		{
			local.ReportWarning (message);
		}
		
		public void ReportError (string message, Exception exception)
		{
			local.ReportError (message, exception);
		}
		
		public void Cancel ()
		{
			local.Cancel ();
		}
		
		public int LogLevel {
			get {
				return local.LogLevel;
			}
		}
		
		public bool IsCanceled {
			get {
				return local.IsCanceled;
			}
		}
	}
}