3 Copyright (c) Eicon Networks, 2002.
5 This source file is supplied for the use with
6 Eicon Networks range of DIVA Server Adapters.
8 Eicon File Revision : 2.1
10 This program is free software; you can redistribute it and/or modify
11 it under the terms of the GNU General Public License as published by
12 the Free Software Foundation; either version 2, or (at your option)
15 This program is distributed in the hope that it will be useful,
16 but WITHOUT ANY WARRANTY OF ANY KIND WHATSOEVER INCLUDING ANY
17 implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
18 See the GNU General Public License for more details.
20 You should have received a copy of the GNU General Public License
21 along with this program; if not, write to the Free Software
22 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
40 #define FILE_ "MESSAGE.C"
51 /*------------------------------------------------------------------*/
52 /* This is options supported for all adapters that are server by */
53 /* XDI driver. Allo it is not necessary to ask it from every adapter*/
54 /* and it is not necessary to save it separate for every adapter */
55 /* Macrose defined here have only local meaning */
56 /*------------------------------------------------------------------*/
57 static dword diva_xdi_extended_features
= 0;
59 #define DIVA_CAPI_USE_CMA 0x00000001
60 #define DIVA_CAPI_XDI_PROVIDES_SDRAM_BAR 0x00000002
61 #define DIVA_CAPI_XDI_PROVIDES_NO_CANCEL 0x00000004
62 #define DIVA_CAPI_XDI_PROVIDES_RX_DMA 0x00000008
65 CAPI can request to process all return codes self only if:
66 protocol code supports this && xdi supports this
68 #define DIVA_CAPI_SUPPORTS_NO_CANCEL(__a__) (((__a__)->manufacturer_features&MANUFACTURER_FEATURE_XONOFF_FLOW_CONTROL)&& ((__a__)->manufacturer_features & MANUFACTURER_FEATURE_OK_FC_LABEL) && (diva_xdi_extended_features & DIVA_CAPI_XDI_PROVIDES_NO_CANCEL))
70 /*------------------------------------------------------------------*/
71 /* local function prototypes */
72 /*------------------------------------------------------------------*/
74 static void group_optimization(DIVA_CAPI_ADAPTER
* a
, PLCI
* plci
);
75 static void set_group_ind_mask (PLCI
*plci
);
76 static void clear_group_ind_mask_bit (PLCI
*plci
, word b
);
77 static byte
test_group_ind_mask_bit (PLCI
*plci
, word b
);
78 void AutomaticLaw(DIVA_CAPI_ADAPTER
*);
79 word
CapiRelease(word
);
80 word
CapiRegister(word
);
81 word
api_put(APPL
*, CAPI_MSG
*);
82 static word
api_parse(byte
*, word
, byte
*, API_PARSE
*);
83 static void api_save_msg(API_PARSE
*in
, byte
*format
, API_SAVE
*out
);
84 static void api_load_msg(API_SAVE
*in
, API_PARSE
*out
);
86 word
api_remove_start(void);
87 void api_remove_complete(void);
89 static void plci_remove(PLCI
*);
90 static void diva_get_extended_adapter_features (DIVA_CAPI_ADAPTER
* a
);
91 static void diva_ask_for_xdi_sdram_bar (DIVA_CAPI_ADAPTER
*, IDI_SYNC_REQ
*);
93 void callback(ENTITY
*);
95 static void control_rc(PLCI
*, byte
, byte
, byte
, byte
, byte
);
96 static void data_rc(PLCI
*, byte
);
97 static void data_ack(PLCI
*, byte
);
98 static void sig_ind(PLCI
*);
99 static void SendInfo(PLCI
*, dword
, byte
* *, byte
);
100 static void SendSetupInfo(APPL
*, PLCI
*, dword
, byte
* *, byte
);
101 static void SendSSExtInd(APPL
*, PLCI
* plci
, dword Id
, byte
* * parms
);
103 static void VSwitchReqInd(PLCI
*plci
, dword Id
, byte
**parms
);
105 static void nl_ind(PLCI
*);
107 static byte
connect_req(dword
, word
, DIVA_CAPI_ADAPTER
*, PLCI
*, APPL
*, API_PARSE
*);
108 static byte
connect_res(dword
, word
, DIVA_CAPI_ADAPTER
*, PLCI
*, APPL
*, API_PARSE
*);
109 static byte
connect_a_res(dword
,word
, DIVA_CAPI_ADAPTER
*, PLCI
*, APPL
*, API_PARSE
*);
110 static byte
disconnect_req(dword
, word
, DIVA_CAPI_ADAPTER
*, PLCI
*, APPL
*, API_PARSE
*);
111 static byte
disconnect_res(dword
, word
, DIVA_CAPI_ADAPTER
*, PLCI
*, APPL
*, API_PARSE
*);
112 static byte
listen_req(dword
, word
, DIVA_CAPI_ADAPTER
*, PLCI
*, APPL
*, API_PARSE
*);
113 static byte
info_req(dword
, word
, DIVA_CAPI_ADAPTER
*, PLCI
*, APPL
*, API_PARSE
*);
114 static byte
info_res(dword
, word
, DIVA_CAPI_ADAPTER
*, PLCI
*, APPL
*, API_PARSE
*);
115 static byte
alert_req(dword
, word
, DIVA_CAPI_ADAPTER
*, PLCI
*, APPL
*, API_PARSE
*);
116 static byte
facility_req(dword
, word
, DIVA_CAPI_ADAPTER
*, PLCI
*, APPL
*, API_PARSE
*);
117 static byte
facility_res(dword
, word
, DIVA_CAPI_ADAPTER
*, PLCI
*, APPL
*, API_PARSE
*);
118 static byte
connect_b3_req(dword
, word
, DIVA_CAPI_ADAPTER
*, PLCI
*, APPL
*, API_PARSE
*);
119 static byte
connect_b3_res(dword
, word
, DIVA_CAPI_ADAPTER
*, PLCI
*, APPL
*, API_PARSE
*);
120 static byte
connect_b3_a_res(dword
, word
, DIVA_CAPI_ADAPTER
*, PLCI
*, APPL
*, API_PARSE
*);
121 static byte
disconnect_b3_req(dword
, word
, DIVA_CAPI_ADAPTER
*, PLCI
*, APPL
*, API_PARSE
*);
122 static byte
disconnect_b3_res(dword
, word
, DIVA_CAPI_ADAPTER
*, PLCI
*, APPL
*, API_PARSE
*);
123 static byte
data_b3_req(dword
, word
, DIVA_CAPI_ADAPTER
*, PLCI
*, APPL
*, API_PARSE
*);
124 static byte
data_b3_res(dword
, word
, DIVA_CAPI_ADAPTER
*, PLCI
*, APPL
*, API_PARSE
*);
125 static byte
reset_b3_req(dword
, word
, DIVA_CAPI_ADAPTER
*, PLCI
*, APPL
*, API_PARSE
*);
126 static byte
reset_b3_res(dword
, word
, DIVA_CAPI_ADAPTER
*, PLCI
*, APPL
*, API_PARSE
*);
127 static byte
connect_b3_t90_a_res(dword
, word
, DIVA_CAPI_ADAPTER
*, PLCI
*, APPL
*, API_PARSE
*);
128 static byte
select_b_req(dword
, word
, DIVA_CAPI_ADAPTER
*, PLCI
*, APPL
*, API_PARSE
*);
129 static byte
manufacturer_req(dword
, word
, DIVA_CAPI_ADAPTER
*, PLCI
*, APPL
*, API_PARSE
*);
130 static byte
manufacturer_res(dword
, word
, DIVA_CAPI_ADAPTER
*, PLCI
*, APPL
*, API_PARSE
*);
132 static word
get_plci(DIVA_CAPI_ADAPTER
*);
133 static void add_p(PLCI
*, byte
, byte
*);
134 static void add_s(PLCI
* plci
, byte code
, API_PARSE
* p
);
135 static void add_ss(PLCI
* plci
, byte code
, API_PARSE
* p
);
136 static void add_ie(PLCI
* plci
, byte code
, byte
* p
, word p_length
);
137 static void add_d(PLCI
*, word
, byte
*);
138 static void add_ai(PLCI
*, API_PARSE
*);
139 static word
add_b1(PLCI
*, API_PARSE
*, word
, word
);
140 static word
add_b23(PLCI
*, API_PARSE
*);
141 static word
add_modem_b23 (PLCI
* plci
, API_PARSE
* bp_parms
);
142 static void sig_req(PLCI
*, byte
, byte
);
143 static void nl_req_ncci(PLCI
*, byte
, byte
);
144 static void send_req(PLCI
*);
145 static void send_data(PLCI
*);
146 static word
plci_remove_check(PLCI
*);
147 static void listen_check(DIVA_CAPI_ADAPTER
*);
148 static byte
AddInfo(byte
**, byte
**, byte
*, byte
*);
149 static byte
getChannel(API_PARSE
*);
150 static void IndParse(PLCI
*, word
*, byte
**, byte
);
151 static byte
ie_compare(byte
*, byte
*);
152 static word
find_cip(DIVA_CAPI_ADAPTER
*, byte
*, byte
*);
153 static word
CPN_filter_ok(byte
*cpn
,DIVA_CAPI_ADAPTER
*,word
);
158 static void channel_flow_control_remove (PLCI
* plci
);
159 static void channel_x_off (PLCI
* plci
, byte ch
, byte flag
);
160 static void channel_x_on (PLCI
* plci
, byte ch
);
161 static void channel_request_xon (PLCI
* plci
, byte ch
);
162 static void channel_xmit_xon (PLCI
* plci
);
163 static int channel_can_xon (PLCI
* plci
, byte ch
);
164 static void channel_xmit_extended_xon (PLCI
* plci
);
166 static byte
SendMultiIE(PLCI
* plci
, dword Id
, byte
* * parms
, byte ie_type
, dword info_mask
, byte setupParse
);
167 static word
AdvCodecSupport(DIVA_CAPI_ADAPTER
*, PLCI
*, APPL
*, byte
);
168 static void CodecIdCheck(DIVA_CAPI_ADAPTER
*, PLCI
*);
169 static void SetVoiceChannel(PLCI
*, byte
*, DIVA_CAPI_ADAPTER
* );
170 static void VoiceChannelOff(PLCI
*plci
);
171 static void adv_voice_write_coefs (PLCI
*plci
, word write_command
);
172 static void adv_voice_clear_config (PLCI
*plci
);
174 static word
get_b1_facilities (PLCI
* plci
, byte b1_resource
);
175 static byte
add_b1_facilities (PLCI
* plci
, byte b1_resource
, word b1_facilities
);
176 static void adjust_b1_facilities (PLCI
*plci
, byte new_b1_resource
, word new_b1_facilities
);
177 static word
adjust_b_process (dword Id
, PLCI
*plci
, byte Rc
);
178 static void adjust_b1_resource (dword Id
, PLCI
*plci
, API_SAVE
*bp_msg
, word b1_facilities
, word internal_command
);
179 static void adjust_b_restore (dword Id
, PLCI
*plci
, byte Rc
);
180 static void reset_b3_command (dword Id
, PLCI
*plci
, byte Rc
);
181 static void select_b_command (dword Id
, PLCI
*plci
, byte Rc
);
182 static void fax_connect_ack_command (dword Id
, PLCI
*plci
, byte Rc
);
183 static void fax_edata_ack_command (dword Id
, PLCI
*plci
, byte Rc
);
184 static void fax_connect_info_command (dword Id
, PLCI
*plci
, byte Rc
);
185 static void fax_adjust_b23_command (dword Id
, PLCI
*plci
, byte Rc
);
186 static void fax_disconnect_command (dword Id
, PLCI
*plci
, byte Rc
);
187 static void hold_save_command (dword Id
, PLCI
*plci
, byte Rc
);
188 static void retrieve_restore_command (dword Id
, PLCI
*plci
, byte Rc
);
189 static void init_b1_config (PLCI
*plci
);
190 static void clear_b1_config (PLCI
*plci
);
192 static void dtmf_command (dword Id
, PLCI
*plci
, byte Rc
);
193 static byte
dtmf_request (dword Id
, word Number
, DIVA_CAPI_ADAPTER
*a
, PLCI
*plci
, APPL
*appl
, API_PARSE
*msg
);
194 static void dtmf_confirmation (dword Id
, PLCI
*plci
);
195 static void dtmf_indication (dword Id
, PLCI
*plci
, byte
*msg
, word length
);
196 static void dtmf_parameter_write (PLCI
*plci
);
199 static void mixer_set_bchannel_id_esc (PLCI
*plci
, byte bchannel_id
);
200 static void mixer_set_bchannel_id (PLCI
*plci
, byte
*chi
);
201 static void mixer_clear_config (PLCI
*plci
);
202 static void mixer_notify_update (PLCI
*plci
, byte others
);
203 static void mixer_command (dword Id
, PLCI
*plci
, byte Rc
);
204 static byte
mixer_request (dword Id
, word Number
, DIVA_CAPI_ADAPTER
*a
, PLCI
*plci
, APPL
*appl
, API_PARSE
*msg
);
205 static void mixer_indication_coefs_set (dword Id
, PLCI
*plci
);
206 static void mixer_indication_xconnect_from (dword Id
, PLCI
*plci
, byte
*msg
, word length
);
207 static void mixer_indication_xconnect_to (dword Id
, PLCI
*plci
, byte
*msg
, word length
);
208 static void mixer_remove (PLCI
*plci
);
211 static void ec_command (dword Id
, PLCI
*plci
, byte Rc
);
212 static byte
ec_request (dword Id
, word Number
, DIVA_CAPI_ADAPTER
*a
, PLCI
*plci
, APPL
*appl
, API_PARSE
*msg
);
213 static void ec_indication (dword Id
, PLCI
*plci
, byte
*msg
, word length
);
216 static void rtp_connect_b3_req_command (dword Id
, PLCI
*plci
, byte Rc
);
217 static void rtp_connect_b3_res_command (dword Id
, PLCI
*plci
, byte Rc
);
220 static int diva_get_dma_descriptor (PLCI
*plci
, dword
*dma_magic
);
221 static void diva_free_dma_descriptor (PLCI
*plci
, int nr
);
223 /*------------------------------------------------------------------*/
224 /* external function prototypes */
225 /*------------------------------------------------------------------*/
227 extern byte
MapController (byte
);
228 extern byte
UnMapController (byte
);
229 #define MapId(Id) (((Id) & 0xffffff00L) | MapController ((byte)(Id)))
230 #define UnMapId(Id) (((Id) & 0xffffff00L) | UnMapController ((byte)(Id)))
232 void sendf(APPL
*, word
, dword
, word
, byte
*, ...);
233 void * TransmitBufferSet(APPL
* appl
, dword ref
);
234 void * TransmitBufferGet(APPL
* appl
, void * p
);
235 void TransmitBufferFree(APPL
* appl
, void * p
);
236 void * ReceiveBufferGet(APPL
* appl
, int Num
);
238 int fax_head_line_time (char *buffer
);
241 /*------------------------------------------------------------------*/
242 /* Global data definitions */
243 /*------------------------------------------------------------------*/
244 extern byte max_adapter
;
245 extern byte max_appl
;
246 extern DIVA_CAPI_ADAPTER
* adapter
;
247 extern APPL
* application
;
255 static byte remove_started
= false;
256 static PLCI dummy_plci
;
259 static struct _ftable
{
262 byte (* function
)(dword
, word
, DIVA_CAPI_ADAPTER
*, PLCI
*, APPL
*, API_PARSE
*);
264 {_DATA_B3_R
, "dwww", data_b3_req
},
265 {_DATA_B3_I
|RESPONSE
, "w", data_b3_res
},
266 {_INFO_R
, "ss", info_req
},
267 {_INFO_I
|RESPONSE
, "", info_res
},
268 {_CONNECT_R
, "wsssssssss", connect_req
},
269 {_CONNECT_I
|RESPONSE
, "wsssss", connect_res
},
270 {_CONNECT_ACTIVE_I
|RESPONSE
, "", connect_a_res
},
271 {_DISCONNECT_R
, "s", disconnect_req
},
272 {_DISCONNECT_I
|RESPONSE
, "", disconnect_res
},
273 {_LISTEN_R
, "dddss", listen_req
},
274 {_ALERT_R
, "s", alert_req
},
275 {_FACILITY_R
, "ws", facility_req
},
276 {_FACILITY_I
|RESPONSE
, "ws", facility_res
},
277 {_CONNECT_B3_R
, "s", connect_b3_req
},
278 {_CONNECT_B3_I
|RESPONSE
, "ws", connect_b3_res
},
279 {_CONNECT_B3_ACTIVE_I
|RESPONSE
, "", connect_b3_a_res
},
280 {_DISCONNECT_B3_R
, "s", disconnect_b3_req
},
281 {_DISCONNECT_B3_I
|RESPONSE
, "", disconnect_b3_res
},
282 {_RESET_B3_R
, "s", reset_b3_req
},
283 {_RESET_B3_I
|RESPONSE
, "", reset_b3_res
},
284 {_CONNECT_B3_T90_ACTIVE_I
|RESPONSE
, "ws", connect_b3_t90_a_res
},
285 {_CONNECT_B3_T90_ACTIVE_I
|RESPONSE
, "", connect_b3_t90_a_res
},
286 {_SELECT_B_REQ
, "s", select_b_req
},
287 {_MANUFACTURER_R
, "dws", manufacturer_req
},
288 {_MANUFACTURER_I
|RESPONSE
, "dws", manufacturer_res
},
289 {_MANUFACTURER_I
|RESPONSE
, "", manufacturer_res
}
292 static byte
* cip_bc
[29][2] = {
294 { "\x03\x80\x90\xa3", "\x03\x80\x90\xa2" }, /* 1 */
295 { "\x02\x88\x90", "\x02\x88\x90" }, /* 2 */
296 { "\x02\x89\x90", "\x02\x89\x90" }, /* 3 */
297 { "\x03\x90\x90\xa3", "\x03\x90\x90\xa2" }, /* 4 */
298 { "\x03\x91\x90\xa5", "\x03\x91\x90\xa5" }, /* 5 */
299 { "\x02\x98\x90", "\x02\x98\x90" }, /* 6 */
300 { "\x04\x88\xc0\xc6\xe6", "\x04\x88\xc0\xc6\xe6" }, /* 7 */
301 { "\x04\x88\x90\x21\x8f", "\x04\x88\x90\x21\x8f" }, /* 8 */
302 { "\x03\x91\x90\xa5", "\x03\x91\x90\xa5" }, /* 9 */
310 { "\x03\x80\x90\xa3", "\x03\x80\x90\xa2" }, /* 16 */
311 { "\x03\x90\x90\xa3", "\x03\x90\x90\xa2" }, /* 17 */
312 { "\x02\x88\x90", "\x02\x88\x90" }, /* 18 */
313 { "\x02\x88\x90", "\x02\x88\x90" }, /* 19 */
314 { "\x02\x88\x90", "\x02\x88\x90" }, /* 20 */
315 { "\x02\x88\x90", "\x02\x88\x90" }, /* 21 */
316 { "\x02\x88\x90", "\x02\x88\x90" }, /* 22 */
317 { "\x02\x88\x90", "\x02\x88\x90" }, /* 23 */
318 { "\x02\x88\x90", "\x02\x88\x90" }, /* 24 */
319 { "\x02\x88\x90", "\x02\x88\x90" }, /* 25 */
320 { "\x03\x91\x90\xa5", "\x03\x91\x90\xa5" }, /* 26 */
321 { "\x03\x91\x90\xa5", "\x03\x91\x90\xa5" }, /* 27 */
322 { "\x02\x88\x90", "\x02\x88\x90" } /* 28 */
325 static byte
* cip_hlc
[29] = {
343 "\x02\x91\x81", /* 16 */
344 "\x02\x91\x84", /* 17 */
345 "\x02\x91\xa1", /* 18 */
346 "\x02\x91\xa4", /* 19 */
347 "\x02\x91\xa8", /* 20 */
348 "\x02\x91\xb1", /* 21 */
349 "\x02\x91\xb2", /* 22 */
350 "\x02\x91\xb5", /* 23 */
351 "\x02\x91\xb8", /* 24 */
352 "\x02\x91\xc1", /* 25 */
353 "\x02\x91\x81", /* 26 */
354 "\x03\x91\xe0\x01", /* 27 */
355 "\x03\x91\xe0\x02" /* 28 */
358 /*------------------------------------------------------------------*/
360 #define V120_HEADER_LENGTH 1
361 #define V120_HEADER_EXTEND_BIT 0x80
362 #define V120_HEADER_BREAK_BIT 0x40
363 #define V120_HEADER_C1_BIT 0x04
364 #define V120_HEADER_C2_BIT 0x08
365 #define V120_HEADER_FLUSH_COND (V120_HEADER_BREAK_BIT | V120_HEADER_C1_BIT | V120_HEADER_C2_BIT)
367 static byte v120_default_header
[] =
370 0x83 /* Ext, BR , res, res, C2 , C1 , B , F */
374 static byte v120_break_header
[] =
377 0xc3 | V120_HEADER_BREAK_BIT
/* Ext, BR , res, res, C2 , C1 , B , F */
382 /*------------------------------------------------------------------*/
383 /* API_PUT function */
384 /*------------------------------------------------------------------*/
386 word
api_put(APPL
* appl
, CAPI_MSG
* msg
)
392 DIVA_CAPI_ADAPTER
* a
;
397 API_PARSE msg_parms
[MAX_MSG_PARMS
+1];
399 if (msg
->header
.length
< sizeof (msg
->header
) ||
400 msg
->header
.length
> MAX_MSG_SIZE
) {
401 dbug(1,dprintf("bad len"));
405 controller
= (byte
)((msg
->header
.controller
&0x7f)-1);
407 /* controller starts with 0 up to (max_adapter - 1) */
408 if ( controller
>= max_adapter
)
410 dbug(1,dprintf("invalid ctrl"));
414 a
= &adapter
[controller
];
416 if ((msg
->header
.plci
!= 0) && (msg
->header
.plci
<= a
->max_plci
) && !a
->adapter_disabled
)
418 dbug(1,dprintf("plci=%x",msg
->header
.plci
));
419 plci
= &a
->plci
[msg
->header
.plci
-1];
420 ncci
= GET_WORD(&msg
->header
.ncci
);
423 || (plci
->State
== INC_CON_PENDING
)
424 || (plci
->State
== INC_CON_ALERT
)
425 || (msg
->header
.command
== (_DISCONNECT_I
|RESPONSE
)))
427 || (msg
->header
.command
== (_DISCONNECT_B3_I
|RESPONSE
))
428 || ((ncci
< MAX_NCCI
+1) && (a
->ncci_plci
[ncci
] == plci
->Id
))))
430 i
= plci
->msg_in_read_pos
;
431 j
= plci
->msg_in_write_pos
;
434 if (j
+ msg
->header
.length
+ MSG_IN_OVERHEAD
<= MSG_IN_QUEUE_SIZE
)
435 i
+= MSG_IN_QUEUE_SIZE
- j
;
442 n
= (((CAPI_MSG
*)(plci
->msg_in_queue
))->header
.length
+ MSG_IN_OVERHEAD
+ 3) & 0xfffc;
444 if (i
> MSG_IN_QUEUE_SIZE
- n
)
445 i
= MSG_IN_QUEUE_SIZE
- n
+ 1;
449 if (i
<= ((msg
->header
.length
+ MSG_IN_OVERHEAD
+ 3) & 0xfffc))
452 dbug(0,dprintf("Q-FULL1(msg) - len=%d write=%d read=%d wrap=%d free=%d",
453 msg
->header
.length
, plci
->msg_in_write_pos
,
454 plci
->msg_in_read_pos
, plci
->msg_in_wrap_pos
, i
));
459 if ((((byte
*) msg
) < ((byte
*)(plci
->msg_in_queue
)))
460 || (((byte
*) msg
) >= ((byte
*)(plci
->msg_in_queue
)) + sizeof(plci
->msg_in_queue
)))
462 if (plci
->msg_in_write_pos
!= plci
->msg_in_read_pos
)
465 if (msg
->header
.command
== _DATA_B3_R
)
467 if (msg
->header
.length
< 20)
469 dbug(1,dprintf("DATA_B3 REQ wrong length %d", msg
->header
.length
));
472 ncci_ptr
= &(a
->ncci
[ncci
]);
473 n
= ncci_ptr
->data_pending
;
474 l
= ncci_ptr
->data_ack_pending
;
475 k
= plci
->msg_in_read_pos
;
476 while (k
!= plci
->msg_in_write_pos
)
478 if (k
== plci
->msg_in_wrap_pos
)
480 if ((((CAPI_MSG
*)(&((byte
*)(plci
->msg_in_queue
))[k
]))->header
.command
== _DATA_B3_R
)
481 && (((CAPI_MSG
*)(&((byte
*)(plci
->msg_in_queue
))[k
]))->header
.ncci
== ncci
))
484 if (((CAPI_MSG
*)(&((byte
*)(plci
->msg_in_queue
))[k
]))->info
.data_b3_req
.Flags
& 0x0004)
488 k
+= (((CAPI_MSG
*)(&((byte
*)(plci
->msg_in_queue
))[k
]))->header
.length
+
489 MSG_IN_OVERHEAD
+ 3) & 0xfffc;
492 if ((n
>= MAX_DATA_B3
) || (l
>= MAX_DATA_ACK
))
494 dbug(0,dprintf("Q-FULL2(data) - pending=%d/%d ack_pending=%d/%d",
495 ncci_ptr
->data_pending
, n
, ncci_ptr
->data_ack_pending
, l
));
499 if (plci
->req_in
|| plci
->internal_command
)
501 if ((((byte
*) msg
) >= ((byte
*)(plci
->msg_in_queue
)))
502 && (((byte
*) msg
) < ((byte
*)(plci
->msg_in_queue
)) + sizeof(plci
->msg_in_queue
)))
504 dbug(0,dprintf("Q-FULL3(requeue)"));
513 if (plci
->req_in
|| plci
->internal_command
)
517 plci
->command
= msg
->header
.command
;
518 plci
->number
= msg
->header
.number
;
523 dbug(1,dprintf("enqueue msg(0x%04x,0x%x,0x%x) - len=%d write=%d read=%d wrap=%d free=%d",
524 msg
->header
.command
, plci
->req_in
, plci
->internal_command
,
525 msg
->header
.length
, plci
->msg_in_write_pos
,
526 plci
->msg_in_read_pos
, plci
->msg_in_wrap_pos
, i
));
528 plci
->msg_in_wrap_pos
= plci
->msg_in_write_pos
;
529 m
= (CAPI_MSG
*)(&((byte
*)(plci
->msg_in_queue
))[j
]);
530 for (i
= 0; i
< msg
->header
.length
; i
++)
531 ((byte
*)(plci
->msg_in_queue
))[j
++] = ((byte
*) msg
)[i
];
532 if (m
->header
.command
== _DATA_B3_R
)
535 m
->info
.data_b3_req
.Data
= (dword
)(long)(TransmitBufferSet (appl
, m
->info
.data_b3_req
.Data
));
539 j
= (j
+ 3) & 0xfffc;
541 *((APPL
* *)(&((byte
*)(plci
->msg_in_queue
))[j
])) = appl
;
542 plci
->msg_in_write_pos
= j
+ MSG_IN_OVERHEAD
;
551 dbug(1,dprintf("com=%x",msg
->header
.command
));
553 for(j
=0;j
<MAX_MSG_PARMS
+1;j
++) msg_parms
[j
].length
= 0;
554 for(i
=0, ret
= _BAD_MSG
; i
< ARRAY_SIZE(ftable
); i
++) {
556 if(ftable
[i
].command
==msg
->header
.command
) {
557 /* break loop if the message is correct, otherwise continue scan */
558 /* (for example: CONNECT_B3_T90_ACT_RES has two specifications) */
559 if(!api_parse(msg
->info
.b
,(word
)(msg
->header
.length
-12),ftable
[i
].format
,msg_parms
)) {
563 for(j
=0;j
<MAX_MSG_PARMS
+1;j
++) msg_parms
[j
].length
= 0;
567 dbug(1,dprintf("BAD_MSG"));
568 if(plci
) plci
->command
= 0;
573 c
= ftable
[i
].function(GET_DWORD(&msg
->header
.controller
),
580 channel_xmit_extended_xon (plci
);
582 if(c
==1) send_req(plci
);
583 if(c
==2 && plci
) plci
->req_in
= plci
->req_in_start
= plci
->req_out
= 0;
584 if(plci
&& !plci
->req_in
) plci
->command
= 0;
589 /*------------------------------------------------------------------*/
590 /* api_parse function, check the format of api messages */
591 /*------------------------------------------------------------------*/
593 static word
api_parse(byte
*msg
, word length
, byte
*format
, API_PARSE
*parms
)
598 for(i
=0,p
=0; format
[i
]; i
++) {
601 parms
[i
].info
= &msg
[p
];
616 parms
[i
].length
= msg
[p
+1] + (msg
[p
+2]<<8);
617 p
+=(parms
[i
].length
+3);
620 parms
[i
].length
= msg
[p
];
621 p
+=(parms
[i
].length
+1);
626 if(p
>length
) return true;
628 if(parms
) parms
[i
].info
= NULL
;
632 static void api_save_msg(API_PARSE
*in
, byte
*format
, API_SAVE
*out
)
638 for (i
= 0; format
[i
] != '\0'; i
++)
640 out
->parms
[i
].info
= p
;
641 out
->parms
[i
].length
= in
[i
].length
;
654 n
= in
[i
].length
+ 1;
657 for (j
= 0; j
< n
; j
++)
658 *(p
++) = in
[i
].info
[j
];
660 out
->parms
[i
].info
= NULL
;
661 out
->parms
[i
].length
= 0;
664 static void api_load_msg(API_SAVE
*in
, API_PARSE
*out
)
671 out
[i
].info
= in
->parms
[i
].info
;
672 out
[i
].length
= in
->parms
[i
].length
;
673 } while (in
->parms
[i
++].info
);
677 /*------------------------------------------------------------------*/
678 /* CAPI remove function */
679 /*------------------------------------------------------------------*/
681 word
api_remove_start(void)
686 if(!remove_started
) {
687 remove_started
= true;
688 for(i
=0;i
<max_adapter
;i
++) {
689 if(adapter
[i
].request
) {
690 for(j
=0;j
<adapter
[i
].max_plci
;j
++) {
691 if(adapter
[i
].plci
[j
].Sig
.Id
) plci_remove(&adapter
[i
].plci
[j
]);
698 for(i
=0;i
<max_adapter
;i
++) {
699 if(adapter
[i
].request
) {
700 for(j
=0;j
<adapter
[i
].max_plci
;j
++) {
701 if(adapter
[i
].plci
[j
].Sig
.Id
) return 1;
706 api_remove_complete();
711 /*------------------------------------------------------------------*/
712 /* internal command queue */
713 /*------------------------------------------------------------------*/
715 static void init_internal_command_queue (PLCI
*plci
)
719 dbug (1, dprintf ("%s,%d: init_internal_command_queue",
720 (char *)(FILE_
), __LINE__
));
722 plci
->internal_command
= 0;
723 for (i
= 0; i
< MAX_INTERNAL_COMMAND_LEVELS
; i
++)
724 plci
->internal_command_queue
[i
] = NULL
;
728 static void start_internal_command (dword Id
, PLCI
*plci
, t_std_internal_command command_function
)
732 dbug (1, dprintf ("[%06lx] %s,%d: start_internal_command",
733 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
735 if (plci
->internal_command
== 0)
737 plci
->internal_command_queue
[0] = command_function
;
738 (* command_function
)(Id
, plci
, OK
);
743 while (plci
->internal_command_queue
[i
] != NULL
)
745 plci
->internal_command_queue
[i
] = command_function
;
750 static void next_internal_command (dword Id
, PLCI
*plci
)
754 dbug (1, dprintf ("[%06lx] %s,%d: next_internal_command",
755 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
757 plci
->internal_command
= 0;
758 plci
->internal_command_queue
[0] = NULL
;
759 while (plci
->internal_command_queue
[1] != NULL
)
761 for (i
= 0; i
< MAX_INTERNAL_COMMAND_LEVELS
- 1; i
++)
762 plci
->internal_command_queue
[i
] = plci
->internal_command_queue
[i
+1];
763 plci
->internal_command_queue
[MAX_INTERNAL_COMMAND_LEVELS
- 1] = NULL
;
764 (*(plci
->internal_command_queue
[0]))(Id
, plci
, OK
);
765 if (plci
->internal_command
!= 0)
767 plci
->internal_command_queue
[0] = NULL
;
772 /*------------------------------------------------------------------*/
773 /* NCCI allocate/remove function */
774 /*------------------------------------------------------------------*/
776 static dword ncci_mapping_bug
= 0;
778 static word
get_ncci (PLCI
*plci
, byte ch
, word force_ncci
)
780 DIVA_CAPI_ADAPTER
*a
;
784 if (!ch
|| a
->ch_ncci
[ch
])
787 dbug(1,dprintf("NCCI mapping exists %ld %02x %02x %02x-%02x",
788 ncci_mapping_bug
, ch
, force_ncci
, a
->ncci_ch
[a
->ch_ncci
[ch
]], a
->ch_ncci
[ch
]));
797 if ((ch
< MAX_NCCI
+1) && !a
->ncci_ch
[ch
])
802 while ((ncci
< MAX_NCCI
+1) && a
->ncci_ch
[ncci
])
804 if (ncci
== MAX_NCCI
+1)
811 while ((j
< MAX_NCCI
+1) && (a
->ncci_ch
[j
] != i
))
819 } while ((j
< MAX_NCCI
+1) && (a
->ncci_ch
[j
] != i
));
821 } while ((i
< MAX_NL_CHANNEL
+1) && (j
< MAX_NCCI
+1));
822 if (i
< MAX_NL_CHANNEL
+1)
824 dbug(1,dprintf("NCCI mapping overflow %ld %02x %02x %02x-%02x-%02x",
825 ncci_mapping_bug
, ch
, force_ncci
, i
, k
, j
));
829 dbug(1,dprintf("NCCI mapping overflow %ld %02x %02x",
830 ncci_mapping_bug
, ch
, force_ncci
));
835 a
->ncci_plci
[ncci
] = plci
->Id
;
836 a
->ncci_state
[ncci
] = IDLE
;
837 if (!plci
->ncci_ring_list
)
838 plci
->ncci_ring_list
= ncci
;
840 a
->ncci_next
[ncci
] = a
->ncci_next
[plci
->ncci_ring_list
];
841 a
->ncci_next
[plci
->ncci_ring_list
] = (byte
) ncci
;
843 a
->ncci_ch
[ncci
] = ch
;
844 a
->ch_ncci
[ch
] = (byte
) ncci
;
845 dbug(1,dprintf("NCCI mapping established %ld %02x %02x %02x-%02x",
846 ncci_mapping_bug
, ch
, force_ncci
, ch
, ncci
));
852 static void ncci_free_receive_buffers (PLCI
*plci
, word ncci
)
854 DIVA_CAPI_ADAPTER
*a
;
860 Id
= (((dword
) ncci
) << 16) | (((word
)(plci
->Id
)) << 8) | a
->Id
;
863 if (a
->ncci_plci
[ncci
] == plci
->Id
)
868 dbug(1,dprintf("NCCI mapping appl expected %ld %08lx",
869 ncci_mapping_bug
, Id
));
874 ncci_code
= ncci
| (((word
) a
->Id
) << 8);
875 for (i
= 0; i
< appl
->MaxBuffer
; i
++)
877 if ((appl
->DataNCCI
[i
] == ncci_code
)
878 && (((byte
)(appl
->DataFlags
[i
] >> 8)) == plci
->Id
))
880 appl
->DataNCCI
[i
] = 0;
888 for (ncci
= 1; ncci
< MAX_NCCI
+1; ncci
++)
890 if (a
->ncci_plci
[ncci
] == plci
->Id
)
895 dbug(1,dprintf("NCCI mapping no appl %ld %08lx",
896 ncci_mapping_bug
, Id
));
901 ncci_code
= ncci
| (((word
) a
->Id
) << 8);
902 for (i
= 0; i
< appl
->MaxBuffer
; i
++)
904 if ((appl
->DataNCCI
[i
] == ncci_code
)
905 && (((byte
)(appl
->DataFlags
[i
] >> 8)) == plci
->Id
))
907 appl
->DataNCCI
[i
] = 0;
917 static void cleanup_ncci_data (PLCI
*plci
, word ncci
)
921 if (ncci
&& (plci
->adapter
->ncci_plci
[ncci
] == plci
->Id
))
923 ncci_ptr
= &(plci
->adapter
->ncci
[ncci
]);
926 while (ncci_ptr
->data_pending
!= 0)
928 if (!plci
->data_sent
|| (ncci_ptr
->DBuffer
[ncci_ptr
->data_out
].P
!= plci
->data_sent_ptr
))
929 TransmitBufferFree (plci
->appl
, ncci_ptr
->DBuffer
[ncci_ptr
->data_out
].P
);
930 (ncci_ptr
->data_out
)++;
931 if (ncci_ptr
->data_out
== MAX_DATA_B3
)
932 ncci_ptr
->data_out
= 0;
933 (ncci_ptr
->data_pending
)--;
936 ncci_ptr
->data_out
= 0;
937 ncci_ptr
->data_pending
= 0;
938 ncci_ptr
->data_ack_out
= 0;
939 ncci_ptr
->data_ack_pending
= 0;
944 static void ncci_remove (PLCI
*plci
, word ncci
, byte preserve_ncci
)
946 DIVA_CAPI_ADAPTER
*a
;
951 Id
= (((dword
) ncci
) << 16) | (((word
)(plci
->Id
)) << 8) | a
->Id
;
953 ncci_free_receive_buffers (plci
, ncci
);
956 if (a
->ncci_plci
[ncci
] != plci
->Id
)
959 dbug(1,dprintf("NCCI mapping doesn't exist %ld %08lx %02x",
960 ncci_mapping_bug
, Id
, preserve_ncci
));
964 cleanup_ncci_data (plci
, ncci
);
965 dbug(1,dprintf("NCCI mapping released %ld %08lx %02x %02x-%02x",
966 ncci_mapping_bug
, Id
, preserve_ncci
, a
->ncci_ch
[ncci
], ncci
));
967 a
->ch_ncci
[a
->ncci_ch
[ncci
]] = 0;
970 a
->ncci_ch
[ncci
] = 0;
971 a
->ncci_plci
[ncci
] = 0;
972 a
->ncci_state
[ncci
] = IDLE
;
973 i
= plci
->ncci_ring_list
;
974 while ((i
!= 0) && (a
->ncci_next
[i
] != plci
->ncci_ring_list
) && (a
->ncci_next
[i
] != ncci
))
976 if ((i
!= 0) && (a
->ncci_next
[i
] == ncci
))
979 plci
->ncci_ring_list
= 0;
980 else if (plci
->ncci_ring_list
== ncci
)
981 plci
->ncci_ring_list
= i
;
982 a
->ncci_next
[i
] = a
->ncci_next
[ncci
];
984 a
->ncci_next
[ncci
] = 0;
990 for (ncci
= 1; ncci
< MAX_NCCI
+1; ncci
++)
992 if (a
->ncci_plci
[ncci
] == plci
->Id
)
994 cleanup_ncci_data (plci
, ncci
);
995 dbug(1,dprintf("NCCI mapping released %ld %08lx %02x %02x-%02x",
996 ncci_mapping_bug
, Id
, preserve_ncci
, a
->ncci_ch
[ncci
], ncci
));
997 a
->ch_ncci
[a
->ncci_ch
[ncci
]] = 0;
1000 a
->ncci_ch
[ncci
] = 0;
1001 a
->ncci_plci
[ncci
] = 0;
1002 a
->ncci_state
[ncci
] = IDLE
;
1003 a
->ncci_next
[ncci
] = 0;
1008 plci
->ncci_ring_list
= 0;
1013 /*------------------------------------------------------------------*/
1014 /* PLCI remove function */
1015 /*------------------------------------------------------------------*/
1017 static void plci_free_msg_in_queue (PLCI
*plci
)
1023 i
= plci
->msg_in_read_pos
;
1024 while (i
!= plci
->msg_in_write_pos
)
1026 if (i
== plci
->msg_in_wrap_pos
)
1028 if (((CAPI_MSG
*)(&((byte
*)(plci
->msg_in_queue
))[i
]))->header
.command
== _DATA_B3_R
)
1031 TransmitBufferFree (plci
->appl
,
1032 (byte
*)(long)(((CAPI_MSG
*)(&((byte
*)(plci
->msg_in_queue
))[i
]))->info
.data_b3_req
.Data
));
1036 i
+= (((CAPI_MSG
*)(&((byte
*)(plci
->msg_in_queue
))[i
]))->header
.length
+
1037 MSG_IN_OVERHEAD
+ 3) & 0xfffc;
1041 plci
->msg_in_write_pos
= MSG_IN_QUEUE_SIZE
;
1042 plci
->msg_in_read_pos
= MSG_IN_QUEUE_SIZE
;
1043 plci
->msg_in_wrap_pos
= MSG_IN_QUEUE_SIZE
;
1047 static void plci_remove(PLCI
* plci
)
1051 dbug(1,dprintf("plci_remove(no plci)"));
1054 init_internal_command_queue (plci
);
1055 dbug(1,dprintf("plci_remove(%x,tel=%x)",plci
->Id
,plci
->tel
));
1056 if(plci_remove_check(plci
))
1060 if (plci
->Sig
.Id
== 0xff)
1062 dbug(1,dprintf("D-channel X.25 plci->NL.Id:%0x", plci
->NL
.Id
));
1063 if (plci
->NL
.Id
&& !plci
->nl_remove_id
)
1065 nl_req_ncci(plci
,REMOVE
,0);
1071 if (!plci
->sig_remove_id
1073 || (plci
->req_in
!=plci
->req_out
)
1074 || (plci
->nl_req
|| plci
->sig_req
)))
1076 sig_req(plci
,HANGUP
,0);
1080 ncci_remove (plci
, 0, false);
1081 plci_free_msg_in_queue (plci
);
1085 if ((plci
->State
== INC_CON_PENDING
) || (plci
->State
== INC_CON_ALERT
))
1086 plci
->State
= OUTG_DIS_PENDING
;
1089 /*------------------------------------------------------------------*/
1090 /* Application Group function helpers */
1091 /*------------------------------------------------------------------*/
1093 static void set_group_ind_mask (PLCI
*plci
)
1097 for (i
= 0; i
< C_IND_MASK_DWORDS
; i
++)
1098 plci
->group_optimization_mask_table
[i
] = 0xffffffffL
;
1101 static void clear_group_ind_mask_bit (PLCI
*plci
, word b
)
1103 plci
->group_optimization_mask_table
[b
>> 5] &= ~(1L << (b
& 0x1f));
1106 static byte
test_group_ind_mask_bit (PLCI
*plci
, word b
)
1108 return ((plci
->group_optimization_mask_table
[b
>> 5] & (1L << (b
& 0x1f))) != 0);
1111 /*------------------------------------------------------------------*/
1112 /* c_ind_mask operations for arbitrary MAX_APPL */
1113 /*------------------------------------------------------------------*/
1115 static void clear_c_ind_mask (PLCI
*plci
)
1119 for (i
= 0; i
< C_IND_MASK_DWORDS
; i
++)
1120 plci
->c_ind_mask_table
[i
] = 0;
1123 static byte
c_ind_mask_empty (PLCI
*plci
)
1128 while ((i
< C_IND_MASK_DWORDS
) && (plci
->c_ind_mask_table
[i
] == 0))
1130 return (i
== C_IND_MASK_DWORDS
);
1133 static void set_c_ind_mask_bit (PLCI
*plci
, word b
)
1135 plci
->c_ind_mask_table
[b
>> 5] |= (1L << (b
& 0x1f));
1138 static void clear_c_ind_mask_bit (PLCI
*plci
, word b
)
1140 plci
->c_ind_mask_table
[b
>> 5] &= ~(1L << (b
& 0x1f));
1143 static byte
test_c_ind_mask_bit (PLCI
*plci
, word b
)
1145 return ((plci
->c_ind_mask_table
[b
>> 5] & (1L << (b
& 0x1f))) != 0);
1148 static void dump_c_ind_mask (PLCI
*plci
)
1150 static char hex_digit_table
[0x10] =
1151 {'0','1','2','3','4','5','6','7','8','9','a','b','c','d','e','f'};
1157 for (i
= 0; i
< C_IND_MASK_DWORDS
; i
+= 4)
1161 for (j
= 0; j
< 4; j
++)
1163 if (i
+j
< C_IND_MASK_DWORDS
)
1165 d
= plci
->c_ind_mask_table
[i
+j
];
1166 for (k
= 0; k
< 8; k
++)
1168 *(--p
) = hex_digit_table
[d
& 0xf];
1174 for (k
= 0; k
< 8; k
++)
1179 dbug(1,dprintf ("c_ind_mask =%s", (char *) p
));
1187 #define dump_plcis(a)
1191 /*------------------------------------------------------------------*/
1192 /* translation function for each message */
1193 /*------------------------------------------------------------------*/
1195 static byte
connect_req(dword Id
, word Number
, DIVA_CAPI_ADAPTER
*a
,
1196 PLCI
*plci
, APPL
*appl
, API_PARSE
*parms
)
1205 API_PARSE ai_parms
[5];
1209 static byte esc_chi
[35] = {0x02,0x18,0x01};
1210 static byte lli
[2] = {0x01,0x00};
1215 for(i
=0;i
<5;i
++) ai_parms
[i
].length
= 0;
1217 dbug(1,dprintf("connect_req(%d)",parms
->length
));
1218 Info
= _WRONG_IDENTIFIER
;
1221 if(a
->adapter_disabled
)
1223 dbug(1,dprintf("adapter disabled"));
1224 Id
= ((word
)1<<8)|a
->Id
;
1225 sendf(appl
,_CONNECT_R
|CONFIRM
,Id
,Number
,"w",0);
1226 sendf(appl
, _DISCONNECT_I
, Id
, 0, "w", _L1_ERROR
);
1229 Info
= _OUT_OF_PLCI
;
1233 plci
= &a
->plci
[i
-1];
1235 plci
->call_dir
= CALL_DIR_OUT
| CALL_DIR_ORIGINATE
;
1236 /* check 'external controller' bit for codec support */
1237 if(Id
& EXT_CONTROLLER
)
1239 if(AdvCodecSupport(a
, plci
, appl
, 0) )
1242 sendf(appl
, _CONNECT_R
|CONFIRM
, Id
, Number
, "w", _WRONG_IDENTIFIER
);
1249 if(bp
->length
)LinkLayer
= bp
->info
[3];
1254 if(!api_parse(&ai
->info
[1],(word
)ai
->length
,"ssss",ai_parms
))
1257 if(ai_parms
[0].length
)
1259 ch
= GET_WORD(ai_parms
[0].info
+1);
1260 if(ch
>4) ch
=0; /* safety -> ignore ChannelID */
1261 if(ch
==4) /* explizit CHI in message */
1263 /* check length of B-CH struct */
1264 if((ai_parms
[0].info
)[3]>=1)
1266 if((ai_parms
[0].info
)[4]==CHI
)
1268 p_chi
= &((ai_parms
[0].info
)[5]);
1272 p_chi
= &((ai_parms
[0].info
)[3]);
1274 if(p_chi
[0]>35) /* check length of channel ID */
1276 Info
= _WRONG_MESSAGE_FORMAT
;
1279 else Info
= _WRONG_MESSAGE_FORMAT
;
1282 if(ch
==3 && ai_parms
[0].length
>=7 && ai_parms
[0].length
<=36)
1284 dir
= GET_WORD(ai_parms
[0].info
+3);
1287 for(i
=0; i
+5<=ai_parms
[0].length
; i
++)
1289 if(ai_parms
[0].info
[i
+5]!=0)
1291 if((ai_parms
[0].info
[i
+5] | m
) != 0xff)
1292 Info
= _WRONG_MESSAGE_FORMAT
;
1303 Info
= _WRONG_MESSAGE_FORMAT
;
1306 if ((ai_parms
[0].length
== 36) || (ch_mask
!= ((dword
)(1L << channel
))))
1308 esc_chi
[0] = (byte
)(ai_parms
[0].length
- 2);
1309 for(i
=0; i
+5<=ai_parms
[0].length
; i
++)
1310 esc_chi
[i
+3] = ai_parms
[0].info
[i
+5];
1314 esc_chi
[2] = (byte
)channel
;
1315 plci
->b_channel
= (byte
)channel
; /* not correct for ETSI ch 17..31 */
1316 add_p(plci
,LLI
,lli
);
1317 add_p(plci
,ESC
,esc_chi
);
1318 plci
->State
= LOCAL_CONNECT
;
1319 if(!dir
) plci
->call_dir
|= CALL_DIR_FORCE_OUTG_NL
; /* dir 0=DTE, 1=DCE */
1324 else Info
= _WRONG_MESSAGE_FORMAT
;
1327 dbug(1,dprintf("ch=%x,dir=%x,p_ch=%d",ch
,dir
,channel
));
1328 plci
->command
= _CONNECT_R
;
1329 plci
->number
= Number
;
1330 /* x.31 or D-ch free SAPI in LinkLayer? */
1331 if(ch
==1 && LinkLayer
!=3 && LinkLayer
!=12) noCh
= true;
1332 if((ch
==0 || ch
==2 || noCh
|| ch
==3 || ch
==4) && !Info
)
1334 /* B-channel used for B3 connections (ch==0), or no B channel */
1335 /* is used (ch==2) or perm. connection (3) is used do a CALL */
1336 if(noCh
) Info
= add_b1(plci
,&parms
[5],2,0); /* no resource */
1337 else Info
= add_b1(plci
,&parms
[5],ch
,0);
1338 add_s(plci
,OAD
,&parms
[2]);
1339 add_s(plci
,OSA
,&parms
[4]);
1340 add_s(plci
,BC
,&parms
[6]);
1341 add_s(plci
,LLC
,&parms
[7]);
1342 add_s(plci
,HLC
,&parms
[8]);
1343 CIP
= GET_WORD(parms
[0].info
);
1344 if (a
->Info_Mask
[appl
->Id
-1] & 0x200)
1346 /* early B3 connect (CIP mask bit 9) no release after a disc */
1347 add_p(plci
,LLI
,"\x01\x01");
1349 if(GET_WORD(parms
[0].info
)<29) {
1350 add_p(plci
,BC
,cip_bc
[GET_WORD(parms
[0].info
)][a
->u_law
]);
1351 add_p(plci
,HLC
,cip_hlc
[GET_WORD(parms
[0].info
)]);
1353 add_p(plci
,UID
,"\x06\x43\x61\x70\x69\x32\x30");
1354 sig_req(plci
,ASSIGN
,DSIG_ID
);
1358 /* D-Channel used for B3 connections */
1359 plci
->Sig
.Id
= 0xff;
1363 if(!Info
&& ch
!=2 && !noCh
) {
1364 Info
= add_b23(plci
,&parms
[5]);
1366 if(!(plci
->tel
&& !plci
->adv_nl
))nl_req_ncci(plci
,ASSIGN
,0);
1372 if(ch
==0 || ch
==2 || ch
==3 || noCh
|| ch
==4)
1374 if(plci
->spoofed_msg
==SPOOFING_REQUIRED
)
1376 api_save_msg(parms
, "wsssssssss", &plci
->saved_msg
);
1377 plci
->spoofed_msg
= CALL_REQ
;
1378 plci
->internal_command
= BLOCK_PLCI
;
1380 dbug(1,dprintf("Spoof"));
1384 if(ch
==4)add_p(plci
,CHI
,p_chi
);
1385 add_s(plci
,CPN
,&parms
[1]);
1386 add_s(plci
,DSA
,&parms
[3]);
1387 if(noCh
) add_p(plci
,ESC
,"\x02\x18\xfd"); /* D-channel, no B-L3 */
1388 add_ai(plci
,&parms
[9]);
1389 if(!dir
)sig_req(plci
,CALL_REQ
,0);
1392 plci
->command
= PERM_LIST_REQ
;
1394 sig_req(plci
,LISTEN_REQ
,0);
1413 static byte
connect_res(dword Id
, word Number
, DIVA_CAPI_ADAPTER
*a
,
1414 PLCI
*plci
, APPL
*appl
, API_PARSE
*parms
)
1418 static byte cau_t
[] = {0,0,0x90,0x91,0xac,0x9d,0x86,0xd8,0x9b};
1419 static byte esc_t
[] = {0x03,0x08,0x00,0x00};
1421 API_PARSE ai_parms
[5];
1425 dbug(1,dprintf("connect_res(no plci)"));
1426 return 0; /* no plci, no send */
1429 dbug(1,dprintf("connect_res(State=0x%x)",plci
->State
));
1430 for(i
=0;i
<5;i
++) ai_parms
[i
].length
= 0;
1432 dbug(1,dprintf("ai->length=%d",ai
->length
));
1436 if(!api_parse(&ai
->info
[1],(word
)ai
->length
,"ssss",ai_parms
))
1438 dbug(1,dprintf("ai_parms[0].length=%d/0x%x",ai_parms
[0].length
,GET_WORD(ai_parms
[0].info
+1)));
1440 if(ai_parms
[0].length
)
1442 ch
= GET_WORD(ai_parms
[0].info
+1);
1443 dbug(1,dprintf("BCH-I=0x%x",ch
));
1448 if(plci
->State
==INC_CON_CONNECTED_ALERT
)
1450 dbug(1,dprintf("Connected Alert Call_Res"));
1451 if (a
->Info_Mask
[appl
->Id
-1] & 0x200)
1453 /* early B3 connect (CIP mask bit 9) no release after a disc */
1454 add_p(plci
,LLI
,"\x01\x01");
1456 add_s(plci
, CONN_NR
, &parms
[2]);
1457 add_s(plci
, LLC
, &parms
[4]);
1458 add_ai(plci
, &parms
[5]);
1459 plci
->State
= INC_CON_ACCEPT
;
1460 sig_req(plci
, CALL_RES
,0);
1463 else if(plci
->State
==INC_CON_PENDING
|| plci
->State
==INC_CON_ALERT
) {
1464 clear_c_ind_mask_bit (plci
, (word
)(appl
->Id
-1));
1465 dump_c_ind_mask (plci
);
1466 Reject
= GET_WORD(parms
[0].info
);
1467 dbug(1,dprintf("Reject=0x%x",Reject
));
1470 if(c_ind_mask_empty (plci
))
1472 if((Reject
&0xff00)==0x3400)
1474 esc_t
[2] = ((byte
)(Reject
&0x00ff)) | 0x80;
1475 add_p(plci
,ESC
,esc_t
);
1476 add_ai(plci
, &parms
[5]);
1477 sig_req(plci
,REJECT
,0);
1479 else if(Reject
==1 || Reject
>9)
1481 add_ai(plci
, &parms
[5]);
1482 sig_req(plci
,HANGUP
,0);
1486 esc_t
[2] = cau_t
[(Reject
&0x000f)];
1487 add_p(plci
,ESC
,esc_t
);
1488 add_ai(plci
, &parms
[5]);
1489 sig_req(plci
,REJECT
,0);
1495 sendf(appl
, _DISCONNECT_I
, Id
, 0, "w", _OTHER_APPL_CONNECTED
);
1500 if(Id
& EXT_CONTROLLER
){
1501 if(AdvCodecSupport(a
, plci
, appl
, 0)){
1502 dbug(1,dprintf("connect_res(error from AdvCodecSupport)"));
1503 sig_req(plci
,HANGUP
,0);
1506 if(plci
->tel
== ADV_VOICE
&& a
->AdvCodecPLCI
)
1508 Info
= add_b23(plci
, &parms
[1]);
1511 dbug(1,dprintf("connect_res(error from add_b23)"));
1512 sig_req(plci
,HANGUP
,0);
1517 nl_req_ncci(plci
, ASSIGN
, 0);
1526 Info
= add_b23(plci
, &parms
[1]);
1529 dbug(1,dprintf("connect_res(error from add_b23 2)"));
1530 sig_req(plci
,HANGUP
,0);
1534 nl_req_ncci(plci
, ASSIGN
, 0);
1537 if(plci
->spoofed_msg
==SPOOFING_REQUIRED
)
1539 api_save_msg(parms
, "wsssss", &plci
->saved_msg
);
1540 plci
->spoofed_msg
= CALL_RES
;
1541 plci
->internal_command
= BLOCK_PLCI
;
1543 dbug(1,dprintf("Spoof"));
1547 add_b1 (plci
, &parms
[1], ch
, plci
->B1_facilities
);
1548 if (a
->Info_Mask
[appl
->Id
-1] & 0x200)
1550 /* early B3 connect (CIP mask bit 9) no release after a disc */
1551 add_p(plci
,LLI
,"\x01\x01");
1553 add_s(plci
, CONN_NR
, &parms
[2]);
1554 add_s(plci
, LLC
, &parms
[4]);
1555 add_ai(plci
, &parms
[5]);
1556 plci
->State
= INC_CON_ACCEPT
;
1557 sig_req(plci
, CALL_RES
,0);
1560 for(i
=0; i
<max_appl
; i
++) {
1561 if(test_c_ind_mask_bit (plci
, i
)) {
1562 sendf(&application
[i
], _DISCONNECT_I
, Id
, 0, "w", _OTHER_APPL_CONNECTED
);
1570 static byte
connect_a_res(dword Id
, word Number
, DIVA_CAPI_ADAPTER
*a
,
1571 PLCI
*plci
, APPL
*appl
, API_PARSE
*msg
)
1573 dbug(1,dprintf("connect_a_res"));
1577 static byte
disconnect_req(dword Id
, word Number
, DIVA_CAPI_ADAPTER
*a
,
1578 PLCI
*plci
, APPL
*appl
, API_PARSE
*msg
)
1583 dbug(1,dprintf("disconnect_req"));
1585 Info
= _WRONG_IDENTIFIER
;
1589 if(plci
->State
==INC_CON_PENDING
|| plci
->State
==INC_CON_ALERT
)
1591 clear_c_ind_mask_bit (plci
, (word
)(appl
->Id
-1));
1593 for(i
=0; i
<max_appl
; i
++)
1595 if(test_c_ind_mask_bit (plci
, i
))
1596 sendf(&application
[i
], _DISCONNECT_I
, Id
, 0, "w", 0);
1598 plci
->State
= OUTG_DIS_PENDING
;
1600 if(plci
->Sig
.Id
&& plci
->appl
)
1603 if(plci
->Sig
.Id
!=0xff)
1605 if(plci
->State
!=INC_DIS_PENDING
)
1607 add_ai(plci
, &msg
[0]);
1608 sig_req(plci
,HANGUP
,0);
1609 plci
->State
= OUTG_DIS_PENDING
;
1615 if (plci
->NL
.Id
&& !plci
->nl_remove_id
)
1617 mixer_remove (plci
);
1618 nl_req_ncci(plci
,REMOVE
,0);
1619 sendf(appl
,_DISCONNECT_R
|CONFIRM
,Id
,Number
,"w",0);
1620 sendf(appl
, _DISCONNECT_I
, Id
, 0, "w", 0);
1621 plci
->State
= INC_DIS_PENDING
;
1628 if(!appl
) return false;
1629 sendf(appl
, _DISCONNECT_R
|CONFIRM
, Id
, Number
, "w",Info
);
1633 static byte
disconnect_res(dword Id
, word Number
, DIVA_CAPI_ADAPTER
*a
,
1634 PLCI
*plci
, APPL
*appl
, API_PARSE
*msg
)
1636 dbug(1,dprintf("disconnect_res"));
1639 /* clear ind mask bit, just in case of collsion of */
1640 /* DISCONNECT_IND and CONNECT_RES */
1641 clear_c_ind_mask_bit (plci
, (word
)(appl
->Id
-1));
1642 ncci_free_receive_buffers (plci
, 0);
1643 if(plci_remove_check(plci
))
1647 if(plci
->State
==INC_DIS_PENDING
1648 || plci
->State
==SUSPENDING
) {
1649 if(c_ind_mask_empty (plci
)) {
1650 if(plci
->State
!=SUSPENDING
)plci
->State
= IDLE
;
1651 dbug(1,dprintf("chs=%d",plci
->channels
));
1652 if(!plci
->channels
) {
1661 static byte
listen_req(dword Id
, word Number
, DIVA_CAPI_ADAPTER
*a
,
1662 PLCI
*plci
, APPL
*appl
, API_PARSE
*parms
)
1667 dbug(1,dprintf("listen_req(Appl=0x%x)",appl
->Id
));
1669 Info
= _WRONG_IDENTIFIER
;
1672 a
->Info_Mask
[appl
->Id
-1] = GET_DWORD(parms
[0].info
);
1673 a
->CIP_Mask
[appl
->Id
-1] = GET_DWORD(parms
[1].info
);
1674 dbug(1,dprintf("CIP_MASK=0x%lx",GET_DWORD(parms
[1].info
)));
1675 if (a
->Info_Mask
[appl
->Id
-1] & 0x200){ /* early B3 connect provides */
1676 a
->Info_Mask
[appl
->Id
-1] |= 0x10; /* call progression infos */
1679 /* check if external controller listen and switch listen on or off*/
1680 if(Id
&EXT_CONTROLLER
&& GET_DWORD(parms
[1].info
)){
1681 if(a
->profile
.Global_Options
& ON_BOARD_CODEC
) {
1682 dummy_plci
.State
= IDLE
;
1683 a
->codec_listen
[appl
->Id
-1] = &dummy_plci
;
1684 a
->TelOAD
[0] = (byte
)(parms
[3].length
);
1685 for(i
=1;parms
[3].length
>=i
&& i
<22;i
++) {
1686 a
->TelOAD
[i
] = parms
[3].info
[i
];
1689 a
->TelOSA
[0] = (byte
)(parms
[4].length
);
1690 for(i
=1;parms
[4].length
>=i
&& i
<22;i
++) {
1691 a
->TelOSA
[i
] = parms
[4].info
[i
];
1695 else Info
= 0x2002; /* wrong controller, codec not supported */
1697 else{ /* clear listen */
1698 a
->codec_listen
[appl
->Id
-1] = (PLCI
*)0;
1707 if (a
) listen_check(a
);
1711 static byte
info_req(dword Id
, word Number
, DIVA_CAPI_ADAPTER
*a
,
1712 PLCI
*plci
, APPL
*appl
, API_PARSE
*msg
)
1716 PLCI
* rc_plci
= NULL
;
1717 API_PARSE ai_parms
[5];
1720 dbug(1,dprintf("info_req"));
1721 for(i
=0;i
<5;i
++) ai_parms
[i
].length
= 0;
1727 if(api_parse(&ai
->info
[1],(word
)ai
->length
,"ssss",ai_parms
))
1729 dbug(1,dprintf("AddInfo wrong"));
1730 Info
= _WRONG_MESSAGE_FORMAT
;
1733 if(!a
) Info
= _WRONG_STATE
;
1736 { /* no fac, with CPN, or KEY */
1738 if(!ai_parms
[3].length
&& plci
->State
&& (msg
[0].length
|| ai_parms
[1].length
) )
1740 /* overlap sending option */
1741 dbug(1,dprintf("OvlSnd"));
1742 add_s(plci
,CPN
,&msg
[0]);
1743 add_s(plci
,KEY
,&ai_parms
[1]);
1744 sig_req(plci
,INFO_REQ
,0);
1749 if(plci
->State
&& ai_parms
[2].length
)
1751 /* User_Info option */
1752 dbug(1,dprintf("UUI"));
1753 add_s(plci
,UUI
,&ai_parms
[2]);
1754 sig_req(plci
,USER_DATA
,0);
1756 else if(plci
->State
&& ai_parms
[3].length
)
1758 /* Facility option */
1759 dbug(1,dprintf("FAC"));
1760 add_s(plci
,CPN
,&msg
[0]);
1761 add_ai(plci
, &msg
[1]);
1762 sig_req(plci
,FACILITY_REQ
,0);
1766 Info
= _WRONG_STATE
;
1769 else if((ai_parms
[1].length
|| ai_parms
[2].length
|| ai_parms
[3].length
) && !Info
)
1771 /* NCR_Facility option -> send UUI and Keypad too */
1772 dbug(1,dprintf("NCR_FAC"));
1775 rc_plci
= &a
->plci
[i
-1];
1776 appl
->NullCREnable
= true;
1777 rc_plci
->internal_command
= C_NCR_FAC_REQ
;
1778 rc_plci
->appl
= appl
;
1779 add_p(rc_plci
,CAI
,"\x01\x80");
1780 add_p(rc_plci
,UID
,"\x06\x43\x61\x70\x69\x32\x30");
1781 sig_req(rc_plci
,ASSIGN
,DSIG_ID
);
1786 Info
= _OUT_OF_PLCI
;
1791 add_s(rc_plci
,CPN
,&msg
[0]);
1792 add_ai(rc_plci
, &msg
[1]);
1793 sig_req(rc_plci
,NCR_FACILITY
,0);
1796 /* for application controlled supplementary services */
1802 Info
= _WRONG_MESSAGE_FORMAT
;
1810 { /* appl is not assigned to a PLCI or error condition */
1811 dbug(1,dprintf("localInfoCon"));
1821 static byte
info_res(dword Id
, word Number
, DIVA_CAPI_ADAPTER
*a
,
1822 PLCI
*plci
, APPL
*appl
, API_PARSE
*msg
)
1824 dbug(1,dprintf("info_res"));
1828 static byte
alert_req(dword Id
, word Number
, DIVA_CAPI_ADAPTER
*a
,
1829 PLCI
*plci
, APPL
*appl
, API_PARSE
*msg
)
1834 dbug(1,dprintf("alert_req"));
1836 Info
= _WRONG_IDENTIFIER
;
1839 Info
= _ALERT_IGNORED
;
1840 if(plci
->State
!=INC_CON_ALERT
) {
1841 Info
= _WRONG_STATE
;
1842 if(plci
->State
==INC_CON_PENDING
) {
1844 plci
->State
=INC_CON_ALERT
;
1845 add_ai(plci
, &msg
[0]);
1846 sig_req(plci
,CALL_ALERT
,0);
1859 static byte
facility_req(dword Id
, word Number
, DIVA_CAPI_ADAPTER
*a
,
1860 PLCI
*plci
, APPL
*appl
, API_PARSE
*msg
)
1867 long relatedPLCIvalue
;
1868 DIVA_CAPI_ADAPTER
* relatedadapter
;
1869 byte
* SSparms
= "";
1870 byte RCparms
[] = "\x05\x00\x00\x02\x00\x00";
1871 byte SSstruct
[] = "\x09\x00\x00\x06\x00\x00\x00\x00\x00\x00";
1873 API_PARSE ss_parms
[11];
1879 dbug(1,dprintf("facility_req"));
1880 for(i
=0;i
<9;i
++) ss_parms
[i
].length
= 0;
1886 dbug(1,dprintf("wrong Ctrl"));
1887 Info
= _WRONG_IDENTIFIER
;
1890 selector
= GET_WORD(msg
[0].info
);
1896 case SELECTOR_HANDSET
:
1897 Info
= AdvCodecSupport(a
, plci
, appl
, HOOK_SUPPORT
);
1900 case SELECTOR_SU_SERV
:
1903 Info
= _WRONG_MESSAGE_FORMAT
;
1906 SSreq
= GET_WORD(&(msg
[1].info
[1]));
1907 PUT_WORD(&RCparms
[1],SSreq
);
1911 case S_GET_SUPPORTED_SERVICES
:
1914 rplci
= &a
->plci
[i
-1];
1916 add_p(rplci
,CAI
,"\x01\x80");
1917 add_p(rplci
,UID
,"\x06\x43\x61\x70\x69\x32\x30");
1918 sig_req(rplci
,ASSIGN
,DSIG_ID
);
1923 PUT_DWORD(&SSstruct
[6], MASK_TERMINAL_PORTABILITY
);
1924 SSparms
= (byte
*)SSstruct
;
1927 rplci
->internal_command
= GETSERV_REQ_PEND
;
1928 rplci
->number
= Number
;
1930 sig_req(rplci
,S_SUPPORTED
,0);
1936 if(parms
->length
==7)
1938 if(api_parse(&parms
->info
[1],(word
)parms
->length
,"wbd",ss_parms
))
1940 dbug(1,dprintf("format wrong"));
1941 Info
= _WRONG_MESSAGE_FORMAT
;
1947 Info
= _WRONG_MESSAGE_FORMAT
;
1950 a
->Notification_Mask
[appl
->Id
-1] = GET_DWORD(ss_parms
[2].info
);
1951 if(a
->Notification_Mask
[appl
->Id
-1] & SMASK_MWI
) /* MWI active? */
1955 rplci
= &a
->plci
[i
-1];
1957 add_p(rplci
,CAI
,"\x01\x80");
1958 add_p(rplci
,UID
,"\x06\x43\x61\x70\x69\x32\x30");
1959 sig_req(rplci
,ASSIGN
,DSIG_ID
);
1966 rplci
->internal_command
= GET_MWI_STATE
;
1967 rplci
->number
= Number
;
1968 sig_req(rplci
,MWI_POLL
,0);
1974 api_parse(&parms
->info
[1],(word
)parms
->length
,"ws",ss_parms
);
1975 if(plci
&& plci
->State
&& plci
->SuppState
==IDLE
)
1977 plci
->SuppState
= HOLD_REQUEST
;
1978 plci
->command
= C_HOLD_REQ
;
1979 add_s(plci
,CAI
,&ss_parms
[1]);
1980 sig_req(plci
,CALL_HOLD
,0);
1984 else Info
= 0x3010; /* wrong state */
1987 if(plci
&& plci
->State
&& plci
->SuppState
==CALL_HELD
)
1989 if(Id
& EXT_CONTROLLER
)
1991 if(AdvCodecSupport(a
, plci
, appl
, 0))
1993 Info
= 0x3010; /* wrong state */
1999 plci
->SuppState
= RETRIEVE_REQUEST
;
2000 plci
->command
= C_RETRIEVE_REQ
;
2001 if(plci
->spoofed_msg
==SPOOFING_REQUIRED
)
2003 plci
->spoofed_msg
= CALL_RETRIEVE
;
2004 plci
->internal_command
= BLOCK_PLCI
;
2006 dbug(1,dprintf("Spoof"));
2011 sig_req(plci
,CALL_RETRIEVE
,0);
2016 else Info
= 0x3010; /* wrong state */
2021 if(api_parse(&parms
->info
[1],(word
)parms
->length
,"wbs",ss_parms
))
2023 dbug(1,dprintf("format wrong"));
2024 Info
= _WRONG_MESSAGE_FORMAT
;
2028 if(plci
&& plci
->State
)
2030 add_s(plci
,CAI
,&ss_parms
[2]);
2031 plci
->command
= SUSPEND_REQ
;
2032 sig_req(plci
,SUSPEND
,0);
2033 plci
->State
= SUSPENDING
;
2036 else Info
= 0x3010; /* wrong state */
2040 if(!(i
=get_plci(a
)) )
2042 Info
= _OUT_OF_PLCI
;
2045 rplci
= &a
->plci
[i
-1];
2047 rplci
->number
= Number
;
2049 rplci
->call_dir
= CALL_DIR_OUT
| CALL_DIR_ORIGINATE
;
2050 /* check 'external controller' bit for codec support */
2051 if(Id
& EXT_CONTROLLER
)
2053 if(AdvCodecSupport(a
, rplci
, appl
, 0) )
2062 if(api_parse(&parms
->info
[1],(word
)parms
->length
,"wbs",ss_parms
))
2064 dbug(1,dprintf("format wrong"));
2066 Info
= _WRONG_MESSAGE_FORMAT
;
2071 dummy
.info
= "\x00";
2072 add_b1(rplci
, &dummy
, 0, 0);
2073 if (a
->Info_Mask
[appl
->Id
-1] & 0x200)
2075 /* early B3 connect (CIP mask bit 9) no release after a disc */
2076 add_p(rplci
,LLI
,"\x01\x01");
2078 add_p(rplci
,UID
,"\x06\x43\x61\x70\x69\x32\x30");
2079 sig_req(rplci
,ASSIGN
,DSIG_ID
);
2081 add_s(rplci
,CAI
,&ss_parms
[2]);
2082 rplci
->command
= RESUME_REQ
;
2083 sig_req(rplci
,RESUME
,0);
2084 rplci
->State
= RESUMING
;
2088 case S_CONF_BEGIN
: /* Request */
2090 case S_CONF_ISOLATE
:
2091 case S_CONF_REATTACH
:
2092 if(api_parse(&parms
->info
[1],(word
)parms
->length
,"wbd",ss_parms
))
2094 dbug(1,dprintf("format wrong"));
2095 Info
= _WRONG_MESSAGE_FORMAT
;
2098 if(plci
&& plci
->State
&& ((plci
->SuppState
==IDLE
)||(plci
->SuppState
==CALL_HELD
)))
2100 d
= GET_DWORD(ss_parms
[2].info
);
2103 dbug(1,dprintf("format wrong"));
2104 Info
= _WRONG_MESSAGE_FORMAT
;
2107 plci
->ptyState
= (byte
)SSreq
;
2113 cai
[1] = CONF_BEGIN
;
2114 plci
->internal_command
= CONF_BEGIN_REQ_PEND
;
2118 plci
->internal_command
= CONF_DROP_REQ_PEND
;
2120 case S_CONF_ISOLATE
:
2121 cai
[1] = CONF_ISOLATE
;
2122 plci
->internal_command
= CONF_ISOLATE_REQ_PEND
;
2124 case S_CONF_REATTACH
:
2125 cai
[1] = CONF_REATTACH
;
2126 plci
->internal_command
= CONF_REATTACH_REQ_PEND
;
2129 cai
[2] = (byte
)d
; /* Conference Size resp. PartyId */
2130 add_p(plci
,CAI
,cai
);
2131 sig_req(plci
,S_SERVICE
,0);
2135 else Info
= 0x3010; /* wrong state */
2142 if(parms
->length
==7)
2144 if(api_parse(&parms
->info
[1],(word
)parms
->length
,"wbd",ss_parms
))
2146 dbug(1,dprintf("format wrong"));
2147 Info
= _WRONG_MESSAGE_FORMAT
;
2151 else if(parms
->length
==8) /* workaround for the T-View-S */
2153 if(api_parse(&parms
->info
[1],(word
)parms
->length
,"wbdb",ss_parms
))
2155 dbug(1,dprintf("format wrong"));
2156 Info
= _WRONG_MESSAGE_FORMAT
;
2162 Info
= _WRONG_MESSAGE_FORMAT
;
2167 Info
= _WRONG_MESSAGE_FORMAT
;
2172 Info
= _WRONG_IDENTIFIER
;
2175 relatedPLCIvalue
= GET_DWORD(ss_parms
[2].info
);
2176 relatedPLCIvalue
&= 0x0000FFFF;
2177 dbug(1,dprintf("PTY/ECT/addCONF,relPLCI=%lx",relatedPLCIvalue
));
2178 /* controller starts with 0 up to (max_adapter - 1) */
2179 if (((relatedPLCIvalue
& 0x7f) == 0)
2180 || (MapController ((byte
)(relatedPLCIvalue
& 0x7f)) == 0)
2181 || (MapController ((byte
)(relatedPLCIvalue
& 0x7f)) > max_adapter
))
2183 if(SSreq
==S_3PTY_END
)
2185 dbug(1, dprintf("wrong Controller use 2nd PLCI=PLCI"));
2190 Info
= 0x3010; /* wrong state */
2196 relatedadapter
= &adapter
[MapController ((byte
)(relatedPLCIvalue
& 0x7f))-1];
2197 relatedPLCIvalue
>>=8;
2199 for(i
=0,rplci
=NULL
;i
<relatedadapter
->max_plci
;i
++)
2201 if(relatedadapter
->plci
[i
].Id
== (byte
)relatedPLCIvalue
)
2203 rplci
= &relatedadapter
->plci
[i
];
2206 if(!rplci
|| !relatedPLCIvalue
)
2208 if(SSreq
==S_3PTY_END
)
2210 dbug(1, dprintf("use 2nd PLCI=PLCI"));
2215 Info
= 0x3010; /* wrong state */
2221 dbug(1,dprintf("rplci:%x",rplci));
2222 dbug(1,dprintf("plci:%x",plci));
2223 dbug(1,dprintf("rplci->ptyState:%x",rplci->ptyState));
2224 dbug(1,dprintf("plci->ptyState:%x",plci->ptyState));
2225 dbug(1,dprintf("SSreq:%x",SSreq));
2226 dbug(1,dprintf("rplci->internal_command:%x",rplci->internal_command));
2227 dbug(1,dprintf("rplci->appl:%x",rplci->appl));
2228 dbug(1,dprintf("rplci->Id:%x",rplci->Id));
2230 /* send PTY/ECT req, cannot check all states because of US stuff */
2231 if( !rplci
->internal_command
&& rplci
->appl
)
2234 rplci
->relatedPTYPLCI
= plci
;
2235 plci
->relatedPTYPLCI
= rplci
;
2236 rplci
->ptyState
= (byte
)SSreq
;
2239 rplci
->internal_command
= ECT_REQ_PEND
;
2240 cai
[1] = ECT_EXECUTE
;
2242 rplci
->vswitchstate
=0;
2244 rplci
->vsprotdialect
=0;
2245 plci
->vswitchstate
=0;
2247 plci
->vsprotdialect
=0;
2250 else if(SSreq
==S_CONF_ADD
)
2252 rplci
->internal_command
= CONF_ADD_REQ_PEND
;
2257 rplci
->internal_command
= PTY_REQ_PEND
;
2258 cai
[1] = (byte
)(SSreq
-3);
2260 rplci
->number
= Number
;
2261 if(plci
!=rplci
) /* explicit invocation */
2264 cai
[2] = plci
->Sig
.Id
;
2265 dbug(1,dprintf("explicit invocation"));
2269 dbug(1,dprintf("implicit invocation"));
2272 add_p(rplci
,CAI
,cai
);
2273 sig_req(rplci
,S_SERVICE
,0);
2279 dbug(0,dprintf("Wrong line"));
2280 Info
= 0x3010; /* wrong state */
2285 case S_CALL_DEFLECTION
:
2286 if(api_parse(&parms
->info
[1],(word
)parms
->length
,"wbwss",ss_parms
))
2288 dbug(1,dprintf("format wrong"));
2289 Info
= _WRONG_MESSAGE_FORMAT
;
2294 Info
= _WRONG_IDENTIFIER
;
2297 /* reuse unused screening indicator */
2298 ss_parms
[3].info
[3] = (byte
)GET_WORD(&(ss_parms
[2].info
[0]));
2300 plci
->internal_command
= CD_REQ_PEND
;
2301 appl
->CDEnable
= true;
2303 cai
[1] = CALL_DEFLECTION
;
2304 add_p(plci
,CAI
,cai
);
2305 add_p(plci
,CPN
,ss_parms
[3].info
);
2306 sig_req(plci
,S_SERVICE
,0);
2311 case S_CALL_FORWARDING_START
:
2312 if(api_parse(&parms
->info
[1],(word
)parms
->length
,"wbdwwsss",ss_parms
))
2314 dbug(1,dprintf("format wrong"));
2315 Info
= _WRONG_MESSAGE_FORMAT
;
2321 rplci
= &a
->plci
[i
-1];
2323 add_p(rplci
,CAI
,"\x01\x80");
2324 add_p(rplci
,UID
,"\x06\x43\x61\x70\x69\x32\x30");
2325 sig_req(rplci
,ASSIGN
,DSIG_ID
);
2330 Info
= _OUT_OF_PLCI
;
2334 /* reuse unused screening indicator */
2335 rplci
->internal_command
= CF_START_PEND
;
2337 rplci
->number
= Number
;
2338 appl
->S_Handle
= GET_DWORD(&(ss_parms
[2].info
[0]));
2340 cai
[1] = 0x70|(byte
)GET_WORD(&(ss_parms
[3].info
[0])); /* Function */
2341 cai
[2] = (byte
)GET_WORD(&(ss_parms
[4].info
[0])); /* Basic Service */
2342 add_p(rplci
,CAI
,cai
);
2343 add_p(rplci
,OAD
,ss_parms
[5].info
);
2344 add_p(rplci
,CPN
,ss_parms
[6].info
);
2345 sig_req(rplci
,S_SERVICE
,0);
2350 case S_INTERROGATE_DIVERSION
:
2351 case S_INTERROGATE_NUMBERS
:
2352 case S_CALL_FORWARDING_STOP
:
2353 case S_CCBS_REQUEST
:
2354 case S_CCBS_DEACTIVATE
:
2355 case S_CCBS_INTERROGATE
:
2358 case S_INTERROGATE_NUMBERS
:
2359 if(api_parse(&parms
->info
[1],(word
)parms
->length
,"wbd",ss_parms
))
2361 dbug(0,dprintf("format wrong"));
2362 Info
= _WRONG_MESSAGE_FORMAT
;
2365 case S_CCBS_REQUEST
:
2366 case S_CCBS_DEACTIVATE
:
2367 if(api_parse(&parms
->info
[1],(word
)parms
->length
,"wbdw",ss_parms
))
2369 dbug(0,dprintf("format wrong"));
2370 Info
= _WRONG_MESSAGE_FORMAT
;
2373 case S_CCBS_INTERROGATE
:
2374 if(api_parse(&parms
->info
[1],(word
)parms
->length
,"wbdws",ss_parms
))
2376 dbug(0,dprintf("format wrong"));
2377 Info
= _WRONG_MESSAGE_FORMAT
;
2381 if(api_parse(&parms
->info
[1],(word
)parms
->length
,"wbdwws",ss_parms
))
2383 dbug(0,dprintf("format wrong"));
2384 Info
= _WRONG_MESSAGE_FORMAT
;
2393 rplci
= &a
->plci
[i
-1];
2396 case S_INTERROGATE_DIVERSION
: /* use cai with S_SERVICE below */
2397 cai
[1] = 0x60|(byte
)GET_WORD(&(ss_parms
[3].info
[0])); /* Function */
2398 rplci
->internal_command
= INTERR_DIVERSION_REQ_PEND
; /* move to rplci if assigned */
2400 case S_INTERROGATE_NUMBERS
: /* use cai with S_SERVICE below */
2401 cai
[1] = DIVERSION_INTERROGATE_NUM
; /* Function */
2402 rplci
->internal_command
= INTERR_NUMBERS_REQ_PEND
; /* move to rplci if assigned */
2404 case S_CALL_FORWARDING_STOP
:
2405 rplci
->internal_command
= CF_STOP_PEND
;
2406 cai
[1] = 0x80|(byte
)GET_WORD(&(ss_parms
[3].info
[0])); /* Function */
2408 case S_CCBS_REQUEST
:
2409 cai
[1] = CCBS_REQUEST
;
2410 rplci
->internal_command
= CCBS_REQUEST_REQ_PEND
;
2412 case S_CCBS_DEACTIVATE
:
2413 cai
[1] = CCBS_DEACTIVATE
;
2414 rplci
->internal_command
= CCBS_DEACTIVATE_REQ_PEND
;
2416 case S_CCBS_INTERROGATE
:
2417 cai
[1] = CCBS_INTERROGATE
;
2418 rplci
->internal_command
= CCBS_INTERROGATE_REQ_PEND
;
2425 rplci
->number
= Number
;
2426 add_p(rplci
,CAI
,"\x01\x80");
2427 add_p(rplci
,UID
,"\x06\x43\x61\x70\x69\x32\x30");
2428 sig_req(rplci
,ASSIGN
,DSIG_ID
);
2433 Info
= _OUT_OF_PLCI
;
2437 appl
->S_Handle
= GET_DWORD(&(ss_parms
[2].info
[0]));
2440 case S_INTERROGATE_NUMBERS
:
2442 add_p(rplci
,CAI
,cai
);
2444 case S_CCBS_REQUEST
:
2445 case S_CCBS_DEACTIVATE
:
2447 PUT_WORD(&cai
[2],GET_WORD(&(ss_parms
[3].info
[0])));
2448 add_p(rplci
,CAI
,cai
);
2450 case S_CCBS_INTERROGATE
:
2452 PUT_WORD(&cai
[2],GET_WORD(&(ss_parms
[3].info
[0])));
2453 add_p(rplci
,CAI
,cai
);
2454 add_p(rplci
,OAD
,ss_parms
[4].info
);
2458 cai
[2] = (byte
)GET_WORD(&(ss_parms
[4].info
[0])); /* Basic Service */
2459 add_p(rplci
,CAI
,cai
);
2460 add_p(rplci
,OAD
,ss_parms
[5].info
);
2464 sig_req(rplci
,S_SERVICE
,0);
2469 case S_MWI_ACTIVATE
:
2470 if(api_parse(&parms
->info
[1],(word
)parms
->length
,"wbwdwwwssss",ss_parms
))
2472 dbug(1,dprintf("format wrong"));
2473 Info
= _WRONG_MESSAGE_FORMAT
;
2480 rplci
= &a
->plci
[i
-1];
2482 rplci
->cr_enquiry
=true;
2483 add_p(rplci
,CAI
,"\x01\x80");
2484 add_p(rplci
,UID
,"\x06\x43\x61\x70\x69\x32\x30");
2485 sig_req(rplci
,ASSIGN
,DSIG_ID
);
2490 Info
= _OUT_OF_PLCI
;
2497 rplci
->cr_enquiry
=false;
2501 rplci
->internal_command
= MWI_ACTIVATE_REQ_PEND
;
2503 rplci
->number
= Number
;
2506 cai
[1] = ACTIVATION_MWI
; /* Function */
2507 PUT_WORD(&cai
[2],GET_WORD(&(ss_parms
[2].info
[0]))); /* Basic Service */
2508 PUT_DWORD(&cai
[4],GET_DWORD(&(ss_parms
[3].info
[0]))); /* Number of Messages */
2509 PUT_WORD(&cai
[8],GET_WORD(&(ss_parms
[4].info
[0]))); /* Message Status */
2510 PUT_WORD(&cai
[10],GET_WORD(&(ss_parms
[5].info
[0]))); /* Message Reference */
2511 PUT_WORD(&cai
[12],GET_WORD(&(ss_parms
[6].info
[0]))); /* Invocation Mode */
2512 add_p(rplci
,CAI
,cai
);
2513 add_p(rplci
,CPN
,ss_parms
[7].info
); /* Receiving User Number */
2514 add_p(rplci
,OAD
,ss_parms
[8].info
); /* Controlling User Number */
2515 add_p(rplci
,OSA
,ss_parms
[9].info
); /* Controlling User Provided Number */
2516 add_p(rplci
,UID
,ss_parms
[10].info
); /* Time */
2517 sig_req(rplci
,S_SERVICE
,0);
2521 case S_MWI_DEACTIVATE
:
2522 if(api_parse(&parms
->info
[1],(word
)parms
->length
,"wbwwss",ss_parms
))
2524 dbug(1,dprintf("format wrong"));
2525 Info
= _WRONG_MESSAGE_FORMAT
;
2532 rplci
= &a
->plci
[i
-1];
2534 rplci
->cr_enquiry
=true;
2535 add_p(rplci
,CAI
,"\x01\x80");
2536 add_p(rplci
,UID
,"\x06\x43\x61\x70\x69\x32\x30");
2537 sig_req(rplci
,ASSIGN
,DSIG_ID
);
2542 Info
= _OUT_OF_PLCI
;
2549 rplci
->cr_enquiry
=false;
2553 rplci
->internal_command
= MWI_DEACTIVATE_REQ_PEND
;
2555 rplci
->number
= Number
;
2558 cai
[1] = DEACTIVATION_MWI
; /* Function */
2559 PUT_WORD(&cai
[2],GET_WORD(&(ss_parms
[2].info
[0]))); /* Basic Service */
2560 PUT_WORD(&cai
[4],GET_WORD(&(ss_parms
[3].info
[0]))); /* Invocation Mode */
2561 add_p(rplci
,CAI
,cai
);
2562 add_p(rplci
,CPN
,ss_parms
[4].info
); /* Receiving User Number */
2563 add_p(rplci
,OAD
,ss_parms
[5].info
); /* Controlling User Number */
2564 sig_req(rplci
,S_SERVICE
,0);
2569 Info
= 0x300E; /* not supported */
2572 break; /* case SELECTOR_SU_SERV: end */
2576 return (dtmf_request (Id
, Number
, a
, plci
, appl
, msg
));
2580 case SELECTOR_LINE_INTERCONNECT
:
2581 return (mixer_request (Id
, Number
, a
, plci
, appl
, msg
));
2585 case PRIV_SELECTOR_ECHO_CANCELLER
:
2586 appl
->appl_flags
|= APPL_FLAG_PRIV_EC_SPEC
;
2587 return (ec_request (Id
, Number
, a
, plci
, appl
, msg
));
2589 case SELECTOR_ECHO_CANCELLER
:
2590 appl
->appl_flags
&= ~APPL_FLAG_PRIV_EC_SPEC
;
2591 return (ec_request (Id
, Number
, a
, plci
, appl
, msg
));
2594 case SELECTOR_V42BIS
:
2596 Info
= _FACILITY_NOT_SUPPORTED
;
2598 } /* end of switch(selector) */
2601 dbug(1,dprintf("SendFacRc"));
2603 _FACILITY_R
|CONFIRM
,
2606 "wws",Info
,selector
,SSparms
);
2610 static byte
facility_res(dword Id
, word Number
, DIVA_CAPI_ADAPTER
*a
,
2611 PLCI
*plci
, APPL
*appl
, API_PARSE
*msg
)
2613 dbug(1,dprintf("facility_res"));
2617 static byte
connect_b3_req(dword Id
, word Number
, DIVA_CAPI_ADAPTER
*a
,
2618 PLCI
*plci
, APPL
*appl
, API_PARSE
*parms
)
2624 word fax_control_bits
, fax_feature_bits
, fax_info_change
;
2628 API_PARSE fax_parms
[9];
2632 dbug(1,dprintf("connect_b3_req"));
2635 if ((plci
->State
== IDLE
) || (plci
->State
== OUTG_DIS_PENDING
)
2636 || (plci
->State
== INC_DIS_PENDING
) || (plci
->SuppState
!= IDLE
))
2638 Info
= _WRONG_STATE
;
2642 /* local reply if assign unsuccessful
2643 or B3 protocol allows only one layer 3 connection
2644 and already connected
2645 or B2 protocol not any LAPD
2646 and connect_b3_req contradicts originate/answer direction */
2648 || (((plci
->B3_prot
!= B3_T90NL
) && (plci
->B3_prot
!= B3_ISO8208
) && (plci
->B3_prot
!= B3_X25_DCE
))
2649 && ((plci
->channels
!= 0)
2650 || (((plci
->B2_prot
!= B2_SDLC
) && (plci
->B2_prot
!= B2_LAPD
) && (plci
->B2_prot
!= B2_LAPD_FREE_SAPI_SEL
))
2651 && ((plci
->call_dir
& CALL_DIR_ANSWER
) && !(plci
->call_dir
& CALL_DIR_FORCE_OUTG_NL
))))))
2653 dbug(1,dprintf("B3 already connected=%d or no NL.Id=0x%x, dir=%d sstate=0x%x",
2654 plci
->channels
,plci
->NL
.Id
,plci
->call_dir
,plci
->SuppState
));
2655 Info
= _WRONG_STATE
;
2657 _CONNECT_B3_R
|CONFIRM
,
2663 plci
->requested_options_conn
= 0;
2667 if(plci
->B3_prot
==2 || plci
->B3_prot
==3)
2672 if(ncpi
->info
[2] || ncpi
->info
[3])
2674 pvc
[0] = ncpi
->info
[3];
2675 pvc
[1] = ncpi
->info
[2];
2681 if(ncpi
->info
[1] &1) req
= N_CONNECT
| N_D_BIT
;
2682 add_d(plci
,(word
)(ncpi
->length
-3),&ncpi
->info
[4]);
2686 else if(plci
->B3_prot
==5)
2688 if (plci
->NL
.Id
&& !plci
->nl_remove_id
)
2690 fax_control_bits
= GET_WORD(&((T30_INFO
*)plci
->fax_connect_info_buffer
)->control_bits_low
);
2691 fax_feature_bits
= GET_WORD(&((T30_INFO
*)plci
->fax_connect_info_buffer
)->feature_bits_low
);
2692 if (!(fax_control_bits
& T30_CONTROL_BIT_MORE_DOCUMENTS
)
2693 || (fax_feature_bits
& T30_FEATURE_BIT_MORE_DOCUMENTS
))
2695 len
= offsetof(T30_INFO
, universal_6
);
2696 fax_info_change
= false;
2697 if (ncpi
->length
>= 4)
2699 w
= GET_WORD(&ncpi
->info
[3]);
2700 if ((w
& 0x0001) != ((word
)(((T30_INFO
*)(plci
->fax_connect_info_buffer
))->resolution
& 0x0001)))
2702 ((T30_INFO
*)(plci
->fax_connect_info_buffer
))->resolution
=
2703 (byte
)((((T30_INFO
*)(plci
->fax_connect_info_buffer
))->resolution
& ~T30_RESOLUTION_R8_0770_OR_200
) |
2704 ((w
& 0x0001) ? T30_RESOLUTION_R8_0770_OR_200
: 0));
2705 fax_info_change
= true;
2707 fax_control_bits
&= ~(T30_CONTROL_BIT_REQUEST_POLLING
| T30_CONTROL_BIT_MORE_DOCUMENTS
);
2708 if (w
& 0x0002) /* Fax-polling request */
2709 fax_control_bits
|= T30_CONTROL_BIT_REQUEST_POLLING
;
2710 if ((w
& 0x0004) /* Request to send / poll another document */
2711 && (a
->manufacturer_features
& MANUFACTURER_FEATURE_FAX_MORE_DOCUMENTS
))
2713 fax_control_bits
|= T30_CONTROL_BIT_MORE_DOCUMENTS
;
2715 if (ncpi
->length
>= 6)
2717 w
= GET_WORD(&ncpi
->info
[5]);
2718 if (((byte
) w
) != ((T30_INFO
*)(plci
->fax_connect_info_buffer
))->data_format
)
2720 ((T30_INFO
*)(plci
->fax_connect_info_buffer
))->data_format
= (byte
) w
;
2721 fax_info_change
= true;
2724 if ((a
->man_profile
.private_options
& (1L << PRIVATE_FAX_SUB_SEP_PWD
))
2725 && (GET_WORD(&ncpi
->info
[5]) & 0x8000)) /* Private SEP/SUB/PWD enable */
2727 plci
->requested_options_conn
|= (1L << PRIVATE_FAX_SUB_SEP_PWD
);
2729 if ((a
->man_profile
.private_options
& (1L << PRIVATE_FAX_NONSTANDARD
))
2730 && (GET_WORD(&ncpi
->info
[5]) & 0x4000)) /* Private non-standard facilities enable */
2732 plci
->requested_options_conn
|= (1L << PRIVATE_FAX_NONSTANDARD
);
2734 fax_control_bits
&= ~(T30_CONTROL_BIT_ACCEPT_SUBADDRESS
| T30_CONTROL_BIT_ACCEPT_SEL_POLLING
|
2735 T30_CONTROL_BIT_ACCEPT_PASSWORD
);
2736 if ((plci
->requested_options_conn
| plci
->requested_options
| a
->requested_options_table
[appl
->Id
-1])
2737 & ((1L << PRIVATE_FAX_SUB_SEP_PWD
) | (1L << PRIVATE_FAX_NONSTANDARD
)))
2739 if (api_parse (&ncpi
->info
[1], ncpi
->length
, "wwwwsss", fax_parms
))
2740 Info
= _WRONG_MESSAGE_FORMAT
;
2743 if ((plci
->requested_options_conn
| plci
->requested_options
| a
->requested_options_table
[appl
->Id
-1])
2744 & (1L << PRIVATE_FAX_SUB_SEP_PWD
))
2746 fax_control_bits
|= T30_CONTROL_BIT_ACCEPT_SUBADDRESS
| T30_CONTROL_BIT_ACCEPT_PASSWORD
;
2747 if (fax_control_bits
& T30_CONTROL_BIT_ACCEPT_POLLING
)
2748 fax_control_bits
|= T30_CONTROL_BIT_ACCEPT_SEL_POLLING
;
2750 w
= fax_parms
[4].length
;
2753 ((T30_INFO
*)(plci
->fax_connect_info_buffer
))->station_id_len
= (byte
) w
;
2754 for (i
= 0; i
< w
; i
++)
2755 ((T30_INFO
*)(plci
->fax_connect_info_buffer
))->station_id
[i
] = fax_parms
[4].info
[1+i
];
2756 ((T30_INFO
*)(plci
->fax_connect_info_buffer
))->head_line_len
= 0;
2757 len
= offsetof(T30_INFO
, station_id
) + T30_MAX_STATION_ID_LENGTH
;
2758 w
= fax_parms
[5].length
;
2761 plci
->fax_connect_info_buffer
[len
++] = (byte
) w
;
2762 for (i
= 0; i
< w
; i
++)
2763 plci
->fax_connect_info_buffer
[len
++] = fax_parms
[5].info
[1+i
];
2764 w
= fax_parms
[6].length
;
2767 plci
->fax_connect_info_buffer
[len
++] = (byte
) w
;
2768 for (i
= 0; i
< w
; i
++)
2769 plci
->fax_connect_info_buffer
[len
++] = fax_parms
[6].info
[1+i
];
2770 if ((plci
->requested_options_conn
| plci
->requested_options
| a
->requested_options_table
[appl
->Id
-1])
2771 & (1L << PRIVATE_FAX_NONSTANDARD
))
2773 if (api_parse (&ncpi
->info
[1], ncpi
->length
, "wwwwssss", fax_parms
))
2775 dbug(1,dprintf("non-standard facilities info missing or wrong format"));
2776 plci
->fax_connect_info_buffer
[len
++] = 0;
2780 if ((fax_parms
[7].length
>= 3) && (fax_parms
[7].info
[1] >= 2))
2781 plci
->nsf_control_bits
= GET_WORD(&fax_parms
[7].info
[2]);
2782 plci
->fax_connect_info_buffer
[len
++] = (byte
)(fax_parms
[7].length
);
2783 for (i
= 0; i
< fax_parms
[7].length
; i
++)
2784 plci
->fax_connect_info_buffer
[len
++] = fax_parms
[7].info
[1+i
];
2791 len
= offsetof(T30_INFO
, universal_6
);
2793 fax_info_change
= true;
2796 if (fax_control_bits
!= GET_WORD(&((T30_INFO
*)plci
->fax_connect_info_buffer
)->control_bits_low
))
2798 PUT_WORD (&((T30_INFO
*)plci
->fax_connect_info_buffer
)->control_bits_low
, fax_control_bits
);
2799 fax_info_change
= true;
2804 plci
->fax_connect_info_length
= len
;
2805 if (fax_info_change
)
2807 if (fax_feature_bits
& T30_FEATURE_BIT_MORE_DOCUMENTS
)
2809 start_internal_command (Id
, plci
, fax_connect_info_command
);
2814 start_internal_command (Id
, plci
, fax_adjust_b23_command
);
2820 else Info
= _WRONG_STATE
;
2822 else Info
= _WRONG_STATE
;
2825 else if (plci
->B3_prot
== B3_RTP
)
2827 plci
->internal_req_buffer
[0] = ncpi
->length
+ 1;
2828 plci
->internal_req_buffer
[1] = UDATA_REQUEST_RTP_RECONFIGURE
;
2829 for (w
= 0; w
< ncpi
->length
; w
++)
2830 plci
->internal_req_buffer
[2+w
] = ncpi
->info
[1+w
];
2831 start_internal_command (Id
, plci
, rtp_connect_b3_req_command
);
2837 nl_req_ncci(plci
,req
,0);
2842 else Info
= _WRONG_IDENTIFIER
;
2845 _CONNECT_B3_R
|CONFIRM
,
2852 static byte
connect_b3_res(dword Id
, word Number
, DIVA_CAPI_ADAPTER
*a
,
2853 PLCI
*plci
, APPL
*appl
, API_PARSE
*parms
)
2862 API_PARSE fax_parms
[9];
2867 dbug(1,dprintf("connect_b3_res"));
2869 ncci
= (word
)(Id
>>16);
2871 if(a
->ncci_state
[ncci
]==INC_CON_PENDING
) {
2872 if (GET_WORD (&parms
[0].info
[0]) != 0)
2874 a
->ncci_state
[ncci
] = OUTG_REJ_PENDING
;
2875 channel_request_xon (plci
, a
->ncci_ch
[ncci
]);
2876 channel_xmit_xon (plci
);
2877 cleanup_ncci_data (plci
, ncci
);
2878 nl_req_ncci(plci
,N_DISC
,(byte
)ncci
);
2881 a
->ncci_state
[ncci
] = INC_ACT_PENDING
;
2883 req
= N_CONNECT_ACK
;
2885 if ((plci
->B3_prot
== 4) || (plci
->B3_prot
== 5) || (plci
->B3_prot
== 7))
2888 if ((plci
->requested_options_conn
| plci
->requested_options
| a
->requested_options_table
[plci
->appl
->Id
-1])
2889 & (1L << PRIVATE_FAX_NONSTANDARD
))
2891 if (((plci
->B3_prot
== 4) || (plci
->B3_prot
== 5))
2892 && (plci
->nsf_control_bits
& T30_NSF_CONTROL_BIT_ENABLE_NSF
)
2893 && (plci
->nsf_control_bits
& T30_NSF_CONTROL_BIT_NEGOTIATE_RESP
))
2895 len
= offsetof(T30_INFO
, station_id
) + T30_MAX_STATION_ID_LENGTH
;
2896 if (plci
->fax_connect_info_length
< len
)
2898 ((T30_INFO
*)(plci
->fax_connect_info_buffer
))->station_id_len
= 0;
2899 ((T30_INFO
*)(plci
->fax_connect_info_buffer
))->head_line_len
= 0;
2901 if (api_parse (&ncpi
->info
[1], ncpi
->length
, "wwwwssss", fax_parms
))
2903 dbug(1,dprintf("non-standard facilities info missing or wrong format"));
2907 if (plci
->fax_connect_info_length
<= len
)
2908 plci
->fax_connect_info_buffer
[len
] = 0;
2909 len
+= 1 + plci
->fax_connect_info_buffer
[len
];
2910 if (plci
->fax_connect_info_length
<= len
)
2911 plci
->fax_connect_info_buffer
[len
] = 0;
2912 len
+= 1 + plci
->fax_connect_info_buffer
[len
];
2913 if ((fax_parms
[7].length
>= 3) && (fax_parms
[7].info
[1] >= 2))
2914 plci
->nsf_control_bits
= GET_WORD(&fax_parms
[7].info
[2]);
2915 plci
->fax_connect_info_buffer
[len
++] = (byte
)(fax_parms
[7].length
);
2916 for (i
= 0; i
< fax_parms
[7].length
; i
++)
2917 plci
->fax_connect_info_buffer
[len
++] = fax_parms
[7].info
[1+i
];
2919 plci
->fax_connect_info_length
= len
;
2920 ((T30_INFO
*)(plci
->fax_connect_info_buffer
))->code
= 0;
2921 start_internal_command (Id
, plci
, fax_connect_ack_command
);
2926 nl_req_ncci(plci
,req
,(byte
)ncci
);
2927 if ((plci
->ncpi_state
& NCPI_VALID_CONNECT_B3_ACT
)
2928 && !(plci
->ncpi_state
& NCPI_CONNECT_B3_ACT_SENT
))
2930 if (plci
->B3_prot
== 4)
2931 sendf(appl
,_CONNECT_B3_ACTIVE_I
,Id
,0,"s","");
2933 sendf(appl
,_CONNECT_B3_ACTIVE_I
,Id
,0,"S",plci
->ncpi_buffer
);
2934 plci
->ncpi_state
|= NCPI_CONNECT_B3_ACT_SENT
;
2938 else if (plci
->B3_prot
== B3_RTP
)
2940 plci
->internal_req_buffer
[0] = ncpi
->length
+ 1;
2941 plci
->internal_req_buffer
[1] = UDATA_REQUEST_RTP_RECONFIGURE
;
2942 for (w
= 0; w
< ncpi
->length
; w
++)
2943 plci
->internal_req_buffer
[2+w
] = ncpi
->info
[1+w
];
2944 start_internal_command (Id
, plci
, rtp_connect_b3_res_command
);
2950 if(ncpi
->length
>2) {
2951 if(ncpi
->info
[1] &1) req
= N_CONNECT_ACK
| N_D_BIT
;
2952 add_d(plci
,(word
)(ncpi
->length
-3),&ncpi
->info
[4]);
2954 nl_req_ncci(plci
,req
,(byte
)ncci
);
2955 sendf(appl
,_CONNECT_B3_ACTIVE_I
,Id
,0,"s","");
2956 if (plci
->adjust_b_restore
)
2958 plci
->adjust_b_restore
= false;
2959 start_internal_command (Id
, plci
, adjust_b_restore
);
2968 static byte
connect_b3_a_res(dword Id
, word Number
, DIVA_CAPI_ADAPTER
*a
,
2969 PLCI
*plci
, APPL
*appl
, API_PARSE
*parms
)
2973 ncci
= (word
)(Id
>>16);
2974 dbug(1,dprintf("connect_b3_a_res(ncci=0x%x)",ncci
));
2976 if (plci
&& ncci
&& (plci
->State
!= IDLE
) && (plci
->State
!= INC_DIS_PENDING
)
2977 && (plci
->State
!= OUTG_DIS_PENDING
))
2979 if(a
->ncci_state
[ncci
]==INC_ACT_PENDING
) {
2980 a
->ncci_state
[ncci
] = CONNECTED
;
2981 if(plci
->State
!=INC_CON_CONNECTED_ALERT
) plci
->State
= CONNECTED
;
2982 channel_request_xon (plci
, a
->ncci_ch
[ncci
]);
2983 channel_xmit_xon (plci
);
2989 static byte
disconnect_b3_req(dword Id
, word Number
, DIVA_CAPI_ADAPTER
*a
,
2990 PLCI
*plci
, APPL
*appl
, API_PARSE
*parms
)
2996 dbug(1,dprintf("disconnect_b3_req"));
2998 Info
= _WRONG_IDENTIFIER
;
2999 ncci
= (word
)(Id
>>16);
3002 Info
= _WRONG_STATE
;
3003 if ((a
->ncci_state
[ncci
] == CONNECTED
)
3004 || (a
->ncci_state
[ncci
] == OUTG_CON_PENDING
)
3005 || (a
->ncci_state
[ncci
] == INC_CON_PENDING
)
3006 || (a
->ncci_state
[ncci
] == INC_ACT_PENDING
))
3008 a
->ncci_state
[ncci
] = OUTG_DIS_PENDING
;
3009 channel_request_xon (plci
, a
->ncci_ch
[ncci
]);
3010 channel_xmit_xon (plci
);
3012 if (a
->ncci
[ncci
].data_pending
3013 && ((plci
->B3_prot
== B3_TRANSPARENT
)
3014 || (plci
->B3_prot
== B3_T30
)
3015 || (plci
->B3_prot
== B3_T30_WITH_EXTENSIONS
)))
3017 plci
->send_disc
= (byte
)ncci
;
3023 cleanup_ncci_data (plci
, ncci
);
3025 if(plci
->B3_prot
==2 || plci
->B3_prot
==3)
3030 add_d(plci
, (word
)(ncpi
->length
- 3) ,(byte
*)&(ncpi
->info
[4]));
3033 nl_req_ncci(plci
,N_DISC
,(byte
)ncci
);
3039 _DISCONNECT_B3_R
|CONFIRM
,
3046 static byte
disconnect_b3_res(dword Id
, word Number
, DIVA_CAPI_ADAPTER
*a
,
3047 PLCI
*plci
, APPL
*appl
, API_PARSE
*parms
)
3052 ncci
= (word
)(Id
>>16);
3053 dbug(1,dprintf("disconnect_b3_res(ncci=0x%x",ncci
));
3055 plci
->requested_options_conn
= 0;
3056 plci
->fax_connect_info_length
= 0;
3057 plci
->ncpi_state
= 0x00;
3058 if (((plci
->B3_prot
!= B3_T90NL
) && (plci
->B3_prot
!= B3_ISO8208
) && (plci
->B3_prot
!= B3_X25_DCE
))
3059 && ((plci
->B2_prot
!= B2_LAPD
) && (plci
->B2_prot
!= B2_LAPD_FREE_SAPI_SEL
)))
3061 plci
->call_dir
|= CALL_DIR_FORCE_OUTG_NL
;
3063 for(i
=0; i
<MAX_CHANNELS_PER_PLCI
&& plci
->inc_dis_ncci_table
[i
]!=(byte
)ncci
; i
++);
3064 if(i
<MAX_CHANNELS_PER_PLCI
) {
3065 if(plci
->channels
)plci
->channels
--;
3066 for(; i
<MAX_CHANNELS_PER_PLCI
-1; i
++) plci
->inc_dis_ncci_table
[i
] = plci
->inc_dis_ncci_table
[i
+1];
3067 plci
->inc_dis_ncci_table
[MAX_CHANNELS_PER_PLCI
-1] = 0;
3069 ncci_free_receive_buffers (plci
, ncci
);
3071 if((plci
->State
==IDLE
|| plci
->State
==SUSPENDING
) && !plci
->channels
){
3072 if(plci
->State
== SUSPENDING
){
3077 "ws", (word
)3, "\x03\x04\x00\x00");
3078 sendf(plci
->appl
, _DISCONNECT_I
, Id
& 0xffffL
, 0, "w", 0);
3086 if ((a
->manufacturer_features
& MANUFACTURER_FEATURE_FAX_PAPER_FORMATS
)
3087 && ((plci
->B3_prot
== 4) || (plci
->B3_prot
== 5))
3088 && (a
->ncci_state
[ncci
] == INC_DIS_PENDING
))
3090 ncci_free_receive_buffers (plci
, ncci
);
3092 nl_req_ncci(plci
,N_EDATA
,(byte
)ncci
);
3094 plci
->adapter
->ncci_state
[ncci
] = IDLE
;
3095 start_internal_command (Id
, plci
, fax_disconnect_command
);
3103 static byte
data_b3_req(dword Id
, word Number
, DIVA_CAPI_ADAPTER
*a
,
3104 PLCI
*plci
, APPL
*appl
, API_PARSE
*parms
)
3112 dbug(1,dprintf("data_b3_req"));
3114 Info
= _WRONG_IDENTIFIER
;
3115 ncci
= (word
)(Id
>>16);
3116 dbug(1,dprintf("ncci=0x%x, plci=0x%x",ncci
,plci
));
3120 Info
= _WRONG_STATE
;
3121 if ((a
->ncci_state
[ncci
] == CONNECTED
)
3122 || (a
->ncci_state
[ncci
] == INC_ACT_PENDING
))
3125 ncci_ptr
= &(a
->ncci
[ncci
]);
3126 i
= ncci_ptr
->data_out
+ ncci_ptr
->data_pending
;
3127 if (i
>= MAX_DATA_B3
)
3129 data
= &(ncci_ptr
->DBuffer
[i
]);
3130 data
->Number
= Number
;
3131 if ((((byte
*)(parms
[0].info
)) >= ((byte
*)(plci
->msg_in_queue
)))
3132 && (((byte
*)(parms
[0].info
)) < ((byte
*)(plci
->msg_in_queue
)) + sizeof(plci
->msg_in_queue
)))
3135 data
->P
= (byte
*)(long)(*((dword
*)(parms
[0].info
)));
3139 data
->P
= TransmitBufferSet(appl
,*(dword
*)parms
[0].info
);
3140 data
->Length
= GET_WORD(parms
[1].info
);
3141 data
->Handle
= GET_WORD(parms
[2].info
);
3142 data
->Flags
= GET_WORD(parms
[3].info
);
3143 (ncci_ptr
->data_pending
)++;
3145 /* check for delivery confirmation */
3146 if (data
->Flags
& 0x0004)
3148 i
= ncci_ptr
->data_ack_out
+ ncci_ptr
->data_ack_pending
;
3149 if (i
>= MAX_DATA_ACK
)
3151 ncci_ptr
->DataAck
[i
].Number
= data
->Number
;
3152 ncci_ptr
->DataAck
[i
].Handle
= data
->Handle
;
3153 (ncci_ptr
->data_ack_pending
)++;
3164 if ((((byte
*)(parms
[0].info
)) >= ((byte
*)(plci
->msg_in_queue
)))
3165 && (((byte
*)(parms
[0].info
)) < ((byte
*)(plci
->msg_in_queue
)) + sizeof(plci
->msg_in_queue
)))
3168 TransmitBufferFree (appl
, (byte
*)(long)(*((dword
*)(parms
[0].info
))));
3176 "ww",GET_WORD(parms
[2].info
),Info
);
3181 static byte
data_b3_res(dword Id
, word Number
, DIVA_CAPI_ADAPTER
*a
,
3182 PLCI
*plci
, APPL
*appl
, API_PARSE
*parms
)
3188 dbug(1,dprintf("data_b3_res"));
3190 ncci
= (word
)(Id
>>16);
3192 n
= GET_WORD(parms
[0].info
);
3193 dbug(1,dprintf("free(%d)",n
));
3194 NCCIcode
= ncci
| (((word
) a
->Id
) << 8);
3195 if(n
<appl
->MaxBuffer
&&
3196 appl
->DataNCCI
[n
]==NCCIcode
&&
3197 (byte
)(appl
->DataFlags
[n
]>>8)==plci
->Id
) {
3198 dbug(1,dprintf("found"));
3199 appl
->DataNCCI
[n
] = 0;
3201 if (channel_can_xon (plci
, a
->ncci_ch
[ncci
])) {
3202 channel_request_xon (plci
, a
->ncci_ch
[ncci
]);
3204 channel_xmit_xon (plci
);
3206 if(appl
->DataFlags
[n
] &4) {
3207 nl_req_ncci(plci
,N_DATA_ACK
,(byte
)ncci
);
3215 static byte
reset_b3_req(dword Id
, word Number
, DIVA_CAPI_ADAPTER
*a
,
3216 PLCI
*plci
, APPL
*appl
, API_PARSE
*parms
)
3221 dbug(1,dprintf("reset_b3_req"));
3223 Info
= _WRONG_IDENTIFIER
;
3224 ncci
= (word
)(Id
>>16);
3227 Info
= _WRONG_STATE
;
3228 switch (plci
->B3_prot
)
3232 if(a
->ncci_state
[ncci
]==CONNECTED
)
3234 nl_req_ncci(plci
,N_RESET
,(byte
)ncci
);
3239 case B3_TRANSPARENT
:
3240 if(a
->ncci_state
[ncci
]==CONNECTED
)
3242 start_internal_command (Id
, plci
, reset_b3_command
);
3248 /* reset_b3 must result in a reset_b3_con & reset_b3_Ind */
3250 _RESET_B3_R
|CONFIRM
,
3257 static byte
reset_b3_res(dword Id
, word Number
, DIVA_CAPI_ADAPTER
*a
,
3258 PLCI
*plci
, APPL
*appl
, API_PARSE
*parms
)
3262 dbug(1,dprintf("reset_b3_res"));
3264 ncci
= (word
)(Id
>>16);
3266 switch (plci
->B3_prot
)
3270 if(a
->ncci_state
[ncci
]==INC_RES_PENDING
)
3272 a
->ncci_state
[ncci
] = CONNECTED
;
3273 nl_req_ncci(plci
,N_RESET_ACK
,(byte
)ncci
);
3282 static byte
connect_b3_t90_a_res(dword Id
, word Number
, DIVA_CAPI_ADAPTER
*a
,
3283 PLCI
*plci
, APPL
*appl
, API_PARSE
*parms
)
3289 dbug(1,dprintf("connect_b3_t90_a_res"));
3291 ncci
= (word
)(Id
>>16);
3293 if(a
->ncci_state
[ncci
]==INC_ACT_PENDING
) {
3294 a
->ncci_state
[ncci
] = CONNECTED
;
3296 else if(a
->ncci_state
[ncci
]==INC_CON_PENDING
) {
3297 a
->ncci_state
[ncci
] = CONNECTED
;
3299 req
= N_CONNECT_ACK
;
3301 /* parms[0]==0 for CAPI original message definition! */
3304 if(ncpi
->length
>2) {
3305 if(ncpi
->info
[1] &1) req
= N_CONNECT_ACK
| N_D_BIT
;
3306 add_d(plci
,(word
)(ncpi
->length
-3),&ncpi
->info
[4]);
3309 nl_req_ncci(plci
,req
,(byte
)ncci
);
3317 static byte
select_b_req(dword Id
, word Number
, DIVA_CAPI_ADAPTER
*a
,
3318 PLCI
*plci
, APPL
*appl
, API_PARSE
*msg
)
3323 API_PARSE bp_parms
[7];
3327 Info
= _WRONG_IDENTIFIER
;
3331 dbug(1,dprintf("select_b_req[%d],PLCI=0x%x,Tel=0x%x,NL=0x%x,appl=0x%x,sstate=0x%x",
3332 msg
->length
,plci
->Id
,plci
->tel
,plci
->NL
.Id
,plci
->appl
,plci
->SuppState
));
3333 dbug(1,dprintf("PlciState=0x%x",plci
->State
));
3334 for(i
=0;i
<7;i
++) bp_parms
[i
].length
= 0;
3336 /* check if no channel is open, no B3 connected only */
3337 if((plci
->State
== IDLE
) || (plci
->State
== OUTG_DIS_PENDING
) || (plci
->State
== INC_DIS_PENDING
)
3338 || (plci
->SuppState
!= IDLE
) || plci
->channels
|| plci
->nl_remove_id
)
3340 Info
= _WRONG_STATE
;
3342 /* check message format and fill bp_parms pointer */
3343 else if(msg
->length
&& api_parse(&msg
->info
[1], (word
)msg
->length
, "wwwsss", bp_parms
))
3345 Info
= _WRONG_MESSAGE_FORMAT
;
3349 if((plci
->State
==INC_CON_PENDING
) || (plci
->State
==INC_CON_ALERT
)) /* send alert tone inband to the network, */
3350 { /* e.g. Qsig or RBS or Cornet-N or xess PRI */
3351 if(Id
& EXT_CONTROLLER
)
3353 sendf(appl
, _SELECT_B_REQ
|CONFIRM
, Id
, Number
, "w", 0x2002); /* wrong controller */
3356 plci
->State
=INC_CON_CONNECTED_ALERT
;
3358 clear_c_ind_mask_bit (plci
, (word
)(appl
->Id
-1));
3359 dump_c_ind_mask (plci
);
3360 for(i
=0; i
<max_appl
; i
++) /* disconnect the other appls */
3361 { /* its quasi a connect */
3362 if(test_c_ind_mask_bit (plci
, i
))
3363 sendf(&application
[i
], _DISCONNECT_I
, Id
, 0, "w", _OTHER_APPL_CONNECTED
);
3367 api_save_msg(msg
, "s", &plci
->saved_msg
);
3369 if(Id
& EXT_CONTROLLER
)
3371 if(tel
) /* external controller in use by this PLCI */
3373 if(a
->AdvSignalAppl
&& a
->AdvSignalAppl
!=appl
)
3375 dbug(1,dprintf("Ext_Ctrl in use 1"));
3376 Info
= _WRONG_STATE
;
3379 else /* external controller NOT in use by this PLCI ? */
3381 if(a
->AdvSignalPLCI
)
3383 dbug(1,dprintf("Ext_Ctrl in use 2"));
3384 Info
= _WRONG_STATE
;
3386 else /* activate the codec */
3388 dbug(1,dprintf("Ext_Ctrl start"));
3389 if(AdvCodecSupport(a
, plci
, appl
, 0) )
3391 dbug(1,dprintf("Error in codec procedures"));
3392 Info
= _WRONG_STATE
;
3394 else if(plci
->spoofed_msg
==SPOOFING_REQUIRED
) /* wait until codec is active */
3396 plci
->spoofed_msg
= AWAITING_SELECT_B
;
3397 plci
->internal_command
= BLOCK_PLCI
; /* lock other commands */
3399 dbug(1,dprintf("continue if codec loaded"));
3405 else /* external controller bit is OFF */
3407 if(tel
) /* external controller in use, need to switch off */
3409 if(a
->AdvSignalAppl
==appl
)
3411 CodecIdCheck(a
, plci
);
3414 dbug(1,dprintf("Ext_Ctrl disable"));
3418 dbug(1,dprintf("Ext_Ctrl not requested"));
3424 if (plci
->call_dir
& CALL_DIR_OUT
)
3425 plci
->call_dir
= CALL_DIR_OUT
| CALL_DIR_ORIGINATE
;
3426 else if (plci
->call_dir
& CALL_DIR_IN
)
3427 plci
->call_dir
= CALL_DIR_IN
| CALL_DIR_ANSWER
;
3428 start_internal_command (Id
, plci
, select_b_command
);
3433 sendf(appl
, _SELECT_B_REQ
|CONFIRM
, Id
, Number
, "w", Info
);
3437 static byte
manufacturer_req(dword Id
, word Number
, DIVA_CAPI_ADAPTER
*a
,
3438 PLCI
*plci
, APPL
*appl
, API_PARSE
*parms
)
3444 API_PARSE m_parms
[5];
3449 static byte chi
[2] = {0x01,0x00};
3450 static byte lli
[2] = {0x01,0x00};
3451 static byte codec_cai
[2] = {0x01,0x01};
3452 static byte null_msg
= {0};
3453 static API_PARSE null_parms
= { 0, &null_msg
};
3457 dbug(1,dprintf("manufacturer_req"));
3458 for(i
=0;i
<5;i
++) m_parms
[i
].length
= 0;
3460 if(GET_DWORD(parms
[0].info
)!=_DI_MANU_ID
) {
3461 Info
= _WRONG_MESSAGE_FORMAT
;
3463 command
= GET_WORD(parms
[1].info
);
3468 case _DI_ASSIGN_PLCI
:
3469 if(api_parse(&m
->info
[1],(word
)m
->length
,"wbbs",m_parms
)) {
3470 Info
= _WRONG_MESSAGE_FORMAT
;
3473 codec
= GET_WORD(m_parms
[0].info
);
3474 ch
= m_parms
[1].info
[0];
3475 dir
= m_parms
[2].info
[0];
3476 if((i
=get_plci(a
))) {
3477 plci
= &a
->plci
[i
-1];
3479 plci
->command
= _MANUFACTURER_R
;
3480 plci
->m_command
= command
;
3481 plci
->number
= Number
;
3482 plci
->State
= LOCAL_CONNECT
;
3483 Id
= ( ((word
)plci
->Id
<<8)|plci
->adapter
->Id
|0x80);
3484 dbug(1,dprintf("ManCMD,plci=0x%x",Id
));
3486 if((ch
==1 || ch
==2) && (dir
<=2)) {
3487 chi
[1] = (byte
)(0x80|ch
);
3489 plci
->call_dir
= CALL_DIR_OUT
| CALL_DIR_ORIGINATE
;
3493 Info
= add_b1(plci
,&m_parms
[3],0,0);
3496 add_p(plci
,CAI
,codec_cai
);
3498 /* manual 'swich on' to the codec support without signalling */
3499 /* first 'assign plci' with this function, then use */
3501 if(AdvCodecSupport(a
, plci
, appl
, 0) ) {
3502 Info
= _RESOURCE_ERROR
;
3505 Info
= add_b1(plci
,&null_parms
,0,B1_FACILITY_LOCAL
);
3506 lli
[1] = 0x10; /* local call codec stream */
3511 plci
->State
= LOCAL_CONNECT
;
3512 plci
->manufacturer
= true;
3513 plci
->command
= _MANUFACTURER_R
;
3514 plci
->m_command
= command
;
3515 plci
->number
= Number
;
3519 add_p(plci
,LLI
,lli
);
3520 add_p(plci
,CHI
,chi
);
3521 add_p(plci
,UID
,"\x06\x43\x61\x70\x69\x32\x30");
3522 sig_req(plci
,ASSIGN
,DSIG_ID
);
3526 Info
= add_b23(plci
,&m_parms
[3]);
3529 nl_req_ncci(plci
,ASSIGN
,0);
3535 dbug(1,dprintf("dir=0x%x,spoof=0x%x",dir
,plci
->spoofed_msg
));
3536 if (plci
->spoofed_msg
==SPOOFING_REQUIRED
)
3538 api_save_msg (m_parms
, "wbbs", &plci
->saved_msg
);
3539 plci
->spoofed_msg
= AWAITING_MANUF_CON
;
3540 plci
->internal_command
= BLOCK_PLCI
; /* reject other req meanwhile */
3546 sig_req(plci
,CALL_REQ
,0);
3549 sig_req(plci
,LISTEN_REQ
,0);
3556 _MANUFACTURER_R
|CONFIRM
,
3559 "dww",_DI_MANU_ID
,command
,Info
);
3565 else Info
= _OUT_OF_PLCI
;
3571 Info
= _WRONG_IDENTIFIER
;
3574 if(api_parse(&m
->info
[1],(word
)m
->length
,"bs",m_parms
)) {
3575 Info
= _WRONG_MESSAGE_FORMAT
;
3578 req
= m_parms
[0].info
[0];
3579 plci
->command
= _MANUFACTURER_R
;
3580 plci
->m_command
= command
;
3581 plci
->number
= Number
;
3584 plci
->b_channel
= getChannel(&m_parms
[1]);
3585 mixer_set_bchannel_id_esc (plci
, plci
->b_channel
);
3586 if(plci
->spoofed_msg
==SPOOFING_REQUIRED
)
3588 plci
->spoofed_msg
= CALL_REQ
| AWAITING_MANUF_CON
;
3589 plci
->internal_command
= BLOCK_PLCI
; /* reject other req meanwhile */
3594 else if(req
==LAW_REQ
)
3596 plci
->cr_enquiry
= true;
3598 add_ss(plci
,FTY
,&m_parms
[1]);
3599 sig_req(plci
,req
,0);
3603 if (plci
->NL
.Id
&& !plci
->nl_remove_id
)
3607 for (ncci
= 1; ncci
< MAX_NCCI
+1; ncci
++)
3609 if ((a
->ncci_plci
[ncci
] == plci
->Id
) && (a
->ncci_state
[ncci
] == CONNECTED
))
3611 a
->ncci_state
[ncci
] = OUTG_DIS_PENDING
;
3612 cleanup_ncci_data (plci
, ncci
);
3613 nl_req_ncci(plci
,N_DISC
,(byte
)ncci
);
3617 mixer_remove (plci
);
3618 nl_req_ncci(plci
,REMOVE
,0);
3625 /* signalling control for loop activation B-channel */
3628 Info
= _WRONG_IDENTIFIER
;
3632 plci
->command
= _MANUFACTURER_R
;
3633 plci
->number
= Number
;
3635 sig_req(plci
,SIG_CTRL
,0);
3638 else Info
= _WRONG_MESSAGE_FORMAT
;
3642 /* activation control for receiver/transmitter B-channel */
3645 Info
= _WRONG_IDENTIFIER
;
3649 plci
->command
= _MANUFACTURER_R
;
3650 plci
->number
= Number
;
3652 sig_req(plci
,DSP_CTRL
,0);
3655 else Info
= _WRONG_MESSAGE_FORMAT
;
3660 /* TEL_CTRL commands to support non standard adjustments: */
3661 /* Ring on/off, Handset micro volume, external micro vol. */
3662 /* handset+external speaker volume, receiver+transm. gain,*/
3663 /* handsfree on (hookinfo off), set mixer command */
3665 if(command
== _DI_ADV_CODEC
)
3667 if(!a
->AdvCodecPLCI
) {
3668 Info
= _WRONG_STATE
;
3671 v_plci
= a
->AdvCodecPLCI
;
3677 && (m
->info
[1] == 0x1c)
3678 && (m
->info
[2] >= 1))
3680 if (m
->info
[3] == DSP_CTRL_OLD_SET_MIXER_COEFFICIENTS
)
3682 if ((plci
->tel
!= ADV_VOICE
) || (plci
!= a
->AdvSignalPLCI
))
3684 Info
= _WRONG_STATE
;
3687 a
->adv_voice_coef_length
= m
->info
[2] - 1;
3688 if (a
->adv_voice_coef_length
> m
->length
- 3)
3689 a
->adv_voice_coef_length
= (byte
)(m
->length
- 3);
3690 if (a
->adv_voice_coef_length
> ADV_VOICE_COEF_BUFFER_SIZE
)
3691 a
->adv_voice_coef_length
= ADV_VOICE_COEF_BUFFER_SIZE
;
3692 for (i
= 0; i
< a
->adv_voice_coef_length
; i
++)
3693 a
->adv_voice_coef_buffer
[i
] = m
->info
[4 + i
];
3694 if (plci
->B1_facilities
& B1_FACILITY_VOICE
)
3695 adv_voice_write_coefs (plci
, ADV_VOICE_WRITE_UPDATE
);
3698 else if (m
->info
[3] == DSP_CTRL_SET_DTMF_PARAMETERS
)
3700 if (!(a
->manufacturer_features
& MANUFACTURER_FEATURE_DTMF_PARAMETERS
))
3702 Info
= _FACILITY_NOT_SUPPORTED
;
3706 plci
->dtmf_parameter_length
= m
->info
[2] - 1;
3707 if (plci
->dtmf_parameter_length
> m
->length
- 3)
3708 plci
->dtmf_parameter_length
= (byte
)(m
->length
- 3);
3709 if (plci
->dtmf_parameter_length
> DTMF_PARAMETER_BUFFER_SIZE
)
3710 plci
->dtmf_parameter_length
= DTMF_PARAMETER_BUFFER_SIZE
;
3711 for (i
= 0; i
< plci
->dtmf_parameter_length
; i
++)
3712 plci
->dtmf_parameter_buffer
[i
] = m
->info
[4+i
];
3713 if (plci
->B1_facilities
& B1_FACILITY_DTMFR
)
3714 dtmf_parameter_write (plci
);
3724 Info
= _WRONG_IDENTIFIER
;
3728 add_ss(v_plci
,FTY
,m
);
3729 sig_req(v_plci
,TEL_CTRL
,0);
3732 else Info
= _WRONG_MESSAGE_FORMAT
;
3736 case _DI_OPTIONS_REQUEST
:
3737 if(api_parse(&m
->info
[1],(word
)m
->length
,"d",m_parms
)) {
3738 Info
= _WRONG_MESSAGE_FORMAT
;
3741 if (GET_DWORD (m_parms
[0].info
) & ~a
->man_profile
.private_options
)
3743 Info
= _FACILITY_NOT_SUPPORTED
;
3746 a
->requested_options_table
[appl
->Id
-1] = GET_DWORD (m_parms
[0].info
);
3752 Info
= _WRONG_MESSAGE_FORMAT
;
3758 _MANUFACTURER_R
|CONFIRM
,
3761 "dww",_DI_MANU_ID
,command
,Info
);
3766 static byte
manufacturer_res(dword Id
, word Number
, DIVA_CAPI_ADAPTER
*a
,
3767 PLCI
*plci
, APPL
*appl
, API_PARSE
*msg
)
3771 API_PARSE m_parms
[3];
3773 API_PARSE fax_parms
[9];
3778 dbug(1,dprintf("manufacturer_res"));
3780 if ((msg
[0].length
== 0)
3781 || (msg
[1].length
== 0)
3782 || (GET_DWORD(msg
[0].info
)!=_DI_MANU_ID
))
3786 indication
= GET_WORD(msg
[1].info
);
3790 case _DI_NEGOTIATE_B3
:
3793 if (((plci
->B3_prot
!= 4) && (plci
->B3_prot
!= 5))
3794 || !(plci
->ncpi_state
& NCPI_NEGOTIATE_B3_SENT
))
3796 dbug(1,dprintf("wrong state for NEGOTIATE_B3 parameters"));
3799 if (api_parse (&msg
[2].info
[1], msg
[2].length
, "ws", m_parms
))
3801 dbug(1,dprintf("wrong format in NEGOTIATE_B3 parameters"));
3805 len
= offsetof(T30_INFO
, station_id
) + T30_MAX_STATION_ID_LENGTH
;
3806 if (plci
->fax_connect_info_length
< len
)
3808 ((T30_INFO
*)(plci
->fax_connect_info_buffer
))->station_id_len
= 0;
3809 ((T30_INFO
*)(plci
->fax_connect_info_buffer
))->head_line_len
= 0;
3811 if (api_parse (&ncpi
->info
[1], ncpi
->length
, "wwwwssss", fax_parms
))
3813 dbug(1,dprintf("non-standard facilities info missing or wrong format"));
3817 if (plci
->fax_connect_info_length
<= len
)
3818 plci
->fax_connect_info_buffer
[len
] = 0;
3819 len
+= 1 + plci
->fax_connect_info_buffer
[len
];
3820 if (plci
->fax_connect_info_length
<= len
)
3821 plci
->fax_connect_info_buffer
[len
] = 0;
3822 len
+= 1 + plci
->fax_connect_info_buffer
[len
];
3823 if ((fax_parms
[7].length
>= 3) && (fax_parms
[7].info
[1] >= 2))
3824 plci
->nsf_control_bits
= GET_WORD(&fax_parms
[7].info
[2]);
3825 plci
->fax_connect_info_buffer
[len
++] = (byte
)(fax_parms
[7].length
);
3826 for (i
= 0; i
< fax_parms
[7].length
; i
++)
3827 plci
->fax_connect_info_buffer
[len
++] = fax_parms
[7].info
[1+i
];
3829 plci
->fax_connect_info_length
= len
;
3830 plci
->fax_edata_ack_length
= plci
->fax_connect_info_length
;
3831 start_internal_command (Id
, plci
, fax_edata_ack_command
);
3838 /*------------------------------------------------------------------*/
3839 /* IDI callback function */
3840 /*------------------------------------------------------------------*/
3842 void callback(ENTITY
* e
)
3844 DIVA_CAPI_ADAPTER
* a
;
3855 dbug(1,dprintf("%x:CB(%x:Req=%x,Rc=%x,Ind=%x)",
3856 (e
->user
[0]+1)&0x7fff,e
->Id
,e
->Req
,e
->Rc
,e
->Ind
));
3858 a
= &(adapter
[(byte
)e
->user
[0]]);
3859 plci
= &(a
->plci
[e
->user
[1]]);
3860 no_cancel_rc
= DIVA_CAPI_SUPPORTS_NO_CANCEL(a
);
3863 If new protocol code and new XDI is used then CAPI should work
3864 fully in accordance with IDI cpec an look on callback field instead
3865 of Rc field for return codes.
3867 if (((e
->complete
== 0xff) && no_cancel_rc
) ||
3868 (e
->Rc
&& !no_cancel_rc
)) {
3874 if (e
->user
[0] & 0x8000)
3877 If REMOVE request was sent then we have to wait until
3878 return code with Id set to zero arrives.
3879 All other return codes should be ignored.
3885 dbug(1,dprintf("cancel RC in REMOVE state"));
3888 channel_flow_control_remove (plci
);
3889 for (i
= 0; i
< 256; i
++)
3891 if (a
->FlowControlIdTable
[i
] == plci
->nl_remove_id
)
3892 a
->FlowControlIdTable
[i
] = 0;
3894 plci
->nl_remove_id
= 0;
3895 if (plci
->rx_dma_descriptor
> 0) {
3896 diva_free_dma_descriptor (plci
, plci
->rx_dma_descriptor
- 1);
3897 plci
->rx_dma_descriptor
= 0;
3902 a
->FlowControlIdTable
[ch
] = e
->Id
;
3903 a
->FlowControlSkipTable
[ch
] = 0;
3905 a
->ch_flow_control
[ch
] |= N_OK_FC_PENDING
;
3906 a
->ch_flow_plci
[ch
] = plci
->Id
;
3912 Cancel return codes self, if feature was requested
3914 if (no_cancel_rc
&& (a
->FlowControlIdTable
[ch
] == e
->Id
) && e
->Id
) {
3915 a
->FlowControlIdTable
[ch
] = 0;
3916 if ((rc
== OK
) && a
->FlowControlSkipTable
[ch
]) {
3917 dbug(3,dprintf ("XDI CAPI: RC cancelled Id:0x02, Ch:%02x", e
->Id
, ch
));
3922 if (a
->ch_flow_control
[ch
] & N_OK_FC_PENDING
)
3924 a
->ch_flow_control
[ch
] &= ~N_OK_FC_PENDING
;
3932 control_rc (plci
, 0, rc
, ch
, 0, true);
3937 channel_x_on (plci
, ch
);
3938 if (plci
->internal_command
)
3939 control_rc (plci
, req
, rc
, ch
, 0, true);
3943 if (plci
->nl_global_req
)
3945 global_req
= plci
->nl_global_req
;
3946 plci
->nl_global_req
= 0;
3947 if (rc
!= ASSIGN_OK
) {
3949 if (plci
->rx_dma_descriptor
> 0) {
3950 diva_free_dma_descriptor (plci
, plci
->rx_dma_descriptor
- 1);
3951 plci
->rx_dma_descriptor
= 0;
3954 channel_xmit_xon (plci
);
3955 control_rc (plci
, 0, rc
, ch
, global_req
, true);
3957 else if (plci
->data_sent
)
3959 channel_xmit_xon (plci
);
3960 plci
->data_sent
= false;
3963 if (plci
->internal_command
)
3964 control_rc (plci
, req
, rc
, ch
, 0, true);
3968 channel_xmit_xon (plci
);
3969 control_rc (plci
, req
, rc
, ch
, 0, true);
3977 If REMOVE request was sent then we have to wait until
3978 return code with Id set to zero arrives.
3979 All other return codes should be ignored.
3985 dbug(1,dprintf("cancel RC in REMOVE state"));
3988 plci
->sig_remove_id
= 0;
3991 if (plci
->sig_global_req
)
3993 global_req
= plci
->sig_global_req
;
3994 plci
->sig_global_req
= 0;
3995 if (rc
!= ASSIGN_OK
)
3997 channel_xmit_xon (plci
);
3998 control_rc (plci
, 0, rc
, ch
, global_req
, false);
4002 channel_xmit_xon (plci
);
4003 control_rc (plci
, req
, rc
, ch
, 0, false);
4007 Again: in accordance with IDI spec Rc and Ind can't be delivered in the
4008 same callback. Also if new XDI and protocol code used then jump
4012 channel_xmit_xon(plci
);
4013 goto capi_callback_suffix
;
4017 channel_xmit_xon(plci
);
4020 if (e
->user
[0] &0x8000) {
4021 byte Ind
= e
->Ind
& 0x0f;
4023 if (((Ind
==N_DISC
) || (Ind
==N_DISC_ACK
)) &&
4024 (a
->ch_flow_plci
[Ch
] == plci
->Id
)) {
4025 if (a
->ch_flow_control
[Ch
] & N_RX_FLOW_CONTROL_MASK
) {
4026 dbug(3,dprintf ("XDI CAPI: I: pending N-XON Ch:%02x", Ch
));
4028 a
->ch_flow_control
[Ch
] &= ~N_RX_FLOW_CONTROL_MASK
;
4031 if ((e
->RNR
!= 1) &&
4032 (a
->ch_flow_plci
[Ch
] == plci
->Id
) &&
4033 (a
->ch_flow_control
[Ch
] & N_RX_FLOW_CONTROL_MASK
)) {
4034 a
->ch_flow_control
[Ch
] &= ~N_RX_FLOW_CONTROL_MASK
;
4035 dbug(3,dprintf ("XDI CAPI: I: remove faked N-XON Ch:%02x", Ch
));
4043 capi_callback_suffix
:
4045 while (!plci
->req_in
4046 && !plci
->internal_command
4047 && (plci
->msg_in_write_pos
!= plci
->msg_in_read_pos
))
4049 j
= (plci
->msg_in_read_pos
== plci
->msg_in_wrap_pos
) ? 0 : plci
->msg_in_read_pos
;
4051 i
= (((CAPI_MSG
*)(&((byte
*)(plci
->msg_in_queue
))[j
]))->header
.length
+ 3) & 0xfffc;
4053 m
= (CAPI_MSG
*)(&((byte
*)(plci
->msg_in_queue
))[j
]);
4054 appl
= *((APPL
* *)(&((byte
*)(plci
->msg_in_queue
))[j
+i
]));
4055 dbug(1,dprintf("dequeue msg(0x%04x) - write=%d read=%d wrap=%d",
4056 m
->header
.command
, plci
->msg_in_write_pos
, plci
->msg_in_read_pos
, plci
->msg_in_wrap_pos
));
4057 if (plci
->msg_in_read_pos
== plci
->msg_in_wrap_pos
)
4059 plci
->msg_in_wrap_pos
= MSG_IN_QUEUE_SIZE
;
4060 plci
->msg_in_read_pos
= i
+ MSG_IN_OVERHEAD
;
4064 plci
->msg_in_read_pos
= j
+ i
+ MSG_IN_OVERHEAD
;
4066 if (plci
->msg_in_read_pos
== plci
->msg_in_write_pos
)
4068 plci
->msg_in_write_pos
= MSG_IN_QUEUE_SIZE
;
4069 plci
->msg_in_read_pos
= MSG_IN_QUEUE_SIZE
;
4071 else if (plci
->msg_in_read_pos
== plci
->msg_in_wrap_pos
)
4073 plci
->msg_in_read_pos
= MSG_IN_QUEUE_SIZE
;
4074 plci
->msg_in_wrap_pos
= MSG_IN_QUEUE_SIZE
;
4076 i
= api_put (appl
, m
);
4079 if (m
->header
.command
== _DATA_B3_R
)
4081 TransmitBufferFree (appl
, (byte
*)(long)(m
->info
.data_b3_req
.Data
));
4083 dbug(1,dprintf("Error 0x%04x from msg(0x%04x)", i
, m
->header
.command
));
4087 if (plci
->li_notify_update
)
4089 plci
->li_notify_update
= false;
4090 mixer_notify_update (plci
, false);
4099 static void control_rc(PLCI
*plci
, byte req
, byte rc
, byte ch
, byte global_req
,
4108 DIVA_CAPI_ADAPTER
* a
;
4111 byte SSparms
[] = "\x05\x00\x00\x02\x00\x00";
4112 byte SSstruct
[] = "\x09\x00\x00\x06\x00\x00\x00\x00\x00\x00";
4115 dbug(0,dprintf("A: control_rc, no plci %02x:%02x:%02x:%02x:%02x", req
, rc
, ch
, global_req
, nl_rc
));
4118 dbug(1,dprintf("req0_in/out=%d/%d",plci
->req_in
,plci
->req_out
));
4119 if(plci
->req_in
!=plci
->req_out
)
4121 if (nl_rc
|| (global_req
!= ASSIGN
) || (rc
== ASSIGN_OK
))
4123 dbug(1,dprintf("req_1return"));
4126 /* cancel outstanding request on the PLCI after SIG ASSIGN failure */
4128 plci
->req_in
= plci
->req_in_start
= plci
->req_out
= 0;
4129 dbug(1,dprintf("control_rc"));
4133 ncci
= a
->ch_ncci
[ch
];
4136 Id
= (((dword
)(ncci
? ncci
: ch
)) << 16) | ((word
)plci
->Id
<< 8) | a
->Id
;
4137 if(plci
->tel
&& plci
->SuppState
!=CALL_HELD
) Id
|=EXT_CONTROLLER
;
4138 Number
= plci
->number
;
4139 dbug(1,dprintf("Contr_RC-Id=%08lx,plci=%x,tel=%x, entity=0x%x, command=0x%x, int_command=0x%x",Id
,plci
->Id
,plci
->tel
,plci
->Sig
.Id
,plci
->command
,plci
->internal_command
));
4140 dbug(1,dprintf("channels=0x%x",plci
->channels
));
4141 if (plci_remove_check(plci
))
4143 if(req
==REMOVE
&& rc
==ASSIGN_OK
)
4145 sig_req(plci
,HANGUP
,0);
4146 sig_req(plci
,REMOVE
,0);
4151 switch(plci
->command
)
4154 dbug(1,dprintf("HoldRC=0x%x",rc
));
4155 SSparms
[1] = (byte
)S_HOLD
;
4158 plci
->SuppState
= IDLE
;
4161 sendf(appl
,_FACILITY_R
|CONFIRM
,Id
,Number
,"wws",Info
,3,SSparms
);
4164 case C_RETRIEVE_REQ
:
4165 dbug(1,dprintf("RetrieveRC=0x%x",rc
));
4166 SSparms
[1] = (byte
)S_RETRIEVE
;
4169 plci
->SuppState
= CALL_HELD
;
4172 sendf(appl
,_FACILITY_R
|CONFIRM
,Id
,Number
,"wws",Info
,3,SSparms
);
4176 dbug(1,dprintf("InfoRC=0x%x",rc
));
4177 if(rc
!=OK
) Info
=_WRONG_STATE
;
4178 sendf(appl
,_INFO_R
|CONFIRM
,Id
,Number
,"w",Info
);
4182 dbug(1,dprintf("Connect_R=0x%x/0x%x/0x%x/0x%x",req
,rc
,global_req
,nl_rc
));
4183 if (plci
->State
== INC_DIS_PENDING
)
4185 if(plci
->Sig
.Id
!=0xff)
4187 if (((global_req
== ASSIGN
) && (rc
!= ASSIGN_OK
))
4188 || (!nl_rc
&& (req
== CALL_REQ
) && (rc
!= OK
)))
4190 dbug(1,dprintf("No more IDs/Call_Req failed"));
4191 sendf(appl
,_CONNECT_R
|CONFIRM
,Id
&0xffL
,Number
,"w",_OUT_OF_PLCI
);
4196 if(plci
->State
!=LOCAL_CONNECT
)plci
->State
= OUTG_CON_PENDING
;
4197 sendf(appl
,_CONNECT_R
|CONFIRM
,Id
,Number
,"w",0);
4199 else /* D-ch activation */
4201 if (rc
!= ASSIGN_OK
)
4203 dbug(1,dprintf("No more IDs/X.25 Call_Req failed"));
4204 sendf(appl
,_CONNECT_R
|CONFIRM
,Id
&0xffL
,Number
,"w",_OUT_OF_PLCI
);
4209 sendf(appl
,_CONNECT_R
|CONFIRM
,Id
,Number
,"w",0);
4210 sendf(plci
->appl
,_CONNECT_ACTIVE_I
,Id
,0,"sss","","","");
4211 plci
->State
= INC_ACT_PENDING
;
4215 case _CONNECT_I
|RESPONSE
:
4216 if (plci
->State
!= INC_DIS_PENDING
)
4217 plci
->State
= INC_CON_ACCEPT
;
4221 if (plci
->State
== INC_DIS_PENDING
)
4223 if(plci
->Sig
.Id
!=0xff)
4225 plci
->State
= OUTG_DIS_PENDING
;
4226 sendf(appl
,_DISCONNECT_R
|CONFIRM
,Id
,Number
,"w",0);
4239 sendf(appl
,_CONNECT_B3_R
|CONFIRM
,Id
,Number
,"w",_WRONG_IDENTIFIER
);
4242 ncci
= get_ncci (plci
, ch
, 0);
4243 Id
= (Id
& 0xffff) | (((dword
) ncci
) << 16);
4247 a
->ncci_state
[ncci
] = INC_ACT_PENDING
;
4248 sendf(appl
,_CONNECT_B3_R
|CONFIRM
,Id
,Number
,"w",0);
4249 sendf(appl
,_CONNECT_B3_ACTIVE_I
,Id
,0,"s","");
4253 a
->ncci_state
[ncci
] = OUTG_CON_PENDING
;
4254 sendf(appl
,_CONNECT_B3_R
|CONFIRM
,Id
,Number
,"w",0);
4258 case _CONNECT_B3_I
|RESPONSE
:
4262 /* sendf(appl,_RESET_B3_R|CONFIRM,Id,Number,"w",0);*/
4265 case _DISCONNECT_B3_R
:
4266 sendf(appl
,_DISCONNECT_B3_R
|CONFIRM
,Id
,Number
,"w",0);
4269 case _MANUFACTURER_R
:
4275 Info
= _WRONG_IDENTIFIER
;
4276 sendf(plci
->appl
,_CONNECT_R
|CONFIRM
,Id
,Number
,"w",Info
);
4280 sendf(plci
->appl
,_CONNECT_R
|CONFIRM
,Id
,Number
,"w",Info
);
4288 else if (plci
->internal_command
)
4290 switch(plci
->internal_command
)
4296 if(rc
==OK
) /* command supported, wait for indication */
4303 /* Get Supported Services */
4304 case GETSERV_REQ_PEND
:
4305 if(rc
==OK
) /* command supported, wait for indication */
4309 PUT_DWORD(&SSstruct
[6], MASK_TERMINAL_PORTABILITY
);
4310 sendf(appl
, _FACILITY_R
|CONFIRM
, Id
, Number
, "wws",0,3,SSstruct
);
4314 case INTERR_DIVERSION_REQ_PEND
: /* Interrogate Parameters */
4315 case INTERR_NUMBERS_REQ_PEND
:
4316 case CF_START_PEND
: /* Call Forwarding Start pending */
4317 case CF_STOP_PEND
: /* Call Forwarding Stop pending */
4318 case CCBS_REQUEST_REQ_PEND
:
4319 case CCBS_DEACTIVATE_REQ_PEND
:
4320 case CCBS_INTERROGATE_REQ_PEND
:
4321 switch(plci
->internal_command
)
4323 case INTERR_DIVERSION_REQ_PEND
:
4324 SSparms
[1] = S_INTERROGATE_DIVERSION
;
4326 case INTERR_NUMBERS_REQ_PEND
:
4327 SSparms
[1] = S_INTERROGATE_NUMBERS
;
4330 SSparms
[1] = S_CALL_FORWARDING_START
;
4333 SSparms
[1] = S_CALL_FORWARDING_STOP
;
4335 case CCBS_REQUEST_REQ_PEND
:
4336 SSparms
[1] = S_CCBS_REQUEST
;
4338 case CCBS_DEACTIVATE_REQ_PEND
:
4339 SSparms
[1] = S_CCBS_DEACTIVATE
;
4341 case CCBS_INTERROGATE_REQ_PEND
:
4342 SSparms
[1] = S_CCBS_INTERROGATE
;
4345 if(global_req
==ASSIGN
)
4347 dbug(1,dprintf("AssignDiversion_RC=0x%x/0x%x",req
,rc
));
4350 if(!plci
->appl
) break;
4351 if(rc
==ISDN_GUARD_REJ
)
4353 Info
= _CAPI_GUARD_ERROR
;
4357 Info
= _SUPPLEMENTARY_SERVICE_NOT_SUPPORTED
;
4359 sendf(plci
->appl
,_FACILITY_R
|CONFIRM
,Id
&0x7,
4360 plci
->number
,"wws",Info
,(word
)3,SSparms
);
4361 if(Info
) plci_remove(plci
);
4364 /* 3pty conference pending */
4366 if(!plci
->relatedPTYPLCI
) break;
4367 rplci
= plci
->relatedPTYPLCI
;
4368 SSparms
[1] = plci
->ptyState
;
4369 rId
= ((word
)rplci
->Id
<<8)|rplci
->adapter
->Id
;
4370 if(rplci
->tel
) rId
|=EXT_CONTROLLER
;
4373 Info
= 0x300E; /* not supported */
4374 plci
->relatedPTYPLCI
= NULL
;
4378 _FACILITY_R
|CONFIRM
,
4381 "wws",Info
,(word
)3,SSparms
);
4384 /* Explicit Call Transfer pending */
4386 dbug(1,dprintf("ECT_RC=0x%x/0x%x",req
,rc
));
4387 if(!plci
->relatedPTYPLCI
) break;
4388 rplci
= plci
->relatedPTYPLCI
;
4390 rId
= ((word
)rplci
->Id
<<8)|rplci
->adapter
->Id
;
4391 if(rplci
->tel
) rId
|=EXT_CONTROLLER
;
4394 Info
= 0x300E; /* not supported */
4395 plci
->relatedPTYPLCI
= NULL
;
4399 _FACILITY_R
|CONFIRM
,
4402 "wws",Info
,(word
)3,SSparms
);
4405 case _MANUFACTURER_R
:
4406 dbug(1,dprintf("_Manufacturer_R=0x%x/0x%x",req
,rc
));
4407 if ((global_req
== ASSIGN
) && (rc
!= ASSIGN_OK
))
4409 dbug(1,dprintf("No more IDs"));
4410 sendf(appl
,_MANUFACTURER_R
|CONFIRM
,Id
,Number
,"dww",_DI_MANU_ID
,_MANUFACTURER_R
,_OUT_OF_PLCI
);
4411 plci_remove(plci
); /* after codec init, internal codec commands pending */
4416 dbug(1,dprintf("_Connect_R=0x%x/0x%x",req
,rc
));
4417 if ((global_req
== ASSIGN
) && (rc
!= ASSIGN_OK
))
4419 dbug(1,dprintf("No more IDs"));
4420 sendf(appl
,_CONNECT_R
|CONFIRM
,Id
&0xffL
,Number
,"w",_OUT_OF_PLCI
);
4421 plci_remove(plci
); /* after codec init, internal codec commands pending */
4425 case PERM_COD_HOOK
: /* finished with Hook_Ind */
4429 dbug(1,dprintf("***Codec Connect_Pending A, Rc = 0x%x",rc
));
4430 plci
->internal_command
= PERM_COD_CONN_PEND
;
4433 case PERM_COD_ASSIGN
:
4434 dbug(1,dprintf("***Codec Assign A, Rc = 0x%x",rc
));
4435 if(rc
!=ASSIGN_OK
) break;
4436 sig_req(plci
,CALL_REQ
,0);
4438 plci
->internal_command
= PERM_COD_CALL
;
4441 /* Null Call Reference Request pending */
4443 dbug(1,dprintf("NCR_FAC=0x%x/0x%x",req
,rc
));
4444 if(global_req
==ASSIGN
)
4452 sendf(appl
,_INFO_R
|CONFIRM
,Id
&0xf,Number
,"w",_WRONG_STATE
);
4453 appl
->NullCREnable
= false;
4457 else if(req
==NCR_FACILITY
)
4461 sendf(appl
,_INFO_R
|CONFIRM
,Id
&0xf,Number
,"w",0);
4465 sendf(appl
,_INFO_R
|CONFIRM
,Id
&0xf,Number
,"w",_WRONG_STATE
);
4466 appl
->NullCREnable
= false;
4475 if(a
->ncci_state
[ncci
]==CONNECTED
)
4477 a
->ncci_state
[ncci
] = OUTG_DIS_PENDING
;
4478 cleanup_ncci_data (plci
, ncci
);
4479 nl_req_ncci(plci
,N_DISC
,(byte
)ncci
);
4486 if (plci
->State
== INC_DIS_PENDING
)
4488 sig_req(plci
,CALL_REQ
,0);
4490 plci
->State
=OUTG_CON_PENDING
;
4494 case MWI_ACTIVATE_REQ_PEND
:
4495 case MWI_DEACTIVATE_REQ_PEND
:
4496 if(global_req
== ASSIGN
&& rc
==ASSIGN_OK
)
4498 dbug(1,dprintf("MWI_REQ assigned"));
4505 Info
= 0x2007; /* Illegal message parameter coding */
4506 dbug(1,dprintf("MWI_REQ invalid parameter"));
4510 Info
= 0x300B; /* not supported */
4511 dbug(1,dprintf("MWI_REQ not supported"));
4513 /* 0x3010: Request not allowed in this state */
4514 PUT_WORD(&SSparms
[4],0x300E); /* SS not supported */
4517 if(plci
->internal_command
==MWI_ACTIVATE_REQ_PEND
)
4519 PUT_WORD(&SSparms
[1],S_MWI_ACTIVATE
);
4521 else PUT_WORD(&SSparms
[1],S_MWI_DEACTIVATE
);
4523 if(plci
->cr_enquiry
)
4526 _FACILITY_R
|CONFIRM
,
4529 "wws",Info
,(word
)3,SSparms
);
4530 if(rc
!=OK
) plci_remove(plci
);
4535 _FACILITY_R
|CONFIRM
,
4538 "wws",Info
,(word
)3,SSparms
);
4542 case CONF_BEGIN_REQ_PEND
:
4543 case CONF_ADD_REQ_PEND
:
4544 case CONF_SPLIT_REQ_PEND
:
4545 case CONF_DROP_REQ_PEND
:
4546 case CONF_ISOLATE_REQ_PEND
:
4547 case CONF_REATTACH_REQ_PEND
:
4548 dbug(1,dprintf("CONF_RC=0x%x/0x%x",req
,rc
));
4549 if((plci
->internal_command
==CONF_ADD_REQ_PEND
)&&(!plci
->relatedPTYPLCI
)) break;
4552 switch(plci
->internal_command
)
4554 case CONF_BEGIN_REQ_PEND
:
4555 SSparms
[1] = S_CONF_BEGIN
;
4557 case CONF_ADD_REQ_PEND
:
4558 SSparms
[1] = S_CONF_ADD
;
4559 rplci
= plci
->relatedPTYPLCI
;
4560 rId
= ((word
)rplci
->Id
<<8)|rplci
->adapter
->Id
;
4562 case CONF_SPLIT_REQ_PEND
:
4563 SSparms
[1] = S_CONF_SPLIT
;
4565 case CONF_DROP_REQ_PEND
:
4566 SSparms
[1] = S_CONF_DROP
;
4568 case CONF_ISOLATE_REQ_PEND
:
4569 SSparms
[1] = S_CONF_ISOLATE
;
4571 case CONF_REATTACH_REQ_PEND
:
4572 SSparms
[1] = S_CONF_REATTACH
;
4578 Info
= 0x300E; /* not supported */
4579 plci
->relatedPTYPLCI
= NULL
;
4583 _FACILITY_R
|CONFIRM
,
4586 "wws",Info
,(word
)3,SSparms
);
4589 case VSWITCH_REQ_PEND
:
4592 if(plci
->relatedPTYPLCI
)
4594 plci
->relatedPTYPLCI
->vswitchstate
=0;
4595 plci
->relatedPTYPLCI
->vsprot
=0;
4596 plci
->relatedPTYPLCI
->vsprotdialect
=0;
4598 plci
->vswitchstate
=0;
4600 plci
->vsprotdialect
=0;
4604 if(plci
->relatedPTYPLCI
&&
4605 plci
->vswitchstate
==1 &&
4606 plci
->relatedPTYPLCI
->vswitchstate
==3) /* join complete */
4607 plci
->vswitchstate
=3;
4611 /* Call Deflection Request pending (SSCT) */
4613 SSparms
[1] = S_CALL_DEFLECTION
;
4616 Info
= 0x300E; /* not supported */
4617 plci
->appl
->CDEnable
= 0;
4619 sendf(plci
->appl
,_FACILITY_R
|CONFIRM
,Id
,
4620 plci
->number
,"wws",Info
,(word
)3,SSparms
);
4623 case RTP_CONNECT_B3_REQ_COMMAND_2
:
4626 ncci
= get_ncci (plci
, ch
, 0);
4627 Id
= (Id
& 0xffff) | (((dword
) ncci
) << 16);
4629 a
->ncci_state
[ncci
] = OUTG_CON_PENDING
;
4633 if (plci
->internal_command_queue
[0])
4635 (*(plci
->internal_command_queue
[0]))(Id
, plci
, rc
);
4636 if (plci
->internal_command
)
4641 next_internal_command (Id
, plci
);
4646 Id
= ((word
)plci
->Id
<<8)|plci
->adapter
->Id
;
4647 if(plci
->tel
) Id
|=EXT_CONTROLLER
;
4649 switch(plci
->internal_command
)
4654 case START_L1_SIG_ASSIGN_PEND
:
4655 case REM_L1_SIG_ASSIGN_PEND
:
4656 if(global_req
== ASSIGN
)
4662 dbug(1,dprintf("***L1 Req rem PLCI"));
4663 plci
->internal_command
= 0;
4664 sig_req(plci
,REMOVE
,0);
4669 /* Call Deflection Request pending, just no appl ptr assigned */
4671 SSparms
[1] = S_CALL_DEFLECTION
;
4674 Info
= 0x300E; /* not supported */
4676 for(i
=0; i
<max_appl
; i
++)
4678 if(application
[i
].CDEnable
)
4680 if(!application
[i
].Id
) application
[i
].CDEnable
= 0;
4683 sendf(&application
[i
],_FACILITY_R
|CONFIRM
,Id
,
4684 plci
->number
,"wws",Info
,(word
)3,SSparms
);
4685 if(Info
) application
[i
].CDEnable
= 0;
4689 plci
->internal_command
= 0;
4692 case PERM_COD_HOOK
: /* finished with Hook_Ind */
4696 plci
->internal_command
= PERM_COD_CONN_PEND
;
4697 dbug(1,dprintf("***Codec Connect_Pending, Rc = 0x%x",rc
));
4700 case PERM_COD_ASSIGN
:
4701 dbug(1,dprintf("***Codec Assign, Rc = 0x%x",rc
));
4702 plci
->internal_command
= 0;
4703 if(rc
!=ASSIGN_OK
) break;
4704 plci
->internal_command
= PERM_COD_CALL
;
4705 sig_req(plci
,CALL_REQ
,0);
4709 case LISTEN_SIG_ASSIGN_PEND
:
4712 plci
->internal_command
= 0;
4713 dbug(1,dprintf("ListenCheck, new SIG_ID = 0x%x",plci
->Sig
.Id
));
4714 add_p(plci
,ESC
,"\x02\x18\x00"); /* support call waiting */
4715 sig_req(plci
,INDICATE_REQ
,0);
4720 dbug(1,dprintf("ListenCheck failed (assignRc=0x%x)",rc
));
4728 if(global_req
== ASSIGN
)
4732 sig_req(plci
,LAW_REQ
,0);
4734 dbug(1,dprintf("Auto-Law assigned"));
4738 dbug(1,dprintf("Auto-Law assign failed"));
4739 a
->automatic_law
= 3;
4740 plci
->internal_command
= 0;
4741 a
->automatic_lawPLCI
= NULL
;
4745 else if(req
== LAW_REQ
&& rc
==OK
)
4747 dbug(1,dprintf("Auto-Law initiated"));
4748 a
->automatic_law
= 2;
4749 plci
->internal_command
= 0;
4753 dbug(1,dprintf("Auto-Law not supported"));
4754 a
->automatic_law
= 3;
4755 plci
->internal_command
= 0;
4756 sig_req(plci
,REMOVE
,0);
4758 a
->automatic_lawPLCI
= NULL
;
4762 plci_remove_check(plci
);
4766 static void data_rc(PLCI
*plci
, byte ch
)
4769 DIVA_CAPI_ADAPTER
* a
;
4776 TransmitBufferFree (plci
->appl
, plci
->data_sent_ptr
);
4778 ncci
= a
->ch_ncci
[ch
];
4779 if (ncci
&& (a
->ncci_plci
[ncci
] == plci
->Id
))
4781 ncci_ptr
= &(a
->ncci
[ncci
]);
4782 dbug(1,dprintf("data_out=%d, data_pending=%d",ncci_ptr
->data_out
,ncci_ptr
->data_pending
));
4783 if (ncci_ptr
->data_pending
)
4785 data
= &(ncci_ptr
->DBuffer
[ncci_ptr
->data_out
]);
4786 if (!(data
->Flags
&4) && a
->ncci_state
[ncci
])
4788 Id
= (((dword
)ncci
)<<16)|((word
)plci
->Id
<<8)|a
->Id
;
4789 if(plci
->tel
) Id
|=EXT_CONTROLLER
;
4790 sendf(plci
->appl
,_DATA_B3_R
|CONFIRM
,Id
,data
->Number
,
4791 "ww",data
->Handle
,0);
4793 (ncci_ptr
->data_out
)++;
4794 if (ncci_ptr
->data_out
== MAX_DATA_B3
)
4795 ncci_ptr
->data_out
= 0;
4796 (ncci_ptr
->data_pending
)--;
4802 static void data_ack(PLCI
*plci
, byte ch
)
4805 DIVA_CAPI_ADAPTER
* a
;
4810 ncci
= a
->ch_ncci
[ch
];
4811 ncci_ptr
= &(a
->ncci
[ncci
]);
4812 if (ncci_ptr
->data_ack_pending
)
4814 if (a
->ncci_state
[ncci
] && (a
->ncci_plci
[ncci
] == plci
->Id
))
4816 Id
= (((dword
)ncci
)<<16)|((word
)plci
->Id
<<8)|a
->Id
;
4817 if(plci
->tel
) Id
|=EXT_CONTROLLER
;
4818 sendf(plci
->appl
,_DATA_B3_R
|CONFIRM
,Id
,ncci_ptr
->DataAck
[ncci_ptr
->data_ack_out
].Number
,
4819 "ww",ncci_ptr
->DataAck
[ncci_ptr
->data_ack_out
].Handle
,0);
4821 (ncci_ptr
->data_ack_out
)++;
4822 if (ncci_ptr
->data_ack_out
== MAX_DATA_ACK
)
4823 ncci_ptr
->data_ack_out
= 0;
4824 (ncci_ptr
->data_ack_pending
)--;
4828 static void sig_ind(PLCI
*plci
)
4838 DIVA_CAPI_ADAPTER
* a
;
4839 API_PARSE saved_parms
[MAX_MSG_PARMS
+1];
4840 #define MAXPARMSIDS 31
4841 byte
* parms
[MAXPARMSIDS
];
4843 byte
* multi_fac_parms
[MAX_MULTI_IE
];
4844 byte
* multi_pi_parms
[MAX_MULTI_IE
];
4845 byte
* multi_ssext_parms
[MAX_MULTI_IE
];
4846 byte
* multi_CiPN_parms
[MAX_MULTI_IE
];
4848 byte
* multi_vswitch_parms
[MAX_MULTI_IE
];
4855 byte
*esc_profile
= "";
4858 PLCI
* tplci
= NULL
;
4859 byte chi
[] = "\x02\x18\x01";
4860 byte voice_cai
[] = "\x06\x14\x00\x00\x00\x00\x08";
4861 byte resume_cau
[] = "\x05\x05\x00\x02\x00\x00";
4862 /* ESC_MSGTYPE must be the last but one message, a new IE has to be */
4863 /* included before the ESC_MSGTYPE and MAXPARMSIDS has to be incremented */
4864 /* SMSG is situated at the end because its 0 (for compatibility reasons */
4865 /* (see Info_Mask Bit 4, first IE. then the message type) */
4867 {MAXPARMSIDS
, CPN
, 0xff, DSA
, OSA
, BC
, LLC
, HLC
, ESC_CAUSE
, DSP
, DT
, CHA
,
4868 UUI
, CONG_RR
, CONG_RNR
, ESC_CHI
, KEY
, CHI
, CAU
, ESC_LAW
,
4869 RDN
, RDX
, CONN_NR
, RIN
, NI
, CAI
, ESC_CR
,
4870 CST
, ESC_PROFILE
, 0xff, ESC_MSGTYPE
, SMSG
};
4871 /* 14 FTY repl by ESC_CHI */
4872 /* 18 PI repl by ESC_LAW */
4873 /* removed OAD changed to 0xff for future use, OAD is multiIE now */
4874 word multi_fac_id
[] = {1, FTY
};
4875 word multi_pi_id
[] = {1, PI
};
4876 word multi_CiPN_id
[] = {1, OAD
};
4877 word multi_ssext_id
[] = {1, ESC_SSEXT
};
4879 word multi_vswitch_id
[] = {1, ESC_VSWITCH
};
4883 byte SS_Ind
[] = "\x05\x02\x00\x02\x00\x00"; /* Hold_Ind struct*/
4884 byte CF_Ind
[] = "\x09\x02\x00\x06\x00\x00\x00\x00\x00\x00";
4885 byte Interr_Err_Ind
[] = "\x0a\x02\x00\x07\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00";
4886 byte CONF_Ind
[] = "\x09\x16\x00\x06\x00\x00\0x00\0x00\0x00\0x00";
4887 byte force_mt_info
= false;
4893 Id
= ((word
)plci
->Id
<<8)|a
->Id
;
4894 PUT_WORD(&SS_Ind
[4],0x0000);
4896 if (plci
->sig_remove_id
)
4898 plci
->Sig
.RNR
= 2; /* discard */
4899 dbug(1,dprintf("SIG discard while remove pending"));
4902 if(plci
->tel
&& plci
->SuppState
!=CALL_HELD
) Id
|=EXT_CONTROLLER
;
4903 dbug(1,dprintf("SigInd-Id=%08lx,plci=%x,tel=%x,state=0x%x,channels=%d,Discflowcl=%d",
4904 Id
,plci
->Id
,plci
->tel
,plci
->State
,plci
->channels
,plci
->hangup_flow_ctrl_timer
));
4905 if(plci
->Sig
.Ind
==CALL_HOLD_ACK
&& plci
->channels
)
4910 if(plci
->Sig
.Ind
==HANGUP
&& plci
->channels
)
4913 plci
->hangup_flow_ctrl_timer
++;
4914 /* recover the network layer after timeout */
4915 if(plci
->hangup_flow_ctrl_timer
==100)
4917 dbug(1,dprintf("Exceptional disc"));
4919 plci
->hangup_flow_ctrl_timer
= 0;
4920 for (ncci
= 1; ncci
< MAX_NCCI
+1; ncci
++)
4922 if (a
->ncci_plci
[ncci
] == plci
->Id
)
4924 cleanup_ncci_data (plci
, ncci
);
4925 if(plci
->channels
)plci
->channels
--;
4927 sendf(plci
->appl
,_DISCONNECT_B3_I
, (((dword
) ncci
) << 16) | Id
,0,"ws",0,"");
4931 sendf(plci
->appl
, _DISCONNECT_I
, Id
, 0, "w", 0);
4938 /* do first parse the info with no OAD in, because OAD will be converted */
4939 /* first the multiple facility IE, then mult. progress ind. */
4940 /* then the parameters for the info_ind + conn_ind */
4941 IndParse(plci
,multi_fac_id
,multi_fac_parms
,MAX_MULTI_IE
);
4942 IndParse(plci
,multi_pi_id
,multi_pi_parms
,MAX_MULTI_IE
);
4943 IndParse(plci
,multi_ssext_id
,multi_ssext_parms
,MAX_MULTI_IE
);
4945 IndParse(plci
,multi_vswitch_id
,multi_vswitch_parms
,MAX_MULTI_IE
);
4947 IndParse(plci
,parms_id
,parms
,0);
4948 IndParse(plci
,multi_CiPN_id
,multi_CiPN_parms
,MAX_MULTI_IE
);
4949 esc_chi
= parms
[14];
4950 esc_law
= parms
[18];
4951 pty_cai
= parms
[24];
4953 esc_profile
= parms
[27];
4954 if(esc_cr
[0] && plci
)
4956 if(plci
->cr_enquiry
&& plci
->appl
)
4958 plci
->cr_enquiry
= false;
4961 /* b = total length */
4962 /* b = indication type */
4963 /* b = length of all IEs */
4965 /* S = IE1 length + cont. */
4967 /* S = IE2 length + cont. */
4972 "dwbbbbSbS",_DI_MANU_ID
,plci
->m_command
,
4973 2+1+1+esc_cr
[0]+1+1+esc_law
[0],plci
->Sig
.Ind
,1+1+esc_cr
[0]+1+1+esc_law
[0],ESC
,esc_cr
,ESC
,esc_law
);
4976 /* create the additional info structure */
4977 add_i
[1] = parms
[15]; /* KEY of additional info */
4978 add_i
[2] = parms
[11]; /* UUI of additional info */
4979 ai_len
= AddInfo(add_i
,multi_fac_parms
, esc_chi
, facility
);
4981 /* the ESC_LAW indicates if u-Law or a-Law is actually used by the card */
4982 /* indication returns by the card if requested by the function */
4983 /* AutomaticLaw() after driver init */
4984 if (a
->automatic_law
<4)
4988 dbug(0,dprintf("u-Law selected"));
4992 dbug(0,dprintf("a-Law selected"));
4995 a
->automatic_law
= 4;
4996 if(plci
==a
->automatic_lawPLCI
) {
4997 plci
->internal_command
= 0;
4998 sig_req(plci
,REMOVE
,0);
5000 a
->automatic_lawPLCI
= NULL
;
5005 dbug (1, dprintf ("[%06x] CardProfile: %lx %lx %lx %lx %lx",
5006 UnMapController (a
->Id
), GET_DWORD (&esc_profile
[6]),
5007 GET_DWORD (&esc_profile
[10]), GET_DWORD (&esc_profile
[14]),
5008 GET_DWORD (&esc_profile
[18]), GET_DWORD (&esc_profile
[46])));
5010 a
->profile
.Global_Options
&= 0x000000ffL
;
5011 a
->profile
.B1_Protocols
&= 0x000003ffL
;
5012 a
->profile
.B2_Protocols
&= 0x00001fdfL
;
5013 a
->profile
.B3_Protocols
&= 0x000000b7L
;
5015 a
->profile
.Global_Options
&= GET_DWORD (&esc_profile
[6]) |
5016 GL_BCHANNEL_OPERATION_SUPPORTED
;
5017 a
->profile
.B1_Protocols
&= GET_DWORD (&esc_profile
[10]);
5018 a
->profile
.B2_Protocols
&= GET_DWORD (&esc_profile
[14]);
5019 a
->profile
.B3_Protocols
&= GET_DWORD (&esc_profile
[18]);
5020 a
->manufacturer_features
= GET_DWORD (&esc_profile
[46]);
5021 a
->man_profile
.private_options
= 0;
5023 if (a
->manufacturer_features
& MANUFACTURER_FEATURE_ECHO_CANCELLER
)
5025 a
->man_profile
.private_options
|= 1L << PRIVATE_ECHO_CANCELLER
;
5026 a
->profile
.Global_Options
|= GL_ECHO_CANCELLER_SUPPORTED
;
5030 if (a
->manufacturer_features
& MANUFACTURER_FEATURE_RTP
)
5031 a
->man_profile
.private_options
|= 1L << PRIVATE_RTP
;
5032 a
->man_profile
.rtp_primary_payloads
= GET_DWORD (&esc_profile
[50]);
5033 a
->man_profile
.rtp_additional_payloads
= GET_DWORD (&esc_profile
[54]);
5036 if (a
->manufacturer_features
& MANUFACTURER_FEATURE_T38
)
5037 a
->man_profile
.private_options
|= 1L << PRIVATE_T38
;
5040 if (a
->manufacturer_features
& MANUFACTURER_FEATURE_FAX_SUB_SEP_PWD
)
5041 a
->man_profile
.private_options
|= 1L << PRIVATE_FAX_SUB_SEP_PWD
;
5044 if (a
->manufacturer_features
& MANUFACTURER_FEATURE_V18
)
5045 a
->man_profile
.private_options
|= 1L << PRIVATE_V18
;
5048 if (a
->manufacturer_features
& MANUFACTURER_FEATURE_DTMF_TONE
)
5049 a
->man_profile
.private_options
|= 1L << PRIVATE_DTMF_TONE
;
5052 if (a
->manufacturer_features
& MANUFACTURER_FEATURE_PIAFS
)
5053 a
->man_profile
.private_options
|= 1L << PRIVATE_PIAFS
;
5056 if (a
->manufacturer_features
& MANUFACTURER_FEATURE_FAX_PAPER_FORMATS
)
5057 a
->man_profile
.private_options
|= 1L << PRIVATE_FAX_PAPER_FORMATS
;
5060 if (a
->manufacturer_features
& MANUFACTURER_FEATURE_VOWN
)
5061 a
->man_profile
.private_options
|= 1L << PRIVATE_VOWN
;
5064 if (a
->manufacturer_features
& MANUFACTURER_FEATURE_FAX_NONSTANDARD
)
5065 a
->man_profile
.private_options
|= 1L << PRIVATE_FAX_NONSTANDARD
;
5070 a
->profile
.Global_Options
&= 0x0000007fL
;
5071 a
->profile
.B1_Protocols
&= 0x000003dfL
;
5072 a
->profile
.B2_Protocols
&= 0x00001adfL
;
5073 a
->profile
.B3_Protocols
&= 0x000000b7L
;
5074 a
->manufacturer_features
&= MANUFACTURER_FEATURE_HARDDTMF
;
5076 if (a
->manufacturer_features
& (MANUFACTURER_FEATURE_HARDDTMF
|
5077 MANUFACTURER_FEATURE_SOFTDTMF_SEND
| MANUFACTURER_FEATURE_SOFTDTMF_RECEIVE
))
5079 a
->profile
.Global_Options
|= GL_DTMF_SUPPORTED
;
5081 a
->manufacturer_features
&= ~MANUFACTURER_FEATURE_OOB_CHANNEL
;
5082 dbug (1, dprintf ("[%06x] Profile: %lx %lx %lx %lx %lx",
5083 UnMapController (a
->Id
), a
->profile
.Global_Options
,
5084 a
->profile
.B1_Protocols
, a
->profile
.B2_Protocols
,
5085 a
->profile
.B3_Protocols
, a
->manufacturer_features
));
5087 /* codec plci for the handset/hook state support is just an internal id */
5088 if(plci
!=a
->AdvCodecPLCI
)
5090 force_mt_info
= SendMultiIE(plci
,Id
,multi_fac_parms
, FTY
, 0x20, 0);
5091 force_mt_info
|= SendMultiIE(plci
,Id
,multi_pi_parms
, PI
, 0x210, 0);
5092 SendSSExtInd(NULL
,plci
,Id
,multi_ssext_parms
);
5093 SendInfo(plci
,Id
, parms
, force_mt_info
);
5095 VSwitchReqInd(plci
,Id
,multi_vswitch_parms
);
5099 /* switch the codec to the b-channel */
5100 if(esc_chi
[0] && plci
&& !plci
->SuppState
){
5101 plci
->b_channel
= esc_chi
[esc_chi
[0]]&0x1f;
5102 mixer_set_bchannel_id_esc (plci
, plci
->b_channel
);
5103 dbug(1,dprintf("storeChannel=0x%x",plci
->b_channel
));
5104 if(plci
->tel
==ADV_VOICE
&& plci
->appl
) {
5105 SetVoiceChannel(a
->AdvCodecPLCI
, esc_chi
, a
);
5109 if(plci
->appl
) Number
= plci
->appl
->Number
++;
5111 switch(plci
->Sig
.Ind
) {
5112 /* Response to Get_Supported_Services request */
5114 dbug(1,dprintf("S_Supported"));
5115 if(!plci
->appl
) break;
5118 PUT_DWORD(&CF_Ind
[6],GET_DWORD(&pty_cai
[1]) );
5122 PUT_DWORD(&CF_Ind
[6],MASK_TERMINAL_PORTABILITY
| MASK_HOLD_RETRIEVE
);
5124 PUT_WORD (&CF_Ind
[1], 0);
5125 PUT_WORD (&CF_Ind
[4], 0);
5126 sendf(plci
->appl
,_FACILITY_R
|CONFIRM
,Id
&0x7,plci
->number
, "wws",0,3,CF_Ind
);
5130 /* Supplementary Service rejected */
5132 dbug(1,dprintf("S_Reject=0x%x",pty_cai
[5]));
5133 if(!pty_cai
[0]) break;
5138 case THREE_PTY_BEGIN
:
5139 if(!plci
->relatedPTYPLCI
) break;
5140 tplci
= plci
->relatedPTYPLCI
;
5141 rId
= ( (word
)tplci
->Id
<<8)|tplci
->adapter
->Id
;
5142 if(tplci
->tel
) rId
|=EXT_CONTROLLER
;
5143 if(pty_cai
[5]==ECT_EXECUTE
)
5145 PUT_WORD(&SS_Ind
[1],S_ECT
);
5147 plci
->vswitchstate
=0;
5148 plci
->relatedPTYPLCI
->vswitchstate
=0;
5153 PUT_WORD(&SS_Ind
[1],pty_cai
[5]+3);
5155 if(pty_cai
[2]!=0xff)
5157 PUT_WORD(&SS_Ind
[4],0x3600|(word
)pty_cai
[2]);
5161 PUT_WORD(&SS_Ind
[4],0x300E);
5163 plci
->relatedPTYPLCI
= NULL
;
5165 sendf(tplci
->appl
,_FACILITY_I
,rId
,0,"ws",3, SS_Ind
);
5168 case CALL_DEFLECTION
:
5169 if(pty_cai
[2]!=0xff)
5171 PUT_WORD(&SS_Ind
[4],0x3600|(word
)pty_cai
[2]);
5175 PUT_WORD(&SS_Ind
[4],0x300E);
5177 PUT_WORD(&SS_Ind
[1],pty_cai
[5]);
5178 for(i
=0; i
<max_appl
; i
++)
5180 if(application
[i
].CDEnable
)
5182 if(application
[i
].Id
) sendf(&application
[i
],_FACILITY_I
,Id
,0,"ws",3, SS_Ind
);
5183 application
[i
].CDEnable
= false;
5188 case DEACTIVATION_DIVERSION
:
5189 case ACTIVATION_DIVERSION
:
5190 case DIVERSION_INTERROGATE_CFU
:
5191 case DIVERSION_INTERROGATE_CFB
:
5192 case DIVERSION_INTERROGATE_CFNR
:
5193 case DIVERSION_INTERROGATE_NUM
:
5195 case CCBS_DEACTIVATE
:
5196 case CCBS_INTERROGATE
:
5197 if(!plci
->appl
) break;
5198 if(pty_cai
[2]!=0xff)
5200 PUT_WORD(&Interr_Err_Ind
[4],0x3600|(word
)pty_cai
[2]);
5204 PUT_WORD(&Interr_Err_Ind
[4],0x300E);
5208 case DEACTIVATION_DIVERSION
:
5209 dbug(1,dprintf("Deact_Div"));
5210 Interr_Err_Ind
[0]=0x9;
5211 Interr_Err_Ind
[3]=0x6;
5212 PUT_WORD(&Interr_Err_Ind
[1],S_CALL_FORWARDING_STOP
);
5214 case ACTIVATION_DIVERSION
:
5215 dbug(1,dprintf("Act_Div"));
5216 Interr_Err_Ind
[0]=0x9;
5217 Interr_Err_Ind
[3]=0x6;
5218 PUT_WORD(&Interr_Err_Ind
[1],S_CALL_FORWARDING_START
);
5220 case DIVERSION_INTERROGATE_CFU
:
5221 case DIVERSION_INTERROGATE_CFB
:
5222 case DIVERSION_INTERROGATE_CFNR
:
5223 dbug(1,dprintf("Interr_Div"));
5224 Interr_Err_Ind
[0]=0xa;
5225 Interr_Err_Ind
[3]=0x7;
5226 PUT_WORD(&Interr_Err_Ind
[1],S_INTERROGATE_DIVERSION
);
5228 case DIVERSION_INTERROGATE_NUM
:
5229 dbug(1,dprintf("Interr_Num"));
5230 Interr_Err_Ind
[0]=0xa;
5231 Interr_Err_Ind
[3]=0x7;
5232 PUT_WORD(&Interr_Err_Ind
[1],S_INTERROGATE_NUMBERS
);
5235 dbug(1,dprintf("CCBS Request"));
5236 Interr_Err_Ind
[0]=0xd;
5237 Interr_Err_Ind
[3]=0xa;
5238 PUT_WORD(&Interr_Err_Ind
[1],S_CCBS_REQUEST
);
5240 case CCBS_DEACTIVATE
:
5241 dbug(1,dprintf("CCBS Deactivate"));
5242 Interr_Err_Ind
[0]=0x9;
5243 Interr_Err_Ind
[3]=0x6;
5244 PUT_WORD(&Interr_Err_Ind
[1],S_CCBS_DEACTIVATE
);
5246 case CCBS_INTERROGATE
:
5247 dbug(1,dprintf("CCBS Interrogate"));
5248 Interr_Err_Ind
[0]=0xb;
5249 Interr_Err_Ind
[3]=0x8;
5250 PUT_WORD(&Interr_Err_Ind
[1],S_CCBS_INTERROGATE
);
5253 PUT_DWORD(&Interr_Err_Ind
[6],plci
->appl
->S_Handle
);
5254 sendf(plci
->appl
,_FACILITY_I
,Id
&0x7,0,"ws",3, Interr_Err_Ind
);
5257 case ACTIVATION_MWI
:
5258 case DEACTIVATION_MWI
:
5259 if(pty_cai
[5]==ACTIVATION_MWI
)
5261 PUT_WORD(&SS_Ind
[1],S_MWI_ACTIVATE
);
5263 else PUT_WORD(&SS_Ind
[1],S_MWI_DEACTIVATE
);
5265 if(pty_cai
[2]!=0xff)
5267 PUT_WORD(&SS_Ind
[4],0x3600|(word
)pty_cai
[2]);
5271 PUT_WORD(&SS_Ind
[4],0x300E);
5274 if(plci
->cr_enquiry
)
5276 sendf(plci
->appl
,_FACILITY_I
,Id
&0xf,0,"ws",3, SS_Ind
);
5281 sendf(plci
->appl
,_FACILITY_I
,Id
,0,"ws",3, SS_Ind
);
5284 case CONF_ADD
: /* ERROR */
5294 PUT_WORD(&CONF_Ind
[1],S_CONF_BEGIN
);
5300 PUT_WORD(&CONF_Ind
[1],S_CONF_DROP
);
5301 plci
->ptyState
= CONNECTED
;
5306 PUT_WORD(&CONF_Ind
[1],S_CONF_ISOLATE
);
5307 plci
->ptyState
= CONNECTED
;
5312 PUT_WORD(&CONF_Ind
[1],S_CONF_REATTACH
);
5313 plci
->ptyState
= CONNECTED
;
5316 PUT_WORD(&CONF_Ind
[1],S_CONF_ADD
);
5317 plci
->relatedPTYPLCI
= NULL
;
5318 tplci
=plci
->relatedPTYPLCI
;
5319 if(tplci
) tplci
->ptyState
= CONNECTED
;
5320 plci
->ptyState
= CONNECTED
;
5324 if(pty_cai
[2]!=0xff)
5326 PUT_WORD(&CONF_Ind
[4],0x3600|(word
)pty_cai
[2]);
5330 PUT_WORD(&CONF_Ind
[4],0x3303); /* Time-out: network did not respond
5331 within the required time */
5334 PUT_DWORD(&CONF_Ind
[6],0x0);
5335 sendf(plci
->appl
,_FACILITY_I
,Id
,0,"ws",3, CONF_Ind
);
5340 /* Supplementary Service indicates success */
5342 dbug(1,dprintf("Service_Ind"));
5343 PUT_WORD (&CF_Ind
[4], 0);
5347 case THREE_PTY_BEGIN
:
5349 if(!plci
->relatedPTYPLCI
) break;
5350 tplci
= plci
->relatedPTYPLCI
;
5351 rId
= ( (word
)tplci
->Id
<<8)|tplci
->adapter
->Id
;
5352 if(tplci
->tel
) rId
|=EXT_CONTROLLER
;
5353 if(pty_cai
[5]==ECT_EXECUTE
)
5355 PUT_WORD(&SS_Ind
[1],S_ECT
);
5357 if(plci
->vswitchstate
!=3)
5360 plci
->ptyState
= IDLE
;
5361 plci
->relatedPTYPLCI
= NULL
;
5366 dbug(1,dprintf("ECT OK"));
5367 sendf(tplci
->appl
,_FACILITY_I
,rId
,0,"ws",3, SS_Ind
);
5374 switch (plci
->ptyState
)
5377 plci
->ptyState
= CONNECTED
;
5378 dbug(1,dprintf("3PTY ON"));
5382 plci
->ptyState
= IDLE
;
5383 plci
->relatedPTYPLCI
= NULL
;
5385 dbug(1,dprintf("3PTY OFF"));
5388 PUT_WORD(&SS_Ind
[1],pty_cai
[5]+3);
5389 sendf(tplci
->appl
,_FACILITY_I
,rId
,0,"ws",3, SS_Ind
);
5393 case CALL_DEFLECTION
:
5394 PUT_WORD(&SS_Ind
[1],pty_cai
[5]);
5395 for(i
=0; i
<max_appl
; i
++)
5397 if(application
[i
].CDEnable
)
5399 if(application
[i
].Id
) sendf(&application
[i
],_FACILITY_I
,Id
,0,"ws",3, SS_Ind
);
5400 application
[i
].CDEnable
= false;
5405 case DEACTIVATION_DIVERSION
:
5406 case ACTIVATION_DIVERSION
:
5407 if(!plci
->appl
) break;
5408 PUT_WORD(&CF_Ind
[1],pty_cai
[5]+2);
5409 PUT_DWORD(&CF_Ind
[6],plci
->appl
->S_Handle
);
5410 sendf(plci
->appl
,_FACILITY_I
,Id
&0x7,0,"ws",3, CF_Ind
);
5414 case DIVERSION_INTERROGATE_CFU
:
5415 case DIVERSION_INTERROGATE_CFB
:
5416 case DIVERSION_INTERROGATE_CFNR
:
5417 case DIVERSION_INTERROGATE_NUM
:
5419 case CCBS_DEACTIVATE
:
5420 case CCBS_INTERROGATE
:
5421 if(!plci
->appl
) break;
5424 case DIVERSION_INTERROGATE_CFU
:
5425 case DIVERSION_INTERROGATE_CFB
:
5426 case DIVERSION_INTERROGATE_CFNR
:
5427 dbug(1,dprintf("Interr_Div"));
5428 PUT_WORD(&pty_cai
[1],S_INTERROGATE_DIVERSION
);
5429 pty_cai
[3]=pty_cai
[0]-3; /* Supplementary Service-specific parameter len */
5431 case DIVERSION_INTERROGATE_NUM
:
5432 dbug(1,dprintf("Interr_Num"));
5433 PUT_WORD(&pty_cai
[1],S_INTERROGATE_NUMBERS
);
5434 pty_cai
[3]=pty_cai
[0]-3; /* Supplementary Service-specific parameter len */
5437 dbug(1,dprintf("CCBS Request"));
5438 PUT_WORD(&pty_cai
[1],S_CCBS_REQUEST
);
5439 pty_cai
[3]=pty_cai
[0]-3; /* Supplementary Service-specific parameter len */
5441 case CCBS_DEACTIVATE
:
5442 dbug(1,dprintf("CCBS Deactivate"));
5443 PUT_WORD(&pty_cai
[1],S_CCBS_DEACTIVATE
);
5444 pty_cai
[3]=pty_cai
[0]-3; /* Supplementary Service-specific parameter len */
5446 case CCBS_INTERROGATE
:
5447 dbug(1,dprintf("CCBS Interrogate"));
5448 PUT_WORD(&pty_cai
[1],S_CCBS_INTERROGATE
);
5449 pty_cai
[3]=pty_cai
[0]-3; /* Supplementary Service-specific parameter len */
5452 PUT_WORD(&pty_cai
[4],0); /* Supplementary Service Reason */
5453 PUT_DWORD(&pty_cai
[6],plci
->appl
->S_Handle
);
5454 sendf(plci
->appl
,_FACILITY_I
,Id
&0x7,0,"wS",3, pty_cai
);
5458 case ACTIVATION_MWI
:
5459 case DEACTIVATION_MWI
:
5460 if(pty_cai
[5]==ACTIVATION_MWI
)
5462 PUT_WORD(&SS_Ind
[1],S_MWI_ACTIVATE
);
5464 else PUT_WORD(&SS_Ind
[1],S_MWI_DEACTIVATE
);
5465 if(plci
->cr_enquiry
)
5467 sendf(plci
->appl
,_FACILITY_I
,Id
&0xf,0,"ws",3, SS_Ind
);
5472 sendf(plci
->appl
,_FACILITY_I
,Id
,0,"ws",3, SS_Ind
);
5475 case MWI_INDICATION
:
5476 if(pty_cai
[0]>=0x12)
5478 PUT_WORD(&pty_cai
[3],S_MWI_INDICATE
);
5479 pty_cai
[2]=pty_cai
[0]-2; /* len Parameter */
5480 pty_cai
[5]=pty_cai
[0]-5; /* Supplementary Service-specific parameter len */
5481 if(plci
->appl
&& (a
->Notification_Mask
[plci
->appl
->Id
-1]&SMASK_MWI
))
5483 if(plci
->internal_command
==GET_MWI_STATE
) /* result on Message Waiting Listen */
5485 sendf(plci
->appl
,_FACILITY_I
,Id
&0xf,0,"wS",3, &pty_cai
[2]);
5489 else sendf(plci
->appl
,_FACILITY_I
,Id
,0,"wS",3, &pty_cai
[2]);
5494 for(i
=0; i
<max_appl
; i
++)
5496 if(a
->Notification_Mask
[i
]&SMASK_MWI
)
5498 sendf(&application
[i
],_FACILITY_I
,Id
&0x7,0,"wS",3, &pty_cai
[2]);
5506 facility
[2]= 0; /* returncode */
5508 else facility
[2]= 0xff;
5513 facility
[2]= 0xff; /* returncode */
5516 facility
[1]= MWI_RESPONSE
; /* Function */
5517 add_p(plci
,CAI
,facility
);
5518 add_p(plci
,ESC
,multi_ssext_parms
[0]); /* remembered parameter -> only one possible */
5519 sig_req(plci
,S_SERVICE
,0);
5522 next_internal_command (Id
, plci
);
5524 case CONF_ADD
: /* OK */
5529 case CONF_PARTYDISC
:
5535 PUT_WORD(&CONF_Ind
[1],S_CONF_BEGIN
);
5539 PUT_DWORD(&CONF_Ind
[6],d
); /* PartyID */
5543 PUT_DWORD(&CONF_Ind
[6],0x0);
5547 PUT_WORD(&CONF_Ind
[1],S_CONF_ISOLATE
);
5552 PUT_WORD(&CONF_Ind
[1],S_CONF_REATTACH
);
5557 PUT_WORD(&CONF_Ind
[1],S_CONF_DROP
);
5562 PUT_WORD(&CONF_Ind
[1],S_CONF_ADD
);
5564 PUT_DWORD(&CONF_Ind
[6],d
); /* PartyID */
5565 tplci
=plci
->relatedPTYPLCI
;
5566 if(tplci
) tplci
->ptyState
= CONNECTED
;
5568 case CONF_PARTYDISC
:
5571 PUT_WORD(&CONF_Ind
[1],S_CONF_PARTYDISC
);
5573 PUT_DWORD(&CONF_Ind
[4],d
); /* PartyID */
5576 plci
->ptyState
= CONNECTED
;
5577 sendf(plci
->appl
,_FACILITY_I
,Id
,0,"ws",3, CONF_Ind
);
5579 case CCBS_INFO_RETAIN
:
5580 case CCBS_ERASECALLLINKAGEID
:
5581 case CCBS_STOP_ALERTING
:
5586 case CCBS_INFO_RETAIN
:
5587 PUT_WORD(&CONF_Ind
[1],S_CCBS_INFO_RETAIN
);
5589 case CCBS_STOP_ALERTING
:
5590 PUT_WORD(&CONF_Ind
[1],S_CCBS_STOP_ALERTING
);
5592 case CCBS_ERASECALLLINKAGEID
:
5593 PUT_WORD(&CONF_Ind
[1],S_CCBS_ERASECALLLINKAGEID
);
5601 PUT_WORD(&CONF_Ind
[4],w
); /* PartyID */
5603 if(plci
->appl
&& (a
->Notification_Mask
[plci
->appl
->Id
-1]&SMASK_CCBS
))
5605 sendf(plci
->appl
,_FACILITY_I
,Id
,0,"ws",3, CONF_Ind
);
5609 for(i
=0; i
<max_appl
; i
++)
5610 if(a
->Notification_Mask
[i
]&SMASK_CCBS
)
5611 sendf(&application
[i
],_FACILITY_I
,Id
&0x7,0,"ws",3, CONF_Ind
);
5620 i
= _L3_CAUSE
| cau
[2];
5621 if(cau
[2]==0) i
= 0x3603;
5627 PUT_WORD(&SS_Ind
[1],S_HOLD
);
5628 PUT_WORD(&SS_Ind
[4],i
);
5629 if(plci
->SuppState
== HOLD_REQUEST
)
5631 plci
->SuppState
= IDLE
;
5632 sendf(plci
->appl
,_FACILITY_I
,Id
,0,"ws",3, SS_Ind
);
5637 if(plci
->SuppState
== HOLD_REQUEST
)
5639 plci
->SuppState
= CALL_HELD
;
5640 CodecIdCheck(a
, plci
);
5641 start_internal_command (Id
, plci
, hold_save_command
);
5645 case CALL_RETRIEVE_REJ
:
5649 i
= _L3_CAUSE
| cau
[2];
5650 if(cau
[2]==0) i
= 0x3603;
5656 PUT_WORD(&SS_Ind
[1],S_RETRIEVE
);
5657 PUT_WORD(&SS_Ind
[4],i
);
5658 if(plci
->SuppState
== RETRIEVE_REQUEST
)
5660 plci
->SuppState
= CALL_HELD
;
5661 CodecIdCheck(a
, plci
);
5662 sendf(plci
->appl
,_FACILITY_I
,Id
,0,"ws",3, SS_Ind
);
5666 case CALL_RETRIEVE_ACK
:
5667 PUT_WORD(&SS_Ind
[1],S_RETRIEVE
);
5668 if(plci
->SuppState
== RETRIEVE_REQUEST
)
5670 plci
->SuppState
= IDLE
;
5671 plci
->call_dir
|= CALL_DIR_FORCE_OUTG_NL
;
5672 plci
->b_channel
= esc_chi
[esc_chi
[0]]&0x1f;
5675 mixer_set_bchannel_id_esc (plci
, plci
->b_channel
);
5676 dbug(1,dprintf("RetrChannel=0x%x",plci
->b_channel
));
5677 SetVoiceChannel(a
->AdvCodecPLCI
, esc_chi
, a
);
5678 if(plci
->B2_prot
==B2_TRANSPARENT
&& plci
->B3_prot
==B3_TRANSPARENT
)
5680 dbug(1,dprintf("Get B-ch"));
5681 start_internal_command (Id
, plci
, retrieve_restore_command
);
5684 sendf(plci
->appl
,_FACILITY_I
,Id
,0,"ws",3, SS_Ind
);
5687 start_internal_command (Id
, plci
, retrieve_restore_command
);
5692 if(plci
->State
!= LISTENING
) {
5693 sig_req(plci
,HANGUP
,0);
5697 cip
= find_cip(a
,parms
[4],parms
[6]);
5699 dbug(1,dprintf("cip=%d,cip_mask=%lx",cip
,cip_mask
));
5700 clear_c_ind_mask (plci
);
5701 if (!remove_started
&& !a
->adapter_disabled
)
5703 set_c_ind_mask_bit (plci
, MAX_APPL
);
5704 group_optimization(a
, plci
);
5705 for(i
=0; i
<max_appl
; i
++) {
5706 if(application
[i
].Id
5707 && (a
->CIP_Mask
[i
]&1 || a
->CIP_Mask
[i
]&cip_mask
)
5708 && CPN_filter_ok(parms
[0],a
,i
)
5709 && test_group_ind_mask_bit (plci
, i
) ) {
5710 dbug(1,dprintf("storedcip_mask[%d]=0x%lx",i
,a
->CIP_Mask
[i
] ));
5711 set_c_ind_mask_bit (plci
, i
);
5712 dump_c_ind_mask (plci
);
5713 plci
->State
= INC_CON_PENDING
;
5714 plci
->call_dir
= (plci
->call_dir
& ~(CALL_DIR_OUT
| CALL_DIR_ORIGINATE
)) |
5715 CALL_DIR_IN
| CALL_DIR_ANSWER
;
5717 plci
->b_channel
= esc_chi
[esc_chi
[0]]&0x1f;
5718 mixer_set_bchannel_id_esc (plci
, plci
->b_channel
);
5720 /* if a listen on the ext controller is done, check if hook states */
5721 /* are supported or if just a on board codec must be activated */
5722 if(a
->codec_listen
[i
] && !a
->AdvSignalPLCI
) {
5723 if(a
->profile
.Global_Options
& HANDSET
)
5724 plci
->tel
= ADV_VOICE
;
5725 else if(a
->profile
.Global_Options
& ON_BOARD_CODEC
)
5727 if(plci
->tel
) Id
|=EXT_CONTROLLER
;
5728 a
->codec_listen
[i
] = plci
;
5731 sendf(&application
[i
],_CONNECT_I
,Id
,0,
5732 "wSSSSSSSbSSSSS", cip
, /* CIP */
5733 parms
[0], /* CalledPartyNumber */
5734 multi_CiPN_parms
[0], /* CallingPartyNumber */
5735 parms
[2], /* CalledPartySubad */
5736 parms
[3], /* CallingPartySubad */
5737 parms
[4], /* BearerCapability */
5738 parms
[5], /* LowLC */
5739 parms
[6], /* HighLC */
5740 ai_len
, /* nested struct add_i */
5741 add_i
[0], /* B channel info */
5742 add_i
[1], /* keypad facility */
5743 add_i
[2], /* user user data */
5744 add_i
[3], /* nested facility */
5745 multi_CiPN_parms
[1] /* second CiPN(SCR) */
5747 SendSSExtInd(&application
[i
],
5751 SendSetupInfo(&application
[i
],
5755 SendMultiIE(plci
,Id
,multi_pi_parms
, PI
, 0x210, true));
5758 clear_c_ind_mask_bit (plci
, MAX_APPL
);
5759 dump_c_ind_mask (plci
);
5761 if(c_ind_mask_empty (plci
)) {
5762 sig_req(plci
,HANGUP
,0);
5766 plci
->notifiedcall
= 0;
5771 case CALL_PEND_NOTIFY
:
5772 plci
->notifiedcall
= 1;
5778 if(plci
->State
==ADVANCED_VOICE_SIG
|| plci
->State
==ADVANCED_VOICE_NOSIG
)
5780 if(plci
->internal_command
==PERM_COD_CONN_PEND
)
5782 if(plci
->State
==ADVANCED_VOICE_NOSIG
)
5784 dbug(1,dprintf("***Codec OK"));
5785 if(a
->AdvSignalPLCI
)
5787 tplci
= a
->AdvSignalPLCI
;
5788 if(tplci
->spoofed_msg
)
5790 dbug(1,dprintf("***Spoofed Msg(0x%x)",tplci
->spoofed_msg
));
5792 tplci
->internal_command
= 0;
5793 x_Id
= ((word
)tplci
->Id
<<8)|tplci
->adapter
->Id
| 0x80;
5794 switch (tplci
->spoofed_msg
)
5797 tplci
->command
= _CONNECT_I
|RESPONSE
;
5798 api_load_msg (&tplci
->saved_msg
, saved_parms
);
5799 add_b1(tplci
,&saved_parms
[1],0,tplci
->B1_facilities
);
5800 if (tplci
->adapter
->Info_Mask
[tplci
->appl
->Id
-1] & 0x200)
5802 /* early B3 connect (CIP mask bit 9) no release after a disc */
5803 add_p(tplci
,LLI
,"\x01\x01");
5805 add_s(tplci
, CONN_NR
, &saved_parms
[2]);
5806 add_s(tplci
, LLC
, &saved_parms
[4]);
5807 add_ai(tplci
, &saved_parms
[5]);
5808 tplci
->State
= INC_CON_ACCEPT
;
5809 sig_req(tplci
, CALL_RES
,0);
5813 case AWAITING_SELECT_B
:
5814 dbug(1,dprintf("Select_B continue"));
5815 start_internal_command (x_Id
, tplci
, select_b_command
);
5818 case AWAITING_MANUF_CON
: /* Get_Plci per Manufacturer_Req to ext controller */
5821 dbug(1,dprintf("No SigID!"));
5822 sendf(tplci
->appl
, _MANUFACTURER_R
|CONFIRM
,x_Id
,tplci
->number
, "dww",_DI_MANU_ID
,_MANUFACTURER_R
,_OUT_OF_PLCI
);
5826 tplci
->command
= _MANUFACTURER_R
;
5827 api_load_msg (&tplci
->saved_msg
, saved_parms
);
5828 dir
= saved_parms
[2].info
[0];
5830 sig_req(tplci
,CALL_REQ
,0);
5833 sig_req(tplci
,LISTEN_REQ
,0);
5836 sendf(tplci
->appl
, _MANUFACTURER_R
|CONFIRM
,x_Id
,tplci
->number
, "dww",_DI_MANU_ID
,_MANUFACTURER_R
,0);
5839 case (CALL_REQ
|AWAITING_MANUF_CON
):
5840 sig_req(tplci
,CALL_REQ
,0);
5847 dbug(1,dprintf("No SigID!"));
5848 sendf(tplci
->appl
,_CONNECT_R
|CONFIRM
,tplci
->adapter
->Id
,0,"w",_OUT_OF_PLCI
);
5852 tplci
->command
= _CONNECT_R
;
5853 api_load_msg (&tplci
->saved_msg
, saved_parms
);
5854 add_s(tplci
,CPN
,&saved_parms
[1]);
5855 add_s(tplci
,DSA
,&saved_parms
[3]);
5856 add_ai(tplci
,&saved_parms
[9]);
5857 sig_req(tplci
,CALL_REQ
,0);
5862 tplci
->command
= C_RETRIEVE_REQ
;
5863 sig_req(tplci
,CALL_RETRIEVE
,0);
5867 tplci
->spoofed_msg
= 0;
5868 if (tplci
->internal_command
== 0)
5869 next_internal_command (x_Id
, tplci
);
5872 next_internal_command (Id
, plci
);
5875 dbug(1,dprintf("***Codec Hook Init Req"));
5876 plci
->internal_command
= PERM_COD_HOOK
;
5877 add_p(plci
,FTY
,"\x01\x09"); /* Get Hook State*/
5878 sig_req(plci
,TEL_CTRL
,0);
5882 else if(plci
->command
!= _MANUFACTURER_R
/* old style permanent connect */
5883 && plci
->State
!=INC_ACT_PENDING
)
5885 mixer_set_bchannel_id_esc (plci
, plci
->b_channel
);
5886 if(plci
->tel
== ADV_VOICE
&& plci
->SuppState
== IDLE
) /* with permanent codec switch on immediately */
5888 chi
[2] = plci
->b_channel
;
5889 SetVoiceChannel(a
->AdvCodecPLCI
, chi
, a
);
5891 sendf(plci
->appl
,_CONNECT_ACTIVE_I
,Id
,0,"Sss",parms
[21],"","");
5892 plci
->State
= INC_ACT_PENDING
;
5898 ie
= multi_fac_parms
[0]; /* inspect the facility hook indications */
5899 if(plci
->State
==ADVANCED_VOICE_SIG
&& ie
[0]){
5900 switch (ie
[1]&0x91) {
5901 case 0x80: /* hook off */
5903 if(plci
->internal_command
==PERM_COD_HOOK
)
5905 dbug(1,dprintf("init:hook_off"));
5906 plci
->hook_state
= ie
[1];
5907 next_internal_command (Id
, plci
);
5910 else /* ignore doubled hook indications */
5912 if( ((plci
->hook_state
)&0xf0)==0x80)
5914 dbug(1,dprintf("ignore hook"));
5917 plci
->hook_state
= ie
[1]&0x91;
5919 /* check for incoming call pending */
5920 /* and signal '+'.Appl must decide */
5921 /* with connect_res if call must */
5922 /* accepted or not */
5923 for(i
=0, tplci
=NULL
;i
<max_appl
;i
++){
5924 if(a
->codec_listen
[i
]
5925 && (a
->codec_listen
[i
]->State
==INC_CON_PENDING
5926 ||a
->codec_listen
[i
]->State
==INC_CON_ALERT
) ){
5927 tplci
= a
->codec_listen
[i
];
5928 tplci
->appl
= &application
[i
];
5931 /* no incoming call, do outgoing call */
5932 /* and signal '+' if outg. setup */
5933 if(!a
->AdvSignalPLCI
&& !tplci
){
5934 if((i
=get_plci(a
))) {
5935 a
->AdvSignalPLCI
= &a
->plci
[i
-1];
5936 tplci
= a
->AdvSignalPLCI
;
5937 tplci
->tel
= ADV_VOICE
;
5938 PUT_WORD(&voice_cai
[5],a
->AdvSignalAppl
->MaxDataLength
);
5939 if (a
->Info_Mask
[a
->AdvSignalAppl
->Id
-1] & 0x200){
5940 /* early B3 connect (CIP mask bit 9) no release after a disc */
5941 add_p(tplci
,LLI
,"\x01\x01");
5943 add_p(tplci
, CAI
, voice_cai
);
5944 add_p(tplci
, OAD
, a
->TelOAD
);
5945 add_p(tplci
, OSA
, a
->TelOSA
);
5946 add_p(tplci
,SHIFT
|6,NULL
);
5947 add_p(tplci
,SIN
,"\x02\x01\x00");
5948 add_p(tplci
,UID
,"\x06\x43\x61\x70\x69\x32\x30");
5949 sig_req(tplci
,ASSIGN
,DSIG_ID
);
5950 a
->AdvSignalPLCI
->internal_command
= HOOK_OFF_REQ
;
5951 a
->AdvSignalPLCI
->command
= 0;
5952 tplci
->appl
= a
->AdvSignalAppl
;
5953 tplci
->call_dir
= CALL_DIR_OUT
| CALL_DIR_ORIGINATE
;
5960 Id
= ((word
)tplci
->Id
<<8)|a
->Id
;
5966 "ws", (word
)0, "\x01+");
5969 case 0x90: /* hook on */
5971 if(plci
->internal_command
==PERM_COD_HOOK
)
5973 dbug(1,dprintf("init:hook_on"));
5974 plci
->hook_state
= ie
[1]&0x91;
5975 next_internal_command (Id
, plci
);
5978 else /* ignore doubled hook indications */
5980 if( ((plci
->hook_state
)&0xf0)==0x90) break;
5981 plci
->hook_state
= ie
[1]&0x91;
5983 /* hangup the adv. voice call and signal '-' to the appl */
5984 if(a
->AdvSignalPLCI
) {
5985 Id
= ((word
)a
->AdvSignalPLCI
->Id
<<8)|a
->Id
;
5986 if(plci
->tel
) Id
|=EXT_CONTROLLER
;
5987 sendf(a
->AdvSignalAppl
,
5991 "ws", (word
)0, "\x01-");
5992 a
->AdvSignalPLCI
->internal_command
= HOOK_ON_REQ
;
5993 a
->AdvSignalPLCI
->command
= 0;
5994 sig_req(a
->AdvSignalPLCI
,HANGUP
,0);
5995 send_req(a
->AdvSignalPLCI
);
6003 clear_c_ind_mask_bit (plci
, (word
)(plci
->appl
->Id
-1));
6004 PUT_WORD(&resume_cau
[4],GOOD
);
6005 sendf(plci
->appl
,_FACILITY_I
,Id
,0,"ws", (word
)3, resume_cau
);
6009 clear_c_ind_mask (plci
);
6011 if (plci
->NL
.Id
&& !plci
->nl_remove_id
) {
6012 mixer_remove (plci
);
6013 nl_req_ncci(plci
,REMOVE
,0);
6015 if (!plci
->sig_remove_id
) {
6016 plci
->internal_command
= 0;
6017 sig_req(plci
,REMOVE
,0);
6020 if(!plci
->channels
) {
6021 sendf(plci
->appl
,_FACILITY_I
,Id
,0,"ws", (word
)3, "\x05\x04\x00\x02\x00\x00");
6022 sendf(plci
->appl
, _DISCONNECT_I
, Id
, 0, "w", 0);
6030 plci
->hangup_flow_ctrl_timer
=0;
6031 if(plci
->manufacturer
&& plci
->State
==LOCAL_CONNECT
) break;
6034 i
= _L3_CAUSE
| cau
[2];
6035 if(cau
[2]==0) i
= 0;
6036 else if(cau
[2]==8) i
= _L1_ERROR
;
6037 else if(cau
[2]==9 || cau
[2]==10) i
= _L2_ERROR
;
6038 else if(cau
[2]==5) i
= _CAPI_GUARD_ERROR
;
6044 if(plci
->State
==INC_CON_PENDING
|| plci
->State
==INC_CON_ALERT
)
6046 for(i
=0; i
<max_appl
; i
++)
6048 if(test_c_ind_mask_bit (plci
, i
))
6049 sendf(&application
[i
], _DISCONNECT_I
, Id
, 0, "w", 0);
6054 clear_c_ind_mask (plci
);
6058 if (plci
->State
== LISTENING
)
6060 plci
->notifiedcall
=0;
6063 plci
->State
= INC_DIS_PENDING
;
6064 if(c_ind_mask_empty (plci
))
6067 if (plci
->NL
.Id
&& !plci
->nl_remove_id
)
6069 mixer_remove (plci
);
6070 nl_req_ncci(plci
,REMOVE
,0);
6072 if (!plci
->sig_remove_id
)
6074 plci
->internal_command
= 0;
6075 sig_req(plci
,REMOVE
,0);
6082 /* collision of DISCONNECT or CONNECT_RES with HANGUP can */
6083 /* result in a second HANGUP! Don't generate another */
6085 if(plci
->State
!=IDLE
&& plci
->State
!=INC_DIS_PENDING
)
6087 if(plci
->State
==RESUMING
)
6089 PUT_WORD(&resume_cau
[4],i
);
6090 sendf(plci
->appl
,_FACILITY_I
,Id
,0,"ws", (word
)3, resume_cau
);
6092 plci
->State
= INC_DIS_PENDING
;
6093 sendf(plci
->appl
,_DISCONNECT_I
,Id
,0,"w",i
);
6099 SendSSExtInd(NULL
,plci
,Id
,multi_ssext_parms
);
6103 VSwitchReqInd(plci
,Id
,multi_vswitch_parms
);
6106 if(plci
->relatedPTYPLCI
&&
6107 plci
->vswitchstate
==3 &&
6108 plci
->relatedPTYPLCI
->vswitchstate
==3 &&
6109 parms
[MAXPARMSIDS
-1][0])
6111 add_p(plci
->relatedPTYPLCI
,SMSG
,parms
[MAXPARMSIDS
-1]);
6112 sig_req(plci
->relatedPTYPLCI
,VSWITCH_REQ
,0);
6113 send_req(plci
->relatedPTYPLCI
);
6115 else VSwitchReqInd(plci
,Id
,multi_vswitch_parms
);
6122 static void SendSetupInfo(APPL
* appl
, PLCI
* plci
, dword Id
, byte
* * parms
, byte Info_Sent_Flag
)
6127 byte
* Info_Element
;
6130 dbug(1,dprintf("SetupInfo"));
6132 for(i
=0; i
<MAXPARMSIDS
; i
++) {
6139 dbug(1,dprintf("CPN "));
6140 Info_Number
= 0x0070;
6142 Info_Sent_Flag
= true;
6144 case 8: /* display */
6145 dbug(1,dprintf("display(%d)",i
));
6146 Info_Number
= 0x0028;
6148 Info_Sent_Flag
= true;
6150 case 16: /* Channel Id */
6151 dbug(1,dprintf("CHI"));
6152 Info_Number
= 0x0018;
6154 Info_Sent_Flag
= true;
6155 mixer_set_bchannel_id (plci
, Info_Element
);
6157 case 19: /* Redirected Number */
6158 dbug(1,dprintf("RDN"));
6159 Info_Number
= 0x0074;
6161 Info_Sent_Flag
= true;
6163 case 20: /* Redirected Number extended */
6164 dbug(1,dprintf("RDX"));
6165 Info_Number
= 0x0073;
6167 Info_Sent_Flag
= true;
6169 case 22: /* Redirecing Number */
6170 dbug(1,dprintf("RIN"));
6171 Info_Number
= 0x0076;
6173 Info_Sent_Flag
= true;
6181 if(i
==MAXPARMSIDS
-2){ /* to indicate the message type "Setup" */
6182 Info_Number
= 0x8000 |5;
6187 if(Info_Sent_Flag
&& Info_Number
){
6188 if(plci
->adapter
->Info_Mask
[appl
->Id
-1] & Info_Mask
) {
6189 sendf(appl
,_INFO_I
,Id
,0,"wS",Info_Number
,Info_Element
);
6196 static void SendInfo(PLCI
*plci
, dword Id
, byte
**parms
, byte iesent
)
6203 byte
* Info_Element
;
6205 static byte charges
[5] = {4,0,0,0,0};
6206 static byte cause
[] = {0x02,0x80,0x00};
6209 dbug(1,dprintf("InfoParse "));
6214 && plci
->Sig
.Ind
!=NCR_FACILITY
6217 dbug(1,dprintf("NoParse "));
6221 for(i
=0; i
<MAXPARMSIDS
; i
++) {
6228 dbug(1,dprintf("CPN "));
6229 Info_Number
= 0x0070;
6232 case 7: /* ESC_CAU */
6233 dbug(1,dprintf("cau(0x%x)",ie
[2]));
6234 Info_Number
= 0x0008;
6237 Info_Element
= NULL
;
6239 case 8: /* display */
6240 dbug(1,dprintf("display(%d)",i
));
6241 Info_Number
= 0x0028;
6244 case 9: /* Date display */
6245 dbug(1,dprintf("date(%d)",i
));
6246 Info_Number
= 0x0029;
6249 case 10: /* charges */
6250 for(j
=0;j
<4;j
++) charges
[1+j
] = 0;
6251 for(j
=0; j
<ie
[0] && !(ie
[1+j
]&0x80); j
++);
6252 for(k
=1,j
++; j
<ie
[0] && k
<=4; j
++,k
++) charges
[k
] = ie
[1+j
];
6253 Info_Number
= 0x4000;
6255 Info_Element
= charges
;
6257 case 11: /* user user info */
6258 dbug(1,dprintf("uui"));
6259 Info_Number
= 0x007E;
6262 case 12: /* congestion receiver ready */
6263 dbug(1,dprintf("clRDY"));
6264 Info_Number
= 0x00B0;
6268 case 13: /* congestion receiver not ready */
6269 dbug(1,dprintf("clNRDY"));
6270 Info_Number
= 0x00BF;
6274 case 15: /* Keypad Facility */
6275 dbug(1,dprintf("KEY"));
6276 Info_Number
= 0x002C;
6279 case 16: /* Channel Id */
6280 dbug(1,dprintf("CHI"));
6281 Info_Number
= 0x0018;
6283 mixer_set_bchannel_id (plci
, Info_Element
);
6285 case 17: /* if no 1tr6 cause, send full cause, else esc_cause */
6286 dbug(1,dprintf("q9cau(0x%x)",ie
[2]));
6287 if(!cause
[2] || cause
[2]<0x80) break; /* eg. layer 1 error */
6288 Info_Number
= 0x0008;
6290 if(cause
[2] != ie
[2]) Info_Element
= cause
;
6292 case 19: /* Redirected Number */
6293 dbug(1,dprintf("RDN"));
6294 Info_Number
= 0x0074;
6297 case 22: /* Redirecing Number */
6298 dbug(1,dprintf("RIN"));
6299 Info_Number
= 0x0076;
6302 case 23: /* Notification Indicator */
6303 dbug(1,dprintf("NI"));
6304 Info_Number
= (word
)NI
;
6307 case 26: /* Call State */
6308 dbug(1,dprintf("CST"));
6309 Info_Number
= (word
)CST
;
6310 Info_Mask
= 0x01; /* do with cause i.e. for now */
6312 case MAXPARMSIDS
-2: /* Escape Message Type, must be the last indication */
6313 dbug(1,dprintf("ESC/MT[0x%x]",ie
[3]));
6314 Info_Number
= 0x8000 |ie
[3];
6315 if(iesent
) Info_Mask
= 0xffff;
6316 else Info_Mask
= 0x10;
6327 if(plci
->Sig
.Ind
==NCR_FACILITY
) /* check controller broadcast */
6329 for(j
=0; j
<max_appl
; j
++)
6331 appl
= &application
[j
];
6334 && plci
->adapter
->Info_Mask
[appl
->Id
-1] &Info_Mask
)
6336 dbug(1,dprintf("NCR_Ind"));
6338 sendf(&application
[j
],_INFO_I
,Id
&0x0f,0,"wS",Info_Number
,Info_Element
);
6342 else if(!plci
->appl
)
6343 { /* overlap receiving broadcast */
6348 || Info_Number
==UUI
)
6350 for(j
=0; j
<max_appl
; j
++)
6352 if(test_c_ind_mask_bit (plci
, j
))
6354 dbug(1,dprintf("Ovl_Ind"));
6356 sendf(&application
[j
],_INFO_I
,Id
,0,"wS",Info_Number
,Info_Element
);
6360 } /* all other signalling states */
6362 && plci
->adapter
->Info_Mask
[plci
->appl
->Id
-1] &Info_Mask
)
6364 dbug(1,dprintf("Std_Ind"));
6366 sendf(plci
->appl
,_INFO_I
,Id
,0,"wS",Info_Number
,Info_Element
);
6372 static byte
SendMultiIE(PLCI
*plci
, dword Id
, byte
**parms
, byte ie_type
,
6373 dword info_mask
, byte setupParse
)
6379 byte
* Info_Element
;
6387 && plci
->Sig
.Ind
!=NCR_FACILITY
6391 dbug(1,dprintf("NoM-IEParse "));
6394 dbug(1,dprintf("M-IEParse "));
6396 for(i
=0; i
<MAX_MULTI_IE
; i
++)
6403 dbug(1,dprintf("[Ind0x%x]:IE=0x%x",plci
->Sig
.Ind
,ie_type
));
6404 Info_Number
= (word
)ie_type
;
6405 Info_Mask
= (word
)info_mask
;
6408 if(plci
->Sig
.Ind
==NCR_FACILITY
) /* check controller broadcast */
6410 for(j
=0; j
<max_appl
; j
++)
6412 appl
= &application
[j
];
6415 && plci
->adapter
->Info_Mask
[appl
->Id
-1] &Info_Mask
)
6418 dbug(1,dprintf("Mlt_NCR_Ind"));
6419 sendf(&application
[j
],_INFO_I
,Id
&0x0f,0,"wS",Info_Number
,Info_Element
);
6423 else if(!plci
->appl
&& Info_Number
)
6424 { /* overlap receiving broadcast */
6425 for(j
=0; j
<max_appl
; j
++)
6427 if(test_c_ind_mask_bit (plci
, j
))
6430 dbug(1,dprintf("Mlt_Ovl_Ind"));
6431 sendf(&application
[j
],_INFO_I
,Id
,0,"wS",Info_Number
,Info_Element
);
6434 } /* all other signalling states */
6436 && plci
->adapter
->Info_Mask
[plci
->appl
->Id
-1] &Info_Mask
)
6439 dbug(1,dprintf("Mlt_Std_Ind"));
6440 sendf(plci
->appl
,_INFO_I
,Id
,0,"wS",Info_Number
,Info_Element
);
6446 static void SendSSExtInd(APPL
* appl
, PLCI
* plci
, dword Id
, byte
* * parms
)
6449 /* Format of multi_ssext_parms[i][]:
6452 2 byte SSEXT_REQ/SSEXT_IND
6460 && plci
->Sig
.Ind
!=NCR_FACILITY
6462 for(i
=0;i
<MAX_MULTI_IE
;i
++)
6464 if(parms
[i
][0]<6) continue;
6465 if(parms
[i
][2]==SSEXT_REQ
) continue;
6469 parms
[i
][0]=0; /* kill it */
6470 sendf(appl
,_MANUFACTURER_I
,
6480 parms
[i
][0]=0; /* kill it */
6481 sendf(plci
->appl
,_MANUFACTURER_I
,
6492 static void nl_ind(PLCI
*plci
)
6497 DIVA_CAPI_ADAPTER
* a
;
6503 byte len
, ncci_state
;
6506 word fax_feature_bits
;
6507 byte fax_send_edata_ack
;
6508 static byte v120_header_buffer
[2 + 3];
6509 static word fax_info
[] = {
6510 0, /* T30_SUCCESS */
6511 _FAX_NO_CONNECTION
, /* T30_ERR_NO_DIS_RECEIVED */
6512 _FAX_PROTOCOL_ERROR
, /* T30_ERR_TIMEOUT_NO_RESPONSE */
6513 _FAX_PROTOCOL_ERROR
, /* T30_ERR_RETRY_NO_RESPONSE */
6514 _FAX_PROTOCOL_ERROR
, /* T30_ERR_TOO_MANY_REPEATS */
6515 _FAX_PROTOCOL_ERROR
, /* T30_ERR_UNEXPECTED_MESSAGE */
6516 _FAX_REMOTE_ABORT
, /* T30_ERR_UNEXPECTED_DCN */
6517 _FAX_LOCAL_ABORT
, /* T30_ERR_DTC_UNSUPPORTED */
6518 _FAX_TRAINING_ERROR
, /* T30_ERR_ALL_RATES_FAILED */
6519 _FAX_TRAINING_ERROR
, /* T30_ERR_TOO_MANY_TRAINS */
6520 _FAX_PARAMETER_ERROR
, /* T30_ERR_RECEIVE_CORRUPTED */
6521 _FAX_REMOTE_ABORT
, /* T30_ERR_UNEXPECTED_DISC */
6522 _FAX_LOCAL_ABORT
, /* T30_ERR_APPLICATION_DISC */
6523 _FAX_REMOTE_REJECT
, /* T30_ERR_INCOMPATIBLE_DIS */
6524 _FAX_LOCAL_ABORT
, /* T30_ERR_INCOMPATIBLE_DCS */
6525 _FAX_PROTOCOL_ERROR
, /* T30_ERR_TIMEOUT_NO_COMMAND */
6526 _FAX_PROTOCOL_ERROR
, /* T30_ERR_RETRY_NO_COMMAND */
6527 _FAX_PROTOCOL_ERROR
, /* T30_ERR_TIMEOUT_COMMAND_TOO_LONG */
6528 _FAX_PROTOCOL_ERROR
, /* T30_ERR_TIMEOUT_RESPONSE_TOO_LONG */
6529 _FAX_NO_CONNECTION
, /* T30_ERR_NOT_IDENTIFIED */
6530 _FAX_PROTOCOL_ERROR
, /* T30_ERR_SUPERVISORY_TIMEOUT */
6531 _FAX_PARAMETER_ERROR
, /* T30_ERR_TOO_LONG_SCAN_LINE */
6532 _FAX_PROTOCOL_ERROR
, /* T30_ERR_RETRY_NO_PAGE_AFTER_MPS */
6533 _FAX_PROTOCOL_ERROR
, /* T30_ERR_RETRY_NO_PAGE_AFTER_CFR */
6534 _FAX_PROTOCOL_ERROR
, /* T30_ERR_RETRY_NO_DCS_AFTER_FTT */
6535 _FAX_PROTOCOL_ERROR
, /* T30_ERR_RETRY_NO_DCS_AFTER_EOM */
6536 _FAX_PROTOCOL_ERROR
, /* T30_ERR_RETRY_NO_DCS_AFTER_MPS */
6537 _FAX_PROTOCOL_ERROR
, /* T30_ERR_RETRY_NO_DCN_AFTER_MCF */
6538 _FAX_PROTOCOL_ERROR
, /* T30_ERR_RETRY_NO_DCN_AFTER_RTN */
6539 _FAX_PROTOCOL_ERROR
, /* T30_ERR_RETRY_NO_CFR */
6540 _FAX_PROTOCOL_ERROR
, /* T30_ERR_RETRY_NO_MCF_AFTER_EOP */
6541 _FAX_PROTOCOL_ERROR
, /* T30_ERR_RETRY_NO_MCF_AFTER_EOM */
6542 _FAX_PROTOCOL_ERROR
, /* T30_ERR_RETRY_NO_MCF_AFTER_MPS */
6543 0x331d, /* T30_ERR_SUB_SEP_UNSUPPORTED */
6544 0x331e, /* T30_ERR_PWD_UNSUPPORTED */
6545 0x331f, /* T30_ERR_SUB_SEP_PWD_UNSUPPORTED */
6546 _FAX_PROTOCOL_ERROR
, /* T30_ERR_INVALID_COMMAND_FRAME */
6547 _FAX_PARAMETER_ERROR
, /* T30_ERR_UNSUPPORTED_PAGE_CODING */
6548 _FAX_PARAMETER_ERROR
, /* T30_ERR_INVALID_PAGE_CODING */
6549 _FAX_REMOTE_REJECT
, /* T30_ERR_INCOMPATIBLE_PAGE_CONFIG */
6550 _FAX_LOCAL_ABORT
, /* T30_ERR_TIMEOUT_FROM_APPLICATION */
6551 _FAX_PROTOCOL_ERROR
, /* T30_ERR_V34FAX_NO_REACTION_ON_MARK */
6552 _FAX_PROTOCOL_ERROR
, /* T30_ERR_V34FAX_TRAINING_TIMEOUT */
6553 _FAX_PROTOCOL_ERROR
, /* T30_ERR_V34FAX_UNEXPECTED_V21 */
6554 _FAX_PROTOCOL_ERROR
, /* T30_ERR_V34FAX_PRIMARY_CTS_ON */
6555 _FAX_LOCAL_ABORT
, /* T30_ERR_V34FAX_TURNAROUND_POLLING */
6556 _FAX_LOCAL_ABORT
/* T30_ERR_V34FAX_V8_INCOMPATIBILITY */
6559 byte dtmf_code_buffer
[CAPIDTMF_RECV_DIGIT_BUFFER_SIZE
+ 1];
6562 static word rtp_info
[] = {
6563 GOOD
, /* RTP_SUCCESS */
6564 0x3600 /* RTP_ERR_SSRC_OR_PAYLOAD_CHANGE */
6567 static dword udata_forwarding_table
[0x100 / sizeof(dword
)] =
6569 0x0020301e, 0x00000000, 0x00000000, 0x00000000,
6570 0x00000000, 0x00000000, 0x00000000, 0x00000000
6573 ch
= plci
->NL
.IndCh
;
6575 ncci
= a
->ch_ncci
[ch
];
6576 Id
= (((dword
)(ncci
? ncci
: ch
)) << 16) | (((word
) plci
->Id
) << 8) | a
->Id
;
6577 if(plci
->tel
) Id
|=EXT_CONTROLLER
;
6578 APPLptr
= plci
->appl
;
6579 dbug(1,dprintf("NL_IND-Id(NL:0x%x)=0x%08lx,plci=%x,tel=%x,state=0x%x,ch=0x%x,chs=%d,Ind=%x",
6580 plci
->NL
.Id
,Id
,plci
->Id
,plci
->tel
,plci
->State
,ch
,plci
->channels
,plci
->NL
.Ind
&0x0f));
6582 /* in the case if no connect_active_Ind was sent to the appl we wait for */
6584 if (plci
->nl_remove_id
)
6586 plci
->NL
.RNR
= 2; /* discard */
6587 dbug(1,dprintf("NL discard while remove pending"));
6590 if((plci
->NL
.Ind
&0x0f)==N_CONNECT
)
6592 if(plci
->State
==INC_DIS_PENDING
6593 || plci
->State
==OUTG_DIS_PENDING
6594 || plci
->State
==IDLE
)
6596 plci
->NL
.RNR
= 2; /* discard */
6597 dbug(1,dprintf("discard n_connect"));
6600 if(plci
->State
< INC_ACT_PENDING
)
6602 plci
->NL
.RNR
= 1; /* flow control */
6603 channel_x_off (plci
, ch
, N_XON_CONNECT_IND
);
6608 if(!APPLptr
) /* no application or invalid data */
6609 { /* while reloading the DSP */
6610 dbug(1,dprintf("discard1"));
6615 if (((plci
->NL
.Ind
&0x0f) == N_UDATA
)
6616 && (((plci
->B2_prot
!= B2_SDLC
) && ((plci
->B1_resource
== 17) || (plci
->B1_resource
== 18)))
6617 || (plci
->B2_prot
== 7)
6618 || (plci
->B3_prot
== 7)) )
6620 plci
->ncpi_buffer
[0] = 0;
6622 ncpi_state
= plci
->ncpi_state
;
6623 if (plci
->NL
.complete
== 1)
6625 byte
* data
= &plci
->NL
.RBuffer
->P
[0];
6627 if ((plci
->NL
.RBuffer
->length
>= 12)
6628 &&( (*data
== DSP_UDATA_INDICATION_DCD_ON
)
6629 ||(*data
== DSP_UDATA_INDICATION_CTS_ON
)) )
6631 word conn_opt
, ncpi_opt
= 0x00;
6632 /* HexDump ("MDM N_UDATA:", plci->NL.RBuffer->length, data); */
6634 if (*data
== DSP_UDATA_INDICATION_DCD_ON
)
6635 plci
->ncpi_state
|= NCPI_MDM_DCD_ON_RECEIVED
;
6636 if (*data
== DSP_UDATA_INDICATION_CTS_ON
)
6637 plci
->ncpi_state
|= NCPI_MDM_CTS_ON_RECEIVED
;
6639 data
++; /* indication code */
6640 data
+= 2; /* timestamp */
6641 if ((*data
== DSP_CONNECTED_NORM_V18
) || (*data
== DSP_CONNECTED_NORM_VOWN
))
6642 ncpi_state
&= ~(NCPI_MDM_DCD_ON_RECEIVED
| NCPI_MDM_CTS_ON_RECEIVED
);
6643 data
++; /* connected norm */
6644 conn_opt
= GET_WORD(data
);
6645 data
+= 2; /* connected options */
6647 PUT_WORD (&(plci
->ncpi_buffer
[1]), (word
)(GET_DWORD(data
) & 0x0000FFFF));
6649 if (conn_opt
& DSP_CONNECTED_OPTION_MASK_V42
)
6651 ncpi_opt
|= MDM_NCPI_ECM_V42
;
6653 else if (conn_opt
& DSP_CONNECTED_OPTION_MASK_MNP
)
6655 ncpi_opt
|= MDM_NCPI_ECM_MNP
;
6659 ncpi_opt
|= MDM_NCPI_TRANSPARENT
;
6661 if (conn_opt
& DSP_CONNECTED_OPTION_MASK_COMPRESSION
)
6663 ncpi_opt
|= MDM_NCPI_COMPRESSED
;
6665 PUT_WORD (&(plci
->ncpi_buffer
[3]), ncpi_opt
);
6666 plci
->ncpi_buffer
[0] = 4;
6668 plci
->ncpi_state
|= NCPI_VALID_CONNECT_B3_IND
| NCPI_VALID_CONNECT_B3_ACT
| NCPI_VALID_DISC_B3_IND
;
6671 if (plci
->B3_prot
== 7)
6673 if (((a
->ncci_state
[ncci
] == INC_ACT_PENDING
) || (a
->ncci_state
[ncci
] == OUTG_CON_PENDING
))
6674 && (plci
->ncpi_state
& NCPI_VALID_CONNECT_B3_ACT
)
6675 && !(plci
->ncpi_state
& NCPI_CONNECT_B3_ACT_SENT
))
6677 a
->ncci_state
[ncci
] = INC_ACT_PENDING
;
6678 sendf(plci
->appl
,_CONNECT_B3_ACTIVE_I
,Id
,0,"S",plci
->ncpi_buffer
);
6679 plci
->ncpi_state
|= NCPI_CONNECT_B3_ACT_SENT
;
6683 if (!((plci
->requested_options_conn
| plci
->requested_options
| plci
->adapter
->requested_options_table
[plci
->appl
->Id
-1])
6684 & ((1L << PRIVATE_V18
) | (1L << PRIVATE_VOWN
)))
6685 || !(ncpi_state
& NCPI_MDM_DCD_ON_RECEIVED
)
6686 || !(ncpi_state
& NCPI_MDM_CTS_ON_RECEIVED
))
6694 if(plci
->NL
.complete
== 2)
6696 if (((plci
->NL
.Ind
&0x0f) == N_UDATA
)
6697 && !(udata_forwarding_table
[plci
->RData
[0].P
[0] >> 5] & (1L << (plci
->RData
[0].P
[0] & 0x1f))))
6699 switch(plci
->RData
[0].P
[0])
6702 case DTMF_UDATA_INDICATION_FAX_CALLING_TONE
:
6703 if (plci
->dtmf_rec_active
& DTMF_LISTEN_ACTIVE_FLAG
)
6704 sendf(plci
->appl
, _FACILITY_I
, Id
& 0xffffL
, 0,"ws", SELECTOR_DTMF
, "\x01X");
6706 case DTMF_UDATA_INDICATION_ANSWER_TONE
:
6707 if (plci
->dtmf_rec_active
& DTMF_LISTEN_ACTIVE_FLAG
)
6708 sendf(plci
->appl
, _FACILITY_I
, Id
& 0xffffL
, 0,"ws", SELECTOR_DTMF
, "\x01Y");
6710 case DTMF_UDATA_INDICATION_DIGITS_RECEIVED
:
6711 dtmf_indication (Id
, plci
, plci
->RData
[0].P
, plci
->RData
[0].PLength
);
6713 case DTMF_UDATA_INDICATION_DIGITS_SENT
:
6714 dtmf_confirmation (Id
, plci
);
6718 case UDATA_INDICATION_MIXER_TAP_DATA
:
6719 capidtmf_recv_process_block (&(plci
->capidtmf_state
), plci
->RData
[0].P
+ 1, (word
)(plci
->RData
[0].PLength
- 1));
6720 i
= capidtmf_indication (&(plci
->capidtmf_state
), dtmf_code_buffer
+ 1);
6723 dtmf_code_buffer
[0] = DTMF_UDATA_INDICATION_DIGITS_RECEIVED
;
6724 dtmf_indication (Id
, plci
, dtmf_code_buffer
, (word
)(i
+ 1));
6729 case UDATA_INDICATION_MIXER_COEFS_SET
:
6730 mixer_indication_coefs_set (Id
, plci
);
6732 case UDATA_INDICATION_XCONNECT_FROM
:
6733 mixer_indication_xconnect_from (Id
, plci
, plci
->RData
[0].P
, plci
->RData
[0].PLength
);
6735 case UDATA_INDICATION_XCONNECT_TO
:
6736 mixer_indication_xconnect_to (Id
, plci
, plci
->RData
[0].P
, plci
->RData
[0].PLength
);
6740 case LEC_UDATA_INDICATION_DISABLE_DETECT
:
6741 ec_indication (Id
, plci
, plci
->RData
[0].P
, plci
->RData
[0].PLength
);
6752 if ((plci
->RData
[0].PLength
!= 0)
6753 && ((plci
->B2_prot
== B2_V120_ASYNC
)
6754 || (plci
->B2_prot
== B2_V120_ASYNC_V42BIS
)
6755 || (plci
->B2_prot
== B2_V120_BIT_TRANSPARENT
)))
6758 sendf(plci
->appl
,_DATA_B3_I
,Id
,0,
6761 (plci
->NL
.RNum
< 2) ? 0 : plci
->RData
[1].PLength
,
6769 sendf(plci
->appl
,_DATA_B3_I
,Id
,0,
6772 plci
->RData
[0].PLength
,
6781 fax_feature_bits
= 0;
6782 if((plci
->NL
.Ind
&0x0f)==N_CONNECT
||
6783 (plci
->NL
.Ind
&0x0f)==N_CONNECT_ACK
||
6784 (plci
->NL
.Ind
&0x0f)==N_DISC
||
6785 (plci
->NL
.Ind
&0x0f)==N_EDATA
||
6786 (plci
->NL
.Ind
&0x0f)==N_DISC_ACK
)
6789 plci
->ncpi_buffer
[0] = 0;
6790 switch (plci
->B3_prot
) {
6793 break; /* no network control protocol info - jfr */
6796 for(i
=0; i
<plci
->NL
.RLength
; i
++) plci
->ncpi_buffer
[4+i
] = plci
->NL
.RBuffer
->P
[i
];
6797 plci
->ncpi_buffer
[0] = (byte
)(i
+3);
6798 plci
->ncpi_buffer
[1] = (byte
)(plci
->NL
.Ind
&N_D_BIT
? 1:0);
6799 plci
->ncpi_buffer
[2] = 0;
6800 plci
->ncpi_buffer
[3] = 0;
6802 case 4: /*T.30 - FAX*/
6803 case 5: /*T.30 - FAX*/
6804 if(plci
->NL
.RLength
>=sizeof(T30_INFO
))
6806 dbug(1,dprintf("FaxStatus %04x", ((T30_INFO
*)plci
->NL
.RBuffer
->P
)->code
));
6808 PUT_WORD(&(plci
->ncpi_buffer
[1]),((T30_INFO
*)plci
->NL
.RBuffer
->P
)->rate_div_2400
* 2400);
6809 fax_feature_bits
= GET_WORD(&((T30_INFO
*)plci
->NL
.RBuffer
->P
)->feature_bits_low
);
6810 i
= (((T30_INFO
*)plci
->NL
.RBuffer
->P
)->resolution
& T30_RESOLUTION_R8_0770_OR_200
) ? 0x0001 : 0x0000;
6811 if (plci
->B3_prot
== 5)
6813 if (!(fax_feature_bits
& T30_FEATURE_BIT_ECM
))
6814 i
|= 0x8000; /* This is not an ECM connection */
6815 if (fax_feature_bits
& T30_FEATURE_BIT_T6_CODING
)
6816 i
|= 0x4000; /* This is a connection with MMR compression */
6817 if (fax_feature_bits
& T30_FEATURE_BIT_2D_CODING
)
6818 i
|= 0x2000; /* This is a connection with MR compression */
6819 if (fax_feature_bits
& T30_FEATURE_BIT_MORE_DOCUMENTS
)
6820 i
|= 0x0004; /* More documents */
6821 if (fax_feature_bits
& T30_FEATURE_BIT_POLLING
)
6822 i
|= 0x0002; /* Fax-polling indication */
6824 dbug(1,dprintf("FAX Options %04x %04x",fax_feature_bits
,i
));
6825 PUT_WORD(&(plci
->ncpi_buffer
[3]),i
);
6826 PUT_WORD(&(plci
->ncpi_buffer
[5]),((T30_INFO
*)plci
->NL
.RBuffer
->P
)->data_format
);
6827 plci
->ncpi_buffer
[7] = ((T30_INFO
*)plci
->NL
.RBuffer
->P
)->pages_low
;
6828 plci
->ncpi_buffer
[8] = ((T30_INFO
*)plci
->NL
.RBuffer
->P
)->pages_high
;
6829 plci
->ncpi_buffer
[len
] = 0;
6830 if(((T30_INFO
*)plci
->NL
.RBuffer
->P
)->station_id_len
)
6832 plci
->ncpi_buffer
[len
] = 20;
6833 for (i
= 0; i
< T30_MAX_STATION_ID_LENGTH
; i
++)
6834 plci
->ncpi_buffer
[++len
] = ((T30_INFO
*)plci
->NL
.RBuffer
->P
)->station_id
[i
];
6836 if (((plci
->NL
.Ind
& 0x0f) == N_DISC
) || ((plci
->NL
.Ind
& 0x0f) == N_DISC_ACK
))
6838 if (((T30_INFO
*)plci
->NL
.RBuffer
->P
)->code
< ARRAY_SIZE(fax_info
))
6839 info
= fax_info
[((T30_INFO
*)plci
->NL
.RBuffer
->P
)->code
];
6841 info
= _FAX_PROTOCOL_ERROR
;
6844 if ((plci
->requested_options_conn
| plci
->requested_options
| a
->requested_options_table
[plci
->appl
->Id
-1])
6845 & ((1L << PRIVATE_FAX_SUB_SEP_PWD
) | (1L << PRIVATE_FAX_NONSTANDARD
)))
6847 i
= offsetof(T30_INFO
, station_id
) + T30_MAX_STATION_ID_LENGTH
+ ((T30_INFO
*)plci
->NL
.RBuffer
->P
)->head_line_len
;
6848 while (i
< plci
->NL
.RBuffer
->length
)
6849 plci
->ncpi_buffer
[++len
] = plci
->NL
.RBuffer
->P
[i
++];
6852 plci
->ncpi_buffer
[0] = len
;
6853 fax_feature_bits
= GET_WORD(&((T30_INFO
*)plci
->NL
.RBuffer
->P
)->feature_bits_low
);
6854 PUT_WORD(&((T30_INFO
*)plci
->fax_connect_info_buffer
)->feature_bits_low
, fax_feature_bits
);
6856 plci
->ncpi_state
|= NCPI_VALID_CONNECT_B3_IND
;
6857 if (((plci
->NL
.Ind
&0x0f) == N_CONNECT_ACK
)
6858 || (((plci
->NL
.Ind
&0x0f) == N_CONNECT
)
6859 && (fax_feature_bits
& T30_FEATURE_BIT_POLLING
))
6860 || (((plci
->NL
.Ind
&0x0f) == N_EDATA
)
6861 && ((((T30_INFO
*)plci
->NL
.RBuffer
->P
)->code
== EDATA_T30_TRAIN_OK
)
6862 || (((T30_INFO
*)plci
->NL
.RBuffer
->P
)->code
== EDATA_T30_DIS
)
6863 || (((T30_INFO
*)plci
->NL
.RBuffer
->P
)->code
== EDATA_T30_DTC
))))
6865 plci
->ncpi_state
|= NCPI_VALID_CONNECT_B3_ACT
;
6867 if (((plci
->NL
.Ind
&0x0f) == N_DISC
)
6868 || ((plci
->NL
.Ind
&0x0f) == N_DISC_ACK
)
6869 || (((plci
->NL
.Ind
&0x0f) == N_EDATA
)
6870 && (((T30_INFO
*)plci
->NL
.RBuffer
->P
)->code
== EDATA_T30_EOP_CAPI
)))
6872 plci
->ncpi_state
|= NCPI_VALID_CONNECT_B3_ACT
| NCPI_VALID_DISC_B3_IND
;
6878 if (((plci
->NL
.Ind
& 0x0f) == N_DISC
) || ((plci
->NL
.Ind
& 0x0f) == N_DISC_ACK
))
6880 if (plci
->NL
.RLength
!= 0)
6882 info
= rtp_info
[plci
->NL
.RBuffer
->P
[0]];
6883 plci
->ncpi_buffer
[0] = plci
->NL
.RLength
- 1;
6884 for (i
= 1; i
< plci
->NL
.RLength
; i
++)
6885 plci
->ncpi_buffer
[i
] = plci
->NL
.RBuffer
->P
[i
];
6893 switch(plci
->NL
.Ind
&0x0f) {
6895 if ((plci
->B3_prot
== 4) || (plci
->B3_prot
== 5))
6897 dbug(1,dprintf("EDATA ncci=0x%x state=%d code=%02x", ncci
, a
->ncci_state
[ncci
],
6898 ((T30_INFO
*)plci
->NL
.RBuffer
->P
)->code
));
6899 fax_send_edata_ack
= (((T30_INFO
*)(plci
->fax_connect_info_buffer
))->operating_mode
== T30_OPERATING_MODE_CAPI_NEG
);
6901 if ((plci
->nsf_control_bits
& T30_NSF_CONTROL_BIT_ENABLE_NSF
)
6902 && (plci
->nsf_control_bits
& (T30_NSF_CONTROL_BIT_NEGOTIATE_IND
| T30_NSF_CONTROL_BIT_NEGOTIATE_RESP
))
6903 && (((T30_INFO
*)plci
->NL
.RBuffer
->P
)->code
== EDATA_T30_DIS
)
6904 && (a
->ncci_state
[ncci
] == OUTG_CON_PENDING
)
6905 && (plci
->ncpi_state
& NCPI_VALID_CONNECT_B3_ACT
)
6906 && !(plci
->ncpi_state
& NCPI_NEGOTIATE_B3_SENT
))
6908 ((T30_INFO
*)(plci
->fax_connect_info_buffer
))->code
= ((T30_INFO
*)plci
->NL
.RBuffer
->P
)->code
;
6909 sendf(plci
->appl
,_MANUFACTURER_I
,Id
,0,"dwbS",_DI_MANU_ID
,_DI_NEGOTIATE_B3
,
6910 (byte
)(plci
->ncpi_buffer
[0] + 1), plci
->ncpi_buffer
);
6911 plci
->ncpi_state
|= NCPI_NEGOTIATE_B3_SENT
;
6912 if (plci
->nsf_control_bits
& T30_NSF_CONTROL_BIT_NEGOTIATE_RESP
)
6913 fax_send_edata_ack
= false;
6916 if (a
->manufacturer_features
& MANUFACTURER_FEATURE_FAX_PAPER_FORMATS
)
6918 switch (((T30_INFO
*)plci
->NL
.RBuffer
->P
)->code
)
6921 if ((a
->ncci_state
[ncci
] == OUTG_CON_PENDING
)
6922 && !(GET_WORD(&((T30_INFO
*)plci
->fax_connect_info_buffer
)->control_bits_low
) & T30_CONTROL_BIT_REQUEST_POLLING
)
6923 && (plci
->ncpi_state
& NCPI_VALID_CONNECT_B3_ACT
)
6924 && !(plci
->ncpi_state
& NCPI_CONNECT_B3_ACT_SENT
))
6926 a
->ncci_state
[ncci
] = INC_ACT_PENDING
;
6927 if (plci
->B3_prot
== 4)
6928 sendf(plci
->appl
,_CONNECT_B3_ACTIVE_I
,Id
,0,"s","");
6930 sendf(plci
->appl
,_CONNECT_B3_ACTIVE_I
,Id
,0,"S",plci
->ncpi_buffer
);
6931 plci
->ncpi_state
|= NCPI_CONNECT_B3_ACT_SENT
;
6935 case EDATA_T30_TRAIN_OK
:
6936 if ((a
->ncci_state
[ncci
] == INC_ACT_PENDING
)
6937 && (plci
->ncpi_state
& NCPI_VALID_CONNECT_B3_ACT
)
6938 && !(plci
->ncpi_state
& NCPI_CONNECT_B3_ACT_SENT
))
6940 if (plci
->B3_prot
== 4)
6941 sendf(plci
->appl
,_CONNECT_B3_ACTIVE_I
,Id
,0,"s","");
6943 sendf(plci
->appl
,_CONNECT_B3_ACTIVE_I
,Id
,0,"S",plci
->ncpi_buffer
);
6944 plci
->ncpi_state
|= NCPI_CONNECT_B3_ACT_SENT
;
6948 case EDATA_T30_EOP_CAPI
:
6949 if (a
->ncci_state
[ncci
] == CONNECTED
)
6951 sendf(plci
->appl
,_DISCONNECT_B3_I
,Id
,0,"wS",GOOD
,plci
->ncpi_buffer
);
6952 a
->ncci_state
[ncci
] = INC_DIS_PENDING
;
6953 plci
->ncpi_state
= 0;
6954 fax_send_edata_ack
= false;
6961 switch (((T30_INFO
*)plci
->NL
.RBuffer
->P
)->code
)
6963 case EDATA_T30_TRAIN_OK
:
6964 if ((a
->ncci_state
[ncci
] == INC_ACT_PENDING
)
6965 && (plci
->ncpi_state
& NCPI_VALID_CONNECT_B3_ACT
)
6966 && !(plci
->ncpi_state
& NCPI_CONNECT_B3_ACT_SENT
))
6968 if (plci
->B3_prot
== 4)
6969 sendf(plci
->appl
,_CONNECT_B3_ACTIVE_I
,Id
,0,"s","");
6971 sendf(plci
->appl
,_CONNECT_B3_ACTIVE_I
,Id
,0,"S",plci
->ncpi_buffer
);
6972 plci
->ncpi_state
|= NCPI_CONNECT_B3_ACT_SENT
;
6977 if (fax_send_edata_ack
)
6979 ((T30_INFO
*)(plci
->fax_connect_info_buffer
))->code
= ((T30_INFO
*)plci
->NL
.RBuffer
->P
)->code
;
6980 plci
->fax_edata_ack_length
= 1;
6981 start_internal_command (Id
, plci
, fax_edata_ack_command
);
6986 dbug(1,dprintf("EDATA ncci=0x%x state=%d", ncci
, a
->ncci_state
[ncci
]));
6990 if (!a
->ch_ncci
[ch
])
6992 ncci
= get_ncci (plci
, ch
, 0);
6993 Id
= (Id
& 0xffff) | (((dword
) ncci
) << 16);
6995 dbug(1,dprintf("N_CONNECT: ch=%d state=%d plci=%lx plci_Id=%lx plci_State=%d",
6996 ch
, a
->ncci_state
[ncci
], a
->ncci_plci
[ncci
], plci
->Id
, plci
->State
));
6998 msg
= _CONNECT_B3_I
;
6999 if (a
->ncci_state
[ncci
] == IDLE
)
7001 else if (plci
->B3_prot
== 1)
7002 msg
= _CONNECT_B3_T90_ACTIVE_I
;
7004 a
->ncci_state
[ncci
] = INC_CON_PENDING
;
7005 if(plci
->B3_prot
== 4)
7006 sendf(plci
->appl
,msg
,Id
,0,"s","");
7008 sendf(plci
->appl
,msg
,Id
,0,"S",plci
->ncpi_buffer
);
7011 dbug(1,dprintf("N_connect_Ack"));
7012 if (plci
->internal_command_queue
[0]
7013 && ((plci
->adjust_b_state
== ADJUST_B_CONNECT_2
)
7014 || (plci
->adjust_b_state
== ADJUST_B_CONNECT_3
)
7015 || (plci
->adjust_b_state
== ADJUST_B_CONNECT_4
)))
7017 (*(plci
->internal_command_queue
[0]))(Id
, plci
, 0);
7018 if (!plci
->internal_command
)
7019 next_internal_command (Id
, plci
);
7022 msg
= _CONNECT_B3_ACTIVE_I
;
7023 if (plci
->B3_prot
== 1)
7025 if (a
->ncci_state
[ncci
] != OUTG_CON_PENDING
)
7026 msg
= _CONNECT_B3_T90_ACTIVE_I
;
7027 a
->ncci_state
[ncci
] = INC_ACT_PENDING
;
7028 sendf(plci
->appl
,msg
,Id
,0,"S",plci
->ncpi_buffer
);
7030 else if ((plci
->B3_prot
== 4) || (plci
->B3_prot
== 5) || (plci
->B3_prot
== 7))
7032 if ((a
->ncci_state
[ncci
] == OUTG_CON_PENDING
)
7033 && (plci
->ncpi_state
& NCPI_VALID_CONNECT_B3_ACT
)
7034 && !(plci
->ncpi_state
& NCPI_CONNECT_B3_ACT_SENT
))
7036 a
->ncci_state
[ncci
] = INC_ACT_PENDING
;
7037 if (plci
->B3_prot
== 4)
7038 sendf(plci
->appl
,msg
,Id
,0,"s","");
7040 sendf(plci
->appl
,msg
,Id
,0,"S",plci
->ncpi_buffer
);
7041 plci
->ncpi_state
|= NCPI_CONNECT_B3_ACT_SENT
;
7046 a
->ncci_state
[ncci
] = INC_ACT_PENDING
;
7047 sendf(plci
->appl
,msg
,Id
,0,"S",plci
->ncpi_buffer
);
7049 if (plci
->adjust_b_restore
)
7051 plci
->adjust_b_restore
= false;
7052 start_internal_command (Id
, plci
, adjust_b_restore
);
7057 if (plci
->internal_command_queue
[0]
7058 && ((plci
->internal_command
== FAX_DISCONNECT_COMMAND_1
)
7059 || (plci
->internal_command
== FAX_DISCONNECT_COMMAND_2
)
7060 || (plci
->internal_command
== FAX_DISCONNECT_COMMAND_3
)))
7062 (*(plci
->internal_command_queue
[0]))(Id
, plci
, 0);
7063 if (!plci
->internal_command
)
7064 next_internal_command (Id
, plci
);
7066 ncci_state
= a
->ncci_state
[ncci
];
7067 ncci_remove (plci
, ncci
, false);
7069 /* with N_DISC or N_DISC_ACK the IDI frees the respective */
7070 /* channel, so we cannot store the state in ncci_state! The */
7071 /* information which channel we received a N_DISC is thus */
7072 /* stored in the inc_dis_ncci_table buffer. */
7073 for(i
=0; plci
->inc_dis_ncci_table
[i
]; i
++);
7074 plci
->inc_dis_ncci_table
[i
] = (byte
) ncci
;
7076 /* need a connect_b3_ind before a disconnect_b3_ind with FAX */
7078 && (plci
->B1_resource
== 16)
7079 && (plci
->State
<= CONNECTED
))
7082 i
= ((T30_INFO
*)plci
->fax_connect_info_buffer
)->rate_div_2400
* 2400;
7083 PUT_WORD (&plci
->ncpi_buffer
[1], i
);
7084 PUT_WORD (&plci
->ncpi_buffer
[3], 0);
7085 i
= ((T30_INFO
*)plci
->fax_connect_info_buffer
)->data_format
;
7086 PUT_WORD (&plci
->ncpi_buffer
[5], i
);
7087 PUT_WORD (&plci
->ncpi_buffer
[7], 0);
7088 plci
->ncpi_buffer
[len
] = 0;
7089 plci
->ncpi_buffer
[0] = len
;
7090 if(plci
->B3_prot
== 4)
7091 sendf(plci
->appl
,_CONNECT_B3_I
,Id
,0,"s","");
7095 if ((plci
->requested_options_conn
| plci
->requested_options
| a
->requested_options_table
[plci
->appl
->Id
-1])
7096 & ((1L << PRIVATE_FAX_SUB_SEP_PWD
) | (1L << PRIVATE_FAX_NONSTANDARD
)))
7098 plci
->ncpi_buffer
[++len
] = 0;
7099 plci
->ncpi_buffer
[++len
] = 0;
7100 plci
->ncpi_buffer
[++len
] = 0;
7101 plci
->ncpi_buffer
[0] = len
;
7104 sendf(plci
->appl
,_CONNECT_B3_I
,Id
,0,"S",plci
->ncpi_buffer
);
7106 sendf(plci
->appl
,_DISCONNECT_B3_I
,Id
,0,"wS",info
,plci
->ncpi_buffer
);
7107 plci
->ncpi_state
= 0;
7108 sig_req(plci
,HANGUP
,0);
7110 plci
->State
= OUTG_DIS_PENDING
;
7113 else if ((a
->manufacturer_features
& MANUFACTURER_FEATURE_FAX_PAPER_FORMATS
)
7114 && ((plci
->B3_prot
== 4) || (plci
->B3_prot
== 5))
7115 && ((ncci_state
== INC_DIS_PENDING
) || (ncci_state
== IDLE
)))
7117 if (ncci_state
== IDLE
)
7121 if((plci
->State
==IDLE
|| plci
->State
==SUSPENDING
) && !plci
->channels
){
7122 if(plci
->State
== SUSPENDING
){
7127 "ws", (word
)3, "\x03\x04\x00\x00");
7128 sendf(plci
->appl
, _DISCONNECT_I
, Id
& 0xffffL
, 0, "w", 0);
7135 else if (plci
->channels
)
7137 sendf(plci
->appl
,_DISCONNECT_B3_I
,Id
,0,"wS",info
,plci
->ncpi_buffer
);
7138 plci
->ncpi_state
= 0;
7139 if ((ncci_state
== OUTG_REJ_PENDING
)
7140 && ((plci
->B3_prot
!= B3_T90NL
) && (plci
->B3_prot
!= B3_ISO8208
) && (plci
->B3_prot
!= B3_X25_DCE
)))
7142 sig_req(plci
,HANGUP
,0);
7144 plci
->State
= OUTG_DIS_PENDING
;
7149 a
->ncci_state
[ncci
] = INC_RES_PENDING
;
7150 sendf(plci
->appl
,_RESET_B3_I
,Id
,0,"S",plci
->ncpi_buffer
);
7153 a
->ncci_state
[ncci
] = CONNECTED
;
7154 sendf(plci
->appl
,_RESET_B3_I
,Id
,0,"S",plci
->ncpi_buffer
);
7158 if (!(udata_forwarding_table
[plci
->NL
.RBuffer
->P
[0] >> 5] & (1L << (plci
->NL
.RBuffer
->P
[0] & 0x1f))))
7160 plci
->RData
[0].P
= plci
->internal_ind_buffer
+ (-((int)(long)(plci
->internal_ind_buffer
)) & 3);
7161 plci
->RData
[0].PLength
= INTERNAL_IND_BUFFER_SIZE
;
7162 plci
->NL
.R
= plci
->RData
;
7168 if (((a
->ncci_state
[ncci
] != CONNECTED
) && (plci
->B2_prot
== 1)) /* transparent */
7169 || (a
->ncci_state
[ncci
] == IDLE
)
7170 || (a
->ncci_state
[ncci
] == INC_DIS_PENDING
))
7175 if ((a
->ncci_state
[ncci
] != CONNECTED
)
7176 && (a
->ncci_state
[ncci
] != OUTG_DIS_PENDING
)
7177 && (a
->ncci_state
[ncci
] != OUTG_REJ_PENDING
))
7179 dbug(1,dprintf("flow control"));
7180 plci
->NL
.RNR
= 1; /* flow control */
7181 channel_x_off (plci
, ch
, 0);
7185 NCCIcode
= ncci
| (((word
)a
->Id
) << 8);
7187 /* count all buffers within the Application pool */
7188 /* belonging to the same NCCI. If this is below the */
7189 /* number of buffers available per NCCI we accept */
7190 /* this packet, otherwise we reject it */
7193 for(i
=0; i
<APPLptr
->MaxBuffer
; i
++) {
7194 if(NCCIcode
==APPLptr
->DataNCCI
[i
]) count
++;
7195 if(!APPLptr
->DataNCCI
[i
] && Num
==0xffff) Num
= i
;
7198 if(count
>=APPLptr
->MaxNCCIData
|| Num
==0xffff)
7200 dbug(3,dprintf("Flow-Control"));
7202 if( ++(APPLptr
->NCCIDataFlowCtrlTimer
)>=
7203 (word
)((a
->manufacturer_features
& MANUFACTURER_FEATURE_OOB_CHANNEL
) ? 40 : 2000))
7206 dbug(3,dprintf("DiscardData"));
7208 channel_x_off (plci
, ch
, 0);
7214 APPLptr
->NCCIDataFlowCtrlTimer
= 0;
7217 plci
->RData
[0].P
= ReceiveBufferGet(APPLptr
,Num
);
7218 if(!plci
->RData
[0].P
) {
7220 channel_x_off (plci
, ch
, 0);
7224 APPLptr
->DataNCCI
[Num
] = NCCIcode
;
7225 APPLptr
->DataFlags
[Num
] = (plci
->Id
<<8) | (plci
->NL
.Ind
>>4);
7226 dbug(3,dprintf("Buffer(%d), Max = %d",Num
,APPLptr
->MaxBuffer
));
7229 plci
->RFlags
= plci
->NL
.Ind
>>4;
7230 plci
->RData
[0].PLength
= APPLptr
->MaxDataLength
;
7231 plci
->NL
.R
= plci
->RData
;
7232 if ((plci
->NL
.RLength
!= 0)
7233 && ((plci
->B2_prot
== B2_V120_ASYNC
)
7234 || (plci
->B2_prot
== B2_V120_ASYNC_V42BIS
)
7235 || (plci
->B2_prot
== B2_V120_BIT_TRANSPARENT
)))
7237 plci
->RData
[1].P
= plci
->RData
[0].P
;
7238 plci
->RData
[1].PLength
= plci
->RData
[0].PLength
;
7239 plci
->RData
[0].P
= v120_header_buffer
+ (-((unsigned long)v120_header_buffer
) & 3);
7240 if ((plci
->NL
.RBuffer
->P
[0] & V120_HEADER_EXTEND_BIT
) || (plci
->NL
.RLength
== 1))
7241 plci
->RData
[0].PLength
= 1;
7243 plci
->RData
[0].PLength
= 2;
7244 if (plci
->NL
.RBuffer
->P
[0] & V120_HEADER_BREAK_BIT
)
7245 plci
->RFlags
|= 0x0010;
7246 if (plci
->NL
.RBuffer
->P
[0] & (V120_HEADER_C1_BIT
| V120_HEADER_C2_BIT
))
7247 plci
->RFlags
|= 0x8000;
7252 if((plci
->NL
.Ind
&0x0f)==N_UDATA
)
7253 plci
->RFlags
|= 0x0010;
7255 else if ((plci
->B3_prot
== B3_RTP
) && ((plci
->NL
.Ind
& 0x0f) == N_BDATA
))
7256 plci
->RFlags
|= 0x0001;
7262 data_ack (plci
, ch
);
7270 /*------------------------------------------------------------------*/
7271 /* find a free PLCI */
7272 /*------------------------------------------------------------------*/
7274 static word
get_plci(DIVA_CAPI_ADAPTER
*a
)
7280 for(i
=0;i
<a
->max_plci
&& a
->plci
[i
].Id
;i
++);
7281 if(i
==a
->max_plci
) {
7282 dbug(1,dprintf("get_plci: out of PLCIs"));
7286 plci
->Id
= (byte
)(i
+1);
7294 plci
->relatedPTYPLCI
= NULL
;
7296 plci
->SuppState
= IDLE
;
7299 plci
->B1_resource
= 0;
7304 plci
->m_command
= 0;
7305 init_internal_command_queue (plci
);
7307 plci
->req_in_start
= 0;
7310 plci
->msg_in_write_pos
= MSG_IN_QUEUE_SIZE
;
7311 plci
->msg_in_read_pos
= MSG_IN_QUEUE_SIZE
;
7312 plci
->msg_in_wrap_pos
= MSG_IN_QUEUE_SIZE
;
7314 plci
->data_sent
= false;
7315 plci
->send_disc
= 0;
7316 plci
->sig_global_req
= 0;
7317 plci
->sig_remove_id
= 0;
7318 plci
->nl_global_req
= 0;
7319 plci
->nl_remove_id
= 0;
7321 plci
->manufacturer
= false;
7322 plci
->call_dir
= CALL_DIR_OUT
| CALL_DIR_ORIGINATE
;
7323 plci
->spoofed_msg
= 0;
7325 plci
->cr_enquiry
= false;
7326 plci
->hangup_flow_ctrl_timer
= 0;
7328 plci
->ncci_ring_list
= 0;
7329 for(j
=0;j
<MAX_CHANNELS_PER_PLCI
;j
++) plci
->inc_dis_ncci_table
[j
] = 0;
7330 clear_c_ind_mask (plci
);
7331 set_group_ind_mask (plci
);
7332 plci
->fax_connect_info_length
= 0;
7333 plci
->nsf_control_bits
= 0;
7334 plci
->ncpi_state
= 0x00;
7335 plci
->ncpi_buffer
[0] = 0;
7337 plci
->requested_options_conn
= 0;
7338 plci
->requested_options
= 0;
7339 plci
->notifiedcall
= 0;
7340 plci
->vswitchstate
= 0;
7342 plci
->vsprotdialect
= 0;
7343 init_b1_config (plci
);
7344 dbug(1,dprintf("get_plci(%x)",plci
->Id
));
7348 /*------------------------------------------------------------------*/
7349 /* put a parameter in the parameter buffer */
7350 /*------------------------------------------------------------------*/
7352 static void add_p(PLCI
* plci
, byte code
, byte
* p
)
7357 if(p
) p_length
= p
[0];
7358 add_ie(plci
, code
, p
, p_length
);
7361 /*------------------------------------------------------------------*/
7362 /* put a structure in the parameter buffer */
7363 /*------------------------------------------------------------------*/
7364 static void add_s(PLCI
* plci
, byte code
, API_PARSE
* p
)
7366 if(p
) add_ie(plci
, code
, p
->info
, (word
)p
->length
);
7369 /*------------------------------------------------------------------*/
7370 /* put multiple structures in the parameter buffer */
7371 /*------------------------------------------------------------------*/
7372 static void add_ss(PLCI
* plci
, byte code
, API_PARSE
* p
)
7377 dbug(1,dprintf("add_ss(%x,len=%d)",code
,p
->length
));
7378 for(i
=2;i
<(byte
)p
->length
;i
+=p
->info
[i
]+2){
7379 dbug(1,dprintf("add_ss_ie(%x,len=%d)",p
->info
[i
-1],p
->info
[i
]));
7380 add_ie(plci
, p
->info
[i
-1], (byte
*)&(p
->info
[i
]), (word
)p
->info
[i
]);
7385 /*------------------------------------------------------------------*/
7386 /* return the channel number sent by the application in a esc_chi */
7387 /*------------------------------------------------------------------*/
7388 static byte
getChannel(API_PARSE
* p
)
7393 for(i
=2;i
<(byte
)p
->length
;i
+=p
->info
[i
]+2){
7395 if(p
->info
[i
-1]==ESC
&& p
->info
[i
+1]==CHI
) return (p
->info
[i
+2]);
7403 /*------------------------------------------------------------------*/
7404 /* put an information element in the parameter buffer */
7405 /*------------------------------------------------------------------*/
7407 static void add_ie(PLCI
* plci
, byte code
, byte
* p
, word p_length
)
7411 if(!(code
&0x80) && !p_length
) return;
7413 if(plci
->req_in
==plci
->req_in_start
) {
7419 plci
->RBuffer
[plci
->req_in
++] = code
;
7422 plci
->RBuffer
[plci
->req_in
++] = (byte
)p_length
;
7423 for(i
=0;i
<p_length
;i
++) plci
->RBuffer
[plci
->req_in
++] = p
[1+i
];
7426 plci
->RBuffer
[plci
->req_in
++] = 0;
7429 /*------------------------------------------------------------------*/
7430 /* put a unstructured data into the buffer */
7431 /*------------------------------------------------------------------*/
7433 static void add_d(PLCI
*plci
, word length
, byte
*p
)
7437 if(plci
->req_in
==plci
->req_in_start
) {
7443 for(i
=0;i
<length
;i
++) plci
->RBuffer
[plci
->req_in
++] = p
[i
];
7446 /*------------------------------------------------------------------*/
7447 /* put parameters from the Additional Info parameter in the */
7448 /* parameter buffer */
7449 /*------------------------------------------------------------------*/
7451 static void add_ai(PLCI
*plci
, API_PARSE
*ai
)
7454 API_PARSE ai_parms
[5];
7456 for(i
=0;i
<5;i
++) ai_parms
[i
].length
= 0;
7460 if(api_parse(&ai
->info
[1], (word
)ai
->length
, "ssss", ai_parms
))
7463 add_s (plci
,KEY
,&ai_parms
[1]);
7464 add_s (plci
,UUI
,&ai_parms
[2]);
7465 add_ss(plci
,FTY
,&ai_parms
[3]);
7468 /*------------------------------------------------------------------*/
7469 /* put parameter for b1 protocol in the parameter buffer */
7470 /*------------------------------------------------------------------*/
7472 static word
add_b1(PLCI
*plci
, API_PARSE
*bp
, word b_channel_info
,
7475 API_PARSE bp_parms
[8];
7476 API_PARSE mdm_cfg
[9];
7477 API_PARSE global_config
[2];
7479 byte resource
[] = {5,9,13,12,16,39,9,17,17,18};
7480 byte voice_cai
[] = "\x06\x14\x00\x00\x00\x00\x08";
7483 API_PARSE mdm_cfg_v18
[4];
7488 for(i
=0;i
<8;i
++) bp_parms
[i
].length
= 0;
7489 for(i
=0;i
<2;i
++) global_config
[i
].length
= 0;
7491 dbug(1,dprintf("add_b1"));
7492 api_save_msg(bp
, "s", &plci
->B_protocol
);
7494 if(b_channel_info
==2){
7495 plci
->B1_resource
= 0;
7496 adjust_b1_facilities (plci
, plci
->B1_resource
, b1_facilities
);
7497 add_p(plci
, CAI
, "\x01\x00");
7498 dbug(1,dprintf("Cai=1,0 (no resource)"));
7502 if(plci
->tel
== CODEC_PERMANENT
) return 0;
7503 else if(plci
->tel
== CODEC
){
7504 plci
->B1_resource
= 1;
7505 adjust_b1_facilities (plci
, plci
->B1_resource
, b1_facilities
);
7506 add_p(plci
, CAI
, "\x01\x01");
7507 dbug(1,dprintf("Cai=1,1 (Codec)"));
7510 else if(plci
->tel
== ADV_VOICE
){
7511 plci
->B1_resource
= add_b1_facilities (plci
, 9, (word
)(b1_facilities
| B1_FACILITY_VOICE
));
7512 adjust_b1_facilities (plci
, plci
->B1_resource
, (word
)(b1_facilities
| B1_FACILITY_VOICE
));
7513 voice_cai
[1] = plci
->B1_resource
;
7514 PUT_WORD (&voice_cai
[5], plci
->appl
->MaxDataLength
);
7515 add_p(plci
, CAI
, voice_cai
);
7516 dbug(1,dprintf("Cai=1,0x%x (AdvVoice)",voice_cai
[1]));
7519 plci
->call_dir
&= ~(CALL_DIR_ORIGINATE
| CALL_DIR_ANSWER
);
7520 if (plci
->call_dir
& CALL_DIR_OUT
)
7521 plci
->call_dir
|= CALL_DIR_ORIGINATE
;
7522 else if (plci
->call_dir
& CALL_DIR_IN
)
7523 plci
->call_dir
|= CALL_DIR_ANSWER
;
7526 plci
->B1_resource
= 0x5;
7527 adjust_b1_facilities (plci
, plci
->B1_resource
, b1_facilities
);
7528 add_p(plci
, CAI
, "\x01\x05");
7532 dbug(1,dprintf("b_prot_len=%d",(word
)bp
->length
));
7533 if(bp
->length
>256) return _WRONG_MESSAGE_FORMAT
;
7534 if(api_parse(&bp
->info
[1], (word
)bp
->length
, "wwwsssb", bp_parms
))
7536 bp_parms
[6].length
= 0;
7537 if(api_parse(&bp
->info
[1], (word
)bp
->length
, "wwwsss", bp_parms
))
7539 dbug(1,dprintf("b-form.!"));
7540 return _WRONG_MESSAGE_FORMAT
;
7543 else if (api_parse(&bp
->info
[1], (word
)bp
->length
, "wwwssss", bp_parms
))
7545 dbug(1,dprintf("b-form.!"));
7546 return _WRONG_MESSAGE_FORMAT
;
7549 if(bp_parms
[6].length
)
7551 if(api_parse(&bp_parms
[6].info
[1], (word
)bp_parms
[6].length
, "w", global_config
))
7553 return _WRONG_MESSAGE_FORMAT
;
7555 switch(GET_WORD(global_config
[0].info
))
7558 plci
->call_dir
= (plci
->call_dir
& ~CALL_DIR_ANSWER
) | CALL_DIR_ORIGINATE
;
7561 plci
->call_dir
= (plci
->call_dir
& ~CALL_DIR_ORIGINATE
) | CALL_DIR_ANSWER
;
7565 dbug(1,dprintf("call_dir=%04x", plci
->call_dir
));
7568 if ((GET_WORD(bp_parms
[0].info
) == B1_RTP
)
7569 && (plci
->adapter
->man_profile
.private_options
& (1L << PRIVATE_RTP
)))
7571 plci
->B1_resource
= add_b1_facilities (plci
, 31, (word
)(b1_facilities
& ~B1_FACILITY_VOICE
));
7572 adjust_b1_facilities (plci
, plci
->B1_resource
, (word
)(b1_facilities
& ~B1_FACILITY_VOICE
));
7573 cai
[1] = plci
->B1_resource
;
7577 PUT_WORD(&cai
[5],plci
->appl
->MaxDataLength
);
7578 for (i
= 0; i
< bp_parms
[3].length
; i
++)
7579 cai
[7+i
] = bp_parms
[3].info
[1+i
];
7580 cai
[0] = 6 + bp_parms
[3].length
;
7581 add_p(plci
, CAI
, cai
);
7586 if ((GET_WORD(bp_parms
[0].info
) == B1_PIAFS
)
7587 && (plci
->adapter
->man_profile
.private_options
& (1L << PRIVATE_PIAFS
)))
7589 plci
->B1_resource
= add_b1_facilities (plci
, 35/* PIAFS HARDWARE FACILITY */, (word
)(b1_facilities
& ~B1_FACILITY_VOICE
));
7590 adjust_b1_facilities (plci
, plci
->B1_resource
, (word
)(b1_facilities
& ~B1_FACILITY_VOICE
));
7591 cai
[1] = plci
->B1_resource
;
7595 PUT_WORD(&cai
[5],plci
->appl
->MaxDataLength
);
7597 add_p(plci
, CAI
, cai
);
7602 if ((GET_WORD(bp_parms
[0].info
) >= 32)
7603 || (!((1L << GET_WORD(bp_parms
[0].info
)) & plci
->adapter
->profile
.B1_Protocols
)
7604 && ((GET_WORD(bp_parms
[0].info
) != 3)
7605 || !((1L << B1_HDLC
) & plci
->adapter
->profile
.B1_Protocols
)
7606 || ((bp_parms
[3].length
!= 0) && (GET_WORD(&bp_parms
[3].info
[1]) != 0) && (GET_WORD(&bp_parms
[3].info
[1]) != 56000)))))
7608 return _B1_NOT_SUPPORTED
;
7610 plci
->B1_resource
= add_b1_facilities (plci
, resource
[GET_WORD(bp_parms
[0].info
)],
7611 (word
)(b1_facilities
& ~B1_FACILITY_VOICE
));
7612 adjust_b1_facilities (plci
, plci
->B1_resource
, (word
)(b1_facilities
& ~B1_FACILITY_VOICE
));
7614 cai
[1] = plci
->B1_resource
;
7615 for (i
=2;i
<sizeof(cai
);i
++) cai
[i
] = 0;
7617 if ((GET_WORD(bp_parms
[0].info
) == B1_MODEM_ALL_NEGOTIATE
)
7618 || (GET_WORD(bp_parms
[0].info
) == B1_MODEM_ASYNC
)
7619 || (GET_WORD(bp_parms
[0].info
) == B1_MODEM_SYNC_HDLC
))
7621 for (i
=0;i
<7;i
++) mdm_cfg
[i
].length
= 0;
7623 if (bp_parms
[3].length
)
7625 if(api_parse(&bp_parms
[3].info
[1],(word
)bp_parms
[3].length
,"wwwwww", mdm_cfg
))
7627 return (_WRONG_MESSAGE_FORMAT
);
7630 cai
[2] = 0; /* Bit rate for adaptation */
7632 dbug(1,dprintf("MDM Max Bit Rate:<%d>", GET_WORD(mdm_cfg
[0].info
)));
7634 PUT_WORD (&cai
[13], 0); /* Min Tx speed */
7635 PUT_WORD (&cai
[15], GET_WORD(mdm_cfg
[0].info
)); /* Max Tx speed */
7636 PUT_WORD (&cai
[17], 0); /* Min Rx speed */
7637 PUT_WORD (&cai
[19], GET_WORD(mdm_cfg
[0].info
)); /* Max Rx speed */
7639 cai
[3] = 0; /* Async framing parameters */
7640 switch (GET_WORD (mdm_cfg
[2].info
))
7642 case 1: /* odd parity */
7643 cai
[3] |= (DSP_CAI_ASYNC_PARITY_ENABLE
| DSP_CAI_ASYNC_PARITY_ODD
);
7644 dbug(1,dprintf("MDM: odd parity"));
7647 case 2: /* even parity */
7648 cai
[3] |= (DSP_CAI_ASYNC_PARITY_ENABLE
| DSP_CAI_ASYNC_PARITY_EVEN
);
7649 dbug(1,dprintf("MDM: even parity"));
7653 dbug(1,dprintf("MDM: no parity"));
7657 switch (GET_WORD (mdm_cfg
[3].info
))
7659 case 1: /* 2 stop bits */
7660 cai
[3] |= DSP_CAI_ASYNC_TWO_STOP_BITS
;
7661 dbug(1,dprintf("MDM: 2 stop bits"));
7665 dbug(1,dprintf("MDM: 1 stop bit"));
7669 switch (GET_WORD (mdm_cfg
[1].info
))
7672 cai
[3] |= DSP_CAI_ASYNC_CHAR_LENGTH_5
;
7673 dbug(1,dprintf("MDM: 5 bits"));
7677 cai
[3] |= DSP_CAI_ASYNC_CHAR_LENGTH_6
;
7678 dbug(1,dprintf("MDM: 6 bits"));
7682 cai
[3] |= DSP_CAI_ASYNC_CHAR_LENGTH_7
;
7683 dbug(1,dprintf("MDM: 7 bits"));
7687 dbug(1,dprintf("MDM: 8 bits"));
7691 cai
[7] = 0; /* Line taking options */
7692 cai
[8] = 0; /* Modulation negotiation options */
7693 cai
[9] = 0; /* Modulation options */
7695 if (((plci
->call_dir
& CALL_DIR_ORIGINATE
) != 0) ^ ((plci
->call_dir
& CALL_DIR_OUT
) != 0))
7697 cai
[9] |= DSP_CAI_MODEM_REVERSE_DIRECTION
;
7698 dbug(1, dprintf("MDM: Reverse direction"));
7701 if (GET_WORD (mdm_cfg
[4].info
) & MDM_CAPI_DISABLE_RETRAIN
)
7703 cai
[9] |= DSP_CAI_MODEM_DISABLE_RETRAIN
;
7704 dbug(1, dprintf("MDM: Disable retrain"));
7707 if (GET_WORD (mdm_cfg
[4].info
) & MDM_CAPI_DISABLE_RING_TONE
)
7709 cai
[7] |= DSP_CAI_MODEM_DISABLE_CALLING_TONE
| DSP_CAI_MODEM_DISABLE_ANSWER_TONE
;
7710 dbug(1, dprintf("MDM: Disable ring tone"));
7713 if (GET_WORD (mdm_cfg
[4].info
) & MDM_CAPI_GUARD_1800
)
7715 cai
[8] |= DSP_CAI_MODEM_GUARD_TONE_1800HZ
;
7716 dbug(1, dprintf("MDM: 1800 guard tone"));
7718 else if (GET_WORD (mdm_cfg
[4].info
) & MDM_CAPI_GUARD_550
)
7720 cai
[8] |= DSP_CAI_MODEM_GUARD_TONE_550HZ
;
7721 dbug(1, dprintf("MDM: 550 guard tone"));
7724 if ((GET_WORD (mdm_cfg
[5].info
) & 0x00ff) == MDM_CAPI_NEG_V100
)
7726 cai
[8] |= DSP_CAI_MODEM_NEGOTIATE_V100
;
7727 dbug(1, dprintf("MDM: V100"));
7729 else if ((GET_WORD (mdm_cfg
[5].info
) & 0x00ff) == MDM_CAPI_NEG_MOD_CLASS
)
7731 cai
[8] |= DSP_CAI_MODEM_NEGOTIATE_IN_CLASS
;
7732 dbug(1, dprintf("MDM: IN CLASS"));
7734 else if ((GET_WORD (mdm_cfg
[5].info
) & 0x00ff) == MDM_CAPI_NEG_DISABLED
)
7736 cai
[8] |= DSP_CAI_MODEM_NEGOTIATE_DISABLED
;
7737 dbug(1, dprintf("MDM: DISABLED"));
7741 if ((plci
->adapter
->man_profile
.private_options
& (1L << PRIVATE_V18
))
7742 && (GET_WORD(mdm_cfg
[5].info
) & 0x8000)) /* Private V.18 enable */
7744 plci
->requested_options
|= 1L << PRIVATE_V18
;
7746 if (GET_WORD(mdm_cfg
[5].info
) & 0x4000) /* Private VOWN enable */
7747 plci
->requested_options
|= 1L << PRIVATE_VOWN
;
7749 if ((plci
->requested_options_conn
| plci
->requested_options
| plci
->adapter
->requested_options_table
[plci
->appl
->Id
-1])
7750 & ((1L << PRIVATE_V18
) | (1L << PRIVATE_VOWN
)))
7752 if (!api_parse(&bp_parms
[3].info
[1],(word
)bp_parms
[3].length
,"wwwwwws", mdm_cfg
))
7755 if (mdm_cfg
[6].length
>= 4)
7757 d
= GET_DWORD(&mdm_cfg
[6].info
[1]);
7758 cai
[7] |= (byte
) d
; /* line taking options */
7759 cai
[9] |= (byte
)(d
>> 8); /* modulation options */
7760 cai
[++i
] = (byte
)(d
>> 16); /* vown modulation options */
7761 cai
[++i
] = (byte
)(d
>> 24);
7762 if (mdm_cfg
[6].length
>= 8)
7764 d
= GET_DWORD(&mdm_cfg
[6].info
[5]);
7765 cai
[10] |= (byte
) d
; /* disabled modulations mask */
7766 cai
[11] |= (byte
)(d
>> 8);
7767 if (mdm_cfg
[6].length
>= 12)
7769 d
= GET_DWORD(&mdm_cfg
[6].info
[9]);
7770 cai
[12] = (byte
) d
; /* enabled modulations mask */
7771 cai
[++i
] = (byte
)(d
>> 8); /* vown enabled modulations */
7772 cai
[++i
] = (byte
)(d
>> 16);
7773 cai
[++i
] = (byte
)(d
>> 24);
7775 if (mdm_cfg
[6].length
>= 14)
7777 w
= GET_WORD(&mdm_cfg
[6].info
[13]);
7779 PUT_WORD(&cai
[13], w
); /* min tx speed */
7780 if (mdm_cfg
[6].length
>= 16)
7782 w
= GET_WORD(&mdm_cfg
[6].info
[15]);
7784 PUT_WORD(&cai
[15], w
); /* max tx speed */
7785 if (mdm_cfg
[6].length
>= 18)
7787 w
= GET_WORD(&mdm_cfg
[6].info
[17]);
7789 PUT_WORD(&cai
[17], w
); /* min rx speed */
7790 if (mdm_cfg
[6].length
>= 20)
7792 w
= GET_WORD(&mdm_cfg
[6].info
[19]);
7794 PUT_WORD(&cai
[19], w
); /* max rx speed */
7795 if (mdm_cfg
[6].length
>= 22)
7797 w
= GET_WORD(&mdm_cfg
[6].info
[21]);
7798 cai
[23] = (byte
)(-((short) w
)); /* transmit level */
7799 if (mdm_cfg
[6].length
>= 24)
7801 w
= GET_WORD(&mdm_cfg
[6].info
[23]);
7802 cai
[22] |= (byte
) w
; /* info options mask */
7803 cai
[21] |= (byte
)(w
>> 8); /* disabled symbol rates */
7815 if (!api_parse(&bp_parms
[3].info
[1],(word
)bp_parms
[3].length
,"wwwwwwss", mdm_cfg
))
7817 if (!api_parse(&mdm_cfg
[7].info
[1],(word
)mdm_cfg
[7].length
,"sss", mdm_cfg_v18
))
7819 for (n
= 0; n
< 3; n
++)
7821 cai
[i
] = (byte
)(mdm_cfg_v18
[n
].length
);
7822 for (j
= 1; j
< ((word
)(cai
[i
] + 1)); j
++)
7823 cai
[i
+j
] = mdm_cfg_v18
[n
].info
[j
];
7828 cai
[0] = (byte
)(i
- 1);
7834 if(GET_WORD(bp_parms
[0].info
)==2 || /* V.110 async */
7835 GET_WORD(bp_parms
[0].info
)==3 ) /* V.110 sync */
7837 if(bp_parms
[3].length
){
7838 dbug(1,dprintf("V.110,%d",GET_WORD(&bp_parms
[3].info
[1])));
7839 switch(GET_WORD(&bp_parms
[3].info
[1])){ /* Rate */
7842 if(GET_WORD(bp_parms
[0].info
)==3){ /* V.110 sync 56k */
7843 dbug(1,dprintf("56k sync HSCX"));
7848 else if(GET_WORD(bp_parms
[0].info
)==2){
7849 dbug(1,dprintf("56k async DSP"));
7853 case 50: cai
[2] = 1; break;
7854 case 75: cai
[2] = 1; break;
7855 case 110: cai
[2] = 1; break;
7856 case 150: cai
[2] = 1; break;
7857 case 200: cai
[2] = 1; break;
7858 case 300: cai
[2] = 1; break;
7859 case 600: cai
[2] = 1; break;
7860 case 1200: cai
[2] = 2; break;
7861 case 2400: cai
[2] = 3; break;
7862 case 4800: cai
[2] = 4; break;
7863 case 7200: cai
[2] = 10; break;
7864 case 9600: cai
[2] = 5; break;
7865 case 12000: cai
[2] = 13; break;
7866 case 24000: cai
[2] = 0; break;
7867 case 14400: cai
[2] = 11; break;
7868 case 19200: cai
[2] = 6; break;
7869 case 28800: cai
[2] = 12; break;
7870 case 38400: cai
[2] = 7; break;
7871 case 48000: cai
[2] = 8; break;
7872 case 76: cai
[2] = 15; break; /* 75/1200 */
7873 case 1201: cai
[2] = 14; break; /* 1200/75 */
7874 case 56001: cai
[2] = 9; break; /* V.110 56000 */
7877 return _B1_PARM_NOT_SUPPORTED
;
7880 if (cai
[1] == 13) /* v.110 async */
7882 if (bp_parms
[3].length
>= 8)
7884 switch (GET_WORD (&bp_parms
[3].info
[3]))
7887 cai
[3] |= DSP_CAI_ASYNC_CHAR_LENGTH_5
;
7890 cai
[3] |= DSP_CAI_ASYNC_CHAR_LENGTH_6
;
7893 cai
[3] |= DSP_CAI_ASYNC_CHAR_LENGTH_7
;
7896 switch (GET_WORD (&bp_parms
[3].info
[5]))
7898 case 1: /* odd parity */
7899 cai
[3] |= (DSP_CAI_ASYNC_PARITY_ENABLE
| DSP_CAI_ASYNC_PARITY_ODD
);
7901 case 2: /* even parity */
7902 cai
[3] |= (DSP_CAI_ASYNC_PARITY_ENABLE
| DSP_CAI_ASYNC_PARITY_EVEN
);
7905 switch (GET_WORD (&bp_parms
[3].info
[7]))
7907 case 1: /* 2 stop bits */
7908 cai
[3] |= DSP_CAI_ASYNC_TWO_STOP_BITS
;
7914 else if(cai
[1]==8 || GET_WORD(bp_parms
[0].info
)==3 ){
7915 dbug(1,dprintf("V.110 default 56k sync"));
7921 dbug(1,dprintf("V.110 default 9600 async"));
7925 PUT_WORD(&cai
[5],plci
->appl
->MaxDataLength
);
7926 dbug(1,dprintf("CAI[%d]=%x,%x,%x,%x,%x,%x", cai
[0], cai
[1], cai
[2], cai
[3], cai
[4], cai
[5], cai
[6]));
7927 /* HexDump ("CAI", sizeof(cai), &cai[0]); */
7929 add_p(plci
, CAI
, cai
);
7933 /*------------------------------------------------------------------*/
7934 /* put parameter for b2 and B3 protocol in the parameter buffer */
7935 /*------------------------------------------------------------------*/
7937 static word
add_b23(PLCI
*plci
, API_PARSE
*bp
)
7939 word i
, fax_control_bits
;
7941 byte SAPI
= 0x40; /* default SAPI 16 for x.31 */
7942 API_PARSE bp_parms
[8];
7943 API_PARSE
* b1_config
;
7944 API_PARSE
* b2_config
;
7945 API_PARSE b2_config_parms
[8];
7946 API_PARSE
* b3_config
;
7947 API_PARSE b3_config_parms
[6];
7948 API_PARSE global_config
[2];
7950 static byte llc
[3] = {2,0,0};
7951 static byte dlc
[20] = {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0};
7952 static byte nlc
[256];
7953 static byte lli
[12] = {1,1};
7955 const byte llc2_out
[] = {1,2,4,6,2,0,0,0, X75_V42BIS
,V120_L2
,V120_V42BIS
,V120_L2
,6};
7956 const byte llc2_in
[] = {1,3,4,6,3,0,0,0, X75_V42BIS
,V120_L2
,V120_V42BIS
,V120_L2
,6};
7958 const byte llc3
[] = {4,3,2,2,6,6,0};
7959 const byte header
[] = {0,2,3,3,0,0,0};
7961 for(i
=0;i
<8;i
++) bp_parms
[i
].length
= 0;
7962 for(i
=0;i
<6;i
++) b2_config_parms
[i
].length
= 0;
7963 for(i
=0;i
<5;i
++) b3_config_parms
[i
].length
= 0;
7967 if (plci
->adapter
->manufacturer_features
& MANUFACTURER_FEATURE_XONOFF_FLOW_CONTROL
)
7969 if (plci
->adapter
->manufacturer_features
& MANUFACTURER_FEATURE_OOB_CHANNEL
)
7972 if ((lli
[1] & 0x02) && (diva_xdi_extended_features
& DIVA_CAPI_USE_CMA
)) {
7974 if (plci
->rx_dma_descriptor
<= 0) {
7975 plci
->rx_dma_descriptor
=diva_get_dma_descriptor(plci
,&plci
->rx_dma_magic
);
7976 if (plci
->rx_dma_descriptor
>= 0)
7977 plci
->rx_dma_descriptor
++;
7979 if (plci
->rx_dma_descriptor
> 0) {
7982 lli
[2] = (byte
)(plci
->rx_dma_descriptor
- 1);
7983 lli
[3] = (byte
)plci
->rx_dma_magic
;
7984 lli
[4] = (byte
)(plci
->rx_dma_magic
>> 8);
7985 lli
[5] = (byte
)(plci
->rx_dma_magic
>> 16);
7986 lli
[6] = (byte
)(plci
->rx_dma_magic
>> 24);
7990 if (DIVA_CAPI_SUPPORTS_NO_CANCEL(plci
->adapter
)) {
7994 dbug(1,dprintf("add_b23"));
7995 api_save_msg(bp
, "s", &plci
->B_protocol
);
7997 if(!bp
->length
&& plci
->tel
)
7999 plci
->adv_nl
= true;
8000 dbug(1,dprintf("Default adv.Nl"));
8001 add_p(plci
,LLI
,lli
);
8002 plci
->B2_prot
= 1 /*XPARENT*/;
8003 plci
->B3_prot
= 0 /*XPARENT*/;
8006 add_p(plci
, LLC
, llc
);
8008 PUT_WORD(&dlc
[1],plci
->appl
->MaxDataLength
);
8009 add_p(plci
, DLC
, dlc
);
8013 if(!bp
->length
) /*default*/
8015 dbug(1,dprintf("ret default"));
8016 add_p(plci
,LLI
,lli
);
8017 plci
->B2_prot
= 0 /*X.75 */;
8018 plci
->B3_prot
= 0 /*XPARENT*/;
8021 add_p(plci
, LLC
, llc
);
8023 PUT_WORD(&dlc
[1],plci
->appl
->MaxDataLength
);
8024 add_p(plci
, DLC
, dlc
);
8027 dbug(1,dprintf("b_prot_len=%d",(word
)bp
->length
));
8028 if((word
)bp
->length
> 256) return _WRONG_MESSAGE_FORMAT
;
8030 if(api_parse(&bp
->info
[1], (word
)bp
->length
, "wwwsssb", bp_parms
))
8032 bp_parms
[6].length
= 0;
8033 if(api_parse(&bp
->info
[1], (word
)bp
->length
, "wwwsss", bp_parms
))
8035 dbug(1,dprintf("b-form.!"));
8036 return _WRONG_MESSAGE_FORMAT
;
8039 else if (api_parse(&bp
->info
[1], (word
)bp
->length
, "wwwssss", bp_parms
))
8041 dbug(1,dprintf("b-form.!"));
8042 return _WRONG_MESSAGE_FORMAT
;
8045 if(plci
->tel
==ADV_VOICE
) /* transparent B on advanced voice */
8047 if(GET_WORD(bp_parms
[1].info
)!=1
8048 || GET_WORD(bp_parms
[2].info
)!=0) return _B2_NOT_SUPPORTED
;
8049 plci
->adv_nl
= true;
8051 else if(plci
->tel
) return _B2_NOT_SUPPORTED
;
8054 if ((GET_WORD(bp_parms
[1].info
) == B2_RTP
)
8055 && (GET_WORD(bp_parms
[2].info
) == B3_RTP
)
8056 && (plci
->adapter
->man_profile
.private_options
& (1L << PRIVATE_RTP
)))
8058 add_p(plci
,LLI
,lli
);
8059 plci
->B2_prot
= (byte
) GET_WORD(bp_parms
[1].info
);
8060 plci
->B3_prot
= (byte
) GET_WORD(bp_parms
[2].info
);
8061 llc
[1] = (plci
->call_dir
& (CALL_DIR_ORIGINATE
| CALL_DIR_FORCE_OUTG_NL
)) ? 14 : 13;
8063 add_p(plci
, LLC
, llc
);
8065 PUT_WORD(&dlc
[1],plci
->appl
->MaxDataLength
);
8066 dlc
[3] = 3; /* Addr A */
8067 dlc
[4] = 1; /* Addr B */
8068 dlc
[5] = 7; /* modulo mode */
8069 dlc
[6] = 7; /* window size */
8070 dlc
[7] = 0; /* XID len Lo */
8071 dlc
[8] = 0; /* XID len Hi */
8072 for (i
= 0; i
< bp_parms
[4].length
; i
++)
8073 dlc
[9+i
] = bp_parms
[4].info
[1+i
];
8074 dlc
[0] = (byte
)(8 + bp_parms
[4].length
);
8075 add_p(plci
, DLC
, dlc
);
8076 for (i
= 0; i
< bp_parms
[5].length
; i
++)
8077 nlc
[1+i
] = bp_parms
[5].info
[1+i
];
8078 nlc
[0] = (byte
)(bp_parms
[5].length
);
8079 add_p(plci
, NLC
, nlc
);
8085 if ((GET_WORD(bp_parms
[1].info
) >= 32)
8086 || (!((1L << GET_WORD(bp_parms
[1].info
)) & plci
->adapter
->profile
.B2_Protocols
)
8087 && ((GET_WORD(bp_parms
[1].info
) != B2_PIAFS
)
8088 || !(plci
->adapter
->man_profile
.private_options
& (1L << PRIVATE_PIAFS
)))))
8091 return _B2_NOT_SUPPORTED
;
8093 if ((GET_WORD(bp_parms
[2].info
) >= 32)
8094 || !((1L << GET_WORD(bp_parms
[2].info
)) & plci
->adapter
->profile
.B3_Protocols
))
8096 return _B3_NOT_SUPPORTED
;
8098 if ((GET_WORD(bp_parms
[1].info
) != B2_SDLC
)
8099 && ((GET_WORD(bp_parms
[0].info
) == B1_MODEM_ALL_NEGOTIATE
)
8100 || (GET_WORD(bp_parms
[0].info
) == B1_MODEM_ASYNC
)
8101 || (GET_WORD(bp_parms
[0].info
) == B1_MODEM_SYNC_HDLC
)))
8103 return (add_modem_b23 (plci
, bp_parms
));
8106 add_p(plci
,LLI
,lli
);
8108 plci
->B2_prot
= (byte
) GET_WORD(bp_parms
[1].info
);
8109 plci
->B3_prot
= (byte
) GET_WORD(bp_parms
[2].info
);
8110 if(plci
->B2_prot
==12) SAPI
= 0; /* default SAPI D-channel */
8112 if(bp_parms
[6].length
)
8114 if(api_parse(&bp_parms
[6].info
[1], (word
)bp_parms
[6].length
, "w", global_config
))
8116 return _WRONG_MESSAGE_FORMAT
;
8118 switch(GET_WORD(global_config
[0].info
))
8121 plci
->call_dir
= (plci
->call_dir
& ~CALL_DIR_ANSWER
) | CALL_DIR_ORIGINATE
;
8124 plci
->call_dir
= (plci
->call_dir
& ~CALL_DIR_ORIGINATE
) | CALL_DIR_ANSWER
;
8128 dbug(1,dprintf("call_dir=%04x", plci
->call_dir
));
8131 if (plci
->B2_prot
== B2_PIAFS
)
8134 /* IMPLEMENT_PIAFS */
8136 llc
[1] = (plci
->call_dir
& (CALL_DIR_ORIGINATE
| CALL_DIR_FORCE_OUTG_NL
)) ?
8137 llc2_out
[GET_WORD(bp_parms
[1].info
)] : llc2_in
[GET_WORD(bp_parms
[1].info
)];
8139 llc
[2] = llc3
[GET_WORD(bp_parms
[2].info
)];
8141 add_p(plci
, LLC
, llc
);
8144 PUT_WORD(&dlc
[1], plci
->appl
->MaxDataLength
+
8145 header
[GET_WORD(bp_parms
[2].info
)]);
8147 b1_config
= &bp_parms
[3];
8149 if(plci
->B3_prot
== 4
8150 || plci
->B3_prot
== 5)
8152 for (i
=0;i
<sizeof(T30_INFO
);i
++) nlc
[i
] = 0;
8153 nlc
[0] = sizeof(T30_INFO
);
8154 if (plci
->adapter
->manufacturer_features
& MANUFACTURER_FEATURE_FAX_PAPER_FORMATS
)
8155 ((T30_INFO
*)&nlc
[1])->operating_mode
= T30_OPERATING_MODE_CAPI
;
8156 ((T30_INFO
*)&nlc
[1])->rate_div_2400
= 0xff;
8157 if(b1_config
->length
>=2)
8159 ((T30_INFO
*)&nlc
[1])->rate_div_2400
= (byte
)(GET_WORD(&b1_config
->info
[1])/2400);
8162 b2_config
= &bp_parms
[4];
8165 if (llc
[1] == PIAFS_CRC
)
8167 if (plci
->B3_prot
!= B3_TRANSPARENT
)
8169 return _B_STACK_NOT_SUPPORTED
;
8171 if(b2_config
->length
&& api_parse(&b2_config
->info
[1], (word
)b2_config
->length
, "bwww", b2_config_parms
)) {
8172 return _WRONG_MESSAGE_FORMAT
;
8174 PUT_WORD(&dlc
[1],plci
->appl
->MaxDataLength
);
8175 dlc
[3] = 0; /* Addr A */
8176 dlc
[4] = 0; /* Addr B */
8177 dlc
[5] = 0; /* modulo mode */
8178 dlc
[6] = 0; /* window size */
8179 if (b2_config
->length
>= 7){
8182 dlc
[ 9] = b2_config_parms
[0].info
[0]; /* PIAFS protocol Speed configuration */
8183 dlc
[10] = b2_config_parms
[1].info
[0]; /* V.42bis P0 */
8184 dlc
[11] = b2_config_parms
[1].info
[1]; /* V.42bis P0 */
8185 dlc
[12] = b2_config_parms
[2].info
[0]; /* V.42bis P1 */
8186 dlc
[13] = b2_config_parms
[2].info
[1]; /* V.42bis P1 */
8187 dlc
[14] = b2_config_parms
[3].info
[0]; /* V.42bis P2 */
8188 dlc
[15] = b2_config_parms
[3].info
[1]; /* V.42bis P2 */
8190 if(b2_config
->length
>= 8) { /* PIAFS control abilities */
8192 dlc
[16] = 2; /* Length of PIAFS extension */
8193 dlc
[17] = PIAFS_UDATA_ABILITIES
; /* control (UDATA) ability */
8194 dlc
[18] = b2_config_parms
[4].info
[0]; /* value */
8198 else /* default values, 64K, variable, no compression */
8202 dlc
[ 9] = 0x03; /* PIAFS protocol Speed configuration */
8203 dlc
[10] = 0x03; /* V.42bis P0 */
8204 dlc
[11] = 0; /* V.42bis P0 */
8205 dlc
[12] = 0; /* V.42bis P1 */
8206 dlc
[13] = 0; /* V.42bis P1 */
8207 dlc
[14] = 0; /* V.42bis P2 */
8208 dlc
[15] = 0; /* V.42bis P2 */
8211 add_p(plci
, DLC
, dlc
);
8215 if ((llc
[1] == V120_L2
) || (llc
[1] == V120_V42BIS
))
8217 if (plci
->B3_prot
!= B3_TRANSPARENT
)
8218 return _B_STACK_NOT_SUPPORTED
;
8221 PUT_WORD (&dlc
[1], GET_WORD (&dlc
[1]) + 2);
8226 if (b2_config
->length
!= 0)
8228 if((llc
[1]==V120_V42BIS
) && api_parse(&b2_config
->info
[1], (word
)b2_config
->length
, "bbbbwww", b2_config_parms
)) {
8229 return _WRONG_MESSAGE_FORMAT
;
8231 dlc
[3] = (byte
)((b2_config
->info
[2] << 3) | ((b2_config
->info
[1] >> 5) & 0x04));
8232 dlc
[4] = (byte
)((b2_config
->info
[1] << 1) | 0x01);
8233 if (b2_config
->info
[3] != 128)
8235 dbug(1,dprintf("1D-dlc= %x %x %x %x %x", dlc
[0], dlc
[1], dlc
[2], dlc
[3], dlc
[4]));
8236 return _B2_PARM_NOT_SUPPORTED
;
8238 dlc
[5] = (byte
)(b2_config
->info
[3] - 1);
8239 dlc
[6] = b2_config
->info
[4];
8240 if(llc
[1]==V120_V42BIS
){
8241 if (b2_config
->length
>= 10){
8244 dlc
[ 9] = b2_config_parms
[4].info
[0];
8245 dlc
[10] = b2_config_parms
[4].info
[1];
8246 dlc
[11] = b2_config_parms
[5].info
[0];
8247 dlc
[12] = b2_config_parms
[5].info
[1];
8248 dlc
[13] = b2_config_parms
[6].info
[0];
8249 dlc
[14] = b2_config_parms
[6].info
[1];
8251 dbug(1,dprintf("b2_config_parms[4].info[0] [1]: %x %x", b2_config_parms
[4].info
[0], b2_config_parms
[4].info
[1]));
8252 dbug(1,dprintf("b2_config_parms[5].info[0] [1]: %x %x", b2_config_parms
[5].info
[0], b2_config_parms
[5].info
[1]));
8253 dbug(1,dprintf("b2_config_parms[6].info[0] [1]: %x %x", b2_config_parms
[6].info
[0], b2_config_parms
[6].info
[1]));
8263 if(b2_config
->length
)
8265 dbug(1,dprintf("B2-Config"));
8266 if(llc
[1]==X75_V42BIS
){
8267 if(api_parse(&b2_config
->info
[1], (word
)b2_config
->length
, "bbbbwww", b2_config_parms
))
8269 return _WRONG_MESSAGE_FORMAT
;
8273 if(api_parse(&b2_config
->info
[1], (word
)b2_config
->length
, "bbbbs", b2_config_parms
))
8275 return _WRONG_MESSAGE_FORMAT
;
8278 /* if B2 Protocol is LAPD, b2_config structure is different */
8282 if(b2_config
->length
>=1) dlc
[2] = b2_config
->info
[1]; /* TEI */
8284 if( (b2_config
->length
>=2) && (plci
->B2_prot
==12) )
8286 SAPI
= b2_config
->info
[2]; /* SAPI */
8289 if( (b2_config
->length
>=3) && (b2_config
->info
[3]==128) )
8291 dlc
[3] = 127; /* Mode */
8295 dlc
[3] = 7; /* Mode */
8298 if(b2_config
->length
>=4) dlc
[4] = b2_config
->info
[4]; /* Window */
8300 dbug(1,dprintf("D-dlc[%d]=%x,%x,%x,%x", dlc
[0], dlc
[1], dlc
[2], dlc
[3], dlc
[4]));
8301 if(b2_config
->length
>5) return _B2_PARM_NOT_SUPPORTED
;
8305 dlc
[0] = (byte
)(b2_config_parms
[4].length
+6);
8306 dlc
[3] = b2_config
->info
[1];
8307 dlc
[4] = b2_config
->info
[2];
8308 if(b2_config
->info
[3]!=8 && b2_config
->info
[3]!=128){
8309 dbug(1,dprintf("1D-dlc= %x %x %x %x %x", dlc
[0], dlc
[1], dlc
[2], dlc
[3], dlc
[4]));
8310 return _B2_PARM_NOT_SUPPORTED
;
8313 dlc
[5] = (byte
)(b2_config
->info
[3]-1);
8314 dlc
[6] = b2_config
->info
[4];
8316 dbug(1,dprintf("2D-dlc= %x %x %x %x %x %x %x", dlc
[0], dlc
[1], dlc
[2], dlc
[3], dlc
[4], dlc
[5], dlc
[6]));
8317 return _B2_PARM_NOT_SUPPORTED
;
8320 if(llc
[1]==X75_V42BIS
) {
8321 if (b2_config
->length
>= 10){
8324 dlc
[ 9] = b2_config_parms
[4].info
[0];
8325 dlc
[10] = b2_config_parms
[4].info
[1];
8326 dlc
[11] = b2_config_parms
[5].info
[0];
8327 dlc
[12] = b2_config_parms
[5].info
[1];
8328 dlc
[13] = b2_config_parms
[6].info
[0];
8329 dlc
[14] = b2_config_parms
[6].info
[1];
8331 dbug(1,dprintf("b2_config_parms[4].info[0] [1]: %x %x", b2_config_parms
[4].info
[0], b2_config_parms
[4].info
[1]));
8332 dbug(1,dprintf("b2_config_parms[5].info[0] [1]: %x %x", b2_config_parms
[5].info
[0], b2_config_parms
[5].info
[1]));
8333 dbug(1,dprintf("b2_config_parms[6].info[0] [1]: %x %x", b2_config_parms
[6].info
[0], b2_config_parms
[6].info
[1]));
8341 PUT_WORD(&dlc
[7], (word
)b2_config_parms
[4].length
);
8342 for(i
=0; i
<b2_config_parms
[4].length
; i
++)
8343 dlc
[11+i
] = b2_config_parms
[4].info
[1+i
];
8348 add_p(plci
, DLC
, dlc
);
8350 b3_config
= &bp_parms
[5];
8351 if(b3_config
->length
)
8353 if(plci
->B3_prot
== 4
8354 || plci
->B3_prot
== 5)
8356 if(api_parse(&b3_config
->info
[1], (word
)b3_config
->length
, "wwss", b3_config_parms
))
8358 return _WRONG_MESSAGE_FORMAT
;
8360 i
= GET_WORD((byte
*)(b3_config_parms
[0].info
));
8361 ((T30_INFO
*)&nlc
[1])->resolution
= (byte
)(((i
& 0x0001) ||
8362 ((plci
->B3_prot
== 4) && (((byte
)(GET_WORD((byte
*)b3_config_parms
[1].info
))) != 5))) ? T30_RESOLUTION_R8_0770_OR_200
: 0);
8363 ((T30_INFO
*)&nlc
[1])->data_format
= (byte
)(GET_WORD((byte
*)b3_config_parms
[1].info
));
8364 fax_control_bits
= T30_CONTROL_BIT_ALL_FEATURES
;
8365 if ((((T30_INFO
*)&nlc
[1])->rate_div_2400
!= 0) && (((T30_INFO
*)&nlc
[1])->rate_div_2400
<= 6))
8366 fax_control_bits
&= ~T30_CONTROL_BIT_ENABLE_V34FAX
;
8367 if (plci
->adapter
->manufacturer_features
& MANUFACTURER_FEATURE_FAX_PAPER_FORMATS
)
8370 if ((plci
->requested_options_conn
| plci
->requested_options
| plci
->adapter
->requested_options_table
[plci
->appl
->Id
-1])
8371 & (1L << PRIVATE_FAX_PAPER_FORMATS
))
8373 ((T30_INFO
*)&nlc
[1])->resolution
|= T30_RESOLUTION_R8_1540
|
8374 T30_RESOLUTION_R16_1540_OR_400
| T30_RESOLUTION_300_300
|
8375 T30_RESOLUTION_INCH_BASED
| T30_RESOLUTION_METRIC_BASED
;
8378 ((T30_INFO
*)&nlc
[1])->recording_properties
=
8379 T30_RECORDING_WIDTH_ISO_A3
|
8380 (T30_RECORDING_LENGTH_UNLIMITED
<< 2) |
8381 (T30_MIN_SCANLINE_TIME_00_00_00
<< 4);
8383 if(plci
->B3_prot
== 5)
8385 if (i
& 0x0002) /* Accept incoming fax-polling requests */
8386 fax_control_bits
|= T30_CONTROL_BIT_ACCEPT_POLLING
;
8387 if (i
& 0x2000) /* Do not use MR compression */
8388 fax_control_bits
&= ~T30_CONTROL_BIT_ENABLE_2D_CODING
;
8389 if (i
& 0x4000) /* Do not use MMR compression */
8390 fax_control_bits
&= ~T30_CONTROL_BIT_ENABLE_T6_CODING
;
8391 if (i
& 0x8000) /* Do not use ECM */
8392 fax_control_bits
&= ~T30_CONTROL_BIT_ENABLE_ECM
;
8393 if (plci
->fax_connect_info_length
!= 0)
8395 ((T30_INFO
*)&nlc
[1])->resolution
= ((T30_INFO
*)plci
->fax_connect_info_buffer
)->resolution
;
8396 ((T30_INFO
*)&nlc
[1])->data_format
= ((T30_INFO
*)plci
->fax_connect_info_buffer
)->data_format
;
8397 ((T30_INFO
*)&nlc
[1])->recording_properties
= ((T30_INFO
*)plci
->fax_connect_info_buffer
)->recording_properties
;
8398 fax_control_bits
|= GET_WORD(&((T30_INFO
*)plci
->fax_connect_info_buffer
)->control_bits_low
) &
8399 (T30_CONTROL_BIT_REQUEST_POLLING
| T30_CONTROL_BIT_MORE_DOCUMENTS
);
8402 /* copy station id to NLC */
8403 for(i
=0; i
< T30_MAX_STATION_ID_LENGTH
; i
++)
8405 if(i
<b3_config_parms
[2].length
)
8407 ((T30_INFO
*)&nlc
[1])->station_id
[i
] = ((byte
*)b3_config_parms
[2].info
)[1+i
];
8411 ((T30_INFO
*)&nlc
[1])->station_id
[i
] = ' ';
8414 ((T30_INFO
*)&nlc
[1])->station_id_len
= T30_MAX_STATION_ID_LENGTH
;
8415 /* copy head line to NLC */
8416 if(b3_config_parms
[3].length
)
8419 pos
= (byte
)(fax_head_line_time (&(((T30_INFO
*)&nlc
[1])->station_id
[T30_MAX_STATION_ID_LENGTH
])));
8422 if (CAPI_MAX_DATE_TIME_LENGTH
+ 2 + b3_config_parms
[3].length
> CAPI_MAX_HEAD_LINE_SPACE
)
8426 nlc
[1 + offsetof(T30_INFO
, station_id
) + T30_MAX_STATION_ID_LENGTH
+ pos
++] = ' ';
8427 nlc
[1 + offsetof(T30_INFO
, station_id
) + T30_MAX_STATION_ID_LENGTH
+ pos
++] = ' ';
8428 len
= (byte
)b3_config_parms
[2].length
;
8431 if (CAPI_MAX_DATE_TIME_LENGTH
+ 2 + len
+ 2 + b3_config_parms
[3].length
<= CAPI_MAX_HEAD_LINE_SPACE
)
8433 for (i
= 0; i
< len
; i
++)
8434 nlc
[1 + offsetof(T30_INFO
, station_id
) + T30_MAX_STATION_ID_LENGTH
+ pos
++] = ((byte
*)b3_config_parms
[2].info
)[1+i
];
8435 nlc
[1 + offsetof(T30_INFO
, station_id
) + T30_MAX_STATION_ID_LENGTH
+ pos
++] = ' ';
8436 nlc
[1 + offsetof(T30_INFO
, station_id
) + T30_MAX_STATION_ID_LENGTH
+ pos
++] = ' ';
8441 len
= (byte
)b3_config_parms
[3].length
;
8442 if (len
> CAPI_MAX_HEAD_LINE_SPACE
- pos
)
8443 len
= (byte
)(CAPI_MAX_HEAD_LINE_SPACE
- pos
);
8444 ((T30_INFO
*)&nlc
[1])->head_line_len
= (byte
)(pos
+ len
);
8445 nlc
[0] += (byte
)(pos
+ len
);
8446 for (i
= 0; i
< len
; i
++)
8447 nlc
[1 + offsetof(T30_INFO
, station_id
) + T30_MAX_STATION_ID_LENGTH
+ pos
++] = ((byte
*)b3_config_parms
[3].info
)[1+i
];
8449 ((T30_INFO
*)&nlc
[1])->head_line_len
= 0;
8451 plci
->nsf_control_bits
= 0;
8452 if(plci
->B3_prot
== 5)
8454 if ((plci
->adapter
->man_profile
.private_options
& (1L << PRIVATE_FAX_SUB_SEP_PWD
))
8455 && (GET_WORD((byte
*)b3_config_parms
[1].info
) & 0x8000)) /* Private SUB/SEP/PWD enable */
8457 plci
->requested_options
|= 1L << PRIVATE_FAX_SUB_SEP_PWD
;
8459 if ((plci
->adapter
->man_profile
.private_options
& (1L << PRIVATE_FAX_NONSTANDARD
))
8460 && (GET_WORD((byte
*)b3_config_parms
[1].info
) & 0x4000)) /* Private non-standard facilities enable */
8462 plci
->requested_options
|= 1L << PRIVATE_FAX_NONSTANDARD
;
8464 if ((plci
->requested_options_conn
| plci
->requested_options
| plci
->adapter
->requested_options_table
[plci
->appl
->Id
-1])
8465 & ((1L << PRIVATE_FAX_SUB_SEP_PWD
) | (1L << PRIVATE_FAX_NONSTANDARD
)))
8467 if ((plci
->requested_options_conn
| plci
->requested_options
| plci
->adapter
->requested_options_table
[plci
->appl
->Id
-1])
8468 & (1L << PRIVATE_FAX_SUB_SEP_PWD
))
8470 fax_control_bits
|= T30_CONTROL_BIT_ACCEPT_SUBADDRESS
| T30_CONTROL_BIT_ACCEPT_PASSWORD
;
8471 if (fax_control_bits
& T30_CONTROL_BIT_ACCEPT_POLLING
)
8472 fax_control_bits
|= T30_CONTROL_BIT_ACCEPT_SEL_POLLING
;
8475 pos
= offsetof(T30_INFO
, station_id
) + T30_MAX_STATION_ID_LENGTH
;
8476 if (pos
< plci
->fax_connect_info_length
)
8478 for (i
= 1 + plci
->fax_connect_info_buffer
[pos
]; i
!= 0; i
--)
8479 nlc
[++len
] = plci
->fax_connect_info_buffer
[pos
++];
8483 if (pos
< plci
->fax_connect_info_length
)
8485 for (i
= 1 + plci
->fax_connect_info_buffer
[pos
]; i
!= 0; i
--)
8486 nlc
[++len
] = plci
->fax_connect_info_buffer
[pos
++];
8490 if ((plci
->requested_options_conn
| plci
->requested_options
| plci
->adapter
->requested_options_table
[plci
->appl
->Id
-1])
8491 & (1L << PRIVATE_FAX_NONSTANDARD
))
8493 if ((pos
< plci
->fax_connect_info_length
) && (plci
->fax_connect_info_buffer
[pos
] != 0))
8495 if ((plci
->fax_connect_info_buffer
[pos
] >= 3) && (plci
->fax_connect_info_buffer
[pos
+1] >= 2))
8496 plci
->nsf_control_bits
= GET_WORD(&plci
->fax_connect_info_buffer
[pos
+2]);
8497 for (i
= 1 + plci
->fax_connect_info_buffer
[pos
]; i
!= 0; i
--)
8498 nlc
[++len
] = plci
->fax_connect_info_buffer
[pos
++];
8502 if(api_parse(&b3_config
->info
[1], (word
)b3_config
->length
, "wwsss", b3_config_parms
))
8504 dbug(1,dprintf("non-standard facilities info missing or wrong format"));
8509 if ((b3_config_parms
[4].length
>= 3) && (b3_config_parms
[4].info
[1] >= 2))
8510 plci
->nsf_control_bits
= GET_WORD(&b3_config_parms
[4].info
[2]);
8511 nlc
[++len
] = (byte
)(b3_config_parms
[4].length
);
8512 for (i
= 0; i
< b3_config_parms
[4].length
; i
++)
8513 nlc
[++len
] = b3_config_parms
[4].info
[1+i
];
8518 if ((plci
->nsf_control_bits
& T30_NSF_CONTROL_BIT_ENABLE_NSF
)
8519 && (plci
->nsf_control_bits
& T30_NSF_CONTROL_BIT_NEGOTIATE_RESP
))
8521 ((T30_INFO
*)&nlc
[1])->operating_mode
= T30_OPERATING_MODE_CAPI_NEG
;
8526 PUT_WORD(&(((T30_INFO
*)&nlc
[1])->control_bits_low
), fax_control_bits
);
8527 len
= offsetof(T30_INFO
, station_id
) + T30_MAX_STATION_ID_LENGTH
;
8528 for (i
= 0; i
< len
; i
++)
8529 plci
->fax_connect_info_buffer
[i
] = nlc
[1+i
];
8530 ((T30_INFO
*) plci
->fax_connect_info_buffer
)->head_line_len
= 0;
8531 i
+= ((T30_INFO
*)&nlc
[1])->head_line_len
;
8533 plci
->fax_connect_info_buffer
[len
++] = nlc
[++i
];
8534 plci
->fax_connect_info_length
= len
;
8539 if(b3_config
->length
!=16)
8540 return _B3_PARM_NOT_SUPPORTED
;
8541 for(i
=0; i
<12; i
++) nlc
[1+i
] = b3_config
->info
[1+i
];
8542 if(GET_WORD(&b3_config
->info
[13])!=8 && GET_WORD(&b3_config
->info
[13])!=128)
8543 return _B3_PARM_NOT_SUPPORTED
;
8544 nlc
[13] = b3_config
->info
[13];
8545 if(GET_WORD(&b3_config
->info
[15])>=nlc
[13])
8546 return _B3_PARM_NOT_SUPPORTED
;
8547 nlc
[14] = b3_config
->info
[15];
8552 if (plci
->B3_prot
== 4
8553 || plci
->B3_prot
== 5 /*T.30 - FAX*/ ) return _B3_PARM_NOT_SUPPORTED
;
8555 add_p(plci
, NLC
, nlc
);
8559 /*----------------------------------------------------------------*/
8560 /* make the same as add_b23, but only for the modem related */
8561 /* L2 and L3 B-Chan protocol. */
8563 /* Enabled L2 and L3 Configurations: */
8564 /* If L1 == Modem all negotiation */
8565 /* only L2 == Modem with full negotiation is allowed */
8566 /* If L1 == Modem async or sync */
8567 /* only L2 == Transparent is allowed */
8568 /* L3 == Modem or L3 == Transparent are allowed */
8569 /* B2 Configuration for modem: */
8570 /* word : enable/disable compression, bitoptions */
8571 /* B3 Configuration for modem: */
8573 /*----------------------------------------------------------------*/
8574 static word
add_modem_b23 (PLCI
* plci
, API_PARSE
* bp_parms
)
8576 static byte lli
[12] = {1,1};
8577 static byte llc
[3] = {2,0,0};
8578 static byte dlc
[16] = {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0};
8579 API_PARSE mdm_config
[2];
8583 for(i
=0;i
<2;i
++) mdm_config
[i
].length
= 0;
8584 for(i
=0;i
<sizeof(dlc
);i
++) dlc
[i
] = 0;
8586 if (((GET_WORD(bp_parms
[0].info
) == B1_MODEM_ALL_NEGOTIATE
)
8587 && (GET_WORD(bp_parms
[1].info
) != B2_MODEM_EC_COMPRESSION
))
8588 || ((GET_WORD(bp_parms
[0].info
) != B1_MODEM_ALL_NEGOTIATE
)
8589 && (GET_WORD(bp_parms
[1].info
) != B2_TRANSPARENT
)))
8591 return (_B_STACK_NOT_SUPPORTED
);
8593 if ((GET_WORD(bp_parms
[2].info
) != B3_MODEM
)
8594 && (GET_WORD(bp_parms
[2].info
) != B3_TRANSPARENT
))
8596 return (_B_STACK_NOT_SUPPORTED
);
8599 plci
->B2_prot
= (byte
) GET_WORD(bp_parms
[1].info
);
8600 plci
->B3_prot
= (byte
) GET_WORD(bp_parms
[2].info
);
8602 if ((GET_WORD(bp_parms
[1].info
) == B2_MODEM_EC_COMPRESSION
) && bp_parms
[4].length
)
8604 if (api_parse (&bp_parms
[4].info
[1],
8605 (word
)bp_parms
[4].length
, "w",
8608 return (_WRONG_MESSAGE_FORMAT
);
8610 b2_config
= GET_WORD(mdm_config
[0].info
);
8613 /* OK, L2 is modem */
8617 if (plci
->adapter
->manufacturer_features
& MANUFACTURER_FEATURE_XONOFF_FLOW_CONTROL
)
8619 if (plci
->adapter
->manufacturer_features
& MANUFACTURER_FEATURE_OOB_CHANNEL
)
8622 if ((lli
[1] & 0x02) && (diva_xdi_extended_features
& DIVA_CAPI_USE_CMA
)) {
8624 if (plci
->rx_dma_descriptor
<= 0) {
8625 plci
->rx_dma_descriptor
=diva_get_dma_descriptor(plci
,&plci
->rx_dma_magic
);
8626 if (plci
->rx_dma_descriptor
>= 0)
8627 plci
->rx_dma_descriptor
++;
8629 if (plci
->rx_dma_descriptor
> 0) {
8632 lli
[2] = (byte
)(plci
->rx_dma_descriptor
- 1);
8633 lli
[3] = (byte
)plci
->rx_dma_magic
;
8634 lli
[4] = (byte
)(plci
->rx_dma_magic
>> 8);
8635 lli
[5] = (byte
)(plci
->rx_dma_magic
>> 16);
8636 lli
[6] = (byte
)(plci
->rx_dma_magic
>> 24);
8640 if (DIVA_CAPI_SUPPORTS_NO_CANCEL(plci
->adapter
)) {
8644 llc
[1] = (plci
->call_dir
& (CALL_DIR_ORIGINATE
| CALL_DIR_FORCE_OUTG_NL
)) ?
8645 /*V42*/ 10 : /*V42_IN*/ 9;
8646 llc
[2] = 4; /* pass L3 always transparent */
8647 add_p(plci
, LLI
, lli
);
8648 add_p(plci
, LLC
, llc
);
8650 PUT_WORD (&dlc
[i
], plci
->appl
->MaxDataLength
);
8652 if (GET_WORD(bp_parms
[1].info
) == B2_MODEM_EC_COMPRESSION
)
8654 if (bp_parms
[4].length
)
8656 dbug(1, dprintf("MDM b2_config=%02x", b2_config
));
8657 dlc
[i
++] = 3; /* Addr A */
8658 dlc
[i
++] = 1; /* Addr B */
8659 dlc
[i
++] = 7; /* modulo mode */
8660 dlc
[i
++] = 7; /* window size */
8661 dlc
[i
++] = 0; /* XID len Lo */
8662 dlc
[i
++] = 0; /* XID len Hi */
8664 if (b2_config
& MDM_B2_DISABLE_V42bis
)
8666 dlc
[i
] |= DLC_MODEMPROT_DISABLE_V42_V42BIS
;
8668 if (b2_config
& MDM_B2_DISABLE_MNP
)
8670 dlc
[i
] |= DLC_MODEMPROT_DISABLE_MNP_MNP5
;
8672 if (b2_config
& MDM_B2_DISABLE_TRANS
)
8674 dlc
[i
] |= DLC_MODEMPROT_REQUIRE_PROTOCOL
;
8676 if (b2_config
& MDM_B2_DISABLE_V42
)
8678 dlc
[i
] |= DLC_MODEMPROT_DISABLE_V42_DETECT
;
8680 if (b2_config
& MDM_B2_DISABLE_COMP
)
8682 dlc
[i
] |= DLC_MODEMPROT_DISABLE_COMPRESSION
;
8689 dlc
[i
++] = 3; /* Addr A */
8690 dlc
[i
++] = 1; /* Addr B */
8691 dlc
[i
++] = 7; /* modulo mode */
8692 dlc
[i
++] = 7; /* window size */
8693 dlc
[i
++] = 0; /* XID len Lo */
8694 dlc
[i
++] = 0; /* XID len Hi */
8695 dlc
[i
++] = DLC_MODEMPROT_DISABLE_V42_V42BIS
|
8696 DLC_MODEMPROT_DISABLE_MNP_MNP5
|
8697 DLC_MODEMPROT_DISABLE_V42_DETECT
|
8698 DLC_MODEMPROT_DISABLE_COMPRESSION
;
8700 dlc
[0] = (byte
)(i
- 1);
8701 /* HexDump ("DLC", sizeof(dlc), &dlc[0]); */
8702 add_p(plci
, DLC
, dlc
);
8707 /*------------------------------------------------------------------*/
8708 /* send a request for the signaling entity */
8709 /*------------------------------------------------------------------*/
8711 static void sig_req(PLCI
*plci
, byte req
, byte Id
)
8714 if(plci
->adapter
->adapter_disabled
) return;
8715 dbug(1,dprintf("sig_req(%x)",req
));
8717 plci
->sig_remove_id
= plci
->Sig
.Id
;
8718 if(plci
->req_in
==plci
->req_in_start
) {
8720 plci
->RBuffer
[plci
->req_in
++] = 0;
8722 PUT_WORD(&plci
->RBuffer
[plci
->req_in_start
], plci
->req_in
-plci
->req_in_start
-2);
8723 plci
->RBuffer
[plci
->req_in
++] = Id
; /* sig/nl flag */
8724 plci
->RBuffer
[plci
->req_in
++] = req
; /* request */
8725 plci
->RBuffer
[plci
->req_in
++] = 0; /* channel */
8726 plci
->req_in_start
= plci
->req_in
;
8729 /*------------------------------------------------------------------*/
8730 /* send a request for the network layer entity */
8731 /*------------------------------------------------------------------*/
8733 static void nl_req_ncci(PLCI
*plci
, byte req
, byte ncci
)
8736 if(plci
->adapter
->adapter_disabled
) return;
8737 dbug(1,dprintf("nl_req %02x %02x %02x", plci
->Id
, req
, ncci
));
8740 plci
->nl_remove_id
= plci
->NL
.Id
;
8741 ncci_remove (plci
, 0, (byte
)(ncci
!= 0));
8744 if(plci
->req_in
==plci
->req_in_start
) {
8746 plci
->RBuffer
[plci
->req_in
++] = 0;
8748 PUT_WORD(&plci
->RBuffer
[plci
->req_in_start
], plci
->req_in
-plci
->req_in_start
-2);
8749 plci
->RBuffer
[plci
->req_in
++] = 1; /* sig/nl flag */
8750 plci
->RBuffer
[plci
->req_in
++] = req
; /* request */
8751 plci
->RBuffer
[plci
->req_in
++] = plci
->adapter
->ncci_ch
[ncci
]; /* channel */
8752 plci
->req_in_start
= plci
->req_in
;
8755 static void send_req(PLCI
*plci
)
8762 if(plci
->adapter
->adapter_disabled
) return;
8763 channel_xmit_xon (plci
);
8765 /* if nothing to do, return */
8766 if(plci
->req_in
==plci
->req_out
) return;
8767 dbug(1,dprintf("send_req(in=%d,out=%d)",plci
->req_in
,plci
->req_out
));
8769 if(plci
->nl_req
|| plci
->sig_req
) return;
8771 l
= GET_WORD(&plci
->RBuffer
[plci
->req_out
]);
8773 plci
->XData
[0].P
= &plci
->RBuffer
[plci
->req_out
];
8775 if(plci
->RBuffer
[plci
->req_out
]==1)
8779 e
->Req
= plci
->nl_req
= plci
->RBuffer
[plci
->req_out
++];
8780 e
->ReqCh
= plci
->RBuffer
[plci
->req_out
++];
8784 plci
->RBuffer
[plci
->req_out
-4] = CAI
;
8785 plci
->RBuffer
[plci
->req_out
-3] = 1;
8786 plci
->RBuffer
[plci
->req_out
-2] = (plci
->Sig
.Id
==0xff) ? 0 : plci
->Sig
.Id
;
8787 plci
->RBuffer
[plci
->req_out
-1] = 0;
8789 plci
->nl_global_req
= plci
->nl_req
;
8791 dbug(1,dprintf("%x:NLREQ(%x:%x:%x)",plci
->adapter
->Id
,e
->Id
,e
->Req
,e
->ReqCh
));
8796 if(plci
->RBuffer
[plci
->req_out
])
8797 e
->Id
= plci
->RBuffer
[plci
->req_out
];
8799 e
->Req
= plci
->sig_req
= plci
->RBuffer
[plci
->req_out
++];
8800 e
->ReqCh
= plci
->RBuffer
[plci
->req_out
++];
8802 plci
->sig_global_req
= plci
->sig_req
;
8803 dbug(1,dprintf("%x:SIGREQ(%x:%x:%x)",plci
->adapter
->Id
,e
->Id
,e
->Req
,e
->ReqCh
));
8805 plci
->XData
[0].PLength
= l
;
8807 plci
->adapter
->request(e
);
8808 dbug(1,dprintf("send_ok"));
8811 static void send_data(PLCI
*plci
)
8813 DIVA_CAPI_ADAPTER
* a
;
8814 DATA_B3_DESC
* data
;
8818 if (!plci
->nl_req
&& plci
->ncci_ring_list
)
8821 ncci
= plci
->ncci_ring_list
;
8824 ncci
= a
->ncci_next
[ncci
];
8825 ncci_ptr
= &(a
->ncci
[ncci
]);
8826 if (!(a
->ncci_ch
[ncci
]
8827 && (a
->ch_flow_control
[a
->ncci_ch
[ncci
]] & N_OK_FC_PENDING
)))
8829 if (ncci_ptr
->data_pending
)
8831 if ((a
->ncci_state
[ncci
] == CONNECTED
)
8832 || (a
->ncci_state
[ncci
] == INC_ACT_PENDING
)
8833 || (plci
->send_disc
== ncci
))
8835 data
= &(ncci_ptr
->DBuffer
[ncci_ptr
->data_out
]);
8836 if ((plci
->B2_prot
== B2_V120_ASYNC
)
8837 || (plci
->B2_prot
== B2_V120_ASYNC_V42BIS
)
8838 || (plci
->B2_prot
== B2_V120_BIT_TRANSPARENT
))
8840 plci
->NData
[1].P
= TransmitBufferGet (plci
->appl
, data
->P
);
8841 plci
->NData
[1].PLength
= data
->Length
;
8842 if (data
->Flags
& 0x10)
8843 plci
->NData
[0].P
= v120_break_header
;
8845 plci
->NData
[0].P
= v120_default_header
;
8846 plci
->NData
[0].PLength
= 1 ;
8848 plci
->NL
.Req
= plci
->nl_req
= (byte
)((data
->Flags
&0x07)<<4 |N_DATA
);
8852 plci
->NData
[0].P
= TransmitBufferGet (plci
->appl
, data
->P
);
8853 plci
->NData
[0].PLength
= data
->Length
;
8854 if (data
->Flags
& 0x10)
8855 plci
->NL
.Req
= plci
->nl_req
= (byte
)N_UDATA
;
8857 else if ((plci
->B3_prot
== B3_RTP
) && (data
->Flags
& 0x01))
8858 plci
->NL
.Req
= plci
->nl_req
= (byte
)N_BDATA
;
8861 plci
->NL
.Req
= plci
->nl_req
= (byte
)((data
->Flags
&0x07)<<4 |N_DATA
);
8863 plci
->NL
.X
= plci
->NData
;
8864 plci
->NL
.ReqCh
= a
->ncci_ch
[ncci
];
8865 dbug(1,dprintf("%x:DREQ(%x:%x)",a
->Id
,plci
->NL
.Id
,plci
->NL
.Req
));
8866 plci
->data_sent
= true;
8867 plci
->data_sent_ptr
= data
->P
;
8868 a
->request(&plci
->NL
);
8871 cleanup_ncci_data (plci
, ncci
);
8874 else if (plci
->send_disc
== ncci
)
8876 /* dprintf("N_DISC"); */
8877 plci
->NData
[0].PLength
= 0;
8878 plci
->NL
.ReqCh
= a
->ncci_ch
[ncci
];
8879 plci
->NL
.Req
= plci
->nl_req
= N_DISC
;
8880 a
->request(&plci
->NL
);
8881 plci
->command
= _DISCONNECT_B3_R
;
8882 plci
->send_disc
= 0;
8885 } while (!plci
->nl_req
&& (ncci
!= plci
->ncci_ring_list
));
8886 plci
->ncci_ring_list
= ncci
;
8890 static void listen_check(DIVA_CAPI_ADAPTER
*a
)
8894 byte activnotifiedcalls
= 0;
8896 dbug(1,dprintf("listen_check(%d,%d)",a
->listen_active
,a
->max_listen
));
8897 if (!remove_started
&& !a
->adapter_disabled
)
8899 for(i
=0;i
<a
->max_plci
;i
++)
8901 plci
= &(a
->plci
[i
]);
8902 if(plci
->notifiedcall
) activnotifiedcalls
++;
8904 dbug(1,dprintf("listen_check(%d)",activnotifiedcalls
));
8906 for(i
=a
->listen_active
; i
< ((word
)(a
->max_listen
+activnotifiedcalls
)); i
++) {
8907 if((j
=get_plci(a
))) {
8909 plci
= &a
->plci
[j
-1];
8910 plci
->State
= LISTENING
;
8912 add_p(plci
,OAD
,"\x01\xfd");
8914 add_p(plci
,KEY
,"\x04\x43\x41\x32\x30");
8916 add_p(plci
,CAI
,"\x01\xc0");
8917 add_p(plci
,UID
,"\x06\x43\x61\x70\x69\x32\x30");
8918 add_p(plci
,LLI
,"\x01\xc4"); /* support Dummy CR FAC + MWI + SpoofNotify */
8919 add_p(plci
,SHIFT
|6,NULL
);
8920 add_p(plci
,SIN
,"\x02\x00\x00");
8921 plci
->internal_command
= LISTEN_SIG_ASSIGN_PEND
; /* do indicate_req if OK */
8922 sig_req(plci
,ASSIGN
,DSIG_ID
);
8929 /*------------------------------------------------------------------*/
8930 /* functions for all parameters sent in INDs */
8931 /*------------------------------------------------------------------*/
8933 static void IndParse(PLCI
*plci
, word
*parms_id
, byte
**parms
, byte multiIEsize
)
8935 word ploc
; /* points to current location within packet */
8947 in
= plci
->Sig
.RBuffer
->P
;
8948 for(i
=0; i
<parms_id
[0]; i
++) /* multiIE parms_id contains just the 1st */
8949 { /* element but parms array is larger */
8950 parms
[i
] = (byte
*)"";
8952 for(i
=0; i
<multiIEsize
; i
++)
8954 parms
[i
] = (byte
*)"";
8957 while(ploc
<plci
->Sig
.RBuffer
->length
-1) {
8959 /* read information element id and length */
8963 /* w &=0xf0; removed, cannot detect congestion levels */
8964 /* upper 4 bit masked with w==SHIFT now */
8968 wlen
= (byte
)(in
[ploc
+1]+1);
8970 /* check if length valid (not exceeding end of packet) */
8971 if((ploc
+wlen
) > 270) return ;
8972 if(lock
& 0x80) lock
&=0x7f;
8973 else codeset
= lock
;
8975 if((w
&0xf0)==SHIFT
) {
8977 if(!(codeset
& 0x08)) lock
= (byte
)(codeset
& 7);
8982 if(w
==ESC
&& wlen
>=3) code
= in
[ploc
+2] |0x800;
8984 code
|= (codeset
<<8);
8986 for(i
=1; i
<parms_id
[0]+1 && parms_id
[i
]!=code
; i
++);
8988 if(i
<parms_id
[0]+1) {
8989 if(!multiIEsize
) { /* with multiIEs use next field index, */
8990 mIEindex
= i
-1; /* with normal IEs use same index like parms_id */
8993 parms
[mIEindex
] = &in
[ploc
+1];
8994 dbug(1,dprintf("mIE[%d]=0x%x",*parms
[mIEindex
],in
[ploc
]));
8996 || parms_id
[i
]==CONN_NR
8997 || parms_id
[i
]==CAD
) {
8998 if(in
[ploc
+2] &0x80) {
8999 in
[ploc
+0] = (byte
)(in
[ploc
+1]+1);
9000 in
[ploc
+1] = (byte
)(in
[ploc
+2] &0x7f);
9002 parms
[mIEindex
] = &in
[ploc
];
9005 mIEindex
++; /* effects multiIEs only */
9014 /*------------------------------------------------------------------*/
9015 /* try to match a cip from received BC and HLC */
9016 /*------------------------------------------------------------------*/
9018 static byte
ie_compare(byte
*ie1
, byte
*ie2
)
9021 if(!ie1
|| ! ie2
) return false;
9022 if(!ie1
[0]) return false;
9023 for(i
=0;i
<(word
)(ie1
[0]+1);i
++) if(ie1
[i
]!=ie2
[i
]) return false;
9027 static word
find_cip(DIVA_CAPI_ADAPTER
*a
, byte
*bc
, byte
*hlc
)
9032 for(i
=9;i
&& !ie_compare(bc
,cip_bc
[i
][a
->u_law
]);i
--);
9035 (!ie_compare(bc
,cip_bc
[j
][a
->u_law
]) || !ie_compare(hlc
,cip_hlc
[j
])); j
++);
9041 static byte
AddInfo(byte
**add_i
,
9051 /* facility is a nested structure */
9052 /* FTY can be more than once */
9054 if (esc_chi
[0] && !(esc_chi
[esc_chi
[0]] & 0x7f))
9056 add_i
[0] = (byte
*)"\x02\x02\x00"; /* use neither b nor d channel */
9061 add_i
[0] = (byte
*)"";
9065 add_i
[3] = (byte
*)"";
9068 { /* facility array found */
9069 for(i
=0,j
=1;i
<MAX_MULTI_IE
&& fty_i
[i
][0];i
++)
9071 dbug(1,dprintf("AddIFac[%d]",fty_i
[i
][0]));
9075 facility
[j
++]=0x1c; /* copy fac IE */
9076 for(k
=0;k
<=flen
;k
++,j
++)
9078 facility
[j
]=fty_i
[i
][k
];
9079 /* dbug(1,dprintf("%x ",facility[j])); */
9083 add_i
[3] = facility
;
9085 /* dbug(1,dprintf("FacArrLen=%d ",len)); */
9086 len
= add_i
[0][0]+add_i
[1][0]+add_i
[2][0]+add_i
[3][0];
9087 len
+= 4; /* calculate length of all */
9091 /*------------------------------------------------------------------*/
9092 /* voice and codec features */
9093 /*------------------------------------------------------------------*/
9095 static void SetVoiceChannel(PLCI
*plci
, byte
*chi
, DIVA_CAPI_ADAPTER
*a
)
9097 byte voice_chi
[] = "\x02\x18\x01";
9100 channel
= chi
[chi
[0]]&0x3;
9101 dbug(1,dprintf("ExtDevON(Ch=0x%x)",channel
));
9102 voice_chi
[2] = (channel
) ? channel
: 1;
9103 add_p(plci
,FTY
,"\x02\x01\x07"); /* B On, default on 1 */
9104 add_p(plci
,ESC
,voice_chi
); /* Channel */
9105 sig_req(plci
,TEL_CTRL
,0);
9107 if(a
->AdvSignalPLCI
)
9109 adv_voice_write_coefs (a
->AdvSignalPLCI
, ADV_VOICE_WRITE_ACTIVATION
);
9113 static void VoiceChannelOff(PLCI
*plci
)
9115 dbug(1,dprintf("ExtDevOFF"));
9116 add_p(plci
,FTY
,"\x02\x01\x08"); /* B Off */
9117 sig_req(plci
,TEL_CTRL
,0);
9119 if(plci
->adapter
->AdvSignalPLCI
)
9121 adv_voice_clear_config (plci
->adapter
->AdvSignalPLCI
);
9126 static word
AdvCodecSupport(DIVA_CAPI_ADAPTER
*a
, PLCI
*plci
, APPL
*appl
,
9132 /* check if hardware supports handset with hook states (adv.codec) */
9133 /* or if just a on board codec is supported */
9134 /* the advanced codec plci is just for internal use */
9136 /* diva Pro with on-board codec: */
9137 if(a
->profile
.Global_Options
& HANDSET
)
9139 /* new call, but hook states are already signalled */
9142 if(a
->AdvSignalAppl
!=appl
|| a
->AdvSignalPLCI
)
9144 dbug(1,dprintf("AdvSigPlci=0x%x",a
->AdvSignalPLCI
));
9145 return 0x2001; /* codec in use by another application */
9149 a
->AdvSignalPLCI
= plci
;
9150 plci
->tel
=ADV_VOICE
;
9152 return 0; /* adv codec still used */
9156 splci
= &a
->plci
[j
-1];
9157 splci
->tel
= CODEC_PERMANENT
;
9158 /* hook_listen indicates if a facility_req with handset/hook support */
9159 /* was sent. Otherwise if just a call on an external device was made */
9160 /* the codec will be used but the hook info will be discarded (just */
9161 /* the external controller is in use */
9162 if(hook_listen
) splci
->State
= ADVANCED_VOICE_SIG
;
9165 splci
->State
= ADVANCED_VOICE_NOSIG
;
9168 plci
->spoofed_msg
= SPOOFING_REQUIRED
;
9170 /* indicate D-ch connect if */
9171 } /* codec is connected OK */
9174 a
->AdvSignalPLCI
= plci
;
9175 plci
->tel
=ADV_VOICE
;
9177 a
->AdvSignalAppl
= appl
;
9178 a
->AdvCodecFLAG
= true;
9179 a
->AdvCodecPLCI
= splci
;
9180 add_p(splci
,CAI
,"\x01\x15");
9181 add_p(splci
,LLI
,"\x01\x00");
9182 add_p(splci
,ESC
,"\x02\x18\x00");
9183 add_p(splci
,UID
,"\x06\x43\x61\x70\x69\x32\x30");
9184 splci
->internal_command
= PERM_COD_ASSIGN
;
9185 dbug(1,dprintf("Codec Assign"));
9186 sig_req(splci
,ASSIGN
,DSIG_ID
);
9191 return 0x2001; /* wrong state, no more plcis */
9194 else if(a
->profile
.Global_Options
& ON_BOARD_CODEC
)
9196 if(hook_listen
) return 0x300B; /* Facility not supported */
9197 /* no hook with SCOM */
9198 if(plci
!=NULL
) plci
->tel
= CODEC
;
9199 dbug(1,dprintf("S/SCOM codec"));
9200 /* first time we use the scom-s codec we must shut down the internal */
9201 /* handset application of the card. This can be done by an assign with */
9202 /* a cai with the 0x80 bit set. Assign return code is 'out of resource'*/
9203 if(!a
->scom_appl_disable
){
9204 if((j
=get_plci(a
))) {
9205 splci
= &a
->plci
[j
-1];
9206 add_p(splci
,CAI
,"\x01\x80");
9207 add_p(splci
,UID
,"\x06\x43\x61\x70\x69\x32\x30");
9208 sig_req(splci
,ASSIGN
,0xC0); /* 0xc0 is the TEL_ID */
9210 a
->scom_appl_disable
= true;
9213 return 0x2001; /* wrong state, no more plcis */
9217 else return 0x300B; /* Facility not supported */
9223 static void CodecIdCheck(DIVA_CAPI_ADAPTER
*a
, PLCI
*plci
)
9226 dbug(1,dprintf("CodecIdCheck"));
9228 if(a
->AdvSignalPLCI
== plci
)
9230 dbug(1,dprintf("PLCI owns codec"));
9231 VoiceChannelOff(a
->AdvCodecPLCI
);
9232 if(a
->AdvCodecPLCI
->State
== ADVANCED_VOICE_NOSIG
)
9234 dbug(1,dprintf("remove temp codec PLCI"));
9235 plci_remove(a
->AdvCodecPLCI
);
9236 a
->AdvCodecFLAG
= 0;
9237 a
->AdvCodecPLCI
= NULL
;
9238 a
->AdvSignalAppl
= NULL
;
9240 a
->AdvSignalPLCI
= NULL
;
9244 /* -------------------------------------------------------------------
9245 Ask for physical address of card on PCI bus
9246 ------------------------------------------------------------------- */
9247 static void diva_ask_for_xdi_sdram_bar (DIVA_CAPI_ADAPTER
* a
,
9248 IDI_SYNC_REQ
* preq
) {
9250 if (diva_xdi_extended_features
& DIVA_CAPI_XDI_PROVIDES_SDRAM_BAR
) {
9251 ENTITY
* e
= (ENTITY
*)preq
;
9253 e
->user
[0] = a
->Id
- 1;
9254 preq
->xdi_sdram_bar
.info
.bar
= 0;
9255 preq
->xdi_sdram_bar
.Req
= 0;
9256 preq
->xdi_sdram_bar
.Rc
= IDI_SYNC_REQ_XDI_GET_ADAPTER_SDRAM_BAR
;
9260 a
->sdram_bar
= preq
->xdi_sdram_bar
.info
.bar
;
9261 dbug(3,dprintf("A(%d) SDRAM BAR = %08x", a
->Id
, a
->sdram_bar
));
9265 /* -------------------------------------------------------------------
9266 Ask XDI about extended features
9267 ------------------------------------------------------------------- */
9268 static void diva_get_extended_adapter_features (DIVA_CAPI_ADAPTER
* a
) {
9269 IDI_SYNC_REQ
* preq
;
9270 char buffer
[ ((sizeof(preq
->xdi_extended_features
)+4) > sizeof(ENTITY
)) ? (sizeof(preq
->xdi_extended_features
)+4) : sizeof(ENTITY
)];
9273 preq
= (IDI_SYNC_REQ
*)&buffer
[0];
9275 if (!diva_xdi_extended_features
) {
9276 ENTITY
* e
= (ENTITY
*)preq
;
9277 diva_xdi_extended_features
|= 0x80000000;
9279 e
->user
[0] = a
->Id
- 1;
9280 preq
->xdi_extended_features
.Req
= 0;
9281 preq
->xdi_extended_features
.Rc
= IDI_SYNC_REQ_XDI_GET_EXTENDED_FEATURES
;
9282 preq
->xdi_extended_features
.info
.buffer_length_in_bytes
= sizeof(features
);
9283 preq
->xdi_extended_features
.info
.features
= &features
[0];
9287 if (features
[0] & DIVA_XDI_EXTENDED_FEATURES_VALID
) {
9289 Check features located in the byte '0'
9291 if (features
[0] & DIVA_XDI_EXTENDED_FEATURE_CMA
) {
9292 diva_xdi_extended_features
|= DIVA_CAPI_USE_CMA
;
9294 if (features
[0] & DIVA_XDI_EXTENDED_FEATURE_RX_DMA
) {
9295 diva_xdi_extended_features
|= DIVA_CAPI_XDI_PROVIDES_RX_DMA
;
9296 dbug(1,dprintf("XDI provides RxDMA"));
9298 if (features
[0] & DIVA_XDI_EXTENDED_FEATURE_SDRAM_BAR
) {
9299 diva_xdi_extended_features
|= DIVA_CAPI_XDI_PROVIDES_SDRAM_BAR
;
9301 if (features
[0] & DIVA_XDI_EXTENDED_FEATURE_NO_CANCEL_RC
) {
9302 diva_xdi_extended_features
|= DIVA_CAPI_XDI_PROVIDES_NO_CANCEL
;
9303 dbug(3,dprintf("XDI provides NO_CANCEL_RC feature"));
9309 diva_ask_for_xdi_sdram_bar (a
, preq
);
9312 /*------------------------------------------------------------------*/
9314 /*------------------------------------------------------------------*/
9315 /* called from OS specific part after init time to get the Law */
9316 /* a-law (Euro) and u-law (us,japan) use different BCs in the Setup message */
9317 void AutomaticLaw(DIVA_CAPI_ADAPTER
*a
)
9322 if(a
->automatic_law
) {
9325 if((j
=get_plci(a
))) {
9326 diva_get_extended_adapter_features (a
);
9327 splci
= &a
->plci
[j
-1];
9328 a
->automatic_lawPLCI
= splci
;
9329 a
->automatic_law
= 1;
9330 add_p(splci
,CAI
,"\x01\x80");
9331 add_p(splci
,UID
,"\x06\x43\x61\x70\x69\x32\x30");
9332 splci
->internal_command
= USELAW_REQ
;
9335 sig_req(splci
,ASSIGN
,DSIG_ID
);
9340 /* called from OS specific part if an application sends an Capi20Release */
9341 word
CapiRelease(word Id
)
9343 word i
, j
, appls_found
;
9346 DIVA_CAPI_ADAPTER
*a
;
9350 dbug(0,dprintf("A: CapiRelease(Id==0)"));
9351 return (_WRONG_APPL_ID
);
9354 this = &application
[Id
-1]; /* get application pointer */
9356 for(i
=0,appls_found
=0; i
<max_appl
; i
++)
9358 if(application
[i
].Id
) /* an application has been found */
9364 for(i
=0; i
<max_adapter
; i
++) /* scan all adapters... */
9369 a
->Info_Mask
[Id
-1] = 0;
9370 a
->CIP_Mask
[Id
-1] = 0;
9371 a
->Notification_Mask
[Id
-1] = 0;
9372 a
->codec_listen
[Id
-1] = NULL
;
9373 a
->requested_options_table
[Id
-1] = 0;
9374 for(j
=0; j
<a
->max_plci
; j
++) /* and all PLCIs connected */
9375 { /* with this application */
9377 if(plci
->Id
) /* if plci owns no application */
9378 { /* it may be not jet connected */
9379 if(plci
->State
==INC_CON_PENDING
9380 || plci
->State
==INC_CON_ALERT
)
9382 if(test_c_ind_mask_bit (plci
, (word
)(Id
-1)))
9384 clear_c_ind_mask_bit (plci
, (word
)(Id
-1));
9385 if(c_ind_mask_empty (plci
))
9387 sig_req(plci
,HANGUP
,0);
9389 plci
->State
= OUTG_DIS_PENDING
;
9393 if(test_c_ind_mask_bit (plci
, (word
)(Id
-1)))
9395 clear_c_ind_mask_bit (plci
, (word
)(Id
-1));
9396 if(c_ind_mask_empty (plci
))
9405 if(plci
->appl
==this)
9415 if(a
->flag_dynamic_l1_down
)
9417 if(appls_found
==1) /* last application does a capi release */
9421 plci
= &a
->plci
[j
-1];
9423 add_p(plci
,OAD
,"\x01\xfd");
9424 add_p(plci
,CAI
,"\x01\x80");
9425 add_p(plci
,UID
,"\x06\x43\x61\x70\x69\x32\x30");
9426 add_p(plci
,SHIFT
|6,NULL
);
9427 add_p(plci
,SIN
,"\x02\x00\x00");
9428 plci
->internal_command
= REM_L1_SIG_ASSIGN_PEND
;
9429 sig_req(plci
,ASSIGN
,DSIG_ID
);
9430 add_p(plci
,FTY
,"\x02\xff\x06"); /* l1 down */
9431 sig_req(plci
,SIG_CTRL
,0);
9436 if(a
->AdvSignalAppl
==this)
9438 this->NullCREnable
= false;
9439 if (a
->AdvCodecPLCI
)
9441 plci_remove(a
->AdvCodecPLCI
);
9442 a
->AdvCodecPLCI
->tel
= 0;
9443 a
->AdvCodecPLCI
->adv_nl
= 0;
9445 a
->AdvSignalAppl
= NULL
;
9446 a
->AdvSignalPLCI
= NULL
;
9447 a
->AdvCodecFLAG
= 0;
9448 a
->AdvCodecPLCI
= NULL
;
9458 static word
plci_remove_check(PLCI
*plci
)
9460 if(!plci
) return true;
9461 if(!plci
->NL
.Id
&& c_ind_mask_empty (plci
))
9463 if(plci
->Sig
.Id
== 0xff)
9467 dbug(1,dprintf("plci_remove_complete(%x)",plci
->Id
));
9468 dbug(1,dprintf("tel=0x%x,Sig=0x%x",plci
->tel
,plci
->Sig
.Id
));
9471 CodecIdCheck(plci
->adapter
, plci
);
9472 clear_b1_config (plci
);
9473 ncci_remove (plci
, 0, false);
9474 plci_free_msg_in_queue (plci
);
9475 channel_flow_control_remove (plci
);
9480 plci
->notifiedcall
= 0;
9482 listen_check(plci
->adapter
);
9490 /*------------------------------------------------------------------*/
9492 static byte
plci_nl_busy (PLCI
*plci
)
9494 /* only applicable for non-multiplexed protocols */
9495 return (plci
->nl_req
9496 || (plci
->ncci_ring_list
9497 && plci
->adapter
->ncci_ch
[plci
->ncci_ring_list
]
9498 && (plci
->adapter
->ch_flow_control
[plci
->adapter
->ncci_ch
[plci
->ncci_ring_list
]] & N_OK_FC_PENDING
)));
9502 /*------------------------------------------------------------------*/
9503 /* DTMF facilities */
9504 /*------------------------------------------------------------------*/
9513 } dtmf_digit_map
[] =
9515 { 0x01, 0x01, 0x23, DTMF_DIGIT_TONE_CODE_HASHMARK
},
9516 { 0x01, 0x01, 0x2a, DTMF_DIGIT_TONE_CODE_STAR
},
9517 { 0x01, 0x01, 0x30, DTMF_DIGIT_TONE_CODE_0
},
9518 { 0x01, 0x01, 0x31, DTMF_DIGIT_TONE_CODE_1
},
9519 { 0x01, 0x01, 0x32, DTMF_DIGIT_TONE_CODE_2
},
9520 { 0x01, 0x01, 0x33, DTMF_DIGIT_TONE_CODE_3
},
9521 { 0x01, 0x01, 0x34, DTMF_DIGIT_TONE_CODE_4
},
9522 { 0x01, 0x01, 0x35, DTMF_DIGIT_TONE_CODE_5
},
9523 { 0x01, 0x01, 0x36, DTMF_DIGIT_TONE_CODE_6
},
9524 { 0x01, 0x01, 0x37, DTMF_DIGIT_TONE_CODE_7
},
9525 { 0x01, 0x01, 0x38, DTMF_DIGIT_TONE_CODE_8
},
9526 { 0x01, 0x01, 0x39, DTMF_DIGIT_TONE_CODE_9
},
9527 { 0x01, 0x01, 0x41, DTMF_DIGIT_TONE_CODE_A
},
9528 { 0x01, 0x01, 0x42, DTMF_DIGIT_TONE_CODE_B
},
9529 { 0x01, 0x01, 0x43, DTMF_DIGIT_TONE_CODE_C
},
9530 { 0x01, 0x01, 0x44, DTMF_DIGIT_TONE_CODE_D
},
9531 { 0x01, 0x00, 0x61, DTMF_DIGIT_TONE_CODE_A
},
9532 { 0x01, 0x00, 0x62, DTMF_DIGIT_TONE_CODE_B
},
9533 { 0x01, 0x00, 0x63, DTMF_DIGIT_TONE_CODE_C
},
9534 { 0x01, 0x00, 0x64, DTMF_DIGIT_TONE_CODE_D
},
9536 { 0x04, 0x04, 0x80, DTMF_SIGNAL_NO_TONE
},
9537 { 0x00, 0x04, 0x81, DTMF_SIGNAL_UNIDENTIFIED_TONE
},
9538 { 0x04, 0x04, 0x82, DTMF_SIGNAL_DIAL_TONE
},
9539 { 0x04, 0x04, 0x83, DTMF_SIGNAL_PABX_INTERNAL_DIAL_TONE
},
9540 { 0x04, 0x04, 0x84, DTMF_SIGNAL_SPECIAL_DIAL_TONE
},
9541 { 0x04, 0x04, 0x85, DTMF_SIGNAL_SECOND_DIAL_TONE
},
9542 { 0x04, 0x04, 0x86, DTMF_SIGNAL_RINGING_TONE
},
9543 { 0x04, 0x04, 0x87, DTMF_SIGNAL_SPECIAL_RINGING_TONE
},
9544 { 0x04, 0x04, 0x88, DTMF_SIGNAL_BUSY_TONE
},
9545 { 0x04, 0x04, 0x89, DTMF_SIGNAL_CONGESTION_TONE
},
9546 { 0x04, 0x04, 0x8a, DTMF_SIGNAL_SPECIAL_INFORMATION_TONE
},
9547 { 0x04, 0x04, 0x8b, DTMF_SIGNAL_COMFORT_TONE
},
9548 { 0x04, 0x04, 0x8c, DTMF_SIGNAL_HOLD_TONE
},
9549 { 0x04, 0x04, 0x8d, DTMF_SIGNAL_RECORD_TONE
},
9550 { 0x04, 0x04, 0x8e, DTMF_SIGNAL_CALLER_WAITING_TONE
},
9551 { 0x04, 0x04, 0x8f, DTMF_SIGNAL_CALL_WAITING_TONE
},
9552 { 0x04, 0x04, 0x90, DTMF_SIGNAL_PAY_TONE
},
9553 { 0x04, 0x04, 0x91, DTMF_SIGNAL_POSITIVE_INDICATION_TONE
},
9554 { 0x04, 0x04, 0x92, DTMF_SIGNAL_NEGATIVE_INDICATION_TONE
},
9555 { 0x04, 0x04, 0x93, DTMF_SIGNAL_WARNING_TONE
},
9556 { 0x04, 0x04, 0x94, DTMF_SIGNAL_INTRUSION_TONE
},
9557 { 0x04, 0x04, 0x95, DTMF_SIGNAL_CALLING_CARD_SERVICE_TONE
},
9558 { 0x04, 0x04, 0x96, DTMF_SIGNAL_PAYPHONE_RECOGNITION_TONE
},
9559 { 0x04, 0x04, 0x97, DTMF_SIGNAL_CPE_ALERTING_SIGNAL
},
9560 { 0x04, 0x04, 0x98, DTMF_SIGNAL_OFF_HOOK_WARNING_TONE
},
9561 { 0x04, 0x04, 0xbf, DTMF_SIGNAL_INTERCEPT_TONE
},
9562 { 0x04, 0x04, 0xc0, DTMF_SIGNAL_MODEM_CALLING_TONE
},
9563 { 0x04, 0x04, 0xc1, DTMF_SIGNAL_FAX_CALLING_TONE
},
9564 { 0x04, 0x04, 0xc2, DTMF_SIGNAL_ANSWER_TONE
},
9565 { 0x04, 0x04, 0xc3, DTMF_SIGNAL_REVERSED_ANSWER_TONE
},
9566 { 0x04, 0x04, 0xc4, DTMF_SIGNAL_ANSAM_TONE
},
9567 { 0x04, 0x04, 0xc5, DTMF_SIGNAL_REVERSED_ANSAM_TONE
},
9568 { 0x04, 0x04, 0xc6, DTMF_SIGNAL_BELL103_ANSWER_TONE
},
9569 { 0x04, 0x04, 0xc7, DTMF_SIGNAL_FAX_FLAGS
},
9570 { 0x04, 0x04, 0xc8, DTMF_SIGNAL_G2_FAX_GROUP_ID
},
9571 { 0x00, 0x04, 0xc9, DTMF_SIGNAL_HUMAN_SPEECH
},
9572 { 0x04, 0x04, 0xca, DTMF_SIGNAL_ANSWERING_MACHINE_390
},
9573 { 0x02, 0x02, 0xf1, DTMF_MF_DIGIT_TONE_CODE_1
},
9574 { 0x02, 0x02, 0xf2, DTMF_MF_DIGIT_TONE_CODE_2
},
9575 { 0x02, 0x02, 0xf3, DTMF_MF_DIGIT_TONE_CODE_3
},
9576 { 0x02, 0x02, 0xf4, DTMF_MF_DIGIT_TONE_CODE_4
},
9577 { 0x02, 0x02, 0xf5, DTMF_MF_DIGIT_TONE_CODE_5
},
9578 { 0x02, 0x02, 0xf6, DTMF_MF_DIGIT_TONE_CODE_6
},
9579 { 0x02, 0x02, 0xf7, DTMF_MF_DIGIT_TONE_CODE_7
},
9580 { 0x02, 0x02, 0xf8, DTMF_MF_DIGIT_TONE_CODE_8
},
9581 { 0x02, 0x02, 0xf9, DTMF_MF_DIGIT_TONE_CODE_9
},
9582 { 0x02, 0x02, 0xfa, DTMF_MF_DIGIT_TONE_CODE_0
},
9583 { 0x02, 0x02, 0xfb, DTMF_MF_DIGIT_TONE_CODE_K1
},
9584 { 0x02, 0x02, 0xfc, DTMF_MF_DIGIT_TONE_CODE_K2
},
9585 { 0x02, 0x02, 0xfd, DTMF_MF_DIGIT_TONE_CODE_KP
},
9586 { 0x02, 0x02, 0xfe, DTMF_MF_DIGIT_TONE_CODE_S1
},
9587 { 0x02, 0x02, 0xff, DTMF_MF_DIGIT_TONE_CODE_ST
},
9591 #define DTMF_DIGIT_MAP_ENTRIES ARRAY_SIZE(dtmf_digit_map)
9594 static void dtmf_enable_receiver (PLCI
*plci
, byte enable_mask
)
9596 word min_digit_duration
, min_gap_duration
;
9598 dbug (1, dprintf ("[%06lx] %s,%d: dtmf_enable_receiver %02x",
9599 (dword
)((plci
->Id
<< 8) | UnMapController (plci
->adapter
->Id
)),
9600 (char *)(FILE_
), __LINE__
, enable_mask
));
9602 if (enable_mask
!= 0)
9604 min_digit_duration
= (plci
->dtmf_rec_pulse_ms
== 0) ? 40 : plci
->dtmf_rec_pulse_ms
;
9605 min_gap_duration
= (plci
->dtmf_rec_pause_ms
== 0) ? 40 : plci
->dtmf_rec_pause_ms
;
9606 plci
->internal_req_buffer
[0] = DTMF_UDATA_REQUEST_ENABLE_RECEIVER
;
9607 PUT_WORD (&plci
->internal_req_buffer
[1], min_digit_duration
);
9608 PUT_WORD (&plci
->internal_req_buffer
[3], min_gap_duration
);
9609 plci
->NData
[0].PLength
= 5;
9611 PUT_WORD (&plci
->internal_req_buffer
[5], INTERNAL_IND_BUFFER_SIZE
);
9612 plci
->NData
[0].PLength
+= 2;
9613 capidtmf_recv_enable (&(plci
->capidtmf_state
), min_digit_duration
, min_gap_duration
);
9618 plci
->internal_req_buffer
[0] = DTMF_UDATA_REQUEST_DISABLE_RECEIVER
;
9619 plci
->NData
[0].PLength
= 1;
9621 capidtmf_recv_disable (&(plci
->capidtmf_state
));
9624 plci
->NData
[0].P
= plci
->internal_req_buffer
;
9625 plci
->NL
.X
= plci
->NData
;
9627 plci
->NL
.Req
= plci
->nl_req
= (byte
) N_UDATA
;
9628 plci
->adapter
->request (&plci
->NL
);
9632 static void dtmf_send_digits (PLCI
*plci
, byte
*digit_buffer
, word digit_count
)
9636 dbug (1, dprintf ("[%06lx] %s,%d: dtmf_send_digits %d",
9637 (dword
)((plci
->Id
<< 8) | UnMapController (plci
->adapter
->Id
)),
9638 (char *)(FILE_
), __LINE__
, digit_count
));
9640 plci
->internal_req_buffer
[0] = DTMF_UDATA_REQUEST_SEND_DIGITS
;
9641 w
= (plci
->dtmf_send_pulse_ms
== 0) ? 40 : plci
->dtmf_send_pulse_ms
;
9642 PUT_WORD (&plci
->internal_req_buffer
[1], w
);
9643 w
= (plci
->dtmf_send_pause_ms
== 0) ? 40 : plci
->dtmf_send_pause_ms
;
9644 PUT_WORD (&plci
->internal_req_buffer
[3], w
);
9645 for (i
= 0; i
< digit_count
; i
++)
9648 while ((w
< DTMF_DIGIT_MAP_ENTRIES
)
9649 && (digit_buffer
[i
] != dtmf_digit_map
[w
].character
))
9653 plci
->internal_req_buffer
[5+i
] = (w
< DTMF_DIGIT_MAP_ENTRIES
) ?
9654 dtmf_digit_map
[w
].code
: DTMF_DIGIT_TONE_CODE_STAR
;
9656 plci
->NData
[0].PLength
= 5 + digit_count
;
9657 plci
->NData
[0].P
= plci
->internal_req_buffer
;
9658 plci
->NL
.X
= plci
->NData
;
9660 plci
->NL
.Req
= plci
->nl_req
= (byte
) N_UDATA
;
9661 plci
->adapter
->request (&plci
->NL
);
9665 static void dtmf_rec_clear_config (PLCI
*plci
)
9668 dbug (1, dprintf ("[%06lx] %s,%d: dtmf_rec_clear_config",
9669 (dword
)((plci
->Id
<< 8) | UnMapController (plci
->adapter
->Id
)),
9670 (char *)(FILE_
), __LINE__
));
9672 plci
->dtmf_rec_active
= 0;
9673 plci
->dtmf_rec_pulse_ms
= 0;
9674 plci
->dtmf_rec_pause_ms
= 0;
9676 capidtmf_init (&(plci
->capidtmf_state
), plci
->adapter
->u_law
);
9681 static void dtmf_send_clear_config (PLCI
*plci
)
9684 dbug (1, dprintf ("[%06lx] %s,%d: dtmf_send_clear_config",
9685 (dword
)((plci
->Id
<< 8) | UnMapController (plci
->adapter
->Id
)),
9686 (char *)(FILE_
), __LINE__
));
9688 plci
->dtmf_send_requests
= 0;
9689 plci
->dtmf_send_pulse_ms
= 0;
9690 plci
->dtmf_send_pause_ms
= 0;
9694 static void dtmf_prepare_switch (dword Id
, PLCI
*plci
)
9697 dbug (1, dprintf ("[%06lx] %s,%d: dtmf_prepare_switch",
9698 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
9700 while (plci
->dtmf_send_requests
!= 0)
9701 dtmf_confirmation (Id
, plci
);
9705 static word
dtmf_save_config (dword Id
, PLCI
*plci
, byte Rc
)
9708 dbug (1, dprintf ("[%06lx] %s,%d: dtmf_save_config %02x %d",
9709 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
, plci
->adjust_b_state
));
9715 static word
dtmf_restore_config (dword Id
, PLCI
*plci
, byte Rc
)
9719 dbug (1, dprintf ("[%06lx] %s,%d: dtmf_restore_config %02x %d",
9720 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
, plci
->adjust_b_state
));
9723 if (plci
->B1_facilities
& B1_FACILITY_DTMFR
)
9725 switch (plci
->adjust_b_state
)
9727 case ADJUST_B_RESTORE_DTMF_1
:
9728 plci
->internal_command
= plci
->adjust_b_command
;
9729 if (plci_nl_busy (plci
))
9731 plci
->adjust_b_state
= ADJUST_B_RESTORE_DTMF_1
;
9734 dtmf_enable_receiver (plci
, plci
->dtmf_rec_active
);
9735 plci
->adjust_b_state
= ADJUST_B_RESTORE_DTMF_2
;
9737 case ADJUST_B_RESTORE_DTMF_2
:
9738 if ((Rc
!= OK
) && (Rc
!= OK_FC
))
9740 dbug (1, dprintf ("[%06lx] %s,%d: Reenable DTMF receiver failed %02x",
9741 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
));
9742 Info
= _WRONG_STATE
;
9752 static void dtmf_command (dword Id
, PLCI
*plci
, byte Rc
)
9754 word internal_command
, Info
;
9758 dbug (1, dprintf ("[%06lx] %s,%d: dtmf_command %02x %04x %04x %d %d %d %d",
9759 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
, plci
->internal_command
,
9760 plci
->dtmf_cmd
, plci
->dtmf_rec_pulse_ms
, plci
->dtmf_rec_pause_ms
,
9761 plci
->dtmf_send_pulse_ms
, plci
->dtmf_send_pause_ms
));
9765 PUT_WORD (&result
[1], DTMF_SUCCESS
);
9766 internal_command
= plci
->internal_command
;
9767 plci
->internal_command
= 0;
9769 switch (plci
->dtmf_cmd
)
9772 case DTMF_LISTEN_TONE_START
:
9774 case DTMF_LISTEN_MF_START
:
9777 case DTMF_LISTEN_START
:
9778 switch (internal_command
)
9781 adjust_b1_resource (Id
, plci
, NULL
, (word
)(plci
->B1_facilities
|
9782 B1_FACILITY_DTMFR
), DTMF_COMMAND_1
);
9783 case DTMF_COMMAND_1
:
9784 if (adjust_b_process (Id
, plci
, Rc
) != GOOD
)
9786 dbug (1, dprintf ("[%06lx] %s,%d: Load DTMF failed",
9787 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
9788 Info
= _FACILITY_NOT_SUPPORTED
;
9791 if (plci
->internal_command
)
9793 case DTMF_COMMAND_2
:
9794 if (plci_nl_busy (plci
))
9796 plci
->internal_command
= DTMF_COMMAND_2
;
9799 plci
->internal_command
= DTMF_COMMAND_3
;
9800 dtmf_enable_receiver (plci
, (byte
)(plci
->dtmf_rec_active
| mask
));
9802 case DTMF_COMMAND_3
:
9803 if ((Rc
!= OK
) && (Rc
!= OK_FC
))
9805 dbug (1, dprintf ("[%06lx] %s,%d: Enable DTMF receiver failed %02x",
9806 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
));
9807 Info
= _FACILITY_NOT_SUPPORTED
;
9811 plci
->tone_last_indication_code
= DTMF_SIGNAL_NO_TONE
;
9813 plci
->dtmf_rec_active
|= mask
;
9819 case DTMF_LISTEN_TONE_STOP
:
9821 case DTMF_LISTEN_MF_STOP
:
9824 case DTMF_LISTEN_STOP
:
9825 switch (internal_command
)
9828 plci
->dtmf_rec_active
&= ~mask
;
9829 if (plci
->dtmf_rec_active
)
9832 case DTMF_COMMAND_1:
9833 if (plci->dtmf_rec_active)
9835 if (plci_nl_busy (plci))
9837 plci->internal_command = DTMF_COMMAND_1;
9840 plci->dtmf_rec_active &= ~mask;
9841 plci->internal_command = DTMF_COMMAND_2;
9842 dtmf_enable_receiver (plci, false);
9846 case DTMF_COMMAND_2:
9847 if ((Rc != OK) && (Rc != OK_FC))
9849 dbug (1, dprintf ("[%06lx] %s,%d: Disable DTMF receiver failed %02x",
9850 UnMapId (Id), (char far *)(FILE_), __LINE__, Rc));
9851 Info = _FACILITY_NOT_SUPPORTED;
9855 adjust_b1_resource (Id
, plci
, NULL
, (word
)(plci
->B1_facilities
&
9856 ~(B1_FACILITY_DTMFX
| B1_FACILITY_DTMFR
)), DTMF_COMMAND_3
);
9857 case DTMF_COMMAND_3
:
9858 if (adjust_b_process (Id
, plci
, Rc
) != GOOD
)
9860 dbug (1, dprintf ("[%06lx] %s,%d: Unload DTMF failed",
9861 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
9862 Info
= _FACILITY_NOT_SUPPORTED
;
9865 if (plci
->internal_command
)
9872 case DTMF_SEND_TONE
:
9877 case DTMF_DIGITS_SEND
:
9878 switch (internal_command
)
9881 adjust_b1_resource (Id
, plci
, NULL
, (word
)(plci
->B1_facilities
|
9882 ((plci
->dtmf_parameter_length
!= 0) ? B1_FACILITY_DTMFX
| B1_FACILITY_DTMFR
: B1_FACILITY_DTMFX
)),
9884 case DTMF_COMMAND_1
:
9885 if (adjust_b_process (Id
, plci
, Rc
) != GOOD
)
9887 dbug (1, dprintf ("[%06lx] %s,%d: Load DTMF failed",
9888 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
9889 Info
= _FACILITY_NOT_SUPPORTED
;
9892 if (plci
->internal_command
)
9894 case DTMF_COMMAND_2
:
9895 if (plci_nl_busy (plci
))
9897 plci
->internal_command
= DTMF_COMMAND_2
;
9900 plci
->dtmf_msg_number_queue
[(plci
->dtmf_send_requests
)++] = plci
->number
;
9901 plci
->internal_command
= DTMF_COMMAND_3
;
9902 dtmf_send_digits (plci
, &plci
->saved_msg
.parms
[3].info
[1], plci
->saved_msg
.parms
[3].length
);
9904 case DTMF_COMMAND_3
:
9905 if ((Rc
!= OK
) && (Rc
!= OK_FC
))
9907 dbug (1, dprintf ("[%06lx] %s,%d: Send DTMF digits failed %02x",
9908 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
));
9909 if (plci
->dtmf_send_requests
!= 0)
9910 (plci
->dtmf_send_requests
)--;
9911 Info
= _FACILITY_NOT_SUPPORTED
;
9918 sendf (plci
->appl
, _FACILITY_R
| CONFIRM
, Id
& 0xffffL
, plci
->number
,
9919 "wws", Info
, SELECTOR_DTMF
, result
);
9923 static byte
dtmf_request (dword Id
, word Number
, DIVA_CAPI_ADAPTER
*a
, PLCI
*plci
, APPL
*appl
, API_PARSE
*msg
)
9928 API_PARSE dtmf_parms
[5];
9931 dbug (1, dprintf ("[%06lx] %s,%d: dtmf_request",
9932 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
9936 PUT_WORD (&result
[1], DTMF_SUCCESS
);
9937 if (!(a
->profile
.Global_Options
& GL_DTMF_SUPPORTED
))
9939 dbug (1, dprintf ("[%06lx] %s,%d: Facility not supported",
9940 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
9941 Info
= _FACILITY_NOT_SUPPORTED
;
9943 else if (api_parse (&msg
[1].info
[1], msg
[1].length
, "w", dtmf_parms
))
9945 dbug (1, dprintf ("[%06lx] %s,%d: Wrong message format",
9946 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
9947 Info
= _WRONG_MESSAGE_FORMAT
;
9950 else if ((GET_WORD (dtmf_parms
[0].info
) == DTMF_GET_SUPPORTED_DETECT_CODES
)
9951 || (GET_WORD (dtmf_parms
[0].info
) == DTMF_GET_SUPPORTED_SEND_CODES
))
9953 if (!((a
->requested_options_table
[appl
->Id
-1])
9954 & (1L << PRIVATE_DTMF_TONE
)))
9956 dbug (1, dprintf ("[%06lx] %s,%d: DTMF unknown request %04x",
9957 UnMapId (Id
), (char *)(FILE_
), __LINE__
, GET_WORD (dtmf_parms
[0].info
)));
9958 PUT_WORD (&result
[1], DTMF_UNKNOWN_REQUEST
);
9962 for (i
= 0; i
< 32; i
++)
9964 if (GET_WORD (dtmf_parms
[0].info
) == DTMF_GET_SUPPORTED_DETECT_CODES
)
9966 for (i
= 0; i
< DTMF_DIGIT_MAP_ENTRIES
; i
++)
9968 if (dtmf_digit_map
[i
].listen_mask
!= 0)
9969 result
[4 + (dtmf_digit_map
[i
].character
>> 3)] |= (1 << (dtmf_digit_map
[i
].character
& 0x7));
9974 for (i
= 0; i
< DTMF_DIGIT_MAP_ENTRIES
; i
++)
9976 if (dtmf_digit_map
[i
].send_mask
!= 0)
9977 result
[4 + (dtmf_digit_map
[i
].character
>> 3)] |= (1 << (dtmf_digit_map
[i
].character
& 0x7));
9985 else if (plci
== NULL
)
9987 dbug (1, dprintf ("[%06lx] %s,%d: Wrong PLCI",
9988 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
9989 Info
= _WRONG_IDENTIFIER
;
9994 || !plci
->NL
.Id
|| plci
->nl_remove_id
)
9996 dbug (1, dprintf ("[%06lx] %s,%d: Wrong state",
9997 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
9998 Info
= _WRONG_STATE
;
10003 plci
->dtmf_cmd
= GET_WORD (dtmf_parms
[0].info
);
10005 switch (plci
->dtmf_cmd
)
10008 case DTMF_LISTEN_TONE_START
:
10009 case DTMF_LISTEN_TONE_STOP
:
10011 case DTMF_LISTEN_MF_START
:
10012 case DTMF_LISTEN_MF_STOP
:
10014 if (!((plci
->requested_options_conn
| plci
->requested_options
| plci
->adapter
->requested_options_table
[appl
->Id
-1])
10015 & (1L << PRIVATE_DTMF_TONE
)))
10017 dbug (1, dprintf ("[%06lx] %s,%d: DTMF unknown request %04x",
10018 UnMapId (Id
), (char *)(FILE_
), __LINE__
, GET_WORD (dtmf_parms
[0].info
)));
10019 PUT_WORD (&result
[1], DTMF_UNKNOWN_REQUEST
);
10023 case DTMF_LISTEN_START
:
10024 case DTMF_LISTEN_STOP
:
10025 if (!(a
->manufacturer_features
& MANUFACTURER_FEATURE_HARDDTMF
)
10026 && !(a
->manufacturer_features
& MANUFACTURER_FEATURE_SOFTDTMF_RECEIVE
))
10028 dbug (1, dprintf ("[%06lx] %s,%d: Facility not supported",
10029 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
10030 Info
= _FACILITY_NOT_SUPPORTED
;
10033 if (mask
& DTMF_LISTEN_ACTIVE_FLAG
)
10035 if (api_parse (&msg
[1].info
[1], msg
[1].length
, "wwws", dtmf_parms
))
10037 plci
->dtmf_rec_pulse_ms
= 0;
10038 plci
->dtmf_rec_pause_ms
= 0;
10042 plci
->dtmf_rec_pulse_ms
= GET_WORD (dtmf_parms
[1].info
);
10043 plci
->dtmf_rec_pause_ms
= GET_WORD (dtmf_parms
[2].info
);
10046 start_internal_command (Id
, plci
, dtmf_command
);
10050 case DTMF_SEND_TONE
:
10054 if (!((plci
->requested_options_conn
| plci
->requested_options
| plci
->adapter
->requested_options_table
[appl
->Id
-1])
10055 & (1L << PRIVATE_DTMF_TONE
)))
10057 dbug (1, dprintf ("[%06lx] %s,%d: DTMF unknown request %04x",
10058 UnMapId (Id
), (char *)(FILE_
), __LINE__
, GET_WORD (dtmf_parms
[0].info
)));
10059 PUT_WORD (&result
[1], DTMF_UNKNOWN_REQUEST
);
10063 case DTMF_DIGITS_SEND
:
10064 if (api_parse (&msg
[1].info
[1], msg
[1].length
, "wwws", dtmf_parms
))
10066 dbug (1, dprintf ("[%06lx] %s,%d: Wrong message format",
10067 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
10068 Info
= _WRONG_MESSAGE_FORMAT
;
10071 if (mask
& DTMF_LISTEN_ACTIVE_FLAG
)
10073 plci
->dtmf_send_pulse_ms
= GET_WORD (dtmf_parms
[1].info
);
10074 plci
->dtmf_send_pause_ms
= GET_WORD (dtmf_parms
[2].info
);
10078 while ((i
< dtmf_parms
[3].length
) && (j
< DTMF_DIGIT_MAP_ENTRIES
))
10081 while ((j
< DTMF_DIGIT_MAP_ENTRIES
)
10082 && ((dtmf_parms
[3].info
[i
+1] != dtmf_digit_map
[j
].character
)
10083 || ((dtmf_digit_map
[j
].send_mask
& mask
) == 0)))
10089 if (j
== DTMF_DIGIT_MAP_ENTRIES
)
10091 dbug (1, dprintf ("[%06lx] %s,%d: Incorrect DTMF digit %02x",
10092 UnMapId (Id
), (char *)(FILE_
), __LINE__
, dtmf_parms
[3].info
[i
]));
10093 PUT_WORD (&result
[1], DTMF_INCORRECT_DIGIT
);
10096 if (plci
->dtmf_send_requests
>= ARRAY_SIZE(plci
->dtmf_msg_number_queue
))
10098 dbug (1, dprintf ("[%06lx] %s,%d: DTMF request overrun",
10099 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
10100 Info
= _WRONG_STATE
;
10103 api_save_msg (dtmf_parms
, "wwws", &plci
->saved_msg
);
10104 start_internal_command (Id
, plci
, dtmf_command
);
10108 dbug (1, dprintf ("[%06lx] %s,%d: DTMF unknown request %04x",
10109 UnMapId (Id
), (char *)(FILE_
), __LINE__
, plci
->dtmf_cmd
));
10110 PUT_WORD (&result
[1], DTMF_UNKNOWN_REQUEST
);
10114 sendf (appl
, _FACILITY_R
| CONFIRM
, Id
& 0xffffL
, Number
,
10115 "wws", Info
, SELECTOR_DTMF
, result
);
10120 static void dtmf_confirmation (dword Id
, PLCI
*plci
)
10126 dbug (1, dprintf ("[%06lx] %s,%d: dtmf_confirmation",
10127 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
10131 PUT_WORD (&result
[1], DTMF_SUCCESS
);
10132 if (plci
->dtmf_send_requests
!= 0)
10134 sendf (plci
->appl
, _FACILITY_R
| CONFIRM
, Id
& 0xffffL
, plci
->dtmf_msg_number_queue
[0],
10135 "wws", GOOD
, SELECTOR_DTMF
, result
);
10136 (plci
->dtmf_send_requests
)--;
10137 for (i
= 0; i
< plci
->dtmf_send_requests
; i
++)
10138 plci
->dtmf_msg_number_queue
[i
] = plci
->dtmf_msg_number_queue
[i
+1];
10143 static void dtmf_indication (dword Id
, PLCI
*plci
, byte
*msg
, word length
)
10147 dbug (1, dprintf ("[%06lx] %s,%d: dtmf_indication",
10148 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
10151 for (i
= 1; i
< length
; i
++)
10154 while ((j
< DTMF_DIGIT_MAP_ENTRIES
)
10155 && ((msg
[i
] != dtmf_digit_map
[j
].code
)
10156 || ((dtmf_digit_map
[j
].listen_mask
& plci
->dtmf_rec_active
) == 0)))
10160 if (j
< DTMF_DIGIT_MAP_ENTRIES
)
10163 if ((dtmf_digit_map
[j
].listen_mask
& DTMF_TONE_LISTEN_ACTIVE_FLAG
)
10164 && (plci
->tone_last_indication_code
== DTMF_SIGNAL_NO_TONE
)
10165 && (dtmf_digit_map
[j
].character
!= DTMF_SIGNAL_UNIDENTIFIED_TONE
))
10169 for (i
= length
; i
> n
+ 1; i
--)
10170 msg
[i
] = msg
[i
- 1];
10174 msg
[++n
] = DTMF_SIGNAL_UNIDENTIFIED_TONE
;
10176 plci
->tone_last_indication_code
= dtmf_digit_map
[j
].character
;
10178 msg
[++n
] = dtmf_digit_map
[j
].character
;
10184 sendf (plci
->appl
, _FACILITY_I
, Id
& 0xffffL
, 0, "wS", SELECTOR_DTMF
, msg
);
10189 /*------------------------------------------------------------------*/
10190 /* DTMF parameters */
10191 /*------------------------------------------------------------------*/
10193 static void dtmf_parameter_write (PLCI
*plci
)
10196 byte parameter_buffer
[DTMF_PARAMETER_BUFFER_SIZE
+ 2];
10198 dbug (1, dprintf ("[%06lx] %s,%d: dtmf_parameter_write",
10199 (dword
)((plci
->Id
<< 8) | UnMapController (plci
->adapter
->Id
)),
10200 (char *)(FILE_
), __LINE__
));
10202 parameter_buffer
[0] = plci
->dtmf_parameter_length
+ 1;
10203 parameter_buffer
[1] = DSP_CTRL_SET_DTMF_PARAMETERS
;
10204 for (i
= 0; i
< plci
->dtmf_parameter_length
; i
++)
10205 parameter_buffer
[2+i
] = plci
->dtmf_parameter_buffer
[i
];
10206 add_p (plci
, FTY
, parameter_buffer
);
10207 sig_req (plci
, TEL_CTRL
, 0);
10212 static void dtmf_parameter_clear_config (PLCI
*plci
)
10215 dbug (1, dprintf ("[%06lx] %s,%d: dtmf_parameter_clear_config",
10216 (dword
)((plci
->Id
<< 8) | UnMapController (plci
->adapter
->Id
)),
10217 (char *)(FILE_
), __LINE__
));
10219 plci
->dtmf_parameter_length
= 0;
10223 static void dtmf_parameter_prepare_switch (dword Id
, PLCI
*plci
)
10226 dbug (1, dprintf ("[%06lx] %s,%d: dtmf_parameter_prepare_switch",
10227 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
10232 static word
dtmf_parameter_save_config (dword Id
, PLCI
*plci
, byte Rc
)
10235 dbug (1, dprintf ("[%06lx] %s,%d: dtmf_parameter_save_config %02x %d",
10236 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
, plci
->adjust_b_state
));
10242 static word
dtmf_parameter_restore_config (dword Id
, PLCI
*plci
, byte Rc
)
10246 dbug (1, dprintf ("[%06lx] %s,%d: dtmf_parameter_restore_config %02x %d",
10247 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
, plci
->adjust_b_state
));
10250 if ((plci
->B1_facilities
& B1_FACILITY_DTMFR
)
10251 && (plci
->dtmf_parameter_length
!= 0))
10253 switch (plci
->adjust_b_state
)
10255 case ADJUST_B_RESTORE_DTMF_PARAMETER_1
:
10256 plci
->internal_command
= plci
->adjust_b_command
;
10259 plci
->adjust_b_state
= ADJUST_B_RESTORE_DTMF_PARAMETER_1
;
10262 dtmf_parameter_write (plci
);
10263 plci
->adjust_b_state
= ADJUST_B_RESTORE_DTMF_PARAMETER_2
;
10265 case ADJUST_B_RESTORE_DTMF_PARAMETER_2
:
10266 if ((Rc
!= OK
) && (Rc
!= OK_FC
))
10268 dbug (1, dprintf ("[%06lx] %s,%d: Restore DTMF parameters failed %02x",
10269 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
));
10270 Info
= _WRONG_STATE
;
10280 /*------------------------------------------------------------------*/
10281 /* Line interconnect facilities */
10282 /*------------------------------------------------------------------*/
10285 LI_CONFIG
*li_config_table
;
10286 word li_total_channels
;
10289 /*------------------------------------------------------------------*/
10290 /* translate a CHI information element to a channel number */
10291 /* returns 0xff - any channel */
10292 /* 0xfe - chi wrong coding */
10293 /* 0xfd - D-channel */
10294 /* 0x00 - no channel */
10295 /* else channel number / PRI: timeslot */
10296 /* if channels is provided we accept more than one channel. */
10297 /*------------------------------------------------------------------*/
10299 static byte
chi_to_channel (byte
*chi
, dword
*pchannelmap
)
10308 if (pchannelmap
) *pchannelmap
= 0;
10309 if(!chi
[0]) return 0xff;
10312 if(chi
[1] & 0x20) {
10313 if(chi
[0]==1 && chi
[1]==0xac) return 0xfd; /* exclusive d-channel */
10314 for(i
=1; i
<chi
[0] && !(chi
[i
] &0x80); i
++);
10315 if(i
==chi
[0] || !(chi
[i
] &0x80)) return 0xfe;
10316 if((chi
[1] |0xc8)!=0xe9) return 0xfe;
10317 if(chi
[1] &0x08) excl
= 0x40;
10319 /* int. id present */
10322 for(i
=p
; i
<chi
[0] && !(chi
[i
] &0x80); i
++);
10323 if(i
==chi
[0] || !(chi
[i
] &0x80)) return 0xfe;
10326 /* coding standard, Number/Map, Channel Type */
10328 for(i
=p
; i
<chi
[0] && !(chi
[i
] &0x80); i
++);
10329 if(i
==chi
[0] || !(chi
[i
] &0x80)) return 0xfe;
10330 if((chi
[p
]|0xd0)!=0xd3) return 0xfe;
10336 if((chi
[0]-p
)==4) ofs
= 0;
10337 else if((chi
[0]-p
)==3) ofs
= 1;
10341 for(i
=0; i
<4 && p
<chi
[0]; i
++) {
10346 for (ch
=0; !(chi
[p
] & (1 << ch
)); ch
++);
10359 if((byte
)(chi
[0]-p
)>30) return 0xfe;
10361 for(i
=p
; i
<=chi
[0]; i
++) {
10362 if ((chi
[i
] &0x7f) > 31) return 0xfe;
10363 map
|= (1L << (chi
[i
] &0x7f));
10367 if(p
!=chi
[0]) return 0xfe;
10368 if (ch
> 31) return 0xfe;
10371 if(chi
[p
] &0x40) return 0xfe;
10373 if (pchannelmap
) *pchannelmap
= map
;
10374 else if (map
!= ((dword
)(1L << ch
))) return 0xfe;
10375 return (byte
)(excl
| ch
);
10377 else { /* not PRI */
10378 for(i
=1; i
<chi
[0] && !(chi
[i
] &0x80); i
++);
10379 if(i
!=chi
[0] || !(chi
[i
] &0x80)) return 0xfe;
10380 if(chi
[1] &0x08) excl
= 0x40;
10382 switch(chi
[1] |0x98) {
10383 case 0x98: return 0;
10385 if (pchannelmap
) *pchannelmap
= 2;
10388 if (pchannelmap
) *pchannelmap
= 4;
10390 case 0x9b: return 0xff;
10391 case 0x9c: return 0xfd; /* d-ch */
10392 default: return 0xfe;
10398 static void mixer_set_bchannel_id_esc (PLCI
*plci
, byte bchannel_id
)
10400 DIVA_CAPI_ADAPTER
*a
;
10405 old_id
= plci
->li_bchannel_id
;
10408 if ((old_id
!= 0) && (li_config_table
[a
->li_base
+ (old_id
- 1)].plci
== plci
))
10409 li_config_table
[a
->li_base
+ (old_id
- 1)].plci
= NULL
;
10410 plci
->li_bchannel_id
= (bchannel_id
& 0x1f) + 1;
10411 if (li_config_table
[a
->li_base
+ (plci
->li_bchannel_id
- 1)].plci
== NULL
)
10412 li_config_table
[a
->li_base
+ (plci
->li_bchannel_id
- 1)].plci
= plci
;
10416 if (((bchannel_id
& 0x03) == 1) || ((bchannel_id
& 0x03) == 2))
10418 if ((old_id
!= 0) && (li_config_table
[a
->li_base
+ (old_id
- 1)].plci
== plci
))
10419 li_config_table
[a
->li_base
+ (old_id
- 1)].plci
= NULL
;
10420 plci
->li_bchannel_id
= bchannel_id
& 0x03;
10421 if ((a
->AdvSignalPLCI
!= NULL
) && (a
->AdvSignalPLCI
!= plci
) && (a
->AdvSignalPLCI
->tel
== ADV_VOICE
))
10423 splci
= a
->AdvSignalPLCI
;
10424 if (li_config_table
[a
->li_base
+ (2 - plci
->li_bchannel_id
)].plci
== NULL
)
10426 if ((splci
->li_bchannel_id
!= 0)
10427 && (li_config_table
[a
->li_base
+ (splci
->li_bchannel_id
- 1)].plci
== splci
))
10429 li_config_table
[a
->li_base
+ (splci
->li_bchannel_id
- 1)].plci
= NULL
;
10431 splci
->li_bchannel_id
= 3 - plci
->li_bchannel_id
;
10432 li_config_table
[a
->li_base
+ (2 - plci
->li_bchannel_id
)].plci
= splci
;
10433 dbug (1, dprintf ("[%06lx] %s,%d: adv_voice_set_bchannel_id_esc %d",
10434 (dword
)((splci
->Id
<< 8) | UnMapController (splci
->adapter
->Id
)),
10435 (char *)(FILE_
), __LINE__
, splci
->li_bchannel_id
));
10438 if (li_config_table
[a
->li_base
+ (plci
->li_bchannel_id
- 1)].plci
== NULL
)
10439 li_config_table
[a
->li_base
+ (plci
->li_bchannel_id
- 1)].plci
= plci
;
10442 if ((old_id
== 0) && (plci
->li_bchannel_id
!= 0)
10443 && (li_config_table
[a
->li_base
+ (plci
->li_bchannel_id
- 1)].plci
== plci
))
10445 mixer_clear_config (plci
);
10447 dbug (1, dprintf ("[%06lx] %s,%d: mixer_set_bchannel_id_esc %d %d",
10448 (dword
)((plci
->Id
<< 8) | UnMapController (plci
->adapter
->Id
)),
10449 (char *)(FILE_
), __LINE__
, bchannel_id
, plci
->li_bchannel_id
));
10453 static void mixer_set_bchannel_id (PLCI
*plci
, byte
*chi
)
10455 DIVA_CAPI_ADAPTER
*a
;
10460 old_id
= plci
->li_bchannel_id
;
10461 ch
= chi_to_channel (chi
, NULL
);
10466 if ((old_id
!= 0) && (li_config_table
[a
->li_base
+ (old_id
- 1)].plci
== plci
))
10467 li_config_table
[a
->li_base
+ (old_id
- 1)].plci
= NULL
;
10468 plci
->li_bchannel_id
= (ch
& 0x1f) + 1;
10469 if (li_config_table
[a
->li_base
+ (plci
->li_bchannel_id
- 1)].plci
== NULL
)
10470 li_config_table
[a
->li_base
+ (plci
->li_bchannel_id
- 1)].plci
= plci
;
10474 if (((ch
& 0x1f) == 1) || ((ch
& 0x1f) == 2))
10476 if ((old_id
!= 0) && (li_config_table
[a
->li_base
+ (old_id
- 1)].plci
== plci
))
10477 li_config_table
[a
->li_base
+ (old_id
- 1)].plci
= NULL
;
10478 plci
->li_bchannel_id
= ch
& 0x1f;
10479 if ((a
->AdvSignalPLCI
!= NULL
) && (a
->AdvSignalPLCI
!= plci
) && (a
->AdvSignalPLCI
->tel
== ADV_VOICE
))
10481 splci
= a
->AdvSignalPLCI
;
10482 if (li_config_table
[a
->li_base
+ (2 - plci
->li_bchannel_id
)].plci
== NULL
)
10484 if ((splci
->li_bchannel_id
!= 0)
10485 && (li_config_table
[a
->li_base
+ (splci
->li_bchannel_id
- 1)].plci
== splci
))
10487 li_config_table
[a
->li_base
+ (splci
->li_bchannel_id
- 1)].plci
= NULL
;
10489 splci
->li_bchannel_id
= 3 - plci
->li_bchannel_id
;
10490 li_config_table
[a
->li_base
+ (2 - plci
->li_bchannel_id
)].plci
= splci
;
10491 dbug (1, dprintf ("[%06lx] %s,%d: adv_voice_set_bchannel_id %d",
10492 (dword
)((splci
->Id
<< 8) | UnMapController (splci
->adapter
->Id
)),
10493 (char *)(FILE_
), __LINE__
, splci
->li_bchannel_id
));
10496 if (li_config_table
[a
->li_base
+ (plci
->li_bchannel_id
- 1)].plci
== NULL
)
10497 li_config_table
[a
->li_base
+ (plci
->li_bchannel_id
- 1)].plci
= plci
;
10501 if ((old_id
== 0) && (plci
->li_bchannel_id
!= 0)
10502 && (li_config_table
[a
->li_base
+ (plci
->li_bchannel_id
- 1)].plci
== plci
))
10504 mixer_clear_config (plci
);
10506 dbug (1, dprintf ("[%06lx] %s,%d: mixer_set_bchannel_id %02x %d",
10507 (dword
)((plci
->Id
<< 8) | UnMapController (plci
->adapter
->Id
)),
10508 (char *)(FILE_
), __LINE__
, ch
, plci
->li_bchannel_id
));
10512 #define MIXER_MAX_DUMP_CHANNELS 34
10514 static void mixer_calculate_coefs (DIVA_CAPI_ADAPTER
*a
)
10516 static char hex_digit_table
[0x10] = {'0','1','2','3','4','5','6','7','8','9','a','b','c','d','e','f'};
10519 char hex_line
[2 * MIXER_MAX_DUMP_CHANNELS
+ MIXER_MAX_DUMP_CHANNELS
/ 8 + 4];
10521 dbug (1, dprintf ("[%06lx] %s,%d: mixer_calculate_coefs",
10522 (dword
)(UnMapController (a
->Id
)), (char *)(FILE_
), __LINE__
));
10524 for (i
= 0; i
< li_total_channels
; i
++)
10526 li_config_table
[i
].channel
&= LI_CHANNEL_ADDRESSES_SET
;
10527 if (li_config_table
[i
].chflags
!= 0)
10528 li_config_table
[i
].channel
|= LI_CHANNEL_INVOLVED
;
10531 for (j
= 0; j
< li_total_channels
; j
++)
10533 if (((li_config_table
[i
].flag_table
[j
]) != 0)
10534 || ((li_config_table
[j
].flag_table
[i
]) != 0))
10536 li_config_table
[i
].channel
|= LI_CHANNEL_INVOLVED
;
10538 if (((li_config_table
[i
].flag_table
[j
] & LI_FLAG_CONFERENCE
) != 0)
10539 || ((li_config_table
[j
].flag_table
[i
] & LI_FLAG_CONFERENCE
) != 0))
10541 li_config_table
[i
].channel
|= LI_CHANNEL_CONFERENCE
;
10546 for (i
= 0; i
< li_total_channels
; i
++)
10548 for (j
= 0; j
< li_total_channels
; j
++)
10550 li_config_table
[i
].coef_table
[j
] &= ~(LI_COEF_CH_CH
| LI_COEF_CH_PC
| LI_COEF_PC_CH
| LI_COEF_PC_PC
);
10551 if (li_config_table
[i
].flag_table
[j
] & LI_FLAG_CONFERENCE
)
10552 li_config_table
[i
].coef_table
[j
] |= LI_COEF_CH_CH
;
10555 for (n
= 0; n
< li_total_channels
; n
++)
10557 if (li_config_table
[n
].channel
& LI_CHANNEL_CONFERENCE
)
10559 for (i
= 0; i
< li_total_channels
; i
++)
10561 if (li_config_table
[i
].channel
& LI_CHANNEL_CONFERENCE
)
10563 for (j
= 0; j
< li_total_channels
; j
++)
10565 li_config_table
[i
].coef_table
[j
] |=
10566 li_config_table
[i
].coef_table
[n
] & li_config_table
[n
].coef_table
[j
];
10572 for (i
= 0; i
< li_total_channels
; i
++)
10574 if (li_config_table
[i
].channel
& LI_CHANNEL_INVOLVED
)
10576 li_config_table
[i
].coef_table
[i
] &= ~LI_COEF_CH_CH
;
10577 for (j
= 0; j
< li_total_channels
; j
++)
10579 if (li_config_table
[i
].coef_table
[j
] & LI_COEF_CH_CH
)
10580 li_config_table
[i
].flag_table
[j
] |= LI_FLAG_CONFERENCE
;
10582 if (li_config_table
[i
].flag_table
[i
] & LI_FLAG_CONFERENCE
)
10583 li_config_table
[i
].coef_table
[i
] |= LI_COEF_CH_CH
;
10586 for (i
= 0; i
< li_total_channels
; i
++)
10588 if (li_config_table
[i
].channel
& LI_CHANNEL_INVOLVED
)
10590 for (j
= 0; j
< li_total_channels
; j
++)
10592 if (li_config_table
[i
].flag_table
[j
] & LI_FLAG_INTERCONNECT
)
10593 li_config_table
[i
].coef_table
[j
] |= LI_COEF_CH_CH
;
10594 if (li_config_table
[i
].flag_table
[j
] & LI_FLAG_MONITOR
)
10595 li_config_table
[i
].coef_table
[j
] |= LI_COEF_CH_PC
;
10596 if (li_config_table
[i
].flag_table
[j
] & LI_FLAG_MIX
)
10597 li_config_table
[i
].coef_table
[j
] |= LI_COEF_PC_CH
;
10598 if (li_config_table
[i
].flag_table
[j
] & LI_FLAG_PCCONNECT
)
10599 li_config_table
[i
].coef_table
[j
] |= LI_COEF_PC_PC
;
10601 if (li_config_table
[i
].chflags
& LI_CHFLAG_MONITOR
)
10603 for (j
= 0; j
< li_total_channels
; j
++)
10605 if (li_config_table
[i
].flag_table
[j
] & LI_FLAG_INTERCONNECT
)
10607 li_config_table
[i
].coef_table
[j
] |= LI_COEF_CH_PC
;
10608 if (li_config_table
[j
].chflags
& LI_CHFLAG_MIX
)
10609 li_config_table
[i
].coef_table
[j
] |= LI_COEF_PC_CH
| LI_COEF_PC_PC
;
10613 if (li_config_table
[i
].chflags
& LI_CHFLAG_MIX
)
10615 for (j
= 0; j
< li_total_channels
; j
++)
10617 if (li_config_table
[j
].flag_table
[i
] & LI_FLAG_INTERCONNECT
)
10618 li_config_table
[j
].coef_table
[i
] |= LI_COEF_PC_CH
;
10621 if (li_config_table
[i
].chflags
& LI_CHFLAG_LOOP
)
10623 for (j
= 0; j
< li_total_channels
; j
++)
10625 if (li_config_table
[i
].flag_table
[j
] & LI_FLAG_INTERCONNECT
)
10627 for (n
= 0; n
< li_total_channels
; n
++)
10629 if (li_config_table
[n
].flag_table
[i
] & LI_FLAG_INTERCONNECT
)
10631 li_config_table
[n
].coef_table
[j
] |= LI_COEF_CH_CH
;
10632 if (li_config_table
[j
].chflags
& LI_CHFLAG_MIX
)
10634 li_config_table
[n
].coef_table
[j
] |= LI_COEF_PC_CH
;
10635 if (li_config_table
[n
].chflags
& LI_CHFLAG_MONITOR
)
10636 li_config_table
[n
].coef_table
[j
] |= LI_COEF_CH_PC
| LI_COEF_PC_PC
;
10638 else if (li_config_table
[n
].chflags
& LI_CHFLAG_MONITOR
)
10639 li_config_table
[n
].coef_table
[j
] |= LI_COEF_CH_PC
;
10647 for (i
= 0; i
< li_total_channels
; i
++)
10649 if (li_config_table
[i
].channel
& LI_CHANNEL_INVOLVED
)
10651 if (li_config_table
[i
].chflags
& (LI_CHFLAG_MONITOR
| LI_CHFLAG_MIX
| LI_CHFLAG_LOOP
))
10652 li_config_table
[i
].channel
|= LI_CHANNEL_ACTIVE
;
10653 if (li_config_table
[i
].chflags
& LI_CHFLAG_MONITOR
)
10654 li_config_table
[i
].channel
|= LI_CHANNEL_RX_DATA
;
10655 if (li_config_table
[i
].chflags
& LI_CHFLAG_MIX
)
10656 li_config_table
[i
].channel
|= LI_CHANNEL_TX_DATA
;
10657 for (j
= 0; j
< li_total_channels
; j
++)
10659 if ((li_config_table
[i
].flag_table
[j
] &
10660 (LI_FLAG_INTERCONNECT
| LI_FLAG_PCCONNECT
| LI_FLAG_CONFERENCE
| LI_FLAG_MONITOR
))
10661 || (li_config_table
[j
].flag_table
[i
] &
10662 (LI_FLAG_INTERCONNECT
| LI_FLAG_PCCONNECT
| LI_FLAG_CONFERENCE
| LI_FLAG_ANNOUNCEMENT
| LI_FLAG_MIX
)))
10664 li_config_table
[i
].channel
|= LI_CHANNEL_ACTIVE
;
10666 if (li_config_table
[i
].flag_table
[j
] & (LI_FLAG_PCCONNECT
| LI_FLAG_MONITOR
))
10667 li_config_table
[i
].channel
|= LI_CHANNEL_RX_DATA
;
10668 if (li_config_table
[j
].flag_table
[i
] & (LI_FLAG_PCCONNECT
| LI_FLAG_ANNOUNCEMENT
| LI_FLAG_MIX
))
10669 li_config_table
[i
].channel
|= LI_CHANNEL_TX_DATA
;
10671 if (!(li_config_table
[i
].channel
& LI_CHANNEL_ACTIVE
))
10673 li_config_table
[i
].coef_table
[i
] |= LI_COEF_PC_CH
| LI_COEF_CH_PC
;
10674 li_config_table
[i
].channel
|= LI_CHANNEL_TX_DATA
| LI_CHANNEL_RX_DATA
;
10678 for (i
= 0; i
< li_total_channels
; i
++)
10680 if (li_config_table
[i
].channel
& LI_CHANNEL_INVOLVED
)
10683 while ((j
< li_total_channels
) && !(li_config_table
[i
].flag_table
[j
] & LI_FLAG_ANNOUNCEMENT
))
10685 if (j
< li_total_channels
)
10687 for (j
= 0; j
< li_total_channels
; j
++)
10689 li_config_table
[i
].coef_table
[j
] &= ~(LI_COEF_CH_CH
| LI_COEF_PC_CH
);
10690 if (li_config_table
[i
].flag_table
[j
] & LI_FLAG_ANNOUNCEMENT
)
10691 li_config_table
[i
].coef_table
[j
] |= LI_COEF_PC_CH
;
10696 n
= li_total_channels
;
10697 if (n
> MIXER_MAX_DUMP_CHANNELS
)
10698 n
= MIXER_MAX_DUMP_CHANNELS
;
10700 for (j
= 0; j
< n
; j
++)
10702 if ((j
& 0x7) == 0)
10704 *(p
++) = hex_digit_table
[li_config_table
[j
].curchnl
>> 4];
10705 *(p
++) = hex_digit_table
[li_config_table
[j
].curchnl
& 0xf];
10708 dbug (1, dprintf ("[%06lx] CURRENT %s",
10709 (dword
)(UnMapController (a
->Id
)), (char *) hex_line
));
10711 for (j
= 0; j
< n
; j
++)
10713 if ((j
& 0x7) == 0)
10715 *(p
++) = hex_digit_table
[li_config_table
[j
].channel
>> 4];
10716 *(p
++) = hex_digit_table
[li_config_table
[j
].channel
& 0xf];
10719 dbug (1, dprintf ("[%06lx] CHANNEL %s",
10720 (dword
)(UnMapController (a
->Id
)), (char *) hex_line
));
10722 for (j
= 0; j
< n
; j
++)
10724 if ((j
& 0x7) == 0)
10726 *(p
++) = hex_digit_table
[li_config_table
[j
].chflags
>> 4];
10727 *(p
++) = hex_digit_table
[li_config_table
[j
].chflags
& 0xf];
10730 dbug (1, dprintf ("[%06lx] CHFLAG %s",
10731 (dword
)(UnMapController (a
->Id
)), (char *) hex_line
));
10732 for (i
= 0; i
< n
; i
++)
10735 for (j
= 0; j
< n
; j
++)
10737 if ((j
& 0x7) == 0)
10739 *(p
++) = hex_digit_table
[li_config_table
[i
].flag_table
[j
] >> 4];
10740 *(p
++) = hex_digit_table
[li_config_table
[i
].flag_table
[j
] & 0xf];
10743 dbug (1, dprintf ("[%06lx] FLAG[%02x]%s",
10744 (dword
)(UnMapController (a
->Id
)), i
, (char *) hex_line
));
10746 for (i
= 0; i
< n
; i
++)
10749 for (j
= 0; j
< n
; j
++)
10751 if ((j
& 0x7) == 0)
10753 *(p
++) = hex_digit_table
[li_config_table
[i
].coef_table
[j
] >> 4];
10754 *(p
++) = hex_digit_table
[li_config_table
[i
].coef_table
[j
] & 0xf];
10757 dbug (1, dprintf ("[%06lx] COEF[%02x]%s",
10758 (dword
)(UnMapController (a
->Id
)), i
, (char *) hex_line
));
10767 } mixer_write_prog_pri
[] =
10769 { LI_COEF_CH_CH
, 0 },
10770 { LI_COEF_CH_PC
, MIXER_COEF_LINE_TO_PC_FLAG
},
10771 { LI_COEF_PC_CH
, MIXER_COEF_LINE_FROM_PC_FLAG
},
10772 { LI_COEF_PC_PC
, MIXER_COEF_LINE_TO_PC_FLAG
| MIXER_COEF_LINE_FROM_PC_FLAG
}
10780 byte xconnect_override
;
10781 } mixer_write_prog_bri
[] =
10783 { 0, 0, LI_COEF_CH_CH
, 0x01 }, /* B to B */
10784 { 1, 0, LI_COEF_CH_CH
, 0x01 }, /* Alt B to B */
10785 { 0, 0, LI_COEF_PC_CH
, 0x80 }, /* PC to B */
10786 { 1, 0, LI_COEF_PC_CH
, 0x01 }, /* Alt PC to B */
10787 { 2, 0, LI_COEF_CH_CH
, 0x00 }, /* IC to B */
10788 { 3, 0, LI_COEF_CH_CH
, 0x00 }, /* Alt IC to B */
10789 { 0, 0, LI_COEF_CH_PC
, 0x80 }, /* B to PC */
10790 { 1, 0, LI_COEF_CH_PC
, 0x01 }, /* Alt B to PC */
10791 { 0, 0, LI_COEF_PC_PC
, 0x01 }, /* PC to PC */
10792 { 1, 0, LI_COEF_PC_PC
, 0x01 }, /* Alt PC to PC */
10793 { 2, 0, LI_COEF_CH_PC
, 0x00 }, /* IC to PC */
10794 { 3, 0, LI_COEF_CH_PC
, 0x00 }, /* Alt IC to PC */
10795 { 0, 2, LI_COEF_CH_CH
, 0x00 }, /* B to IC */
10796 { 1, 2, LI_COEF_CH_CH
, 0x00 }, /* Alt B to IC */
10797 { 0, 2, LI_COEF_PC_CH
, 0x00 }, /* PC to IC */
10798 { 1, 2, LI_COEF_PC_CH
, 0x00 }, /* Alt PC to IC */
10799 { 2, 2, LI_COEF_CH_CH
, 0x00 }, /* IC to IC */
10800 { 3, 2, LI_COEF_CH_CH
, 0x00 }, /* Alt IC to IC */
10801 { 1, 1, LI_COEF_CH_CH
, 0x01 }, /* Alt B to Alt B */
10802 { 0, 1, LI_COEF_CH_CH
, 0x01 }, /* B to Alt B */
10803 { 1, 1, LI_COEF_PC_CH
, 0x80 }, /* Alt PC to Alt B */
10804 { 0, 1, LI_COEF_PC_CH
, 0x01 }, /* PC to Alt B */
10805 { 3, 1, LI_COEF_CH_CH
, 0x00 }, /* Alt IC to Alt B */
10806 { 2, 1, LI_COEF_CH_CH
, 0x00 }, /* IC to Alt B */
10807 { 1, 1, LI_COEF_CH_PC
, 0x80 }, /* Alt B to Alt PC */
10808 { 0, 1, LI_COEF_CH_PC
, 0x01 }, /* B to Alt PC */
10809 { 1, 1, LI_COEF_PC_PC
, 0x01 }, /* Alt PC to Alt PC */
10810 { 0, 1, LI_COEF_PC_PC
, 0x01 }, /* PC to Alt PC */
10811 { 3, 1, LI_COEF_CH_PC
, 0x00 }, /* Alt IC to Alt PC */
10812 { 2, 1, LI_COEF_CH_PC
, 0x00 }, /* IC to Alt PC */
10813 { 1, 3, LI_COEF_CH_CH
, 0x00 }, /* Alt B to Alt IC */
10814 { 0, 3, LI_COEF_CH_CH
, 0x00 }, /* B to Alt IC */
10815 { 1, 3, LI_COEF_PC_CH
, 0x00 }, /* Alt PC to Alt IC */
10816 { 0, 3, LI_COEF_PC_CH
, 0x00 }, /* PC to Alt IC */
10817 { 3, 3, LI_COEF_CH_CH
, 0x00 }, /* Alt IC to Alt IC */
10818 { 2, 3, LI_COEF_CH_CH
, 0x00 } /* IC to Alt IC */
10821 static byte mixer_swapped_index_bri
[] =
10824 19, /* Alt B to B */
10826 21, /* Alt PC to B */
10828 23, /* Alt IC to B */
10830 25, /* Alt B to PC */
10832 27, /* Alt PC to PC */
10834 29, /* Alt IC to PC */
10836 31, /* Alt B to IC */
10838 33, /* Alt PC to IC */
10840 35, /* Alt IC to IC */
10841 0, /* Alt B to Alt B */
10842 1, /* B to Alt B */
10843 2, /* Alt PC to Alt B */
10844 3, /* PC to Alt B */
10845 4, /* Alt IC to Alt B */
10846 5, /* IC to Alt B */
10847 6, /* Alt B to Alt PC */
10848 7, /* B to Alt PC */
10849 8, /* Alt PC to Alt PC */
10850 9, /* PC to Alt PC */
10851 10, /* Alt IC to Alt PC */
10852 11, /* IC to Alt PC */
10853 12, /* Alt B to Alt IC */
10854 13, /* B to Alt IC */
10855 14, /* Alt PC to Alt IC */
10856 15, /* PC to Alt IC */
10857 16, /* Alt IC to Alt IC */
10858 17 /* IC to Alt IC */
10866 } xconnect_write_prog
[] =
10868 { LI_COEF_CH_CH
, false, false },
10869 { LI_COEF_CH_PC
, false, true },
10870 { LI_COEF_PC_CH
, true, false },
10871 { LI_COEF_PC_PC
, true, true }
10875 static void xconnect_query_addresses (PLCI
*plci
)
10877 DIVA_CAPI_ADAPTER
*a
;
10881 dbug (1, dprintf ("[%06lx] %s,%d: xconnect_query_addresses",
10882 (dword
)((plci
->Id
<< 8) | UnMapController (plci
->adapter
->Id
)),
10883 (char *)(FILE_
), __LINE__
));
10886 if (a
->li_pri
&& ((plci
->li_bchannel_id
== 0)
10887 || (li_config_table
[a
->li_base
+ (plci
->li_bchannel_id
- 1)].plci
!= plci
)))
10889 dbug (1, dprintf ("[%06x] %s,%d: Channel id wiped out",
10890 (dword
)((plci
->Id
<< 8) | UnMapController (plci
->adapter
->Id
)),
10891 (char *)(FILE_
), __LINE__
));
10894 p
= plci
->internal_req_buffer
;
10895 ch
= (a
->li_pri
) ? plci
->li_bchannel_id
- 1 : 0;
10896 *(p
++) = UDATA_REQUEST_XCONNECT_FROM
;
10899 *(p
++) = (byte
)(w
>> 8);
10900 w
= ch
| XCONNECT_CHANNEL_PORT_PC
;
10902 *(p
++) = (byte
)(w
>> 8);
10903 plci
->NData
[0].P
= plci
->internal_req_buffer
;
10904 plci
->NData
[0].PLength
= p
- plci
->internal_req_buffer
;
10905 plci
->NL
.X
= plci
->NData
;
10906 plci
->NL
.ReqCh
= 0;
10907 plci
->NL
.Req
= plci
->nl_req
= (byte
) N_UDATA
;
10908 plci
->adapter
->request (&plci
->NL
);
10912 static void xconnect_write_coefs (PLCI
*plci
, word internal_command
)
10915 dbug (1, dprintf ("[%06lx] %s,%d: xconnect_write_coefs %04x",
10916 (dword
)((plci
->Id
<< 8) | UnMapController (plci
->adapter
->Id
)),
10917 (char *)(FILE_
), __LINE__
, internal_command
));
10919 plci
->li_write_command
= internal_command
;
10920 plci
->li_write_channel
= 0;
10924 static byte
xconnect_write_coefs_process (dword Id
, PLCI
*plci
, byte Rc
)
10926 DIVA_CAPI_ADAPTER
*a
;
10927 word w
, n
, i
, j
, r
, s
, to_ch
;
10930 struct xconnect_transfer_address_s
*transfer_address
;
10931 byte ch_map
[MIXER_CHANNELS_BRI
];
10933 dbug (1, dprintf ("[%06x] %s,%d: xconnect_write_coefs_process %02x %d",
10934 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
, plci
->li_write_channel
));
10937 if ((plci
->li_bchannel_id
== 0)
10938 || (li_config_table
[a
->li_base
+ (plci
->li_bchannel_id
- 1)].plci
!= plci
))
10940 dbug (1, dprintf ("[%06x] %s,%d: Channel id wiped out",
10941 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
10944 i
= a
->li_base
+ (plci
->li_bchannel_id
- 1);
10945 j
= plci
->li_write_channel
;
10946 p
= plci
->internal_req_buffer
;
10949 if ((Rc
!= OK
) && (Rc
!= OK_FC
))
10951 dbug (1, dprintf ("[%06lx] %s,%d: LI write coefs failed %02x",
10952 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
));
10956 if (li_config_table
[i
].adapter
->manufacturer_features
& MANUFACTURER_FEATURE_XCONNECT
)
10960 if (j
< li_total_channels
)
10962 if (li_config_table
[i
].channel
& LI_CHANNEL_ADDRESSES_SET
)
10964 s
= ((li_config_table
[i
].send_b
.card_address
.low
| li_config_table
[i
].send_b
.card_address
.high
) ?
10965 (LI_COEF_CH_CH
| LI_COEF_CH_PC
| LI_COEF_PC_CH
| LI_COEF_PC_PC
) : (LI_COEF_CH_PC
| LI_COEF_PC_PC
)) &
10966 ((li_config_table
[i
].send_pc
.card_address
.low
| li_config_table
[i
].send_pc
.card_address
.high
) ?
10967 (LI_COEF_CH_CH
| LI_COEF_CH_PC
| LI_COEF_PC_CH
| LI_COEF_PC_PC
) : (LI_COEF_CH_CH
| LI_COEF_PC_CH
));
10969 r
= ((li_config_table
[i
].coef_table
[j
] & 0xf) ^ (li_config_table
[i
].coef_table
[j
] >> 4));
10970 while ((j
< li_total_channels
)
10972 || (!(li_config_table
[j
].channel
& LI_CHANNEL_ADDRESSES_SET
))
10973 || (!li_config_table
[j
].adapter
->li_pri
10974 && (j
>= li_config_table
[j
].adapter
->li_base
+ MIXER_BCHANNELS_BRI
))
10975 || (((li_config_table
[j
].send_b
.card_address
.low
!= li_config_table
[i
].send_b
.card_address
.low
)
10976 || (li_config_table
[j
].send_b
.card_address
.high
!= li_config_table
[i
].send_b
.card_address
.high
))
10977 && (!(a
->manufacturer_features
& MANUFACTURER_FEATURE_DMACONNECT
)
10978 || !(li_config_table
[j
].adapter
->manufacturer_features
& MANUFACTURER_FEATURE_DMACONNECT
)))
10979 || ((li_config_table
[j
].adapter
->li_base
!= a
->li_base
)
10981 ((li_config_table
[j
].send_b
.card_address
.low
| li_config_table
[j
].send_b
.card_address
.high
) ?
10982 (LI_COEF_CH_CH
| LI_COEF_CH_PC
| LI_COEF_PC_CH
| LI_COEF_PC_PC
) : (LI_COEF_PC_CH
| LI_COEF_PC_PC
)) &
10983 ((li_config_table
[j
].send_pc
.card_address
.low
| li_config_table
[j
].send_pc
.card_address
.high
) ?
10984 (LI_COEF_CH_CH
| LI_COEF_CH_PC
| LI_COEF_PC_CH
| LI_COEF_PC_PC
) : (LI_COEF_CH_CH
| LI_COEF_CH_PC
))))))
10987 if (j
< li_total_channels
)
10988 r
= ((li_config_table
[i
].coef_table
[j
] & 0xf) ^ (li_config_table
[i
].coef_table
[j
] >> 4));
10991 if (j
< li_total_channels
)
10993 plci
->internal_command
= plci
->li_write_command
;
10994 if (plci_nl_busy (plci
))
10996 to_ch
= (a
->li_pri
) ? plci
->li_bchannel_id
- 1 : 0;
10997 *(p
++) = UDATA_REQUEST_XCONNECT_TO
;
11000 if (li_config_table
[j
].adapter
->li_base
!= a
->li_base
)
11003 ((li_config_table
[j
].send_b
.card_address
.low
| li_config_table
[j
].send_b
.card_address
.high
) ?
11004 (LI_COEF_CH_CH
| LI_COEF_CH_PC
| LI_COEF_PC_CH
| LI_COEF_PC_PC
) : (LI_COEF_PC_CH
| LI_COEF_PC_PC
)) &
11005 ((li_config_table
[j
].send_pc
.card_address
.low
| li_config_table
[j
].send_pc
.card_address
.high
) ?
11006 (LI_COEF_CH_CH
| LI_COEF_CH_PC
| LI_COEF_PC_CH
| LI_COEF_PC_PC
) : (LI_COEF_CH_CH
| LI_COEF_CH_PC
));
11011 if (r
& xconnect_write_prog
[n
].mask
)
11013 if (xconnect_write_prog
[n
].from_pc
)
11014 transfer_address
= &(li_config_table
[j
].send_pc
);
11016 transfer_address
= &(li_config_table
[j
].send_b
);
11017 d
= transfer_address
->card_address
.low
;
11019 *(p
++) = (byte
)(d
>> 8);
11020 *(p
++) = (byte
)(d
>> 16);
11021 *(p
++) = (byte
)(d
>> 24);
11022 d
= transfer_address
->card_address
.high
;
11024 *(p
++) = (byte
)(d
>> 8);
11025 *(p
++) = (byte
)(d
>> 16);
11026 *(p
++) = (byte
)(d
>> 24);
11027 d
= transfer_address
->offset
;
11029 *(p
++) = (byte
)(d
>> 8);
11030 *(p
++) = (byte
)(d
>> 16);
11031 *(p
++) = (byte
)(d
>> 24);
11032 w
= xconnect_write_prog
[n
].to_pc
? to_ch
| XCONNECT_CHANNEL_PORT_PC
: to_ch
;
11034 *(p
++) = (byte
)(w
>> 8);
11035 w
= ((li_config_table
[i
].coef_table
[j
] & xconnect_write_prog
[n
].mask
) == 0) ? 0x01 :
11036 (li_config_table
[i
].adapter
->u_law
?
11037 (li_config_table
[j
].adapter
->u_law
? 0x80 : 0x86) :
11038 (li_config_table
[j
].adapter
->u_law
? 0x7a : 0x80));
11041 li_config_table
[i
].coef_table
[j
] ^= xconnect_write_prog
[n
].mask
<< 4;
11044 } while ((n
< ARRAY_SIZE(xconnect_write_prog
))
11045 && ((p
- plci
->internal_req_buffer
) + 16 < INTERNAL_REQ_BUFFER_SIZE
));
11046 if (n
== ARRAY_SIZE(xconnect_write_prog
))
11051 if (j
< li_total_channels
)
11052 r
= ((li_config_table
[i
].coef_table
[j
] & 0xf) ^ (li_config_table
[i
].coef_table
[j
] >> 4));
11053 } while ((j
< li_total_channels
)
11055 || (!(li_config_table
[j
].channel
& LI_CHANNEL_ADDRESSES_SET
))
11056 || (!li_config_table
[j
].adapter
->li_pri
11057 && (j
>= li_config_table
[j
].adapter
->li_base
+ MIXER_BCHANNELS_BRI
))
11058 || (((li_config_table
[j
].send_b
.card_address
.low
!= li_config_table
[i
].send_b
.card_address
.low
)
11059 || (li_config_table
[j
].send_b
.card_address
.high
!= li_config_table
[i
].send_b
.card_address
.high
))
11060 && (!(a
->manufacturer_features
& MANUFACTURER_FEATURE_DMACONNECT
)
11061 || !(li_config_table
[j
].adapter
->manufacturer_features
& MANUFACTURER_FEATURE_DMACONNECT
)))
11062 || ((li_config_table
[j
].adapter
->li_base
!= a
->li_base
)
11064 ((li_config_table
[j
].send_b
.card_address
.low
| li_config_table
[j
].send_b
.card_address
.high
) ?
11065 (LI_COEF_CH_CH
| LI_COEF_CH_PC
| LI_COEF_PC_CH
| LI_COEF_PC_PC
) : (LI_COEF_PC_CH
| LI_COEF_PC_PC
)) &
11066 ((li_config_table
[j
].send_pc
.card_address
.low
| li_config_table
[j
].send_pc
.card_address
.high
) ?
11067 (LI_COEF_CH_CH
| LI_COEF_CH_PC
| LI_COEF_PC_CH
| LI_COEF_PC_PC
) : (LI_COEF_CH_CH
| LI_COEF_CH_PC
))))));
11069 } while ((j
< li_total_channels
)
11070 && ((p
- plci
->internal_req_buffer
) + 16 < INTERNAL_REQ_BUFFER_SIZE
));
11072 else if (j
== li_total_channels
)
11074 plci
->internal_command
= plci
->li_write_command
;
11075 if (plci_nl_busy (plci
))
11079 *(p
++) = UDATA_REQUEST_SET_MIXER_COEFS_PRI_SYNC
;
11081 if (li_config_table
[i
].channel
& LI_CHANNEL_TX_DATA
)
11082 w
|= MIXER_FEATURE_ENABLE_TX_DATA
;
11083 if (li_config_table
[i
].channel
& LI_CHANNEL_RX_DATA
)
11084 w
|= MIXER_FEATURE_ENABLE_RX_DATA
;
11086 *(p
++) = (byte
)(w
>> 8);
11090 *(p
++) = UDATA_REQUEST_SET_MIXER_COEFS_BRI
;
11092 if ((plci
->tel
== ADV_VOICE
) && (plci
== a
->AdvSignalPLCI
)
11093 && (ADV_VOICE_NEW_COEF_BASE
+ sizeof(word
) <= a
->adv_voice_coef_length
))
11095 w
= GET_WORD (a
->adv_voice_coef_buffer
+ ADV_VOICE_NEW_COEF_BASE
);
11097 if (li_config_table
[i
].channel
& LI_CHANNEL_TX_DATA
)
11098 w
|= MIXER_FEATURE_ENABLE_TX_DATA
;
11099 if (li_config_table
[i
].channel
& LI_CHANNEL_RX_DATA
)
11100 w
|= MIXER_FEATURE_ENABLE_RX_DATA
;
11102 *(p
++) = (byte
)(w
>> 8);
11103 for (j
= 0; j
< sizeof(ch_map
); j
+= 2)
11105 if (plci
->li_bchannel_id
== 2)
11107 ch_map
[j
] = (byte
)(j
+1);
11108 ch_map
[j
+1] = (byte
) j
;
11112 ch_map
[j
] = (byte
) j
;
11113 ch_map
[j
+1] = (byte
)(j
+1);
11116 for (n
= 0; n
< ARRAY_SIZE(mixer_write_prog_bri
); n
++)
11118 i
= a
->li_base
+ ch_map
[mixer_write_prog_bri
[n
].to_ch
];
11119 j
= a
->li_base
+ ch_map
[mixer_write_prog_bri
[n
].from_ch
];
11120 if (li_config_table
[i
].channel
& li_config_table
[j
].channel
& LI_CHANNEL_INVOLVED
)
11122 *p
= (mixer_write_prog_bri
[n
].xconnect_override
!= 0) ?
11123 mixer_write_prog_bri
[n
].xconnect_override
:
11124 ((li_config_table
[i
].coef_table
[j
] & mixer_write_prog_bri
[n
].mask
) ? 0x80 : 0x01);
11125 if ((i
>= a
->li_base
+ MIXER_BCHANNELS_BRI
) || (j
>= a
->li_base
+ MIXER_BCHANNELS_BRI
))
11127 w
= ((li_config_table
[i
].coef_table
[j
] & 0xf) ^ (li_config_table
[i
].coef_table
[j
] >> 4));
11128 li_config_table
[i
].coef_table
[j
] ^= (w
& mixer_write_prog_bri
[n
].mask
) << 4;
11134 if ((a
->AdvSignalPLCI
!= NULL
) && (a
->AdvSignalPLCI
->tel
== ADV_VOICE
))
11136 w
= (plci
== a
->AdvSignalPLCI
) ? n
: mixer_swapped_index_bri
[n
];
11137 if (ADV_VOICE_NEW_COEF_BASE
+ sizeof(word
) + w
< a
->adv_voice_coef_length
)
11138 *p
= a
->adv_voice_coef_buffer
[ADV_VOICE_NEW_COEF_BASE
+ sizeof(word
) + w
];
11144 j
= li_total_channels
+ 1;
11149 if (j
<= li_total_channels
)
11151 plci
->internal_command
= plci
->li_write_command
;
11152 if (plci_nl_busy (plci
))
11154 if (j
< a
->li_base
)
11158 *(p
++) = UDATA_REQUEST_SET_MIXER_COEFS_PRI_SYNC
;
11160 if (li_config_table
[i
].channel
& LI_CHANNEL_TX_DATA
)
11161 w
|= MIXER_FEATURE_ENABLE_TX_DATA
;
11162 if (li_config_table
[i
].channel
& LI_CHANNEL_RX_DATA
)
11163 w
|= MIXER_FEATURE_ENABLE_RX_DATA
;
11165 *(p
++) = (byte
)(w
>> 8);
11166 for (n
= 0; n
< ARRAY_SIZE(mixer_write_prog_pri
); n
++)
11168 *(p
++) = (byte
)((plci
->li_bchannel_id
- 1) | mixer_write_prog_pri
[n
].line_flags
);
11169 for (j
= a
->li_base
; j
< a
->li_base
+ MIXER_CHANNELS_PRI
; j
++)
11171 w
= ((li_config_table
[i
].coef_table
[j
] & 0xf) ^ (li_config_table
[i
].coef_table
[j
] >> 4));
11172 if (w
& mixer_write_prog_pri
[n
].mask
)
11174 *(p
++) = (li_config_table
[i
].coef_table
[j
] & mixer_write_prog_pri
[n
].mask
) ? 0x80 : 0x01;
11175 li_config_table
[i
].coef_table
[j
] ^= mixer_write_prog_pri
[n
].mask
<< 4;
11180 *(p
++) = (byte
)((plci
->li_bchannel_id
- 1) | MIXER_COEF_LINE_ROW_FLAG
| mixer_write_prog_pri
[n
].line_flags
);
11181 for (j
= a
->li_base
; j
< a
->li_base
+ MIXER_CHANNELS_PRI
; j
++)
11183 w
= ((li_config_table
[j
].coef_table
[i
] & 0xf) ^ (li_config_table
[j
].coef_table
[i
] >> 4));
11184 if (w
& mixer_write_prog_pri
[n
].mask
)
11186 *(p
++) = (li_config_table
[j
].coef_table
[i
] & mixer_write_prog_pri
[n
].mask
) ? 0x80 : 0x01;
11187 li_config_table
[j
].coef_table
[i
] ^= mixer_write_prog_pri
[n
].mask
<< 4;
11196 *(p
++) = UDATA_REQUEST_SET_MIXER_COEFS_BRI
;
11198 if ((plci
->tel
== ADV_VOICE
) && (plci
== a
->AdvSignalPLCI
)
11199 && (ADV_VOICE_NEW_COEF_BASE
+ sizeof(word
) <= a
->adv_voice_coef_length
))
11201 w
= GET_WORD (a
->adv_voice_coef_buffer
+ ADV_VOICE_NEW_COEF_BASE
);
11203 if (li_config_table
[i
].channel
& LI_CHANNEL_TX_DATA
)
11204 w
|= MIXER_FEATURE_ENABLE_TX_DATA
;
11205 if (li_config_table
[i
].channel
& LI_CHANNEL_RX_DATA
)
11206 w
|= MIXER_FEATURE_ENABLE_RX_DATA
;
11208 *(p
++) = (byte
)(w
>> 8);
11209 for (j
= 0; j
< sizeof(ch_map
); j
+= 2)
11211 if (plci
->li_bchannel_id
== 2)
11213 ch_map
[j
] = (byte
)(j
+1);
11214 ch_map
[j
+1] = (byte
) j
;
11218 ch_map
[j
] = (byte
) j
;
11219 ch_map
[j
+1] = (byte
)(j
+1);
11222 for (n
= 0; n
< ARRAY_SIZE(mixer_write_prog_bri
); n
++)
11224 i
= a
->li_base
+ ch_map
[mixer_write_prog_bri
[n
].to_ch
];
11225 j
= a
->li_base
+ ch_map
[mixer_write_prog_bri
[n
].from_ch
];
11226 if (li_config_table
[i
].channel
& li_config_table
[j
].channel
& LI_CHANNEL_INVOLVED
)
11228 *p
= ((li_config_table
[i
].coef_table
[j
] & mixer_write_prog_bri
[n
].mask
) ? 0x80 : 0x01);
11229 w
= ((li_config_table
[i
].coef_table
[j
] & 0xf) ^ (li_config_table
[i
].coef_table
[j
] >> 4));
11230 li_config_table
[i
].coef_table
[j
] ^= (w
& mixer_write_prog_bri
[n
].mask
) << 4;
11235 if ((a
->AdvSignalPLCI
!= NULL
) && (a
->AdvSignalPLCI
->tel
== ADV_VOICE
))
11237 w
= (plci
== a
->AdvSignalPLCI
) ? n
: mixer_swapped_index_bri
[n
];
11238 if (ADV_VOICE_NEW_COEF_BASE
+ sizeof(word
) + w
< a
->adv_voice_coef_length
)
11239 *p
= a
->adv_voice_coef_buffer
[ADV_VOICE_NEW_COEF_BASE
+ sizeof(word
) + w
];
11245 j
= li_total_channels
+ 1;
11248 plci
->li_write_channel
= j
;
11249 if (p
!= plci
->internal_req_buffer
)
11251 plci
->NData
[0].P
= plci
->internal_req_buffer
;
11252 plci
->NData
[0].PLength
= p
- plci
->internal_req_buffer
;
11253 plci
->NL
.X
= plci
->NData
;
11254 plci
->NL
.ReqCh
= 0;
11255 plci
->NL
.Req
= plci
->nl_req
= (byte
) N_UDATA
;
11256 plci
->adapter
->request (&plci
->NL
);
11262 static void mixer_notify_update (PLCI
*plci
, byte others
)
11264 DIVA_CAPI_ADAPTER
*a
;
11267 byte msg
[sizeof(CAPI_MSG_HEADER
) + 6];
11269 dbug (1, dprintf ("[%06lx] %s,%d: mixer_notify_update %d",
11270 (dword
)((plci
->Id
<< 8) | UnMapController (plci
->adapter
->Id
)),
11271 (char *)(FILE_
), __LINE__
, others
));
11274 if (a
->profile
.Global_Options
& GL_LINE_INTERCONNECT_SUPPORTED
)
11277 plci
->li_notify_update
= true;
11281 notify_plci
= NULL
;
11284 while ((i
< li_total_channels
) && (li_config_table
[i
].plci
== NULL
))
11286 if (i
< li_total_channels
)
11287 notify_plci
= li_config_table
[i
++].plci
;
11291 if ((plci
->li_bchannel_id
!= 0)
11292 && (li_config_table
[a
->li_base
+ (plci
->li_bchannel_id
- 1)].plci
== plci
))
11294 notify_plci
= plci
;
11297 if ((notify_plci
!= NULL
)
11298 && !notify_plci
->li_notify_update
11299 && (notify_plci
->appl
!= NULL
)
11300 && (notify_plci
->State
)
11301 && notify_plci
->NL
.Id
&& !notify_plci
->nl_remove_id
)
11303 notify_plci
->li_notify_update
= true;
11304 ((CAPI_MSG
*) msg
)->header
.length
= 18;
11305 ((CAPI_MSG
*) msg
)->header
.appl_id
= notify_plci
->appl
->Id
;
11306 ((CAPI_MSG
*) msg
)->header
.command
= _FACILITY_R
;
11307 ((CAPI_MSG
*) msg
)->header
.number
= 0;
11308 ((CAPI_MSG
*) msg
)->header
.controller
= notify_plci
->adapter
->Id
;
11309 ((CAPI_MSG
*) msg
)->header
.plci
= notify_plci
->Id
;
11310 ((CAPI_MSG
*) msg
)->header
.ncci
= 0;
11311 ((CAPI_MSG
*) msg
)->info
.facility_req
.Selector
= SELECTOR_LINE_INTERCONNECT
;
11312 ((CAPI_MSG
*) msg
)->info
.facility_req
.structs
[0] = 3;
11313 PUT_WORD (&(((CAPI_MSG
*) msg
)->info
.facility_req
.structs
[1]), LI_REQ_SILENT_UPDATE
);
11314 ((CAPI_MSG
*) msg
)->info
.facility_req
.structs
[3] = 0;
11315 w
= api_put (notify_plci
->appl
, (CAPI_MSG
*) msg
);
11316 if (w
!= _QUEUE_FULL
)
11320 dbug (1, dprintf ("[%06lx] %s,%d: Interconnect notify failed %06x %d",
11321 (dword
)((plci
->Id
<< 8) | UnMapController (plci
->adapter
->Id
)),
11322 (char *)(FILE_
), __LINE__
,
11323 (dword
)((notify_plci
->Id
<< 8) | UnMapController (notify_plci
->adapter
->Id
)), w
));
11325 notify_plci
->li_notify_update
= false;
11328 } while (others
&& (notify_plci
!= NULL
));
11330 plci
->li_notify_update
= false;
11335 static void mixer_clear_config (PLCI
*plci
)
11337 DIVA_CAPI_ADAPTER
*a
;
11340 dbug (1, dprintf ("[%06lx] %s,%d: mixer_clear_config",
11341 (dword
)((plci
->Id
<< 8) | UnMapController (plci
->adapter
->Id
)),
11342 (char *)(FILE_
), __LINE__
));
11344 plci
->li_notify_update
= false;
11345 plci
->li_plci_b_write_pos
= 0;
11346 plci
->li_plci_b_read_pos
= 0;
11347 plci
->li_plci_b_req_pos
= 0;
11349 if ((plci
->li_bchannel_id
!= 0)
11350 && (li_config_table
[a
->li_base
+ (plci
->li_bchannel_id
- 1)].plci
== plci
))
11352 i
= a
->li_base
+ (plci
->li_bchannel_id
- 1);
11353 li_config_table
[i
].curchnl
= 0;
11354 li_config_table
[i
].channel
= 0;
11355 li_config_table
[i
].chflags
= 0;
11356 for (j
= 0; j
< li_total_channels
; j
++)
11358 li_config_table
[j
].flag_table
[i
] = 0;
11359 li_config_table
[i
].flag_table
[j
] = 0;
11360 li_config_table
[i
].coef_table
[j
] = 0;
11361 li_config_table
[j
].coef_table
[i
] = 0;
11365 li_config_table
[i
].coef_table
[i
] |= LI_COEF_CH_PC_SET
| LI_COEF_PC_CH_SET
;
11366 if ((plci
->tel
== ADV_VOICE
) && (plci
== a
->AdvSignalPLCI
))
11368 i
= a
->li_base
+ MIXER_IC_CHANNEL_BASE
+ (plci
->li_bchannel_id
- 1);
11369 li_config_table
[i
].curchnl
= 0;
11370 li_config_table
[i
].channel
= 0;
11371 li_config_table
[i
].chflags
= 0;
11372 for (j
= 0; j
< li_total_channels
; j
++)
11374 li_config_table
[i
].flag_table
[j
] = 0;
11375 li_config_table
[j
].flag_table
[i
] = 0;
11376 li_config_table
[i
].coef_table
[j
] = 0;
11377 li_config_table
[j
].coef_table
[i
] = 0;
11379 if (a
->manufacturer_features
& MANUFACTURER_FEATURE_SLAVE_CODEC
)
11381 i
= a
->li_base
+ MIXER_IC_CHANNEL_BASE
+ (2 - plci
->li_bchannel_id
);
11382 li_config_table
[i
].curchnl
= 0;
11383 li_config_table
[i
].channel
= 0;
11384 li_config_table
[i
].chflags
= 0;
11385 for (j
= 0; j
< li_total_channels
; j
++)
11387 li_config_table
[i
].flag_table
[j
] = 0;
11388 li_config_table
[j
].flag_table
[i
] = 0;
11389 li_config_table
[i
].coef_table
[j
] = 0;
11390 li_config_table
[j
].coef_table
[i
] = 0;
11399 static void mixer_prepare_switch (dword Id
, PLCI
*plci
)
11402 dbug (1, dprintf ("[%06lx] %s,%d: mixer_prepare_switch",
11403 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
11407 mixer_indication_coefs_set (Id
, plci
);
11408 } while (plci
->li_plci_b_read_pos
!= plci
->li_plci_b_req_pos
);
11412 static word
mixer_save_config (dword Id
, PLCI
*plci
, byte Rc
)
11414 DIVA_CAPI_ADAPTER
*a
;
11417 dbug (1, dprintf ("[%06lx] %s,%d: mixer_save_config %02x %d",
11418 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
, plci
->adjust_b_state
));
11421 if ((plci
->li_bchannel_id
!= 0)
11422 && (li_config_table
[a
->li_base
+ (plci
->li_bchannel_id
- 1)].plci
== plci
))
11424 i
= a
->li_base
+ (plci
->li_bchannel_id
- 1);
11425 for (j
= 0; j
< li_total_channels
; j
++)
11427 li_config_table
[i
].coef_table
[j
] &= 0xf;
11428 li_config_table
[j
].coef_table
[i
] &= 0xf;
11431 li_config_table
[i
].coef_table
[i
] |= LI_COEF_CH_PC_SET
| LI_COEF_PC_CH_SET
;
11437 static word
mixer_restore_config (dword Id
, PLCI
*plci
, byte Rc
)
11439 DIVA_CAPI_ADAPTER
*a
;
11442 dbug (1, dprintf ("[%06lx] %s,%d: mixer_restore_config %02x %d",
11443 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
, plci
->adjust_b_state
));
11447 if ((plci
->B1_facilities
& B1_FACILITY_MIXER
)
11448 && (plci
->li_bchannel_id
!= 0)
11449 && (li_config_table
[a
->li_base
+ (plci
->li_bchannel_id
- 1)].plci
== plci
))
11451 switch (plci
->adjust_b_state
)
11453 case ADJUST_B_RESTORE_MIXER_1
:
11454 if (a
->manufacturer_features
& MANUFACTURER_FEATURE_XCONNECT
)
11456 plci
->internal_command
= plci
->adjust_b_command
;
11457 if (plci_nl_busy (plci
))
11459 plci
->adjust_b_state
= ADJUST_B_RESTORE_MIXER_1
;
11462 xconnect_query_addresses (plci
);
11463 plci
->adjust_b_state
= ADJUST_B_RESTORE_MIXER_2
;
11466 plci
->adjust_b_state
= ADJUST_B_RESTORE_MIXER_5
;
11468 case ADJUST_B_RESTORE_MIXER_2
:
11469 case ADJUST_B_RESTORE_MIXER_3
:
11470 case ADJUST_B_RESTORE_MIXER_4
:
11471 if ((Rc
!= OK
) && (Rc
!= OK_FC
) && (Rc
!= 0))
11473 dbug (1, dprintf ("[%06lx] %s,%d: Adjust B query addresses failed %02x",
11474 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
));
11475 Info
= _WRONG_STATE
;
11480 if (plci
->adjust_b_state
== ADJUST_B_RESTORE_MIXER_2
)
11481 plci
->adjust_b_state
= ADJUST_B_RESTORE_MIXER_3
;
11482 else if (plci
->adjust_b_state
== ADJUST_B_RESTORE_MIXER_4
)
11483 plci
->adjust_b_state
= ADJUST_B_RESTORE_MIXER_5
;
11487 if (plci
->adjust_b_state
== ADJUST_B_RESTORE_MIXER_2
)
11488 plci
->adjust_b_state
= ADJUST_B_RESTORE_MIXER_4
;
11489 else if (plci
->adjust_b_state
== ADJUST_B_RESTORE_MIXER_3
)
11490 plci
->adjust_b_state
= ADJUST_B_RESTORE_MIXER_5
;
11492 if (plci
->adjust_b_state
!= ADJUST_B_RESTORE_MIXER_5
)
11494 plci
->internal_command
= plci
->adjust_b_command
;
11497 case ADJUST_B_RESTORE_MIXER_5
:
11498 xconnect_write_coefs (plci
, plci
->adjust_b_command
);
11499 plci
->adjust_b_state
= ADJUST_B_RESTORE_MIXER_6
;
11501 case ADJUST_B_RESTORE_MIXER_6
:
11502 if (!xconnect_write_coefs_process (Id
, plci
, Rc
))
11504 dbug (1, dprintf ("[%06lx] %s,%d: Write mixer coefs failed",
11505 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
11506 Info
= _FACILITY_NOT_SUPPORTED
;
11509 if (plci
->internal_command
)
11511 plci
->adjust_b_state
= ADJUST_B_RESTORE_MIXER_7
;
11512 case ADJUST_B_RESTORE_MIXER_7
:
11520 static void mixer_command (dword Id
, PLCI
*plci
, byte Rc
)
11522 DIVA_CAPI_ADAPTER
*a
;
11523 word i
, internal_command
, Info
;
11525 dbug (1, dprintf ("[%06lx] %s,%d: mixer_command %02x %04x %04x",
11526 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
, plci
->internal_command
,
11531 internal_command
= plci
->internal_command
;
11532 plci
->internal_command
= 0;
11533 switch (plci
->li_cmd
)
11535 case LI_REQ_CONNECT
:
11536 case LI_REQ_DISCONNECT
:
11537 case LI_REQ_SILENT_UPDATE
:
11538 switch (internal_command
)
11541 if (plci
->li_channel_bits
& LI_CHANNEL_INVOLVED
)
11543 adjust_b1_resource (Id
, plci
, NULL
, (word
)(plci
->B1_facilities
|
11544 B1_FACILITY_MIXER
), MIXER_COMMAND_1
);
11546 case MIXER_COMMAND_1
:
11547 if (plci
->li_channel_bits
& LI_CHANNEL_INVOLVED
)
11549 if (adjust_b_process (Id
, plci
, Rc
) != GOOD
)
11551 dbug (1, dprintf ("[%06lx] %s,%d: Load mixer failed",
11552 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
11553 Info
= _FACILITY_NOT_SUPPORTED
;
11556 if (plci
->internal_command
)
11559 plci
->li_plci_b_req_pos
= plci
->li_plci_b_write_pos
;
11560 if ((plci
->li_channel_bits
& LI_CHANNEL_INVOLVED
)
11561 || ((get_b1_facilities (plci
, plci
->B1_resource
) & B1_FACILITY_MIXER
)
11562 && (add_b1_facilities (plci
, plci
->B1_resource
, (word
)(plci
->B1_facilities
&
11563 ~B1_FACILITY_MIXER
)) == plci
->B1_resource
)))
11565 xconnect_write_coefs (plci
, MIXER_COMMAND_2
);
11571 mixer_indication_coefs_set (Id
, plci
);
11572 } while (plci
->li_plci_b_read_pos
!= plci
->li_plci_b_req_pos
);
11574 case MIXER_COMMAND_2
:
11575 if ((plci
->li_channel_bits
& LI_CHANNEL_INVOLVED
)
11576 || ((get_b1_facilities (plci
, plci
->B1_resource
) & B1_FACILITY_MIXER
)
11577 && (add_b1_facilities (plci
, plci
->B1_resource
, (word
)(plci
->B1_facilities
&
11578 ~B1_FACILITY_MIXER
)) == plci
->B1_resource
)))
11580 if (!xconnect_write_coefs_process (Id
, plci
, Rc
))
11582 dbug (1, dprintf ("[%06lx] %s,%d: Write mixer coefs failed",
11583 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
11584 if (plci
->li_plci_b_write_pos
!= plci
->li_plci_b_req_pos
)
11588 plci
->li_plci_b_write_pos
= (plci
->li_plci_b_write_pos
== 0) ?
11589 LI_PLCI_B_QUEUE_ENTRIES
-1 : plci
->li_plci_b_write_pos
- 1;
11590 i
= (plci
->li_plci_b_write_pos
== 0) ?
11591 LI_PLCI_B_QUEUE_ENTRIES
-1 : plci
->li_plci_b_write_pos
- 1;
11592 } while ((plci
->li_plci_b_write_pos
!= plci
->li_plci_b_req_pos
)
11593 && !(plci
->li_plci_b_queue
[i
] & LI_PLCI_B_LAST_FLAG
));
11595 Info
= _FACILITY_NOT_SUPPORTED
;
11598 if (plci
->internal_command
)
11601 if (!(plci
->li_channel_bits
& LI_CHANNEL_INVOLVED
))
11603 adjust_b1_resource (Id
, plci
, NULL
, (word
)(plci
->B1_facilities
&
11604 ~B1_FACILITY_MIXER
), MIXER_COMMAND_3
);
11606 case MIXER_COMMAND_3
:
11607 if (!(plci
->li_channel_bits
& LI_CHANNEL_INVOLVED
))
11609 if (adjust_b_process (Id
, plci
, Rc
) != GOOD
)
11611 dbug (1, dprintf ("[%06lx] %s,%d: Unload mixer failed",
11612 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
11613 Info
= _FACILITY_NOT_SUPPORTED
;
11616 if (plci
->internal_command
)
11623 if ((plci
->li_bchannel_id
== 0)
11624 || (li_config_table
[a
->li_base
+ (plci
->li_bchannel_id
- 1)].plci
!= plci
))
11626 dbug (1, dprintf ("[%06x] %s,%d: Channel id wiped out %d",
11627 UnMapId (Id
), (char *)(FILE_
), __LINE__
, (int)(plci
->li_bchannel_id
)));
11631 i
= a
->li_base
+ (plci
->li_bchannel_id
- 1);
11632 li_config_table
[i
].curchnl
= plci
->li_channel_bits
;
11633 if (!a
->li_pri
&& (plci
->tel
== ADV_VOICE
) && (plci
== a
->AdvSignalPLCI
))
11635 i
= a
->li_base
+ MIXER_IC_CHANNEL_BASE
+ (plci
->li_bchannel_id
- 1);
11636 li_config_table
[i
].curchnl
= plci
->li_channel_bits
;
11637 if (a
->manufacturer_features
& MANUFACTURER_FEATURE_SLAVE_CODEC
)
11639 i
= a
->li_base
+ MIXER_IC_CHANNEL_BASE
+ (2 - plci
->li_bchannel_id
);
11640 li_config_table
[i
].curchnl
= plci
->li_channel_bits
;
11647 static void li_update_connect (dword Id
, DIVA_CAPI_ADAPTER
*a
, PLCI
*plci
,
11648 dword plci_b_id
, byte connect
, dword li_flags
)
11650 word i
, ch_a
, ch_a_v
, ch_a_s
, ch_b
, ch_b_v
, ch_b_s
;
11652 DIVA_CAPI_ADAPTER
*a_b
;
11654 a_b
= &(adapter
[MapController ((byte
)(plci_b_id
& 0x7f)) - 1]);
11655 plci_b
= &(a_b
->plci
[((plci_b_id
>> 8) & 0xff) - 1]);
11656 ch_a
= a
->li_base
+ (plci
->li_bchannel_id
- 1);
11657 if (!a
->li_pri
&& (plci
->tel
== ADV_VOICE
)
11658 && (plci
== a
->AdvSignalPLCI
) && (Id
& EXT_CONTROLLER
))
11660 ch_a_v
= ch_a
+ MIXER_IC_CHANNEL_BASE
;
11661 ch_a_s
= (a
->manufacturer_features
& MANUFACTURER_FEATURE_SLAVE_CODEC
) ?
11662 a
->li_base
+ MIXER_IC_CHANNEL_BASE
+ (2 - plci
->li_bchannel_id
) : ch_a_v
;
11669 ch_b
= a_b
->li_base
+ (plci_b
->li_bchannel_id
- 1);
11670 if (!a_b
->li_pri
&& (plci_b
->tel
== ADV_VOICE
)
11671 && (plci_b
== a_b
->AdvSignalPLCI
) && (plci_b_id
& EXT_CONTROLLER
))
11673 ch_b_v
= ch_b
+ MIXER_IC_CHANNEL_BASE
;
11674 ch_b_s
= (a_b
->manufacturer_features
& MANUFACTURER_FEATURE_SLAVE_CODEC
) ?
11675 a_b
->li_base
+ MIXER_IC_CHANNEL_BASE
+ (2 - plci_b
->li_bchannel_id
) : ch_b_v
;
11684 li_config_table
[ch_a
].flag_table
[ch_a_v
] &= ~LI_FLAG_MONITOR
;
11685 li_config_table
[ch_a
].flag_table
[ch_a_s
] &= ~LI_FLAG_MONITOR
;
11686 li_config_table
[ch_a_v
].flag_table
[ch_a
] &= ~(LI_FLAG_ANNOUNCEMENT
| LI_FLAG_MIX
);
11687 li_config_table
[ch_a_s
].flag_table
[ch_a
] &= ~(LI_FLAG_ANNOUNCEMENT
| LI_FLAG_MIX
);
11689 li_config_table
[ch_a
].flag_table
[ch_b_v
] &= ~LI_FLAG_MONITOR
;
11690 li_config_table
[ch_a
].flag_table
[ch_b_s
] &= ~LI_FLAG_MONITOR
;
11691 li_config_table
[ch_b_v
].flag_table
[ch_a
] &= ~(LI_FLAG_ANNOUNCEMENT
| LI_FLAG_MIX
);
11692 li_config_table
[ch_b_s
].flag_table
[ch_a
] &= ~(LI_FLAG_ANNOUNCEMENT
| LI_FLAG_MIX
);
11693 if (ch_a_v
== ch_b_v
)
11695 li_config_table
[ch_a_v
].flag_table
[ch_b_v
] &= ~LI_FLAG_CONFERENCE
;
11696 li_config_table
[ch_a_s
].flag_table
[ch_b_s
] &= ~LI_FLAG_CONFERENCE
;
11700 if (li_config_table
[ch_a_v
].flag_table
[ch_b_v
] & LI_FLAG_CONFERENCE
)
11702 for (i
= 0; i
< li_total_channels
; i
++)
11705 li_config_table
[ch_a_v
].flag_table
[i
] &= ~LI_FLAG_CONFERENCE
;
11708 if (li_config_table
[ch_a_s
].flag_table
[ch_b_v
] & LI_FLAG_CONFERENCE
)
11710 for (i
= 0; i
< li_total_channels
; i
++)
11713 li_config_table
[ch_a_s
].flag_table
[i
] &= ~LI_FLAG_CONFERENCE
;
11716 if (li_config_table
[ch_b_v
].flag_table
[ch_a_v
] & LI_FLAG_CONFERENCE
)
11718 for (i
= 0; i
< li_total_channels
; i
++)
11721 li_config_table
[i
].flag_table
[ch_a_v
] &= ~LI_FLAG_CONFERENCE
;
11724 if (li_config_table
[ch_b_v
].flag_table
[ch_a_s
] & LI_FLAG_CONFERENCE
)
11726 for (i
= 0; i
< li_total_channels
; i
++)
11729 li_config_table
[i
].flag_table
[ch_a_s
] &= ~LI_FLAG_CONFERENCE
;
11733 if (li_flags
& LI_FLAG_CONFERENCE_A_B
)
11735 li_config_table
[ch_b_v
].flag_table
[ch_a_v
] |= LI_FLAG_CONFERENCE
;
11736 li_config_table
[ch_b_s
].flag_table
[ch_a_v
] |= LI_FLAG_CONFERENCE
;
11737 li_config_table
[ch_b_v
].flag_table
[ch_a_s
] |= LI_FLAG_CONFERENCE
;
11738 li_config_table
[ch_b_s
].flag_table
[ch_a_s
] |= LI_FLAG_CONFERENCE
;
11740 if (li_flags
& LI_FLAG_CONFERENCE_B_A
)
11742 li_config_table
[ch_a_v
].flag_table
[ch_b_v
] |= LI_FLAG_CONFERENCE
;
11743 li_config_table
[ch_a_v
].flag_table
[ch_b_s
] |= LI_FLAG_CONFERENCE
;
11744 li_config_table
[ch_a_s
].flag_table
[ch_b_v
] |= LI_FLAG_CONFERENCE
;
11745 li_config_table
[ch_a_s
].flag_table
[ch_b_s
] |= LI_FLAG_CONFERENCE
;
11747 if (li_flags
& LI_FLAG_MONITOR_A
)
11749 li_config_table
[ch_a
].flag_table
[ch_a_v
] |= LI_FLAG_MONITOR
;
11750 li_config_table
[ch_a
].flag_table
[ch_a_s
] |= LI_FLAG_MONITOR
;
11752 if (li_flags
& LI_FLAG_MONITOR_B
)
11754 li_config_table
[ch_a
].flag_table
[ch_b_v
] |= LI_FLAG_MONITOR
;
11755 li_config_table
[ch_a
].flag_table
[ch_b_s
] |= LI_FLAG_MONITOR
;
11757 if (li_flags
& LI_FLAG_ANNOUNCEMENT_A
)
11759 li_config_table
[ch_a_v
].flag_table
[ch_a
] |= LI_FLAG_ANNOUNCEMENT
;
11760 li_config_table
[ch_a_s
].flag_table
[ch_a
] |= LI_FLAG_ANNOUNCEMENT
;
11762 if (li_flags
& LI_FLAG_ANNOUNCEMENT_B
)
11764 li_config_table
[ch_b_v
].flag_table
[ch_a
] |= LI_FLAG_ANNOUNCEMENT
;
11765 li_config_table
[ch_b_s
].flag_table
[ch_a
] |= LI_FLAG_ANNOUNCEMENT
;
11767 if (li_flags
& LI_FLAG_MIX_A
)
11769 li_config_table
[ch_a_v
].flag_table
[ch_a
] |= LI_FLAG_MIX
;
11770 li_config_table
[ch_a_s
].flag_table
[ch_a
] |= LI_FLAG_MIX
;
11772 if (li_flags
& LI_FLAG_MIX_B
)
11774 li_config_table
[ch_b_v
].flag_table
[ch_a
] |= LI_FLAG_MIX
;
11775 li_config_table
[ch_b_s
].flag_table
[ch_a
] |= LI_FLAG_MIX
;
11777 if (ch_a_v
!= ch_a_s
)
11779 li_config_table
[ch_a_v
].flag_table
[ch_a_s
] |= LI_FLAG_CONFERENCE
;
11780 li_config_table
[ch_a_s
].flag_table
[ch_a_v
] |= LI_FLAG_CONFERENCE
;
11782 if (ch_b_v
!= ch_b_s
)
11784 li_config_table
[ch_b_v
].flag_table
[ch_b_s
] |= LI_FLAG_CONFERENCE
;
11785 li_config_table
[ch_b_s
].flag_table
[ch_b_v
] |= LI_FLAG_CONFERENCE
;
11790 static void li2_update_connect (dword Id
, DIVA_CAPI_ADAPTER
*a
, PLCI
*plci
,
11791 dword plci_b_id
, byte connect
, dword li_flags
)
11793 word ch_a
, ch_a_v
, ch_a_s
, ch_b
, ch_b_v
, ch_b_s
;
11795 DIVA_CAPI_ADAPTER
*a_b
;
11797 a_b
= &(adapter
[MapController ((byte
)(plci_b_id
& 0x7f)) - 1]);
11798 plci_b
= &(a_b
->plci
[((plci_b_id
>> 8) & 0xff) - 1]);
11799 ch_a
= a
->li_base
+ (plci
->li_bchannel_id
- 1);
11800 if (!a
->li_pri
&& (plci
->tel
== ADV_VOICE
)
11801 && (plci
== a
->AdvSignalPLCI
) && (Id
& EXT_CONTROLLER
))
11803 ch_a_v
= ch_a
+ MIXER_IC_CHANNEL_BASE
;
11804 ch_a_s
= (a
->manufacturer_features
& MANUFACTURER_FEATURE_SLAVE_CODEC
) ?
11805 a
->li_base
+ MIXER_IC_CHANNEL_BASE
+ (2 - plci
->li_bchannel_id
) : ch_a_v
;
11812 ch_b
= a_b
->li_base
+ (plci_b
->li_bchannel_id
- 1);
11813 if (!a_b
->li_pri
&& (plci_b
->tel
== ADV_VOICE
)
11814 && (plci_b
== a_b
->AdvSignalPLCI
) && (plci_b_id
& EXT_CONTROLLER
))
11816 ch_b_v
= ch_b
+ MIXER_IC_CHANNEL_BASE
;
11817 ch_b_s
= (a_b
->manufacturer_features
& MANUFACTURER_FEATURE_SLAVE_CODEC
) ?
11818 a_b
->li_base
+ MIXER_IC_CHANNEL_BASE
+ (2 - plci_b
->li_bchannel_id
) : ch_b_v
;
11827 li_config_table
[ch_b
].flag_table
[ch_b_v
] &= ~LI_FLAG_MONITOR
;
11828 li_config_table
[ch_b
].flag_table
[ch_b_s
] &= ~LI_FLAG_MONITOR
;
11829 li_config_table
[ch_b_v
].flag_table
[ch_b
] &= ~LI_FLAG_MIX
;
11830 li_config_table
[ch_b_s
].flag_table
[ch_b
] &= ~LI_FLAG_MIX
;
11831 li_config_table
[ch_b
].flag_table
[ch_b
] &= ~LI_FLAG_PCCONNECT
;
11832 li_config_table
[ch_b
].chflags
&= ~(LI_CHFLAG_MONITOR
| LI_CHFLAG_MIX
| LI_CHFLAG_LOOP
);
11834 li_config_table
[ch_b_v
].flag_table
[ch_a_v
] &= ~(LI_FLAG_INTERCONNECT
| LI_FLAG_CONFERENCE
);
11835 li_config_table
[ch_b_s
].flag_table
[ch_a_v
] &= ~(LI_FLAG_INTERCONNECT
| LI_FLAG_CONFERENCE
);
11836 li_config_table
[ch_b_v
].flag_table
[ch_a_s
] &= ~(LI_FLAG_INTERCONNECT
| LI_FLAG_CONFERENCE
);
11837 li_config_table
[ch_b_s
].flag_table
[ch_a_s
] &= ~(LI_FLAG_INTERCONNECT
| LI_FLAG_CONFERENCE
);
11838 li_config_table
[ch_a_v
].flag_table
[ch_b_v
] &= ~(LI_FLAG_INTERCONNECT
| LI_FLAG_CONFERENCE
);
11839 li_config_table
[ch_a_v
].flag_table
[ch_b_s
] &= ~(LI_FLAG_INTERCONNECT
| LI_FLAG_CONFERENCE
);
11840 li_config_table
[ch_a_s
].flag_table
[ch_b_v
] &= ~(LI_FLAG_INTERCONNECT
| LI_FLAG_CONFERENCE
);
11841 li_config_table
[ch_a_s
].flag_table
[ch_b_s
] &= ~(LI_FLAG_INTERCONNECT
| LI_FLAG_CONFERENCE
);
11842 if (li_flags
& LI2_FLAG_INTERCONNECT_A_B
)
11844 li_config_table
[ch_b_v
].flag_table
[ch_a_v
] |= LI_FLAG_INTERCONNECT
;
11845 li_config_table
[ch_b_s
].flag_table
[ch_a_v
] |= LI_FLAG_INTERCONNECT
;
11846 li_config_table
[ch_b_v
].flag_table
[ch_a_s
] |= LI_FLAG_INTERCONNECT
;
11847 li_config_table
[ch_b_s
].flag_table
[ch_a_s
] |= LI_FLAG_INTERCONNECT
;
11849 if (li_flags
& LI2_FLAG_INTERCONNECT_B_A
)
11851 li_config_table
[ch_a_v
].flag_table
[ch_b_v
] |= LI_FLAG_INTERCONNECT
;
11852 li_config_table
[ch_a_v
].flag_table
[ch_b_s
] |= LI_FLAG_INTERCONNECT
;
11853 li_config_table
[ch_a_s
].flag_table
[ch_b_v
] |= LI_FLAG_INTERCONNECT
;
11854 li_config_table
[ch_a_s
].flag_table
[ch_b_s
] |= LI_FLAG_INTERCONNECT
;
11856 if (li_flags
& LI2_FLAG_MONITOR_B
)
11858 li_config_table
[ch_b
].flag_table
[ch_b_v
] |= LI_FLAG_MONITOR
;
11859 li_config_table
[ch_b
].flag_table
[ch_b_s
] |= LI_FLAG_MONITOR
;
11861 if (li_flags
& LI2_FLAG_MIX_B
)
11863 li_config_table
[ch_b_v
].flag_table
[ch_b
] |= LI_FLAG_MIX
;
11864 li_config_table
[ch_b_s
].flag_table
[ch_b
] |= LI_FLAG_MIX
;
11866 if (li_flags
& LI2_FLAG_MONITOR_X
)
11867 li_config_table
[ch_b
].chflags
|= LI_CHFLAG_MONITOR
;
11868 if (li_flags
& LI2_FLAG_MIX_X
)
11869 li_config_table
[ch_b
].chflags
|= LI_CHFLAG_MIX
;
11870 if (li_flags
& LI2_FLAG_LOOP_B
)
11872 li_config_table
[ch_b_v
].flag_table
[ch_b_v
] |= LI_FLAG_INTERCONNECT
;
11873 li_config_table
[ch_b_s
].flag_table
[ch_b_v
] |= LI_FLAG_INTERCONNECT
;
11874 li_config_table
[ch_b_v
].flag_table
[ch_b_s
] |= LI_FLAG_INTERCONNECT
;
11875 li_config_table
[ch_b_s
].flag_table
[ch_b_s
] |= LI_FLAG_INTERCONNECT
;
11877 if (li_flags
& LI2_FLAG_LOOP_PC
)
11878 li_config_table
[ch_b
].flag_table
[ch_b
] |= LI_FLAG_PCCONNECT
;
11879 if (li_flags
& LI2_FLAG_LOOP_X
)
11880 li_config_table
[ch_b
].chflags
|= LI_CHFLAG_LOOP
;
11881 if (li_flags
& LI2_FLAG_PCCONNECT_A_B
)
11882 li_config_table
[ch_b_s
].flag_table
[ch_a_s
] |= LI_FLAG_PCCONNECT
;
11883 if (li_flags
& LI2_FLAG_PCCONNECT_B_A
)
11884 li_config_table
[ch_a_s
].flag_table
[ch_b_s
] |= LI_FLAG_PCCONNECT
;
11885 if (ch_a_v
!= ch_a_s
)
11887 li_config_table
[ch_a_v
].flag_table
[ch_a_s
] |= LI_FLAG_CONFERENCE
;
11888 li_config_table
[ch_a_s
].flag_table
[ch_a_v
] |= LI_FLAG_CONFERENCE
;
11890 if (ch_b_v
!= ch_b_s
)
11892 li_config_table
[ch_b_v
].flag_table
[ch_b_s
] |= LI_FLAG_CONFERENCE
;
11893 li_config_table
[ch_b_s
].flag_table
[ch_b_v
] |= LI_FLAG_CONFERENCE
;
11898 static word
li_check_main_plci (dword Id
, PLCI
*plci
)
11902 dbug (1, dprintf ("[%06lx] %s,%d: Wrong PLCI",
11903 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
11904 return (_WRONG_IDENTIFIER
);
11907 || !plci
->NL
.Id
|| plci
->nl_remove_id
11908 || (plci
->li_bchannel_id
== 0))
11910 dbug (1, dprintf ("[%06lx] %s,%d: Wrong state",
11911 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
11912 return (_WRONG_STATE
);
11914 li_config_table
[plci
->adapter
->li_base
+ (plci
->li_bchannel_id
- 1)].plci
= plci
;
11919 static PLCI
*li_check_plci_b (dword Id
, PLCI
*plci
,
11920 dword plci_b_id
, word plci_b_write_pos
, byte
*p_result
)
11925 if (((plci
->li_plci_b_read_pos
> plci_b_write_pos
) ? plci
->li_plci_b_read_pos
:
11926 LI_PLCI_B_QUEUE_ENTRIES
+ plci
->li_plci_b_read_pos
) - plci_b_write_pos
- 1 < 2)
11928 dbug (1, dprintf ("[%06lx] %s,%d: LI request overrun",
11929 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
11930 PUT_WORD (p_result
, _REQUEST_NOT_ALLOWED_IN_THIS_STATE
);
11934 if ((plci_b_id
& 0x7f) != 0)
11936 ctlr_b
= MapController ((byte
)(plci_b_id
& 0x7f));
11937 if ((ctlr_b
> max_adapter
) || ((ctlr_b
!= 0) && (adapter
[ctlr_b
- 1].request
== NULL
)))
11941 || (((plci_b_id
>> 8) & 0xff) == 0)
11942 || (((plci_b_id
>> 8) & 0xff) > adapter
[ctlr_b
- 1].max_plci
))
11944 dbug (1, dprintf ("[%06lx] %s,%d: LI invalid second PLCI %08lx",
11945 UnMapId (Id
), (char *)(FILE_
), __LINE__
, plci_b_id
));
11946 PUT_WORD (p_result
, _WRONG_IDENTIFIER
);
11949 plci_b
= &(adapter
[ctlr_b
- 1].plci
[((plci_b_id
>> 8) & 0xff) - 1]);
11951 || !plci_b
->NL
.Id
|| plci_b
->nl_remove_id
11952 || (plci_b
->li_bchannel_id
== 0))
11954 dbug (1, dprintf ("[%06lx] %s,%d: LI peer in wrong state %08lx",
11955 UnMapId (Id
), (char *)(FILE_
), __LINE__
, plci_b_id
));
11956 PUT_WORD (p_result
, _REQUEST_NOT_ALLOWED_IN_THIS_STATE
);
11959 li_config_table
[plci_b
->adapter
->li_base
+ (plci_b
->li_bchannel_id
- 1)].plci
= plci_b
;
11960 if (((byte
)(plci_b_id
& ~EXT_CONTROLLER
)) !=
11961 ((byte
)(UnMapController (plci
->adapter
->Id
) & ~EXT_CONTROLLER
))
11962 && (!(plci
->adapter
->manufacturer_features
& MANUFACTURER_FEATURE_XCONNECT
)
11963 || !(plci_b
->adapter
->manufacturer_features
& MANUFACTURER_FEATURE_XCONNECT
)))
11965 dbug (1, dprintf ("[%06lx] %s,%d: LI not on same ctrl %08lx",
11966 UnMapId (Id
), (char *)(FILE_
), __LINE__
, plci_b_id
));
11967 PUT_WORD (p_result
, _WRONG_IDENTIFIER
);
11970 if (!(get_b1_facilities (plci_b
, add_b1_facilities (plci_b
, plci_b
->B1_resource
,
11971 (word
)(plci_b
->B1_facilities
| B1_FACILITY_MIXER
))) & B1_FACILITY_MIXER
))
11973 dbug (1, dprintf ("[%06lx] %s,%d: Interconnect peer cannot mix %d",
11974 UnMapId (Id
), (char *)(FILE_
), __LINE__
, plci_b
->B1_resource
));
11975 PUT_WORD (p_result
, _REQUEST_NOT_ALLOWED_IN_THIS_STATE
);
11982 static PLCI
*li2_check_plci_b (dword Id
, PLCI
*plci
,
11983 dword plci_b_id
, word plci_b_write_pos
, byte
*p_result
)
11988 if (((plci
->li_plci_b_read_pos
> plci_b_write_pos
) ? plci
->li_plci_b_read_pos
:
11989 LI_PLCI_B_QUEUE_ENTRIES
+ plci
->li_plci_b_read_pos
) - plci_b_write_pos
- 1 < 2)
11991 dbug (1, dprintf ("[%06lx] %s,%d: LI request overrun",
11992 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
11993 PUT_WORD (p_result
, _WRONG_STATE
);
11997 if ((plci_b_id
& 0x7f) != 0)
11999 ctlr_b
= MapController ((byte
)(plci_b_id
& 0x7f));
12000 if ((ctlr_b
> max_adapter
) || ((ctlr_b
!= 0) && (adapter
[ctlr_b
- 1].request
== NULL
)))
12004 || (((plci_b_id
>> 8) & 0xff) == 0)
12005 || (((plci_b_id
>> 8) & 0xff) > adapter
[ctlr_b
- 1].max_plci
))
12007 dbug (1, dprintf ("[%06lx] %s,%d: LI invalid second PLCI %08lx",
12008 UnMapId (Id
), (char *)(FILE_
), __LINE__
, plci_b_id
));
12009 PUT_WORD (p_result
, _WRONG_IDENTIFIER
);
12012 plci_b
= &(adapter
[ctlr_b
- 1].plci
[((plci_b_id
>> 8) & 0xff) - 1]);
12014 || !plci_b
->NL
.Id
|| plci_b
->nl_remove_id
12015 || (plci_b
->li_bchannel_id
== 0)
12016 || (li_config_table
[plci_b
->adapter
->li_base
+ (plci_b
->li_bchannel_id
- 1)].plci
!= plci_b
))
12018 dbug (1, dprintf ("[%06lx] %s,%d: LI peer in wrong state %08lx",
12019 UnMapId (Id
), (char *)(FILE_
), __LINE__
, plci_b_id
));
12020 PUT_WORD (p_result
, _WRONG_STATE
);
12023 if (((byte
)(plci_b_id
& ~EXT_CONTROLLER
)) !=
12024 ((byte
)(UnMapController (plci
->adapter
->Id
) & ~EXT_CONTROLLER
))
12025 && (!(plci
->adapter
->manufacturer_features
& MANUFACTURER_FEATURE_XCONNECT
)
12026 || !(plci_b
->adapter
->manufacturer_features
& MANUFACTURER_FEATURE_XCONNECT
)))
12028 dbug (1, dprintf ("[%06lx] %s,%d: LI not on same ctrl %08lx",
12029 UnMapId (Id
), (char *)(FILE_
), __LINE__
, plci_b_id
));
12030 PUT_WORD (p_result
, _WRONG_IDENTIFIER
);
12033 if (!(get_b1_facilities (plci_b
, add_b1_facilities (plci_b
, plci_b
->B1_resource
,
12034 (word
)(plci_b
->B1_facilities
| B1_FACILITY_MIXER
))) & B1_FACILITY_MIXER
))
12036 dbug (1, dprintf ("[%06lx] %s,%d: Interconnect peer cannot mix %d",
12037 UnMapId (Id
), (char *)(FILE_
), __LINE__
, plci_b
->B1_resource
));
12038 PUT_WORD (p_result
, _WRONG_STATE
);
12045 static byte
mixer_request (dword Id
, word Number
, DIVA_CAPI_ADAPTER
*a
, PLCI
*plci
, APPL
*appl
, API_PARSE
*msg
)
12049 dword d
, li_flags
, plci_b_id
;
12051 API_PARSE li_parms
[3];
12052 API_PARSE li_req_parms
[3];
12053 API_PARSE li_participant_struct
[2];
12054 API_PARSE li_participant_parms
[3];
12055 word participant_parms_pos
;
12056 byte result_buffer
[32];
12059 word plci_b_write_pos
;
12061 dbug (1, dprintf ("[%06lx] %s,%d: mixer_request",
12062 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
12065 result
= result_buffer
;
12066 result_buffer
[0] = 0;
12067 if (!(a
->profile
.Global_Options
& GL_LINE_INTERCONNECT_SUPPORTED
))
12069 dbug (1, dprintf ("[%06lx] %s,%d: Facility not supported",
12070 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
12071 Info
= _FACILITY_NOT_SUPPORTED
;
12073 else if (api_parse (&msg
[1].info
[1], msg
[1].length
, "ws", li_parms
))
12075 dbug (1, dprintf ("[%06lx] %s,%d: Wrong message format",
12076 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
12077 Info
= _WRONG_MESSAGE_FORMAT
;
12081 result_buffer
[0] = 3;
12082 PUT_WORD (&result_buffer
[1], GET_WORD (li_parms
[0].info
));
12083 result_buffer
[3] = 0;
12084 switch (GET_WORD (li_parms
[0].info
))
12086 case LI_GET_SUPPORTED_SERVICES
:
12087 if (appl
->appl_flags
& APPL_FLAG_OLD_LI_SPEC
)
12089 result_buffer
[0] = 17;
12090 result_buffer
[3] = 14;
12091 PUT_WORD (&result_buffer
[4], GOOD
);
12093 if (a
->manufacturer_features
& MANUFACTURER_FEATURE_MIXER_CH_CH
)
12094 d
|= LI_CONFERENCING_SUPPORTED
;
12095 if (a
->manufacturer_features
& MANUFACTURER_FEATURE_MIXER_CH_PC
)
12096 d
|= LI_MONITORING_SUPPORTED
;
12097 if (a
->manufacturer_features
& MANUFACTURER_FEATURE_MIXER_PC_CH
)
12098 d
|= LI_ANNOUNCEMENTS_SUPPORTED
| LI_MIXING_SUPPORTED
;
12099 if (a
->manufacturer_features
& MANUFACTURER_FEATURE_XCONNECT
)
12100 d
|= LI_CROSS_CONTROLLER_SUPPORTED
;
12101 PUT_DWORD (&result_buffer
[6], d
);
12102 if (a
->manufacturer_features
& MANUFACTURER_FEATURE_XCONNECT
)
12105 for (i
= 0; i
< li_total_channels
; i
++)
12107 if ((li_config_table
[i
].adapter
->manufacturer_features
& MANUFACTURER_FEATURE_XCONNECT
)
12108 && (li_config_table
[i
].adapter
->li_pri
12109 || (i
< li_config_table
[i
].adapter
->li_base
+ MIXER_BCHANNELS_BRI
)))
12117 d
= a
->li_pri
? a
->li_channels
: MIXER_BCHANNELS_BRI
;
12119 PUT_DWORD (&result_buffer
[10], d
/ 2);
12120 PUT_DWORD (&result_buffer
[14], d
);
12124 result_buffer
[0] = 25;
12125 result_buffer
[3] = 22;
12126 PUT_WORD (&result_buffer
[4], GOOD
);
12127 d
= LI2_ASYMMETRIC_SUPPORTED
| LI2_B_LOOPING_SUPPORTED
| LI2_X_LOOPING_SUPPORTED
;
12128 if (a
->manufacturer_features
& MANUFACTURER_FEATURE_MIXER_CH_PC
)
12129 d
|= LI2_MONITORING_SUPPORTED
| LI2_REMOTE_MONITORING_SUPPORTED
;
12130 if (a
->manufacturer_features
& MANUFACTURER_FEATURE_MIXER_PC_CH
)
12131 d
|= LI2_MIXING_SUPPORTED
| LI2_REMOTE_MIXING_SUPPORTED
;
12132 if (a
->manufacturer_features
& MANUFACTURER_FEATURE_MIXER_PC_PC
)
12133 d
|= LI2_PC_LOOPING_SUPPORTED
;
12134 if (a
->manufacturer_features
& MANUFACTURER_FEATURE_XCONNECT
)
12135 d
|= LI2_CROSS_CONTROLLER_SUPPORTED
;
12136 PUT_DWORD (&result_buffer
[6], d
);
12137 d
= a
->li_pri
? a
->li_channels
: MIXER_BCHANNELS_BRI
;
12138 PUT_DWORD (&result_buffer
[10], d
/ 2);
12139 PUT_DWORD (&result_buffer
[14], d
- 1);
12140 if (a
->manufacturer_features
& MANUFACTURER_FEATURE_XCONNECT
)
12143 for (i
= 0; i
< li_total_channels
; i
++)
12145 if ((li_config_table
[i
].adapter
->manufacturer_features
& MANUFACTURER_FEATURE_XCONNECT
)
12146 && (li_config_table
[i
].adapter
->li_pri
12147 || (i
< li_config_table
[i
].adapter
->li_base
+ MIXER_BCHANNELS_BRI
)))
12153 PUT_DWORD (&result_buffer
[18], d
/ 2);
12154 PUT_DWORD (&result_buffer
[22], d
- 1);
12158 case LI_REQ_CONNECT
:
12159 if (li_parms
[1].length
== 8)
12161 appl
->appl_flags
|= APPL_FLAG_OLD_LI_SPEC
;
12162 if (api_parse (&li_parms
[1].info
[1], li_parms
[1].length
, "dd", li_req_parms
))
12164 dbug (1, dprintf ("[%06lx] %s,%d: Wrong message format",
12165 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
12166 Info
= _WRONG_MESSAGE_FORMAT
;
12169 plci_b_id
= GET_DWORD (li_req_parms
[0].info
) & 0xffff;
12170 li_flags
= GET_DWORD (li_req_parms
[1].info
);
12171 Info
= li_check_main_plci (Id
, plci
);
12172 result_buffer
[0] = 9;
12173 result_buffer
[3] = 6;
12174 PUT_DWORD (&result_buffer
[4], plci_b_id
);
12175 PUT_WORD (&result_buffer
[8], GOOD
);
12178 result
= plci
->saved_msg
.info
;
12179 for (i
= 0; i
<= result_buffer
[0]; i
++)
12180 result
[i
] = result_buffer
[i
];
12181 plci_b_write_pos
= plci
->li_plci_b_write_pos
;
12182 plci_b
= li_check_plci_b (Id
, plci
, plci_b_id
, plci_b_write_pos
, &result
[8]);
12183 if (plci_b
== NULL
)
12185 li_update_connect (Id
, a
, plci
, plci_b_id
, true, li_flags
);
12186 plci
->li_plci_b_queue
[plci_b_write_pos
] = plci_b_id
| LI_PLCI_B_LAST_FLAG
;
12187 plci_b_write_pos
= (plci_b_write_pos
== LI_PLCI_B_QUEUE_ENTRIES
-1) ? 0 : plci_b_write_pos
+ 1;
12188 plci
->li_plci_b_write_pos
= plci_b_write_pos
;
12192 appl
->appl_flags
&= ~APPL_FLAG_OLD_LI_SPEC
;
12193 if (api_parse (&li_parms
[1].info
[1], li_parms
[1].length
, "ds", li_req_parms
))
12195 dbug (1, dprintf ("[%06lx] %s,%d: Wrong message format",
12196 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
12197 Info
= _WRONG_MESSAGE_FORMAT
;
12200 li_flags
= GET_DWORD (li_req_parms
[0].info
) & ~(LI2_FLAG_INTERCONNECT_A_B
| LI2_FLAG_INTERCONNECT_B_A
);
12201 Info
= li_check_main_plci (Id
, plci
);
12202 result_buffer
[0] = 7;
12203 result_buffer
[3] = 4;
12204 PUT_WORD (&result_buffer
[4], Info
);
12205 result_buffer
[6] = 0;
12208 result
= plci
->saved_msg
.info
;
12209 for (i
= 0; i
<= result_buffer
[0]; i
++)
12210 result
[i
] = result_buffer
[i
];
12211 plci_b_write_pos
= plci
->li_plci_b_write_pos
;
12212 participant_parms_pos
= 0;
12214 li2_update_connect (Id
, a
, plci
, UnMapId (Id
), true, li_flags
);
12215 while (participant_parms_pos
< li_req_parms
[1].length
)
12217 result
[result_pos
] = 6;
12219 PUT_DWORD (&result
[result_pos
- 6], 0);
12220 PUT_WORD (&result
[result_pos
- 2], GOOD
);
12221 if (api_parse (&li_req_parms
[1].info
[1 + participant_parms_pos
],
12222 (word
)(li_parms
[1].length
- participant_parms_pos
), "s", li_participant_struct
))
12224 dbug (1, dprintf ("[%06lx] %s,%d: Wrong message format",
12225 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
12226 PUT_WORD (&result
[result_pos
- 2], _WRONG_MESSAGE_FORMAT
);
12229 if (api_parse (&li_participant_struct
[0].info
[1],
12230 li_participant_struct
[0].length
, "dd", li_participant_parms
))
12232 dbug (1, dprintf ("[%06lx] %s,%d: Wrong message format",
12233 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
12234 PUT_WORD (&result
[result_pos
- 2], _WRONG_MESSAGE_FORMAT
);
12237 plci_b_id
= GET_DWORD (li_participant_parms
[0].info
) & 0xffff;
12238 li_flags
= GET_DWORD (li_participant_parms
[1].info
);
12239 PUT_DWORD (&result
[result_pos
- 6], plci_b_id
);
12240 if (sizeof(result
) - result_pos
< 7)
12242 dbug (1, dprintf ("[%06lx] %s,%d: LI result overrun",
12243 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
12244 PUT_WORD (&result
[result_pos
- 2], _WRONG_STATE
);
12247 plci_b
= li2_check_plci_b (Id
, plci
, plci_b_id
, plci_b_write_pos
, &result
[result_pos
- 2]);
12248 if (plci_b
!= NULL
)
12250 li2_update_connect (Id
, a
, plci
, plci_b_id
, true, li_flags
);
12251 plci
->li_plci_b_queue
[plci_b_write_pos
] = plci_b_id
|
12252 ((li_flags
& (LI2_FLAG_INTERCONNECT_A_B
| LI2_FLAG_INTERCONNECT_B_A
|
12253 LI2_FLAG_PCCONNECT_A_B
| LI2_FLAG_PCCONNECT_B_A
)) ? 0 : LI_PLCI_B_DISC_FLAG
);
12254 plci_b_write_pos
= (plci_b_write_pos
== LI_PLCI_B_QUEUE_ENTRIES
-1) ? 0 : plci_b_write_pos
+ 1;
12256 participant_parms_pos
= (word
)((&li_participant_struct
[0].info
[1 + li_participant_struct
[0].length
]) -
12257 (&li_req_parms
[1].info
[1]));
12259 result
[0] = (byte
)(result_pos
- 1);
12260 result
[3] = (byte
)(result_pos
- 4);
12261 result
[6] = (byte
)(result_pos
- 7);
12262 i
= (plci_b_write_pos
== 0) ? LI_PLCI_B_QUEUE_ENTRIES
-1 : plci_b_write_pos
- 1;
12263 if ((plci_b_write_pos
== plci
->li_plci_b_read_pos
)
12264 || (plci
->li_plci_b_queue
[i
] & LI_PLCI_B_LAST_FLAG
))
12266 plci
->li_plci_b_queue
[plci_b_write_pos
] = LI_PLCI_B_SKIP_FLAG
| LI_PLCI_B_LAST_FLAG
;
12267 plci_b_write_pos
= (plci_b_write_pos
== LI_PLCI_B_QUEUE_ENTRIES
-1) ? 0 : plci_b_write_pos
+ 1;
12270 plci
->li_plci_b_queue
[i
] |= LI_PLCI_B_LAST_FLAG
;
12271 plci
->li_plci_b_write_pos
= plci_b_write_pos
;
12273 mixer_calculate_coefs (a
);
12274 plci
->li_channel_bits
= li_config_table
[a
->li_base
+ (plci
->li_bchannel_id
- 1)].channel
;
12275 mixer_notify_update (plci
, true);
12276 sendf (appl
, _FACILITY_R
| CONFIRM
, Id
& 0xffffL
, Number
,
12277 "wwS", Info
, SELECTOR_LINE_INTERCONNECT
, result
);
12279 plci
->li_cmd
= GET_WORD (li_parms
[0].info
);
12280 start_internal_command (Id
, plci
, mixer_command
);
12283 case LI_REQ_DISCONNECT
:
12284 if (li_parms
[1].length
== 4)
12286 appl
->appl_flags
|= APPL_FLAG_OLD_LI_SPEC
;
12287 if (api_parse (&li_parms
[1].info
[1], li_parms
[1].length
, "d", li_req_parms
))
12289 dbug (1, dprintf ("[%06lx] %s,%d: Wrong message format",
12290 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
12291 Info
= _WRONG_MESSAGE_FORMAT
;
12294 plci_b_id
= GET_DWORD (li_req_parms
[0].info
) & 0xffff;
12295 Info
= li_check_main_plci (Id
, plci
);
12296 result_buffer
[0] = 9;
12297 result_buffer
[3] = 6;
12298 PUT_DWORD (&result_buffer
[4], GET_DWORD (li_req_parms
[0].info
));
12299 PUT_WORD (&result_buffer
[8], GOOD
);
12302 result
= plci
->saved_msg
.info
;
12303 for (i
= 0; i
<= result_buffer
[0]; i
++)
12304 result
[i
] = result_buffer
[i
];
12305 plci_b_write_pos
= plci
->li_plci_b_write_pos
;
12306 plci_b
= li_check_plci_b (Id
, plci
, plci_b_id
, plci_b_write_pos
, &result
[8]);
12307 if (plci_b
== NULL
)
12309 li_update_connect (Id
, a
, plci
, plci_b_id
, false, 0);
12310 plci
->li_plci_b_queue
[plci_b_write_pos
] = plci_b_id
| LI_PLCI_B_DISC_FLAG
| LI_PLCI_B_LAST_FLAG
;
12311 plci_b_write_pos
= (plci_b_write_pos
== LI_PLCI_B_QUEUE_ENTRIES
-1) ? 0 : plci_b_write_pos
+ 1;
12312 plci
->li_plci_b_write_pos
= plci_b_write_pos
;
12316 appl
->appl_flags
&= ~APPL_FLAG_OLD_LI_SPEC
;
12317 if (api_parse (&li_parms
[1].info
[1], li_parms
[1].length
, "s", li_req_parms
))
12319 dbug (1, dprintf ("[%06lx] %s,%d: Wrong message format",
12320 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
12321 Info
= _WRONG_MESSAGE_FORMAT
;
12324 Info
= li_check_main_plci (Id
, plci
);
12325 result_buffer
[0] = 7;
12326 result_buffer
[3] = 4;
12327 PUT_WORD (&result_buffer
[4], Info
);
12328 result_buffer
[6] = 0;
12331 result
= plci
->saved_msg
.info
;
12332 for (i
= 0; i
<= result_buffer
[0]; i
++)
12333 result
[i
] = result_buffer
[i
];
12334 plci_b_write_pos
= plci
->li_plci_b_write_pos
;
12335 participant_parms_pos
= 0;
12337 while (participant_parms_pos
< li_req_parms
[0].length
)
12339 result
[result_pos
] = 6;
12341 PUT_DWORD (&result
[result_pos
- 6], 0);
12342 PUT_WORD (&result
[result_pos
- 2], GOOD
);
12343 if (api_parse (&li_req_parms
[0].info
[1 + participant_parms_pos
],
12344 (word
)(li_parms
[1].length
- participant_parms_pos
), "s", li_participant_struct
))
12346 dbug (1, dprintf ("[%06lx] %s,%d: Wrong message format",
12347 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
12348 PUT_WORD (&result
[result_pos
- 2], _WRONG_MESSAGE_FORMAT
);
12351 if (api_parse (&li_participant_struct
[0].info
[1],
12352 li_participant_struct
[0].length
, "d", li_participant_parms
))
12354 dbug (1, dprintf ("[%06lx] %s,%d: Wrong message format",
12355 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
12356 PUT_WORD (&result
[result_pos
- 2], _WRONG_MESSAGE_FORMAT
);
12359 plci_b_id
= GET_DWORD (li_participant_parms
[0].info
) & 0xffff;
12360 PUT_DWORD (&result
[result_pos
- 6], plci_b_id
);
12361 if (sizeof(result
) - result_pos
< 7)
12363 dbug (1, dprintf ("[%06lx] %s,%d: LI result overrun",
12364 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
12365 PUT_WORD (&result
[result_pos
- 2], _WRONG_STATE
);
12368 plci_b
= li2_check_plci_b (Id
, plci
, plci_b_id
, plci_b_write_pos
, &result
[result_pos
- 2]);
12369 if (plci_b
!= NULL
)
12371 li2_update_connect (Id
, a
, plci
, plci_b_id
, false, 0);
12372 plci
->li_plci_b_queue
[plci_b_write_pos
] = plci_b_id
| LI_PLCI_B_DISC_FLAG
;
12373 plci_b_write_pos
= (plci_b_write_pos
== LI_PLCI_B_QUEUE_ENTRIES
-1) ? 0 : plci_b_write_pos
+ 1;
12375 participant_parms_pos
= (word
)((&li_participant_struct
[0].info
[1 + li_participant_struct
[0].length
]) -
12376 (&li_req_parms
[0].info
[1]));
12378 result
[0] = (byte
)(result_pos
- 1);
12379 result
[3] = (byte
)(result_pos
- 4);
12380 result
[6] = (byte
)(result_pos
- 7);
12381 i
= (plci_b_write_pos
== 0) ? LI_PLCI_B_QUEUE_ENTRIES
-1 : plci_b_write_pos
- 1;
12382 if ((plci_b_write_pos
== plci
->li_plci_b_read_pos
)
12383 || (plci
->li_plci_b_queue
[i
] & LI_PLCI_B_LAST_FLAG
))
12385 plci
->li_plci_b_queue
[plci_b_write_pos
] = LI_PLCI_B_SKIP_FLAG
| LI_PLCI_B_LAST_FLAG
;
12386 plci_b_write_pos
= (plci_b_write_pos
== LI_PLCI_B_QUEUE_ENTRIES
-1) ? 0 : plci_b_write_pos
+ 1;
12389 plci
->li_plci_b_queue
[i
] |= LI_PLCI_B_LAST_FLAG
;
12390 plci
->li_plci_b_write_pos
= plci_b_write_pos
;
12392 mixer_calculate_coefs (a
);
12393 plci
->li_channel_bits
= li_config_table
[a
->li_base
+ (plci
->li_bchannel_id
- 1)].channel
;
12394 mixer_notify_update (plci
, true);
12395 sendf (appl
, _FACILITY_R
| CONFIRM
, Id
& 0xffffL
, Number
,
12396 "wwS", Info
, SELECTOR_LINE_INTERCONNECT
, result
);
12398 plci
->li_cmd
= GET_WORD (li_parms
[0].info
);
12399 start_internal_command (Id
, plci
, mixer_command
);
12402 case LI_REQ_SILENT_UPDATE
:
12403 if (!plci
|| !plci
->State
12404 || !plci
->NL
.Id
|| plci
->nl_remove_id
12405 || (plci
->li_bchannel_id
== 0)
12406 || (li_config_table
[plci
->adapter
->li_base
+ (plci
->li_bchannel_id
- 1)].plci
!= plci
))
12408 dbug (1, dprintf ("[%06lx] %s,%d: Wrong state",
12409 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
12412 plci_b_write_pos
= plci
->li_plci_b_write_pos
;
12413 if (((plci
->li_plci_b_read_pos
> plci_b_write_pos
) ? plci
->li_plci_b_read_pos
:
12414 LI_PLCI_B_QUEUE_ENTRIES
+ plci
->li_plci_b_read_pos
) - plci_b_write_pos
- 1 < 2)
12416 dbug (1, dprintf ("[%06lx] %s,%d: LI request overrun",
12417 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
12420 i
= (plci_b_write_pos
== 0) ? LI_PLCI_B_QUEUE_ENTRIES
-1 : plci_b_write_pos
- 1;
12421 if ((plci_b_write_pos
== plci
->li_plci_b_read_pos
)
12422 || (plci
->li_plci_b_queue
[i
] & LI_PLCI_B_LAST_FLAG
))
12424 plci
->li_plci_b_queue
[plci_b_write_pos
] = LI_PLCI_B_SKIP_FLAG
| LI_PLCI_B_LAST_FLAG
;
12425 plci_b_write_pos
= (plci_b_write_pos
== LI_PLCI_B_QUEUE_ENTRIES
-1) ? 0 : plci_b_write_pos
+ 1;
12428 plci
->li_plci_b_queue
[i
] |= LI_PLCI_B_LAST_FLAG
;
12429 plci
->li_plci_b_write_pos
= plci_b_write_pos
;
12430 plci
->li_channel_bits
= li_config_table
[a
->li_base
+ (plci
->li_bchannel_id
- 1)].channel
;
12432 plci
->li_cmd
= GET_WORD (li_parms
[0].info
);
12433 start_internal_command (Id
, plci
, mixer_command
);
12437 dbug (1, dprintf ("[%06lx] %s,%d: LI unknown request %04x",
12438 UnMapId (Id
), (char *)(FILE_
), __LINE__
, GET_WORD (li_parms
[0].info
)));
12439 Info
= _FACILITY_NOT_SUPPORTED
;
12442 sendf (appl
, _FACILITY_R
| CONFIRM
, Id
& 0xffffL
, Number
,
12443 "wwS", Info
, SELECTOR_LINE_INTERCONNECT
, result
);
12448 static void mixer_indication_coefs_set (dword Id
, PLCI
*plci
)
12451 DIVA_CAPI_ADAPTER
*a
;
12454 dbug (1, dprintf ("[%06lx] %s,%d: mixer_indication_coefs_set",
12455 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
12458 if (plci
->li_plci_b_read_pos
!= plci
->li_plci_b_req_pos
)
12462 d
= plci
->li_plci_b_queue
[plci
->li_plci_b_read_pos
];
12463 if (!(d
& LI_PLCI_B_SKIP_FLAG
))
12465 if (plci
->appl
->appl_flags
& APPL_FLAG_OLD_LI_SPEC
)
12467 if (d
& LI_PLCI_B_DISC_FLAG
)
12470 PUT_WORD (&result
[1], LI_IND_DISCONNECT
);
12472 PUT_WORD (&result
[4], _LI_USER_INITIATED
);
12477 PUT_WORD (&result
[1], LI_IND_CONNECT_ACTIVE
);
12479 PUT_DWORD (&result
[4], d
& ~LI_PLCI_B_FLAG_MASK
);
12484 if (d
& LI_PLCI_B_DISC_FLAG
)
12487 PUT_WORD (&result
[1], LI_IND_DISCONNECT
);
12489 PUT_DWORD (&result
[4], d
& ~LI_PLCI_B_FLAG_MASK
);
12490 PUT_WORD (&result
[8], _LI_USER_INITIATED
);
12495 PUT_WORD (&result
[1], LI_IND_CONNECT_ACTIVE
);
12497 PUT_DWORD (&result
[4], d
& ~LI_PLCI_B_FLAG_MASK
);
12500 sendf (plci
->appl
, _FACILITY_I
, Id
& 0xffffL
, 0,
12501 "ws", SELECTOR_LINE_INTERCONNECT
, result
);
12503 plci
->li_plci_b_read_pos
= (plci
->li_plci_b_read_pos
== LI_PLCI_B_QUEUE_ENTRIES
-1) ?
12504 0 : plci
->li_plci_b_read_pos
+ 1;
12505 } while (!(d
& LI_PLCI_B_LAST_FLAG
) && (plci
->li_plci_b_read_pos
!= plci
->li_plci_b_req_pos
));
12510 static void mixer_indication_xconnect_from (dword Id
, PLCI
*plci
, byte
*msg
, word length
)
12513 struct xconnect_transfer_address_s s
, *p
;
12514 DIVA_CAPI_ADAPTER
*a
;
12516 dbug (1, dprintf ("[%06lx] %s,%d: mixer_indication_xconnect_from %d",
12517 UnMapId (Id
), (char *)(FILE_
), __LINE__
, (int) length
));
12521 for (i
= 1; i
< length
; i
+= 16)
12523 s
.card_address
.low
= msg
[i
] | (msg
[i
+1] << 8) | (((dword
)(msg
[i
+2])) << 16) | (((dword
)(msg
[i
+3])) << 24);
12524 s
.card_address
.high
= msg
[i
+4] | (msg
[i
+5] << 8) | (((dword
)(msg
[i
+6])) << 16) | (((dword
)(msg
[i
+7])) << 24);
12525 s
.offset
= msg
[i
+8] | (msg
[i
+9] << 8) | (((dword
)(msg
[i
+10])) << 16) | (((dword
)(msg
[i
+11])) << 24);
12526 ch
= msg
[i
+12] | (msg
[i
+13] << 8);
12527 j
= ch
& XCONNECT_CHANNEL_NUMBER_MASK
;
12528 if (!a
->li_pri
&& (plci
->li_bchannel_id
== 2))
12531 if (ch
& XCONNECT_CHANNEL_PORT_PC
)
12532 p
= &(li_config_table
[j
].send_pc
);
12534 p
= &(li_config_table
[j
].send_b
);
12535 p
->card_address
.low
= s
.card_address
.low
;
12536 p
->card_address
.high
= s
.card_address
.high
;
12537 p
->offset
= s
.offset
;
12538 li_config_table
[j
].channel
|= LI_CHANNEL_ADDRESSES_SET
;
12540 if (plci
->internal_command_queue
[0]
12541 && ((plci
->adjust_b_state
== ADJUST_B_RESTORE_MIXER_2
)
12542 || (plci
->adjust_b_state
== ADJUST_B_RESTORE_MIXER_3
)
12543 || (plci
->adjust_b_state
== ADJUST_B_RESTORE_MIXER_4
)))
12545 (*(plci
->internal_command_queue
[0]))(Id
, plci
, 0);
12546 if (!plci
->internal_command
)
12547 next_internal_command (Id
, plci
);
12549 mixer_notify_update (plci
, true);
12553 static void mixer_indication_xconnect_to (dword Id
, PLCI
*plci
, byte
*msg
, word length
)
12556 dbug (1, dprintf ("[%06lx] %s,%d: mixer_indication_xconnect_to %d",
12557 UnMapId (Id
), (char *)(FILE_
), __LINE__
, (int) length
));
12562 static byte
mixer_notify_source_removed (PLCI
*plci
, dword plci_b_id
)
12564 word plci_b_write_pos
;
12566 plci_b_write_pos
= plci
->li_plci_b_write_pos
;
12567 if (((plci
->li_plci_b_read_pos
> plci_b_write_pos
) ? plci
->li_plci_b_read_pos
:
12568 LI_PLCI_B_QUEUE_ENTRIES
+ plci
->li_plci_b_read_pos
) - plci_b_write_pos
- 1 < 1)
12570 dbug (1, dprintf ("[%06lx] %s,%d: LI request overrun",
12571 (dword
)((plci
->Id
<< 8) | UnMapController (plci
->adapter
->Id
)),
12572 (char *)(FILE_
), __LINE__
));
12575 plci
->li_plci_b_queue
[plci_b_write_pos
] = plci_b_id
| LI_PLCI_B_DISC_FLAG
;
12576 plci_b_write_pos
= (plci_b_write_pos
== LI_PLCI_B_QUEUE_ENTRIES
-1) ? 0 : plci_b_write_pos
+ 1;
12577 plci
->li_plci_b_write_pos
= plci_b_write_pos
;
12582 static void mixer_remove (PLCI
*plci
)
12584 DIVA_CAPI_ADAPTER
*a
;
12589 dbug (1, dprintf ("[%06lx] %s,%d: mixer_remove",
12590 (dword
)((plci
->Id
<< 8) | UnMapController (plci
->adapter
->Id
)),
12591 (char *)(FILE_
), __LINE__
));
12594 plci_b_id
= (plci
->Id
<< 8) | UnMapController (plci
->adapter
->Id
);
12595 if (a
->profile
.Global_Options
& GL_LINE_INTERCONNECT_SUPPORTED
)
12597 if ((plci
->li_bchannel_id
!= 0)
12598 && (li_config_table
[a
->li_base
+ (plci
->li_bchannel_id
- 1)].plci
== plci
))
12600 i
= a
->li_base
+ (plci
->li_bchannel_id
- 1);
12601 if ((li_config_table
[i
].curchnl
| li_config_table
[i
].channel
) & LI_CHANNEL_INVOLVED
)
12603 for (j
= 0; j
< li_total_channels
; j
++)
12605 if ((li_config_table
[i
].flag_table
[j
] & LI_FLAG_INTERCONNECT
)
12606 || (li_config_table
[j
].flag_table
[i
] & LI_FLAG_INTERCONNECT
))
12608 notify_plci
= li_config_table
[j
].plci
;
12609 if ((notify_plci
!= NULL
)
12610 && (notify_plci
!= plci
)
12611 && (notify_plci
->appl
!= NULL
)
12612 && !(notify_plci
->appl
->appl_flags
& APPL_FLAG_OLD_LI_SPEC
)
12613 && (notify_plci
->State
)
12614 && notify_plci
->NL
.Id
&& !notify_plci
->nl_remove_id
)
12616 mixer_notify_source_removed (notify_plci
, plci_b_id
);
12620 mixer_clear_config (plci
);
12621 mixer_calculate_coefs (a
);
12622 mixer_notify_update (plci
, true);
12624 li_config_table
[i
].plci
= NULL
;
12625 plci
->li_bchannel_id
= 0;
12631 /*------------------------------------------------------------------*/
12632 /* Echo canceller facilities */
12633 /*------------------------------------------------------------------*/
12636 static void ec_write_parameters (PLCI
*plci
)
12639 byte parameter_buffer
[6];
12641 dbug (1, dprintf ("[%06lx] %s,%d: ec_write_parameters",
12642 (dword
)((plci
->Id
<< 8) | UnMapController (plci
->adapter
->Id
)),
12643 (char *)(FILE_
), __LINE__
));
12645 parameter_buffer
[0] = 5;
12646 parameter_buffer
[1] = DSP_CTRL_SET_LEC_PARAMETERS
;
12647 PUT_WORD (¶meter_buffer
[2], plci
->ec_idi_options
);
12648 plci
->ec_idi_options
&= ~LEC_RESET_COEFFICIENTS
;
12649 w
= (plci
->ec_tail_length
== 0) ? 128 : plci
->ec_tail_length
;
12650 PUT_WORD (¶meter_buffer
[4], w
);
12651 add_p (plci
, FTY
, parameter_buffer
);
12652 sig_req (plci
, TEL_CTRL
, 0);
12657 static void ec_clear_config (PLCI
*plci
)
12660 dbug (1, dprintf ("[%06lx] %s,%d: ec_clear_config",
12661 (dword
)((plci
->Id
<< 8) | UnMapController (plci
->adapter
->Id
)),
12662 (char *)(FILE_
), __LINE__
));
12664 plci
->ec_idi_options
= LEC_ENABLE_ECHO_CANCELLER
|
12665 LEC_MANUAL_DISABLE
| LEC_ENABLE_NONLINEAR_PROCESSING
;
12666 plci
->ec_tail_length
= 0;
12670 static void ec_prepare_switch (dword Id
, PLCI
*plci
)
12673 dbug (1, dprintf ("[%06lx] %s,%d: ec_prepare_switch",
12674 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
12679 static word
ec_save_config (dword Id
, PLCI
*plci
, byte Rc
)
12682 dbug (1, dprintf ("[%06lx] %s,%d: ec_save_config %02x %d",
12683 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
, plci
->adjust_b_state
));
12689 static word
ec_restore_config (dword Id
, PLCI
*plci
, byte Rc
)
12693 dbug (1, dprintf ("[%06lx] %s,%d: ec_restore_config %02x %d",
12694 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
, plci
->adjust_b_state
));
12697 if (plci
->B1_facilities
& B1_FACILITY_EC
)
12699 switch (plci
->adjust_b_state
)
12701 case ADJUST_B_RESTORE_EC_1
:
12702 plci
->internal_command
= plci
->adjust_b_command
;
12705 plci
->adjust_b_state
= ADJUST_B_RESTORE_EC_1
;
12708 ec_write_parameters (plci
);
12709 plci
->adjust_b_state
= ADJUST_B_RESTORE_EC_2
;
12711 case ADJUST_B_RESTORE_EC_2
:
12712 if ((Rc
!= OK
) && (Rc
!= OK_FC
))
12714 dbug (1, dprintf ("[%06lx] %s,%d: Restore EC failed %02x",
12715 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
));
12716 Info
= _WRONG_STATE
;
12726 static void ec_command (dword Id
, PLCI
*plci
, byte Rc
)
12728 word internal_command
, Info
;
12731 dbug (1, dprintf ("[%06lx] %s,%d: ec_command %02x %04x %04x %04x %d",
12732 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
, plci
->internal_command
,
12733 plci
->ec_cmd
, plci
->ec_idi_options
, plci
->ec_tail_length
));
12736 if (plci
->appl
->appl_flags
& APPL_FLAG_PRIV_EC_SPEC
)
12739 PUT_WORD (&result
[1], EC_SUCCESS
);
12744 PUT_WORD (&result
[1], plci
->ec_cmd
);
12746 PUT_WORD (&result
[4], GOOD
);
12748 internal_command
= plci
->internal_command
;
12749 plci
->internal_command
= 0;
12750 switch (plci
->ec_cmd
)
12752 case EC_ENABLE_OPERATION
:
12753 case EC_FREEZE_COEFFICIENTS
:
12754 case EC_RESUME_COEFFICIENT_UPDATE
:
12755 case EC_RESET_COEFFICIENTS
:
12756 switch (internal_command
)
12759 adjust_b1_resource (Id
, plci
, NULL
, (word
)(plci
->B1_facilities
|
12760 B1_FACILITY_EC
), EC_COMMAND_1
);
12762 if (adjust_b_process (Id
, plci
, Rc
) != GOOD
)
12764 dbug (1, dprintf ("[%06lx] %s,%d: Load EC failed",
12765 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
12766 Info
= _FACILITY_NOT_SUPPORTED
;
12769 if (plci
->internal_command
)
12774 plci
->internal_command
= EC_COMMAND_2
;
12777 plci
->internal_command
= EC_COMMAND_3
;
12778 ec_write_parameters (plci
);
12781 if ((Rc
!= OK
) && (Rc
!= OK_FC
))
12783 dbug (1, dprintf ("[%06lx] %s,%d: Enable EC failed %02x",
12784 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
));
12785 Info
= _FACILITY_NOT_SUPPORTED
;
12792 case EC_DISABLE_OPERATION
:
12793 switch (internal_command
)
12797 if (plci
->B1_facilities
& B1_FACILITY_EC
)
12801 plci
->internal_command
= EC_COMMAND_1
;
12804 plci
->internal_command
= EC_COMMAND_2
;
12805 ec_write_parameters (plci
);
12810 if ((Rc
!= OK
) && (Rc
!= OK_FC
))
12812 dbug (1, dprintf ("[%06lx] %s,%d: Disable EC failed %02x",
12813 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
));
12814 Info
= _FACILITY_NOT_SUPPORTED
;
12817 adjust_b1_resource (Id
, plci
, NULL
, (word
)(plci
->B1_facilities
&
12818 ~B1_FACILITY_EC
), EC_COMMAND_3
);
12820 if (adjust_b_process (Id
, plci
, Rc
) != GOOD
)
12822 dbug (1, dprintf ("[%06lx] %s,%d: Unload EC failed",
12823 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
12824 Info
= _FACILITY_NOT_SUPPORTED
;
12827 if (plci
->internal_command
)
12833 sendf (plci
->appl
, _FACILITY_R
| CONFIRM
, Id
& 0xffffL
, plci
->number
,
12834 "wws", Info
, (plci
->appl
->appl_flags
& APPL_FLAG_PRIV_EC_SPEC
) ?
12835 PRIV_SELECTOR_ECHO_CANCELLER
: SELECTOR_ECHO_CANCELLER
, result
);
12839 static byte
ec_request (dword Id
, word Number
, DIVA_CAPI_ADAPTER
*a
, PLCI
*plci
, APPL
*appl
, API_PARSE
*msg
)
12843 API_PARSE ec_parms
[3];
12846 dbug (1, dprintf ("[%06lx] %s,%d: ec_request",
12847 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
12851 if (!(a
->man_profile
.private_options
& (1L << PRIVATE_ECHO_CANCELLER
)))
12853 dbug (1, dprintf ("[%06lx] %s,%d: Facility not supported",
12854 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
12855 Info
= _FACILITY_NOT_SUPPORTED
;
12859 if (appl
->appl_flags
& APPL_FLAG_PRIV_EC_SPEC
)
12861 if (api_parse (&msg
[1].info
[1], msg
[1].length
, "w", ec_parms
))
12863 dbug (1, dprintf ("[%06lx] %s,%d: Wrong message format",
12864 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
12865 Info
= _WRONG_MESSAGE_FORMAT
;
12871 dbug (1, dprintf ("[%06lx] %s,%d: Wrong PLCI",
12872 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
12873 Info
= _WRONG_IDENTIFIER
;
12875 else if (!plci
->State
|| !plci
->NL
.Id
|| plci
->nl_remove_id
)
12877 dbug (1, dprintf ("[%06lx] %s,%d: Wrong state",
12878 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
12879 Info
= _WRONG_STATE
;
12884 plci
->ec_cmd
= GET_WORD (ec_parms
[0].info
);
12885 plci
->ec_idi_options
&= ~(LEC_MANUAL_DISABLE
| LEC_RESET_COEFFICIENTS
);
12887 PUT_WORD (&result
[1], EC_SUCCESS
);
12888 if (msg
[1].length
>= 4)
12890 opt
= GET_WORD (&ec_parms
[0].info
[2]);
12891 plci
->ec_idi_options
&= ~(LEC_ENABLE_NONLINEAR_PROCESSING
|
12892 LEC_ENABLE_2100HZ_DETECTOR
| LEC_REQUIRE_2100HZ_REVERSALS
);
12893 if (!(opt
& EC_DISABLE_NON_LINEAR_PROCESSING
))
12894 plci
->ec_idi_options
|= LEC_ENABLE_NONLINEAR_PROCESSING
;
12895 if (opt
& EC_DETECT_DISABLE_TONE
)
12896 plci
->ec_idi_options
|= LEC_ENABLE_2100HZ_DETECTOR
;
12897 if (!(opt
& EC_DO_NOT_REQUIRE_REVERSALS
))
12898 plci
->ec_idi_options
|= LEC_REQUIRE_2100HZ_REVERSALS
;
12899 if (msg
[1].length
>= 6)
12901 plci
->ec_tail_length
= GET_WORD (&ec_parms
[0].info
[4]);
12904 switch (plci
->ec_cmd
)
12906 case EC_ENABLE_OPERATION
:
12907 plci
->ec_idi_options
&= ~LEC_FREEZE_COEFFICIENTS
;
12908 start_internal_command (Id
, plci
, ec_command
);
12911 case EC_DISABLE_OPERATION
:
12912 plci
->ec_idi_options
= LEC_ENABLE_ECHO_CANCELLER
|
12913 LEC_MANUAL_DISABLE
| LEC_ENABLE_NONLINEAR_PROCESSING
|
12914 LEC_RESET_COEFFICIENTS
;
12915 start_internal_command (Id
, plci
, ec_command
);
12918 case EC_FREEZE_COEFFICIENTS
:
12919 plci
->ec_idi_options
|= LEC_FREEZE_COEFFICIENTS
;
12920 start_internal_command (Id
, plci
, ec_command
);
12923 case EC_RESUME_COEFFICIENT_UPDATE
:
12924 plci
->ec_idi_options
&= ~LEC_FREEZE_COEFFICIENTS
;
12925 start_internal_command (Id
, plci
, ec_command
);
12928 case EC_RESET_COEFFICIENTS
:
12929 plci
->ec_idi_options
|= LEC_RESET_COEFFICIENTS
;
12930 start_internal_command (Id
, plci
, ec_command
);
12934 dbug (1, dprintf ("[%06lx] %s,%d: EC unknown request %04x",
12935 UnMapId (Id
), (char *)(FILE_
), __LINE__
, plci
->ec_cmd
));
12936 PUT_WORD (&result
[1], EC_UNSUPPORTED_OPERATION
);
12943 if (api_parse (&msg
[1].info
[1], msg
[1].length
, "ws", ec_parms
))
12945 dbug (1, dprintf ("[%06lx] %s,%d: Wrong message format",
12946 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
12947 Info
= _WRONG_MESSAGE_FORMAT
;
12951 if (GET_WORD (ec_parms
[0].info
) == EC_GET_SUPPORTED_SERVICES
)
12954 PUT_WORD (&result
[1], EC_GET_SUPPORTED_SERVICES
);
12956 PUT_WORD (&result
[4], GOOD
);
12957 PUT_WORD (&result
[6], 0x0007);
12958 PUT_WORD (&result
[8], LEC_MAX_SUPPORTED_TAIL_LENGTH
);
12959 PUT_WORD (&result
[10], 0);
12961 else if (plci
== NULL
)
12963 dbug (1, dprintf ("[%06lx] %s,%d: Wrong PLCI",
12964 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
12965 Info
= _WRONG_IDENTIFIER
;
12967 else if (!plci
->State
|| !plci
->NL
.Id
|| plci
->nl_remove_id
)
12969 dbug (1, dprintf ("[%06lx] %s,%d: Wrong state",
12970 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
12971 Info
= _WRONG_STATE
;
12976 plci
->ec_cmd
= GET_WORD (ec_parms
[0].info
);
12977 plci
->ec_idi_options
&= ~(LEC_MANUAL_DISABLE
| LEC_RESET_COEFFICIENTS
);
12979 PUT_WORD (&result
[1], plci
->ec_cmd
);
12981 PUT_WORD (&result
[4], GOOD
);
12982 plci
->ec_idi_options
&= ~(LEC_ENABLE_NONLINEAR_PROCESSING
|
12983 LEC_ENABLE_2100HZ_DETECTOR
| LEC_REQUIRE_2100HZ_REVERSALS
);
12984 plci
->ec_tail_length
= 0;
12985 if (ec_parms
[1].length
>= 2)
12987 opt
= GET_WORD (&ec_parms
[1].info
[1]);
12988 if (opt
& EC_ENABLE_NON_LINEAR_PROCESSING
)
12989 plci
->ec_idi_options
|= LEC_ENABLE_NONLINEAR_PROCESSING
;
12990 if (opt
& EC_DETECT_DISABLE_TONE
)
12991 plci
->ec_idi_options
|= LEC_ENABLE_2100HZ_DETECTOR
;
12992 if (!(opt
& EC_DO_NOT_REQUIRE_REVERSALS
))
12993 plci
->ec_idi_options
|= LEC_REQUIRE_2100HZ_REVERSALS
;
12994 if (ec_parms
[1].length
>= 4)
12996 plci
->ec_tail_length
= GET_WORD (&ec_parms
[1].info
[3]);
12999 switch (plci
->ec_cmd
)
13001 case EC_ENABLE_OPERATION
:
13002 plci
->ec_idi_options
&= ~LEC_FREEZE_COEFFICIENTS
;
13003 start_internal_command (Id
, plci
, ec_command
);
13006 case EC_DISABLE_OPERATION
:
13007 plci
->ec_idi_options
= LEC_ENABLE_ECHO_CANCELLER
|
13008 LEC_MANUAL_DISABLE
| LEC_ENABLE_NONLINEAR_PROCESSING
|
13009 LEC_RESET_COEFFICIENTS
;
13010 start_internal_command (Id
, plci
, ec_command
);
13014 dbug (1, dprintf ("[%06lx] %s,%d: EC unknown request %04x",
13015 UnMapId (Id
), (char *)(FILE_
), __LINE__
, plci
->ec_cmd
));
13016 PUT_WORD (&result
[4], _FACILITY_SPECIFIC_FUNCTION_NOT_SUPP
);
13022 sendf (appl
, _FACILITY_R
| CONFIRM
, Id
& 0xffffL
, Number
,
13023 "wws", Info
, (appl
->appl_flags
& APPL_FLAG_PRIV_EC_SPEC
) ?
13024 PRIV_SELECTOR_ECHO_CANCELLER
: SELECTOR_ECHO_CANCELLER
, result
);
13029 static void ec_indication (dword Id
, PLCI
*plci
, byte
*msg
, word length
)
13033 dbug (1, dprintf ("[%06lx] %s,%d: ec_indication",
13034 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
13036 if (!(plci
->ec_idi_options
& LEC_MANUAL_DISABLE
))
13038 if (plci
->appl
->appl_flags
& APPL_FLAG_PRIV_EC_SPEC
)
13041 PUT_WORD (&result
[1], 0);
13044 case LEC_DISABLE_TYPE_CONTIGNUOUS_2100HZ
:
13045 PUT_WORD (&result
[1], EC_BYPASS_DUE_TO_CONTINUOUS_2100HZ
);
13047 case LEC_DISABLE_TYPE_REVERSED_2100HZ
:
13048 PUT_WORD (&result
[1], EC_BYPASS_DUE_TO_REVERSED_2100HZ
);
13050 case LEC_DISABLE_RELEASED
:
13051 PUT_WORD (&result
[1], EC_BYPASS_RELEASED
);
13058 PUT_WORD (&result
[1], EC_BYPASS_INDICATION
);
13060 PUT_WORD (&result
[4], 0);
13063 case LEC_DISABLE_TYPE_CONTIGNUOUS_2100HZ
:
13064 PUT_WORD (&result
[4], EC_BYPASS_DUE_TO_CONTINUOUS_2100HZ
);
13066 case LEC_DISABLE_TYPE_REVERSED_2100HZ
:
13067 PUT_WORD (&result
[4], EC_BYPASS_DUE_TO_REVERSED_2100HZ
);
13069 case LEC_DISABLE_RELEASED
:
13070 PUT_WORD (&result
[4], EC_BYPASS_RELEASED
);
13074 sendf (plci
->appl
, _FACILITY_I
, Id
& 0xffffL
, 0, "ws", (plci
->appl
->appl_flags
& APPL_FLAG_PRIV_EC_SPEC
) ?
13075 PRIV_SELECTOR_ECHO_CANCELLER
: SELECTOR_ECHO_CANCELLER
, result
);
13081 /*------------------------------------------------------------------*/
13082 /* Advanced voice */
13083 /*------------------------------------------------------------------*/
13085 static void adv_voice_write_coefs (PLCI
*plci
, word write_command
)
13087 DIVA_CAPI_ADAPTER
*a
;
13092 byte ch_map
[MIXER_CHANNELS_BRI
];
13094 byte coef_buffer
[ADV_VOICE_COEF_BUFFER_SIZE
+ 2];
13096 dbug (1, dprintf ("[%06lx] %s,%d: adv_voice_write_coefs %d",
13097 (dword
)((plci
->Id
<< 8) | UnMapController (plci
->adapter
->Id
)),
13098 (char *)(FILE_
), __LINE__
, write_command
));
13101 p
= coef_buffer
+ 1;
13102 *(p
++) = DSP_CTRL_OLD_SET_MIXER_COEFFICIENTS
;
13104 while (i
+ sizeof(word
) <= a
->adv_voice_coef_length
)
13106 PUT_WORD (p
, GET_WORD (a
->adv_voice_coef_buffer
+ i
));
13110 while (i
< ADV_VOICE_OLD_COEF_COUNT
* sizeof(word
))
13112 PUT_WORD (p
, 0x8000);
13117 if (!a
->li_pri
&& (plci
->li_bchannel_id
== 0))
13119 if ((li_config_table
[a
->li_base
].plci
== NULL
) && (li_config_table
[a
->li_base
+ 1].plci
!= NULL
))
13121 plci
->li_bchannel_id
= 1;
13122 li_config_table
[a
->li_base
].plci
= plci
;
13123 dbug (1, dprintf ("[%06lx] %s,%d: adv_voice_set_bchannel_id %d",
13124 (dword
)((plci
->Id
<< 8) | UnMapController (plci
->adapter
->Id
)),
13125 (char *)(FILE_
), __LINE__
, plci
->li_bchannel_id
));
13127 else if ((li_config_table
[a
->li_base
].plci
!= NULL
) && (li_config_table
[a
->li_base
+ 1].plci
== NULL
))
13129 plci
->li_bchannel_id
= 2;
13130 li_config_table
[a
->li_base
+ 1].plci
= plci
;
13131 dbug (1, dprintf ("[%06lx] %s,%d: adv_voice_set_bchannel_id %d",
13132 (dword
)((plci
->Id
<< 8) | UnMapController (plci
->adapter
->Id
)),
13133 (char *)(FILE_
), __LINE__
, plci
->li_bchannel_id
));
13136 if (!a
->li_pri
&& (plci
->li_bchannel_id
!= 0)
13137 && (li_config_table
[a
->li_base
+ (plci
->li_bchannel_id
- 1)].plci
== plci
))
13139 i
= a
->li_base
+ (plci
->li_bchannel_id
- 1);
13140 switch (write_command
)
13142 case ADV_VOICE_WRITE_ACTIVATION
:
13143 j
= a
->li_base
+ MIXER_IC_CHANNEL_BASE
+ (plci
->li_bchannel_id
- 1);
13144 k
= a
->li_base
+ MIXER_IC_CHANNEL_BASE
+ (2 - plci
->li_bchannel_id
);
13145 if (!(plci
->B1_facilities
& B1_FACILITY_MIXER
))
13147 li_config_table
[j
].flag_table
[i
] |= LI_FLAG_CONFERENCE
| LI_FLAG_MIX
;
13148 li_config_table
[i
].flag_table
[j
] |= LI_FLAG_CONFERENCE
| LI_FLAG_MONITOR
;
13150 if (a
->manufacturer_features
& MANUFACTURER_FEATURE_SLAVE_CODEC
)
13152 li_config_table
[k
].flag_table
[i
] |= LI_FLAG_CONFERENCE
| LI_FLAG_MIX
;
13153 li_config_table
[i
].flag_table
[k
] |= LI_FLAG_CONFERENCE
| LI_FLAG_MONITOR
;
13154 li_config_table
[k
].flag_table
[j
] |= LI_FLAG_CONFERENCE
;
13155 li_config_table
[j
].flag_table
[k
] |= LI_FLAG_CONFERENCE
;
13157 mixer_calculate_coefs (a
);
13158 li_config_table
[i
].curchnl
= li_config_table
[i
].channel
;
13159 li_config_table
[j
].curchnl
= li_config_table
[j
].channel
;
13160 if (a
->manufacturer_features
& MANUFACTURER_FEATURE_SLAVE_CODEC
)
13161 li_config_table
[k
].curchnl
= li_config_table
[k
].channel
;
13164 case ADV_VOICE_WRITE_DEACTIVATION
:
13165 for (j
= 0; j
< li_total_channels
; j
++)
13167 li_config_table
[i
].flag_table
[j
] = 0;
13168 li_config_table
[j
].flag_table
[i
] = 0;
13170 k
= a
->li_base
+ MIXER_IC_CHANNEL_BASE
+ (plci
->li_bchannel_id
- 1);
13171 for (j
= 0; j
< li_total_channels
; j
++)
13173 li_config_table
[k
].flag_table
[j
] = 0;
13174 li_config_table
[j
].flag_table
[k
] = 0;
13176 if (a
->manufacturer_features
& MANUFACTURER_FEATURE_SLAVE_CODEC
)
13178 k
= a
->li_base
+ MIXER_IC_CHANNEL_BASE
+ (2 - plci
->li_bchannel_id
);
13179 for (j
= 0; j
< li_total_channels
; j
++)
13181 li_config_table
[k
].flag_table
[j
] = 0;
13182 li_config_table
[j
].flag_table
[k
] = 0;
13185 mixer_calculate_coefs (a
);
13188 if (plci
->B1_facilities
& B1_FACILITY_MIXER
)
13191 if (ADV_VOICE_NEW_COEF_BASE
+ sizeof(word
) <= a
->adv_voice_coef_length
)
13192 w
= GET_WORD (a
->adv_voice_coef_buffer
+ ADV_VOICE_NEW_COEF_BASE
);
13193 if (li_config_table
[i
].channel
& LI_CHANNEL_TX_DATA
)
13194 w
|= MIXER_FEATURE_ENABLE_TX_DATA
;
13195 if (li_config_table
[i
].channel
& LI_CHANNEL_RX_DATA
)
13196 w
|= MIXER_FEATURE_ENABLE_RX_DATA
;
13198 *(p
++) = (byte
)(w
>> 8);
13199 for (j
= 0; j
< sizeof(ch_map
); j
+= 2)
13201 ch_map
[j
] = (byte
)(j
+ (plci
->li_bchannel_id
- 1));
13202 ch_map
[j
+1] = (byte
)(j
+ (2 - plci
->li_bchannel_id
));
13204 for (n
= 0; n
< ARRAY_SIZE(mixer_write_prog_bri
); n
++)
13206 i
= a
->li_base
+ ch_map
[mixer_write_prog_bri
[n
].to_ch
];
13207 j
= a
->li_base
+ ch_map
[mixer_write_prog_bri
[n
].from_ch
];
13208 if (li_config_table
[i
].channel
& li_config_table
[j
].channel
& LI_CHANNEL_INVOLVED
)
13210 *(p
++) = ((li_config_table
[i
].coef_table
[j
] & mixer_write_prog_bri
[n
].mask
) ? 0x80 : 0x01);
13211 w
= ((li_config_table
[i
].coef_table
[j
] & 0xf) ^ (li_config_table
[i
].coef_table
[j
] >> 4));
13212 li_config_table
[i
].coef_table
[j
] ^= (w
& mixer_write_prog_bri
[n
].mask
) << 4;
13216 *(p
++) = (ADV_VOICE_NEW_COEF_BASE
+ sizeof(word
) + n
< a
->adv_voice_coef_length
) ?
13217 a
->adv_voice_coef_buffer
[ADV_VOICE_NEW_COEF_BASE
+ sizeof(word
) + n
] : 0x00;
13223 for (i
= ADV_VOICE_NEW_COEF_BASE
; i
< a
->adv_voice_coef_length
; i
++)
13224 *(p
++) = a
->adv_voice_coef_buffer
[i
];
13230 for (i
= ADV_VOICE_NEW_COEF_BASE
; i
< a
->adv_voice_coef_length
; i
++)
13231 *(p
++) = a
->adv_voice_coef_buffer
[i
];
13233 coef_buffer
[0] = (p
- coef_buffer
) - 1;
13234 add_p (plci
, FTY
, coef_buffer
);
13235 sig_req (plci
, TEL_CTRL
, 0);
13240 static void adv_voice_clear_config (PLCI
*plci
)
13242 DIVA_CAPI_ADAPTER
*a
;
13247 dbug (1, dprintf ("[%06lx] %s,%d: adv_voice_clear_config",
13248 (dword
)((plci
->Id
<< 8) | UnMapController (plci
->adapter
->Id
)),
13249 (char *)(FILE_
), __LINE__
));
13252 if ((plci
->tel
== ADV_VOICE
) && (plci
== a
->AdvSignalPLCI
))
13254 a
->adv_voice_coef_length
= 0;
13256 if (!a
->li_pri
&& (plci
->li_bchannel_id
!= 0)
13257 && (li_config_table
[a
->li_base
+ (plci
->li_bchannel_id
- 1)].plci
== plci
))
13259 i
= a
->li_base
+ (plci
->li_bchannel_id
- 1);
13260 li_config_table
[i
].curchnl
= 0;
13261 li_config_table
[i
].channel
= 0;
13262 li_config_table
[i
].chflags
= 0;
13263 for (j
= 0; j
< li_total_channels
; j
++)
13265 li_config_table
[i
].flag_table
[j
] = 0;
13266 li_config_table
[j
].flag_table
[i
] = 0;
13267 li_config_table
[i
].coef_table
[j
] = 0;
13268 li_config_table
[j
].coef_table
[i
] = 0;
13270 li_config_table
[i
].coef_table
[i
] |= LI_COEF_CH_PC_SET
| LI_COEF_PC_CH_SET
;
13271 i
= a
->li_base
+ MIXER_IC_CHANNEL_BASE
+ (plci
->li_bchannel_id
- 1);
13272 li_config_table
[i
].curchnl
= 0;
13273 li_config_table
[i
].channel
= 0;
13274 li_config_table
[i
].chflags
= 0;
13275 for (j
= 0; j
< li_total_channels
; j
++)
13277 li_config_table
[i
].flag_table
[j
] = 0;
13278 li_config_table
[j
].flag_table
[i
] = 0;
13279 li_config_table
[i
].coef_table
[j
] = 0;
13280 li_config_table
[j
].coef_table
[i
] = 0;
13282 if (a
->manufacturer_features
& MANUFACTURER_FEATURE_SLAVE_CODEC
)
13284 i
= a
->li_base
+ MIXER_IC_CHANNEL_BASE
+ (2 - plci
->li_bchannel_id
);
13285 li_config_table
[i
].curchnl
= 0;
13286 li_config_table
[i
].channel
= 0;
13287 li_config_table
[i
].chflags
= 0;
13288 for (j
= 0; j
< li_total_channels
; j
++)
13290 li_config_table
[i
].flag_table
[j
] = 0;
13291 li_config_table
[j
].flag_table
[i
] = 0;
13292 li_config_table
[i
].coef_table
[j
] = 0;
13293 li_config_table
[j
].coef_table
[i
] = 0;
13302 static void adv_voice_prepare_switch (dword Id
, PLCI
*plci
)
13305 dbug (1, dprintf ("[%06lx] %s,%d: adv_voice_prepare_switch",
13306 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
13311 static word
adv_voice_save_config (dword Id
, PLCI
*plci
, byte Rc
)
13314 dbug (1, dprintf ("[%06lx] %s,%d: adv_voice_save_config %02x %d",
13315 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
, plci
->adjust_b_state
));
13321 static word
adv_voice_restore_config (dword Id
, PLCI
*plci
, byte Rc
)
13323 DIVA_CAPI_ADAPTER
*a
;
13326 dbug (1, dprintf ("[%06lx] %s,%d: adv_voice_restore_config %02x %d",
13327 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
, plci
->adjust_b_state
));
13331 if ((plci
->B1_facilities
& B1_FACILITY_VOICE
)
13332 && (plci
->tel
== ADV_VOICE
) && (plci
== a
->AdvSignalPLCI
))
13334 switch (plci
->adjust_b_state
)
13336 case ADJUST_B_RESTORE_VOICE_1
:
13337 plci
->internal_command
= plci
->adjust_b_command
;
13340 plci
->adjust_b_state
= ADJUST_B_RESTORE_VOICE_1
;
13343 adv_voice_write_coefs (plci
, ADV_VOICE_WRITE_UPDATE
);
13344 plci
->adjust_b_state
= ADJUST_B_RESTORE_VOICE_2
;
13346 case ADJUST_B_RESTORE_VOICE_2
:
13347 if ((Rc
!= OK
) && (Rc
!= OK_FC
))
13349 dbug (1, dprintf ("[%06lx] %s,%d: Restore voice config failed %02x",
13350 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
));
13351 Info
= _WRONG_STATE
;
13363 /*------------------------------------------------------------------*/
13364 /* B1 resource switching */
13365 /*------------------------------------------------------------------*/
13367 static byte b1_facilities_table
[] =
13369 0x00, /* 0 No bchannel resources */
13370 0x00, /* 1 Codec (automatic law) */
13371 0x00, /* 2 Codec (A-law) */
13372 0x00, /* 3 Codec (y-law) */
13373 0x00, /* 4 HDLC for X.21 */
13375 0x00, /* 6 External Device 0 */
13376 0x00, /* 7 External Device 1 */
13377 0x00, /* 8 HDLC 56k */
13378 0x00, /* 9 Transparent */
13379 0x00, /* 10 Loopback to network */
13380 0x00, /* 11 Test pattern to net */
13381 0x00, /* 12 Rate adaptation sync */
13382 0x00, /* 13 Rate adaptation async */
13383 0x00, /* 14 R-Interface */
13384 0x00, /* 15 HDLC 128k leased line */
13386 0x00, /* 17 Modem async */
13387 0x00, /* 18 Modem sync HDLC */
13388 0x00, /* 19 V.110 async HDLC */
13389 0x12, /* 20 Adv voice (Trans,mixer) */
13390 0x00, /* 21 Codec connected to IC */
13391 0x0c, /* 22 Trans,DTMF */
13392 0x1e, /* 23 Trans,DTMF+mixer */
13393 0x1f, /* 24 Trans,DTMF+mixer+local */
13394 0x13, /* 25 Trans,mixer+local */
13395 0x12, /* 26 HDLC,mixer */
13396 0x12, /* 27 HDLC 56k,mixer */
13397 0x2c, /* 28 Trans,LEC+DTMF */
13398 0x3e, /* 29 Trans,LEC+DTMF+mixer */
13399 0x3f, /* 30 Trans,LEC+DTMF+mixer+local */
13400 0x2c, /* 31 RTP,LEC+DTMF */
13401 0x3e, /* 32 RTP,LEC+DTMF+mixer */
13402 0x3f, /* 33 RTP,LEC+DTMF+mixer+local */
13403 0x00, /* 34 Signaling task */
13404 0x00, /* 35 PIAFS */
13405 0x0c, /* 36 Trans,DTMF+TONE */
13406 0x1e, /* 37 Trans,DTMF+TONE+mixer */
13407 0x1f /* 38 Trans,DTMF+TONE+mixer+local*/
13411 static word
get_b1_facilities (PLCI
* plci
, byte b1_resource
)
13413 word b1_facilities
;
13415 b1_facilities
= b1_facilities_table
[b1_resource
];
13416 if ((b1_resource
== 9) || (b1_resource
== 20) || (b1_resource
== 25))
13419 if (!(((plci
->requested_options_conn
| plci
->requested_options
) & (1L << PRIVATE_DTMF_TONE
))
13420 || (plci
->appl
&& (plci
->adapter
->requested_options_table
[plci
->appl
->Id
-1] & (1L << PRIVATE_DTMF_TONE
)))))
13423 if (plci
->adapter
->manufacturer_features
& MANUFACTURER_FEATURE_SOFTDTMF_SEND
)
13424 b1_facilities
|= B1_FACILITY_DTMFX
;
13425 if (plci
->adapter
->manufacturer_features
& MANUFACTURER_FEATURE_SOFTDTMF_RECEIVE
)
13426 b1_facilities
|= B1_FACILITY_DTMFR
;
13429 if ((b1_resource
== 17) || (b1_resource
== 18))
13431 if (plci
->adapter
->manufacturer_features
& (MANUFACTURER_FEATURE_V18
| MANUFACTURER_FEATURE_VOWN
))
13432 b1_facilities
|= B1_FACILITY_DTMFX
| B1_FACILITY_DTMFR
;
13435 dbug (1, dprintf ("[%06lx] %s,%d: get_b1_facilities %d %04x",
13436 (dword)((plci->Id << 8) | UnMapController (plci->adapter->Id)),
13437 (char far *)(FILE_), __LINE__, b1_resource, b1_facilites));
13439 return (b1_facilities
);
13443 static byte
add_b1_facilities (PLCI
* plci
, byte b1_resource
, word b1_facilities
)
13447 switch (b1_resource
)
13451 if (b1_facilities
& (B1_FACILITY_MIXER
| B1_FACILITY_VOICE
))
13459 if (b1_facilities
& (B1_FACILITY_MIXER
| B1_FACILITY_VOICE
))
13477 if (b1_facilities
& B1_FACILITY_EC
)
13479 if (b1_facilities
& B1_FACILITY_LOCAL
)
13481 else if (b1_facilities
& (B1_FACILITY_MIXER
| B1_FACILITY_VOICE
))
13487 else if ((b1_facilities
& (B1_FACILITY_DTMFX
| B1_FACILITY_DTMFR
| B1_FACILITY_MIXER
))
13488 && (((plci
->requested_options_conn
| plci
->requested_options
) & (1L << PRIVATE_DTMF_TONE
))
13489 || (plci
->appl
&& (plci
->adapter
->requested_options_table
[plci
->appl
->Id
-1] & (1L << PRIVATE_DTMF_TONE
)))))
13491 if (b1_facilities
& B1_FACILITY_LOCAL
)
13493 else if (b1_facilities
& (B1_FACILITY_MIXER
| B1_FACILITY_VOICE
))
13499 else if (((plci
->adapter
->manufacturer_features
& MANUFACTURER_FEATURE_HARDDTMF
)
13500 && !(plci
->adapter
->manufacturer_features
& MANUFACTURER_FEATURE_SOFTDTMF_RECEIVE
))
13501 || ((b1_facilities
& B1_FACILITY_DTMFR
)
13502 && ((b1_facilities
& B1_FACILITY_MIXER
)
13503 || !(plci
->adapter
->manufacturer_features
& MANUFACTURER_FEATURE_SOFTDTMF_RECEIVE
)))
13504 || ((b1_facilities
& B1_FACILITY_DTMFX
)
13505 && ((b1_facilities
& B1_FACILITY_MIXER
)
13506 || !(plci
->adapter
->manufacturer_features
& MANUFACTURER_FEATURE_SOFTDTMF_SEND
))))
13508 if (b1_facilities
& B1_FACILITY_LOCAL
)
13510 else if (b1_facilities
& (B1_FACILITY_MIXER
| B1_FACILITY_VOICE
))
13517 if (b1_facilities
& B1_FACILITY_LOCAL
)
13519 else if (b1_facilities
& (B1_FACILITY_MIXER
| B1_FACILITY_VOICE
))
13529 if (b1_facilities
& B1_FACILITY_LOCAL
)
13531 else if (b1_facilities
& (B1_FACILITY_MIXER
| B1_FACILITY_VOICE
))
13540 dbug (1, dprintf ("[%06lx] %s,%d: add_b1_facilities %d %04x %d %04x",
13541 (dword
)((plci
->Id
<< 8) | UnMapController (plci
->adapter
->Id
)),
13542 (char *)(FILE_
), __LINE__
,
13543 b1_resource
, b1_facilities
, b
, get_b1_facilities (plci
, b
)));
13548 static void adjust_b1_facilities (PLCI
*plci
, byte new_b1_resource
, word new_b1_facilities
)
13550 word removed_facilities
;
13552 dbug (1, dprintf ("[%06lx] %s,%d: adjust_b1_facilities %d %04x %04x",
13553 (dword
)((plci
->Id
<< 8) | UnMapController (plci
->adapter
->Id
)),
13554 (char *)(FILE_
), __LINE__
, new_b1_resource
, new_b1_facilities
,
13555 new_b1_facilities
& get_b1_facilities (plci
, new_b1_resource
)));
13557 new_b1_facilities
&= get_b1_facilities (plci
, new_b1_resource
);
13558 removed_facilities
= plci
->B1_facilities
& ~new_b1_facilities
;
13560 if (removed_facilities
& B1_FACILITY_EC
)
13561 ec_clear_config (plci
);
13564 if (removed_facilities
& B1_FACILITY_DTMFR
)
13566 dtmf_rec_clear_config (plci
);
13567 dtmf_parameter_clear_config (plci
);
13569 if (removed_facilities
& B1_FACILITY_DTMFX
)
13570 dtmf_send_clear_config (plci
);
13573 if (removed_facilities
& B1_FACILITY_MIXER
)
13574 mixer_clear_config (plci
);
13576 if (removed_facilities
& B1_FACILITY_VOICE
)
13577 adv_voice_clear_config (plci
);
13578 plci
->B1_facilities
= new_b1_facilities
;
13582 static void adjust_b_clear (PLCI
*plci
)
13585 dbug (1, dprintf ("[%06lx] %s,%d: adjust_b_clear",
13586 (dword
)((plci
->Id
<< 8) | UnMapController (plci
->adapter
->Id
)),
13587 (char *)(FILE_
), __LINE__
));
13589 plci
->adjust_b_restore
= false;
13593 static word
adjust_b_process (dword Id
, PLCI
*plci
, byte Rc
)
13600 dbug (1, dprintf ("[%06lx] %s,%d: adjust_b_process %02x %d",
13601 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
, plci
->adjust_b_state
));
13604 switch (plci
->adjust_b_state
)
13606 case ADJUST_B_START
:
13607 if ((plci
->adjust_b_parms_msg
== NULL
)
13608 && (plci
->adjust_b_mode
& ADJUST_B_MODE_SWITCH_L1
)
13609 && ((plci
->adjust_b_mode
& ~(ADJUST_B_MODE_SAVE
| ADJUST_B_MODE_SWITCH_L1
|
13610 ADJUST_B_MODE_NO_RESOURCE
| ADJUST_B_MODE_RESTORE
)) == 0))
13612 b1_resource
= (plci
->adjust_b_mode
== ADJUST_B_MODE_NO_RESOURCE
) ?
13613 0 : add_b1_facilities (plci
, plci
->B1_resource
, plci
->adjust_b_facilities
);
13614 if (b1_resource
== plci
->B1_resource
)
13616 adjust_b1_facilities (plci
, b1_resource
, plci
->adjust_b_facilities
);
13619 if (plci
->adjust_b_facilities
& ~get_b1_facilities (plci
, b1_resource
))
13621 dbug (1, dprintf ("[%06lx] %s,%d: Adjust B nonsupported facilities %d %d %04x",
13622 UnMapId (Id
), (char *)(FILE_
), __LINE__
,
13623 plci
->B1_resource
, b1_resource
, plci
->adjust_b_facilities
));
13624 Info
= _WRONG_STATE
;
13628 if (plci
->adjust_b_mode
& ADJUST_B_MODE_SAVE
)
13631 mixer_prepare_switch (Id
, plci
);
13634 dtmf_prepare_switch (Id
, plci
);
13635 dtmf_parameter_prepare_switch (Id
, plci
);
13638 ec_prepare_switch (Id
, plci
);
13640 adv_voice_prepare_switch (Id
, plci
);
13642 plci
->adjust_b_state
= ADJUST_B_SAVE_MIXER_1
;
13644 case ADJUST_B_SAVE_MIXER_1
:
13645 if (plci
->adjust_b_mode
& ADJUST_B_MODE_SAVE
)
13648 Info
= mixer_save_config (Id
, plci
, Rc
);
13649 if ((Info
!= GOOD
) || plci
->internal_command
)
13653 plci
->adjust_b_state
= ADJUST_B_SAVE_DTMF_1
;
13655 case ADJUST_B_SAVE_DTMF_1
:
13656 if (plci
->adjust_b_mode
& ADJUST_B_MODE_SAVE
)
13659 Info
= dtmf_save_config (Id
, plci
, Rc
);
13660 if ((Info
!= GOOD
) || plci
->internal_command
)
13664 plci
->adjust_b_state
= ADJUST_B_REMOVE_L23_1
;
13665 case ADJUST_B_REMOVE_L23_1
:
13666 if ((plci
->adjust_b_mode
& ADJUST_B_MODE_REMOVE_L23
)
13667 && plci
->NL
.Id
&& !plci
->nl_remove_id
)
13669 plci
->internal_command
= plci
->adjust_b_command
;
13670 if (plci
->adjust_b_ncci
!= 0)
13672 ncci_ptr
= &(plci
->adapter
->ncci
[plci
->adjust_b_ncci
]);
13673 while (ncci_ptr
->data_pending
)
13675 plci
->data_sent_ptr
= ncci_ptr
->DBuffer
[ncci_ptr
->data_out
].P
;
13676 data_rc (plci
, plci
->adapter
->ncci_ch
[plci
->adjust_b_ncci
]);
13678 while (ncci_ptr
->data_ack_pending
)
13679 data_ack (plci
, plci
->adapter
->ncci_ch
[plci
->adjust_b_ncci
]);
13681 nl_req_ncci (plci
, REMOVE
,
13682 (byte
)((plci
->adjust_b_mode
& ADJUST_B_MODE_CONNECT
) ? plci
->adjust_b_ncci
: 0));
13684 plci
->adjust_b_state
= ADJUST_B_REMOVE_L23_2
;
13687 plci
->adjust_b_state
= ADJUST_B_REMOVE_L23_2
;
13689 case ADJUST_B_REMOVE_L23_2
:
13690 if ((Rc
!= OK
) && (Rc
!= OK_FC
))
13692 dbug (1, dprintf ("[%06lx] %s,%d: Adjust B remove failed %02x",
13693 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
));
13694 Info
= _WRONG_STATE
;
13697 if (plci
->adjust_b_mode
& ADJUST_B_MODE_REMOVE_L23
)
13699 if (plci_nl_busy (plci
))
13701 plci
->internal_command
= plci
->adjust_b_command
;
13705 plci
->adjust_b_state
= ADJUST_B_SAVE_EC_1
;
13707 case ADJUST_B_SAVE_EC_1
:
13708 if (plci
->adjust_b_mode
& ADJUST_B_MODE_SAVE
)
13711 Info
= ec_save_config (Id
, plci
, Rc
);
13712 if ((Info
!= GOOD
) || plci
->internal_command
)
13716 plci
->adjust_b_state
= ADJUST_B_SAVE_DTMF_PARAMETER_1
;
13718 case ADJUST_B_SAVE_DTMF_PARAMETER_1
:
13719 if (plci
->adjust_b_mode
& ADJUST_B_MODE_SAVE
)
13722 Info
= dtmf_parameter_save_config (Id
, plci
, Rc
);
13723 if ((Info
!= GOOD
) || plci
->internal_command
)
13727 plci
->adjust_b_state
= ADJUST_B_SAVE_VOICE_1
;
13729 case ADJUST_B_SAVE_VOICE_1
:
13730 if (plci
->adjust_b_mode
& ADJUST_B_MODE_SAVE
)
13732 Info
= adv_voice_save_config (Id
, plci
, Rc
);
13733 if ((Info
!= GOOD
) || plci
->internal_command
)
13736 plci
->adjust_b_state
= ADJUST_B_SWITCH_L1_1
;
13737 case ADJUST_B_SWITCH_L1_1
:
13738 if (plci
->adjust_b_mode
& ADJUST_B_MODE_SWITCH_L1
)
13742 plci
->internal_command
= plci
->adjust_b_command
;
13745 if (plci
->adjust_b_parms_msg
!= NULL
)
13746 api_load_msg (plci
->adjust_b_parms_msg
, bp
);
13748 api_load_msg (&plci
->B_protocol
, bp
);
13749 Info
= add_b1 (plci
, bp
,
13750 (word
)((plci
->adjust_b_mode
& ADJUST_B_MODE_NO_RESOURCE
) ? 2 : 0),
13751 plci
->adjust_b_facilities
);
13754 dbug (1, dprintf ("[%06lx] %s,%d: Adjust B invalid L1 parameters %d %04x",
13755 UnMapId (Id
), (char *)(FILE_
), __LINE__
,
13756 plci
->B1_resource
, plci
->adjust_b_facilities
));
13759 plci
->internal_command
= plci
->adjust_b_command
;
13760 sig_req (plci
, RESOURCES
, 0);
13762 plci
->adjust_b_state
= ADJUST_B_SWITCH_L1_2
;
13765 plci
->adjust_b_state
= ADJUST_B_SWITCH_L1_2
;
13767 case ADJUST_B_SWITCH_L1_2
:
13768 if ((Rc
!= OK
) && (Rc
!= OK_FC
))
13770 dbug (1, dprintf ("[%06lx] %s,%d: Adjust B switch failed %02x %d %04x",
13771 UnMapId (Id
), (char *)(FILE_
), __LINE__
,
13772 Rc
, plci
->B1_resource
, plci
->adjust_b_facilities
));
13773 Info
= _WRONG_STATE
;
13776 plci
->adjust_b_state
= ADJUST_B_RESTORE_VOICE_1
;
13778 case ADJUST_B_RESTORE_VOICE_1
:
13779 case ADJUST_B_RESTORE_VOICE_2
:
13780 if (plci
->adjust_b_mode
& ADJUST_B_MODE_RESTORE
)
13782 Info
= adv_voice_restore_config (Id
, plci
, Rc
);
13783 if ((Info
!= GOOD
) || plci
->internal_command
)
13786 plci
->adjust_b_state
= ADJUST_B_RESTORE_DTMF_PARAMETER_1
;
13788 case ADJUST_B_RESTORE_DTMF_PARAMETER_1
:
13789 case ADJUST_B_RESTORE_DTMF_PARAMETER_2
:
13790 if (plci
->adjust_b_mode
& ADJUST_B_MODE_RESTORE
)
13793 Info
= dtmf_parameter_restore_config (Id
, plci
, Rc
);
13794 if ((Info
!= GOOD
) || plci
->internal_command
)
13798 plci
->adjust_b_state
= ADJUST_B_RESTORE_EC_1
;
13800 case ADJUST_B_RESTORE_EC_1
:
13801 case ADJUST_B_RESTORE_EC_2
:
13802 if (plci
->adjust_b_mode
& ADJUST_B_MODE_RESTORE
)
13805 Info
= ec_restore_config (Id
, plci
, Rc
);
13806 if ((Info
!= GOOD
) || plci
->internal_command
)
13810 plci
->adjust_b_state
= ADJUST_B_ASSIGN_L23_1
;
13811 case ADJUST_B_ASSIGN_L23_1
:
13812 if (plci
->adjust_b_mode
& ADJUST_B_MODE_ASSIGN_L23
)
13814 if (plci_nl_busy (plci
))
13816 plci
->internal_command
= plci
->adjust_b_command
;
13819 if (plci
->adjust_b_mode
& ADJUST_B_MODE_CONNECT
)
13820 plci
->call_dir
|= CALL_DIR_FORCE_OUTG_NL
;
13821 if (plci
->adjust_b_parms_msg
!= NULL
)
13822 api_load_msg (plci
->adjust_b_parms_msg
, bp
);
13824 api_load_msg (&plci
->B_protocol
, bp
);
13825 Info
= add_b23 (plci
, bp
);
13828 dbug (1, dprintf ("[%06lx] %s,%d: Adjust B invalid L23 parameters %04x",
13829 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Info
));
13832 plci
->internal_command
= plci
->adjust_b_command
;
13833 nl_req_ncci (plci
, ASSIGN
, 0);
13835 plci
->adjust_b_state
= ADJUST_B_ASSIGN_L23_2
;
13838 plci
->adjust_b_state
= ADJUST_B_ASSIGN_L23_2
;
13840 case ADJUST_B_ASSIGN_L23_2
:
13841 if ((Rc
!= OK
) && (Rc
!= OK_FC
) && (Rc
!= ASSIGN_OK
))
13843 dbug (1, dprintf ("[%06lx] %s,%d: Adjust B assign failed %02x",
13844 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
));
13845 Info
= _WRONG_STATE
;
13848 if (plci
->adjust_b_mode
& ADJUST_B_MODE_ASSIGN_L23
)
13850 if (Rc
!= ASSIGN_OK
)
13852 plci
->internal_command
= plci
->adjust_b_command
;
13856 if (plci
->adjust_b_mode
& ADJUST_B_MODE_USER_CONNECT
)
13858 plci
->adjust_b_restore
= true;
13861 plci
->adjust_b_state
= ADJUST_B_CONNECT_1
;
13862 case ADJUST_B_CONNECT_1
:
13863 if (plci
->adjust_b_mode
& ADJUST_B_MODE_CONNECT
)
13865 plci
->internal_command
= plci
->adjust_b_command
;
13866 if (plci_nl_busy (plci
))
13868 nl_req_ncci (plci
, N_CONNECT
, 0);
13870 plci
->adjust_b_state
= ADJUST_B_CONNECT_2
;
13873 plci
->adjust_b_state
= ADJUST_B_RESTORE_DTMF_1
;
13875 case ADJUST_B_CONNECT_2
:
13876 case ADJUST_B_CONNECT_3
:
13877 case ADJUST_B_CONNECT_4
:
13878 if ((Rc
!= OK
) && (Rc
!= OK_FC
) && (Rc
!= 0))
13880 dbug (1, dprintf ("[%06lx] %s,%d: Adjust B connect failed %02x",
13881 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
));
13882 Info
= _WRONG_STATE
;
13887 if (plci
->adjust_b_mode
& ADJUST_B_MODE_CONNECT
)
13889 get_ncci (plci
, (byte
)(Id
>> 16), plci
->adjust_b_ncci
);
13890 Id
= (Id
& 0xffff) | (((dword
)(plci
->adjust_b_ncci
)) << 16);
13892 if (plci
->adjust_b_state
== ADJUST_B_CONNECT_2
)
13893 plci
->adjust_b_state
= ADJUST_B_CONNECT_3
;
13894 else if (plci
->adjust_b_state
== ADJUST_B_CONNECT_4
)
13895 plci
->adjust_b_state
= ADJUST_B_RESTORE_DTMF_1
;
13899 if (plci
->adjust_b_state
== ADJUST_B_CONNECT_2
)
13900 plci
->adjust_b_state
= ADJUST_B_CONNECT_4
;
13901 else if (plci
->adjust_b_state
== ADJUST_B_CONNECT_3
)
13902 plci
->adjust_b_state
= ADJUST_B_RESTORE_DTMF_1
;
13904 if (plci
->adjust_b_state
!= ADJUST_B_RESTORE_DTMF_1
)
13906 plci
->internal_command
= plci
->adjust_b_command
;
13910 case ADJUST_B_RESTORE_DTMF_1
:
13911 case ADJUST_B_RESTORE_DTMF_2
:
13912 if (plci
->adjust_b_mode
& ADJUST_B_MODE_RESTORE
)
13915 Info
= dtmf_restore_config (Id
, plci
, Rc
);
13916 if ((Info
!= GOOD
) || plci
->internal_command
)
13920 plci
->adjust_b_state
= ADJUST_B_RESTORE_MIXER_1
;
13922 case ADJUST_B_RESTORE_MIXER_1
:
13923 case ADJUST_B_RESTORE_MIXER_2
:
13924 case ADJUST_B_RESTORE_MIXER_3
:
13925 case ADJUST_B_RESTORE_MIXER_4
:
13926 case ADJUST_B_RESTORE_MIXER_5
:
13927 case ADJUST_B_RESTORE_MIXER_6
:
13928 case ADJUST_B_RESTORE_MIXER_7
:
13929 if (plci
->adjust_b_mode
& ADJUST_B_MODE_RESTORE
)
13932 Info
= mixer_restore_config (Id
, plci
, Rc
);
13933 if ((Info
!= GOOD
) || plci
->internal_command
)
13937 plci
->adjust_b_state
= ADJUST_B_END
;
13945 static void adjust_b1_resource (dword Id
, PLCI
*plci
, API_SAVE
*bp_msg
, word b1_facilities
, word internal_command
)
13948 dbug (1, dprintf ("[%06lx] %s,%d: adjust_b1_resource %d %04x",
13949 UnMapId (Id
), (char *)(FILE_
), __LINE__
,
13950 plci
->B1_resource
, b1_facilities
));
13952 plci
->adjust_b_parms_msg
= bp_msg
;
13953 plci
->adjust_b_facilities
= b1_facilities
;
13954 plci
->adjust_b_command
= internal_command
;
13955 plci
->adjust_b_ncci
= (word
)(Id
>> 16);
13956 if ((bp_msg
== NULL
) && (plci
->B1_resource
== 0))
13957 plci
->adjust_b_mode
= ADJUST_B_MODE_SAVE
| ADJUST_B_MODE_NO_RESOURCE
| ADJUST_B_MODE_SWITCH_L1
;
13959 plci
->adjust_b_mode
= ADJUST_B_MODE_SAVE
| ADJUST_B_MODE_SWITCH_L1
| ADJUST_B_MODE_RESTORE
;
13960 plci
->adjust_b_state
= ADJUST_B_START
;
13961 dbug (1, dprintf ("[%06lx] %s,%d: Adjust B1 resource %d %04x...",
13962 UnMapId (Id
), (char *)(FILE_
), __LINE__
,
13963 plci
->B1_resource
, b1_facilities
));
13967 static void adjust_b_restore (dword Id
, PLCI
*plci
, byte Rc
)
13969 word internal_command
;
13971 dbug (1, dprintf ("[%06lx] %s,%d: adjust_b_restore %02x %04x",
13972 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
, plci
->internal_command
));
13974 internal_command
= plci
->internal_command
;
13975 plci
->internal_command
= 0;
13976 switch (internal_command
)
13980 if (plci
->req_in
!= 0)
13982 plci
->internal_command
= ADJUST_B_RESTORE_1
;
13986 case ADJUST_B_RESTORE_1
:
13987 if ((Rc
!= OK
) && (Rc
!= OK_FC
))
13989 dbug (1, dprintf ("[%06lx] %s,%d: Adjust B enqueued failed %02x",
13990 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
));
13992 plci
->adjust_b_parms_msg
= NULL
;
13993 plci
->adjust_b_facilities
= plci
->B1_facilities
;
13994 plci
->adjust_b_command
= ADJUST_B_RESTORE_2
;
13995 plci
->adjust_b_ncci
= (word
)(Id
>> 16);
13996 plci
->adjust_b_mode
= ADJUST_B_MODE_RESTORE
;
13997 plci
->adjust_b_state
= ADJUST_B_START
;
13998 dbug (1, dprintf ("[%06lx] %s,%d: Adjust B restore...",
13999 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
14000 case ADJUST_B_RESTORE_2
:
14001 if (adjust_b_process (Id
, plci
, Rc
) != GOOD
)
14003 dbug (1, dprintf ("[%06lx] %s,%d: Adjust B restore failed",
14004 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
14006 if (plci
->internal_command
)
14013 static void reset_b3_command (dword Id
, PLCI
*plci
, byte Rc
)
14016 word internal_command
;
14018 dbug (1, dprintf ("[%06lx] %s,%d: reset_b3_command %02x %04x",
14019 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
, plci
->internal_command
));
14022 internal_command
= plci
->internal_command
;
14023 plci
->internal_command
= 0;
14024 switch (internal_command
)
14028 plci
->adjust_b_parms_msg
= NULL
;
14029 plci
->adjust_b_facilities
= plci
->B1_facilities
;
14030 plci
->adjust_b_command
= RESET_B3_COMMAND_1
;
14031 plci
->adjust_b_ncci
= (word
)(Id
>> 16);
14032 plci
->adjust_b_mode
= ADJUST_B_MODE_REMOVE_L23
| ADJUST_B_MODE_ASSIGN_L23
| ADJUST_B_MODE_CONNECT
;
14033 plci
->adjust_b_state
= ADJUST_B_START
;
14034 dbug (1, dprintf ("[%06lx] %s,%d: Reset B3...",
14035 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
14036 case RESET_B3_COMMAND_1
:
14037 Info
= adjust_b_process (Id
, plci
, Rc
);
14040 dbug (1, dprintf ("[%06lx] %s,%d: Reset failed",
14041 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
14044 if (plci
->internal_command
)
14048 /* sendf (plci->appl, _RESET_B3_R | CONFIRM, Id, plci->number, "w", Info);*/
14049 sendf(plci
->appl
,_RESET_B3_I
,Id
,0,"s","");
14053 static void select_b_command (dword Id
, PLCI
*plci
, byte Rc
)
14056 word internal_command
;
14059 dbug (1, dprintf ("[%06lx] %s,%d: select_b_command %02x %04x",
14060 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
, plci
->internal_command
));
14063 internal_command
= plci
->internal_command
;
14064 plci
->internal_command
= 0;
14065 switch (internal_command
)
14069 plci
->adjust_b_parms_msg
= &plci
->saved_msg
;
14070 if ((plci
->tel
== ADV_VOICE
) && (plci
== plci
->adapter
->AdvSignalPLCI
))
14071 plci
->adjust_b_facilities
= plci
->B1_facilities
| B1_FACILITY_VOICE
;
14073 plci
->adjust_b_facilities
= plci
->B1_facilities
& ~B1_FACILITY_VOICE
;
14074 plci
->adjust_b_command
= SELECT_B_COMMAND_1
;
14075 plci
->adjust_b_ncci
= (word
)(Id
>> 16);
14076 if (plci
->saved_msg
.parms
[0].length
== 0)
14078 plci
->adjust_b_mode
= ADJUST_B_MODE_SAVE
| ADJUST_B_MODE_REMOVE_L23
| ADJUST_B_MODE_SWITCH_L1
|
14079 ADJUST_B_MODE_NO_RESOURCE
;
14083 plci
->adjust_b_mode
= ADJUST_B_MODE_SAVE
| ADJUST_B_MODE_REMOVE_L23
| ADJUST_B_MODE_SWITCH_L1
|
14084 ADJUST_B_MODE_ASSIGN_L23
| ADJUST_B_MODE_USER_CONNECT
| ADJUST_B_MODE_RESTORE
;
14086 plci
->adjust_b_state
= ADJUST_B_START
;
14087 dbug (1, dprintf ("[%06lx] %s,%d: Select B protocol...",
14088 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
14089 case SELECT_B_COMMAND_1
:
14090 Info
= adjust_b_process (Id
, plci
, Rc
);
14093 dbug (1, dprintf ("[%06lx] %s,%d: Select B protocol failed",
14094 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
14097 if (plci
->internal_command
)
14099 if (plci
->tel
== ADV_VOICE
)
14103 esc_chi
[2] = plci
->b_channel
;
14104 SetVoiceChannel (plci
->adapter
->AdvCodecPLCI
, esc_chi
, plci
->adapter
);
14108 sendf (plci
->appl
, _SELECT_B_REQ
| CONFIRM
, Id
, plci
->number
, "w", Info
);
14112 static void fax_connect_ack_command (dword Id
, PLCI
*plci
, byte Rc
)
14115 word internal_command
;
14117 dbug (1, dprintf ("[%06lx] %s,%d: fax_connect_ack_command %02x %04x",
14118 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
, plci
->internal_command
));
14121 internal_command
= plci
->internal_command
;
14122 plci
->internal_command
= 0;
14123 switch (internal_command
)
14127 case FAX_CONNECT_ACK_COMMAND_1
:
14128 if (plci_nl_busy (plci
))
14130 plci
->internal_command
= FAX_CONNECT_ACK_COMMAND_1
;
14133 plci
->internal_command
= FAX_CONNECT_ACK_COMMAND_2
;
14134 plci
->NData
[0].P
= plci
->fax_connect_info_buffer
;
14135 plci
->NData
[0].PLength
= plci
->fax_connect_info_length
;
14136 plci
->NL
.X
= plci
->NData
;
14137 plci
->NL
.ReqCh
= 0;
14138 plci
->NL
.Req
= plci
->nl_req
= (byte
) N_CONNECT_ACK
;
14139 plci
->adapter
->request (&plci
->NL
);
14141 case FAX_CONNECT_ACK_COMMAND_2
:
14142 if ((Rc
!= OK
) && (Rc
!= OK_FC
))
14144 dbug (1, dprintf ("[%06lx] %s,%d: FAX issue CONNECT ACK failed %02x",
14145 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
));
14149 if ((plci
->ncpi_state
& NCPI_VALID_CONNECT_B3_ACT
)
14150 && !(plci
->ncpi_state
& NCPI_CONNECT_B3_ACT_SENT
))
14152 if (plci
->B3_prot
== 4)
14153 sendf(plci
->appl
,_CONNECT_B3_ACTIVE_I
,Id
,0,"s","");
14155 sendf(plci
->appl
,_CONNECT_B3_ACTIVE_I
,Id
,0,"S",plci
->ncpi_buffer
);
14156 plci
->ncpi_state
|= NCPI_CONNECT_B3_ACT_SENT
;
14161 static void fax_edata_ack_command (dword Id
, PLCI
*plci
, byte Rc
)
14164 word internal_command
;
14166 dbug (1, dprintf ("[%06lx] %s,%d: fax_edata_ack_command %02x %04x",
14167 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
, plci
->internal_command
));
14170 internal_command
= plci
->internal_command
;
14171 plci
->internal_command
= 0;
14172 switch (internal_command
)
14176 case FAX_EDATA_ACK_COMMAND_1
:
14177 if (plci_nl_busy (plci
))
14179 plci
->internal_command
= FAX_EDATA_ACK_COMMAND_1
;
14182 plci
->internal_command
= FAX_EDATA_ACK_COMMAND_2
;
14183 plci
->NData
[0].P
= plci
->fax_connect_info_buffer
;
14184 plci
->NData
[0].PLength
= plci
->fax_edata_ack_length
;
14185 plci
->NL
.X
= plci
->NData
;
14186 plci
->NL
.ReqCh
= 0;
14187 plci
->NL
.Req
= plci
->nl_req
= (byte
) N_EDATA
;
14188 plci
->adapter
->request (&plci
->NL
);
14190 case FAX_EDATA_ACK_COMMAND_2
:
14191 if ((Rc
!= OK
) && (Rc
!= OK_FC
))
14193 dbug (1, dprintf ("[%06lx] %s,%d: FAX issue EDATA ACK failed %02x",
14194 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
));
14201 static void fax_connect_info_command (dword Id
, PLCI
*plci
, byte Rc
)
14204 word internal_command
;
14206 dbug (1, dprintf ("[%06lx] %s,%d: fax_connect_info_command %02x %04x",
14207 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
, plci
->internal_command
));
14210 internal_command
= plci
->internal_command
;
14211 plci
->internal_command
= 0;
14212 switch (internal_command
)
14216 case FAX_CONNECT_INFO_COMMAND_1
:
14217 if (plci_nl_busy (plci
))
14219 plci
->internal_command
= FAX_CONNECT_INFO_COMMAND_1
;
14222 plci
->internal_command
= FAX_CONNECT_INFO_COMMAND_2
;
14223 plci
->NData
[0].P
= plci
->fax_connect_info_buffer
;
14224 plci
->NData
[0].PLength
= plci
->fax_connect_info_length
;
14225 plci
->NL
.X
= plci
->NData
;
14226 plci
->NL
.ReqCh
= 0;
14227 plci
->NL
.Req
= plci
->nl_req
= (byte
) N_EDATA
;
14228 plci
->adapter
->request (&plci
->NL
);
14230 case FAX_CONNECT_INFO_COMMAND_2
:
14231 if ((Rc
!= OK
) && (Rc
!= OK_FC
))
14233 dbug (1, dprintf ("[%06lx] %s,%d: FAX setting connect info failed %02x",
14234 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
));
14235 Info
= _WRONG_STATE
;
14238 if (plci_nl_busy (plci
))
14240 plci
->internal_command
= FAX_CONNECT_INFO_COMMAND_2
;
14243 plci
->command
= _CONNECT_B3_R
;
14244 nl_req_ncci (plci
, N_CONNECT
, 0);
14248 sendf (plci
->appl
, _CONNECT_B3_R
| CONFIRM
, Id
, plci
->number
, "w", Info
);
14252 static void fax_adjust_b23_command (dword Id
, PLCI
*plci
, byte Rc
)
14255 word internal_command
;
14257 dbug (1, dprintf ("[%06lx] %s,%d: fax_adjust_b23_command %02x %04x",
14258 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
, plci
->internal_command
));
14261 internal_command
= plci
->internal_command
;
14262 plci
->internal_command
= 0;
14263 switch (internal_command
)
14267 plci
->adjust_b_parms_msg
= NULL
;
14268 plci
->adjust_b_facilities
= plci
->B1_facilities
;
14269 plci
->adjust_b_command
= FAX_ADJUST_B23_COMMAND_1
;
14270 plci
->adjust_b_ncci
= (word
)(Id
>> 16);
14271 plci
->adjust_b_mode
= ADJUST_B_MODE_REMOVE_L23
| ADJUST_B_MODE_ASSIGN_L23
;
14272 plci
->adjust_b_state
= ADJUST_B_START
;
14273 dbug (1, dprintf ("[%06lx] %s,%d: FAX adjust B23...",
14274 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
14275 case FAX_ADJUST_B23_COMMAND_1
:
14276 Info
= adjust_b_process (Id
, plci
, Rc
);
14279 dbug (1, dprintf ("[%06lx] %s,%d: FAX adjust failed",
14280 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
14283 if (plci
->internal_command
)
14285 case FAX_ADJUST_B23_COMMAND_2
:
14286 if (plci_nl_busy (plci
))
14288 plci
->internal_command
= FAX_ADJUST_B23_COMMAND_2
;
14291 plci
->command
= _CONNECT_B3_R
;
14292 nl_req_ncci (plci
, N_CONNECT
, 0);
14296 sendf (plci
->appl
, _CONNECT_B3_R
| CONFIRM
, Id
, plci
->number
, "w", Info
);
14300 static void fax_disconnect_command (dword Id
, PLCI
*plci
, byte Rc
)
14302 word internal_command
;
14304 dbug (1, dprintf ("[%06lx] %s,%d: fax_disconnect_command %02x %04x",
14305 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
, plci
->internal_command
));
14307 internal_command
= plci
->internal_command
;
14308 plci
->internal_command
= 0;
14309 switch (internal_command
)
14313 plci
->internal_command
= FAX_DISCONNECT_COMMAND_1
;
14315 case FAX_DISCONNECT_COMMAND_1
:
14316 case FAX_DISCONNECT_COMMAND_2
:
14317 case FAX_DISCONNECT_COMMAND_3
:
14318 if ((Rc
!= OK
) && (Rc
!= OK_FC
) && (Rc
!= 0))
14320 dbug (1, dprintf ("[%06lx] %s,%d: FAX disconnect EDATA failed %02x",
14321 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
));
14326 if ((internal_command
== FAX_DISCONNECT_COMMAND_1
)
14327 || (internal_command
== FAX_DISCONNECT_COMMAND_2
))
14329 plci
->internal_command
= FAX_DISCONNECT_COMMAND_2
;
14334 if (internal_command
== FAX_DISCONNECT_COMMAND_1
)
14335 plci
->internal_command
= FAX_DISCONNECT_COMMAND_3
;
14343 static void rtp_connect_b3_req_command (dword Id
, PLCI
*plci
, byte Rc
)
14346 word internal_command
;
14348 dbug (1, dprintf ("[%06lx] %s,%d: rtp_connect_b3_req_command %02x %04x",
14349 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
, plci
->internal_command
));
14352 internal_command
= plci
->internal_command
;
14353 plci
->internal_command
= 0;
14354 switch (internal_command
)
14358 case RTP_CONNECT_B3_REQ_COMMAND_1
:
14359 if (plci_nl_busy (plci
))
14361 plci
->internal_command
= RTP_CONNECT_B3_REQ_COMMAND_1
;
14364 plci
->internal_command
= RTP_CONNECT_B3_REQ_COMMAND_2
;
14365 nl_req_ncci (plci
, N_CONNECT
, 0);
14368 case RTP_CONNECT_B3_REQ_COMMAND_2
:
14369 if ((Rc
!= OK
) && (Rc
!= OK_FC
))
14371 dbug (1, dprintf ("[%06lx] %s,%d: RTP setting connect info failed %02x",
14372 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
));
14373 Info
= _WRONG_STATE
;
14376 if (plci_nl_busy (plci
))
14378 plci
->internal_command
= RTP_CONNECT_B3_REQ_COMMAND_2
;
14381 plci
->internal_command
= RTP_CONNECT_B3_REQ_COMMAND_3
;
14382 plci
->NData
[0].PLength
= plci
->internal_req_buffer
[0];
14383 plci
->NData
[0].P
= plci
->internal_req_buffer
+ 1;
14384 plci
->NL
.X
= plci
->NData
;
14385 plci
->NL
.ReqCh
= 0;
14386 plci
->NL
.Req
= plci
->nl_req
= (byte
) N_UDATA
;
14387 plci
->adapter
->request (&plci
->NL
);
14389 case RTP_CONNECT_B3_REQ_COMMAND_3
:
14392 sendf (plci
->appl
, _CONNECT_B3_R
| CONFIRM
, Id
, plci
->number
, "w", Info
);
14396 static void rtp_connect_b3_res_command (dword Id
, PLCI
*plci
, byte Rc
)
14399 word internal_command
;
14401 dbug (1, dprintf ("[%06lx] %s,%d: rtp_connect_b3_res_command %02x %04x",
14402 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
, plci
->internal_command
));
14405 internal_command
= plci
->internal_command
;
14406 plci
->internal_command
= 0;
14407 switch (internal_command
)
14411 case RTP_CONNECT_B3_RES_COMMAND_1
:
14412 if (plci_nl_busy (plci
))
14414 plci
->internal_command
= RTP_CONNECT_B3_RES_COMMAND_1
;
14417 plci
->internal_command
= RTP_CONNECT_B3_RES_COMMAND_2
;
14418 nl_req_ncci (plci
, N_CONNECT_ACK
, (byte
)(Id
>> 16));
14421 case RTP_CONNECT_B3_RES_COMMAND_2
:
14422 if ((Rc
!= OK
) && (Rc
!= OK_FC
))
14424 dbug (1, dprintf ("[%06lx] %s,%d: RTP setting connect resp info failed %02x",
14425 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
));
14426 Info
= _WRONG_STATE
;
14429 if (plci_nl_busy (plci
))
14431 plci
->internal_command
= RTP_CONNECT_B3_RES_COMMAND_2
;
14434 sendf (plci
->appl
, _CONNECT_B3_ACTIVE_I
, Id
, 0, "s", "");
14435 plci
->internal_command
= RTP_CONNECT_B3_RES_COMMAND_3
;
14436 plci
->NData
[0].PLength
= plci
->internal_req_buffer
[0];
14437 plci
->NData
[0].P
= plci
->internal_req_buffer
+ 1;
14438 plci
->NL
.X
= plci
->NData
;
14439 plci
->NL
.ReqCh
= 0;
14440 plci
->NL
.Req
= plci
->nl_req
= (byte
) N_UDATA
;
14441 plci
->adapter
->request (&plci
->NL
);
14443 case RTP_CONNECT_B3_RES_COMMAND_3
:
14450 static void hold_save_command (dword Id
, PLCI
*plci
, byte Rc
)
14452 byte SS_Ind
[] = "\x05\x02\x00\x02\x00\x00"; /* Hold_Ind struct*/
14454 word internal_command
;
14456 dbug (1, dprintf ("[%06lx] %s,%d: hold_save_command %02x %04x",
14457 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
, plci
->internal_command
));
14460 internal_command
= plci
->internal_command
;
14461 plci
->internal_command
= 0;
14462 switch (internal_command
)
14468 plci
->adjust_b_parms_msg
= NULL
;
14469 plci
->adjust_b_facilities
= plci
->B1_facilities
;
14470 plci
->adjust_b_command
= HOLD_SAVE_COMMAND_1
;
14471 plci
->adjust_b_ncci
= (word
)(Id
>> 16);
14472 plci
->adjust_b_mode
= ADJUST_B_MODE_SAVE
| ADJUST_B_MODE_REMOVE_L23
;
14473 plci
->adjust_b_state
= ADJUST_B_START
;
14474 dbug (1, dprintf ("[%06lx] %s,%d: HOLD save...",
14475 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
14476 case HOLD_SAVE_COMMAND_1
:
14477 Info
= adjust_b_process (Id
, plci
, Rc
);
14480 dbug (1, dprintf ("[%06lx] %s,%d: HOLD save failed",
14481 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
14484 if (plci
->internal_command
)
14487 sendf (plci
->appl
, _FACILITY_I
, Id
& 0xffffL
, 0, "ws", 3, SS_Ind
);
14491 static void retrieve_restore_command (dword Id
, PLCI
*plci
, byte Rc
)
14493 byte SS_Ind
[] = "\x05\x03\x00\x02\x00\x00"; /* Retrieve_Ind struct*/
14495 word internal_command
;
14497 dbug (1, dprintf ("[%06lx] %s,%d: retrieve_restore_command %02x %04x",
14498 UnMapId (Id
), (char *)(FILE_
), __LINE__
, Rc
, plci
->internal_command
));
14501 internal_command
= plci
->internal_command
;
14502 plci
->internal_command
= 0;
14503 switch (internal_command
)
14507 plci
->adjust_b_parms_msg
= NULL
;
14508 plci
->adjust_b_facilities
= plci
->B1_facilities
;
14509 plci
->adjust_b_command
= RETRIEVE_RESTORE_COMMAND_1
;
14510 plci
->adjust_b_ncci
= (word
)(Id
>> 16);
14511 plci
->adjust_b_mode
= ADJUST_B_MODE_ASSIGN_L23
| ADJUST_B_MODE_USER_CONNECT
| ADJUST_B_MODE_RESTORE
;
14512 plci
->adjust_b_state
= ADJUST_B_START
;
14513 dbug (1, dprintf ("[%06lx] %s,%d: RETRIEVE restore...",
14514 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
14515 case RETRIEVE_RESTORE_COMMAND_1
:
14516 Info
= adjust_b_process (Id
, plci
, Rc
);
14519 dbug (1, dprintf ("[%06lx] %s,%d: RETRIEVE restore failed",
14520 UnMapId (Id
), (char *)(FILE_
), __LINE__
));
14523 if (plci
->internal_command
)
14526 sendf (plci
->appl
, _FACILITY_I
, Id
& 0xffffL
, 0, "ws", 3, SS_Ind
);
14530 static void init_b1_config (PLCI
*plci
)
14533 dbug (1, dprintf ("[%06lx] %s,%d: init_b1_config",
14534 (dword
)((plci
->Id
<< 8) | UnMapController (plci
->adapter
->Id
)),
14535 (char *)(FILE_
), __LINE__
));
14537 plci
->B1_resource
= 0;
14538 plci
->B1_facilities
= 0;
14540 plci
->li_bchannel_id
= 0;
14541 mixer_clear_config (plci
);
14544 ec_clear_config (plci
);
14547 dtmf_rec_clear_config (plci
);
14548 dtmf_send_clear_config (plci
);
14549 dtmf_parameter_clear_config (plci
);
14551 adv_voice_clear_config (plci
);
14552 adjust_b_clear (plci
);
14556 static void clear_b1_config (PLCI
*plci
)
14559 dbug (1, dprintf ("[%06lx] %s,%d: clear_b1_config",
14560 (dword
)((plci
->Id
<< 8) | UnMapController (plci
->adapter
->Id
)),
14561 (char *)(FILE_
), __LINE__
));
14563 adv_voice_clear_config (plci
);
14564 adjust_b_clear (plci
);
14566 ec_clear_config (plci
);
14569 dtmf_rec_clear_config (plci
);
14570 dtmf_send_clear_config (plci
);
14571 dtmf_parameter_clear_config (plci
);
14574 if ((plci
->li_bchannel_id
!= 0)
14575 && (li_config_table
[plci
->adapter
->li_base
+ (plci
->li_bchannel_id
- 1)].plci
== plci
))
14577 mixer_clear_config (plci
);
14578 li_config_table
[plci
->adapter
->li_base
+ (plci
->li_bchannel_id
- 1)].plci
= NULL
;
14579 plci
->li_bchannel_id
= 0;
14582 plci
->B1_resource
= 0;
14583 plci
->B1_facilities
= 0;
14587 /* -----------------------------------------------------------------
14588 XON protocol local helpers
14589 ----------------------------------------------------------------- */
14590 static void channel_flow_control_remove (PLCI
* plci
) {
14591 DIVA_CAPI_ADAPTER
* a
= plci
->adapter
;
14593 for(i
=1;i
<MAX_NL_CHANNEL
+1;i
++) {
14594 if (a
->ch_flow_plci
[i
] == plci
->Id
) {
14595 a
->ch_flow_plci
[i
] = 0;
14596 a
->ch_flow_control
[i
] = 0;
14601 static void channel_x_on (PLCI
* plci
, byte ch
) {
14602 DIVA_CAPI_ADAPTER
* a
= plci
->adapter
;
14603 if (a
->ch_flow_control
[ch
] & N_XON_SENT
) {
14604 a
->ch_flow_control
[ch
] &= ~N_XON_SENT
;
14608 static void channel_x_off (PLCI
* plci
, byte ch
, byte flag
) {
14609 DIVA_CAPI_ADAPTER
* a
= plci
->adapter
;
14610 if ((a
->ch_flow_control
[ch
] & N_RX_FLOW_CONTROL_MASK
) == 0) {
14611 a
->ch_flow_control
[ch
] |= (N_CH_XOFF
| flag
);
14612 a
->ch_flow_plci
[ch
] = plci
->Id
;
14613 a
->ch_flow_control_pending
++;
14617 static void channel_request_xon (PLCI
* plci
, byte ch
) {
14618 DIVA_CAPI_ADAPTER
* a
= plci
->adapter
;
14620 if (a
->ch_flow_control
[ch
] & N_CH_XOFF
) {
14621 a
->ch_flow_control
[ch
] |= N_XON_REQ
;
14622 a
->ch_flow_control
[ch
] &= ~N_CH_XOFF
;
14623 a
->ch_flow_control
[ch
] &= ~N_XON_CONNECT_IND
;
14627 static void channel_xmit_extended_xon (PLCI
* plci
) {
14628 DIVA_CAPI_ADAPTER
* a
;
14629 int max_ch
= ARRAY_SIZE(a
->ch_flow_control
);
14630 int i
, one_requested
= 0;
14632 if ((!plci
) || (!plci
->Id
) || ((a
= plci
->adapter
) == NULL
)) {
14636 for (i
= 0; i
< max_ch
; i
++) {
14637 if ((a
->ch_flow_control
[i
] & N_CH_XOFF
) &&
14638 (a
->ch_flow_control
[i
] & N_XON_CONNECT_IND
) &&
14639 (plci
->Id
== a
->ch_flow_plci
[i
])) {
14640 channel_request_xon (plci
, (byte
)i
);
14645 if (one_requested
) {
14646 channel_xmit_xon (plci
);
14651 Try to xmit next X_ON
14653 static int find_channel_with_pending_x_on (DIVA_CAPI_ADAPTER
* a
, PLCI
* plci
) {
14654 int max_ch
= ARRAY_SIZE(a
->ch_flow_control
);
14657 if (!(plci
->adapter
->manufacturer_features
& MANUFACTURER_FEATURE_XONOFF_FLOW_CONTROL
)) {
14661 if (a
->last_flow_control_ch
>= max_ch
) {
14662 a
->last_flow_control_ch
= 1;
14664 for (i
=a
->last_flow_control_ch
; i
< max_ch
; i
++) {
14665 if ((a
->ch_flow_control
[i
] & N_XON_REQ
) &&
14666 (plci
->Id
== a
->ch_flow_plci
[i
])) {
14667 a
->last_flow_control_ch
= i
+1;
14672 for (i
= 1; i
< a
->last_flow_control_ch
; i
++) {
14673 if ((a
->ch_flow_control
[i
] & N_XON_REQ
) &&
14674 (plci
->Id
== a
->ch_flow_plci
[i
])) {
14675 a
->last_flow_control_ch
= i
+1;
14683 static void channel_xmit_xon (PLCI
* plci
) {
14684 DIVA_CAPI_ADAPTER
* a
= plci
->adapter
;
14687 if (plci
->nl_req
|| !plci
->NL
.Id
|| plci
->nl_remove_id
) {
14690 if ((ch
= (byte
)find_channel_with_pending_x_on (a
, plci
)) == 0) {
14693 a
->ch_flow_control
[ch
] &= ~N_XON_REQ
;
14694 a
->ch_flow_control
[ch
] |= N_XON_SENT
;
14696 plci
->NL
.Req
= plci
->nl_req
= (byte
)N_XON
;
14697 plci
->NL
.ReqCh
= ch
;
14698 plci
->NL
.X
= plci
->NData
;
14700 plci
->NData
[0].P
= &plci
->RBuffer
[0];
14701 plci
->NData
[0].PLength
= 0;
14703 plci
->adapter
->request(&plci
->NL
);
14706 static int channel_can_xon (PLCI
* plci
, byte ch
) {
14708 DIVA_CAPI_ADAPTER
* a
;
14714 APPLptr
= plci
->appl
;
14720 NCCIcode
= a
->ch_ncci
[ch
] | (((word
) a
->Id
) << 8);
14722 /* count all buffers within the Application pool */
14723 /* belonging to the same NCCI. XON if a first is */
14727 for(i
=0; i
<APPLptr
->MaxBuffer
; i
++) {
14728 if(NCCIcode
==APPLptr
->DataNCCI
[i
]) count
++;
14729 if(!APPLptr
->DataNCCI
[i
] && Num
==0xffff) Num
= i
;
14731 if ((count
> 2) || (Num
== 0xffff)) {
14738 /*------------------------------------------------------------------*/
14740 static word
CPN_filter_ok(byte
*cpn
,DIVA_CAPI_ADAPTER
* a
,word offset
)
14747 /**********************************************************************************/
14748 /* function groups the listening applications according to the CIP mask and the */
14749 /* Info_Mask. Each group gets just one Connect_Ind. Some application manufacturer */
14750 /* are not multi-instance capable, so they start e.g. 30 applications what causes */
14751 /* big problems on application level (one call, 30 Connect_Ind, ect). The */
14752 /* function must be enabled by setting "a->group_optimization_enabled" from the */
14753 /* OS specific part (per adapter). */
14754 /**********************************************************************************/
14755 static void group_optimization(DIVA_CAPI_ADAPTER
* a
, PLCI
* plci
)
14757 word i
,j
,k
,busy
,group_found
;
14758 dword info_mask_group
[MAX_CIP_TYPES
];
14759 dword cip_mask_group
[MAX_CIP_TYPES
];
14760 word appl_number_group_type
[MAX_APPL
];
14763 set_group_ind_mask (plci
); /* all APPLs within this inc. call are allowed to dial in */
14765 if(!a
->group_optimization_enabled
)
14767 dbug(1,dprintf("No group optimization"));
14771 dbug(1,dprintf("Group optimization = 0x%x...", a
->group_optimization_enabled
));
14773 for(i
=0;i
<MAX_CIP_TYPES
;i
++)
14775 info_mask_group
[i
] = 0;
14776 cip_mask_group
[i
] = 0;
14778 for(i
=0;i
<MAX_APPL
;i
++)
14780 appl_number_group_type
[i
] = 0;
14782 for(i
=0; i
<max_appl
; i
++) /* check if any multi instance capable application is present */
14783 { /* group_optimization set to 1 means not to optimize multi-instance capable applications (default) */
14784 if(application
[i
].Id
&& (application
[i
].MaxNCCI
) > 1 && (a
->CIP_Mask
[i
]) && (a
->group_optimization_enabled
==1) )
14786 dbug(1,dprintf("Multi-Instance capable, no optimization required"));
14787 return; /* allow good application unfiltered access */
14790 for(i
=0; i
<max_appl
; i
++) /* Build CIP Groups */
14792 if(application
[i
].Id
&& a
->CIP_Mask
[i
] )
14794 for(k
=0,busy
=false; k
<a
->max_plci
; k
++)
14798 auxplci
= &a
->plci
[k
];
14799 if(auxplci
->appl
== &application
[i
]) /* application has a busy PLCI */
14802 dbug(1,dprintf("Appl 0x%x is busy",i
+1));
14804 else if(test_c_ind_mask_bit (auxplci
, i
)) /* application has an incoming call pending */
14807 dbug(1,dprintf("Appl 0x%x has inc. call pending",i
+1));
14812 for(j
=0,group_found
=0; j
<=(MAX_CIP_TYPES
) && !busy
&&!group_found
; j
++) /* build groups with free applications only */
14814 if(j
==MAX_CIP_TYPES
) /* all groups are in use but group still not found */
14815 { /* the MAX_CIP_TYPES group enables all calls because of field overflow */
14816 appl_number_group_type
[i
] = MAX_CIP_TYPES
;
14818 dbug(1,dprintf("Field overflow appl 0x%x",i
+1));
14820 else if( (info_mask_group
[j
]==a
->CIP_Mask
[i
]) && (cip_mask_group
[j
]==a
->Info_Mask
[i
]) )
14821 { /* is group already present ? */
14822 appl_number_group_type
[i
] = j
|0x80; /* store the group number for each application */
14824 dbug(1,dprintf("Group 0x%x found with appl 0x%x, CIP=0x%lx",appl_number_group_type
[i
],i
+1,info_mask_group
[j
]));
14826 else if(!info_mask_group
[j
])
14827 { /* establish a new group */
14828 appl_number_group_type
[i
] = j
|0x80; /* store the group number for each application */
14829 info_mask_group
[j
] = a
->CIP_Mask
[i
]; /* store the new CIP mask for the new group */
14830 cip_mask_group
[j
] = a
->Info_Mask
[i
]; /* store the new Info_Mask for this new group */
14832 dbug(1,dprintf("New Group 0x%x established with appl 0x%x, CIP=0x%lx",appl_number_group_type
[i
],i
+1,info_mask_group
[j
]));
14838 for(i
=0; i
<max_appl
; i
++) /* Build group_optimization_mask_table */
14840 if(appl_number_group_type
[i
]) /* application is free, has listens and is member of a group */
14842 if(appl_number_group_type
[i
] == MAX_CIP_TYPES
)
14844 dbug(1,dprintf("OverflowGroup 0x%x, valid appl = 0x%x, call enabled",appl_number_group_type
[i
],i
+1));
14848 dbug(1,dprintf("Group 0x%x, valid appl = 0x%x",appl_number_group_type
[i
],i
+1));
14849 for(j
=i
+1; j
<max_appl
; j
++) /* search other group members and mark them as busy */
14851 if(appl_number_group_type
[i
] == appl_number_group_type
[j
])
14853 dbug(1,dprintf("Appl 0x%x is member of group 0x%x, no call",j
+1,appl_number_group_type
[j
]));
14854 clear_group_ind_mask_bit (plci
, j
); /* disable call on other group members */
14855 appl_number_group_type
[j
] = 0; /* remove disabled group member from group list */
14860 else /* application should not get a call */
14862 clear_group_ind_mask_bit (plci
, i
);
14870 /* OS notifies the driver about a application Capi_Register */
14871 word
CapiRegister(word id
)
14873 word i
,j
,appls_found
;
14876 DIVA_CAPI_ADAPTER
*a
;
14878 for(i
=0,appls_found
=0; i
<max_appl
; i
++)
14880 if( application
[i
].Id
&& (application
[i
].Id
!=id
) )
14882 appls_found
++; /* an application has been found */
14886 if(appls_found
) return true;
14887 for(i
=0; i
<max_adapter
; i
++) /* scan all adapters... */
14892 if(a
->flag_dynamic_l1_down
) /* remove adapter from L1 tristate (Huntgroup) */
14894 if(!appls_found
) /* first application does a capi register */
14896 if((j
=get_plci(a
))) /* activate L1 of all adapters */
14898 plci
= &a
->plci
[j
-1];
14900 add_p(plci
,OAD
,"\x01\xfd");
14901 add_p(plci
,CAI
,"\x01\x80");
14902 add_p(plci
,UID
,"\x06\x43\x61\x70\x69\x32\x30");
14903 add_p(plci
,SHIFT
|6,NULL
);
14904 add_p(plci
,SIN
,"\x02\x00\x00");
14905 plci
->internal_command
= START_L1_SIG_ASSIGN_PEND
;
14906 sig_req(plci
,ASSIGN
,DSIG_ID
);
14907 add_p(plci
,FTY
,"\x02\xff\x07"); /* l1 start */
14908 sig_req(plci
,SIG_CTRL
,0);
14918 /*------------------------------------------------------------------*/
14920 /* Functions for virtual Switching e.g. Transfer by join, Conference */
14922 static void VSwitchReqInd(PLCI
*plci
, dword Id
, byte
**parms
)
14925 /* Format of vswitch_t:
14928 2 byte VSWITCH_REQ/VSWITCH_IND
14930 4 word VSwitchcommand
14937 plci
->Sig
.Ind
==NCR_FACILITY
14941 for(i
=0;i
<MAX_MULTI_IE
;i
++)
14943 if(!parms
[i
][0]) continue;
14946 parms
[i
][0]=0; /* kill it */
14949 dbug(1,dprintf("VSwitchReqInd(%d)",parms
[i
][4]));
14950 switch(parms
[i
][4])
14953 if(!plci
->relatedPTYPLCI
||
14954 (plci
->ptyState
!=S_ECT
&& plci
->relatedPTYPLCI
->ptyState
!=S_ECT
))
14958 /* remember all necessary informations */
14959 if(parms
[i
][0]!=11 || parms
[i
][8]!=3) /* Length Test */
14963 if(parms
[i
][2]==VSWITCH_IND
&& parms
[i
][9]==1)
14964 { /* first indication after ECT-Request on Consultation Call */
14965 plci
->vswitchstate
=parms
[i
][9];
14966 parms
[i
][9]=2; /* State */
14967 /* now ask first Call to join */
14969 else if(parms
[i
][2]==VSWITCH_REQ
&& parms
[i
][9]==3)
14970 { /* Answer of VSWITCH_REQ from first Call */
14971 plci
->vswitchstate
=parms
[i
][9];
14972 /* tell consultation call to join
14973 and the protocol capabilities of the first call */
14979 plci
->vsprot
=parms
[i
][10]; /* protocol */
14980 plci
->vsprotdialect
=parms
[i
][11]; /* protocoldialect */
14981 /* send join request to related PLCI */
14982 parms
[i
][1]=VSWITCHIE
;
14983 parms
[i
][2]=VSWITCH_REQ
;
14985 plci
->relatedPTYPLCI
->command
= 0;
14986 plci
->relatedPTYPLCI
->internal_command
= VSWITCH_REQ_PEND
;
14987 add_p(plci
->relatedPTYPLCI
,ESC
,&parms
[i
][0]);
14988 sig_req(plci
->relatedPTYPLCI
,VSWITCH_REQ
,0);
14989 send_req(plci
->relatedPTYPLCI
);
14993 if(plci
->relatedPTYPLCI
&&
14994 plci
->vswitchstate
==3 &&
14995 plci
->relatedPTYPLCI
->vswitchstate
==3)
14997 add_p(plci
->relatedPTYPLCI
,ESC
,&parms
[i
][0]);
14998 sig_req(plci
->relatedPTYPLCI
,VSWITCH_REQ
,0);
14999 send_req(plci
->relatedPTYPLCI
);
15003 parms
[i
][0]=0; /* kill it */
15008 /*------------------------------------------------------------------*/
15010 static int diva_get_dma_descriptor (PLCI
*plci
, dword
*dma_magic
) {
15012 IDI_SYNC_REQ
* pReq
= (IDI_SYNC_REQ
*)&e
;
15014 if (!(diva_xdi_extended_features
& DIVA_CAPI_XDI_PROVIDES_RX_DMA
)) {
15018 pReq
->xdi_dma_descriptor_operation
.Req
= 0;
15019 pReq
->xdi_dma_descriptor_operation
.Rc
= IDI_SYNC_REQ_DMA_DESCRIPTOR_OPERATION
;
15021 pReq
->xdi_dma_descriptor_operation
.info
.operation
= IDI_SYNC_REQ_DMA_DESCRIPTOR_ALLOC
;
15022 pReq
->xdi_dma_descriptor_operation
.info
.descriptor_number
= -1;
15023 pReq
->xdi_dma_descriptor_operation
.info
.descriptor_address
= NULL
;
15024 pReq
->xdi_dma_descriptor_operation
.info
.descriptor_magic
= 0;
15026 e
.user
[0] = plci
->adapter
->Id
- 1;
15027 plci
->adapter
->request((ENTITY
*)pReq
);
15029 if (!pReq
->xdi_dma_descriptor_operation
.info
.operation
&&
15030 (pReq
->xdi_dma_descriptor_operation
.info
.descriptor_number
>= 0) &&
15031 pReq
->xdi_dma_descriptor_operation
.info
.descriptor_magic
) {
15032 *dma_magic
= pReq
->xdi_dma_descriptor_operation
.info
.descriptor_magic
;
15033 dbug(3,dprintf("dma_alloc, a:%d (%d-%08x)",
15035 pReq
->xdi_dma_descriptor_operation
.info
.descriptor_number
,
15037 return (pReq
->xdi_dma_descriptor_operation
.info
.descriptor_number
);
15039 dbug(1,dprintf("dma_alloc failed"));
15044 static void diva_free_dma_descriptor (PLCI
*plci
, int nr
) {
15046 IDI_SYNC_REQ
* pReq
= (IDI_SYNC_REQ
*)&e
;
15052 pReq
->xdi_dma_descriptor_operation
.Req
= 0;
15053 pReq
->xdi_dma_descriptor_operation
.Rc
= IDI_SYNC_REQ_DMA_DESCRIPTOR_OPERATION
;
15055 pReq
->xdi_dma_descriptor_operation
.info
.operation
= IDI_SYNC_REQ_DMA_DESCRIPTOR_FREE
;
15056 pReq
->xdi_dma_descriptor_operation
.info
.descriptor_number
= nr
;
15057 pReq
->xdi_dma_descriptor_operation
.info
.descriptor_address
= NULL
;
15058 pReq
->xdi_dma_descriptor_operation
.info
.descriptor_magic
= 0;
15060 e
.user
[0] = plci
->adapter
->Id
- 1;
15061 plci
->adapter
->request((ENTITY
*)pReq
);
15063 if (!pReq
->xdi_dma_descriptor_operation
.info
.operation
) {
15064 dbug(1,dprintf("dma_free(%d)", nr
));
15066 dbug(1,dprintf("dma_free failed (%d)", nr
));
15070 /*------------------------------------------------------------------*/