首页
社区
课程
招聘
问答 CTF 排行榜 知识库 工具下载 峰会 看雪商城 证书查询
  1. 社区
  2. CTF对抗
    3. 发新帖
[讨论]练习CM一个
发表于: 2008-12-30 13:03 8767

[讨论]练习CM一个

nvr 活跃值
2008-12-30 13:03
8767
前些天写的一个CM 昨天无聊改了几个地方! 可能因为资源中有位图的关系,文件有些"肥"  !
写的不好大家见谅! 高手飘过!

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

上传的附件：
收藏
免费 ・0
支持
分享
最新回复 (23)
爱琴海
雪    币： 1355
活跃值： (339)
能力值： ( LV13，RANK：920 )
在线值：
发帖
回帖
粉丝
私信
2 楼
不知道为什么报警，是不是什么奇怪的壳？

呵呵，要上课了，晚上考试。抽空在搞。

——————————————————————————————————————————

考完试了，呵呵

关闭卡巴，重新下载分析。脱壳，去自校验。

笔记为：

手动脱壳后（脱该壳很轻松，请断点401019，然后去除断点脱壳即可）

扫描为：MASM32 / TASM32 [Overlay]

包含算法：

BASE64 table :: 0000443A :: 0040443A
CRC32 [poly] :: 00001307 :: 00401307

