1 /* $Id: callc.c,v 2.59.2.4 2004/02/11 13:21:32 keil Exp $
4 * Copyright by Karsten Keil <keil@isdn4linux.de>
6 * This software may be used and distributed according to the terms
7 * of the GNU General Public License, incorporated herein by reference.
9 * For changes and modifications please read
10 * Documentation/isdn/HiSax.cert
12 * based on the teles driver from Jan den Ouden
14 * Thanks to Jan den Ouden
19 #include <linux/module.h>
20 #include <linux/init.h>
22 #include <linux/isdn/capicmd.h>
24 const char *lli_revision
= "$Revision: 2.59.2.4 $";
26 extern struct IsdnCard cards
[];
29 static int init_b_st(struct Channel
*chanp
, int incoming
);
30 static void release_b_st(struct Channel
*chanp
);
32 static struct Fsm callcfsm
;
35 /* experimental REJECT after ALERTING for CALLBACK to beat the 4s delay */
36 #define ALERT_REJECT 0
38 /* Value to delay the sending of the first B-channel paket after CONNECT
39 * here is no value given by ITU, but experience shows that 300 ms will
40 * work on many networks, if you or your other side is behind local exchanges
41 * a greater value may be recommented. If the delay is to short the first paket
42 * will be lost and autodetect on many comercial routers goes wrong !
43 * You can adjust this value on runtime with
44 * hisaxctrl <id> 2 <value>
45 * value is in milliseconds
47 #define DEFAULT_B_DELAY 300
49 /* Flags for remembering action done in lli */
54 * Find card with given driverId
56 static inline struct IsdnCardState
*
57 hisax_findcard(int driverid
)
61 for (i
= 0; i
< nrcards
; i
++)
63 if (cards
[i
].cs
->myid
== driverid
)
65 return (struct IsdnCardState
*) 0;
69 link_debug(struct Channel
*chanp
, int direction
, char *fmt
, ...)
75 sprintf(tmp
, "Ch%d %s ", chanp
->chan
,
76 direction
? "LL->HL" : "HL->LL");
77 VHiSax_putstatus(chanp
->cs
, tmp
, fmt
, args
);
82 ST_NULL
, /* 0 inactive */
83 ST_OUT_DIAL
, /* 1 outgoing, SETUP send; awaiting confirm */
84 ST_IN_WAIT_LL
, /* 2 incoming call received; wait for LL confirm */
85 ST_IN_ALERT_SENT
, /* 3 incoming call received; ALERT send */
86 ST_IN_WAIT_CONN_ACK
, /* 4 incoming CONNECT send; awaiting CONN_ACK */
87 ST_WAIT_BCONN
, /* 5 CONNECT/CONN_ACK received, awaiting b-channel prot. estbl. */
88 ST_ACTIVE
, /* 6 active, b channel prot. established */
89 ST_WAIT_BRELEASE
, /* 7 call clear. (initiator), awaiting b channel prot. rel. */
90 ST_WAIT_BREL_DISC
, /* 8 call clear. (receiver), DISCONNECT req. received */
91 ST_WAIT_DCOMMAND
, /* 9 call clear. (receiver), awaiting DCHANNEL message */
92 ST_WAIT_DRELEASE
, /* 10 DISCONNECT sent, awaiting RELEASE */
93 ST_WAIT_D_REL_CNF
, /* 11 RELEASE sent, awaiting RELEASE confirm */
94 ST_IN_PROCEED_SEND
, /* 12 incoming call, proceeding send */
98 #define STATE_COUNT (ST_IN_PROCEED_SEND + 1)
100 static char *strState
[] =
106 "ST_IN_WAIT_CONN_ACK",
114 "ST_IN_PROCEED_SEND",
119 EV_SETUP_CNF
, /* 1 */
121 EV_DISCONNECT_IND
, /* 3 */
124 EV_LEASED_REL
, /* 6 */
125 EV_SETUP_IND
, /* 7 */
127 EV_SETUP_CMPL_IND
, /* 9 */
129 EV_WRITEBUF
, /* 11 */
135 EV_NOSETUP_RSP
, /* 17 */
136 EV_SETUP_ERR
, /* 18 */
137 EV_CONNECT_ERR
, /* 19 */
143 #define EVENT_COUNT (EV_REDIR + 1)
145 static char *strEvent
[] =
174 HL_LL(struct Channel
*chanp
, int command
)
178 ic
.driver
= chanp
->cs
->myid
;
179 ic
.command
= command
;
180 ic
.arg
= chanp
->chan
;
181 chanp
->cs
->iif
.statcallb(&ic
);
185 lli_deliver_cause(struct Channel
*chanp
)
191 if (chanp
->proc
->para
.cause
== NO_CAUSE
)
193 ic
.driver
= chanp
->cs
->myid
;
194 ic
.command
= ISDN_STAT_CAUSE
;
195 ic
.arg
= chanp
->chan
;
196 if (chanp
->cs
->protocol
== ISDN_PTYPE_EURO
)
197 sprintf(ic
.parm
.num
, "E%02X%02X", chanp
->proc
->para
.loc
& 0x7f,
198 chanp
->proc
->para
.cause
& 0x7f);
200 sprintf(ic
.parm
.num
, "%02X%02X", chanp
->proc
->para
.loc
& 0x7f,
201 chanp
->proc
->para
.cause
& 0x7f);
202 chanp
->cs
->iif
.statcallb(&ic
);
206 lli_close(struct FsmInst
*fi
)
208 struct Channel
*chanp
= fi
->userdata
;
210 FsmChangeState(fi
, ST_NULL
);
212 chanp
->cs
->cardmsg(chanp
->cs
, MDL_INFO_REL
, (void *) (long)chanp
->chan
);
216 lli_leased_in(struct FsmInst
*fi
, int event
, void *arg
)
218 struct Channel
*chanp
= fi
->userdata
;
224 chanp
->cs
->cardmsg(chanp
->cs
, MDL_INFO_SETUP
, (void *) (long)chanp
->chan
);
225 FsmChangeState(fi
, ST_IN_WAIT_LL
);
226 if (chanp
->debug
& 1)
227 link_debug(chanp
, 0, "STAT_ICALL_LEASED");
228 ic
.driver
= chanp
->cs
->myid
;
229 ic
.command
= ((chanp
->chan
< 2) ? ISDN_STAT_ICALL
: ISDN_STAT_ICALLW
);
230 ic
.arg
= chanp
->chan
;
231 ic
.parm
.setup
.si1
= 7;
232 ic
.parm
.setup
.si2
= 0;
233 ic
.parm
.setup
.plan
= 0;
234 ic
.parm
.setup
.screen
= 0;
235 sprintf(ic
.parm
.setup
.eazmsn
,"%d", chanp
->chan
+ 1);
236 sprintf(ic
.parm
.setup
.phone
,"LEASED%d", chanp
->cs
->myid
);
237 ret
= chanp
->cs
->iif
.statcallb(&ic
);
238 if (chanp
->debug
& 1)
239 link_debug(chanp
, 1, "statcallb ret=%d", ret
);
241 chanp
->cs
->cardmsg(chanp
->cs
, MDL_INFO_REL
, (void *) (long)chanp
->chan
);
242 FsmChangeState(fi
, ST_NULL
);
251 lli_init_bchan_out(struct FsmInst
*fi
, int event
, void *arg
)
253 struct Channel
*chanp
= fi
->userdata
;
255 FsmChangeState(fi
, ST_WAIT_BCONN
);
256 if (chanp
->debug
& 1)
257 link_debug(chanp
, 0, "STAT_DCONN");
258 HL_LL(chanp
, ISDN_STAT_DCONN
);
260 chanp
->b_st
->lli
.l4l3(chanp
->b_st
, DL_ESTABLISH
| REQUEST
, NULL
);
264 lli_prep_dialout(struct FsmInst
*fi
, int event
, void *arg
)
266 struct Channel
*chanp
= fi
->userdata
;
268 FsmDelTimer(&chanp
->drel_timer
, 60);
269 FsmDelTimer(&chanp
->dial_timer
, 73);
270 chanp
->l2_active_protocol
= chanp
->l2_protocol
;
272 chanp
->cs
->cardmsg(chanp
->cs
, MDL_INFO_SETUP
, (void *) (long)chanp
->chan
);
274 lli_init_bchan_out(fi
, event
, arg
);
276 FsmChangeState(fi
, ST_OUT_DIAL
);
277 chanp
->d_st
->lli
.l4l3(chanp
->d_st
, CC_SETUP
| REQUEST
, chanp
);
282 lli_resume(struct FsmInst
*fi
, int event
, void *arg
)
284 struct Channel
*chanp
= fi
->userdata
;
286 FsmDelTimer(&chanp
->drel_timer
, 60);
287 FsmDelTimer(&chanp
->dial_timer
, 73);
288 chanp
->l2_active_protocol
= chanp
->l2_protocol
;
290 chanp
->cs
->cardmsg(chanp
->cs
, MDL_INFO_SETUP
, (void *) (long)chanp
->chan
);
292 lli_init_bchan_out(fi
, event
, arg
);
294 FsmChangeState(fi
, ST_OUT_DIAL
);
295 chanp
->d_st
->lli
.l4l3(chanp
->d_st
, CC_RESUME
| REQUEST
, chanp
);
300 lli_go_active(struct FsmInst
*fi
, int event
, void *arg
)
302 struct Channel
*chanp
= fi
->userdata
;
306 FsmChangeState(fi
, ST_ACTIVE
);
307 chanp
->data_open
= !0;
308 if (chanp
->bcs
->conmsg
)
309 strcpy(ic
.parm
.num
, chanp
->bcs
->conmsg
);
312 if (chanp
->debug
& 1)
313 link_debug(chanp
, 0, "STAT_BCONN %s", ic
.parm
.num
);
314 ic
.driver
= chanp
->cs
->myid
;
315 ic
.command
= ISDN_STAT_BCONN
;
316 ic
.arg
= chanp
->chan
;
317 chanp
->cs
->iif
.statcallb(&ic
);
318 chanp
->cs
->cardmsg(chanp
->cs
, MDL_INFO_CONN
, (void *) (long)chanp
->chan
);
329 lli_deliver_call(struct FsmInst
*fi
, int event
, void *arg
)
331 struct Channel
*chanp
= fi
->userdata
;
335 chanp
->cs
->cardmsg(chanp
->cs
, MDL_INFO_SETUP
, (void *) (long)chanp
->chan
);
337 * Report incoming calls only once to linklevel, use CallFlags
338 * which is set to 3 with each broadcast message in isdnl1.c
339 * and resetted if a interface answered the STAT_ICALL.
341 if (1) { /* for only one TEI */
342 FsmChangeState(fi
, ST_IN_WAIT_LL
);
343 if (chanp
->debug
& 1)
344 link_debug(chanp
, 0, (chanp
->chan
< 2) ? "STAT_ICALL" : "STAT_ICALLW");
345 ic
.driver
= chanp
->cs
->myid
;
346 ic
.command
= ((chanp
->chan
< 2) ? ISDN_STAT_ICALL
: ISDN_STAT_ICALLW
);
348 ic
.arg
= chanp
->chan
;
350 * No need to return "unknown" for calls without OAD,
351 * cause that's handled in linklevel now (replaced by '0')
353 memcpy(&ic
.parm
.setup
, &chanp
->proc
->para
.setup
, sizeof(setup_parm
));
354 ret
= chanp
->cs
->iif
.statcallb(&ic
);
355 if (chanp
->debug
& 1)
356 link_debug(chanp
, 1, "statcallb ret=%d", ret
);
359 case 1: /* OK, someone likes this call */
360 FsmDelTimer(&chanp
->drel_timer
, 61);
361 FsmChangeState(fi
, ST_IN_ALERT_SENT
);
362 chanp
->d_st
->lli
.l4l3(chanp
->d_st
, CC_ALERTING
| REQUEST
, chanp
->proc
);
364 case 5: /* direct redirect */
365 case 4: /* Proceeding desired */
366 FsmDelTimer(&chanp
->drel_timer
, 61);
367 FsmChangeState(fi
, ST_IN_PROCEED_SEND
);
368 chanp
->d_st
->lli
.l4l3(chanp
->d_st
, CC_PROCEED_SEND
| REQUEST
, chanp
->proc
);
370 memcpy(&chanp
->setup
, &ic
.parm
.setup
, sizeof(setup_parm
));
371 chanp
->d_st
->lli
.l4l3(chanp
->d_st
, CC_REDIR
| REQUEST
, chanp
->proc
);
374 case 2: /* Rejecting Call */
376 case 3: /* incomplete number */
377 FsmDelTimer(&chanp
->drel_timer
, 61);
378 chanp
->d_st
->lli
.l4l3(chanp
->d_st
, CC_MORE_INFO
| REQUEST
, chanp
->proc
);
380 case 0: /* OK, nobody likes this call */
381 default: /* statcallb problems */
382 chanp
->d_st
->lli
.l4l3(chanp
->d_st
, CC_IGNORE
| REQUEST
, chanp
->proc
);
383 chanp
->cs
->cardmsg(chanp
->cs
, MDL_INFO_REL
, (void *) (long)chanp
->chan
);
384 FsmChangeState(fi
, ST_NULL
);
388 chanp
->d_st
->lli
.l4l3(chanp
->d_st
, CC_IGNORE
| REQUEST
, chanp
->proc
);
389 chanp
->cs
->cardmsg(chanp
->cs
, MDL_INFO_REL
, (void *) (long)chanp
->chan
);
394 lli_send_dconnect(struct FsmInst
*fi
, int event
, void *arg
)
396 struct Channel
*chanp
= fi
->userdata
;
398 FsmChangeState(fi
, ST_IN_WAIT_CONN_ACK
);
399 chanp
->d_st
->lli
.l4l3(chanp
->d_st
, CC_SETUP
| RESPONSE
, chanp
->proc
);
403 lli_send_alert(struct FsmInst
*fi
, int event
, void *arg
)
405 struct Channel
*chanp
= fi
->userdata
;
407 FsmChangeState(fi
, ST_IN_ALERT_SENT
);
408 chanp
->d_st
->lli
.l4l3(chanp
->d_st
, CC_ALERTING
| REQUEST
, chanp
->proc
);
412 lli_send_redir(struct FsmInst
*fi
, int event
, void *arg
)
414 struct Channel
*chanp
= fi
->userdata
;
416 chanp
->d_st
->lli
.l4l3(chanp
->d_st
, CC_REDIR
| REQUEST
, chanp
->proc
);
420 lli_init_bchan_in(struct FsmInst
*fi
, int event
, void *arg
)
422 struct Channel
*chanp
= fi
->userdata
;
424 FsmChangeState(fi
, ST_WAIT_BCONN
);
425 if (chanp
->debug
& 1)
426 link_debug(chanp
, 0, "STAT_DCONN");
427 HL_LL(chanp
, ISDN_STAT_DCONN
);
428 chanp
->l2_active_protocol
= chanp
->l2_protocol
;
429 chanp
->incoming
= !0;
430 init_b_st(chanp
, !0);
431 chanp
->b_st
->lli
.l4l3(chanp
->b_st
, DL_ESTABLISH
| REQUEST
, NULL
);
435 lli_setup_rsp(struct FsmInst
*fi
, int event
, void *arg
)
437 struct Channel
*chanp
= fi
->userdata
;
440 lli_init_bchan_in(fi
, event
, arg
);
442 FsmChangeState(fi
, ST_IN_WAIT_CONN_ACK
);
444 chanp
->d_st
->lli
.l4l3(chanp
->d_st
, CC_ALERTING
| REQUEST
, chanp
->proc
);
446 chanp
->d_st
->lli
.l4l3(chanp
->d_st
, CC_SETUP
| RESPONSE
, chanp
->proc
);
453 lli_suspend(struct FsmInst
*fi
, int event
, void *arg
)
455 struct Channel
*chanp
= fi
->userdata
;
457 chanp
->d_st
->lli
.l4l3(chanp
->d_st
, CC_SUSPEND
| REQUEST
, chanp
->proc
);
463 lli_leased_hup(struct FsmInst
*fi
, struct Channel
*chanp
)
467 ic
.driver
= chanp
->cs
->myid
;
468 ic
.command
= ISDN_STAT_CAUSE
;
469 ic
.arg
= chanp
->chan
;
470 sprintf(ic
.parm
.num
, "L0010");
471 chanp
->cs
->iif
.statcallb(&ic
);
472 if (chanp
->debug
& 1)
473 link_debug(chanp
, 0, "STAT_DHUP");
474 HL_LL(chanp
, ISDN_STAT_DHUP
);
479 lli_disconnect_req(struct FsmInst
*fi
, int event
, void *arg
)
481 struct Channel
*chanp
= fi
->userdata
;
484 lli_leased_hup(fi
, chanp
);
486 FsmChangeState(fi
, ST_WAIT_DRELEASE
);
488 chanp
->proc
->para
.cause
= 0x10; /* Normal Call Clearing */
489 chanp
->d_st
->lli
.l4l3(chanp
->d_st
, CC_DISCONNECT
| REQUEST
,
495 lli_disconnect_reject(struct FsmInst
*fi
, int event
, void *arg
)
497 struct Channel
*chanp
= fi
->userdata
;
500 lli_leased_hup(fi
, chanp
);
502 FsmChangeState(fi
, ST_WAIT_DRELEASE
);
504 chanp
->proc
->para
.cause
= 0x15; /* Call Rejected */
505 chanp
->d_st
->lli
.l4l3(chanp
->d_st
, CC_DISCONNECT
| REQUEST
,
511 lli_dhup_close(struct FsmInst
*fi
, int event
, void *arg
)
513 struct Channel
*chanp
= fi
->userdata
;
516 lli_leased_hup(fi
, chanp
);
518 if (chanp
->debug
& 1)
519 link_debug(chanp
, 0, "STAT_DHUP");
520 lli_deliver_cause(chanp
);
521 HL_LL(chanp
, ISDN_STAT_DHUP
);
527 lli_reject_req(struct FsmInst
*fi
, int event
, void *arg
)
529 struct Channel
*chanp
= fi
->userdata
;
532 lli_leased_hup(fi
, chanp
);
537 chanp
->proc
->para
.cause
= 0x15; /* Call Rejected */
538 chanp
->d_st
->lli
.l4l3(chanp
->d_st
, CC_REJECT
| REQUEST
, chanp
->proc
);
539 lli_dhup_close(fi
, event
, arg
);
541 FsmRestartTimer(&chanp
->drel_timer
, 40, EV_HANGUP
, NULL
, 63);
542 FsmChangeState(fi
, ST_IN_ALERT_SENT
);
543 chanp
->d_st
->lli
.l4l3(chanp
->d_st
, CC_ALERTING
| REQUEST
, chanp
->proc
);
548 lli_disconn_bchan(struct FsmInst
*fi
, int event
, void *arg
)
550 struct Channel
*chanp
= fi
->userdata
;
552 chanp
->data_open
= 0;
553 FsmChangeState(fi
, ST_WAIT_BRELEASE
);
554 chanp
->b_st
->lli
.l4l3(chanp
->b_st
, DL_RELEASE
| REQUEST
, NULL
);
558 lli_start_disc(struct FsmInst
*fi
, int event
, void *arg
)
560 struct Channel
*chanp
= fi
->userdata
;
563 lli_leased_hup(fi
, chanp
);
565 lli_disconnect_req(fi
, event
, arg
);
570 lli_rel_b_disc(struct FsmInst
*fi
, int event
, void *arg
)
572 struct Channel
*chanp
= fi
->userdata
;
575 lli_start_disc(fi
, event
, arg
);
579 lli_bhup_disc(struct FsmInst
*fi
, int event
, void *arg
)
581 struct Channel
*chanp
= fi
->userdata
;
583 if (chanp
->debug
& 1)
584 link_debug(chanp
, 0, "STAT_BHUP");
585 HL_LL(chanp
, ISDN_STAT_BHUP
);
586 lli_rel_b_disc(fi
, event
, arg
);
590 lli_bhup_rel_b(struct FsmInst
*fi
, int event
, void *arg
)
592 struct Channel
*chanp
= fi
->userdata
;
594 FsmChangeState(fi
, ST_WAIT_DCOMMAND
);
595 chanp
->data_open
= 0;
596 if (chanp
->debug
& 1)
597 link_debug(chanp
, 0, "STAT_BHUP");
598 HL_LL(chanp
, ISDN_STAT_BHUP
);
603 lli_release_bchan(struct FsmInst
*fi
, int event
, void *arg
)
605 struct Channel
*chanp
= fi
->userdata
;
607 chanp
->data_open
= 0;
608 FsmChangeState(fi
, ST_WAIT_BREL_DISC
);
609 chanp
->b_st
->lli
.l4l3(chanp
->b_st
, DL_RELEASE
| REQUEST
, NULL
);
614 lli_rel_b_dhup(struct FsmInst
*fi
, int event
, void *arg
)
616 struct Channel
*chanp
= fi
->userdata
;
619 lli_dhup_close(fi
, event
, arg
);
623 lli_bhup_dhup(struct FsmInst
*fi
, int event
, void *arg
)
625 struct Channel
*chanp
= fi
->userdata
;
627 if (chanp
->debug
& 1)
628 link_debug(chanp
, 0, "STAT_BHUP");
629 HL_LL(chanp
, ISDN_STAT_BHUP
);
630 lli_rel_b_dhup(fi
, event
, arg
);
634 lli_abort(struct FsmInst
*fi
, int event
, void *arg
)
636 struct Channel
*chanp
= fi
->userdata
;
638 chanp
->data_open
= 0;
639 chanp
->b_st
->lli
.l4l3(chanp
->b_st
, DL_RELEASE
| REQUEST
, NULL
);
640 lli_bhup_dhup(fi
, event
, arg
);
644 lli_release_req(struct FsmInst
*fi
, int event
, void *arg
)
646 struct Channel
*chanp
= fi
->userdata
;
649 lli_leased_hup(fi
, chanp
);
651 FsmChangeState(fi
, ST_WAIT_D_REL_CNF
);
652 chanp
->d_st
->lli
.l4l3(chanp
->d_st
, CC_RELEASE
| REQUEST
,
658 lli_rel_b_release_req(struct FsmInst
*fi
, int event
, void *arg
)
660 struct Channel
*chanp
= fi
->userdata
;
663 lli_release_req(fi
, event
, arg
);
667 lli_bhup_release_req(struct FsmInst
*fi
, int event
, void *arg
)
669 struct Channel
*chanp
= fi
->userdata
;
671 if (chanp
->debug
& 1)
672 link_debug(chanp
, 0, "STAT_BHUP");
673 HL_LL(chanp
, ISDN_STAT_BHUP
);
674 lli_rel_b_release_req(fi
, event
, arg
);
678 /* processing charge info */
680 lli_charge_info(struct FsmInst
*fi
, int event
, void *arg
)
682 struct Channel
*chanp
= fi
->userdata
;
685 ic
.driver
= chanp
->cs
->myid
;
686 ic
.command
= ISDN_STAT_CINF
;
687 ic
.arg
= chanp
->chan
;
688 sprintf(ic
.parm
.num
, "%d", chanp
->proc
->para
.chargeinfo
);
689 chanp
->cs
->iif
.statcallb(&ic
);
692 /* error procedures */
695 lli_dchan_not_ready(struct FsmInst
*fi
, int event
, void *arg
)
697 struct Channel
*chanp
= fi
->userdata
;
699 if (chanp
->debug
& 1)
700 link_debug(chanp
, 0, "STAT_DHUP");
701 HL_LL(chanp
, ISDN_STAT_DHUP
);
705 lli_no_setup_rsp(struct FsmInst
*fi
, int event
, void *arg
)
707 struct Channel
*chanp
= fi
->userdata
;
709 if (chanp
->debug
& 1)
710 link_debug(chanp
, 0, "STAT_DHUP");
711 HL_LL(chanp
, ISDN_STAT_DHUP
);
716 lli_error(struct FsmInst
*fi
, int event
, void *arg
)
718 FsmChangeState(fi
, ST_WAIT_DRELEASE
);
722 lli_failure_l(struct FsmInst
*fi
, int event
, void *arg
)
724 struct Channel
*chanp
= fi
->userdata
;
727 FsmChangeState(fi
, ST_NULL
);
728 ic
.driver
= chanp
->cs
->myid
;
729 ic
.command
= ISDN_STAT_CAUSE
;
730 ic
.arg
= chanp
->chan
;
731 sprintf(ic
.parm
.num
, "L%02X%02X", 0, 0x2f);
732 chanp
->cs
->iif
.statcallb(&ic
);
733 HL_LL(chanp
, ISDN_STAT_DHUP
);
735 chanp
->cs
->cardmsg(chanp
->cs
, MDL_INFO_REL
, (void *) (long)chanp
->chan
);
739 lli_rel_b_fail(struct FsmInst
*fi
, int event
, void *arg
)
741 struct Channel
*chanp
= fi
->userdata
;
744 lli_failure_l(fi
, event
, arg
);
748 lli_bhup_fail(struct FsmInst
*fi
, int event
, void *arg
)
750 struct Channel
*chanp
= fi
->userdata
;
752 if (chanp
->debug
& 1)
753 link_debug(chanp
, 0, "STAT_BHUP");
754 HL_LL(chanp
, ISDN_STAT_BHUP
);
755 lli_rel_b_fail(fi
, event
, arg
);
759 lli_failure_a(struct FsmInst
*fi
, int event
, void *arg
)
761 struct Channel
*chanp
= fi
->userdata
;
763 chanp
->data_open
= 0;
764 chanp
->b_st
->lli
.l4l3(chanp
->b_st
, DL_RELEASE
| REQUEST
, NULL
);
765 lli_bhup_fail(fi
, event
, arg
);
769 static struct FsmNode fnlist
[] __initdata
=
771 {ST_NULL
, EV_DIAL
, lli_prep_dialout
},
772 {ST_NULL
, EV_RESUME
, lli_resume
},
773 {ST_NULL
, EV_SETUP_IND
, lli_deliver_call
},
774 {ST_NULL
, EV_LEASED
, lli_leased_in
},
775 {ST_OUT_DIAL
, EV_SETUP_CNF
, lli_init_bchan_out
},
776 {ST_OUT_DIAL
, EV_HANGUP
, lli_disconnect_req
},
777 {ST_OUT_DIAL
, EV_DISCONNECT_IND
, lli_release_req
},
778 {ST_OUT_DIAL
, EV_RELEASE
, lli_dhup_close
},
779 {ST_OUT_DIAL
, EV_NOSETUP_RSP
, lli_no_setup_rsp
},
780 {ST_OUT_DIAL
, EV_SETUP_ERR
, lli_error
},
781 {ST_IN_WAIT_LL
, EV_LEASED_REL
, lli_failure_l
},
782 {ST_IN_WAIT_LL
, EV_ACCEPTD
, lli_setup_rsp
},
783 {ST_IN_WAIT_LL
, EV_HANGUP
, lli_reject_req
},
784 {ST_IN_WAIT_LL
, EV_DISCONNECT_IND
, lli_release_req
},
785 {ST_IN_WAIT_LL
, EV_RELEASE
, lli_dhup_close
},
786 {ST_IN_WAIT_LL
, EV_SETUP_IND
, lli_deliver_call
},
787 {ST_IN_WAIT_LL
, EV_SETUP_ERR
, lli_error
},
788 {ST_IN_ALERT_SENT
, EV_SETUP_CMPL_IND
, lli_init_bchan_in
},
789 {ST_IN_ALERT_SENT
, EV_ACCEPTD
, lli_send_dconnect
},
790 {ST_IN_ALERT_SENT
, EV_HANGUP
, lli_disconnect_reject
},
791 {ST_IN_ALERT_SENT
, EV_DISCONNECT_IND
, lli_release_req
},
792 {ST_IN_ALERT_SENT
, EV_RELEASE
, lli_dhup_close
},
793 {ST_IN_ALERT_SENT
, EV_REDIR
, lli_send_redir
},
794 {ST_IN_PROCEED_SEND
, EV_REDIR
, lli_send_redir
},
795 {ST_IN_PROCEED_SEND
, EV_ALERT
, lli_send_alert
},
796 {ST_IN_PROCEED_SEND
, EV_ACCEPTD
, lli_send_dconnect
},
797 {ST_IN_PROCEED_SEND
, EV_HANGUP
, lli_disconnect_reject
},
798 {ST_IN_PROCEED_SEND
, EV_DISCONNECT_IND
, lli_dhup_close
},
799 {ST_IN_ALERT_SENT
, EV_RELEASE
, lli_dhup_close
},
800 {ST_IN_WAIT_CONN_ACK
, EV_SETUP_CMPL_IND
, lli_init_bchan_in
},
801 {ST_IN_WAIT_CONN_ACK
, EV_HANGUP
, lli_disconnect_req
},
802 {ST_IN_WAIT_CONN_ACK
, EV_DISCONNECT_IND
, lli_release_req
},
803 {ST_IN_WAIT_CONN_ACK
, EV_RELEASE
, lli_dhup_close
},
804 {ST_IN_WAIT_CONN_ACK
, EV_CONNECT_ERR
, lli_error
},
805 {ST_WAIT_BCONN
, EV_BC_EST
, lli_go_active
},
806 {ST_WAIT_BCONN
, EV_BC_REL
, lli_rel_b_disc
},
807 {ST_WAIT_BCONN
, EV_HANGUP
, lli_rel_b_disc
},
808 {ST_WAIT_BCONN
, EV_DISCONNECT_IND
, lli_rel_b_release_req
},
809 {ST_WAIT_BCONN
, EV_RELEASE
, lli_rel_b_dhup
},
810 {ST_WAIT_BCONN
, EV_LEASED_REL
, lli_rel_b_fail
},
811 {ST_WAIT_BCONN
, EV_CINF
, lli_charge_info
},
812 {ST_ACTIVE
, EV_CINF
, lli_charge_info
},
813 {ST_ACTIVE
, EV_BC_REL
, lli_bhup_rel_b
},
814 {ST_ACTIVE
, EV_SUSPEND
, lli_suspend
},
815 {ST_ACTIVE
, EV_HANGUP
, lli_disconn_bchan
},
816 {ST_ACTIVE
, EV_DISCONNECT_IND
, lli_release_bchan
},
817 {ST_ACTIVE
, EV_RELEASE
, lli_abort
},
818 {ST_ACTIVE
, EV_LEASED_REL
, lli_failure_a
},
819 {ST_WAIT_BRELEASE
, EV_BC_REL
, lli_bhup_disc
},
820 {ST_WAIT_BRELEASE
, EV_DISCONNECT_IND
, lli_bhup_release_req
},
821 {ST_WAIT_BRELEASE
, EV_RELEASE
, lli_bhup_dhup
},
822 {ST_WAIT_BRELEASE
, EV_LEASED_REL
, lli_bhup_fail
},
823 {ST_WAIT_BREL_DISC
, EV_BC_REL
, lli_bhup_release_req
},
824 {ST_WAIT_BREL_DISC
, EV_RELEASE
, lli_bhup_dhup
},
825 {ST_WAIT_DCOMMAND
, EV_HANGUP
, lli_start_disc
},
826 {ST_WAIT_DCOMMAND
, EV_DISCONNECT_IND
, lli_release_req
},
827 {ST_WAIT_DCOMMAND
, EV_RELEASE
, lli_dhup_close
},
828 {ST_WAIT_DCOMMAND
, EV_LEASED_REL
, lli_failure_l
},
829 {ST_WAIT_DRELEASE
, EV_RELEASE
, lli_dhup_close
},
830 {ST_WAIT_DRELEASE
, EV_DIAL
, lli_dchan_not_ready
},
831 /* ETS 300-104 16.1 */
832 {ST_WAIT_D_REL_CNF
, EV_RELEASE
, lli_dhup_close
},
833 {ST_WAIT_D_REL_CNF
, EV_DIAL
, lli_dchan_not_ready
},
837 #define FNCOUNT (sizeof(fnlist)/sizeof(struct FsmNode))
842 callcfsm
.state_count
= STATE_COUNT
;
843 callcfsm
.event_count
= EVENT_COUNT
;
844 callcfsm
.strEvent
= strEvent
;
845 callcfsm
.strState
= strState
;
846 return FsmNew(&callcfsm
, fnlist
, FNCOUNT
);
856 release_b_st(struct Channel
*chanp
)
858 struct PStack
*st
= chanp
->b_st
;
860 if(test_and_clear_bit(FLG_START_B
, &chanp
->Flags
)) {
861 chanp
->bcs
->BC_Close(chanp
->bcs
);
862 switch (chanp
->l2_active_protocol
) {
863 case (ISDN_PROTO_L2_X75I
):
864 releasestack_isdnl2(st
);
866 case (ISDN_PROTO_L2_HDLC
):
867 case (ISDN_PROTO_L2_HDLC_56K
):
868 case (ISDN_PROTO_L2_TRANS
):
869 case (ISDN_PROTO_L2_MODEM
):
870 case (ISDN_PROTO_L2_FAX
):
871 releasestack_transl2(st
);
877 static struct Channel
878 *selectfreechannel(struct PStack
*st
, int bch
)
880 struct IsdnCardState
*cs
= st
->l1
.hardware
;
881 struct Channel
*chanp
= st
->lli
.userdata
;
884 if (test_bit(FLG_TWO_DCHAN
, &cs
->HW_Flags
))
890 i
= 2; /* virtual channel */
894 while (i
< ((bch
) ? cs
->chanlimit
: (2 + MAX_WAITING_CALLS
))) {
895 if (chanp
->fi
.state
== ST_NULL
)
901 if (bch
) /* number of channels is limited */ {
902 i
= 2; /* virtual channel */
903 chanp
= st
->lli
.userdata
;
905 while (i
< (2 + MAX_WAITING_CALLS
)) {
906 if (chanp
->fi
.state
== ST_NULL
)
915 static void stat_redir_result(struct IsdnCardState
*cs
, int chan
, ulong result
)
918 ic
.driver
= cs
->myid
;
919 ic
.command
= ISDN_STAT_REDIR
;
921 ic
.parm
.num
[0] = result
;
922 cs
->iif
.statcallb(&ic
);
923 } /* stat_redir_result */
926 dchan_l3l4(struct PStack
*st
, int pr
, void *arg
)
928 struct l3_process
*pc
= arg
;
929 struct IsdnCardState
*cs
= st
->l1
.hardware
;
930 struct Channel
*chanp
;
935 if (pr
== (CC_SETUP
| INDICATION
)) {
936 if (!(chanp
= selectfreechannel(pc
->st
, pc
->para
.bchannel
))) {
937 pc
->para
.cause
= 0x11; /* User busy */
938 pc
->st
->lli
.l4l3(pc
->st
, CC_REJECT
| REQUEST
, pc
);
942 FsmEvent(&chanp
->fi
, EV_SETUP_IND
, NULL
);
946 if (!(chanp
= pc
->chan
))
950 case (CC_MORE_INFO
| INDICATION
):
951 FsmEvent(&chanp
->fi
, EV_SETUP_IND
, NULL
);
953 case (CC_DISCONNECT
| INDICATION
):
954 FsmEvent(&chanp
->fi
, EV_DISCONNECT_IND
, NULL
);
956 case (CC_RELEASE
| CONFIRM
):
957 FsmEvent(&chanp
->fi
, EV_RELEASE
, NULL
);
959 case (CC_SUSPEND
| CONFIRM
):
960 FsmEvent(&chanp
->fi
, EV_RELEASE
, NULL
);
962 case (CC_RESUME
| CONFIRM
):
963 FsmEvent(&chanp
->fi
, EV_SETUP_CNF
, NULL
);
965 case (CC_RESUME_ERR
):
966 FsmEvent(&chanp
->fi
, EV_RELEASE
, NULL
);
968 case (CC_RELEASE
| INDICATION
):
969 FsmEvent(&chanp
->fi
, EV_RELEASE
, NULL
);
971 case (CC_SETUP_COMPL
| INDICATION
):
972 FsmEvent(&chanp
->fi
, EV_SETUP_CMPL_IND
, NULL
);
974 case (CC_SETUP
| CONFIRM
):
975 FsmEvent(&chanp
->fi
, EV_SETUP_CNF
, NULL
);
977 case (CC_CHARGE
| INDICATION
):
978 FsmEvent(&chanp
->fi
, EV_CINF
, NULL
);
980 case (CC_NOSETUP_RSP
):
981 FsmEvent(&chanp
->fi
, EV_NOSETUP_RSP
, NULL
);
984 FsmEvent(&chanp
->fi
, EV_SETUP_ERR
, NULL
);
986 case (CC_CONNECT_ERR
):
987 FsmEvent(&chanp
->fi
, EV_CONNECT_ERR
, NULL
);
989 case (CC_RELEASE_ERR
):
990 FsmEvent(&chanp
->fi
, EV_RELEASE
, NULL
);
992 case (CC_PROCEED_SEND
| INDICATION
):
993 case (CC_PROCEEDING
| INDICATION
):
994 case (CC_ALERTING
| INDICATION
):
995 case (CC_PROGRESS
| INDICATION
):
996 case (CC_NOTIFY
| INDICATION
):
998 case (CC_REDIR
| INDICATION
):
999 stat_redir_result(cs
, chanp
->chan
, pc
->redir_result
);
1002 if (chanp
->debug
& 0x800) {
1003 HiSax_putstatus(chanp
->cs
, "Ch",
1004 "%d L3->L4 unknown primitiv %#x",
1011 dummy_pstack(struct PStack
*st
, int pr
, void *arg
) {
1012 printk(KERN_WARNING
"call to dummy_pstack pr=%04x arg %lx\n", pr
, (long)arg
);
1016 init_PStack(struct PStack
**stp
) {
1017 *stp
= kmalloc(sizeof(struct PStack
), GFP_ATOMIC
);
1020 (*stp
)->next
= NULL
;
1021 (*stp
)->l1
.l1l2
= dummy_pstack
;
1022 (*stp
)->l1
.l1hw
= dummy_pstack
;
1023 (*stp
)->l1
.l1tei
= dummy_pstack
;
1024 (*stp
)->l2
.l2tei
= dummy_pstack
;
1025 (*stp
)->l2
.l2l1
= dummy_pstack
;
1026 (*stp
)->l2
.l2l3
= dummy_pstack
;
1027 (*stp
)->l3
.l3l2
= dummy_pstack
;
1028 (*stp
)->l3
.l3ml3
= dummy_pstack
;
1029 (*stp
)->l3
.l3l4
= dummy_pstack
;
1030 (*stp
)->lli
.l4l3
= dummy_pstack
;
1031 (*stp
)->ma
.layer
= dummy_pstack
;
1036 init_d_st(struct Channel
*chanp
)
1039 struct IsdnCardState
*cs
= chanp
->cs
;
1043 err
= init_PStack(&chanp
->d_st
);
1048 HiSax_addlist(cs
, st
);
1049 setstack_HiSax(st
, cs
);
1053 test_and_set_bit(FLG_MOD128
, &st
->l2
.flag
);
1054 test_and_set_bit(FLG_LAPD
, &st
->l2
.flag
);
1055 test_and_set_bit(FLG_ORIG
, &st
->l2
.flag
);
1056 st
->l2
.maxlen
= MAX_DFRAME_LEN
;
1058 st
->l2
.T200
= 1000; /* 1000 milliseconds */
1059 st
->l2
.N200
= 3; /* try 3 times */
1060 st
->l2
.T203
= 10000; /* 10000 milliseconds */
1061 if (test_bit(FLG_TWO_DCHAN
, &cs
->HW_Flags
))
1062 sprintf(tmp
, "DCh%d Q.921 ", chanp
->chan
);
1064 sprintf(tmp
, "DCh Q.921 ");
1065 setstack_isdnl2(st
, tmp
);
1066 setstack_l3dc(st
, chanp
);
1067 st
->lli
.userdata
= chanp
;
1068 st
->l3
.l3l4
= dchan_l3l4
;
1074 callc_debug(struct FsmInst
*fi
, char *fmt
, ...)
1077 struct Channel
*chanp
= fi
->userdata
;
1080 va_start(args
, fmt
);
1081 sprintf(tmp
, "Ch%d callc ", chanp
->chan
);
1082 VHiSax_putstatus(chanp
->cs
, tmp
, fmt
, args
);
1087 init_chan(int chan
, struct IsdnCardState
*csta
)
1089 struct Channel
*chanp
= csta
->channel
+ chan
;
1093 chanp
->bcs
= csta
->bcs
+ chan
;
1095 chanp
->incoming
= 0;
1099 err
= init_PStack(&chanp
->b_st
);
1102 chanp
->b_st
->l1
.delay
= DEFAULT_B_DELAY
;
1103 chanp
->fi
.fsm
= &callcfsm
;
1104 chanp
->fi
.state
= ST_NULL
;
1105 chanp
->fi
.debug
= 0;
1106 chanp
->fi
.userdata
= chanp
;
1107 chanp
->fi
.printdebug
= callc_debug
;
1108 FsmInitTimer(&chanp
->fi
, &chanp
->dial_timer
);
1109 FsmInitTimer(&chanp
->fi
, &chanp
->drel_timer
);
1110 if (!chan
|| (test_bit(FLG_TWO_DCHAN
, &csta
->HW_Flags
) && chan
< 2)) {
1111 err
= init_d_st(chanp
);
1115 chanp
->d_st
= csta
->channel
->d_st
;
1117 chanp
->data_open
= 0;
1122 CallcNewChan(struct IsdnCardState
*csta
) {
1126 err
= init_chan(0, csta
);
1129 err
= init_chan(1, csta
);
1132 printk(KERN_INFO
"HiSax: 2 channels added\n");
1134 for (i
= 0; i
< MAX_WAITING_CALLS
; i
++) {
1135 err
= init_chan(i
+2,csta
);
1139 printk(KERN_INFO
"HiSax: MAX_WAITING_CALLS added\n");
1140 if (test_bit(FLG_PTP
, &csta
->channel
->d_st
->l2
.flag
)) {
1141 printk(KERN_INFO
"LAYER2 WATCHING ESTABLISH\n");
1142 csta
->channel
->d_st
->lli
.l4l3(csta
->channel
->d_st
,
1143 DL_ESTABLISH
| REQUEST
, NULL
);
1149 release_d_st(struct Channel
*chanp
)
1151 struct PStack
*st
= chanp
->d_st
;
1155 releasestack_isdnl2(st
);
1156 releasestack_isdnl3(st
);
1157 HiSax_rmlist(st
->l1
.hardware
, st
);
1163 CallcFreeChan(struct IsdnCardState
*csta
)
1167 for (i
= 0; i
< 2; i
++) {
1168 FsmDelTimer(&csta
->channel
[i
].drel_timer
, 74);
1169 FsmDelTimer(&csta
->channel
[i
].dial_timer
, 75);
1170 if (i
|| test_bit(FLG_TWO_DCHAN
, &csta
->HW_Flags
))
1171 release_d_st(csta
->channel
+ i
);
1172 if (csta
->channel
[i
].b_st
) {
1173 release_b_st(csta
->channel
+ i
);
1174 kfree(csta
->channel
[i
].b_st
);
1175 csta
->channel
[i
].b_st
= NULL
;
1177 printk(KERN_WARNING
"CallcFreeChan b_st ch%d allready freed\n", i
);
1178 if (i
|| test_bit(FLG_TWO_DCHAN
, &csta
->HW_Flags
)) {
1179 release_d_st(csta
->channel
+ i
);
1181 csta
->channel
[i
].d_st
= NULL
;
1186 lldata_handler(struct PStack
*st
, int pr
, void *arg
)
1188 struct Channel
*chanp
= (struct Channel
*) st
->lli
.userdata
;
1189 struct sk_buff
*skb
= arg
;
1192 case (DL_DATA
| INDICATION
):
1193 if (chanp
->data_open
) {
1194 if (chanp
->debug
& 0x800)
1195 link_debug(chanp
, 0, "lldata: %d", skb
->len
);
1196 chanp
->cs
->iif
.rcvcallb_skb(chanp
->cs
->myid
, chanp
->chan
, skb
);
1198 link_debug(chanp
, 0, "lldata: channel not open");
1202 case (DL_ESTABLISH
| INDICATION
):
1203 case (DL_ESTABLISH
| CONFIRM
):
1204 FsmEvent(&chanp
->fi
, EV_BC_EST
, NULL
);
1206 case (DL_RELEASE
| INDICATION
):
1207 case (DL_RELEASE
| CONFIRM
):
1208 FsmEvent(&chanp
->fi
, EV_BC_REL
, NULL
);
1211 printk(KERN_WARNING
"lldata_handler unknown primitive %#x\n",
1218 lltrans_handler(struct PStack
*st
, int pr
, void *arg
)
1220 struct Channel
*chanp
= (struct Channel
*) st
->lli
.userdata
;
1221 struct sk_buff
*skb
= arg
;
1224 case (PH_DATA
| INDICATION
):
1225 if (chanp
->data_open
) {
1226 if (chanp
->debug
& 0x800)
1227 link_debug(chanp
, 0, "lltrans: %d", skb
->len
);
1228 chanp
->cs
->iif
.rcvcallb_skb(chanp
->cs
->myid
, chanp
->chan
, skb
);
1230 link_debug(chanp
, 0, "lltrans: channel not open");
1234 case (PH_ACTIVATE
| INDICATION
):
1235 case (PH_ACTIVATE
| CONFIRM
):
1236 FsmEvent(&chanp
->fi
, EV_BC_EST
, NULL
);
1238 case (PH_DEACTIVATE
| INDICATION
):
1239 case (PH_DEACTIVATE
| CONFIRM
):
1240 FsmEvent(&chanp
->fi
, EV_BC_REL
, NULL
);
1243 printk(KERN_WARNING
"lltrans_handler unknown primitive %#x\n",
1250 lli_writewakeup(struct PStack
*st
, int len
)
1252 struct Channel
*chanp
= st
->lli
.userdata
;
1255 if (chanp
->debug
& 0x800)
1256 link_debug(chanp
, 0, "llwakeup: %d", len
);
1257 ic
.driver
= chanp
->cs
->myid
;
1258 ic
.command
= ISDN_STAT_BSENT
;
1259 ic
.arg
= chanp
->chan
;
1260 ic
.parm
.length
= len
;
1261 chanp
->cs
->iif
.statcallb(&ic
);
1265 init_b_st(struct Channel
*chanp
, int incoming
)
1267 struct PStack
*st
= chanp
->b_st
;
1268 struct IsdnCardState
*cs
= chanp
->cs
;
1271 st
->l1
.hardware
= cs
;
1273 st
->l1
.bc
= chanp
->chan
& 1;
1275 st
->l1
.bc
= chanp
->proc
->para
.bchannel
- 1;
1276 switch (chanp
->l2_active_protocol
) {
1277 case (ISDN_PROTO_L2_X75I
):
1278 case (ISDN_PROTO_L2_HDLC
):
1279 st
->l1
.mode
= L1_MODE_HDLC
;
1281 case (ISDN_PROTO_L2_HDLC_56K
):
1282 st
->l1
.mode
= L1_MODE_HDLC_56K
;
1284 case (ISDN_PROTO_L2_TRANS
):
1285 st
->l1
.mode
= L1_MODE_TRANS
;
1287 case (ISDN_PROTO_L2_MODEM
):
1288 st
->l1
.mode
= L1_MODE_V32
;
1290 case (ISDN_PROTO_L2_FAX
):
1291 st
->l1
.mode
= L1_MODE_FAX
;
1294 chanp
->bcs
->conmsg
= NULL
;
1295 if (chanp
->bcs
->BC_SetStack(st
, chanp
->bcs
))
1298 test_and_set_bit(FLG_LAPB
, &st
->l2
.flag
);
1299 st
->l2
.maxlen
= MAX_DATA_SIZE
;
1301 test_and_set_bit(FLG_ORIG
, &st
->l2
.flag
);
1302 st
->l2
.T200
= 1000; /* 1000 milliseconds */
1304 st
->l2
.N200
= 4; /* try 4 times */
1305 st
->l2
.T203
= 5000; /* 5000 milliseconds */
1307 switch (chanp
->l2_active_protocol
) {
1308 case (ISDN_PROTO_L2_X75I
):
1309 sprintf(tmp
, "Ch%d X.75", chanp
->chan
);
1310 setstack_isdnl2(st
, tmp
);
1311 setstack_l3bc(st
, chanp
);
1312 st
->l2
.l2l3
= lldata_handler
;
1313 st
->lli
.userdata
= chanp
;
1314 test_and_clear_bit(FLG_LLI_L1WAKEUP
, &st
->lli
.flag
);
1315 test_and_set_bit(FLG_LLI_L2WAKEUP
, &st
->lli
.flag
);
1316 st
->l2
.l2m
.debug
= chanp
->debug
& 16;
1317 st
->l2
.debug
= chanp
->debug
& 64;
1319 case (ISDN_PROTO_L2_HDLC
):
1320 case (ISDN_PROTO_L2_HDLC_56K
):
1321 case (ISDN_PROTO_L2_TRANS
):
1322 case (ISDN_PROTO_L2_MODEM
):
1323 case (ISDN_PROTO_L2_FAX
):
1324 st
->l1
.l1l2
= lltrans_handler
;
1325 st
->lli
.userdata
= chanp
;
1326 test_and_set_bit(FLG_LLI_L1WAKEUP
, &st
->lli
.flag
);
1327 test_and_clear_bit(FLG_LLI_L2WAKEUP
, &st
->lli
.flag
);
1328 setstack_transl2(st
);
1329 setstack_l3bc(st
, chanp
);
1332 test_and_set_bit(FLG_START_B
, &chanp
->Flags
);
1337 leased_l4l3(struct PStack
*st
, int pr
, void *arg
)
1339 struct Channel
*chanp
= (struct Channel
*) st
->lli
.userdata
;
1340 struct sk_buff
*skb
= arg
;
1343 case (DL_DATA
| REQUEST
):
1344 link_debug(chanp
, 0, "leased line d-channel DATA");
1347 case (DL_ESTABLISH
| REQUEST
):
1348 st
->l2
.l2l1(st
, PH_ACTIVATE
| REQUEST
, NULL
);
1350 case (DL_RELEASE
| REQUEST
):
1353 printk(KERN_WARNING
"transd_l4l3 unknown primitive %#x\n",
1360 leased_l1l2(struct PStack
*st
, int pr
, void *arg
)
1362 struct Channel
*chanp
= (struct Channel
*) st
->lli
.userdata
;
1363 struct sk_buff
*skb
= arg
;
1364 int i
,event
= EV_LEASED_REL
;
1367 case (PH_DATA
| INDICATION
):
1368 link_debug(chanp
, 0, "leased line d-channel DATA");
1371 case (PH_ACTIVATE
| INDICATION
):
1372 case (PH_ACTIVATE
| CONFIRM
):
1374 case (PH_DEACTIVATE
| INDICATION
):
1375 case (PH_DEACTIVATE
| CONFIRM
):
1376 if (test_bit(FLG_TWO_DCHAN
, &chanp
->cs
->HW_Flags
))
1381 FsmEvent(&chanp
->fi
, event
, NULL
);
1388 "transd_l1l2 unknown primitive %#x\n", pr
);
1394 distr_debug(struct IsdnCardState
*csta
, int debugflags
)
1397 struct Channel
*chanp
= csta
->channel
;
1399 for (i
= 0; i
< (2 + MAX_WAITING_CALLS
) ; i
++) {
1400 chanp
[i
].debug
= debugflags
;
1401 chanp
[i
].fi
.debug
= debugflags
& 2;
1402 chanp
[i
].d_st
->l2
.l2m
.debug
= debugflags
& 8;
1403 chanp
[i
].b_st
->l2
.l2m
.debug
= debugflags
& 0x10;
1404 chanp
[i
].d_st
->l2
.debug
= debugflags
& 0x20;
1405 chanp
[i
].b_st
->l2
.debug
= debugflags
& 0x40;
1406 chanp
[i
].d_st
->l3
.l3m
.debug
= debugflags
& 0x80;
1407 chanp
[i
].b_st
->l3
.l3m
.debug
= debugflags
& 0x100;
1408 chanp
[i
].b_st
->ma
.tei_m
.debug
= debugflags
& 0x200;
1409 chanp
[i
].b_st
->ma
.debug
= debugflags
& 0x200;
1410 chanp
[i
].d_st
->l1
.l1m
.debug
= debugflags
& 0x1000;
1411 chanp
[i
].b_st
->l1
.l1m
.debug
= debugflags
& 0x2000;
1414 csta
->debug
|= DEB_DLOG_HEX
;
1416 csta
->debug
&= ~DEB_DLOG_HEX
;
1419 static char tmpbuf
[256];
1422 capi_debug(struct Channel
*chanp
, capi_msg
*cm
)
1426 t
+= QuickHex(t
, (u_char
*)cm
, (cm
->Length
>50)? 50: cm
->Length
);
1429 HiSax_putstatus(chanp
->cs
, "Ch", "%d CAPIMSG %s", chanp
->chan
, tmpbuf
);
1433 lli_got_fac_req(struct Channel
*chanp
, capi_msg
*cm
) {
1434 if ((cm
->para
[0] != 3) || (cm
->para
[1] != 0))
1438 if (cm
->para
[4] != 0)
1440 switch(cm
->para
[3]) {
1441 case 4: /* Suspend */
1442 strncpy(chanp
->setup
.phone
, &cm
->para
[5], cm
->para
[5] +1);
1443 FsmEvent(&chanp
->fi
, EV_SUSPEND
, cm
);
1445 case 5: /* Resume */
1446 strncpy(chanp
->setup
.phone
, &cm
->para
[5], cm
->para
[5] +1);
1447 if (chanp
->fi
.state
== ST_NULL
) {
1448 FsmEvent(&chanp
->fi
, EV_RESUME
, cm
);
1450 FsmDelTimer(&chanp
->dial_timer
, 72);
1451 FsmAddTimer(&chanp
->dial_timer
, 80, EV_RESUME
, cm
, 73);
1458 lli_got_manufacturer(struct Channel
*chanp
, struct IsdnCardState
*cs
, capi_msg
*cm
) {
1459 if ((cs
->typ
== ISDN_CTYPE_ELSA
) || (cs
->typ
== ISDN_CTYPE_ELSA_PNP
) ||
1460 (cs
->typ
== ISDN_CTYPE_ELSA_PCI
)) {
1461 if (cs
->hw
.elsa
.MFlag
) {
1462 cs
->cardmsg(cs
, CARD_AUX_IND
, cm
->para
);
1468 /***************************************************************/
1469 /* Limit the available number of channels for the current card */
1470 /***************************************************************/
1472 set_channel_limit(struct IsdnCardState
*cs
, int chanmax
)
1477 if ((chanmax
< 0) || (chanmax
> 2))
1480 for (ii
= 0; ii
< 2; ii
++) {
1481 ic
.driver
= cs
->myid
;
1482 ic
.command
= ISDN_STAT_DISCH
;
1485 ic
.parm
.num
[0] = 0; /* disabled */
1487 ic
.parm
.num
[0] = 1; /* enabled */
1488 i
= cs
->iif
.statcallb(&ic
);
1489 if (i
) return(-EINVAL
);
1494 } /* set_channel_limit */
1497 HiSax_command(isdn_ctrl
* ic
)
1499 struct IsdnCardState
*csta
= hisax_findcard(ic
->driver
);
1501 struct Channel
*chanp
;
1507 "HiSax: if_command %d called with invalid driverId %d!\n",
1508 ic
->command
, ic
->driver
);
1511 switch (ic
->command
) {
1512 case (ISDN_CMD_SETEAZ
):
1513 chanp
= csta
->channel
+ ic
->arg
;
1515 case (ISDN_CMD_SETL2
):
1516 chanp
= csta
->channel
+ (ic
->arg
& 0xff);
1517 if (chanp
->debug
& 1)
1518 link_debug(chanp
, 1, "SETL2 card %d %ld",
1519 csta
->cardnr
+ 1, ic
->arg
>> 8);
1520 chanp
->l2_protocol
= ic
->arg
>> 8;
1522 case (ISDN_CMD_SETL3
):
1523 chanp
= csta
->channel
+ (ic
->arg
& 0xff);
1524 if (chanp
->debug
& 1)
1525 link_debug(chanp
, 1, "SETL3 card %d %ld",
1526 csta
->cardnr
+ 1, ic
->arg
>> 8);
1527 chanp
->l3_protocol
= ic
->arg
>> 8;
1529 case (ISDN_CMD_DIAL
):
1530 chanp
= csta
->channel
+ (ic
->arg
& 0xff);
1531 if (chanp
->debug
& 1)
1532 link_debug(chanp
, 1, "DIAL %s -> %s (%d,%d)",
1533 ic
->parm
.setup
.eazmsn
, ic
->parm
.setup
.phone
,
1534 ic
->parm
.setup
.si1
, ic
->parm
.setup
.si2
);
1535 memcpy(&chanp
->setup
, &ic
->parm
.setup
, sizeof(setup_parm
));
1536 if (!strcmp(chanp
->setup
.eazmsn
, "0"))
1537 chanp
->setup
.eazmsn
[0] = '\0';
1538 /* this solution is dirty and may be change, if
1539 * we make a callreference based callmanager */
1540 if (chanp
->fi
.state
== ST_NULL
) {
1541 FsmEvent(&chanp
->fi
, EV_DIAL
, NULL
);
1543 FsmDelTimer(&chanp
->dial_timer
, 70);
1544 FsmAddTimer(&chanp
->dial_timer
, 50, EV_DIAL
, NULL
, 71);
1547 case (ISDN_CMD_ACCEPTB
):
1548 chanp
= csta
->channel
+ ic
->arg
;
1549 if (chanp
->debug
& 1)
1550 link_debug(chanp
, 1, "ACCEPTB");
1551 FsmEvent(&chanp
->fi
, EV_ACCEPTB
, NULL
);
1553 case (ISDN_CMD_ACCEPTD
):
1554 chanp
= csta
->channel
+ ic
->arg
;
1555 memcpy(&chanp
->setup
, &ic
->parm
.setup
, sizeof(setup_parm
));
1556 if (chanp
->debug
& 1)
1557 link_debug(chanp
, 1, "ACCEPTD");
1558 FsmEvent(&chanp
->fi
, EV_ACCEPTD
, NULL
);
1560 case (ISDN_CMD_HANGUP
):
1561 chanp
= csta
->channel
+ ic
->arg
;
1562 if (chanp
->debug
& 1)
1563 link_debug(chanp
, 1, "HANGUP");
1564 FsmEvent(&chanp
->fi
, EV_HANGUP
, NULL
);
1566 case (CAPI_PUT_MESSAGE
):
1567 chanp
= csta
->channel
+ ic
->arg
;
1568 if (chanp
->debug
& 1)
1569 capi_debug(chanp
, &ic
->parm
.cmsg
);
1570 if (ic
->parm
.cmsg
.Length
< 8)
1572 switch(ic
->parm
.cmsg
.Command
) {
1574 if (ic
->parm
.cmsg
.Subcommand
== CAPI_REQ
)
1575 lli_got_fac_req(chanp
, &ic
->parm
.cmsg
);
1577 case CAPI_MANUFACTURER
:
1578 if (ic
->parm
.cmsg
.Subcommand
== CAPI_REQ
)
1579 lli_got_manufacturer(chanp
, csta
, &ic
->parm
.cmsg
);
1585 case (ISDN_CMD_IOCTL
):
1588 num
= *(unsigned int *) ic
->parm
.num
;
1589 HiSax_reportcard(csta
->cardnr
, num
);
1592 num
= *(unsigned int *) ic
->parm
.num
;
1593 distr_debug(csta
, num
);
1594 printk(KERN_DEBUG
"HiSax: debugging flags card %d set to %x\n",
1595 csta
->cardnr
+ 1, num
);
1596 HiSax_putstatus(csta
, "debugging flags ",
1597 "card %d set to %x", csta
->cardnr
+ 1, num
);
1600 num
= *(unsigned int *) ic
->parm
.num
;
1601 csta
->channel
[0].b_st
->l1
.delay
= num
;
1602 csta
->channel
[1].b_st
->l1
.delay
= num
;
1603 HiSax_putstatus(csta
, "delay ", "card %d set to %d ms",
1604 csta
->cardnr
+ 1, num
);
1605 printk(KERN_DEBUG
"HiSax: delay card %d set to %d ms\n",
1606 csta
->cardnr
+ 1, num
);
1608 case (5): /* set card in leased mode */
1609 num
= *(unsigned int *) ic
->parm
.num
;
1610 if ((num
<1) || (num
> 2)) {
1611 HiSax_putstatus(csta
, "Set LEASED ",
1612 "wrong channel %d", num
);
1613 printk(KERN_WARNING
"HiSax: Set LEASED wrong channel %d\n",
1617 chanp
= csta
->channel
+num
;
1619 HiSax_putstatus(csta
, "Card",
1620 "%d channel %d set leased mode\n",
1621 csta
->cardnr
+ 1, num
+ 1);
1622 chanp
->d_st
->l1
.l1l2
= leased_l1l2
;
1623 chanp
->d_st
->lli
.l4l3
= leased_l4l3
;
1624 chanp
->d_st
->lli
.l4l3(chanp
->d_st
,
1625 DL_ESTABLISH
| REQUEST
, NULL
);
1628 case (6): /* set B-channel test loop */
1629 num
= *(unsigned int *) ic
->parm
.num
;
1631 csta
->stlist
->l2
.l2l1(csta
->stlist
,
1632 PH_TESTLOOP
| REQUEST
, (void *) (long)num
);
1634 case (7): /* set card in PTP mode */
1635 num
= *(unsigned int *) ic
->parm
.num
;
1636 if (test_bit(FLG_TWO_DCHAN
, &csta
->HW_Flags
)) {
1637 printk(KERN_ERR
"HiSax PTP mode only with one TEI possible\n");
1639 test_and_set_bit(FLG_PTP
, &csta
->channel
[0].d_st
->l2
.flag
);
1640 test_and_set_bit(FLG_FIXED_TEI
, &csta
->channel
[0].d_st
->l2
.flag
);
1641 csta
->channel
[0].d_st
->l2
.tei
= 0;
1642 HiSax_putstatus(csta
, "set card ", "in PTP mode");
1643 printk(KERN_DEBUG
"HiSax: set card in PTP mode\n");
1644 printk(KERN_INFO
"LAYER2 WATCHING ESTABLISH\n");
1645 csta
->channel
[0].d_st
->lli
.l4l3(csta
->channel
[0].d_st
,
1646 DL_ESTABLISH
| REQUEST
, NULL
);
1648 test_and_clear_bit(FLG_PTP
, &csta
->channel
[0].d_st
->l2
.flag
);
1649 test_and_clear_bit(FLG_FIXED_TEI
, &csta
->channel
[0].d_st
->l2
.flag
);
1650 HiSax_putstatus(csta
, "set card ", "in PTMP mode");
1651 printk(KERN_DEBUG
"HiSax: set card in PTMP mode\n");
1654 case (8): /* set card in FIXED TEI mode */
1655 num
= *(unsigned int *) ic
->parm
.num
;
1656 chanp
= csta
->channel
+ (num
& 1);
1659 test_and_clear_bit(FLG_FIXED_TEI
, &chanp
->d_st
->l2
.flag
);
1660 chanp
->d_st
->l2
.tei
= -1;
1661 HiSax_putstatus(csta
, "set card ", "in VAR TEI mode");
1662 printk(KERN_DEBUG
"HiSax: set card in VAR TEI mode\n");
1664 test_and_set_bit(FLG_FIXED_TEI
, &chanp
->d_st
->l2
.flag
);
1665 chanp
->d_st
->l2
.tei
= num
;
1666 HiSax_putstatus(csta
, "set card ", "in FIXED TEI (%d) mode", num
);
1667 printk(KERN_DEBUG
"HiSax: set card in FIXED TEI (%d) mode\n",
1670 chanp
->d_st
->lli
.l4l3(chanp
->d_st
,
1671 DL_ESTABLISH
| REQUEST
, NULL
);
1674 num
= csta
->debug
& DEB_DLOG_HEX
;
1675 csta
->debug
= *(unsigned int *) ic
->parm
.num
;
1677 HiSax_putstatus(cards
[0].cs
, "l1 debugging ",
1678 "flags card %d set to %x",
1679 csta
->cardnr
+ 1, csta
->debug
);
1680 printk(KERN_DEBUG
"HiSax: l1 debugging flags card %d set to %x\n",
1681 csta
->cardnr
+ 1, csta
->debug
);
1684 csta
->channel
[0].d_st
->l3
.debug
= *(unsigned int *) ic
->parm
.num
;
1685 csta
->channel
[1].d_st
->l3
.debug
= *(unsigned int *) ic
->parm
.num
;
1686 HiSax_putstatus(cards
[0].cs
, "l3 debugging ",
1687 "flags card %d set to %x\n", csta
->cardnr
+ 1,
1688 *(unsigned int *) ic
->parm
.num
);
1689 printk(KERN_DEBUG
"HiSax: l3 debugging flags card %d set to %x\n",
1690 csta
->cardnr
+ 1, *(unsigned int *) ic
->parm
.num
);
1693 i
= *(unsigned int *) ic
->parm
.num
;
1694 return(set_channel_limit(csta
, i
));
1697 return(csta
->auxcmd(csta
, ic
));
1698 printk(KERN_DEBUG
"HiSax: invalid ioclt %d\n",
1704 case (ISDN_CMD_PROCEED
):
1705 chanp
= csta
->channel
+ ic
->arg
;
1706 if (chanp
->debug
& 1)
1707 link_debug(chanp
, 1, "PROCEED");
1708 FsmEvent(&chanp
->fi
, EV_PROCEED
, NULL
);
1711 case (ISDN_CMD_ALERT
):
1712 chanp
= csta
->channel
+ ic
->arg
;
1713 if (chanp
->debug
& 1)
1714 link_debug(chanp
, 1, "ALERT");
1715 FsmEvent(&chanp
->fi
, EV_ALERT
, NULL
);
1718 case (ISDN_CMD_REDIR
):
1719 chanp
= csta
->channel
+ ic
->arg
;
1720 if (chanp
->debug
& 1)
1721 link_debug(chanp
, 1, "REDIR");
1722 memcpy(&chanp
->setup
, &ic
->parm
.setup
, sizeof(setup_parm
));
1723 FsmEvent(&chanp
->fi
, EV_REDIR
, NULL
);
1726 /* protocol specific io commands */
1727 case (ISDN_CMD_PROT_IO
):
1728 for (st
= csta
->stlist
; st
; st
= st
->next
)
1729 if (st
->protocol
== (ic
->arg
& 0xFF))
1730 return(st
->lli
.l4l3_proto(st
, ic
));
1735 return(csta
->auxcmd(csta
, ic
));
1742 HiSax_writebuf_skb(int id
, int chan
, int ack
, struct sk_buff
*skb
)
1744 struct IsdnCardState
*csta
= hisax_findcard(id
);
1745 struct Channel
*chanp
;
1748 struct sk_buff
*nskb
;
1752 "HiSax: if_sendbuf called with invalid driverId!\n");
1755 chanp
= csta
->channel
+ chan
;
1757 if (!chanp
->data_open
) {
1758 link_debug(chanp
, 1, "writebuf: channel not open");
1761 if (len
> MAX_DATA_SIZE
) {
1762 link_debug(chanp
, 1, "writebuf: packet too large (%d bytes)", len
);
1763 printk(KERN_WARNING
"HiSax_writebuf: packet too large (%d bytes) !\n",
1768 if ((len
+ chanp
->bcs
->tx_cnt
) > MAX_DATA_MEM
) {
1769 /* Must return 0 here, since this is not an error
1770 * but a temporary lack of resources.
1772 if (chanp
->debug
& 0x800)
1773 link_debug(chanp
, 1, "writebuf: no buffers for %d bytes", len
);
1775 } else if (chanp
->debug
& 0x800)
1776 link_debug(chanp
, 1, "writebuf %d/%d/%d", len
, chanp
->bcs
->tx_cnt
,MAX_DATA_MEM
);
1777 nskb
= skb_clone(skb
, GFP_ATOMIC
);
1779 nskb
->truesize
= nskb
->len
;
1781 nskb
->pkt_type
= PACKET_NOACK
;
1782 if (chanp
->l2_active_protocol
== ISDN_PROTO_L2_X75I
)
1783 st
->l3
.l3l2(st
, DL_DATA
| REQUEST
, nskb
);
1785 chanp
->bcs
->tx_cnt
+= len
;
1786 st
->l2
.l2l1(st
, PH_DATA
| REQUEST
, nskb
);