Included Vindar's patch to fix a bug on europeen clients

Author: EsyArda

ChatNotif.plugin

@@ -3,7 +3,7 @@
     <Information>
         <Name>ChatNotif</Name>
         <Author>Esy</Author>
-        <Version>1.2.1</Version>
+        <Version>1.2.2</Version>
         <Description>
             A simple plugin to display chat messages. Visit https://github.com/LilianHiault/ChatNotif#readme for more information.
         </Description>

ChatNotif.plugincompendium

@@ -2,7 +2,7 @@
 <PluginConfig xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
   <Id>1208</Id>
   <Name>ChatNotif</Name>
-  <Version>1.2.1</Version>
+  <Version>1.2.2</Version>
   <Author>Esy</Author>
   <InfoUrl>https://www.lotrointerface.com/downloads/info1208</InfoUrl>
   <DownloadUrl>https://www.lotrointerface.com/downloads/download1208</DownloadUrl>

ChatNotif/Settings.lua

@@ -1,3 +1,5 @@
+import "Esy.ChatNotif.VindarPatch";
+
 -- Settings
 
 -- Default settings
@@ -36,7 +38,8 @@ SettingsDataScope = Turbine.DataScope.Character;
 
 -- Load settings from the file
 function LoadSettings()
-    local loadedSettings = Turbine.PluginData.Load(SettingsDataScope, SettingsFileName);
+    -- local loadedSettings = Turbine.PluginData.Load(SettingsDataScope, SettingsFileName);
+    local loadedSettings = PatchDataLoad(SettingsDataScope, SettingsFileName);
 
     if (type(loadedSettings) == 'table') then
         SETTINGS = loadedSettings;
@@ -58,7 +61,8 @@ end
 
 -- Save settings for the character in the file
 function SaveSettings()
-    Turbine.PluginData.Save(SettingsDataScope, SettingsFileName, SETTINGS);
+    -- Turbine.PluginData.Save(SettingsDataScope, SettingsFileName, SETTINGS);
+    PatchDataSave(SettingsDataScope, SettingsFileName, SETTINGS);
     if SETTINGS.DEBUG then Turbine.Shell.WriteLine("> Settings Saved") end
 end
 

ChatNotif/VindarPatch.lua

@@ -0,0 +1,100 @@
+--[[ Vindar, 11/2010
+     A patch for the Turbine.PluginData bug for europeen clients. It's dirty but it seems to works :)
+]]--
+
+
+-- return a copy of the object obj in a safe format
+local function _convSafe(obj)
+	if type(obj)=="number" then return(tostring(obj)) end
+	if type(obj)~="string" then return(obj) end
+	local res = ""
+	for i,v in ipairs({obj:byte(1,-1)}) do
+		if (v < 32) or (v > 125) then res = res .. "#" .. tonumber(v) .. "#"
+		else
+			res = res .. string.char(v)
+			if v == 35 then res = res .. "#" end
+		end
+	end
+	if res:byte(1,1) == 35 then return("#" .. res) end
+	if (tonumber(res)~= nil) then return("#" .. res) end
+	return res
+end
+local function _copySafe(obj)
+	if type(obj) ~= "table" then return _convSafe(obj) elseif lookupSafe[obj] then return lookupSafe[obj] end
+	local newt = {}
+	lookupSafe[obj] = newt
+	for i, v in pairs(obj) do newt[_copySafe(i)] = _copySafe(v) end
+	return setmetatable(newt, getmetatable(obj))
+end
+function convSafe(obj)
+	lookupSafe = {}
+	local retVal=_copySafe(obj)
+	lookupSafe=nil;
+	return retVal;
+end
+
+
+-- the inverse operation
+local function _convBack(obj)
+	if type(obj) ~= "string" then return obj end
+	if obj == "" then return "" end
+	local num = tonumber(obj)
+	if num ~= nil then return num end
+	local res = ""
+	if obj:byte(1,1) == 35 then obj = string.sub(obj,2,-1) end
+	while string.len(obj)~=0 do
+		if 		obj:byte(1,1) ~= 35 then res = res .. string.char(obj:byte(1,1)); obj = string.sub(obj,2,-1)
+		elseif obj:byte(2,2) == 35 then  res = res .. "#"; obj = string.sub(obj,3,-1)
+		else
+			obj = string.sub(obj,2,-1)
+			local k = 1;
+			while (obj:byte(k,k) ~= nil) and (obj:byte(k,k) ~= 35) do k = k + 1 end
+			if obj:byte(k,k) == nil then error("convBack : parse error 1 !") end
+			local v = tonumber(string.sub(obj,1,k-1))
+			if v == nil then error("convBack : parse error 2 !") end
+			res = res .. string.char(v)
+			obj = string.sub(obj,k+1,-1)
+		end
+	end
+	return res;
+end
+local function _copyBack(obj)
+	if type(obj) ~= "table" then return _convBack(obj) elseif lookupBack[obj] then return lookupBack[obj] end
+	local newt = {}
+	lookupBack[obj] = newt
+	for i, v in pairs(obj) do newt[_copyBack(i)] = _copyBack(v) end
+	return setmetatable(newt, getmetatable(obj))
+end
+function convBack(obj)
+	lookupBack = {}
+	local retVal=_copyBack(obj)
+	lookupBack=nil;
+	return retVal
+end
+
+-- Replacement for Turbine.PluginData.Load
+function PatchDataLoad(a,b,c)
+	local success,results;
+	success,results=pcall(Turbine.PluginData.Load,a,b,c);
+	if success then
+		success,results=pcall(convBack,results);
+		if success then
+			return results;
+		else
+			Turbine.Shell.WriteLine("Error:"..tostring(results))
+			Turbine.Shell.WriteLine("While processing convBack(Turbine.PluginData.Load("..tostring(a)..", "..tostring(b)..", "..tostring(c).."))")
+			return nil;
+		end
+	else
+		Turbine.Shell.WriteLine("Error:"..tostring(results))
+		Turbine.Shell.WriteLine("While processing Turbine.PluginData.Load("..tostring(a)..", "..tostring(b)..", "..tostring(c)..")")
+		return nil;
+	end
+end
+
+-- Replacement for Turbine.PluginData.Save
+function PatchDataSave(a,b,c,d)
+	return Turbine.PluginData.Save(a,b,convSafe(c),d)
+end
+
+-- end of file