DutyColShapes = { }
function createDutyColShape(posX, posY, posZ, size, interior, dimension, factionID, locationID)
    tempShape = createColSphere(tonumber(posX), tonumber(posY), tonumber(posZ), tonumber(size))
    setElementDimension(tempShape, tonumber(dimension) or 0)
    setElementInterior(tempShape, tonumber(interior) or 0)
    if tempShape then
        if type(DutyColShapes[tonumber(factionID)]) ~= "table" then
            DutyColShapes[tonumber(factionID)] = { }
        end
        DutyColShapes[tonumber(factionID)][tonumber(locationID)] = tempShape
        setElementData(resourceRoot, "DutyColShapes", DutyColShapes)
        return true
    end
end

function destroyDutyColShape(factionID, locationID)
    if DutyColShapes[tonumber(factionID)][tonumber(locationID)] then
        destroyElement(DutyColShapes[tonumber(factionID)][tonumber(locationID)])
        DutyColShapes[tonumber(factionID)][tonumber(locationID)] = nil
        setElementData(resourceRoot, "DutyColShapes", DutyColShapes)
        return true
    end
end

-- -------------------------- --
-- General checking functions -- Revised by Chaos for OwlGaming < Old way was shitty less loops now
-- -------------------------- --

function fetchAvailablePackages( targetPlayer )
    local availablePackages = { }
    local factionID = tonumber(getElementData(targetPlayer, "faction"))
    local factionDuty = getElementData(resourceRoot, "factionDuty")
    local factionLocations = getElementData(resourceRoot, "factionLocations")
    local DutyColShapes = getElementData(resourceRoot, "DutyColShapes")

        if factionDuty[factionID] then
            for i, factionPackage in pairs ( factionDuty[factionID] ) do -- Loop all the faction packages
                local found = false
                for index, v in pairs ( factionPackage[4] ) do -- Loop all the colshapes of the factionpackage
                    if isElement(DutyColShapes[factionID][tonumber(index)]) then
                        if isElementWithinColShape( targetPlayer, DutyColShapes[factionID][tonumber(index)] ) then
                            found = true
                            break  -- We found this package already, no need to search the other colshapes
                            end
                       end
                end

                local veh = getPedOccupiedVehicle(targetPlayer) -- Still can't find it? Lets see if they are in a duty vehicle
                if not found and veh then
                    local vehid = getElementData(veh, "dbid")
                    for k,v in pairs(factionLocations[factionID]) do
                        if tonumber(vehid) == tonumber(v[9]) then -- Yep vehicle ID matches!
                            found = true
                        end
                    end
                end

                if found and canPlayerUseDutyPackage(targetPlayer, i) then
                    table.insert(availablePackages, factionPackage)
                end
            end
        end
    local resource = getResourceRootElement(getResourceFromName("faction-system"))
    if resource then
        allowList = getElementData(resource, "dutyAllowTable")
        for k,v in pairs(allowList) do
            if tonumber(v[1]) == factionID then
                key = k
                break
            end
        end
        allowList = allowList[key][3]
    end
    return availablePackages, allowList
end

function getGrant(thePlayer, grantID, factionID)
    local factionID = tonumber(factionID)
    local factionDuty = getElementData(resourceRoot, "factionDuty")
    return factionDuty[factionID][tonumber(grantID)]
end

function canPlayerUseDutyPackage(targetPlayer, packageID)
    local package = tonumber(packageID)
    local playerPackagePermission = getElementData(targetPlayer, "factionPackages")
    if playerPackagePermission then
        for index, permissionID in ipairs(playerPackagePermission) do
            if (tonumber(permissionID) == tonumber(package)) then
                return true
            end
        end
    end
    return false
end

function getFactionPackages( factionID )
    if not factionID or not tonumber( factionID ) then
        return false
    end
    local factionDuty = getElementData(resourceRoot, "factionDuty")

    return factionDuty[tonumber(factionID)]
end
addEvent("onPlayerDuty", true)

