ADD: amiboo stuff

client/lualibs/amiibolib.lua

@@ -0,0 +1,90 @@
+local luamiibo_open, err = package.loadlib("./libluamiibo.so", "luaopen_luamiibo")
+
+if err then
+   print(err)
+   return
+end
+
+local luamiibo = luamiibo_open()
+
+local FLAG_SETTINGS_INITIALIZED = 4
+local FLAG_APPDATA_INITIALIZED = 3
+
+local Amiibo = {}
+Amiibo.__index = Amiibo
+
+function Amiibo:new (o)
+   o = o or {}
+   setmetatable(o, self)
+
+   if o.tag ~= nil then
+      o:load_tag(o.tag)
+   end
+   return o
+end
+
+function Amiibo:load_tag (tag)
+   self.plain = luamiibo.unpack(tag)
+
+   -- UID
+   local raw_uid = string.sub(self.plain, 469, 469 + 8)
+   self.uid = string.sub(raw_uid, 1, 3) .. string.sub(raw_uid, 5, 8)
+
+   -- Settings
+   local count, flags = bin.unpack('C', string.sub(self.plain, 45, 45))
+   self.setting_flags = flags
+   self.settings_initialized = self:check_flag(FLAG_SETTINGS_INITIALIZED)
+   self.appdata_initialized = self:check_flag(FLAG_APPDATA_INITIALIZED)
+
+   local _, appdatacounter =  bin.unpack('>S', string.sub(self.plain, 49, 50))
+   self.appdata_counter = appdatacounter
+
+   self.figure_id = string.sub(self.plain, 477, 477 + 8)
+
+   -- UTF-16 nickname string
+   self.nickname = string.sub(self.plain, 57, 76)
+end
+
+
+function Amiibo:export_tag ()
+   return luamiibo.pack(self.plain)
+end
+
+
+function Amiibo:check_flag (power)
+   local flag = math.pow(2, power)
+   return flag == bit32.band(self.setting_flags, flag)
+end
+
+
+function Amiibo:get_pwd ()
+   local xorkey = "\xaa\x55\xaa\x55"
+
+   local result = ''
+   for i = 1, 4 do
+      result = result ..
+         bin.pack('C',
+         bit32.bxor(self.uid:byte(i+1),
+                    self.uid:byte(i+3),
+                    xorkey:byte(i)))
+   end
+
+   return result
+end
+
+-- Hack to make UTF-16 nicknames into regular char string
+-- Only works for ASCII nicknames
+function Amiibo:display_nickname()
+   local nickname_tmp = self.nickname
+
+   local nickname = ''
+   for i = 1, nickname_tmp:len() do
+      if i % 2 == 0 then
+         nickname = nickname .. nickname_tmp:sub(i, i)
+      end
+   end
+
+   return nickname
+end
+
+return Amiibo