[net-next-2.6.git] / drivers / isdn / hardware / avm / t1isa.c

/* $Id: t1isa.c,v 1.1.2.3 2004/02/10 01:07:12 keil Exp $
 * 
 * Module for AVM T1 HEMA-card.
 * 
 * Copyright 1999 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/skbuff.h>
#include <linux/delay.h>
#include <linux/mm.h>
#include <linux/interrupt.h>
#include <linux/ioport.h>
#include <linux/capi.h>
#include <linux/netdevice.h>
#include <linux/kernelcapi.h>
#include <linux/init.h>
#include <linux/pci.h>
#include <linux/gfp.h>
#include <asm/io.h>
#include <linux/isdn/capicmd.h>
#include <linux/isdn/capiutil.h>
#include <linux/isdn/capilli.h>
#include "avmcard.h"

/* ------------------------------------------------------------- */

static char *revision = "$Revision: 1.1.2.3 $";

/* ------------------------------------------------------------- */

MODULE_DESCRIPTION("CAPI4Linux: Driver for AVM T1 HEMA ISA card");
MODULE_AUTHOR("Carsten Paeth");
MODULE_LICENSE("GPL");

/* ------------------------------------------------------------- */

static int hema_irq_table[16] =
{0,
 0,
 0,
 0x80,				/* irq 3 */
 0,
 0x90,				/* irq 5 */
 0,
 0xA0,				/* irq 7 */
 0,
 0xB0,				/* irq 9 */
 0xC0,				/* irq 10 */
 0xD0,				/* irq 11 */
 0xE0,				/* irq 12 */
 0,
 0,
 0xF0,				/* irq 15 */
};

static int t1_detectandinit(unsigned int base, unsigned irq, int cardnr)
{
	unsigned char cregs[8];
	unsigned char reverse_cardnr;
	unsigned char dummy;
	int i;

	reverse_cardnr =   ((cardnr & 0x01) << 3) | ((cardnr & 0x02) << 1)
		         | ((cardnr & 0x04) >> 1) | ((cardnr & 0x08) >> 3);
	cregs[0] = (HEMA_VERSION_ID << 4) | (reverse_cardnr & 0xf);
	cregs[1] = 0x00; /* fast & slow link connected to CON1 */
	cregs[2] = 0x05; /* fast link 20MBit, slow link 20 MBit */
	cregs[3] = 0;
	cregs[4] = 0x11; /* zero wait state */
	cregs[5] = hema_irq_table[irq & 0xf];
	cregs[6] = 0;
	cregs[7] = 0;

	/*
	 * no one else should use the ISA bus in this moment,
	 * but no function there to prevent this :-(
	 * save_flags(flags); cli();
	 */

	/* board reset */
	t1outp(base, T1_RESETBOARD, 0xf);
	mdelay(100);
	dummy = t1inp(base, T1_FASTLINK+T1_OUTSTAT); /* first read */

	/* write config */
	dummy = (base >> 4) & 0xff;
	for (i=1;i<=0xf;i++) t1outp(base, i, dummy);
	t1outp(base, HEMA_PAL_ID & 0xf, dummy);
	t1outp(base, HEMA_PAL_ID >> 4, cregs[0]);
	for(i=1;i<7;i++) t1outp(base, 0, cregs[i]);
	t1outp(base, ((base >> 4)) & 0x3, cregs[7]);
	/* restore_flags(flags); */

	mdelay(100);
	t1outp(base, T1_FASTLINK+T1_RESETLINK, 0);
	t1outp(base, T1_SLOWLINK+T1_RESETLINK, 0);
	mdelay(10);
	t1outp(base, T1_FASTLINK+T1_RESETLINK, 1);
	t1outp(base, T1_SLOWLINK+T1_RESETLINK, 1);
	mdelay(100);
	t1outp(base, T1_FASTLINK+T1_RESETLINK, 0);
	t1outp(base, T1_SLOWLINK+T1_RESETLINK, 0);
	mdelay(10);
	t1outp(base, T1_FASTLINK+T1_ANALYSE, 0);
	mdelay(5);
	t1outp(base, T1_SLOWLINK+T1_ANALYSE, 0);

	if (t1inp(base, T1_FASTLINK+T1_OUTSTAT) != 0x1) /* tx empty */
		return 1;
	if (t1inp(base, T1_FASTLINK+T1_INSTAT) != 0x0) /* rx empty */
		return 2;
	if (t1inp(base, T1_FASTLINK+T1_IRQENABLE) != 0x0)
		return 3;
	if ((t1inp(base, T1_FASTLINK+T1_FIFOSTAT) & 0xf0) != 0x70)
		return 4;
	if ((t1inp(base, T1_FASTLINK+T1_IRQMASTER) & 0x0e) != 0)
		return 5;
	if ((t1inp(base, T1_FASTLINK+T1_IDENT) & 0x7d) != 1)
		return 6;
	if (t1inp(base, T1_SLOWLINK+T1_OUTSTAT) != 0x1) /* tx empty */
		return 7;
	if ((t1inp(base, T1_SLOWLINK+T1_IRQMASTER) & 0x0e) != 0)
		return 8;
	if ((t1inp(base, T1_SLOWLINK+T1_IDENT) & 0x7d) != 0)
		return 9;
        return 0;
}

