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