local addonName, addonTable = ...;

local CECF_HEADER_HEIGHT = 84; -- Distance to the top of the inset
local CECF_MAX_WIDTH = 530;
local CECF_TOTALS_ROW_HEIGHT = 20;
local CECF_COLUMN_PADDING = 3;
local CECF_COLUMN_MARGIN = 1;
local CECF_MAX_CHARACTERS_PER_REALM = 11
local CECF_NUM_ROWS = 11
local CECF_FIRST_COLUMN_MIN_WIDTH = 0;
local CECF_LAST_COLUMN_MIN_WIDTH = 24;
local MIN_COLUMN_CHAR_WIDTH = 5;
local NUM_MAX_CURRENCY_HEADERS = 6; -- Mostly a sanity check. We'll run out of space first.
local CharacterModule = addonTable.Character

local function tcount(tab)
   local n = 0
   for _ in pairs(tab) do
     n = n + 1
   end
   return n
 end

--[[
	Names are as returned by GetCurrencyListInfo for the relevant row. Localization: to-do
	IDs are used for ordering. Could be a bitfield I suppose.
	category*100 + expansion*10 + order*1

	categories:
		0	Always relevant
		1	PvE (generic)
		2	PvE (specific dungeon/patch)
		3	PvP (generic)
		4	PvP	(specific battleground)
		5	Crafting
		6	Miscellaneous
	expansions:	In case of overlap, use the latter expansion
		0	Always relevant
		1	Classic
		2	Burning Crusade
		3	Wrath of the Lich King
		4	Cataclysm
		5	Mists of Pandaria

--]]
local CURRENCY_DATA = {
	{"Money", 							6,	[[Interface\MoneyFrame\UI-GoldIcon]],				001},
	{"Justice Points", 					4,	[[Interface\Icons\pvecurrency-justice]],			101},
	{"Valor Points", 					4,	[[Interface\Icons\pvecurrency-valor]],				102},
	{"Elder Charm of Good Fortune", 	2,	[[Interface\Icons\inv_misc_coin_17]],				251},
	{"Lesser Charm of Good Fortune",	4,	[[Interface\Icons\inv_misc_coin_18]],				252},
	{"Honor Points",					4,	[[Interface\Icons\PVPCurrency-Honor-Horde]],		301},
	{"Conquest Points",					5,	[[Interface\Icons\PVPCurrency-Conquest-Horde]],		302},
	{"Ironpaw Token",					3,	[[Interface\Icons\inv_relics_idolofferocity]],		551},
	{"Darkmoon Prize Ticket",			4,	[[Interface\Icons\Inv_misc_ticket_darkmoon_01]],	601},
	{"Epicurean's Award",				3,	[[Interface\Icons\INV_Misc_Ribbon_01]],				541},
	{"Dalaran Jewelcrafter's Token",	3,	[[Interface\Icons\Inv_misc_gem_variety_01]],		531},
	{"Illustrious Jewelcrafter's Token",3,	[[Interface\Icons\Inv_misc_token_argentdawn3]],		542},
	{"Tol Barad Commendation",			4,	[[Interface\Icons\Achievement_zone_tolbarad]],		441},
	{"Mote of Darkness",				2,	[[Interface\Icons\inv_elemental_primal_shadow]],	241},
	{"Essence of Corrupted Deathwing",	2,	[[Interface\Icons\spell_shadow_sealofkings]],		242},
	{"Champion's Seal",					4,	[[Interface\Icons\Ability_Paladin_ArtOfWar]],		231},
}



local Currencies = {}
function Currencies:SetDB(db)
	self.db = db
end

function Currencies:GetDB()
	-- assert(self.db)
	return self.db
