airutils/pilot_skin_manager.lua

airutils.pilot_textures = {"pilot_clothes1.png","pilot_clothes2.png","pilot_clothes3.png","pilot_clothes4.png"}
local skinsdb_mod_path = minetest.get_modpath("skinsdb")
local backup = "airutils:bcp_last_skin"
local curr_skin = "airutils:skin"

minetest.register_chatcommand("au_uniform", {
    func = function(name, param)
        if skinsdb_mod_path and minetest.global_exists("armor") then
            minetest.chat_send_player(name, "Sorry, but this module doesn't work when SkinsDb and Armor are instaled together.")
        else
            local player = minetest.get_player_by_name(name)

            if player then
                airutils.uniform_formspec(name)
            else
                minetest.chat_send_player(name, "Something isn't working...")
            end
        end
    end,
})

local set_player_textures =
	minetest.get_modpath("player_api") and player_api.set_textures
	or default.player_set_textures

function airutils.set_player_skin(player, skin)
    local player_proterties = player:get_properties()
    local texture = player_proterties.textures
    local name = player:get_player_name()
    if texture then
        local player_meta = player:get_meta()
        if skin then
            --get current texture
            texture = texture[1]
            if skinsdb_mod_path then
                local skdb_skin = skins.get_player_skin(player)
                texture = "[combine:64x32:0,0="..skdb_skin._texture --..":0,0="..skin
            end

            --backup current texture
            if player_meta.backup == nil or player_meta.backup == "" then
                --player:set_attribute(backup, texture) --texture backup
                player_meta:set_string("backup",texture)
            else
                texture = player_meta.backup
            end

            --combine the texture
            texture = texture.."^"..skin

            --sets the combined texture
            if texture ~= nil and texture ~= "" then
                if skinsdb_mod_path then
		            player:set_properties({
			            visual = "mesh",
			            visual_size = {x=0.95, y=1},
			            mesh = "character.b3d",
			            textures = {texture},
		            })
                    if armor then
                        armor:update_player_visuals(player)
                    end
                else
                    set_player_textures(player, {texture})
                end
                player_meta:set_string("curr_skin",texture)
                --player:set_attribute(curr_skin, texture)
            end
        else
            --remove texture
            local old_texture = player:get_attribute(backup)
            if set_skin then
                if player:get_attribute("set_skin:player_skin") ~= nil and player:get_attribute("set_skin:player_skin") ~= "" then
                    old_texture = player:get_attribute("set_skin:player_skin")
                end
            elseif wardrobe then
                if wardrobe.playerSkins then
                    if wardrobe.playerSkins[name] ~= nil then
                        old_texture = wardrobe.playerSkins[name]
                    end
                end
            end
            --minetest.chat_send_all(dump(old_texture))
            if skinsdb_mod_path then
	            player:set_properties({
		            visual = "mesh",
		            visual_size = {x=1, y=1},
		            mesh = "skinsdb_3d_armor_character_5.b3d",
		            textures = {texture},
	            })
                skins.set_player_skin(player, skins.get_player_skin(player))
                if armor then
                    armor:set_player_armor(player)
                end
            else
                if old_texture ~= nil and old_texture ~= "" then
                    set_player_textures(player, { old_texture })
                end
            end
            player_meta:set_string("backup","")
            player_meta:set_string("curr_skin","")

            --player:set_attribute(backup, nil)
            --player:set_attribute(curr_skin, nil)
        end
    end
end

function airutils.uniform_formspec(name)
    local basic_form = table.concat({
        "formspec_version[5]",
        "size[5,2.9]",
	}, "")

    --minetest.chat_send_all(dump(airutils.pilot_textures))

    local textures = ""
    if airutils.pilot_textures then
        for k, v in pairs( airutils.pilot_textures ) do
            textures = textures .. v .. ","
        end

	    basic_form = basic_form.."dropdown[0.5,0.5;4,0.8;textures;".. textures ..";0;false]"
        basic_form = basic_form.."button[0.5,1.6;4,0.8;set_texture;Set Player Texture]"

        minetest.show_formspec(name, "airutils:change", basic_form)
    else
        minetest.chat_send_player(name, "The isn't activated as secure. Aborting")
    end
end

minetest.register_on_player_receive_fields(function(player, formname, fields)
    if formname == "airutils:change" then
        local name = player:get_player_name()
		if fields.textures or fields.set_texture then
            airutils.set_player_skin(player, fields.textures)
		end
        minetest.close_formspec(name, "airutils:change")
    end
end)

minetest.register_on_joinplayer(function(player)
	local skin = player:get_attribute(curr_skin)

	if skin and skin ~= "" and skin ~= nil then

		-- setting player skin on connect has no effect, so delay skin change
		minetest.after(3, function(player1, skin1)
            airutils.set_player_skin(player1, skin1)
		end, player, skin)
	end
end)