WebSVN – vanilla-wow-addons – Blame – Rev 1

		local skillName, header, isExpanded, skillRank, numTempPoints, skillModifier, skillMaxRank, isAbandonable, stepCost, rankCost, minLevel, skillCostType = GetSkillLineInfo(i);

305

if (header == 1) then

306

grp = skillName;

307

else

308

local id = GAS_GetSkillId(skillName);

309

if (id > 0) then

310

GAC_SendSkill(who, id, skillRank, skillMaxRank, delay)

end

end

end

end

function GAC_SendInventory(who, slot, texture, color, ref, name, count)

317

SimpleComm_SendMessage(

318

who,

319

{

320

command = GUILDADS_MSG_ADD;

321

adtype = GUILDADS_MSG_TYPE_INVENTORY;

id = slot;

itemRef = ref;

itemName = name;

itemColor = color;

count = count;

texture = texture;

creationtime = GAS_currentTime()

}

);

end

function GAC_SendInspect(who)

334

local buffer = {};

335

for slot=1, 19, 1 do

336

local link = GetInventoryItemLink("player", slot);

337

if (link) then

338

-- local title = TEXT(getglobal(strupper(SlotIdText[slot])));

339

local texture = GetInventoryItemTexture("player", slot);

340

local count = GetInventoryItemCount("player", slot);

341

local color, ref, name = GAS_UnpackLink(link);

tinsert(buffer, {

slot = slot,

texture = texture,

color = color,

ref = ref,

name = name,

count = count

}

);

end

end

GAC_SendingUpdate(who, table.getn(buffer));

355

local index = 1;

356

while buffer[index] do

357

		GAC_SendInventory(who, buffer[index].slot, buffer[index].texture, buffer[index].color, buffer[index].ref, buffer[index].name, buffer[index].count);

index = index + 1;

end

end

function GAC_SendRequestInspect(who)

363

SimpleComm_SendMessage(

364

who,

365

{

366

command = GUILDADS_MSG_REQUEST_INSPECT

}

);

end

function GAC_SendRequestOfflines(who)

372

DEBUG_MSG("GAC_SendRequestOfflines("..NoNil(who)..")");

373

LastSeens[who] = {};

374

SimpleComm_SendMessage(

375

who,

376

{

377

command = GUILDADS_MSG_REQUEST_OFFLINES

}

);

end

function GAC_SendRequestAds(who, owner)

383

DEBUG_MSG("GAC_SendRequestAds("..NoNil(who)..")");

384

SimpleComm_SendMessage(

385

who,

386

{

387

command = GUILDADS_MSG_REQUEST_ADS;

owner = owner

}

);

end

function GAC_SendAnnonce(who, owner)

395

local powner, level, race, class, name, guildName, guildRankName, guildRankIndex, creationtime;

396

if (owner) then

397

powner = GAS_ProfileGet(owner);

398

level = powner.level;

399

race = powner.race;

400

class = powner.class;

401

name = owner;

402

guildName = powner.guild;

403

creationtime = powner.creationtime;

404

accountid = powner.accountid;

405

else

406

level = UnitLevel("player");

407

race = GAS_GetRaceId(UnitRace("player"));

408

class = GAS_GetClassId(UnitClass("player"));

409

name = playerName;

410

guildName, guildRankName, guildRankIndex = GetGuildInfo("player");

411

creationtime = GAS_currentTime();

412

accountid = GAS_GetAccountId();

413

end

414

415

SimpleComm_SendMessage(

416

who,

417

{

418

command = GUILDADS_MSG_ADD;

419

adtype = GUILDADS_MSG_TYPE_ANNONCE;

420

accountId = accountid;

class = class;

race = race;

level = level;

guild = guildName;

creationtime = creationtime;

owner = owner

}

);

end

function GAC_SendRemove(who, adtype, id)

432

SimpleComm_SendMessage(

433

who,

434

{

435

command = GUILDADS_MSG_REMOVE;

adtype = adtype;

id = id

}

);

end

function GAC_SendRemoveAll(who)

443

SimpleComm_SendMessage(

444

who,

445

{

446

command = GUILDADS_MSG_REMOVE_ALL;

}

);

end

function GAC_SendingUpdate(who, count, owner, delay)

452

SimpleComm_SendMessage(

453

who,

454

{

455

command = GUILDADS_MSG_SENDING_UPDATE,

owner = owner,

count = count

},

delay

);

end

function GAC_SendingAll(who, owner)

464

SimpleComm_SendMessage(

465

who,

466

{

467

command = GUILDADS_MSG_SENDING_ALL;

owner = owner

}

);

end

function GAC_SendingAllEnd(who, owner, delay)

474

local creationtime = 0;

475

if (owner) then

476

creationtime = GAS_ProfileGetUpdatedDate(owner);

477

else

478

creationtime = GAS_ProfileGetUpdatedDate(playerName);

479

end

480

SimpleComm_SendMessage(

481

who,

482

{

483

command = GUILDADS_MSG_SENDING_ALL_END;

484

creationtime = creationtime;

owner = owner;

},

delay

);

end

