blob: 69dfc8d29017f62dde23c9fbd7123b17410bcbec [file] [log] [blame]
Linus Torvalds1da177e2005-04-16 15:20:36 -07001/* $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>
Linus Torvalds1da177e2005-04-16 15:20:36 -070042#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
Adrian Bunk672c3fd2005-06-25 14:59:18 -070051static const char *Sedlbauer_revision = "$Revision: 1.34.2.6 $";
Linus Torvalds1da177e2005-04-16 15:20:36 -070052
Adrian Bunk672c3fd2005-06-25 14:59:18 -070053static const char *Sedlbauer_Types[] =
Linus Torvalds1da177e2005-04-16 15:20:36 -070054 {"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
119static inline u_char
120readreg(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
129static inline void
130readfifo(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
137static inline void
138writereg(unsigned int ale, unsigned int adr, u_char off, u_char data)
139{
140 byteout(ale, off);
141 byteout(adr, data);
142}
143
144static inline void
145writefifo(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
153static u_char
154ReadISAC(struct IsdnCardState *cs, u_char offset)
155{
156 return (readreg(cs->hw.sedl.adr, cs->hw.sedl.isac, offset));
157}
158
159static void
160WriteISAC(struct IsdnCardState *cs, u_char offset, u_char value)
161{
162 writereg(cs->hw.sedl.adr, cs->hw.sedl.isac, offset, value);
163}
164
165static void
166ReadISACfifo(struct IsdnCardState *cs, u_char * data, int size)
167{
168 readfifo(cs->hw.sedl.adr, cs->hw.sedl.isac, 0, data, size);
169}
170
171static void
172WriteISACfifo(struct IsdnCardState *cs, u_char * data, int size)
173{
174 writefifo(cs->hw.sedl.adr, cs->hw.sedl.isac, 0, data, size);
175}
176
177static u_char
178ReadISAC_IPAC(struct IsdnCardState *cs, u_char offset)
179{
180 return (readreg(cs->hw.sedl.adr, cs->hw.sedl.isac, offset|0x80));
181}
182
183static void
184WriteISAC_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
189static void
190ReadISACfifo_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
195static void
196WriteISACfifo_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
201static u_char
202ReadHSCX(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
208static void
209WriteHSCX(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
221static u_char
222ReadISAR(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
231static void
232WriteISAR(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
260static irqreturn_t
David Howells7d12e782006-10-05 14:55:46 +0100261sedlbauer_interrupt(int intno, void *dev_id)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700262{
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
306static irqreturn_t
David Howells7d12e782006-10-05 14:55:46 +0100307sedlbauer_interrupt_ipac(int intno, void *dev_id)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700308{
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);
315Start_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
353static irqreturn_t
David Howells7d12e782006-10-05 14:55:46 +0100354sedlbauer_interrupt_isar(int intno, void *dev_id)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700355{
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
Adrian Bunk672c3fd2005-06-25 14:59:18 -0700394static void
Linus Torvalds1da177e2005-04-16 15:20:36 -0700395release_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
408static void
409reset_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
440static int
441Sedl_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:
Karsten Keilc713f572007-07-17 04:04:18 -0700452 if (cs->hw.sedl.bus == SEDL_BUS_PCI)
453 /* disable all IRQ */
454 byteout(cs->hw.sedl.cfg_reg+ 5, 0);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700455 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);
Karsten Keilc713f572007-07-17 04:04:18 -0700472 if (cs->hw.sedl.bus == SEDL_BUS_PCI)
473 /* enable all IRQ */
474 byteout(cs->hw.sedl.cfg_reg+ 5, 0x02);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700475 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
Linus Torvalds1da177e2005-04-16 15:20:36 -0700519#ifdef __ISAPNP__
520static 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
530static struct isapnp_device_id *ipid __devinitdata = &sedl_ids[0];
531static struct pnp_card *pnp_c __devinitdata = NULL;
Jeff Garzik7da0d982007-10-03 15:37:40 -0400532
533static int __devinit
534setup_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",
Harvey Harrison156f1ed2008-04-28 02:14:40 -0700556 __func__, err);
Jeff Garzik7da0d982007-10-03 15:37:40 -0400557 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
594static int __devinit
595setup_sedlbauer_isapnp(struct IsdnCard *card, int *bytecnt)
596{
597 return -1;
598}
599#endif /* __ISAPNP__ */
600
Tilman Schmidt41a68a72010-01-18 17:24:10 +0100601#ifdef CONFIG_PCI
Jeff Garzik7da0d982007-10-03 15:37:40 -0400602static struct pci_dev *dev_sedl __devinitdata = NULL;
603
604static int __devinit
605setup_sedlbauer_pci(struct IsdnCard *card)
606{
607 struct IsdnCardState *cs = card->cs;
608 u16 sub_vendor_id, sub_id;
609
Tilman Schmidt41a68a72010-01-18 17:24:10 +0100610 if ((dev_sedl = hisax_find_pci_device(PCI_VENDOR_ID_TIGERJET,
Jeff Garzik7da0d982007-10-03 15:37:40 -0400611 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
670static int __devinit
671setup_sedlbauer_pci(struct IsdnCard *card)
672{
673 return (1);
674}
675
Tilman Schmidt41a68a72010-01-18 17:24:10 +0100676#endif /* CONFIG_PCI */
Linus Torvalds1da177e2005-04-16 15:20:36 -0700677
678int __devinit
679setup_sedlbauer(struct IsdnCard *card)
680{
Jeff Garzik7da0d982007-10-03 15:37:40 -0400681 int bytecnt = 8, ver, val, rc;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700682 struct IsdnCardState *cs = card->cs;
683 char tmp[64];
Linus Torvalds1da177e2005-04-16 15:20:36 -0700684
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 {
Jeff Garzik7da0d982007-10-03 15:37:40 -0400711 rc = setup_sedlbauer_isapnp(card, &bytecnt);
712 if (!rc)
713 return (0);
714 if (rc > 0)
715 goto ready;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700716
Jeff Garzik7da0d982007-10-03 15:37:40 -0400717 /* Probe for Sedlbauer speed pci */
718 rc = setup_sedlbauer_pci(card);
719 if (!rc)
720 return (0);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700721
Linus Torvalds1da177e2005-04-16 15:20:36 -0700722 bytecnt = 256;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700723 }
Jeff Garzikdf61bec2006-12-08 02:39:37 -0800724
Linus Torvalds1da177e2005-04-16 15:20:36 -0700725ready:
Jeff Garzikdf61bec2006-12-08 02:39:37 -0800726
Linus Torvalds1da177e2005-04-16 15:20:36 -0700727 /* 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;
Thomas Gleixner9ba02be2006-07-01 19:29:36 -0700858 cs->irq_flags |= IRQF_SHARED;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700859 } 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}