end
-- Body rows get zebra striping and mouseover highlights.
-- Non-body rows get icons in each column.
local function CreateRow(name, isBodyRow)
	local new = CreateFrame("Button", name, ChillEffectCurrencyFrame)

	if isBodyRow then
		--== Highlight is the parent for the mouseover
		local highlight = CreateFrame("Frame", name.."Highlight", new)
		highlight:SetPoint("TOPLEFT", 0, 1)
		highlight:SetPoint("BOTTOMRIGHT", 0, -1)
		new.highlight = highlight

		--== Create zebra striping
		new.stripe = new:CreateTexture()
		new.stripe:SetTexture(1, 1, 1, 0.05)
		new.stripe:SetPoint("TOPLEFT", 0, 0)--1)
		new.stripe:SetPoint("BOTTOMRIGHT", 0, 0)--1)

		--== Create mouseover highlight
		local highlightTexture

		highlightTexture = highlight:CreateTexture(highlight:GetName().."TopLeft", "ARTWORK")
		highlightTexture:SetTexture([[Interface\PaperDollInfoFrame\UI-Character-ReputationBar-Highlight]])
		highlightTexture:SetBlendMode("ADD")
		highlightTexture:SetSize(16, 15)
		highlightTexture:SetPoint("TOPLEFT", -1, 3)
		highlightTexture:SetTexCoord(0.06640625, 0, 0.4375, 0.65625)

		highlightTexture = highlight:CreateTexture(highlight:GetName().."BottomLeft", "ARTWORK")
		highlightTexture:SetTexture([[Interface\PaperDollInfoFrame\UI-Character-ReputationBar-Highlight]])
		highlightTexture:SetBlendMode("ADD")
		highlightTexture:SetSize(16, 15)
		highlightTexture:SetPoint("BOTTOMLEFT", -1, -3)
		highlightTexture:SetTexCoord(0.06640625, 0, 0.65625, 0.4375)

		highlightTexture = highlight:CreateTexture(highlight:GetName().."TopRight", "ARTWORK")
		highlightTexture:SetTexture([[Interface\PaperDollInfoFrame\UI-Character-ReputationBar-Highlight]])
		highlightTexture:SetBlendMode("ADD")
		highlightTexture:SetSize(16, 15)
		highlightTexture:SetPoint("TOPRIGHT", 1, 3)
		highlightTexture:SetTexCoord(0, 0.06640625, 0.4375, 0.65625)

		highlightTexture = highlight:CreateTexture(highlight:GetName().."BottomRight", "ARTWORK")
		highlightTexture:SetTexture([[Interface\PaperDollInfoFrame\UI-Character-ReputationBar-Highlight]])
		highlightTexture:SetBlendMode("ADD")
		highlightTexture:SetSize(16, 15)
		highlightTexture:SetPoint("BOTTOMRIGHT", 1, -3)
		highlightTexture:SetTexCoord(0, 0.06640625, 0.65625, 0.4375)

		highlightTexture = highlight:CreateTexture(highlight:GetName().."Top", "ARTWORK")
		highlightTexture:SetTexture([[Interface\PaperDollInfoFrame\UI-Character-ReputationBar-Highlight]])
		highlightTexture:SetBlendMode("ADD")
		highlightTexture:SetPoint("TOPLEFT", highlight:GetName().."TopLeft", "TOPRIGHT")
		highlightTexture:SetPoint("BOTTOMRIGHT", highlight:GetName().."TopRight", "BOTTOMLEFT")
		highlightTexture:SetTexCoord(0, 0.015, 0.4375, 0.65625)

		highlightTexture = highlight:CreateTexture(highlight:GetName().."Bottom", "ARTWORK")
		highlightTexture:SetTexture([[Interface\PaperDollInfoFrame\UI-Character-ReputationBar-Highlight]])
		highlightTexture:SetBlendMode("ADD")
		highlightTexture:SetPoint("TOPLEFT", highlight:GetName().."BottomLeft", "TOPRIGHT")
		highlightTexture:SetPoint("BOTTOMRIGHT", highlight:GetName().."BottomRight", "BOTTOMLEFT")
		highlightTexture:SetTexCoord(0, 0.015, 0.65625, 0.4375)

		highlightTexture = highlight:CreateTexture(highlight:GetName().."Left", "ARTWORK")
		highlightTexture:SetTexture([[Interface\PaperDollInfoFrame\UI-Character-ReputationBar-Highlight]])
		highlightTexture:SetBlendMode("ADD")
		highlightTexture:SetPoint("TOPLEFT", highlight:GetName().."TopLeft", "BOTTOMLEFT")
		highlightTexture:SetPoint("BOTTOMRIGHT", highlight:GetName().."BottomLeft", "TOPRIGHT")
		highlightTexture:SetTexCoord(0.06640625, 0, 0.65625, 0.6)

		highlightTexture = highlight:CreateTexture(highlight:GetName().."Right", "ARTWORK")
		highlightTexture:SetTexture([[Interface\PaperDollInfoFrame\UI-Character-ReputationBar-Highlight]])
		highlightTexture:SetBlendMode("ADD")
		highlightTexture:SetPoint("TOPLEFT", highlight:GetName().."TopRight", "BOTTOMLEFT")
		highlightTexture:SetPoint("BOTTOMRIGHT", highlight:GetName().."BottomRight", "TOPRIGHT")
		highlightTexture:SetTexCoord(0, 0.06640625, 0.65625, 0.6)

		highlight:Hide()

		new:SetScript("OnEnter", function(self)
			self.highlight:Show()
		end)
		new:SetScript("OnLeave", function(self)
			self.highlight:Hide()
		end)
	end

	--== Create columns
	local column
	new.columns = {}
	for j = 1, NUM_MAX_CURRENCY_HEADERS+2 do
		column = CreateFrame("Frame", name.."Column"..j, new)

		column.text = column:CreateFontString()
		column.text:SetFontObject("GameFontWhite")
		column.text:SetPoint("LEFT", CECF_COLUMN_PADDING*2, 0) -- It needed some space. Weird, I know.
		column.text:SetPoint("RIGHT", -CECF_COLUMN_PADDING, 0)

		if j == 1 then
			column:SetPoint("TOPLEFT", new, "TOPLEFT", 0, 0)
			column:SetPoint("BOTTOMLEFT", new, "BOTTOMLEFT", 0, 0)
			column.text:SetJustifyH("LEFT")
		else
			column:SetPoint("TOPLEFT", new.columns[j-1], "TOPRIGHT", CECF_COLUMN_MARGIN, 0)
			column:SetPoint("BOTTOMLEFT", new.columns[j-1], "BOTTOMRIGHT", CECF_COLUMN_MARGIN, 0)
			column.text:SetJustifyH("RIGHT")
		end

		-- if isBodyRow then
			column.stripe = column:CreateTexture()
			column.stripe:SetTexture(1, 1, 1, 0.07)
			column.stripe:SetPoint("TOPLEFT", 0, 0)
			column.stripe:SetPoint("BOTTOMRIGHT", 0, 0)

			if j % 2 == 0 then
				column.stripe:Show()
			else
				column.stripe:Hide()
			end
		-- end

		if not isBodyRow then
			if j > 1 then -- We'll never need the icon in the first column
				column.icon = column:CreateTexture()
				column.icon:SetPoint("CENTER")
				column.icon:SetSize(CECF_TOTALS_ROW_HEIGHT, CECF_TOTALS_ROW_HEIGHT)
			end
		end

		new.columns[j] = column
	end

	return new