00401341  /$  55            PUSH EBP
00401342  |.  8BEC          MOV EBP,ESP
00401344  |.  83C4 E4       ADD ESP,-1C
00401347  |.  68 04010000   PUSH 104                                 ; /BufSize = 104 (260.)
0040134C  |.  68 48484000   PUSH Crackme.00404848                    ; |PathBuffer = Crackme.00404848
00401351  |.  FF35 34484000 PUSH DWORD PTR DS:[404834]               ; |hModule = 00400000 (Crackme)
00401357  |.  E8 38080000   CALL <JMP.&kernel32.GetModuleFileNameA>  ; \GetModuleFileNameA
0040135C  |.  6A 00         PUSH 0                                   ; /hTemplateFile = NULL
0040135E  |.  6A 20         PUSH 20                                  ; |Attributes = ARCHIVE
00401360  |.  6A 03         PUSH 3                                   ; |Mode = OPEN_EXISTING
00401362  |.  6A 00         PUSH 0                                   ; |pSecurity = NULL
00401364  |.  6A 01         PUSH 1                                   ; |ShareMode = FILE_SHARE_READ
00401366  |.  68 00000080   PUSH 80000000                            ; |Access = GENERIC_READ
0040136B  |.  68 48484000   PUSH Crackme.00404848                    ; |FileName = "C:\Documents and Settings\Administrator\桌面\Crackme\Crackme.exe"
00401370  |.  E8 07080000   CALL <JMP.&kernel32.CreateFileA>         ; \CreateFileA
00401375  |.  8945 FC       MOV DWORD PTR SS:[EBP-4],EAX
00401378  |.  837D FC FF    CMP DWORD PTR SS:[EBP-4],-1
0040137C  |.  0F84 90000000 JE Crackme.00401412
00401382  |.  6A 00         PUSH 0                                   ; /pFileSizeHigh = NULL
00401384  |.  FF75 FC       PUSH DWORD PTR SS:[EBP-4]                ; |hFile
00401387  |.  E8 02080000   CALL <JMP.&kernel32.GetFileSize>         ; \GetFileSize
0040138C  |.  8945 F8       MOV DWORD PTR SS:[EBP-8],EAX
0040138F  |.  FF75 F8       PUSH DWORD PTR SS:[EBP-8]                ; /MemSize
00401392  |.  6A 42         PUSH 42                                  ; |Flags = GHND
00401394  |.  E8 07080000   CALL <JMP.&kernel32.GlobalAlloc>         ; \GlobalAlloc
00401399  |.  8945 F0       MOV DWORD PTR SS:[EBP-10],EAX
0040139C  |.  FF75 F0       PUSH DWORD PTR SS:[EBP-10]               ; /hMem
0040139F  |.  E8 08080000   CALL <JMP.&kernel32.GlobalLock>          ; \GlobalLock
004013A4  |.  8945 EC       MOV DWORD PTR SS:[EBP-14],EAX
004013A7  |.  6A 00         PUSH 0                                   ; /pOverlapped = NULL
004013A9  |.  8D45 F4       LEA EAX,DWORD PTR SS:[EBP-C]             ; |
004013AC  |.  50            PUSH EAX                                 ; |pBytesRead
004013AD  |.  FF75 F8       PUSH DWORD PTR SS:[EBP-8]                ; |BytesToRead
004013B0  |.  FF75 EC       PUSH DWORD PTR SS:[EBP-14]               ; |Buffer
004013B3  |.  FF75 FC       PUSH DWORD PTR SS:[EBP-4]                ; |hFile
004013B6  |.  E8 FD070000   CALL <JMP.&kernel32.ReadFile>            ; \ReadFile
004013BB  |.  FF75 FC       PUSH DWORD PTR SS:[EBP-4]                ; /hObject
004013BE  |.  E8 B3070000   CALL <JMP.&kernel32.CloseHandle>         ; \CloseHandle
004013C3  |.  B9 3C000000   MOV ECX,3C
004013C8  |.  034D EC       ADD ECX,DWORD PTR SS:[EBP-14]            ;  文件指向第3C字节处
004013CB  |.  8B09          MOV ECX,DWORD PTR DS:[ECX]               ;  ECX=C8
004013CD  |.  83C1 4C       ADD ECX,4C                               ;  将文件偏移3C处的双字节+4C    ECX= ECX+4C=C8+4C=114
004013D0  |.  034D EC       ADD ECX,DWORD PTR SS:[EBP-14]            ;  锁定文件偏移114H位置
004013D3  |.  8B01          MOV EAX,DWORD PTR DS:[ECX]               ;  该值为：2147B934H (怀疑为CRC32)
004013D5  |.  8945 E8       MOV DWORD PTR SS:[EBP-18],EAX
004013D8  |.  A3 044A4000   MOV DWORD PTR DS:[404A04],EAX
004013DD  |.  C701 00000000 MOV DWORD PTR DS:[ECX],0
004013E3  |.  E8 0CFFFFFF   CALL Crackme.004012F4                    ;  CRC32
004013E8  |.  8B5D EC       MOV EBX,DWORD PTR SS:[EBP-14]
004013EB  |.  8B4D F8       MOV ECX,DWORD PTR SS:[EBP-8]
004013EE  |.  E8 27FFFFFF   CALL Crackme.0040131A                    ;  CRC32值可从EAX见到
004013F3  |.  3945 E8       CMP DWORD PTR SS:[EBP-18],EAX
004013F6  |.  A3 084A4000   MOV DWORD PTR DS:[404A08],EAX
004013FB  |.  74 05         JE SHORT Crackme.00401402                ;  自校验跳转[必须跳转]
004013FD  |.  E8 D7FEFFFF   CALL Crackme.004012D9
00401402  |>  FF75 EC       PUSH DWORD PTR SS:[EBP-14]               ; /hMem
00401405  |.  E8 A8070000   CALL <JMP.&kernel32.GlobalUnlock>        ; \GlobalUnlock
0040140A  |.  FF75 F0       PUSH DWORD PTR SS:[EBP-10]               ; /hMem
0040140D  |.  E8 94070000   CALL <JMP.&kernel32.GlobalFree>          ; \GlobalFree
00401412  |>  C9            LEAVE
00401413  \.  C3            RETN

那么我们就在004013F3断点，获得修改后的CRC32值，然后替换到文件偏移地址：114H处，进行瞒天过海。

断下来后，得到CRC32新值为：BDC9079C

替换即可。

先到这里，发布一下脱壳去自校验版本，这回卡巴不报警了，呵呵。方便大家一起破解该CM。

——————————————————————————————————————————

name:ssssss
sn:NOVRAI-06BA94C7-AAAAAA

名字还真不能随意起，呵呵，耽误了很久。
用VB写这样算法的注册机，真是件头痛的事情。很麻烦...

算法描述如下：

