C++实现VPN工具之代码示例

创建、连接、挂断、删除VPN实现起来并不难，下面给出一套比较完整的代码。该段代码只是示例代码，并没有通过编译，但对API的使用和VPN操作步骤是没问题的。具体每个API代表的意义可以参看《C++实现VPN工具之常用API函数》。代码中的OutputString只是起查看消息的作用，当成messagebox理解就行。到此篇总结，VPN工具实现的学习基本上就结束了。

#include "ras.h" 

RASDIALPARAMS	RasDialParams;
HRASCONN m_hRasConn;  

inline void InitRASIP (RASIPADDR& rasIP)
{
		rasIP.a	=0;
		rasIP.b =0;
		rasIP.c =0;
		rasIP.d =0;
}

//VPN链接过程中返回的步骤信息
void WINAPI RasDialFunc(UINT unMsg, RASCONNSTATE rasconnstate, DWORD dwError)
{
	char szRasString[256]; // Buffer for storing the error string

	if (dwError)  // Error occurred
	{
		RasGetErrorString((UINT)dwError, szRasString, 256);
		OutputString("Error: %d - %s\n",dwError, szRasString);
		SetEvent(g_TerminalEvent);
		return;
	}

	// Map each of the states of RasDial() and display on the screen
	// the next state that RasDial() is entering
	switch (rasconnstate)
	{
		// Running States
		case RASCS_OpenPort:
			OutputString ("Opening port...\n");
			break;
		case RASCS_PortOpened:
			OutputString ("Port opened.\n");
        	break;
		case RASCS_ConnectDevice:
			OutputString ("Connecting device...\n");
			break;
		case RASCS_DeviceConnected:
			OutputString ("Device connected.\n");
			break;
		case RASCS_AllDevicesConnected:
			OutputString ("All devices connected.\n");
			break;
		case RASCS_Authenticate:
			OutputString ("Authenticating...\n");
			break;
		case RASCS_AuthNotify:
			OutputString ("Authentication notify.\n");
			break;
		case RASCS_AuthRetry:
			OutputString ("Retrying authentication...\n");
			break;
		case RASCS_AuthCallback:
			OutputString ("Authentication callback...\n");
			break;
		case RASCS_AuthChangePassword:
			OutputString ("Change password...\n");
			break;
		case RASCS_AuthProject:
			OutputString ("Projection phase started...\n");
			break;
		case RASCS_AuthLinkSpeed:
			OutputString ("Negotiating speed...\n");
			break;
		case RASCS_AuthAck:
			OutputString ("Authentication acknowledge...\n");
			break;
		case RASCS_ReAuthenticate:
			OutputString ("Retrying Authentication...\n");
			break;
		case RASCS_Authenticated:
			OutputString ("Authentication complete.\n");
			break;
		case RASCS_PrepareForCallback:
			OutputString ("Preparing for callback...\n");
			break;
		case RASCS_WaitForModemReset:
			OutputString ("Waiting for modem reset...\n");
			break;
		case RASCS_WaitForCallback:
			OutputString ("Waiting for callback...\n");
			break;
		case RASCS_Projected:
			OutputString ("Projection completed.\n");
			break;
	#if (WINVER >= 0x400)
		case RASCS_StartAuthentication:
			OutputString ("Starting authentication...\n");
            break;
		case RASCS_CallbackComplete:
			OutputString ("Callback complete.\n");
			break;
		case RASCS_LogonNetwork:
			OutputString ("Logon to the network.\n");
			break;
	#endif
		case RASCS_SubEntryConnected:
			OutputString ("Subentry connected.\n");
			break;
		case RASCS_SubEntryDisconnected:
			OutputString ("Subentry disconnected.\n");
			break;

		// The RAS Paused States will not occur because
		// we did not use the RASDIALEXTENSIONS structure
		// to set the RDEOPT_PausedState option flag.

		// The Paused States are:

		// RASCS_RetryAuthentication:
		// RASCS_CallbackSetByCaller:
		// RASCS_PasswordExpired:

		// Terminal States
		case RASCS_Connected:
			OutputString ("Connection completed.\n");
			OutputString ("连接成功\n");
			SetEvent(g_TerminalEvent);
			break;
		case RASCS_Disconnected:
			OutputString ("Disconnecting...\n");
			SetEvent(g_TerminalEvent);
			break;
		default:
			OutputString ("Unknown Status = %d\n", rasconnstate);
			break;
	}
}

