local meta = FindMetaTable("Player")
if !meta then return end

require("tmysql")

DB = {}

// Login info.
local HOST = "mysql.xenonservers.com"
local PORT = 3306
local NAME = "kunden_53984"
local USERNAME = "kunden_53984"
local PASSWORD = "selthiondatabase"

// Connect.
function Connect()
    tmysql.initialize( HOST, NAME , PASSWORD, USERNAME, PORT, 2, 2)
end
concommand.Add("mysql_connect", Connect)

// Create a new account.
function DB.NewAccount( pl )
    local steamid = pl:SteamID()
    local name = pl:Name()
    local donator = 0
    local title = "Guest"
    tmysql.query("INSERT INTO db_users (steamid, name, donator, money, title) VALUES ('"..steamid.."', '"..name.."', '0', '0', 'Guest'")
    local query = tmysql.query("SELECT name, donator, money, title FROM db_users WHERE steamid = '"..steamid.."'")

        if query then
            DB.LoadAccount( pl )
            pl:ChatPrint("Your account has loaded.")
        else
            pl:ChatPrint("[Mysql] ERROR: Kicking you...")
            pl:Kick("Mysql connections error!")
        end
end

// Load an existing account.
function DB.LoadAccount( pl )
    pl.PlayerData = {}

    steamid = pl:SteamID()
    pl.PlayerData["money"] = tmysql.query("SELECT money FROM db_users WHERE steamid = '"..steamid.."'")
    pl.PlayerData["title"] = tmysql.query("SELECT title FROM db_users WHERE steamid = '"..steamid.."'")
    pl.PlayerData["donator"] = tmysql.query("SELECT donator FROM db_users WHERE steamid = '"..steamid.."'")

    pl:ChatPrint("Your account has loaded.")
end

// Save an account.
function DB.SaveAccount( pl )
    name = pl:Name()
    steamid = pl:SteamID()
    money = pl.PlayerData["money"]
    VIP = pl.PlayerData["donator"]
    title = pl.PlayerData["title"]

    tmysql.query("UPDATE db_users SET name = "..name.." WHERE steamid = '"..steamid.."'")
    tmysql.query("UPDATE db_users SET money = "..money.." WHERE steamid = '"..steamid.."'")
    tmysql.query("UPDATE db_users SET donator = "..VIP.." WHERE steamid = '"..steamid.."'")
    tmysql.query("UPDATE db_users SET title = "..title.." WHERE steamid = '"..steamid.."'")
end

// Check if we have the player in our database or not..
function Player( pl )
    SteamID = pl:SteamID()
    local Player = tmysql.query("SELECT steamid, name, donator, money, title FROM coins WHERE steamid = '"..SteamID.."'")

    if Player then
        DB.LoadAccount( pl )
        pl:ChatPrint("[Mysql] Account found for "..pl:Name().." with steamid "..pl:SteamID()..".")
    else
        DB.NewAccount( pl )
        pl:ChatPrint("[Mysql] No account found for "..pl:Name().." , creating one...")
    end
end

function SQL( pl )
    SteamID = pl:SteamID()
    Player( pl )
end
concommand.Add("MYSQL", SQL)