naturalslopeslib/init.lua

-- Global namespace for functions
naturalslopeslib = {
	_register_on_generated = true,
	_propagate_overrides = false,
	default_definition = {} -- initialized below
}

local poschangelib_available = false
local twmlib_available = false
for _, name in ipairs(minetest.get_modnames()) do
	if name == "poschangelib" then
		poschangelib_available = true
	elseif name == "twmlib" then
		twmlib_available = true
	end
end

function naturalslopeslib.reset_defaults()
	naturalslopeslib.default_definition = {
		drop_source = false,
		tiles = {},
		groups = {}
	}
end
naturalslopeslib.reset_defaults()

--- Get the name of the regular node from a slope, or nil.
function naturalslopeslib.get_regular_node_name(node_name)
	if string.find(node_name, ":slope_") == nil then
		return nil
	end
	for _, regex in ipairs({"^(.-:)slope_inner_(.*)$", "^(.-:)slope_outer_(.*)$", "^(.-:)slope_pike_(.*)$", "^(.-:)slope_(.*)$"}) do
		local match, match2 = string.match(node_name, regex)
		if match and minetest.registered_nodes[match .. match2] ~= nil then
			return match .. match2
		end
	end
	return nil
end
--- {Private} Get the default node name for slopes from a subname.
-- For example 'dirt' will be named 'naturalslopeslib:slope_dirt'
-- See naturalslopeslib.get_all_shapes to get the actual node names.
function naturalslopeslib.get_straight_slope_name(subname)
	return minetest.get_current_modname() .. ':slope_' .. subname
end
function naturalslopeslib.get_inner_corner_slope_name(subname)
	return minetest.get_current_modname() .. ':slope_inner_' .. subname
end
function naturalslopeslib.get_outer_corner_slope_name(subname)
	return minetest.get_current_modname() .. ':slope_outer_' .. subname
end
function naturalslopeslib.get_pike_slope_name(subname)
	return minetest.get_current_modname() .. ':slope_pike_' .. subname
end

-- Set functions to get configuration and default values
function naturalslopeslib.setting_enable_surface_update()
	if not twmlib_available then return false end
	local value = minetest.settings:get_bool('naturalslopeslib_enable_surface_update')
	if value == nil then return true end
	return value
end
function naturalslopeslib.setting_enable_shape_on_walk()
	if not poschangelib_available then return false end
	local value = minetest.settings:get_bool('naturalslopeslib_enable_shape_on_walk')
	if value == nil then return true end
	return value
end
function naturalslopeslib.setting_enable_shape_on_generation()
	local value = minetest.settings:get_bool('naturalslopeslib_register_default_slopes')
	if value == nil then value = true end
	return value
end
function naturalslopeslib.setting_generation_method()
	local value = minetest.settings:get('naturalslopeslib_generation_method')
	if value == nil then value = 'VoxelManip' end
	return value
end
function naturalslopeslib.setting_generation_factor()
	return tonumber(minetest.settings:get('naturalslopeslib_update_shape_generate_factor')) or 0.05
end
function naturalslopeslib.setting_stomp_factor()
	return tonumber(minetest.settings:get('naturalslopeslib_update_shape_stomp_factor')) or 1.0
end
function naturalslopeslib.setting_dig_place_factor()
	return tonumber(minetest.settings:get('naturalslopeslib_update_shape_dig_place_factor')) or 1.0
end
function naturalslopeslib.setting_time_factor()
	return tonumber(minetest.settings:get('naturalslopeslib_update_shape_time_factor')) or 1.0
end
function naturalslopeslib.setting_generation_skip()
	return tonumber(minetest.settings:get('naturalslopeslib_update_shape_generate_skip')) or 0
end
function naturalslopeslib.setting_enable_shape_on_dig_place()
	local value = minetest.settings:get_bool('naturalslopeslib_enable_shape_on_dig_place')
	if value == nil then value = true end
	return value
end
function naturalslopeslib.setting_revert()
	local value = minetest.settings:get_bool('naturalslopeslib_revert')
	if value == nil then value = false end
	return value
end
--- @deprecated, use naturalslopeslib.setting_rendering_mode()
function naturalslopeslib.setting_smooth_rendering()
	local mode = naturalslopeslib.setting_rendering_mode()
	return (mode == 'Smooth' or mode == 'Rough')
end
function naturalslopeslib.setting_rendering_mode()
	local value = minetest.settings:get('naturalslopeslib_rendering_mode')
	if value == nil then
		-- Backward compatibility, load from naturalslopeslib_smooth_rendering
		value = minetest.settings:get_bool('naturalslopeslib_smooth_rendering')
		if value == true then
			value = 'Smooth'
		else
			value = 'Cubic'
		end
	end
	if value == nil then value = 'Cubic' end
	return value
end

function naturalslopeslib.set_manual_map_generation()
	naturalslopeslib._register_on_generated = false
end

function naturalslopeslib.propagate_overrides()
	if naturalslopeslib._propagate_overrides then
		return
	end
	naturalslopeslib._propagate_overrides = true
	local old_override = minetest.override_item
	minetest.override_item = function(name, redefinition)
		local shapes = naturalslopeslib.get_all_shapes(name)
		if #shapes == 1 then
			old_override(name, redefinition)
			return
		end
		local slope_redef = table.copy(redefinition)
		-- Prevent slopes fixed attribute override
		slope_redef.drawtype = nil
		slope_redef.nodebox = nil
		slope_redef.mesh = nil
		slope_redef.selection_box = nil
		slope_redef.collision_box = nil
		slope_redef.paramtype = nil
		if slope_redef.paramtype2 ~= nil then
			if slope_redef.paramtype2 == "color" or slope_redef.paramtype2 == "colorfacedir" then
				slope_redef.paramtype2 = "colorfacedir"
			else
				slope_redef.paramtype2 = "facedir"
			end
		end
		old_override(name, redefinition)
		for i=2, #shapes, 1 do
			old_override(shapes[i], slope_redef)
		end
	end
end

dofile(minetest.get_modpath(minetest.get_current_modname()) .. "/update_shape.lua")
-- Include registration methods
dofile(minetest.get_modpath(minetest.get_current_modname()) .. "/register_slopes.lua")
dofile(minetest.get_modpath(minetest.get_current_modname()) .. "/sloped_stomp.lua")