WebSVN – vanilla-wow-addons – Blame – Rev 1 – /g/GFW

	elseif ( event == "QUEST_COMPLETE" or event == "QUEST_DETAIL" or event == "QUEST_FINISHED" or event == "QUEST_PROGRESS" or event == "QUEST_GREETING") then

160

FLT_ScanQuestgiver();

161

elseif ( event == "TRADE_SKILL_SHOW" or event == "TRADE_SKILL_UPDATE" ) then

162

FLT_ScanTradeSkill();

163

elseif ( event == "CRAFT_SHOW" or event == "CRAFT_UPDATE" ) then

164

FLT_ScanCraft();

165

elseif (event == "CHAT_MSG_CHANNEL") then

166

		--DevTools_Dump({event=event, args={arg1=arg1,arg2=arg2,arg3=arg3,arg4=arg4,arg5=arg5,arg6=arg6,arg7=arg7,arg8=arg8,arg9=arg9,}});

167

if (FLT_Debug) then

168

debugprofilestart();

169

end

170

local gotLink = FLT_ProcessLinks(arg1);

171

if (FLT_Debug) then

172

local parseTime = debugprofilestop();

173

if (gotLink) then

174

FLT_MaxFoundTime = math.max((FLT_MaxFoundTime or 0), parseTime);

175

else

176

FLT_MaxNotFoundTime = math.max((FLT_MaxNotFoundTime or 0), parseTime);

end

end

else

FLT_ProcessLinks(arg1);

end

end

function FLT_ChatCommandHandler(msg)

185

186

-- Print Help

187

if ( msg == "help" ) or ( msg == "" ) then

188

GFWUtils.Print("Fizzwidget Linkerator "..FLT_VERSION..":");

189

GFWUtils.Print("/linkerator (or /link) <command>");

190

GFWUtils.Print("- "..GFWUtils.Hilite("help").." - Print this helplist.");

191

		GFWUtils.Print("- "..GFWUtils.Hilite("<item name>").." - Print a hyperlink to the chat window for an item known by name.");

192

		GFWUtils.Print("- "..GFWUtils.Hilite("<item id #>").." - Print a hyperlink to the chat window for a generic item whose ID number is known.");

193

		GFWUtils.Print("- "..GFWUtils.Hilite("<code>").." - Print a hyperlink to the chat window for an item whose complete link code is known.");

return;

end

if (msg == "version") then

198

GFWUtils.Print("Fizzwidget Linkerator "..FLT_VERSION);

return;

end

if (msg == "list") then

203

local totalCount, knownCount = 0, 0;

204

for name, linkInfo in FLT_ItemLinks do

205

if (type(linkInfo) == "string") then

206

totalCount = totalCount + 1;

207

local link = FLT_GetItemLink(linkInfo);

208

if (link) then

209

GFWUtils.Print(link);

210

knownCount = knownCount + 1;

211

else

212

GFWUtils.Print(name.." ("..linkInfo.."; not cached)");

213

end

214

elseif (type(linkInfo) == "table") then

215

for _, linkID in linkInfo do

216

totalCount = totalCount + 1;

217

local link = FLT_GetItemLink(linkID);

218

if (link) then

219

GFWUtils.Print(link);

220

knownCount = knownCount + 1;

221

else

222

GFWUtils.Print(name.." ("..linkID.."; not cached)");

end

end

end

end

GFWUtils.Print(GFWUtils.Hilite(totalCount).." items in history, "..GFWUtils.Hilite(knownCount).." known to client.");

return;

end

if (msg == "count") then

232

local totalCount, knownCount = 0, 0;

233

for name, linkInfo in FLT_ItemLinks do

234

if (type(linkInfo) == "string") then

235

totalCount = totalCount + 1;

236

local link = FLT_GetItemLink(linkInfo);

237

if (link) then

238

knownCount = knownCount + 1;

239

end

240

elseif (type(linkInfo) == "table") then

241

for _, linkID in linkInfo do

242

totalCount = totalCount + 1;

243

local link = FLT_GetItemLink(linkID);

244

if (link) then

245

knownCount = knownCount + 1;

end

end

end

end

GFWUtils.Print(GFWUtils.Hilite(totalCount).." items in history, "..GFWUtils.Hilite(knownCount).." known to client.");

