server.lua

local hookid
local StringCharset = {}
local NumberCharset = {}

local webhook
for i = 48, 57 do NumberCharset[#NumberCharset + 1] = string.char(i) end
for i = 65, 90 do StringCharset[#StringCharset + 1] = string.char(i) end
for i = 97, 122 do StringCharset[#StringCharset + 1] = string.char(i) end

local function SetupStore()
    TriggerClientEvent("ran-storerobbery:client:setConfigs", -1, Config.Store)
end

local function SendLog(title, content, tageveryone)
    if not webhook then
        warn("No webhook link for " .. GetCurrentResourceName())
        return
    end
    local embedData = {
        username = "Store Robbery",
        embeds = {
            {
                title = title,
                color = 16711680,
                footer = {
                    text = os.date('%c')
                },
                description = content,
                author = {
                    name = "Store Robbery",
                    icon_url =
                    "https://media.discordapp.net/attachments/1139589833459761175/1144841078223159326/logo.png"
                }
            }
        }
    }
    if tageveryone then
        embedData.content = "@everyone"
    end
    PerformHttpRequest(webhook, function() end, 'POST', json.encode(embedData), { ['Content-Type'] = 'application/json' })
end

function RandomStr(length)
    if length <= 0 then return '' end
    return RandomStr(length - 1) .. StringCharset[math.random(1, #StringCharset)]
end

function RandomInt(length)
    if length <= 0 then return '' end
    return RandomInt(length - 1) .. NumberCharset[math.random(1, #NumberCharset)]
end

local function ResetStore(id)
    local cfg = Config.Store[id]
    if not cfg then return end
    if not cfg.cooldown then return end
    cfg.cooldown = false
    cfg.alerted = false
    cfg.combination = nil
    for _, v in pairs(cfg.registar) do
        v.robbed = false
        v.isusing = false
    end
    for _, v in pairs(cfg.search) do
        v.searched = false
        if v.iscomputer then
            v.founded = false
        end
    end
    if cfg.safe and cfg.safe.opened then
        cfg.safe.opened = false
        cfg.safe.id = nil
    end
end

local function Cooldown(storeid)
    local cfg = Config.Store[storeid]
    if not cfg then
        warn("No config found for " .. storeid)
        return
    end
    cfg.cooldown = true
    SetTimeout(1000 * 60 * 60, function()
        ResetStore(storeid)
    end)
    SendLog("Robbery end", ("Robbery with storeid: %s has ended"):format(storeid))
    TriggerClientEvent("ran-storerobbery:client:setStoreConfig", -1, storeid, cfg)
end

local function GenerateSafeItems()
    local totalChance = 0
    for item, properties in pairs(Config.Prize.safe) do
        totalChance = totalChance + properties.chance
    end

    local randomNumber = math.random(1, totalChance)
    local currentChance = 0

    local selectedItems = {}

    for item, properties in pairs(Config.Prize.safe) do
        currentChance = currentChance + properties.chance
        if randomNumber <= currentChance then
            local itemCount = math.random(properties.min, properties.max)
            selectedItems[#selectedItems + 1] = {
                [1] = item,
                [2] = itemCount
            }
        end
    end
    return selectedItems
end

local function IncludeInventoryID(id)
    for _, v in ipairs(Config.Store) do
        if v.safe then
            if v.safe.id == id then
                return true
            end
        end
    end
    return false
end

local function GenerateCombination()
    return RandomInt(4)
end

RegisterNetEvent("ran-storerobbery:server:getConfig", function()
    local src = source
    TriggerClientEvent("ran-storerobbery:client:setConfigs", src, Config.Store)
end)

RegisterNetEvent("ran-storerobbery:server:setUse", function(storeid, regid, status)
    local storeConfig = Config.Store[storeid]
    if not storeConfig then return end
    local regConfig = storeConfig.registar[regid]
    if not regConfig then return end
    regConfig.isusing = status
    TriggerClientEvent("ran-storerobbery:client:setStoreConfig", -1, storeid, storeConfig)
end)

RegisterNetEvent("ran-storerobbery:server:setHackUse", function(storeid, status)
    local cfg = Config.Store[storeid]
    if not cfg then return end
    cfg.hack.isusing = status
    TriggerClientEvent("ran-storerobbery:client:setStoreConfig", -1, storeid, cfg)
end)

RegisterNetEvent("ran-storerobbery:server:registerAlert", function(storeid, status)
    local src = source
    local cfg = Config.Store[storeid]
    if not cfg then return end
    if cfg.alerted == status then return end
    cfg.alerted = status
    SetTimeout(1000 * 60 * 60, function()
        cfg = Config.Store[storeid]
        if not cfg then return end
        if not cfg.cooldown then
            ResetStore(storeid)
        end
    end)
    SendLog("Robbery Started", ("%s has started a robbery, storeid: %s"):format(GetPlayerName(src), storeid))
    TriggerClientEvent("ran-storerobbery:client:setStoreConfig", -1, storeid, cfg)
end)

AddEventHandler('onResourceStart', function(resource)
    if resource ~= cache.resource then return end
    SetupStore()
    if Config.Inventory == "ox" then
        hookid = exports.ox_inventory:registerHook("swapItems", function(payload)
            if payload.fromType == "player" and IncludeInventoryID(payload.toInventory) then
                return false
            else
                return true
            end
        end, {
            inventoryFilter = {
                '^temp-[%w]+',
            }
        })
    end
end)

RegisterNetEvent("ran-houserobbery:server:setHackedState", function(storeid, status)
    local src = source
    local cfg = Config.Store[storeid]
    if not cfg then
        warn("No config found for " .. storeid)
        return
    end
    if cfg.hack.hacked == status then return end
    cfg.hack.hacked = status
    local delayCount = math.random(60, 90)
    cfg.hack.delayCount = delayCount
    Functions.NotifyClient(src, "The alarm will be delayed for " .. math.floor(delayCount) .. " seconds")
    TriggerClientEvent("ran-storerobbery:client:setStoreConfig", -1, storeid, cfg)
end)

lib.callback.register("ran-houserobbery:server:getPrize", function(source, prize, storeid, regid)
    local config = Config.Store[storeid]
    if not config then return end
    local regConfig = config.registar[regid]
    if not regConfig then return end
    if regConfig.robbed then return end
    if prize > Config.Prize.max then
        DropPlayer(source, "Exploit")
        return
    end
    regConfig.robbed = true
    local itemExist = Functions.ItemExist(Config.Prize.item)
    if Config.Prize.item and itemExist then
        Functions.AddItem(source, Config.Prize.item, prize, nil)
    else
        Functions.AddMoney(source, 'cash', prize)
    end
    SendLog("Get Prize",
        ("%s are robbing a register and got %s %s"):format(GetPlayerName(source), prize,
            itemExist and itemExist.label or "cash"), prize >= Config.Prize.max)
    TriggerClientEvent("ran-storerobbery:client:setStoreConfig", -1, storeid, config)
    return true
end)

lib.callback.register("ran-storerobbery:server:combination", function(source, storeid, sid, status)
    local cfg = Config.Store[storeid]
    if not cfg then return end
    local scfg = cfg.search[sid]
    if not scfg then return end
    if status then
        local combination = GenerateCombination()
        cfg.combination = tonumber(combination)
        if scfg.iscomputer then
            scfg.founded = true
        else
            Functions.AddItem(source, 'stickynote', 1, { combination = combination })
        end
    end
    scfg.searched = true
    TriggerClientEvent("ran-storerobbery:client:setStoreConfig", -1, storeid, cfg)
    return true
end)


lib.callback.register("ran-storerobbery:server:setSafeState", function(_, storeid)
    local config = Config.Store[storeid]
    if not config then return end
    if config.safe.opened and config.safe.id then return end
    config.safe.isopened = true
    config.safe.id = Functions.RegisterSafe(storeid, GenerateSafeItems())
    TriggerClientEvent("ran-storerobbery:client:setStoreConfig", -1, storeid, config)
    return true
end)

lib.addCommand("reset-store", {
    help = "Reset Store (Store Robbery)"
}, function(source)
    if source == 0 or not source then return end
    local job = Functions.GetJob(source)
    if not job or job ~= "police" then return end
    local sc = lib.callback.await("ran-storerobbery:client:resetStore", source)
    if sc then
        Cooldown(sc)
    end
end)

lib.addCommand("get-store-config", {
    help = "Get Store Config (ADMIN ONLY)",
    restricted = 'group.admin'
}, function(source)
    ---@type number | false
    local cb = lib.callback.await("ran-storerobbery:client:openConfigContext", source)
    if cb then
        local cfg = Config.Store[cb]
        if not cfg then return end
        local ped = GetPlayerPed(source)
        if not ped then return end
        local coords = cfg.coords
        SetEntityCoords(ped, coords.x, coords.y, coords.z - 1.0, true, false, false, false)
    end
end)

Functions.CreateUseableItem('stickynote', function(src, item)
    if item.info then
        Functions.NotifyClient(src, "Combination: " .. item.info.combination)
    elseif item.metadata then
        Functions.NotifyClient(src, "Combination: " .. item.metadata.combination)
    end
end)


AddEventHandler('onResourceStop', function(resource)
    if resource == GetCurrentResourceName() then
        if hookid then
            exports.ox_inventory:removeHooks(hookid)
        end
    end
end)