------------------------------------------------------------------------------------
--  COMMUNITY CONTRIBUTION FOR CIT2.NET
--  PURPOSE: Feedback for the updates
--  DEVELOPERS: Nikos, Zelda - ( Server side )
------------------------------------------------------------------------------------

local con = dbConnect("mysql", "dbname=;host=", "", "")
-- local con = dbConnect("sqlite", "//feedbacks.db")
dbExec(con, "CREATE TABLE IF NOT EXISTS feedbacks (update_post TEXT, message TEXT)")

function processUpdates(data)
    local cache = {}
    local updates = ""..data..""
    local ent = split(updates, "-") or {}
    for i, v in ipairs(ent) do
        table.insert(cache, ""..i..". "..v)
    end
    return cache
end

function getUpdatesList(player)
    if (isGuestAccount(getPlayerAccount(player))) then
        return false
    end
    if (exports.CITchecking:getPlayerTimeSinceLastOccurence(player, "feedback") < 3000) then
        return false
    end
    local conversion = processUpdates(exports.CITupdatesInfo:getUpdates()) or {}
    exports.CITchecking:setPlayerOccurenceTime(player, "feedback")
    if (#conversion == 0) then
        outputChatBox("The feedback list is not loaded yet, retry later.", player, 255, 0, 0)
    else
        triggerClientEvent(player, "CITfeedback.sendFeedbackList", player, conversion)
    end
end
addCommandHandler("feedback", getUpdatesList)

function sendFeedback(message, update)
    if (isGuestAccount(getPlayerAccount(client))) then
        return false
    end
    local name = getPlayerName(client)
    local accname = getAccountName(getPlayerAccount(client))
    local results = dbPoll(dbQuery(con, "SELECT * FROM feedbacks WHERE update_post=?", update) ,-1)
    if (#results == 0) then
        local cc = "- "..name.." ("..accname..")\n"..message..""
        dbExec(con,"INSERT INTO feedbacks VALUES (?, ?)", update, cc, accname)
        exports.CIThelp:dm("Feedback sended", client, 0, 255, 0)
    else
        if (string.find(results[1]["message"], "("..accname..")")) then
            exports.CIThelp:dm("You have already made a comment to this update.", client, 255, 0, 0)
            return false
        end
        local cc = ""..results[1]["message"].."\n- "..name.." ("..accname..")\n"..message..""
        dbExec(con, "UPDATE feedbacks SET message=? WHERE update_post=?", cc, update)
        exports.CIThelp:dm("Feedback sended", client, 0, 255, 0)
    end
end
addEvent("CITfeedback.sendFeedback", true )
addEventHandler("CITfeedback.sendFeedback", root, sendFeedback)

function getGridData(update)
    local result = dbPoll( dbQuery(con, "SELECT * FROM feedbacks WHERE update_post=?", update) , -1)
    if (type(result) == "table" and #result ~= 0) then
        triggerClientEvent(client, "CITfeedback.sendGridData", client, result[1]["message"])
    else
        triggerClientEvent(client, "CITfeedback.sendGridData", client, "No comments yet.")
    end
end
addEvent("CITfeedback.getGridData", true )
addEventHandler("CITfeedback.getGridData", root, getGridData)

function cleanDB(player)
    if exports.CITadmin:getPlayerAdminLevel(player) == 5 then
        dbExec(con, "DELETE FROM feedbacks")
        exports.CIThelp:dm("Feedback cleaned", player, 255, 255, 0)
    end
end
addCommandHandler("cleancomments", cleanDB)