1 /* $Id: gazel.c,v 1.1.4.1 2001/11/20 14:19:35 kai Exp $
3 * low level stuff for Gazel isdn cards
6 * based on source code from Karsten Keil
7 * Copyright by BeWan Systems
9 * This software may be used and distributed according to the terms
10 * of the GNU General Public License, incorporated herein by reference.
14 #include <linux/config.h>
15 #include <linux/init.h>
16 #define __NO_VERSION__
22 #include <linux/pci.h>
24 extern const char *CardType[];
25 const char *gazel_revision = "$Revision: 1.1.4.1 $";
32 #define PLX_CNTRL 0x50 /* registre de controle PLX */
33 #define RESET_GAZEL 0x4
34 #define RESET_9050 0x40000000
35 #define PLX_INCSR 0x4C /* registre d'IT du 9050 */
36 #define INT_ISAC_EN 0x8 /* 1 = enable IT isac */
37 #define INT_ISAC 0x20 /* 1 = IT isac en cours */
38 #define INT_HSCX_EN 0x1 /* 1 = enable IT hscx */
39 #define INT_HSCX 0x4 /* 1 = IT hscx en cours */
40 #define INT_PCI_EN 0x40 /* 1 = enable IT PCI */
41 #define INT_IPAC_EN 0x3 /* enable IT ipac */
44 #define byteout(addr,val) outb(val,addr)
45 #define bytein(addr) inb(addr)
48 readreg(unsigned int adr, u_short off)
50 return bytein(adr + off);
54 writereg(unsigned int adr, u_short off, u_char data)
56 byteout(adr + off, data);
61 read_fifo(unsigned int adr, u_char * data, int size)
63 insb(adr, data, size);
67 write_fifo(unsigned int adr, u_char * data, int size)
69 outsb(adr, data, size);
73 readreg_ipac(unsigned int adr, u_short off)
81 ret = bytein(adr + 4);
87 writereg_ipac(unsigned int adr, u_short off, u_char data)
94 byteout(adr + 4, data);
100 read_fifo_ipac(unsigned int adr, u_short off, u_char * data, int size)
103 insb(adr + 4, data, size);
107 write_fifo_ipac(unsigned int adr, u_short off, u_char * data, int size)
110 outsb(adr + 4, data, size);
113 /* Interface functions */
116 ReadISAC(struct IsdnCardState *cs, u_char offset)
118 u_short off2 = offset;
120 switch (cs->subtyp) {
122 off2 = ((off2 << 8 & 0xf000) | (off2 & 0xf));
124 return (readreg(cs->hw.gazel.isac, off2));
127 return (readreg_ipac(cs->hw.gazel.ipac, 0x80 + off2));
133 WriteISAC(struct IsdnCardState *cs, u_char offset, u_char value)
135 u_short off2 = offset;
137 switch (cs->subtyp) {
139 off2 = ((off2 << 8 & 0xf000) | (off2 & 0xf));
141 writereg(cs->hw.gazel.isac, off2, value);
145 writereg_ipac(cs->hw.gazel.ipac, 0x80 + off2, value);
151 ReadISACfifo(struct IsdnCardState *cs, u_char * data, int size)
153 switch (cs->subtyp) {
156 read_fifo(cs->hw.gazel.isacfifo, data, size);
160 read_fifo_ipac(cs->hw.gazel.ipac, 0x80, data, size);
166 WriteISACfifo(struct IsdnCardState *cs, u_char * data, int size)
168 switch (cs->subtyp) {
171 write_fifo(cs->hw.gazel.isacfifo, data, size);
175 write_fifo_ipac(cs->hw.gazel.ipac, 0x80, data, size);
181 ReadHSCXfifo(struct IsdnCardState *cs, int hscx, u_char * data, int size)
183 switch (cs->subtyp) {
186 read_fifo(cs->hw.gazel.hscxfifo[hscx], data, size);
190 read_fifo_ipac(cs->hw.gazel.ipac, hscx * 0x40, data, size);
196 WriteHSCXfifo(struct IsdnCardState *cs, int hscx, u_char * data, int size)
198 switch (cs->subtyp) {
201 write_fifo(cs->hw.gazel.hscxfifo[hscx], data, size);
205 write_fifo_ipac(cs->hw.gazel.ipac, hscx * 0x40, data, size);
211 ReadHSCX(struct IsdnCardState *cs, int hscx, u_char offset)
213 u_short off2 = offset;
215 switch (cs->subtyp) {
217 off2 = ((off2 << 8 & 0xf000) | (off2 & 0xf));
219 return (readreg(cs->hw.gazel.hscx[hscx], off2));
222 return (readreg_ipac(cs->hw.gazel.ipac, hscx * 0x40 + off2));
228 WriteHSCX(struct IsdnCardState *cs, int hscx, u_char offset, u_char value)
230 u_short off2 = offset;
232 switch (cs->subtyp) {
234 off2 = ((off2 << 8 & 0xf000) | (off2 & 0xf));
236 writereg(cs->hw.gazel.hscx[hscx], off2, value);
240 writereg_ipac(cs->hw.gazel.ipac, hscx * 0x40 + off2, value);
246 * fast interrupt HSCX stuff goes here
249 #define READHSCX(cs, nr, reg) ReadHSCX(cs, nr, reg)
250 #define WRITEHSCX(cs, nr, reg, data) WriteHSCX(cs, nr, reg, data)
251 #define READHSCXFIFO(cs, nr, ptr, cnt) ReadHSCXfifo(cs, nr, ptr, cnt)
252 #define WRITEHSCXFIFO(cs, nr, ptr, cnt) WriteHSCXfifo(cs, nr, ptr, cnt)
254 #include "hscx_irq.c"
257 gazel_interrupt(int intno, void *dev_id, struct pt_regs *regs)
260 struct IsdnCardState *cs = dev_id;
261 u_char valisac, valhscx;
265 printk(KERN_WARNING "Gazel: Spurious interrupt!\n");
269 valhscx = ReadHSCX(cs, 1, HSCX_ISTA);
271 hscx_int_main(cs, valhscx);
272 valisac = ReadISAC(cs, ISAC_ISTA);
274 isac_interrupt(cs, valisac);
276 } while ((valhscx || valisac) && (count < MAXCOUNT));
278 WriteHSCX(cs, 0, HSCX_MASK, 0xFF);
279 WriteHSCX(cs, 1, HSCX_MASK, 0xFF);
280 WriteISAC(cs, ISAC_MASK, 0xFF);
281 WriteISAC(cs, ISAC_MASK, 0x0);
282 WriteHSCX(cs, 0, HSCX_MASK, 0x0);
283 WriteHSCX(cs, 1, HSCX_MASK, 0x0);
288 gazel_interrupt_ipac(int intno, void *dev_id, struct pt_regs *regs)
290 struct IsdnCardState *cs = dev_id;
295 printk(KERN_WARNING "Gazel: Spurious interrupt!\n");
298 ista = ReadISAC(cs, IPAC_ISTA - 0x80);
301 val = ReadHSCX(cs, 1, HSCX_ISTA);
309 hscx_int_main(cs, val);
313 val = 0xfe & ReadISAC(cs, ISAC_ISTA);
315 isac_interrupt(cs, val);
320 isac_interrupt(cs, val);
322 ista = ReadISAC(cs, IPAC_ISTA - 0x80);
325 while ((ista & 0x3f) && (count < MAXCOUNT));
327 WriteISAC(cs, IPAC_MASK - 0x80, 0xFF);
328 WriteISAC(cs, IPAC_MASK - 0x80, 0xC0);
331 release_io_gazel(struct IsdnCardState *cs)
335 switch (cs->subtyp) {
337 for (i = 0x0000; i < 0xC000; i += 0x1000)
338 release_region(i + cs->hw.gazel.hscx[0], 16);
339 release_region(0xC000 + cs->hw.gazel.hscx[0], 1);
343 release_region(cs->hw.gazel.hscx[0], 0x100);
344 release_region(cs->hw.gazel.cfg_reg, 0x80);
348 release_region(cs->hw.gazel.ipac, 0x8);
349 release_region(cs->hw.gazel.cfg_reg, 0x80);
353 release_region(cs->hw.gazel.ipac, 8);
359 reset_gazel(struct IsdnCardState *cs)
362 unsigned long plxcntrl, addr = cs->hw.gazel.cfg_reg;
364 switch (cs->subtyp) {
368 writereg(addr, 0, 0);
370 writereg(addr, 0, 1);
372 restore_flags(flags);
375 plxcntrl = inl(addr + PLX_CNTRL);
376 plxcntrl |= (RESET_9050 + RESET_GAZEL);
377 outl(plxcntrl, addr + PLX_CNTRL);
378 plxcntrl &= ~(RESET_9050 + RESET_GAZEL);
380 outl(plxcntrl, addr + PLX_CNTRL);
382 outb(INT_ISAC_EN + INT_HSCX_EN + INT_PCI_EN, addr + PLX_INCSR);
385 plxcntrl = inl(addr + PLX_CNTRL);
386 plxcntrl |= (RESET_9050 + RESET_GAZEL);
387 outl(plxcntrl, addr + PLX_CNTRL);
388 plxcntrl &= ~(RESET_9050 + RESET_GAZEL);
389 WriteISAC(cs, IPAC_POTA2 - 0x80, 0x20);
391 outl(plxcntrl, addr + PLX_CNTRL);
393 WriteISAC(cs, IPAC_POTA2 - 0x80, 0x00);
394 WriteISAC(cs, IPAC_ACFG - 0x80, 0xff);
395 WriteISAC(cs, IPAC_AOE - 0x80, 0x0);
396 WriteISAC(cs, IPAC_MASK - 0x80, 0xff);
397 WriteISAC(cs, IPAC_CONF - 0x80, 0x1);
398 outb(INT_IPAC_EN + INT_PCI_EN, addr + PLX_INCSR);
399 WriteISAC(cs, IPAC_MASK - 0x80, 0xc0);
402 WriteISAC(cs, IPAC_POTA2 - 0x80, 0x20);
404 WriteISAC(cs, IPAC_POTA2 - 0x80, 0x00);
405 WriteISAC(cs, IPAC_ACFG - 0x80, 0xff);
406 WriteISAC(cs, IPAC_AOE - 0x80, 0x0);
407 WriteISAC(cs, IPAC_MASK - 0x80, 0xff);
408 WriteISAC(cs, IPAC_CONF - 0x80, 0x1);
409 WriteISAC(cs, IPAC_MASK - 0x80, 0xc0);
416 Gazel_card_msg(struct IsdnCardState *cs, int mt, void *arg)
423 release_io_gazel(cs);
427 if ((cs->subtyp==R647)||(cs->subtyp==R685)) {
429 for (i=0;i<(2+MAX_WAITING_CALLS);i++) {
430 cs->bcs[i].hw.hscx.tsaxr0 = 0x1f;
431 cs->bcs[i].hw.hscx.tsaxr1 = 0x23;
442 reserve_regions(struct IsdnCard *card, struct IsdnCardState *cs)
444 unsigned int i, base = 0, adr = 0, len = 0;
446 switch (cs->subtyp) {
448 base = cs->hw.gazel.hscx[0];
449 for (i = 0x0000; i < 0xC000; i += 0x1000) {
450 if (check_region(adr = (i + base), len = 16))
453 if (check_region(adr = (0xC000 + base), len = 1))
456 for (i = 0x0000; i < 0xC000; i += 0x1000)
457 request_region(i + base, 16, "gazel");
458 request_region(0xC000 + base, 1, "gazel");
463 if (check_region(adr = cs->hw.gazel.hscx[0], len = 0x100))
465 if (check_region(adr = cs->hw.gazel.cfg_reg, len = 0x80))
468 request_region(cs->hw.gazel.hscx[0], 0x100, "gazel");
469 request_region(cs->hw.gazel.cfg_reg, 0x80, "gazel");
473 if (check_region(adr = cs->hw.gazel.ipac, len = 0x8))
475 if (check_region(adr = cs->hw.gazel.cfg_reg, len = 0x80))
478 request_region(cs->hw.gazel.ipac, 0x8, "gazel");
479 request_region(cs->hw.gazel.cfg_reg, 0x80, "gazel");
483 if (check_region(adr = cs->hw.gazel.ipac, len = 0x8))
485 request_region(cs->hw.gazel.ipac, 0x8, "gazel");
492 printk(KERN_WARNING "Gazel: %s io ports 0x%x-0x%x already in use\n",
493 CardType[cs->typ], adr, adr + len);
498 setup_gazelisa(struct IsdnCard *card, struct IsdnCardState *cs)
500 printk(KERN_INFO "Gazel: ISA PnP card automatic recognition\n");
501 // we got an irq parameter, assume it is an ISA card
502 // R742 decodes address even in not started...
503 // R647 returns FF if not present or not started
504 // eventually needs improvment
505 if (readreg_ipac(card->para[1], IPAC_ID) == 1)
510 cs->hw.gazel.cfg_reg = card->para[1] + 0xC000;
511 cs->hw.gazel.ipac = card->para[1];
512 cs->hw.gazel.isac = card->para[1] + 0x8000;
513 cs->hw.gazel.hscx[0] = card->para[1];
514 cs->hw.gazel.hscx[1] = card->para[1] + 0x4000;
515 cs->irq = card->para[0];
516 cs->hw.gazel.isacfifo = cs->hw.gazel.isac;
517 cs->hw.gazel.hscxfifo[0] = cs->hw.gazel.hscx[0];
518 cs->hw.gazel.hscxfifo[1] = cs->hw.gazel.hscx[1];
520 switch (cs->subtyp) {
522 printk(KERN_INFO "Gazel: Card ISA R647/R648 found\n");
523 cs->dc.isac.adf2 = 0x87;
525 "Gazel: config irq:%d isac:0x%X cfg:0x%X\n",
526 cs->irq, cs->hw.gazel.isac, cs->hw.gazel.cfg_reg);
528 "Gazel: hscx A:0x%X hscx B:0x%X\n",
529 cs->hw.gazel.hscx[0], cs->hw.gazel.hscx[1]);
533 printk(KERN_INFO "Gazel: Card ISA R742 found\n");
534 test_and_set_bit(HW_IPAC, &cs->HW_Flags);
536 "Gazel: config irq:%d ipac:0x%X\n",
537 cs->irq, cs->hw.gazel.ipac);
544 static struct pci_dev *dev_tel __initdata = NULL;
547 setup_gazelpci(struct IsdnCardState *cs)
549 u_int pci_ioaddr0 = 0, pci_ioaddr1 = 0;
550 u_char pci_irq = 0, found;
551 u_int nbseek, seekcard;
553 printk(KERN_WARNING "Gazel: PCI card automatic recognition\n");
556 if (!pci_present()) {
557 printk(KERN_WARNING "Gazel: No PCI bus present\n");
560 seekcard = PCI_DEVICE_ID_PLX_R685;
561 for (nbseek = 0; nbseek < 3; nbseek++) {
562 if ((dev_tel = pci_find_device(PCI_VENDOR_ID_PLX, seekcard, dev_tel))) {
563 if (pci_enable_device(dev_tel))
565 pci_irq = dev_tel->irq;
566 pci_ioaddr0 = pci_resource_start(dev_tel, 1);
567 pci_ioaddr1 = pci_resource_start(dev_tel, 2);
574 case PCI_DEVICE_ID_PLX_R685:
575 seekcard = PCI_DEVICE_ID_PLX_R753;
577 case PCI_DEVICE_ID_PLX_R753:
578 seekcard = PCI_DEVICE_ID_PLX_DJINN_ITOO;
584 printk(KERN_WARNING "Gazel: No PCI card found\n");
588 printk(KERN_WARNING "Gazel: No IRQ for PCI card found\n");
591 cs->hw.gazel.pciaddr[0] = pci_ioaddr0;
592 cs->hw.gazel.pciaddr[1] = pci_ioaddr1;
594 pci_ioaddr1 &= 0xfffe;
595 cs->hw.gazel.cfg_reg = pci_ioaddr0 & 0xfffe;
596 cs->hw.gazel.ipac = pci_ioaddr1;
597 cs->hw.gazel.isac = pci_ioaddr1 + 0x80;
598 cs->hw.gazel.hscx[0] = pci_ioaddr1;
599 cs->hw.gazel.hscx[1] = pci_ioaddr1 + 0x40;
600 cs->hw.gazel.isacfifo = cs->hw.gazel.isac;
601 cs->hw.gazel.hscxfifo[0] = cs->hw.gazel.hscx[0];
602 cs->hw.gazel.hscxfifo[1] = cs->hw.gazel.hscx[1];
604 cs->irq_flags |= SA_SHIRQ;
607 case PCI_DEVICE_ID_PLX_R685:
608 printk(KERN_INFO "Gazel: Card PCI R685 found\n");
610 cs->dc.isac.adf2 = 0x87;
612 "Gazel: config irq:%d isac:0x%X cfg:0x%X\n",
613 cs->irq, cs->hw.gazel.isac, cs->hw.gazel.cfg_reg);
615 "Gazel: hscx A:0x%X hscx B:0x%X\n",
616 cs->hw.gazel.hscx[0], cs->hw.gazel.hscx[1]);
618 case PCI_DEVICE_ID_PLX_R753:
619 case PCI_DEVICE_ID_PLX_DJINN_ITOO:
620 printk(KERN_INFO "Gazel: Card PCI R753 found\n");
622 test_and_set_bit(HW_IPAC, &cs->HW_Flags);
624 "Gazel: config irq:%d ipac:0x%X cfg:0x%X\n",
625 cs->irq, cs->hw.gazel.ipac, cs->hw.gazel.cfg_reg);
633 setup_gazel(struct IsdnCard *card)
635 struct IsdnCardState *cs = card->cs;
639 strcpy(tmp, gazel_revision);
640 printk(KERN_INFO "Gazel: Driver Revision %s\n", HiSax_getrev(tmp));
642 if (cs->typ != ISDN_CTYPE_GAZEL)
646 if (setup_gazelisa(card, cs))
651 if (setup_gazelpci(cs))
654 printk(KERN_WARNING "Gazel: Card PCI requested and NO_PCI_BIOS, unable to config\n");
656 #endif /* CONFIG_PCI */
659 if (reserve_regions(card, cs)) {
662 if (reset_gazel(cs)) {
663 printk(KERN_WARNING "Gazel: wrong IRQ\n");
664 release_io_gazel(cs);
667 cs->readisac = &ReadISAC;
668 cs->writeisac = &WriteISAC;
669 cs->readisacfifo = &ReadISACfifo;
670 cs->writeisacfifo = &WriteISACfifo;
671 cs->BC_Read_Reg = &ReadHSCX;
672 cs->BC_Write_Reg = &WriteHSCX;
673 cs->BC_Send_Data = &hscx_fill_fifo;
674 cs->cardmsg = &Gazel_card_msg;
676 switch (cs->subtyp) {
679 cs->irq_func = &gazel_interrupt;
680 ISACVersion(cs, "Gazel:");
681 if (HscxVersion(cs, "Gazel:")) {
683 "Gazel: wrong HSCX versions check IO address\n");
684 release_io_gazel(cs);
690 cs->irq_func = &gazel_interrupt_ipac;
691 val = ReadISAC(cs, IPAC_ID - 0x80);
692 printk(KERN_INFO "Gazel: IPAC version %x\n", val);