1/* $Id: b1dma.c,v 1.1.2.3 2004/02/10 01:07:12 keil Exp $
2 *
3 * Common module for AVM B1 cards that support dma with AMCC
4 *
5 * Copyright 2000 by Carsten Paeth <calle@calle.de>
6 *
7 * This software may be used and distributed according to the terms
8 * of the GNU General Public License, incorporated herein by reference.
9 *
10 */
11
12#include <linux/module.h>
13#include <linux/kernel.h>
14#include <linux/proc_fs.h>
15#include <linux/seq_file.h>
16#include <linux/skbuff.h>
17#include <linux/delay.h>
18#include <linux/mm.h>
19#include <linux/interrupt.h>
20#include <linux/ioport.h>
21#include <linux/capi.h>
22#include <linux/kernelcapi.h>
23#include <linux/gfp.h>
24#include <asm/io.h>
25#include <linux/init.h>
26#include <asm/uaccess.h>
27#include <linux/netdevice.h>
28#include <linux/isdn/capilli.h>
29#include "avmcard.h"
30#include <linux/isdn/capicmd.h>
31#include <linux/isdn/capiutil.h>
32
33static char *revision = "$Revision: 1.1.2.3 $";
34
35#undef AVM_B1DMA_DEBUG
36
37/* ------------------------------------------------------------- */
38
39MODULE_DESCRIPTION("CAPI4Linux: DMA support for active AVM cards");
40MODULE_AUTHOR("Carsten Paeth");
41MODULE_LICENSE("GPL");
42
43static bool suppress_pollack = 0;
44module_param(suppress_pollack, bool, 0);
45
46/* ------------------------------------------------------------- */
47
48static void b1dma_dispatch_tx(avmcard *card);
49
50/* ------------------------------------------------------------- */
51
52/* S5933 */
53
54#define	AMCC_RXPTR	0x24
55#define	AMCC_RXLEN	0x28
56#define	AMCC_TXPTR	0x2c
57#define	AMCC_TXLEN	0x30
58
59#define	AMCC_INTCSR	0x38
60#	define EN_READ_TC_INT		0x00008000L
61#	define EN_WRITE_TC_INT		0x00004000L
62#	define EN_TX_TC_INT		EN_READ_TC_INT
63#	define EN_RX_TC_INT		EN_WRITE_TC_INT
64#	define AVM_FLAG			0x30000000L
65
66#	define ANY_S5933_INT		0x00800000L
67#	define READ_TC_INT		0x00080000L
68#	define WRITE_TC_INT		0x00040000L
69#	define	TX_TC_INT		READ_TC_INT
70#	define	RX_TC_INT		WRITE_TC_INT
71#	define MASTER_ABORT_INT		0x00100000L
72#	define TARGET_ABORT_INT		0x00200000L
73#	define BUS_MASTER_INT		0x00200000L
74#	define ALL_INT			0x000C0000L
75
76#define	AMCC_MCSR	0x3c
77#	define A2P_HI_PRIORITY		0x00000100L
78#	define EN_A2P_TRANSFERS		0x00000400L
79#	define P2A_HI_PRIORITY		0x00001000L
80#	define EN_P2A_TRANSFERS		0x00004000L
81#	define RESET_A2P_FLAGS		0x04000000L
82#	define RESET_P2A_FLAGS		0x02000000L
83
84/* ------------------------------------------------------------- */
85
86static inline void b1dma_writel(avmcard *card, u32 value, int off)
87{
88	writel(value, card->mbase + off);
89}
90
91static inline u32 b1dma_readl(avmcard *card, int off)
92{
93	return readl(card->mbase + off);
94}
95
96/* ------------------------------------------------------------- */
97
98static inline int b1dma_tx_empty(unsigned int port)
99{
100	return inb(port + 0x03) & 0x1;
101}
102
103static inline int b1dma_rx_full(unsigned int port)
104{
105	return inb(port + 0x02) & 0x1;
106}
107
108static int b1dma_tolink(avmcard *card, void *buf, unsigned int len)
109{
110	unsigned long stop = jiffies + 1 * HZ;	/* maximum wait time 1 sec */
111	unsigned char *s = (unsigned char *)buf;
112	while (len--) {
113		while (!b1dma_tx_empty(card->port)
114		       && time_before(jiffies, stop));
115		if (!b1dma_tx_empty(card->port))
116			return -1;
117		t1outp(card->port, 0x01, *s++);
118	}
119	return 0;
120}
121
122static int b1dma_fromlink(avmcard *card, void *buf, unsigned int len)
123{
124	unsigned long stop = jiffies + 1 * HZ;	/* maximum wait time 1 sec */
125	unsigned char *s = (unsigned char *)buf;
126	while (len--) {
127		while (!b1dma_rx_full(card->port)
128		       && time_before(jiffies, stop));
129		if (!b1dma_rx_full(card->port))
130			return -1;
131		*s++ = t1inp(card->port, 0x00);
132	}
133	return 0;
134}
135
136static int WriteReg(avmcard *card, u32 reg, u8 val)
137{
138	u8 cmd = 0x00;
139	if (b1dma_tolink(card, &cmd, 1) == 0
140	    && b1dma_tolink(card, &reg, 4) == 0) {
141		u32 tmp = val;
142		return b1dma_tolink(card, &tmp, 4);
143	}
144	return -1;
145}
146
147static u8 ReadReg(avmcard *card, u32 reg)
148{
149	u8 cmd = 0x01;
150	if (b1dma_tolink(card, &cmd, 1) == 0
151	    && b1dma_tolink(card, &reg, 4) == 0) {
152		u32 tmp;
153		if (b1dma_fromlink(card, &tmp, 4) == 0)
154			return (u8)tmp;
155	}
156	return 0xff;
157}
158
159/* ------------------------------------------------------------- */
160
161static inline void _put_byte(void **pp, u8 val)
162{
163	u8 *s = *pp;
164	*s++ = val;
165	*pp = s;
166}
167
168static inline void _put_word(void **pp, u32 val)
169{
170	u8 *s = *pp;
171	*s++ = val & 0xff;
172	*s++ = (val >> 8) & 0xff;
173	*s++ = (val >> 16) & 0xff;
174	*s++ = (val >> 24) & 0xff;
175	*pp = s;
176}
177
178static inline void _put_slice(void **pp, unsigned char *dp, unsigned int len)
179{
180	unsigned i = len;
181	_put_word(pp, i);
182	while (i-- > 0)
183		_put_byte(pp, *dp++);
184}
185
186static inline u8 _get_byte(void **pp)
187{
188	u8 *s = *pp;
189	u8 val;
190	val = *s++;
191	*pp = s;
192	return val;
193}
194
195static inline u32 _get_word(void **pp)
196{
197	u8 *s = *pp;
198	u32 val;
199	val = *s++;
200	val |= (*s++ << 8);
201	val |= (*s++ << 16);
202	val |= (*s++ << 24);
203	*pp = s;
204	return val;
205}
206
207static inline u32 _get_slice(void **pp, unsigned char *dp)
208{
209	unsigned int len, i;
210
211	len = i = _get_word(pp);
212	while (i-- > 0) *dp++ = _get_byte(pp);
213	return len;
214}
215
216/* ------------------------------------------------------------- */
217
218void b1dma_reset(avmcard *card)
219{
220	card->csr = 0x0;
221	b1dma_writel(card, card->csr, AMCC_INTCSR);
222	b1dma_writel(card, 0, AMCC_MCSR);
223	b1dma_writel(card, 0, AMCC_RXLEN);
224	b1dma_writel(card, 0, AMCC_TXLEN);
225
226	t1outp(card->port, 0x10, 0x00);
227	t1outp(card->port, 0x07, 0x00);
228
229	b1dma_writel(card, 0, AMCC_MCSR);
230	mdelay(10);
231	b1dma_writel(card, 0x0f000000, AMCC_MCSR); /* reset all */
232	mdelay(10);
233	b1dma_writel(card, 0, AMCC_MCSR);
234	if (card->cardtype == avm_t1pci)
235		mdelay(42);
236	else
237		mdelay(10);
238}
239
240/* ------------------------------------------------------------- */
241
242static int b1dma_detect(avmcard *card)
243{
244	b1dma_writel(card, 0, AMCC_MCSR);
245	mdelay(10);
246	b1dma_writel(card, 0x0f000000, AMCC_MCSR); /* reset all */
247	mdelay(10);
248	b1dma_writel(card, 0, AMCC_MCSR);
249	mdelay(42);
250
251	b1dma_writel(card, 0, AMCC_RXLEN);
252	b1dma_writel(card, 0, AMCC_TXLEN);
253	card->csr = 0x0;
254	b1dma_writel(card, card->csr, AMCC_INTCSR);
255
256	if (b1dma_readl(card, AMCC_MCSR) != 0x000000E6)
257		return 1;
258
259	b1dma_writel(card, 0xffffffff, AMCC_RXPTR);
260	b1dma_writel(card, 0xffffffff, AMCC_TXPTR);
261	if (b1dma_readl(card, AMCC_RXPTR) != 0xfffffffc
262	    || b1dma_readl(card, AMCC_TXPTR) != 0xfffffffc)
263		return 2;
264
265	b1dma_writel(card, 0x0, AMCC_RXPTR);
266	b1dma_writel(card, 0x0, AMCC_TXPTR);
267	if (b1dma_readl(card, AMCC_RXPTR) != 0x0
268	    || b1dma_readl(card, AMCC_TXPTR) != 0x0)
269		return 3;
270
271	t1outp(card->port, 0x10, 0x00);
272	t1outp(card->port, 0x07, 0x00);
273
274	t1outp(card->port, 0x02, 0x02);
275	t1outp(card->port, 0x03, 0x02);
276
277	if ((t1inp(card->port, 0x02) & 0xFE) != 0x02
278	    || t1inp(card->port, 0x3) != 0x03)
279		return 4;
280
281	t1outp(card->port, 0x02, 0x00);
282	t1outp(card->port, 0x03, 0x00);
283
284	if ((t1inp(card->port, 0x02) & 0xFE) != 0x00
285	    || t1inp(card->port, 0x3) != 0x01)
286		return 5;
287
288	return 0;
289}
290
291int t1pci_detect(avmcard *card)
292{
293	int ret;
294
295	if ((ret = b1dma_detect(card)) != 0)
296		return ret;
297
298	/* Transputer test */
299
300	if (WriteReg(card, 0x80001000, 0x11) != 0
301	    || WriteReg(card, 0x80101000, 0x22) != 0
302	    || WriteReg(card, 0x80201000, 0x33) != 0
303	    || WriteReg(card, 0x80301000, 0x44) != 0)
304		return 6;
305
306	if (ReadReg(card, 0x80001000) != 0x11
307	    || ReadReg(card, 0x80101000) != 0x22
308	    || ReadReg(card, 0x80201000) != 0x33
309	    || ReadReg(card, 0x80301000) != 0x44)
310		return 7;
311
312	if (WriteReg(card, 0x80001000, 0x55) != 0
313	    || WriteReg(card, 0x80101000, 0x66) != 0
314	    || WriteReg(card, 0x80201000, 0x77) != 0
315	    || WriteReg(card, 0x80301000, 0x88) != 0)
316		return 8;
317
318	if (ReadReg(card, 0x80001000) != 0x55
319	    || ReadReg(card, 0x80101000) != 0x66
320	    || ReadReg(card, 0x80201000) != 0x77
321	    || ReadReg(card, 0x80301000) != 0x88)
322		return 9;
323
324	return 0;
325}
326
327int b1pciv4_detect(avmcard *card)
328{
329	int ret, i;
330
331	if ((ret = b1dma_detect(card)) != 0)
332		return ret;
333
334	for (i = 0; i < 5; i++) {
335		if (WriteReg(card, 0x80A00000, 0x21) != 0)
336			return 6;
337		if ((ReadReg(card, 0x80A00000) & 0x01) != 0x01)
338			return 7;
339	}
340	for (i = 0; i < 5; i++) {
341		if (WriteReg(card, 0x80A00000, 0x20) != 0)
342			return 8;
343		if ((ReadReg(card, 0x80A00000) & 0x01) != 0x00)
344			return 9;
345	}
346
347	return 0;
348}
349
350static void b1dma_queue_tx(avmcard *card, struct sk_buff *skb)
351{
352	unsigned long flags;
353
354	spin_lock_irqsave(&card->lock, flags);
355
356	skb_queue_tail(&card->dma->send_queue, skb);
357
358	if (!(card->csr & EN_TX_TC_INT)) {
359		b1dma_dispatch_tx(card);
360		b1dma_writel(card, card->csr, AMCC_INTCSR);
361	}
362
363	spin_unlock_irqrestore(&card->lock, flags);
364}
365
366/* ------------------------------------------------------------- */
367
368static void b1dma_dispatch_tx(avmcard *card)
369{
370	avmcard_dmainfo *dma = card->dma;
371	struct sk_buff *skb;
372	u8 cmd, subcmd;
373	u16 len;
374	u32 txlen;
375	void *p;
376
377	skb = skb_dequeue(&dma->send_queue);
378
379	len = CAPIMSG_LEN(skb->data);
380
381	if (len) {
382		cmd = CAPIMSG_COMMAND(skb->data);
383		subcmd = CAPIMSG_SUBCOMMAND(skb->data);
384
385		p = dma->sendbuf.dmabuf;
386
387		if (CAPICMD(cmd, subcmd) == CAPI_DATA_B3_REQ) {
388			u16 dlen = CAPIMSG_DATALEN(skb->data);
389			_put_byte(&p, SEND_DATA_B3_REQ);
390			_put_slice(&p, skb->data, len);
391			_put_slice(&p, skb->data + len, dlen);
392		} else {
393			_put_byte(&p, SEND_MESSAGE);
394			_put_slice(&p, skb->data, len);
395		}
396		txlen = (u8 *)p - (u8 *)dma->sendbuf.dmabuf;
397#ifdef AVM_B1DMA_DEBUG
398		printk(KERN_DEBUG "tx: put msg len=%d\n", txlen);
399#endif
400	} else {
401		txlen = skb->len - 2;
402#ifdef AVM_B1DMA_POLLDEBUG
403		if (skb->data[2] == SEND_POLLACK)
404			printk(KERN_INFO "%s: send ack\n", card->name);
405#endif
406#ifdef AVM_B1DMA_DEBUG
407		printk(KERN_DEBUG "tx: put 0x%x len=%d\n",
408		       skb->data[2], txlen);
409#endif
410		skb_copy_from_linear_data_offset(skb, 2, dma->sendbuf.dmabuf,
411						 skb->len - 2);
412	}
413	txlen = (txlen + 3) & ~3;
414
415	b1dma_writel(card, dma->sendbuf.dmaaddr, AMCC_TXPTR);
416	b1dma_writel(card, txlen, AMCC_TXLEN);
417
418	card->csr |= EN_TX_TC_INT;
419
420	dev_kfree_skb_any(skb);
421}
422
423/* ------------------------------------------------------------- */
424
425static void queue_pollack(avmcard *card)
426{
427	struct sk_buff *skb;
428	void *p;
429
430	skb = alloc_skb(3, GFP_ATOMIC);
431	if (!skb) {
432		printk(KERN_CRIT "%s: no memory, lost poll ack\n",
433		       card->name);
434		return;
435	}
436	p = skb->data;
437	_put_byte(&p, 0);
438	_put_byte(&p, 0);
439	_put_byte(&p, SEND_POLLACK);
440	skb_put(skb, (u8 *)p - (u8 *)skb->data);
441
442	b1dma_queue_tx(card, skb);
443}
444
445/* ------------------------------------------------------------- */
446
447static void b1dma_handle_rx(avmcard *card)
448{
449	avmctrl_info *cinfo = &card->ctrlinfo[0];
450	avmcard_dmainfo *dma = card->dma;
451	struct capi_ctr *ctrl = &cinfo->capi_ctrl;
452	struct sk_buff *skb;
453	void *p = dma->recvbuf.dmabuf + 4;
454	u32 ApplId, MsgLen, DataB3Len, NCCI, WindowSize;
455	u8 b1cmd =  _get_byte(&p);
456
457#ifdef AVM_B1DMA_DEBUG
458	printk(KERN_DEBUG "rx: 0x%x %lu\n", b1cmd, (unsigned long)dma->recvlen);
459#endif
460
461	switch (b1cmd) {
462	case RECEIVE_DATA_B3_IND:
463
464		ApplId = (unsigned) _get_word(&p);
465		MsgLen = _get_slice(&p, card->msgbuf);
466		DataB3Len = _get_slice(&p, card->databuf);
467
468		if (MsgLen < 30) { /* not CAPI 64Bit */
469			memset(card->msgbuf + MsgLen, 0, 30 - MsgLen);
470			MsgLen = 30;
471			CAPIMSG_SETLEN(card->msgbuf, 30);
472		}
473		if (!(skb = alloc_skb(DataB3Len + MsgLen, GFP_ATOMIC))) {
474			printk(KERN_ERR "%s: incoming packet dropped\n",
475			       card->name);
476		} else {
477			memcpy(skb_put(skb, MsgLen), card->msgbuf, MsgLen);
478			memcpy(skb_put(skb, DataB3Len), card->databuf, DataB3Len);
479			capi_ctr_handle_message(ctrl, ApplId, skb);
480		}
481		break;
482
483	case RECEIVE_MESSAGE:
484
485		ApplId = (unsigned) _get_word(&p);
486		MsgLen = _get_slice(&p, card->msgbuf);
487		if (!(skb = alloc_skb(MsgLen, GFP_ATOMIC))) {
488			printk(KERN_ERR "%s: incoming packet dropped\n",
489			       card->name);
490		} else {
491			memcpy(skb_put(skb, MsgLen), card->msgbuf, MsgLen);
492			if (CAPIMSG_CMD(skb->data) == CAPI_DATA_B3_CONF) {
493				spin_lock(&card->lock);
494				capilib_data_b3_conf(&cinfo->ncci_head, ApplId,
495						     CAPIMSG_NCCI(skb->data),
496						     CAPIMSG_MSGID(skb->data));
497				spin_unlock(&card->lock);
498			}
499			capi_ctr_handle_message(ctrl, ApplId, skb);
500		}
501		break;
502
503	case RECEIVE_NEW_NCCI:
504
505		ApplId = _get_word(&p);
506		NCCI = _get_word(&p);
507		WindowSize = _get_word(&p);
508		spin_lock(&card->lock);
509		capilib_new_ncci(&cinfo->ncci_head, ApplId, NCCI, WindowSize);
510		spin_unlock(&card->lock);
511		break;
512
513	case RECEIVE_FREE_NCCI:
514
515		ApplId = _get_word(&p);
516		NCCI = _get_word(&p);
517
518		if (NCCI != 0xffffffff) {
519			spin_lock(&card->lock);
520			capilib_free_ncci(&cinfo->ncci_head, ApplId, NCCI);
521			spin_unlock(&card->lock);
522		}
523		break;
524
525	case RECEIVE_START:
526#ifdef AVM_B1DMA_POLLDEBUG
527		printk(KERN_INFO "%s: receive poll\n", card->name);
528#endif
529		if (!suppress_pollack)
530			queue_pollack(card);
531		capi_ctr_resume_output(ctrl);
532		break;
533
534	case RECEIVE_STOP:
535		capi_ctr_suspend_output(ctrl);
536		break;
537
538	case RECEIVE_INIT:
539
540		cinfo->versionlen = _get_slice(&p, cinfo->versionbuf);
541		b1_parse_version(cinfo);
542		printk(KERN_INFO "%s: %s-card (%s) now active\n",
543		       card->name,
544		       cinfo->version[VER_CARDTYPE],
545		       cinfo->version[VER_DRIVER]);
546		capi_ctr_ready(ctrl);
547		break;
548
549	case RECEIVE_TASK_READY:
550		ApplId = (unsigned) _get_word(&p);
551		MsgLen = _get_slice(&p, card->msgbuf);
552		card->msgbuf[MsgLen] = 0;
553		while (MsgLen > 0
554		       && (card->msgbuf[MsgLen - 1] == '\n'
555			   || card->msgbuf[MsgLen - 1] == '\r')) {
556			card->msgbuf[MsgLen - 1] = 0;
557			MsgLen--;
558		}
559		printk(KERN_INFO "%s: task %d \"%s\" ready.\n",
560		       card->name, ApplId, card->msgbuf);
561		break;
562
563	case RECEIVE_DEBUGMSG:
564		MsgLen = _get_slice(&p, card->msgbuf);
565		card->msgbuf[MsgLen] = 0;
566		while (MsgLen > 0
567		       && (card->msgbuf[MsgLen - 1] == '\n'
568			   || card->msgbuf[MsgLen - 1] == '\r')) {
569			card->msgbuf[MsgLen - 1] = 0;
570			MsgLen--;
571		}
572		printk(KERN_INFO "%s: DEBUG: %s\n", card->name, card->msgbuf);
573		break;
574
575	default:
576		printk(KERN_ERR "%s: b1dma_interrupt: 0x%x ???\n",
577		       card->name, b1cmd);
578		return;
579	}
580}
581
582/* ------------------------------------------------------------- */
583
584static void b1dma_handle_interrupt(avmcard *card)
585{
586	u32 status;
587	u32 newcsr;
588
589	spin_lock(&card->lock);
590
591	status = b1dma_readl(card, AMCC_INTCSR);
592	if ((status & ANY_S5933_INT) == 0) {
593		spin_unlock(&card->lock);
594		return;
595	}
596
597	newcsr = card->csr | (status & ALL_INT);
598	if (status & TX_TC_INT) newcsr &= ~EN_TX_TC_INT;
599	if (status & RX_TC_INT) newcsr &= ~EN_RX_TC_INT;
600	b1dma_writel(card, newcsr, AMCC_INTCSR);
601
602	if ((status & RX_TC_INT) != 0) {
603		struct avmcard_dmainfo *dma = card->dma;
604		u32 rxlen;
605		if (card->dma->recvlen == 0) {
606			rxlen = b1dma_readl(card, AMCC_RXLEN);
607			if (rxlen == 0) {
608				dma->recvlen = *((u32 *)dma->recvbuf.dmabuf);
609				rxlen = (dma->recvlen + 3) & ~3;
610				b1dma_writel(card, dma->recvbuf.dmaaddr + 4, AMCC_RXPTR);
611				b1dma_writel(card, rxlen, AMCC_RXLEN);
612#ifdef AVM_B1DMA_DEBUG
613			} else {
614				printk(KERN_ERR "%s: rx not complete (%d).\n",
615				       card->name, rxlen);
616#endif
617			}
618		} else {
619			spin_unlock(&card->lock);
620			b1dma_handle_rx(card);
621			dma->recvlen = 0;
622			spin_lock(&card->lock);
623			b1dma_writel(card, dma->recvbuf.dmaaddr, AMCC_RXPTR);
624			b1dma_writel(card, 4, AMCC_RXLEN);
625		}
626	}
627
628	if ((status & TX_TC_INT) != 0) {
629		if (skb_queue_empty(&card->dma->send_queue))
630			card->csr &= ~EN_TX_TC_INT;
631		else
632			b1dma_dispatch_tx(card);
633	}
634	b1dma_writel(card, card->csr, AMCC_INTCSR);
635
636	spin_unlock(&card->lock);
637}
638
639irqreturn_t b1dma_interrupt(int interrupt, void *devptr)
640{
641	avmcard *card = devptr;
642
643	b1dma_handle_interrupt(card);
644	return IRQ_HANDLED;
645}
646
647/* ------------------------------------------------------------- */
648
649static int b1dma_loaded(avmcard *card)
650{
651	unsigned long stop;
652	unsigned char ans;
653	unsigned long tout = 2;
654	unsigned int base = card->port;
655
656	for (stop = jiffies + tout * HZ; time_before(jiffies, stop);) {
657		if (b1_tx_empty(base))
658			break;
659	}
660	if (!b1_tx_empty(base)) {
661		printk(KERN_ERR "%s: b1dma_loaded: tx err, corrupted t4 file ?\n",
662		       card->name);
663		return 0;
664	}
665	b1_put_byte(base, SEND_POLLACK);
666	for (stop = jiffies + tout * HZ; time_before(jiffies, stop);) {
667		if (b1_rx_full(base)) {
668			if ((ans = b1_get_byte(base)) == RECEIVE_POLLDWORD) {
669				return 1;
670			}
671			printk(KERN_ERR "%s: b1dma_loaded: got 0x%x, firmware not running in dword mode\n", card->name, ans);
672			return 0;
673		}
674	}
675	printk(KERN_ERR "%s: b1dma_loaded: firmware not running\n", card->name);
676	return 0;
677}
678
679/* ------------------------------------------------------------- */
680
681static void b1dma_send_init(avmcard *card)
682{
683	struct sk_buff *skb;
684	void *p;
685
686	skb = alloc_skb(15, GFP_ATOMIC);
687	if (!skb) {
688		printk(KERN_CRIT "%s: no memory, lost register appl.\n",
689		       card->name);
690		return;
691	}
692	p = skb->data;
693	_put_byte(&p, 0);
694	_put_byte(&p, 0);
695	_put_byte(&p, SEND_INIT);
696	_put_word(&p, CAPI_MAXAPPL);
697	_put_word(&p, AVM_NCCI_PER_CHANNEL * 30);
698	_put_word(&p, card->cardnr - 1);
699	skb_put(skb, (u8 *)p - (u8 *)skb->data);
700
701	b1dma_queue_tx(card, skb);
702}
703
704int b1dma_load_firmware(struct capi_ctr *ctrl, capiloaddata *data)
705{
706	avmctrl_info *cinfo = (avmctrl_info *)(ctrl->driverdata);
707	avmcard *card = cinfo->card;
708	int retval;
709
710	b1dma_reset(card);
711
712	if ((retval = b1_load_t4file(card, &data->firmware))) {
713		b1dma_reset(card);
714		printk(KERN_ERR "%s: failed to load t4file!!\n",
715		       card->name);
716		return retval;
717	}
718
719	if (data->configuration.len > 0 && data->configuration.data) {
720		if ((retval = b1_load_config(card, &data->configuration))) {
721			b1dma_reset(card);
722			printk(KERN_ERR "%s: failed to load config!!\n",
723			       card->name);
724			return retval;
725		}
726	}
727
728	if (!b1dma_loaded(card)) {
729		b1dma_reset(card);
730		printk(KERN_ERR "%s: failed to load t4file.\n", card->name);
731		return -EIO;
732	}
733
734	card->csr = AVM_FLAG;
735	b1dma_writel(card, card->csr, AMCC_INTCSR);
736	b1dma_writel(card, EN_A2P_TRANSFERS | EN_P2A_TRANSFERS | A2P_HI_PRIORITY |
737		     P2A_HI_PRIORITY | RESET_A2P_FLAGS | RESET_P2A_FLAGS,
738		     AMCC_MCSR);
739	t1outp(card->port, 0x07, 0x30);
740	t1outp(card->port, 0x10, 0xF0);
741
742	card->dma->recvlen = 0;
743	b1dma_writel(card, card->dma->recvbuf.dmaaddr, AMCC_RXPTR);
744	b1dma_writel(card, 4, AMCC_RXLEN);
745	card->csr |= EN_RX_TC_INT;
746	b1dma_writel(card, card->csr, AMCC_INTCSR);
747
748	b1dma_send_init(card);
749
750	return 0;
751}
752
753void b1dma_reset_ctr(struct capi_ctr *ctrl)
754{
755	avmctrl_info *cinfo = (avmctrl_info *)(ctrl->driverdata);
756	avmcard *card = cinfo->card;
757	unsigned long flags;
758
759	spin_lock_irqsave(&card->lock, flags);
760	b1dma_reset(card);
761
762	memset(cinfo->version, 0, sizeof(cinfo->version));
763	capilib_release(&cinfo->ncci_head);
764	spin_unlock_irqrestore(&card->lock, flags);
765	capi_ctr_down(ctrl);
766}
767
768/* ------------------------------------------------------------- */
769
770void b1dma_register_appl(struct capi_ctr *ctrl,
771			 u16 appl,
772			 capi_register_params *rp)
773{
774	avmctrl_info *cinfo = (avmctrl_info *)(ctrl->driverdata);
775	avmcard *card = cinfo->card;
776	struct sk_buff *skb;
777	int want = rp->level3cnt;
778	int nconn;
779	void *p;
780
781	if (want > 0) nconn = want;
782	else nconn = ctrl->profile.nbchannel * -want;
783	if (nconn == 0) nconn = ctrl->profile.nbchannel;
784
785	skb = alloc_skb(23, GFP_ATOMIC);
786	if (!skb) {
787		printk(KERN_CRIT "%s: no memory, lost register appl.\n",
788		       card->name);
789		return;
790	}
791	p = skb->data;
792	_put_byte(&p, 0);
793	_put_byte(&p, 0);
794	_put_byte(&p, SEND_REGISTER);
795	_put_word(&p, appl);
796	_put_word(&p, 1024 * (nconn + 1));
797	_put_word(&p, nconn);
798	_put_word(&p, rp->datablkcnt);
799	_put_word(&p, rp->datablklen);
800	skb_put(skb, (u8 *)p - (u8 *)skb->data);
801
802	b1dma_queue_tx(card, skb);
803}
804
805/* ------------------------------------------------------------- */
806
807void b1dma_release_appl(struct capi_ctr *ctrl, u16 appl)
808{
809	avmctrl_info *cinfo = (avmctrl_info *)(ctrl->driverdata);
810	avmcard *card = cinfo->card;
811	struct sk_buff *skb;
812	void *p;
813	unsigned long flags;
814
815	spin_lock_irqsave(&card->lock, flags);
816	capilib_release_appl(&cinfo->ncci_head, appl);
817	spin_unlock_irqrestore(&card->lock, flags);
818
819	skb = alloc_skb(7, GFP_ATOMIC);
820	if (!skb) {
821		printk(KERN_CRIT "%s: no memory, lost release appl.\n",
822		       card->name);
823		return;
824	}
825	p = skb->data;
826	_put_byte(&p, 0);
827	_put_byte(&p, 0);
828	_put_byte(&p, SEND_RELEASE);
829	_put_word(&p, appl);
830
831	skb_put(skb, (u8 *)p - (u8 *)skb->data);
832
833	b1dma_queue_tx(card, skb);
834}
835
836/* ------------------------------------------------------------- */
837
838u16 b1dma_send_message(struct capi_ctr *ctrl, struct sk_buff *skb)
839{
840	avmctrl_info *cinfo = (avmctrl_info *)(ctrl->driverdata);
841	avmcard *card = cinfo->card;
842	u16 retval = CAPI_NOERROR;
843
844	if (CAPIMSG_CMD(skb->data) == CAPI_DATA_B3_REQ) {
845		unsigned long flags;
846		spin_lock_irqsave(&card->lock, flags);
847		retval = capilib_data_b3_req(&cinfo->ncci_head,
848					     CAPIMSG_APPID(skb->data),
849					     CAPIMSG_NCCI(skb->data),
850					     CAPIMSG_MSGID(skb->data));
851		spin_unlock_irqrestore(&card->lock, flags);
852	}
853	if (retval == CAPI_NOERROR)
854		b1dma_queue_tx(card, skb);
855
856	return retval;
857}
858
859/* ------------------------------------------------------------- */
860
861static int b1dmactl_proc_show(struct seq_file *m, void *v)
862{
863	struct capi_ctr *ctrl = m->private;
864	avmctrl_info *cinfo = (avmctrl_info *)(ctrl->driverdata);
865	avmcard *card = cinfo->card;
866	u8 flag;
867	char *s;
868	u32 txoff, txlen, rxoff, rxlen, csr;
869	unsigned long flags;
870
871	seq_printf(m, "%-16s %s\n", "name", card->name);
872	seq_printf(m, "%-16s 0x%x\n", "io", card->port);
873	seq_printf(m, "%-16s %d\n", "irq", card->irq);
874	seq_printf(m, "%-16s 0x%lx\n", "membase", card->membase);
875	switch (card->cardtype) {
876	case avm_b1isa: s = "B1 ISA"; break;
877	case avm_b1pci: s = "B1 PCI"; break;
878	case avm_b1pcmcia: s = "B1 PCMCIA"; break;
879	case avm_m1: s = "M1"; break;
880	case avm_m2: s = "M2"; break;
881	case avm_t1isa: s = "T1 ISA (HEMA)"; break;
882	case avm_t1pci: s = "T1 PCI"; break;
883	case avm_c4: s = "C4"; break;
884	case avm_c2: s = "C2"; break;
885	default: s = "???"; break;
886	}
887	seq_printf(m, "%-16s %s\n", "type", s);
888	if ((s = cinfo->version[VER_DRIVER]) != NULL)
889		seq_printf(m, "%-16s %s\n", "ver_driver", s);
890	if ((s = cinfo->version[VER_CARDTYPE]) != NULL)
891		seq_printf(m, "%-16s %s\n", "ver_cardtype", s);
892	if ((s = cinfo->version[VER_SERIAL]) != NULL)
893		seq_printf(m, "%-16s %s\n", "ver_serial", s);
894
895	if (card->cardtype != avm_m1) {
896		flag = ((u8 *)(ctrl->profile.manu))[3];
897		if (flag)
898			seq_printf(m, "%-16s%s%s%s%s%s%s%s\n",
899				   "protocol",
900				   (flag & 0x01) ? " DSS1" : "",
901				   (flag & 0x02) ? " CT1" : "",
902				   (flag & 0x04) ? " VN3" : "",
903				   (flag & 0x08) ? " NI1" : "",
904				   (flag & 0x10) ? " AUSTEL" : "",
905				   (flag & 0x20) ? " ESS" : "",
906				   (flag & 0x40) ? " 1TR6" : ""
907				);
908	}
909	if (card->cardtype != avm_m1) {
910		flag = ((u8 *)(ctrl->profile.manu))[5];
911		if (flag)
912			seq_printf(m, "%-16s%s%s%s%s\n",
913				   "linetype",
914				   (flag & 0x01) ? " point to point" : "",
915				   (flag & 0x02) ? " point to multipoint" : "",
916				   (flag & 0x08) ? " leased line without D-channel" : "",
917				   (flag & 0x04) ? " leased line with D-channel" : ""
918				);
919	}
920	seq_printf(m, "%-16s %s\n", "cardname", cinfo->cardname);
921
922
923	spin_lock_irqsave(&card->lock, flags);
924
925	txoff = (dma_addr_t)b1dma_readl(card, AMCC_TXPTR)-card->dma->sendbuf.dmaaddr;
926	txlen = b1dma_readl(card, AMCC_TXLEN);
927
928	rxoff = (dma_addr_t)b1dma_readl(card, AMCC_RXPTR)-card->dma->recvbuf.dmaaddr;
929	rxlen = b1dma_readl(card, AMCC_RXLEN);
930
931	csr  = b1dma_readl(card, AMCC_INTCSR);
932
933	spin_unlock_irqrestore(&card->lock, flags);
934
935	seq_printf(m, "%-16s 0x%lx\n", "csr (cached)", (unsigned long)card->csr);
936	seq_printf(m, "%-16s 0x%lx\n", "csr", (unsigned long)csr);
937	seq_printf(m, "%-16s %lu\n", "txoff", (unsigned long)txoff);
938	seq_printf(m, "%-16s %lu\n", "txlen", (unsigned long)txlen);
939	seq_printf(m, "%-16s %lu\n", "rxoff", (unsigned long)rxoff);
940	seq_printf(m, "%-16s %lu\n", "rxlen", (unsigned long)rxlen);
941
942	return 0;
943}
944
945static int b1dmactl_proc_open(struct inode *inode, struct file *file)
946{
947	return single_open(file, b1dmactl_proc_show, PDE(inode)->data);
948}
949
950const struct file_operations b1dmactl_proc_fops = {
951	.owner		= THIS_MODULE,
952	.open		= b1dmactl_proc_open,
953	.read		= seq_read,
954	.llseek		= seq_lseek,
955	.release	= single_release,
956};
957EXPORT_SYMBOL(b1dmactl_proc_fops);
958
959/* ------------------------------------------------------------- */
960
961EXPORT_SYMBOL(b1dma_reset);
962EXPORT_SYMBOL(t1pci_detect);
963EXPORT_SYMBOL(b1pciv4_detect);
964EXPORT_SYMBOL(b1dma_interrupt);
965
966EXPORT_SYMBOL(b1dma_load_firmware);
967EXPORT_SYMBOL(b1dma_reset_ctr);
968EXPORT_SYMBOL(b1dma_register_appl);
969EXPORT_SYMBOL(b1dma_release_appl);
970EXPORT_SYMBOL(b1dma_send_message);
971
972static int __init b1dma_init(void)
973{
974	char *p;
975	char rev[32];
976
977	if ((p = strchr(revision, ':')) != NULL && p[1]) {
978		strlcpy(rev, p + 2, sizeof(rev));
979		if ((p = strchr(rev, '$')) != NULL && p > rev)
980			*(p - 1) = 0;
981	} else
982		strcpy(rev, "1.0");
983
984	printk(KERN_INFO "b1dma: revision %s\n", rev);
985
986	return 0;
987}
988
989static void __exit b1dma_exit(void)
990{
991}
992
993module_init(b1dma_init);
994module_exit(b1dma_exit);
995