summaryrefslogtreecommitdiff
path: root/api.lua
blob: d1fd10b35003208147de38224fb8058d02ffca58 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
-- get current skin
local storage = minetest.get_mod_storage()

function skins.get_player_skin(player)
	local skin = storage:get_string(player:get_player_name())
	return skins.get(skin) or skins.get(skins.default)
end

-- Assign skin to player
function skins.assign_player_skin(player, skin)
	local skin_obj
	if type(skin) == "string" then
		skin_obj = skins.get(skin)
	else
		skin_obj = skin
	end

	if not skin_obj then
		return false
	end

	if skin_obj:is_applicable_for_player(player:get_player_name()) then
		local skin_key = skin_obj:get_key()
		if skin_key == skins.default then
			skin_key = ""
		end
		storage:set_string(player:get_player_name(), skin_key)
	else
		return false
	end
	return true
end

-- update visuals
function skins.update_player_skin(player)
	if skins.armor_loaded then
		-- all needed is wrapped and implemented in 3d_armor mod
		armor:set_player_armor(player)
	else
		-- do updates manually without 3d_armor
		skins.get_player_skin(player):apply_skin_to_player(player)
		if minetest.global_exists("sfinv") and sfinv.enabled then
			sfinv.set_player_inventory_formspec(player)
		end
	end
end

-- Assign and update - should be used on selection externally
function skins.set_player_skin(player, skin)
	local success = skins.assign_player_skin(player, skin)
	if success then
		skins.get_player_skin(player):set_skin(player)
		skins.update_player_skin(player)
	end
	return success
end

-- Check Skin format (code stohlen from stu's multiskin)
function skins.get_skin_format(file)
	file:seek("set", 1)
	if file:read(3) == "PNG" then
		file:seek("set", 16)
		local ws = file:read(4)
		local hs = file:read(4)
		local w = ws:sub(3, 3):byte() * 256 + ws:sub(4, 4):byte()
		local h = hs:sub(3, 3):byte() * 256 + hs:sub(4, 4):byte()
		if w >= 64 then
			if w == h then
				return "1.8"
			elseif w == h * 2 then
				return "1.0"
			end
		end
	end
end