function GAC_SendLastSeen(who, owner, time)

492

DEBUG_MSG("GAC_SendLastSeen("..NoNil(who)..")");

493

SimpleComm_SendMessage(

494

who,

495

{

496

command = GUILDADS_MSG_LASTSEEN;

497

creationtime = time;

owner = owner

}

);

end

function GAC_SendLastSeenEnd(who)

504

DEBUG_MSG("GAC_SendLastSeenEnd("..NoNil(who)..")");

505

SimpleComm_SendMessage(

506

who,

507

{

508

command = GUILDADS_MSG_LASTSEEN_END;

}

);

end

function GAC_SendAllAds(who, owner, adTable, ad_type, delay)

514

local size = table.getn(adTable);

515

if owner then

516

for i = 1, size, 1 do

517

if adTable[i].owner == owner then

518

GAC_SendAd(who, ad_type, adTable[i], delay);

end

end

else

for i = 1, size, 1 do

523

GAC_SendAd(who, ad_type, adTable[i], delay);

end

end

end

function GAC_SendAllAdsType(who, owner, delay)

529

DEBUG_MSG("GAC_SendAllAdsType("..NoNil(who)..","..NoNil(owner)..")");

530

531

-- On n'envois pas � who ses annonces

532

-- sauf si c'est nous m�me, ou si c'est � tout le monde

533

if (who == owner) and (who ~= playerName) and (who ~= nil) then

return;

end

-- Ads->Start

GAC_SendingAll(who, owner);

539

540

-- Ads : Guild

541

GAC_SendAnnonce(who, owner);

542

543

-- Ads : Ask/Have/Event

544

local adTables = {};

545

if (owner) then

546

adTables = GAS_GetAds();

547

else

548

adTables = GAS_GetMyAds();

549

end

550

551

GAC_SendAllAds(who, owner, adTables[GUILDADS_MSG_TYPE_REQUEST], GUILDADS_MSG_TYPE_REQUEST, delay);

552

GAC_SendAllAds(who, owner, adTables[GUILDADS_MSG_TYPE_AVAILABLE], GUILDADS_MSG_TYPE_AVAILABLE, delay);

553

GAC_SendAllAds(who, owner, adTables[GUILDADS_MSG_TYPE_EVENT], GUILDADS_MSG_TYPE_EVENT, delay);

-- Ads : Skills

if owner then

GAC_SendAllAds(who, owner, adTables[GUILDADS_MSG_TYPE_SKILL], GUILDADS_MSG_TYPE_SKILL, delay);

558

else

559

GAC_SendSkills(who, delay);

end

-- Ads->End

GAC_SendingAllEnd(who, owner, delay);

564

end

565

566

function GAC_SendMeta(who)

567

SimpleComm_SendMessage(

568

who,

569

{

570

command = GUILDADS_MSG_META;

571

text = GUILDADS_VERSION;

572

creationtime = StartTime;

id = MyState;

}

);

end

function GAC_SendChatFlag(who)

579

local flag, message = SimpleComm_GetFlag(playerName);

580

SimpleComm_SendMessage(

581

nil,

582

{

583

command = GUILDADS_MSG_CHATFLAG;

flag = flag;

text = message;

}

);

end

--------------------------------------------------------------------------------

--

-- OnMessage

--

---------------------------------------------------------------------------------

595

function GAC_OnMessage(author, message)

596

if (GUILDADSCOMM_DEBUG) then

597

DEBUG_MSG("[OnMessage,"..author.."]: "..GuildAds_Serialize(message));

598

end

599

600

-- Ignore this author ?

601

if GAS_ProfileIsIgnored(author) then

return;

end

-- Set online

GAS_SetOnlineStatus(author, true);

607

608

-- A propos de quelle personne : l'auteur du message (author) ou une autre (message.owner)

609

local owner = author;

610

if (message.owner) then

611

owner = message.owner;

612

end

613

614

-- Mise � jour du dernier message de author

615

if (owner==author) and ((message.command == GUILDADS_MSG_ADD) or (message.command == GUILDADS_MSG_REMOVE)) then

616

GAS_ProfileSetUpdatedDate(author, message.creationtime);

end

--

-- Process all the messages we know about

621

--

622

if (message.command == GUILDADS_MSG_ADD) then

623

-- Accept only if :

624

-- this owner isn't ignored

625

-- AND ( this owner has sent GUILDADS_MSG_SENDING_ALL which was accepted.

626

-- OR this owner has sent a GUILDADS_MSG_SENDING_UPDATE )

627

if not GAS_ProfileIsIgnored(owner) and (MonitorAds[owner] or WatingForUpdate[owner]) then

628

--

629

local adtype = message.adtype;

630

631

-- Use this update

632

if WatingForUpdate[owner] then

633

WatingForUpdate[owner] = WatingForUpdate[owner] - 1;

634

if WatingForUpdate[owner]==0 then

635

WatingForUpdate[owner] = nil;

636

end

637

DEBUG_MSG("Count"..NoNil(WatingForUpdate[owner]));

638

end

639

640

-- Call onMessageAd

641

if OnMessageAd[adtype] then

642