//创建一个VPN链接，并保存VPN链接信息到电话薄
BOOL CreateRasEntry(const char *pszEntryName, const char *pszServerName, const char *pszUserName,
					const char *pszPassWord)
{
	RASENTRY rasEntry;
	DWORD rasEntrySize, dwResult;

	rasEntrySize = sizeof(rasEntry);
	memset(&rasEntry, 0, sizeof(rasEntry));
	DWORD			lpcb	=	0;
		DWORD			lpcDevices;
		RASDEVINFO*		lpRasDevInfo;
		RASDEVINFO		rasdevinfo; 

		RasEnumDevices(NULL, &lpcb, &lpcDevices);
		lpRasDevInfo = (LPRASDEVINFO) GlobalAlloc(GPTR, lpcb);
		lpRasDevInfo->dwSize = sizeof(RASDEVINFO);
		//获得所有具有R A S能力的设备名及类型
		RasEnumDevices(lpRasDevInfo, &lpcb, &lpcDevices);
		strcpy (rasdevinfo.szDeviceName, lpRasDevInfo->szDeviceName);
		strcpy (rasdevinfo.szDeviceType, lpRasDevInfo->szDeviceType);

		rasEntry.dwSize		= sizeof (RASENTRY);
		rasEntry.dwfOptions = RASEO_RequireMsEncryptedPw | RASEO_RequireDataEncryption | RASEO_ModemLights | RASEO_ShowDialingProgress;
	        rasEntry.dwAlternateOffset	= 0;
		rasEntry.dwCountryID		= 86;
		rasEntry.dwCountryCode		= 86;
	//	rasEntry.dwDialExtraPercent = 75;
	//	rasEntry.dwDialExtraSampleSeconds = 120;
	//	rasEntry.dwDialMode         = 1;
		rasEntry.dwfNetProtocols = 4;
	//      rasEntry.dwfOptions = 1024262928;
	        rasEntry.dwfOptions2 = 367;
		rasEntry.dwFramingProtocol = 1;
		rasEntry.dwHangUpExtraPercent = 10;
		rasEntry.dwHangUpExtraSampleSeconds = 120;
		rasEntry.dwRedialCount = 3;
		rasEntry.dwRedialPause = 60;
		rasEntry.dwType = RASET_VPN;

		rasEntry.dwFrameSize		= 0;
		rasEntry.dwfNetProtocols	= RASNP_Ip;		// TCP/IP
		rasEntry.dwFramingProtocol	= RASFP_Ppp;	//PPP
		rasEntry.dwChannels			= 0;
		rasEntry.dwReserved1		= 0;
		rasEntry.dwReserved2		= 0;	

		// Strings
		strcpy (rasEntry.szAreaCode, " ");
		strcpy (rasEntry.szScript, "");
		strcpy (rasEntry.szAutodialDll, "");
		strcpy (rasEntry.szAutodialFunc, "");
		strcpy (rasEntry.szX25PadType, "");
		strcpy (rasEntry.szX25Address, "");
		strcpy (rasEntry.szX25Facilities, "");
		strcpy (rasEntry.szX25UserData, "");
		//strcpy (rasEntry.szDeviceType, rasdevinfo.szDeviceType );
		//strcpy (rasEntry.szDeviceName, rasdevinfo.szDeviceName);
		//strcpy (rasEntry.szDeviceName,"WAN 微型端口 (L2TP)");
		//strcpy (rasEntry.szDeviceType, "vpn");
		//strcpy (rasEntry.szLocalPhoneNumber,lpszIPAddress);// "60.190.168.108")lstrcpy(rasEntry.szLocalPhoneNumber, pszServerName); ;//服务器地址或域名
		lstrcpy(rasEntry.szDeviceType, RASDT_Vpn);
		lstrcpy(rasEntry.szDeviceName, TEXT("RAS VPN Line 0"));
	        rasEntry.dwVpnStrategy = VS_DEFAULT;     //vpn类型
	        rasEntry.dwEncryptionType = ET_OPTIONAL; //数据加密类型    

		// IP addresses
		InitRASIP (rasEntry.ipaddr);
		InitRASIP (rasEntry.ipaddrDns);
		InitRASIP (rasEntry.ipaddrDnsAlt);
		InitRASIP (rasEntry.ipaddrWins);
		InitRASIP (rasEntry.ipaddrWinsAlt);

	dwResult = RasSetEntryProperties(NULL, pszEntryName, &rasEntry, sizeof(rasEntry), NULL, 0);
	if (dwResult != 0)
	{
		OutputString("RasSetEntryProperties %s failed error=%d\n", pszEntryName, dwResult);
		return FALSE;
	}

	RASDIALPARAMS rdParams;
	ZeroMemory(&rdParams, sizeof(RASDIALPARAMS));
	rdParams.dwSize = sizeof(RASDIALPARAMS);
	lstrcpy(rdParams.szEntryName, pszEntryName);
	lstrcpy(rdParams.szUserName, pszUserName);
	lstrcpy(rdParams.szPassword, pszPassWord);
	DWORD dwRet = RasSetEntryDialParams(NULL, &rdParams, FALSE);

	if(dwRet == 0)
		return TRUE;
	else
		return FALSE;
}

