Adding a script event, changed(CHANGED_ANIMATION)

This is sent to all root prims of all attachments of an avatar when the
animation state changes. llGetAnimation() can thenbe used to find the
new movement animation. This eliminates the need for fast timers in AOs

2 files changed, 23 insertions, 1 deletions

diff --git a/OpenSim/Region/Framework/Interfaces/IScriptModule.cs b/OpenSim/Region/Framework/Interfaces/IScriptModule.cs
index 7d7f904..51dcb7d 100644
--- a/OpenSim/Region/Framework/Interfaces/IScriptModule.cs
+++ b/OpenSim/Region/Framework/Interfaces/IScriptModule.cs
@@ -38,5 +38,6 @@ namespace OpenSim.Region.Framework.Interfaces
         string GetXMLState(UUID itemID);
 
         bool PostScriptEvent(UUID itemID, string name, Object[] args);
+        bool PostObjectEvent(UUID itemID, string name, Object[] args);
     }
 }
diff --git a/OpenSim/Region/Framework/Scenes/ScenePresence.cs b/OpenSim/Region/Framework/Scenes/ScenePresence.cs
index 2c316a6..d06c583 100644
--- a/OpenSim/Region/Framework/Scenes/ScenePresence.cs
+++ b/OpenSim/Region/Framework/Scenes/ScenePresence.cs
@@ -223,6 +223,8 @@ namespace OpenSim.Region.Framework.Scenes
         string m_callbackURI;
         ulong m_rootRegionHandle;
 
+        private IScriptModule[] m_scriptEngines;
+
         #region Properties
 
         /// <summary>
@@ -585,6 +587,8 @@ namespace OpenSim.Region.Framework.Scenes
             if (gm != null)
                 m_grouptitle = gm.GetGroupTitle(m_uuid);
 
+            m_scriptEngines = m_scene.RequestModuleInterfaces<IScriptModule>();
+
             AbsolutePosition = m_controllingClient.StartPos;
             AdjustKnownSeeds();
 
@@ -1943,7 +1947,24 @@ namespace OpenSim.Region.Framework.Scenes
             
             if (m_animations.TrySetDefaultAnimation(anim, m_controllingClient.NextAnimationSequenceNumber, UUID.Zero))
             {
-                SendAnimPack();
+                if (m_scriptEngines != null)
+                {
+                    lock (m_attachments)
+                    {
+                        foreach (SceneObjectGroup grp in m_attachments)
+                        {
+                            // 16384 is CHANGED_ANIMATION
+                            //
+                            // Send this to all attachment root prims
+                            //
+                            foreach (IScriptModule m in m_scriptEngines)
+                            {
+                                m.PostObjectEvent(grp.RootPart.UUID, "changed", new Object[] {16384});
+                            }
+                            SendAnimPack();
+                        }
+                    }
+                }
             }
         }