FreeCalypso > hg > fc-magnetite
annotate src/aci2/aci/ati_src_sat.c @ 82:e3768114db59
armio.c: 2nd cleaning: removed some (CHIPSET != 12) noise
| author | Mychaela Falconia <falcon@freecalypso.org> | 
|---|---|
| date | Sun, 02 Oct 2016 07:16:15 +0000 | 
| parents | 93999a60b835 | 
| children | 
| rev | line source | 
|---|---|
| 3 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 1 /* | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 2 +----------------------------------------------------------------------------- | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 3 | Project : GSM-PS (6147) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 4 | Modul : ATI_SRC_SATC | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 5 +----------------------------------------------------------------------------- | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 6 | Copyright 2002 Texas Instruments Berlin, AG | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 7 | All rights reserved. | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 8 | | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 9 | This file is confidential and a trade secret of Texas | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 10 | Instruments Berlin, AG | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 11 | The receipt of or possession of this file does not convey | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 12 | any rights to reproduce or disclose its contents or to | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 13 | manufacture, use, or sell anything it may describe, in | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 14 | whole, or in part, without the specific written consent of | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 15 | Texas Instruments Berlin, AG. | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 16 +----------------------------------------------------------------------------- | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 17 | Purpose : . | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 18 +----------------------------------------------------------------------------- | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 19 */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 20 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 21 #ifdef SIM_TOOLKIT | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 22 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 23 #ifndef ATI_SRC_SAT_C | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 24 #define ATI_SRC_SAT_C | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 25 #endif | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 26 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 27 #include "aci_all.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 28 /*==== INCLUDES ===================================================*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 29 #include "aci_cmh.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 30 #include "ati_cmd.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 31 #include "aci_cmd.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 32 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 33 #ifdef UART | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 34 #include "dti.h" /* functionality of the dti library */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 35 #endif | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 36 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 37 #include "aci_lst.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 38 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 39 #include "ati_src_sat.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 40 #include "psa.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 41 #include "psa_cc.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 42 #include "psa_sat.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 43 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 44 #include "aci_mem.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 45 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 46 #ifdef UART | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 47 #include "dti_conn_mng.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 48 #include "psa_uart.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 49 #endif | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 50 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 51 #include "ati_io.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 52 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 53 #include "ati_int.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 54 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 55 /*==== CONSTANTS ==================================================*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 56 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 57 /*==== TYPES ======================================================*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 58 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 59 /*==== EXPORT =====================================================*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 60 EXTERN T_ACI_LIST *ati_src_list; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 61 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 62 /*==== VARIABLES ==================================================*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 63 USHORT sat_out_buf_len = 0; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 64 UBYTE *sat_out_buf = NULL; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 65 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 66 /*==== FUNCTIONS ==================================================*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 67 EXTERN USHORT format_output (UBYTE *src, USHORT src_len, UBYTE *dst, | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 68 T_ATI_OUTPUT_TYPE output_type); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 69 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 70 /* | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 71 +----------------------------------------------------------------+ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 72 | PROJECT : GSM-PS (6147) MODULE : | | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 73 | ROUTINE : sat_buffer_output | | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 74 +----------------------------------------------------------------+ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 75 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 76 PURPOSE : Buffer messages for RUN AT. Send buffered messages with | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 77 confirm respond later | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 78 */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 79 LOCAL void sat_buffer_output(T_ACI_SAT_TERM_RESP resp_data) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 80 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 81 UBYTE *new_buf; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 82 UBYTE *old_buf; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 83 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 84 TRACE_FUNCTION("sat_buffer_output"); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 85 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 86 if ( sat_out_buf EQ NULL ) /* first message to buffer */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 87 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 88 ACI_MALLOC(sat_out_buf, resp_data.at_resp_count +1); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 89 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 90 else | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 91 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 92 /* enlarge buffer */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 93 old_buf = sat_out_buf; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 94 ACI_MALLOC(new_buf, sat_out_buf_len + resp_data.at_resp_count +1); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 95 memcpy(new_buf, sat_out_buf, sat_out_buf_len); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 96 sat_out_buf = new_buf; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 97 ACI_MFREE(old_buf); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 98 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 99 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 100 /* add new message text to the end of the output buffer */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 101 memcpy(sat_out_buf + sat_out_buf_len, | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 102 resp_data.at_resp, resp_data.at_resp_count); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 103 sat_out_buf_len += resp_data.at_resp_count; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 104 sat_out_buf[sat_out_buf_len] = 0; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 105 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 106 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 107 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 108 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 109 /* | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 110 +-------------------------------------------------------------------+ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 111 | PROJECT : GSM-PS (6147) MODULE : | | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 112 | ROUTINE :sat_send_buffered_output | | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 113 +-------------------------------------------------------------------+ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 114 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 115 PURPOSE : for RUN AT : send buffered messages with confirm respond | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 116 */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 117 LOCAL void sat_send_buffered_output(T_ACI_SAT_TERM_RESP resp_data) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 118 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 119 TRACE_FUNCTION("sat_send_buffered_output"); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 120 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 121 /* copy confirm respond to end of output buffer */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 122 sat_buffer_output(resp_data); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 123 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 124 /* send buffered respond */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 125 resp_data.at_resp = sat_out_buf; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 126 resp_data.at_resp_count = sat_out_buf_len; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 127 TRACE_EVENT_P2("Buffer (%d): %s", resp_data.at_resp_count, (char*) resp_data.at_resp); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 128 psaSAT_SendTrmResp( RSLT_PERF_SUCCESS, &resp_data ); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 129 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 130 /* free buffered output */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 131 ACI_MFREE(sat_out_buf); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 132 sat_out_buf = NULL; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 133 sat_out_buf_len = 0; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 134 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 135 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 136 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 137 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 138 /* | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 139 +-------------------------------------------------------------------+ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 140 | PROJECT : GSM-PS (6147) MODULE : | | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 141 | ROUTINE : sat_src_result_cb | | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 142 +-------------------------------------------------------------------+ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 143 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 144 PURPOSE : | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 145 */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 146 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 147 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 148 GLOBAL void sat_src_result_cb ( UBYTE src_id, | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 149 T_ATI_OUTPUT_TYPE output_type, | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 150 UBYTE *output, | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 151 USHORT output_len) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 152 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 153 UBYTE *formated_response; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 154 T_ACI_SAT_TERM_RESP resp_data; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 155 T_ATI_SRC_PARAMS *src_params; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 156 // T_at_resp *at_response; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 157 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 158 psaSAT_InitTrmResp( &resp_data ); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 159 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 160 TRACE_FUNCTION("sat_src_result_cb()"); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 161 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 162 /* search for SAT source Id */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 163 src_params = find_element (ati_src_list, src_id, search_ati_src_id); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 164 if (src_params EQ NULL) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 165 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 166 TRACE_EVENT ("[ERR] source ID not found"); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 167 return; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 168 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 169 else if( src_params->src_type NEQ ATI_SRC_TYPE_SAT) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 170 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 171 TRACE_EVENT ("[ERR] source ID is not from type SAT"); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 172 return; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 173 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 174 else if( !IS_INDICATION_OUTPUT(output_type) ) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 175 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 176 /* size of response goes up to MAX_CMD_AT_LEN | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 177 The rest will be truncated */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 178 ACI_MALLOC(formated_response, MAX_CMD_AT_LEN+5); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 179 if( output_len > MAX_CMD_AT_LEN ) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 180 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 181 output_len = MAX_CMD_AT_LEN; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 182 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 183 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 184 resp_data.at_resp_count | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 185 = format_output(output, output_len, formated_response, output_type); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 186 resp_data.at_resp = formated_response; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 187 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 188 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 189 if ( resp_data.at_resp NEQ NULL AND !IS_CONFIRM_OUTPUT(output_type)) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 190 { /* Buffer messages for RUN AT. Send buffered messages with | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 191 confirm respond later */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 192 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 193 TRACE_EVENT("buffer OUTPUT"); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 194 sat_buffer_output(resp_data); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 195 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 196 else if ( resp_data.at_resp NEQ NULL AND sat_out_buf_len > 0 ) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 197 { /* for RUN AT: send buffered messages with confirm respond */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 198 sat_send_buffered_output(resp_data); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 199 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 200 else | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 201 { /* send respond */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 202 psaSAT_SendTrmResp( RSLT_PERF_SUCCESS, &resp_data ); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 203 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 204 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 205 ACI_MFREE(formated_response); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 206 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 207 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 208 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 209 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 210 /* | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 211 +-------------------------------------------------------------------+ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 212 | PROJECT : GSM-PS (6147) MODULE : | | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 213 | ROUTINE : sat_new_source | | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 214 +-------------------------------------------------------------------+ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 215 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 216 PURPOSE : Create a new source for ATI with the corresponding struct. | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 217 */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 218 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 219 GLOBAL void sat_new_source( void ) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 220 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 221 /*#ifdef _SIMULATION_ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 222 static BOOL already_done = FALSE; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 223 static UBYTE id; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 224 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 225 TRACE_FUNCTION("sat_new_source: Win 32"); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 226 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 227 if( already_done ) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 228 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 229 TRACE_EVENT_P1("SAT related id: %d", id); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 230 satShrdPrm.run_at_id = id; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 231 return; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 232 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 233 already_done = TRUE; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 234 #else | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 235 UBYTE id; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 236 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 237 TRACE_FUNCTION("sat_new_source: target"); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 238 #endif*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 239 /* _SIMULATION_ */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 240 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 241 satShrdPrm.run_at_id = ati_init(ATI_SRC_TYPE_SAT, sat_src_result_cb, NULL); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 242 if (satShrdPrm.run_at_id<CMD_SRC_MAX) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 243 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 244 if (satShrdPrm.run_at_id==CMD_SRC_LCL) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 245 aci_cmd_src_mode_set(satShrdPrm.run_at_id,CMD_MODE_ACI); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 246 else | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 247 aci_cmd_src_mode_set(satShrdPrm.run_at_id,CMD_MODE_ATI); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 248 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 249 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 250 TRACE_EVENT_P1 ("sat_new_source: SAT srcId=%d", satShrdPrm.run_at_id); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 251 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 252 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 253 /* | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 254 +-------------------------------------------------------------------+ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 255 | PROJECT : GSM-PS (6147) MODULE : CMH_DTIR | | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 256 | ROUTINE : sat_src_proc_chars | | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 257 +-------------------------------------------------------------------+ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 258 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 259 PURPOSE : | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 260 */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 261 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 262 GLOBAL BOOL sat_src_proc_chars ( UBYTE *chars ) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 263 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 264 T_ATI_SRC_PARAMS *src_params; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 265 T_ACI_SAT_TERM_RESP resp_data; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 266 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 267 psaSAT_InitTrmResp( &resp_data ); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 268 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 269 TRACE_FUNCTION ("sat_src_proc_chars()"); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 270 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 271 /* search for SAT source Id */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 272 src_params = find_element (ati_src_list, satShrdPrm.run_at_id, search_ati_src_id); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 273 if (src_params EQ NULL) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 274 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 275 TRACE_EVENT ("[ERR] ati_execute: no SAT source ID present"); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 276 psaSAT_SendTrmResp( RSLT_ME_UNAB_PROC, &resp_data ); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 277 return(FALSE); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 278 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 279 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 280 /* do not echo AT-cmds which are sent by SAT */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 281 ati_user_output_cfg[src_params->src_id].atE = 0; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 282 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 283 return(ati_execute_sat_cmd (src_params, chars, MAX_CMD_AT_LEN)); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 284 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 285 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 286 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 287 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 288 #endif /* SIM_TOOLKIT */ | 