end

-- Future self, you're probably going to forget this, but this gets called after the GUI updates, not before.
-- You're welcome. I love you man. ~Your Past Self
local function DropdownRow_OnClick(self, arg1, arg2, checked)
	-- arg1 = currencyID, arg2 = nil
	-- print(arg1, arg2, checked)
	if checked then
		Currencies:GetDB().global.shown[arg1] = true
	else
		Currencies:GetDB().global.shown[arg1] = nil
	end

	local numShown = tcount(Currencies:GetDB().global.shown)
	if numShown > 6 then
		UIErrorsFrame_OnEvent(UIErrorsFrame, "UI_ERROR_MESSAGE", "You may only track 6 currencies at once")
		Currencies:GetDB().global.shown[arg1] = nil
	elseif numShown < 1 then
		UIErrorsFrame_OnEvent(UIErrorsFrame, "UI_ERROR_MESSAGE", "You must track at least 1 currency")
		Currencies:GetDB().global.shown[arg1] = true
	end
	Currencies:RedrawCurrencyFrame()
end

function Currencies:CreateCurrencyFrame()
	ChillEffectCurrencyFrame = CreateFrame("Frame", "ChillEffectCurrencyFrame", CharacterFrame, "PortraitFrameTemplate")
	ChillEffectCurrencyFrame:SetAllPoints()
	self.frame = ChillEffectCurrencyFrame

	-- Set the anchors for the inset during Redraw, because it will shift depending on the number of factions
	ChillEffectCurrencyFrameInset = CreateFrame("Frame", "ChillEffectCurrencyFrameInset", ChillEffectCurrencyFrame, "InsetFrameTemplate")

	ChillEffectCurrencyFrame:CreateTexture("ChillEffectCurrencyFramePortrait", "OVERLAY")
	ChillEffectCurrencyFramePortrait:SetSize(60, 60)
	ChillEffectCurrencyFramePortrait:SetPoint("TOPLEFT", -6, 7)
	hooksecurefunc("CharacterFrame_UpdatePortrait", function()
		local masteryIndex = GetSpecialization();
		if (masteryIndex == nil) then
			local _, class = UnitClass("player");
			ChillEffectCurrencyFramePortrait:SetTexture("Interface\\TargetingFrame\\UI-Classes-Circles");
			ChillEffectCurrencyFramePortrait:SetTexCoord(unpack(CLASS_ICON_TCOORDS[class]));
		else
			local _, _, _, icon = GetSpecializationInfo(masteryIndex);
			ChillEffectCurrencyFramePortrait:SetTexCoord(0, 1, 0, 1);
			SetPortraitToTexture(ChillEffectCurrencyFramePortrait, icon);
		end
	end)

	ChillEffectCurrencyFrameCloseButton:HookScript("OnClick", function()
		CharacterFrameCloseButton:Click()
	end)

	ChillEffectCurrencyFrame:Hide()


	--== Create, but don't initialize, the headers
	do
		ChillEffectCurrencyFrame.headers = {}
		-- Set the character header
		ChillEffectCurrencyFrameHeader1 = CreateFrame("Button", "ChillEffectCurrencyFrameHeader1", ChillEffectCurrencyFrame, "WhoFrameColumnHeaderTemplate")
		ChillEffectCurrencyFrameHeader1:SetPoint("TOPLEFT", 6, -62)
		ChillEffectCurrencyFrameHeader1:SetScript("OnClick", function()
			PlaySound("igMainMenuOptionCheckBoxOn")
		end)
		ChillEffectCurrencyFrameHeader1:SetText("Character")
		WhoFrameColumn_SetWidth(ChillEffectCurrencyFrameHeader1, CECF_FIRST_COLUMN_MIN_WIDTH)
		ChillEffectCurrencyFrame.headers[1] = ChillEffectCurrencyFrameHeader1

		-- OnClick scripts are set during redraw because the last button functions differently
		local new, headerIcon --, active
		for i = 2, NUM_MAX_CURRENCY_HEADERS+2 do -- currencies + characters + expand button
			new = CreateFrame("Button", "ChillEffectCurrencyFrameHeader"..(i), ChillEffectCurrencyFrame, "WhoFrameColumnHeaderTemplate")
			new:SetPoint("TOPLEFT", _G["ChillEffectCurrencyFrameHeader"..(i-1)], "TOPRIGHT", CECF_COLUMN_MARGIN, 0)
			new:SetScript("OnMouseDown", function(self)
				self.icon:SetPoint("TOP", 2, -6)
			end)
			new:SetScript("OnMouseUp", function(self)
				self.icon:SetPoint("TOP", 0, -4)
			end)
			new.icon = new:CreateTexture(new:GetName().."Icon", "ARTWORK")
			new.icon:SetSize(16, 16)
			new.icon:SetPoint("TOP", 0, -4)
			new:SetScript("OnEnter", function(self)
				GameTooltip:SetOwner(self, "ANCHOR_RIGHT");
				GameTooltip:SetText(self.mouseover);
			end)
			new:SetScript("OnLeave", GameTooltip_Hide)

			ChillEffectCurrencyFrame.headers[i] = new
		end
	end

	--== Create the currency-selection dropdown
	local dropdown = CreateFrame("Frame", "ChillEffectCurrencyFrameDropdown", ChillEffectCurrencyFrame, "UIDropDownMenuTemplate")
	UIDropDownMenu_Initialize(dropdown, function(self)
		local info = UIDropDownMenu_CreateInfo();
		info.text = "Select Currencies"
		info.disabled = true
		info.isTitle = true
		info.notCheckable = true
		info.justifyH = "CENTER"
		info.keepShownOnClick = true
		UIDropDownMenu_AddButton(info, 1)

		for i=1,#CURRENCY_DATA do
			info.text = CURRENCY_DATA[i][1]
			info.arg1 = CURRENCY_DATA[i][1]
			info.icon = CURRENCY_DATA[i][3]
			info.func = DropdownRow_OnClick
			info.keepShownOnClick = true
			info.disabled = false
			info.isTitle = false
			info.isNotRadio = true
			info.notCheckable = false
			info.justifyH = nil
			info.checked = function()
				if (Currencies:GetDB()).global.shown[CURRENCY_DATA[i][1]] then
					return true
				end
			end
			UIDropDownMenu_AddButton(info, 1)

		end
	end, "MENU")
	ChillEffectCurrencyFrameDropdown = dropdown


	--== Make the character rows
	ChillEffectCurrencyFrame.rows = {}
	local CECF_ROW_HEIGHT = (ChillEffectCurrencyFrame:GetHeight()-CECF_HEADER_HEIGHT-44-8)/CECF_MAX_CHARACTERS_PER_REALM
	for index = 1, CECF_NUM_ROWS do
		ChillEffectCurrencyFrame.rows[index] = CreateRow("ChillEffectCurrencyFrameRow"..index, true)

		if index % 2 == 0 then
			ChillEffectCurrencyFrame.rows[index].stripe:Show()
		else
			ChillEffectCurrencyFrame.rows[index].stripe:Hide()
		end
	end

	--== Make the totals rows
	ChillEffectCurrencyFrame.totals = {}
	for index = 1,2 do
		ChillEffectCurrencyFrame.totals[index] = CreateRow("ChillEffectCurrencyFrameTotals"..index, false)
	end

	--== CharacterFrame tab-shuffling magic
	ChillEffectCurrencyFrame:SetID(5)
	tinsert(CHARACTERFRAME_SUBFRAMES, "ChillEffectCurrencyFrame")
	ChillEffectCurrencyFrame:SetScript("OnShow", function()
		CharacterFrame:SetWidth(CHARACTERFRAME_EXPANDED_WIDTH)
		CharacterFrame.Expanded = true;
		UpdateUIPanelPositions(CharacterFrame);
	end )
	ChillEffectCurrencyFrame:SetScript("OnHide", function()
		CharacterFrame:SetWidth(PANEL_DEFAULT_WIDTH)
		CharacterFrame.Expanded = false;
		UpdateUIPanelPositions(CharacterFrame);
	end )
	self.frame = ChillEffectCurrencyFrame;