return;

end

if (FLT_Debug and msg == "time") then

255

		GFWUtils.Print(string.format("Max parse time "..GFWUtils.Hilite("%.2f").." ms (no links found)", FLT_MaxNotFoundTime * 1000));

256

		GFWUtils.Print(string.format("Max parse time "..GFWUtils.Hilite("%.2f").." ms (links found)", FLT_MaxFoundTime * 1000));

return;

end

if (msg == "debug") then

261

if (FLT_Debug) then

262

FLT_Debug = nil;

263

GFWUtils.Print("Linkerator debugging messages off.");

264

else

265

FLT_Debug = 1;

266

GFWUtils.Print("Linkerator debugging messages on.");

end

return;

end

if (msg == "import") then

272

local lootLinkCount = 0;

273

if (ItemLinks and type(ItemLinks) == "table") then

274

for itemName, lootLinkInfo in ItemLinks do

275

if (lootLinkInfo.i and type(lootLinkInfo.i) == "string") then

276

local itemLink = "item:"..lootLinkInfo.i;

277

local addedLink = FLT_AddLink(itemName, itemLink);

278

if (addedLink) then

279

lootLinkCount = lootLinkCount + 1;

end

end

end

end

GFWUtils.Print(GFWUtils.Hilite(lootLinkCount).. " items imported from LootLink.");

end

local itemLink;

if (msg and msg ~= "") then

289

_, _, itemLink = string.find(msg, "(item:%d+:%d+:%d+:%d+)");

290

end

291

if (tonumber(msg)) then

292

--DevTools_Dump({msg=msg});

293

local link = FLT_GetItemLink(msg, 1);

294

if (link) then

295

GFWUtils.Print("Item ID "..msg..": "..link);

296

else

297

GFWUtils.Print("Item ID "..msg.." is unknown to this WoW client.");

298

end

299

return;

300

elseif (itemLink) then

301

--DevTools_Dump({msg=msg, itemLink=itemLink});

302

local link = FLT_GetItemLink(itemLink, 1);

303

if (link) then

304

GFWUtils.Print(itemLink..": "..link);

305

else

306

GFWUtils.Print(itemLink.." is unknown to this WoW client.");

307

end

308

return;

309

elseif (msg and msg ~= "") then

310

local foundLinks = FLT_GetLinkByName(msg, true);

311

if (foundLinks) then

312

if (type(foundLinks) == "string") then

313

if (FLT_Debug) then

314

local _, _, linkInfo = string.find(foundLinks, "(item:%d+:%d+:%d+:%d+)");

315

GFWUtils.Print(foundLinks.." ("..linkInfo..")");

316

else

317

GFWUtils.Print(foundLinks);

318

end

319

elseif (type(foundLinks) == "table") then

320

for _, aLink in foundLinks do

321

if (FLT_Debug) then

322

local _, _, linkInfo = string.find(aLink, "(item:%d+:%d+:%d+:%d+)");

323

GFWUtils.Print(aLink.." ("..linkInfo..")");

324

else

325

GFWUtils.Print(aLink);

end

end

else

GFWUtils.Print(GFWUtils.Red("Linkerator error: ").."Unexpected result from FLT_GetLinkByName().");

330

end

331

else

332

local foundCount = 0;

333

msg = string.lower(msg);

334

for itemName, linkInfo in FLT_ItemLinks do

335

if (string.find(itemName, msg)) then

336

if (type(linkInfo) == "string") then

337

local link = FLT_GetItemLink(linkInfo);

338

if (link) then

339

if (FLT_Debug) then

340

GFWUtils.Print(link.." ("..linkInfo..")");

341

else

342

GFWUtils.Print(link);

343

end

344

foundCount = foundCount + 1;

345

end

346

elseif (type(linkInfo) == "table") then

347

for _, aLink in linkInfo do

348

local link = FLT_GetItemLink(aLink);

349

if (link) then

350

if (FLT_Debug) then

351

GFWUtils.Print(link.." ("..aLink..")");

352

else

353

GFWUtils.Print(link);

354

end

355

foundCount = foundCount + 1;

end

end

end

end

end

if (foundCount > 0) then

362

GFWUtils.Print(GFWUtils.Hilite(foundCount).." links found for '"..GFWUtils.Hilite(msg).."'");

