Exiles/coa-altoholic
3
0
Fork 0
Code Pull Requests Actions Packages Releases 30 Wiki Activity

chore: flatten Altoholic-Addon/ wrapper + add standard .gitignore/.gitattributes

Browse Source 
Each DataStore_* / Altoholic_* addon now lives at the repo root, matching
the Exiles fork-layout convention (one folder per addon, no wrapper dir).
This commit is contained in:
Florian Berthold
2026-05-25 10:59:24 +02:00
parent 7789489aec
commit bbe2492a5b
387 changed files with 2 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files
DataStore/Export/DataStore.xsl
+438
View File
@@ -0,0 +1,438 @@
<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" version="1.0"
xmlns="http://www.w3.org/1999/xhtml">
<xsl:template match="DataStorePage">
<!-- use external layout file -->
<xsl:variable name="Layout" select="@Uses"/>
<html>
<head>
<title>
<xsl:value-of select="@Title" />
</title>
<script src="http://static.wowhead.com/widgets/power.js"></script>
</head>
<body>
<xsl:apply-templates />
</body>
</html>
</xsl:template>
<xsl:template match="*">
<xsl:value-of select="name()" /> : <xsl:value-of select="text()" /><br />
</xsl:template>
<!-- Shared -->
<xsl:template match="Skill">
<xsl:value-of select="@name" /> : <xsl:value-of select="text()" /><br />
</xsl:template>
<xsl:template match="Item">
<xsl:choose>
<xsl:when test="@rarity &lt; 8">
<a class="q{@rarity}" href="http://www.wowhead.com/?item={@id}"><xsl:value-of select="text()"/></a>
</xsl:when>
<xsl:otherwise>
<a href="http://www.wowhead.com/?item={@id}"><xsl:value-of select="text()"/></a>
</xsl:otherwise>
</xsl:choose>
<xsl:if test="@count &gt; 0">
&#x20;x<xsl:value-of select="@count" />
</xsl:if>
<br />
</xsl:template>
<!-- DataStore Achievements -->
<xsl:template match="Achievement">
<a href="http://www.wowhead.com/?achievement={@id}">Achievement <xsl:value-of select="@id"/></a>
Status :
<xsl:choose>
<xsl:when test="text() = 'true'">
Completed on <xsl:value-of select="@completionDate" />
</xsl:when>
<xsl:otherwise>
<xsl:value-of select="text()"/>
</xsl:otherwise>
</xsl:choose>
<br />
</xsl:template>
<xsl:template match="Achievements">
<table border="1" cellpadding="0" cellspacing="0">
<tr>
<td align="center">
<b><xsl:value-of select="name()" /></b>
</td>
</tr>
<tr>
<td>
<xsl:apply-templates select="Achievement" />
</td>
</tr>
</table>
</xsl:template>
<!-- DataStore Auctions -->
<xsl:template match="Auction">
<tr>
<td>
<a href="http://www.wowhead.com/?item={text()}">Item <xsl:value-of select="text()"/></a>
Count : <xsl:value-of select="@count"/>,
<xsl:if test="@highBidder">
Highest Bidder : <xsl:value-of select="@highBidder"/>,
</xsl:if>
<xsl:if test="@ownerName">
Owner : <xsl:value-of select="@ownerName"/>,
</xsl:if>
<xsl:if test="@startPrice">
Starting Price : <xsl:value-of select="@startPrice"/>,
</xsl:if>
<xsl:if test="@bidPrice">
Bid Price : <xsl:value-of select="@bidPrice"/>,
</xsl:if>
Buyout Price : <xsl:value-of select="@buyoutPrice"/>,
Time Left : <xsl:value-of select="@timeLeft"/>
</td>
</tr>
</xsl:template>
<xsl:template match="Auctions|Bids">
<table border="1" cellpadding="0" cellspacing="0">
<tr>
<td align="center">
<b><xsl:value-of select="name()" /></b>
</td>
</tr>
<xsl:apply-templates />
</table>
</xsl:template>
<!-- DataStore Containers -->
<xsl:template match="Content">
<xsl:apply-templates select="Item" />
</xsl:template>
<xsl:template match="Bag|Tab">
<tr>
<td>
<b><xsl:value-of select="name()" /> <xsl:value-of select="@id" /></b><br />
<xsl:apply-templates />
</td>
</tr>
</xsl:template>
<xsl:template match="Containers|Tabs">
<table border="1" cellpadding="0" cellspacing="0">
<tr>
<td align="center">
<b><xsl:value-of select="name()" /></b>
</td>
</tr>
<xsl:apply-templates />
</table>
</xsl:template>
<!-- DataStore Crafts -->
<xsl:template match="Crafts/Category/Spell">
<a href="http://www.wowhead.com/?spell={text()}">Spell <xsl:value-of select="text()"/></a><br />
</xsl:template>
<xsl:template match="Crafts/Category">
<b><xsl:value-of select="@name" /></b><br />
<xsl:apply-templates select="Spell" />
</xsl:template>
<xsl:template match="Crafts">
<b><xsl:value-of select="name()" /></b><br />
<xsl:apply-templates select="Category" />
</xsl:template>
<xsl:template match="Profession">
<tr>
<td align="center">
<b><xsl:value-of select="@name" /></b>
</td>
</tr>
<tr>
<td>
<xsl:apply-templates />
</td>
</tr>
</xsl:template>
<xsl:template match="Professions">
<table border="1" cellpadding="0" cellspacing="0">
<tr>
<td align="center">
<b><xsl:value-of select="name()" /></b>
</td>
</tr>
<xsl:apply-templates select="Profession" />
</table>
</xsl:template>
<!-- DataStore Currencies -->
<xsl:template match="Currency">
<tr>
<td>
<a href="http://www.wowhead.com/?item={@itemID}"><xsl:value-of select="text()"/></a>
</td>
<td>
<xsl:value-of select="@count"/>
</td>
</tr>
</xsl:template>
<xsl:template match="Currencies/Category">
<tr>
<td>
<b><xsl:value-of select="@name" /></b>
</td>
</tr>
<xsl:apply-templates select="Currency" />
</xsl:template>
<xsl:template match="Currencies">
<table border="1" cellpadding="0" cellspacing="0">
<tr>
<td align="center">
<b><xsl:value-of select="name()" /></b>
</td>
</tr>
<xsl:apply-templates select="Category" />
</table>
</xsl:template>
<!-- DataStore Inventory -->
<xsl:template match="Inventory">
<table border="1" cellpadding="0" cellspacing="0">
<tr>
<td align="center">
<b><xsl:value-of select="name()" /></b>
</td>
</tr>
<tr>
<td>
<xsl:apply-templates select="Item" />
</td>
</tr>
</table>
</xsl:template>
<!-- DataStore Mails -->
<xsl:template match="Mail">
<tr>
<td>
<xsl:apply-templates />
</td>
</tr>
</xsl:template>
<xsl:template match="Mails">
<table border="1" cellpadding="0" cellspacing="0">
<tr>
<td align="center">
<b><xsl:value-of select="name()" /></b>
</td>
</tr>
<xsl:apply-templates select="Mail" />
</table>
</xsl:template>
<!-- DataStore Pets -->
<xsl:template match="Mounts/Spell | Companions/Spell">
<a href="http://www.wowhead.com/?spell={text()}"><xsl:value-of select="@name"/></a><br />
</xsl:template>
<xsl:template match="Mounts|Companions">
<table border="1" cellpadding="0" cellspacing="0">
<tr>
<td align="center">
<b><xsl:value-of select="name()" /></b>
</td>
</tr>
<tr>
<td>
<xsl:apply-templates select="Spell" />
</td>
</tr>
</table>
</xsl:template>
<!-- DataStore Quests -->
<!-- Note: for purely practical reasons, the history is not processed at this time (way too long pages, for too little use in this context) -->
<xsl:template match="Quest">
<xsl:choose>
<xsl:when test="@isHeader = 'true'">
<xsl:value-of select="text()" />
</xsl:when>
<xsl:otherwise>
<a href="http://www.wowhead.com/?quest={@id}"><xsl:value-of select="text()"/></a>
</xsl:otherwise>
</xsl:choose>
<br />
</xsl:template>
<xsl:template match="QuestLog">
<table border="1" cellpadding="0" cellspacing="0">
<tr>
<td align="center">
<b>Quest Log</b>
</td>
</tr>
<tr>
<td>
<xsl:apply-templates select="Quest" />
</td>
</tr>
</table>
</xsl:template>
<!-- DataStore Reputations -->
<xsl:template match="Faction">
<xsl:value-of select="text()" /> : <xsl:value-of select="@rank" /> (<xsl:value-of select="@numPoints" />/<xsl:value-of select="@maxPoints" />)
<br />
</xsl:template>
<xsl:template match="Factions">
<table border="1" cellpadding="0" cellspacing="0">
<tr>
<td align="center">
<b>Factions</b>
</td>
</tr>
<tr>
<td>
<xsl:apply-templates select="Faction" />
</td>
</tr>
</table>
</xsl:template>
<!-- DataStore Skills -->
<xsl:template match="Skills/Category">
<td valign="top">
<b><xsl:value-of select="@name" /></b>
<br />
<xsl:apply-templates select="Skill" />
</td>
</xsl:template>
<xsl:template match="Skills">
<table border="1" cellpadding="0" cellspacing="0">
<tr>
<td align="center" colspan="6">
<b>Skills</b>
</td>
</tr>
<tr>
<xsl:apply-templates select="Category" />
</tr>
</table>
</xsl:template>
<!-- DataStore Spells -->
<xsl:template match="School/Spell">
<a href="http://www.wowhead.com/?spell={text()}">Spell <xsl:value-of select="text()"/></a>&#x20;<xsl:value-of select="@rank"/>
<br />
</xsl:template>
<xsl:template match="School">
<td valign="top">
<b><xsl:value-of select="@name" /></b>
<br />
<xsl:apply-templates select="Spell" />
</td>
</xsl:template>
<xsl:template match="Spells">
<table border="1" cellpadding="0" cellspacing="0">
<tr>
<td align="center" colspan="4">
<b>Spellbook</b>
</td>
</tr>
<tr>
<xsl:apply-templates select="School" />
</tr>
</table>
</xsl:template>
<!-- DataStore Stats -->
<xsl:template match="Stats/Spell">
<xsl:value-of select="name()" /> : <xsl:value-of select="text()" />
<br />
</xsl:template>
<xsl:template match="Stats">
<b><xsl:value-of select="name()" /> :</b><br />
<xsl:apply-templates />
</xsl:template>
<!-- DataStore Talents -->
<xsl:template match="Glyph">
<a href="http://www.wowhead.com/?spell={@spellID}">Glyph <xsl:value-of select="text()"/></a>&#x20;
Spec: <xsl:value-of select="@spec"/>, Slot: <xsl:value-of select="@slot"/>, Type: <xsl:value-of select="@glyphType"/>
<br />
</xsl:template>
<xsl:template match="Glyphs">
<table border="1" cellpadding="0" cellspacing="0">
<tr>
<td align="center">
<b><xsl:value-of select="name()" /></b>
</td>
</tr>
<tr>
<td>
<xsl:apply-templates select="Glyph" />
</td>
</tr>
</table>
</xsl:template>
<xsl:template match="Talent">
[<xsl:value-of select="text()" />] : <xsl:value-of select="@pointsSpent"/>/<xsl:value-of select="@maximumRank"/><br />
</xsl:template>
<xsl:template match="TalentTree">
<td valign="top">
<b><xsl:value-of select="@name" /> (<xsl:value-of select="@spec" />)</b>
<br />
<xsl:apply-templates select="Talent" />
</td>
</xsl:template>
<xsl:template match="TalentTrees">
<table border="1" cellpadding="0" cellspacing="0">
<tr>
<td align="center" colspan="6">Talent Trees</td>
</tr>
<tr>
<xsl:apply-templates select="TalentTree" />
</tr>
</table>
</xsl:template>
<!-- Global-->
<xsl:template match="Character | Guild">
<div class="{name()}">
<xsl:value-of select="@account" /> / <xsl:value-of select="@realm" /> / <xsl:value-of select="@name" />
<br />
<xsl:apply-templates />
</div>
<br />
</xsl:template>
<xsl:template match="Characters | Guilds">
<b><xsl:value-of select="name()" /></b>
<br />
<xsl:apply-templates />
</xsl:template>
</xsl:stylesheet>
DataStore/Export/ExportToXML.lua
+670
View File
@@ -0,0 +1,670 @@
--[[ *** DataStore Export Script ***
Written by : Thaoky, EU-Marecages de Zangar
Date: 10-03-2010
READ THIS FIRST !!!
1) Prerequisites
You must have a Lua environment installed on your machine. I suggest getting LuaSocket from this address : http://luaforge.net/projects/luasocket/
Even though this script does not use any network function, LuaSocket is a useful and neat package, and other scripts I may release in the future are likely to use those features :)
Make sure to install it & configure it properly.
2) Setup a small .bat
Create a file called go.bat in this directory
Copy this line into the file :
d:\Lua\lua5.1.exe export.lua
.. where d:\Lua is the directory where your Lua environment is installed
3) Set INPUT_DIR & OUTPUT_DIR to valid directories (don't forget the double backslashes !!)
INPUT_DIR must be set to the directory that contains your DataStore Saved Variables.
OUTPUT_DIR is any directory of your choice.
4) run go.bat
5) After you've ran the .bat, make sure to copy/move the .xsl that comes with the script into the OUTPUT_DIR, for your own convenience.
--]]
print("** DataStore Export **")
-- local INPUT_DIR = ""
local INPUT_DIR = "D:\\World of Warcraft\\WTF\\Account\\YOUR_ACCOUNT\\SavedVariables"
local OUTPUT_DIR = "E:\\Wow\\Export DataStore"
local USE_XSL = true -- adds a line that refers to a basic .xsl file to display exported content, comment this line if you don't want an xsl reference.
local format = string.format
function strsplit(delimiter, text)
-- source : http://lua-users.org/wiki/SplitJoin
local list = {}
local pos = 1
if string.find("", delimiter, 1) then -- this would result in endless loops
error("delimiter matches empty string!")
end
if delimiter == "." then
delimiter = "%."
end
while 1 do
local first, last = string.find(text, delimiter, pos)
if first then -- found?
table.insert(list, string.sub(text, pos, first-1))
pos = last+1
else
table.insert(list, string.sub(text, pos))
break
end
end
return unpack(list)
end
function CreateDir(name)
os.execute("mkdir " .. name)
end
function ChangeDir(name)
os.execute("chdir " .. name)
end
local rarityColors = {
["9d9d9d"] = 0, -- grey
["ffffff"] = 1, -- white
["1eff00"] = 2, -- green
["0070dd"] = 3, -- blue
["a335ee"] = 4, -- purple
["ff8000"] = 5, -- orange
["e5cc80"] = 7, -- heirloom
}
function GetRarityFromLink(link)
local color = link:sub(5, 10)
if color then
return rarityColors[color]
end
end
-- ** xml utility **
function CreateXMLFile(fileName)
local f = assert(io.open(OUTPUT_DIR .. "\\" .. fileName, "w"))
f:write("<?xml version=\"1.0\" encoding=\"UTF-8\" ?>\n")
if USE_XSL then
f:write("<?xml-stylesheet href=\"DataStore.xsl\" type=\"text/xsl\" ?>\n")
end
return f
end
function WriteXMLLine(file, level, text)
file:write(format("%s%s\n", string.rep("\t", level), text:gsub("&", "&amp;")))
end
function OpenXMLTag(file, level, tag, attributes)
if attributes then
WriteXMLLine(file, level, format("<%s %s>", tag, attributes))
else
WriteXMLLine(file, level, format("<%s>", tag))
end
end
function CloseXMLTag(file, level, tag)
WriteXMLLine(file, level, format("</%s>", tag))
end
function SingleLineTag(file, level, tag, value, attributes)
if attributes then
WriteXMLLine(file, level, format("<%s %s>%s</%s>", tag, attributes, value, tag))
else
WriteXMLLine(file, level, format("<%s>%s</%s>", tag, value, tag))
end
end
local timeFields = {
["lastUpdate"] = true,
["ClientTime"] = true,
["lastLogoutTimestamp"] = true,
["lastCheck"] = true,
["HistoryLastUpdate"] = true,
}
local BottomLevels = {
[-42000] = "Hated",
[-6000] = "Hostile",
[-3000] = "Unfriendly",
[0] = "Neutral",
[3000] = "Friendly",
[9000] = "Honored",
[21000] = "Revered",
[42000] = "Exalted",
}
-- ** Module specific export functions **
local specificExport = {
["DataStore_Achievements"] = {
["Achievements"] = function(file, level, source, character)
OpenXMLTag(file, level, "Achievements")
for index, data in pairs(source) do
local attrib = format("id=\"%s\"", index)
if type(data) == "boolean" and data == true then
data = "true" -- achievement has been completed
local month, day, year = character.CompletionDates[index]:match("(%d+):(%d+):(%d+)")
year = tonumber(year) + 2000
attrib = format("%s completionDate=\"%s/%s/%s\"", attrib, month, day, year)
end
SingleLineTag(file, level+1, "Achievement", data, attrib)
end
CloseXMLTag(file, level, "Achievements")
end,
},
["DataStore_Auctions"] = {
["Auctions"] = function(file, level, source)
OpenXMLTag(file, level, "Auctions")
for index, data in pairs(source) do
local isGoblin, itemID, count, highBidder, startPrice, buyoutPrice, timeLeft = strsplit("|", data)
local attrib = format("count=\"%s\" highBidder=\"%s\" startPrice=\"%s\" buyoutPrice=\"%s\" timeLeft=\"%s\"", count, highBidder, startPrice, buyoutPrice, timeLeft)
if isGoblin == "1" then
attrib = format("%s GoblinAH=\"true\"", attrib)
end
SingleLineTag(file, level+1, "Auction", itemID, attrib)
end
CloseXMLTag(file, level, "Auctions")
end,
["Bids"] = function(file, level, source)
OpenXMLTag(file, level, "Bids")
for index, data in pairs(source) do
local isGoblin, itemID, count, ownerName, bidPrice, buyoutPrice, timeLeft = strsplit("|", data)
local attrib = format("count=\"%s\" ownerName=\"%s\" bidPrice=\"%s\" buyoutPrice=\"%s\" timeLeft=\"%s\"", count, ownerName, bidPrice, buyoutPrice, timeLeft)
if isGoblin == "1" then
attrib = format("%s GoblinAH=\"true\"", attrib)
end
SingleLineTag(file, level+1, "Auction", itemID, attrib)
end
CloseXMLTag(file, level, "Bids")
end,
},
["DataStore_Containers"] = {
["Containers"] = function(file, level, source)
OpenXMLTag(file, level, "Containers")
for bagIndex, bag in pairs(source) do
local bagID = tonumber(bagIndex:sub(4))
OpenXMLTag(file, level+1, "Bag", format("id=\"%s\"", bagID))
for key, value in pairs(bag) do
if type(value) == "number" then
SingleLineTag(file, level+2, key, value)
elseif type(value) == "string" then
SingleLineTag(file, level+2, key, value)
elseif type(value) == "boolean" then
SingleLineTag(file, level+2, key, (value) and "true" or "false")
elseif type(value) == "table" then
if key == "ids" then -- ids is the main table, the two others (links & counts) are complement
OpenXMLTag(file, level+2, "Content")
for slotID, itemID in pairs(value) do
local text = format("Item %d", itemID)
local count = 1
if bag.counts and bag.counts[slotID] then
count = bag.counts[slotID]
end
local attrib = format("slot=\"%s\" count=\"%s\" id=\"%s\"", slotID, count, itemID)
if bag.links and bag.links[slotID] then
local link = bag.links[slotID]
text = link:match("%[(.+)%]") -- this gets the itemName
local rarity = GetRarityFromLink(link)
attrib = format("%s rarity=\"%s\" link=\"%s\"", attrib, rarity, link)
end
SingleLineTag(file, level+3, "Item", text, attrib)
end
CloseXMLTag(file, level+2, "Content")
end
end
end
CloseXMLTag(file, level+1, "Bag")
end
CloseXMLTag(file, level, "Containers")
end,
["Tabs"] = function(file, level, source)
OpenXMLTag(file, level, "Tabs")
for tabID, tab in pairs(source) do
OpenXMLTag(file, level+1, "Tab", format("id=\"%s\"", tabID))
for key, value in pairs(tab) do
if type(value) == "number" then
if timeFields[key] then
SingleLineTag(file, level+2, key, os.date("%m/%d/%Y %X", value))
else
SingleLineTag(file, level+2, key, value)
end
elseif type(value) == "string" then
SingleLineTag(file, level+2, key, value)
elseif type(value) == "boolean" then
SingleLineTag(file, level+2, key, (value) and "true" or "false")
elseif type(value) == "table" then
if key == "ids" then -- ids is the main table, the two others (links & counts) are complement
OpenXMLTag(file, level+2, "Content")
for slotID, itemID in pairs(value) do
local text = format("Item %d", itemID)
local count = 1
if tab.counts and tab.counts[slotID] then
count = tab.counts[slotID]
end
local attrib = format("slot=\"%s\" count=\"%s\" id=\"%s\"", slotID, count, itemID)
if tab.links and tab.links[slotID] then
local link = tab.links[slotID]
text = link:match("%[(.+)%]") -- this gets the itemName
local rarity = GetRarityFromLink(link)
attrib = format("%s rarity=\"%s\" link=\"%s\"", attrib, rarity, link)
end
SingleLineTag(file, level+3, "Item", itemID, attrib)
end
CloseXMLTag(file, level+2, "Content")
end
end
end
CloseXMLTag(file, level+1, "Tab")
end
CloseXMLTag(file, level, "Tabs")
end,
},
["DataStore_Crafts"] = {
["Professions"] = function(file, level, source)
OpenXMLTag(file, level, "Professions")
for professionName, profession in pairs(source) do
OpenXMLTag(file, level+1, "Profession", format("name=\"%s\"", professionName))
for key, value in pairs(profession) do
if type(value) == "number" then
SingleLineTag(file, level+2, key, value)
elseif type(value) == "string" then
SingleLineTag(file, level+2, key, value)
elseif type(value) == "boolean" then
SingleLineTag(file, level+2, key, (value) and "true" or "false")
elseif type(value) == "table" then
if key == "Crafts" then -- there shouldn't be any other
OpenXMLTag(file, level+2, "Crafts")
local currentHeader
for index, craft in ipairs(value) do
local color, info = strsplit("|", craft)
if color == "0" then
if currentHeader then
CloseXMLTag(file, level+3, "Category")
end
OpenXMLTag(file, level+3, "Category", format("name=\"%s\"", info))
currentHeader = info
else
SingleLineTag(file, level+4, "Spell", info)
end
end
if currentHeader then
CloseXMLTag(file, level+3, "Category")
end
CloseXMLTag(file, level+2, "Crafts")
end
end
end
CloseXMLTag(file, level+1, "Profession")
end
CloseXMLTag(file, level, "Professions")
end,
},
["DataStore_Currencies"] = {
["Currencies"] = function(file, level, source)
OpenXMLTag(file, level, "Currencies")
local currentCategory
for index, data in ipairs(source) do
local isHeader, name, count, itemID = strsplit("|", data)
isHeader = (isHeader == "0" and true or nil)
if isHeader then
if currentCategory then
CloseXMLTag(file, level+1, "Category")
end
OpenXMLTag(file, level+1, "Category", format("name=\"%s\"", name))
currentCategory = name
else
SingleLineTag(file, level+2, "Currency", name, format("count=\"%s\" itemID=\"%s\"", count, itemID))
end
end
if currentCategory then
CloseXMLTag(file, level+1, "Category")
end
CloseXMLTag(file, level, "Currencies")
end,
},
["DataStore_Inventory"] = {
["Inventory"] = function(file, level, source)
OpenXMLTag(file, level, "Inventory")
for index, item in pairs(source) do
local attrib = format("index=\"%s\"", index)
local text, itemID
if type(item) == "number" then
itemID = item
text = format("Item %d", itemID)
else
itemID = tonumber(item:match("item:(%d+)"))
text = item:match("%[(.+)%]") -- this gets the itemName
local rarity = GetRarityFromLink(item)
attrib = format("%s rarity=\"%s\" link=\"%s\"", attrib, rarity, item)
end
attrib = format("%s id=\"%s\"", attrib, itemID)
SingleLineTag(file, level+1, "Item", text, attrib)
end
CloseXMLTag(file, level, "Inventory")
end,
},
["DataStore_Mails"] = {
["Mails"] = function(file, level, source)
OpenXMLTag(file, level, "Mails")
for index, mail in pairs(source) do
OpenXMLTag(file, level+1, "Mail")
for key, value in pairs(mail) do
if timeFields[key] then
SingleLineTag(file, level+2, key, os.date("%m/%d/%Y %X", value))
else
SingleLineTag(file, level+2, key, value)
end
end
CloseXMLTag(file, level+1, "Mail")
end
CloseXMLTag(file, level, "Mails")
end,
},
["DataStore_Pets"] = {
["CRITTER"] = function(file, level, source)
OpenXMLTag(file, level, "Companions")
for _, data in pairs(source) do
local modelID, name, spellID, icon = strsplit("|", data)
local attrib = format("name=\"%s\" modelID=\"%s\" icon=\"%s\"", name, modelID, icon)
SingleLineTag(file, level+1, "Spell", spellID, attrib)
end
CloseXMLTag(file, level, "Companions")
end,
["MOUNT"] = function(file, level, source)
OpenXMLTag(file, level, "Mounts")
for _, data in pairs(source) do
local modelID, name, spellID, icon = strsplit("|", data)
local attrib = format("name=\"%s\" modelID=\"%s\" icon=\"%s\"", name, modelID, icon)
SingleLineTag(file, level+1, "Spell", spellID, attrib)
end
CloseXMLTag(file, level, "Mounts")
end,
},
["DataStore_Quests"] = {
["History"] = function(file, level, source)
OpenXMLTag(file, level, "History")
for index, data in pairs(source) do
SingleLineTag(file, level+1, "ID", index)
end
CloseXMLTag(file, level, "History")
end,
["Quests"] = function(file, level, source, character)
OpenXMLTag(file, level, "QuestLog")
for index, data in pairs(source) do
local attrib = format("index=\"%s\"", index)
local text
local isHeader, questTag, groupSize, money = strsplit("|", data)
groupSize = tonumber(groupSize)
money = tonumber(money)
if isHeader == "0" then
text = questTag -- catagory name
attrib = format("%s isHeader=\"true\"", attrib)
else
if questTag ~= "" then
attrib = format("%s tag=\"%s\"", attrib, questTag)
end
end
if groupSize and groupSize > 0 then
attrib = format("%s groupSize=\"%s\"", attrib, groupSize)
end
if money and money > 0 then
attrib = format("%s money=\"%s\"", attrib, money)
end
-- Fully functional, uncomment if there's demand.
local link = character.QuestLinks[index]
if link then
local questID, questLevel = link:match("quest:(%d+):(-?%d+)")
text = link:match("%[(.+)%]") -- this gets the questName
attrib = format("%s id=\"%s\" level=\"%s\"", attrib, questID, questLevel)
end
local rewards = character.Rewards[index]
if rewards then
attrib = format("%s rewards=\"%s\"", attrib, rewards)
end
SingleLineTag(file, level+1, "Quest", text, attrib)
end
CloseXMLTag(file, level, "QuestLog")
end,
},
["DataStore_Reputations"] = {
["Factions"] = function(file, level, source)
OpenXMLTag(file, level, "Factions")
for name, data in pairs(source) do
local bottom, top, earned = strsplit("|", data)
bottom = tonumber(bottom)
top = tonumber(top)
earned = tonumber(earned)
SingleLineTag(file, level+1, "Faction", name, format("rank=\"%s\" numPoints=\"%s\" maxPoints=\"%s\"", BottomLevels[bottom], (earned - bottom), (top - bottom)))
end
CloseXMLTag(file, level, "Factions")
end,
},
["DataStore_Spells"] = {
["Spells"] = function(file, level, source)
OpenXMLTag(file, level, "Spells")
for schoolName, school in pairs(source) do
OpenXMLTag(file, level+1, "School", format("name=\"%s\"", schoolName))
local attrib
for index, value in ipairs(school) do
local id, rank = strsplit("|", value)
attrib = format("index=\"%s\"", index)
if rank ~= "" then
attrib = format("%s rank=\"%s\"", attrib, rank)
end
SingleLineTag(file, level+2, "Spell", id, attrib)
end
CloseXMLTag(file, level+1, "School")
end
CloseXMLTag(file, level, "Spells")
end,
},
["DataStore_Skills"] = {
["Skills"] = function(file, level, source)
OpenXMLTag(file, level, "Skills")
for categoryName, category in pairs(source) do
OpenXMLTag(file, level+1, "Category", format("name=\"%s\"", categoryName))
for skillName, skillData in pairs(category) do
SingleLineTag(file, level+2, "Skill", skillData, format("name=\"%s\"", skillName))
end
CloseXMLTag(file, level+1, "Category")
end
CloseXMLTag(file, level, "Skills")
end,
},
["DataStore_Stats"] = {
["Stats"] = function(file, level, source)
-- to do : improve this, needs some specific code per stat type (if there's demand)
OpenXMLTag(file, level, "Stats")
for name, data in pairs(source) do
SingleLineTag(file, level+1, name, data)
end
CloseXMLTag(file, level, "Stats")
end,
},
["DataStore_Talents"] = {
["Glyphs"] = function(file, level, source)
OpenXMLTag(file, level, "Glyphs")
for index, data in pairs(source) do
local enabled, glyphType, spell, icon, glyphID = strsplit("|", data)
if enabled == "1" and spell ~= "" then
glyphType = (glyphType == "1") and "major" or "minor"
local spec = (index <= 6) and "primary" or "secondary"
local slot = (index > 6) and index - 6 or index
SingleLineTag(file, level+1, "Glyph", glyphID, format("spec=\"%s\" slot=\"%s\" glyphType=\"%s\" spellID=\"%s\" icon=\"%s\"", spec, slot, glyphType, spell, icon))
end
end
CloseXMLTag(file, level, "Glyphs")
end,
["TalentTrees"] = function(file, level, source, character)
OpenXMLTag(file, level, "TalentTrees")
for treeIndex, data in pairs(source) do
local treeName, spec = strsplit("|", treeIndex)
spec = (spec == "1") and "primary" or "secondary"
local talentRef = DataStore_TalentsRefDB.global[character.Class].Trees[treeName].talents -- this points to talent info from the ref table
OpenXMLTag(file, level+1, "TalentTree", format("name=\"%s\" spec=\"%s\"", treeName, spec))
for key, value in pairs(data) do
local id, name, _, _, _, maximumRank = strsplit("|", talentRef[key])
SingleLineTag(file, level+2, "Talent", name, format("index=\"%s\" id=\"%s\" pointsSpent=\"%s\" maximumRank=\"%s\"", key, id, value, maximumRank))
end
CloseXMLTag(file, level+1, "TalentTree")
end
CloseXMLTag(file, level, "TalentTrees")
end,
},
}
function ExportCharacters(moduleName, file)
OpenXMLTag(file, 1, "Characters")
local db = _G[moduleName .."DB"]
local level = 2
for characterKey, character in pairs(db.global.Characters) do
local account, realm, characterName = strsplit(".", characterKey)
OpenXMLTag(file, level, format("Character name=\"%s\" realm=\"%s\" account=\"%s\"", characterName, realm, account))
for key, value in pairs(character) do
if type(value) == "number" then
if timeFields[key] then
SingleLineTag(file, level+1, key, os.date("%m/%d/%Y %X", value))
else
SingleLineTag(file, level+1, key, value)
end
elseif type(value) == "string" then
SingleLineTag(file, level+1, key, value)
elseif type(value) == "table" then
if specificExport[moduleName] and specificExport[moduleName][key] then -- ex: if specificExport["DataStore_Reputations"]["Factions"] exists, call it
specificExport[moduleName][key](file, level+1, value, character)
end
end
end
CloseXMLTag(file, level, "Character")
end
CloseXMLTag(file, 1, "Characters")
end
function ExportGuilds(moduleName, file)
OpenXMLTag(file, 1, "Guilds")
local db = _G[moduleName .."DB"]
local level = 2
for guildKey, guild in pairs(db.global.Guilds) do
local account, realm, guildName = strsplit(".", guildKey)
OpenXMLTag(file, level, format("Guild name=\"%s\" realm=\"%s\" account=\"%s\"", guildName, realm, account))
for key, value in pairs(guild) do
if type(value) == "number" then
SingleLineTag(file, level+1, key, value)
elseif type(value) == "string" then
SingleLineTag(file, level+1, key, value)
elseif type(value) == "table" then
if specificExport[moduleName] and specificExport[moduleName][key] then -- ex: if specificExport["DataStore_Reputations"]["Factions"] exists, call it
specificExport[moduleName][key](file, level+1, value)
end
end
end
CloseXMLTag(file, level, "Guild")
end
CloseXMLTag(file, 1, "Guilds")
end
function ExportModule(moduleName)
dofile(INPUT_DIR .. "\\"..moduleName .. ".lua")
print(format("Exporting %s ...", moduleName))
local f = CreateXMLFile(moduleName..".xml")
OpenXMLTag(f, 0, format("DataStorePage Title=\"%s\"", moduleName))
ExportCharacters(moduleName, f)
if moduleName == "DataStore" or moduleName == "DataStore_Containers" then
ExportGuilds(moduleName, f)
end
CloseXMLTag(f, 0, "DataStorePage")
f:close()
end
local modules = {
"DataStore",
"DataStore_Achievements",
"DataStore_Auctions",
"DataStore_Characters",
"DataStore_Containers",
"DataStore_Crafts",
"DataStore_Currencies",
"DataStore_Inventory",
"DataStore_Mails",
"DataStore_Pets",
"DataStore_Quests",
"DataStore_Reputations",
"DataStore_Skills",
"DataStore_Spells",
"DataStore_Stats",
"DataStore_Talents",
}
for _, moduleName in pairs(modules) do
ExportModule(moduleName)
end
print("Export complete !")