static irqreturn_t t1isa_interrupt(int interrupt, void *devptr)
{
	avmcard *card = devptr;
	avmctrl_info *cinfo = &card->ctrlinfo[0];
	struct capi_ctr *ctrl = &cinfo->capi_ctrl;
	unsigned char b1cmd;
	struct sk_buff *skb;

	unsigned ApplId;
	unsigned MsgLen;
	unsigned DataB3Len;
	unsigned NCCI;
	unsigned WindowSize;
	unsigned long flags;

	spin_lock_irqsave(&card->lock, flags);

	while (b1_rx_full(card->port)) {

		b1cmd = b1_get_byte(card->port);

		switch (b1cmd) {

		case RECEIVE_DATA_B3_IND:

			ApplId = (unsigned) b1_get_word(card->port);
			MsgLen = t1_get_slice(card->port, card->msgbuf);
			DataB3Len = t1_get_slice(card->port, card->databuf);
			spin_unlock_irqrestore(&card->lock, flags);

			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) b1_get_word(card->port);
			MsgLen = t1_get_slice(card->port, card->msgbuf);
			if (!(skb = alloc_skb(MsgLen, GFP_ATOMIC))) {
				spin_unlock_irqrestore(&card->lock, flags);
				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)
					capilib_data_b3_conf(&cinfo->ncci_head, ApplId,
							     CAPIMSG_NCCI(skb->data),
							     CAPIMSG_MSGID(skb->data));
				spin_unlock_irqrestore(&card->lock, flags);
				capi_ctr_handle_message(ctrl, ApplId, skb);
			}
			break;

		case RECEIVE_NEW_NCCI:

			ApplId = b1_get_word(card->port);
			NCCI = b1_get_word(card->port);
			WindowSize = b1_get_word(card->port);
			capilib_new_ncci(&cinfo->ncci_head, ApplId, NCCI, WindowSize);
			spin_unlock_irqrestore(&card->lock, flags);
			break;

		case RECEIVE_FREE_NCCI:

			ApplId = b1_get_word(card->port);
			NCCI = b1_get_word(card->port);
			if (NCCI != 0xffffffff)
				capilib_free_ncci(&cinfo->ncci_head, ApplId, NCCI);
			spin_unlock_irqrestore(&card->lock, flags);
			break;

		case RECEIVE_START:
			b1_put_byte(card->port, SEND_POLLACK);
			spin_unlock_irqrestore(&card->lock, flags);
			capi_ctr_resume_output(ctrl);
			break;

		case RECEIVE_STOP:
			spin_unlock_irqrestore(&card->lock, flags);
			capi_ctr_suspend_output(ctrl);
			break;

		case RECEIVE_INIT:

			cinfo->versionlen = t1_get_slice(card->port, cinfo->versionbuf);
			spin_unlock_irqrestore(&card->lock, flags);
			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) b1_get_word(card->port);
			MsgLen = t1_get_slice(card->port, card->msgbuf);
			spin_unlock_irqrestore(&card->lock, flags);
			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 = t1_get_slice(card->port, card->msgbuf);
			spin_unlock_irqrestore(&card->lock, flags);
			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;


		case 0xff:
			spin_unlock_irqrestore(&card->lock, flags);
			printk(KERN_ERR "%s: card reseted ?\n", card->name);
			return IRQ_HANDLED;
		default:
			spin_unlock_irqrestore(&card->lock, flags);
			printk(KERN_ERR "%s: b1_interrupt: 0x%x ???\n",
					card->name, b1cmd);
			return IRQ_NONE;
		}
	}
	return IRQ_HANDLED;
}

/* ------------------------------------------------------------- */

static int t1isa_load_firmware(struct capi_ctr *ctrl, capiloaddata *data)
{
	avmctrl_info *cinfo = (avmctrl_info *)(ctrl->driverdata);
	avmcard *card = cinfo->card;
	unsigned int port = card->port;
	unsigned long flags;
	int retval;

	t1_disable_irq(port);
	b1_reset(port);

	if ((retval = b1_load_t4file(card, &data->firmware))) {
		b1_reset(port);
		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))) {
			b1_reset(port);
			printk(KERN_ERR "%s: failed to load config!!\n",
					card->name);
			return retval;
		}
	}

	if (!b1_loaded(card)) {
		printk(KERN_ERR "%s: failed to load t4file.\n", card->name);
		return -EIO;
	}

	spin_lock_irqsave(&card->lock, flags);
	b1_setinterrupt(port, card->irq, card->cardtype);
	b1_put_byte(port, SEND_INIT);
	b1_put_word(port, CAPI_MAXAPPL);
	b1_put_word(port, AVM_NCCI_PER_CHANNEL*30);
	b1_put_word(port, ctrl->cnr - 1);
	spin_unlock_irqrestore(&card->lock, flags);

	return 0;
}

static void t1isa_reset_ctr(struct capi_ctr *ctrl)
{
	avmctrl_info *cinfo = (avmctrl_info *)(ctrl->driverdata);
	avmcard *card = cinfo->card;
	unsigned int port = card->port;
	unsigned long flags;

	t1_disable_irq(port);
	b1_reset(port);
	b1_reset(port);

	memset(cinfo->version, 0, sizeof(cinfo->version));
	spin_lock_irqsave(&card->lock, flags);
	capilib_release(&cinfo->ncci_head);
	spin_unlock_irqrestore(&card->lock, flags);
	capi_ctr_down(ctrl);
}

static void t1isa_remove(struct pci_dev *pdev)
{
	avmctrl_info *cinfo = pci_get_drvdata(pdev);
	avmcard *card;
	
	if (!cinfo)
		return;

	card = cinfo->card;

	t1_disable_irq(card->port);
	b1_reset(card->port);
	b1_reset(card->port);
	t1_reset(card->port);

	detach_capi_ctr(&cinfo->capi_ctrl);
	free_irq(card->irq, card);
	release_region(card->port, AVMB1_PORTLEN);
	b1_free_card(card);
}

/* ------------------------------------------------------------- */

