2 files changed, 43 insertions, 1 deletions

diff --git a/OpenSim/Region/ScriptEngine/YEngine/XMREngine.cs b/OpenSim/Region/ScriptEngine/YEngine/XMREngine.cs
index f30ecc8..d2b4ebd 100644
--- a/OpenSim/Region/ScriptEngine/YEngine/XMREngine.cs
+++ b/OpenSim/Region/ScriptEngine/YEngine/XMREngine.cs
@@ -854,7 +854,7 @@ namespace OpenSim.Region.ScriptEngine.Yengine
         public bool PostScriptEvent(UUID itemID, EventParams parms)
         {
             XMRInstance instance = GetInstance(itemID);
-            if(instance == null)
+            if (instance == null)
                 return false;
 
             TraceCalls("[YEngine]: YEngine.PostScriptEvent({0},{1})", itemID.ToString(), parms.EventName);
@@ -863,6 +863,17 @@ namespace OpenSim.Region.ScriptEngine.Yengine
             return true;
         }
 
+        public void CancelScriptEvent(UUID itemID, string eventName)
+        {
+            XMRInstance instance = GetInstance(itemID);
+            if (instance == null)
+                return;
+
+            TraceCalls("[YEngine]: YEngine.CancelScriptEvent({0},{1})", itemID.ToString(), eventName);
+
+            instance.CancelEvent(eventName);
+        }
+
         // Events targeted at all scripts in the given prim.
         //   localID = which prim
         //   parms   = event to post
diff --git a/OpenSim/Region/ScriptEngine/YEngine/XMRInstRun.cs b/OpenSim/Region/ScriptEngine/YEngine/XMRInstRun.cs
index 30e397b..57b9e2d 100644
--- a/OpenSim/Region/ScriptEngine/YEngine/XMRInstRun.cs
+++ b/OpenSim/Region/ScriptEngine/YEngine/XMRInstRun.cs
@@ -237,6 +237,37 @@ namespace OpenSim.Region.ScriptEngine.Yengine
             }
         }
 
+        public void CancelEvent(string eventName)
+        {
+            ScriptEventCode evc;
+            try
+            {
+                evc = (ScriptEventCode)Enum.Parse(typeof(ScriptEventCode), eventName);
+            }
+            catch
+            {
+                return;
+            }
+
+            lock (m_QueueLock)
+            {
+                if(m_EventQueue.Count == 0)
+                    return;
+
+                LinkedListNode<EventParams> lln2 = null;
+                for (lln2 = m_EventQueue.First; lln2 != null; lln2 = lln2.Next)
+                {
+                    EventParams evt2 = lln2.Value;
+                    if(evt2.EventName.Equals(eventName))
+                    {
+                        m_EventQueue.Remove(lln2);
+                        if (evc >= 0 && m_EventCounts[(int)evc] > 0)
+                            m_EventCounts[(int)evc]--;
+                    }
+                }
+            }
+        }
+
          // This is called in the script thread to step script until it calls
          // CheckRun().  It returns what the instance's next state should be,
          // ONSLEEPQ, ONYIELDQ, SUSPENDED or FINISHED.