wow/ouroloot: core.lua comparison

comparison core.lua @ 71:fb330a1fb6e9

Add a unique field to loot (extracted from uniqueID field when possible, randomly generated when not) and include it in broadcasts. Use this as a history identifier for future loot. Will need to tweak using this in signatures (and finally avoid problems looting multiples of an item to a single person).

author	Farmbuyer of US-Kilrogg <farmbuyer@gmail.com>
date	Sat, 12 May 2012 07:17:55 +0000
parents	cdee65c1bd8c
children	32eb24fb2ebf

comparison

equal deleted inserted replaced

-:cdee65c1bd8c
+:fb330a1fb6e9
 - itemname      not including square brackets
 - id            itemID as number
 - itemlink      full clickable link
 - itexture      icon path (e.g., Interface\Icons\INV_Misc_Rune_01)
 - quality       ITEM_QUALITY_* number
+- unique        an almost-certainly-unique string, content meaningless
 - disposition   offspec/gvault/shard; missing otherwise; can be set from
 the extratext field
 - count         e.g., "x3"; missing otherwise; can be set/removed from
 extratext; triggers only for a stack of items, not "the boss
 dropped double axes today"
 OuroLootSV_log   = {}
 ------ Constants
 local option_defaults = {
-	['datarev'] = 19,    -- cheating, this isn't actually an option
+	['datarev'] = 20,    -- cheating, this isn't actually an option
 	['popup_on_join'] = true,
 	['register_slashloot'] = true,
 	['scroll_to_bottom'] = true,
 	['chatty_on_kill'] = false,
 	['no_tracking_wipes'] = false,
 addon.author_debug = flib.author_debug
 -- Play cute games with namespaces here just to save typing.  WTB Lua 5.2 PST.
 do local _G = _G setfenv (1, addon)
-	commrev			= '16'
+	commrev			= '17'
 	revision		= _G.GetAddOnMetadata(nametag,"Version") or "?"  -- "x.yy.z", etc
 	ident			= "OuroLoot2"
 	identTg			= "OuroLoot2Tg"
 	status_text		= nil
 	self.history_all = self.history_all or OuroLootSV_hist or {}
 	local r = self:load_assert (GetRealmName(), "how the freak does GetRealmName() fail?")
 	self.history_all[r] = self:_prep_new_history_category (self.history_all[r], r)
 	self.history = self.history_all[r]
+	local histformat = self.history_all.HISTFORMAT
+	self.history_all.HISTFORMAT = nil   -- don't keep this in live data
 	if (not InCombatLockdown()) and OuroLootSV_hist and
-	   (OuroLootSV_hist.HISTFORMAT == nil)  -- restored data but it's older
+	   (histformat == nil or histformat < 3) -- restored data but it's older
 	then
 		-- Big honkin' loop
 		for rname,realm in pairs(self.history_all) do
 			for pk,player in ipairs(realm) do
 				for lk,loot in ipairs(player) do
 					if loot.count == "" then
 						loot.count = nil
 					end
+					if not loot.unique then
+						loot.unique = loot.id .. ' ' .. loot.when
+					end
 				end
 			end
 		end
 	end
-	self.history_all.HISTFORMAT = nil   -- don't keep this in live data
 	--OuroLootSV_hist = nil
 	-- Handle changes to the stored data format in stages from oldest to newest.
 	if OuroLootSV then
 		local dirty = false
 		bumpers[18] = bumpers[16]
 			-- In the not-very-many days between 16 and 19, I managed to break
 			-- the exact same data in the exact same way.  At least they're
 			-- not actually running the same loop twice... probably... sigh.
+		bumpers[19] = function()
+			for i,e in ipairs(OuroLootSV) do
+				if e.kind == 'loot' and e.history_unique then
+					e.unique, e.history_unique = e.history_unique, nil
+				end
+			end
+		end
 		--[===[
 		local real = bumpers
 		bumpers = newproxy(true)
 		local mt = getmetatable(bumpers)
 			t.byname = nil
 		end
 	end end
 	if worth_saving then
 		OuroLootSV_hist = self.history_all
-		OuroLootSV_hist.HISTFORMAT = 2
+		OuroLootSV_hist.HISTFORMAT = 3
 	else
 		OuroLootSV_hist = nil
 	end
 	OuroLootSV_log = #OuroLootSV_log > 0 and OuroLootSV_log or nil
 end
 		end
 		wipe(candidates)
 	end
 	addon.recent_loot = create_new_cache ('loot', comm_cleanup_ttl+3, prefer_local_loots)
-	local GetItemInfo, GetItemIcon = GetItemInfo, GetItemIcon
+	local GetItemInfo, GetItemIcon, random = GetItemInfo, GetItemIcon, math.random
-	-- 'from' and onwards only present if this is triggered by a broadcast
+	-- 'from' only present if this is triggered by a broadcast
-	function addon:_do_loot (local_override, recipient, itemid, count, from, extratext)
+	function addon:_do_loot (local_override, recipient, unique, itemid, count, from, extratext)
 		local itexture = GetItemIcon(itemid)
 		local iname, ilink, iquality = GetItemInfo(itemid)
 		local i
 		if (not iname) or (not itexture) then
 			i = true
 			iname, ilink, iquality, itexture =
 				UNKNOWN..': '..itemid, 'item:6948', ITEM_QUALITY_COMMON, [[ICONS\INV_Misc_QuestionMark]]
 		end
-		self.dprint('loot',">>_do_loot, R:", recipient, "I:", itemid, "C:", count, "frm:", from, "ex:", extratext, "q:", iquality)
+		self.dprint('loot',">>_do_loot, R:", recipient, "U:", unique, "I:",
+			itemid, "C:", count, "frm:", from, "ex:", extratext, "q:", iquality)
 		itemid = tonumber(ilink:match("item:(%d+)") or 0)
+		unique = tostring(unique or random(8675309))  -- also, xkcd.com/1047
 		-- This is only a 'while' to make jumping out of it easy and still do cleanup below.
 		while local_override or ((iquality >= self.threshold) and not opts.itemfilter[itemid]) do
 			if (self.rebroadcast and (not from)) and not local_override then
-				self:vbroadcast('loot', recipient, itemid, count)
+				self:vbroadcast('loot', recipient, unique, itemid, count)
 			end
 			if (not self.enabled) and (not local_override) then break end
-			local signature = recipient .. iname .. (count or "")
+			local signature = unique .. recipient .. iname .. (count or "")
 			if from and self.recent_loot:test(signature) then
 				self.dprint('cache', "remote loot <",signature,"> already in cache, skipping")
 			else
 				-- There is some redundancy in all this, in the interests of ease-of-coding
 				i = {
 					quality		= iquality,
 					itemname	= iname,
 					id			= itemid,
 					itemlink	= ilink,
 					itexture	= itexture,
+					unique		= unique,
 					count		= (count and count ~= "") and count or nil,
 					bcast_from	= from,
 					extratext	= extratext,
 					variant		= self:is_variant_item(ilink),
 				}
 				person = person:match("|c%x%x%x%x%x%x%x%x(%S+)") or person
 			else
 				person = my_name    -- UNIT_YOU / You
 			end
-			--local id = tonumber((select(2, strsplit(":", itemstring))))
+			--local id = tonumber(itemstring:match('|Hitem:(%d+):'))
-			local id = tonumber(itemstring:match('|Hitem:(%d+):'))
+			local id,unique,_
+			_,id,_,_,_,_,_,_,unique = strsplit (":", itemstring)
-			return self:_do_loot (false, person, id, count)
+			if unique == 0 then unique = nil end
+			return self:_do_loot (false, person, unique, id, count)
 		elseif event == "broadcast" then
 			return self:_do_loot(false, ...)
 		elseif event == "manual" then
 			local r,i,n = ...
-			return self:_do_loot(true, r,i,nil,nil,n)
+			return self:_do_loot(true, r, --[[unique=]]nil, i,
+				--[[count=]]nil, --[[from=]]nil, n)
 		end
 	end
 end
 			id = e.id,
 			when = self:format_timestamp (g_today, e),
 			count = e.count,
 		}
 		tinsert (h, 1, n)
-		e.history_unique = n.id .. ' ' .. n.when
+		if (not e.unique) or (#e.unique==0) then
+			e.unique = n.id .. ' ' .. n.when
+		end
+		n.unique = e.unique
 	end
 	-- Create new history table based on current loot.
 	function addon:rewrite_history (realmname)
 		local r = assert(realmname)
 		if loot.kind ~= 'loot' then
 			error("trying to "..operation_text.." something that isn't loot")
 		end
 		local player = loot.person
-		local tag = loot.history_unique
+		local tag = loot.unique
 		local errtxt
 		local player_i, player_h, hist_i
 		if not tag then
 			errtxt = "Entry for %s is missing a history tag!"
 		else
 			player_i,player_h = self:get_loot_history(player)
 			for i,h in ipairs(player_h) do
-				local unique = h.id .. ' ' .. h.when
+				if h.unique == tag then
-				if unique == tag then
 					hist_i = i
 					break
 				end
 			end
 			if not hist_i then
 		if (newdisp == 'shard' or newdisp == 'gvault') then
 			local name_i, name_h, hist_i = self:_history_by_loot_id (e, "mark")
 			-- remove history entry
 			if hist_i then
 				local hist_h = tremove (name_h, hist_i)
-				deleted_cache[e.history_unique] = hist_h
+				deleted_cache[e.unique] = hist_h
 				self.hist_clean = nil
 			elseif (olddisp == 'shard' or olddisp == 'gvault') then
 				-- Sharding a vault item, or giving the auto-sharder something to bank,
 				-- etc, wouldn't necessarily have had a history entry to begin with.
 			else
 			-- Must create a new history entry.  Could call '_addHistoryEntry(index)'
 			-- but that would duplicate a lot of effort.  To start with, check the
 			-- cache of stuff we've already deleted; if it's not there then just do
 			-- the same steps as _addHistoryEntry.
 			local entry
-			if e.history_unique and deleted_cache[e.history_unique] then
+			if e.unique and deleted_cache[e.unique] then
-				entry = deleted_cache[e.history_unique]
+				entry = deleted_cache[e.unique]
-				deleted_cache[e.history_unique] = nil
+				deleted_cache[e.unique] = nil
 			end
 			local when = g_today and self:format_timestamp (g_today, e) or tostring(e.stamp)
 			entry = entry or {
 				id = e.id,
 				when = when,
 				count = e.count,
 			}
 			tinsert (name_h, 1, entry)
-			e.history_unique = e.history_unique or (entry.id .. ' ' .. entry.when)
+			if (not e.unique) or (#e.unique==0) then
+				e.unique = entry.id .. ' ' .. entry.when
+			end
+			entry.unique = e.unique
 			self.hist_clean = nil
 			return
 		end
 	end
 end
 	local function assemble(t,...)
 		if select('#',...) > 0 then
 			local msg = {t,...}
 			-- tconcat requires strings, but T is known to be one already
 			for i = 2, #msg do
-				msg[i] = tostring(msg[i]) or ""
+				msg[i] = tostring(msg[i] or "")
 			end
 			return tconcat (msg, '\a')
 		end
 		return t
 	end
 	OCR_funcs.revcheck = function (sender, _, revlarge)
 		addon.dprint('comm', "revcheck, sender", sender)
 		addon:_check_revision (revlarge)
 	end
-	OCR_funcs.loot = function (sender, _, recip, item, count, extratext)
+	OCR_funcs['16loot'] = function (sender, _, recip, item, count, extratext)
-		addon.dprint('comm', "DOTloot, sender", sender, "recip", recip, "item", item, "count", count)
+		addon.dprint('comm', "DOTloot/16, sender", sender, "recip", recip, "item", item, "count", count)
 		if not addon.enabled then return end
 		adduser (sender, nil, true)
-		addon:CHAT_MSG_LOOT ("broadcast", recip, item, count, sender, extratext)
+		addon:CHAT_MSG_LOOT ("broadcast", recip, --[[unique=]]"", item, count, sender, extratext)
 	end
-	OCR_funcs['16loot'] = OCR_funcs.loot
+	OCR_funcs.loot = OCR_funcs['16loot']   -- old unversioned stuff goes to 16
+	OCR_funcs['17loot'] = function (sender, _, recip, unique, item, count, extratext)
+		addon.dprint('comm', "DOTloot, sender", sender, "recip", recip,
+			"unique", unique, "item", item, "count", count)
+		if not addon.enabled then return end
+		adduser (sender, nil, true)
+		addon:CHAT_MSG_LOOT ("broadcast", recip, unique, item, count, sender, extratext)
+	end
 	OCR_funcs.boss = function (sender, _, reason, bossname, instancetag)
 		addon.dprint('comm', "DOTboss, sender", sender, "reason", reason,
 			"name", bossname, "it", instancetag)
 		if not addon.enabled then return end
 			"name", bossname, "it", instancetag, "size", maxsize)
 		if not addon.enabled then return end
 		adduser (sender, nil, true)
 		addon:on_boss_broadcast (reason, bossname, instancetag, maxsize)
 	end
+	OCR_funcs['17boss'] = OCR_funcs['16boss']
 	OCR_funcs.bcast_req = function (sender)
 		if addon.debug.comm or ((not g_wafer_thin) and (not addon.rebroadcast))
 		then
 			addon:Print("%s has requested additional broadcasters! Choose %s to enable rebroadcasting, or %s to remain off and also ignore rebroadcast requests for as long as you're logged in.",

Mercurial > wow > ouroloot

comparison core.lua @ 71:fb330a1fb6e9