如何通过 WinCE 访问 WAP 数据

WAP 的访问需要通过 Wireless Datagram Protocol (WDP) 协议来实现。前提是 WinCE OS 在定制时需要选择 WAP 相应的组件，否则在使用相应的 SDK 编译时，对应的 WAP 功能函数无法编译通过。

因前公司项目需要，写了如下的代码。但未经过测试（项目所需功能确认无法通过 WAP 实现），也未提供此部分代码给公司，所以在网上放出来供大家参考。

以下是在 WinCE6.0 下，使用 VS2008 开发环境的示例代码：

// WapTestDlg.cpp : 实现文件
// 

#include "stdafx.h"
#include "WapTest.h"
#include "WapTestDlg.h"

#include "wap.h"

#ifdef _DEBUG
#define new DEBUG_NEW
#endif

// http://technet.microsoft.com/zh-cn/windows/ee497490(en-us).aspx
// http://msdn.microsoft.com/zh-cn/library/ee497490(v=WinEmbedded.60)
//  Use UDP bearer if bUDP = true, use SMS bearer if bUDP = false;
bool WdpSendAndReadEcho( bool bUDP ) 
{

	bool bSendReadOK = false;

	HRESULT hResult;

	//  Open WAP for Sending WDP UnitData
	const WAP_LAYER wlLayer = WAP_LAYER_WDP;
	const DWORD dwSendPort = 3000L;
	WAP_HANDLE hWapSend = 0L;
	HANDLE hWapSendMsgEvent= NULL;

	//  Open WAP for reading WDP UnitData
	const DWORD dwRecvPort = 3001L;
	WAP_HANDLE hWapRecv= 0L;
	HANDLE hWapRecvMsgEvent = NULL;

	//  Create WDP UnitData structure with user data
	WAP_ADDRESS waSendRecv;
	const TCHAR *const tszIpLoopbackAddr = _T("127.0.0.1");// For UDP bearer
	const TCHAR *const tszTelNum = _T("8009352663");   // Sample Phone number, used for SMS bearer

	WDP_UNITDATA Wdpunitdata;

	DWORD dwWdpRecvDataSize = 0L;

	WDP_UNITDATA *pcbWdpRecvData = NULL;

	// Use temporary buffer because pbUserData is const BYTE * 
	BYTE *pbBuffer = NULL;

	hResult = WapOpen( wlLayer, dwSendPort, &hWapSend, &hWapSendMsgEvent );
	if ( FAILED(hResult) || !hWapSend || !hWapSendMsgEvent  ) 
	{
		OutputDebugString( _T("WapOpen() for sending WDP UnitData failed") );
		hWapSend = 0L;
		hWapSendMsgEvent= NULL;
		return false;
	}

	hResult = WapOpen( wlLayer, dwRecvPort, &hWapRecv, &hWapRecvMsgEvent );
	if ( FAILED(hResult) || !hWapRecv || !hWapRecvMsgEvent ) 
	{
		OutputDebugString( _T("WapOpen() for reading WDP UnitData failed") );
		hWapRecv= 0L;
		goto exit_label;
	}

	if(bUDP)
	{

		_tcsncpy( waSendRecv.ptsAddress, tszIpLoopbackAddr, MAX_WAP_ADDRESS_LENGTH );
	}
	else
	{
		_tcsncpy( waSendRecv.ptsAddress, tszTelNum, MAX_WAP_ADDRESS_LENGTH);
	}

	waSendRecv.watAddressType = bUDP ? WAP_ADDRESS_TYPE_UDP : WAP_ADDRESS_TYPE_GSM_SMS;

	// Initialize the WDP UnitData
	memset( &Wdpunitdata, 0, sizeof(Wdpunitdata) );
	Wdpunitdata.wpiPrimitiveID = WAP_PRIMITIVE_ID_T_DUNITDATA;
	Wdpunitdata.wptPrimitiveType = WAP_PRIMITIVE_TYPE_REQUEST;
	Wdpunitdata.dwValidFields =  (WDP_FIELD_SOURCEADDRESS      |
		WDP_FIELD_SOURCEPORT         |
		WDP_FIELD_DESTINATIONADDRESS |
		WDP_FIELD_DESTINATIONPORT    |
		WDP_FIELD_USERDATA );
	Wdpunitdata.waSourceAddress =  waSendRecv;
	Wdpunitdata.dwSourcePort = dwSendPort;
	Wdpunitdata.waDestinationAddress = Wdpunitdata.waSourceAddress;
	Wdpunitdata.dwDestinationPort = dwRecvPort;
	// Set Random user data with size = 0x100
	Wdpunitdata.dwUserDataSize = 0x100;

	if(pbBuffer = new BYTE[Wdpunitdata.dwUserDataSize])
	{
		// Fill the user data section with random data
		for ( DWORD dw = 0; dw < Wdpunitdata.dwUserDataSize; dw++ ) 
		{
			pbBuffer[ dw ] = rand() % 0xFF;
		}
	}    
	else 
	{
		goto exit_label;
	}
	Wdpunitdata.pbUserData = pbBuffer;

	//  Send WDP Data
	hResult = WapSend( hWapSend, (WAP_PRIMITIVE_BASE *)&Wdpunitdata );
	if ( FAILED(hResult) ) 
	{
		OutputDebugString( _T("WapSend() with WDP Unitdata failed") );
		goto exit_label;
	}

	//  Wait for WAP message received Event
	if ( WAIT_OBJECT_0 != WaitForSingleObject( hWapRecvMsgEvent , 10000L ))
	{
		OutputDebugString( _T("Failed to wait for or timed out waiting for expected WDP Data") );
		goto exit_label;
	}

	hResult = WapGetNextPrimitiveSize( hWapRecv, &dwWdpRecvDataSize);
	if ( FAILED(hResult) || (0 == dwWdpRecvDataSize) ) 
	{
		OutputDebugString( _T("WapGetNextPrimitiveSize() failed") );
		goto exit_label;
	}

	//  Allocate memory for storing received WDP Data
	pcbWdpRecvData =( WDP_UNITDATA* ) new BYTE[ dwWdpRecvDataSize ];
	if ( !pcbWdpRecvData) 
	{
		OutputDebugString( _T("Failed to allocate memory for storing WDP Unit Data") );
		goto exit_label;
	}

	//  Read WDP Data
	hResult = WapRead( hWapRecv, (WAP_PRIMITIVE_BASE *)pcbWdpRecvData, dwWdpRecvDataSize );
	if ( FAILED(hResult) ) 
	{
		OutputDebugString( _T("WapRead() failed") );
		goto exit_label;
	}

	// Validate the received primitive and
	// Compare the received user data to the sent user data
	if (!pcbWdpRecvData)
		goto exit_label;

	bSendReadOK = true;
	bSendReadOK &= (WAP_PRIMITIVE_ID_T_DUNITDATA == pcbWdpRecvData->wpiPrimitiveID);
	bSendReadOK &= (WAP_PRIMITIVE_TYPE_INDICATION == pcbWdpRecvData->wptPrimitiveType);
	bSendReadOK &= (pcbWdpRecvData->dwValidFields & WDP_FIELD_SOURCEADDRESS ) && ( pcbWdpRecvData->dwValidFields & WDP_FIELD_SOURCEPORT );
	bSendReadOK &= (pcbWdpRecvData->dwUserDataSize == Wdpunitdata.dwUserDataSize);
	if(bSendReadOK && pcbWdpRecvData->pbUserData)
	{
		bSendReadOK &= !memcmp(pcbWdpRecvData->pbUserData, Wdpunitdata.pbUserData, pcbWdpRecvData->dwUserDataSize);
	}

exit_label:

	//  Close WAP for Sending WDP UnitData
	if ( hWapSend) 
	{
		hResult = WapClose( hWapSend );
		if ( FAILED(hResult) ) 
		{
			OutputDebugString( _T("WapClose() for sending WDP UnitData failed") );
			bSendReadOK = false;
		} 
		else 
		{
			hWapSend = 0L;
		}
	}

	//  Close WAP for Receiving WDP UnitData
	if ( hWapRecv ) 
	{
		hResult = WapClose( hWapRecv );
		if ( FAILED(hResult) ) 
		{
			OutputDebugString( _T("WapClose() for reading WDP UnitData failed") );
			bSendReadOK = false;
		} 
		else 
		{
			hWapRecv = 0L;
		}
	}
	// Clear the buffers
	if (pbBuffer) 
	{
		delete[] (BYTE*) pbBuffer;
		pbBuffer = NULL;
	}

	if ( pcbWdpRecvData ) 
	{
		delete [] (BYTE*) pcbWdpRecvData;
		pcbWdpRecvData = NULL;
	}

	return bSendReadOK;
}
// CWapTestDlg 对话框

CWapTestDlg::CWapTestDlg(CWnd* pParent /*=NULL*/)
	: CDialog(CWapTestDlg::IDD, pParent)
{
	m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
}

void CWapTestDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
}

BEGIN_MESSAGE_MAP(CWapTestDlg, CDialog)
#if defined(_DEVICE_RESOLUTION_AWARE) && !defined(WIN32_PLATFORM_WFSP)
	ON_WM_SIZE()
#endif
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

// CWapTestDlg 消息处理程序

BOOL CWapTestDlg::OnInitDialog()
{
	CDialog::OnInitDialog();

	// 设置此对话框的图标。当应用程序主窗口不是对话框时，框架将自动
	//  执行此操作
	SetIcon(m_hIcon, TRUE);			// 设置大图标
	SetIcon(m_hIcon, FALSE);		// 设置小图标

	// TODO: 在此添加额外的初始化代码
	WdpSendAndReadEcho(true);
	
	return TRUE;  // 除非将焦点设置到控件，否则返回 TRUE
}