FreeCalypso > hg > fc-magnetite
diff src/aci2/aci/ati_io.c @ 3:93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
author | Mychaela Falconia <falcon@freecalypso.org> |
---|---|
date | Mon, 26 Sep 2016 00:29:36 +0000 |
parents | |
children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/src/aci2/aci/ati_io.c Mon Sep 26 00:29:36 2016 +0000 @@ -0,0 +1,533 @@ +/* ++----------------------------------------------------------------------------- +| Project : GSM-F&D (8411) +| Modul : ATI ++----------------------------------------------------------------------------- +| Copyright 2002 Texas Instruments Berlin, AG +| All rights reserved. +| +| This file is confidential and a trade secret of Texas +| Instruments Berlin, AG +| The receipt of or possession of this file does not convey +| any rights to reproduce or disclose its contents or to +| manufacture, use, or sell anything it may describe, in +| whole, or in part, without the specific written consent of +| Texas Instruments Berlin, AG. ++----------------------------------------------------------------------------- +| Purpose : ++----------------------------------------------------------------------------- +*/ + +#ifndef ATI_IO_C +#define ATI_IO_C + +#undef DUMMY_ATI_STRINGS + +#include "aci_all.h" +#include "aci.h" +#ifdef UART +#include "dti.h" /* functionality of the dti library */ +#endif +#include "aci_cmh.h" +#include "ati_cmd.h" +#include "aci_io.h" +#include "aci_cmd.h" +#include "l4_tim.h" + +#include "aci_lst.h" + +#ifdef UART +#include "dti_conn_mng.h" +#include "psa_uart.h" +#include "cmh_uart.h" +#endif + +#include "ati_io.h" +#include "aci_mem.h" +#include "aci_fd.h" +#include "psa.h" +#include "cmh.h" + +#include "cmh_cc.h" +#include "psa_cc.h" + +#include "ati_int.h" + +#if !defined (STRACE_LEN) + #define STRACE_LEN 80 +#endif + +#define LIST_MAX_LENGTH 30 + +/* ++--------------------------------------------------------------------+ +| PROJECT : GSM-F&D (8411) MODULE : ACI_CMD | +| STATE : code ROUTINE : io_SendMessage | ++--------------------------------------------------------------------+ + + PURPOSE : +*/ + +GLOBAL void io_sendMessage(UBYTE srcId, CHAR *msg, + T_ATI_OUTPUT_TYPE output_type) +{ + T_ATI_SRC_PARAMS *src_params; + + src_params = find_element (ati_src_list, srcId, search_ati_src_id); + if (src_params EQ NULL) + { + TRACE_EVENT_P1 ("[ERR] io_sendMessage: srcId=%d not found", srcId); + return; + } + if (IS_INDICATION_OUTPUT (output_type)) + { + io_sendIndication(srcId, msg, output_type); + return; + } + else if (!IS_ECHO_OUTPUT ( output_type)) /* ECHO_OUTPUT must not be terminated */ + { /* with CRLF, see definition in ati_cmh.h */ + output_type |= ATI_END_CRLF_OUTPUT; + } + + if (src_params->result_cb NEQ NULL) + { + src_params->result_cb (srcId, output_type, + (UBYTE*)msg, (USHORT)strlen (msg)); + } + else + { + TRACE_EVENT_P1 ("[WRN] io_sendMessage: no result callback srcId=%d", + srcId); + + if ( (strlen (msg)) >= STRACE_LEN ) + { + /* terminate traced string if too long */ + msg[STRACE_LEN-1] = '\0'; + } + + TRACE_EVENT_P1 ("%s", msg); + } +} + + +/* ++--------------------------------------------------------------------+ +| PROJECT : GSM-F&D (8411) MODULE : ACI_CMD | +| STATE : code ROUTINE : io_SendMessageEx | ++--------------------------------------------------------------------+ + + PURPOSE : +*/ + +GLOBAL BOOL check_should_buffer_ind(T_ATI_SRC_PARAMS *src_params) +{ + + switch(src_params->buff_uns_mode) + { + case(NO_BUFF): + break; + + case(BUFF_TYPING): + if(src_params->cmd_state EQ CMD_TYPING) + { + TRACE_EVENT("check_should_buffer_ind(): cmd_state EQ CMD_TYPING"); + return(TRUE); + } + break; + + case(BUFF_RUNNING): + if(src_params->cmd_state NEQ CMD_IDLE ) + { + TRACE_EVENT("check_should_buffer_ind(): cmd_state NEQ CMD_IDLE"); + return(TRUE); + } + break; + } + return(FALSE); +} + +LOCAL void buffer_indication( T_ATI_SRC_PARAMS *src_params, + CHAR *msg, + T_ATI_OUTPUT_TYPE output_type ) +{ + T_ATI_INDIC_BUFF *buff_indic_elem; + CHAR *output; + + if(src_params->indication_buffer EQ NULL) + { + src_params->indication_buffer = new_list (); + } + + ACI_MALLOC(output, (USHORT)(strlen(msg)+1)); + memcpy(output, msg, (USHORT)(strlen(msg)+1)); + + ACI_MALLOC( buff_indic_elem, sizeof(T_ATI_INDIC_BUFF) ); + buff_indic_elem->output = output; + buff_indic_elem->output_type = output_type; + /* if list count is the maximum then the available elements are reused*/ + if(get_list_count(src_params->indication_buffer) >= LIST_MAX_LENGTH) + { + insert_shift_list(src_params->indication_buffer, buff_indic_elem); + } + else + { + insert_list( src_params->indication_buffer, buff_indic_elem); + } + + if ( (strlen (msg)) >= STRACE_LEN ) + { + /* terminate traced string if too long */ + msg[STRACE_LEN-1] = '\0'; + } + + TRACE_EVENT_P2("buffering on src %d: %s", src_params->src_id, msg); +} + +GLOBAL void io_sendMessageEx (UBYTE srcId, CHAR *msg, + T_ATI_OUTPUT_TYPE output_type) +{ + T_ATI_SRC_PARAMS *src_params; + + src_params = find_element (ati_src_list, srcId, search_ati_src_id); + if (src_params EQ NULL) + { + TRACE_EVENT_P1 ("[ERR] io_sendMessageEx: srcId=%d not found", srcId); + return; + } + + /* + * ATQ suppesses intermidiate, final and unsolicited result codes. + * Only information text in responce to commands is not affected. + */ + if(IS_CONFIRM_OUTPUT(output_type)) + { + io_setCommandState(src_params, ATI_LINE_STATE_END); + } + + if (ati_user_output_cfg[srcId].atQ) + { + if(! IS_NORMAL_OUTPUT(output_type) AND ! IS_ECHO_OUTPUT(output_type)) + { + return; + } + } + +if ( IS_INDICATION_OUTPUT (output_type) + AND check_should_buffer_ind(src_params) ) + { + buffer_indication( src_params, msg, output_type ); + return; + } + + if (src_params->result_cb NEQ NULL) + { + src_params->result_cb (srcId, output_type, + (UBYTE*)msg, (USHORT)strlen (msg)); + } + else + { + TRACE_EVENT_P1 ("[WRN] io_sendMessageEx: no result callback srcId=%d", + srcId); + + if ( (strlen (msg)) >= STRACE_LEN ) + { + /* terminate traced string if too long */ + msg[STRACE_LEN-1] = '\0'; + } + + TRACE_EVENT_P1 ("%s", msg); + } +} + +/* ++--------------------------------------------------------------------+ +| PROJECT : GSM-F&D (8411) MODULE : ACI_CMD | +| STATE : code ROUTINE : io_SendIndication | ++--------------------------------------------------------------------+ + + PURPOSE : +*/ + +GLOBAL void io_sendIndication(UBYTE srcId, CHAR *msg, + T_ATI_OUTPUT_TYPE output_type) +{ + T_ATI_SRC_PARAMS *src_params = find_element (ati_src_list, srcId, search_ati_src_id); + + if (src_params EQ NULL) + { + TRACE_EVENT_P1 ("[ERR] io_sendIndication: srcId=%d not found", srcId); + return; + } + + /* + * ATQ suppesses intermidiate, final and unsolicited result codes. + * Only information text in responce to commands is not affected. + */ + if (ati_user_output_cfg[srcId].atQ) + { + return; + } + + output_type |= ATI_INDICATION_OUTPUT | + ATI_BEGIN_CRLF_OUTPUT | + ATI_END_CRLF_OUTPUT; + + if ( check_should_buffer_ind(src_params) ) + { + buffer_indication( src_params, msg, output_type ); + return; + } + if (src_params->result_cb NEQ NULL) + { + src_params->result_cb (srcId, output_type, + (UBYTE*)msg, (USHORT)strlen (msg)); + } + else + { + TRACE_EVENT_P1 ("[WRN] io_sendIndication: no result callback srcId=%d", + srcId); + + if ( (strlen (msg)) >= STRACE_LEN ) + { + /* terminate traced string if too long */ + msg[STRACE_LEN-1] = '\0'; + } + + TRACE_EVENT_P1 ("%s", msg); + } +} + + + +/* ++--------------------------------------------------------------------+ +| PROJECT : GSM-F&D (8411) MODULE : ACI_CMD | +| STATE : code ROUTINE : io_sendConfirm | ++--------------------------------------------------------------------+ + + PURPOSE : output to AT interface +*/ + +GLOBAL void send_buffered_indication( T_ATI_SRC_PARAMS *src_params ) +{ + BOOL go_on = TRUE; + T_ATI_INDIC_BUFF *indic = src_params->indication_buffer; /* to be sure it's not NULL */ + + TRACE_EVENT_P1("send buffered indications for source: %d", src_params->src_id); + while( go_on ) + { + indic = remove_first_element( src_params->indication_buffer ); + + if( indic NEQ NULL ) + { + io_sendIndication( src_params->src_id, + indic->output, + indic->output_type ); + ACI_MFREE( indic->output ); + ACI_MFREE( indic ); + } + else + { + ACI_MFREE( src_params->indication_buffer ); + src_params->indication_buffer = NULL; + go_on = FALSE; + } + } +} + +GLOBAL void io_sendConfirm(UBYTE srcId, CHAR *msg, + T_ATI_OUTPUT_TYPE output_type) +{ + BOOL is_CONNECT = FALSE; + T_ATI_SRC_PARAMS *src_params = find_element (ati_src_list, srcId, search_ati_src_id); + + TRACE_FUNCTION("io_sendConfirm()"); + + if (src_params EQ NULL) + { + TRACE_EVENT_P1 ("[ERR] io_sendConfirm: srcId=%d not found", srcId); + return; + } + + if (BITFIELD_CHECK (output_type, ATI_CONNECT_OUTPUT)) + { + is_CONNECT = TRUE; + BITFIELD_CLEAR (output_type, ATI_CONNECT_OUTPUT); + } + + output_type |= ATI_CONFIRM_OUTPUT | + ATI_BEGIN_CRLF_OUTPUT | + ATI_END_CRLF_OUTPUT; + + if (src_params->result_cb NEQ NULL) + { + /* + * ATQ suppesses intermidiate, final and unsolicited result codes. + * Only information text in responce to commands is not affected. + */ + if (ati_user_output_cfg[srcId].atQ EQ 0) + { + src_params->result_cb (srcId, output_type, + (UBYTE*)msg, (USHORT)strlen (msg)); + } + } + else + { + TRACE_EVENT_P1 ("[WRN] io_sendConfirm: no result callback srcId=%d", + srcId); + + if ( (strlen (msg)) >= STRACE_LEN ) + { + /* terminate traced string if too long */ + msg[STRACE_LEN-1] = '\0'; + } + + TRACE_EVENT_P1 ("%s", msg); + } + + io_setCommandState(src_params, ATI_LINE_STATE_END); + trace_cmd_state(src_params->src_id, src_params->cmd_state, CMD_IDLE); + src_params->cmd_state = CMD_IDLE; + + if ((src_params->indication_buffer NEQ NULL) /* send buffered indications */ + AND (is_CONNECT EQ FALSE)) /* but for data call not yet --> when back in CMD mode */ + { + send_buffered_indication( src_params ); + } +} + +/* ++-------------------------------------------------------------------+ +| PROJECT : GSM-PS (6147) MODULE : CMH_DTIS | +| ROUTINE : io_sendChar | ++-------------------------------------------------------------------+ + + PURPOSE : send one character through DTI +*/ + +GLOBAL void io_sendChar (CHAR out, UBYTE srcId) +{ + T_ATI_SRC_PARAMS *src_params; + + src_params = find_element (ati_src_list, srcId, search_ati_src_id); + if (src_params EQ NULL) + { + TRACE_EVENT_P1 ("[ERR] io_sendChar: srcId=%d not found", srcId); + return; + } + if (src_params->result_cb NEQ NULL) + { + src_params->result_cb (srcId, ATI_ECHO_OUTPUT, (UBYTE*)&out, 1); + } + else + { + TRACE_EVENT_P1 ("[WRN] io_sendChar: no result callback srcId=%d", + srcId); + } +} + + +/* ++--------------------------------------------------------------------+ +| PROJECT : GSM-F&D (8411) MODULE : ACI_URT | +| STATE : code ROUTINE : io_setRngInd | ++--------------------------------------------------------------------+ + + PURPOSE: sets the V.24 ring indicator line + +*/ +GLOBAL void io_setRngInd (T_IO_RING_STAT state, T_ACI_CRING_TYP bt1, T_ACI_CRING_TYP bt2) +{ + T_ATI_SRC_PARAMS *src_params; + T_IO_RING_PARAMS ring_params; + + src_params = get_next_element (ati_src_list, NULL); + while (src_params NEQ NULL) + { + if (src_params->line_state_cb NEQ NULL) + { + ring_params.ring_stat = state; + ring_params.b_cap_1 = bt1; + ring_params.b_cap_2 = bt2; + + src_params->line_state_cb (src_params->src_id, + ATI_LINE_STATE_RNG, + (ULONG)&ring_params); + } + src_params = get_next_element (ati_src_list, src_params); + } +} + +/* ++--------------------------------------------------------------------+ +| PROJECT : GSM-F&D (8411) MODULE : ACI_URT | +| STATE : code ROUTINE : io_setDCD | ++--------------------------------------------------------------------+ + + PURPOSE: sets the V.24 data carrier detect line + +*/ +#ifdef UART +GLOBAL void io_setDCD (T_ACI_CMD_SRC src_id, T_IO_DCD_STAT state) +{ + T_ATI_SRC_PARAMS *src_params; + T_ACI_DCD_MOD ATandC_setting; + + TRACE_FUNCTION("io_setDCD()"); + + src_params = find_element (ati_src_list, (UBYTE)src_id, search_ati_src_id); + if (src_params EQ NULL) + { + TRACE_EVENT_P1 ("[ERR] io_setDCD: srcId=%d not found", src_id); + return; + } + + qAT_AndC(src_id, &ATandC_setting); + + /* don't set DCD off if DCD shall be allways on */ + if( (ATandC_setting EQ DCD_ALWAYS_ON) AND + (state EQ IO_DCD_OFF ) ) + { + TRACE_EVENT ("[DBG] io_setDCD: DCD_ALWAYS_ON"); + return; + } + + if (src_params->line_state_cb NEQ NULL) + { + src_params->line_state_cb ((UBYTE)src_id, ATI_LINE_STATE_DCD, (ULONG)state); + } + else + { + TRACE_EVENT_P1 ("[WRN] io_setDCD: no callback for srcId=%d", src_id); + } +} +#endif /* UART */ +/* ++--------------------------------------------------------------------+ +| PROJECT : GSM-F&D (8411) MODULE : ACI_URT | +| STATE : code ROUTINE : io_setCommandState | ++--------------------------------------------------------------------+ + + PURPOSE: sets the command state to start or end + +*/ +#define UNUSED_ULONG_PARAMETER (ULONG) 0L + +GLOBAL void io_setCommandState(T_ATI_SRC_PARAMS *src_params, T_ATI_LINE_STATE_TYPE line_state_type) +{ + + TRACE_FUNCTION("io_setCommandState()"); + + if (src_params->line_state_cb NEQ NULL) + { + src_params->line_state_cb (src_params->src_id, line_state_type, UNUSED_ULONG_PARAMETER); + } + else + { + TRACE_EVENT_P1 ("[WRN] io_setCommandState: no callback for srcId=%d", + src_params->src_id); + } +} + +#endif /* ATI_IO_C */ +