git.oblomov.eu Git - linux-2.6/blob - drivers/isdn/hisax/sedlbauer.c

   1 /* $Id: sedlbauer.c,v 1.34.2.6 2004/01/24 20:47:24 keil Exp $
   2  *
   3  * low level stuff for Sedlbauer cards
   4  * includes support for the Sedlbauer speed star (speed star II),
   5  * support for the Sedlbauer speed fax+,
   6  * support for the Sedlbauer ISDN-Controller PC/104 and
   7  * support for the Sedlbauer speed pci
   8  * derived from the original file asuscom.c from Karsten Keil
   9  *
  10  * Author       Marcus Niemann
  11  * Copyright    by Marcus Niemann    <niemann@www-bib.fh-bielefeld.de>
  12  *
  13  * This software may be used and distributed according to the terms
  14  * of the GNU General Public License, incorporated herein by reference.
  15  *
  16  * Thanks to  Karsten Keil
  17  *            Sedlbauer AG for informations
  18  *            Edgar Toernig
  19  *
  20  */
  21
  22 /* Supported cards:
  23  * Card:        Chip:           Configuration:  Comment:
  24  * ---------------------------------------------------------------------
  25  * Speed Card   ISAC_HSCX       DIP-SWITCH
  26  * Speed Win    ISAC_HSCX       ISAPNP
  27  * Speed Fax+   ISAC_ISAR       ISAPNP          Full analog support
  28  * Speed Star   ISAC_HSCX       CARDMGR
  29  * Speed Win2   IPAC            ISAPNP
  30  * ISDN PC/104  IPAC            DIP-SWITCH
  31  * Speed Star2  IPAC            CARDMGR
  32  * Speed PCI    IPAC            PCI PNP
  33  * Speed Fax+   ISAC_ISAR       PCI PNP         Full analog support
  34  *
  35  * Important:
  36  * For the sedlbauer speed fax+ to work properly you have to download
  37  * the firmware onto the card.
  38  * For example: hisaxctrl <DriverID> 9 ISAR.BIN
  39 */
  40
  41 #include <linux/init.h>
  42 #include "hisax.h"
  43 #include "isac.h"
  44 #include "ipac.h"
  45 #include "hscx.h"
  46 #include "isar.h"
  47 #include "isdnl1.h"
  48 #include <linux/pci.h>
  49 #include <linux/isapnp.h>
  50
  51 static const char *Sedlbauer_revision = "$Revision: 1.34.2.6 $";
  52
  53 static const char *Sedlbauer_Types[] =
  54         {"None", "speed card/win", "speed star", "speed fax+",
  55         "speed win II / ISDN PC/104", "speed star II", "speed pci",
  56         "speed fax+ pyramid", "speed fax+ pci", "HST Saphir III"};
  57
  58 #define PCI_SUBVENDOR_SPEEDFAX_PYRAMID  0x51
  59 #define PCI_SUBVENDOR_HST_SAPHIR3       0x52
  60 #define PCI_SUBVENDOR_SEDLBAUER_PCI     0x53
  61 #define PCI_SUBVENDOR_SPEEDFAX_PCI      0x54
  62 #define PCI_SUB_ID_SEDLBAUER            0x01
  63
  64 #define SEDL_SPEED_CARD_WIN     1
  65 #define SEDL_SPEED_STAR         2
  66 #define SEDL_SPEED_FAX          3
  67 #define SEDL_SPEED_WIN2_PC104   4
  68 #define SEDL_SPEED_STAR2        5
  69 #define SEDL_SPEED_PCI          6
  70 #define SEDL_SPEEDFAX_PYRAMID   7
  71 #define SEDL_SPEEDFAX_PCI       8
  72 #define HST_SAPHIR3             9
  73
  74 #define SEDL_CHIP_TEST          0
  75 #define SEDL_CHIP_ISAC_HSCX     1
  76 #define SEDL_CHIP_ISAC_ISAR     2
  77 #define SEDL_CHIP_IPAC          3
  78
  79 #define SEDL_BUS_ISA            1
  80 #define SEDL_BUS_PCI            2
  81 #define SEDL_BUS_PCMCIA         3
  82
  83 #define byteout(addr,val) outb(val,addr)
  84 #define bytein(addr) inb(addr)
  85
  86 #define SEDL_HSCX_ISA_RESET_ON  0
  87 #define SEDL_HSCX_ISA_RESET_OFF 1
  88 #define SEDL_HSCX_ISA_ISAC      2
  89 #define SEDL_HSCX_ISA_HSCX      3
  90 #define SEDL_HSCX_ISA_ADR       4
  91
  92 #define SEDL_HSCX_PCMCIA_RESET  0
  93 #define SEDL_HSCX_PCMCIA_ISAC   1
  94 #define SEDL_HSCX_PCMCIA_HSCX   2
  95 #define SEDL_HSCX_PCMCIA_ADR    4
  96
  97 #define SEDL_ISAR_ISA_ISAC              4
  98 #define SEDL_ISAR_ISA_ISAR              6
  99 #define SEDL_ISAR_ISA_ADR               8
 100 #define SEDL_ISAR_ISA_ISAR_RESET_ON     10
 101 #define SEDL_ISAR_ISA_ISAR_RESET_OFF    12
 102
 103 #define SEDL_IPAC_ANY_ADR               0
 104 #define SEDL_IPAC_ANY_IPAC              2
 105
 106 #define SEDL_IPAC_PCI_BASE              0
 107 #define SEDL_IPAC_PCI_ADR               0xc0
 108 #define SEDL_IPAC_PCI_IPAC              0xc8
 109 #define SEDL_ISAR_PCI_ADR               0xc8
 110 #define SEDL_ISAR_PCI_ISAC              0xd0
 111 #define SEDL_ISAR_PCI_ISAR              0xe0
 112 #define SEDL_ISAR_PCI_ISAR_RESET_ON     0x01
 113 #define SEDL_ISAR_PCI_ISAR_RESET_OFF    0x18
 114 #define SEDL_ISAR_PCI_LED1              0x08
 115 #define SEDL_ISAR_PCI_LED2              0x10
 116
 117 #define SEDL_RESET      0x3     /* same as DOS driver */
 118
 119 static inline u_char
 120 readreg(unsigned int ale, unsigned int adr, u_char off)
 121 {
 122         register u_char ret;
 123
 124         byteout(ale, off);
 125         ret = bytein(adr);
 126         return (ret);
 127 }
 128
 129 static inline void
 130 readfifo(unsigned int ale, unsigned int adr, u_char off, u_char * data, int size)
 131 {
 132         byteout(ale, off);
 133         insb(adr, data, size);
 134 }
 135
 136
 137 static inline void
 138 writereg(unsigned int ale, unsigned int adr, u_char off, u_char data)
 139 {
 140         byteout(ale, off);
 141         byteout(adr, data);
 142 }
 143
 144 static inline void
 145 writefifo(unsigned int ale, unsigned int adr, u_char off, u_char * data, int size)
 146 {
 147         byteout(ale, off);
 148         outsb(adr, data, size);
 149 }
 150
 151 /* Interface functions */
 152
 153 static u_char
 154 ReadISAC(struct IsdnCardState *cs, u_char offset)
 155 {
 156         return (readreg(cs->hw.sedl.adr, cs->hw.sedl.isac, offset));
 157 }
 158
 159 static void
 160 WriteISAC(struct IsdnCardState *cs, u_char offset, u_char value)
 161 {
 162         writereg(cs->hw.sedl.adr, cs->hw.sedl.isac, offset, value);
 163 }
 164
 165 static void
 166 ReadISACfifo(struct IsdnCardState *cs, u_char * data, int size)
 167 {
 168         readfifo(cs->hw.sedl.adr, cs->hw.sedl.isac, 0, data, size);
 169 }
 170
 171 static void
 172 WriteISACfifo(struct IsdnCardState *cs, u_char * data, int size)
 173 {
 174         writefifo(cs->hw.sedl.adr, cs->hw.sedl.isac, 0, data, size);
 175 }
 176
 177 static u_char
 178 ReadISAC_IPAC(struct IsdnCardState *cs, u_char offset)
 179 {
 180         return (readreg(cs->hw.sedl.adr, cs->hw.sedl.isac, offset|0x80));
 181 }
 182
 183 static void
 184 WriteISAC_IPAC(struct IsdnCardState *cs, u_char offset, u_char value)
 185 {
 186         writereg(cs->hw.sedl.adr, cs->hw.sedl.isac, offset|0x80, value);
 187 }
 188
 189 static void
 190 ReadISACfifo_IPAC(struct IsdnCardState *cs, u_char * data, int size)
 191 {
 192         readfifo(cs->hw.sedl.adr, cs->hw.sedl.isac, 0x80, data, size);
 193 }
 194
 195 static void
 196 WriteISACfifo_IPAC(struct IsdnCardState *cs, u_char * data, int size)
 197 {
 198         writefifo(cs->hw.sedl.adr, cs->hw.sedl.isac, 0x80, data, size);
 199 }
 200
 201 static u_char
 202 ReadHSCX(struct IsdnCardState *cs, int hscx, u_char offset)
 203 {
 204         return (readreg(cs->hw.sedl.adr,
 205                         cs->hw.sedl.hscx, offset + (hscx ? 0x40 : 0)));
 206 }
 207
 208 static void
 209 WriteHSCX(struct IsdnCardState *cs, int hscx, u_char offset, u_char value)
 210 {
 211         writereg(cs->hw.sedl.adr,
 212                  cs->hw.sedl.hscx, offset + (hscx ? 0x40 : 0), value);
 213 }
 214
 215 /* ISAR access routines
 216  * mode = 0 access with IRQ on
 217  * mode = 1 access with IRQ off
 218  * mode = 2 access with IRQ off and using last offset
 219  */
 220
 221 static u_char
 222 ReadISAR(struct IsdnCardState *cs, int mode, u_char offset)
 223 {
 224         if (mode == 0)
 225                 return (readreg(cs->hw.sedl.adr, cs->hw.sedl.hscx, offset));
 226         else if (mode == 1)
 227                 byteout(cs->hw.sedl.adr, offset);
 228         return(bytein(cs->hw.sedl.hscx));
 229 }
 230
 231 static void
 232 WriteISAR(struct IsdnCardState *cs, int mode, u_char offset, u_char value)
 233 {
 234         if (mode == 0)
 235                 writereg(cs->hw.sedl.adr, cs->hw.sedl.hscx, offset, value);
 236         else {
 237                 if (mode == 1)
 238                         byteout(cs->hw.sedl.adr, offset);
 239                 byteout(cs->hw.sedl.hscx, value);
 240         }
 241 }
 242
 243 /*
 244  * fast interrupt HSCX stuff goes here
 245  */
 246
 247 #define READHSCX(cs, nr, reg) readreg(cs->hw.sedl.adr, \
 248                 cs->hw.sedl.hscx, reg + (nr ? 0x40 : 0))
 249 #define WRITEHSCX(cs, nr, reg, data) writereg(cs->hw.sedl.adr, \
 250                 cs->hw.sedl.hscx, reg + (nr ? 0x40 : 0), data)
 251
 252 #define READHSCXFIFO(cs, nr, ptr, cnt) readfifo(cs->hw.sedl.adr, \
 253                 cs->hw.sedl.hscx, (nr ? 0x40 : 0), ptr, cnt)
 254
 255 #define WRITEHSCXFIFO(cs, nr, ptr, cnt) writefifo(cs->hw.sedl.adr, \
 256                 cs->hw.sedl.hscx, (nr ? 0x40 : 0), ptr, cnt)
 257
 258 #include "hscx_irq.c"
 259
 260 static irqreturn_t
 261 sedlbauer_interrupt(int intno, void *dev_id)
 262 {
 263         struct IsdnCardState *cs = dev_id;
 264         u_char val;
 265         u_long flags;
 266
 267         spin_lock_irqsave(&cs->lock, flags);
 268         if ((cs->hw.sedl.bus == SEDL_BUS_PCMCIA) && (*cs->busy_flag == 1)) {
 269                 /* The card tends to generate interrupts while being removed
 270                    causing us to just crash the kernel. bad. */
 271                 spin_unlock_irqrestore(&cs->lock, flags);
 272                 printk(KERN_WARNING "Sedlbauer: card not available!\n");
 273                 return IRQ_NONE;
 274         }
 275
 276         val = readreg(cs->hw.sedl.adr, cs->hw.sedl.hscx, HSCX_ISTA + 0x40);
 277       Start_HSCX:
 278         if (val)
 279                 hscx_int_main(cs, val);
 280         val = readreg(cs->hw.sedl.adr, cs->hw.sedl.isac, ISAC_ISTA);
 281       Start_ISAC:
 282         if (val)
 283                 isac_interrupt(cs, val);
 284         val = readreg(cs->hw.sedl.adr, cs->hw.sedl.hscx, HSCX_ISTA + 0x40);
 285         if (val) {
 286                 if (cs->debug & L1_DEB_HSCX)
 287                         debugl1(cs, "HSCX IntStat after IntRoutine");
 288                 goto Start_HSCX;
 289         }
 290         val = readreg(cs->hw.sedl.adr, cs->hw.sedl.isac, ISAC_ISTA);
 291         if (val) {
 292                 if (cs->debug & L1_DEB_ISAC)
 293                         debugl1(cs, "ISAC IntStat after IntRoutine");
 294                 goto Start_ISAC;
 295         }
 296         writereg(cs->hw.sedl.adr, cs->hw.sedl.hscx, HSCX_MASK, 0xFF);
 297         writereg(cs->hw.sedl.adr, cs->hw.sedl.hscx, HSCX_MASK + 0x40, 0xFF);
 298         writereg(cs->hw.sedl.adr, cs->hw.sedl.isac, ISAC_MASK, 0xFF);
 299         writereg(cs->hw.sedl.adr, cs->hw.sedl.isac, ISAC_MASK, 0x0);
 300         writereg(cs->hw.sedl.adr, cs->hw.sedl.hscx, HSCX_MASK, 0x0);
 301         writereg(cs->hw.sedl.adr, cs->hw.sedl.hscx, HSCX_MASK + 0x40, 0x0);
 302         spin_unlock_irqrestore(&cs->lock, flags);
 303         return IRQ_HANDLED;
 304 }
 305
 306 static irqreturn_t
 307 sedlbauer_interrupt_ipac(int intno, void *dev_id)
 308 {
 309         struct IsdnCardState *cs = dev_id;
 310         u_char ista, val, icnt = 5;
 311         u_long flags;
 312
 313         spin_lock_irqsave(&cs->lock, flags);
 314         ista = readreg(cs->hw.sedl.adr, cs->hw.sedl.isac, IPAC_ISTA);
 315 Start_IPAC:
 316         if (cs->debug & L1_DEB_IPAC)
 317                 debugl1(cs, "IPAC ISTA %02X", ista);
 318         if (ista & 0x0f) {
 319                 val = readreg(cs->hw.sedl.adr, cs->hw.sedl.hscx, HSCX_ISTA + 0x40);
 320                 if (ista & 0x01)
 321                         val |= 0x01;
 322                 if (ista & 0x04)
 323                         val |= 0x02;
 324                 if (ista & 0x08)
 325                         val |= 0x04;
 326                 if (val)
 327                         hscx_int_main(cs, val);
 328         }
 329         if (ista & 0x20) {
 330                 val = 0xfe & readreg(cs->hw.sedl.adr, cs->hw.sedl.isac, ISAC_ISTA | 0x80);
 331                 if (val) {
 332                         isac_interrupt(cs, val);
 333                 }
 334         }
 335         if (ista & 0x10) {
 336                 val = 0x01;
 337                 isac_interrupt(cs, val);
 338         }
 339         ista  = readreg(cs->hw.sedl.adr, cs->hw.sedl.isac, IPAC_ISTA);
 340         if ((ista & 0x3f) && icnt) {
 341                 icnt--;
 342                 goto Start_IPAC;
 343         }
 344         if (!icnt)
 345                 if (cs->debug & L1_DEB_ISAC)
 346                         debugl1(cs, "Sedlbauer IRQ LOOP");
 347         writereg(cs->hw.sedl.adr, cs->hw.sedl.isac, IPAC_MASK, 0xFF);
 348         writereg(cs->hw.sedl.adr, cs->hw.sedl.isac, IPAC_MASK, 0xC0);
 349         spin_unlock_irqrestore(&cs->lock, flags);
 350         return IRQ_HANDLED;
 351 }
 352
 353 static irqreturn_t
 354 sedlbauer_interrupt_isar(int intno, void *dev_id)
 355 {
 356         struct IsdnCardState *cs = dev_id;
 357         u_char val;
 358         int cnt = 5;
 359         u_long flags;
 360
 361         spin_lock_irqsave(&cs->lock, flags);
 362         val = readreg(cs->hw.sedl.adr, cs->hw.sedl.hscx, ISAR_IRQBIT);
 363       Start_ISAR:
 364         if (val & ISAR_IRQSTA)
 365                 isar_int_main(cs);
 366         val = readreg(cs->hw.sedl.adr, cs->hw.sedl.isac, ISAC_ISTA);
 367       Start_ISAC:
 368         if (val)
 369                 isac_interrupt(cs, val);
 370         val = readreg(cs->hw.sedl.adr, cs->hw.sedl.hscx, ISAR_IRQBIT);
 371         if ((val & ISAR_IRQSTA) && --cnt) {
 372                 if (cs->debug & L1_DEB_HSCX)
 373                         debugl1(cs, "ISAR IntStat after IntRoutine");
 374                 goto Start_ISAR;
 375         }
 376         val = readreg(cs->hw.sedl.adr, cs->hw.sedl.isac, ISAC_ISTA);
 377         if (val && --cnt) {
 378                 if (cs->debug & L1_DEB_ISAC)
 379                         debugl1(cs, "ISAC IntStat after IntRoutine");
 380                 goto Start_ISAC;
 381         }
 382         if (!cnt)
 383                 if (cs->debug & L1_DEB_ISAC)
 384                         debugl1(cs, "Sedlbauer IRQ LOOP");
 385
 386         writereg(cs->hw.sedl.adr, cs->hw.sedl.hscx, ISAR_IRQBIT, 0);
 387         writereg(cs->hw.sedl.adr, cs->hw.sedl.isac, ISAC_MASK, 0xFF);
 388         writereg(cs->hw.sedl.adr, cs->hw.sedl.isac, ISAC_MASK, 0x0);
 389         writereg(cs->hw.sedl.adr, cs->hw.sedl.hscx, ISAR_IRQBIT, ISAR_IRQMSK);
 390         spin_unlock_irqrestore(&cs->lock, flags);
 391         return IRQ_HANDLED;
 392 }
 393
 394 static void
 395 release_io_sedlbauer(struct IsdnCardState *cs)
 396 {
 397         int bytecnt = 8;
 398
 399         if (cs->subtyp == SEDL_SPEED_FAX) {
 400                 bytecnt = 16;
 401         } else if (cs->hw.sedl.bus == SEDL_BUS_PCI) {
 402                 bytecnt = 256;
 403         }
 404         if (cs->hw.sedl.cfg_reg)
 405                 release_region(cs->hw.sedl.cfg_reg, bytecnt);
 406 }
 407
 408 static void
 409 reset_sedlbauer(struct IsdnCardState *cs)
 410 {
 411         printk(KERN_INFO "Sedlbauer: resetting card\n");
 412
 413         if (!((cs->hw.sedl.bus == SEDL_BUS_PCMCIA) &&
 414            (cs->hw.sedl.chip == SEDL_CHIP_ISAC_HSCX))) {
 415                 if (cs->hw.sedl.chip == SEDL_CHIP_IPAC) {
 416                         writereg(cs->hw.sedl.adr, cs->hw.sedl.isac, IPAC_POTA2, 0x20);
 417                         mdelay(2);
 418                         writereg(cs->hw.sedl.adr, cs->hw.sedl.isac, IPAC_POTA2, 0x0);
 419                         mdelay(10);
 420                         writereg(cs->hw.sedl.adr, cs->hw.sedl.isac, IPAC_CONF, 0x0);
 421                         writereg(cs->hw.sedl.adr, cs->hw.sedl.isac, IPAC_ACFG, 0xff);
 422                         writereg(cs->hw.sedl.adr, cs->hw.sedl.isac, IPAC_AOE, 0x0);
 423                         writereg(cs->hw.sedl.adr, cs->hw.sedl.isac, IPAC_MASK, 0xc0);
 424                         writereg(cs->hw.sedl.adr, cs->hw.sedl.isac, IPAC_PCFG, 0x12);
 425                 } else if ((cs->hw.sedl.chip == SEDL_CHIP_ISAC_ISAR) &&
 426                         (cs->hw.sedl.bus == SEDL_BUS_PCI)) {
 427                         byteout(cs->hw.sedl.cfg_reg +3, cs->hw.sedl.reset_on);
 428                         mdelay(2);
 429                         byteout(cs->hw.sedl.cfg_reg +3, cs->hw.sedl.reset_off);
 430                         mdelay(10);
 431                 } else {
 432                         byteout(cs->hw.sedl.reset_on, SEDL_RESET);      /* Reset On */
 433                         mdelay(2);
 434                         byteout(cs->hw.sedl.reset_off, 0);      /* Reset Off */
 435                         mdelay(10);
 436                 }
 437         }
 438 }
 439
 440 static int
 441 Sedl_card_msg(struct IsdnCardState *cs, int mt, void *arg)
 442 {
 443         u_long flags;
 444
 445         switch (mt) {
 446                 case CARD_RESET:
 447                         spin_lock_irqsave(&cs->lock, flags);
 448                         reset_sedlbauer(cs);
 449                         spin_unlock_irqrestore(&cs->lock, flags);
 450                         return(0);
 451                 case CARD_RELEASE:
 452                         if (cs->hw.sedl.bus == SEDL_BUS_PCI)
 453                                 /* disable all IRQ */
 454                                 byteout(cs->hw.sedl.cfg_reg+ 5, 0);
 455                         if (cs->hw.sedl.chip == SEDL_CHIP_ISAC_ISAR) {
 456                                 spin_lock_irqsave(&cs->lock, flags);
 457                                 writereg(cs->hw.sedl.adr, cs->hw.sedl.hscx,
 458                                         ISAR_IRQBIT, 0);
 459                                 writereg(cs->hw.sedl.adr, cs->hw.sedl.isac,
 460                                         ISAC_MASK, 0xFF);
 461                                 reset_sedlbauer(cs);
 462                                 writereg(cs->hw.sedl.adr, cs->hw.sedl.hscx,
 463                                         ISAR_IRQBIT, 0);
 464                                 writereg(cs->hw.sedl.adr, cs->hw.sedl.isac,
 465                                         ISAC_MASK, 0xFF);
 466                                 spin_unlock_irqrestore(&cs->lock, flags);
 467                         }
 468                         release_io_sedlbauer(cs);
 469                         return(0);
 470                 case CARD_INIT:
 471                         spin_lock_irqsave(&cs->lock, flags);
 472                         if (cs->hw.sedl.bus == SEDL_BUS_PCI)
 473                                 /* enable all IRQ */
 474                                 byteout(cs->hw.sedl.cfg_reg+ 5, 0x02);
 475                         reset_sedlbauer(cs);
 476                         if (cs->hw.sedl.chip == SEDL_CHIP_ISAC_ISAR) {
 477                                 clear_pending_isac_ints(cs);
 478                                 writereg(cs->hw.sedl.adr, cs->hw.sedl.hscx,
 479                                         ISAR_IRQBIT, 0);
 480                                 initisac(cs);
 481                                 initisar(cs);
 482                                 /* Reenable all IRQ */
 483                                 cs->writeisac(cs, ISAC_MASK, 0);
 484                                 /* RESET Receiver and Transmitter */
 485                                 cs->writeisac(cs, ISAC_CMDR, 0x41);
 486                         } else {
 487                                 inithscxisac(cs, 3);
 488                         }
 489                         spin_unlock_irqrestore(&cs->lock, flags);
 490                         return(0);
 491                 case CARD_TEST:
 492                         return(0);
 493                 case MDL_INFO_CONN:
 494                         if (cs->subtyp != SEDL_SPEEDFAX_PYRAMID)
 495                                 return(0);
 496                         spin_lock_irqsave(&cs->lock, flags);
 497                         if ((long) arg)
 498                                 cs->hw.sedl.reset_off &= ~SEDL_ISAR_PCI_LED2;
 499                         else
 500                                 cs->hw.sedl.reset_off &= ~SEDL_ISAR_PCI_LED1;
 501                         byteout(cs->hw.sedl.cfg_reg +3, cs->hw.sedl.reset_off);
 502                         spin_unlock_irqrestore(&cs->lock, flags);
 503                         break;
 504                 case MDL_INFO_REL:
 505                         if (cs->subtyp != SEDL_SPEEDFAX_PYRAMID)
 506                                 return(0);
 507                         spin_lock_irqsave(&cs->lock, flags);
 508                         if ((long) arg)
 509                                 cs->hw.sedl.reset_off |= SEDL_ISAR_PCI_LED2;
 510                         else
 511                                 cs->hw.sedl.reset_off |= SEDL_ISAR_PCI_LED1;
 512                         byteout(cs->hw.sedl.cfg_reg +3, cs->hw.sedl.reset_off);
 513                         spin_unlock_irqrestore(&cs->lock, flags);
 514                         break;
 515         }
 516         return(0);
 517 }
 518
 519 #ifdef __ISAPNP__
 520 static struct isapnp_device_id sedl_ids[] __devinitdata = {
 521         { ISAPNP_VENDOR('S', 'A', 'G'), ISAPNP_FUNCTION(0x01),
 522           ISAPNP_VENDOR('S', 'A', 'G'), ISAPNP_FUNCTION(0x01),
 523           (unsigned long) "Speed win" },
 524         { ISAPNP_VENDOR('S', 'A', 'G'), ISAPNP_FUNCTION(0x02),
 525           ISAPNP_VENDOR('S', 'A', 'G'), ISAPNP_FUNCTION(0x02),
 526           (unsigned long) "Speed Fax+" },
 527         { 0, }
 528 };
 529
 530 static struct isapnp_device_id *ipid __devinitdata = &sedl_ids[0];
 531 static struct pnp_card *pnp_c __devinitdata = NULL;
 532
 533 static int __devinit
 534 setup_sedlbauer_isapnp(struct IsdnCard *card, int *bytecnt)
 535 {
 536         struct IsdnCardState *cs = card->cs;
 537         struct pnp_dev *pnp_d;
 538
 539         if (!isapnp_present())
 540                 return -1;
 541
 542         while(ipid->card_vendor) {
 543                 if ((pnp_c = pnp_find_card(ipid->card_vendor,
 544                         ipid->card_device, pnp_c))) {
 545                         pnp_d = NULL;
 546                         if ((pnp_d = pnp_find_dev(pnp_c,
 547                                 ipid->vendor, ipid->function, pnp_d))) {
 548                                 int err;
 549
 550                                 printk(KERN_INFO "HiSax: %s detected\n",
 551                                         (char *)ipid->driver_data);
 552                                 pnp_disable_dev(pnp_d);
 553                                 err = pnp_activate_dev(pnp_d);
 554                                 if (err<0) {
 555                                         printk(KERN_WARNING "%s: pnp_activate_dev ret(%d)\n",
 556                                                 __func__, err);
 557                                         return(0);
 558                                 }
 559                                 card->para[1] = pnp_port_start(pnp_d, 0);
 560                                 card->para[0] = pnp_irq(pnp_d, 0);
 561
 562                                 if (!card->para[0] || !card->para[1]) {
 563                                         printk(KERN_ERR "Sedlbauer PnP:some resources are missing %ld/%lx\n",
 564                                                 card->para[0], card->para[1]);
 565                                         pnp_disable_dev(pnp_d);
 566                                         return(0);
 567                                 }
 568                                 cs->hw.sedl.cfg_reg = card->para[1];
 569                                 cs->irq = card->para[0];
 570                                 if (ipid->function == ISAPNP_FUNCTION(0x2)) {
 571                                         cs->subtyp = SEDL_SPEED_FAX;
 572                                         cs->hw.sedl.chip = SEDL_CHIP_ISAC_ISAR;
 573                                         *bytecnt = 16;
 574                                 } else {
 575                                         cs->subtyp = SEDL_SPEED_CARD_WIN;
 576                                         cs->hw.sedl.chip = SEDL_CHIP_TEST;
 577                                 }
 578
 579                                 return (1);
 580                         } else {
 581                                 printk(KERN_ERR "Sedlbauer PnP: PnP error card found, no device\n");
 582                                 return(0);
 583                         }
 584                 }
 585                 ipid++;
 586                 pnp_c = NULL;
 587         }
 588
 589         printk(KERN_INFO "Sedlbauer PnP: no ISAPnP card found\n");
 590         return -1;
 591 }
 592 #else
 593
 594 static int __devinit
 595 setup_sedlbauer_isapnp(struct IsdnCard *card, int *bytecnt)
 596 {
 597         return -1;
 598 }
 599 #endif /* __ISAPNP__ */
 600
 601 #ifdef CONFIG_PCI_LEGACY
 602 static struct pci_dev *dev_sedl __devinitdata = NULL;
 603
 604 static int __devinit
 605 setup_sedlbauer_pci(struct IsdnCard *card)
 606 {
 607         struct IsdnCardState *cs = card->cs;
 608         u16 sub_vendor_id, sub_id;
 609
 610         if ((dev_sedl = pci_find_device(PCI_VENDOR_ID_TIGERJET,
 611                         PCI_DEVICE_ID_TIGERJET_100, dev_sedl))) {
 612                 if (pci_enable_device(dev_sedl))
 613                         return(0);
 614                 cs->irq = dev_sedl->irq;
 615                 if (!cs->irq) {
 616                         printk(KERN_WARNING "Sedlbauer: No IRQ for PCI card found\n");
 617                         return(0);
 618                 }
 619                 cs->hw.sedl.cfg_reg = pci_resource_start(dev_sedl, 0);
 620         } else {
 621                 printk(KERN_WARNING "Sedlbauer: No PCI card found\n");
 622                 return(0);
 623         }
 624         cs->irq_flags |= IRQF_SHARED;
 625         cs->hw.sedl.bus = SEDL_BUS_PCI;
 626         sub_vendor_id = dev_sedl->subsystem_vendor;
 627         sub_id = dev_sedl->subsystem_device;
 628         printk(KERN_INFO "Sedlbauer: PCI subvendor:%x subid %x\n",
 629                 sub_vendor_id, sub_id);
 630         printk(KERN_INFO "Sedlbauer: PCI base adr %#x\n",
 631                 cs->hw.sedl.cfg_reg);
 632         if (sub_id != PCI_SUB_ID_SEDLBAUER) {
 633                 printk(KERN_ERR "Sedlbauer: unknown sub id %#x\n", sub_id);
 634                 return(0);
 635         }
 636         if (sub_vendor_id == PCI_SUBVENDOR_SPEEDFAX_PYRAMID) {
 637                 cs->hw.sedl.chip = SEDL_CHIP_ISAC_ISAR;
 638                 cs->subtyp = SEDL_SPEEDFAX_PYRAMID;
 639         } else if (sub_vendor_id == PCI_SUBVENDOR_SPEEDFAX_PCI) {
 640                 cs->hw.sedl.chip = SEDL_CHIP_ISAC_ISAR;
 641                 cs->subtyp = SEDL_SPEEDFAX_PCI;
 642         } else if (sub_vendor_id == PCI_SUBVENDOR_HST_SAPHIR3) {
 643                 cs->hw.sedl.chip = SEDL_CHIP_IPAC;
 644                 cs->subtyp = HST_SAPHIR3;
 645         } else if (sub_vendor_id == PCI_SUBVENDOR_SEDLBAUER_PCI) {
 646                 cs->hw.sedl.chip = SEDL_CHIP_IPAC;
 647                 cs->subtyp = SEDL_SPEED_PCI;
 648         } else {
 649                 printk(KERN_ERR "Sedlbauer: unknown sub vendor id %#x\n",
 650                         sub_vendor_id);
 651                 return(0);
 652         }
 653
 654         cs->hw.sedl.reset_on = SEDL_ISAR_PCI_ISAR_RESET_ON;
 655         cs->hw.sedl.reset_off = SEDL_ISAR_PCI_ISAR_RESET_OFF;
 656         byteout(cs->hw.sedl.cfg_reg, 0xff);
 657         byteout(cs->hw.sedl.cfg_reg, 0x00);
 658         byteout(cs->hw.sedl.cfg_reg+ 2, 0xdd);
 659         byteout(cs->hw.sedl.cfg_reg+ 5, 0); /* disable all IRQ */
 660         byteout(cs->hw.sedl.cfg_reg +3, cs->hw.sedl.reset_on);
 661         mdelay(2);
 662         byteout(cs->hw.sedl.cfg_reg +3, cs->hw.sedl.reset_off);
 663         mdelay(10);
 664
 665         return (1);
 666 }
 667
 668 #else
 669
 670 static int __devinit
 671 setup_sedlbauer_pci(struct IsdnCard *card)
 672 {
 673         return (1);
 674 }
 675
 676 #endif /* CONFIG_PCI_LEGACY */
 677
 678 int __devinit
 679 setup_sedlbauer(struct IsdnCard *card)
 680 {
 681         int bytecnt = 8, ver, val, rc;
 682         struct IsdnCardState *cs = card->cs;
 683         char tmp[64];
 684
 685         strcpy(tmp, Sedlbauer_revision);
 686         printk(KERN_INFO "HiSax: Sedlbauer driver Rev. %s\n", HiSax_getrev(tmp));
 687
 688         if (cs->typ == ISDN_CTYPE_SEDLBAUER) {
 689                 cs->subtyp = SEDL_SPEED_CARD_WIN;
 690                 cs->hw.sedl.bus = SEDL_BUS_ISA;
 691                 cs->hw.sedl.chip = SEDL_CHIP_TEST;
 692         } else if (cs->typ == ISDN_CTYPE_SEDLBAUER_PCMCIA) {
 693                 cs->subtyp = SEDL_SPEED_STAR;
 694                 cs->hw.sedl.bus = SEDL_BUS_PCMCIA;
 695                 cs->hw.sedl.chip = SEDL_CHIP_TEST;
 696         } else if (cs->typ == ISDN_CTYPE_SEDLBAUER_FAX) {
 697                 cs->subtyp = SEDL_SPEED_FAX;
 698                 cs->hw.sedl.bus = SEDL_BUS_ISA;
 699                 cs->hw.sedl.chip = SEDL_CHIP_ISAC_ISAR;
 700         } else
 701                 return (0);
 702
 703         bytecnt = 8;
 704         if (card->para[1]) {
 705                 cs->hw.sedl.cfg_reg = card->para[1];
 706                 cs->irq = card->para[0];
 707                 if (cs->hw.sedl.chip == SEDL_CHIP_ISAC_ISAR) {
 708                         bytecnt = 16;
 709                 }
 710         } else {
 711                 rc = setup_sedlbauer_isapnp(card, &bytecnt);
 712                 if (!rc)
 713                         return (0);
 714                 if (rc > 0)
 715                         goto ready;
 716
 717                 /* Probe for Sedlbauer speed pci */
 718                 rc = setup_sedlbauer_pci(card);
 719                 if (!rc)
 720                         return (0);
 721
 722                 bytecnt = 256;
 723         }
 724
 725 ready:
 726
 727         /* In case of the sedlbauer pcmcia card, this region is in use,
 728          * reserved for us by the card manager. So we do not check it
 729          * here, it would fail.
 730          */
 731         if (cs->hw.sedl.bus != SEDL_BUS_PCMCIA &&
 732                 !request_region(cs->hw.sedl.cfg_reg, bytecnt, "sedlbauer isdn")) {
 733                 printk(KERN_WARNING
 734                         "HiSax: %s config port %x-%x already in use\n",
 735                         CardType[card->typ],
 736                         cs->hw.sedl.cfg_reg,
 737                         cs->hw.sedl.cfg_reg + bytecnt);
 738                         return (0);
 739         }
 740
 741         printk(KERN_INFO
 742                "Sedlbauer: defined at 0x%x-0x%x IRQ %d\n",
 743                cs->hw.sedl.cfg_reg,
 744                cs->hw.sedl.cfg_reg + bytecnt,
 745                cs->irq);
 746
 747         cs->BC_Read_Reg = &ReadHSCX;
 748         cs->BC_Write_Reg = &WriteHSCX;
 749         cs->BC_Send_Data = &hscx_fill_fifo;
 750         cs->cardmsg = &Sedl_card_msg;
 751
 752 /*
 753  * testing ISA and PCMCIA Cards for IPAC, default is ISAC
 754  * do not test for PCI card, because ports are different
 755  * and PCI card uses only IPAC (for the moment)
 756  */
 757         if (cs->hw.sedl.bus != SEDL_BUS_PCI) {
 758                 val = readreg(cs->hw.sedl.cfg_reg + SEDL_IPAC_ANY_ADR,
 759                         cs->hw.sedl.cfg_reg + SEDL_IPAC_ANY_IPAC, IPAC_ID);
 760                 printk(KERN_DEBUG "Sedlbauer: testing IPAC version %x\n", val);
 761                 if ((val == 1) || (val == 2)) {
 762                         /* IPAC */
 763                         cs->subtyp = SEDL_SPEED_WIN2_PC104;
 764                         if (cs->hw.sedl.bus == SEDL_BUS_PCMCIA) {
 765                                 cs->subtyp = SEDL_SPEED_STAR2;
 766                         }
 767                         cs->hw.sedl.chip = SEDL_CHIP_IPAC;
 768                 } else {
 769                         /* ISAC_HSCX oder ISAC_ISAR */
 770                         if (cs->hw.sedl.chip == SEDL_CHIP_TEST) {
 771                                 cs->hw.sedl.chip = SEDL_CHIP_ISAC_HSCX;
 772                         }
 773                 }
 774         }
 775
 776 /*
 777  * hw.sedl.chip is now properly set
 778  */
 779         printk(KERN_INFO "Sedlbauer: %s detected\n",
 780                 Sedlbauer_Types[cs->subtyp]);
 781
 782         setup_isac(cs);
 783         if (cs->hw.sedl.chip == SEDL_CHIP_IPAC) {
 784                 if (cs->hw.sedl.bus == SEDL_BUS_PCI) {
 785                         cs->hw.sedl.adr  = cs->hw.sedl.cfg_reg + SEDL_IPAC_PCI_ADR;
 786                         cs->hw.sedl.isac = cs->hw.sedl.cfg_reg + SEDL_IPAC_PCI_IPAC;
 787                         cs->hw.sedl.hscx = cs->hw.sedl.cfg_reg + SEDL_IPAC_PCI_IPAC;
 788                 } else {
 789                         cs->hw.sedl.adr  = cs->hw.sedl.cfg_reg + SEDL_IPAC_ANY_ADR;
 790                         cs->hw.sedl.isac = cs->hw.sedl.cfg_reg + SEDL_IPAC_ANY_IPAC;
 791                         cs->hw.sedl.hscx = cs->hw.sedl.cfg_reg + SEDL_IPAC_ANY_IPAC;
 792                 }
 793                 test_and_set_bit(HW_IPAC, &cs->HW_Flags);
 794                 cs->readisac = &ReadISAC_IPAC;
 795                 cs->writeisac = &WriteISAC_IPAC;
 796                 cs->readisacfifo = &ReadISACfifo_IPAC;
 797                 cs->writeisacfifo = &WriteISACfifo_IPAC;
 798                 cs->irq_func = &sedlbauer_interrupt_ipac;
 799                 val = readreg(cs->hw.sedl.adr, cs->hw.sedl.isac, IPAC_ID);
 800                 printk(KERN_INFO "Sedlbauer: IPAC version %x\n", val);
 801         } else {
 802                 /* ISAC_HSCX oder ISAC_ISAR */
 803                 cs->readisac = &ReadISAC;
 804                 cs->writeisac = &WriteISAC;
 805                 cs->readisacfifo = &ReadISACfifo;
 806                 cs->writeisacfifo = &WriteISACfifo;
 807                 if (cs->hw.sedl.chip == SEDL_CHIP_ISAC_ISAR) {
 808                         if (cs->hw.sedl.bus == SEDL_BUS_PCI) {
 809                                 cs->hw.sedl.adr = cs->hw.sedl.cfg_reg +
 810                                                         SEDL_ISAR_PCI_ADR;
 811                                 cs->hw.sedl.isac = cs->hw.sedl.cfg_reg +
 812                                                         SEDL_ISAR_PCI_ISAC;
 813                                 cs->hw.sedl.hscx = cs->hw.sedl.cfg_reg +
 814                                                         SEDL_ISAR_PCI_ISAR;
 815                         } else {
 816                                 cs->hw.sedl.adr = cs->hw.sedl.cfg_reg +
 817                                                         SEDL_ISAR_ISA_ADR;
 818                                 cs->hw.sedl.isac = cs->hw.sedl.cfg_reg +
 819                                                         SEDL_ISAR_ISA_ISAC;
 820                                 cs->hw.sedl.hscx = cs->hw.sedl.cfg_reg +
 821                                                         SEDL_ISAR_ISA_ISAR;
 822                                 cs->hw.sedl.reset_on = cs->hw.sedl.cfg_reg +
 823                                                         SEDL_ISAR_ISA_ISAR_RESET_ON;
 824                                 cs->hw.sedl.reset_off = cs->hw.sedl.cfg_reg +
 825                                                         SEDL_ISAR_ISA_ISAR_RESET_OFF;
 826                         }
 827                         cs->bcs[0].hw.isar.reg = &cs->hw.sedl.isar;
 828                         cs->bcs[1].hw.isar.reg = &cs->hw.sedl.isar;
 829                         test_and_set_bit(HW_ISAR, &cs->HW_Flags);
 830                         cs->irq_func = &sedlbauer_interrupt_isar;
 831                         cs->auxcmd = &isar_auxcmd;
 832                         ISACVersion(cs, "Sedlbauer:");
 833                         cs->BC_Read_Reg = &ReadISAR;
 834                         cs->BC_Write_Reg = &WriteISAR;
 835                         cs->BC_Send_Data = &isar_fill_fifo;
 836                         bytecnt = 3;
 837                         while (bytecnt) {
 838                                 ver = ISARVersion(cs, "Sedlbauer:");
 839                                 if (ver < 0)
 840                                         printk(KERN_WARNING
 841                                                 "Sedlbauer: wrong ISAR version (ret = %d)\n", ver);
 842                                 else
 843                                         break;
 844                                 reset_sedlbauer(cs);
 845                                 bytecnt--;
 846                         }
 847                         if (!bytecnt) {
 848                                 release_io_sedlbauer(cs);
 849                                 return (0);
 850                         }
 851                 } else {
 852                         if (cs->hw.sedl.bus == SEDL_BUS_PCMCIA) {
 853                                 cs->hw.sedl.adr = cs->hw.sedl.cfg_reg + SEDL_HSCX_PCMCIA_ADR;
 854                                 cs->hw.sedl.isac = cs->hw.sedl.cfg_reg + SEDL_HSCX_PCMCIA_ISAC;
 855                                 cs->hw.sedl.hscx = cs->hw.sedl.cfg_reg + SEDL_HSCX_PCMCIA_HSCX;
 856                                 cs->hw.sedl.reset_on = cs->hw.sedl.cfg_reg + SEDL_HSCX_PCMCIA_RESET;
 857                                 cs->hw.sedl.reset_off = cs->hw.sedl.cfg_reg + SEDL_HSCX_PCMCIA_RESET;
 858                                 cs->irq_flags |= IRQF_SHARED;
 859                         } else {
 860                                 cs->hw.sedl.adr = cs->hw.sedl.cfg_reg + SEDL_HSCX_ISA_ADR;
 861                                 cs->hw.sedl.isac = cs->hw.sedl.cfg_reg + SEDL_HSCX_ISA_ISAC;
 862                                 cs->hw.sedl.hscx = cs->hw.sedl.cfg_reg + SEDL_HSCX_ISA_HSCX;
 863                                 cs->hw.sedl.reset_on = cs->hw.sedl.cfg_reg + SEDL_HSCX_ISA_RESET_ON;
 864                                 cs->hw.sedl.reset_off = cs->hw.sedl.cfg_reg + SEDL_HSCX_ISA_RESET_OFF;
 865                         }
 866                         cs->irq_func = &sedlbauer_interrupt;
 867                         ISACVersion(cs, "Sedlbauer:");
 868
 869                         if (HscxVersion(cs, "Sedlbauer:")) {
 870                                 printk(KERN_WARNING
 871                                         "Sedlbauer: wrong HSCX versions check IO address\n");
 872                                 release_io_sedlbauer(cs);
 873                                 return (0);
 874                         }
 875                 }
 876         }
 877         return (1);
 878 }