//ssm2017_authdoor
// @copyright  Copyright (C) 2007 ssm2017 Binder (S.Massiaux). All rights reserved. 
// @license  GNU/GPL, http://www.gnu.org/licenses/gpl-2.0.html 
// ssm2017_authdoor_diaph is free software. This version may have been modified pursuant to the 
// GNU General Public License, and as distributed it includes or is derivative 
// of works licensed under the GNU General Public License or other free or open 
// source software licenses.  
 
//XYZ Coordinates of the closed door 
vector closed;
//XYZ Coordinates of the opened door 
vector open;
//time before the door close itself  
float time = 10.0;
// sound uuid
key sound = "07cccfd5-62e5-fbf3-0e91-6944d952ef0f"; 
// notecard vars
integer iLine = 0;
list auth;
key authNoteCard;
default 
{
    state_entry()
    {
        closed = llGetLocalPos();
        // reset auth list
        auth = [];
        // read the notecard
        authNoteCard = llGetNotecardLine("auth",iLine);
        // preload the sound
        llPreloadSound(sound);
    }
    touch_start(integer total_number)
    {
        // check if avatar that touched is in the list
        if ( ~llListFindList( auth, (list)(llDetectedName(0)) ))
        {
        llPlaySound(sound,1);
        llSetPos(closed + <0.,0.,5.>);
        llSay(0, "Welcome "+ llDetectedName(0) );
        llSleep(time);             llPlaySound(sound,1);
        llSetPos(closed);
        }
        else
        {
        llSay(0,"Sorry "+ llDetectedName(0) + " but your are not authorized to open this door.");
        }
    }
    dataserver(key queryId, string data)
    {
        if(queryId == authNoteCard)
        {
            if(data != EOF)
            {
                auth += [data];
                authNoteCard = llGetNotecardLine("auth",++iLine);
            } 
        } 
    }
}