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 BCState *bcs)
 319 {
 320         if (!bcs)
 321                 return;
 322         if (test_and_clear_bit(B_RCVBUFREADY, &bcs->event))
 323                 BChannel_proc_rcv(bcs);
 324         if (test_and_clear_bit(B_XMTBUFREADY, &bcs->event))
 325                 BChannel_proc_xmt(bcs);
 326         if (test_and_clear_bit(B_ACKPENDING, &bcs->event))
 327                 BChannel_proc_ack(bcs);
 328 }
 329
 330 void
 331 HiSax_addlist(struct IsdnCardState *cs,
 332               struct PStack *st)
 333 {
 334         st->next = cs->stlist;
 335         cs->stlist = st;
 336 }
 337
 338 void
 339 HiSax_rmlist(struct IsdnCardState *cs,
 340              struct PStack *st)
 341 {
 342         struct PStack *p;
 343
 344         FsmDelTimer(&st->l1.timer, 0);
 345         if (cs->stlist == st)
 346                 cs->stlist = st->next;
 347         else {
 348                 p = cs->stlist;
 349                 while (p)
 350                         if (p->next == st) {
 351                                 p->next = st->next;
 352                                 return;
 353                         } else
 354                                 p = p->next;
 355         }
 356 }
 357
 358 void
 359 init_bcstate(struct IsdnCardState *cs, int bc)
 360 {
 361         struct BCState *bcs = cs->bcs + bc;
 362
 363         bcs->cs = cs;
 364         bcs->channel = bc;
 365         INIT_WORK(&bcs->tqueue, (void *)(void *) BChannel_bh, bcs);
 366         spin_lock_init(&bcs->aclock);
 367         bcs->BC_SetStack = NULL;
 368         bcs->BC_Close = NULL;
 369         bcs->Flag = 0;
 370 }
 371
 372 #ifdef L2FRAME_DEBUG            /* psa */
 373
 374 static char *
 375 l2cmd(u_char cmd)
 376 {
 377         switch (cmd & ~0x10) {
 378                 case 1:
 379                         return "RR";
 380                 case 5:
 381                         return "RNR";
 382                 case 9:
 383                         return "REJ";
 384                 case 0x6f:
 385                         return "SABME";
 386                 case 0x0f:
 387                         return "DM";
 388                 case 3:
 389                         return "UI";
 390                 case 0x43:
 391                         return "DISC";
 392                 case 0x63:
 393                         return "UA";
 394                 case 0x87:
 395                         return "FRMR";
 396                 case 0xaf:
 397                         return "XID";
 398                 default:
 399                         if (!(cmd & 1))
 400                                 return "I";
 401                         else
 402                                 return "invalid command";
 403         }
 404 }
 405
 406 static char tmpdeb[32];
 407
 408 static char *
 409 l2frames(u_char * ptr)
 410 {
 411         switch (ptr[2] & ~0x10) {
 412                 case 1:
 413                 case 5:
 414                 case 9:
 415                         sprintf(tmpdeb, "%s[%d](nr %d)", l2cmd(ptr[2]), ptr[3] & 1, ptr[3] >> 1);
 416                         break;
 417                 case 0x6f:
 418                 case 0x0f:
 419                 case 3:
 420                 case 0x43:
 421                 case 0x63:
 422                 case 0x87:
 423                 case 0xaf:
 424                         sprintf(tmpdeb, "%s[%d]", l2cmd(ptr[2]), (ptr[2] & 0x10) >> 4);
 425                         break;
 426                 default:
 427                         if (!(ptr[2] & 1)) {
 428                                 sprintf(tmpdeb, "I[%d](ns %d, nr %d)", ptr[3] & 1, ptr[2] >> 1, ptr[3] >> 1);
 429                                 break;
 430                         } else
 431                                 return "invalid command";
 432         }
 433
 434
 435         return tmpdeb;
 436 }
 437
 438 void
 439 Logl2Frame(struct IsdnCardState *cs, struct sk_buff *skb, char *buf, int dir)
 440 {
 441         u_char *ptr;
 442
 443         ptr = skb->data;
 444
 445         if (ptr[0] & 1 || !(ptr[1] & 1))
 446                 debugl1(cs, "Address not LAPD");
 447         else
 448                 debugl1(cs, "%s %s: %s%c (sapi %d, tei %d)",
 449                         (dir ? "<-" : "->"), buf, l2frames(ptr),
 450                         ((ptr[0] & 2) >> 1) == dir ? 'C' : 'R', ptr[0] >> 2, ptr[1] >> 1);
 451 }
 452 #endif
 453
 454 static void
 455 l1_reset(struct FsmInst *fi, int event, void *arg)
 456 {
 457         FsmChangeState(fi, ST_L1_F3);
 458 }
 459
 460 static void
 461 l1_deact_cnf(struct FsmInst *fi, int event, void *arg)
 462 {
 463         struct PStack *st = fi->userdata;
 464
 465         FsmChangeState(fi, ST_L1_F3);
 466         if (test_bit(FLG_L1_ACTIVATING, &st->l1.Flags))
 467                 st->l1.l1hw(st, HW_ENABLE | REQUEST, NULL);
 468 }
 469
 470 static void
 471 l1_deact_req_s(struct FsmInst *fi, int event, void *arg)
 472 {
 473         struct PStack *st = fi->userdata;
 474
 475         FsmChangeState(fi, ST_L1_F3);
 476         FsmRestartTimer(&st->l1.timer, 550, EV_TIMER_DEACT, NULL, 2);
 477         test_and_set_bit(FLG_L1_DEACTTIMER, &st->l1.Flags);
 478 }
 479
 480 static void
 481 l1_power_up_s(struct FsmInst *fi, int event, void *arg)
 482 {
 483         struct PStack *st = fi->userdata;
 484
 485         if (test_bit(FLG_L1_ACTIVATING, &st->l1.Flags)) {
 486                 FsmChangeState(fi, ST_L1_F4);
 487                 st->l1.l1hw(st, HW_INFO3 | REQUEST, NULL);
 488                 FsmRestartTimer(&st->l1.timer, TIMER3_VALUE, EV_TIMER3, NULL, 2);
 489                 test_and_set_bit(FLG_L1_T3RUN, &st->l1.Flags);
 490         } else
 491                 FsmChangeState(fi, ST_L1_F3);
 492 }
 493
 494 static void
 495 l1_go_F5(struct FsmInst *fi, int event, void *arg)
 496 {
 497         FsmChangeState(fi, ST_L1_F5);
 498 }
 499
 500 static void
 501 l1_go_F8(struct FsmInst *fi, int event, void *arg)
 502 {
 503         FsmChangeState(fi, ST_L1_F8);
 504 }
 505
 506 static void
 507 l1_info2_ind(struct FsmInst *fi, int event, void *arg)
 508 {
 509         struct PStack *st = fi->userdata;
 510
 511 #ifdef HISAX_UINTERFACE
 512         if (test_bit(FLG_L1_UINT, &st->l1.Flags))
 513                 FsmChangeState(fi, ST_L1_SYNC2);
 514         else
 515 #endif
 516                 FsmChangeState(fi, ST_L1_F6);
 517         st->l1.l1hw(st, HW_INFO3 | REQUEST, NULL);
 518 }
 519
 520 static void
 521 l1_info4_ind(struct FsmInst *fi, int event, void *arg)
 522 {
 523         struct PStack *st = fi->userdata;
 524
 525 #ifdef HISAX_UINTERFACE
 526         if (test_bit(FLG_L1_UINT, &st->l1.Flags))
 527                 FsmChangeState(fi, ST_L1_TRANS);
 528         else
 529 #endif
 530                 FsmChangeState(fi, ST_L1_F7);
 531         st->l1.l1hw(st, HW_INFO3 | REQUEST, NULL);
 532         if (test_and_clear_bit(FLG_L1_DEACTTIMER, &st->l1.Flags))
 533                 FsmDelTimer(&st->l1.timer, 4);
 534         if (!test_bit(FLG_L1_ACTIVATED, &st->l1.Flags)) {
 535                 if (test_and_clear_bit(FLG_L1_T3RUN, &st->l1.Flags))
 536                         FsmDelTimer(&st->l1.timer, 3);
 537                 FsmRestartTimer(&st->l1.timer, 110, EV_TIMER_ACT, NULL, 2);
 538                 test_and_set_bit(FLG_L1_ACTTIMER, &st->l1.Flags);
 539         }
 540 }
 541
 542 static void
 543 l1_timer3(struct FsmInst *fi, int event, void *arg)
 544 {
 545         struct PStack *st = fi->userdata;
 546
 547         test_and_clear_bit(FLG_L1_T3RUN, &st->l1.Flags);
 548         if (test_and_clear_bit(FLG_L1_ACTIVATING, &st->l1.Flags))
 549                 L1deactivated(st->l1.hardware);
 550
 551 #ifdef HISAX_UINTERFACE
 552         if (!test_bit(FLG_L1_UINT, &st->l1.Flags))
 553 #endif
 554         if (st->l1.l1m.state != ST_L1_F6) {
 555                 FsmChangeState(fi, ST_L1_F3);
 556                 st->l1.l1hw(st, HW_ENABLE | REQUEST, NULL);
 557         }
 558 }
 559
 560 static void
 561 l1_timer_act(struct FsmInst *fi, int event, void *arg)
 562 {
 563         struct PStack *st = fi->userdata;
 564
 565         test_and_clear_bit(FLG_L1_ACTTIMER, &st->l1.Flags);
 566         test_and_set_bit(FLG_L1_ACTIVATED, &st->l1.Flags);
 567         L1activated(st->l1.hardware);
 568 }
 569
 570 static void
 571 l1_timer_deact(struct FsmInst *fi, int event, void *arg)
 572 {
 573         struct PStack *st = fi->userdata;
 574
 575         test_and_clear_bit(FLG_L1_DEACTTIMER, &st->l1.Flags);
 576         test_and_clear_bit(FLG_L1_ACTIVATED, &st->l1.Flags);
 577         L1deactivated(st->l1.hardware);
 578         st->l1.l1hw(st, HW_DEACTIVATE | RESPONSE, NULL);
 579 }
 580
 581 static void
 582 l1_activate_s(struct FsmInst *fi, int event, void *arg)
 583 {
 584         struct PStack *st = fi->userdata;
 585
 586         st->l1.l1hw(st, HW_RESET | REQUEST, NULL);
 587 }
 588
 589 static void
 590 l1_activate_no(struct FsmInst *fi, int event, void *arg)
 591 {
 592         struct PStack *st = fi->userdata;
 593
 594         if ((!test_bit(FLG_L1_DEACTTIMER, &st->l1.Flags)) && (!test_bit(FLG_L1_T3RUN, &st->l1.Flags))) {
 595                 test_and_clear_bit(FLG_L1_ACTIVATING, &st->l1.Flags);
 596                 L1deactivated(st->l1.hardware);
 597         }
 598 }
 599
 600 static struct FsmNode L1SFnList[] __initdata =
 601 {
 602         {ST_L1_F3, EV_PH_ACTIVATE, l1_activate_s},
 603         {ST_L1_F6, EV_PH_ACTIVATE, l1_activate_no},
 604         {ST_L1_F8, EV_PH_ACTIVATE, l1_activate_no},
 605         {ST_L1_F3, EV_RESET_IND, l1_reset},
 606         {ST_L1_F4, EV_RESET_IND, l1_reset},
 607         {ST_L1_F5, EV_RESET_IND, l1_reset},
 608         {ST_L1_F6, EV_RESET_IND, l1_reset},
 609         {ST_L1_F7, EV_RESET_IND, l1_reset},
 610         {ST_L1_F8, EV_RESET_IND, l1_reset},
 611         {ST_L1_F3, EV_DEACT_CNF, l1_deact_cnf},
 612         {ST_L1_F4, EV_DEACT_CNF, l1_deact_cnf},
 613         {ST_L1_F5, EV_DEACT_CNF, l1_deact_cnf},
 614         {ST_L1_F6, EV_DEACT_CNF, l1_deact_cnf},
 615         {ST_L1_F7, EV_DEACT_CNF, l1_deact_cnf},
 616         {ST_L1_F8, EV_DEACT_CNF, l1_deact_cnf},
 617         {ST_L1_F6, EV_DEACT_IND, l1_deact_req_s},
 618         {ST_L1_F7, EV_DEACT_IND, l1_deact_req_s},
 619         {ST_L1_F8, EV_DEACT_IND, l1_deact_req_s},
 620         {ST_L1_F3, EV_POWER_UP, l1_power_up_s},
 621         {ST_L1_F4, EV_RSYNC_IND, l1_go_F5},
 622         {ST_L1_F6, EV_RSYNC_IND, l1_go_F8},
 623         {ST_L1_F7, EV_RSYNC_IND, l1_go_F8},
 624         {ST_L1_F3, EV_INFO2_IND, l1_info2_ind},
 625         {ST_L1_F4, EV_INFO2_IND, l1_info2_ind},
 626         {ST_L1_F5, EV_INFO2_IND, l1_info2_ind},
 627         {ST_L1_F7, EV_INFO2_IND, l1_info2_ind},
 628         {ST_L1_F8, EV_INFO2_IND, l1_info2_ind},
 629         {ST_L1_F3, EV_INFO4_IND, l1_info4_ind},
 630         {ST_L1_F4, EV_INFO4_IND, l1_info4_ind},
 631         {ST_L1_F5, EV_INFO4_IND, l1_info4_ind},
 632         {ST_L1_F6, EV_INFO4_IND, l1_info4_ind},
 633         {ST_L1_F8, EV_INFO4_IND, l1_info4_ind},
 634         {ST_L1_F3, EV_TIMER3, l1_timer3},
 635         {ST_L1_F4, EV_TIMER3, l1_timer3},
 636         {ST_L1_F5, EV_TIMER3, l1_timer3},
 637         {ST_L1_F6, EV_TIMER3, l1_timer3},
 638         {ST_L1_F8, EV_TIMER3, l1_timer3},
 639         {ST_L1_F7, EV_TIMER_ACT, l1_timer_act},
 640         {ST_L1_F3, EV_TIMER_DEACT, l1_timer_deact},
 641         {ST_L1_F4, EV_TIMER_DEACT, l1_timer_deact},
 642         {ST_L1_F5, EV_TIMER_DEACT, l1_timer_deact},
 643         {ST_L1_F6, EV_TIMER_DEACT, l1_timer_deact},
 644         {ST_L1_F7, EV_TIMER_DEACT, l1_timer_deact},
 645         {ST_L1_F8, EV_TIMER_DEACT, l1_timer_deact},
 646 };
 647
 648 #define L1S_FN_COUNT (sizeof(L1SFnList)/sizeof(struct FsmNode))
 649
 650 #ifdef HISAX_UINTERFACE
 651 static void
 652 l1_deact_req_u(struct FsmInst *fi, int event, void *arg)
 653 {
 654         struct PStack *st = fi->userdata;
 655
 656         FsmChangeState(fi, ST_L1_RESET);
 657         FsmRestartTimer(&st->l1.timer, 550, EV_TIMER_DEACT, NULL, 2);
 658         test_and_set_bit(FLG_L1_DEACTTIMER, &st->l1.Flags);
 659         st->l1.l1hw(st, HW_ENABLE | REQUEST, NULL);
 660 }
 661
 662 static void
 663 l1_power_up_u(struct FsmInst *fi, int event, void *arg)
 664 {
 665         struct PStack *st = fi->userdata;
 666
 667         FsmRestartTimer(&st->l1.timer, TIMER3_VALUE, EV_TIMER3, NULL, 2);
 668         test_and_set_bit(FLG_L1_T3RUN, &st->l1.Flags);
 669 }
 670
 671 static void
 672 l1_info0_ind(struct FsmInst *fi, int event, void *arg)
 673 {
 674         FsmChangeState(fi, ST_L1_DEACT);
 675 }
 676
 677 static void
 678 l1_activate_u(struct FsmInst *fi, int event, void *arg)
 679 {
 680         struct PStack *st = fi->userdata;
 681
 682         st->l1.l1hw(st, HW_INFO1 | REQUEST, NULL);
 683 }
 684
 685 static struct FsmNode L1UFnList[] __initdata =
 686 {
 687         {ST_L1_RESET, EV_DEACT_IND, l1_deact_req_u},
 688         {ST_L1_DEACT, EV_DEACT_IND, l1_deact_req_u},
 689         {ST_L1_SYNC2, EV_DEACT_IND, l1_deact_req_u},
 690         {ST_L1_TRANS, EV_DEACT_IND, l1_deact_req_u},
 691         {ST_L1_DEACT, EV_PH_ACTIVATE, l1_activate_u},
 692         {ST_L1_DEACT, EV_POWER_UP, l1_power_up_u},
 693         {ST_L1_DEACT, EV_INFO2_IND, l1_info2_ind},
 694         {ST_L1_TRANS, EV_INFO2_IND, l1_info2_ind},
 695         {ST_L1_RESET, EV_DEACT_CNF, l1_info0_ind},
 696         {ST_L1_DEACT, EV_INFO4_IND, l1_info4_ind},
 697         {ST_L1_SYNC2, EV_INFO4_IND, l1_info4_ind},
 698         {ST_L1_RESET, EV_INFO4_IND, l1_info4_ind},
 699         {ST_L1_DEACT, EV_TIMER3, l1_timer3},
 700         {ST_L1_SYNC2, EV_TIMER3, l1_timer3},
 701         {ST_L1_TRANS, EV_TIMER_ACT, l1_timer_act},
 702         {ST_L1_DEACT, EV_TIMER_DEACT, l1_timer_deact},
 703         {ST_L1_SYNC2, EV_TIMER_DEACT, l1_timer_deact},
 704         {ST_L1_RESET, EV_TIMER_DEACT, l1_timer_deact},
 705 };
 706
 707 #define L1U_FN_COUNT (sizeof(L1UFnList)/sizeof(struct FsmNode))
 708
 709 #endif
 710
 711 static void
 712 l1b_activate(struct FsmInst *fi, int event, void *arg)
 713 {
 714         struct PStack *st = fi->userdata;
 715
 716         FsmChangeState(fi, ST_L1_WAIT_ACT);
 717         FsmRestartTimer(&st->l1.timer, st->l1.delay, EV_TIMER_ACT, NULL, 2);
 718 }
 719
 720 static void
 721 l1b_deactivate(struct FsmInst *fi, int event, void *arg)
 722 {
 723         struct PStack *st = fi->userdata;
 724
 725         FsmChangeState(fi, ST_L1_WAIT_DEACT);
 726         FsmRestartTimer(&st->l1.timer, 10, EV_TIMER_DEACT, NULL, 2);
 727 }
 728
 729 static void
 730 l1b_timer_act(struct FsmInst *fi, int event, void *arg)
 731 {
 732         struct PStack *st = fi->userdata;
 733
 734         FsmChangeState(fi, ST_L1_ACTIV);
 735         st->l1.l1l2(st, PH_ACTIVATE | CONFIRM, NULL);
 736 }
 737
 738 static void
 739 l1b_timer_deact(struct FsmInst *fi, int event, void *arg)
 740 {
 741         struct PStack *st = fi->userdata;
 742
 743         FsmChangeState(fi, ST_L1_NULL);
 744         st->l2.l2l1(st, PH_DEACTIVATE | CONFIRM, NULL);
 745 }
 746
 747 static struct FsmNode L1BFnList[] __initdata =
 748 {
 749         {ST_L1_NULL, EV_PH_ACTIVATE, l1b_activate},
 750         {ST_L1_WAIT_ACT, EV_TIMER_ACT, l1b_timer_act},
 751         {ST_L1_ACTIV, EV_PH_DEACTIVATE, l1b_deactivate},
 752         {ST_L1_WAIT_DEACT, EV_TIMER_DEACT, l1b_timer_deact},
 753 };
 754
 755 #define L1B_FN_COUNT (sizeof(L1BFnList)/sizeof(struct FsmNode))
 756
 757 int __init
 758 Isdnl1New(void)
 759 {
 760         int retval;
 761
 762         l1fsm_s.state_count = L1S_STATE_COUNT;
 763         l1fsm_s.event_count = L1_EVENT_COUNT;
 764         l1fsm_s.strEvent = strL1Event;
 765         l1fsm_s.strState = strL1SState;
 766         retval = FsmNew(&l1fsm_s, L1SFnList, L1S_FN_COUNT);
 767         if (retval)
 768                 return retval;
 769
 770         l1fsm_b.state_count = L1B_STATE_COUNT;
 771         l1fsm_b.event_count = L1_EVENT_COUNT;
 772         l1fsm_b.strEvent = strL1Event;
 773         l1fsm_b.strState = strL1BState;
 774         retval = FsmNew(&l1fsm_b, L1BFnList, L1B_FN_COUNT);
 775         if (retval) {
 776                 FsmFree(&l1fsm_s);
 777                 return retval;
 778         }
 779 #ifdef HISAX_UINTERFACE
 780         l1fsm_u.state_count = L1U_STATE_COUNT;
 781         l1fsm_u.event_count = L1_EVENT_COUNT;
 782         l1fsm_u.strEvent = strL1Event;
 783         l1fsm_u.strState = strL1UState;
 784         retval = FsmNew(&l1fsm_u, L1UFnList, L1U_FN_COUNT);
 785         if (retval) {
 786                 FsmFree(&l1fsm_s);
 787                 FsmFree(&l1fsm_b);
 788                 return retval;
 789         }
 790 #endif
 791         return 0;
 792 }
 793
 794 void Isdnl1Free(void)
 795 {
 796 #ifdef HISAX_UINTERFACE
 797         FsmFree(&l1fsm_u);
 798 #endif
 799         FsmFree(&l1fsm_s);
 800         FsmFree(&l1fsm_b);
 801 }
 802
 803 static void
 804 dch_l2l1(struct PStack *st, int pr, void *arg)
 805 {
 806         struct IsdnCardState *cs = (struct IsdnCardState *) st->l1.hardware;
 807
 808         switch (pr) {
 809                 case (PH_DATA | REQUEST):
 810                 case (PH_PULL | REQUEST):
 811                 case (PH_PULL |INDICATION):
 812                         st->l1.l1hw(st, pr, arg);
 813                         break;
 814                 case (PH_ACTIVATE | REQUEST):
 815                         if (cs->debug)
 816                                 debugl1(cs, "PH_ACTIVATE_REQ %s",
 817                                         st->l1.l1m.fsm->strState[st->l1.l1m.state]);
 818                         if (test_bit(FLG_L1_ACTIVATED, &st->l1.Flags))
 819                                 st->l1.l1l2(st, PH_ACTIVATE | CONFIRM, NULL);
 820                         else {
 821                                 test_and_set_bit(FLG_L1_ACTIVATING, &st->l1.Flags);
 822                                 FsmEvent(&st->l1.l1m, EV_PH_ACTIVATE, arg);
 823                         }
 824                         break;
 825                 case (PH_TESTLOOP | REQUEST):
 826                         if (1 & (long) arg)
 827                                 debugl1(cs, "PH_TEST_LOOP B1");
 828                         if (2 & (long) arg)
 829                                 debugl1(cs, "PH_TEST_LOOP B2");
 830                         if (!(3 & (long) arg))
 831                                 debugl1(cs, "PH_TEST_LOOP DISABLED");
 832                         st->l1.l1hw(st, HW_TESTLOOP | REQUEST, arg);
 833                         break;
 834                 default:
 835                         if (cs->debug)
 836                                 debugl1(cs, "dch_l2l1 msg %04X unhandled", pr);
 837                         break;
 838         }
 839 }
 840
 841 void
 842 l1_msg(struct IsdnCardState *cs, int pr, void *arg) {
 843         struct PStack *st;
 844
 845         st = cs->stlist;
 846
 847         while (st) {
 848                 switch(pr) {
 849                         case (HW_RESET | INDICATION):
 850                                 FsmEvent(&st->l1.l1m, EV_RESET_IND, arg);
 851                                 break;
 852                         case (HW_DEACTIVATE | CONFIRM):
 853                                 FsmEvent(&st->l1.l1m, EV_DEACT_CNF, arg);
 854                                 break;
 855                         case (HW_DEACTIVATE | INDICATION):
 856                                 FsmEvent(&st->l1.l1m, EV_DEACT_IND, arg);
 857                                 break;
 858                         case (HW_POWERUP | CONFIRM):
 859                                 FsmEvent(&st->l1.l1m, EV_POWER_UP, arg);
 860                                 break;
 861                         case (HW_RSYNC | INDICATION):
 862                                 FsmEvent(&st->l1.l1m, EV_RSYNC_IND, arg);
 863                                 break;
 864                         case (HW_INFO2 | INDICATION):
 865                                 FsmEvent(&st->l1.l1m, EV_INFO2_IND, arg);
 866                                 break;
 867                         case (HW_INFO4_P8 | INDICATION):
 868                         case (HW_INFO4_P10 | INDICATION):
 869                                 FsmEvent(&st->l1.l1m, EV_INFO4_IND, arg);
 870                                 break;
 871                         default:
 872                                 if (cs->debug)
 873                                         debugl1(cs, "l1msg %04X unhandled", pr);
 874                                 break;
 875                 }
 876                 st = st->next;
 877         }
 878 }
 879
 880 void
 881 l1_msg_b(struct PStack *st, int pr, void *arg) {
 882         switch(pr) {
 883                 case (PH_ACTIVATE | REQUEST):
 884                         FsmEvent(&st->l1.l1m, EV_PH_ACTIVATE, NULL);
 885                         break;
 886                 case (PH_DEACTIVATE | REQUEST):
 887                         FsmEvent(&st->l1.l1m, EV_PH_DEACTIVATE, NULL);
 888                         break;
 889         }
 890 }
 891
 892 void
 893 setstack_HiSax(struct PStack *st, struct IsdnCardState *cs)
 894 {
 895         st->l1.hardware = cs;
 896         st->protocol = cs->protocol;
 897         st->l1.l1m.fsm = &l1fsm_s;
 898         st->l1.l1m.state = ST_L1_F3;
 899         st->l1.Flags = 0;
 900 #ifdef HISAX_UINTERFACE
 901         if (test_bit(FLG_HW_L1_UINT, &cs->HW_Flags)) {
 902                 st->l1.l1m.fsm = &l1fsm_u;
 903                 st->l1.l1m.state = ST_L1_RESET;
 904                 st->l1.Flags = FLG_L1_UINT;
 905         }
 906 #endif
 907         st->l1.l1m.debug = cs->debug;
 908         st->l1.l1m.userdata = st;
 909         st->l1.l1m.userint = 0;
 910         st->l1.l1m.printdebug = l1m_debug;
 911         FsmInitTimer(&st->l1.l1m, &st->l1.timer);
 912         setstack_tei(st);
 913         setstack_manager(st);
 914         st->l1.stlistp = &(cs->stlist);
 915         st->l2.l2l1  = dch_l2l1;
 916         if (cs->setstack_d)
 917                 cs->setstack_d(st, cs);
 918 }
 919
 920 void
 921 setstack_l1_B(struct PStack *st)
 922 {
 923         struct IsdnCardState *cs = st->l1.hardware;
 924
 925         st->l1.l1m.fsm = &l1fsm_b;
 926         st->l1.l1m.state = ST_L1_NULL;
 927         st->l1.l1m.debug = cs->debug;
 928         st->l1.l1m.userdata = st;
 929         st->l1.l1m.userint = 0;
 930         st->l1.l1m.printdebug = l1m_debug;
 931         st->l1.Flags = 0;
 932         FsmInitTimer(&st->l1.l1m, &st->l1.timer);
 933 }