首页
社区
课程
招聘
Delphi逆向工程笔记[4]
发表于: 2004-10-28 17:06 11131

Delphi逆向工程笔记[4]

2004-10-28 17:06
11131

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

  下面处理WM_LBUTTONDOWN。

0000:00404E79 loc_404E79:
0000:00404E79                 movzx   eax, [ebp+lParam]
//取lParam的低16位,注意它用的是movzx,和下面不同。
//开始静态分析没有看出来差别,还是debug了一下才明白。

0000:00404E7D                 mov     [ebp+pt.x], eax
0000:00404E80                 mov     eax, dword ptr [ebp+lParam]
0000:00404E83                 call    sub_403C6C
//这个call实际是取eax的高16位
0000:00404E88                 movzx   eax, ax
//截掉废的bit
0000:00404E8B                 mov     [ebp+pt.y], eax
0000:00404E8E                 push    [ebp+pt.y]
0000:00404E91                 push    [ebp+pt.x]      ; pt
0000:00404E94                 push    offset sRect    ; lprc
0000:00404E99                 call    PtInRect
//这个API有点意思,一般API传结构都是传地址,比如sRect,但是它
//传Point就直接传值了。以前还真没有看到这样的API。

0000:00404E9E                 test    eax, eax
0000:00404EA0                 jz      loc_404F8F
//返回True才继续
0000:00404EA6                 push    0               ; lParam
0000:00404EA8                 push    2               ; wParam
0000:00404EAA                 push    0A1h ; '?      ; Msg
//碰到这种Msg,应该查出它的名称。当然直接用值也可以,但是不利于理解
//上面还有2个参数,虽然查到意思,还是不很明白。

0000:00404EAF                 mov     eax, [ebp+hWnd]
0000:00404EB2                 push    eax             ; hWnd
0000:00404EB3                 call    PostMessageA
0000:00404EB8                 jmp     loc_404F8F

0000:00403C6C sub_403C6C      proc near
0000:00403C6C
0000:00403C6C                 shr     eax, 10h
0000:00403C6F                 retn
0000:00403C6F sub_403C6C      endp

  OK,下面就是WM_LBUTTONDOWN的代码了:

    WM_LBUTTONDOWN:
      Begin
        sPoint.x:=lParam AND $FFFF;
        sPoint.y:=lParam SHR 16;
        //这里就不能用Hi和Lo了
        If PtInRect(sRect,sPoint) Then
          Begin
            PostMessage(hDlg,WM_NCLBUTTONDOWN,2,0);
          End;
      End;

  运行一下,效果出来了。虽然还是没有看到标题栏,但是那个地方点上去已经可以
拖了。
  好,还有2个WM。大概看看,WM_DRAWITEM量比较少,而WM_PAINT写了一堆。当然先
逆WM_DRAWITEM了。

0000:00404F3F loc_404F3F:
0000:00404F3F                 mov     eax, dword ptr [ebp+lParam]
0000:00404F42                 call    sub_4042AC
//拜托,又是一个公用call。参数就是lParam的值
0000:00404F47                 xor     ebx, ebx
0000:00404F49                 jmp     short loc_404F8F

0000:004042AC sub_4042AC      proc near
//怎么知道它是公用的call?很简单,IDA有ref信息的。不过我贴的时候去掉了
0000:004042AC
0000:004042AC String          = byte ptr -0Ch
0000:004042AC
0000:004042AC                 push    ebx
0000:004042AD                 add     esp, 0FFFFFFF4h
//sub esp,0CH
0000:004042B0                 mov     ebx, eax
//入口参数
0000:004042B2                 mov     eax, ds:hbr
0000:004042B7                 push    eax             ; hbr
0000:004042B8                 lea     eax, [ebx+1Ch]
//有麻烦了,ebx到底是什么?还好Delphi带的SDK文档很不错,可以查到
//WM_DRAWITEM的lParam是^DRAWITEMSTRUCT
//另外,注意这里用了LEA取地址,所以eax=ebx+1ch,是一个地址
//对照Windows.pas里的定义可以看到它用的定义是const lprc: TRect。
//所以把结构的成员直接写了没有问题的,Delphi会自己转换。
//后面的调用也有这个问题,但是Delphi很不错。用汇编就要自己注意了。