363

else

364

GFWUtils.Print("Could not find '"..GFWUtils.Hilite(msg).."' in Linkerator's item history.");

end

end

return;

end

-- If we're this far, we probably have bad input.

371

FDP_ChatCommandHandler("help");

372

end

373

374

function FLT_GetItemLink(linkInfo, shouldAdd)

375

local sName, sLink, iQuality, iLevel, sType, sSubType, iCount = GetItemInfo(linkInfo);

376

if (sName) then

377

local _, _, _, color = GetItemQualityColor(iQuality);

378

local linkFormat = "%s|H%s|h[%s]|h|r";

379

if (shouldAdd) then

380

FLT_AddLink(sName, sLink); -- add it to our name index if we're getting it from another source

381

end

382

return string.format(linkFormat, color, sLink, sName);

else

return nil;

end

end

function FLT_GetLinkByName(text, returnAll)

389

local _, _, name, property = string.find(text, "(.+)%((.-)%)" );

390

local linkInfo = FLT_ItemLinks[string.lower(text)];

391

local allResults = {};

392

if (linkInfo == nil and name and property) then

393

name = string.lower(string.gsub(name, " +$", ""));

394

property = string.lower(property);

395

linkInfo = FLT_ItemLinks[string.lower(name)];

396

end

397

if (linkInfo) then

398

if (type(linkInfo) == "string") then

399

local link = FLT_GetItemLink(linkInfo);

400

if (link) then return link; end

401

elseif (type(linkInfo) == "table" and name and property) then

402

for _, itemLink in linkInfo do

403

local _, _, _, _, type, subType, _, equipLoc = GetItemInfo(itemLink);

404

if ((type and string.find(string.lower(type), property))

405

or (subType and string.find(string.lower(subType), property))

406

or (getglobal(equipLoc) and string.find(string.lower(getglobal(equipLoc)), property))) then

407

local link = FLT_GetItemLink(itemLink);

408

if (link and returnAll) then

409

table.insert(allResults, link);

elseif (link) then

return link;

end

end

end

for _, itemLink in linkInfo do

416

if (FLT_FindInItemTooltip(property, itemLink)) then

417

if (returnAll) then

418

table.insert(allResults, FLT_GetItemLink(itemLink));

419

else

420

return FLT_GetItemLink(itemLink);

end

end

end

elseif (type(linkInfo) == "table") then

425

for _, itemLink in linkInfo do

426

local link = FLT_GetItemLink(itemLink);

427

if (link and returnAll) then

428

table.insert(allResults, link);

elseif (link) then

return link;

end

end

else

GFWUtils.Print(GFWUtils.Red("Linkerator error: ").."Corrupt table entry for "..GFWUtils.Hilite(name)..".");

435

end

436

elseif (string.find(text, "^(item:%d+:%d+:%d+:%d+)$")) then

437

local link = FLT_GetItemLink(text);

438

if (link) then return link; end

439

elseif (string.find(text, "^#%d+$")) then

440

local link = FLT_GetItemLink(string.sub(text,2));

441

if (link) then return link; end

442

end

443

if (returnAll and table.getn(allResults) > 0) then

return allResults;

end

end

function FLT_ProcessLinks(text)

local lastLink;

if ( text ) then

local link, name;

for link, name in string.gfind(text, "|c%x+|H(item:%d+:%d+:%d+:%d+)|h%[(.-)%]|h|r") do

453

if (link and name and name ~= "") then

454

lastLink = FLT_AddLink(name, link);

end

end

end

return lastLink;

end

function FLT_AddLink(name, link)

462

local cleanLink = string.gsub(link, "item:(%d+):%d+:(%d+):%d+", "item:%1:0:%2:0"); -- strip uniqID, enchant

463

name = string.lower(name); -- so we can do case-insensitive lookups

464

local existingLink = FLT_ItemLinks[name];

465

if (existingLink and existingLink ~= cleanLink) then

466

if (type(existingLink) == "string") then

467

FLT_ItemLinks[name] = {};

468

table.insert(FLT_ItemLinks[name], existingLink);

469

table.insert(FLT_ItemLinks[name], cleanLink);

470

			if (FLT_Debug) then GFWUtils.Print("Added "..(FLT_GetItemLink(cleanLink) or name).." ("..cleanLink.."); changed to table"); end