注册码第一部分，可以看做固定：NOVRAI
注册码第三部分，是查表+变形得到的：
Private Function Chabiao(name1 As String) As String
'该函数计算对用户名进行查表变形
Dim changdu As Byte
Dim Pianyi As Byte
Const Mimabiao As String = "bc2adm-qo5pr*g3sn1v&m6xz7uy@4we9lkj0tf8i"
    For changdu = 1 To Len(name1)
        Pianyi = Asc(Mid(name1, changdu, 1)) * 7 Mod 40 + 1
        Chabiao = Chabiao & Mid(Mimabiao, Pianyi, 1)
    Next changdu
End Function

Private Function Bianxing(Name2 As String) As String
'该函数计算注册码第三部分,要求计算出来的结果不能包含复杂字符;Name2为通过Chabiao变形后的用户名
Dim changdu As Byte
    For changdu = 1 To Len(Name2)
        Bianxing = Bianxing & Chr((Asc(Mid(Name2, changdu, 1)) - 12) Xor 32)
    Next changdu
End Function

注册码第二部分：
是结合用户名与查表后用户名进行逐位异或+当前位数-1累加在一起，再与一些常数或运算、异或运算，循环左移、加减等等
关于正弦函数计算的可以忽略，因为始终乘以一个“1”，都是小数点后面很多位的值，忽略。

倒推，最后异或一个“12345678H”即可。

Private Function SecondSn(Name3 As String) As String
'该函数计算注册码第二部分,Name3为原始用户名
On Error GoTo Guoda
Dim changdu As Byte
Dim Name4 As String
'Name4 为查表变形后的结果
Dim LeiJiaHe As Double
'累加和寄存器
Name4 = Chabiao(Name3)
For changdu = 1 To Len(Name3)
    LeiJiaHe = LeiJiaHe + changdu - 1 + (Asc(Mid(Name3, changdu, 1)) Xor Asc(Mid(Name4, changdu, 1))) * 8
Next changdu

LeiJiaHe = Val("&H" & (ROL(Hex(LeiJiaHe * 9), 8))) Or 1079186709
SecondSn = Guizheng(Hex(LeiJiaHe), 8)
SecondSn = Mid(SecondSn, 3, 2) & Left(SecondSn, 2) & Right(SecondSn, 2) & Mid(SecondSn, 5, 2)
LeiJiaHe = ((Val("&H" & ROL(SecondSn, 18)) Xor 1079186709) - 5462) Xor 305419896
SecondSn = Guizheng(Hex(LeiJiaHe), 8)

Exit Function
Guoda:
SecondSn = "Too Big!"
End Function

Private Function ROL(strA1 As String, Wei1 As Long) As String
'针对十六进制进行左移
Dim Xunhuan1 As Long
ROL = ToBin(strA1)
For Xunhuan1 = 1 To Wei1
    ROL = Right(ROL, 31) & Left(ROL, 1)
Next Xunhuan1
ROL = ToHEX(ROL)
End Function

其中循环左移函数是我自己写的，具体涉及的细节就不交代了。思路是将8位十六进制转换为32位二进制，进行左移响应的位数，然后重新转换为16进制。

还有一些细节我没仔细看，请大家将就着用下，呵呵

找到个很好的注册码：

name: kkkkkk
sn:NOVRAI-053A84C7-KKKKKK
上传的附件：
2008-12-30 13:19
0
nvr
雪    币： 200
活跃值： (10)
能力值： ( LV2，RANK：10 )
在线值：
发帖
回帖
粉丝
私信
nvr
3 楼
没有加壳啊!!!
只是伪装了一下入口！！！
又让卡巴误杀了！！！
2008-12-30 13:26
0
freetofly
雪    币： 200
活跃值： (10)
能力值： ( LV2，RANK：10 )
在线值：
发帖
回帖
粉丝
私信
4 楼
卡巴禁止了

...
2008-12-30 17:51
0
疯子鱼
雪    币： 358
活跃值： (10)
能力值： ( LV2，RANK：10 )
在线值：
发帖
回帖
粉丝
私信
5 楼
注册码前6位 跟用户名没什么关系啊

