Function to unscape HTML XML entities

bot/utils.lua

@@ -508,3 +508,21 @@ function load_from_file(file, default_data)
   end
   return loadfile (file)()
 end
+
+-- See http://stackoverflow.com/a/14899740
+function unescape_html(str)
+  local map = { 
+    ["lt"]  = "<", 
+    ["gt"]  = ">",
+    ["amp"] = "&",
+    ["quot"] = '"',
+    ["apos"] = "'" 
+  }
+  new = string.gsub(str, '(&(#?x?)([%d%a]+);)', function(orig, n, s)
+    var = map[s] or n == "#" and string.char(s)
+    var = var or n == "#x" and string.char(tonumber(s,16))
+    var = var or orig
+    return var
+  end)
+  return new
+end