end

function Currencies:GetFrame()
	return self.frame
end
-- If this is the money column, display it in gold. If the text would overflow the expected column width, try to bignumber it.
local function SetCurrencyColumnText(column, currencyName, currencyWidth, count)
	local currencyWidth = MIN_COLUMN_CHAR_WIDTH+1
	column.text:Show()
	if currencyName == MONEY then
		if count >= 10000 then
			column.text:SetText(floor(count/10000))
		else
			column.text:SetText(count/10000)
		end
	elseif log10(count) > currencyWidth then -- Honestly, what the hell? We'll try bignumbering it to fit, but this will probably never happen anyways.
		column.text:SetText(floor(count/1000).."k")
	else
		column.text:SetText(count)
	end
end

-- Sets the width of the header, body entries, and totals columns. Calls header:SetWidth(). Not sure how I feel about that.
local function SetColumnWidth(columnIndex, columnWidth)
	WhoFrameColumn_SetWidth(ChillEffectCurrencyFrame.headers[columnIndex], columnWidth)
	for j=1, CECF_NUM_ROWS do
		ChillEffectCurrencyFrame.rows[j].columns[columnIndex]:SetWidth(columnWidth)
	end
	for j=1, 2 do
		ChillEffectCurrencyFrame.totals[j].columns[columnIndex]:SetWidth(columnWidth)
	end
