开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Windows编程 > 通讯编程 > 查看源码
BlueTooth.cpp
资源名称：BlueToothExc_Plus.rar　[点击查看]
上传用户：shmeyee
上传日期：2015-06-28
资源大小：108k
文件大小：13k
源码类别：

通讯编程

开发平台：

Visual C++

BlueTooth.cpp：源码内容
  1. #include "StdAfx.h"
  2. #include "BlueTooth.h"
  4. CBlueTooth::CBlueTooth(void)
  5. {
  6. m_Ary_RemoteBthDevInfo.SetSize ( 0, 10*sizeof(BLUETOOTH_DEVICE_INFO) );
  7. m_Ary_LocalRadioInfo.SetSize ( 0, 10*sizeof(t_LocalRadioInfo) );
  8. }
  10. CBlueTooth::~CBlueTooth(void)
  11. {
  12. RemoveAll_RemoteBthDevInfo ();
  13. RemoveAllLocalRadio ();
  14. }
  16. //
  17. // 用 Socket 函数搜索附近的蓝牙设备，成功时返回设备数，否则返回-1
  18. //
  19. int CBlueTooth::WSAScanNearbyBthDev ()
  20. {
  21. m_Ary_RemoteBthDevInfo.RemoveAll ();
  23. WSAQUERYSET wsaq;
  24. HANDLE hLookup;
  25. union
  26. {
  27. CHAR buf[5000];
  28. double __unused; // ensure proper alignment
  29. };
  31. LPWSAQUERYSET pwsaResults = (LPWSAQUERYSET) buf;
  32. DWORD dwSize = sizeof(buf);
  33. BOOL bHaveName;
  34. ZeroMemory(&wsaq, sizeof(wsaq));
  35. wsaq.dwSize = sizeof(wsaq);
  36. wsaq.dwNameSpace = NS_BTH;
  37. wsaq.lpcsaBuffer = NULL;
  38. if (ERROR_SUCCESS != WSALookupServiceBegin (&wsaq, LUP_CONTAINERS, &hLookup))
  39. {
  40. TRACE ( _T("WSALookupServiceBegin failedn") );
  41. return -1;
  42. }
  44. ZeroMemory(pwsaResults, sizeof(WSAQUERYSET));
  45. pwsaResults->dwSize = sizeof(WSAQUERYSET);
  46. pwsaResults->dwNameSpace = NS_BTH;
  47. pwsaResults->lpBlob = NULL;
  48. while (ERROR_SUCCESS == WSALookupServiceNext (hLookup, LUP_RETURN_NAME | LUP_RETURN_ADDR, &dwSize, pwsaResults))
  49. {
  50. ASSERT (pwsaResults->dwNumberOfCsAddrs == 1);
  51. BTH_ADDR b = ((SOCKADDR_BTH *)pwsaResults->lpcsaBuffer->RemoteAddr.lpSockaddr)->btAddr;
  52. bHaveName = pwsaResults->lpszServiceInstanceName && *(pwsaResults->lpszServiceInstanceName);
  53. t_RemoteBthDevInfo RemoteBthDevInfo;
  54. if ( bHaveName )
  55. {
  56. StringCchPrintf ( RemoteBthDevInfo.szName, sizeof(RemoteBthDevInfo.szName), _T("%s"), 
  57. pwsaResults->lpszServiceInstanceName );
  58. }
  59. RemoteBthDevInfo.Address.ullLong = b;
  61. TRACE (L"%s ( %04x%08x )n", RemoteBthDevInfo.szName, GET_NAP(b), GET_SAP(b) );
  62. m_Ary_RemoteBthDevInfo.Add ( RemoteBthDevInfo );
  63. }
  64. WSALookupServiceEnd(hLookup);
  66. return (int)m_Ary_RemoteBthDevInfo.GetSize();
  67. }
  69. BOOL AUTHENTICATION_CALLBACK (LPVOID pvParam, PBLUETOOTH_DEVICE_INFO pDevice)
  70. {
  71. t_AUTHENTICATION_CALLBACK_Para *pAUTHENTICATION_CALLBACK_Para = (t_AUTHENTICATION_CALLBACK_Para*)pvParam;
  72. if ( pAUTHENTICATION_CALLBACK_Para )
  73. {
  74. pDevice->fAuthenticated = TRUE;
  75. DWORD result = BluetoothUpdateDeviceRecord ( pDevice );
  76. ASSERT ( result == ERROR_SUCCESS );
  77. result = BluetoothSendAuthenticationResponse ( pAUTHENTICATION_CALLBACK_Para->hRadio, pDevice, AUTHENTICATION_PASSKEY );
  78. if ( result == ERROR_SUCCESS )
  79. return TRUE;
  80. }
  81. return FALSE;
  82. }
  84. //
  85. // 用蓝牙 APIs 搜索附近的蓝牙设备，成功时返回设备数，否则返回-1
  86. //
  87. int CBlueTooth::ScanNearbyBthDev (
  88. HANDLE hRadio,
  89. BOOL fReturnAuthenticated/* = TRUE*/,
  90. BOOL fReturnRemembered/* = TRUE*/,
  91. BOOL fReturnUnknown/* = TRUE*/,
  92. BOOL fReturnConnected/* = TRUE*/,
  93. BOOL fIssueInquiry/* = FALSE*/,
  94. UCHAR cTimeoutMultiplier/* = 30*/
  95. )
  96. {
  97. RemoveAll_RemoteBthDevInfo ();
  98. CWaitCursor WaitCursor;
  100. BLUETOOTH_DEVICE_INFO bdi = { sizeof(BLUETOOTH_DEVICE_INFO) };
  101. BLUETOOTH_DEVICE_SEARCH_PARAMS bdsp;
  102. HBLUETOOTH_DEVICE_FIND hbf;
  103. ZeroMemory(&bdsp, sizeof(BLUETOOTH_DEVICE_SEARCH_PARAMS));
  105. bdsp.dwSize = sizeof(BLUETOOTH_DEVICE_SEARCH_PARAMS);
  106. bdsp.hRadio = hRadio;
  107. bdsp.fReturnAuthenticated = fReturnAuthenticated;
  108. bdsp.fReturnRemembered = fReturnRemembered;
  109. bdsp.fReturnUnknown = fReturnUnknown;
  110. bdsp.fReturnConnected = fReturnConnected;
  111. bdsp.fIssueInquiry = fIssueInquiry;
  112. bdsp.cTimeoutMultiplier = cTimeoutMultiplier;
  114. hbf = BluetoothFindFirstDevice(&bdsp, &bdi);
  115. if (hbf == NULL) return -1;
  117. while(true)
  118. {
  119. TRACE ( _T("%s ( %s )n"), bdi.szName, FormatBthAddress(bdi.Address.rgBytes) );
  120. t_RemoteBthDevInfo RemoteBthDevInfo;
  121. RemoteBthDevInfo.hRadio = hRadio;
  122. RemoteBthDevInfo.Address.ullLong = bdi.Address.ullLong;
  123. _snwprintf_s ( RemoteBthDevInfo.szName, LENGTH(RemoteBthDevInfo.szName), _T("%s"), bdi.szName );
  124. // 枚举服务
  125. EnumerateInstalledServices ( RemoteBthDevInfo );
  126. // 注册配对回调函数
  127. RemoteBthDevInfo.pAUTHENTICATION_CALLBACK_Para = new t_AUTHENTICATION_CALLBACK_Para;
  128. if ( RemoteBthDevInfo.pAUTHENTICATION_CALLBACK_Para )
  129. {
  130. RemoteBthDevInfo.pAUTHENTICATION_CALLBACK_Para->lpBlueTooth = this;
  131. RemoteBthDevInfo.pAUTHENTICATION_CALLBACK_Para->hRadio = hRadio;
  132. }
  133. BluetoothRegisterForAuthentication ( &bdi, &RemoteBthDevInfo.hRegHandle, AUTHENTICATION_CALLBACK, RemoteBthDevInfo.pAUTHENTICATION_CALLBACK_Para );
  135. m_Ary_RemoteBthDevInfo.Add ( RemoteBthDevInfo );
  136. if ( !BluetoothFindNextDevice(hbf, &bdi) )
  137. break;
  138. }
  139. BluetoothFindDeviceClose(hbf);
  141. return (int)m_Ary_RemoteBthDevInfo.GetSize();
  142. }
  144. //
  145. // 用向导手工搜索附近的蓝牙设备并建立连接，得到设备的详细信息，成功时返回设备数
  146. //
  147. int CBlueTooth::ScanNearbyBthDev_Wizard (
  148. HWND hwndParent,
  149. HANDLE hRadio,
  150. LPWSTR  pszInfo/*=NULL*/, //  IN  If not NULL, sets the "information" text
  151. BOOL    fForceAuthentication/*=FALSE*/, //  IN  If TRUE, authenication will be forced before returning
  152. BOOL    fShowAuthenticated/*=FALSE*/, //  IN  If TRUE, authenticated devices will be shown in the picker
  153. BOOL    fShowRemembered/*=TRUE*/, //  IN  If TRUE, remembered devices will be shown in the picker
  154. BOOL    fShowUnknown/*=TRUE*/, //  IN  If TRUE, unknown devices that are not authenticated or "remember" will be shown.
  155. BOOL    fAddNewDeviceWizard/*=TRUE*/, //  IN  If TRUE, invokes the add new device wizard.
  156. BOOL    fSkipServicesPage/*=FALSE*/, //  IN  If TRUE, skips the "Services" page in the wizard.
  157. PFN_DEVICE_CALLBACK pfnDeviceCallback/*=NULL*/, //  IN  If non-NULL, a callback that will be called for each device. If the
  158. //      the callback returns TRUE, the item will be added. If the callback is
  159. //      is FALSE, the item will not be shown.
  160. LPVOID  pvParam/*=NULL*/ //  IN  Parameter to be passed to pfnDeviceCallback as the pvParam.
  161. )
  162. {
  163. RemoveAll_RemoteBthDevInfo ();
  164. BLUETOOTH_SELECT_DEVICE_PARAMS btsdp = { sizeof(btsdp) };
  166. btsdp.hwndParent = hwndParent;
  167. btsdp.pszInfo = pszInfo;
  168. btsdp.fForceAuthentication = fForceAuthentication;
  169. btsdp.fShowAuthenticated = fShowAuthenticated;
  170. btsdp.fShowRemembered = fShowRemembered;
  171. btsdp.fShowUnknown = fShowUnknown;
  172. btsdp.fAddNewDeviceWizard = fAddNewDeviceWizard;
  173. btsdp.fSkipServicesPage = fSkipServicesPage;
  174. btsdp.pfnDeviceCallback = pfnDeviceCallback;
  175. btsdp.pvParam = pvParam;
  177. BOOL b = BluetoothSelectDevices( &btsdp );
  178. if ( b )
  179. {
  180. BLUETOOTH_DEVICE_INFO *pbtdi = btsdp.pDevices;
  181. for ( ULONG cDevice = 0; cDevice < btsdp.cNumDevices; cDevice ++ )
  182. {
  183. if ( pbtdi->fAuthenticated || pbtdi->fRemembered )
  184. {
  185. t_RemoteBthDevInfo RemoteBthDevInfo;
  186. RemoteBthDevInfo.hRadio = hRadio;
  187. RemoteBthDevInfo.Address = pbtdi->Address;
  188. _snwprintf_s ( RemoteBthDevInfo.szName, LENGTH(RemoteBthDevInfo.szName), _T("%s"), pbtdi->szName );
  189. EnumerateInstalledServices ( RemoteBthDevInfo );
  190. m_Ary_RemoteBthDevInfo.Add ( RemoteBthDevInfo );
  191. }
  192. pbtdi = (BLUETOOTH_DEVICE_INFO *) ((LPBYTE)pbtdi + pbtdi->dwSize);
  193. }
  194. BluetoothSelectDevicesFree( &btsdp );
  195. }
  197. return (int)m_Ary_RemoteBthDevInfo.GetSize();
  198. }
  200. //
  201. // 根据远程蓝牙设备的地址获取详细信息
  202. //
  203. BOOL CBlueTooth::BluetoothGetDeviceInfo ( IN t_RemoteBthDevInfo& RemoteBthDevInfo, OUT BLUETOOTH_DEVICE_INFO *pbtdi )
  204. {
  205. BLUETOOTH_DEVICE_INFO bdi = { sizeof(BLUETOOTH_DEVICE_INFO) };
  206. bdi.Address.ullLong = RemoteBthDevInfo.Address.ullLong;
  207. if ( ERROR_SUCCESS != ::BluetoothGetDeviceInfo ( RemoteBthDevInfo.hRadio, &bdi ) )
  208. return FALSE;
  209. if ( pbtdi ) memcpy ( pbtdi, &bdi, sizeof(BLUETOOTH_DEVICE_INFO) );
  210. return TRUE;
  211. }
  213. BOOL CBlueTooth::BluetoothSetServiceState ( HANDLE hRadio, BLUETOOTH_DEVICE_INFO &bdi, GUID guidService, DWORD dwServiceFlags )
  214. {
  215. DWORD result = ::BluetoothSetServiceState(hRadio, &bdi, &guidService, dwServiceFlags);
  216. if ( ERROR_SUCCESS != result && ERROR_SERVICE_DOES_NOT_EXIST != result )
  217. {
  218. TRACE ( _T("BluetoothSetServiceState failed : %sn"), hwFormatMessage (result) );
  219. return FALSE;
  220. }
  221. return TRUE;
  222. }
  224. // 枚举已安装的服务
  225. int CBlueTooth::EnumerateInstalledServices( t_RemoteBthDevInfo& RemoteBthDevInfo )
  226. {
  227. BLUETOOTH_DEVICE_INFO bdi = { sizeof(BLUETOOTH_DEVICE_INFO) };
  228. if ( !BluetoothGetDeviceInfo ( RemoteBthDevInfo, &bdi ) )
  229. return -1;
  231. BluetoothSetServiceState ( RemoteBthDevInfo.hRadio, bdi, SerialPortServiceClass_UUID, BLUETOOTH_SERVICE_ENABLE );
  232. BluetoothSetServiceState ( RemoteBthDevInfo.hRadio, bdi, LANAccessUsingPPPServiceClass_UUID, BLUETOOTH_SERVICE_ENABLE );
  233. BluetoothSetServiceState ( RemoteBthDevInfo.hRadio, bdi, DialupNetworkingServiceClass_UUID, BLUETOOTH_SERVICE_ENABLE );
  235. if ( !BluetoothGetDeviceInfo ( RemoteBthDevInfo, &bdi ) )
  236. return -1;
  237. DWORD numServices = LENGTH(RemoteBthDevInfo.guidServices);
  238. DWORD result = BluetoothEnumerateInstalledServices(RemoteBthDevInfo.hRadio,&bdi, &numServices, RemoteBthDevInfo.guidServices);
  239. if ( ERROR_SUCCESS == result ) return numServices;
  240. return -1;
  241. }
  243. // 显示序号为 nIndex 的蓝牙设备属性框
  244. BOOL CBlueTooth::ShowPropertySheet(int nIndex, HWND hwdParent/*=NULL*/)
  245. {
  246. if ( nIndex < 0 || nIndex >=m_Ary_RemoteBthDevInfo.GetSize() )
  247. return FALSE;
  249. t_RemoteBthDevInfo &RemoteBthDevInfo = m_Ary_RemoteBthDevInfo.GetAt ( nIndex );
  250. BLUETOOTH_DEVICE_INFO bdi = { sizeof(BLUETOOTH_DEVICE_INFO) };
  251. if ( !BluetoothGetDeviceInfo ( RemoteBthDevInfo, &bdi ) )
  252. return FALSE;
  254. return BluetoothDisplayDeviceProperties ( hwdParent, &bdi );
  255. }
  257. // 请求与远程蓝牙设备配对
  258. BOOL CBlueTooth::RequestAuthenticateDevice(int nIndex, HWND hwdParent/*=NULL*/, DWORD *presult/*=NULL*/)
  259. {
  260. if ( nIndex < 0 || nIndex >=m_Ary_RemoteBthDevInfo.GetSize() )
  261. return FALSE;
  263. t_RemoteBthDevInfo &RemoteBthDevInfo = m_Ary_RemoteBthDevInfo.GetAt ( nIndex );
  264. BLUETOOTH_DEVICE_INFO bdi = { sizeof(BLUETOOTH_DEVICE_INFO) };
  265. if ( !BluetoothGetDeviceInfo ( RemoteBthDevInfo, &bdi ) )
  266. return FALSE;
  268. if ( bdi.fAuthenticated ) return TRUE; // 已经配对了
  269. bdi.fAuthenticated = TRUE;
  270. VERIFY ( ERROR_SUCCESS == BluetoothUpdateDeviceRecord ( &bdi ) );
  271. DWORD result = BluetoothAuthenticateDevice ( hwdParent, RemoteBthDevInfo.hRadio, &bdi, AUTHENTICATION_PASSKEY, (ULONG)wcslen(AUTHENTICATION_PASSKEY) );
  272. if ( presult ) *presult = result;
  273. if ( result == ERROR_SUCCESS ) return TRUE;
  275. return FALSE;
  276. }
  278. CString CBlueTooth::FormatBthAddress(BYTE *BthAddress)
  279. {
  280. ASSERT ( BthAddress );
  281. BLUETOOTH_ADDRESS Address;
  282. ASSERT_ADDRESS ( BthAddress, LENGTH(Address.rgBytes)*sizeof(TCHAR) );
  283. CString csBthAddress;
  284. for ( int i=0; i<LENGTH(Address.rgBytes); i++ )
  285. {
  286. CString csNode;
  287. csNode.Format ( _T("%.2x"), BthAddress[LENGTH(Address.rgBytes)-i-1] );
  288. if ( !csBthAddress.IsEmpty() ) csBthAddress += ":";
  289. csBthAddress += csNode;
  290. }
  291. return csBthAddress;
  292. }
  294. // 枚举本地蓝牙设备，返回本地蓝牙设备数
  295. int CBlueTooth::EnumerateLocalRadios(void)
  296. {
  297. m_Ary_LocalRadioInfo.RemoveAll ();
  299. HANDLE hRadio = NULL;
  300. BLUETOOTH_FIND_RADIO_PARAMS btfrp = { sizeof(btfrp) };
  302. HBLUETOOTH_RADIO_FIND hFind = BluetoothFindFirstRadio( &btfrp, &hRadio );
  303. if ( NULL != hFind )
  304. {
  305. do
  306. {
  307. if ( hRadio )
  308. {
  309. t_LocalRadioInfo LocalRadioInfo;
  310. LocalRadioInfo.hRadio = hRadio;
  311. if ( ERROR_SUCCESS == BluetoothGetRadioInfo ( hRadio, &LocalRadioInfo.RadioInfo ) )
  312. {
  313. // 千万注意：以下代码让蓝牙虚拟传出串口能正常工作，我是花了一个通宵的时间才找到这个原因的。
  314. if (FALSE == BluetoothEnableDiscovery(hRadio, TRUE))
  315. {
  316. TRACE(_T("%sn"), hwFormatMessage(GetLastError()));
  317. }
  318. if (FALSE == BluetoothEnableIncomingConnections(hRadio, TRUE))
  319. {
  320. TRACE(_T("%sn"), hwFormatMessage(GetLastError()));
  321. }
  323. m_Ary_LocalRadioInfo.Add ( LocalRadioInfo );
  324. }
  325. }
  327. } while( BluetoothFindNextRadio( hFind, &hRadio ) );
  328. BluetoothFindRadioClose( hFind );
  329. return (int)m_Ary_LocalRadioInfo.GetSize ();
  330. }
  332. return 0;
  333. }
  335. void CBlueTooth::RemoveAllLocalRadio(void)
  336. {
  337. for ( int i=0; i<m_Ary_LocalRadioInfo.GetSize(); i++ )
  338. {
  339. t_LocalRadioInfo &LocalRadioInfo = m_Ary_LocalRadioInfo.GetAt(i);
  340. if ( LocalRadioInfo.hRadio )
  341. CloseHandle ( LocalRadioInfo.hRadio );
  342. }
  343. m_Ary_LocalRadioInfo.RemoveAll ();
  344. }
  346. void CBlueTooth::RemoveAll_RemoteBthDevInfo(void)
  347. {
  348. for ( int i=0; i<m_Ary_RemoteBthDevInfo.GetSize(); i++ )
  349. {
  350. t_RemoteBthDevInfo &RemoteBthDevInfo = m_Ary_RemoteBthDevInfo.GetAt(i);
  351. if ( RemoteBthDevInfo.hRegHandle )
  352. BluetoothUnregisterAuthentication ( RemoteBthDevInfo.hRegHandle );
  354. if ( RemoteBthDevInfo.pAUTHENTICATION_CALLBACK_Para )
  355. delete RemoteBthDevInfo.pAUTHENTICATION_CALLBACK_Para;
  357. }
  358. m_Ary_RemoteBthDevInfo.RemoveAll ();
  359. }
  361. int CBlueTooth::Test(void)
  362. {
  364. return 0;
  365. }