//链接一个VPN
BOOL ConenectVPN(LPVOID lparam)
{
	RASCONNSTATUS	RasConnStatus;
	HRASCONN		hRasConn;
	DWORD			Ret;
	DWORD			tcLast;
	INT				i;

	VPNPARAMS VPNParams;
	memcpy(&VPNParams, lparam, sizeof(VPNPARAMS));

	// Create the event that indicates a terminal state
	if ((g_TerminalEvent = CreateEvent(NULL, FALSE, FALSE, NULL)) == NULL)
	{
		OutputString("CreateEvent failed with error %d\n", GetLastError());
		return FALSE;
	}

	RasDialParams.dwSize = sizeof(RASDIALPARAMS); 

	lstrcpy(RasDialParams.szEntryName, VPNParams.szDescription);
	lstrcpy(RasDialParams.szPhoneNumber, VPNParams.szServer);
	lstrcpy(RasDialParams.szUserName, VPNParams.szUserName);
	lstrcpy(RasDialParams.szPassword, VPNParams.szPassword);
	lstrcpy(RasDialParams.szDomain, VPNParams.szDomain);

	CreateRasEntry(RasDialParams.szEntryName, RasDialParams.szPhoneNumber,
		RasDialParams.szUserName, RasDialParams.szPassword);

	// Dial out asynchronously using RasDial()
	OutputString("Dialing... %s\n", RasDialParams.szPhoneNumber);
	hRasConn = NULL;
	if (Ret = RasDial(NULL, NULL, &RasDialParams, 0, &RasDialFunc, &hRasConn))
	{
	            RasDeleteEntry(NULL, RasDialParams.szEntryName);
		return FALSE;
	}
	// Wait for RasDial to complete or enter a paused state
	Ret = WaitForSingleObject(g_TerminalEvent, 50000);

	switch(Ret)
	{
	case WAIT_TIMEOUT:

		// RasDial timed out
		OutputString("RasDial Timed out...\n");

	case WAIT_OBJECT_0:

		// Normal completion or Ras Error encountered
		WaitForSingleObject(VPNParams.hTerminalEvent, INFINITE); // 等待断开
		break;
	}
	OutputString("Calling RasHangUp...\n");
	if (Ret = RasHangUp(hRasConn))
	{
		OutputString("RasHangUp failed with error %d\n", Ret);
		//return FALSE;
	}

	RasConnStatus.dwSize = sizeof(RASCONNSTATUS);

	tcLast = GetTickCount() + 10000;
	while((RasGetConnectStatus(hRasConn, &RasConnStatus)
		!= ERROR_INVALID_HANDLE) && (tcLast > GetTickCount()))
	{
		Sleep(50);
	}

	//RasDeleteEntry(NULL, RasDialParams.szEntryName);
}

}

//获取VPN的链接状态
bool IsConnect(void)
{
	if(NULL != m_hRasConn)
	{
		RASCONNSTATUS rasConStatus;
		rasConStatus.dwSize = sizeof(RASCONNSTATUS);
		RasGetConnectStatus(m_hRasConn,&rasConStatus);
		if(RASCS_Connected == rasConStatus.rasconnstate)
		{
			return true;
		}
	}
	return false;
}

//挂断VPN链接
bool HangUp()
{
	int index;                 // An integer index
	DWORD dwError,             // Error code from a function call
	dwRasConnSize,       // Size of RasConn in bytes
	dwNumConnections;    // Number of connections found
	RASCONN RasConn[20];       // Buffer for connection state data
	// Assume the maximum number of entries is 20.
	// Assume no more than 20 connections.
	RasConn[0].dwSize = sizeof (RASCONN);
	dwRasConnSize = 20 * sizeof (RASCONN);
	 //返回指向VPN数组的指针 Find all connections.
	if (dwError = RasEnumConnections (RasConn, &dwRasConnSize, &dwNumConnections))
	{
		return false;
	}
	// If there are no connections, return zero.
	if (!dwNumConnections)
	{
		return false;
	}
	// Terminate all of the remote access connections.
	for (index = 0; index < (int)dwNumConnections; ++index)
	{
		//这样做主要是不想关掉usb连接，因为通过这种方法得到的连接中包括了USB同步的连接。
		if (wcsstr(RasConn[index].szEntryName,_T("MyLink"))!=NULL)
		{
			if (dwError = RasHangUp (RasConn[index].hrasconn))
			{
				return false;
			}
		}
	}
	return TRUE;
}

//删除建立的VPN拨号
BOOL   DeleteEntry
{
          RasDeleteEntry(NULL, RasDialParams.szEntryName);
}
时间： 2024-04-24 23:53:28

