[deliverable/linux.git] / drivers / isdn / hisax / sportster.c

/* $Id: sportster.c,v 1.16.2.4 2004/01/13 23:48:39 keil Exp $
 *
 * low level stuff for USR Sportster internal TA
 *
 * Author       Karsten Keil
 * Copyright    by Karsten Keil      <keil@isdn4linux.de>
 *
 * This software may be used and distributed according to the terms
 * of the GNU General Public License, incorporated herein by reference.
 *
 * Thanks to Christian "naddy" Weisgerber (3Com, US Robotics) for documentation
 *
 *
 */
#include <linux/init.h>
#include "hisax.h"
#include "isac.h"
#include "hscx.h"
#include "isdnl1.h"

static const char *sportster_revision = "$Revision: 1.16.2.4 $";

#define byteout(addr, val) outb(val, addr)
#define bytein(addr) inb(addr)

#define	 SPORTSTER_ISAC		0xC000
#define	 SPORTSTER_HSCXA	0x0000
#define	 SPORTSTER_HSCXB	0x4000
#define	 SPORTSTER_RES_IRQ	0x8000
#define	 SPORTSTER_RESET	0x80
#define	 SPORTSTER_INTE		0x40

static inline int
calc_off(unsigned int base, unsigned int off)
{
	return (base + ((off & 0xfc) << 8) + ((off & 3) << 1));
}

static inline void
read_fifo(unsigned int adr, u_char *data, int size)
{
	insb(adr, data, size);
}

static void
write_fifo(unsigned int adr, u_char *data, int size)
{
	outsb(adr, data, size);
}

/* Interface functions */

static u_char
ReadISAC(struct IsdnCardState *cs, u_char offset)
{
	return (bytein(calc_off(cs->hw.spt.isac, offset)));
}

static void
WriteISAC(struct IsdnCardState *cs, u_char offset, u_char value)
{
	byteout(calc_off(cs->hw.spt.isac, offset), value);
}

static void
ReadISACfifo(struct IsdnCardState *cs, u_char *data, int size)
{
	read_fifo(cs->hw.spt.isac, data, size);
}

static void
WriteISACfifo(struct IsdnCardState *cs, u_char *data, int size)
{
	write_fifo(cs->hw.spt.isac, data, size);
}

static u_char
ReadHSCX(struct IsdnCardState *cs, int hscx, u_char offset)
{
	return (bytein(calc_off(cs->hw.spt.hscx[hscx], offset)));
}

static void
WriteHSCX(struct IsdnCardState *cs, int hscx, u_char offset, u_char value)
{
	byteout(calc_off(cs->hw.spt.hscx[hscx], offset), value);
}

/*
 * fast interrupt HSCX stuff goes here
 */

#define READHSCX(cs, nr, reg) bytein(calc_off(cs->hw.spt.hscx[nr], reg))
#define WRITEHSCX(cs, nr, reg, data) byteout(calc_off(cs->hw.spt.hscx[nr], reg), data)
#define READHSCXFIFO(cs, nr, ptr, cnt) read_fifo(cs->hw.spt.hscx[nr], ptr, cnt)
#define WRITEHSCXFIFO(cs, nr, ptr, cnt) write_fifo(cs->hw.spt.hscx[nr], ptr, cnt)

#include "hscx_irq.c"

static irqreturn_t
sportster_interrupt(int intno, void *dev_id)
{
	struct IsdnCardState *cs = dev_id;
	u_char val;
	u_long flags;

	spin_lock_irqsave(&cs->lock, flags);
	val = READHSCX(cs, 1, HSCX_ISTA);
Start_HSCX:
	if (val)
		hscx_int_main(cs, val);
	val = ReadISAC(cs, ISAC_ISTA);
Start_ISAC:
	if (val)
		isac_interrupt(cs, val);
	val = READHSCX(cs, 1, HSCX_ISTA);
	if (val) {
		if (cs->debug & L1_DEB_HSCX)
			debugl1(cs, "HSCX IntStat after IntRoutine");
		goto Start_HSCX;
	}
	val = ReadISAC(cs, ISAC_ISTA);
	if (val) {
		if (cs->debug & L1_DEB_ISAC)
			debugl1(cs, "ISAC IntStat after IntRoutine");
		goto Start_ISAC;
	}
	/* get a new irq impulse if there any pending */
	bytein(cs->hw.spt.cfg_reg + SPORTSTER_RES_IRQ + 1);
	spin_unlock_irqrestore(&cs->lock, flags);
	return IRQ_HANDLED;
}

