Make XPLAINBridge serial bridge much more reliable for the reception of characters...

[pub/USBasp.git] / Demos / Host / Incomplete / BluetoothHost / Lib / RFCOMMControl.c

diff --git a/Demos/Host/Incomplete/BluetoothHost/Lib/RFCOMMControl.c b/Demos/Host/Incomplete/BluetoothHost/Lib/RFCOMMControl.c
index 2321c25..01fab78 100644 (file)
--- a/Demos/Host/Incomplete/BluetoothHost/Lib/RFCOMMControl.c
+++ b/Demos/Host/Incomplete/BluetoothHost/Lib/RFCOMMControl.c
@@ -42,29 +42,30 @@ void RFCOMM_ProcessControlCommand(const uint8_t* Command, Bluetooth_Channel_t* c
 {\r
        const RFCOMM_Command_t* CommandHeader  = (const RFCOMM_Command_t*)Command;\r
        const uint8_t*          CommandData    = (const uint8_t*)Command + sizeof(RFCOMM_Command_t);\r
 {\r
        const RFCOMM_Command_t* CommandHeader  = (const RFCOMM_Command_t*)Command;\r
        const uint8_t*          CommandData    = (const uint8_t*)Command + sizeof(RFCOMM_Command_t);\r

+       uint8_t                 CommandDataLen = RFCOMM_GetVariableFieldValue(&CommandData);\r

 \r
        switch (CommandHeader->Command)\r
        {\r
                case RFCOMM_Control_Test:\r
 \r
        switch (CommandHeader->Command)\r
        {\r
                case RFCOMM_Control_Test:\r

-                       RFCOMM_ProcessTestCommand(CommandHeader, CommandData);\r
+                       RFCOMM_ProcessTestCommand(CommandHeader, CommandDataLen, CommandData, Channel);\r

                        break;\r
                case RFCOMM_Control_FlowControlEnable:\r
                        break;\r
                case RFCOMM_Control_FlowControlEnable:\r

-                       RFCOMM_ProcessFCECommand(CommandHeader, CommandData);\r
+                       RFCOMM_ProcessFCECommand(CommandHeader, CommandData, Channel);\r

                        break;\r
                case RFCOMM_Control_FlowControlDisable:\r
                        break;\r
                case RFCOMM_Control_FlowControlDisable:\r

-                       RFCOMM_ProcessFCDCommand(CommandHeader, CommandData);\r
+                       RFCOMM_ProcessFCDCommand(CommandHeader, CommandData, Channel);\r

                        break;\r
                case RFCOMM_Control_ModemStatus:\r
                        break;\r
                case RFCOMM_Control_ModemStatus:\r

-                       RFCOMM_ProcessMSCommand(CommandHeader, CommandData);\r
+                       RFCOMM_ProcessMSCommand(CommandHeader, CommandDataLen, CommandData, Channel);\r

                        break;\r
                case RFCOMM_Control_RemotePortNegotiation:\r
                        break;\r
                case RFCOMM_Control_RemotePortNegotiation:\r

-                       RFCOMM_ProcessRPNCommand(CommandHeader, CommandData);\r
+                       RFCOMM_ProcessRPNCommand(CommandHeader, CommandData, Channel);\r

                        break;\r
                case RFCOMM_Control_RemoteLineStatus:\r
                        break;\r
                case RFCOMM_Control_RemoteLineStatus:\r

-                       RFCOMM_ProcessRLSCommand(CommandHeader, CommandData);\r
+                       RFCOMM_ProcessRLSCommand(CommandHeader, CommandData, Channel);\r

                        break;\r
                case RFCOMM_Control_DLCParameterNegotiation:\r
                        break;\r
                case RFCOMM_Control_DLCParameterNegotiation:\r

-                       RFCOMM_ProcessDPNCommand(CommandHeader, CommandData);\r
+                       RFCOMM_ProcessDPNCommand(CommandHeader, CommandData, Channel);\r

                        break;\r
                default:\r
                        BT_RFCOMM_DEBUG(1, "<< Unknown Command");               \r
                        break;\r
                default:\r
                        BT_RFCOMM_DEBUG(1, "<< Unknown Command");               \r


@@ -72,49 +73,163 @@ void RFCOMM_ProcessControlCommand(const uint8_t* Command, Bluetooth_Channel_t* c
        }\r
 }\r
 \r
        }\r
 }\r
 \r

-static void RFCOMM_ProcessTestCommand(const RFCOMM_Command_t* CommandHeader, const uint8_t* CommandData)\r
+static void RFCOMM_ProcessTestCommand(const RFCOMM_Command_t* const CommandHeader, const uint8_t CommandDataLen,\r
+                                      const uint8_t* CommandData, Bluetooth_Channel_t* const Channel)\r

 {\r
 {\r

+       const uint8_t* Params = (const uint8_t*)CommandData;\r
+\r

        BT_RFCOMM_DEBUG(1, "<< TEST Command");\r
        BT_RFCOMM_DEBUG(1, "<< TEST Command");\r

+       \r
+       struct\r
+       {\r
+               RFCOMM_Command_t CommandHeader;\r
+               uint8_t          Length;\r
+               uint8_t          TestData[CommandDataLen];\r
+       } TestResponse;\r
+\r
+       /* Fill out the Test response data */\r
+       TestResponse.CommandHeader = (RFCOMM_Command_t){.Command = RFCOMM_Control_Test, .EA = true, .CR = false};\r
+       TestResponse.Length        = (CommandDataLen << 1) | 0x01;\r
+       memcpy(TestResponse.TestData, Params, CommandDataLen);\r
+       \r
+       BT_RFCOMM_DEBUG(1, ">> TEST Response");\r
+\r
+       /* Send the PDN response to acknowledge the command */\r
+       RFCOMM_SendFrame(RFCOMM_CONTROL_DLCI, false, RFCOMM_Frame_UIH, sizeof(TestResponse), &TestResponse, Channel);\r

 }\r
 \r
 }\r
 \r

-static void RFCOMM_ProcessFCECommand(const RFCOMM_Command_t* CommandHeader, const uint8_t* CommandData)\r
+static void RFCOMM_ProcessFCECommand(const RFCOMM_Command_t* const CommandHeader, const uint8_t* CommandData,\r
+                                                Bluetooth_Channel_t* const Channel)\r

 {\r
        BT_RFCOMM_DEBUG(1, "<< FCE Command");\r
 }\r
 \r
 {\r
        BT_RFCOMM_DEBUG(1, "<< FCE Command");\r
 }\r
 \r

-static void RFCOMM_ProcessFCDCommand(const RFCOMM_Command_t* CommandHeader, const uint8_t* CommandData)\r
+static void RFCOMM_ProcessFCDCommand(const RFCOMM_Command_t* const CommandHeader, const uint8_t* CommandData,\r
+                                                Bluetooth_Channel_t* const Channel)\r

 {\r
        BT_RFCOMM_DEBUG(1, "<< FCD Command");\r
 }\r
 \r
 {\r
        BT_RFCOMM_DEBUG(1, "<< FCD Command");\r
 }\r
 \r

-static void RFCOMM_ProcessMSCommand(const RFCOMM_Command_t* CommandHeader, const uint8_t* CommandData)\r
+static void RFCOMM_ProcessMSCommand(const RFCOMM_Command_t* const CommandHeader, const uint8_t CommandDataLen,\r
+                                    const uint8_t* CommandData, Bluetooth_Channel_t* const Channel)\r

 {\r
 {\r

+       const RFCOMM_MS_Parameters_t* Params = (const RFCOMM_MS_Parameters_t*)CommandData;\r
+\r

        BT_RFCOMM_DEBUG(1, "<< MS Command");\r
        BT_RFCOMM_DEBUG(1, "<< MS Command");\r

+       BT_RFCOMM_DEBUG(2, "-- DLCI: 0x%02X", Params->Channel.DLCI);\r
+       \r
+       /* Ignore status flags sent to the control channel */\r
+       if (Params->Channel.DLCI == RFCOMM_CONTROL_DLCI)\r
+         return;\r
+       \r
+       /* Retrieve existing channel configuration data, if already opened */\r
+       RFCOMM_Channel_t* RFCOMMChannel = RFCOMM_GetChannelData(Params->Channel.DLCI);  \r
+       \r
+       /* If the channel does not exist, abort */\r
+       if (RFCOMMChannel == NULL)\r
+         return;\r
+         \r
+       /* Save the new channel signals to the channel state structure */\r
+       RFCOMMChannel->Remote.Signals = Params->Signals;\r
+       \r
+       /* If the command contains the optional break signals field, store the value */\r
+       if (CommandDataLen == sizeof(RFCOMM_MS_Parameters_t))\r
+         RFCOMMChannel->Remote.BreakSignal = Params->BreakSignal;\r
+         \r
+       struct\r
+       {\r
+               RFCOMM_Command_t       CommandHeader;\r
+               uint8_t                Length;\r
+               RFCOMM_MS_Parameters_t Params;\r
+       } MSResponse;\r
+\r
+       /* Fill out the MS response data */\r
+       MSResponse.CommandHeader  = (RFCOMM_Command_t){.Command = RFCOMM_Control_ModemStatus, .EA = true, .CR = false};\r
+       MSResponse.Length         = (CommandDataLen << 1) | 0x01;\r
+       memcpy(&MSResponse.Params, Params, sizeof(RFCOMM_MS_Parameters_t));\r
+       \r
+       BT_RFCOMM_DEBUG(1, ">> MS Response");\r
+\r
+       /* Send the PDN response to acknowledge the command */\r
+       RFCOMM_SendFrame(RFCOMM_CONTROL_DLCI, false, RFCOMM_Frame_UIH,\r
+                        (sizeof(MSResponse) - sizeof(MSResponse.Params) + CommandDataLen), &MSResponse, Channel);\r

 }\r
 \r
 }\r
 \r

-static void RFCOMM_ProcessRPNCommand(const RFCOMM_Command_t* CommandHeader, const uint8_t* CommandData)\r
+static void RFCOMM_ProcessRPNCommand(const RFCOMM_Command_t* const CommandHeader, const uint8_t* CommandData,\r
+                                                Bluetooth_Channel_t* const Channel)\r

 {\r
        BT_RFCOMM_DEBUG(1, "<< RPN Command");\r
 }\r
 \r
 {\r
        BT_RFCOMM_DEBUG(1, "<< RPN Command");\r
 }\r
 \r

-static void RFCOMM_ProcessRLSCommand(const RFCOMM_Command_t* CommandHeader, const uint8_t* CommandData)\r
+static void RFCOMM_ProcessRLSCommand(const RFCOMM_Command_t* const CommandHeader, const uint8_t* CommandData,\r
+                                                Bluetooth_Channel_t* const Channel)\r

 {\r
        BT_RFCOMM_DEBUG(1, "<< RLS Command");\r
 }\r
 \r
 {\r
        BT_RFCOMM_DEBUG(1, "<< RLS Command");\r
 }\r
 \r

-static void RFCOMM_ProcessDPNCommand(const RFCOMM_Command_t* CommandHeader, const uint8_t* CommandData)\r
+static void RFCOMM_ProcessDPNCommand(const RFCOMM_Command_t* const CommandHeader, const uint8_t* CommandData,\r
+                                                Bluetooth_Channel_t* const Channel)\r

 {\r
 {\r

+       const RFCOMM_DPN_Parameters_t* Params = (const RFCOMM_DPN_Parameters_t*)CommandData;\r
+\r

        BT_RFCOMM_DEBUG(1, "<< DPN Command");\r
        BT_RFCOMM_DEBUG(1, "<< DPN Command");\r

+       BT_RFCOMM_DEBUG(2, "-- DLCI: 0x%02X", Params->DLCI);\r

        \r
        \r

-       /* Skip over the first data byte (Length field) since its size and value are fixed */\r
-       RFCOMM_Channel_t* RFCOMMChannel = RFCOMM_GetChannelData(CommandData[2]);\r
+       /* Ignore parameter negotiations to the control channel */\r
+       if (Params->DLCI == RFCOMM_CONTROL_DLCI)\r
+         return;\r

        \r
        \r

+       /* Retrieve existing channel configuration data, if already opened */\r
+       RFCOMM_Channel_t* RFCOMMChannel = RFCOMM_GetChannelData(Params->DLCI);\r
+       \r
+       /* Check if the channel has no corresponding entry - remote did not open it first */\r

        if (RFCOMMChannel == NULL)\r
        {\r
        if (RFCOMMChannel == NULL)\r
        {\r

-               // TODO: Channel does not exist - create it\r
+               /* Find a free entry in the RFCOMM channel multiplexer state array */\r
+               for (uint8_t i = 0; i < RFCOMM_MAX_OPEN_CHANNELS; i++)\r
+               {\r
+                       /* If the channel's DLCI is zero, the channel state entry is free */\r
+                       if (!(RFCOMM_Channels[i].DLCI))\r
+                       {\r
+                               RFCOMMChannel       = &RFCOMM_Channels[i];\r
+                               RFCOMMChannel->DLCI = Params->DLCI;\r
+                               RFCOMMChannel->MTU  = 0xFFFF;\r
+                               RFCOMMChannel->Remote.Signals     = 0 | (1 << 0);\r
+                               RFCOMMChannel->Remote.BreakSignal = 0 | (1 << 0);\r
+                               RFCOMMChannel->Local.Signals      = RFCOMM_SIGNAL_RTC | RFCOMM_SIGNAL_RTR | RFCOMM_SIGNAL_DV | (1 << 0);\r
+                               RFCOMMChannel->Local.BreakSignal  = 0 | (1 << 0);\r
+                               break;\r
+                       }\r
+               }\r
+               \r
+               /* No free entry was found, discard the request */\r
+               if (RFCOMMChannel == NULL)\r
+               {\r
+                       BT_RFCOMM_DEBUG(2, "-- No Free Channel");\r
+                       return;\r
+               }\r

        }\r
        \r
        }\r
        \r

-       RFCOMMChannel->Configured = true;\r
+       /* Save the new channel configuration */\r
+       RFCOMMChannel->State    = RFCOMM_Channel_Open;\r
+       RFCOMMChannel->Priority = Params->Priority;\r
+       RFCOMMChannel->MTU      = Params->MaximumFrameSize;\r
+       \r
+       struct\r
+       {\r
+               RFCOMM_Command_t        CommandHeader;\r
+               uint8_t                 Length;\r
+               RFCOMM_DPN_Parameters_t Params;\r
+       } DPNResponse;\r

        \r
        \r

-       // TODO: Read in channel data, ACK request\r
+       /* Fill out the DPN response data */\r
+       DPNResponse.CommandHeader           = (RFCOMM_Command_t){.Command = RFCOMM_Control_DLCParameterNegotiation, .EA = true, .CR = false};\r
+       DPNResponse.Length                  = (sizeof(DPNResponse.Params) << 1) | 0x01;\r
+       memcpy(&DPNResponse.Params, Params, sizeof(RFCOMM_DPN_Parameters_t));\r
+       DPNResponse.Params.ConvergenceLayer = 0x00; // TODO: Enable credit based transaction support\r
+       \r
+       BT_RFCOMM_DEBUG(1, ">> DPN Response");\r
+\r
+       /* Send the PDN response to acknowledge the command */\r
+       RFCOMM_SendFrame(RFCOMM_CONTROL_DLCI, false, RFCOMM_Frame_UIH, sizeof(DPNResponse), &DPNResponse, Channel);\r

 }\r
 }\r