modo = nil
DataGM = {}

outputServerLog('saveMJ iniciado')

addEventHandler('onResourceStart',root,function(recurso)
    if recurso == getThisResource() then
        for _,v in ipairs(getResources()) do
            if v.state == 'running' and v:getInfo('type') == 'gamemode' then
                modo = v.name
                break
            end
        end
        init()
    end
    if recurso:getInfo('type') ~= 'gamemode' then return end
    if recurso.state == 'running' then
        if not DataGM[modo] then
          DataGM[modo] = {}
        end
        SetDataGM(modo)
        modo = recurso.name
        if not DataGM[modo] then
          DataGM[modo] = {}
        end
        SetDataPlayer(modo)
    end
end)

function SetDataPlayer(gm)
    for k,player in ipairs (getElementsByType('player')) do
        if DataGM[gm][player] then
            player:setData('mj_victoria',DataGM[gm][player].victorias)
            player:setData('mj_derrotas',DataGM[gm][player].derrotas)
        else
            DataGM[gm][player] = {}
            DataGM[gm][player]['victorias'] = 0
            DataGM[gm][player]['derrotas'] = 0
            player:setData('mj_victoria',0)
            player:setData('mj_derrotas',0)
        end
    end
end

function SetDataGM(gm)
    for k,player in ipairs (getElementsByType('player')) do
        if not DataGM[gm][player] then
            DataGM[gm][player] = {}
        end
            DataGM[gm][player]['victorias'] = player:getData('mj_victoria') or 0
            DataGM[gm][player]['derrotas'] = player:getData('mj_derrotas') or 0
    end
end

function init()
    local qh = dbQuery( DB.Con, "SELECT * FROM statsmj ")
    local result = dbPoll( qh, -1 )
    if #result == 0 then
        for k,pj in ipairs(getElementsByType('player')) do
            local id = pj:getData('id_user')
            if id and modo then
                DB.InsertorUpdateStatsMJ(id,pj.name,modo,pj:getData('mj_victoria') or 0,pj:getData('mj_derrotas') or 0)
            end
        end
    else
        local jugadores = getElementsByType('player');
        if #jugadores == 0 then return end
            for k,l in ipairs(result) do
                outputDebugString(tostring(l.user_id))
                outputDebugString(tostring(l.minijuego))
                local minijuego = l.minijuego
                if not DataGM[minijuego] then
                    DataGM[minijuego] = {}
                end
                for k,pj in ipairs(jugadores) do
                local id = pj:getData('id_user')
                if id and tostring(id) == tostring(l.user_id) then
                    DataGM[minijuego][pj]={}
                    local victorias = l.victorias
                    local derrotas = l.derrotas
                    if pj:getData('mj_victoria')and pj:getData('mj_victoria') > (tonumber(victorias) or 0) then
                        victorias = pj:getData('mj_victoria')
                    end
                    if pj:getData('mj_derrotas')and pj:getData('mj_derrotas') > (tonumber(derrotas) or 0) then
                        derrotas = pj:getData('mj_derrotas')
                    end
                    DataGM[minijuego][pj]['victorias'] = victorias
                    DataGM[minijuego][pj]['derrotas'] = derrotas
                    pj:setData('mj_victoria',l.victorias)
                    pj:setData('mj_derrotas',l.derrotas)
                end
            end
        end
    end
end

function Join()
    if not DataGM[modo] then DataGM[modo] = {} end
    DataGM[modo][source]={}
    DataGM[modo][source]['victorias'] = 0
    DataGM[modo][source]['derrotas'] = 0
    source:setData('mj_victoria',0)
    source:setData('mj_derrotas',0)
end
addEventHandler("onPlayerJoin", root, Join)

function login(_,account)
    local cuenta = getAccountName(account)
    outputDebugString(cuenta)
    local result = nil
    local qh2 = dbQuery( DB.Con, "SELECT id FROM dataPlayer where accountname = ?",cuenta)
    result = dbPoll( qh2, -1 )
    if #result == 0 then
        DB.RegisterUser(source.name,cuenta)
        local qh = dbQuery( DB.Con, "SELECT id FROM dataPlayer where accountname = ?",cuenta)
        result = dbPoll( qh, -1 )
    end
    for k,l in ipairs(result) do
        source:setData('id_user',l.id)
        break
    end
end
addEventHandler('onPlayerLogin',root,login)

function quitLogout()
    local id = source:getData('id_user');
    if not id then return end
    outputServerLog('[MJ-System]Guardando Datos de jugador')
    outputDebugString('[MJ-System]Guardando Datos de jugador')
    local victthis = source:getData('mj_victoria') or 0
    local derrthis = source:getData('mj_derrotas') or 0
    local name = source.name
    for k,data in pairs(DataGM) do
        if data[source] then
            local vict = data[source]['victorias'] or 0
            local derrotas = data[source]['derrotas'] or 0
            if tostring(k) == modo then
                vict = victthis
                derrotas = derrthis
            end
            outputDebugString(derrotas)
            DB.InsertorUpdateStatsMJ(id,name,tostring(k),vict,derrotas)
        end
    end
end
addEventHandler('onPlayerQuit',root,quitLogout)
addEventHandler('onPlayerLogout',root,quitLogout)

function AgregarData(jugador,tipo)
    if tipo == 'victoria' then
        jugador:setData('victorias', (jugador:getData('') or 0 ) + 1)
    elseif tipo == 'derrota' then
        jugador:setData('derrotas', (jugador:getData('') or 0 ) + 1)
    end
end

--srun getPlayerFromName('Dr.Chapatin'):setData('mj_victoria',10)
--srun getPlayerFromName('Dr.Chapatin'):getData('mj_victoria')