patch-2.3.4 linux/drivers/isdn/hisax/elsa.c
Next file: linux/drivers/isdn/hisax/elsa_ser.c
Previous file: linux/drivers/isdn/hisax/diva.c
Back to the patch index
Back to the overall index
- Lines: 701
- Date:
Sun May 23 10:03:41 1999
- Orig file:
v2.3.3/linux/drivers/isdn/hisax/elsa.c
- Orig date:
Thu Nov 5 09:58:44 1998
diff -u --recursive --new-file v2.3.3/linux/drivers/isdn/hisax/elsa.c linux/drivers/isdn/hisax/elsa.c
@@ -1,13 +1,41 @@
-/* $Id: elsa.c,v 2.6 1998/02/02 13:29:40 keil Exp $
+/* $Id: elsa.c,v 2.12 1998/11/15 23:54:35 keil Exp $
* elsa.c low level stuff for Elsa isdn cards
*
- * Author Karsten Keil (keil@temic-ech.spacenet.de)
+ * Author Karsten Keil (keil@isdn4linux.de)
+ *
+ * This file is (c) under GNU PUBLIC LICENSE
+ * For changes and modifications please read
+ * ../../../Documentation/isdn/HiSax.cert
*
* Thanks to Elsa GmbH for documents and informations
*
+ * Klaus Lichtenwalder (Klaus.Lichtenwalder@WebForum.DE)
+ * for ELSA PCMCIA support
+ *
*
* $Log: elsa.c,v $
+ * Revision 2.12 1998/11/15 23:54:35 keil
+ * changes from 2.0
+ *
+ * Revision 2.11 1998/08/20 13:50:34 keil
+ * More support for hybrid modem (not working yet)
+ *
+ * Revision 2.10 1998/08/13 23:36:22 keil
+ * HiSax 3.1 - don't work stable with current LinkLevel
+ *
+ * Revision 2.9 1998/05/25 12:57:48 keil
+ * HiSax golden code from certification, Don't use !!!
+ * No leased lines, no X75, but many changes.
+ *
+ * Revision 2.8 1998/04/15 16:41:42 keil
+ * QS3000 PCI support
+ * new init code
+ * new PCI init (2.1.94)
+ *
+ * Revision 2.7 1998/03/07 22:56:58 tsbogend
+ * made HiSax working on Linux/Alpha
+ *
* Revision 2.6 1998/02/02 13:29:40 keil
* fast io
*
@@ -29,15 +57,6 @@
* Revision 2.0 1997/06/26 11:02:40 keil
* New Layer and card interface
*
- * Revision 1.14 1997/04/13 19:53:25 keil
- * Fixed QS1000 init, change in IRQ check delay for SMP
- *
- * Revision 1.13 1997/04/07 22:58:07 keil
- * need include config.h
- *
- * Revision 1.12 1997/04/06 22:54:14 keil
- * Using SKB's
- *
* old changes removed KKe
*
*/
@@ -51,14 +70,16 @@
#include "hscx.h"
#include "isdnl1.h"
#include <linux/pci.h>
-#include <linux/bios32.h>
+
+//#define KDEBUG_DEF
+//#include "../kdebug.h"
extern const char *CardType[];
-const char *Elsa_revision = "$Revision: 2.6 $";
+static const char *Elsa_revision = "$Revision: 2.12 $";
const char *Elsa_Types[] =
{"None", "PC", "PCC-8", "PCC-16", "PCF", "PCF-Pro",
- "PCMCIA", "QS 1000", "QS 3000", "QS 1000 PCI"};
+ "PCMCIA", "QS 1000", "QS 3000", "QS 1000 PCI", "QS 3000 PCI"};
const char *ITACVer[] =
{"?0?", "?1?", "?2?", "?3?", "?4?", "V2.2",
@@ -87,11 +108,13 @@
#define ELSA_QS1000 7
#define ELSA_QS3000 8
#define ELSA_QS1000PCI 9
+#define ELSA_QS3000PCI 10
/* PCI stuff */
#define PCI_VENDOR_ELSA 0x1048
#define PCI_QS1000_ID 0x1000
-
+#define PCI_QS3000_ID 0x3000
+#define ELSA_PCI_IRQ_MASK 0x04
/* ITAC Registeradressen (only Microlink PC) */
#define ITAC_SYS 0x34
@@ -128,6 +151,30 @@
#define ELSA_BAD_PWR 2
#define ELSA_ASSIGN 4
+#define RS_ISR_PASS_LIMIT 256
+#define _INLINE_ inline
+#define FLG_MODEM_ACTIVE 1
+/* IPAC AUX */
+#define ELSA_IPAC_LINE_LED 0x40 /* Bit 6 Gelbe LED */
+#define ELSA_IPAC_STAT_LED 0x80 /* Bit 7 Gruene LED */
+
+const u_char ARCOFI_VERSION[] = {2,0xa0,0};
+const u_char ARCOFI_COP_5[] = {4,0xa1,0x25,0xbb,0x4a}; /* GTX */
+const u_char ARCOFI_COP_6[] = {6,0xa1,0x26,0,0,0x82,0x7c}; /* GRL GRH */
+const u_char ARCOFI_COP_7[] = {4,0xa1,0x27,0x80,0x80}; /* GZ */
+const u_char ARCOFI_COP_8[] = {10,0xa1,0x28,0x49,0x31,0x8,0x13,0x6e,0x88,0x2a,0x61}; /* TX */
+const u_char ARCOFI_COP_9[] = {10,0xa1,0x29,0x80,0xcb,0xe9,0x88,0x00,0xc8,0xd8,0x80}; /* RX */
+const u_char ARCOFI_XOP_0[] = {2,0xa1,0x30}; /* PWR Down */
+const u_char ARCOFI_XOP_1[] = {2,0xa1,0x31}; /* PWR UP */
+const u_char ARCOFI_XOP_F[] = {2,0xa1,0x3f}; /* Normal OP */
+const u_char ARCOFI_SOP_F[] = {10,0xa1,0x1f,0x00,0x50,0x10,0x00,0x00,0x80,0x02,0x12};
+
+static void set_arcofi(struct IsdnCardState *cs, int bc);
+
+#if ARCOFI_USE
+#include "elsa_ser.c"
+#endif
+
static inline u_char
readreg(unsigned int ale, unsigned int adr, u_char off)
{
@@ -302,6 +349,21 @@
printk(KERN_WARNING "Elsa: Spurious interrupt!\n");
return;
}
+ if ((cs->typ == ISDN_CTYPE_ELSA_PCMCIA) && (*cs->busy_flag == 1)) {
+ /* The card tends to generate interrupts while being removed
+ causing us to just crash the kernel. bad. */
+ printk(KERN_WARNING "Elsa: card not available!\n");
+ return;
+ }
+#if ARCOFI_USE
+ if (cs->hw.elsa.MFlag) {
+ val = serial_inp(cs, UART_IIR);
+ if (!(val & UART_IIR_NO_INT)) {
+ debugl1(cs,"IIR %02x", val);
+ rs_interrupt_elsa(intno, cs);
+ }
+ }
+#endif
val = readreg(cs->hw.elsa.ale, cs->hw.elsa.hscx, HSCX_ISTA + 0x40);
Start_HSCX:
if (val) {
@@ -338,6 +400,14 @@
cs->hw.elsa.counter++;
}
}
+ if (cs->hw.elsa.MFlag) {
+ val = serial_inp(cs, UART_MCR);
+ val ^= 0x8;
+ serial_outp(cs, UART_MCR, val);
+ val = serial_inp(cs, UART_MCR);
+ val ^= 0x8;
+ serial_outp(cs, UART_MCR, val);
+ }
if (cs->hw.elsa.trig)
byteout(cs->hw.elsa.trig, 0x00);
writereg(cs->hw.elsa.ale, cs->hw.elsa.hscx, HSCX_MASK, 0x0);
@@ -350,25 +420,28 @@
{
struct IsdnCardState *cs = dev_id;
u_char ista,val;
- char tmp[64];
int icnt=20;
if (!cs) {
printk(KERN_WARNING "Elsa: Spurious interrupt!\n");
return;
}
- if ((cs->typ == ISDN_CTYPE_ELSA_PCMCIA) && (*cs->busy_flag == 1)) {
- /* The card tends to generate interrupts while being removed
- causing us to just crash the kernel. bad. */
- printk(KERN_WARNING "Elsa: card not available!\n");
- return;
+ val = bytein(cs->hw.elsa.cfg + 0x4c); /* PCI IRQ */
+ if (!(val & ELSA_PCI_IRQ_MASK))
+ return;
+#if ARCOFI_USE
+ if (cs->hw.elsa.MFlag) {
+ val = serial_inp(cs, UART_IIR);
+ if (!(val & UART_IIR_NO_INT)) {
+ debugl1(cs,"IIR %02x", val);
+ rs_interrupt_elsa(intno, cs);
+ }
}
+#endif
ista = readreg(cs->hw.elsa.ale, cs->hw.elsa.isac, IPAC_ISTA);
Start_IPAC:
- if (cs->debug & L1_DEB_IPAC) {
- sprintf(tmp, "IPAC ISTA %02X", ista);
- debugl1(cs, tmp);
- }
+ if (cs->debug & L1_DEB_IPAC)
+ debugl1(cs, "IPAC ISTA %02X", ista);
if (ista & 0x0f) {
val = readreg(cs->hw.elsa.ale, cs->hw.elsa.hscx, HSCX_ISTA + 0x40);
if (ista & 0x01)
@@ -409,15 +482,24 @@
del_timer(&cs->hw.elsa.tl);
if (cs->hw.elsa.ctrl)
byteout(cs->hw.elsa.ctrl, 0); /* LEDs Out */
- if ((cs->subtyp == ELSA_PCFPRO) ||
- (cs->subtyp == ELSA_QS3000) ||
- (cs->subtyp == ELSA_PCF))
- bytecnt = 16;
if (cs->subtyp == ELSA_QS1000PCI) {
byteout(cs->hw.elsa.cfg + 0x4c, 0x01); /* disable IRQ */
+ writereg(cs->hw.elsa.ale, cs->hw.elsa.isac, IPAC_ATX, 0xff);
bytecnt = 2;
release_region(cs->hw.elsa.cfg, 0x80);
}
+ if (cs->subtyp == ELSA_QS3000PCI) {
+ byteout(cs->hw.elsa.cfg + 0x4c, 0x03); /* disable ELSA PCI IRQ */
+ writereg(cs->hw.elsa.ale, cs->hw.elsa.isac, IPAC_ATX, 0xff);
+ release_region(cs->hw.elsa.cfg, 0x80);
+ }
+ if ((cs->subtyp == ELSA_PCFPRO) ||
+ (cs->subtyp == ELSA_QS3000) ||
+ (cs->subtyp == ELSA_PCF) ||
+ (cs->subtyp == ELSA_QS3000PCI)) {
+ bytecnt = 16;
+ release_modem(cs);
+ }
if (cs->hw.elsa.base)
release_region(cs->hw.elsa.base, bytecnt);
}
@@ -445,7 +527,7 @@
if (cs->hw.elsa.trig)
byteout(cs->hw.elsa.trig, 0xff);
}
- if (cs->subtyp == ELSA_QS1000PCI) {
+ if ((cs->subtyp == ELSA_QS1000PCI) || (cs->subtyp == ELSA_QS3000PCI)) {
save_flags(flags);
sti();
writereg(cs->hw.elsa.ale, cs->hw.elsa.isac, IPAC_POTA2, 0x20);
@@ -455,35 +537,55 @@
current->state = TASK_INTERRUPTIBLE;
schedule_timeout((10*HZ)/1000); /* Timeout 10ms */
writereg(cs->hw.elsa.ale, cs->hw.elsa.isac, IPAC_MASK, 0xc0);
- schedule();
restore_flags(flags);
- byteout(cs->hw.elsa.cfg + 0x4c, 0x41); /* enable ELSA PCI IRQ */
+ writereg(cs->hw.elsa.ale, cs->hw.elsa.isac, IPAC_ACFG, 0x0);
+ writereg(cs->hw.elsa.ale, cs->hw.elsa.isac, IPAC_AOE, 0x3c);
+ writereg(cs->hw.elsa.ale, cs->hw.elsa.isac, IPAC_ATX, 0xff);
+ if (cs->subtyp == ELSA_QS1000PCI)
+ byteout(cs->hw.elsa.cfg + 0x4c, 0x41); /* enable ELSA PCI IRQ */
+ else if (cs->subtyp == ELSA_QS3000PCI)
+ byteout(cs->hw.elsa.cfg + 0x4c, 0x43); /* enable ELSA PCI IRQ */
}
}
-const u_char ARCOFI_VERSION[] = {2,0xa0,0};
-const u_char ARCOFI_COP_5[] = {4,0xa1,0x25,0xbb,0x4a}; /* GTX */
-const u_char ARCOFI_COP_6[] = {6,0xa1,0x26,0,0,0x82,0x7c}; /* GRL GRH */
-const u_char ARCOFI_COP_7[] = {4,0xa1,0x27,0x80,0x80}; /* GZ */
-const u_char ARCOFI_COP_8[] = {10,0xa1,0x28,0x49,0x31,0x8,0x13,0x6e,0x88,0x2a,0x61}; /* TX */
-const u_char ARCOFI_COP_9[] = {10,0xa1,0x29,0x80,0xcb,0x9e,0x88,0x00,0xc8,0xd8,0x80}; /* RX */
-const u_char ARCOFI_XOP_0[] = {2,0xa1,0x30}; /* PWR Down */
-const u_char ARCOFI_XOP_1[] = {2,0xa1,0x31}; /* PWR Down */
-const u_char ARCOFI_XOP_F[] = {2,0xa1,0x3f}; /* PWR Down */
-const u_char ARCOFI_SOP_F[] = {10,0xa1,0x1f,0x00,0x50,0x10,0x00,0x00,0x80,0x02,0x12};
-
static void
init_arcofi(struct IsdnCardState *cs) {
- send_arcofi(cs, ARCOFI_COP_5);
- send_arcofi(cs, ARCOFI_COP_6);
- send_arcofi(cs, ARCOFI_COP_7);
- send_arcofi(cs, ARCOFI_COP_8);
- send_arcofi(cs, ARCOFI_COP_9);
- send_arcofi(cs, ARCOFI_SOP_F);
- send_arcofi(cs, ARCOFI_XOP_F);
+ send_arcofi(cs, ARCOFI_XOP_0, 1, 0);
+/* send_arcofi(cs, ARCOFI_XOP_F, 1);
+*/
}
+#define ARCDEL 500
+
static void
+set_arcofi(struct IsdnCardState *cs, int bc) {
+ long flags;
+
+ debugl1(cs,"set_arcofi bc=%d", bc);
+ save_flags(flags);
+ sti();
+ send_arcofi(cs, ARCOFI_XOP_0, bc, 0);
+ udelay(ARCDEL);
+ send_arcofi(cs, ARCOFI_COP_5, bc, 0);
+ udelay(ARCDEL);
+ send_arcofi(cs, ARCOFI_COP_6, bc, 0);
+ udelay(ARCDEL);
+ send_arcofi(cs, ARCOFI_COP_7, bc, 0);
+ udelay(ARCDEL);
+ send_arcofi(cs, ARCOFI_COP_8, bc, 0);
+ udelay(ARCDEL);
+ send_arcofi(cs, ARCOFI_COP_9, bc, 0);
+ udelay(ARCDEL);
+ send_arcofi(cs, ARCOFI_SOP_F, bc, 0);
+ udelay(ARCDEL);
+ send_arcofi(cs, ARCOFI_XOP_1, bc, 0);
+ udelay(ARCDEL);
+ send_arcofi(cs, ARCOFI_XOP_F, bc, 0);
+ restore_flags(flags);
+ debugl1(cs,"end set_arcofi bc=%d", bc);
+}
+
+static int
check_arcofi(struct IsdnCardState *cs)
{
#if ARCOFI_USE
@@ -496,13 +598,12 @@
if (!(cs->mon_tx=kmalloc(MAX_MON_FRAME, GFP_ATOMIC))) {
if (cs->debug & L1_DEB_WARN)
debugl1(cs, "ISAC MON TX out of buffers!");
- return;
+ return(0);
}
- send_arcofi(cs, ARCOFI_VERSION);
+ send_arcofi(cs, ARCOFI_VERSION, 0, 1);
if (test_and_clear_bit(HW_MON1_TX_END, &cs->HW_Flags)) {
if (test_and_clear_bit(HW_MON1_RX_END, &cs->HW_Flags)) {
- sprintf(tmp, "Arcofi response received %d bytes", cs->mon_rxp);
- debugl1(cs, tmp);
+ debugl1(cs, "Arcofi response received %d bytes", cs->mon_rxp);
p = cs->mon_rx;
t = tmp;
t += sprintf(tmp, "Arcofi data");
@@ -531,8 +632,7 @@
cs->mon_rxp = 0;
}
} else if (cs->mon_tx) {
- sprintf(tmp, "Arcofi not detected");
- debugl1(cs, tmp);
+ debugl1(cs, "Arcofi not detected");
}
if (arcofi_present) {
if (cs->subtyp==ELSA_QS1000) {
@@ -573,8 +673,10 @@
Elsa_Types[cs->subtyp],
cs->hw.elsa.base+8);
init_arcofi(cs);
+ return(1);
}
#endif
+ return(0);
}
static void
@@ -582,8 +684,7 @@
{
int blink = 0;
- if ((cs->subtyp == ELSA_PCMCIA) &&
- (cs->subtyp == ELSA_QS1000PCI))
+ if (cs->subtyp == ELSA_PCMCIA)
return;
del_timer(&cs->hw.elsa.tl);
if (cs->hw.elsa.status & ELSA_ASSIGN)
@@ -602,7 +703,16 @@
} else
cs->hw.elsa.ctrl_reg &= ~ELSA_LINE_LED;
- byteout(cs->hw.elsa.ctrl, cs->hw.elsa.ctrl_reg);
+ if ((cs->subtyp == ELSA_QS1000PCI) ||
+ (cs->subtyp == ELSA_QS3000PCI)) {
+ u_char led = 0xff;
+ if (cs->hw.elsa.ctrl_reg & ELSA_LINE_LED)
+ led ^= ELSA_IPAC_LINE_LED;
+ if (cs->hw.elsa.ctrl_reg & ELSA_STAT_LED)
+ led ^= ELSA_IPAC_STAT_LED;
+ writereg(cs->hw.elsa.ale, cs->hw.elsa.isac, IPAC_ATX, led);
+ } else
+ byteout(cs->hw.elsa.ctrl, cs->hw.elsa.ctrl_reg);
if (blink) {
init_timer(&cs->hw.elsa.tl);
cs->hw.elsa.tl.expires = jiffies + ((blink * HZ) / 1000);
@@ -613,8 +723,9 @@
static int
Elsa_card_msg(struct IsdnCardState *cs, int mt, void *arg)
{
- int pwr, ret = 0;
- long flags;
+ int len, ret = 0;
+ u_char *msg;
+ long flags;
switch (mt) {
case CARD_RESET:
@@ -624,28 +735,33 @@
release_io_elsa(cs);
return(0);
case CARD_SETIRQ:
- if (cs->subtyp == ELSA_QS1000PCI)
+ if ((cs->subtyp == ELSA_QS1000PCI) ||
+ (cs->subtyp == ELSA_QS3000PCI))
ret = request_irq(cs->irq, &elsa_interrupt_ipac,
- I4L_IRQ_FLAG, "HiSax", cs);
+ I4L_IRQ_FLAG | SA_SHIRQ, "HiSax", cs);
else
ret = request_irq(cs->irq, &elsa_interrupt,
I4L_IRQ_FLAG, "HiSax", cs);
return(ret);
case CARD_INIT:
- if (cs->hw.elsa.trig)
- byteout(cs->hw.elsa.trig, 0xff);
- clear_pending_isac_ints(cs);
- clear_pending_hscx_ints(cs);
- initisac(cs);
- inithscx(cs);
- if (cs->subtyp == ELSA_QS1000) {
+ cs->debug |= L1_DEB_IPAC;
+ inithscxisac(cs, 1);
+ if ((cs->subtyp == ELSA_QS1000) ||
+ (cs->subtyp == ELSA_QS3000))
+ {
byteout(cs->hw.elsa.timer, 0);
- byteout(cs->hw.elsa.trig, 0xff);
}
+ if (cs->hw.elsa.trig)
+ byteout(cs->hw.elsa.trig, 0xff);
+ inithscxisac(cs, 2);
return(0);
case CARD_TEST:
- if ((cs->subtyp != ELSA_PCMCIA) &&
- (cs->subtyp != ELSA_QS1000PCI)) {
+ if ((cs->subtyp == ELSA_PCMCIA) ||
+ (cs->subtyp == ELSA_QS1000PCI)) {
+ return(0);
+ } else if (cs->subtyp == ELSA_QS3000PCI) {
+ ret = 0;
+ } else {
save_flags(flags);
cs->hw.elsa.counter = 0;
sti();
@@ -653,48 +769,52 @@
cs->hw.elsa.status |= ELSA_TIMER_AKTIV;
byteout(cs->hw.elsa.ctrl, cs->hw.elsa.ctrl_reg);
byteout(cs->hw.elsa.timer, 0);
- } else
- return(0);
- current->state = TASK_INTERRUPTIBLE;
- schedule_timeout((110*HZ)/1000); /* Timeout 110ms */
- restore_flags(flags);
- cs->hw.elsa.ctrl_reg &= ~ELSA_ENA_TIMER_INT;
- byteout(cs->hw.elsa.ctrl, cs->hw.elsa.ctrl_reg);
- cs->hw.elsa.status &= ~ELSA_TIMER_AKTIV;
- printk(KERN_INFO "Elsa: %d timer tics in 110 msek\n",
- cs->hw.elsa.counter);
- if (abs(cs->hw.elsa.counter - 13) < 3) {
- printk(KERN_INFO "Elsa: timer and irq OK\n");
- ret = 0;
- } else {
- printk(KERN_WARNING
- "Elsa: timer tic problem (%d/12) maybe an IRQ(%d) conflict\n",
- cs->hw.elsa.counter, cs->irq);
- ret = 1;
+ current->state = TASK_INTERRUPTIBLE;
+ /* Timeout 110ms */
+ schedule_timeout((110*HZ)/1000);
+ restore_flags(flags);
+ cs->hw.elsa.ctrl_reg &= ~ELSA_ENA_TIMER_INT;
+ byteout(cs->hw.elsa.ctrl, cs->hw.elsa.ctrl_reg);
+ cs->hw.elsa.status &= ~ELSA_TIMER_AKTIV;
+ printk(KERN_INFO "Elsa: %d timer tics in 110 msek\n",
+ cs->hw.elsa.counter);
+ if (abs(cs->hw.elsa.counter - 13) < 3) {
+ printk(KERN_INFO "Elsa: timer and irq OK\n");
+ ret = 0;
+ } else {
+ printk(KERN_WARNING
+ "Elsa: timer tic problem (%d/12) maybe an IRQ(%d) conflict\n",
+ cs->hw.elsa.counter, cs->irq);
+ ret = 1;
+ }
}
- check_arcofi(cs);
+#if ARCOFI_USE
+ if (check_arcofi(cs)) {
+ init_modem(cs);
+ }
+#endif
elsa_led_handler(cs);
return(ret);
- case MDL_REMOVE_REQ:
+ case (MDL_REMOVE | REQUEST):
cs->hw.elsa.status &= 0;
break;
- case MDL_ASSIGN_REQ:
+ case (MDL_ASSIGN | REQUEST):
cs->hw.elsa.status |= ELSA_ASSIGN;
break;
case MDL_INFO_SETUP:
- if ((int) arg)
+ if ((long) arg)
cs->hw.elsa.status |= 0x0200;
else
cs->hw.elsa.status |= 0x0100;
break;
case MDL_INFO_CONN:
- if ((int) arg)
+ if ((long) arg)
cs->hw.elsa.status |= 0x2000;
else
cs->hw.elsa.status |= 0x1000;
break;
case MDL_INFO_REL:
- if ((int) arg) {
+ if ((long) arg) {
cs->hw.elsa.status &= ~0x2000;
cs->hw.elsa.status &= ~0x0200;
} else {
@@ -703,13 +823,23 @@
}
break;
case CARD_AUX_IND:
+ if (cs->hw.elsa.MFlag) {
+ if (!arg)
+ return(0);
+ msg = arg;
+ len = *msg;
+ msg++;
+ modem_write_cmd(cs, msg, len);
+ }
break;
}
- pwr = bytein(cs->hw.elsa.ale);
- if (pwr & 0x08)
- cs->hw.elsa.status |= ELSA_BAD_PWR;
- else
- cs->hw.elsa.status &= ~ELSA_BAD_PWR;
+ if (cs->typ == ISDN_CTYPE_ELSA) {
+ int pwr = bytein(cs->hw.elsa.ale);
+ if (pwr & 0x08)
+ cs->hw.elsa.status |= ELSA_BAD_PWR;
+ else
+ cs->hw.elsa.status &= ~ELSA_BAD_PWR;
+ }
elsa_led_handler(cs);
return(ret);
}
@@ -778,7 +908,8 @@
return (CARD_portlist[i]);
}
-static int pci_index __initdata = 0;
+static struct pci_dev *dev_qs1000 __initdata = NULL;
+static struct pci_dev *dev_qs3000 __initdata = NULL;
int
setup_elsa(struct IsdnCard *card)
@@ -793,6 +924,7 @@
printk(KERN_INFO "HiSax: Elsa driver Rev. %s\n", HiSax_getrev(tmp));
cs->hw.elsa.ctrl_reg = 0;
cs->hw.elsa.status = 0;
+ cs->hw.elsa.MFlag = 0;
if (cs->typ == ISDN_CTYPE_ELSA) {
cs->hw.elsa.base = card->para[0];
printk(KERN_INFO "Elsa: Microlink IO probing\n");
@@ -886,59 +1018,62 @@
cs->irq);
} else if (cs->typ == ISDN_CTYPE_ELSA_PCI) {
#if CONFIG_PCI
- u_char pci_bus, pci_device_fn, pci_irq;
- u_int pci_ioaddr;
-
+ if (!pci_present()) {
+ printk(KERN_ERR "Elsa: no PCI bus present\n");
+ return(0);
+ }
cs->subtyp = 0;
- for (; pci_index < 0xff; pci_index++) {
- if (pcibios_find_device(PCI_VENDOR_ELSA,
- PCI_QS1000_ID, pci_index, &pci_bus, &pci_device_fn)
- == PCIBIOS_SUCCESSFUL)
+ if ((dev_qs1000 = pci_find_device(PCI_VENDOR_ELSA, PCI_QS1000_ID,
+ dev_qs1000))) {
cs->subtyp = ELSA_QS1000PCI;
- else
- break;
- /* get IRQ */
- pcibios_read_config_byte(pci_bus, pci_device_fn,
- PCI_INTERRUPT_LINE, &pci_irq);
-
- /* get IO address */
- pcibios_read_config_dword(pci_bus, pci_device_fn,
- PCI_BASE_ADDRESS_1, &pci_ioaddr);
- pci_ioaddr &= ~3; /* remove io/mem flag */
- cs->hw.elsa.cfg = pci_ioaddr;
- pcibios_read_config_dword(pci_bus, pci_device_fn,
- PCI_BASE_ADDRESS_3, &pci_ioaddr);
- if (cs->subtyp)
- break;
- }
- if (!cs->subtyp) {
+ cs->irq = dev_qs1000->irq;
+ cs->hw.elsa.cfg = dev_qs1000->base_address[1] &
+ PCI_BASE_ADDRESS_IO_MASK;
+ cs->hw.elsa.base = dev_qs1000->base_address[3] &
+ PCI_BASE_ADDRESS_IO_MASK;
+ } else if ((dev_qs3000 = pci_find_device(PCI_VENDOR_ELSA,
+ PCI_QS3000_ID, dev_qs3000))) {
+ cs->subtyp = ELSA_QS3000PCI;
+ cs->irq = dev_qs3000->irq;
+ cs->hw.elsa.cfg = dev_qs3000->base_address[1] &
+ PCI_BASE_ADDRESS_IO_MASK;
+ cs->hw.elsa.base = dev_qs3000->base_address[3] &
+ PCI_BASE_ADDRESS_IO_MASK;
+ } else {
printk(KERN_WARNING "Elsa: No PCI card found\n");
return(0);
}
- if (!pci_irq) {
+ if (!cs->irq) {
printk(KERN_WARNING "Elsa: No IRQ for PCI card found\n");
return(0);
}
- if (!pci_ioaddr) {
+ if (!(cs->hw.elsa.base && cs->hw.elsa.cfg)) {
printk(KERN_WARNING "Elsa: No IO-Adr for PCI card found\n");
return(0);
}
- pci_ioaddr &= ~3; /* remove io/mem flag */
- cs->hw.elsa.base = pci_ioaddr;
- cs->hw.elsa.ale = pci_ioaddr;
- cs->hw.elsa.isac = pci_ioaddr +1;
- cs->hw.elsa.hscx = pci_ioaddr +1;
- cs->irq = pci_irq;
+ cs->hw.elsa.ale = cs->hw.elsa.base;
+ cs->hw.elsa.isac = cs->hw.elsa.base +1;
+ cs->hw.elsa.hscx = cs->hw.elsa.base +1;
test_and_set_bit(HW_IPAC, &cs->HW_Flags);
cs->hw.elsa.timer = 0;
cs->hw.elsa.trig = 0;
printk(KERN_INFO
- "Elsa: %s defined at 0x%x/0x%x IRQ %d\n",
- Elsa_Types[cs->subtyp],
- cs->hw.elsa.base,
- cs->hw.elsa.cfg,
- cs->irq);
+ "Elsa: %s defined at 0x%x/0x%x IRQ %d\n",
+ Elsa_Types[cs->subtyp],
+ cs->hw.elsa.base,
+ cs->hw.elsa.cfg,
+ cs->irq);
+ if ((cs->hw.elsa.cfg & 0xff) || (cs->hw.elsa.base & 0xf)) {
+ printk(KERN_WARNING "Elsa: You may have a wrong PCI bios\n");
+ printk(KERN_WARNING "Elsa: If your system hangs now, read\n");
+ printk(KERN_WARNING "Elsa: Documentation/isdn/README.HiSax\n");
+ printk(KERN_WARNING "Elsa: Waiting 5 sec to sync discs\n");
+ save_flags(flags);
+ sti();
+ HZDELAY(500); /* wait 500*10 ms */
+ restore_flags(flags);
+ }
#else
printk(KERN_WARNING "Elsa: Elsa PCI and NO_PCI_BIOS\n");
printk(KERN_WARNING "Elsa: unable to config Elsa PCI\n");
@@ -957,6 +1092,7 @@
break;
case ELSA_PCFPRO:
case ELSA_PCF:
+ case ELSA_QS3000PCI:
bytecnt = 16;
break;
case ELSA_QS1000PCI:
@@ -980,7 +1116,7 @@
} else {
request_region(cs->hw.elsa.base, bytecnt, "elsa isdn");
}
- if (cs->subtyp == ELSA_QS1000PCI) {
+ if ((cs->subtyp == ELSA_QS1000PCI) || (cs->subtyp == ELSA_QS3000PCI)) {
if (check_region(cs->hw.elsa.cfg, 0x80)) {
printk(KERN_WARNING
"HiSax: %s pci port %x-%x already in use\n",
@@ -1020,12 +1156,12 @@
}
printk(KERN_INFO "Elsa: timer OK; resetting card\n");
}
- reset_elsa(cs);
cs->BC_Read_Reg = &ReadHSCX;
cs->BC_Write_Reg = &WriteHSCX;
cs->BC_Send_Data = &hscx_fill_fifo;
cs->cardmsg = &Elsa_card_msg;
- if (cs->subtyp == ELSA_QS1000PCI) {
+ reset_elsa(cs);
+ if ((cs->subtyp == ELSA_QS1000PCI) || (cs->subtyp == ELSA_QS3000PCI)) {
cs->readisac = &ReadISAC_IPAC;
cs->writeisac = &WriteISAC_IPAC;
cs->readisacfifo = &ReadISACfifo_IPAC;
@@ -1056,4 +1192,3 @@
}
return (1);
}
-
FUNET's LINUX-ADM group, linux-adm@nic.funet.fi
TCL-scripts by Sam Shen (who was at: slshen@lbl.gov)