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