FastChainer_bnd.lua

x32=false
function check(src)
local list,new,go=src,{}
while #list>0 do
local next=gg.getValues(list)
for k,v in pairs(src) do
go=v.go or v
if next[v.go or k].value~=go.value then
src[k]=nil
else
go=go.link
if go then
v.go=go
new[go]=go
end
end
end
list=new
end
end
function nextlvl(old,offmax,src,deep)
gg.internal3(offmax)
local adr,link
local new=gg.getResults(100000)
for t=1,#new do
adr=new[t]
local value=adr.value
if x32 then
value=value&0xffffffff
adr.value=value
end
local st=1
local ed=#old
local md
while st<ed do
md=(st+ed)>>1
link=old[md]
if link.address<value then
st=md+1
else
ed=md
end
end
link=old[ed]
if link then
local off=link.address-value
if off>=0 and  off<offmax then
local min=link.min
if not min or off<=min then
adr.link=link
link.min=off
end
end
end
end
local list,ed,top,st={},0,0
for t=1,#new do
adr=new[t]
link=adr.link
if link and link.address-adr.value==link.min then
local t=adr.address
while ed and t>ed do
top=top+1
ed=src[top]
if ed then
st=ed.start
ed=ed["end"]
end
end
if ed and t>=st then
deep[#deep+1]=adr
adr.index=top
else
list[#list+1]=adr
end
end
end
return list
end
function lvl(max,offmax,dump,fast)
local deep={}
local old=gg.getResults(1)
for i=1,max do
old=nextlvl(old,offmax,src,deep)
if fast-#deep<=0 then
return deep
end
if #dump==0 or i~=max then
gg.loadResults(old)
end
end
return deep
end
function show(src,out,of)
local file=io.output(os.time()..".lua")
file:write("t={")
local link={}
for k,s in pairs(out) do
local obj=src[s.index]
local next
if of==0 then
next="{i='"..obj.state..obj.internalName:match("lib([^/]+).so[^o]*$").."',"
else
next="{"
end
link[1]=s.address-(obj.start+of)
local v=s.link
while v do
link[#link+1]=v.min
v=v.link
end
next=next..table.concat(link,",",1,#link).."}"
print(string.format("%d>%x=%s",s.index,s.address,next))
file:write(next..",\n")
end
file:write("}dofile('goto.lua')")
file:close()
end
data=gg.prompt({"寻找基址","深度","扫描偏移","最大条目"},{true,1,1000,10},{"checkbox"})
max=tonumber(data[2])
offmax=tonumber(data[3])
old=gg.getResults(1)
src=gg.getSelectedListItems()
if #src>0 then
for k,v in pairs(src) do
v=v.address
src[k]={start=v-offmax,["end"]=v+offmax}
end
else
if data[1] then
src={}
xl={["Ca"]=8,["Cb"]=16}
tag=xl[gg.getValuesRange(old)[1]]
r=tag or gg.getRanges()
for k,v in pairs(xl) do
if r&v~=0 then
xl[k]=0
end
end
for k,v in pairs(gg.getRangesList("^/da*.so")) do
if xl[v.state]==0 and v.type:sub(2,2)=="w" then
v.index=k
src[#src+1]=v
end
end
end
end
if tag then
adr=old.address
for k,v in pairs(xl) do
if v.start<=adr and v['end']>=adr then
show(v,old,0)
end
end
else
out=lvl(max,offmax,src,tonumber(data[4]))
check(out)
if #src>0 then
local of=offmax
show(src,out,data[1] and 0 or offmax)
end
end