FreeCalypso > hg > tcs211-l1-reconst
annotate chipsetsw/services/atp/atp_uart_handle_msg.c @ 180:22cc509346c8
l1audio_init.c: white space preen
| author | Mychaela Falconia <falcon@freecalypso.org> | 
|---|---|
| date | Wed, 08 Jun 2016 00:07:21 +0000 | 
| parents | 509db1a7b7b8 | 
| children | 
| rev | line source | 
|---|---|
| 0 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1 /********************************************************************************/ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 2 /* */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 3 /* File Name: atp_uart_handle_msg.c */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 4 /* */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 5 /* Purpose: This file contains the internal function related to */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 6 /* the ATP-UART interface and used to handle incoming */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 7 /* messages */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 8 /* */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 9 /* Note: None. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 10 /* */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 11 /* Revision History: */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 12 /* 10/04/01 Pascal Pompei */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 13 /* - Create. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 14 /* */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 15 /* (C) Copyright 2001 by Texas Instruments Incorporated, All Rights Reserved. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 16 /* */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 17 /********************************************************************************/ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 18 #include "atp/atp_i.h" | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 19 #include "atp/atp_uart_i.h" | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 20 #include "rvm/rvm_use_id_list.h" | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 21 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 22 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 23 /********************************************************************************/ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 24 /* */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 25 /* Function Name: atp_uart_handle_msg */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 26 /* */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 27 /* Purpose: This function handles incoming messages available from */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 28 /* the mailbox dedicated to the ATP-UART interface. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 29 /* */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 30 /* Input Parameters: None. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 31 /* */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 32 /* Output Parameters: None. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 33 /* */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 34 /* Global Parameters: None. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 35 /* */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 36 /* Notes: The GSM protocol stack must be started first. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 37 /* Nevertheless, note that incoming data calls are not */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 38 /* supported for now. Moreover, the AT Parser is alerted */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 39 /* that the call is terminated by receiving an 'Ok' or a */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 40 /* 'No Carrier' final result code only. At last, the GSM */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 41 /* protocol stack is initialized by invoking the */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 42 /* following AT commands: */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 43 /* ATE0 : Echo mode switched off, */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 44 /* AT+CFUN=1 : Set Phone Functionality (Full), */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 45 /* AT+COPS=0 : Operator Selection. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 46 /* */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 47 /* Revision History: */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 48 /* 10/04/01 Pascal Pompei */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 49 /* - Create. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 50 /* */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 51 /********************************************************************************/ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 52 T_ATP_UART_ERROR_CODES atp_uart_handle_msg (void) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 53 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 54 /* Declare local variables. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 55 UINT16 event_pending = 0x0000; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 56 UINT32 in_buffer_size = 0x00000000; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 57 BOOLEAN echo_mode_switched_off = FALSE; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 58 BOOLEAN error_occurred = FALSE; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 59 T_ATP_CALLBACK return_path = {0x00, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 60 NULL}; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 61 T_ATP_ENTITY_MODE mode = {CMD_SUPPORT_ON, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 62 TXT_MODE, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 63 COPY_ON}; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 64 T_ATP_SW_ENTITY_NAME name = ATP_GSM_NAME; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 65 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 66 /********************** atp_uart_handle_msg function begins *********************/ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 67 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 68 /* First, wait until the COM port is activated. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 69 while ((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).com_port_handle == INVALID_HANDLE_VALUE) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 70 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 71 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 72 /* Wait for the next event(s) of interest. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 73 event_pending = rvf_wait (ATP_UART_ALL_EVENT_FLAGS, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 74 0x00000000); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 75 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 76 /* If an expected event occurred, then get the associated message from */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 77 /* the mailbox dedicated to the ATP-UART interface. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 78 if (event_pending & ATP_UART_EXPECTED_EVENT) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 79 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 80 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 81 /* Declare a local block variable. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 82 T_RV_HDR *incoming_message_p = NULL; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 83 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 84 /* Get the incoming message from the mailbox dedicated to the */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 85 /* ATP-UART interface. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 86 incoming_message_p = (T_RV_HDR *) rvf_read_mbox (ATP_UART_MAILBOX); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 87 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 88 /* Check whether the incoming message is valid. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 89 if (incoming_message_p == NULL) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 90 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 91 ATP_UART_UNRECOVERABLE_ERROR (RVM_INTERNAL_ERR, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 92 " ATP-UART (handle_msg). Invalid event occurred "); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 93 return (RVM_INTERNAL_ERR); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 94 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 95 switch (incoming_message_p->msg_id) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 96 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 97 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 98 /* 'ATP-UART Open COM Port'. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 99 case ATP_UART_OPEN_COM_PORT: | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 100 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 101 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 102 /* Declare a local block variable. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 103 UINT8 gsm_basic_init_p[] = {'A', 'T', 'E', '0', \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 104 ATP_CR_CHARACTER}; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 105 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 106 /* Open the COM port whose number and baud rate are */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 107 /* specified. If any error occurred, then call the */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 108 /* function used whenever any unrecoverable error */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 109 /* occurs and abort. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 110 if (atp_uart_create_com_port ((unsigned char) (((T_ATP_UART_OPEN_COM_PORT *) (incoming_message_p))->com_port), \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 111 ((T_ATP_UART_OPEN_COM_PORT *) (incoming_message_p))->baud_rate) != RV_OK) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 112 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 113 ATP_UART_UNRECOVERABLE_ERROR (RVM_INTERNAL_ERR, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 114 " ATP-UART (handle_msg). Unable to activate the COM port "); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 115 return (RVM_INTERNAL_ERR); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 116 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 117 rvf_send_trace (" ATP-UART (handle_msg). COM port properly opened ", | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 118 50, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 119 NULL_PARAM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 120 RV_TRACE_LEVEL_DEBUG_LOW, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 121 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 122 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 123 /* Configure the GSM especially not to echo characters */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 124 /* during 'Command State' and 'Online Command State'. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 125 /* If any error occurred, then call the function used */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 126 /* whenever any unrecoverable error occurs and abort. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 127 if (atp_uart_write_com_port (gsm_basic_init_p, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 128 sizeof (gsm_basic_init_p)) != RV_OK) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 129 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 130 ATP_UART_UNRECOVERABLE_ERROR (RVM_INTERNAL_ERR, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 131 " ATP-UART (handle_msg). GSM configuration failed "); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 132 return (RVM_INTERNAL_ERR); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 133 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 134 break; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 135 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 136 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 137 /* Unexpected message. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 138 default: | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 139 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 140 rvf_send_trace (" ATP-UART (handle_msg). Unexpected message received ", | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 141 53, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 142 incoming_message_p->msg_id, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 143 RV_TRACE_LEVEL_WARNING, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 144 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 145 break; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 146 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 147 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 148 (void) rvf_free_buf ((T_RVF_BUFFER *) (incoming_message_p)); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 149 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 150 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 151 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 152 /* Then, wait for the echo mode being switched off. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 153 while (echo_mode_switched_off == FALSE) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 154 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 155 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 156 /* Wait for the next event(s) of interest. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 157 event_pending = rvf_wait (ATP_UART_ALL_EVENT_FLAGS, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 158 0x00000001); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 159 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 160 /* If an expected event occurred, then get the associated message from */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 161 /* the mailbox dedicated to the ATP-UART interface. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 162 if (event_pending & ATP_UART_EXPECTED_EVENT) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 163 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 164 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 165 /* Declare a local block variable. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 166 T_RV_HDR *incoming_message_p = NULL; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 167 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 168 /* Get the incoming message from the mailbox dedicated to the */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 169 /* ATP-UART interface. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 170 incoming_message_p = (T_RV_HDR *) rvf_read_mbox (ATP_UART_MAILBOX); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 171 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 172 /* Check whether the incoming message is valid. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 173 if (incoming_message_p == NULL) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 174 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 175 ATP_UART_UNRECOVERABLE_ERROR (RVM_INTERNAL_ERR, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 176 " ATP-UART (handle_msg). Invalid event occurred "); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 177 return (RVM_INTERNAL_ERR); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 178 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 179 rvf_send_trace (" ATP-UART (handle_msg). Unexpected message received ", | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 180 53, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 181 incoming_message_p->msg_id, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 182 RV_TRACE_LEVEL_WARNING, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 183 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 184 (void) rvf_free_buf ((T_RVF_BUFFER *) (incoming_message_p)); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 185 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 186 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 187 /* Now, attempt forwarding data to the AT Parser. Thus, initialize the */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 188 /* amount of data to be forwarded. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 189 in_buffer_size = (UINT32) (ATP_UART_MAX_PACKET_SIZE - \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 190 (gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).nb_bytes_left); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 191 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 192 /* Then, wait for data from the COM port. If any error occurred, then */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 193 /* abort. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 194 if (atp_uart_read_com_port (&((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).in_buffer_p[(gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).nb_bytes_left]), \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 195 &in_buffer_size) == RV_OK) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 196 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 197 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 198 /* Declare local block variables. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 199 UINT32 in_buffer_begin = 0x00000000; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 200 UINT32 in_buffer_end = 0x00000000; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 201 T_ATP_CMD *cmd_info_p = NULL; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 202 T_ATP_CMD_NB cmd_nb = 0x0000; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 203 T_ATP_CMD_TYPE cmd_type = UNKNOWN; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 204 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 205 /* Send every 'Text Command' to the AT Parser separately. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 206 while (in_buffer_end < in_buffer_size) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 207 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 208 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 209 /* Skip leading <CR> and <LF> characters. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 210 for (in_buffer_begin = in_buffer_end; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 211 (in_buffer_begin < in_buffer_size) && \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 212 (((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).in_buffer_p[in_buffer_begin] == ATP_LF_CHARACTER) || \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 213 ((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).in_buffer_p[in_buffer_begin] == ATP_CR_CHARACTER)); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 214 in_buffer_begin++) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 215 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 216 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 217 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 218 /* Get the 'Text Command' length by searching for the ending */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 219 /* <CR> character. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 220 for (in_buffer_end = in_buffer_begin; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 221 (in_buffer_end < in_buffer_size) && \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 222 ((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).in_buffer_p[in_buffer_end] != ATP_CR_CHARACTER); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 223 in_buffer_end++) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 224 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 225 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 226 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 227 /* Abort whether no ending <CR> character found. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 228 if ((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).in_buffer_p[in_buffer_end] != ATP_CR_CHARACTER) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 229 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 230 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 231 /* Update the number of bytes left. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 232 in_buffer_size -= in_buffer_begin; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 233 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 234 /* Defrag. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 235 memcpy ((void *) ((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).in_buffer_p), | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 236 (void *) (&((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).in_buffer_p[in_buffer_begin])), | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 237 in_buffer_size); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 238 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 239 /* Update the number of bytes left. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 240 (gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).nb_bytes_left = in_buffer_size; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 241 break; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 242 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 243 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 244 /* Otherwise, replace the ending <CR> character by NULL. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 245 /* Indeed, such a 'Text Command' must be a NULL-terminated */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 246 /* string. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 247 (gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).in_buffer_p[in_buffer_end++] = '\x00'; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 248 rvf_send_trace (&((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).in_buffer_p[in_buffer_begin]), | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 249 (UINT8) (in_buffer_end - in_buffer_begin - 0x01), | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 250 NULL_PARAM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 251 RV_TRACE_LEVEL_DEBUG_LOW, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 252 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 253 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 254 /* Check whether the 'Text Command' is a final result code. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 255 if ((atp_translate_txt_to_cmd (&((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).in_buffer_p[in_buffer_begin]), \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 256 UNKNOWN, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 257 &cmd_type, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 258 &cmd_nb, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 259 (gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).atp_id, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 260 &cmd_info_p) == RV_OK) && \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 261 (cmd_type == RESULT_CODE)) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 262 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 263 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 264 /* If needed, de-allocate the command-related information. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 265 if (cmd_info_p != NULL) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 266 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 267 (void) rvf_free_buf ((T_RVF_BUFFER *) (cmd_info_p)); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 268 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 269 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 270 /* Check whether the 'Text Command' corresponds to the 'OK' */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 271 /* final result code. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 272 if (cmd_nb == ATP_OK_NB) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 273 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 274 rvf_send_trace (" ATP-UART (handle_msg). Echo mode switched off ", | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 275 48, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 276 NULL_PARAM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 277 RV_TRACE_LEVEL_DEBUG_LOW, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 278 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 279 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 280 /* The echo mode is properly switched off. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 281 echo_mode_switched_off = TRUE; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 282 break; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 283 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 284 ATP_UART_UNRECOVERABLE_ERROR (RVM_INTERNAL_ERR, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 285 " ATP-UART (handle_msg). Echo mode not switched off "); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 286 return (RVM_INTERNAL_ERR); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 287 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 288 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 289 /* If needed, de-allocate the command-related information. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 290 if (cmd_info_p != NULL) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 291 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 292 (void) rvf_free_buf ((T_RVF_BUFFER *) (cmd_info_p)); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 293 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 294 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 295 continue; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 296 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 297 rvf_send_trace (" ATP-UART (handle_msg). Failed in getting data from the COM port ", | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 298 66, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 299 NULL_PARAM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 300 RV_TRACE_LEVEL_WARNING, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 301 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 302 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 303 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 304 /* At last, initialize the remainder of the return path in order to receive */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 305 /* events from the AT parser. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 306 return_path.addr_id = gbl_atp_uart_ctrl_blk_p->addr_id; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 307 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 308 /* Register the ATP-UART interface to the AT Parser. If any error occurred, */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 309 /* then call the function used whenever any unrecoverable error occurs and */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 310 /* abort. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 311 if (atp_reg (name, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 312 return_path, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 313 mode, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 314 &((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).atp_id)) != RV_OK) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 315 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 316 ATP_UART_UNRECOVERABLE_ERROR (RVM_INTERNAL_ERR, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 317 " ATP-UART (handle_msg). Registration failed "); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 318 return (RVM_INTERNAL_ERR); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 319 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 320 rvf_send_trace (" ATP-UART (handle_msg). Registration completed ", | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 321 48, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 322 NULL_PARAM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 323 RV_TRACE_LEVEL_DEBUG_LOW, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 324 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 325 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 326 /* Now, wait for the next events to be handled as long as no error occurs. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 327 while (error_occurred == FALSE) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 328 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 329 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 330 /* Wait for the next event(s) of interest. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 331 event_pending = rvf_wait (ATP_UART_ALL_EVENT_FLAGS, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 332 0x00000001); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 333 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 334 /* If an expected event occurred, then get the associated message from */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 335 /* the mailbox dedicated to the ATP-UART interface. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 336 if (event_pending & ATP_UART_EXPECTED_EVENT) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 337 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 338 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 339 /* Declare a local block variable. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 340 T_RV_HDR *incoming_message_p = NULL; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 341 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 342 /* Get the incoming message from the mailbox dedicated to the */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 343 /* ATP-UART interface. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 344 incoming_message_p = (T_RV_HDR *) rvf_read_mbox (ATP_UART_MAILBOX); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 345 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 346 /* Check whether the incoming message is valid. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 347 if (incoming_message_p == NULL) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 348 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 349 ATP_UART_UNRECOVERABLE_ERROR (RVM_INTERNAL_ERR, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 350 " ATP-UART (handle_msg). Invalid event occurred "); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 351 return (RVM_INTERNAL_ERR); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 352 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 353 switch (incoming_message_p->msg_id) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 354 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 355 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 356 /* 'ATP Open Port Indication'. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 357 case ATP_OPEN_PORT_IND: | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 358 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 359 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 360 /* Declare local block variables. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 361 T_ATP_PORT_INFO gsm_port_info = {NOT_DEFINED_CONFIG, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 362 ATP_NO_RING_TYPE, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 363 ATP_ALL_THE_SIGNAL_UNMASK, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 364 0x0000}; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 365 T_ATP_NO_COPY_INFO gsm_no_copy_info = {RVF_INVALID_MB_ID, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 366 RVF_INVALID_MB_ID, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 367 TX_HEADER_OFF, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 368 0x00, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 369 0x00, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 370 RX_HEADER_OFF, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 371 0x00, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 372 0x00, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 373 NORMAL_PACKET}; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 374 T_ATP_CUSTOM_FROM_GSM_INFO *gsm_custom_info_p = NULL; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 375 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 376 rvf_send_trace (" ATP-UART (handle_msg). 'ATP Open Port Indication' received ", | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 377 61, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 378 NULL_PARAM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 379 RV_TRACE_LEVEL_DEBUG_MEDIUM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 380 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 381 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 382 /* Set custom information associated with the pseudo */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 383 /* GSM Software Entity. If insufficient resources, then */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 384 /* call the function used whenever any unrecoverable */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 385 /* error occurs and abort. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 386 if (rvf_get_buf (gbl_atp_uart_ctrl_blk_p->mb_id, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 387 sizeof (T_ATP_CUSTOM_FROM_GSM_INFO), \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 388 (T_RVF_BUFFER **) (&gsm_custom_info_p)) == RVF_RED) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 389 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 390 ATP_UART_UNRECOVERABLE_ERROR (RVM_MEMORY_ERR, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 391 " ATP-UART (handle_msg). Insufficient resources "); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 392 return (RVM_MEMORY_ERR); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 393 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 394 gsm_custom_info_p->custom_type = ATP_FROM_GSM_INFO; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 395 gsm_custom_info_p->optimal_gsm_max_packet_size = ATP_UART_MAX_PACKET_SIZE; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 396 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 397 /* Open the virtual modem port with the AT Parser. If */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 398 /* any error occurred, then de-allocate custom */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 399 /* information associated with the pseudo GSM Software */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 400 /* Entity, call the function used whenever any */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 401 /* unrecoverable error occurs and abort. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 402 if (atp_open_port_rsp (((T_ATP_OPEN_PORT_IND *) (incoming_message_p))->initiator_id, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 403 ((T_ATP_OPEN_PORT_IND *) (incoming_message_p))->initiator_port_nb, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 404 (gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).atp_id, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 405 ATP_UART_GSM_PORT_NB, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 406 gsm_port_info, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 407 gsm_no_copy_info, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 408 (T_ATP_CUSTOM_INFO *) (gsm_custom_info_p), \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 409 OPEN_PORT_OK) != RV_OK) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 410 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 411 (void) rvf_free_buf ((T_RVF_BUFFER *) (gsm_custom_info_p)); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 412 ATP_UART_UNRECOVERABLE_ERROR (RVM_INTERNAL_ERR, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 413 " ATP-UART (handle_msg). Unable to open the virtual modem port with the AT Parser "); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 414 return (RVM_INTERNAL_ERR); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 415 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 416 rvf_send_trace (" ATP-UART (handle_msg). Virtual modem port properly established with the AT Parser ", | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 417 84, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 418 NULL_PARAM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 419 RV_TRACE_LEVEL_DEBUG_LOW, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 420 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 421 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 422 /* The virtual modem port opened with the AT Parser is */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 423 /* now properly initialized. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 424 (gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).virtual_modem_port_established = TRUE; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 425 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 426 /* If needed, de-allocate custom information contained */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 427 /* in the 'ATP Open Port Indication'. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 428 if (((T_ATP_OPEN_PORT_IND *) incoming_message_p)->custom_info_p != NULL) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 429 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 430 rvf_free_buf ((T_RVF_BUFFER *) (((T_ATP_OPEN_PORT_IND *) (incoming_message_p))->custom_info_p)); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 431 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 432 break; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 433 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 434 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 435 /* 'ATP Text Command Ready'. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 436 case ATP_TXT_CMD_RDY: | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 437 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 438 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 439 /* Declare local block variables. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 440 UINT8 txt_cmd_length = 0x00; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 441 T_ATP_TXT_CMD_RDY *txt_cmd_rdy_p = (T_ATP_TXT_CMD_RDY *) (incoming_message_p); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 442 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 443 rvf_send_trace (" ATP-UART (handle_msg). 'ATP Text Command Ready' received ", | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 444 59, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 445 NULL_PARAM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 446 RV_TRACE_LEVEL_DEBUG_MEDIUM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 447 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 448 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 449 /* If any error occurred, then abort. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 450 if ((txt_cmd_rdy_p->port_nb != ATP_UART_GSM_PORT_NB) || \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 451 (txt_cmd_rdy_p->txt_cmd_p == NULL)) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 452 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 453 rvf_send_trace (" ATP-UART (handle_msg). 'Text Command' transfer failed ", | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 454 56, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 455 NULL_PARAM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 456 RV_TRACE_LEVEL_WARNING, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 457 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 458 break; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 459 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 460 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 461 /* Get the length of the 'Text Command'. Note that such */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 462 /* a 'Text Command' is a NULL-terminated string. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 463 txt_cmd_length = (UINT8) (strlen (txt_cmd_rdy_p->txt_cmd_p)); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 464 rvf_send_trace (txt_cmd_rdy_p->txt_cmd_p, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 465 txt_cmd_length, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 466 NULL_PARAM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 467 RV_TRACE_LEVEL_DEBUG_LOW, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 468 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 469 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 470 /* Forward the 'Text Command' to the COM port. If any */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 471 /* error occurred, then proceed. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 472 txt_cmd_rdy_p->txt_cmd_p[txt_cmd_length] = ATP_CR_CHARACTER; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 473 if (atp_uart_write_com_port ((UINT8 *) (txt_cmd_rdy_p->txt_cmd_p), \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 474 (txt_cmd_length + 0x00000001)) != RV_OK) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 475 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 476 rvf_send_trace (" ATP-UART (handle_msg). 'Text Command' transfer failed ", | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 477 56, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 478 NULL_PARAM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 479 RV_TRACE_LEVEL_WARNING, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 480 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 481 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 482 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 483 /* De-allocate the data buffer provided with the 'ATP */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 484 /* Command Ready'. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 485 (void) rvf_free_buf ((T_RVF_BUFFER *) (txt_cmd_rdy_p->txt_cmd_p)); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 486 break; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 487 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 488 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 489 /* 'ATP No Copy Data Ready'. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 490 case ATP_NO_COPY_DATA_RDY: | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 491 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 492 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 493 /* Declare a local block variable. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 494 T_ATP_NO_COPY_DATA_RDY *no_copy_data_rdy_p = (T_ATP_NO_COPY_DATA_RDY *) (incoming_message_p); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 495 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 496 rvf_send_trace (" ATP-UART (handle_msg). 'ATP No Copy Data Ready' received ", | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 497 59, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 498 NULL_PARAM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 499 RV_TRACE_LEVEL_DEBUG_MEDIUM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 500 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 501 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 502 /* If any error occurred, then abort. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 503 if ((no_copy_data_rdy_p->port_nb != ATP_UART_GSM_PORT_NB) || \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 504 (no_copy_data_rdy_p->atp_buffer_p == NULL)) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 505 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 506 rvf_send_trace (" ATP-UART (handle_msg). Data transfer to the COM port failed ", | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 507 62, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 508 NULL_PARAM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 509 RV_TRACE_LEVEL_WARNING, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 510 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 511 break; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 512 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 513 rvf_send_trace (" ATP-UART (handle_msg). Data size ", | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 514 35, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 515 no_copy_data_rdy_p->buffer_size, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 516 RV_TRACE_LEVEL_DEBUG_LOW, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 517 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 518 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 519 /* Forward data to the COM port. If any error occurred, */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 520 /* then proceed. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 521 if (atp_uart_write_com_port (no_copy_data_rdy_p->atp_buffer_p, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 522 no_copy_data_rdy_p->buffer_size) != RV_OK) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 523 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 524 rvf_send_trace (" ATP-UART (handle_msg). Data transfer to the COM port failed ", | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 525 62, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 526 NULL_PARAM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 527 RV_TRACE_LEVEL_WARNING, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 528 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 529 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 530 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 531 /* De-allocate the data buffer provided with the 'ATP */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 532 /* No Copy Data Ready'. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 533 (void) rvf_free_buf ((T_RVF_BUFFER *) (no_copy_data_rdy_p->atp_buffer_p)); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 534 break; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 535 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 536 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 537 /* 'ATP Signal Changed'. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 538 case ATP_SIGNAL_CHANGED: | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 539 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 540 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 541 /* Declare a local block variable. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 542 T_ATP_SIGNAL_CHANGED *signal_changed_p = (T_ATP_SIGNAL_CHANGED *) (incoming_message_p); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 543 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 544 rvf_send_trace (" ATP-UART (handle_msg). 'ATP Signal Changed' received ", | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 545 55, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 546 NULL_PARAM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 547 RV_TRACE_LEVEL_DEBUG_MEDIUM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 548 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 549 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 550 /* If any error occurred, then abort. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 551 if (signal_changed_p->port_nb != ATP_UART_GSM_PORT_NB) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 552 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 553 rvf_send_trace (" ATP-UART (handle_msg). Invalid port number ", | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 554 45, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 555 NULL_PARAM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 556 RV_TRACE_LEVEL_WARNING, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 557 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 558 break; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 559 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 560 rvf_send_trace (" ATP-UART (handle_msg). Bit mask ", | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 561 34, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 562 signal_changed_p->signal, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 563 RV_TRACE_LEVEL_DEBUG_LOW, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 564 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 565 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 566 /* Update the RS232 control signals associated with the */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 567 /* virtual modem port. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 568 (gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).control_signals = signal_changed_p->signal; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 569 break; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 570 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 571 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 572 /* 'ATP Port Mode Changed'. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 573 case ATP_PORT_MODE_CHANGED: | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 574 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 575 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 576 /* Declare a local block variable. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 577 T_ATP_PORT_MODE_CHANGED *port_mode_changed_p = (T_ATP_PORT_MODE_CHANGED *) (incoming_message_p); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 578 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 579 rvf_send_trace (" ATP-UART (handle_msg). 'ATP Port Mode Changed' received ", | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 580 58, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 581 NULL_PARAM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 582 RV_TRACE_LEVEL_DEBUG_MEDIUM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 583 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 584 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 585 /* If any error occurred, then abort. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 586 if (port_mode_changed_p->port_nb != ATP_UART_GSM_PORT_NB) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 587 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 588 rvf_send_trace (" ATP-UART (handle_msg). Invalid port number ", | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 589 45, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 590 NULL_PARAM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 591 RV_TRACE_LEVEL_WARNING, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 592 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 593 break; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 594 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 595 rvf_send_trace (" ATP-UART (handle_msg). Mode ", | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 596 30, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 597 port_mode_changed_p->mode, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 598 RV_TRACE_LEVEL_DEBUG_LOW, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 599 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 600 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 601 /* If the virtual modem port is in 'Data' mode, then */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 602 /* send the escape sequence first. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 603 if ((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).virtual_modem_port_mode == ATP_PORT_DATA_MODE) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 604 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 605 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 606 /* Forward the escape sequence to the COM port. If */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 607 /* any error occurred, then call the function used */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 608 /* whenever any unrecoverable error occurs and */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 609 /* abort. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 610 if (atp_uart_write_com_port ((UINT8 *) (ATP_ESCAPE_SEQUENCE), \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 611 (sizeof (ATP_ESCAPE_SEQUENCE) - 0x00000001)) != RV_OK) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 612 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 613 ATP_UART_UNRECOVERABLE_ERROR (RVM_INTERNAL_ERR, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 614 " ATP-UART (handle_msg). 'Escape sequence' not transmitted "); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 615 return (RVM_INTERNAL_ERR); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 616 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 617 rvf_send_trace (" ATP-UART (handle_msg). 'Escape sequence' properly transmitted ", | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 618 64, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 619 NULL_PARAM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 620 RV_TRACE_LEVEL_DEBUG_LOW, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 621 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 622 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 623 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 624 /* Update the mode of the virtual modem port. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 625 (gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).virtual_modem_port_mode = port_mode_changed_p->mode; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 626 break; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 627 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 628 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 629 /* 'ATP Port Closed'. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 630 case ATP_PORT_CLOSED: | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 631 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 632 rvf_send_trace (" ATP-UART (handle_msg). 'ATP Port Closed' received ", | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 633 52, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 634 NULL_PARAM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 635 RV_TRACE_LEVEL_DEBUG_MEDIUM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 636 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 637 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 638 /* If any error occurred, then abort. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 639 if (((T_ATP_PORT_CLOSED *) (incoming_message_p))->port_nb != ATP_UART_GSM_PORT_NB) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 640 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 641 rvf_send_trace (" ATP-UART (handle_msg). Invalid port number ", | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 642 45, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 643 NULL_PARAM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 644 RV_TRACE_LEVEL_WARNING, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 645 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 646 break; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 647 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 648 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 649 /* The virtual modem port opened with the AT Parser is */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 650 /* now closed. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 651 (gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).virtual_modem_port_established = FALSE; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 652 break; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 653 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 654 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 655 /* 'ATP-UART Start GSM'. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 656 case ATP_UART_START_GSM: | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 657 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 658 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 659 /* Declare a local block variable. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 660 UINT8 gsm_init_p[] = {'A', 'T', '+', 'C', 'F', 'U', 'N', '=', '1', ';', '+', 'C', 'O', 'P', 'S', '=', '0', \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 661 ATP_CR_CHARACTER}; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 662 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 663 rvf_send_trace (" ATP-UART (handle_msg). 'ATP-UART Start GSM' received ", | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 664 55, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 665 NULL_PARAM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 666 RV_TRACE_LEVEL_DEBUG_MEDIUM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 667 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 668 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 669 /* If any error occurred, then abort. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 670 if (atp_uart_write_com_port (gsm_init_p, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 671 sizeof (gsm_init_p)) != RV_OK) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 672 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 673 rvf_send_trace (" ATP-UART (handle_msg). Unable to start the GSM protocol stack ", | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 674 64, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 675 NULL_PARAM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 676 RV_TRACE_LEVEL_WARNING, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 677 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 678 break; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 679 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 680 break; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 681 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 682 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 683 /* Unexpected message. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 684 default: | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 685 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 686 rvf_send_trace (" ATP-UART (handle_msg). Unexpected message received ", | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 687 53, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 688 incoming_message_p->msg_id, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 689 RV_TRACE_LEVEL_WARNING, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 690 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 691 break; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 692 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 693 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 694 (void) rvf_free_buf ((T_RVF_BUFFER *) (incoming_message_p)); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 695 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 696 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 697 /* Now, if the flow control is activated, then proceed without getting */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 698 /* any data from the COM port. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 699 if (((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).control_signals & ATP_RX_FLOW_UNMASK) == ATP_RX_FLOW_ON) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 700 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 701 continue; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 702 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 703 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 704 /* Otherwise, attempt forwarding data to the AT Parser. Thus, */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 705 /* initialize the amount of data to be forwarded. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 706 in_buffer_size = (UINT32) (ATP_UART_MAX_PACKET_SIZE - \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 707 (gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).nb_bytes_left); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 708 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 709 /* Then, wait for data from the COM port. If any error occurred, then */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 710 /* abort. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 711 if (atp_uart_read_com_port (&((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).in_buffer_p[(gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).nb_bytes_left]), \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 712 &in_buffer_size) != RV_OK) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 713 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 714 rvf_send_trace (" ATP-UART (handle_msg). Failed in getting data from the COM port ", | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 715 66, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 716 NULL_PARAM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 717 RV_TRACE_LEVEL_WARNING, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 718 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 719 continue; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 720 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 721 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 722 /* Take new data into account. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 723 in_buffer_size = (UINT32) ((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).nb_bytes_left + \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 724 in_buffer_size); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 725 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 726 /* If no virtual modem port established with the AT Parser or if no */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 727 /* data pending for transmission to the AT Parser, then update the */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 728 /* number of bytes left and proceed. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 729 if (((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).virtual_modem_port_established == FALSE) || \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 730 (in_buffer_size == 0x00000000)) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 731 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 732 (gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).nb_bytes_left = in_buffer_size; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 733 continue; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 734 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 735 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 736 /* Otherwise, re-initialize the number of bytes left. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 737 (gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).nb_bytes_left = 0x00000000; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 738 rvf_send_trace (" ATP-UART (handle_msg). Get data from the COM port ", | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 739 52, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 740 in_buffer_size, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 741 RV_TRACE_LEVEL_DEBUG_LOW, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 742 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 743 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 744 /* At last, depending on the mode, transfert data from the COM port as */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 745 /* 'Text Command' or 'Data'. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 746 if ((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).virtual_modem_port_mode == ATP_PORT_CMD_MODE) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 747 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 748 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 749 /* Declare local block variables. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 750 UINT32 in_buffer_begin = 0x00000000; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 751 UINT32 in_buffer_end = 0x00000000; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 752 T_ATP_CMD *cmd_info_p = NULL; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 753 T_ATP_CMD_NB cmd_nb = 0x0000; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 754 T_ATP_TXT_CMD txt_cmd_p = NULL; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 755 T_ATP_CMD_TYPE cmd_type = UNKNOWN; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 756 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 757 /* Send every 'Text Command' to the AT Parser separately. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 758 while (in_buffer_end < in_buffer_size) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 759 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 760 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 761 /* Skip leading <CR> and <LF> characters. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 762 for (in_buffer_begin = in_buffer_end; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 763 (in_buffer_begin < in_buffer_size) && \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 764 (((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).in_buffer_p[in_buffer_begin] == ATP_LF_CHARACTER) || \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 765 ((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).in_buffer_p[in_buffer_begin] == ATP_CR_CHARACTER)); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 766 in_buffer_begin++) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 767 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 768 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 769 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 770 /* Get the 'Text Command' length by searching for the ending */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 771 /* <CR> character. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 772 for (in_buffer_end = in_buffer_begin; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 773 (in_buffer_end < in_buffer_size) && \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 774 ((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).in_buffer_p[in_buffer_end] != ATP_CR_CHARACTER); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 775 in_buffer_end++) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 776 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 777 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 778 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 779 /* Abort whether no ending <CR> character found. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 780 if ((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).in_buffer_p[in_buffer_end] != ATP_CR_CHARACTER) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 781 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 782 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 783 /* Update the number of bytes left. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 784 in_buffer_size -= in_buffer_begin; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 785 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 786 /* Defrag. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 787 memcpy ((void *) ((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).in_buffer_p), | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 788 (void *) (&((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).in_buffer_p[in_buffer_begin])), | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 789 in_buffer_size); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 790 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 791 /* Update the number of bytes left. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 792 (gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).nb_bytes_left = in_buffer_size; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 793 break; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 794 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 795 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 796 /* Otherwise, replace the ending <CR> character by NULL. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 797 /* Indeed, such a 'Text Command' must be a NULL-terminated */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 798 /* string. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 799 (gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).in_buffer_p[in_buffer_end++] = '\x00'; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 800 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 801 /* Allocate memory in order to forward the 'Text Command' to */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 802 /* the AT Parser. If insufficient resources, then call the */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 803 /* function used whenever any unrecoverable error occurs and */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 804 /* abort. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 805 if (rvf_get_buf (gbl_atp_uart_ctrl_blk_p->mb_id, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 806 (in_buffer_end - in_buffer_begin), \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 807 (T_RVF_BUFFER **) (&txt_cmd_p)) == RVF_RED) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 808 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 809 ATP_UART_UNRECOVERABLE_ERROR (RVM_MEMORY_ERR, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 810 " ATP-UART (handle_msg). Insufficient resources "); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 811 break; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 812 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 813 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 814 /* Copy the 'Text Command'. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 815 memcpy ((void *) (txt_cmd_p), | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 816 (void *) (&((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).in_buffer_p[in_buffer_begin])), | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 817 (in_buffer_end - in_buffer_begin)); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 818 rvf_send_trace (txt_cmd_p, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 819 (UINT8) (in_buffer_end - in_buffer_begin - 0x01), | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 820 NULL_PARAM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 821 RV_TRACE_LEVEL_DEBUG_LOW, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 822 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 823 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 824 /* Check whether the 'Text Command' is a final or an */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 825 /* unsolicited result code. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 826 if ((atp_translate_txt_to_cmd (txt_cmd_p, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 827 UNKNOWN, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 828 &cmd_type, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 829 &cmd_nb, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 830 (gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).atp_id, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 831 &cmd_info_p) == RV_OK) && \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 832 (cmd_type == RESULT_CODE)) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 833 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 834 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 835 /* If the 'Text Command' corresponds to the 'Connect' final */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 836 /* result code, then turn the 'Data Carrier Detect' on */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 837 /* before sending it to the AT Parser (See ITU-T */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 838 /* Recommendation V.250 ter page 32). If any error */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 839 /* occurred, then de-allocate the 'Text Command' and abort. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 840 if (cmd_nb == ATP_CONNECT_NB) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 841 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 842 if (atp_set_signal ((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).atp_id, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 843 ATP_UART_GSM_PORT_NB, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 844 ATP_DCD_1, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 845 ATP_DCD_UNMASK) != RV_OK) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 846 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 847 (void) rvf_free_buf ((T_RVF_BUFFER *) (txt_cmd_p)); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 848 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 849 /* If needed, de-allocate the command-related */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 850 /* information. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 851 if (cmd_info_p != NULL) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 852 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 853 (void) rvf_free_buf ((T_RVF_BUFFER *) (cmd_info_p)); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 854 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 855 rvf_send_trace (" ATP-UART (handle_msg). 'Data Carrier Detect' not turned on ", | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 856 61, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 857 NULL_PARAM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 858 RV_TRACE_LEVEL_WARNING, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 859 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 860 break; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 861 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 862 rvf_send_trace (" ATP-UART (handle_msg). 'Data Carrier Detect' properly turned on ", | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 863 66, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 864 NULL_PARAM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 865 RV_TRACE_LEVEL_DEBUG_LOW, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 866 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 867 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 868 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 869 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 870 /* Otherwise, the 'Text Command' is recognized as a preliminary */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 871 /* result code. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 872 else | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 873 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 874 cmd_type = PRELIMINARY_RESULT_CODE; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 875 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 876 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 877 /* If needed, de-allocate the command-related information. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 878 if (cmd_info_p != NULL) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 879 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 880 (void) rvf_free_buf ((T_RVF_BUFFER *) (cmd_info_p)); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 881 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 882 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 883 /* Forward the 'Text Command' to the AT Parser. If any error */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 884 /* occurred, then de-allocate the 'Text Command' and abort. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 885 if (atp_send_txt_cmd ((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).atp_id, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 886 ATP_UART_GSM_PORT_NB, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 887 cmd_type, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 888 txt_cmd_p) != RV_OK) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 889 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 890 (void) rvf_free_buf ((T_RVF_BUFFER *) (txt_cmd_p)); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 891 rvf_send_trace (" ATP-UART (handle_msg). 'Text Command' failed ", | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 892 47, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 893 NULL_PARAM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 894 RV_TRACE_LEVEL_WARNING, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 895 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 896 break; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 897 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 898 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 899 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 900 else | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 901 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 902 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 903 /* Declare local block variables. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 904 UINT8 no_carrier_count = 0x00; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 905 UINT8 no_carrier_p[] = {ATP_CR_CHARACTER, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 906 ATP_LF_CHARACTER, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 907 'N', 'O', ' ', 'C', 'A', 'R', 'R', 'I', 'E', 'R', \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 908 ATP_CR_CHARACTER, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 909 ATP_LF_CHARACTER}; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 910 UINT8 ok_count = 0x00; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 911 UINT8 ok_p[] = {ATP_CR_CHARACTER, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 912 ATP_LF_CHARACTER, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 913 'O', 'K', \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 914 ATP_CR_CHARACTER, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 915 ATP_LF_CHARACTER}; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 916 UINT32 in_buffer_count = 0x00000000; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 917 UINT32 in_data_size = 0x00000000; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 918 T_ATP_CMD_NB result_code_nb = ATP_MAX_NB_OF_RESULT_CODES; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 919 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 920 /* First, search for 'Ok' or 'No Carrier' final result codes. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 921 for (in_buffer_count = 0x00000000, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 922 in_data_size = in_buffer_size; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 923 in_buffer_count < in_buffer_size; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 924 in_buffer_count++) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 925 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 926 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 927 /* Search for an 'Ok' final result code. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 928 if ((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).in_buffer_p[in_buffer_count] == ok_p[ok_count]) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 929 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 930 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 931 /* 'Ok' final result code detected. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 932 if (++ok_count == sizeof (ok_p)) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 933 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 934 result_code_nb = ATP_OK_NB; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 935 rvf_send_trace (" ATP-UART (handle_msg). 'Ok' final result code detected ", | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 936 57, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 937 NULL_PARAM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 938 RV_TRACE_LEVEL_DEBUG_LOW, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 939 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 940 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 941 /* Send the remainder to the AT Parser. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 942 in_data_size = in_buffer_count - (sizeof (ok_p) - 0x00000001); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 943 break; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 944 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 945 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 946 else | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 947 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 948 ok_count = 0x00; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 949 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 950 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 951 /* Search for a 'No Carrier' final result code. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 952 if ((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).in_buffer_p[in_buffer_count] == no_carrier_p[no_carrier_count]) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 953 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 954 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 955 /* 'No Carrier' final result code detected. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 956 if (++no_carrier_count == sizeof (no_carrier_p)) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 957 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 958 result_code_nb = ATP_NO_CARRIER_NB; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 959 rvf_send_trace (" ATP-UART (handle_msg). 'No Carrier' final result code detected ", | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 960 65, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 961 NULL_PARAM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 962 RV_TRACE_LEVEL_DEBUG_LOW, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 963 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 964 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 965 /* Send the remainder to the AT Parser. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 966 in_data_size = in_buffer_count - (sizeof (no_carrier_p) - 0x00000001); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 967 break; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 968 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 969 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 970 else | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 971 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 972 no_carrier_count = 0x00; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 973 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 974 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 975 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 976 /* Then, check for some bytes to be forwarded data to the AT */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 977 /* Parser. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 978 if (in_data_size > 0x00000000) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 979 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 980 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 981 /* Forward data to the AT Parser. If any error occurred, then */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 982 /* proceed. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 983 if (atp_send_data ((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).atp_id, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 984 ATP_UART_GSM_PORT_NB, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 985 (void *) ((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).in_buffer_p), \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 986 in_data_size, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 987 &((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).nb_bytes_left)) != RV_OK) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 988 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 989 rvf_send_trace (" ATP-UART (handle_msg). Data transfer to the AT Parser failed ", | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 990 63, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 991 NULL_PARAM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 992 RV_TRACE_LEVEL_WARNING, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 993 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 994 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 995 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 996 /* Update the number of bytes left. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 997 in_data_size -= (gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).nb_bytes_left; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 998 in_buffer_size -= in_data_size; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 999 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1000 /* Check whether some bytes left to be sent to the AT Parser. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1001 if ((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).nb_bytes_left > 0x00000000) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1002 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1003 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1004 /* Defrag. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1005 memcpy ((void *) ((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).in_buffer_p), | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1006 (void *) (&((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).in_buffer_p[in_data_size])), | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1007 in_buffer_size); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1008 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1009 /* Update the number of bytes left. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1010 (gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).nb_bytes_left = in_buffer_size; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1011 continue; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1012 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1013 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1014 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1015 /* At last, check whether an 'Ok' or a 'No Carrier' final result */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1016 /* code was detected. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1017 if (result_code_nb != ATP_MAX_NB_OF_RESULT_CODES) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1018 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1019 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1020 /* Turn the 'Data Carrier Detect' off before sending it to the */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1021 /* AT Parser (See ITU-T Recommendation V.250 ter page 37). */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1022 /* However, proceed whether any error occurred. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1023 if (((atp_set_signal ((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).atp_id, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1024 ATP_UART_GSM_PORT_NB, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1025 ATP_DCD_0, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1026 ATP_DCD_UNMASK) != RV_OK) || \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1027 (atp_send_cmd ((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).atp_id, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1028 ATP_UART_GSM_PORT_NB, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1029 RESULT_CODE, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1030 result_code_nb, \ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1031 NULL) != RV_OK))) | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1032 { | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1033 rvf_send_trace (" ATP-UART (handle_msg). Final result code not transmitted ", | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1034 59, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1035 NULL_PARAM, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1036 RV_TRACE_LEVEL_WARNING, | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1037 ATP_USE_ID); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1038 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1039 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1040 /* Update the number of bytes left. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1041 in_buffer_size -= in_buffer_count; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1042 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1043 /* Update the mode of the virtual modem port. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1044 (gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).virtual_modem_port_mode = ATP_PORT_CMD_MODE; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1045 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1046 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1047 /* If some data left, then defrag. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1048 memcpy ((void *) ((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).in_buffer_p), | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1049 (void *) (&((gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).in_buffer_p[in_buffer_count])), | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1050 in_buffer_size); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1051 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1052 /* Update the number of bytes left. */ | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1053 (gbl_atp_uart_ctrl_blk_p->conn_ctrl_blk).nb_bytes_left = in_buffer_size; | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1054 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1055 } | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1056 return (RVM_OK); | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1057 | 
| 
509db1a7b7b8
initial import: leo2moko-r1
 Space Falcon <falcon@ivan.Harhan.ORG> parents: diff
changeset | 1058 } /********************* End of atp_uart_handle_msg function ********************/ | 
