动态置入代码 置入汇编

笨来无一悟

流程简化了一下
@Suky @萧楚楠

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
A	整数型			ebp-4
V	整数型			ebp-8
机器码	字节集			ebp-12

fasm_加载DLL ()  ' 汇编模块从本帖一楼压缩包中获取
A ＝ 0
V ＝ 10086
调试输出 (A, V, “初始”)
fasm_汇编转机器码 (“mov dword [ebp-4],” ＋ 到文本 (V) ＋ #换行符 ＋ “ret”, 机器码, , , )  ' 本层引用 直接写本层地址
置入代码 ({ 139, 117, 244, 131, 198, 8, 255, 214 })
' MOV ESI,[EBP-12]
' ADD ESI,8
' CALL ESI
调试输出 (A, V, “结束”)
调试输出 (“-我-是-分-隔-符-”)
A ＝ 0
V ＝ 166888
调试输出 (A, V, “初始”)
执行机器码 (“mov eax,[ebp]” ＋ #换行符 ＋ “mov dword [eax-4],” ＋ 到文本 (V) ＋ #换行符 ＋ “ret”)  ' 下层引用 [EBP] 里面保存的就是上层的 EBP 回退一层再写
调试输出 (A, V, “结束”)

子程序名	返回值类型	公开	备 注
执行机器码
参数名	类 型	参考	可空	数组	备 注
汇编码	文本型

变量名	类 型	静态	数组	备 注
机器码	字节集

fasm_汇编转机器码 (汇编码, 机器码, , , )
置入代码 ({ 139, 69, 252, 131, 192, 8, 255, 208, 201, 194, 4, 0 })
' MOV EAX, DWORD PTR SS:[EBP-0X04]
' ADD EAX, 0X08
' CALL EAX
' LEAVE
' RET 0X04
' 回退层数参考以下内容↓
' 踩坑记录 终于摸明白访问上层函数参数变量的正确姿势了~~~
' [url]https://bbs.125.la/forum.php?mod=viewthread&tid=14829470[/url]
' (出处: 精易论坛)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 A, 整数型, , , ebp-4<br /> .局部变量 V, 整数型, , , ebp-8<br /> .局部变量 机器码, 字节集, , , ebp-12<br /> <br /> fasm_加载DLL ()  ' 汇编模块从本帖一楼压缩包中获取<br /> A ＝ 0<br /> V ＝ 10086<br /> 调试输出 (A, V, “初始”)<br /> fasm_汇编转机器码 (“mov dword [ebp-4],” ＋ 到文本 (V) ＋ #换行符 ＋ “ret”, 机器码, , , )  ' 本层引用 直接写本层地址<br /> 置入代码 ({ 139, 117, 244, 131, 198, 8, 255, 214 })<br /> ' MOV ESI,[EBP-12]<br /> ' ADD ESI,8<br /> ' CALL ESI<br /> 调试输出 (A, V, “结束”)<br /> 调试输出 (“-我-是-分-隔-符-”)<br /> A ＝ 0<br /> V ＝ 166888<br /> 调试输出 (A, V, “初始”)<br /> 执行机器码 (“mov eax,[ebp]” ＋ #换行符 ＋ “mov dword [eax-4],” ＋ 到文本 (V) ＋ #换行符 ＋ “ret”)  ' 下层引用 [EBP] 里面保存的就是上层的 EBP 回退一层再写<br /> 调试输出 (A, V, “结束”)<br /> <br /> .子程序 执行机器码<br /> .参数 汇编码, 文本型<br /> .局部变量 机器码, 字节集<br /> <br /> fasm_汇编转机器码 (汇编码, 机器码, , , )<br /> 置入代码 ({ 139, 69, 252, 131, 192, 8, 255, 208, 201, 194, 4, 0 })<br /> ' MOV EAX, DWORD PTR SS:[EBP-0X04]<br /> ' ADD EAX, 0X08<br /> ' CALL EAX<br /> ' LEAVE<br /> ' RET 0X04<br /> <br /> <br /> ' 回退层数参考以下内容↓<br /> ' 踩坑记录 终于摸明白访问上层函数参数变量的正确姿势了~~~<br /> ' <a href="https://bbs.125.la/forum.php?mod=viewthread&tid=14829470" target="_blank">https://bbs.125.la/forum.php?mod=viewthread&tid=14829470</a><br /> ' (出处: 精易论坛)

笨来无一悟

整复杂了 可以简化一下

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

' 置入代码 ({ 184, 168, 0, 0, 0, 195 })
' MOV EAX,168
' RET
' 给 EAX 赋值 168
子程序1 ()

子程序名	返回值类型	公开	备 注
子程序1

变量名	类 型	静态	数组	备 注
机器码	字节集
测试	整数型

机器码 ＝ { 184, 168, 0, 0, 0, 195 }  ' 拿 fasm 把汇编代码转换成机器码 再赋值给机器码字节集变量 可以动态更新算法 不过需要确保规格统一
' 设计的时候是通过某某算法 返回某个整数 动态置入 如果有返回值 就需要确保类型和设计之初一致
' 动态置入的原则是 不能改变入口参数数量 出口结果类型 只能动态更新 条件到结果的运算过程
置入代码 ({ 139, 117, 252, 131, 198, 8, 255, 214, 137, 69, 248 })  ' Call 机器码 再把 EAX 写到测试变量
' MOV ESI,[EBP-4]
' ADD ESI,8
' CALL ESI
' MOV DWORD [EBP-8],EAX
调试输出 (测试)  ' 如果没问题的话 这里应有 168

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> ' 置入代码 ({ 184, 168, 0, 0, 0, 195 })<br /> <br /> ' MOV EAX,168<br /> ' RET<br /> <br /> ' 给 EAX 赋值 168<br /> 子程序1 ()<br /> <br /> .子程序 子程序1<br /> .局部变量 机器码, 字节集<br /> .局部变量 测试, 整数型<br /> <br /> 机器码 ＝ { 184, 168, 0, 0, 0, 195 }  ' 拿 fasm 把汇编代码转换成机器码 再赋值给机器码字节集变量 可以动态更新算法 不过需要确保规格统一<br /> ' 设计的时候是通过某某算法 返回某个整数 动态置入 如果有返回值 就需要确保类型和设计之初一致<br /> ' 动态置入的原则是 不能改变入口参数数量 出口结果类型 只能动态更新 条件到结果的运算过程<br /> 置入代码 ({ 139, 117, 252, 131, 198, 8, 255, 214, 137, 69, 248 })  ' Call 机器码 再把 EAX 写到测试变量<br /> ' MOV ESI,[EBP-4]<br /> ' ADD ESI,8<br /> ' CALL ESI<br /> ' MOV DWORD [EBP-8],EAX<br /> 调试输出 (测试)  ' 如果没问题的话 这里应有 168