@gamely/gly-engine-lite 0.2.7 → 0.3.1

package/dist/main.lua

@@ -1,36 +1,37 @@
-local b247f = {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}
-local r247f = function(i, f)
+local b259c = {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}
+local r259c = function(i, f)
 return function()
 local c = f()
-b247f[i] = function() return c end
+b259c[i] = function() return c end
 return c
 end
 end
 local math = ((function() local x, y = pcall(require, 'math'); return x and y end)()) or _G.math
-local function m247f()
-local version = b247f[1]('source_version')
-local loadcore = b247f[2]('source_shared_engine_loadcore')
-local loadgame = b247f[3]('source_shared_engine_loadgame')
-local engine_encoder = b247f[4]('source_engine_api_data_encoder')
-local engine_game = b247f[5]('source_engine_api_system_app')
-local engine_hash = b247f[6]('source_engine_api_data_hash')
-local engine_http = b247f[7]('source_engine_api_io_http')
-local engine_i18n = b247f[8]('source_engine_api_data_i18n')
-local engine_key = b247f[9]('source_engine_api_system_key')
-local engine_log = b247f[10]('source_engine_api_debug_log')
-local engine_math = b247f[11]('source_engine_api_math_basic')
-local engine_math_clib = b247f[12]('source_engine_api_math_clib')
-local engine_math_random = b247f[13]('source_engine_api_math_random')
-local engine_array = b247f[14]('source_engine_api_data_array')
-local engine_media = b247f[15]('source_engine_api_io_media')
-local engine_api_draw_fps = b247f[16]('source_engine_api_draw_fps')
-local engine_api_draw_text = b247f[17]('source_engine_api_draw_text')
-local engine_api_draw_poly = b247f[18]('source_engine_api_draw_poly')
-local engine_raw_memory = b247f[19]('source_engine_api_raw_memory')
-local callback_http = b247f[20]('source_engine_protocol_http_callback')
-local application_default = b247f[21]('source_shared_var_object_root')
-local color = b247f[22]('source_engine_api_system_color')
-local std = b247f[23]('source_shared_var_object_std')
+local function m259c()
+local version = b259c[1]('source_version')
+local loadcore = b259c[2]('source_shared_engine_loadcore')
+local loadgame = b259c[3]('source_shared_engine_loadgame')
+local engine_encoder = b259c[4]('source_engine_api_data_encoder')
+local engine_game = b259c[5]('source_engine_api_system_app')
+local engine_hash = b259c[6]('source_engine_api_data_hash')
+local engine_http = b259c[7]('source_engine_api_io_http')
+local engine_i18n = b259c[8]('source_engine_api_data_i18n')
+local engine_key = b259c[9]('source_engine_api_system_key')
+local engine_env = b259c[10]('source_engine_api_system_getenv')
+local engine_log = b259c[11]('source_engine_api_debug_log')
+local engine_math = b259c[12]('source_engine_api_math_basic')
+local engine_math_clib = b259c[13]('source_engine_api_math_clib')
+local engine_math_random = b259c[14]('source_engine_api_math_random')
+local engine_array = b259c[15]('source_engine_api_data_array')
+local engine_media = b259c[16]('source_engine_api_io_media')
+local engine_api_draw_fps = b259c[17]('source_engine_api_draw_fps')
+local engine_api_draw_text = b259c[18]('source_engine_api_draw_text')
+local engine_api_draw_poly = b259c[19]('source_engine_api_draw_poly')
+local engine_raw_memory = b259c[20]('source_engine_api_raw_memory')
+local callback_http = b259c[21]('source_engine_protocol_http_callback')
+local application_default = b259c[22]('source_shared_var_object_root')
+local color = b259c[23]('source_engine_api_system_color')
+local std = b259c[24]('source_shared_var_object_std')
 local application = application_default
 local engine = {
 keyboard = function(a, b, c, d) end,
@@ -96,6 +97,9 @@ local cfg_xml = {
 decode = native_xml_decode,
 encode = native_xml_encode
 }
+local cfg_env = {
+get_env = native_system_get_env
+}
 function native_callback_loop(dt)
 std.milis = std.milis + dt
 std.delta = dt
@@ -160,6 +164,7 @@ loadcore.setup(std, application, engine)
 :package('@draw.poly', engine_api_draw_poly, cfg_poly)
 :package('@color', color)
 :package('@log', engine_log, cfg_log)
+:package('@env', engine_env, cfg_env)
 :package('math', engine_math_clib)
 :package('math.random', engine_math_random)
 :package('http', engine_http, cfg_http)
@@ -188,12 +193,12 @@ version=version
 }
 return P
 end
