X-Git-Url: https://git.enpas.org/?a=blobdiff_plain;f=util%2Fhex.lua;h=4cc28d33386f1f42dbe7d7cd1216e37757943e6c;hb=79a152bb61900a86c486b62d59be60fa845f8afc;hp=72fc22bd611c89ba992806e8b071709076aadc22;hpb=e1174c8a1637659f3447e4fa091cc1619637c8da;p=prosody.git

diff --git a/util/hex.lua b/util/hex.lua
index 72fc22bd..4cc28d33 100644
--- a/util/hex.lua
+++ b/util/hex.lua
@@ -1,19 +1,26 @@
 local s_char = string.char;
+local s_format = string.format;
+local s_gsub = string.gsub;
+local s_lower = string.lower;
 
-local function char_to_hex(c)
-	return ("%02x"):format(c:byte())
-end
+local char_to_hex = {};
+local hex_to_char = {};
 
-local function hex_to_char(h)
-	return s_char(tonumber(h, 16));
+do
+	local char, hex;
+	for i = 0,255 do
+		char, hex = s_char(i), s_format("%02x", i);
+		char_to_hex[char] = hex;
+		hex_to_char[hex] = char;
+	end
 end
 
-function to(s)
-	return s:gsub(".", char_to_hex);
+local function to(s)
+	return (s_gsub(s, ".", char_to_hex));
 end
 
-function from(s)
-	return s:gsub("..", hex_to_char);
+local function from(s)
+	return (s_gsub(s_lower(s), "%X*(%x%x)%X*", hex_to_char));
 end
 
 return { to = to, from = from }