develop
Petr Mrázek
commit
8ab5697f4a
@ -0,0 +1,89 @@
|
||||
adv_tools=adv_tools or {}
|
||||
adv_tools.menu=adv_tools.menu or MakeMenu()
|
||||
function adv_tools.ressurect()
|
||||
myoff=offsets.getEx("AdvCreatureVec")
|
||||
vector=engine.peek(myoff,ptr_vector)
|
||||
indx=GetCreatureAtPos(getxyz())
|
||||
if indx<0 then indx=0 end
|
||||
--print(string.format("%x",vector:getval(indx)))
|
||||
v2=engine.peek(vector:getval(indx),ptr_Creature.hurt1)
|
||||
for i=0,v2:size()-1 do
|
||||
v2:setval(i,0)
|
||||
end
|
||||
v2=engine.peek(vector:getval(indx),ptr_Creature.hurt2)
|
||||
v2.type=DWORD
|
||||
for i=0,v2:size()-1 do
|
||||
v2:setval(i,0)
|
||||
end
|
||||
engine.poke(vector:getval(indx),ptr_Creature.bloodlvl,60000) --give blood
|
||||
engine.poke(vector:getval(indx),ptr_Creature.bleedlvl,0) --stop some bleeding...
|
||||
local flg=engine.peek(vector:getval(indx),ptr_Creature.flags)
|
||||
flg:set(1,false) --ALIVE
|
||||
flg:set(39,false) -- leave body yet again
|
||||
flg:set(37,false) -- something todo with wounds- lets you walk again.
|
||||
flg:set(58,true) -- makes them able to breathe
|
||||
flg:set(61,true) -- gives them sight
|
||||
engine.poke(vector:getval(indx),ptr_Creature.flags,flg)
|
||||
end
|
||||
|
||||
function adv_tools.wagonmode() --by rumrusher
|
||||
--first three lines same as before (because we will need an offset of creature at location x,y,z)
|
||||
myoff=offsets.getEx("AdvCreatureVec")
|
||||
vector=engine.peek(myoff,ptr_vector)
|
||||
indx=GetCreatureAtPos(getxyz())
|
||||
--indx=0
|
||||
--print(string.format("%x",vector:getval(indx)))
|
||||
flg=engine.peek(vector:getval(indx),ptr_Creature.flags) --get flags
|
||||
flg:set(1,false)
|
||||
flg:set(74,false)
|
||||
engine.poke(vector:getval(indx),ptr_Creature.flags,flg)
|
||||
print("To stay normal press y, else hit Enter turn Wagon mode on.")
|
||||
r=io.stdin:read() -- repeat for it too work... also creature will be dead.
|
||||
if r== "y" then
|
||||
flg=engine.peek(vector:getval(indx),ptr_Creature.flags)
|
||||
flg:set(1,false)
|
||||
engine.poke(vector:getval(indx),ptr_Creature.flags,flg)
|
||||
else
|
||||
flg=engine.peek(vector:getval(indx),ptr_Creature.flags)
|
||||
flg:set(1,false)
|
||||
flg:flip(74)
|
||||
engine.poke(vector:getval(indx),ptr_Creature.flags,flg)
|
||||
end
|
||||
end
|
||||
function selectall()
|
||||
local retvec={} --return vector (or a list)
|
||||
myoff=offsets.getEx("AdvCreatureVec")
|
||||
vector=engine.peek(myoff,ptr_vector) --standart start
|
||||
for i=0,vector:size()-1 do --check all creatures
|
||||
local off
|
||||
off=vector:getval(i)
|
||||
local flags=engine.peek(off,ptr_Creature.flags)
|
||||
if flags:get(1)==true then --if dead ...
|
||||
table.insert(retvec,off)--... add it to return vector
|
||||
end
|
||||
end
|
||||
return retvec --return the "return vector" :)
|
||||
end
|
||||
function adv_tools.hostilate()
|
||||
vector=engine.peek(offsets.getEx("AdvCreatureVec"),ptr_vector)
|
||||
id=GetCreatureAtPos(getxyz())
|
||||
print(string.format("Vec:%d cr:%d",vector:size(),id))
|
||||
off=vector:getval(id)
|
||||
crciv=engine.peek(vector:getval(id),ptr_Creature.civ)
|
||||
curciv=engine.peek(vector:getval(0),ptr_Creature.civ)
|
||||
|
||||
if curciv==crciv then
|
||||
print("Friendly-making enemy")
|
||||
engine.poke(off,ptr_Creature.civ,-1)
|
||||
flg=engine.peek(off,ptr_Creature.flags)
|
||||
flg:set(17,true)
|
||||
engine.poke(off,ptr_Creature.flags,flg)
|
||||
else
|
||||
print("Enemy- making friendly")
|
||||
engine.poke(off,ptr_Creature.civ,curciv)
|
||||
flg=engine.peek(off,ptr_Creature.flags)
|
||||
flg:set(17,false)
|
||||
flg:set(19,false)
|
||||
engine.poke(off,ptr_Creature.flags,flg)
|
||||
end
|
||||
end
|
||||
@ -1,89 +0,0 @@
|
||||
adv_tools=adv_tools or {}
|
||||
adv_tools.menu=adv_tools.menu or MakeMenu()
|
||||
function adv_tools.ressurect()
|
||||
myoff=offsets.getEx("AdvCreatureVec")
|
||||
vector=engine.peek(myoff,ptr_vector)
|
||||
indx=GetCreatureAtPos(getxyz())
|
||||
if indx<0 then indx=0 end
|
||||
--print(string.format("%x",vector:getval(indx)))
|
||||
v2=engine.peek(vector:getval(indx),ptr_Creature.hurt1)
|
||||
for i=0,v2:size()-1 do
|
||||
v2:setval(i,0)
|
||||
end
|
||||
v2=engine.peek(vector:getval(indx),ptr_Creature.hurt2)
|
||||
v2.type=DWORD
|
||||
for i=0,v2:size()-1 do
|
||||
v2:setval(i,0)
|
||||
end
|
||||
engine.poke(vector:getval(indx),ptr_Creature.bloodlvl,60000) --give blood
|
||||
engine.poke(vector:getval(indx),ptr_Creature.bleedlvl,0) --stop some bleeding...
|
||||
local flg=engine.peek(vector:getval(indx),ptr_Creature.flags)
|
||||
flg:set(1,false) --ALIVE
|
||||
flg:set(39,false) -- leave body yet again
|
||||
flg:set(37,false) -- something todo with wounds- lets you walk again.
|
||||
flg:set(58,true) -- makes them able to breathe
|
||||
flg:set(61,true) -- gives them sight
|
||||
engine.poke(vector:getval(indx),ptr_Creature.flags,flg)
|
||||
end
|
||||
|
||||
function adv_tools.wagonmode() --by rumrusher
|
||||
--first three lines same as before (because we will need an offset of creature at location x,y,z)
|
||||
myoff=offsets.getEx("AdvCreatureVec")
|
||||
vector=engine.peek(myoff,ptr_vector)
|
||||
indx=GetCreatureAtPos(getxyz())
|
||||
--indx=0
|
||||
--print(string.format("%x",vector:getval(indx)))
|
||||
flg=engine.peek(vector:getval(indx),ptr_Creature.flags) --get flags
|
||||
flg:set(1,false)
|
||||
flg:set(74,false)
|
||||
engine.poke(vector:getval(indx),ptr_Creature.flags,flg)
|
||||
print("To stay normal press y, else hit Enter turn Wagon mode on.")
|
||||
r=io.stdin:read() -- repeat for it too work... also creature will be dead.
|
||||
if r== "y" then
|
||||
flg=engine.peek(vector:getval(indx),ptr_Creature.flags)
|
||||
flg:set(1,false)
|
||||
engine.poke(vector:getval(indx),ptr_Creature.flags,flg)
|
||||
else
|
||||
flg=engine.peek(vector:getval(indx),ptr_Creature.flags)
|
||||
flg:set(1,false)
|
||||
flg:flip(74)
|
||||
engine.poke(vector:getval(indx),ptr_Creature.flags,flg)
|
||||
end
|
||||
end
|
||||
function selectall()
|
||||
local retvec={} --return vector (or a list)
|
||||
myoff=offsets.getEx("AdvCreatureVec")
|
||||
vector=engine.peek(myoff,ptr_vector) --standart start
|
||||
for i=0,vector:size()-1 do --check all creatures
|
||||
local off
|
||||
off=vector:getval(i)
|
||||
local flags=engine.peek(off,ptr_Creature.flags)
|
||||
if flags:get(1)==true then --if dead ...
|
||||
table.insert(retvec,off)--... add it to return vector
|
||||
end
|
||||
end
|
||||
return retvec --return the "return vector" :)
|
||||
end
|
||||
function adv_tools.hostilate()
|
||||
vector=engine.peek(offsets.getEx("AdvCreatureVec"),ptr_vector)
|
||||
id=GetCreatureAtPos(getxyz())
|
||||
print(string.format("Vec:%d cr:%d",vector:size(),id))
|
||||
off=vector:getval(id)
|
||||
crciv=engine.peek(vector:getval(id),ptr_Creature.civ)
|
||||
curciv=engine.peek(vector:getval(0),ptr_Creature.civ)
|
||||
|
||||
if curciv==crciv then
|
||||
print("Friendly-making enemy")
|
||||
engine.poke(off,ptr_Creature.civ,-1)
|
||||
flg=engine.peek(off,ptr_Creature.flags)
|
||||
flg:set(17,true)
|
||||
engine.poke(off,ptr_Creature.flags,flg)
|
||||
else
|
||||
print("Enemy- making friendly")
|
||||
engine.poke(off,ptr_Creature.civ,curciv)
|
||||
flg=engine.peek(off,ptr_Creature.flags)
|
||||
flg:set(17,false)
|
||||
flg:set(19,false)
|
||||
engine.poke(off,ptr_Creature.flags,flg)
|
||||
end
|
||||
end
|
||||
@ -0,0 +1,45 @@
|
||||
function analyzeF(off)
|
||||
pos=offsets.find(off,0x39,ANYBYTE,0x8c,00,00,00)
|
||||
print(string.format("Compare at:%x",pos))
|
||||
if pos ==0 then
|
||||
return 0
|
||||
end
|
||||
if(pos-off>0x100) then
|
||||
print(string.format("Distance to cmp:%x",pos-off))
|
||||
pos =offsets.find(off,CALL)
|
||||
print(string.format("Distance to call:%x",pos-off))
|
||||
return 0
|
||||
--return analyzeF(pos)
|
||||
else
|
||||
return pos
|
||||
end
|
||||
end
|
||||
function minEx(...)
|
||||
local imin=arg[1]
|
||||
for _,v in ipairs(arg) do
|
||||
if imin> v and v~=0 then
|
||||
imin=v
|
||||
end
|
||||
end
|
||||
return imin
|
||||
end
|
||||
function signDword(dw)
|
||||
if(dw>0xFFFFFFFF) then
|
||||
return dw-0xFFFFFFFF
|
||||
end
|
||||
return dw
|
||||
end
|
||||
--[[
|
||||
Warning: not all mov's are acounted for. Found one: mov EAX,WORD PTR[EBP+1EF4] WTF??
|
||||
Two more compares are missing. There are calls instead (same function)
|
||||
]]--
|
||||
|
||||
friendship_in={}
|
||||
dofile("dfusion/friendship/install.lua")
|
||||
dofile("dfusion/friendship/patch.lua")
|
||||
|
||||
function friendship(names)
|
||||
friendship_in.install(names)
|
||||
friendship_in.patch()
|
||||
end
|
||||
|
||||
@ -0,0 +1 @@
|
||||
as -anl --32 -o functions.o functions.asm
|
||||
@ -0,0 +1,23 @@
|
||||
.intel_syntax
|
||||
push eax
|
||||
push ebp
|
||||
push esp
|
||||
push esi
|
||||
push edi
|
||||
push edx
|
||||
push ecx
|
||||
push ebx
|
||||
push eax
|
||||
mov eax,[esp+36]
|
||||
push eax
|
||||
function:
|
||||
call 0xdeadbee0
|
||||
function2:
|
||||
mov [0xdeadbeef],eax
|
||||
pop eax
|
||||
function3:
|
||||
jmp [0xdeadbeef]
|
||||
|
||||
|
||||
|
||||
|
||||
Binary file not shown.
@ -0,0 +1,61 @@
|
||||
onfunction=onfunction or {}
|
||||
function onfunction.install()
|
||||
ModData=engine.installMod("dfusion/onfunction/functions.o","functions",4)
|
||||
modpos=ModData.pos
|
||||
modsize=ModData.size
|
||||
onfunction.pos=modpos
|
||||
trgpos=engine.getpushvalue()
|
||||
print(string.format("Function installed in:%x function to call is: %x",modpos,trgpos))
|
||||
local firstpos=modpos+engine.FindMarker(ModData,"function")
|
||||
engine.poked(firstpos,trgpos-firstpos-4) --call Lua-Onfunction
|
||||
onfunction.fpos=modpos+engine.FindMarker(ModData,"function3")
|
||||
engine.poked(modpos+engine.FindMarker(ModData,"function2"),modpos+modsize)
|
||||
engine.poked(onfunction.fpos,modpos+modsize)
|
||||
SetExecute(modpos)
|
||||
onfunction.calls={}
|
||||
onfunction.functions={}
|
||||
onfunction.names={}
|
||||
onfunction.hints={}
|
||||
end
|
||||
function OnFunction(values)
|
||||
--[=[print("Onfunction called!")
|
||||
print("Data:")
|
||||
for k,v in pairs(values) do
|
||||
print(string.format("%s=%x",k,v))
|
||||
end
|
||||
print("stack:")
|
||||
for i=0,3 do
|
||||
print(string.format("%d %x",i,engine.peekd(values.esp+i*4)))
|
||||
end
|
||||
--]=]
|
||||
if onfunction.functions[values.ret] ~=nil then
|
||||
onfunction.functions[values.ret](values)
|
||||
end
|
||||
|
||||
return onfunction.calls[values.ret] --returns real function to call
|
||||
end
|
||||
function onfunction.patch(addr)
|
||||
|
||||
if(engine.peekb(addr)~=0xe8) then
|
||||
error("Incorrect address, not a function call")
|
||||
else
|
||||
|
||||
onfunction.calls[addr+5]=addr+engine.peekd(addr+1)+5 --adds real function to call
|
||||
engine.poked(addr+1,engine.getmod("functions")-addr-5)
|
||||
end
|
||||
end
|
||||
function onfunction.AddFunction(addr,name,hints)
|
||||
onfunction.patch(addr)
|
||||
onfunction.names[name]=addr+5
|
||||
if hints~=nil then
|
||||
onfunction.hints[name]=hints
|
||||
end
|
||||
end
|
||||
function onfunction.SetCallback(name,func)
|
||||
if onfunction.names[name]==nil then
|
||||
error("No such function:"..name)
|
||||
else
|
||||
onfunction.functions[onfunction.names[name]]=func
|
||||
end
|
||||
end
|
||||
|
||||
@ -0,0 +1,7 @@
|
||||
if WINDOWS then --windows function defintions
|
||||
onfunction.AddFunction(0x55499D+offsets.base(),"Move") --on creature move found with "watch mem=xcoord"
|
||||
onfunction.AddFunction(0x275933+offsets.base(),"Die",{creature="edi"}) --on creature death? found by watching dead flag then stepping until new function
|
||||
else --linux
|
||||
onfunction.AddFunction(0x899befe+offsets.base(),"Move") -- found out by attaching watch...
|
||||
onfunction.AddFunction(0x850eecd+offsets.base(),"Die",{creature="ebx"}) -- same
|
||||
end
|
||||
@ -0,0 +1,14 @@
|
||||
mypos=engine.getmod("functions")
|
||||
function DeathMsg(values)
|
||||
local name
|
||||
name=engine.peek(values[onfunction.hints["Die"].creature],ptt_dfstring)
|
||||
print(name:getval().." died")
|
||||
end
|
||||
if mypos then
|
||||
print("Onfunction already installed")
|
||||
--onfunction.patch(0x189dd6+offsets.base())
|
||||
else
|
||||
onfunction.install()
|
||||
dofile("dfusion/onfunction/locations.lua")
|
||||
onfunction.SetCallback("Die",DeathMsg)
|
||||
end
|
||||
@ -0,0 +1,114 @@
|
||||
#include <dfhack/Core.h>
|
||||
#include <dfhack/Console.h>
|
||||
#include <dfhack/PluginManager.h>
|
||||
#include <dfhack/Process.h>
|
||||
#include <dfhack/extra/stopwatch.h>
|
||||
#include <string>
|
||||
#include <vector>
|
||||
#include <sstream>
|
||||
|
||||
using std::vector;
|
||||
using std::string;
|
||||
using namespace DFHack;
|
||||
|
||||
DFhackCExport command_result memview (Core * c, vector <string> & parameters);
|
||||
|
||||
DFhackCExport const char * plugin_name ( void )
|
||||
{
|
||||
return "memview";
|
||||
}
|
||||
|
||||
DFhackCExport command_result plugin_init ( Core * c, std::vector <PluginCommand> &commands)
|
||||
{
|
||||
commands.clear();
|
||||
commands.push_back(PluginCommand("memview","Shows memory in real time. Params: adrr length refresh_rate.",memview));
|
||||
return CR_OK;
|
||||
}
|
||||
size_t convert(const std::string& p,bool ishex=false)
|
||||
{
|
||||
size_t ret;
|
||||
std::stringstream conv;
|
||||
if(ishex)
|
||||
conv<<std::hex;
|
||||
conv<<p;
|
||||
conv>>ret;
|
||||
return ret;
|
||||
}
|
||||
bool isAddr(uint32_t *trg,vector<t_memrange> & ranges)
|
||||
{
|
||||
if(trg[0]%4==0)
|
||||
for(size_t i=0;i<ranges.size();i++)
|
||||
if(ranges[i].isInRange(trg[0]))
|
||||
return true;
|
||||
|
||||
return false;
|
||||
}
|
||||
void outputHex(uint8_t *buf,uint8_t *lbuf,size_t len,size_t start,Console &con,vector<t_memrange> & ranges)
|
||||
{
|
||||
|
||||
con.clear();
|
||||
const size_t page_size=16;
|
||||
for(size_t i=0;i<len;i+=page_size)
|
||||
{
|
||||
con.print("%8x ",i+start);
|
||||
for(size_t j=0;(j<page_size) && (i+j<len);j++)
|
||||
{
|
||||
if(j%4==0)
|
||||
{
|
||||
con.reset_color();
|
||||
if(isAddr((uint32_t *)(buf+j+i),ranges))
|
||||
con.color(Console::COLOR_LIGHTRED);
|
||||
}
|
||||
if(lbuf[j+i]!=buf[j+i])
|
||||
con.print("*%2x",buf[j+i]);
|
||||
else
|
||||
con.print(" %2x",buf[j+i]);
|
||||
}
|
||||
con.reset_color();
|
||||
con.print(" | ");
|
||||
for(size_t j=0;(j<page_size) && (i+j<len);j++)
|
||||
if(buf[j+i]>20)
|
||||
con.print("%c",buf[j+i]);
|
||||
else
|
||||
con.print(".");
|
||||
con.print("\n");
|
||||
}
|
||||
}
|
||||
DFhackCExport command_result memview (Core * c, vector <string> & parameters)
|
||||
{
|
||||
size_t addr=convert(parameters[0],true);
|
||||
size_t len;
|
||||
if(parameters.size()>1)
|
||||
len=convert(parameters[1]);
|
||||
else
|
||||
len=20*16;
|
||||
size_t refresh;
|
||||
if(parameters.size()>2)
|
||||
refresh=convert(parameters[2]);
|
||||
else
|
||||
refresh=0;
|
||||
Console &con=c->con;
|
||||
uint8_t *buf,*lbuf;
|
||||
buf=new uint8_t[len];
|
||||
lbuf=new uint8_t[len];
|
||||
uint64_t timeLast=0;
|
||||
vector<t_memrange> ranges;
|
||||
c->p->getMemRanges(ranges);
|
||||
while(true)//TODO add some sort of way to exit loop??!!
|
||||
{
|
||||
uint64_t time2 = GetTimeMs64();
|
||||
uint64_t delta = time2-timeLast;
|
||||
if(refresh!=0)
|
||||
if(delta<refresh)
|
||||
continue;
|
||||
timeLast = time2;
|
||||
|
||||
c->p->read(addr,len,buf);
|
||||
outputHex(buf,lbuf,len,addr,con,ranges);
|
||||
if(refresh==0)
|
||||
break;
|
||||
memcpy(lbuf, buf, len);
|
||||
}
|
||||
delete[] buf;
|
||||
delete[] lbuf;
|
||||
}
|
||||
Loading…
Reference in New Issue