Add the rt linux 4.1.3-rt3 as base
[kvmfornfv.git] / kernel / drivers / isdn / hisax / icc.c
diff --git a/kernel/drivers/isdn/hisax/icc.c b/kernel/drivers/isdn/hisax/icc.c
new file mode 100644 (file)
index 0000000..96d1df0
--- /dev/null
@@ -0,0 +1,682 @@
+/* $Id: icc.c,v 1.8.2.3 2004/01/13 14:31:25 keil Exp $
+ *
+ * ICC specific routines
+ *
+ * Author       Matt Henderson & Guy Ellis
+ * Copyright    by Traverse Technologies Pty Ltd, www.travers.com.au
+ *
+ * This software may be used and distributed according to the terms
+ * of the GNU General Public License, incorporated herein by reference.
+ *
+ * 1999.6.25 Initial implementation of routines for Siemens ISDN
+ * Communication Controller PEB 2070 based on the ISAC routines
+ * written by Karsten Keil.
+ *
+ */
+
+#include <linux/init.h>
+#include "hisax.h"
+#include "icc.h"
+// #include "arcofi.h"
+#include "isdnl1.h"
+#include <linux/interrupt.h>
+#include <linux/slab.h>
+
+#define DBUSY_TIMER_VALUE 80
+#define ARCOFI_USE 0
+
+static char *ICCVer[] =
+{"2070 A1/A3", "2070 B1", "2070 B2/B3", "2070 V2.4"};
+
+void
+ICCVersion(struct IsdnCardState *cs, char *s)
+{
+       int val;
+
+       val = cs->readisac(cs, ICC_RBCH);
+       printk(KERN_INFO "%s ICC version (%x): %s\n", s, val, ICCVer[(val >> 5) & 3]);
+}
+
+static void
+ph_command(struct IsdnCardState *cs, unsigned int command)
+{
+       if (cs->debug & L1_DEB_ISAC)
+               debugl1(cs, "ph_command %x", command);
+       cs->writeisac(cs, ICC_CIX0, (command << 2) | 3);
+}
+
+
+static void
+icc_new_ph(struct IsdnCardState *cs)
+{
+       switch (cs->dc.icc.ph_state) {
+       case (ICC_IND_EI1):
+               ph_command(cs, ICC_CMD_DI);
+               l1_msg(cs, HW_RESET | INDICATION, NULL);
+               break;
+       case (ICC_IND_DC):
+               l1_msg(cs, HW_DEACTIVATE | CONFIRM, NULL);
+               break;
+       case (ICC_IND_DR):
+               l1_msg(cs, HW_DEACTIVATE | INDICATION, NULL);
+               break;
+       case (ICC_IND_PU):
+               l1_msg(cs, HW_POWERUP | CONFIRM, NULL);
+               break;
+       case (ICC_IND_FJ):
+               l1_msg(cs, HW_RSYNC | INDICATION, NULL);
+               break;
+       case (ICC_IND_AR):
+               l1_msg(cs, HW_INFO2 | INDICATION, NULL);
+               break;
+       case (ICC_IND_AI):
+               l1_msg(cs, HW_INFO4 | INDICATION, NULL);
+               break;
+       default:
+               break;
+       }
+}
+
+static void
+icc_bh(struct work_struct *work)
+{
+       struct IsdnCardState *cs =
+               container_of(work, struct IsdnCardState, tqueue);
+       struct PStack *stptr;
+
+       if (test_and_clear_bit(D_CLEARBUSY, &cs->event)) {
+               if (cs->debug)
+                       debugl1(cs, "D-Channel Busy cleared");
+               stptr = cs->stlist;
+               while (stptr != NULL) {
+                       stptr->l1.l1l2(stptr, PH_PAUSE | CONFIRM, NULL);
+                       stptr = stptr->next;
+               }
+       }
+       if (test_and_clear_bit(D_L1STATECHANGE, &cs->event))
+               icc_new_ph(cs);
+       if (test_and_clear_bit(D_RCVBUFREADY, &cs->event))
+               DChannel_proc_rcv(cs);
+       if (test_and_clear_bit(D_XMTBUFREADY, &cs->event))
+               DChannel_proc_xmt(cs);
+#if ARCOFI_USE
+       if (!test_bit(HW_ARCOFI, &cs->HW_Flags))
+               return;
+       if (test_and_clear_bit(D_RX_MON1, &cs->event))
+               arcofi_fsm(cs, ARCOFI_RX_END, NULL);
+       if (test_and_clear_bit(D_TX_MON1, &cs->event))
+               arcofi_fsm(cs, ARCOFI_TX_END, NULL);
+#endif
+}
+
+static void
+icc_empty_fifo(struct IsdnCardState *cs, int count)
+{
+       u_char *ptr;
+
+       if ((cs->debug & L1_DEB_ISAC) && !(cs->debug & L1_DEB_ISAC_FIFO))
+               debugl1(cs, "icc_empty_fifo");
+
+       if ((cs->rcvidx + count) >= MAX_DFRAME_LEN_L1) {
+               if (cs->debug & L1_DEB_WARN)
+                       debugl1(cs, "icc_empty_fifo overrun %d",
+                               cs->rcvidx + count);
+               cs->writeisac(cs, ICC_CMDR, 0x80);
+               cs->rcvidx = 0;
+               return;
+       }
+       ptr = cs->rcvbuf + cs->rcvidx;
+       cs->rcvidx += count;
+       cs->readisacfifo(cs, ptr, count);
+       cs->writeisac(cs, ICC_CMDR, 0x80);
+       if (cs->debug & L1_DEB_ISAC_FIFO) {
+               char *t = cs->dlog;
+
+               t += sprintf(t, "icc_empty_fifo cnt %d", count);
+               QuickHex(t, ptr, count);
+               debugl1(cs, "%s", cs->dlog);
+       }
+}
+
+static void
+icc_fill_fifo(struct IsdnCardState *cs)
+{
+       int count, more;
+       u_char *ptr;
+
+       if ((cs->debug & L1_DEB_ISAC) && !(cs->debug & L1_DEB_ISAC_FIFO))
+               debugl1(cs, "icc_fill_fifo");
+
+       if (!cs->tx_skb)
+               return;
+
+       count = cs->tx_skb->len;
+       if (count <= 0)
+               return;
+
+       more = 0;
+       if (count > 32) {
+               more = !0;
+               count = 32;
+       }
+       ptr = cs->tx_skb->data;
+       skb_pull(cs->tx_skb, count);
+       cs->tx_cnt += count;
+       cs->writeisacfifo(cs, ptr, count);
+       cs->writeisac(cs, ICC_CMDR, more ? 0x8 : 0xa);
+       if (test_and_set_bit(FLG_DBUSY_TIMER, &cs->HW_Flags)) {
+               debugl1(cs, "icc_fill_fifo dbusytimer running");
+               del_timer(&cs->dbusytimer);
+       }
+       init_timer(&cs->dbusytimer);
+       cs->dbusytimer.expires = jiffies + ((DBUSY_TIMER_VALUE * HZ)/1000);
+       add_timer(&cs->dbusytimer);
+       if (cs->debug & L1_DEB_ISAC_FIFO) {
+               char *t = cs->dlog;
+
+               t += sprintf(t, "icc_fill_fifo cnt %d", count);
+               QuickHex(t, ptr, count);
+               debugl1(cs, "%s", cs->dlog);
+       }
+}
+
+void
+icc_interrupt(struct IsdnCardState *cs, u_char val)
+{
+       u_char exval, v1;
+       struct sk_buff *skb;
+       unsigned int count;
+
+       if (cs->debug & L1_DEB_ISAC)
+               debugl1(cs, "ICC interrupt %x", val);
+       if (val & 0x80) {       /* RME */
+               exval = cs->readisac(cs, ICC_RSTA);
+               if ((exval & 0x70) != 0x20) {
+                       if (exval & 0x40) {
+                               if (cs->debug & L1_DEB_WARN)
+                                       debugl1(cs, "ICC RDO");
+#ifdef ERROR_STATISTIC
+                               cs->err_rx++;
+#endif
+                       }
+                       if (!(exval & 0x20)) {
+                               if (cs->debug & L1_DEB_WARN)
+                                       debugl1(cs, "ICC CRC error");
+#ifdef ERROR_STATISTIC
+                               cs->err_crc++;
+#endif
+                       }
+                       cs->writeisac(cs, ICC_CMDR, 0x80);
+               } else {
+                       count = cs->readisac(cs, ICC_RBCL) & 0x1f;
+                       if (count == 0)
+                               count = 32;
+                       icc_empty_fifo(cs, count);
+                       if ((count = cs->rcvidx) > 0) {
+                               cs->rcvidx = 0;
+                               if (!(skb = alloc_skb(count, GFP_ATOMIC)))
+                                       printk(KERN_WARNING "HiSax: D receive out of memory\n");
+                               else {
+                                       memcpy(skb_put(skb, count), cs->rcvbuf, count);
+                                       skb_queue_tail(&cs->rq, skb);
+                               }
+                       }
+               }
+               cs->rcvidx = 0;
+               schedule_event(cs, D_RCVBUFREADY);
+       }
+       if (val & 0x40) {       /* RPF */
+               icc_empty_fifo(cs, 32);
+       }
+       if (val & 0x20) {       /* RSC */
+               /* never */
+               if (cs->debug & L1_DEB_WARN)
+                       debugl1(cs, "ICC RSC interrupt");
+       }
+       if (val & 0x10) {       /* XPR */
+               if (test_and_clear_bit(FLG_DBUSY_TIMER, &cs->HW_Flags))
+                       del_timer(&cs->dbusytimer);
+               if (test_and_clear_bit(FLG_L1_DBUSY, &cs->HW_Flags))
+                       schedule_event(cs, D_CLEARBUSY);
+               if (cs->tx_skb) {
+                       if (cs->tx_skb->len) {
+                               icc_fill_fifo(cs);
+                               goto afterXPR;
+                       } else {
+                               dev_kfree_skb_irq(cs->tx_skb);
+                               cs->tx_cnt = 0;
+                               cs->tx_skb = NULL;
+                       }
+               }
+               if ((cs->tx_skb = skb_dequeue(&cs->sq))) {
+                       cs->tx_cnt = 0;
+                       icc_fill_fifo(cs);
+               } else
+                       schedule_event(cs, D_XMTBUFREADY);
+       }
+afterXPR:
+       if (val & 0x04) {       /* CISQ */
+               exval = cs->readisac(cs, ICC_CIR0);
+               if (cs->debug & L1_DEB_ISAC)
+                       debugl1(cs, "ICC CIR0 %02X", exval);
+               if (exval & 2) {
+                       cs->dc.icc.ph_state = (exval >> 2) & 0xf;
+                       if (cs->debug & L1_DEB_ISAC)
+                               debugl1(cs, "ph_state change %x", cs->dc.icc.ph_state);
+                       schedule_event(cs, D_L1STATECHANGE);
+               }
+               if (exval & 1) {
+                       exval = cs->readisac(cs, ICC_CIR1);
+                       if (cs->debug & L1_DEB_ISAC)
+                               debugl1(cs, "ICC CIR1 %02X", exval);
+               }
+       }
+       if (val & 0x02) {       /* SIN */
+               /* never */
+               if (cs->debug & L1_DEB_WARN)
+                       debugl1(cs, "ICC SIN interrupt");
+       }
+       if (val & 0x01) {       /* EXI */
+               exval = cs->readisac(cs, ICC_EXIR);
+               if (cs->debug & L1_DEB_WARN)
+                       debugl1(cs, "ICC EXIR %02x", exval);
+               if (exval & 0x80) {  /* XMR */
+                       debugl1(cs, "ICC XMR");
+                       printk(KERN_WARNING "HiSax: ICC XMR\n");
+               }
+               if (exval & 0x40) {  /* XDU */
+                       debugl1(cs, "ICC XDU");
+                       printk(KERN_WARNING "HiSax: ICC XDU\n");
+#ifdef ERROR_STATISTIC
+                       cs->err_tx++;
+#endif
+                       if (test_and_clear_bit(FLG_DBUSY_TIMER, &cs->HW_Flags))
+                               del_timer(&cs->dbusytimer);
+                       if (test_and_clear_bit(FLG_L1_DBUSY, &cs->HW_Flags))
+                               schedule_event(cs, D_CLEARBUSY);
+                       if (cs->tx_skb) { /* Restart frame */
+                               skb_push(cs->tx_skb, cs->tx_cnt);
+                               cs->tx_cnt = 0;
+                               icc_fill_fifo(cs);
+                       } else {
+                               printk(KERN_WARNING "HiSax: ICC XDU no skb\n");
+                               debugl1(cs, "ICC XDU no skb");
+                       }
+               }
+               if (exval & 0x04) {  /* MOS */
+                       v1 = cs->readisac(cs, ICC_MOSR);
+                       if (cs->debug & L1_DEB_MONITOR)
+                               debugl1(cs, "ICC MOSR %02x", v1);
+#if ARCOFI_USE
+                       if (v1 & 0x08) {
+                               if (!cs->dc.icc.mon_rx) {
+                                       if (!(cs->dc.icc.mon_rx = kmalloc(MAX_MON_FRAME, GFP_ATOMIC))) {
+                                               if (cs->debug & L1_DEB_WARN)
+                                                       debugl1(cs, "ICC MON RX out of memory!");
+                                               cs->dc.icc.mocr &= 0xf0;
+                                               cs->dc.icc.mocr |= 0x0a;
+                                               cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
+                                               goto afterMONR0;
+                                       } else
+                                               cs->dc.icc.mon_rxp = 0;
+                               }
+                               if (cs->dc.icc.mon_rxp >= MAX_MON_FRAME) {
+                                       cs->dc.icc.mocr &= 0xf0;
+                                       cs->dc.icc.mocr |= 0x0a;
+                                       cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
+                                       cs->dc.icc.mon_rxp = 0;
+                                       if (cs->debug & L1_DEB_WARN)
+                                               debugl1(cs, "ICC MON RX overflow!");
+                                       goto afterMONR0;
+                               }
+                               cs->dc.icc.mon_rx[cs->dc.icc.mon_rxp++] = cs->readisac(cs, ICC_MOR0);
+                               if (cs->debug & L1_DEB_MONITOR)
+                                       debugl1(cs, "ICC MOR0 %02x", cs->dc.icc.mon_rx[cs->dc.icc.mon_rxp - 1]);
+                               if (cs->dc.icc.mon_rxp == 1) {
+                                       cs->dc.icc.mocr |= 0x04;
+                                       cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
+                               }
+                       }
+               afterMONR0:
+                       if (v1 & 0x80) {
+                               if (!cs->dc.icc.mon_rx) {
+                                       if (!(cs->dc.icc.mon_rx = kmalloc(MAX_MON_FRAME, GFP_ATOMIC))) {
+                                               if (cs->debug & L1_DEB_WARN)
+                                                       debugl1(cs, "ICC MON RX out of memory!");
+                                               cs->dc.icc.mocr &= 0x0f;
+                                               cs->dc.icc.mocr |= 0xa0;
+                                               cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
+                                               goto afterMONR1;
+                                       } else
+                                               cs->dc.icc.mon_rxp = 0;
+                               }
+                               if (cs->dc.icc.mon_rxp >= MAX_MON_FRAME) {
+                                       cs->dc.icc.mocr &= 0x0f;
+                                       cs->dc.icc.mocr |= 0xa0;
+                                       cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
+                                       cs->dc.icc.mon_rxp = 0;
+                                       if (cs->debug & L1_DEB_WARN)
+                                               debugl1(cs, "ICC MON RX overflow!");
+                                       goto afterMONR1;
+                               }
+                               cs->dc.icc.mon_rx[cs->dc.icc.mon_rxp++] = cs->readisac(cs, ICC_MOR1);
+                               if (cs->debug & L1_DEB_MONITOR)
+                                       debugl1(cs, "ICC MOR1 %02x", cs->dc.icc.mon_rx[cs->dc.icc.mon_rxp - 1]);
+                               cs->dc.icc.mocr |= 0x40;
+                               cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
+                       }
+               afterMONR1:
+                       if (v1 & 0x04) {
+                               cs->dc.icc.mocr &= 0xf0;
+                               cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
+                               cs->dc.icc.mocr |= 0x0a;
+                               cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
+                               schedule_event(cs, D_RX_MON0);
+                       }
+                       if (v1 & 0x40) {
+                               cs->dc.icc.mocr &= 0x0f;
+                               cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
+                               cs->dc.icc.mocr |= 0xa0;
+                               cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
+                               schedule_event(cs, D_RX_MON1);
+                       }
+                       if (v1 & 0x02) {
+                               if ((!cs->dc.icc.mon_tx) || (cs->dc.icc.mon_txc &&
+                                                            (cs->dc.icc.mon_txp >= cs->dc.icc.mon_txc) &&
+                                                            !(v1 & 0x08))) {
+                                       cs->dc.icc.mocr &= 0xf0;
+                                       cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
+                                       cs->dc.icc.mocr |= 0x0a;
+                                       cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
+                                       if (cs->dc.icc.mon_txc &&
+                                           (cs->dc.icc.mon_txp >= cs->dc.icc.mon_txc))
+                                               schedule_event(cs, D_TX_MON0);
+                                       goto AfterMOX0;
+                               }
+                               if (cs->dc.icc.mon_txc && (cs->dc.icc.mon_txp >= cs->dc.icc.mon_txc)) {
+                                       schedule_event(cs, D_TX_MON0);
+                                       goto AfterMOX0;
+                               }
+                               cs->writeisac(cs, ICC_MOX0,
+                                             cs->dc.icc.mon_tx[cs->dc.icc.mon_txp++]);
+                               if (cs->debug & L1_DEB_MONITOR)
+                                       debugl1(cs, "ICC %02x -> MOX0", cs->dc.icc.mon_tx[cs->dc.icc.mon_txp - 1]);
+                       }
+               AfterMOX0:
+                       if (v1 & 0x20) {
+                               if ((!cs->dc.icc.mon_tx) || (cs->dc.icc.mon_txc &&
+                                                            (cs->dc.icc.mon_txp >= cs->dc.icc.mon_txc) &&
+                                                            !(v1 & 0x80))) {
+                                       cs->dc.icc.mocr &= 0x0f;
+                                       cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
+                                       cs->dc.icc.mocr |= 0xa0;
+                                       cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
+                                       if (cs->dc.icc.mon_txc &&
+                                           (cs->dc.icc.mon_txp >= cs->dc.icc.mon_txc))
+                                               schedule_event(cs, D_TX_MON1);
+                                       goto AfterMOX1;
+                               }
+                               if (cs->dc.icc.mon_txc && (cs->dc.icc.mon_txp >= cs->dc.icc.mon_txc)) {
+                                       schedule_event(cs, D_TX_MON1);
+                                       goto AfterMOX1;
+                               }
+                               cs->writeisac(cs, ICC_MOX1,
+                                             cs->dc.icc.mon_tx[cs->dc.icc.mon_txp++]);
+                               if (cs->debug & L1_DEB_MONITOR)
+                                       debugl1(cs, "ICC %02x -> MOX1", cs->dc.icc.mon_tx[cs->dc.icc.mon_txp - 1]);
+                       }
+               AfterMOX1: ;
+#endif
+               }
+       }
+}
+
+static void
+ICC_l1hw(struct PStack *st, int pr, void *arg)
+{
+       struct IsdnCardState *cs = (struct IsdnCardState *) st->l1.hardware;
+       struct sk_buff *skb = arg;
+       u_long flags;
+       int  val;
+
+       switch (pr) {
+       case (PH_DATA | REQUEST):
+               if (cs->debug & DEB_DLOG_HEX)
+                       LogFrame(cs, skb->data, skb->len);
+               if (cs->debug & DEB_DLOG_VERBOSE)
+                       dlogframe(cs, skb, 0);
+               spin_lock_irqsave(&cs->lock, flags);
+               if (cs->tx_skb) {
+                       skb_queue_tail(&cs->sq, skb);
+#ifdef L2FRAME_DEBUG           /* psa */
+                       if (cs->debug & L1_DEB_LAPD)
+                               Logl2Frame(cs, skb, "PH_DATA Queued", 0);
+#endif
+               } else {
+                       cs->tx_skb = skb;
+                       cs->tx_cnt = 0;
+#ifdef L2FRAME_DEBUG           /* psa */
+                       if (cs->debug & L1_DEB_LAPD)
+                               Logl2Frame(cs, skb, "PH_DATA", 0);
+#endif
+                       icc_fill_fifo(cs);
+               }
+               spin_unlock_irqrestore(&cs->lock, flags);
+               break;
+       case (PH_PULL | INDICATION):
+               spin_lock_irqsave(&cs->lock, flags);
+               if (cs->tx_skb) {
+                       if (cs->debug & L1_DEB_WARN)
+                               debugl1(cs, " l2l1 tx_skb exist this shouldn't happen");
+                       skb_queue_tail(&cs->sq, skb);
+                       spin_unlock_irqrestore(&cs->lock, flags);
+                       break;
+               }
+               if (cs->debug & DEB_DLOG_HEX)
+                       LogFrame(cs, skb->data, skb->len);
+               if (cs->debug & DEB_DLOG_VERBOSE)
+                       dlogframe(cs, skb, 0);
+               cs->tx_skb = skb;
+               cs->tx_cnt = 0;
+#ifdef L2FRAME_DEBUG           /* psa */
+               if (cs->debug & L1_DEB_LAPD)
+                       Logl2Frame(cs, skb, "PH_DATA_PULLED", 0);
+#endif
+               icc_fill_fifo(cs);
+               spin_unlock_irqrestore(&cs->lock, flags);
+               break;
+       case (PH_PULL | REQUEST):
+#ifdef L2FRAME_DEBUG           /* psa */
+               if (cs->debug & L1_DEB_LAPD)
+                       debugl1(cs, "-> PH_REQUEST_PULL");
+#endif
+               if (!cs->tx_skb) {
+                       test_and_clear_bit(FLG_L1_PULL_REQ, &st->l1.Flags);
+                       st->l1.l1l2(st, PH_PULL | CONFIRM, NULL);
+               } else
+                       test_and_set_bit(FLG_L1_PULL_REQ, &st->l1.Flags);
+               break;
+       case (HW_RESET | REQUEST):
+               spin_lock_irqsave(&cs->lock, flags);
+               if ((cs->dc.icc.ph_state == ICC_IND_EI1) ||
+                   (cs->dc.icc.ph_state == ICC_IND_DR))
+                       ph_command(cs, ICC_CMD_DI);
+               else
+                       ph_command(cs, ICC_CMD_RES);
+               spin_unlock_irqrestore(&cs->lock, flags);
+               break;
+       case (HW_ENABLE | REQUEST):
+               spin_lock_irqsave(&cs->lock, flags);
+               ph_command(cs, ICC_CMD_DI);
+               spin_unlock_irqrestore(&cs->lock, flags);
+               break;
+       case (HW_INFO1 | REQUEST):
+               spin_lock_irqsave(&cs->lock, flags);
+               ph_command(cs, ICC_CMD_AR);
+               spin_unlock_irqrestore(&cs->lock, flags);
+               break;
+       case (HW_INFO3 | REQUEST):
+               spin_lock_irqsave(&cs->lock, flags);
+               ph_command(cs, ICC_CMD_AI);
+               spin_unlock_irqrestore(&cs->lock, flags);
+               break;
+       case (HW_TESTLOOP | REQUEST):
+               spin_lock_irqsave(&cs->lock, flags);
+               val = 0;
+               if (1 & (long) arg)
+                       val |= 0x0c;
+               if (2 & (long) arg)
+                       val |= 0x3;
+               if (test_bit(HW_IOM1, &cs->HW_Flags)) {
+                       /* IOM 1 Mode */
+                       if (!val) {
+                               cs->writeisac(cs, ICC_SPCR, 0xa);
+                               cs->writeisac(cs, ICC_ADF1, 0x2);
+                       } else {
+                               cs->writeisac(cs, ICC_SPCR, val);
+                               cs->writeisac(cs, ICC_ADF1, 0xa);
+                       }
+               } else {
+                       /* IOM 2 Mode */
+                       cs->writeisac(cs, ICC_SPCR, val);
+                       if (val)
+                               cs->writeisac(cs, ICC_ADF1, 0x8);
+                       else
+                               cs->writeisac(cs, ICC_ADF1, 0x0);
+               }
+               spin_unlock_irqrestore(&cs->lock, flags);
+               break;
+       case (HW_DEACTIVATE | RESPONSE):
+               skb_queue_purge(&cs->rq);
+               skb_queue_purge(&cs->sq);
+               if (cs->tx_skb) {
+                       dev_kfree_skb_any(cs->tx_skb);
+                       cs->tx_skb = NULL;
+               }
+               if (test_and_clear_bit(FLG_DBUSY_TIMER, &cs->HW_Flags))
+                       del_timer(&cs->dbusytimer);
+               if (test_and_clear_bit(FLG_L1_DBUSY, &cs->HW_Flags))
+                       schedule_event(cs, D_CLEARBUSY);
+               break;
+       default:
+               if (cs->debug & L1_DEB_WARN)
+                       debugl1(cs, "icc_l1hw unknown %04x", pr);
+               break;
+       }
+}
+
+static void
+setstack_icc(struct PStack *st, struct IsdnCardState *cs)
+{
+       st->l1.l1hw = ICC_l1hw;
+}
+
+static void
+DC_Close_icc(struct IsdnCardState *cs) {
+       kfree(cs->dc.icc.mon_rx);
+       cs->dc.icc.mon_rx = NULL;
+       kfree(cs->dc.icc.mon_tx);
+       cs->dc.icc.mon_tx = NULL;
+}
+
+static void
+dbusy_timer_handler(struct IsdnCardState *cs)
+{
+       struct PStack *stptr;
+       int     rbch, star;
+
+       if (test_bit(FLG_DBUSY_TIMER, &cs->HW_Flags)) {
+               rbch = cs->readisac(cs, ICC_RBCH);
+               star = cs->readisac(cs, ICC_STAR);
+               if (cs->debug)
+                       debugl1(cs, "D-Channel Busy RBCH %02x STAR %02x",
+                               rbch, star);
+               if (rbch & ICC_RBCH_XAC) { /* D-Channel Busy */
+                       test_and_set_bit(FLG_L1_DBUSY, &cs->HW_Flags);
+                       stptr = cs->stlist;
+                       while (stptr != NULL) {
+                               stptr->l1.l1l2(stptr, PH_PAUSE | INDICATION, NULL);
+                               stptr = stptr->next;
+                       }
+               } else {
+                       /* discard frame; reset transceiver */
+                       test_and_clear_bit(FLG_DBUSY_TIMER, &cs->HW_Flags);
+                       if (cs->tx_skb) {
+                               dev_kfree_skb_any(cs->tx_skb);
+                               cs->tx_cnt = 0;
+                               cs->tx_skb = NULL;
+                       } else {
+                               printk(KERN_WARNING "HiSax: ICC D-Channel Busy no skb\n");
+                               debugl1(cs, "D-Channel Busy no skb");
+                       }
+                       cs->writeisac(cs, ICC_CMDR, 0x01); /* Transmitter reset */
+                       cs->irq_func(cs->irq, cs);
+               }
+       }
+}
+
+void
+initicc(struct IsdnCardState *cs)
+{
+       cs->setstack_d = setstack_icc;
+       cs->DC_Close = DC_Close_icc;
+       cs->dc.icc.mon_tx = NULL;
+       cs->dc.icc.mon_rx = NULL;
+       cs->writeisac(cs, ICC_MASK, 0xff);
+       cs->dc.icc.mocr = 0xaa;
+       if (test_bit(HW_IOM1, &cs->HW_Flags)) {
+               /* IOM 1 Mode */
+               cs->writeisac(cs, ICC_ADF2, 0x0);
+               cs->writeisac(cs, ICC_SPCR, 0xa);
+               cs->writeisac(cs, ICC_ADF1, 0x2);
+               cs->writeisac(cs, ICC_STCR, 0x70);
+               cs->writeisac(cs, ICC_MODE, 0xc9);
+       } else {
+               /* IOM 2 Mode */
+               if (!cs->dc.icc.adf2)
+                       cs->dc.icc.adf2 = 0x80;
+               cs->writeisac(cs, ICC_ADF2, cs->dc.icc.adf2);
+               cs->writeisac(cs, ICC_SQXR, 0xa0);
+               cs->writeisac(cs, ICC_SPCR, 0x20);
+               cs->writeisac(cs, ICC_STCR, 0x70);
+               cs->writeisac(cs, ICC_MODE, 0xca);
+               cs->writeisac(cs, ICC_TIMR, 0x00);
+               cs->writeisac(cs, ICC_ADF1, 0x20);
+       }
+       ph_command(cs, ICC_CMD_RES);
+       cs->writeisac(cs, ICC_MASK, 0x0);
+       ph_command(cs, ICC_CMD_DI);
+}
+
+void
+clear_pending_icc_ints(struct IsdnCardState *cs)
+{
+       int val, eval;
+
+       val = cs->readisac(cs, ICC_STAR);
+       debugl1(cs, "ICC STAR %x", val);
+       val = cs->readisac(cs, ICC_MODE);
+       debugl1(cs, "ICC MODE %x", val);
+       val = cs->readisac(cs, ICC_ADF2);
+       debugl1(cs, "ICC ADF2 %x", val);
+       val = cs->readisac(cs, ICC_ISTA);
+       debugl1(cs, "ICC ISTA %x", val);
+       if (val & 0x01) {
+               eval = cs->readisac(cs, ICC_EXIR);
+               debugl1(cs, "ICC EXIR %x", eval);
+       }
+       val = cs->readisac(cs, ICC_CIR0);
+       debugl1(cs, "ICC CIR0 %x", val);
+       cs->dc.icc.ph_state = (val >> 2) & 0xf;
+       schedule_event(cs, D_L1STATECHANGE);
+       /* Disable all IRQ */
+       cs->writeisac(cs, ICC_MASK, 0xFF);
+}
+
+void setup_icc(struct IsdnCardState *cs)
+{
+       INIT_WORK(&cs->tqueue, icc_bh);
+       cs->dbusytimer.function = (void *) dbusy_timer_handler;
+       cs->dbusytimer.data = (long) cs;
+       init_timer(&cs->dbusytimer);
+}