246 lines
11 KiB
C#
246 lines
11 KiB
C#
/*
|
|
* Copyright (c) Contributors, http://opensimulator.org/
|
|
* See CONTRIBUTORS.TXT for a full list of copyright holders.
|
|
*
|
|
* 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 OpenSimulator Project 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 THE DEVELOPERS ``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 THE CONTRIBUTORS 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 OpenSim.Region.ScriptEngine.Yengine;
|
|
using System;
|
|
using System.Collections.Generic;
|
|
using System.IO;
|
|
using System.Reflection;
|
|
using System.Reflection.Emit;
|
|
|
|
namespace OpenSim.Region.ScriptEngine.Yengine
|
|
{
|
|
public delegate void ScriptEventHandler(XMRInstAbstract instance);
|
|
|
|
/*
|
|
* This object represents the output of the compilation.
|
|
* Once the compilation is complete, its contents should be
|
|
* considered 'read-only', so it can be shared among multiple
|
|
* instances of the script.
|
|
*
|
|
* It gets created by ScriptCodeGen.
|
|
* It gets used by XMRInstance to create script instances.
|
|
*/
|
|
public class ScriptObjCode
|
|
{
|
|
public string sourceHash; // source text hash code
|
|
public XMRInstArSizes glblSizes = new XMRInstArSizes();
|
|
// number of global variables of various types
|
|
|
|
public string[] stateNames; // convert state number to corresponding string
|
|
public ScriptEventHandler[,] scriptEventHandlerTable;
|
|
// entrypoints to all event handler functions
|
|
// 1st subscript = state code number (0=default)
|
|
// 2nd subscript = event code number
|
|
// null entry means no handler defined for that state,event
|
|
|
|
public Dictionary<string, TokenDeclSDType> sdObjTypesName;
|
|
// all script-defined types by name
|
|
|
|
public TokenDeclSDType[] sdObjTypesIndx;
|
|
// all script-defined types by sdTypeIndex
|
|
|
|
public Dictionary<Type, string> sdDelTypes;
|
|
// all script-defined delegates (including anonymous)
|
|
|
|
public Dictionary<string, DynamicMethod> dynamicMethods;
|
|
// all dyanmic methods
|
|
|
|
public Dictionary<string, KeyValuePair<int, ScriptSrcLoc>[]> scriptSrcLocss;
|
|
// method,iloffset -> source file,line,posn
|
|
|
|
public int refCount; // used by engine to keep track of number of
|
|
// instances that are using this object code
|
|
|
|
public Dictionary<string, Dictionary<int, string>> globalVarNames = new Dictionary<string, Dictionary<int, string>>();
|
|
|
|
/**
|
|
* @brief Fill in ScriptObjCode from an YEngine object file.
|
|
* 'objFileReader' is a serialized form of the CIL code we generated
|
|
* 'asmFileWriter' is where we write the disassembly to (or null if not wanted)
|
|
* 'srcFileWriter' is where we write the decompilation to (or null if not wanted)
|
|
* Throws an exception if there is any error (theoretically).
|
|
*/
|
|
public ScriptObjCode(BinaryReader objFileReader, TextWriter asmFileWriter, TextWriter srcFileWriter)
|
|
{
|
|
/*
|
|
* Check version number to make sure we know how to process file contents.
|
|
*/
|
|
char[] ocm = objFileReader.ReadChars(ScriptCodeGen.OBJECT_CODE_MAGIC.Length);
|
|
if(new String(ocm) != ScriptCodeGen.OBJECT_CODE_MAGIC)
|
|
throw new Exception("not an XMR object file (bad magic)");
|
|
|
|
int cvv = objFileReader.ReadInt32();
|
|
if(cvv != ScriptCodeGen.COMPILED_VERSION_VALUE)
|
|
throw new CVVMismatchException(cvv, ScriptCodeGen.COMPILED_VERSION_VALUE);
|
|
|
|
// Fill in simple parts of scriptObjCode object.
|
|
sourceHash = objFileReader.ReadString();
|
|
glblSizes.ReadFromFile(objFileReader);
|
|
int nStates = objFileReader.ReadInt32();
|
|
|
|
stateNames = new string[nStates];
|
|
for(int i = 0; i < nStates; i++)
|
|
{
|
|
stateNames[i] = objFileReader.ReadString();
|
|
if(asmFileWriter != null)
|
|
asmFileWriter.WriteLine(" state[{0}] = {1}", i, stateNames[i]);
|
|
}
|
|
|
|
if(asmFileWriter != null)
|
|
glblSizes.WriteAsmFile(asmFileWriter, "numGbl");
|
|
|
|
string gblName;
|
|
while((gblName = objFileReader.ReadString()) != "")
|
|
{
|
|
string gblType = objFileReader.ReadString();
|
|
int gblIndex = objFileReader.ReadInt32();
|
|
Dictionary<int, string> names;
|
|
if(!globalVarNames.TryGetValue(gblType, out names))
|
|
{
|
|
names = new Dictionary<int, string>();
|
|
globalVarNames.Add(gblType, names);
|
|
}
|
|
names.Add(gblIndex, gblName);
|
|
if(asmFileWriter != null)
|
|
asmFileWriter.WriteLine(" {0} = {1}[{2}]", gblName, gblType, gblIndex);
|
|
}
|
|
|
|
// Read in script-defined types.
|
|
sdObjTypesName = new Dictionary<string, TokenDeclSDType>();
|
|
sdDelTypes = new Dictionary<Type, string>();
|
|
int maxIndex = -1;
|
|
while((gblName = objFileReader.ReadString()) != "")
|
|
{
|
|
TokenDeclSDType sdt = TokenDeclSDType.ReadFromFile(sdObjTypesName,
|
|
gblName, objFileReader, asmFileWriter);
|
|
sdObjTypesName.Add(gblName, sdt);
|
|
if(maxIndex < sdt.sdTypeIndex)
|
|
maxIndex = sdt.sdTypeIndex;
|
|
if(sdt is TokenDeclSDTypeDelegate)
|
|
sdDelTypes.Add(sdt.GetSysType(), gblName);
|
|
}
|
|
sdObjTypesIndx = new TokenDeclSDType[maxIndex + 1];
|
|
foreach(TokenDeclSDType sdt in sdObjTypesName.Values)
|
|
sdObjTypesIndx[sdt.sdTypeIndex] = sdt;
|
|
|
|
// Now fill in the methods (the hard part).
|
|
scriptEventHandlerTable = new ScriptEventHandler[nStates, (int)ScriptEventCode.Size];
|
|
dynamicMethods = new Dictionary<string, DynamicMethod>();
|
|
scriptSrcLocss = new Dictionary<string, KeyValuePair<int, ScriptSrcLoc>[]>();
|
|
|
|
ObjectTokens objectTokens = null;
|
|
if(asmFileWriter != null)
|
|
objectTokens = new OTDisassemble(this, asmFileWriter);
|
|
else if(srcFileWriter != null)
|
|
objectTokens = new OTDecompile(this, srcFileWriter);
|
|
|
|
try
|
|
{
|
|
ScriptObjWriter.CreateObjCode(sdObjTypesName, objFileReader, this, objectTokens);
|
|
}
|
|
finally
|
|
{
|
|
if(objectTokens != null)
|
|
objectTokens.Close();
|
|
}
|
|
|
|
// We enter all script event handler methods in the ScriptEventHandler table.
|
|
// They are named: <statename> <eventname>
|
|
foreach(KeyValuePair<string, DynamicMethod> kvp in dynamicMethods)
|
|
{
|
|
string methName = kvp.Key;
|
|
int i = methName.IndexOf(' ');
|
|
if(i < 0)
|
|
continue;
|
|
string stateName = methName.Substring(0, i);
|
|
string eventName = methName.Substring(++i);
|
|
int stateCode;
|
|
for(stateCode = stateNames.Length; --stateCode >= 0;)
|
|
if(stateNames[stateCode] == stateName)
|
|
break;
|
|
|
|
int eventCode = (int)Enum.Parse(typeof(ScriptEventCode), eventName);
|
|
scriptEventHandlerTable[stateCode, eventCode] =
|
|
(ScriptEventHandler)kvp.Value.CreateDelegate(typeof(ScriptEventHandler));
|
|
}
|
|
|
|
// Fill in all script-defined class vtables.
|
|
foreach(TokenDeclSDType sdt in sdObjTypesIndx)
|
|
{
|
|
if((sdt != null) && (sdt is TokenDeclSDTypeClass))
|
|
{
|
|
TokenDeclSDTypeClass sdtc = (TokenDeclSDTypeClass)sdt;
|
|
sdtc.FillVTables(this);
|
|
}
|
|
}
|
|
}
|
|
|
|
/**
|
|
* @brief Called once for every method found in objFileReader file.
|
|
* It enters the method in the ScriptObjCode object table so it can be called.
|
|
*/
|
|
public void EndMethod(DynamicMethod method, Dictionary<int, ScriptSrcLoc> srcLocs)
|
|
{
|
|
/*
|
|
* Save method object code pointer.
|
|
*/
|
|
dynamicMethods.Add(method.Name, method);
|
|
|
|
/*
|
|
* Build and sort iloffset -> source code location array.
|
|
*/
|
|
int n = srcLocs.Count;
|
|
KeyValuePair<int, ScriptSrcLoc>[] srcLocArray = new KeyValuePair<int, ScriptSrcLoc>[n];
|
|
n = 0;
|
|
foreach(KeyValuePair<int, ScriptSrcLoc> kvp in srcLocs)
|
|
srcLocArray[n++] = kvp;
|
|
Array.Sort(srcLocArray, endMethodWrapper);
|
|
|
|
/*
|
|
* Save sorted array.
|
|
*/
|
|
scriptSrcLocss.Add(method.Name, srcLocArray);
|
|
}
|
|
|
|
/**
|
|
* @brief Called once for every method found in objFileReader file.
|
|
* It enters the method in the ScriptObjCode object table so it can be called.
|
|
*/
|
|
private static EndMethodWrapper endMethodWrapper = new EndMethodWrapper();
|
|
private class EndMethodWrapper: System.Collections.IComparer
|
|
{
|
|
public int Compare(object x, object y)
|
|
{
|
|
KeyValuePair<int, ScriptSrcLoc> kvpx = (KeyValuePair<int, ScriptSrcLoc>)x;
|
|
KeyValuePair<int, ScriptSrcLoc> kvpy = (KeyValuePair<int, ScriptSrcLoc>)y;
|
|
return kvpx.Key - kvpy.Key;
|
|
}
|
|
}
|
|
}
|
|
}
|