From c6dfc99f22efb5d8644819e38c8e6f59cf59768f Mon Sep 17 00:00:00 2001
From: Justin Clarke Casey
Date: Tue, 16 Sep 2008 17:48:57 +0000
Subject: * Apply http://opensimulator.org/mantis/view.php?id=2203 *
 Implementation of LSL llBreakLink and llBreakAllLinks * Thanks Y. Nitta!

---
 .../ScriptEngine/Common/LSL_BuiltIn_Commands.cs    | 69 ++++++++++++++++++++-
 .../Shared/Api/Implementation/LSL_Api.cs           | 70 +++++++++++++++++++++-
 2 files changed, 135 insertions(+), 4 deletions(-)

diff --git a/OpenSim/Region/ScriptEngine/Common/LSL_BuiltIn_Commands.cs b/OpenSim/Region/ScriptEngine/Common/LSL_BuiltIn_Commands.cs
index 76b88bc..a74f304 100644
--- a/OpenSim/Region/ScriptEngine/Common/LSL_BuiltIn_Commands.cs
+++ b/OpenSim/Region/ScriptEngine/Common/LSL_BuiltIn_Commands.cs
@@ -2986,13 +2986,78 @@ namespace OpenSim.Region.ScriptEngine.Common
         public void llBreakLink(int linknum)
         {
             m_host.AddScriptLPS(1);
-            NotImplemented("llBreakLink");
+            UUID invItemID = InventorySelf();
+            if ((m_host.TaskInventory[invItemID].PermsMask & BuiltIn_Commands_BaseClass.PERMISSION_CHANGE_LINKS) == 0)
+            {
+                ShoutError("Script trying to link but PERMISSION_CHANGE_LINKS permission not set!");
+                return;
+            }
+            if (linknum < BuiltIn_Commands_BaseClass.LINK_THIS)
+                return;
+            SceneObjectGroup parentPrim = m_host.ParentGroup;
+            SceneObjectPart childPrim = null;
+            switch(linknum)
+            {
+                case BuiltIn_Commands_BaseClass.LINK_ROOT:
+                    break;
+                case BuiltIn_Commands_BaseClass.LINK_SET:
+                case BuiltIn_Commands_BaseClass.LINK_ALL_OTHERS:
+                case BuiltIn_Commands_BaseClass.LINK_ALL_CHILDREN:
+                case BuiltIn_Commands_BaseClass.LINK_THIS:
+                    foreach(SceneObjectPart part in parentPrim.Children.Values)
+                    {
+                        if (part.UUID != m_host.UUID)
+                        {
+                            childPrim = part;
+                            break;
+                        }
+                    }
+                    break;
+                default:
+                    childPrim = parentPrim.GetLinkNumPart(linknum);
+                    if (childPrim.UUID == m_host.UUID)
+                        childPrim = null;
+                    break;
+            }
+            if (linknum == BuiltIn_Commands_BaseClass.LINK_ROOT)
+            {
+                // Restructuring Multiple Prims.
+                List<SceneObjectPart> parts = new List<SceneObjectPart>(parentPrim.Children.Values);
+                parts.Remove(parentPrim.RootPart);
+                foreach (SceneObjectPart part in parts)
+                {
+                    parentPrim.DelinkFromGroup(part.LocalId, true);
+                }
+                parentPrim.TriggerScriptChangedEvent(Changed.LINK);
+                if (parts.Count > 0) {
+                    SceneObjectPart newRoot = parts[0];
+                    parts.Remove(newRoot);
+                    foreach (SceneObjectPart part in parts)
+                    {
+                        part.UpdateFlag = 0;
+                        newRoot.ParentGroup.LinkToGroup(part.ParentGroup);
+                    }
+                }
+            }
+            else
+            {
+                if (childPrim == null)
+                    return;
+                parentPrim.DelinkFromGroup(childPrim.LocalId, true);
+                parentPrim.TriggerScriptChangedEvent(Changed.LINK);
+            }
         }
 
         public void llBreakAllLinks()
         {
             m_host.AddScriptLPS(1);
-            NotImplemented("llBreakAllLinks");
+            SceneObjectGroup parentPrim = m_host.ParentGroup;
+            List<SceneObjectPart> parts = new List<SceneObjectPart>(parentPrim.Children.Values);
+            parts.Remove(parentPrim.RootPart);
+            foreach (SceneObjectPart part in parts) {
+                parentPrim.DelinkFromGroup(part.LocalId, true);
+                parentPrim.TriggerScriptChangedEvent(Changed.LINK);
+            }
         }
 
         public string llGetLinkKey(int linknum)
