How to find out, if server is also client?

Serpens · October 27, 2016

If we play with caves enabled, the roles are clearly distributed, so I know all players are clients, and the server is the server.

But if caves is disabled, the first player is the server... But TheNet:GetIsClient() is false =/
How do I find out, if the server is also a player?

I'm working on the finder mod. It marks all containers in which the searched item is.
The server has to find out the containers with that item and then notifies the clients to mark these containers for each client individually.
That's why I strcitly differentiate between server and client. But this resulted strangely in a mod that only works for real clients (so with caves enabled) and does not work for the first payer if caves is disabled

Here is the code:

Spoiler


local _G = GLOBAL

local client_option = GetModConfigData("active", true) -- to allow clients to disable highlighting

local isDST = _G.TheSim:GetGameID() == 'DST'

--[ highlighting when active item is changed

local Highlight = _G.require 'components/highlight'
local __Highlight_ApplyColour = Highlight.ApplyColour
local __Highlight_UnHighlight = Highlight.UnHighlight

-- additional highlight of found container objects
local c = {r = 0, g = .25, b = 0}

-- this maintains colour when the game unhighlights our object
local function custom_ApplyColour(self, ...)
  local r, g, b =
  (self.base_add_colour_red   or 0),
  (self.base_add_colour_green or 0),
  (self.base_add_colour_blue  or 0)

  self.base_add_colour_red,
  self.base_add_colour_green,
  self.base_add_colour_blue =
  r + c.r, g + c.g, b + c.b

  local result = __Highlight_ApplyColour(self, ...)

  self.base_add_colour_red,
  self.base_add_colour_green,
  self.base_add_colour_blue = r, g, b

  return result
end

-- prevents removal of the whole component on UnHighlight
local function custom_UnHighlight(self, ...)
  local flashing = self.flashing
  self.flashing = true
  local result = __Highlight_UnHighlight(self, ...)
  self.flashing = flashing

  if isDST and not self.flashing then
    local r, g, b =
    (self.highlight_add_colour_red   or 0),
    (self.highlight_add_colour_green or 0),
    (self.highlight_add_colour_blue  or 0)

    self.highlight_add_colour_red,
    self.highlight_add_colour_green,
    self.highlight_add_colour_blue =
    0, 0, 0

    self:ApplyColour()

    self.highlight_add_colour_red,
    self.highlight_add_colour_green,
    self.highlight_add_colour_blue = r, g, b
  end

  return result
end

-- #####################

local function filter(chest, item)
  return chest.components.container and item and
         chest.components.container:Has(item, 1)
end

-- because of server client communication delay, everything has to be done in a row, in this order:
-- unhighlight at client -> unhighlight at server (set nil) -> server highlight (:set()) -> client highlighted with OnDirtyEventSearchedChest

local function ClientUnhighlightChests(owner,prefab,source,unhighlighten,highlighten)
    if GLOBAL.TheNet:GetIsClient()  then -- only client pass
        if unhighlighten then
            -- print("client unhighlight start")
            for i=1,50 do -- alle bekannten Chests unhighlighten
                local chest = owner["mynetvarSearchedChest"..tostring(i)]:value()
                if chest and chest.components.highlight then
                  -- print("client unhighlight "..tostring(chest).." hattag: "..tostring(chest:HasTag("HighlightSourceCraftPot")).." source: "..tostring(source))
                  if not (not chest:HasTag("HighlightSourceCraftPot") and source=="CraftPotClose") then

                      if chest.components.highlight.ApplyColour == custom_ApplyColour then
                        chest.components.highlight.ApplyColour = nil
                      end

                      if chest.components.highlight.UnHighlight == custom_UnHighlight then
                        chest.components.highlight.UnHighlight = nil
                      end

                      chest.components.highlight:UnHighlight()
                    end
                end
            end
        end
        local rpc = GetModRPC("FinderMod", "CheckContainersItem") 
        SendModRPCToServer(rpc,prefab,source,unhighlighten,highlighten) -- set last one to true, to unhighlight only
    end
end

local function ServerRPCFunction(owner,prefab,source,unhighlighten,highlighten)
    -- print("serverfkt called")
    if unhighlighten then
        local v = nil
        for i=1,50 do
            v = owner["mynetvarSearchedChest"..tostring(i)]:value()
            if v~=nil and not (not v:HasTag("HighlightSourceCraftPot") and source=="CraftPotClose") then
                -- print("server unhighlight "..tostring(v).." hattag: "..tostring(v:HasTag("HighlightSourceCraftPot")).." source: "..tostring(source))
                v:RemoveTag("HighlightSourceCraftPot")
                owner["mynetvarSearchedChest"..tostring(i)]:set(nil) -- remove tag and set nil at serverside
            end
        end
    end
    if highlighten then
        if owner and prefab then -- if no prefab is given, nothing will be highlighted :)
            local x, y, z = owner.Transform:GetWorldPosition()
            local e = TheSim:FindEntities(x, y, z, 20, nil, {'NOBLOCK', 'player', 'FX'}) or {}
            for k, v in pairs(e) do
                if v and v:IsValid() and v.entity:IsVisible() and filter(v,prefab) then
                    -- print("server highlight "..tostring(v))
                    if source=="CraftPot" then
                        v:AddTag("HighlightSourceCraftPot") -- when craft pot closes, it should unhighlight everything that was previously highlighted by craftpot. That's why we use this Tag and all the source stuff
                    end
                    for i=1,50 do
                        if owner["mynetvarSearchedChest"..tostring(i)]:value()==nil then -- look for empty slot
                           v.highlightsource = source -- add this temporary info
                           owner["mynetvarSearchedChest"..tostring(i)]:set(v)
                           break
                       end
                   end
               end
            end
        end
    end
