• 我们在哪一颗星上见过 ,以至如此相互思念 ;我们在哪一颗星上相互思念过,以至如此相互深爱
  • 我们在哪一颗星上分别 ,以至如此相互辉映 ;我们在哪一颗星上入睡 ,以至如此唤醒黎明
  • 认识世界 克服困难 洞悉所有 贴近生活 寻找珍爱 感受彼此

OD攻略:VB断点

OD攻略 云涯 5年前 (2019-07-22) 2078次浏览 0个评论

文件长度:RtcFileLen

bp __vbaFreeStr 对付VB程序重启验证

bp __vbaStrCmp 比较字符串是否相等

bp __vbaStrComp 比较字符串是否相等

bp __vbaVarTstNe 比较变量是否不相等

bp __vbaVarTstEq 比较变量是否相等

bp __vbaStrCopy 复制字符串

bp __vbaStrMove 移动字符串

bp MultiByteToWideChar ANSI字符串转换成Unicode字符串

bp WideCharToMultiByte Unicode字符串转换成ANSI字符串

 

getvolumeinformationa

vbastrcomp (trw)

Bpx __vbaStrComp

MSVBVM60!_vbastrcomp|sofice

MSVBVM50! |

VBAI4STR

Ctrl+D

bpx msvbvm60!__vbastrcomp do “d *(esp+0c)”(softice)

按几次F5出册码出来了。

bpx regqueryvalueexa do “d esp->8″(trw)

vbaVarTstEq 判断是否注册的函数

(0042932F 66898580FEFFFF mov word ptr [ebp+FFFFFE80], ax

改为0042932F 66898580FEFFFF mov word ptr [ebp+FFFFFE80], bx)

时间常用中断

GetSystemTime

GetLocalTime

GetTickCount

 

rtcGetPresentDate //取得当前日期

杀窗常用中断

Lockmytask (win9x专用)

bp ExitProcess 退出进程

DestroyWindow

mouse_event (鼠标中断)

postquitmessage (Cracking足彩xp,很有用^_^)

 

_rtcMsgBox

ini文件内容常用中断

GetPrivateProfileStringA

GetPrivateProfileProfileInt

key文件:

getprivateprofileint

ReadFile

CreateFileA

 

1、__vbaVarTstNe //比较两个变量是否不相等

2、rtcR8ValFromBstr //把字符串转换成浮点数

3、rtcMsgBox 显示一信息对话框

4、rtcBeep //让扬声器叫唤

5、rtcGetPresentDate //取得当前日期

 

针对字串:

__vbaStrComp

__vbaStrCmp

__vbaStrCompVar

__vbaStrLike

__vbaStrTextComp

__vbaStrTextLike

 

针对变量:

__vbaVarCompEq

__vbaVarCompLe

__vbaVarCompLt

__vbaVarCompGe

__vbaVarCompGt

__vbaVarCompNe

 

VB的指针:

THROW

VB DLL还调用了oleauto32.dll中的部分函数。oleauto32.dll是个通用的proxy/stub DLL,其每个函数的原型在<oleauto.h>中定义,并在MSDN中有详细描述。这也有助于理解VB DLL中的函数的作用。

举例:

LEA EAX, [EBP-58]

PUSH EAX

CALL [MSVBVM60!__vbaI4Var]

执行call之前敲dd eax+8,得到的值为3;

执行完call之后,eax = 3

从而可知__vbaI4Var的作用是将一个VARIANT转换为I4(即一个长整数)。

__vbaVarTstNe似乎是用来进行自校验的,正常情况下返回值为0。

已知适用的软件有:网络三国智能机器人、音乐贺卡厂。当这两个软件被脱壳后都回出错,网络三国智能机器人会产生非法*作,而音乐贺卡厂会告诉你是非法拷贝,通过修改__vbaVarTstNe的返回值都可让它们正常运行。

所以当您遇到一个VB软件,脱壳后无法正常运行,而又找不出其它问题时,可试试拦截这个函数,说不定会有用哦。8-)

API不太知道,也许可以通过BIOS在98平台上读写扇区,不过在2000/NT下可以通过内黑ATAPI,HAL写扇区

machoman[CCG]

bpx WRITE_PORT_BUFFER_USHORT

NT/2000下这个断点,当edx=1f0h,时,可以看见EDI地址内数据为扇区位置数据,必须先 在winice.dat 中装入hal.sys 详细内容看ATAPI手册

 

关于对VB程序和时间限制程序的断点

CrackerABC

先给出修改能正确反编译VB程序的W32DASM的地址:

======================

offsets 0x16B6C-0x16B6D

修改机器码为: 98 F4

======================

 

VB程序的跟踪断点:

============

MultiByteToWideChar,

rtcR8ValFromBstr,

WideCharToMultiByte,

__vbaStrCmp

__vbaStrComp

__vbaStrCopy

__vbaStrMove

__vbaVarTstNe

