|  | /* $Id: b1dma.c,v 1.1.2.3 2004/02/10 01:07:12 keil Exp $ | 
|  | * | 
|  | * Common module for AVM B1 cards that support dma with AMCC | 
|  | * | 
|  | * Copyright 2000 by Carsten Paeth <calle@calle.de> | 
|  | * | 
|  | * This software may be used and distributed according to the terms | 
|  | * of the GNU General Public License, incorporated herein by reference. | 
|  | * | 
|  | */ | 
|  |  | 
|  | #include <linux/module.h> | 
|  | #include <linux/kernel.h> | 
|  | #include <linux/proc_fs.h> | 
|  | #include <linux/seq_file.h> | 
|  | #include <linux/skbuff.h> | 
|  | #include <linux/delay.h> | 
|  | #include <linux/mm.h> | 
|  | #include <linux/interrupt.h> | 
|  | #include <linux/ioport.h> | 
|  | #include <linux/capi.h> | 
|  | #include <linux/kernelcapi.h> | 
|  | #include <asm/io.h> | 
|  | #include <linux/init.h> | 
|  | #include <asm/uaccess.h> | 
|  | #include <linux/netdevice.h> | 
|  | #include <linux/isdn/capilli.h> | 
|  | #include "avmcard.h" | 
|  | #include <linux/isdn/capicmd.h> | 
|  | #include <linux/isdn/capiutil.h> | 
|  |  | 
|  | static char *revision = "$Revision: 1.1.2.3 $"; | 
|  |  | 
|  | #undef AVM_B1DMA_DEBUG | 
|  |  | 
|  | /* ------------------------------------------------------------- */ | 
|  |  | 
|  | MODULE_DESCRIPTION("CAPI4Linux: DMA support for active AVM cards"); | 
|  | MODULE_AUTHOR("Carsten Paeth"); | 
|  | MODULE_LICENSE("GPL"); | 
|  |  | 
|  | static int suppress_pollack = 0; | 
|  | module_param(suppress_pollack, bool, 0); | 
|  |  | 
|  | /* ------------------------------------------------------------- */ | 
|  |  | 
|  | static void b1dma_dispatch_tx(avmcard *card); | 
|  |  | 
|  | /* ------------------------------------------------------------- */ | 
|  |  | 
|  | /* S5933 */ | 
|  |  | 
|  | #define	AMCC_RXPTR	0x24 | 
|  | #define	AMCC_RXLEN	0x28 | 
|  | #define	AMCC_TXPTR	0x2c | 
|  | #define	AMCC_TXLEN	0x30 | 
|  |  | 
|  | #define	AMCC_INTCSR	0x38 | 
|  | #	define EN_READ_TC_INT		0x00008000L | 
|  | #	define EN_WRITE_TC_INT		0x00004000L | 
|  | #	define EN_TX_TC_INT		EN_READ_TC_INT | 
|  | #	define EN_RX_TC_INT		EN_WRITE_TC_INT | 
|  | #	define AVM_FLAG			0x30000000L | 
|  |  | 
|  | #	define ANY_S5933_INT		0x00800000L | 
|  | #	define READ_TC_INT		0x00080000L | 
|  | #	define WRITE_TC_INT		0x00040000L | 
|  | #	define	TX_TC_INT		READ_TC_INT | 
|  | #	define	RX_TC_INT		WRITE_TC_INT | 
|  | #	define MASTER_ABORT_INT		0x00100000L | 
|  | #	define TARGET_ABORT_INT		0x00200000L | 
|  | #	define BUS_MASTER_INT		0x00200000L | 
|  | #	define ALL_INT			0x000C0000L | 
|  |  | 
|  | #define	AMCC_MCSR	0x3c | 
|  | #	define A2P_HI_PRIORITY		0x00000100L | 
|  | #	define EN_A2P_TRANSFERS		0x00000400L | 
|  | #	define P2A_HI_PRIORITY		0x00001000L | 
|  | #	define EN_P2A_TRANSFERS		0x00004000L | 
|  | #	define RESET_A2P_FLAGS		0x04000000L | 
|  | #	define RESET_P2A_FLAGS		0x02000000L | 
|  |  | 
|  | /* ------------------------------------------------------------- */ | 
|  |  | 
|  | static inline void b1dma_writel(avmcard *card, u32 value, int off) | 
|  | { | 
|  | writel(value, card->mbase + off); | 
|  | } | 
|  |  | 
|  | static inline u32 b1dma_readl(avmcard *card, int off) | 
|  | { | 
|  | return readl(card->mbase + off); | 
|  | } | 
|  |  | 
|  | /* ------------------------------------------------------------- */ | 
|  |  | 
|  | static inline int b1dma_tx_empty(unsigned int port) | 
|  | { | 
|  | return inb(port + 0x03) & 0x1; | 
|  | } | 
|  |  | 
|  | static inline int b1dma_rx_full(unsigned int port) | 
|  | { | 
|  | return inb(port + 0x02) & 0x1; | 
|  | } | 
|  |  | 
|  | static int b1dma_tolink(avmcard *card, void *buf, unsigned int len) | 
|  | { | 
|  | unsigned long stop = jiffies + 1 * HZ;	/* maximum wait time 1 sec */ | 
|  | unsigned char *s = (unsigned char *)buf; | 
|  | while (len--) { | 
|  | while (   !b1dma_tx_empty(card->port) | 
|  | && time_before(jiffies, stop)); | 
|  | if (!b1dma_tx_empty(card->port)) | 
|  | return -1; | 
|  | t1outp(card->port, 0x01, *s++); | 
|  | } | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | static int b1dma_fromlink(avmcard *card, void *buf, unsigned int len) | 
|  | { | 
|  | unsigned long stop = jiffies + 1 * HZ;	/* maximum wait time 1 sec */ | 
|  | unsigned char *s = (unsigned char *)buf; | 
|  | while (len--) { | 
|  | while (   !b1dma_rx_full(card->port) | 
|  | && time_before(jiffies, stop)); | 
|  | if (!b1dma_rx_full(card->port)) | 
|  | return -1; | 
|  | *s++ = t1inp(card->port, 0x00); | 
|  | } | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | static int WriteReg(avmcard *card, u32 reg, u8 val) | 
|  | { | 
|  | u8 cmd = 0x00; | 
|  | if (   b1dma_tolink(card, &cmd, 1) == 0 | 
|  | && b1dma_tolink(card, ®, 4) == 0) { | 
|  | u32 tmp = val; | 
|  | return b1dma_tolink(card, &tmp, 4); | 
|  | } | 
|  | return -1; | 
|  | } | 
|  |  | 
|  | static u8 ReadReg(avmcard *card, u32 reg) | 
|  | { | 
|  | u8 cmd = 0x01; | 
|  | if (   b1dma_tolink(card, &cmd, 1) == 0 | 
|  | && b1dma_tolink(card, ®, 4) == 0) { | 
|  | u32 tmp; | 
|  | if (b1dma_fromlink(card, &tmp, 4) == 0) | 
|  | return (u8)tmp; | 
|  | } | 
|  | return 0xff; | 
|  | } | 
|  |  | 
|  | /* ------------------------------------------------------------- */ | 
|  |  | 
|  | static inline void _put_byte(void **pp, u8 val) | 
|  | { | 
|  | u8 *s = *pp; | 
|  | *s++ = val; | 
|  | *pp = s; | 
|  | } | 
|  |  | 
|  | static inline void _put_word(void **pp, u32 val) | 
|  | { | 
|  | u8 *s = *pp; | 
|  | *s++ = val & 0xff; | 
|  | *s++ = (val >> 8) & 0xff; | 
|  | *s++ = (val >> 16) & 0xff; | 
|  | *s++ = (val >> 24) & 0xff; | 
|  | *pp = s; | 
|  | } | 
|  |  | 
|  | static inline void _put_slice(void **pp, unsigned char *dp, unsigned int len) | 
|  | { | 
|  | unsigned i = len; | 
|  | _put_word(pp, i); | 
|  | while (i-- > 0) | 
|  | _put_byte(pp, *dp++); | 
|  | } | 
|  |  | 
|  | static inline u8 _get_byte(void **pp) | 
|  | { | 
|  | u8 *s = *pp; | 
|  | u8 val; | 
|  | val = *s++; | 
|  | *pp = s; | 
|  | return val; | 
|  | } | 
|  |  | 
|  | static inline u32 _get_word(void **pp) | 
|  | { | 
|  | u8 *s = *pp; | 
|  | u32 val; | 
|  | val = *s++; | 
|  | val |= (*s++ << 8); | 
|  | val |= (*s++ << 16); | 
|  | val |= (*s++ << 24); | 
|  | *pp = s; | 
|  | return val; | 
|  | } | 
|  |  | 
|  | static inline u32 _get_slice(void **pp, unsigned char *dp) | 
|  | { | 
|  | unsigned int len, i; | 
|  |  | 
|  | len = i = _get_word(pp); | 
|  | while (i-- > 0) *dp++ = _get_byte(pp); | 
|  | return len; | 
|  | } | 
|  |  | 
|  | /* ------------------------------------------------------------- */ | 
|  |  | 
|  | void b1dma_reset(avmcard *card) | 
|  | { | 
|  | card->csr = 0x0; | 
|  | b1dma_writel(card, card->csr, AMCC_INTCSR); | 
|  | b1dma_writel(card, 0, AMCC_MCSR); | 
|  | b1dma_writel(card, 0, AMCC_RXLEN); | 
|  | b1dma_writel(card, 0, AMCC_TXLEN); | 
|  |  | 
|  | t1outp(card->port, 0x10, 0x00); | 
|  | t1outp(card->port, 0x07, 0x00); | 
|  |  | 
|  | b1dma_writel(card, 0, AMCC_MCSR); | 
|  | mdelay(10); | 
|  | b1dma_writel(card, 0x0f000000, AMCC_MCSR); /* reset all */ | 
|  | mdelay(10); | 
|  | b1dma_writel(card, 0, AMCC_MCSR); | 
|  | if (card->cardtype == avm_t1pci) | 
|  | mdelay(42); | 
|  | else | 
|  | mdelay(10); | 
|  | } | 
|  |  | 
|  | /* ------------------------------------------------------------- */ | 
|  |  | 
|  | static int b1dma_detect(avmcard *card) | 
|  | { | 
|  | b1dma_writel(card, 0, AMCC_MCSR); | 
|  | mdelay(10); | 
|  | b1dma_writel(card, 0x0f000000, AMCC_MCSR); /* reset all */ | 
|  | mdelay(10); | 
|  | b1dma_writel(card, 0, AMCC_MCSR); | 
|  | mdelay(42); | 
|  |  | 
|  | b1dma_writel(card, 0, AMCC_RXLEN); | 
|  | b1dma_writel(card, 0, AMCC_TXLEN); | 
|  | card->csr = 0x0; | 
|  | b1dma_writel(card, card->csr, AMCC_INTCSR); | 
|  |  | 
|  | if (b1dma_readl(card, AMCC_MCSR) != 0x000000E6) | 
|  | return 1; | 
|  |  | 
|  | b1dma_writel(card, 0xffffffff, AMCC_RXPTR); | 
|  | b1dma_writel(card, 0xffffffff, AMCC_TXPTR); | 
|  | if (   b1dma_readl(card, AMCC_RXPTR) != 0xfffffffc | 
|  | || b1dma_readl(card, AMCC_TXPTR) != 0xfffffffc) | 
|  | return 2; | 
|  |  | 
|  | b1dma_writel(card, 0x0, AMCC_RXPTR); | 
|  | b1dma_writel(card, 0x0, AMCC_TXPTR); | 
|  | if (   b1dma_readl(card, AMCC_RXPTR) != 0x0 | 
|  | || b1dma_readl(card, AMCC_TXPTR) != 0x0) | 
|  | return 3; | 
|  |  | 
|  | t1outp(card->port, 0x10, 0x00); | 
|  | t1outp(card->port, 0x07, 0x00); | 
|  |  | 
|  | t1outp(card->port, 0x02, 0x02); | 
|  | t1outp(card->port, 0x03, 0x02); | 
|  |  | 
|  | if (   (t1inp(card->port, 0x02) & 0xFE) != 0x02 | 
|  | || t1inp(card->port, 0x3) != 0x03) | 
|  | return 4; | 
|  |  | 
|  | t1outp(card->port, 0x02, 0x00); | 
|  | t1outp(card->port, 0x03, 0x00); | 
|  |  | 
|  | if (   (t1inp(card->port, 0x02) & 0xFE) != 0x00 | 
|  | || t1inp(card->port, 0x3) != 0x01) | 
|  | return 5; | 
|  |  | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | int t1pci_detect(avmcard *card) | 
|  | { | 
|  | int ret; | 
|  |  | 
|  | if ((ret = b1dma_detect(card)) != 0) | 
|  | return ret; | 
|  |  | 
|  | /* Transputer test */ | 
|  |  | 
|  | if (   WriteReg(card, 0x80001000, 0x11) != 0 | 
|  | || WriteReg(card, 0x80101000, 0x22) != 0 | 
|  | || WriteReg(card, 0x80201000, 0x33) != 0 | 
|  | || WriteReg(card, 0x80301000, 0x44) != 0) | 
|  | return 6; | 
|  |  | 
|  | if (   ReadReg(card, 0x80001000) != 0x11 | 
|  | || ReadReg(card, 0x80101000) != 0x22 | 
|  | || ReadReg(card, 0x80201000) != 0x33 | 
|  | || ReadReg(card, 0x80301000) != 0x44) | 
|  | return 7; | 
|  |  | 
|  | if (   WriteReg(card, 0x80001000, 0x55) != 0 | 
|  | || WriteReg(card, 0x80101000, 0x66) != 0 | 
|  | || WriteReg(card, 0x80201000, 0x77) != 0 | 
|  | || WriteReg(card, 0x80301000, 0x88) != 0) | 
|  | return 8; | 
|  |  | 
|  | if (   ReadReg(card, 0x80001000) != 0x55 | 
|  | || ReadReg(card, 0x80101000) != 0x66 | 
|  | || ReadReg(card, 0x80201000) != 0x77 | 
|  | || ReadReg(card, 0x80301000) != 0x88) | 
|  | return 9; | 
|  |  | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | int b1pciv4_detect(avmcard *card) | 
|  | { | 
|  | int ret, i; | 
|  |  | 
|  | if ((ret = b1dma_detect(card)) != 0) | 
|  | return ret; | 
|  |  | 
|  | for (i=0; i < 5 ; i++) { | 
|  | if (WriteReg(card, 0x80A00000, 0x21) != 0) | 
|  | return 6; | 
|  | if ((ReadReg(card, 0x80A00000) & 0x01) != 0x01) | 
|  | return 7; | 
|  | } | 
|  | for (i=0; i < 5 ; i++) { | 
|  | if (WriteReg(card, 0x80A00000, 0x20) != 0) | 
|  | return 8; | 
|  | if ((ReadReg(card, 0x80A00000) & 0x01) != 0x00) | 
|  | return 9; | 
|  | } | 
|  |  | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | static void b1dma_queue_tx(avmcard *card, struct sk_buff *skb) | 
|  | { | 
|  | unsigned long flags; | 
|  |  | 
|  | spin_lock_irqsave(&card->lock, flags); | 
|  |  | 
|  | skb_queue_tail(&card->dma->send_queue, skb); | 
|  |  | 
|  | if (!(card->csr & EN_TX_TC_INT)) { | 
|  | b1dma_dispatch_tx(card); | 
|  | b1dma_writel(card, card->csr, AMCC_INTCSR); | 
|  | } | 
|  |  | 
|  | spin_unlock_irqrestore(&card->lock, flags); | 
|  | } | 
|  |  | 
|  | /* ------------------------------------------------------------- */ | 
|  |  | 
|  | static void b1dma_dispatch_tx(avmcard *card) | 
|  | { | 
|  | avmcard_dmainfo *dma = card->dma; | 
|  | struct sk_buff *skb; | 
|  | u8 cmd, subcmd; | 
|  | u16 len; | 
|  | u32 txlen; | 
|  | void *p; | 
|  |  | 
|  | skb = skb_dequeue(&dma->send_queue); | 
|  |  | 
|  | len = CAPIMSG_LEN(skb->data); | 
|  |  | 
|  | if (len) { | 
|  | cmd = CAPIMSG_COMMAND(skb->data); | 
|  | subcmd = CAPIMSG_SUBCOMMAND(skb->data); | 
|  |  | 
|  | p = dma->sendbuf.dmabuf; | 
|  |  | 
|  | if (CAPICMD(cmd, subcmd) == CAPI_DATA_B3_REQ) { | 
|  | u16 dlen = CAPIMSG_DATALEN(skb->data); | 
|  | _put_byte(&p, SEND_DATA_B3_REQ); | 
|  | _put_slice(&p, skb->data, len); | 
|  | _put_slice(&p, skb->data + len, dlen); | 
|  | } else { | 
|  | _put_byte(&p, SEND_MESSAGE); | 
|  | _put_slice(&p, skb->data, len); | 
|  | } | 
|  | txlen = (u8 *)p - (u8 *)dma->sendbuf.dmabuf; | 
|  | #ifdef AVM_B1DMA_DEBUG | 
|  | printk(KERN_DEBUG "tx: put msg len=%d\n", txlen); | 
|  | #endif | 
|  | } else { | 
|  | txlen = skb->len-2; | 
|  | #ifdef AVM_B1DMA_POLLDEBUG | 
|  | if (skb->data[2] == SEND_POLLACK) | 
|  | printk(KERN_INFO "%s: send ack\n", card->name); | 
|  | #endif | 
|  | #ifdef AVM_B1DMA_DEBUG | 
|  | printk(KERN_DEBUG "tx: put 0x%x len=%d\n", | 
|  | skb->data[2], txlen); | 
|  | #endif | 
|  | skb_copy_from_linear_data_offset(skb, 2, dma->sendbuf.dmabuf, | 
|  | skb->len - 2); | 
|  | } | 
|  | txlen = (txlen + 3) & ~3; | 
|  |  | 
|  | b1dma_writel(card, dma->sendbuf.dmaaddr, AMCC_TXPTR); | 
|  | b1dma_writel(card, txlen, AMCC_TXLEN); | 
|  |  | 
|  | card->csr |= EN_TX_TC_INT; | 
|  |  | 
|  | dev_kfree_skb_any(skb); | 
|  | } | 
|  |  | 
|  | /* ------------------------------------------------------------- */ | 
|  |  | 
|  | static void queue_pollack(avmcard *card) | 
|  | { | 
|  | struct sk_buff *skb; | 
|  | void *p; | 
|  |  | 
|  | skb = alloc_skb(3, GFP_ATOMIC); | 
|  | if (!skb) { | 
|  | printk(KERN_CRIT "%s: no memory, lost poll ack\n", | 
|  | card->name); | 
|  | return; | 
|  | } | 
|  | p = skb->data; | 
|  | _put_byte(&p, 0); | 
|  | _put_byte(&p, 0); | 
|  | _put_byte(&p, SEND_POLLACK); | 
|  | skb_put(skb, (u8 *)p - (u8 *)skb->data); | 
|  |  | 
|  | b1dma_queue_tx(card, skb); | 
|  | } | 
|  |  | 
|  | /* ------------------------------------------------------------- */ | 
|  |  | 
|  | static void b1dma_handle_rx(avmcard *card) | 
|  | { | 
|  | avmctrl_info *cinfo = &card->ctrlinfo[0]; | 
|  | avmcard_dmainfo *dma = card->dma; | 
|  | struct capi_ctr *ctrl = &cinfo->capi_ctrl; | 
|  | struct sk_buff *skb; | 
|  | void *p = dma->recvbuf.dmabuf+4; | 
|  | u32 ApplId, MsgLen, DataB3Len, NCCI, WindowSize; | 
|  | u8 b1cmd =  _get_byte(&p); | 
|  |  | 
|  | #ifdef AVM_B1DMA_DEBUG | 
|  | printk(KERN_DEBUG "rx: 0x%x %lu\n", b1cmd, (unsigned long)dma->recvlen); | 
|  | #endif | 
|  |  | 
|  | switch (b1cmd) { | 
|  | case RECEIVE_DATA_B3_IND: | 
|  |  | 
|  | ApplId = (unsigned) _get_word(&p); | 
|  | MsgLen = _get_slice(&p, card->msgbuf); | 
|  | DataB3Len = _get_slice(&p, card->databuf); | 
|  |  | 
|  | if (MsgLen < 30) { /* not CAPI 64Bit */ | 
|  | memset(card->msgbuf+MsgLen, 0, 30-MsgLen); | 
|  | MsgLen = 30; | 
|  | CAPIMSG_SETLEN(card->msgbuf, 30); | 
|  | } | 
|  | if (!(skb = alloc_skb(DataB3Len+MsgLen, GFP_ATOMIC))) { | 
|  | printk(KERN_ERR "%s: incoming packet dropped\n", | 
|  | card->name); | 
|  | } else { | 
|  | memcpy(skb_put(skb, MsgLen), card->msgbuf, MsgLen); | 
|  | memcpy(skb_put(skb, DataB3Len), card->databuf, DataB3Len); | 
|  | capi_ctr_handle_message(ctrl, ApplId, skb); | 
|  | } | 
|  | break; | 
|  |  | 
|  | case RECEIVE_MESSAGE: | 
|  |  | 
|  | ApplId = (unsigned) _get_word(&p); | 
|  | MsgLen = _get_slice(&p, card->msgbuf); | 
|  | if (!(skb = alloc_skb(MsgLen, GFP_ATOMIC))) { | 
|  | printk(KERN_ERR "%s: incoming packet dropped\n", | 
|  | card->name); | 
|  | } else { | 
|  | memcpy(skb_put(skb, MsgLen), card->msgbuf, MsgLen); | 
|  | if (CAPIMSG_CMD(skb->data) == CAPI_DATA_B3_CONF) { | 
|  | spin_lock(&card->lock); | 
|  | capilib_data_b3_conf(&cinfo->ncci_head, ApplId, | 
|  | CAPIMSG_NCCI(skb->data), | 
|  | CAPIMSG_MSGID(skb->data)); | 
|  | spin_unlock(&card->lock); | 
|  | } | 
|  | capi_ctr_handle_message(ctrl, ApplId, skb); | 
|  | } | 
|  | break; | 
|  |  | 
|  | case RECEIVE_NEW_NCCI: | 
|  |  | 
|  | ApplId = _get_word(&p); | 
|  | NCCI = _get_word(&p); | 
|  | WindowSize = _get_word(&p); | 
|  | spin_lock(&card->lock); | 
|  | capilib_new_ncci(&cinfo->ncci_head, ApplId, NCCI, WindowSize); | 
|  | spin_unlock(&card->lock); | 
|  | break; | 
|  |  | 
|  | case RECEIVE_FREE_NCCI: | 
|  |  | 
|  | ApplId = _get_word(&p); | 
|  | NCCI = _get_word(&p); | 
|  |  | 
|  | if (NCCI != 0xffffffff) { | 
|  | spin_lock(&card->lock); | 
|  | capilib_free_ncci(&cinfo->ncci_head, ApplId, NCCI); | 
|  | spin_unlock(&card->lock); | 
|  | } | 
|  | break; | 
|  |  | 
|  | case RECEIVE_START: | 
|  | #ifdef AVM_B1DMA_POLLDEBUG | 
|  | printk(KERN_INFO "%s: receive poll\n", card->name); | 
|  | #endif | 
|  | if (!suppress_pollack) | 
|  | queue_pollack(card); | 
|  | capi_ctr_resume_output(ctrl); | 
|  | break; | 
|  |  | 
|  | case RECEIVE_STOP: | 
|  | capi_ctr_suspend_output(ctrl); | 
|  | break; | 
|  |  | 
|  | case RECEIVE_INIT: | 
|  |  | 
|  | cinfo->versionlen = _get_slice(&p, cinfo->versionbuf); | 
|  | b1_parse_version(cinfo); | 
|  | printk(KERN_INFO "%s: %s-card (%s) now active\n", | 
|  | card->name, | 
|  | cinfo->version[VER_CARDTYPE], | 
|  | cinfo->version[VER_DRIVER]); | 
|  | capi_ctr_ready(ctrl); | 
|  | break; | 
|  |  | 
|  | case RECEIVE_TASK_READY: | 
|  | ApplId = (unsigned) _get_word(&p); | 
|  | MsgLen = _get_slice(&p, card->msgbuf); | 
|  | card->msgbuf[MsgLen] = 0; | 
|  | while (    MsgLen > 0 | 
|  | && (   card->msgbuf[MsgLen-1] == '\n' | 
|  | || card->msgbuf[MsgLen-1] == '\r')) { | 
|  | card->msgbuf[MsgLen-1] = 0; | 
|  | MsgLen--; | 
|  | } | 
|  | printk(KERN_INFO "%s: task %d \"%s\" ready.\n", | 
|  | card->name, ApplId, card->msgbuf); | 
|  | break; | 
|  |  | 
|  | case RECEIVE_DEBUGMSG: | 
|  | MsgLen = _get_slice(&p, card->msgbuf); | 
|  | card->msgbuf[MsgLen] = 0; | 
|  | while (    MsgLen > 0 | 
|  | && (   card->msgbuf[MsgLen-1] == '\n' | 
|  | || card->msgbuf[MsgLen-1] == '\r')) { | 
|  | card->msgbuf[MsgLen-1] = 0; | 
|  | MsgLen--; | 
|  | } | 
|  | printk(KERN_INFO "%s: DEBUG: %s\n", card->name, card->msgbuf); | 
|  | break; | 
|  |  | 
|  | default: | 
|  | printk(KERN_ERR "%s: b1dma_interrupt: 0x%x ???\n", | 
|  | card->name, b1cmd); | 
|  | return; | 
|  | } | 
|  | } | 
|  |  | 
|  | /* ------------------------------------------------------------- */ | 
|  |  | 
|  | static void b1dma_handle_interrupt(avmcard *card) | 
|  | { | 
|  | u32 status; | 
|  | u32 newcsr; | 
|  |  | 
|  | spin_lock(&card->lock); | 
|  |  | 
|  | status = b1dma_readl(card, AMCC_INTCSR); | 
|  | if ((status & ANY_S5933_INT) == 0) { | 
|  | spin_unlock(&card->lock); | 
|  | return; | 
|  | } | 
|  |  | 
|  | newcsr = card->csr | (status & ALL_INT); | 
|  | if (status & TX_TC_INT) newcsr &= ~EN_TX_TC_INT; | 
|  | if (status & RX_TC_INT) newcsr &= ~EN_RX_TC_INT; | 
|  | b1dma_writel(card, newcsr, AMCC_INTCSR); | 
|  |  | 
|  | if ((status & RX_TC_INT) != 0) { | 
|  | struct avmcard_dmainfo *dma = card->dma; | 
|  | u32 rxlen; | 
|  | if (card->dma->recvlen == 0) { | 
|  | rxlen = b1dma_readl(card, AMCC_RXLEN); | 
|  | if (rxlen == 0) { | 
|  | dma->recvlen = *((u32 *)dma->recvbuf.dmabuf); | 
|  | rxlen = (dma->recvlen + 3) & ~3; | 
|  | b1dma_writel(card, dma->recvbuf.dmaaddr+4, AMCC_RXPTR); | 
|  | b1dma_writel(card, rxlen, AMCC_RXLEN); | 
|  | #ifdef AVM_B1DMA_DEBUG | 
|  | } else { | 
|  | printk(KERN_ERR "%s: rx not complete (%d).\n", | 
|  | card->name, rxlen); | 
|  | #endif | 
|  | } | 
|  | } else { | 
|  | spin_unlock(&card->lock); | 
|  | b1dma_handle_rx(card); | 
|  | dma->recvlen = 0; | 
|  | spin_lock(&card->lock); | 
|  | b1dma_writel(card, dma->recvbuf.dmaaddr, AMCC_RXPTR); | 
|  | b1dma_writel(card, 4, AMCC_RXLEN); | 
|  | } | 
|  | } | 
|  |  | 
|  | if ((status & TX_TC_INT) != 0) { | 
|  | if (skb_queue_empty(&card->dma->send_queue)) | 
|  | card->csr &= ~EN_TX_TC_INT; | 
|  | else | 
|  | b1dma_dispatch_tx(card); | 
|  | } | 
|  | b1dma_writel(card, card->csr, AMCC_INTCSR); | 
|  |  | 
|  | spin_unlock(&card->lock); | 
|  | } | 
|  |  | 
|  | irqreturn_t b1dma_interrupt(int interrupt, void *devptr) | 
|  | { | 
|  | avmcard *card = devptr; | 
|  |  | 
|  | b1dma_handle_interrupt(card); | 
|  | return IRQ_HANDLED; | 
|  | } | 
|  |  | 
|  | /* ------------------------------------------------------------- */ | 
|  |  | 
|  | static int b1dma_loaded(avmcard *card) | 
|  | { | 
|  | unsigned long stop; | 
|  | unsigned char ans; | 
|  | unsigned long tout = 2; | 
|  | unsigned int base = card->port; | 
|  |  | 
|  | for (stop = jiffies + tout * HZ; time_before(jiffies, stop);) { | 
|  | if (b1_tx_empty(base)) | 
|  | break; | 
|  | } | 
|  | if (!b1_tx_empty(base)) { | 
|  | printk(KERN_ERR "%s: b1dma_loaded: tx err, corrupted t4 file ?\n", | 
|  | card->name); | 
|  | return 0; | 
|  | } | 
|  | b1_put_byte(base, SEND_POLLACK); | 
|  | for (stop = jiffies + tout * HZ; time_before(jiffies, stop);) { | 
|  | if (b1_rx_full(base)) { | 
|  | if ((ans = b1_get_byte(base)) == RECEIVE_POLLDWORD) { | 
|  | return 1; | 
|  | } | 
|  | printk(KERN_ERR "%s: b1dma_loaded: got 0x%x, firmware not running in dword mode\n", card->name, ans); | 
|  | return 0; | 
|  | } | 
|  | } | 
|  | printk(KERN_ERR "%s: b1dma_loaded: firmware not running\n", card->name); | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | /* ------------------------------------------------------------- */ | 
|  |  | 
|  | static void b1dma_send_init(avmcard *card) | 
|  | { | 
|  | struct sk_buff *skb; | 
|  | void *p; | 
|  |  | 
|  | skb = alloc_skb(15, GFP_ATOMIC); | 
|  | if (!skb) { | 
|  | printk(KERN_CRIT "%s: no memory, lost register appl.\n", | 
|  | card->name); | 
|  | return; | 
|  | } | 
|  | p = skb->data; | 
|  | _put_byte(&p, 0); | 
|  | _put_byte(&p, 0); | 
|  | _put_byte(&p, SEND_INIT); | 
|  | _put_word(&p, CAPI_MAXAPPL); | 
|  | _put_word(&p, AVM_NCCI_PER_CHANNEL*30); | 
|  | _put_word(&p, card->cardnr - 1); | 
|  | skb_put(skb, (u8 *)p - (u8 *)skb->data); | 
|  |  | 
|  | b1dma_queue_tx(card, skb); | 
|  | } | 
|  |  | 
|  | int b1dma_load_firmware(struct capi_ctr *ctrl, capiloaddata *data) | 
|  | { | 
|  | avmctrl_info *cinfo = (avmctrl_info *)(ctrl->driverdata); | 
|  | avmcard *card = cinfo->card; | 
|  | int retval; | 
|  |  | 
|  | b1dma_reset(card); | 
|  |  | 
|  | if ((retval = b1_load_t4file(card, &data->firmware))) { | 
|  | b1dma_reset(card); | 
|  | printk(KERN_ERR "%s: failed to load t4file!!\n", | 
|  | card->name); | 
|  | return retval; | 
|  | } | 
|  |  | 
|  | if (data->configuration.len > 0 && data->configuration.data) { | 
|  | if ((retval = b1_load_config(card, &data->configuration))) { | 
|  | b1dma_reset(card); | 
|  | printk(KERN_ERR "%s: failed to load config!!\n", | 
|  | card->name); | 
|  | return retval; | 
|  | } | 
|  | } | 
|  |  | 
|  | if (!b1dma_loaded(card)) { | 
|  | b1dma_reset(card); | 
|  | printk(KERN_ERR "%s: failed to load t4file.\n", card->name); | 
|  | return -EIO; | 
|  | } | 
|  |  | 
|  | card->csr = AVM_FLAG; | 
|  | b1dma_writel(card, card->csr, AMCC_INTCSR); | 
|  | b1dma_writel(card, EN_A2P_TRANSFERS|EN_P2A_TRANSFERS|A2P_HI_PRIORITY| | 
|  | P2A_HI_PRIORITY|RESET_A2P_FLAGS|RESET_P2A_FLAGS, | 
|  | AMCC_MCSR); | 
|  | t1outp(card->port, 0x07, 0x30); | 
|  | t1outp(card->port, 0x10, 0xF0); | 
|  |  | 
|  | card->dma->recvlen = 0; | 
|  | b1dma_writel(card, card->dma->recvbuf.dmaaddr, AMCC_RXPTR); | 
|  | b1dma_writel(card, 4, AMCC_RXLEN); | 
|  | card->csr |= EN_RX_TC_INT; | 
|  | b1dma_writel(card, card->csr, AMCC_INTCSR); | 
|  |  | 
|  | b1dma_send_init(card); | 
|  |  | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | void b1dma_reset_ctr(struct capi_ctr *ctrl) | 
|  | { | 
|  | avmctrl_info *cinfo = (avmctrl_info *)(ctrl->driverdata); | 
|  | avmcard *card = cinfo->card; | 
|  | unsigned long flags; | 
|  |  | 
|  | spin_lock_irqsave(&card->lock, flags); | 
|  | b1dma_reset(card); | 
|  |  | 
|  | memset(cinfo->version, 0, sizeof(cinfo->version)); | 
|  | capilib_release(&cinfo->ncci_head); | 
|  | spin_unlock_irqrestore(&card->lock, flags); | 
|  | capi_ctr_down(ctrl); | 
|  | } | 
|  |  | 
|  | /* ------------------------------------------------------------- */ | 
|  |  | 
|  | void b1dma_register_appl(struct capi_ctr *ctrl, | 
|  | u16 appl, | 
|  | capi_register_params *rp) | 
|  | { | 
|  | avmctrl_info *cinfo = (avmctrl_info *)(ctrl->driverdata); | 
|  | avmcard *card = cinfo->card; | 
|  | struct sk_buff *skb; | 
|  | int want = rp->level3cnt; | 
|  | int nconn; | 
|  | void *p; | 
|  |  | 
|  | if (want > 0) nconn = want; | 
|  | else nconn = ctrl->profile.nbchannel * -want; | 
|  | if (nconn == 0) nconn = ctrl->profile.nbchannel; | 
|  |  | 
|  | skb = alloc_skb(23, GFP_ATOMIC); | 
|  | if (!skb) { | 
|  | printk(KERN_CRIT "%s: no memory, lost register appl.\n", | 
|  | card->name); | 
|  | return; | 
|  | } | 
|  | p = skb->data; | 
|  | _put_byte(&p, 0); | 
|  | _put_byte(&p, 0); | 
|  | _put_byte(&p, SEND_REGISTER); | 
|  | _put_word(&p, appl); | 
|  | _put_word(&p, 1024 * (nconn+1)); | 
|  | _put_word(&p, nconn); | 
|  | _put_word(&p, rp->datablkcnt); | 
|  | _put_word(&p, rp->datablklen); | 
|  | skb_put(skb, (u8 *)p - (u8 *)skb->data); | 
|  |  | 
|  | b1dma_queue_tx(card, skb); | 
|  | } | 
|  |  | 
|  | /* ------------------------------------------------------------- */ | 
|  |  | 
|  | void b1dma_release_appl(struct capi_ctr *ctrl, u16 appl) | 
|  | { | 
|  | avmctrl_info *cinfo = (avmctrl_info *)(ctrl->driverdata); | 
|  | avmcard *card = cinfo->card; | 
|  | struct sk_buff *skb; | 
|  | void *p; | 
|  | unsigned long flags; | 
|  |  | 
|  | spin_lock_irqsave(&card->lock, flags); | 
|  | capilib_release_appl(&cinfo->ncci_head, appl); | 
|  | spin_unlock_irqrestore(&card->lock, flags); | 
|  |  | 
|  | skb = alloc_skb(7, GFP_ATOMIC); | 
|  | if (!skb) { | 
|  | printk(KERN_CRIT "%s: no memory, lost release appl.\n", | 
|  | card->name); | 
|  | return; | 
|  | } | 
|  | p = skb->data; | 
|  | _put_byte(&p, 0); | 
|  | _put_byte(&p, 0); | 
|  | _put_byte(&p, SEND_RELEASE); | 
|  | _put_word(&p, appl); | 
|  |  | 
|  | skb_put(skb, (u8 *)p - (u8 *)skb->data); | 
|  |  | 
|  | b1dma_queue_tx(card, skb); | 
|  | } | 
|  |  | 
|  | /* ------------------------------------------------------------- */ | 
|  |  | 
|  | u16 b1dma_send_message(struct capi_ctr *ctrl, struct sk_buff *skb) | 
|  | { | 
|  | avmctrl_info *cinfo = (avmctrl_info *)(ctrl->driverdata); | 
|  | avmcard *card = cinfo->card; | 
|  | u16 retval = CAPI_NOERROR; | 
|  |  | 
|  | if (CAPIMSG_CMD(skb->data) == CAPI_DATA_B3_REQ) { | 
|  | unsigned long flags; | 
|  | spin_lock_irqsave(&card->lock, flags); | 
|  | retval = capilib_data_b3_req(&cinfo->ncci_head, | 
|  | CAPIMSG_APPID(skb->data), | 
|  | CAPIMSG_NCCI(skb->data), | 
|  | CAPIMSG_MSGID(skb->data)); | 
|  | spin_unlock_irqrestore(&card->lock, flags); | 
|  | } | 
|  | if (retval == CAPI_NOERROR) | 
|  | b1dma_queue_tx(card, skb); | 
|  |  | 
|  | return retval; | 
|  | } | 
|  |  | 
|  | /* ------------------------------------------------------------- */ | 
|  |  | 
|  | static int b1dmactl_proc_show(struct seq_file *m, void *v) | 
|  | { | 
|  | struct capi_ctr *ctrl = m->private; | 
|  | avmctrl_info *cinfo = (avmctrl_info *)(ctrl->driverdata); | 
|  | avmcard *card = cinfo->card; | 
|  | u8 flag; | 
|  | char *s; | 
|  | u32 txoff, txlen, rxoff, rxlen, csr; | 
|  | unsigned long flags; | 
|  |  | 
|  | seq_printf(m, "%-16s %s\n", "name", card->name); | 
|  | seq_printf(m, "%-16s 0x%x\n", "io", card->port); | 
|  | seq_printf(m, "%-16s %d\n", "irq", card->irq); | 
|  | seq_printf(m, "%-16s 0x%lx\n", "membase", card->membase); | 
|  | switch (card->cardtype) { | 
|  | case avm_b1isa: s = "B1 ISA"; break; | 
|  | case avm_b1pci: s = "B1 PCI"; break; | 
|  | case avm_b1pcmcia: s = "B1 PCMCIA"; break; | 
|  | case avm_m1: s = "M1"; break; | 
|  | case avm_m2: s = "M2"; break; | 
|  | case avm_t1isa: s = "T1 ISA (HEMA)"; break; | 
|  | case avm_t1pci: s = "T1 PCI"; break; | 
|  | case avm_c4: s = "C4"; break; | 
|  | case avm_c2: s = "C2"; break; | 
|  | default: s = "???"; break; | 
|  | } | 
|  | seq_printf(m, "%-16s %s\n", "type", s); | 
|  | if ((s = cinfo->version[VER_DRIVER]) != NULL) | 
|  | seq_printf(m, "%-16s %s\n", "ver_driver", s); | 
|  | if ((s = cinfo->version[VER_CARDTYPE]) != NULL) | 
|  | seq_printf(m, "%-16s %s\n", "ver_cardtype", s); | 
|  | if ((s = cinfo->version[VER_SERIAL]) != NULL) | 
|  | seq_printf(m, "%-16s %s\n", "ver_serial", s); | 
|  |  | 
|  | if (card->cardtype != avm_m1) { | 
|  | flag = ((u8 *)(ctrl->profile.manu))[3]; | 
|  | if (flag) | 
|  | seq_printf(m, "%-16s%s%s%s%s%s%s%s\n", | 
|  | "protocol", | 
|  | (flag & 0x01) ? " DSS1" : "", | 
|  | (flag & 0x02) ? " CT1" : "", | 
|  | (flag & 0x04) ? " VN3" : "", | 
|  | (flag & 0x08) ? " NI1" : "", | 
|  | (flag & 0x10) ? " AUSTEL" : "", | 
|  | (flag & 0x20) ? " ESS" : "", | 
|  | (flag & 0x40) ? " 1TR6" : "" | 
|  | ); | 
|  | } | 
|  | if (card->cardtype != avm_m1) { | 
|  | flag = ((u8 *)(ctrl->profile.manu))[5]; | 
|  | if (flag) | 
|  | seq_printf(m, "%-16s%s%s%s%s\n", | 
|  | "linetype", | 
|  | (flag & 0x01) ? " point to point" : "", | 
|  | (flag & 0x02) ? " point to multipoint" : "", | 
|  | (flag & 0x08) ? " leased line without D-channel" : "", | 
|  | (flag & 0x04) ? " leased line with D-channel" : "" | 
|  | ); | 
|  | } | 
|  | seq_printf(m, "%-16s %s\n", "cardname", cinfo->cardname); | 
|  |  | 
|  |  | 
|  | spin_lock_irqsave(&card->lock, flags); | 
|  |  | 
|  | txoff = (dma_addr_t)b1dma_readl(card, AMCC_TXPTR)-card->dma->sendbuf.dmaaddr; | 
|  | txlen = b1dma_readl(card, AMCC_TXLEN); | 
|  |  | 
|  | rxoff = (dma_addr_t)b1dma_readl(card, AMCC_RXPTR)-card->dma->recvbuf.dmaaddr; | 
|  | rxlen = b1dma_readl(card, AMCC_RXLEN); | 
|  |  | 
|  | csr  = b1dma_readl(card, AMCC_INTCSR); | 
|  |  | 
|  | spin_unlock_irqrestore(&card->lock, flags); | 
|  |  | 
|  | seq_printf(m, "%-16s 0x%lx\n", "csr (cached)", (unsigned long)card->csr); | 
|  | seq_printf(m, "%-16s 0x%lx\n", "csr", (unsigned long)csr); | 
|  | seq_printf(m, "%-16s %lu\n", "txoff", (unsigned long)txoff); | 
|  | seq_printf(m, "%-16s %lu\n", "txlen", (unsigned long)txlen); | 
|  | seq_printf(m, "%-16s %lu\n", "rxoff", (unsigned long)rxoff); | 
|  | seq_printf(m, "%-16s %lu\n", "rxlen", (unsigned long)rxlen); | 
|  |  | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | static int b1dmactl_proc_open(struct inode *inode, struct file *file) | 
|  | { | 
|  | return single_open(file, b1dmactl_proc_show, PDE(inode)->data); | 
|  | } | 
|  |  | 
|  | const struct file_operations b1dmactl_proc_fops = { | 
|  | .owner		= THIS_MODULE, | 
|  | .open		= b1dmactl_proc_open, | 
|  | .read		= seq_read, | 
|  | .llseek		= seq_lseek, | 
|  | .release	= single_release, | 
|  | }; | 
|  | EXPORT_SYMBOL(b1dmactl_proc_fops); | 
|  |  | 
|  | /* ------------------------------------------------------------- */ | 
|  |  | 
|  | EXPORT_SYMBOL(b1dma_reset); | 
|  | EXPORT_SYMBOL(t1pci_detect); | 
|  | EXPORT_SYMBOL(b1pciv4_detect); | 
|  | EXPORT_SYMBOL(b1dma_interrupt); | 
|  |  | 
|  | EXPORT_SYMBOL(b1dma_load_firmware); | 
|  | EXPORT_SYMBOL(b1dma_reset_ctr); | 
|  | EXPORT_SYMBOL(b1dma_register_appl); | 
|  | EXPORT_SYMBOL(b1dma_release_appl); | 
|  | EXPORT_SYMBOL(b1dma_send_message); | 
|  |  | 
|  | static int __init b1dma_init(void) | 
|  | { | 
|  | char *p; | 
|  | char rev[32]; | 
|  |  | 
|  | if ((p = strchr(revision, ':')) != NULL && p[1]) { | 
|  | strlcpy(rev, p + 2, sizeof(rev)); | 
|  | if ((p = strchr(rev, '$')) != NULL && p > rev) | 
|  | *(p-1) = 0; | 
|  | } else | 
|  | strcpy(rev, "1.0"); | 
|  |  | 
|  | printk(KERN_INFO "b1dma: revision %s\n", rev); | 
|  |  | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | static void __exit b1dma_exit(void) | 
|  | { | 
|  | } | 
|  |  | 
|  | module_init(b1dma_init); | 
|  | module_exit(b1dma_exit); |