Upload shared files

shared/lua/core.lua

@@ -0,0 +1,46 @@
+QBCore = {
+    Config = {},
+    Shared = {
+        Jobs = {},
+        Gangs = {},
+        Items = {},
+        Vehicles = {},
+        Weapons = {},
+        VehicleHashes = {},
+    },
+    Player = {},
+    Players = {},
+    PlayerData = {},
+    Functions = {},
+    ClientCallbacks = {},
+    ServerCallbacks = {},
+    Player_Buckets = {},
+    Entity_Buckets = {},
+    UsableItems = {},
+    Commands = {
+        List = {},
+        IgnoreList = {
+            ['god'] = true,
+            ['user'] = true
+        }
+    }
+}
+
+local function GetCoreObject(filters)
+    if not filters then return QBCore end
+    local results = {}
+    for i = 1, #filters do
+        local key = filters[i]
+        if QBCore[key] then
+            results[key] = QBCore[key]
+        end
+    end
+    return results
+end
+
+exports('GetCoreObject', GetCoreObject)
+exports('GetSharedItems', function() return QBCore.Shared.Items end)
+exports('GetSharedVehicles', function() return QBCore.Shared.Vehicles end)
+exports('GetSharedWeapons', function() return QBCore.Shared.Weapons end)
+exports('GetSharedJobs', function() return QBCore.Shared.Jobs end)
+exports('GetSharedGangs', function() return QBCore.Shared.Gangs end)

shared/lua/functions.lua