static u16 t1isa_send_message(struct capi_ctr *ctrl, struct sk_buff *skb);
static char *t1isa_procinfo(struct capi_ctr *ctrl);

static int t1isa_probe(struct pci_dev *pdev, int cardnr)
{
	avmctrl_info *cinfo;
	avmcard *card;
	int retval;

	card = b1_alloc_card(1);
	if (!card) {
		printk(KERN_WARNING "t1isa: no memory.\n");
		retval = -ENOMEM;
		goto err;
	}

	cinfo = card->ctrlinfo;
	card->port = pci_resource_start(pdev, 0);
	card->irq = pdev->irq;
	card->cardtype = avm_t1isa;
	card->cardnr = cardnr;
	sprintf(card->name, "t1isa-%x", card->port);

	if (!(((card->port & 0x7) == 0) && ((card->port & 0x30) != 0x30))) {
		printk(KERN_WARNING "t1isa: invalid port 0x%x.\n", card->port);
		retval = -EINVAL;
		goto err_free;
        }
	if (hema_irq_table[card->irq & 0xf] == 0) {
		printk(KERN_WARNING "t1isa: irq %d not valid.\n", card->irq);
		retval = -EINVAL;
		goto err_free;
	}
	if (!request_region(card->port, AVMB1_PORTLEN, card->name)) {
		printk(KERN_INFO "t1isa: ports 0x%03x-0x%03x in use.\n",
		       card->port, card->port + AVMB1_PORTLEN);
		retval = -EBUSY;
		goto err_free;
	}
	retval = request_irq(card->irq, t1isa_interrupt, 0, card->name, card);
	if (retval) {
		printk(KERN_INFO "t1isa: unable to get IRQ %d.\n", card->irq);
		retval = -EBUSY;
		goto err_release_region;
	}

        if ((retval = t1_detectandinit(card->port, card->irq, card->cardnr)) != 0) {
		printk(KERN_INFO "t1isa: NO card at 0x%x (%d)\n",
		       card->port, retval);
		retval = -ENODEV;
		goto err_free_irq;
	}
	t1_disable_irq(card->port);
	b1_reset(card->port);

	cinfo->capi_ctrl.owner = THIS_MODULE;
	cinfo->capi_ctrl.driver_name   = "t1isa";
	cinfo->capi_ctrl.driverdata    = cinfo;
	cinfo->capi_ctrl.register_appl = b1_register_appl;
	cinfo->capi_ctrl.release_appl  = b1_release_appl;
	cinfo->capi_ctrl.send_message  = t1isa_send_message;
	cinfo->capi_ctrl.load_firmware = t1isa_load_firmware;
	cinfo->capi_ctrl.reset_ctr     = t1isa_reset_ctr;
	cinfo->capi_ctrl.procinfo      = t1isa_procinfo;
	cinfo->capi_ctrl.proc_fops = &b1ctl_proc_fops;
	strcpy(cinfo->capi_ctrl.name, card->name);

	retval = attach_capi_ctr(&cinfo->capi_ctrl);
	if (retval) {
		printk(KERN_INFO "t1isa: attach controller failed.\n");
		goto err_free_irq;
	}

	printk(KERN_INFO "t1isa: AVM T1 ISA at i/o %#x, irq %d, card %d\n",
	       card->port, card->irq, card->cardnr);

	pci_set_drvdata(pdev, cinfo);
	return 0;

 err_free_irq:
	free_irq(card->irq, card);
 err_release_region:
	release_region(card->port, AVMB1_PORTLEN);
 err_free:
	b1_free_card(card);
 err:
	return retval;
}

static u16 t1isa_send_message(struct capi_ctr *ctrl, struct sk_buff *skb)
{
	avmctrl_info *cinfo = (avmctrl_info *)(ctrl->driverdata);
	avmcard *card = cinfo->card;
	unsigned int port = card->port;
	unsigned long flags;
	u16 len = CAPIMSG_LEN(skb->data);
	u8 cmd = CAPIMSG_COMMAND(skb->data);
	u8 subcmd = CAPIMSG_SUBCOMMAND(skb->data);
	u16 dlen, retval;

	spin_lock_irqsave(&card->lock, flags);
	if (CAPICMD(cmd, subcmd) == CAPI_DATA_B3_REQ) {
		retval = capilib_data_b3_req(&cinfo->ncci_head,
					     CAPIMSG_APPID(skb->data),
					     CAPIMSG_NCCI(skb->data),
					     CAPIMSG_MSGID(skb->data));
		if (retval != CAPI_NOERROR) {
			spin_unlock_irqrestore(&card->lock, flags);
			return retval;
		}
		dlen = CAPIMSG_DATALEN(skb->data);

		b1_put_byte(port, SEND_DATA_B3_REQ);
		t1_put_slice(port, skb->data, len);
		t1_put_slice(port, skb->data + len, dlen);
	} else {
		b1_put_byte(port, SEND_MESSAGE);
		t1_put_slice(port, skb->data, len);
	}
	spin_unlock_irqrestore(&card->lock, flags);
	dev_kfree_skb_any(skb);
	return CAPI_NOERROR;
}
/* ------------------------------------------------------------- */

static char *t1isa_procinfo(struct capi_ctr *ctrl)
{
	avmctrl_info *cinfo = (avmctrl_info *)(ctrl->driverdata);

	if (!cinfo)
		return "";
	sprintf(cinfo->infobuf, "%s %s 0x%x %d %d",
		cinfo->cardname[0] ? cinfo->cardname : "-",
		cinfo->version[VER_DRIVER] ? cinfo->version[VER_DRIVER] : "-",
		cinfo->card ? cinfo->card->port : 0x0,
		cinfo->card ? cinfo->card->irq : 0,
		cinfo->card ? cinfo->card->cardnr : 0
		);
	return cinfo->infobuf;
}