end

local function DoHighlightStuff(owner,prefab,source,unhighlighten,highlighten)
    if GLOBAL.TheNet:GetIsClient() then
        ClientUnhighlightChests(owner,prefab,source,unhighlighten,highlighten)
    end
end

local function onactiveitem(owner,data)
    local prefab = data.item and data.item.prefab or nil
    local source = "newactiveitem"
    if owner and prefab then -- unhighlight + highlight
        DoHighlightStuff(owner,prefab,source,true,true)
    else -- only unhighlight
        DoHighlightStuff(owner,prefab,source,true,false)
    end
end 

local function OnDirtyEventSearchedChest(inst,i) -- this is called on client, if the server does inst.mynetvarTitleStufff:set(...)
    -- print("OnDirtyEventSearchedChest i "..tostring(i))
    if GLOBAL.TheNet:GetIsClient() then -- only client pass
        if client_option then
            local chest = inst["mynetvarSearchedChest"..tostring(i)]:value()
            if chest then
                -- print("client highlight event number "..tostring(i).." chest: "..tostring(chest))
                if not chest.components.highlight then
                    chest:AddComponent('highlight')
                end

                if chest.components.highlight then
                    chest.components.highlight.ApplyColour = custom_ApplyColour
                    chest.components.highlight.UnHighlight = custom_UnHighlight
                    chest.components.highlight:Highlight(0, 0, 0)
                end
            end
        end
    end
end


local function RegisterListeners(inst)
    for i=1,50 do
        inst:ListenForEvent("DirtyEventSearchedChest"..tostring(i), function(inst) inst:DoTaskInTime(0,OnDirtyEventSearchedChest(inst,i)) end)
    end
end

