LUA migration addon

[cry4ty]

There is this private server which has a migration system based on an Addon, what this addon does is it copies everything you have from your character into a LUA file.So practicly you can migrate your character from X with exactly same gear on server Y.

What I want is to 'break' it and modify everything my character has for example giving it full heroic gear.

I tried to open it with Notepad++ but everything is like: "2349823742349723492735239wefhswueifgw78"

If anyone is nice enough and know LUA or has any idea how to 'modify' the things I have from it would be nice.I'll give the name of the server and we can both migrate with last tier gear XD 1000 chars.

download link of the addon: fiulehost.com/lua

[cry4ty]

forgot to mention this addon works on Wotlk/Cata.

[stoneharry]

Interesting, I'll take a look at this tomorrow if I get a chance. Seems like a fun thing to decode.

Can you upload the file it creates too? I do not have a 4.x client.

edit: We could do this by directly modifying the code since it is unobfuscated.

    local retTbl = {}
    for slot = 1, 74 do
        itemLink = GetInventoryItemLink("player", slot) 
        if itemLink then 
            count = GetInventoryItemCount("player",slot)
            for entry, chant, Gem1, Gem2, Gem3, _, _, _, _ in string.gmatch(itemLink,".-Hitem:(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+).*") do
                retTbl["0:"..(slot-1)..":"..(entry)] =count..":"..Gem1..":"..Gem2..":"..Gem3..":"..chant;
            end
        end 
    end

This appears to be the primary item getting logic, and you can see it is storing the item and it's slot, then how many, gems, and enchantments.

We can't modify the created file directly very easily since they perform a basic encryption on it.

I really can't see why the person who created this thought that it would work without people easily modifying it to their like.

[cry4ty]

Sure, in few minutes. Gonna upload them and i'll mention what each one has.


EDIT: I "tried" to find a pattern myself few days ago:

1. without any gear/item on my char -> http://www.filedropper.com/gearscore2
2. with only 1 Maelstorm Crystal on char -> http://www.filedropper.com/gearscore3
3. with a bunch of epic Items from PvP etc. -> http://www.filedropper.com/gearscore4

but no luck since I don't know too much LUA

[stoneharry]

Sure, in few minutes. Gonna upload them and i'll mention what each one has.
And I forgot to mention in order for this addon to be executed, you need to log-ingame go to your bank and write "/chardump profskip" in your chat.Just to give you an idea how it works , since you said you don't have the 4.xx client.


EDIT: I "tried" to find a pattern myself few days ago:

1. without any gear/item on my char -> http://www.filedropper.com/gearscore_2
2. with only 1 Maelstorm Crystal on char -> http://www.filedropper.com/gearscore_3
3. with a bunch of epic Items from Firelands/PvP etc. -> http://www.filedropper.com/gearscore_4

but no luck since I don't know too much LUA

You can't modify the generated files very easily, you need to edit the Lua directly.

This is the Get Item Data function:

function info.GetIData()
    local retTbl = {}
    for slot = 1, 74 do
        itemLink = GetInventoryItemLink("player", slot) 
        if itemLink then 
            count = GetInventoryItemCount("player",slot)
            for entry, chant, Gem1, Gem2, Gem3, _, _, _, _ in string.gmatch(itemLink,".-Hitem:(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+).*") do
                retTbl["0:"..(slot-1)..":"..(entry)] =count..":"..Gem1..":"..Gem2..":"..Gem3..":"..chant;
            end
        end 
    end
    for bag = 0, NUM_BAG_FRAMES do 
        for slot = 1, GetContainerNumSlots(bag) do 
            ItemLink = GetContainerItemLink(bag, slot) 
            if ItemLink then 
                local _, count, _, _, _ = GetContainerItemInfo(bag, slot); 
                local p = bag + 1;
                for entry, chant, Gem1, Gem2, Gem3, _, _, _, _ in string.gmatch(ItemLink,".-Hitem:(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+).*") do
                    retTbl[p..":"..(slot-1)..":"..(entry)] =count..":"..Gem1..":"..Gem2..":"..Gem3..":"..chant;
                end
            end 
        end 
    end

    local numSlots, isFull = GetNumBankSlots()

    for bagNum = 5, 11 do
        local bagNum_ID = BankButtonIDToInvSlotID(bagNum, 1)
        local itemLink = GetInventoryItemLink("player", bagNum_ID)
        if itemLink then
            local size = GetContainerNumSlots(bagNum)
            for bagItem = 1, size do
                ItemLink = GetContainerItemLink(bagNum, bagItem)
                if ItemLink then
                    local _, count, _, _, _ = GetContainerItemInfo(bagNum, bagItem);
                    local p = bagNum + 1;
                    for entry, chant, Gem1, Gem2, Gem3, _, _, _, _ in string.gmatch(ItemLink,".-Hitem:(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+).*") do
                        retTbl[p..":"..(bagItem - 1)..":"..(entry)] =count..":"..Gem1..":"..Gem2..":"..Gem3..":"..chant;
                    end
                end
            end
        end
    end
    
    private.ILog("Bank Slots ["..numSlots.."] Done");
    private.ILog("Inventory DONE...");    
    return retTbl;
