linux/drivers/isdn/hisax/icc.c
<<
>>
Prefs
   1/* $Id: icc.c,v 1.8.2.3 2004/01/13 14:31:25 keil Exp $
   2 *
   3 * ICC specific routines
   4 *
   5 * Author       Matt Henderson & Guy Ellis
   6 * Copyright    by Traverse Technologies Pty Ltd, www.travers.com.au
   7 * 
   8 * This software may be used and distributed according to the terms
   9 * of the GNU General Public License, incorporated herein by reference.
  10 *
  11 * 1999.6.25 Initial implementation of routines for Siemens ISDN
  12 * Communication Controller PEB 2070 based on the ISAC routines
  13 * written by Karsten Keil.
  14 *
  15 */
  16
  17#include <linux/init.h>
  18#include "hisax.h"
  19#include "icc.h"
  20// #include "arcofi.h"
  21#include "isdnl1.h"
  22#include <linux/interrupt.h>
  23
  24#define DBUSY_TIMER_VALUE 80
  25#define ARCOFI_USE 0
  26
  27static char *ICCVer[] =
  28{"2070 A1/A3", "2070 B1", "2070 B2/B3", "2070 V2.4"};
  29
  30void
  31ICCVersion(struct IsdnCardState *cs, char *s)
  32{
  33        int val;
  34
  35        val = cs->readisac(cs, ICC_RBCH);
  36        printk(KERN_INFO "%s ICC version (%x): %s\n", s, val, ICCVer[(val >> 5) & 3]);
  37}
  38
  39static void
  40ph_command(struct IsdnCardState *cs, unsigned int command)
  41{
  42        if (cs->debug & L1_DEB_ISAC)
  43                debugl1(cs, "ph_command %x", command);
  44        cs->writeisac(cs, ICC_CIX0, (command << 2) | 3);
  45}
  46
  47
  48static void
  49icc_new_ph(struct IsdnCardState *cs)
  50{
  51        switch (cs->dc.icc.ph_state) {
  52                case (ICC_IND_EI1):
  53                        ph_command(cs, ICC_CMD_DI);
  54                        l1_msg(cs, HW_RESET | INDICATION, NULL);
  55                        break;
  56                case (ICC_IND_DC):
  57                        l1_msg(cs, HW_DEACTIVATE | CONFIRM, NULL);
  58                        break;
  59                case (ICC_IND_DR):
  60                        l1_msg(cs, HW_DEACTIVATE | INDICATION, NULL);
  61                        break;
  62                case (ICC_IND_PU):
  63                        l1_msg(cs, HW_POWERUP | CONFIRM, NULL);
  64                        break;
  65                case (ICC_IND_FJ):
  66                        l1_msg(cs, HW_RSYNC | INDICATION, NULL);
  67                        break;
  68                case (ICC_IND_AR):
  69                        l1_msg(cs, HW_INFO2 | INDICATION, NULL);
  70                        break;
  71                case (ICC_IND_AI):
  72                        l1_msg(cs, HW_INFO4 | INDICATION, NULL);
  73                        break;
  74                default:
  75                        break;
  76        }
  77}
  78
  79static void
  80icc_bh(struct work_struct *work)
  81{
  82        struct IsdnCardState *cs =
  83                container_of(work, struct IsdnCardState, tqueue);
  84        struct PStack *stptr;
  85        
  86        if (test_and_clear_bit(D_CLEARBUSY, &cs->event)) {
  87                if (cs->debug)
  88                        debugl1(cs, "D-Channel Busy cleared");
  89                stptr = cs->stlist;
  90                while (stptr != NULL) {
  91                        stptr->l1.l1l2(stptr, PH_PAUSE | CONFIRM, NULL);
  92                        stptr = stptr->next;
  93                }
  94        }
  95        if (test_and_clear_bit(D_L1STATECHANGE, &cs->event))
  96                icc_new_ph(cs);         
  97        if (test_and_clear_bit(D_RCVBUFREADY, &cs->event))
  98                DChannel_proc_rcv(cs);
  99        if (test_and_clear_bit(D_XMTBUFREADY, &cs->event))
 100                DChannel_proc_xmt(cs);
 101#if ARCOFI_USE
 102        if (!test_bit(HW_ARCOFI, &cs->HW_Flags))
 103                return;
 104        if (test_and_clear_bit(D_RX_MON1, &cs->event))
 105                arcofi_fsm(cs, ARCOFI_RX_END, NULL);
 106        if (test_and_clear_bit(D_TX_MON1, &cs->event))
 107                arcofi_fsm(cs, ARCOFI_TX_END, NULL);
 108#endif
 109}
 110
 111static void
 112icc_empty_fifo(struct IsdnCardState *cs, int count)
 113{
 114        u_char *ptr;
 115
 116        if ((cs->debug & L1_DEB_ISAC) && !(cs->debug & L1_DEB_ISAC_FIFO))
 117                debugl1(cs, "icc_empty_fifo");
 118
 119        if ((cs->rcvidx + count) >= MAX_DFRAME_LEN_L1) {
 120                if (cs->debug & L1_DEB_WARN)
 121                        debugl1(cs, "icc_empty_fifo overrun %d",
 122                                cs->rcvidx + count);
 123                cs->writeisac(cs, ICC_CMDR, 0x80);
 124                cs->rcvidx = 0;
 125                return;
 126        }
 127        ptr = cs->rcvbuf + cs->rcvidx;
 128        cs->rcvidx += count;
 129        cs->readisacfifo(cs, ptr, count);
 130        cs->writeisac(cs, ICC_CMDR, 0x80);
 131        if (cs->debug & L1_DEB_ISAC_FIFO) {
 132                char *t = cs->dlog;
 133
 134                t += sprintf(t, "icc_empty_fifo cnt %d", count);
 135                QuickHex(t, ptr, count);
 136                debugl1(cs, cs->dlog);
 137        }
 138}
 139
 140static void
 141icc_fill_fifo(struct IsdnCardState *cs)
 142{
 143        int count, more;
 144        u_char *ptr;
 145
 146        if ((cs->debug & L1_DEB_ISAC) && !(cs->debug & L1_DEB_ISAC_FIFO))
 147                debugl1(cs, "icc_fill_fifo");
 148
 149        if (!cs->tx_skb)
 150                return;
 151
 152        count = cs->tx_skb->len;
 153        if (count <= 0)
 154                return;
 155
 156        more = 0;
 157        if (count > 32) {
 158                more = !0;
 159                count = 32;
 160        }
 161        ptr = cs->tx_skb->data;
 162        skb_pull(cs->tx_skb, count);
 163        cs->tx_cnt += count;
 164        cs->writeisacfifo(cs, ptr, count);
 165        cs->writeisac(cs, ICC_CMDR, more ? 0x8 : 0xa);
 166        if (test_and_set_bit(FLG_DBUSY_TIMER, &cs->HW_Flags)) {
 167                debugl1(cs, "icc_fill_fifo dbusytimer running");
 168                del_timer(&cs->dbusytimer);
 169        }
 170        init_timer(&cs->dbusytimer);
 171        cs->dbusytimer.expires = jiffies + ((DBUSY_TIMER_VALUE * HZ)/1000);
 172        add_timer(&cs->dbusytimer);
 173        if (cs->debug & L1_DEB_ISAC_FIFO) {
 174                char *t = cs->dlog;
 175
 176                t += sprintf(t, "icc_fill_fifo cnt %d", count);
 177                QuickHex(t, ptr, count);
 178                debugl1(cs, cs->dlog);
 179        }
 180}
 181
 182void
 183icc_interrupt(struct IsdnCardState *cs, u_char val)
 184{
 185        u_char exval, v1;
 186        struct sk_buff *skb;
 187        unsigned int count;
 188
 189        if (cs->debug & L1_DEB_ISAC)
 190                debugl1(cs, "ICC interrupt %x", val);
 191        if (val & 0x80) {       /* RME */
 192                exval = cs->readisac(cs, ICC_RSTA);
 193                if ((exval & 0x70) != 0x20) {
 194                        if (exval & 0x40) {
 195                                if (cs->debug & L1_DEB_WARN)
 196                                        debugl1(cs, "ICC RDO");
 197#ifdef ERROR_STATISTIC
 198                                cs->err_rx++;
 199#endif
 200                        }
 201                        if (!(exval & 0x20)) {
 202                                if (cs->debug & L1_DEB_WARN)
 203                                        debugl1(cs, "ICC CRC error");
 204#ifdef ERROR_STATISTIC
 205                                cs->err_crc++;
 206#endif
 207                        }
 208                        cs->writeisac(cs, ICC_CMDR, 0x80);
 209                } else {
 210                        count = cs->readisac(cs, ICC_RBCL) & 0x1f;
 211                        if (count == 0)
 212                                count = 32;
 213                        icc_empty_fifo(cs, count);
 214                        if ((count = cs->rcvidx) > 0) {
 215                                cs->rcvidx = 0;
 216                                if (!(skb = alloc_skb(count, GFP_ATOMIC)))
 217                                        printk(KERN_WARNING "HiSax: D receive out of memory\n");
 218                                else {
 219                                        memcpy(skb_put(skb, count), cs->rcvbuf, count);
 220                                        skb_queue_tail(&cs->rq, skb);
 221                                }
 222                        }
 223                }
 224                cs->rcvidx = 0;
 225                schedule_event(cs, D_RCVBUFREADY);
 226        }
 227        if (val & 0x40) {       /* RPF */
 228                icc_empty_fifo(cs, 32);
 229        }
 230        if (val & 0x20) {       /* RSC */
 231                /* never */
 232                if (cs->debug & L1_DEB_WARN)
 233                        debugl1(cs, "ICC RSC interrupt");
 234        }
 235        if (val & 0x10) {       /* XPR */
 236                if (test_and_clear_bit(FLG_DBUSY_TIMER, &cs->HW_Flags))
 237                        del_timer(&cs->dbusytimer);
 238                if (test_and_clear_bit(FLG_L1_DBUSY, &cs->HW_Flags))
 239                        schedule_event(cs, D_CLEARBUSY);
 240                if (cs->tx_skb) {
 241                        if (cs->tx_skb->len) {
 242                                icc_fill_fifo(cs);
 243                                goto afterXPR;
 244                        } else {
 245                                dev_kfree_skb_irq(cs->tx_skb);
 246                                cs->tx_cnt = 0;
 247                                cs->tx_skb = NULL;
 248                        }
 249                }
 250                if ((cs->tx_skb = skb_dequeue(&cs->sq))) {
 251                        cs->tx_cnt = 0;
 252                        icc_fill_fifo(cs);
 253                } else
 254                        schedule_event(cs, D_XMTBUFREADY);
 255        }
 256      afterXPR:
 257        if (val & 0x04) {       /* CISQ */
 258                exval = cs->readisac(cs, ICC_CIR0);
 259                if (cs->debug & L1_DEB_ISAC)
 260                        debugl1(cs, "ICC CIR0 %02X", exval );
 261                if (exval & 2) {
 262                        cs->dc.icc.ph_state = (exval >> 2) & 0xf;
 263                        if (cs->debug & L1_DEB_ISAC)
 264                                debugl1(cs, "ph_state change %x", cs->dc.icc.ph_state);
 265                        schedule_event(cs, D_L1STATECHANGE);
 266                }
 267                if (exval & 1) {
 268                        exval = cs->readisac(cs, ICC_CIR1);
 269                        if (cs->debug & L1_DEB_ISAC)
 270                                debugl1(cs, "ICC CIR1 %02X", exval );
 271                }
 272        }
 273        if (val & 0x02) {       /* SIN */
 274                /* never */
 275                if (cs->debug & L1_DEB_WARN)
 276                        debugl1(cs, "ICC SIN interrupt");
 277        }
 278        if (val & 0x01) {       /* EXI */
 279                exval = cs->readisac(cs, ICC_EXIR);
 280                if (cs->debug & L1_DEB_WARN)
 281                        debugl1(cs, "ICC EXIR %02x", exval);
 282                if (exval & 0x80) {  /* XMR */
 283                        debugl1(cs, "ICC XMR");
 284                        printk(KERN_WARNING "HiSax: ICC XMR\n");
 285                }
 286                if (exval & 0x40) {  /* XDU */
 287                        debugl1(cs, "ICC XDU");
 288                        printk(KERN_WARNING "HiSax: ICC XDU\n");
 289#ifdef ERROR_STATISTIC
 290                        cs->err_tx++;
 291#endif
 292                        if (test_and_clear_bit(FLG_DBUSY_TIMER, &cs->HW_Flags))
 293                                del_timer(&cs->dbusytimer);
 294                        if (test_and_clear_bit(FLG_L1_DBUSY, &cs->HW_Flags))
 295                                schedule_event(cs, D_CLEARBUSY);
 296                        if (cs->tx_skb) { /* Restart frame */
 297                                skb_push(cs->tx_skb, cs->tx_cnt);
 298                                cs->tx_cnt = 0;
 299                                icc_fill_fifo(cs);
 300                        } else {
 301                                printk(KERN_WARNING "HiSax: ICC XDU no skb\n");
 302                                debugl1(cs, "ICC XDU no skb");
 303                        }
 304                }
 305                if (exval & 0x04) {  /* MOS */
 306                        v1 = cs->readisac(cs, ICC_MOSR);
 307                        if (cs->debug & L1_DEB_MONITOR)
 308                                debugl1(cs, "ICC MOSR %02x", v1);
 309#if ARCOFI_USE
 310                        if (v1 & 0x08) {
 311                                if (!cs->dc.icc.mon_rx) {
 312                                        if (!(cs->dc.icc.mon_rx = kmalloc(MAX_MON_FRAME, GFP_ATOMIC))) {
 313                                                if (cs->debug & L1_DEB_WARN)
 314                                                        debugl1(cs, "ICC MON RX out of memory!");
 315                                                cs->dc.icc.mocr &= 0xf0;
 316                                                cs->dc.icc.mocr |= 0x0a;
 317                                                cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
 318                                                goto afterMONR0;
 319                                        } else
 320                                                cs->dc.icc.mon_rxp = 0;
 321                                }
 322                                if (cs->dc.icc.mon_rxp >= MAX_MON_FRAME) {
 323                                        cs->dc.icc.mocr &= 0xf0;
 324                                        cs->dc.icc.mocr |= 0x0a;
 325                                        cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
 326                                        cs->dc.icc.mon_rxp = 0;
 327                                        if (cs->debug & L1_DEB_WARN)
 328                                                debugl1(cs, "ICC MON RX overflow!");
 329                                        goto afterMONR0;
 330                                }
 331                                cs->dc.icc.mon_rx[cs->dc.icc.mon_rxp++] = cs->readisac(cs, ICC_MOR0);
 332                                if (cs->debug & L1_DEB_MONITOR)
 333                                        debugl1(cs, "ICC MOR0 %02x", cs->dc.icc.mon_rx[cs->dc.icc.mon_rxp -1]);
 334                                if (cs->dc.icc.mon_rxp == 1) {
 335                                        cs->dc.icc.mocr |= 0x04;
 336                                        cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
 337                                }
 338                        }
 339                      afterMONR0:
 340                        if (v1 & 0x80) {
 341                                if (!cs->dc.icc.mon_rx) {
 342                                        if (!(cs->dc.icc.mon_rx = kmalloc(MAX_MON_FRAME, GFP_ATOMIC))) {
 343                                                if (cs->debug & L1_DEB_WARN)
 344                                                        debugl1(cs, "ICC MON RX out of memory!");
 345                                                cs->dc.icc.mocr &= 0x0f;
 346                                                cs->dc.icc.mocr |= 0xa0;
 347                                                cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
 348                                                goto afterMONR1;
 349                                        } else
 350                                                cs->dc.icc.mon_rxp = 0;
 351                                }
 352                                if (cs->dc.icc.mon_rxp >= MAX_MON_FRAME) {
 353                                        cs->dc.icc.mocr &= 0x0f;
 354                                        cs->dc.icc.mocr |= 0xa0;
 355                                        cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
 356                                        cs->dc.icc.mon_rxp = 0;
 357                                        if (cs->debug & L1_DEB_WARN)
 358                                                debugl1(cs, "ICC MON RX overflow!");
 359                                        goto afterMONR1;
 360                                }
 361                                cs->dc.icc.mon_rx[cs->dc.icc.mon_rxp++] = cs->readisac(cs, ICC_MOR1);
 362                                if (cs->debug & L1_DEB_MONITOR)
 363                                        debugl1(cs, "ICC MOR1 %02x", cs->dc.icc.mon_rx[cs->dc.icc.mon_rxp -1]);
 364                                cs->dc.icc.mocr |= 0x40;
 365                                cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
 366                        }
 367                      afterMONR1:
 368                        if (v1 & 0x04) {
 369                                cs->dc.icc.mocr &= 0xf0;
 370                                cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
 371                                cs->dc.icc.mocr |= 0x0a;
 372                                cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
 373                                schedule_event(cs, D_RX_MON0);
 374                        }
 375                        if (v1 & 0x40) {
 376                                cs->dc.icc.mocr &= 0x0f;
 377                                cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
 378                                cs->dc.icc.mocr |= 0xa0;
 379                                cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
 380                                schedule_event(cs, D_RX_MON1);
 381                        }
 382                        if (v1 & 0x02) {
 383                                if ((!cs->dc.icc.mon_tx) || (cs->dc.icc.mon_txc && 
 384                                        (cs->dc.icc.mon_txp >= cs->dc.icc.mon_txc) && 
 385                                        !(v1 & 0x08))) {
 386                                        cs->dc.icc.mocr &= 0xf0;
 387                                        cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
 388                                        cs->dc.icc.mocr |= 0x0a;
 389                                        cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
 390                                        if (cs->dc.icc.mon_txc &&
 391                                                (cs->dc.icc.mon_txp >= cs->dc.icc.mon_txc))
 392                                                schedule_event(cs, D_TX_MON0);
 393                                        goto AfterMOX0;
 394                                }
 395                                if (cs->dc.icc.mon_txc && (cs->dc.icc.mon_txp >= cs->dc.icc.mon_txc)) {
 396                                        schedule_event(cs, D_TX_MON0);
 397                                        goto AfterMOX0;
 398                                }
 399                                cs->writeisac(cs, ICC_MOX0,
 400                                        cs->dc.icc.mon_tx[cs->dc.icc.mon_txp++]);
 401                                if (cs->debug & L1_DEB_MONITOR)
 402                                        debugl1(cs, "ICC %02x -> MOX0", cs->dc.icc.mon_tx[cs->dc.icc.mon_txp -1]);
 403                        }
 404                      AfterMOX0:
 405                        if (v1 & 0x20) {
 406                                if ((!cs->dc.icc.mon_tx) || (cs->dc.icc.mon_txc && 
 407                                        (cs->dc.icc.mon_txp >= cs->dc.icc.mon_txc) && 
 408                                        !(v1 & 0x80))) {
 409                                        cs->dc.icc.mocr &= 0x0f;
 410                                        cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
 411                                        cs->dc.icc.mocr |= 0xa0;
 412                                        cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
 413                                        if (cs->dc.icc.mon_txc &&
 414                                                (cs->dc.icc.mon_txp >= cs->dc.icc.mon_txc))
 415                                                schedule_event(cs, D_TX_MON1);
 416                                        goto AfterMOX1;
 417                                }
 418                                if (cs->dc.icc.mon_txc && (cs->dc.icc.mon_txp >= cs->dc.icc.mon_txc)) {
 419                                        schedule_event(cs, D_TX_MON1);
 420                                        goto AfterMOX1;
 421                                }
 422                                cs->writeisac(cs, ICC_MOX1,
 423                                        cs->dc.icc.mon_tx[cs->dc.icc.mon_txp++]);
 424                                if (cs->debug & L1_DEB_MONITOR)
 425                                        debugl1(cs, "ICC %02x -> MOX1", cs->dc.icc.mon_tx[cs->dc.icc.mon_txp -1]);
 426                        }
 427                      AfterMOX1:
 428#endif
 429                }
 430        }
 431}
 432
 433static void
 434ICC_l1hw(struct PStack *st, int pr, void *arg)
 435{
 436        struct IsdnCardState *cs = (struct IsdnCardState *) st->l1.hardware;
 437        struct sk_buff *skb = arg;
 438        u_long flags;
 439        int  val;
 440
 441        switch (pr) {
 442                case (PH_DATA |REQUEST):
 443                        if (cs->debug & DEB_DLOG_HEX)
 444                                LogFrame(cs, skb->data, skb->len);
 445                        if (cs->debug & DEB_DLOG_VERBOSE)
 446                                dlogframe(cs, skb, 0);
 447                        spin_lock_irqsave(&cs->lock, flags);
 448                        if (cs->tx_skb) {
 449                                skb_queue_tail(&cs->sq, skb);
 450#ifdef L2FRAME_DEBUG            /* psa */
 451                                if (cs->debug & L1_DEB_LAPD)
 452                                        Logl2Frame(cs, skb, "PH_DATA Queued", 0);
 453#endif
 454                        } else {
 455                                cs->tx_skb = skb;
 456                                cs->tx_cnt = 0;
 457#ifdef L2FRAME_DEBUG            /* psa */
 458                                if (cs->debug & L1_DEB_LAPD)
 459                                        Logl2Frame(cs, skb, "PH_DATA", 0);
 460#endif
 461                                icc_fill_fifo(cs);
 462                        }
 463                        spin_unlock_irqrestore(&cs->lock, flags);
 464                        break;
 465                case (PH_PULL |INDICATION):
 466                        spin_lock_irqsave(&cs->lock, flags);
 467                        if (cs->tx_skb) {
 468                                if (cs->debug & L1_DEB_WARN)
 469                                        debugl1(cs, " l2l1 tx_skb exist this shouldn't happen");
 470                                skb_queue_tail(&cs->sq, skb);
 471                                spin_unlock_irqrestore(&cs->lock, flags);
 472                                break;
 473                        }
 474                        if (cs->debug & DEB_DLOG_HEX)
 475                                LogFrame(cs, skb->data, skb->len);
 476                        if (cs->debug & DEB_DLOG_VERBOSE)
 477                                dlogframe(cs, skb, 0);
 478                        cs->tx_skb = skb;
 479                        cs->tx_cnt = 0;
 480#ifdef L2FRAME_DEBUG            /* psa */
 481                        if (cs->debug & L1_DEB_LAPD)
 482                                Logl2Frame(cs, skb, "PH_DATA_PULLED", 0);
 483#endif
 484                        icc_fill_fifo(cs);
 485                        spin_unlock_irqrestore(&cs->lock, flags);
 486                        break;
 487                case (PH_PULL | REQUEST):
 488#ifdef L2FRAME_DEBUG            /* psa */
 489                        if (cs->debug & L1_DEB_LAPD)
 490                                debugl1(cs, "-> PH_REQUEST_PULL");
 491#endif
 492                        if (!cs->tx_skb) {
 493                                test_and_clear_bit(FLG_L1_PULL_REQ, &st->l1.Flags);
 494                                st->l1.l1l2(st, PH_PULL | CONFIRM, NULL);
 495                        } else
 496                                test_and_set_bit(FLG_L1_PULL_REQ, &st->l1.Flags);
 497                        break;
 498                case (HW_RESET | REQUEST):
 499                        spin_lock_irqsave(&cs->lock, flags);
 500                        if ((cs->dc.icc.ph_state == ICC_IND_EI1) ||
 501                                (cs->dc.icc.ph_state == ICC_IND_DR))
 502                                ph_command(cs, ICC_CMD_DI);
 503                        else
 504                                ph_command(cs, ICC_CMD_RES);
 505                        spin_unlock_irqrestore(&cs->lock, flags);
 506                        break;
 507                case (HW_ENABLE | REQUEST):
 508                        spin_lock_irqsave(&cs->lock, flags);
 509                        ph_command(cs, ICC_CMD_DI);
 510                        spin_unlock_irqrestore(&cs->lock, flags);
 511                        break;
 512                case (HW_INFO1 | REQUEST):
 513                        spin_lock_irqsave(&cs->lock, flags);
 514                        ph_command(cs, ICC_CMD_AR);
 515                        spin_unlock_irqrestore(&cs->lock, flags);
 516                        break;
 517                case (HW_INFO3 | REQUEST):
 518                        spin_lock_irqsave(&cs->lock, flags);
 519                        ph_command(cs, ICC_CMD_AI);
 520                        spin_unlock_irqrestore(&cs->lock, flags);
 521                        break;
 522                case (HW_TESTLOOP | REQUEST):
 523                        spin_lock_irqsave(&cs->lock, flags);
 524                        val = 0;
 525                        if (1 & (long) arg)
 526                                val |= 0x0c;
 527                        if (2 & (long) arg)
 528                                val |= 0x3;
 529                        if (test_bit(HW_IOM1, &cs->HW_Flags)) {
 530                                /* IOM 1 Mode */
 531                                if (!val) {
 532                                        cs->writeisac(cs, ICC_SPCR, 0xa);
 533                                        cs->writeisac(cs, ICC_ADF1, 0x2);
 534                                } else {
 535                                        cs->writeisac(cs, ICC_SPCR, val);
 536                                        cs->writeisac(cs, ICC_ADF1, 0xa);
 537                                }
 538                        } else {
 539                                /* IOM 2 Mode */
 540                                cs->writeisac(cs, ICC_SPCR, val);
 541                                if (val)
 542                                        cs->writeisac(cs, ICC_ADF1, 0x8);
 543                                else
 544                                        cs->writeisac(cs, ICC_ADF1, 0x0);
 545                        }
 546                        spin_unlock_irqrestore(&cs->lock, flags);
 547                        break;
 548                case (HW_DEACTIVATE | RESPONSE):
 549                        skb_queue_purge(&cs->rq);
 550                        skb_queue_purge(&cs->sq);
 551                        if (cs->tx_skb) {
 552                                dev_kfree_skb_any(cs->tx_skb);
 553                                cs->tx_skb = NULL;
 554                        }
 555                        if (test_and_clear_bit(FLG_DBUSY_TIMER, &cs->HW_Flags))
 556                                del_timer(&cs->dbusytimer);
 557                        if (test_and_clear_bit(FLG_L1_DBUSY, &cs->HW_Flags))
 558                                schedule_event(cs, D_CLEARBUSY);
 559                        break;
 560                default:
 561                        if (cs->debug & L1_DEB_WARN)
 562                                debugl1(cs, "icc_l1hw unknown %04x", pr);
 563                        break;
 564        }
 565}
 566
 567static void
 568setstack_icc(struct PStack *st, struct IsdnCardState *cs)
 569{
 570        st->l1.l1hw = ICC_l1hw;
 571}
 572
 573static void
 574DC_Close_icc(struct IsdnCardState *cs) {
 575        kfree(cs->dc.icc.mon_rx);
 576        cs->dc.icc.mon_rx = NULL;
 577        kfree(cs->dc.icc.mon_tx);
 578        cs->dc.icc.mon_tx = NULL;
 579}
 580
 581static void
 582dbusy_timer_handler(struct IsdnCardState *cs)
 583{
 584        struct PStack *stptr;
 585        int     rbch, star;
 586
 587        if (test_bit(FLG_DBUSY_TIMER, &cs->HW_Flags)) {
 588                rbch = cs->readisac(cs, ICC_RBCH);
 589                star = cs->readisac(cs, ICC_STAR);
 590                if (cs->debug) 
 591                        debugl1(cs, "D-Channel Busy RBCH %02x STAR %02x",
 592                                rbch, star);
 593                if (rbch & ICC_RBCH_XAC) { /* D-Channel Busy */
 594                        test_and_set_bit(FLG_L1_DBUSY, &cs->HW_Flags);
 595                        stptr = cs->stlist;
 596                        while (stptr != NULL) {
 597                                stptr->l1.l1l2(stptr, PH_PAUSE | INDICATION, NULL);
 598                                stptr = stptr->next;
 599                        }
 600                } else {
 601                        /* discard frame; reset transceiver */
 602                        test_and_clear_bit(FLG_DBUSY_TIMER, &cs->HW_Flags);
 603                        if (cs->tx_skb) {
 604                                dev_kfree_skb_any(cs->tx_skb);
 605                                cs->tx_cnt = 0;
 606                                cs->tx_skb = NULL;
 607                        } else {
 608                                printk(KERN_WARNING "HiSax: ICC D-Channel Busy no skb\n");
 609                                debugl1(cs, "D-Channel Busy no skb");
 610                        }
 611                        cs->writeisac(cs, ICC_CMDR, 0x01); /* Transmitter reset */
 612                        cs->irq_func(cs->irq, cs);
 613                }
 614        }
 615}
 616
 617void
 618initicc(struct IsdnCardState *cs)
 619{
 620        cs->setstack_d = setstack_icc;
 621        cs->DC_Close = DC_Close_icc;
 622        cs->dc.icc.mon_tx = NULL;
 623        cs->dc.icc.mon_rx = NULL;
 624        cs->writeisac(cs, ICC_MASK, 0xff);
 625        cs->dc.icc.mocr = 0xaa;
 626        if (test_bit(HW_IOM1, &cs->HW_Flags)) {
 627                /* IOM 1 Mode */
 628                cs->writeisac(cs, ICC_ADF2, 0x0);
 629                cs->writeisac(cs, ICC_SPCR, 0xa);
 630                cs->writeisac(cs, ICC_ADF1, 0x2);
 631                cs->writeisac(cs, ICC_STCR, 0x70);
 632                cs->writeisac(cs, ICC_MODE, 0xc9);
 633        } else {
 634                /* IOM 2 Mode */
 635                if (!cs->dc.icc.adf2)
 636                        cs->dc.icc.adf2 = 0x80;
 637                cs->writeisac(cs, ICC_ADF2, cs->dc.icc.adf2);
 638                cs->writeisac(cs, ICC_SQXR, 0xa0);
 639                cs->writeisac(cs, ICC_SPCR, 0x20);
 640                cs->writeisac(cs, ICC_STCR, 0x70);
 641                cs->writeisac(cs, ICC_MODE, 0xca);
 642                cs->writeisac(cs, ICC_TIMR, 0x00);
 643                cs->writeisac(cs, ICC_ADF1, 0x20);
 644        }
 645        ph_command(cs, ICC_CMD_RES);
 646        cs->writeisac(cs, ICC_MASK, 0x0);
 647        ph_command(cs, ICC_CMD_DI);
 648}
 649
 650void
 651clear_pending_icc_ints(struct IsdnCardState *cs)
 652{
 653        int val, eval;
 654
 655        val = cs->readisac(cs, ICC_STAR);
 656        debugl1(cs, "ICC STAR %x", val);
 657        val = cs->readisac(cs, ICC_MODE);
 658        debugl1(cs, "ICC MODE %x", val);
 659        val = cs->readisac(cs, ICC_ADF2);
 660        debugl1(cs, "ICC ADF2 %x", val);
 661        val = cs->readisac(cs, ICC_ISTA);
 662        debugl1(cs, "ICC ISTA %x", val);
 663        if (val & 0x01) {
 664                eval = cs->readisac(cs, ICC_EXIR);
 665                debugl1(cs, "ICC EXIR %x", eval);
 666        }
 667        val = cs->readisac(cs, ICC_CIR0);
 668        debugl1(cs, "ICC CIR0 %x", val);
 669        cs->dc.icc.ph_state = (val >> 2) & 0xf;
 670        schedule_event(cs, D_L1STATECHANGE);
 671        /* Disable all IRQ */
 672        cs->writeisac(cs, ICC_MASK, 0xFF);
 673}
 674
 675void __devinit
 676setup_icc(struct IsdnCardState *cs)
 677{
 678        INIT_WORK(&cs->tqueue, icc_bh);
 679        cs->dbusytimer.function = (void *) dbusy_timer_handler;
 680        cs->dbusytimer.data = (long) cs;
 681        init_timer(&cs->dbusytimer);
 682}
 683