Separate-out the wardrobe into its own mod

Standalone -- can be used without the rest of home decor

homedecor_wardrobe/depends.txt

@@ -0,0 +1,2 @@
+default
+homedecor?

homedecor_wardrobe/init.lua

@@ -0,0 +1,325 @@
+modpath = minetest.get_modpath("homedecor")
+
+screwdriver = screwdriver or {}
+
+local placeholder_node = "air"
+
+--- select which node was pointed at based on it being known, not ignored,
+-- buildable_to.  returns nil if no node could be selected
+local function select_node(pointed_thing)
+
+	local pos = pointed_thing.under
+	local node = minetest.get_node_or_nil(pos)
+	local def = node and minetest.registered_nodes[node.name]
+
+	if not def or not def.buildable_to then
+
+		pos = pointed_thing.above
+		node = minetest.get_node_or_nil(pos)
+		def = node and minetest.registered_nodes[node.name]
+	end
+
+	return def and pos, def
+end
+
+--- check if all nodes can and may be build to
+local function is_buildable_to(placer_name, ...)
+
+	for _, pos in ipairs({...}) do
+
+		local node = minetest.get_node_or_nil(pos)
+		local def = node and minetest.registered_nodes[node.name]
+
+		if not (def and def.buildable_to)
+		or minetest.is_protected(pos, placer_name) then
+			return false
+		end
+	end
+
+	return true
+end
+
+-- place one or two nodes if and only if both can be placed
+local function stack(itemstack, placer, fdir, pos, def, pos2, node1,
+		node2, pointed_thing)
+
+	local placer_name = placer:get_player_name() or ""
+
+	if is_buildable_to(placer_name, pos, pos2) then
+
+		local lfdir = fdir or minetest.dir_to_facedir(placer:get_look_dir())
+
+		minetest.set_node(pos, {name = node1, param2 = lfdir})
+
+		-- this can be used to clear buildable_to nodes even though we are
+		-- using a multinode mesh, do not assume by default, as we still
+		-- might want to allow overlapping in some cases
+		node2 = node2 or "air"
+
+		local has_facedir = node2 ~= "air"
+
+		if node2 == "placeholder" then
+			has_facedir = false
+			node2 = placeholder_node
+		end
+
+		minetest.set_node(pos2, {name = node2,
+				param2 = (has_facedir and lfdir) or nil})
+
+		-- call after_place_node of the placed node if available
+		local ctrl_node_def = minetest.registered_nodes[node1]
+
+		if ctrl_node_def and ctrl_node_def.after_place_node then
+			ctrl_node_def.after_place_node(pos, placer, itemstack, pointed_thing)
+		end
+
+		if not creative.is_enabled_for(placer_name) then
+			itemstack:take_item()
+		end
+	end
+
+	return itemstack
+end
+
+local function rightclick_pointed_thing(pos, placer, itemstack, pointed_thing)
+
+	local node = minetest.get_node_or_nil(pos)
+
+	if not node then return false end
+
+	local def = minetest.registered_nodes[node.name]
+
+	if not def or not def.on_rightclick then return false end
+
+	return def.on_rightclick(pos, node, placer, itemstack, pointed_thing) or itemstack
+end
+
+-- Stack one node above another
+-- leave the last argument nil if it's one 2m high node
+local function stack_vertically(itemstack, placer, pointed_thing,
+		node1, node2)
+
+	local rightclick_result = rightclick_pointed_thing(pointed_thing.under,
+			 placer, itemstack, pointed_thing)
+
+	if rightclick_result then return rightclick_result end
+
+	local pos, def = select_node(pointed_thing)
+
+	if not pos then return itemstack end
+
+	local top_pos = {x = pos.x, y = pos.y + 1, z = pos.z}
+
+	return stack(itemstack, placer, nil, pos, def, top_pos, node1,
+			node2, pointed_thing)
+end
+
+local placeholder_node = "air"
+local wd_cbox = {type = "fixed", fixed = {-0.5, -0.5, -0.5, 0.5, 1.5, 0.5}}
+
+-- cache set_textures function (fallback to old version)
+-- default.player_set_textures is deprecated and will be removed in future
+local set_player_textures =
+	minetest.get_modpath("player_api") and player_api.set_textures
+	or default.player_set_textures
+
+local armor_mod_path = minetest.get_modpath("3d_armor")
+
+local skinslist = {"male1", "male2", "male3", "male4", "male5"}
+local default_skin = "character.png"
+
+local skinsdb_mod_path = minetest.get_modpath("skinsdb")
+
+if skinsdb_mod_path then
+
+	for _, shrt in ipairs(skinslist) do
+
+		for _, prefix in ipairs({"", "fe"}) do
+
+			local skin_name = prefix..shrt
+			local skin_obj = skins.new("homedecor_clothes_"..skin_name..".png")
+
+			skin_obj:set_preview("homedecor_clothes_"..skin_name.."_preview.png")
+			skin_obj:set_texture("homedecor_clothes_"..skin_name..".png")
+			skin_obj:set_meta("name", "Wardrobe "..skin_name)
+			skin_obj:set_meta("author", 'Calinou and Jordach')
+			skin_obj:set_meta("license", 'CC-by-SA-4.0')
+
+			local file = io.open(modpath ..
+				"/textures/homedecor_clothes_" .. skin_name .. ".png", "r")
+
+			skin_obj:set_meta("format", skins.get_skin_format(file))
+
+			file:close()
+
+			skin_obj:set_meta("in_inventory_list", false)
+		end
+	end
+end
+
+local function get_player_skin(player)
+
+	local skin = player:get_attribute("homedecor:player_skin")
+
+	if not skin or skin == "" then
+		return default_skin, true
+	end
+
+	return skin, false
+end
+
+local function set_player_skin(player, skin, save)
+
+	if skinsdb_mod_path then
+
+		skins.set_player_skin(player, skin or skins.default)
+
+	elseif armor_mod_path then -- if 3D_armor's installed, let it set the skin
+
+		armor.textures[player:get_player_name()].skin = skin or default_skin
+		armor:update_player_visuals(player)
+	else
+		set_player_textures(player, { skin or default_skin})
+	end
+
+	if save and not skinsdb_mod_path then
+
+		if skin == default_skin then
+			skin = "default"
+			player:set_attribute("homedecor:player_skin", "")
+		else
+			player:set_attribute("homedecor:player_skin", skin)
+		end
+	end
+end
+
+local function unset_player_skin(player)
+	set_player_skin(player, nil, true)
+end
+
+local def = {
+
+	description = "Wardrobe",
+	drawtype = "mesh",
+	mesh = "homedecor_bedroom_wardrobe.obj",
+	tiles = {
+		{name = "homedecor_generic_wood_plain.png", color = 0xffa76820},
+		"homedecor_wardrobe_drawers.png",
+		"homedecor_wardrobe_doors.png"
+	},
+	inventory_image = "homedecor_wardrobe_inv.png",
+
+	paramtype = "light",
+	paramtype2 = "facedir",
+
+	groups = {snappy = 3},
+	selection_box = wd_cbox,
+	collision_box = wd_cbox,
+	sounds = default.node_sound_wood_defaults(),
+
+	on_rotate = screwdriver.rotate_simple,
+
+	on_place = function(itemstack, placer, pointed_thing)
+
+		return stack_vertically(itemstack, placer, pointed_thing,
+				itemstack:get_name(), "placeholder")
+	end,
+
+	can_dig = function(pos,player)
+
+		local meta = minetest.get_meta(pos)
+
+		return meta:get_inventory():is_empty("main")
+	end,
+
+	on_construct = function(pos)
+
+		local meta = minetest.get_meta(pos)
+
+		meta:set_string("infotext", "Wardrobe")
+
+		meta:get_inventory():set_size("main", 10)
+
+		-- textures made by the Minetest community (mostly Calinou and Jordach)
+		local clothes_strings = ""
+
+		for i = 1, 5 do
+
+			clothes_strings = clothes_strings ..
+				"image_button_exit[" .. (i-1) ..
+				".5,0;1.1,2;homedecor_clothes_" .. skinslist[i] ..
+				"_preview.png;" .. skinslist[i] .. ";]" ..
+				"image_button_exit[" .. (i-1) ..
+				".5,2;1.1,2;homedecor_clothes_fe" .. skinslist[i] ..
+				"_preview.png;fe" .. skinslist[i] .. ";]"
+		end
+
+		meta:set_string("formspec",  "size[5.5,8.5]" ..
+			default.gui_bg .. default.gui_bg_img .. default.gui_slots ..
+			"vertlabel[0,0.5;" .. minetest.formspec_escape("Clothes") .. "]" ..
+			"button_exit[0,3.29;0.6,0.6;default;x]" ..
+			clothes_strings ..
+			"vertlabel[0,5.2;" .. minetest.formspec_escape("Storage") .. "]" ..
+			"list[current_name;main;0.5,4.5;5,2;]" ..
+			"list[current_player;main;0.5,6.8;5,2;]" ..
+			"listring[]"
+		)
+	end,
+
+	on_receive_fields = function(pos, formname, fields, sender)
+
+		if fields.default then
+
+			set_player_skin(sender, nil, "player")
+
+			return
+		end
+
+		for i = 1, 5 do
+
+			if fields[skinslist[i]] then
+
+				set_player_skin(sender,
+					"homedecor_clothes_" .. skinslist[i] .. ".png", "player")
+				break
+
+			elseif fields["fe" .. skinslist[i]] then
+
+				set_player_skin(sender,
+					"homedecor_clothes_fe" .. skinslist[i] .. ".png", "player")
+				break
+			end
+		end
+	end
+}
+
+-- register the actual minetest node
+minetest.register_node(":homedecor:wardrobe", def)
+
+minetest.register_alias("homedecor:wardrobe_bottom", "homedecor:wardrobe")
+minetest.register_alias("homedecor:wardrobe_top", "air")
+
+if not skinsdb_mod_path then -- If not managed by skinsdb
+
+	minetest.register_on_joinplayer(function(player)
+
+		local skin = player:get_attribute("homedecor:player_skin")
+
+		if skin and skin ~= "" then
+
+			-- setting player skin on connect has no effect, so delay skin change
+			minetest.after(1, function(player, skin)
+				set_player_skin(player, skin)
+			end, player, skin)
+		end
+	end)
+end
+
+minetest.register_craft( {
+	output = "homedecor:wardrobe",
+	recipe = {
+		{ "homedecor:drawer_small", "homedecor:kitchen_cabinet" },
+		{ "homedecor:drawer_small", "default:wood" },
+		{ "homedecor:drawer_small", "default:wood" }
+	},
+})

