1
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 1 /*
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 2 +-----------------------------------------------------------------------------
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 3 | Project : GSM-PS (6147)
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 4 | Modul : PSA_PSIP
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 5 +-----------------------------------------------------------------------------
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 6 | Copyright 2002 Texas Instruments Berlin, AG
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 7 | All rights reserved.
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 8 |
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 9 | This file is confidential and a trade secret of Texas
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 10 | Instruments Berlin, AG
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 11 | The receipt of or possession of this file does not convey
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 12 | any rights to reproduce or disclose its contents or to
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 13 | manufacture, use, or sell anything it may describe, in
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 14 | whole, or in part, without the specific written consent of
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 15 | Texas Instruments Berlin, AG.
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 16 +-----------------------------------------------------------------------------
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 17 | Purpose : This module defines the processing functions for the
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 18 | primitives sent to the protocol stack adapter by the DTI
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 19 | interface.
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 20 +-----------------------------------------------------------------------------
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 21 */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 22 #if defined (FF_PSI) && defined (DTI)
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 23 #define PSA_PSIP_C
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 24
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 25
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 26 #include "aci_all.h"
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 27
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 28 /*==== INCLUDES ===================================================*/
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 29 #include "aci_cmh.h"
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 30 #include "ati_cmd.h"
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 31 #include "dti.h" /* functionality of the dti library */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 32
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 33 #include "aci.h"
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 34 #include "aci_lst.h"
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 35
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 36 #include "dti_conn_mng.h"
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 37 #include "dti_cntrl_mng.h"
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 38
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 39
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 40 #include "psa_psi.h"
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 41 #include "cmh_psi.h"
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 42 #include "ati_src_psi.h"
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 43 #include "ati_io.h"
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 44 #include "aci_mem.h"
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 45 #include "sap_dti.h"
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 46
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 47 /*==== CONSTANTS ==================================================*/
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 48
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 49
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 50 /*==== TYPES ======================================================*/
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 51 GLOBAL T_ACI_LIST *psi_dev_list=NULL;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 52
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 53 /*==== EXPORT =====================================================*/
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 54
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 55
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 56 /*==== VARIABLES ==================================================*/
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 57
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 58 /*==== FUNCTIONS ==================================================*/
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 59
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 60 /* for tracing of establishing of CMD channels for dual port version */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 61
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 62
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 63
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 64 /*
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 65 +----------------------------------------------------------------------+
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 66 | PROJECT : GPRS (8441) MODULE : PSA_PSIP |
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 67 | STATE : finished ROUTINE : find_psi_dev_no |
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 68 +----------------------------------------------------------------------+
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 69
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 70 PURPOSE : search psi device number in psi device list
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 71 */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 72 LOCAL BOOL find_psi_dev_id ( U32 devId, void * elem )
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 73 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 74 T_ACI_PSI *compared = (T_ACI_PSI *)elem;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 75
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 76 if (compared NEQ NULL)
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 77 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 78 if (compared->devId EQ devId )
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 79 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 80 return TRUE;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 81 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 82 else
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 83 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 84 return FALSE;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 85 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 86 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 87 else
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 88 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 89 return FALSE;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 90 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 91 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 92
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 93 #ifdef _SIMULATION_
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 94 /*
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 95 +----------------------------------------------------------------------+
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 96 | PROJECT : GPRS (8441) MODULE : PSA_PSIP |
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 97 | STATE : finished ROUTINE : mng_psi_dev_list_test |
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 98 +----------------------------------------------------------------------+
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 99
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 100 PURPOSE : manage psi device list
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 101 */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 102 LOCAL BOOL mng_psi_dev_list_test ( T_PSI_CONN_IND_TEST *psi_conn_ind_test )
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 103 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 104 T_ACI_PSI *msg_ptr = NULL;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 105
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 106 if(psi_dev_list EQ NULL)
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 107 {/* there is no psi device list */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 108 psi_dev_list = new_list();
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 109 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 110 msg_ptr = psi_find_element(psi_dev_list, psi_conn_ind_test->devId, find_psi_dev_id);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 111 if(msg_ptr EQ NULL)
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 112 {/* added new device */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 113 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 114 ACI_MALLOC(msg_ptr,sizeof(T_ACI_PSI));
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 115 msg_ptr->devId = psi_conn_ind_test->devId;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 116 msg_ptr->psi_data_mode = psi_conn_ind_test->psi_data_mode;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 117 switch (psi_conn_ind_test->devId & DIO_TYPE_DAT_MASK)
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 118 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 119 case DIO_DATA_SER:
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 120 memcpy(&msg_ptr->psi_cap.dio_cap_ser,&psi_conn_ind_test->DIO_CAP_UN.DIO_CAP_SER,
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 121 sizeof(msg_ptr->psi_cap.dio_cap_ser));
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 122 break;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 123 case DIO_DATA_MUX:
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 124 memcpy(&msg_ptr->psi_cap.dio_cap_ser_mux, &psi_conn_ind_test->DIO_CAP_UN.DIO_CAP_SER_MUX,
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 125 sizeof(msg_ptr->psi_cap.dio_cap_ser_mux));
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 126 break;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 127 case DIO_DATA_PKT:
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 128 memcpy(&msg_ptr->psi_cap.dio_cap_pkt, &psi_conn_ind_test->DIO_CAP_UN.DIO_CAP_PKT,
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 129 sizeof(msg_ptr->psi_cap.dio_cap_pkt));
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 130 break;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 131 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 132 insert_list(psi_dev_list,msg_ptr);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 133 return (TRUE);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 134 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 135 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 136 else
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 137 {/* new DIO capabilities for existing device */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 138 return (FALSE);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 139 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 140 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 141 #endif /* _SIMULATION_ */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 142
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 143 /*
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 144 +----------------------------------------------------------------------+
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 145 | PROJECT : GPRS (8441) MODULE : PSA_PSIP |
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 146 | STATE : finished ROUTINE : mng_psi_dev_list |
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 147 +----------------------------------------------------------------------+
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 148
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 149 PURPOSE : manage psi device list
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 150 */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 151 LOCAL BOOL mng_psi_dev_list ( T_PSI_CONN_IND *psi_conn_ind )
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 152 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 153 T_ACI_PSI *msg_ptr = NULL;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 154
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 155 if(psi_dev_list EQ NULL)
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 156 {/* there is no psi device list */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 157 psi_dev_list = new_list();
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 158 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 159 msg_ptr = psi_find_element(psi_dev_list, psi_conn_ind->devId, find_psi_dev_id);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 160 if(msg_ptr EQ NULL)
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 161 { /* added new device */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 162 /* if((psi_conn_ind->dio_cap->data_mode >= DTI_CPBLTY_CMD )
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 163 AND
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 164 (psi_conn_ind->dio_cap->data_mode <=(DTI_CPBLTY_CMD|DTI_CPBLTY_PKT|DTI_CPBLTY_SER)))*/
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 165 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 166 ACI_MALLOC(msg_ptr,sizeof(T_ACI_PSI));
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 167 msg_ptr->devId = psi_conn_ind->devId;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 168 msg_ptr->psi_data_mode = psi_conn_ind->psi_data_mode;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 169 switch (psi_conn_ind->devId & DIO_TYPE_DAT_MASK)
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 170 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 171 case DIO_DATA_SER:
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 172 if(psi_conn_ind->ptr_DIO_CAP NEQ NULL)
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 173 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 174 memcpy(&msg_ptr->psi_cap.dio_cap_ser,(T_DIO_CAP_SER *)&(psi_conn_ind->ptr_DIO_CAP),
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 175 sizeof(msg_ptr->psi_cap.dio_cap_ser));
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 176 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 177 break;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 178 case DIO_DATA_MUX:
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 179 if(psi_conn_ind->ptr_DIO_CAP NEQ NULL)
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 180 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 181 memcpy(&msg_ptr->psi_cap.dio_cap_ser_mux, (T_DIO_CAP_SER_MUX *)&(psi_conn_ind->ptr_DIO_CAP),
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 182 sizeof(msg_ptr->psi_cap.dio_cap_ser_mux));
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 183 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 184 break;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 185 case DIO_DATA_PKT:
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 186 if(psi_conn_ind->ptr_DIO_CAP NEQ NULL)
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 187 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 188 memcpy(&msg_ptr->psi_cap.dio_cap_pkt, (T_DIO_CAP_PKT *)&(psi_conn_ind->ptr_DIO_CAP),
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 189 sizeof(msg_ptr->psi_cap.dio_cap_pkt));
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 190 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 191 break;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 192 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 193 insert_list(psi_dev_list,msg_ptr);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 194 return (TRUE);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 195 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 196 /* else
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 197 { neither CMD, SER nor PKT mode
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 198 return (FALSE);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 199 }*/
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 200 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 201 else
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 202 {/* new DIO capabilities for existing device */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 203 return (FALSE);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 204 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 205 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 206
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 207 /*
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 208 +--------------------------------------------------------------------+
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 209 | PROJECT : GPRS (8441) MODULE : PSA_PSIP |
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 210 | STATE : code ROUTINE : PSI_erase_dev_elem |
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 211 +--------------------------------------------------------------------+
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 212
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 213 PURPOSE : erase an entry element from the psi_dev_list list.
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 214
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 215 */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 216 LOCAL void PSI_erase_dev_elem(U32 devId)
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 217 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 218 T_ACI_DTI_PRC_PSI *content;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 219 content = psi_remove_element (psi_dev_list, devId, find_psi_dev_id);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 220 ACI_MFREE (content);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 221 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 222 #ifdef _SIMULATION_
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 223 /*
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 224 +----------------------------------------------------------------------+
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 225 | PROJECT : GPRS (8441) MODULE : PSA_PSI |
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 226 | STATE : finished ROUTINE : psa_psi_conn_ind_test |
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 227 +----------------------------------------------------------------------+
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 228
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 229 PURPOSE : processes the PSI_CONN_IND_TEST primitive send by PSI.
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 230 add new device to psi device list, create the ATI source and
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 231 register the DIO capabilities in ACI
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 232 */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 233
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 234 GLOBAL const void psa_psi_conn_ind_test ( T_PSI_CONN_IND_TEST *psi_conn_ind_test )
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 235 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 236 T_ACI_PSI * msg_ptr;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 237 UBYTE src_id = 0;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 238 U32 dio_cap;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 239
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 240 TRACE_FUNCTION ("psa_psi_conn_ind_test()");
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 241
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 242 dio_cap =psi_conn_ind_test->devId & DIO_TYPE_DAT_MASK;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 243
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 244 if(mng_psi_dev_list_test(psi_conn_ind_test) EQ TRUE )
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 245 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 246 msg_ptr = psi_find_element(psi_dev_list, psi_conn_ind_test->devId, find_psi_dev_id);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 247 switch (dio_cap)
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 248 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 249 case DIO_DATA_SER: /*lint -fallthrough*/
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 250 case DIO_DATA_MUX: /*lint -fallthrough*/
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 251 case DIO_DATA_PKT:
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 252 /* Create a new AT source if driver supports AT commands */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 253 if(psi_conn_ind_test->psi_data_mode EQ DRIVER_MODE_AT OR
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 254 psi_conn_ind_test->psi_data_mode EQ DRIVER_MODE_AT_DATA)
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 255 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 256 src_id = psi_new_source(psi_conn_ind_test->devId, NOT_PRESENT_8BIT, dio_cap);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 257 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 258 cmhPSI_Ind(msg_ptr, src_id,dio_cap);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 259 break;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 260
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 261 default:
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 262 break;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 263 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 264 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 265 else
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 266 {/* second PSI_CONNECT_IND from same device or wrong convergence (mode) in
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 267 DIO capabilities */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 268 psaPSI_ConnRej(psi_conn_ind_test->devId);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 269 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 270 /* free the primitive buffer */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 271 PFREE (psi_conn_ind_test);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 272 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 273 #endif /* _SIMULATION_ */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 274 /*
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 275 +----------------------------------------------------------------------+
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 276 | PROJECT : GPRS (8441) MODULE : PSA_PSI |
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 277 | STATE : finished ROUTINE : psa_psi_conn_ind |
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 278 +----------------------------------------------------------------------+
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 279
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 280 PURPOSE : processes the PSI_CONN_IND primitive send by PSI.
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 281 add new device to psi device list, create the ATI source and
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 282 register the DIO capabilities in ACI
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 283 */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 284
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 285 GLOBAL void psa_psi_conn_ind ( T_PSI_CONN_IND *psi_conn_ind )
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 286 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 287 T_ACI_PSI * msg_ptr;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 288 UBYTE src_id = 0;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 289 U32 dio_cap;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 290
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 291 TRACE_FUNCTION ("psa_psi_conn_ind()");
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 292 /* cmhPSI_SetDcbParToUnchanged( device_entry );*/
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 293
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 294 dio_cap =psi_conn_ind->devId & DIO_TYPE_DAT_MASK;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 295
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 296 if(mng_psi_dev_list(psi_conn_ind) EQ TRUE )
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 297 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 298 msg_ptr = psi_find_element(psi_dev_list, psi_conn_ind->devId, find_psi_dev_id);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 299 switch (dio_cap)
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 300 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 301 case DIO_DATA_SER: /*lint -fallthrough*/
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 302 case DIO_DATA_MUX: /*lint -fallthrough*/
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 303 case DIO_DATA_PKT:
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 304 /* Create a new AT source if driver supports AT commands */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 305 if(psi_conn_ind->psi_data_mode EQ DRIVER_MODE_AT OR
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 306 psi_conn_ind->psi_data_mode EQ DRIVER_MODE_AT_DATA)
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 307 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 308 src_id = psi_new_source(psi_conn_ind->devId, NOT_PRESENT_8BIT, dio_cap);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 309 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 310 cmhPSI_Ind(msg_ptr, src_id,dio_cap);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 311 break;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 312
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 313 default:
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 314 break;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 315 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 316 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 317 else
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 318 {/* second PSI_CONNECT_IND from same device or wrong convergence (mode) in
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 319 DIO capabilities */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 320 psaPSI_ConnRej(psi_conn_ind->devId);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 321 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 322 /* free the primitive buffer */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 323 PFREE (psi_conn_ind);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 324 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 325
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 326
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 327
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 328 /*
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 329 +----------------------------------------------------------------------+
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 330 | PROJECT : GPRS (8441) MODULE : PSA_PSI |
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 331 | STATE : finished ROUTINE : psa_psi_dti_close_ind |
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 332 +----------------------------------------------------------------------+
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 333
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 334 PURPOSE : processes the PSI_DTI_CLOSE_IND primitive send by PSI.
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 335 this indicates the dti disconnection caused by the DIO driver
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 336 */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 337
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 338 GLOBAL void psa_psi_dti_close_ind( T_PSI_DTI_CLOSE_IND *psi_dti_close_ind )
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 339 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 340 T_ACI_PSI * msg_ptr;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 341
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 342 TRACE_FUNCTION ("psa_psi_dti_close_ind()");
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 343
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 344 msg_ptr = psi_find_element(psi_dev_list, psi_dti_close_ind->devId, find_psi_dev_id);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 345 /* if the device_no does not exist in the psi_dev_list
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 346 the primitive is ignored */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 347 if(msg_ptr NEQ NULL)
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 348 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 349 cmhPSI_DTI_Close(psi_dti_close_ind->devId, PSI_DTI_CLS_IND, psi_dti_close_ind->link_id);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 350 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 351 else
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 352 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 353 TRACE_EVENT ("ERROR: DEVICE NOT FOUND.");
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 354 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 355 /* free the primitive buffer */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 356 PFREE (psi_dti_close_ind);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 357 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 358
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 359 /*
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 360 +----------------------------------------------------------------------+
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 361 | PROJECT : GPRS (8441) MODULE : PSA_PSI |
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 362 | STATE : finished ROUTINE : psa_psi_disconn_ind |
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 363 +----------------------------------------------------------------------+
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 364
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 365 PURPOSE : processes the PSI_DISCONN_IND primitive send by PSI.
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 366 this indicates the disconnection of data call caused by the DIO driver
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 367 */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 368 GLOBAL void psa_psi_disconn_ind ( T_PSI_DISCONN_IND *psi_disconn_ind )
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 369 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 370 T_ACI_PSI * msg_ptr;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 371 T_ACI_DTI_PRC_PSI *cmd;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 372
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 373 TRACE_FUNCTION ("psa_psi_disconn_ind()");
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 374
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 375 msg_ptr = psi_find_element(psi_dev_list, psi_disconn_ind->devId, find_psi_dev_id);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 376 cmd = cmhPSI_find_dlci (psi_src_params, psi_disconn_ind->devId,
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 377 UART_DLCI_NOT_MULTIPLEXED);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 378 /* if the device_no does not exist in the psi_dev_list the primitive is ignored */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 379 if(msg_ptr NEQ NULL)
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 380 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 381 /*erase the source*/
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 382 psi_erase_source( cmd->srcId );
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 383 /*erase the src element in the <psi_src_params>*/
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 384 cmhPSI_erase_src_elem (cmd->srcId );
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 385 /*erase the devie from the device list*/
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 386 PSI_erase_dev_elem (psi_disconn_ind->devId);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 387 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 388 /* free the primitive buffer */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 389 PFREE (psi_disconn_ind);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 390 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 391
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 392
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 393
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 394 /*
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 395 +----------------------------------------------------------------------+
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 396 | PROJECT : GPRS (8441) MODULE : PSA_PSI |
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 397 | STATE : finished ROUTINE : psa_psi_dti_close_cnf |
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 398 +----------------------------------------------------------------------+
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 399
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 400 PURPOSE : processes the PSI_DTI_CLOSE_CNF primitive sent by PSI.
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 401 this confirms the dti disconnection requested by PSI_DTI_CLOSE_REQ
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 402 */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 403 GLOBAL void psa_psi_dti_close_cnf ( T_PSI_DTI_CLOSE_CNF *psi_dti_close_cnf )
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 404 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 405 T_ACI_PSI * msg_ptr;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 406
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 407 TRACE_FUNCTION ("psa_psi_dti_close_cnf()");
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 408 msg_ptr = psi_find_element(psi_dev_list, psi_dti_close_cnf->devId, find_psi_dev_id);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 409 /* if the devId does not exist in the psi_dev_list
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 410 the primitive is ignored */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 411 if(msg_ptr NEQ NULL)
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 412 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 413 cmhPSI_DTI_Close(psi_dti_close_cnf->devId, PSI_DTI_CLS_CNF, psi_dti_close_cnf->link_id);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 414 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 415 /* psaPSI_CloseReq(psi_dti_close_cnf->devId);*/
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 416 /* free the primitive buffer */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 417 PFREE (psi_dti_close_cnf);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 418 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 419
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 420
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 421 /*
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 422 +----------------------------------------------------------------------+
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 423 | PROJECT : GPRS (8441) MODULE : PSA_PSI |
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 424 | STATE : finished ROUTINE : psa_psi_close_cnf |
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 425 +----------------------------------------------------------------------+
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 426
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 427 PURPOSE : processes the PSI_CLOSE_CNF primitive sent by PSI.
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 428 this confirms the dti disconnection requested by PSI_CLOSE_REQ
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 429 */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 430 GLOBAL void psa_psi_close_cnf ( T_PSI_CLOSE_CNF *psi_close_cnf )
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 431 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 432 T_ACI_PSI * msg_ptr;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 433 T_ACI_DTI_PRC_PSI *cmd;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 434
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 435 TRACE_FUNCTION ("psa_psi_close_cnf()");
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 436 msg_ptr = psi_find_element(psi_dev_list, psi_close_cnf->devId, find_psi_dev_id);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 437 cmd = cmhPSI_find_dlci (psi_src_params, psi_close_cnf->devId,
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 438 UART_DLCI_NOT_MULTIPLEXED);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 439 /* if the devId does not exist in the psi_dev_list
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 440 the primitive is ignored */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 441 if(msg_ptr NEQ NULL)
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 442 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 443 /*erase the source*/
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 444 psi_erase_source( cmd->srcId );
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 445 /*erase the src element in the <psi_src_params>*/
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 446 cmhPSI_erase_src_elem (cmd->srcId );
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 447 /*erase the devie from the device list*/
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 448 PSI_erase_dev_elem (psi_close_cnf->devId);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 449 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 450 /* free the primitive buffer */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 451 PFREE (psi_close_cnf);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 452 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 453
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 454
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 455
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 456
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 457 /*
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 458 +----------------------------------------------------------------------+
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 459 | PROJECT : GPRS (8441) MODULE : PSA_PSI |
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 460 | STATE : finished ROUTINE : psa_psi_dti_open_cnf |
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 461 +----------------------------------------------------------------------+
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 462
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 463 PURPOSE : processes the PSI_DTI_OPEN_CNF primitive send by PSI.
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 464 this confirms the dti connection requested by PSI_DTI_OPEN_REQ
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 465 */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 466 GLOBAL void psa_psi_dti_open_cnf ( T_PSI_DTI_OPEN_CNF *psi_dti_open_cnf )
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 467 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 468 T_ACI_PSI * msg_ptr;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 469
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 470 TRACE_FUNCTION ("psa_psi_dti_open_cnf()");
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 471
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 472 msg_ptr = psi_find_element(psi_dev_list, psi_dti_open_cnf->devId, find_psi_dev_id);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 473 /* if the devId does not exist in the psi_dev_list
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 474 the primitive is ignored */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 475 if(msg_ptr NEQ NULL)
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 476 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 477 switch(psi_dti_open_cnf->cause)
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 478 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 479 case PSICS_SUCCESS:
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 480 cmhPSI_DTI_OpenCnf(psi_dti_open_cnf->devId, psi_dti_open_cnf->link_id, DTI_OK);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 481 break;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 482 case PSICS_INVALID_PARAMS:
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 483 case PSICS_DISCONNECT:
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 484 case PSICS_INTERNAL_DRV_ERROR:
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 485 default:
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 486 cmhPSI_DTI_OpenCnf(psi_dti_open_cnf->devId, psi_dti_open_cnf->link_id, DTI_ERROR);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 487 break;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 488 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 489 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 490 /* free the primitive buffer */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 491 PFREE (psi_dti_open_cnf);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 492 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 493
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 494
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 495 /*
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 496 +----------------------------------------------------------------------+
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 497 | PROJECT : GPRS (8441) MODULE : PSA_PSI |
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 498 | STATE : finished ROUTINE : psa_psi_setconf_cnf |
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 499 +----------------------------------------------------------------------+
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 500
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 501 PURPOSE : processes the PSI_DTI_SETCONF_CNF primitive send by PSI.
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 502 this confirms the changed driver configuration requested
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 503 by PSI_SETCONF_REQ
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 504 */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 505
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 506 GLOBAL void psa_psi_setconf_cnf (T_PSI_SETCONF_CNF *psi_setconf_cnf)
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 507 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 508 TRACE_FUNCTION ("psa_psi_setconf_cnf()");
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 509 /* free the primitive buffer */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 510 PFREE (psi_setconf_cnf);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 511 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 512
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 513
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 514 /*
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 515 +---------------------------------------------------------------------+
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 516 | PROJECT : GSM-PS (6147) MODULE :PSA_PSIP |
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 517 | ROUTINE : psa_psi_line_state_cnf |
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 518 +---------------------------------------------------------------------+
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 519
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 520 PURPOSE :
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 521
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 522 */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 523
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 524 GLOBAL void psa_psi_line_state_cnf(T_PSI_LINE_STATE_CNF *psi_line_state_cnf)
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 525 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 526 T_ACI_DTI_PRC_PSI *src_infos = NULL;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 527
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 528 TRACE_FUNCTION("psa_psi_line_state_cnf ()");
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 529
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 530 src_infos = cmhPSI_find_dlci (psi_src_params, psi_line_state_cnf->devId, UART_DLCI_NOT_MULTIPLEXED);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 531
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 532 if (src_infos EQ NULL)
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 533 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 534 TRACE_EVENT_P1 ("[ERR] psa_psi_line_state_cnf: not found: device=%d;",psi_line_state_cnf->devId);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 535 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 536 else
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 537 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 538 BITFIELD_CLEAR (src_infos->data_cntr, PSI_RING_RUNNING);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 539 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 540
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 541 PFREE(psi_line_state_cnf);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 542 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 543
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 544 /*
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 545 +---------------------------------------------------------------------+
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 546 | PROJECT : GSM-PS (6147) MODULE : PSA_PSIP |
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 547 | ROUTINE : psa_psi_line_state_ind |
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 548 +---------------------------------------------------------------------+
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 549
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 550 PURPOSE :
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 551 */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 552
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 553 GLOBAL void psa_psi_line_state_ind(T_PSI_LINE_STATE_IND *psi_line_state_ind )
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 554 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 555 TRACE_FUNCTION("psa_psi_line_state_ind()");
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 556
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 557 cmhPSI_Line_State_Ind ( psi_line_state_ind->devId, psi_line_state_ind->line_state );
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 558
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 559 PFREE(psi_line_state_ind);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 560 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 561
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 562 #endif /*FF_PSI*/
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 563 /*==== EOF =======================================================*/
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 564