if not OnMessageAd[adtype](author, message) then

return;

end

end

-- Inventory

if (adtype == GUILDADS_MSG_TYPE_INVENTORY) then

649

				GAS_ProfileSetInventorySlot(message.creationtime, owner, message.id, message.itemColor, message.itemRef, message.itemName, message.texture, message.count);

return false;

end

-- Mise � jour du profile

654

if (adtype == GUILDADS_MSG_TYPE_ANNONCE) then

655

GAS_ProfileSetGeneral(message.creationtime, owner, message.race, message.class, message.level, message.guild);

656

GAS_ProfileSetAccountId(owner, message.accountId);

657

message.guild = nil;

658

message.level = nil;

659

message.class = nil;

660

message.race = nil;

661

message.accountId = nil;

662

message.id = owner;

663

end

664

665

-- Monitor : l'annonce a �t� mise � jour

666

-- cf GUILDADS_MSG_SENDING_ALL et GUILDADS_MSG_SENDING_ALL_END

667

if adtype and owner and MonitorAds[owner] then

668

if (MonitorAds[owner][adtype] == nil) then

669

MonitorAds[owner][adtype] = {};

670

end

671

MonitorAds[owner][adtype][message.id] = true;

end

-- Scan for dupes

			if ((adtype == GUILDADS_MSG_TYPE_REQUEST) or (adtype == GUILDADS_MSG_TYPE_AVAILABLE) or (adtype == GUILDADS_MSG_TYPE_EVENT)) then

676

local ads = GAS_GetAds();

677

for k,v in ads[adtype] do

678

					if ( v.owner == owner and v.id == message.id and v.text == message.text and v.itemName == message.itemName and v.count == message.count ) then

679

-- DONT ADD IT AGAIN

680

DEBUG_MSG("GuildAds_OnMessage: Already in DB");

return false;

end

end

end

-- Effacer le pr�c�dent Id

688

GAS_RemoveByOwnerAndId(owner, adtype, message.id);

689

690

-- Efface les donnees inutiles

691

message.adtype = nil;

692

message.command = nil;

693

message.owner = owner;

694

message.currenttime = nil;

695

696

-- Traduction du nom si necessaire

697

if message.itemName and message.itemRef then

698

local info = GAS_GetItemInfo(message.itemRef);

699

if (info.name) then

700

message.itemName = info.name;

end

end

-- Ajout de l'annonce

705

GAS_AddAd(owner, adtype, message);

706

end

707

708

elseif (message.command == GUILDADS_MSG_REMOVE) then

709

-- Ignore this owner ?

710

if not GAS_ProfileIsIgnored(owner) then

711

-- A previously placed add is being removed

712

GAS_RemoveByOwnerAndId(owner, message.adtype, message.id);

713

end

714

715

elseif (message.command == GUILDADS_MSG_REQUEST_INSPECT) then

716

if not GAS_ProfileIsIgnored(owner) then

717

-- Send inspect to the author

718

-- Always my inventory

719

GAC_SendInspect(author);

720

end

721

722

elseif (message.command == GUILDADS_MSG_REQUEST_OFFLINES) then

723

if not GAS_ProfileIsIgnored(owner) then

724

-- Pour chaque personne offline

725

-- -> envois la date du dernier message

726

local ads = GAS_GetAds();

727

for i, ad in ads[GUILDADS_MSG_TYPE_ANNONCE] do

728

if (not GAS_IsOnline(ad.owner)) and (not GAS_ProfileIsIgnored(ad.owner)) then

729

GAC_SendLastSeen(author, ad.owner, GAS_ProfileGetUpdatedDate(ad.owner));

730

end

731

end

732

GAC_SendLastSeenEnd(author);

733

end

734

735

elseif (message.command == GUILDADS_MSG_LASTSEEN) then

736

if (owner ~= playerName) and (LastSeens[author]) and (not GAS_ProfileIsIgnored(owner)) then

737

LastSeens[author][owner] = true;

738

local myUpdate = GAS_ProfileGetUpdatedDate(owner);

739

if (message.creationtime ~= myUpdate) then

740

if (myUpdate) then

741

if (message.creationtime==nil or message.creationtime < myUpdate) then

742

DEBUG_MSG("LastSeen("..owner..")="..NoNil(message.creationtime).."<"..NoNil(myUpdate));

743

-- on doit faire la mise � jour pour tout le monde

744

GAC_SendAllAdsType(nil, owner);

745

elseif (message.creationtime > myUpdate) then

746

DEBUG_MSG("LastSeen("..owner..")="..NoNil(message.creationtime)..">"..NoNil(myUpdate));

747

-- on doit r�cup�rer la mise � jour

748

tinsert(WaitingOfflinesAds, owner);

749

end

750

else

751

DEBUG_MSG("LastSeen("..owner..")="..NoNil(message.creationtime).."/"..NoNil(myUpdate));

752

-- on doit r�cup�rer la mise � jour

753

tinsert(WaitingOfflinesAds, owner);

end

end

end

elseif (message.command == GUILDADS_MSG_LASTSEEN_END) then

759

if LastSeens[author] and not GAS_ProfileIsIgnored(author) then