好像把前6位 弄进一个函数里  等于 UkFJTk9W  这个字符串就行   不太好逆那一段啊
2008-12-30 19:54
0
nvr
雪    币： 200
活跃值： (10)
能力值： ( LV2，RANK：10 )
在线值：
发帖
回帖
粉丝
私信
nvr
6 楼
前六位是一种知名的算法啊 只不过做一点点改动
你再试试!!看来你快成功了!
2008-12-30 20:02
0
北极狐狸
雪    币： 2368
活跃值： (81)
能力值： (RANK：300 )
在线值：
发帖
回帖
粉丝
私信
7 楼
今下午在上班的时候下了这个cm本想回来继续的，谁知，刚打开U盘，只听尖叫一声....我的卡巴把他灭了....
哥们还是把你的入口改下吧....烦死了。
要我重新下....
2008-12-30 20:20
0
nvr
雪    币： 200
活跃值： (10)
能力值： ( LV2，RANK：10 )
在线值：
发帖
回帖
粉丝
私信
nvr
8 楼
因为原入口是几个跳转,我看着头晕,怕大家也看着头晕！所以进行了一下伪装。
让您重下，您受累了！
2008-12-30 20:50
0
humourkyo
雪    币： 926
活跃值： (397)
能力值： (RANK：500 )
在线值：
发帖
回帖
粉丝
私信
9 楼
无聊随便看了下

name:iindln
serial:NOVRAI-071AB4C7-GGDAHD
2008-12-30 21:05
0
疯子鱼
雪    币： 358
活跃值： (10)
能力值： ( LV2，RANK：10 )
在线值：
发帖
回帖
粉丝
私信
10 楼
膜拜9楼...........
2008-12-30 21:07
0
nvr
雪    币： 200
活跃值： (10)
能力值： ( LV2，RANK：10 )
在线值：
发帖
回帖
粉丝
私信
nvr
11 楼
膜拜一下九楼!
同时也谢谢爱琴海兄弟 帮我解决了问题 
的确是CRC校验!你的去校验方法很精彩 学习了!
2008-12-30 21:24
0
netwind
雪    币： 10936
活跃值： (3293)
能力值： (RANK：520 )
在线值：
发帖
回帖
粉丝
私信
12 楼
name:nnnnnnn
serial:NOVRAI-0512B4C7-DDDDDDD
2008-12-30 21:59
0
nvr
雪    币： 200
活跃值： (10)
能力值： ( LV2，RANK：10 )
在线值：
发帖
回帖
粉丝
私信
nvr
13 楼
刚看了一下爱琴海兄 的脱壳文件  和我的原文件入口不一样
没有加伪装的原文件入口为

00401019   . /E9 75080000   jmp 脱壳去自.<模块入口点>