homedecor_wardrobe/models/homedecor_bedroom_wardrobe.obj

@@ -0,0 +1,168 @@
+# Blender v2.73 (sub 0) OBJ File: 'bedroom-wardrobe.blend'
+# www.blender.org
+o Cylinder
+v -0.500000 -0.500000 0.500000
+v -0.500000 -0.500000 -0.437500
+v 0.500000 -0.500000 -0.437500
+v 0.500000 -0.500000 0.500000
+v -0.500000 1.500000 0.500000
+v -0.500000 1.500000 -0.437500
+v 0.500000 1.500000 -0.437500
+v 0.500000 1.500000 0.500000
+v -0.437500 0.250000 -0.437500
+v -0.437500 0.250000 -0.500000
+v 0.437500 0.250000 -0.500000
+v 0.437500 0.250000 -0.437500
+v -0.437500 0.500000 -0.437500
+v -0.437500 0.500000 -0.500000
+v 0.437500 0.500000 -0.500000
+v 0.437500 0.500000 -0.437500
+v -0.437500 -0.062500 -0.437500
+v -0.437500 -0.062500 -0.500000
+v 0.437500 -0.062500 -0.500000
+v 0.437500 -0.062500 -0.437500
+v -0.437500 0.187500 -0.437500
+v -0.437500 0.187500 -0.500000
+v 0.437500 0.187500 -0.500000
+v 0.437500 0.187500 -0.437500
+v -0.437500 -0.375000 -0.437500
+v -0.437500 -0.375000 -0.500000
+v 0.437500 -0.375000 -0.500000
+v 0.437500 -0.375000 -0.437500
+v -0.437500 -0.125000 -0.437500
+v -0.437500 -0.125000 -0.500000
+v 0.437500 -0.125000 -0.500000
+v 0.437500 -0.125000 -0.437500
+v 0.062500 0.562500 -0.437500
+v 0.062500 0.562500 -0.500000
+v 0.437500 0.562500 -0.500000
+v 0.437500 0.562500 -0.437500
+v 0.062500 1.437500 -0.437500
+v 0.062500 1.437500 -0.500000
+v 0.437500 1.437500 -0.500000
+v 0.437500 1.437500 -0.437500
+v -0.437500 0.562500 -0.437500
+v -0.437500 0.562500 -0.500000
+v -0.062500 0.562500 -0.500000
+v -0.062500 0.562500 -0.437500
+v -0.437500 1.437500 -0.437500
+v -0.437500 1.437500 -0.500000
+v -0.062500 1.437500 -0.500000
+v -0.062500 1.437500 -0.437500
+v -0.500000 1.437500 -0.437500
+v 0.500000 1.437500 -0.437500
+v -0.500000 -0.375000 -0.437500
+v 0.500000 -0.375000 -0.437500
+v -0.500000 0.500000 0.500000
+v -0.500000 0.500000 -0.437500
+v 0.500000 0.500000 -0.437500
+v 0.500000 0.500000 0.500000
+vt 1.000000 0.000000
+vt 1.000000 0.937500
+vt 0.000000 0.937500
+vt 0.000000 0.000000
+vt 0.000000 1.000000
+vt 0.062500 0.000000
+vt 0.062500 1.000000
+vt 1.000000 1.000000
+vt 0.875000 1.000000
+vt 0.875000 0.000000
+vt 0.562500 0.937500
+vt 0.562500 0.062500
+vt 0.625000 0.062500
+vt 0.625000 0.937500
+vt 0.250000 0.937500
+vt 0.250000 0.062500
+vt 0.312500 0.062500
+vt 0.312500 0.937500
+vt 0.937500 0.437500
+vt 0.937500 0.562500
+vt 0.062500 0.562500
+vt 0.062500 0.437500
+vt 0.875000 0.937500
+vt 0.875000 0.062500
+vt -0.000000 0.062500
+vt 0.062500 0.062500
+vt 1.000000 0.062500
+vt 0.062500 0.937500
+vt 0.937500 0.062500
+vt 0.937500 0.937500
+vt 0.937500 1.000000
+vt 0.937500 0.750000
+vt 1.000000 0.750000
+vt 0.062500 0.750000
+vt -0.000000 0.750000
+vt 0.062500 0.125000
+vt 0.937500 0.125000
+vt 0.937500 0.500000
+vt 1.000000 0.500000
+vt 0.062500 0.500000
+vt 0.000000 0.500000
+vt 0.937500 0.000000
+vt 0.937500 0.250000
+vt 1.000000 0.250000
+vt 0.062500 0.250000
+vt -0.000000 0.250000
+vt 0.062500 0.187500
+vt 0.937500 0.187500
+vt 0.500000 0.937500
+vt 0.437500 0.937500
+vt 0.437500 0.062500
+vt 0.500000 0.062500
+vt 0.437500 0.000000
+vt 0.437500 1.000000
+vt 0.562500 0.000000
+vt 0.562500 1.000000
+vn -1.000000 0.000000 0.000000
+vn 0.000000 0.000000 -1.000000
+vn 1.000000 0.000000 0.000000
+vn 0.000000 0.000000 1.000000
+vn 0.000000 -1.000000 0.000000
+vn 0.000000 1.000000 0.000000
+g Cylinder_Cylinder_wood
+s off
+f 53/1/1 54/2/1 2/3/1 1/4/1
+f 6/5/2 7/4/2 50/6/2 49/7/2
+f 55/3/3 56/4/3 4/1/3 3/2/3
+f 56/5/4 53/4/4 1/1/4 4/8/4
+f 1/1/5 2/2/5 3/3/5 4/4/5
+f 8/1/6 7/2/6 6/3/6 5/4/6
+f 3/1/2 2/8/2 51/9/2 52/10/2
+f 5/1/1 6/2/1 54/3/1 53/4/1
+f 7/3/3 8/4/3 56/1/3 55/2/3
+f 17/11/2 20/12/2 32/13/2 29/14/2
+f 9/15/2 12/16/2 24/17/2 21/18/2
+f 8/5/4 5/4/4 53/1/4 56/8/4
+f 33/19/2 44/20/2 48/21/2 37/22/2
+f 51/9/2 54/5/2 13/3/2 25/23/2
+f 52/10/2 28/24/2 16/25/2 55/4/2
+f 40/26/2 50/6/2 55/1/2 16/27/2
+f 45/28/2 13/2/2 54/8/2 49/7/2
+f 36/29/2 16/27/2 13/2/2 41/30/2
+g Cylinder_Cylinder_drawers
+f 13/8/1 14/31/1 10/32/1 9/33/1
+f 14/31/2 15/7/2 11/34/2 10/32/2
+f 15/7/3 16/5/3 12/35/3 11/34/3
+f 9/36/5 10/26/5 11/29/5 12/37/5
+f 16/29/6 15/37/6 14/36/6 13/26/6
+f 21/33/1 22/32/1 18/38/1 17/39/1
+f 22/32/2 23/34/2 19/40/2 18/38/2
+f 23/34/3 24/35/3 20/41/3 19/40/3
+f 17/26/5 18/6/5 19/42/5 20/29/5
+f 24/42/6 23/29/6 22/26/6 21/6/6
+f 29/39/1 30/38/1 26/43/1 25/44/1
+f 30/38/2 31/40/2 27/45/2 26/43/2
+f 31/40/3 32/41/3 28/46/3 27/45/3
+f 25/47/5 26/36/5 27/37/5 28/48/5
+f 32/37/6 31/48/6 30/47/6 29/36/6
+g Cylinder_Cylinder_doors
+f 37/49/1 38/50/1 34/51/1 33/52/1
+f 38/50/2 39/28/2 35/26/2 34/51/2
+f 39/28/3 40/3/3 36/25/3 35/26/3
+f 33/53/5 34/51/5 35/26/5 36/6/5
+f 40/7/6 39/28/6 38/50/6 37/54/6
+f 45/2/1 46/30/1 42/29/1 41/27/1
+f 46/30/2 47/11/2 43/12/2 42/29/2
+f 47/11/3 48/49/3 44/52/3 43/12/3
+f 41/42/5 42/29/5 43/12/5 44/55/5
+f 48/56/6 47/11/6 46/30/6 45/31/6