760

-- envois les annonces des joueurs non connus.

761

local ads = GAS_GetAds();

762

for i, ad in ads[GUILDADS_MSG_TYPE_ANNONCE] do

763

-- si ad.owner est offline et non connu par author

764

-- alors on envois ses informations � propos de ad.owner

765

if (not GAS_IsOnline(ad.owner) and LastSeens[author][ad.owner]==nil) then

766

GAC_SendAllAdsType(nil, ad.owner);

end

end

-- Dernier message de author � propos des offlines

771

-- Donc on n'�coute plus les message de author

772

LastSeens[author] = nil;

773

774

--

775

if (table.getn(WaitingOfflinesAds) > 0) then

776

-- demande de mise � jour pour soi.

777

for _, owner in WaitingOfflinesAds do

778

GAC_SendRequestAds(author, owner);

779

end

780

else

781

-- aucune demande de offlines

782

-- on est donc synchro : passage a l'etat OK

783

GuildAdsSystem.SynchronizeOfflinesTimer = nil;

784

MyState = GUILDADS_STATE_OK;

GAC_SendMeta(nil);

end

end

elseif (message.command == GUILDADS_MSG_REQUEST_ADS) then

790

-- Someone is requesting ads, probably just arrived in the channel

791

-- if message.owner is set : owner's ads

792

-- if message.owner is nil : my ads (send my ads in few seconds)

793

-- owner is meaningless

794

if GuildAds.Config.PublishMyAds and not GAS_ProfileIsIgnored(owner) then

795

if (author ~= playerName) then

796

if message.owner then

797

GAC_SendAllAdsType(author, message.owner);

798

else

799

GAC_SendMeta(author);

800

GAC_SendChatFlag(author);

801

GAC_SendAllAdsType(author, nil, math.random(20));

end

end

end

elseif (message.command == GUILDADS_MSG_SENDING_UPDATE) then

807

808

WatingForUpdate[owner] = (WatingForUpdate[owner] or 0) + message.count;

809

810

elseif (message.command == GUILDADS_MSG_SENDING_ALL) then

811

if not GAS_ProfileIsIgnored(owner) then

812

-- Start recording each update ads

813

if message.owner then

814

-- Accept offline ads from owner we need. (see GUILDADS_MSG_LASTSEEN)

815

i = 1;

816

while WaitingOfflinesAds[i] and WaitingOfflinesAds[i]~=owner do

817

i = i+1;

818

end

819

if WaitingOfflinesAds[i] and WaitingOfflinesAds[i]==owner then

820

MonitorAds[owner] = {};

821

end

822

823

-- accept new ads from author who are in GUILDADS_STATE_SYNC_OFFLINE state.

824

if MetaPlayers[author] and MetaPlayers[author].state==GUILDADS_STATE_SYNC_OFFLINE then

825

MonitorAds[owner] = {};

826

end

827

else

828

-- online synchronization : ok

829

MonitorAds[owner] = {};

end

end

elseif (message.command == GUILDADS_MSG_SENDING_ALL_END) then

834

if MonitorAds[owner] and not GAS_ProfileIsIgnored(owner) then

835

836

-- Update profile date

837

if owner then

838

GAS_ProfileSetUpdatedDate(owner, message.creationtime);

839

end

840

841

-- for each owner's ads

842

-- if not updated (ie in MonitorAds), we delete it

843

local ads = GAS_GetAds();

844

for adtype, tads in ads do

845

if (MonitorAds[owner][adtype] == nil) then

846

GAS_RemoveByOwner(owner, adtype);

847

else

848

for i, ad in tads do

849

if (owner==ad.owner and MonitorAds[owner][adtype][ad.id] == nil) then

850

GAS_RemoveByOwnerAndId(owner, adtype, ad.id);

end

end

end

end

-- stop monitoring

MonitorAds[owner] = nil;

858

859

-- Unstack owner in WatingOfflineAds

860

-- if this is the last, we are sync

861

-- so set state to GUILDADS_STATE_OK

862

i = 1;

863

while WaitingOfflinesAds[i] and WaitingOfflinesAds[i]~=owner do

864

i = i+1;

865

end

866

if WaitingOfflinesAds[i] and WaitingOfflinesAds[i]==owner then

867

table.remove(WaitingOfflinesAds, i);

868

if (table.getn(WaitingOfflinesAds)==0) then

869

GuildAdsSystem.SynchronizeOfflinesTimer = nil;

870

MyState = GUILDADS_STATE_OK;

GAC_SendMeta(nil);

end

end

end

elseif (message.command == GUILDADS_MSG_REMOVE_ALL) then

878

879

if not GAS_ProfileIsIgnored(owner) then

880

-- Remove all the ads from the owner

881

GAS_RemoveByOwner(owner, GUILDADS_MSG_TYPE_ANNONCE);

882

GAS_RemoveByOwner(owner, GUILDADS_MSG_TYPE_REQUEST);

883

GAS_RemoveByOwner(owner, GUILDADS_MSG_TYPE_AVAILABLE);

884

