* Updates LSL2CS converter

* All objects are not touchable by default now
* When a script listens for one of the touch events in the state, an object becomes touchable.
* All LSL scripts report which events they consume now
** This uses semi-complicated Regex to discover the events, stick them in a dictionary, and then write a method call into each script state's state_entry() event.
** Tedd may figure out a better way to do this in the future.  For now, this works for LSL.

4 files changed, 209 insertions, 1 deletions

diff --git a/OpenSim/Region/ScriptEngine/Common/BuiltIn_Commands_BaseClass.cs b/OpenSim/Region/ScriptEngine/Common/BuiltIn_Commands_BaseClass.cs
index cb4ca39..b6468c2 100644
--- a/OpenSim/Region/ScriptEngine/Common/BuiltIn_Commands_BaseClass.cs
+++ b/OpenSim/Region/ScriptEngine/Common/BuiltIn_Commands_BaseClass.cs
@@ -1990,6 +1990,10 @@ namespace OpenSim.Region.ScriptEngine.Common
             return m_LSL_Functions.osDrawImage(drawList, width, height, imageUrl);
         }
 
+        public void osSetStateEvents(int events)
+        {
+            m_LSL_Functions.osSetStateEvents(events);
+        }
 
         //
 
diff --git a/OpenSim/Region/ScriptEngine/Common/LSL_BuiltIn_Commands.cs b/OpenSim/Region/ScriptEngine/Common/LSL_BuiltIn_Commands.cs
index 26e56c7..4192d40 100644
--- a/OpenSim/Region/ScriptEngine/Common/LSL_BuiltIn_Commands.cs
+++ b/OpenSim/Region/ScriptEngine/Common/LSL_BuiltIn_Commands.cs
@@ -5597,6 +5597,11 @@ namespace OpenSim.Region.ScriptEngine.Common
            return drawList;
         }
 
+        public void osSetStateEvents(int events)
+        {
+            m_host.setScriptEvents(m_itemID,events);
+        }
+
         private void NotImplemented(string command)
         {
             if (throwErrorOnNotImplemented)
diff --git a/OpenSim/Region/ScriptEngine/Common/LSL_BuiltIn_Commands_Interface.cs b/OpenSim/Region/ScriptEngine/Common/LSL_BuiltIn_Commands_Interface.cs
index 4e632ef..205e908 100644
--- a/OpenSim/Region/ScriptEngine/Common/LSL_BuiltIn_Commands_Interface.cs
+++ b/OpenSim/Region/ScriptEngine/Common/LSL_BuiltIn_Commands_Interface.cs
@@ -669,5 +669,6 @@ namespace OpenSim.Region.ScriptEngine.Common
         string osSetPenSize(string drawList, int penSize);
         string osSetPenColour(string drawList, string colour);
         string osDrawImage(string drawList, int width, int height, string imageUrl);
+        void osSetStateEvents(int events);
     }
 }