@@ -0,0 +1,523 @@
+function QBCore.Functions.GetVehicles()
+    if IsDuplicityVersion() then
+        return GetAllVehicles()
+    else
+        return GetGamePool('CVehicle')
+    end
+end
+
+function QBCore.Functions.GetObjects()
+    if IsDuplicityVersion() then
+        return GetAllObjects()
+    else
+        return GetGamePool('CObject')
+    end
+end
+
+function QBCore.Functions.GetPeds()
+    if IsDuplicityVersion() then
+        local pedPool = GetAllPeds()
+        local peds = {}
+
+        for i = 1, #pedPool do
+            if NetworkGetEntityOwner(pedPool[i]) == 0 then
+                table.insert(peds, pedPool[i])
+            end
+        end
+
+        return peds
+    else
+        local pedPool = GetGamePool('CPed')
+        local peds = {}
+
+        for i = 1, #pedPool do
+            if not IsPedAPlayer(pedPool[i]) then
+                table.insert(peds, pedPool[i])
+            end
+        end
+
+        return peds
+    end
+end
+
+function QBCore.Functions.GetPlayers()
+    if IsDuplicityVersion() then
+        local sources = {}
+        for k in pairs(QBCore.Players) do
+            sources[#sources + 1] = k
+        end
+        return sources
+    else
+        return GetActivePlayers()
+    end
+end
+
+function QBCore.Functions.GetCoords(entity)
+    local coords = GetEntityCoords(entity, false)
+    local heading = GetEntityHeading(entity)
+    return vector4(coords.x, coords.y, coords.z, heading)
+end
+
+function QBCore.Functions.HasItem(...)
+    if GetResourceState('qb-inventory') == 'missing' then return false end
+    if IsDuplicityVersion() then
+        local source, items, amount = ...
+        return exports['qb-inventory']:HasItem(source, items, amount)
+    else
+        local items, amount = ...
+        return exports['qb-inventory']:HasItem(items, amount)
+    end
+end
+
+function QBCore.Functions.Notify(...)
+    if IsDuplicityVersion() then
+        local source, text, texttype, length = ...
+        TriggerClientEvent('QBCore:Notify', source, text, texttype, length)
+    else
+        local text, texttype, length, icon = ...
+        local message = {
+            action = 'notify',
+            type = texttype or 'primary',
+            length = length or 5000,
+        }
+        if type(text) == 'table' then
+            message.text = text.text or 'Placeholder'
+            message.caption = text.caption or 'Placeholder'
+        else
+            message.text = text
+        end
+        if icon then
+            message.icon = icon
+        end
+        SendNUIMessage(message)
+    end
+end
+
+function QBCore.Functions.SpawnVehicle(...)
+    if IsDuplicityVersion() then
+        local source, model, coords, warp = ...
+        local ped = GetPlayerPed(source)
+        model = type(model) == 'string' and joaat(model) or model
+        if not coords then coords = GetEntityCoords(ped) end
+        local heading = coords.w and coords.w or 0.0
+        local veh = CreateVehicle(model, coords.x, coords.y, coords.z, heading, true, true)
+        while not DoesEntityExist(veh) do Wait(0) end
+        if warp then
+            while GetVehiclePedIsIn(ped, false) ~= veh do
+                Wait(0)
+                TaskWarpPedIntoVehicle(ped, veh, -1)
+            end
+        end
+        while NetworkGetEntityOwner(veh) ~= source do Wait(0) end
+        return veh
+    else
+        local model, cb, coords, isnetworked, teleportInto = ...
+        local ped = PlayerPedId()
+        model = type(model) == 'string' and joaat(model) or model
+        if not IsModelInCdimage(model) then return end
+        if coords then
+            coords = type(coords) == 'table' and vec3(coords.x, coords.y, coords.z) or coords
+        else
+            coords = GetEntityCoords(ped)
+        end
+        isnetworked = isnetworked == nil or isnetworked
+        QBCore.Functions.LoadModel(model)
+        local veh = CreateVehicle(model, coords.x, coords.y, coords.z, coords.w or 0.0, isnetworked, false)
+        local netid = NetworkGetNetworkIdFromEntity(veh)
+        SetVehicleHasBeenOwnedByPlayer(veh, true)
+        SetNetworkIdCanMigrate(netid, true)
+        SetVehicleNeedsToBeHotwired(veh, false)
+        SetVehRadioStation(veh, 'OFF')
+        SetVehicleFuelLevel(veh, 100.0)
+        SetModelAsNoLongerNeeded(model)
+        if teleportInto then TaskWarpPedIntoVehicle(PlayerPedId(), veh, -1) end
+        if cb then cb(veh) end
+    end
+end
+
+function QBCore.Functions.GetClosestPed(...)
+    if IsDuplicityVersion() then
+        local source, coords = ...
+        local ped = GetPlayerPed(source)
+        local peds = GetAllPeds()
+        local closestDistance, closestPed = -1, -1
+
+        if coords then
+            coords = type(coords) == 'table' and vector3(coords.x, coords.y, coords.z) or coords
+        else
+            coords = GetEntityCoords(ped)
+        end
+
+        for i = 1, #peds do
+            if peds[i] ~= ped then
+                local pedCoords = GetEntityCoords(peds[i])
+                local distance = #(pedCoords - coords)
+                if closestDistance == -1 or closestDistance > distance then
+                    closestPed = peds[i]
+                    closestDistance = distance
+                end
+            end
+        end
+        return closestPed, closestDistance
+    else
+        local coords, ignoreList = ...
+        local ped = PlayerPedId()
+        if coords then
+            coords = type(coords) == 'table' and vec3(coords.x, coords.y, coords.z) or coords
+        else
+            coords = GetEntityCoords(ped)
+        end
+
+        ignoreList = ignoreList or {}
+        local peds = QBCore.Functions.GetPeds(ignoreList)
+        local closestDistance, closestPed = -1, -1
+
+        for i = 1, #peds do
+            local pedCoords = GetEntityCoords(peds[i])
+            local distance = #(pedCoords - coords)
+            if closestDistance == -1 or closestDistance > distance then
+                closestPed = peds[i]
+                closestDistance = distance
+            end
+        end
+        return closestPed, closestDistance
+    end
+end
+
+function QBCore.Functions.GetClosestVehicle(...)
+    if IsDuplicityVersion() then
+        local source, coords = ...
+        local ped = GetPlayerPed(source)
+        local vehicles = GetAllVehicles()
+        local closestDistance, closestVehicle = -1, -1
+
+        if coords then
+            coords = type(coords) == 'table' and vector3(coords.x, coords.y, coords.z) or coords
+        else
+            coords = GetEntityCoords(ped)
+        end
+
+        for i = 1, #vehicles do
+            local vehicleCoords = GetEntityCoords(vehicles[i])
+            local distance = #(vehicleCoords - coords)
+            if closestDistance == -1 or closestDistance > distance then
+                closestVehicle = vehicles[i]
+                closestDistance = distance
+            end
+        end
+        return closestVehicle, closestDistance
+    else
+        local coords = ...
+        local ped = PlayerPedId()
+        local vehicles = GetGamePool('CVehicle')
+        local closestDistance, closestVehicle = -1, -1
+
+        if coords then
+            coords = type(coords) == 'table' and vec3(coords.x, coords.y, coords.z) or coords
+        else
+            coords = GetEntityCoords(ped)
+        end
+
+        for i = 1, #vehicles do
+            local vehicleCoords = GetEntityCoords(vehicles[i])
+            local distance = #(vehicleCoords - coords)
+            if closestDistance == -1 or closestDistance > distance then
+                closestVehicle = vehicles[i]
+                closestDistance = distance
+            end
+        end
+        return closestVehicle, closestDistance
+    end
+end
+
+function QBCore.Functions.GetClosestObject(...)
+    if IsDuplicityVersion() then
+        local source, coords = ...
+        local ped = GetPlayerPed(source)
+        local objects = GetAllObjects()
+        local closestDistance, closestObject = -1, -1
+
+        if coords then
+            coords = type(coords) == 'table' and vector3(coords.x, coords.y, coords.z) or coords
+        else
+            coords = GetEntityCoords(ped)
+        end
+
+        for i = 1, #objects do
+            local objectCoords = GetEntityCoords(objects[i])
+            local distance = #(objectCoords - coords)
+            if closestDistance == -1 or closestDistance > distance then
+                closestObject = objects[i]
+                closestDistance = distance
+            end
+        end
+        return closestObject, closestDistance
+    else
+        local coords = ...
+        local ped = PlayerPedId()
+        local objects = GetGamePool('CObject')
+        local closestDistance, closestObject = -1, -1
+
+        if coords then
+            coords = type(coords) == 'table' and vec3(coords.x, coords.y, coords.z) or coords
+        else
+            coords = GetEntityCoords(ped)
+        end
+
+        for i = 1, #objects do
+            local objectCoords = GetEntityCoords(objects[i])
+            local distance = #(objectCoords - coords)
+            if closestDistance == -1 or closestDistance > distance then
+                closestObject = objects[i]
+                closestDistance = distance
+            end
+        end
+        return closestObject, closestDistance
+    end
+end
+
+function QBCore.Functions.GetClosestPlayer(...)
+    if IsDuplicityVersion() then
+        local source, coords = ...
+        local ped = GetPlayerPed(source)
+        local players = GetPlayers()
+        local closestDistance, closestPlayer = -1, -1
+
+        if coords then
+            coords = type(coords) == 'table' and vector3(coords.x, coords.y, coords.z) or coords
+        else
+            coords = GetEntityCoords(ped)
+        end
+
+        for i = 1, #players do
+            local playerId = players[i]
+            local playerPed = GetPlayerPed(playerId)
+            if playerPed ~= ped then
+                local playerCoords = GetEntityCoords(playerPed)
+                local distance = #(playerCoords - coords)
+                if closestDistance == -1 or distance < closestDistance then
+                    closestPlayer = playerId
+                    closestDistance = distance
+                end
+            end
+        end
+        return closestPlayer, closestDistance
+    else
+        local coords = ...
+        local ped = PlayerPedId()
+
+        if coords then
+            coords = type(coords) == 'table' and vec3(coords.x, coords.y, coords.z) or coords
+        else
+            coords = GetEntityCoords(ped)
+        end
+
+        local closestPlayers = QBCore.Functions.GetPlayersFromCoords(coords)
+        local closestDistance, closestPlayer = -1, -1
+
+        for i = 1, #closestPlayers do
+            if closestPlayers[i] ~= PlayerId() and closestPlayers[i] ~= -1 then
+                local pos = GetEntityCoords(GetPlayerPed(closestPlayers[i]))
+                local distance = #(pos - coords)
+                if closestDistance == -1 or closestDistance > distance then
+                    closestPlayer = closestPlayers[i]
+                    closestDistance = distance
+                end
+            end
+        end
+        return closestPlayer, closestDistance
+    end
+end
+
+local StringCharset = {}
+local NumberCharset = {}
+
+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
+
+-- String Functions
+
+function QBCore.Functions.RandomStr(length)
+    local result = ''
+    for i = 1, length do
+        result = result .. StringCharset[math.random(1, #StringCharset)]
+    end
+    return result
+end
+
+function QBCore.Functions.SplitStr(str, delimiter)
+    local result = {}
+    local from = 1
+    local delim_from, delim_to = string.find(str, delimiter, from)
+    while delim_from do
+        result[#result + 1] = string.sub(str, from, delim_from - 1)
+        from = delim_to + 1
+        delim_from, delim_to = string.find(str, delimiter, from)
+    end
+    result[#result + 1] = string.sub(str, from)
+    return result
+end
+
+function QBCore.Functions.Trim(value)
+    if not value then return nil end
+    return (string.gsub(value, '^%s*(.-)%s*$', '%1'))
+end
+
+function QBCore.Functions.FirstToUpper(value)
+    if not value then return nil end
+    return (value:gsub('^%l', string.upper))
+end
+
+function QBCore.Functions.SplitLines(str)
+    local lines = {}
+    for line in str:gmatch('[^\r\n]+') do
+        table.insert(lines, line)
+    end
+    return lines
+end
+
+function QBCore.Functions.NormalizeString(str)
+    return str:gsub('[^%w]', ''):lower()
+end
+
+-- Number Functions
+
+function QBCore.Functions.RandomInt(length)
+    local result = ''
+    for i = 1, length do
+        result = result .. NumberCharset[math.random(1, #NumberCharset)]
+    end
+    return result
+end
+
+function QBCore.Functions.Round(value, numDecimalPlaces)
+    if not numDecimalPlaces then return math.floor(value + 0.5) end
+    local power = 10 ^ numDecimalPlaces
+    return math.floor((value * power) + 0.5) / (power)
+end
+
+function QBCore.Functions.Clamp(value, min, max)
+    return math.max(min, math.min(value, max))
+end
+
+-- Table Functions
+
+function QBCore.Functions.TableLength(tbl)
+    local count = 0
+    for _ in pairs(tbl) do count = count + 1 end
+    return count
+end
+
+function QBCore.Functions.ShuffleTable(tbl)
+    for i = #tbl, 2, -1 do
+        local j = math.random(1, i)
+        tbl[i], tbl[j] = tbl[j], tbl[i]
+    end
+    return tbl
+end
+
+function QBCore.Functions.DeepCopy(tbl)
+    if type(tbl) ~= 'table' then return tbl end
+    local copy = {}
+    for k, v in pairs(tbl) do
+        copy[k] = QBCore.Functions.DeepCopy(v)
+    end
+    return copy
+end
+
+function QBCore.Functions.ContainsKey(tbl, key)
+    return tbl[key] ~= nil
+end
+
+function QBCore.Functions.Contains(tbl, value)
+    for _, v in pairs(tbl) do
+        if v == value then return true end
+    end
+    return false
+end
+
+function QBCore.Functions.MergeTables(tbl1, tbl2)
+    local merged = QBCore.Functions.DeepCopy(tbl1)
+    for k, v in pairs(tbl2) do
+        merged[k] = v
+    end
+    return merged
+end
+
+function QBCore.Functions.ReverseTable(tbl)
+    local reversed = {}
+    for i = #tbl, 1, -1 do
+        table.insert(reversed, tbl[i])
+    end
+    return reversed
+end
+
+function QBCore.Functions.RandomWeightedChoice(choices)
+    local totalWeight = 0
+    for _, choice in pairs(choices) do
+        totalWeight = totalWeight + choice.weight
+    end
+
+    local rand = math.random() * totalWeight
+    local cumulative = 0
+
+    for key, choice in pairs(choices) do
+        cumulative = cumulative + choice.weight
+        if rand <= cumulative then return key, choice end
+    end
+end
+
+function QBCore.Functions.GetRandomElement(tbl)
+    return tbl[math.random(1, #tbl)]
+end
+
+function QBCore.Functions.PrintTable(tbl, indent)
+    indent = indent or 0
+    if type(tbl) == 'table' then
+        for k, v in pairs(tbl) do
+            local tblType = type(v)
+            local formatting = ('%s ^3%s:^0'):format(string.rep('  ', indent), k)
+            if tblType == 'table' then
+                print(formatting)
+                QBCore.Functions.PrintTable(v, indent + 1)
+            elseif tblType == 'boolean' then
+                print(('%s^1 %s ^0'):format(formatting, tostring(v)))
+            elseif tblType == 'function' then
+                print(('%s^9 %s ^0'):format(formatting, tostring(v)))
+            elseif tblType == 'number' then
+                print(('%s^5 %s ^0'):format(formatting, v))
+            elseif tblType == 'string' then
+                print(("%s ^2'%s' ^0"):format(formatting, v))
+            else
+                print(('%s^2 %s ^0'):format(formatting, tostring(v)))
+            end
+        end
+    else
+        print(('%s^0 %s'):format(string.rep('  ', indent), tostring(tbl)))
+    end
+end
+
+function QBCore.Functions.Debug(tbl, indent, resource)
+    local resource_name = resource or GetInvokingResource() or 'qb-core'
+    print(('\x1b[4m\x1b[36m[ %s : DEBUG]\x1b[0m'):format(resource_name))
+    QBCore.Functions.PrintTable(tbl, indent)
+    print('\x1b[4m\x1b[36m[ END DEBUG ]\x1b[0m')
+end
+
+function QBCore.Functions.ShowError(resource, msg)
+    local resource_name = resource or GetInvokingResource() or 'qb-core'
+    print('\x1b[31m[' .. resource_name .. ':ERROR]\x1b[0m ' .. msg)
+end
+
+function QBCore.Functions.ShowSuccess(resource, msg)
+    local resource_name = resource or GetInvokingResource() or 'qb-core'
+    print('\x1b[32m[' .. resource_name .. ':LOG]\x1b[0m ' .. msg)
+end
+
+function QBCore.Functions.IsFunction(value)
+    if type(value) == 'table' then
+        return value.__cfx_functionReference ~= nil and type(value.__cfx_functionReference) == 'string'
+    end
+    return type(value) == 'function'
+end

shared/lua/loader.lua

@@ -0,0 +1,70 @@
+local resourceName = GetCurrentResourceName()
+
+-- Load Config
+
+if IsDuplicityVersion() then
+    local configData = LoadResourceFile(resourceName, 'shared/json/config.json')
+    if not configData then return print('^1[QBCore] Failed to Load Config JSON File') end
+    QBCore.Config = json.decode(configData) or {}
+    print('^2[QBCore] Loaded Config.json')
+end
+
+-- Load Vehicles
+
+local Vehicles = LoadResourceFile(resourceName, 'shared/json/vehicles.json')
+if not Vehicles then return print('^1[QBCore] Failed to Load Vehicles JSON File') end
+Vehicles = json.decode(Vehicles)
+for i = 1, #Vehicles do
+    local hash = joaat(Vehicles[i].model)
+    QBCore.Shared.Vehicles[Vehicles[i].model] = {
+        spawncode = Vehicles[i].model,
+        name = Vehicles[i].name,
+        brand = Vehicles[i].brand,
+        model = Vehicles[i].model,
+        price = Vehicles[i].price,
+        category = Vehicles[i].category,
+        hash = hash,
+        type = Vehicles[i].type,
+        shop = Vehicles[i].shop
+    }
+    QBCore.Shared.VehicleHashes[hash] = QBCore.Shared.Vehicles[Vehicles[i].model]
+end
+print('^2[QBCore] Loaded Vehicles.json')
+
+-- Load Jobs
+
+local Jobs = LoadResourceFile(resourceName, 'shared/json/jobs.json')
+if not Jobs then return print('^1[QBCore] Failed to Load Jobs JSON File') end
+QBCore.Shared.Jobs = json.decode(Jobs) or {}
+print('^2[QBCore] Loaded Jobs.json')
+
+-- Load Gangs
+
+local Gangs = LoadResourceFile(resourceName, 'shared/json/gangs.json')
+if not Gangs then return print('^1[QBCore] Failed to Load Gangs JSON File') end
+QBCore.Shared.Gangs = json.decode(Gangs) or {}
+print('^2[QBCore] Loaded Gangs.json')
+
+-- Load Items
+
+local Items = LoadResourceFile(resourceName, 'shared/json/items.json')
+if not Items then return print('^1[QBCore] Failed to Load Items JSON File') end
+QBCore.Shared.Items = json.decode(Items) or {}
+print('^2[QBCore] Loaded Items.json')
+
+-- Load Weapons
+
+local Weapons = LoadResourceFile(resourceName, 'shared/json/weapons.json')
+if not Weapons then return print('^1[QBCore] Failed to Load Weapons JSON File') end
+Weapons = json.decode(Weapons)
+for i = 1, #Weapons do
+    local weaponHash = joaat(Weapons[i].name)
+    QBCore.Shared.Weapons[weaponHash] = {
+        name = Weapons[i].name,
+        label = Weapons[i].label,
+        weapontype = Weapons[i].weapontype,
+        ammotype = Weapons[i].ammotype,
+        damagereason = Weapons[i].damagereason
+    }
+end
+print('^2[QBCore] Loaded Weapons.json')