GAS_RemoveByOwner(owner, GUILDADS_MSG_TYPE_SKILL);

885

GAS_RemoveByOwner(owner, GUILDADS_MSG_TYPE_EVENT);

886

end

887

888

elseif (message.command == GUILDADS_MSG_META) then

889

890

if not GAS_ProfileIsIgnored(author) then

891

MetaPlayers[author] = {

892

state = message.id;

893

onlineSince = message.creationtime;

894

version = message.text;

};

end

elseif (message.command == GUILDADS_MSG_CHATFLAG) then

899

900

if author~=playerName then

901

SimpleComm_SetFlag(author, message.flag, message.text);

902

end

903

904

elseif OnMessageCommand[message.command] then

905

OnMessageCommand[message.command](author, message);

906

else

907

-- This message was unknown

end

end

--------------------------------------------------------------------------------

913

--

914

-- Serialize/Unserialize

915

--

916

---------------------------------------------------------------------------------

917

function SerializeId(obj)

918

if (type(obj) == "nil" ) then

return "";

else

return obj

end

end

function UnserializeId(str)

return str;

end

function SerializeString(obj)

930

if (type(obj) == "nil" ) then

return "";

else

return obj

end

end

function UnserializeString(str)

938

if (str == "") then

return nil;

else

return str

end

end

function SerializeTexture(obj)

946

if (type(obj) == "nil" ) then

947

return "";

948

else

949

return string.gsub(obj, "Interface\\Icons\\", "\@");

end

end

function UnserializeTexture(str)

954

if (str == "") then

955

return nil;

956

else

957

return string.gsub(str, "\@", "Interface\\Icons\\");

end

end

function SerializeItemRef(obj)

962

if (type(obj) == "nil" ) then

963

return "";

964

else

965

return string.gsub(string.gsub(obj, "item\:", "\@"), ":0:0:0", "\*");

end

end

function UnserializeItemRef(str)

970

if (str == "") then

971

return nil;

972

else

973

return string.gsub(string.gsub(str, "\@", "item\:"), "\*", ":0:0:0");

end

end

function SerializeColor(obj)

978

if obj==nil then

979

return "";

980

elseif obj=="ffa335ee" then

981

return "E"; -- epic

982

elseif obj=="ff0070dd" then

983

return "R"; -- rare

984

elseif obj=="ff1eff00" then

985

return "U" -- uncommun

986

elseif obj=="ffffffff" then

987

return "C" -- common

988

elseif obj=="ff9d9d9d" then

return "P" -- poor

else

return obj;

end

end

function UnserializeColor(str)

996

if str==nil then

997

return nil

998

elseif str=="E" then

999

return "ffa335ee";

1000

elseif str=="R" then

1001

return "ff0070dd";

1002

elseif str=="U" then

1003

return "ff1eff00";

1004

elseif str=="C" then

1005

return "ffffffff";

1006

elseif str=="P" then

return "ff9d9d9d";

else

return str;

end

end

function SerializeInteger(obj)

1014

if (type(obj) == "nil" ) then

return "";

else

return obj;

end

end

function UnserializeInteger(str)

1022

return tonumber(str);

1023

end

1024

1025

function SerializeTime(obj)

1026

if (type(obj) == "nil" ) then

1027

return "";

1028

else

1029

-- convertion en base 52

1030

value = "";

1031

while (obj ~= 0) do

1032

i = floor(obj / 52);

1033

j = obj - i*52;

1034

if (j>=26) then

1035

value = string.char(65+j-26)..value;

1036

else

1037

value = string.char(96+j)..value;

end

obj = i;

end

return value;

end

end

function UnserializeTime(str)

1046

if (str == "") then

return nil;

else

number = 0;

for i=1, string.len(str),1 do

1051

o = string.byte(str, i);

if (o> 95) then

j = o-96;

else

j = o-65+26;

end

number = number*52 + j;

end

return number;

end

end

function SerializeObj(obj)

1064

if (type(obj) == "nil" ) then

1065

return "";

1066

elseif ( type(obj) == "string" ) then

1067

return "s"..string.gsub(string.gsub(string.gsub(obj, ">", ">"), "|([cHhr])", "&%1;"), "|", "&p;");

1068

elseif ( type(obj) == "number" ) then

1069

return "n"..obj;

1070

elseif ( type(obj) == "boolean" ) then

if (value) then

return "1";

else

return "0";

end

elseif ( type(obj) == "function" ) then

1077

return ""; -- nil

1078

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

return ""; -- nil

end

return "";

end

function UnserializeObj(str)

1085

if (str == "") then

1086

return nil;

1087

else

1088

typeString = string.sub(str, 0, 1);

1089

valueString = string.sub(str, 2);

1090

if (typeString == "s") then

1091

return string.gsub(string.gsub(string.gsub(valueString, ">", ">"), "&(%w);", "|%1"), "&p;", "|");

1092

elseif (typeString == "n") then

1093

return tonumber(valueString);

1094

elseif (typeString == "1") then

1095

return true;

1096

elseif (typeString == "0") then

1097

return false;

1098

else

1099

DEBUG_MSG("GuildAds_Unserialize: Type non reconnu:"..str);