/* ------------------------------------------------------------- */

#define MAX_CARDS 4
static struct pci_dev isa_dev[MAX_CARDS];
static int io[MAX_CARDS];
static int irq[MAX_CARDS];
static int cardnr[MAX_CARDS];

module_param_array(io, int, NULL, 0);
module_param_array(irq, int, NULL, 0);
module_param_array(cardnr, int, NULL, 0);
MODULE_PARM_DESC(io, "I/O base address(es)");
MODULE_PARM_DESC(irq, "IRQ number(s) (assigned)");
MODULE_PARM_DESC(cardnr, "Card number(s) (as jumpered)");

static int t1isa_add_card(struct capi_driver *driver, capicardparams *data)
{
	int i;

	for (i = 0; i < MAX_CARDS; i++) {
		if (isa_dev[i].resource[0].start)
			continue;

		isa_dev[i].resource[0].start = data->port;
		isa_dev[i].irq = data->irq;

		if (t1isa_probe(&isa_dev[i], data->cardnr) == 0)
			return 0;
	}
	return -ENODEV;
}

static struct capi_driver capi_driver_t1isa = {
	.name		= "t1isa",
	.revision	= "1.0",
	.add_card       = t1isa_add_card,
};

static int __init t1isa_init(void)
{
	char rev[32];
	char *p;
	int i;

	if ((p = strchr(revision, ':')) != NULL && p[1]) {
		strlcpy(rev, p + 2, 32);
		if ((p = strchr(rev, '$')) != NULL && p > rev)
		   *(p-1) = 0;
	} else
		strcpy(rev, "1.0");

	for (i = 0; i < MAX_CARDS; i++) {
		if (!io[i])
			break;

		isa_dev[i].resource[0].start = io[i];
		isa_dev[i].irq = irq[i];

		if (t1isa_probe(&isa_dev[i], cardnr[i]) != 0)
			return -ENODEV;
	}

	strlcpy(capi_driver_t1isa.revision, rev, 32);
	register_capi_driver(&capi_driver_t1isa);
	printk(KERN_INFO "t1isa: revision %s\n", rev);

	return 0;
}

static void __exit t1isa_exit(void)
{
	int i;

	unregister_capi_driver(&capi_driver_t1isa);
	for (i = 0; i < MAX_CARDS; i++) {
		if (!io[i])
			break;

		t1isa_remove(&isa_dev[i]);
	}
}