end

local sortType = "Name"
local sortOrder = "ascending"
local function SetSortingOrder(header)
	if sortType == header.sortType then
		if sortOrder == "ascending" then
			sortOrder = "descending"
		else
			sortOrder = "ascending"
		end
	else
		sortType = header.sortType
		if sortType == "Name" then
			sortOrder = "ascending"
		else
			sortOrder = "descending"
		end
	end
	-- print(format("Sorting by %s %s", sortType, sortOrder))
	PlaySound("igMainMenuOptionCheckBoxOn")
	Currencies:RedrawCurrencyFrame()
end

local function ShowSelectionDropdown(header)
	ToggleDropDownMenu(1, nil, ChillEffectCurrencyFrameDropdown, header, 30, 26);
	PlaySound("igMainMenuOptionCheckBoxOn")
end

local function GetColumnWidth(index)
	return ChillEffectCurrencyFrame.headers[index]:GetWidth()
end

local function SetColumnHeader(index, isFinalColumn, currencyName, currencyWidth, currencyIcon)
	-- print("Drawing column "..index)

	header = ChillEffectCurrencyFrame.headers[index]
	header:Show()

	if not isFinalColumn then
		header.mouseover = currencyName
		header.icon:SetTexture(currencyIcon)
		header.icon:SetTexCoord(0, 1, 0, 1)

		header.sortType = currencyName
		header:SetScript("OnClick", SetSortingOrder)
	else
		header.mouseover = ""
		header.icon:SetTexture([[Interface\Common\UI-ModelControlPanel]])
		header.icon:SetTexCoord(0.578125, 0.828125, 0.1484375, 0.2734275)

		header:SetScript("OnClick", ShowSelectionDropdown)
	end
end

