Update patches

LICENSE.md

@@ -1,7 +1,7 @@
 The MIT License (MIT)
 =====================
 
-Copyright © `2023` `Till Affeldt`
+Copyright © `2023 - 2024` `Till Affeldt`
 
 Permission is hereby granted, free of charge, to any person
 obtaining a copy of this software and associated documentation

compatibility/enable_shadows.lua

@@ -11,7 +11,8 @@ local default_intensity = tonumber(minetest.settings:get("enable_shadows_default
 local intensity = tonumber(storage:get("intensity") or default_intensity)
 
 minetest.register_on_joinplayer(function(player)
-    lighting_monoids.shadows:add_change(player, intensity, "enable_shadows:base_value")
+	local lighting = { shadows = { intensity = intensity } }
+	lighting_monoid:add_change(player, lighting, "enable_shadows:base_value")
 end)
 
 minetest.override_chatcommand("shadow_intensity", {

compatibility/weather.lua

@@ -1,13 +1,30 @@
--- Hook into MTG weather mod for compatibility (requires PR #3020)
-if weather ~= nil and weather.on_update ~= nil then
-    weather.on_update = function(player, overrides)
-        if overrides == nil then
-            return
+local CYCLE = 8
+local BASE_SHADOW = 0.33
+
+-- weather API not supported, no patch possible
+if weather == nil or weather.get == nil then
+    minetest.log("warning", "[Lighting_Monoid] 'weather' mod does not support patching via API. If you are playing Minetest Game, update to the latest version")
+    return
+end
+
+-- prevent mod from triggering lighting updates itself
+local old_get = weather.get
+weather.get = function(player)
+    local params = old_get(player)
+    params.lighting = nil
+    return params
+end
+
+local function do_update()
+    for _, player in ipairs(minetest.get_connected_players()) do
+        local params = old_get(player)
+        local lighting = params.lighting
+        if lighting ~= nil and lighting.shadows ~= nil and lighting.shadows.intensity ~= nil then
+            -- normalize in relation to default intensity
+            lighting.shadows.intensity = lighting.shadows.intensity / BASE_SHADOW
         end
-        if overrides.shadows then
-            lighting_monoid:add_change(player, { shadows = overrides.shadows }, "weather:cloud_shadows")
-        end
-        overrides.lighting = nil
-        return overrides
+        lighting_monoid:add_change(player, lighting, "weather:lighting")
     end
-end
+    minetest.after(CYCLE, do_update)
+end
+minetest.after(0, do_update)

init.lua

@@ -1,11 +1,9 @@
-local SET_BASE_SHADOW = minetest.settings:get_bool("lighting_monoids.set_base_shadow", true)
 local BASE_SHADOW_INTENSITY = tonumber(minetest.settings:get("lighting_monoids.base_shadow_intensity") or 0.33)
-
 local MODPATH = minetest.get_modpath(minetest.get_current_modname())
 
 local monoid_definition = {
     shadows = {
-        intensity = "multiply_minmax",
+        intensity = "multiply",
     },
     saturation = "multiply",
     exposure = {
@@ -38,10 +36,6 @@ function methods.multiply(a, b)
     return a * b
 end
 
-function methods.multiply_minmax(a, b)
-    return math.max(math.min(a * b, 1), 0)
-end
-
 -- combine tables using specified methods
 local function combine(definition, tabA, tabB)
     -- at least one table has undefined value
@@ -69,7 +63,7 @@ lighting_monoid = player_monoids.make_monoid({
     end,
     fold = function(values)
         local total = {}
-        for _, val in ipairs(values) do
+        for _, val in pairs(values) do
             total = combine(monoid_definition, total, val)
         end
         return total
@@ -78,22 +72,25 @@ lighting_monoid = player_monoids.make_monoid({
         if player.set_lighting ~= nil then
             -- incorporate default offsets
             value = combine(monoid_definition, lighting_defaults, value)
+            -- restrict shadow intensity to valid range
+            if value ~= nil and value.shadows ~= nil and value.shadows.intensity ~= nil then
+                value.shadows.intensity = math.max(math.min(value.shadows.intensity, 1), 0)
+            end
             player:set_lighting(value)
         end
     end
 })
 
-if minetest.get_modpath("weather") then
+if minetest.get_modpath("weather") and minetest.settings:get_bool("enable_weather") ~= false then
     dofile(MODPATH ..  DIR_DELIM .. "compatibility" .. DIR_DELIM .. "weather.lua")
 end
 
 if minetest.get_modpath("enable_shadows") then
     dofile(MODPATH .. DIR_DELIM .. "compatibility" .. DIR_DELIM .. "enable_shadows.lua")
-
--- set base shadow
-elseif SET_BASE_SHADOW then
+else
+    -- set base shadow
     minetest.register_on_joinplayer(function(player)
         local lighting = { shadows = { intensity = BASE_SHADOW_INTENSITY } }
         lighting_monoid:add_change(player, lighting, "lighting_monoid:base_shadow")
     end)
-end
+end

settingtypes.txt

@@ -1,4 +1,2 @@
-# If enabled, lighting_monoids will assign a base value to the shadow intensity.
-lighting_monoids.set_base_shadow (Set base shadow) bool true
 # The base value that will be used when no other effect is active.
 lighting_monoids.base_shadow_intensity (Base shadow intensity) float 0.33 0 1