// SPDX-License-Identifier: MIT
// Copyright (c) 2026 Incoprea
// Find duplicate linked-prim names
// Not compiled or tested in-world
// Setup: Put in a rezzed linkset of 2-64 prims and touch as owner. Seated avatars are excluded.
// Stop / restore: Remove or disable. This inspector changes no build properties.
// Notes: Exact case-sensitive names are compared. Duplicate names can be intentional, but name-driven controls should handle them explicitly.
// License: see LICENSE in this distribution.
// Original Incoprea example. MIT.
default
{
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner()) return;
        if(llGetAttached())
        {
            llOwnerSay("Use a rezzed linkset.");
            return;
        }
        integer total=llGetObjectPrimCount(llGetKey());
        if(total<2 || total>64)
        {
            llOwnerSay("Use a linkset of 2-64 prims.");
            return;
        }
        list names=[];
        list numbers=[];
        integer i;
        for(i=1;i<=total;++i)
        {
            string name=llGetLinkName(i);
            integer previous=llListFindList(names,[name]);
            if(previous!=-1) llOwnerSay("Duplicate name ["+name+"] at links "+llList2String(numbers,previous)+" and "+(string)i);
            else
            {
                names += [name];
                numbers += [i];
            }
        }
        llOwnerSay("Link-name audit finished.");
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER) llResetScript();
    }
}