local function SetContentColumn(index, currencyName, characterOrder, hordeDB, allianceDB)
	for j=1, CECF_NUM_ROWS do
		ChillEffectCurrencyFrame.rows[j].columns[index]:Show()
	end

	-- Use next(DB) to see if the DB has any entries.
	local hasAlliance = allianceDB and (next(allianceDB) ~= nil)
	local hasHorde = hordeDB and (next(hordeDB) ~= nil)
	local numFactions = (hasHorde and 1 or 0) + (hasAlliance and 1 or 0)

	-- Display the quantities for each cell in the column and keep running totals for both factions
	local row = 1
	local character, count
	local hordeTotal, allianceTotal = 0, 0
	for k, v in pairs(characterOrder) do
		character = v[2]
		count = CharacterModule.GetCurrencyCount(character, currencyName) or 0

		SetCurrencyColumnText(ChillEffectCurrencyFrame.rows[row].columns[index], currencyName, currencyWidth, count)

		if hasHorde and hordeDB[v[1]] then
			hordeTotal = hordeTotal + count
		elseif hasAlliance and allianceDB[v[1]] then
			allianceTotal = allianceTotal + count
		end
		row = row + 1
	end



	if numFactions == 1 then
		if hasAlliance then
			SetCurrencyColumnText(ChillEffectCurrencyFrame.totals[1].columns[index], currencyName, currencyWidth, allianceTotal)
		elseif hasHorde then
			SetCurrencyColumnText(ChillEffectCurrencyFrame.totals[1].columns[index], currencyName, currencyWidth, hordeTotal)
		end
		ChillEffectCurrencyFrame.totals[1].columns[index].icon:Hide()
	elseif numFactions > 1 then
		SetCurrencyColumnText(ChillEffectCurrencyFrame.totals[1].columns[index], currencyName, currencyWidth, allianceTotal)
		SetCurrencyColumnText(ChillEffectCurrencyFrame.totals[2].columns[index], currencyName, currencyWidth, hordeTotal)
		ChillEffectCurrencyFrame.totals[1].columns[index].icon:Hide()
		ChillEffectCurrencyFrame.totals[2].columns[index].icon:Hide()
	end

	if index % 2 == 0 then
		ChillEffectCurrencyFrame.totals[1].columns[index].stripe:Show()
		ChillEffectCurrencyFrame.totals[2].columns[index].stripe:Show()
	else
		ChillEffectCurrencyFrame.totals[1].columns[index].stripe:Hide()
		ChillEffectCurrencyFrame.totals[2].columns[index].stripe:Hide()
	end
end

local function SetFinalColumn(index, hasHorde, hasAlliance)
	local numFactions = (hasHorde and 1 or 0) + (hasAlliance and 1 or 0)
	for j=1, CECF_NUM_ROWS do
		ChillEffectCurrencyFrame.rows[j].columns[index]:Hide()
	end

	-- Show the faction icons, hide the stripes
	if numFactions == 1 then
		if hasAlliance then
			ChillEffectCurrencyFrame.totals[1].columns[index].icon:SetTexture([[Interface\PVPFrame\PVP-Currency-Alliance]])

		else
			ChillEffectCurrencyFrame.totals[1].columns[index].icon:SetTexture([[Interface\PVPFrame\PVP-Currency-Horde]])
		end
		ChillEffectCurrencyFrame.totals[1].columns[index].icon:Show()
		ChillEffectCurrencyFrame.totals[1].columns[index].stripe:Hide()
		ChillEffectCurrencyFrame.totals[1].columns[index].text:Hide()
	elseif numFactions > 1 then
		ChillEffectCurrencyFrame.totals[1].columns[index].icon:SetTexture([[Interface\PVPFrame\PVP-Currency-Alliance]])
		ChillEffectCurrencyFrame.totals[1].columns[index].icon:Show()
		ChillEffectCurrencyFrame.totals[1].columns[index].stripe:Hide()
		ChillEffectCurrencyFrame.totals[1].columns[index].text:Hide()

		ChillEffectCurrencyFrame.totals[2].columns[index].icon:SetTexture([[Interface\PVPFrame\PVP-Currency-Horde]])
		ChillEffectCurrencyFrame.totals[2].columns[index].icon:Show()
		ChillEffectCurrencyFrame.totals[2].columns[index].stripe:Hide()
		ChillEffectCurrencyFrame.totals[2].columns[index].text:Hide()
	end
end

local function HideColumn(index)
	-- print("Hiding column "..index)
	ChillEffectCurrencyFrame.headers[index]:Hide()
	for j=1, CECF_NUM_ROWS do
		ChillEffectCurrencyFrame.rows[j].columns[index]:Hide()
	end
	for j=1, 2 do
		ChillEffectCurrencyFrame.totals[j].columns[index]:Hide()
	end
end

local function ShowColumn(index)
	ChillEffectCurrencyFrame.headers[index]:Show()
	for j=1, CECF_NUM_ROWS do
		ChillEffectCurrencyFrame.rows[j].columns[index]:Show()
	end
	for j=1, 2 do
		ChillEffectCurrencyFrame.totals[j].columns[index]:Show()
	end
end