-b247f[1] = r247f(1, function()
-return '0.2.7'
+b259c[1] = r259c(1, function()
+return '0.3.1'
 end)
-b247f[2] = r247f(2, function()
-local zeebo_pipeline = b247f[24]('source_shared_functional_pipeline')
-local requires = b247f[25]('source_shared_string_dsl_requires')
+b259c[2] = r259c(2, function()
+local zeebo_pipeline = b259c[25]('source_shared_functional_pipeline')
+local requires = b259c[26]('source_shared_string_dsl_requires')
 local function step_install_libsys(self, lib_name, library, custom, is_system)
 if not is_system then return end
 local ok, msg = pcall(function()
@@ -274,9 +279,9 @@ setup = setup
 }
 return P
 end)
-b247f[3] = r247f(3, function()
-local eval_file = b247f[26]('source_shared_string_eval_file')
-local eval_code = b247f[27]('source_shared_string_eval_code')
+b259c[3] = r259c(3, function()
+local eval_file = b259c[27]('source_shared_string_eval_file')
+local eval_code = b259c[28]('source_shared_string_eval_code')
 local has_io_open = io and io.open
 local function normalize(app, base)
 if not app then return nil end
@@ -348,7 +353,7 @@ script = script
 }
 return P
 end)
-b247f[4] = r247f(4, function()
+b259c[4] = r259c(4, function()
 local function install(std, engine, library, name)
 std = std or {}
 std[name] = {
@@ -362,26 +367,32 @@ install=install
 }
 return P
 end)
-b247f[5] = r247f(5, function()
-local util_decorator = b247f[28]('source_shared_functional_decorator')
+b259c[5] = r259c(5, function()
 local function reset(std, engine)
 if std.node then
+return function()
 std.bus.emit('exit')
 std.bus.emit('init')
-else
+end
+end
+return function()
 engine.root.callbacks.exit(engine.root.data, std)
 engine.root.callbacks.init(engine.root.data, std)
 end
 end
 local function exit(std)
+return function()
 std.bus.emit('exit')
 std.bus.emit('quit')
 end
-local function title(func, window_name)
+end
+local function title(func)
+return function(window_name)
 if func then
 func(window_name)
 end
 end
+end
 local function install(std, engine, config)
 std = std or {}
 config = config or {}
@@ -391,9 +402,9 @@ if config.quit then
 config.quit()
 end
 end)
-std.app.title = util_decorator.prefix1(config.set_title, title)
-std.app.exit = util_decorator.prefix1(std, exit)
-std.app.reset = util_decorator.prefix2(std, engine, reset)
+std.app.title = title(config.set_title)
+std.app.exit = exit(std)
+std.app.reset = reset(std, engine)
 std.app.get_fps = config.get_fps
 return std.app
 end
@@ -402,7 +413,7 @@ install=install
 }
 return P
 end)
-b247f[6] = r247f(6, function()
+b259c[6] = r259c(6, function()
 local function djb2(digest)
 local index = 1
 local hash = 5381
@@ -425,8 +436,8 @@ install = install
 }
 return P
 end)
-b247f[7] = r247f(7, function()
-local zeebo_pipeline = b247f[24]('source_shared_functional_pipeline')
+b259c[7] = r259c(7, function()
+local zeebo_pipeline = b259c[25]('source_shared_functional_pipeline')
 local function json(self)
 self.options['json'] = true
 return self
@@ -535,6 +546,11 @@ local new_body = json_decode(std.http.body)
 std.http.body = new_body
 end)
 end
+local lower_header = {}
+for k, v in pairs(std.http.headers or {}) do
+lower_header[string.lower(k)] = v
+end
+std.http.headers = lower_header
 end,
 function()
 callback_handler(std, game)
@@ -583,7 +599,7 @@ install=install
 }
 return P
 end)
-b247f[8] = r247f(8, function()
+b259c[8] = r259c(8, function()
 local language = 'en-US'
 local language_default = 'en-US'
 local language_list = {}
@@ -674,10 +690,15 @@ install=install
 }
 return P
 end)
-b247f[9] = r247f(9, function()
+b259c[9] = r259c(9, function()
 local function real_key(std, engine, rkey, rvalue)
-local value = rvalue == 1 or rvalue == true
+local value = (rvalue == 1 or rvalue == true) or false
 local key = engine.key_bindings[rkey] or (std.key.axis[rkey] and rkey)
+local key_media = std.key.media and std.key.media[rkey] ~= nil and rkey
+if key_media then
+std.key.media[key_media] = value
+std.bus.emit('key_media')
+end
 if key then
 std.key.axis[key] = value and 1 or 0
 std.key.press[key] = value
@@ -698,20 +719,71 @@ end
 local function real_keyup(std, engine, key)
 real_key(std, engine, key, 0)
 end
-local function install(std, engine, key_bindings)
-engine.key_bindings = key_bindings or {}
+local function install(std, engine, config)
+config = config or {}
+engine.key_bindings = config.bindings or {}
 engine.keyboard = real_key
+if config.has_media then
+std.key.media = {
+ch_up = false,
+ch_down = false,
+vol_up = false,
+vol_down = false
+}
+end
 std.bus.listen_std_engine('rkey', real_key)
 std.bus.listen_std_engine('rkey1', real_keydown)
 std.bus.listen_std_engine('rkey0', real_keyup)
 end
+return {
+install = install
+}
+end)
+b259c[10] = r259c(10, function()
+local function setenv(engine)
+return function(varname, value)
+if engine.root ~= engine.current then
+error('unauthorized set environment', 0)
+end
+if varname then
+engine.overrides_envs[varname] = tostring(value)
+end
+end
+end
+local function getenv(engine, get_env)
+return function(varname) 
+local game_envs = engine.root and engine.root.envs
+local core_envs = engine.envs
+if not (varname or #varname > 0) then
+return nil
+end
+if engine.overrides_envs[varname] then
+return engine.overrides_envs[varname]
+end
+if game_envs and game_envs[varname] then
+return game_envs[varname]
+end
+if core_envs and core_envs[varname] then
+return core_envs[varname]
+end    
+if get_env then
+return get_env(varname)
+end
+return nil
+end
+end
+local function install(std, engine, cfg)
+engine.overrides_envs = {}
+std.getenv = getenv(engine, cfg.get_env)
+std.setenv = setenv(engine)
+end
 local P = {
 install = install
 }
 return P
 end)
-b247f[10] = r247f(10, function()
-local util_decorator = b247f[28]('source_shared_functional_decorator')
+b259c[11] = r259c(11, function()
+local util_decorator = b259c[29]('source_shared_functional_decorator')
 local logging_types = {
 'none', 'fatal', 'error', 'warn', 'debug', 'info'
 }
@@ -756,7 +828,7 @@ install = install
 }
 return P
 end)
-b247f[11] = r247f(11, function()
+b259c[12] = r259c(12, function()
 local function abs(value)
 if value < 0 then
 return -value
@@ -854,7 +926,7 @@ install = install
 }
 return P
 end)
-b247f[12] = r247f(12, function()
+b259c[13] = r259c(13, function()
 local function install(std)
 assert(math and (1/2 ~= 0))
 std.math = std.math or {}
@@ -889,7 +961,7 @@ install = install
 }
 return P
 end)
-b247f[13] = r247f(13, function()
+b259c[14] = r259c(14, function()
 local function install(std)
 assert(math and (1/2 ~= 0))
 std.math = std.math or {}
@@ -905,8 +977,8 @@ install = install
 }
 return P
 end)
-b247f[14] = r247f(14, function()
-local util_decorator = b247f[28]('source_shared_functional_decorator')
+b259c[15] = r259c(15, function()
+local util_decorator = b259c[29]('source_shared_functional_decorator')
 local function array_map(array, func)
 local res = {}
 local index = 1
@@ -1066,7 +1138,7 @@ install = install
 }
 return P
 end)
-b247f[15] = r247f(15, function()
+b259c[16] = r259c(16, function()
 local function media_create(node, channels, handler)
 local decorator = function(func)
 func = func or function() end
@@ -1078,6 +1150,7 @@ end
 local self = { 
 src = decorator(handler.source),
 play = decorator(handler.play),
+prepare = decorator(handler.prepare),
 pause = decorator(handler.pause),
 resume = decorator(handler.resume),
 stop = decorator(handler.stop),
@@ -1111,7 +1184,7 @@ install=install
 }
 return P
 end)
-b247f[16] = r247f(16, function()
+b259c[17] = r259c(17, function()
 local function draw_fps(std, engine, show, pos_x, pos_y)
 if show < 1 then return end
 local x = engine.current.config.offset_x + pos_x
@@ -1159,9 +1232,9 @@ install=install
 }
 return P
 end)
-b247f[17] = r247f(17, function()
-local util_decorator = b247f[28]('source_shared_functional_decorator')
-local function text_put(std, engine, font_previous, pos_x, pos_y, text, size)
+b259c[18] = r259c(18, function()
+local function text_put(std, engine, font_previous)
+return function(pos_x, pos_y, text, size)
 size = size or 2
 local hem = engine.current.data.width / 80
 local vem = engine.current.data.height / 24
@@ -1171,24 +1244,27 @@ std.text.font_size(font_size)
 std.text.print(pos_x * hem, pos_y * vem, text)
 font_previous()
 end
-local function text_print_ex(std, engine, x, y, text, align_x, align_y)
+end
+local function text_print_ex(std, engine)
+return function(x, y, text, align_x, align_y)
 local w, h = std.text.mensure(text)
 local aligns_x, aligns_y = {w, w/2, 0}, {h, h/2, 0}
 std.text.print(x - aligns_x[(align_x or 1) + 2], y - aligns_y[(align_y or 1) + 2], text)
 return w, h
 end
+end
 local function install(std, engine, config)
 std.text.font_previous = config.font_previous
 std.text.is_tui = config.is_tui or function() return false end
-std.text.print_ex = util_decorator.prefix2(std, engine, text_print_ex)
-std.text.put = util_decorator.prefix3(std, engine, config.font_previous, text_put)
+std.text.print_ex = text_print_ex(std, engine)
+std.text.put = text_put(std, engine, config.font_previous)
 end
 local P = {
 install=install
 }
 return P
 end)
-b247f[18] = r247f(18, function()
+b259c[19] = r259c(19, function()
 local function decorator_poo(object, func)
 if not object or not func then return func end
 return function(a, b, c, d)
@@ -1294,7 +1370,7 @@ install=install
 }
 return P
 end)
-b247f[19] = r247f(19, function()
+b259c[20] = r259c(20, function()
 local memory_dict_unload = {}
 local memory_dict = {}
 local memory_list = {}
@@ -1348,9 +1424,9 @@ install=install
 }
 return P
 end)
-b247f[20] = r247f(20, function()
-local str_http = b247f[30]('source_shared_string_encode_http')
-local str_url = b247f[31]('source_shared_string_encode_url')
+b259c[21] = r259c(21, function()
+local str_http = b259c[31]('source_shared_string_encode_http')
+local str_url = b259c[32]('source_shared_string_encode_url')
 local callbacks = {
 ['async-promise'] = function(self)
 return self:promise()
@@ -1419,7 +1495,7 @@ func = native_http_callback
 }
 return P
 end)
-b247f[21] = r247f(21, function()
+b259c[22] = r259c(22, function()
 local P = {
 data={
 width=1280,
@@ -1448,7 +1524,7 @@ callbacks={
 }
 return P;
 end)
-b247f[22] = r247f(22, function()
+b259c[23] = r259c(23, function()
 local function install(std)
 std.color = std.color or {}
 std.color.white = 0xFFFFFFFF
@@ -1482,7 +1558,7 @@ install = install
 }
 return P
 end)
-b247f[23] = r247f(23, function()
+b259c[24] = r259c(24, function()
 local P = {
 milis = 0,
 delta = 0,
@@ -1549,7 +1625,7 @@ any=false
 }
 return P;
 end)
-b247f[24] = r247f(24, function()
+b259c[25] = r259c(25, function()
 local function pipe(self)
 return function()
 self:run()
@@ -1598,7 +1674,7 @@ run=run
 }
 return P
 end)
-b247f[25] = r247f(25, function()
+b259c[26] = r259c(26, function()
 local function encode(dsl_string)
 local spec = {
 list = {},
@@ -1646,7 +1722,7 @@ should_import = should_import
 }
 return P
 end)
-b247f[26] = r247f(26, function()
+b259c[27] = r259c(27, function()
 local function script(src)
 local ok, app = false, nil
 if require then
@@ -1671,7 +1747,7 @@ script = script,
 }
 return P
 end)
-b247f[27] = r247f(27, function()
+b259c[28] = r259c(28, function()
 local function script(src)
 local loader = loadstring or load
 if not loader then
@@ -1691,7 +1767,7 @@ script = script,
 }
 return P
 end)
-b247f[28] = r247f(28, function()
+b259c[29] = r259c(29, function()
 local function decorator_prefix3(zig, zag, zom, func)
 return function (a, b, c, d, e, f)
 return func(zig, zag, zom, a, b, c, d, e, f)
@@ -1748,7 +1824,7 @@ prefix1_t = table_prefix1
 }
 return P
 end)
-b247f[30] = r247f(30, function()
+b259c[31] = r259c(31, function()
 local function is_ok(status)
 return (status and 200 <= status and status < 300) or false
 end
@@ -1894,7 +1970,7 @@ get_user_agent=get_user_agent,
 create_request=create_request
 }
 end)
-b247f[31] = r247f(31, function()
+b259c[32] = r259c(32, function()
 local function search_param(param_list, param_dict)
 local index, params = 1, ''
 while param_list and param_dict and index <= #param_list do
@@ -1915,4 +1991,4 @@ search_param = search_param
 }
 return P
 end)
-return m247f()
+return m259c()

package/package.json

@@ -1,6 +1,6 @@
 {
     "name": "@gamely/gly-engine-lite",
-    "version": "0.2.7",
+    "version": "0.3.1",
     "author": "RodrigoDornelles",
     "license": "Apache-2.0",
     "homepage": "https://docs.gamely.com.br",