static void
release_io_sportster(struct IsdnCardState *cs)
{
	int i, adr;

	byteout(cs->hw.spt.cfg_reg + SPORTSTER_RES_IRQ, 0);
	for (i = 0; i < 64; i++) {
		adr = cs->hw.spt.cfg_reg + i * 1024;
		release_region(adr, 8);
	}
}

static void
reset_sportster(struct IsdnCardState *cs)
{
	cs->hw.spt.res_irq |= SPORTSTER_RESET; /* Reset On */
	byteout(cs->hw.spt.cfg_reg + SPORTSTER_RES_IRQ, cs->hw.spt.res_irq);
	mdelay(10);
	cs->hw.spt.res_irq &= ~SPORTSTER_RESET; /* Reset Off */
	byteout(cs->hw.spt.cfg_reg + SPORTSTER_RES_IRQ, cs->hw.spt.res_irq);
	mdelay(10);
}

static int
Sportster_card_msg(struct IsdnCardState *cs, int mt, void *arg)
{
	u_long flags;

	switch (mt) {
	case CARD_RESET:
		spin_lock_irqsave(&cs->lock, flags);
		reset_sportster(cs);
		spin_unlock_irqrestore(&cs->lock, flags);
		return (0);
	case CARD_RELEASE:
		release_io_sportster(cs);
		return (0);
	case CARD_INIT:
		spin_lock_irqsave(&cs->lock, flags);
		reset_sportster(cs);
		inithscxisac(cs, 1);
		cs->hw.spt.res_irq |= SPORTSTER_INTE; /* IRQ On */
		byteout(cs->hw.spt.cfg_reg + SPORTSTER_RES_IRQ, cs->hw.spt.res_irq);
		inithscxisac(cs, 2);
		spin_unlock_irqrestore(&cs->lock, flags);
		return (0);
	case CARD_TEST:
		return (0);
	}
	return (0);
}

static int get_io_range(struct IsdnCardState *cs)
{
	int i, j, adr;

	for (i = 0; i < 64; i++) {
		adr = cs->hw.spt.cfg_reg + i * 1024;
		if (!request_region(adr, 8, "sportster")) {
			printk(KERN_WARNING "HiSax: USR Sportster config port "
			       "%x-%x already in use\n",
			       adr, adr + 8);
			break;
		}
	}
	if (i == 64)
		return (1);
	else {
		for (j = 0; j < i; j++) {
			adr = cs->hw.spt.cfg_reg + j * 1024;
			release_region(adr, 8);
		}
		return (0);
	}
}