C++实现VPN工具之代码示例的相关文章

上方和下方滑入滑出工具条代码示例

原创,水平有限,欢迎指导. <html> <head> <title></title> <style type="text/css"> body { margin: 0px; overflow-y: auto; } body.noVerticalScroll { overflow-y: hidden; } .content { position: relative; padding-top: 80px; } .toolBar

代码示例：一些简单技巧优化JavaScript编译器工作详解，让你写出高性能运行的更快JavaScript代码

告诉你一些简单的技巧来优化JavaScript编译器工作,从而让你的JavaScript代码运行的更快.尤其是在你游戏中发现帧率下降或是当垃圾回收器有大量的工作要完成的时候. 单一同态: 当你定义了一个两个参数的函数,编译器会接受你的定义,如果函数参数的类型.个数或者返回值的类型改变编译器的工作会变得艰难.通常情况下,单一同态的数据结构和个数相同的参数会让你的程序会更好的工作. function example(a, b) { // 期望a,b都为数值类型 console.log(++a * +

Python实现各种排序算法的代码示例总结

Python实现各种排序算法的代码示例总结 作者:Donald Knuth 字体:[增加 减小] 类型:转载 时间:2015-12-11我要评论 这篇文章主要介绍了Python实现各种排序算法的代码示例总结,其实Python是非常好的算法入门学习时的配套高级语言,需要的朋友可以参考下 在Python实践中,我们往往遇到排序问题,比如在对搜索结果打分的排序(没有排序就没有Google等搜索引擎的存在),当然,这样的例子数不胜数.<数据结构>也会花大量篇幅讲解排序.之前一段时间,由于需要,我复习了

java 翻盖hashCode()深入探讨 代码示例

package org.rui.collection2.hashcode; /** * 覆盖hashcode * 设计HashCode时最重要的因素 就是:无论何时,对同一个对象调用HashCode都应该产生同样的值, * 如果你的HashCode方法依赖于对象中易变的数据,用户就要当心了,因为此数据发生变化 时 * HashCode就会生成一个不同的散列码,相当于产生一个不同的健 * 此外 也不应该使HashCode依赖于具有唯一性的对象信息,尤其是使用this的值,这只能很糟糕, * 因为这

python 之初学者的代码示例(短小精悍)(一)

学习Python也有个把月了,最近整理自己初学的代码示例,一个是为了增加自己对细节的把握,一个是让像我一样的初学者能够熟练地使用基础,基础的重要性就不说了,我希望自己能够把这些精巧的小而短的示例分享给大家,共同进步 #help(execfile) Help on built-in function execfile in module __builtin__: execfile(...) execfile(filename[, globals[, locals]]) Read and execu

制作雪碧图代码示例

制作雪碧图的辅助工具是ps,先要测出所要的图片的宽高写到代码中去,给它预留位置大小,然后测出所要点击后的图标移动位置的宽高写入代码. 代码示例:①.选择器名字{ width:xxPX              (这里可以是正负数,代表的是向左还是向右移动) height:xxPX background:图片位置      xxPX   xxPX(这里指所要移动的像素) } ②. 选择器:hover{                                          (这里代码意思

c语言学习之结构篇代码示例-输入n个同学的姓名，数学英语成绩，按照平均分从低到高排序并输出

在虚拟机上测评了下MySQL 和 PostgreSQL 的各种LOAD FILE方式以及时间. 因为是虚拟机上的测评,所以时间只做参考,不要太较真, 看看就好了.MySQL 工具:    1. 自带mysqlimport工具.    2. 命令行 load data infile ...    3. 利用mysql-connector-python Driver来写的脚本. PostgreSQL 工具:    1. pgloader 第三方工具.    2. 命令行 copy ... from

JDK7新特性详细说明及代码示例

在2011年7月28日,Oracle发布了JDK7的正式版.最近我从网上搜集了一些资料,把文字说明和代码示例结合起来,方便我们的学习. 下面我们来看看JDK7比6多了哪些新特性 1.访问文件系统 与之前的JDK中通过java.io.File访问文件的方式不同,JDK7将通过java.nio.file包中的类完成.JDK7会使用java.nio.file.Path类来操作任何文件系统中的文件.(这里说的任何文件系统指的是可以使用任何文件存储方式的文件系统) 示例: Java7之前 File fil

怎样在本地电脑上连接另外一台电脑上的mysql数据？(代码示例)

基本上有两种方式: 1,使用MYSQL的管理工具,可以远程连接,比如用导航猫系列的,只要知道对方IP,然后就可以自己输入账号密码连接了. 2,使用代码连接. Java代码示例: package com.test; import java.sql.Connection; import java.sql.DriverManager; import java.sql.ResultSet; import java.sql.Statement; public class DataBaseTest { Da