CONTAINERS_VERSION = "0.80"

require('libraries/timers')
require('libraries/playertables')

local ID_BASE = "cont_"
FORCE_NIL = false


CONTAINERS_DEBUG = IsInToolsMode() -- Should we print debugging prints for containers

--[[

  Containers API Calls
    Containers:AddItemToUnit(unit, item)
    Containers:CreateContainer(cont)
    Containers:CreateShop(cont)
    Containers:DeleteContainer(c, deleteContents)
    Containers:DisplayError(pid, message)
    Containers:EmitSoundOnClient(pid, sound)
    Containers:GetDefaultInventory(unit)
    Containers:GetEntityContainers(entity)
    Containers:SetDefaultInventory(unit, container)
    Containers:SetItemLimit(limit)
    Containers:SetRangeAction(unit, tab)
    Containers:UsePanoramaInventory(useInventory)

    Containers:OnButtonPressed(playerID, container, unit, buttonNumber, buttonName)
    Containers:OnCloseClicked(playerID, container, unit)
    Containers:OnDragFrom(playerID, container, unit, item, fromSlot, toContainer, toSlot)
    Containers:OnDragTo(playerID, container, unit, item, fromSlot, toContainer, toSlot)
    Containers:OnDragWithin(playerID, container, unit, item, fromSlot, toSlot)
    Containers:OnDragWorld(playerID, container, unit, item, slot, position, entity)
    Containers:OnLeftClick(playerID, container, unit, item, slot)
    Containers:OnRightClick(playerID, container, unit, item, slot)


  Container Creation:
    Containers:CreateContainer({
      layout             = {3,2,2},
      skins              = {"Skin1", "Another"}, --{}
      buttons            = {}, -- {"Take All"}
      headerText         = "#lootbox",
      draggable          = true,
      position           = "200px 200px 0px",  -- "30% 40%"   -- "mouse"    -- "entity"
      equipment          = true,
      range              = 250,
      closeOnOrder       = true,
      forceOwner         = false,
      forcePurchaser     = false,
      entity             = PlayerResource:GetSelectedHeroEntity(0),

      pids               = {0}, -- {[2]=true, [4]=true}
      items              = {}, -- {CreateItem(...), CreateItem(...)}    -- {[3]=CreateItem(...), [5]=CreateItem(...):GetEntityIndex()}

      cantDragFrom       = {}, -- {3,5}
      cantDragTo         = {},

      layoutFile         = "file://{resources}/layout/custom_game/containers/alt_container_example.xml", nil->default

      OnLeftClick        = function(playerID, container, unit, item, slot) ... end,  -- nil->default, false->do nothing
      OnRightClick       = function(playerID, container, unit, item, slot) ... end,  -- nil->default, false->do nothing
      OnDragFrom         = function(playerID, container, unit, item, fromSlot, toContainer, toSlot) ... end,  -- nil->default, false->do nothing
      OnDragTo           = function(playerID, container, unit, item, fromSlot, toContainer, toSlot) ... end,  -- nil->default, false->do nothing
      OnDragWithin       = function(playerID, container, unit, item, fromSlot, toSlot) ... end,  -- nil->default, false->do nothing
      OnDragWorld        = function(playerID, container, unit, item, slot, position, entity) ... end,  -- nil->default, false->do nothing
      OnCloseClicked     = function(playerID, container, unit) ... end,  -- nil->default, false->do nothing
      OnButtonPressed    = function(playerID, container, unit, buttonNumber, buttonName) ... end,  -- nil->default, false->do nothing
      OnEntityOrder      = function(playerID, container, unit, target),  -- nil->do nothing
      OnEntityDrag       = function(playerID, container, unit, target, fromContainer, item) ... end,  -- nil->do nothing
      OnClose            = function(playerID, container) ... end,  -- nil->default
      OnOpen             = function(playerID, container) ... end,  -- nil->default,
      OnSelect           = function(playerID, container, selectedEntity) ... end,  -- nil->default,
      OnDeselect         = function(playerID, container, deselectedEntity) ... end,  -- nil->default,,

      -- return true to allow the item add event.  slot is -1 if no slot is specified.
      AddItemFilter      = function(container, item, slot),  -- nil->no filter


      -- See containers/container_events.js for javascript callback registration and handling
      -- nil means to use the default
      OnLeftClickJS      = "ExampleLeftClick",
      OnRightClickJS     = "ExampleRightClick",
      OnDoubleClickJS    = "ExampleDoubleClick",
      OnMouseOutJS       = "ExampleMouseOut",
      OnMouseOverJS      = "ExampleMouseOver",
      OnButtonPressedJS  = "ExampleButtonPressed",
      OnCloseClickedJS   = "ExampleCloseClicked",
    )}

  Container Functions:
      c:ActivateItem(unit, item, playerID)
      c:AddItem(item, slot, column, bypassFilter)
      c:AddSkin(skin)
      c:AddSubscription(pid)
      c:CanDragFrom(pid)
      c:CanDragTo(pid)
      c:CanDragWithin(pid)
      c:ClearSlot(slot)
      c:Close(pid)
      c:ContainsItem(item)
      c:Delete(deleteContents)
      c:GetAllItems()
      c:GetAllOpen()
      c:GetButtonName(number)
      c:GetButtons()
      c:GetCanDragFromPlayers()
      c:GetCanDragToPlayers()
      c:GetCanDragWithinPlayers()
      c:GetContainerIndex()
      c:GetEntity()
      c:GetForceOwner()
      c:GetForcePurchaser()
      c:GetHeaderText()
      c:GetItemInRowColumn(row, column)
      c:GetItemInSlot(slot)
      c:GetItemsByName(name)
      c:GetLayout()
      c:GetNumItems()
      c:GetRange()
      c:GetRowColumnForItem(item)
      c:GetSize()
      c:GetSkins()
      c:GetSlotForItem(item)
      c:GetSubscriptions()
      c:HasSkin(skin)
      c:IsCloseOnOrder()
      c:IsDraggable()
      c:IsEquipment()
      c:IsInventory()
      c:IsOpen(pid)
      c:IsSubscribed(pid)
      c:OnButtonPressed(fun)
      c:OnButtonPressedJS(jsCallback)
      c:OnClose(fun)
      c:OnCloseClicked(fun)
      c:OnCloseClickedJS(jsCallback)
      c:OnDeselect(fun)
      c:OnDoubleClickJS(jsCallback)
      c:OnDragFrom(fun)
      c:OnDragTo(fun)
      c:OnDragWithin(fun)
      c:OnDragWorld(fun)
      c:OnEntityDrag(fun)
      c:OnEntityOrder(fun)
      c:OnLeftClick(fun)
      c:OnLeftClickJS(jsCallback)
      c:OnMouseOutJS(jsCallback)
      c:OnMouseOverJS(jsCallback)
      c:OnOpen(fun)
      c:OnRightClick(fun)
      c:OnRightClickJS(jsCallback)
      c:OnSelect(fun)
      c:Open(pid)
      c:RemoveButton(number)
      c:RemoveItem(item)
      c:RemoveSkin(skin)
      c:RemoveSubscription(pid)
      c:SetButton(number, name)
      c:SetCanDragFrom(pid, canDrag)
      c:SetCanDragTo(pid, canDrag)
      c:SetCanDragWithin(pid, canDrag)
      c:SetCloseOnOrder(close)
      c:SetDraggable(drag)
      c:SetEntity(entity)
      c:SetEquipment(equip)
      c:SetForceOwner(owner)
      c:SetForcePurchaser(purchaser)
      c:SetHeaderText(header)
      c:SetLayout(layout, removeOnContract)
      c:SetRange(range)
      c:SwapItems(item1, item2, allowCombine)
      c:SwapSlots(slot1, slot2, allowCombine)




  Shop Creation:
    Containers:CreateShop({
      -- Same as CreateContainer but with the additions of
      items              = {}, -- {CreateItem(...), CreateItem(...)}    -- {[3]=CreateItem(...), [5]=CreateItem(...):GetEntityIndex()}
      prices             = {}, -- {500, 800}   -- {[3]=500, [5]=800}
      stocks             = {}, -- {[5]=10}
    }

  Shop Functions:
    -- Same as a Container but with the additions of
    shop:BuyItem(playerID, unit, item)
    shop:GetPrice(item)
    shop:GetStock(item)
    shop:SetPrice(item, price)
    shop:SetStock(item, stock)

]]


LinkLuaModifier( "modifier_shopkeeper", "libraries/modifiers/modifier_shopkeeper.lua", LUA_MODIFIER_MOTION_NONE )

--"dota_hud_error_not_enough_gold"        "Not Enough Gold"
--"dota_hud_error_item_out_of_stock"        "Item is out of Stock"
--"dota_hud_error_cant_pick_up_item"        "Inventory Full"
--"dota_hud_error_cant_sell_shop_not_in_range"  "No Shop In Range"
--"dota_hud_error_target_out_of_range"      "Target Out Of Range"
--"dota_hud_error_unit_command_restricted"    "Can't Act"
--"DOTA_FantasyTeamCreate_Error_Header"       "Error"
--"DOTA_Trading_Response_UnknownError"      "Unknown Error"


-- mango can't be activated from outside inventory if it ever touched it
-- dust crash for same reason
-- dagon no particles/effects for same reason
-- soul ring crash for same reason
-- bottle also doesn't activate for same reason

-- travels don't work, TP either probably
-- armlet doesn't activate at all

-- euls has targeting issues
-- aghs probably not for sure
-- treads don't work in equipment


local ApplyPassives = nil
ApplyPassives = function(container, item, entOverride)
  local ent = entOverride or container:GetEntity()
  if not ent or not ent.AddNewModifier then return end
  if container.appliedPassives[item:GetEntityIndex()] then return end

  local passives = Containers.itemPassives[item:GetAbilityName()]
  if passives then
    for _,passive in ipairs(passives) do
      -- check for previous buffs from this exact item
      local buffs = ent:FindAllModifiersByName(passive)
      for _, buff in ipairs(buffs) do
        if buff:GetAbility() == item then
          Timers:CreateTimer(function()
            --print("FOUND, rerunning until removed")
            ApplyPassives(container, item, entOverride)
          end)
          return
        end
      end
    end

    container.appliedPassives[item:GetEntityIndex()] = {}
    for _,passive in ipairs(passives) do
      item:ApplyDataDrivenModifier(ent, ent, passive, {})
      buffs = ent:FindAllModifiersByName(passive)
      for _, buff in ipairs(buffs) do
        if buff:GetAbility() == item then
          table.insert(container.appliedPassives[item:GetEntityIndex()], buff)
          break
        end
      end
    end
  else
    passives = item:GetIntrinsicModifierName()
    if passives then
      local buff = ent:AddNewModifier(ent, item, passives, {})
      container.appliedPassives[item:GetEntityIndex()] = {buff}
    end
  end
end

local GetItem = function(item)
  if type(item) == "number" then
    return EntIndexToHScript(item)
  elseif item and IsValidEntity(item) and item.IsItem and item:IsItem() then
    return item
  end
end



local unitInventory = {unit = nil, range = 150, allowStash = false, canDragFrom = {}, canDragTo = {}, forceOwner = nil, forcePurchaser = nil}

function unitInventory:AddItem(item, slot)
  item = GetItem(item)
  local unit = self.unit

  local findStack = slot == nil
  slot = slot or 0

  local size = self:GetSize()

  if slot > size then
    print("[containers.lua]  Request to add item in slot " .. slot .. " -- exceeding dota inventory size " .. size)
    return false
  end

  local full = true
  local stack = false
  for i=0,size do
    local sItem = unit:GetItemInSlot(i)
    if not sItem then
      full = false
    elseif sItem:GetAbilityName() == item:GetAbilityName() and item:IsStackable() then
      stack = true
    end
  end

  if full and not stack then return false end
  unit:AddItem(item)

  Timers:CreateTimer(function()
    if not IsValidEntity(item) then return end

    unit:DropItemAtPositionImmediate(item, unit:GetAbsOrigin())
    local drop = nil
    for i=GameRules:NumDroppedItems()-1,0,-1 do
      drop = GameRules:GetDroppedItem(i)
      if drop:GetContainedItem() == item then
        drop:RemoveSelf()
        break
      end
    end

    unit:AddItem(item)

    if not findStack then
      for i=0,5 do
        if unit:GetItemInSlot(i) == item then
          unit:SwapItems(i,slot)

          if self.forceOwner then
            item:SetOwner(self.forceOwner)
          elseif self.forceOwner == false then
            item:SetOwner(nil)
          end
          if self.forcePurchaser then
            item:SetPurchaser(self.forcePurchaser)
          elseif self.forceOwner == false then
            item:SetPurchaser(nil)
          end
        end
      end
    end

  end)

  if not findStack then
    for i=0,5 do
      if unit:GetItemInSlot(i) == item then
        unit:SwapItems(i,slot)

        if self.forceOwner then
          item:SetOwner(self.forceOwner)
        elseif self.forceOwner == false then
          item:SetOwner(nil)
        end
        if self.forcePurchaser then
          item:SetPurchaser(self.forcePurchaser)
        elseif self.forceOwner == false then
          item:SetPurchaser(nil)
        end
        return true
      end
    end
  end



  return true
end

function unitInventory:ClearSlot(slot)
  local item = self.unit:GetItemInSlot(slot)
  if item then
    self:RemoveItem(item)
  end
end

function unitInventory:RemoveItem(item)
  item = GetItem(item)
  local unit = self.unit

  if self:ContainsItem(item) then
    unit:DropItemAtPositionImmediate(item, unit:GetAbsOrigin())
    local drop = nil
    for i=GameRules:NumDroppedItems()-1,0,-1 do
      drop = GameRules:GetDroppedItem(i)
      if drop:GetContainedItem() == item then
        drop:RemoveSelf()
        break
      end
    end
  end
end


function unitInventory:ContainsItem(item)
  item = GetItem(item)
  if not item then return false end

  local unit = self.unit
  for i=0,11 do
    if item == unit:GetItemInSlot(i) then
      return true
    end
  end

  return false
end

function unitInventory:GetSize()
  if self.allowStash then
    return 11
  else
    return 5
  end
end

function unitInventory:GetItemInSlot(slot)
  return self.unit:GetItemInSlot(slot)
end

function unitInventory:GetRange()
  return self.range
end

function unitInventory:GetEntity()
  return self.unit
end

function unitInventory:IsInventory()
  return true
end





if not Containers then
  Containers = class({})
end

function Containers:start()
  if not __ACTIVATE_HOOK then
    __ACTIVATE_HOOK = {funcs={}}
    setmetatable(__ACTIVATE_HOOK, {
      __call = function(t, func)
        table.insert(t.funcs, func)
      end
    })

    debug.sethook(function(...)
      local info = debug.getinfo(2)
      local src = tostring(info.short_src)
      local name = tostring(info.name)
      if name ~= "__index" then
        if string.find(src, "addon_game_mode") then
          if GameRules:GetGameModeEntity() then
            for _, func in ipairs(__ACTIVATE_HOOK.funcs) do
              local status, err = pcall(func)
              if not status then
                print("__ACTIVATE_HOOK callback error: " .. err)
              end
            end

            debug.sethook(nil, "c")
          end
        end
      end
    end, "c")
  end

  __ACTIVATE_HOOK(function()
    local mode = GameRules:GetGameModeEntity()
    mode:SetExecuteOrderFilter(Dynamic_Wrap(Containers, 'OrderFilter'), Containers)
    Containers.oldFilter = mode.SetExecuteOrderFilter
    mode.SetExecuteOrderFilter = function(mode, fun, context)
      --print('SetExecuteOrderFilter', fun, context)
      Containers.nextFilter = fun
      Containers.nextContext = context
    end
    Containers.initialized = true
  end)


  self.initialized = false
  self.containers = {}
  self.nextID = 0
  self.closeOnOrders = {}
  for i=0,DOTA_MAX_TEAM_PLAYERS do
    self.closeOnOrders[i] = {}
  end

  CustomNetTables:SetTableValue("containers_lua", "use_panorama_inventory", {value=false})

  self.nextFilter = nil
  self.nextContext = nil
  self.disableItemLimit = false

  self.itemKV = LoadKeyValues("scripts/npc/items.txt")
  self.itemIDs = {}

  self.entityShops = {}
  self.defaultInventories = {}

  self.rangeActions = {}
  self.previousSelection = {}
  self.entityContainers = {}

  for k,v in pairs(LoadKeyValues("scripts/npc/npc_abilities_override.txt")) do
    if self.itemKV[k] then
      self.itemKV[k] = v
    end
  end

  for k,v in pairs(LoadKeyValues("scripts/npc/npc_items_custom.txt")) do
    if not self.itemKV[k] then
      self.itemKV[k] = v
    end
  end

  for k,v in pairs(self.itemKV) do
    if type(v) == "table" and v.ID then
      self.itemIDs[v.ID] = k
    end
  end

  self.itemPassives = {}

  for id,itemName in pairs(Containers.itemIDs) do
    local kv = Containers.itemKV[itemName]
    if kv.BaseClass == "item_datadriven" then
      self.itemPassives[itemName] = {}
      if kv.Modifiers then
        local mods = kv.Modifiers
        for modname, mod in pairs(mods) do
          if mod.Passive == 1 then
            table.insert(self.itemPassives[itemName], modname)
          end
        end
      end
    end
  end

  self.oldUniversal = GameRules.SetUseUniversalShopMode
  self.universalShopMode = false
  GameRules.SetUseUniversalShopMode = function(gamerules, universal)
    Containers.universalShopMode = universal
    Containers.oldUniversal(gamerules, universal)
  end
  if GameRules.FDesc then
    GameRules.FDesc["SetUseUniversalShopMode"] = nil
  end

  CustomGameEventManager:RegisterListener("Containers_EntityShopRange", Dynamic_Wrap(Containers, "Containers_EntityShopRange"))
  CustomGameEventManager:RegisterListener("Containers_Select", Dynamic_Wrap(Containers, "Containers_Select"))
  CustomGameEventManager:RegisterListener("Containers_HideProxy", Dynamic_Wrap(Containers, "Containers_HideProxy"))

  CustomGameEventManager:RegisterListener("Containers_OnLeftClick", Dynamic_Wrap(Containers, "Containers_OnLeftClick"))
  CustomGameEventManager:RegisterListener("Containers_OnRightClick", Dynamic_Wrap(Containers, "Containers_OnRightClick"))
  CustomGameEventManager:RegisterListener("Containers_OnDragFrom", Dynamic_Wrap(Containers, "Containers_OnDragFrom"))
  CustomGameEventManager:RegisterListener("Containers_OnDragWorld", Dynamic_Wrap(Containers, "Containers_OnDragWorld"))
  CustomGameEventManager:RegisterListener("Containers_OnCloseClicked", Dynamic_Wrap(Containers, "Containers_OnCloseClicked"))
  CustomGameEventManager:RegisterListener("Containers_OnButtonPressed", Dynamic_Wrap(Containers, "Containers_OnButtonPressed"))

  CustomGameEventManager:RegisterListener("Containers_OnSell", Dynamic_Wrap(Containers, "Containers_OnSell"))



  Timers:CreateTimer(function()
    for id,action in pairs(Containers.rangeActions) do
      local unit = action.unit
      if unit then
        if action.entity and not IsValidEntity(action.entity) then
          Containers.rangeActions[id] = nil
        else
          local range = action.range
          if not range and action.container then
            range = action.container:GetRange()
          end
          if not range then range = 150 end
          local range2 = range * range
          local pos = action.position or action.entity:GetAbsOrigin()
          local dist = unit:GetAbsOrigin() - pos

          if (dist.x * dist.x + dist.y * dist.y) <= range2 then
            local status, err = pcall(action.action, action.playerID, action.container, unit, action.entity or action.position, action.fromContainer or action.orderType, action.item)
            if not status then print('[containers.lua] RangeAction failure:' .. err) end
            Containers.rangeActions[id] = nil
          end
        end
      else
        Containers.rangeActions[id] = nil
      end
    end
    return .01
  end)
end


local closeOnOrderSkip = {
  [DOTA_UNIT_ORDER_PURCHASE_ITEM] = true,
  [DOTA_UNIT_ORDER_GLYPH] = true,
  [DOTA_UNIT_ORDER_HOLD_POSITION] = true,
  [DOTA_UNIT_ORDER_STOP] = true,
  [DOTA_UNIT_ORDER_EJECT_ITEM_FROM_STASH] = true,
  [DOTA_UNIT_ORDER_DISASSEMBLE_ITEM] = true,
  [DOTA_UNIT_ORDER_PING_ABILITY] = true,
  [DOTA_UNIT_ORDER_TRAIN_ABILITY] = true,
  [DOTA_UNIT_ORDER_CAST_NO_TARGET] = true,
  [DOTA_UNIT_ORDER_CAST_TOGGLE] = true,
}

function Containers:AddItemToUnit(unit, item)
  if item and unit then
    local defInventory = Containers:GetDefaultInventory(unit)
    if defInventory then
      if not defInventory:AddItem(item) then
        CreateItemOnPositionSync(unit:GetAbsOrigin() + RandomVector(10), item)
      end
    else
      local iname = item:GetAbilityName()
      local exists = false
      local full = true
      for i=0,5 do
        local it = unit:GetItemInSlot(i)
        if not it then
          full = false
        elseif it:GetAbilityName() == iname then
          exists = true
        end
      end

      if not full or (full and item:IsStackable() and exists) then
        unit:AddItem(item)
      else
        CreateItemOnPositionSync(unit:GetAbsOrigin() + RandomVector(10), item)
      end
    end
  end
end

function Containers:SetItemLimit(limit)
  SendToServerConsole("dota_max_physical_items_purchase_limit " .. limit)
end

function Containers:SetDisableItemLimit(disable)
  if not self.initialized then
    print('[containers.lua] FATAL: Containers:Init() has not been initialized!')
    return
  end
  --self.disableItemLimit = disable
end

function Containers:UsePanoramaInventory(useInventory)
  CustomNetTables:SetTableValue("containers_lua", "use_panorama_inventory", {value=useInventory})
  CustomGameEventManager:Send_ServerToAllClients("cont_use_panorama_inventory", {use=useInventory})
end

function Containers:DisplayError(pid, message)
  local player = PlayerResource:GetPlayer(pid)
  if player then
    CustomGameEventManager:Send_ServerToPlayer(player, "cont_create_error_message", {message=message})
  end
end

function Containers:EmitSoundOnClient(pid, sound)
  local player = PlayerResource:GetPlayer(pid)
  if player then
    CustomGameEventManager:Send_ServerToPlayer(player, "cont_emit_client_sound", {sound=sound})
  end
end

function Containers:OrderFilter(order)
  --print('Containers:OrderFilter')
  --PrintTable(order)

  local ret = true

  if Containers.nextFilter then
    ret = Containers.nextFilter(Containers.nextContext, order)
  end

  if not ret then
    return false
  end

  local issuerID = order.issuer_player_id_const
  local queue = order.queue == 1

  if issuerID == -1 then return true end

  -- close on order
  if not closeOnOrderSkip[order.order_type] then
    local oConts = Containers.closeOnOrders[issuerID]
    for id,cont in pairs(oConts) do
      if IsValidContainer(cont) then
        cont:Close(issuerID)
      else
        oConts[id] = nil
      end
    end
  end

  if not queue and order.units["0"] then
    Containers.rangeActions[order.units["0"]] = nil
  end

  local conts = Containers:GetEntityContainers(order.entindex_target)
  if order.units["0"] and #conts > 0 then
    local container = nil
    for _,cont in ipairs(conts) do
      if cont._OnEntityOrder then
        container = cont
        break
      end
    end

    if container then
      local unit = EntIndexToHScript(order.units["0"])
      local target = EntIndexToHScript(order.entindex_target)
      local range = container:GetRange() or 150
      local unitpos = unit:GetAbsOrigin()
      local diff = unitpos - target:GetAbsOrigin()
      local dist = diff:Length2D()
      local pos = unitpos
      if dist > range * .9 then
        pos = target:GetAbsOrigin() + diff:Normalized() * range * .9
      end

      local origOrder = order.order_type

      if target.GetContainedItem then
        order.order_type = DOTA_UNIT_ORDER_MOVE_TO_POSITION
        order.position_x = pos.x
        order.position_y = pos.y
        order.position_z = pos.z
      else
        order.order_type = DOTA_UNIT_ORDER_MOVE_TO_TARGET
      end

      Containers.rangeActions[order.units["0"]] = {
        unit = unit,
        entity = target,
        range = range,
        playerID = issuerID,
        container = container,
        orderType = origOrder,
        action = container._OnEntityOrder,
      }
    end
  end

  --DOTA_UNIT_ORDER_GIVE_ITEM
  if order.units["0"] and order.order_type == DOTA_UNIT_ORDER_GIVE_ITEM then
    local unit = EntIndexToHScript(order.units["0"])
    local item = EntIndexToHScript(order.entindex_ability)
    local target = EntIndexToHScript(order.entindex_target)

    local defInventory = Containers:GetDefaultInventory(target)
    if defInventory then
      order.order_type = DOTA_UNIT_ORDER_MOVE_TO_TARGET

      Containers.rangeActions[order.units["0"]] = {
        unit = unit,
        entity = target,
        range = 180,
        playerID = issuerID,
        action = function(playerID, container, unit, target)
          if IsValidEntity(target) and target:IsAlive() then
            unit:DropItemAtPositionImmediate(item, unit:GetAbsOrigin())
            local drop = nil
            for i=GameRules:NumDroppedItems()-1,0,-1 do
              drop = GameRules:GetDroppedItem(i)
              if drop:GetContainedItem() == item then
                Containers:AddItemToUnit(target, item)
                drop:RemoveSelf()
                break
              end
            end
          end

          unit:Stop()
        end,
      }
    else
      return true
    end
  end

  if order.units["0"] and order.order_type == DOTA_UNIT_ORDER_PICKUP_ITEM then
    local unit = EntIndexToHScript(order.units["0"])
    local physItem = EntIndexToHScript(order.entindex_target)
    local unitpos = unit:GetAbsOrigin()
    if not physItem then return false end
    local diff = unitpos - physItem:GetAbsOrigin()
    local dist = diff:Length2D()
    local pos = unitpos
    if dist > 90 then
      pos = physItem:GetAbsOrigin() + diff:Normalized() * 90
    end

    local defInventory = Containers:GetDefaultInventory(unit)
    if defInventory then
      order.order_type = DOTA_UNIT_ORDER_MOVE_TO_POSITION
      order.position_x = pos.x
      order.position_y = pos.y
      order.position_z = pos.z

      Containers.rangeActions[order.units["0"]] = {
        unit = unit,
        position = physItem:GetAbsOrigin(),
        range = 100,
        playerID = issuerID,
        action = function(playerID, container, unit, target)
          if IsValidEntity(physItem) then
            local item = physItem:GetContainedItem()
            if item and defInventory:AddItem(item) then
              physItem:RemoveSelf()
            end
          end
        end,
      }
    end
  end

  if order.units["0"] and order.order_type == DOTA_UNIT_ORDER_PURCHASE_ITEM then
    local unit = EntIndexToHScript(order.units["0"])
    local itemID = order.entindex_ability
    local itemName = Containers.itemIDs[itemID]
    local player = PlayerResource:GetPlayer(issuerID)
    local ownerID = issuerID --unit:GetMainControllingPlayer()
    local owner = PlayerResource:GetSelectedHeroEntity(ownerID)

    local defInventory = Containers:GetDefaultInventory(unit)

    if defInventory then
      local shops = Containers.entityShops[unit:GetEntityIndex()] or {home=false, side=false, secret=false}
      if not unit:IsAlive() then
        shops = {home=true, side=false, secret=false}
      end

      if not shops.home and not shops.side and not shops.secret then
        CustomGameEventManager:Send_ServerToPlayer(player, "cont_create_error_message", {reason=67})
        return false
      end

      local item = CreateItem(itemName, owner, owner)
      local cost = item:GetCost()
      if not defInventory:AddItem(item) then
        CreateItemOnPositionSync(unit:GetAbsOrigin() + RandomVector(10), item)
      end

      PlayerResource:SpendGold(ownerID, cost, DOTA_ModifyGold_PurchaseItem)
      return false
    elseif Containers.disableItemLimit then
      if not unit:HasInventory() then
        unit = owner
        if unit == nil then return false end
      end

      local itemDefinition = Containers.itemKV[itemName]
      local itemSide = itemDefinition["SideShop"] == 1
      local itemSecret = itemDefinition["SecretShop"] == 1
      if itemDefinition["ItemPurchasable"] == 0 then return false end

      local toStash = true
      local full = true
      for i=0,5 do
        if unit:GetItemInSlot(i) == nil then
          full = false
          break
        end
      end

      local shops = Containers.entityShops[unit:GetEntityIndex()] or {home=false, side=false, secret=false}
      if not unit:IsAlive() then
        shops = {home=true, side=false, secret=false}
      end
      local stashPurchasingDisabled = GameRules:GetGameModeEntity():GetStashPurchasingDisabled()
      local universalShopMode = Containers.universalShopMode

      if universalShopMode then
        if not shops.home and not shops.side and not shops.secret then
          if stashPurchasingDisabled then
            CustomGameEventManager:Send_ServerToPlayer(player, "cont_create_error_message", {reason=67})
            return false
          end

          toStash = true
        end
      else
        if not shops.home and not shops.side and not shops.secret then
          -- not in range of any shops
          if stashPurchasingDisabled then
            CustomGameEventManager:Send_ServerToPlayer(player, "cont_create_error_message", {reason=67})
            return false
          end
        elseif itemSecret and shops.secret then
          toStash = false
        elseif itemSide and shops.side then
          toStash = false
        elseif shops.home and not full then
          toStash = false
        end
      end

      local item = CreateItem(itemName, owner, owner)
      local fullyShareStacking = Containers.itemKV[itemName]["ItemShareability"] == "ITEM_FULLY_SHAREABLE_STACKING"
      local dropped = {}
      local cost = item:GetCost()

      if toStash then
        local restore = {}
        local stashSlot = 11
        for i=6,11 do
          local slot = owner:GetItemInSlot(i)
          if not slot then
            stashSlot = i
            break
          end
        end

        for i=0,5 do
          local slot = owner:GetItemInSlot(i)
          if slot and (fullyShareStacking and slot:GetAbilityName() == itemName
            or ((slot:GetAbilityName() == "item_ward_dispenser" or slot:GetAbilityName() == "item_ward_observer" or slot:GetAbilityName() == "item_ward_sentry")) and
              (itemName == "item_ward_observer" or itemName == "item_ward_sentry")) then

            owner:DropItemAtPositionImmediate(slot, owner:GetAbsOrigin())
            for i=GameRules:NumDroppedItems()-1,0,-1 do
              local drop = GameRules:GetDroppedItem(i)
              if drop:GetContainedItem() == slot then
                table.insert(dropped, drop)
                break
              end
            end

          elseif slot and (slot:GetOwner() == owner or slot:GetPurchaser() == owner) then
            restore[slot:GetEntityIndex()] = {owner=slot:GetOwner(), purchaser=slot:GetPurchaser()}
            slot:SetPurchaser(nil)
            slot:SetOwner(nil)
          end
        end

        if owner:GetNumItemsInStash() == 6 then
          if not unit.HasAnyAvailableInventorySpace and shops.home then
            CreateItemOnPositionSync(unit:GetAbsOrigin() + RandomVector(20), item)
          else
            local slot = DOTA_STASH_SLOT_6
            local slotItem = owner:GetItemInSlot(slot)
            if slotItem and slotItem:GetAbilityName() == item:GetAbilityName() then
              slot = DOTA_STASH_SLOT_5
            end
            owner:SwapItems(slot,14)
            owner:AddItem(item)
            for i=0,11 do
              if owner:GetItemInSlot(i) == item then
                owner:SwapItems(slot,i)
                owner:EjectItemFromStash(item)
              end
            end
            owner:SwapItems(14,slot)
          end
        else
          owner:AddItem(item)
          for i=0,11 do
            if owner:GetItemInSlot(i) == item then
              owner:SwapItems(stashSlot,i)
            end
          end
        end

        for i=0,5 do
          local item = owner:GetItemInSlot(i)
          if item and restore[item:GetEntityIndex()] ~= nil then
            item:SetPurchaser(restore[item:GetEntityIndex()].purchaser)
            item:SetOwner(restore[item:GetEntityIndex()].owner)
          end
        end
      else
        if full then
          local physItem = CreateItemOnPositionSync(unit:GetAbsOrigin() + RandomVector(5), item)
          unit:PickupDroppedItem(physItem)
        else
          for i=6,11 do
            local item = unit:GetItemInSlot(i)
            if not shops.home and item and item:GetPurchaser() == owner then
              item:SetPurchaser(nil)
            end
          end

          unit:AddItem(item)

          for i=6,11 do
            local item = unit:GetItemInSlot(i)
            if not shops.home and item and item:GetPurchaser() == nil then
              item:SetPurchaser(owner)
            end
          end
        end
      end

      local queue = false
      for _,drop in ipairs(dropped) do
        ExecuteOrderFromTable({
          UnitIndex = owner:GetEntityIndex(),
          TargetIndex = drop:GetEntityIndex(),
          OrderType = DOTA_UNIT_ORDER_PICKUP_ITEM,
          Queue = queue,
          })
        queue = true
        --owner:AddItem(drop:GetContainedItem())
        --drop:RemoveSelf()
      end

      PlayerResource:SpendGold(ownerID, cost, DOTA_ModifyGold_PurchaseItem)

      return false
    end
  end

  return ret
end

function Containers:Containers_EntityShopRange(args)
  local unit = args.unit
  local shop = args.shop

  local cs = Containers.entityShops
  if not cs[unit] then cs[unit] = {home=false, side=false, secret=false} end

  cs[unit].home = bit.band(shop, 1) ~= 0
  cs[unit].side = bit.band(shop, 2) ~= 0
  cs[unit].secret = bit.band(shop, 4) ~= 0
end

function Containers:Containers_Select(args)
  local playerID = args.PlayerID
  local prev = Containers.previousSelection[playerID]
  local new = args.entity
  local newEnt = EntIndexToHScript(new)

  local prevConts = Containers:GetEntityContainers(prev)
  for _, c in ipairs(prevConts) do
    if c._OnDeselect then
      local res, err = pcall(c._OnDeselect, playerID, c, prev)
      if err then
        print('[containers.lua] Error in OnDeselect: ' .. err)
      end
    end
  end

  Containers.previousSelection[playerID] = newEnt

  local conts = Containers:GetEntityContainers(new)
  for _, c in ipairs(conts) do
    if c._OnSelect then
      local res, err = pcall(c._OnSelect, playerID, c, newEnt)
      if err then
        print('[containers.lua] Error in OnSelect: ' .. err)
      end
    end
  end
end

function Containers:Containers_HideProxy(args)
  local abil = EntIndexToHScript(args.abilID)
  if abil and abil.GetAbilityName and (abil:GetAbilityName() == "containers_lua_targeting" or abil:GetAbilityName() == "containers_lua_targeting_tree" )
      and abil:GetOwner():GetPlayerOwnerID() == args.PlayerID then
    abil:SetHidden(true)
  end
end

function Containers:Containers_OnSell(args)
  Containers:print('Containers_OnSell')
  Containers:PrintTable(args)

  local playerID = args.PlayerID
  local unit = args.unit == nil and nil or EntIndexToHScript(args.unit)
  local contID = args.contID
  local itemID = args.itemID
  local slot =  args.slot

  if not playerID then return end
  --if unit and unit:GetMainControllingPlayer() ~= playerID then return end

  local container = Containers.containers[contID]
  if not container then return end

  local item = EntIndexToHScript(args.itemID)
  if not (item and IsValidEntity(item) and item.IsItem and item:IsItem()) then return end

  if item:GetOwner() ~= unit or item:GetPurchaser() ~= unit then return end

  local itemInSlot = container:GetItemInSlot(slot)
  if itemInSlot ~= item then return end

  local range = container:GetRange()
  local ent = container:GetEntity()
  if range == nil and ent and unit ~= ent then return end
  if range and ent and unit and (ent:GetAbsOrigin() - unit:GetAbsOrigin()):Length2D() >= range then
    Containers:DisplayError(playerID,"#dota_hud_error_target_out_of_range")
    return
  end

  local shops = Containers.entityShops[unit:GetEntityIndex()] or {home=false, side=false, secret=false}
  local player = PlayerResource:GetPlayer(playerID)

  if not shops.home and not shops.side and not shops.secret then
    if player then
      CustomGameEventManager:Send_ServerToPlayer(player, "cont_create_error_message", {reason=67})
    end
    return
  end

  local cost = item:GetCost()
  if GameRules:GetGameTime() - item:GetPurchaseTime() > 10 then
    cost = cost /2
  end

  container:RemoveItem(item)
  item:RemoveSelf()
  PlayerResource:ModifyGold(playerID, cost, false, DOTA_ModifyGold_SellItem)

  if player then
    SendOverheadEventMessage(player, OVERHEAD_ALERT_GOLD, unit, cost, player)
    EmitSoundOnClient("General.Sell", player)
  end
end

function Containers:Containers_OnLeftClick(args)
  Containers:print('Containers_OnLeftClick')
  Containers:PrintTable(args)

  local playerID = args.PlayerID
  local unit = args.unit == nil and nil or EntIndexToHScript(args.unit)
  local contID = args.contID
  local itemID = args.itemID
  local slot =  args.slot

  if not playerID then return end
  --if unit and unit:GetMainControllingPlayer() ~= playerID then return end

  local container = Containers.containers[contID]
  if not container then return end

  local fun = container._OnLeftClick
  if fun == false then return end

  local item = EntIndexToHScript(args.itemID)
  if not (item and IsValidEntity(item) and item.IsItem and item:IsItem()) then return end

  local itemInSlot = container:GetItemInSlot(slot)
  if itemInSlot ~= item then return end

  local range = container:GetRange()
  local ent = container:GetEntity()
  if range == nil and ent and unit ~= ent then return end
  if range and ent and unit and (ent:GetAbsOrigin() - unit:GetAbsOrigin()):Length2D() >= range then
    Containers:DisplayError(playerID,"#dota_hud_error_target_out_of_range")
    return
  end

  if type(fun) == "function" then
    fun(playerID, container, unit, item, slot)
  else
    Containers:OnLeftClick(playerID, container, unit, item, slot)
  end
end

function Containers:Containers_OnRightClick(args)
  Containers:print('Containers_OnRightClick')
  Containers:PrintTable(args)

  local playerID = args.PlayerID
  local unit = args.unit == nil and nil or EntIndexToHScript(args.unit)
  local contID = args.contID
  local itemID = args.itemID
  local slot =  args.slot

  if not playerID then return end
  --if unit and unit:GetMainControllingPlayer() ~= playerID then return end

  local container = Containers.containers[contID]
  if not container then return end

  local fun = container._OnRightClick
  if fun == false then return end

  local item = EntIndexToHScript(args.itemID)
  if not (item and IsValidEntity(item) and item.IsItem and item:IsItem()) then return end

  local itemInSlot = container:GetItemInSlot(slot)
  if itemInSlot ~= item then return end

  local range = container:GetRange()
  local ent = container:GetEntity()
  if range == nil and ent and unit ~= ent then return end
  if range and ent and unit and (ent:GetAbsOrigin() - unit:GetAbsOrigin()):Length2D() >= range then
    Containers:DisplayError(playerID,"#dota_hud_error_target_out_of_range")
    return
  end

  if type(fun) == "function" then
    fun(playerID, container, unit, item, slot)
  else
    Containers:OnRightClick(playerID, container, unit, item, slot)
  end
end

function Containers:Containers_OnDragFrom(args)
  Containers:print('Containers_OnDragFrom')
  Containers:PrintTable(args)

  local playerID = args.PlayerID
  local unit = args.unit == nil and nil or EntIndexToHScript(args.unit)
  local contID = args.contID
  local itemID = args.itemID
  local fromSlot = args.fromSlot
  local toContID = args.toContID
  local toSlot = args.toSlot

  if not playerID then return end
  --if unit and unit:GetMainControllingPlayer() ~= playerID then return end

  local container = nil
  if contID == -1 then
    container = unitInventory
    container.unit = unit
    container.range = 150
    if fromSlot > 5 then return end
  else
    container = Containers.containers[contID]
  end
  if not container then return end

  local toContainer = nil
  if toContID == -1 then
    toContainer = unitInventory
    toContainer.unit = unit
    toContainer.range = 150
    if toSlot > 5 then return end
  else
    toContainer = Containers.containers[toContID]
  end
  if not toContainer then return end

  local item = EntIndexToHScript(args.itemID)
  if not (item and IsValidEntity(item) and item.IsItem and item:IsItem()) then return end

  local itemInSlot = container:GetItemInSlot(fromSlot)
  if itemInSlot ~= item then return end

  if toSlot > toContainer:GetSize() then return end

  local range = container:GetRange()
  local ent = container:GetEntity()
  if range == nil and ent and unit ~= ent then return end
  if range and ent and unit and (ent:GetAbsOrigin() - unit:GetAbsOrigin()):Length2D() >= range then
    Containers:DisplayError(playerID,"#dota_hud_error_target_out_of_range")
    return
  end

  if container == toContainer then
    if container.canDragWithin[playerID] == false then return end

    local fun = container._OnDragWithin
    if fun == false then return end

    if type(fun) == "function" then
      fun(playerID, container, unit, item, fromSlot, toSlot)
    else
      Containers:OnDragWithin(playerID, container, unit, item, fromSlot, toSlot)
    end
  else
    if container.canDragFrom[playerID] == false or toContainer.canDragTo[playerID] == false then return end

    local range = toContainer:GetRange()
    local ent = toContainer:GetEntity()
    if range and ent and unit and (ent:GetAbsOrigin() - unit:GetAbsOrigin()):Length2D() >= range then
      Containers:DisplayError(playerID,"#dota_hud_error_target_out_of_range")
      return
    end

    local fun = container._OnDragFrom
    if fun == false then return end

    if type(fun) == "function" then
      fun(playerID, container, unit, item, fromSlot, toContainer, toSlot)
    else
      Containers:OnDragFrom(playerID, container, unit, item, fromSlot, toContainer, toSlot)
    end
  end
end

function Containers:Containers_OnDragWorld(args)
  Containers:print('Containers_OnDragWorld')
  Containers:PrintTable(args)

  local playerID = args.PlayerID
  local unit = args.unit == nil and nil or EntIndexToHScript(args.unit)
  local contID = args.contID
  local itemID = args.itemID
  local slot =  args.slot
  local position = args.position
  local entity = nil
  if type(args.entity) == "number" then entity = EntIndexToHScript(args.entity) end

  if not playerID then return end
  --if unit and unit:GetMainControllingPlayer() ~= playerID then return end

  local container = nil
  if contID == -1 then
    container = unitInventory
    container.unit = unit
    container.range = nil
  else
    container = Containers.containers[contID]
  end
  if not container then return end

  local fun = container._OnDragWorld
  if fun == false then return end

  local item = EntIndexToHScript(args.itemID)
  if not (item and IsValidEntity(item) and item.IsItem and item:IsItem()) then return end

  local itemInSlot = container:GetItemInSlot(slot)
  if itemInSlot ~= item then return end

  if not position["0"] or not position["1"] or not position["2"] then return end
  position = Vector(position["0"], position["1"], position["2"])

  if container.canDragFrom[playerID] == false then return end

  if not item:IsDroppable() then
    Containers:DisplayError(playerID,"#dota_hud_error_item_cant_be_dropped")
    return
  end

  local range = container:GetRange()
  local ent = container:GetEntity()
  if range == nil and ent and unit ~= ent then return end
  if range and ent and unit and (ent:GetAbsOrigin() - unit:GetAbsOrigin()):Length2D() >= range then
    Containers:DisplayError(playerID,"#dota_hud_error_target_out_of_range")
    return
  end

  if type(fun) == "function" then
    fun(playerID, container, unit, item, slot, position, entity)
  else
    Containers:OnDragWorld(playerID, container, unit, item, slot, position, entity)
  end
end

function Containers:Containers_OnCloseClicked(args)
  Containers:print('Containers_OnCloseClicked')
  Containers:PrintTable(args)

  local playerID = args.PlayerID
  local unit = args.unit == nil and nil or EntIndexToHScript(args.unit)
  local contID = args.contID

  if not playerID then return end

  local container = Containers.containers[contID]
  if not container then return end

  local fun = container._OnCloseClicked
  if fun == false then return end

  if type(fun) == "function" then
    fun(playerID, container, unit)
  else
    Containers:OnCloseClicked(playerID, container, unit)
  end
end

function Containers:Containers_OnButtonPressed(args)
  Containers:print('Containers_OnButtonPressed')
  Containers:PrintTable(args)

  local playerID = args.PlayerID
  local unit = args.unit == nil and nil or EntIndexToHScript(args.unit)
  local contID = args.contID
  local buttonNumber = args.button

  if not playerID then return end
  --if unit and unit:GetMainControllingPlayer() ~= playerID then return end

  local container = Containers.containers[contID]
  if not container then return end

  local fun = container._OnButtonPressed
  if fun == false then return end

  if buttonNumber < 1 then return end
  local buttonName = container:GetButtonName(buttonNumber)

  if not buttonName then return end

  local range = container:GetRange()
  local ent = container:GetEntity()
  if range == nil and ent and unit ~= ent then return end
  if range and ent and unit and (ent:GetAbsOrigin() - unit:GetAbsOrigin()):Length2D() >= range then
    Containers:DisplayError(playerID,"#dota_hud_error_target_out_of_range")
    return
  end

  if type(fun) == "function" then
    fun(playerID, container, unit, buttonNumber, buttonName)
  else
    Containers:OnButtonPressed(playerID, container, unit, buttonNumber, buttonName)
  end
end


function Containers:OnLeftClick(playerID, container, unit, item, slot)
  Containers:print("Containers:OnLeftClick", playerID, container, unit, item:GetEntityIndex(), slot)

  local hero = PlayerResource:GetSelectedHeroEntity(playerID)
  container:ActivateItem(hero, item, playerID)
end

function Containers:OnRightClick(playerID, container, unit, item, slot)
  Containers:print("Containers:OnRightClick", playerID, container, unit, item:GetEntityIndex(), slot)
end

function Containers:OnDragWithin(playerID, container, unit, item, fromSlot, toSlot)
  Containers:print('Containers:OnDragWithin', playerID, container, unit, item, fromSlot, toSlot)

  container:SwapSlots(fromSlot, toSlot, true)
end

function Containers:OnDragFrom(playerID, container, unit, item, fromSlot, toContainer, toSlot)
  Containers:print('Containers:OnDragFrom', playerID, container, unit, item, fromSlot, toContainer, toSlot)

  local canChange = Containers.itemKV[item:GetAbilityName()].ItemCanChangeContainer
  if toContainer._OnDragTo == false or canChange == 0 then return end

  local fun = nil
  if type(toContainer._OnDragTo) == "function" then
    fun = toContainer._OnDragTo
  end

  if fun then
    fun(playerID, container, unit, item, fromSlot, toContainer, toSlot)
  else
    Containers:OnDragTo(playerID, container, unit, item, fromSlot, toContainer, toSlot)
  end

end

function Containers:OnDragTo(playerID, container, unit, item, fromSlot, toContainer, toSlot)
  Containers:print('Containers:OnDragTo', playerID, container, unit, item, fromSlot, toContainer, toSlot)

  local item2 = toContainer:GetItemInSlot(toSlot)
  local addItem = nil
  if item2 and IsValidEntity(item2) and (item2:GetAbilityName() ~= item:GetAbilityName() or not item2:IsStackable() or not item:IsStackable()) then
    if Containers.itemKV[item2:GetAbilityName()].ItemCanChangeContainer == 0 then
      return false
    end
    toContainer:RemoveItem(item2)
    addItem = item2
  end

  if toContainer:AddItem(item, toSlot) then
    container:ClearSlot(fromSlot)
    if addItem then
      if container:AddItem(addItem, fromSlot) then
        return true
      else
        toContainer:RemoveItem(item)
        toContainer:AddItem(item2, toSlot, nil, true)
        container:AddItem(item, fromSlot, nil, true)
        return false
      end
    end
    return true
  elseif addItem then
    toContainer:AddItem(item2, toSlot, nil, true)
  end

  return false
end

function Containers:OnDragWorld(playerID, container, unit, item, slot, position, entity)
  Containers:print('Containers:OnDragWorld', playerID, container, unit, item, slot, position, entity)

  local unitpos = unit:GetAbsOrigin()
  local diff = unitpos - position
  local dist = diff:Length2D()

  local conts = {}
  if IsValidEntity(entity) then
    conts = Containers:GetEntityContainers(entity:GetEntityIndex())
  end

  local toCont = nil
  for _,cont in ipairs(conts) do
    if cont._OnEntityDrag then
      toCont = cont
      break
    end
  end

  if IsValidEntity(entity) and entity.GetContainedItem and toCont then
    local range = toCont:GetRange() or 150

    Containers:SetRangeAction(unit, {
      unit = unit,
      entity = entity,
      range = range,
      playerID = playerID,
      container = toCont,
      fromContainer = container,
      item = item,
      action = toCont._OnEntityDrag,
    })
  elseif IsValidEntity(entity) and entity:GetTeam() == unit:GetTeam() and entity.HasInventory and entity:HasInventory() and entity:IsAlive() then
    ExecuteOrderFromTable({
      UnitIndex=   unit:GetEntityIndex(),
      OrderType=   DOTA_UNIT_ORDER_MOVE_TO_TARGET,
      TargetIndex= entity:GetEntityIndex(),
    })

    Containers.rangeActions[unit:GetEntityIndex()] = {
      unit = unit,
      entity = entity,
      range = 180,
      container = container,
      playerID = playerID,
      action = function(playerID, container, unit, target)
        if IsValidEntity(target) and target:IsAlive() and container:ContainsItem(item) then
          container:RemoveItem(item)
          Containers:AddItemToUnit(target, item)
        end

        unit:Stop()
      end,
    }
  elseif IsValidEntity(entity) and entity:GetClassname() == "ent_dota_shop" and item:IsSellable() then
    ExecuteOrderFromTable({
      UnitIndex=   unit:GetEntityIndex(),
      OrderType=   DOTA_UNIT_ORDER_MOVE_TO_TARGET,
      TargetIndex= entity:GetEntityIndex(),
    })

    Containers.rangeActions[unit:GetEntityIndex()] = {
      unit = unit,
      entity = entity,
      range = 425,
      container = container,
      playerID = playerID,
      action = function(playerID, container, unit, target)
        if IsValidEntity(target) and container:ContainsItem(item) then
          local cost = item:GetCost()
          if GameRules:GetGameTime() - item:GetPurchaseTime() > 10 then
            cost = cost /2
          end

          container:RemoveItem(item)
          item:RemoveSelf()
          PlayerResource:ModifyGold(playerID, cost, false, DOTA_ModifyGold_SellItem)

          local player = PlayerResource:GetPlayer(playerID)

          if player then
            SendOverheadEventMessage(player, OVERHEAD_ALERT_GOLD, unit, cost, player)
            EmitSoundOnClient("General.Sell", player)
          end
        end

        unit:Stop()
      end,
    }
  else
    local pos = unitpos
    if dist > 150 *.9 then
      pos = position + diff:Normalized() * 150 * .9
    end

    --DebugDrawCircle(pos, Vector(255,0,0), 1, 50.0, true, 1)

    --unit:MoveToPosition(pos)
    ExecuteOrderFromTable({
      UnitIndex= unit:GetEntityIndex(),
      OrderType= DOTA_UNIT_ORDER_MOVE_TO_POSITION,
      Position=  pos,
    })

    Containers.rangeActions[unit:GetEntityIndex()] = {
      unit = unit,
      --entity = target,
      position = position,
      range = 150,
      container = container,
      playerID = playerID,
      action = function(playerID, container, unit, target)
        if container:ContainsItem(item) then
          container:RemoveItem(item)
          CreateItemOnPositionSync(position, item)
        end
      end,
    }
  end
end


function Containers:OnCloseClicked(playerID, container, unit)
  Containers:print('Containers:OnCloseClicked', playerID, container, unit)
  container:Close(playerID)
end

function Containers:OnButtonPressed(playerID, container, unit, buttonNumber, buttonName)
  print('Button ' .. buttonNumber .. ':\'' .. buttonName .. '\' Pressed by player:' .. playerID .. ' for container ' .. container.id .. '.  No OnButtonPressed handler.')
end



function Containers:GetEntityContainers(entity)
  if entity and type(entity) ~= "number" and entity.GetEntityIndex and not entity:IsNull() then
    entity = entity:GetEntityIndex()
  end

  local tab = {}
  for id,cont in pairs(Containers.entityContainers[entity] or {}) do
    table.insert(tab, cont)
  end
  return tab
end

function Containers:SetRangeAction(unit, tab)
  if not IsValidEntity(unit) then
    return
  end

  local range = tab.range or 150
  if tab.container then range = (tab.container:GetRange() or 150) end
  local tpos = tab.position or tab.entity:GetAbsOrigin()
  local unitpos = unit:GetAbsOrigin()
  local diff = unitpos - tpos
  local dist = diff:Length2D()
  local pos = unitpos
  if dist > range * .9 then
    pos = tpos + diff:Normalized() * range * .9
  end

  tab.unit = unit

  if tab.entity and not tab.entity.GetContainedItem then
    ExecuteOrderFromTable({
      UnitIndex=   unit:GetEntityIndex(),
      OrderType=   DOTA_UNIT_ORDER_MOVE_TO_TARGET,
      TargetIndex= tab.entity:GetEntityIndex(),
    })
  else
    ExecuteOrderFromTable({
      UnitIndex=   unit:GetEntityIndex(),
      OrderType=   DOTA_UNIT_ORDER_MOVE_TO_POSITION,
      Position =   pos,
    })
  end

  Containers.rangeActions[unit:GetEntityIndex()] = tab
end

function Containers:SetDefaultInventory(unit, container)
  if not self.initialized then
    print('[containers.lua] FATAL: Containers:Init() has not been called in the Activate() function chain!')
    return
  end
  self.defaultInventories[unit:GetEntityIndex()] = container
end

function Containers:GetDefaultInventory(unit)
  local di = self.defaultInventories[unit:GetEntityIndex()]
  if IsValidContainer(di) then
    return di
  else
    self.defaultInventories[unit:GetEntityIndex()] = nil
    return nil
  end
end

function Containers:CreateShop(cont)
  local shop = self:CreateContainer(cont)

  local ptID = shop.ptID
  local pt = {shop = 1,
              }

  if cont.prices then
    for k,v in pairs(cont.prices) do
      local item = k
      if type(k) ~= "number" then
        item = k:GetEntityIndex()
      end

      pt['price' .. k] = v
    end
  end

  if cont.stocks then
    for k,v in pairs(cont.stocks) do
      local item = k
      if type(k) ~= "number" then
        item = k:GetEntityIndex()
      end

      pt['stock' .. k] = v
    end
  end

  PlayerTables:SetTableValues(ptID, pt)

  function shop:BuyItem(playerID, unit, item)
    local cost = self:GetPrice(item)
    local stock = self:GetStock(item)
    local owner = PlayerResource:GetSelectedHeroEntity(playerID)
    local gold = PlayerResource:GetGold(playerID)
    if gold >= cost and (stock == nil or stock > 0) then
      local newItem = CreateItem(item:GetAbilityName(), owner, owner)
      newItem:SetLevel(item:GetLevel())
      newItem:SetCurrentCharges(item:GetCurrentCharges())

      PlayerResource:SpendGold(playerID, cost, DOTA_ModifyGold_PurchaseItem)

      if stock then
        self:SetStock(item, stock-1)
      end

      Containers:EmitSoundOnClient(playerID, "General.Buy")

      return newItem
    elseif stock ~= nil and stock <= 0 then
      Containers:DisplayError(playerID, "#dota_hud_error_item_out_of_stock")
    elseif gold < cost then
      Containers:DisplayError(playerID, "#dota_hud_error_not_enough_gold")
    end
  end

  function shop:SellItem()

  end

  function shop:GetPrice(item)
    item = GetItem(item)
    return PlayerTables:GetTableValue(ptID, "price" .. item:GetEntityIndex()) or item:GetCost()
  end
  function shop:SetPrice(item, price)
    item = GetItem(item)
    if price then
      PlayerTables:SetTableValue(ptID, "price" .. item:GetEntityIndex(), price)
    else
      PlayerTables:DeleteTableKey(ptID, "price" .. item:GetEntityIndex())
    end
  end

  function shop:GetStock(item)
    item = GetItem(item)
    return PlayerTables:GetTableValue(ptID, "stock" .. item:GetEntityIndex())
  end
  function shop:SetStock(item, stock)
    item = GetItem(item)
    if stock then
      PlayerTables:SetTableValue(ptID, "stock" .. item:GetEntityIndex(), stock)
    else
      PlayerTables:DeleteTableKey(ptID, "stock" .. item:GetEntityIndex())
    end
  end

  if not cont.canDragWithin then shop.canDragWithin = {} end
  shop:AddSkin("ContainerShop")
  if not cont.OnDragWorld then shop:OnDragWorld(false) end
  if not cont.OnDragWithin then shop:OnDragWithin(false) end
  if not cont.OnLeftClick then shop:OnLeftClick(false) end
  if not cont.OnDragTo then
    shop:OnDragTo(function(playerID, container, unit, item, fromSlot, toContainer, toSlot)
      Containers:print('Shop:OnDragTo', playerID, container, unit, item, fromSlot, toContainer, toSlot)
    end)
  end
  if not cont.OnDragFrom then
    shop:OnDragFrom(function(playerID, container, unit, item, fromSlot, toContainer, toSlot)
      Containers:print('Shop:OnDragFrom', playerID, container, unit, item, fromSlot, toContainer, toSlot)
    end)
  end
  --[[shop:OnLeftClick(function(playerID, container, unit, item, slot)
    print("Shop:OnLeftClick", playerID, container, unit, item:GetEntityIndex(), slot)
  end)]]
  if not cont.OnRightClick then
    shop:OnRightClick(function(playerID, container, unit, item, slot)
      Containers:print("Shop:OnRightClick", playerID, container, unit, item:GetEntityIndex(), slot)

      local defInventory = Containers:GetDefaultInventory(unit)
      if not defInventory and not unit:HasInventory() then return end

      local item = container:BuyItem(playerID, unit, item)
      Containers:AddItemToUnit(unit, item)
    end)
  end


  return shop
end

function Containers:CreateContainer(cont)
  if not self.initialized then
    print('[containers.lua] FATAL: Containers:Init() has not been called in the Activate() function chain!')
    return
  end
  local pt =
    {id =          self.nextID,
     ptID =        ID_BASE .. self.nextID,
     --unit =        cont.unit

     layout =      cont.layout or {2,2},
     size =        0, -- calculated below
     rowStarts =   {}, -- calculated below
     --slot1 =       1111, -- set up below
     --slot2 =       1122, -- set up below
     skins =       {},
     buttons =     cont.buttons or {},
     headerText =  cont.headerText or "Container",
     draggable =   cont.draggable or true,
     position =    cont.position or "100px 200px 0px",
     equipment =   cont.equipment,

     layoutFile =  cont.layoutFile,

     OnLeftClick =     type(cont.OnLeftClick) == "function" and true or cont.OnLeftClick,
     OnRightClick =    type(cont.OnRightClick) == "function" and true or cont.OnRightClick,
     OnDragFrom  =     type(cont.OnDragFrom) == "function" and true or cont.OnDragFrom,
     OnDragWorld =     false,
     OnCloseClicked =  type(cont.OnCloseClicked) == "function" and true or cont.OnCloseClicked,
     OnButtonPressed = type(cont.OnButtonPressed) == "function" and true or cont.OnButtonPressed,

     OnLeftClickJS =   cont.OnLeftClickJS,
     OnRightClickJS =  cont.OnRightClickJS,
     OnDoubleClickJS = cont.OnDoubleClickJS,
     OnMouseOutJS =    cont.OnMouseOutJS,
     OnMouseOverJS =   cont.OnMouseOverJS,
     OnButtonPressedJS=cont.OnButtonPressedJS,
     OnCloseClickedJS =cont.OnCloseClickedJS,
    }

  local c = {id = pt.id,
    ptID = pt.ptID,
    items = {},
    itemNames = {},
    subs = {},
    opens = {},
    range = cont.range,
    closeOnOrder = cont.closeOnOrder == nil and false or cont.closeOnOrder,

    canDragFrom = {},
    canDragTo = {},
    canDragWithin = {},
    appliedPassives = {},
    cleanupTimer = nil,

    forceOwner =         cont.forceOwner,
    forcePurchaser =     cont.forcePurchaser,
    --entity     =     nil,

    _OnLeftClick =     cont.OnLeftClick,
    _OnRightClick =    cont.OnRightClick,
    _OnDragTo =        cont.OnDragTo,
    _OnDragFrom =      cont.OnDragFrom,
    _OnDragWithin =    cont.OnDragWithin,
    _OnDragWorld =     cont.OnDragWorld,
    _OnCloseClicked =  cont.OnCloseClicked,
    _OnButtonPressed = cont.OnButtonPressed,
    _OnEntityOrder =   cont.OnEntityOrder,
    _OnEntityDrag =    cont.OnEntityDrag,
    _OnClose =         cont.OnClose,
    _OnOpen =          cont.OnOpen,
    _OnSelect =        cont.OnSelect,
    _OnDeselect =      cont.OnDeselect,
    AddItemFilter =    cont.AddItemFilter,
  }

  if cont.OnDragWorld ~= nil and (type(cont.OnDragWorld) == "function" or cont.OnDragWorld == true) then
    pt.OnDragWorld = true
  end

  --if cont.setOwner then c.setOwner = cont.setOwner end
  --if cont.setPurchaser then c.setOwner = cont.setPurchaser end

  if cont.entity and type(cont.entity) == "number" then
    pt.entity = cont.entity
  elseif cont.entity and cont.entity.GetEntityIndex then
    pt.entity = cont.entity:GetEntityIndex()
  end

  if pt.entity then
    Containers.entityContainers[pt.entity] = Containers.entityContainers[pt.entity] or {}
    Containers.entityContainers[pt.entity][c.id] = c
  end

  for i,row in ipairs(pt.layout) do
    table.insert(pt.rowStarts, pt.size+1)
    pt.size = pt.size + row
  end

  if cont.skins then
    for k,v in pairs(cont.skins) do
      if type(v) == "string" then
        pt.skins[v] = true
      end
    end
  end

  if cont.items then
    for k,v in pairs(cont.items) do
      if type(k) == "number" then
        local item = v
        if type(v) == "number" then
          item = EntIndexToHScript(item)
        end

        if item and IsValidEntity(item) and item.IsItem and item:IsItem() then
          local itemid = item:GetEntityIndex()
          local itemname = item:GetAbilityName()
          pt['slot' .. k] = itemid
          c.items[itemid] = k
          c.itemNames[itemname] = c.itemNames[itemname] or {}
          c.itemNames[itemname][itemid] = k

          if cont.equipment and pt.entity then
            ApplyPassives(c, item, EntIndexToHScript(pt.entity))
          end
        end
      end
    end
  end

  if cont.equipment then
    c.cleanupTimer = Timers:CreateTimer(1, function()
      for itemID, mods in pairs(c.appliedPassives) do
        if not IsValidEntity(EntIndexToHScript(itemID)) or not c:ContainsItem(itemID) then
          for _, mod in ipairs(mods) do
            mod:Destroy()
          end
          c.appliedPassives[itemID] = nil
        end
      end
      return 1
    end)
  end

  if cont.cantDragFrom then
    for _,pid in ipairs(cont.cantDragFrom) do
      if type(pid) == "number" then
        c.canDragFrom[pid] = false
      end
    end
  end

  if cont.cantDragTo then
    for _,pid in ipairs(cont.cantDragTo) do
      if type(pid) == "number" then
        c.canDragTo[pid] = false
      end
    end
  end

  if cont.pids then
    for _,pid in ipairs(cont.pids) do
      c.subs[pid] = true
    end
  end

  PlayerTables:CreateTable(c.ptID, pt, c.subs)

  function c:ActivateItem(unit, item, playerID)
    if item:GetOwner() ~= unit or not item:IsFullyCastable() then
      Containers:EmitSoundOnClient(playerID, "General.Cancel")
      return
    end

    local playerID = playerID or unit:GetPlayerOwnerID()

    local behavior =     item:GetBehavior()
    local targetType =   item:GetAbilityTargetType()
    local toggle =       bit.band(behavior, DOTA_ABILITY_BEHAVIOR_TOGGLE) ~= 0
    local unrestricted = bit.band(behavior, DOTA_ABILITY_BEHAVIOR_UNRESTRICTED) ~= 0
    local rootDisables = bit.band(behavior, DOTA_ABILITY_BEHAVIOR_ROOT_DISABLES) ~= 0
    local channelled =   bit.band(behavior, DOTA_ABILITY_BEHAVIOR_CHANNELLED) ~= 0
    local noTarget =     bit.band(behavior, DOTA_ABILITY_BEHAVIOR_NO_TARGET) ~= 0
    local treeTarget =   bit.band(targetType, DOTA_UNIT_TARGET_TREE) ~= 0

    if unit:IsStunned() and not unrestricted then
      Containers:DisplayError(playerID, "#dota_hud_error_unit_command_restricted")
      return
    end
    if unit:IsRooted() and rootDisables then
      Containers:DisplayError(playerID, "#dota_hud_error_ability_disabled_by_root")
      return
    end
    if noTarget and not channelled then
      item:PayGoldCost()
      item:PayManaCost()
      item:StartCooldown(item:GetCooldown(item:GetLevel()))
      if toggle then
        item:OnToggle()
      else
        item:OnSpellStart()
      end
    else
      local abil = unit:FindAbilityByName("containers_lua_targeting")
      if treeTarget then
        if unit:HasAbility("containers_lua_targeting") then unit:RemoveAbility("containers_lua_targeting") end
        abil = unit:FindAbilityByName("containers_lua_targeting_tree")
      elseif unit:HasAbility("containers_lua_targeting_tree") then
        unit:RemoveAbility("containers_lua_targeting_tree")
      end
      if not abil then
        -- no ability proxy found, add
        local abilSlot = -1
        for i=15,0,-1 do
          local ab = unit:GetAbilityByIndex(i)
          if not ab then
            abilSlot = i
            break
          end
        end

        if abilSlot == -1 then
          print("[containers.lua]  ERROR: 'containers_lua-targeting' ability not found for unit '" .. unit:GetUnitName() .. '" and all ability slots are full.')
          return
        end

        if treeTarget then
          abil = unit:AddAbility("containers_lua_targeting_tree")
          --abil = unit:FindAbilityByName("containers_lua_targeting_tree")
        else
          abil = unit:AddAbility("containers_lua_targeting")
          --abil = unit:FindAbilityByName("containers_lua_targeting")
        end
        abil:SetLevel(1)
      end

      abil:SetHidden(false)
      abil.proxyItem = item

      local aoe = nil
      local iname = item:GetAbilityName()
      if iname == "item_veil_of_discord" then
        aoe = 600
      elseif Containers.itemKV[iname] then
        aoe = Containers.itemKV[iname].AOERadius
      end

      CustomNetTables:SetTableValue("containers_lua", tostring(abil:GetEntityIndex()), {behavior=behavior, aoe=aoe, range=item:GetCastRange(),
        targetType=targetType, targetTeam=item:GetAbilityTargetTeam(), targetFlags=item:GetAbilityTargetFlags(),
        channelTime=item:GetChannelTime(), channelCost=item:GetChannelledManaCostPerSecond(item:GetLevel()),
        proxyItem=item:GetEntityIndex()})

      local player = PlayerResource:GetPlayer(playerID)
      if player then
        CustomGameEventManager:Send_ServerToPlayer(player, "cont_execute_proxy", {unit=unit:GetEntityIndex()})
      end
    end
  end

  function c:GetAllOpen()
    return self.opens
  end

  function c:IsOpen(pid)
    return self.opens[pid] ~= nil
  end

  function c:Open(pid)
    self.opens[pid] = true
    PlayerTables:AddPlayerSubscription(self.ptID, pid)

    if self:IsCloseOnOrder() then
      Containers.closeOnOrders[pid][self.id] = self
    end

    local player = PlayerResource:GetPlayer(pid)
    if player then
      CustomGameEventManager:Send_ServerToPlayer(player, "cont_open_container", {id=self.id} )
    end

    if self._OnOpen then
      self._OnOpen(pid, self)
    end
  end

  function c:Close(pid)
    if self.opens[pid] == nil then return end

    self.opens[pid] = nil
    if not self.subs[pid] then
      PlayerTables:RemovePlayerSubscription(self.ptID, pid)
    end

    if self:IsCloseOnOrder() then
      Containers.closeOnOrders[pid][self.id] = nil
    end

    local player = PlayerResource:GetPlayer(pid)
    if player then
      CustomGameEventManager:Send_ServerToPlayer(player, "cont_close_container", {id=self.id} )
    end

    if self._OnClose then
      self._OnClose(pid, self)
    end
  end

  function c:Delete(deleteContents)
    Containers:DeleteContainer(self, deleteContents)
  end

  function c:AddSubscription(pid)
    self.subs[pid] = true
    PlayerTables:AddPlayerSubscription(self.ptID, pid)
  end

  function c:RemoveSubscription(pid)
    self.subs[pid] = nil
    if not self.opens[pid] then
      PlayerTables:RemovePlayerSubscription(self.ptID, pid)
    end
  end

  function c:GetSubscriptions()
    return self.subs
  end

  function c:IsSubscribed(pid)
    return self.subs[pid] ~= nil
  end

  function c:SwapSlots(slot1, slot2, allowCombine)
    local item1 = self:GetItemInSlot(slot1)
    local item2 = self:GetItemInSlot(slot2)

    if item1 and item2 then
      return self:SwapItems(item1, item2, allowCombine)
    elseif item1 then
      local itemid = item1:GetEntityIndex()
      local itemname = item1:GetAbilityName()
      self.items[itemid] = slot2
      self.itemNames[itemname][itemid] = slot2

      PlayerTables:SetTableValue(self.ptID, "slot"..slot2, itemid)
      PlayerTables:DeleteTableKey(self.ptID, "slot"..slot1)
      return true
    elseif item2 then
      local itemid = item2:GetEntityIndex()
      local itemname = item2:GetAbilityName()
      self.items[itemid] = slot1
      self.itemNames[itemname][itemid] = slot1

      PlayerTables:SetTableValue(self.ptID, "slot"..slot1, itemid)
      PlayerTables:DeleteTableKey(self.ptID, "slot"..slot2)
      return true
    end
    return false
  end

  function c:SwapItems(item1, item2, allowCombine)
    item1 = GetItem(item1)
    item2 = GetItem(item2)

    local i1id = item1:GetEntityIndex()
    local i1name = item1:GetAbilityName()
    local i2id = item2:GetEntityIndex()
    local i2name = item2:GetAbilityName()

    local i1 = self.items[i1id]
    local i2 = self.items[i2id]

    if i1 and i2 then
      if allowCombine and i1name == i2name and item1:IsStackable() and item2:IsStackable() then
        self:RemoveItem(item1)
        item2:SetCurrentCharges(item2:GetCurrentCharges() + item1:GetCurrentCharges())
        item1:RemoveSelf()
        return true
      end
      self.items[i1id] = i2
      self.items[i2id] = i1
      self.itemNames[i1name][i1id] = i2
      self.itemNames[i2name][i2id] = i1

      PlayerTables:SetTableValues(self.ptID, {["slot"..i1]=i2id, ["slot"..i2]=i1id})
      return true
    end

    return false
  end

  function c:ContainsItem(item)
    item = GetItem(item)
    if not item then return false end
    return self.items[item:GetEntityIndex()] ~= nil
  end

  function c:GetSlotForItem(item)
    item = GetItem(item)
    return self.items[item:GetEntityIndex()]
  end

  function c:GetRowColumnForItem(item)
    item = GetItem(item)

    local itemid = item:GetEntityIndex()
    local slot = self.items[itemid]
    if not slot then
      return nil, nil
    end

    local size = self:GetSize()
    if slot > size then
      return nil, nil
    end
    local rowStarts = PlayerTables:GetTableValue(self.ptID, "rowStarts")
    for row,start in ipairs(rowStarts) do
      if start > slot then
        local prev = row-1
        return prev, (slot - rowStarts[prev] + 1)
      end
    end

    local row = #rowStarts

    return row, (slot - rowStarts[row] + 1)
  end

  function c:GetAllItems()
    local items = {}
    for slot=1,self:GetSize() do
      local item = self:GetItemInSlot(slot)
      if item then
        table.insert(items, item)
      end
    end

    return items
  end

  function c:GetItemsByName(name)
    local nameTable = self.itemNames[name]
    local items = {}
    if not nameTable then
      return items
    end

    for id,slot in pairs(nameTable) do
      local item = GetItem(id)
      if item then
        table.insert(items, item)
      else
        nameTable[id] = nil
      end
    end
    return items
  end

  function c:GetItemInSlot(slot)
    local item = PlayerTables:GetTableValue(self.ptID, "slot" .. slot)
    if item then
      item = EntIndexToHScript(item)
      if item and not IsValidEntity(item) then
        PlayerTables:DeleteTableKey(self.ptID, "slot" .. slot)
        return nil
      elseif item and IsValidEntity(item) and item.IsItem and item:IsItem() then
        return item
      end
    end

    return nil
  end

  function c:GetItemInRowColumn(row, column)
    local rowStarts = PlayerTables:GetTableValue(self.ptID, "rowStarts")
    if not rowStarts[row] then
      return nil
    end

    local nextRowStart = rowStarts[row+1] or self:GetSize() + 1
    local slot = rowStarts[row] + column - 1

    if slot >= nextRowStart then
      return nil
    end

    return self:GetItemInSlot(slot)
  end

  function c:AddItem(item, slot, column, bypassFilter)
    item = GetItem(item)
    if slot and type(slot) == "number" and column and type(column) == "number" then
      local rowStarts = PlayerTables:GetTableValue(self.ptID, "rowStarts")
      if not rowStarts[slot] then
        print("[containers.lua]  Request to add item in row " .. slot .. " -- row not found. ")
        return false
      end

      local nextRowStart = rowStarts[slot+1] or self:GetSize() + 1
      local newslot = rowStarts[slot] + column - 1

      if newslot >= nextRowStart then
        print("[containers.lua]  Request to add item in row " .. slot .. ", column " .. column .. " -- column exceeds row length. ")
        return false
      end

      slot = newslot
    end

    local findStack = slot == nil
    slot = slot or 1

    local size = self:GetSize()
    if slot > size then
      print("[containers.lua]  Request to add item in slot " .. slot .. " -- exceeding container size " .. size)
      return false
    end

    local func = c.AddItemFilter
    if not bypassFilter and c.AddItemFilter then
      local status, result = pcall(c.AddItemFilter, c, item, findstack and -1 or slot)
      if not status then
        print("[containers.lua] AddItemFilter callback error: " .. result)
        return false
      end

      if not result then
        return false
      end
    end

    local itemid = item:GetEntityIndex()
    local itemname = item:GetAbilityName()

    if findStack and item:IsStackable() then
      local nameTable = self.itemNames[itemname]
      if nameTable then
        local lowestSlot = size+1
        local lowestItem = nil
        for itemid, nameslot in pairs(nameTable) do
          if nameslot < lowestSlot then
            local item = self:GetItemInSlot(nameslot)
            if item then
              lowestSlot = nameslot
              lowestItem = item
            else
              nameTable[itemid] = nil
            end
          end
        end

        if lowestItem and lowestItem:IsStackable() then
          lowestItem:SetCurrentCharges(lowestItem:GetCurrentCharges() + item:GetCurrentCharges())
          item:RemoveSelf()
          return true
        end
      end
    end

    -- check if the slot specified is stackable
    if not findStack and item:IsStackable() then
      local slotitem = self:GetItemInSlot(slot)

      if slotitem and itemname == slotitem:GetAbilityName() and slotitem:IsStackable() then
        slotitem:SetCurrentCharges(slotitem:GetCurrentCharges() + item:GetCurrentCharges())
        item:RemoveSelf()
        return true
      end
    end

    for i=slot,size do
      local slotitem = self:GetItemInSlot(i)
      if not slotitem then

        self.items[itemid] = i
        self.itemNames[itemname] = self.itemNames[itemname] or {}
        self.itemNames[itemname][itemid] = i

        if self.forceOwner then
          item:SetOwner(self.forceOwner)
        elseif self.forceOwner == false then
          item:SetOwner(nil)
        end
        if self.forcePurchaser then
          item:SetPurchaser(self.forcePurchaser)
        elseif self.forceOwner == false then
          item:SetPurchaser(nil)
        end

        if self:IsEquipment() then
          ApplyPassives(self, item)
        end

        PlayerTables:SetTableValue(self.ptID, "slot" .. i, itemid)
        return true
      end
    end

    return false
  end

  function c:AddItemBush(item, slot, column, bypassFilter)
    item = GetItem(item)
    if slot and type(slot) == "number" and column and type(column) == "number" then
      local rowStarts = PlayerTables:GetTableValue(self.ptID, "rowStarts")
      if not rowStarts[slot] then
        print("[containers.lua]  Request to add item in row " .. slot .. " -- row not found. ")
        return false
      end

      local nextRowStart = rowStarts[slot+1] or self:GetSize() + 1
      local newslot = rowStarts[slot] + column - 1

      if newslot >= nextRowStart then
        print("[containers.lua]  Request to add item in row " .. slot .. ", column " .. column .. " -- column exceeds row length. ")
        return false
      end

      slot = newslot
    end

    local findStack = slot == nil
    slot = slot or 1

    local size = self:GetSize()
    if slot > size then
      print("[containers.lua]  Request to add item in slot " .. slot .. " -- exceeding container size " .. size)
      return false
    end

    local func = c.AddItemFilter
    if not bypassFilter and c.AddItemFilter then
      local status, result = pcall(c.AddItemFilter, c, item, findstack and -1 or slot)
      if not status then
        print("[containers.lua] AddItemFilter callback error: " .. result)
        return false
      end

      if not result then
        return false
      end
    end

    local itemid = item:GetEntityIndex()
    local itemname = item:GetAbilityName()
    local maxStacks = GameRules.ItemKV[itemname]["MaxStacks"]

    if findStack and maxStacks then
      print("adding to container stackable")
      local nameTable = self.itemNames[itemname]
      if nameTable then
        local lowestSlot = size+1
        local lowestItem = nil
        for itemid, nameslot in pairs(nameTable) do
          if nameslot < lowestSlot then
            local item = self:GetItemInSlot(nameslot)
            if item then                                      -- This for loop was kinda meaningless before...
              if item:GetCurrentCharges() < maxStacks then    -- It always went through the slots and returned the first one
                lowestSlot = nameslot                         -- Now it only returns a slot that doesn't have maxStacks yet.
                lowestItem = item                             -- Not sure if Line 2345 should get the same treatment.
              end
            else
              nameTable[itemid] = nil
            end
          end
        end

        if lowestItem and GameRules.ItemKV[lowestItem:GetAbilityName()]["MaxStacks"] then
          local chargesToAdd = item:GetCurrentCharges()
          if chargesToAdd + lowestItem:GetCurrentCharges() > maxStacks then
            chargesToAdd = maxStacks - lowestItem:GetCurrentCharges()
          end
          lowestItem:SetCurrentCharges(lowestItem:GetCurrentCharges() + chargesToAdd)
          if item:GetCurrentCharges() - chargesToAdd <= 0 then
            --print("only adding charges " .. lowestItem:GetCurrentCharges())
            item:RemoveSelf()
          else
            item:SetCurrentCharges(item:GetCurrentCharges() - chargesToAdd)
            for i=slot,size do
              --print("looping to find open slot " .. slot .. " size " .. size)
              local slotitem = self:GetItemInSlot(i)
              if not slotitem then

                self.items[itemid] = i
                self.itemNames[itemname] = self.itemNames[itemname] or {}
                self.itemNames[itemname][itemid] = i

                if self.forceOwner then
                  item:SetOwner(self.forceOwner)
                elseif self.forceOwner == false then
                  item:SetOwner(nil)
                end
                if self.forcePurchaser then
                  item:SetPurchaser(self.forcePurchaser)
                elseif self.forceOwner == false then
                  item:SetPurchaser(nil)
                end

                if self:IsEquipment() then
                  ApplyPassives(self, item)
                end

                PlayerTables:SetTableValue(self.ptID, "slot" .. i, itemid)
                print("added item and charges")
                return true
              end
            end
            print("all slots full in container")
            return false
          end
          return true
        end
      end
    end

    -- check if the slot specified is stackable
    if not findStack and item:IsStackable() then
      local slotitem = self:GetItemInSlot(slot)

      if slotitem and itemname == slotitem:GetAbilityName() and slotitem:IsStackable() then
        slotitem:SetCurrentCharges(slotitem:GetCurrentCharges() + item:GetCurrentCharges())
        item:RemoveSelf()
        return true
      end
    end

    for i=slot,size do
      local slotitem = self:GetItemInSlot(i)
      if not slotitem then

        self.items[itemid] = i
        self.itemNames[itemname] = self.itemNames[itemname] or {}
        self.itemNames[itemname][itemid] = i

        if self.forceOwner then
          item:SetOwner(self.forceOwner)
        elseif self.forceOwner == false then
          item:SetOwner(nil)
        end
        if self.forcePurchaser then
          item:SetPurchaser(self.forcePurchaser)
        elseif self.forceOwner == false then
          item:SetPurchaser(nil)
        end

        if self:IsEquipment() then
          ApplyPassives(self, item)
        end

        PlayerTables:SetTableValue(self.ptID, "slot" .. i, itemid)
        return true
      end
    end

    return false
  end

  function c:RemoveItem(item)
    item = GetItem(item)
    local slot = self.items[item:GetEntityIndex()]
    local nameTable = self.itemNames[item:GetAbilityName()]
    local itemid = item:GetEntityIndex()

    self.items[itemid] = nil
    nameTable[itemid] = nil

    if self:IsEquipment() then
      local mods = self.appliedPassives[itemid]
      if mods then
        for _, mod in ipairs(mods) do
          mod:Destroy()
        end
      end
      self.appliedPassives[itemid] = nil
    end

    PlayerTables:DeleteTableKey(self.ptID, "slot" .. slot)
  end

  function c:ClearSlot(slot)
    local item = self:GetItemInSlot(slot)
    if IsValidEntity(item) then
      self:RemoveItem(item)
    else
      PlayerTables:DeleteTableKey(self.ptID, "slot" .. slot)
    end
  end

  function c:GetContainerIndex()
    return self.id
  end

  function c:GetHeaderText()
    local headerText = PlayerTables:GetTableValue(self.ptID, "headerText")
    return headerText
  end

  function c:SetHeaderText(header)
    PlayerTables:SetTableValue(self.ptID, "headerText", header)
  end

  function c:GetSize()
    local size = PlayerTables:GetTableValue(self.ptID, "size")
    return size
  end

  function c:GetNumItems()
    return #c:GetAllItems()
  end

  function c:GetLayout()
    local layout = PlayerTables:GetTableValue(self.ptID, "layout")
    return layout
  end

  function c:SetLayout(layout, removeOnContract)
    local size = 0
    local rowStarts = {}

    for i,row in ipairs(layout) do
      table.insert(rowStarts, size+1)
      size = size + row
    end

    local oldSize = self:GetSize()
    local changes = {}

    if removeOnContract and size < oldSize then
      local deletions = {}
      for i=size+1,oldSize do
        local item = self:GetItemInSlot(i)
        if item then
          local itemid = item:GetEntityIndex()
          local itemname = item:GetAbilityName()
          local nameTable = self.itemNames[item:GetAbilityName()]

          self.items[item:GetEntityIndex()] = nil
          nameTable[item:GetEntityIndex()] = nil

          if self:IsEquipment() then
            local mods = self.appliedPassives[itemid]
            if mods then
              for _, mod in ipairs(mods) do
                mod:Destroy()
              end
            end
            self.appliedPassives[itemid] = nil
          end

          table.insert(deletions, "slot"..i)
        end
      end

      PlayerTables:DeleteTableKeys(self.ptID, deletions)
    end

    changes.layout = layout
    changes.size = size
    changes.rowStarts = rowStarts

    PlayerTables:SetTableValues(self.ptID, changes)
  end

  function c:GetRange()
    return self.range
  end

  function c:SetRange(range)
    self.range = range
    --[[if range then
      PlayerTables:SetTableValue(self.ptID, "range", range)
    else
      PlayerTables:DeleteTableKey(self.ptID, "range")
    end]]
  end

  function c:AddSkin(skin)
    local skins = PlayerTables:GetTableValue(self.ptID, "skins")
    skins[skin] = true

    PlayerTables:SetTableValue(self.ptID, "skins", skins)
  end

  function c:RemoveSkin(skin)
    local skins = PlayerTables:GetTableValue(self.ptID, "skins")
    skins[skin] = nil

    PlayerTables:SetTableValue(self.ptID, "skins", skins)
  end

  function c:GetSkins()
    local skins = PlayerTables:GetTableValue(self.ptID, "skins")
    return skins
  end

  function c:HasSkin(skin)
    local skins = PlayerTables:GetTableValue(self.ptID, "skins")
    return skins[skin] ~= nil
  end

  function c:SetButton(number, name)
    local buttons = PlayerTables:GetTableValue(self.ptID, "buttons")
    buttons[number] = name

    PlayerTables:SetTableValue(self.ptID, "buttons", buttons)
  end

  function c:RemoveButton(number)
    local buttons = PlayerTables:GetTableValue(self.ptID, "buttons")
    buttons[number] = nil

    PlayerTables:SetTableValue(self.ptID, "buttons", buttons)
  end

  function c:GetButtons()
    local buttons = PlayerTables:GetTableValue(self.ptID, "buttons")
    return buttons
  end

  function c:GetButtonName(number)
    local buttons = PlayerTables:GetTableValue(self.ptID, "buttons")
    return buttons[number]
  end

  function c:GetEntity()
    local entity = PlayerTables:GetTableValue(self.ptID, "entity")
    if entity then
      return EntIndexToHScript(entity)
    end
    return nil
  end

  function c:SetEntity(entity)
    local old = c:GetEntity()
    local num = entity
    if entity and type(entity) == "number" then
      entity = EntIndexToHScript(entity)
    elseif entity and entity.GetEntityIndex then
      num = entity:GetEntityIndex()
    end

    if entity then
      PlayerTables:SetTableValue(self.ptID, "entity", num)
      Containers.entityContainers[num] = Containers.entityContainers[num] or {}
      Containers.entityContainers[num][self.id] = self
    elseif old ~= nil then
      PlayerTables:DeleteTableKey(self.ptID, "entity")
      Containers.entityContainers[old:GetEntityIndex()] = Containers.entityContainers[old:GetEntityIndex()] or {}
      Containers.entityContainers[old:GetEntityIndex()][self.id] = nil
    end

    if self:IsEquipment() and old ~= entity then
      for itemID, mods in pairs(self.appliedPassives) do
        for _, mod in ipairs(mods) do
          mod:Destroy()
        end
      end
      self.appliedPassives = {}

      local items = self:GetAllItems()
      for _, item in ipairs(items) do
        ApplyPassives(self, item)
      end
    end
  end

  function c:GetCanDragFromPlayers()
    return self.canDragFrom
  end

  function c:CanDragFrom(pid)
    return self.canDragFrom[pid] ~= false
  end

  function c:SetCanDragFrom(pid, canDrag)
    self.canDragFrom[pid] = canDrag
  end

  function c:GetCanDragToPlayers()
    return self.canDragTo
  end

  function c:CanDragTo(pid)
    return self.canDragTo[pid] ~= false
  end

  function c:SetCanDragTo(pid, canDrag)
    self.canDragTo[pid] = canDrag
  end

  function c:GetCanDragWithinPlayers()
    return self.canDragWithin
  end

  function c:CanDragWithin(pid)
    return self.canDragWithin[pid] ~= false
  end

  function c:SetCanDragWithin(pid, canDrag)
    self.canDragWithin[pid] = canDrag
  end

  function c:IsDraggable()
    return PlayerTables:GetTableValue(self.ptID, "draggable")
  end

  function c:SetDraggable(drag)
    PlayerTables:SetTableValue(self.ptID, "draggable", drag)
  end

  function c:IsEquipment()
    local eq = PlayerTables:GetTableValue(self.ptID, "equipment")
    if eq then
      return true
    else
      return false
    end
  end

  function c:SetEquipment(equip)
    local isEq = self:IsEquipment()
    if equip and not isEq then
      local items = self:GetAllItems()
      for _, item in ipairs(items) do
        ApplyPassives(self, item)
      end

      local c = self

      self.cleanupTimer = Timers:CreateTimer(1, function()
        for itemID, mods in pairs(c.appliedPassives) do
          if not IsValidEntity(EntIndexToHScript(itemID)) or not c:ContainsItem(itemID) then
            for _, mod in ipairs(mods) do
              mod:Destroy()
            end
            c.appliedPassives[itemID] = nil
          end
        end
        return 1
      end)
    elseif not equip and isEq then
      local items = self:GetAllItems()
      for itemID,mods in pairs(self.appliedPassives) do
        for _, mod in ipairs(mods) do
          mod:Destroy()
        end
      end
      self.appliedPassives = {}

      Timers:RemoveTimer(self.cleanupTimer)
    end
    PlayerTables:SetTableValue(self.ptID, "equipment", equip)
  end

  function c:GetForceOwner()
    return self.forceOwner
  end

  function c:GetForcePurchaser()
    return self.ForcePurchaser
  end

  function c:SetForceOwner(owner)
    self.forceOwner = owner
  end

  function c:SetForcePurchaser(purchaser)
    self.ForcePurchaser = purchaser
  end

  function c:IsCloseOnOrder()
    return self.closeOnOrder
  end

  function c:SetCloseOnOrder(close)
    if close then
      for pid, _ in pairs(self.opens) do
        Containers.closeOnOrders[pid][self.id] = self
      end
    else
      for pid,v in pairs(Containers.closeOnOrders) do
        v[self.id] = nil
      end
    end
    self.closeOnOrder = close
  end

  function c:OnLeftClick(fun)
    if fun == nil then
      PlayerTables:DeleteTableKey(self.ptID, "OnLeftClick")
    elseif type(fun) == "function" then
      PlayerTables:SetTableValue(self.ptID, "OnLeftClick", true)
    else
      PlayerTables:SetTableValue(self.ptID, "OnLeftClick", fun)
    end

    self._OnLeftClick = fun
  end

  function c:OnRightClick(fun)
    if fun == nil then
      PlayerTables:DeleteTableKey(self.ptID, "OnRightClick")
    elseif type(fun) == "function" then
      PlayerTables:SetTableValue(self.ptID, "OnRightClick", true)
    else
      PlayerTables:SetTableValue(self.ptID, "OnRightClick", fun)
    end

    self._OnRightClick = fun
  end

  function c:OnDragTo(fun)
    self._OnDragTo = fun
  end

  function c:OnDragWithin(fun)
    self._OnDragWithin = fun
  end

  function c:OnDragFrom(fun)
    if fun == nil then
      PlayerTables:DeleteTableKey(self.ptID, "OnDragFrom")
    elseif type(fun) == "function" then
      PlayerTables:SetTableValue(self.ptID, "OnDragFrom", true)
    else
      PlayerTables:SetTableValue(self.ptID, "OnDragFrom", fun)
    end

    self._OnDragFrom = fun
  end

  function c:OnDragWorld(fun)
    if fun == nil then
      PlayerTables:DeleteTableKey(self.ptID, "OnDragWorld")
    elseif type(fun) == "function" then
      PlayerTables:SetTableValue(self.ptID, "OnDragWorld", true)
    else
      PlayerTables:SetTableValue(self.ptID, "OnDragWorld", fun)
    end

    self._OnDragWorld = fun
  end

  function c:OnCloseClicked(fun)
    if fun == nil then
      PlayerTables:DeleteTableKey(self.ptID, "OnCloseClicked")
    elseif type(fun) == "function" then
      PlayerTables:SetTableValue(self.ptID, "OnCloseClicked", true)
    else
      PlayerTables:SetTableValue(self.ptID, "OnCloseClicked", fun)
    end

    self._OnCloseClicked = fun
  end

  function c:OnButtonPressed(fun)
    if fun == nil then
      PlayerTables:DeleteTableKey(self.ptID, "OnButtonPressed")
    elseif type(fun) == "function" then
      PlayerTables:SetTableValue(self.ptID, "OnButtonPressed", true)
    else
      PlayerTables:SetTableValue(self.ptID, "OnButtonPressed", fun)
    end

    self._OnButtonPressed = fun
  end

  function c:OnEntityOrder(fun)
    self._OnEntityOrder = fun
  end

  function c:OnEntityDrag(fun)
    self._OnEntityDrag = fun
  end

  function c:OnClose(fun)
    self._OnClose = fun
  end

  function c:OnOpen(fun)
    self._OnOpen = fun
  end

  function c:OnSelect(fun)
    self._OnSelect = fun
  end

  function c:OnDeselect(fun)
    self._OnDeselect = fun
  end

  function c:OnLeftClickJS(jsCallback)
    if jsCallback == nil then
      PlayerTables:DeleteTableKey(self.ptID, "OnLeftClickJS")
    else
      PlayerTables:SetTableValue(self.ptID, "OnLeftClickJS", jsCallback)
    end
  end

  function c:OnRightClickJS(jsCallback)
    if jsCallback == nil then
      PlayerTables:DeleteTableKey(self.ptID, "OnRightClickJS")
    else
      PlayerTables:SetTableValue(self.ptID, "OnRightClickJS", jsCallback)
    end
  end

  function c:OnDoubleClickJS(jsCallback)
    if jsCallback == nil then
      PlayerTables:DeleteTableKey(self.ptID, "OnDoubleClickJS")
    else
      PlayerTables:SetTableValue(self.ptID, "OnDoubleClickJS", jsCallback)
    end
  end

  function c:OnMouseOutJS(jsCallback)
    if jsCallback == nil then
      PlayerTables:DeleteTableKey(self.ptID, "OnMouseOutJS")
    else
      PlayerTables:SetTableValue(self.ptID, "OnMouseOutJS", jsCallback)
    end
  end

  function c:OnMouseOverJS(jsCallback)
    if jsCallback == nil then
      PlayerTables:DeleteTableKey(self.ptID, "OnMouseOverJS")
    else
      PlayerTables:SetTableValue(self.ptID, "OnMouseOverJS", jsCallback)
    end
  end

  function c:OnButtonPressedJS(jsCallback)
    if jsCallback == nil then
      PlayerTables:DeleteTableKey(self.ptID, "OnButtonPressedJS")
    else
      PlayerTables:SetTableValue(self.ptID, "OnButtonPressedJS", jsCallback)
    end
  end

  function c:OnCloseClickedJS(jsCallback)
    if jsCallback == nil then
      PlayerTables:DeleteTableKey(self.ptID, "OnCloseClickedJS")
    else
      PlayerTables:SetTableValue(self.ptID, "OnCloseClickedJS", jsCallback)
    end
  end

  function c:IsInventory()
    return false
  end


  self.containers[self.nextID] = c
  self.nextID = self.nextID + 1
  return c
end

function Containers:DeleteContainer(c, deleteContents)
  if deleteContents ~= false or c:IsEquipment() then
    local items = c:GetAllItems()
    for _, item in ipairs(items) do
      if c:IsEquipment() then
        local mods = c.appliedPassives[item:GetEntityIndex()]
        Timers:RemoveTimer(c.cleanupTimer)
        if mods then
          for _, mod in ipairs(mods) do
            mod:Destroy()
          end
        end
      end
      if deleteContents then
        item:RemoveSelf()
      end
    end
  end

  PlayerTables:DeleteTable(c.ptID)
  self.containers[c.id] = nil

  CustomGameEventManager:Send_ServerToAllClients("cont_delete_container", {id=c.id} )

  for k,v in pairs(c) do
    c[k] = nil
  end
end

function Containers:print(...)
  if CONTAINERS_DEBUG then
    print(unpack({...}))
  end
end

function Containers:PrintTable(t)
  if CONTAINERS_DEBUG then
    PrintTable(t)
  end
end

function IsValidContainer(c)
  if c and c.GetAllOpen then
    return true
  else
    return false
  end
end

if not Containers.containers then Containers:start() end