0000:004042BB                 push    eax             ; lprc
0000:004042BC                 mov     eax, [ebx+18h]
0000:004042BF                 push    eax             ; hDC
0000:004042C0                 call    FillRect
0000:004042C5                 push    0A0A0A0h        ; COLORREF
0000:004042CA                 mov     eax, [ebx+18h]
0000:004042CD                 push    eax             ; HDC
0000:004042CE                 call    SetTextColor
0000:004042D3                 push    1               ; int
0000:004042D5                 mov     eax, [ebx+18h]
0000:004042D8                 push    eax             ; HDC
0000:004042D9                 call    SetBkMode
0000:004042DE                 push    0Fh             ; grfFlags
//在SDK里可以查到是一些值的组合,下面还有。
0000:004042E0                 push    1               ; edge
0000:004042E2                 lea     eax, [ebx+1Ch]
0000:004042E5                 push    eax             ; qrc
0000:004042E6                 mov     eax, [ebx+18h]
0000:004042E9                 push    eax             ; hdc
0000:004042EA                 call    DrawEdge
0000:004042EF                 push    0Ah             ; nMaxCount
0000:004042F1                 lea     eax, [esp+10h+String]
0000:004042F5                 push    eax             ; lpString
0000:004042F6                 mov     eax, [ebx+14h]
0000:004042F9                 push    eax             ; hWnd
0000:004042FA                 call    GetWindowTextA
0000:004042FF                 push    25h             ; uFormat
0000:00404301                 lea     eax, [ebx+1Ch]
0000:00404304                 push    eax             ; lpRect
0000:00404305                 push    0FFFFFFFFh      ; nCount
0000:00404307                 lea     eax, [esp+18h+String]
0000:0040430B                 push    eax             ; lpString
0000:0040430C                 mov     eax, [ebx+18h]
0000:0040430F                 push    eax             ; hDC
0000:00404310                 call    DrawTextA
0000:00404315                 test    byte ptr [ebx+10h], 1
0000:00404319                 jz      short loc_404350
0000:0040431B                 push    0DDFFh          ; COLORREF
0000:00404320                 mov     eax, [ebx+18h]
0000:00404323                 push    eax             ; HDC
0000:00404324                 call    SetTextColor
0000:00404329                 push    25h             ; uFormat
0000:0040432B                 lea     eax, [ebx+1Ch]
0000:0040432E                 push    eax             ; lpRect
0000:0040432F                 push    0FFFFFFFFh      ; nCount
0000:00404331                 lea     eax, [esp+18h+String]
0000:00404335                 push    eax             ; lpString
0000:00404336                 mov     eax, [ebx+18h]
0000:00404339                 push    eax             ; hDC
0000:0040433A                 call    DrawTextA
0000:0040433F                 push    0Fh             ; grfFlags
0000:00404341                 push    2               ; edge
0000:00404343                 lea     eax, [ebx+1Ch]
0000:00404346                 push    eax             ; qrc
0000:00404347                 mov     eax, [ebx+18h]
0000:0040434A                 push    eax             ; hdc
0000:0040434B                 call    DrawEdge
0000:00404350
0000:00404350 loc_404350:
0000:00404350                 add     esp, 0Ch
0000:00404353                 pop     ebx
0000:00404354                 retn
0000:00404354 sub_4042AC      endp

  好的,WM_DRAWITEM和sub_4042AC出来了。

    WM_DRAWITEM:
      Begin
        ItemDraw(PDrawItemStruct(lParam));
        Result:=0;
      End;

Procedure ItemDraw(lpDIS:PDrawItemStruct);
Var
  Str:String;