diff --git a/OpenSim/Region/ScriptEngine/DotNetEngine/Compiler/LSL/LSL2CSConverter.cs b/OpenSim/Region/ScriptEngine/DotNetEngine/Compiler/LSL/LSL2CSConverter.cs
index 9f753df..8d85b69 100644
--- a/OpenSim/Region/ScriptEngine/DotNetEngine/Compiler/LSL/LSL2CSConverter.cs
+++ b/OpenSim/Region/ScriptEngine/DotNetEngine/Compiler/LSL/LSL2CSConverter.cs
@@ -32,6 +32,7 @@ using System;
 
 namespace OpenSim.Region.ScriptEngine.DotNetEngine.Compiler.LSL
 {
+    
     public class LSL2CSConverter
     {
 
@@ -41,6 +42,7 @@ namespace OpenSim.Region.ScriptEngine.DotNetEngine.Compiler.LSL
         //private Regex rnw = new Regex(@"[a-zA-Z0-9_\-]", RegexOptions.Compiled);
         private Dictionary<string, string> dataTypes = new Dictionary<string, string>();
         private Dictionary<string, string> quotes = new Dictionary<string, string>();
+        private Dictionary<string, scriptEvents> state_events = new Dictionary<string, scriptEvents>();
 
         public LSL2CSConverter()
         {
@@ -294,8 +296,63 @@ namespace OpenSim.Region.ScriptEngine.DotNetEngine.Compiler.LSL
             }
 
 
+            // Finds out which events are in the script and writes a method call with the events in each state_entry event
+
+            // Note the (?:)? block optional, and not returning a group.   Less greedy then .*
+
+            string[] eventmatches = new string[0];
+            //Regex stateevents = new Regex(@"(public void )([^_]+)(_event_)([^\(]+)[\(\)]+\s+[^\{]\{");
+            eventmatches = Regex.Split(Script, @"public void\s([^_]+)_event_([^\(]+)\((?:[a-zA-Z0-9\s_,\.\-]+)?\)+\s+[^\{]\{", RegexOptions.Compiled | RegexOptions.Multiline | RegexOptions.Singleline | RegexOptions.IgnoreCase);
+            for (int pos = 0; pos<eventmatches.GetUpperBound(0);pos++)
+            {
+                pos++; // garbage
+
+                string statea = eventmatches[pos]; pos++;
+                string eventa = eventmatches[pos];
+                scriptEvents storedEventsForState = scriptEvents.None;
+                if (state_events.ContainsKey(statea))
+                {
+                    storedEventsForState = state_events[statea];
+                    state_events[statea] |= convertnametoFlag(eventa);
+                }
+                else
+                {
+                    state_events.Add(statea, convertnametoFlag(eventa));
+                }
+                System.Console.WriteLine("State:" + statea + ", event: " + eventa);
+            }
+            System.Console.WriteLine("Matches:" + eventmatches.GetUpperBound(0));
             // Add namespace, class name and inheritance
 
+            // Looking *ONLY* for state entry events
+            string scriptCopy = "";
+            
+            //Only match State_Entry events now
+            // Note the whole regex is a group, then we have the state this entry belongs to.
+            eventmatches = Regex.Split(Script, @"(public void\s([^_]+)_event_state_entry[\(\)]+\s+[^\{]\{)", RegexOptions.Compiled | RegexOptions.Multiline | RegexOptions.Singleline | RegexOptions.IgnoreCase);
+            int endloop = eventmatches.GetUpperBound(0);
+            for (int pos = 0; pos < endloop; pos++)
+            {
+                // Returns text before state entry match,
+                scriptCopy += eventmatches[pos]; pos++;
+
+                // Returns text of state entry match, 
+                scriptCopy += eventmatches[pos]; pos++;
+                
+                // Returns which state we're matching and writes a method call to the end of the above state_entry
+                scriptCopy += "\r\n\t\tosSetStateEvents((int)" + (int)state_events[eventmatches[pos]] + ");"; //pos++;
+                
+                // adds the remainder of the script.
+                if ((pos + 1) == endloop)
+                {
+                    pos++;
+                    scriptCopy += eventmatches[pos++];
+                }
+                
+            }
+            // save modified script.
+            Script = scriptCopy;
+            //System.Console.WriteLine(Script);
             Return = String.Empty;// +
                      //"using OpenSim.Region.ScriptEngine.Common; using System.Collections.Generic;";
   
@@ -309,10 +366,151 @@ namespace OpenSim.Region.ScriptEngine.DotNetEngine.Compiler.LSL
             Return += Script;
             //Return += "} }\r\n";
 
-
+            state_events.Clear();
             quotes.Clear();
 
             return Return;
         }
+        public scriptEvents convertnametoFlag(string eventname)
+        {
+            switch (eventname)
+            {
+                case "attach":
+                    return scriptEvents.attach;
+                    //break;
+               // case "at_rot_target":
+                    //return (long)scriptEvents.at_rot_target;
+                    //break;
+                //case "at_target":
+                    //return (long)scriptEvents.at_target;
+                    //break;
+                //case "changed":
+                    //return (long)scriptEvents.changed;
+                    //break;
+                case "collision":
+                    return scriptEvents.collision;
+                   // break;
+                case "collision_end":
+                    return scriptEvents.collision_end;
+                    //break;
+                case "collision_start":
+                    return scriptEvents.collision_start;
+                   // break;
+                case "control":
+                    return scriptEvents.control;
+                    //break;
+                case "dataserver":
+                    return scriptEvents.dataserver;
+                   // break;
+                case "email":
+                    return scriptEvents.email;
+                   // break;
+                case "http_response":
+                    return scriptEvents.http_response;
+                   // break;
+                case "land_collision":
+                    return scriptEvents.land_collision;
+                   // break;
+                case "land_collision_end":
+                    return scriptEvents.land_collision_end;
+                   // break;
+                case "land_collision_start":
+                    return scriptEvents.land_collision_start;
+                   // break;
+                case "link_message":
+                    return scriptEvents.link_message;
+                  //  break;
+                case "listen":
+                    return scriptEvents.listen;
+                  //  break;
+                case "money":
+                    return scriptEvents.money;
+                   // break;
+                case "moving_end":
+                    return scriptEvents.moving_end;
+                   // break;
+                case "moving_start":
+                    return scriptEvents.moving_start;
+                   // break;
+                case "not_at_rot_target":
+                    return scriptEvents.not_at_rot_target;
+                   // break;
+                case "not_at_target":
+                    return scriptEvents.not_at_target;
+                  //  break;
+               // case "no_sensor":
+                    //return (long)scriptEvents.no_sensor;
+                    //break;
+                //case "on_rez":
+                    //return (long)scriptEvents.on_rez;
+                  //  break;
+                case "remote_data":
+                    return scriptEvents.remote_data;
+                   // break;
+                case "run_time_permissions":
+                    return scriptEvents.run_time_permissions;
+                   // break;
+                //case "sensor":
+                    //return (long)scriptEvents.sensor;
+                  //  break;
+                case "state_entry":
+                    return scriptEvents.state_entry;
+                   // break;
+                case "state_exit":
+                    return scriptEvents.state_exit;
+                   // break;
+                case "timer":
+                    return scriptEvents.timer;
+                   // break;
+                case "touch":
+                    return scriptEvents.touch;
+                   // break;
+                case "touch_end":
+                    return scriptEvents.touch_end;
+                   // break;
+                case "touch_start":
+                    return scriptEvents.touch_start;
+                   // break;
+                case "object_rez":
+                    return scriptEvents.object_rez;
+                default:
+                    return 0;
+                    //break;
+            }
+            //return 0;
+        }
+    }
+
+    [Flags]
+    public enum scriptEvents : int
+    {
+        None = 0,
+        attach = 1,
+        collision = 15,
+        collision_end = 32,
+        collision_start = 64,
+        control = 128,
+        dataserver = 256,
+        email = 512,
+        http_response = 1024,
+        land_collision = 2048,
+        land_collision_end = 4096,
+        land_collision_start = 8192,
+        link_message = 16384,
+        listen = 32768,
+        money = 65536,
+        moving_end = 131072,
+        moving_start = 262144,
+        not_at_rot_target = 524288,
+        not_at_target = 1048576,
+        remote_data = 8388608,
+        run_time_permissions = 268435456,
+        state_entry = 1073741824,
+        state_exit = 2,
+        timer = 4,
+        touch = 8,
+        touch_end = 536870912,
+        touch_start = 2097152,
+        object_rez = 4194304
     }
 }
\ No newline at end of file