end

So for example, to add martin thunder to you (item 192):

function info.GetIData()
    local retTbl = {}
    for slot = 1, 74 do
        itemLink = GetInventoryItemLink("player", slot) 
        if itemLink then 
            count = GetInventoryItemCount("player",slot)
            for entry, chant, Gem1, Gem2, Gem3, _, _, _, _ in string.gmatch(itemLink,".-Hitem:(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+).*") do
                retTbl["0:"..(slot-1)..":"..(entry)] =count..":"..Gem1..":"..Gem2..":"..Gem3..":"..chant;
            end
        end 
    end
    -- This line below, slot 0 item id 192, no gems and no enchant
    retTbl["0:"..(0)..":"..(192)] =1..":"..0..":"..0..":"..0..":"..0;
    for bag = 0, NUM_BAG_FRAMES do 
        for slot = 1, GetContainerNumSlots(bag) do 
            ItemLink = GetContainerItemLink(bag, slot) 
            if ItemLink then 
                local _, count, _, _, _ = GetContainerItemInfo(bag, slot); 
                local p = bag + 1;
                for entry, chant, Gem1, Gem2, Gem3, _, _, _, _ in string.gmatch(ItemLink,".-Hitem:(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+).*") do
                    retTbl[p..":"..(slot-1)..":"..(entry)] =count..":"..Gem1..":"..Gem2..":"..Gem3..":"..chant;
                end
            end 
        end 
    end

    local numSlots, isFull = GetNumBankSlots()

    for bagNum = 5, 11 do
        local bagNum_ID = BankButtonIDToInvSlotID(bagNum, 1)
        local itemLink = GetInventoryItemLink("player", bagNum_ID)
        if itemLink then
            local size = GetContainerNumSlots(bagNum)
            for bagItem = 1, size do
                ItemLink = GetContainerItemLink(bagNum, bagItem)
                if ItemLink then
                    local _, count, _, _, _ = GetContainerItemInfo(bagNum, bagItem);
                    local p = bagNum + 1;
                    for entry, chant, Gem1, Gem2, Gem3, _, _, _, _ in string.gmatch(ItemLink,".-Hitem:(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+).*") do
                        retTbl[p..":"..(bagItem - 1)..":"..(entry)] =count..":"..Gem1..":"..Gem2..":"..Gem3..":"..chant;
                    end
                end
            end
        end
    end
    
    private.ILog("Bank Slots ["..numSlots.."] Done");
    private.ILog("Inventory DONE...");    
    return retTbl;
end

And if you want to print out what item is in what slot ID:

function info.GetIData()
    local retTbl = {}
    for slot = 1, 74 do
        itemLink = GetInventoryItemLink("player", slot) 
        if itemLink then 
            count = GetInventoryItemCount("player",slot)
            for entry, chant, Gem1, Gem2, Gem3, _, _, _, _ in string.gmatch(itemLink,".-Hitem:(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+).*") do
                retTbl["0:"..(slot-1)..":"..(entry)] =count..":"..Gem1..":"..Gem2..":"..Gem3..":"..chant;
                print("Slot: " .. tostring(slot - 1) .. " has item id: " .. tostring(entry))
            end
        end 
    end
    for bag = 0, NUM_BAG_FRAMES do 
        for slot = 1, GetContainerNumSlots(bag) do 
            ItemLink = GetContainerItemLink(bag, slot) 
            if ItemLink then 
                local _, count, _, _, _ = GetContainerItemInfo(bag, slot); 
                local p = bag + 1;
                for entry, chant, Gem1, Gem2, Gem3, _, _, _, _ in string.gmatch(ItemLink,".-Hitem:(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+).*") do
                    retTbl[p..":"..(slot-1)..":"..(entry)] =count..":"..Gem1..":"..Gem2..":"..Gem3..":"..chant;
                end
            end 
        end 
    end

    local numSlots, isFull = GetNumBankSlots()

    for bagNum = 5, 11 do
        local bagNum_ID = BankButtonIDToInvSlotID(bagNum, 1)
        local itemLink = GetInventoryItemLink("player", bagNum_ID)
        if itemLink then
            local size = GetContainerNumSlots(bagNum)
            for bagItem = 1, size do
                ItemLink = GetContainerItemLink(bagNum, bagItem)
                if ItemLink then
                    local _, count, _, _, _ = GetContainerItemInfo(bagNum, bagItem);
                    local p = bagNum + 1;
                    for entry, chant, Gem1, Gem2, Gem3, _, _, _, _ in string.gmatch(ItemLink,".-Hitem:(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+).*") do
                        retTbl[p..":"..(bagItem - 1)..":"..(entry)] =count..":"..Gem1..":"..Gem2..":"..Gem3..":"..chant;
                    end
                end
            end
        end
    end
    
    private.ILog("Bank Slots ["..numSlots.."] Done");
    private.ILog("Inventory DONE...");    
    return retTbl;
end

[cry4ty]

Theoretical all I have to do is add lines like: retTbl["0:"..(0)..":"..(192)] =1..":"..0..":"..0..":"..0..":"..0; in order to add something on my will?

Example: I want weap ench and gem.
the code will be:

retTbl["0:"..(9)..":"..(70279)] =1..":"..52212..":"..0..":"..0..":"..52784;

?

I have an idea how to start "juke" it but I encountered a problem.That "showID in what slot' works only for Equiped items and bags ID. Any idea how to make it show even for what I have IN my bags?So I know how to make the GetItem Data work better
Example: I have 4 bags of 22 slots each one + 16 from normal bag = 104 slots in bags.I want to know what item is on what slot so I can change it with other item I want inside the code.

The Idea is this: I don't delete absolutely nothing form their code, just indentify the free slots in my bags and then ADD the code you said with the respective slot/item/enchant I want.So it wont interfere with their code.You think it could work?

Thanx a bunch, you're best. XD

[stoneharry]

Theoretical all I have to do is add lines like: retTbl["0:"..(0)..":"..(192)] =1..":"..0..":"..0..":"..0..":"..0; in order to add something on my will?

Example: I want Ruthless Gladiator's Dragonhide Gloves on my hands already equiped with 40 agility gem on it and 65 Mastery enchant.
the code will be: ?

I have an idea how to start "juke" it but I encountered a problem.That "showID in what slot' works only for Equiped items and bags ID. Any idea how to make it show even for what I have IN my bags?So I know how to make the GetItem Data work better
Example: I have 4 bags of 22 slots each one + 16 from normal bag = 104 slots in bags.I want to know what item is on what slot so I can change it with other item I want inside the code.

The Idea is this: I don't delete absolutely nothing form their code, just indentify the free slots in my bags and then ADD the code you said with the respective slot/item/enchant I want.So it wont interfere with their code.You think it could work?

Thanx a bunch, you're best. XD

If I am understanding the slot variable correct, then:

 -- Inventory slots
 INVSLOT_AMMO       = 0;
 INVSLOT_HEAD       = 1; INVSLOT_FIRST_EQUIPPED = INVSLOT_HEAD;
 INVSLOT_NECK       = 2;
 INVSLOT_SHOULDER   = 3;
 INVSLOT_BODY       = 4;
 INVSLOT_CHEST      = 5;
 INVSLOT_WAIST      = 6;
 INVSLOT_LEGS       = 7;
 INVSLOT_FEET       = 8;
 INVSLOT_WRIST      = 9;
 INVSLOT_HAND       = 10;
 INVSLOT_FINGER1        = 11;
 INVSLOT_FINGER2        = 12;
 INVSLOT_TRINKET1   = 13;
 INVSLOT_TRINKET2   = 14;
 INVSLOT_BACK       = 15;
 INVSLOT_MAINHAND   = 16;
 INVSLOT_OFFHAND        = 17;
 INVSLOT_RANGED     = 18;
 INVSLOT_TABARD     = 19;
 INVSLOT_LAST_EQUIPPED = INVSLOT_TABARD;