local function init(inst)
    if not inst then return end
    for i=1,50 do -- allow up to 50 containers (cause we can't use an array of entities, we use 50 entity netvars)
        inst["mynetvarSearchedChest"..tostring(i)] = GLOBAL.net_entity(inst.GUID, "SearchedChest"..tostring(i).."NetStuff", "DirtyEventSearchedChest"..tostring(i))
        inst["mynetvarSearchedChest"..tostring(i)]:set(nil)
    end
    inst:DoTaskInTime(0, RegisterListeners)
    inst:ListenForEvent('newactiveitem', onactiveitem)
end

AddPlayerPostInit(function (owner)
    init(owner)
end)

AddModRPCHandler("FinderMod", "CheckContainersItem", ServerRPCFunction)

-- ######################

--[ highlighting when ingredient in recipepopup is hovered
AddClassPostConstruct("widgets/ingredientui", function(self)
    local __IngredientUI_OnGainFocus = self.OnGainFocus

    function self:OnGainFocus (...)
      local tex   = self.ing and self.ing.texture and self.ing.texture:match('[^/]+$'):gsub('%.tex$', '')
      local owner = self.parent and self.parent.parent and self.parent.parent.owner
      if tex and owner then
        DoHighlightStuff(owner,tex,"Crafting",true,true)
      end
      if __IngredientUI_OnGainFocus then
        return __IngredientUI_OnGainFocus(self, ...)
      end
    end

    local __IngredientUI_OnLoseFocus = self.OnLoseFocus
    function self:OnLoseFocus(...)
        local owner = self.parent and self.parent.parent and self.parent.parent.owner
        DoHighlightStuff(owner,nil,"Crafting",true,false)
        if __IngredientUI_OnLoseFocus then
            return __IngredientUI_OnLoseFocus(self,...)
        end
    end
end)


-- ### Compatible to Craft Pot Mod, to find food with the searched tags
local function testCraftPot()
    local FoodIngredientUI = _G.require 'widgets/foodingredientui'
end
if GLOBAL.pcall(testCraftPot) then
    local cooking = _G.require("cooking")
    local ing = cooking.ingredients    
    
    AddClassPostConstruct("widgets/foodingredientui", function(self)
        local __FoodIngredientUI_OnGainFocus = self.OnGainFocus
        function self:OnGainFocus(...)
            local searchtag = self.prefab -- tag or name
            local isname = self.is_name
            local owner = self.owner
            local prefabs = {} -- find all the prefabs with that cooking tag
            
            if not isname then
                for prefab,xyz in pairs(ing) do
                    for tag,number in pairs(xyz.tags) do
                        if tag==searchtag then
                            table.insert(prefabs,prefab)
                        end
                    end
                end
            elseif isname and GLOBAL.PREFABDEFINITIONS[searchtag] then
                table.insert(prefabs,GLOBAL.PREFABDEFINITIONS[searchtag].name)
            end
            DoHighlightStuff(owner,nil,"CraftPot",true,false) -- to unhighlight everything
            for k,prefab in pairs(prefabs) do -- send one prefab after the other, cause sedning an array via rpc does not work..
                if prefab and owner then
                  DoHighlightStuff(owner,prefab,"CraftPot",false,true) -- highlight every prefab, without unhighlighting in between
                end
            end
            if __FoodIngredientUI_OnGainFocus then
                return __FoodIngredientUI_OnGainFocus(self,...)
            end
        end
        
        -- local __FoodIngredientUI_OnLoseFocus = self.OnLoseFocus -- not needed, we use the FoodCrafting Focus instead
        -- function self:OnLoseFocus(...)
            -- local owner = self.owner
            -- onactiveitem(owner,nil,"CraftPot") -- to unhighlight
            -- if __FoodIngredientUI_OnLoseFocus then
                -- return __FoodIngredientUI_OnLoseFocus(self,...)
            -- end
        -- end
    end)

    AddClassPostConstruct("widgets/foodcrafting", function(self)
        local _OnLoseFocus = self.OnLoseFocus
        self.OnLoseFocus = function(...)
            local owner = self.owner
            DoHighlightStuff(owner,nil,"CraftPot",true,false) -- to unhighlight
            if _OnLoseFocus then
                return _OnLoseFocus(self, ...) 
            end
        end
        
        local _Close = self.Close
        self.Close = function(...)
            local owner = self.owner
            DoHighlightStuff(owner,nil,"CraftPotClose",true,false) -- this unhighlight ony should work for highlights made with craft pot
            if _Close then 
                return _Close(self, ...) 
            end
        end
    end)    
end


AddClassPostConstruct("widgets/tabgroup", function(self)
    local __TabGroup_DeselectAll = self.DeselectAll
    function self:DeselectAll(...)
      DoHighlightStuff(GLOBAL.ThePlayer,nil,"CraftingClose",true,false)
      return __TabGroup_DeselectAll(self, ...)
    end
end)

Edited October 27, 2016 by Serpens

Maris · October 27, 2016



if TheNet:GetIsServer() then
	q.SERVER_SIDE = true
	if TheNet:IsDedicated() then
		q.DEDICATED_SIDE = true
	else
		q.CLIENT_SIDE = true
	end
elseif TheNet:GetIsClient() then
	q.SERVER_SIDE = false
	q.CLIENT_SIDE = true
	q.ONLY_CLIENT_SIDE = true
end

a part from my lib in the mod "Top Mod".

Also notice that if SERVER_SIDE is nil and CLIENT_SIDE is nil too, that means the mod is force enabled and it's working on main screen. I guess.

Edited October 27, 2016 by Maris

Serpens · October 27, 2016

18 minutes ago, Maris said:
if TheNet:GetIsServer() then
	q.SERVER_SIDE = true
	if TheNet:IsDedicated() then
		q.DEDICATED_SIDE = true
	else
		q.CLIENT_SIDE = true
	end
elseif TheNet:GetIsClient() then
	q.SERVER_SIDE = false
	q.CLIENT_SIDE = true
	q.ONLY_CLIENT_SIDE = true
end
a part from my lib in the mod "Top Mod".

Also notice that if SERVER_SIDE is nil and CLIENT_SIDE is nil too, that means the mod is force enabled and it's working on main screen. I guess.

this is really confusing But I will try around and report back.

Meanwhile, since I now know you are star:
Why is in ShowMe and also in TopMod a modmain.lua, and a "modname".lua with the same content like the modmain?

edit: and why are your comments in code always russian ? I would understand more of your professional mods, if it would be english

Edited October 27, 2016 by Serpens

Maris · October 27, 2016

19 minutes ago, Serpens said:

Meanwhile, since I now know you are star:
Why is in ShowMe and also in TopMod a modmain.lua, and a "modname".lua with the same content like the modmain?

Sometimes I edit few mods simultaneously. That means few tabs "modmain.lua" in Notepad++. And I'm not sure what tab is from what mod. So I decided to make symbolic links. So in notepad++ I see: ShowMe.lua instead of modmain.lua etc. After editing ShowMe.lua, modmain.lua is edited automatically.

https://en.wikipedia.org/wiki/Symbolic_link

For you it's two different files. But for me it's the same file. In my file system these files are linked together.

And I didn't delete it because I'm too lazy. Few kilobytes doesn't make sense.

19 minutes ago, Serpens said:

and why are your comments in code always russian

Because I'm russian. Most of mods I did for myself and my server. Also there is no translation for many russian jokes including morphological derivation. Finally, I'm lazy Sorry for that.

Sometimes I add English comments if I'm sure somebody may find it useful for copy & paste & adapt for his mod. And sometimes I don't like that somebody steal the code of my idea for mod (I mean plagiarism).

Edited October 27, 2016 by Maris

Serpens · October 27, 2016

6 minutes ago, Maris said:

Sometimes I edit few mods simultaneously. That means few tabs "modmain.lua" in Notepad++. And I'm not sure what tab is from what mod. So I decided to make symbolic links. So in notepad++ I see: ShowMe.lua instead of modmain.lua etc. After editing ShowMe.lua, modmain.lua is edited automatically.

https://en.wikipedia.org/wiki/Symbolic_link

For you it's two different files. But for me it's the same file. In my file system these files are linked together.

And I didn't delete it because I'm too lazy. Few kilobytes doesn't make sense.

Because I'm russian. Most of mods I did for myself and my server. Also there is no translation for many russian jokes including morphological derivation. Finally, I'm lazy Sorry for that.

Sometimes I add English comments if I'm sure somebody may find it useful for copy & paste & adapt for his mod. And sometimes I don't like that somebody steal the code of my idea for mod (I mean plagiarism).

about files:
aaaaaah. Good to know. I thought it would be again some client/dedicated stuff...

about language:
ah okay but some newbies want to learn with help of your code ^^ =P

btw. your client/server/dedicated stuff did work wonderfuel!
I use the check for CLIENT_SIDE now, and everything works, like it should. Thank you

Maris · October 27, 2016

8 minutes ago, Serpens said:

but some newbies want to learn with help of your code

For newbies it's better to read guides or see simple mods, but not my complicated mods

No problems.

Sign In

How to find out, if server is also client?

Recommended Posts

Serpens

Link to comment

Share on other sites

Maris

Link to comment

Share on other sites

Serpens

Link to comment

Share on other sites

Maris

Link to comment

Share on other sites

Serpens

Link to comment

Share on other sites

Maris

Link to comment

Share on other sites

Create an account or sign in to comment

Create an account

Sign in

Browse

Forums

Activity

My Activity Streams