return nil;

end

end

end

local SerializeMeta = {

1106

[1] = { ["key"] ="command", ["fout"]=SerializeId, ["fin"]=UnserializeId }

1107

};

1108

1109

local SerializeCommand = {

1110

[GUILDADS_MSG_ADD] = {

1111

[1] = { ["key"]="owner", ["fout"]=SerializeString, ["fin"]=UnserializeString },

1112

[2] = { ["key"]="adtype", ["fout"]=SerializeInteger, ["fin"]=UnserializeInteger },

1113

[3] = { ["key"]="id", ["fout"]=SerializeObj, ["fin"]=UnserializeObj },

1114

[4] = { ["key"]="currenttime", ["fout"]=SerializeTime, ["fin"]=UnserializeTime},

1115

[5] = { ["key"]="creationtime", ["fout"]=SerializeTime, ["fin"]=UnserializeTime},

1116

},

1117

[GUILDADS_MSG_REMOVE] = {

1118

[1] = { ["key"] ="owner", ["fout"]=SerializeString, ["fin"]=UnserializeString },

1119

[2] = { ["key"] ="adtype", ["fout"]=SerializeInteger, ["fin"]=UnserializeInteger },

1120

[3] = { ["key"] ="id", ["fout"]=SerializeObj, ["fin"]=UnserializeObj },

1121

},

1122

[GUILDADS_MSG_REMOVE_ALL] = {

1123

[1] = { ["key"] ="owner", ["fout"]=SerializeString, ["fin"]=UnserializeString },

1124

},

1125

[GUILDADS_MSG_REQUEST_ADS] = {

1126

[1] = { ["key"] ="owner", ["fout"]=SerializeString, ["fin"]=UnserializeString },

1127

},

1128

[GUILDADS_MSG_REQUEST_OFFLINES] = {},

1129

[GUILDADS_MSG_REQUEST_INSPECT] = {},

1130

[GUILDADS_MSG_SENDING_UPDATE] = {

1131

[1] = { ["key"] ="owner", ["fout"]=SerializeString, ["fin"]=UnserializeString },

1132

[2] = { ["key"] ="count", ["fout"]=SerializeInteger, ["fin"]=UnserializeInteger },

1133

},

1134

[GUILDADS_MSG_SENDING_ALL] = {

1135

[1] = { ["key"] ="owner", ["fout"]=SerializeString, ["fin"]=UnserializeString },

1136

},

1137

[GUILDADS_MSG_SENDING_ALL_END] = { -- currenttime, profiletime

1138

[1] = { ["key"] ="owner", ["fout"]=SerializeString, ["fin"]=UnserializeString },

1139

[2] = { ["key"] ="currenttime", ["fout"]=SerializeTime, ["fin"]=UnserializeTime},

1140

[3] = { ["key"] ="creationtime", ["fout"]=SerializeTime, ["fin"]=UnserializeTime },

1141

},

1142

[GUILDADS_MSG_LASTSEEN] = { -- currenttime, profiletime

1143

[1] = { ["key"] ="owner", ["fout"]=SerializeString, ["fin"]=UnserializeString },

1144

[2] = { ["key"] ="currenttime", ["fout"]=SerializeTime, ["fin"]=UnserializeTime},

1145

[3] = { ["key"] ="creationtime", ["fout"]=SerializeTime, ["fin"]=UnserializeTime },

1146

},

1147

[GUILDADS_MSG_LASTSEEN_END] = {},

1148

[GUILDADS_MSG_META] = { -- currenttime, version, starttime, id

1149

[1] = { ["key"] ="currenttime", ["fout"]=SerializeTime, ["fin"]=UnserializeTime},

1150

[2] = { ["key"] ="text", ["fout"]=SerializeString, ["fin"]=UnserializeString },

1151

[3] = { ["key"] ="creationtime", ["fout"]=SerializeTime, ["fin"]=UnserializeTime },

1152

[4] = { ["key"] ="id", ["fout"]=SerializeId, ["fin"]=UnserializeId },

1153

},

1154

[GUILDADS_MSG_CHATFLAG] = { -- flag, text

1155

[1] = { ["key"] ="flag", ["fout"]=SerializeString, ["fin"]=UnserializeString},

1156

[2] = { ["key"] ="text", ["fout"]=SerializeString, ["fin"]=UnserializeString },

},

};