Begin
  FillRect(lpDIS^.hDC,lpDIS^.rcItem,h_Brush);
  SetTextColor(lpDIS^.hDC,$A0A0A0);
  SetBkMode(lpDIS^.hDC,TRANSPARENT);
  DrawEdge(lpDIS^.hDC,lpDIS^.rcItem,BDR_RAISEDOUTER,BF_RECT);
  GetWindowText(lpDIS^.hwndItem,PChar(Str),10);
  DrawText(lpDIS^.hDC,PChar(Str),-1,lpDIS^.rcItem,DT_SINGLELINE OR DT_VCENTER OR DT_CENTER);
  
  If lpDIS^.itemState MOD 2=1 Then
    Begin
      SetTextColor(lpDIS^.hDC,$DDFF);
      DrawText(lpDIS^.hDC,PChar(Str),-1,lpDIS^.rcItem,DT_SINGLELINE OR DT_VCENTER OR DT_CENTER);
      DrawEdge(lpDIS^.hDC,lpDIS^.rcItem,BDR_SUNKENOUTER,BF_RECT);
    End;
End;

  试试看,原来是画三维边框。
  另外,不知道大家注意到没有,贴上来的PAS代码其实都是排好的。直接C&P就可以,
连缩进也不用做。
  还有,上面的代码有个问题,至少我认为是个问题。就是在GetWindowText那里。
虽然已经限制了长度,但是Str没有初始化,这个在以前没有什么,因为都是Short的。
但是现在还有个PChar,而且和Short都对应到String类型。以前老是有人抱怨说PChar
出AccessViolation,结果最后发现是没有初始化,PChar都指到随机地址了。后来用了
SetLength就OK了。不过这里因为Str是在堆栈分配的,所以个人认为问题不大。不知老
钱怎么看这个问题,最好是请他指教一下。


[招生]科锐逆向工程师培训(2024年11月15日实地,远程教学同时开班, 第51期)

收藏
免费 7
支持
分享
最新回复 (12)
雪    币: 159
活跃值: (89)
能力值: ( LV4,RANK:50 )
在线值:
发帖
回帖
粉丝
2
支持大侠,再接再力!!
2004-10-28 19:43
0
雪    币: 300
活跃值: (412)
能力值: ( LV9,RANK:410 )
在线值:
发帖
回帖
粉丝
3
跟着大侠学习
2004-10-28 19:52
0
雪    币: 49
活跃值: (156)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
4
强烈支持,大哥可不可以把你以前的文章一起打包入上来?
2004-10-28 20:03
0
雪    币: 97697
活跃值: (200819)
能力值: (RANK:10 )
在线值:
发帖
回帖
粉丝
5
支持!!!
2004-10-28 20:36
0
雪    币: 332
活跃值: (479)
能力值: ( LV9,RANK:330 )
在线值:
发帖
回帖
粉丝
6
我也遇到PChar问题,老是有警告,但是忽略了,一般也没问题 ,这次你一说,大家都明白了原因,又长知识了.
2004-10-28 22:23
0
雪    币: 271
活跃值: (90)
能力值: ( LV4,RANK:50 )
在线值:
发帖
回帖
粉丝
7
高人啊,佩服佩服。。。
2004-10-28 22:47
0
雪    币: 390
活跃值: (707)
能力值: ( LV12,RANK:650 )
在线值:
发帖
回帖
粉丝
8
最初由 laoqian 发布
我也遇到PChar问题,老是有警告,但是忽略了,一般也没问题 ,这次你一说,大家都明白了原因,又长知识了.


但是问题绝对没有这么简单。而且我讲的很模糊,自己都没有完全明白,只是知道大概是这么回事。

问题是,现在string是在stack里分配的,从代码看,是局部变量。画个堆栈就可以发现,这个String的位置恰好对应到004042AD的指令分配的空间,而且长度为0ch。而从下面可以看见,get到的长度最多是0ah。差2个字节。但是short的存放方式是1个长度字节+255个buffer,这里却有2个字节的富余。然而AnsiString起码也要4个字节。实在想不通是怎么回事。试了用String[10],但是在类型转换的地方出了问题。Array of Byte没有试过,从理论和实际上应该可以自圆其说,但因为GetWindowText的关系,没敢造次。

想请laoqian把那个地方的代码贴一下,就是变量说明和GetWindowText的调用。反正我已经逆出来了,你再贴应该也不算违规,何况只是一部分。谢谢。

