drivers/isdn/hisax/isdnl1.c

   1 /* $Id: isdnl1.c,v 2.46.2.5 2004/02/11 13:21:34 keil Exp $
   2  *
   3  * common low level stuff for Siemens Chipsetbased isdn cards
   4  *
   5  * Author       Karsten Keil
   6  *              based on the teles driver from Jan den Ouden
   7  * Copyright    by Karsten Keil      <keil@isdn4linux.de>
   8  *
   9  * This software may be used and distributed according to the terms
  10  * of the GNU General Public License, incorporated herein by reference.
  11  *
  12  * For changes and modifications please read
  13  * Documentation/isdn/HiSax.cert
  14  *
  15  * Thanks to    Jan den Ouden
  16  *              Fritz Elfert
  17  *              Beat Doebeli
  18  *
  19  */
  20
  21 const char *l1_revision = "$Revision: 2.46.2.5 $";
  22
  23 #include <linux/init.h>
  24 #include "hisax.h"
  25 #include "isdnl1.h"
  26
  27 #define TIMER3_VALUE 7000
  28
  29 static struct Fsm l1fsm_b;
  30 static struct Fsm l1fsm_s;
  31
  32 enum {
  33         ST_L1_F2,
  34         ST_L1_F3,
  35         ST_L1_F4,
  36         ST_L1_F5,
  37         ST_L1_F6,
  38         ST_L1_F7,
  39         ST_L1_F8,
  40 };
  41
  42 #define L1S_STATE_COUNT (ST_L1_F8+1)
  43
  44 static char *strL1SState[] =
  45 {
  46         "ST_L1_F2",
  47         "ST_L1_F3",
  48         "ST_L1_F4",
  49         "ST_L1_F5",
  50         "ST_L1_F6",
  51         "ST_L1_F7",
  52         "ST_L1_F8",
  53 };
  54
  55 #ifdef HISAX_UINTERFACE
  56 static
  57 struct Fsm l1fsm_u =
  58 {NULL, 0, 0, NULL, NULL};
  59
  60 enum {
  61         ST_L1_RESET,
  62         ST_L1_DEACT,
  63         ST_L1_SYNC2,
  64         ST_L1_TRANS,
  65 };
  66
  67 #define L1U_STATE_COUNT (ST_L1_TRANS+1)
  68
  69 static char *strL1UState[] =
  70 {
  71         "ST_L1_RESET",
  72         "ST_L1_DEACT",
  73         "ST_L1_SYNC2",
  74         "ST_L1_TRANS",
  75 };
  76 #endif
  77
  78 enum {
  79         ST_L1_NULL,
  80         ST_L1_WAIT_ACT,
  81         ST_L1_WAIT_DEACT,
  82         ST_L1_ACTIV,
  83 };
  84
  85 #define L1B_STATE_COUNT (ST_L1_ACTIV+1)
  86
  87 static char *strL1BState[] =
  88 {
  89         "ST_L1_NULL",
  90         "ST_L1_WAIT_ACT",
  91         "ST_L1_WAIT_DEACT",
  92         "ST_L1_ACTIV",
  93 };
  94
  95 enum {
  96         EV_PH_ACTIVATE,
  97         EV_PH_DEACTIVATE,
  98         EV_RESET_IND,
  99         EV_DEACT_CNF,
 100         EV_DEACT_IND,
 101         EV_POWER_UP,
 102         EV_RSYNC_IND,
 103         EV_INFO2_IND,
 104         EV_INFO4_IND,
 105         EV_TIMER_DEACT,
 106         EV_TIMER_ACT,
 107         EV_TIMER3,
 108 };
 109
 110 #define L1_EVENT_COUNT (EV_TIMER3 + 1)
 111
 112 static char *strL1Event[] =
 113 {
 114         "EV_PH_ACTIVATE",
 115         "EV_PH_DEACTIVATE",
 116         "EV_RESET_IND",
 117         "EV_DEACT_CNF",
 118         "EV_DEACT_IND",
 119         "EV_POWER_UP",
 120         "EV_RSYNC_IND",
 121         "EV_INFO2_IND",
 122         "EV_INFO4_IND",
 123         "EV_TIMER_DEACT",
 124         "EV_TIMER_ACT",
 125         "EV_TIMER3",
 126 };
 127
 128 void
 129 debugl1(struct IsdnCardState *cs, char *fmt, ...)
 130 {
 131         va_list args;
 132         char tmp[8];
 133
 134         va_start(args, fmt);
 135         sprintf(tmp, "Card%d ", cs->cardnr + 1);
 136         VHiSax_putstatus(cs, tmp, fmt, args);
 137         va_end(args);
 138 }
 139
 140 static void
 141 l1m_debug(struct FsmInst *fi, char *fmt, ...)
 142 {
 143         va_list args;
 144         struct PStack *st = fi->userdata;
 145         struct IsdnCardState *cs = st->l1.hardware;
 146         char tmp[8];
 147
 148         va_start(args, fmt);
 149         sprintf(tmp, "Card%d ", cs->cardnr + 1);
 150         VHiSax_putstatus(cs, tmp, fmt, args);
 151         va_end(args);
 152 }
 153
 154 static void
 155 L1activated(struct IsdnCardState *cs)
 156 {
 157         struct PStack *st;
 158
 159         st = cs->stlist;
 160         while (st) {
 161                 if (test_and_clear_bit(FLG_L1_ACTIVATING, &st->l1.Flags))
 162                         st->l1.l1l2(st, PH_ACTIVATE | CONFIRM, NULL);
 163                 else
 164                         st->l1.l1l2(st, PH_ACTIVATE | INDICATION, NULL);
 165                 st = st->next;
 166         }
 167 }
 168
 169 static void
 170 L1deactivated(struct IsdnCardState *cs)
 171 {
 172         struct PStack *st;
 173
 174         st = cs->stlist;
 175         while (st) {
 176                 if (test_bit(FLG_L1_DBUSY, &cs->HW_Flags))
 177                         st->l1.l1l2(st, PH_PAUSE | CONFIRM, NULL);
 178                 st->l1.l1l2(st, PH_DEACTIVATE | INDICATION, NULL);
 179                 st = st->next;
 180         }
 181         test_and_clear_bit(FLG_L1_DBUSY, &cs->HW_Flags);
 182 }
 183
 184 void
 185 DChannel_proc_xmt(struct IsdnCardState *cs)
 186 {
 187         struct PStack *stptr;
 188
 189         if (cs->tx_skb)
 190                 return;
 191
 192         stptr = cs->stlist;
 193         while (stptr != NULL) {
 194                 if (test_and_clear_bit(FLG_L1_PULL_REQ, &stptr->l1.Flags)) {
 195                         stptr->l1.l1l2(stptr, PH_PULL | CONFIRM, NULL);
 196                         break;
 197                 } else
 198                         stptr = stptr->next;
 199         }
 200 }
 201
 202 void
 203 DChannel_proc_rcv(struct IsdnCardState *cs)
 204 {
 205         struct sk_buff *skb, *nskb;
 206         struct PStack *stptr = cs->stlist;
 207         int found, tei, sapi;
 208
 209         if (stptr)
 210                 if (test_bit(FLG_L1_ACTTIMER, &stptr->l1.Flags))
 211                         FsmEvent(&stptr->l1.l1m, EV_TIMER_ACT, NULL);
 212         while ((skb = skb_dequeue(&cs->rq))) {
 213 #ifdef L2FRAME_DEBUG            /* psa */
 214                 if (cs->debug & L1_DEB_LAPD)
 215                         Logl2Frame(cs, skb, "PH_DATA", 1);
 216 #endif
 217                 stptr = cs->stlist;
 218                 if (skb->len<3) {
 219                         debugl1(cs, "D-channel frame too short(%d)",skb->len);
 220                         dev_kfree_skb(skb);
 221                         return;
 222                 }
 223                 if ((skb->data[0] & 1) || !(skb->data[1] &1)) {
 224                         debugl1(cs, "D-channel frame wrong EA0/EA1");
 225                         dev_kfree_skb(skb);
 226                         return;
 227                 }
 228                 sapi = skb->data[0] >> 2;
 229                 tei = skb->data[1] >> 1;
 230                 if (cs->debug & DEB_DLOG_HEX)
 231                         LogFrame(cs, skb->data, skb->len);
 232                 if (cs->debug & DEB_DLOG_VERBOSE)
 233                         dlogframe(cs, skb, 1);
 234                 if (tei == GROUP_TEI) {
 235                         if (sapi == CTRL_SAPI) { /* sapi 0 */
 236                                 while (stptr != NULL) {
 237                                         if ((nskb = skb_clone(skb, GFP_ATOMIC)))
 238                                                 stptr->l1.l1l2(stptr, PH_DATA | INDICATION, nskb);
 239                                         else
 240                                                 printk(KERN_WARNING "HiSax: isdn broadcast buffer shortage\n");
 241                                         stptr = stptr->next;
 242                                 }
 243                         } else if (sapi == TEI_SAPI) {
 244                                 while (stptr != NULL) {
 245                                         if ((nskb = skb_clone(skb, GFP_ATOMIC)))
 246                                                 stptr->l1.l1tei(stptr, PH_DATA | INDICATION, nskb);
 247                                         else
 248                                                 printk(KERN_WARNING "HiSax: tei broadcast buffer shortage\n");
 249                                         stptr = stptr->next;
 250                                 }
 251                         }
 252                         dev_kfree_skb(skb);
 253                 } else if (sapi == CTRL_SAPI) { /* sapi 0 */
 254                         found = 0;
 255                         while (stptr != NULL)
 256                                 if (tei == stptr->l2.tei) {
 257                                         stptr->l1.l1l2(stptr, PH_DATA | INDICATION, skb);
 258                                         found = !0;
 259                                         break;
 260                                 } else
 261                                         stptr = stptr->next;
 262                         if (!found)
 263                                 dev_kfree_skb(skb);
 264                 } else
 265                         dev_kfree_skb(skb);
 266         }
 267 }
 268
 269 static void
 270 BChannel_proc_xmt(struct BCState *bcs)
 271 {
 272         struct PStack *st = bcs->st;
 273
 274         if (test_bit(BC_FLG_BUSY, &bcs->Flag)) {
 275                 debugl1(bcs->cs, "BC_BUSY Error");
 276                 return;
 277         }
 278
 279         if (test_and_clear_bit(FLG_L1_PULL_REQ, &st->l1.Flags))
 280                 st->l1.l1l2(st, PH_PULL | CONFIRM, NULL);
 281         if (!test_bit(BC_FLG_ACTIV, &bcs->Flag)) {
 282                 if (!test_bit(BC_FLG_BUSY, &bcs->Flag) &&
 283                     skb_queue_empty(&bcs->squeue)) {
 284                         st->l2.l2l1(st, PH_DEACTIVATE | CONFIRM, NULL);
 285                 }
 286         }
 287 }
 288
 289 static void
 290 BChannel_proc_rcv(struct BCState *bcs)
 291 {
 292         struct sk_buff *skb;
 293
 294         if (bcs->st->l1.l1m.state == ST_L1_WAIT_ACT) {
 295                 FsmDelTimer(&bcs->st->l1.timer, 4);
 296                 FsmEvent(&bcs->st->l1.l1m, EV_TIMER_ACT, NULL);
 297         }
 298         while ((skb = skb_dequeue(&bcs->rqueue))) {
 299                 bcs->st->l1.l1l2(bcs->st, PH_DATA | INDICATION, skb);
 300         }
 301 }
 302
 303 static void
 304 BChannel_proc_ack(struct BCState *bcs)
 305 {
 306         u_long  flags;
 307         int     ack;
 308
 309         spin_lock_irqsave(&bcs->aclock, flags);
 310         ack = bcs->ackcnt;
 311         bcs->ackcnt = 0;
 312         spin_unlock_irqrestore(&bcs->aclock, flags);
 313         if (ack)
 314                 lli_writewakeup(bcs->st, ack);
 315 }
 316
 317 void
 318 BChannel_bh(struct work_struct *work)
 319 {
 320         struct BCState *bcs = container_of(work, struct BCState, tqueue);
 321
 322         if (!bcs)
 323                 return;
 324         if (test_and_clear_bit(B_RCVBUFREADY, &bcs->event))
 325                 BChannel_proc_rcv(bcs);
 326         if (test_and_clear_bit(B_XMTBUFREADY, &bcs->event))
 327                 BChannel_proc_xmt(bcs);
 328         if (test_and_clear_bit(B_ACKPENDING, &bcs->event))
 329                 BChannel_proc_ack(bcs);
 330 }
 331
 332 void
 333 HiSax_addlist(struct IsdnCardState *cs,
 334               struct PStack *st)
 335 {
 336         st->next = cs->stlist;
 337         cs->stlist = st;
 338 }
 339
 340 void
 341 HiSax_rmlist(struct IsdnCardState *cs,
 342              struct PStack *st)
 343 {
 344         struct PStack *p;
 345
 346         FsmDelTimer(&st->l1.timer, 0);
 347         if (cs->stlist == st)
 348                 cs->stlist = st->next;
 349         else {
 350                 p = cs->stlist;
 351                 while (p)
 352                         if (p->next == st) {
 353                                 p->next = st->next;
 354                                 return;
 355                         } else
 356                                 p = p->next;
 357         }
 358 }
 359
 360 void
 361 init_bcstate(struct IsdnCardState *cs, int bc)
 362 {
 363         struct BCState *bcs = cs->bcs + bc;
 364
 365         bcs->cs = cs;
 366         bcs->channel = bc;
 367         INIT_WORK(&bcs->tqueue, BChannel_bh);
 368         spin_lock_init(&bcs->aclock);
 369         bcs->BC_SetStack = NULL;
 370         bcs->BC_Close = NULL;
 371         bcs->Flag = 0;
 372 }
 373
 374 #ifdef L2FRAME_DEBUG            /* psa */
 375
 376 static char *
 377 l2cmd(u_char cmd)
 378 {
 379         switch (cmd & ~0x10) {
 380                 case 1:
 381                         return "RR";
 382                 case 5:
 383                         return "RNR";
 384                 case 9:
 385                         return "REJ";
 386                 case 0x6f:
 387                         return "SABME";
 388                 case 0x0f:
 389                         return "DM";
 390                 case 3:
 391                         return "UI";
 392                 case 0x43:
 393                         return "DISC";
 394                 case 0x63:
 395                         return "UA";
 396                 case 0x87:
 397                         return "FRMR";
 398                 case 0xaf:
 399                         return "XID";
 400                 default:
 401                         if (!(cmd & 1))
 402                                 return "I";
 403                         else
 404                                 return "invalid command";
 405         }
 406 }
 407
 408 static char tmpdeb[32];
 409
 410 static char *
 411 l2frames(u_char * ptr)
 412 {
 413         switch (ptr[2] & ~0x10) {
 414                 case 1:
 415                 case 5:
 416                 case 9:
 417                         sprintf(tmpdeb, "%s[%d](nr %d)", l2cmd(ptr[2]), ptr[3] & 1, ptr[3] >> 1);
 418                         break;
 419                 case 0x6f:
 420                 case 0x0f:
 421                 case 3:
 422                 case 0x43:
 423                 case 0x63:
 424                 case 0x87:
 425                 case 0xaf:
 426                         sprintf(tmpdeb, "%s[%d]", l2cmd(ptr[2]), (ptr[2] & 0x10) >> 4);
 427                         break;
 428                 default:
 429                         if (!(ptr[2] & 1)) {
 430                                 sprintf(tmpdeb, "I[%d](ns %d, nr %d)", ptr[3] & 1, ptr[2] >> 1, ptr[3] >> 1);
 431                                 break;
 432                         } else
 433                                 return "invalid command";
 434         }
 435
 436
 437         return tmpdeb;
 438 }
 439
 440 void
 441 Logl2Frame(struct IsdnCardState *cs, struct sk_buff *skb, char *buf, int dir)
 442 {
 443         u_char *ptr;
 444
 445         ptr = skb->data;
 446
 447         if (ptr[0] & 1 || !(ptr[1] & 1))
 448                 debugl1(cs, "Address not LAPD");
 449         else
 450                 debugl1(cs, "%s %s: %s%c (sapi %d, tei %d)",
 451                         (dir ? "<-" : "->"), buf, l2frames(ptr),
 452                         ((ptr[0] & 2) >> 1) == dir ? 'C' : 'R', ptr[0] >> 2, ptr[1] >> 1);
 453 }
 454 #endif
 455
 456 static void
 457 l1_reset(struct FsmInst *fi, int event, void *arg)
 458 {
 459         FsmChangeState(fi, ST_L1_F3);
 460 }
 461
 462 static void
 463 l1_deact_cnf(struct FsmInst *fi, int event, void *arg)
 464 {
 465         struct PStack *st = fi->userdata;
 466
 467         FsmChangeState(fi, ST_L1_F3);
 468         if (test_bit(FLG_L1_ACTIVATING, &st->l1.Flags))
 469                 st->l1.l1hw(st, HW_ENABLE | REQUEST, NULL);
 470 }
 471
 472 static void
 473 l1_deact_req_s(struct FsmInst *fi, int event, void *arg)
 474 {
 475         struct PStack *st = fi->userdata;
 476
 477         FsmChangeState(fi, ST_L1_F3);
 478         FsmRestartTimer(&st->l1.timer, 550, EV_TIMER_DEACT, NULL, 2);
 479         test_and_set_bit(FLG_L1_DEACTTIMER, &st->l1.Flags);
 480 }
 481
 482 static void
 483 l1_power_up_s(struct FsmInst *fi, int event, void *arg)
 484 {
 485         struct PStack *st = fi->userdata;
 486
 487         if (test_bit(FLG_L1_ACTIVATING, &st->l1.Flags)) {
 488                 FsmChangeState(fi, ST_L1_F4);
 489                 st->l1.l1hw(st, HW_INFO3 | REQUEST, NULL);
 490                 FsmRestartTimer(&st->l1.timer, TIMER3_VALUE, EV_TIMER3, NULL, 2);
 491                 test_and_set_bit(FLG_L1_T3RUN, &st->l1.Flags);
 492         } else
 493                 FsmChangeState(fi, ST_L1_F3);
 494 }
 495
 496 static void
 497 l1_go_F5(struct FsmInst *fi, int event, void *arg)
 498 {
 499         FsmChangeState(fi, ST_L1_F5);
 500 }
 501
 502 static void
 503 l1_go_F8(struct FsmInst *fi, int event, void *arg)
 504 {
 505         FsmChangeState(fi, ST_L1_F8);
 506 }
 507
 508 static void
 509 l1_info2_ind(struct FsmInst *fi, int event, void *arg)
 510 {
 511         struct PStack *st = fi->userdata;
 512
 513 #ifdef HISAX_UINTERFACE
 514         if (test_bit(FLG_L1_UINT, &st->l1.Flags))
 515                 FsmChangeState(fi, ST_L1_SYNC2);
 516         else
 517 #endif
 518                 FsmChangeState(fi, ST_L1_F6);
 519         st->l1.l1hw(st, HW_INFO3 | REQUEST, NULL);
 520 }
 521
 522 static void
 523 l1_info4_ind(struct FsmInst *fi, int event, void *arg)
 524 {
 525         struct PStack *st = fi->userdata;
 526
 527 #ifdef HISAX_UINTERFACE
 528         if (test_bit(FLG_L1_UINT, &st->l1.Flags))
 529                 FsmChangeState(fi, ST_L1_TRANS);
 530         else
 531 #endif
 532                 FsmChangeState(fi, ST_L1_F7);
 533         st->l1.l1hw(st, HW_INFO3 | REQUEST, NULL);
 534         if (test_and_clear_bit(FLG_L1_DEACTTIMER, &st->l1.Flags))
 535                 FsmDelTimer(&st->l1.timer, 4);
 536         if (!test_bit(FLG_L1_ACTIVATED, &st->l1.Flags)) {
 537                 if (test_and_clear_bit(FLG_L1_T3RUN, &st->l1.Flags))
 538                         FsmDelTimer(&st->l1.timer, 3);
 539                 FsmRestartTimer(&st->l1.timer, 110, EV_TIMER_ACT, NULL, 2);
 540                 test_and_set_bit(FLG_L1_ACTTIMER, &st->l1.Flags);
 541         }
 542 }
 543
 544 static void
 545 l1_timer3(struct FsmInst *fi, int event, void *arg)
 546 {
 547         struct PStack *st = fi->userdata;
 548
 549         test_and_clear_bit(FLG_L1_T3RUN, &st->l1.Flags);
 550         if (test_and_clear_bit(FLG_L1_ACTIVATING, &st->l1.Flags))
 551                 L1deactivated(st->l1.hardware);
 552
 553 #ifdef HISAX_UINTERFACE
 554         if (!test_bit(FLG_L1_UINT, &st->l1.Flags))
 555 #endif
 556         if (st->l1.l1m.state != ST_L1_F6) {
 557                 FsmChangeState(fi, ST_L1_F3);
 558                 st->l1.l1hw(st, HW_ENABLE | REQUEST, NULL);
 559         }
 560 }
 561
 562 static void
 563 l1_timer_act(struct FsmInst *fi, int event, void *arg)
 564 {
 565         struct PStack *st = fi->userdata;
 566
 567         test_and_clear_bit(FLG_L1_ACTTIMER, &st->l1.Flags);
 568         test_and_set_bit(FLG_L1_ACTIVATED, &st->l1.Flags);
 569         L1activated(st->l1.hardware);
 570 }
 571
 572 static void
 573 l1_timer_deact(struct FsmInst *fi, int event, void *arg)
 574 {
 575         struct PStack *st = fi->userdata;
 576
 577         test_and_clear_bit(FLG_L1_DEACTTIMER, &st->l1.Flags);
 578         test_and_clear_bit(FLG_L1_ACTIVATED, &st->l1.Flags);
 579         L1deactivated(st->l1.hardware);
 580         st->l1.l1hw(st, HW_DEACTIVATE | RESPONSE, NULL);
 581 }
 582
 583 static void
 584 l1_activate_s(struct FsmInst *fi, int event, void *arg)
 585 {
 586         struct PStack *st = fi->userdata;
 587
 588         st->l1.l1hw(st, HW_RESET | REQUEST, NULL);
 589 }
 590
 591 static void
 592 l1_activate_no(struct FsmInst *fi, int event, void *arg)
 593 {
 594         struct PStack *st = fi->userdata;
 595
 596         if ((!test_bit(FLG_L1_DEACTTIMER, &st->l1.Flags)) && (!test_bit(FLG_L1_T3RUN, &st->l1.Flags))) {
 597                 test_and_clear_bit(FLG_L1_ACTIVATING, &st->l1.Flags);
 598                 L1deactivated(st->l1.hardware);
 599         }
 600 }
 601
 602 static struct FsmNode L1SFnList[] __initdata =
 603 {
 604         {ST_L1_F3, EV_PH_ACTIVATE, l1_activate_s},
 605         {ST_L1_F6, EV_PH_ACTIVATE, l1_activate_no},
 606         {ST_L1_F8, EV_PH_ACTIVATE, l1_activate_no},
 607         {ST_L1_F3, EV_RESET_IND, l1_reset},
 608         {ST_L1_F4, EV_RESET_IND, l1_reset},
 609         {ST_L1_F5, EV_RESET_IND, l1_reset},
 610         {ST_L1_F6, EV_RESET_IND, l1_reset},
 611         {ST_L1_F7, EV_RESET_IND, l1_reset},
 612         {ST_L1_F8, EV_RESET_IND, l1_reset},
 613         {ST_L1_F3, EV_DEACT_CNF, l1_deact_cnf},
 614         {ST_L1_F4, EV_DEACT_CNF, l1_deact_cnf},
 615         {ST_L1_F5, EV_DEACT_CNF, l1_deact_cnf},
 616         {ST_L1_F6, EV_DEACT_CNF, l1_deact_cnf},
 617         {ST_L1_F7, EV_DEACT_CNF, l1_deact_cnf},
 618         {ST_L1_F8, EV_DEACT_CNF, l1_deact_cnf},
 619         {ST_L1_F6, EV_DEACT_IND, l1_deact_req_s},
 620         {ST_L1_F7, EV_DEACT_IND, l1_deact_req_s},
 621         {ST_L1_F8, EV_DEACT_IND, l1_deact_req_s},
 622         {ST_L1_F3, EV_POWER_UP, l1_power_up_s},
 623         {ST_L1_F4, EV_RSYNC_IND, l1_go_F5},
 624         {ST_L1_F6, EV_RSYNC_IND, l1_go_F8},
 625         {ST_L1_F7, EV_RSYNC_IND, l1_go_F8},
 626         {ST_L1_F3, EV_INFO2_IND, l1_info2_ind},
 627         {ST_L1_F4, EV_INFO2_IND, l1_info2_ind},
 628         {ST_L1_F5, EV_INFO2_IND, l1_info2_ind},
 629         {ST_L1_F7, EV_INFO2_IND, l1_info2_ind},
 630         {ST_L1_F8, EV_INFO2_IND, l1_info2_ind},
 631         {ST_L1_F3, EV_INFO4_IND, l1_info4_ind},
 632         {ST_L1_F4, EV_INFO4_IND, l1_info4_ind},
 633         {ST_L1_F5, EV_INFO4_IND, l1_info4_ind},
 634         {ST_L1_F6, EV_INFO4_IND, l1_info4_ind},
 635         {ST_L1_F8, EV_INFO4_IND, l1_info4_ind},
 636         {ST_L1_F3, EV_TIMER3, l1_timer3},
 637         {ST_L1_F4, EV_TIMER3, l1_timer3},
 638         {ST_L1_F5, EV_TIMER3, l1_timer3},
 639         {ST_L1_F6, EV_TIMER3, l1_timer3},
 640         {ST_L1_F8, EV_TIMER3, l1_timer3},
 641         {ST_L1_F7, EV_TIMER_ACT, l1_timer_act},
 642         {ST_L1_F3, EV_TIMER_DEACT, l1_timer_deact},
 643         {ST_L1_F4, EV_TIMER_DEACT, l1_timer_deact},
 644         {ST_L1_F5, EV_TIMER_DEACT, l1_timer_deact},
 645         {ST_L1_F6, EV_TIMER_DEACT, l1_timer_deact},
 646         {ST_L1_F7, EV_TIMER_DEACT, l1_timer_deact},
 647         {ST_L1_F8, EV_TIMER_DEACT, l1_timer_deact},
 648 };
 649
 650 #define L1S_FN_COUNT (sizeof(L1SFnList)/sizeof(struct FsmNode))
 651
 652 #ifdef HISAX_UINTERFACE
 653 static void
 654 l1_deact_req_u(struct FsmInst *fi, int event, void *arg)
 655 {
 656         struct PStack *st = fi->userdata;
 657
 658         FsmChangeState(fi, ST_L1_RESET);
 659         FsmRestartTimer(&st->l1.timer, 550, EV_TIMER_DEACT, NULL, 2);
 660         test_and_set_bit(FLG_L1_DEACTTIMER, &st->l1.Flags);
 661         st->l1.l1hw(st, HW_ENABLE | REQUEST, NULL);
 662 }
 663
 664 static void
 665 l1_power_up_u(struct FsmInst *fi, int event, void *arg)
 666 {
 667         struct PStack *st = fi->userdata;
 668
 669         FsmRestartTimer(&st->l1.timer, TIMER3_VALUE, EV_TIMER3, NULL, 2);
 670         test_and_set_bit(FLG_L1_T3RUN, &st->l1.Flags);
 671 }
 672
 673 static void
 674 l1_info0_ind(struct FsmInst *fi, int event, void *arg)
 675 {
 676         FsmChangeState(fi, ST_L1_DEACT);
 677 }
 678
 679 static void
 680 l1_activate_u(struct FsmInst *fi, int event, void *arg)
 681 {
 682         struct PStack *st = fi->userdata;
 683
 684         st->l1.l1hw(st, HW_INFO1 | REQUEST, NULL);
 685 }
 686
 687 static struct FsmNode L1UFnList[] __initdata =
 688 {
 689         {ST_L1_RESET, EV_DEACT_IND, l1_deact_req_u},
 690         {ST_L1_DEACT, EV_DEACT_IND, l1_deact_req_u},
 691         {ST_L1_SYNC2, EV_DEACT_IND, l1_deact_req_u},
 692         {ST_L1_TRANS, EV_DEACT_IND, l1_deact_req_u},
 693         {ST_L1_DEACT, EV_PH_ACTIVATE, l1_activate_u},
 694         {ST_L1_DEACT, EV_POWER_UP, l1_power_up_u},
 695         {ST_L1_DEACT, EV_INFO2_IND, l1_info2_ind},
 696         {ST_L1_TRANS, EV_INFO2_IND, l1_info2_ind},
 697         {ST_L1_RESET, EV_DEACT_CNF, l1_info0_ind},
 698         {ST_L1_DEACT, EV_INFO4_IND, l1_info4_ind},
 699         {ST_L1_SYNC2, EV_INFO4_IND, l1_info4_ind},
 700         {ST_L1_RESET, EV_INFO4_IND, l1_info4_ind},
 701         {ST_L1_DEACT, EV_TIMER3, l1_timer3},
 702         {ST_L1_SYNC2, EV_TIMER3, l1_timer3},
 703         {ST_L1_TRANS, EV_TIMER_ACT, l1_timer_act},
 704         {ST_L1_DEACT, EV_TIMER_DEACT, l1_timer_deact},
 705         {ST_L1_SYNC2, EV_TIMER_DEACT, l1_timer_deact},
 706         {ST_L1_RESET, EV_TIMER_DEACT, l1_timer_deact},
 707 };
 708
 709 #define L1U_FN_COUNT (sizeof(L1UFnList)/sizeof(struct FsmNode))
 710
 711 #endif
 712
 713 static void
 714 l1b_activate(struct FsmInst *fi, int event, void *arg)
 715 {
 716         struct PStack *st = fi->userdata;
 717
 718         FsmChangeState(fi, ST_L1_WAIT_ACT);
 719         FsmRestartTimer(&st->l1.timer, st->l1.delay, EV_TIMER_ACT, NULL, 2);
 720 }
 721
 722 static void
 723 l1b_deactivate(struct FsmInst *fi, int event, void *arg)
 724 {
 725         struct PStack *st = fi->userdata;
 726
 727         FsmChangeState(fi, ST_L1_WAIT_DEACT);
 728         FsmRestartTimer(&st->l1.timer, 10, EV_TIMER_DEACT, NULL, 2);
 729 }
 730
 731 static void
 732 l1b_timer_act(struct FsmInst *fi, int event, void *arg)
 733 {
 734         struct PStack *st = fi->userdata;
 735
 736         FsmChangeState(fi, ST_L1_ACTIV);
 737         st->l1.l1l2(st, PH_ACTIVATE | CONFIRM, NULL);
 738 }
 739
 740 static void
 741 l1b_timer_deact(struct FsmInst *fi, int event, void *arg)
 742 {
 743         struct PStack *st = fi->userdata;
 744
 745         FsmChangeState(fi, ST_L1_NULL);
 746         st->l2.l2l1(st, PH_DEACTIVATE | CONFIRM, NULL);
 747 }
 748
 749 static struct FsmNode L1BFnList[] __initdata =
 750 {
 751         {ST_L1_NULL, EV_PH_ACTIVATE, l1b_activate},
 752         {ST_L1_WAIT_ACT, EV_TIMER_ACT, l1b_timer_act},
 753         {ST_L1_ACTIV, EV_PH_DEACTIVATE, l1b_deactivate},
 754         {ST_L1_WAIT_DEACT, EV_TIMER_DEACT, l1b_timer_deact},
 755 };
 756
 757 #define L1B_FN_COUNT (sizeof(L1BFnList)/sizeof(struct FsmNode))
 758
 759 int __init
 760 Isdnl1New(void)
 761 {
 762         int retval;
 763
 764         l1fsm_s.state_count = L1S_STATE_COUNT;
 765         l1fsm_s.event_count = L1_EVENT_COUNT;
 766         l1fsm_s.strEvent = strL1Event;
 767         l1fsm_s.strState = strL1SState;
 768         retval = FsmNew(&l1fsm_s, L1SFnList, L1S_FN_COUNT);
 769         if (retval)
 770                 return retval;
 771
 772         l1fsm_b.state_count = L1B_STATE_COUNT;
 773         l1fsm_b.event_count = L1_EVENT_COUNT;
 774         l1fsm_b.strEvent = strL1Event;
 775         l1fsm_b.strState = strL1BState;
 776         retval = FsmNew(&l1fsm_b, L1BFnList, L1B_FN_COUNT);
 777         if (retval) {
 778                 FsmFree(&l1fsm_s);
 779                 return retval;
 780         }
 781 #ifdef HISAX_UINTERFACE
 782         l1fsm_u.state_count = L1U_STATE_COUNT;
 783         l1fsm_u.event_count = L1_EVENT_COUNT;
 784         l1fsm_u.strEvent = strL1Event;
 785         l1fsm_u.strState = strL1UState;
 786         retval = FsmNew(&l1fsm_u, L1UFnList, L1U_FN_COUNT);
 787         if (retval) {
 788                 FsmFree(&l1fsm_s);
 789                 FsmFree(&l1fsm_b);
 790                 return retval;
 791         }
 792 #endif
 793         return 0;
 794 }
 795
 796 void Isdnl1Free(void)
 797 {
 798 #ifdef HISAX_UINTERFACE
 799         FsmFree(&l1fsm_u);
 800 #endif
 801         FsmFree(&l1fsm_s);
 802         FsmFree(&l1fsm_b);
 803 }
 804
 805 static void
 806 dch_l2l1(struct PStack *st, int pr, void *arg)
 807 {
 808         struct IsdnCardState *cs = (struct IsdnCardState *) st->l1.hardware;
 809
 810         switch (pr) {
 811                 case (PH_DATA | REQUEST):
 812                 case (PH_PULL | REQUEST):
 813                 case (PH_PULL |INDICATION):
 814                         st->l1.l1hw(st, pr, arg);
 815                         break;
 816                 case (PH_ACTIVATE | REQUEST):
 817                         if (cs->debug)
 818                                 debugl1(cs, "PH_ACTIVATE_REQ %s",
 819                                         st->l1.l1m.fsm->strState[st->l1.l1m.state]);
 820                         if (test_bit(FLG_L1_ACTIVATED, &st->l1.Flags))
 821                                 st->l1.l1l2(st, PH_ACTIVATE | CONFIRM, NULL);
 822                         else {
 823                                 test_and_set_bit(FLG_L1_ACTIVATING, &st->l1.Flags);
 824                                 FsmEvent(&st->l1.l1m, EV_PH_ACTIVATE, arg);
 825                         }
 826                         break;
 827                 case (PH_TESTLOOP | REQUEST):
 828                         if (1 & (long) arg)
 829                                 debugl1(cs, "PH_TEST_LOOP B1");
 830                         if (2 & (long) arg)
 831                                 debugl1(cs, "PH_TEST_LOOP B2");
 832                         if (!(3 & (long) arg))
 833                                 debugl1(cs, "PH_TEST_LOOP DISABLED");
 834                         st->l1.l1hw(st, HW_TESTLOOP | REQUEST, arg);
 835                         break;
 836                 default:
 837                         if (cs->debug)
 838                                 debugl1(cs, "dch_l2l1 msg %04X unhandled", pr);
 839                         break;
 840         }
 841 }
 842
 843 void
 844 l1_msg(struct IsdnCardState *cs, int pr, void *arg) {
 845         struct PStack *st;
 846
 847         st = cs->stlist;
 848
 849         while (st) {
 850                 switch(pr) {
 851                         case (HW_RESET | INDICATION):
 852                                 FsmEvent(&st->l1.l1m, EV_RESET_IND, arg);
 853                                 break;
 854                         case (HW_DEACTIVATE | CONFIRM):
 855                                 FsmEvent(&st->l1.l1m, EV_DEACT_CNF, arg);
 856                                 break;
 857                         case (HW_DEACTIVATE | INDICATION):
 858                                 FsmEvent(&st->l1.l1m, EV_DEACT_IND, arg);
 859                                 break;
 860                         case (HW_POWERUP | CONFIRM):
 861                                 FsmEvent(&st->l1.l1m, EV_POWER_UP, arg);
 862                                 break;
 863                         case (HW_RSYNC | INDICATION):
 864                                 FsmEvent(&st->l1.l1m, EV_RSYNC_IND, arg);
 865                                 break;
 866                         case (HW_INFO2 | INDICATION):
 867                                 FsmEvent(&st->l1.l1m, EV_INFO2_IND, arg);
 868                                 break;
 869                         case (HW_INFO4_P8 | INDICATION):
 870                         case (HW_INFO4_P10 | INDICATION):
 871                                 FsmEvent(&st->l1.l1m, EV_INFO4_IND, arg);
 872                                 break;
 873                         default:
 874                                 if (cs->debug)
 875                                         debugl1(cs, "l1msg %04X unhandled", pr);
 876                                 break;
 877                 }
 878                 st = st->next;
 879         }
 880 }
 881
 882 void
 883 l1_msg_b(struct PStack *st, int pr, void *arg) {
 884         switch(pr) {
 885                 case (PH_ACTIVATE | REQUEST):
 886                         FsmEvent(&st->l1.l1m, EV_PH_ACTIVATE, NULL);
 887                         break;
 888                 case (PH_DEACTIVATE | REQUEST):
 889                         FsmEvent(&st->l1.l1m, EV_PH_DEACTIVATE, NULL);
 890                         break;
 891         }
 892 }
 893
 894 void
 895 setstack_HiSax(struct PStack *st, struct IsdnCardState *cs)
 896 {
 897         st->l1.hardware = cs;
 898         st->protocol = cs->protocol;
 899         st->l1.l1m.fsm = &l1fsm_s;
 900         st->l1.l1m.state = ST_L1_F3;
 901         st->l1.Flags = 0;
 902 #ifdef HISAX_UINTERFACE
 903         if (test_bit(FLG_HW_L1_UINT, &cs->HW_Flags)) {
 904                 st->l1.l1m.fsm = &l1fsm_u;
 905                 st->l1.l1m.state = ST_L1_RESET;
 906                 st->l1.Flags = FLG_L1_UINT;
 907         }
 908 #endif
 909         st->l1.l1m.debug = cs->debug;
 910         st->l1.l1m.userdata = st;
 911         st->l1.l1m.userint = 0;
 912         st->l1.l1m.printdebug = l1m_debug;
 913         FsmInitTimer(&st->l1.l1m, &st->l1.timer);
 914         setstack_tei(st);
 915         setstack_manager(st);
 916         st->l1.stlistp = &(cs->stlist);
 917         st->l2.l2l1  = dch_l2l1;
 918         if (cs->setstack_d)
 919                 cs->setstack_d(st, cs);
 920 }
 921
 922 void
 923 setstack_l1_B(struct PStack *st)
 924 {
 925         struct IsdnCardState *cs = st->l1.hardware;
 926
 927         st->l1.l1m.fsm = &l1fsm_b;
 928         st->l1.l1m.state = ST_L1_NULL;
 929         st->l1.l1m.debug = cs->debug;
 930         st->l1.l1m.userdata = st;
 931         st->l1.l1m.userint = 0;
 932         st->l1.l1m.printdebug = l1m_debug;
 933         st->l1.Flags = 0;
 934         FsmInitTimer(&st->l1.l1m, &st->l1.timer);
 935 }