local SerializeAd = {

1162

[GUILDADS_MSG_TYPE_ANNONCE] = { -- accountId, class, race, level, guild

1163

[1] = { ["key"] ="accountId", ["fout"]=SerializeObj, ["fin"]=UnserializeObj },

1164

[2] = { ["key"] ="class", ["fout"]=SerializeInteger, ["fin"]=UnserializeInteger },

1165

[3] = { ["key"] ="race", ["fout"]=SerializeInteger, ["fin"]=UnserializeInteger },

1166

[4] = { ["key"] ="level", ["fout"]=SerializeInteger, ["fin"]=UnserializeInteger },

1167

[5] = { ["key"] ="guild", ["fout"]=SerializeString, ["fin"]=UnserializeString },

1168

},

1169

[GUILDADS_MSG_TYPE_INVENTORY] = { -- itemRef, itemName, itemColor, count, texture

1170

[1] = { ["key"] ="itemColor", ["fout"]=SerializeColor, ["fin"]=UnserializeColor },

1171

[2] = { ["key"] ="itemRef", ["fout"]=SerializeItemRef, ["fin"]=UnserializeItemRef },

1172

[3] = { ["key"] ="itemName", ["fout"]=SerializeString, ["fin"]=UnserializeString },

1173

[4] = { ["key"] ="count", ["fout"]=SerializeInteger, ["fin"]=UnserializeInteger },

1174

[5] = { ["key"] ="texture", ["fout"]=SerializeTexture, ["fin"]=UnserializeTexture },

1175

},

1176

[GUILDADS_MSG_TYPE_SKILL] = { -- skillRank , skillMaxRank

1177

[1] = { ["key"] ="skillRank", ["fout"]=SerializeInteger, ["fin"]=UnserializeInteger },

1178

[2] = { ["key"] ="skillMaxRank", ["fout"]=SerializeInteger, ["fin"]=UnserializeInteger },

1179

},

1180

[GUILDADS_MSG_TYPE_REQUEST] = { -- text, itemRef, itemName, itemColor, count, texture

1181

[1] = { ["key"] ="text", ["fout"]=SerializeObj, ["fin"]=UnserializeObj },

1182

[2] = { ["key"] ="itemColor", ["fout"]=SerializeColor, ["fin"]=UnserializeColor },

1183

[3] = { ["key"] ="itemRef", ["fout"]=SerializeItemRef, ["fin"]=UnserializeItemRef },

1184

[4] = { ["key"] ="itemName", ["fout"]=SerializeString, ["fin"]=UnserializeString },

1185

[5] = { ["key"] ="count", ["fout"]=SerializeInteger, ["fin"]=UnserializeInteger },

1186

[6] = { ["key"] ="texture", ["fout"]=SerializeTexture, ["fin"]=UnserializeTexture },

1187

},

1188

[GUILDADS_MSG_TYPE_AVAILABLE] ={ -- text, itemRef, itemName, itemColor, count, texture

1189

[1] = { ["key"] ="text", ["fout"]=SerializeObj, ["fin"]=UnserializeObj },

1190

[2] = { ["key"] ="itemColor", ["fout"]=SerializeColor, ["fin"]=UnserializeColor },

1191

[3] = { ["key"] ="itemRef", ["fout"]=SerializeItemRef, ["fin"]=UnserializeItemRef },

1192

[4] = { ["key"] ="itemName", ["fout"]=SerializeString, ["fin"]=UnserializeString },

1193

[5] = { ["key"] ="count", ["fout"]=SerializeInteger, ["fin"]=UnserializeInteger },

1194

[6] = { ["key"] ="texture", ["fout"]=SerializeTexture, ["fin"]=UnserializeTexture },

1195

},

1196

[GUILDADS_MSG_TYPE_EVENT] = { -- text

1197

[1] = { ["key"] ="text", ["fout"]=SerializeObj, ["fin"]=UnserializeObj },

1198

[2] = { ["key"] ="eventtime", ["fout"]=SerializeTime, ["fin"]=UnserializeTime },

1199

[3] = { ["key"] ="note", ["fout"]=SerializeString, ["fin"]=UnserializeString },

1200

[4] = { ["key"] ="count", ["fout"]=SerializeInteger, ["fin"]=UnserializeInteger },

1201

[5] = { ["key"] ="minlevel", ["fout"]=SerializeInteger, ["fin"]=UnserializeInteger },

1202

[6] = { ["key"] ="maxlevel", ["fout"]=SerializeInteger, ["fin"]=UnserializeInteger },

1203

},

1204

[GUILDADS_MSG_TYPE_EVENT_SUBSCRIPTION] = {

1205

[1] = { ["key"] ="eventid", ["fout"]=SerializeInteger, ["fin"]=UnserializeInteger },

}

};

function SerializeTable(spec, obj)

1211

local tmp = "";

1212

local index = table.getn(spec);

1213

while (index > 0) do

1214

local info = spec[index];

1215

local result = info.fout(obj[info.key]);

1216

1217

if (tmp ~= "") or (result ~= "") then

1218

tmp = result..">"..tmp;

end;

index = index -1;

end

return tmp;

end

function GuildAds_SerializeCommand(obj)

1227

local result = SerializeTable(SerializeMeta, obj)

1228

if SerializeCommand[obj.command] then

1229

result = result .. SerializeTable(SerializeCommand[obj.command], obj);

1230

if obj.command == GUILDADS_MSG_ADD then

1231

result = result .. SerializeTable(SerializeAd[obj.adtype], obj);

end

end

return result;

end

function GuildAds_UnserializeCommand(text)

1238

local obj= { };

1239

1240

local spec=SerializeMeta;

1241

local index=1;

1242

local size= table.getn(spec);

1243

local step=1;

1244

1245

for str in string.gfind(text, "([^\>]*)>") do

1246

info = spec[index];

1247

