44//
55
66using System ;
7- using System . Diagnostics ;
87using System . Threading ;
98
109using nanoFramework . Device . Bluetooth ;
1413/// Bluetooth Sample 2 is a custom service which shows the use of:
1514///
1615/// - Adding security to characteristics
17- /// - 1st characteristic you can read without pairing but will need to be paired to write
18- /// - 2nd characteristic you can write without pairing but will need to be paired to Read
19- /// - Both characteristic read/write same value.
16+ /// - 1st characteristic you can read & write without pairing
17+ /// - 2nd characteristic you can read & write but will required device to paired so encryption is enabled. If you try to access this characteristic
18+ /// a pairing will be forced. You can use a just works type of pairing for this.
19+ /// - 3nd characteristic you can read & write but will required device to paired and authenticated. If you try to access this characteristic
20+ /// a pairing will be forced. A pin number of 654321 will need to be entered to pair succesfully.
21+ ///
22+ /// - All characteristics read/write same value.
2023///
2124/// You will be able to connect to the service and read values or subscribe to Notified ever 10 seconds.
22- /// Suitable Phone apps: "LightBlue" or "nRF Connect"
25+ /// Suitable Phone apps: "LightBlue" or "nRF Connect". If using a smaller then six digits for pin then use leading zeroes in these apps.
2326/// </summary>
2427namespace BluetoothLESample2
2528{
2629 public class Program
2730 {
2831 static GattLocalCharacteristic _readWriteCharacteristic1 ;
2932 static GattLocalCharacteristic _readWriteCharacteristic2 ;
33+ static GattLocalCharacteristic _readWriteCharacteristic3 ;
3034
3135 // value used to read/write
32- static Int32 _value ;
36+ static Int32 _value = 57 ;
37+
38+ // Default pin
39+ const int PASSKEY = 654321 ;
3340
3441 public static void Main ( )
3542 {
36- Debug . WriteLine ( "Hello from Bluetooth Sample 2" ) ;
43+ Console . WriteLine ( ) ;
44+ Console . WriteLine ( "Hello from Bluetooth Sample 2" ) ;
3745
3846 Guid serviceUuid = new Guid ( "A7EEDF2C-DA8C-4CB5-A9C5-5151C78B0057" ) ;
39- Guid writeCharUuid1 = new Guid ( "A7EEDF2C-DA8D-4CB5-A9C5-5151C78B0057" ) ;
40- Guid writeCharUuid2 = new Guid ( "A7EEDF2C-DA8E-4CB5-A9C5-5151C78B0057" ) ;
47+ Guid plain_CharUuid1 = new Guid ( "A7EEDF2C-DA8D-4CB5-A9C5-5151C78B0057" ) ;
48+ Guid encrypt_CharUuid2 = new Guid ( "A7EEDF2C-DA8E-4CB5-A9C5-5151C78B0057" ) ;
49+ Guid auth_CharUuid3 = new Guid ( "A7EEDF2C-DA8F-4CB5-A9C5-5151C78B0057" ) ;
50+
51+ // BluetoothLEServer is a singleton object so gets its instance. The Object is created when you first access it
52+ // and can be disposed to free up memory.
53+ BluetoothLEServer server = BluetoothLEServer . Instance ;
54+
55+ // Give device a name
56+ server . DeviceName = "Sample2" ;
57+
58+ // Set up an event handler for handling pairing requests
59+ server . Pairing . PairingRequested += Pairing_PairingRequested ;
60+ server . Pairing . PairingComplete += Pairing_PairingComplete ;
61+
62+ // Set up event for a session status change, client connects/disconnects
63+ server . Session . SessionStatusChanged += Session_SessionStatusChanged ;
64+
65+ // The IOCapabilities define the input /output capabilities of the device and the type of pairings that is available.
66+ // See Bluetooth pairing matrix for more information.
67+ // With NoInputNoOutput on both ends then only "Just works" pairing is available and only first 2 characteristics will be accesable.
68+ server . Pairing . IOCapabilities = DevicePairingIOCapabilities . NoInputNoOutput ;
69+
70+ // By making it a display we force an Authenication, Remove following comment to try this out
71+ server . Pairing . IOCapabilities = DevicePairingIOCapabilities . DisplayOnly ;
72+
73+ // Start the Bluetooth server.
74+ server . Start ( ) ;
4175
4276 //The GattServiceProvider is used to create and advertise the primary service definition.
4377 //An extra device information service will be automatically created.
@@ -55,13 +89,13 @@ public static void Main()
5589 #region Characteristic 1
5690 // Add Read Characteristic for data that changes to service
5791 // We also want the connected client to be notified when value changes so we add the notify property
58- GattLocalCharacteristicResult characteristicResult = service . CreateCharacteristic ( writeCharUuid1 ,
92+ GattLocalCharacteristicResult characteristicResult = service . CreateCharacteristic ( plain_CharUuid1 ,
5993 new GattLocalCharacteristicParameters ( )
6094 {
6195 CharacteristicProperties = GattCharacteristicProperties . Read | GattCharacteristicProperties . Write ,
6296 UserDescription = "My Read/Write Characteristic 1" ,
6397 ReadProtectionLevel = GattProtectionLevel . Plain ,
64- WriteProtectionLevel = GattProtectionLevel . EncryptionRequired
98+ WriteProtectionLevel = GattProtectionLevel . Plain
6599 } ) ;
66100 ;
67101
@@ -74,23 +108,22 @@ public static void Main()
74108 // Get reference to our read Characteristic
75109 _readWriteCharacteristic1 = characteristicResult . Characteristic ;
76110
77- // Set up event handlers for read/write
111+ // Set up event handlers for read/write #1
78112 _readWriteCharacteristic1 . WriteRequested += _writeCharacteristic_WriteRequested ;
79113 _readWriteCharacteristic1 . ReadRequested += _readWriteCharacteristic_ReadRequested ;
80114 #endregion
81115
82- #region Characteristic 1
116+ #region Characteristic 2 - Encryption required
83117 // Add Read Characteristic for data that changes to service
84118 // We also want the connected client to be notified when value changes so we add the notify property
85- characteristicResult = service . CreateCharacteristic ( writeCharUuid2 ,
119+ characteristicResult = service . CreateCharacteristic ( encrypt_CharUuid2 ,
86120 new GattLocalCharacteristicParameters ( )
87121 {
88122 CharacteristicProperties = GattCharacteristicProperties . Read | GattCharacteristicProperties . Write ,
89123 UserDescription = "My Read/Write Characteristic 2" ,
90124 ReadProtectionLevel = GattProtectionLevel . EncryptionRequired ,
91- WriteProtectionLevel = GattProtectionLevel . Plain
125+ WriteProtectionLevel = GattProtectionLevel . EncryptionRequired
92126 } ) ;
93- ;
94127
95128 if ( characteristicResult . Error != BluetoothError . Success )
96129 {
@@ -101,26 +134,89 @@ public static void Main()
101134 // Get reference to our read Characteristic
102135 _readWriteCharacteristic2 = characteristicResult . Characteristic ;
103136
104- // Set up event handlers for read/write
137+ // Set up event handlers for read/write #2
105138 _readWriteCharacteristic2 . WriteRequested += _writeCharacteristic_WriteRequested ;
106139 _readWriteCharacteristic2 . ReadRequested += _readWriteCharacteristic_ReadRequested ;
107140 #endregion
108141
142+ #region Characteristic 3 - Authentication & Encryption required
143+ // Add Read Characteristic for data that changes to service
144+ // We also want the connected client to be notified when value changes so we add the notify property
145+ characteristicResult = service . CreateCharacteristic ( auth_CharUuid3 ,
146+ new GattLocalCharacteristicParameters ( )
147+ {
148+ CharacteristicProperties = GattCharacteristicProperties . Read | GattCharacteristicProperties . Write ,
149+ UserDescription = "My Read/Write Characteristic 3" ,
150+ ReadProtectionLevel = GattProtectionLevel . EncryptionAndAuthenticationRequired ,
151+ WriteProtectionLevel = GattProtectionLevel . EncryptionAndAuthenticationRequired
152+ } ) ;
153+
154+ if ( characteristicResult . Error != BluetoothError . Success )
155+ {
156+ // An error occurred.
157+ return ;
158+ }
159+
160+ // Get reference to our read Characteristic
161+ _readWriteCharacteristic3 = characteristicResult . Characteristic ;
162+
163+ // Set up event handlers for read/write #3
164+ _readWriteCharacteristic3 . WriteRequested += _writeCharacteristic_WriteRequested ;
165+ _readWriteCharacteristic3 . ReadRequested += _readWriteCharacteristic_ReadRequested ;
166+ #endregion
167+
109168 // Once all the Characteristics have been created you need to advertise the Service so
110169 // other devices can see it. Here we also say the device can be connected too and other
111170 // devices can see it.
112171 serviceProvider . StartAdvertising ( new GattServiceProviderAdvertisingParameters ( )
113172 {
114- DeviceName = "Sample2" ,
115173 IsConnectable = true ,
116174 IsDiscoverable = true
117175 } ) ;
118176
119- Debug . WriteLine ( $ "Sample 2 now Advertising") ;
177+ Console . WriteLine ( $ "Sample 2 Advertising") ;
120178
121179 Thread . Sleep ( Timeout . Infinite ) ;
122180 }
123181
182+ private static void Session_SessionStatusChanged ( object sender , GattSessionStatusChangedEventArgs args )
183+ {
184+ Console . WriteLine ( $ "Session_SessionStatusChanged status->{ args . Status } Error->{ args . Error } ") ;
185+ if ( args . Status == GattSessionStatus . Active )
186+ {
187+ Console . WriteLine ( $ "Client connected, address { BluetoothLEServer . Instance . Session . DeviceId : X} ") ;
188+ }
189+ else
190+ {
191+ Console . WriteLine ( "Client disconnected" ) ;
192+ }
193+ }
194+
195+ private static void Pairing_PairingComplete ( object sender , DevicePairingEventArgs args )
196+ {
197+ DevicePairing dp = sender as DevicePairing ;
198+
199+ Console . WriteLine ( $ "PairingComplete:{ args . Status } IOCaps:{ dp . IOCapabilities } IsPaired:{ dp . IsPaired } IsAuthenticated:{ dp . IsAuthenticated } ") ;
200+ }
201+
202+ private static void Pairing_PairingRequested ( object sender , DevicePairingRequestedEventArgs args )
203+ {
204+ Console . WriteLine ( $ "CustomPairing_PairingRequested { args . PairingKind } ") ;
205+
206+ switch ( args . PairingKind )
207+ {
208+ // Passkey displayed on current device or just a know secret passkey
209+ // Tell BLE what passkey is, so it can be checked against what has been entered on other device
210+ case DevicePairingKinds . DisplayPin :
211+ Console . WriteLine ( "DisplayPin" ) ;
212+
213+ // We don't actually display pin here but just tell Bluetooth what the pin is so it can
214+ // compare with pin supplied by client
215+ args . Accept ( PASSKEY ) ;
216+ break ;
217+ }
218+ }
219+
124220 private static void _readWriteCharacteristic_ReadRequested ( GattLocalCharacteristic sender , GattReadRequestedEventArgs ReadRequestEventArgs )
125221 {
126222 GattReadRequest request = ReadRequestEventArgs . GetRequest ( ) ;
@@ -152,8 +248,7 @@ private static void _writeCharacteristic_WriteRequested(GattLocalCharacteristic
152248 request . Respond ( ) ;
153249 }
154250
155- Debug . WriteLine ( $ "Received value={ _value } ") ;
251+ Console . WriteLine ( $ "Received value={ _value } ") ;
156252 }
157-
158253 }
159254}
0 commit comments