mirror of
https://github.com/opensim/opensim.git
synced 2026-08-01 22:26:09 +08:00
Added ScriptEngine.DotNetEngine
This commit is contained in:
@@ -0,0 +1,342 @@
|
||||
using System;
|
||||
using System.Collections.Generic;
|
||||
using System.Text;
|
||||
|
||||
namespace OpenSim.Region.ScriptEngine.DotNetEngine.Compiler.LSL
|
||||
{
|
||||
public partial class LSL_BaseClass
|
||||
{
|
||||
|
||||
|
||||
|
||||
public void StoreToLocal(UInt32 index)
|
||||
{
|
||||
// TODO: How to determine local?
|
||||
Common.SendToDebug("::StoreToLocal " + index);
|
||||
if (LocalVariables.ContainsKey(index))
|
||||
LocalVariables.Remove(index);
|
||||
LocalVariables.Add(index, LSLStack.Peek());
|
||||
}
|
||||
public void StoreToGlobal(UInt32 index)
|
||||
{
|
||||
Common.SendToDebug("::StoreToGlobal " + index);
|
||||
if (GlobalVariables.ContainsKey(index))
|
||||
GlobalVariables.Remove(index);
|
||||
GlobalVariables.Add(index, LSLStack.Peek());
|
||||
}
|
||||
public void StoreToStatic(UInt32 index)
|
||||
{
|
||||
Common.SendToDebug("::StoreToStatic " + index);
|
||||
//if (StaticVariables.ContainsKey(index))
|
||||
// StaticVariables.Remove(index);
|
||||
StaticVariables.Add(index, LSLStack.Peek());
|
||||
}
|
||||
public void GetFromLocal(UInt32 index)
|
||||
{
|
||||
// TODO: How to determine local?
|
||||
Common.SendToDebug("::GetFromLocal " + index);
|
||||
object ret;
|
||||
LocalVariables.TryGetValue(index, out ret);
|
||||
LSLStack.Push(ret);
|
||||
//return ret;
|
||||
}
|
||||
public void GetFromGlobal(UInt32 index)
|
||||
{
|
||||
Common.SendToDebug("::GetFromGlobal " + index);
|
||||
object ret;
|
||||
GlobalVariables.TryGetValue(index, out ret);
|
||||
LSLStack.Push(ret);
|
||||
//return ret;
|
||||
}
|
||||
public void GetFromStatic(UInt32 index)
|
||||
{
|
||||
Common.SendToDebug("::GetFromStatic " + index);
|
||||
object ret;
|
||||
StaticVariables.TryGetValue(index, out ret);
|
||||
Common.SendToDebug("::GetFromStatic - ObjectType: " + ret.GetType().ToString());
|
||||
LSLStack.Push(ret);
|
||||
//return ret;
|
||||
}
|
||||
|
||||
public object POPToStack()
|
||||
{
|
||||
Common.SendToDebug("::POPToStack");
|
||||
//return LSLStack.Pop();
|
||||
object p = LSLStack.Pop();
|
||||
if (p.GetType() == typeof(UInt32))
|
||||
return (UInt32)p;
|
||||
if (p.GetType() == typeof(string))
|
||||
return (string)p;
|
||||
if (p.GetType() == typeof(Int32))
|
||||
return (Int32)p;
|
||||
if (p.GetType() == typeof(UInt16))
|
||||
return (UInt16)p;
|
||||
if (p.GetType() == typeof(float))
|
||||
return (float)p;
|
||||
if (p.GetType() == typeof(LSO_Enums.Vector))
|
||||
return (LSO_Enums.Vector)p;
|
||||
if (p.GetType() == typeof(LSO_Enums.Rotation))
|
||||
return (LSO_Enums.Rotation)p;
|
||||
if (p.GetType() == typeof(LSO_Enums.Key))
|
||||
return (LSO_Enums.Key)p;
|
||||
|
||||
return p;
|
||||
}
|
||||
|
||||
//public object POPToStack(UInt32 count)
|
||||
//{
|
||||
// // POP NUMBER FROM TOP OF STACK
|
||||
// //LSLStack.SetLength(LSLStack.Length - 4);
|
||||
// Common.SendToDebug("::POPToStack " + count);
|
||||
// if (count < 2)
|
||||
// return LSLStack.Pop();
|
||||
|
||||
// Stack<object> s = new Stack<object>();
|
||||
// for (int i = 0; i < count; i++)
|
||||
// {
|
||||
// s.Push(LSLStack.Pop);
|
||||
|
||||
// }
|
||||
|
||||
//}
|
||||
|
||||
public void POP()
|
||||
{
|
||||
// POP NUMBER FROM TOP OF STACK
|
||||
//LSLStack.SetLength(LSLStack.Length - 4);
|
||||
Common.SendToDebug("::POP");
|
||||
if (LSLStack.Count < 1)
|
||||
{
|
||||
//TODO: Temporary fix
|
||||
Common.SendToDebug("ERROR: TRYING TO POP EMPTY STACK!");
|
||||
}
|
||||
else
|
||||
{
|
||||
LSLStack.Pop();
|
||||
}
|
||||
}
|
||||
public void PUSH(object Param)
|
||||
{
|
||||
if (Param == null)
|
||||
{
|
||||
Common.SendToDebug("::PUSH: <null>");
|
||||
}
|
||||
else
|
||||
{
|
||||
|
||||
//Common.SendToDebug("::PUSH: " + Param.GetType());
|
||||
}
|
||||
|
||||
LSLStack.Push(Param);
|
||||
}
|
||||
public void ADD(UInt32 Param)
|
||||
{
|
||||
Common.SendToDebug("::ADD: " + Param);
|
||||
object o2 = LSLStack.Pop();
|
||||
object o1 = LSLStack.Pop();
|
||||
Common.SendToDebug("::ADD: Debug: o1: " + o1.GetType() + " (" + o1.ToString() + "), o2: " + o2.GetType() + " (" + o2.ToString() + ")");
|
||||
if (o2.GetType() == typeof(string))
|
||||
{
|
||||
LSLStack.Push((string)o1 + (string)o2);
|
||||
return;
|
||||
}
|
||||
if (o2.GetType() == typeof(UInt32))
|
||||
{
|
||||
LSLStack.Push((UInt32)o1 + (UInt32)o2);
|
||||
return;
|
||||
}
|
||||
|
||||
}
|
||||
public void SUB(UInt32 Param)
|
||||
{
|
||||
Common.SendToDebug("::SUB: " + Param);
|
||||
UInt32 i2 = (UInt32)LSLStack.Pop();
|
||||
UInt32 i1 = (UInt32)LSLStack.Pop();
|
||||
LSLStack.Push((UInt32)(i1 - i2));
|
||||
}
|
||||
public void MUL(UInt32 Param)
|
||||
{
|
||||
Common.SendToDebug("::SUB: " + Param);
|
||||
UInt32 i2 = (UInt32)LSLStack.Pop();
|
||||
UInt32 i1 = (UInt32)LSLStack.Pop();
|
||||
LSLStack.Push((UInt32)(i1 * i2));
|
||||
}
|
||||
public void DIV(UInt32 Param)
|
||||
{
|
||||
Common.SendToDebug("::DIV: " + Param);
|
||||
UInt32 i2 = (UInt32)LSLStack.Pop();
|
||||
UInt32 i1 = (UInt32)LSLStack.Pop();
|
||||
LSLStack.Push((UInt32)(i1 / i2));
|
||||
}
|
||||
|
||||
|
||||
public void MOD(UInt32 Param)
|
||||
{
|
||||
Common.SendToDebug("::MOD: " + Param);
|
||||
UInt32 i2 = (UInt32)LSLStack.Pop();
|
||||
UInt32 i1 = (UInt32)LSLStack.Pop();
|
||||
LSLStack.Push((UInt32)(i1 % i2));
|
||||
}
|
||||
public void EQ(UInt32 Param)
|
||||
{
|
||||
Common.SendToDebug("::EQ: " + Param);
|
||||
UInt32 i2 = (UInt32)LSLStack.Pop();
|
||||
UInt32 i1 = (UInt32)LSLStack.Pop();
|
||||
if (i1 == i2)
|
||||
{
|
||||
LSLStack.Push((UInt32)1);
|
||||
}
|
||||
else
|
||||
{
|
||||
LSLStack.Push((UInt32)0);
|
||||
}
|
||||
}
|
||||
public void NEQ(UInt32 Param)
|
||||
{
|
||||
Common.SendToDebug("::NEQ: " + Param);
|
||||
UInt32 i2 = (UInt32)LSLStack.Pop();
|
||||
UInt32 i1 = (UInt32)LSLStack.Pop();
|
||||
if (i1 != i2)
|
||||
{
|
||||
LSLStack.Push((UInt32)1);
|
||||
}
|
||||
else
|
||||
{
|
||||
LSLStack.Push((UInt32)0);
|
||||
}
|
||||
}
|
||||
public void LEQ(UInt32 Param)
|
||||
{
|
||||
Common.SendToDebug("::LEQ: " + Param);
|
||||
UInt32 i2 = (UInt32)LSLStack.Pop();
|
||||
UInt32 i1 = (UInt32)LSLStack.Pop();
|
||||
if (i1 <= i2)
|
||||
{
|
||||
LSLStack.Push((UInt32)1);
|
||||
}
|
||||
else
|
||||
{
|
||||
LSLStack.Push((UInt32)0);
|
||||
}
|
||||
}
|
||||
public void GEQ(UInt32 Param)
|
||||
{
|
||||
Common.SendToDebug("::GEQ: " + Param);
|
||||
UInt32 i2 = (UInt32)LSLStack.Pop();
|
||||
UInt32 i1 = (UInt32)LSLStack.Pop();
|
||||
if (i1 >= i2)
|
||||
{
|
||||
LSLStack.Push((UInt32)1);
|
||||
}
|
||||
else
|
||||
{
|
||||
LSLStack.Push((UInt32)0);
|
||||
}
|
||||
}
|
||||
public void LESS(UInt32 Param)
|
||||
{
|
||||
Common.SendToDebug("::LESS: " + Param);
|
||||
UInt32 i2 = (UInt32)LSLStack.Pop();
|
||||
UInt32 i1 = (UInt32)LSLStack.Pop();
|
||||
if (i1 < i2)
|
||||
{
|
||||
LSLStack.Push((UInt32)1);
|
||||
}
|
||||
else
|
||||
{
|
||||
LSLStack.Push((UInt32)0);
|
||||
}
|
||||
}
|
||||
public void GREATER(UInt32 Param)
|
||||
{
|
||||
Common.SendToDebug("::GREATER: " + Param);
|
||||
UInt32 i2 = (UInt32)LSLStack.Pop();
|
||||
UInt32 i1 = (UInt32)LSLStack.Pop();
|
||||
if (i1 > i2)
|
||||
{
|
||||
LSLStack.Push((UInt32)1);
|
||||
}
|
||||
else
|
||||
{
|
||||
LSLStack.Push((UInt32)0);
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
|
||||
public void BITAND()
|
||||
{
|
||||
Common.SendToDebug("::BITAND");
|
||||
UInt32 i2 = (UInt32)LSLStack.Pop();
|
||||
UInt32 i1 = (UInt32)LSLStack.Pop();
|
||||
LSLStack.Push((UInt32)(i1 & i2));
|
||||
}
|
||||
public void BITOR()
|
||||
{
|
||||
Common.SendToDebug("::BITOR");
|
||||
UInt32 i2 = (UInt32)LSLStack.Pop();
|
||||
UInt32 i1 = (UInt32)LSLStack.Pop();
|
||||
LSLStack.Push((UInt32)(i1 | i2));
|
||||
}
|
||||
public void BITXOR()
|
||||
{
|
||||
Common.SendToDebug("::BITXOR");
|
||||
UInt32 i2 = (UInt32)LSLStack.Pop();
|
||||
UInt32 i1 = (UInt32)LSLStack.Pop();
|
||||
LSLStack.Push((UInt32)(i1 ^ i2));
|
||||
}
|
||||
public void BOOLAND()
|
||||
{
|
||||
Common.SendToDebug("::BOOLAND");
|
||||
bool b2 = bool.Parse((string)LSLStack.Pop());
|
||||
bool b1 = bool.Parse((string)LSLStack.Pop());
|
||||
if (b1 && b2)
|
||||
{
|
||||
LSLStack.Push((UInt32)1);
|
||||
}
|
||||
else
|
||||
{
|
||||
LSLStack.Push((UInt32)0);
|
||||
}
|
||||
}
|
||||
public void BOOLOR()
|
||||
{
|
||||
Common.SendToDebug("::BOOLOR");
|
||||
bool b2 = bool.Parse((string)LSLStack.Pop());
|
||||
bool b1 = bool.Parse((string)LSLStack.Pop());
|
||||
|
||||
if (b1 || b2)
|
||||
{
|
||||
LSLStack.Push((UInt32)1);
|
||||
}
|
||||
else
|
||||
{
|
||||
LSLStack.Push((UInt32)0);
|
||||
}
|
||||
|
||||
}
|
||||
public void NEG(UInt32 Param)
|
||||
{
|
||||
Common.SendToDebug("::NEG: " + Param);
|
||||
//UInt32 i2 = (UInt32)LSLStack.Pop();
|
||||
UInt32 i1 = (UInt32)LSLStack.Pop();
|
||||
LSLStack.Push((UInt32)(i1 * -1));
|
||||
}
|
||||
public void BITNOT()
|
||||
{
|
||||
//Common.SendToDebug("::BITNOT");
|
||||
//UInt32 i2 = (UInt32)LSLStack.Pop();
|
||||
//UInt32 i1 = (UInt32)LSLStack.Pop();
|
||||
//LSLStack.Push((UInt32)(i1 / i2));
|
||||
}
|
||||
public void BOOLNOT()
|
||||
{
|
||||
//Common.SendToDebug("::BOOLNOT");
|
||||
////UInt32 i2 = (UInt32)LSLStack.Pop();
|
||||
//UInt32 i1 = (UInt32)LSLStack.Pop();
|
||||
//LSLStack.Push((UInt32)(i1));
|
||||
}
|
||||
|
||||
|
||||
}
|
||||
}
|
||||
Reference in New Issue
Block a user