Author | Tokens | Token Proportion | Commits | Commit Proportion |
---|---|---|---|---|
Karsten Keil | 7909 | 99.23% | 8 | 33.33% |
Kees Cook | 19 | 0.24% | 2 | 8.33% |
Dan Carpenter | 8 | 0.10% | 1 | 4.17% |
Jeff Johnson | 5 | 0.06% | 1 | 4.17% |
Jiri Slaby | 5 | 0.06% | 1 | 4.17% |
Arnd Bergmann | 5 | 0.06% | 1 | 4.17% |
Geliang Tang | 4 | 0.05% | 1 | 4.17% |
Kefeng Wang | 3 | 0.04% | 1 | 4.17% |
Alexey Dobriyan | 3 | 0.04% | 1 | 4.17% |
Linus Torvalds (pre-git) | 2 | 0.03% | 1 | 4.17% |
Thomas Gleixner | 2 | 0.03% | 1 | 4.17% |
Arvind Yadav | 1 | 0.01% | 1 | 4.17% |
Baoyou Xie | 1 | 0.01% | 1 | 4.17% |
Linus Torvalds | 1 | 0.01% | 1 | 4.17% |
Uwe Kleine-König | 1 | 0.01% | 1 | 4.17% |
Stephen Rothwell | 1 | 0.01% | 1 | 4.17% |
Total | 7970 | 24 |
// SPDX-License-Identifier: GPL-2.0-only /* * w6692.c mISDN driver for Winbond w6692 based cards * * Author Karsten Keil <kkeil@suse.de> * based on the w6692 I4L driver from Petr Novak <petr.novak@i.cz> * * Copyright 2009 by Karsten Keil <keil@isdn4linux.de> */ #include <linux/interrupt.h> #include <linux/module.h> #include <linux/pci.h> #include <linux/delay.h> #include <linux/mISDNhw.h> #include <linux/slab.h> #include "w6692.h" #define W6692_REV "2.0" #define DBUSY_TIMER_VALUE 80 enum { W6692_ASUS, W6692_WINBOND, W6692_USR }; /* private data in the PCI devices list */ struct w6692map { u_int subtype; char *name; }; static const struct w6692map w6692_map[] = { {W6692_ASUS, "Dynalink/AsusCom IS64PH"}, {W6692_WINBOND, "Winbond W6692"}, {W6692_USR, "USR W6692"} }; #define PCI_DEVICE_ID_USR_6692 0x3409 struct w6692_ch { struct bchannel bch; u32 addr; struct timer_list timer; u8 b_mode; }; struct w6692_hw { struct list_head list; struct pci_dev *pdev; char name[MISDN_MAX_IDLEN]; u32 irq; u32 irqcnt; u32 addr; u32 fmask; /* feature mask - bit set per card nr */ int subtype; spinlock_t lock; /* hw lock */ u8 imask; u8 pctl; u8 xaddr; u8 xdata; u8 state; struct w6692_ch bc[2]; struct dchannel dch; char log[64]; }; static LIST_HEAD(Cards); static DEFINE_RWLOCK(card_lock); /* protect Cards */ static int w6692_cnt; static int debug; static u32 led; static u32 pots; static void _set_debug(struct w6692_hw *card) { card->dch.debug = debug; card->bc[0].bch.debug = debug; card->bc[1].bch.debug = debug; } static int set_debug(const char *val, const struct kernel_param *kp) { int ret; struct w6692_hw *card; ret = param_set_uint(val, kp); if (!ret) { read_lock(&card_lock); list_for_each_entry(card, &Cards, list) _set_debug(card); read_unlock(&card_lock); } return ret; } MODULE_AUTHOR("Karsten Keil"); MODULE_DESCRIPTION("mISDN driver for Winbond w6692 based cards"); MODULE_LICENSE("GPL v2"); MODULE_VERSION(W6692_REV); module_param_call(debug, set_debug, param_get_uint, &debug, S_IRUGO | S_IWUSR); MODULE_PARM_DESC(debug, "W6692 debug mask"); module_param(led, uint, S_IRUGO | S_IWUSR); MODULE_PARM_DESC(led, "W6692 LED support bitmask (one bit per card)"); module_param(pots, uint, S_IRUGO | S_IWUSR); MODULE_PARM_DESC(pots, "W6692 POTS support bitmask (one bit per card)"); static inline u8 ReadW6692(struct w6692_hw *card, u8 offset) { return inb(card->addr + offset); } static inline void WriteW6692(struct w6692_hw *card, u8 offset, u8 value) { outb(value, card->addr + offset); } static inline u8 ReadW6692B(struct w6692_ch *bc, u8 offset) { return inb(bc->addr + offset); } static inline void WriteW6692B(struct w6692_ch *bc, u8 offset, u8 value) { outb(value, bc->addr + offset); } static void enable_hwirq(struct w6692_hw *card) { WriteW6692(card, W_IMASK, card->imask); } static void disable_hwirq(struct w6692_hw *card) { WriteW6692(card, W_IMASK, 0xff); } static const char *W6692Ver[] = {"V00", "V01", "V10", "V11"}; static void W6692Version(struct w6692_hw *card) { int val; val = ReadW6692(card, W_D_RBCH); pr_notice("%s: Winbond W6692 version: %s\n", card->name, W6692Ver[(val >> 6) & 3]); } static void w6692_led_handler(struct w6692_hw *card, int on) { if ((!(card->fmask & led)) || card->subtype == W6692_USR) return; if (on) { card->xdata &= 0xfb; /* LED ON */ WriteW6692(card, W_XDATA, card->xdata); } else { card->xdata |= 0x04; /* LED OFF */ WriteW6692(card, W_XDATA, card->xdata); } } static void ph_command(struct w6692_hw *card, u8 cmd) { pr_debug("%s: ph_command %x\n", card->name, cmd); WriteW6692(card, W_CIX, cmd); } static void W6692_new_ph(struct w6692_hw *card) { if (card->state == W_L1CMD_RST) ph_command(card, W_L1CMD_DRC); schedule_event(&card->dch, FLG_PHCHANGE); } static void W6692_ph_bh(struct dchannel *dch) { struct w6692_hw *card = dch->hw; switch (card->state) { case W_L1CMD_RST: dch->state = 0; l1_event(dch->l1, HW_RESET_IND); break; case W_L1IND_CD: dch->state = 3; l1_event(dch->l1, HW_DEACT_CNF); break; case W_L1IND_DRD: dch->state = 3; l1_event(dch->l1, HW_DEACT_IND); break; case W_L1IND_CE: dch->state = 4; l1_event(dch->l1, HW_POWERUP_IND); break; case W_L1IND_LD: if (dch->state <= 5) { dch->state = 5; l1_event(dch->l1, ANYSIGNAL); } else { dch->state = 8; l1_event(dch->l1, LOSTFRAMING); } break; case W_L1IND_ARD: dch->state = 6; l1_event(dch->l1, INFO2); break; case W_L1IND_AI8: dch->state = 7; l1_event(dch->l1, INFO4_P8); break; case W_L1IND_AI10: dch->state = 7; l1_event(dch->l1, INFO4_P10); break; default: pr_debug("%s: TE unknown state %02x dch state %02x\n", card->name, card->state, dch->state); break; } pr_debug("%s: TE newstate %02x\n", card->name, dch->state); } static void W6692_empty_Dfifo(struct w6692_hw *card, int count) { struct dchannel *dch = &card->dch; u8 *ptr; pr_debug("%s: empty_Dfifo %d\n", card->name, count); if (!dch->rx_skb) { dch->rx_skb = mI_alloc_skb(card->dch.maxlen, GFP_ATOMIC); if (!dch->rx_skb) { pr_info("%s: D receive out of memory\n", card->name); WriteW6692(card, W_D_CMDR, W_D_CMDR_RACK); return; } } if ((dch->rx_skb->len + count) >= dch->maxlen) { pr_debug("%s: empty_Dfifo overrun %d\n", card->name, dch->rx_skb->len + count); WriteW6692(card, W_D_CMDR, W_D_CMDR_RACK); return; } ptr = skb_put(dch->rx_skb, count); insb(card->addr + W_D_RFIFO, ptr, count); WriteW6692(card, W_D_CMDR, W_D_CMDR_RACK); if (debug & DEBUG_HW_DFIFO) { snprintf(card->log, 63, "D-recv %s %d ", card->name, count); print_hex_dump_bytes(card->log, DUMP_PREFIX_OFFSET, ptr, count); } } static void W6692_fill_Dfifo(struct w6692_hw *card) { struct dchannel *dch = &card->dch; int count; u8 *ptr; u8 cmd = W_D_CMDR_XMS; pr_debug("%s: fill_Dfifo\n", card->name); if (!dch->tx_skb) return; count = dch->tx_skb->len - dch->tx_idx; if (count <= 0) return; if (count > W_D_FIFO_THRESH) count = W_D_FIFO_THRESH; else cmd |= W_D_CMDR_XME; ptr = dch->tx_skb->data + dch->tx_idx; dch->tx_idx += count; outsb(card->addr + W_D_XFIFO, ptr, count); WriteW6692(card, W_D_CMDR, cmd); if (test_and_set_bit(FLG_BUSY_TIMER, &dch->Flags)) { pr_debug("%s: fill_Dfifo dbusytimer running\n", card->name); del_timer(&dch->timer); } dch->timer.expires = jiffies + ((DBUSY_TIMER_VALUE * HZ) / 1000); add_timer(&dch->timer); if (debug & DEBUG_HW_DFIFO) { snprintf(card->log, 63, "D-send %s %d ", card->name, count); print_hex_dump_bytes(card->log, DUMP_PREFIX_OFFSET, ptr, count); } } static void d_retransmit(struct w6692_hw *card) { struct dchannel *dch = &card->dch; if (test_and_clear_bit(FLG_BUSY_TIMER, &dch->Flags)) del_timer(&dch->timer); #ifdef FIXME if (test_and_clear_bit(FLG_L1_BUSY, &dch->Flags)) dchannel_sched_event(dch, D_CLEARBUSY); #endif if (test_bit(FLG_TX_BUSY, &dch->Flags)) { /* Restart frame */ dch->tx_idx = 0; W6692_fill_Dfifo(card); } else if (dch->tx_skb) { /* should not happen */ pr_info("%s: %s without TX_BUSY\n", card->name, __func__); test_and_set_bit(FLG_TX_BUSY, &dch->Flags); dch->tx_idx = 0; W6692_fill_Dfifo(card); } else { pr_info("%s: XDU no TX_BUSY\n", card->name); if (get_next_dframe(dch)) W6692_fill_Dfifo(card); } } static void handle_rxD(struct w6692_hw *card) { u8 stat; int count; stat = ReadW6692(card, W_D_RSTA); if (stat & (W_D_RSTA_RDOV | W_D_RSTA_CRCE | W_D_RSTA_RMB)) { if (stat & W_D_RSTA_RDOV) { pr_debug("%s: D-channel RDOV\n", card->name); #ifdef ERROR_STATISTIC card->dch.err_rx++; #endif } if (stat & W_D_RSTA_CRCE) { pr_debug("%s: D-channel CRC error\n", card->name); #ifdef ERROR_STATISTIC card->dch.err_crc++; #endif } if (stat & W_D_RSTA_RMB) { pr_debug("%s: D-channel ABORT\n", card->name); #ifdef ERROR_STATISTIC card->dch.err_rx++; #endif } dev_kfree_skb(card->dch.rx_skb); card->dch.rx_skb = NULL; WriteW6692(card, W_D_CMDR, W_D_CMDR_RACK | W_D_CMDR_RRST); } else { count = ReadW6692(card, W_D_RBCL) & (W_D_FIFO_THRESH - 1); if (count == 0) count = W_D_FIFO_THRESH; W6692_empty_Dfifo(card, count); recv_Dchannel(&card->dch); } } static void handle_txD(struct w6692_hw *card) { if (test_and_clear_bit(FLG_BUSY_TIMER, &card->dch.Flags)) del_timer(&card->dch.timer); if (card->dch.tx_skb && card->dch.tx_idx < card->dch.tx_skb->len) { W6692_fill_Dfifo(card); } else { dev_kfree_skb(card->dch.tx_skb); if (get_next_dframe(&card->dch)) W6692_fill_Dfifo(card); } } static void handle_statusD(struct w6692_hw *card) { struct dchannel *dch = &card->dch; u8 exval, v1, cir; exval = ReadW6692(card, W_D_EXIR); pr_debug("%s: D_EXIR %02x\n", card->name, exval); if (exval & (W_D_EXI_XDUN | W_D_EXI_XCOL)) { /* Transmit underrun/collision */ pr_debug("%s: D-channel underrun/collision\n", card->name); #ifdef ERROR_STATISTIC dch->err_tx++; #endif d_retransmit(card); } if (exval & W_D_EXI_RDOV) { /* RDOV */ pr_debug("%s: D-channel RDOV\n", card->name); WriteW6692(card, W_D_CMDR, W_D_CMDR_RRST); } if (exval & W_D_EXI_TIN2) /* TIN2 - never */ pr_debug("%s: spurious TIN2 interrupt\n", card->name); if (exval & W_D_EXI_MOC) { /* MOC - not supported */ v1 = ReadW6692(card, W_MOSR); pr_debug("%s: spurious MOC interrupt MOSR %02x\n", card->name, v1); } if (exval & W_D_EXI_ISC) { /* ISC - Level1 change */ cir = ReadW6692(card, W_CIR); pr_debug("%s: ISC CIR %02X\n", card->name, cir); if (cir & W_CIR_ICC) { v1 = cir & W_CIR_COD_MASK; pr_debug("%s: ph_state_change %x -> %x\n", card->name, dch->state, v1); card->state = v1; if (card->fmask & led) { switch (v1) { case W_L1IND_AI8: case W_L1IND_AI10: w6692_led_handler(card, 1); break; default: w6692_led_handler(card, 0); break; } } W6692_new_ph(card); } if (cir & W_CIR_SCC) { v1 = ReadW6692(card, W_SQR); pr_debug("%s: SCC SQR %02X\n", card->name, v1); } } if (exval & W_D_EXI_WEXP) pr_debug("%s: spurious WEXP interrupt!\n", card->name); if (exval & W_D_EXI_TEXP) pr_debug("%s: spurious TEXP interrupt!\n", card->name); } static void W6692_empty_Bfifo(struct w6692_ch *wch, int count) { struct w6692_hw *card = wch->bch.hw; u8 *ptr; int maxlen; pr_debug("%s: empty_Bfifo %d\n", card->name, count); if (unlikely(wch->bch.state == ISDN_P_NONE)) { pr_debug("%s: empty_Bfifo ISDN_P_NONE\n", card->name); WriteW6692B(wch, W_B_CMDR, W_B_CMDR_RACK | W_B_CMDR_RACT); if (wch->bch.rx_skb) skb_trim(wch->bch.rx_skb, 0); return; } if (test_bit(FLG_RX_OFF, &wch->bch.Flags)) { wch->bch.dropcnt += count; WriteW6692B(wch, W_B_CMDR, W_B_CMDR_RACK | W_B_CMDR_RACT); return; } maxlen = bchannel_get_rxbuf(&wch->bch, count); if (maxlen < 0) { WriteW6692B(wch, W_B_CMDR, W_B_CMDR_RACK | W_B_CMDR_RACT); if (wch->bch.rx_skb) skb_trim(wch->bch.rx_skb, 0); pr_warn("%s.B%d: No bufferspace for %d bytes\n", card->name, wch->bch.nr, count); return; } ptr = skb_put(wch->bch.rx_skb, count); insb(wch->addr + W_B_RFIFO, ptr, count); WriteW6692B(wch, W_B_CMDR, W_B_CMDR_RACK | W_B_CMDR_RACT); if (debug & DEBUG_HW_DFIFO) { snprintf(card->log, 63, "B%1d-recv %s %d ", wch->bch.nr, card->name, count); print_hex_dump_bytes(card->log, DUMP_PREFIX_OFFSET, ptr, count); } } static void W6692_fill_Bfifo(struct w6692_ch *wch) { struct w6692_hw *card = wch->bch.hw; int count, fillempty = 0; u8 *ptr, cmd = W_B_CMDR_RACT | W_B_CMDR_XMS; pr_debug("%s: fill Bfifo\n", card->name); if (!wch->bch.tx_skb) { if (!test_bit(FLG_TX_EMPTY, &wch->bch.Flags)) return; ptr = wch->bch.fill; count = W_B_FIFO_THRESH; fillempty = 1; } else { count = wch->bch.tx_skb->len - wch->bch.tx_idx; if (count <= 0) return; ptr = wch->bch.tx_skb->data + wch->bch.tx_idx; } if (count > W_B_FIFO_THRESH) count = W_B_FIFO_THRESH; else if (test_bit(FLG_HDLC, &wch->bch.Flags)) cmd |= W_B_CMDR_XME; pr_debug("%s: fill Bfifo%d/%d\n", card->name, count, wch->bch.tx_idx); wch->bch.tx_idx += count; if (fillempty) { while (count > 0) { outsb(wch->addr + W_B_XFIFO, ptr, MISDN_BCH_FILL_SIZE); count -= MISDN_BCH_FILL_SIZE; } } else { outsb(wch->addr + W_B_XFIFO, ptr, count); } WriteW6692B(wch, W_B_CMDR, cmd); if ((debug & DEBUG_HW_BFIFO) && !fillempty) { snprintf(card->log, 63, "B%1d-send %s %d ", wch->bch.nr, card->name, count); print_hex_dump_bytes(card->log, DUMP_PREFIX_OFFSET, ptr, count); } } #if 0 static int setvolume(struct w6692_ch *wch, int mic, struct sk_buff *skb) { struct w6692_hw *card = wch->bch.hw; u16 *vol = (u16 *)skb->data; u8 val; if ((!(card->fmask & pots)) || !test_bit(FLG_TRANSPARENT, &wch->bch.Flags)) return -ENODEV; if (skb->len < 2) return -EINVAL; if (*vol > 7) return -EINVAL; val = *vol & 7; val = 7 - val; if (mic) { val <<= 3; card->xaddr &= 0xc7; } else { card->xaddr &= 0xf8; } card->xaddr |= val; WriteW6692(card, W_XADDR, card->xaddr); return 0; } static int enable_pots(struct w6692_ch *wch) { struct w6692_hw *card = wch->bch.hw; if ((!(card->fmask & pots)) || !test_bit(FLG_TRANSPARENT, &wch->bch.Flags)) return -ENODEV; wch->b_mode |= W_B_MODE_EPCM | W_B_MODE_BSW0; WriteW6692B(wch, W_B_MODE, wch->b_mode); WriteW6692B(wch, W_B_CMDR, W_B_CMDR_RRST | W_B_CMDR_XRST); card->pctl |= ((wch->bch.nr & 2) ? W_PCTL_PCX : 0); WriteW6692(card, W_PCTL, card->pctl); return 0; } #endif static int disable_pots(struct w6692_ch *wch) { struct w6692_hw *card = wch->bch.hw; if (!(card->fmask & pots)) return -ENODEV; wch->b_mode &= ~(W_B_MODE_EPCM | W_B_MODE_BSW0); WriteW6692B(wch, W_B_MODE, wch->b_mode); WriteW6692B(wch, W_B_CMDR, W_B_CMDR_RRST | W_B_CMDR_RACT | W_B_CMDR_XRST); return 0; } static int w6692_mode(struct w6692_ch *wch, u32 pr) { struct w6692_hw *card; card = wch->bch.hw; pr_debug("%s: B%d protocol %x-->%x\n", card->name, wch->bch.nr, wch->bch.state, pr); switch (pr) { case ISDN_P_NONE: if ((card->fmask & pots) && (wch->b_mode & W_B_MODE_EPCM)) disable_pots(wch); wch->b_mode = 0; mISDN_clear_bchannel(&wch->bch); WriteW6692B(wch, W_B_MODE, wch->b_mode); WriteW6692B(wch, W_B_CMDR, W_B_CMDR_RRST | W_B_CMDR_XRST); test_and_clear_bit(FLG_HDLC, &wch->bch.Flags); test_and_clear_bit(FLG_TRANSPARENT, &wch->bch.Flags); break; case ISDN_P_B_RAW: wch->b_mode = W_B_MODE_MMS; WriteW6692B(wch, W_B_MODE, wch->b_mode); WriteW6692B(wch, W_B_EXIM, 0); WriteW6692B(wch, W_B_CMDR, W_B_CMDR_RRST | W_B_CMDR_RACT | W_B_CMDR_XRST); test_and_set_bit(FLG_TRANSPARENT, &wch->bch.Flags); break; case ISDN_P_B_HDLC: wch->b_mode = W_B_MODE_ITF; WriteW6692B(wch, W_B_MODE, wch->b_mode); WriteW6692B(wch, W_B_ADM1, 0xff); WriteW6692B(wch, W_B_ADM2, 0xff); WriteW6692B(wch, W_B_EXIM, 0); WriteW6692B(wch, W_B_CMDR, W_B_CMDR_RRST | W_B_CMDR_RACT | W_B_CMDR_XRST); test_and_set_bit(FLG_HDLC, &wch->bch.Flags); break; default: pr_info("%s: protocol %x not known\n", card->name, pr); return -ENOPROTOOPT; } wch->bch.state = pr; return 0; } static void send_next(struct w6692_ch *wch) { if (wch->bch.tx_skb && wch->bch.tx_idx < wch->bch.tx_skb->len) { W6692_fill_Bfifo(wch); } else { dev_kfree_skb(wch->bch.tx_skb); if (get_next_bframe(&wch->bch)) { W6692_fill_Bfifo(wch); test_and_clear_bit(FLG_TX_EMPTY, &wch->bch.Flags); } else if (test_bit(FLG_TX_EMPTY, &wch->bch.Flags)) { W6692_fill_Bfifo(wch); } } } static void W6692B_interrupt(struct w6692_hw *card, int ch) { struct w6692_ch *wch = &card->bc[ch]; int count; u8 stat, star = 0; stat = ReadW6692B(wch, W_B_EXIR); pr_debug("%s: B%d EXIR %02x\n", card->name, wch->bch.nr, stat); if (stat & W_B_EXI_RME) { star = ReadW6692B(wch, W_B_STAR); if (star & (W_B_STAR_RDOV | W_B_STAR_CRCE | W_B_STAR_RMB)) { if ((star & W_B_STAR_RDOV) && test_bit(FLG_ACTIVE, &wch->bch.Flags)) { pr_debug("%s: B%d RDOV proto=%x\n", card->name, wch->bch.nr, wch->bch.state); #ifdef ERROR_STATISTIC wch->bch.err_rdo++; #endif } if (test_bit(FLG_HDLC, &wch->bch.Flags)) { if (star & W_B_STAR_CRCE) { pr_debug("%s: B%d CRC error\n", card->name, wch->bch.nr); #ifdef ERROR_STATISTIC wch->bch.err_crc++; #endif } if (star & W_B_STAR_RMB) { pr_debug("%s: B%d message abort\n", card->name, wch->bch.nr); #ifdef ERROR_STATISTIC wch->bch.err_inv++; #endif } } WriteW6692B(wch, W_B_CMDR, W_B_CMDR_RACK | W_B_CMDR_RRST | W_B_CMDR_RACT); if (wch->bch.rx_skb) skb_trim(wch->bch.rx_skb, 0); } else { count = ReadW6692B(wch, W_B_RBCL) & (W_B_FIFO_THRESH - 1); if (count == 0) count = W_B_FIFO_THRESH; W6692_empty_Bfifo(wch, count); recv_Bchannel(&wch->bch, 0, false); } } if (stat & W_B_EXI_RMR) { if (!(stat & W_B_EXI_RME)) star = ReadW6692B(wch, W_B_STAR); if (star & W_B_STAR_RDOV) { pr_debug("%s: B%d RDOV proto=%x\n", card->name, wch->bch.nr, wch->bch.state); #ifdef ERROR_STATISTIC wch->bch.err_rdo++; #endif WriteW6692B(wch, W_B_CMDR, W_B_CMDR_RACK | W_B_CMDR_RRST | W_B_CMDR_RACT); } else { W6692_empty_Bfifo(wch, W_B_FIFO_THRESH); if (test_bit(FLG_TRANSPARENT, &wch->bch.Flags)) recv_Bchannel(&wch->bch, 0, false); } } if (stat & W_B_EXI_RDOV) { /* only if it is not handled yet */ if (!(star & W_B_STAR_RDOV)) { pr_debug("%s: B%d RDOV IRQ proto=%x\n", card->name, wch->bch.nr, wch->bch.state); #ifdef ERROR_STATISTIC wch->bch.err_rdo++; #endif WriteW6692B(wch, W_B_CMDR, W_B_CMDR_RACK | W_B_CMDR_RRST | W_B_CMDR_RACT); } } if (stat & W_B_EXI_XFR) { if (!(stat & (W_B_EXI_RME | W_B_EXI_RMR))) { star = ReadW6692B(wch, W_B_STAR); pr_debug("%s: B%d star %02x\n", card->name, wch->bch.nr, star); } if (star & W_B_STAR_XDOW) { pr_warn("%s: B%d XDOW proto=%x\n", card->name, wch->bch.nr, wch->bch.state); #ifdef ERROR_STATISTIC wch->bch.err_xdu++; #endif WriteW6692B(wch, W_B_CMDR, W_B_CMDR_XRST | W_B_CMDR_RACT); /* resend */ if (wch->bch.tx_skb) { if (!test_bit(FLG_TRANSPARENT, &wch->bch.Flags)) wch->bch.tx_idx = 0; } } send_next(wch); if (star & W_B_STAR_XDOW) return; /* handle XDOW only once */ } if (stat & W_B_EXI_XDUN) { pr_warn("%s: B%d XDUN proto=%x\n", card->name, wch->bch.nr, wch->bch.state); #ifdef ERROR_STATISTIC wch->bch.err_xdu++; #endif /* resend - no XRST needed */ if (wch->bch.tx_skb) { if (!test_bit(FLG_TRANSPARENT, &wch->bch.Flags)) wch->bch.tx_idx = 0; } else if (test_bit(FLG_FILLEMPTY, &wch->bch.Flags)) { test_and_set_bit(FLG_TX_EMPTY, &wch->bch.Flags); } send_next(wch); } } static irqreturn_t w6692_irq(int intno, void *dev_id) { struct w6692_hw *card = dev_id; u8 ista; spin_lock(&card->lock); ista = ReadW6692(card, W_ISTA); if ((ista | card->imask) == card->imask) { /* possible a shared IRQ reqest */ spin_unlock(&card->lock); return IRQ_NONE; } card->irqcnt++; pr_debug("%s: ista %02x\n", card->name, ista); ista &= ~card->imask; if (ista & W_INT_B1_EXI) W6692B_interrupt(card, 0); if (ista & W_INT_B2_EXI) W6692B_interrupt(card, 1); if (ista & W_INT_D_RME) handle_rxD(card); if (ista & W_INT_D_RMR) W6692_empty_Dfifo(card, W_D_FIFO_THRESH); if (ista & W_INT_D_XFR) handle_txD(card); if (ista & W_INT_D_EXI) handle_statusD(card); if (ista & (W_INT_XINT0 | W_INT_XINT1)) /* XINT0/1 - never */ pr_debug("%s: W6692 spurious XINT!\n", card->name); /* End IRQ Handler */ spin_unlock(&card->lock); return IRQ_HANDLED; } static void dbusy_timer_handler(struct timer_list *t) { struct dchannel *dch = from_timer(dch, t, timer); struct w6692_hw *card = dch->hw; int rbch, star; u_long flags; if (test_bit(FLG_BUSY_TIMER, &dch->Flags)) { spin_lock_irqsave(&card->lock, flags); rbch = ReadW6692(card, W_D_RBCH); star = ReadW6692(card, W_D_STAR); pr_debug("%s: D-Channel Busy RBCH %02x STAR %02x\n", card->name, rbch, star); if (star & W_D_STAR_XBZ) /* D-Channel Busy */ test_and_set_bit(FLG_L1_BUSY, &dch->Flags); else { /* discard frame; reset transceiver */ test_and_clear_bit(FLG_BUSY_TIMER, &dch->Flags); if (dch->tx_idx) dch->tx_idx = 0; else pr_info("%s: W6692 D-Channel Busy no tx_idx\n", card->name); /* Transmitter reset */ WriteW6692(card, W_D_CMDR, W_D_CMDR_XRST); } spin_unlock_irqrestore(&card->lock, flags); } } static void initW6692(struct w6692_hw *card) { u8 val; timer_setup(&card->dch.timer, dbusy_timer_handler, 0); w6692_mode(&card->bc[0], ISDN_P_NONE); w6692_mode(&card->bc[1], ISDN_P_NONE); WriteW6692(card, W_D_CTL, 0x00); disable_hwirq(card); WriteW6692(card, W_D_SAM, 0xff); WriteW6692(card, W_D_TAM, 0xff); WriteW6692(card, W_D_MODE, W_D_MODE_RACT); card->state = W_L1CMD_RST; ph_command(card, W_L1CMD_RST); ph_command(card, W_L1CMD_ECK); /* enable all IRQ but extern */ card->imask = 0x18; WriteW6692(card, W_D_EXIM, 0x00); WriteW6692B(&card->bc[0], W_B_EXIM, 0); WriteW6692B(&card->bc[1], W_B_EXIM, 0); /* Reset D-chan receiver and transmitter */ WriteW6692(card, W_D_CMDR, W_D_CMDR_RRST | W_D_CMDR_XRST); /* Reset B-chan receiver and transmitter */ WriteW6692B(&card->bc[0], W_B_CMDR, W_B_CMDR_RRST | W_B_CMDR_XRST); WriteW6692B(&card->bc[1], W_B_CMDR, W_B_CMDR_RRST | W_B_CMDR_XRST); /* enable peripheral */ if (card->subtype == W6692_USR) { /* seems that USR implemented some power control features * Pin 79 is connected to the oscilator circuit so we * have to handle it here */ card->pctl = 0x80; card->xdata = 0; WriteW6692(card, W_PCTL, card->pctl); WriteW6692(card, W_XDATA, card->xdata); } else { card->pctl = W_PCTL_OE5 | W_PCTL_OE4 | W_PCTL_OE2 | W_PCTL_OE1 | W_PCTL_OE0; card->xaddr = 0x00;/* all sw off */ if (card->fmask & pots) card->xdata |= 0x06; /* POWER UP/ LED OFF / ALAW */ if (card->fmask & led) card->xdata |= 0x04; /* LED OFF */ if ((card->fmask & pots) || (card->fmask & led)) { WriteW6692(card, W_PCTL, card->pctl); WriteW6692(card, W_XADDR, card->xaddr); WriteW6692(card, W_XDATA, card->xdata); val = ReadW6692(card, W_XADDR); if (debug & DEBUG_HW) pr_notice("%s: W_XADDR=%02x\n", card->name, val); } } } static void reset_w6692(struct w6692_hw *card) { WriteW6692(card, W_D_CTL, W_D_CTL_SRST); mdelay(10); WriteW6692(card, W_D_CTL, 0); } static int init_card(struct w6692_hw *card) { int cnt = 3; u_long flags; spin_lock_irqsave(&card->lock, flags); disable_hwirq(card); spin_unlock_irqrestore(&card->lock, flags); if (request_irq(card->irq, w6692_irq, IRQF_SHARED, card->name, card)) { pr_info("%s: couldn't get interrupt %d\n", card->name, card->irq); return -EIO; } while (cnt--) { spin_lock_irqsave(&card->lock, flags); initW6692(card); enable_hwirq(card); spin_unlock_irqrestore(&card->lock, flags); /* Timeout 10ms */ msleep_interruptible(10); if (debug & DEBUG_HW) pr_notice("%s: IRQ %d count %d\n", card->name, card->irq, card->irqcnt); if (!card->irqcnt) { pr_info("%s: IRQ(%d) getting no IRQs during init %d\n", card->name, card->irq, 3 - cnt); reset_w6692(card); } else return 0; } free_irq(card->irq, card); return -EIO; } static int w6692_l2l1B(struct mISDNchannel *ch, struct sk_buff *skb) { struct bchannel *bch = container_of(ch, struct bchannel, ch); struct w6692_ch *bc = container_of(bch, struct w6692_ch, bch); struct w6692_hw *card = bch->hw; int ret = -EINVAL; struct mISDNhead *hh = mISDN_HEAD_P(skb); unsigned long flags; switch (hh->prim) { case PH_DATA_REQ: spin_lock_irqsave(&card->lock, flags); ret = bchannel_senddata(bch, skb); if (ret > 0) { /* direct TX */ ret = 0; W6692_fill_Bfifo(bc); } spin_unlock_irqrestore(&card->lock, flags); return ret; case PH_ACTIVATE_REQ: spin_lock_irqsave(&card->lock, flags); if (!test_and_set_bit(FLG_ACTIVE, &bch->Flags)) ret = w6692_mode(bc, ch->protocol); else ret = 0; spin_unlock_irqrestore(&card->lock, flags); if (!ret) _queue_data(ch, PH_ACTIVATE_IND, MISDN_ID_ANY, 0, NULL, GFP_KERNEL); break; case PH_DEACTIVATE_REQ: spin_lock_irqsave(&card->lock, flags); mISDN_clear_bchannel(bch); w6692_mode(bc, ISDN_P_NONE); spin_unlock_irqrestore(&card->lock, flags); _queue_data(ch, PH_DEACTIVATE_IND, MISDN_ID_ANY, 0, NULL, GFP_KERNEL); ret = 0; break; default: pr_info("%s: %s unknown prim(%x,%x)\n", card->name, __func__, hh->prim, hh->id); ret = -EINVAL; } if (!ret) dev_kfree_skb(skb); return ret; } static int channel_bctrl(struct bchannel *bch, struct mISDN_ctrl_req *cq) { return mISDN_ctrl_bchannel(bch, cq); } static int open_bchannel(struct w6692_hw *card, struct channel_req *rq) { struct bchannel *bch; if (rq->adr.channel == 0 || rq->adr.channel > 2) return -EINVAL; if (rq->protocol == ISDN_P_NONE) return -EINVAL; bch = &card->bc[rq->adr.channel - 1].bch; if (test_and_set_bit(FLG_OPEN, &bch->Flags)) return -EBUSY; /* b-channel can be only open once */ bch->ch.protocol = rq->protocol; rq->ch = &bch->ch; return 0; } static int channel_ctrl(struct w6692_hw *card, struct mISDN_ctrl_req *cq) { int ret = 0; switch (cq->op) { case MISDN_CTRL_GETOP: cq->op = MISDN_CTRL_L1_TIMER3; break; case MISDN_CTRL_L1_TIMER3: ret = l1_event(card->dch.l1, HW_TIMER3_VALUE | (cq->p1 & 0xff)); break; default: pr_info("%s: unknown CTRL OP %x\n", card->name, cq->op); ret = -EINVAL; break; } return ret; } static int w6692_bctrl(struct mISDNchannel *ch, u32 cmd, void *arg) { struct bchannel *bch = container_of(ch, struct bchannel, ch); struct w6692_ch *bc = container_of(bch, struct w6692_ch, bch); struct w6692_hw *card = bch->hw; int ret = -EINVAL; u_long flags; pr_debug("%s: %s cmd:%x %p\n", card->name, __func__, cmd, arg); switch (cmd) { case CLOSE_CHANNEL: test_and_clear_bit(FLG_OPEN, &bch->Flags); cancel_work_sync(&bch->workq); spin_lock_irqsave(&card->lock, flags); mISDN_clear_bchannel(bch); w6692_mode(bc, ISDN_P_NONE); spin_unlock_irqrestore(&card->lock, flags); ch->protocol = ISDN_P_NONE; ch->peer = NULL; module_put(THIS_MODULE); ret = 0; break; case CONTROL_CHANNEL: ret = channel_bctrl(bch, arg); break; default: pr_info("%s: %s unknown prim(%x)\n", card->name, __func__, cmd); } return ret; } static int w6692_l2l1D(struct mISDNchannel *ch, struct sk_buff *skb) { struct mISDNdevice *dev = container_of(ch, struct mISDNdevice, D); struct dchannel *dch = container_of(dev, struct dchannel, dev); struct w6692_hw *card = container_of(dch, struct w6692_hw, dch); int ret = -EINVAL; struct mISDNhead *hh = mISDN_HEAD_P(skb); u32 id; u_long flags; switch (hh->prim) { case PH_DATA_REQ: spin_lock_irqsave(&card->lock, flags); ret = dchannel_senddata(dch, skb); if (ret > 0) { /* direct TX */ id = hh->id; /* skb can be freed */ W6692_fill_Dfifo(card); ret = 0; spin_unlock_irqrestore(&card->lock, flags); queue_ch_frame(ch, PH_DATA_CNF, id, NULL); } else spin_unlock_irqrestore(&card->lock, flags); return ret; case PH_ACTIVATE_REQ: ret = l1_event(dch->l1, hh->prim); break; case PH_DEACTIVATE_REQ: test_and_clear_bit(FLG_L2_ACTIVATED, &dch->Flags); ret = l1_event(dch->l1, hh->prim); break; } if (!ret) dev_kfree_skb(skb); return ret; } static int w6692_l1callback(struct dchannel *dch, u32 cmd) { struct w6692_hw *card = container_of(dch, struct w6692_hw, dch); u_long flags; pr_debug("%s: cmd(%x) state(%02x)\n", card->name, cmd, card->state); switch (cmd) { case INFO3_P8: spin_lock_irqsave(&card->lock, flags); ph_command(card, W_L1CMD_AR8); spin_unlock_irqrestore(&card->lock, flags); break; case INFO3_P10: spin_lock_irqsave(&card->lock, flags); ph_command(card, W_L1CMD_AR10); spin_unlock_irqrestore(&card->lock, flags); break; case HW_RESET_REQ: spin_lock_irqsave(&card->lock, flags); if (card->state != W_L1IND_DRD) ph_command(card, W_L1CMD_RST); ph_command(card, W_L1CMD_ECK); spin_unlock_irqrestore(&card->lock, flags); break; case HW_DEACT_REQ: skb_queue_purge(&dch->squeue); if (dch->tx_skb) { dev_kfree_skb(dch->tx_skb); dch->tx_skb = NULL; } dch->tx_idx = 0; if (dch->rx_skb) { dev_kfree_skb(dch->rx_skb); dch->rx_skb = NULL; } test_and_clear_bit(FLG_TX_BUSY, &dch->Flags); if (test_and_clear_bit(FLG_BUSY_TIMER, &dch->Flags)) del_timer(&dch->timer); break; case HW_POWERUP_REQ: spin_lock_irqsave(&card->lock, flags); ph_command(card, W_L1CMD_ECK); spin_unlock_irqrestore(&card->lock, flags); break; case PH_ACTIVATE_IND: test_and_set_bit(FLG_ACTIVE, &dch->Flags); _queue_data(&dch->dev.D, cmd, MISDN_ID_ANY, 0, NULL, GFP_ATOMIC); break; case PH_DEACTIVATE_IND: test_and_clear_bit(FLG_ACTIVE, &dch->Flags); _queue_data(&dch->dev.D, cmd, MISDN_ID_ANY, 0, NULL, GFP_ATOMIC); break; default: pr_debug("%s: %s unknown command %x\n", card->name, __func__, cmd); return -1; } return 0; } static int open_dchannel(struct w6692_hw *card, struct channel_req *rq, void *caller) { pr_debug("%s: %s dev(%d) open from %p\n", card->name, __func__, card->dch.dev.id, caller); if (rq->protocol != ISDN_P_TE_S0) return -EINVAL; if (rq->adr.channel == 1) /* E-Channel not supported */ return -EINVAL; rq->ch = &card->dch.dev.D; rq->ch->protocol = rq->protocol; if (card->dch.state == 7) _queue_data(rq->ch, PH_ACTIVATE_IND, MISDN_ID_ANY, 0, NULL, GFP_KERNEL); return 0; } static int w6692_dctrl(struct mISDNchannel *ch, u32 cmd, void *arg) { struct mISDNdevice *dev = container_of(ch, struct mISDNdevice, D); struct dchannel *dch = container_of(dev, struct dchannel, dev); struct w6692_hw *card = container_of(dch, struct w6692_hw, dch); struct channel_req *rq; int err = 0; pr_debug("%s: DCTRL: %x %p\n", card->name, cmd, arg); switch (cmd) { case OPEN_CHANNEL: rq = arg; if (rq->protocol == ISDN_P_TE_S0) err = open_dchannel(card, rq, __builtin_return_address(0)); else err = open_bchannel(card, rq); if (err) break; if (!try_module_get(THIS_MODULE)) pr_info("%s: cannot get module\n", card->name); break; case CLOSE_CHANNEL: pr_debug("%s: dev(%d) close from %p\n", card->name, dch->dev.id, __builtin_return_address(0)); module_put(THIS_MODULE); break; case CONTROL_CHANNEL: err = channel_ctrl(card, arg); break; default: pr_debug("%s: unknown DCTRL command %x\n", card->name, cmd); return -EINVAL; } return err; } static int setup_w6692(struct w6692_hw *card) { u32 val; if (!request_region(card->addr, 256, card->name)) { pr_info("%s: config port %x-%x already in use\n", card->name, card->addr, card->addr + 255); return -EIO; } W6692Version(card); card->bc[0].addr = card->addr; card->bc[1].addr = card->addr + 0x40; val = ReadW6692(card, W_ISTA); if (debug & DEBUG_HW) pr_notice("%s ISTA=%02x\n", card->name, val); val = ReadW6692(card, W_IMASK); if (debug & DEBUG_HW) pr_notice("%s IMASK=%02x\n", card->name, val); val = ReadW6692(card, W_D_EXIR); if (debug & DEBUG_HW) pr_notice("%s D_EXIR=%02x\n", card->name, val); val = ReadW6692(card, W_D_EXIM); if (debug & DEBUG_HW) pr_notice("%s D_EXIM=%02x\n", card->name, val); val = ReadW6692(card, W_D_RSTA); if (debug & DEBUG_HW) pr_notice("%s D_RSTA=%02x\n", card->name, val); return 0; } static void release_card(struct w6692_hw *card) { u_long flags; spin_lock_irqsave(&card->lock, flags); disable_hwirq(card); w6692_mode(&card->bc[0], ISDN_P_NONE); w6692_mode(&card->bc[1], ISDN_P_NONE); if ((card->fmask & led) || card->subtype == W6692_USR) { card->xdata |= 0x04; /* LED OFF */ WriteW6692(card, W_XDATA, card->xdata); } spin_unlock_irqrestore(&card->lock, flags); free_irq(card->irq, card); l1_event(card->dch.l1, CLOSE_CHANNEL); mISDN_unregister_device(&card->dch.dev); release_region(card->addr, 256); mISDN_freebchannel(&card->bc[1].bch); mISDN_freebchannel(&card->bc[0].bch); mISDN_freedchannel(&card->dch); write_lock_irqsave(&card_lock, flags); list_del(&card->list); write_unlock_irqrestore(&card_lock, flags); pci_disable_device(card->pdev); pci_set_drvdata(card->pdev, NULL); kfree(card); } static int setup_instance(struct w6692_hw *card) { int i, err; u_long flags; snprintf(card->name, MISDN_MAX_IDLEN - 1, "w6692.%d", w6692_cnt + 1); write_lock_irqsave(&card_lock, flags); list_add_tail(&card->list, &Cards); write_unlock_irqrestore(&card_lock, flags); card->fmask = (1 << w6692_cnt); _set_debug(card); spin_lock_init(&card->lock); mISDN_initdchannel(&card->dch, MAX_DFRAME_LEN_L1, W6692_ph_bh); card->dch.dev.Dprotocols = (1 << ISDN_P_TE_S0); card->dch.dev.D.send = w6692_l2l1D; card->dch.dev.D.ctrl = w6692_dctrl; card->dch.dev.Bprotocols = (1 << (ISDN_P_B_RAW & ISDN_P_B_MASK)) | (1 << (ISDN_P_B_HDLC & ISDN_P_B_MASK)); card->dch.hw = card; card->dch.dev.nrbchan = 2; for (i = 0; i < 2; i++) { mISDN_initbchannel(&card->bc[i].bch, MAX_DATA_MEM, W_B_FIFO_THRESH); card->bc[i].bch.hw = card; card->bc[i].bch.nr = i + 1; card->bc[i].bch.ch.nr = i + 1; card->bc[i].bch.ch.send = w6692_l2l1B; card->bc[i].bch.ch.ctrl = w6692_bctrl; set_channelmap(i + 1, card->dch.dev.channelmap); list_add(&card->bc[i].bch.ch.list, &card->dch.dev.bchannels); } err = setup_w6692(card); if (err) goto error_setup; err = mISDN_register_device(&card->dch.dev, &card->pdev->dev, card->name); if (err) goto error_reg; err = init_card(card); if (err) goto error_init; err = create_l1(&card->dch, w6692_l1callback); if (!err) { w6692_cnt++; pr_notice("W6692 %d cards installed\n", w6692_cnt); return 0; } free_irq(card->irq, card); error_init: mISDN_unregister_device(&card->dch.dev); error_reg: release_region(card->addr, 256); error_setup: mISDN_freebchannel(&card->bc[1].bch); mISDN_freebchannel(&card->bc[0].bch); mISDN_freedchannel(&card->dch); write_lock_irqsave(&card_lock, flags); list_del(&card->list); write_unlock_irqrestore(&card_lock, flags); kfree(card); return err; } static int w6692_probe(struct pci_dev *pdev, const struct pci_device_id *ent) { int err = -ENOMEM; struct w6692_hw *card; struct w6692map *m = (struct w6692map *)ent->driver_data; card = kzalloc(sizeof(struct w6692_hw), GFP_KERNEL); if (!card) { pr_info("No kmem for w6692 card\n"); return err; } card->pdev = pdev; card->subtype = m->subtype; err = pci_enable_device(pdev); if (err) { kfree(card); return err; } printk(KERN_INFO "mISDN_w6692: found adapter %s at %s\n", m->name, pci_name(pdev)); card->addr = pci_resource_start(pdev, 1); card->irq = pdev->irq; pci_set_drvdata(pdev, card); err = setup_instance(card); if (err) pci_set_drvdata(pdev, NULL); return err; } static void w6692_remove_pci(struct pci_dev *pdev) { struct w6692_hw *card = pci_get_drvdata(pdev); if (card) release_card(card); else if (debug) pr_notice("%s: drvdata already removed\n", __func__); } static const struct pci_device_id w6692_ids[] = { { PCI_VENDOR_ID_DYNALINK, PCI_DEVICE_ID_DYNALINK_IS64PH, PCI_ANY_ID, PCI_ANY_ID, 0, 0, (ulong)&w6692_map[0]}, { PCI_VENDOR_ID_WINBOND2, PCI_DEVICE_ID_WINBOND2_6692, PCI_VENDOR_ID_USR, PCI_DEVICE_ID_USR_6692, 0, 0, (ulong)&w6692_map[2]}, { PCI_VENDOR_ID_WINBOND2, PCI_DEVICE_ID_WINBOND2_6692, PCI_ANY_ID, PCI_ANY_ID, 0, 0, (ulong)&w6692_map[1]}, { } }; MODULE_DEVICE_TABLE(pci, w6692_ids); static struct pci_driver w6692_driver = { .name = "w6692", .probe = w6692_probe, .remove = w6692_remove_pci, .id_table = w6692_ids, }; static int __init w6692_init(void) { int err; pr_notice("Winbond W6692 PCI driver Rev. %s\n", W6692_REV); err = pci_register_driver(&w6692_driver); return err; } static void __exit w6692_cleanup(void) { pci_unregister_driver(&w6692_driver); } module_init(w6692_init); module_exit(w6692_cleanup);
Information contained on this website is for historical information purposes only and does not indicate or represent copyright ownership.
Created with Cregit http://github.com/cregit/cregit
Version 2.0-RC1