另外,我注意到这个问题是因为最近在研究缓冲区溢出,特别是堆栈溢出。从GetWindowText看应该不会有危险,但是2个字节的差实在是太巧合了,要是1个或者3个4个我都不会这么注意这个地方。安焦的mail系统有问题,我收不到认证信,没法发言问。
2004-10-29 10:25
0
雪    币: 332
活跃值: (479)
能力值: ( LV9,RANK:330 )
在线值:
发帖
回帖
粉丝
9
我为了大家的技术提高,和学习兴趣,只好放出原程序了,youknown不要骂我啊。
看到了吗,是个数组,。

//////////////////////////////////////////////////////////////
//绘制按钮函数
//pdis:                        绘制内容结构指针
procedure DrawButton(pdis: PDRAWITEMSTRUCT);
var
  szText: array[0..9] of char; //按钮文字
begin
  FillRect(pdis.hDC, pdis.rcItem, BKC); //以背景色BKC填充按钮

  SetTextColor(pdis.hDC, clText);
  SetBkMode(pdis.hDC, TRANSPARENT);
  
  //尚未点击,绘制按钮边框-突起状态
  DrawEdge(pdis.hDC, pdis.rcItem, BDR_RAISEDOUTER, BF_RECT);
  GetWindowText(pdis.hwndItem, szText, sizeof(szText));
  DrawText(pdis.hDC, szText, -1, pdis.rcItem, DT_SINGLELINE or DT_CENTER or DT_VCENTER);
  
  //已被按下,绘制按钮边框-凹陷状态
  //if (pdis.itemState and ODS_SELECTED)=ODS_SELECTED then

  if (pdis.itemState and ODS_SELECTED) <> 0 then
  begin
    SetTextColor(pdis.hDC, $00ddff);
    DrawText(pdis.hDC, szText, - 1, pdis.rcItem, DT_SINGLELINE or DT_CENTER or DT_VCENTER);
    DrawEdge(pdis.hDC, pdis.rcItem, BDR_SUNKENOUTER, BF_RECT);
  end;
end;
//////////////
大家可以看出他逆向的还真差不多呢!佩服
2004-10-29 10:53
0
雪    币: 390
活跃值: (707)
能力值: ( LV12,RANK:650 )
在线值:
发帖
回帖
粉丝
10
最初由 laoqian 发布
我为了大家的技术提高,和学习兴趣,只好放出原程序了,youknown不要骂我啊。
看到了吗,是个数组,。

//////////////////////////////////////////////////////////////
//绘制按钮函数
........


好哇,果然是个Array of Byte!害我死了N个脑细胞,真个是JR!哈哈!

顺便说一句,我做缓冲区都是用Array[1..1] of Byte指针的,然后GetMem分配内存。有点烦,但是从来没有出过问题。

谢谢!!!

哇哈哈,看来我做的分析还是基本正确的。不过那个ODS_SELECTED就没有分析出来。逆向终究还是不可能和原来的程序完全一样的。

不过你分配了10个字节,还是差2个。这个只好等我动态调试了。

Delphi真是好啊,laoqian,看到那个^了没有?自动转换的!

说实在的,因为原来的程序基本是SDK写的,加上我以前是学TP出道,而且专门研究过传值方式,所以才可以逆到这个程度。如果你加了算法,我就没辙了。另外我正在逆WM_PAINT,这部分难度比较大。估计花的时间要以前所有时间的起码2倍。目前只做了过程首部形式的分析,觉得有个地方很奇怪,应该是模板编程的原因。如果你想先看看,我可以把那部分的分析发给你。
2004-10-29 11:05
0
雪    币: 116
活跃值: (220)
能力值: ( LV12,RANK:370 )
在线值:
发帖
回帖
粉丝
11
支持一下。。。

delphi是不支持模板编程的
2004-10-29 11:35
0
雪    币: 390
活跃值: (707)
能力值: ( LV12,RANK:650 )
在线值:
发帖
回帖
粉丝
12
最初由 xIkUg 发布
支持一下。。。

delphi是不支持模板编程的


此模板非彼模板,一直在看这个手记系列的自然知道。
2004-10-29 11:47
0
雪    币: 116
活跃值: (220)
能力值: ( LV12,RANK:370 )
在线值:
发帖
回帖
粉丝
13
那是什么模板...
等你逆出的时候给大家讲一讲,也好学习学习
2004-10-29 12:16
0
游客
登录 | 注册 方可回帖
返回
//