So we would add code like this:

retTbl["0:"..(10)..":"..(70279)] =1..":"..52212..":"..0..":"..0..":"..52784;

I don't know if the gem and enchantment fields will work as I'm not sure what it is exactly referencing.

Anyway, I tested this addon with 3.3.5a:



This debug code I added, you can get it here:

function info.GetIData()
    local retTbl = {}
    for slot = 1, 74 do
        itemLink = GetInventoryItemLink("player", slot) 
        if itemLink then 
            count = GetInventoryItemCount("player",slot)
            for entry, chant, Gem1, Gem2, Gem3, _, _, _, _ in string.gmatch(itemLink,".-Hitem:(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+).*") do
                retTbl["0:"..(slot-1)..":"..(entry)] =count..":"..Gem1..":"..Gem2..":"..Gem3..":"..chant;
				print("Slot: " .. slot - 1 .. " has item id: " .. entry .. " gem 1: " .. Gem1 .. " enchant: " .. chant)
            end
        end 
    end
    for bag = 0, NUM_BAG_FRAMES do 
        for slot = 1, GetContainerNumSlots(bag) do 
            ItemLink = GetContainerItemLink(bag, slot) 
            if ItemLink then 
                local _, count, _, _, _ = GetContainerItemInfo(bag, slot); 
                local p = bag + 1;
                for entry, chant, Gem1, Gem2, Gem3, _, _, _, _ in string.gmatch(ItemLink,".-Hitem:(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+).*") do
                    retTbl[p..":"..(slot-1)..":"..(entry)] =count..":"..Gem1..":"..Gem2..":"..Gem3..":"..chant;
                end
            end 
        end 
    end

    local numSlots, isFull = GetNumBankSlots()

    for bagNum = 5, 11 do
        local bagNum_ID = BankButtonIDToInvSlotID(bagNum, 1)
        local itemLink = GetInventoryItemLink("player", bagNum_ID)
        if itemLink then
            local size = GetContainerNumSlots(bagNum)
            for bagItem = 1, size do
                ItemLink = GetContainerItemLink(bagNum, bagItem)
                if ItemLink then
                    local _, count, _, _, _ = GetContainerItemInfo(bagNum, bagItem);
                    local p = bagNum + 1;
                    for entry, chant, Gem1, Gem2, Gem3, _, _, _, _ in string.gmatch(ItemLink,".-Hitem:(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+).*") do
                        retTbl[p..":"..(bagItem - 1)..":"..(entry)] =count..":"..Gem1..":"..Gem2..":"..Gem3..":"..chant;
                    end
                end
            end
        end
    end
    
    private.ILog("Bank Slots ["..numSlots.."] Done");
    private.ILog("Inventory DONE...");    
    return retTbl;
end

So you can then input those values manually by adding them after the for loop as I said before. You can set the manual values you are putting in just before the return statement at the end of the function.

[cry4ty]

gonna try it tomorrow and see if it works,even tho will be a bit curious since I want to transfer with a set of items on me and another set in bags(container) XD and there are only 22 according to wiki/wowpedia.

I pmed you the name of the server if you want to transfer some chars

edit: hmm actualy after a research the slot id for bags is (bagItem - 1)

[cry4ty]

Hey Stoneharry,thx for all the help,but I come with one more thing.. I encountered a little problem, after I searched for the items, gems,ench,etc etc, I put the codes inside I save but then when I enter in-game to execute the addon, the addon doesn't load anymore.

Then I deleted everything I added , and started the game again, and it worked, so appearently if you add something the addon gets blocked? it has any sort of code to get blocked automaticly if you add something?
EDIT: after a re-test I deleted everything I added again, and I wrote only one letter: " 1 " . And the addon didn't worked anymore, I guess its a measure of protection or addon gets buggy?

this is the code I implemented mainly:

function info.GetIData()
    local retTbl = {}
    for slot = 1, 74 do
        itemLink = GetInventoryItemLink("player", slot) 
        if itemLink then 
            count = GetInventoryItemCount("player",slot)
            for entry, chant, Gem1, Gem2, Gem3, _, _, _, _ in string.gmatch(itemLink,".-Hitem:(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+).*") do
                retTbl["0:"..(slot-1)..":"..(entry)] =count..":"..Gem1..":"..Gem2..":"..Gem3..":"..chant;
				print("Slot: " .. tostring(slot - 1) .. " has item id: " .. tostring(entry))
            end
        end 
    end
    for bag = 0, NUM_BAG_FRAMES do 
        for slot = 1, GetContainerNumSlots(bag) do 
            ItemLink = GetContainerItemLink(bag, slot) 
            if ItemLink then 
                local _, count, _, _, _ = GetContainerItemInfo(bag, slot); 
                local p = bag + 1;
                for entry, chant, Gem1, Gem2, Gem3, _, _, _, _ in string.gmatch(ItemLink,".-Hitem:(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+).*") do
                    retTbl[p..":"..(slot-1)..":"..(entry)] =count..":"..Gem1..":"..Gem2..":"..Gem3..":"..chant;
                end
            end 
        end 
    end

    local numSlots, isFull = GetNumBankSlots()

    for bagNum = 5, 11 do
        local bagNum_ID = BankButtonIDToInvSlotID(bagNum, 1)
        local itemLink = GetInventoryItemLink("player", bagNum_ID)
        if itemLink then
            local size = GetContainerNumSlots(bagNum)
            for bagItem = 1, size do
                ItemLink = GetContainerItemLink(bagNum, bagItem)
                if ItemLink then
                    local _, count, _, _, _ = GetContainerItemInfo(bagNum, bagItem);
                    local p = bagNum + 1;
                    for entry, chant, Gem1, Gem2, Gem3, _, _, _, _ in string.gmatch(ItemLink,".-Hitem:(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+).*") do
                        retTbl[p..":"..(bagItem - 1)..":"..(entry)] =count..":"..Gem1..":"..Gem2..":"..Gem3..":"..chant;
                    end
                end
            end
        end
    end
    
    private.ILog("Bank Slots ["..numSlots.."] Done");
    private.ILog("Inventory DONE...");    
    return retTbl;
end

it's anything wrong with it, position,too much space from beggining?

 print("Slot: " .. tostring(slot - 1) .. " has item id: " .. tostring(entry))

I think wowwiki and wowhead are outdated. Becouse slot 0 = ammos, and ammos were removed in wotlk if I don't mistake? and this print script confirmes that Head is positioned on slot 0, not 1.Idk now, but i'm pretty sure your script is right here .

[stoneharry]

I'll take a look when I have some free time (quite busy atm) but I would guess there is a typo. Make sure you go to interface -> help -> show Lua errors. Reload your UI to then show any errors.

[cry4ty]

It's ok man, take your time,anyway is more than I expected ^^.

this is the error with the main script I added(items,gems,etc)

idk how to thank you I hope reputation will do it.

[stoneharry]

It is saying there is an error on line 234 where it finds "1..". So I guess this bit:

retTbl["0:"..(0)..":"..(70280)] =1..":"..4251..":"..0..":"..0..":"..4246;

try:

retTbl["0:" .. tostring(0) .. ":" .. tostring(70280)] = tostring(1) .. ":" .. tostring(4251) .. ":" .. tostring(0) .. ":" .. tostring(0) .. ":" .. tostring(4246);

[gamehacker953]

this is why on my server staff create the files and such. Anyways whatever server is using this add on has alot of decoding to do server wise to get all the data out cleanly. Just with my add on saving in JSON format it took around 15k lines of code to get something working. hope you guys can get this I can take a Crack at it if needed

[cry4ty]

I rly don't like this kind of servers becouse it destroys the blizzard feeling, you can't be proud of a title or a mount becouse other 1000 players have it already from other server which they paid for or did exploiting random bugs.But now a guy who plays on my server said he transfered there with full PVE tier and he did only PvP on our server, I didn't believed it until he posted ss's )).

gonna check now, gonna send the file and see if it gets approved, /cheers to harry.