module_init(t1isa_init);
module_exit(t1isa_exit);
Commit	Line	Data
1da177e4 LT	1	/* $Id: t1isa.c,v 1.1.2.3 2004/02/10 01:07:12 keil Exp $
	2	*
	3	* Module for AVM T1 HEMA-card.
	4	*
	5	* Copyright 1999 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/skbuff.h>
	15	#include <linux/delay.h>
	16	#include <linux/mm.h>
	17	#include <linux/interrupt.h>
	18	#include <linux/ioport.h>
	19	#include <linux/capi.h>
	20	#include <linux/netdevice.h>
	21	#include <linux/kernelcapi.h>
	22	#include <linux/init.h>
	23	#include <linux/pci.h>
5a0e3ad6	24	#include <linux/gfp.h>
1da177e4 LT	25	#include <asm/io.h>
	26	#include <linux/isdn/capicmd.h>
	27	#include <linux/isdn/capiutil.h>
	28	#include <linux/isdn/capilli.h>
	29	#include "avmcard.h"
	30
	31	/* ------------------------------------------------------------- */
	32
	33	static char *revision = "$Revision: 1.1.2.3 $";
	34
	35	/* ------------------------------------------------------------- */
	36
	37	MODULE_DESCRIPTION("CAPI4Linux: Driver for AVM T1 HEMA ISA card");
	38	MODULE_AUTHOR("Carsten Paeth");
	39	MODULE_LICENSE("GPL");
	40
	41	/* ------------------------------------------------------------- */
	42
	43	static int hema_irq_table[16] =
	44	{0,
	45	0,
	46	0,
	47	0x80, /* irq 3 */
	48	0,
	49	0x90, /* irq 5 */
	50	0,
	51	0xA0, /* irq 7 */
	52	0,
	53	0xB0, /* irq 9 */
	54	0xC0, /* irq 10 */
	55	0xD0, /* irq 11 */
	56	0xE0, /* irq 12 */
	57	0,
	58	0,
	59	0xF0, /* irq 15 */
	60	};
	61
	62	static int t1_detectandinit(unsigned int base, unsigned irq, int cardnr)
	63	{
	64	unsigned char cregs[8];
	65	unsigned char reverse_cardnr;
	66	unsigned char dummy;
	67	int i;
	68
	69	reverse_cardnr = ((cardnr & 0x01) << 3) \| ((cardnr & 0x02) << 1)
	70	\| ((cardnr & 0x04) >> 1) \| ((cardnr & 0x08) >> 3);
	71	cregs[0] = (HEMA_VERSION_ID << 4) \| (reverse_cardnr & 0xf);
	72	cregs[1] = 0x00; /* fast & slow link connected to CON1 */
	73	cregs[2] = 0x05; /* fast link 20MBit, slow link 20 MBit */
	74	cregs[3] = 0;
	75	cregs[4] = 0x11; /* zero wait state */
	76	cregs[5] = hema_irq_table[irq & 0xf];
	77	cregs[6] = 0;
	78	cregs[7] = 0;
	79
	80	/*
	81	* no one else should use the ISA bus in this moment,
	82	* but no function there to prevent this :-(
	83	* save_flags(flags); cli();
	84	*/
	85
	86	/* board reset */
	87	t1outp(base, T1_RESETBOARD, 0xf);
	88	mdelay(100);
89	dummy = t1inp(base, T1_FASTLINK+T1_OUTSTAT); /* first read */
90
91	/* write config */
92	dummy = (base >> 4) & 0xff;
93	for (i=1;i<=0xf;i++) t1outp(base, i, dummy);
94	t1outp(base, HEMA_PAL_ID & 0xf, dummy);
95	t1outp(base, HEMA_PAL_ID >> 4, cregs[0]);
96	for(i=1;i<7;i++) t1outp(base, 0, cregs[i]);
97	t1outp(base, ((base >> 4)) & 0x3, cregs[7]);
98	/* restore_flags(flags); */
99
100	mdelay(100);
101	t1outp(base, T1_FASTLINK+T1_RESETLINK, 0);
102	t1outp(base, T1_SLOWLINK+T1_RESETLINK, 0);
103	mdelay(10);
104	t1outp(base, T1_FASTLINK+T1_RESETLINK, 1);
105	t1outp(base, T1_SLOWLINK+T1_RESETLINK, 1);
106	mdelay(100);
107	t1outp(base, T1_FASTLINK+T1_RESETLINK, 0);
108	t1outp(base, T1_SLOWLINK+T1_RESETLINK, 0);
109	mdelay(10);
110	t1outp(base, T1_FASTLINK+T1_ANALYSE, 0);
111	mdelay(5);
112	t1outp(base, T1_SLOWLINK+T1_ANALYSE, 0);
113
114	if (t1inp(base, T1_FASTLINK+T1_OUTSTAT) != 0x1) /* tx empty */
115	return 1;
116	if (t1inp(base, T1_FASTLINK+T1_INSTAT) != 0x0) /* rx empty */
117	return 2;
118	if (t1inp(base, T1_FASTLINK+T1_IRQENABLE) != 0x0)
119	return 3;
120	if ((t1inp(base, T1_FASTLINK+T1_FIFOSTAT) & 0xf0) != 0x70)
121	return 4;
122	if ((t1inp(base, T1_FASTLINK+T1_IRQMASTER) & 0x0e) != 0)
123	return 5;
124	if ((t1inp(base, T1_FASTLINK+T1_IDENT) & 0x7d) != 1)
125	return 6;
126	if (t1inp(base, T1_SLOWLINK+T1_OUTSTAT) != 0x1) /* tx empty */
127	return 7;
128	if ((t1inp(base, T1_SLOWLINK+T1_IRQMASTER) & 0x0e) != 0)
129	return 8;
130	if ((t1inp(base, T1_SLOWLINK+T1_IDENT) & 0x7d) != 0)
131	return 9;
132	return 0;
133	}
134
7d12e780	135	static irqreturn_t t1isa_interrupt(int interrupt, void *devptr)
1da177e4 LT	136	{
	137	avmcard *card = devptr;
	138	avmctrl_info *cinfo = &card->ctrlinfo[0];
	139	struct capi_ctr *ctrl = &cinfo->capi_ctrl;
	140	unsigned char b1cmd;
	141	struct sk_buff *skb;
	142
	143	unsigned ApplId;
	144	unsigned MsgLen;
	145	unsigned DataB3Len;
	146	unsigned NCCI;
	147	unsigned WindowSize;
	148	unsigned long flags;
	149
	150	spin_lock_irqsave(&card->lock, flags);
	151
	152	while (b1_rx_full(card->port)) {
	153
	154	b1cmd = b1_get_byte(card->port);
	155
	156	switch (b1cmd) {
	157
	158	case RECEIVE_DATA_B3_IND:
	159
	160	ApplId = (unsigned) b1_get_word(card->port);
	161	MsgLen = t1_get_slice(card->port, card->msgbuf);
	162	DataB3Len = t1_get_slice(card->port, card->databuf);
	163	spin_unlock_irqrestore(&card->lock, flags);
	164
	165	if (MsgLen < 30) { /* not CAPI 64Bit */
	166	memset(card->msgbuf+MsgLen, 0, 30-MsgLen);
	167	MsgLen = 30;
	168	CAPIMSG_SETLEN(card->msgbuf, 30);
	169	}
	170	if (!(skb = alloc_skb(DataB3Len+MsgLen, GFP_ATOMIC))) {
	171	printk(KERN_ERR "%s: incoming packet dropped\n",
	172	card->name);
	173	} else {
	174	memcpy(skb_put(skb, MsgLen), card->msgbuf, MsgLen);
	175	memcpy(skb_put(skb, DataB3Len), card->databuf, DataB3Len);
	176	capi_ctr_handle_message(ctrl, ApplId, skb);
	177	}
	178	break;
	179
	180	case RECEIVE_MESSAGE:
	181
	182	ApplId = (unsigned) b1_get_word(card->port);
	183	MsgLen = t1_get_slice(card->port, card->msgbuf);
1da177e4	184	if (!(skb = alloc_skb(MsgLen, GFP_ATOMIC))) {
feea6d4d	185	spin_unlock_irqrestore(&card->lock, flags);
1da177e4 LT	186	printk(KERN_ERR "%s: incoming packet dropped\n",
	187	card->name);
	188	} else {
	189	memcpy(skb_put(skb, MsgLen), card->msgbuf, MsgLen);
	190	if (CAPIMSG_CMD(skb->data) == CAPI_DATA_B3)
	191	capilib_data_b3_conf(&cinfo->ncci_head, ApplId,
	192	CAPIMSG_NCCI(skb->data),
	193	CAPIMSG_MSGID(skb->data));
feea6d4d	194	spin_unlock_irqrestore(&card->lock, flags);
1da177e4 LT	195	capi_ctr_handle_message(ctrl, ApplId, skb);
	196	}
	197	break;
	198
	199	case RECEIVE_NEW_NCCI:
	200
	201	ApplId = b1_get_word(card->port);
	202	NCCI = b1_get_word(card->port);
	203	WindowSize = b1_get_word(card->port);
1da177e4	204	capilib_new_ncci(&cinfo->ncci_head, ApplId, NCCI, WindowSize);
feea6d4d	205	spin_unlock_irqrestore(&card->lock, flags);
1da177e4 LT	206	break;
	207
	208	case RECEIVE_FREE_NCCI:
	209
	210	ApplId = b1_get_word(card->port);
	211	NCCI = b1_get_word(card->port);
1da177e4 LT	212	if (NCCI != 0xffffffff)
1da177e4 LT	213	capilib_free_ncci(&cinfo->ncci_head, ApplId, NCCI);
feea6d4d	214	spin_unlock_irqrestore(&card->lock, flags);
1da177e4 LT	215	break;
	216
	217	case RECEIVE_START:
	218	b1_put_byte(card->port, SEND_POLLACK);
	219	spin_unlock_irqrestore(&card->lock, flags);
	220	capi_ctr_resume_output(ctrl);
	221	break;
	222
	223	case RECEIVE_STOP:
	224	spin_unlock_irqrestore(&card->lock, flags);
	225	capi_ctr_suspend_output(ctrl);
	226	break;
	227
	228	case RECEIVE_INIT:
	229
	230	cinfo->versionlen = t1_get_slice(card->port, cinfo->versionbuf);
	231	spin_unlock_irqrestore(&card->lock, flags);
	232	b1_parse_version(cinfo);
	233	printk(KERN_INFO "%s: %s-card (%s) now active\n",
	234	card->name,
	235	cinfo->version[VER_CARDTYPE],
	236	cinfo->version[VER_DRIVER]);
	237	capi_ctr_ready(ctrl);
	238	break;
	239
	240	case RECEIVE_TASK_READY:
	241	ApplId = (unsigned) b1_get_word(card->port);
	242	MsgLen = t1_get_slice(card->port, card->msgbuf);
	243	spin_unlock_irqrestore(&card->lock, flags);
	244	card->msgbuf[MsgLen] = 0;
	245	while ( MsgLen > 0
	246	&& ( card->msgbuf[MsgLen-1] == '\n'
	247	\|\| card->msgbuf[MsgLen-1] == '\r')) {
	248	card->msgbuf[MsgLen-1] = 0;
	249	MsgLen--;
	250	}
	251	printk(KERN_INFO "%s: task %d \"%s\" ready.\n",
	252	card->name, ApplId, card->msgbuf);
	253	break;
	254
	255	case RECEIVE_DEBUGMSG:
	256	MsgLen = t1_get_slice(card->port, card->msgbuf);
	257	spin_unlock_irqrestore(&card->lock, flags);
	258	card->msgbuf[MsgLen] = 0;
	259	while ( MsgLen > 0
	260	&& ( card->msgbuf[MsgLen-1] == '\n'
	261	\|\| card->msgbuf[MsgLen-1] == '\r')) {
	262	card->msgbuf[MsgLen-1] = 0;
	263	MsgLen--;
	264	}
	265	printk(KERN_INFO "%s: DEBUG: %s\n", card->name, card->msgbuf);
	266	break;
	267
	268
	269	case 0xff:
	270	spin_unlock_irqrestore(&card->lock, flags);
	271	printk(KERN_ERR "%s: card reseted ?\n", card->name);
	272	return IRQ_HANDLED;
	273	default:
	274	spin_unlock_irqrestore(&card->lock, flags);
	275	printk(KERN_ERR "%s: b1_interrupt: 0x%x ???\n",
	276	card->name, b1cmd);
	277	return IRQ_NONE;
	278	}
279	}
280	return IRQ_HANDLED;
281	}
282
283	/* ------------------------------------------------------------- */
284
285	static int t1isa_load_firmware(struct capi_ctr ctrl, capiloaddata data)
286	{
287	avmctrl_info cinfo = (avmctrl_info )(ctrl->driverdata);
288	avmcard *card = cinfo->card;
289	unsigned int port = card->port;
290	unsigned long flags;
291	int retval;
292
293	t1_disable_irq(port);
294	b1_reset(port);
295
296	if ((retval = b1_load_t4file(card, &data->firmware))) {
297	b1_reset(port);
298	printk(KERN_ERR "%s: failed to load t4file!!\n",
299	card->name);
300	return retval;
301	}
302
303	if (data->configuration.len > 0 && data->configuration.data) {
304	if ((retval = b1_load_config(card, &data->configuration))) {
305	b1_reset(port);
306	printk(KERN_ERR "%s: failed to load config!!\n",
307	card->name);
308	return retval;
309	}
310	}
311
312	if (!b1_loaded(card)) {
313	printk(KERN_ERR "%s: failed to load t4file.\n", card->name);
314	return -EIO;
315	}
316
317	spin_lock_irqsave(&card->lock, flags);
318	b1_setinterrupt(port, card->irq, card->cardtype);
319	b1_put_byte(port, SEND_INIT);
320	b1_put_word(port, CAPI_MAXAPPL);
321	b1_put_word(port, AVM_NCCI_PER_CHANNEL*30);
322	b1_put_word(port, ctrl->cnr - 1);
323	spin_unlock_irqrestore(&card->lock, flags);
324
325	return 0;
326	}
327
08e51533	328	static void t1isa_reset_ctr(struct capi_ctr *ctrl)
1da177e4 LT	329	{
	330	avmctrl_info cinfo = (avmctrl_info )(ctrl->driverdata);
	331	avmcard *card = cinfo->card;
	332	unsigned int port = card->port;
feea6d4d	333	unsigned long flags;
1da177e4 LT	334
	335	t1_disable_irq(port);
	336	b1_reset(port);
	337	b1_reset(port);
	338
	339	memset(cinfo->version, 0, sizeof(cinfo->version));
feea6d4d	340	spin_lock_irqsave(&card->lock, flags);
1da177e4	341	capilib_release(&cinfo->ncci_head);
feea6d4d	342	spin_unlock_irqrestore(&card->lock, flags);
4e329972	343	capi_ctr_down(ctrl);
1da177e4 LT	344	}
	345
	346	static void t1isa_remove(struct pci_dev *pdev)
	347	{
	348	avmctrl_info *cinfo = pci_get_drvdata(pdev);
	349	avmcard *card;
	350
	351	if (!cinfo)
	352	return;
	353
	354	card = cinfo->card;
	355
	356	t1_disable_irq(card->port);
	357	b1_reset(card->port);
	358	b1_reset(card->port);
	359	t1_reset(card->port);
	360
	361	detach_capi_ctr(&cinfo->capi_ctrl);
	362	free_irq(card->irq, card);
	363	release_region(card->port, AVMB1_PORTLEN);
	364	b1_free_card(card);
	365	}
	366
	367	/* ------------------------------------------------------------- */
	368
	369	static u16 t1isa_send_message(struct capi_ctr ctrl, struct sk_buff skb);
	370	static char t1isa_procinfo(struct capi_ctr ctrl);
	371
	372	static int t1isa_probe(struct pci_dev *pdev, int cardnr)
	373	{
	374	avmctrl_info *cinfo;
	375	avmcard *card;
	376	int retval;
	377
	378	card = b1_alloc_card(1);
	379	if (!card) {
	380	printk(KERN_WARNING "t1isa: no memory.\n");
	381	retval = -ENOMEM;
	382	goto err;
	383	}
	384
	385	cinfo = card->ctrlinfo;
	386	card->port = pci_resource_start(pdev, 0);
	387	card->irq = pdev->irq;
	388	card->cardtype = avm_t1isa;
	389	card->cardnr = cardnr;
	390	sprintf(card->name, "t1isa-%x", card->port);
	391
	392	if (!(((card->port & 0x7) == 0) && ((card->port & 0x30) != 0x30))) {
	393	printk(KERN_WARNING "t1isa: invalid port 0x%x.\n", card->port);
	394	retval = -EINVAL;
	395	goto err_free;
	396	}
	397	if (hema_irq_table[card->irq & 0xf] == 0) {
	398	printk(KERN_WARNING "t1isa: irq %d not valid.\n", card->irq);
	399	retval = -EINVAL;
	400	goto err_free;
	401	}
	402	if (!request_region(card->port, AVMB1_PORTLEN, card->name)) {
	403	printk(KERN_INFO "t1isa: ports 0x%03x-0x%03x in use.\n",
	404	card->port, card->port + AVMB1_PORTLEN);
	405	retval = -EBUSY;
	406	goto err_free;
	407	}
408	retval = request_irq(card->irq, t1isa_interrupt, 0, card->name, card);
409	if (retval) {
410	printk(KERN_INFO "t1isa: unable to get IRQ %d.\n", card->irq);
411	retval = -EBUSY;
412	goto err_release_region;
413	}
414
415	if ((retval = t1_detectandinit(card->port, card->irq, card->cardnr)) != 0) {
416	printk(KERN_INFO "t1isa: NO card at 0x%x (%d)\n",
417	card->port, retval);
418	retval = -ENODEV;
419	goto err_free_irq;
420	}
421	t1_disable_irq(card->port);
422	b1_reset(card->port);
423
424	cinfo->capi_ctrl.owner = THIS_MODULE;
425	cinfo->capi_ctrl.driver_name = "t1isa";
426	cinfo->capi_ctrl.driverdata = cinfo;
427	cinfo->capi_ctrl.register_appl = b1_register_appl;
428	cinfo->capi_ctrl.release_appl = b1_release_appl;
429	cinfo->capi_ctrl.send_message = t1isa_send_message;
430	cinfo->capi_ctrl.load_firmware = t1isa_load_firmware;
431	cinfo->capi_ctrl.reset_ctr = t1isa_reset_ctr;
432	cinfo->capi_ctrl.procinfo = t1isa_procinfo;
9a58a80a	433	cinfo->capi_ctrl.proc_fops = &b1ctl_proc_fops;
1da177e4 LT	434	strcpy(cinfo->capi_ctrl.name, card->name);
	435
	436	retval = attach_capi_ctr(&cinfo->capi_ctrl);
	437	if (retval) {
	438	printk(KERN_INFO "t1isa: attach controller failed.\n");
	439	goto err_free_irq;
	440	}
	441
	442	printk(KERN_INFO "t1isa: AVM T1 ISA at i/o %#x, irq %d, card %d\n",
	443	card->port, card->irq, card->cardnr);
	444
	445	pci_set_drvdata(pdev, cinfo);
	446	return 0;
	447
	448	err_free_irq:
	449	free_irq(card->irq, card);
	450	err_release_region:
	451	release_region(card->port, AVMB1_PORTLEN);
	452	err_free:
	453	b1_free_card(card);
	454	err:
	455	return retval;
	456	}
	457
	458	static u16 t1isa_send_message(struct capi_ctr ctrl, struct sk_buff skb)
	459	{
	460	avmctrl_info cinfo = (avmctrl_info )(ctrl->driverdata);
	461	avmcard *card = cinfo->card;
	462	unsigned int port = card->port;
	463	unsigned long flags;
	464	u16 len = CAPIMSG_LEN(skb->data);
	465	u8 cmd = CAPIMSG_COMMAND(skb->data);
	466	u8 subcmd = CAPIMSG_SUBCOMMAND(skb->data);
	467	u16 dlen, retval;
	468
feea6d4d	469	spin_lock_irqsave(&card->lock, flags);
1da177e4 LT	470	if (CAPICMD(cmd, subcmd) == CAPI_DATA_B3_REQ) {
	471	retval = capilib_data_b3_req(&cinfo->ncci_head,
	472	CAPIMSG_APPID(skb->data),
	473	CAPIMSG_NCCI(skb->data),
	474	CAPIMSG_MSGID(skb->data));
feea6d4d KK	475	if (retval != CAPI_NOERROR) {
feea6d4d KK	476	spin_unlock_irqrestore(&card->lock, flags);
1da177e4	477	return retval;
feea6d4d	478	}
1da177e4 LT	479	dlen = CAPIMSG_DATALEN(skb->data);
1da177e4 LT	480
1da177e4 LT	481	b1_put_byte(port, SEND_DATA_B3_REQ);
	482	t1_put_slice(port, skb->data, len);
	483	t1_put_slice(port, skb->data + len, dlen);
1da177e4	484	} else {
1da177e4 LT	485	b1_put_byte(port, SEND_MESSAGE);
1da177e4 LT	486	t1_put_slice(port, skb->data, len);
1da177e4	487	}
feea6d4d	488	spin_unlock_irqrestore(&card->lock, flags);
1da177e4 LT	489	dev_kfree_skb_any(skb);
	490	return CAPI_NOERROR;
	491	}
	492	/* ------------------------------------------------------------- */
	493
	494	static char t1isa_procinfo(struct capi_ctr ctrl)
	495	{
	496	avmctrl_info cinfo = (avmctrl_info )(ctrl->driverdata);
	497
	498	if (!cinfo)
	499	return "";
	500	sprintf(cinfo->infobuf, "%s %s 0x%x %d %d",
	501	cinfo->cardname[0] ? cinfo->cardname : "-",
	502	cinfo->version[VER_DRIVER] ? cinfo->version[VER_DRIVER] : "-",
	503	cinfo->card ? cinfo->card->port : 0x0,
	504	cinfo->card ? cinfo->card->irq : 0,
	505	cinfo->card ? cinfo->card->cardnr : 0
	506	);
	507	return cinfo->infobuf;
	508	}
	509
	510
	511	/* ------------------------------------------------------------- */
	512
	513	#define MAX_CARDS 4
	514	static struct pci_dev isa_dev[MAX_CARDS];
	515	static int io[MAX_CARDS];
	516	static int irq[MAX_CARDS];
	517	static int cardnr[MAX_CARDS];
	518
