summaryrefslogtreecommitdiff
path: root/Data/BuiltIn/Libraries/lua-addons/addons/GearSwap/packet_parsing.lua
diff options
context:
space:
mode:
authorchai <chaifix@163.com>2021-11-15 13:53:59 +0800
committerchai <chaifix@163.com>2021-11-15 13:53:59 +0800
commit942a030afd348ab2e02eac8054b43e3c3a72ea48 (patch)
treea13459f39a3d2f1b533fbd1b5ab523d7a621f673 /Data/BuiltIn/Libraries/lua-addons/addons/GearSwap/packet_parsing.lua
parente307051a56a54c27f10438fd2025edf61d0dfeed (diff)
*rename
Diffstat (limited to 'Data/BuiltIn/Libraries/lua-addons/addons/GearSwap/packet_parsing.lua')
-rw-r--r--Data/BuiltIn/Libraries/lua-addons/addons/GearSwap/packet_parsing.lua716
1 files changed, 716 insertions, 0 deletions
diff --git a/Data/BuiltIn/Libraries/lua-addons/addons/GearSwap/packet_parsing.lua b/Data/BuiltIn/Libraries/lua-addons/addons/GearSwap/packet_parsing.lua
new file mode 100644
index 0000000..f8cabf3
--- /dev/null
+++ b/Data/BuiltIn/Libraries/lua-addons/addons/GearSwap/packet_parsing.lua
@@ -0,0 +1,716 @@
+--Copyright (c) 2013~2016, Byrthnoth
+--All rights reserved.
+
+--Redistribution and use in source and binary forms, with or without
+--modification, are permitted provided that the following conditions are met:
+
+-- * Redistributions of source code must retain the above copyright
+-- notice, this list of conditions and the following disclaimer.
+-- * Redistributions in binary form must reproduce the above copyright
+-- notice, this list of conditions and the following disclaimer in the
+-- documentation and/or other materials provided with the distribution.
+-- * Neither the name of <addon name> nor the
+-- names of its contributors may be used to endorse or promote products
+-- derived from this software without specific prior written permission.
+
+--THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
+--ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+--WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
+--DISCLAIMED. IN NO EVENT SHALL <your name> BE LIABLE FOR ANY
+--DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
+--(INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
+--LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
+--ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
+--(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
+--SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+
+parse = {
+ i={}, -- Incoming packets
+ o={} -- Outgoing packets, currently none are really parsed for information
+ }
+
+parse.i[0x00A] = function (data)
+ windower.debug('zone change')
+ command_registry = Command_Registry.new()
+ table.clear(not_sent_out_equip)
+
+ player.id = data:unpack('I',0x05)
+ player.index = data:unpack('H',0x09)
+ if player.main_job_id and player.main_job_id ~= data:byte(0xB5) and player.name and player.name == data:unpack('z',0x85) and not gearswap_disabled then
+ windower.debug('job change on zone')
+ load_user_files(data:byte(0xB5))
+ else
+ player.name = data:unpack('z',0x85)
+ end
+ player.main_job_id = data:byte(0xB5)
+ player.sub_job_id = data:byte(0xB8)
+ player.vitals.max_hp = data:unpack('I',0xE9)
+ player.vitals.max_mp = data:unpack('I',0xED)
+ player.max_hp = data:unpack('I',0xE9)
+ player.max_mp = data:unpack('I',0xED)
+ update_job_names()
+
+ world.zone_id = data:unpack('H',0x31)
+ _ExtraData.world.conquest = false
+ for i,v in pairs(region_to_zone_map) do
+ if v:contains(world.zone_id) then
+ _ExtraData.world.conquest = {
+ region_id = i,
+ region_name = res.regions[i][language],
+ }
+ break
+ end
+ end
+ weather_update(data:byte(0x69))
+ world.logged_in = true
+
+ _ExtraData.world.in_mog_house = data:byte(0x81) == 1
+
+ _ExtraData.player.base_str = data:unpack('H',0xCD)
+ _ExtraData.player.base_dex = data:unpack('H',0xCF)
+ _ExtraData.player.base_vit = data:unpack('H',0xD1)
+ _ExtraData.player.base_agi = data:unpack('H',0xD3)
+ _ExtraData.player.base_int = data:unpack('H',0xD5)
+ _ExtraData.player.base_mnd = data:unpack('H',0xD7)
+ _ExtraData.player.base_chr = data:unpack('H',0xD9)
+ _ExtraData.player.add_str = data:unpack('h',0xDB)
+ _ExtraData.player.add_dex = data:unpack('h',0xDD)
+ _ExtraData.player.add_vit = data:unpack('h',0xDF)
+ _ExtraData.player.add_agi = data:unpack('h',0xE1)
+ _ExtraData.player.add_int = data:unpack('h',0xE3)
+ _ExtraData.player.add_mnd = data:unpack('h',0xE5)
+ _ExtraData.player.add_chr = data:unpack('h',0xE7)
+
+ _ExtraData.player.str = _ExtraData.player.base_str + _ExtraData.player.add_str
+ _ExtraData.player.dex = _ExtraData.player.base_dex + _ExtraData.player.add_dex
+ _ExtraData.player.vit = _ExtraData.player.base_vit + _ExtraData.player.add_vit
+ _ExtraData.player.agi = _ExtraData.player.base_agi + _ExtraData.player.add_agi
+ _ExtraData.player.int = _ExtraData.player.base_int + _ExtraData.player.add_int
+ _ExtraData.player.mnd = _ExtraData.player.base_mnd + _ExtraData.player.add_mnd
+ _ExtraData.player.chr = _ExtraData.player.base_chr + _ExtraData.player.add_chr
+ refresh_ffxi_info()
+
+ blank_0x063_v9_inc = true
+end
+
+parse.i[0x00B] = function(data)
+ -- Blank temporary items when zoning.
+ items.temporary = make_inventory_table()
+end
+
+parse.i[0x00E] = function (data)
+ if pet.index and pet.index == data:unpack('H',9) and math.floor((data:byte(11)%8)/4)== 1 then
+ local status_id = data:byte(32)
+ -- Filter all statuses aside from Idle/Engaged/Dead/Engaged dead.
+ if pet.status_id ~= status_id and (status_id < 4 or status_id == 33 or status_id == 47) then
+ if not next_packet_events then next_packet_events = {sequence_id = data:unpack('H',3)} end
+ next_packet_events.pet_status_change = {newstatus=res.statuses[status_id][language],oldstatus=pet.status}
+ pet.status = res.statuses[status_id][language]
+ pet.status_id = status_id
+ end
+ end
+end
+
+parse.i[0x01B] = function (data)
+ for job_id = 1,23 do
+ player.jobs[to_windower_api(res.jobs[job_id].english)] = data:byte(job_id + 72)
+ end
+
+ local enc = data:unpack('H',0x61)
+ local tab = {}
+ for slot_id,slot_name in pairs(default_slot_map) do
+ local tf = (((enc%(2^(slot_id+1))) / 2^slot_id) >= 1)
+ if encumbrance_table[slot_id] and not tf and not_sent_out_equip[slot_name] and not disable_table[i] then
+ tab[slot_name] = not_sent_out_equip[slot_name]
+ not_sent_out_equip[slot_name] = nil
+ end
+ if encumbrance_table[slot_id] and not tf then
+ msg.debugging("Your "..slot_name.." slot is now unlocked.")
+ end
+ encumbrance_table[slot_id] = tf
+ end
+ if table.length(tab) > 0 and not gearswap_disabled then
+ refresh_globals()
+ equip_sets('equip_command',nil,tab)
+ end
+end
+
+parse.i[0x01E] = function (data)
+ local bag = to_windower_compact(res.bags[data:byte(0x09)].english)
+ local slot = data:byte(0x0A)
+ local count = data:unpack('I',5)
+ local status = data:byte(0x0B)
+ if not items[bag][slot] then items[bag][slot] = make_empty_item_table(slot) end
+ items[bag][slot].count = count
+ items[bag][slot].status = status
+ if count == 0 then
+ items[bag][slot].id = 0
+ items[bag][slot].bazaar = 0
+ items[bag][slot].status = 0
+ end
+end
+
+parse.i[0x01F] = function (data)
+ local bag = to_windower_compact(res.bags[data:byte(0x0B)].english)
+ local slot = data:byte(0x0C)
+ if not items[bag][slot] then items[bag][slot] = make_empty_item_table(slot) end
+ items[bag][slot].id = data:unpack('H',9)
+ items[bag][slot].count = data:unpack('I',5)
+ items[bag][slot].status = data:byte(0x0D)
+end
+
+parse.i[0x020] = function (data)
+ local bag = to_windower_compact(res.bags[data:byte(0x0F)].english)
+ local slot = data:byte(0x10)
+ if not items[bag][slot] then items[bag][slot] = make_empty_item_table(slot) end
+ items[bag][slot].id = data:unpack('H',0x0D)
+ items[bag][slot].count = data:unpack('I',5)
+ items[bag][slot].bazaar = data:unpack('I',9)
+ items[bag][slot].status = data:byte(0x11)
+ items[bag][slot].extdata = data:sub(0x12,0x29)
+ -- Did not mess with linkshell stuff
+end
+
+parse.i[0x037] = function (data)
+ player.status_id = data:byte(0x31)
+ --[[local bitmask = data:sub(0x4D,0x54)
+ for i = 1,32 do
+ local bitmask_position = 2*((i-1)%4)
+ local id = data:byte(4+i) + 256*math.floor(bitmask:byte(1+math.floor((i-1)/4))%(2^(bitmask_position+2))/(2^bitmask_position))
+ if player.buffs[i] ~= id then
+ if id == 255 and player.buffs[i] then
+ player.buffs[i] = nil
+ elseif id ~= 255 then
+ player.buffs[i] = id
+ end
+ end
+ end]]
+
+ local indi_byte = data:byte(0x59)
+ if indi_byte%128/64 >= 1 then
+ local temp_indi = _ExtraData.player.indi
+ _ExtraData.player.indi = {
+ element = res.elements[indi_byte%8][language],
+ element_id = indi_byte%8,
+ size = math.floor((indi_byte%64)/16) + 1, -- Size range of 1~4
+ }
+ if (indi_byte%16)/8 >= 1 then
+ _ExtraData.player.indi.target = 'Enemy'
+ else
+ _ExtraData.player.indi.target = 'Ally'
+ end
+ if not gearswap_disabled then
+ if not temp_indi then
+ -- There was not an indi spell up
+ refresh_globals()
+ equip_sets('indi_change',nil,_ExtraData.player.indi,true)
+ elseif temp_indi.element_id ~= _ExtraData.player.indi.element_id or temp_indi.target ~= _ExtraData.player.indi.target or temp_indi.size ~= _ExtraData.player.indi.size then
+ -- There was already an indi spell up, so check if it changed
+ refresh_globals()
+ equip_sets('indi_change',nil,temp_indi,false)
+ equip_sets('indi_change',nil,_ExtraData.player.indi,true)
+ end
+ end
+ elseif _ExtraData.player.indi then
+ -- An indi effect has been lost.
+ local temp_indi = _ExtraData.player.indi
+ _ExtraData.player.indi = nil
+ if not gearswap_disabled then
+ refresh_globals()
+ equip_sets('indi_change',nil,temp_indi,false)
+ end
+ end
+
+ local subj_ind = data:unpack('H', 0x35) / 8
+ if subj_ind == 0 and pet.isvalid then
+ if not next_packet_events then next_packet_events = {sequence_id = data:unpack('H',3)} end
+ refresh_globals()
+ pet.isvalid = false
+ _ExtraData.pet = {}
+ next_packet_events.pet_change = {pet = table.reassign({},pet)}
+ elseif subj_ind ~= 0 and not pet.isvalid then
+ if not next_packet_events then next_packet_events = {sequence_id = data:unpack('H',3)} end
+ _ExtraData.pet.tp = 0
+ next_packet_events.pet_change = {subj_ind = subj_ind}
+ end
+end
+
+function parse_equip_chunk(chunk)
+ local inv_slot = chunk:byte(1) -- 0 indicates unequipping the item
+ local equip_slot = toslotname(chunk:byte(2))
+ if inv_slot == 0 then -- Unequipping
+ local bag_id = items.equipment[equip_slot].bag_id
+ inv_slot = items.equipment[equip_slot].slot
+
+ if inv_slot == empty then return end -- unequipping something that was already unequipped?
+
+ local inv = items[to_windower_compact(res.bags[bag_id].english)]
+ if not inv[inv_slot] then inv[inv_slot] = make_empty_item_table(inv_slot) end
+
+ inv[inv_slot].status = 0 -- Set the status to "unequipped"
+ items.equipment[equip_slot] = {slot=empty,bag_id=0}
+ else
+ local bag_id = chunk:byte(3)
+ local inv = items[to_windower_compact(res.bags[bag_id].english)]
+ items.equipment[equip_slot] = {slot=inv_slot,bag_id = bag_id}
+ if not inv[inv_slot] then inv[inv_slot] = make_empty_item_table(inv_slot) end
+ inv[inv_slot].status = 5 -- Set the status to "equipped"
+ end
+end
+
+parse.o[0x050] = function (data,injected) --equip
+ if injected then return end
+ -- Because of the way windower works, uninjected chunks will appear after
+ -- injected chunks in the chunk events but will hit the server before them.
+ -- Thus, I use insert here instead of append
+ injected_equipment_registry[data:byte(6)]:insert(1,data:sub(5,7))
+end
+
+parse.o[0x051] = function (data,injected) --equipset
+ if injected then return end
+ for i=9,9+4*(data:byte(5)-1),4 do
+ injected_equipment_registry[data:byte(i+1)]:insert(1,data:sub(i,i+2))
+ end
+end
+
+parse.i[0x050] = function (data)
+ -- should simplify this code using return when I gain confidence in it
+ parse_equip_chunk(data:sub(5,7))
+ local slot = data:byte(6)
+ for chunk,ind in injected_equipment_registry[slot]:it() do
+ if chunk == data:sub(5,7) then
+ -- Matched
+ injected_equipment_registry[slot] = injected_equipment_registry[slot]:slice(ind+1) -- Eliminate current and all preceding packets if we get a match
+ matched = true
+ return
+ end
+ --[[for i=9,9+4*(chunk:byte(5)-1),4 do -- The server replies to equipset packets with both single equip packets and equipset packets.
+ if chunk:sub(i,i+2) == data:sub(5,7) then
+ matched = true
+ break
+ end
+ end]]
+ end
+ -- Unexpected packet found!
+end
+
+function update_equipment()
+ local tab = {}
+ for i,v in pairs(items.equipment) do
+ tab[i] = {bag_id = v.bag_id,slot=v.slot}
+ end
+ for i,v in pairs(injected_equipment_registry) do
+ local last = v:last()
+ if last then
+ tab[default_slot_map[i]] = {
+ bag_id = last:byte(3),
+ slot = last:byte(1) == 0 and empty or last:byte(1),
+ }
+ end
+ end
+ return tab
+end
+
+-- The server always sends both equip responses and equipset responses following an equipset command
+-- Equip responses are sent for pieces the successfully equip
+-- The equipset response contains a copy of the original equipset and a new list of all your currently worn gear
+-- It always comes after the equip commands, so one way to address this is to simply read the new list of currently worn gear
+-- and act as if it's all unexpected.
+parse.i[0x117] = function (data)
+ -- should simplify this code using return when I gain confidence in it
+ for i=9,9+4*(data:byte(5)-1),4 do -- Byte position for the start of the current chunk
+ local slot = data:byte(i+1)
+ for chunk,ind in injected_equipment_registry[slot]:it() do
+ if chunk == data:sub(i,i+2) then
+ -- This is the response to an injected equipset packet, so remove those packets from the registry even if it actually failed to swap.
+ injected_equipment_registry[slot] = injected_equipment_registry[slot]:slice(ind+1)
+ end
+ end
+ end
+ for i=0x49,0x85,4 do
+ -- Update items.equipment
+ parse_equip_chunk(data:sub(i,i+2))
+ end
+end
+
+parse.i[0x053] = function (data)
+ local message = data:unpack('H',0xD)
+ if (message == 0x12D or message == 0x12A or message == 0x12B or message == 0x12C) and player then
+ -- You're unable to use trust magic if you're not the party leader, solo, pt full or trying to summon an already summoned trust
+ local ts,tab = command_registry:find_by_time()
+ if tab and tab.spell and tab.spell.prefix ~= '/pet' and not gearswap_disabled then
+ tab.spell.action_type = 'Interruption'
+ tab.spell.interrupted = true
+ equip_sets('aftercast',nil,tab.spell)
+ end
+ end
+end
+
+parse.i[0x05E] = function (data)
+ -- Conquest ID
+ if _ExtraData.world.conquest then
+ local offset = _ExtraData.world.conquest.region_id*4 + 11
+ if offset == 99 then
+ offset = 95
+ elseif offset == 107 then
+ offset = 99
+ end
+ local strength_map = {[0]='Minimal',[1]='Minor',[2]='Major',[3]='Dominant'}
+ local nation_map = {[0]={english='Neutral',japanese='Neutral'},[1]=res.regions[0],[2]=res.regions[1],
+ [3]=res.regions[2],[4]={english='Beastman',japanese='Beastman'},[0xFF]=res.regions[3]}
+ _ExtraData.world.conquest.strengths = {
+ sandoria=strength_map[data:byte(offset+2)%4],
+ bastok=strength_map[math.floor(data:byte(offset+2)%16/4)],
+ windurst=strength_map[math.floor(data:byte(offset+2)%64/16)],
+ beastmen=strength_map[math.floor(data:byte(offset+2)/64)],}
+ _ExtraData.world.conquest.nation = nation_map[data:byte(offset+3)][language]
+ _ExtraData.world.conquest.sandoria = data:byte(0x87)
+ _ExtraData.world.conquest.bastok = data:byte(0x88)
+ _ExtraData.world.conquest.windurst = data:byte(0x89)
+ _ExtraData.world.conquest.beastmen = 100-data:byte(0x87)-data:byte(0x88)-data:byte(0x89)
+ end
+end
+
+parse.i[0x061] = function (data)
+ player.vitals.max_hp = data:unpack('I',5)
+ player.vitals.max_mp = data:unpack('I',9)
+ player.max_hp = data:unpack('I',5)
+ player.max_mp = data:unpack('I',9)
+ player.main_job_id = data:byte(13)
+ player.main_job_level = data:byte(14)
+
+ _ExtraData.player.nation_id = data:byte(0x51)
+ _ExtraData.player.nation = res.regions[_ExtraData.player.nation_id][language] or 'None'
+ _ExtraData.player.base_str = data:unpack('H',0x15)
+ _ExtraData.player.base_dex = data:unpack('H',0x17)
+ _ExtraData.player.base_vit = data:unpack('H',0x19)
+ _ExtraData.player.base_agi = data:unpack('H',0x1B)
+ _ExtraData.player.base_int = data:unpack('H',0x1D)
+ _ExtraData.player.base_mnd = data:unpack('H',0x1F)
+ _ExtraData.player.base_chr = data:unpack('H',0x21)
+ _ExtraData.player.add_str = data:unpack('h',0x23)
+ _ExtraData.player.add_dex = data:unpack('h',0x25)
+ _ExtraData.player.add_vit = data:unpack('h',0x27)
+ _ExtraData.player.add_agi = data:unpack('h',0x29)
+ _ExtraData.player.add_int = data:unpack('h',0x2B)
+ _ExtraData.player.add_mnd = data:unpack('h',0x2D)
+ _ExtraData.player.add_chr = data:unpack('h',0x2F)
+ _ExtraData.player.attack = data:unpack('H',0x31)
+ _ExtraData.player.defense = data:unpack('H',0x33)
+ _ExtraData.player.fire_resistance = data:unpack('h',0x35)
+ _ExtraData.player.wind_resistance = data:unpack('h',0x37)
+ _ExtraData.player.lightning_resistance = data:unpack('h',0x39)
+ _ExtraData.player.light_resistance = data:unpack('h',0x3B)
+ _ExtraData.player.ice_resistance = data:unpack('h',0x3D)
+ _ExtraData.player.earth_resistance = data:unpack('h',0x3F)
+ _ExtraData.player.water_resistance = data:unpack('h',0x41)
+ _ExtraData.player.dark_resistance = data:unpack('h',0x43)
+
+ _ExtraData.player.str = _ExtraData.player.base_str + _ExtraData.player.add_str
+ _ExtraData.player.dex = _ExtraData.player.base_dex + _ExtraData.player.add_dex
+ _ExtraData.player.vit = _ExtraData.player.base_vit + _ExtraData.player.add_vit
+ _ExtraData.player.agi = _ExtraData.player.base_agi + _ExtraData.player.add_agi
+ _ExtraData.player.int = _ExtraData.player.base_int + _ExtraData.player.add_int
+ _ExtraData.player.mnd = _ExtraData.player.base_mnd + _ExtraData.player.add_mnd
+ _ExtraData.player.chr = _ExtraData.player.base_chr + _ExtraData.player.add_chr
+
+ if player.sub_job_id ~= data:byte(15) then
+ -- Subjob change event
+ local temp_sub = player.sub_job
+ player.sub_job_id = data:byte(15)
+ player.sub_job_level = data:byte(16)
+ update_job_names()
+ if not gearswap_disabled then
+ refresh_globals()
+ equip_sets('sub_job_change',nil,player.sub_job,temp_sub)
+ end
+ end
+ update_job_names()
+end
+
+parse.i[0x062] = function (data)
+ for i = 1,0x71,2 do
+ local skill = data:unpack('H',i + 0x82)%32768
+ local current_skill = res.skills[math.floor(i/2)+1]
+ if current_skill then
+ player.skills[to_windower_api(current_skill.english)] = skill
+ end
+ end
+end
+
+parse.i[0x063] = function (data)
+ if data:byte(0x05) == 0x09 and blank_0x063_v9_inc then
+ -- After zoning, players receive a blank 0x063 v9 packet
+ -- (because their buff line is temporarily empty)
+ -- So this flag is set in 0x00A
+ blank_0x063_v9_inc = false
+ -- However, players can also reload gearswap and fail to get a 0x063 v9 packet from
+ -- windower.packets.last_incoming, which leaves them without buff information but with a
+ -- informative 0x063 v9 packet coming next. So this step checks confirms the packet is
+ -- empty before returning
+ if data:sub(0x49,0xC8) == string.char(0):rep(128) then
+ return
+ end
+ end
+ if data:byte(0x05) == 0x09 then
+ local newbuffs = {}
+ for i=1,32 do
+ local buff_id = data:unpack('H',i*2+7)
+ if buff_id ~= 255 and buff_id ~= 0 then -- 255 is used for "no buff"
+ local t = data:unpack('I',i*4+0x45)/60+572662306+1009810800
+ newbuffs[i] = setmetatable({
+ name=res.buffs[buff_id].name,
+ buff=copy_entry(res.buffs[buff_id]),
+ id = buff_id,
+ time=t,
+ date=os.date('*t',t),
+ },
+ {__index=function(t,k)
+ if k and k=='duration' then
+ return rawget(t,'time')-os.time()
+ else
+ return rawget(t,k)
+ end
+ end})
+ end
+ end
+ if seen_0x063_type9 then
+
+ -- Look for exact matches
+ for n,new in pairs(newbuffs) do
+ newbuffs[n].matched_exactly = nil
+ for i,old in pairs(_ExtraData.player.buff_details) do
+ -- Find unchanged buffs
+ if old.id == new.id and math.abs(old.time-new.time) < 1 and not old.matched_exactly then
+ newbuffs[n].matched_exactly = true
+ _ExtraData.player.buff_details[i].matched_exactly = true
+ break
+ end
+ end
+ end
+
+ -- Look for time-independent matches, which are assumedly a spell overwriting itself
+ for n,new in pairs(newbuffs) do
+ newbuffs[n].matched_imprecisely = nil
+ if not new.matched_exactly then
+ for i,old in pairs(_ExtraData.player.buff_details) do
+ -- Buffs can be overwritten
+ if old.id == new.id and not (old.matched_exactly or old.matched_imprecisely) then
+ newbuffs[n].matched_imprecisely = true
+ _ExtraData.player.buff_details[i].matched_imprecisely = true
+ break
+ end
+ end
+ end
+ end
+
+ for n,new in pairs(newbuffs) do
+ if new.matched_exactly then
+ newbuffs[n].matched_exactly = nil
+ elseif new.matched_imprecisely then
+ newbuffs[n].matched_imprecisely = nil
+ -- Matched a previous buff, but the time didn't jive so it's assumed
+ -- that it was overwritten with the same status effect
+ if not res.buffs[new.id] then
+ error('GearSwap: No known status for buff id #'..tostring(new.id))
+ end
+ local buff_name = res.buffs[new.id][language]
+ windower.debug('refresh buff '..buff_name..' ('..tostring(new.id)..')')
+ if not gearswap_disabled then
+ refresh_globals()
+ equip_sets('buff_refresh',nil,buff_name,new)
+ end
+ else
+ -- Not matched, so it's assumed the buff is new
+ if not res.buffs[new.id] then
+ error('GearSwap: No known status for buff id #'..tostring(new.id))
+ end
+ local buff_name = res.buffs[new.id][language]
+ windower.debug('gain buff '..buff_name..' ('..tostring(new.id)..')')
+ -- Need to figure out what I'm going to do with this:
+ if T{'terror','sleep','stun','petrification','charm','weakness'}:contains(buff_name:lower()) then
+ for ts,v in pairs(command_registry) do
+ if v.midaction then
+ command_registry:delete_entry(ts)
+ end
+ end
+ end
+ if not gearswap_disabled then
+ refresh_globals()
+ equip_sets('buff_change',nil,buff_name,true,new)
+ end
+ end
+ end
+ for i,old in pairs(_ExtraData.player.buff_details) do
+ if not (old.matched_exactly or old.matched_imprecisely) then
+ -- Old status was not matched to any new status, so it's assumed it was lost
+ if not res.buffs[old.id] then
+ error('GearSwap: No known status for buff id #'..tostring(old.id))
+ end
+ local buff_name = res.buffs[old.id][language]
+ windower.debug('lose buff '..buff_name..' ('..tostring(old.id)..')')
+ if not gearswap_disabled then
+ refresh_globals()
+ equip_sets('buff_change',nil,buff_name,false,old)
+ end
+ end
+ end
+ end
+
+ table.reassign(_ExtraData.player.buff_details,newbuffs)
+ for i=1,32 do
+ player.buffs[i] = (newbuffs[i] and newbuffs[i].id) or nil
+ end
+ -- Cannot reliably recall this packet using last_incoming on load because there
+ -- are 9 version of it and you only get the last one. Hence, this flag:
+ seen_0x063_type9 = true
+ end
+end
+
+parse.i[0x067] = function (data)
+ if player.index == data:unpack('H',0x0D) then -- You are the owner
+ _ExtraData.pet.tp = data:unpack('H',0x11)
+ end
+end
+
+parse.i[0x068] = function (data)
+
+ if player.index == data:unpack('H',0x07) then -- You are the owner
+ _ExtraData.pet.tp = data:unpack('H',0x11)
+ end
+end
+
+parse.i[0x076] = function (data)
+ partybuffs = {}
+ for i = 0,4 do
+ if data:unpack('I',i*48+5) == 0 then
+ break
+ else
+ local index = data:unpack('H',i*48+5+4)
+ partybuffs[index] = {
+ id = data:unpack('I',i*48+5+0),
+ index = data:unpack('H',i*48+5+4),
+ buffs = {}
+ }
+ for n=1,32 do
+ partybuffs[index].buffs[n] = data:byte(i*48+5+16+n-1) + 256*( math.floor( data:byte(i*48+5+8+ math.floor((n-1)/4)) / 4^((n-1)%4) )%4)
+ end
+
+
+ if alliance[1] then
+ local cur_player
+ for n,m in pairs(alliance[1]) do
+ if type(m) == 'table' and m.mob and m.mob.index == index then
+ cur_player = m
+ break
+ end
+ end
+ local new_buffs = convert_buff_list(partybuffs[index].buffs)
+ if cur_player and cur_player.buffactive and not gearswap_disabled then
+ local old_buffs = cur_player.buffactive
+ -- Make sure the character existed before (with a buffactive list) - Avoids zoning.
+ for n,m in pairs(new_buffs) do
+ if type(n) == 'number' and m ~= old_buffs[n] then
+ if not old_buffs[n] or m > old_buffs[n] then -- gaining buff
+ equip_sets('party_buff_change',nil,cur_player,res.buffs[n][language],true,copy_entry(res.buffs[n]))
+ old_buffs[n] = nil
+ else -- losing buff
+ equip_sets('party_buff_change',nil,cur_player,res.buffs[n][language],false,copy_entry(res.buffs[n]))
+ old_buffs[n] = nil
+ end
+ elseif type(n) ~= 'number' then
+ -- Clear out the string entries so we don't have to iterate over them in the second loop
+ old_buffs[n] = nil
+ end
+ end
+
+ for n,m in pairs(old_buffs) do
+ if type(n) == 'number' and m ~= new_buffs[n] then-- losing buff
+ equip_sets('party_buff_change',nil,cur_player,res.buffs[n][language],false,copy_entry(res.buffs[n]))
+ end
+ end
+ end
+ if cur_player then
+ cur_player.buffactive = new_buffs
+ end
+ end
+
+ end
+ end
+end
+
+parse.i[0x0DF] = function (data)
+ if data:unpack('I',5) == player.id then
+ player.vitals.hp = data:unpack('I',9)
+ player.vitals.mp = data:unpack('I',13)
+ player.vitals.tp = data:unpack('I',0x11)
+ player.vitals.hpp = data:byte(0x17)
+ player.vitals.mpp = data:byte(0x18)
+
+ player.hp = data:unpack('I',9)
+ player.mp = data:unpack('I',13)
+ player.tp = data:unpack('I',0x11)
+ player.hpp = data:byte(0x17)
+ player.mpp = data:byte(0x18)
+ end
+end
+
+parse.i[0x0E2] = function (data)
+ if data:unpack('I',5)==player.id then
+ player.vitals.hp = data:unpack('I',9)
+ player.vitals.mp = data:unpack('I',0xB)
+ player.vitals.tp = data:unpack('I',0x11)
+ player.vitals.hpp = data:byte(0x1E)
+ player.vitals.mpp = data:byte(0x1F)
+
+ player.hp = data:unpack('I',9)
+ player.mp = data:unpack('I',0xB)
+ player.tp = data:unpack('I',0x11)
+ player.hpp = data:byte(0x1E)
+ player.mpp = data:byte(0x1F)
+ end
+end
+
+parse.o[0x100] = function(data)
+ -- Scrub the equipment array if a valid outgoing job change packet is sent.
+ local newmain = data:byte(5)
+ if res.jobs[newmain] and newmain ~= 0 and newmain ~= player.main_job_id then
+ windower.debug('job change')
+
+ command_registry = Command_Registry.new()
+
+ table.clear(not_sent_out_equip)
+ table.clear(equip_list_history)
+ table.clear(equip_list)
+ player.main_job_id = newmain
+ update_job_names()
+ for i=0,15 do
+ injected_equipment_registry[i]:clear()
+ items.equipment[default_slot_map[i]] = {bag_id=0,slot=empty}
+ end
+ windower.send_command('lua i '.._addon.name..' load_user_files '..newmain)
+ end
+
+
+ if gearswap_disabled then return end
+
+ local newmain = data:byte(5)
+ if res.jobs[newmain] and newmain ~= player.main_job_id then
+ command_enable('main','sub','range','ammo','head','neck','lear','rear','body','hands','lring','rring','back','waist','legs','feet') -- enable all slots
+ end
+end
+
+function initialize_packet_parsing()
+ for i,v in pairs(parse.i) do
+ if i ~= 0x028 then
+ local lastpacket = windower.packets.last_incoming(i)
+ if lastpacket then
+ v(lastpacket)
+ end
+ if i == 0x63 and lastpacket and lastpacket:byte(5) ~= 9 then
+ -- Not receiving an accurate buff line on load because the wrong 0x063 packet was sent last
+
+ end
+ end
+ end
+end