util/hex.lua

   1 local s_char = string.char;
   2
   3 local function char_to_hex(c)
   4         return ("%02x"):format(c:byte())
   5 end
   6
   7 local function hex_to_char(h)
   8         return s_char(tonumber(h, 16));
   9 end
  10
  11 local function to(s)
  12         return s:gsub(".", char_to_hex);
  13 end
  14
  15 local function from(s)
  16         return s:gsub("..", hex_to_char);
  17 end
  18
  19 return { to = to, from = from }