(Re)spawn players within 'mapgen_limit'
[oweals/minetest.git] / builtin / common / misc_helpers.lua
index a495058d93a36549dfa96157e0fc8222fc033154..f9b572d9f88dd61789bdab4bfe06e556e72217a8 100644 (file)
@@ -197,16 +197,17 @@ assert(table.indexof({"foo", "bar"}, "foo") == 1)
 assert(table.indexof({"foo", "bar"}, "baz") == -1)
 
 --------------------------------------------------------------------------------
-function file_exists(filename)
-       local f = io.open(filename, "r")
-       if f == nil then
-               return false
-       else
-               f:close()
-               return true
+if INIT ~= "client" then
+       function file_exists(filename)
+               local f = io.open(filename, "r")
+               if f == nil then
+                       return false
+               else
+                       f:close()
+                       return true
+               end
        end
 end
-
 --------------------------------------------------------------------------------
 function string:trim()
        return (self:gsub("^%s*(.-)%s*$", "%1"))
@@ -237,43 +238,6 @@ function math.sign(x, tolerance)
        return 0
 end
 
---------------------------------------------------------------------------------
--- Video enums and pack function
-
--- E_BLEND_FACTOR
-minetest.ebf = {                            
-       zero                    = 0, -- src & dest (0, 0, 0, 0)
-       one                     = 1, -- src & dest (1, 1, 1, 1)
-       dst_color               = 2, -- src (destR, destG, destB, destA)
-       one_minus_dst_color     = 3, -- src (1-destR, 1-destG, 1-destB, 1-destA)
-       src_color               = 4, -- dest (srcR, srcG, srcB, srcA)
-       one_minus_src_color     = 5, -- dest (1-srcR, 1-srcG, 1-srcB, 1-srcA)
-       src_alpha               = 6, -- src & dest (srcA, srcA, srcA, srcA)
-       one_minus_src_alpha     = 7, -- src & dest (1-srcA, 1-srcA, 1-srcA, 1-srcA)
-       dst_alpha               = 8, -- src & dest (destA, destA, destA, destA)
-       one_minus_dst_alpha     = 9, -- src & dest (1-destA, 1-destA, 1-destA, 1-destA)
-       src_alpha_saturate      = 10,-- src (min(srcA, 1-destA), idem, ...) 
-}
-
--- E_MODULATE_FUNC
-minetest.emfn = {
-       modulate_1x    = 1,
-       modulate_2x    = 2,
-       modulate_4x    = 4,
-}
-
--- E_ALPHA_SOURCE
-minetest.eas = {
-       none     = 0,
-       vertex_color = 1,
-       texture  = 2,
-}
-
--- BlendFunc = source * sourceFactor + dest * destFactor
-function minetest.pack_texture_blend_func(srcFact, dstFact, modulate, alphaSource) 
-       return alphaSource * 4096 + modulate * 256 + srcFact * 16 + dstFact
-end
-
 --------------------------------------------------------------------------------
 function get_last_folder(text,count)
        local parts = text:split(DIR_DELIM)
@@ -344,7 +308,7 @@ function core.formspec_escape(text)
 end
 
 
-function core.splittext(text,charlimit)
+function core.wrap_text(text, charlimit)
        local retval = {}
 
        local current_idx = 1
@@ -499,7 +463,7 @@ if INIT == "game" then
 
        core.rotate_node = function(itemstack, placer, pointed_thing)
                core.rotate_and_place(itemstack, placer, pointed_thing,
-                               core.setting_getbool("creative_mode"),
+                               core.settings:get_bool("creative_mode"),
                                {invert_wall = placer:get_player_control().sneak})
                return itemstack
        end
@@ -643,7 +607,9 @@ if INIT == "mainmenu" then
 
                return nil
        end
+end
 
+if INIT == "client" or INIT == "mainmenu" then
        function fgettext_ne(text, ...)
                text = core.gettext(text)
                local arg = {n=select('#', ...), ...}
@@ -674,3 +640,93 @@ if INIT == "mainmenu" then
        end
 end
 
+local ESCAPE_CHAR = string.char(0x1b)
+
+function core.get_color_escape_sequence(color)
+       return ESCAPE_CHAR .. "(c@" .. color .. ")"
+end
+
+function core.get_background_escape_sequence(color)
+       return ESCAPE_CHAR .. "(b@" .. color .. ")"
+end
+
+function core.colorize(color, message)
+       local lines = tostring(message):split("\n", true)
+       local color_code = core.get_color_escape_sequence(color)
+
+       for i, line in ipairs(lines) do
+               lines[i] = color_code .. line
+       end
+
+       return table.concat(lines, "\n") .. core.get_color_escape_sequence("#ffffff")
+end
+
+
+function core.strip_foreground_colors(str)
+       return (str:gsub(ESCAPE_CHAR .. "%(c@[^)]+%)", ""))
+end
+
+function core.strip_background_colors(str)
+       return (str:gsub(ESCAPE_CHAR .. "%(b@[^)]+%)", ""))
+end
+
+function core.strip_colors(str)
+       return (str:gsub(ESCAPE_CHAR .. "%([bc]@[^)]+%)", ""))
+end
+
+--------------------------------------------------------------------------------
+-- Returns the exact coordinate of a pointed surface
+--------------------------------------------------------------------------------
+function core.pointed_thing_to_face_pos(placer, pointed_thing)
+       local eye_offset_first = placer:get_eye_offset()
+       local node_pos = pointed_thing.under
+       local camera_pos = placer:get_pos()
+       local pos_off = vector.multiply(
+                       vector.subtract(pointed_thing.above, node_pos), 0.5)
+       local look_dir = placer:get_look_dir()
+       local offset, nc
+       local oc = {}
+
+       for c, v in pairs(pos_off) do
+               if nc or v == 0 then
+                       oc[#oc + 1] = c
+               else
+                       offset = v
+                       nc = c
+               end
+       end
+
+       local fine_pos = {[nc] = node_pos[nc] + offset}
+       camera_pos.y = camera_pos.y + 1.625 + eye_offset_first.y / 10
+       local f = (node_pos[nc] + offset - camera_pos[nc]) / look_dir[nc]
+
+       for i = 1, #oc do
+               fine_pos[oc[i]] = camera_pos[oc[i]] + look_dir[oc[i]] * f
+       end
+       return fine_pos
+end
+
+function core.string_to_privs(str, delim)
+       assert(type(str) == "string")
+       delim = delim or ','
+       local privs = {}
+       for _, priv in pairs(string.split(str, delim)) do
+               privs[priv:trim()] = true
+       end
+       return privs
+end
+
+function core.privs_to_string(privs, delim)
+       assert(type(privs) == "table")
+       delim = delim or ','
+       local list = {}
+       for priv, bool in pairs(privs) do
+               if bool then
+                       list[#list + 1] = priv
+               end
+       end
+       return table.concat(list, delim)
+end
+
+assert(core.string_to_privs("a,b").b == true)
+assert(core.privs_to_string({a=true,b=true}) == "a,b")