/// <summary>
/// Initializes a new Windows Script engine instance with the specified list of supported file name extensions and synchronous invoker.
/// </summary>
/// <param name="progID">The programmatic identifier (ProgID) of the Windows Script engine class.</param>
/// <param name="name">A name to associate with the instance. Currently this name is used only as a label in presentation contexts such as debugger user interfaces.</param>
/// <param name="fileNameExtensions">A semicolon-delimited list of supported file name extensions.</param>
/// <param name="flags">A value that selects options for the operation.</param>
/// <param name="syncInvoker">An object that enforces thread affinity for the instance.</param>
/// <remarks>
/// The <paramref name="progID"/> argument can be a class identifier (CLSID) in standard
/// GUID format with braces (e.g., "{F414C260-6AC0-11CF-B6D1-00AA00BBBB58}").
/// </remarks>
protected WindowsScriptEngine(string progID, string name, string fileNameExtensions, WindowsScriptEngineFlags flags, ISyncInvoker syncInvoker)
: base(name, fileNameExtensions)
{
MiscHelpers.VerifyNonNullArgument(syncInvoker, nameof(syncInvoker));
this.syncInvoker = syncInvoker;
script = base.ScriptInvoke(() =>
{
activeScript = ActiveScriptWrapper.Create(progID, flags);
engineFlags = flags;
if (flags.HasFlag(WindowsScriptEngineFlags.EnableDebugging) && ProcessDebugManagerWrapper.TryCreate(out processDebugManager))
{
processDebugManager.CreateApplication(out debugApplication);
debugApplication.SetName(Name);
if (processDebugManager.TryAddApplication(debugApplication, out debugApplicationCookie))
{
sourceManagement = !flags.HasFlag(WindowsScriptEngineFlags.DisableSourceManagement);
}
else
{
debugApplication.Close();
debugApplication = null;
processDebugManager = null;
}
}
activeScript.SetScriptSite(new ScriptSite(this));
activeScript.InitNew();
activeScript.SetScriptState(ScriptState.Started);
return(WindowsScriptItem.Wrap(this, GetScriptDispatch()));
});
}
private object MarshalToHostInternal(object obj, bool preserveHostTarget, HashSet <Array> marshaledArraySet)
{
if (obj == null)
{
return(UndefinedImportValue);
}
if (obj is DBNull)
{
return(null);
}
if (MiscHelpers.TryMarshalPrimitiveToHost(obj, DisableFloatNarrowing, out var result))
{
return(result);
}
if (obj is Array array)
{
// COM interop converts VBScript arrays to managed arrays
bool alreadyMarshaled;
if (marshaledArraySet != null)
{
alreadyMarshaled = marshaledArraySet.Contains(array);
}
else
{
marshaledArraySet = new HashSet <Array>();
alreadyMarshaled = false;
}
if (!alreadyMarshaled)
{
marshaledArraySet.Add(array);
array.Iterate(indices => array.SetValue(MarshalToHostInternal(array.GetValue(indices), preserveHostTarget, marshaledArraySet), indices));
}
return(array);
}
if (obj is HostTarget hostTarget)
{
return(preserveHostTarget ? hostTarget : hostTarget.Target);
}
if (obj is HostItem hostItem)
{
return(preserveHostTarget ? hostItem.Target : hostItem.Unwrap());
}
if (obj is ScriptItem)
{
return(obj);
}
return(WindowsScriptItem.Wrap(this, obj));
}