* Adding LSL stuff for Tedd_, implementing LSL-style functions in ScriptAPI.cs, implementing server event callbacks in ScriptInterpretedEvents.cs
* Added Tedd_'s LSL compiler thingie, although it cannot be referenced yet.afrisby
Adam Frisby
parent
540549bd89
commit
9be896c8ce
|
|
@ -0,0 +1,140 @@
|
||||||
|
using System;
|
||||||
|
using System.Reflection;
|
||||||
|
using System.Reflection.Emit;
|
||||||
|
using System.Threading;
|
||||||
|
|
||||||
|
using OpenSim.Region.Environment.Scripting;
|
||||||
|
|
||||||
|
namespace OpenSim.ScriptEngines.LSL
|
||||||
|
{
|
||||||
|
|
||||||
|
|
||||||
|
public class Engine
|
||||||
|
{
|
||||||
|
public void Start(ScriptInfo WorldAPI)
|
||||||
|
{
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
// Create Assembly Name
|
||||||
|
AssemblyName asmName = new AssemblyName();
|
||||||
|
asmName.Name = "TestAssembly";
|
||||||
|
|
||||||
|
// Create Assembly
|
||||||
|
AssemblyBuilder asmBuilder =
|
||||||
|
Thread.GetDomain().DefineDynamicAssembly
|
||||||
|
(asmName, AssemblyBuilderAccess.RunAndSave);
|
||||||
|
|
||||||
|
// Create a module (and save to disk)
|
||||||
|
ModuleBuilder modBuilder = asmBuilder.DefineDynamicModule
|
||||||
|
(asmName.Name, asmName.Name + ".dll");
|
||||||
|
|
||||||
|
// Create a Class (/Type)
|
||||||
|
TypeBuilder typeBuilder = modBuilder.DefineType(
|
||||||
|
"MyClass",
|
||||||
|
TypeAttributes.Public,
|
||||||
|
typeof(object),
|
||||||
|
new Type[] { typeof(LSL_CLRInterface.LSLScript) });
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Generate the IL itself
|
||||||
|
*/
|
||||||
|
|
||||||
|
GenerateIL(WorldAPI, typeBuilder);
|
||||||
|
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Done generating, create a type and run it.
|
||||||
|
*/
|
||||||
|
|
||||||
|
// Create type object for the class (after defining fields and methods)
|
||||||
|
Type type = typeBuilder.CreateType();
|
||||||
|
|
||||||
|
asmBuilder.Save("TestAssembly.dll");
|
||||||
|
|
||||||
|
// Create an instance we can play with
|
||||||
|
//LSLScript hello = (LSLScript)Activator.CreateInstance(type);
|
||||||
|
LSL_CLRInterface.LSLScript MyScript = (LSL_CLRInterface.LSLScript)Activator.CreateInstance(type);
|
||||||
|
|
||||||
|
// Play with it
|
||||||
|
MyScript.event_state_entry("Test");
|
||||||
|
}
|
||||||
|
|
||||||
|
private void GenerateIL(ScriptInfo WorldAPI, TypeBuilder typeBuilder)
|
||||||
|
{
|
||||||
|
|
||||||
|
|
||||||
|
// For debug
|
||||||
|
LSO_Parser LSOP = new LSO_Parser();
|
||||||
|
LSOP.ParseFile("LSO\\CloseToDefault.lso", WorldAPI, ref typeBuilder);
|
||||||
|
return;
|
||||||
|
|
||||||
|
|
||||||
|
// Override a Method / Function
|
||||||
|
MethodBuilder methodBuilder = typeBuilder.DefineMethod("event_state_entry",
|
||||||
|
MethodAttributes.Private | MethodAttributes.Virtual,
|
||||||
|
typeof(void),
|
||||||
|
new Type[] { typeof(object) });
|
||||||
|
|
||||||
|
typeBuilder.DefineMethodOverride(methodBuilder,
|
||||||
|
typeof(LSL_CLRInterface.LSLScript).GetMethod("event_state_entry"));
|
||||||
|
|
||||||
|
// Create the IL generator
|
||||||
|
ILGenerator il = methodBuilder.GetILGenerator();
|
||||||
|
|
||||||
|
|
||||||
|
/*
|
||||||
|
* TRY
|
||||||
|
*/
|
||||||
|
il.BeginExceptionBlock();
|
||||||
|
|
||||||
|
// Push "Hello World!" string to stack
|
||||||
|
il.Emit(OpCodes.Ldstr, "Hello World!");
|
||||||
|
|
||||||
|
// Push Console.WriteLine command to stack ... Console.WriteLine("Hello World!");
|
||||||
|
il.Emit(OpCodes.Call, typeof(Console).GetMethod
|
||||||
|
("WriteLine", new Type[] { typeof(string) }));
|
||||||
|
|
||||||
|
//il.EmitCall(OpCodes.Callvirt
|
||||||
|
//il.Emit(OpCodes.Call, typeof(WorldAPI).GetMethod
|
||||||
|
//("TestFunction"));
|
||||||
|
|
||||||
|
|
||||||
|
//il.ThrowException(typeof(NotSupportedException));
|
||||||
|
|
||||||
|
|
||||||
|
/*
|
||||||
|
* CATCH
|
||||||
|
*/
|
||||||
|
il.BeginCatchBlock(typeof(Exception));
|
||||||
|
|
||||||
|
// Push "Hello World!" string to stack
|
||||||
|
il.Emit(OpCodes.Ldstr, "Something went wrong: ");
|
||||||
|
|
||||||
|
//call void [mscorlib]System.Console::WriteLine(string)
|
||||||
|
il.Emit(OpCodes.Call, typeof(Console).GetMethod
|
||||||
|
("Write", new Type[] { typeof(string) }));
|
||||||
|
|
||||||
|
//callvirt instance string [mscorlib]System.Exception::get_Message()
|
||||||
|
il.Emit(OpCodes.Callvirt, typeof(Exception).GetMethod
|
||||||
|
("get_Message"));
|
||||||
|
|
||||||
|
//call void [mscorlib]System.Console::WriteLine(string)
|
||||||
|
il.Emit(OpCodes.Call, typeof(Console).GetMethod
|
||||||
|
("WriteLine", new Type[] { typeof(string) }));
|
||||||
|
|
||||||
|
/*
|
||||||
|
* END TRY
|
||||||
|
*/
|
||||||
|
il.EndExceptionBlock();
|
||||||
|
|
||||||
|
|
||||||
|
// Push "Return from current method, with return value if present" to stack
|
||||||
|
il.Emit(OpCodes.Ret);
|
||||||
|
|
||||||
|
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
@ -0,0 +1,51 @@
|
||||||
|
using System;
|
||||||
|
using System.Collections.Generic;
|
||||||
|
using System.Text;
|
||||||
|
|
||||||
|
namespace OpenSim.ScriptEngines.LSL
|
||||||
|
{
|
||||||
|
public class LSL_CLRInterface
|
||||||
|
{
|
||||||
|
public interface LSLScript
|
||||||
|
{
|
||||||
|
//public virtual void Run(object arg)
|
||||||
|
//{
|
||||||
|
//}
|
||||||
|
//void Run(object arg);
|
||||||
|
|
||||||
|
void event_state_entry(object arg);
|
||||||
|
//void event_state_exit();
|
||||||
|
void event_touch_start(object arg);
|
||||||
|
//void event_touch();
|
||||||
|
//void event_touch_end();
|
||||||
|
//void event_collision_start();
|
||||||
|
//void event_collision();
|
||||||
|
//void event_collision_end();
|
||||||
|
//void event_land_collision_start();
|
||||||
|
//void event_land_collision();
|
||||||
|
//void event_land_collision_end();
|
||||||
|
//void event_timer();
|
||||||
|
//void event_listen();
|
||||||
|
//void event_on_rez();
|
||||||
|
//void event_sensor();
|
||||||
|
//void event_no_sensor();
|
||||||
|
//void event_control();
|
||||||
|
//void event_money();
|
||||||
|
//void event_email();
|
||||||
|
//void event_at_target();
|
||||||
|
//void event_not_at_target();
|
||||||
|
//void event_at_rot_target();
|
||||||
|
//void event_not_at_rot_target();
|
||||||
|
//void event_run_time_permissions();
|
||||||
|
//void event_changed();
|
||||||
|
//void event_attach();
|
||||||
|
//void event_dataserver();
|
||||||
|
//void event_link_message();
|
||||||
|
//void event_moving_start();
|
||||||
|
//void event_moving_end();
|
||||||
|
//void event_object_rez();
|
||||||
|
//void event_remote_data();
|
||||||
|
//void event_http_response();
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
@ -0,0 +1,485 @@
|
||||||
|
using System;
|
||||||
|
using System.Collections.Generic;
|
||||||
|
using System.Text;
|
||||||
|
|
||||||
|
namespace OpenSim.ScriptEngines.LSL
|
||||||
|
{
|
||||||
|
static class LSO_Enums
|
||||||
|
{
|
||||||
|
|
||||||
|
public enum Variable_Type_Codes
|
||||||
|
{
|
||||||
|
Void = 0,
|
||||||
|
Integer = 1,
|
||||||
|
Float = 2,
|
||||||
|
String = 3,
|
||||||
|
Key = 4,
|
||||||
|
Vector = 5,
|
||||||
|
Rotation = 6,
|
||||||
|
List = 7
|
||||||
|
}
|
||||||
|
public enum Event_Mask_Values
|
||||||
|
{
|
||||||
|
state_entry = 0,
|
||||||
|
state_exit = 1,
|
||||||
|
touch_start = 2,
|
||||||
|
touch = 3,
|
||||||
|
touch_end = 4,
|
||||||
|
collision_start = 5,
|
||||||
|
collision = 6,
|
||||||
|
collision_end = 7,
|
||||||
|
land_collision_start = 8,
|
||||||
|
land_collision = 9,
|
||||||
|
land_collision_end = 10,
|
||||||
|
timer = 11,
|
||||||
|
listen = 12,
|
||||||
|
on_rez = 13,
|
||||||
|
sensor = 14,
|
||||||
|
no_sensor = 15,
|
||||||
|
control = 16,
|
||||||
|
money = 17,
|
||||||
|
email = 18,
|
||||||
|
at_target = 19,
|
||||||
|
not_at_target = 20,
|
||||||
|
at_rot_target = 21,
|
||||||
|
not_at_rot_target = 22,
|
||||||
|
run_time_permissions = 23,
|
||||||
|
changed = 24,
|
||||||
|
attach = 25,
|
||||||
|
dataserver = 26,
|
||||||
|
link_message = 27,
|
||||||
|
moving_start = 28,
|
||||||
|
moving_end = 29,
|
||||||
|
object_rez = 30,
|
||||||
|
remote_data = 31,
|
||||||
|
http_response = 32
|
||||||
|
}
|
||||||
|
public enum Operation_Table
|
||||||
|
{
|
||||||
|
NOOP = 0x0,
|
||||||
|
POP = 0x1,
|
||||||
|
POPS = 0x2,
|
||||||
|
POPL = 0x3,
|
||||||
|
POPV = 0x4,
|
||||||
|
POPQ = 0x5,
|
||||||
|
POPARG = 0x6,
|
||||||
|
POPIP = 0x7,
|
||||||
|
POPBP = 0x8,
|
||||||
|
POPSP = 0x9,
|
||||||
|
POPSLR = 0xa,
|
||||||
|
DUP = 0x20,
|
||||||
|
DUPS = 0x21,
|
||||||
|
DUPL = 0x22,
|
||||||
|
DUPV = 0x23,
|
||||||
|
DUPQ = 0x24,
|
||||||
|
STORE = 0x30,
|
||||||
|
STORES = 0x31,
|
||||||
|
STOREL = 0x32,
|
||||||
|
STOREV = 0x33,
|
||||||
|
STOREQ = 0x34,
|
||||||
|
STOREG = 0x35,
|
||||||
|
STOREGS = 0x36,
|
||||||
|
STOREGL = 0x37,
|
||||||
|
STOREGV = 0x38,
|
||||||
|
STOREGQ = 0x39,
|
||||||
|
LOADP = 0x3a,
|
||||||
|
LOADSP = 0x3b,
|
||||||
|
LOADLP = 0x3c,
|
||||||
|
LOADVP = 0x3d,
|
||||||
|
LOADQP = 0x3e,
|
||||||
|
LOADGP = 0x3f,
|
||||||
|
LOADGSP = 0x40,
|
||||||
|
LOADGLP = 0x41,
|
||||||
|
LOADGVP = 0x42,
|
||||||
|
LOADGQP = 0x43,
|
||||||
|
PUSH = 0x50,
|
||||||
|
PUSHS = 0x51,
|
||||||
|
PUSHL = 0x52,
|
||||||
|
PUSHV = 0x53,
|
||||||
|
PUSHQ = 0x54,
|
||||||
|
PUSHG = 0x55,
|
||||||
|
PUSHGS = 0x56,
|
||||||
|
PUSHGL = 0x57,
|
||||||
|
PUSHGV = 0x58,
|
||||||
|
PUSHGQ = 0x59,
|
||||||
|
PUSHIP = 0x5a,
|
||||||
|
PUSHBP = 0x5b,
|
||||||
|
PUSHSP = 0x5c,
|
||||||
|
PUSHARGB = 0x5d,
|
||||||
|
PUSHARGI = 0x5e,
|
||||||
|
PUSHARGF = 0x5f,
|
||||||
|
PUSHARGS = 0x60,
|
||||||
|
PUSHARGV = 0x61,
|
||||||
|
PUSHARGQ = 0x62,
|
||||||
|
PUSHE = 0x63,
|
||||||
|
PUSHEV = 0x64,
|
||||||
|
PUSHEQ = 0x65,
|
||||||
|
PUSHARGE = 0x66,
|
||||||
|
ADD = 0x70,
|
||||||
|
SUB = 0x71,
|
||||||
|
MUL = 0x72,
|
||||||
|
DIV = 0x73,
|
||||||
|
MOD = 0x74,
|
||||||
|
EQ = 0x75,
|
||||||
|
NEQ = 0x76,
|
||||||
|
LEQ = 0x77,
|
||||||
|
GEQ = 0x78,
|
||||||
|
LESS = 0x79,
|
||||||
|
GREATER = 0x7a,
|
||||||
|
BITAND = 0x7b,
|
||||||
|
BITOR = 0x7c,
|
||||||
|
BITXOR = 0x7d,
|
||||||
|
BOOLAND = 0x7e,
|
||||||
|
BOOLOR = 0x7f,
|
||||||
|
NEG = 0x80,
|
||||||
|
BITNOT = 0x81,
|
||||||
|
BOOLNOT = 0x82,
|
||||||
|
JUMP = 0x90,
|
||||||
|
JUMPIF = 0x91,
|
||||||
|
JUMPNIF = 0x92,
|
||||||
|
STATE = 0x93,
|
||||||
|
CALL = 0x94,
|
||||||
|
RETURN = 0x95,
|
||||||
|
CAST = 0xa0,
|
||||||
|
STACKTOS = 0xb0,
|
||||||
|
STACKTOL = 0xb1,
|
||||||
|
PRINT = 0xc0,
|
||||||
|
CALLLIB = 0xd0,
|
||||||
|
CALLLIB_TWO_BYTE = 0xd1,
|
||||||
|
SHL = 0xe0,
|
||||||
|
SHR = 0xe1
|
||||||
|
}
|
||||||
|
public enum BuiltIn_Functions
|
||||||
|
{
|
||||||
|
llSin = 0,
|
||||||
|
llCos = 1,
|
||||||
|
llTan = 2,
|
||||||
|
llAtan2 = 3,
|
||||||
|
llSqrt = 4,
|
||||||
|
llPow = 5,
|
||||||
|
llAbs = 6,
|
||||||
|
llFabs = 7,
|
||||||
|
llFrand = 8,
|
||||||
|
llFloor = 9,
|
||||||
|
llCeil = 10,
|
||||||
|
llRound = 11,
|
||||||
|
llVecMag = 12,
|
||||||
|
llVecNorm = 13,
|
||||||
|
llVecDist = 14,
|
||||||
|
llRot2Euler = 15,
|
||||||
|
llEuler2Rot = 16,
|
||||||
|
llAxes2Rot = 17,
|
||||||
|
llRot2Fwd = 18,
|
||||||
|
llRot2Left = 19,
|
||||||
|
llRot2Up = 20,
|
||||||
|
llRotBetween = 21,
|
||||||
|
llWhisper = 22,
|
||||||
|
llSay = 23,
|
||||||
|
llShout = 24,
|
||||||
|
llListen = 25,
|
||||||
|
llListenControl = 26,
|
||||||
|
llListenRemove = 27,
|
||||||
|
llSensor = 28,
|
||||||
|
llSensorRepeat = 29,
|
||||||
|
llSensorRemove = 30,
|
||||||
|
llDetectedName = 31,
|
||||||
|
llDetectedKey = 32,
|
||||||
|
llDetectedOwner = 33,
|
||||||
|
llDetectedType = 34,
|
||||||
|
llDetectedPos = 35,
|
||||||
|
llDetectedVel = 36,
|
||||||
|
llDetectedGrab = 37,
|
||||||
|
llDetectedRot = 38,
|
||||||
|
llDetectedGroup = 39,
|
||||||
|
llDetectedLinkNumber = 40,
|
||||||
|
llDie = 41,
|
||||||
|
llGround = 42,
|
||||||
|
llCloud = 43,
|
||||||
|
llWind = 44,
|
||||||
|
llSetStatus = 45,
|
||||||
|
llGetStatus = 46,
|
||||||
|
llSetScale = 47,
|
||||||
|
llGetScale = 48,
|
||||||
|
llSetColor = 49,
|
||||||
|
llGetAlpha = 50,
|
||||||
|
llSetAlpha = 51,
|
||||||
|
llGetColor = 52,
|
||||||
|
llSetTexture = 53,
|
||||||
|
llScaleTexture = 54,
|
||||||
|
llOffsetTexture = 55,
|
||||||
|
llRotateTexture = 56,
|
||||||
|
llGetTexture = 57,
|
||||||
|
llSetPos = 58,
|
||||||
|
llGetPos = 59,
|
||||||
|
llGetLocalPos = 60,
|
||||||
|
llSetRot = 61,
|
||||||
|
llGetRot = 62,
|
||||||
|
llGetLocalRot = 63,
|
||||||
|
llSetForce = 64,
|
||||||
|
llGetForce = 65,
|
||||||
|
llTarget = 66,
|
||||||
|
llTargetRemove = 67,
|
||||||
|
llRotTarget = 68,
|
||||||
|
llRotTargetRemove = 69,
|
||||||
|
llMoveToTarget = 70,
|
||||||
|
llStopMoveToTarget = 71,
|
||||||
|
llApplyImpulse = 72,
|
||||||
|
llApplyRotationalImpulse = 73,
|
||||||
|
llSetTorque = 74,
|
||||||
|
llGetTorque = 75,
|
||||||
|
llSetForceAndTorque = 76,
|
||||||
|
llGetVel = 77,
|
||||||
|
llGetAccel = 78,
|
||||||
|
llGetOmega = 79,
|
||||||
|
llGetTimeOfDay = 80,
|
||||||
|
llGetWallclock = 81,
|
||||||
|
llGetTime = 82,
|
||||||
|
llResetTime = 83,
|
||||||
|
llGetAndResetTime = 84,
|
||||||
|
llSound = 85,
|
||||||
|
llPlaySound = 86,
|
||||||
|
llLoopSound = 87,
|
||||||
|
llLoopSoundMaster = 88,
|
||||||
|
llLoopSoundSlave = 89,
|
||||||
|
llPlaySoundSlave = 90,
|
||||||
|
llTriggerSound = 91,
|
||||||
|
llStopSound = 92,
|
||||||
|
llPreloadSound = 93,
|
||||||
|
llGetSubString = 94,
|
||||||
|
llDeleteSubString = 95,
|
||||||
|
llInsertString = 96,
|
||||||
|
llToUpper = 97,
|
||||||
|
llToLower = 98,
|
||||||
|
llGiveMoney = 99,
|
||||||
|
llMakeExplosion = 100,
|
||||||
|
llMakeFountain = 101,
|
||||||
|
llMakeSmoke = 102,
|
||||||
|
llMakeFire = 103,
|
||||||
|
llRezObject = 104,
|
||||||
|
llLookAt = 105,
|
||||||
|
llStopLookAt = 106,
|
||||||
|
llSetTimerEvent = 107,
|
||||||
|
llSleep = 108,
|
||||||
|
llGetMass = 109,
|
||||||
|
llCollisionFilter = 110,
|
||||||
|
llTakeControls = 111,
|
||||||
|
llReleaseControls = 112,
|
||||||
|
llAttachToAvatar = 113,
|
||||||
|
llDetachFromAvatar = 114,
|
||||||
|
llTakeCamera = 115,
|
||||||
|
llReleaseCamera = 116,
|
||||||
|
llGetOwner = 117,
|
||||||
|
llInstantMessage = 118,
|
||||||
|
llEmail = 119,
|
||||||
|
llGetNextEmail = 120,
|
||||||
|
llGetKey = 121,
|
||||||
|
llSetBuoyancy = 122,
|
||||||
|
llSetHoverHeight = 123,
|
||||||
|
llStopHover = 124,
|
||||||
|
llMinEventDelay = 125,
|
||||||
|
llSoundPreload = 126,
|
||||||
|
llRotLookAt = 127,
|
||||||
|
llStringLength = 128,
|
||||||
|
llStartAnimation = 129,
|
||||||
|
llStopAnimation = 130,
|
||||||
|
llPointAt = 131,
|
||||||
|
llStopPointAt = 132,
|
||||||
|
llTargetOmega = 133,
|
||||||
|
llGetStartParameter = 134,
|
||||||
|
llGodLikeRezObject = 135,
|
||||||
|
llRequestPermissions = 136,
|
||||||
|
llGetPermissionsKey = 137,
|
||||||
|
llGetPermissions = 138,
|
||||||
|
llGetLinkNumber = 139,
|
||||||
|
llSetLinkColor = 140,
|
||||||
|
llCreateLink = 141,
|
||||||
|
llBreakLink = 142,
|
||||||
|
llBreakAllLinks = 143,
|
||||||
|
llGetLinkKey = 144,
|
||||||
|
llGetLinkName = 145,
|
||||||
|
llGetInventoryNumber = 146,
|
||||||
|
llGetInventoryName = 147,
|
||||||
|
llSetScriptState = 148,
|
||||||
|
llGetEnergy = 149,
|
||||||
|
llGiveInventory = 150,
|
||||||
|
llRemoveInventory = 151,
|
||||||
|
llSetText = 152,
|
||||||
|
llWater = 153,
|
||||||
|
llPassTouches = 154,
|
||||||
|
llRequestAgentData = 155,
|
||||||
|
llRequestInventoryData = 156,
|
||||||
|
llSetDamage = 157,
|
||||||
|
llTeleportAgentHome = 158,
|
||||||
|
llModifyLand = 159,
|
||||||
|
llCollisionSound = 160,
|
||||||
|
llCollisionSprite = 161,
|
||||||
|
llGetAnimation = 162,
|
||||||
|
llResetScript = 163,
|
||||||
|
llMessageLinked = 164,
|
||||||
|
llPushObject = 165,
|
||||||
|
llPassCollisions = 166,
|
||||||
|
llGetScriptName = 167,
|
||||||
|
llGetNumberOfSides = 168,
|
||||||
|
llAxisAngle2Rot = 169,
|
||||||
|
llRot2Axis = 170,
|
||||||
|
llRot2Angle = 171,
|
||||||
|
llAcos = 172,
|
||||||
|
llAsin = 173,
|
||||||
|
llAngleBetween = 174,
|
||||||
|
llGetInventoryKey = 175,
|
||||||
|
llAllowInventoryDrop = 176,
|
||||||
|
llGetSunDirection = 177,
|
||||||
|
llGetTextureOffset = 178,
|
||||||
|
llGetTextureScale = 179,
|
||||||
|
llGetTextureRot = 180,
|
||||||
|
llSubStringIndex = 181,
|
||||||
|
llGetOwnerKey = 182,
|
||||||
|
llGetCenterOfMass = 183,
|
||||||
|
llListSort = 184,
|
||||||
|
llGetListLength = 185,
|
||||||
|
llList2Integer = 186,
|
||||||
|
llList2Float = 187,
|
||||||
|
llList2String = 188,
|
||||||
|
llList2Key = 189,
|
||||||
|
llList2Vector = 190,
|
||||||
|
llList2Rot = 191,
|
||||||
|
llList2List = 192,
|
||||||
|
llDeleteSubList = 193,
|
||||||
|
llGetListEntryType = 194,
|
||||||
|
llList2CSV = 195,
|
||||||
|
llCSV2List = 196,
|
||||||
|
llListRandomize = 197,
|
||||||
|
llList2ListStrided = 198,
|
||||||
|
llGetRegionCorner = 199,
|
||||||
|
llListInsertList = 200,
|
||||||
|
llListFindList = 201,
|
||||||
|
llGetObjectName = 202,
|
||||||
|
llSetObjectName = 203,
|
||||||
|
llGetDate = 204,
|
||||||
|
llEdgeOfWorld = 205,
|
||||||
|
llGetAgentInfo = 206,
|
||||||
|
llAdjustSoundVolume = 207,
|
||||||
|
llSetSoundQueueing = 208,
|
||||||
|
llSetSoundRadius = 209,
|
||||||
|
llKey2Name = 210,
|
||||||
|
llSetTextureAnim = 211,
|
||||||
|
llTriggerSoundLimited = 212,
|
||||||
|
llEjectFromLand = 213,
|
||||||
|
llParseString2List = 214,
|
||||||
|
llOverMyLand = 215,
|
||||||
|
llGetLandOwnerAt = 216,
|
||||||
|
llGetNotecardLine = 217,
|
||||||
|
llGetAgentSize = 218,
|
||||||
|
llSameGroup = 219,
|
||||||
|
llUnSit = 220,
|
||||||
|
llGroundSlope = 221,
|
||||||
|
llGroundNormal = 222,
|
||||||
|
llGroundContour = 223,
|
||||||
|
llGetAttached = 224,
|
||||||
|
llGetFreeMemory = 225,
|
||||||
|
llGetRegionName = 226,
|
||||||
|
llGetRegionTimeDilation = 227,
|
||||||
|
llGetRegionFPS = 228,
|
||||||
|
llParticleSystem = 229,
|
||||||
|
llGroundRepel = 230,
|
||||||
|
llGiveInventoryList = 231,
|
||||||
|
llSetVehicleType = 232,
|
||||||
|
llSetVehicleFloatParam = 233,
|
||||||
|
llSetVehicleVectorParam = 234,
|
||||||
|
llSetVehicleRotationParam = 235,
|
||||||
|
llSetVehicleFlags = 236,
|
||||||
|
llRemoveVehicleFlags = 237,
|
||||||
|
llSitTarget = 238,
|
||||||
|
llAvatarOnSitTarget = 239,
|
||||||
|
llAddToLandPassList = 240,
|
||||||
|
llSetTouchText = 241,
|
||||||
|
llSetSitText = 242,
|
||||||
|
llSetCameraEyeOffset = 243,
|
||||||
|
llSetCameraAtOffset = 244,
|
||||||
|
llDumpList2String = 245,
|
||||||
|
llScriptDanger = 246,
|
||||||
|
llDialog = 247,
|
||||||
|
llVolumeDetect = 248,
|
||||||
|
llResetOtherScript = 249,
|
||||||
|
llGetScriptState = 250,
|
||||||
|
llRemoteLoadScript = 251,
|
||||||
|
llSetRemoteScriptAccessPin = 252,
|
||||||
|
llRemoteLoadScriptPin = 253,
|
||||||
|
llOpenRemoteDataChannel = 254,
|
||||||
|
llSendRemoteData = 255,
|
||||||
|
llRemoteDataReply = 256,
|
||||||
|
llCloseRemoteDataChannel = 257,
|
||||||
|
llMD5String = 258,
|
||||||
|
llSetPrimitiveParams = 259,
|
||||||
|
llStringToBase64 = 260,
|
||||||
|
llBase64ToString = 261,
|
||||||
|
llXorBase64Strings = 262,
|
||||||
|
llRemoteDataSetRegion = 263,
|
||||||
|
llLog10 = 264,
|
||||||
|
llLog = 265,
|
||||||
|
llGetAnimationList = 266,
|
||||||
|
llSetParcelMusicURL = 267,
|
||||||
|
llGetRootPosition = 268,
|
||||||
|
llGetRootRotation = 269,
|
||||||
|
llGetObjectDesc = 270,
|
||||||
|
llSetObjectDesc = 271,
|
||||||
|
llGetCreator = 272,
|
||||||
|
llGetTimestamp = 273,
|
||||||
|
llSetLinkAlpha = 274,
|
||||||
|
llGetNumberOfPrims = 275,
|
||||||
|
llGetNumberOfNotecardLines = 276,
|
||||||
|
llGetBoundingBox = 277,
|
||||||
|
llGetGeometricCenter = 278,
|
||||||
|
llGetPrimitiveParams = 279,
|
||||||
|
llIntegerToBase64 = 280,
|
||||||
|
llBase64ToInteger = 281,
|
||||||
|
llGetGMTclock = 282,
|
||||||
|
llGetSimulatorHostname = 283,
|
||||||
|
llSetLocalRot = 284,
|
||||||
|
llParseStringKeepNulls = 285,
|
||||||
|
llRezAtRoot = 286,
|
||||||
|
llGetObjectPermMask = 287,
|
||||||
|
llSetObjectPermMask = 288,
|
||||||
|
llGetInventoryPermMask = 289,
|
||||||
|
llSetInventoryPermMask = 290,
|
||||||
|
llGetInventoryCreator = 291,
|
||||||
|
llOwnerSay = 292,
|
||||||
|
llRequestSimulatorData = 293,
|
||||||
|
llForceMouselook = 294,
|
||||||
|
llGetObjectMass = 295,
|
||||||
|
llListReplaceList = 296,
|
||||||
|
llLoadURL = 297,
|
||||||
|
llParcelMediaCommandList = 298,
|
||||||
|
llParcelMediaQuery = 299,
|
||||||
|
llModPow = 300,
|
||||||
|
llGetInventoryType = 301,
|
||||||
|
llSetPayPrice = 302,
|
||||||
|
llGetCameraPos = 303,
|
||||||
|
llGetCameraRot = 304,
|
||||||
|
llSetPrimURL = 305,
|
||||||
|
llRefreshPrimURL = 306,
|
||||||
|
llEscapeURL = 307,
|
||||||
|
llUnescapeURL = 308,
|
||||||
|
llMapDestination = 309,
|
||||||
|
llAddToLandBanList = 310,
|
||||||
|
llRemoveFromLandPassList = 311,
|
||||||
|
llRemoveFromLandBanList = 312,
|
||||||
|
llSetCameraParams = 313,
|
||||||
|
llClearCameraParams = 314,
|
||||||
|
llListStatistics = 315,
|
||||||
|
llGetUnixTime = 316,
|
||||||
|
llGetParcelFlags = 317,
|
||||||
|
llGetRegionFlags = 318,
|
||||||
|
llXorBase64StringsCorrect = 319,
|
||||||
|
llHTTPRequest = 320,
|
||||||
|
llResetLandBanList = 321,
|
||||||
|
llResetLandPassList = 322,
|
||||||
|
llGetParcelPrimCount = 323,
|
||||||
|
llGetParcelPrimOwners = 324,
|
||||||
|
llGetObjectPrimCount = 325,
|
||||||
|
llGetParcelMaxPrims = 326,
|
||||||
|
llGetParcelDetails = 327
|
||||||
|
}
|
||||||
|
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
@ -0,0 +1,608 @@
|
||||||
|
using System;
|
||||||
|
using System.Collections.Generic;
|
||||||
|
using System.Text;
|
||||||
|
using System.IO;
|
||||||
|
using System.Reflection;
|
||||||
|
using System.Reflection.Emit;
|
||||||
|
using OpenSim.Region.Environment.Scripting;
|
||||||
|
|
||||||
|
namespace OpenSim.ScriptEngines.LSL
|
||||||
|
{
|
||||||
|
class LSO_Parser
|
||||||
|
{
|
||||||
|
private bool Debug = true;
|
||||||
|
private FileStream fs;
|
||||||
|
private BinaryReader br;
|
||||||
|
private LSO_Struct.Header myHeader;
|
||||||
|
|
||||||
|
private TypeBuilder typeBuilder;
|
||||||
|
private ScriptInfo WorldAPI;
|
||||||
|
|
||||||
|
/// <summary>
|
||||||
|
/// Parse LSO file.
|
||||||
|
/// Reads LSO ByteCode into memory structures.
|
||||||
|
/// TODO: What else does it do?
|
||||||
|
/// </summary>
|
||||||
|
/// <param name="FileName">FileName of LSO ByteCode file</param>
|
||||||
|
public void ParseFile(string FileName, ScriptInfo _WorldAPI, ref TypeBuilder _typeBuilder)
|
||||||
|
{
|
||||||
|
typeBuilder = _typeBuilder;
|
||||||
|
WorldAPI = _WorldAPI;
|
||||||
|
// Open
|
||||||
|
SendToDebug("Opening filename: " + FileName);
|
||||||
|
fs = File.Open(FileName, FileMode.Open, FileAccess.Read, FileShare.Read);
|
||||||
|
br = new BinaryReader(fs, Encoding.BigEndianUnicode);
|
||||||
|
|
||||||
|
|
||||||
|
// The LSO Format consist of 6 major blocks: header, statics, functions, states, heap, and stack.
|
||||||
|
|
||||||
|
|
||||||
|
// HEADER BLOCK
|
||||||
|
SendToDebug("Reading HEADER BLOCK at: 0");
|
||||||
|
fs.Seek(0, SeekOrigin.Begin);
|
||||||
|
myHeader = new LSO_Struct.Header();
|
||||||
|
myHeader.TM = BitConverter.ToUInt32(br_read(4), 0);
|
||||||
|
myHeader.IP = BitConverter.ToUInt32(br_read(4), 0);
|
||||||
|
myHeader.VN = BitConverter.ToUInt32(br_read(4), 0);
|
||||||
|
myHeader.BP = BitConverter.ToUInt32(br_read(4), 0);
|
||||||
|
myHeader.SP = BitConverter.ToUInt32(br_read(4), 0);
|
||||||
|
myHeader.HR = BitConverter.ToUInt32(br_read(4), 0);
|
||||||
|
myHeader.HP = BitConverter.ToUInt32(br_read(4), 0);
|
||||||
|
myHeader.CS = BitConverter.ToUInt32(br_read(4), 0);
|
||||||
|
myHeader.NS = BitConverter.ToUInt32(br_read(4), 0);
|
||||||
|
myHeader.CE = BitConverter.ToUInt32(br_read(4), 0);
|
||||||
|
myHeader.IE = BitConverter.ToUInt32(br_read(4), 0);
|
||||||
|
myHeader.ER = BitConverter.ToUInt32(br_read(4), 0);
|
||||||
|
myHeader.FR = BitConverter.ToUInt32(br_read(4), 0);
|
||||||
|
myHeader.SLR = BitConverter.ToUInt32(br_read(4), 0);
|
||||||
|
myHeader.GVR = BitConverter.ToUInt32(br_read(4), 0);
|
||||||
|
myHeader.GFR = BitConverter.ToUInt32(br_read(4), 0);
|
||||||
|
myHeader.PR = BitConverter.ToUInt32(br_read(4), 0);
|
||||||
|
myHeader.ESR = BitConverter.ToUInt32(br_read(4), 0);
|
||||||
|
myHeader.SR = BitConverter.ToUInt32(br_read(4), 0);
|
||||||
|
myHeader.NCE = BitConverter.ToUInt64(br_read(8), 0);
|
||||||
|
myHeader.NIE = BitConverter.ToUInt64(br_read(8), 0);
|
||||||
|
myHeader.NER = BitConverter.ToUInt64(br_read(8), 0);
|
||||||
|
|
||||||
|
// Print Header Block to debug
|
||||||
|
SendToDebug("TM - Top of memory (size): " + myHeader.TM);
|
||||||
|
SendToDebug("IP - Instruction Pointer (0=not running): " + myHeader.IP);
|
||||||
|
SendToDebug("VN - Version number: " + myHeader.VN);
|
||||||
|
SendToDebug("BP - Local Frame Pointer: " + myHeader.BP);
|
||||||
|
SendToDebug("SP - Stack Pointer: " + myHeader.SP);
|
||||||
|
SendToDebug("HR - Heap Register: " + myHeader.HR);
|
||||||
|
SendToDebug("HP - Heap Pointer: " + myHeader.HP);
|
||||||
|
SendToDebug("CS - Current State: " + myHeader.CS);
|
||||||
|
SendToDebug("NS - Next State: " + myHeader.NS);
|
||||||
|
SendToDebug("CE - Current Events: " + myHeader.CE);
|
||||||
|
SendToDebug("IE - In Event: " + myHeader.IE);
|
||||||
|
SendToDebug("ER - Event Register: " + myHeader.ER);
|
||||||
|
SendToDebug("FR - Fault Register: " + myHeader.FR);
|
||||||
|
SendToDebug("SLR - Sleep Register: " + myHeader.SLR);
|
||||||
|
SendToDebug("GVR - Global Variable Register: " + myHeader.GVR);
|
||||||
|
SendToDebug("GFR - Global Function Register: " + myHeader.GFR);
|
||||||
|
SendToDebug("PR - Parameter Register: " + myHeader.PR);
|
||||||
|
SendToDebug("ESR - Energy Supply Register: " + myHeader.ESR);
|
||||||
|
SendToDebug("SR - State Register: " + myHeader.SR);
|
||||||
|
SendToDebug("NCE - 64-bit Current Events: " + myHeader.NCE);
|
||||||
|
SendToDebug("NIE - 64-bit In Events: " + myHeader.NIE);
|
||||||
|
SendToDebug("NER - 64-bit Event Register: " + myHeader.NER);
|
||||||
|
SendToDebug("Read position when exiting HEADER BLOCK: " + fs.Position);
|
||||||
|
|
||||||
|
// STATIC BLOCK
|
||||||
|
SendToDebug("Reading STATIC BLOCK at: " + myHeader.GVR);
|
||||||
|
fs.Seek(myHeader.GVR, SeekOrigin.Begin);
|
||||||
|
int StaticBlockCount = 0;
|
||||||
|
// Read function blocks until we hit GFR
|
||||||
|
while (fs.Position < myHeader.GFR)
|
||||||
|
{
|
||||||
|
StaticBlockCount++;
|
||||||
|
SendToDebug("Reading Static Block " + StaticBlockCount + " at: " + fs.Position);
|
||||||
|
//fs.Seek(myHeader.GVR, SeekOrigin.Begin);
|
||||||
|
LSO_Struct.StaticBlock myStaticBlock = new LSO_Struct.StaticBlock();
|
||||||
|
myStaticBlock.Static_Chunk_Header_Size = BitConverter.ToUInt32(br_read(4), 0);
|
||||||
|
myStaticBlock.ObjectType = br_read(1)[0];
|
||||||
|
SendToDebug("Static Block ObjectType: " + ((LSO_Enums.Variable_Type_Codes)myStaticBlock.ObjectType).ToString());
|
||||||
|
myStaticBlock.Unknown = br_read(1)[0];
|
||||||
|
// Size of datatype varies
|
||||||
|
if (myStaticBlock.ObjectType != 0)
|
||||||
|
myStaticBlock.BlockVariable = br_read(getObjectSize(myStaticBlock.ObjectType));
|
||||||
|
}
|
||||||
|
SendToDebug("Number of Static Blocks read: " + StaticBlockCount);
|
||||||
|
|
||||||
|
|
||||||
|
// FUNCTION BLOCK
|
||||||
|
// Always right after STATIC BLOCK
|
||||||
|
LSO_Struct.FunctionBlock myFunctionBlock = new LSO_Struct.FunctionBlock();
|
||||||
|
if (myHeader.GFR == myHeader.SR)
|
||||||
|
{
|
||||||
|
// If GFR and SR are at same position then there is no fuction block
|
||||||
|
SendToDebug("No FUNCTION BLOCK found");
|
||||||
|
} else {
|
||||||
|
SendToDebug("Reading FUNCTION BLOCK at: " + myHeader.GFR);
|
||||||
|
fs.Seek(myHeader.GFR, SeekOrigin.Begin);
|
||||||
|
myFunctionBlock.FunctionCount = BitConverter.ToUInt32(br_read(4), 0);
|
||||||
|
SendToDebug("Number of functions in Fuction Block: " + myFunctionBlock.FunctionCount);
|
||||||
|
if (myFunctionBlock.FunctionCount > 0)
|
||||||
|
{
|
||||||
|
myFunctionBlock.CodeChunkPointer = new UInt32[myFunctionBlock.FunctionCount];
|
||||||
|
for (int i = 0; i < myFunctionBlock.FunctionCount; i++)
|
||||||
|
{
|
||||||
|
SendToDebug("Reading function " + i + " at: " + fs.Position);
|
||||||
|
// TODO: ADD TO FUNCTION LIST (How do we identify it later?)
|
||||||
|
// Note! Absolute position
|
||||||
|
myFunctionBlock.CodeChunkPointer[i] = BitConverter.ToUInt32(br_read(4), 0) + myHeader.GFR;
|
||||||
|
SendToDebug("Fuction " + i + " code chunk position: " + myFunctionBlock.CodeChunkPointer[i]);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
// STATE FRAME BLOCK
|
||||||
|
// Always right after FUNCTION BLOCK
|
||||||
|
SendToDebug("Reading STATE BLOCK at: " + myHeader.SR);
|
||||||
|
fs.Seek(myHeader.SR, SeekOrigin.Begin);
|
||||||
|
LSO_Struct.StateFrameBlock myStateFrameBlock = new LSO_Struct.StateFrameBlock();
|
||||||
|
myStateFrameBlock.StateCount = BitConverter.ToUInt32(br_read(4), 0);
|
||||||
|
if (myStateFrameBlock.StateCount > 0)
|
||||||
|
{
|
||||||
|
// Initialize array
|
||||||
|
myStateFrameBlock.StatePointer = new LSO_Struct.StatePointerBlock[myStateFrameBlock.StateCount];
|
||||||
|
for (int i = 0; i < myStateFrameBlock.StateCount; i++)
|
||||||
|
{
|
||||||
|
SendToDebug("Reading STATE POINTER BLOCK " + (i+1) + " at: " + fs.Position);
|
||||||
|
// Position is relative to state frame
|
||||||
|
myStateFrameBlock.StatePointer[i].Location = myHeader.SR + BitConverter.ToUInt32(br_read(4), 0);
|
||||||
|
myStateFrameBlock.StatePointer[i].EventMask = new System.Collections.BitArray(br_read(8));
|
||||||
|
SendToDebug("Pointer: " + myStateFrameBlock.StatePointer[i].Location);
|
||||||
|
SendToDebug("Total potential EventMask bits: " + myStateFrameBlock.StatePointer[i].EventMask.Count);
|
||||||
|
|
||||||
|
//// Read STATE BLOCK
|
||||||
|
//long CurPos = fs.Position;
|
||||||
|
//fs.Seek(CurPos, SeekOrigin.Begin);
|
||||||
|
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
// STATE BLOCK
|
||||||
|
// For each StateFrameBlock there is one StateBlock with multiple event handlers
|
||||||
|
|
||||||
|
if (myStateFrameBlock.StateCount > 0)
|
||||||
|
{
|
||||||
|
// Go through all State Frame Pointers found
|
||||||
|
for (int i = 0; i < myStateFrameBlock.StateCount; i++)
|
||||||
|
{
|
||||||
|
|
||||||
|
fs.Seek(myStateFrameBlock.StatePointer[i].Location, SeekOrigin.Begin);
|
||||||
|
SendToDebug("Reading STATE BLOCK " + (i + 1) + " at: " + fs.Position);
|
||||||
|
|
||||||
|
// READ: STATE BLOCK HEADER
|
||||||
|
myStateFrameBlock.StatePointer[i].StateBlock = new LSO_Struct.StateBlock();
|
||||||
|
myStateFrameBlock.StatePointer[i].StateBlock.StartPos = (UInt32)fs.Position; // Note
|
||||||
|
myStateFrameBlock.StatePointer[i].StateBlock.HeaderSize = BitConverter.ToUInt32(br_read(4), 0);
|
||||||
|
myStateFrameBlock.StatePointer[i].StateBlock.Unknown = br_read(1)[0];
|
||||||
|
myStateFrameBlock.StatePointer[i].StateBlock.EndPos = (UInt32)fs.Position; // Note
|
||||||
|
SendToDebug("State block Start Pos: " + myStateFrameBlock.StatePointer[i].StateBlock.StartPos);
|
||||||
|
SendToDebug("State block Header Size: " + myStateFrameBlock.StatePointer[i].StateBlock.HeaderSize);
|
||||||
|
SendToDebug("State block Header End Pos: " + myStateFrameBlock.StatePointer[i].StateBlock.EndPos);
|
||||||
|
|
||||||
|
// We need to count number of bits flagged in EventMask?
|
||||||
|
|
||||||
|
|
||||||
|
// for each bit in myStateFrameBlock.StatePointer[i].EventMask
|
||||||
|
|
||||||
|
// ADDING TO ALL RIGHT NOW, SHOULD LIMIT TO ONLY THE ONES IN USE
|
||||||
|
//TODO: Create event hooks
|
||||||
|
myStateFrameBlock.StatePointer[i].StateBlock.StateBlockHandlers = new LSO_Struct.StateBlockHandler[myStateFrameBlock.StatePointer[i].EventMask.Count - 1];
|
||||||
|
for (int ii = 0; ii < myStateFrameBlock.StatePointer[i].EventMask.Count - 1; ii++)
|
||||||
|
{
|
||||||
|
|
||||||
|
if (myStateFrameBlock.StatePointer[i].EventMask.Get(ii) == true)
|
||||||
|
{
|
||||||
|
// We got an event
|
||||||
|
// READ: STATE BLOCK HANDLER
|
||||||
|
SendToDebug("Reading STATE BLOCK " + (i + 1) + " HANDLER matching EVENT MASK " + ii + " (" + ((LSO_Enums.Event_Mask_Values)ii).ToString() + ") at: " + fs.Position);
|
||||||
|
myStateFrameBlock.StatePointer[i].StateBlock.StateBlockHandlers[ii].CodeChunkPointer = myStateFrameBlock.StatePointer[i].StateBlock.EndPos + BitConverter.ToUInt32(br_read(4), 0);
|
||||||
|
myStateFrameBlock.StatePointer[i].StateBlock.StateBlockHandlers[ii].CallFrameSize = BitConverter.ToUInt32(br_read(4), 0);
|
||||||
|
SendToDebug("Reading STATE BLOCK " + (i + 1) + " HANDLER EVENT MASK " + ii + " (" + ((LSO_Enums.Event_Mask_Values)ii).ToString() + ") Code Chunk Pointer: " + myStateFrameBlock.StatePointer[i].StateBlock.StateBlockHandlers[ii].CodeChunkPointer);
|
||||||
|
SendToDebug("Reading STATE BLOCK " + (i + 1) + " HANDLER EVENT MASK " + ii + " (" + ((LSO_Enums.Event_Mask_Values)ii).ToString() + ") Call Frame Size: " + myStateFrameBlock.StatePointer[i].StateBlock.StateBlockHandlers[ii].CallFrameSize );
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
//// READ FUNCTION CODE CHUNKS
|
||||||
|
//// Functions + Function start pos (GFR)
|
||||||
|
//// TODO: Somehow be able to identify and reference this
|
||||||
|
//LSO_Struct.CodeChunk[] myFunctionCodeChunk;
|
||||||
|
//if (myFunctionBlock.FunctionCount > 0)
|
||||||
|
//{
|
||||||
|
// myFunctionCodeChunk = new LSO_Struct.CodeChunk[myFunctionBlock.FunctionCount];
|
||||||
|
// for (int i = 0; i < myFunctionBlock.FunctionCount; i++)
|
||||||
|
// {
|
||||||
|
// SendToDebug("Reading Function Code Chunk " + i);
|
||||||
|
// myFunctionCodeChunk[i] = GetCodeChunk((UInt32)myFunctionBlock.CodeChunkPointer[i]);
|
||||||
|
// }
|
||||||
|
|
||||||
|
//}
|
||||||
|
// READ EVENT CODE CHUNKS
|
||||||
|
LSO_Struct.CodeChunk[] myEventCodeChunk;
|
||||||
|
if (myStateFrameBlock.StateCount > 0)
|
||||||
|
{
|
||||||
|
myEventCodeChunk = new LSO_Struct.CodeChunk[myStateFrameBlock.StateCount];
|
||||||
|
for (int i = 0; i < myStateFrameBlock.StateCount; i++)
|
||||||
|
{
|
||||||
|
// TODO: Somehow organize events and functions so they can be found again,
|
||||||
|
// two level search ain't no good
|
||||||
|
for (int ii = 0; ii < myStateFrameBlock.StatePointer[i].EventMask.Count - 1; ii++)
|
||||||
|
{
|
||||||
|
|
||||||
|
|
||||||
|
if (myStateFrameBlock.StatePointer[i].StateBlock.StateBlockHandlers[ii].CodeChunkPointer > 0)
|
||||||
|
{
|
||||||
|
SendToDebug("Reading Event Code Chunk state " + i + ", event " + (LSO_Enums.Event_Mask_Values)ii);
|
||||||
|
|
||||||
|
|
||||||
|
// Override a Method / Function
|
||||||
|
string eventname = "event_" + (LSO_Enums.Event_Mask_Values)ii;
|
||||||
|
SendToDebug("CLR:" + eventname + ":MethodBuilder methodBuilder = typeBuilder.DefineMethod...");
|
||||||
|
MethodBuilder methodBuilder = typeBuilder.DefineMethod(eventname,
|
||||||
|
MethodAttributes.Private | MethodAttributes.Virtual,
|
||||||
|
typeof(void),
|
||||||
|
new Type[] { typeof(object) });
|
||||||
|
|
||||||
|
SendToDebug("CLR:" + eventname + ":typeBuilder.DefineMethodOverride(methodBuilder...");
|
||||||
|
typeBuilder.DefineMethodOverride(methodBuilder,
|
||||||
|
typeof(LSL_CLRInterface.LSLScript).GetMethod(eventname));
|
||||||
|
|
||||||
|
// Create the IL generator
|
||||||
|
|
||||||
|
SendToDebug("CLR:" + eventname + ":ILGenerator il = methodBuilder.GetILGenerator();");
|
||||||
|
ILGenerator il = methodBuilder.GetILGenerator();
|
||||||
|
|
||||||
|
|
||||||
|
LSO_Struct.CodeChunk myECC =
|
||||||
|
GetCodeChunk(myStateFrameBlock.StatePointer[i].StateBlock.StateBlockHandlers[ii].CodeChunkPointer, il, eventname);
|
||||||
|
}
|
||||||
|
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
// Close
|
||||||
|
br.Close();
|
||||||
|
fs.Close();
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
private LSO_Struct.HeapBlock GetHeap(UInt32 pos)
|
||||||
|
{
|
||||||
|
// HEAP BLOCK
|
||||||
|
// TODO:? Special read for strings/keys (null terminated) and lists (pointers to other HEAP entries)
|
||||||
|
SendToDebug("Reading HEAP BLOCK at: " + pos);
|
||||||
|
fs.Seek(pos, SeekOrigin.Begin);
|
||||||
|
|
||||||
|
LSO_Struct.HeapBlock myHeapBlock = new LSO_Struct.HeapBlock();
|
||||||
|
myHeapBlock.DataBlockSize = BitConverter.ToUInt32(br_read(4), 0);
|
||||||
|
myHeapBlock.ObjectType = br_read(1)[0];
|
||||||
|
myHeapBlock.ReferenceCount = BitConverter.ToUInt16(br_read(2), 0);
|
||||||
|
myHeapBlock.Data = br_read(getObjectSize(myHeapBlock.ObjectType));
|
||||||
|
|
||||||
|
SendToDebug("Heap Block Data Block Size: " + myHeapBlock.DataBlockSize);
|
||||||
|
SendToDebug("Heap Block ObjectType: " + ((LSO_Enums.Variable_Type_Codes)myHeapBlock.ObjectType).ToString());
|
||||||
|
SendToDebug("Heap Block Reference Count: " + myHeapBlock.ReferenceCount);
|
||||||
|
|
||||||
|
return myHeapBlock;
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
private byte[] br_read(int len)
|
||||||
|
{
|
||||||
|
if (len <= 0)
|
||||||
|
return null;
|
||||||
|
|
||||||
|
try
|
||||||
|
{
|
||||||
|
byte[] bytes = new byte[len];
|
||||||
|
for (int i = len - 1; i > -1; i--)
|
||||||
|
bytes[i] = br.ReadByte();
|
||||||
|
return bytes;
|
||||||
|
}
|
||||||
|
catch (Exception e)
|
||||||
|
{
|
||||||
|
SendToDebug("Exception: " + e.ToString());
|
||||||
|
throw (e);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
//private byte[] br_read_smallendian(int len)
|
||||||
|
//{
|
||||||
|
// byte[] bytes = new byte[len];
|
||||||
|
// br.Read(bytes,0, len);
|
||||||
|
// return bytes;
|
||||||
|
//}
|
||||||
|
|
||||||
|
private int getObjectSize(byte ObjectType)
|
||||||
|
{
|
||||||
|
switch (ObjectType)
|
||||||
|
{
|
||||||
|
case 1:
|
||||||
|
case 2:
|
||||||
|
case 3:
|
||||||
|
case 4:
|
||||||
|
case 7:
|
||||||
|
return 4;
|
||||||
|
case 5:
|
||||||
|
return 12;
|
||||||
|
case 6:
|
||||||
|
return 16;
|
||||||
|
default:
|
||||||
|
return 0;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
private void SendToDebug(string Message)
|
||||||
|
{
|
||||||
|
if (Debug == true)
|
||||||
|
Console.WriteLine("Debug: " + Message);
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
private string Read_String()
|
||||||
|
{
|
||||||
|
string ret = "";
|
||||||
|
byte reader = br_read(1)[0];
|
||||||
|
while (reader != 0x000)
|
||||||
|
{
|
||||||
|
ret += (char)reader;
|
||||||
|
reader = br_read(1)[0];
|
||||||
|
}
|
||||||
|
return ret;
|
||||||
|
}
|
||||||
|
|
||||||
|
/// <summary>
|
||||||
|
/// Reads a code chunk into structure and returns it.
|
||||||
|
/// </summary>
|
||||||
|
/// <param name="pos">Absolute position in file. REMEMBER TO ADD myHeader.GFR!</param>
|
||||||
|
/// <returns></returns>
|
||||||
|
private LSO_Struct.CodeChunk GetCodeChunk(UInt32 pos, ILGenerator il, string eventname)
|
||||||
|
{
|
||||||
|
|
||||||
|
/*
|
||||||
|
* CLR TRY
|
||||||
|
*/
|
||||||
|
//SendToDebug("CLR:" + eventname + ":il.BeginExceptionBlock()");
|
||||||
|
il.BeginExceptionBlock();
|
||||||
|
|
||||||
|
// Push "Hello World!" string to stack
|
||||||
|
//SendToDebug("CLR:" + eventname + ":il.Emit(OpCodes.Ldstr...");
|
||||||
|
il.Emit(OpCodes.Ldstr, "Starting CLR dynamic execution of: " + eventname);
|
||||||
|
|
||||||
|
// Push Console.WriteLine command to stack ... Console.WriteLine("Hello World!");
|
||||||
|
//SendToDebug("CLR:" + eventname + ":il.Emit(OpCodes.Call...");
|
||||||
|
il.Emit(OpCodes.Call, typeof(Console).GetMethod
|
||||||
|
("WriteLine", new Type[] { typeof(string) }));
|
||||||
|
|
||||||
|
|
||||||
|
LSO_Struct.CodeChunk myCodeChunk = new LSO_Struct.CodeChunk();
|
||||||
|
|
||||||
|
SendToDebug("Reading Function Code Chunk at: " + pos);
|
||||||
|
fs.Seek(pos, SeekOrigin.Begin);
|
||||||
|
myCodeChunk.CodeChunkHeaderSize = BitConverter.ToUInt32(br_read(4), 0);
|
||||||
|
SendToDebug("CodeChunk Header Size: " + myCodeChunk.CodeChunkHeaderSize );
|
||||||
|
// Read until null
|
||||||
|
myCodeChunk.Comment = Read_String();
|
||||||
|
SendToDebug("Function comment: " + myCodeChunk.Comment);
|
||||||
|
myCodeChunk.ReturnType = br_read(1)[0];
|
||||||
|
SendToDebug("Return type: " + (LSO_Enums.Variable_Type_Codes)myCodeChunk.ReturnType);
|
||||||
|
// TODO: How to determine number of codechunks -- does this method work?
|
||||||
|
myCodeChunk.CodeChunkArguments = new System.Collections.Generic.List<LSO_Struct.CodeChunkArgument>();
|
||||||
|
byte reader = br_read(1)[0];
|
||||||
|
reader = br_read(1)[0];
|
||||||
|
int ccount = 0;
|
||||||
|
while (reader != 0x000)
|
||||||
|
{
|
||||||
|
ccount++;
|
||||||
|
SendToDebug("Reading Code Chunk Argument " + ccount);
|
||||||
|
LSO_Struct.CodeChunkArgument CCA = new LSO_Struct.CodeChunkArgument();
|
||||||
|
CCA.FunctionReturnType = reader;
|
||||||
|
reader = br_read(1)[0];
|
||||||
|
CCA.NullString = reader;
|
||||||
|
myCodeChunk.CodeChunkArguments.Add(CCA);
|
||||||
|
SendToDebug("Code Chunk Argument " + ccount + " return type: " + (LSO_Enums.Variable_Type_Codes)CCA.FunctionReturnType);
|
||||||
|
}
|
||||||
|
// End marker is 0x000
|
||||||
|
myCodeChunk.EndMarker = reader;
|
||||||
|
// TODO: How to read and identify following code
|
||||||
|
// TODO: Code is read until a return of some sort is found
|
||||||
|
bool FoundRet = false;
|
||||||
|
while (FoundRet == false)
|
||||||
|
{
|
||||||
|
//reader = br_read(1)[0];
|
||||||
|
//UInt16 opcode = BitConverter.ToUInt16(br_read(1),0);
|
||||||
|
UInt16 opcode = br_read(1)[0];
|
||||||
|
//long rPos = fs.Position;
|
||||||
|
SendToDebug("OPCODE: " + ((LSO_Enums.Operation_Table)opcode).ToString());
|
||||||
|
switch (opcode)
|
||||||
|
{
|
||||||
|
// LONG
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.POPARG:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.STORE:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.STORES:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.STOREL:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.STOREV:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.STOREQ:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.STOREG:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.STOREGS:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.STOREGL:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.STOREGV:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.STOREGQ:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.LOADP:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.LOADSP:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.LOADLP:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.LOADVP:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.LOADQP:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.PUSH:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.PUSHS:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.PUSHL:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.PUSHV:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.PUSHQ:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.PUSHG:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.PUSHGS:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.PUSHGL:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.PUSHGV:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.PUSHGQ:
|
||||||
|
SendToDebug("Param1: " + BitConverter.ToUInt32(br_read(4),0));
|
||||||
|
break;
|
||||||
|
// BYTE
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.PUSHARGB:
|
||||||
|
SendToDebug("Param1: " + br_read(1)[0]);
|
||||||
|
break;
|
||||||
|
// INTEGER
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.PUSHARGI:
|
||||||
|
// TODO: What is size of integer?
|
||||||
|
SendToDebug("Param1: " + BitConverter.ToUInt32(br_read(4),0));
|
||||||
|
break;
|
||||||
|
// FLOAT
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.PUSHARGF:
|
||||||
|
// TODO: What is size of float?
|
||||||
|
SendToDebug("Param1: " + BitConverter.ToUInt32(br_read(4),0));
|
||||||
|
break;
|
||||||
|
// STRING
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.PUSHARGS:
|
||||||
|
string s = Read_String();
|
||||||
|
SendToDebug("Param1: " + s);
|
||||||
|
il.Emit(OpCodes.Ldstr, s);
|
||||||
|
break;
|
||||||
|
// VECTOR z,y,x
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.PUSHARGV:
|
||||||
|
SendToDebug("Param1 Z: " + BitConverter.ToUInt32(br_read(4),0));
|
||||||
|
SendToDebug("Param1 Y: " + BitConverter.ToUInt32(br_read(4),0));
|
||||||
|
SendToDebug("Param1 X: " + BitConverter.ToUInt32(br_read(4),0));
|
||||||
|
break;
|
||||||
|
// ROTATION s,z,y,x
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.PUSHARGQ:
|
||||||
|
SendToDebug("Param1 S: " + BitConverter.ToUInt32(br_read(4),0));
|
||||||
|
SendToDebug("Param1 Z: " + BitConverter.ToUInt32(br_read(4),0));
|
||||||
|
SendToDebug("Param1 Y: " + BitConverter.ToUInt32(br_read(4),0));
|
||||||
|
SendToDebug("Param1 X: " + BitConverter.ToUInt32(br_read(4),0));
|
||||||
|
break;
|
||||||
|
// LONG
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.PUSHARGE:
|
||||||
|
SendToDebug("Param1: " + BitConverter.ToUInt32(br_read(4),0));
|
||||||
|
break;
|
||||||
|
// BYTE
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.ADD:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.SUB:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.MUL:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.DIV:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.MOD:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.EQ:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.NEQ:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.LEQ:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.GEQ:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.LESS:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.GREATER:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.BOOLOR:
|
||||||
|
SendToDebug("Param1: " + br_read(1)[0]);
|
||||||
|
break;
|
||||||
|
// LONG
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.JUMP:
|
||||||
|
SendToDebug("Param1: " + BitConverter.ToUInt32(br_read(4),0));
|
||||||
|
break;
|
||||||
|
// BYTE, LONG
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.JUMPIF:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.JUMPNIF:
|
||||||
|
SendToDebug("Param1: " + br_read(1)[0]);
|
||||||
|
SendToDebug("Param2: " + BitConverter.ToUInt32(br_read(4),0));
|
||||||
|
break;
|
||||||
|
// LONG
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.STATE:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.CALL:
|
||||||
|
SendToDebug("Param1: " + BitConverter.ToUInt32(br_read(4),0));
|
||||||
|
break;
|
||||||
|
// BYTE
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.CAST:
|
||||||
|
SendToDebug("Param1: " + br_read(1)[0]);
|
||||||
|
break;
|
||||||
|
// LONG
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.STACKTOS:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.STACKTOL:
|
||||||
|
SendToDebug("Param1: " + BitConverter.ToUInt32(br_read(4),0));
|
||||||
|
break;
|
||||||
|
// BYTE
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.PRINT:
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.CALLLIB:
|
||||||
|
SendToDebug("Param1: " + br_read(1)[0]);
|
||||||
|
break;
|
||||||
|
// SHORT
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.CALLLIB_TWO_BYTE:
|
||||||
|
// TODO: What is size of short?
|
||||||
|
UInt16 _i = BitConverter.ToUInt16(br_read(2), 0);
|
||||||
|
SendToDebug("Param1: " + _i);
|
||||||
|
switch (_i)
|
||||||
|
{
|
||||||
|
case (UInt16)LSO_Enums.BuiltIn_Functions.llSay:
|
||||||
|
il.Emit(OpCodes.Call, typeof(Console).GetMethod
|
||||||
|
("WriteLine", new Type[] { typeof(string) }));
|
||||||
|
break;
|
||||||
|
}
|
||||||
|
break;
|
||||||
|
|
||||||
|
|
||||||
|
// RETURN
|
||||||
|
case (UInt16)LSO_Enums.Operation_Table.RETURN:
|
||||||
|
SendToDebug("Last OPCODE was return command. Code chunk execution complete.");
|
||||||
|
FoundRet = true;
|
||||||
|
break;
|
||||||
|
}
|
||||||
|
//fs.Seek(rPos, SeekOrigin.Begin);
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
/*
|
||||||
|
* CATCH
|
||||||
|
*/
|
||||||
|
SendToDebug("CLR:" + eventname + ":il.BeginCatchBlock(typeof(Exception));");
|
||||||
|
il.BeginCatchBlock(typeof(Exception));
|
||||||
|
|
||||||
|
// Push "Hello World!" string to stack
|
||||||
|
SendToDebug("CLR:" + eventname + ":il.Emit(OpCodes.Ldstr...");
|
||||||
|
il.Emit(OpCodes.Ldstr, "Execption executing dynamic CLR function " + eventname + ": ");
|
||||||
|
|
||||||
|
//call void [mscorlib]System.Console::WriteLine(string)
|
||||||
|
SendToDebug("CLR:" + eventname + ":il.Emit(OpCodes.Call...");
|
||||||
|
il.Emit(OpCodes.Call, typeof(Console).GetMethod
|
||||||
|
("Write", new Type[] { typeof(string) }));
|
||||||
|
|
||||||
|
//callvirt instance string [mscorlib]System.Exception::get_Message()
|
||||||
|
SendToDebug("CLR:" + eventname + ":il.Emit(OpCodes.Callvirt...");
|
||||||
|
il.Emit(OpCodes.Callvirt, typeof(Exception).GetMethod
|
||||||
|
("get_Message"));
|
||||||
|
|
||||||
|
//call void [mscorlib]System.Console::WriteLine(string)
|
||||||
|
SendToDebug("CLR:" + eventname + ":il.Emit(OpCodes.Call...");
|
||||||
|
il.Emit(OpCodes.Call, typeof(Console).GetMethod
|
||||||
|
("WriteLine", new Type[] { typeof(string) }));
|
||||||
|
|
||||||
|
/*
|
||||||
|
* CLR END TRY
|
||||||
|
*/
|
||||||
|
//SendToDebug("CLR:" + eventname + ":il.EndExceptionBlock();");
|
||||||
|
il.EndExceptionBlock();
|
||||||
|
// Push "Return from current method, with return value if present" to stack
|
||||||
|
il.Emit(OpCodes.Ret);
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
return myCodeChunk;
|
||||||
|
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
@ -0,0 +1,105 @@
|
||||||
|
|
||||||
|
using System;
|
||||||
|
using System.Collections.Generic;
|
||||||
|
using System.Text;
|
||||||
|
|
||||||
|
namespace OpenSim.ScriptEngines.LSL
|
||||||
|
{
|
||||||
|
static class LSO_Struct
|
||||||
|
{
|
||||||
|
|
||||||
|
public struct Header
|
||||||
|
{
|
||||||
|
public UInt32 TM;
|
||||||
|
public UInt32 IP;
|
||||||
|
public UInt32 VN;
|
||||||
|
public UInt32 BP;
|
||||||
|
public UInt32 SP;
|
||||||
|
public UInt32 HR;
|
||||||
|
public UInt32 HP;
|
||||||
|
public UInt32 CS;
|
||||||
|
public UInt32 NS;
|
||||||
|
public UInt32 CE;
|
||||||
|
public UInt32 IE;
|
||||||
|
public UInt32 ER;
|
||||||
|
public UInt32 FR;
|
||||||
|
public UInt32 SLR;
|
||||||
|
public UInt32 GVR;
|
||||||
|
public UInt32 GFR;
|
||||||
|
public UInt32 PR;
|
||||||
|
public UInt32 ESR;
|
||||||
|
public UInt32 SR;
|
||||||
|
public UInt64 NCE;
|
||||||
|
public UInt64 NIE;
|
||||||
|
public UInt64 NER;
|
||||||
|
}
|
||||||
|
|
||||||
|
public struct StaticBlock
|
||||||
|
{
|
||||||
|
public UInt32 Static_Chunk_Header_Size;
|
||||||
|
public byte ObjectType;
|
||||||
|
public byte Unknown;
|
||||||
|
public byte[] BlockVariable;
|
||||||
|
}
|
||||||
|
/* Not actually a structure
|
||||||
|
public struct StaticBlockVariable
|
||||||
|
{
|
||||||
|
public UInt32 Integer1;
|
||||||
|
public UInt32 Float1;
|
||||||
|
public UInt32 HeapPointer_String;
|
||||||
|
public UInt32 HeapPointer_Key;
|
||||||
|
public byte[] Vector_12;
|
||||||
|
public byte[] Rotation_16;
|
||||||
|
public UInt32 Pointer_List_Structure;
|
||||||
|
} */
|
||||||
|
public struct HeapBlock
|
||||||
|
{
|
||||||
|
public UInt32 DataBlockSize;
|
||||||
|
public byte ObjectType;
|
||||||
|
public UInt16 ReferenceCount;
|
||||||
|
public byte[] Data;
|
||||||
|
}
|
||||||
|
public struct StateFrameBlock
|
||||||
|
{
|
||||||
|
public UInt32 StateCount;
|
||||||
|
public StatePointerBlock[] StatePointer;
|
||||||
|
}
|
||||||
|
public struct StatePointerBlock
|
||||||
|
{
|
||||||
|
public UInt32 Location;
|
||||||
|
public System.Collections.BitArray EventMask;
|
||||||
|
public StateBlock StateBlock;
|
||||||
|
}
|
||||||
|
public struct StateBlock
|
||||||
|
{
|
||||||
|
public UInt32 StartPos;
|
||||||
|
public UInt32 EndPos;
|
||||||
|
public UInt32 HeaderSize;
|
||||||
|
public byte Unknown;
|
||||||
|
public StateBlockHandler[] StateBlockHandlers;
|
||||||
|
}
|
||||||
|
public struct StateBlockHandler
|
||||||
|
{
|
||||||
|
public UInt32 CodeChunkPointer;
|
||||||
|
public UInt32 CallFrameSize;
|
||||||
|
}
|
||||||
|
public struct FunctionBlock
|
||||||
|
{
|
||||||
|
public UInt32 FunctionCount;
|
||||||
|
public UInt32[] CodeChunkPointer;
|
||||||
|
}
|
||||||
|
public struct CodeChunk
|
||||||
|
{
|
||||||
|
public UInt32 CodeChunkHeaderSize;
|
||||||
|
public string Comment;
|
||||||
|
public System.Collections.Generic.List<CodeChunkArgument> CodeChunkArguments;
|
||||||
|
public byte EndMarker;
|
||||||
|
public byte ReturnType;
|
||||||
|
}
|
||||||
|
public struct CodeChunkArgument
|
||||||
|
{
|
||||||
|
public byte FunctionReturnType;
|
||||||
|
public byte NullString;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
@ -1,6 +1,10 @@
|
||||||
using System;
|
using System;
|
||||||
using System.Collections.Generic;
|
using System.Collections.Generic;
|
||||||
using System.Text;
|
using System.Text;
|
||||||
|
using Key = libsecondlife.LLUUID;
|
||||||
|
using Rotation = libsecondlife.LLQuaternion;
|
||||||
|
using Vector = libsecondlife.LLVector3;
|
||||||
|
|
||||||
|
|
||||||
using OpenSim.Region.Environment.Scenes;
|
using OpenSim.Region.Environment.Scenes;
|
||||||
|
|
||||||
|
|
@ -21,5 +25,111 @@ namespace OpenSim.Region.Environment.Scripting
|
||||||
{
|
{
|
||||||
return null;
|
return null;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
// LSL Compatibility below
|
||||||
|
// remap LL* functions to OS*
|
||||||
|
public int osAbs(int val)
|
||||||
|
{
|
||||||
|
return Math.Abs(val);
|
||||||
|
}
|
||||||
|
|
||||||
|
public float osAcos(float val)
|
||||||
|
{
|
||||||
|
return (float)Math.Acos(val);
|
||||||
|
}
|
||||||
|
|
||||||
|
[Obsolete("Unimplemented")]
|
||||||
|
public void osAddToLandPassList(Key avatar, float hours)
|
||||||
|
{
|
||||||
|
OpenSim.Framework.Console.MainLog.Instance.Warn("Unimplemented function called by script: osAddToLandPassList(Key avatar, float hours)");
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
|
||||||
|
[Obsolete("Unimplemented")]
|
||||||
|
public void osAdjustSoundVolume(float volume)
|
||||||
|
{
|
||||||
|
OpenSim.Framework.Console.MainLog.Instance.Warn("Unimplemented function called by script: osAdjustSoundVolume(float volume)");
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
|
||||||
|
[Obsolete("Unimplemented")]
|
||||||
|
public void osAllowInventoryDrop(int add)
|
||||||
|
{
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
|
||||||
|
[Obsolete("Unimplemented")]
|
||||||
|
public float osAngleBetween(Rotation a, Rotation b)
|
||||||
|
{
|
||||||
|
Axiom.Math.Quaternion axA = new Axiom.Math.Quaternion(a.W, a.X, a.Y, a.Z);
|
||||||
|
Axiom.Math.Quaternion axB = new Axiom.Math.Quaternion(b.W, b.X, b.Y, b.Z);
|
||||||
|
|
||||||
|
return 0;
|
||||||
|
}
|
||||||
|
|
||||||
|
[Obsolete("Unimplemented")]
|
||||||
|
public void osApplyImpulse(Vector force, int local)
|
||||||
|
{
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
|
||||||
|
[Obsolete("Unimplemented")]
|
||||||
|
public void osApplyRotationalImpulse(Vector force, int local)
|
||||||
|
{
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
|
||||||
|
public float osAsin(float val)
|
||||||
|
{
|
||||||
|
return (float)Math.Asin(val);
|
||||||
|
}
|
||||||
|
|
||||||
|
public float osAtan2(float x, float y)
|
||||||
|
{
|
||||||
|
return (float)Math.Atan2(x, y);
|
||||||
|
}
|
||||||
|
|
||||||
|
[Obsolete("Unimplemented")]
|
||||||
|
public void osAttachToAvatar(Key avatar, int attachmentPoint)
|
||||||
|
{
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
|
||||||
|
[Obsolete("Unimplemented")]
|
||||||
|
public Key osAvatarOnSitTarget()
|
||||||
|
{
|
||||||
|
return Key.Zero;
|
||||||
|
}
|
||||||
|
|
||||||
|
public Rotation osAxes2Rot(Vector fwd, Vector left, Vector up)
|
||||||
|
{
|
||||||
|
Axiom.Math.Quaternion axQ = new Axiom.Math.Quaternion();
|
||||||
|
Axiom.Math.Vector3 axFwd = new Axiom.Math.Vector3(fwd.X, fwd.Y, fwd.Z);
|
||||||
|
Axiom.Math.Vector3 axLeft = new Axiom.Math.Vector3(left.X, left.Y, left.Z);
|
||||||
|
Axiom.Math.Vector3 axUp = new Axiom.Math.Vector3(up.X, up.Y, up.Z);
|
||||||
|
|
||||||
|
axQ.FromAxes(axFwd, axLeft, axUp);
|
||||||
|
|
||||||
|
return new Rotation(axQ.x, axQ.y, axQ.z, axQ.w);
|
||||||
|
}
|
||||||
|
|
||||||
|
public Rotation osAxisAngle2Rot(Vector axis, float angle)
|
||||||
|
{
|
||||||
|
Axiom.Math.Quaternion axQ = Axiom.Math.Quaternion.FromAngleAxis(angle, new Axiom.Math.Vector3(axis.X, axis.Y, axis.Z));
|
||||||
|
|
||||||
|
return new Rotation(axQ.x, axQ.y, axQ.z, axQ.w);
|
||||||
|
}
|
||||||
|
|
||||||
|
public string osBase64ToString(string str)
|
||||||
|
{
|
||||||
|
Encoding enc = System.Text.Encoding.UTF8;
|
||||||
|
return enc.GetString(Convert.FromBase64String(str));
|
||||||
|
}
|
||||||
|
|
||||||
|
[Obsolete("Unimplemented")]
|
||||||
|
public void osBreakAllLinks()
|
||||||
|
{
|
||||||
|
return;
|
||||||
|
}
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
|
||||||
|
|
@ -0,0 +1,14 @@
|
||||||
|
using System;
|
||||||
|
using System.Collections.Generic;
|
||||||
|
using System.Text;
|
||||||
|
using OpenSim.Region.Environment.Scenes;
|
||||||
|
using libsecondlife;
|
||||||
|
using Key = libsecondlife.LLUUID;
|
||||||
|
|
||||||
|
namespace OpenSim.Region.Environment.Scripting
|
||||||
|
{
|
||||||
|
|
||||||
|
class ScriptInterpretedEvents
|
||||||
|
{
|
||||||
|
}
|
||||||
|
}
|
||||||
Loading…
Reference in New Issue