obj[info.key] = info.fin(str);

index = index + 1;

if index>size then

step=step+1;

if step==2 then

if obj.command and SerializeCommand[obj.command] then

1256

spec=SerializeCommand[obj.command];

else

spec=nil;

end

elseif step==3 then

1261

if obj.adtype and SerializeAd[obj.adtype] then

1262

spec=SerializeAd[obj.adtype];

else

spec=nil;

end

else

return obj;

end

if spec then

index=1;

size=table.getn(spec);

else

return obj

end

end

end

return obj;

end

function GuildAds_Serialize(obj)

1283

obj["currenttime"] = GAS_currentTime();

1284

return GUILDADS_MSG_PREFIX..GuildAds_SerializeCommand(obj);

1285

end

1286

1287

function GuildAds_Unserialize(str)

1288

local iStart, iEnd, msg, params;

1289

iStart, iEnd, params = string.find(str, GUILDADS_MSG_PREFIX.."(.*)");

1290

if (iStart) then

1291

return GuildAds_UnserializeCommand(params);

1292

else

1293

iStart, iEnd, params = string.find(str, GUILDADS_MSG_PREFIX_CHATCOMM.."(.*)");

1294

if (iStart) then

1295

return GuildAds_UnserializeCommand(params);

else

return nil

end

end

end

function GuildAds_FilterText(text)

1303

return string.sub(text, 1, string.len(GUILDADS_MSG_PREFIX_NOVERSION)) == GUILDADS_MSG_PREFIX_NOVERSION

1304

or string.sub(text, 1, string.len(GUILDADS_MSG_PREFIX_TOKEN)) == GUILDADS_MSG_PREFIX_TOKEN;

end

--------------------------------------------------------------------------------

1309

--

1310

-- Register/Unregister new command

1311

--

1312

---------------------------------------------------------------------------------

1313

function GAC_RegisterCommand(command, serializeInfo, onMessage)

1314

if SerializeCommand[command] then

1315

return false, "command("..command..") already registered";

1316

else

1317

if type(onMessage) == "function" then

1318

if type(serializeInfo) == "table" then

1319

for _, spec in serializeInfo do

1320

if type(spec.key)~="string" or type(spec.fin)~="function" or type(spec.fout)~="function" then

1321

if type(spec.key)=="string" then

1322

return false, "serializeInfo["..spec.key.."]="..type(spec.fin)..","..type(spec.fout);

1323

else

1324

return false, "serializeInfo[??]="..type(spec.fin)..","..type(spec.fout);

end

end

end

SerializeCommand[command] = serializeInfo;

1329

OnMessageCommand[command] = onMessage;

1330

return true;

1331

else

1332

return false, "type(serializeInfo)="..type(serializeInfo);

1333

end

1334

else

1335

return false, "type(onMessage)="..type(onMessage);

end

end

end

function GAC_UnregisterCommand(command)

1341

SerializeCommand[command] = nil;

1342

OnMessageCommand[command] = nil;

1343

end

1344

1345

function GAC_IsRegisteredCommand(command)

1346

if SerializeCommand[command] then

1347

return true, SerializeCommand[command], OnMessageCommand[command];

else

return false;

end

end

--------------------------------------------------------------------------------

1354

--

1355

-- Register/Unregister new ad type

1356

--

1357

---------------------------------------------------------------------------------

1358

function GAC_RegisterAdtype(adtype, serializeInfo, onMessage)

1359

if SerializeAd[adtype] then

1360

return false, "adtype("..command..") already registered";

1361

else

1362

if type(onMessage) == "function" then

1363

if type(serializeInfo) == "table" then

1364

for _, spec in serializeInfo do

1365

if type(spec.key)~="string" or type(spec.fin)~="function" or type(spec.fout)~="function" then

1366

return false, "serializeInfo["..spec.key.."]="..type(spec.fin)..","..type(spec.fout);

1367

end

1368

end

1369

SerializeAd[adtype] = serializeInfo;

1370

OnMessageAd[adtype] = onMessage;

1371

return true;

1372

else

1373

return false, "type(serializeInfo)="..type(serializeInfo);

1374

end

1375

else

1376

return false, "type(onMessage)="..type(onMessage);

end

end

end

function GAC_UnregisterAdtype(adtype)

1382

SerializeAd[adtype] = nil;

1383

OnMessageAd[adtype] = nil;

1384

end

1385

1386

function GAC_IsRegisteredAdtype(adtype)

1387

if SerializeCommand[adtype] then

1388

return true, SerializeAd[adtype], OnMessageAd[adtype];

else

return false;

end

end

-- export

GAC_SerializeObj = SerializeObj;

1396

GAC_UnserializeObj = UnserializeObj;

1397

1398

GAC_SerializeString = SerializeString;

1399

GAC_UnserializeString = UnserializeString;

1400

1401

GAC_SerializeInteger = SerializeInteger;

1402

GAC_UnserializeInteger = UnserializeInteger;

1403

1404

GAC_SerializeColor = SerializeColor;

1405

GAC_UnserializeColor = UnserializeColor;

vanilla-wow-addons – Blame information for rev 1