自动拨号程序非常简单，在MSDN(Remote Access Service)中很快就能找到，用VC实现也非常快，因为MSDN基本上已经给出了源代码。但是做为一个刚开始研究win32 asm的人来说，用masm32实现，就困难重重了
先给出VC下的实现：
#include "stdafx.h"
#include <RasError.h>
#include <Ras.h>
#pragma comment(lib, "Rasapi32.lib")
int APIENTRY WinMain(HINSTANCE hInstance,
HINSTANCE hPrevInstance,
LPSTR lpCmdLine,
int nCmdShow)
{
DWORD dwCb = sizeof(RASENTRYNAME);
DWORD dwEntries = 0;
RASENTRYNAME ren = {0};
ren.dwSize = dwCb;
if (ERROR_SUCCESS == RasEnumEntries(
NULL,
NULL,
&ren,
&dwCb,
&dwEntries))
{
RASDIALPARAMS rp = {0};
rp.dwSize = sizeof(RASDIALPARAMS);
lstrcpy(rp.szEntryName, ren.szEntryName);
BOOL fPass;
RasGetEntryDialParams(NULL, &rp, &fPass);
HRASCONN hConn = NULL;
if (ERROR_SUCCESS == RasDial(NULL,
NULL,
&rp,
0,
NULL,
&hConn))
{
OutputDebugString("OK");
}
}
return 0;
}
这个程序很简陋，基本上没有做什么安全检查的，主要原因是在我的机器上一次调试通过，能用就行^_^。我也不做什么说明，有什么不懂的查看MSDN
好了，现在开始改成汇编代码了。刚开始以为很简单，先找到一个win32 asm例子，再在它的基础上修改，去掉创建窗口，消息循环，消息处理等，然后在WinMain中填上用上面的代码修改的汇编。以我烂到极点的汇编基础，花了两个多小时才完成，唉！
最开始的代码如同上面的C代码，我声明了一个RASENTRYNAME结构体对象，然后调用RasEnumEntries，可是始终返回错误值278H，原来是空间不足。在VC下，RASENTRYNAME结构体大小是214H，但在ASM下面，结构体大小却只有105H。为什么呢？原来在C环境下的定义中，还加上了另外两个参数dwFlags和szPhonebookPath，并且用宏定义分隔开了。万般无赖下，只好手写了一个RASENTRYNAME结构体：
RASENTRYNAME5A STRUCT
dwSize dd ?
szEntryName db RAS_MaxEntryName + 1 dup(?)
dwFlags dd ?
szPhonebookPath db MAX_PATH + 1 dup(?)
RASENTRYNAME5A ENDS
然而在汇编环境中，结构体的size还不对。这时候才想起来，原来是结构体的字节对齐问题，于是上面这个结构体重新修改成：
RASENTRYNAME5A STRUCT
dwSize dd ?
szEntryName db 260 dup(?)
dwFlags dd ?
szPhonebookPath db 264 dup(?)
RASENTRYNAME5A ENDS
RASENTRYNAME5 EQU <RASENTRYNAME5A>
这次RasEnumEntries不出错了。接下来RASDIALPARAMS结构体大小又不对了，有了上次的经验，这次很快就拼（拼？！）出RASDIALPARAMS4的结构体：
RASDIALPARAMS4A STRUCT
dwSize dd ?
szEntryName db 101h dup(?)
szPhoneNumber db 81h dup(?)
szCallbackNumber db 81h dup(?)
szUserName db 101h dup(?)
szPassword db 101h dup(?)
szDomain db 13h dup(?)
dwSubEntry dd ?
dwCallbackId dd ?
RASDIALPARAMS4A ENDS
RASDIALPARAMS4 EQU <RASDIALPARAMS4A>
OK，这次没问题了吧？运行，没反应？怎么回事？检查了一下RasDial的返回值，668，在VC中找了一下，ERROR_NO_CONNECTION，why?
又是在不知所以然的情况下，试着将RasDial的最后一个参数hConn赋为0，Yeah，成功了！真是让人极度Faint的错误
以下附上源代码：
; #########################################################################
;
; AutoDial.ASM
;
; #########################################################################
; Assembler specific instructions for 32 bit ASM code
.386 ; minimum processor needed for 32 bit
.model flat, stdcall ; FLAT memory model & STDCALL calling
option casemap :none ; set code to case sensitive
; #########################################################################
include \masm32\include\windows.inc
include \masm32\include\kernel32.inc
include \masm32\include\rasapi32.inc
includelib \masm32\lib\kernel32.lib
includelib \masm32\lib\rasapi32.lib
; #########################################################################
WinMain PROTO
RASENTRYNAME5A STRUCT
dwSize dd ?
szEntryName db 260 dup(?)
dwFlags dd ?
szPhonebookPath db 264 dup(?)
RASENTRYNAME5A ENDS
RASENTRYNAME5 EQU <RASENTRYNAME5A>
RASDIALPARAMS4A STRUCT
dwSize dd ?
szEntryName db 101h dup(?)
szPhoneNumber db 81h dup(?)
szCallbackNumber db 81h dup(?)
szUserName db 101h dup(?)
szPassword db 101h dup(?)
szDomain db 13h dup(?)
dwSubEntry dd ?
dwCallbackId dd ?
RASDIALPARAMS4A ENDS
RASDIALPARAMS4 EQU <RASDIALPARAMS4A>
.data
.code
start:
invoke WinMain
invoke ExitProcess,eax
WinMain proc
LOCAL lpRasEntryName :DWORD
LOCAL dwCb :DWORD
LOCAL dwEntries :DWORD
LOCAL rp :RASDIALPARAMS4
LOCAL fPass :BOOL
LOCAL hConn :DWORD
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
mov dwCb, sizeof RASENTRYNAME5
mov lpRasEntryName, 0
AllocateRasEntryNameLoop:
cmp lpRasEntryName, 0
je AllocateRasEntryName
invoke GetProcessHeap
invoke HeapFree, eax, 0, lpRasEntryName
AllocateRasEntryName:
invoke GetProcessHeap
invoke HeapAlloc, eax, 0, dwCb
cmp eax, 0
je RetFail
mov lpRasEntryName, eax
invoke RtlZeroMemory, lpRasEntryName, dwCb
mov ebx, sizeof RASENTRYNAME5
mov eax, lpRasEntryName
mov (RASENTRYNAME5 PTR [eax]).dwSize, ebx
invoke RasEnumEntries, NULL, NULL, lpRasEntryName, ADDR dwCb, ADDR dwEntries
cmp eax, 278h
je AllocateRasEntryNameLoop
cmp eax, 0
jne RetFail
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
mov dwCb, sizeof RASDIALPARAMS4
invoke RtlZeroMemory, ADDR rp, dwCb
mov eax, dwCb
mov rp.dwSize, eax
mov eax, lpRasEntryName
invoke lstrcpy, ADDR rp.szEntryName, ADDR (RASENTRYNAME5 PTR [eax]).szEntryName
invoke RasGetEntryDialParams, NULL, ADDR rp, ADDR fPass
cmp eax, 0
jne RetFail
mov hConn, 0
invoke RasDial, NULL, NULL, ADDR rp, 0, NULL, ADDR hConn
cmp eax, 0
jne RetFail
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
RetFail:
cmp lpRasEntryName, 0
je AllocateRasEntryName
invoke GetProcessHeap
invoke HeapFree, eax, 0, lpRasEntryName
ret
WinMain endp
end start
对于结构体RASENTRYNAME5的对象，我实际上是先申明了一个内存指针，lpRasEntryName，然后将这段内存强制转换（汇编中有这种说法嘛？）成RASENTRYNAME5。这种方法和MSDN中代码是一致的。
WinMain完成后需要用ret返回，不然程序以int 3结束
以上代码在masm v8.0中编译，SOFTICE调试，在xp + sp1 + adsl下运行成功
欢迎有人来和我讨论汇编，小弟刚学几天，兴趣很大 
|
本类阅读TOP10