SAFE public projects git trees. - safe/jmp/linux-2.6/blob - drivers/isdn/hardware/mISDN/w6692.c

   1 /*
   2  * w6692.c     mISDN driver for Winbond w6692 based cards
   3  *
   4  * Author      Karsten Keil <kkeil@suse.de>
   5  *             based on the w6692 I4L driver from Petr Novak <petr.novak@i.cz>
   6  *
   7  * Copyright 2009  by Karsten Keil <keil@isdn4linux.de>
   8  *
   9  * This program is free software; you can redistribute it and/or modify
  10  * it under the terms of the GNU General Public License version 2 as
  11  * published by the Free Software Foundation.
  12  *
  13  * This program is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16  * GNU General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU General Public License
  19  * along with this program; if not, write to the Free Software
  20  * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  21  *
  22  */
  23
  24 #include <linux/module.h>
  25 #include <linux/pci.h>
  26 #include <linux/delay.h>
  27 #include <linux/mISDNhw.h>
  28 #include <linux/slab.h>
  29 #include "w6692.h"
  30
  31 #define W6692_REV       "2.0"
  32
  33 #define DBUSY_TIMER_VALUE       80
  34
  35 enum {
  36         W6692_ASUS,
  37         W6692_WINBOND,
  38         W6692_USR
  39 };
  40
  41 /* private data in the PCI devices list */
  42 struct w6692map {
  43         u_int   subtype;
  44         char    *name;
  45 };
  46
  47 static const struct w6692map  w6692_map[] =
  48 {
  49         {W6692_ASUS, "Dynalink/AsusCom IS64PH"},
  50         {W6692_WINBOND, "Winbond W6692"},
  51         {W6692_USR, "USR W6692"}
  52 };
  53
  54 #ifndef PCI_VENDOR_ID_USR
  55 #define PCI_VENDOR_ID_USR       0x16ec
  56 #define PCI_DEVICE_ID_USR_6692  0x3409
  57 #endif
  58
  59 struct w6692_ch {
  60         struct bchannel         bch;
  61         u32                     addr;
  62         struct timer_list       timer;
  63         u8                      b_mode;
  64 };
  65
  66 struct w6692_hw {
  67         struct list_head        list;
  68         struct pci_dev          *pdev;
  69         char                    name[MISDN_MAX_IDLEN];
  70         u32                     irq;
  71         u32                     irqcnt;
  72         u32                     addr;
  73         u32                     fmask;  /* feature mask - bit set per card nr */
  74         int                     subtype;
  75         spinlock_t              lock;   /* hw lock */
  76         u8                      imask;
  77         u8                      pctl;
  78         u8                      xaddr;
  79         u8                      xdata;
  80         u8                      state;
  81         struct w6692_ch         bc[2];
  82         struct dchannel         dch;
  83         char                    log[64];
  84 };
  85
  86 static LIST_HEAD(Cards);
  87 static DEFINE_RWLOCK(card_lock); /* protect Cards */
  88
  89 static int w6692_cnt;
  90 static int debug;
  91 static u32 led;
  92 static u32 pots;
  93
  94 static void
  95 _set_debug(struct w6692_hw *card)
  96 {
  97         card->dch.debug = debug;
  98         card->bc[0].bch.debug = debug;
  99         card->bc[1].bch.debug = debug;
 100 }
 101
 102 static int
 103 set_debug(const char *val, struct kernel_param *kp)
 104 {
 105         int ret;
 106         struct w6692_hw *card;
 107
 108         ret = param_set_uint(val, kp);
 109         if (!ret) {
 110                 read_lock(&card_lock);
 111                 list_for_each_entry(card, &Cards, list)
 112                         _set_debug(card);
 113                 read_unlock(&card_lock);
 114         }
 115         return ret;
 116 }
 117
 118 MODULE_AUTHOR("Karsten Keil");
 119 MODULE_LICENSE("GPL v2");
 120 MODULE_VERSION(W6692_REV);
 121 module_param_call(debug, set_debug, param_get_uint, &debug, S_IRUGO | S_IWUSR);
 122 MODULE_PARM_DESC(debug, "W6692 debug mask");
 123 module_param(led, uint, S_IRUGO | S_IWUSR);
 124 MODULE_PARM_DESC(led, "W6692 LED support bitmask (one bit per card)");
 125 module_param(pots, uint, S_IRUGO | S_IWUSR);
 126 MODULE_PARM_DESC(pots, "W6692 POTS support bitmask (one bit per card)");
 127
 128 static inline u8
 129 ReadW6692(struct w6692_hw *card, u8 offset)
 130 {
 131         return inb(card->addr + offset);
 132 }
 133
 134 static inline void
 135 WriteW6692(struct w6692_hw *card, u8 offset, u8 value)
 136 {
 137         outb(value, card->addr + offset);
 138 }
 139
 140 static inline u8
 141 ReadW6692B(struct w6692_ch *bc, u8 offset)
 142 {
 143         return inb(bc->addr + offset);
 144 }
 145
 146 static inline void
 147 WriteW6692B(struct w6692_ch *bc, u8 offset, u8 value)
 148 {
 149         outb(value, bc->addr + offset);
 150 }
 151
 152 static void
 153 enable_hwirq(struct w6692_hw *card)
 154 {
 155         WriteW6692(card, W_IMASK, card->imask);
 156 }
 157
 158 static void
 159 disable_hwirq(struct w6692_hw *card)
 160 {
 161         WriteW6692(card, W_IMASK, 0xff);
 162 }
 163
 164 static const char *W6692Ver[] = {"V00", "V01", "V10", "V11"};
 165
 166 static void
 167 W6692Version(struct w6692_hw *card)
 168 {
 169         int val;
 170
 171         val = ReadW6692(card, W_D_RBCH);
 172         pr_notice("%s: Winbond W6692 version: %s\n", card->name,
 173                 W6692Ver[(val >> 6) & 3]);
 174 }
 175
 176 static void
 177 w6692_led_handler(struct w6692_hw *card, int on)
 178 {
 179         if ((!(card->fmask & led)) || card->subtype == W6692_USR)
 180                 return;
 181         if (on) {
 182                 card->xdata &= 0xfb;    /*  LED ON */
 183                 WriteW6692(card, W_XDATA, card->xdata);
 184         } else {
 185                 card->xdata |= 0x04;    /*  LED OFF */
 186                 WriteW6692(card, W_XDATA, card->xdata);
 187         }
 188 }
 189
 190 static void
 191 ph_command(struct w6692_hw *card, u8 cmd)
 192 {
 193         pr_debug("%s: ph_command %x\n", card->name, cmd);
 194         WriteW6692(card, W_CIX, cmd);
 195 }
 196
 197 static void
 198 W6692_new_ph(struct w6692_hw *card)
 199 {
 200         if (card->state == W_L1CMD_RST)
 201                 ph_command(card, W_L1CMD_DRC);
 202         schedule_event(&card->dch, FLG_PHCHANGE);
 203 }
 204
 205 static void
 206 W6692_ph_bh(struct dchannel *dch)
 207 {
 208         struct w6692_hw *card = dch->hw;
 209
 210         switch (card->state) {
 211         case W_L1CMD_RST:
 212                 dch->state = 0;
 213                 l1_event(dch->l1, HW_RESET_IND);
 214                 break;
 215         case W_L1IND_CD:
 216                 dch->state = 3;
 217                 l1_event(dch->l1, HW_DEACT_CNF);
 218                 break;
 219         case W_L1IND_DRD:
 220                 dch->state = 3;
 221                 l1_event(dch->l1, HW_DEACT_IND);
 222                 break;
 223         case W_L1IND_CE:
 224                 dch->state = 4;
 225                 l1_event(dch->l1, HW_POWERUP_IND);
 226                 break;
 227         case W_L1IND_LD:
 228                 if (dch->state <= 5) {
 229                         dch->state = 5;
 230                         l1_event(dch->l1, ANYSIGNAL);
 231                 } else {
 232                         dch->state = 8;
 233                         l1_event(dch->l1, LOSTFRAMING);
 234                 }
 235                 break;
 236         case W_L1IND_ARD:
 237                 dch->state = 6;
 238                 l1_event(dch->l1, INFO2);
 239                 break;
 240         case W_L1IND_AI8:
 241                 dch->state = 7;
 242                 l1_event(dch->l1, INFO4_P8);
 243                 break;
 244         case W_L1IND_AI10:
 245                 dch->state = 7;
 246                 l1_event(dch->l1, INFO4_P10);
 247                 break;
 248         default:
 249                 pr_debug("%s: TE unknown state %02x dch state %02x\n",
 250                         card->name, card->state, dch->state);
 251                 break;
 252         }
 253         pr_debug("%s: TE newstate %02x\n", card->name, dch->state);
 254 }
 255
 256 static void
 257 W6692_empty_Dfifo(struct w6692_hw *card, int count)
 258 {
 259         struct dchannel *dch = &card->dch;
 260         u8 *ptr;
 261
 262         pr_debug("%s: empty_Dfifo %d\n", card->name, count);
 263         if (!dch->rx_skb) {
 264                 dch->rx_skb = mI_alloc_skb(card->dch.maxlen, GFP_ATOMIC);
 265                 if (!dch->rx_skb) {
 266                         pr_info("%s: D receive out of memory\n", card->name);
 267                         WriteW6692(card, W_D_CMDR, W_D_CMDR_RACK);
 268                         return;
 269                 }
 270         }
 271         if ((dch->rx_skb->len + count) >= dch->maxlen) {
 272                 pr_debug("%s: empty_Dfifo overrun %d\n", card->name,
 273                         dch->rx_skb->len + count);
 274                 WriteW6692(card, W_D_CMDR, W_D_CMDR_RACK);
 275                 return;
 276         }
 277         ptr = skb_put(dch->rx_skb, count);
 278         insb(card->addr + W_D_RFIFO, ptr, count);
 279         WriteW6692(card, W_D_CMDR, W_D_CMDR_RACK);
 280         if (debug & DEBUG_HW_DFIFO) {
 281                 snprintf(card->log, 63, "D-recv %s %d ",
 282                         card->name, count);
 283                 print_hex_dump_bytes(card->log, DUMP_PREFIX_OFFSET, ptr, count);
 284         }
 285 }
 286
 287 static void
 288 W6692_fill_Dfifo(struct w6692_hw *card)
 289 {
 290         struct dchannel *dch = &card->dch;
 291         int count;
 292         u8 *ptr;
 293         u8 cmd = W_D_CMDR_XMS;
 294
 295         pr_debug("%s: fill_Dfifo\n", card->name);
 296         if (!dch->tx_skb)
 297                 return;
 298         count = dch->tx_skb->len - dch->tx_idx;
 299         if (count <= 0)
 300                 return;
 301         if (count > W_D_FIFO_THRESH)
 302                 count = W_D_FIFO_THRESH;
 303         else
 304                 cmd |= W_D_CMDR_XME;
 305         ptr = dch->tx_skb->data + dch->tx_idx;
 306         dch->tx_idx += count;
 307         outsb(card->addr + W_D_XFIFO, ptr, count);
 308         WriteW6692(card, W_D_CMDR, cmd);
 309         if (test_and_set_bit(FLG_BUSY_TIMER, &dch->Flags)) {
 310                 pr_debug("%s: fill_Dfifo dbusytimer running\n", card->name);
 311                 del_timer(&dch->timer);
 312         }
 313         init_timer(&dch->timer);
 314         dch->timer.expires = jiffies + ((DBUSY_TIMER_VALUE * HZ)/1000);
 315         add_timer(&dch->timer);
 316         if (debug & DEBUG_HW_DFIFO) {
 317                 snprintf(card->log, 63, "D-send %s %d ",
 318                         card->name, count);
 319                 print_hex_dump_bytes(card->log, DUMP_PREFIX_OFFSET, ptr, count);
 320         }
 321 }
 322
 323 static void
 324 d_retransmit(struct w6692_hw *card)
 325 {
 326         struct dchannel *dch = &card->dch;
 327
 328         if (test_and_clear_bit(FLG_BUSY_TIMER, &dch->Flags))
 329                 del_timer(&dch->timer);
 330 #ifdef FIXME
 331         if (test_and_clear_bit(FLG_L1_BUSY, &dch->Flags))
 332                 dchannel_sched_event(dch, D_CLEARBUSY);
 333 #endif
 334         if (test_bit(FLG_TX_BUSY, &dch->Flags)) {
 335                 /* Restart frame */
 336                 dch->tx_idx = 0;
 337                 W6692_fill_Dfifo(card);
 338         } else if (dch->tx_skb) { /* should not happen */
 339                 pr_info("%s: %s without TX_BUSY\n", card->name, __func__);
 340                 test_and_set_bit(FLG_TX_BUSY, &dch->Flags);
 341                 dch->tx_idx = 0;
 342                 W6692_fill_Dfifo(card);
 343         } else {
 344                 pr_info("%s: XDU no TX_BUSY\n", card->name);
 345                 if (get_next_dframe(dch))
 346                         W6692_fill_Dfifo(card);
 347         }
 348 }
 349
 350 static void
 351 handle_rxD(struct w6692_hw *card) {
 352         u8      stat;
 353         int     count;
 354
 355         stat = ReadW6692(card, W_D_RSTA);
 356         if (stat & (W_D_RSTA_RDOV | W_D_RSTA_CRCE | W_D_RSTA_RMB)) {
 357                 if (stat & W_D_RSTA_RDOV) {
 358                         pr_debug("%s: D-channel RDOV\n", card->name);
 359 #ifdef ERROR_STATISTIC
 360                         card->dch.err_rx++;
 361 #endif
 362                 }
 363                 if (stat & W_D_RSTA_CRCE) {
 364                         pr_debug("%s: D-channel CRC error\n", card->name);
 365 #ifdef ERROR_STATISTIC
 366                         card->dch.err_crc++;
 367 #endif
 368                 }
 369                 if (stat & W_D_RSTA_RMB) {
 370                         pr_debug("%s: D-channel ABORT\n", card->name);
 371 #ifdef ERROR_STATISTIC
 372                         card->dch.err_rx++;
 373 #endif
 374                 }
 375                 if (card->dch.rx_skb)
 376                         dev_kfree_skb(card->dch.rx_skb);
 377                 card->dch.rx_skb = NULL;
 378                 WriteW6692(card, W_D_CMDR, W_D_CMDR_RACK | W_D_CMDR_RRST);
 379         } else {
 380                 count = ReadW6692(card, W_D_RBCL) & (W_D_FIFO_THRESH - 1);
 381                 if (count == 0)
 382                         count = W_D_FIFO_THRESH;
 383                 W6692_empty_Dfifo(card, count);
 384                 recv_Dchannel(&card->dch);
 385         }
 386 }
 387
 388 static void
 389 handle_txD(struct w6692_hw *card) {
 390         if (test_and_clear_bit(FLG_BUSY_TIMER, &card->dch.Flags))
 391                 del_timer(&card->dch.timer);
 392         if (card->dch.tx_skb && card->dch.tx_idx < card->dch.tx_skb->len) {
 393                 W6692_fill_Dfifo(card);
 394         } else {
 395                 if (card->dch.tx_skb)
 396                         dev_kfree_skb(card->dch.tx_skb);
 397                 if (get_next_dframe(&card->dch))
 398                         W6692_fill_Dfifo(card);
 399         }
 400 }
 401
 402 static void
 403 handle_statusD(struct w6692_hw *card)
 404 {
 405         struct dchannel *dch = &card->dch;
 406         u8 exval, v1, cir;
 407
 408         exval = ReadW6692(card, W_D_EXIR);
 409
 410         pr_debug("%s: D_EXIR %02x\n", card->name, exval);
 411         if (exval & (W_D_EXI_XDUN | W_D_EXI_XCOL)) {
 412                 /* Transmit underrun/collision */
 413                 pr_debug("%s: D-channel underrun/collision\n", card->name);
 414 #ifdef ERROR_STATISTIC
 415                 dch->err_tx++;
 416 #endif
 417                 d_retransmit(card);
 418         }
 419         if (exval & W_D_EXI_RDOV) {     /* RDOV */
 420                 pr_debug("%s: D-channel RDOV\n", card->name);
 421                 WriteW6692(card, W_D_CMDR, W_D_CMDR_RRST);
 422         }
 423         if (exval & W_D_EXI_TIN2)       /* TIN2 - never */
 424                 pr_debug("%s: spurious TIN2 interrupt\n", card->name);
 425         if (exval & W_D_EXI_MOC) {      /* MOC - not supported */
 426                 v1 = ReadW6692(card, W_MOSR);
 427                 pr_debug("%s: spurious MOC interrupt MOSR %02x\n",
 428                         card->name, v1);
 429         }
 430         if (exval & W_D_EXI_ISC) {      /* ISC - Level1 change */
 431                 cir = ReadW6692(card, W_CIR);
 432                 pr_debug("%s: ISC CIR %02X\n", card->name, cir);
 433                 if (cir & W_CIR_ICC) {
 434                         v1 = cir & W_CIR_COD_MASK;
 435                         pr_debug("%s: ph_state_change %x -> %x\n", card->name,
 436                                 dch->state, v1);
 437                         card->state = v1;
 438                         if (card->fmask & led) {
 439                                 switch (v1) {
 440                                 case W_L1IND_AI8:
 441                                 case W_L1IND_AI10:
 442                                         w6692_led_handler(card, 1);
 443                                         break;
 444                                 default:
 445                                         w6692_led_handler(card, 0);
 446                                         break;
 447                                 }
 448                         }
 449                         W6692_new_ph(card);
 450                 }
 451                 if (cir & W_CIR_SCC) {
 452                         v1 = ReadW6692(card, W_SQR);
 453                         pr_debug("%s: SCC SQR %02X\n", card->name, v1);
 454                 }
 455         }
 456         if (exval & W_D_EXI_WEXP)
 457                 pr_debug("%s: spurious WEXP interrupt!\n", card->name);
 458         if (exval & W_D_EXI_TEXP)
 459                 pr_debug("%s: spurious TEXP interrupt!\n", card->name);
 460 }
 461
 462 static void
 463 W6692_empty_Bfifo(struct w6692_ch *wch, int count)
 464 {
 465         struct w6692_hw *card = wch->bch.hw;
 466         u8 *ptr;
 467
 468         pr_debug("%s: empty_Bfifo %d\n", card->name, count);
 469         if (unlikely(wch->bch.state == ISDN_P_NONE)) {
 470                 pr_debug("%s: empty_Bfifo ISDN_P_NONE\n", card->name);
 471                 WriteW6692B(wch, W_B_CMDR, W_B_CMDR_RACK | W_B_CMDR_RACT);
 472                 if (wch->bch.rx_skb)
 473                         skb_trim(wch->bch.rx_skb, 0);
 474                 return;
 475         }
 476         if (!wch->bch.rx_skb) {
 477                 wch->bch.rx_skb = mI_alloc_skb(wch->bch.maxlen, GFP_ATOMIC);
 478                 if (unlikely(!wch->bch.rx_skb)) {
 479                         pr_info("%s: B receive out of memory\n", card->name);
 480                         WriteW6692B(wch, W_B_CMDR, W_B_CMDR_RACK |
 481                                 W_B_CMDR_RACT);
 482                         return;
 483                 }
 484         }
 485         if (wch->bch.rx_skb->len + count > wch->bch.maxlen) {
 486                 pr_debug("%s: empty_Bfifo incoming packet too large\n",
 487                         card->name);
 488                 WriteW6692B(wch, W_B_CMDR, W_B_CMDR_RACK | W_B_CMDR_RACT);
 489                 skb_trim(wch->bch.rx_skb, 0);
 490                 return;
 491         }
 492         ptr = skb_put(wch->bch.rx_skb, count);
 493         insb(wch->addr + W_B_RFIFO, ptr, count);
 494         WriteW6692B(wch, W_B_CMDR, W_B_CMDR_RACK | W_B_CMDR_RACT);
 495         if (debug & DEBUG_HW_DFIFO) {
 496                 snprintf(card->log, 63, "B%1d-recv %s %d ",
 497                         wch->bch.nr, card->name, count);
 498                 print_hex_dump_bytes(card->log, DUMP_PREFIX_OFFSET, ptr, count);
 499         }
 500 }
 501
 502 static void
 503 W6692_fill_Bfifo(struct w6692_ch *wch)
 504 {
 505         struct w6692_hw *card = wch->bch.hw;
 506         int count;
 507         u8 *ptr, cmd = W_B_CMDR_RACT | W_B_CMDR_XMS;
 508
 509         pr_debug("%s: fill Bfifo\n", card->name);
 510         if (!wch->bch.tx_skb)
 511                 return;
 512         count = wch->bch.tx_skb->len - wch->bch.tx_idx;
 513         if (count <= 0)
 514                 return;
 515         ptr = wch->bch.tx_skb->data + wch->bch.tx_idx;
 516         if (count > W_B_FIFO_THRESH)
 517                 count = W_B_FIFO_THRESH;
 518         else if (test_bit(FLG_HDLC, &wch->bch.Flags))
 519                 cmd |= W_B_CMDR_XME;
 520
 521         pr_debug("%s: fill Bfifo%d/%d\n", card->name,
 522                         count, wch->bch.tx_idx);
 523         wch->bch.tx_idx += count;
 524         outsb(wch->addr + W_B_XFIFO, ptr, count);
 525         WriteW6692B(wch, W_B_CMDR, cmd);
 526         if (debug & DEBUG_HW_DFIFO) {
 527                 snprintf(card->log, 63, "B%1d-send %s %d ",
 528                         wch->bch.nr, card->name, count);
 529                 print_hex_dump_bytes(card->log, DUMP_PREFIX_OFFSET, ptr, count);
 530         }
 531 }
 532
 533 #if 0
 534 static int
 535 setvolume(struct w6692_ch *wch, int mic, struct sk_buff *skb)
 536 {
 537         struct w6692_hw *card = wch->bch.hw;
 538         u16 *vol = (u16 *)skb->data;
 539         u8 val;
 540
 541         if ((!(card->fmask & pots)) ||
 542             !test_bit(FLG_TRANSPARENT, &wch->bch.Flags))
 543                 return -ENODEV;
 544         if (skb->len < 2)
 545                 return -EINVAL;
 546         if (*vol > 7)
 547                 return -EINVAL;
 548         val = *vol & 7;
 549         val = 7 - val;
 550         if (mic) {
 551                 val <<= 3;
 552                 card->xaddr &= 0xc7;
 553         } else {
 554                 card->xaddr &= 0xf8;
 555         }
 556         card->xaddr |= val;
 557         WriteW6692(card, W_XADDR, card->xaddr);
 558         return 0;
 559 }
 560
 561 static int
 562 enable_pots(struct w6692_ch *wch)
 563 {
 564         struct w6692_hw *card = wch->bch.hw;
 565
 566         if ((!(card->fmask & pots)) ||
 567             !test_bit(FLG_TRANSPARENT, &wch->bch.Flags))
 568                 return -ENODEV;
 569         wch->b_mode |= W_B_MODE_EPCM | W_B_MODE_BSW0;
 570         WriteW6692B(wch, W_B_MODE, wch->b_mode);
 571         WriteW6692B(wch, W_B_CMDR, W_B_CMDR_RRST | W_B_CMDR_XRST);
 572         card->pctl |= ((wch->bch.nr & 2) ? W_PCTL_PCX : 0);
 573         WriteW6692(card, W_PCTL, card->pctl);
 574         return 0;
 575 }
 576 #endif
 577
 578 static int
 579 disable_pots(struct w6692_ch *wch)
 580 {
 581         struct w6692_hw *card = wch->bch.hw;
 582
 583         if (!(card->fmask & pots))
 584                 return -ENODEV;
 585         wch->b_mode &= ~(W_B_MODE_EPCM | W_B_MODE_BSW0);
 586         WriteW6692B(wch, W_B_MODE, wch->b_mode);
 587         WriteW6692B(wch, W_B_CMDR, W_B_CMDR_RRST | W_B_CMDR_RACT |
 588                 W_B_CMDR_XRST);
 589         return 0;
 590 }
 591
 592 static int
 593 w6692_mode(struct w6692_ch *wch, u32 pr)
 594 {
 595         struct w6692_hw *card;
 596
 597         card = wch->bch.hw;
 598         pr_debug("%s: B%d protocol %x-->%x\n", card->name,
 599                 wch->bch.nr, wch->bch.state, pr);
 600         switch (pr) {
 601         case ISDN_P_NONE:
 602                 if ((card->fmask & pots) && (wch->b_mode & W_B_MODE_EPCM))
 603                         disable_pots(wch);
 604                 wch->b_mode = 0;
 605                 mISDN_clear_bchannel(&wch->bch);
 606                 WriteW6692B(wch, W_B_MODE, wch->b_mode);
 607                 WriteW6692B(wch, W_B_CMDR, W_B_CMDR_RRST | W_B_CMDR_XRST);
 608                 test_and_clear_bit(FLG_HDLC, &wch->bch.Flags);
 609                 test_and_clear_bit(FLG_TRANSPARENT, &wch->bch.Flags);
 610                 break;
 611         case ISDN_P_B_RAW:
 612                 wch->b_mode = W_B_MODE_MMS;
 613                 WriteW6692B(wch, W_B_MODE, wch->b_mode);
 614                 WriteW6692B(wch, W_B_EXIM, 0);
 615                 WriteW6692B(wch, W_B_CMDR, W_B_CMDR_RRST | W_B_CMDR_RACT |
 616                         W_B_CMDR_XRST);
 617                 test_and_set_bit(FLG_TRANSPARENT, &wch->bch.Flags);
 618                 break;
 619         case ISDN_P_B_HDLC:
 620                 wch->b_mode = W_B_MODE_ITF;
 621                 WriteW6692B(wch, W_B_MODE, wch->b_mode);
 622                 WriteW6692B(wch, W_B_ADM1, 0xff);
 623                 WriteW6692B(wch, W_B_ADM2, 0xff);
 624                 WriteW6692B(wch, W_B_EXIM, 0);
 625                 WriteW6692B(wch, W_B_CMDR, W_B_CMDR_RRST | W_B_CMDR_RACT |
 626                         W_B_CMDR_XRST);
 627                 test_and_set_bit(FLG_HDLC, &wch->bch.Flags);
 628                 break;
 629         default:
 630                 pr_info("%s: protocol %x not known\n", card->name, pr);
 631                 return -ENOPROTOOPT;
 632         }
 633         wch->bch.state = pr;
 634         return 0;
 635 }
 636
 637 static void
 638 send_next(struct w6692_ch *wch)
 639 {
 640         if (wch->bch.tx_skb && wch->bch.tx_idx < wch->bch.tx_skb->len)
 641                 W6692_fill_Bfifo(wch);
 642         else {
 643                 if (wch->bch.tx_skb) {
 644                         /* send confirm, on trans, free on hdlc. */
 645                         if (test_bit(FLG_TRANSPARENT, &wch->bch.Flags))
 646                                 confirm_Bsend(&wch->bch);
 647                         dev_kfree_skb(wch->bch.tx_skb);
 648                 }
 649                 if (get_next_bframe(&wch->bch))
 650                         W6692_fill_Bfifo(wch);
 651         }
 652 }
 653
 654 static void
 655 W6692B_interrupt(struct w6692_hw *card, int ch)
 656 {
 657         struct w6692_ch *wch = &card->bc[ch];
 658         int             count;
 659         u8              stat, star = 0;
 660
 661         stat = ReadW6692B(wch, W_B_EXIR);
 662         pr_debug("%s: B%d EXIR %02x\n", card->name, wch->bch.nr, stat);
 663         if (stat & W_B_EXI_RME) {
 664                 star = ReadW6692B(wch, W_B_STAR);
 665                 if (star & (W_B_STAR_RDOV | W_B_STAR_CRCE | W_B_STAR_RMB)) {
 666                         if ((star & W_B_STAR_RDOV) &&
 667                             test_bit(FLG_ACTIVE, &wch->bch.Flags)) {
 668                                 pr_debug("%s: B%d RDOV proto=%x\n", card->name,
 669                                         wch->bch.nr, wch->bch.state);
 670 #ifdef ERROR_STATISTIC
 671                                 wch->bch.err_rdo++;
 672 #endif
 673                         }
 674                         if (test_bit(FLG_HDLC, &wch->bch.Flags)) {
 675                                 if (star & W_B_STAR_CRCE) {
 676                                         pr_debug("%s: B%d CRC error\n",
 677                                                 card->name, wch->bch.nr);
 678 #ifdef ERROR_STATISTIC
 679                                         wch->bch.err_crc++;
 680 #endif
 681                                 }
 682                                 if (star & W_B_STAR_RMB) {
 683                                         pr_debug("%s: B%d message abort\n",
 684                                                 card->name, wch->bch.nr);
 685 #ifdef ERROR_STATISTIC
 686                                         wch->bch.err_inv++;
 687 #endif
 688                                 }
 689                         }
 690                         WriteW6692B(wch, W_B_CMDR, W_B_CMDR_RACK |
 691                                 W_B_CMDR_RRST | W_B_CMDR_RACT);
 692                         if (wch->bch.rx_skb)
 693                                 skb_trim(wch->bch.rx_skb, 0);
 694                 } else {
 695                         count = ReadW6692B(wch, W_B_RBCL) &
 696                                 (W_B_FIFO_THRESH - 1);
 697                         if (count == 0)
 698                                 count = W_B_FIFO_THRESH;
 699                         W6692_empty_Bfifo(wch, count);
 700                         recv_Bchannel(&wch->bch, 0);
 701                 }
 702         }
 703         if (stat & W_B_EXI_RMR) {
 704                 if (!(stat & W_B_EXI_RME))
 705                         star = ReadW6692B(wch, W_B_STAR);
 706                 if (star & W_B_STAR_RDOV) {
 707                         pr_debug("%s: B%d RDOV proto=%x\n", card->name,
 708                                 wch->bch.nr, wch->bch.state);
 709 #ifdef ERROR_STATISTIC
 710                         wch->bch.err_rdo++;
 711 #endif
 712                         WriteW6692B(wch, W_B_CMDR, W_B_CMDR_RACK |
 713                                 W_B_CMDR_RRST | W_B_CMDR_RACT);
 714                 } else {
 715                         W6692_empty_Bfifo(wch, W_B_FIFO_THRESH);
 716                         if (test_bit(FLG_TRANSPARENT, &wch->bch.Flags) &&
 717                             wch->bch.rx_skb && (wch->bch.rx_skb->len > 0))
 718                                 recv_Bchannel(&wch->bch, 0);
 719                 }
 720         }
 721         if (stat & W_B_EXI_RDOV) {
 722                 /* only if it is not handled yet */
 723                 if (!(star & W_B_STAR_RDOV)) {
 724                         pr_debug("%s: B%d RDOV IRQ proto=%x\n", card->name,
 725                                 wch->bch.nr, wch->bch.state);
 726 #ifdef ERROR_STATISTIC
 727                         wch->bch.err_rdo++;
 728 #endif
 729                         WriteW6692B(wch, W_B_CMDR, W_B_CMDR_RACK |
 730                                 W_B_CMDR_RRST | W_B_CMDR_RACT);
 731                 }
 732         }
 733         if (stat & W_B_EXI_XFR) {
 734                 if (!(stat & (W_B_EXI_RME | W_B_EXI_RMR))) {
 735                         star = ReadW6692B(wch, W_B_STAR);
 736                         pr_debug("%s: B%d star %02x\n", card->name,
 737                                 wch->bch.nr, star);
 738                 }
 739                 if (star & W_B_STAR_XDOW) {
 740                         pr_debug("%s: B%d XDOW proto=%x\n", card->name,
 741                                 wch->bch.nr, wch->bch.state);
 742 #ifdef ERROR_STATISTIC
 743                         wch->bch.err_xdu++;
 744 #endif
 745                         WriteW6692B(wch, W_B_CMDR, W_B_CMDR_XRST |
 746                                 W_B_CMDR_RACT);
 747                         /* resend */
 748                         if (wch->bch.tx_skb) {
 749                                 if (!test_bit(FLG_TRANSPARENT, &wch->bch.Flags))
 750                                         wch->bch.tx_idx = 0;
 751                         }
 752                 }
 753                 send_next(wch);
 754                 if (stat & W_B_EXI_XDUN)
 755                         return; /* handle XDOW only once */
 756         }
 757         if (stat & W_B_EXI_XDUN) {
 758                 pr_debug("%s: B%d XDUN proto=%x\n", card->name,
 759                         wch->bch.nr, wch->bch.state);
 760 #ifdef ERROR_STATISTIC
 761                 wch->bch.err_xdu++;
 762 #endif
 763                 WriteW6692B(wch, W_B_CMDR, W_B_CMDR_XRST | W_B_CMDR_RACT);
 764                 /* resend */
 765                 if (wch->bch.tx_skb) {
 766                         if (!test_bit(FLG_TRANSPARENT, &wch->bch.Flags))
 767                                 wch->bch.tx_idx = 0;
 768                 }
 769                 send_next(wch);
 770         }
 771 }
 772
 773 static irqreturn_t
 774 w6692_irq(int intno, void *dev_id)
 775 {
 776         struct w6692_hw *card = dev_id;
 777         u8              ista;
 778
 779         spin_lock(&card->lock);
 780         ista = ReadW6692(card, W_ISTA);
 781         if ((ista | card->imask) == card->imask) {
 782                 /* possible a shared  IRQ reqest */
 783                 spin_unlock(&card->lock);
 784                 return IRQ_NONE;
 785         }
 786         card->irqcnt++;
 787         pr_debug("%s: ista %02x\n", card->name, ista);
 788         ista &= ~card->imask;
 789         if (ista & W_INT_B1_EXI)
 790                 W6692B_interrupt(card, 0);
 791         if (ista & W_INT_B2_EXI)
 792                 W6692B_interrupt(card, 1);
 793         if (ista & W_INT_D_RME)
 794                 handle_rxD(card);
 795         if (ista & W_INT_D_RMR)
 796                 W6692_empty_Dfifo(card, W_D_FIFO_THRESH);
 797         if (ista & W_INT_D_XFR)
 798                 handle_txD(card);
 799         if (ista & W_INT_D_EXI)
 800                 handle_statusD(card);
 801         if (ista & (W_INT_XINT0 | W_INT_XINT1)) /* XINT0/1 - never */
 802                 pr_debug("%s: W6692 spurious XINT!\n", card->name);
 803 /* End IRQ Handler */
 804         spin_unlock(&card->lock);
 805         return IRQ_HANDLED;
 806 }
 807
 808 static void
 809 dbusy_timer_handler(struct dchannel *dch)
 810 {
 811         struct w6692_hw *card = dch->hw;
 812         int             rbch, star;
 813         u_long          flags;
 814
 815         if (test_bit(FLG_BUSY_TIMER, &dch->Flags)) {
 816                 spin_lock_irqsave(&card->lock, flags);
 817                 rbch = ReadW6692(card, W_D_RBCH);
 818                 star = ReadW6692(card, W_D_STAR);
 819                 pr_debug("%s: D-Channel Busy RBCH %02x STAR %02x\n",
 820                         card->name, rbch, star);
 821                 if (star & W_D_STAR_XBZ)        /* D-Channel Busy */
 822                         test_and_set_bit(FLG_L1_BUSY, &dch->Flags);
 823                 else {
 824                         /* discard frame; reset transceiver */
 825                         test_and_clear_bit(FLG_BUSY_TIMER, &dch->Flags);
 826                         if (dch->tx_idx)
 827                                 dch->tx_idx = 0;
 828                         else
 829                                 pr_info("%s: W6692 D-Channel Busy no tx_idx\n",
 830                                         card->name);
 831                         /* Transmitter reset */
 832                         WriteW6692(card, W_D_CMDR, W_D_CMDR_XRST);
 833                 }
 834                 spin_unlock_irqrestore(&card->lock, flags);
 835         }
 836 }
 837
 838 void initW6692(struct w6692_hw *card)
 839 {
 840         u8      val;
 841
 842         card->dch.timer.function = (void *)dbusy_timer_handler;
 843         card->dch.timer.data = (u_long)&card->dch;
 844         init_timer(&card->dch.timer);
 845         w6692_mode(&card->bc[0], ISDN_P_NONE);
 846         w6692_mode(&card->bc[1], ISDN_P_NONE);
 847         WriteW6692(card, W_D_CTL, 0x00);
 848         disable_hwirq(card);
 849         WriteW6692(card, W_D_SAM, 0xff);
 850         WriteW6692(card, W_D_TAM, 0xff);
 851         WriteW6692(card, W_D_MODE, W_D_MODE_RACT);
 852         card->state = W_L1CMD_RST;
 853         ph_command(card, W_L1CMD_RST);
 854         ph_command(card, W_L1CMD_ECK);
 855         /* enable all IRQ but extern */
 856         card->imask = 0x18;
 857         WriteW6692(card, W_D_EXIM, 0x00);
 858         WriteW6692B(&card->bc[0], W_B_EXIM, 0);
 859         WriteW6692B(&card->bc[1], W_B_EXIM, 0);
 860         /* Reset D-chan receiver and transmitter */
 861         WriteW6692(card, W_D_CMDR, W_D_CMDR_RRST | W_D_CMDR_XRST);
 862         /* Reset B-chan receiver and transmitter */
 863         WriteW6692B(&card->bc[0], W_B_CMDR, W_B_CMDR_RRST | W_B_CMDR_XRST);
 864         WriteW6692B(&card->bc[1], W_B_CMDR, W_B_CMDR_RRST | W_B_CMDR_XRST);
 865         /* enable peripheral */
 866         if (card->subtype == W6692_USR) {
 867                 /* seems that USR implemented some power control features
 868                  * Pin 79 is connected to the oscilator circuit so we
 869                  * have to handle it here
 870                  */
 871                 card->pctl = 0x80;
 872                 card->xdata = 0;
 873                 WriteW6692(card, W_PCTL, card->pctl);
 874                 WriteW6692(card, W_XDATA, card->xdata);
 875         } else {
 876                 card->pctl = W_PCTL_OE5 | W_PCTL_OE4 | W_PCTL_OE2 |
 877                         W_PCTL_OE1 | W_PCTL_OE0;
 878                 card->xaddr = 0x00;/* all sw off */
 879                 if (card->fmask & pots)
 880                         card->xdata |= 0x06;    /*  POWER UP/ LED OFF / ALAW */
 881                 if (card->fmask & led)
 882                         card->xdata |= 0x04;    /* LED OFF */
 883                 if ((card->fmask & pots) || (card->fmask & led)) {
 884                         WriteW6692(card, W_PCTL, card->pctl);
 885                         WriteW6692(card, W_XADDR, card->xaddr);
 886                         WriteW6692(card, W_XDATA, card->xdata);
 887                         val = ReadW6692(card, W_XADDR);
 888                         if (debug & DEBUG_HW)
 889                                 pr_notice("%s: W_XADDR=%02x\n",
 890                                         card->name, val);
 891                 }
 892         }
 893 }
 894
 895 static void
 896 reset_w6692(struct w6692_hw *card)
 897 {
 898         WriteW6692(card, W_D_CTL, W_D_CTL_SRST);
 899         mdelay(10);
 900         WriteW6692(card, W_D_CTL, 0);
 901 }
 902
 903 static int
 904 init_card(struct w6692_hw *card)
 905 {
 906         int     cnt = 3;
 907         u_long  flags;
 908
 909         spin_lock_irqsave(&card->lock, flags);
 910         disable_hwirq(card);
 911         spin_unlock_irqrestore(&card->lock, flags);
 912         if (request_irq(card->irq, w6692_irq, IRQF_SHARED, card->name, card)) {
 913                 pr_info("%s: couldn't get interrupt %d\n", card->name,
 914                         card->irq);
 915                 return -EIO;
 916         }
 917         while (cnt--) {
 918                 spin_lock_irqsave(&card->lock, flags);
 919                 initW6692(card);
 920                 enable_hwirq(card);
 921                 spin_unlock_irqrestore(&card->lock, flags);
 922                 /* Timeout 10ms */
 923                 msleep_interruptible(10);
 924                 if (debug & DEBUG_HW)
 925                         pr_notice("%s: IRQ %d count %d\n", card->name,
 926                                 card->irq, card->irqcnt);
 927                 if (!card->irqcnt) {
 928                         pr_info("%s: IRQ(%d) getting no IRQs during init %d\n",
 929                                 card->name, card->irq, 3 - cnt);
 930                         reset_w6692(card);
 931                 } else
 932                         return 0;
 933         }
 934         free_irq(card->irq, card);
 935         return -EIO;
 936 }
 937
 938 static int
 939 w6692_l2l1B(struct mISDNchannel *ch, struct sk_buff *skb)
 940 {
 941         struct bchannel *bch = container_of(ch, struct bchannel, ch);
 942         struct w6692_ch *bc = container_of(bch, struct w6692_ch, bch);
 943         struct w6692_hw *card = bch->hw;
 944         int ret = -EINVAL;
 945         struct mISDNhead *hh = mISDN_HEAD_P(skb);
 946         u32 id;
 947         u_long flags;
 948
 949         switch (hh->prim) {
 950         case PH_DATA_REQ:
 951                 spin_lock_irqsave(&card->lock, flags);
 952                 ret = bchannel_senddata(bch, skb);
 953                 if (ret > 0) { /* direct TX */
 954                         id = hh->id; /* skb can be freed */
 955                         ret = 0;
 956                         W6692_fill_Bfifo(bc);
 957                         spin_unlock_irqrestore(&card->lock, flags);
 958                         if (!test_bit(FLG_TRANSPARENT, &bch->Flags))
 959                                 queue_ch_frame(ch, PH_DATA_CNF, id, NULL);
 960                 } else
 961                         spin_unlock_irqrestore(&card->lock, flags);
 962                 return ret;
 963         case PH_ACTIVATE_REQ:
 964                 spin_lock_irqsave(&card->lock, flags);
 965                 if (!test_and_set_bit(FLG_ACTIVE, &bch->Flags))
 966                         ret = w6692_mode(bc, ch->protocol);
 967                 else
 968                         ret = 0;
 969                 spin_unlock_irqrestore(&card->lock, flags);
 970                 if (!ret)
 971                         _queue_data(ch, PH_ACTIVATE_IND, MISDN_ID_ANY, 0,
 972                                 NULL, GFP_KERNEL);
 973                 break;
 974         case PH_DEACTIVATE_REQ:
 975                 spin_lock_irqsave(&card->lock, flags);
 976                 mISDN_clear_bchannel(bch);
 977                 w6692_mode(bc, ISDN_P_NONE);
 978                 spin_unlock_irqrestore(&card->lock, flags);
 979                 _queue_data(ch, PH_DEACTIVATE_IND, MISDN_ID_ANY, 0,
 980                         NULL, GFP_KERNEL);
 981                 ret = 0;
 982                 break;
 983         default:
 984                 pr_info("%s: %s unknown prim(%x,%x)\n",
 985                         card->name, __func__, hh->prim, hh->id);
 986                 ret = -EINVAL;
 987         }
 988         if (!ret)
 989                 dev_kfree_skb(skb);
 990         return ret;
 991 }
 992
 993 static int
 994 channel_bctrl(struct bchannel *bch, struct mISDN_ctrl_req *cq)
 995 {
 996         int     ret = 0;
 997
 998         switch (cq->op) {
 999         case MISDN_CTRL_GETOP:
1000                 cq->op = 0;
1001                 break;
1002         /* Nothing implemented yet */
1003         case MISDN_CTRL_FILL_EMPTY:
1004         default:
1005                 pr_info("%s: unknown Op %x\n", __func__, cq->op);
1006                 ret = -EINVAL;
1007                 break;
1008         }
1009         return ret;
1010 }
1011
1012 static int
1013 open_bchannel(struct w6692_hw *card, struct channel_req *rq)
1014 {
1015         struct bchannel *bch;
1016
1017         if (rq->adr.channel > 2)
1018                 return -EINVAL;
1019         if (rq->protocol == ISDN_P_NONE)
1020                 return -EINVAL;
1021         bch = &card->bc[rq->adr.channel - 1].bch;
1022         if (test_and_set_bit(FLG_OPEN, &bch->Flags))
1023                 return -EBUSY; /* b-channel can be only open once */
1024         test_and_clear_bit(FLG_FILLEMPTY, &bch->Flags);
1025         bch->ch.protocol = rq->protocol;
1026         rq->ch = &bch->ch;
1027         return 0;
1028 }
1029
1030 static int
1031 channel_ctrl(struct w6692_hw *card, struct mISDN_ctrl_req *cq)
1032 {
1033         int     ret = 0;
1034
1035         switch (cq->op) {
1036         case MISDN_CTRL_GETOP:
1037                 cq->op = 0;
1038                 break;
1039         default:
1040                 pr_info("%s: unknown CTRL OP %x\n", card->name, cq->op);
1041                 ret = -EINVAL;
1042                 break;
1043         }
1044         return ret;
1045 }
1046
1047 static int
1048 w6692_bctrl(struct mISDNchannel *ch, u32 cmd, void *arg)
1049 {
1050         struct bchannel *bch = container_of(ch, struct bchannel, ch);
1051         struct w6692_ch *bc = container_of(bch, struct w6692_ch, bch);
1052         struct w6692_hw *card = bch->hw;
1053         int ret = -EINVAL;
1054         u_long flags;
1055
1056         pr_debug("%s: %s cmd:%x %p\n", card->name, __func__, cmd, arg);
1057         switch (cmd) {
1058         case CLOSE_CHANNEL:
1059                 test_and_clear_bit(FLG_OPEN, &bch->Flags);
1060                 if (test_bit(FLG_ACTIVE, &bch->Flags)) {
1061                         spin_lock_irqsave(&card->lock, flags);
1062                         mISDN_freebchannel(bch);
1063                         w6692_mode(bc, ISDN_P_NONE);
1064                         spin_unlock_irqrestore(&card->lock, flags);
1065                 } else {
1066                         skb_queue_purge(&bch->rqueue);
1067                         bch->rcount = 0;
1068                 }
1069                 ch->protocol = ISDN_P_NONE;
1070                 ch->peer = NULL;
1071                 module_put(THIS_MODULE);
1072                 ret = 0;
1073                 break;
1074         case CONTROL_CHANNEL:
1075                 ret = channel_bctrl(bch, arg);
1076                 break;
1077         default:
1078                 pr_info("%s: %s unknown prim(%x)\n",
1079                         card->name, __func__, cmd);
1080         }
1081         return ret;
1082 }
1083
1084 static int
1085 w6692_l2l1D(struct mISDNchannel *ch, struct sk_buff *skb)
1086 {
1087         struct mISDNdevice      *dev = container_of(ch, struct mISDNdevice, D);
1088         struct dchannel         *dch = container_of(dev, struct dchannel, dev);
1089         struct w6692_hw         *card = container_of(dch, struct w6692_hw, dch);
1090         int                     ret = -EINVAL;
1091         struct mISDNhead        *hh = mISDN_HEAD_P(skb);
1092         u32                     id;
1093         u_long                  flags;
1094
1095         switch (hh->prim) {
1096         case PH_DATA_REQ:
1097                 spin_lock_irqsave(&card->lock, flags);
1098                 ret = dchannel_senddata(dch, skb);
1099                 if (ret > 0) { /* direct TX */
1100                         id = hh->id; /* skb can be freed */
1101                         W6692_fill_Dfifo(card);
1102                         ret = 0;
1103                         spin_unlock_irqrestore(&card->lock, flags);
1104                         queue_ch_frame(ch, PH_DATA_CNF, id, NULL);
1105                 } else
1106                         spin_unlock_irqrestore(&card->lock, flags);
1107                 return ret;
1108         case PH_ACTIVATE_REQ:
1109                 ret = l1_event(dch->l1, hh->prim);
1110                 break;
1111         case PH_DEACTIVATE_REQ:
1112                 test_and_clear_bit(FLG_L2_ACTIVATED, &dch->Flags);
1113                 ret = l1_event(dch->l1, hh->prim);
1114                 break;
1115         }
1116
1117         if (!ret)
1118                 dev_kfree_skb(skb);
1119         return ret;
1120 }
1121
1122 static int
1123 w6692_l1callback(struct dchannel *dch, u32 cmd)
1124 {
1125         struct w6692_hw *card = container_of(dch, struct w6692_hw, dch);
1126         u_long flags;
1127
1128         pr_debug("%s: cmd(%x) state(%02x)\n", card->name, cmd, card->state);
1129         switch (cmd) {
1130         case INFO3_P8:
1131                 spin_lock_irqsave(&card->lock, flags);
1132                 ph_command(card, W_L1CMD_AR8);
1133                 spin_unlock_irqrestore(&card->lock, flags);
1134                 break;
1135         case INFO3_P10:
1136                 spin_lock_irqsave(&card->lock, flags);
1137                 ph_command(card, W_L1CMD_AR10);
1138                 spin_unlock_irqrestore(&card->lock, flags);
1139                 break;
1140         case HW_RESET_REQ:
1141                 spin_lock_irqsave(&card->lock, flags);
1142                 if (card->state != W_L1IND_DRD)
1143                         ph_command(card, W_L1CMD_RST);
1144                 ph_command(card, W_L1CMD_ECK);
1145                 spin_unlock_irqrestore(&card->lock, flags);
1146                 break;
1147         case HW_DEACT_REQ:
1148                 skb_queue_purge(&dch->squeue);
1149                 if (dch->tx_skb) {
1150                         dev_kfree_skb(dch->tx_skb);
1151                         dch->tx_skb = NULL;
1152                 }
1153                 dch->tx_idx = 0;
1154                 if (dch->rx_skb) {
1155                         dev_kfree_skb(dch->rx_skb);
1156                         dch->rx_skb = NULL;
1157                 }
1158                 test_and_clear_bit(FLG_TX_BUSY, &dch->Flags);
1159                 if (test_and_clear_bit(FLG_BUSY_TIMER, &dch->Flags))
1160                         del_timer(&dch->timer);
1161                 break;
1162         case HW_POWERUP_REQ:
1163                 spin_lock_irqsave(&card->lock, flags);
1164                 ph_command(card, W_L1CMD_ECK);
1165                 spin_unlock_irqrestore(&card->lock, flags);
1166                 break;
1167         case PH_ACTIVATE_IND:
1168                 test_and_set_bit(FLG_ACTIVE, &dch->Flags);
1169                 _queue_data(&dch->dev.D, cmd, MISDN_ID_ANY, 0, NULL,
1170                         GFP_ATOMIC);
1171                 break;
1172         case PH_DEACTIVATE_IND:
1173                 test_and_clear_bit(FLG_ACTIVE, &dch->Flags);
1174                 _queue_data(&dch->dev.D, cmd, MISDN_ID_ANY, 0, NULL,
1175                         GFP_ATOMIC);
1176                 break;
1177         default:
1178                 pr_debug("%s: %s unknown command %x\n", card->name,
1179                         __func__, cmd);
1180                 return -1;
1181         }
1182         return 0;
1183 }
1184
1185 static int
1186 open_dchannel(struct w6692_hw *card, struct channel_req *rq)
1187 {
1188         pr_debug("%s: %s dev(%d) open from %p\n", card->name, __func__,
1189                 card->dch.dev.id, __builtin_return_address(1));
1190         if (rq->protocol != ISDN_P_TE_S0)
1191                 return -EINVAL;
1192         if (rq->adr.channel == 1)
1193                 /* E-Channel not supported */
1194                 return -EINVAL;
1195         rq->ch = &card->dch.dev.D;
1196         rq->ch->protocol = rq->protocol;
1197         if (card->dch.state == 7)
1198                 _queue_data(rq->ch, PH_ACTIVATE_IND, MISDN_ID_ANY,
1199                     0, NULL, GFP_KERNEL);
1200         return 0;
1201 }
1202
1203 static int
1204 w6692_dctrl(struct mISDNchannel *ch, u32 cmd, void *arg)
1205 {
1206         struct mISDNdevice *dev = container_of(ch, struct mISDNdevice, D);
1207         struct dchannel *dch = container_of(dev, struct dchannel, dev);
1208         struct w6692_hw *card = container_of(dch, struct w6692_hw, dch);
1209         struct channel_req *rq;
1210         int err = 0;
1211
1212         pr_debug("%s: DCTRL: %x %p\n", card->name, cmd, arg);
1213         switch (cmd) {
1214         case OPEN_CHANNEL:
1215                 rq = arg;
1216                 if (rq->protocol == ISDN_P_TE_S0)
1217                         err = open_dchannel(card, rq);
1218                 else
1219                         err = open_bchannel(card, rq);
1220                 if (err)
1221                         break;
1222                 if (!try_module_get(THIS_MODULE))
1223                         pr_info("%s: cannot get module\n", card->name);
1224                 break;
1225         case CLOSE_CHANNEL:
1226                 pr_debug("%s: dev(%d) close from %p\n", card->name,
1227                         dch->dev.id, __builtin_return_address(0));
1228                 module_put(THIS_MODULE);
1229                 break;
1230         case CONTROL_CHANNEL:
1231                 err = channel_ctrl(card, arg);
1232                 break;
1233         default:
1234                 pr_debug("%s: unknown DCTRL command %x\n", card->name, cmd);
1235                 return -EINVAL;
1236         }
1237         return err;
1238 }
1239
1240 static int
1241 setup_w6692(struct w6692_hw *card)
1242 {
1243         u32     val;
1244
1245         if (!request_region(card->addr, 256, card->name)) {
1246                 pr_info("%s: config port %x-%x already in use\n", card->name,
1247                        card->addr, card->addr + 255);
1248                 return -EIO;
1249         }
1250         W6692Version(card);
1251         card->bc[0].addr = card->addr;
1252         card->bc[1].addr = card->addr + 0x40;
1253         val = ReadW6692(card, W_ISTA);
1254         if (debug & DEBUG_HW)
1255                 pr_notice("%s ISTA=%02x\n", card->name, val);
1256         val = ReadW6692(card, W_IMASK);
1257         if (debug & DEBUG_HW)
1258                 pr_notice("%s IMASK=%02x\n", card->name, val);
1259         val = ReadW6692(card, W_D_EXIR);
1260         if (debug & DEBUG_HW)
1261                 pr_notice("%s D_EXIR=%02x\n", card->name, val);
1262         val = ReadW6692(card, W_D_EXIM);
1263         if (debug & DEBUG_HW)
1264                 pr_notice("%s D_EXIM=%02x\n", card->name, val);
1265         val = ReadW6692(card, W_D_RSTA);
1266         if (debug & DEBUG_HW)
1267                 pr_notice("%s D_RSTA=%02x\n", card->name, val);
1268         return 0;
1269 }
1270
1271 static void
1272 release_card(struct w6692_hw *card)
1273 {
1274         u_long  flags;
1275
1276         spin_lock_irqsave(&card->lock, flags);
1277         disable_hwirq(card);
1278         w6692_mode(&card->bc[0], ISDN_P_NONE);
1279         w6692_mode(&card->bc[1], ISDN_P_NONE);
1280         if ((card->fmask & led) || card->subtype == W6692_USR) {
1281                 card->xdata |= 0x04;    /*  LED OFF */
1282                 WriteW6692(card, W_XDATA, card->xdata);
1283         }
1284         spin_unlock_irqrestore(&card->lock, flags);
1285         free_irq(card->irq, card);
1286         l1_event(card->dch.l1, CLOSE_CHANNEL);
1287         mISDN_unregister_device(&card->dch.dev);
1288         release_region(card->addr, 256);
1289         mISDN_freebchannel(&card->bc[1].bch);
1290         mISDN_freebchannel(&card->bc[0].bch);
1291         mISDN_freedchannel(&card->dch);
1292         write_lock_irqsave(&card_lock, flags);
1293         list_del(&card->list);
1294         write_unlock_irqrestore(&card_lock, flags);
1295         pci_disable_device(card->pdev);
1296         pci_set_drvdata(card->pdev, NULL);
1297         kfree(card);
1298 }
1299
1300 static int
1301 setup_instance(struct w6692_hw *card)
1302 {
1303         int             i, err;
1304         u_long          flags;
1305
1306         snprintf(card->name, MISDN_MAX_IDLEN - 1, "w6692.%d", w6692_cnt + 1);
1307         write_lock_irqsave(&card_lock, flags);
1308         list_add_tail(&card->list, &Cards);
1309         write_unlock_irqrestore(&card_lock, flags);
1310         card->fmask = (1 << w6692_cnt);
1311         _set_debug(card);
1312         spin_lock_init(&card->lock);
1313         mISDN_initdchannel(&card->dch, MAX_DFRAME_LEN_L1, W6692_ph_bh);
1314         card->dch.dev.Dprotocols = (1 << ISDN_P_TE_S0);
1315         card->dch.dev.D.send = w6692_l2l1D;
1316         card->dch.dev.D.ctrl = w6692_dctrl;
1317         card->dch.dev.Bprotocols = (1 << (ISDN_P_B_RAW & ISDN_P_B_MASK)) |
1318                 (1 << (ISDN_P_B_HDLC & ISDN_P_B_MASK));
1319         card->dch.hw = card;
1320         card->dch.dev.nrbchan = 2;
1321         for (i = 0; i < 2; i++) {
1322                 mISDN_initbchannel(&card->bc[i].bch, MAX_DATA_MEM);
1323                 card->bc[i].bch.hw = card;
1324                 card->bc[i].bch.nr = i + 1;
1325                 card->bc[i].bch.ch.nr = i + 1;
1326                 card->bc[i].bch.ch.send = w6692_l2l1B;
1327                 card->bc[i].bch.ch.ctrl = w6692_bctrl;
1328                 set_channelmap(i + 1, card->dch.dev.channelmap);
1329                 list_add(&card->bc[i].bch.ch.list, &card->dch.dev.bchannels);
1330         }
1331         err = setup_w6692(card);
1332         if (err)
1333                 goto error_setup;
1334         err = mISDN_register_device(&card->dch.dev, &card->pdev->dev,
1335                 card->name);
1336         if (err)
1337                 goto error_reg;
1338         err = init_card(card);
1339         if (err)
1340                 goto error_init;
1341         err = create_l1(&card->dch, w6692_l1callback);
1342         if (!err) {
1343                 w6692_cnt++;
1344                 pr_notice("W6692 %d cards installed\n", w6692_cnt);
1345                 return 0;
1346         }
1347
1348         free_irq(card->irq, card);
1349 error_init:
1350         mISDN_unregister_device(&card->dch.dev);
1351 error_reg:
1352         release_region(card->addr, 256);
1353 error_setup:
1354         mISDN_freebchannel(&card->bc[1].bch);
1355         mISDN_freebchannel(&card->bc[0].bch);
1356         mISDN_freedchannel(&card->dch);
1357         write_lock_irqsave(&card_lock, flags);
1358         list_del(&card->list);
1359         write_unlock_irqrestore(&card_lock, flags);
1360         kfree(card);
1361         return err;
1362 }
1363
1364 static int __devinit
1365 w6692_probe(struct pci_dev *pdev, const struct pci_device_id *ent)
1366 {
1367         int             err = -ENOMEM;
1368         struct w6692_hw *card;
1369         struct w6692map *m = (struct w6692map *)ent->driver_data;
1370
1371         card = kzalloc(sizeof(struct w6692_hw), GFP_KERNEL);
1372         if (!card) {
1373                 pr_info("No kmem for w6692 card\n");
1374                 return err;
1375         }
1376         card->pdev = pdev;
1377         card->subtype = m->subtype;
1378         err = pci_enable_device(pdev);
1379         if (err) {
1380                 kfree(card);
1381                 return err;
1382         }
1383
1384         printk(KERN_INFO "mISDN_w6692: found adapter %s at %s\n",
1385                m->name, pci_name(pdev));
1386
1387         card->addr = pci_resource_start(pdev, 1);
1388         card->irq = pdev->irq;
1389         pci_set_drvdata(pdev, card);
1390         err = setup_instance(card);
1391         if (err)
1392                 pci_set_drvdata(pdev, NULL);
1393         return err;
1394 }
1395
1396 static void __devexit
1397 w6692_remove_pci(struct pci_dev *pdev)
1398 {
1399         struct w6692_hw *card = pci_get_drvdata(pdev);
1400
1401         if (card)
1402                 release_card(card);
1403         else
1404                 if (debug)
1405                         pr_notice("%s: drvdata allready removed\n", __func__);
1406 }
1407
1408 static struct pci_device_id w6692_ids[] = {
1409         { PCI_VENDOR_ID_DYNALINK, PCI_DEVICE_ID_DYNALINK_IS64PH,
1410           PCI_ANY_ID, PCI_ANY_ID, 0, 0, (ulong)&w6692_map[0]},
1411         { PCI_VENDOR_ID_WINBOND2, PCI_DEVICE_ID_WINBOND2_6692,
1412           PCI_VENDOR_ID_USR, PCI_DEVICE_ID_USR_6692, 0, 0,
1413           (ulong)&w6692_map[2]},
1414         { PCI_VENDOR_ID_WINBOND2, PCI_DEVICE_ID_WINBOND2_6692,
1415           PCI_ANY_ID, PCI_ANY_ID, 0, 0, (ulong)&w6692_map[1]},
1416         { }
1417 };
1418 MODULE_DEVICE_TABLE(pci, w6692_ids);
1419
1420 static struct pci_driver w6692_driver = {
1421         .name =  "w6692",
1422         .probe = w6692_probe,
1423         .remove = __devexit_p(w6692_remove_pci),
1424         .id_table = w6692_ids,
1425 };
1426
1427 static int __init w6692_init(void)
1428 {
1429         int err;
1430
1431         pr_notice("Winbond W6692 PCI driver Rev. %s\n", W6692_REV);
1432
1433         err = pci_register_driver(&w6692_driver);
1434         return err;
1435 }
1436
1437 static void __exit w6692_cleanup(void)
1438 {
1439         pci_unregister_driver(&w6692_driver);
1440 }
1441
1442 module_init(w6692_init);
1443 module_exit(w6692_cleanup);