8d3b33f6 RR	519	module_param_array(io, int, NULL, 0);
	520	module_param_array(irq, int, NULL, 0);
	521	module_param_array(cardnr, int, NULL, 0);
1da177e4 LT	522	MODULE_PARM_DESC(io, "I/O base address(es)");
	523	MODULE_PARM_DESC(irq, "IRQ number(s) (assigned)");
	524	MODULE_PARM_DESC(cardnr, "Card number(s) (as jumpered)");
	525
	526	static int t1isa_add_card(struct capi_driver driver, capicardparams data)
	527	{
	528	int i;
	529
	530	for (i = 0; i < MAX_CARDS; i++) {
	531	if (isa_dev[i].resource[0].start)
	532	continue;
	533
	534	isa_dev[i].resource[0].start = data->port;
	535	isa_dev[i].irq = data->irq;
	536
	537	if (t1isa_probe(&isa_dev[i], data->cardnr) == 0)
	538	return 0;
	539	}
	540	return -ENODEV;
	541	}
	542
	543	static struct capi_driver capi_driver_t1isa = {
	544	.name = "t1isa",
	545	.revision = "1.0",
	546	.add_card = t1isa_add_card,
	547	};
	548
	549	static int __init t1isa_init(void)
	550	{
	551	char rev[32];
	552	char *p;
	553	int i;
	554
8e44b29d	555	if ((p = strchr(revision, ':')) != NULL && p[1]) {
1da177e4	556	strlcpy(rev, p + 2, 32);
8e44b29d	557	if ((p = strchr(rev, '$')) != NULL && p > rev)
1da177e4 LT	558	*(p-1) = 0;
	559	} else
	560	strcpy(rev, "1.0");
	561
	562	for (i = 0; i < MAX_CARDS; i++) {
	563	if (!io[i])
	564	break;
	565
	566	isa_dev[i].resource[0].start = io[i];
	567	isa_dev[i].irq = irq[i];
	568
	569	if (t1isa_probe(&isa_dev[i], cardnr[i]) != 0)
	570	return -ENODEV;
	571	}
	572
	573	strlcpy(capi_driver_t1isa.revision, rev, 32);
	574	register_capi_driver(&capi_driver_t1isa);
	575	printk(KERN_INFO "t1isa: revision %s\n", rev);
	576
	577	return 0;
	578	}
	579
	580	static void __exit t1isa_exit(void)
	581	{
	582	int i;
	583
ba6d14af	584	unregister_capi_driver(&capi_driver_t1isa);
1da177e4 LT	585	for (i = 0; i < MAX_CARDS; i++) {
	586	if (!io[i])
	587	break;
	588
	589	t1isa_remove(&isa_dev[i]);
	590	}
	591	}
	592
	593	module_init(t1isa_init);
	594	module_exit(t1isa_exit);