Mercurial > wow > guild-delta

annotate gd.lua @ 2:fb9a91642a60

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Warn on large logfile. Avoid reporting to minimized frames.
author Farmbuyer of US-Kilrogg <farmbuyer@gmail.com>
date Fri, 05 Nov 2010 03:57:42 +0000
parents f7c747904387
children 7b31138c3c8e
rev   line source
farmbuyer@1 1
farmbuyer@1 2 local addon = CreateFrame("Frame") --select(2,...)
farmbuyer@1 3 local SV
farmbuyer@1 4
farmbuyer@1 5 local DEFAULT_CHAT = 2 -- combat log (no constant predefined for that)
farmbuyer@1 6
farmbuyer@1 7 local l10n
farmbuyer@1 8 --if GetLocale() == "enUS" then
farmbuyer@1 9 l10n= {
farmbuyer@1 10 ["LEFT"] = "Players who have left the guild: ",
farmbuyer@1 11 ["JOINED"] = "Players who have joined the guild: ",
farmbuyer@1 12 ["RANK"] = "Players whose rank has changed:",
farmbuyer@1 13 ["LEVEL"] = "Players whose level has changed:",
farmbuyer@1 14 ["NOTES"] = "Players whose notes have changed:",
farmbuyer@1 15
farmbuyer@1 16 ["Oabbrev"] = "O", -- abbreviation for "Officer", specifically the non-public note
farmbuyer@1 17 ["FIELD_rank"] = "Rank",
farmbuyer@1 18 ["FIELD_level"] = "Level",
farmbuyer@1 19 ["FIELD_notes"] = "Player/Officer notes",
farmbuyer@1 20
farmbuyer@1 21 -- Something needs to be done about the walls of description text below.
farmbuyer@1 22 }
farmbuyer@1 23 --elseif .... end
farmbuyer@1 24
farmbuyer@1 25 local guild_selection, log_ever_shown
farmbuyer@1 26 addon.options = {
farmbuyer@1 27 name = "Guild Delta",
farmbuyer@1 28 type = 'group',
farmbuyer@1 29 handler = addon, -- functions listed as strings called as addon:func
farmbuyer@1 30 args = {
farmbuyer@1 31 version = {
farmbuyer@1 32 --name = filled in during OnEnable
farmbuyer@1 33 type = 'description',
farmbuyer@1 34 fontSize = "large",
farmbuyer@1 35 --image = "Interface\\AddOns\\GuildDelta\\test2",
farmbuyer@1 36 cmdHidden = true,
farmbuyer@1 37 order = 1,
farmbuyer@1 38 },
farmbuyer@1 39 note = {
farmbuyer@1 40 --name = filled in locals section
farmbuyer@1 41 type = 'description',
farmbuyer@1 42 cmdHidden = true,
farmbuyer@1 43 width = 'full',
farmbuyer@1 44 order = 2,
farmbuyer@1 45 },
farmbuyer@1 46 reset = {
farmbuyer@1 47 name = "Reset Output",
farmbuyer@1 48 desc = "Restores default output settings",
farmbuyer@1 49 type = 'execute',
farmbuyer@1 50 order = 5,
farmbuyer@1 51 func = "SetChat",
farmbuyer@1 52 arg = DEFAULT_CHAT,
farmbuyer@1 53 },
farmbuyer@1 54 spacer2 = {
farmbuyer@1 55 name = '',
farmbuyer@1 56 type = 'description',
farmbuyer@1 57 cmdHidden = true,
farmbuyer@1 58 width = 'full',
farmbuyer@1 59 order = 6,
farmbuyer@1 60 },
farmbuyer@1 61 print_chatframes = {
farmbuyer@1 62 name = "Print Chatframe Numbers",
farmbuyer@1 63 desc = "Print each chat window number in its frame, for easy reference in the next slider option",
farmbuyer@1 64 type = 'execute',
farmbuyer@1 65 --func = print_chatframes filled in below
farmbuyer@1 66 order = 10,
farmbuyer@1 67 },
farmbuyer@1 68 chatframe_num = {
farmbuyer@1 69 name = "Output Chatframe",
farmbuyer@2 70 desc = "Which chat window to prefer for printing all the output during login",
farmbuyer@1 71 type = 'range',
farmbuyer@1 72 min = 1,
farmbuyer@1 73 max = NUM_CHAT_WINDOWS,
farmbuyer@1 74 step = 1,
farmbuyer@1 75 get = function() return tonumber(SV.chatframe) or --[[in case of custom name]]DEFAULT_CHAT end,
farmbuyer@1 76 set = "SetChat",
farmbuyer@1 77 order = 15,
farmbuyer@1 78 },
farmbuyer@1 79 chatframe_name = {
farmbuyer@1 80 name = "Chatframe Override",
farmbuyer@1 81 desc = "<Advanced> If blank, uses the numerical slider. If set, it is the NAME of a frame with AddMessage capability to use for output.",
farmbuyer@1 82 type = 'input',
farmbuyer@1 83 get = function()
farmbuyer@1 84 return type(SV.chatframe) == 'string' and SV.chatframe or nil
farmbuyer@1 85 end,
farmbuyer@1 86 set = "SetChat",
farmbuyer@1 87 order = 16,
farmbuyer@1 88 },
farmbuyer@1 89 fields = {
farmbuyer@1 90 name = "Fields",
farmbuyer@1 91 desc = "Track changes to these player fields",
farmbuyer@1 92 type = 'multiselect',
farmbuyer@1 93 order = 20,
farmbuyer@1 94 -- these need to be of function type rather than string keys of members
farmbuyer@1 95 values = function(info) return addon:MakeFieldList() end,
farmbuyer@1 96 get = function(info,x) return SV.fields[x] end,
farmbuyer@1 97 set = function(info,x,val) SV.fields[x] = val end,
farmbuyer@1 98 },
farmbuyer@1 99 spacer1 = {
farmbuyer@1 100 name = '',
farmbuyer@1 101 type = 'description',
farmbuyer@1 102 cmdHidden = true,
farmbuyer@1 103 width = 'full',
farmbuyer@1 104 order = 29,
farmbuyer@1 105 },
farmbuyer@1 106 guilds = {
farmbuyer@1 107 name = "Guilds",
farmbuyer@1 108 desc = "Guilds for which a roster is known",
farmbuyer@1 109 type = 'select',
farmbuyer@1 110 order = 30,
farmbuyer@1 111 width = 'double',
farmbuyer@1 112 values = function(info) return addon:MakeGuildList() end,
farmbuyer@1 113 get = function(info) return guild_selection end,
farmbuyer@1 114 set = function(info,val) guild_selection = val end,
farmbuyer@1 115 },
farmbuyer@1 116 clearguild = {
farmbuyer@1 117 name = "Reset Guild",
farmbuyer@1 118 desc = "Erase stored data for selected guild; information will be scanned from scratch on next login.",
farmbuyer@1 119 type = 'execute',
farmbuyer@1 120 order = 32,
farmbuyer@1 121 disabled = function() return not guild_selection end,
farmbuyer@1 122 func = function()
farmbuyer@1 123 assert(type(guild_selection)=='string')
farmbuyer@1 124 local g,r = guild_selection:match("<([^>]+)> %- (.*)")
farmbuyer@1 125 local m = SV.members[r]
farmbuyer@1 126 if m then
farmbuyer@1 127 m[g] = nil
farmbuyer@1 128 else
farmbuyer@1 129 addon:Print("Hm, error.", r, "can't be matched as a realm name. Please report this as a bug, including the name of the realm and guild.")
farmbuyer@1 130 end
farmbuyer@1 131 end,
farmbuyer@1 132 },
farmbuyer@1 133 persist = {
farmbuyer@1 134 name = "Logging",
farmbuyer@1 135 type = 'group',
farmbuyer@1 136 inline = true,
farmbuyer@1 137 order = 60,
farmbuyer@1 138 args = {
farmbuyer@1 139 note = {
farmbuyer@1 140 --name = filled in locals section
farmbuyer@1 141 type = 'description',
farmbuyer@1 142 cmdHidden = true,
farmbuyer@1 143 width = 'full',
farmbuyer@1 144 order = 1,
farmbuyer@1 145 },
farmbuyer@1 146 enable = {
farmbuyer@1 147 name = "Enable Logging",
farmbuyer@1 148 desc = [[Accumulate all deltas, including a timestamp. |cffFF0000WARNING|r: if logging was enabled and you turn it off, the log itself will not be saved when exiting the game.]],
farmbuyer@1 149 type = 'toggle',
farmbuyer@1 150 order = 2,
farmbuyer@1 151 get = function() return SV.logging end,
farmbuyer@1 152 set = function(i,v)
farmbuyer@1 153 SV.logging = v
farmbuyer@1 154 log_ever_shown = SV.logging or log_ever_shown
farmbuyer@1 155 end,
farmbuyer@1 156 },
farmbuyer@1 157 clearlog = {
farmbuyer@1 158 name = "Reset Log",
farmbuyer@1 159 desc = "Erase accumulated deltas.",
farmbuyer@1 160 type = 'execute',
farmbuyer@1 161 order = 3,
farmbuyer@1 162 hidden = function() return not (SV.logging or log_ever_shown) end,
farmbuyer@1 163 disabled = function() return not SV.logging end,
farmbuyer@1 164 func = function()
farmbuyer@1 165 SV.logtext = nil
farmbuyer@1 166 end,
farmbuyer@1 167 },
farmbuyer@1 168 log = {
farmbuyer@1 169 name = "Log",
farmbuyer@1 170 desc = "If you make changes, don't forget to click 'Accept' to save them.",
farmbuyer@1 171 type = 'input',
farmbuyer@1 172 order = 10,
farmbuyer@1 173 multiline = 15,
farmbuyer@1 174 width = 'full',
farmbuyer@1 175 hidden = function() return not (SV.logging or log_ever_shown) end,
farmbuyer@1 176 disabled = function() return not SV.logging end,
farmbuyer@1 177 get = function() return SV.logtext end,
farmbuyer@1 178 set = function(i,t) SV.logtext = t end,
farmbuyer@1 179 },
farmbuyer@1 180 },
farmbuyer@1 181 },
farmbuyer@1 182 }
farmbuyer@1 183 }
farmbuyer@1 184
farmbuyer@1 185
farmbuyer@1 186 -----------------------------------------------------------------------------
farmbuyer@1 187 -- other locals
farmbuyer@1 188 local tinsert, GetGuildRosterInfo = _G.table.insert, _G.GetGuildRosterInfo
farmbuyer@1 189 local chatframe, fieldlist
farmbuyer@1 190 local function prt (...)
farmbuyer@1 191 return chatframe:AddMessage(...)
farmbuyer@1 192 end
farmbuyer@1 193 local function cprt (txt)
farmbuyer@1 194 if SV.logging then addon:AddLogNote(txt) end
farmbuyer@1 195 return prt(txt, 255/255, 26/255, 160/255)
farmbuyer@1 196 end
farmbuyer@1 197
farmbuyer@1 198 function addon:current_guild_info (N)
farmbuyer@1 199 local ret = {}
farmbuyer@1 200 for i = 1, N do
farmbuyer@1 201 local name,rank_as_string,_,level,_,_,publicnote,officernote = GetGuildRosterInfo(i)
farmbuyer@1 202 -- This technically does not work out to the same as A?B:C, combined
farmbuyer@1 203 -- with the logic below. It does, however, still result in the entry
farmbuyer@1 204 -- not appearing in the returned table.
farmbuyer@1 205 publicnote = publicnote ~= "" and publicnote or nil
farmbuyer@1 206 officernote = officernote ~= "" and officernote or nil
farmbuyer@1 207 if name then -- redundant, but apparently happens on extreme lag
farmbuyer@1 208 tinsert(ret,
farmbuyer@1 209 {name = name,
farmbuyer@1 210 rank = SV.fields.rank and rank_as_string or nil,
farmbuyer@1 211 level = SV.fields.level and level or nil,
farmbuyer@1 212 pnote = SV.fields.notes and publicnote or nil,
farmbuyer@1 213 onote = SV.fields.notes and officernote or nil,
farmbuyer@1 214 })
farmbuyer@1 215 end
farmbuyer@1 216 end
farmbuyer@1 217 table.sort(ret, function (l,r) return l.name < r.name end)
farmbuyer@1 218 return ret
farmbuyer@1 219 end
farmbuyer@1 220
farmbuyer@1 221 function addon.options.args.print_chatframes.func()
farmbuyer@1 222 for i = 1, NUM_CHAT_WINDOWS do
farmbuyer@2 223 local cf = _G['ChatFrame'..i]
farmbuyer@1 224 if not cf then break end
farmbuyer@1 225 addon:Print(cf, "This is frame number", i)
farmbuyer@1 226 end
farmbuyer@1 227 end
farmbuyer@1 228
farmbuyer@1 229 addon.options.args.note.name =
farmbuyer@1 230 "You can use the '/guilddelta' command to open the options window.\n\n"..
farmbuyer@1 231 "The guild roster has already been scanned by the time you see this. Therefore, "..
farmbuyer@1 232 "if you make any changes to the Fields section below, you should probably relog "..
farmbuyer@1 233 "immediately to begin tracking the changed fields. Changes to the contents *OF* "..
farmbuyer@1 234 "those fields will not be noticed until the first login after *that*.\n\n"
farmbuyer@1 235
farmbuyer@1 236 addon.options.args.persist.args.note.name =
farmbuyer@1 237 "Enabling logging will accumulate the text of the 'deltas' as you see them. "..
farmbuyer@1 238 "This can grow large over time, depending on the activity of your guilds, so you "..
farmbuyer@1 239 "should use the Reset Log button below from time to time.\n\n"..
farmbuyer@1 240 "If you click inside the text area below, you can use Control-A to select all "..
farmbuyer@1 241 "the text, and Control-C to copy it to your computer's clipboard. If you make "..
farmbuyer@2 242 "any changes to the text, the changes will be preserved. (You can remove uninteresting "..
farmbuyer@1 243 "changes, add reminders to yourself, and so forth.)\n\n"
farmbuyer@1 244
farmbuyer@1 245
farmbuyer@1 246 -----------------------------------------------------------------------------
farmbuyer@1 247 addon = LibStub("AceAddon-3.0"):NewAddon(addon, "GuildDelta",
farmbuyer@1 248 "AceConsole-3.0")
farmbuyer@1 249
farmbuyer@1 250 function addon:OnInitialize()
farmbuyer@1 251 if _G.GuildDeltaSV == nil then
farmbuyer@1 252 -- Defaults need to transition from potential older savedvars
farmbuyer@1 253 _G.GuildDeltaSV = {
farmbuyer@1 254 chatframe = _G.GuildDelta_chatframe or DEFAULT_CHAT,
farmbuyer@1 255 fields = _G.GuildDelta_fields or { rank = true, level = false, notes = true },
farmbuyer@1 256 members = _G.GuildDelta_memberdata or {}
farmbuyer@1 257 }
farmbuyer@1 258 end
farmbuyer@1 259 SV = _G.GuildDeltaSV
farmbuyer@1 260 end
farmbuyer@1 261
farmbuyer@1 262 -- Remove anything that normal operation doesn't need after finishing its work.
farmbuyer@1 263 function addon:cleanup()
farmbuyer@1 264 prt = nil; cprt = nil
farmbuyer@1 265 self.current_guild_info = nil
farmbuyer@1 266 self.cleanup = nil
farmbuyer@1 267 self.unload = nil
farmbuyer@1 268 self.logquay = nil
farmbuyer@1 269 self.AddLogNote = nil
farmbuyer@1 270 self.FinishLog = nil
farmbuyer@1 271 end
farmbuyer@2 272 -- Remove everything.
farmbuyer@1 273 function addon:unload()
farmbuyer@1 274 self:cleanup()
farmbuyer@1 275 LibStub("AceAddon-3.0").addons["GuildDelta"] = nil
farmbuyer@1 276 l10n = nil; addon = nil;
farmbuyer@1 277 -- put the userdata back so it counts as a Frame object again
farmbuyer@1 278 local ud = self[0]
farmbuyer@1 279 table.wipe(self)
farmbuyer@1 280 self[0] = ud
farmbuyer@1 281 end
farmbuyer@1 282
farmbuyer@1 283 function addon:OnEnable()
farmbuyer@1 284 if not IsInGuild() then
farmbuyer@1 285 self:Print("You are not in a guild, not loading.")
farmbuyer@1 286 return self:unload()
farmbuyer@1 287 end
farmbuyer@1 288
farmbuyer@1 289 AutoCompleteInfoDelayer:HookScript("OnFinished",
farmbuyer@1 290 function() self:RegisterEvent("GUILD_ROSTER_UPDATE") end)
farmbuyer@1 291 self:SetScript("OnEvent", self.GuildUpdate)
farmbuyer@1 292
farmbuyer@1 293 self.options.args.version.name =
farmbuyer@1 294 "|cff30adffVersion " .. (GetAddOnMetadata("GuildDelta", "Version") or "?") .. "|r"
farmbuyer@1 295 LibStub("AceConfig-3.0"):RegisterOptionsTable("GuildDelta", self.options)
farmbuyer@1 296 --[[self.optionsFrame =]] LibStub("AceConfigDialog-3.0"):AddToBlizOptions("GuildDelta", "Guild Delta")
farmbuyer@1 297 self:RegisterChatCommand("guilddelta", "OnChatCommand")
farmbuyer@2 298 self:SetChat(self)
farmbuyer@1 299 log_ever_shown = SV.logging
farmbuyer@1 300 self.OnEnable = nil
farmbuyer@1 301 end
farmbuyer@1 302
farmbuyer@1 303
farmbuyer@1 304 function addon:OnChatCommand (input)
farmbuyer@1 305 if not input or input:trim() == "" then
farmbuyer@1 306 LibStub("AceConfigDialog-3.0"):Open("GuildDelta")
farmbuyer@1 307 else
farmbuyer@1 308 LibStub("AceConfigCmd-3.0").HandleCommand(self, "guilddelta", "GuildDelta", input)
farmbuyer@1 309 end
farmbuyer@1 310 end
farmbuyer@1 311
farmbuyer@1 312
farmbuyer@2 313 -- 1 arg: (self) called during startup to initialize
farmbuyer@2 314 -- (other) resetting via menus to defaults (see arg field)
farmbuyer@2 315 -- 2 args: setting via menus to new value, number or custom name (see value)
farmbuyer@1 316 function addon:SetChat (info, value)
farmbuyer@1 317 local n, nframe
farmbuyer@2 318 local isauto = info == self
farmbuyer@2 319 if isauto then
farmbuyer@2 320 n = SV.chatframe
farmbuyer@2 321 else -- coming via menu
farmbuyer@1 322 n = info.arg or value
farmbuyer@1 323 end
farmbuyer@1 324 if type(n) == 'number' then
farmbuyer@2 325 if isauto then
farmbuyer@2 326 -- start at the preferred number and find a non-minimized and
farmbuyer@2 327 -- potentially visible frame
farmbuyer@2 328 n = math.min(n,NUM_CHAT_WINDOWS)
farmbuyer@2 329 local cf,cft
farmbuyer@2 330 for i = n, 1, -1 do
farmbuyer@2 331 cf = _G['ChatFrame'..i]
farmbuyer@2 332 cft = _G[cf:GetName()..'Tab']
farmbuyer@2 333 if cft:IsVisible() then
farmbuyer@2 334 n = i
farmbuyer@2 335 break
farmbuyer@2 336 end
farmbuyer@2 337 end
farmbuyer@2 338 end
farmbuyer@2 339 nframe = _G['ChatFrame'..n]
farmbuyer@1 340 else
farmbuyer@2 341 nframe = _G[n] -- advanced name
farmbuyer@1 342 end
farmbuyer@1 343 if type(nframe) == 'table' and type(nframe.AddMessage) == 'function' then
farmbuyer@2 344 if not isauto then
farmbuyer@2 345 SV.chatframe = n
farmbuyer@1 346 self:Print("Now printing to chat frame", n,
farmbuyer@1 347 (type(nframe.name)=='string' and ("(".. nframe.name .. ")") or ""))
farmbuyer@1 348 end
farmbuyer@1 349 chatframe = nframe
farmbuyer@1 350 else
farmbuyer@1 351 self:Printf("EEEEEEEK! '%s' was not a valid chat frame number/name, no change has been made.", n)
farmbuyer@1 352 end
farmbuyer@1 353 end
farmbuyer@1 354
farmbuyer@1 355
farmbuyer@1 356 -- Not a "normal" PLAYER_LOGOUT handler; this only fires if the player is in
farmbuyer@1 357 -- a guild and the update has already run.
farmbuyer@1 358 function addon:PLAYER_LOGOUT()
farmbuyer@1 359 if not SV.logging then
farmbuyer@1 360 SV.logtext = nil
farmbuyer@1 361 end
farmbuyer@1 362 end
farmbuyer@1 363
farmbuyer@1 364
farmbuyer@1 365 function addon:GuildUpdate()
farmbuyer@1 366 local current_n = GetNumGuildMembers(true)
farmbuyer@1 367 if current_n <= 0 then
farmbuyer@1 368 -- catch the hell up, servers...
farmbuyer@1 369 return GuildRoster()
farmbuyer@1 370 end
farmbuyer@1 371 self:UnregisterEvent("GUILD_ROSTER_UPDATE")
farmbuyer@1 372 self:SetScript("OnEvent", self.PLAYER_LOGOUT) -- keepin' it real^H^H^H^Hsmall and kludgey
farmbuyer@1 373 self:RegisterEvent("PLAYER_LOGOUT")
farmbuyer@1 374 self.GuildUpdate = nil
farmbuyer@1 375
farmbuyer@2 376 if SV.logtext and #SV.logtext > 20000 then
farmbuyer@2 377 self:Print("Your accumulated logfile has grown rather large; you should consider copying it out and clearing it.")
farmbuyer@2 378 end
farmbuyer@2 379
farmbuyer@1 380 local guild, realm = (GetGuildInfo("player")), GetRealmName()
farmbuyer@1 381 local members = SV.members
farmbuyer@1 382 if members[realm]
farmbuyer@1 383 and members[realm][guild]
farmbuyer@1 384 and #(members[realm][guild]) > 0
farmbuyer@1 385 then
farmbuyer@1 386 -- moved the normal case below
farmbuyer@1 387 else
farmbuyer@1 388 -- new user, or new guild, or any number of things
farmbuyer@1 389 self:Print("GuildDelta initializing roster...")
farmbuyer@1 390 members[realm] = members[realm] or {}
farmbuyer@1 391 members[realm][guild] = self:current_guild_info(current_n)
farmbuyer@2 392 return self:cleanup()
farmbuyer@1 393 end
farmbuyer@1 394
farmbuyer@1 395 -- table.insert with notes if available
farmbuyer@1 396 -- concatentation of all strings faster than string.format
farmbuyer@1 397 local function tins (t, x)
farmbuyer@1 398 local s = x.name
farmbuyer@1 399 if x.onote and (x.onote ~= "") then
farmbuyer@1 400 s = s .. "(" .. l10n.Oabbrev .. ": " .. x.onote .. ")"
farmbuyer@1 401 end
farmbuyer@1 402 if x.pnote and (x.pnote ~= "") then
farmbuyer@1 403 s = s .. "(" .. x.pnote .. ")"
farmbuyer@1 404 end
farmbuyer@1 405 tinsert(t, s)
farmbuyer@1 406 end
farmbuyer@1 407
farmbuyer@1 408 -- build the current list
farmbuyer@1 409 local previous, current = members[realm][guild],
farmbuyer@1 410 self:current_guild_info(current_n)
farmbuyer@1 411 local previous_n = #previous
farmbuyer@1 412
farmbuyer@1 413 -- walk both and do equivalence comparison
farmbuyer@1 414 local joined, left, rank, level, notes = {}, {}, {}, {}, {}
farmbuyer@1 415 local p, c = 1, 1
farmbuyer@1 416 while p <= previous_n and c <= current_n do
farmbuyer@1 417 local P, C = previous[p], current[c]
farmbuyer@1 418
farmbuyer@1 419 if P.name == C.name then
farmbuyer@1 420 -- normal case
farmbuyer@1 421 p = p + 1
farmbuyer@1 422 c = c + 1
farmbuyer@1 423 -- but can now compare details
farmbuyer@1 424 if C.rank and P.rank and (P.rank ~= C.rank) then
farmbuyer@1 425 tinsert(rank, {C.name, P.rank.." --> "..C.rank})
farmbuyer@1 426 end
farmbuyer@1 427 if C.level and P.level and (P.level ~= C.level) then
farmbuyer@1 428 tinsert(level, {C.name, P.level.." --> "..C.level})
farmbuyer@1 429 end
farmbuyer@1 430 if C.pnote and (P.pnote ~= C.pnote) then
farmbuyer@1 431 tinsert(notes, {C.name, C.pnote})
farmbuyer@1 432 end
farmbuyer@1 433 if C.onote and (P.onote ~= C.onote) then
farmbuyer@1 434 tinsert(notes, {C.name, "["..l10n.Oabbrev.."]: "..C.onote})
farmbuyer@1 435 end
farmbuyer@1 436
farmbuyer@1 437 elseif P.name < C.name then
farmbuyer@1 438 -- entry at index p not at c -> somebody has left
farmbuyer@1 439 tins (left, P)
farmbuyer@1 440 p = p + 1
farmbuyer@1 441
farmbuyer@1 442 else
farmbuyer@1 443 -- entry at index c not at p -> somebody has joined
farmbuyer@1 444 tins (joined, C)
farmbuyer@1 445 c = c + 1
farmbuyer@1 446 end
farmbuyer@1 447 end
farmbuyer@1 448
farmbuyer@1 449 -- leftovers
farmbuyer@1 450 for i = p, previous_n do
farmbuyer@1 451 tins (left, previous[i])
farmbuyer@1 452 end
farmbuyer@1 453 for i = c, current_n do
farmbuyer@1 454 tins (joined, current[i])
farmbuyer@1 455 end
farmbuyer@1 456
farmbuyer@1 457 -- show results
farmbuyer@1 458 if SV.logging then self.logquay = {} end
farmbuyer@1 459 local m
farmbuyer@1 460 if #left > 0 then
farmbuyer@1 461 m = l10n.LEFT .. table.concat(left, ", ")
farmbuyer@1 462 cprt(m)
farmbuyer@1 463 end
farmbuyer@1 464
farmbuyer@1 465 if #joined > 0 then
farmbuyer@1 466 m = l10n.JOINED .. table.concat(joined, ", ")
farmbuyer@1 467 cprt(m)
farmbuyer@1 468 end
farmbuyer@1 469
farmbuyer@1 470 if #rank > 0 then
farmbuyer@1 471 cprt(l10n.RANK)
farmbuyer@1 472 for i = 1, #rank do
farmbuyer@1 473 cprt(rank[i][1]..': '..rank[i][2])
farmbuyer@1 474 end
farmbuyer@1 475 end
farmbuyer@1 476
farmbuyer@1 477 if #level > 0 then
farmbuyer@1 478 cprt(l10n.LEVEL)
farmbuyer@1 479 for i = 1, #level do
farmbuyer@1 480 cprt(level[i][1]..': '..level[i][2])
farmbuyer@1 481 end
farmbuyer@1 482 end
farmbuyer@1 483
farmbuyer@1 484 if #notes > 0 then
farmbuyer@1 485 cprt(l10n.NOTES)
farmbuyer@1 486 for i = 1, #notes do
farmbuyer@1 487 cprt(notes[i][1]..': "'..notes[i][2]..'"')
farmbuyer@1 488 end
farmbuyer@1 489 end
farmbuyer@1 490
farmbuyer@1 491 if SV.logging then self:FinishLog(guild,realm) end
farmbuyer@1 492 members[realm][guild] = current
farmbuyer@2 493 self:cleanup()
farmbuyer@1 494 end
farmbuyer@1 495
farmbuyer@1 496
farmbuyer@1 497 function addon:MakeFieldList()
farmbuyer@1 498 if not fieldlist then
farmbuyer@1 499 fieldlist = {}
farmbuyer@1 500 for name in pairs(SV.fields) do
farmbuyer@1 501 fieldlist[name] = l10n["FIELD_"..name]
farmbuyer@1 502 end
farmbuyer@1 503 end
farmbuyer@1 504 return fieldlist
farmbuyer@1 505 end
farmbuyer@1 506
farmbuyer@1 507 function addon:MakeGuildList()
farmbuyer@1 508 local list = {}
farmbuyer@1 509 local K
farmbuyer@1 510 for rname,rdata in pairs(SV.members) do
farmbuyer@1 511 for g in pairs(rdata) do
farmbuyer@1 512 K = ("<%s> - %s"):format(g,rname)
farmbuyer@1 513 list[K] = K
farmbuyer@1 514 end
farmbuyer@1 515 end
farmbuyer@1 516 return list
farmbuyer@1 517 end
farmbuyer@1 518
farmbuyer@1 519 function addon:AddLogNote (txt)
farmbuyer@1 520 tinsert(self.logquay,txt)
farmbuyer@1 521 end
farmbuyer@1 522
farmbuyer@1 523 function addon:FinishLog(g,r)
farmbuyer@1 524 if #self.logquay > 0 then
farmbuyer@1 525 Calendar_LoadUI()
farmbuyer@1 526 local _,M,D,Y = CalendarGetDate()
farmbuyer@1 527 local h,m = GetGameTime()
farmbuyer@1 528 local timestamp = ("%.4d/%.2d/%.2d %.2d:%.2d <%s> - %s\n"):format(Y,M,D,h,m,g,r)
farmbuyer@1 529 SV.logtext = timestamp
farmbuyer@1 530 .. table.concat(self.logquay, '\n')
farmbuyer@1 531 .. (SV.logtext and ('\n\n'..SV.logtext) or '')
farmbuyer@1 532 end
farmbuyer@1 533 end
farmbuyer@1 534
farmbuyer@1 535 -- vim:noet