471

elseif (type(existingLink) == "table") then

472

if (GFWTable.KeyOf(existingLink, cleanLink) == nil) then

473

FLT_ItemLinks[name] = GFWTable.Merge(existingLink, {cleanLink});

474

				if (FLT_Debug) then GFWUtils.Print("Added "..(FLT_GetItemLink(cleanLink) or name).." ("..cleanLink.."); table count is now "..GFWTable.Count(FLT_ItemLinks[name])); end

475

end

476

else

477

			GFWUtils.PrintOnce("Corrupt entry for "..GFWUtils.Hilite(name).."; replacing with "..FLT_GetItemLink(cleanLink)..".", 60);

478

FLT_ItemLinks[name] = cleanLink;

479

end

480

elseif (existingLink == nil) then

481

FLT_ItemLinks[name] = cleanLink;

482

if (FLT_Debug) then GFWUtils.Print("Added "..(FLT_GetItemLink(cleanLink) or name).." ("..cleanLink..")"); end

end

return cleanLink;

end

function FLT_InspectSlot(unit, id)

488

local link = GetInventoryItemLink(unit, id);

489

if ( link ) then

490

FLT_ProcessLinks(link);

end

end

function FLT_Inspect(who)

495

local index;

496

497

for index = 1, getn(INVENTORY_SLOT_LIST), 1 do

498

FLT_InspectSlot(who, INVENTORY_SLOT_LIST[index].id)

end

end

function FLT_ScanTradeSkill()

503

if (not TradeSkillFrame or not TradeSkillFrame:IsVisible() or FLT_TradeSkillLock.Locked) then return; end

504

-- This prevents further update events from being handled if we're already processing one.

505

-- This is done to prevent the game from freezing under certain conditions.

506

FLT_TradeSkillLock.Locked = true;

507

508

local skillLineName, skillLineRank, skillLineMaxRank = GetTradeSkillLine();

509

if not (skillLineName) then

510

FLT_TradeSkillLock.NeedScan = true;

511

return; -- apparently sometimes we're called too early, this is nil, and all hell breaks loose.

512

end

513

514

for id = 1, GetNumTradeSkills() do

515

local skillName, skillType, numAvailable, isExpanded = GetTradeSkillInfo(id);

516

if ( skillType ~= "header" ) then

517

local itemLink = GetTradeSkillItemLink(id);

518

if (itemLink == nil) then

519

FLT_TradeSkillLock.NeedScan = true;

520

else

521

FLT_ProcessLinks(itemLink);

522

for i=1, GetTradeSkillNumReagents(id), 1 do

523

local link = GetTradeSkillReagentItemLink(id, i);

524

if (link == nil) then

525

FLT_TradeSkillLock.NeedScan = true;

526

break;

527

else

528

FLT_ProcessLinks(link);

end

end

end

end

end

end

function FLT_ScanCraft()

538

if (not CraftFrame or not CraftFrame:IsVisible() or FLT_CraftLock.Locked) then return; end

539

-- This prevents further update events from being handled if we're already processing one.

540

-- This is done to prevent the game from freezing under certain conditions.

541

FLT_CraftLock.Locked = true;

542

543

-- This is used only for Enchanting

544

local skillLineName, rank, maxRank = GetCraftDisplaySkillLine();

545

if not (skillLineName) then

546

return; -- Hunters' Beast Training also uses the CraftFrame, but doesn't have a SkillLine.

547

end

548

549

for id = GetNumCrafts(), 1, -1 do

550

if ( craftType ~= "header" ) then

551

local itemLink = GetCraftItemLink(id);

552

if (itemLink == nil) then

553

FLT_TradeSkillLock.NeedScan = true;

554

else

555

FLT_ProcessLinks(itemLink);

556

557

for i=1, GetCraftNumReagents(id), 1 do

558

local link = GetCraftReagentItemLink(id, i);

559

if (link == nil) then

560

FLT_CraftLock.NeedScan = true;

561

break;

562

else

563

FLT_ProcessLinks(link);

end

end

end

end

end

end

function FLT_ScanQuestgiver()

572

local link;

573

for i = 1, GetNumQuestItems() do

574

link = GetQuestItemLink("required", i);

575

