private static Table CreateModuleNamespace(Table gtable, Type t)
{
MoonSharpModuleAttribute attr = (MoonSharpModuleAttribute)(Framework.Do.GetCustomAttributes(t, typeof(MoonSharpModuleAttribute), false).First());
if (string.IsNullOrEmpty(attr.Namespace))
{
return(gtable);
}
else
{
Table table = null;
DynValue found = gtable.Get(attr.Namespace);
if (found.Type == DataType.Table)
{
table = found.Table;
}
else
{
table = new Table(gtable.OwnerScript);
gtable.Set(attr.Namespace, DynValue.NewTable(table));
}
DynValue package = gtable.RawGet("package");
if (package == null || package.Type != DataType.Table)
{
gtable.Set("package", package = DynValue.NewTable(gtable.OwnerScript));
}
DynValue loaded = package.Table.RawGet("loaded");
if (loaded == null || loaded.Type != DataType.Table)
{
package.Table.Set("loaded", loaded = DynValue.NewTable(gtable.OwnerScript));
}
loaded.Table.Set(attr.Namespace, DynValue.NewTable(table));
return(table);
}
}
/// <summary>
/// Registers the standard constants (_G, _VERSION, _MOONSHARP) to a table
/// </summary>
/// <param name="table">The table.</param>
/// <returns></returns>
public static Table RegisterConstants(this Table table)
{
DynValue moonsharp_table = DynValue.NewTable(table.OwnerScript);
Table m = moonsharp_table.Table;
table.Set("_G", DynValue.NewTable(table));
table.Set("_VERSION", DynValue.NewString(string.Format("MoonSharp {0}", Script.VERSION)));
table.Set("_MOONSHARP", moonsharp_table);
m.Set("version", DynValue.NewString(Script.VERSION));
m.Set("luacompat", DynValue.NewString(Script.LUA_VERSION));
//m.Set("platform", DynValue.NewString(Script.GlobalOptions.Platform.GetPlatformName()));
//m.Set("is_aot", DynValue.NewBoolean(Script.GlobalOptions.Platform.IsRunningOnAOT()));
//m.Set("is_unity", DynValue.NewBoolean(PlatformAutoDetector.IsRunningOnUnity));
//m.Set("is_mono", DynValue.NewBoolean(PlatformAutoDetector.IsRunningOnMono));
//m.Set("is_clr4", DynValue.NewBoolean(PlatformAutoDetector.IsRunningOnClr4));
//m.Set("is_pcl", DynValue.NewBoolean(PlatformAutoDetector.IsPortableFramework));
m.Set("banner", DynValue.NewString(Script.GetBanner()));
return(table);
}
///// <summary>
///// Loads and executes a stream containing a Lua/MoonSharp script.
///// </summary>
///// <param name="stream">The stream.</param>
///// <param name="globalContext">The global context.</param>
///// <param name="codeFriendlyName">Name of the code - used to report errors, etc. Also used by debuggers to locate the original source file.</param>
///// <returns>
///// A DynValue containing the result of the processing of the loaded chunk.
///// </returns>
//public DynValue DoStream(Stream stream, Table globalContext = null, string codeFriendlyName = null)
//{
// DynValue func = LoadStream(stream, globalContext, codeFriendlyName);
// return Call(func);
//}
///// <summary>
///// Loads and executes a file containing a Lua/MoonSharp script.
///// </summary>
///// <param name="filename">The filename.</param>
///// <param name="globalContext">The global context.</param>
///// <param name="codeFriendlyName">Name of the code - used to report errors, etc. Also used by debuggers to locate the original source file.</param>
///// <returns>
///// A DynValue containing the result of the processing of the loaded chunk.
///// </returns>
//public DynValue DoFile(string filename, Table globalContext = null, string codeFriendlyName = null)
//{
// DynValue func = LoadFile(filename, globalContext, codeFriendlyName);
// return Call(func);
//}
///// <summary>
///// Runs the specified file with all possible defaults for quick experimenting.
///// </summary>
///// <param name="filename">The filename.</param>
///// A DynValue containing the result of the processing of the executed script.
//public static DynValue RunFile(string filename)
//{
// Script S = new Script();
// return S.DoFile(filename);
//}
///// <summary>
///// Runs the specified code with all possible defaults for quick experimenting.
///// </summary>
///// <param name="code">The Lua/MoonSharp code.</param>
///// A DynValue containing the result of the processing of the executed script.
//public static DynValue RunString(string code)
//{
// Script S = new Script();
// return S.DoString(code);
//}
/// <summary>
/// Creates a closure from a bytecode address.
/// </summary>
/// <param name="address">The address.</param>
/// <param name="envTable">The env table to create a 0-upvalue</param>
/// <returns></returns>
private DynValue MakeClosure(int address, Table envTable = null)
{
this.CheckScriptOwnership(envTable);
Closure c;
if (envTable == null)
{
Instruction meta = m_MainProcessor.FindMeta(ref address);
// if we find the meta for a new chunk, we use the value in the meta for the _ENV upvalue
if ((meta != null) && (meta.NumVal2 == (int)OpCodeMetadataType.ChunkEntrypoint))
{
c = new Closure(this, address,
new SymbolRef[] { SymbolRef.Upvalue(WellKnownSymbols.ENV, 0) },
new DynValue[] { meta.Value });
}
else
{
c = new Closure(this, address, new SymbolRef[0], new DynValue[0]);
}
}
else
{
var syms = new SymbolRef[] {
new SymbolRef()
{
i_Env = null, i_Index = 0, i_Name = WellKnownSymbols.ENV, i_Type = SymbolRefType.DefaultEnv
},
};
var vals = new DynValue[] {
DynValue.NewTable(envTable)
};
c = new Closure(this, address, syms, vals);
}
return(DynValue.NewClosure(c));
}