rtcBeep

rtcGetPresentDate (时间API)

rtcMsgBox

 

=========

时间限制断点:

================

CompareFileTime

GetLocalTime

GetSystemTime

GetTimeZoneInformation

msvcrt.diffTime()

msvcrt.Time()

================

 

一般处理

bpx hmemcpy

bpx MessageBox

bpx MessageBoxExA

bpx MessageBeep

bpx SendMessage

bpx GetDlgItemText

bpx GetDlgItemInt

bpx GetWindowText

bpx GetWindowWord

bpx GetWindowInt

bpx DialogBoxParamA

bpx CreateWindow

bpx CreateWindowEx

bpx ShowWindow

bpx UpdateWindow

bmsg xxxx wm_move

bmsg xxxx wm_gettext

bmsg xxxx wm_command

bmsg xxxx wm_activate

 

时间相关

bpint 21 if ah==2A (DOS)

bpx GetLocalTime

bpx GetFileTime

bpx GetSystemtime

 

CD-ROM 或 磁盘相关

bpint 13 if ah==2 (DOS)

bpint 13 if ah==3 (DOS)

bpint 13 if ah==4 (DOS)

bpx GetFileAttributesA

bpx GetFileSize

bpx GetDriveType

bpx GetLastError

bpx ReadFile

bpio -h (Your CD-ROM Port Address) R

 

软件狗相关

bpio -h 278 R

bpio -h 378 R

 

键盘输入相关

bpint 16 if ah==0 (DOS)

bpint 21 if ah==0xA (DOS)

 

文件访问相关

bpint 21 if ah==3dh (DOS)

bpint 31 if ah==3fh (DOS)

bpint 21 if ah==3dh (DOS)

bpx ReadFile

bpx WriteFile

bpx CreateFile

bpx SetFilePointer

bpx GetSystemDirectory

 

INI 初始化文件相关

bpx GetPrivateProfileString

bpx GetPrivateProfileInt

bpx WritePrivateProfileString

bpx WritePrivateProfileInt

 

注册表相关

bpx RegCreateKey

bpx RegDeleteKey

bpx RegQueryvalue

bpx RegCloseKey

bpx RegOpenKey

 

注册标志相关

bpx cs:eip if EAX==0

 

内存标准相关

bpmb cs:eip rw if 0x30:0x45AA==0

 

显示相关

bpx 0x30:0x45AA do “d 0x30:0x44BB”

bpx CS:0x66CC do “? EAX”

 

查找窗口

FindWindowA

BP SetFilePointer

 

bpx hmemcpy ;破解万能断点,拦截内存拷贝动作(注意:Win9x专用断点)

bpx Lockmytask ;当你用其它断点都无效时可以试一下,这个断点拦截按键的动作(Win9x专用)

 

实在找不到断点可以试下面的方法:

bmsg handle wm_gettext ;拦截注册码(handle为对应窗口的句柄)

bmsg handle wm_command ;拦截OK按钮(handle为对应窗口的句柄)

 

拦截窗口:

bpx CreateWindow ;创建窗口

bpx CreateWindowEx(A/W) ;创建窗口

bpx ShowWindow ;显示窗口

bpx UpdateWindow ;更新窗口

bpx GetWindowText(A/W) ;获取窗口文本

 

拦截消息框:

bpx MessageBox(A/W) ;创建消息框

bpx MessageBoxExA(W) ;创建消息框

bpx MessageBoxIndirect(A/W) ;创建定制消息框

 

拦截警告声:

bpx MessageBeep ;发出系统警告声(如果没有声卡就直接驱动系统喇叭发声)

 

拦截对话框:

bpx DialogBox ;创建模态对话框

bpx DialogBoxParam(A/W) ;创建模态对话框

bpx DialogBoxIndirect ;创建模态对话框

bpx DialogBoxIndirectParam(A/W) ;创建模态对话框

bpx CreateDialog ;创建非模态对话框

bpx CreateDialogParam(A/W) ;创建非模态对话框

bpx CreateDialogIndirect ;创建非模态对话框

bpx CreateDialogIndirectParam(A/W) ;创建非模态对话框

bpx GetDlgItemText(A/W) ;获取对话框文本

bpx GetDlgItemInt ;获取对话框整数值

 

拦截剪贴板:

bpx GetClipboardData ;获取剪贴板数据

 

拦截注册表:

bpx RegOpenKey(A/W) ;打开子健 ( 例:bpx RegOpenKey(A) if *(esp->8)==’****’ )

bpx RegOpenKeyExA(W) ;打开子健 ( 例:bpx RegOpenKeyEx if *(esp->8)==’****’ )

bpx RegQueryValue(A/W) ;查找子健 ( 例:bpx RegQueryValue(A) if *(esp->8)==’****’ )

bpx RegQueryValueEx(A/W) ;查找子健 ( 例:bpx RegQueryValueEx if *(esp->8)==’****’ )