if (link) then

576

FLT_ProcessLinks(link);

577

end

578

end

579

for i = 1, GetNumQuestChoices() do

580

link = GetQuestItemLink("choice", i);

581

if (link) then

582

FLT_ProcessLinks(link);

583

end

584

end

585

for i = 1, GetNumQuestRewards() do

586

link = GetQuestItemLink("reward", i);

587

if (link) then

588

FLT_ProcessLinks(link);

end

end

end

function FLT_ScanInventory()

594

local bagid, size, slotid, link;

595

596

for bagid = 0, 4, 1 do

597

size = GetContainerNumSlots(bagid);

598

if( size ) then

599

for slotid = size, 1, -1 do

600

link = GetContainerItemLink(bagid, slotid);

601

if( link ) then

602

FLT_ProcessLinks(link);

end

end

end

end

end

function FLT_ScanAuction()

610

local numBatchAuctions, totalAuctions = GetNumAuctionItems("list");

611

local auctionid, link;

612

613

if( numBatchAuctions > 0 ) then

614

for auctionid = 1, numBatchAuctions do

615

link = GetAuctionItemLink("list", auctionid);

616

if( link ) then

617

FLT_ProcessLinks(link);

end

end

end

end

function FLT_ScanBank()

624

local index, bagid, size, slotid, link;

625

local lBankBagIDs = { BANK_CONTAINER, 5, 6, 7, 8, 9, 10, };

626

627

for index, bagid in lBankBagIDs do

628

size = GetContainerNumSlots(bagid);

629

if( size ) then

630

for slotid = size, 1, -1 do

631

link = GetContainerItemLink(bagid, slotid);

632

if( link ) then

633

FLT_ProcessLinks(link);

end

end

end

end

end

function FLT_LinkifyName(head, text, tail)

641

if (head ~= "|h" and tail ~= "|h") then -- only linkify things text that isn't linked already

642

local link = FLT_GetLinkByName(text);

643

if (link) then return link; end

644

end

645

return head.."["..text.."]"..tail;

646

end

647

648

function FLT_FindInItemTooltip(text, link)

649

LinkeratorTip:ClearLines();

650

LinkeratorTip:SetHyperlink(link);

651

for lineNum = 1, LinkeratorTip:NumLines() do

652

local leftText = getglobal("LinkeratorTipTextLeft"..lineNum):GetText();

653

if (leftText and string.find(string.lower(leftText), text)) then return true; end

654

local rightText = getglobal("LinkeratorTipTextRight"..lineNum):GetText();

655

if (rightText and string.find(string.lower(rightText), text)) then return true; end

656

end

657

for lineNum = 1, LinkeratorTip:NumLines() do

658

-- for some reason ClearLines alone isn't clearing the right-side text

659

getglobal("LinkeratorTipTextLeft"..lineNum):SetText(nil);

660

getglobal("LinkeratorTipTextRight"..lineNum):SetText(nil);

end

end

function FLT_ParseChatMessage(text)

665

return string.gsub(text, "([|]?[h]?)%[(.-)%]([|]?[h]?)", FLT_LinkifyName);

end

-- Hooks

FLT_Orig_ChatEdit_OnTextChanged = ChatEdit_OnTextChanged;

671

function ChatEdit_OnTextChanged()

672

local text = this:GetText();

673

if (string.find(text, "^/script") or string.find(text, "^/dump")) then

674

-- don't parse

675

else

676

text = FLT_ParseChatMessage(text);

677

this:SetText(text);

678

end

679

FLT_Orig_ChatEdit_OnTextChanged(this);

680

end

681

682

FLT_Orig_QuestLog_UpdateQuestDetails = QuestLog_UpdateQuestDetails;

683

function QuestLog_UpdateQuestDetails()

684

for i = 1, GetNumQuestLogChoices() do

685

link = GetQuestLogItemLink("choice", i);

686

if (link) then

687

FLT_ProcessLinks(link);

688

end

689

end

690

for i = 1, GetNumQuestLogRewards() do

691

link = GetQuestLogItemLink("reward", i);

692

if (link) then

693

FLT_ProcessLinks(link);

694

end

695

end

696

FLT_Orig_QuestLog_UpdateQuestDetails();

697

end

vanilla-wow-addons – Blame information for rev 1