int setup_sportster(struct IsdnCard *card)
{
	struct IsdnCardState *cs = card->cs;
	char tmp[64];

	strcpy(tmp, sportster_revision);
	printk(KERN_INFO "HiSax: USR Sportster driver Rev. %s\n", HiSax_getrev(tmp));
	if (cs->typ != ISDN_CTYPE_SPORTSTER)
		return (0);

	cs->hw.spt.cfg_reg = card->para[1];
	cs->irq = card->para[0];
	if (!get_io_range(cs))
		return (0);
	cs->hw.spt.isac = cs->hw.spt.cfg_reg + SPORTSTER_ISAC;
	cs->hw.spt.hscx[0] = cs->hw.spt.cfg_reg + SPORTSTER_HSCXA;
	cs->hw.spt.hscx[1] = cs->hw.spt.cfg_reg + SPORTSTER_HSCXB;

	switch (cs->irq) {
	case 5:	cs->hw.spt.res_irq = 1;
		break;
	case 7:	cs->hw.spt.res_irq = 2;
		break;
	case 10:cs->hw.spt.res_irq = 3;
		break;
	case 11:cs->hw.spt.res_irq = 4;
		break;
	case 12:cs->hw.spt.res_irq = 5;
		break;
	case 14:cs->hw.spt.res_irq = 6;
		break;
	case 15:cs->hw.spt.res_irq = 7;
		break;
	default:release_io_sportster(cs);
		printk(KERN_WARNING "Sportster: wrong IRQ\n");
		return (0);
	}
	printk(KERN_INFO "HiSax: USR Sportster config irq:%d cfg:0x%X\n",
	       cs->irq, cs->hw.spt.cfg_reg);
	setup_isac(cs);
	cs->readisac = &ReadISAC;
	cs->writeisac = &WriteISAC;
	cs->readisacfifo = &ReadISACfifo;
	cs->writeisacfifo = &WriteISACfifo;
	cs->BC_Read_Reg = &ReadHSCX;
	cs->BC_Write_Reg = &WriteHSCX;
	cs->BC_Send_Data = &hscx_fill_fifo;
	cs->cardmsg = &Sportster_card_msg;
	cs->irq_func = &sportster_interrupt;
	ISACVersion(cs, "Sportster:");
	if (HscxVersion(cs, "Sportster:")) {
		printk(KERN_WARNING
		       "Sportster: wrong HSCX versions check IO address\n");
		release_io_sportster(cs);
		return (0);
	}
	return (1);
}
Commit	Line	Data
1da177e4 LT	1	/* $Id: sportster.c,v 1.16.2.4 2004/01/13 23:48:39 keil Exp $
	2	*
	3	* low level stuff for USR Sportster internal TA
	4	*
	5	* Author Karsten Keil
	6	* Copyright by Karsten Keil <keil@isdn4linux.de>
475be4d8	7	*
1da177e4 LT	8	* This software may be used and distributed according to the terms
	9	* of the GNU General Public License, incorporated herein by reference.
	10	*
	11	* Thanks to Christian "naddy" Weisgerber (3Com, US Robotics) for documentation
	12	*
	13	*
	14	*/
	15	#include <linux/init.h>
	16	#include "hisax.h"
	17	#include "isac.h"
	18	#include "hscx.h"
	19	#include "isdnl1.h"
	20
672c3fd9	21	static const char *sportster_revision = "$Revision: 1.16.2.4 $";
1da177e4	22
475be4d8	23	#define byteout(addr, val) outb(val, addr)
1da177e4 LT	24	#define bytein(addr) inb(addr)
	25
	26	#define SPORTSTER_ISAC 0xC000
	27	#define SPORTSTER_HSCXA 0x0000
	28	#define SPORTSTER_HSCXB 0x4000
	29	#define SPORTSTER_RES_IRQ 0x8000
	30	#define SPORTSTER_RESET 0x80
	31	#define SPORTSTER_INTE 0x40
	32
	33	static inline int
	34	calc_off(unsigned int base, unsigned int off)
	35	{
475be4d8	36	return (base + ((off & 0xfc) << 8) + ((off & 3) << 1));
1da177e4 LT	37	}
	38
	39	static inline void
475be4d8	40	read_fifo(unsigned int adr, u_char *data, int size)
1da177e4 LT	41	{
	42	insb(adr, data, size);
	43	}
	44
	45	static void
475be4d8	46	write_fifo(unsigned int adr, u_char *data, int size)
1da177e4 LT	47	{
	48	outsb(adr, data, size);
	49	}
	50
	51	/* Interface functions */
	52
	53	static u_char
	54	ReadISAC(struct IsdnCardState *cs, u_char offset)
	55	{
	56	return (bytein(calc_off(cs->hw.spt.isac, offset)));
	57	}
	58
	59	static void
	60	WriteISAC(struct IsdnCardState *cs, u_char offset, u_char value)
	61	{
	62	byteout(calc_off(cs->hw.spt.isac, offset), value);
	63	}
	64
	65	static void
475be4d8	66	ReadISACfifo(struct IsdnCardState cs, u_char data, int size)
1da177e4 LT	67	{
	68	read_fifo(cs->hw.spt.isac, data, size);
	69	}
	70
	71	static void
