FreeCalypso > hg > fc-magnetite
annotate src/aci2/aci_dti_mng/dti_conn_mng.c @ 360:ce6d71349af0
FCHG: data structure changes in preparation for the new version
| author | Mychaela Falconia <falcon@freecalypso.org> | 
|---|---|
| date | Fri, 29 Dec 2017 05:42:54 +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 : ... | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
4 | Modul : dti_conn_mng.c | 
| 
 
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 : Implementation of DTI Connection Manager | 
| 
 
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 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
22 #ifndef DTI_CONN_MNG_C | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
23 #define DTI_CONN_MNG_C | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
24 #endif | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
25 | 
| 
 
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 /*===== INCLUDES ===================================================*/ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
28 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
29 #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
 | 
30 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
31 #include "pconst.cdg" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
32 #include "mconst.cdg" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
33 #include "cnf_aci.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
34 #include "mon_aci.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
35 #include "pei.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
36 #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
 | 
37 #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
 | 
38 #include "aci_io.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
39 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
40 #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
 | 
41 #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
 | 
42 #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
 | 
43 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
44 #include "dti.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
45 #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
 | 
46 #include "dti_cntrl_mng.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
47 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
48 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
49 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
50 LOCAL ULONG used_dti_channels = 0; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
51 LOCAL T_ACI_LIST *dti_channel_list = NULL; /* list_begin */ | 
| 
 
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 LOCAL T_DTI_CONN_PARAMS glob_params; | 
| 
 
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 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
56 /********************** LOCAL FUNCTIONS *****************************/ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
57 | 
| 
 
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 LOCAL UBYTE dti_conn_get_new_dti_id (void) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
60 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
61 ULONG tst_id; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
62 UBYTE i; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
63 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
64 TRACE_FUNCTION("dti_conn_get_new_dti_id()"); | 
| 
 
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 /* create a new DTI ID */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
67 for (i = 0; i <= MAX_DTI_CONN_CHANNELS; i++) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
68 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
69 tst_id = (0x01 << i) & used_dti_channels; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
70 if (!tst_id) | 
| 
 
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 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
73 } | 
| 
 
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 if (tst_id) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
76 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
77 TRACE_EVENT("No DTI ID available"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
78 return (DTI_DTI_ID_NOTPRESENT); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
79 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
80 used_dti_channels |= (0x01 << i); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
81 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
82 TRACE_EVENT_P1("DTI ID %d created", i); | 
| 
 
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 return (i); | 
| 
 
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 | 
| 
 
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 LOCAL void dti_conn_remove_dti_id (UBYTE dti_id) | 
| 
 
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 ULONG tst_id; | 
| 
 
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 TRACE_FUNCTION("dti_conn_remove_id()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
93 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
94 if (dti_id >= MAX_DTI_CONN_CHANNELS) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
95 return; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
96 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
97 tst_id = 0x01 << (dti_id); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
98 used_dti_channels &= ~tst_id; | 
| 
 
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 TRACE_EVENT_P1("DTI ID %d removed", dti_id); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
101 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
102 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
103 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
104 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
105 LOCAL BOOL dti_conn_error_cb(UBYTE dti_id, T_DTI_CONN_STATE result_type) | 
| 
 
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 /* theorically should not be called... Yet helpfull for testing */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
108 TRACE_FUNCTION("dti_conn_error_cb()"); | 
| 
 
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 TRACE_EVENT("ERROR: DTI connection callback has not been initialized !"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
111 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
112 return FALSE; | 
| 
 
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 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
116 LOCAL void dti_conn_reset_conn_parms( T_DTI_CONN_CHANNEL *dti_channel ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
117 { | 
| 
 
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 UBYTE i,j; | 
| 
 
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 TRACE_FUNCTION("dti_conn_reset_conn_parms()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
122 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
123 dti_channel->erase_channel = FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
124 dti_channel->num_of_conns = 0; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
125 dti_channel->conn_cb = dti_conn_error_cb; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
126 dti_channel->state = DTI_CONN_STATE_DISCONNECTED; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
127 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
128 for (i=0; i<MAX_DTI_CONN_TUPLES; i++) | 
| 
 
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 dti_channel->tuple_list[i].state = DTI_CONN_STATE_DISCONNECTED; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
131 for (j=0; j<NUM_OF_PEERS; j++) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
132 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
133 dti_channel->tuple_list[i].peers[j].state = DTI_CONN_STATE_DISCONNECTED; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
134 dti_channel->tuple_list[i].peers[j].ent_id = DTI_ENTITY_INVALID; | 
| 
 
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 LOCAL BOOL DTItest_dti_id( UBYTE dti_id, void *elem) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
141 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
142 T_DTI_CONN_CHANNEL *dti_channel = (T_DTI_CONN_CHANNEL *)elem; | 
| 
 
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 if (dti_channel EQ NULL) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
145 return FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
146 if (dti_channel -> dti_id EQ dti_id ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
147 return TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
148 else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
149 return FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
150 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
151 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
152 LOCAL T_DTI_CONN_TUPLE *dti_conn_find_dti_tuple( T_DTI_CONN_CHANNEL *dti_channel, UBYTE tuple_no) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
153 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
154 return &(dti_channel->tuple_list[tuple_no]); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
155 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
156 | 
| 
 
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 LOCAL T_DTI_CONN_CHANNEL *dti_conn_find_dti_conn( UBYTE dti_id ) | 
| 
 
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 T_DTI_CONN_CHANNEL *dti_channel; | 
| 
 
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 TRACE_FUNCTION("dti_conn_find_dti_conn()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
163 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
164 /*find channel in list */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
165 dti_channel = find_element (dti_channel_list, dti_id, DTItest_dti_id); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
166 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
167 return dti_channel; | 
| 
 
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 | 
| 
 
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 LOCAL BOOL dti_conn_connect( T_DTI_CONN_CHANNEL* dti_channel, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
172 T_DTI_ENTITY_ID* entity_list, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
173 UBYTE num_entities, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
174 T_DTI_CONN_MODE mode ) | 
| 
 
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 ULONG link_id; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
177 UBYTE tuple_no; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
178 UBYTE i; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
179 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
180 TRACE_FUNCTION("dti_conn_connect()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
181 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
182 dti_channel->state = DTI_CONN_STATE_CONNECTING; | 
| 
 
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 if (dti_channel->conn_cb) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
185 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
186 dti_channel->conn_cb(dti_channel->dti_id, DTI_CONN_STATE_CONNECTING); | 
| 
 
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 else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
189 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
190 TRACE_EVENT("conn_cb is NULL"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
191 } | 
| 
 
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 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
194 if (mode EQ APPEND) | 
| 
 
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 tuple_no = dti_channel->num_of_conns; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
197 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
198 else /* SPLIT */ | 
| 
 
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 tuple_no = 0; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
201 dti_channel->num_of_conns = 0; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
202 } | 
| 
 
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 for (i=0; i<num_entities-1; i++) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
205 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
206 dti_channel->tuple_list[tuple_no].peers[0].ent_id = entity_list[i]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
207 dti_channel->tuple_list[tuple_no].peers[1].ent_id = entity_list[i+1]; | 
| 
 
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 if ( (dti_channel->tuple_list[tuple_no].state NEQ DTI_CONN_STATE_DISCONNECTING) AND | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
210 (dti_channel->tuple_list[tuple_no].state NEQ DTI_CONN_STATE_CONNECTING) ) | 
| 
 
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 dti_channel->tuple_list[tuple_no].state = DTI_CONN_STATE_CONNECTING; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
213 dti_channel->tuple_list[tuple_no].tuple_no = tuple_no; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
214 dti_channel->state = DTI_CONN_STATE_CONNECTING; | 
| 
 
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 link_id = dti_conn_compose_link_id(0, 0, dti_channel->dti_id, tuple_no); | 
| 
 
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 dti_channel->tuple_list[tuple_no].peers[0].state = DTI_CONN_STATE_CONNECTING; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
219 dti_channel->tuple_list[tuple_no].peers[1].state = DTI_CONN_STATE_CONNECTING; | 
| 
 
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 /* connect a tuple */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
222 glob_params.mng_ent_cb(link_id, entity_list[i], entity_list[i+1], DTI_CONNECT); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
223 glob_params.mng_ent_cb(link_id, entity_list[i+1], entity_list[i], DTI_CONNECT); | 
| 
 
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 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
226 tuple_no++; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
227 } | 
| 
 
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 dti_channel->num_of_conns = tuple_no; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
230 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
231 return TRUE; | 
| 
 
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 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
234 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
235 LOCAL BOOL dti_conn_disconnect( T_DTI_CONN_CHANNEL* dti_channel ) | 
| 
 
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 ULONG link_id; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
238 UBYTE i; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
239 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
240 TRACE_FUNCTION("dti_conn_disconnect()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
241 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
242 dti_channel->state = DTI_CONN_STATE_DISCONNECTING; | 
| 
 
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 (dti_channel->conn_cb) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
245 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
246 dti_channel->conn_cb(dti_channel->dti_id, DTI_CONN_STATE_DISCONNECTING); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
247 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
248 else | 
| 
 
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("conn_cb is NULL"); | 
| 
 
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 for (i=0; i < dti_channel->num_of_conns; i++) | 
| 
 
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 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
256 /* set tuple state only if it is not already DISCONNECTED */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
257 if (dti_channel->tuple_list[i].state NEQ DTI_CONN_STATE_DISCONNECTED) | 
| 
 
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 dti_channel->tuple_list[i].state = DTI_CONN_STATE_DISCONNECTING; | 
| 
 
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 link_id = dti_conn_compose_link_id(0, 0, dti_channel->dti_id, i); | 
| 
 
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 /* disconnect only a connected entity */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
265 if (dti_channel->tuple_list[i].peers[0].state EQ DTI_CONN_STATE_CONNECTED OR | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
266 dti_channel->tuple_list[i].peers[0].state EQ DTI_CONN_STATE_CONNECTING ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
267 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
268 dti_channel->tuple_list[i].peers[0].state = DTI_CONN_STATE_DISCONNECTING; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
269 glob_params.mng_ent_cb(link_id, dti_channel->tuple_list[i].peers[0].ent_id, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
270 dti_channel->tuple_list[i].peers[1].ent_id, DTI_DISCONNECT); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
271 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
272 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
273 /* disconnect only a connected entity */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
274 if (dti_channel->tuple_list[i].peers[1].state EQ DTI_CONN_STATE_CONNECTED OR | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
275 dti_channel->tuple_list[i].peers[1].state EQ DTI_CONN_STATE_CONNECTING ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
276 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
277 dti_channel->tuple_list[i].peers[1].state = DTI_CONN_STATE_DISCONNECTING; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
278 glob_params.mng_ent_cb(link_id, dti_channel->tuple_list[i].peers[1].ent_id, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
279 dti_channel->tuple_list[i].peers[0].ent_id, DTI_DISCONNECT); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
280 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
281 } | 
| 
 
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 TRUE; | 
| 
 
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 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
289 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
290 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
291 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
292 /********************** GLOBAL FUNCTIONS *****************************/ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
293 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
294 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
295 GLOBAL T_DTI_CONN_LINK_ID dti_conn_compose_link_id(UBYTE dummy, UBYTE assoc, UBYTE dti_id, UBYTE tuple_no) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
296 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
297 T_DTI_CONN_LINK_ID link_id = 0; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
298 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
299 link_id += dummy; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
300 link_id <<= 8; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
301 link_id += assoc; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
302 link_id <<= 8; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
303 link_id += dti_id; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
304 link_id <<= 8; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
305 link_id += tuple_no; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
306 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
307 return link_id; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
308 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
309 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
310 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
311 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
312 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
313 | PROJECT : MODULE : DTI_CONN | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
314 | STATE : code ROUTINE : dti_conn_init | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
315 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
316 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
317 PURPOSE : initialise the DTI Connection Manager | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
318 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
319 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
320 GLOBAL void dti_conn_init( T_DTI_CONN_MNG_ENT_CB* mng_ent_cb ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
321 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
322 TRACE_FUNCTION("dti_conn_init()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
323 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
324 dti_channel_list = new_list (); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
325 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
326 glob_params.conn_cb = NULL; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
327 glob_params.mng_ent_cb = mng_ent_cb; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
328 glob_params.num_entities = 0; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
329 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
330 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
331 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
332 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
333 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
334 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
335 | PROJECT : MODULE : DTI_CONN | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
336 | STATE : code ROUTINE : dti_conn_new | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
337 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
338 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
339 PURPOSE : register new DTI channel | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
340 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
341 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
342 GLOBAL UBYTE dti_conn_new(UBYTE dti_id ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
343 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
344 T_DTI_CONN_CHANNEL *dti_channel; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
345 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
346 TRACE_FUNCTION("dti_conn_new()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
347 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
348 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
349 if (dti_id EQ DTI_DTI_ID_NOTPRESENT) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
350 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
351 dti_id = dti_conn_get_new_dti_id (); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
352 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
353 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
354 if (dti_id EQ DTI_DTI_ID_NOTPRESENT) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
355 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
356 return (DTI_DTI_ID_NOTPRESENT); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
357 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
358 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
359 /* search for an existing entry with correspondant dti_id */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
360 dti_channel = dti_conn_find_dti_conn (dti_id); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
361 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
362 if( dti_channel ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
363 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
364 return (DTI_DTI_ID_NOTPRESENT); /* couldn't create a new entry */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
365 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
366 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
367 ACI_MALLOC(dti_channel, sizeof(T_DTI_CONN_CHANNEL)); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
368 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
369 dti_conn_reset_conn_parms (dti_channel); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
370 dti_channel->dti_id = dti_id; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
371 insert_list(dti_channel_list, dti_channel); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
372 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
373 return (dti_channel->dti_id); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
374 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
375 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
376 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
377 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
378 +---------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
379 | PROJECT : MODULE : DTI_CONN | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
380 | STATE : code ROUTINE : dti_conn_erase_entry | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
381 +---------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
382 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
383 PURPOSE : /* erase entry from DTI channel list | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
384 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
385 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
386 GLOBAL void dti_conn_erase_entry(UBYTE dti_id) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
387 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
388 T_DTI_CONN_CHANNEL *dti_channel; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
389 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
390 TRACE_FUNCTION("dti_conn_erase_entry"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
391 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
392 /* find element to be erased */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
393 dti_channel = remove_element (dti_channel_list, dti_id, DTItest_dti_id); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
394 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
395 if( dti_channel NEQ NULL ) /* entry not erased yet */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
396 ACI_MFREE (dti_channel); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
397 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
398 dti_conn_remove_dti_id(dti_id); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
399 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
400 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
401 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
402 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
403 +-----------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
404 | PROJECT : MODULE : DTI_CONN | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
405 | STATE : code ROUTINE : dti_conn_is_dti_channel_connected | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
406 +-----------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
407 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
408 PURPOSE : returns TRUE if end-to-end DTI connection is connected and | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
409 the given entity is in this connection | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
410 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
411 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
412 GLOBAL BOOL dti_conn_is_dti_channel_connected( T_DTI_ENTITY_ID ent_id, UBYTE dti_id ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
413 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
414 UBYTE count = 0; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
415 UBYTE i; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
416 UBYTE entity_found = FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
417 T_DTI_CONN_CHANNEL *dti_channel = dti_conn_find_dti_conn( dti_id ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
418 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
419 TRACE_FUNCTION("dti_conn_is_dti_channel_connected()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
420 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
421 if (dti_channel EQ NULL) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
422 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
423 TRACE_EVENT_P1("dti_channel for dti_id %d not found", dti_id); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
424 return FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
425 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
426 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
427 for (i=0; i<dti_channel->num_of_conns; i++) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
428 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
429 if ((dti_channel->tuple_list[i].peers[0].ent_id EQ ent_id) OR | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
430 (dti_channel->tuple_list[i].peers[1].ent_id EQ ent_id)) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
431 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
432 entity_found = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
433 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
434 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
435 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
436 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
437 if (entity_found EQ FALSE) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
438 return FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
439 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
440 if (dti_channel->state EQ DTI_CONN_STATE_CONNECTED) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
441 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
442 return TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
443 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
444 else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
445 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
446 for (i=0; i<dti_channel->num_of_conns; i++) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
447 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
448 if (dti_channel->tuple_list[i].state EQ DTI_CONN_STATE_CONNECTED) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
449 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
450 count++; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
451 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
452 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
453 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
454 if (count EQ dti_channel->num_of_conns) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
455 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
456 return TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
457 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
458 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
459 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
460 return FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
461 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
462 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
463 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
464 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
465 +--------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
466 | PROJECT : MODULE : DTI_CONN | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
467 | STATE : code ROUTINE : dti_conn_is_dti_channel_disconnected | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
468 +--------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
469 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
470 PURPOSE : returns TRUE if end-to-end DTI connection is disconnected | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
471 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
472 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
473 GLOBAL BOOL dti_conn_is_dti_channel_disconnected( UBYTE dti_id ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
474 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
475 UBYTE count = 0; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
476 UBYTE i; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
477 T_DTI_CONN_CHANNEL *dti_channel = dti_conn_find_dti_conn( dti_id ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
478 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
479 TRACE_FUNCTION("dti_conn_is_dti_channel_disconnected()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
480 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
481 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
482 if (dti_channel EQ NULL) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
483 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
484 return TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
485 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
486 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
487 if (dti_channel->state EQ DTI_CONN_STATE_DISCONNECTED) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
488 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
489 return TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
490 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
491 else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
492 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
493 for (i=0; i<dti_channel->num_of_conns; i++) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
494 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
495 if (dti_channel->tuple_list[i].state EQ DTI_CONN_STATE_DISCONNECTED) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
496 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
497 count++; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
498 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
499 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
500 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
501 if (count EQ dti_channel->num_of_conns) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
502 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
503 return TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
504 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
505 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
506 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
507 return FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
508 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
509 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
510 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
511 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
512 +---------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
513 | PROJECT : MODULE : DTI_CONN | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
514 | STATE : code ROUTINE : dti_conn_est_dpath | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
515 +---------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
516 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
517 PURPOSE : establishes data path. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
518 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
519 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
520 GLOBAL BOOL dti_conn_est_dpath( UBYTE dti_id, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
521 T_DTI_ENTITY_ID* entity_list, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
522 UBYTE num_entities, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
523 T_DTI_CONN_MODE mode, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
524 T_DTI_CONN_CB* cb) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
525 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
526 T_DTI_CONN_CHANNEL *dti_channel; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
527 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
528 TRACE_FUNCTION("dti_conn_est_dpath()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
529 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
530 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
531 /*find channel in list */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
532 dti_channel = dti_conn_find_dti_conn (dti_id); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
533 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
534 if (dti_channel EQ NULL) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
535 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
536 TRACE_EVENT_P1("[ERR] dti_conn_est_dpath: dti_channel dti_id=%x not found", | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
537 dti_id); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
538 /* DTI ID not found */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
539 return FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
540 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
541 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
542 if ( entity_list[0] EQ DTI_ENTITY_INVALID OR entity_list[1] EQ DTI_ENTITY_INVALID) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
543 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
544 /* improper entity list */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
545 TRACE_EVENT("[ERR] improper entity list "); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
546 return FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
547 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
548 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
549 /* if 'SPLIT' then the whole DTI channel must be disconnected before a | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
550 * new connection is established | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
551 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
552 if ((mode EQ SPLIT) AND (dti_channel->state NEQ DTI_CONN_STATE_DISCONNECTED)) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
553 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
554 dti_conn_disconnect (dti_channel); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
555 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
556 /* save new entity list to entity list buffer */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
557 memcpy(glob_params.entity_list_buf, entity_list, sizeof(T_DTI_ENTITY_ID)*num_entities); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
558 glob_params.num_entities = num_entities; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
559 glob_params.conn_cb = cb; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
560 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
561 else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
562 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
563 dti_channel->conn_cb = cb; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
564 dti_conn_connect (dti_channel, entity_list, num_entities, mode); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
565 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
566 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
567 return TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
568 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
569 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
570 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
571 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
572 +---------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
573 | PROJECT : MODULE : DTI_CONN | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
574 | STATE : code ROUTINE : dti_conn_close_dpath | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
575 +---------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
576 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
577 PURPOSE : closes a DTI connection | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
578 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
579 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
580 GLOBAL BOOL dti_conn_close_dpath( UBYTE dti_id ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
581 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
582 T_DTI_CONN_CHANNEL *dti_channel; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
583 UBYTE i=0; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
584 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
585 TRACE_FUNCTION("dti_conn_close_dpath()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
586 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
587 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
588 dti_channel = dti_conn_find_dti_conn( dti_id ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
589 if (dti_channel EQ NULL) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
590 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
591 TRACE_EVENT_P1("[ERR] dti_conn_close_dpath: dti_channel dti_id=%x not found", | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
592 dti_id); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
593 return FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
594 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
595 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
596 if (dti_channel->state NEQ DTI_CONN_STATE_DISCONNECTED) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
597 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
598 dti_channel->state = DTI_CONN_STATE_DISCONNECTING; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
599 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
600 dti_conn_disconnect (dti_channel); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
601 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
602 else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
603 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
604 TRACE_EVENT("[ERR] dti_conn_close_dpath: try to close dpath which was DISCONNECTED"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
605 return FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
606 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
607 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
608 return TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
609 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
610 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
611 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
612 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
613 +-----------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
614 | PROJECT : MODULE : DTI_CONN | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
615 | STATE : code ROUTINE : dti_conn_entity_connected | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
616 +-----------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
617 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
618 PURPOSE : response after a DTI connect request. This function is called | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
619 to inform the DTI Connection Manager that a connection is | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
620 established. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
621 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
622 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
623 GLOBAL void dti_conn_entity_connected( T_DTI_CONN_LINK_ID link_id, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
624 T_DTI_ENTITY_ID ent_id, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
625 T_DTI_CONN_RESULT result ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
626 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
627 T_DTI_CONN_CHANNEL *dti_channel; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
628 T_DTI_CONN_TUPLE *tuple; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
629 UBYTE i; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
630 UBYTE dti_id = EXTRACT_DTI_ID(link_id); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
631 BOOL both_entities_connected = FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
632 UBYTE count = 0; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
633 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
634 TRACE_FUNCTION("dti_conn_entity_connected()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
635 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
636 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
637 dti_channel = dti_conn_find_dti_conn( dti_id ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
638 if (dti_channel EQ NULL) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
639 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
640 TRACE_EVENT_P1("[ERR] dti_conn_entity_connected: dti_channel link_id=%x not found", | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
641 link_id); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
642 return; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
643 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
644 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
645 if (result EQ DTI_ERROR) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
646 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
647 /* mark entity as disconnected */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
648 dti_conn_entity_disconnected( link_id, ent_id ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
649 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
650 /* close the whole DTI channel */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
651 dti_conn_close_dpath( dti_id ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
652 return; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
653 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
654 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
655 if (dti_channel->state EQ DTI_CONN_STATE_CONNECTED) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
656 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
657 TRACE_EVENT_P1("dti channel with dti_id=%x already connected", dti_id); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
658 return; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
659 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
660 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
661 tuple = dti_conn_find_dti_tuple( dti_channel, EXTRACT_TUPLE_NO(link_id ) ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
662 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
663 for (i=0; i<NUM_OF_PEERS; i++) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
664 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
665 if (tuple->peers[i].state EQ DTI_CONN_STATE_CONNECTED) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
666 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
667 count++; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
668 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
669 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
670 if (tuple->peers[i].ent_id EQ ent_id) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
671 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
672 if (tuple->peers[i].state EQ DTI_CONN_STATE_CONNECTING) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
673 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
674 tuple->peers[i].state = DTI_CONN_STATE_CONNECTED; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
675 count++; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
676 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
677 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
678 if (count EQ NUM_OF_PEERS) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
679 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
680 both_entities_connected = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
681 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
682 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
683 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
684 /* if both entities are CONNECTED */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
685 if (both_entities_connected) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
686 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
687 tuple->state = DTI_CONN_STATE_CONNECTED; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
688 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
689 /* if all other tuples CONNECTED */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
690 if (dti_conn_is_dti_channel_connected(ent_id, dti_id)) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
691 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
692 dti_channel->state = DTI_CONN_STATE_CONNECTED; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
693 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
694 TRACE_EVENT_P1("DTI ID %d connected", dti_id); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
695 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
696 /* call connect_cb here */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
697 if (dti_channel->conn_cb) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
698 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
699 dti_channel->conn_cb(dti_id, DTI_CONN_STATE_CONNECTED); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
700 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
701 else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
702 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
703 TRACE_EVENT("conn_cb is NULL"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
704 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
705 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
706 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
707 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
708 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
709 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
710 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
711 +-----------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
712 | PROJECT : MODULE : DTI_CONN | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
713 | STATE : code ROUTINE : dti_conn_entity_disconnected | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
714 +-----------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
715 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
716 PURPOSE : response after a DTI connect request. This function is called | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
717 to inform the DTI Connection Manager that a connection is | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
718 closed. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
719 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
720 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
721 GLOBAL void dti_conn_entity_disconnected( T_DTI_CONN_LINK_ID link_id, T_DTI_ENTITY_ID ent_id ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
722 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
723 T_DTI_CONN_CHANNEL *dti_channel; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
724 T_DTI_CONN_TUPLE *tuple; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
725 UBYTE i; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
726 UBYTE dti_id = EXTRACT_DTI_ID(link_id); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
727 UBYTE count = 0; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
728 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
729 TRACE_FUNCTION("dti_conn_entity_disconnected()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
730 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
731 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
732 dti_channel = dti_conn_find_dti_conn( dti_id ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
733 if (dti_channel EQ NULL) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
734 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
735 TRACE_EVENT_P1("[ERR] dti_conn_entity_disconnected: dti_channel link_id=%x not found", | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
736 link_id); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
737 return; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
738 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
739 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
740 if (dti_channel->state EQ DTI_CONN_STATE_DISCONNECTED) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
741 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
742 TRACE_EVENT_P1("dti channel with dti_id=%x already diconnected", dti_id); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
743 return; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
744 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
745 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
746 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
747 tuple = dti_conn_find_dti_tuple( dti_channel, EXTRACT_TUPLE_NO(link_id) ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
748 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
749 for (i=0; i<NUM_OF_PEERS; i++) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
750 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
751 if (tuple->peers[i].state EQ DTI_CONN_STATE_DISCONNECTED) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
752 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
753 count++; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
754 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
755 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
756 /* find disconnected entity */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
757 if (tuple->peers[i].ent_id EQ ent_id) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
758 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
759 tuple->peers[i].state = DTI_CONN_STATE_DISCONNECTED; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
760 tuple->peers[i].ent_id = DTI_ENTITY_INVALID; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
761 count++; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
762 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
763 tuple->state = DTI_CONN_STATE_DISCONNECTING; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
764 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
765 if (dti_channel->state EQ DTI_CONN_STATE_CONNECTED) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
766 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
767 /* set DTI channel state */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
768 dti_channel->state = DTI_CONN_STATE_DISCONNECTING; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
769 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
770 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
771 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
772 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
773 /* if both entities are DISCONNECTED */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
774 if (count EQ NUM_OF_PEERS) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
775 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
776 /* set tuple state */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
777 tuple->state = DTI_CONN_STATE_DISCONNECTED; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
778 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
779 /* if all other tuples DISCONNECTED */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
780 if (dti_conn_is_dti_channel_disconnected(dti_id)) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
781 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
782 dti_channel->state = DTI_CONN_STATE_DISCONNECTED; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
783 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
784 TRACE_EVENT_P1("DTI ID %d disconnected", dti_id); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
785 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
786 /* reset number of conns */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
787 dti_channel->num_of_conns = 0; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
788 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
789 /* call disconnect_cb here */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
790 if (dti_channel->conn_cb) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
791 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
792 dti_channel->conn_cb(dti_id, DTI_CONN_STATE_DISCONNECTED); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
793 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
794 else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
795 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
796 TRACE_EVENT("conn_cb is NULL"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
797 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
798 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
799 if (glob_params.num_entities NEQ 0) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
800 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
801 dti_channel->conn_cb = glob_params.conn_cb; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
802 dti_conn_connect( dti_channel, glob_params.entity_list_buf, glob_params.num_entities, SPLIT ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
803 glob_params.num_entities = 0; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
804 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
805 else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
806 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
807 if (dti_channel->erase_channel EQ TRUE) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
808 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
809 /* erase entry in DTI Conn Mng */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
810 dti_conn_erase_entry(dti_id); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
811 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
812 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
813 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
814 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
815 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
816 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
817 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
818 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
819 +-----------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
820 | PROJECT : MODULE : DTI_CONN | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
821 | STATE : code ROUTINE : dti_conn_close_all_connections| | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
822 +-----------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
823 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
824 PURPOSE : This function is called to close all established DTI | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
825 connections. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
826 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
827 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
828 GLOBAL void dti_conn_close_all_connections() | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
829 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
830 T_DTI_CONN_CHANNEL *dti_channel; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
831 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
832 TRACE_FUNCTION("dti_conn_close_all_connections()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
833 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
834 while(TRUE) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
835 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
836 dti_channel = get_next_element (dti_channel_list, dti_channel); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
837 if (dti_channel EQ NULL) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
838 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
839 return; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
840 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
841 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
842 if (dti_channel->state EQ DTI_CONN_STATE_CONNECTED) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
843 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
844 dti_conn_close_dpath(dti_channel->dti_id); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
845 dti_channel->erase_channel = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
846 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
847 else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
848 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
849 dti_conn_erase_entry(dti_channel->dti_id); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
850 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
851 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
852 } | 
