From 9eb015e440fc656f4a6b9022f71be853e096a8cb Mon Sep 17 00:00:00 2001
From: zontreck <tarapiccari@gmail.com>
Date: Fri, 4 Oct 2024 23:37:27 -0700
Subject: [PATCH] fix(settings.lsl): fix: #3 - finish implementing basic
 settings module

Signed-off-by: zontreck <tarapiccari@gmail.com>
---
 src/raw/settings.lsl | 37 ++++++++++++++++++++++++++-----------
 1 file changed, 26 insertions(+), 11 deletions(-)

diff --git a/src/raw/settings.lsl b/src/raw/settings.lsl
index eeed1ec..1aac763 100644
--- a/src/raw/settings.lsl
+++ b/src/raw/settings.lsl
@@ -4,9 +4,28 @@
 #include "../external/AriasCreations/Common.lsl"
 #include "../external/AriasCreations/Helpers.lsl"
 
+reqAllSettings(){
+
+    DEBUG_FUNC(true, "req_all_settings", []);
+    // List Found Keys
+    list lKeys = llLinksetDataFindKeys("nusetting.", 0, 0);
+    integer i = 0;
+    integer end = llGetListLength(lKeys);
+    for(i=0;i<end; i++) {
+        sKey = llList2String(lKeys, i);
+        ReadSetting(llGetSubString(sKey, 9, -1));
+    }
+
+    DEBUG_FUNC(false, "req_all_settings", []);
+}
 
 default
 {
+    state_entry() {
+        llSetTimerEvent(5); // TODO: Change this to schedule with the TaskScheduler module for a callback
+        // After expiration of timer, send all settings
+    }
+
     changed(integer iChange) {
         if(iChange & CHANGED_OWNER) {
             llLinksetDataDeleteFound("nusetting.", "");
@@ -14,6 +33,12 @@ default
         }
     }
 
+    timer() {
+        llSetTimerEvent(0);
+
+        reqAllSettings();
+    }
+
     link_message(integer iSender, integer iNum, string sMsg, key kID)
     {
         DEBUG_FUNC(true, "link_message", [iNum, sMsg, kID]);
@@ -24,17 +49,7 @@ default
             } else if(llJsonGetValue(sMsg, ["op"]) == OP_SETTINGS_READ) {
                 string sKey = llJsonGetValue(sMsg, ["key"]);
                 if(sKey == "ALL") {
-                    DEBUG_FUNC(true, "req_all_settings", []);
-                    // List Found Keys
-                    list lKeys = llLinksetDataFindKeys("nusetting.", 0, 0);
-                    integer i = 0;
-                    integer end = llGetListLength(lKeys);
-                    for(i=0;i<end; i++) {
-                        sKey = llList2String(lKeys, i);
-                        ReadSetting(llGetSubString(sKey, 9, -1));
-                    }
-
-                    DEBUG_FUNC(false, "req_all_settings", []);
+                    reqAllSettings();
                 }
                 ReadSetting(sKey);
             } else if(llJsonGetValue(sMsg, ["op"]) == OP_SETTINGS_DELETE) {