|
|
|---|---|
|
|
|
|
|
|
|
|
|
|
|
.386
.model flat,stdcall option casemap:none include windows.inc include kernel32.inc include user32.inc includelib kernel32.lib includelib user32.lib DLG_MAIN equ 1 IDC_USER_EDIT equ 10 IDC_CODE_EDIT equ 20 IDC_GETCODE_BUTTON equ 30 IDC_GETEXIT_BUTTON equ 40 CRC_VALUE equ 0EDB88320h ;函数声明 Base64Encode proto :DWORD, :DWORD Base64Decode proto :DWORD, :DWORD MainProc proto :DWORD,:DWORD,:DWORD,:DWORD .data szBuffer db 255 dup(0) szText db 340 dup(0) szMsg db 450 dup(0) szTemplate_Encode db "%s", 13, 10, 13, 10, "%s", 0 szTemplate_Decode db "%s", 13, 10, 13, 10, "%s", 0 ;Base64 -> ASCII mapping table base64_alphabet db "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/=" ;ASCII -> Base64 mapping table base64table db 43 dup (255) db 62,255,255,255,63,52,53,54,55,56,57,58,59,60,61,255 db 255,255,0,255,255,255,0,1,2,3,4,5,6,7,8,9,10,11,12,13 db 14,15,16,17,18,19,20,21,22,23,24,25,255,255,255,255 db 255,255,26,27,28,29,30,31,32,33,34,35,36,37,38 db 39,40,41,42,43,44,45,46,47,48,49,50,51 db 132 dup (255) .data? hInst dd ? szUserName dd ? szUserCode dd ? .code start: invoke GetModuleHandle,NULL mov hInst,eax ;调用窗口过程 invoke DialogBoxParam,hInst,DLG_MAIN,NULL,offset MainProc,NULL invoke ExitProcess,NULL ;窗口过程 MainProc proc hDlg:HWND,uMsg:UINT,wParam:WPARAM,lParam:LPARAM mov eax,uMsg .if eax==WM_COMMAND .if wParam==IDC_GETCODE_BUTTON;计算注册码按钮 ;获取输入的用户名 invoke GetDlgItemText, hDlg, IDC_USER_EDIT, offset szUserName, 256 ;进行 ASCII->Base64 转换： invoke Base64Encode, addr szUserName, addr szText ;格式化输出： invoke wsprintf, addr szMsg, addr szTemplate_Encode, addr szBuffer, addr szText ;把注册码写到注册码框中 invoke SetDlgItemText,hDlg,IDC_CODE_EDIT,offset szMsg .elseif wParam==IDC_GETEXIT_BUTTON;退出按钮 invoke EndDialog,hDlg,NULL .else ret .endif .elseif eax==WM_CLOSE invoke EndDialog,hDlg,NULL .else mov eax,FALSE ret .endif mov eax,TRUE ret MainProc endp ;********************************************************** ;函数功能：进行Base64编码 ;参数： ; source = 传入的字符串 ; destination = 返回的编码 ;********************************************************** Base64Encode proc uses ebx edi esi source:DWORD, destination:DWORD LOCAL sourcelen:DWORD invoke lstrlen, source mov sourcelen, eax mov esi, source mov edi, destination @@base64loop: xor eax, eax .if sourcelen == 1 lodsb ;source ptr + 1 mov ecx, 2 ;bytes to output = 2 mov edx, 03D3Dh ;padding = 2 byte dec sourcelen ;length - 1 .elseif sourcelen == 2 lodsw ;source ptr + 2 mov ecx, 3 ;bytes to output = 3 mov edx, 03Dh ;padding = 1 byte sub sourcelen, 2 ;length - 2 .else lodsd mov ecx, 4 ;bytes to output = 4 xor edx, edx ;padding = 0 byte dec esi ;source ptr + 3 (+4-1) sub sourcelen, 3 ;length - 3 .endif xchg al,ah ;flip eax completely rol eax, 16 ;can this be done faster xchg al,ah @@: push eax and eax, 0FC000000h ;get the last 6 high bits rol eax, 6 ;rotate them into al mov al, byte ptr [offset base64_alphabet + eax] ;get encode character stosb ;write to destination pop eax shl eax, 6 ;shift left 6 bits dec ecx jnz @B ;loop cmp sourcelen, 0 jnz @@base64loop ;main loop mov eax, edx ;add padding and null terminate stosd ret Base64Encode endp ;********************************************************** ;函数功能：进行Base64解码 ;参数： ; source = 传入的编码 ; destination = 返回的字符串 ;********************************************************** Base64Decode proc uses ebx edi esi source:DWORD, destination:DWORD LOCAL sourcelen:DWORD invoke lstrlen, source mov sourcelen, eax mov esi, source ;esi <- source mov edi, destination ;edi <- destination mov ecx, sourcelen shr ecx, 2 cld ;-------------[decoding part]--------------- @@outer_loop: push ecx mov ecx, 4 xor ebx, ebx lodsd @@inner_loop: push eax and eax, 0ffh mov al, byte ptr [offset base64table + eax] cmp al, 255 je @@invalid_char shl ebx, 6 or bl, al pop eax shr eax, 8 dec ecx jnz @@inner_loop mov eax, ebx shl eax, 8 xchg ah, al ror eax, 16 xchg ah, al stosd dec edi pop ecx dec ecx jnz @@outer_loop xor eax, eax jmp @@decode_done ;------------------------------------------- @@invalid_char: mov eax, -1 @@decode_done: ret Base64Decode ENDP end start #include <resource.h> #define DLG_MAIN 1 #define IDC_USER_EDIT 10 #define IDC_CODE_EDIT 20 #define IDC_GETCODE_BUTTON 30 #define IDC_GETEXIT_BUTTON 40 //主窗口 DLG_MAIN DIALOG DISCARDABLE 0, 0, 273, 90 STYLE DS_FIXEDSYS |DS_SETFONT |DS_MODALFRAME |DS_CENTER |WS_POPUP |WS_CAPTION |WS_VISIBLE |WS_SYSMENU |WS_MINIMIZEBOX CAPTION "Base64CrackMeKeyGen" FONT 9, "宋体" { LTEXT "用户名：",-1,6,12,51,10 EDITTEXT IDC_USER_EDIT,37,10,230,13 LTEXT "注册码：",-1,6,42,51,10 EDITTEXT IDC_CODE_EDIT,37,40,230,13 PUSHBUTTON "计算",IDC_GETCODE_BUTTON,50,65,90,15 PUSHBUTTON "退出",IDC_GETEXIT_BUTTON,150,65,90,15 } 怒海潜将 xa26o8exvas=  |
|
|
从罗聪那里抄来的
|