bpx RegSetValue(A/W) ;设置子健 ( 例:bpx RegSetValue(A) if *(esp->8)==’****’ )

bpx RegSetValueEx(A/W) ;设置子健 ( 例:bpx RegSetValueEx(A) if *(esp->8)==’****’ )

 

注意:’****’为指定子键名的前4个字符,如子键为’Regcode’,则’****’= ‘Regc’

功能限制拦截断点:

bpx EnableMenuItem ;禁止或允许菜单项

bpx EnableWindow ;禁止或允许窗口

bmsg hMenu wm_command ;拦截菜单按键事件,其中hMenu为菜单句柄

bpx K32Thk1632Prolog ;配合bmsg hMenu wm_command使用,可以通过这个断点进入菜单处理程序

 

应用示例:

CALL [KERNEL32!K32Thk1632Prolog]

CALL [……] <– 由此跟踪进入菜单处理程序

CALL [KERNEL32!K32Thk1632Epilog]

 

拦截时间:

bpx GetLocalTime ;获取本地时间

bpx GetSystemTime ;获取系统时间

bpx GetFileTime ;获取文件时间

bpx GetTickCount ;获得自系统成功启动以来所经历的毫秒数

bpx GetCurrentTime ;获取当前时间(16位)

bpx SetTimer ;创建定时器

bpx TimerProc ;定时器超时回调函数

 

拦截文件:

bpx CreateFileA(W) ;创建或打开文件 (32位)

bpx OpenFile ;打开文件 (32位)

bpx ReadFile ;读文件 (32位)

bpx WriteFile ;写文件 (32位)

bpx _lcreat ;创建或打开文件 (16位)

bpx _lopen ;打开文件 (16位)

bpx _lread ;读文件 (16位)

bpx _lwrite ;写文件 (16位)

bpx _hread ;读文件 (16位)

bpx _hwrite ;写文件 (16位)

 

拦截驱动器:

bpx GetDrivetype(A/W) ;获取磁盘驱动器类型

bpx GetLogicalDrives ;获取逻辑驱动器符号

bpx GetLogicalDriveStringsA(W) ;获取当前所有逻辑驱动器的根驱动器路径

 

拦截狗:

bpio -h 378(或278、3BC) R ;378、278、3BC是并行打印端口

bpio -h 3F8(或2F8、3E8、2E8) R ;3F8、2F8、3E8、2E8是串行端口

 

VB程序专用断点:

bpx msvbvm60!rtcMsgBox

bpx msvbvm60!__vbaStrCmp

bpx msvbvm60!__vbaStrComp

bpx msvbvm60!__vbaStrCompVar

bpx msvbvm60!__vbaStrTextCmp

bpx msvbvm60!__vbaFileOpen

bpx msvbvm60!__vbaInputFile

bpx msvbvm60!__vbaFileSeek

bpx msvbvm60!__vbaWriteFile

bpx msvbvm60!__vbaFileClose

bpx msvbvm60!rtcFileAttributes

bpx msvbvm60!rtcFileDateTime

bpx msvbvm60!rtcFileLen

bpx msvbvm60!rtcFileLength

bpx msvbvm60!__vbaVarInt

bpx msvbvm60!__vbaVarCmpGe

bpx msvbvm60!__vbaVarCmpGt

bpx msvbvm60!__vbaVarCmpLe

bpx msvbvm60!__vbaVarCmpLt

bpx msvbvm60!__vbaVarCmpNe

bpx msvbvm60!__vbaVarTextCmpEq

bpx msvbvm60!__vbaVarTextCmpGe

bpx msvbvm60!__vbaVarTextCmpGt

bpx msvbvm60!__vbaVarTextCmpLe

bpx msvbvm60!__vbaVarTextCmpLt

bpx msvbvm60!__vbaVarTextCmpNe

bpx msvbvm60!__vbaVarTextTstEq

bpx msvbvm60!__vbaVarTextTstGe

bpx msvbvm60!__vbaVarTextTstGt

bpx msvbvm60!__vbaVarTextTstLe

bpx msvbvm60!__vbaVarTextTstLt

bpx msvbvm60!__vbaVarTextTstNe

bpx msvbvm60!__vbaVarTstEq

bpx msvbvm60!__vbaVarTstGe

bpx msvbvm60!__vbaVarTstGt

bpx msvbvm60!__vbaVarTstLe

bpx msvbvm60!__vbaVarTstLt

bpx msvbvm60!__vbaVarTstNe

注意:VB程序仍然可以使用普通API函数,只要函数“最终”CALL了这个函数

 

上面的断点对应VB6程序,如果是VB5程序则将msvbvm60改成msvbvm50即可


云涯历险记 , 版权所有丨如未注明 , 均为原创丨本网站采用BY-NC-SA协议进行授权
转载请注明原文链接:OD攻略:VB断点
喜欢 (1)

您必须 登录 才能发表评论!