diff --git a/OpenSim/Region/ScriptEngine/Shared/Api/Implementation/LSL_Api.cs b/OpenSim/Region/ScriptEngine/Shared/Api/Implementation/LSL_Api.cs
index d5fc9a6..249b4dd 100644
--- a/OpenSim/Region/ScriptEngine/Shared/Api/Implementation/LSL_Api.cs
+++ b/OpenSim/Region/ScriptEngine/Shared/Api/Implementation/LSL_Api.cs
@@ -2830,13 +2830,79 @@ namespace OpenSim.Region.ScriptEngine.Shared.Api
         public void llBreakLink(int linknum)
         {
             m_host.AddScriptLPS(1);
-            NotImplemented("llBreakLink");
+            UUID invItemID = InventorySelf();
+            if ((m_host.TaskInventory[invItemID].PermsMask & ScriptBaseClass.PERMISSION_CHANGE_LINKS) == 0)
+            {
+                ShoutError("Script trying to link but PERMISSION_CHANGE_LINKS permission not set!");
+                return;
+            }
+            if (linknum < ScriptBaseClass.LINK_THIS)
+              return;
+            SceneObjectGroup parentPrim = m_host.ParentGroup;
+            SceneObjectPart childPrim = null;
+            switch(linknum)
+            {
+                case ScriptBaseClass.LINK_ROOT:
+                    break;
+                case ScriptBaseClass.LINK_SET:
+                case ScriptBaseClass.LINK_ALL_OTHERS:
+                case ScriptBaseClass.LINK_ALL_CHILDREN:
+                case ScriptBaseClass.LINK_THIS:
+                    foreach(SceneObjectPart part in parentPrim.Children.Values)
+                    {
+                        if (part.UUID != m_host.UUID)
+                        {
+                            childPrim = part;
+                            break;
+                        }
+                    }
+                    break;
+                default:
+                    childPrim = parentPrim.GetLinkNumPart(linknum);
+                    if (childPrim.UUID == m_host.UUID)
+                        childPrim = null;
+                    break;
+            }
+            if (linknum == ScriptBaseClass.LINK_ROOT)
+            {
+                // Restructuring Multiple Prims.
+                List<SceneObjectPart> parts = new List<SceneObjectPart>(parentPrim.Children.Values);
+                parts.Remove(parentPrim.RootPart);
+                foreach (SceneObjectPart part in parts)
+                {
+                    parentPrim.DelinkFromGroup(part.LocalId, true);
+                }
+                parentPrim.TriggerScriptChangedEvent(Changed.LINK);
+                if (parts.Count > 0) {
+                    SceneObjectPart newRoot = parts[0];
+                    parts.Remove(newRoot);
+                    foreach (SceneObjectPart part in parts)
+                    {
+                        part.UpdateFlag = 0;
+                        newRoot.ParentGroup.LinkToGroup(part.ParentGroup);
+                    }
+                }
+            }
+            else
+            {
+                if (childPrim == null)
+                    return;
+                parentPrim.DelinkFromGroup(childPrim.LocalId, true);
+                parentPrim.TriggerScriptChangedEvent(Changed.LINK);
+            }
         }
 
         public void llBreakAllLinks()
         {
             m_host.AddScriptLPS(1);
-            NotImplemented("llBreakAllLinks");
+            SceneObjectGroup parentPrim = m_host.ParentGroup;
+            List<SceneObjectPart> parts = new List<SceneObjectPart>(parentPrim.Children.Values);
+            parts.Remove(parentPrim.RootPart);
+            foreach (SceneObjectPart part in parts)
+            {
+                parentPrim.DelinkFromGroup(part.LocalId, true);
+                parentPrim.TriggerScriptChangedEvent(Changed.LINK);
+            }
         }
 
         public LSL_Types.LSLString llGetLinkKey(int linknum)
-- 
cgit v1.1