475be4d8	72	WriteISACfifo(struct IsdnCardState cs, u_char data, int size)
1da177e4 LT	73	{
	74	write_fifo(cs->hw.spt.isac, data, size);
	75	}
	76
	77	static u_char
	78	ReadHSCX(struct IsdnCardState *cs, int hscx, u_char offset)
	79	{
	80	return (bytein(calc_off(cs->hw.spt.hscx[hscx], offset)));
	81	}
	82
	83	static void
	84	WriteHSCX(struct IsdnCardState *cs, int hscx, u_char offset, u_char value)
	85	{
	86	byteout(calc_off(cs->hw.spt.hscx[hscx], offset), value);
	87	}
	88
	89	/*
	90	* fast interrupt HSCX stuff goes here
	91	*/
	92
	93	#define READHSCX(cs, nr, reg) bytein(calc_off(cs->hw.spt.hscx[nr], reg))
	94	#define WRITEHSCX(cs, nr, reg, data) byteout(calc_off(cs->hw.spt.hscx[nr], reg), data)
	95	#define READHSCXFIFO(cs, nr, ptr, cnt) read_fifo(cs->hw.spt.hscx[nr], ptr, cnt)
	96	#define WRITEHSCXFIFO(cs, nr, ptr, cnt) write_fifo(cs->hw.spt.hscx[nr], ptr, cnt)
	97
	98	#include "hscx_irq.c"
	99
	100	static irqreturn_t
7d12e780	101	sportster_interrupt(int intno, void *dev_id)
1da177e4 LT	102	{
	103	struct IsdnCardState *cs = dev_id;
	104	u_char val;
	105	u_long flags;
	106
	107	spin_lock_irqsave(&cs->lock, flags);
	108	val = READHSCX(cs, 1, HSCX_ISTA);
475be4d8	109	Start_HSCX:
1da177e4 LT	110	if (val)
	111	hscx_int_main(cs, val);
	112	val = ReadISAC(cs, ISAC_ISTA);
475be4d8	113	Start_ISAC:
1da177e4 LT	114	if (val)
	115	isac_interrupt(cs, val);
	116	val = READHSCX(cs, 1, HSCX_ISTA);
	117	if (val) {
	118	if (cs->debug & L1_DEB_HSCX)
	119	debugl1(cs, "HSCX IntStat after IntRoutine");
	120	goto Start_HSCX;
	121	}
	122	val = ReadISAC(cs, ISAC_ISTA);
	123	if (val) {
	124	if (cs->debug & L1_DEB_ISAC)
	125	debugl1(cs, "ISAC IntStat after IntRoutine");
	126	goto Start_ISAC;
	127	}
	128	/* get a new irq impulse if there any pending */
475be4d8	129	bytein(cs->hw.spt.cfg_reg + SPORTSTER_RES_IRQ + 1);
1da177e4 LT	130	spin_unlock_irqrestore(&cs->lock, flags);
	131	return IRQ_HANDLED;
	132	}
	133
672c3fd9	134	static void
1da177e4 LT	135	release_io_sportster(struct IsdnCardState *cs)
	136	{
	137	int i, adr;
	138
	139	byteout(cs->hw.spt.cfg_reg + SPORTSTER_RES_IRQ, 0);
475be4d8 JP	140	for (i = 0; i < 64; i++) {
475be4d8 JP	141	adr = cs->hw.spt.cfg_reg + i * 1024;
1da177e4 LT	142	release_region(adr, 8);
	143	}
	144	}
	145
672c3fd9	146	static void
1da177e4 LT	147	reset_sportster(struct IsdnCardState *cs)
	148	{
	149	cs->hw.spt.res_irq \|= SPORTSTER_RESET; /* Reset On */
	150	byteout(cs->hw.spt.cfg_reg + SPORTSTER_RES_IRQ, cs->hw.spt.res_irq);
	151	mdelay(10);
	152	cs->hw.spt.res_irq &= ~SPORTSTER_RESET; /* Reset Off */
	153	byteout(cs->hw.spt.cfg_reg + SPORTSTER_RES_IRQ, cs->hw.spt.res_irq);
	154	mdelay(10);
	155	}
	156
	157	static int
	158	Sportster_card_msg(struct IsdnCardState cs, int mt, void arg)
	159	{
	160	u_long flags;
	161
	162	switch (mt) {
475be4d8 JP	163	case CARD_RESET:
	164	spin_lock_irqsave(&cs->lock, flags);
	165	reset_sportster(cs);
	166	spin_unlock_irqrestore(&cs->lock, flags);
	167	return (0);
	168	case CARD_RELEASE:
	169	release_io_sportster(cs);
	170	return (0);
	171	case CARD_INIT:
	172	spin_lock_irqsave(&cs->lock, flags);
	173	reset_sportster(cs);
	174	inithscxisac(cs, 1);
	175	cs->hw.spt.res_irq \|= SPORTSTER_INTE; /* IRQ On */
	176	byteout(cs->hw.spt.cfg_reg + SPORTSTER_RES_IRQ, cs->hw.spt.res_irq);
	177	inithscxisac(cs, 2);
	178	spin_unlock_irqrestore(&cs->lock, flags);
	179	return (0);
	180	case CARD_TEST:
	181	return (0);
1da177e4	182	}
475be4d8	183	return (0);
1da177e4 LT	184	}
1da177e4 LT	185
ed5a84cd	186	static int get_io_range(struct IsdnCardState *cs)
1da177e4 LT	187	{
1da177e4 LT	188	int i, j, adr;
475be4d8 JP	189
	190	for (i = 0; i < 64; i++) {
	191	adr = cs->hw.spt.cfg_reg + i * 1024;
1da177e4	192	if (!request_region(adr, 8, "sportster")) {
8349304d	193	printk(KERN_WARNING "HiSax: USR Sportster config port "
475be4d8 JP	194	"%x-%x already in use\n",
475be4d8 JP	195	adr, adr + 8);
1da177e4	196	break;
475be4d8	197	}
1da177e4	198	}
475be4d8 JP	199	if (i == 64)
475be4d8 JP	200	return (1);
1da177e4	201	else {
475be4d8 JP	202	for (j = 0; j < i; j++) {
475be4d8 JP	203	adr = cs->hw.spt.cfg_reg + j * 1024;
1da177e4 LT	204	release_region(adr, 8);
1da177e4 LT	205	}
475be4d8	206	return (0);
1da177e4 LT	207	}
	208	}
	209
