-- -- highscore.lua -- -- Contains the highscore module. Essentially the database -- store for the addon, using Ace3 DB. -- -- This module also has various getters for the GUI to grab -- data out of the database. -- local addonName, addonTable = ... -- Global functions for faster access local tinsert = tinsert; local tContains = tContains; local sort = sort; local random = random; local format = format; -- Set up module local addon = addonTable[1]; local highscore = addon:NewModule("highscore", "AceEvent-3.0", "AceTimer-3.0") addon.highscore = highscore; -- db defaults addon.dbDefaults.realm.modules["highscore"] = { ["guilds"] = { ["*"] = { -- guildName ["zones"] = { ["*"] = { -- zoneId ["difficulties"] = { ["*"] = { -- difficultyId ["encounters"] = { ["*"] = { -- encounterId --[[ playerParses is a list of objects: { playerId = "", role = "", specName = "", itemLevel = 0, (damage) = 0, (healing) = 0, groupParseId = "" } NOTE: damage is included for role TANK or DAMAGER. healing is included for role HEALER. --]] playerParses = {} } } } } } } } }, ["zones"] = { ["*"] = { -- zoneId zoneName = nil } }, ["difficulties"] = { ["*"] = { -- difficultyId difficultyName = nil } }, ["encounters"] = { ["*"] = { -- encounterId encounterName = nil } }, ["players"] = { ["*"] = { -- playerId name = nil, class = nil } }, ["groupParses"] = { -- These can not have a default value as we are generating -- keys. We have to be able to test for existence. --[[ ["*"] = { -- groupParseId startTime = 0, duration = 0, guildName = "", zoneId = 0, difficultyId = 0, encounterId = 0, } --]] } } -- Constants local TRACKED_ZONE_IDS = { 994, -- Highmaul 988 -- Blackrock Foundry } -- Function for convering a database representation of -- a parse to a parse that can be returned to users. -- Copies all values and adds calculated once (like dps) local function getReturnableParse(db, parse) local parseCopy = {}; for key, val in pairs(parse) do parseCopy[key] = val; end -- Get duration, startTime from the group parse local groupParse = db.groupParses[parse["groupParseId"]] parseCopy["duration"] = groupParse.duration; parseCopy["startTime"] = groupParse.startTime; parseCopy["groupParseId"] = nil -- Get player name and class parseCopy["name"] = db.players[parse["playerId"]].name; parseCopy["class"] = db.players[parse["playerId"]].class; -- Calculate dps/hps parseCopy["dps"] = 0; parseCopy["hps"] = 0; if parseCopy["duration"] > 0 then if parseCopy["role"] == "DAMAGER" or parseCopy["role"] == "TANK" then parseCopy["dps"] = parseCopy["damage"] / parseCopy["duration"]; elseif parseCopy["role"] == "HEALER" then parseCopy["hps"] = parseCopy["healing"] / parseCopy["duration"]; end end return parseCopy; end local function generateRandomKey() local r1 = random(0, 1000); local r2 = random(0, 1000); local r3 = random(0, 1000); -- 1000^3 = 1´000´000´000, should be enough for now... return format("%x-%x-%x", r1, r2, r3); end local function addGroupParse(db, startTime, duration) -- Find a new unique key for the raid parse local key = generateRandomKey(); while db.groupParses[key] do key = generateRandomKey(); end db.groupParses[key] = { startTime = startTime, duration = duration }; return key end local function addZone(db, zoneId, zoneName) db.zones[zoneId].zoneName = zoneName; end local function addDifficulty(db, difficultyId, difficultyName) db.difficulties[difficultyId].difficultyName = difficultyName; end local function addEncounter(db, encounterId, encounterName) db.encounters[encounterId].encounterName = encounterName; end local function addPlayer(db, playerId, playerName, playerClass) db.players[playerId].name = playerName; db.players[playerId].class = playerClass; end local function getParsesTable(db, guildName, zoneId, difficultyId, encounterId) return db .guilds[guildName] .zones[zoneId] .difficulties[difficultyId] .encounters[encounterId] .playerParses; end local function addEncounterParseForPlayer(parsesTable, player, groupParseId) local parse = { playerId = player.id, role = player.role, specName = player.specName, itemLevel = player.itemLevel, groupParseId = groupParseId } -- Only store damage for dps/tanks and only healing for healers if player.role == "DAMAGER" or player.role == "TANK" then parse.damage = player.damage; elseif player.role == "HEALER" then parse.healing = player.healing; else return; end tinsert(parsesTable, parse); end function highscore:AddEncounterParsesForPlayers(guildName, encounter, players) local zoneId = encounter.zoneId; local zoneName = encounter.zoneName; local encounterId = encounter.id; local encounterName = encounter.name; local difficultyId = encounter.difficultyId; local difficultyName = encounter.difficultyName; local startTime = encounter.startTime; local duration = encounter.duration; assert(guildName) assert(zoneId) assert(zoneName) assert(encounterId) assert(encounterName) assert(difficultyId) assert(difficultyName) assert(startTime) assert(duration) assert(players) if not tContains(TRACKED_ZONE_IDS, zoneId) then self:Debug("AddEncounterParsesForPlayers: Current zone not not in tracked zones"); return end -- Add zone, difficulty and encounter info addZone(self.db, zoneId, zoneName); addDifficulty(self.db, difficultyId, difficultyName); addEncounter(self.db, encounterId, encounterName); -- Add a group parse entry, holding data shared between all players local groupParseId = addGroupParse(self.db, startTime, duration); local parsesTable = getParsesTable(self.db, guildName, zoneId, difficultyId, encounterId); for _, player in ipairs(players) do self:Debug(format("addEncounterParseForPlayer: %s", player.name)); addPlayer(self.db, player.id, player.name, player.class); addEncounterParseForPlayer(parsesTable, player, groupParseId) end end -- Returns (array of parses, numParses) function highscore:GetParses(guildName, zoneId, difficultyId, encounterId, role, sortBy) if (role ~= "TANK" and role ~= "HEALER" and role ~= "DAMAGER") then return {}, 0; end if not sortBy then if role == "TANK" or role == "DAMAGER" then sortBy = "dps" elseif role == "HEALER" then sortBy = "hps" end end local parsesTable = getParsesTable(self.db, guildName, zoneId, difficultyId, encounterId); -- Get a *copy* of all parses for the specified role local parses = {}; local numParses = 0; for _, parse in ipairs(parsesTable) do if parse.role == role then local parseCopy = getReturnableParse(self.db, parse); tinsert(parses, parseCopy); numParses = numParses + 1; end end sort(parses, function(a, b) return a[sortBy] > b[sortBy]; end) return parses, numParses; end -- Returns (array of {encounterId => encounterName}, numEncounters) function highscore:GetEncounters(guildName, zoneId, difficultyId) if not guildName or not zoneId or not difficultyId then return {}, 0; end local encounters = {}; local numEncounters = 0; local difficultiesTable = self.db.guilds[guildName].zones[zoneId].difficulties; for encounterId, _ in pairs(difficultiesTable[difficultyId].encounters) do local encounterName = self.db.encounters[encounterId].encounterName; encounters[encounterId] = encounterName; numEncounters = numEncounters + 1; end return encounters, numEncounters; end -- Returns (array of {difficultyId => difficultyName}, numDifficulties) function highscore:GetDifficulties(guildName, zoneId) if not guildName or not zoneId then return {}, 0; end local difficulties = {}; local numDifficulties = 0; local difficultiesTable = self.db.guilds[guildName].zones[zoneId].difficulties; for difficultyId, _ in pairs(difficultiesTable) do local difficultyName = self.db.difficulties[difficultyId].difficultyName; difficulties[difficultyId] = difficultyName; numDifficulties = numDifficulties + 1; end return difficulties, numDifficulties; end -- Returns (array of {zoneId => zoneName}, numZones) function highscore:GetZones(guildName) if not guildName then return {}, 0; end local zones = {}; local numZones = 0; for zoneId, _ in pairs(self.db.guilds[guildName].zones) do local zoneName = self.db.zones[zoneId].zoneName; zones[zoneId] = zoneName; numZones = numZones + 1; end return zones, numZones; end -- Returns (array of {guildId => guildName}, numGuilds) function highscore:GetGuilds() local guildNames = {}; local numGuilds = 0; for guildName, _ in pairs(self.db.guilds) do -- Actually guildId == guildName guildNames[guildName] = guildName; numGuilds = numGuilds + 1; end return guildNames, numGuilds; end -- Returns the name stored for the encounter id, or nil -- if no encounters with that id. function highscore:GetEncounterNameById(encounterId) return self.db.encounters[encounterId].encounterName; end -- Returns the name stored for the difficulty id, or nil -- if no difficulty with that id. function highscore:GetDifficultyNameById(difficultyId) return self.db.difficulties[difficultyId].difficultyName; end -- Returns the name stored for the zone id, or nil -- if no zone with that id. function highscore:GetZoneNameById(zoneId) return self.db.zones[zoneId].zoneName; end -- Returns the name stored for the guild id, or nil -- if no guild with that id. function highscore:GetGuildNameById(guildId) -- As our implementation uses the guild name as -- id, we will simply return the value passed in. -- Checking for actual existance is not easy due -- to aceDB defaults and is therefore not done. return guildId; end -- Removes parses that is older than "olderThanDate". If minParsesPerPlayer -- is > 0, that many parses will be kept for the player/encounter combination. function highscore:PurgeParses(olderThanDate, minParsesPerPlayer) local oldGroupParseIds = {}; for id, groupParse in pairs(self.db.groupParses) do if groupParse.startTime < olderThanDate then tinsert(oldGroupParseIds, id); end end for _, id in ipairs(oldGroupParseIds) do local groupParse = self.db.groupParses[id]; local guildName = groupParse.guildName; local zoneId = groupParse.zoneId; local difficultyId = groupParse.difficultyId; local encounterId = groupParse.encounterId; self.db.groupParses[id] = nil; local parses = getParsesTable(self.db, guildName, zoneId, difficultyId, encounterId); if minParsesPerPlayer == 0 then for key, parse in pairs(parses) do if parse.groupParseId == id then parses[key] = nil; end end else end if next(parses) == nil then self:Debug("All parses removed for", guildName, zoneId, difficultyId, encounterId); self.db.guilds[guildName].zones[zoneId].difficulties[difficultyId].encounters[encounterId] = nil; end if next(self.db.guilds[guildName].zones[zoneId].difficulties[difficultyId].encounters) == nil then self.db.guilds[guildName].zones[zoneId].difficulties[difficultyId] = nil; end if next(self.db.guilds[guildName].zones[zoneId].difficulties) == nil then self.db.guilds[guildName].zones[zoneId] = nil; end if next(self.db.guilds[guildName].zones) then self.db.guilds[guildName] = nil; end end end function highscore:OnEnable() self.db = addon.db.realm.modules["highscore"]; end function highscore:OnDisable() self.db = nil; end