addEvent("duty:request", true)
function dutyRequest(grantID, itemTable, skinID)
    local thePlayer = client

    -- Fetch the factionPackage
    local foundPackage = getGrant(thePlayer, grantID, getElementData(thePlayer, "faction"))
    
    if foundPackage and canPlayerUseDutyPackage(thePlayer, foundPackage[1]) then
        -- We've got an auth for the package
        
        -- Now we check the contents
        for itemIndexID, itemTableContent in ipairs(itemTable) do
            local found = false
            
            for aItemIndexID, aItemTableContent in pairs(foundPackage[5]) do
                if aItemTableContent[1] == itemTableContent[1] then
                    found = true
                    break
                end
            end
            
            if not found then
                outputChatBox("Error.", thePlayer)
                return false
            end
        end
        
        for itemIndexID, itemTableContent in ipairs(itemTable) do
            if itemTableContent[2] > 0 then -- its a real item
                exports.global:giveItem(thePlayer, itemTableContent[2], itemTableContent[3]) 
            else -- Its a weapon :O!
                if itemTableContent[2] == -100 then
                    setPedArmor(thePlayer, itemTableContent[3])
                else
                    local hasAmmo = true
                    local characterDatabaseID = getElementData(thePlayer, "account:character:id")
                    local gtaWeaponID = tonumber(itemTableContent[2]) - tonumber(itemTableContent[2]) - tonumber(itemTableContent[2])
                    local weaponSerial = exports.global:createWeaponSerial(2, characterDatabaseID)
                    exports.global:giveItem(thePlayer, 115, gtaWeaponID ..":".. weaponSerial ..":" .. getWeaponNameFromID ( gtaWeaponID ) .. " (D)"  ) 
                    
                    local gtaweaponcap = exports.weaponcap:getGTACap(gtaWeaponID)
                    local packsToGive = math.ceil( tonumber(itemTableContent[3]) / gtaweaponcap)
                    
                    if (getSlotFromWeapon ( gtaWeaponID ) < 2) then
                        hasAmmo = false
                    elseif ( getSlotFromWeapon ( gtaWeaponID ) == 9) then -- Spraycan, Fire Extinguisher, Camera
                        hasAmmo = false
                    end

                    if packsToGive > 0 and hasAmmo then
                        for i=1,packsToGive do 
                            exports.global:giveItem(thePlayer, 116, gtaWeaponID ..":".. gtaweaponcap ..":Ammopack for " .. getWeaponNameFromID ( gtaWeaponID ) .. " (D)"  ) 
                        end
                    end
                    
                    
                end
            end
        end
        
        savedSkin = 0
        savedClothing = 0
        if skinID and type(skinID) == 'string' then
            local skinData = split(skinID, ':')
            savedSkin = tonumber(skinData[1])
            setElementModel(thePlayer, savedSkin)
            if #skinData > 1 then
                savedClothing = tonumber(skinData[2])
                setElementData(thePlayer, 'clothing:id', savedClothing)
            else
                setElementData(thePlayer, 'clothing:id', nil)
            end
        end
        
        triggerClientEvent(thePlayer, "onPlayerDuty", thePlayer, true)
        triggerEvent("onPlayerDuty", thePlayer, true)
        exports.anticheat:changeProtectedElementDataEx(thePlayer, "duty", grantID, true)
        exports.mysql:query_free( "UPDATE characters SET skin = '" .. exports.mysql:escape_string(savedSkin) .. "', clothingid = '" .. exports.mysql:escape_string(savedClothing) .. "', duty = '" .. exports.mysql:escape_string(getElementData( thePlayer, "duty" ) or 0 ) .. "' WHERE id = '" .. exports.mysql:escape_string(getElementData( thePlayer, "dbid" )).."'" )    


    end
    return false
end
addEventHandler("duty:request", getRootElement(), dutyRequest)

addEvent("duty:offduty", true)
function dutyOffduty()

    local thePlayer = client or source
    local grantID = getElementData(thePlayer, "duty") or 0
    if tonumber(grantID) > 0 then
        local savedSkin, savedClothing = nil, nil

        setPedArmor(thePlayer, 0)
        local correction = 0
        local items = exports['item-system']:getItems( thePlayer ) -- [] [1] = itemID [2] = itemValue
        for itemSlot, itemCheck in ipairs(items) do
            if (itemCheck[1] == 115) then -- Weapon
                local itemCheckExplode = exports.global:explode(":", itemCheck[2])
                local serialNumberCheck = exports.global:retrieveWeaponDetails(itemCheckExplode[2])
                if (tonumber(serialNumberCheck[2]) == 2) then -- /duty spawned
                    exports['item-system']:takeItemFromSlot(thePlayer, itemSlot - correction, false)
                    correction = correction + 1
                end
            elseif (itemCheck[1] == 116) then
                local checkString = string.sub(itemCheck[2], -4)
                if checkString == " (D)" then -- duty given weapon
                    exports['item-system']:takeItemFromSlot(thePlayer, itemSlot - correction, false)
                    correction = correction + 1
                end
            elseif itemCheck[1] == 16 then
                -- use the first skin as skin to wear
                if not savedSkin then
                    local skinData = split(tostring(itemCheck[2]), ':')
                    savedSkin = tonumber(skinData[1])
                    savedClothing = tonumber(skinData[2])
                end
            end
        end
        
        -- remove duty items
        local foundPackage = getGrant(thePlayer, grantID, getElementData(thePlayer, "faction"))
        if foundPackage then
            for itemIndexID, itemTableContent in ipairs(foundPackage[5]) do
                if itemTableContent[2] > 0 then -- its a real item
                    exports.global:takeItem(thePlayer, itemTableContent[1], itemTableContent[2]) 
                end
            end
        end

        -- reset the skin to the first found in the inventory
        if savedSkin then
            setElementModel(thePlayer, savedSkin)
            setElementData(thePlayer, 'clothing:id', savedClothing)

            exports.mysql:query_free( "UPDATE characters SET skin = '" .. exports.mysql:escape_string(savedSkin) .. "', clothingid = '" .. exports.mysql:escape_string(savedClothing or 0) .. "', duty = '0' WHERE id = '" .. exports.mysql:escape_string(getElementData( thePlayer, "dbid" )).."'" )    
        else
            -- no actual clothes in inventory
            exports['item-system']:doItemGiveawayChecks(thePlayer, 16)

            exports.mysql:query_free( "UPDATE characters SET duty = '0' WHERE id = '" .. exports.mysql:escape_string(getElementData( thePlayer, "dbid" )).."'" )    
        end
        
        exports.anticheat:changeProtectedElementDataEx(thePlayer, "duty", 0, true)
    
        triggerClientEvent(thePlayer, "onPlayerDuty", thePlayer, false)
        triggerEvent("onPlayerDuty", thePlayer, false)
    end
end
addEventHandler("duty:offduty", getRootElement(), dutyOffduty)