ed5a84cd	210	int setup_sportster(struct IsdnCard *card)
1da177e4 LT	211	{
	212	struct IsdnCardState *cs = card->cs;
	213	char tmp[64];
	214
	215	strcpy(tmp, sportster_revision);
	216	printk(KERN_INFO "HiSax: USR Sportster driver Rev. %s\n", HiSax_getrev(tmp));
	217	if (cs->typ != ISDN_CTYPE_SPORTSTER)
	218	return (0);
	219
	220	cs->hw.spt.cfg_reg = card->para[1];
	221	cs->irq = card->para[0];
	222	if (!get_io_range(cs))
	223	return (0);
	224	cs->hw.spt.isac = cs->hw.spt.cfg_reg + SPORTSTER_ISAC;
	225	cs->hw.spt.hscx[0] = cs->hw.spt.cfg_reg + SPORTSTER_HSCXA;
	226	cs->hw.spt.hscx[1] = cs->hw.spt.cfg_reg + SPORTSTER_HSCXB;
475be4d8 JP	227
	228	switch (cs->irq) {
	229	case 5: cs->hw.spt.res_irq = 1;
	230	break;
	231	case 7: cs->hw.spt.res_irq = 2;
	232	break;
	233	case 10:cs->hw.spt.res_irq = 3;
	234	break;
	235	case 11:cs->hw.spt.res_irq = 4;
	236	break;
	237	case 12:cs->hw.spt.res_irq = 5;
	238	break;
	239	case 14:cs->hw.spt.res_irq = 6;
	240	break;
	241	case 15:cs->hw.spt.res_irq = 7;
	242	break;
	243	default:release_io_sportster(cs);
	244	printk(KERN_WARNING "Sportster: wrong IRQ\n");
	245	return (0);
1da177e4	246	}
8349304d	247	printk(KERN_INFO "HiSax: USR Sportster config irq:%d cfg:0x%X\n",
475be4d8	248	cs->irq, cs->hw.spt.cfg_reg);
1da177e4 LT	249	setup_isac(cs);
	250	cs->readisac = &ReadISAC;
	251	cs->writeisac = &WriteISAC;
	252	cs->readisacfifo = &ReadISACfifo;
	253	cs->writeisacfifo = &WriteISACfifo;
	254	cs->BC_Read_Reg = &ReadHSCX;
	255	cs->BC_Write_Reg = &WriteHSCX;
	256	cs->BC_Send_Data = &hscx_fill_fifo;
	257	cs->cardmsg = &Sportster_card_msg;
	258	cs->irq_func = &sportster_interrupt;
	259	ISACVersion(cs, "Sportster:");
	260	if (HscxVersion(cs, "Sportster:")) {
	261	printk(KERN_WARNING
	262	"Sportster: wrong HSCX versions check IO address\n");
	263	release_io_sportster(cs);
	264	return (0);
	265	}
	266	return (1);
	267	}