2008-12-30 22:01
0
nvr
雪    币： 200
活跃值： (10)
能力值： ( LV2，RANK：10 )
在线值：
发帖
回帖
粉丝
私信
nvr
14 楼
一些小把戏终究还是逃不过各位大侠的法眼！！
向各位学习了！！！
2008-12-30 22:13
0
爱琴海
雪    币： 1355
活跃值： (339)
能力值： ( LV13，RANK：920 )
在线值：
发帖
回帖
粉丝
私信
15 楼
呵呵，其实没什么的。多前进了一行，重新修正了。
2008-12-30 22:39
0
netwind
雪    币： 10936
活跃值： (3293)
能力值： (RANK：520 )
在线值：
发帖
回帖
粉丝
私信
16 楼
这个cm写得很不错
希望以后有更多的作品供交流学习!.
下面是各段key算法部分(以用户名为nnnnnnn例,逆推得到序列号NOVRAI-0512B4C7-DDDDDDD )仅供参考!
#include <stdio.h>
#include <string.h>
#include <windows.h>
void main()
{
	int i=0,c=26,t=0,r=0,key0=0,key1=0;
	char o[]="Tk9WUkFJ";      //固定串
	while(i<8)
	{
		if(o[i]>='0'&&o[i]<='9')
			t=o[i]-'0'+52;
	else	if(o[i]>='a'&&o[i]<='z')
         	t=o[i]-'a'+26;
	else 	t=o[i]-'A';
		t<<=c;
	    r+=t;
		c-=6;
		i++;
		if(i==4)
		{
			key0=r;
			c=26;
			r=0;
		}
	}
	key1=r;   //注册码第一部分
	printf("%c%c%c",key0>>24,(key0&0xff0000)>>16,(key0&0xff00)>>8);
	printf("%c%c%c-",key1>>24,(key1&0xff0000)>>16,(key1&0xff00)>>8);
	//第2部分
	int res;
	int key3;
	char s[8];
	_asm
	{
		mov eax,0x7b4015dd     //0x7b4015dd由用户名字符运算得到
		rol eax,0x12
		xor eax,0x40531515    //给定值
		mov dword ptr[ebp-8],eax
		fild dword ptr[ebp-8]
		mov dword ptr[ebp-4],0x1556 //给定值
		fild dword ptr[ebp-4]
		fsubp st(1),st
		fistp dword ptr[ebp-4]
		mov eax,dword ptr[ebp-4]
		xor eax,0x12345678
		mov key3,eax	
	}
	wsprintf(s,"%08x",key3);
	printf("%s-",s);
	/////////第3部分
	int j=0;
	int re[7];
	char n[]="pppppp";  //由用户名字符("nnnnnnn")运算得到
	while(n[j])
	{
		re[j]=(n[j]-0xc)^0x20;
		printf("%c",re[j]);
		j++;
	}
	printf("\n");
}
2008-12-30 22:43
0
nvr
雪    币： 200
活跃值： (10)
能力值： ( LV2，RANK：10 )
在线值：
发帖
回帖
粉丝
私信
nvr
17 楼
多谢大各位大侠的支持!!!
稀望以后有机会向各位多多学习!!!
2008-12-30 22:55
0
不问年少
雪    币： 1074
活跃值： (160)
能力值： ( LV13，RANK：760 )
在线值：
发帖
回帖
粉丝
私信
18 楼
我数学不大好啊，源代码写出来了都算不来，只好爆破了。
     这年头，破解一个软件也是那么不容易了，从以前修改一个JE，JNE到现在要改N个JE，JNE才行，实在是晕啊!
上传的附件：
2008-12-31 11:27
0
北极狐狸
雪    币： 2368
活跃值： (81)
能力值： (RANK：300 )
在线值：
发帖
回帖
粉丝
私信
19 楼
FFFFFFF
NOVRAI-0612B4C7-DDDDDDD

昨天晚些再上的时候，netwind，和 humourkyo的答案也出来了....发现netwind的答案很特别，早上就仿制了一个山寨版
2008-12-31 11:51
0
nvr
雪    币： 200
活跃值： (10)
能力值： ( LV2，RANK：10 )
在线值：
发帖
回帖
粉丝
私信
nvr
20 楼
相同字符的注册名的确强大,省了不少事!!!
2008-12-31 12:18
0
爱琴海
雪    币： 1355
活跃值： (339)
能力值： ( LV13，RANK：920 )
在线值：
发帖
回帖
粉丝
私信
21 楼
跟BASE64有关，哈哈
2008-12-31 18:48
0
lizqz
雪    币： 200
活跃值： (10)
能力值： ( LV2，RANK：10 )
在线值：
发帖
回帖
粉丝
私信
22 楼
哦 ！！！！！！！！！来看看！
2008-12-31 21:58
0
nvr
雪    币： 200
活跃值： (10)
能力值： ( LV2，RANK：10 )
在线值：
发帖
回帖
粉丝
私信
nvr
23 楼
期待爱琴海兄弟的完整分析过程!
2008-12-31 22:06
0
爱琴海
雪    币： 1355
活跃值： (339)
能力值： ( LV13，RANK：920 )
在线值：
发帖
回帖
粉丝
私信
24 楼
看第二楼即可

笔记都丢了（影子模式），只剩下注册机代码了。呵呵......
2008-12-31 22:41
0
游客
登录 | 注册 方可回帖
回帖 表情 雪币赚取及消费
高级回复
返回
//