function Currencies:RedrawCurrencyFrame()
	local header
	local currencyName, currencyWidth, currencyIcon
	local hasHorde, hasAlliance, hasNeutral, numFactions
	local realmName = GetRealmName()
	local customColumnSet = next(self.db.global.shown) ~= nil

	--== Do we have multiple factions on this realm?
	hasHorde = self.db.sv.factionrealm["Horde - ".. realmName] and true or false
	hasAlliance = self.db.sv.factionrealm["Alliance - ".. realmName] and true or false
	numFactions = (hasHorde and 1 or 0) + (hasAlliance and 1 or 0)

	if numFactions == 0 then return end

	--== Let's figure out the column sorting. Pull everyone into a set of {charName, charData, sortTypeValue} tables, sort those, and use the resulting order
	local character, count
	local characterOrder = {}
	for k, v in pairs(self.db.sv.realm[realmName]) do
		character = self.db.sv.char[k.." - ".. realmName]
		if sortType == "Name" then
			tinsert(characterOrder, {k, character, k})
		else
			count = CharacterModule.GetCurrencyCount(character, sortType) or 0
			tinsert(characterOrder, {k, character, count})
		end
	end
	sort(characterOrder, function(a,b)
		if sortOrder == "ascending" then
			if a[3] < b[3] then
				return true
			elseif a[3] == b[3] and a[1] < b[1] then
				return true
			else
				return false
			end
		else
			if b[3] < a[3] then
				return true
			elseif a[3] == b[3] and a[1] < b[1] then
				return true
			else
				return false
			end
		end
	end)

	--== Make sure everyone's visible
	for j=1, NUM_MAX_CURRENCY_HEADERS+2 do
		ShowColumn(j)
	end

	--== Set the first column, the character names, using the savedVars for this realm
	local row = 1
	local widestName = 0
	for k, v in pairs(characterOrder) do
		ChillEffectCurrencyFrame.rows[row].columns[1].text:SetText(v[1])
		if ChillEffectCurrencyFrame.rows[row].columns[1].text:GetStringWidth() > widestName then
			widestName = ChillEffectCurrencyFrame.rows[row].columns[1].text:GetStringWidth()
		end
		row = row + 1
	end

	ChillEffectCurrencyFrame.totals[numFactions].columns[1].text:SetText("Totals:")

	ChillEffectCurrencyFrame.headers[1]:SetScript("OnClick", SetSortingOrder)
	ChillEffectCurrencyFrame.headers[1].sortType = "Name"
	local horzSpaceAvailable = CECF_MAX_WIDTH - widestName - 6;

	-- print(format("From %d max, %d remaining", CECF_MAX_WIDTH, horzSpaceAvailable))
	local columnsShown = nil
	if self.db.global.shown then
		-- print("Building custom table")
		columnsShown = {}
		for k, v in pairs(self.db.global.shown) do
			local currencyIndex
			for i, currencyData in ipairs(CURRENCY_DATA) do
				if currencyData[1] == k then
					currencyIndex = i
				end
			end
			tinsert(columnsShown, currencyIndex)
			-- print("   inserted "..currencyIndex.." into table")
		end
		sort(columnsShown)
	end

	--== Okay now figure out the columns
	local numCurrencyColumns
	if customColumnSet then
		numCurrencyColumns = #columnsShown
	else
		numCurrencyColumns = NUM_MAX_CURRENCY_HEADERS
	end

	local currentColumn
	for i = 1, numCurrencyColumns do
		currentColumn = i + 1

		if customColumnSet then
			currencyName, currencyWidth, currencyIcon = unpack(CURRENCY_DATA[columnsShown[i]])
		else
			currencyName, currencyWidth, currencyIcon = unpack(CURRENCY_DATA[i])
			-- This is the first load: Make sure the savedVars are set
			Currencies:GetDB().global.shown[currencyName] = true
		end

		if currencyWidth < MIN_COLUMN_CHAR_WIDTH then
			SetColumnWidth(currentColumn, 9*(MIN_COLUMN_CHAR_WIDTH+1) +2*CECF_COLUMN_PADDING)
		else
			SetColumnWidth(currentColumn, 9*(currencyWidth+1) +2*CECF_COLUMN_PADDING)
		end

		SetColumnHeader(currentColumn, false, currencyName, currencyWidth, currencyIcon)
		SetContentColumn(currentColumn, currencyName, characterOrder, self.db.sv.factionrealm["Horde - ".. realmName], self.db.sv.factionrealm["Alliance - ".. realmName])

		-- print(format("From %d remaining, %d used on column %d", horzSpaceAvailable, GetColumnWidth(currentColumn) + CECF_COLUMN_MARGIN, currentColumn))
		horzSpaceAvailable = horzSpaceAvailable - GetColumnWidth(currentColumn) - CECF_COLUMN_MARGIN
	end

	--== And handle the last column
	do
		-- print("Breaking at column "..lastColumn)
		SetColumnWidth(currentColumn+1, CECF_LAST_COLUMN_MIN_WIDTH)
		SetColumnHeader(currentColumn+1, true)
		SetFinalColumn(currentColumn+1, hasHorde, hasAlliance)

		-- print(format("From %d remaining, %d used on column %d", horzSpaceAvailable, GetColumnWidth(currentColumn+1) + CECF_COLUMN_MARGIN, currentColumn+1))
		horzSpaceAvailable = horzSpaceAvailable - GetColumnWidth(currentColumn+1) - CECF_COLUMN_MARGIN

		-- print(format("Setting first column to %dpx", widestName + horzSpaceAvailable))
		-- Spread out the available space. Give an extra share to the first column.
		local spacePerColumn = horzSpaceAvailable / (currentColumn+2)
		SetColumnWidth(1, widestName + spacePerColumn*3)
		for i=2, currentColumn do
			-- if currencyWidth < MIN_COLUMN_CHAR_WIDTH then
				-- SetColumnWidth(currentColumn, 9*(MIN_COLUMN_CHAR_WIDTH+1) +2*CECF_COLUMN_PADDING + spacePerColumn)
			-- else
				-- SetColumnWidth(currentColumn, 9*(currencyWidth+1) +2*CECF_COLUMN_PADDING + spacePerColumn)
			-- end
			SetColumnWidth(i, GetColumnWidth(i) + spacePerColumn)
		end
	end

	--== Hide the remainder of the columns
	for j = currentColumn+2, NUM_MAX_CURRENCY_HEADERS+2 do
		HideColumn(j)
	end

	--== Is the selection dropdown showing? If so, reposition it because we might've just added or removed a column
	ShowSelectionDropdown(ChillEffectCurrencyFrame.headers[currentColumn+1])
	ShowSelectionDropdown(ChillEffectCurrencyFrame.headers[currentColumn+1])

	--== Adjust the frame for the correct number of content and totals rows
	do
		ChillEffectCurrencyFrameTitleText:SetText("All Characters - " .. realmName)

		ChillEffectCurrencyFrameInset:SetPoint("TOPLEFT", 4, -CECF_HEADER_HEIGHT)
		ChillEffectCurrencyFrameInset:SetPoint("BOTTOMRIGHT", -6, 4+CECF_TOTALS_ROW_HEIGHT*numFactions)

		local CECF_ROW_HEIGHT = (ChillEffectCurrencyFrame:GetHeight()-CECF_HEADER_HEIGHT-(4+CECF_TOTALS_ROW_HEIGHT*numFactions)-8)/CECF_MAX_CHARACTERS_PER_REALM --(row-1)
		--Remember me? "row" is a local var from way up top - incremented after each character
		for i=row, CECF_NUM_ROWS do
			ChillEffectCurrencyFrame.rows[i]:Hide()
		end

		for index = 1, CECF_NUM_ROWS do
			if index == 1 then
				ChillEffectCurrencyFrame.rows[index]:SetPoint("TOPLEFT", ChillEffectCurrencyFrame, "TOPLEFT", 6, -1-CECF_HEADER_HEIGHT-4)
				ChillEffectCurrencyFrame.rows[index]:SetPoint("BOTTOMRIGHT", ChillEffectCurrencyFrame, "TOPLEFT", CECF_MAX_WIDTH, -1-CECF_HEADER_HEIGHT-4-CECF_ROW_HEIGHT)
			elseif index <= CECF_MAX_CHARACTERS_PER_REALM then
				ChillEffectCurrencyFrame.rows[index]:SetPoint("TOPLEFT", ChillEffectCurrencyFrame.rows[index-1], "BOTTOMLEFT", 0, 0)
				ChillEffectCurrencyFrame.rows[index]:SetPoint("BOTTOMRIGHT", ChillEffectCurrencyFrame.rows[index-1], "BOTTOMRIGHT", 0, -CECF_ROW_HEIGHT)
			end
		end

		ChillEffectCurrencyFrame.totals[1]:SetPoint("TOPLEFT", ChillEffectCurrencyFrameInset, "BOTTOMLEFT", 2, -2)
		ChillEffectCurrencyFrame.totals[1]:SetPoint("BOTTOMRIGHT", ChillEffectCurrencyFrameInset, "BOTTOMLEFT", CECF_MAX_WIDTH, -2-CECF_TOTALS_ROW_HEIGHT)
		if numFactions > 1 then
			ChillEffectCurrencyFrame.totals[2]:SetPoint("TOPLEFT", ChillEffectCurrencyFrame.totals[1], "BOTTOMLEFT", 0, 0)
			ChillEffectCurrencyFrame.totals[2]:SetPoint("BOTTOMRIGHT", ChillEffectCurrencyFrame.totals[1], "BOTTOMRIGHT", 0, -CECF_TOTALS_ROW_HEIGHT)
		end
	end
end

addonTable.Currencies = Currencies